1 /* <ctype.h> replacement macros.
2 
3    Copyright (C) 2000, 2001 Free Software Foundation, Inc.
4    Contributed by Zack Weinberg <zackw@stanford.edu>.
5 
6 This file is part of the libiberty library.
7 Libiberty is free software; you can redistribute it and/or
8 modify it under the terms of the GNU Library General Public
9 License as published by the Free Software Foundation; either
10 version 2 of the License, or (at your option) any later version.
11 
12 Libiberty is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15 Library General Public License for more details.
16 
17 You should have received a copy of the GNU Library General Public
18 License along with libiberty; see the file COPYING.LIB.  If
19 not, write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
20 Boston, MA 02111-1307, USA.  */
21 
22 /* This is a compatible replacement of the standard C library's <ctype.h>
23    with the following properties:
24 
25    - Implements all isxxx() macros required by C99.
26    - Also implements some character classes useful when
27      parsing C-like languages.
28    - Does not change behavior depending on the current locale.
29    - Behaves properly for all values in the range of a signed or
30      unsigned char.
31 
32    To avoid conflicts, this header defines the isxxx functions in upper
33    case, e.g. ISALPHA not isalpha.  */
34 
35 #ifndef SAFE_CTYPE_H
36 #define SAFE_CTYPE_H
37 
38 #ifdef isalpha
39  #error "safe-ctype.h and ctype.h may not be used simultaneously"
40 #endif
41 
42 /* Determine host character set.  */
43 #define HOST_CHARSET_UNKNOWN 0
44 #define HOST_CHARSET_ASCII   1
45 #define HOST_CHARSET_EBCDIC  2
46 
47 #if  '\n' == 0x0A && ' ' == 0x20 && '0' == 0x30 \
48    && 'A' == 0x41 && 'a' == 0x61 && '!' == 0x21
49 #  define HOST_CHARSET HOST_CHARSET_ASCII
50 #else
51 # if '\n' == 0x15 && ' ' == 0x40 && '0' == 0xF0 \
52    && 'A' == 0xC1 && 'a' == 0x81 && '!' == 0x5A
53 #  define HOST_CHARSET HOST_CHARSET_EBCDIC
54 # else
55 #  define HOST_CHARSET HOST_CHARSET_UNKNOWN
56 # endif
57 #endif
58 
59 /* Categories.  */
60 
61 enum {
62   /* In C99 */
63   _sch_isblank  = 0x0001,	/* space \t */
64   _sch_iscntrl  = 0x0002,	/* nonprinting characters */
65   _sch_isdigit  = 0x0004,	/* 0-9 */
66   _sch_islower  = 0x0008,	/* a-z */
67   _sch_isprint  = 0x0010,	/* any printing character including ' ' */
68   _sch_ispunct  = 0x0020,	/* all punctuation */
69   _sch_isspace  = 0x0040,	/* space \t \n \r \f \v */
70   _sch_isupper  = 0x0080,	/* A-Z */
71   _sch_isxdigit = 0x0100,	/* 0-9A-Fa-f */
72 
73   /* Extra categories useful to cpplib.  */
74   _sch_isidst	= 0x0200,	/* A-Za-z_ */
75   _sch_isvsp    = 0x0400,	/* \n \r */
76   _sch_isnvsp   = 0x0800,	/* space \t \f \v \0 */
77 
78   /* Combinations of the above.  */
79   _sch_isalpha  = _sch_isupper|_sch_islower,	/* A-Za-z */
80   _sch_isalnum  = _sch_isalpha|_sch_isdigit,	/* A-Za-z0-9 */
81   _sch_isidnum  = _sch_isidst|_sch_isdigit,	/* A-Za-z0-9_ */
82   _sch_isgraph  = _sch_isalnum|_sch_ispunct,	/* isprint and not space */
83   _sch_iscppsp  = _sch_isvsp|_sch_isnvsp,	/* isspace + \0 */
84   _sch_isbasic  = _sch_isprint|_sch_iscppsp     /* basic charset of ISO C
85 						   (plus ` and @)  */
86 };
87 
88 /* Character classification.  */
89 extern const unsigned short _sch_istable[256];
90 
91 #define _sch_test(c, bit) (_sch_istable[(c) & 0xff] & (unsigned short)(bit))
92 
93 #define ISALPHA(c)  _sch_test(c, _sch_isalpha)
94 #define ISALNUM(c)  _sch_test(c, _sch_isalnum)
95 #define ISBLANK(c)  _sch_test(c, _sch_isblank)
96 #define ISCNTRL(c)  _sch_test(c, _sch_iscntrl)
97 #define ISDIGIT(c)  _sch_test(c, _sch_isdigit)
98 #define ISGRAPH(c)  _sch_test(c, _sch_isgraph)
99 #define ISLOWER(c)  _sch_test(c, _sch_islower)
100 #define ISPRINT(c)  _sch_test(c, _sch_isprint)
101 #define ISPUNCT(c)  _sch_test(c, _sch_ispunct)
102 #define ISSPACE(c)  _sch_test(c, _sch_isspace)
103 #define ISUPPER(c)  _sch_test(c, _sch_isupper)
104 #define ISXDIGIT(c) _sch_test(c, _sch_isxdigit)
105 
106 #define ISIDNUM(c)	_sch_test(c, _sch_isidnum)
107 #define ISIDST(c)	_sch_test(c, _sch_isidst)
108 #define IS_ISOBASIC(c)	_sch_test(c, _sch_isbasic)
109 #define IS_VSPACE(c)	_sch_test(c, _sch_isvsp)
110 #define IS_NVSPACE(c)	_sch_test(c, _sch_isnvsp)
111 #define IS_SPACE_OR_NUL(c)	_sch_test(c, _sch_iscppsp)
112 
113 /* Character transformation.  */
114 extern const unsigned char  _sch_toupper[256];
115 extern const unsigned char  _sch_tolower[256];
116 #define TOUPPER(c) _sch_toupper[(c) & 0xff]
117 #define TOLOWER(c) _sch_tolower[(c) & 0xff]
118 
119 #endif /* SAFE_CTYPE_H */
120