time/tst-getdate.c

   1 /* Test for getdate.
   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 <array_length.h>
  20 #include <stdbool.h>
  21 #include <stdio.h>
  22 #include <stdlib.h>
  23 #include <string.h>
  24 #include <support/check.h>
  25 #include <support/temp_file.h>
  26 #include <support/xunistd.h>
  27 #include <time.h>
  28
  29 static const struct
  30 {
  31   const char *str;
  32   const char *tz;
  33   struct tm tm;
  34   bool time64;
  35   int err_val;
  36   bool check_tm;
  37 } tests [] =
  38 {
  39   {"21:01:10 1999-1-31", "Universal", {10, 1, 21, 31, 0, 99, 0, 0, 0},
  40    false , 0, true},
  41   {"21:01:10    1999-1-31", "Universal", {10, 1, 21, 31, 0, 99, 0, 0, 0},
  42    false , 0, true},
  43   {"   21:01:10 1999-1-31", "Universal", {10, 1, 21, 31, 0, 99, 0, 0, 0},
  44    false , 0, true},
  45   {"21:01:10 1999-1-31   ", "Universal", {10, 1, 21, 31, 0, 99, 0, 0, 0},
  46    false , 0, true},
  47   {"    21:01:10 1999-1-31   ", "Universal", {10, 1, 21, 31, 0, 99, 0, 0, 0},
  48    false , 0, true},
  49   {"21:01:10 1999-2-28", "Universal", {10, 1, 21, 28, 1, 99, 0, 0, 0},
  50    false , 0, true},
  51   {"16:30:46 2000-2-29", "Universal", {46, 30,16, 29, 1, 100, 0, 0, 0},
  52    false , 0, true},
  53   {"01-08-2000 05:06:07", "Europe/Berlin", {7, 6, 5, 1, 7, 100, 0, 0, 0},
  54    false , 0, true},
  55   {"01-08-2000     05:06:07", "Europe/Berlin", {7, 6, 5, 1, 7, 100, 0, 0, 0},
  56    false , 0, true},
  57   {"01-08-2000 a 05:06:07", "Europe/Berlin", {0, 0, 0, 0, 0, 0, 0, 0, 0},
  58    false , 7, false},
  59   {"       12          AM     ", "Europe/Berlin", {0, 0, 0, 0, 0, 0, 0, 0, 0},
  60    false , 0, false},
  61
  62   /* 64 bit time_t tests.  */
  63   {"21:01:10 2038-1-31", "Universal", {10, 1, 21, 31, 0, 138, 0, 0, 0},
  64    true , 0, true},
  65   {"22:01:10 2048-5-20", "Universal", {10, 1, 22, 20, 4, 148, 0, 0, 0},
  66    true , 0, true},
  67   {"01-08-2038 05:06:07", "Europe/Berlin", {7, 6, 5, 1, 7, 138, 0, 0, 0},
  68    true , 0, true},
  69   {"20-03-2050 21:30:08", "Europe/Berlin", {8, 30, 21, 20, 2, 150, 0, 0, 0},
  70    true , 0, true}
  71 };
  72
  73 static const char *
  74 report_date_error (void)
  75 {
  76   switch (getdate_err)
  77     {
  78     case 1:
  79       return "The environment variable DATEMSK is not defined or null.";
  80     case 2:
  81       return "The template file denoted by the DATEMSK environment variable "
  82              "cannot be opened.";
  83     case 3:
  84       return "Information about the template file cannot retrieved.";
  85     case 4:
  86       return "The template file is not a regular file.\n";
  87     case 5:
  88       return "An I/O error occurred while reading the template file.";
  89     case 6:
  90       return "Not enough memory available to execute the function.";
  91     case 7:
  92       return "The template file contains no matching template.";
  93     case 8:
  94       return "The input date is invalid, but would match a template "
  95               "otherwise.";
  96     default:
  97       return "Unknown error code.";
  98     }
  99 }
 100
 101 static char *datemsk;
 102 static const char datemskstr[] =
 103   "%H:%M:%S %F\n"
 104   "%d-%m-%Y %T\n"
 105   "%I %p\n";
 106
 107 static void
 108 do_prepare (int argc, char **argv)
 109 {
 110   int fd = create_temp_file ("tst-getdate.", &datemsk);
 111   xwrite (fd, datemskstr, sizeof (datemskstr) - 1);
 112
 113   setenv ("DATEMSK", datemsk, 1);
 114 }
 115 #define PREPARE do_prepare
 116
 117 static int
 118 do_test (void)
 119 {
 120   struct tm *tm;
 121
 122   for (int i = 0; i < array_length (tests); ++i)
 123     {
 124       setenv ("TZ", tests[i].tz, 1);
 125
 126       tm = getdate (tests[i].str);
 127
 128       /* Only check getdate_err when tm is NULL as getdate doesn't set
 129          getdate_err on success. */
 130       if (tm == NULL)
 131         {
 132           TEST_COMPARE (getdate_err, tests[i].err_val);
 133           if (getdate_err != tests[i].err_val)
 134             printf ("%s\n", report_date_error ());
 135         }
 136       if (tests[i].err_val != 0)  /* Expected failure */
 137         {
 138           TEST_VERIFY (tm == NULL);
 139           continue;
 140         }
 141
 142       if (tests[i].check_tm)
 143         {
 144           TEST_COMPARE (tests[i].tm.tm_mon, tm->tm_mon);
 145           TEST_COMPARE (tests[i].tm.tm_year, tm->tm_year);
 146           TEST_COMPARE (tests[i].tm.tm_mday, tm->tm_mday);
 147           TEST_COMPARE (tests[i].tm.tm_hour, tm->tm_hour);
 148           TEST_COMPARE (tests[i].tm.tm_min, tm->tm_min);
 149           TEST_COMPARE (tests[i].tm.tm_sec, tm->tm_sec);
 150         }
 151
 152       struct tm tms;
 153       int retval = getdate_r (tests[i].str, &tms);
 154       TEST_COMPARE (retval, tests[i].err_val);
 155       if (retval == tests[i].err_val && tests[i].check_tm)
 156         {
 157           TEST_COMPARE (tests[i].tm.tm_mon, tms.tm_mon);
 158           TEST_COMPARE (tests[i].tm.tm_year, tms.tm_year);
 159           TEST_COMPARE (tests[i].tm.tm_mday, tms.tm_mday);
 160           TEST_COMPARE (tests[i].tm.tm_hour, tms.tm_hour);
 161           TEST_COMPARE (tests[i].tm.tm_min, tms.tm_min);
 162           TEST_COMPARE (tests[i].tm.tm_sec, tms.tm_sec);
 163         }
 164     }
 165
 166   return 0;
 167 }
 168
 169 #include <support/test-driver.c>