npv/public/code.frag.c

   1 STATIC void pout(u8 *fmt, ...)
   2 {
   3         va_list ap;
   4
   5         va_start(ap, fmt);
   6         flockfile(stdout);
   7         vfprintf(stdout, fmt, ap);
   8         funlockfile(stdout);
   9         va_end(ap);
  10 }
  11 STATIC void vpout(u8 *fmt, va_list ap)
  12 {
  13         va_list aq;
  14
  15         va_copy(aq, ap);
  16         flockfile(stdout);
  17         vfprintf(stdout, fmt, aq);
  18         funlockfile(stdout);
  19         va_end(aq);
  20 }
  21 STATIC void perr(u8 *fmt, ...)
  22 {
  23         va_list ap;
  24
  25         va_start(ap, fmt);
  26         flockfile(stderr);
  27         vfprintf(stderr, fmt, ap);
  28         funlockfile(stderr);
  29         va_end(ap);
  30 }
  31 STATIC void vperr(u8 *fmt, va_list ap)
  32 {
  33         va_list aq;
  34
  35         va_copy(aq, ap);
  36         flockfile(stderr);
  37         vfprintf(stderr, fmt, aq);
  38         funlockfile(stderr);
  39         va_end(aq);
  40 }
  41 STATIC void warning(u8 *fmt, ...)
  42 {
  43         va_list ap;
  44
  45         perr("WARNING:");
  46         va_start(ap, fmt);
  47         vperr(fmt, ap);
  48         va_end(ap);
  49 }
  50 STATIC void vwarning(u8 *fmt, va_list ap)
  51 {
  52         va_list aq;
  53
  54         perr("WARNING:");
  55         va_copy(aq, ap);
  56         vperr(fmt, aq);
  57         va_end(aq);
  58 }
  59 STATIC void fatal(u8 *fmt, ...)
  60 {
  61         va_list ap;
  62
  63         perr("FATAL:");
  64         va_start(ap, fmt);
  65         vperr(fmt, ap);
  66         va_end(ap);
  67         exit(EXIT_FAILURE);
  68 }
  69 STATIC void vfatal(u8 *fmt, va_list ap)
  70 {
  71         va_list aq;
  72
  73         perr("FATAL:");
  74         va_copy(aq, ap);
  75         vperr(fmt, aq);
  76         va_end(aq);
  77         exit(EXIT_FAILURE);
  78 }
  79 STATIC void exit_ok(u8 *fmt, ...)
  80 {
  81         va_list ap;
  82
  83         pout("EXIT:");
  84         va_start(ap, fmt);
  85         vpout(fmt, ap);
  86         va_end(ap);
  87         exit(EXIT_SUCCESS);
  88 }