/*      $OpenBSD: vnode.c,v 1.3 2020/12/03 19:16:57 anton Exp $ */

/*
 * Copyright (c) 2020 Anton Lindqvist <anton@openbsd.org>
 *
 * Permission to use, copy, modify, and distribute this software for any
 * purpose with or without fee is hereby granted, provided that the above
 * copyright notice and this permission notice appear in all copies.
 *
 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 */

#include <err.h>
#include <errno.h>
#include <signal.h>
#include <stdarg.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>

#include "extern.h"

static void sighandler(int);
static void __dead usage(void);

int loglevel = 0;

static int gotsig;

int
main(int argc, char *argv[])
{
        struct {
                const char *t_name;
                int (*t_func)(struct context *);
        } tests[] = {
                { "deadlock",   test_deadlock },

                { NULL, NULL },
        };
        struct context ctx;
        int ch, i;

        memset(&ctx, 0, sizeof(ctx));
        ctx.c_iterations = 100;

        while ((ch = getopt(argc, argv, "If:v")) != -1) {
                switch (ch) {
                case 'I':
                        ctx.c_iterations = -1;
                        break;
                case 'f':
                        ctx.c_path = optarg;
                        break;
                case 'v':
                        loglevel++;
                        break;
                default:
                        usage();
                }
        }
        argc -= optind;
        argv += optind;
        if (argc != 1 || ctx.c_path == NULL)
                usage();

        if (signal(SIGINT, sighandler) == SIG_ERR)
                err(1, "signal");

        for (i = 0;; i++) {
                if (tests[i].t_name == NULL)
                        err(1, "%s: no such test", *argv);

                if (strcmp(tests[i].t_name, *argv))
                        continue;

                return tests[i].t_func(&ctx);
        }

        return 0;
}

int
ctx_abort(struct context *ctx)
{
        if (gotsig)
                return 1;
        if (ctx->c_iterations > 0 && --ctx->c_iterations == 0)
                return 1;
        return 0;
}

void
logit(const char *fmt, ...)
{
        char buf[1024];
        va_list ap;
        char *p = buf;
        ssize_t siz = sizeof(buf);
        int n;

        n = snprintf(p, siz, "[%d] ", getpid());
        if (n < 0 || n >= siz)
                errc(1, ENAMETOOLONG, "%s", __func__);
        p += n;
        siz -= n;

        va_start(ap, fmt);
        n = vsnprintf(p, siz, fmt, ap);
        va_end(ap);
        if (n < 0 || n >= siz)
                errc(1, ENAMETOOLONG, "%s", __func__);
        p += n;
        siz -= n;

        fprintf(stderr, "%s\n", buf);
}

static void
sighandler(int signo)
{
        gotsig = signo;
}

static void __dead
usage(void)
{
        fprintf(stderr, "usage: vnode [-Iv] -f path test-case\n");
        exit(1);
}