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
|
/* 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.
*/
#define vfprintf __vfprintf
#define _GNU_SOURCE
#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
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_internal(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 attribute_hidden __vwarn(const char *format, va_list args)
{
vwarn_work(format, args, 1);
}
strong_alias(__vwarn,vwarn)
void warn(const char *format, ...)
{
va_list args;
va_start(args, format);
__vwarn(format, args);
va_end(args);
}
void attribute_hidden __vwarnx(const char *format, va_list args)
{
vwarn_work(format, args, 0);
}
strong_alias(__vwarnx,vwarnx)
void warnx(const char *format, ...)
{
va_list args;
va_start(args, format);
__vwarnx(format, args);
va_end(args);
}
void attribute_hidden __verr(int status, const char *format, va_list args)
{
__vwarn(format, args);
__exit(status);
}
strong_alias(__verr,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 attribute_hidden __verrx(int status, const char *format, va_list args)
{
__vwarnx(format, args);
__exit(status);
}
strong_alias(__verrx,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);
}
|
