1 // Locale support -*- C++ -*-
3 // Copyright (C) 2011-2023 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