/* SPDX-License-Identifier: GPL-2.0 */
/*
 * Copyright (c) 2025 Meta Platforms, Inc. and affiliates.
 * Copyright (c) 2025 Tejun Heo <tj@kernel.org>
 */
#include <stdio.h>
#include <unistd.h>
#include <signal.h>
#include <assert.h>
#include <libgen.h>
#include <bpf/bpf.h>
#include <scx/common.h>
#include "scx_cpu0.bpf.skel.h"

const char help_fmt[] =
"A cpu0 sched_ext scheduler.\n"
"\n"
"See the top-level comment in .bpf.c for more details.\n"
"\n"
"Usage: %s [-v]\n"
"\n"
"  -v            Print libbpf debug messages\n"
"  -h            Display this help and exit\n";

static bool verbose;
static volatile int exit_req;

static int libbpf_print_fn(enum libbpf_print_level level, const char *format, va_list args)
{
        if (level == LIBBPF_DEBUG && !verbose)
                return 0;
        return vfprintf(stderr, format, args);
}

static void sigint_handler(int sig)
{
        exit_req = 1;
}

static void read_stats(struct scx_cpu0 *skel, __u64 *stats)
{
        int nr_cpus = libbpf_num_possible_cpus();
        assert(nr_cpus > 0);
        __u64 cnts[2][nr_cpus];
        __u32 idx;

        memset(stats, 0, sizeof(stats[0]) * 2);

        for (idx = 0; idx < 2; idx++) {
                int ret, cpu;

                ret = bpf_map_lookup_elem(bpf_map__fd(skel->maps.stats),
                                          &idx, cnts[idx]);
                if (ret < 0)
                        continue;
                for (cpu = 0; cpu < nr_cpus; cpu++)
                        stats[idx] += cnts[idx][cpu];
        }
}

int main(int argc, char **argv)
{
        struct scx_cpu0 *skel;
        struct bpf_link *link;
        __u32 opt;
        __u64 ecode;

        libbpf_set_print(libbpf_print_fn);
        signal(SIGINT, sigint_handler);
        signal(SIGTERM, sigint_handler);
restart:
        optind = 1;
        skel = SCX_OPS_OPEN(cpu0_ops, scx_cpu0);

        skel->rodata->nr_cpus = libbpf_num_possible_cpus();

        while ((opt = getopt(argc, argv, "vh")) != -1) {
                switch (opt) {
                case 'v':
                        verbose = true;
                        break;
                default:
                        fprintf(stderr, help_fmt, basename(argv[0]));
                        return opt != 'h';
                }
        }

        SCX_OPS_LOAD(skel, cpu0_ops, scx_cpu0, uei);
        link = SCX_OPS_ATTACH(skel, cpu0_ops, scx_cpu0);

        while (!exit_req && !UEI_EXITED(skel, uei)) {
                __u64 stats[2];

                read_stats(skel, stats);
                printf("local=%llu cpu0=%llu\n", stats[0], stats[1]);
                fflush(stdout);
                sleep(1);
        }

        bpf_link__destroy(link);
        ecode = UEI_REPORT(skel, uei);
        scx_cpu0__destroy(skel);

        if (UEI_ECODE_RESTART(ecode))
                goto restart;
        return 0;
}