/* SPDX-License-Identifier: LGPL-2.1-or-later */

#include <stdlib.h>
#include <unistd.h>

#include "alloc-util.h"
#include "string-util.h"
#include "tests.h"
#include "time-util.h"

static void test_should_pass(const char *p) {
        usec_t t, q;
        char buf[FORMAT_TIMESTAMP_MAX], buf_relative[FORMAT_TIMESTAMP_RELATIVE_MAX];

        log_info("Test: %s", p);
        ASSERT_OK(parse_timestamp(p, &t));
        ASSERT_NOT_NULL(format_timestamp_style(buf, sizeof(buf), t, TIMESTAMP_US));
        log_info("\"%s\" → \"%s\"", p, buf);

        ASSERT_OK(parse_timestamp(buf, &q));
        if (q != t)
                log_error("round-trip failed: \"%s\" → \"%s\"",
                          buf, FORMAT_TIMESTAMP_STYLE(q, TIMESTAMP_US));
        ASSERT_EQ(q, t);

        ASSERT_NOT_NULL(format_timestamp_relative(buf_relative, sizeof(buf_relative), t));
        log_info("%s", strna(buf_relative));
}

static void test_should_parse(const char *p) {
        usec_t t;

        log_info("Test: %s", p);
        ASSERT_OK(parse_timestamp(p, &t));
        log_info("\"%s\" → \"@%" PRI_USEC "\"", p, t);
}

static void test_should_fail(const char *p) {
        usec_t t;
        int r;

        log_info("Test: %s", p);
        r = parse_timestamp(p, &t);
        if (r >= 0)
                log_info("\"%s\" → \"@%" PRI_USEC "\" (unexpected)", p, t);
        else
                log_info("parse_timestamp() returns %d (expected)", r);
        ASSERT_LT(r, 0);
}

static void test_one(const char *p) {
        _cleanup_free_ char *with_utc = NULL;

        with_utc = strjoin(p, " UTC");
        test_should_pass(p);
        test_should_pass(with_utc);
}

static void test_one_noutc(const char *p) {
        _cleanup_free_ char *with_utc = NULL;

        with_utc = strjoin(p, " UTC");
        test_should_pass(p);
        test_should_fail(with_utc);
}

int main(int argc, char *argv[]) {
        /* Tests have hard-coded results that do not expect a specific timezone to be set by the caller */
        ASSERT_OK_ERRNO(unsetenv("TZ"));

        test_setup_logging(LOG_DEBUG);

        test_one("17:41");
        test_one("18:42:44");
        test_one("18:42:44.0");
        test_one("18:42:44.999999999999");
        test_one("12-10-02 12:13:14");
        test_one("12-10-2 12:13:14");
        test_one("12-10-03 12:13");
        test_one("2012-12-30 18:42");
        test_one("2012-10-02");
        test_one("Mar 12 12:01:01");
        test_one("Mar 12 12:01:01.687197");
        test_one("Tue 2012-10-02");
        test_one("yesterday");
        test_one("today");
        test_one("tomorrow");
        test_one_noutc("16:20 UTC");
        if (access("/usr/share/zoneinfo/Asia/Seoul", F_OK) >= 0) {
                test_one_noutc("16:20 Asia/Seoul");
                test_one_noutc("tomorrow Asia/Seoul");
                test_one_noutc("2012-12-30 18:42 Asia/Seoul");
        }
        test_one_noutc("now");
        test_one_noutc("+2d");
        test_one_noutc("+2y 4d");
        test_one_noutc("5months ago");
        test_one_noutc("@1395716396");
        test_should_parse("1970-1-1 UTC");
        test_should_pass("1970-1-1 00:00:01 UTC");
        test_should_fail("1969-12-31 UTC");
        test_should_fail("-1000y");
        test_should_fail("today UTC UTC");
        if (access("/usr/share/zoneinfo/Asia/Seoul", F_OK) >= 0) {
                test_should_fail("now Asia/Seoul");
                test_should_fail("+2d Asia/Seoul");
                test_should_fail("@1395716396 Asia/Seoul");
        }
#if SIZEOF_TIME_T == 8
        test_should_pass("9999-12-30 23:59:59 UTC");
        test_should_fail("9999-12-31 00:00:00 UTC");
        test_should_fail("10000-01-01 00:00:00 UTC");
#elif SIZEOF_TIME_T == 4
        test_should_pass("2038-01-18 03:14:07 UTC");
        test_should_fail("2038-01-18 03:14:08 UTC");
#endif

        return 0;
}
