diff options
Diffstat (limited to 'util/et/com_err.c')
-rw-r--r-- | util/et/com_err.c | 133 |
1 files changed, 0 insertions, 133 deletions
diff --git a/util/et/com_err.c b/util/et/com_err.c deleted file mode 100644 index 8860446..0000000 --- a/util/et/com_err.c +++ /dev/null @@ -1,133 +0,0 @@ -/* - * Copyright 1987, 1988 by MIT Student Information Processing Board. - * - * For copyright info, see mit-sipb-copyright.h. - */ - -#include <stdio.h> -#include "mit-sipb-copyright.h" - -#ifdef STDARG_PROTOTYPES -#include <stdarg.h> -#else -#include <varargs.h> -#define VARARGS -#endif - -#include "error_table.h" -#include "internal.h" - -#ifdef notdef -/* - * Protect us from header version (externally visible) of com_err, so - * we can survive in a <varargs.h> environment. I think. - */ -#define com_err com_err_external -#include "com_err.h" -#undef com_err -#endif - -/* We have problems with varargs definitions if we include com_err.h */ - -/* - * XXX for now, we define error_message by hand. Ultimately, we - * should fix up com_err.h so that it's safe to #include here - * directly. - */ -#ifdef __STDC__ -extern char const *error_message (long); -#else -extern char *error_message (); -#endif - -static void -#ifdef __STDC__ - default_com_err_proc (const char *whoami, long code, const char *fmt, va_list args) -#else - default_com_err_proc (whoami, code, fmt, args) - const char *whoami; - long code; - const char *fmt; - va_list args; -#endif -{ - if (whoami) { - fputs(whoami, stderr); - fputs(": ", stderr); - } - if (code) { - fputs(error_message(code), stderr); - fputs(" ", stderr); - } - if (fmt) { - vfprintf (stderr, fmt, args); - } - /* should do this only on a tty in raw mode */ - putc('\r', stderr); - putc('\n', stderr); - fflush(stderr); -} - -#ifdef __STDC__ -typedef void (*errf) (const char *, long, const char *, va_list); -#else -typedef void (*errf) (); -#endif - -errf com_err_hook = default_com_err_proc; - -void com_err_va (whoami, code, fmt, args) - const char *whoami; - long code; - const char *fmt; - va_list args; -{ - (*com_err_hook) (whoami, code, fmt, args); -} - -#ifndef VARARGS -void com_err (const char *whoami, - long code, - const char *fmt, ...) -{ -#else -void com_err (va_alist) - va_dcl -{ - const char *whoami, *fmt; - long code; -#endif - va_list pvar; - - if (!com_err_hook) - com_err_hook = default_com_err_proc; -#ifdef VARARGS - va_start (pvar); - whoami = va_arg (pvar, const char *); - code = va_arg (pvar, long); - fmt = va_arg (pvar, const char *); -#else - va_start(pvar, fmt); -#endif - com_err_va (whoami, code, fmt, pvar); - va_end(pvar); -} - -errf set_com_err_hook (new_proc) - errf new_proc; -{ - errf x = com_err_hook; - - if (new_proc) - com_err_hook = new_proc; - else - com_err_hook = default_com_err_proc; - - return x; -} - -errf reset_com_err_hook () { - errf x = com_err_hook; - com_err_hook = default_com_err_proc; - return x; -} |