xref: /netbsd-src/tests/lib/libutil/t_parsedate.c (revision 23ae5a70c44f469a4fba33f52ac50c26a1aade23)
1*23ae5a70Schristos /* $NetBSD: t_parsedate.c,v 1.33 2022/05/02 19:57:50 christos Exp $ */
2198de556Snjoly /*-
3432cd4b9Schristos  * Copyright (c) 2010, 2015 The NetBSD Foundation, Inc.
4198de556Snjoly  * All rights reserved.
5198de556Snjoly  *
6198de556Snjoly  * Redistribution and use in source and binary forms, with or without
7198de556Snjoly  * modification, are permitted provided that the following conditions
8198de556Snjoly  * are met:
9198de556Snjoly  *
10198de556Snjoly  * 1. Redistributions of source code must retain the above copyright
11198de556Snjoly  *    notice, this list of conditions and the following disclaimer.
12198de556Snjoly  * 2. Redistributions in binary form must reproduce the above copyright
13198de556Snjoly  *    notice, this list of conditions and the following disclaimer in
14198de556Snjoly  *    the documentation and/or other materials provided with the
15198de556Snjoly  *    distribution.
16198de556Snjoly  *
17198de556Snjoly  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
18198de556Snjoly  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
19198de556Snjoly  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
20198de556Snjoly  * FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE
21198de556Snjoly  * COPYRIGHT HOLDERS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
22198de556Snjoly  * INCIDENTAL, SPECIAL, EXEMPLARY OR CONSEQUENTIAL DAMAGES (INCLUDING,
23198de556Snjoly  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
24198de556Snjoly  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
25198de556Snjoly  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
26198de556Snjoly  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
27198de556Snjoly  * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
28198de556Snjoly  * SUCH DAMAGE.
29198de556Snjoly  */
30198de556Snjoly 
31198de556Snjoly #include <sys/cdefs.h>
32*23ae5a70Schristos __RCSID("$NetBSD: t_parsedate.c,v 1.33 2022/05/02 19:57:50 christos Exp $");
33198de556Snjoly 
34198de556Snjoly #include <atf-c.h>
3558e1304bSapb #include <errno.h>
365b0c6304Sapb #include <stdio.h>
3758e1304bSapb #include <stdlib.h>
3858e1304bSapb #include <time.h>
39198de556Snjoly #include <util.h>
40198de556Snjoly 
41fc447ec4Sapb /*
42fc447ec4Sapb  * ANY is used as a placeholder for values that do not need to be
43fc447ec4Sapb  * checked.  The actual value is arbitrary.  We don't use -1
44fc447ec4Sapb  * because some tests might want to use -1 as a literal value.
45fc447ec4Sapb  */
46fc447ec4Sapb #define ANY -30215
47fc447ec4Sapb 
48fc447ec4Sapb /* parsecheck --
49fc447ec4Sapb  * call parsedate(), then call time_to_tm() on the result,
50fc447ec4Sapb  * and check that year/month/day/hour/minute/second are as expected.
51fc447ec4Sapb  *
52fc447ec4Sapb  * time_to_tm should usually be localtime_r or gmtime_r.
53fc447ec4Sapb  *
54fc447ec4Sapb  * Don't check values specified as ANY.
55fc447ec4Sapb  */
56fc447ec4Sapb static void
parsecheck(const char * datestr,const time_t * reftime,const int * zoff,struct tm * time_to_tm (const time_t *,struct tm *),int year,int month,int day,int hour,int minute,int second)57fc447ec4Sapb parsecheck(const char *datestr, const time_t *reftime, const int *zoff,
58fc447ec4Sapb 	struct tm * time_to_tm(const time_t *, struct tm *),
59fc447ec4Sapb 	int year, int month, int day, int hour, int minute, int second)
60fc447ec4Sapb {
61fc447ec4Sapb 	time_t t;
62fc447ec4Sapb 	struct tm tm;
635b0c6304Sapb 	char argstr[128];
645b0c6304Sapb 
655b0c6304Sapb 	/*
665b0c6304Sapb 	 * printable version of the args.
675b0c6304Sapb 	 *
685b0c6304Sapb 	 * Note that printf("%.*d", 0, 0)) prints nothing at all,
695b0c6304Sapb 	 * while printf("%.*d", 1, val) prints the value as usual.
705b0c6304Sapb 	 */
715b0c6304Sapb 	snprintf(argstr, sizeof(argstr), "%s%s%s, %s%.*jd, %s%.*d",
725b0c6304Sapb 		/* NULL or \"<datestr>\" */
735b0c6304Sapb 		(datestr ? "\"" : ""),
745b0c6304Sapb 		(datestr ? datestr : "NULL"),
755b0c6304Sapb 		(datestr ? "\"" : ""),
765b0c6304Sapb 		/* NULL or *reftime */
775b0c6304Sapb 		(reftime ? "" : "NULL"),
785b0c6304Sapb 		(reftime ? 1 : 0),
795b0c6304Sapb 		(reftime ? (intmax_t)*reftime : (intmax_t)0),
805b0c6304Sapb 		/* NULL or *zoff */
815b0c6304Sapb 		(zoff ? "" : "NULL"),
825b0c6304Sapb 		(zoff ? 1 : 0),
835b0c6304Sapb 		(zoff ? *zoff : 0));
84fc447ec4Sapb 
85fc447ec4Sapb 	ATF_CHECK_MSG((t = parsedate(datestr, reftime, zoff)) != -1,
865b0c6304Sapb 	    "parsedate(%s) returned -1\n", argstr);
870c8a4b80Skre 	if (t == -1)
880c8a4b80Skre 		return;
890c8a4b80Skre 
90fc447ec4Sapb 	ATF_CHECK(time_to_tm(&t, &tm) != NULL);
91fc447ec4Sapb 	if (year != ANY)
92fc447ec4Sapb 		ATF_CHECK_MSG(tm.tm_year + 1900 == year,
935b0c6304Sapb 		    "parsedate(%s) expected year %d got %d (+1900)\n",
945b0c6304Sapb 		    argstr, year, (int)tm.tm_year);
95fc447ec4Sapb 	if (month != ANY)
96fc447ec4Sapb 		ATF_CHECK_MSG(tm.tm_mon + 1 == month,
975b0c6304Sapb 		    "parsedate(%s) expected month %d got %d (+1)\n",
985b0c6304Sapb 		    argstr, month, (int)tm.tm_mon);
99fc447ec4Sapb 	if (day != ANY)
100fc447ec4Sapb 		ATF_CHECK_MSG(tm.tm_mday == day,
1015b0c6304Sapb 		    "parsedate(%s) expected day %d got %d\n",
1025b0c6304Sapb 		    argstr, day, (int)tm.tm_mday);
103fc447ec4Sapb 	if (hour != ANY)
104fc447ec4Sapb 		ATF_CHECK_MSG(tm.tm_hour == hour,
1055b0c6304Sapb 		    "parsedate(%s) expected hour %d got %d\n",
1065b0c6304Sapb 		    argstr, hour, (int)tm.tm_hour);
107fc447ec4Sapb 	if (minute != ANY)
108fc447ec4Sapb 		ATF_CHECK_MSG(tm.tm_min == minute,
1095b0c6304Sapb 		    "parsedate(%s) expected minute %d got %d\n",
1105b0c6304Sapb 		    argstr, minute, (int)tm.tm_min);
111fc447ec4Sapb 	if (second != ANY)
112fc447ec4Sapb 		ATF_CHECK_MSG(tm.tm_sec == second,
1135b0c6304Sapb 		    "parsedate(%s) expected second %d got %d\n",
1145b0c6304Sapb 		    argstr, second, (int)tm.tm_sec);
115fc447ec4Sapb }
116fc447ec4Sapb 
117198de556Snjoly ATF_TC(dates);
118198de556Snjoly 
ATF_TC_HEAD(dates,tc)119198de556Snjoly ATF_TC_HEAD(dates, tc)
120198de556Snjoly {
1215d71dc0bSchristos 	atf_tc_set_md_var(tc, "descr", "Test unambiguous dates"
12272ed5c06Sjruoho 	    " (PR lib/44255)");
123198de556Snjoly }
124198de556Snjoly 
ATF_TC_BODY(dates,tc)125198de556Snjoly ATF_TC_BODY(dates, tc)
126198de556Snjoly {
127198de556Snjoly 
128e12ce6c4Skre 	parsecheck("9/10/68", NULL, NULL, localtime_r,
129e12ce6c4Skre 		2068, 9, 10, 0, 0, 0); /* year < 69: add 2000 */
130cad61677Sapb 	parsecheck("9/10/69", NULL, NULL, localtime_r,
131e12ce6c4Skre 		1969, 9, 10, 0, 0, 0); /* 69 <= year < 100: add 1900 */
132e12ce6c4Skre 	parsecheck("68-09-10", NULL, NULL, localtime_r,
133e12ce6c4Skre 		68, 9, 10, 0, 0, 0); /* ISO8601 year remains unchanged */
134cad61677Sapb 	parsecheck("70-09-10", NULL, NULL, localtime_r,
135cad61677Sapb 		70, 9, 10, 0, 0, 0); /* ISO8601 year remains unchanged */
136fc447ec4Sapb 	parsecheck("2006-11-17", NULL, NULL, localtime_r,
137fc447ec4Sapb 		2006, 11, 17, 0, 0, 0);
138fc447ec4Sapb 	parsecheck("10/1/2000", NULL, NULL, localtime_r,
139cf077958Sapb 		2000, 10, 1, 0, 0, 0); /* month/day/year */
1407b280d16Schristos 	parsecheck("12/01/2022", NULL, NULL, localtime_r,
1417b280d16Schristos 		2022, 12, 1, 0, 0, 0); /* month/day/year, December */
142fc447ec4Sapb 	parsecheck("20 Jun 1994", NULL, NULL, localtime_r,
143fc447ec4Sapb 		1994, 6, 20, 0, 0, 0);
144432cd4b9Schristos 	parsecheck("97 September 2", NULL, NULL, localtime_r,
145432cd4b9Schristos 		1997, 9, 2, 0, 0, 0);
146fc447ec4Sapb 	parsecheck("23jun2001", NULL, NULL, localtime_r,
147fc447ec4Sapb 		2001, 6, 23, 0, 0, 0);
148fc447ec4Sapb 	parsecheck("1-sep-06", NULL, NULL, localtime_r,
149fc447ec4Sapb 		2006, 9, 1, 0, 0, 0);
150fc447ec4Sapb 	parsecheck("1/11", NULL, NULL, localtime_r,
151cf077958Sapb 		ANY, 1, 11, 0, 0, 0); /* month/day */
152fc447ec4Sapb 	parsecheck("1500-01-02", NULL, NULL, localtime_r,
153fc447ec4Sapb 		1500, 1, 2, 0, 0, 0);
154fc447ec4Sapb 	parsecheck("9999-12-21", NULL, NULL, localtime_r,
155fc447ec4Sapb 		9999, 12, 21, 0, 0, 0);
156432cd4b9Schristos 	parsecheck("2015.12.07.08.07.35", NULL, NULL, localtime_r,
157432cd4b9Schristos 		2015, 12, 7, 8, 7, 35);
158198de556Snjoly }
159198de556Snjoly 
160198de556Snjoly ATF_TC(times);
161198de556Snjoly 
ATF_TC_HEAD(times,tc)162198de556Snjoly ATF_TC_HEAD(times, tc)
163198de556Snjoly {
1645d71dc0bSchristos 	atf_tc_set_md_var(tc, "descr", "Test times"
16572ed5c06Sjruoho 	    " (PR lib/44255)");
166198de556Snjoly }
167198de556Snjoly 
ATF_TC_BODY(times,tc)168198de556Snjoly ATF_TC_BODY(times, tc)
169198de556Snjoly {
170198de556Snjoly 
171fc447ec4Sapb 	parsecheck("10:01", NULL, NULL, localtime_r,
172fc447ec4Sapb 		ANY, ANY, ANY, 10, 1, 0);
173fc447ec4Sapb 	parsecheck("10:12pm", NULL, NULL, localtime_r,
174fc447ec4Sapb 		ANY, ANY, ANY, 22, 12, 0);
175fc447ec4Sapb 	parsecheck("12:11:01.000012", NULL, NULL, localtime_r,
176fc447ec4Sapb 		ANY, ANY, ANY, 12, 11, 1);
177fc447ec4Sapb 	parsecheck("12:21-0500", NULL, NULL, gmtime_r,
178fc447ec4Sapb 		ANY, ANY, ANY, 12+5, 21, 0);
179432cd4b9Schristos 	/* numeric zones not permitted with am/pm ... */
180432cd4b9Schristos 	parsecheck("7 a.m. ICT", NULL, NULL, gmtime_r,
181432cd4b9Schristos 		ANY, ANY, ANY, 7-7, 0, 0);
182432cd4b9Schristos 	parsecheck("midnight", NULL, NULL, localtime_r,
183432cd4b9Schristos 		ANY, ANY, ANY, 0, 0, 0);
184432cd4b9Schristos 	parsecheck("mn", NULL, NULL, localtime_r,
185432cd4b9Schristos 		ANY, ANY, ANY, 0, 0, 0);
186432cd4b9Schristos 	parsecheck("noon", NULL, NULL, localtime_r,
187432cd4b9Schristos 		ANY, ANY, ANY, 12, 0, 0);
1880c8a4b80Skre 
189f8f91559Skre 	/*
190f8f91559Skre 	 * The following tests used to trigger the bug from PR lib/52101
191f8f91559Skre 	 * but that is fixed now.
192f8f91559Skre 	 *
1930c8a4b80Skre 	atf_tc_expect_fail("PR lib/52101");
194f8f91559Skre 	 */
1950c8a4b80Skre 
1960c8a4b80Skre 	parsecheck("12:30 am", NULL, NULL, localtime_r,
1970c8a4b80Skre 		ANY, ANY, ANY, 0, 30, 0);
1980c8a4b80Skre 	parsecheck("12:30 pm", NULL, NULL, localtime_r,
19910db8f18Skre 		ANY, ANY, ANY, 12, 30, 0);
2000c8a4b80Skre 
2010c8a4b80Skre 	/*
2020c8a4b80Skre 	 * Technically, these are invalid, noon and midnight
2030c8a4b80Skre 	 * are neither am, nor pm, but this is what people expect...
2040c8a4b80Skre 	 */
2050c8a4b80Skre 	parsecheck("12:00:00 am", NULL, NULL, localtime_r,
2060c8a4b80Skre 		ANY, ANY, ANY, 0, 0, 0);
2070c8a4b80Skre 	parsecheck("12:00:00 pm", NULL, NULL, localtime_r,
2080c8a4b80Skre 		ANY, ANY, ANY, 12, 0, 0);
2090c8a4b80Skre 	parsecheck("12am", NULL, NULL, localtime_r,
2100c8a4b80Skre 		ANY, ANY, ANY, 0, 0, 0);
2110c8a4b80Skre 	parsecheck("12pm", NULL, NULL, localtime_r,
2120c8a4b80Skre 		ANY, ANY, ANY, 12, 0, 0);
213f8f91559Skre 
214992d3e66Skre 	/* end 52101 bug tests */
21508844cd9Skre 
21608844cd9Skre 	parsecheck("12 noon", NULL, NULL, localtime_r,
21708844cd9Skre 		ANY, ANY, ANY, 12, 0, 0);
21808844cd9Skre 	parsecheck("12 midnight", NULL, NULL, localtime_r,
21908844cd9Skre 		ANY, ANY, ANY, 0, 0, 0);
22008844cd9Skre 	parsecheck("12 midday", NULL, NULL, localtime_r,	/* unlikely! */
22108844cd9Skre 		ANY, ANY, ANY, 12, 0, 0);
22208844cd9Skre 	parsecheck("12 mn", NULL, NULL, localtime_r,
22308844cd9Skre 		ANY, ANY, ANY, 0, 0, 0);
22408844cd9Skre 
22508844cd9Skre 	parsecheck("12:00 noon", NULL, NULL, localtime_r,
22608844cd9Skre 		ANY, ANY, ANY, 12, 0, 0);
22708844cd9Skre 	parsecheck("12:00 midnight", NULL, NULL, localtime_r,
22808844cd9Skre 		ANY, ANY, ANY, 0, 0, 0);
22908844cd9Skre 	parsecheck("12:00:00 noon", NULL, NULL, localtime_r,
23008844cd9Skre 		ANY, ANY, ANY, 12, 0, 0);
23108844cd9Skre 	parsecheck("12:00:00 midnight", NULL, NULL, localtime_r,
23208844cd9Skre 		ANY, ANY, ANY, 0, 0, 0);
233198de556Snjoly }
234198de556Snjoly 
2354e061687Sapb ATF_TC(dsttimes);
2364e061687Sapb 
ATF_TC_HEAD(dsttimes,tc)2374e061687Sapb ATF_TC_HEAD(dsttimes, tc)
2384e061687Sapb {
2394e061687Sapb 	atf_tc_set_md_var(tc, "descr", "Test DST transition times"
2404e061687Sapb 	    " (PR lib/47916)");
2414e061687Sapb }
2424e061687Sapb 
ATF_TC_BODY(dsttimes,tc)2434e061687Sapb ATF_TC_BODY(dsttimes, tc)
2444e061687Sapb {
2454e061687Sapb 	struct tm tm;
2464e061687Sapb 	time_t t;
2474e061687Sapb 	int tzoff;
2484e061687Sapb 
2494e061687Sapb 	putenv(__UNCONST("TZ=EST"));
2504e061687Sapb 	tzset();
2514e061687Sapb 	parsecheck("12:0", NULL, NULL, localtime_r,
2524e061687Sapb 		ANY, ANY, ANY, 12, 0, 0);
2534e061687Sapb 
254432cd4b9Schristos 	putenv(__UNCONST("TZ=Asia/Tokyo"));
2554e061687Sapb 	tzset();
2564e061687Sapb 	parsecheck("12:0", NULL, NULL, localtime_r,
2574e061687Sapb 		ANY, ANY, ANY, 12, 0, 0);
2584e061687Sapb 
2594e061687Sapb 	/*
2604e061687Sapb 	 * When the effective local time is Tue Jul  9 13:21:53 BST 2013,
2614e061687Sapb 	 * check mktime("14:00")
2624e061687Sapb 	 */
2634e061687Sapb 	putenv(__UNCONST("TZ=Europe/London"));
2644e061687Sapb 	tzset();
2654e061687Sapb 	tm = (struct tm){
2664e061687Sapb 		.tm_year = 2013-1900, .tm_mon = 7-1, .tm_mday = 9,
2674e061687Sapb 		.tm_hour = 13, .tm_min = 21, .tm_sec = 53,
2684e061687Sapb 		.tm_isdst = 0 };
2694e061687Sapb 	t = mktime(&tm);
2704e061687Sapb 	ATF_CHECK(t != (time_t)-1);
2714e061687Sapb 	parsecheck("14:00", &t, NULL, localtime_r,
2724e061687Sapb 		2013, 7, 9, 14, 0, 0);
27342066887Sapb 	tzoff = -60; /* British Summer Time */
2744e061687Sapb 	parsecheck("14:00", &t, &tzoff, localtime_r,
2754e061687Sapb 		2013, 7, 9, 14, 0, 0);
2764e061687Sapb }
2774e061687Sapb 
278198de556Snjoly ATF_TC(relative);
279198de556Snjoly 
ATF_TC_HEAD(relative,tc)280198de556Snjoly ATF_TC_HEAD(relative, tc)
281198de556Snjoly {
2825d71dc0bSchristos 	atf_tc_set_md_var(tc, "descr", "Test relative items"
28372ed5c06Sjruoho 	    " (PR lib/44255)");
284198de556Snjoly }
285198de556Snjoly 
ATF_TC_BODY(relative,tc)286198de556Snjoly ATF_TC_BODY(relative, tc)
287198de556Snjoly {
288432cd4b9Schristos 	struct tm tm;
289432cd4b9Schristos 	time_t now;
290432cd4b9Schristos 
291432cd4b9Schristos #define REL_CHECK(s, now, tm) do {					\
292432cd4b9Schristos 	time_t p, q;							\
293e4edd6e6Skre 	char nb[30], pb[30], qb[30];					\
294bb7bd590Sdholland 	p = parsedate(s, &now, NULL);					\
295bb7bd590Sdholland 	q = mktime(&tm);						\
296bb7bd590Sdholland 	ATF_CHECK_EQ_MSG(p, q,						\
297e4edd6e6Skre 	    "From %jd (%24.24s) using \"%s\", obtained %jd (%24.24s); expected %jd (%24.24s)", \
29825d58d24Skre 	    (uintmax_t)now, ctime_r(&now, nb),				\
299bb7bd590Sdholland 	    s, (uintmax_t)p, ctime_r(&p, pb), (uintmax_t)q, 		\
300432cd4b9Schristos 	    ctime_r(&q, qb));						\
301432cd4b9Schristos     } while (/*CONSTCOND*/0)
302198de556Snjoly 
303e4edd6e6Skre #define isleap(yr) (((yr) & 3) == 0 && (((yr) % 100) != 0 ||		\
304e4edd6e6Skre 			((1900+(yr)) % 400) == 0))
305e4edd6e6Skre 
306198de556Snjoly 	ATF_CHECK(parsedate("-1 month", NULL, NULL) != -1);
307198de556Snjoly 	ATF_CHECK(parsedate("last friday", NULL, NULL) != -1);
308198de556Snjoly 	ATF_CHECK(parsedate("one week ago", NULL, NULL) != -1);
309198de556Snjoly 	ATF_CHECK(parsedate("this thursday", NULL, NULL) != -1);
310198de556Snjoly 	ATF_CHECK(parsedate("next sunday", NULL, NULL) != -1);
311198de556Snjoly 	ATF_CHECK(parsedate("+2 years", NULL, NULL) != -1);
312432cd4b9Schristos 
31373fec7e5Sgson 	/*
31473fec7e5Sgson 	 * Test relative to a number of fixed dates.  Avoid the
31573fec7e5Sgson 	 * edges of the time_t range to avert under- or overflow
31673fec7e5Sgson 	 * of the relative date, and use a prime step for maximum
31773fec7e5Sgson 	 * coverage of different times of day/week/month/year.
31873fec7e5Sgson 	 */
31985c4af6bSgson 	for (now = 0x00FFFFFF; now < 0xFF000000; now += 3777779) {
320432cd4b9Schristos 		ATF_CHECK(localtime_r(&now, &tm) != NULL);
321432cd4b9Schristos 		tm.tm_mday--;
322432cd4b9Schristos 		/* "yesterday" leaves time untouched */
323432cd4b9Schristos 		tm.tm_isdst = -1;
324432cd4b9Schristos 		REL_CHECK("yesterday", now, tm);
325432cd4b9Schristos 
326432cd4b9Schristos 		ATF_CHECK(localtime_r(&now, &tm) != NULL);
327432cd4b9Schristos 		tm.tm_mday++;
328432cd4b9Schristos 		/* as does "tomorrow" */
329432cd4b9Schristos 		tm.tm_isdst = -1;
330432cd4b9Schristos 		REL_CHECK("tomorrow", now, tm);
331432cd4b9Schristos 
332432cd4b9Schristos 		ATF_CHECK(localtime_r(&now, &tm) != NULL);
333432cd4b9Schristos 		if (tm.tm_wday > 4)
334432cd4b9Schristos 			tm.tm_mday += 7;
335432cd4b9Schristos 		tm.tm_mday += 4 - tm.tm_wday;
336432cd4b9Schristos 		/* if a day name is mentioned, it means midnight (by default) */
337432cd4b9Schristos 		tm.tm_sec = tm.tm_min = tm.tm_hour = 0;
338432cd4b9Schristos 		tm.tm_isdst = -1;
339432cd4b9Schristos 		REL_CHECK("this thursday", now, tm);
340432cd4b9Schristos 
341432cd4b9Schristos 		ATF_CHECK(localtime_r(&now, &tm) != NULL);
3426970e57cSdholland 		tm.tm_mday += 14 - (tm.tm_wday ? tm.tm_wday : 7);
343432cd4b9Schristos 		tm.tm_sec = tm.tm_min = tm.tm_hour = 0;
344432cd4b9Schristos 		tm.tm_isdst = -1;
345432cd4b9Schristos 		REL_CHECK("next sunday", now, tm);
346432cd4b9Schristos 
347432cd4b9Schristos 		ATF_CHECK(localtime_r(&now, &tm) != NULL);
348432cd4b9Schristos 		if (tm.tm_wday <= 5)
349432cd4b9Schristos 			tm.tm_mday -= 7;
350432cd4b9Schristos 		tm.tm_mday += 5 - tm.tm_wday;
351432cd4b9Schristos 		tm.tm_sec = tm.tm_min = 0;
352432cd4b9Schristos 		tm.tm_hour = 16;
353432cd4b9Schristos 		tm.tm_isdst = -1;
354432cd4b9Schristos 		REL_CHECK("last friday 4 p.m.", now, tm);
355432cd4b9Schristos 
356432cd4b9Schristos 		ATF_CHECK(localtime_r(&now, &tm) != NULL);
357432cd4b9Schristos 		tm.tm_mday += 14;
358432cd4b9Schristos 		if (tm.tm_wday > 3)
359432cd4b9Schristos 			tm.tm_mday += 7;
360432cd4b9Schristos 		tm.tm_mday += 3 - tm.tm_wday;
361432cd4b9Schristos 		tm.tm_sec = tm.tm_min = 0;
362432cd4b9Schristos 		tm.tm_hour = 3;
363432cd4b9Schristos 		tm.tm_isdst = -1;
364432cd4b9Schristos 		REL_CHECK("we fortnight 3 a.m.", now, tm);
365432cd4b9Schristos 
366432cd4b9Schristos 		ATF_CHECK(localtime_r(&now, &tm) != NULL);
367432cd4b9Schristos 		tm.tm_min -= 5;
368432cd4b9Schristos 		tm.tm_isdst = -1;
369432cd4b9Schristos 		REL_CHECK("5 minutes ago", now, tm);
370432cd4b9Schristos 
371432cd4b9Schristos 		ATF_CHECK(localtime_r(&now, &tm) != NULL);
372432cd4b9Schristos 		tm.tm_hour++;
373432cd4b9Schristos 		tm.tm_min += 37;
374432cd4b9Schristos 		tm.tm_isdst = -1;
375432cd4b9Schristos 		REL_CHECK("97 minutes", now, tm);
376432cd4b9Schristos 
377432cd4b9Schristos 		ATF_CHECK(localtime_r(&now, &tm) != NULL);
378432cd4b9Schristos 		tm.tm_mon++;
379e4edd6e6Skre 		if (tm.tm_mon == 1 &&
380e4edd6e6Skre 		    tm.tm_mday > 28 + isleap(tm.tm_year))
381e4edd6e6Skre 			tm.tm_mday = 28 + isleap(tm.tm_year);
382e4edd6e6Skre 		else if ((tm.tm_mon == 3 || tm.tm_mon == 5 ||
383e4edd6e6Skre 		    tm.tm_mon == 8 || tm.tm_mon == 10) && tm.tm_mday == 31)
384e4edd6e6Skre 			tm.tm_mday = 30;
385432cd4b9Schristos 		tm.tm_isdst = -1;
386432cd4b9Schristos 		REL_CHECK("month", now, tm);
387432cd4b9Schristos 
388432cd4b9Schristos 		ATF_CHECK(localtime_r(&now, &tm) != NULL);
389432cd4b9Schristos 		tm.tm_mon += 2;		/* "next" means add 2 ... */
390e4edd6e6Skre 		if (tm.tm_mon == 13 &&
391e4edd6e6Skre 		    tm.tm_mday > 28 + isleap(tm.tm_year + 1))
392e4edd6e6Skre 			tm.tm_mday = 28 + isleap(tm.tm_year + 1);
393e4edd6e6Skre 		else if (tm.tm_mon == 8 && tm.tm_mday == 31)
394e4edd6e6Skre 			tm.tm_mday = 30;
395432cd4b9Schristos 		tm.tm_isdst = -1;
396432cd4b9Schristos 		REL_CHECK("next month", now, tm);
397432cd4b9Schristos 
398432cd4b9Schristos 		ATF_CHECK(localtime_r(&now, &tm) != NULL);
399432cd4b9Schristos 		tm.tm_mon--;
400e4edd6e6Skre 		if (tm.tm_mon == 1 &&
401e4edd6e6Skre 		    tm.tm_mday > 28 + isleap(tm.tm_year))
402e4edd6e6Skre 			tm.tm_mday = 28 + isleap(tm.tm_year);
403e4edd6e6Skre 		else if ((tm.tm_mon == 3 || tm.tm_mon == 5 ||
404e4edd6e6Skre 		    tm.tm_mon == 8 || tm.tm_mon == 10) && tm.tm_mday == 31)
405e4edd6e6Skre 			tm.tm_mday = 30;
406432cd4b9Schristos 		tm.tm_isdst = -1;
407432cd4b9Schristos 		REL_CHECK("last month", now, tm);
408432cd4b9Schristos 
409432cd4b9Schristos 		ATF_CHECK(localtime_r(&now, &tm) != NULL);
410432cd4b9Schristos 		tm.tm_mon += 6;
411e4edd6e6Skre 		if (tm.tm_mon == 13 &&
412e4edd6e6Skre 		    tm.tm_mday > 28 + isleap(tm.tm_year + 1))
413e4edd6e6Skre 			tm.tm_mday = 28 + isleap(tm.tm_year + 1);
414e4edd6e6Skre 		else if ((tm.tm_mon == 15 || tm.tm_mon == 17 ||
415e4edd6e6Skre 		    tm.tm_mon == 8 || tm.tm_mon == 10) && tm.tm_mday == 31)
416e4edd6e6Skre 			tm.tm_mday = 30;
417432cd4b9Schristos 		tm.tm_mday += 2;
418432cd4b9Schristos 		tm.tm_isdst = -1;
419432cd4b9Schristos 		REL_CHECK("+6 months 2 days", now, tm);
420432cd4b9Schristos 
421432cd4b9Schristos 		ATF_CHECK(localtime_r(&now, &tm) != NULL);
422432cd4b9Schristos 		tm.tm_mon -= 9;
423e4edd6e6Skre 		if (tm.tm_mon == 1 && tm.tm_mday > 28 + isleap(tm.tm_year))
42425d58d24Skre 			tm.tm_mday = 28 + isleap(tm.tm_year);
425e4edd6e6Skre 		else if ((tm.tm_mon == -9 || tm.tm_mon == -7 ||
426e4edd6e6Skre 		    tm.tm_mon == -2) && tm.tm_mday == 31)
427e4edd6e6Skre 			tm.tm_mday = 30;
428432cd4b9Schristos 		tm.tm_isdst = -1;
429432cd4b9Schristos 		REL_CHECK("9 months ago", now, tm);
430432cd4b9Schristos 
431432cd4b9Schristos 		ATF_CHECK(localtime_r(&now, &tm) != NULL);
432432cd4b9Schristos 		if (tm.tm_wday <= 2)
433432cd4b9Schristos 			tm.tm_mday -= 7;
434432cd4b9Schristos 		tm.tm_mday += 2 - tm.tm_wday;
435432cd4b9Schristos 		tm.tm_isdst = -1;
436432cd4b9Schristos 		tm.tm_hour = tm.tm_min = tm.tm_sec = 0;
437432cd4b9Schristos 		REL_CHECK("1 week ago Tu", now, tm);
438432cd4b9Schristos 
439432cd4b9Schristos 		ATF_CHECK(localtime_r(&now, &tm) != NULL);
440432cd4b9Schristos 		tm.tm_isdst = -1;
441432cd4b9Schristos 		tm.tm_mday++;
442432cd4b9Schristos 		tm.tm_hour = tm.tm_min = tm.tm_sec = 0;
443432cd4b9Schristos 		REL_CHECK("midnight tomorrow", now, tm);
444432cd4b9Schristos 
445432cd4b9Schristos 		ATF_CHECK(localtime_r(&now, &tm) != NULL);
446432cd4b9Schristos 		tm.tm_isdst = -1;
447432cd4b9Schristos 		tm.tm_mday++;
448432cd4b9Schristos 		tm.tm_hour = tm.tm_min = tm.tm_sec = 0;
449432cd4b9Schristos 		REL_CHECK("tomorrow midnight", now, tm);
450432cd4b9Schristos 
451432cd4b9Schristos 		ATF_CHECK(localtime_r(&now, &tm) != NULL);
452432cd4b9Schristos 		tm.tm_isdst = -1;
453432cd4b9Schristos 		tm.tm_mday++;
454432cd4b9Schristos 		tm.tm_hour = 12;
455432cd4b9Schristos 		tm.tm_min = tm.tm_sec = 0;
456432cd4b9Schristos 		REL_CHECK("noon tomorrow", now, tm);
457432cd4b9Schristos 
458432cd4b9Schristos 		ATF_CHECK(localtime_r(&now, &tm) != NULL);
459432cd4b9Schristos 		if (tm.tm_wday > 2)
460432cd4b9Schristos 			tm.tm_mday += 7;
461432cd4b9Schristos 		tm.tm_mday += 2 - tm.tm_wday;
462432cd4b9Schristos 		tm.tm_sec = tm.tm_min = tm.tm_hour = 0;
463432cd4b9Schristos 		tm.tm_isdst = -1;
464432cd4b9Schristos 		REL_CHECK("midnight Tuesday", now, tm);
465432cd4b9Schristos 
466432cd4b9Schristos 		ATF_CHECK(localtime_r(&now, &tm) != NULL);
4679775679dSdholland 		if (tm.tm_wday > 2 + 1)
468432cd4b9Schristos 			tm.tm_mday += 7;
469432cd4b9Schristos 		tm.tm_mday += 2 - tm.tm_wday;
470432cd4b9Schristos 		tm.tm_mday++;	/* xxx midnight --> the next day */
471432cd4b9Schristos 		tm.tm_sec = tm.tm_min = tm.tm_hour = 0;
472432cd4b9Schristos 		tm.tm_isdst = -1;
473432cd4b9Schristos 		REL_CHECK("Tuesday midnight", now, tm);
474198de556Snjoly 	}
47573fec7e5Sgson }
476198de556Snjoly 
47758e1304bSapb ATF_TC(atsecs);
47858e1304bSapb 
ATF_TC_HEAD(atsecs,tc)47958e1304bSapb ATF_TC_HEAD(atsecs, tc)
48058e1304bSapb {
48158e1304bSapb 	atf_tc_set_md_var(tc, "descr", "Test seconds past the epoch");
48258e1304bSapb }
48358e1304bSapb 
ATF_TC_BODY(atsecs,tc)48458e1304bSapb ATF_TC_BODY(atsecs, tc)
48558e1304bSapb {
48658e1304bSapb 	int tzoff;
48758e1304bSapb 
48858e1304bSapb 	/* "@0" -> (time_t)0, regardless of timezone */
48958e1304bSapb 	ATF_CHECK(parsedate("@0", NULL, NULL) == (time_t)0);
49058e1304bSapb 	putenv(__UNCONST("TZ=Europe/Berlin"));
49158e1304bSapb 	tzset();
49258e1304bSapb 	ATF_CHECK(parsedate("@0", NULL, NULL) == (time_t)0);
49358e1304bSapb 	putenv(__UNCONST("TZ=America/New_York"));
49458e1304bSapb 	tzset();
49558e1304bSapb 	ATF_CHECK(parsedate("@0", NULL, NULL) == (time_t)0);
49658e1304bSapb 	tzoff = 0;
49758e1304bSapb 	ATF_CHECK(parsedate("@0", NULL, &tzoff) == (time_t)0);
49858e1304bSapb 	tzoff = 3600;
49958e1304bSapb 	ATF_CHECK(parsedate("@0", NULL, &tzoff) == (time_t)0);
50058e1304bSapb 	tzoff = -3600;
50158e1304bSapb 	ATF_CHECK(parsedate("@0", NULL, &tzoff) == (time_t)0);
50258e1304bSapb 
503a39eba5eSapb 	/* -1 or other negative numbers are not errors */
50458e1304bSapb 	errno = 0;
50558e1304bSapb 	ATF_CHECK(parsedate("@-1", NULL, &tzoff) == (time_t)-1 && errno == 0);
506a39eba5eSapb 	ATF_CHECK(parsedate("@-2", NULL, &tzoff) == (time_t)-2 && errno == 0);
507a39eba5eSapb 
508a39eba5eSapb 	/* junk is an error */
509a39eba5eSapb 	errno = 0;
510a39eba5eSapb 	ATF_CHECK(parsedate("@junk", NULL, NULL) == (time_t)-1 && errno != 0);
51158e1304bSapb }
51258e1304bSapb 
513432cd4b9Schristos ATF_TC(zones);
514432cd4b9Schristos 
ATF_TC_HEAD(zones,tc)515432cd4b9Schristos ATF_TC_HEAD(zones, tc)
516432cd4b9Schristos {
517432cd4b9Schristos 	atf_tc_set_md_var(tc, "descr", "Test parsing dates with zones");
518432cd4b9Schristos }
519432cd4b9Schristos 
ATF_TC_BODY(zones,tc)520432cd4b9Schristos ATF_TC_BODY(zones, tc)
521432cd4b9Schristos {
522432cd4b9Schristos 	parsecheck("2015-12-06 16:11:48 UTC", NULL, NULL, gmtime_r,
523432cd4b9Schristos 		2015, 12, 6, 16, 11, 48);
524432cd4b9Schristos 	parsecheck("2015-12-06 16:11:48 UT", NULL, NULL, gmtime_r,
525432cd4b9Schristos 		2015, 12, 6, 16, 11, 48);
526432cd4b9Schristos 	parsecheck("2015-12-06 16:11:48 GMT", NULL, NULL, gmtime_r,
527432cd4b9Schristos 		2015, 12, 6, 16, 11, 48);
528432cd4b9Schristos 	parsecheck("2015-12-06 16:11:48 +0000", NULL, NULL, gmtime_r,
529432cd4b9Schristos 		2015, 12, 6, 16, 11, 48);
530432cd4b9Schristos 
531432cd4b9Schristos 	parsecheck("2015-12-06 16:11:48 -0500", NULL, NULL, gmtime_r,
532432cd4b9Schristos 		2015, 12, 6, 21, 11, 48);
533432cd4b9Schristos 	parsecheck("2015-12-06 16:11:48 EST", NULL, NULL, gmtime_r,
534432cd4b9Schristos 		2015, 12, 6, 21, 11, 48);
535432cd4b9Schristos 	parsecheck("2015-12-06 16:11:48 EDT", NULL, NULL, gmtime_r,
536432cd4b9Schristos 		2015, 12, 6, 20, 11, 48);
537432cd4b9Schristos 	parsecheck("2015-12-06 16:11:48 +0500", NULL, NULL, gmtime_r,
538432cd4b9Schristos 		2015, 12, 6, 11, 11, 48);
539432cd4b9Schristos 
540432cd4b9Schristos 	parsecheck("2015-12-06 16:11:48 +1000", NULL, NULL, gmtime_r,
541432cd4b9Schristos 		2015, 12, 6, 6, 11, 48);
542432cd4b9Schristos 	parsecheck("2015-12-06 16:11:48 AEST", NULL, NULL, gmtime_r,
543432cd4b9Schristos 		2015, 12, 6, 6, 11, 48);
544432cd4b9Schristos 	parsecheck("2015-12-06 16:11:48 -1000", NULL, NULL, gmtime_r,
545432cd4b9Schristos 		2015, 12, 7, 2, 11, 48);
546432cd4b9Schristos 	parsecheck("2015-12-06 16:11:48 HST", NULL, NULL, gmtime_r,
547432cd4b9Schristos 		2015, 12, 7, 2, 11, 48);
548432cd4b9Schristos 
549432cd4b9Schristos 	parsecheck("2015-12-06 16:11:48 AWST", NULL, NULL, gmtime_r,
550432cd4b9Schristos 		2015, 12, 6, 8, 11, 48);
551432cd4b9Schristos 	parsecheck("2015-12-06 16:11:48 NZDT", NULL, NULL, gmtime_r,
552432cd4b9Schristos 		2015, 12, 6, 3, 11, 48);
553432cd4b9Schristos 
554432cd4b9Schristos         parsecheck("Sun, 6 Dec 2015 09:43:16 -0500", NULL, NULL, gmtime_r,
555432cd4b9Schristos 		2015, 12, 6, 14, 43, 16);
556432cd4b9Schristos 	parsecheck("Mon Dec  7 03:13:31 ICT 2015", NULL, NULL, gmtime_r,
557432cd4b9Schristos 		2015, 12, 6, 20, 13, 31);
558432cd4b9Schristos 	/* the day name is ignored when a day of month (etc) is given... */
559432cd4b9Schristos 	parsecheck("Sat Dec  7 03:13:31 ICT 2015", NULL, NULL, gmtime_r,
560432cd4b9Schristos 		2015, 12, 6, 20, 13, 31);
561432cd4b9Schristos 
562432cd4b9Schristos 
563432cd4b9Schristos 	parsecheck("2015-12-06 12:00:00 IDLW", NULL, NULL, gmtime_r,
564432cd4b9Schristos 		2015, 12, 7, 0, 0, 0);
565432cd4b9Schristos 	parsecheck("2015-12-06 12:00:00 IDLE", NULL, NULL, gmtime_r,
566432cd4b9Schristos 		2015, 12, 6, 0, 0, 0);
567432cd4b9Schristos 
568432cd4b9Schristos 	parsecheck("2015-12-06 21:17:33 NFT", NULL, NULL, gmtime_r,
569432cd4b9Schristos 		2015, 12, 7, 0, 47, 33);
570432cd4b9Schristos 	parsecheck("2015-12-06 21:17:33 ACST", NULL, NULL, gmtime_r,
571432cd4b9Schristos 		2015, 12, 6, 11, 47, 33);
572432cd4b9Schristos 	parsecheck("2015-12-06 21:17:33 +0717", NULL, NULL, gmtime_r,
573432cd4b9Schristos 		2015, 12, 6, 14, 0, 33);
574432cd4b9Schristos 
575432cd4b9Schristos 	parsecheck("2015-12-06 21:21:21 Z", NULL, NULL, gmtime_r,
576432cd4b9Schristos 		2015, 12, 6, 21, 21, 21);
577432cd4b9Schristos 	parsecheck("2015-12-06 21:21:21 A", NULL, NULL, gmtime_r,
578432cd4b9Schristos 		2015, 12, 6, 22, 21, 21);
579432cd4b9Schristos 	parsecheck("2015-12-06 21:21:21 G", NULL, NULL, gmtime_r,
580432cd4b9Schristos 		2015, 12, 7, 4, 21, 21);
581432cd4b9Schristos 	parsecheck("2015-12-06 21:21:21 M", NULL, NULL, gmtime_r,
582432cd4b9Schristos 		2015, 12, 7, 9, 21, 21);
583432cd4b9Schristos 	parsecheck("2015-12-06 21:21:21 N", NULL, NULL, gmtime_r,
584432cd4b9Schristos 		2015, 12, 6, 20, 21, 21);
585432cd4b9Schristos 	parsecheck("2015-12-06 21:21:21 T", NULL, NULL, gmtime_r,
586432cd4b9Schristos 		2015, 12, 6, 14, 21, 21);
587432cd4b9Schristos 	parsecheck("2015-12-06 21:21:21 Y", NULL, NULL, gmtime_r,
588432cd4b9Schristos 		2015, 12, 6, 9, 21, 21);
589432cd4b9Schristos 
590432cd4b9Schristos }
591432cd4b9Schristos 
592432cd4b9Schristos ATF_TC(gibberish);
593432cd4b9Schristos 
ATF_TC_HEAD(gibberish,tc)594432cd4b9Schristos ATF_TC_HEAD(gibberish, tc)
595432cd4b9Schristos {
596432cd4b9Schristos 	atf_tc_set_md_var(tc, "descr", "Test (not) parsing nonsense");
597432cd4b9Schristos }
598432cd4b9Schristos 
ATF_TC_BODY(gibberish,tc)599432cd4b9Schristos ATF_TC_BODY(gibberish, tc)
600432cd4b9Schristos {
601432cd4b9Schristos 	errno = 0;
602432cd4b9Schristos 	ATF_CHECK(parsedate("invalid nonsense", NULL, NULL) == (time_t)-1
603432cd4b9Schristos 	    && errno != 0);
604432cd4b9Schristos 	errno = 0;
605432cd4b9Schristos 	ATF_CHECK(parsedate("12th day of Christmas", NULL, NULL) == (time_t)-1
606432cd4b9Schristos 	    && errno != 0);
607432cd4b9Schristos 	errno = 0;
608432cd4b9Schristos 	ATF_CHECK(parsedate("2015-31-07 15:00", NULL, NULL) == (time_t)-1
609432cd4b9Schristos 	    && errno != 0);
610432cd4b9Schristos 	errno = 0;
611432cd4b9Schristos 	ATF_CHECK(parsedate("2015-02-29 10:01", NULL, NULL) == (time_t)-1
612432cd4b9Schristos 	    && errno != 0);
613432cd4b9Schristos 	errno = 0;
614432cd4b9Schristos 	ATF_CHECK(parsedate("2015-12-06 24:01", NULL, NULL) == (time_t)-1
615432cd4b9Schristos 	    && errno != 0);
616432cd4b9Schristos 	errno = 0;
617432cd4b9Schristos 	ATF_CHECK(parsedate("2015-12-06 14:61", NULL, NULL) == (time_t)-1
618432cd4b9Schristos 	    && errno != 0);
619432cd4b9Schristos }
620432cd4b9Schristos 
ATF_TP_ADD_TCS(tp)621198de556Snjoly ATF_TP_ADD_TCS(tp)
622198de556Snjoly {
623*23ae5a70Schristos 	setenv("TZ", "UTC", 1);
624*23ae5a70Schristos 	tzset();
625198de556Snjoly 	ATF_TP_ADD_TC(tp, dates);
626198de556Snjoly 	ATF_TP_ADD_TC(tp, times);
6274e061687Sapb 	ATF_TP_ADD_TC(tp, dsttimes);
628198de556Snjoly 	ATF_TP_ADD_TC(tp, relative);
62958e1304bSapb 	ATF_TP_ADD_TC(tp, atsecs);
630432cd4b9Schristos 	ATF_TP_ADD_TC(tp, zones);
631432cd4b9Schristos 	ATF_TP_ADD_TC(tp, gibberish);
632198de556Snjoly 
633198de556Snjoly 	return atf_no_error();
634198de556Snjoly }
635432cd4b9Schristos 
636