src/comerr/com_err.c

   1 /*
   2  * Copyright 1987, 1988 by MIT Student Information Processing Board.
   3  *
   4  * For copyright info, see mit-sipb-cr.h.
   5  */
   6
   7 #include <afsconfig.h>
   8 #include <afs/param.h>
   9
  10
  11 #include "internal.h"
  12 #include <stdio.h>
  13 #include <stdarg.h>
  14 #include "error_table.h"
  15 #include "com_err.h"
  16
  17 static void
  18 default_com_err_proc(const char *whoami, afs_int32 code, const char *fmt,
  19                      va_list args)
  20 {
  21     if (whoami) {
  22         fputs(whoami, stderr);
  23         fputs(": ", stderr);
  24     }
  25     if (code) {
  26         fputs(afs_error_message(code), stderr);
  27         fputs(" ", stderr);
  28     }
  29     if (fmt) {
  30         vfprintf(stderr, fmt, args);
  31     }
  32     putc('\n', stderr);
  33     /* should do this only on a tty in raw mode */
  34     putc('\r', stderr);
  35     fflush(stderr);
  36 }
  37
  38 typedef void (*errf) (const char *, afs_int32, const char *, va_list);
  39
  40 static errf com_err_hook = default_com_err_proc;
  41
  42 void
  43 afs_com_err_va(const char *whoami, afs_int32 code, const char *fmt, va_list args)
  44 {
  45     (*com_err_hook) (whoami, code, fmt, args);
  46 }
  47
  48 void
  49 afs_com_err(const char *whoami, afs_int32 code, const char *fmt, ...)
  50 {
  51     va_list pvar;
  52
  53     if (!com_err_hook)
  54         com_err_hook = default_com_err_proc;
  55     va_start(pvar, fmt);
  56     afs_com_err_va(whoami, code, fmt, pvar);
  57     va_end(pvar);
  58 }
  59
  60 errf
  61 afs_set_com_err_hook(errf new_proc)
  62 {
  63     errf x = com_err_hook;
  64     if (new_proc)
  65         com_err_hook = new_proc;
  66     else
  67         com_err_hook = default_com_err_proc;
  68     return x;
  69 }
  70
  71 errf
  72 afs_reset_com_err_hook(void)
  73 {
  74     errf x = com_err_hook;
  75     com_err_hook = default_com_err_proc;
  76     return x;
  77 }