t_parsedate.c revision 1.30 1 1.30 kre /* $NetBSD: t_parsedate.c,v 1.30 2017/03/22 05:35:33 kre Exp $ */
2 1.1 njoly /*-
3 1.14 christos * Copyright (c) 2010, 2015 The NetBSD Foundation, Inc.
4 1.1 njoly * All rights reserved.
5 1.1 njoly *
6 1.1 njoly * Redistribution and use in source and binary forms, with or without
7 1.1 njoly * modification, are permitted provided that the following conditions
8 1.1 njoly * are met:
9 1.1 njoly *
10 1.1 njoly * 1. Redistributions of source code must retain the above copyright
11 1.1 njoly * notice, this list of conditions and the following disclaimer.
12 1.1 njoly * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 njoly * notice, this list of conditions and the following disclaimer in
14 1.1 njoly * the documentation and/or other materials provided with the
15 1.1 njoly * distribution.
16 1.1 njoly *
17 1.1 njoly * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
18 1.1 njoly * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
19 1.1 njoly * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
20 1.1 njoly * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
21 1.1 njoly * COPYRIGHT HOLDERS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
22 1.1 njoly * INCIDENTAL, SPECIAL, EXEMPLARY OR CONSEQUENTIAL DAMAGES (INCLUDING,
23 1.1 njoly * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
24 1.1 njoly * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
25 1.1 njoly * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
26 1.1 njoly * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
27 1.1 njoly * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
28 1.1 njoly * SUCH DAMAGE.
29 1.1 njoly */
30 1.1 njoly
31 1.1 njoly #include <sys/cdefs.h>
32 1.30 kre __RCSID("$NetBSD: t_parsedate.c,v 1.30 2017/03/22 05:35:33 kre Exp $");
33 1.1 njoly
34 1.1 njoly #include <atf-c.h>
35 1.6 apb #include <errno.h>
36 1.12 apb #include <stdio.h>
37 1.6 apb #include <stdlib.h>
38 1.6 apb #include <time.h>
39 1.1 njoly #include <util.h>
40 1.1 njoly
41 1.8 apb /*
42 1.8 apb * ANY is used as a placeholder for values that do not need to be
43 1.8 apb * checked. The actual value is arbitrary. We don't use -1
44 1.8 apb * because some tests might want to use -1 as a literal value.
45 1.8 apb */
46 1.8 apb #define ANY -30215
47 1.8 apb
48 1.8 apb /* parsecheck --
49 1.8 apb * call parsedate(), then call time_to_tm() on the result,
50 1.8 apb * and check that year/month/day/hour/minute/second are as expected.
51 1.8 apb *
52 1.8 apb * time_to_tm should usually be localtime_r or gmtime_r.
53 1.8 apb *
54 1.8 apb * Don't check values specified as ANY.
55 1.8 apb */
56 1.8 apb static void
57 1.8 apb parsecheck(const char *datestr, const time_t *reftime, const int *zoff,
58 1.8 apb struct tm * time_to_tm(const time_t *, struct tm *),
59 1.8 apb int year, int month, int day, int hour, int minute, int second)
60 1.8 apb {
61 1.8 apb time_t t;
62 1.8 apb struct tm tm;
63 1.12 apb char argstr[128];
64 1.12 apb
65 1.12 apb /*
66 1.12 apb * printable version of the args.
67 1.12 apb *
68 1.12 apb * Note that printf("%.*d", 0, 0)) prints nothing at all,
69 1.12 apb * while printf("%.*d", 1, val) prints the value as usual.
70 1.12 apb */
71 1.12 apb snprintf(argstr, sizeof(argstr), "%s%s%s, %s%.*jd, %s%.*d",
72 1.12 apb /* NULL or \"<datestr>\" */
73 1.12 apb (datestr ? "\"" : ""),
74 1.12 apb (datestr ? datestr : "NULL"),
75 1.12 apb (datestr ? "\"" : ""),
76 1.12 apb /* NULL or *reftime */
77 1.12 apb (reftime ? "" : "NULL"),
78 1.12 apb (reftime ? 1 : 0),
79 1.12 apb (reftime ? (intmax_t)*reftime : (intmax_t)0),
80 1.12 apb /* NULL or *zoff */
81 1.12 apb (zoff ? "" : "NULL"),
82 1.12 apb (zoff ? 1 : 0),
83 1.12 apb (zoff ? *zoff : 0));
84 1.8 apb
85 1.8 apb ATF_CHECK_MSG((t = parsedate(datestr, reftime, zoff)) != -1,
86 1.12 apb "parsedate(%s) returned -1\n", argstr);
87 1.26 kre if (t == -1)
88 1.26 kre return;
89 1.26 kre
90 1.8 apb ATF_CHECK(time_to_tm(&t, &tm) != NULL);
91 1.8 apb if (year != ANY)
92 1.8 apb ATF_CHECK_MSG(tm.tm_year + 1900 == year,
93 1.12 apb "parsedate(%s) expected year %d got %d (+1900)\n",
94 1.12 apb argstr, year, (int)tm.tm_year);
95 1.8 apb if (month != ANY)
96 1.8 apb ATF_CHECK_MSG(tm.tm_mon + 1 == month,
97 1.12 apb "parsedate(%s) expected month %d got %d (+1)\n",
98 1.12 apb argstr, month, (int)tm.tm_mon);
99 1.8 apb if (day != ANY)
100 1.8 apb ATF_CHECK_MSG(tm.tm_mday == day,
101 1.12 apb "parsedate(%s) expected day %d got %d\n",
102 1.12 apb argstr, day, (int)tm.tm_mday);
103 1.8 apb if (hour != ANY)
104 1.8 apb ATF_CHECK_MSG(tm.tm_hour == hour,
105 1.12 apb "parsedate(%s) expected hour %d got %d\n",
106 1.12 apb argstr, hour, (int)tm.tm_hour);
107 1.8 apb if (minute != ANY)
108 1.8 apb ATF_CHECK_MSG(tm.tm_min == minute,
109 1.12 apb "parsedate(%s) expected minute %d got %d\n",
110 1.12 apb argstr, minute, (int)tm.tm_min);
111 1.8 apb if (second != ANY)
112 1.8 apb ATF_CHECK_MSG(tm.tm_sec == second,
113 1.12 apb "parsedate(%s) expected second %d got %d\n",
114 1.12 apb argstr, second, (int)tm.tm_sec);
115 1.8 apb }
116 1.8 apb
117 1.1 njoly ATF_TC(dates);
118 1.1 njoly
119 1.1 njoly ATF_TC_HEAD(dates, tc)
120 1.1 njoly {
121 1.4 christos atf_tc_set_md_var(tc, "descr", "Test unambiguous dates"
122 1.5 jruoho " (PR lib/44255)");
123 1.1 njoly }
124 1.1 njoly
125 1.1 njoly ATF_TC_BODY(dates, tc)
126 1.1 njoly {
127 1.1 njoly
128 1.10 apb parsecheck("9/10/69", NULL, NULL, localtime_r,
129 1.10 apb 2069, 9, 10, 0, 0, 0); /* year < 70: add 2000 */
130 1.10 apb parsecheck("9/10/70", NULL, NULL, localtime_r,
131 1.10 apb 1970, 9, 10, 0, 0, 0); /* 70 <= year < 100: add 1900 */
132 1.8 apb parsecheck("69-09-10", NULL, NULL, localtime_r,
133 1.10 apb 69, 9, 10, 0, 0, 0); /* ISO8601 year remains unchanged */
134 1.9 apb parsecheck("70-09-10", NULL, NULL, localtime_r,
135 1.10 apb 70, 9, 10, 0, 0, 0); /* ISO8601 year remains unchanged */
136 1.8 apb parsecheck("2006-11-17", NULL, NULL, localtime_r,
137 1.8 apb 2006, 11, 17, 0, 0, 0);
138 1.8 apb parsecheck("10/1/2000", NULL, NULL, localtime_r,
139 1.9 apb 2000, 10, 1, 0, 0, 0); /* month/day/year */
140 1.8 apb parsecheck("20 Jun 1994", NULL, NULL, localtime_r,
141 1.8 apb 1994, 6, 20, 0, 0, 0);
142 1.14 christos parsecheck("97 September 2", NULL, NULL, localtime_r,
143 1.14 christos 1997, 9, 2, 0, 0, 0);
144 1.8 apb parsecheck("23jun2001", NULL, NULL, localtime_r,
145 1.8 apb 2001, 6, 23, 0, 0, 0);
146 1.8 apb parsecheck("1-sep-06", NULL, NULL, localtime_r,
147 1.8 apb 2006, 9, 1, 0, 0, 0);
148 1.8 apb parsecheck("1/11", NULL, NULL, localtime_r,
149 1.9 apb ANY, 1, 11, 0, 0, 0); /* month/day */
150 1.8 apb parsecheck("1500-01-02", NULL, NULL, localtime_r,
151 1.8 apb 1500, 1, 2, 0, 0, 0);
152 1.8 apb parsecheck("9999-12-21", NULL, NULL, localtime_r,
153 1.8 apb 9999, 12, 21, 0, 0, 0);
154 1.14 christos parsecheck("2015.12.07.08.07.35", NULL, NULL, localtime_r,
155 1.14 christos 2015, 12, 7, 8, 7, 35);
156 1.1 njoly }
157 1.1 njoly
158 1.1 njoly ATF_TC(times);
159 1.1 njoly
160 1.1 njoly ATF_TC_HEAD(times, tc)
161 1.1 njoly {
162 1.4 christos atf_tc_set_md_var(tc, "descr", "Test times"
163 1.5 jruoho " (PR lib/44255)");
164 1.1 njoly }
165 1.1 njoly
166 1.1 njoly ATF_TC_BODY(times, tc)
167 1.1 njoly {
168 1.1 njoly
169 1.8 apb parsecheck("10:01", NULL, NULL, localtime_r,
170 1.8 apb ANY, ANY, ANY, 10, 1, 0);
171 1.8 apb parsecheck("10:12pm", NULL, NULL, localtime_r,
172 1.8 apb ANY, ANY, ANY, 22, 12, 0);
173 1.8 apb parsecheck("12:11:01.000012", NULL, NULL, localtime_r,
174 1.8 apb ANY, ANY, ANY, 12, 11, 1);
175 1.8 apb parsecheck("12:21-0500", NULL, NULL, gmtime_r,
176 1.8 apb ANY, ANY, ANY, 12+5, 21, 0);
177 1.14 christos /* numeric zones not permitted with am/pm ... */
178 1.14 christos parsecheck("7 a.m. ICT", NULL, NULL, gmtime_r,
179 1.14 christos ANY, ANY, ANY, 7-7, 0, 0);
180 1.14 christos parsecheck("midnight", NULL, NULL, localtime_r,
181 1.14 christos ANY, ANY, ANY, 0, 0, 0);
182 1.14 christos parsecheck("mn", NULL, NULL, localtime_r,
183 1.14 christos ANY, ANY, ANY, 0, 0, 0);
184 1.14 christos parsecheck("noon", NULL, NULL, localtime_r,
185 1.14 christos ANY, ANY, ANY, 12, 0, 0);
186 1.26 kre
187 1.28 kre /*
188 1.28 kre * The following tests used to trigger the bug from PR lib/52101
189 1.28 kre * but that is fixed now.
190 1.28 kre *
191 1.26 kre atf_tc_expect_fail("PR lib/52101");
192 1.28 kre */
193 1.26 kre
194 1.26 kre parsecheck("12:30 am", NULL, NULL, localtime_r,
195 1.26 kre ANY, ANY, ANY, 0, 30, 0);
196 1.26 kre parsecheck("12:30 pm", NULL, NULL, localtime_r,
197 1.27 kre ANY, ANY, ANY, 12, 30, 0);
198 1.26 kre
199 1.26 kre /*
200 1.26 kre * Technically, these are invalid, noon and midnight
201 1.26 kre * are neither am, nor pm, but this is what people expect...
202 1.26 kre */
203 1.26 kre parsecheck("12:00:00 am", NULL, NULL, localtime_r,
204 1.26 kre ANY, ANY, ANY, 0, 0, 0);
205 1.26 kre parsecheck("12:00:00 pm", NULL, NULL, localtime_r,
206 1.26 kre ANY, ANY, ANY, 12, 0, 0);
207 1.26 kre parsecheck("12am", NULL, NULL, localtime_r,
208 1.26 kre ANY, ANY, ANY, 0, 0, 0);
209 1.26 kre parsecheck("12pm", NULL, NULL, localtime_r,
210 1.26 kre ANY, ANY, ANY, 12, 0, 0);
211 1.28 kre
212 1.30 kre /* end 52101 bug tests */
213 1.29 kre
214 1.29 kre parsecheck("12 noon", NULL, NULL, localtime_r,
215 1.29 kre ANY, ANY, ANY, 12, 0, 0);
216 1.29 kre parsecheck("12 midnight", NULL, NULL, localtime_r,
217 1.29 kre ANY, ANY, ANY, 0, 0, 0);
218 1.29 kre parsecheck("12 midday", NULL, NULL, localtime_r, /* unlikely! */
219 1.29 kre ANY, ANY, ANY, 12, 0, 0);
220 1.29 kre parsecheck("12 mn", NULL, NULL, localtime_r,
221 1.29 kre ANY, ANY, ANY, 0, 0, 0);
222 1.29 kre
223 1.29 kre parsecheck("12:00 noon", NULL, NULL, localtime_r,
224 1.29 kre ANY, ANY, ANY, 12, 0, 0);
225 1.29 kre parsecheck("12:00 midnight", NULL, NULL, localtime_r,
226 1.29 kre ANY, ANY, ANY, 0, 0, 0);
227 1.29 kre parsecheck("12:00:00 noon", NULL, NULL, localtime_r,
228 1.29 kre ANY, ANY, ANY, 12, 0, 0);
229 1.29 kre parsecheck("12:00:00 midnight", NULL, NULL, localtime_r,
230 1.29 kre ANY, ANY, ANY, 0, 0, 0);
231 1.1 njoly }
232 1.1 njoly
233 1.11 apb ATF_TC(dsttimes);
234 1.11 apb
235 1.11 apb ATF_TC_HEAD(dsttimes, tc)
236 1.11 apb {
237 1.11 apb atf_tc_set_md_var(tc, "descr", "Test DST transition times"
238 1.11 apb " (PR lib/47916)");
239 1.11 apb }
240 1.11 apb
241 1.11 apb ATF_TC_BODY(dsttimes, tc)
242 1.11 apb {
243 1.11 apb struct tm tm;
244 1.11 apb time_t t;
245 1.11 apb int tzoff;
246 1.11 apb
247 1.11 apb putenv(__UNCONST("TZ=EST"));
248 1.11 apb tzset();
249 1.11 apb parsecheck("12:0", NULL, NULL, localtime_r,
250 1.11 apb ANY, ANY, ANY, 12, 0, 0);
251 1.11 apb
252 1.14 christos putenv(__UNCONST("TZ=Asia/Tokyo"));
253 1.11 apb tzset();
254 1.11 apb parsecheck("12:0", NULL, NULL, localtime_r,
255 1.11 apb ANY, ANY, ANY, 12, 0, 0);
256 1.11 apb
257 1.11 apb /*
258 1.11 apb * When the effective local time is Tue Jul 9 13:21:53 BST 2013,
259 1.11 apb * check mktime("14:00")
260 1.11 apb */
261 1.11 apb putenv(__UNCONST("TZ=Europe/London"));
262 1.11 apb tzset();
263 1.11 apb tm = (struct tm){
264 1.11 apb .tm_year = 2013-1900, .tm_mon = 7-1, .tm_mday = 9,
265 1.11 apb .tm_hour = 13, .tm_min = 21, .tm_sec = 53,
266 1.11 apb .tm_isdst = 0 };
267 1.11 apb t = mktime(&tm);
268 1.11 apb ATF_CHECK(t != (time_t)-1);
269 1.11 apb parsecheck("14:00", &t, NULL, localtime_r,
270 1.11 apb 2013, 7, 9, 14, 0, 0);
271 1.13 apb tzoff = -60; /* British Summer Time */
272 1.11 apb parsecheck("14:00", &t, &tzoff, localtime_r,
273 1.11 apb 2013, 7, 9, 14, 0, 0);
274 1.11 apb }
275 1.11 apb
276 1.1 njoly ATF_TC(relative);
277 1.1 njoly
278 1.1 njoly ATF_TC_HEAD(relative, tc)
279 1.1 njoly {
280 1.4 christos atf_tc_set_md_var(tc, "descr", "Test relative items"
281 1.5 jruoho " (PR lib/44255)");
282 1.1 njoly }
283 1.1 njoly
284 1.1 njoly ATF_TC_BODY(relative, tc)
285 1.1 njoly {
286 1.14 christos struct tm tm;
287 1.14 christos time_t now;
288 1.14 christos
289 1.14 christos #define REL_CHECK(s, now, tm) do { \
290 1.14 christos time_t p, q; \
291 1.22 kre char nb[30], pb[30], qb[30]; \
292 1.19 dholland p = parsedate(s, &now, NULL); \
293 1.19 dholland q = mktime(&tm); \
294 1.19 dholland ATF_CHECK_EQ_MSG(p, q, \
295 1.22 kre "From %jd (%24.24s) using \"%s\", obtained %jd (%24.24s); expected %jd (%24.24s)", \
296 1.24 kre (uintmax_t)now, ctime_r(&now, nb), \
297 1.19 dholland s, (uintmax_t)p, ctime_r(&p, pb), (uintmax_t)q, \
298 1.14 christos ctime_r(&q, qb)); \
299 1.14 christos } while (/*CONSTCOND*/0)
300 1.1 njoly
301 1.22 kre #define isleap(yr) (((yr) & 3) == 0 && (((yr) % 100) != 0 || \
302 1.22 kre ((1900+(yr)) % 400) == 0))
303 1.22 kre
304 1.1 njoly ATF_CHECK(parsedate("-1 month", NULL, NULL) != -1);
305 1.1 njoly ATF_CHECK(parsedate("last friday", NULL, NULL) != -1);
306 1.1 njoly ATF_CHECK(parsedate("one week ago", NULL, NULL) != -1);
307 1.1 njoly ATF_CHECK(parsedate("this thursday", NULL, NULL) != -1);
308 1.1 njoly ATF_CHECK(parsedate("next sunday", NULL, NULL) != -1);
309 1.1 njoly ATF_CHECK(parsedate("+2 years", NULL, NULL) != -1);
310 1.14 christos
311 1.20 gson /*
312 1.20 gson * Test relative to a number of fixed dates. Avoid the
313 1.20 gson * edges of the time_t range to avert under- or overflow
314 1.20 gson * of the relative date, and use a prime step for maximum
315 1.20 gson * coverage of different times of day/week/month/year.
316 1.20 gson */
317 1.23 gson for (now = 0x00FFFFFF; now < 0xFF000000; now += 3777779) {
318 1.20 gson ATF_CHECK(localtime_r(&now, &tm) != NULL);
319 1.20 gson tm.tm_mday--;
320 1.20 gson /* "yesterday" leaves time untouched */
321 1.20 gson tm.tm_isdst = -1;
322 1.20 gson REL_CHECK("yesterday", now, tm);
323 1.20 gson
324 1.20 gson ATF_CHECK(localtime_r(&now, &tm) != NULL);
325 1.20 gson tm.tm_mday++;
326 1.20 gson /* as does "tomorrow" */
327 1.20 gson tm.tm_isdst = -1;
328 1.20 gson REL_CHECK("tomorrow", now, tm);
329 1.20 gson
330 1.20 gson ATF_CHECK(localtime_r(&now, &tm) != NULL);
331 1.20 gson if (tm.tm_wday > 4)
332 1.21 kre tm.tm_mday += 7;
333 1.21 kre tm.tm_mday += 4 - tm.tm_wday;
334 1.21 kre /* if a day name is mentioned, it means midnight (by default) */
335 1.21 kre tm.tm_sec = tm.tm_min = tm.tm_hour = 0;
336 1.21 kre tm.tm_isdst = -1;
337 1.21 kre REL_CHECK("this thursday", now, tm);
338 1.21 kre
339 1.21 kre ATF_CHECK(localtime_r(&now, &tm) != NULL);
340 1.21 kre tm.tm_mday += 14 - (tm.tm_wday ? tm.tm_wday : 7);
341 1.21 kre tm.tm_sec = tm.tm_min = tm.tm_hour = 0;
342 1.21 kre tm.tm_isdst = -1;
343 1.21 kre REL_CHECK("next sunday", now, tm);
344 1.21 kre
345 1.21 kre ATF_CHECK(localtime_r(&now, &tm) != NULL);
346 1.21 kre if (tm.tm_wday <= 5)
347 1.21 kre tm.tm_mday -= 7;
348 1.21 kre tm.tm_mday += 5 - tm.tm_wday;
349 1.21 kre tm.tm_sec = tm.tm_min = 0;
350 1.21 kre tm.tm_hour = 16;
351 1.21 kre tm.tm_isdst = -1;
352 1.21 kre REL_CHECK("last friday 4 p.m.", now, tm);
353 1.21 kre
354 1.21 kre ATF_CHECK(localtime_r(&now, &tm) != NULL);
355 1.21 kre tm.tm_mday += 14;
356 1.21 kre if (tm.tm_wday > 3)
357 1.21 kre tm.tm_mday += 7;
358 1.21 kre tm.tm_mday += 3 - tm.tm_wday;
359 1.21 kre tm.tm_sec = tm.tm_min = 0;
360 1.21 kre tm.tm_hour = 3;
361 1.21 kre tm.tm_isdst = -1;
362 1.21 kre REL_CHECK("we fortnight 3 a.m.", now, tm);
363 1.21 kre
364 1.21 kre ATF_CHECK(localtime_r(&now, &tm) != NULL);
365 1.21 kre tm.tm_min -= 5;
366 1.21 kre tm.tm_isdst = -1;
367 1.21 kre REL_CHECK("5 minutes ago", now, tm);
368 1.21 kre
369 1.21 kre ATF_CHECK(localtime_r(&now, &tm) != NULL);
370 1.21 kre tm.tm_hour++;
371 1.21 kre tm.tm_min += 37;
372 1.21 kre tm.tm_isdst = -1;
373 1.21 kre REL_CHECK("97 minutes", now, tm);
374 1.21 kre
375 1.21 kre ATF_CHECK(localtime_r(&now, &tm) != NULL);
376 1.21 kre tm.tm_mon++;
377 1.22 kre if (tm.tm_mon == 1 &&
378 1.22 kre tm.tm_mday > 28 + isleap(tm.tm_year))
379 1.22 kre tm.tm_mday = 28 + isleap(tm.tm_year);
380 1.22 kre else if ((tm.tm_mon == 3 || tm.tm_mon == 5 ||
381 1.22 kre tm.tm_mon == 8 || tm.tm_mon == 10) && tm.tm_mday == 31)
382 1.22 kre tm.tm_mday = 30;
383 1.21 kre tm.tm_isdst = -1;
384 1.21 kre REL_CHECK("month", now, tm);
385 1.21 kre
386 1.21 kre ATF_CHECK(localtime_r(&now, &tm) != NULL);
387 1.21 kre tm.tm_mon += 2; /* "next" means add 2 ... */
388 1.22 kre if (tm.tm_mon == 13 &&
389 1.22 kre tm.tm_mday > 28 + isleap(tm.tm_year + 1))
390 1.22 kre tm.tm_mday = 28 + isleap(tm.tm_year + 1);
391 1.22 kre else if (tm.tm_mon == 8 && tm.tm_mday == 31)
392 1.22 kre tm.tm_mday = 30;
393 1.21 kre tm.tm_isdst = -1;
394 1.21 kre REL_CHECK("next month", now, tm);
395 1.21 kre
396 1.21 kre ATF_CHECK(localtime_r(&now, &tm) != NULL);
397 1.21 kre tm.tm_mon--;
398 1.22 kre if (tm.tm_mon == 1 &&
399 1.22 kre tm.tm_mday > 28 + isleap(tm.tm_year))
400 1.22 kre tm.tm_mday = 28 + isleap(tm.tm_year);
401 1.22 kre else if ((tm.tm_mon == 3 || tm.tm_mon == 5 ||
402 1.22 kre tm.tm_mon == 8 || tm.tm_mon == 10) && tm.tm_mday == 31)
403 1.22 kre tm.tm_mday = 30;
404 1.21 kre tm.tm_isdst = -1;
405 1.21 kre REL_CHECK("last month", now, tm);
406 1.21 kre
407 1.21 kre ATF_CHECK(localtime_r(&now, &tm) != NULL);
408 1.21 kre tm.tm_mon += 6;
409 1.22 kre if (tm.tm_mon == 13 &&
410 1.22 kre tm.tm_mday > 28 + isleap(tm.tm_year + 1))
411 1.22 kre tm.tm_mday = 28 + isleap(tm.tm_year + 1);
412 1.22 kre else if ((tm.tm_mon == 15 || tm.tm_mon == 17 ||
413 1.22 kre tm.tm_mon == 8 || tm.tm_mon == 10) && tm.tm_mday == 31)
414 1.22 kre tm.tm_mday = 30;
415 1.21 kre tm.tm_mday += 2;
416 1.21 kre tm.tm_isdst = -1;
417 1.21 kre REL_CHECK("+6 months 2 days", now, tm);
418 1.21 kre
419 1.21 kre ATF_CHECK(localtime_r(&now, &tm) != NULL);
420 1.21 kre tm.tm_mon -= 9;
421 1.22 kre if (tm.tm_mon == 1 && tm.tm_mday > 28 + isleap(tm.tm_year))
422 1.24 kre tm.tm_mday = 28 + isleap(tm.tm_year);
423 1.22 kre else if ((tm.tm_mon == -9 || tm.tm_mon == -7 ||
424 1.22 kre tm.tm_mon == -2) && tm.tm_mday == 31)
425 1.22 kre tm.tm_mday = 30;
426 1.21 kre tm.tm_isdst = -1;
427 1.21 kre REL_CHECK("9 months ago", now, tm);
428 1.21 kre
429 1.21 kre ATF_CHECK(localtime_r(&now, &tm) != NULL);
430 1.21 kre if (tm.tm_wday <= 2)
431 1.21 kre tm.tm_mday -= 7;
432 1.21 kre tm.tm_mday += 2 - tm.tm_wday;
433 1.21 kre tm.tm_isdst = -1;
434 1.21 kre tm.tm_hour = tm.tm_min = tm.tm_sec = 0;
435 1.21 kre REL_CHECK("1 week ago Tu", now, tm);
436 1.21 kre
437 1.21 kre ATF_CHECK(localtime_r(&now, &tm) != NULL);
438 1.21 kre tm.tm_isdst = -1;
439 1.21 kre tm.tm_mday++;
440 1.21 kre tm.tm_hour = tm.tm_min = tm.tm_sec = 0;
441 1.21 kre REL_CHECK("midnight tomorrow", now, tm);
442 1.21 kre
443 1.21 kre ATF_CHECK(localtime_r(&now, &tm) != NULL);
444 1.21 kre tm.tm_isdst = -1;
445 1.21 kre tm.tm_mday++;
446 1.21 kre tm.tm_hour = tm.tm_min = tm.tm_sec = 0;
447 1.21 kre REL_CHECK("tomorrow midnight", now, tm);
448 1.21 kre
449 1.21 kre ATF_CHECK(localtime_r(&now, &tm) != NULL);
450 1.21 kre tm.tm_isdst = -1;
451 1.21 kre tm.tm_mday++;
452 1.21 kre tm.tm_hour = 12;
453 1.21 kre tm.tm_min = tm.tm_sec = 0;
454 1.21 kre REL_CHECK("noon tomorrow", now, tm);
455 1.21 kre
456 1.21 kre ATF_CHECK(localtime_r(&now, &tm) != NULL);
457 1.21 kre if (tm.tm_wday > 2)
458 1.21 kre tm.tm_mday += 7;
459 1.21 kre tm.tm_mday += 2 - tm.tm_wday;
460 1.21 kre tm.tm_sec = tm.tm_min = tm.tm_hour = 0;
461 1.21 kre tm.tm_isdst = -1;
462 1.21 kre REL_CHECK("midnight Tuesday", now, tm);
463 1.21 kre
464 1.21 kre ATF_CHECK(localtime_r(&now, &tm) != NULL);
465 1.21 kre if (tm.tm_wday > 2 + 1)
466 1.21 kre tm.tm_mday += 7;
467 1.21 kre tm.tm_mday += 2 - tm.tm_wday;
468 1.21 kre tm.tm_mday++; /* xxx midnight --> the next day */
469 1.21 kre tm.tm_sec = tm.tm_min = tm.tm_hour = 0;
470 1.21 kre tm.tm_isdst = -1;
471 1.21 kre REL_CHECK("Tuesday midnight", now, tm);
472 1.21 kre }
473 1.1 njoly }
474 1.1 njoly
475 1.6 apb ATF_TC(atsecs);
476 1.6 apb
477 1.6 apb ATF_TC_HEAD(atsecs, tc)
478 1.6 apb {
479 1.6 apb atf_tc_set_md_var(tc, "descr", "Test seconds past the epoch");
480 1.6 apb }
481 1.6 apb
482 1.6 apb ATF_TC_BODY(atsecs, tc)
483 1.6 apb {
484 1.6 apb int tzoff;
485 1.6 apb
486 1.6 apb /* "@0" -> (time_t)0, regardless of timezone */
487 1.6 apb ATF_CHECK(parsedate("@0", NULL, NULL) == (time_t)0);
488 1.6 apb putenv(__UNCONST("TZ=Europe/Berlin"));
489 1.6 apb tzset();
490 1.6 apb ATF_CHECK(parsedate("@0", NULL, NULL) == (time_t)0);
491 1.6 apb putenv(__UNCONST("TZ=America/New_York"));
492 1.6 apb tzset();
493 1.6 apb ATF_CHECK(parsedate("@0", NULL, NULL) == (time_t)0);
494 1.6 apb tzoff = 0;
495 1.6 apb ATF_CHECK(parsedate("@0", NULL, &tzoff) == (time_t)0);
496 1.6 apb tzoff = 3600;
497 1.6 apb ATF_CHECK(parsedate("@0", NULL, &tzoff) == (time_t)0);
498 1.6 apb tzoff = -3600;
499 1.6 apb ATF_CHECK(parsedate("@0", NULL, &tzoff) == (time_t)0);
500 1.6 apb
501 1.7 apb /* -1 or other negative numbers are not errors */
502 1.6 apb errno = 0;
503 1.6 apb ATF_CHECK(parsedate("@-1", NULL, &tzoff) == (time_t)-1 && errno == 0);
504 1.7 apb ATF_CHECK(parsedate("@-2", NULL, &tzoff) == (time_t)-2 && errno == 0);
505 1.7 apb
506 1.7 apb /* junk is an error */
507 1.7 apb errno = 0;
508 1.7 apb ATF_CHECK(parsedate("@junk", NULL, NULL) == (time_t)-1 && errno != 0);
509 1.6 apb }
510 1.6 apb
511 1.14 christos ATF_TC(zones);
512 1.14 christos
513 1.14 christos ATF_TC_HEAD(zones, tc)
514 1.14 christos {
515 1.14 christos atf_tc_set_md_var(tc, "descr", "Test parsing dates with zones");
516 1.14 christos }
517 1.14 christos
518 1.14 christos ATF_TC_BODY(zones, tc)
519 1.14 christos {
520 1.14 christos parsecheck("2015-12-06 16:11:48 UTC", NULL, NULL, gmtime_r,
521 1.14 christos 2015, 12, 6, 16, 11, 48);
522 1.14 christos parsecheck("2015-12-06 16:11:48 UT", NULL, NULL, gmtime_r,
523 1.14 christos 2015, 12, 6, 16, 11, 48);
524 1.14 christos parsecheck("2015-12-06 16:11:48 GMT", NULL, NULL, gmtime_r,
525 1.14 christos 2015, 12, 6, 16, 11, 48);
526 1.14 christos parsecheck("2015-12-06 16:11:48 +0000", NULL, NULL, gmtime_r,
527 1.14 christos 2015, 12, 6, 16, 11, 48);
528 1.14 christos
529 1.14 christos parsecheck("2015-12-06 16:11:48 -0500", NULL, NULL, gmtime_r,
530 1.14 christos 2015, 12, 6, 21, 11, 48);
531 1.14 christos parsecheck("2015-12-06 16:11:48 EST", NULL, NULL, gmtime_r,
532 1.14 christos 2015, 12, 6, 21, 11, 48);
533 1.14 christos parsecheck("2015-12-06 16:11:48 EDT", NULL, NULL, gmtime_r,
534 1.14 christos 2015, 12, 6, 20, 11, 48);
535 1.14 christos parsecheck("2015-12-06 16:11:48 +0500", NULL, NULL, gmtime_r,
536 1.14 christos 2015, 12, 6, 11, 11, 48);
537 1.14 christos
538 1.14 christos parsecheck("2015-12-06 16:11:48 +1000", NULL, NULL, gmtime_r,
539 1.14 christos 2015, 12, 6, 6, 11, 48);
540 1.14 christos parsecheck("2015-12-06 16:11:48 AEST", NULL, NULL, gmtime_r,
541 1.14 christos 2015, 12, 6, 6, 11, 48);
542 1.14 christos parsecheck("2015-12-06 16:11:48 -1000", NULL, NULL, gmtime_r,
543 1.14 christos 2015, 12, 7, 2, 11, 48);
544 1.14 christos parsecheck("2015-12-06 16:11:48 HST", NULL, NULL, gmtime_r,
545 1.14 christos 2015, 12, 7, 2, 11, 48);
546 1.14 christos
547 1.14 christos parsecheck("2015-12-06 16:11:48 AWST", NULL, NULL, gmtime_r,
548 1.14 christos 2015, 12, 6, 8, 11, 48);
549 1.14 christos parsecheck("2015-12-06 16:11:48 NZDT", NULL, NULL, gmtime_r,
550 1.14 christos 2015, 12, 6, 3, 11, 48);
551 1.14 christos
552 1.14 christos parsecheck("Sun, 6 Dec 2015 09:43:16 -0500", NULL, NULL, gmtime_r,
553 1.14 christos 2015, 12, 6, 14, 43, 16);
554 1.14 christos parsecheck("Mon Dec 7 03:13:31 ICT 2015", NULL, NULL, gmtime_r,
555 1.14 christos 2015, 12, 6, 20, 13, 31);
556 1.14 christos /* the day name is ignored when a day of month (etc) is given... */
557 1.14 christos parsecheck("Sat Dec 7 03:13:31 ICT 2015", NULL, NULL, gmtime_r,
558 1.14 christos 2015, 12, 6, 20, 13, 31);
559 1.14 christos
560 1.14 christos
561 1.14 christos parsecheck("2015-12-06 12:00:00 IDLW", NULL, NULL, gmtime_r,
562 1.14 christos 2015, 12, 7, 0, 0, 0);
563 1.14 christos parsecheck("2015-12-06 12:00:00 IDLE", NULL, NULL, gmtime_r,
564 1.14 christos 2015, 12, 6, 0, 0, 0);
565 1.14 christos
566 1.14 christos parsecheck("2015-12-06 21:17:33 NFT", NULL, NULL, gmtime_r,
567 1.14 christos 2015, 12, 7, 0, 47, 33);
568 1.14 christos parsecheck("2015-12-06 21:17:33 ACST", NULL, NULL, gmtime_r,
569 1.14 christos 2015, 12, 6, 11, 47, 33);
570 1.14 christos parsecheck("2015-12-06 21:17:33 +0717", NULL, NULL, gmtime_r,
571 1.14 christos 2015, 12, 6, 14, 0, 33);
572 1.14 christos
573 1.14 christos parsecheck("2015-12-06 21:21:21 Z", NULL, NULL, gmtime_r,
574 1.14 christos 2015, 12, 6, 21, 21, 21);
575 1.14 christos parsecheck("2015-12-06 21:21:21 A", NULL, NULL, gmtime_r,
576 1.14 christos 2015, 12, 6, 22, 21, 21);
577 1.14 christos parsecheck("2015-12-06 21:21:21 G", NULL, NULL, gmtime_r,
578 1.14 christos 2015, 12, 7, 4, 21, 21);
579 1.14 christos parsecheck("2015-12-06 21:21:21 M", NULL, NULL, gmtime_r,
580 1.14 christos 2015, 12, 7, 9, 21, 21);
581 1.14 christos parsecheck("2015-12-06 21:21:21 N", NULL, NULL, gmtime_r,
582 1.14 christos 2015, 12, 6, 20, 21, 21);
583 1.14 christos parsecheck("2015-12-06 21:21:21 T", NULL, NULL, gmtime_r,
584 1.14 christos 2015, 12, 6, 14, 21, 21);
585 1.14 christos parsecheck("2015-12-06 21:21:21 Y", NULL, NULL, gmtime_r,
586 1.14 christos 2015, 12, 6, 9, 21, 21);
587 1.14 christos
588 1.14 christos }
589 1.14 christos
590 1.14 christos ATF_TC(gibberish);
591 1.14 christos
592 1.14 christos ATF_TC_HEAD(gibberish, tc)
593 1.14 christos {
594 1.14 christos atf_tc_set_md_var(tc, "descr", "Test (not) parsing nonsense");
595 1.14 christos }
596 1.14 christos
597 1.14 christos ATF_TC_BODY(gibberish, tc)
598 1.14 christos {
599 1.14 christos errno = 0;
600 1.14 christos ATF_CHECK(parsedate("invalid nonsense", NULL, NULL) == (time_t)-1
601 1.14 christos && errno != 0);
602 1.14 christos errno = 0;
603 1.14 christos ATF_CHECK(parsedate("12th day of Christmas", NULL, NULL) == (time_t)-1
604 1.14 christos && errno != 0);
605 1.14 christos errno = 0;
606 1.14 christos ATF_CHECK(parsedate("2015-31-07 15:00", NULL, NULL) == (time_t)-1
607 1.14 christos && errno != 0);
608 1.14 christos errno = 0;
609 1.14 christos ATF_CHECK(parsedate("2015-02-29 10:01", NULL, NULL) == (time_t)-1
610 1.14 christos && errno != 0);
611 1.14 christos errno = 0;
612 1.14 christos ATF_CHECK(parsedate("2015-12-06 24:01", NULL, NULL) == (time_t)-1
613 1.14 christos && errno != 0);
614 1.14 christos errno = 0;
615 1.14 christos ATF_CHECK(parsedate("2015-12-06 14:61", NULL, NULL) == (time_t)-1
616 1.14 christos && errno != 0);
617 1.14 christos }
618 1.14 christos
619 1.1 njoly ATF_TP_ADD_TCS(tp)
620 1.1 njoly {
621 1.1 njoly ATF_TP_ADD_TC(tp, dates);
622 1.1 njoly ATF_TP_ADD_TC(tp, times);
623 1.11 apb ATF_TP_ADD_TC(tp, dsttimes);
624 1.1 njoly ATF_TP_ADD_TC(tp, relative);
625 1.6 apb ATF_TP_ADD_TC(tp, atsecs);
626 1.14 christos ATF_TP_ADD_TC(tp, zones);
627 1.14 christos ATF_TP_ADD_TC(tp, gibberish);
628 1.1 njoly
629 1.1 njoly return atf_no_error();
630 1.1 njoly }
631 1.14 christos
632