// SPDX-License-Identifier: GPL-2.0
/* Copyright (c) 2021 Facebook */
#include <test_progs.h>
#include "timer_mim.skel.h"
#include "timer_mim_reject.skel.h"

static int timer_mim(struct timer_mim *timer_skel)
{
        __u64 cnt1, cnt2;
        int err, prog_fd, key1 = 1;
        LIBBPF_OPTS(bpf_test_run_opts, topts);

        err = timer_mim__attach(timer_skel);
        if (!ASSERT_OK(err, "timer_attach"))
                return err;

        prog_fd = bpf_program__fd(timer_skel->progs.test1);
        err = bpf_prog_test_run_opts(prog_fd, &topts);
        ASSERT_OK(err, "test_run");
        ASSERT_EQ(topts.retval, 0, "test_run");
        timer_mim__detach(timer_skel);

        /* check that timer_cb[12] are incrementing 'cnt' */
        cnt1 = READ_ONCE(timer_skel->bss->cnt);
        for (int i = 0; i < 100; i++) {
                cnt2 = READ_ONCE(timer_skel->bss->cnt);
                if (cnt2 != cnt1)
                        break;
                usleep(200); /* 100 times more than interval */
        }
        ASSERT_GT(cnt2, cnt1, "cnt");

        ASSERT_EQ(timer_skel->bss->err, 0, "err");
        /* check that code paths completed */
        ASSERT_EQ(timer_skel->bss->ok, 1 | 2, "ok");

        close(bpf_map__fd(timer_skel->maps.inner_htab));
        err = bpf_map__delete_elem(timer_skel->maps.outer_arr, &key1, sizeof(key1), 0);
        ASSERT_EQ(err, 0, "delete inner map");

        /* check that timer_cb[12] are no longer running */
        cnt1 = READ_ONCE(timer_skel->bss->cnt);
        for (int i = 0; i < 100; i++) {
                usleep(200); /* 100 times more than interval */
                cnt2 = READ_ONCE(timer_skel->bss->cnt);
                if (cnt2 == cnt1)
                        break;
        }
        ASSERT_EQ(cnt2, cnt1, "cnt");

        return 0;
}

void serial_test_timer_mim(void)
{
        struct timer_mim_reject *timer_reject_skel = NULL;
        libbpf_print_fn_t old_print_fn = NULL;
        struct timer_mim *timer_skel = NULL;
        int err;

        old_print_fn = libbpf_set_print(NULL);
        timer_reject_skel = timer_mim_reject__open_and_load();
        libbpf_set_print(old_print_fn);
        if (!ASSERT_ERR_PTR(timer_reject_skel, "timer_reject_skel_load"))
                goto cleanup;

        timer_skel = timer_mim__open_and_load();
        if (!timer_skel && errno == EOPNOTSUPP) {
                test__skip();
                return;
        }
        if (!ASSERT_OK_PTR(timer_skel, "timer_skel_load"))
                goto cleanup;

        err = timer_mim(timer_skel);
        ASSERT_OK(err, "timer_mim");
cleanup:
        timer_mim__destroy(timer_skel);
        timer_mim_reject__destroy(timer_reject_skel);
}