| /* Query locale dependent information for formatting numbers. | |
| Copyright (C) 2012-2026 Free Software Foundation, Inc. | |
| This file is free software: you can redistribute it and/or modify | |
| it under the terms of the GNU Lesser General Public License as | |
| published by the Free Software Foundation; either version 2.1 of the | |
| License, or (at your option) any later version. | |
| This file is distributed in the hope that it will be useful, | |
| but WITHOUT ANY WARRANTY; without even the implied warranty of | |
| MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
| GNU Lesser General Public License for more details. | |
| You should have received a copy of the GNU Lesser General Public License | |
| along with this program. If not, see <https://www.gnu.org/licenses/>. */ | |
| #include <config.h> | |
| /* Specification. */ | |
| #include <locale.h> | |
| #include <limits.h> | |
| #if HAVE_STRUCT_LCONV_DECIMAL_POINT | |
| # define FIX_CHAR_VALUE(x) ((x) >= 0 ? (x) : CHAR_MAX) | |
| /* Override for platforms where 'struct lconv' lacks the int_p_*, int_n_* | |
| members or where fields of type 'char' are set to -1 instead of CHAR_MAX. */ | |
| struct lconv * | |
| localeconv (void) | |
| { | |
| static struct lconv result; | |
| # undef lconv | |
| # undef localeconv | |
| struct lconv *sys_result = localeconv (); | |
| result.decimal_point = sys_result->decimal_point; | |
| result.thousands_sep = sys_result->thousands_sep; | |
| result.grouping = sys_result->grouping; | |
| result.mon_decimal_point = sys_result->mon_decimal_point; | |
| result.mon_thousands_sep = sys_result->mon_thousands_sep; | |
| result.mon_grouping = sys_result->mon_grouping; | |
| result.positive_sign = sys_result->positive_sign; | |
| result.negative_sign = sys_result->negative_sign; | |
| result.currency_symbol = sys_result->currency_symbol; | |
| result.frac_digits = FIX_CHAR_VALUE (sys_result->frac_digits); | |
| result.p_cs_precedes = FIX_CHAR_VALUE (sys_result->p_cs_precedes); | |
| result.p_sign_posn = FIX_CHAR_VALUE (sys_result->p_sign_posn); | |
| result.p_sep_by_space = FIX_CHAR_VALUE (sys_result->p_sep_by_space); | |
| result.n_cs_precedes = FIX_CHAR_VALUE (sys_result->n_cs_precedes); | |
| result.n_sign_posn = FIX_CHAR_VALUE (sys_result->n_sign_posn); | |
| result.n_sep_by_space = FIX_CHAR_VALUE (sys_result->n_sep_by_space); | |
| result.int_curr_symbol = sys_result->int_curr_symbol; | |
| result.int_frac_digits = FIX_CHAR_VALUE (sys_result->int_frac_digits); | |
| # if HAVE_STRUCT_LCONV_INT_P_CS_PRECEDES | |
| result.int_p_cs_precedes = FIX_CHAR_VALUE (sys_result->int_p_cs_precedes); | |
| result.int_p_sign_posn = FIX_CHAR_VALUE (sys_result->int_p_sign_posn); | |
| result.int_p_sep_by_space = FIX_CHAR_VALUE (sys_result->int_p_sep_by_space); | |
| result.int_n_cs_precedes = FIX_CHAR_VALUE (sys_result->int_n_cs_precedes); | |
| result.int_n_sign_posn = FIX_CHAR_VALUE (sys_result->int_n_sign_posn); | |
| result.int_n_sep_by_space = FIX_CHAR_VALUE (sys_result->int_n_sep_by_space); | |
| # else | |
| result.int_p_cs_precedes = FIX_CHAR_VALUE (sys_result->p_cs_precedes); | |
| result.int_p_sign_posn = FIX_CHAR_VALUE (sys_result->p_sign_posn); | |
| result.int_p_sep_by_space = FIX_CHAR_VALUE (sys_result->p_sep_by_space); | |
| result.int_n_cs_precedes = FIX_CHAR_VALUE (sys_result->n_cs_precedes); | |
| result.int_n_sign_posn = FIX_CHAR_VALUE (sys_result->n_sign_posn); | |
| result.int_n_sep_by_space = FIX_CHAR_VALUE (sys_result->n_sep_by_space); | |
| # endif | |
| return &result; | |
| } | |
| #else | |
| /* Override for platforms where 'struct lconv' is a dummy. */ | |
| struct lconv * | |
| localeconv (void) | |
| { | |
| static /*const*/ struct lconv result = | |
| { | |
| /* decimal_point */ ".", | |
| /* thousands_sep */ "", | |
| /* grouping */ "", | |
| /* mon_decimal_point */ "", | |
| /* mon_thousands_sep */ "", | |
| /* mon_grouping */ "", | |
| /* positive_sign */ "", | |
| /* negative_sign */ "", | |
| /* currency_symbol */ "", | |
| /* frac_digits */ CHAR_MAX, | |
| /* p_cs_precedes */ CHAR_MAX, | |
| /* p_sign_posn */ CHAR_MAX, | |
| /* p_sep_by_space */ CHAR_MAX, | |
| /* n_cs_precedes */ CHAR_MAX, | |
| /* n_sign_posn */ CHAR_MAX, | |
| /* n_sep_by_space */ CHAR_MAX, | |
| /* int_curr_symbol */ "", | |
| /* int_frac_digits */ CHAR_MAX, | |
| /* int_p_cs_precedes */ CHAR_MAX, | |
| /* int_p_sign_posn */ CHAR_MAX, | |
| /* int_p_sep_by_space */ CHAR_MAX, | |
| /* int_n_cs_precedes */ CHAR_MAX, | |
| /* int_n_sign_posn */ CHAR_MAX, | |
| /* int_n_sep_by_space */ CHAR_MAX | |
| }; | |
| return &result; | |
| } | |
| #endif |