localedata/tst-langinfo.c

   1 /* Test driver for nl_langinfo[_l] functions.
   2    Copyright (C) 2000-2023 Free Software Foundation, Inc.
   3    This file is part of the GNU C Library.
   4
   5    The GNU C Library is free software; you can redistribute it and/or
   6    modify it under the terms of the GNU Lesser General Public
   7    License as published by the Free Software Foundation; either
   8    version 2.1 of the License, or (at your option) any later version.
   9
  10    The GNU C Library is distributed in the hope that it will be useful,
  11    but WITHOUT ANY WARRANTY; without even the implied warranty of
  12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13    Lesser General Public License for more details.
  14
  15    You should have received a copy of the GNU Lesser General Public
  16    License along with the GNU C Library; if not, see
  17    <https://www.gnu.org/licenses/>.  */
  18
  19 #include <langinfo.h>
  20 #include <locale.h>
  21 #include <stdio.h>
  22 #include <string.h>
  23
  24
  25 struct map
  26 {
  27   const char *str;
  28   int val;
  29 } map[] =
  30 {
  31 #define VAL(name) { #name, name }
  32   VAL (ABDAY_1),
  33   VAL (ABDAY_2),
  34   VAL (ABDAY_3),
  35   VAL (ABDAY_4),
  36   VAL (ABDAY_5),
  37   VAL (ABDAY_6),
  38   VAL (ABDAY_7),
  39   VAL (ABMON_1),
  40   VAL (ABMON_10),
  41   VAL (ABMON_11),
  42   VAL (ABMON_12),
  43   VAL (ABMON_2),
  44   VAL (ABMON_3),
  45   VAL (ABMON_4),
  46   VAL (ABMON_5),
  47   VAL (ABMON_6),
  48   VAL (ABMON_7),
  49   VAL (ABMON_8),
  50   VAL (ABMON_9),
  51   VAL (ALT_DIGITS),
  52   VAL (ALTMON_1),
  53   VAL (ALTMON_10),
  54   VAL (ALTMON_11),
  55   VAL (ALTMON_12),
  56   VAL (ALTMON_2),
  57   VAL (ALTMON_3),
  58   VAL (ALTMON_4),
  59   VAL (ALTMON_5),
  60   VAL (ALTMON_6),
  61   VAL (ALTMON_7),
  62   VAL (ALTMON_8),
  63   VAL (ALTMON_9),
  64   VAL (AM_STR),
  65   VAL (CRNCYSTR),
  66   VAL (CURRENCY_SYMBOL),
  67   VAL (DAY_1),
  68   VAL (DAY_2),
  69   VAL (DAY_3),
  70   VAL (DAY_4),
  71   VAL (DAY_5),
  72   VAL (DAY_6),
  73   VAL (DAY_7),
  74   VAL (DECIMAL_POINT),
  75   VAL (D_FMT),
  76   VAL (D_T_FMT),
  77   VAL (ERA),
  78   VAL (ERA_D_FMT),
  79   VAL (ERA_D_T_FMT),
  80   VAL (ERA_T_FMT),
  81   VAL (ERA_YEAR),
  82   VAL (FRAC_DIGITS),
  83   VAL (GROUPING),
  84   VAL (INT_CURR_SYMBOL),
  85   VAL (INT_FRAC_DIGITS),
  86   VAL (MON_1),
  87   VAL (MON_10),
  88   VAL (MON_11),
  89   VAL (MON_12),
  90   VAL (MON_2),
  91   VAL (MON_3),
  92   VAL (MON_4),
  93   VAL (MON_5),
  94   VAL (MON_6),
  95   VAL (MON_7),
  96   VAL (MON_8),
  97   VAL (MON_9),
  98   VAL (MON_DECIMAL_POINT),
  99   VAL (MON_GROUPING),
 100   VAL (MON_THOUSANDS_SEP),
 101   VAL (NEGATIVE_SIGN),
 102   VAL (NOEXPR),
 103   VAL (NOSTR),
 104   VAL (N_CS_PRECEDES),
 105   VAL (N_SEP_BY_SPACE),
 106   VAL (N_SIGN_POSN),
 107   VAL (PM_STR),
 108   VAL (POSITIVE_SIGN),
 109   VAL (P_CS_PRECEDES),
 110   VAL (P_SEP_BY_SPACE),
 111   VAL (P_SIGN_POSN),
 112   VAL (RADIXCHAR),
 113   VAL (THOUSANDS_SEP),
 114   VAL (THOUSEP),
 115   VAL (T_FMT),
 116   VAL (T_FMT_AMPM),
 117   VAL (YESEXPR),
 118   VAL (YESSTR)
 119 };
 120
 121
 122 static int
 123 map_paramstr (const char *str)
 124 {
 125   int low = 0;
 126   int high = sizeof (map) / sizeof (map[0]);
 127
 128   while (low < high)
 129     {
 130       int med = (low + high) / 2;
 131       int cmpres;
 132
 133       cmpres = strcmp (str, map[med].str);
 134       if (cmpres == 0)
 135         return map[med].val;
 136       else if (cmpres > 0)
 137         low = med + 1;
 138       else
 139         high = med;
 140     }
 141
 142   return -1;
 143 }
 144
 145
 146 #ifdef DEBUG
 147 # define REASON(str) printf ("\"%s\" ignored: %s\n", buf, str)
 148 #else
 149 # define REASON(str)
 150 #endif
 151
 152 static int
 153 do_test (void)
 154 {
 155   int result = 0;
 156
 157   while (! feof (stdin))
 158     {
 159       char buf[1000];
 160       char *rp;
 161       char *locale;
 162       char *paramstr;
 163       char *expected;
 164       int param;
 165
 166       if (fgets (buf, sizeof (buf), stdin) == NULL)
 167         break;
 168
 169       /* Split the fields.   There are three is them:
 170          1. locale
 171          2. langinfo() parameter
 172          3. expected result; this can be a string with white space etc.
 173       */
 174       rp = buf;
 175       while (*rp == ' ' || *rp == '\t')
 176         ++rp;
 177
 178       if  (*rp == '#')
 179         {
 180           /* It's a comment line.  Ignore it.  */
 181           REASON ("comment");
 182           continue;
 183         }
 184       locale = rp;
 185
 186       while (*rp != '\0' && *rp != ' ' && *rp != '\t' && *rp != '\n')
 187         ++rp;
 188       if (*rp == '\0' || *rp == '\n')
 189         {
 190           /* Incomplete line.  */
 191           REASON ("incomplete line");
 192           continue;
 193         }
 194       *rp++ = '\0';
 195
 196       while (*rp == ' ' || *rp == '\t')
 197         ++rp;
 198       paramstr = rp;
 199
 200       while (*rp != '\0' && *rp != ' ' && *rp != '\t' && *rp != '\n')
 201         ++rp;
 202       if (*rp == '\0' || *rp == '\n')
 203         {
 204           /* Incomplete line.  */
 205           REASON ("incomplete line");
 206           continue;
 207         }
 208       *rp++ = '\0';
 209
 210       while (*rp == ' ' || *rp == '\t')
 211         ++rp;
 212
 213       if (*rp == '"')
 214         {
 215           char *wp;
 216
 217           expected = wp = ++rp;
 218           while (*rp != '"' && *rp != '\n' && *rp != '\0')
 219             {
 220               if (*rp == '\\')
 221                 {
 222                   ++rp;
 223                   if (*rp == '\0')
 224                     break;
 225                   if (*rp >= '0' && *rp <= '9')
 226                     {
 227                       int val = *rp - '0';
 228                       if (rp[1] >= '0' && rp[1] <= '9')
 229                         {
 230                           ++rp;
 231                           val *= 10;
 232                           val += *rp - '0';
 233                           if (rp[1] >= '0' && rp[1] <= '9')
 234                             {
 235                               ++rp;
 236                               val *= 10;
 237                               val += *rp - '0';
 238                             }
 239                         }
 240                       *rp = val;
 241                     }
 242                 }
 243               *wp++ = *rp++;
 244             }
 245
 246           if (*rp != '"')
 247             {
 248               REASON ("missing '\"'");
 249               continue;
 250             }
 251
 252           *wp = '\0';
 253         }
 254       else
 255         {
 256           expected = rp;
 257           while (*rp != '\0' && *rp != '\n')
 258             ++rp;
 259           *rp = '\0';
 260         }
 261
 262       param = map_paramstr (paramstr);
 263       if (param == -1)
 264         {
 265           /* Invalid parameter.  */
 266           REASON ("invalid parameter");
 267           continue;
 268         }
 269
 270       result = test_locale (locale, paramstr, param, expected);
 271     }
 272
 273   return result;
 274 }
 275
 276 #define TEST_FUNCTION do_test ()
 277 #include "../test-skeleton.c"