1 /* Tests of C and POSIX locale contents.
2 Copyright (C) 2000, 2001 Free Software Foundation, Inc.
3 Contributed by Ulrich Drepper <drepper@redhat.com>, 2000.
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Library General Public License as
7 published by the Free Software Foundation; either version 2 of the
8 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 Library General Public License for more details.
15 You should have received a copy of the GNU Library General Public
16 License along with the GNU C Library; see the file COPYING.LIB. If not,
17 write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
18 Boston, MA 02111-1307, USA. */
31 run_test (const char *locname)
43 printf ("localeconv failed for locale %s\n", locname);
48 #define STRTEST(name, exp) \
50 if (strcmp (lc->name, exp) != 0) \
52 printf (#name " in locale %s wrong (is \"%s\", should be \"%s\")\n",\
53 locname, lc->name, exp); \
57 STRTEST (decimal_point, ".");
58 STRTEST (thousands_sep, "");
59 STRTEST (grouping, "");
60 STRTEST (mon_decimal_point, "");
61 STRTEST (mon_thousands_sep, "");
62 STRTEST (mon_grouping, "");
63 STRTEST (positive_sign, "");
64 STRTEST (negative_sign, "");
65 STRTEST (currency_symbol, "");
66 STRTEST (int_curr_symbol, "");
68 #define CHARTEST(name, exp) \
70 if (lc->name != exp) \
72 printf (#name " in locale %s wrong (is %d, should be %d)\n", \
73 locname, lc->name, CHAR_MAX); \
77 CHARTEST (frac_digits, CHAR_MAX);
78 CHARTEST (p_cs_precedes, CHAR_MAX);
79 CHARTEST (n_cs_precedes, CHAR_MAX);
80 CHARTEST (p_sep_by_space, CHAR_MAX);
81 CHARTEST (n_sep_by_space, CHAR_MAX);
82 CHARTEST (p_sign_posn, CHAR_MAX);
83 CHARTEST (n_sign_posn, CHAR_MAX);
84 CHARTEST (int_frac_digits, CHAR_MAX);
85 CHARTEST (int_p_cs_precedes, CHAR_MAX);
86 CHARTEST (int_n_cs_precedes, CHAR_MAX);
87 CHARTEST (int_p_sep_by_space, CHAR_MAX);
88 CHARTEST (int_n_sep_by_space, CHAR_MAX);
89 CHARTEST (int_p_sign_posn, CHAR_MAX);
90 CHARTEST (int_n_sign_posn, CHAR_MAX);
94 #define STRTEST(name, exp) \
95 str = nl_langinfo (name); \
96 if (strcmp (str, exp) != 0) \
98 printf ("nl_langinfo(" #name ") in locale %s wrong " \
99 "(is \"%s\", should be \"%s\")\n", locname, str, exp); \
102 #define WSTRTEST(name, exp) \
103 wstr = (wchar_t *) nl_langinfo (name); \
104 if (wcscmp (wstr, exp) != 0) \
106 printf ("nl_langinfo(" #name ") in locale %s wrong " \
107 "(is \"%S\", should be \"%S\")\n", locname, wstr, exp); \
112 STRTEST (ABDAY_1, "Sun");
113 STRTEST (ABDAY_2, "Mon");
114 STRTEST (ABDAY_3, "Tue");
115 STRTEST (ABDAY_4, "Wed");
116 STRTEST (ABDAY_5, "Thu");
117 STRTEST (ABDAY_6, "Fri");
118 STRTEST (ABDAY_7, "Sat");
119 STRTEST (DAY_1, "Sunday");
120 STRTEST (DAY_2, "Monday");
121 STRTEST (DAY_3, "Tuesday");
122 STRTEST (DAY_4, "Wednesday");
123 STRTEST (DAY_5, "Thursday");
124 STRTEST (DAY_6, "Friday");
125 STRTEST (DAY_7, "Saturday");
126 STRTEST (ABMON_1, "Jan");
127 STRTEST (ABMON_2, "Feb");
128 STRTEST (ABMON_3, "Mar");
129 STRTEST (ABMON_4, "Apr");
130 STRTEST (ABMON_5, "May");
131 STRTEST (ABMON_6, "Jun");
132 STRTEST (ABMON_7, "Jul");
133 STRTEST (ABMON_8, "Aug");
134 STRTEST (ABMON_9, "Sep");
135 STRTEST (ABMON_10, "Oct");
136 STRTEST (ABMON_11, "Nov");
137 STRTEST (ABMON_12, "Dec");
138 STRTEST (MON_1, "January");
139 STRTEST (MON_2, "February");
140 STRTEST (MON_3, "March");
141 STRTEST (MON_4, "April");
142 STRTEST (MON_5, "May");
143 STRTEST (MON_6, "June");
144 STRTEST (MON_7, "July");
145 STRTEST (MON_8, "August");
146 STRTEST (MON_9, "September");
147 STRTEST (MON_10, "October");
148 STRTEST (MON_11, "November");
149 STRTEST (MON_12, "December");
150 STRTEST (AM_STR, "AM");
151 STRTEST (PM_STR, "PM");
152 STRTEST (D_T_FMT, "%a %b %e %H:%M:%S %Y");
153 STRTEST (D_FMT, "%m/%d/%y");
154 STRTEST (T_FMT, "%H:%M:%S");
155 STRTEST (T_FMT_AMPM, "%I:%M:%S %p");
157 STRTEST (RADIXCHAR, ".");
158 STRTEST (THOUSEP, "");
160 STRTEST (YESEXPR, "^[yY]");
161 STRTEST (NOEXPR, "^[nN]");
164 WSTRTEST (_NL_WABDAY_1, L"Sun");
165 WSTRTEST (_NL_WABDAY_2, L"Mon");
166 WSTRTEST (_NL_WABDAY_3, L"Tue");
167 WSTRTEST (_NL_WABDAY_4, L"Wed");
168 WSTRTEST (_NL_WABDAY_5, L"Thu");
169 WSTRTEST (_NL_WABDAY_6, L"Fri");
170 WSTRTEST (_NL_WABDAY_7, L"Sat");
171 WSTRTEST (_NL_WDAY_1, L"Sunday");
172 WSTRTEST (_NL_WDAY_2, L"Monday");
173 WSTRTEST (_NL_WDAY_3, L"Tuesday");
174 WSTRTEST (_NL_WDAY_4, L"Wednesday");
175 WSTRTEST (_NL_WDAY_5, L"Thursday");
176 WSTRTEST (_NL_WDAY_6, L"Friday");
177 WSTRTEST (_NL_WDAY_7, L"Saturday");
178 WSTRTEST (_NL_WABMON_1, L"Jan");
179 WSTRTEST (_NL_WABMON_2, L"Feb");
180 WSTRTEST (_NL_WABMON_3, L"Mar");
181 WSTRTEST (_NL_WABMON_4, L"Apr");
182 WSTRTEST (_NL_WABMON_5, L"May");
183 WSTRTEST (_NL_WABMON_6, L"Jun");
184 WSTRTEST (_NL_WABMON_7, L"Jul");
185 WSTRTEST (_NL_WABMON_8, L"Aug");
186 WSTRTEST (_NL_WABMON_9, L"Sep");
187 WSTRTEST (_NL_WABMON_10, L"Oct");
188 WSTRTEST (_NL_WABMON_11, L"Nov");
189 WSTRTEST (_NL_WABMON_12, L"Dec");
190 WSTRTEST (_NL_WMON_1, L"January");
191 WSTRTEST (_NL_WMON_2, L"February");
192 WSTRTEST (_NL_WMON_3, L"March");
193 WSTRTEST (_NL_WMON_4, L"April");
194 WSTRTEST (_NL_WMON_5, L"May");
195 WSTRTEST (_NL_WMON_6, L"June");
196 WSTRTEST (_NL_WMON_7, L"July");
197 WSTRTEST (_NL_WMON_8, L"August");
198 WSTRTEST (_NL_WMON_9, L"September");
199 WSTRTEST (_NL_WMON_10, L"October");
200 WSTRTEST (_NL_WMON_11, L"November");
201 WSTRTEST (_NL_WMON_12, L"December");
202 WSTRTEST (_NL_WAM_STR, L"AM");
203 WSTRTEST (_NL_WPM_STR, L"PM");
204 WSTRTEST (_NL_WD_T_FMT, L"%a %b %e %H:%M:%S %Y");
205 WSTRTEST (_NL_WD_FMT, L"%m/%d/%y");
206 WSTRTEST (_NL_WT_FMT, L"%H:%M:%S");
207 WSTRTEST (_NL_WT_FMT_AMPM, L"%I:%M:%S %p");
209 STRTEST (_DATE_FMT, "%a %b %e %H:%M:%S %Z %Y");
210 WSTRTEST (_NL_W_DATE_FMT, L"%a %b %e %H:%M:%S %Z %Y");
212 STRTEST (INT_CURR_SYMBOL, "");
213 STRTEST (CURRENCY_SYMBOL, "");
214 STRTEST (MON_DECIMAL_POINT, "");
215 STRTEST (MON_THOUSANDS_SEP, "");
216 STRTEST (MON_GROUPING, "");
217 STRTEST (POSITIVE_SIGN, "");
218 STRTEST (NEGATIVE_SIGN, "");
219 STRTEST (GROUPING, "");
221 STRTEST (YESSTR, "");
224 /* Test the new locale mechanisms. */
225 loc = __newlocale (LC_ALL, locname, NULL);
228 printf ("cannot create locale object for locale %s\n", locname);
236 #define STRTEST(name, exp) \
237 str = __nl_langinfo_l (name, loc); \
238 if (strcmp (str, exp) != 0) \
240 printf ("__nl_langinfo_l(" #name ") in locale %s wrong " \
241 "(is \"%s\", should be \"%s\")\n", locname, str, exp); \
245 #define WSTRTEST(name, exp) \
246 wstr = (wchar_t *) __nl_langinfo_l (name, loc); \
247 if (wcscmp (wstr, exp) != 0) \
249 printf ("__nl_langinfo_l(" #name ") in locale %s wrong " \
250 "(is \"%S\", should be \"%S\")\n", locname, wstr, exp); \
255 STRTEST (ABDAY_1, "Sun");
256 STRTEST (ABDAY_2, "Mon");
257 STRTEST (ABDAY_3, "Tue");
258 STRTEST (ABDAY_4, "Wed");
259 STRTEST (ABDAY_5, "Thu");
260 STRTEST (ABDAY_6, "Fri");
261 STRTEST (ABDAY_7, "Sat");
262 STRTEST (DAY_1, "Sunday");
263 STRTEST (DAY_2, "Monday");
264 STRTEST (DAY_3, "Tuesday");
265 STRTEST (DAY_4, "Wednesday");
266 STRTEST (DAY_5, "Thursday");
267 STRTEST (DAY_6, "Friday");
268 STRTEST (DAY_7, "Saturday");
269 STRTEST (ABMON_1, "Jan");
270 STRTEST (ABMON_2, "Feb");
271 STRTEST (ABMON_3, "Mar");
272 STRTEST (ABMON_4, "Apr");
273 STRTEST (ABMON_5, "May");
274 STRTEST (ABMON_6, "Jun");
275 STRTEST (ABMON_7, "Jul");
276 STRTEST (ABMON_8, "Aug");
277 STRTEST (ABMON_9, "Sep");
278 STRTEST (ABMON_10, "Oct");
279 STRTEST (ABMON_11, "Nov");
280 STRTEST (ABMON_12, "Dec");
281 STRTEST (MON_1, "January");
282 STRTEST (MON_2, "February");
283 STRTEST (MON_3, "March");
284 STRTEST (MON_4, "April");
285 STRTEST (MON_5, "May");
286 STRTEST (MON_6, "June");
287 STRTEST (MON_7, "July");
288 STRTEST (MON_8, "August");
289 STRTEST (MON_9, "September");
290 STRTEST (MON_10, "October");
291 STRTEST (MON_11, "November");
292 STRTEST (MON_12, "December");
293 STRTEST (AM_STR, "AM");
294 STRTEST (PM_STR, "PM");
295 STRTEST (D_T_FMT, "%a %b %e %H:%M:%S %Y");
296 STRTEST (D_FMT, "%m/%d/%y");
297 STRTEST (T_FMT, "%H:%M:%S");
298 STRTEST (T_FMT_AMPM, "%I:%M:%S %p");
300 STRTEST (RADIXCHAR, ".");
301 STRTEST (THOUSEP, "");
303 STRTEST (YESEXPR, "^[yY]");
304 STRTEST (NOEXPR, "^[nN]");
307 WSTRTEST (_NL_WABDAY_1, L"Sun");
308 WSTRTEST (_NL_WABDAY_2, L"Mon");
309 WSTRTEST (_NL_WABDAY_3, L"Tue");
310 WSTRTEST (_NL_WABDAY_4, L"Wed");
311 WSTRTEST (_NL_WABDAY_5, L"Thu");
312 WSTRTEST (_NL_WABDAY_6, L"Fri");
313 WSTRTEST (_NL_WABDAY_7, L"Sat");
314 WSTRTEST (_NL_WDAY_1, L"Sunday");
315 WSTRTEST (_NL_WDAY_2, L"Monday");
316 WSTRTEST (_NL_WDAY_3, L"Tuesday");
317 WSTRTEST (_NL_WDAY_4, L"Wednesday");
318 WSTRTEST (_NL_WDAY_5, L"Thursday");
319 WSTRTEST (_NL_WDAY_6, L"Friday");
320 WSTRTEST (_NL_WDAY_7, L"Saturday");
321 WSTRTEST (_NL_WABMON_1, L"Jan");
322 WSTRTEST (_NL_WABMON_2, L"Feb");
323 WSTRTEST (_NL_WABMON_3, L"Mar");
324 WSTRTEST (_NL_WABMON_4, L"Apr");
325 WSTRTEST (_NL_WABMON_5, L"May");
326 WSTRTEST (_NL_WABMON_6, L"Jun");
327 WSTRTEST (_NL_WABMON_7, L"Jul");
328 WSTRTEST (_NL_WABMON_8, L"Aug");
329 WSTRTEST (_NL_WABMON_9, L"Sep");
330 WSTRTEST (_NL_WABMON_10, L"Oct");
331 WSTRTEST (_NL_WABMON_11, L"Nov");
332 WSTRTEST (_NL_WABMON_12, L"Dec");
333 WSTRTEST (_NL_WMON_1, L"January");
334 WSTRTEST (_NL_WMON_2, L"February");
335 WSTRTEST (_NL_WMON_3, L"March");
336 WSTRTEST (_NL_WMON_4, L"April");
337 WSTRTEST (_NL_WMON_5, L"May");
338 WSTRTEST (_NL_WMON_6, L"June");
339 WSTRTEST (_NL_WMON_7, L"July");
340 WSTRTEST (_NL_WMON_8, L"August");
341 WSTRTEST (_NL_WMON_9, L"September");
342 WSTRTEST (_NL_WMON_10, L"October");
343 WSTRTEST (_NL_WMON_11, L"November");
344 WSTRTEST (_NL_WMON_12, L"December");
345 WSTRTEST (_NL_WAM_STR, L"AM");
346 WSTRTEST (_NL_WPM_STR, L"PM");
347 WSTRTEST (_NL_WD_T_FMT, L"%a %b %e %H:%M:%S %Y");
348 WSTRTEST (_NL_WD_FMT, L"%m/%d/%y");
349 WSTRTEST (_NL_WT_FMT, L"%H:%M:%S");
350 WSTRTEST (_NL_WT_FMT_AMPM, L"%I:%M:%S %p");
352 STRTEST (_DATE_FMT, "%a %b %e %H:%M:%S %Z %Y");
353 WSTRTEST (_NL_W_DATE_FMT, L"%a %b %e %H:%M:%S %Z %Y");
355 STRTEST (INT_CURR_SYMBOL, "");
356 STRTEST (CURRENCY_SYMBOL, "");
357 STRTEST (MON_DECIMAL_POINT, "");
358 STRTEST (MON_THOUSANDS_SEP, "");
359 STRTEST (MON_GROUPING, "");
360 STRTEST (POSITIVE_SIGN, "");
361 STRTEST (NEGATIVE_SIGN, "");
362 STRTEST (GROUPING, "");
364 STRTEST (YESSTR, "");
367 /* Character class tests. */
368 for (c = 0; c < 128; ++c)
370 #define CLASSTEST(name) \
371 if (is##name (c) != __is##name##_l (c, loc)) \
373 printf ("is%s('\\%o') != __is%s_l('\\%o')\n", \
374 #name, c, #name, c); \
390 /* Character mapping tests. */
391 #define MAPTEST(name) \
392 if (to##name (c) != __to##name##_l (c, loc)) \
394 printf ("to%s('\\%o') != __to%s_l('\\%o'): '\\%o' vs '\\%o'\n", \
395 #name, c, #name, c, \
396 to##name (c), __to##name##_l (c, loc)); \
403 /* Character class tests, this time for wide characters. Note that
404 this only works because we know that the internal encoding is
406 for (c = 0; c < 128; ++c)
409 #define CLASSTEST(name) \
410 if (isw##name (c) != __isw##name##_l (c, loc)) \
412 printf ("isw%s('\\%o') != __isw%s_l('\\%o')\n", \
413 #name, c, #name, c); \
429 /* Character mapping tests. Note that
430 this only works because we know that the internal encoding is
433 #define MAPTEST(name) \
434 if (tow##name (c) != __tow##name##_l (c, loc)) \
436 printf ("tow%s('\\%o') != __tow%s_l('\\%o'): '\\%o' vs '\\%o'\n",\
437 #name, c, #name, c, \
438 tow##name (c), __tow##name##_l (c, loc)); \
457 /* First use the name "C". */
458 if (setlocale (LC_ALL, "C") == NULL)
460 puts ("cannot set C locale");
464 result = run_test ("C");
466 /* Then the name "POSIX". */
467 if (setlocale (LC_ALL, "POSIX") == NULL)
469 puts ("cannot set POSIX locale");
473 result |= run_test ("POSIX");