/* $MirOS: src/include/ctype.h,v 1.19 2008/11/30 13:08:49 tg Exp $ */

/*-
 * Copyright (c) 2006, 2007, 2008
 *	Thorsten Glaser <tg@mirbsd.de>
 *
 * Provided that these terms and disclaimer and all copyright notices
 * are retained or reproduced in an accompanying document, permission
 * is granted to deal in this work without restriction, including un-
 * limited rights to use, publicly perform, distribute, sell, modify,
 * merge, give away, or sublicence.
 *
 * This work is provided "AS IS" and WITHOUT WARRANTY of any kind, to
 * the utmost extent permitted by applicable law, neither express nor
 * implied; without malicious intent or gross negligence. In no event
 * may a licensor, author or contributor be held liable for indirect,
 * direct, other damage, loss, or other issues arising in any way out
 * of dealing in the work, even if advised of the possibility of such
 * damage or existence of a defect, except proven that it results out
 * of said person's immediate fault when using the work as intended.
 */

#ifndef _CTYPE_H_
#define _CTYPE_H_

#include <sys/cdefs.h>

/* from src/lib/libc/include/mir18n.h,v 1.18 */
#define _ctp_alnum	0x000C
#define _ctp_alpha	0x0004
#define _ctp_blank	0x0040
#define _ctp_cntrl	0x0080
#define _ctp_digit	0x0408
#define _ctp_graph	0x1020
#define _ctp_lower	0x0102
#define _ctp_print	0x0020
#define _ctp_punct	0x1C20
#define _ctp_space	0x0010
#define _ctp_title	0x0003
#define _ctp_upper	0x0201
#define _ctp_xdigit	0x0008

__BEGIN_DECLS
int	isalnum(int);
int	isalpha(int);
int	iscntrl(int);
int	isdigit(int);
int	isgraph(int);
int	islower(int);
int	isprint(int);
int	ispunct(int);
int	isspace(int);
int	istitle(int);
int	isupper(int);
int	isxdigit(int);
int	tolower(int);
int	totitle(int);
int	toupper(int);

#if !defined(_ANSI_SOURCE) && !defined(_POSIX_SOURCE)
int	isascii(int);
#if __OPENBSD_VISIBLE
int	isbinry(int);
#endif
int	isblank(int);
int	toascii(int);
#endif /* !_ANSI_SOURCE && !_POSIX_SOURCE */

#if !defined(lint)

extern const unsigned char __C_attribute_table_pg[256];

#ifdef __GNUC__
#define __CTYPE_IMPL(c,t) __extension__({				\
	unsigned __CTYPE_Ic = (c);					\
									\
	(__CTYPE_Ic > 127) ? 0 :					\
	 ((__C_attribute_table_pg[__CTYPE_Ic] & (_ctp_ ## t & 0xFF)) &&	\
	 !(__C_attribute_table_pg[__CTYPE_Ic] & (_ctp_ ## t >> 8)));	\
})
#else
#define __CTYPE_IMPL(c,t)				\
	((((unsigned)(c)) > 127) ? 0 :			\
	 ((__C_attribute_table_pg[((unsigned)(c))] &	\
	    (_ctp_ ## t & 0xFF)) &&			\
	 !(__C_attribute_table_pg[((unsigned)(c))] &	\
	    (_ctp_ ## t >> 8))))
#endif

#define isalnum(c)	__CTYPE_IMPL((c),alnum)
#define isalpha(c)	__CTYPE_IMPL((c),alpha)
#define iscntrl(c)	__CTYPE_IMPL((c),cntrl)
#define isdigit(c)	__CTYPE_IMPL((c),digit)
#define isgraph(c)	__CTYPE_IMPL((c),graph)
#define islower(c)	__CTYPE_IMPL((c),lower)
#define isprint(c)	__CTYPE_IMPL((c),print)
#define ispunct(c)	__CTYPE_IMPL((c),punct)
#define isspace(c)	__CTYPE_IMPL((c),space)
#define istitle(c)	0
#define isupper(c)	__CTYPE_IMPL((c),upper)
#define isxdigit(c)	__CTYPE_IMPL((c),xdigit)

#ifdef __GNUC__
#define tolower(c)	__extension__({			\
	int __CTYPE_Tl = (c);				\
							\
	(__CTYPE_Tl >= 'A') && (__CTYPE_Tl <= 'Z') ?	\
	    __CTYPE_Tl - 'A' + 'a' : __CTYPE_Tl;	\
})
#define toupper(c)	__extension__({			\
	int __CTYPE_Tu = (c);				\
							\
	(__CTYPE_Tu >= 'a') && (__CTYPE_Tu <= 'z') ?	\
	    __CTYPE_Tu - 'a' + 'A' : __CTYPE_Tu;	\
})
#else
#define tolower(c)	(((c) >= 'A') && ((c) <= 'Z') ? (c) - 'A' + 'a' : (c))
#define toupper(c)	(((c) >= 'a') && ((c) <= 'z') ? (c) - 'a' + 'A' : (c))
#endif
#define totitle(c)	toupper(c)

#if !defined(_ANSI_SOURCE) && !defined(_POSIX_SOURCE)
#define isascii(c)	((unsigned)(c) < 0x80)
#define isblank(c)	__CTYPE_IMPL((c),blank)
#define toascii(c)	((c) & 0x7F)

#define _tolower(c)	((c) | 0x20)
#define _toupper(c)	((c) & 0xDF)
#endif /* !_ANSI_SOURCE && !_POSIX_SOURCE */

#if __OPENBSD_VISIBLE
#define isbinry(c)	__extension__({				\
	uint8_t __CTYPE_Ic = (c);				\
								\
	((__CTYPE_Ic == 0x00) || (__CTYPE_Ic == 0xC0) ||	\
	    (__CTYPE_Ic == 0xC1) || (__CTYPE_Ic > 0xEF));	\
})
#endif

#endif /* !lint */

__END_DECLS

#endif /* !_CTYPE_H_ */