1 /* Tests of C and POSIX locale contents.
2 Copyright (C) 2000-2021 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
10 The GNU C Library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 Lesser General Public License for more details.
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; if not, see
17 <https://www.gnu.org/licenses/>. */
30 run_test (const char *locname
)
42 printf ("localeconv failed for locale %s\n", locname
);
47 #define STRTEST(name, exp) \
49 if (strcmp (lc->name, exp) != 0) \
51 printf (#name " in locale %s wrong (is \"%s\", should be \"%s\")\n",\
52 locname, lc->name, exp); \
56 STRTEST (decimal_point
, ".");
57 STRTEST (thousands_sep
, "");
58 STRTEST (grouping
, "");
59 STRTEST (mon_decimal_point
, "");
60 STRTEST (mon_thousands_sep
, "");
61 STRTEST (mon_grouping
, "");
62 STRTEST (positive_sign
, "");
63 STRTEST (negative_sign
, "");
64 STRTEST (currency_symbol
, "");
65 STRTEST (int_curr_symbol
, "");
67 #define CHARTEST(name, exp) \
69 if (lc->name != exp) \
71 printf (#name " in locale %s wrong (is %d, should be %d)\n", \
72 locname, lc->name, CHAR_MAX); \
76 CHARTEST (frac_digits
, CHAR_MAX
);
77 CHARTEST (p_cs_precedes
, CHAR_MAX
);
78 CHARTEST (n_cs_precedes
, CHAR_MAX
);
79 CHARTEST (p_sep_by_space
, CHAR_MAX
);
80 CHARTEST (n_sep_by_space
, CHAR_MAX
);
81 CHARTEST (p_sign_posn
, CHAR_MAX
);
82 CHARTEST (n_sign_posn
, CHAR_MAX
);
83 CHARTEST (int_frac_digits
, CHAR_MAX
);
84 CHARTEST (int_p_cs_precedes
, CHAR_MAX
);
85 CHARTEST (int_n_cs_precedes
, CHAR_MAX
);
86 CHARTEST (int_p_sep_by_space
, CHAR_MAX
);
87 CHARTEST (int_n_sep_by_space
, CHAR_MAX
);
88 CHARTEST (int_p_sign_posn
, CHAR_MAX
);
89 CHARTEST (int_n_sign_posn
, CHAR_MAX
);
93 #define STRTEST(name, exp) \
94 str = nl_langinfo (name); \
95 if (strcmp (str, exp) != 0) \
97 printf ("nl_langinfo(" #name ") in locale %s wrong " \
98 "(is \"%s\", should be \"%s\")\n", locname, str, exp); \
101 #define WSTRTEST(name, exp) \
102 wstr = (wchar_t *) nl_langinfo (name); \
103 if (wcscmp (wstr, exp) != 0) \
105 printf ("nl_langinfo(" #name ") in locale %s wrong " \
106 "(is \"%S\", should be \"%S\")\n", locname, wstr, exp); \
111 STRTEST (ABDAY_1
, "Sun");
112 STRTEST (ABDAY_2
, "Mon");
113 STRTEST (ABDAY_3
, "Tue");
114 STRTEST (ABDAY_4
, "Wed");
115 STRTEST (ABDAY_5
, "Thu");
116 STRTEST (ABDAY_6
, "Fri");
117 STRTEST (ABDAY_7
, "Sat");
118 STRTEST (DAY_1
, "Sunday");
119 STRTEST (DAY_2
, "Monday");
120 STRTEST (DAY_3
, "Tuesday");
121 STRTEST (DAY_4
, "Wednesday");
122 STRTEST (DAY_5
, "Thursday");
123 STRTEST (DAY_6
, "Friday");
124 STRTEST (DAY_7
, "Saturday");
125 STRTEST (ABMON_1
, "Jan");
126 STRTEST (ABMON_2
, "Feb");
127 STRTEST (ABMON_3
, "Mar");
128 STRTEST (ABMON_4
, "Apr");
129 STRTEST (ABMON_5
, "May");
130 STRTEST (ABMON_6
, "Jun");
131 STRTEST (ABMON_7
, "Jul");
132 STRTEST (ABMON_8
, "Aug");
133 STRTEST (ABMON_9
, "Sep");
134 STRTEST (ABMON_10
, "Oct");
135 STRTEST (ABMON_11
, "Nov");
136 STRTEST (ABMON_12
, "Dec");
137 STRTEST (MON_1
, "January");
138 STRTEST (MON_2
, "February");
139 STRTEST (MON_3
, "March");
140 STRTEST (MON_4
, "April");
141 STRTEST (MON_5
, "May");
142 STRTEST (MON_6
, "June");
143 STRTEST (MON_7
, "July");
144 STRTEST (MON_8
, "August");
145 STRTEST (MON_9
, "September");
146 STRTEST (MON_10
, "October");
147 STRTEST (MON_11
, "November");
148 STRTEST (MON_12
, "December");
149 STRTEST (AM_STR
, "AM");
150 STRTEST (PM_STR
, "PM");
151 STRTEST (D_T_FMT
, "%a %b %e %H:%M:%S %Y");
152 STRTEST (D_FMT
, "%m/%d/%y");
153 STRTEST (T_FMT
, "%H:%M:%S");
154 STRTEST (T_FMT_AMPM
, "%I:%M:%S %p");
156 STRTEST (ERA_D_FMT
, "");
157 STRTEST (ERA_T_FMT
, "");
158 STRTEST (ERA_D_T_FMT
, "");
159 STRTEST (ALT_DIGITS
, "");
161 STRTEST (RADIXCHAR
, ".");
162 STRTEST (THOUSEP
, "");
164 STRTEST (YESEXPR
, "^[yY]");
165 STRTEST (NOEXPR
, "^[nN]");
168 WSTRTEST (_NL_WABDAY_1
, L
"Sun");
169 WSTRTEST (_NL_WABDAY_2
, L
"Mon");
170 WSTRTEST (_NL_WABDAY_3
, L
"Tue");
171 WSTRTEST (_NL_WABDAY_4
, L
"Wed");
172 WSTRTEST (_NL_WABDAY_5
, L
"Thu");
173 WSTRTEST (_NL_WABDAY_6
, L
"Fri");
174 WSTRTEST (_NL_WABDAY_7
, L
"Sat");
175 WSTRTEST (_NL_WDAY_1
, L
"Sunday");
176 WSTRTEST (_NL_WDAY_2
, L
"Monday");
177 WSTRTEST (_NL_WDAY_3
, L
"Tuesday");
178 WSTRTEST (_NL_WDAY_4
, L
"Wednesday");
179 WSTRTEST (_NL_WDAY_5
, L
"Thursday");
180 WSTRTEST (_NL_WDAY_6
, L
"Friday");
181 WSTRTEST (_NL_WDAY_7
, L
"Saturday");
182 WSTRTEST (_NL_WABMON_1
, L
"Jan");
183 WSTRTEST (_NL_WABMON_2
, L
"Feb");
184 WSTRTEST (_NL_WABMON_3
, L
"Mar");
185 WSTRTEST (_NL_WABMON_4
, L
"Apr");
186 WSTRTEST (_NL_WABMON_5
, L
"May");
187 WSTRTEST (_NL_WABMON_6
, L
"Jun");
188 WSTRTEST (_NL_WABMON_7
, L
"Jul");
189 WSTRTEST (_NL_WABMON_8
, L
"Aug");
190 WSTRTEST (_NL_WABMON_9
, L
"Sep");
191 WSTRTEST (_NL_WABMON_10
, L
"Oct");
192 WSTRTEST (_NL_WABMON_11
, L
"Nov");
193 WSTRTEST (_NL_WABMON_12
, L
"Dec");
194 WSTRTEST (_NL_WMON_1
, L
"January");
195 WSTRTEST (_NL_WMON_2
, L
"February");
196 WSTRTEST (_NL_WMON_3
, L
"March");
197 WSTRTEST (_NL_WMON_4
, L
"April");
198 WSTRTEST (_NL_WMON_5
, L
"May");
199 WSTRTEST (_NL_WMON_6
, L
"June");
200 WSTRTEST (_NL_WMON_7
, L
"July");
201 WSTRTEST (_NL_WMON_8
, L
"August");
202 WSTRTEST (_NL_WMON_9
, L
"September");
203 WSTRTEST (_NL_WMON_10
, L
"October");
204 WSTRTEST (_NL_WMON_11
, L
"November");
205 WSTRTEST (_NL_WMON_12
, L
"December");
206 WSTRTEST (_NL_WAM_STR
, L
"AM");
207 WSTRTEST (_NL_WPM_STR
, L
"PM");
208 WSTRTEST (_NL_WD_T_FMT
, L
"%a %b %e %H:%M:%S %Y");
209 WSTRTEST (_NL_WD_FMT
, L
"%m/%d/%y");
210 WSTRTEST (_NL_WT_FMT
, L
"%H:%M:%S");
211 WSTRTEST (_NL_WT_FMT_AMPM
, L
"%I:%M:%S %p");
212 WSTRTEST (_NL_WERA_D_FMT
, L
"");
213 WSTRTEST (_NL_WERA_T_FMT
, L
"");
214 WSTRTEST (_NL_WERA_D_T_FMT
, L
"");
215 WSTRTEST (_NL_WALT_DIGITS
, L
"");
217 STRTEST (_DATE_FMT
, "%a %b %e %H:%M:%S %Z %Y");
218 WSTRTEST (_NL_W_DATE_FMT
, L
"%a %b %e %H:%M:%S %Z %Y");
220 STRTEST (INT_CURR_SYMBOL
, "");
221 STRTEST (CURRENCY_SYMBOL
, "");
222 STRTEST (MON_DECIMAL_POINT
, "");
223 STRTEST (MON_THOUSANDS_SEP
, "");
224 STRTEST (MON_GROUPING
, "");
225 STRTEST (POSITIVE_SIGN
, "");
226 STRTEST (NEGATIVE_SIGN
, "");
227 STRTEST (GROUPING
, "");
229 STRTEST (YESSTR
, "");
232 /* Test the new locale mechanisms. */
233 loc
= newlocale (LC_ALL_MASK
, locname
, NULL
);
236 printf ("cannot create locale object for locale %s\n", locname
);
244 #define STRTEST(name, exp) \
245 str = nl_langinfo_l (name, loc); \
246 if (strcmp (str, exp) != 0) \
248 printf ("nl_langinfo_l(" #name ") in locale %s wrong " \
249 "(is \"%s\", should be \"%s\")\n", locname, str, exp); \
253 #define WSTRTEST(name, exp) \
254 wstr = (wchar_t *) nl_langinfo_l (name, loc); \
255 if (wcscmp (wstr, exp) != 0) \
257 printf ("nl_langinfo_l(" #name ") in locale %s wrong " \
258 "(is \"%S\", should be \"%S\")\n", locname, wstr, exp); \
263 STRTEST (ABDAY_1
, "Sun");
264 STRTEST (ABDAY_2
, "Mon");
265 STRTEST (ABDAY_3
, "Tue");
266 STRTEST (ABDAY_4
, "Wed");
267 STRTEST (ABDAY_5
, "Thu");
268 STRTEST (ABDAY_6
, "Fri");
269 STRTEST (ABDAY_7
, "Sat");
270 STRTEST (DAY_1
, "Sunday");
271 STRTEST (DAY_2
, "Monday");
272 STRTEST (DAY_3
, "Tuesday");
273 STRTEST (DAY_4
, "Wednesday");
274 STRTEST (DAY_5
, "Thursday");
275 STRTEST (DAY_6
, "Friday");
276 STRTEST (DAY_7
, "Saturday");
277 STRTEST (ABMON_1
, "Jan");
278 STRTEST (ABMON_2
, "Feb");
279 STRTEST (ABMON_3
, "Mar");
280 STRTEST (ABMON_4
, "Apr");
281 STRTEST (ABMON_5
, "May");
282 STRTEST (ABMON_6
, "Jun");
283 STRTEST (ABMON_7
, "Jul");
284 STRTEST (ABMON_8
, "Aug");
285 STRTEST (ABMON_9
, "Sep");
286 STRTEST (ABMON_10
, "Oct");
287 STRTEST (ABMON_11
, "Nov");
288 STRTEST (ABMON_12
, "Dec");
289 STRTEST (MON_1
, "January");
290 STRTEST (MON_2
, "February");
291 STRTEST (MON_3
, "March");
292 STRTEST (MON_4
, "April");
293 STRTEST (MON_5
, "May");
294 STRTEST (MON_6
, "June");
295 STRTEST (MON_7
, "July");
296 STRTEST (MON_8
, "August");
297 STRTEST (MON_9
, "September");
298 STRTEST (MON_10
, "October");
299 STRTEST (MON_11
, "November");
300 STRTEST (MON_12
, "December");
301 STRTEST (AM_STR
, "AM");
302 STRTEST (PM_STR
, "PM");
303 STRTEST (D_T_FMT
, "%a %b %e %H:%M:%S %Y");
304 STRTEST (D_FMT
, "%m/%d/%y");
305 STRTEST (T_FMT
, "%H:%M:%S");
306 STRTEST (T_FMT_AMPM
, "%I:%M:%S %p");
308 STRTEST (ERA_D_FMT
, "");
309 STRTEST (ERA_T_FMT
, "");
310 STRTEST (ERA_D_T_FMT
, "");
311 STRTEST (ALT_DIGITS
, "");
313 STRTEST (RADIXCHAR
, ".");
314 STRTEST (THOUSEP
, "");
316 STRTEST (YESEXPR
, "^[yY]");
317 STRTEST (NOEXPR
, "^[nN]");
320 WSTRTEST (_NL_WABDAY_1
, L
"Sun");
321 WSTRTEST (_NL_WABDAY_2
, L
"Mon");
322 WSTRTEST (_NL_WABDAY_3
, L
"Tue");
323 WSTRTEST (_NL_WABDAY_4
, L
"Wed");
324 WSTRTEST (_NL_WABDAY_5
, L
"Thu");
325 WSTRTEST (_NL_WABDAY_6
, L
"Fri");
326 WSTRTEST (_NL_WABDAY_7
, L
"Sat");
327 WSTRTEST (_NL_WDAY_1
, L
"Sunday");
328 WSTRTEST (_NL_WDAY_2
, L
"Monday");
329 WSTRTEST (_NL_WDAY_3
, L
"Tuesday");
330 WSTRTEST (_NL_WDAY_4
, L
"Wednesday");
331 WSTRTEST (_NL_WDAY_5
, L
"Thursday");
332 WSTRTEST (_NL_WDAY_6
, L
"Friday");
333 WSTRTEST (_NL_WDAY_7
, L
"Saturday");
334 WSTRTEST (_NL_WABMON_1
, L
"Jan");
335 WSTRTEST (_NL_WABMON_2
, L
"Feb");
336 WSTRTEST (_NL_WABMON_3
, L
"Mar");
337 WSTRTEST (_NL_WABMON_4
, L
"Apr");
338 WSTRTEST (_NL_WABMON_5
, L
"May");
339 WSTRTEST (_NL_WABMON_6
, L
"Jun");
340 WSTRTEST (_NL_WABMON_7
, L
"Jul");
341 WSTRTEST (_NL_WABMON_8
, L
"Aug");
342 WSTRTEST (_NL_WABMON_9
, L
"Sep");
343 WSTRTEST (_NL_WABMON_10
, L
"Oct");
344 WSTRTEST (_NL_WABMON_11
, L
"Nov");
345 WSTRTEST (_NL_WABMON_12
, L
"Dec");
346 WSTRTEST (_NL_WMON_1
, L
"January");
347 WSTRTEST (_NL_WMON_2
, L
"February");
348 WSTRTEST (_NL_WMON_3
, L
"March");
349 WSTRTEST (_NL_WMON_4
, L
"April");
350 WSTRTEST (_NL_WMON_5
, L
"May");
351 WSTRTEST (_NL_WMON_6
, L
"June");
352 WSTRTEST (_NL_WMON_7
, L
"July");
353 WSTRTEST (_NL_WMON_8
, L
"August");
354 WSTRTEST (_NL_WMON_9
, L
"September");
355 WSTRTEST (_NL_WMON_10
, L
"October");
356 WSTRTEST (_NL_WMON_11
, L
"November");
357 WSTRTEST (_NL_WMON_12
, L
"December");
358 WSTRTEST (_NL_WAM_STR
, L
"AM");
359 WSTRTEST (_NL_WPM_STR
, L
"PM");
360 WSTRTEST (_NL_WD_T_FMT
, L
"%a %b %e %H:%M:%S %Y");
361 WSTRTEST (_NL_WD_FMT
, L
"%m/%d/%y");
362 WSTRTEST (_NL_WT_FMT
, L
"%H:%M:%S");
363 WSTRTEST (_NL_WT_FMT_AMPM
, L
"%I:%M:%S %p");
364 WSTRTEST (_NL_WERA_D_FMT
, L
"");
365 WSTRTEST (_NL_WERA_T_FMT
, L
"");
366 WSTRTEST (_NL_WERA_D_T_FMT
, L
"");
367 WSTRTEST (_NL_WALT_DIGITS
, L
"");
369 STRTEST (_DATE_FMT
, "%a %b %e %H:%M:%S %Z %Y");
370 WSTRTEST (_NL_W_DATE_FMT
, L
"%a %b %e %H:%M:%S %Z %Y");
372 STRTEST (INT_CURR_SYMBOL
, "");
373 STRTEST (CURRENCY_SYMBOL
, "");
374 STRTEST (MON_DECIMAL_POINT
, "");
375 STRTEST (MON_THOUSANDS_SEP
, "");
376 STRTEST (MON_GROUPING
, "");
377 STRTEST (POSITIVE_SIGN
, "");
378 STRTEST (NEGATIVE_SIGN
, "");
379 STRTEST (GROUPING
, "");
381 STRTEST (YESSTR
, "");
384 /* Character class tests. */
385 for (c
= 0; c
< 128; ++c
)
387 #define CLASSTEST(name) \
388 if (is##name (c) != is##name##_l (c, loc)) \
390 printf ("is%s('\\%o') != is%s_l('\\%o')\n", \
391 #name, c, #name, c); \
407 /* Character mapping tests. */
408 #define MAPTEST(name) \
409 if (to##name (c) != to##name##_l (c, loc)) \
411 printf ("to%s('\\%o') != to%s_l('\\%o'): '\\%o' vs '\\%o'\n", \
412 #name, c, #name, c, \
413 to##name (c), to##name##_l (c, loc)); \
420 /* Character class tests, this time for wide characters. Note that
421 this only works because we know that the internal encoding is
423 for (c
= 0; c
< 128; ++c
)
426 #define CLASSTEST(name) \
427 if (isw##name (c) != isw##name##_l (c, loc)) \
429 printf ("isw%s('\\%o') != isw%s_l('\\%o')\n", \
430 #name, c, #name, c); \
446 /* Character mapping tests. Note that
447 this only works because we know that the internal encoding is
450 #define MAPTEST(name) \
451 if (tow##name (c) != tow##name##_l (c, loc)) \
453 printf ("tow%s('\\%o') != tow%s_l('\\%o'): '\\%o' vs '\\%o'\n",\
454 #name, c, #name, c, \
455 tow##name (c), tow##name##_l (c, loc)); \
474 /* First use the name "C". */
475 if (setlocale (LC_ALL
, "C") == NULL
)
477 puts ("cannot set C locale");
481 result
= run_test ("C");
483 /* Then the name "POSIX". */
484 if (setlocale (LC_ALL
, "POSIX") == NULL
)
486 puts ("cannot set POSIX locale");
490 result
|= run_test ("POSIX");
495 #define TEST_FUNCTION do_test ()
496 #include "../test-skeleton.c"