forked from KolibriOS/kolibrios
754f9336f0
git-svn-id: svn://kolibrios.org@4349 a494cfbc-eb01-0410-851d-a64ba20cac60
114 lines
3.8 KiB
C
114 lines
3.8 KiB
C
#ifndef _CTYPE_H_
|
|
#define _CTYPE_H_
|
|
|
|
#include "_ansi.h"
|
|
|
|
_BEGIN_STD_C
|
|
|
|
int _EXFUN(isalnum, (int __c));
|
|
int _EXFUN(isalpha, (int __c));
|
|
int _EXFUN(iscntrl, (int __c));
|
|
int _EXFUN(isdigit, (int __c));
|
|
int _EXFUN(isgraph, (int __c));
|
|
int _EXFUN(islower, (int __c));
|
|
int _EXFUN(isprint, (int __c));
|
|
int _EXFUN(ispunct, (int __c));
|
|
int _EXFUN(isspace, (int __c));
|
|
int _EXFUN(isupper, (int __c));
|
|
int _EXFUN(isxdigit,(int __c));
|
|
int _EXFUN(tolower, (int __c));
|
|
int _EXFUN(toupper, (int __c));
|
|
|
|
#if !defined(__STRICT_ANSI__) || defined(__cplusplus) || __STDC_VERSION__ >= 199901L
|
|
int _EXFUN(isblank, (int __c));
|
|
#endif
|
|
|
|
#ifndef __STRICT_ANSI__
|
|
int _EXFUN(isascii, (int __c));
|
|
int _EXFUN(toascii, (int __c));
|
|
#define _tolower(__c) ((unsigned char)(__c) - 'A' + 'a')
|
|
#define _toupper(__c) ((unsigned char)(__c) - 'a' + 'A')
|
|
#endif
|
|
|
|
#define _U 01
|
|
#define _L 02
|
|
#define _N 04
|
|
#define _S 010
|
|
#define _P 020
|
|
#define _C 040
|
|
#define _X 0100
|
|
#define _B 0200
|
|
|
|
#ifndef _MB_CAPABLE
|
|
_CONST
|
|
#endif
|
|
extern __IMPORT char *__ctype_ptr__;
|
|
|
|
#ifndef __cplusplus
|
|
/* These macros are intentionally written in a manner that will trigger
|
|
a gcc -Wall warning if the user mistakenly passes a 'char' instead
|
|
of an int containing an 'unsigned char'. Note that the sizeof will
|
|
always be 1, which is what we want for mapping EOF to __ctype_ptr__[0];
|
|
the use of a raw index inside the sizeof triggers the gcc warning if
|
|
__c was of type char, and sizeof masks side effects of the extra __c.
|
|
Meanwhile, the real index to __ctype_ptr__+1 must be cast to int,
|
|
since isalpha(0x100000001LL) must equal isalpha(1), rather than being
|
|
an out-of-bounds reference on a 64-bit machine. */
|
|
#define __ctype_lookup(__c) ((__ctype_ptr__+sizeof(""[__c]))[(int)(__c)])
|
|
|
|
#define isalpha(__c) (__ctype_lookup(__c)&(_U|_L))
|
|
#define isupper(__c) ((__ctype_lookup(__c)&(_U|_L))==_U)
|
|
#define islower(__c) ((__ctype_lookup(__c)&(_U|_L))==_L)
|
|
#define isdigit(__c) (__ctype_lookup(__c)&_N)
|
|
#define isxdigit(__c) (__ctype_lookup(__c)&(_X|_N))
|
|
#define isspace(__c) (__ctype_lookup(__c)&_S)
|
|
#define ispunct(__c) (__ctype_lookup(__c)&_P)
|
|
#define isalnum(__c) (__ctype_lookup(__c)&(_U|_L|_N))
|
|
#define isprint(__c) (__ctype_lookup(__c)&(_P|_U|_L|_N|_B))
|
|
#define isgraph(__c) (__ctype_lookup(__c)&(_P|_U|_L|_N))
|
|
#define iscntrl(__c) (__ctype_lookup(__c)&_C)
|
|
|
|
#if defined(__GNUC__) && \
|
|
(!defined(__STRICT_ANSI__) || __STDC_VERSION__ >= 199901L)
|
|
#define isblank(__c) \
|
|
__extension__ ({ __typeof__ (__c) __x = (__c); \
|
|
(__ctype_lookup(__x)&_B) || (int) (__x) == '\t';})
|
|
#endif
|
|
|
|
|
|
/* Non-gcc versions will get the library versions, and will be
|
|
slightly slower. These macros are not NLS-aware so they are
|
|
disabled if the system supports the extended character sets. */
|
|
# if defined(__GNUC__)
|
|
# if !defined (_MB_EXTENDED_CHARSETS_ISO) && !defined (_MB_EXTENDED_CHARSETS_WINDOWS)
|
|
# define toupper(__c) \
|
|
__extension__ ({ __typeof__ (__c) __x = (__c); \
|
|
islower (__x) ? (int) __x - 'a' + 'A' : (int) __x;})
|
|
# define tolower(__c) \
|
|
__extension__ ({ __typeof__ (__c) __x = (__c); \
|
|
isupper (__x) ? (int) __x - 'A' + 'a' : (int) __x;})
|
|
# else /* _MB_EXTENDED_CHARSETS* */
|
|
/* Allow a gcc warning if the user passed 'char', but defer to the
|
|
function. */
|
|
# define toupper(__c) \
|
|
__extension__ ({ __typeof__ (__c) __x = (__c); \
|
|
(void) __ctype_ptr__[__x]; (toupper) (__x);})
|
|
# define tolower(__c) \
|
|
__extension__ ({ __typeof__ (__c) __x = (__c); \
|
|
(void) __ctype_ptr__[__x]; (tolower) (__x);})
|
|
# endif /* _MB_EXTENDED_CHARSETS* */
|
|
# endif /* __GNUC__ */
|
|
#endif /* !__cplusplus */
|
|
|
|
#ifndef __STRICT_ANSI__
|
|
#define isascii(__c) ((unsigned)(__c)<=0177)
|
|
#define toascii(__c) ((__c)&0177)
|
|
#endif
|
|
|
|
/* For C++ backward-compatibility only. */
|
|
extern __IMPORT _CONST char _ctype_[];
|
|
|
|
_END_STD_C
|
|
|
|
#endif /* _CTYPE_H_ */
|