common/trace.c

   1 /*-
   2  * Copyright (c) 1996
   3  *      Rob Zimmermann.  All rights reserved.
   4  * Copyright (c) 1996
   5  *      Keith Bostic.  All rights reserved.
   6  *
   7  * See the LICENSE file for redistribution information.
   8  */
   9
  10 #include "config.h"
  11
  12 #ifndef lint
  13 static const char sccsid[] = "$Id: trace.c,v 8.1 1996/12/12 09:16:24 bostic Exp $ (Berkeley) $Date: 1996/12/12 09:16:24 $";
  14 #endif /* not lint */
  15
  16 #include <sys/queue.h>
  17
  18 #include <bitstring.h>
  19 #include <stdio.h>
  20
  21 #ifdef __STDC__
  22 #include <stdarg.h>
  23 #else
  24 #include <varargs.h>
  25 #endif
  26
  27 #include "common.h"
  28
  29 #ifdef TRACE
  30
  31 static FILE *tfp;
  32
  33 /*
  34  * trace_end --
  35  *      End tracing.
  36  *
  37  * PUBLIC: void trace_end __P((void));
  38  */
  39 void
  40 trace_end()
  41 {
  42         if (tfp != NULL && tfp != stderr)
  43                 (void)fclose(tfp);
  44 }
  45
  46 /*
  47  * trace_init --
  48  *      Initialize tracing.
  49  *
  50  * PUBLIC: void trace_init __P((char *));
  51  */
  52 void
  53 trace_init(name)
  54         char *name;
  55 {
  56         if (name == NULL || (tfp = fopen(name, "w")) == NULL)
  57                 tfp = stderr;
  58         trace("\n=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=\nTRACE\n");
  59 }
  60
  61 /*
  62  * trace --
  63  *      Debugging trace routine.
  64  *
  65  * PUBLIC: void trace __P((const char *, ...));
  66  */
  67 void
  68 #ifdef __STDC__
  69 trace(const char *fmt, ...)
  70 #else
  71 trace(fmt, va_alist)
  72         char *fmt;
  73         va_dcl
  74 #endif
  75 {
  76         va_list ap;
  77
  78         if (tfp == NULL)
  79                 trace_init(NULL);
  80
  81 #ifdef __STDC__
  82         va_start(ap, fmt);
  83 #else
  84         va_start(ap);
  85 #endif
  86         (void)vfprintf(tfp, fmt, ap);
  87         va_end(ap);
  88
  89         (void)fflush(tfp);
  90 }
  91 #endif