bug fixes and changes from Rick Adams

[unix-history] / usr / src / usr.bin / uucp / assert.c

#ifndef lint
static char sccsid[] = "@(#)assert.c    5.3 (Berkeley) %G%";
#endif

#include "uucp.h"
#include <sys/time.h>
#include <sys/types.h>
#include <errno.h>

/*******
*      assert - print out assetion error
*
*      return code - none
*/

assert(s1, s2, i1)
char *s1, *s2;
{
       register FILE *errlog;
       register struct tm *tp;
       extern struct tm *localtime();
       extern time_t time();
       time_t clock;
       int pid;

       errlog = NULL;
       if (!Debug) {
               int savemask;
               savemask = umask(LOGMASK);
               errlog = fopen(ERRLOG, "a");
               umask(savemask);
       }
       if (errlog == NULL)
               errlog = stderr;

       pid = getpid();
       fprintf(errlog, "ASSERT ERROR (%.9s)  ", Progname);
       fprintf(errlog, "pid: %d  ", pid);
       time(&clock);
       tp = localtime(&clock);
#ifdef USG
       fprintf(errlog, "(%d/%d-%2.2d:%2.2d) ", tp->tm_mon + 1,
               tp->tm_mday, tp->tm_hour, tp->tm_min);
#else
       fprintf(errlog, "(%d/%d-%02d:%02d) ", tp->tm_mon + 1,
               tp->tm_mday, tp->tm_hour, tp->tm_min);
#endif
       fprintf(errlog, "%s %s (%d)\n", s1 ? s1 : "", s2 ? s2 : "", i1);
       if (errlog != stderr)
               fclose(errlog);
       return;
}