isctype.c revision 1.15 1 /* $NetBSD: isctype.c,v 1.15 1999/09/12 18:54:34 kleink Exp $ */
2
3 /*
4 * Copyright (c) 1989 The Regents of the University of California.
5 * All rights reserved.
6 * (c) UNIX System Laboratories, Inc.
7 * All or some portions of this file are derived from material licensed
8 * to the University of California by American Telephone and Telegraph
9 * Co. or Unix System Laboratories, Inc. and are reproduced herein with
10 * the permission of UNIX System Laboratories, Inc.
11 *
12 * Redistribution and use in source and binary forms, with or without
13 * modification, are permitted provided that the following conditions
14 * are met:
15 * 1. Redistributions of source code must retain the above copyright
16 * notice, this list of conditions and the following disclaimer.
17 * 2. Redistributions in binary form must reproduce the above copyright
18 * notice, this list of conditions and the following disclaimer in the
19 * documentation and/or other materials provided with the distribution.
20 * 3. All advertising materials mentioning features or use of this software
21 * must display the following acknowledgement:
22 * This product includes software developed by the University of
23 * California, Berkeley and its contributors.
24 * 4. Neither the name of the University nor the names of its contributors
25 * may be used to endorse or promote products derived from this software
26 * without specific prior written permission.
27 *
28 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
29 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
30 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
31 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
32 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
33 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
34 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
35 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
36 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
37 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
38 * SUCH DAMAGE.
39 */
40
41 #include <sys/cdefs.h>
42 #if defined(LIBC_SCCS) && !defined(lint)
43 #if 0
44 static char sccsid[] = "@(#)isctype.c 5.2 (Berkeley) 6/1/90";
45 #else
46 __RCSID("$NetBSD: isctype.c,v 1.15 1999/09/12 18:54:34 kleink Exp $");
47 #endif
48 #endif /* LIBC_SCCS and not lint */
49
50 #define _ANSI_LIBRARY
51 #include <ctype.h>
52
53 #undef isalnum
54 int
55 isalnum(c)
56 int c;
57 {
58 return((_ctype_ + 1)[c] & (_U|_L|_N));
59 }
60
61 #undef isalpha
62 int
63 isalpha(c)
64 int c;
65 {
66 return((_ctype_ + 1)[c] & (_U|_L));
67 }
68
69 #undef isblank
70 int
71 isblank(c)
72 int c;
73 {
74 return(c == ' ' || c == '\t');
75 }
76
77 #undef iscntrl
78 int
79 iscntrl(c)
80 int c;
81 {
82 return((_ctype_ + 1)[c] & _C);
83 }
84
85 #undef isdigit
86 int
87 isdigit(c)
88 int c;
89 {
90 return((_ctype_ + 1)[c] & _N);
91 }
92
93 #undef isgraph
94 int
95 isgraph(c)
96 int c;
97 {
98 return((_ctype_ + 1)[c] & (_P|_U|_L|_N));
99 }
100
101 #undef islower
102 int
103 islower(c)
104 int c;
105 {
106 return((_ctype_ + 1)[c] & _L);
107 }
108
109 #undef isprint
110 int
111 isprint(c)
112 int c;
113 {
114 return((_ctype_ + 1)[c] & (_P|_U|_L|_N|_B));
115 }
116
117 #undef ispunct
118 int
119 ispunct(c)
120 int c;
121 {
122 return((_ctype_ + 1)[c] & _P);
123 }
124
125 #undef isspace
126 int
127 isspace(c)
128 int c;
129 {
130 return((_ctype_ + 1)[c] & _S);
131 }
132
133 #undef isupper
134 int
135 isupper(c)
136 int c;
137 {
138 return((_ctype_ + 1)[c] & _U);
139 }
140
141 #undef isxdigit
142 int
143 isxdigit(c)
144 int c;
145 {
146 return((_ctype_ + 1)[c] & (_N|_X));
147 }
148
149 #undef _toupper
150 int
151 _toupper(c)
152 int c;
153 {
154 return (c - 'a' + 'A');
155 }
156
157 #undef _tolower
158 int
159 _tolower(c)
160 int c;
161 {
162 return (c - 'A' + 'a');
163 }
164