src/common/error.c

/* Copyright (c) 1991 Regents of the University of California */

#ifndef lint
static char SCCSid[] = "$SunId$ LBL";
#endif

/*
 *  error.c - standard error reporting function
 */

#include  "standard.h"

#ifndef linux
extern char  *sys_errlist[];    /* system error list */
extern int  sys_nerr;           /* number of system errors */
#endif
                                /* global list of error actions */
struct erract   erract[NERRS] = ERRACT_INIT;

char  errmsg[512];              /* global error message buffer */


error(etype, emsg)              /* report error, quit if necessary */
int  etype;
char  *emsg;
{
        register struct erract  *ep;

        if (etype < 0 | etype >= NERRS)
                return;
        ep = erract + etype;
        if (ep->pf != NULL) {
                (*ep->pf)(ep->pre);
                (*ep->pf)(emsg);
                if (etype == SYSTEM && errno > 0) {
                        (*ep->pf)(": ");
                        if (errno <= sys_nerr)
                                (*ep->pf)(sys_errlist[errno]);
                        else
                                (*ep->pf)("Unknown error");
                }
                (*ep->pf)("\n");
        }
        if (!ep->ec)            /* non-fatal */
                return;
        if (ep->ec < 0)         /* dump core */
                abort();
        quit(ep->ec);           /* quit calls exit after cleanup */
}
Revision:	2.4
Committed:	Tue Nov 11 19:02:15 1997 UTC (26 years, 5 months ago) by gregl
Content type:	text/plain
Branch:	MAIN
Changes since 2.3:	+19 -33 lines
Log Message:	created erract structure containing error messages and actions
#	User	Rev	Content
1	greg	1.1	/* Copyright (c) 1991 Regents of the University of California */
2
3			#ifndef lint
4			static char SCCSid[] = "$SunId$ LBL";
5			#endif
6
7			/*
8			* error.c - standard error reporting function
9			*/
10
11			#include "standard.h"
12
13	gregl	2.3	#ifndef linux
14	greg	1.1	extern char sys_errlist[]; / system error list */
15			extern int sys_nerr; /* number of system errors */
16	gregl	2.3	#endif
17	gregl	2.4	/* global list of error actions */
18			struct erract erract[NERRS] = ERRACT_INIT;
19	greg	1.1
20	greg	2.2	char errmsg[512]; /* global error message buffer */
21	greg	1.1
22
23			error(etype, emsg) /* report error, quit if necessary */
24			int etype;
25			char *emsg;
26			{
27	gregl	2.4	register struct erract *ep;
28
29			if (etype < 0 \| etype >= NERRS)
30	greg	1.1	return;
31	gregl	2.4	ep = erract + etype;
32			if (ep->pf != NULL) {
33			(*ep->pf)(ep->pre);
34			(*ep->pf)(emsg);
35			if (etype == SYSTEM && errno > 0) {
36			(*ep->pf)(": ");
37	greg	1.1	if (errno <= sys_nerr)
38	gregl	2.4	(*ep->pf)(sys_errlist[errno]);
39	greg	1.1	else
40	gregl	2.4	(*ep->pf)("Unknown error");
41	greg	1.1	}
42	gregl	2.4	(*ep->pf)("\n");
43			}
44			if (!ep->ec) /* non-fatal */
45			return;
46			if (ep->ec < 0) /* dump core */
47	greg	1.1	abort();
48	gregl	2.4	quit(ep->ec); /* quit calls exit after cleanup */
49	greg	1.1	}