xref: /titanic_51/usr/src/lib/libc/port/locale/isdigit.c (revision 6a72db4a7fa12c3e0d1c1cf91a07390739fa0fbf)
1 /*
2  * This file and its contents are supplied under the terms of the
3  * Common Development and Distribution License ("CDDL"), version 1.0.
4  * You may only use this file in accordance with the terms of version
5  * 1.0 of the CDDL.
6  *
7  * A full copy of the text of the CDDL should have accompanied this
8  * source.  A copy of the CDDL is also available via the Internet at
9  * http://www.illumos.org/license/CDDL.
10  */
11 
12 /*
13  * Copyright 2013 Garrett D'Amore <garrett@damore.org>
14  * Copyright 2010 Nexenta Systems, Inc.  All rights reserved.
15  */
16 
17 /*
18  * This file contains the implementation of various functional forms
19  * of the ctype tests, specifically the required by ISO C.  These are defined
20  * in the "C" (POSIX) locale.
21  */
22 
23 #include "lint.h"
24 #include <ctype.h>
25 #include <locale.h>
26 #include "localeimpl.h"
27 #include "_ctype.h"
28 #include "lctype.h"
29 
30 /*
31  * We are supplying functional forms, so make sure to suppress any macros
32  * we might have imported.
33  */
34 
35 /*
36  * Performance note: ASCII test is *much* faster, as we can avoid expensive
37  * function call overhead.  This is the hot case, so we try to do that
38  * whenever possible.  As far as we know, *every* encoding we support
39  * is a strict superset of ASCII.  So we can make things faster by trying
40  * ASCII first, and only then falling to locale specific checks.
41  */
42 
43 static int
44 isctype_l(int c, int mask, locale_t loc)
45 {
46 	return ((unsigned)c > 255 ? 0 : (loc->ctype->lc_ctype_mask[c] & mask));
47 }
48 
49 #define	ISTYPE_L(c, mask, loc)	\
50 	(isascii(c) ? (__ctype_mask[c] & (mask)) : isctype_l(c, mask, loc))
51 
52 #define	ISTYPE(c, mask)	ISTYPE_L(c, mask, uselocale(NULL))
53 
54 #define	DEFN_ISTYPE(type, mask)		\
55 int					\
56 is##type##_l(int c, locale_t l)	\
57 {					\
58 	return (ISTYPE_L(c, mask, l));	\
59 }					\
60 					\
61 int					\
62 is##type(int c)				\
63 {					\
64 	return (ISTYPE(c, mask));	\
65 }
66 
67 #undef	isblank
68 #undef	isupper
69 #undef	islower
70 #undef	isdigit
71 #undef	isxdigit
72 #undef	isalpha
73 #undef	isalnum
74 #undef	isspace
75 #undef	iscntrl
76 #undef	isgraph
77 #undef	ispunct
78 #undef	isprint
79 
80 DEFN_ISTYPE(blank, _ISBLANK)
81 DEFN_ISTYPE(upper, _ISUPPER)
82 DEFN_ISTYPE(lower, _ISLOWER)
83 DEFN_ISTYPE(digit, _ISDIGIT)
84 DEFN_ISTYPE(xdigit, _ISXDIGIT)
85 DEFN_ISTYPE(alpha, _ISALPHA)
86 DEFN_ISTYPE(alnum, _ISALNUM)
87 DEFN_ISTYPE(space, _ISSPACE)
88 DEFN_ISTYPE(cntrl, _ISCNTRL)
89 DEFN_ISTYPE(graph, _ISGRAPH)
90 DEFN_ISTYPE(punct, _ISPUNCT)
91 DEFN_ISTYPE(print, _ISPRINT)
92