Head

GCC Code Coverage Report

Directory:	./		Exec	Total	Coverage
File:	lib/libc/locale/iswctype.c	Lines:	8	43	18.6 %
Date:	2017-11-07	Branches:	4	18	22.2 %


/*	$OpenBSD: iswctype.c,v 1.7 2017/09/05 03:16:13 schwarze Exp $ */
/*	$NetBSD: iswctype.c,v 1.15 2005/02/09 21:35:46 kleink Exp $	*/

/*
 * Copyright (c) 1989 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.
 *
 * 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.
 */

#include <wchar.h>
#include <wctype.h>
#include <ctype.h>
#include <errno.h>
#include <string.h>
#include "rune.h"
#include "runetype.h"
#include "rune_local.h"
#include "_wctrans_local.h"

static inline _RuneType __runetype_w(wint_t);
static inline int __isctype_w(wint_t, _RuneType);
static inline wint_t __toupper_w(wint_t);
static inline wint_t __tolower_w(wint_t);

static inline _RuneType
__runetype_w(wint_t c)
{
	_RuneLocale *rl = _CurrentRuneLocale();

	return (_RUNE_ISCACHED(c) ?
		rl->rl_runetype[c] : ___runetype_mb(c, rl));
}

static inline int
__isctype_w(wint_t c, _RuneType f)
{
	return (!!(__runetype_w(c) & f));
}

static inline wint_t
__toupper_w(wint_t c)
{
	return (_towctrans(c, _wctrans_upper(_CurrentRuneLocale())));
}

static inline wint_t
__tolower_w(wint_t c)
{
	return (_towctrans(c, _wctrans_lower(_CurrentRuneLocale())));
}

int
iswalnum(wint_t c)
{
	return (__isctype_w((c), _CTYPE_A|_CTYPE_D));
}

int
iswalpha(wint_t c)
{
	return (__isctype_w((c), _CTYPE_A));
}

int
iswblank(wint_t c)
{
	return (__isctype_w((c), _CTYPE_B));
}

int
iswcntrl(wint_t c)
{
	return (__isctype_w((c), _CTYPE_C));
}

int
iswdigit(wint_t c)
{
	return (__isctype_w((c), _CTYPE_D));
}

int
iswgraph(wint_t c)
{
	return (__isctype_w((c), _CTYPE_G));
}

int
iswlower(wint_t c)
{
	return (__isctype_w((c), _CTYPE_L));
}

int
iswprint(wint_t c)
{
	return (__isctype_w((c), _CTYPE_R));
}

int
iswpunct(wint_t c)
{
	return (__isctype_w((c), _CTYPE_P));
}

int
iswspace(wint_t c)
{
	return (__isctype_w((c), _CTYPE_S));
}
DEF_STRONG(iswspace);

int
iswupper(wint_t c)
{
	return (__isctype_w((c), _CTYPE_U));
}
DEF_STRONG(iswupper);

int
iswxdigit(wint_t c)
{
	return (__isctype_w((c), _CTYPE_X));
}

wint_t
towupper(wint_t c)
{
	return (__toupper_w(c));
}

wint_t
towlower(wint_t c)
{
	return (__tolower_w(c));
}
DEF_STRONG(towlower);

int
wcwidth(wchar_t c)
{
	if (__isctype_w((c), _CTYPE_R))
		return (((unsigned)__runetype_w(c) & _CTYPE_SWM) >> _CTYPE_SWS);
	return -1;
}
DEF_WEAK(wcwidth);

wctrans_t
wctrans(const char *charclass)
{
	int i;
	_RuneLocale *rl = _CurrentRuneLocale();

	if (rl->rl_wctrans[_WCTRANS_INDEX_LOWER].te_name==NULL)
		_wctrans_init(rl);

	for (i=0; i<_WCTRANS_NINDEXES; i++)
		if (!strcmp(rl->rl_wctrans[i].te_name, charclass))
			return ((wctrans_t)&rl->rl_wctrans[i]);

	return ((wctrans_t)NULL);
}

wint_t
towctrans(wint_t c, wctrans_t desc)
{
	if (desc==NULL) {
		errno = EINVAL;
		return (c);
	}
	return (_towctrans(c, (_WCTransEntry *)desc));
}
DEF_STRONG(towctrans);

wctype_t
wctype(const char *property)
{
	int i;
	_RuneLocale *rl = _CurrentRuneLocale();

	for (i=0; i<_WCTYPE_NINDEXES; i++)
		if (!strcmp(rl->rl_wctype[i].te_name, property))
			return ((wctype_t)&rl->rl_wctype[i]);
	return ((wctype_t)NULL);
}

int
iswctype(wint_t c, wctype_t charclass)
{

	/*
	 * SUSv3: If charclass is 0, iswctype() shall return 0.
	 */
	if (charclass == (wctype_t)0) {
		return 0;
	}

	return (__isctype_w(c, ((_WCTypeEntry *)charclass)->te_mask));
}


Generated by: GCOVR (Version 3.3)

Line	Branch	Exec	Source
1			/* $OpenBSD: iswctype.c,v 1.7 2017/09/05 03:16:13 schwarze Exp $ */
2			/* $NetBSD: iswctype.c,v 1.15 2005/02/09 21:35:46 kleink Exp $ */
3
4			/*
5			* Copyright (c) 1989 The Regents of the University of California.
6			* All rights reserved.
7			* (c) UNIX System Laboratories, Inc.
8			* All or some portions of this file are derived from material licensed
9			* to the University of California by American Telephone and Telegraph
10			* Co. or Unix System Laboratories, Inc. and are reproduced herein with
11			* the permission of UNIX System Laboratories, Inc.
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
38			#include <wchar.h>
39			#include <wctype.h>
40			#include <ctype.h>
41			#include <errno.h>
42			#include <string.h>
43			#include "rune.h"
44			#include "runetype.h"
45			#include "rune_local.h"
46			#include "_wctrans_local.h"
47
48			static inline _RuneType __runetype_w(wint_t);
49			static inline int __isctype_w(wint_t, _RuneType);
50			static inline wint_t __toupper_w(wint_t);
51			static inline wint_t __tolower_w(wint_t);
52
53			static inline _RuneType
54			__runetype_w(wint_t c)
55			{
56		409486916	_RuneLocale *rl = _CurrentRuneLocale();
57
58	✓✓	614230374	return (_RUNE_ISCACHED(c) ?
59		204743458	rl->rl_runetype[c] : ___runetype_mb(c, rl));
60			}
61
62			static inline int
63			__isctype_w(wint_t c, _RuneType f)
64			{
65		204743468	return (!!(__runetype_w(c) & f));
66			}
67
68			static inline wint_t
69			__toupper_w(wint_t c)
70			{
71			return (_towctrans(c, _wctrans_upper(_CurrentRuneLocale())));
72			}
73
74			static inline wint_t
75			__tolower_w(wint_t c)
76			{
77			return (_towctrans(c, _wctrans_lower(_CurrentRuneLocale())));
78			}
79
80			int
81			iswalnum(wint_t c)
82			{
83			return (__isctype_w((c), _CTYPE_A\|_CTYPE_D));
84			}
85
86			int
87			iswalpha(wint_t c)
88			{
89			return (__isctype_w((c), _CTYPE_A));
90			}
91
92			int
93			iswblank(wint_t c)
94			{
95			return (__isctype_w((c), _CTYPE_B));
96			}
97
98			int
99			iswcntrl(wint_t c)
100			{
101			return (__isctype_w((c), _CTYPE_C));
102			}
103
104			int
105			iswdigit(wint_t c)
106			{
107			return (__isctype_w((c), _CTYPE_D));
108			}
109
110			int
111			iswgraph(wint_t c)
112			{
113			return (__isctype_w((c), _CTYPE_G));
114			}
115
116			int
117			iswlower(wint_t c)
118			{
119			return (__isctype_w((c), _CTYPE_L));
120			}
121
122			int
123			iswprint(wint_t c)
124			{
125			return (__isctype_w((c), _CTYPE_R));
126			}
127
128			int
129			iswpunct(wint_t c)
130			{
131			return (__isctype_w((c), _CTYPE_P));
132			}
133
134			int
135			iswspace(wint_t c)
136			{
137			return (__isctype_w((c), _CTYPE_S));
138			}
139			DEF_STRONG(iswspace);
140
141			int
142			iswupper(wint_t c)
143			{
144			return (__isctype_w((c), _CTYPE_U));
145			}
146			DEF_STRONG(iswupper);
147
148			int
149			iswxdigit(wint_t c)
150			{
151			return (__isctype_w((c), _CTYPE_X));
152			}
153
154			wint_t
155			towupper(wint_t c)
156			{
157			return (__toupper_w(c));
158			}
159
160			wint_t
161			towlower(wint_t c)
162			{
163			return (__tolower_w(c));
164			}
165			DEF_STRONG(towlower);
166
167			int
168			wcwidth(wchar_t c)
169			{
170	✓✓	204743468	if (__isctype_w((c), _CTYPE_R))
171		102371724	return (((unsigned)__runetype_w(c) & _CTYPE_SWM) >> _CTYPE_SWS);
172		10	return -1;
173		102371734	}
174			DEF_WEAK(wcwidth);
175
176			wctrans_t
177			wctrans(const char *charclass)
178			{
179			int i;
180			_RuneLocale *rl = _CurrentRuneLocale();
181
182			if (rl->rl_wctrans[_WCTRANS_INDEX_LOWER].te_name==NULL)
183			_wctrans_init(rl);
184
185			for (i=0; i<_WCTRANS_NINDEXES; i++)
186			if (!strcmp(rl->rl_wctrans[i].te_name, charclass))
187			return ((wctrans_t)&rl->rl_wctrans[i]);
188
189			return ((wctrans_t)NULL);
190			}
191
192			wint_t
193			towctrans(wint_t c, wctrans_t desc)
194			{
195			if (desc==NULL) {
196			errno = EINVAL;
197			return (c);
198			}
199			return (_towctrans(c, (_WCTransEntry *)desc));
200			}
201			DEF_STRONG(towctrans);
202
203			wctype_t
204			wctype(const char *property)
205			{
206			int i;
207			_RuneLocale *rl = _CurrentRuneLocale();
208
209			for (i=0; i<_WCTYPE_NINDEXES; i++)
210			if (!strcmp(rl->rl_wctype[i].te_name, property))
211			return ((wctype_t)&rl->rl_wctype[i]);
212			return ((wctype_t)NULL);
213			}
214
215			int
216			iswctype(wint_t c, wctype_t charclass)
217			{
218
219			/*
220			* SUSv3: If charclass is 0, iswctype() shall return 0.
221			*/
222			if (charclass == (wctype_t)0) {
223			return 0;
224			}
225
226			return (__isctype_w(c, ((_WCTypeEntry *)charclass)->te_mask));
227			}