43 lines
1.4 KiB
C
43 lines
1.4 KiB
C
|
#ifndef __TL_CTYPE_H
|
||
|
|
#define __TL_CTYPE_H
|
||
|
|
|
||
|
|
#ifdef __cplusplus
|
||
|
|
extern "C"
|
||
|
|
{
|
||
|
|
#endif
|
||
|
|
|
||
|
|
extern char g_ctype[];
|
||
|
|
|
||
|
|
#define CT_UP 0x01 /* upper case */
|
||
|
|
#define CT_LOW 0x02 /* lower case */
|
||
|
|
#define CT_DIG 0x04 /* digit */
|
||
|
|
#define CT_CTL 0x08 /* control */
|
||
|
|
#define CT_PUN 0x10 /* punctuation */
|
||
|
|
#define CT_WHT 0x20 /* white space (space/cr/lf/tab) */
|
||
|
|
#define CT_HEX 0x40 /* hex digit */
|
||
|
|
#define CT_SP 0x80 /* hard space (0x20) */
|
||
|
|
|
||
|
|
/* without the cast to unsigned, DJGPP complains (using -Wall) */
|
||
|
|
#define isalnum(c) ((g_ctype + 1)[(unsigned)(c)] & (CT_UP | CT_LOW | CT_DIG))
|
||
|
|
#define isalpha(c) ((g_ctype + 1)[(unsigned)(c)] & (CT_UP | CT_LOW))
|
||
|
|
#define iscntrl(c) ((g_ctype + 1)[(unsigned)(c)] & (CT_CTL))
|
||
|
|
#define isdigit(c) ((g_ctype + 1)[(unsigned)(c)] & (CT_DIG))
|
||
|
|
#define isgraph(c) ((g_ctype + 1)[(unsigned)(c)] & (CT_PUN | CT_UP | CT_LOW | CT_DIG))
|
||
|
|
#define islower(c) ((g_ctype + 1)[(unsigned)(c)] & (CT_LOW))
|
||
|
|
#define isprint(c) ((g_ctype + 1)[(unsigned)(c)] & (CT_PUN | CT_UP | CT_LOW | CT_DIG | CT_SP))
|
||
|
|
#define ispunct(c) ((g_ctype + 1)[(unsigned)(c)] & (CT_PUN))
|
||
|
|
#define isspace(c) ((g_ctype + 1)[(unsigned)(c)] & (CT_WHT))
|
||
|
|
#define isupper(c) ((g_ctype + 1)[(unsigned)(c)] & (CT_UP))
|
||
|
|
#define isxdigit(c) ((g_ctype + 1)[(unsigned)(c)] & (CT_DIG | CT_HEX))
|
||
|
|
#define isascii(c) ((unsigned)(c) <= 0x7F)
|
||
|
|
#define toascii(c) ((unsigned)(c) & 0x7F)
|
||
|
|
|
||
|
|
#define tolower(c) (isupper(c) ? c + 'a' - 'A' : c)
|
||
|
|
#define toupper(c) (islower(c) ? c + 'A' - 'a' : c)
|
||
|
|
|
||
|
|
#ifdef __cplusplus
|
||
|
|
}
|
||
|
|
#endif
|
||
|
|
|
||
|
|
#endif
|