| 1 | /* Character handling in C locale.
|
|---|
| 2 |
|
|---|
| 3 | These functions work like the corresponding functions in <ctype.h>,
|
|---|
| 4 | except that they have the C (POSIX) locale hardwired, whereas the
|
|---|
| 5 | <ctype.h> functions' behaviour depends on the current locale set via
|
|---|
| 6 | setlocale.
|
|---|
| 7 |
|
|---|
| 8 | Copyright (C) 2000-2003, 2006, 2008-2012 Free Software Foundation, Inc.
|
|---|
| 9 |
|
|---|
| 10 | This program is free software; you can redistribute it and/or modify
|
|---|
| 11 | it under the terms of the GNU General Public License as published by
|
|---|
| 12 | the Free Software Foundation; either version 3 of the License, or
|
|---|
| 13 | (at your option) any later version.
|
|---|
| 14 |
|
|---|
| 15 | This program is distributed in the hope that it will be useful,
|
|---|
| 16 | but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|---|
| 17 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|---|
| 18 | GNU General Public License for more details.
|
|---|
| 19 |
|
|---|
| 20 | You should have received a copy of the GNU General Public License
|
|---|
| 21 | along with this program; if not, see <http://www.gnu.org/licenses/>. */
|
|---|
| 22 |
|
|---|
| 23 | #ifndef C_CTYPE_H
|
|---|
| 24 | #define C_CTYPE_H
|
|---|
| 25 |
|
|---|
| 26 | #include <stdbool.h>
|
|---|
| 27 |
|
|---|
| 28 |
|
|---|
| 29 | #ifdef __cplusplus
|
|---|
| 30 | extern "C" {
|
|---|
| 31 | #endif
|
|---|
| 32 |
|
|---|
| 33 |
|
|---|
| 34 | /* The functions defined in this file assume the "C" locale and a character
|
|---|
| 35 | set without diacritics (ASCII-US or EBCDIC-US or something like that).
|
|---|
| 36 | Even if the "C" locale on a particular system is an extension of the ASCII
|
|---|
| 37 | character set (like on BeOS, where it is UTF-8, or on AmigaOS, where it
|
|---|
| 38 | is ISO-8859-1), the functions in this file recognize only the ASCII
|
|---|
| 39 | characters. */
|
|---|
| 40 |
|
|---|
| 41 |
|
|---|
| 42 | /* Check whether the ASCII optimizations apply. */
|
|---|
| 43 |
|
|---|
| 44 | /* ANSI C89 (and ISO C99 5.2.1.3 too) already guarantees that
|
|---|
| 45 | '0', '1', ..., '9' have consecutive integer values. */
|
|---|
| 46 | #define C_CTYPE_CONSECUTIVE_DIGITS 1
|
|---|
| 47 |
|
|---|
| 48 | #if ('A' <= 'Z') \
|
|---|
| 49 | && ('A' + 1 == 'B') && ('B' + 1 == 'C') && ('C' + 1 == 'D') \
|
|---|
| 50 | && ('D' + 1 == 'E') && ('E' + 1 == 'F') && ('F' + 1 == 'G') \
|
|---|
| 51 | && ('G' + 1 == 'H') && ('H' + 1 == 'I') && ('I' + 1 == 'J') \
|
|---|
| 52 | && ('J' + 1 == 'K') && ('K' + 1 == 'L') && ('L' + 1 == 'M') \
|
|---|
| 53 | && ('M' + 1 == 'N') && ('N' + 1 == 'O') && ('O' + 1 == 'P') \
|
|---|
| 54 | && ('P' + 1 == 'Q') && ('Q' + 1 == 'R') && ('R' + 1 == 'S') \
|
|---|
| 55 | && ('S' + 1 == 'T') && ('T' + 1 == 'U') && ('U' + 1 == 'V') \
|
|---|
| 56 | && ('V' + 1 == 'W') && ('W' + 1 == 'X') && ('X' + 1 == 'Y') \
|
|---|
| 57 | && ('Y' + 1 == 'Z')
|
|---|
| 58 | #define C_CTYPE_CONSECUTIVE_UPPERCASE 1
|
|---|
| 59 | #endif
|
|---|
| 60 |
|
|---|
| 61 | #if ('a' <= 'z') \
|
|---|
| 62 | && ('a' + 1 == 'b') && ('b' + 1 == 'c') && ('c' + 1 == 'd') \
|
|---|
| 63 | && ('d' + 1 == 'e') && ('e' + 1 == 'f') && ('f' + 1 == 'g') \
|
|---|
| 64 | && ('g' + 1 == 'h') && ('h' + 1 == 'i') && ('i' + 1 == 'j') \
|
|---|
| 65 | && ('j' + 1 == 'k') && ('k' + 1 == 'l') && ('l' + 1 == 'm') \
|
|---|
| 66 | && ('m' + 1 == 'n') && ('n' + 1 == 'o') && ('o' + 1 == 'p') \
|
|---|
| 67 | && ('p' + 1 == 'q') && ('q' + 1 == 'r') && ('r' + 1 == 's') \
|
|---|
| 68 | && ('s' + 1 == 't') && ('t' + 1 == 'u') && ('u' + 1 == 'v') \
|
|---|
| 69 | && ('v' + 1 == 'w') && ('w' + 1 == 'x') && ('x' + 1 == 'y') \
|
|---|
| 70 | && ('y' + 1 == 'z')
|
|---|
| 71 | #define C_CTYPE_CONSECUTIVE_LOWERCASE 1
|
|---|
| 72 | #endif
|
|---|
| 73 |
|
|---|
| 74 | #if (' ' == 32) && ('!' == 33) && ('"' == 34) && ('#' == 35) \
|
|---|
| 75 | && ('%' == 37) && ('&' == 38) && ('\'' == 39) && ('(' == 40) \
|
|---|
| 76 | && (')' == 41) && ('*' == 42) && ('+' == 43) && (',' == 44) \
|
|---|
| 77 | && ('-' == 45) && ('.' == 46) && ('/' == 47) && ('0' == 48) \
|
|---|
| 78 | && ('1' == 49) && ('2' == 50) && ('3' == 51) && ('4' == 52) \
|
|---|
| 79 | && ('5' == 53) && ('6' == 54) && ('7' == 55) && ('8' == 56) \
|
|---|
| 80 | && ('9' == 57) && (':' == 58) && (';' == 59) && ('<' == 60) \
|
|---|
| 81 | && ('=' == 61) && ('>' == 62) && ('?' == 63) && ('A' == 65) \
|
|---|
| 82 | && ('B' == 66) && ('C' == 67) && ('D' == 68) && ('E' == 69) \
|
|---|
| 83 | && ('F' == 70) && ('G' == 71) && ('H' == 72) && ('I' == 73) \
|
|---|
| 84 | && ('J' == 74) && ('K' == 75) && ('L' == 76) && ('M' == 77) \
|
|---|
| 85 | && ('N' == 78) && ('O' == 79) && ('P' == 80) && ('Q' == 81) \
|
|---|
| 86 | && ('R' == 82) && ('S' == 83) && ('T' == 84) && ('U' == 85) \
|
|---|
| 87 | && ('V' == 86) && ('W' == 87) && ('X' == 88) && ('Y' == 89) \
|
|---|
| 88 | && ('Z' == 90) && ('[' == 91) && ('\\' == 92) && (']' == 93) \
|
|---|
| 89 | && ('^' == 94) && ('_' == 95) && ('a' == 97) && ('b' == 98) \
|
|---|
| 90 | && ('c' == 99) && ('d' == 100) && ('e' == 101) && ('f' == 102) \
|
|---|
| 91 | && ('g' == 103) && ('h' == 104) && ('i' == 105) && ('j' == 106) \
|
|---|
| 92 | && ('k' == 107) && ('l' == 108) && ('m' == 109) && ('n' == 110) \
|
|---|
| 93 | && ('o' == 111) && ('p' == 112) && ('q' == 113) && ('r' == 114) \
|
|---|
| 94 | && ('s' == 115) && ('t' == 116) && ('u' == 117) && ('v' == 118) \
|
|---|
| 95 | && ('w' == 119) && ('x' == 120) && ('y' == 121) && ('z' == 122) \
|
|---|
| 96 | && ('{' == 123) && ('|' == 124) && ('}' == 125) && ('~' == 126)
|
|---|
| 97 | /* The character set is ASCII or one of its variants or extensions, not EBCDIC.
|
|---|
| 98 | Testing the value of '\n' and '\r' is not relevant. */
|
|---|
| 99 | #define C_CTYPE_ASCII 1
|
|---|
| 100 | #endif
|
|---|
| 101 |
|
|---|
| 102 |
|
|---|
| 103 | /* Function declarations. */
|
|---|
| 104 |
|
|---|
| 105 | /* Unlike the functions in <ctype.h>, which require an argument in the range
|
|---|
| 106 | of the 'unsigned char' type, the functions here operate on values that are
|
|---|
| 107 | in the 'unsigned char' range or in the 'char' range. In other words,
|
|---|
| 108 | when you have a 'char' value, you need to cast it before using it as
|
|---|
| 109 | argument to a <ctype.h> function:
|
|---|
| 110 |
|
|---|
| 111 | const char *s = ...;
|
|---|
| 112 | if (isalpha ((unsigned char) *s)) ...
|
|---|
| 113 |
|
|---|
| 114 | but you don't need to cast it for the functions defined in this file:
|
|---|
| 115 |
|
|---|
| 116 | const char *s = ...;
|
|---|
| 117 | if (c_isalpha (*s)) ...
|
|---|
| 118 | */
|
|---|
| 119 |
|
|---|
| 120 | extern bool c_isascii (int c) _GL_ATTRIBUTE_CONST; /* not locale dependent */
|
|---|
| 121 |
|
|---|
| 122 | extern bool c_isalnum (int c) _GL_ATTRIBUTE_CONST;
|
|---|
| 123 | extern bool c_isalpha (int c) _GL_ATTRIBUTE_CONST;
|
|---|
| 124 | extern bool c_isblank (int c) _GL_ATTRIBUTE_CONST;
|
|---|
| 125 | extern bool c_iscntrl (int c) _GL_ATTRIBUTE_CONST;
|
|---|
| 126 | extern bool c_isdigit (int c) _GL_ATTRIBUTE_CONST;
|
|---|
| 127 | extern bool c_islower (int c) _GL_ATTRIBUTE_CONST;
|
|---|
| 128 | extern bool c_isgraph (int c) _GL_ATTRIBUTE_CONST;
|
|---|
| 129 | extern bool c_isprint (int c) _GL_ATTRIBUTE_CONST;
|
|---|
| 130 | extern bool c_ispunct (int c) _GL_ATTRIBUTE_CONST;
|
|---|
| 131 | extern bool c_isspace (int c) _GL_ATTRIBUTE_CONST;
|
|---|
| 132 | extern bool c_isupper (int c) _GL_ATTRIBUTE_CONST;
|
|---|
| 133 | extern bool c_isxdigit (int c) _GL_ATTRIBUTE_CONST;
|
|---|
| 134 |
|
|---|
| 135 | extern int c_tolower (int c) _GL_ATTRIBUTE_CONST;
|
|---|
| 136 | extern int c_toupper (int c) _GL_ATTRIBUTE_CONST;
|
|---|
| 137 |
|
|---|
| 138 |
|
|---|
| 139 | #if defined __GNUC__ && defined __OPTIMIZE__ && !defined __OPTIMIZE_SIZE__ && !defined NO_C_CTYPE_MACROS
|
|---|
| 140 |
|
|---|
| 141 | /* ASCII optimizations. */
|
|---|
| 142 |
|
|---|
| 143 | #undef c_isascii
|
|---|
| 144 | #define c_isascii(c) \
|
|---|
| 145 | ({ int __c = (c); \
|
|---|
| 146 | (__c >= 0x00 && __c <= 0x7f); \
|
|---|
| 147 | })
|
|---|
| 148 |
|
|---|
| 149 | #if C_CTYPE_CONSECUTIVE_DIGITS \
|
|---|
| 150 | && C_CTYPE_CONSECUTIVE_UPPERCASE && C_CTYPE_CONSECUTIVE_LOWERCASE
|
|---|
| 151 | #if C_CTYPE_ASCII
|
|---|
| 152 | #undef c_isalnum
|
|---|
| 153 | #define c_isalnum(c) \
|
|---|
| 154 | ({ int __c = (c); \
|
|---|
| 155 | ((__c >= '0' && __c <= '9') \
|
|---|
| 156 | || ((__c & ~0x20) >= 'A' && (__c & ~0x20) <= 'Z')); \
|
|---|
| 157 | })
|
|---|
| 158 | #else
|
|---|
| 159 | #undef c_isalnum
|
|---|
| 160 | #define c_isalnum(c) \
|
|---|
| 161 | ({ int __c = (c); \
|
|---|
| 162 | ((__c >= '0' && __c <= '9') \
|
|---|
| 163 | || (__c >= 'A' && __c <= 'Z') \
|
|---|
| 164 | || (__c >= 'a' && __c <= 'z')); \
|
|---|
| 165 | })
|
|---|
| 166 | #endif
|
|---|
| 167 | #endif
|
|---|
| 168 |
|
|---|
| 169 | #if C_CTYPE_CONSECUTIVE_UPPERCASE && C_CTYPE_CONSECUTIVE_LOWERCASE
|
|---|
| 170 | #if C_CTYPE_ASCII
|
|---|
| 171 | #undef c_isalpha
|
|---|
| 172 | #define c_isalpha(c) \
|
|---|
| 173 | ({ int __c = (c); \
|
|---|
| 174 | ((__c & ~0x20) >= 'A' && (__c & ~0x20) <= 'Z'); \
|
|---|
| 175 | })
|
|---|
| 176 | #else
|
|---|
| 177 | #undef c_isalpha
|
|---|
| 178 | #define c_isalpha(c) \
|
|---|
| 179 | ({ int __c = (c); \
|
|---|
| 180 | ((__c >= 'A' && __c <= 'Z') || (__c >= 'a' && __c <= 'z')); \
|
|---|
| 181 | })
|
|---|
| 182 | #endif
|
|---|
| 183 | #endif
|
|---|
| 184 |
|
|---|
| 185 | #undef c_isblank
|
|---|
| 186 | #define c_isblank(c) \
|
|---|
| 187 | ({ int __c = (c); \
|
|---|
| 188 | (__c == ' ' || __c == '\t'); \
|
|---|
| 189 | })
|
|---|
| 190 |
|
|---|
| 191 | #if C_CTYPE_ASCII
|
|---|
| 192 | #undef c_iscntrl
|
|---|
| 193 | #define c_iscntrl(c) \
|
|---|
| 194 | ({ int __c = (c); \
|
|---|
| 195 | ((__c & ~0x1f) == 0 || __c == 0x7f); \
|
|---|
| 196 | })
|
|---|
| 197 | #endif
|
|---|
| 198 |
|
|---|
| 199 | #if C_CTYPE_CONSECUTIVE_DIGITS
|
|---|
| 200 | #undef c_isdigit
|
|---|
| 201 | #define c_isdigit(c) \
|
|---|
| 202 | ({ int __c = (c); \
|
|---|
| 203 | (__c >= '0' && __c <= '9'); \
|
|---|
| 204 | })
|
|---|
| 205 | #endif
|
|---|
| 206 |
|
|---|
| 207 | #if C_CTYPE_CONSECUTIVE_LOWERCASE
|
|---|
| 208 | #undef c_islower
|
|---|
| 209 | #define c_islower(c) \
|
|---|
| 210 | ({ int __c = (c); \
|
|---|
| 211 | (__c >= 'a' && __c <= 'z'); \
|
|---|
| 212 | })
|
|---|
| 213 | #endif
|
|---|
| 214 |
|
|---|
| 215 | #if C_CTYPE_ASCII
|
|---|
| 216 | #undef c_isgraph
|
|---|
| 217 | #define c_isgraph(c) \
|
|---|
| 218 | ({ int __c = (c); \
|
|---|
| 219 | (__c >= '!' && __c <= '~'); \
|
|---|
| 220 | })
|
|---|
| 221 | #endif
|
|---|
| 222 |
|
|---|
| 223 | #if C_CTYPE_ASCII
|
|---|
| 224 | #undef c_isprint
|
|---|
| 225 | #define c_isprint(c) \
|
|---|
| 226 | ({ int __c = (c); \
|
|---|
| 227 | (__c >= ' ' && __c <= '~'); \
|
|---|
| 228 | })
|
|---|
| 229 | #endif
|
|---|
| 230 |
|
|---|
| 231 | #if C_CTYPE_ASCII
|
|---|
| 232 | #undef c_ispunct
|
|---|
| 233 | #define c_ispunct(c) \
|
|---|
| 234 | ({ int _c = (c); \
|
|---|
| 235 | (c_isgraph (_c) && ! c_isalnum (_c)); \
|
|---|
| 236 | })
|
|---|
| 237 | #endif
|
|---|
| 238 |
|
|---|
| 239 | #undef c_isspace
|
|---|
| 240 | #define c_isspace(c) \
|
|---|
| 241 | ({ int __c = (c); \
|
|---|
| 242 | (__c == ' ' || __c == '\t' \
|
|---|
| 243 | || __c == '\n' || __c == '\v' || __c == '\f' || __c == '\r'); \
|
|---|
| 244 | })
|
|---|
| 245 |
|
|---|
| 246 | #if C_CTYPE_CONSECUTIVE_UPPERCASE
|
|---|
| 247 | #undef c_isupper
|
|---|
| 248 | #define c_isupper(c) \
|
|---|
| 249 | ({ int __c = (c); \
|
|---|
| 250 | (__c >= 'A' && __c <= 'Z'); \
|
|---|
| 251 | })
|
|---|
| 252 | #endif
|
|---|
| 253 |
|
|---|
| 254 | #if C_CTYPE_CONSECUTIVE_DIGITS \
|
|---|
| 255 | && C_CTYPE_CONSECUTIVE_UPPERCASE && C_CTYPE_CONSECUTIVE_LOWERCASE
|
|---|
| 256 | #if C_CTYPE_ASCII
|
|---|
| 257 | #undef c_isxdigit
|
|---|
| 258 | #define c_isxdigit(c) \
|
|---|
| 259 | ({ int __c = (c); \
|
|---|
| 260 | ((__c >= '0' && __c <= '9') \
|
|---|
| 261 | || ((__c & ~0x20) >= 'A' && (__c & ~0x20) <= 'F')); \
|
|---|
| 262 | })
|
|---|
| 263 | #else
|
|---|
| 264 | #undef c_isxdigit
|
|---|
| 265 | #define c_isxdigit(c) \
|
|---|
| 266 | ({ int __c = (c); \
|
|---|
| 267 | ((__c >= '0' && __c <= '9') \
|
|---|
| 268 | || (__c >= 'A' && __c <= 'F') \
|
|---|
| 269 | || (__c >= 'a' && __c <= 'f')); \
|
|---|
| 270 | })
|
|---|
| 271 | #endif
|
|---|
| 272 | #endif
|
|---|
| 273 |
|
|---|
| 274 | #if C_CTYPE_CONSECUTIVE_UPPERCASE && C_CTYPE_CONSECUTIVE_LOWERCASE
|
|---|
| 275 | #undef c_tolower
|
|---|
| 276 | #define c_tolower(c) \
|
|---|
| 277 | ({ int __c = (c); \
|
|---|
| 278 | (__c >= 'A' && __c <= 'Z' ? __c - 'A' + 'a' : __c); \
|
|---|
| 279 | })
|
|---|
| 280 | #undef c_toupper
|
|---|
| 281 | #define c_toupper(c) \
|
|---|
| 282 | ({ int __c = (c); \
|
|---|
| 283 | (__c >= 'a' && __c <= 'z' ? __c - 'a' + 'A' : __c); \
|
|---|
| 284 | })
|
|---|
| 285 | #endif
|
|---|
| 286 |
|
|---|
| 287 | #endif /* optimizing for speed */
|
|---|
| 288 |
|
|---|
| 289 |
|
|---|
| 290 | #ifdef __cplusplus
|
|---|
| 291 | }
|
|---|
| 292 | #endif
|
|---|
| 293 |
|
|---|
| 294 | #endif /* C_CTYPE_H */
|
|---|