1 /* 2 Copyright (c) 1991, 1993 3 The Regents of the University of California. All rights reserved. 4 c) UNIX System Laboratories, Inc. 5 All or some portions of this file are derived from material licensed 6 to the University of California by American Telephone and Telegraph 7 Co. or Unix System Laboratories, Inc. and are reproduced herein with 8 the permission of UNIX System Laboratories, Inc. 9 10 Redistribution and use in source and binary forms, with or without 11 modification, are permitted provided that the following conditions 12 are met: 13 1. Redistributions of source code must retain the above copyright 14 notice, this list of conditions and the following disclaimer. 15 2. Redistributions in binary form must reproduce the above copyright 16 notice, this list of conditions and the following disclaimer in the 17 documentation and/or other materials provided with the distribution. 18 3. Neither the name of the University nor the names of its contributors 19 may be used to endorse or promote products derived from this software 20 without specific prior written permission. 21 22 THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 23 ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 24 IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 25 ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 26 FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 27 DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 28 OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 29 HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 30 LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 31 OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 32 SUCH DAMAGE. 33 */ 34 #ifndef _CTYPE_H_ 35 #define _CTYPE_H_ 36 37 #include <sys/cdefs.h> 38 39 #if __POSIX_VISIBLE >= 200809 || __MISC_VISIBLE 40 #include <sys/_locale.h> 41 #endif 42 43 _BEGIN_STD_C 44 45 /* 46 * The small ctype code does not support locales or extended character sets. It also breaks 47 * libstdc++'s ctype implementation, so just skip it for c++ 48 */ 49 #if defined(__HAVE_LOCALE_INFO__) || \ 50 defined (_MB_EXTENDED_CHARSETS_ISO) || \ 51 defined (_MB_EXTENDED_CHARSETS_WINDOWS) || \ 52 defined (__cplusplus) 53 #undef _PICOLIBC_CTYPE_SMALL 54 #define _PICOLIBC_CTYPE_SMALL 0 55 #endif 56 57 /* 58 * The default ctype style depends upon whether we are optimizing for 59 * size and whether the library supports locale-specific ctype data 60 */ 61 #if !defined(_PICOLIBC_CTYPE_SMALL) 62 #ifdef __OPTIMIZE_SIZE__ 63 #define _PICOLIBC_CTYPE_SMALL 1 64 #else 65 #define _PICOLIBC_CTYPE_SMALL 0 66 #endif 67 #endif 68 69 int isalnum (int c); 70 int isalpha (int c); 71 int iscntrl (int c); 72 int isdigit (int c); 73 int isgraph (int c); 74 int islower (int c); 75 int isprint (int c); 76 int ispunct (int c); 77 int isspace (int c); 78 int isupper (int c); 79 int isxdigit (int c); 80 int tolower (int c); 81 int toupper (int c); 82 83 #if __ISO_C_VISIBLE >= 1999 84 int isblank (int c); 85 #endif 86 87 #if __MISC_VISIBLE || __XSI_VISIBLE 88 int isascii (int c); 89 int toascii (int c); 90 #define _tolower(__c) ((__c) + ('a' - 'A')) 91 #define _toupper(__c) ((__c) - ('a' - 'A')) 92 #define isascii(__c) ((unsigned)(__c)<=0177) 93 #define toascii(__c) ((__c)&0177) 94 #endif 95 96 #if __POSIX_VISIBLE >= 200809 97 int isalnum_l (int c, locale_t l); 98 int isalpha_l (int c, locale_t l); 99 int isblank_l (int c, locale_t l); 100 int iscntrl_l (int c, locale_t l); 101 int isdigit_l (int c, locale_t l); 102 int isgraph_l (int c, locale_t l); 103 int islower_l (int c, locale_t l); 104 int isprint_l (int c, locale_t l); 105 int ispunct_l (int c, locale_t l); 106 int isspace_l (int c, locale_t l); 107 int isupper_l (int c, locale_t l); 108 int isxdigit_l(int c, locale_t l); 109 int tolower_l (int c, locale_t l); 110 int toupper_l (int c, locale_t l); 111 #endif 112 113 #if __MISC_VISIBLE 114 int isascii_l (int c, locale_t l); 115 int toascii_l (int c, locale_t l); 116 #define isascii_l(__c,__l) ((__l),(unsigned)(__c)<=0177) 117 #define toascii_l(__c,__l) ((__l),(__c)&0177) 118 #endif 119 120 #if _PICOLIBC_CTYPE_SMALL 121 122 #ifdef __declare_extern_inline 123 isblank(int c)124 __declare_extern_inline(int) isblank (int c) 125 { 126 return c == ' ' || c == '\t'; 127 } 128 iscntrl(int c)129 __declare_extern_inline(int) iscntrl (int c) 130 { 131 return (0x00 <= c && c <= 0x1f) || c == 0x7f; 132 } 133 isdigit(int c)134 __declare_extern_inline(int) isdigit (int c) 135 { 136 return '0' <= c && c <= '9'; 137 } 138 isgraph(int c)139 __declare_extern_inline(int) isgraph (int c) 140 { 141 return '!' <= c && c <= '~'; 142 } 143 islower(int c)144 __declare_extern_inline(int) islower (int c) 145 { 146 return 'a' <= c && c <= 'z'; 147 } 148 isprint(int c)149 __declare_extern_inline(int) isprint (int c) 150 { 151 return ' ' <= c && c <= '~'; 152 } 153 ispunct(int c)154 __declare_extern_inline(int) ispunct (int c) 155 { 156 return (('!' <= c && c <= '/') || 157 (':' <= c && c <= '@') || 158 ('[' <= c && c <= '`') || 159 ('{' <= c && c <= '~')); 160 } 161 isspace(int c)162 __declare_extern_inline(int) isspace (int c) 163 { 164 return c == ' ' || ('\t' <= c && c <= '\r'); 165 } 166 isupper(int c)167 __declare_extern_inline(int) isupper (int c) 168 { 169 return 'A' <= c && c <= 'Z'; 170 } 171 isxdigit(int c)172 __declare_extern_inline(int) isxdigit (int c) 173 { 174 return (isdigit(c) || 175 ('A' <= c && c <= 'F') || 176 ('a' <= c && c <= 'f')); 177 } 178 isalpha(int c)179 __declare_extern_inline(int) isalpha (int c) 180 { 181 return isupper(c) || islower(c); 182 } 183 isalnum(int c)184 __declare_extern_inline(int) isalnum (int c) 185 { 186 return isalpha(c) || isdigit(c); 187 } 188 tolower(int c)189 __declare_extern_inline(int) tolower (int c) 190 { 191 if (isupper(c)) 192 c = c - 'A' + 'a'; 193 return c; 194 } 195 toupper(int c)196 __declare_extern_inline(int) toupper (int c) 197 { 198 if (islower(c)) 199 c = c - 'a' + 'A'; 200 return c; 201 } 202 203 #if __POSIX_VISIBLE >= 200809 isalnum_l(int c,locale_t l)204 __declare_extern_inline(int) isalnum_l (int c, locale_t l) { (void) l; return isalnum(c); } isalpha_l(int c,locale_t l)205 __declare_extern_inline(int) isalpha_l (int c, locale_t l) { (void) l; return isalpha(c); } isblank_l(int c,locale_t l)206 __declare_extern_inline(int) isblank_l (int c, locale_t l) { (void) l; return isblank(c); } iscntrl_l(int c,locale_t l)207 __declare_extern_inline(int) iscntrl_l (int c, locale_t l) { (void) l; return iscntrl(c); } isdigit_l(int c,locale_t l)208 __declare_extern_inline(int) isdigit_l (int c, locale_t l) { (void) l; return isdigit(c); } isgraph_l(int c,locale_t l)209 __declare_extern_inline(int) isgraph_l (int c, locale_t l) { (void) l; return isgraph(c); } islower_l(int c,locale_t l)210 __declare_extern_inline(int) islower_l (int c, locale_t l) { (void) l; return islower(c); } isprint_l(int c,locale_t l)211 __declare_extern_inline(int) isprint_l (int c, locale_t l) { (void) l; return isprint(c); } ispunct_l(int c,locale_t l)212 __declare_extern_inline(int) ispunct_l (int c, locale_t l) { (void) l; return ispunct(c); } isspace_l(int c,locale_t l)213 __declare_extern_inline(int) isspace_l (int c, locale_t l) { (void) l; return isspace(c); } isupper_l(int c,locale_t l)214 __declare_extern_inline(int) isupper_l (int c, locale_t l) { (void) l; return isupper(c); } isxdigit_l(int c,locale_t l)215 __declare_extern_inline(int) isxdigit_l(int c, locale_t l) { (void) l; return isxdigit(c); } tolower_l(int c,locale_t l)216 __declare_extern_inline(int) tolower_l (int c, locale_t l) { (void) l; return tolower(c); } toupper_l(int c,locale_t l)217 __declare_extern_inline(int) toupper_l (int c, locale_t l) { (void) l; return toupper(c); } 218 #endif 219 220 #endif 221 222 #else 223 224 #define _U 01 225 #define _L 02 226 #define _N 04 227 #define _S 010 228 #define _P 020 229 #define _C 040 230 #define _X 0100 231 #define _B 0200 232 233 #ifndef __CHAR_UNSIGNED__ 234 #define ALLOW_NEGATIVE_CTYPE_INDEX 235 #endif 236 237 #if defined(ALLOW_NEGATIVE_CTYPE_INDEX) 238 extern const char _ctype_b[]; 239 #define _ctype_ (_ctype_b + 127) 240 #else 241 extern const char _ctype_[]; 242 #endif 243 244 #ifdef __HAVE_LOCALE_INFO__ 245 const char *__locale_ctype_ptr (void); 246 #else 247 #define __locale_ctype_ptr() _ctype_ 248 #endif 249 250 # define __CTYPE_PTR (__locale_ctype_ptr ()) 251 252 #ifndef __cplusplus __ctype_lookup(int c)253 static __inline char __ctype_lookup(int c) { return (__CTYPE_PTR + 1)[c]; } 254 255 #define isalpha(__c) (__ctype_lookup(__c)&(_U|_L)) 256 #define isupper(__c) ((__ctype_lookup(__c)&(_U|_L))==_U) 257 #define islower(__c) ((__ctype_lookup(__c)&(_U|_L))==_L) 258 #define isdigit(__c) (__ctype_lookup(__c)&_N) 259 #define isxdigit(__c) (__ctype_lookup(__c)&(_X|_N)) 260 #define isspace(__c) (__ctype_lookup(__c)&_S) 261 #define ispunct(__c) (__ctype_lookup(__c)&_P) 262 #define isalnum(__c) (__ctype_lookup(__c)&(_U|_L|_N)) 263 #define isprint(__c) (__ctype_lookup(__c)&(_P|_U|_L|_N|_B)) 264 #define isgraph(__c) (__ctype_lookup(__c)&(_P|_U|_L|_N)) 265 #define iscntrl(__c) (__ctype_lookup(__c)&_C) 266 267 #if __ISO_C_VISIBLE >= 1999 268 #if defined(__GNUC__) 269 #define isblank(__c) \ 270 __extension__ ({ __typeof__ (__c) __x = (__c); \ 271 (__ctype_lookup(__x)&_B) || (int) (__x) == '\t';}) 272 #endif 273 #endif 274 275 #if __POSIX_VISIBLE >= 200809 276 #ifdef __HAVE_LOCALE_INFO__ 277 const char *__locale_ctype_ptr_l (locale_t); 278 #else 279 static __inline const char * __locale_ctype_ptr_l(locale_t _l)280 __locale_ctype_ptr_l(locale_t _l) 281 { 282 (void)_l; 283 return __locale_ctype_ptr(); 284 } 285 #endif 286 __ctype_lookup_l(int c,locale_t l)287 static __inline char __ctype_lookup_l(int c, locale_t l) { 288 return (__locale_ctype_ptr_l(l)+1)[(int)(c)]; 289 } 290 291 #define isalpha_l(__c,__l) (__ctype_lookup_l(__c,__l)&(_U|_L)) 292 #define isupper_l(__c,__l) ((__ctype_lookup_l(__c,__l)&(_U|_L))==_U) 293 #define islower_l(__c,__l) ((__ctype_lookup_l(__c,__l)&(_U|_L))==_L) 294 #define isdigit_l(__c,__l) (__ctype_lookup_l(__c,__l)&_N) 295 #define isxdigit_l(__c,__l) (__ctype_lookup_l(__c,__l)&(_X|_N)) 296 #define isspace_l(__c,__l) (__ctype_lookup_l(__c,__l)&_S) 297 #define ispunct_l(__c,__l) (__ctype_lookup_l(__c,__l)&_P) 298 #define isalnum_l(__c,__l) (__ctype_lookup_l(__c,__l)&(_U|_L|_N)) 299 #define isprint_l(__c,__l) (__ctype_lookup_l(__c,__l)&(_P|_U|_L|_N|_B)) 300 #define isgraph_l(__c,__l) (__ctype_lookup_l(__c,__l)&(_P|_U|_L|_N)) 301 #define iscntrl_l(__c,__l) (__ctype_lookup_l(__c,__l)&_C) 302 303 #if defined(__GNUC__) 304 #define isblank_l(__c, __l) \ 305 __extension__ ({ __typeof__ (__c) __x = (__c); \ 306 (__ctype_lookup_l(__x,__l)&_B) || (int) (__x) == '\t';}) 307 #endif 308 309 #endif /* __POSIX_VISIBLE >= 200809 */ 310 311 /* Non-gcc versions will get the library versions, and will be 312 slightly slower. These macros are not NLS-aware so they are 313 disabled if the system supports the extended character sets. */ 314 # if defined(__GNUC__) 315 # if !defined (_MB_EXTENDED_CHARSETS_ISO) && !defined (_MB_EXTENDED_CHARSETS_WINDOWS) 316 # define toupper(__c) \ 317 __extension__ ({ __typeof__ (__c) __x = (__c); \ 318 islower (__x) ? (int) __x - 'a' + 'A' : (int) __x;}) 319 # define tolower(__c) \ 320 __extension__ ({ __typeof__ (__c) __x = (__c); \ 321 isupper (__x) ? (int) __x - 'A' + 'a' : (int) __x;}) 322 # else /* _MB_EXTENDED_CHARSETS* */ 323 /* Allow a gcc warning if the user passed 'char', but defer to the 324 function. */ 325 # define toupper(__c) \ 326 __extension__ ({ __typeof__ (__c) __x = (__c); \ 327 (void) __CTYPE_PTR[__x]; (toupper) (__x);}) 328 # define tolower(__c) \ 329 __extension__ ({ __typeof__ (__c) __x = (__c); \ 330 (void) __CTYPE_PTR[__x]; (tolower) (__x);}) 331 # endif /* _MB_EXTENDED_CHARSETS* */ 332 # endif /* __GNUC__ */ 333 334 #endif /* !__cplusplus */ 335 336 #endif /* else _PICOLIBC_CTYPE_SMALL */ 337 338 _END_STD_C 339 340 #endif /* _CTYPE_H_ */ 341
