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
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
|
/* Functions for recorded errors, warnings, and verbose messages.
Copyright (C) 1998-2022 Free Software Foundation, Inc.
This file is part of the GNU C Library.
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published
by the Free Software Foundation; version 2 of the License, or
(at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, see <https://www.gnu.org/licenses/>. */
#include <stdio.h>
#include <stdlib.h>
#include <stdarg.h>
#include <stdbool.h>
#include <string.h>
#include <error.h>
#include <errno.h>
#include <locale.h>
#include "record-status.h"
/* Warnings recorded by record_warnings. */
int recorded_warning_count;
/* Errors recorded by record_errors. */
int recorded_error_count;
/* If not zero suppress warnings and information messages. */
int be_quiet;
/* If not zero give a lot more messages. */
int verbose;
/* Warnings which can be disabled: */
/* By default we check the character map for ASCII compatibility. */
bool warn_ascii = true;
/* By default we check that the international currency symbol matches a
known country code. */
bool warn_int_curr_symbol = true;
/* Alter the current locale to match the locale configured by the
user, and return the previous saved state. */
struct locale_state
push_locale (void)
{
int saved_errno;
const char *orig;
char *copy = NULL;
saved_errno = errno;
orig = setlocale (LC_CTYPE, NULL);
if (orig == NULL)
error (0, 0, "failed to read locale!");
if (setlocale (LC_CTYPE, "") == NULL)
error (0, 0, "failed to set locale!");
errno = saved_errno;
if (orig != NULL)
copy = strdup (orig);
/* We will return either a valid locale or NULL if we failed
to save the locale. */
return (struct locale_state) { .cur_locale = copy };
}
/* Use the saved state to restore the locale. */
void
pop_locale (struct locale_state ls)
{
const char *set = NULL;
/* We might have failed to save the locale, so only attempt to
restore a validly saved non-NULL locale. */
if (ls.cur_locale != NULL)
{
set = setlocale (LC_CTYPE, ls.cur_locale);
if (set == NULL)
error (0, 0, "failed to restore %s locale!", ls.cur_locale);
free (ls.cur_locale);
}
}
/* Wrapper to print verbose informative messages.
Verbose messages are only printed if --verbose
is in effect and --quiet is not. */
void
__attribute__ ((__format__ (__printf__, 2, 3), nonnull (1, 2), unused))
record_verbose (FILE *stream, const char *format, ...)
{
char *str;
va_list arg;
if (!verbose)
return;
if (!be_quiet)
{
struct locale_state ls;
int ret;
va_start (arg, format);
ls = push_locale ();
ret = vasprintf (&str, format, arg);
if (ret == -1)
abort ();
pop_locale (ls);
va_end (arg);
fprintf (stream, "[verbose] %s\n", str);
free (str);
}
}
/* Wrapper to print warning messages. We keep track of how
many were called because this effects our exit code.
Nothing is printed if --quiet is in effect, but warnings
are always counted. */
void
__attribute__ ((__format__ (__printf__, 1, 2), nonnull (1), unused))
record_warning (const char *format, ...)
{
char *str;
va_list arg;
recorded_warning_count++;
if (!be_quiet)
{
struct locale_state ls;
int ret;
va_start (arg, format);
ls = push_locale ();
ret = vasprintf (&str, format, arg);
if (ret == -1)
abort ();
pop_locale (ls);
va_end (arg);
fprintf (stderr, "[warning] %s\n", str);
free (str);
}
}
/* Wrapper to print error messages. We keep track of how
many were called because this effects our exit code.
Nothing is printed if --quiet is in effect, but errors
are always counted, and fatal errors always exit the
program. */
void
__attribute__ ((__format__ (__printf__, 3, 4), nonnull (3), unused))
record_error (int status, int errnum, const char *format, ...)
{
char *str;
va_list arg;
recorded_error_count++;
/* The existing behaviour is that even if you use --quiet, a fatal
error is always printed and terminates the process. */
if (!be_quiet || status != 0)
{
struct locale_state ls;
int ret;
va_start (arg, format);
ls = push_locale ();
ret = vasprintf (&str, format, arg);
if (ret == -1)
abort ();
pop_locale (ls);
va_end (arg);
error (status, errnum, "[error] %s", str);
free (str);
}
}
/* ... likewise for error_at_line. */
void
__attribute__ ((__format__ (__printf__, 5, 6), nonnull (3, 5), unused))
record_error_at_line (int status, int errnum, const char *filename,
unsigned int linenum, const char *format, ...)
{
char *str;
va_list arg;
recorded_error_count++;
/* The existing behaviour is that even if you use --quiet, a fatal
error is always printed and terminates the process. */
if (!be_quiet || status != 0)
{
struct locale_state ls;
int ret;
va_start (arg, format);
ls = push_locale ();
ret = vasprintf (&str, format, arg);
if (ret == -1)
abort ();
pop_locale (ls);
va_end (arg);
error_at_line (status, errnum, filename, linenum, "[error] %s", str);
free (str);
}
}
|
