2
//===-------------------- support/win32/locale_win32.cpp ------------------===//
4
// The LLVM Compiler Infrastructure
6
// This file is dual licensed under the MIT and the University of Illinois Open
7
// Source Licenses. See LICENSE.TXT for details.
9
//===----------------------------------------------------------------------===//
11
#include "support/win32/locale_win32.h"
13
#include <stdarg.h> // va_start, va_end
15
// FIXME: base currently unused. Needs manual work to construct the new locale
16
locale_t newlocale( int mask, const char * locale, locale_t /*base*/ )
18
return _create_locale( mask, locale );
20
locale_t uselocale( locale_t newloc )
22
locale_t old_locale = _get_current_locale();
23
// uselocale sets the thread's locale by definition, so unconditionally use thread-local locale
24
_configthreadlocale( _ENABLE_PER_THREAD_LOCALE );
25
// uselocale sets all categories
26
setlocale( LC_ALL, newloc->locinfo->lc_category[LC_ALL].locale );
27
// uselocale returns the old locale_t
30
lconv *localeconv_l( locale_t loc )
32
__locale_raii __current( uselocale(loc), uselocale );
35
size_t mbrlen_l( const char *__restrict__ s, size_t n,
36
mbstate_t *__restrict__ ps, locale_t loc )
38
__locale_raii __current( uselocale(loc), uselocale );
39
return mbrlen( s, n, ps );
41
size_t mbsrtowcs_l( wchar_t *__restrict__ dst, const char **__restrict__ src,
42
size_t len, mbstate_t *__restrict__ ps, locale_t loc )
44
__locale_raii __current( uselocale(loc), uselocale );
45
return mbsrtowcs( dst, src, len, ps );
47
size_t wcrtomb_l( char *__restrict__ s, wchar_t wc, mbstate_t *__restrict__ ps,
50
__locale_raii __current( uselocale(loc), uselocale );
51
return wcrtomb( s, wc, ps );
53
size_t mbrtowc_l( wchar_t *__restrict__ pwc, const char *__restrict__ s,
54
size_t n, mbstate_t *__restrict__ ps, locale_t loc )
56
__locale_raii __current( uselocale(loc), uselocale );
57
return mbrtowc( pwc, s, n, ps );
59
size_t mbsnrtowcs_l( wchar_t *__restrict__ dst, const char **__restrict__ src,
60
size_t nms, size_t len, mbstate_t *__restrict__ ps, locale_t loc )
62
__locale_raii __current( uselocale(loc), uselocale );
63
return mbsnrtowcs( dst, src, nms, len, ps );
65
size_t wcsnrtombs_l( char *__restrict__ dst, const wchar_t **__restrict__ src,
66
size_t nwc, size_t len, mbstate_t *__restrict__ ps, locale_t loc )
68
__locale_raii __current( uselocale(loc), uselocale );
69
return wcsnrtombs( dst, src, nwc, len, ps );
71
wint_t btowc_l( int c, locale_t loc )
73
__locale_raii __current( uselocale(loc), uselocale );
76
int wctob_l( wint_t c, locale_t loc )
78
__locale_raii __current( uselocale(loc), uselocale );
82
int asprintf_l( char **ret, locale_t loc, const char *format, ... )
85
va_start( ap, format );
86
int result = vasprintf_l( ret, loc, format, ap );
90
int vasprintf_l( char **ret, locale_t loc, const char *format, va_list ap )
92
__locale_raii __current( uselocale(loc), uselocale );
93
return vasprintf( ret, format, ap );