1 |
742 |
jeremybenn |
// Locale support -*- C++ -*-
|
2 |
|
|
|
3 |
|
|
// Copyright (C) 2011 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 3, 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 |
|
|
// Under Section 7 of GPL version 3, you are granted additional
|
17 |
|
|
// permissions described in the GCC Runtime Library Exception, version
|
18 |
|
|
// 3.1, as published by the Free Software Foundation.
|
19 |
|
|
|
20 |
|
|
// You should have received a copy of the GNU General Public License and
|
21 |
|
|
// a copy of the GCC Runtime Library Exception along with this program;
|
22 |
|
|
// see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
|
23 |
|
|
// <http://www.gnu.org/licenses/>.
|
24 |
|
|
|
25 |
|
|
/** @file ctype_configure_char.cc */
|
26 |
|
|
|
27 |
|
|
//
|
28 |
|
|
// ISO C++ 14882: 22.1 Locales
|
29 |
|
|
//
|
30 |
|
|
|
31 |
|
|
#include <locale>
|
32 |
|
|
#include <cstdlib>
|
33 |
|
|
#include <cstring>
|
34 |
|
|
|
35 |
|
|
namespace std _GLIBCXX_VISIBILITY(default)
|
36 |
|
|
{
|
37 |
|
|
_GLIBCXX_BEGIN_NAMESPACE_VERSION
|
38 |
|
|
|
39 |
|
|
// The classic table used in libstdc++ is *not* the C _ctype table
|
40 |
|
|
// used by mscvrt, but is based on the ctype masks defined for libstdc++
|
41 |
|
|
// in ctype_base.h.
|
42 |
|
|
|
43 |
|
|
const ctype_base::mask*
|
44 |
|
|
ctype<char>::classic_table() throw()
|
45 |
|
|
{
|
46 |
|
|
static const ctype_base::mask _S_classic_table[256] =
|
47 |
|
|
{
|
48 |
|
|
cntrl /* null */,
|
49 |
|
|
cntrl /* ^A */,
|
50 |
|
|
cntrl /* ^B */,
|
51 |
|
|
cntrl /* ^C */,
|
52 |
|
|
cntrl /* ^D */,
|
53 |
|
|
cntrl /* ^E */,
|
54 |
|
|
cntrl /* ^F */,
|
55 |
|
|
cntrl /* ^G */,
|
56 |
|
|
cntrl /* ^H */,
|
57 |
|
|
ctype_base::mask(space | cntrl) /* tab */,
|
58 |
|
|
ctype_base::mask(space | cntrl) /* LF */,
|
59 |
|
|
ctype_base::mask(space | cntrl) /* ^K */,
|
60 |
|
|
ctype_base::mask(space | cntrl) /* FF */,
|
61 |
|
|
ctype_base::mask(space | cntrl) /* ^M */,
|
62 |
|
|
cntrl /* ^N */,
|
63 |
|
|
cntrl /* ^O */,
|
64 |
|
|
cntrl /* ^P */,
|
65 |
|
|
cntrl /* ^Q */,
|
66 |
|
|
cntrl /* ^R */,
|
67 |
|
|
cntrl /* ^S */,
|
68 |
|
|
cntrl /* ^T */,
|
69 |
|
|
cntrl /* ^U */,
|
70 |
|
|
cntrl /* ^V */,
|
71 |
|
|
cntrl /* ^W */,
|
72 |
|
|
cntrl /* ^X */,
|
73 |
|
|
cntrl /* ^Y */,
|
74 |
|
|
cntrl /* ^Z */,
|
75 |
|
|
cntrl /* esc */,
|
76 |
|
|
cntrl /* ^\ */,
|
77 |
|
|
cntrl /* ^] */,
|
78 |
|
|
cntrl /* ^^ */,
|
79 |
|
|
cntrl /* ^_ */,
|
80 |
|
|
ctype_base::mask(space | print) /* */,
|
81 |
|
|
ctype_base::mask(punct | print) /* ! */,
|
82 |
|
|
ctype_base::mask(punct | print) /* " */,
|
83 |
|
|
ctype_base::mask(punct | print) /* # */,
|
84 |
|
|
ctype_base::mask(punct | print) /* $ */,
|
85 |
|
|
ctype_base::mask(punct | print) /* % */,
|
86 |
|
|
ctype_base::mask(punct | print) /* & */,
|
87 |
|
|
ctype_base::mask(punct | print) /* ' */,
|
88 |
|
|
ctype_base::mask(punct | print) /* ( */,
|
89 |
|
|
ctype_base::mask(punct | print) /* ) */,
|
90 |
|
|
ctype_base::mask(punct | print) /* * */,
|
91 |
|
|
ctype_base::mask(punct | print) /* + */,
|
92 |
|
|
ctype_base::mask(punct | print) /* , */,
|
93 |
|
|
ctype_base::mask(punct | print) /* - */,
|
94 |
|
|
ctype_base::mask(punct | print) /* . */,
|
95 |
|
|
ctype_base::mask(punct | print) /* / */,
|
96 |
|
|
ctype_base::mask(digit | xdigit | print) /* 0 */,
|
97 |
|
|
ctype_base::mask(digit | xdigit | print) /* 1 */,
|
98 |
|
|
ctype_base::mask(digit | xdigit | print) /* 2 */,
|
99 |
|
|
ctype_base::mask(digit | xdigit | print) /* 3 */,
|
100 |
|
|
ctype_base::mask(digit | xdigit | print) /* 4 */,
|
101 |
|
|
ctype_base::mask(digit | xdigit | print) /* 5 */,
|
102 |
|
|
ctype_base::mask(digit | xdigit | print) /* 6 */,
|
103 |
|
|
ctype_base::mask(digit | xdigit | print) /* 7 */,
|
104 |
|
|
ctype_base::mask(digit | xdigit | print) /* 8 */,
|
105 |
|
|
ctype_base::mask(digit | xdigit | print) /* 9 */,
|
106 |
|
|
ctype_base::mask(punct | print) /* : */,
|
107 |
|
|
ctype_base::mask(punct | print) /* ; */,
|
108 |
|
|
ctype_base::mask(punct | print) /* < */,
|
109 |
|
|
ctype_base::mask(punct | print) /* = */,
|
110 |
|
|
ctype_base::mask(punct | print) /* > */,
|
111 |
|
|
ctype_base::mask(punct | print) /* ? */,
|
112 |
|
|
ctype_base::mask(punct | print) /* ! */,
|
113 |
|
|
ctype_base::mask(alpha | upper | xdigit | print) /* A */,
|
114 |
|
|
ctype_base::mask(alpha | upper | xdigit | print) /* B */,
|
115 |
|
|
ctype_base::mask(alpha | upper | xdigit | print) /* C */,
|
116 |
|
|
ctype_base::mask(alpha | upper | xdigit | print) /* D */,
|
117 |
|
|
ctype_base::mask(alpha | upper | xdigit | print) /* E */,
|
118 |
|
|
ctype_base::mask(alpha | upper | xdigit | print) /* F */,
|
119 |
|
|
ctype_base::mask(alpha | upper | print) /* G */,
|
120 |
|
|
ctype_base::mask(alpha | upper | print) /* H */,
|
121 |
|
|
ctype_base::mask(alpha | upper | print) /* I */,
|
122 |
|
|
ctype_base::mask(alpha | upper | print) /* J */,
|
123 |
|
|
ctype_base::mask(alpha | upper | print) /* K */,
|
124 |
|
|
ctype_base::mask(alpha | upper | print) /* L */,
|
125 |
|
|
ctype_base::mask(alpha | upper | print) /* M */,
|
126 |
|
|
ctype_base::mask(alpha | upper | print) /* N */,
|
127 |
|
|
ctype_base::mask(alpha | upper | print) /* O */,
|
128 |
|
|
ctype_base::mask(alpha | upper | print) /* P */,
|
129 |
|
|
ctype_base::mask(alpha | upper | print) /* Q */,
|
130 |
|
|
ctype_base::mask(alpha | upper | print) /* R */,
|
131 |
|
|
ctype_base::mask(alpha | upper | print) /* S */,
|
132 |
|
|
ctype_base::mask(alpha | upper | print) /* T */,
|
133 |
|
|
ctype_base::mask(alpha | upper | print) /* U */,
|
134 |
|
|
ctype_base::mask(alpha | upper | print) /* V */,
|
135 |
|
|
ctype_base::mask(alpha | upper | print) /* W */,
|
136 |
|
|
ctype_base::mask(alpha | upper | print) /* X */,
|
137 |
|
|
ctype_base::mask(alpha | upper | print) /* Y */,
|
138 |
|
|
ctype_base::mask(alpha | upper | print) /* Z */,
|
139 |
|
|
ctype_base::mask(punct | print) /* [ */,
|
140 |
|
|
ctype_base::mask(punct | print) /* \ */,
|
141 |
|
|
ctype_base::mask(punct | print) /* ] */,
|
142 |
|
|
ctype_base::mask(punct | print) /* ^ */,
|
143 |
|
|
ctype_base::mask(punct | print) /* _ */,
|
144 |
|
|
ctype_base::mask(punct | print) /* ` */,
|
145 |
|
|
ctype_base::mask(alpha | lower | xdigit | print) /* a */,
|
146 |
|
|
ctype_base::mask(alpha | lower | xdigit | print) /* b */,
|
147 |
|
|
ctype_base::mask(alpha | lower | xdigit | print) /* c */,
|
148 |
|
|
ctype_base::mask(alpha | lower | xdigit | print) /* d */,
|
149 |
|
|
ctype_base::mask(alpha | lower | xdigit | print) /* e */,
|
150 |
|
|
ctype_base::mask(alpha | lower | xdigit | print) /* f */,
|
151 |
|
|
ctype_base::mask(alpha | lower | print) /* g */,
|
152 |
|
|
ctype_base::mask(alpha | lower | print) /* h */,
|
153 |
|
|
ctype_base::mask(alpha | lower | print) /* i */,
|
154 |
|
|
ctype_base::mask(alpha | lower | print) /* j */,
|
155 |
|
|
ctype_base::mask(alpha | lower | print) /* k */,
|
156 |
|
|
ctype_base::mask(alpha | lower | print) /* l */,
|
157 |
|
|
ctype_base::mask(alpha | lower | print) /* m */,
|
158 |
|
|
ctype_base::mask(alpha | lower | print) /* n */,
|
159 |
|
|
ctype_base::mask(alpha | lower | print) /* o */,
|
160 |
|
|
ctype_base::mask(alpha | lower | print) /* p */,
|
161 |
|
|
ctype_base::mask(alpha | lower | print) /* q */,
|
162 |
|
|
ctype_base::mask(alpha | lower | print) /* r */,
|
163 |
|
|
ctype_base::mask(alpha | lower | print) /* s */,
|
164 |
|
|
ctype_base::mask(alpha | lower | print) /* t */,
|
165 |
|
|
ctype_base::mask(alpha | lower | print) /* u */,
|
166 |
|
|
ctype_base::mask(alpha | lower | print) /* v */,
|
167 |
|
|
ctype_base::mask(alpha | lower | print) /* w */,
|
168 |
|
|
ctype_base::mask(alpha | lower | print) /* x */,
|
169 |
|
|
ctype_base::mask(alpha | lower | print) /* y */,
|
170 |
|
|
ctype_base::mask(alpha | lower | print) /* x */,
|
171 |
|
|
ctype_base::mask(punct | print) /* { */,
|
172 |
|
|
ctype_base::mask(punct | print) /* | */,
|
173 |
|
|
ctype_base::mask(punct | print) /* } */,
|
174 |
|
|
ctype_base::mask(punct | print) /* ~ */,
|
175 |
|
|
cntrl /* del (0x7f)*/,
|
176 |
|
|
/* The next 128 entries are all 0. */
|
177 |
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
178 |
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
179 |
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
180 |
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
181 |
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
182 |
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
183 |
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
|
184 |
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
|
185 |
|
|
};
|
186 |
|
|
return _S_classic_table;
|
187 |
|
|
}
|
188 |
|
|
|
189 |
|
|
ctype<char>::ctype(__c_locale, const mask* __table, bool __del,
|
190 |
|
|
size_t __refs)
|
191 |
|
|
: facet(__refs), _M_del(__table != 0 && __del),
|
192 |
|
|
_M_toupper(NULL), _M_tolower(NULL),
|
193 |
|
|
_M_table(__table ? __table : classic_table())
|
194 |
|
|
{
|
195 |
|
|
memset(_M_widen, 0, sizeof(_M_widen));
|
196 |
|
|
_M_widen_ok = 0;
|
197 |
|
|
memset(_M_narrow, 0, sizeof(_M_narrow));
|
198 |
|
|
_M_narrow_ok = 0;
|
199 |
|
|
}
|
200 |
|
|
|
201 |
|
|
ctype<char>::ctype(const mask* __table, bool __del, size_t __refs)
|
202 |
|
|
: facet(__refs), _M_del(__table != 0 && __del),
|
203 |
|
|
_M_toupper(NULL), _M_tolower(NULL),
|
204 |
|
|
_M_table(__table ? __table : classic_table())
|
205 |
|
|
{
|
206 |
|
|
memset(_M_widen, 0, sizeof(_M_widen));
|
207 |
|
|
_M_widen_ok = 0;
|
208 |
|
|
memset(_M_narrow, 0, sizeof(_M_narrow));
|
209 |
|
|
_M_narrow_ok = 0;
|
210 |
|
|
}
|
211 |
|
|
|
212 |
|
|
char
|
213 |
|
|
ctype<char>::do_toupper(char __c) const
|
214 |
|
|
{ return (this->is(ctype_base::lower, __c) ? (__c - 'a' + 'A') : __c); }
|
215 |
|
|
|
216 |
|
|
const char*
|
217 |
|
|
ctype<char>::do_toupper(char* __low, const char* __high) const
|
218 |
|
|
{
|
219 |
|
|
while (__low < __high)
|
220 |
|
|
{
|
221 |
|
|
*__low = this->do_toupper(*__low);
|
222 |
|
|
++__low;
|
223 |
|
|
}
|
224 |
|
|
return __high;
|
225 |
|
|
}
|
226 |
|
|
|
227 |
|
|
char
|
228 |
|
|
ctype<char>::do_tolower(char __c) const
|
229 |
|
|
{ return (this->is(ctype_base::upper, __c) ? (__c - 'A' + 'a') : __c); }
|
230 |
|
|
|
231 |
|
|
const char*
|
232 |
|
|
ctype<char>::do_tolower(char* __low, const char* __high) const
|
233 |
|
|
{
|
234 |
|
|
while (__low < __high)
|
235 |
|
|
{
|
236 |
|
|
*__low = this->do_tolower(*__low);
|
237 |
|
|
++__low;
|
238 |
|
|
}
|
239 |
|
|
return __high;
|
240 |
|
|
}
|
241 |
|
|
|
242 |
|
|
_GLIBCXX_END_NAMESPACE_VERSION
|
243 |
|
|
} // namespace
|