pet-projects/DLW-1e/das/error.c

   1 #include <stdio.h>
   2 #include <string.h>
   3 #include <stdarg.h>
   4 #include <stdlib.h>
   5
   6 #include "error.h"
   7
   8 const char *program_name;
   9
  10 /* report(): Write 'mesg' with specified 'prefix' to stderr */
  11 static void report(const char *prefix, const char *msg, va_list params)
  12 {
  13         fputs(prefix, stderr);
  14         vfprintf(stderr, msg, params);
  15         fputs("\n", stderr);
  16 }
  17
  18 void error(int line_nr, const char *err, ...)
  19 {
  20         va_list params;
  21
  22         fprintf(stderr, "%s:%d: error: ", program_name, line_nr);
  23
  24         va_start(params, err);
  25         vfprintf(stderr, err, params);
  26         va_end(params);
  27
  28         fputs("\n", stderr);
  29 }
  30
  31 void fatal(const char *err, ...)
  32 {
  33         va_list params;
  34
  35         va_start(params, err);
  36         report("fatal: ", err, params);
  37         va_end(params);
  38
  39         exit(1);
  40 }
  41
  42 void error_setup(const char *name)
  43 {
  44         char *p;
  45
  46         p = strrchr(name, '/');
  47         program_name = (p == NULL ? name : ++p);
  48 }