1/*
2 * Copyright (c) 1989, 1993
3 *	The Regents of the University of California.  All rights reserved.
4 * (c) UNIX System Laboratories, Inc.
5 * All or some portions of this file are derived from material licensed
6 * to the University of California by American Telephone and Telegraph
7 * Co. or Unix System Laboratories, Inc. and are reproduced herein with
8 * the permission of UNIX System Laboratories, Inc.
9 *
10 * This code is derived from software contributed to Berkeley by
11 * Paul Borman at Krystal Technologies.
12 *
13 * Redistribution and use in source and binary forms, with or without
14 * modification, are permitted provided that the following conditions
15 * are met:
16 * 1. Redistributions of source code must retain the above copyright
17 *    notice, this list of conditions and the following disclaimer.
18 * 2. Redistributions in binary form must reproduce the above copyright
19 *    notice, this list of conditions and the following disclaimer in the
20 *    documentation and/or other materials provided with the distribution.
21 * 3. Neither the name of the University nor the names of its contributors
22 *    may be used to endorse or promote products derived from this software
23 *    without specific prior written permission.
24 *
25 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
26 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
27 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
28 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
29 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
30 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
31 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
32 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
33 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
34 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
35 * SUCH DAMAGE.
36 *
37 * From @(#)ctype.h	8.4 (Berkeley) 1/21/94
38 * From FreeBSD: src/include/ctype.h,v 1.27 2004/06/23 07:11:39 tjr Exp
39 * $FreeBSD$
40 */
41
42#ifndef __CTYPE_H_
43#define	__CTYPE_H_
44
45#include <sys/cdefs.h>
46#include <sys/_types.h>
47
48#define	_CTYPE_A	0x00000100L		/* Alpha */
49#define	_CTYPE_C	0x00000200L		/* Control */
50#define	_CTYPE_D	0x00000400L		/* Digit */
51#define	_CTYPE_G	0x00000800L		/* Graph */
52#define	_CTYPE_L	0x00001000L		/* Lower */
53#define	_CTYPE_P	0x00002000L		/* Punct */
54#define	_CTYPE_S	0x00004000L		/* Space */
55#define	_CTYPE_U	0x00008000L		/* Upper */
56#define	_CTYPE_X	0x00010000L		/* X digit */
57#define	_CTYPE_B	0x00020000L		/* Blank */
58#define	_CTYPE_R	0x00040000L		/* Print */
59#define	_CTYPE_I	0x00080000L		/* Ideogram */
60#define	_CTYPE_T	0x00100000L		/* Special */
61#define	_CTYPE_Q	0x00200000L		/* Phonogram */
62#define	_CTYPE_N 	0x00400000L		/* Number (superset of digit) */
63#define	_CTYPE_SW0	0x20000000L		/* 0 width character */
64#define	_CTYPE_SW1	0x40000000L		/* 1 width character */
65#define	_CTYPE_SW2	0x80000000L		/* 2 width character */
66#define	_CTYPE_SW3	0xc0000000L		/* 3 width character */
67#define	_CTYPE_SWM	0xe0000000L		/* Mask for screen width data */
68#define	_CTYPE_SWS	30			/* Bits to shift to get width */
69
70/* See comments in <sys/_types.h> about __ct_rune_t. */
71__BEGIN_DECLS
72unsigned long	___runetype(__ct_rune_t) __pure;
73__ct_rune_t	___tolower(__ct_rune_t) __pure;
74__ct_rune_t	___toupper(__ct_rune_t) __pure;
75__END_DECLS
76
77/*
78 * _EXTERNALIZE_CTYPE_INLINES_ is defined in locale/nomacros.c to tell us
79 * to generate code for extern versions of all our inline functions.
80 */
81#ifdef _EXTERNALIZE_CTYPE_INLINES_
82#define	_USE_CTYPE_INLINE_
83#define	static
84#define	__inline
85#endif
86
87extern int __mb_sb_limit;
88
89/*
90 * Use inline functions if we are allowed to and the compiler supports them.
91 */
92#if !defined(_DONT_USE_CTYPE_INLINE_) && \
93    (defined(_USE_CTYPE_INLINE_) || defined(__GNUC__) || defined(__cplusplus))
94
95#include <runetype.h>
96
97static __inline int
98__maskrune(__ct_rune_t _c, unsigned long _f)
99{
100	return ((_c < 0 || _c >= _CACHED_RUNES) ? ___runetype(_c) :
101		_CurrentRuneLocale->__runetype[_c]) & _f;
102}
103
104static __inline int
105__sbmaskrune(__ct_rune_t _c, unsigned long _f)
106{
107	return (_c < 0 || _c >= __mb_sb_limit) ? 0 :
108	       _CurrentRuneLocale->__runetype[_c] & _f;
109}
110
111static __inline int
112__istype(__ct_rune_t _c, unsigned long _f)
113{
114	return (!!__maskrune(_c, _f));
115}
116
117static __inline int
118__sbistype(__ct_rune_t _c, unsigned long _f)
119{
120	return (!!__sbmaskrune(_c, _f));
121}
122
123static __inline int
124__isctype(__ct_rune_t _c, unsigned long _f)
125{
126	return (_c < 0 || _c >= 128) ? 0 :
127	       !!(_DefaultRuneLocale.__runetype[_c] & _f);
128}
129
130static __inline __ct_rune_t
131__toupper(__ct_rune_t _c)
132{
133	return (_c < 0 || _c >= _CACHED_RUNES) ? ___toupper(_c) :
134	       _CurrentRuneLocale->__mapupper[_c];
135}
136
137static __inline __ct_rune_t
138__sbtoupper(__ct_rune_t _c)
139{
140	return (_c < 0 || _c >= __mb_sb_limit) ? _c :
141	       _CurrentRuneLocale->__mapupper[_c];
142}
143
144static __inline __ct_rune_t
145__tolower(__ct_rune_t _c)
146{
147	return (_c < 0 || _c >= _CACHED_RUNES) ? ___tolower(_c) :
148	       _CurrentRuneLocale->__maplower[_c];
149}
150
151static __inline __ct_rune_t
152__sbtolower(__ct_rune_t _c)
153{
154	return (_c < 0 || _c >= __mb_sb_limit) ? _c :
155	       _CurrentRuneLocale->__maplower[_c];
156}
157
158static __inline int
159__wcwidth(__ct_rune_t _c)
160{
161	unsigned int _x;
162
163	if (_c == 0)
164		return (0);
165	_x = (unsigned int)__maskrune(_c, _CTYPE_SWM|_CTYPE_R);
166	if ((_x & _CTYPE_SWM) != 0)
167		return ((_x & _CTYPE_SWM) >> _CTYPE_SWS);
168	return ((_x & _CTYPE_R) != 0 ? 1 : -1);
169}
170
171#else /* not using inlines */
172
173__BEGIN_DECLS
174int		__maskrune(__ct_rune_t, unsigned long);
175int		__sbmaskrune(__ct_rune_t, unsigned long);
176int		__istype(__ct_rune_t, unsigned long);
177int		__sbistype(__ct_rune_t, unsigned long);
178int		__isctype(__ct_rune_t, unsigned long);
179__ct_rune_t	__toupper(__ct_rune_t);
180__ct_rune_t	__sbtoupper(__ct_rune_t);
181__ct_rune_t	__tolower(__ct_rune_t);
182__ct_rune_t	__sbtolower(__ct_rune_t);
183int		__wcwidth(__ct_rune_t);
184__END_DECLS
185#endif /* using inlines */
186
187#endif /* !__CTYPE_H_ */
188