1 // -*- C++ -*-
2 //===--------------------- support/win32/locale_win32.h -------------------===//
3 //
4 // The LLVM Compiler Infrastructure
5 //
6 // This file is dual licensed under the MIT and the University of Illinois Open
7 // Source Licenses. See LICENSE.TXT for details.
8 //
9 //===----------------------------------------------------------------------===//
10
11 #ifndef _LIBCPP_SUPPORT_WIN32_LOCALE_WIN32_H
12 #define _LIBCPP_SUPPORT_WIN32_LOCALE_WIN32_H
13
14 // ctype mask table defined in msvcrt.dll
15 extern "C" unsigned short __declspec(dllimport) _ctype[];
16
17 #include "support/win32/support.h"
18 #include <stdio.h>
19 #include <memory>
20 #include <xlocinfo.h> // _locale_t
21 #define locale_t _locale_t
22 #define LC_COLLATE_MASK _M_COLLATE
23 #define LC_CTYPE_MASK _M_CTYPE
24 #define LC_MONETARY_MASK _M_MONETARY
25 #define LC_NUMERIC_MASK _M_NUMERIC
26 #define LC_TIME_MASK _M_TIME
27 #define LC_MESSAGES_MASK _M_MESSAGES
28 #define LC_ALL_MASK ( LC_COLLATE_MASK \
29 | LC_CTYPE_MASK \
30 | LC_MESSAGES_MASK \
31 | LC_MONETARY_MASK \
32 | LC_NUMERIC_MASK \
33 | LC_TIME_MASK )
34 #define freelocale _free_locale
35 // FIXME: base currently unused. Needs manual work to construct the new locale
36 locale_t newlocale( int mask, const char * locale, locale_t base );
37 locale_t uselocale( locale_t newloc );
38 lconv *localeconv_l( locale_t loc );
39 size_t mbrlen_l( const char *__restrict s, size_t n,
40 mbstate_t *__restrict ps, locale_t loc);
41 size_t mbsrtowcs_l( wchar_t *__restrict dst, const char **__restrict src,
42 size_t len, mbstate_t *__restrict ps, locale_t loc );
43 size_t wcrtomb_l( char *__restrict s, wchar_t wc, mbstate_t *__restrict ps,
44 locale_t loc);
45 size_t mbrtowc_l( wchar_t *__restrict pwc, const char *__restrict s,
46 size_t n, mbstate_t *__restrict ps, locale_t loc);
47 size_t mbsnrtowcs_l( wchar_t *__restrict dst, const char **__restrict src,
48 size_t nms, size_t len, mbstate_t *__restrict ps, locale_t loc);
49 size_t wcsnrtombs_l( char *__restrict dst, const wchar_t **__restrict src,
50 size_t nwc, size_t len, mbstate_t *__restrict ps, locale_t loc);
51 wint_t btowc_l( int c, locale_t loc );
52 int wctob_l( wint_t c, locale_t loc );
53 typedef _VSTD::remove_pointer<locale_t>::type __locale_struct;
54 typedef _VSTD::unique_ptr<__locale_struct, decltype(&uselocale)> __locale_raii;
55 inline _LIBCPP_ALWAYS_INLINE
decltype(MB_CUR_MAX)56 decltype(MB_CUR_MAX) MB_CUR_MAX_L( locale_t __l )
57 {
58 __locale_raii __current( uselocale(__l), uselocale );
59 return MB_CUR_MAX;
60 }
61
62 // the *_l functions are prefixed on Windows, only available for msvcr80+, VS2005+
63 #define mbtowc_l _mbtowc_l
64 #define strtoll_l _strtoi64_l
65 #define strtoull_l _strtoui64_l
66 // FIXME: current msvcrt does not know about long double
67 #define strtold_l _strtod_l
68
69 inline _LIBCPP_INLINE_VISIBILITY
70 int
islower_l(int c,_locale_t loc)71 islower_l(int c, _locale_t loc)
72 {
73 return _islower_l((int)c, loc);
74 }
75
76 inline _LIBCPP_INLINE_VISIBILITY
77 int
isupper_l(int c,_locale_t loc)78 isupper_l(int c, _locale_t loc)
79 {
80 return _isupper_l((int)c, loc);
81 }
82
83 #define isdigit_l _isdigit_l
84 #define isxdigit_l _isxdigit_l
85 #define strcoll_l _strcoll_l
86 #define strxfrm_l _strxfrm_l
87 #define wcscoll_l _wcscoll_l
88 #define wcsxfrm_l _wcsxfrm_l
89 #define toupper_l _toupper_l
90 #define tolower_l _tolower_l
91 #define iswspace_l _iswspace_l
92 #define iswprint_l _iswprint_l
93 #define iswcntrl_l _iswcntrl_l
94 #define iswupper_l _iswupper_l
95 #define iswlower_l _iswlower_l
96 #define iswalpha_l _iswalpha_l
97 #define iswdigit_l _iswdigit_l
98 #define iswpunct_l _iswpunct_l
99 #define iswxdigit_l _iswxdigit_l
100 #define towupper_l _towupper_l
101 #define towlower_l _towlower_l
102 #define strftime_l _strftime_l
103 #define sscanf_l( __s, __l, __f, ...) _sscanf_l( __s, __f, __l, __VA_ARGS__ )
104 #define vsscanf_l( __s, __l, __f, ...) _sscanf_l( __s, __f, __l, __VA_ARGS__ )
105 #define sprintf_l( __s, __l, __f, ... ) _sprintf_l( __s, __f, __l, __VA_ARGS__ )
106 #define vsprintf_l( __s, __l, __f, ... ) _vsprintf_l( __s, __f, __l, __VA_ARGS__ )
107 #define vsnprintf_l( __s, __n, __l, __f, ... ) _vsnprintf_l( __s, __n, __f, __l, __VA_ARGS__ )
108 int snprintf_l(char *ret, size_t n, locale_t loc, const char *format, ...);
109 int asprintf_l( char **ret, locale_t loc, const char *format, ... );
110 int vasprintf_l( char **ret, locale_t loc, const char *format, va_list ap );
111
112
113 // not-so-pressing FIXME: use locale to determine blank characters
isblank_l(int c,locale_t)114 inline int isblank_l( int c, locale_t /*loc*/ )
115 {
116 return ( c == ' ' || c == '\t' );
117 }
iswblank_l(wint_t c,locale_t)118 inline int iswblank_l( wint_t c, locale_t /*loc*/ )
119 {
120 return ( c == L' ' || c == L'\t' );
121 }
122
123 #if defined(_LIBCPP_MSVCRT)
isblank(int c,locale_t)124 inline int isblank( int c, locale_t /*loc*/ )
125 { return ( c == ' ' || c == '\t' ); }
iswblank(wint_t c,locale_t)126 inline int iswblank( wint_t c, locale_t /*loc*/ )
127 { return ( c == L' ' || c == L'\t' ); }
128 #endif // _LIBCPP_MSVCRT
129 #endif // _LIBCPP_SUPPORT_WIN32_LOCALE_WIN32_H
130