gl/localeconv.c

   1 /* Query locale dependent information for formatting numbers.
   2    Copyright (C) 2012-2024 Free Software Foundation, Inc.
   3
   4    This file is free software: you can redistribute it and/or modify
   5    it under the terms of the GNU Lesser General Public License as
   6    published by the Free Software Foundation; either version 2.1 of the
   7    License, or (at your option) any later version.
   8
   9    This file is distributed in the hope that it will be useful,
  10    but WITHOUT ANY WARRANTY; without even the implied warranty of
  11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12    GNU Lesser General Public License for more details.
  13
  14    You should have received a copy of the GNU Lesser General Public License
  15    along with this program.  If not, see <https://www.gnu.org/licenses/>.  */
  16
  17 #include <config.h>
  18
  19 /* Specification.  */
  20 #include <locale.h>
  21
  22 #include <limits.h>
  23
  24 #if HAVE_STRUCT_LCONV_DECIMAL_POINT
  25
  26 # define FIX_CHAR_VALUE(x) ((x) >= 0 ? (x) : CHAR_MAX)
  27
  28 /* Override for platforms where 'struct lconv' lacks the int_p_*, int_n_*
  29    members or where fields of type 'char' are set to -1 instead of CHAR_MAX.  */
  30
  31 struct lconv *
  32 localeconv (void)
  33 {
  34   static struct lconv result;
  35 # undef lconv
  36 # undef localeconv
  37   struct lconv *sys_result = localeconv ();
  38
  39   result.decimal_point = sys_result->decimal_point;
  40   result.thousands_sep = sys_result->thousands_sep;
  41   result.grouping = sys_result->grouping;
  42   result.mon_decimal_point = sys_result->mon_decimal_point;
  43   result.mon_thousands_sep = sys_result->mon_thousands_sep;
  44   result.mon_grouping = sys_result->mon_grouping;
  45   result.positive_sign = sys_result->positive_sign;
  46   result.negative_sign = sys_result->negative_sign;
  47   result.currency_symbol = sys_result->currency_symbol;
  48   result.frac_digits = FIX_CHAR_VALUE (sys_result->frac_digits);
  49   result.p_cs_precedes = FIX_CHAR_VALUE (sys_result->p_cs_precedes);
  50   result.p_sign_posn = FIX_CHAR_VALUE (sys_result->p_sign_posn);
  51   result.p_sep_by_space = FIX_CHAR_VALUE (sys_result->p_sep_by_space);
  52   result.n_cs_precedes = FIX_CHAR_VALUE (sys_result->n_cs_precedes);
  53   result.n_sign_posn = FIX_CHAR_VALUE (sys_result->n_sign_posn);
  54   result.n_sep_by_space = FIX_CHAR_VALUE (sys_result->n_sep_by_space);
  55   result.int_curr_symbol = sys_result->int_curr_symbol;
  56   result.int_frac_digits = FIX_CHAR_VALUE (sys_result->int_frac_digits);
  57 # if HAVE_STRUCT_LCONV_INT_P_CS_PRECEDES
  58   result.int_p_cs_precedes = FIX_CHAR_VALUE (sys_result->int_p_cs_precedes);
  59   result.int_p_sign_posn = FIX_CHAR_VALUE (sys_result->int_p_sign_posn);
  60   result.int_p_sep_by_space = FIX_CHAR_VALUE (sys_result->int_p_sep_by_space);
  61   result.int_n_cs_precedes = FIX_CHAR_VALUE (sys_result->int_n_cs_precedes);
  62   result.int_n_sign_posn = FIX_CHAR_VALUE (sys_result->int_n_sign_posn);
  63   result.int_n_sep_by_space = FIX_CHAR_VALUE (sys_result->int_n_sep_by_space);
  64 # else
  65   result.int_p_cs_precedes = FIX_CHAR_VALUE (sys_result->p_cs_precedes);
  66   result.int_p_sign_posn = FIX_CHAR_VALUE (sys_result->p_sign_posn);
  67   result.int_p_sep_by_space = FIX_CHAR_VALUE (sys_result->p_sep_by_space);
  68   result.int_n_cs_precedes = FIX_CHAR_VALUE (sys_result->n_cs_precedes);
  69   result.int_n_sign_posn = FIX_CHAR_VALUE (sys_result->n_sign_posn);
  70   result.int_n_sep_by_space = FIX_CHAR_VALUE (sys_result->n_sep_by_space);
  71 # endif
  72
  73   return &result;
  74 }
  75
  76 #else
  77
  78 /* Override for platforms where 'struct lconv' is a dummy.  */
  79
  80 struct lconv *
  81 localeconv (void)
  82 {
  83   static /*const*/ struct lconv result =
  84     {
  85       /* decimal_point */ ".",
  86       /* thousands_sep */ "",
  87       /* grouping */ "",
  88       /* mon_decimal_point */ "",
  89       /* mon_thousands_sep */ "",
  90       /* mon_grouping */ "",
  91       /* positive_sign */ "",
  92       /* negative_sign */ "",
  93       /* currency_symbol */ "",
  94       /* frac_digits */ CHAR_MAX,
  95       /* p_cs_precedes */ CHAR_MAX,
  96       /* p_sign_posn */ CHAR_MAX,
  97       /* p_sep_by_space */ CHAR_MAX,
  98       /* n_cs_precedes */ CHAR_MAX,
  99       /* n_sign_posn */ CHAR_MAX,
 100       /* n_sep_by_space */ CHAR_MAX,
 101       /* int_curr_symbol */ "",
 102       /* int_frac_digits */ CHAR_MAX,
 103       /* int_p_cs_precedes */ CHAR_MAX,
 104       /* int_p_sign_posn */ CHAR_MAX,
 105       /* int_p_sep_by_space */ CHAR_MAX,
 106       /* int_n_cs_precedes */ CHAR_MAX,
 107       /* int_n_sign_posn */ CHAR_MAX,
 108       /* int_n_sep_by_space */ CHAR_MAX
 109     };
 110
 111   return &result;
 112 }
 113
 114 #endif