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