| /* SPDX-License-Identifier: LGPL-2.1+ */ |
| |
| #include <ctype.h> |
| #include <errno.h> |
| #include <limits.h> |
| #include <stdlib.h> |
| #include <sys/mman.h> |
| #include <sys/time.h> |
| #include <sys/timerfd.h> |
| #include <sys/timex.h> |
| #include <sys/types.h> |
| #include <unistd.h> |
| |
| #include "alloc-util.h" |
| #include "fd-util.h" |
| #include "fileio.h" |
| #include "fs-util.h" |
| #include "io-util.h" |
| #include "log.h" |
| #include "macro.h" |
| #include "missing_timerfd.h" |
| #include "parse-util.h" |
| #include "path-util.h" |
| #include "process-util.h" |
| #include "stat-util.h" |
| #include "string-util.h" |
| #include "strv.h" |
| #include "time-util.h" |
| |
| static clockid_t map_clock_id(clockid_t c) { |
| |
| /* Some more exotic archs (s390, ppc, …) lack the "ALARM" flavour of the clocks. Thus, clock_gettime() will |
| * fail for them. Since they are essentially the same as their non-ALARM pendants (their only difference is |
| * when timers are set on them), let's just map them accordingly. This way, we can get the correct time even on |
| * those archs. */ |
| |
| switch (c) { |
| |
| case CLOCK_BOOTTIME_ALARM: |
| return CLOCK_BOOTTIME; |
| |
| case CLOCK_REALTIME_ALARM: |
| return CLOCK_REALTIME; |
| |
| default: |
| return c; |
| } |
| } |
| |
| usec_t now(clockid_t clock_id) { |
| struct timespec ts; |
| |
| assert_se(clock_gettime(map_clock_id(clock_id), &ts) == 0); |
| |
| return timespec_load(&ts); |
| } |
| |
| nsec_t now_nsec(clockid_t clock_id) { |
| struct timespec ts; |
| |
| assert_se(clock_gettime(map_clock_id(clock_id), &ts) == 0); |
| |
| return timespec_load_nsec(&ts); |
| } |
| |
| dual_timestamp* dual_timestamp_get(dual_timestamp *ts) { |
| assert(ts); |
| |
| ts->realtime = now(CLOCK_REALTIME); |
| ts->monotonic = now(CLOCK_MONOTONIC); |
| |
| return ts; |
| } |
| |
| triple_timestamp* triple_timestamp_get(triple_timestamp *ts) { |
| assert(ts); |
| |
| ts->realtime = now(CLOCK_REALTIME); |
| ts->monotonic = now(CLOCK_MONOTONIC); |
| ts->boottime = clock_boottime_supported() ? now(CLOCK_BOOTTIME) : USEC_INFINITY; |
| |
| return ts; |
| } |
| |
| dual_timestamp* dual_timestamp_from_realtime(dual_timestamp *ts, usec_t u) { |
| int64_t delta; |
| assert(ts); |
| |
| if (u == USEC_INFINITY || u <= 0) { |
| ts->realtime = ts->monotonic = u; |
| return ts; |
| } |
| |
| ts->realtime = u; |
| |
| delta = (int64_t) now(CLOCK_REALTIME) - (int64_t) u; |
| ts->monotonic = usec_sub_signed(now(CLOCK_MONOTONIC), delta); |
| |
| return ts; |
| } |
| |
| triple_timestamp* triple_timestamp_from_realtime(triple_timestamp *ts, usec_t u) { |
| int64_t delta; |
| |
| assert(ts); |
| |
| if (u == USEC_INFINITY || u <= 0) { |
| ts->realtime = ts->monotonic = ts->boottime = u; |
| return ts; |
| } |
| |
| ts->realtime = u; |
| delta = (int64_t) now(CLOCK_REALTIME) - (int64_t) u; |
| ts->monotonic = usec_sub_signed(now(CLOCK_MONOTONIC), delta); |
| ts->boottime = clock_boottime_supported() ? usec_sub_signed(now(CLOCK_BOOTTIME), delta) : USEC_INFINITY; |
| |
| return ts; |
| } |
| |
| dual_timestamp* dual_timestamp_from_monotonic(dual_timestamp *ts, usec_t u) { |
| int64_t delta; |
| assert(ts); |
| |
| if (u == USEC_INFINITY) { |
| ts->realtime = ts->monotonic = USEC_INFINITY; |
| return ts; |
| } |
| |
| ts->monotonic = u; |
| delta = (int64_t) now(CLOCK_MONOTONIC) - (int64_t) u; |
| ts->realtime = usec_sub_signed(now(CLOCK_REALTIME), delta); |
| |
| return ts; |
| } |
| |
| dual_timestamp* dual_timestamp_from_boottime_or_monotonic(dual_timestamp *ts, usec_t u) { |
| int64_t delta; |
| |
| if (u == USEC_INFINITY) { |
| ts->realtime = ts->monotonic = USEC_INFINITY; |
| return ts; |
| } |
| |
| dual_timestamp_get(ts); |
| delta = (int64_t) now(clock_boottime_or_monotonic()) - (int64_t) u; |
| ts->realtime = usec_sub_signed(ts->realtime, delta); |
| ts->monotonic = usec_sub_signed(ts->monotonic, delta); |
| |
| return ts; |
| } |
| |
| usec_t triple_timestamp_by_clock(triple_timestamp *ts, clockid_t clock) { |
| |
| switch (clock) { |
| |
| case CLOCK_REALTIME: |
| case CLOCK_REALTIME_ALARM: |
| return ts->realtime; |
| |
| case CLOCK_MONOTONIC: |
| return ts->monotonic; |
| |
| case CLOCK_BOOTTIME: |
| case CLOCK_BOOTTIME_ALARM: |
| return ts->boottime; |
| |
| default: |
| return USEC_INFINITY; |
| } |
| } |
| |
| usec_t timespec_load(const struct timespec *ts) { |
| assert(ts); |
| |
| if (ts->tv_sec < 0 || ts->tv_nsec < 0) |
| return USEC_INFINITY; |
| |
| if ((usec_t) ts->tv_sec > (UINT64_MAX - (ts->tv_nsec / NSEC_PER_USEC)) / USEC_PER_SEC) |
| return USEC_INFINITY; |
| |
| return |
| (usec_t) ts->tv_sec * USEC_PER_SEC + |
| (usec_t) ts->tv_nsec / NSEC_PER_USEC; |
| } |
| |
| nsec_t timespec_load_nsec(const struct timespec *ts) { |
| assert(ts); |
| |
| if (ts->tv_sec < 0 || ts->tv_nsec < 0) |
| return NSEC_INFINITY; |
| |
| if ((nsec_t) ts->tv_sec >= (UINT64_MAX - ts->tv_nsec) / NSEC_PER_SEC) |
| return NSEC_INFINITY; |
| |
| return (nsec_t) ts->tv_sec * NSEC_PER_SEC + (nsec_t) ts->tv_nsec; |
| } |
| |
| struct timespec *timespec_store(struct timespec *ts, usec_t u) { |
| assert(ts); |
| |
| if (u == USEC_INFINITY || |
| u / USEC_PER_SEC >= TIME_T_MAX) { |
| ts->tv_sec = (time_t) -1; |
| ts->tv_nsec = (long) -1; |
| return ts; |
| } |
| |
| ts->tv_sec = (time_t) (u / USEC_PER_SEC); |
| ts->tv_nsec = (long int) ((u % USEC_PER_SEC) * NSEC_PER_USEC); |
| |
| return ts; |
| } |
| |
| usec_t timeval_load(const struct timeval *tv) { |
| assert(tv); |
| |
| if (tv->tv_sec < 0 || tv->tv_usec < 0) |
| return USEC_INFINITY; |
| |
| if ((usec_t) tv->tv_sec > (UINT64_MAX - tv->tv_usec) / USEC_PER_SEC) |
| return USEC_INFINITY; |
| |
| return |
| (usec_t) tv->tv_sec * USEC_PER_SEC + |
| (usec_t) tv->tv_usec; |
| } |
| |
| struct timeval *timeval_store(struct timeval *tv, usec_t u) { |
| assert(tv); |
| |
| if (u == USEC_INFINITY || |
| u / USEC_PER_SEC > TIME_T_MAX) { |
| tv->tv_sec = (time_t) -1; |
| tv->tv_usec = (suseconds_t) -1; |
| } else { |
| tv->tv_sec = (time_t) (u / USEC_PER_SEC); |
| tv->tv_usec = (suseconds_t) (u % USEC_PER_SEC); |
| } |
| |
| return tv; |
| } |
| |
| static char *format_timestamp_internal( |
| char *buf, |
| size_t l, |
| usec_t t, |
| bool utc, |
| bool us) { |
| |
| /* The weekdays in non-localized (English) form. We use this instead of the localized form, so that our |
| * generated timestamps may be parsed with parse_timestamp(), and always read the same. */ |
| static const char * const weekdays[] = { |
| [0] = "Sun", |
| [1] = "Mon", |
| [2] = "Tue", |
| [3] = "Wed", |
| [4] = "Thu", |
| [5] = "Fri", |
| [6] = "Sat", |
| }; |
| |
| struct tm tm; |
| time_t sec; |
| size_t n; |
| |
| assert(buf); |
| |
| if (l < (size_t) (3 + /* week day */ |
| 1 + 10 + /* space and date */ |
| 1 + 8 + /* space and time */ |
| (us ? 1 + 6 : 0) + /* "." and microsecond part */ |
| 1 + 1 + /* space and shortest possible zone */ |
| 1)) |
| return NULL; /* Not enough space even for the shortest form. */ |
| if (t <= 0 || t == USEC_INFINITY) |
| return NULL; /* Timestamp is unset */ |
| |
| /* Let's not format times with years > 9999 */ |
| if (t > USEC_TIMESTAMP_FORMATTABLE_MAX) { |
| assert(l >= STRLEN("--- XXXX-XX-XX XX:XX:XX") + 1); |
| strcpy(buf, "--- XXXX-XX-XX XX:XX:XX"); |
| return buf; |
| } |
| |
| sec = (time_t) (t / USEC_PER_SEC); /* Round down */ |
| |
| if (!localtime_or_gmtime_r(&sec, &tm, utc)) |
| return NULL; |
| |
| /* Start with the week day */ |
| assert((size_t) tm.tm_wday < ELEMENTSOF(weekdays)); |
| memcpy(buf, weekdays[tm.tm_wday], 4); |
| |
| /* Add the main components */ |
| if (strftime(buf + 3, l - 3, " %Y-%m-%d %H:%M:%S", &tm) <= 0) |
| return NULL; /* Doesn't fit */ |
| |
| /* Append the microseconds part, if that's requested */ |
| if (us) { |
| n = strlen(buf); |
| if (n + 8 > l) |
| return NULL; /* Microseconds part doesn't fit. */ |
| |
| sprintf(buf + n, ".%06"PRI_USEC, t % USEC_PER_SEC); |
| } |
| |
| /* Append the timezone */ |
| n = strlen(buf); |
| if (utc) { |
| /* If this is UTC then let's explicitly use the "UTC" string here, because gmtime_r() normally uses the |
| * obsolete "GMT" instead. */ |
| if (n + 5 > l) |
| return NULL; /* "UTC" doesn't fit. */ |
| |
| strcpy(buf + n, " UTC"); |
| |
| } else if (!isempty(tm.tm_zone)) { |
| size_t tn; |
| |
| /* An explicit timezone is specified, let's use it, if it fits */ |
| tn = strlen(tm.tm_zone); |
| if (n + 1 + tn + 1 > l) { |
| /* The full time zone does not fit in. Yuck. */ |
| |
| if (n + 1 + _POSIX_TZNAME_MAX + 1 > l) |
| return NULL; /* Not even enough space for the POSIX minimum (of 6)? In that case, complain that it doesn't fit */ |
| |
| /* So the time zone doesn't fit in fully, but the caller passed enough space for the POSIX |
| * minimum time zone length. In this case suppress the timezone entirely, in order not to dump |
| * an overly long, hard to read string on the user. This should be safe, because the user will |
| * assume the local timezone anyway if none is shown. And so does parse_timestamp(). */ |
| } else { |
| buf[n++] = ' '; |
| strcpy(buf + n, tm.tm_zone); |
| } |
| } |
| |
| return buf; |
| } |
| |
| char *format_timestamp(char *buf, size_t l, usec_t t) { |
| return format_timestamp_internal(buf, l, t, false, false); |
| } |
| |
| char *format_timestamp_utc(char *buf, size_t l, usec_t t) { |
| return format_timestamp_internal(buf, l, t, true, false); |
| } |
| |
| char *format_timestamp_us(char *buf, size_t l, usec_t t) { |
| return format_timestamp_internal(buf, l, t, false, true); |
| } |
| |
| char *format_timestamp_us_utc(char *buf, size_t l, usec_t t) { |
| return format_timestamp_internal(buf, l, t, true, true); |
| } |
| |
| char *format_timestamp_relative(char *buf, size_t l, usec_t t) { |
| const char *s; |
| usec_t n, d; |
| |
| if (t <= 0 || t == USEC_INFINITY) |
| return NULL; |
| |
| n = now(CLOCK_REALTIME); |
| if (n > t) { |
| d = n - t; |
| s = "ago"; |
| } else { |
| d = t - n; |
| s = "left"; |
| } |
| |
| if (d >= USEC_PER_YEAR) |
| snprintf(buf, l, USEC_FMT " years " USEC_FMT " months %s", |
| d / USEC_PER_YEAR, |
| (d % USEC_PER_YEAR) / USEC_PER_MONTH, s); |
| else if (d >= USEC_PER_MONTH) |
| snprintf(buf, l, USEC_FMT " months " USEC_FMT " days %s", |
| d / USEC_PER_MONTH, |
| (d % USEC_PER_MONTH) / USEC_PER_DAY, s); |
| else if (d >= USEC_PER_WEEK) |
| snprintf(buf, l, USEC_FMT " weeks " USEC_FMT " days %s", |
| d / USEC_PER_WEEK, |
| (d % USEC_PER_WEEK) / USEC_PER_DAY, s); |
| else if (d >= 2*USEC_PER_DAY) |
| snprintf(buf, l, USEC_FMT " days %s", d / USEC_PER_DAY, s); |
| else if (d >= 25*USEC_PER_HOUR) |
| snprintf(buf, l, "1 day " USEC_FMT "h %s", |
| (d - USEC_PER_DAY) / USEC_PER_HOUR, s); |
| else if (d >= 6*USEC_PER_HOUR) |
| snprintf(buf, l, USEC_FMT "h %s", |
| d / USEC_PER_HOUR, s); |
| else if (d >= USEC_PER_HOUR) |
| snprintf(buf, l, USEC_FMT "h " USEC_FMT "min %s", |
| d / USEC_PER_HOUR, |
| (d % USEC_PER_HOUR) / USEC_PER_MINUTE, s); |
| else if (d >= 5*USEC_PER_MINUTE) |
| snprintf(buf, l, USEC_FMT "min %s", |
| d / USEC_PER_MINUTE, s); |
| else if (d >= USEC_PER_MINUTE) |
| snprintf(buf, l, USEC_FMT "min " USEC_FMT "s %s", |
| d / USEC_PER_MINUTE, |
| (d % USEC_PER_MINUTE) / USEC_PER_SEC, s); |
| else if (d >= USEC_PER_SEC) |
| snprintf(buf, l, USEC_FMT "s %s", |
| d / USEC_PER_SEC, s); |
| else if (d >= USEC_PER_MSEC) |
| snprintf(buf, l, USEC_FMT "ms %s", |
| d / USEC_PER_MSEC, s); |
| else if (d > 0) |
| snprintf(buf, l, USEC_FMT"us %s", |
| d, s); |
| else |
| snprintf(buf, l, "now"); |
| |
| buf[l-1] = 0; |
| return buf; |
| } |
| |
| char *format_timespan(char *buf, size_t l, usec_t t, usec_t accuracy) { |
| static const struct { |
| const char *suffix; |
| usec_t usec; |
| } table[] = { |
| { "y", USEC_PER_YEAR }, |
| { "month", USEC_PER_MONTH }, |
| { "w", USEC_PER_WEEK }, |
| { "d", USEC_PER_DAY }, |
| { "h", USEC_PER_HOUR }, |
| { "min", USEC_PER_MINUTE }, |
| { "s", USEC_PER_SEC }, |
| { "ms", USEC_PER_MSEC }, |
| { "us", 1 }, |
| }; |
| |
| size_t i; |
| char *p = buf; |
| bool something = false; |
| |
| assert(buf); |
| assert(l > 0); |
| |
| if (t == USEC_INFINITY) { |
| strncpy(p, "infinity", l-1); |
| p[l-1] = 0; |
| return p; |
| } |
| |
| if (t <= 0) { |
| strncpy(p, "0", l-1); |
| p[l-1] = 0; |
| return p; |
| } |
| |
| /* The result of this function can be parsed with parse_sec */ |
| |
| for (i = 0; i < ELEMENTSOF(table); i++) { |
| int k = 0; |
| size_t n; |
| bool done = false; |
| usec_t a, b; |
| |
| if (t <= 0) |
| break; |
| |
| if (t < accuracy && something) |
| break; |
| |
| if (t < table[i].usec) |
| continue; |
| |
| if (l <= 1) |
| break; |
| |
| a = t / table[i].usec; |
| b = t % table[i].usec; |
| |
| /* Let's see if we should shows this in dot notation */ |
| if (t < USEC_PER_MINUTE && b > 0) { |
| usec_t cc; |
| signed char j; |
| |
| j = 0; |
| for (cc = table[i].usec; cc > 1; cc /= 10) |
| j++; |
| |
| for (cc = accuracy; cc > 1; cc /= 10) { |
| b /= 10; |
| j--; |
| } |
| |
| if (j > 0) { |
| k = snprintf(p, l, |
| "%s"USEC_FMT".%0*"PRI_USEC"%s", |
| p > buf ? " " : "", |
| a, |
| j, |
| b, |
| table[i].suffix); |
| |
| t = 0; |
| done = true; |
| } |
| } |
| |
| /* No? Then let's show it normally */ |
| if (!done) { |
| k = snprintf(p, l, |
| "%s"USEC_FMT"%s", |
| p > buf ? " " : "", |
| a, |
| table[i].suffix); |
| |
| t = b; |
| } |
| |
| n = MIN((size_t) k, l); |
| |
| l -= n; |
| p += n; |
| |
| something = true; |
| } |
| |
| *p = 0; |
| |
| return buf; |
| } |
| |
| static int parse_timestamp_impl(const char *t, usec_t *usec, bool with_tz) { |
| static const struct { |
| const char *name; |
| const int nr; |
| } day_nr[] = { |
| { "Sunday", 0 }, |
| { "Sun", 0 }, |
| { "Monday", 1 }, |
| { "Mon", 1 }, |
| { "Tuesday", 2 }, |
| { "Tue", 2 }, |
| { "Wednesday", 3 }, |
| { "Wed", 3 }, |
| { "Thursday", 4 }, |
| { "Thu", 4 }, |
| { "Friday", 5 }, |
| { "Fri", 5 }, |
| { "Saturday", 6 }, |
| { "Sat", 6 }, |
| }; |
| |
| const char *k, *utc = NULL, *tzn = NULL; |
| struct tm tm, copy; |
| time_t x; |
| usec_t x_usec, plus = 0, minus = 0, ret; |
| int r, weekday = -1, dst = -1; |
| size_t i; |
| |
| /* Allowed syntaxes: |
| * |
| * 2012-09-22 16:34:22 |
| * 2012-09-22 16:34 (seconds will be set to 0) |
| * 2012-09-22 (time will be set to 00:00:00) |
| * 16:34:22 (date will be set to today) |
| * 16:34 (date will be set to today, seconds to 0) |
| * now |
| * yesterday (time is set to 00:00:00) |
| * today (time is set to 00:00:00) |
| * tomorrow (time is set to 00:00:00) |
| * +5min |
| * -5days |
| * @2147483647 (seconds since epoch) |
| */ |
| |
| assert(t); |
| |
| if (t[0] == '@' && !with_tz) |
| return parse_sec(t + 1, usec); |
| |
| ret = now(CLOCK_REALTIME); |
| |
| if (!with_tz) { |
| if (streq(t, "now")) |
| goto finish; |
| |
| else if (t[0] == '+') { |
| r = parse_sec(t+1, &plus); |
| if (r < 0) |
| return r; |
| |
| goto finish; |
| |
| } else if (t[0] == '-') { |
| r = parse_sec(t+1, &minus); |
| if (r < 0) |
| return r; |
| |
| goto finish; |
| |
| } else if ((k = endswith(t, " ago"))) { |
| t = strndupa(t, k - t); |
| |
| r = parse_sec(t, &minus); |
| if (r < 0) |
| return r; |
| |
| goto finish; |
| |
| } else if ((k = endswith(t, " left"))) { |
| t = strndupa(t, k - t); |
| |
| r = parse_sec(t, &plus); |
| if (r < 0) |
| return r; |
| |
| goto finish; |
| } |
| |
| /* See if the timestamp is suffixed with UTC */ |
| utc = endswith_no_case(t, " UTC"); |
| if (utc) |
| t = strndupa(t, utc - t); |
| else { |
| const char *e = NULL; |
| int j; |
| |
| tzset(); |
| |
| /* See if the timestamp is suffixed by either the DST or non-DST local timezone. Note that we only |
| * support the local timezones here, nothing else. Not because we wouldn't want to, but simply because |
| * there are no nice APIs available to cover this. By accepting the local time zone strings, we make |
| * sure that all timestamps written by format_timestamp() can be parsed correctly, even though we don't |
| * support arbitrary timezone specifications. */ |
| |
| for (j = 0; j <= 1; j++) { |
| |
| if (isempty(tzname[j])) |
| continue; |
| |
| e = endswith_no_case(t, tzname[j]); |
| if (!e) |
| continue; |
| if (e == t) |
| continue; |
| if (e[-1] != ' ') |
| continue; |
| |
| break; |
| } |
| |
| if (IN_SET(j, 0, 1)) { |
| /* Found one of the two timezones specified. */ |
| t = strndupa(t, e - t - 1); |
| dst = j; |
| tzn = tzname[j]; |
| } |
| } |
| } |
| |
| x = (time_t) (ret / USEC_PER_SEC); |
| x_usec = 0; |
| |
| if (!localtime_or_gmtime_r(&x, &tm, utc)) |
| return -EINVAL; |
| |
| tm.tm_isdst = dst; |
| if (!with_tz && tzn) |
| tm.tm_zone = tzn; |
| |
| if (streq(t, "today")) { |
| tm.tm_sec = tm.tm_min = tm.tm_hour = 0; |
| goto from_tm; |
| |
| } else if (streq(t, "yesterday")) { |
| tm.tm_mday--; |
| tm.tm_sec = tm.tm_min = tm.tm_hour = 0; |
| goto from_tm; |
| |
| } else if (streq(t, "tomorrow")) { |
| tm.tm_mday++; |
| tm.tm_sec = tm.tm_min = tm.tm_hour = 0; |
| goto from_tm; |
| } |
| |
| for (i = 0; i < ELEMENTSOF(day_nr); i++) { |
| size_t skip; |
| |
| if (!startswith_no_case(t, day_nr[i].name)) |
| continue; |
| |
| skip = strlen(day_nr[i].name); |
| if (t[skip] != ' ') |
| continue; |
| |
| weekday = day_nr[i].nr; |
| t += skip + 1; |
| break; |
| } |
| |
| copy = tm; |
| k = strptime(t, "%y-%m-%d %H:%M:%S", &tm); |
| if (k) { |
| if (*k == '.') |
| goto parse_usec; |
| else if (*k == 0) |
| goto from_tm; |
| } |
| |
| tm = copy; |
| k = strptime(t, "%Y-%m-%d %H:%M:%S", &tm); |
| if (k) { |
| if (*k == '.') |
| goto parse_usec; |
| else if (*k == 0) |
| goto from_tm; |
| } |
| |
| tm = copy; |
| k = strptime(t, "%y-%m-%d %H:%M", &tm); |
| if (k && *k == 0) { |
| tm.tm_sec = 0; |
| goto from_tm; |
| } |
| |
| tm = copy; |
| k = strptime(t, "%Y-%m-%d %H:%M", &tm); |
| if (k && *k == 0) { |
| tm.tm_sec = 0; |
| goto from_tm; |
| } |
| |
| tm = copy; |
| k = strptime(t, "%y-%m-%d", &tm); |
| if (k && *k == 0) { |
| tm.tm_sec = tm.tm_min = tm.tm_hour = 0; |
| goto from_tm; |
| } |
| |
| tm = copy; |
| k = strptime(t, "%Y-%m-%d", &tm); |
| if (k && *k == 0) { |
| tm.tm_sec = tm.tm_min = tm.tm_hour = 0; |
| goto from_tm; |
| } |
| |
| tm = copy; |
| k = strptime(t, "%H:%M:%S", &tm); |
| if (k) { |
| if (*k == '.') |
| goto parse_usec; |
| else if (*k == 0) |
| goto from_tm; |
| } |
| |
| tm = copy; |
| k = strptime(t, "%H:%M", &tm); |
| if (k && *k == 0) { |
| tm.tm_sec = 0; |
| goto from_tm; |
| } |
| |
| return -EINVAL; |
| |
| parse_usec: |
| { |
| unsigned add; |
| |
| k++; |
| r = parse_fractional_part_u(&k, 6, &add); |
| if (r < 0) |
| return -EINVAL; |
| |
| if (*k) |
| return -EINVAL; |
| |
| x_usec = add; |
| } |
| |
| from_tm: |
| if (weekday >= 0 && tm.tm_wday != weekday) |
| return -EINVAL; |
| |
| x = mktime_or_timegm(&tm, utc); |
| if (x < 0) |
| return -EINVAL; |
| |
| ret = (usec_t) x * USEC_PER_SEC + x_usec; |
| if (ret > USEC_TIMESTAMP_FORMATTABLE_MAX) |
| return -EINVAL; |
| |
| finish: |
| if (ret + plus < ret) /* overflow? */ |
| return -EINVAL; |
| ret += plus; |
| if (ret > USEC_TIMESTAMP_FORMATTABLE_MAX) |
| return -EINVAL; |
| |
| if (ret >= minus) |
| ret -= minus; |
| else |
| return -EINVAL; |
| |
| if (usec) |
| *usec = ret; |
| return 0; |
| } |
| |
| typedef struct ParseTimestampResult { |
| usec_t usec; |
| int return_value; |
| } ParseTimestampResult; |
| |
| int parse_timestamp(const char *t, usec_t *usec) { |
| char *last_space, *tz = NULL; |
| ParseTimestampResult *shared, tmp; |
| int r; |
| |
| last_space = strrchr(t, ' '); |
| if (last_space != NULL && timezone_is_valid(last_space + 1, LOG_DEBUG)) |
| tz = last_space + 1; |
| |
| if (!tz || endswith_no_case(t, " UTC")) |
| return parse_timestamp_impl(t, usec, false); |
| |
| shared = mmap(NULL, sizeof *shared, PROT_READ|PROT_WRITE, MAP_SHARED|MAP_ANONYMOUS, -1, 0); |
| if (shared == MAP_FAILED) |
| return negative_errno(); |
| |
| r = safe_fork("(sd-timestamp)", FORK_RESET_SIGNALS|FORK_CLOSE_ALL_FDS|FORK_DEATHSIG|FORK_WAIT, NULL); |
| if (r < 0) { |
| (void) munmap(shared, sizeof *shared); |
| return r; |
| } |
| if (r == 0) { |
| bool with_tz = true; |
| char *colon_tz; |
| |
| /* tzset(3) says $TZ should be prefixed with ":" if we reference timezone files */ |
| colon_tz = strjoina(":", tz); |
| |
| if (setenv("TZ", colon_tz, 1) != 0) { |
| shared->return_value = negative_errno(); |
| _exit(EXIT_FAILURE); |
| } |
| |
| tzset(); |
| |
| /* If there is a timezone that matches the tzname fields, leave the parsing to the implementation. |
| * Otherwise just cut it off. */ |
| with_tz = !STR_IN_SET(tz, tzname[0], tzname[1]); |
| |
| /* Cut off the timezone if we don't need it. */ |
| if (with_tz) |
| t = strndupa(t, last_space - t); |
| |
| shared->return_value = parse_timestamp_impl(t, &shared->usec, with_tz); |
| |
| _exit(EXIT_SUCCESS); |
| } |
| |
| tmp = *shared; |
| if (munmap(shared, sizeof *shared) != 0) |
| return negative_errno(); |
| |
| if (tmp.return_value == 0 && usec) |
| *usec = tmp.usec; |
| |
| return tmp.return_value; |
| } |
| |
| static const char* extract_multiplier(const char *p, usec_t *multiplier) { |
| static const struct { |
| const char *suffix; |
| usec_t usec; |
| } table[] = { |
| { "seconds", USEC_PER_SEC }, |
| { "second", USEC_PER_SEC }, |
| { "sec", USEC_PER_SEC }, |
| { "s", USEC_PER_SEC }, |
| { "minutes", USEC_PER_MINUTE }, |
| { "minute", USEC_PER_MINUTE }, |
| { "min", USEC_PER_MINUTE }, |
| { "months", USEC_PER_MONTH }, |
| { "month", USEC_PER_MONTH }, |
| { "M", USEC_PER_MONTH }, |
| { "msec", USEC_PER_MSEC }, |
| { "ms", USEC_PER_MSEC }, |
| { "m", USEC_PER_MINUTE }, |
| { "hours", USEC_PER_HOUR }, |
| { "hour", USEC_PER_HOUR }, |
| { "hr", USEC_PER_HOUR }, |
| { "h", USEC_PER_HOUR }, |
| { "days", USEC_PER_DAY }, |
| { "day", USEC_PER_DAY }, |
| { "d", USEC_PER_DAY }, |
| { "weeks", USEC_PER_WEEK }, |
| { "week", USEC_PER_WEEK }, |
| { "w", USEC_PER_WEEK }, |
| { "years", USEC_PER_YEAR }, |
| { "year", USEC_PER_YEAR }, |
| { "y", USEC_PER_YEAR }, |
| { "usec", 1ULL }, |
| { "us", 1ULL }, |
| { "µs", 1ULL }, |
| }; |
| size_t i; |
| |
| for (i = 0; i < ELEMENTSOF(table); i++) { |
| char *e; |
| |
| e = startswith(p, table[i].suffix); |
| if (e) { |
| *multiplier = table[i].usec; |
| return e; |
| } |
| } |
| |
| return p; |
| } |
| |
| int parse_time(const char *t, usec_t *usec, usec_t default_unit) { |
| const char *p, *s; |
| usec_t r = 0; |
| bool something = false; |
| |
| assert(t); |
| assert(default_unit > 0); |
| |
| p = t; |
| |
| p += strspn(p, WHITESPACE); |
| s = startswith(p, "infinity"); |
| if (s) { |
| s += strspn(s, WHITESPACE); |
| if (*s != 0) |
| return -EINVAL; |
| |
| if (usec) |
| *usec = USEC_INFINITY; |
| return 0; |
| } |
| |
| for (;;) { |
| usec_t multiplier = default_unit, k; |
| long long l; |
| char *e; |
| |
| p += strspn(p, WHITESPACE); |
| |
| if (*p == 0) { |
| if (!something) |
| return -EINVAL; |
| |
| break; |
| } |
| |
| if (*p == '-') /* Don't allow "-0" */ |
| return -ERANGE; |
| |
| errno = 0; |
| l = strtoll(p, &e, 10); |
| if (errno > 0) |
| return -errno; |
| if (l < 0) |
| return -ERANGE; |
| |
| if (*e == '.') { |
| p = e + 1; |
| p += strspn(p, DIGITS); |
| } else if (e == p) |
| return -EINVAL; |
| else |
| p = e; |
| |
| s = extract_multiplier(p + strspn(p, WHITESPACE), &multiplier); |
| if (s == p && *s != '\0') |
| /* Don't allow '12.34.56', but accept '12.34 .56' or '12.34s.56'*/ |
| return -EINVAL; |
| |
| p = s; |
| |
| if ((usec_t) l >= USEC_INFINITY / multiplier) |
| return -ERANGE; |
| |
| k = (usec_t) l * multiplier; |
| if (k >= USEC_INFINITY - r) |
| return -ERANGE; |
| |
| r += k; |
| |
| something = true; |
| |
| if (*e == '.') { |
| usec_t m = multiplier / 10; |
| const char *b; |
| |
| for (b = e + 1; *b >= '0' && *b <= '9'; b++, m /= 10) { |
| k = (usec_t) (*b - '0') * m; |
| if (k >= USEC_INFINITY - r) |
| return -ERANGE; |
| |
| r += k; |
| } |
| |
| /* Don't allow "0.-0", "3.+1", "3. 1", "3.sec" or "3.hoge"*/ |
| if (b == e + 1) |
| return -EINVAL; |
| } |
| } |
| |
| if (usec) |
| *usec = r; |
| return 0; |
| } |
| |
| int parse_sec(const char *t, usec_t *usec) { |
| return parse_time(t, usec, USEC_PER_SEC); |
| } |
| |
| int parse_sec_fix_0(const char *t, usec_t *ret) { |
| usec_t k; |
| int r; |
| |
| assert(t); |
| assert(ret); |
| |
| r = parse_sec(t, &k); |
| if (r < 0) |
| return r; |
| |
| *ret = k == 0 ? USEC_INFINITY : k; |
| return r; |
| } |
| |
| int parse_sec_def_infinity(const char *t, usec_t *ret) { |
| t += strspn(t, WHITESPACE); |
| if (isempty(t)) { |
| *ret = USEC_INFINITY; |
| return 0; |
| } |
| return parse_sec(t, ret); |
| } |
| |
| static const char* extract_nsec_multiplier(const char *p, nsec_t *multiplier) { |
| static const struct { |
| const char *suffix; |
| nsec_t nsec; |
| } table[] = { |
| { "seconds", NSEC_PER_SEC }, |
| { "second", NSEC_PER_SEC }, |
| { "sec", NSEC_PER_SEC }, |
| { "s", NSEC_PER_SEC }, |
| { "minutes", NSEC_PER_MINUTE }, |
| { "minute", NSEC_PER_MINUTE }, |
| { "min", NSEC_PER_MINUTE }, |
| { "months", NSEC_PER_MONTH }, |
| { "month", NSEC_PER_MONTH }, |
| { "M", NSEC_PER_MONTH }, |
| { "msec", NSEC_PER_MSEC }, |
| { "ms", NSEC_PER_MSEC }, |
| { "m", NSEC_PER_MINUTE }, |
| { "hours", NSEC_PER_HOUR }, |
| { "hour", NSEC_PER_HOUR }, |
| { "hr", NSEC_PER_HOUR }, |
| { "h", NSEC_PER_HOUR }, |
| { "days", NSEC_PER_DAY }, |
| { "day", NSEC_PER_DAY }, |
| { "d", NSEC_PER_DAY }, |
| { "weeks", NSEC_PER_WEEK }, |
| { "week", NSEC_PER_WEEK }, |
| { "w", NSEC_PER_WEEK }, |
| { "years", NSEC_PER_YEAR }, |
| { "year", NSEC_PER_YEAR }, |
| { "y", NSEC_PER_YEAR }, |
| { "usec", NSEC_PER_USEC }, |
| { "us", NSEC_PER_USEC }, |
| { "µs", NSEC_PER_USEC }, |
| { "nsec", 1ULL }, |
| { "ns", 1ULL }, |
| { "", 1ULL }, /* default is nsec */ |
| }; |
| size_t i; |
| |
| for (i = 0; i < ELEMENTSOF(table); i++) { |
| char *e; |
| |
| e = startswith(p, table[i].suffix); |
| if (e) { |
| *multiplier = table[i].nsec; |
| return e; |
| } |
| } |
| |
| return p; |
| } |
| |
| int parse_nsec(const char *t, nsec_t *nsec) { |
| const char *p, *s; |
| nsec_t r = 0; |
| bool something = false; |
| |
| assert(t); |
| assert(nsec); |
| |
| p = t; |
| |
| p += strspn(p, WHITESPACE); |
| s = startswith(p, "infinity"); |
| if (s) { |
| s += strspn(s, WHITESPACE); |
| if (*s != 0) |
| return -EINVAL; |
| |
| *nsec = NSEC_INFINITY; |
| return 0; |
| } |
| |
| for (;;) { |
| nsec_t multiplier = 1, k; |
| long long l; |
| char *e; |
| |
| p += strspn(p, WHITESPACE); |
| |
| if (*p == 0) { |
| if (!something) |
| return -EINVAL; |
| |
| break; |
| } |
| |
| if (*p == '-') /* Don't allow "-0" */ |
| return -ERANGE; |
| |
| errno = 0; |
| l = strtoll(p, &e, 10); |
| if (errno > 0) |
| return -errno; |
| if (l < 0) |
| return -ERANGE; |
| |
| if (*e == '.') { |
| p = e + 1; |
| p += strspn(p, DIGITS); |
| } else if (e == p) |
| return -EINVAL; |
| else |
| p = e; |
| |
| s = extract_nsec_multiplier(p + strspn(p, WHITESPACE), &multiplier); |
| if (s == p && *s != '\0') |
| /* Don't allow '12.34.56', but accept '12.34 .56' or '12.34s.56'*/ |
| return -EINVAL; |
| |
| p = s; |
| |
| if ((nsec_t) l >= NSEC_INFINITY / multiplier) |
| return -ERANGE; |
| |
| k = (nsec_t) l * multiplier; |
| if (k >= NSEC_INFINITY - r) |
| return -ERANGE; |
| |
| r += k; |
| |
| something = true; |
| |
| if (*e == '.') { |
| nsec_t m = multiplier / 10; |
| const char *b; |
| |
| for (b = e + 1; *b >= '0' && *b <= '9'; b++, m /= 10) { |
| k = (nsec_t) (*b - '0') * m; |
| if (k >= NSEC_INFINITY - r) |
| return -ERANGE; |
| |
| r += k; |
| } |
| |
| /* Don't allow "0.-0", "3.+1", "3. 1", "3.sec" or "3.hoge"*/ |
| if (b == e + 1) |
| return -EINVAL; |
| } |
| } |
| |
| *nsec = r; |
| |
| return 0; |
| } |
| |
| bool ntp_synced(void) { |
| struct timex txc = {}; |
| |
| if (adjtimex(&txc) < 0) |
| return false; |
| |
| /* Consider the system clock synchronized if the reported maximum error is smaller than the maximum |
| * value (16 seconds). Ignore the STA_UNSYNC flag as it may have been set to prevent the kernel from |
| * touching the RTC. */ |
| if (txc.maxerror >= 16000000) |
| return false; |
| |
| return true; |
| } |
| |
| int get_timezones(char ***ret) { |
| _cleanup_fclose_ FILE *f = NULL; |
| _cleanup_strv_free_ char **zones = NULL; |
| size_t n_zones = 0, n_allocated = 0; |
| int r; |
| |
| assert(ret); |
| |
| zones = strv_new("UTC"); |
| if (!zones) |
| return -ENOMEM; |
| |
| n_allocated = 2; |
| n_zones = 1; |
| |
| f = fopen("/usr/share/zoneinfo/zone1970.tab", "re"); |
| if (f) { |
| for (;;) { |
| _cleanup_free_ char *line = NULL; |
| char *p, *w; |
| size_t k; |
| |
| r = read_line(f, LONG_LINE_MAX, &line); |
| if (r < 0) |
| return r; |
| if (r == 0) |
| break; |
| |
| p = strstrip(line); |
| |
| if (isempty(p) || *p == '#') |
| continue; |
| |
| /* Skip over country code */ |
| p += strcspn(p, WHITESPACE); |
| p += strspn(p, WHITESPACE); |
| |
| /* Skip over coordinates */ |
| p += strcspn(p, WHITESPACE); |
| p += strspn(p, WHITESPACE); |
| |
| /* Found timezone name */ |
| k = strcspn(p, WHITESPACE); |
| if (k <= 0) |
| continue; |
| |
| w = strndup(p, k); |
| if (!w) |
| return -ENOMEM; |
| |
| if (!GREEDY_REALLOC(zones, n_allocated, n_zones + 2)) { |
| free(w); |
| return -ENOMEM; |
| } |
| |
| zones[n_zones++] = w; |
| zones[n_zones] = NULL; |
| } |
| |
| strv_sort(zones); |
| strv_uniq(zones); |
| |
| } else if (errno != ENOENT) |
| return -errno; |
| |
| *ret = TAKE_PTR(zones); |
| |
| return 0; |
| } |
| |
| bool timezone_is_valid(const char *name, int log_level) { |
| bool slash = false; |
| const char *p, *t; |
| _cleanup_close_ int fd = -1; |
| char buf[4]; |
| int r; |
| |
| if (isempty(name)) |
| return false; |
| |
| /* Always accept "UTC" as valid timezone, since it's the fallback, even if user has no timezones installed. */ |
| if (streq(name, "UTC")) |
| return true; |
| |
| if (name[0] == '/') |
| return false; |
| |
| for (p = name; *p; p++) { |
| if (!(*p >= '0' && *p <= '9') && |
| !(*p >= 'a' && *p <= 'z') && |
| !(*p >= 'A' && *p <= 'Z') && |
| !IN_SET(*p, '-', '_', '+', '/')) |
| return false; |
| |
| if (*p == '/') { |
| |
| if (slash) |
| return false; |
| |
| slash = true; |
| } else |
| slash = false; |
| } |
| |
| if (slash) |
| return false; |
| |
| if (p - name >= PATH_MAX) |
| return false; |
| |
| t = strjoina("/usr/share/zoneinfo/", name); |
| |
| fd = open(t, O_RDONLY|O_CLOEXEC); |
| if (fd < 0) { |
| log_full_errno(log_level, errno, "Failed to open timezone file '%s': %m", t); |
| return false; |
| } |
| |
| r = fd_verify_regular(fd); |
| if (r < 0) { |
| log_full_errno(log_level, r, "Timezone file '%s' is not a regular file: %m", t); |
| return false; |
| } |
| |
| r = loop_read_exact(fd, buf, 4, false); |
| if (r < 0) { |
| log_full_errno(log_level, r, "Failed to read from timezone file '%s': %m", t); |
| return false; |
| } |
| |
| /* Magic from tzfile(5) */ |
| if (memcmp(buf, "TZif", 4) != 0) { |
| log_full(log_level, "Timezone file '%s' has wrong magic bytes", t); |
| return false; |
| } |
| |
| return true; |
| } |
| |
| bool clock_boottime_supported(void) { |
| static int supported = -1; |
| |
| /* Note that this checks whether CLOCK_BOOTTIME is available in general as well as available for timerfds()! */ |
| |
| if (supported < 0) { |
| int fd; |
| |
| fd = timerfd_create(CLOCK_BOOTTIME, TFD_NONBLOCK|TFD_CLOEXEC); |
| if (fd < 0) |
| supported = false; |
| else { |
| safe_close(fd); |
| supported = true; |
| } |
| } |
| |
| return supported; |
| } |
| |
| clockid_t clock_boottime_or_monotonic(void) { |
| if (clock_boottime_supported()) |
| return CLOCK_BOOTTIME; |
| else |
| return CLOCK_MONOTONIC; |
| } |
| |
| bool clock_supported(clockid_t clock) { |
| struct timespec ts; |
| |
| switch (clock) { |
| |
| case CLOCK_MONOTONIC: |
| case CLOCK_REALTIME: |
| return true; |
| |
| case CLOCK_BOOTTIME: |
| return clock_boottime_supported(); |
| |
| case CLOCK_BOOTTIME_ALARM: |
| if (!clock_boottime_supported()) |
| return false; |
| |
| _fallthrough_; |
| default: |
| /* For everything else, check properly */ |
| return clock_gettime(clock, &ts) >= 0; |
| } |
| } |
| |
| int get_timezone(char **ret) { |
| _cleanup_free_ char *t = NULL; |
| const char *e; |
| char *z; |
| int r; |
| |
| r = readlink_malloc("/etc/localtime", &t); |
| if (r == -ENOENT) { |
| /* If the symlink does not exist, assume "UTC", like glibc does*/ |
| z = strdup("UTC"); |
| if (!z) |
| return -ENOMEM; |
| |
| *ret = z; |
| return 0; |
| } |
| if (r < 0) |
| return r; /* returns EINVAL if not a symlink */ |
| |
| e = PATH_STARTSWITH_SET(t, "/usr/share/zoneinfo/", "../usr/share/zoneinfo/"); |
| if (!e) |
| return -EINVAL; |
| |
| if (!timezone_is_valid(e, LOG_DEBUG)) |
| return -EINVAL; |
| |
| z = strdup(e); |
| if (!z) |
| return -ENOMEM; |
| |
| *ret = z; |
| return 0; |
| } |
| |
| time_t mktime_or_timegm(struct tm *tm, bool utc) { |
| return utc ? timegm(tm) : mktime(tm); |
| } |
| |
| struct tm *localtime_or_gmtime_r(const time_t *t, struct tm *tm, bool utc) { |
| return utc ? gmtime_r(t, tm) : localtime_r(t, tm); |
| } |
| |
| static uint32_t sysconf_clock_ticks_cached(void) { |
| static thread_local uint32_t hz = 0; |
| long r; |
| |
| if (hz == 0) { |
| r = sysconf(_SC_CLK_TCK); |
| |
| assert(r > 0); |
| hz = r; |
| } |
| |
| return hz; |
| } |
| |
| uint32_t usec_to_jiffies(usec_t u) { |
| uint32_t hz = sysconf_clock_ticks_cached(); |
| return DIV_ROUND_UP(u, USEC_PER_SEC / hz); |
| } |
| |
| usec_t jiffies_to_usec(uint32_t j) { |
| uint32_t hz = sysconf_clock_ticks_cached(); |
| return DIV_ROUND_UP(j * USEC_PER_SEC, hz); |
| } |
| |
| usec_t usec_shift_clock(usec_t x, clockid_t from, clockid_t to) { |
| usec_t a, b; |
| |
| if (x == USEC_INFINITY) |
| return USEC_INFINITY; |
| if (map_clock_id(from) == map_clock_id(to)) |
| return x; |
| |
| a = now(from); |
| b = now(to); |
| |
| if (x > a) |
| /* x lies in the future */ |
| return usec_add(b, usec_sub_unsigned(x, a)); |
| else |
| /* x lies in the past */ |
| return usec_sub_unsigned(b, usec_sub_unsigned(a, x)); |
| } |
| |
| bool in_utc_timezone(void) { |
| tzset(); |
| |
| return timezone == 0 && daylight == 0; |
| } |
| |
| int time_change_fd(void) { |
| |
| /* We only care for the cancellation event, hence we set the timeout to the latest possible value. */ |
| static const struct itimerspec its = { |
| .it_value.tv_sec = TIME_T_MAX, |
| }; |
| |
| _cleanup_close_ int fd; |
| |
| assert_cc(sizeof(time_t) == sizeof(TIME_T_MAX)); |
| |
| /* Uses TFD_TIMER_CANCEL_ON_SET to get notifications whenever CLOCK_REALTIME makes a jump relative to |
| * CLOCK_MONOTONIC. */ |
| |
| fd = timerfd_create(CLOCK_REALTIME, TFD_NONBLOCK|TFD_CLOEXEC); |
| if (fd < 0) |
| return -errno; |
| |
| if (timerfd_settime(fd, TFD_TIMER_ABSTIME|TFD_TIMER_CANCEL_ON_SET, &its, NULL) < 0) |
| return -errno; |
| |
| return TAKE_FD(fd); |
| } |