time/tst-strptime.c

   1 /* Test for strptime.
   2    Copyright (C) 1998-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 <locale.h>
  20 #include <stdio.h>
  21 #include <stdlib.h>
  22 #include <string.h>
  23 #include <time.h>
  24
  25
  26 static const struct
  27 {
  28   const char *locale;
  29   const char *input;
  30   const char *format;
  31   int wday;
  32   int yday;
  33   int mon;
  34   int mday;
  35 } day_tests[] =
  36 {
  37   { "C", "2000-01-01", "%Y-%m-%d", 6, 0, 0, 1 },
  38   { "C", "03/03/00", "%D", 5, 62, 2, 3 },
  39   { "C", "9/9/99", "%x", 4, 251, 8, 9 },
  40   { "C", "19990502123412", "%Y%m%d%H%M%S", 0, 121, 4, 2 },
  41   { "C", "2001 20 Mon", "%Y %U %a", 1, 140, 4, 21 },
  42   { "C", "2001 21 Mon", "%Y %W %a", 1, 140, 4, 21 },
  43   { "C", "2001 21 Mon", "%2000Y %W %a", 1, 140, 4, 21 },
  44   { "C", "2001 21 Mon", "%^Y %W %a", 1, 140, 4, 21 },
  45   { "C", "2001 EST 21 Mon", "%Y %Z %W %a", 1, 140, 4, 21 },
  46   { "C", "2012 00 Sun", "%Y %W %a", 0, 0, 0, 1 },
  47   { "ja_JP.EUC-JP", "2000-01-01 08:12:21 AM", "%Y-%m-%d %I:%M:%S %p",
  48     6, 0, 0, 1 },
  49   { "en_US.ISO-8859-1", "2000-01-01 08:12:21 PM", "%Y-%m-%d %I:%M:%S %p",
  50     6, 0, 0, 1 },
  51   { "ja_JP.EUC-JP", "2001 20 \xb7\xee", "%Y %U %a", 1, 140, 4, 21 },
  52   { "ja_JP.EUC-JP", "2001 21 \xb7\xee", "%Y %W %a", 1, 140, 4, 21 },
  53   /* Most of the languages do not need the declension of the month names
  54      and do not distinguish between %B and %OB.  */
  55   { "en_US.ISO-8859-1", "November 17, 2017", "%B %e, %Y", 5, 320, 10, 17 },
  56   { "de_DE.ISO-8859-1", "18. Nov 2017", "%d. %b %Y", 6, 321, 10, 18 },
  57   { "fr_FR.UTF-8", "19 novembre 2017", "%d %OB %Y", 0, 322, 10, 19 },
  58   { "es_ES.UTF-8", "20 de nov de 2017", "%d de %Ob de %Y", 1, 323, 10, 20 },
  59   /* Some languages do need the declension of the month names.  */
  60   { "pl_PL.UTF-8", "21 lis 2017", "%d %b %Y", 2, 324, 10, 21 },
  61   { "pl_PL.UTF-8", "22 LIS 2017", "%d %B %Y", 3, 325, 10, 22 },
  62   { "pl_PL.UTF-8", "23 listopada 2017", "%d %B %Y", 4, 326, 10, 23 },
  63   /* The nominative case is incorrect here but it is parseable.  */
  64   { "pl_PL.UTF-8", "24 listopad 2017", "%d %OB %Y", 5, 327, 10, 24 },
  65   { "pl_PL.UTF-8", "25 lis 2017", "%d %Ob %Y", 6, 328, 10, 25 },
  66   /* ноя - pronounce: 'noya' - "Nov" (abbreviated "November") in Russian.  */
  67   { "ru_RU.UTF-8", "26 ноя 2017", "%d %b %Y", 0, 329, 10, 26 },
  68   /* мая - pronounce: 'maya' - "of May" (the genitive case, both full and
  69      abbreviated) in Russian.  */
  70   { "ru_RU.UTF-8", "19 мая 2018", "%d %b %Y", 6, 138, 4, 19 },
  71   /* май - pronounce: 'may' - "May" (the nominative case, both full and
  72      abbreviated) in Russian.
  73      The nominative case is incorrect here but it is parseable.  */
  74   { "ru_RU.UTF-8", "20 май 2018", "%d %Ob %Y", 0, 139, 4, 20 },
  75 };
  76
  77
  78 static const struct
  79 {
  80   const char *input;
  81   const char *format;
  82   const char *output;
  83   int wday;
  84   int yday;
  85 } tm_tests [] =
  86 {
  87   {"17410105012000", "%H%M%S%d%m%Y", "2000-01-05 17:41:01", 3, 4}
  88 };
  89
  90
  91
  92 static int
  93 test_tm (void)
  94 {
  95   struct tm tm;
  96   size_t i;
  97   int result = 0;
  98   char buf[100];
  99
 100   for (i = 0; i < sizeof (tm_tests) / sizeof (tm_tests[0]); ++i)
 101     {
 102       memset (&tm, '\0', sizeof (tm));
 103
 104       char *ret = strptime (tm_tests[i].input, tm_tests[i].format, &tm);
 105       if (ret == NULL)
 106         {
 107           printf ("strptime returned NULL for `%s'\n", tm_tests[i].input);
 108           result = 1;
 109           continue;
 110         }
 111       else if (*ret != '\0')
 112         {
 113           printf ("not all of `%s' read\n", tm_tests[i].input);
 114           result = 1;
 115         }
 116       strftime (buf, sizeof (buf), "%F %T", &tm);
 117       printf ("strptime (\"%s\", \"%s\", ...)\n"
 118               "\tshould be: %s, wday = %d, yday = %3d\n"
 119               "\t       is: %s, wday = %d, yday = %3d\n",
 120               tm_tests[i].input, tm_tests[i].format,
 121               tm_tests[i].output,
 122               tm_tests[i].wday, tm_tests[i].yday,
 123               buf, tm.tm_wday, tm.tm_yday);
 124
 125       if (strcmp (buf, tm_tests[i].output) != 0)
 126         {
 127           printf ("Time and date are not correct.\n");
 128           result = 1;
 129         }
 130       if (tm.tm_wday != tm_tests[i].wday)
 131         {
 132           printf ("weekday for `%s' incorrect: %d instead of %d\n",
 133                   tm_tests[i].input, tm.tm_wday, tm_tests[i].wday);
 134           result = 1;
 135         }
 136       if (tm.tm_yday != tm_tests[i].yday)
 137         {
 138           printf ("yearday for `%s' incorrect: %d instead of %d\n",
 139                   tm_tests[i].input, tm.tm_yday, tm_tests[i].yday);
 140           result = 1;
 141         }
 142     }
 143
 144   return result;
 145 }
 146
 147
 148 static int
 149 do_test (void)
 150 {
 151   struct tm tm;
 152   size_t i;
 153   int result = 0;
 154
 155   for (i = 0; i < sizeof (day_tests) / sizeof (day_tests[0]); ++i)
 156     {
 157       memset (&tm, '\0', sizeof (tm));
 158
 159       if (setlocale (LC_ALL, day_tests[i].locale) == NULL)
 160         {
 161           printf ("cannot set locale %s: %m\n", day_tests[i].locale);
 162           exit (EXIT_FAILURE);
 163         }
 164
 165       char *ret = strptime (day_tests[i].input, day_tests[i].format, &tm);
 166       if (ret == NULL)
 167         {
 168           printf ("strptime returned NULL for `%s'\n", day_tests[i].input);
 169           result = 1;
 170           continue;
 171         }
 172       else if (*ret != '\0')
 173         {
 174           printf ("not all of `%s' read\n", day_tests[i].input);
 175           result = 1;
 176         }
 177
 178       printf ("strptime (\"%s\", \"%s\", ...)\n"
 179               "\tshould be: wday = %d, yday = %3d, mon = %2d, mday = %2d\n"
 180               "\t       is: wday = %d, yday = %3d, mon = %2d, mday = %2d\n",
 181               day_tests[i].input, day_tests[i].format,
 182               day_tests[i].wday, day_tests[i].yday,
 183               day_tests[i].mon, day_tests[i].mday,
 184               tm.tm_wday, tm.tm_yday, tm.tm_mon, tm.tm_mday);
 185
 186       if (tm.tm_wday != day_tests[i].wday)
 187         {
 188           printf ("weekday for `%s' incorrect: %d instead of %d\n",
 189                   day_tests[i].input, tm.tm_wday, day_tests[i].wday);
 190           result = 1;
 191         }
 192       if (tm.tm_yday != day_tests[i].yday)
 193         {
 194           printf ("yearday for `%s' incorrect: %d instead of %d\n",
 195                   day_tests[i].input, tm.tm_yday, day_tests[i].yday);
 196           result = 1;
 197         }
 198       if (tm.tm_mon != day_tests[i].mon)
 199         {
 200           printf ("month for `%s' incorrect: %d instead of %d\n",
 201                   day_tests[i].input, tm.tm_mon, day_tests[i].mon);
 202           result = 1;
 203         }
 204       if (tm.tm_mday != day_tests[i].mday)
 205         {
 206           printf ("monthday for `%s' incorrect: %d instead of %d\n",
 207                   day_tests[i].input, tm.tm_mday, day_tests[i].mday);
 208           result = 1;
 209         }
 210     }
 211
 212   setlocale (LC_ALL, "C");
 213
 214   result |= test_tm ();
 215
 216   return result;
 217 }
 218
 219 #define TEST_FUNCTION do_test ()
 220 #include "../test-skeleton.c"