1 |
424 |
jeremybenn |
// Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2004, 2005,
|
2 |
|
|
// 2006, 2007, 2008, 2009
|
3 |
|
|
// 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 |
|
|
#include <locale>
|
26 |
|
|
#include <cstdlib>
|
27 |
|
|
#include <cstring>
|
28 |
|
|
|
29 |
|
|
_GLIBCXX_BEGIN_NAMESPACE(std)
|
30 |
|
|
|
31 |
|
|
// Definitions for static const data members of ctype_base.
|
32 |
|
|
const ctype_base::mask ctype_base::space;
|
33 |
|
|
const ctype_base::mask ctype_base::print;
|
34 |
|
|
const ctype_base::mask ctype_base::cntrl;
|
35 |
|
|
const ctype_base::mask ctype_base::upper;
|
36 |
|
|
const ctype_base::mask ctype_base::lower;
|
37 |
|
|
const ctype_base::mask ctype_base::alpha;
|
38 |
|
|
const ctype_base::mask ctype_base::digit;
|
39 |
|
|
const ctype_base::mask ctype_base::punct;
|
40 |
|
|
const ctype_base::mask ctype_base::xdigit;
|
41 |
|
|
const ctype_base::mask ctype_base::alnum;
|
42 |
|
|
const ctype_base::mask ctype_base::graph;
|
43 |
|
|
|
44 |
|
|
// Definitions for locale::id of standard facets that are specialized.
|
45 |
|
|
locale::id ctype<char>::id;
|
46 |
|
|
|
47 |
|
|
#ifdef _GLIBCXX_USE_WCHAR_T
|
48 |
|
|
locale::id ctype<wchar_t>::id;
|
49 |
|
|
#endif
|
50 |
|
|
|
51 |
|
|
// XXX At some point, just rename this file to ctype_configure_char.cc
|
52 |
|
|
// and compile it as a separate file instead of including it here.
|
53 |
|
|
// Platform-specific initialization code for ctype tables.
|
54 |
|
|
#include <bits/ctype_noninline.h>
|
55 |
|
|
|
56 |
|
|
const size_t ctype<char>::table_size;
|
57 |
|
|
|
58 |
|
|
ctype<char>::~ctype()
|
59 |
|
|
{
|
60 |
|
|
_S_destroy_c_locale(_M_c_locale_ctype);
|
61 |
|
|
if (_M_del)
|
62 |
|
|
delete[] this->table();
|
63 |
|
|
}
|
64 |
|
|
|
65 |
|
|
// Fill in the narrowing cache and flag whether all values are
|
66 |
|
|
// valid or not. _M_narrow_ok is set to 2 if memcpy can't
|
67 |
|
|
// be used.
|
68 |
|
|
void
|
69 |
|
|
ctype<char>::
|
70 |
|
|
_M_narrow_init() const
|
71 |
|
|
{
|
72 |
|
|
char __tmp[sizeof(_M_narrow)];
|
73 |
|
|
for (size_t __i = 0; __i < sizeof(_M_narrow); ++__i)
|
74 |
|
|
__tmp[__i] = __i;
|
75 |
|
|
do_narrow(__tmp, __tmp + sizeof(__tmp), 0, _M_narrow);
|
76 |
|
|
|
77 |
|
|
_M_narrow_ok = 1;
|
78 |
|
|
if (__builtin_memcmp(__tmp, _M_narrow, sizeof(_M_narrow)))
|
79 |
|
|
_M_narrow_ok = 2;
|
80 |
|
|
else
|
81 |
|
|
{
|
82 |
|
|
// Deal with the special case of zero: renarrow with a
|
83 |
|
|
// different default and compare.
|
84 |
|
|
char __c;
|
85 |
|
|
do_narrow(__tmp, __tmp + 1, 1, &__c);
|
86 |
|
|
if (__c == 1)
|
87 |
|
|
_M_narrow_ok = 2;
|
88 |
|
|
}
|
89 |
|
|
}
|
90 |
|
|
|
91 |
|
|
void
|
92 |
|
|
ctype<char>::
|
93 |
|
|
_M_widen_init() const
|
94 |
|
|
{
|
95 |
|
|
char __tmp[sizeof(_M_widen)];
|
96 |
|
|
for (size_t __i = 0; __i < sizeof(_M_widen); ++__i)
|
97 |
|
|
__tmp[__i] = __i;
|
98 |
|
|
do_widen(__tmp, __tmp + sizeof(__tmp), _M_widen);
|
99 |
|
|
|
100 |
|
|
_M_widen_ok = 1;
|
101 |
|
|
// Set _M_widen_ok to 2 if memcpy can't be used.
|
102 |
|
|
if (__builtin_memcmp(__tmp, _M_widen, sizeof(_M_widen)))
|
103 |
|
|
_M_widen_ok = 2;
|
104 |
|
|
}
|
105 |
|
|
|
106 |
|
|
#ifdef _GLIBCXX_USE_WCHAR_T
|
107 |
|
|
ctype<wchar_t>::ctype(size_t __refs)
|
108 |
|
|
: __ctype_abstract_base<wchar_t>(__refs),
|
109 |
|
|
_M_c_locale_ctype(_S_get_c_locale()), _M_narrow_ok(false)
|
110 |
|
|
{ _M_initialize_ctype(); }
|
111 |
|
|
|
112 |
|
|
ctype<wchar_t>::ctype(__c_locale __cloc, size_t __refs)
|
113 |
|
|
: __ctype_abstract_base<wchar_t>(__refs),
|
114 |
|
|
_M_c_locale_ctype(_S_clone_c_locale(__cloc)), _M_narrow_ok(false)
|
115 |
|
|
{ _M_initialize_ctype(); }
|
116 |
|
|
|
117 |
|
|
ctype<wchar_t>::~ctype()
|
118 |
|
|
{ _S_destroy_c_locale(_M_c_locale_ctype); }
|
119 |
|
|
|
120 |
|
|
ctype_byname<wchar_t>::ctype_byname(const char* __s, size_t __refs)
|
121 |
|
|
: ctype<wchar_t>(__refs)
|
122 |
|
|
{
|
123 |
|
|
if (std::strcmp(__s, "C") != 0 && std::strcmp(__s, "POSIX") != 0)
|
124 |
|
|
{
|
125 |
|
|
this->_S_destroy_c_locale(this->_M_c_locale_ctype);
|
126 |
|
|
this->_S_create_c_locale(this->_M_c_locale_ctype, __s);
|
127 |
|
|
this->_M_initialize_ctype();
|
128 |
|
|
}
|
129 |
|
|
}
|
130 |
|
|
|
131 |
|
|
ctype_byname<wchar_t>::~ctype_byname()
|
132 |
|
|
{ }
|
133 |
|
|
|
134 |
|
|
#endif
|
135 |
|
|
|
136 |
|
|
_GLIBCXX_END_NAMESPACE
|