/*
 * This file and its contents are supplied under the terms of the
 * Common Development and Distribution License ("CDDL"), version 1.0.
 * You may only use this file in accordance with the terms of version
 * 1.0 of the CDDL.
 *
 * A full copy of the text of the CDDL should have accompanied this
 * source.  A copy of the CDDL is also available via the Internet at
 * http://www.illumos.org/license/CDDL.
 */

/*
 * Copyright 2022 Oxide Computer Company
 */

#include <stdio.h>
#include <unistd.h>
#include <stdlib.h>
#include <fcntl.h>
#include <libgen.h>
#include <errno.h>
#include <err.h>
#include <assert.h>

#include <sys/vmm.h>
#include <sys/vmm_dev.h>
#include <sys/vmm_drv_test.h>
#include <vmmapi.h>

#include "common.h"


int
main(int argc, char *argv[])
{
        const char *suite_name = basename(argv[0]);
        struct vmctx *ctx;

        ctx = create_test_vm(suite_name);
        if (ctx == NULL) {
                errx(EXIT_FAILURE, "could open test VM");
        }

        /*
         * It would be odd if we had the freshly created VM instance, but it did
         * not appear to exist.
         */
        assert(check_instance_usable(suite_name));

        /* Make sure that auto-destruct is off */
        if (ioctl(vm_get_device_fd(ctx), VM_SET_AUTODESTRUCT, 0) != 0) {
                errx(EXIT_FAILURE, "could not disable auto-destruct");
        }

        vm_close(ctx);
        if (!check_instance_usable(suite_name)) {
                err(EXIT_FAILURE, "instance missing after close");
        }
        ctx = NULL;

        if (destroy_instance(suite_name) != 0) {
                errx(EXIT_FAILURE, "could not clean up instance");
        }

        /* Now repeat that process, but enable auto-destruct */
        ctx = create_test_vm(suite_name);
        if (ctx == NULL) {
                errx(EXIT_FAILURE, "could open test VM");
        }
        if (ioctl(vm_get_device_fd(ctx), VM_SET_AUTODESTRUCT, 1) != 0) {
                errx(EXIT_FAILURE, "could not enable auto-destruct");
        }
        vm_close(ctx);
        ctx = NULL;
        /* At this point, the instance should be gone */
        if (check_instance_usable(suite_name)) {
                err(EXIT_FAILURE,
                    "instance did not auto-destruct as expected");
        }

        /*
         * Repeat the test again, but establish a vmm_drv hold first.
         * The instance should auto-destruct when the hold is released.
         */
        ctx = create_test_vm(suite_name);
        if (ctx == NULL) {
                errx(EXIT_FAILURE, "could open test VM");
        }
        if (ioctl(vm_get_device_fd(ctx), VM_SET_AUTODESTRUCT, 1) != 0) {
                errx(EXIT_FAILURE, "could not enable auto-destruct");
        }
        int vdtfd = open_drv_test();
        if (vdtfd < 0) {
                errx(EXIT_FAILURE, "could open drv_test device");
        }
        if (ioctl(vdtfd, VDT_IOC_HOLD, vm_get_device_fd(ctx)) != 0) {
                errx(EXIT_FAILURE, "could not hold VM from vmm_drv device");
        }
        vm_close(ctx);
        ctx = NULL;

        /*
         * With the vmm_drv hold remaining on the instance, we expect it to
         * exist, but not be usable (due to in-progress destroy).
         */
        if (!check_instance_exists(suite_name)) {
                err(EXIT_FAILURE, "instance completed auto-destruct despite "
                    "existing vmm_drv hold");
        }
        if (check_instance_usable(suite_name)) {
                err(EXIT_FAILURE, "instance still usable despite close() after "
                    "auto-destroy configured");
        }

        if (ioctl(vdtfd, VDT_IOC_RELE, 0) != 0) {
                errx(EXIT_FAILURE, "could not release VM from vmm_drv device");
        }
        if (check_instance_usable(suite_name)) {
                err(EXIT_FAILURE, "instance did not complete destruction "
                    "after vmm_drv release");
        }

        (void) printf("%s\tPASS\n", suite_name);
        return (EXIT_SUCCESS);
}