time.h

Go to the documentation of this file.

#pragma once
/*
 *  This program is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this program; if not, write to the Free Software
 *  Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
 */
 
/**
 * $Id: 8b88a88bde62d1f04e9478da459d19c419a206b7 $
 *
 * @file lib/util/time.h
 * @brief Simple time functions
 *
 * @copyright 2016-2019 Alan DeKok (aland@freeradius.org)
 * @copyright 2019-2021 Arran Cudbard-Bell (a.cudbardb@freeradius.org)
 */
RCSIDH(time_h, "$Id: 8b88a88bde62d1f04e9478da459d19c419a206b7 $")
 
#include <stdint.h>
#include <inttypes.h>
#include <stdatomic.h>
#include <stdio.h>
#include <sys/time.h>
 
/*
 *      Avoid too many ifdef's later in the code.
 */
#if !defined(HAVE_CLOCK_GETTIME)
#error clock_gettime is required
#endif
 
#ifdef __cplusplus
extern "C" {
#endif
 
/** The base resolution for print parse operations
 */
typedef enum {
        FR_TIME_RES_INVALID = -1,
        FR_TIME_RES_SEC = 0,
        FR_TIME_RES_MIN,
        FR_TIME_RES_HOUR,
        FR_TIME_RES_DAY,
        FR_TIME_RES_WEEK,
        FR_TIME_RES_MONTH,
        FR_TIME_RES_YEAR,
        FR_TIME_RES_CSEC,
        FR_TIME_RES_MSEC,
        FR_TIME_RES_USEC,
        FR_TIME_RES_NSEC
} fr_time_res_t;
 
/** "server local" time.  This is the time in nanoseconds since the application started.
 *
 *  This time is our *private* view of time.  It should only be used
 *  for internal timers, events, etc.  It can skew randomly as NTP
 *  plays with the local clock.
 */
typedef struct fr_time_s {
        int64_t value;          //!< Signed because we need times before the server started
                                ///< for things like certificate validity checks and cache
                                ///< entries.
} fr_time_t;
 
/** A time delta, a difference in time measured in nanoseconds.
 *
 * This is easier to distinguish where server epoch time is being
 * used, and where relative time is being used.
 */
typedef struct fr_time_delta_s {
        int64_t value;
} fr_time_delta_t;
 
/** "Unix" time.  This is the time in nanoseconds since midnight January 1, 1970
 *
 *  Note that it is *unsigned*, as we don't use dates before 1970.  Having it
 *  unsigned also allows the compiler to catch issues where people confuse the
 *  two types of time.
 *
 *  The unix times are *public* times.  i.e. times that we get from
 *  the network, or send to the network.  We have no idea if the other
 *  parties idea of time is correct (or if ours is wrong), so we don't
 *  mangle unix time based on clock skew.
 */
typedef struct fr_unix_time_s {
        uint64_t value;
} fr_unix_time_t;
 
#ifdef __cplusplus
}
#endif
 
/*
 *      For sys/time.h and time.h
 */
#include <freeradius-devel/missing.h>
#include <freeradius-devel/util/debug.h>
#include <freeradius-devel/util/sbuff.h>
#include <freeradius-devel/util/math.h>
 
#ifdef __cplusplus
extern "C" {
#endif
 
extern int64_t const                    fr_time_multiplier_by_res[];
extern fr_table_num_ordered_t const     fr_time_precision_table[];
extern size_t                           fr_time_precision_table_len;
 
static bool fr_time_op_ispos(bool a, bool op, bool b)
{
        return ((a == op) == b);
}
 
/** Determine, if an overflow has occurred, which direction it occurred in
 *
 * @param[in] _a        First operand.
 * @param[in] _op       Operator, true if add or multiply, false if subtract.
 * @param[in] _b        Second operand.
 */
#define fr_time_overflow_ispos(_a, _op, _b) \
fr_time_op_ispos( \
        _Generic(&(_a), \
                 fr_time_t *: (fr_time_unwrap(*((fr_time_t *)&(_a))) >= 0), \
                 fr_time_delta_t *: (fr_time_delta_unwrap(*((fr_time_delta_t *)&(_a))) >= 0), \
                 fr_unix_time_t *: true), \
        _op, \
        _Generic(&(_b), \
                 fr_time_t *: (fr_time_unwrap(*((fr_time_t *)&(_b))) >= 0), \
                 fr_time_delta_t *: (fr_time_delta_unwrap(*((fr_time_delta_t *)&(_b))) >= 0), \
                 fr_unix_time_t *: true)\
        )
 
#define fr_time_max() (fr_time_t){ .value = INT64_MAX }
#define fr_time_min() (fr_time_t){ .value = INT64_MIN }
#define fr_time_wrap(_time) (fr_time_t){ .value = (_time) }
static inline int64_t fr_time_unwrap(fr_time_t time) { return time.value; }     /* func to stop mixing with fr_time_delta_t */
#define fr_time_overflow_add(_a, _b) (fr_time_overflow_ispos(_a, true, _b) ? fr_time_max() : fr_time_min())
#define fr_time_overflow_sub(_a, _b) (fr_time_overflow_ispos(_a, false, _b) ? fr_time_max() : fr_time_min())
 
#define fr_time_delta_max() (fr_time_delta_t){ .value = INT64_MAX }
#define fr_time_delta_min() (fr_time_delta_t){ .value = INT64_MIN }
#define fr_time_delta_wrap(_time) (fr_time_delta_t){ .value = (_time) }
/** @hidecallergraph */
static inline int64_t fr_time_delta_unwrap(fr_time_delta_t time) { return time.value; } /* func to stop mixing with fr_time_t */
#define fr_time_delta_overflow_add(_a, _b) (fr_time_overflow_ispos(_a, true, _b) ? fr_time_delta_max() : fr_time_delta_min())
#define fr_time_delta_overflow_sub(_a, _b) (fr_time_overflow_ispos(_a, false, _b) ? fr_time_delta_max() : fr_time_delta_min())
 
#define fr_unix_time_max() (fr_unix_time_t){ .value = UINT64_MAX }
#define fr_unix_time_min() (fr_unix_time_t){ .value = 0 }
#define fr_unix_time_wrap(_time) (fr_unix_time_t){ .value = (_time) }
static inline uint64_t fr_unix_time_unwrap(fr_unix_time_t time) { return time.value; }  /* func to stop mixing with fr_time_t */
#define fr_unix_time_overflow_add(_a, _b) (fr_time_overflow_ispos(_a, true, _b) ? fr_unix_time_max() : fr_unix_time_min())
#define fr_unix_time_overflow_sub(_a, _b) (fr_time_overflow_ispos(_a, false, _b) ? fr_unix_time_max() : fr_unix_time_min())
 
/** @name fr_time_t arithmetic and comparison macros
 *
 * We wrap the 64bit signed time value in a struct to prevent misuse.
 *
 * The macros below allow basic arithmetic and comparisons to be performed.
 * @{
 */
/* Don't add fr_time_add_time_time, it's almost always a type error */
static inline fr_time_t fr_time_add_time_delta(fr_time_t a, fr_time_delta_t b)
{
        typeof_field(fr_time_t, value) out;
        if (!fr_add(&out, fr_time_unwrap(a), fr_time_delta_unwrap(b))) return fr_time_overflow_add(a, b);
        return fr_time_wrap(out);
}
 
static inline fr_time_t fr_time_add_delta_time(fr_time_delta_t a, fr_time_t b)
{
        typeof_field(fr_time_t, value) out;
        if (!fr_add(&out, fr_time_delta_unwrap(a), fr_time_unwrap(b))) return fr_time_overflow_add(a, b);
        return fr_time_wrap(out);
}
 
/** Add a time/time delta together
 *
 * Types may either be:
 * - fr_time_add((fr_time_t), (fr_time_delta_t))
 * - fr_time_add((fr_time_delta_t), (fr_time_delta_t))
 *
 * Adding two time values together is most likely an error.
 * Adding two time_delta values together can be done with #fr_time_delta_add.
 */
#define fr_time_add(_a, _b) \
        _Generic(_a, \
                fr_time_t       : _Generic(_b, \
                                        fr_time_delta_t : fr_time_add_time_delta \
                                  ), \
                fr_time_delta_t : _Generic(_b, \
                                        fr_time_t       : fr_time_add_delta_time, \
                                        fr_time_delta_t : fr_time_delta_add \
                                  ) \
        )(_a, _b)
 
static inline fr_time_delta_t fr_time_sub_time_time(fr_time_t a, fr_time_t b)
{
        typeof_field(fr_time_t, value) out;
        if (!fr_sub(&out, fr_time_unwrap(a), fr_time_unwrap(b))) return fr_time_delta_overflow_sub(a, b);
        return fr_time_delta_wrap(out);
}
static inline fr_time_t fr_time_sub_time_delta(fr_time_t a, fr_time_delta_t b)
{
        typeof_field(fr_time_t, value) out;
        if (!fr_sub(&out, fr_time_unwrap(a), fr_time_delta_unwrap(b))) return fr_time_overflow_sub(a, b);
        return fr_time_wrap(out);
}
 
/** Subtract one time from another
 *
 * Types may either be:
 * - fr_time_sub((fr_time_t), (fr_time_t)) - Produces a #fr_time_delta_t
 * - fr_time_sub((fr_time_t), (fr_time_delta_t)) - Produces a #fr_time_t
 *
 * Subtracting time from a delta is most likely an error.
 * Subtracting two time_delta values can be done with #fr_time_delta_sub
 */
#define fr_time_sub(_a, _b) \
        _Generic(_a, \
                fr_time_t       : _Generic(_b, \
                                        fr_time_t       : fr_time_sub_time_time, \
                                        fr_time_delta_t : fr_time_sub_time_delta \
                                  ) \
        )(_a, _b)
 
#define fr_time_gt(_a, _b) (fr_time_unwrap(_a) > fr_time_unwrap(_b))
#define fr_time_gteq(_a, _b) (fr_time_unwrap(_a) >= fr_time_unwrap(_b))
#define fr_time_lt(_a, _b) (fr_time_unwrap(_a) < fr_time_unwrap(_b))
#define fr_time_lteq(_a, _b) (fr_time_unwrap(_a) <= fr_time_unwrap(_b))
#define fr_time_eq(_a, _b) (fr_time_unwrap(_a) == fr_time_unwrap(_b))
#define fr_time_neq(_a, _b) (fr_time_unwrap(_a) != fr_time_unwrap(_b))
 
#define fr_time_ispos(_a) (fr_time_unwrap(_a) > 0)
#define fr_time_isneg(_a) (fr_time_unwrap(_a) < 0)
/** @} */
 
/** @name fr_time_delta_t arithmetic and comparison macros
 *
 * We wrap the 64bit signed time delta value in a struct to prevent misuse.
 *
 * The macros below allow basic arithmetic and comparisons to be performed.
 * @{
 */
static inline fr_time_delta_t fr_time_delta_add(fr_time_delta_t a, fr_time_delta_t b)
{
        typeof_field(fr_time_delta_t, value) out;
        if (!fr_add(&out, fr_time_delta_unwrap(a), fr_time_delta_unwrap(b))) return fr_time_delta_overflow_add(a, b);
        return fr_time_delta_wrap(out);
}
static inline fr_time_delta_t fr_time_delta_sub(fr_time_delta_t a, fr_time_delta_t b)
{
        typeof_field(fr_time_delta_t, value) out;
        if (!fr_sub(&out, fr_time_delta_unwrap(a), fr_time_delta_unwrap(b))) return fr_time_delta_overflow_sub(a, b);
        return fr_time_delta_wrap(out);
}
static inline fr_time_delta_t fr_time_delta_div(fr_time_delta_t a, fr_time_delta_t b)
{
        if (fr_time_delta_unwrap(b) == 0) return fr_time_delta_wrap(0);
 
        return fr_time_delta_wrap(fr_time_delta_unwrap(a) / fr_time_delta_unwrap(b));
}
static inline fr_time_delta_t fr_time_delta_mul(fr_time_delta_t a, int64_t b)
{
        typeof_field(fr_time_delta_t, value) out;
        if (!fr_multiply(&out, fr_time_delta_unwrap(a), b)) {
                return a;
        }
        return fr_time_delta_wrap(out);
}
 
#define fr_time_delta_cond(_a, _op, _b) (fr_time_delta_unwrap(_a) _op fr_time_delta_unwrap(_b))
#define fr_time_delta_gt(_a, _b) (fr_time_delta_unwrap(_a) > fr_time_delta_unwrap(_b))
#define fr_time_delta_gteq(_a, _b) (fr_time_delta_unwrap(_a) >= fr_time_delta_unwrap(_b))
#define fr_time_delta_lt(_a, _b) (fr_time_delta_unwrap(_a) < fr_time_delta_unwrap(_b))
#define fr_time_delta_lteq(_a, _b) (fr_time_delta_unwrap(_a) <= fr_time_delta_unwrap(_b))
#define fr_time_delta_eq(_a, _b) (fr_time_delta_unwrap(_a) == fr_time_delta_unwrap(_b))
#define fr_time_delta_neq(_a, _b) (fr_time_delta_unwrap(_a) != fr_time_delta_unwrap(_b))
 
#define fr_time_delta_ispos(_a) (fr_time_delta_unwrap(_a) > 0)
#define fr_time_delta_isneg(_a) (fr_time_delta_unwrap(_a) < 0)
/** @} */
 
/** @name fr_unix_time_t arithmetic and comparison macros
 *
 * We wrap the 64bit signed time value in a struct to prevent misuse.
 *
 * The macros below allow basic arithmetic and comparisons to be performed.
 * @{
 */
/* Don't add fr_unix_time_add_time_time, it's almost always a type error */
static inline fr_unix_time_t fr_unix_time_add_time_delta(fr_unix_time_t a, fr_time_delta_t b)
{
        typeof_field(fr_unix_time_t, value) out;
        if (!fr_add(&out, fr_unix_time_unwrap(a), fr_time_delta_unwrap(b))) return fr_unix_time_overflow_add(a, b);
        return fr_unix_time_wrap(out);
}
static inline fr_unix_time_t fr_unix_time_add_delta_time(fr_time_delta_t a, fr_unix_time_t b)
{
        typeof_field(fr_unix_time_t, value) out;
        if (!fr_add(&out, fr_time_delta_unwrap(a), fr_unix_time_unwrap(b))) return fr_unix_time_overflow_add(a, b);
        return fr_unix_time_wrap(out);
}
 
/** Add a time/time delta together
 *
 * Types may either be:
 * - fr_unix_time_add((fr_unix_time_t), (fr_time_delta_t))
 * - fr_unix_time_add((fr_time_delta_t), (fr_time_delta_t))
 *
 * Adding two time values together is most likely an error.
 * Adding two time_delta values together can be done with #fr_time_delta_add.
 */
#define fr_unix_time_add(_a, _b) \
        _Generic(_a, \
                fr_unix_time_t  : _Generic(_b, \
                                        fr_time_delta_t : fr_unix_time_add_time_delta \
                                  ), \
                fr_time_delta_t : _Generic(_b, \
                                        fr_unix_time_t  : fr_unix_time_add_delta_time, \
                                        fr_time_delta_t : fr_time_delta_add \
                                  ) \
        )(_a, _b)
 
static inline fr_time_delta_t fr_unix_time_sub_time_time(fr_unix_time_t a, fr_unix_time_t b)
{
        typeof_field(fr_time_delta_t, value) out;
        if (!fr_sub(&out, fr_unix_time_unwrap(a), fr_unix_time_unwrap(b))) return fr_time_delta_overflow_sub(a, b);
        return fr_time_delta_wrap(out);
}
static inline fr_unix_time_t fr_unix_time_sub_time_delta(fr_unix_time_t a, fr_time_delta_t b)
{
        typeof_field(fr_unix_time_t, value) out;
        if (!fr_sub(&out, fr_unix_time_unwrap(a), fr_time_delta_unwrap(b))) return fr_unix_time_overflow_sub(a, b);
        return fr_unix_time_wrap(out);
}
 
/** Subtract one time from another
 *
 * Types may either be:
 * - fr_unix_time_sub((fr_unix_time_t), (fr_unix_time_t)) - Produces a #fr_time_delta_t
 * - fr_unix_time_sub((fr_unix_time_t), (fr_time_delta_t)) - Produces a #fr_unix_time_t
 *
 * Subtracting time from a delta is most likely an error.
 * Subtracting two time_delta values can be done with #fr_time_delta_sub
 */
#define fr_unix_time_sub(_a, _b) \
        _Generic(_a, \
                fr_unix_time_t  : _Generic(_b, \
                                        fr_unix_time_t  : fr_unix_time_sub_time_time, \
                                        fr_time_delta_t : fr_unix_time_sub_time_delta \
                                  ) \
        )(_a, _b)
 
#define fr_unix_time_gt(_a, _b) (fr_unix_time_unwrap(_a) > fr_unix_time_unwrap(_b))
#define fr_unix_time_gteq(_a, _b) (fr_unix_time_unwrap(_a) >= fr_unix_time_unwrap(_b))
#define fr_unix_time_lt(_a, _b) (fr_unix_time_unwrap(_a) < fr_unix_time_unwrap(_b))
#define fr_unix_time_lteq(_a, _b) (fr_unix_time_unwrap(_a) <= fr_unix_time_unwrap(_b))
#define fr_unix_time_eq(_a, _b) (fr_unix_time_unwrap(_a) == fr_unix_time_unwrap(_b))
#define fr_unix_time_neq(_a, _b) (fr_unix_time_unwrap(_a) != fr_unix_time_unwrap(_b))
 
#define fr_unix_time_ispos(_a) (fr_unix_time_unwrap(_a) > 0)
/** @} */
 
typedef struct {
        uint64_t        array[8];               //!< 100ns to 100s
} fr_time_elapsed_t;
 
#define NSEC    (1000000000)
#define USEC    (1000000)
#define MSEC    (1000)
#define CSEC    (100)
 
/*
 *      Pre-defined "magic" values for time in a month and year.  The number of seconds in a year is:
 *
 *      1 year is 365.2425 days. times 86400 seconds in a day.
 *
 *      The average month is simply one twelfth of that.  Note that the exact value for both year and month
 *      duration are really magic values, which people will never stumble upon themselves. As such, they can
 *      be used (somewhat, in some cases) as magic tokens meaning "year" or "month".
 */
#define FR_TIME_DUR_YEAR  ((int64_t)NSEC * 31556952)
#define FR_TIME_DUR_MONTH (FR_TIME_DUR_YEAR/12)
 
 
/*
 *      The value of clock_gettime(CLOCK_MONOTONIC_RAW) when we started.  i.e. our epoch.
 */
extern int64_t                          fr_time_epoch;
 
/*
 *      The offset from CLOCK_MONOTONIC_RAW to CLOCK_REALTIME.
 */
extern _Atomic int64_t                  fr_time_monotonic_to_realtime;
 
/** @name fr_unix_time_t scale conversion macros/functions
 *
 * @{
 */
static inline fr_unix_time_t fr_unix_time_from_integer(bool *overflow, int64_t integer, fr_time_res_t res)
{
        int64_t out;
        if (res == FR_TIME_RES_INVALID) return fr_unix_time_max();
        if (!fr_multiply(&out, integer, fr_time_multiplier_by_res[res])) {
                if (overflow) *overflow = true;
                return fr_unix_time_max();
        }
        if (overflow) *overflow = false;
        return fr_unix_time_wrap(out);
}
 
static inline fr_unix_time_t fr_unix_time_from_nsec(int64_t nsec)
{
        return fr_unix_time_wrap(nsec);
}
 
static inline fr_unix_time_t fr_unix_time_from_usec(int64_t usec)
{
        uint64_t out;
        if (!fr_multiply(&out, usec, (NSEC / USEC))) return (usec > 0) ? fr_unix_time_max() : fr_unix_time_min();
        return fr_unix_time_wrap(out);
}
 
static inline fr_unix_time_t fr_unix_time_from_msec(int64_t msec)
{
        uint64_t out;
        if (!fr_multiply(&out, msec, (NSEC / MSEC))) return (msec > 0) ? fr_unix_time_max() : fr_unix_time_min();
        return fr_unix_time_wrap(out);
}
 
static inline fr_unix_time_t fr_unix_time_from_csec(int64_t csec)
{
        uint64_t out;
        if (!fr_multiply(&out, csec, (NSEC / CSEC))) return (csec > 0) ? fr_unix_time_max() : fr_unix_time_min();
        return fr_unix_time_wrap(out);
}
 
static inline fr_unix_time_t fr_unix_time_from_sec(int64_t sec)
{
        uint64_t out;
        if (!fr_multiply(&out, sec, NSEC)) return (sec > 0) ? fr_unix_time_max() : fr_unix_time_min();
        return fr_unix_time_wrap(out);
}
 
static inline CC_HINT(nonnull) fr_unix_time_t fr_unix_time_from_timeval(struct timeval const *tv)
{
        typeof_field(fr_unix_time_t, value) integer, fraction, out;
 
        if (!fr_multiply(&integer, (typeof_field(fr_unix_time_t, value)) tv->tv_sec, NSEC)) {
        overflow:
                return fr_unix_time_max();
        }
 
        if (!fr_multiply(&fraction,
                         (typeof_field(fr_unix_time_t, value)) tv->tv_usec, (NSEC / USEC))) goto overflow;
 
        if (!fr_add(&out, integer, fraction)) goto overflow;
 
        return fr_unix_time_wrap(out);
}
 
static inline CC_HINT(nonnull) fr_unix_time_t fr_unix_time_from_timespec(struct timespec const *ts)
{
        typeof_field(fr_unix_time_t, value) integer, out;
 
        if (!fr_multiply(&integer, (typeof_field(fr_unix_time_t, value)) ts->tv_sec, NSEC)) {
        overflow:
                return fr_unix_time_max();
        }
        if (!fr_add(&out, integer, ts->tv_nsec)) goto overflow;
 
        return fr_unix_time_wrap(out);
}
 
static inline int64_t fr_unix_time_to_integer(fr_unix_time_t delta, fr_time_res_t res)
{
        return fr_unix_time_unwrap(delta) / fr_time_multiplier_by_res[res];
}
 
static inline int64_t fr_unix_time_to_usec(fr_unix_time_t delta)
{
        return fr_unix_time_unwrap(delta) / (NSEC / USEC);
}
 
static inline int64_t fr_unix_time_to_msec(fr_unix_time_t delta)
{
        return fr_unix_time_unwrap(delta) / (NSEC / MSEC);
}
 
static inline int64_t fr_unix_time_to_csec(fr_unix_time_t delta)
{
        return fr_unix_time_unwrap(delta) / (NSEC / CSEC);
}
 
static inline int64_t fr_unix_time_to_sec(fr_unix_time_t delta)
{
        return (fr_unix_time_unwrap(delta) / NSEC);
}
 
static inline int64_t fr_unix_time_to_min(fr_unix_time_t delta)
{
        return (fr_unix_time_unwrap(delta) / NSEC) / 60;
}
 
static inline int64_t fr_unix_time_to_hour(fr_unix_time_t delta)
{
        return (fr_unix_time_unwrap(delta) / NSEC) / 3600;
}
 
static inline int64_t fr_unix_time_to_day(fr_unix_time_t delta)
{
        return (fr_unix_time_unwrap(delta) / NSEC) / 386400;
}
 
/** Convert a time_t into out internal fr_unix_time_t
 *
 * Our internal unix time representation is unsigned and in nanoseconds which
 * is different from time_t which is signed and has seconds resolution.
 *
 * If time is negative we return 0.
 *
 * @param[in] time to convert.
 * @return Unix time in seconds.
 */
static inline CC_HINT(nonnull) fr_unix_time_t fr_unix_time_from_time(time_t time)
{
        if (time < 0) return fr_unix_time_min();
 
        return fr_unix_time_wrap(time * NSEC);
}
/** @} */
 
/** @name fr_time_delta_t scale conversion macros/functions
 *
 * @{
 */
static inline fr_time_delta_t fr_time_delta_from_integer(bool *overflow, int64_t integer, fr_time_res_t res)
{
        int64_t out;
        if (res == FR_TIME_RES_INVALID) {
                if (overflow) *overflow = true;
                return fr_time_delta_max();
        }
        if (!fr_multiply(&out, integer, fr_time_multiplier_by_res[res])) {
                if (overflow) *overflow = true;
                return fr_time_delta_wrap(integer > 0 ? INT64_MAX: INT64_MIN);
        }
        if (overflow) *overflow = false;
        return fr_time_delta_wrap(out);
}
 
static inline fr_time_delta_t fr_time_delta_from_nsec(int64_t nsec)
{
        return fr_time_delta_wrap(nsec);
}
 
static inline fr_time_delta_t fr_time_delta_from_usec(int64_t usec)
{
        int64_t out;
        if (!fr_multiply(&out, usec, (NSEC / USEC))) return (usec > 0) ? fr_time_delta_max() : fr_time_delta_min();
        return fr_time_delta_wrap(out);
}
 
static inline fr_time_delta_t fr_time_delta_from_msec(int64_t msec)
{
        int64_t out;
        if (!fr_multiply(&out, msec, (NSEC / MSEC))) return (msec > 0) ? fr_time_delta_max() : fr_time_delta_min();
        return fr_time_delta_wrap(out);
}
 
static inline fr_time_delta_t fr_time_delta_from_csec(int64_t csec)
{
        int64_t out;
        if (!fr_multiply(&out, csec, (NSEC / CSEC))) return (csec > 0) ? fr_time_delta_max() : fr_time_delta_min();
        return fr_time_delta_wrap(out);
}
 
/** @hidecallergraph */
static inline fr_time_delta_t fr_time_delta_from_sec(int64_t sec)
{
        int64_t out;
        if (!fr_multiply(&out, sec, NSEC)) return (sec > 0) ? fr_time_delta_max() : fr_time_delta_min();
        return fr_time_delta_wrap(out);
}
 
static inline CC_HINT(nonnull) fr_time_delta_t fr_time_delta_from_timeval(struct timeval const *tv)
{
        typeof_field(fr_time_delta_t, value) integer, fraction, out;
 
        if (!fr_multiply(&integer, (typeof_field(fr_time_delta_t, value)) tv->tv_sec, NSEC)) {
        overflow:
                return fr_time_delta_max();
        }
 
        if (!fr_multiply(&fraction,
                         (typeof_field(fr_time_delta_t, value)) tv->tv_usec, (NSEC / USEC))) goto overflow;
 
        if (!fr_add(&out, integer, fraction)) goto overflow;
 
        return fr_time_delta_wrap(out);
}
 
static inline CC_HINT(nonnull) fr_time_delta_t fr_time_delta_from_timespec(struct timespec const *ts)
{
        typeof_field(fr_time_delta_t, value) integer, out;
 
        if (!fr_multiply(&integer, (typeof_field(fr_time_delta_t, value)) ts->tv_sec, NSEC)) {
        overflow:
                return fr_time_delta_max();
        }
        if (!fr_add(&out, integer, ts->tv_nsec)) goto overflow;
 
        return fr_time_delta_wrap(out);
}
 
static inline int64_t fr_time_delta_to_integer(fr_time_delta_t delta, fr_time_res_t res)
{
        return fr_time_delta_unwrap(delta) / fr_time_multiplier_by_res[res];
}
 
static inline int64_t fr_time_delta_to_usec(fr_time_delta_t delta)
{
        return fr_time_delta_unwrap(delta) / (NSEC / USEC);
}
 
static inline int64_t fr_time_delta_to_msec(fr_time_delta_t delta)
{
        return fr_time_delta_unwrap(delta) / (NSEC / MSEC);
}
 
static inline int64_t fr_time_delta_to_csec(fr_time_delta_t delta)
{
        return fr_time_delta_unwrap(delta) / (NSEC / CSEC);
}
 
static inline int64_t fr_time_delta_to_sec(fr_time_delta_t delta)
{
        return (fr_time_delta_unwrap(delta) / NSEC);
}
 
/** Convert a delta to a timeval
 *
 * @param[in] _delta    in nanoseconds.
 */
#define fr_time_delta_to_timeval(_delta) \
(struct timeval){ \
        .tv_sec = fr_time_delta_unwrap(_delta) / NSEC, \
        .tv_usec = (fr_time_delta_unwrap(_delta) % NSEC) / (NSEC / USEC) \
}
 
/** Convert a delta to a timespec
 *
 * @param[in] _delta    in nanoseconds.
 */
#define fr_time_delta_to_timespec(_delta)\
(struct timespec){ \
        .tv_sec = fr_time_delta_unwrap(_delta) / NSEC, \
        .tv_nsec = (fr_time_delta_unwrap(_delta) % NSEC) \
}
/** @} */
 
/** @name fr_time_delta_t scale conversion macros/functions
 *
 * @{
 */
/** Return the current value of fr_time_monotonic_to_realtime.
 *
 */
static inline int64_t fr_time_offset_to_realtime(void)
{
        return atomic_load_explicit(&fr_time_monotonic_to_realtime, memory_order_consume);
}
 
/** Convert an fr_time_t (internal time) to our version of unix time (wallclock time)
 *
 */
static inline fr_unix_time_t fr_time_to_unix_time(fr_time_t when)
{
        int64_t out;
 
        if (!fr_add(&out, fr_time_unwrap(when), fr_time_offset_to_realtime())) {
                return fr_time_unwrap(when) ? fr_unix_time_max() : fr_unix_time_min();
        }
        return fr_unix_time_wrap(out);
}
 
/** Convert an fr_time_t (internal time) to number of usec since the unix epoch (wallclock time)
 *
 */
static inline int64_t fr_time_to_usec(fr_time_t when)
{
        /* Divide each operand separately to avoid overflow on addition */
        return (((fr_time_unwrap(when) / (NSEC / USEC)) +
                (fr_time_offset_to_realtime() / (NSEC / USEC))));
}
 
/** Convert an fr_time_t (internal time) to number of msec since the unix epoch (wallclock time)
 *
 */
static inline int64_t fr_time_to_msec(fr_time_t when)
{
        /* Divide each operand separately to avoid overflow on addition */
        return (((fr_time_unwrap(when) / (NSEC / MSEC)) +
                (fr_time_offset_to_realtime() / (NSEC / MSEC))));
}
 
/** Convert an fr_time_t (internal time) to number of csec since the unix epoch (wallclock time)
 *
 */
static inline int64_t fr_time_to_csec(fr_time_t when)
{
        /* Divide each operand separately to avoid overflow on addition */
        return (((fr_time_unwrap(when) / (NSEC / CSEC)) +
                (fr_time_offset_to_realtime() / (NSEC / CSEC))));
}
 
/** Convert an fr_time_t (internal time) to number of sec since the unix epoch (wallclock time)
 *
 */
static inline int64_t fr_time_to_sec(fr_time_t when)
{
        /* Divide each operand separately to avoid overflow on addition */
        return (((fr_time_unwrap(when) / NSEC) +
                (fr_time_offset_to_realtime() / NSEC)));
}
 
/** Convert server epoch time to unix epoch time
 *
 * @param[in] _when     The server epoch time to convert.
 */
#define fr_time_to_timeval(_when) fr_time_delta_to_timeval(fr_time_delta_wrap(fr_time_offset_to_realtime() + fr_time_unwrap(_when)))
 
/** Convert server epoch time to unix epoch time
 *
 * @param[in] _when     The server epoch time to convert.
 */
#define fr_time_to_timespec(_when) fr_time_delta_to_timespec(fr_time_delta_wrap(fr_time_offset_to_realtime() + fr_time_unwrap(_when)))
 
/** Convert wallclock time to a fr_time_t (internal time)
 *
 * @param[out] overflow Whether the conversion overflowed.
 * @param[in] when      The timestamp to convert.
 * @param[in] res       The scale the integer value is in.
 * @return
 *      - >0 number of nanoseconds since the server started.
 *      - 0 when the server started.
 *      - <0 number of nanoseconds before the server started.
 */
static inline fr_time_t fr_time_from_integer(bool *overflow, int64_t when, fr_time_res_t res)
{
        typeof_field(fr_time_t, value) out;
 
        if (!fr_multiply(&out, when, fr_time_multiplier_by_res[res])) {
                if (overflow) *overflow = true;
                return when > 0 ? fr_time_max() : fr_time_min();
        }
 
        if (!fr_sub(&out, out, fr_time_offset_to_realtime())) {
                if (overflow) *overflow = true;
                return when < 0 ? fr_time_max() : fr_time_min();
        }
 
        if (overflow) *overflow = false;
        return fr_time_wrap(out);
}
 
/** Convert a nsec (wallclock time) to a fr_time_t (internal time)
 *
 * @param[in] when      The timestamp to convert.
 * @return
 *      - >0 number of nanoseconds since the server started.
 *      - 0 when the server started.
 *      - <0 number of nanoseconds before the server started.
 */
static inline fr_time_t fr_time_from_nsec(int64_t when)
{
        typeof_field(fr_time_t, value) out = fr_time_delta_unwrap(fr_time_delta_from_nsec(when));
 
        if (!fr_sub(&out, out, fr_time_offset_to_realtime())) {
                return when > 0 ? fr_time_min() : fr_time_max();
        }
        return fr_time_wrap(out);
}
 
/** Convert usec (wallclock time) to a fr_time_t (internal time)
 *
 * @param[in] when      The timestamp to convert.
 * @return
 *      - >0 number of nanoseconds since the server started.
 *      - 0 when the server started.
 *      - <0 number of nanoseconds before the server started.
 */
static inline fr_time_t fr_time_from_usec(int64_t when)
{
        typeof_field(fr_time_t, value) out = fr_time_delta_unwrap(fr_time_delta_from_usec(when));
 
        if (!fr_sub(&out, out, fr_time_offset_to_realtime())) {
                return when > 0 ? fr_time_min() : fr_time_max();
        }
        return fr_time_wrap(out);
}
 
/** Convert msec (wallclock time) to a fr_time_t (internal time)
 *
 * @param[in] when      The timestamp to convert.
 * @return
 *      - >0 number of nanoseconds since the server started.
 *      - 0 when the server started.
 *      - <0 number of nanoseconds before the server started.
 */
static inline fr_time_t fr_time_from_msec(int64_t when)
{
        typeof_field(fr_time_t, value) out = fr_time_delta_unwrap(fr_time_delta_from_msec(when));
 
        if (!fr_sub(&out, out, fr_time_offset_to_realtime())) {
                return when > 0 ? fr_time_min() : fr_time_max();
        }
        return fr_time_wrap(out);
}
 
/** Convert csec (wallclock time) to a fr_time_t (internal time)
 *
 * @param[in] when      The timestamp to convert.
 * @return
 *      - >0 number of nanoseconds since the server started.
 *      - 0 when the server started.
 *      - <0 number of nanoseconds before the server started.
 */
static inline fr_time_t fr_time_from_csec(int64_t when)
{
        typeof_field(fr_time_t, value) out = fr_time_delta_unwrap(fr_time_delta_from_csec(when));
 
        if (!fr_sub(&out, out, fr_time_offset_to_realtime())) {
                return when > 0 ? fr_time_min() : fr_time_max();
        }
        return fr_time_wrap(out);
}
 
/** Convert a time_t (wallclock time) to a fr_time_t (internal time)
 *
 * @param[in] when      The timestamp to convert.
 * @return
 *      - >0 number of nanoseconds since the server started.
 *      - 0 when the server started.
 *      - <0 number of nanoseconds before the server started.
 */
static inline fr_time_t fr_time_from_sec(time_t when)
{
        typeof_field(fr_time_t, value) out = fr_time_delta_unwrap(fr_time_delta_from_sec(when));
 
        if (!fr_sub(&out, out, fr_time_offset_to_realtime())) {
                return when > 0 ? fr_time_min() : fr_time_max();
        }
        return fr_time_wrap(out);
}
 
 
 
/** Convert a timespec (wallclock time) to a fr_time_t (internal time)
 *
 * @param[in] when_ts   The timestamp to convert.
 * @return
 *      - >0 number of nanoseconds since the server started.
 *      - 0 when the server started.
 *      - 0 if when_tv occurred before the server started.
 */
static inline CC_HINT(nonnull) fr_time_t fr_time_from_timespec(struct timespec const *when_ts)
{
        typeof_field(fr_time_t, value) tmp = fr_time_delta_unwrap(fr_time_delta_from_timespec(when_ts)), out;
 
        if (!fr_sub(&out, tmp, fr_time_offset_to_realtime())) {
                return tmp > 0 ? fr_time_min() : fr_time_max();
        }
        return fr_time_wrap(out);
}
 
/** Convert a timeval (wallclock time) to a fr_time_t (internal time)
 *
 * @param[in] when_tv   The timestamp to convert.
 * @return
 *      - >0 number of nanoseconds since the server started.
 *      - 0 when the server started.
 *      - <0 number of nanoseconds before the server started.
 */
static inline CC_HINT(nonnull) fr_time_t fr_time_from_timeval(struct timeval const *when_tv)
{
        typeof_field(fr_time_t, value) tmp = fr_time_delta_unwrap(fr_time_delta_from_timeval(when_tv)), out;
 
        if (!fr_sub(&out, tmp, fr_time_offset_to_realtime())) {
                return tmp > 0 ? fr_time_min() : fr_time_max();
        }
        return fr_time_wrap(out);
}
/** @} */
 
/** Compare two fr_time_t values
 *
 * @param[in] a The first value to compare.
 * @param[in] b The second value to compare.
 * @return
 *      - +1 if a > b
 *      - 0 if a == b
 *      - -1 if a < b
 */
static inline int8_t fr_time_cmp(fr_time_t a, fr_time_t b)
{
        return CMP(fr_time_unwrap(a), fr_time_unwrap(b));
}
 
/** Compare two fr_time_delta_t values
 *
 * @param[in] a The first value to compare.
 * @param[in] b The second value to compare.
 * @return
 *      - +1 if a > b
 *      - 0 if a == b
 *      - -1 if a < b
 */
static inline int8_t fr_time_delta_cmp(fr_time_delta_t a, fr_time_delta_t b)
{
        return CMP(fr_time_delta_unwrap(a), fr_time_delta_unwrap(b));
}
 
/** Compare two fr_unix_time_t values
 *
 * @param[in] a The first value to compare.
 * @param[in] b The second value to compare.
 * @return
 *      - +1 if a > b
 *      - 0 if a == b
 *      - -1 if a < b
 */
static inline int8_t fr_unix_time_cmp(fr_unix_time_t a, fr_unix_time_t b)
{
        return CMP(fr_unix_time_unwrap(a), fr_unix_time_unwrap(b));
}
 
#ifndef CLOCK_MONOTONIC_RAW
#define CLOCK_MONOTONIC_RAW CLOCK_MONOTONIC
#endif
 
/** Return a relative time since the server fr_time_epoch
 *
 *  This time is useful for doing time comparisons, deltas, etc.
 *  Human (i.e. printable) time is something else.
 *
 * @returns fr_time_t time in nanoseconds since the server fr_time_epoch.
 *
 * @hidecallergraph
 */
static inline fr_time_t fr_time(void)
{
        struct timespec ts;
        (void) clock_gettime(CLOCK_MONOTONIC_RAW, &ts);
        return fr_time_wrap(fr_time_delta_unwrap(fr_time_delta_from_timespec(&ts)) - fr_time_epoch);
}
 
int             fr_time_start(void);
int             fr_time_sync(void);
 
int64_t         fr_time_scale(int64_t t, fr_time_res_t hint);
 
int             fr_time_delta_from_time_zone(char const *tz, fr_time_delta_t *delta)
                CC_HINT(nonnull);
 
fr_slen_t       fr_time_delta_from_substr(fr_time_delta_t *out, fr_sbuff_t *in, fr_time_res_t hint,
                                          bool no_trailing, fr_sbuff_term_t const *tt)
                CC_HINT(nonnull(1,2));
 
fr_slen_t       fr_time_delta_from_str(fr_time_delta_t *out, char const *in, size_t inlen, fr_time_res_t hint)
                CC_HINT(nonnull);
 
fr_slen_t       fr_time_delta_to_str(fr_sbuff_t *out, fr_time_delta_t delta, fr_time_res_t res, bool is_unsigned)
                CC_HINT(nonnull);
 
size_t          fr_time_strftime_local(fr_sbuff_t *out, fr_time_t time, char const *fmt)
                CC_HINT(format(strftime, 3, 0));
 
size_t          fr_time_strftime_utc(fr_sbuff_t *out, fr_time_t time, char const *fmt)
                CC_HINT(format(strftime, 3, 0));
 
void            fr_time_elapsed_update(fr_time_elapsed_t *elapsed, fr_time_t start, fr_time_t end)
                CC_HINT(nonnull);
 
void            fr_time_elapsed_fprint(FILE *fp, fr_time_elapsed_t const *elapsed, char const *prefix, int tabs)
                CC_HINT(nonnull(1,2));
 
fr_unix_time_t  fr_unix_time_from_tm(struct tm *tm)
                CC_HINT(nonnull);
 
int             fr_unix_time_from_str(fr_unix_time_t *date, char const *date_str, fr_time_res_t hint)
                CC_HINT(nonnull);
 
fr_slen_t       fr_unix_time_to_str(fr_sbuff_t *out, fr_unix_time_t time, fr_time_res_t res, bool utc)
                CC_HINT(nonnull);
 
fr_time_delta_t fr_time_gmtoff(void);
 
bool            fr_time_is_dst(void);
 
#ifdef __cplusplus
}
#endif