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