locale_win32.cpp revision 8db4acad3b67808114c495fc21d4db6e7e277087 
1// -*- C++ -*-
2//===-------------------- support/win32/locale_win32.cpp ------------------===//
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#include "support/win32/locale_win32.h"
12
13#include <stdarg.h> // va_start, va_end
14
15// FIXME: base currently unused. Needs manual work to construct the new locale
16locale_t newlocale( int mask, const char * locale, locale_t /*base*/ )
17{
18    return _create_locale( mask, locale );
19}
20locale_t uselocale( locale_t newloc )
21{
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
28    return old_locale;
29}
30lconv *localeconv_l( locale_t loc )
31{
32    __locale_raii __current( uselocale(loc), uselocale );
33    return localeconv();
34}
35size_t mbrlen_l( const char *__restrict__ s, size_t n,
36                 mbstate_t *__restrict__ ps, locale_t loc )
37{
38    __locale_raii __current( uselocale(loc), uselocale );
39    return mbrlen( s, n, ps );
40}
41size_t mbsrtowcs_l( wchar_t *__restrict__ dst, const char **__restrict__ src,
42                    size_t len, mbstate_t *__restrict__ ps, locale_t loc )
43{
44    __locale_raii __current( uselocale(loc), uselocale );
45    return mbsrtowcs( dst, src, len, ps );
46}
47size_t wcrtomb_l( char *__restrict__ s, wchar_t wc, mbstate_t *__restrict__ ps,
48                  locale_t loc )
49{
50    __locale_raii __current( uselocale(loc), uselocale );
51    return wcrtomb( s, wc, ps );
52}
53size_t mbrtowc_l( wchar_t *__restrict__ pwc, const char *__restrict__ s,
54                  size_t n, mbstate_t *__restrict__ ps, locale_t loc )
55{
56    __locale_raii __current( uselocale(loc), uselocale );
57    return mbrtowc( pwc, s, n, ps );
58}
59size_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 )
61{
62    __locale_raii __current( uselocale(loc), uselocale );
63    return mbsnrtowcs( dst, src, nms, len, ps );
64}
65size_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 )
67{
68    __locale_raii __current( uselocale(loc), uselocale );
69    return wcsnrtombs( dst, src, nwc, len, ps );
70}
71wint_t btowc_l( int c, locale_t loc )
72{
73    __locale_raii __current( uselocale(loc), uselocale );
74    return btowc( c );
75}
76int wctob_l( wint_t c, locale_t loc )
77{
78    __locale_raii __current( uselocale(loc), uselocale );
79    return wctob( c );
80}
81
82int asprintf_l( char **ret, locale_t loc, const char *format, ... )
83{
84    va_list ap;
85    va_start( ap, format );
86    int result = vasprintf_l( ret, loc, format, ap );
87    va_end(ap);
88    return result;
89}
90int vasprintf_l( char **ret, locale_t loc, const char *format, va_list ap )
91{
92    __locale_raii __current( uselocale(loc), uselocale );
93    return vasprintf( ret, format, ap );
94}
95