1 // Locale support -*- C++ -*-
2
3 // Copyright (C) 2000, 2003, 2004 Free Software Foundation, Inc.
4 //
5 // This file is part of the GNU ISO C++ Library. This library is free
6 // software; you can redistribute it and/or modify it under the
7 // terms of the GNU General Public License as published by the
8 // Free Software Foundation; either version 2, or (at your option)
9 // any later version.
10
11 // This library is distributed in the hope that it will be useful,
12 // but WITHOUT ANY WARRANTY; without even the implied warranty of
13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 // GNU General Public License for more details.
15
16 // You should have received a copy of the GNU General Public License along
17 // with this library; see the file COPYING. If not, write to the Free
18 // Software Foundation, 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301,
19 // USA.
20
21 // As a special exception, you may use this file as part of a free software
22 // library without restriction. Specifically, if other files instantiate
23 // templates or use macros or inline functions from this file, or you compile
24 // this file and link it with other files to produce an executable, this
25 // file does not by itself cause the resulting executable to be covered by
26 // the GNU General Public License. This exception does not however
27 // invalidate any other reasons why the executable file might be covered by
28 // the GNU General Public License.
29
30 /** @file ctype_inline.h
31 * This is an internal header file, included by other library headers.
32 * You should not attempt to use it directly.
33 */
34
35 //
36 // ISO C++ 14882: 22.1 Locales
37 //
38
39 // ctype bits to be inlined go here. Non-inlinable (ie virtual do_*)
40 // functions go in ctype.cc
41
_GLIBCXX_BEGIN_NAMESPACE(std)42 _GLIBCXX_BEGIN_NAMESPACE(std)
43
44 bool
45 ctype<char>::
46 is(mask __m, char __c) const
47 {
48 if (_M_table)
49 return _M_table[static_cast<unsigned char>(__c)] & __m;
50 else
51 return __istype(__c, __m);
52 }
53
54 const char*
55 ctype<char>::
is(const char * __low,const char * __high,mask * __vec)56 is(const char* __low, const char* __high, mask* __vec) const
57 {
58 if (_M_table)
59 while (__low < __high)
60 *__vec++ = _M_table[static_cast<unsigned char>(*__low++)];
61 else
62 for (;__low < __high; ++__vec, ++__low)
63 {
64 #if defined (_CTYPE_S) || defined (__istype)
65 *__vec = __maskrune (*__low, upper | lower | alpha | digit | xdigit
66 | space | print | graph | cntrl | punct | alnum);
67 #else
68 mask __m = 0;
69 if (this->is(upper, *__low)) __m |= upper;
70 if (this->is(lower, *__low)) __m |= lower;
71 if (this->is(alpha, *__low)) __m |= alpha;
72 if (this->is(digit, *__low)) __m |= digit;
73 if (this->is(xdigit, *__low)) __m |= xdigit;
74 if (this->is(space, *__low)) __m |= space;
75 if (this->is(print, *__low)) __m |= print;
76 if (this->is(graph, *__low)) __m |= graph;
77 if (this->is(cntrl, *__low)) __m |= cntrl;
78 if (this->is(punct, *__low)) __m |= punct;
79 // Do not include explicit line for alnum mask since it is a
80 // pure composite of masks on FreeBSD.
81 *__vec = __m;
82 #endif
83 }
84 return __high;
85 }
86
87 const char*
88 ctype<char>::
scan_is(mask __m,const char * __low,const char * __high)89 scan_is(mask __m, const char* __low, const char* __high) const
90 {
91 if (_M_table)
92 while (__low < __high
93 && !(_M_table[static_cast<unsigned char>(*__low)] & __m))
94 ++__low;
95 else
96 while (__low < __high && !this->is(__m, *__low))
97 ++__low;
98 return __low;
99 }
100
101 const char*
102 ctype<char>::
scan_not(mask __m,const char * __low,const char * __high)103 scan_not(mask __m, const char* __low, const char* __high) const
104 {
105 if (_M_table)
106 while (__low < __high
107 && (_M_table[static_cast<unsigned char>(*__low)] & __m) != 0)
108 ++__low;
109 else
110 while (__low < __high && this->is(__m, *__low) != 0)
111 ++__low;
112 return __low;
113 }
114
115 #ifdef _GLIBCXX_USE_WCHAR_T
116 inline bool
117 ctype<wchar_t>::
do_is(mask __m,wchar_t __c)118 do_is(mask __m, wchar_t __c) const
119 {
120 return __istype (__c, __m);
121 }
122
123 inline const wchar_t*
124 ctype<wchar_t>::
do_is(const wchar_t * __lo,const wchar_t * __hi,mask * __vec)125 do_is(const wchar_t* __lo, const wchar_t* __hi, mask* __vec) const
126 {
127 for (; __lo < __hi; ++__vec, ++__lo)
128 *__vec = __maskrune (*__lo, upper | lower | alpha | digit | xdigit
129 | space | print | graph | cntrl | punct | alnum);
130 return __hi;
131 }
132
133 inline const wchar_t*
134 ctype<wchar_t>::
do_scan_is(mask __m,const wchar_t * __lo,const wchar_t * __hi)135 do_scan_is(mask __m, const wchar_t* __lo, const wchar_t* __hi) const
136 {
137 while (__lo < __hi && ! __istype (*__lo, __m))
138 ++__lo;
139 return __lo;
140 }
141
142 inline const wchar_t*
143 ctype<wchar_t>::
do_scan_not(mask __m,const char_type * __lo,const char_type * __hi)144 do_scan_not(mask __m, const char_type* __lo, const char_type* __hi) const
145 {
146 while (__lo < __hi && __istype (*__lo, __m))
147 ++__lo;
148 return __lo;
149 }
150 #endif
151
152 _GLIBCXX_END_NAMESPACE
153