maint: update copyright
[gnulib.git] / tests / test-posixtm.c
1 /* Test that posixtime works as required.
2    Copyright (C) 2009-2014 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 #include "macros.h"
31
32 struct posixtm_test
33 {
34   char const *in;
35   unsigned int syntax_bits;
36   bool valid;
37   int_least64_t t_expected;
38 };
39
40 /* Test mainly with syntax_bits == 13
41    (aka: (PDS_LEADING_YEAR | PDS_CENTURY | PDS_SECONDS))  */
42
43 static struct posixtm_test const T[] =
44   {
45     /* no year specified; cross-check via another posixtime call */
46     { "12131415.16",     13, 1,            0}, /* ??? Dec 13 14:15:16 ???? */
47     { "12131415",        13, 1,            0}, /* ??? Dec 13 14:15:00 ???? */
48
49     /* These two tests fail on 64-bit Solaris up through at least
50        Solaris 10, which is off by one day for time stamps before
51        0001-01-01 00:00:00 UTC.  */
52     { "000001010000.00", 13, 1,
53                       - INT64_C (62167219200)},/* Sat Jan  1 00:00:00 0    */
54     { "000012312359.59", 13, 1,
55                       - INT64_C (62135596801)},/* Fri Dec 31 23:59:59 0    */
56
57     { "000101010000.00", 13, 1,
58                       - INT64_C (62135596800)},/* Sat Jan  1 00:00:00 1    */
59     { "190112132045.51", 13, 1,
60                        - INT64_C (2147483649)},/* Fri Dec 13 20:45:51 1901 */
61     { "190112132045.52", 13, 1,
62                        - INT64_C (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,
86                        INT64_C (  2147483648)},/* Tue Jan 19 03:14:08 2038 */
87     { "999912312359.59", 13, 1,
88                        INT64_C (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,
96                        INT64_C (  3122633716)},/* Thu Dec 13 14:15:16 2068 */
97     { "6912131415.16",   13, 1,     -1590284}, /* Sat Dec 13 14:15:16 1969 */
98     { "7012131415.16",   13, 1,     29945716}, /* Sun Dec 13 14:15:16 1970 */
99     { "1213141599",       2, 1,    945094500}, /* Mon Dec 13 14:15:00 1999 */
100     { "1213141500",       2, 1,    976716900}, /* Wed Dec 13 14:15:00 2000 */
101     { NULL,               0, 0,            0}
102   };
103
104 int
105 main (void)
106 {
107   unsigned int i;
108   int fail = 0;
109   char curr_year_str[30];
110   struct tm *tm;
111   time_t t_now;
112   int err;
113   size_t n_bytes;
114
115   /* The above test data requires Universal Time, e.g., TZ="UTC0".  */
116   err = setenv ("TZ", "UTC0", 1);
117   ASSERT (err == 0);
118
119   t_now = time (NULL);
120   ASSERT (t_now != (time_t) -1);
121   tm = localtime (&t_now);
122   ASSERT (tm);
123   n_bytes = strftime (curr_year_str, sizeof curr_year_str, "%Y", tm);
124   ASSERT (0 < n_bytes);
125
126   for (i = 0; T[i].in; i++)
127     {
128       time_t t_out;
129       time_t t_exp;
130       bool ok;
131
132       /* Some tests assume that time_t is signed.
133          If it is unsigned and the result is negative, skip the test. */
134       if (T[i].t_expected < 0 && ! TYPE_SIGNED (time_t))
135         {
136           printf ("skipping %s: result is negative, "
137                   "but your time_t is unsigned\n", T[i].in);
138           continue;
139         }
140
141       if (! (TYPE_MINIMUM (time_t) <= T[i].t_expected
142              && T[i].t_expected <= TYPE_MAXIMUM (time_t)))
143         {
144           printf ("skipping %s: result is out of range of your time_t\n",
145                   T[i].in);
146           continue;
147         }
148
149       t_exp = T[i].t_expected;
150
151       /* If an input string does not specify the year number, determine
152          the expected output by calling posixtime with an otherwise
153          equivalent string that starts with the current year.  */
154       if (8 <= strlen (T[i].in)
155           && (T[i].in[8] == '.' || T[i].in[8] == '\0'))
156         {
157           char tmp_buf[20];
158           stpcpy (stpcpy (tmp_buf, curr_year_str), T[i].in);
159           ASSERT (posixtime (&t_exp, tmp_buf, T[i].syntax_bits));
160         }
161
162       ok = posixtime (&t_out, T[i].in, T[i].syntax_bits);
163       if (ok != !!T[i].valid)
164         {
165           printf ("%s return value mismatch: got %d, expected %d\n",
166                   T[i].in, !!ok, T[i].valid);
167           fail = 1;
168           continue;
169         }
170
171       if (!ok)
172         continue;
173
174       if (t_out != t_exp)
175         {
176           printf ("%s mismatch (-: actual; +:expected)\n-%12ld\n+%12ld\n",
177                   T[i].in, t_out, t_exp);
178           fail = 1;
179         }
180     }
181
182   return fail;
183 }
184
185 /*
186 Local Variables:
187 indent-tabs-mode: nil
188 End:
189 */