lib/c-ctype.h

   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 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 2 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, write to the Free Software
  22 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
  23
  24 #ifndef C_CTYPE_H
  25 #define C_CTYPE_H
  26
  27 #include <stdbool.h>
  28
  29
  30 /* Check whether the ASCII optimizations apply. */
  31
  32 /* ANSI C89 (and ISO C99 5.2.1.3 too) already guarantees that
  33    '0', '1', ..., '9' have consecutive integer values.  */
  34 #define C_CTYPE_CONSECUTIVE_DIGITS 1
  35
  36 #if ('A' <= 'Z') \
  37     && ('A' + 1 == 'B') && ('B' + 1 == 'C') && ('C' + 1 == 'D') \
  38     && ('D' + 1 == 'E') && ('E' + 1 == 'F') && ('F' + 1 == 'G') \
  39     && ('G' + 1 == 'H') && ('H' + 1 == 'I') && ('I' + 1 == 'J') \
  40     && ('J' + 1 == 'K') && ('K' + 1 == 'L') && ('L' + 1 == 'M') \
  41     && ('M' + 1 == 'N') && ('N' + 1 == 'O') && ('O' + 1 == 'P') \
  42     && ('P' + 1 == 'Q') && ('Q' + 1 == 'R') && ('R' + 1 == 'S') \
  43     && ('S' + 1 == 'T') && ('T' + 1 == 'U') && ('U' + 1 == 'V') \
  44     && ('V' + 1 == 'W') && ('W' + 1 == 'X') && ('X' + 1 == 'Y') \
  45     && ('Y' + 1 == 'Z')
  46 #define C_CTYPE_CONSECUTIVE_UPPERCASE 1
  47 #endif
  48
  49 #if ('a' <= 'z') \
  50     && ('a' + 1 == 'b') && ('b' + 1 == 'c') && ('c' + 1 == 'd') \
  51     && ('d' + 1 == 'e') && ('e' + 1 == 'f') && ('f' + 1 == 'g') \
  52     && ('g' + 1 == 'h') && ('h' + 1 == 'i') && ('i' + 1 == 'j') \
  53     && ('j' + 1 == 'k') && ('k' + 1 == 'l') && ('l' + 1 == 'm') \
  54     && ('m' + 1 == 'n') && ('n' + 1 == 'o') && ('o' + 1 == 'p') \
  55     && ('p' + 1 == 'q') && ('q' + 1 == 'r') && ('r' + 1 == 's') \
  56     && ('s' + 1 == 't') && ('t' + 1 == 'u') && ('u' + 1 == 'v') \
  57     && ('v' + 1 == 'w') && ('w' + 1 == 'x') && ('x' + 1 == 'y') \
  58     && ('y' + 1 == 'z')
  59 #define C_CTYPE_CONSECUTIVE_LOWERCASE 1
  60 #endif
  61
  62 #if (' ' == 32) && ('!' == 33) && ('"' == 34) && ('#' == 35) \
  63     && ('%' == 37) && ('&' == 38) && ('\'' == 39) && ('(' == 40) \
  64     && (')' == 41) && ('*' == 42) && ('+' == 43) && (',' == 44) \
  65     && ('-' == 45) && ('.' == 46) && ('/' == 47) && ('0' == 48) \
  66     && ('1' == 49) && ('2' == 50) && ('3' == 51) && ('4' == 52) \
  67     && ('5' == 53) && ('6' == 54) && ('7' == 55) && ('8' == 56) \
  68     && ('9' == 57) && (':' == 58) && (';' == 59) && ('<' == 60) \
  69     && ('=' == 61) && ('>' == 62) && ('?' == 63) && ('A' == 65) \
  70     && ('B' == 66) && ('C' == 67) && ('D' == 68) && ('E' == 69) \
  71     && ('F' == 70) && ('G' == 71) && ('H' == 72) && ('I' == 73) \
  72     && ('J' == 74) && ('K' == 75) && ('L' == 76) && ('M' == 77) \
  73     && ('N' == 78) && ('O' == 79) && ('P' == 80) && ('Q' == 81) \
  74     && ('R' == 82) && ('S' == 83) && ('T' == 84) && ('U' == 85) \
  75     && ('V' == 86) && ('W' == 87) && ('X' == 88) && ('Y' == 89) \
  76     && ('Z' == 90) && ('[' == 91) && ('\\' == 92) && (']' == 93) \
  77     && ('^' == 94) && ('_' == 95) && ('a' == 97) && ('b' == 98) \
  78     && ('c' == 99) && ('d' == 100) && ('e' == 101) && ('f' == 102) \
  79     && ('g' == 103) && ('h' == 104) && ('i' == 105) && ('j' == 106) \
  80     && ('k' == 107) && ('l' == 108) && ('m' == 109) && ('n' == 110) \
  81     && ('o' == 111) && ('p' == 112) && ('q' == 113) && ('r' == 114) \
  82     && ('s' == 115) && ('t' == 116) && ('u' == 117) && ('v' == 118) \
  83     && ('w' == 119) && ('x' == 120) && ('y' == 121) && ('z' == 122) \
  84     && ('{' == 123) && ('|' == 124) && ('}' == 125) && ('~' == 126)
  85 /* The character set is ISO646-US, not EBCDIC.
  86    The test of '$' is important to distinguish it from other ISO646 variants.
  87    Testing the value of '\n' and '\r' is not relevant.  */
  88 #define C_CTYPE_ASCII 1
  89 #endif
  90
  91
  92 /* Function declarations. */
  93
  94 extern bool c_isascii (int c); /* not locale dependent */
  95
  96 extern bool c_isalnum (int c);
  97 extern bool c_isalpha (int c);
  98 extern bool c_isblank (int c);
  99 extern bool c_iscntrl (int c);
 100 extern bool c_isdigit (int c);
 101 extern bool c_islower (int c);
 102 extern bool c_isgraph (int c);
 103 extern bool c_isprint (int c);
 104 extern bool c_ispunct (int c);
 105 extern bool c_isspace (int c);
 106 extern bool c_isupper (int c);
 107 extern bool c_isxdigit (int c);
 108
 109 extern int c_tolower (int c);
 110 extern int c_toupper (int c);
 111
 112
 113 #if defined __GNUC__ && defined __OPTIMIZE__ && !defined __OPTIMIZE_SIZE__
 114
 115 /* ASCII optimizations. */
 116
 117 #define c_isascii(c) \
 118   ({ int __c = (c); \
 119      ((__c & ~0x7f) == 0); \
 120    })
 121
 122 #if C_CTYPE_CONSECUTIVE_DIGITS \
 123     && C_CTYPE_CONSECUTIVE_UPPERCASE && C_CTYPE_CONSECUTIVE_LOWERCASE
 124 #if C_CTYPE_ASCII
 125 #define c_isalnum(c) \
 126   ({ int __c = (c); \
 127      ((__c >= '0' && __c <= '9') \
 128       || ((__c & ~0x20) >= 'A' && (__c & ~0x20) <= 'Z')); \
 129    })
 130 #else
 131 #define c_isalnum(c) \
 132   ({ int __c = (c); \
 133      ((__c >= '0' && __c <= '9') \
 134       || (__c >= 'A' && __c <= 'Z') \
 135       || (__c >= 'a' && __c <= 'z')); \
 136    })
 137 #endif
 138 #endif
 139
 140 #if C_CTYPE_CONSECUTIVE_UPPERCASE && C_CTYPE_CONSECUTIVE_LOWERCASE
 141 #if C_CTYPE_ASCII
 142 #define c_isalpha(c) \
 143   ({ int __c = (c); \
 144      ((__c & ~0x20) >= 'A' && (__c & ~0x20) <= 'Z'); \
 145    })
 146 #else
 147 #define c_isalpha(c) \
 148   ({ int __c = (c); \
 149      ((__c >= 'A' && __c <= 'Z') || (__c >= 'a' && __c <= 'z')); \
 150    })
 151 #endif
 152 #endif
 153
 154 #define c_isblank(c) \
 155   ({ int __c = (c); \
 156      (__c == ' ' || __c == '\t'); \
 157    })
 158
 159 #if C_CTYPE_ASCII
 160 #define c_iscntrl(c) \
 161   ({ int __c = (c); \
 162      ((__c & ~0x1f) == 0 || __c == 0x7f); \
 163    })
 164 #endif
 165
 166 #if C_CTYPE_CONSECUTIVE_DIGITS
 167 #define c_isdigit(c) \
 168   ({ int __c = (c); \
 169      (__c >= '0' && __c <= '9'); \
 170    })
 171 #endif
 172
 173 #if C_CTYPE_CONSECUTIVE_LOWERCASE
 174 #define c_islower(c) \
 175   ({ int __c = (c); \
 176      (__c >= 'a' && __c <= 'z'); \
 177    })
 178 #endif
 179
 180 #if C_CTYPE_ASCII
 181 #define c_isgraph(c) \
 182   ({ int __c = (c); \
 183      (__c >= '!' && __c <= '~'); \
 184    })
 185 #endif
 186
 187 #if C_CTYPE_ASCII
 188 #define c_isprint(c) \
 189   ({ int __c = (c); \
 190      (__c >= ' ' && __c <= '~'); \
 191    })
 192 #endif
 193
 194 #if C_CTYPE_ASCII
 195 #define c_ispunct(c) \
 196   ({ int _c = (c); \
 197      (c_isgraph (_c) && ! c_isalnum (_c)); \
 198    })
 199 #endif
 200
 201 #define c_isspace(c) \
 202   ({ int __c = (c); \
 203      (__c == ' ' || __c == '\t' \
 204       || __c == '\n' || __c == '\v' || __c == '\f' || __c == '\r'); \
 205    })
 206
 207 #if C_CTYPE_CONSECUTIVE_UPPERCASE
 208 #define c_isupper(c) \
 209   ({ int __c = (c); \
 210      (__c >= 'A' && __c <= 'Z'); \
 211    })
 212 #endif
 213
 214 #if C_CTYPE_CONSECUTIVE_DIGITS \
 215     && C_CTYPE_CONSECUTIVE_UPPERCASE && C_CTYPE_CONSECUTIVE_LOWERCASE
 216 #if C_CTYPE_ASCII
 217 #define c_isxdigit(c) \
 218   ({ int __c = (c); \
 219      ((__c >= '0' && __c <= '9') \
 220       || ((__c & ~0x20) >= 'A' && (__c & ~0x20) <= 'F')); \
 221    })
 222 #else
 223 #define c_isxdigit(c) \
 224   ({ int __c = (c); \
 225      ((__c >= '0' && __c <= '9') \
 226       || (__c >= 'A' && __c <= 'F') \
 227       || (__c >= 'a' && __c <= 'f')); \
 228    })
 229 #endif
 230 #endif
 231
 232 #if C_CTYPE_CONSECUTIVE_UPPERCASE && C_CTYPE_CONSECUTIVE_LOWERCASE
 233 #define c_tolower(c) \
 234   ({ int __c = (c); \
 235      (__c >= 'A' && __c <= 'Z' ? __c - 'A' + 'a' : __c); \
 236    })
 237 #define c_toupper(c) \
 238   ({ int __c = (c); \
 239      (__c >= 'a' && __c <= 'z' ? __c - 'a' + 'A' : __c); \
 240    })
 241 #endif
 242
 243 #endif /* optimizing for speed */
 244
 245 #endif /* C_CTYPE_H */