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
125
126
127
128
|
/* Copyright (C) 2004 Manuel Novoa III <mjn3@codepoet.org>
*
* GNU Library General Public License (LGPL) version 2 or later.
*
* Dedicated to Toni. See uClibc/DEDICATION.mjn3 for details.
*/
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <stdarg.h>
#include <errno.h>
#include <err.h>
#ifdef __UCLIBC_HAS_THREADS__
#include <pthread.h>
#endif
#ifdef __UCLIBC_MJN3_ONLY__
#warning REMINDER: Deal with wide oriented stderr case.
#endif
libc_hidden_proto(vwarn)
libc_hidden_proto(vwarnx)
libc_hidden_proto(err)
libc_hidden_proto(verr)
libc_hidden_proto(verrx)
libc_hidden_proto(fprintf)
libc_hidden_proto(vfprintf)
libc_hidden_proto(__xpg_strerror_r)
libc_hidden_proto(exit)
libc_hidden_proto(vfprintf)
libc_hidden_proto(stderr)
static void vwarn_work(const char *format, va_list args, int showerr)
{
/* 0123 45678 9 a b*/
static const char fmt[] = "%s: \0: %s\n\0\n";
const char *f;
char buf[64];
__STDIO_AUTO_THREADLOCK_VAR;
/* Do this first, in case something below changes errno. */
f = fmt + 11; /* At 11. */
if (showerr) {
f -= 4; /* At 7. */
__xpg_strerror_r(errno, buf, sizeof(buf));
}
__STDIO_AUTO_THREADLOCK(stderr);
fprintf(stderr, fmt, __uclibc_progname);
if (format) {
vfprintf(stderr, format, args);
f -= 2; /* At 5 (showerr) or 9. */
}
fprintf(stderr, f, buf);
__STDIO_AUTO_THREADUNLOCK(stderr);
}
void vwarn(const char *format, va_list args)
{
vwarn_work(format, args, 1);
}
libc_hidden_def(vwarn)
void warn(const char *format, ...)
{
va_list args;
va_start(args, format);
vwarn(format, args);
va_end(args);
}
void vwarnx(const char *format, va_list args)
{
vwarn_work(format, args, 0);
}
libc_hidden_def(vwarnx)
void warnx(const char *format, ...)
{
va_list args;
va_start(args, format);
vwarnx(format, args);
va_end(args);
}
void verr(int status, const char *format, va_list args)
{
vwarn(format, args);
exit(status);
}
libc_hidden_def(verr)
void attribute_noreturn err(int status, const char *format, ...)
{
va_list args;
va_start(args, format);
verr(status, format, args);
/* This should get optimized away. We'll leave it now for safety. */
/* The loop is added only to keep gcc happy. */
while(1)
va_end(args);
}
void verrx(int status, const char *format, va_list args)
{
vwarnx(format, args);
exit(status);
}
libc_hidden_def(verrx)
void attribute_noreturn errx(int status, const char *format, ...)
{
va_list args;
va_start(args, format);
verrx(status, format, args);
/* This should get optimized away. We'll leave it now for safety. */
/* The loop is added only to keep gcc happy. */
while(1)
va_end(args);
}
|