Merge from vendor branch BZIP:
[dragonfly.git] / lib / libc / gen / isctype.c
1 /*      $NetBSD: src/lib/libc/gen/isctype.c,v 1.16 2003/08/07 16:42:52 agc Exp $        */
2 /*      $DragonFly: src/lib/libc/gen/isctype.c,v 1.6 2005/09/17 14:39:44 joerg Exp $ */
3
4 /*
5  * Copyright (c) 1989 The Regents of the University of California.
6  * All rights reserved.
7  * (c) UNIX System Laboratories, Inc.
8  * All or some portions of this file are derived from material licensed
9  * to the University of California by American Telephone and Telegraph
10  * Co. or Unix System Laboratories, Inc. and are reproduced herein with
11  * the permission of UNIX System Laboratories, Inc.
12  *
13  * Redistribution and use in source and binary forms, with or without
14  * modification, are permitted provided that the following conditions
15  * are met:
16  * 1. Redistributions of source code must retain the above copyright
17  *    notice, this list of conditions and the following disclaimer.
18  * 2. Redistributions in binary form must reproduce the above copyright
19  *    notice, this list of conditions and the following disclaimer in the
20  *    documentation and/or other materials provided with the distribution.
21  * 3. Neither the name of the University nor the names of its contributors
22  *    may be used to endorse or promote products derived from this software
23  *    without specific prior written permission.
24  *
25  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
26  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
27  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
28  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
29  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
30  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
31  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
32  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
33  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
34  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
35  * SUCH DAMAGE.
36  */
37
38 #define _ANSI_LIBRARY
39 #include <ctype.h>
40
41 #undef isalnum
42 int
43 isalnum(int c)
44 {
45         return(__libc_ctype_index(_CTYPEMASK_A | _CTYPEMASK_D, c));
46 }
47
48 #undef isalpha
49 int
50 isalpha(int c)
51 {
52         return(__libc_ctype_index(_CTYPEMASK_A, c));
53 }
54
55 #undef isblank
56 int
57 isblank(int c)
58 {
59         return(__libc_ctype_index(_CTYPEMASK_B, c));
60 }
61
62 #undef iscntrl
63 int
64 iscntrl(int c)
65 {
66         return(__libc_ctype_index(_CTYPEMASK_C, c));
67 }
68
69 #undef isdigit
70 int
71 isdigit(int c)
72 {
73         return(__libc_ctype_index(_CTYPEMASK_D, c));
74 }
75
76 #undef isgraph
77 int
78 isgraph(int c)
79 {
80         return(__libc_ctype_index(_CTYPEMASK_G, c));
81 }
82
83 #undef islower
84 int
85 islower(int c)
86 {
87         return(__libc_ctype_index(_CTYPEMASK_L, c));
88 }
89
90 #undef isprint
91 int
92 isprint(int c)
93 {
94         return(__libc_ctype_index(_CTYPEMASK_R, c));
95 }
96
97 #undef ispunct
98 int
99 ispunct(int c)
100 {
101         return(__libc_ctype_index(_CTYPEMASK_P, c));
102 }
103
104 #undef isspace
105 int
106 isspace(int c)
107 {
108         return(__libc_ctype_index(_CTYPEMASK_S, c));
109 }
110
111 #undef isupper
112 int
113 isupper(int c)
114 {
115         return(__libc_ctype_index(_CTYPEMASK_U, c));
116 }
117
118 #undef isxdigit
119 int
120 isxdigit(int c)
121 {
122         return(__libc_ctype_index(_CTYPEMASK_X, c));
123 }
124
125 #undef _toupper
126 int
127 _toupper(int c)
128 {
129         return(c - 'a' + 'A');
130 }
131
132 #undef _tolower
133 int
134 _tolower(int c)
135 {
136         return(c - 'A' + 'a');
137 }