/*
 * 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 <port.h>
#include <err.h>
#include <assert.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <sys/param.h>
#include <sys/poll.h>
#include <stdbool.h>

static bool
has_event(int pfd)
{
        port_event_t ev = { 0 };
        timespec_t ts = { 0 };

        /* Because of illumos 14912, more care needs to be taken here */
        int res = port_get(pfd, &ev, &ts);
        if (res != 0 || ev.portev_source == 0) {
                return (false);
        } else {
                return (true);
        }
}

int
main(int argc, char *argv[])
{
        int res;
        int pipes[2];

        res = pipe2(pipes, 0);
        assert(res == 0);

        int pfd = port_create();
        assert(pfd >= 0);

        res = port_associate(pfd, PORT_SOURCE_FD, (uintptr_t)pipes[1], POLLIN,
            NULL);
        assert(res == 0);

        if (has_event(pfd)) {
                errx(EXIT_FAILURE, "FAIL - unexpected early event");
        }

        char port_path[MAXPATHLEN];
        (void) sprintf(port_path, "/proc/%d/fd/%d", getpid(), pfd);

        /* incur the procfs FDINFO access */
        struct stat sbuf;
        res = lstat(port_path, &sbuf);
        assert(res == 0);

        /* write a byte to wake up the pipe */
        (void) write(pipes[0], port_path, 1);

        /*
         * Check to see that the FDINFO access did not detach our registration
         * for the event port.
         */
        if (!has_event(pfd)) {
                errx(EXIT_FAILURE, "FAIL - no event found");
        }

        (void) printf("PASS\n");
        return (EXIT_SUCCESS);
}