master
1//===-----------------------------------------------------------------------===//
2//
3// Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
4// See https://llvm.org/LICENSE.txt for license information.
5// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
6//
7//===----------------------------------------------------------------------===//
8
9#ifndef _LIBCPP___LOCALE_DIR_SUPPORT_LINUX_H
10#define _LIBCPP___LOCALE_DIR_SUPPORT_LINUX_H
11
12#include <__config>
13#include <__cstddef/size_t.h>
14#include <__std_mbstate_t.h>
15#include <__utility/forward.h>
16#include <clocale> // std::lconv
17#include <cstdio>
18#include <cstdlib>
19#include <ctype.h>
20#include <stdarg.h>
21#include <string.h>
22#include <time.h>
23#if _LIBCPP_HAS_WIDE_CHARACTERS
24# include <cwchar>
25# include <wctype.h>
26#endif
27
28#if !defined(_LIBCPP_HAS_NO_PRAGMA_SYSTEM_HEADER)
29# pragma GCC system_header
30#endif
31
32_LIBCPP_BEGIN_NAMESPACE_STD
33namespace __locale {
34
35struct __locale_guard {
36 _LIBCPP_HIDE_FROM_ABI __locale_guard(locale_t& __loc) : __old_loc_(::uselocale(__loc)) {}
37
38 _LIBCPP_HIDE_FROM_ABI ~__locale_guard() {
39 if (__old_loc_)
40 ::uselocale(__old_loc_);
41 }
42
43 locale_t __old_loc_;
44
45 __locale_guard(__locale_guard const&) = delete;
46 __locale_guard& operator=(__locale_guard const&) = delete;
47};
48
49//
50// Locale management
51//
52#define _LIBCPP_COLLATE_MASK LC_COLLATE_MASK
53#define _LIBCPP_CTYPE_MASK LC_CTYPE_MASK
54#define _LIBCPP_MONETARY_MASK LC_MONETARY_MASK
55#define _LIBCPP_NUMERIC_MASK LC_NUMERIC_MASK
56#define _LIBCPP_TIME_MASK LC_TIME_MASK
57#define _LIBCPP_MESSAGES_MASK LC_MESSAGES_MASK
58#define _LIBCPP_ALL_MASK LC_ALL_MASK
59#define _LIBCPP_LC_ALL LC_ALL
60
61using __locale_t _LIBCPP_NODEBUG = ::locale_t;
62
63#if defined(_LIBCPP_BUILDING_LIBRARY)
64using __lconv_t _LIBCPP_NODEBUG = std::lconv;
65
66inline _LIBCPP_HIDE_FROM_ABI __locale_t __newlocale(int __category_mask, const char* __locale, __locale_t __base) {
67 return ::newlocale(__category_mask, __locale, __base);
68}
69
70inline _LIBCPP_HIDE_FROM_ABI void __freelocale(__locale_t __loc) { ::freelocale(__loc); }
71
72inline _LIBCPP_HIDE_FROM_ABI char* __setlocale(int __category, char const* __locale) {
73 return ::setlocale(__category, __locale);
74}
75
76inline _LIBCPP_HIDE_FROM_ABI __lconv_t* __localeconv(__locale_t& __loc) {
77 __locale_guard __current(__loc);
78 return std::localeconv();
79}
80#endif // _LIBCPP_BUILDING_LIBRARY
81
82//
83// Strtonum functions
84//
85inline _LIBCPP_HIDE_FROM_ABI float __strtof(const char* __nptr, char** __endptr, __locale_t __loc) {
86 return ::strtof_l(__nptr, __endptr, __loc);
87}
88
89inline _LIBCPP_HIDE_FROM_ABI double __strtod(const char* __nptr, char** __endptr, __locale_t __loc) {
90 return ::strtod_l(__nptr, __endptr, __loc);
91}
92
93inline _LIBCPP_HIDE_FROM_ABI long double __strtold(const char* __nptr, char** __endptr, __locale_t __loc) {
94 return ::strtold_l(__nptr, __endptr, __loc);
95}
96
97inline _LIBCPP_HIDE_FROM_ABI long long __strtoll(const char* __nptr, char** __endptr, int __base, __locale_t __loc) {
98#if !_LIBCPP_HAS_MUSL_LIBC
99 return ::strtoll_l(__nptr, __endptr, __base, __loc);
100#else
101 (void)__loc;
102 return ::strtoll(__nptr, __endptr, __base);
103#endif
104}
105
106inline _LIBCPP_HIDE_FROM_ABI unsigned long long
107__strtoull(const char* __nptr, char** __endptr, int __base, __locale_t __loc) {
108#if !_LIBCPP_HAS_MUSL_LIBC
109 return ::strtoull_l(__nptr, __endptr, __base, __loc);
110#else
111 (void)__loc;
112 return ::strtoull(__nptr, __endptr, __base);
113#endif
114}
115
116//
117// Character manipulation functions
118//
119inline _LIBCPP_HIDE_FROM_ABI int __isdigit(int __c, __locale_t __loc) { return isdigit_l(__c, __loc); }
120
121inline _LIBCPP_HIDE_FROM_ABI int __isxdigit(int __c, __locale_t __loc) { return isxdigit_l(__c, __loc); }
122
123#if defined(_LIBCPP_BUILDING_LIBRARY)
124inline _LIBCPP_HIDE_FROM_ABI int __toupper(int __c, __locale_t __loc) { return toupper_l(__c, __loc); }
125
126inline _LIBCPP_HIDE_FROM_ABI int __tolower(int __c, __locale_t __loc) { return tolower_l(__c, __loc); }
127
128inline _LIBCPP_HIDE_FROM_ABI int __strcoll(const char* __s1, const char* __s2, __locale_t __loc) {
129 return strcoll_l(__s1, __s2, __loc);
130}
131
132inline _LIBCPP_HIDE_FROM_ABI size_t __strxfrm(char* __dest, const char* __src, size_t __n, __locale_t __loc) {
133 return strxfrm_l(__dest, __src, __n, __loc);
134}
135
136# if _LIBCPP_HAS_WIDE_CHARACTERS
137inline _LIBCPP_HIDE_FROM_ABI int __iswctype(wint_t __c, wctype_t __type, __locale_t __loc) {
138 return iswctype_l(__c, __type, __loc);
139}
140
141inline _LIBCPP_HIDE_FROM_ABI int __iswspace(wint_t __c, __locale_t __loc) { return iswspace_l(__c, __loc); }
142
143inline _LIBCPP_HIDE_FROM_ABI int __iswprint(wint_t __c, __locale_t __loc) { return iswprint_l(__c, __loc); }
144
145inline _LIBCPP_HIDE_FROM_ABI int __iswcntrl(wint_t __c, __locale_t __loc) { return iswcntrl_l(__c, __loc); }
146
147inline _LIBCPP_HIDE_FROM_ABI int __iswupper(wint_t __c, __locale_t __loc) { return iswupper_l(__c, __loc); }
148
149inline _LIBCPP_HIDE_FROM_ABI int __iswlower(wint_t __c, __locale_t __loc) { return iswlower_l(__c, __loc); }
150
151inline _LIBCPP_HIDE_FROM_ABI int __iswalpha(wint_t __c, __locale_t __loc) { return iswalpha_l(__c, __loc); }
152
153inline _LIBCPP_HIDE_FROM_ABI int __iswblank(wint_t __c, __locale_t __loc) { return iswblank_l(__c, __loc); }
154
155inline _LIBCPP_HIDE_FROM_ABI int __iswdigit(wint_t __c, __locale_t __loc) { return iswdigit_l(__c, __loc); }
156
157inline _LIBCPP_HIDE_FROM_ABI int __iswpunct(wint_t __c, __locale_t __loc) { return iswpunct_l(__c, __loc); }
158
159inline _LIBCPP_HIDE_FROM_ABI int __iswxdigit(wint_t __c, __locale_t __loc) { return iswxdigit_l(__c, __loc); }
160
161inline _LIBCPP_HIDE_FROM_ABI wint_t __towupper(wint_t __c, __locale_t __loc) { return towupper_l(__c, __loc); }
162
163inline _LIBCPP_HIDE_FROM_ABI wint_t __towlower(wint_t __c, __locale_t __loc) { return towlower_l(__c, __loc); }
164
165inline _LIBCPP_HIDE_FROM_ABI int __wcscoll(const wchar_t* __ws1, const wchar_t* __ws2, __locale_t __loc) {
166 return wcscoll_l(__ws1, __ws2, __loc);
167}
168
169inline _LIBCPP_HIDE_FROM_ABI size_t __wcsxfrm(wchar_t* __dest, const wchar_t* __src, size_t __n, __locale_t __loc) {
170 return wcsxfrm_l(__dest, __src, __n, __loc);
171}
172# endif // _LIBCPP_HAS_WIDE_CHARACTERS
173
174inline _LIBCPP_HIDE_FROM_ABI size_t
175__strftime(char* __s, size_t __max, const char* __format, const struct tm* __tm, __locale_t __loc) {
176 return strftime_l(__s, __max, __format, __tm, __loc);
177}
178
179//
180// Other functions
181//
182inline _LIBCPP_HIDE_FROM_ABI decltype(MB_CUR_MAX) __mb_len_max(__locale_t __loc) {
183 __locale_guard __current(__loc);
184 return MB_CUR_MAX;
185}
186
187# if _LIBCPP_HAS_WIDE_CHARACTERS
188inline _LIBCPP_HIDE_FROM_ABI wint_t __btowc(int __c, __locale_t __loc) {
189 __locale_guard __current(__loc);
190 return std::btowc(__c);
191}
192
193inline _LIBCPP_HIDE_FROM_ABI int __wctob(wint_t __c, __locale_t __loc) {
194 __locale_guard __current(__loc);
195 return std::wctob(__c);
196}
197
198inline _LIBCPP_HIDE_FROM_ABI size_t
199__wcsnrtombs(char* __dest, const wchar_t** __src, size_t __nwc, size_t __len, mbstate_t* __ps, __locale_t __loc) {
200 __locale_guard __current(__loc);
201 return ::wcsnrtombs(__dest, __src, __nwc, __len, __ps); // non-standard
202}
203
204inline _LIBCPP_HIDE_FROM_ABI size_t __wcrtomb(char* __s, wchar_t __wc, mbstate_t* __ps, __locale_t __loc) {
205 __locale_guard __current(__loc);
206 return std::wcrtomb(__s, __wc, __ps);
207}
208
209inline _LIBCPP_HIDE_FROM_ABI size_t
210__mbsnrtowcs(wchar_t* __dest, const char** __src, size_t __nms, size_t __len, mbstate_t* __ps, __locale_t __loc) {
211 __locale_guard __current(__loc);
212 return ::mbsnrtowcs(__dest, __src, __nms, __len, __ps); // non-standard
213}
214
215inline _LIBCPP_HIDE_FROM_ABI size_t
216__mbrtowc(wchar_t* __pwc, const char* __s, size_t __n, mbstate_t* __ps, __locale_t __loc) {
217 __locale_guard __current(__loc);
218 return std::mbrtowc(__pwc, __s, __n, __ps);
219}
220
221inline _LIBCPP_HIDE_FROM_ABI int __mbtowc(wchar_t* __pwc, const char* __pmb, size_t __max, __locale_t __loc) {
222 __locale_guard __current(__loc);
223 return std::mbtowc(__pwc, __pmb, __max);
224}
225
226inline _LIBCPP_HIDE_FROM_ABI size_t __mbrlen(const char* __s, size_t __n, mbstate_t* __ps, __locale_t __loc) {
227 __locale_guard __current(__loc);
228 return std::mbrlen(__s, __n, __ps);
229}
230
231inline _LIBCPP_HIDE_FROM_ABI size_t
232__mbsrtowcs(wchar_t* __dest, const char** __src, size_t __len, mbstate_t* __ps, __locale_t __loc) {
233 __locale_guard __current(__loc);
234 return std::mbsrtowcs(__dest, __src, __len, __ps);
235}
236# endif // _LIBCPP_HAS_WIDE_CHARACTERS
237#endif // _LIBCPP_BUILDING_LIBRARY
238
239#ifndef _LIBCPP_COMPILER_GCC // GCC complains that this can't be always_inline due to C-style varargs
240_LIBCPP_HIDE_FROM_ABI
241#endif
242inline _LIBCPP_ATTRIBUTE_FORMAT(__printf__, 4, 5) int __snprintf(
243 char* __s, size_t __n, __locale_t __loc, const char* __format, ...) {
244 va_list __va;
245 va_start(__va, __format);
246 __locale_guard __current(__loc);
247 int __res = std::vsnprintf(__s, __n, __format, __va);
248 va_end(__va);
249 return __res;
250}
251
252#ifndef _LIBCPP_COMPILER_GCC // GCC complains that this can't be always_inline due to C-style varargs
253_LIBCPP_HIDE_FROM_ABI
254#endif
255inline _LIBCPP_ATTRIBUTE_FORMAT(__printf__, 3, 4) int __asprintf(
256 char** __s, __locale_t __loc, const char* __format, ...) {
257 va_list __va;
258 va_start(__va, __format);
259 __locale_guard __current(__loc);
260 int __res = ::vasprintf(__s, __format, __va); // non-standard
261 va_end(__va);
262 return __res;
263}
264
265#ifndef _LIBCPP_COMPILER_GCC // GCC complains that this can't be always_inline due to C-style varargs
266_LIBCPP_HIDE_FROM_ABI
267#endif
268inline _LIBCPP_ATTRIBUTE_FORMAT(__scanf__, 3, 4) int __sscanf(
269 const char* __s, __locale_t __loc, const char* __format, ...) {
270 va_list __va;
271 va_start(__va, __format);
272 __locale_guard __current(__loc);
273 int __res = std::vsscanf(__s, __format, __va);
274 va_end(__va);
275 return __res;
276}
277
278} // namespace __locale
279_LIBCPP_END_NAMESPACE_STD
280
281#endif // _LIBCPP___LOCALE_DIR_SUPPORT_LINUX_H