// SPDX-License-Identifier: GPL-2.0
/* Copyright (C) 2022 Linutronix GmbH */

#include <test_progs.h>
#include <network_helpers.h>

#include "test_time_tai.skel.h"

#include <time.h>
#include <stdint.h>

#define TAI_THRESHOLD 1000000000ULL /* 1s */
#define NSEC_PER_SEC 1000000000ULL

static __u64 ts_to_ns(const struct timespec *ts)
{
 return ts->tv_sec * NSEC_PER_SEC + ts->tv_nsec;
}

void test_time_tai(void)
{
 struct __sk_buff skb = {
  .cb[0] = 0,
  .cb[1] = 0,
  .tstamp = 0,
 };
 LIBBPF_OPTS(bpf_test_run_opts, topts,
  .data_in = &pkt_v4,
  .data_size_in = sizeof(pkt_v4),
  .ctx_in = &skb,
  .ctx_size_in = sizeof(skb),
  .ctx_out = &skb,
  .ctx_size_out = sizeof(skb),
 );
 struct test_time_tai *skel;
 struct timespec now_tai;
 __u64 ts1, ts2, now;
 int ret, prog_fd;

 /* Open and load */
 skel = test_time_tai__open_and_load();
 if (!ASSERT_OK_PTR(skel, "tai_open"))
  return;

 /* Run test program */
 prog_fd = bpf_program__fd(skel->progs.time_tai);
 ret = bpf_prog_test_run_opts(prog_fd, &topts);
 ASSERT_OK(ret, "test_run");

 /* Retrieve generated TAI timestamps */
 ts1 = skb.tstamp;
 ts2 = skb.cb[0] | ((__u64)skb.cb[1] << 32);

 /* TAI != 0 */
 ASSERT_NEQ(ts1, 0, "tai_ts1");
 ASSERT_NEQ(ts2, 0, "tai_ts2");

 /* TAI is moving forward only */
 ASSERT_GE(ts2, ts1, "tai_forward");

 /* Check for future */
 ret = clock_gettime(CLOCK_TAI, &now_tai);
 ASSERT_EQ(ret, 0, "tai_gettime");
 now = ts_to_ns(&now_tai);

 ASSERT_TRUE(now > ts1, "tai_future_ts1");
 ASSERT_TRUE(now > ts2, "tai_future_ts2");

 /* Check for reasonable range */
 ASSERT_TRUE(now - ts1 < TAI_THRESHOLD, "tai_range_ts1");
 ASSERT_TRUE(now - ts2 < TAI_THRESHOLD, "tai_range_ts2");

 test_time_tai__destroy(skel);
}