1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
|
/* error.c: this file contains an error function
*/
#include <stdio.h>
#include <ctype.h>
#include "sockets.h"
/* ------------------------------------------------------------------------
* Definitions:
*/
#define TERMINATE 1
#ifdef vms
void exit(int);
#endif
#ifdef MACOS_X
void exit(int);
#endif
#ifdef MSDOS
extern void exit(int);
#endif
/* ------------------------------------------------------------------------
* Global Variables:
*/
#ifdef __PROTOTYPE__
void (*error_exit)(int)= exit; /* user may override this */
#else
void (*error_exit)()= exit; /* user may override this */
#endif
/* ------------------------------------------------------------------------
* Source Code:
*/
/*VARARGS*/
/* error: print out an error message:
* error(severity,fmt,...)
* or error(severity,errfunc,fmt,...)
*
* where
*
* severity: severity of error
* XTDIO_SEVERE : severe error - will terminate
* XTDIO_ERROR : error - will terminate
* XTDIO_WARNING : warning message
* XTDIO_NOTE : notification
*
* fmt : printf format specification
* ... : arguments for the fmt
*
* errfunc:
* will be called
*/
#ifdef __PROTOTYPE__
void error(
int severity,
char *fmt,
...)
#else /* __PROTOTYPE__ */
void error(severity,fmt,va_alist)
int severity;
char *fmt;
va_dcl
#endif /* __PROTOTYPE__ */
{
va_list args;
static struct mesgstr {
char *bgn_color;
char *message;
char *end_color;
int flags;
} mesg[]={
{XRED, "fatal error",XGREEN,TERMINATE}, /* SEVERE */
{XRED, "error", XGREEN,TERMINATE}, /* ERROR */
{XYELLOW, "warning", XGREEN,0}, /* WARNING */
{XCYAN, "note", XGREEN,0} /* NOTE */
};
static int nmesg= sizeof(mesg)/sizeof(struct mesgstr);
/* severity sanity checks */
if(severity < 0) severity= 0;
if(severity >= nmesg) severity= XTDIO_SEVERE;
rdcputs(mesg[severity].bgn_color,stderr);
fprintf(stderr,"***%s*** ",mesg[severity].message);
rdcputs(mesg[severity].end_color,stderr);
/* initialize for variable arglist handling */
#ifdef __PROTOTYPE__
va_start(args,fmt);
vfprintf(stderr,fmt,args);
va_end(args);
#else
va_start(args);
vfprintf(stderr,fmt,args);
va_end(args);
#endif
/* terminate */
if(mesg[severity].flags & TERMINATE) (*error_exit)(1);
}
/* ------------------------------------------------------------------------ */
|
