2 * Copyright 2010 Nexenta Systems, Inc. All rights reserved.
3 * Copyright (c) 2000, 2001 Alexey Zelkin <phantom@FreeBSD.org>
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
15 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32 #include "../i18n/_locale.h"
34 extern int __nlocale_changed
;
35 extern const char *__fix_locale_grouping_str(const char *);
37 #define LCNUMERIC_SIZE (sizeof (struct lc_numeric_T) / sizeof (char *))
39 static char numempty
[] = { CHAR_MAX
, '\0' };
41 static const struct lc_numeric_T _C_numeric_locale
= {
42 ".", /* decimal_point */
43 "", /* thousands_sep */
44 numempty
/* grouping */
47 static struct lc_numeric_T _numeric_locale
;
48 static int _numeric_using_locale
;
49 static char *_numeric_locale_buf
;
52 __numeric_load_locale(const char *name
)
54 const struct lc_numeric_T
*leg
= &_C_numeric_locale
;
58 ret
= __part_load_locale(name
, &_numeric_using_locale
,
59 &_numeric_locale_buf
, "LC_NUMERIC", LCNUMERIC_SIZE
, LCNUMERIC_SIZE
,
60 (const char **)&_numeric_locale
);
61 if (ret
== _LDP_ERROR
)
64 __nlocale_changed
= 1;
65 if (ret
== _LDP_LOADED
) {
66 /* Can't be empty according to C99 */
67 if (*_numeric_locale
.decimal_point
== '\0')
68 _numeric_locale
.decimal_point
=
69 _C_numeric_locale
.decimal_point
;
70 _numeric_locale
.grouping
=
71 __fix_locale_grouping_str(_numeric_locale
.grouping
);
72 leg
= (const struct lc_numeric_T
*)&_numeric_locale
;
74 /* This is Solaris legacy, required for ABI compatability */
75 _numeric
[0] = *leg
->decimal_point
;
76 _numeric
[1] = *leg
->grouping
;
81 __get_current_numeric_locale(void)
83 return (_numeric_using_locale
? &_numeric_locale
:
84 (struct lc_numeric_T
*)&_C_numeric_locale
);