f5dde0166d
FreeBSD extended ctypes to include numbers (e.g. isnumber()) but never actually implemented it. The isnumber() function was equivalent to the isdigit() function in every case. Now that DragonFly's ctype source files have number definitions, the number ctype can finally be implemented. It's given a new flag _CTYPE_N. The isalnum() and iswalnum() functions have been changed to use this flag rather than the _CTYPE_D digit flag. While isalnum(), isnumber(), and their wide equivalents now return different values in locale cases, the ishexnumber() and iswhexnumber() functions are unchanged. They are still aliases for isxdigit() and iswxdigit(). Also change ctype.h for isdigit and isxdigit to use sbistype like the other functions. Obtained from: dragonfly
188 lines
5.9 KiB
C
188 lines
5.9 KiB
C
/*
|
|
* Copyright (c) 1989, 1993
|
|
* The Regents of the University of California. All rights reserved.
|
|
* (c) UNIX System Laboratories, Inc.
|
|
* All or some portions of this file are derived from material licensed
|
|
* to the University of California by American Telephone and Telegraph
|
|
* Co. or Unix System Laboratories, Inc. and are reproduced herein with
|
|
* the permission of UNIX System Laboratories, Inc.
|
|
*
|
|
* This code is derived from software contributed to Berkeley by
|
|
* Paul Borman at Krystal Technologies.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
* 3. Neither the name of the University nor the names of its contributors
|
|
* may be used to endorse or promote products derived from this software
|
|
* without specific prior written permission.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
|
|
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
|
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
|
* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
|
|
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
|
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
|
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
|
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
|
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
|
|
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
|
|
* SUCH DAMAGE.
|
|
*
|
|
* From @(#)ctype.h 8.4 (Berkeley) 1/21/94
|
|
* From FreeBSD: src/include/ctype.h,v 1.27 2004/06/23 07:11:39 tjr Exp
|
|
* $FreeBSD$
|
|
*/
|
|
|
|
#ifndef __CTYPE_H_
|
|
#define __CTYPE_H_
|
|
|
|
#include <sys/cdefs.h>
|
|
#include <sys/_types.h>
|
|
|
|
#define _CTYPE_A 0x00000100L /* Alpha */
|
|
#define _CTYPE_C 0x00000200L /* Control */
|
|
#define _CTYPE_D 0x00000400L /* Digit */
|
|
#define _CTYPE_G 0x00000800L /* Graph */
|
|
#define _CTYPE_L 0x00001000L /* Lower */
|
|
#define _CTYPE_P 0x00002000L /* Punct */
|
|
#define _CTYPE_S 0x00004000L /* Space */
|
|
#define _CTYPE_U 0x00008000L /* Upper */
|
|
#define _CTYPE_X 0x00010000L /* X digit */
|
|
#define _CTYPE_B 0x00020000L /* Blank */
|
|
#define _CTYPE_R 0x00040000L /* Print */
|
|
#define _CTYPE_I 0x00080000L /* Ideogram */
|
|
#define _CTYPE_T 0x00100000L /* Special */
|
|
#define _CTYPE_Q 0x00200000L /* Phonogram */
|
|
#define _CTYPE_N 0x00400000L /* Number (superset of digit) */
|
|
#define _CTYPE_SW0 0x20000000L /* 0 width character */
|
|
#define _CTYPE_SW1 0x40000000L /* 1 width character */
|
|
#define _CTYPE_SW2 0x80000000L /* 2 width character */
|
|
#define _CTYPE_SW3 0xc0000000L /* 3 width character */
|
|
#define _CTYPE_SWM 0xe0000000L /* Mask for screen width data */
|
|
#define _CTYPE_SWS 30 /* Bits to shift to get width */
|
|
|
|
/* See comments in <sys/_types.h> about __ct_rune_t. */
|
|
__BEGIN_DECLS
|
|
unsigned long ___runetype(__ct_rune_t) __pure;
|
|
__ct_rune_t ___tolower(__ct_rune_t) __pure;
|
|
__ct_rune_t ___toupper(__ct_rune_t) __pure;
|
|
__END_DECLS
|
|
|
|
/*
|
|
* _EXTERNALIZE_CTYPE_INLINES_ is defined in locale/nomacros.c to tell us
|
|
* to generate code for extern versions of all our inline functions.
|
|
*/
|
|
#ifdef _EXTERNALIZE_CTYPE_INLINES_
|
|
#define _USE_CTYPE_INLINE_
|
|
#define static
|
|
#define __inline
|
|
#endif
|
|
|
|
extern int __mb_sb_limit;
|
|
|
|
/*
|
|
* Use inline functions if we are allowed to and the compiler supports them.
|
|
*/
|
|
#if !defined(_DONT_USE_CTYPE_INLINE_) && \
|
|
(defined(_USE_CTYPE_INLINE_) || defined(__GNUC__) || defined(__cplusplus))
|
|
|
|
#include <runetype.h>
|
|
|
|
static __inline int
|
|
__maskrune(__ct_rune_t _c, unsigned long _f)
|
|
{
|
|
return ((_c < 0 || _c >= _CACHED_RUNES) ? ___runetype(_c) :
|
|
_CurrentRuneLocale->__runetype[_c]) & _f;
|
|
}
|
|
|
|
static __inline int
|
|
__sbmaskrune(__ct_rune_t _c, unsigned long _f)
|
|
{
|
|
return (_c < 0 || _c >= __mb_sb_limit) ? 0 :
|
|
_CurrentRuneLocale->__runetype[_c] & _f;
|
|
}
|
|
|
|
static __inline int
|
|
__istype(__ct_rune_t _c, unsigned long _f)
|
|
{
|
|
return (!!__maskrune(_c, _f));
|
|
}
|
|
|
|
static __inline int
|
|
__sbistype(__ct_rune_t _c, unsigned long _f)
|
|
{
|
|
return (!!__sbmaskrune(_c, _f));
|
|
}
|
|
|
|
static __inline int
|
|
__isctype(__ct_rune_t _c, unsigned long _f)
|
|
{
|
|
return (_c < 0 || _c >= 128) ? 0 :
|
|
!!(_DefaultRuneLocale.__runetype[_c] & _f);
|
|
}
|
|
|
|
static __inline __ct_rune_t
|
|
__toupper(__ct_rune_t _c)
|
|
{
|
|
return (_c < 0 || _c >= _CACHED_RUNES) ? ___toupper(_c) :
|
|
_CurrentRuneLocale->__mapupper[_c];
|
|
}
|
|
|
|
static __inline __ct_rune_t
|
|
__sbtoupper(__ct_rune_t _c)
|
|
{
|
|
return (_c < 0 || _c >= __mb_sb_limit) ? _c :
|
|
_CurrentRuneLocale->__mapupper[_c];
|
|
}
|
|
|
|
static __inline __ct_rune_t
|
|
__tolower(__ct_rune_t _c)
|
|
{
|
|
return (_c < 0 || _c >= _CACHED_RUNES) ? ___tolower(_c) :
|
|
_CurrentRuneLocale->__maplower[_c];
|
|
}
|
|
|
|
static __inline __ct_rune_t
|
|
__sbtolower(__ct_rune_t _c)
|
|
{
|
|
return (_c < 0 || _c >= __mb_sb_limit) ? _c :
|
|
_CurrentRuneLocale->__maplower[_c];
|
|
}
|
|
|
|
static __inline int
|
|
__wcwidth(__ct_rune_t _c)
|
|
{
|
|
unsigned int _x;
|
|
|
|
if (_c == 0)
|
|
return (0);
|
|
_x = (unsigned int)__maskrune(_c, _CTYPE_SWM|_CTYPE_R);
|
|
if ((_x & _CTYPE_SWM) != 0)
|
|
return ((_x & _CTYPE_SWM) >> _CTYPE_SWS);
|
|
return ((_x & _CTYPE_R) != 0 ? 1 : -1);
|
|
}
|
|
|
|
#else /* not using inlines */
|
|
|
|
__BEGIN_DECLS
|
|
int __maskrune(__ct_rune_t, unsigned long);
|
|
int __sbmaskrune(__ct_rune_t, unsigned long);
|
|
int __istype(__ct_rune_t, unsigned long);
|
|
int __sbistype(__ct_rune_t, unsigned long);
|
|
int __isctype(__ct_rune_t, unsigned long);
|
|
__ct_rune_t __toupper(__ct_rune_t);
|
|
__ct_rune_t __sbtoupper(__ct_rune_t);
|
|
__ct_rune_t __tolower(__ct_rune_t);
|
|
__ct_rune_t __sbtolower(__ct_rune_t);
|
|
int __wcwidth(__ct_rune_t);
|
|
__END_DECLS
|
|
#endif /* using inlines */
|
|
|
|
#endif /* !__CTYPE_H_ */
|