]> git.ipfire.org Git - thirdparty/systemd.git/blob - src/basic/time-util.c
projects / thirdparty / systemd.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
Merge pull request #10378 from poettering/json-fuzz-fix
[thirdparty/systemd.git] / src / basic / time-util.c
1 /* SPDX-License-Identifier: LGPL-2.1+ */
2
3 #include <ctype.h>
4 #include <errno.h>
5 #include <limits.h>
6 #include <stdlib.h>
7 #include <string.h>
8 #include <sys/mman.h>
9 #include <sys/stat.h>
10 #include <sys/time.h>
11 #include <sys/timerfd.h>
12 #include <sys/timex.h>
13 #include <sys/types.h>
14 #include <unistd.h>
15
16 #include "alloc-util.h"
17 #include "def.h"
18 #include "fd-util.h"
19 #include "fileio.h"
20 #include "fs-util.h"
21 #include "io-util.h"
22 #include "log.h"
23 #include "macro.h"
24 #include "parse-util.h"
25 #include "path-util.h"
26 #include "process-util.h"
27 #include "stat-util.h"
28 #include "string-util.h"
29 #include "strv.h"
30 #include "time-util.h"
31
32 static clockid_t map_clock_id(clockid_t c) {
33
34 /* Some more exotic archs (s390, ppc, …) lack the "ALARM" flavour of the clocks. Thus, clock_gettime() will
35 * fail for them. Since they are essentially the same as their non-ALARM pendants (their only difference is
36 * when timers are set on them), let's just map them accordingly. This way, we can get the correct time even on
37 * those archs. */
38
39 switch (c) {
40
41 case CLOCK_BOOTTIME_ALARM:
42 return CLOCK_BOOTTIME;
43
44 case CLOCK_REALTIME_ALARM:
45 return CLOCK_REALTIME;
46
47 default:
48 return c;
49 }
50 }
51
52 usec_t now(clockid_t clock_id) {
53 struct timespec ts;
54
55 assert_se(clock_gettime(map_clock_id(clock_id), &ts) == 0);
56
57 return timespec_load(&ts);
58 }
59
60 nsec_t now_nsec(clockid_t clock_id) {
61 struct timespec ts;
62
63 assert_se(clock_gettime(map_clock_id(clock_id), &ts) == 0);
64
65 return timespec_load_nsec(&ts);
66 }
67
68 dual_timestamp* dual_timestamp_get(dual_timestamp *ts) {
69 assert(ts);
70
71 ts->realtime = now(CLOCK_REALTIME);
72 ts->monotonic = now(CLOCK_MONOTONIC);
73
74 return ts;
75 }
76
77 triple_timestamp* triple_timestamp_get(triple_timestamp *ts) {
78 assert(ts);
79
80 ts->realtime = now(CLOCK_REALTIME);
81 ts->monotonic = now(CLOCK_MONOTONIC);
82 ts->boottime = clock_boottime_supported() ? now(CLOCK_BOOTTIME) : USEC_INFINITY;
83
84 return ts;
85 }
86
87 dual_timestamp* dual_timestamp_from_realtime(dual_timestamp *ts, usec_t u) {
88 int64_t delta;
89 assert(ts);
90
91 if (u == USEC_INFINITY || u <= 0) {
92 ts->realtime = ts->monotonic = u;
93 return ts;
94 }
95
96 ts->realtime = u;
97
98 delta = (int64_t) now(CLOCK_REALTIME) - (int64_t) u;
99 ts->monotonic = usec_sub_signed(now(CLOCK_MONOTONIC), delta);
100
101 return ts;
102 }
103
104 triple_timestamp* triple_timestamp_from_realtime(triple_timestamp *ts, usec_t u) {
105 int64_t delta;
106
107 assert(ts);
108
109 if (u == USEC_INFINITY || u <= 0) {
110 ts->realtime = ts->monotonic = ts->boottime = u;
111 return ts;
112 }
113
114 ts->realtime = u;
115 delta = (int64_t) now(CLOCK_REALTIME) - (int64_t) u;
116 ts->monotonic = usec_sub_signed(now(CLOCK_MONOTONIC), delta);
117 ts->boottime = clock_boottime_supported() ? usec_sub_signed(now(CLOCK_BOOTTIME), delta) : USEC_INFINITY;
118
119 return ts;
120 }
121
122 dual_timestamp* dual_timestamp_from_monotonic(dual_timestamp *ts, usec_t u) {
123 int64_t delta;
124 assert(ts);
125
126 if (u == USEC_INFINITY) {
127 ts->realtime = ts->monotonic = USEC_INFINITY;
128 return ts;
129 }
130
131 ts->monotonic = u;
132 delta = (int64_t) now(CLOCK_MONOTONIC) - (int64_t) u;
133 ts->realtime = usec_sub_signed(now(CLOCK_REALTIME), delta);
134
135 return ts;
136 }
137
138 dual_timestamp* dual_timestamp_from_boottime_or_monotonic(dual_timestamp *ts, usec_t u) {
139 int64_t delta;
140
141 if (u == USEC_INFINITY) {
142 ts->realtime = ts->monotonic = USEC_INFINITY;
143 return ts;
144 }
145
146 dual_timestamp_get(ts);
147 delta = (int64_t) now(clock_boottime_or_monotonic()) - (int64_t) u;
148 ts->realtime = usec_sub_signed(ts->realtime, delta);
149 ts->monotonic = usec_sub_signed(ts->monotonic, delta);
150
151 return ts;
152 }
153
154 usec_t triple_timestamp_by_clock(triple_timestamp *ts, clockid_t clock) {
155
156 switch (clock) {
157
158 case CLOCK_REALTIME:
159 case CLOCK_REALTIME_ALARM:
160 return ts->realtime;
161
162 case CLOCK_MONOTONIC:
163 return ts->monotonic;
164
165 case CLOCK_BOOTTIME:
166 case CLOCK_BOOTTIME_ALARM:
167 return ts->boottime;
168
169 default:
170 return USEC_INFINITY;
171 }
172 }
173
174 usec_t timespec_load(const struct timespec *ts) {
175 assert(ts);
176
177 if (ts->tv_sec < 0 || ts->tv_nsec < 0)
178 return USEC_INFINITY;
179
180 if ((usec_t) ts->tv_sec > (UINT64_MAX - (ts->tv_nsec / NSEC_PER_USEC)) / USEC_PER_SEC)
181 return USEC_INFINITY;
182
183 return
184 (usec_t) ts->tv_sec * USEC_PER_SEC +
185 (usec_t) ts->tv_nsec / NSEC_PER_USEC;
186 }
187
188 nsec_t timespec_load_nsec(const struct timespec *ts) {
189 assert(ts);
190
191 if (ts->tv_sec < 0 || ts->tv_nsec < 0)
192 return NSEC_INFINITY;
193
194 if ((nsec_t) ts->tv_sec >= (UINT64_MAX - ts->tv_nsec) / NSEC_PER_SEC)
195 return NSEC_INFINITY;
196
197 return (nsec_t) ts->tv_sec * NSEC_PER_SEC + (nsec_t) ts->tv_nsec;
198 }
199
200 struct timespec *timespec_store(struct timespec *ts, usec_t u) {
201 assert(ts);
202
203 if (u == USEC_INFINITY ||
204 u / USEC_PER_SEC >= TIME_T_MAX) {
205 ts->tv_sec = (time_t) -1;
206 ts->tv_nsec = (long) -1;
207 return ts;
208 }
209
210 ts->tv_sec = (time_t) (u / USEC_PER_SEC);
211 ts->tv_nsec = (long int) ((u % USEC_PER_SEC) * NSEC_PER_USEC);
212
213 return ts;
214 }
215
216 usec_t timeval_load(const struct timeval *tv) {
217 assert(tv);
218
219 if (tv->tv_sec < 0 || tv->tv_usec < 0)
220 return USEC_INFINITY;
221
222 if ((usec_t) tv->tv_sec > (UINT64_MAX - tv->tv_usec) / USEC_PER_SEC)
223 return USEC_INFINITY;
224
225 return
226 (usec_t) tv->tv_sec * USEC_PER_SEC +
227 (usec_t) tv->tv_usec;
228 }
229
230 struct timeval *timeval_store(struct timeval *tv, usec_t u) {
231 assert(tv);
232
233 if (u == USEC_INFINITY ||
234 u / USEC_PER_SEC > TIME_T_MAX) {
235 tv->tv_sec = (time_t) -1;
236 tv->tv_usec = (suseconds_t) -1;
237 } else {
238 tv->tv_sec = (time_t) (u / USEC_PER_SEC);
239 tv->tv_usec = (suseconds_t) (u % USEC_PER_SEC);
240 }
241
242 return tv;
243 }
244
245 static char *format_timestamp_internal(
246 char *buf,
247 size_t l,
248 usec_t t,
249 bool utc,
250 bool us) {
251
252 /* The weekdays in non-localized (English) form. We use this instead of the localized form, so that our
253 * generated timestamps may be parsed with parse_timestamp(), and always read the same. */
254 static const char * const weekdays[] = {
255 [0] = "Sun",
256 [1] = "Mon",
257 [2] = "Tue",
258 [3] = "Wed",
259 [4] = "Thu",
260 [5] = "Fri",
261 [6] = "Sat",
262 };
263
264 struct tm tm;
265 time_t sec;
266 size_t n;
267
268 assert(buf);
269
270 if (l <
271 3 + /* week day */
272 1 + 10 + /* space and date */
273 1 + 8 + /* space and time */
274 (us ? 1 + 6 : 0) + /* "." and microsecond part */
275 1 + 1 + /* space and shortest possible zone */
276 1)
277 return NULL; /* Not enough space even for the shortest form. */
278 if (t <= 0 || t == USEC_INFINITY)
279 return NULL; /* Timestamp is unset */
280
281 /* Let's not format times with years > 9999 */
282 if (t > USEC_TIMESTAMP_FORMATTABLE_MAX) {
283 assert(l >= STRLEN("--- XXXX-XX-XX XX:XX:XX") + 1);
284 strcpy(buf, "--- XXXX-XX-XX XX:XX:XX");
285 return buf;
286 }
287
288 sec = (time_t) (t / USEC_PER_SEC); /* Round down */
289
290 if (!localtime_or_gmtime_r(&sec, &tm, utc))
291 return NULL;
292
293 /* Start with the week day */
294 assert((size_t) tm.tm_wday < ELEMENTSOF(weekdays));
295 memcpy(buf, weekdays[tm.tm_wday], 4);
296
297 /* Add the main components */
298 if (strftime(buf + 3, l - 3, " %Y-%m-%d %H:%M:%S", &tm) <= 0)
299 return NULL; /* Doesn't fit */
300
301 /* Append the microseconds part, if that's requested */
302 if (us) {
303 n = strlen(buf);
304 if (n + 8 > l)
305 return NULL; /* Microseconds part doesn't fit. */
306
307 sprintf(buf + n, ".%06"PRI_USEC, t % USEC_PER_SEC);
308 }
309
310 /* Append the timezone */
311 n = strlen(buf);
312 if (utc) {
313 /* If this is UTC then let's explicitly use the "UTC" string here, because gmtime_r() normally uses the
314 * obsolete "GMT" instead. */
315 if (n + 5 > l)
316 return NULL; /* "UTC" doesn't fit. */
317
318 strcpy(buf + n, " UTC");
319
320 } else if (!isempty(tm.tm_zone)) {
321 size_t tn;
322
323 /* An explicit timezone is specified, let's use it, if it fits */
324 tn = strlen(tm.tm_zone);
325 if (n + 1 + tn + 1 > l) {
326 /* The full time zone does not fit in. Yuck. */
327
328 if (n + 1 + _POSIX_TZNAME_MAX + 1 > l)
329 return NULL; /* Not even enough space for the POSIX minimum (of 6)? In that case, complain that it doesn't fit */
330
331 /* So the time zone doesn't fit in fully, but the caller passed enough space for the POSIX
332 * minimum time zone length. In this case suppress the timezone entirely, in order not to dump
333 * an overly long, hard to read string on the user. This should be safe, because the user will
334 * assume the local timezone anyway if none is shown. And so does parse_timestamp(). */
335 } else {
336 buf[n++] = ' ';
337 strcpy(buf + n, tm.tm_zone);
338 }
339 }
340
341 return buf;
342 }
343
344 char *format_timestamp(char *buf, size_t l, usec_t t) {
345 return format_timestamp_internal(buf, l, t, false, false);
346 }
347
348 char *format_timestamp_utc(char *buf, size_t l, usec_t t) {
349 return format_timestamp_internal(buf, l, t, true, false);
350 }
351
352 char *format_timestamp_us(char *buf, size_t l, usec_t t) {
353 return format_timestamp_internal(buf, l, t, false, true);
354 }
355
356 char *format_timestamp_us_utc(char *buf, size_t l, usec_t t) {
357 return format_timestamp_internal(buf, l, t, true, true);
358 }
359
360 char *format_timestamp_relative(char *buf, size_t l, usec_t t) {
361 const char *s;
362 usec_t n, d;
363
364 if (t <= 0 || t == USEC_INFINITY)
365 return NULL;
366
367 n = now(CLOCK_REALTIME);
368 if (n > t) {
369 d = n - t;
370 s = "ago";
371 } else {
372 d = t - n;
373 s = "left";
374 }
375
376 if (d >= USEC_PER_YEAR)
377 snprintf(buf, l, USEC_FMT " years " USEC_FMT " months %s",
378 d / USEC_PER_YEAR,
379 (d % USEC_PER_YEAR) / USEC_PER_MONTH, s);
380 else if (d >= USEC_PER_MONTH)
381 snprintf(buf, l, USEC_FMT " months " USEC_FMT " days %s",
382 d / USEC_PER_MONTH,
383 (d % USEC_PER_MONTH) / USEC_PER_DAY, s);
384 else if (d >= USEC_PER_WEEK)
385 snprintf(buf, l, USEC_FMT " weeks " USEC_FMT " days %s",
386 d / USEC_PER_WEEK,
387 (d % USEC_PER_WEEK) / USEC_PER_DAY, s);
388 else if (d >= 2*USEC_PER_DAY)
389 snprintf(buf, l, USEC_FMT " days %s", d / USEC_PER_DAY, s);
390 else if (d >= 25*USEC_PER_HOUR)
391 snprintf(buf, l, "1 day " USEC_FMT "h %s",
392 (d - USEC_PER_DAY) / USEC_PER_HOUR, s);
393 else if (d >= 6*USEC_PER_HOUR)
394 snprintf(buf, l, USEC_FMT "h %s",
395 d / USEC_PER_HOUR, s);
396 else if (d >= USEC_PER_HOUR)
397 snprintf(buf, l, USEC_FMT "h " USEC_FMT "min %s",
398 d / USEC_PER_HOUR,
399 (d % USEC_PER_HOUR) / USEC_PER_MINUTE, s);
400 else if (d >= 5*USEC_PER_MINUTE)
401 snprintf(buf, l, USEC_FMT "min %s",
402 d / USEC_PER_MINUTE, s);
403 else if (d >= USEC_PER_MINUTE)
404 snprintf(buf, l, USEC_FMT "min " USEC_FMT "s %s",
405 d / USEC_PER_MINUTE,
406 (d % USEC_PER_MINUTE) / USEC_PER_SEC, s);
407 else if (d >= USEC_PER_SEC)
408 snprintf(buf, l, USEC_FMT "s %s",
409 d / USEC_PER_SEC, s);
410 else if (d >= USEC_PER_MSEC)
411 snprintf(buf, l, USEC_FMT "ms %s",
412 d / USEC_PER_MSEC, s);
413 else if (d > 0)
414 snprintf(buf, l, USEC_FMT"us %s",
415 d, s);
416 else
417 snprintf(buf, l, "now");
418
419 buf[l-1] = 0;
420 return buf;
421 }
422
423 char *format_timespan(char *buf, size_t l, usec_t t, usec_t accuracy) {
424 static const struct {
425 const char *suffix;
426 usec_t usec;
427 } table[] = {
428 { "y", USEC_PER_YEAR },
429 { "month", USEC_PER_MONTH },
430 { "w", USEC_PER_WEEK },
431 { "d", USEC_PER_DAY },
432 { "h", USEC_PER_HOUR },
433 { "min", USEC_PER_MINUTE },
434 { "s", USEC_PER_SEC },
435 { "ms", USEC_PER_MSEC },
436 { "us", 1 },
437 };
438
439 size_t i;
440 char *p = buf;
441 bool something = false;
442
443 assert(buf);
444 assert(l > 0);
445
446 if (t == USEC_INFINITY) {
447 strncpy(p, "infinity", l-1);
448 p[l-1] = 0;
449 return p;
450 }
451
452 if (t <= 0) {
453 strncpy(p, "0", l-1);
454 p[l-1] = 0;
455 return p;
456 }
457
458 /* The result of this function can be parsed with parse_sec */
459
460 for (i = 0; i < ELEMENTSOF(table); i++) {
461 int k = 0;
462 size_t n;
463 bool done = false;
464 usec_t a, b;
465
466 if (t <= 0)
467 break;
468
469 if (t < accuracy && something)
470 break;
471
472 if (t < table[i].usec)
473 continue;
474
475 if (l <= 1)
476 break;
477
478 a = t / table[i].usec;
479 b = t % table[i].usec;
480
481 /* Let's see if we should shows this in dot notation */
482 if (t < USEC_PER_MINUTE && b > 0) {
483 usec_t cc;
484 signed char j;
485
486 j = 0;
487 for (cc = table[i].usec; cc > 1; cc /= 10)
488 j++;
489
490 for (cc = accuracy; cc > 1; cc /= 10) {
491 b /= 10;
492 j--;
493 }
494
495 if (j > 0) {
496 k = snprintf(p, l,
497 "%s"USEC_FMT".%0*"PRI_USEC"%s",
498 p > buf ? " " : "",
499 a,
500 j,
501 b,
502 table[i].suffix);
503
504 t = 0;
505 done = true;
506 }
507 }
508
509 /* No? Then let's show it normally */
510 if (!done) {
511 k = snprintf(p, l,
512 "%s"USEC_FMT"%s",
513 p > buf ? " " : "",
514 a,
515 table[i].suffix);
516
517 t = b;
518 }
519
520 n = MIN((size_t) k, l);
521
522 l -= n;
523 p += n;
524
525 something = true;
526 }
527
528 *p = 0;
529
530 return buf;
531 }
532
533 void dual_timestamp_serialize(FILE *f, const char *name, dual_timestamp *t) {
534
535 assert(f);
536 assert(name);
537 assert(t);
538
539 if (!dual_timestamp_is_set(t))
540 return;
541
542 fprintf(f, "%s="USEC_FMT" "USEC_FMT"\n",
543 name,
544 t->realtime,
545 t->monotonic);
546 }
547
548 int dual_timestamp_deserialize(const char *value, dual_timestamp *t) {
549 uint64_t a, b;
550 int r, pos;
551
552 assert(value);
553 assert(t);
554
555 pos = strspn(value, WHITESPACE);
556 if (value[pos] == '-')
557 return -EINVAL;
558 pos += strspn(value + pos, DIGITS);
559 pos += strspn(value + pos, WHITESPACE);
560 if (value[pos] == '-')
561 return -EINVAL;
562
563 r = sscanf(value, "%" PRIu64 "%" PRIu64 "%n", &a, &b, &pos);
564 if (r != 2) {
565 log_debug("Failed to parse dual timestamp value \"%s\".", value);
566 return -EINVAL;
567 }
568
569 if (value[pos] != '\0')
570 /* trailing garbage */
571 return -EINVAL;
572
573 t->realtime = a;
574 t->monotonic = b;
575
576 return 0;
577 }
578
579 int timestamp_deserialize(const char *value, usec_t *timestamp) {
580 int r;
581
582 assert(value);
583
584 r = safe_atou64(value, timestamp);
585 if (r < 0)
586 return log_debug_errno(r, "Failed to parse timestamp value \"%s\": %m", value);
587
588 return r;
589 }
590
591 static int parse_timestamp_impl(const char *t, usec_t *usec, bool with_tz) {
592 static const struct {
593 const char *name;
594 const int nr;
595 } day_nr[] = {
596 { "Sunday", 0 },
597 { "Sun", 0 },
598 { "Monday", 1 },
599 { "Mon", 1 },
600 { "Tuesday", 2 },
601 { "Tue", 2 },
602 { "Wednesday", 3 },
603 { "Wed", 3 },
604 { "Thursday", 4 },
605 { "Thu", 4 },
606 { "Friday", 5 },
607 { "Fri", 5 },
608 { "Saturday", 6 },
609 { "Sat", 6 },
610 };
611
612 const char *k, *utc = NULL, *tzn = NULL;
613 struct tm tm, copy;
614 time_t x;
615 usec_t x_usec, plus = 0, minus = 0, ret;
616 int r, weekday = -1, dst = -1;
617 size_t i;
618
619 /* Allowed syntaxes:
620 *
621 * 2012-09-22 16:34:22
622 * 2012-09-22 16:34 (seconds will be set to 0)
623 * 2012-09-22 (time will be set to 00:00:00)
624 * 16:34:22 (date will be set to today)
625 * 16:34 (date will be set to today, seconds to 0)
626 * now
627 * yesterday (time is set to 00:00:00)
628 * today (time is set to 00:00:00)
629 * tomorrow (time is set to 00:00:00)
630 * +5min
631 * -5days
632 * @2147483647 (seconds since epoch)
633 */
634
635 assert(t);
636 assert(usec);
637
638 if (t[0] == '@' && !with_tz)
639 return parse_sec(t + 1, usec);
640
641 ret = now(CLOCK_REALTIME);
642
643 if (!with_tz) {
644 if (streq(t, "now"))
645 goto finish;
646
647 else if (t[0] == '+') {
648 r = parse_sec(t+1, &plus);
649 if (r < 0)
650 return r;
651
652 goto finish;
653
654 } else if (t[0] == '-') {
655 r = parse_sec(t+1, &minus);
656 if (r < 0)
657 return r;
658
659 goto finish;
660
661 } else if ((k = endswith(t, " ago"))) {
662 t = strndupa(t, k - t);
663
664 r = parse_sec(t, &minus);
665 if (r < 0)
666 return r;
667
668 goto finish;
669
670 } else if ((k = endswith(t, " left"))) {
671 t = strndupa(t, k - t);
672
673 r = parse_sec(t, &plus);
674 if (r < 0)
675 return r;
676
677 goto finish;
678 }
679
680 /* See if the timestamp is suffixed with UTC */
681 utc = endswith_no_case(t, " UTC");
682 if (utc)
683 t = strndupa(t, utc - t);
684 else {
685 const char *e = NULL;
686 int j;
687
688 tzset();
689
690 /* See if the timestamp is suffixed by either the DST or non-DST local timezone. Note that we only
691 * support the local timezones here, nothing else. Not because we wouldn't want to, but simply because
692 * there are no nice APIs available to cover this. By accepting the local time zone strings, we make
693 * sure that all timestamps written by format_timestamp() can be parsed correctly, even though we don't
694 * support arbitrary timezone specifications. */
695
696 for (j = 0; j <= 1; j++) {
697
698 if (isempty(tzname[j]))
699 continue;
700
701 e = endswith_no_case(t, tzname[j]);
702 if (!e)
703 continue;
704 if (e == t)
705 continue;
706 if (e[-1] != ' ')
707 continue;
708
709 break;
710 }
711
712 if (IN_SET(j, 0, 1)) {
713 /* Found one of the two timezones specified. */
714 t = strndupa(t, e - t - 1);
715 dst = j;
716 tzn = tzname[j];
717 }
718 }
719 }
720
721 x = (time_t) (ret / USEC_PER_SEC);
722 x_usec = 0;
723
724 if (!localtime_or_gmtime_r(&x, &tm, utc))
725 return -EINVAL;
726
727 tm.tm_isdst = dst;
728 if (!with_tz && tzn)
729 tm.tm_zone = tzn;
730
731 if (streq(t, "today")) {
732 tm.tm_sec = tm.tm_min = tm.tm_hour = 0;
733 goto from_tm;
734
735 } else if (streq(t, "yesterday")) {
736 tm.tm_mday--;
737 tm.tm_sec = tm.tm_min = tm.tm_hour = 0;
738 goto from_tm;
739
740 } else if (streq(t, "tomorrow")) {
741 tm.tm_mday++;
742 tm.tm_sec = tm.tm_min = tm.tm_hour = 0;
743 goto from_tm;
744 }
745
746 for (i = 0; i < ELEMENTSOF(day_nr); i++) {
747 size_t skip;
748
749 if (!startswith_no_case(t, day_nr[i].name))
750 continue;
751
752 skip = strlen(day_nr[i].name);
753 if (t[skip] != ' ')
754 continue;
755
756 weekday = day_nr[i].nr;
757 t += skip + 1;
758 break;
759 }
760
761 copy = tm;
762 k = strptime(t, "%y-%m-%d %H:%M:%S", &tm);
763 if (k) {
764 if (*k == '.')
765 goto parse_usec;
766 else if (*k == 0)
767 goto from_tm;
768 }
769
770 tm = copy;
771 k = strptime(t, "%Y-%m-%d %H:%M:%S", &tm);
772 if (k) {
773 if (*k == '.')
774 goto parse_usec;
775 else if (*k == 0)
776 goto from_tm;
777 }
778
779 tm = copy;
780 k = strptime(t, "%y-%m-%d %H:%M", &tm);
781 if (k && *k == 0) {
782 tm.tm_sec = 0;
783 goto from_tm;
784 }
785
786 tm = copy;
787 k = strptime(t, "%Y-%m-%d %H:%M", &tm);
788 if (k && *k == 0) {
789 tm.tm_sec = 0;
790 goto from_tm;
791 }
792
793 tm = copy;
794 k = strptime(t, "%y-%m-%d", &tm);
795 if (k && *k == 0) {
796 tm.tm_sec = tm.tm_min = tm.tm_hour = 0;
797 goto from_tm;
798 }
799
800 tm = copy;
801 k = strptime(t, "%Y-%m-%d", &tm);
802 if (k && *k == 0) {
803 tm.tm_sec = tm.tm_min = tm.tm_hour = 0;
804 goto from_tm;
805 }
806
807 tm = copy;
808 k = strptime(t, "%H:%M:%S", &tm);
809 if (k) {
810 if (*k == '.')
811 goto parse_usec;
812 else if (*k == 0)
813 goto from_tm;
814 }
815
816 tm = copy;
817 k = strptime(t, "%H:%M", &tm);
818 if (k && *k == 0) {
819 tm.tm_sec = 0;
820 goto from_tm;
821 }
822
823 return -EINVAL;
824
825 parse_usec:
826 {
827 unsigned add;
828
829 k++;
830 r = parse_fractional_part_u(&k, 6, &add);
831 if (r < 0)
832 return -EINVAL;
833
834 if (*k)
835 return -EINVAL;
836
837 x_usec = add;
838 }
839
840 from_tm:
841 if (weekday >= 0 && tm.tm_wday != weekday)
842 return -EINVAL;
843
844 x = mktime_or_timegm(&tm, utc);
845 if (x < 0)
846 return -EINVAL;
847
848 ret = (usec_t) x * USEC_PER_SEC + x_usec;
849 if (ret > USEC_TIMESTAMP_FORMATTABLE_MAX)
850 return -EINVAL;
851
852 finish:
853 if (ret + plus < ret) /* overflow? */
854 return -EINVAL;
855 ret += plus;
856 if (ret > USEC_TIMESTAMP_FORMATTABLE_MAX)
857 return -EINVAL;
858
859 if (ret >= minus)
860 ret -= minus;
861 else
862 return -EINVAL;
863
864 *usec = ret;
865
866 return 0;
867 }
868
869 typedef struct ParseTimestampResult {
870 usec_t usec;
871 int return_value;
872 } ParseTimestampResult;
873
874 int parse_timestamp(const char *t, usec_t *usec) {
875 char *last_space, *tz = NULL;
876 ParseTimestampResult *shared, tmp;
877 int r;
878
879 last_space = strrchr(t, ' ');
880 if (last_space != NULL && timezone_is_valid(last_space + 1, LOG_DEBUG))
881 tz = last_space + 1;
882
883 if (!tz || endswith_no_case(t, " UTC"))
884 return parse_timestamp_impl(t, usec, false);
885
886 shared = mmap(NULL, sizeof *shared, PROT_READ|PROT_WRITE, MAP_SHARED|MAP_ANONYMOUS, -1, 0);
887 if (shared == MAP_FAILED)
888 return negative_errno();
889
890 r = safe_fork("(sd-timestamp)", FORK_RESET_SIGNALS|FORK_CLOSE_ALL_FDS|FORK_DEATHSIG|FORK_WAIT, NULL);
891 if (r < 0) {
892 (void) munmap(shared, sizeof *shared);
893 return r;
894 }
895 if (r == 0) {
896 bool with_tz = true;
897
898 if (setenv("TZ", tz, 1) != 0) {
899 shared->return_value = negative_errno();
900 _exit(EXIT_FAILURE);
901 }
902
903 tzset();
904
905 /* If there is a timezone that matches the tzname fields, leave the parsing to the implementation.
906 * Otherwise just cut it off. */
907 with_tz = !STR_IN_SET(tz, tzname[0], tzname[1]);
908
909 /* Cut off the timezone if we don't need it. */
910 if (with_tz)
911 t = strndupa(t, last_space - t);
912
913 shared->return_value = parse_timestamp_impl(t, &shared->usec, with_tz);
914
915 _exit(EXIT_SUCCESS);
916 }
917
918 tmp = *shared;
919 if (munmap(shared, sizeof *shared) != 0)
920 return negative_errno();
921
922 if (tmp.return_value == 0)
923 *usec = tmp.usec;
924
925 return tmp.return_value;
926 }
927
928 static char* extract_multiplier(char *p, usec_t *multiplier) {
929 static const struct {
930 const char *suffix;
931 usec_t usec;
932 } table[] = {
933 { "seconds", USEC_PER_SEC },
934 { "second", USEC_PER_SEC },
935 { "sec", USEC_PER_SEC },
936 { "s", USEC_PER_SEC },
937 { "minutes", USEC_PER_MINUTE },
938 { "minute", USEC_PER_MINUTE },
939 { "min", USEC_PER_MINUTE },
940 { "months", USEC_PER_MONTH },
941 { "month", USEC_PER_MONTH },
942 { "M", USEC_PER_MONTH },
943 { "msec", USEC_PER_MSEC },
944 { "ms", USEC_PER_MSEC },
945 { "m", USEC_PER_MINUTE },
946 { "hours", USEC_PER_HOUR },
947 { "hour", USEC_PER_HOUR },
948 { "hr", USEC_PER_HOUR },
949 { "h", USEC_PER_HOUR },
950 { "days", USEC_PER_DAY },
951 { "day", USEC_PER_DAY },
952 { "d", USEC_PER_DAY },
953 { "weeks", USEC_PER_WEEK },
954 { "week", USEC_PER_WEEK },
955 { "w", USEC_PER_WEEK },
956 { "years", USEC_PER_YEAR },
957 { "year", USEC_PER_YEAR },
958 { "y", USEC_PER_YEAR },
959 { "usec", 1ULL },
960 { "us", 1ULL },
961 { "µs", 1ULL },
962 };
963 size_t i;
964
965 for (i = 0; i < ELEMENTSOF(table); i++) {
966 char *e;
967
968 e = startswith(p, table[i].suffix);
969 if (e) {
970 *multiplier = table[i].usec;
971 return e;
972 }
973 }
974
975 return p;
976 }
977
978 int parse_time(const char *t, usec_t *usec, usec_t default_unit) {
979 const char *p, *s;
980 usec_t r = 0;
981 bool something = false;
982
983 assert(t);
984 assert(usec);
985 assert(default_unit > 0);
986
987 p = t;
988
989 p += strspn(p, WHITESPACE);
990 s = startswith(p, "infinity");
991 if (s) {
992 s += strspn(s, WHITESPACE);
993 if (*s != 0)
994 return -EINVAL;
995
996 *usec = USEC_INFINITY;
997 return 0;
998 }
999
1000 for (;;) {
1001 usec_t multiplier = default_unit, k;
1002 long long l, z = 0;
1003 unsigned n = 0;
1004 char *e;
1005
1006 p += strspn(p, WHITESPACE);
1007
1008 if (*p == 0) {
1009 if (!something)
1010 return -EINVAL;
1011
1012 break;
1013 }
1014
1015 if (*p == '-') /* Don't allow "-0" */
1016 return -ERANGE;
1017
1018 errno = 0;
1019 l = strtoll(p, &e, 10);
1020 if (errno > 0)
1021 return -errno;
1022 if (l < 0)
1023 return -ERANGE;
1024
1025 if (*e == '.') {
1026 char *b = e + 1;
1027
1028 /* Don't allow "0.-0", "3.+1" or "3. 1" */
1029 if (IN_SET(*b, '-', '+') || isspace(*b))
1030 return -EINVAL;
1031
1032 errno = 0;
1033 z = strtoll(b, &e, 10);
1034 if (errno > 0)
1035 return -errno;
1036 if (z < 0)
1037 return -ERANGE;
1038 if (e == b)
1039 return -EINVAL;
1040
1041 n = e - b;
1042
1043 } else if (e == p)
1044 return -EINVAL;
1045
1046 e += strspn(e, WHITESPACE);
1047 p = extract_multiplier(e, &multiplier);
1048
1049 something = true;
1050
1051
1052 k = ((usec_t) -1) / multiplier;
1053 if ((usec_t) l + 1 >= k || (usec_t) z >= k)
1054 return -ERANGE;
1055
1056 k = (usec_t) z * multiplier;
1057
1058 for (; n > 0; n--)
1059 k /= 10;
1060
1061 k += (usec_t) l * multiplier;
1062 if (k >= ((usec_t) -1) - r)
1063 return -ERANGE;
1064
1065 r += k;
1066 }
1067
1068 *usec = r;
1069
1070 return 0;
1071 }
1072
1073 int parse_sec(const char *t, usec_t *usec) {
1074 return parse_time(t, usec, USEC_PER_SEC);
1075 }
1076
1077 int parse_sec_fix_0(const char *t, usec_t *ret) {
1078 usec_t k;
1079 int r;
1080
1081 assert(t);
1082 assert(ret);
1083
1084 r = parse_sec(t, &k);
1085 if (r < 0)
1086 return r;
1087
1088 *ret = k == 0 ? USEC_INFINITY : k;
1089 return r;
1090 }
1091
1092 int parse_nsec(const char *t, nsec_t *nsec) {
1093 static const struct {
1094 const char *suffix;
1095 nsec_t nsec;
1096 } table[] = {
1097 { "seconds", NSEC_PER_SEC },
1098 { "second", NSEC_PER_SEC },
1099 { "sec", NSEC_PER_SEC },
1100 { "s", NSEC_PER_SEC },
1101 { "minutes", NSEC_PER_MINUTE },
1102 { "minute", NSEC_PER_MINUTE },
1103 { "min", NSEC_PER_MINUTE },
1104 { "months", NSEC_PER_MONTH },
1105 { "month", NSEC_PER_MONTH },
1106 { "msec", NSEC_PER_MSEC },
1107 { "ms", NSEC_PER_MSEC },
1108 { "m", NSEC_PER_MINUTE },
1109 { "hours", NSEC_PER_HOUR },
1110 { "hour", NSEC_PER_HOUR },
1111 { "hr", NSEC_PER_HOUR },
1112 { "h", NSEC_PER_HOUR },
1113 { "days", NSEC_PER_DAY },
1114 { "day", NSEC_PER_DAY },
1115 { "d", NSEC_PER_DAY },
1116 { "weeks", NSEC_PER_WEEK },
1117 { "week", NSEC_PER_WEEK },
1118 { "w", NSEC_PER_WEEK },
1119 { "years", NSEC_PER_YEAR },
1120 { "year", NSEC_PER_YEAR },
1121 { "y", NSEC_PER_YEAR },
1122 { "usec", NSEC_PER_USEC },
1123 { "us", NSEC_PER_USEC },
1124 { "µs", NSEC_PER_USEC },
1125 { "nsec", 1ULL },
1126 { "ns", 1ULL },
1127 { "", 1ULL }, /* default is nsec */
1128 };
1129
1130 const char *p, *s;
1131 nsec_t r = 0;
1132 bool something = false;
1133
1134 assert(t);
1135 assert(nsec);
1136
1137 p = t;
1138
1139 p += strspn(p, WHITESPACE);
1140 s = startswith(p, "infinity");
1141 if (s) {
1142 s += strspn(s, WHITESPACE);
1143 if (*s != 0)
1144 return -EINVAL;
1145
1146 *nsec = NSEC_INFINITY;
1147 return 0;
1148 }
1149
1150 for (;;) {
1151 long long l, z = 0;
1152 size_t n = 0, i;
1153 char *e;
1154
1155 p += strspn(p, WHITESPACE);
1156
1157 if (*p == 0) {
1158 if (!something)
1159 return -EINVAL;
1160
1161 break;
1162 }
1163
1164 if (*p == '-')
1165 return -ERANGE;
1166
1167 errno = 0;
1168 l = strtoll(p, &e, 10);
1169 if (errno > 0)
1170 return -errno;
1171 if (l < 0)
1172 return -ERANGE;
1173
1174 if (*e == '.') {
1175 char *b = e + 1;
1176
1177 if (IN_SET(*b, '-', '+') || isspace(*b))
1178 return -EINVAL;
1179
1180 errno = 0;
1181 z = strtoll(b, &e, 10);
1182 if (errno > 0)
1183 return -errno;
1184 if (z < 0)
1185 return -ERANGE;
1186 if (e == b)
1187 return -EINVAL;
1188
1189 n = e - b;
1190
1191 } else if (e == p)
1192 return -EINVAL;
1193
1194 e += strspn(e, WHITESPACE);
1195
1196 for (i = 0; i < ELEMENTSOF(table); i++)
1197 if (startswith(e, table[i].suffix)) {
1198 nsec_t k;
1199
1200 k = ((nsec_t) -1) / table[i].nsec;
1201 if ((nsec_t) l + 1 >= k || (nsec_t) z >= k)
1202 return -ERANGE;
1203
1204 k = (nsec_t) z * table[i].nsec;
1205
1206 for (; n > 0; n--)
1207 k /= 10;
1208
1209 k += (nsec_t) l * table[i].nsec;
1210 if (k >= ((nsec_t) -1) - r)
1211 return -ERANGE;
1212
1213 r += k;
1214 p = e + strlen(table[i].suffix);
1215
1216 something = true;
1217 break;
1218 }
1219
1220 if (i >= ELEMENTSOF(table))
1221 return -EINVAL;
1222
1223 }
1224
1225 *nsec = r;
1226
1227 return 0;
1228 }
1229
1230 bool ntp_synced(void) {
1231 struct timex txc = {};
1232
1233 if (adjtimex(&txc) < 0)
1234 return false;
1235
1236 if (txc.status & STA_UNSYNC)
1237 return false;
1238
1239 return true;
1240 }
1241
1242 int get_timezones(char ***ret) {
1243 _cleanup_fclose_ FILE *f = NULL;
1244 _cleanup_strv_free_ char **zones = NULL;
1245 size_t n_zones = 0, n_allocated = 0;
1246 int r;
1247
1248 assert(ret);
1249
1250 zones = strv_new("UTC", NULL);
1251 if (!zones)
1252 return -ENOMEM;
1253
1254 n_allocated = 2;
1255 n_zones = 1;
1256
1257 f = fopen("/usr/share/zoneinfo/zone.tab", "re");
1258 if (f) {
1259 for (;;) {
1260 _cleanup_free_ char *line = NULL;
1261 char *p, *w;
1262 size_t k;
1263
1264 r = read_line(f, LONG_LINE_MAX, &line);
1265 if (r < 0)
1266 return r;
1267 if (r == 0)
1268 break;
1269
1270 p = strstrip(line);
1271
1272 if (isempty(p) || *p == '#')
1273 continue;
1274
1275 /* Skip over country code */
1276 p += strcspn(p, WHITESPACE);
1277 p += strspn(p, WHITESPACE);
1278
1279 /* Skip over coordinates */
1280 p += strcspn(p, WHITESPACE);
1281 p += strspn(p, WHITESPACE);
1282
1283 /* Found timezone name */
1284 k = strcspn(p, WHITESPACE);
1285 if (k <= 0)
1286 continue;
1287
1288 w = strndup(p, k);
1289 if (!w)
1290 return -ENOMEM;
1291
1292 if (!GREEDY_REALLOC(zones, n_allocated, n_zones + 2)) {
1293 free(w);
1294 return -ENOMEM;
1295 }
1296
1297 zones[n_zones++] = w;
1298 zones[n_zones] = NULL;
1299 }
1300
1301 strv_sort(zones);
1302
1303 } else if (errno != ENOENT)
1304 return -errno;
1305
1306 *ret = TAKE_PTR(zones);
1307
1308 return 0;
1309 }
1310
1311 bool timezone_is_valid(const char *name, int log_level) {
1312 bool slash = false;
1313 const char *p, *t;
1314 _cleanup_close_ int fd = -1;
1315 char buf[4];
1316 int r;
1317
1318 if (isempty(name))
1319 return false;
1320
1321 if (name[0] == '/')
1322 return false;
1323
1324 for (p = name; *p; p++) {
1325 if (!(*p >= '0' && *p <= '9') &&
1326 !(*p >= 'a' && *p <= 'z') &&
1327 !(*p >= 'A' && *p <= 'Z') &&
1328 !IN_SET(*p, '-', '_', '+', '/'))
1329 return false;
1330
1331 if (*p == '/') {
1332
1333 if (slash)
1334 return false;
1335
1336 slash = true;
1337 } else
1338 slash = false;
1339 }
1340
1341 if (slash)
1342 return false;
1343
1344 if (p - name >= PATH_MAX)
1345 return false;
1346
1347 t = strjoina("/usr/share/zoneinfo/", name);
1348
1349 fd = open(t, O_RDONLY|O_CLOEXEC);
1350 if (fd < 0) {
1351 log_full_errno(log_level, errno, "Failed to open timezone file '%s': %m", t);
1352 return false;
1353 }
1354
1355 r = fd_verify_regular(fd);
1356 if (r < 0) {
1357 log_full_errno(log_level, r, "Timezone file '%s' is not a regular file: %m", t);
1358 return false;
1359 }
1360
1361 r = loop_read_exact(fd, buf, 4, false);
1362 if (r < 0) {
1363 log_full_errno(log_level, r, "Failed to read from timezone file '%s': %m", t);
1364 return false;
1365 }
1366
1367 /* Magic from tzfile(5) */
1368 if (memcmp(buf, "TZif", 4) != 0) {
1369 log_full(log_level, "Timezone file '%s' has wrong magic bytes", t);
1370 return false;
1371 }
1372
1373 return true;
1374 }
1375
1376 bool clock_boottime_supported(void) {
1377 static int supported = -1;
1378
1379 /* Note that this checks whether CLOCK_BOOTTIME is available in general as well as available for timerfds()! */
1380
1381 if (supported < 0) {
1382 int fd;
1383
1384 fd = timerfd_create(CLOCK_BOOTTIME, TFD_NONBLOCK|TFD_CLOEXEC);
1385 if (fd < 0)
1386 supported = false;
1387 else {
1388 safe_close(fd);
1389 supported = true;
1390 }
1391 }
1392
1393 return supported;
1394 }
1395
1396 clockid_t clock_boottime_or_monotonic(void) {
1397 if (clock_boottime_supported())
1398 return CLOCK_BOOTTIME;
1399 else
1400 return CLOCK_MONOTONIC;
1401 }
1402
1403 bool clock_supported(clockid_t clock) {
1404 struct timespec ts;
1405
1406 switch (clock) {
1407
1408 case CLOCK_MONOTONIC:
1409 case CLOCK_REALTIME:
1410 return true;
1411
1412 case CLOCK_BOOTTIME:
1413 return clock_boottime_supported();
1414
1415 case CLOCK_BOOTTIME_ALARM:
1416 if (!clock_boottime_supported())
1417 return false;
1418
1419 _fallthrough_;
1420 default:
1421 /* For everything else, check properly */
1422 return clock_gettime(clock, &ts) >= 0;
1423 }
1424 }
1425
1426 int get_timezone(char **tz) {
1427 _cleanup_free_ char *t = NULL;
1428 const char *e;
1429 char *z;
1430 int r;
1431
1432 r = readlink_malloc("/etc/localtime", &t);
1433 if (r < 0)
1434 return r; /* returns EINVAL if not a symlink */
1435
1436 e = path_startswith(t, "/usr/share/zoneinfo/");
1437 if (!e)
1438 e = path_startswith(t, "../usr/share/zoneinfo/");
1439 if (!e)
1440 return -EINVAL;
1441
1442 if (!timezone_is_valid(e, LOG_DEBUG))
1443 return -EINVAL;
1444
1445 z = strdup(e);
1446 if (!z)
1447 return -ENOMEM;
1448
1449 *tz = z;
1450 return 0;
1451 }
1452
1453 time_t mktime_or_timegm(struct tm *tm, bool utc) {
1454 return utc ? timegm(tm) : mktime(tm);
1455 }
1456
1457 struct tm *localtime_or_gmtime_r(const time_t *t, struct tm *tm, bool utc) {
1458 return utc ? gmtime_r(t, tm) : localtime_r(t, tm);
1459 }
1460
1461 unsigned long usec_to_jiffies(usec_t u) {
1462 static thread_local unsigned long hz = 0;
1463 long r;
1464
1465 if (hz == 0) {
1466 r = sysconf(_SC_CLK_TCK);
1467
1468 assert(r > 0);
1469 hz = r;
1470 }
1471
1472 return DIV_ROUND_UP(u , USEC_PER_SEC / hz);
1473 }
1474
1475 usec_t usec_shift_clock(usec_t x, clockid_t from, clockid_t to) {
1476 usec_t a, b;
1477
1478 if (x == USEC_INFINITY)
1479 return USEC_INFINITY;
1480 if (map_clock_id(from) == map_clock_id(to))
1481 return x;
1482
1483 a = now(from);
1484 b = now(to);
1485
1486 if (x > a)
1487 /* x lies in the future */
1488 return usec_add(b, usec_sub_unsigned(x, a));
1489 else
1490 /* x lies in the past */
1491 return usec_sub_unsigned(b, usec_sub_unsigned(a, x));
1492 }
1493
1494 bool in_utc_timezone(void) {
1495 tzset();
1496
1497 return timezone == 0 && daylight == 0;
1498 }
1499
1500 int time_change_fd(void) {
1501
1502 /* We only care for the cancellation event, hence we set the timeout to the latest possible value. */
1503 static const struct itimerspec its = {
1504 .it_value.tv_sec = TIME_T_MAX,
1505 };
1506
1507 _cleanup_close_ int fd;
1508
1509 assert_cc(sizeof(time_t) == sizeof(TIME_T_MAX));
1510
1511 /* Uses TFD_TIMER_CANCEL_ON_SET to get notifications whenever CLOCK_REALTIME makes a jump relative to
1512 * CLOCK_MONOTONIC. */
1513
1514 fd = timerfd_create(CLOCK_REALTIME, TFD_NONBLOCK|TFD_CLOEXEC);
1515 if (fd < 0)
1516 return -errno;
1517
1518 if (timerfd_settime(fd, TFD_TIMER_ABSTIME|TFD_TIMER_CANCEL_ON_SET, &its, NULL) < 0)
1519 return -errno;
1520
1521 return TAKE_FD(fd);
1522 }
Unnamed repository; edit this file 'description' to name the repository.