1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
|
/* Copyright (C) 2002 Manuel Novoa III
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2.1 of the License, or (at your option) any later version.
*
* The GNU C Library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with the GNU C Library; if not, write to the Free
* Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
* 02111-1307 USA.
*/
/* ATTENTION! ATTENTION! ATTENTION! ATTENTION! ATTENTION!
*
* Besides uClibc, I'm using this code in my libc for elks, which is
* a 16-bit environment with a fairly limited compiler. It would make
* things much easier for me if this file isn't modified unnecessarily.
* In particular, please put any new or replacement functions somewhere
* else, and modify the makefile to use your version instead.
* Thanks. Manuel
*
* ATTENTION! ATTENTION! ATTENTION! ATTENTION! ATTENTION! */
#if !defined(_CTYPE_H) && !defined(_WCTYPE_H)
#error Always include <{w}ctype.h> rather than <bits/uClibc_ctype.h>
#endif
#ifndef _BITS_CTYPE_H
#define _BITS_CTYPE_H
#ifdef __UCLIBC_GEN_LOCALE
/* Taking advantage of the C99 mutual-exclusion guarantees for the various
* (w)ctype classes, including the descriptions of printing and control
* (w)chars, we can place each in one of the following mutually-exlusive
* subsets. Since there are less than 16, we can store the data for
* each (w)chars in a nibble. In contrast, glibc uses an unsigned int
* per (w)char, with one bit flag for each is* type. While this allows
* a simple '&' operation to determine the type vs. a range test and a
* little special handling for the "blank" and "xdigit" types in my
* approach, it also uses 8 times the space for the tables on the typical
* 32-bit archs we supported.*/
enum {
__CTYPE_unclassified = 0,
__CTYPE_alpha_nonupper_nonlower,
__CTYPE_alpha_lower,
__CTYPE_alpha_upper_lower,
__CTYPE_alpha_upper,
__CTYPE_digit,
__CTYPE_punct,
__CTYPE_graph,
__CTYPE_print_space_nonblank,
__CTYPE_print_space_blank,
__CTYPE_space_nonblank_noncntrl,
__CTYPE_space_blank_noncntrl,
__CTYPE_cntrl_space_nonblank,
__CTYPE_cntrl_space_blank,
__CTYPE_cntrl_nonspace
};
/* Some macros that test for various (w)ctype classes when passed one of the
* designator values enumerated above. */
#define __CTYPE_isalnum(D) ((unsigned int)(D-1) <= (__CTYPE_digit-1))
#define __CTYPE_isalpha(D) ((unsigned int)(D-1) <= (__CTYPE_alpha_upper-1))
#define __CTYPE_isblank(D) \
((((unsigned int)(D - __CTYPE_print_space_nonblank)) <= 5) && (D & 1))
#define __CTYPE_iscntrl(D) (((unsigned int)(D - __CTYPE_cntrl_space_nonblank)) <= 2)
#define __CTYPE_isdigit(D) (D == __CTYPE_digit)
#define __CTYPE_isgraph(D) ((unsigned int)(D-1) <= (__CTYPE_graph-1))
#define __CTYPE_islower(D) (((unsigned int)(D - __CTYPE_alpha_lower)) <= 1)
#define __CTYPE_isprint(D) ((unsigned int)(D-1) <= (__CTYPE_print_space_blank-1))
#define __CTYPE_ispunct(D) (D == __CTYPE_punct)
#define __CTYPE_isspace(D) (((unsigned int)(D - __CTYPE_print_space_nonblank)) <= 5)
#define __CTYPE_isupper(D) (((unsigned int)(D - __CTYPE_alpha_upper_lower)) <= 1)
/* #define __CTYPE_isxdigit(D) -- isxdigit is untestable this way.
* But that's ok as isxdigit() (and isdigit() too) are locale-invariant. */
#else /* __UCLIBC_GEN_LOCALE *****************************************/
/* Define some ctype macros valid for the C/POSIX locale. */
/* ASCII ords of \t, \f, \n, \r, and \v are 9, 12, 10, 13, 11 respectively. */
#define __C_isspace(c) \
((sizeof(c) == sizeof(char)) \
? ((((c) == ' ') || (((unsigned char)((c) - 9)) <= (13 - 9)))) \
: ((((c) == ' ') || (((unsigned int)((c) - 9)) <= (13 - 9)))))
#define __C_isblank(c) (((c) == ' ') || ((c) == '\t'))
#define __C_isdigit(c) \
((sizeof(c) == sizeof(char)) \
? (((unsigned char)((c) - '0')) < 10) \
: (((unsigned int)((c) - '0')) < 10))
#define __C_isxdigit(c) \
(__C_isdigit(c) \
|| ((sizeof(c) == sizeof(char)) \
? (((unsigned char)((((c)) | 0x20) - 'a')) < 6) \
: (((unsigned int)((((c)) | 0x20) - 'a')) < 6)))
#define __C_iscntrl(c) \
((sizeof(c) == sizeof(char)) \
? ((((unsigned char)(c)) < 0x20) || ((c) == 0x7f)) \
: ((((unsigned int)(c)) < 0x20) || ((c) == 0x7f)))
#define __C_isalpha(c) \
((sizeof(c) == sizeof(char)) \
? (((unsigned char)(((c) | 0x20) - 'a')) < 26) \
: (((unsigned int)(((c) | 0x20) - 'a')) < 26))
#define __C_isalnum(c) (__C_isalpha(c) || __C_isdigit(c))
#define __C_isprint(c) \
((sizeof(c) == sizeof(char)) \
? (((unsigned char)((c) - 0x20)) <= (0x7e - 0x20)) \
: (((unsigned int)((c) - 0x20)) <= (0x7e - 0x20)))
#define __C_islower(c) \
((sizeof(c) == sizeof(char)) \
? (((unsigned char)((c) - 'a')) < 26) \
: (((unsigned int)((c) - 'a')) < 26))
#define __C_isupper(c) \
((sizeof(c) == sizeof(char)) \
? (((unsigned char)((c) - 'A')) < 26) \
: (((unsigned int)((c) - 'A')) < 26))
#define __C_ispunct(c) \
((!__C_isalnum(c)) \
&& ((sizeof(c) == sizeof(char)) \
? (((unsigned char)((c) - 0x21)) <= (0x7e - 0x21)) \
: (((unsigned int)((c) - 0x21)) <= (0x7e - 0x21))))
#define __C_isgraph(c) \
((sizeof(c) == sizeof(char)) \
? (((unsigned int)((c) - 0x21)) <= (0x7e - 0x21)) \
: (((unsigned int)((c) - 0x21)) <= (0x7e - 0x21)))
#define __C_tolower(c) (__C_isupper(c) ? ((c) | 0x20) : (c))
#define __C_toupper(c) (__C_islower(c) ? ((c) ^ 0x20) : (c))
/**********************************************************************/
__BEGIN_DECLS
extern int isalnum(int c) __THROW;
extern int isalpha(int c) __THROW;
#ifdef __USE_ISOC99
extern int isblank(int c) __THROW;
#endif
extern int iscntrl(int c) __THROW;
extern int isdigit(int c) __THROW;
extern int isgraph(int c) __THROW;
extern int islower(int c) __THROW;
extern int isprint(int c) __THROW;
extern int ispunct(int c) __THROW;
extern int isspace(int c) __THROW;
extern int isupper(int c) __THROW;
extern int isxdigit(int c) __THROW;
extern int tolower(int c) __THROW;
extern int toupper(int c) __THROW;
#if defined __USE_SVID || defined __USE_MISC || defined __USE_XOPEN
extern int isascii(int c) __THROW;
extern int toascii(int c) __THROW;
#endif
#if defined _LIBC && (defined NOT_IN_libc || defined IS_IN_libc)
/* isdigit() is really locale-invariant, so provide some small fast macros.
* These are uClibc-specific. */
#define __isdigit_char(C) (((unsigned char)((C) - '0')) <= 9)
#define __isdigit_int(C) (((unsigned int)((C) - '0')) <= 9)
#endif
/* Next, some ctype macros which are valid for all supported locales. */
/* WARNING: isspace and isblank need to be reverified if more 8-bit codesets
* are added!!! But isdigit and isxdigit are always valid. */
/* #define __isspace(c) __C_isspace(c) */
/* #define __isblank(c) __C_isblank(c) */
/* #define __isdigit(c) __C_isdigit(c) */
/* #define __isxdigit(c) __C_isxdigit(c) */
/* Now some non-ansi/iso c99 macros. */
#define __isascii(c) (((c) & ~0x7f) == 0)
#define __toascii(c) ((c) & 0x7f)
#define _toupper(c) ((c) ^ 0x20)
#define _tolower(c) ((c) | 0x20)
__END_DECLS
/**********************************************************************/
#ifdef __GNUC__
#define __isbody_C_macro(f,args) __C_ ## f args
#define __isbody(f,c) \
(__extension__ ({ \
int __res; \
if (sizeof(c) > sizeof(char)) { \
int __c = (c); \
__res = __isbody_C_macro(f,(__c)); \
} else { \
unsigned char __c = (c); \
__res = __isbody_C_macro(f,(__c)); \
} \
__res; \
}))
#define __body_C_macro(f,args) __C_ ## f args
#define __body(f,c) \
(__extension__ ({ \
int __res; \
if (sizeof(c) > sizeof(char)) { \
int __c = (c); \
__res = __body_C_macro(f,(__c)); \
} else { \
unsigned char __c = (c); \
__res = __body_C_macro(f,(__c)); \
} \
__res; \
}))
#define __isspace(c) __body(isspace,c)
#define __isblank(c) __body(isblank,c)
#define __isdigit(c) __body(isdigit,c)
#define __isxdigit(c) __body(isxdigit,c)
#define __iscntrl(c) __body(iscntrl,c)
#define __isalpha(c) __body(isalpha,c)
#define __isalnum(c) __body(isalnum,c)
#define __isprint(c) __body(isprint,c)
#define __islower(c) __body(islower,c)
#define __isupper(c) __body(isupper,c)
#define __ispunct(c) __body(ispunct,c)
#define __isgraph(c) __body(isgraph,c)
#define __tolower(c) __body(tolower,c)
#define __toupper(c) __body(toupper,c)
#if !defined __NO_CTYPE && !defined __cplusplus
#define isspace(c) __isspace(c)
#define isblank(c) __isblank(c)
#define isdigit(c) __isdigit(c)
#define isxdigit(c) __isxdigit(c)
#define iscntrl(c) __iscntrl(c)
#define isalpha(c) __isalpha(c)
#define isalnum(c) __isalnum(c)
#define isprint(c) __isprint(c)
#define islower(c) __islower(c)
#define isupper(c) __isupper(c)
#define ispunct(c) __ispunct(c)
#define isgraph(c) __isgraph(c)
#define tolower(c) __tolower(c)
#define toupper(c) __toupper(c)
#endif
#else /* _GNUC__ ***************************************************/
#if !defined __NO_CTYPE && !defined __cplusplus
/* These macros should be safe from side effects. */
#define isdigit(c) __C_isdigit(c)
#define isalpha(c) __C_isalpha(c)
#define isprint(c) __C_isprint(c)
#define islower(c) __C_islower(c)
#define isupper(c) __C_isupper(c)
#define isgraph(c) __C_isgraph(c)
#endif
#endif /* __GNUC__ */
/**********************************************************************/
#endif /* __UCLIBC_GEN_LOCALE */
#endif /* _BITS_CTYPE_H */
|
