include/ctype.h

   1 /*
   2  * Copyright (c) 2000 Apple Computer, Inc. All rights reserved.
   3  *
   4  * @APPLE_LICENSE_HEADER_START@
   5  *
   6  * This file contains Original Code and/or Modifications of Original Code
   7  * as defined in and that are subject to the Apple Public Source License
   8  * Version 2.0 (the 'License'). You may not use this file except in
   9  * compliance with the License. Please obtain a copy of the License at
  10  * http://www.opensource.apple.com/apsl/ and read it before using this
  11  * file.
  12  *
  13  * The Original Code and all software distributed under the License are
  14  * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
  15  * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
  16  * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
  17  * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
  18  * Please see the License for the specific language governing rights and
  19  * limitations under the License.
  20  *
  21  * @APPLE_LICENSE_HEADER_END@
  22  */
  23 /*
  24  * Copyright (c) 1989, 1993
  25  *      The Regents of the University of California.  All rights reserved.
  26  * (c) UNIX System Laboratories, Inc.
  27  * All or some portions of this file are derived from material licensed
  28  * to the University of California by American Telephone and Telegraph
  29  * Co. or Unix System Laboratories, Inc. and are reproduced herein with
  30  * the permission of UNIX System Laboratories, Inc.
  31  *
  32  * This code is derived from software contributed to Berkeley by
  33  * Paul Borman at Krystal Technologies.
  34  *
  35  * Redistribution and use in source and binary forms, with or without
  36  * modification, are permitted provided that the following conditions
  37  * are met:
  38  * 1. Redistributions of source code must retain the above copyright
  39  *    notice, this list of conditions and the following disclaimer.
  40  * 2. Redistributions in binary form must reproduce the above copyright
  41  *    notice, this list of conditions and the following disclaimer in the
  42  *    documentation and/or other materials provided with the distribution.
  43  * 3. All advertising materials mentioning features or use of this software
  44  *    must display the following acknowledgement:
  45  *      This product includes software developed by the University of
  46  *      California, Berkeley and its contributors.
  47  * 4. Neither the name of the University nor the names of its contributors
  48  *    may be used to endorse or promote products derived from this software
  49  *    without specific prior written permission.
  50  *
  51  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  52  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  53  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  54  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  55  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  56  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  57  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  58  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  59  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  60  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  61  * SUCH DAMAGE.
  62  *
  63  *      @(#)ctype.h     8.4 (Berkeley) 1/21/94
  64  */
  65
  66 //Begin-Libc
  67 #include "xlocale_private.h"
  68 //End-Libc
  69 #ifndef _CTYPE_H_
  70 #define _CTYPE_H_
  71
  72 #include <runetype.h>
  73
  74 #define _CTYPE_A        0x00000100L             /* Alpha */
  75 #define _CTYPE_C        0x00000200L             /* Control */
  76 #define _CTYPE_D        0x00000400L             /* Digit */
  77 #define _CTYPE_G        0x00000800L             /* Graph */
  78 #define _CTYPE_L        0x00001000L             /* Lower */
  79 #define _CTYPE_P        0x00002000L             /* Punct */
  80 #define _CTYPE_S        0x00004000L             /* Space */
  81 #define _CTYPE_U        0x00008000L             /* Upper */
  82 #define _CTYPE_X        0x00010000L             /* X digit */
  83 #define _CTYPE_B        0x00020000L             /* Blank */
  84 #define _CTYPE_R        0x00040000L             /* Print */
  85 #define _CTYPE_I        0x00080000L             /* Ideogram */
  86 #define _CTYPE_T        0x00100000L             /* Special */
  87 #define _CTYPE_Q        0x00200000L             /* Phonogram */
  88 #define _CTYPE_SW0      0x20000000L             /* 0 width character */
  89 #define _CTYPE_SW1      0x40000000L             /* 1 width character */
  90 #define _CTYPE_SW2      0x80000000L             /* 2 width character */
  91 #define _CTYPE_SW3      0xc0000000L             /* 3 width character */
  92 #define _CTYPE_SWM      0xe0000000L             /* Mask for screen width data */
  93 #define _CTYPE_SWS      30                      /* Bits to shift to get width */
  94
  95 #ifdef _NONSTD_SOURCE
  96 /*
  97  * Backward compatibility
  98  */
  99 #define _A              _CTYPE_A                /* Alpha */
 100 #define _C              _CTYPE_C                /* Control */
 101 #define _D              _CTYPE_D                /* Digit */
 102 #define _G              _CTYPE_G                /* Graph */
 103 #define _L              _CTYPE_L                /* Lower */
 104 #define _P              _CTYPE_P                /* Punct */
 105 #define _S              _CTYPE_S                /* Space */
 106 #define _U              _CTYPE_U                /* Upper */
 107 #define _X              _CTYPE_X                /* X digit */
 108 #define _B              _CTYPE_B                /* Blank */
 109 #define _R              _CTYPE_R                /* Print */
 110 #define _I              _CTYPE_I                /* Ideogram */
 111 #define _T              _CTYPE_T                /* Special */
 112 #define _Q              _CTYPE_Q                /* Phonogram */
 113 #define _SW0            _CTYPE_SW0              /* 0 width character */
 114 #define _SW1            _CTYPE_SW1              /* 1 width character */
 115 #define _SW2            _CTYPE_SW2              /* 2 width character */
 116 #define _SW3            _CTYPE_SW3              /* 3 width character */
 117 #endif /* _NONSTD_SOURCE */
 118
 119 __BEGIN_DECLS
 120 int     isalnum(int);
 121 int     isalpha(int);
 122 int     isblank(int);
 123 int     iscntrl(int);
 124 int     isdigit(int);
 125 int     isgraph(int);
 126 int     islower(int);
 127 int     isprint(int);
 128 int     ispunct(int);
 129 int     isspace(int);
 130 int     isupper(int);
 131 int     isxdigit(int);
 132 int     tolower(int);
 133 int     toupper(int);
 134 int     isascii(int);
 135 int     toascii(int);
 136
 137 #if !defined(_ANSI_SOURCE) && !defined(_POSIX_C_SOURCE)
 138 int     _tolower(int);
 139 int     _toupper(int);
 140 int     digittoint(int);
 141 int     ishexnumber(int);
 142 int     isideogram(int);
 143 int     isnumber(int);
 144 int     isphonogram(int);
 145 int     isrune(int);
 146 int     isspecial(int);
 147 #endif
 148 __END_DECLS
 149
 150
 151 #define isalnum(c)      __istype((c), (_CTYPE_A|_CTYPE_D))
 152 #define isalpha(c)      __istype((c), _CTYPE_A)
 153 #define isblank(c)      __istype((c), _CTYPE_B)
 154 #define iscntrl(c)      __istype((c), _CTYPE_C)
 155 #define isdigit(c)      __isctype((c), _CTYPE_D)        /* ANSI -- locale independent */
 156 #define isgraph(c)      __istype((c), _CTYPE_G)
 157 #define islower(c)      __istype((c), _CTYPE_L)
 158 #define isprint(c)      __istype((c), _CTYPE_R)
 159 #define ispunct(c)      __istype((c), _CTYPE_P)
 160 #define isspace(c)      __istype((c), _CTYPE_S)
 161 #define isupper(c)      __istype((c), _CTYPE_U)
 162 #define isxdigit(c)     __isctype((c), _CTYPE_X)        /* ANSI -- locale independent */
 163 #define tolower(c)      __tolower(c)
 164 #define toupper(c)      __toupper(c)
 165
 166 #define _tolower(c)     __tolower(c)
 167 #define _toupper(c)     __toupper(c)
 168
 169 #if !defined(_ANSI_SOURCE) && !defined(_POSIX_C_SOURCE)
 170 #define digittoint(c)   __maskrune((c), 0xFF)
 171 #define isascii(c)      (((c) & ~0x7F) == 0)
 172 #define ishexnumber(c)  __istype((c), _CTYPE_X)
 173 #define isideogram(c)   __istype((c), _CTYPE_I)
 174 #define isnumber(c)     __istype((c), _CTYPE_D)
 175 #define isphonogram(c)  __istype((c), _CTYPE_Q)
 176 #define isrune(c)       __istype((c),  0xFFFFFF00L)
 177 #define isspecial(c)    __istype((c), _CTYPE_T)
 178 #define toascii(c)      ((c) & 0x7F)
 179 #endif
 180
 181 /* See comments in <machine/_type.h> about __darwin_ct_rune_t. */
 182 __BEGIN_DECLS
 183 unsigned long           ___runetype(__darwin_ct_rune_t);
 184 __darwin_ct_rune_t      ___tolower(__darwin_ct_rune_t);
 185 __darwin_ct_rune_t      ___toupper(__darwin_ct_rune_t);
 186 __END_DECLS
 187
 188 /*
 189  * _EXTERNALIZE_CTYPE_INLINES_ is defined in locale/nomacros.c to tell us
 190  * to generate code for extern versions of all our inline functions.
 191  */
 192 #ifdef _EXTERNALIZE_CTYPE_INLINES_
 193 #define _USE_CTYPE_INLINE_
 194 #define static
 195 #define __inline
 196 #endif
 197
 198 /*
 199  * Use inline functions if we are allowed to and the compiler supports them.
 200  */
 201 #if !defined(_DONT_USE_CTYPE_INLINE_) && \
 202     (defined(_USE_CTYPE_INLINE_) || defined(__GNUC__) || defined(__cplusplus))
 203
 204 #ifdef USE_ASCII
 205 static __inline int
 206 __maskrune(__darwin_ct_rune_t _c, unsigned long _f)
 207 {
 208         return _CurrentRuneLocale->__runetype[_c && 0xff] & _f;
 209 }
 210 //Begin-Libc
 211 #elif defined(__LIBC__)
 212 static __inline int
 213 __maskrune(__darwin_ct_rune_t _c, unsigned long _f)
 214 {
 215         return ((_c < 0 || _c >= _CACHED_RUNES) ? ___runetype(_c) :
 216                 __current_locale()->__lc_ctype->_CurrentRuneLocale.__runetype[_c]) & _f;
 217 }
 218 //End-Libc
 219 #else /* !USE_ASCII */
 220 __BEGIN_DECLS
 221 int                     __maskrune(__darwin_ct_rune_t, unsigned long);
 222 __END_DECLS
 223 #endif /* USE_ASCII */
 224
 225 static __inline int
 226 __istype(__darwin_ct_rune_t _c, unsigned long _f)
 227 {
 228 #ifdef USE_ASCII
 229         return !!(__maskrune(_c, _f));
 230 #else /* USE_ASCII */
 231         return !!(isascii(_c) ? (_DefaultRuneLocale.__runetype[_c] & _f)
 232                 : __maskrune(_c, _f));
 233 #endif /* USE_ASCII */
 234 }
 235
 236 static __inline __darwin_ct_rune_t
 237 __isctype(__darwin_ct_rune_t _c, unsigned long _f)
 238 {
 239 #ifdef USE_ASCII
 240         return !!(_DefaultRuneLocale.__runetype[_c & 0xff] & _f);
 241 #else /* USE_ASCII */
 242         return (_c < 0 || _c >= _CACHED_RUNES) ? 0 :
 243                 !!(_DefaultRuneLocale.__runetype[_c] & _f);
 244 #endif /* USE_ASCII */
 245 }
 246
 247 #ifdef USE_ASCII
 248 static __inline __darwin_ct_rune_t
 249 __toupper(__darwin_ct_rune_t _c)
 250 {
 251         return _CurrentRuneLocale->__mapupper[_c & 0xff];
 252 }
 253
 254 static __inline __darwin_ct_rune_t
 255 __tolower(__darwin_ct_rune_t _c)
 256 {
 257         return _CurrentRuneLocale->__maplower[_c & 0xff];
 258 }
 259 //Begin-Libc
 260 #elif defined(__LIBC__)
 261 /*
 262  * We can't do what we do for __toupper_l() (check for ASCII first, then call
 263  * ___toupper_l() otherwise) because versions of ___toupper() before Tiger
 264  * assume c >= _CACHED_RUNES.  So we are stuck making __toupper() a routine
 265  * to hide the extended locale details, outside of Libc.
 266  */
 267 static __inline __darwin_ct_rune_t
 268 __toupper(__darwin_ct_rune_t _c)
 269 {
 270         return (_c < 0 || _c >= _CACHED_RUNES) ? ___toupper(_c) :
 271                 __current_locale()->__lc_ctype->_CurrentRuneLocale.__mapupper[_c];
 272 }
 273
 274 static __inline __darwin_ct_rune_t
 275 __tolower(__darwin_ct_rune_t _c)
 276 {
 277         return (_c < 0 || _c >= _CACHED_RUNES) ? ___tolower(_c) :
 278                 __current_locale()->__lc_ctype->_CurrentRuneLocale.__maplower[_c];
 279 }
 280 //End-Libc
 281 #else /* USE_ASCII */
 282 __BEGIN_DECLS
 283 __darwin_ct_rune_t      __toupper(__darwin_ct_rune_t);
 284 __darwin_ct_rune_t      __tolower(__darwin_ct_rune_t);
 285 __END_DECLS
 286 #endif /* USE_ASCII */
 287
 288 static __inline int
 289 __wcwidth(__darwin_ct_rune_t _c)
 290 {
 291         unsigned int _x;
 292
 293         if (_c == 0)
 294                 return (0);
 295         _x = (unsigned int)__maskrune(_c, _CTYPE_SWM|_CTYPE_R);
 296         if ((_x & _CTYPE_SWM) != 0)
 297                 return ((_x & _CTYPE_SWM) >> _CTYPE_SWS);
 298         return ((_x & _CTYPE_R) != 0 ? 1 : -1);
 299 }
 300
 301 #else /* not using inlines */
 302
 303 __BEGIN_DECLS
 304 int                     __maskrune(__darwin_ct_rune_t, unsigned long);
 305 int                     __istype (__darwin_ct_rune_t, unsigned long);
 306 int                     __isctype(__darwin_ct_rune_t, unsigned long);
 307 __darwin_ct_rune_t      __toupper(__darwin_ct_rune_t);
 308 __darwin_ct_rune_t      __tolower(__darwin_ct_rune_t);
 309 int                     __wcwidth(__darwin_ct_rune_t);
 310 __END_DECLS
 311 #endif /* using inlines */
 312
 313 #ifdef _USE_EXTENDED_LOCALES_
 314 #include <xlocale/_ctype.h>
 315 #endif /* _USE_EXTENDED_LOCALES_ */
 316
 317 #endif /* !_CTYPE_H_ */