ysapi.c

unix 下用pro*c tuxedo 开发的东西

		Cstring[j]=Pstring[i];

	}

	Cstring[n-m+1]='\0';

	return(1);

}



/* change the int varible to the string */

void itoa(long The_int_data, char* The_out_string, int j)

{

	int size;

	int i;

	j=j-1;

	sprintf(The_out_string, "%d", The_int_data);

	size = strlen(The_out_string);

	for(i=size;i<j;i++)

	The_out_string[i]=' ';

	The_out_string[i]='\0';

}



/* change the float varible to string, the parameter 'm' is the decimal */

void ftoa(float The_float_data, char *The_out_string, int m, int j)		

{

	float dot_data;

	long The_int_body, The_int_data;

	int k=10;

	int i=1,n;

	char First_string[8], End_string[8], dot[2],whole_string[10];

	

	

	The_out_string[0]='\0';

	dot[0]='.';

	dot[1]='\0';

	

	/* if the float equl to zero ,then ... */

	if (The_float_data==0)

	{

		if (m==0)

		{

			First_string[0]='0';

			First_string[1]='\0';

			strcat(The_out_string, First_string);

			for(n=1;n<j-1;n++)

			The_out_string[n]=' ';

			The_out_string[n]='\0';

			return;

		}

		First_string[0]='0';

		First_string[1]='\0';

		strcat(The_out_string, First_string);

		strcat(The_out_string, dot);

		for(n=0;n<m;n++)

		End_string[n]='0';

		End_string[n]='\0';

		strcat(The_out_string, End_string);

		for(n=m+2;n<j-1;n++)

		The_out_string[n]=' ';

		The_out_string[n]='\0';

		return;

	}

	

	

	/* change the float to long varible */

	for(n=1;n<m;n++)

	k = 10*k;

	

	if( (The_float_data*k-(int)(The_float_data*k))<0.5 )

		The_int_body = (int)(The_float_data*k);

	else 

		The_int_body = (int)(The_float_data*k)+1;

	

	/* calculate the digit of the long varible */

	The_int_data = The_int_body;

	while(1)

	{

		if((The_int_data = (The_int_data/10))<10) 

		break;

		i++;

	}

	i++;

	itoa(The_int_body, whole_string, i);

	

	/* if the float varible smaller than 1, then ... */

	if (The_float_data< 1 )

	{

		First_string[0]='0';

		First_string[1]='\0';

		strcat(The_out_string, First_string);

		strcat(The_out_string, dot);

		strcat(The_out_string, whole_string);

		for(n=i+2;n<j-1;n++)

		The_out_string[n]=' ';

		The_out_string[n]='\0';

		return;

	}

	

	/*change the varible to the First_string and End_string seperate by the dot */

	for(n=0;n<i-m;n++)

	First_string[n]=whole_string[n];

	First_string[n]='\0';

	

	for(n=0;n<m;n++)

	End_string[n]=whole_string[i-m+n];

	End_string[n]='\0';

	

	

	

	strcat( The_out_string, First_string );

	strcat( The_out_string, dot );

	strcat( The_out_string, End_string );

	for(n=i+1;n<j-1;n++)

	The_out_string[n]=' ';

	The_out_string[n]='\0';

	

	

}



/* 	add ' ' at the end of a string		*/

/* 	until the length of the string is n	*/

void str_format(char *str,int n)

{

	int i;

	for( i=0;i<n;i++ )

	{

		if(str[i]=='\0')

		break;

	}

	if( i==n )

		str[i-1]='\0';

	for( ;i<n-1;i++ )

	{

		str[i]=' ';

	}

	str[i-1]='\0';

}



/*Get the Time_Interval specified in the file and return it */

int GetTimeInterval(char* cType)

{

	FILE *hTimeInterval;

	char cLine[MAX_LINE_LEN+1], cCaption[100], cValue[21];

	int iInterval, i;

	char* pLine;

	

	 

	hTimeInterval = fopen( CONFIG_FILE_FOR_TIMEINTERVAL, "r" );

	if( hTimeInterval == NULL )

	{

		ProcessError(LOG_ERROR,   "GetTimeInterval: Cannot open file: ", CONFIG_FILE_FOR_TIMEINTERVAL);

		return(DEFAULT_TIMEINTERVAL);  

	}

	

	while( myapi_ReadALine( cLine, hTimeInterval ) )

	{

		if( cLine[0] == '#' ) continue;

		if( cLine[0] == NULL ) continue;

		

		pLine = cLine;

		while( (*pLine == ' ') || (*pLine == '\t') ) pLine++;

		i=0;

		while( (*pLine != ' ') && (*pLine != '\t') && (*pLine != '\0') )

		{

			cCaption[i] = *pLine;

			i++;

			pLine++;

		}

		

		cCaption[i] = '\0';

		if( strcmp( cCaption, cType ) == 0 ) /*Match*/

		{

			while( (*pLine == ' ') || (*pLine == '\t') ) pLine++;

			if( *pLine == '\0' )

			{
				fclose(hTimeInterval);
				return(DEFAULT_TIMEINTERVAL);

			}
			i=0;

			while( (*pLine != ' ') && (*pLine != '\t') && (*pLine != '\0') )

			{

				cValue[i] = *pLine;

				i++;

				pLine++;

			}

			cValue[i] = '\0';

			iInterval = atoi(cValue);

			

			if(iInterval <= 0) 		

			{

				fclose(hTimeInterval);
				return(DEFAULT_TIMEINTERVAL);

			}

			else

			{
				fclose(hTimeInterval);
				return(iInterval);

			}
		}

		else

			continue;

	}

	fclose( hTimeInterval );

	return(DEFAULT_TIMEINTERVAL);

}



/*Read a line to a string from a file, \n is excluded.

  return 1 if sucessful, 0 otherwise

  Do not close the file.*/

int myapi_ReadALine( char* cLine, FILE* hTable )

{

	char cChar;

	int i=0;

	cLine[0] = '\0';

	while( (cChar = fgetc( hTable )) != '\n' )

	{

		if( cChar == EOF ) return(0);

		cLine[i++] = cChar;

		

		

		if( i >= MAX_LINE_LEN ) i=0;

		cLine[i] = '\0';

	}

	return(1);

}



/*

Read a line to a string from a file, "\n" is excluded.

return 1 if sucessful, 0 otherwise

Do not close the file.

*/



int myapi_ReadALinefromF( char *cALine,FILE *hTable )

{

	char cChar='\0';

	int i=0;

	cALine[0] = '\0';

	while( (cChar = fgetc( hTable )) != '\n' )

	{

		if( cChar == EOF ) return(0);

		cALine[i++] = cChar;

		

		if( i >= MAX_LINE_LEN ) i=0;

		cALine[i] = '\0';	/* define the end of a string */

	}

	return(1);

}



/***  convert from message to stZDSM  ***/



int ZDYSSMRcv( char *message,struct stZDYSMsgHeader *stZDSM )

{

	int flag=0;

	flag+=myapi_ReadString(message,stZDSM->fsxh,0,9);

	flag+=myapi_ReadString(message,stZDSM->jssbh,10,11);

	flag+=myapi_ReadString(message,stZDSM->fssbh,12,13);

	flag+=myapi_ReadString(message,stZDSM->bkdh,14,20);

	flag+=myapi_ReadString(message,stZDSM->yslx,21,21);

	flag+=myapi_ReadString(message,stZDSM->wjbh,22,23);

	flag+=myapi_ReadString(message,stZDSM->qdqa,24,25);

	flag+=myapi_ReadString(message,stZDSM->kq,26,31);

	flag+=myapi_ReadString(message,stZDSM->dingj,32,38);

	flag+=myapi_ReadString(message,stZDSM->dyzs,39,48);

	flag+=myapi_ReadString(message,stZDSM->dyk,49,59);

	flag+=myapi_ReadString(message,stZDSM->lszs,60,69);

	flag+=myapi_ReadString(message,stZDSM->lsk,70,80);

	flag+=myapi_ReadString(message,stZDSM->yxnf,81,84);

	if( flag!=14 )

		return(-1);

	return(0);

}



/***  convert from message to stZDSJ  ***/



int ZDYSSJRcv( char *message,struct stZDYSMsgRec *stZDSJ )

{

	int flag=0;

	flag+=myapi_ReadString(message,stZDSJ->zfjbh,zdnumpoint,zdnumpoint+7);

	flag+=myapi_ReadString(message,stZDSJ->yffs ,zdnumpoint+8,zdnumpoint+14);

	flag+=myapi_ReadString(message,stZDSJ->qzlss,zdnumpoint+15,zdnumpoint+21);

	if( flag!=3 )

		return(-1);

	zdnumpoint+=22;		/*** it is a full varible  ***/

	return(0);

}



/***  convert from message to stPDSM  ***/



int PDYSSMRcv( char *message,struct stPDYSMsgHeader *stPDSM )

{

	int flag=0;

	flag+=myapi_ReadString(message,stPDSM->fsxh,0,9);

	flag+=myapi_ReadString(message,stPDSM->jssbh,10,11);

	flag+=myapi_ReadString(message,stPDSM->fssbh,12,13);

	flag+=myapi_ReadString(message,stPDSM->bkdh,14,20);

	flag+=myapi_ReadString(message,stPDSM->yslx,21,21);

	flag+=myapi_ReadString(message,stPDSM->wjbh,22,23);

	flag+=myapi_ReadString(message,stPDSM->qdqa,24,25);

	flag+=myapi_ReadString(message,stPDSM->qdqb,26,27);

	flag+=myapi_ReadString(message,stPDSM->zdqa,28,29);

	flag+=myapi_ReadString(message,stPDSM->zdqb,30,31);

	flag+=myapi_ReadString(message,stPDSM->kq,32,37);