www.pudn.com > HEC-linux.zip > error.c

/*+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 
+                                                                   + 
+ error.c - facilities used to handle errors                        + 
+                                                                   + 
+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++*/ 
 
/*+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 
+ macros                                                            + 
+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++*/ 
 
#define FATAL_ERROR();		shutDown(SHUTDOWN_ERROR); 
#define FATAL_ERROR1(str);	printf(str);printf("\n");xmlBegin();fprintf(errPtr,str);xmlEnd();shutDown(SHUTDOWN_ERROR); 
 
#define ERROR_LVL1(str);			FATAL_ERROR1(str);	 
#define ERROR0_LVL2(str);			printf(str);printf("\n");xmlBegin();fprintf(errPtr,str);xmlEnd(); 
#define ERROR1_LVL2(str,arg1);		printf(str,arg1);printf("\n");xmlBegin();fprintf(errPtr,str,arg1);xmlEnd(); 
#define ERROR2_LVL2(str,arg1,arg2);	printf(str,arg1,arg2);printf("\n");xmlBegin();fprintf(errPtr,str,arg1,arg2);xmlEnd(); 
 
#define FCLOSE(arg);	if(fclose(arg)){ printf("could not close executable file\n"); } 
 
/*+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 
+ private variables                                                 + 
+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++*/ 
 
FILE *errPtr = NULL; 
char errFileName[128]; 
 
/*+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 
+ private prototypes                                                + 
+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++*/ 
 
void xmlBegin(); /* print beginning of XML error message markup*/ 
void xmlEnd(); /* print end of XML error message markup*/ 
 
/*+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 
+ public prototypes                                                 + 
+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++*/ 
 
void setUpErrorFile();	 
void shutDown(U1 code); 
	 
/*+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 
+ definitions                                                       + 
+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++*/ 
 
void setUpErrorFile() 
{ 
	time_t now; 
	struct tm local_time; 
	char digits[16]; 
 
	int retval; 
 
	now = time(NULL); 
	local_time = *(localtime(&now)); 
 
	strcpy(errFileName,"VM_ERROR_"); 
	 
	sprintf(digits,"%u",(local_time.tm_mon+1)); 
	strcat(errFileName,digits); 
	strcat(errFileName,"_"); 
 
	sprintf(digits,"%u",local_time.tm_mday); 
	strcat(errFileName,digits); 
	strcat(errFileName,"_"); 
 
	sprintf(digits,"%lu",(local_time.tm_year+1900)); 
	strcat(errFileName,digits); 
	strcat(errFileName,"_"); 
 
	sprintf(digits,"%u",local_time.tm_hour); 
	strcat(errFileName,digits); 
	strcat(errFileName,"_"); 
 
	sprintf(digits,"%u",local_time.tm_min); 
	strcat(errFileName,digits); 
	strcat(errFileName,"_"); 
 
	sprintf(digits,"%u",local_time.tm_sec); 
	strcat(errFileName,digits); 
 
	strcat(errFileName,".XML"); 
 
	if((errPtr=fopen(errFileName,"wb"))==NULL) 
	{ 
		printf("setUpErrorFile(): error opening %s\n",errFileName); 
		FATAL_ERROR(); 
	} 
 
	retval = fprintf(errPtr,"\r\n"); 
	if(retval < 0) 
	{ 
		printf("setUpErrorFile(): ");  
		printf("error writing to %s\n",errFileName); 
		FATAL_ERROR(); 
	} 
 
	return; 
 
}/*end setUpErrorFile*/ 
 
void shutDown(U1 code) 
{ 
	if(RAM != NULL){ free(RAM); } 
	else{  printf("shutDown(): no RAM[] allocated\n"); } 
	 
	if(errPtr!=NULL) 
	{ 
		int retval; 
		retval = fprintf(errPtr,""); 
		if(retval < 0) 
		{ 
			printf("shutDown(): ");  
			printf("error writing  to %s\n",errFileName); 
		} 
		if(fclose(errPtr)) 
		{ 
			printf("shutDown(): error closing %s\n",errFileName); 
		} 
	} 
	 
	exit(code); 
 
}/*end shutDown*/ 
 
void xmlBegin() 
{ 
	char str1[]="\r\n\t"; 
	char str2[]="%s\r\n\t"; 
	char datestr[64]; 
 
	time_t now; 
	int retval; 
	int i; 
 
	retval = fprintf(errPtr,str1); 
	if(retval < 0) 
	{ 
		printf("xmlBegin(): ");  
		printf("error writing to %s\n",errFileName); 
		return; 
	} 
	 
	/*get rid of '\n' at end of datestr created by ctime()*/ 
	now = time(NULL); 
	strcpy(datestr,ctime(&now)); 
	retval=strlen(datestr); 
	for(i=0;i\r\n\r\n"); 
	if(retval < 0) 
	{ 
		printf("xmlEnd(): ");  
		printf("error writing to %s\n",errFileName); 
	} 
	return; 
 
}/*end xmlEnd*/