1/*-
2 * Copyright (c) 2002 Tim J. Robbins.
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 *    notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 *    notice, this list of conditions and the following disclaimer in the
12 *    documentation and/or other materials provided with the distribution.
13 *
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24 * SUCH DAMAGE.
25 */
26
27#include <sys/cdefs.h>
28__FBSDID("$FreeBSD: src/lib/libc/locale/wctype.c,v 1.4 2008/03/17 18:22:23 antoine Exp $");
29
30#include "xlocale_private.h"
31
32#include <ctype.h>
33#include <string.h>
34#include <wctype.h>
35#include <limits.h>
36
37wctype_t
38wctype_l(const char *property, locale_t loc)
39{
40	_RuneLocale *rl;
41	static const struct {
42		const char	*name;
43		wctype_t	 mask;
44	} props[] = {
45		{ "alnum",	_CTYPE_A|_CTYPE_D },
46		{ "alpha",	_CTYPE_A },
47		{ "blank",	_CTYPE_B },
48		{ "cntrl",	_CTYPE_C },
49		{ "digit",	_CTYPE_D },
50		{ "graph",	_CTYPE_G },
51		{ "lower",	_CTYPE_L },
52		{ "print",	_CTYPE_R },
53		{ "punct",	_CTYPE_P },
54		{ "space",	_CTYPE_S },
55		{ "upper",	_CTYPE_U },
56		{ "xdigit",	_CTYPE_X },
57		{ "ideogram",	_CTYPE_I },	/* BSD extension */
58		{ "special",	_CTYPE_T },	/* BSD extension */
59		{ "phonogram",	_CTYPE_Q },	/* BSD extension */
60		{ "rune",	0xFFFFFF00L },	/* BSD extension */
61		{ NULL,		0UL },		/* Default */
62	};
63	int i;
64
65	i = 0;
66	while (props[i].name != NULL && strcmp(props[i].name, property) != 0)
67		i++;
68
69	if (props[i].mask)
70		return (props[i].mask);
71
72	NORMALIZE_LOCALE(loc);
73	rl = &loc->__lc_ctype->_CurrentRuneLocale;
74	if ((i = rl->__ncharclasses) > 0) {
75		_RuneCharClass *rp;
76		for (rp = rl->__charclasses; i-- > 0; rp++) {
77			if (strncmp(rp->__name, property, CHARCLASS_NAME_MAX) == 0)
78				return (rp->__mask);
79		}
80	}
81	return 0;
82}
83
84wctype_t
85wctype(const char *property)
86{
87	return wctype_l(property, __current_locale());
88}
89