1/* Copyright (C) 1991,92,93,95,96,97,98,99,2001 Free Software Foundation, Inc.
2   This file is part of the GNU C Library.
3
4   The GNU C Library is free software; you can redistribute it and/or
5   modify it under the terms of the GNU Lesser General Public
6   License as published by the Free Software Foundation; either
7   version 2.1 of the License, or (at your option) any later version.
8
9   The GNU C Library is distributed in the hope that it will be useful,
10   but WITHOUT ANY WARRANTY; without even the implied warranty of
11   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12   Lesser General Public License for more details.
13
14   You should have received a copy of the GNU Lesser General Public
15   License along with the GNU C Library; if not, write to the Free
16   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
17   02111-1307 USA.  */
18
19/*
20 *	ISO C99 Standard 7.4: Character handling	<ctype.h>
21 */
22
23#ifndef	_CTYPE_H
24#define	_CTYPE_H	1
25
26#include <features.h>
27#include <bits/types.h>
28
29__BEGIN_DECLS
30
31#ifndef _ISbit
32/* These are all the characteristics of characters.
33   If there get to be more than 16 distinct characteristics,
34   many things must be changed that use `unsigned short int's.
35
36   The characteristics are stored always in network byte order (big
37   endian).  We define the bit value interpretations here dependent on the
38   machine's byte order.  */
39
40# include <endian.h>
41# if __BYTE_ORDER == __BIG_ENDIAN
42#  define _ISbit(bit)	(1 << (bit))
43# else /* __BYTE_ORDER == __LITTLE_ENDIAN */
44#  define _ISbit(bit)	((bit) < 8 ? ((1 << (bit)) << 8) : ((1 << (bit)) >> 8))
45# endif
46
47enum
48{
49  _ISupper = _ISbit (0),	/* UPPERCASE.  */
50  _ISlower = _ISbit (1),	/* lowercase.  */
51  _ISalpha = _ISbit (2),	/* Alphabetic.  */
52  _ISdigit = _ISbit (3),	/* Numeric.  */
53  _ISxdigit = _ISbit (4),	/* Hexadecimal numeric.  */
54  _ISspace = _ISbit (5),	/* Whitespace.  */
55  _ISprint = _ISbit (6),	/* Printing.  */
56  _ISgraph = _ISbit (7),	/* Graphical.  */
57  _ISblank = _ISbit (8),	/* Blank (usually SPC and TAB).  */
58  _IScntrl = _ISbit (9),	/* Control character.  */
59  _ISpunct = _ISbit (10),	/* Punctuation.  */
60  _ISalnum = _ISbit (11)	/* Alphanumeric.  */
61};
62#endif /* ! _ISbit  */
63
64/* These are defined in ctype-info.c.
65   The declarations here must match those in localeinfo.h.
66
67   These point into arrays of 384, so they can be indexed by any `unsigned
68   char' value [0,255]; by EOF (-1); or by any `signed char' value
69   [-128,-1).  ISO C requires that the ctype functions work for `unsigned
70   char' values and for EOF; we also support negative `signed char' values
71   for broken old programs.  The case conversion arrays are of `int's
72   rather than `unsigned char's because tolower (EOF) must be EOF, which
73   doesn't fit into an `unsigned char'.  But today more important is that
74   the arrays are also used for multi-byte character sets.  */
75extern __const unsigned short int *__ctype_b;	/* Characteristics.  */
76extern __const __int32_t *__ctype_tolower; /* Case conversions.  */
77extern __const __int32_t *__ctype_toupper; /* Case conversions.  */
78
79#define	__isctype(c, type) \
80  (__ctype_b[(int) (c)] & (unsigned short int) type)
81
82#define	__isascii(c)	(((c) & ~0x7f) == 0)	/* If C is a 7 bit value.  */
83#define	__toascii(c)	((c) & 0x7f)		/* Mask off high bits.  */
84
85#define	__exctype(name)	extern int name (int) __THROW
86
87/* The following names are all functions:
88     int isCHARACTERISTIC(int c);
89   which return nonzero iff C has CHARACTERISTIC.
90   For the meaning of the characteristic names, see the `enum' above.  */
91__exctype (isalnum);
92__exctype (isalpha);
93__exctype (iscntrl);
94__exctype (isdigit);
95__exctype (islower);
96__exctype (isgraph);
97__exctype (isprint);
98__exctype (ispunct);
99__exctype (isspace);
100__exctype (isupper);
101__exctype (isxdigit);
102
103#ifdef	__USE_ISOC99
104__exctype (isblank);
105#endif
106
107
108/* Return the lowercase version of C.  */
109extern int tolower (int __c) __THROW;
110
111/* Return the uppercase version of C.  */
112extern int toupper (int __c) __THROW;
113
114
115#if defined __USE_SVID || defined __USE_MISC || defined __USE_XOPEN
116
117/* Return nonzero iff C is in the ASCII set
118   (i.e., is no more than 7 bits wide).  */
119extern int isascii (int __c) __THROW;
120
121/* Return the part of C that is in the ASCII set
122   (i.e., the low-order 7 bits of C).  */
123extern int toascii (int __c) __THROW;
124
125/* These are the same as `toupper' and `tolower' except that they do not
126   check the argument for being in the range of a `char'.  */
127__exctype (_toupper);
128__exctype (_tolower);
129#endif /* Use SVID or use misc.  */
130
131/* This code is needed for the optimized mapping functions.  */
132#define __tobody(c, f, a, args) \
133  (__extension__							      \
134   ({ int __res;							      \
135      if (sizeof (c) > 1)						      \
136	{								      \
137	  if (__builtin_constant_p (c))					      \
138	    {								      \
139	      int __c = (c);						      \
140	      __res = __c < -128 || __c > 255 ? __c : a[__c];		      \
141	    }								      \
142	  else								      \
143	    __res = f args;						      \
144	}								      \
145      else								      \
146	__res = a[(int) (c)];						      \
147      __res; }))
148
149#ifndef	__NO_CTYPE
150# define isalnum(c)	__isctype((c), _ISalnum)
151# define isalpha(c)	__isctype((c), _ISalpha)
152# define iscntrl(c)	__isctype((c), _IScntrl)
153# define isdigit(c)	__isctype((c), _ISdigit)
154# define islower(c)	__isctype((c), _ISlower)
155# define isgraph(c)	__isctype((c), _ISgraph)
156# define isprint(c)	__isctype((c), _ISprint)
157# define ispunct(c)	__isctype((c), _ISpunct)
158# define isspace(c)	__isctype((c), _ISspace)
159# define isupper(c)	__isctype((c), _ISupper)
160# define isxdigit(c)	__isctype((c), _ISxdigit)
161
162# ifdef	__USE_ISOC99
163#  define isblank(c)	__isctype((c), _ISblank)
164# endif
165
166# ifdef __USE_EXTERN_INLINES
167extern __inline int
168tolower (int __c) __THROW
169{
170  return __c >= -128 && __c < 256 ? __ctype_tolower[__c] : __c;
171}
172
173extern __inline int
174toupper (int __c) __THROW
175{
176  return __c >= -128 && __c < 256 ? __ctype_toupper[__c] : __c;
177}
178# endif
179
180# if __GNUC__ >= 2 && defined __OPTIMIZE__ && !defined __cplusplus
181#  define tolower(c) __tobody (c, tolower, __ctype_tolower, (c))
182#  define toupper(c) __tobody (c, toupper, __ctype_toupper, (c))
183# endif	/* Optimizing gcc */
184
185# if defined __USE_SVID || defined __USE_MISC || defined __USE_XOPEN
186#  define isascii(c)	__isascii (c)
187#  define toascii(c)	__toascii (c)
188
189#  define _tolower(c)	((int) __ctype_tolower[(int) (c)])
190#  define _toupper(c)	((int) __ctype_toupper[(int) (c)])
191# endif
192
193#endif /* Not __NO_CTYPE.  */
194
195__END_DECLS
196
197#endif /* ctype.h  */
198