]> git.ipfire.org Git - thirdparty/gcc.git/blame - libstdc++-v3/testsuite/22_locale/ctype_scan_wchar_t.cc
ctype_scan_char.cc: Tweak.
[thirdparty/gcc.git] / libstdc++-v3 / testsuite / 22_locale / ctype_scan_wchar_t.cc
CommitLineData
15dee6bf
BK
1// 2002-05-10 ghazi
2
3// Copyright (C) 2002 Free Software Foundation, Inc.
4//
5// This file is part of the GNU ISO C++ Library. This library is free
6// software; you can redistribute it and/or modify it under the
7// terms of the GNU General Public License as published by the
8// Free Software Foundation; either version 2, or (at your option)
9// any later version.
10
11// This library is distributed in the hope that it will be useful,
12// but WITHOUT ANY WARRANTY; without even the implied warranty of
13// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14// GNU General Public License for more details.
15
16// You should have received a copy of the GNU General Public License along
17// with this library; see the file COPYING. If not, write to the Free
18// Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307,
19// USA.
20
21// As a special exception, you may use this file as part of a free software
22// library without restriction. Specifically, if other files instantiate
23// templates or use macros or inline functions from this file, or you compile
24// this file and link it with other files to produce an executable, this
25// file does not by itself cause the resulting executable to be covered by
26// the GNU General Public License. This exception does not however
27// invalidate any other reasons why the executable file might be covered by
28// the GNU General Public License.
29
30// { dg-do run }
31
32#include <locale>
33#include <testsuite_hooks.h>
34
35// XXX This test is not working for non-glibc locale models.
36// { dg-do run { xfail *-*-* } }
37
38typedef wchar_t char_type;
39typedef std::char_traits<char_type> traits_type;
40class gnu_ctype: public std::ctype<char_type> { };
41
42// These two macros take a ctype mask, a string and a pointer within
43// the string that the scan function should return, usually either the
44// first or last character if the string contains identical values as
45// below.
46#define VERIFY_SCAN_IS(MASK, STRING, EXPECTED) \
47 VERIFY(gctype.scan_is((MASK), (STRING), \
48 (STRING) + traits_type::length(STRING)) == (EXPECTED))
49#define VERIFY_SCAN_NOT(MASK, STRING, EXPECTED) \
50 VERIFY(gctype.scan_not((MASK), (STRING), \
51 (STRING) + traits_type::length(STRING)) == (EXPECTED))
52
53#ifdef _GLIBCPP_USE_WCHAR_T
54// Sanity check scan_is() and scan_not().
55void test01()
56{
57 bool test = true;
58
59 const char_type *const ca = L"aaaaa";
60 const char_type *const cz = L"zzzzz";
61 const char_type *const cA = L"AAAAA";
62 const char_type *const cZ = L"ZZZZZ";
63 const char_type *const c0 = L"00000";
64 const char_type *const c9 = L"99999";
65 const char_type *const cs = L" ";
66 const char_type *const xf = L"fffff";
67 const char_type *const xF = L"FFFFF";
68 const char_type *const p1 = L"!!!!!";
69 const char_type *const p2 = L"/////";
70
71 gnu_ctype gctype;
72
73 // 'a'
74 VERIFY_SCAN_IS (std::ctype_base::alnum, ca, ca);
75 VERIFY_SCAN_IS (std::ctype_base::alpha, ca, ca);
76 VERIFY_SCAN_IS (std::ctype_base::cntrl, ca, ca+5);
77 VERIFY_SCAN_IS (std::ctype_base::digit, ca, ca+5);
78 VERIFY_SCAN_IS (std::ctype_base::graph, ca, ca);
79 VERIFY_SCAN_IS (std::ctype_base::lower, ca, ca);
80 VERIFY_SCAN_IS (std::ctype_base::print, ca, ca);
81 VERIFY_SCAN_IS (std::ctype_base::punct, ca, ca+5);
82 VERIFY_SCAN_IS (std::ctype_base::space, ca, ca+5);
83 VERIFY_SCAN_IS (std::ctype_base::upper, ca, ca+5);
84 VERIFY_SCAN_IS (std::ctype_base::xdigit, ca, ca);
85
86 VERIFY_SCAN_NOT (std::ctype_base::alnum, ca, ca+5);
87 VERIFY_SCAN_NOT (std::ctype_base::alpha, ca, ca+5);
88 VERIFY_SCAN_NOT (std::ctype_base::cntrl, ca, ca);
89 VERIFY_SCAN_NOT (std::ctype_base::digit, ca, ca);
90 VERIFY_SCAN_NOT (std::ctype_base::graph, ca, ca+5);
91 VERIFY_SCAN_NOT (std::ctype_base::lower, ca, ca+5);
92 VERIFY_SCAN_NOT (std::ctype_base::print, ca, ca+5);
93 VERIFY_SCAN_NOT (std::ctype_base::punct, ca, ca);
94 VERIFY_SCAN_NOT (std::ctype_base::space, ca, ca);
95 VERIFY_SCAN_NOT (std::ctype_base::upper, ca, ca);
96 VERIFY_SCAN_NOT (std::ctype_base::xdigit, ca, ca+5);
97
98 // 'z'
99 VERIFY_SCAN_IS (std::ctype_base::alnum, cz, cz);
100 VERIFY_SCAN_IS (std::ctype_base::alpha, cz, cz);
101 VERIFY_SCAN_IS (std::ctype_base::cntrl, cz, cz+5);
102 VERIFY_SCAN_IS (std::ctype_base::digit, cz, cz+5);
103 VERIFY_SCAN_IS (std::ctype_base::graph, cz, cz);
104 VERIFY_SCAN_IS (std::ctype_base::lower, cz, cz);
105 VERIFY_SCAN_IS (std::ctype_base::print, cz, cz);
106 VERIFY_SCAN_IS (std::ctype_base::punct, cz, cz+5);
107 VERIFY_SCAN_IS (std::ctype_base::space, cz, cz+5);
108 VERIFY_SCAN_IS (std::ctype_base::upper, cz, cz+5);
109 VERIFY_SCAN_IS (std::ctype_base::xdigit, cz, cz+5);
110
111 VERIFY_SCAN_NOT (std::ctype_base::alnum, cz, cz+5);
112 VERIFY_SCAN_NOT (std::ctype_base::alpha, cz, cz+5);
113 VERIFY_SCAN_NOT (std::ctype_base::cntrl, cz, cz);
114 VERIFY_SCAN_NOT (std::ctype_base::digit, cz, cz);
115 VERIFY_SCAN_NOT (std::ctype_base::graph, cz, cz+5);
116 VERIFY_SCAN_NOT (std::ctype_base::lower, cz, cz+5);
117 VERIFY_SCAN_NOT (std::ctype_base::print, cz, cz+5);
118 VERIFY_SCAN_NOT (std::ctype_base::punct, cz, cz);
119 VERIFY_SCAN_NOT (std::ctype_base::space, cz, cz);
120 VERIFY_SCAN_NOT (std::ctype_base::upper, cz, cz);
121 VERIFY_SCAN_NOT (std::ctype_base::xdigit, cz, cz);
122
123 // 'A'
124 VERIFY_SCAN_IS (std::ctype_base::alnum, cA, cA);
125 VERIFY_SCAN_IS (std::ctype_base::alpha, cA, cA);
126 VERIFY_SCAN_IS (std::ctype_base::cntrl, cA, cA+5);
127 VERIFY_SCAN_IS (std::ctype_base::digit, cA, cA+5);
128 VERIFY_SCAN_IS (std::ctype_base::graph, cA, cA);
129 VERIFY_SCAN_IS (std::ctype_base::lower, cA, cA+5);
130 VERIFY_SCAN_IS (std::ctype_base::print, cA, cA);
131 VERIFY_SCAN_IS (std::ctype_base::punct, cA, cA+5);
132 VERIFY_SCAN_IS (std::ctype_base::space, cA, cA+5);
133 VERIFY_SCAN_IS (std::ctype_base::upper, cA, cA);
134 VERIFY_SCAN_IS (std::ctype_base::xdigit, cA, cA);
135
136 VERIFY_SCAN_NOT (std::ctype_base::alnum, cA, cA+5);
137 VERIFY_SCAN_NOT (std::ctype_base::alpha, cA, cA+5);
138 VERIFY_SCAN_NOT (std::ctype_base::cntrl, cA, cA);
139 VERIFY_SCAN_NOT (std::ctype_base::digit, cA, cA);
140 VERIFY_SCAN_NOT (std::ctype_base::graph, cA, cA+5);
141 VERIFY_SCAN_NOT (std::ctype_base::lower, cA, cA);
142 VERIFY_SCAN_NOT (std::ctype_base::print, cA, cA+5);
143 VERIFY_SCAN_NOT (std::ctype_base::punct, cA, cA);
144 VERIFY_SCAN_NOT (std::ctype_base::space, cA, cA);
145 VERIFY_SCAN_NOT (std::ctype_base::upper, cA, cA+5);
146 VERIFY_SCAN_NOT (std::ctype_base::xdigit, cA, cA+5);
147
148 // 'Z'
149 VERIFY_SCAN_IS (std::ctype_base::alnum, cZ, cZ);
150 VERIFY_SCAN_IS (std::ctype_base::alpha, cZ, cZ);
151 VERIFY_SCAN_IS (std::ctype_base::cntrl, cZ, cZ+5);
152 VERIFY_SCAN_IS (std::ctype_base::digit, cZ, cZ+5);
153 VERIFY_SCAN_IS (std::ctype_base::graph, cZ, cZ);
154 VERIFY_SCAN_IS (std::ctype_base::lower, cZ, cZ+5);
155 VERIFY_SCAN_IS (std::ctype_base::print, cZ, cZ);
156 VERIFY_SCAN_IS (std::ctype_base::punct, cZ, cZ+5);
157 VERIFY_SCAN_IS (std::ctype_base::space, cZ, cZ+5);
158 VERIFY_SCAN_IS (std::ctype_base::upper, cZ, cZ);
159 VERIFY_SCAN_IS (std::ctype_base::xdigit, cZ, cZ+5);
160
161 VERIFY_SCAN_NOT (std::ctype_base::alnum, cZ, cZ+5);
162 VERIFY_SCAN_NOT (std::ctype_base::alpha, cZ, cZ+5);
163 VERIFY_SCAN_NOT (std::ctype_base::cntrl, cZ, cZ);
164 VERIFY_SCAN_NOT (std::ctype_base::digit, cZ, cZ);
165 VERIFY_SCAN_NOT (std::ctype_base::graph, cZ, cZ+5);
166 VERIFY_SCAN_NOT (std::ctype_base::lower, cZ, cZ);
167 VERIFY_SCAN_NOT (std::ctype_base::print, cZ, cZ+5);
168 VERIFY_SCAN_NOT (std::ctype_base::punct, cZ, cZ);
169 VERIFY_SCAN_NOT (std::ctype_base::space, cZ, cZ);
170 VERIFY_SCAN_NOT (std::ctype_base::upper, cZ, cZ+5);
171 VERIFY_SCAN_NOT (std::ctype_base::xdigit, cZ, cZ);
172
173 // '0'
174 VERIFY_SCAN_IS (std::ctype_base::alnum, c0, c0);
175 VERIFY_SCAN_IS (std::ctype_base::alpha, c0, c0+5);
176 VERIFY_SCAN_IS (std::ctype_base::cntrl, c0, c0+5);
177 VERIFY_SCAN_IS (std::ctype_base::digit, c0, c0);
178 VERIFY_SCAN_IS (std::ctype_base::graph, c0, c0);
179 VERIFY_SCAN_IS (std::ctype_base::lower, c0, c0+5);
180 VERIFY_SCAN_IS (std::ctype_base::print, c0, c0);
181 VERIFY_SCAN_IS (std::ctype_base::punct, c0, c0+5);
182 VERIFY_SCAN_IS (std::ctype_base::space, c0, c0+5);
183 VERIFY_SCAN_IS (std::ctype_base::upper, c0, c0+5);
184 VERIFY_SCAN_IS (std::ctype_base::xdigit, c0, c0);
185
186 VERIFY_SCAN_NOT (std::ctype_base::alnum, c0, c0+5);
187 VERIFY_SCAN_NOT (std::ctype_base::alpha, c0, c0);
188 VERIFY_SCAN_NOT (std::ctype_base::cntrl, c0, c0);
189 VERIFY_SCAN_NOT (std::ctype_base::digit, c0, c0+5);
190 VERIFY_SCAN_NOT (std::ctype_base::graph, c0, c0+5);
191 VERIFY_SCAN_NOT (std::ctype_base::lower, c0, c0);
192 VERIFY_SCAN_NOT (std::ctype_base::print, c0, c0+5);
193 VERIFY_SCAN_NOT (std::ctype_base::punct, c0, c0);
194 VERIFY_SCAN_NOT (std::ctype_base::space, c0, c0);
195 VERIFY_SCAN_NOT (std::ctype_base::upper, c0, c0);
196 VERIFY_SCAN_NOT (std::ctype_base::xdigit, c0, c0+5);
197
198 // '9'
199 VERIFY_SCAN_IS (std::ctype_base::alnum, c9, c9);
200 VERIFY_SCAN_IS (std::ctype_base::alpha, c9, c9+5);
201 VERIFY_SCAN_IS (std::ctype_base::cntrl, c9, c9+5);
202 VERIFY_SCAN_IS (std::ctype_base::digit, c9, c9);
203 VERIFY_SCAN_IS (std::ctype_base::graph, c9, c9);
204 VERIFY_SCAN_IS (std::ctype_base::lower, c9, c9+5);
205 VERIFY_SCAN_IS (std::ctype_base::print, c9, c9);
206 VERIFY_SCAN_IS (std::ctype_base::punct, c9, c9+5);
207 VERIFY_SCAN_IS (std::ctype_base::space, c9, c9+5);
208 VERIFY_SCAN_IS (std::ctype_base::upper, c9, c9+5);
209 VERIFY_SCAN_IS (std::ctype_base::xdigit, c9, c9);
210
211 VERIFY_SCAN_NOT (std::ctype_base::alnum, c9, c9+5);
212 VERIFY_SCAN_NOT (std::ctype_base::alpha, c9, c9);
213 VERIFY_SCAN_NOT (std::ctype_base::cntrl, c9, c9);
214 VERIFY_SCAN_NOT (std::ctype_base::digit, c9, c9+5);
215 VERIFY_SCAN_NOT (std::ctype_base::graph, c9, c9+5);
216 VERIFY_SCAN_NOT (std::ctype_base::lower, c9, c9);
217 VERIFY_SCAN_NOT (std::ctype_base::print, c9, c9+5);
218 VERIFY_SCAN_NOT (std::ctype_base::punct, c9, c9);
219 VERIFY_SCAN_NOT (std::ctype_base::space, c9, c9);
220 VERIFY_SCAN_NOT (std::ctype_base::upper, c9, c9);
221 VERIFY_SCAN_NOT (std::ctype_base::xdigit, c9, c9+5);
222
223 // ' '
224 VERIFY_SCAN_IS (std::ctype_base::alnum, cs, cs+5);
225 VERIFY_SCAN_IS (std::ctype_base::alpha, cs, cs+5);
226 VERIFY_SCAN_IS (std::ctype_base::cntrl, cs, cs+5);
227 VERIFY_SCAN_IS (std::ctype_base::digit, cs, cs+5);
228 VERIFY_SCAN_IS (std::ctype_base::graph, cs, cs+5);
229 VERIFY_SCAN_IS (std::ctype_base::lower, cs, cs+5);
230 VERIFY_SCAN_IS (std::ctype_base::print, cs, cs);
231 VERIFY_SCAN_IS (std::ctype_base::punct, cs, cs+5);
232 VERIFY_SCAN_IS (std::ctype_base::space, cs, cs);
233 VERIFY_SCAN_IS (std::ctype_base::upper, cs, cs+5);
234 VERIFY_SCAN_IS (std::ctype_base::xdigit, cs, cs+5);
235
236 VERIFY_SCAN_NOT (std::ctype_base::alnum, cs, cs);
237 VERIFY_SCAN_NOT (std::ctype_base::alpha, cs, cs);
238 VERIFY_SCAN_NOT (std::ctype_base::cntrl, cs, cs);
239 VERIFY_SCAN_NOT (std::ctype_base::digit, cs, cs);
240 VERIFY_SCAN_NOT (std::ctype_base::graph, cs, cs);
241 VERIFY_SCAN_NOT (std::ctype_base::lower, cs, cs);
242 VERIFY_SCAN_NOT (std::ctype_base::print, cs, cs+5);
243 VERIFY_SCAN_NOT (std::ctype_base::punct, cs, cs);
244 VERIFY_SCAN_NOT (std::ctype_base::space, cs, cs+5);
245 VERIFY_SCAN_NOT (std::ctype_base::upper, cs, cs);
246 VERIFY_SCAN_NOT (std::ctype_base::xdigit, cs, cs);
247
248 // 'f'
249 VERIFY_SCAN_IS (std::ctype_base::alnum, xf, xf);
250 VERIFY_SCAN_IS (std::ctype_base::alpha, xf, xf);
251 VERIFY_SCAN_IS (std::ctype_base::cntrl, xf, xf+5);
252 VERIFY_SCAN_IS (std::ctype_base::digit, xf, xf+5);
253 VERIFY_SCAN_IS (std::ctype_base::graph, xf, xf);
254 VERIFY_SCAN_IS (std::ctype_base::lower, xf, xf);
255 VERIFY_SCAN_IS (std::ctype_base::print, xf, xf);
256 VERIFY_SCAN_IS (std::ctype_base::punct, xf, xf+5);
257 VERIFY_SCAN_IS (std::ctype_base::space, xf, xf+5);
258 VERIFY_SCAN_IS (std::ctype_base::upper, xf, xf+5);
259 VERIFY_SCAN_IS (std::ctype_base::xdigit, xf, xf);
260
261 VERIFY_SCAN_NOT (std::ctype_base::alnum, xf, xf+5);
262 VERIFY_SCAN_NOT (std::ctype_base::alpha, xf, xf+5);
263 VERIFY_SCAN_NOT (std::ctype_base::cntrl, xf, xf);
264 VERIFY_SCAN_NOT (std::ctype_base::digit, xf, xf);
265 VERIFY_SCAN_NOT (std::ctype_base::graph, xf, xf+5);
266 VERIFY_SCAN_NOT (std::ctype_base::lower, xf, xf+5);
267 VERIFY_SCAN_NOT (std::ctype_base::print, xf, xf+5);
268 VERIFY_SCAN_NOT (std::ctype_base::punct, xf, xf);
269 VERIFY_SCAN_NOT (std::ctype_base::space, xf, xf);
270 VERIFY_SCAN_NOT (std::ctype_base::upper, xf, xf);
271 VERIFY_SCAN_NOT (std::ctype_base::xdigit, xf, xf+5);
272
273 // 'F'
274 VERIFY_SCAN_IS (std::ctype_base::alnum, xF, xF);
275 VERIFY_SCAN_IS (std::ctype_base::alpha, xF, xF);
276 VERIFY_SCAN_IS (std::ctype_base::cntrl, xF, xF+5);
277 VERIFY_SCAN_IS (std::ctype_base::digit, xF, xF+5);
278 VERIFY_SCAN_IS (std::ctype_base::graph, xF, xF);
279 VERIFY_SCAN_IS (std::ctype_base::lower, xF, xF+5);
280 VERIFY_SCAN_IS (std::ctype_base::print, xF, xF);
281 VERIFY_SCAN_IS (std::ctype_base::punct, xF, xF+5);
282 VERIFY_SCAN_IS (std::ctype_base::space, xF, xF+5);
283 VERIFY_SCAN_IS (std::ctype_base::upper, xF, xF);
284 VERIFY_SCAN_IS (std::ctype_base::xdigit, xF, xF);
285
286 VERIFY_SCAN_NOT (std::ctype_base::alnum, xF, xF+5);
287 VERIFY_SCAN_NOT (std::ctype_base::alpha, xF, xF+5);
288 VERIFY_SCAN_NOT (std::ctype_base::cntrl, xF, xF);
289 VERIFY_SCAN_NOT (std::ctype_base::digit, xF, xF);
290 VERIFY_SCAN_NOT (std::ctype_base::graph, xF, xF+5);
291 VERIFY_SCAN_NOT (std::ctype_base::lower, xF, xF);
292 VERIFY_SCAN_NOT (std::ctype_base::print, xF, xF+5);
293 VERIFY_SCAN_NOT (std::ctype_base::punct, xF, xF);
294 VERIFY_SCAN_NOT (std::ctype_base::space, xF, xF);
295 VERIFY_SCAN_NOT (std::ctype_base::upper, xF, xF+5);
296 VERIFY_SCAN_NOT (std::ctype_base::xdigit, xF, xF+5);
297
298 // '!'
299 VERIFY_SCAN_IS (std::ctype_base::alnum, p1, p1+5);
300 VERIFY_SCAN_IS (std::ctype_base::alpha, p1, p1+5);
301 VERIFY_SCAN_IS (std::ctype_base::cntrl, p1, p1+5);
302 VERIFY_SCAN_IS (std::ctype_base::digit, p1, p1+5);
303 VERIFY_SCAN_IS (std::ctype_base::graph, p1, p1);
304 VERIFY_SCAN_IS (std::ctype_base::lower, p1, p1+5);
305 VERIFY_SCAN_IS (std::ctype_base::print, p1, p1);
306 VERIFY_SCAN_IS (std::ctype_base::punct, p1, p1);
307 VERIFY_SCAN_IS (std::ctype_base::space, p1, p1+5);
308 VERIFY_SCAN_IS (std::ctype_base::upper, p1, p1+5);
309 VERIFY_SCAN_IS (std::ctype_base::xdigit, p1, p1+5);
310
311 VERIFY_SCAN_NOT (std::ctype_base::alnum, p1, p1);
312 VERIFY_SCAN_NOT (std::ctype_base::alpha, p1, p1);
313 VERIFY_SCAN_NOT (std::ctype_base::cntrl, p1, p1);
314 VERIFY_SCAN_NOT (std::ctype_base::digit, p1, p1);
315 VERIFY_SCAN_NOT (std::ctype_base::lower, p1, p1);
316 VERIFY_SCAN_NOT (std::ctype_base::print, p1, p1+5);
317 VERIFY_SCAN_NOT (std::ctype_base::punct, p1, p1+5);
318 VERIFY_SCAN_NOT (std::ctype_base::space, p1, p1);
319 VERIFY_SCAN_NOT (std::ctype_base::upper, p1, p1);
320 VERIFY_SCAN_NOT (std::ctype_base::xdigit, p1, p1);
321
322 // '/'
323 VERIFY_SCAN_IS (std::ctype_base::alnum, p2, p2+5);
324 VERIFY_SCAN_IS (std::ctype_base::alpha, p2, p2+5);
325 VERIFY_SCAN_IS (std::ctype_base::cntrl, p2, p2+5);
326 VERIFY_SCAN_IS (std::ctype_base::digit, p2, p2+5);
327 VERIFY_SCAN_IS (std::ctype_base::graph, p2, p2);
328 VERIFY_SCAN_IS (std::ctype_base::lower, p2, p2+5);
329 VERIFY_SCAN_IS (std::ctype_base::print, p2, p2);
330 VERIFY_SCAN_IS (std::ctype_base::punct, p2, p2);
331 VERIFY_SCAN_IS (std::ctype_base::space, p2, p2+5);
332 VERIFY_SCAN_IS (std::ctype_base::upper, p2, p2+5);
333 VERIFY_SCAN_IS (std::ctype_base::xdigit, p2, p2+5);
334
335 VERIFY_SCAN_NOT (std::ctype_base::alnum, p2, p2);
336 VERIFY_SCAN_NOT (std::ctype_base::alpha, p2, p2);
337 VERIFY_SCAN_NOT (std::ctype_base::cntrl, p2, p2);
338 VERIFY_SCAN_NOT (std::ctype_base::digit, p2, p2);
339 VERIFY_SCAN_NOT (std::ctype_base::graph, p2, p2+5);
340 VERIFY_SCAN_NOT (std::ctype_base::lower, p2, p2);
341 VERIFY_SCAN_NOT (std::ctype_base::print, p2, p2+5);
342 VERIFY_SCAN_NOT (std::ctype_base::punct, p2, p2+5);
343 VERIFY_SCAN_NOT (std::ctype_base::space, p2, p2);
344 VERIFY_SCAN_NOT (std::ctype_base::upper, p2, p2);
345 VERIFY_SCAN_NOT (std::ctype_base::xdigit, p2, p2);
346}
347#endif
348
349int main()
350{
351#ifdef _GLIBCPP_USE_WCHAR_T
352 test01();
353#endif
354 return 0;
355}