include/ctype.h

   1 /*
   2  * Copyright (c) 2000, 2005, 2008 Apple 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 <sys/cdefs.h>
  73 #include <runetype.h>
  74
  75 #define _CTYPE_A        0x00000100L             /* Alpha */
  76 #define _CTYPE_C        0x00000200L             /* Control */
  77 #define _CTYPE_D        0x00000400L             /* Digit */
  78 #define _CTYPE_G        0x00000800L             /* Graph */
  79 #define _CTYPE_L        0x00001000L             /* Lower */
  80 #define _CTYPE_P        0x00002000L             /* Punct */
  81 #define _CTYPE_S        0x00004000L             /* Space */
  82 #define _CTYPE_U        0x00008000L             /* Upper */
  83 #define _CTYPE_X        0x00010000L             /* X digit */
  84 #define _CTYPE_B        0x00020000L             /* Blank */
  85 #define _CTYPE_R        0x00040000L             /* Print */
  86 #define _CTYPE_I        0x00080000L             /* Ideogram */
  87 #define _CTYPE_T        0x00100000L             /* Special */
  88 #define _CTYPE_Q        0x00200000L             /* Phonogram */
  89 #define _CTYPE_SW0      0x20000000L             /* 0 width character */
  90 #define _CTYPE_SW1      0x40000000L             /* 1 width character */
  91 #define _CTYPE_SW2      0x80000000L             /* 2 width character */
  92 #define _CTYPE_SW3      0xc0000000L             /* 3 width character */
  93 #define _CTYPE_SWM      0xe0000000L             /* Mask for screen width data */
  94 #define _CTYPE_SWS      30                      /* Bits to shift to get width */
  95
  96 #ifdef _NONSTD_SOURCE
  97 /*
  98  * Backward compatibility
  99  */
 100 #define _A              _CTYPE_A                /* Alpha */
 101 #define _C              _CTYPE_C                /* Control */
 102 #define _D              _CTYPE_D                /* Digit */
 103 #define _G              _CTYPE_G                /* Graph */
 104 #define _L              _CTYPE_L                /* Lower */
 105 #define _P              _CTYPE_P                /* Punct */
 106 #define _S              _CTYPE_S                /* Space */
 107 #define _U              _CTYPE_U                /* Upper */
 108 #define _X              _CTYPE_X                /* X digit */
 109 #define _B              _CTYPE_B                /* Blank */
 110 #define _R              _CTYPE_R                /* Print */
 111 #define _I              _CTYPE_I                /* Ideogram */
 112 #define _T              _CTYPE_T                /* Special */
 113 #define _Q              _CTYPE_Q                /* Phonogram */
 114 #define _SW0            _CTYPE_SW0              /* 0 width character */
 115 #define _SW1            _CTYPE_SW1              /* 1 width character */
 116 #define _SW2            _CTYPE_SW2              /* 2 width character */
 117 #define _SW3            _CTYPE_SW3              /* 3 width character */
 118 #endif /* _NONSTD_SOURCE */
 119
 120 //Begin-Libc
 121 /*
 122  * _EXTERNALIZE_CTYPE_INLINES_ is defined in locale/nomacros.c to tell us
 123  * to generate code for extern versions of all intermediate inline functions.
 124  */
 125 #ifdef _EXTERNALIZE_CTYPE_INLINES_
 126 #define _USE_CTYPE_INLINE_
 127 #define __DARWIN_CTYPE_inline
 128 #else /* !_EXTERNALIZE_CTYPE_INLINES_ */
 129 //End-Libc
 130 #define __DARWIN_CTYPE_inline           __header_inline
 131 //Begin-Libc
 132 #endif /* !_EXTERNALIZE_CTYPE_INLINES_ */
 133 //End-Libc
 134
 135 //Begin-Libc
 136 /*
 137  * _EXTERNALIZE_CTYPE_INLINES_TOP_ is defined in locale/isctype.c to tell us
 138  * to generate code for extern versions of all top-level inline functions.
 139  */
 140 #ifdef _EXTERNALIZE_CTYPE_INLINES_TOP_
 141 #define _USE_CTYPE_INLINE_
 142 #define __DARWIN_CTYPE_TOP_inline
 143 #else /* !_EXTERNALIZE_CTYPE_INLINES_TOP_ */
 144 //End-Libc
 145 #define __DARWIN_CTYPE_TOP_inline       __header_inline
 146 //Begin-Libc
 147 #endif /* _EXTERNALIZE_CTYPE_INLINES_TOP_ */
 148 //End-Libc
 149
 150 /*
 151  * Use inline functions if we are allowed to and the compiler supports them.
 152  */
 153 #if !defined(_DONT_USE_CTYPE_INLINE_) && \
 154     (defined(_USE_CTYPE_INLINE_) || defined(__GNUC__) || defined(__cplusplus))
 155
 156 /* See comments in <machine/_type.h> about __darwin_ct_rune_t. */
 157 __BEGIN_DECLS
 158 unsigned long           ___runetype(__darwin_ct_rune_t);
 159 __darwin_ct_rune_t      ___tolower(__darwin_ct_rune_t);
 160 __darwin_ct_rune_t      ___toupper(__darwin_ct_rune_t);
 161 __END_DECLS
 162
 163 __DARWIN_CTYPE_TOP_inline int
 164 isascii(int _c)
 165 {
 166         return ((_c & ~0x7F) == 0);
 167 }
 168
 169 #ifdef USE_ASCII
 170 __DARWIN_CTYPE_inline int
 171 __maskrune(__darwin_ct_rune_t _c, unsigned long _f)
 172 {
 173         return _DefaultRuneLocale.__runetype[_c & 0xff] & _f;
 174 }
 175 //Begin-Libc
 176 #elif defined(__LIBC__)
 177 __DARWIN_CTYPE_inline int
 178 __maskrune(__darwin_ct_rune_t _c, unsigned long _f)
 179 {
 180         return ((_c < 0 || _c >= _CACHED_RUNES) ? ___runetype(_c) :
 181                 __current_locale()->__lc_ctype->_CurrentRuneLocale.__runetype[_c]) & _f;
 182 }
 183 //End-Libc
 184 #else /* !USE_ASCII */
 185 __BEGIN_DECLS
 186 int                     __maskrune(__darwin_ct_rune_t, unsigned long);
 187 __END_DECLS
 188 #endif /* USE_ASCII */
 189
 190 __DARWIN_CTYPE_inline int
 191 __istype(__darwin_ct_rune_t _c, unsigned long _f)
 192 {
 193 #ifdef USE_ASCII
 194         return !!(__maskrune(_c, _f));
 195 #else /* USE_ASCII */
 196         return (isascii(_c) ? !!(_DefaultRuneLocale.__runetype[_c] & _f)
 197                 : !!__maskrune(_c, _f));
 198 #endif /* USE_ASCII */
 199 }
 200
 201 __DARWIN_CTYPE_inline __darwin_ct_rune_t
 202 __isctype(__darwin_ct_rune_t _c, unsigned long _f)
 203 {
 204 #ifdef USE_ASCII
 205         return !!(__maskrune(_c, _f));
 206 #else /* USE_ASCII */
 207         return (_c < 0 || _c >= _CACHED_RUNES) ? 0 :
 208                 !!(_DefaultRuneLocale.__runetype[_c] & _f);
 209 #endif /* USE_ASCII */
 210 }
 211
 212 #ifdef USE_ASCII
 213 __DARWIN_CTYPE_inline __darwin_ct_rune_t
 214 __toupper(__darwin_ct_rune_t _c)
 215 {
 216         return _DefaultRuneLocale.__mapupper[_c & 0xff];
 217 }
 218
 219 __DARWIN_CTYPE_inline __darwin_ct_rune_t
 220 __tolower(__darwin_ct_rune_t _c)
 221 {
 222         return _DefaultRuneLocale.__maplower[_c & 0xff];
 223 }
 224 //Begin-Libc
 225 #elif defined(__LIBC__)
 226 /*
 227  * We can't do what we do for __toupper_l() (check for ASCII first, then call
 228  * ___toupper_l() otherwise) because versions of ___toupper() before Tiger
 229  * assume c >= _CACHED_RUNES.  So we are stuck making __toupper() a routine
 230  * to hide the extended locale details, outside of Libc.
 231  */
 232 __DARWIN_CTYPE_inline __darwin_ct_rune_t
 233 __toupper(__darwin_ct_rune_t _c)
 234 {
 235         return (_c < 0 || _c >= _CACHED_RUNES) ? ___toupper(_c) :
 236                 __current_locale()->__lc_ctype->_CurrentRuneLocale.__mapupper[_c];
 237 }
 238
 239 __DARWIN_CTYPE_inline __darwin_ct_rune_t
 240 __tolower(__darwin_ct_rune_t _c)
 241 {
 242         return (_c < 0 || _c >= _CACHED_RUNES) ? ___tolower(_c) :
 243                 __current_locale()->__lc_ctype->_CurrentRuneLocale.__maplower[_c];
 244 }
 245 //End-Libc
 246 #else /* !USE_ASCII */
 247 __BEGIN_DECLS
 248 __darwin_ct_rune_t      __toupper(__darwin_ct_rune_t);
 249 __darwin_ct_rune_t      __tolower(__darwin_ct_rune_t);
 250 __END_DECLS
 251 #endif /* USE_ASCII */
 252
 253 __DARWIN_CTYPE_inline int
 254 __wcwidth(__darwin_ct_rune_t _c)
 255 {
 256         unsigned int _x;
 257
 258         if (_c == 0)
 259                 return (0);
 260         _x = (unsigned int)__maskrune(_c, _CTYPE_SWM|_CTYPE_R);
 261         if ((_x & _CTYPE_SWM) != 0)
 262                 return ((_x & _CTYPE_SWM) >> _CTYPE_SWS);
 263         return ((_x & _CTYPE_R) != 0 ? 1 : -1);
 264 }
 265
 266 #ifndef _EXTERNALIZE_CTYPE_INLINES_
 267
 268 #define _tolower(c)     __tolower(c)
 269 #define _toupper(c)     __toupper(c)
 270
 271 __DARWIN_CTYPE_TOP_inline int
 272 isalnum(int _c)
 273 {
 274         return (__istype(_c, _CTYPE_A|_CTYPE_D));
 275 }
 276
 277 __DARWIN_CTYPE_TOP_inline int
 278 isalpha(int _c)
 279 {
 280         return (__istype(_c, _CTYPE_A));
 281 }
 282
 283 __DARWIN_CTYPE_TOP_inline int
 284 isblank(int _c)
 285 {
 286         return (__istype(_c, _CTYPE_B));
 287 }
 288
 289 __DARWIN_CTYPE_TOP_inline int
 290 iscntrl(int _c)
 291 {
 292         return (__istype(_c, _CTYPE_C));
 293 }
 294
 295 /* ANSI -- locale independent */
 296 __DARWIN_CTYPE_TOP_inline int
 297 isdigit(int _c)
 298 {
 299         return (__isctype(_c, _CTYPE_D));
 300 }
 301
 302 __DARWIN_CTYPE_TOP_inline int
 303 isgraph(int _c)
 304 {
 305         return (__istype(_c, _CTYPE_G));
 306 }
 307
 308 __DARWIN_CTYPE_TOP_inline int
 309 islower(int _c)
 310 {
 311         return (__istype(_c, _CTYPE_L));
 312 }
 313
 314 __DARWIN_CTYPE_TOP_inline int
 315 isprint(int _c)
 316 {
 317         return (__istype(_c, _CTYPE_R));
 318 }
 319
 320 __DARWIN_CTYPE_TOP_inline int
 321 ispunct(int _c)
 322 {
 323         return (__istype(_c, _CTYPE_P));
 324 }
 325
 326 __DARWIN_CTYPE_TOP_inline int
 327 isspace(int _c)
 328 {
 329         return (__istype(_c, _CTYPE_S));
 330 }
 331
 332 __DARWIN_CTYPE_TOP_inline int
 333 isupper(int _c)
 334 {
 335         return (__istype(_c, _CTYPE_U));
 336 }
 337
 338 /* ANSI -- locale independent */
 339 __DARWIN_CTYPE_TOP_inline int
 340 isxdigit(int _c)
 341 {
 342         return (__isctype(_c, _CTYPE_X));
 343 }
 344
 345 __DARWIN_CTYPE_TOP_inline int
 346 toascii(int _c)
 347 {
 348         return (_c & 0x7F);
 349 }
 350
 351 __DARWIN_CTYPE_TOP_inline int
 352 tolower(int _c)
 353 {
 354         return (__tolower(_c));
 355 }
 356
 357 __DARWIN_CTYPE_TOP_inline int
 358 toupper(int _c)
 359 {
 360         return (__toupper(_c));
 361 }
 362
 363 #if !defined(_ANSI_SOURCE) && (!defined(_POSIX_C_SOURCE) || defined(_DARWIN_C_SOURCE))
 364 __DARWIN_CTYPE_TOP_inline int
 365 digittoint(int _c)
 366 {
 367         return (__maskrune(_c, 0x0F));
 368 }
 369
 370 __DARWIN_CTYPE_TOP_inline int
 371 ishexnumber(int _c)
 372 {
 373         return (__istype(_c, _CTYPE_X));
 374 }
 375
 376 __DARWIN_CTYPE_TOP_inline int
 377 isideogram(int _c)
 378 {
 379         return (__istype(_c, _CTYPE_I));
 380 }
 381
 382 __DARWIN_CTYPE_TOP_inline int
 383 isnumber(int _c)
 384 {
 385         return (__istype(_c, _CTYPE_D));
 386 }
 387
 388 __DARWIN_CTYPE_TOP_inline int
 389 isphonogram(int _c)
 390 {
 391         return (__istype(_c, _CTYPE_Q));
 392 }
 393
 394 __DARWIN_CTYPE_TOP_inline int
 395 isrune(int _c)
 396 {
 397         return (__istype(_c, 0xFFFFFFF0L));
 398 }
 399
 400 __DARWIN_CTYPE_TOP_inline int
 401 isspecial(int _c)
 402 {
 403         return (__istype(_c, _CTYPE_T));
 404 }
 405 #endif /* !_ANSI_SOURCE && (!_POSIX_C_SOURCE || _DARWIN_C_SOURCE) */
 406 #endif /* _EXTERNALIZE_CTYPE_INLINES_ */
 407
 408 #else /* not using inlines */
 409
 410 __BEGIN_DECLS
 411 int     isalnum(int);
 412 int     isalpha(int);
 413 int     isblank(int);
 414 int     iscntrl(int);
 415 int     isdigit(int);
 416 int     isgraph(int);
 417 int     islower(int);
 418 int     isprint(int);
 419 int     ispunct(int);
 420 int     isspace(int);
 421 int     isupper(int);
 422 int     isxdigit(int);
 423 int     tolower(int);
 424 int     toupper(int);
 425 int     isascii(int);
 426 int     toascii(int);
 427
 428 #if !defined(_ANSI_SOURCE) && (!defined(_POSIX_C_SOURCE) || defined(_DARWIN_C_SOURCE))
 429 int     _tolower(int);
 430 int     _toupper(int);
 431 int     digittoint(int);
 432 int     ishexnumber(int);
 433 int     isideogram(int);
 434 int     isnumber(int);
 435 int     isphonogram(int);
 436 int     isrune(int);
 437 int     isspecial(int);
 438 #endif
 439 __END_DECLS
 440
 441 #endif /* using inlines */
 442
 443 #ifdef _USE_EXTENDED_LOCALES_
 444 #include <xlocale/_ctype.h>
 445 #endif /* _USE_EXTENDED_LOCALES_ */
 446
 447 #endif /* !_CTYPE_H_ */