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
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
|
/***********************************************************************
* *
* This software is part of the ast package *
* Copyright (c) 1985-2011 AT&T Intellectual Property *
* and is licensed under the *
* Eclipse Public License, Version 1.0 *
* by AT&T Intellectual Property *
* *
* A copy of the License is available at *
* http://www.eclipse.org/org/documents/epl-v10.html *
* (with md5 checksum b35adb5213ca9657e911e9befb180842) *
* *
* Information and Software Systems Research *
* AT&T Research *
* Florham Park NJ *
* *
* Glenn Fowler <gsf@research.att.com> *
* David Korn <dgk@research.att.com> *
* Phong Vo <kpv@research.att.com> *
* *
***********************************************************************/
#include "FEATURE/uwin"
#if !_UWIN
void _STUB_err(){}
#else
#pragma prototyped
/*
* bsd 4.4 compatibility
*
* NOTE: errorv(ERROR_NOID) => the first arg is the printf format
*/
#include <ast.h>
#include <error.h>
#include <windows.h>
#ifdef __EXPORT__
#define extern __EXPORT__
#endif
static void
errmsg(int level, int code, const char* fmt, va_list ap)
{
if (!error_info.id)
{
struct _astdll* dp = _ast_getdll();
char* s;
char* t;
if (s = dp->_ast__argv[0])
{
if (t = strrchr(s, '/'))
s = t + 1;
error_info.id = s;
}
}
errorv(fmt, level|ERROR_NOID, ap);
if ((level & ERROR_LEVEL) >= ERROR_ERROR)
exit(code);
}
extern void verr(int code, const char* fmt, va_list ap)
{
errmsg(ERROR_ERROR|ERROR_SYSTEM, code, fmt, ap);
}
extern void err(int code, const char* fmt, ...)
{
va_list ap;
va_start(ap, fmt);
errmsg(ERROR_ERROR|ERROR_SYSTEM, code, fmt, ap);
va_end(ap);
}
extern void verrx(int code, const char* fmt, va_list ap)
{
errmsg(ERROR_ERROR, code, fmt, ap);
}
extern void errx(int code, const char* fmt, ...)
{
va_list ap;
va_start(ap, fmt);
errmsg(ERROR_ERROR, code, fmt, ap);
va_end(ap);
}
extern void vwarn(const char* fmt, va_list ap)
{
errmsg(ERROR_WARNING|ERROR_SYSTEM, 0, fmt, ap);
}
extern void warn(const char* fmt, ...)
{
va_list ap;
va_start(ap, fmt);
errmsg(ERROR_WARNING|ERROR_SYSTEM, 0, fmt, ap);
va_end(ap);
}
extern void vwarnx(const char* fmt, va_list ap)
{
errmsg(ERROR_WARNING, 0, fmt, ap);
}
extern void warnx(const char* fmt, ...)
{
va_list ap;
va_start(ap, fmt);
errmsg(ERROR_WARNING, 0, fmt, ap);
va_end(ap);
}
#endif
|
