tests/test-posixtm.c

   1 /* Test that posixtime works as required.
   2    Copyright (C) 2009 Free Software Foundation, Inc.
   3
   4    This program is free software: you can redistribute it and/or modify
   5    it under the terms of the GNU General Public License as published by
   6    the Free Software Foundation; either version 3 of the License, or
   7    (at your option) any later version.
   8
   9    This program 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 General Public License for more details.
  13
  14    You should have received a copy of the GNU General Public License
  15    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
  16
  17 /* Written by Jim Meyering.  */
  18
  19 #include <config.h>
  20
  21 #include "posixtm.h"
  22
  23 #include <stdio.h>
  24 #include <stdlib.h>
  25 #include <string.h>
  26 #include <stdint.h>
  27 #include <time.h>
  28
  29 #include "intprops.h"
  30
  31 #define ASSERT(expr) \
  32   do                                                                         \
  33     {                                                                        \
  34       if (!(expr))                                                           \
  35         {                                                                    \
  36           fprintf (stderr, "%s:%d: assertion failed\n", __FILE__, __LINE__); \
  37           fflush (stderr);                                                   \
  38           abort ();                                                          \
  39         }                                                                    \
  40     }                                                                        \
  41   while (0)
  42
  43 struct posixtm_test
  44 {
  45   char const *in;
  46   unsigned int syntax_bits;
  47   bool valid;
  48   int64_t t_expected;
  49 };
  50
  51 /* Test mainly with syntax_bits == 13
  52    (aka: (PDS_LEADING_YEAR | PDS_CENTURY | PDS_SECONDS))  */
  53
  54 static struct posixtm_test const T[] =
  55   {
  56     /* no year specified; cross-check via another posixtime call */
  57     { "12131415.16",     13, 1,            0}, /* ??? Dec 13 14:15:16 ???? */
  58     { "12131415",        13, 1,            0}, /* ??? Dec 13 14:15:00 ???? */
  59
  60     { "000001010000.00", 13, 1, -62167219200}, /* Sat Jan  1 00:00:00 0    */
  61     { "190112132045.51", 13, 1,  -2147483649}, /* Fri Dec 13 20:45:51 1901 */
  62     { "190112132045.52", 13, 1,  -2147483648}, /* Fri Dec 13 20:45:52 1901 */
  63     { "190112132045.53", 13, 1,  -2147483647}, /* Fri Dec 13 20:45:53 1901 */
  64     { "190112132046.52", 13, 1,  -2147483588}, /* Fri Dec 13 20:46:52 1901 */
  65     { "190112132145.52", 13, 1,  -2147480048}, /* Fri Dec 13 21:45:52 1901 */
  66     { "190112142045.52", 13, 1,  -2147397248}, /* Sat Dec 14 20:45:52 1901 */
  67     { "190201132045.52", 13, 1,  -2144805248}, /* Mon Jan 13 20:45:52 1902 */
  68     { "196912312359.59", 13, 1,           -1}, /* Wed Dec 31 23:59:59 1969 */
  69     { "197001010000.00", 13, 1,            0}, /* Thu Jan  1 00:00:00 1970 */
  70     { "197001010000.01", 13, 1,            1}, /* Thu Jan  1 00:00:01 1970 */
  71     { "197001010001.00", 13, 1,           60}, /* Thu Jan  1 00:01:00 1970 */
  72     { "197001010000.60", 13, 1,           60}, /* Thu Jan  1 00:01:00 1970 */
  73     { "197001010100.00", 13, 1,         3600}, /* Thu Jan  1 01:00:00 1970 */
  74     { "197001020000.00", 13, 1,        86400}, /* Fri Jan  2 00:00:00 1970 */
  75     { "197002010000.00", 13, 1,      2678400}, /* Sun Feb  1 00:00:00 1970 */
  76     { "197101010000.00", 13, 1,     31536000}, /* Fri Jan  1 00:00:00 1971 */
  77     { "197001000000.00", 13, 0,            0}, /* -- */
  78     { "197000010000.00", 13, 0,            0}, /* -- */
  79     { "197001010060.00", 13, 0,            0}, /* -- */
  80     { "197001012400.00", 13, 0,            0}, /* -- */
  81     { "197001320000.00", 13, 0,            0}, /* -- */
  82     { "197013010000.00", 13, 0,            0}, /* -- */
  83     { "203801190314.06", 13, 1,   2147483646}, /* Tue Jan 19 03:14:06 2038 */
  84     { "203801190314.07", 13, 1,   2147483647}, /* Tue Jan 19 03:14:07 2038 */
  85     { "203801190314.08", 13, 1,   2147483648}, /* Tue Jan 19 03:14:08 2038 */
  86     { "999912312359.59", 13, 1, 253402300799}, /* Fri Dec 31 23:59:59 9999 */
  87     { "1112131415",      13, 1,   1323785700}, /* Tue Dec 13 14:15:00 2011 */
  88     { "1112131415.16",   13, 1,   1323785716}, /* Tue Dec 13 14:15:16 2011 */
  89     { "201112131415.16", 13, 1,   1323785716}, /* Tue Dec 13 14:15:16 2011 */
  90     { "191112131415.16", 13, 1,  -1831974284}, /* Wed Dec 13 14:15:16 1911 */
  91     { "203712131415.16", 13, 1,   2144326516}, /* Sun Dec 13 14:15:16 2037 */
  92     { "3712131415.16",   13, 1,   2144326516}, /* Sun Dec 13 14:15:16 2037 */
  93     { "6812131415.16",   13, 1,   3122633716}, /* Thu Dec 13 14:15:16 2068 */
  94     { "6912131415.16",   13, 1,     -1590284}, /* Sat Dec 13 14:15:16 1969 */
  95     { "7012131415.16",   13, 1,     29945716}, /* Sun Dec 13 14:15:16 1970 */
  96     { "1213141599",       2, 1,    945094500}, /* Mon Dec 13 14:15:00 1999 */
  97     { "1213141500",       2, 1,    976716900}, /* Wed Dec 13 14:15:00 2000 */
  98     { NULL,               0, 0,            0}
  99   };
 100
 101 int
 102 main (void)
 103 {
 104   unsigned int i;
 105   int fail = 0;
 106   char curr_year_str[30];
 107   struct tm *tm;
 108   time_t t_now;
 109   int err;
 110   size_t n_bytes;
 111
 112   /* The above test data requires Universal Time, e.g., TZ="UTC0".  */
 113   err = setenv ("TZ", "UTC0", 1);
 114   ASSERT (err == 0);
 115
 116   t_now = time (NULL);
 117   ASSERT (t_now != (time_t) -1);
 118   tm = localtime (&t_now);
 119   ASSERT (tm);
 120   n_bytes = strftime (curr_year_str, sizeof curr_year_str, "%Y", tm);
 121   ASSERT (0 < n_bytes);
 122
 123   for (i = 0; T[i].in; i++)
 124     {
 125       time_t t_out;
 126       time_t t_exp = T[i].t_expected;
 127       bool ok;
 128
 129       /* Some tests assume that time_t is signed.
 130          If it is unsigned and the result is negative, skip the test. */
 131       if (T[i].t_expected < 0 && ! TYPE_SIGNED (time_t))
 132         {
 133           printf ("skipping %s: result is negative, "
 134                   "but your time_t is unsigned\n", T[i].in);
 135           continue;
 136         }
 137
 138       if (T[i].valid && t_exp != T[i].t_expected)
 139         {
 140           printf ("skipping %s: result is out of range of your time_t\n",
 141                   T[i].in);
 142           continue;
 143         }
 144
 145       /* If an input string does not specify the year number, determine
 146          the expected output by calling posixtime with an otherwise
 147          equivalent string that starts with the current year.  */
 148       if (8 <= strlen (T[i].in)
 149           && (T[i].in[8] == '.' || T[i].in[8] == '\0'))
 150         {
 151           char tmp_buf[20];
 152           stpcpy (stpcpy (tmp_buf, curr_year_str), T[i].in);
 153           ASSERT (posixtime (&t_exp, tmp_buf, T[i].syntax_bits));
 154         }
 155
 156       ok = posixtime (&t_out, T[i].in, T[i].syntax_bits);
 157       if (ok != !!T[i].valid)
 158         {
 159           printf ("%s return value mismatch: got %d, expected %d\n",
 160                   T[i].in, !!ok, T[i].valid);
 161           fail = 1;
 162           continue;
 163         }
 164
 165       if (!ok)
 166         continue;
 167
 168       if (t_out != t_exp)
 169         {
 170           printf ("%s mismatch (-: actual; +:expected)\n-%12ld\n+%12ld\n",
 171                   T[i].in, t_out, t_exp);
 172           fail = 1;
 173         }
 174     }
 175
 176   return fail;
 177 }
 178
 179 /*
 180 Local Variables:
 181 indent-tabs-mode: nil
 182 End:
 183 */