1 /* Copyright (C) 2000-2022 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
3
4 The GNU C Library is free software; you can redistribute it and/or
5 modify it under the terms of the GNU Lesser General Public
6 License as published by the Free Software Foundation; either
7 version 2.1 of the License, or (at your option) any later version.
8
9 The GNU C Library is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 Lesser General Public License for more details.
13
14 You should have received a copy of the GNU Lesser General Public
15 License along with the GNU C Library; if not, see
16 <https://www.gnu.org/licenses/>. */
17
18 #include <locale.h>
19 #include <stdio.h>
20 #include <wchar.h>
21
22
23 /* Currently selected locale. */
24 static const char *current_locale;
25
26
27 /* Test which should succeed. */
28 static int
ok_test(int c,wint_t expwc)29 ok_test (int c, wint_t expwc)
30 {
31 wint_t wc = btowc (c);
32
33 if (wc != expwc)
34 {
35 printf ("%s: btowc('%c') failed, returned L'\\x%x' instead of L'\\x%x'\n",
36 current_locale, c, wc, expwc);
37 return 1;
38 }
39
40 return 0;
41 }
42
43 /* Test which should fail. */
44 static int
fail_test(int c)45 fail_test (int c)
46 {
47 wint_t wc = btowc (c);
48
49 if (wc != WEOF)
50 {
51 printf ("%s: btowc('%c') succeded, returned L'\\x%x' instead of WEOF\n",
52 current_locale, c, wc);
53 return 1;
54 }
55
56 return 0;
57 }
58
59
60 /* Test EOF handling. */
61 static int
eof_test(void)62 eof_test (void)
63 {
64 wint_t wc = btowc (EOF);
65 if (wc != WEOF)
66 {
67 printf ("%s: btowc(EOF) returned L'\\x%x', not WEOF\n",
68 current_locale, wc);
69 }
70
71 return 0;
72 }
73
74
75 /* Test the btowc() function for a few locales with known character sets. */
76 static int
do_test(void)77 do_test (void)
78 {
79 int result = 0;
80
81 current_locale = setlocale (LC_ALL, "en_US.ANSI_X3.4-1968");
82 if (current_locale == NULL)
83 {
84 puts ("cannot set locale \"en_US.ANSI_X3.4-1968\"");
85 result = 1;
86 }
87 else
88 {
89 int c;
90
91 for (c = 0; c < 128; ++c)
92 result |= ok_test (c, c);
93
94 for (c = 128; c < 256; ++c)
95 result |= fail_test (c);
96
97 result |= eof_test ();
98 }
99
100 current_locale = setlocale (LC_ALL, "de_DE.ISO-8859-1");
101 if (current_locale == NULL)
102 {
103 puts ("cannot set locale \"de_DE.ISO-8859-1\"");
104 result = 1;
105 }
106 else
107 {
108 int c;
109
110 for (c = 0; c < 256; ++c)
111 result |= ok_test (c, c);
112
113 result |= eof_test ();
114 }
115
116 current_locale = setlocale (LC_ALL, "de_DE.UTF-8");
117 if (current_locale == NULL)
118 {
119 puts ("cannot set locale \"de_DE.UTF-8\"");
120 result = 1;
121 }
122 else
123 {
124 int c;
125
126 for (c = 0; c < 128; ++c)
127 result |= ok_test (c, c);
128
129 for (c = 128; c < 256; ++c)
130 result |= fail_test (c);
131
132 result |= eof_test ();
133 }
134
135 current_locale = setlocale (LC_ALL, "hr_HR.ISO-8859-2");
136 if (current_locale == NULL)
137 {
138 puts ("cannot set locale \"hr_HR.ISO-8859-2\"");
139 result = 1;
140 }
141 else
142 {
143 static const wint_t upper_half[] =
144 {
145 0x0104, 0x02D8, 0x0141, 0x00A4, 0x013D, 0x015A, 0x00A7, 0x00A8,
146 0x0160, 0x015E, 0x0164, 0x0179, 0x00AD, 0x017D, 0x017B, 0x00B0,
147 0x0105, 0x02DB, 0x0142, 0x00B4, 0x013E, 0x015B, 0x02C7, 0x00B8,
148 0x0161, 0x015F, 0x0165, 0x017A, 0x02DD, 0x017E, 0x017C, 0x0154,
149 0x00C1, 0x00C2, 0x0102, 0x00C4, 0x0139, 0x0106, 0x00C7, 0x010C,
150 0x00C9, 0x0118, 0x00CB, 0x011A, 0x00CD, 0x00CE, 0x010E, 0x0110,
151 0x0143, 0x0147, 0x00D3, 0x00D4, 0x0150, 0x00D6, 0x00D7, 0x0158,
152 0x016E, 0x00DA, 0x0170, 0x00DC, 0x00DD, 0x0162, 0x00DF, 0x0155,
153 0x00E1, 0x00E2, 0x0103, 0x00E4, 0x013A, 0x0107, 0x00E7, 0x010D,
154 0x00E9, 0x0119, 0x00EB, 0x011B, 0x00ED, 0x00EE, 0x010F, 0x0111,
155 0x0144, 0x0148, 0x00F3, 0x00F4, 0x0151, 0x00F6, 0x00F7, 0x0159,
156 0x016F, 0x00FA, 0x0171, 0x00FC, 0x00FD, 0x0163, 0x02D9
157 };
158 int c;
159
160 for (c = 0; c < 161; ++c)
161 result |= ok_test (c, c);
162
163 for (c = 161; c < 256; ++c)
164 result |= ok_test (c, upper_half[c - 161]);
165
166 result |= eof_test ();
167 }
168
169 if (result == 0)
170 puts ("all OK");
171
172 return result;
173 }
174
175 #include <support/test-driver.c>
176