]>
| Commit | Line | Data |
|---|---|---|
| db9ecf05 | 1 | /* SPDX-License-Identifier: LGPL-2.1-or-later */ |
| 36697dc0 | 2 | |
| fa34123c DDM |
3 | #include <stdlib.h> |
| 4 | #include <time.h> | |
| 5 | ||
| b5efdb8a | 6 | #include "alloc-util.h" |
| 36697dc0 | 7 | #include "calendarspec.h" |
| f035bb1b | 8 | #include "env-util.h" |
| 4bbccb02 | 9 | #include "errno-util.h" |
| 07630cea | 10 | #include "string-util.h" |
| 4f7452a8 | 11 | #include "tests.h" |
| fa34123c | 12 | #include "time-util.h" |
| 36697dc0 | 13 | |
| f035bb1b | 14 | static void _test_one(int line, const char *input, const char *output) { |
| 7a9f8b90 | 15 | _cleanup_(calendar_spec_freep) CalendarSpec *c = NULL; |
| aaa87092 | 16 | _cleanup_free_ char *p = NULL, *q = NULL; |
| 36697dc0 | 17 | usec_t u; |
| 36697dc0 LP |
18 | int r; |
| 19 | ||
| 4f233455 ZJS |
20 | r = calendar_spec_from_string(input, &c); |
| 21 | if (r < 0) | |
| 22 | log_error_errno(r, "Failed to parse \"%s\": %m", input); | |
| f9d273e6 | 23 | ASSERT_OK(r); |
| 36697dc0 | 24 | |
| f9d273e6 | 25 | ASSERT_OK(calendar_spec_to_string(c, &p)); |
| 4f233455 ZJS |
26 | log_info("line %d: \"%s\" → \"%s\"%s%s", line, input, p, |
| 27 | !streq(p, output) ? " expected:" : "", | |
| 28 | !streq(p, output) ? output : ""); | |
| 36697dc0 | 29 | |
| f9d273e6 | 30 | ASSERT_STREQ(p, output); |
| 36697dc0 LP |
31 | |
| 32 | u = now(CLOCK_REALTIME); | |
| 33 | r = calendar_spec_next_usec(c, u, &u); | |
| a6e016af | 34 | log_info("Next: %s", r < 0 ? STRERROR(r) : FORMAT_TIMESTAMP(u)); |
| 7a9f8b90 | 35 | c = calendar_spec_free(c); |
| 36697dc0 | 36 | |
| f9d273e6 UA |
37 | ASSERT_OK(calendar_spec_from_string(p, &c)); |
| 38 | ASSERT_OK(calendar_spec_to_string(c, &q)); | |
| aaa87092 | 39 | |
| f9d273e6 | 40 | ASSERT_STREQ(q, p); |
| 36697dc0 | 41 | } |
| f035bb1b | 42 | #define test_one(input, output) _test_one(__LINE__, input, output) |
| 36697dc0 | 43 | |
| f035bb1b | 44 | static void _test_next(int line, const char *input, const char *new_tz, usec_t after, usec_t expect) { |
| 7a9f8b90 | 45 | _cleanup_(calendar_spec_freep) CalendarSpec *c = NULL; |
| 9d5bd70d | 46 | usec_t u; |
| 9d5bd70d HV |
47 | int r; |
| 48 | ||
| 7d6f1d69 | 49 | SAVE_TIMEZONE; |
| 9d5bd70d | 50 | |
| e4bb033e | 51 | if (!isempty(new_tz) && !strchr(new_tz, ',')) |
| f035bb1b | 52 | new_tz = strjoina(":", new_tz); |
| 437f48a4 | 53 | |
| f035bb1b | 54 | assert_se(set_unset_env("TZ", new_tz, true) == 0); |
| 9d5bd70d HV |
55 | tzset(); |
| 56 | ||
| f9d273e6 | 57 | ASSERT_OK(calendar_spec_from_string(input, &c)); |
| 9d5bd70d | 58 | |
| f035bb1b | 59 | log_info("line %d: \"%s\" new_tz=%s", line, input, strnull(new_tz)); |
| 9d5bd70d HV |
60 | |
| 61 | u = after; | |
| 62 | r = calendar_spec_next_usec(c, after, &u); | |
| a6e016af | 63 | log_info("At: %s", r < 0 ? STRERROR(r) : FORMAT_TIMESTAMP_STYLE(u, TIMESTAMP_US)); |
| f5fbe71d | 64 | if (expect != USEC_INFINITY) |
| 9d5bd70d HV |
65 | assert_se(r >= 0 && u == expect); |
| 66 | else | |
| f21b863e | 67 | assert_se(r == -ENOENT); |
| 9d5bd70d | 68 | } |
| f035bb1b | 69 | #define test_next(input, new_tz, after, expect) _test_next(__LINE__, input,new_tz,after,expect) |
| 9d5bd70d | 70 | |
| 4f7452a8 | 71 | TEST(timestamp) { |
| 21b3a0fc LP |
72 | char buf[FORMAT_TIMESTAMP_MAX]; |
| 73 | _cleanup_free_ char *t = NULL; | |
| 7a9f8b90 | 74 | _cleanup_(calendar_spec_freep) CalendarSpec *c = NULL; |
| 21b3a0fc LP |
75 | usec_t x, y; |
| 76 | ||
| 77 | /* Ensure that a timestamp is also a valid calendar specification. Convert forth and back */ | |
| 78 | ||
| 79 | x = now(CLOCK_REALTIME); | |
| 80 | ||
| f035bb1b ZJS |
81 | assert_se(format_timestamp_style(buf, sizeof buf, x, TIMESTAMP_US)); |
| 82 | log_info("%s", buf); | |
| f9d273e6 UA |
83 | ASSERT_OK(calendar_spec_from_string(buf, &c)); |
| 84 | ASSERT_OK(calendar_spec_to_string(c, &t)); | |
| f035bb1b | 85 | log_info("%s", t); |
| 21b3a0fc | 86 | |
| f9d273e6 | 87 | ASSERT_OK(parse_timestamp(t, &y)); |
| 21b3a0fc LP |
88 | assert_se(y == x); |
| 89 | } | |
| 90 | ||
| 4f7452a8 | 91 | TEST(hourly_bug_4031) { |
| 7a9f8b90 | 92 | _cleanup_(calendar_spec_freep) CalendarSpec *c = NULL; |
| 250517d2 | 93 | usec_t n, u, w; |
| 250517d2 ZJS |
94 | int r; |
| 95 | ||
| f9d273e6 | 96 | ASSERT_OK(calendar_spec_from_string("hourly", &c)); |
| 250517d2 | 97 | n = now(CLOCK_REALTIME); |
| d9000d70 | 98 | ASSERT_OK(r = calendar_spec_next_usec(c, n, &u)); |
| 250517d2 | 99 | |
| 0086ef19 | 100 | log_info("Now: %s (%"PRIu64")", FORMAT_TIMESTAMP_STYLE(n, TIMESTAMP_US), n); |
| a6e016af | 101 | log_info("Next hourly: %s (%"PRIu64")", r < 0 ? STRERROR(r) : FORMAT_TIMESTAMP_STYLE(u, TIMESTAMP_US), u); |
| 250517d2 ZJS |
102 | |
| 103 | assert_se((r = calendar_spec_next_usec(c, u, &w)) >= 0); | |
| a6e016af | 104 | log_info("Next hourly: %s (%"PRIu64")", r < 0 ? STRERROR(r) : FORMAT_TIMESTAMP_STYLE(w, TIMESTAMP_US), w); |
| 250517d2 ZJS |
105 | |
| 106 | assert_se(n < u); | |
| 107 | assert_se(u <= n + USEC_PER_HOUR); | |
| 108 | assert_se(u < w); | |
| 109 | assert_se(w <= u + USEC_PER_HOUR); | |
| 110 | } | |
| 111 | ||
| 4f7452a8 | 112 | TEST(calendar_spec_one) { |
| e638d050 DC |
113 | test_one("Sat,Thu,Mon-Wed,Sat-Sun", "Mon..Thu,Sat,Sun *-*-* 00:00:00"); |
| 114 | test_one("Sat,Thu,Mon..Wed,Sat..Sun", "Mon..Thu,Sat,Sun *-*-* 00:00:00"); | |
| 36697dc0 LP |
115 | test_one("Mon,Sun 12-*-* 2,1:23", "Mon,Sun 2012-*-* 01,02:23:00"); |
| 116 | test_one("Wed *-1", "Wed *-*-01 00:00:00"); | |
| 117 | test_one("Wed-Wed,Wed *-1", "Wed *-*-01 00:00:00"); | |
| e638d050 | 118 | test_one("Wed..Wed,Wed *-1", "Wed *-*-01 00:00:00"); |
| 36697dc0 | 119 | test_one("Wed, 17:48", "Wed *-*-* 17:48:00"); |
| 6bae2fd4 | 120 | test_one("Wednesday,", "Wed *-*-* 00:00:00"); |
| e638d050 DC |
121 | test_one("Wed-Sat,Tue 12-10-15 1:2:3", "Tue..Sat 2012-10-15 01:02:03"); |
| 122 | test_one("Wed..Sat,Tue 12-10-15 1:2:3", "Tue..Sat 2012-10-15 01:02:03"); | |
| 36697dc0 LP |
123 | test_one("*-*-7 0:0:0", "*-*-07 00:00:00"); |
| 124 | test_one("10-15", "*-10-15 00:00:00"); | |
| 125 | test_one("monday *-12-* 17:00", "Mon *-12-* 17:00:00"); | |
| a2eb5ea7 DC |
126 | test_one("Mon,Fri *-*-3,1,2 *:30:45", "Mon,Fri *-*-01,02,03 *:30:45"); |
| 127 | test_one("12,14,13,12:20,10,30", "*-*-* 12,13,14:10,20,30:00"); | |
| 36697dc0 LP |
128 | test_one("mon,fri *-1/2-1,3 *:30:45", "Mon,Fri *-01/2-01,03 *:30:45"); |
| 129 | test_one("03-05 08:05:40", "*-03-05 08:05:40"); | |
| 130 | test_one("08:05:40", "*-*-* 08:05:40"); | |
| 131 | test_one("05:40", "*-*-* 05:40:00"); | |
| 132 | test_one("Sat,Sun 12-05 08:05:40", "Sat,Sun *-12-05 08:05:40"); | |
| 133 | test_one("Sat,Sun 08:05:40", "Sat,Sun *-*-* 08:05:40"); | |
| 134 | test_one("2003-03-05 05:40", "2003-03-05 05:40:00"); | |
| 135 | test_one("2003-03-05", "2003-03-05 00:00:00"); | |
| 136 | test_one("03-05", "*-03-05 00:00:00"); | |
| 137 | test_one("hourly", "*-*-* *:00:00"); | |
| 138 | test_one("daily", "*-*-* 00:00:00"); | |
| 139 | test_one("monthly", "*-*-01 00:00:00"); | |
| 140 | test_one("weekly", "Mon *-*-* 00:00:00"); | |
| dbfd41e2 LP |
141 | test_one("minutely", "*-*-* *:*:00"); |
| 142 | test_one("quarterly", "*-01,04,07,10-01 00:00:00"); | |
| 143 | test_one("semi-annually", "*-01,07-01 00:00:00"); | |
| 144 | test_one("annually", "*-01-01 00:00:00"); | |
| 36697dc0 | 145 | test_one("*:2/3", "*-*-* *:02/3:00"); |
| 9d5bd70d | 146 | test_one("2015-10-25 01:00:00 uTc", "2015-10-25 01:00:00 UTC"); |
| 48d26c01 IK |
147 | test_one("2015-10-25 01:00:00 Asia/Vladivostok", "2015-10-25 01:00:00 Asia/Vladivostok"); |
| 148 | test_one("weekly Pacific/Auckland", "Mon *-*-* 00:00:00 Pacific/Auckland"); | |
| f22554a0 HV |
149 | test_one("2016-03-27 03:17:00.4200005", "2016-03-27 03:17:00.420001"); |
| 150 | test_one("2016-03-27 03:17:00/0.42", "2016-03-27 03:17:00/0.420000"); | |
| 9904dc00 DC |
151 | test_one("9..11,13:00,30", "*-*-* 09..11,13:00,30:00"); |
| 152 | test_one("1..3-1..3 1..3:1..3", "*-01..03-01..03 01..03:01..03:00"); | |
| a2eb5ea7 | 153 | test_one("00:00:1.125..2.125", "*-*-* 00:00:01.125000..02.125000"); |
| 9904dc00 DC |
154 | test_one("00:00:1.0..3.8", "*-*-* 00:00:01..03"); |
| 155 | test_one("00:00:01..03", "*-*-* 00:00:01..03"); | |
| a2eb5ea7 | 156 | test_one("00:00:01/2,02..03", "*-*-* 00:00:01/2,02..03"); |
| 3aff2ae9 ZJS |
157 | test_one("*:4,30:0..3", "*-*-* *:04,30:00..03"); |
| 158 | test_one("*:4,30:0/1", "*-*-* *:04,30:*"); | |
| 8e1e59b9 | 159 | test_one("*:4,30:0/1,3,5", "*-*-* *:04,30:*"); |
| 8ea80351 DC |
160 | test_one("*-*~1 Utc", "*-*~01 00:00:00 UTC"); |
| 161 | test_one("*-*~05,3 ", "*-*~03,05 00:00:00"); | |
| 162 | test_one("*-*~* 00:00:00", "*-*-* 00:00:00"); | |
| 408a51e1 DC |
163 | test_one("Monday", "Mon *-*-* 00:00:00"); |
| 164 | test_one("Monday *-*-*", "Mon *-*-* 00:00:00"); | |
| 165 | test_one("*-*-*", "*-*-* 00:00:00"); | |
| 3215e35c | 166 | test_one("*:*:*", "*-*-* *:*:*"); |
| c0df71fa DC |
167 | test_one("*:*", "*-*-* *:*:00"); |
| 168 | test_one("12:*", "*-*-* 12:*:00"); | |
| 169 | test_one("*:30", "*-*-* *:30:00"); | |
| a2eb5ea7 DC |
170 | test_one("93..00-*-*", "1993..2000-*-* 00:00:00"); |
| 171 | test_one("00..07-*-*", "2000..2007-*-* 00:00:00"); | |
| 172 | test_one("*:20..39/5", "*-*-* *:20..35/5:00"); | |
| 173 | test_one("00:00:20..40/1", "*-*-* 00:00:20..40"); | |
| 963e3d83 | 174 | test_one("*~03/1,03..05", "*-*~03/1,03..05 00:00:00"); |
| d80e5b74 ZJS |
175 | /* UNIX timestamps are always UTC */ |
| 176 | test_one("@1493187147", "2017-04-26 06:12:27 UTC"); | |
| 177 | test_one("@1493187147 UTC", "2017-04-26 06:12:27 UTC"); | |
| 178 | test_one("@0", "1970-01-01 00:00:00 UTC"); | |
| 179 | test_one("@0 UTC", "1970-01-01 00:00:00 UTC"); | |
| c9c9f6f4 LP |
180 | test_one("*:05..05", "*-*-* *:05:00"); |
| 181 | test_one("*:05..10/6", "*-*-* *:05:00"); | |
| 4f7452a8 | 182 | } |
| 9d5bd70d | 183 | |
| 4f7452a8 | 184 | TEST(calendar_spec_next) { |
| 9d5bd70d | 185 | test_next("2016-03-27 03:17:00", "", 12345, 1459048620000000); |
| aa077884 | 186 | test_next("2016-03-27 03:17:00", "Europe/Berlin", 12345, 1459041420000000); |
| f391d6c9 | 187 | test_next("2016-03-27 03:17:00", "Europe/Helsinki", 12345, -1); |
| 9d5bd70d HV |
188 | test_next("2016-03-27 03:17:00 UTC", NULL, 12345, 1459048620000000); |
| 189 | test_next("2016-03-27 03:17:00 UTC", "", 12345, 1459048620000000); | |
| aa077884 | 190 | test_next("2016-03-27 03:17:00 UTC", "Europe/Berlin", 12345, 1459048620000000); |
| f391d6c9 LB |
191 | test_next("2016-03-27 03:17:00 UTC", "Europe/Helsinki", 12345, 1459048620000000); |
| 192 | test_next("2016-03-27 03:17:00.420000001 UTC", "Europe/Helsinki", 12345, 1459048620420000); | |
| 193 | test_next("2016-03-27 03:17:00.4200005 UTC", "Europe/Helsinki", 12345, 1459048620420001); | |
| 194 | test_next("2015-11-13 09:11:23.42", "Europe/Helsinki", 12345, 1447398683420000); | |
| 195 | test_next("2015-11-13 09:11:23.42/1.77", "Europe/Helsinki", 1447398683420000, 1447398685190000); | |
| 196 | test_next("2015-11-13 09:11:23.42/1.77", "Europe/Helsinki", 1447398683419999, 1447398683420000); | |
| aa077884 | 197 | test_next("Sun 16:00:00", "Europe/Berlin", 1456041600123456, 1456066800000000); |
| f6e7d66b | 198 | test_next("*-04-31", "", 12345, -1); |
| 8ea80351 DC |
199 | test_next("2016-02~01 UTC", "", 12345, 1456704000000000); |
| 200 | test_next("Mon 2017-05~01..07 UTC", "", 12345, 1496016000000000); | |
| 201 | test_next("Mon 2017-05~07/1 UTC", "", 12345, 1496016000000000); | |
| 1e582ede GG |
202 | test_next("*-*-01/5 04:00:00 UTC", "", 1646010000000000, 1646107200000000); |
| 203 | test_next("*-01/7-01 04:00:00 UTC", "", 1664607600000000, 1672545600000000); | |
| a2eb5ea7 DC |
204 | test_next("2017-08-06 9,11,13,15,17:00 UTC", "", 1502029800000000, 1502031600000000); |
| 205 | test_next("2017-08-06 9..17/2:00 UTC", "", 1502029800000000, 1502031600000000); | |
| 206 | test_next("2016-12-* 3..21/6:00 UTC", "", 1482613200000001, 1482634800000000); | |
| 48d26c01 | 207 | test_next("2017-09-24 03:30:00 Pacific/Auckland", "", 12345, 1506177000000000); |
| f035bb1b | 208 | /* Due to daylight saving time - 2017-09-24 02:30:00 does not exist */ |
| 48d26c01 IK |
209 | test_next("2017-09-24 02:30:00 Pacific/Auckland", "", 12345, -1); |
| 210 | test_next("2017-04-02 02:30:00 Pacific/Auckland", "", 12345, 1491053400000000); | |
| f035bb1b | 211 | /* Confirm that even though it's a time change here (backward) 02:30 happens only once */ |
| 48d26c01 IK |
212 | test_next("2017-04-02 02:30:00 Pacific/Auckland", "", 1491053400000000, -1); |
| 213 | test_next("2017-04-02 03:30:00 Pacific/Auckland", "", 12345, 1491060600000000); | |
| f035bb1b | 214 | /* Confirm that timezones in the Spec work regardless of current timezone */ |
| 48d26c01 | 215 | test_next("2017-09-09 20:42:00 Pacific/Auckland", "", 12345, 1504946520000000); |
| f391d6c9 | 216 | test_next("2017-09-09 20:42:00 Pacific/Auckland", "Europe/Helsinki", 12345, 1504946520000000); |
| 129cb6e2 ZJS |
217 | /* Check that we don't start looping if mktime() moves us backwards */ |
| 218 | test_next("Sun *-*-* 01:00:00 Europe/Dublin", "", 1616412478000000, 1617494400000000); | |
| 219 | test_next("Sun *-*-* 01:00:00 Europe/Dublin", "IST", 1616412478000000, 1617494400000000); | |
| e4bb033e | 220 | /* Europe/Dublin TZ that moves DST backwards */ |
| 221 | test_next("hourly", "IST-1GMT-0,M10.5.0/1,M3.5.0/1", 1743292800000000, 1743296400000000); | |
| 4f7452a8 JJ |
222 | } |
| 223 | ||
| 224 | TEST(calendar_spec_from_string) { | |
| 225 | CalendarSpec *c; | |
| 36697dc0 | 226 | |
| 4f233455 ZJS |
227 | assert_se(calendar_spec_from_string("test", &c) == -EINVAL); |
| 228 | assert_se(calendar_spec_from_string(" utc", &c) == -EINVAL); | |
| 229 | assert_se(calendar_spec_from_string(" ", &c) == -EINVAL); | |
| 230 | assert_se(calendar_spec_from_string("", &c) == -EINVAL); | |
| 231 | assert_se(calendar_spec_from_string("7", &c) == -EINVAL); | |
| 232 | assert_se(calendar_spec_from_string("121212:1:2", &c) == -EINVAL); | |
| 233 | assert_se(calendar_spec_from_string("2000-03-05.23 00:00:00", &c) == -EINVAL); | |
| 234 | assert_se(calendar_spec_from_string("2000-03-05 00:00.1:00", &c) == -EINVAL); | |
| 235 | assert_se(calendar_spec_from_string("00:00:00/0.00000001", &c) == -ERANGE); | |
| 236 | assert_se(calendar_spec_from_string("00:00:00.0..00.9", &c) == -EINVAL); | |
| 237 | assert_se(calendar_spec_from_string("2016~11-22", &c) == -EINVAL); | |
| 238 | assert_se(calendar_spec_from_string("*-*~5/5", &c) == -EINVAL); | |
| 239 | assert_se(calendar_spec_from_string("Monday.. 12:00", &c) == -EINVAL); | |
| 240 | assert_se(calendar_spec_from_string("Monday..", &c) == -EINVAL); | |
| 241 | assert_se(calendar_spec_from_string("-00:+00/-5", &c) == -EINVAL); | |
| 242 | assert_se(calendar_spec_from_string("00:+00/-5", &c) == -EINVAL); | |
| 243 | assert_se(calendar_spec_from_string("2016- 11- 24 12: 30: 00", &c) == -EINVAL); | |
| 244 | assert_se(calendar_spec_from_string("*~29", &c) == -EINVAL); | |
| 245 | assert_se(calendar_spec_from_string("*~16..31", &c) == -EINVAL); | |
| 246 | assert_se(calendar_spec_from_string("12..1/2-*", &c) == -EINVAL); | |
| 247 | assert_se(calendar_spec_from_string("20/4:00", &c) == -EINVAL); | |
| 248 | assert_se(calendar_spec_from_string("00:00/60", &c) == -EINVAL); | |
| 249 | assert_se(calendar_spec_from_string("00:00:2300", &c) == -ERANGE); | |
| 250 | assert_se(calendar_spec_from_string("00:00:18446744073709551615", &c) == -ERANGE); | |
| 5ee45c6d | 251 | assert_se(calendar_spec_from_string("@88588582097858858", &c) == -ERANGE); |
| 3aff2ae9 ZJS |
252 | assert_se(calendar_spec_from_string("*:4,30:*,5", &c) == -EINVAL); |
| 253 | assert_se(calendar_spec_from_string("*:4,30:5,*", &c) == -EINVAL); | |
| 254 | assert_se(calendar_spec_from_string("*:4,30:*\n", &c) == -EINVAL); | |
| 36697dc0 | 255 | } |
| 4f7452a8 | 256 | |
| 1e902c34 LB |
257 | static int intro(void) { |
| 258 | /* Tests have hard-coded results that do not expect a specific timezone to be set by the caller */ | |
| fea2f92d | 259 | ASSERT_OK_ERRNO(unsetenv("TZ")); |
| 1e902c34 LB |
260 | |
| 261 | return EXIT_SUCCESS; | |
| 262 | } | |
| 263 | ||
| 264 | DEFINE_TEST_MAIN_WITH_INTRO(LOG_INFO, intro); |