projects / reactos.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
history | raw | HEAD
[crt]
[reactos.git] / reactos / lib / sdk / crt / string / ctype.c
1 #include <string.h>
2 #undef __MINGW_IMPORT
3 #define __MINGW_IMPORT
4 #include <ctype.h>
5
6 #ifndef _LIBCNT_
7 #include <precomp.h>
8 #endif
9
10 #undef _pctype
11 #undef _pwctype
12
13 /* MS's CRT header defines all that, and we actually implement that */
14 #undef iswalnum
15 #undef __isascii
16 #undef iswascii
17 #undef __iscsym
18 #undef __iscsymf
19 #undef iswalpha
20 #undef iswcntrl
21 #undef iswdigit
22 #undef iswgraph
23 #undef iswprint
24 #undef iswpunct
25 #undef iswlower
26 #undef iswupper
27 #undef iswspace
28 #undef iswxdigit
29 #undef __toascii
30 #undef _tolower
31 #undef _toupper
32
33 #define upalpha ('A' - 'a')
34
35
36 const unsigned short _ctype[] = {
37 0, /* <EOF>, 0xFFFF */
38 _CONTROL, /* CTRL+@, 0x00 */
39 _CONTROL, /* CTRL+A, 0x01 */
40 _CONTROL, /* CTRL+B, 0x02 */
41 _CONTROL, /* CTRL+C, 0x03 */
42 _CONTROL, /* CTRL+D, 0x04 */
43 _CONTROL, /* CTRL+E, 0x05 */
44 _CONTROL, /* CTRL+F, 0x06 */
45 _CONTROL, /* CTRL+G, 0x07 */
46 _CONTROL, /* CTRL+H, 0x08 */
47 _CONTROL | _SPACE, /* CTRL+I, 0x09 */
48 _CONTROL | _SPACE, /* CTRL+J, 0x0a */
49 _CONTROL | _SPACE, /* CTRL+K, 0x0b */
50 _CONTROL | _SPACE, /* CTRL+L, 0x0c */
51 _CONTROL | _SPACE, /* CTRL+M, 0x0d */
52 _CONTROL, /* CTRL+N, 0x0e */
53 _CONTROL, /* CTRL+O, 0x0f */
54 _CONTROL, /* CTRL+P, 0x10 */
55 _CONTROL, /* CTRL+Q, 0x11 */
56 _CONTROL, /* CTRL+R, 0x12 */
57 _CONTROL, /* CTRL+S, 0x13 */
58 _CONTROL, /* CTRL+T, 0x14 */
59 _CONTROL, /* CTRL+U, 0x15 */
60 _CONTROL, /* CTRL+V, 0x16 */
61 _CONTROL, /* CTRL+W, 0x17 */
62 _CONTROL, /* CTRL+X, 0x18 */
63 _CONTROL, /* CTRL+Y, 0x19 */
64 _CONTROL, /* CTRL+Z, 0x1a */
65 _CONTROL, /* CTRL+[, 0x1b */
66 _CONTROL, /* CTRL+\, 0x1c */
67 _CONTROL, /* CTRL+], 0x1d */
68 _CONTROL, /* CTRL+^, 0x1e */
69 _CONTROL, /* CTRL+_, 0x1f */
70 _SPACE | _BLANK, /* ` ', 0x20 */
71 _PUNCT, /* `!', 0x21 */
72 _PUNCT, /* 0x22 */
73 _PUNCT, /* `#', 0x23 */
74 _PUNCT, /* `$', 0x24 */
75 _PUNCT, /* `%', 0x25 */
76 _PUNCT, /* `&', 0x26 */
77 _PUNCT, /* 0x27 */
78 _PUNCT, /* `(', 0x28 */
79 _PUNCT, /* `)', 0x29 */
80 _PUNCT, /* `*', 0x2a */
81 _PUNCT, /* `+', 0x2b */
82 _PUNCT, /* `,', 0x2c */
83 _PUNCT, /* `-', 0x2d */
84 _PUNCT, /* `.', 0x2e */
85 _PUNCT, /* `/', 0x2f */
86 _DIGIT | _HEX, /* `0', 0x30 */
87 _DIGIT | _HEX, /* `1', 0x31 */
88 _DIGIT | _HEX, /* `2', 0x32 */
89 _DIGIT | _HEX, /* `3', 0x33 */
90 _DIGIT | _HEX, /* `4', 0x34 */
91 _DIGIT | _HEX, /* `5', 0x35 */
92 _DIGIT | _HEX, /* `6', 0x36 */
93 _DIGIT | _HEX, /* `7', 0x37 */
94 _DIGIT | _HEX, /* `8', 0x38 */
95 _DIGIT | _HEX, /* `9', 0x39 */
96 _PUNCT, /* `:', 0x3a */
97 _PUNCT, /* `;', 0x3b */
98 _PUNCT, /* `<', 0x3c */
99 _PUNCT, /* `=', 0x3d */
100 _PUNCT, /* `>', 0x3e */
101 _PUNCT, /* `?', 0x3f */
102 _PUNCT, /* `@', 0x40 */
103 _UPPER | _HEX, /* `A', 0x41 */
104 _UPPER | _HEX, /* `B', 0x42 */
105 _UPPER | _HEX, /* `C', 0x43 */
106 _UPPER | _HEX, /* `D', 0x44 */
107 _UPPER | _HEX, /* `E', 0x45 */
108 _UPPER | _HEX, /* `F', 0x46 */
109 _UPPER, /* `G', 0x47 */
110 _UPPER, /* `H', 0x48 */
111 _UPPER, /* `I', 0x49 */
112 _UPPER, /* `J', 0x4a */
113 _UPPER, /* `K', 0x4b */
114 _UPPER, /* `L', 0x4c */
115 _UPPER, /* `M', 0x4d */
116 _UPPER, /* `N', 0x4e */
117 _UPPER, /* `O', 0x4f */
118 _UPPER, /* `P', 0x50 */
119 _UPPER, /* `Q', 0x51 */
120 _UPPER, /* `R', 0x52 */
121 _UPPER, /* `S', 0x53 */
122 _UPPER, /* `T', 0x54 */
123 _UPPER, /* `U', 0x55 */
124 _UPPER, /* `V', 0x56 */
125 _UPPER, /* `W', 0x57 */
126 _UPPER, /* `X', 0x58 */
127 _UPPER, /* `Y', 0x59 */
128 _UPPER, /* `Z', 0x5a */
129 _PUNCT, /* `[', 0x5b */
130 _PUNCT, /* 0x5c */
131 _PUNCT, /* `]', 0x5d */
132 _PUNCT, /* `^', 0x5e */
133 _PUNCT, /* `_', 0x5f */
134 _PUNCT, /* 0x60 */
135 _LOWER | _HEX, /* `a', 0x61 */
136 _LOWER | _HEX, /* `b', 0x62 */
137 _LOWER | _HEX, /* `c', 0x63 */
138 _LOWER | _HEX, /* `d', 0x64 */
139 _LOWER | _HEX, /* `e', 0x65 */
140 _LOWER | _HEX, /* `f', 0x66 */
141 _LOWER, /* `g', 0x67 */
142 _LOWER, /* `h', 0x68 */
143 _LOWER, /* `i', 0x69 */
144 _LOWER, /* `j', 0x6a */
145 _LOWER, /* `k', 0x6b */
146 _LOWER, /* `l', 0x6c */
147 _LOWER, /* `m', 0x6d */
148 _LOWER, /* `n', 0x6e */
149 _LOWER, /* `o', 0x6f */
150 _LOWER, /* `p', 0x70 */
151 _LOWER, /* `q', 0x71 */
152 _LOWER, /* `r', 0x72 */
153 _LOWER, /* `s', 0x73 */
154 _LOWER, /* `t', 0x74 */
155 _LOWER, /* `u', 0x75 */
156 _LOWER, /* `v', 0x76 */
157 _LOWER, /* `w', 0x77 */
158 _LOWER, /* `x', 0x78 */
159 _LOWER, /* `y', 0x79 */
160 _LOWER, /* `z', 0x7a */
161 _PUNCT, /* `{', 0x7b */
162 _PUNCT, /* `|', 0x7c */
163 _PUNCT, /* `}', 0x7d */
164 _PUNCT, /* `~', 0x7e */
165 _CONTROL, /* 0x7f */
166 0, /* 0x80 */
167 0, /* 0x81 */
168 0, /* 0x82 */
169 0, /* 0x83 */
170 0, /* 0x84 */
171 0, /* 0x85 */
172 0, /* 0x86 */
173 0, /* 0x87 */
174 0, /* 0x88 */
175 0, /* 0x89 */
176 0, /* 0x8a */
177 0, /* 0x8b */
178 0, /* 0x8c */
179 0, /* 0x8d */
180 0, /* 0x8e */
181 0, /* 0x8f */
182 0, /* 0x90 */
183 0, /* 0x91 */
184 0, /* 0x92 */
185 0, /* 0x93 */
186 0, /* 0x94 */
187 0, /* 0x95 */
188 0, /* 0x96 */
189 0, /* 0x97 */
190 0, /* 0x98 */
191 0, /* 0x99 */
192 0, /* 0x9a */
193 0, /* 0x9b */
194 0, /* 0x9c */
195 0, /* 0x9d */
196 0, /* 0x9e */
197 0, /* 0x9f */
198 0, /* 0xa0 */
199 0, /* 0xa1 */
200 0, /* 0xa2 */
201 0, /* 0xa3 */
202 0, /* 0xa4 */
203 0, /* 0xa5 */
204 0, /* 0xa6 */
205 0, /* 0xa7 */
206 0, /* 0xa8 */
207 0, /* 0xa9 */
208 0, /* 0xaa */
209 0, /* 0xab */
210 0, /* 0xac */
211 0, /* 0xad */
212 0, /* 0xae */
213 0, /* 0xaf */
214 0, /* 0xb0 */
215 0, /* 0xb1 */
216 0, /* 0xb2 */
217 0, /* 0xb3 */
218 0, /* 0xb4 */
219 0, /* 0xb5 */
220 0, /* 0xb6 */
221 0, /* 0xb7 */
222 0, /* 0xb8 */
223 0, /* 0xb9 */
224 0, /* 0xba */
225 0, /* 0xbb */
226 0, /* 0xbc */
227 0, /* 0xbd */
228 0, /* 0xbe */
229 0, /* 0xbf */
230 0, /* 0xc0 */
231 0, /* 0xc1 */
232 0, /* 0xc2 */
233 0, /* 0xc3 */
234 0, /* 0xc4 */
235 0, /* 0xc5 */
236 0, /* 0xc6 */
237 0, /* 0xc7 */
238 0, /* 0xc8 */
239 0, /* 0xc9 */
240 0, /* 0xca */
241 0, /* 0xcb */
242 0, /* 0xcc */
243 0, /* 0xcd */
244 0, /* 0xce */
245 0, /* 0xcf */
246 0, /* 0xd0 */
247 0, /* 0xd1 */
248 0, /* 0xd2 */
249 0, /* 0xd3 */
250 0, /* 0xd4 */
251 0, /* 0xd5 */
252 0, /* 0xd6 */
253 0, /* 0xd7 */
254 0, /* 0xd8 */
255 0, /* 0xd9 */
256 0, /* 0xda */
257 0, /* 0xdb */
258 0, /* 0xdc */
259 0, /* 0xdd */
260 0, /* 0xde */
261 0, /* 0xdf */
262 0, /* 0xe0 */
263 0, /* 0xe1 */
264 0, /* 0xe2 */
265 0, /* 0xe3 */
266 0, /* 0xe4 */
267 0, /* 0xe5 */
268 0, /* 0xe6 */
269 0, /* 0xe7 */
270 0, /* 0xe8 */
271 0, /* 0xe9 */
272 0, /* 0xea */
273 0, /* 0xeb */
274 0, /* 0xec */
275 0, /* 0xed */
276 0, /* 0xee */
277 0, /* 0xef */
278 0, /* 0xf0 */
279 0, /* 0xf1 */
280 0, /* 0xf2 */
281 0, /* 0xf3 */
282 0, /* 0xf4 */
283 0, /* 0xf5 */
284 0, /* 0xf6 */
285 0, /* 0xf7 */
286 0, /* 0xf8 */
287 0, /* 0xf9 */
288 0, /* 0xfa */
289 0, /* 0xfb */
290 0, /* 0xfc */
291 0, /* 0xfd */
292 0, /* 0xfe */
293 0 /* 0xff */
294 };
295
296 const unsigned short _wctype[] = {
297 0, /* <EOF>, 0xFFFF */
298 _CONTROL, /* CTRL+@, 0x00 */
299 _CONTROL, /* CTRL+A, 0x01 */
300 _CONTROL, /* CTRL+B, 0x02 */
301 _CONTROL, /* CTRL+C, 0x03 */
302 _CONTROL, /* CTRL+D, 0x04 */
303 _CONTROL, /* CTRL+E, 0x05 */
304 _CONTROL, /* CTRL+F, 0x06 */
305 _CONTROL, /* CTRL+G, 0x07 */
306 _CONTROL, /* CTRL+H, 0x08 */
307 _BLANK | _CONTROL | _SPACE, /* CTRL+I, 0x09 */
308 _CONTROL | _SPACE, /* CTRL+J, 0x0a */
309 _CONTROL | _SPACE, /* CTRL+K, 0x0b */
310 _CONTROL | _SPACE, /* CTRL+L, 0x0c */
311 _CONTROL | _SPACE, /* CTRL+M, 0x0d */
312 _CONTROL, /* CTRL+N, 0x0e */
313 _CONTROL, /* CTRL+O, 0x0f */
314 _CONTROL, /* CTRL+P, 0x10 */
315 _CONTROL, /* CTRL+Q, 0x11 */
316 _CONTROL, /* CTRL+R, 0x12 */
317 _CONTROL, /* CTRL+S, 0x13 */
318 _CONTROL, /* CTRL+T, 0x14 */
319 _CONTROL, /* CTRL+U, 0x15 */
320 _CONTROL, /* CTRL+V, 0x16 */
321 _CONTROL, /* CTRL+W, 0x17 */
322 _CONTROL, /* CTRL+X, 0x18 */
323 _CONTROL, /* CTRL+Y, 0x19 */
324 _CONTROL, /* CTRL+Z, 0x1a */
325 _CONTROL, /* CTRL+[, 0x1b */
326 _CONTROL, /* CTRL+\, 0x1c */
327 _CONTROL, /* CTRL+], 0x1d */
328 _CONTROL, /* CTRL+^, 0x1e */
329 _CONTROL, /* CTRL+_, 0x1f */
330 _SPACE | _BLANK, /* ` ', 0x20 */
331 _PUNCT, /* `!', 0x21 */
332 _PUNCT, /* 0x22 */
333 _PUNCT, /* `#', 0x23 */
334 _PUNCT, /* `$', 0x24 */
335 _PUNCT, /* `%', 0x25 */
336 _PUNCT, /* `&', 0x26 */
337 _PUNCT, /* 0x27 */
338 _PUNCT, /* `(', 0x28 */
339 _PUNCT, /* `)', 0x29 */
340 _PUNCT, /* `*', 0x2a */
341 _PUNCT, /* `+', 0x2b */
342 _PUNCT, /* `,', 0x2c */
343 _PUNCT, /* `-', 0x2d */
344 _PUNCT, /* `.', 0x2e */
345 _PUNCT, /* `/', 0x2f */
346 _DIGIT | _HEX, /* `0', 0x30 */
347 _DIGIT | _HEX, /* `1', 0x31 */
348 _DIGIT | _HEX, /* `2', 0x32 */
349 _DIGIT | _HEX, /* `3', 0x33 */
350 _DIGIT | _HEX, /* `4', 0x34 */
351 _DIGIT | _HEX, /* `5', 0x35 */
352 _DIGIT | _HEX, /* `6', 0x36 */
353 _DIGIT | _HEX, /* `7', 0x37 */
354 _DIGIT | _HEX, /* `8', 0x38 */
355 _DIGIT | _HEX, /* `9', 0x39 */
356 _PUNCT, /* `:', 0x3a */
357 _PUNCT, /* `;', 0x3b */
358 _PUNCT, /* `<', 0x3c */
359 _PUNCT, /* `=', 0x3d */
360 _PUNCT, /* `>', 0x3e */
361 _PUNCT, /* `?', 0x3f */
362 _PUNCT, /* `@', 0x40 */
363 0x0100 | _UPPER | _HEX, /* `A', 0x41 */
364 0x0100 | _UPPER | _HEX, /* `B', 0x42 */
365 0x0100 | _UPPER | _HEX, /* `C', 0x43 */
366 0x0100 | _UPPER | _HEX, /* `D', 0x44 */
367 0x0100 | _UPPER | _HEX, /* `E', 0x45 */
368 0x0100 | _UPPER | _HEX, /* `F', 0x46 */
369 0x0100 | _UPPER, /* `G', 0x47 */
370 0x0100 | _UPPER, /* `H', 0x48 */
371 0x0100 | _UPPER, /* `I', 0x49 */
372 0x0100 | _UPPER, /* `J', 0x4a */
373 0x0100 | _UPPER, /* `K', 0x4b */
374 0x0100 | _UPPER, /* `L', 0x4c */
375 0x0100 | _UPPER, /* `M', 0x4d */
376 0x0100 | _UPPER, /* `N', 0x4e */
377 0x0100 | _UPPER, /* `O', 0x4f */
378 0x0100 | _UPPER, /* `P', 0x50 */
379 0x0100 | _UPPER, /* `Q', 0x51 */
380 0x0100 | _UPPER, /* `R', 0x52 */
381 0x0100 | _UPPER, /* `S', 0x53 */
382 0x0100 | _UPPER, /* `T', 0x54 */
383 0x0100 | _UPPER, /* `U', 0x55 */
384 0x0100 | _UPPER, /* `V', 0x56 */
385 0x0100 | _UPPER, /* `W', 0x57 */
386 0x0100 | _UPPER, /* `X', 0x58 */
387 0x0100 | _UPPER, /* `Y', 0x59 */
388 0x0100 | _UPPER, /* `Z', 0x5a */
389 _PUNCT, /* `[', 0x5b */
390 _PUNCT, /* 0x5c */
391 _PUNCT, /* `]', 0x5d */
392 _PUNCT, /* `^', 0x5e */
393 _PUNCT, /* `_', 0x5f */
394 _PUNCT, /* 0x60 */
395 0x0100 | _LOWER | _HEX, /* `a', 0x61 */
396 0x0100 | _LOWER | _HEX, /* `b', 0x62 */
397 0x0100 | _LOWER | _HEX, /* `c', 0x63 */
398 0x0100 | _LOWER | _HEX, /* `d', 0x64 */
399 0x0100 | _LOWER | _HEX, /* `e', 0x65 */
400 0x0100 | _LOWER | _HEX, /* `f', 0x66 */
401 0x0100 | _LOWER, /* `g', 0x67 */
402 0x0100 | _LOWER, /* `h', 0x68 */
403 0x0100 | _LOWER, /* `i', 0x69 */
404 0x0100 | _LOWER, /* `j', 0x6a */
405 0x0100 | _LOWER, /* `k', 0x6b */
406 0x0100 | _LOWER, /* `l', 0x6c */
407 0x0100 | _LOWER, /* `m', 0x6d */
408 0x0100 | _LOWER, /* `n', 0x6e */
409 0x0100 | _LOWER, /* `o', 0x6f */
410 0x0100 | _LOWER, /* `p', 0x70 */
411 0x0100 | _LOWER, /* `q', 0x71 */
412 0x0100 | _LOWER, /* `r', 0x72 */
413 0x0100 | _LOWER, /* `s', 0x73 */
414 0x0100 | _LOWER, /* `t', 0x74 */
415 0x0100 | _LOWER, /* `u', 0x75 */
416 0x0100 | _LOWER, /* `v', 0x76 */
417 0x0100 | _LOWER, /* `w', 0x77 */
418 0x0100 | _LOWER, /* `x', 0x78 */
419 0x0100 | _LOWER, /* `y', 0x79 */
420 0x0100 | _LOWER, /* `z', 0x7a */
421 _PUNCT, /* `{', 0x7b */
422 _PUNCT, /* `|', 0x7c */
423 _PUNCT, /* `}', 0x7d */
424 _PUNCT, /* `~', 0x7e */
425 _CONTROL, /* 0x7f */
426 _CONTROL, /* 0x80 */
427 _CONTROL, /* 0x81 */
428 _CONTROL, /* 0x82 */
429 _CONTROL, /* 0x83 */
430 _CONTROL, /* 0x84 */
431 _CONTROL, /* 0x85 */
432 _CONTROL, /* 0x86 */
433 _CONTROL, /* 0x87 */
434 _CONTROL, /* 0x88 */
435 _CONTROL, /* 0x89 */
436 _CONTROL, /* 0x8a */
437 _CONTROL, /* 0x8b */
438 _CONTROL, /* 0x8c */
439 _CONTROL, /* 0x8d */
440 _CONTROL, /* 0x8e */
441 _CONTROL, /* 0x8f */
442 _CONTROL, /* 0x90 */
443 _CONTROL, /* 0x91 */
444 _CONTROL, /* 0x92 */
445 _CONTROL, /* 0x93 */
446 _CONTROL, /* 0x94 */
447 _CONTROL, /* 0x95 */
448 _CONTROL, /* 0x96 */
449 _CONTROL, /* 0x97 */
450 _CONTROL, /* 0x98 */
451 _CONTROL, /* 0x99 */
452 _CONTROL, /* 0x9a */
453 _CONTROL, /* 0x9b */
454 _CONTROL, /* 0x9c */
455 _CONTROL, /* 0x9d */
456 _CONTROL, /* 0x9e */
457 _CONTROL, /* 0x9f */
458 _BLANK | _SPACE, /* 0xa0 */
459 _PUNCT, /* 0xa1 */
460 _PUNCT, /* 0xa2 */
461 _PUNCT, /* 0xa3 */
462 _PUNCT, /* 0xa4 */
463 _PUNCT, /* 0xa5 */
464 _PUNCT, /* 0xa6 */
465 _PUNCT, /* 0xa7 */
466 _PUNCT, /* 0xa8 */
467 _PUNCT, /* 0xa9 */
468 _PUNCT, /* 0xaa */
469 _PUNCT, /* 0xab */
470 _PUNCT, /* 0xac */
471 _PUNCT, /* 0xad */
472 _PUNCT, /* 0xae */
473 _PUNCT, /* 0xaf */
474 _PUNCT, /* 0xb0 */
475 _PUNCT, /* 0xb1 */
476 _PUNCT | _DIGIT, /* 0xb2 */
477 _PUNCT | _DIGIT, /* 0xb3 */
478 _PUNCT, /* 0xb4 */
479 _PUNCT, /* 0xb5 */
480 _PUNCT, /* 0xb6 */
481 _PUNCT, /* 0xb7 */
482 _PUNCT, /* 0xb8 */
483 _PUNCT | _DIGIT, /* 0xb9 */
484 _PUNCT, /* 0xba */
485 _PUNCT, /* 0xbb */
486 _PUNCT, /* 0xbc */
487 _PUNCT, /* 0xbd */
488 _PUNCT, /* 0xbe */
489 _PUNCT, /* 0xbf */
490 0x0100 | _UPPER, /* 0xc0 */
491 0x0100 | _UPPER, /* 0xc1 */
492 0x0100 | _UPPER, /* 0xc2 */
493 0x0100 | _UPPER, /* 0xc3 */
494 0x0100 | _UPPER, /* 0xc4 */
495 0x0100 | _UPPER, /* 0xc5 */
496 0x0100 | _UPPER, /* 0xc6 */
497 0x0100 | _UPPER, /* 0xc7 */
498 0x0100 | _UPPER, /* 0xc8 */
499 0x0100 | _UPPER, /* 0xc9 */
500 0x0100 | _UPPER, /* 0xca */
501 0x0100 | _UPPER, /* 0xcb */
502 0x0100 | _UPPER, /* 0xcc */
503 0x0100 | _UPPER, /* 0xcd */
504 0x0100 | _UPPER, /* 0xce */
505 0x0100 | _UPPER, /* 0xcf */
506 0x0100 | _UPPER, /* 0xd0 */
507 0x0100 | _UPPER, /* 0xd1 */
508 0x0100 | _UPPER, /* 0xd2 */
509 0x0100 | _UPPER, /* 0xd3 */
510 0x0100 | _UPPER, /* 0xd4 */
511 0x0100 | _UPPER, /* 0xd5 */
512 0x0100 | _UPPER, /* 0xd6 */
513 _PUNCT, /* 0xd7 */
514 0x0100 | _UPPER, /* 0xd8 */
515 0x0100 | _UPPER, /* 0xd9 */
516 0x0100 | _UPPER, /* 0xda */
517 0x0100 | _UPPER, /* 0xdb */
518 0x0100 | _UPPER, /* 0xdc */
519 0x0100 | _UPPER, /* 0xdd */
520 0x0100 | _UPPER, /* 0xde */
521 0x0100 | _LOWER, /* 0xdf */
522 0x0100 | _LOWER, /* 0xe0 */
523 0x0100 | _LOWER, /* 0xe1 */
524 0x0100 | _LOWER, /* 0xe2 */
525 0x0100 | _LOWER, /* 0xe3 */
526 0x0100 | _LOWER, /* 0xe4 */
527 0x0100 | _LOWER, /* 0xe5 */
528 0x0100 | _LOWER, /* 0xe6 */
529 0x0100 | _LOWER, /* 0xe7 */
530 0x0100 | _LOWER, /* 0xe8 */
531 0x0100 | _LOWER, /* 0xe9 */
532 0x0100 | _LOWER, /* 0xea */
533 0x0100 | _LOWER, /* 0xeb */
534 0x0100 | _LOWER, /* 0xec */
535 0x0100 | _LOWER, /* 0xed */
536 0x0100 | _LOWER, /* 0xee */
537 0x0100 | _LOWER, /* 0xef */
538 0x0100 | _LOWER, /* 0xf0 */
539 0x0100 | _LOWER, /* 0xf1 */
540 0x0100 | _LOWER, /* 0xf2 */
541 0x0100 | _LOWER, /* 0xf3 */
542 0x0100 | _LOWER, /* 0xf4 */
543 0x0100 | _LOWER, /* 0xf5 */
544 0x0100 | _LOWER, /* 0xf6 */
545 _PUNCT, /* 0xf7 */
546 0x0100 | _LOWER, /* 0xf8 */
547 0x0100 | _LOWER, /* 0xf9 */
548 0x0100 | _LOWER, /* 0xfa */
549 0x0100 | _LOWER, /* 0xfb */
550 0x0100 | _LOWER, /* 0xfc */
551 0x0100 | _LOWER, /* 0xfd */
552 0x0100 | _LOWER, /* 0xfe */
553 0x0100 | _LOWER /* 0xff */
554 };
555
556 const unsigned short *_pctype = _ctype + 1;
557 const unsigned short *_pwctype = _wctype + 1;
558
559 extern const unsigned short wine_wctype_table[];
560
561 /*
562 * @implemented
563 */
564 const unsigned short **__p__pwctype(void)
565 {
566 return &_pwctype;
567 }
568
569 const unsigned short* __cdecl __pwctype_func(void)
570 {
571 return _pwctype;
572 }
573
574 #ifdef _LIBCNT_
575 int __cdecl _isctype (int c, int ctypeFlags)
576 {
577 return (_pctype[(unsigned char)(c & 0xFF)] & ctypeFlags);
578 }
579 #else
580 /*********************************************************************
581 * _isctype_l (MSVCRT.@)
582 */
583 int __cdecl _isctype_l(int c, int type, _locale_t locale)
584 {
585 MSVCRT_pthreadlocinfo locinfo;
586
587 if(!locale)
588 locinfo = get_locinfo();
589 else
590 locinfo = ((MSVCRT__locale_t)locale)->locinfo;
591
592 if (c >= -1 && c <= 255)
593 return locinfo->pctype[c] & type;
594
595 if (locinfo->mb_cur_max != 1 && c > 0)
596 {
597 /* FIXME: Is there a faster way to do this? */
598 WORD typeInfo;
599 char convert[3], *pconv = convert;
600
601 if (locinfo->pctype[(UINT)c >> 8] & _LEADBYTE)
602 *pconv++ = (UINT)c >> 8;
603 *pconv++ = c & 0xff;
604 *pconv = 0;
605
606 if (GetStringTypeExA(locinfo->lc_handle[LC_CTYPE],
607 CT_CTYPE1, convert, convert[1] ? 2 : 1, &typeInfo))
608 return typeInfo & type;
609 }
610 return 0;
611 }
612
613 int __cdecl _isctype (int c, int ctypeFlags)
614 {
615 return _isctype_l(c, ctypeFlags, NULL);
616 }
617 #endif /* _LIBCNT_ */
618
619 /*
620 * @implemented
621 */
622 int isalpha(int c)
623 {
624 return(_isctype(c, _ALPHA));
625 }
626
627 /*
628 * @implemented
629 */
630 int isalnum(int c)
631 {
632 return(_isctype(c, _ALPHA | _DIGIT));
633 }
634
635 /*
636 * @implemented
637 */
638 int iswalnum(wint_t c)
639 {
640 return iswctype(c, _ALPHA | _DIGIT);
641 }
642
643 /*
644 * @implemented
645 */
646 int __isascii(int c)
647 {
648 return ((unsigned char)c <= 0x7f);
649 }
650
651 /*
652 * @implemented
653 */
654 int iswascii(wint_t c)
655 {
656 return __isascii(c);
657 }
658
659 /*
660 * @implemented
661 */
662 int iscntrl(int c)
663 {
664 return(_isctype(c, _CONTROL));
665 }
666
667 /*
668 * @implemented
669 */
670 int __iscsym(int c)
671 {
672 return (c < 127 && (isalnum(c) || (c == '_')));
673 }
674
675 /*
676 * @implemented
677 */
678 int __iscsymf(int c)
679 {
680 return (c < 127 && (isalpha(c) || (c == '_')));
681 }
682
683 /*
684 * @implemented
685 */
686 int isdigit(int c)
687 {
688 return(_isctype(c, _DIGIT));
689 }
690
691 /*
692 * @implemented
693 */
694 int isgraph(int c)
695 {
696 return (_isctype (c, _PUNCT | _ALPHA | _DIGIT));
697 }
698
699 /*
700 * @implemented
701 */
702 int islower(int c)
703 {
704 return (_isctype (c, _LOWER));
705 }
706
707 /*
708 * @implemented
709 */
710 int isprint(int c)
711 {
712 return (_isctype (c, _BLANK | _PUNCT | _ALPHA | _DIGIT));
713 }
714
715 /*
716 * @implemented
717 */
718 int ispunct(int c)
719 {
720 return (_isctype (c, _PUNCT));
721 }
722
723 /*
724 * @implemented
725 */
726 int isspace(int c)
727 {
728 return (_isctype (c, _SPACE));
729 }
730
731 /*
732 * @implemented
733 */
734 int isupper(int c)
735 {
736 return (_isctype (c, _UPPER));
737 }
738
739 /*
740 * @implemented
741 */
742 int isxdigit(int c)
743 {
744 return (_isctype (c, _HEX));
745 }
746
747
748 /*
749 * @implemented
750 */
751 int iswalpha(wint_t c)
752 {
753 return (iswctype (c, _ALPHA));
754 }
755
756 /*
757 * @implemented
758 */
759 int iswcntrl(wint_t c)
760 {
761 return iswctype(c, _CONTROL);
762 }
763
764 /*
765 * @implemented
766 */
767 int iswdigit(wint_t c)
768 {
769 return (iswctype (c, _DIGIT));
770 }
771
772 /*
773 * @implemented
774 */
775 int iswgraph(wint_t c)
776 {
777 return iswctype(c,_PUNCT | _ALPHA | _DIGIT);
778 }
779
780 /*
781 * @implemented
782 */
783 int iswprint(wint_t c)
784 {
785 return iswctype((unsigned short)c,_BLANK | _PUNCT | _ALPHA | _DIGIT);
786 }
787
788
789 /*
790 * @implemented
791 */
792 int iswpunct(wint_t c)
793 {
794 return iswctype(c, _PUNCT);
795 }
796
797 /*
798 * @implemented
799 */
800 int iswlower(wint_t c)
801 {
802 return (iswctype (c, _LOWER));
803 }
804
805 /*
806 * @implemented
807 */
808 int iswupper(wint_t c)
809 {
810 return iswctype(c, _UPPER);
811 }
812
813
814 /*
815 * @implemented
816 */
817 int iswspace(wint_t c)
818 {
819 return (iswctype (c, _SPACE));
820 }
821
822 /*
823 * @implemented
824 */
825 int iswxdigit(wint_t c)
826 {
827 return (iswctype (c, _HEX));
828 }
829
830
831 /*
832 * @implemented
833 */
834 int __toascii(int c)
835 {
836 return((unsigned int)(c) & 0x7f);
837 }
838
839 /*
840 * @implemented
841 */
842 int _tolower(int c)
843 {
844 if (_isctype (c, _UPPER))
845 return (c - upalpha);
846 return(c);
847 }
848
849 /*
850 * @implemented
851 */
852 int _toupper(int c)
853 {
854 if (_isctype (c, _LOWER))
855 return (c + upalpha);
856 return(c);
857 }
858
859 /*
860 * @implemented
861 */
862 int tolower(int c)
863 {
864 if (_isctype (c, _UPPER))
865 return (c - upalpha);
866 return(c);
867 }
868
869 /*
870 * @implemented
871 */
872 int toupper(int c)
873 {
874 if (_isctype (c, _LOWER))
875 return (c + upalpha);
876 return(c);
877 }
878
879 /*
880 * @implemented
881 */
882 wint_t towlower(wint_t c)
883 {
884 if (iswctype (c, _UPPER))
885 return (c - upalpha);
886 return(c);
887 }
888
889 /*
890 * @implemented
891 */
892 wint_t towupper(wint_t c)
893 {
894 if (iswctype (c, _LOWER))
895 return (c + upalpha);
896 return(c);
897 }
898
899 /* EOF */
A free Windows-compatible Operating System