1 #ifndef lint 2 static char sccsid[] = "@(#)assert.c 5.4 (Berkeley) 04/10/85"; 3 #endif 4 5 #include "uucp.h" 6 #include <sys/time.h> 7 #include <errno.h> 8 9 /******* 10 * assert - print out assetion error 11 * 12 * return code - none 13 */ 14 15 assert(s1, s2, i1) 16 char *s1, *s2; 17 { 18 register FILE *errlog; 19 register struct tm *tp; 20 extern struct tm *localtime(); 21 extern time_t time(); 22 time_t clock; 23 int pid; 24 25 errlog = NULL; 26 if (!Debug) { 27 int savemask; 28 savemask = umask(LOGMASK); 29 errlog = fopen(ERRLOG, "a"); 30 umask(savemask); 31 } 32 if (errlog == NULL) 33 errlog = stderr; 34 35 pid = getpid(); 36 fprintf(errlog, "ASSERT ERROR (%.9s) ", Progname); 37 fprintf(errlog, "pid: %d ", pid); 38 time(&clock); 39 tp = localtime(&clock); 40 #ifdef USG 41 fprintf(errlog, "(%d/%d-%2.2d:%2.2d) ", tp->tm_mon + 1, 42 tp->tm_mday, tp->tm_hour, tp->tm_min); 43 #else 44 fprintf(errlog, "(%d/%d-%02d:%02d) ", tp->tm_mon + 1, 45 tp->tm_mday, tp->tm_hour, tp->tm_min); 46 #endif 47 fprintf(errlog, "%s %s (%d)\n", s1 ? s1 : "", s2 ? s2 : "", i1); 48 if (errlog != stderr) 49 fclose(errlog); 50 return; 51 } 52