1 // Locale support -*- C++ -*-
3 // Copyright (C) 2011-2014 Free Software Foundation, Inc.
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)
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.
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.
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/>.
25 /** @file ctype_configure_char.cc */
28 // ISO C++ 14882: 22.1 Locales
35 namespace std _GLIBCXX_VISIBILITY(default)
37 _GLIBCXX_BEGIN_NAMESPACE_VERSION
39 // Information as gleaned from /usr/include/ctype.h
41 #if _GLIBCXX_C_LOCALE_GNU
42 const ctype_base::mask*
43 ctype<char>::classic_table() throw()
44 { return _S_get_c_locale()->__ctype_b; }
46 const ctype_base::mask*
47 ctype<char>::classic_table() throw()
49 const ctype_base::mask* __ret;
50 char* __old = setlocale(LC_CTYPE, NULL);
52 if (__builtin_strcmp(__old, "C"))
54 const size_t __len = __builtin_strlen(__old) + 1;
55 __sav = new char[__len];
56 __builtin_memcpy(__sav, __old, __len);
57 setlocale(LC_CTYPE, "C");
59 #if __GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ > 2)
60 __ret = *__ctype_b_loc();
66 setlocale(LC_CTYPE, __sav);
73 #if _GLIBCXX_C_LOCALE_GNU
74 ctype<char>::ctype(__c_locale __cloc, const mask* __table, bool __del,
76 : facet(__refs), _M_c_locale_ctype(_S_clone_c_locale(__cloc)),
77 _M_del(__table != 0 && __del),
78 _M_toupper(_M_c_locale_ctype->__ctype_toupper),
79 _M_tolower(_M_c_locale_ctype->__ctype_tolower),
80 _M_table(__table ? __table : _M_c_locale_ctype->__ctype_b),
81 _M_widen_ok(0), _M_narrow_ok(0)
83 __builtin_memset(_M_widen, 0, sizeof(_M_widen));
84 __builtin_memset(_M_narrow, 0, sizeof(_M_narrow));
87 ctype<char>::ctype(__c_locale, const mask* __table, bool __del,
89 : facet(__refs), _M_c_locale_ctype(_S_get_c_locale()),
90 _M_del(__table != 0 && __del), _M_widen_ok(0), _M_narrow_ok(0)
92 char* __old = setlocale(LC_CTYPE, NULL);
94 if (__builtin_strcmp(__old, "C"))
96 const size_t __len = __builtin_strlen(__old) + 1;
97 __sav = new char[__len];
98 __builtin_memcpy(__sav, __old, __len);
99 setlocale(LC_CTYPE, "C");
101 #if __GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ > 2)
102 _M_toupper = *__ctype_toupper_loc();
103 _M_tolower = *__ctype_tolower_loc();
104 _M_table = __table ? __table : *__ctype_b_loc();
106 _M_toupper = __ctype_toupper;
107 _M_tolower = __ctype_tolower;
108 _M_table = __table ? __table : __ctype_b;
112 setlocale(LC_CTYPE, __sav);
115 __builtin_memset(_M_widen, 0, sizeof(_M_widen));
116 __builtin_memset(_M_narrow, 0, sizeof(_M_narrow));
120 #if _GLIBCXX_C_LOCALE_GNU
121 ctype<char>::ctype(const mask* __table, bool __del, size_t __refs)
122 : facet(__refs), _M_c_locale_ctype(_S_get_c_locale()),
123 _M_del(__table != 0 && __del),
124 _M_toupper(_M_c_locale_ctype->__ctype_toupper),
125 _M_tolower(_M_c_locale_ctype->__ctype_tolower),
126 _M_table(__table ? __table : _M_c_locale_ctype->__ctype_b),
127 _M_widen_ok(0), _M_narrow_ok(0)
129 __builtin_memset(_M_widen, 0, sizeof(_M_widen));
130 __builtin_memset(_M_narrow, 0, sizeof(_M_narrow));
133 ctype<char>::ctype(const mask* __table, bool __del, size_t __refs)
134 : facet(__refs), _M_c_locale_ctype(_S_get_c_locale()),
135 _M_del(__table != 0 && __del), _M_widen_ok(0), _M_narrow_ok(0)
137 char* __old = setlocale(LC_CTYPE, NULL);
139 if (__builtin_strcmp(__old, "C"))
141 const size_t __len = __builtin_strlen(__old) + 1;
142 __sav = new char[__len];
143 __builtin_memcpy(__sav, __old, __len);
144 setlocale(LC_CTYPE, "C");
146 #if __GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ > 2)
147 _M_toupper = *__ctype_toupper_loc();
148 _M_tolower = *__ctype_tolower_loc();
149 _M_table = __table ? __table : *__ctype_b_loc();
151 _M_toupper = __ctype_toupper;
152 _M_tolower = __ctype_tolower;
153 _M_table = __table ? __table : __ctype_b;
157 setlocale(LC_CTYPE, __sav);
160 __builtin_memset(_M_widen, 0, sizeof(_M_widen));
161 __builtin_memset(_M_narrow, 0, sizeof(_M_narrow));
166 ctype<char>::do_toupper(char __c) const
167 { return _M_toupper[static_cast<unsigned char>(__c)]; }
170 ctype<char>::do_toupper(char* __low, const char* __high) const
172 while (__low < __high)
174 *__low = _M_toupper[static_cast<unsigned char>(*__low)];
181 ctype<char>::do_tolower(char __c) const
182 { return _M_tolower[static_cast<unsigned char>(__c)]; }
185 ctype<char>::do_tolower(char* __low, const char* __high) const
187 while (__low < __high)
189 *__low = _M_tolower[static_cast<unsigned char>(*__low)];
195 _GLIBCXX_END_NAMESPACE_VERSION