/*      $NetBSD: t_ptrace_fork_wait.h,v 1.8 2025/05/02 02:24:32 riastradh Exp $ */

/*-
 * Copyright (c) 2016, 2017, 2018, 2020 The NetBSD Foundation, Inc.
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 *
 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
 * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
 * POSSIBILITY OF SUCH DAMAGE.
 */

static void
fork_body(const char *fn, bool trackspawn, bool trackfork, bool trackvfork,
    bool trackvforkdone, bool newpgrp)
{
        const int exitval = 5;
        const int exitval2 = 0; /* This matched exit status from /bin/echo */
        const int sigval = SIGSTOP;
        pid_t child, child2 = 0, wpid;
#if defined(TWAIT_HAVE_STATUS)
        int status;
#endif
        sigset_t set;
        ptrace_state_t state;
        const int slen = sizeof(state);
        ptrace_event_t event;
        const int elen = sizeof(event);

        char * const arg[] = { __UNCONST("/bin/echo"), NULL };

        if (newpgrp)
                atf_tc_skip("kernel panic (pg_jobc going negative)");

        DPRINTF("Before forking process PID=%d\n", getpid());
        SYSCALL_REQUIRE((child = fork()) != -1);
        if (child == 0) {
                if (newpgrp) {
                        DPRINTF("Before entering new process group");
                        setpgid(0, 0);
                }

                DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
                FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);

                DPRINTF("Before raising %s from child\n", strsignal(sigval));
                FORKEE_ASSERT(raise(sigval) == 0);

                if (strcmp(fn, "spawn") == 0) {
                        FORKEE_ASSERT_EQ(posix_spawn(&child2,
                            arg[0], NULL, NULL, arg, NULL), 0);
                } else {
                        if (strcmp(fn, "fork") == 0) {
                                FORKEE_ASSERT((child2 = fork()) != -1);
                        } else if (strcmp(fn, "vfork") == 0) {
                                FORKEE_ASSERT((child2 = vfork()) != -1);
                        }

                        if (child2 == 0)
                                _exit(exitval2);
                }
                FORKEE_REQUIRE_SUCCESS
                    (wpid = TWAIT_GENERIC(child2, &status, 0), child2);

                forkee_status_exited(status, exitval2);

                DPRINTF("Before exiting of the child process\n");
                _exit(exitval);
        }
        DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);

        DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
        TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);

        validate_status_stopped(status, sigval);

        DPRINTF("Set 0%s%s%s%s in EVENT_MASK for the child %d\n",
            trackspawn ? "|PTRACE_POSIX_SPAWN" : "",
            trackfork ? "|PTRACE_FORK" : "",
            trackvfork ? "|PTRACE_VFORK" : "",
            trackvforkdone ? "|PTRACE_VFORK_DONE" : "", child);
        event.pe_set_event = 0;
        if (trackspawn)
                event.pe_set_event |= PTRACE_POSIX_SPAWN;
        if (trackfork)
                event.pe_set_event |= PTRACE_FORK;
        if (trackvfork)
                event.pe_set_event |= PTRACE_VFORK;
        if (trackvforkdone)
                event.pe_set_event |= PTRACE_VFORK_DONE;
        SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);

        /*
         * Ignore interception of the SIGCHLD signals.
         *
         * SIGCHLD once blocked is discarded by the kernel as it has the
         * SA_IGNORE property. During the fork(2) operation all signals can be
         * shortly blocked and missed (unless there is a registered signal
         * handler in the traced child). This leads to a race in this test if
         * there would be an intention to catch SIGCHLD.
         */
        sigemptyset(&set);
        sigaddset(&set, SIGCHLD);
        SYSCALL_REQUIRE(ptrace(PT_SET_SIGPASS, child, &set, sizeof(set)) != -1);

        DPRINTF("Before resuming the child process where it left off and "
            "without signal to be sent\n");
        SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);

#if defined(TWAIT_HAVE_PID)
        if ((trackspawn && strcmp(fn, "spawn") == 0) ||
            (trackfork && strcmp(fn, "fork") == 0) ||
            (trackvfork && strcmp(fn, "vfork") == 0)) {
                DPRINTF("Before calling %s() for the child %d\n", TWAIT_FNAME,
                    child);
                TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0),
                    child);

                validate_status_stopped(status, SIGTRAP);

                SYSCALL_REQUIRE(
                    ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
                if (trackspawn && strcmp(fn, "spawn") == 0) {
                        ATF_REQUIRE_EQ(
                            state.pe_report_event & PTRACE_POSIX_SPAWN,
                               PTRACE_POSIX_SPAWN);
                }
                if (trackfork && strcmp(fn, "fork") == 0) {
                        ATF_REQUIRE_EQ(state.pe_report_event & PTRACE_FORK,
                               PTRACE_FORK);
                }
                if (trackvfork && strcmp(fn, "vfork") == 0) {
                        ATF_REQUIRE_EQ(state.pe_report_event & PTRACE_VFORK,
                               PTRACE_VFORK);
                }

                child2 = state.pe_other_pid;
                DPRINTF("Reported ptrace event with forkee %d\n", child2);

                DPRINTF("Before calling %s() for the forkee %d of the child "
                    "%d\n", TWAIT_FNAME, child2, child);
                TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0),
                    child2);

                validate_status_stopped(status, SIGTRAP);

                SYSCALL_REQUIRE(
                    ptrace(PT_GET_PROCESS_STATE, child2, &state, slen) != -1);
                if (trackspawn && strcmp(fn, "spawn") == 0) {
                        ATF_REQUIRE_EQ(
                            state.pe_report_event & PTRACE_POSIX_SPAWN,
                               PTRACE_POSIX_SPAWN);
                }
                if (trackfork && strcmp(fn, "fork") == 0) {
                        ATF_REQUIRE_EQ(state.pe_report_event & PTRACE_FORK,
                               PTRACE_FORK);
                }
                if (trackvfork && strcmp(fn, "vfork") == 0) {
                        ATF_REQUIRE_EQ(state.pe_report_event & PTRACE_VFORK,
                               PTRACE_VFORK);
                }

                ATF_REQUIRE_EQ(state.pe_other_pid, child);

                DPRINTF("Before resuming the forkee process where it left off "
                    "and without signal to be sent\n");
                SYSCALL_REQUIRE(
                    ptrace(PT_CONTINUE, child2, (void *)1, 0) != -1);

                DPRINTF("Before resuming the child process where it left off "
                    "and without signal to be sent\n");
                SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
        }
#endif

        if (trackvforkdone && strcmp(fn, "vfork") == 0) {
                DPRINTF("Before calling %s() for the child %d\n", TWAIT_FNAME,
                    child);
                TWAIT_REQUIRE_SUCCESS(
                    wpid = TWAIT_GENERIC(child, &status, 0), child);

                validate_status_stopped(status, SIGTRAP);

                SYSCALL_REQUIRE(
                    ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
                ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_VFORK_DONE);

                child2 = state.pe_other_pid;
                DPRINTF("Reported PTRACE_VFORK_DONE event with forkee %d\n",
                    child2);

                DPRINTF("Before resuming the child process where it left off "
                    "and without signal to be sent\n");
                SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
        }

#if defined(TWAIT_HAVE_PID)
        if ((trackspawn && strcmp(fn, "spawn") == 0) ||
            (trackfork && strcmp(fn, "fork") == 0) ||
            (trackvfork && strcmp(fn, "vfork") == 0)) {
                DPRINTF("Before calling %s() for the forkee - expected exited"
                    "\n", TWAIT_FNAME);
                TWAIT_REQUIRE_SUCCESS(
                    wpid = TWAIT_GENERIC(child2, &status, 0), child2);

                validate_status_exited(status, exitval2);

                DPRINTF("Before calling %s() for the forkee - expected no "
                    "process\n", TWAIT_FNAME);
                TWAIT_REQUIRE_FAILURE(ECHILD,
                    wpid = TWAIT_GENERIC(child2, &status, 0));
        }
#endif

        DPRINTF("Before calling %s() for the child - expected exited\n",
            TWAIT_FNAME);
        TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);

        validate_status_exited(status, exitval);

        DPRINTF("Before calling %s() for the child - expected no process\n",
            TWAIT_FNAME);
        TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
}

#define FORK_TEST2(name,fun,tspawn,tfork,tvfork,tvforkdone,newpgrp)     \
ATF_TC(name);                                                           \
ATF_TC_HEAD(name, tc)                                                   \
{                                                                       \
        atf_tc_set_md_var(tc, "descr", "Verify " fun "() "              \
            "called with 0%s%s%s%s in EVENT_MASK%s",                    \
            tspawn ? "|PTRACE_POSIX_SPAWN" : "",                        \
            tfork ? "|PTRACE_FORK" : "",                                \
            tvfork ? "|PTRACE_VFORK" : "",                              \
            tvforkdone ? "|PTRACE_VFORK_DONE" : "",                     \
            newpgrp ? " and the traced processes call setpgrp(0,0)":"");\
}                                                                       \
                                                                        \
ATF_TC_BODY(name, tc)                                                   \
{                                                                       \
                                                                        \
        fork_body(fun, tspawn, tfork, tvfork, tvforkdone, newpgrp);     \
}

#define FORK_TEST(name,fun,tspawn,tfork,tvfork,tvforkdone)              \
        FORK_TEST2(name,fun,tspawn,tfork,tvfork,tvforkdone,false)

FORK_TEST(fork1, "fork", false, false, false, false)
#if defined(TWAIT_HAVE_PID)
FORK_TEST(fork2, "fork", false, true, false, false)
FORK_TEST(fork3, "fork", false, false, true, false)
FORK_TEST(fork4, "fork", false, true, true, false)
#endif
FORK_TEST(fork5, "fork", false, false, false, true)
#if defined(TWAIT_HAVE_PID)
FORK_TEST(fork6, "fork", false, true, false, true)
FORK_TEST(fork7, "fork", false, false, true, true)
FORK_TEST(fork8, "fork", false, true, true, true)
#endif
FORK_TEST(fork9, "fork", true, false, false, false)
#if defined(TWAIT_HAVE_PID)
FORK_TEST(fork10, "fork", true, true, false, false)
FORK_TEST(fork11, "fork", true, false, true, false)
FORK_TEST(fork12, "fork", true, true, true, false)
#endif
FORK_TEST(fork13, "fork", true, false, false, true)
#if defined(TWAIT_HAVE_PID)
FORK_TEST(fork14, "fork", true, true, false, true)
FORK_TEST(fork15, "fork", true, false, true, true)
FORK_TEST(fork16, "fork", true, true, true, true)
#endif

#if defined(TWAIT_HAVE_PID)
FORK_TEST2(fork_setpgid, "fork", true, true, true, true, true)
#endif

FORK_TEST(vfork1, "vfork", false, false, false, false)
#if defined(TWAIT_HAVE_PID)
FORK_TEST(vfork2, "vfork", false, true, false, false)
FORK_TEST(vfork3, "vfork", false, false, true, false)
FORK_TEST(vfork4, "vfork", false, true, true, false)
#endif
FORK_TEST(vfork5, "vfork", false, false, false, true)
#if defined(TWAIT_HAVE_PID)
FORK_TEST(vfork6, "vfork", false, true, false, true)
FORK_TEST(vfork7, "vfork", false, false, true, true)
FORK_TEST(vfork8, "vfork", false, true, true, true)
#endif
FORK_TEST(vfork9, "vfork", true, false, false, false)
#if defined(TWAIT_HAVE_PID)
FORK_TEST(vfork10, "vfork", true, true, false, false)
FORK_TEST(vfork11, "vfork", true, false, true, false)
FORK_TEST(vfork12, "vfork", true, true, true, false)
#endif
FORK_TEST(vfork13, "vfork", true, false, false, true)
#if defined(TWAIT_HAVE_PID)
FORK_TEST(vfork14, "vfork", true, true, false, true)
FORK_TEST(vfork15, "vfork", true, false, true, true)
FORK_TEST(vfork16, "vfork", true, true, true, true)
#endif

#if defined(TWAIT_HAVE_PID)
FORK_TEST2(vfork_setpgid, "vfork", true, true, true, true, true)
#endif

FORK_TEST(posix_spawn1, "spawn", false, false, false, false)
FORK_TEST(posix_spawn2, "spawn", false, true, false, false)
FORK_TEST(posix_spawn3, "spawn", false, false, true, false)
FORK_TEST(posix_spawn4, "spawn", false, true, true, false)
FORK_TEST(posix_spawn5, "spawn", false, false, false, true)
FORK_TEST(posix_spawn6, "spawn", false, true, false, true)
FORK_TEST(posix_spawn7, "spawn", false, false, true, true)
FORK_TEST(posix_spawn8, "spawn", false, true, true, true)
#if defined(TWAIT_HAVE_PID)
FORK_TEST(posix_spawn9, "spawn", true, false, false, false)
FORK_TEST(posix_spawn10, "spawn", true, true, false, false)
FORK_TEST(posix_spawn11, "spawn", true, false, true, false)
FORK_TEST(posix_spawn12, "spawn", true, true, true, false)
FORK_TEST(posix_spawn13, "spawn", true, false, false, true)
FORK_TEST(posix_spawn14, "spawn", true, true, false, true)
FORK_TEST(posix_spawn15, "spawn", true, false, true, true)
FORK_TEST(posix_spawn16, "spawn", true, true, true, true)
#endif

#if defined(TWAIT_HAVE_PID)
FORK_TEST2(posix_spawn_setpgid, "spawn", true, true, true, true, true)
#endif

/// ----------------------------------------------------------------------------

#if defined(TWAIT_HAVE_PID)
static void
unrelated_tracer_fork_body(const char *fn, bool trackspawn, bool trackfork,
    bool trackvfork, bool trackvforkdone, bool newpgrp)
{
        const int sigval = SIGSTOP;
        struct msg_fds parent_tracee, parent_tracer;
        const int exitval = 10;
        const int exitval2 = 0; /* This matched exit status from /bin/echo */
        pid_t tracee, tracer, wpid;
        pid_t tracee2 = 0;
        uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */
#if defined(TWAIT_HAVE_STATUS)
        int status;
#endif

        sigset_t set;
        struct ptrace_siginfo info;
        ptrace_state_t state;
        const int slen = sizeof(state);
        ptrace_event_t event;
        const int elen = sizeof(event);

        char * const arg[] = { __UNCONST("/bin/echo"), NULL };

        if (newpgrp)
                atf_tc_skip("kernel panic (pg_jobc going negative)");

        DPRINTF("Spawn tracee\n");
        SYSCALL_REQUIRE(msg_open(&parent_tracee) == 0);
        tracee = atf_utils_fork();
        if (tracee == 0) {
                if (newpgrp) {
                        DPRINTF("Before entering new process group");
                        setpgid(0, 0);
                }

                // Wait for parent to let us crash
                CHILD_FROM_PARENT("exit tracee", parent_tracee, msg);

                DPRINTF("Before raising %s from child\n", strsignal(sigval));
                FORKEE_ASSERT(raise(sigval) == 0);

                if (strcmp(fn, "spawn") == 0) {
                        FORKEE_ASSERT_EQ(posix_spawn(&tracee2,
                            arg[0], NULL, NULL, arg, NULL), 0);
                } else {
                        if (strcmp(fn, "fork") == 0) {
                                FORKEE_ASSERT((tracee2 = fork()) != -1);
                        } else if (strcmp(fn, "vfork") == 0) {
                                FORKEE_ASSERT((tracee2 = vfork()) != -1);
                        }

                        if (tracee2 == 0)
                                _exit(exitval2);
                }
                FORKEE_REQUIRE_SUCCESS
                    (wpid = TWAIT_GENERIC(tracee2, &status, 0), tracee2);

                forkee_status_exited(status, exitval2);

                DPRINTF("Before exiting of the child process\n");
                _exit(exitval);
        }

        DPRINTF("Spawn debugger\n");
        SYSCALL_REQUIRE(msg_open(&parent_tracer) == 0);
        tracer = atf_utils_fork();
        if (tracer == 0) {
                /* Fork again and drop parent to reattach to PID 1 */
                tracer = atf_utils_fork();
                if (tracer != 0)
                        _exit(exitval);

                DPRINTF("Before calling PT_ATTACH from tracee %d\n", getpid());
                FORKEE_ASSERT(ptrace(PT_ATTACH, tracee, NULL, 0) != -1);

                /* Wait for tracee and assert that it was stopped w/ SIGSTOP */
                FORKEE_REQUIRE_SUCCESS(
                    wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);

                forkee_status_stopped(status, SIGSTOP);

                DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for the "
                    "traced process\n");
                SYSCALL_REQUIRE(
                    ptrace(PT_GET_SIGINFO, tracee, &info, sizeof(info)) != -1);

                DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
                DPRINTF("Signal properties: si_signo=%#x si_code=%#x "
                    "si_errno=%#x\n", info.psi_siginfo.si_signo,
                    info.psi_siginfo.si_code, info.psi_siginfo.si_errno);

                FORKEE_ASSERT_EQ(info.psi_siginfo.si_signo, SIGSTOP);
                FORKEE_ASSERT_EQ(info.psi_siginfo.si_code, SI_USER);

                /* Resume tracee with PT_CONTINUE */
                FORKEE_ASSERT(ptrace(PT_CONTINUE, tracee, (void *)1, 0) != -1);

                /* Inform parent that tracer has attached to tracee */
                CHILD_TO_PARENT("tracer ready", parent_tracer, msg);

                /* Wait for parent to tell use that tracee should have exited */
                CHILD_FROM_PARENT("wait for tracee exit", parent_tracer, msg);

                /* Wait for tracee and assert that it exited */
                FORKEE_REQUIRE_SUCCESS(
                    wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);

                forkee_status_stopped(status, sigval);

                DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for the "
                    "traced process\n");
                SYSCALL_REQUIRE(
                    ptrace(PT_GET_SIGINFO, tracee, &info, sizeof(info)) != -1);

                DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
                DPRINTF("Signal properties: si_signo=%#x si_code=%#x "
                    "si_errno=%#x\n", info.psi_siginfo.si_signo,
                    info.psi_siginfo.si_code, info.psi_siginfo.si_errno);

                FORKEE_ASSERT_EQ(info.psi_siginfo.si_signo, sigval);
                FORKEE_ASSERT_EQ(info.psi_siginfo.si_code, SI_LWP);

                DPRINTF("Set 0%s%s%s%s in EVENT_MASK for the child %d\n",
                    trackspawn ? "|PTRACE_POSIX_SPAWN" : "",
                    trackfork ? "|PTRACE_FORK" : "",
                    trackvfork ? "|PTRACE_VFORK" : "",
                    trackvforkdone ? "|PTRACE_VFORK_DONE" : "", tracee);
                event.pe_set_event = 0;
                if (trackspawn)
                        event.pe_set_event |= PTRACE_POSIX_SPAWN;
                if (trackfork)
                        event.pe_set_event |= PTRACE_FORK;
                if (trackvfork)
                        event.pe_set_event |= PTRACE_VFORK;
                if (trackvforkdone)
                        event.pe_set_event |= PTRACE_VFORK_DONE;
                SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, tracee, &event, elen)
                    != -1);

                /*
                 * Ignore interception of the SIGCHLD signals.
                 *
                 * SIGCHLD once blocked is discarded by the kernel as it has the
                 * SA_IGNORE property. During the fork(2) operation all signals
                 * can be shortly blocked and missed (unless there is a
                 * registered signal handler in the traced child). This leads to
                 * a race in this test if there would be an intention to catch
                 * SIGCHLD.
                 */
                sigemptyset(&set);
                sigaddset(&set, SIGCHLD);
                SYSCALL_REQUIRE(ptrace(PT_SET_SIGPASS, tracee, &set,
                    sizeof(set)) != -1);

                DPRINTF("Before resuming the child process where it left off "
                    "and without signal to be sent\n");
                SYSCALL_REQUIRE(ptrace(PT_CONTINUE, tracee, (void *)1, 0) != -1);

                if ((trackspawn && strcmp(fn, "spawn") == 0) ||
                    (trackfork && strcmp(fn, "fork") == 0) ||
                    (trackvfork && strcmp(fn, "vfork") == 0)) {
                        DPRINTF("Before calling %s() for the tracee %d\n", TWAIT_FNAME,
                            tracee);
                        TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracee, &status, 0),
                            tracee);

                        validate_status_stopped(status, SIGTRAP);

                        SYSCALL_REQUIRE(
                            ptrace(PT_GET_PROCESS_STATE, tracee, &state, slen) != -1);
                        if (trackspawn && strcmp(fn, "spawn") == 0) {
                                ATF_REQUIRE_EQ(
                                    state.pe_report_event & PTRACE_POSIX_SPAWN,
                                       PTRACE_POSIX_SPAWN);
                        }
                        if (trackfork && strcmp(fn, "fork") == 0) {
                                ATF_REQUIRE_EQ(state.pe_report_event & PTRACE_FORK,
                                       PTRACE_FORK);
                        }
                        if (trackvfork && strcmp(fn, "vfork") == 0) {
                                ATF_REQUIRE_EQ(state.pe_report_event & PTRACE_VFORK,
                                       PTRACE_VFORK);
                        }

                        tracee2 = state.pe_other_pid;
                        DPRINTF("Reported ptrace event with forkee %d\n", tracee2);

                        DPRINTF("Before calling %s() for the forkee %d of the tracee "
                            "%d\n", TWAIT_FNAME, tracee2, tracee);
                        TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracee2, &status, 0),
                            tracee2);

                        validate_status_stopped(status, SIGTRAP);

                        SYSCALL_REQUIRE(
                            ptrace(PT_GET_PROCESS_STATE, tracee2, &state, slen) != -1);
                        if (trackspawn && strcmp(fn, "spawn") == 0) {
                                ATF_REQUIRE_EQ(
                                    state.pe_report_event & PTRACE_POSIX_SPAWN,
                                       PTRACE_POSIX_SPAWN);
                        }
                        if (trackfork && strcmp(fn, "fork") == 0) {
                                ATF_REQUIRE_EQ(state.pe_report_event & PTRACE_FORK,
                                       PTRACE_FORK);
                        }
                        if (trackvfork && strcmp(fn, "vfork") == 0) {
                                ATF_REQUIRE_EQ(state.pe_report_event & PTRACE_VFORK,
                                       PTRACE_VFORK);
                        }

                        ATF_REQUIRE_EQ(state.pe_other_pid, tracee);

                        DPRINTF("Before resuming the forkee process where it left off "
                            "and without signal to be sent\n");
                        SYSCALL_REQUIRE(
                            ptrace(PT_CONTINUE, tracee2, (void *)1, 0) != -1);

                        DPRINTF("Before resuming the tracee process where it left off "
                            "and without signal to be sent\n");
                        SYSCALL_REQUIRE(ptrace(PT_CONTINUE, tracee, (void *)1, 0) != -1);
                }

                if (trackvforkdone && strcmp(fn, "vfork") == 0) {
                        DPRINTF("Before calling %s() for the tracee %d\n", TWAIT_FNAME,
                            tracee);
                        TWAIT_REQUIRE_SUCCESS(
                            wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);

                        validate_status_stopped(status, SIGTRAP);

                        SYSCALL_REQUIRE(
                            ptrace(PT_GET_PROCESS_STATE, tracee, &state, slen) != -1);
                        ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_VFORK_DONE);

                        tracee2 = state.pe_other_pid;
                        DPRINTF("Reported PTRACE_VFORK_DONE event with forkee %d\n",
                            tracee2);

                        DPRINTF("Before resuming the tracee process where it left off "
                            "and without signal to be sent\n");
                        SYSCALL_REQUIRE(ptrace(PT_CONTINUE, tracee, (void *)1, 0) != -1);
                }

                if ((trackspawn && strcmp(fn, "spawn") == 0) ||
                    (trackfork && strcmp(fn, "fork") == 0) ||
                    (trackvfork && strcmp(fn, "vfork") == 0)) {
                        DPRINTF("Before calling %s() for the forkee - expected exited"
                            "\n", TWAIT_FNAME);
                        TWAIT_REQUIRE_SUCCESS(
                            wpid = TWAIT_GENERIC(tracee2, &status, 0), tracee2);

                        validate_status_exited(status, exitval2);

                        DPRINTF("Before calling %s() for the forkee - expected no "
                            "process\n", TWAIT_FNAME);
                        TWAIT_REQUIRE_FAILURE(ECHILD,
                            wpid = TWAIT_GENERIC(tracee2, &status, 0));
                }

                DPRINTF("Before calling %s() for the tracee - expected exited\n",
                    TWAIT_FNAME);
                TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);

                validate_status_exited(status, exitval);

                /* Inform parent that tracer is exiting normally */
                CHILD_TO_PARENT("tracer done", parent_tracer, msg);

                DPRINTF("Before exiting of the tracer process\n");
                _exit(0 /* collect by initproc */);
        }

        DPRINTF("Wait for the tracer process (direct child) to exit "
            "calling %s()\n", TWAIT_FNAME);
        TWAIT_REQUIRE_SUCCESS(
            wpid = TWAIT_GENERIC(tracer, &status, 0), tracer);

        validate_status_exited(status, exitval);

        DPRINTF("Wait for the non-exited tracee process with %s()\n",
            TWAIT_FNAME);
        TWAIT_REQUIRE_SUCCESS(
            wpid = TWAIT_GENERIC(tracee, NULL, WNOHANG), 0);

        DPRINTF("Wait for the tracer to attach to the tracee\n");
        PARENT_FROM_CHILD("tracer ready", parent_tracer, msg);

        DPRINTF("Resume the tracee and let it crash\n");
        PARENT_TO_CHILD("exit tracee", parent_tracee,  msg);

        DPRINTF("Resume the tracer and let it detect crashed tracee\n");
        PARENT_TO_CHILD("Message 2", parent_tracer, msg);

        DPRINTF("Wait for tracee to finish its job and exit - calling %s()\n",
            TWAIT_FNAME);
        TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);

        validate_status_exited(status, exitval);

        DPRINTF("Await normal exit of tracer\n");
        PARENT_FROM_CHILD("tracer done", parent_tracer, msg);

        msg_close(&parent_tracer);
        msg_close(&parent_tracee);
}

#define UNRELATED_TRACER_FORK_TEST2(name,fun,tspawn,tfork,tvfork,tvforkdone,newpgrp)\
ATF_TC(name);                                                           \
ATF_TC_HEAD(name, tc)                                                   \
{                                                                       \
        atf_tc_set_md_var(tc, "descr", "Verify " fun "() "              \
            "called with 0%s%s%s%s in EVENT_MASK%s",                    \
            tspawn ? "|PTRACE_POSIX_SPAWN" : "",                        \
            tfork ? "|PTRACE_FORK" : "",                                \
            tvfork ? "|PTRACE_VFORK" : "",                              \
            tvforkdone ? "|PTRACE_VFORK_DONE" : "",                     \
            newpgrp ? " and the traced processes call setpgrp(0,0)":"");\
}                                                                       \
                                                                        \
ATF_TC_BODY(name, tc)                                                   \
{                                                                       \
                                                                        \
        unrelated_tracer_fork_body(fun, tspawn, tfork, tvfork,          \
            tvforkdone, newpgrp);                                       \
}

#define UNRELATED_TRACER_FORK_TEST(name,fun,tspawn,tfork,tvfork,tvforkdone)     \
        UNRELATED_TRACER_FORK_TEST2(name,fun,tspawn,tfork,tvfork,tvforkdone,false)

UNRELATED_TRACER_FORK_TEST(unrelated_tracer_fork1, "fork", false, false, false, false)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_fork2, "fork", false, true, false, false)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_fork3, "fork", false, false, true, false)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_fork4, "fork", false, true, true, false)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_fork5, "fork", false, false, false, true)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_fork6, "fork", false, true, false, true)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_fork7, "fork", false, false, true, true)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_fork8, "fork", false, true, true, true)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_fork9, "fork", true, false, false, false)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_fork10, "fork", true, true, false, false)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_fork11, "fork", true, false, true, false)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_fork12, "fork", true, true, true, false)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_fork13, "fork", true, false, false, true)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_fork14, "fork", true, true, false, true)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_fork15, "fork", true, false, true, true)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_fork16, "fork", true, true, true, true)

UNRELATED_TRACER_FORK_TEST2(unrelated_tracer_fork_setpgid, "fork", true, true, true, true, true)

UNRELATED_TRACER_FORK_TEST(unrelated_tracer_vfork1, "vfork", false, false, false, false)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_vfork2, "vfork", false, true, false, false)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_vfork3, "vfork", false, false, true, false)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_vfork4, "vfork", false, true, true, false)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_vfork5, "vfork", false, false, false, true)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_vfork6, "vfork", false, true, false, true)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_vfork7, "vfork", false, false, true, true)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_vfork8, "vfork", false, true, true, true)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_vfork9, "vfork", true, false, false, false)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_vfork10, "vfork", true, true, false, false)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_vfork11, "vfork", true, false, true, false)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_vfork12, "vfork", true, true, true, false)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_vfork13, "vfork", true, false, false, true)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_vfork14, "vfork", true, true, false, true)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_vfork15, "vfork", true, false, true, true)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_vfork16, "vfork", true, true, true, true)

UNRELATED_TRACER_FORK_TEST2(unrelated_tracer_vfork_setpgid, "vfork", true, true, true, true, true)

UNRELATED_TRACER_FORK_TEST(unrelated_tracer_posix_spawn1, "spawn", false, false, false, false)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_posix_spawn2, "spawn", false, true, false, false)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_posix_spawn3, "spawn", false, false, true, false)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_posix_spawn4, "spawn", false, true, true, false)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_posix_spawn5, "spawn", false, false, false, true)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_posix_spawn6, "spawn", false, true, false, true)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_posix_spawn7, "spawn", false, false, true, true)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_posix_spawn8, "spawn", false, true, true, true)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_posix_spawn9, "spawn", true, false, false, false)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_posix_spawn10, "spawn", true, true, false, false)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_posix_spawn11, "spawn", true, false, true, false)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_posix_spawn12, "spawn", true, true, true, false)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_posix_spawn13, "spawn", true, false, false, true)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_posix_spawn14, "spawn", true, true, false, true)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_posix_spawn15, "spawn", true, false, true, true)
UNRELATED_TRACER_FORK_TEST(unrelated_tracer_posix_spawn16, "spawn", true, true, true, true)

UNRELATED_TRACER_FORK_TEST2(unrelated_tracer_posix_spawn_setpgid, "spawn", true, true, true, true, true)
#endif

/// ----------------------------------------------------------------------------

#if defined(TWAIT_HAVE_PID)
static void
fork_detach_forker_body(const char *fn, bool kill_process)
{
        const int exitval = 5;
        const int exitval2 = 0; /* Matches exit value from /bin/echo */
        const int sigval = SIGSTOP;
        pid_t child, child2 = 0, wpid;
#if defined(TWAIT_HAVE_STATUS)
        int status;
#endif
        ptrace_state_t state;
        const int slen = sizeof(state);
        ptrace_event_t event;
        const int elen = sizeof(event);

        int op;

        char * const arg[] = { __UNCONST("/bin/echo"), NULL };

        DPRINTF("Before forking process PID=%d\n", getpid());
        SYSCALL_REQUIRE((child = fork()) != -1);
        if (child == 0) {
                DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
                FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);

                DPRINTF("Before raising %s from child\n", strsignal(sigval));
                FORKEE_ASSERT(raise(sigval) == 0);

                if (strcmp(fn, "spawn") == 0) {
                        FORKEE_ASSERT_EQ(posix_spawn(&child2,
                            arg[0], NULL, NULL, arg, NULL), 0);
                } else  {
                        if (strcmp(fn, "fork") == 0) {
                                FORKEE_ASSERT((child2 = fork()) != -1);
                        } else {
                                FORKEE_ASSERT((child2 = vfork()) != -1);
                        }

                        if (child2 == 0)
                                _exit(exitval2);
                }

                FORKEE_REQUIRE_SUCCESS
                    (wpid = TWAIT_GENERIC(child2, &status, 0), child2);

                forkee_status_exited(status, exitval2);

                DPRINTF("Before exiting of the child process\n");
                _exit(exitval);
        }
        DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);

        DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
        TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);

        validate_status_stopped(status, sigval);

        DPRINTF("Set EVENT_MASK for the child %d\n", child);
        event.pe_set_event = PTRACE_POSIX_SPAWN | PTRACE_FORK | PTRACE_VFORK
                | PTRACE_VFORK_DONE;
        SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);

        DPRINTF("Before resuming the child process where it left off and "
            "without signal to be sent\n");
        SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);

        DPRINTF("Before calling %s() for the child %d\n", TWAIT_FNAME, child);
        TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);

        validate_status_stopped(status, SIGTRAP);

        SYSCALL_REQUIRE(
            ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);

        if (strcmp(fn, "spawn") == 0)
                op = PTRACE_POSIX_SPAWN;
        else if (strcmp(fn, "fork") == 0)
                op = PTRACE_FORK;
        else
                op = PTRACE_VFORK;

        ATF_REQUIRE_EQ(state.pe_report_event & op, op);

        child2 = state.pe_other_pid;
        DPRINTF("Reported ptrace event with forkee %d\n", child2);

        if (strcmp(fn, "spawn") == 0 || strcmp(fn, "fork") == 0 ||
            strcmp(fn, "vfork") == 0)
                op = kill_process ? PT_KILL : PT_DETACH;
        else
                op = PT_CONTINUE;
        SYSCALL_REQUIRE(ptrace(op, child, (void *)1, 0) != -1);

        DPRINTF("Before calling %s() for the forkee %d of the child %d\n",
            TWAIT_FNAME, child2, child);
        TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0), child2);

        validate_status_stopped(status, SIGTRAP);

        SYSCALL_REQUIRE(
            ptrace(PT_GET_PROCESS_STATE, child2, &state, slen) != -1);
        if (strcmp(fn, "spawn") == 0)
                op = PTRACE_POSIX_SPAWN;
        else if (strcmp(fn, "fork") == 0)
                op = PTRACE_FORK;
        else
                op = PTRACE_VFORK;

        ATF_REQUIRE_EQ(state.pe_report_event & op, op);
        ATF_REQUIRE_EQ(state.pe_other_pid, child);

        DPRINTF("Before resuming the forkee process where it left off "
            "and without signal to be sent\n");
        SYSCALL_REQUIRE(
            ptrace(PT_CONTINUE, child2, (void *)1, 0) != -1);

        if (strcmp(fn, "vforkdone") == 0) {
                DPRINTF("Before calling %s() for the child %d\n", TWAIT_FNAME,
                    child);
                TWAIT_REQUIRE_SUCCESS(
                    wpid = TWAIT_GENERIC(child, &status, 0), child);

                validate_status_stopped(status, SIGTRAP);

                SYSCALL_REQUIRE(
                    ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
                ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_VFORK_DONE);

                child2 = state.pe_other_pid;
                DPRINTF("Reported PTRACE_VFORK_DONE event with forkee %d\n",
                    child2);

                op = kill_process ? PT_KILL : PT_DETACH;
                DPRINTF("Before resuming the child process where it left off "
                    "and without signal to be sent\n");
                SYSCALL_REQUIRE(ptrace(op, child, (void *)1, 0) != -1);
        }

        DPRINTF("Before calling %s() for the forkee - expected exited\n",
            TWAIT_FNAME);
        TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0), child2);

        validate_status_exited(status, exitval2);

        DPRINTF("Before calling %s() for the forkee - expected no process\n",
            TWAIT_FNAME);
        TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child2, &status, 0));

        DPRINTF("Before calling %s() for the forkee - expected exited\n",
            TWAIT_FNAME);
        TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);

        if (kill_process) {
                validate_status_signaled(status, SIGKILL, 0);
        } else {
                validate_status_exited(status, exitval);
        }

        DPRINTF("Before calling %s() for the child - expected no process\n",
            TWAIT_FNAME);
        TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
}

#define FORK_DETACH_FORKER(name,event,kprocess)                         \
ATF_TC(name);                                                           \
ATF_TC_HEAD(name, tc)                                                   \
{                                                                       \
        atf_tc_set_md_var(tc, "descr", "Verify %s " event,              \
            kprocess ? "killed" : "detached");                          \
}                                                                       \
                                                                        \
ATF_TC_BODY(name, tc)                                                   \
{                                                                       \
                                                                        \
        fork_detach_forker_body(event, kprocess);                       \
}

FORK_DETACH_FORKER(posix_spawn_detach_spawner, "spawn", false)
FORK_DETACH_FORKER(fork_detach_forker, "fork", false)
FORK_DETACH_FORKER(vfork_detach_vforker, "vfork", false)
FORK_DETACH_FORKER(vfork_detach_vforkerdone, "vforkdone", false)

FORK_DETACH_FORKER(posix_spawn_kill_spawner, "spawn", true)
FORK_DETACH_FORKER(fork_kill_forker, "fork", true)
FORK_DETACH_FORKER(vfork_kill_vforker, "vfork", true)
FORK_DETACH_FORKER(vfork_kill_vforkerdone, "vforkdone", true)
#endif

/// ----------------------------------------------------------------------------

#if defined(TWAIT_HAVE_PID)
static void
unrelated_tracer_fork_detach_forker_body(const char *fn, bool kill_process)
{
        const int sigval = SIGSTOP;
        struct msg_fds parent_tracee, parent_tracer;
        const int exitval = 10;
        const int exitval2 = 0; /* This matched exit status from /bin/echo */
        pid_t tracee, tracer, wpid;
        pid_t tracee2 = 0;
        uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */
#if defined(TWAIT_HAVE_STATUS)
        int status;
#endif
        int op;

        struct ptrace_siginfo info;
        ptrace_state_t state;
        const int slen = sizeof(state);
        ptrace_event_t event;
        const int elen = sizeof(event);

        char * const arg[] = { __UNCONST("/bin/echo"), NULL };

        DPRINTF("Spawn tracee\n");
        SYSCALL_REQUIRE(msg_open(&parent_tracee) == 0);
        tracee = atf_utils_fork();
        if (tracee == 0) {
                // Wait for parent to let us crash
                CHILD_FROM_PARENT("exit tracee", parent_tracee, msg);

                DPRINTF("Before raising %s from child\n", strsignal(sigval));
                FORKEE_ASSERT(raise(sigval) == 0);

                if (strcmp(fn, "spawn") == 0) {
                        FORKEE_ASSERT_EQ(posix_spawn(&tracee2,
                            arg[0], NULL, NULL, arg, NULL), 0);
                } else  {
                        if (strcmp(fn, "fork") == 0) {
                                FORKEE_ASSERT((tracee2 = fork()) != -1);
                        } else {
                                FORKEE_ASSERT((tracee2 = vfork()) != -1);
                        }

                        if (tracee2 == 0)
                                _exit(exitval2);
                }

                FORKEE_REQUIRE_SUCCESS
                    (wpid = TWAIT_GENERIC(tracee2, &status, 0), tracee2);

                forkee_status_exited(status, exitval2);

                DPRINTF("Before exiting of the child process\n");
                _exit(exitval);
        }

        DPRINTF("Spawn debugger\n");
        SYSCALL_REQUIRE(msg_open(&parent_tracer) == 0);
        tracer = atf_utils_fork();
        if (tracer == 0) {
                /* Fork again and drop parent to reattach to PID 1 */
                tracer = atf_utils_fork();
                if (tracer != 0)
                        _exit(exitval);

                DPRINTF("Before calling PT_ATTACH from tracee %d\n", getpid());
                FORKEE_ASSERT(ptrace(PT_ATTACH, tracee, NULL, 0) != -1);

                /* Wait for tracee and assert that it was stopped w/ SIGSTOP */
                FORKEE_REQUIRE_SUCCESS(
                    wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);

                forkee_status_stopped(status, SIGSTOP);

                DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for the "
                    "traced process\n");
                SYSCALL_REQUIRE(
                    ptrace(PT_GET_SIGINFO, tracee, &info, sizeof(info)) != -1);

                DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
                DPRINTF("Signal properties: si_signo=%#x si_code=%#x "
                    "si_errno=%#x\n", info.psi_siginfo.si_signo,
                    info.psi_siginfo.si_code, info.psi_siginfo.si_errno);

                FORKEE_ASSERT_EQ(info.psi_siginfo.si_signo, SIGSTOP);
                FORKEE_ASSERT_EQ(info.psi_siginfo.si_code, SI_USER);

                /* Resume tracee with PT_CONTINUE */
                FORKEE_ASSERT(ptrace(PT_CONTINUE, tracee, (void *)1, 0) != -1);

                /* Inform parent that tracer has attached to tracee */
                CHILD_TO_PARENT("tracer ready", parent_tracer, msg);

                /* Wait for parent to tell use that tracee should have exited */
                CHILD_FROM_PARENT("wait for tracee exit", parent_tracer, msg);

                /* Wait for tracee and assert that it exited */
                FORKEE_REQUIRE_SUCCESS(
                    wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);

                forkee_status_stopped(status, sigval);

                DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for the "
                    "traced process\n");
                SYSCALL_REQUIRE(
                    ptrace(PT_GET_SIGINFO, tracee, &info, sizeof(info)) != -1);

                DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
                DPRINTF("Signal properties: si_signo=%#x si_code=%#x "
                    "si_errno=%#x\n", info.psi_siginfo.si_signo,
                    info.psi_siginfo.si_code, info.psi_siginfo.si_errno);

                FORKEE_ASSERT_EQ(info.psi_siginfo.si_signo, sigval);
                FORKEE_ASSERT_EQ(info.psi_siginfo.si_code, SI_LWP);

                DPRINTF("Set EVENT_MASK for the child %d\n", tracee);
                event.pe_set_event = PTRACE_POSIX_SPAWN | PTRACE_FORK | PTRACE_VFORK
                        | PTRACE_VFORK_DONE;
                SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, tracee, &event, elen) != -1);

                DPRINTF("Before resuming the child process where it left off and "
                    "without signal to be sent\n");
                SYSCALL_REQUIRE(ptrace(PT_CONTINUE, tracee, (void *)1, 0) != -1);

                DPRINTF("Before calling %s() for the child %d\n", TWAIT_FNAME, tracee);
                TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);

                validate_status_stopped(status, SIGTRAP);

                SYSCALL_REQUIRE(
                    ptrace(PT_GET_PROCESS_STATE, tracee, &state, slen) != -1);

                if (strcmp(fn, "spawn") == 0)
                        op = PTRACE_POSIX_SPAWN;
                else if (strcmp(fn, "fork") == 0)
                        op = PTRACE_FORK;
                else
                        op = PTRACE_VFORK;

                ATF_REQUIRE_EQ(state.pe_report_event & op, op);

                tracee2 = state.pe_other_pid;
                DPRINTF("Reported ptrace event with forkee %d\n", tracee2);
                if (strcmp(fn, "spawn") == 0 || strcmp(fn, "fork") == 0 ||
                    strcmp(fn, "vfork") == 0)
                        op = kill_process ? PT_KILL : PT_DETACH;
                else
                        op = PT_CONTINUE;
                SYSCALL_REQUIRE(ptrace(op, tracee, (void *)1, 0) != -1);

                DPRINTF("Before calling %s() for the forkee %d of the tracee %d\n",
                    TWAIT_FNAME, tracee2, tracee);
                TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracee2, &status, 0), tracee2);

                validate_status_stopped(status, SIGTRAP);

                SYSCALL_REQUIRE(
                    ptrace(PT_GET_PROCESS_STATE, tracee2, &state, slen) != -1);
                if (strcmp(fn, "spawn") == 0)
                        op = PTRACE_POSIX_SPAWN;
                else if (strcmp(fn, "fork") == 0)
                        op = PTRACE_FORK;
                else
                        op = PTRACE_VFORK;

                ATF_REQUIRE_EQ(state.pe_report_event & op, op);
                ATF_REQUIRE_EQ(state.pe_other_pid, tracee);

                DPRINTF("Before resuming the forkee process where it left off "
                    "and without signal to be sent\n");
                SYSCALL_REQUIRE(
                    ptrace(PT_CONTINUE, tracee2, (void *)1, 0) != -1);

                if (strcmp(fn, "vforkdone") == 0) {
                        DPRINTF("Before calling %s() for the child %d\n", TWAIT_FNAME,
                            tracee);
                        TWAIT_REQUIRE_SUCCESS(
                            wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);

                        validate_status_stopped(status, SIGTRAP);

                        SYSCALL_REQUIRE(
                            ptrace(PT_GET_PROCESS_STATE, tracee, &state, slen) != -1);
                        ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_VFORK_DONE);

                        tracee2 = state.pe_other_pid;
                        DPRINTF("Reported PTRACE_VFORK_DONE event with forkee %d\n",
                            tracee2);

                        op = kill_process ? PT_KILL : PT_DETACH;
                        DPRINTF("Before resuming the child process where it left off "
                            "and without signal to be sent\n");
                        SYSCALL_REQUIRE(ptrace(op, tracee, (void *)1, 0) != -1);
                }

                DPRINTF("Before calling %s() for the forkee - expected exited\n",
                    TWAIT_FNAME);
                TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracee2, &status, 0), tracee2);

                validate_status_exited(status, exitval2);

                DPRINTF("Before calling %s() for the forkee - expected no process\n",
                    TWAIT_FNAME);
                TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(tracee2, &status, 0));

                if (kill_process) {
                        DPRINTF("Before calling %s() for the forkee - expected signaled\n",
                            TWAIT_FNAME);
                        TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);

                        validate_status_signaled(status, SIGKILL, 0);
                }

                /* Inform parent that tracer is exiting normally */
                CHILD_TO_PARENT("tracer done", parent_tracer, msg);

                DPRINTF("Before exiting of the tracer process\n");
                _exit(0 /* collect by initproc */);
        }

        DPRINTF("Wait for the tracer process (direct child) to exit "
            "calling %s()\n", TWAIT_FNAME);
        TWAIT_REQUIRE_SUCCESS(
            wpid = TWAIT_GENERIC(tracer, &status, 0), tracer);

        validate_status_exited(status, exitval);

        DPRINTF("Wait for the non-exited tracee process with %s()\n",
            TWAIT_FNAME);
        TWAIT_REQUIRE_SUCCESS(
            wpid = TWAIT_GENERIC(tracee, NULL, WNOHANG), 0);

        DPRINTF("Wait for the tracer to attach to the tracee\n");
        PARENT_FROM_CHILD("tracer ready", parent_tracer, msg);

        DPRINTF("Resume the tracee and let it crash\n");
        PARENT_TO_CHILD("exit tracee", parent_tracee,  msg);

        DPRINTF("Resume the tracer and let it detect crashed tracee\n");
        PARENT_TO_CHILD("Message 2", parent_tracer, msg);

        DPRINTF("Wait for tracee to finish its job and exit - calling %s()\n",
            TWAIT_FNAME);
        TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);

        if (kill_process) {
                validate_status_signaled(status, SIGKILL, 0);
        } else {
                validate_status_exited(status, exitval);
        }

        DPRINTF("Await normal exit of tracer\n");
        PARENT_FROM_CHILD("tracer done", parent_tracer, msg);

        msg_close(&parent_tracer);
        msg_close(&parent_tracee);
}

#define UNRELATED_TRACER_FORK_DETACH_FORKER(name,event,kprocess)        \
ATF_TC(name);                                                           \
ATF_TC_HEAD(name, tc)                                                   \
{                                                                       \
        atf_tc_set_md_var(tc, "descr", "Verify %s " event,              \
            kprocess ? "killed" : "detached");                          \
}                                                                       \
                                                                        \
ATF_TC_BODY(name, tc)                                                   \
{                                                                       \
                                                                        \
        unrelated_tracer_fork_detach_forker_body(event, kprocess);      \
}

UNRELATED_TRACER_FORK_DETACH_FORKER(unrelated_tracer_posix_spawn_detach_spawner, "spawn", false)
UNRELATED_TRACER_FORK_DETACH_FORKER(unrelated_tracer_fork_detach_forker, "fork", false)
UNRELATED_TRACER_FORK_DETACH_FORKER(unrelated_tracer_vfork_detach_vforker, "vfork", false)
UNRELATED_TRACER_FORK_DETACH_FORKER(unrelated_tracer_vfork_detach_vforkerdone, "vforkdone", false)

UNRELATED_TRACER_FORK_DETACH_FORKER(unrelated_tracer_posix_spawn_kill_spawner, "spawn", true)
UNRELATED_TRACER_FORK_DETACH_FORKER(unrelated_tracer_fork_kill_forker, "fork", true)
UNRELATED_TRACER_FORK_DETACH_FORKER(unrelated_tracer_vfork_kill_vforker, "vfork", true)
UNRELATED_TRACER_FORK_DETACH_FORKER(unrelated_tracer_vfork_kill_vforkerdone, "vforkdone", true)
#endif

/// ----------------------------------------------------------------------------

static void
traceme_vfork_fork_body(pid_t (*fn)(void))
{
        const int exitval = 5;
        const int exitval2 = 15;
        pid_t child, child2 = 0, wpid;
#if defined(TWAIT_HAVE_STATUS)
        int status;
#endif

        DPRINTF("Before forking process PID=%d\n", getpid());
        SYSCALL_REQUIRE((child = vfork()) != -1);
        if (child == 0) {
                DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
                FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);

                FORKEE_ASSERT((child2 = (fn)()) != -1);

                if (child2 == 0)
                        _exit(exitval2);

                FORKEE_REQUIRE_SUCCESS
                    (wpid = TWAIT_GENERIC(child2, &status, 0), child2);

                forkee_status_exited(status, exitval2);

                DPRINTF("Before exiting of the child process\n");
                _exit(exitval);
        }
        DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);

        DPRINTF("Before calling %s() for the child - expected exited\n",
            TWAIT_FNAME);
        TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);

        validate_status_exited(status, exitval);

        DPRINTF("Before calling %s() for the child - expected no process\n",
            TWAIT_FNAME);
        TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
}

#define TRACEME_VFORK_FORK_TEST(name,fun)                               \
ATF_TC(name);                                                           \
ATF_TC_HEAD(name, tc)                                                   \
{                                                                       \
        atf_tc_set_md_var(tc, "descr", "Verify " #fun "(2) "            \
            "called from vfork(2)ed child");                            \
}                                                                       \
                                                                        \
ATF_TC_BODY(name, tc)                                                   \
{                                                                       \
                                                                        \
        traceme_vfork_fork_body(fun);                                   \
}

TRACEME_VFORK_FORK_TEST(traceme_vfork_fork, fork)
TRACEME_VFORK_FORK_TEST(traceme_vfork_vfork, vfork)

/// ----------------------------------------------------------------------------

#if defined(TWAIT_HAVE_PID)
static void
fork2_body(const char *fn, bool masked, bool ignored)
{
        const int exitval = 5;
        const int exitval2 = 0; /* Match exit status from /bin/echo */
        const int sigval = SIGSTOP;
        pid_t child, child2 = 0, wpid;
#if defined(TWAIT_HAVE_STATUS)
        int status;
#endif
        ptrace_state_t state;
        const int slen = sizeof(state);
        ptrace_event_t event;
        const int elen = sizeof(event);
        struct sigaction sa;
        struct ptrace_siginfo info;
        sigset_t intmask;
        struct kinfo_proc2 kp;
        size_t len = sizeof(kp);

        int name[6];
        const size_t namelen = __arraycount(name);
        sigset_t set;
        ki_sigset_t kp_sigmask;
        ki_sigset_t kp_sigignore;

        char * const arg[] = { __UNCONST("/bin/echo"), NULL };

        DPRINTF("Before forking process PID=%d\n", getpid());
        SYSCALL_REQUIRE((child = fork()) != -1);
        if (child == 0) {
                DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
                FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);

                if (masked) {
                        sigemptyset(&intmask);
                        sigaddset(&intmask, SIGTRAP);
                        sigprocmask(SIG_BLOCK, &intmask, NULL);
                }

                if (ignored) {
                        memset(&sa, 0, sizeof(sa));
                        sa.sa_handler = SIG_IGN;
                        sigemptyset(&sa.sa_mask);
                        FORKEE_ASSERT(sigaction(SIGTRAP, &sa, NULL) != -1);
                }

                DPRINTF("Before raising %s from child\n", strsignal(sigval));
                FORKEE_ASSERT(raise(sigval) == 0);

                if (strcmp(fn, "spawn") == 0) {
                        FORKEE_ASSERT_EQ(posix_spawn(&child2,
                            arg[0], NULL, NULL, arg, NULL), 0);
                } else  {
                        if (strcmp(fn, "fork") == 0) {
                                FORKEE_ASSERT((child2 = fork()) != -1);
                        } else {
                                FORKEE_ASSERT((child2 = vfork()) != -1);
                        }
                        if (child2 == 0)
                                _exit(exitval2);
                }

                FORKEE_REQUIRE_SUCCESS
                    (wpid = TWAIT_GENERIC(child2, &status, 0), child2);

                forkee_status_exited(status, exitval2);

                DPRINTF("Before exiting of the child process\n");
                _exit(exitval);
        }
        DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);

        DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
        TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);

        validate_status_stopped(status, sigval);

        DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
        SYSCALL_REQUIRE(
            ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);

        DPRINTF("Before checking siginfo_t\n");
        ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigval);
        ATF_REQUIRE_EQ(info.psi_siginfo.si_code, SI_LWP);

        name[0] = CTL_KERN,
        name[1] = KERN_PROC2,
        name[2] = KERN_PROC_PID;
        name[3] = child;
        name[4] = sizeof(kp);
        name[5] = 1;

        FORKEE_ASSERT_EQ(sysctl(name, namelen, &kp, &len, NULL, 0), 0);

        kp_sigmask = kp.p_sigmask;
        kp_sigignore = kp.p_sigignore;

        DPRINTF("Set 0%s%s%s%s in EVENT_MASK for the child %d\n",
            strcmp(fn, "spawn") == 0 ? "|PTRACE_POSIX_SPAWN" : "",
            strcmp(fn, "fork") == 0 ? "|PTRACE_FORK" : "",
            strcmp(fn, "vfork") == 0 ? "|PTRACE_VFORK" : "",
            strcmp(fn, "vforkdone") == 0 ? "|PTRACE_VFORK_DONE" : "", child);
        event.pe_set_event = 0;
        if (strcmp(fn, "spawn") == 0)
                event.pe_set_event |= PTRACE_POSIX_SPAWN;
        if (strcmp(fn, "fork") == 0)
                event.pe_set_event |= PTRACE_FORK;
        if (strcmp(fn, "vfork") == 0)
                event.pe_set_event |= PTRACE_VFORK;
        if (strcmp(fn, "vforkdone") == 0)
                event.pe_set_event |= PTRACE_VFORK_DONE;
        SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);

        /*
         * Ignore interception of the SIGCHLD signals.
         *
         * SIGCHLD once blocked is discarded by the kernel as it has the
         * SA_IGNORE property. During the fork(2) operation all signals can be
         * shortly blocked and missed (unless there is a registered signal
         * handler in the traced child). This leads to a race in this test if
         * there would be an intention to catch SIGCHLD.
         */
        sigemptyset(&set);
        sigaddset(&set, SIGCHLD);
        SYSCALL_REQUIRE(ptrace(PT_SET_SIGPASS, child, &set, sizeof(set)) != -1);

        DPRINTF("Before resuming the child process where it left off and "
            "without signal to be sent\n");
        SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);

        if (strcmp(fn, "spawn") == 0 || strcmp(fn, "fork") == 0 ||
            strcmp(fn, "vfork") == 0) {
                DPRINTF("Before calling %s() for the child %d\n", TWAIT_FNAME,
                    child);
                TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0),
                    child);

                validate_status_stopped(status, SIGTRAP);

                ATF_REQUIRE_EQ(sysctl(name, namelen, &kp, &len, NULL, 0), 0);

                if (masked) {
                        DPRINTF("kp_sigmask="
                            "%#02" PRIx32 "%02" PRIx32 "%02" PRIx32 "%02"
                            PRIx32 "\n",
                            kp_sigmask.__bits[0], kp_sigmask.__bits[1],
                            kp_sigmask.__bits[2], kp_sigmask.__bits[3]);

                        DPRINTF("kp.p_sigmask="
                            "%#02" PRIx32 "%02" PRIx32 "%02" PRIx32 "%02"
                            PRIx32 "\n",
                            kp.p_sigmask.__bits[0], kp.p_sigmask.__bits[1],
                            kp.p_sigmask.__bits[2], kp.p_sigmask.__bits[3]);

                        ATF_REQUIRE(sigismember((sigset_t *)&kp.p_sigmask,
                            SIGTRAP));
                }

                if (ignored) {
                        DPRINTF("kp_sigignore="
                            "%#02" PRIx32 "%02" PRIx32 "%02" PRIx32 "%02"
                            PRIx32 "\n",
                            kp_sigignore.__bits[0], kp_sigignore.__bits[1],
                            kp_sigignore.__bits[2], kp_sigignore.__bits[3]);

                        DPRINTF("kp.p_sigignore="
                            "%#02" PRIx32 "%02" PRIx32 "%02" PRIx32 "%02"
                            PRIx32 "\n",
                            kp.p_sigignore.__bits[0], kp.p_sigignore.__bits[1],
                            kp.p_sigignore.__bits[2], kp.p_sigignore.__bits[3]);

                        ATF_REQUIRE(sigismember((sigset_t *)&kp.p_sigignore,
                            SIGTRAP));
                }

                SYSCALL_REQUIRE(
                    ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
                if (strcmp(fn, "spawn") == 0) {
                        ATF_REQUIRE_EQ(
                            state.pe_report_event & PTRACE_POSIX_SPAWN,
                               PTRACE_POSIX_SPAWN);
                }
                if (strcmp(fn, "fork") == 0) {
                        ATF_REQUIRE_EQ(state.pe_report_event & PTRACE_FORK,
                               PTRACE_FORK);
                }
                if (strcmp(fn, "vfork") == 0) {
                        ATF_REQUIRE_EQ(state.pe_report_event & PTRACE_VFORK,
                               PTRACE_VFORK);
                }

                child2 = state.pe_other_pid;
                DPRINTF("Reported ptrace event with forkee %d\n", child2);

                DPRINTF("Before calling %s() for the forkee %d of the child "
                    "%d\n", TWAIT_FNAME, child2, child);
                TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0),
                    child2);

                validate_status_stopped(status, SIGTRAP);

                name[3] = child2;
                ATF_REQUIRE_EQ(sysctl(name, namelen, &kp, &len, NULL, 0), 0);

                if (masked) {
                        DPRINTF("kp_sigmask="
                            "%#02" PRIx32 "%02" PRIx32 "%02" PRIx32 "%02"
                            PRIx32 "\n",
                            kp_sigmask.__bits[0], kp_sigmask.__bits[1],
                            kp_sigmask.__bits[2], kp_sigmask.__bits[3]);

                        DPRINTF("kp.p_sigmask="
                            "%#02" PRIx32 "%02" PRIx32 "%02" PRIx32 "%02"
                            PRIx32 "\n",
                            kp.p_sigmask.__bits[0], kp.p_sigmask.__bits[1],
                            kp.p_sigmask.__bits[2], kp.p_sigmask.__bits[3]);

                        ATF_REQUIRE(sigismember((sigset_t *)&kp.p_sigmask,
                            SIGTRAP));
                }

                if (ignored) {
                        DPRINTF("kp_sigignore="
                            "%#02" PRIx32 "%02" PRIx32 "%02" PRIx32 "%02"
                            PRIx32 "\n",
                            kp_sigignore.__bits[0], kp_sigignore.__bits[1],
                            kp_sigignore.__bits[2], kp_sigignore.__bits[3]);

                        DPRINTF("kp.p_sigignore="
                            "%#02" PRIx32 "%02" PRIx32 "%02" PRIx32 "%02"
                            PRIx32 "\n",
                            kp.p_sigignore.__bits[0], kp.p_sigignore.__bits[1],
                            kp.p_sigignore.__bits[2], kp.p_sigignore.__bits[3]);

                        ATF_REQUIRE(sigismember((sigset_t *)&kp.p_sigignore,
                            SIGTRAP));
                }

                SYSCALL_REQUIRE(
                    ptrace(PT_GET_PROCESS_STATE, child2, &state, slen) != -1);
                if (strcmp(fn, "spawn") == 0) {
                        ATF_REQUIRE_EQ(
                            state.pe_report_event & PTRACE_POSIX_SPAWN,
                               PTRACE_POSIX_SPAWN);
                }
                if (strcmp(fn, "fork") == 0) {
                        ATF_REQUIRE_EQ(state.pe_report_event & PTRACE_FORK,
                               PTRACE_FORK);
                }
                if (strcmp(fn, "vfork") == 0) {
                        ATF_REQUIRE_EQ(state.pe_report_event & PTRACE_VFORK,
                               PTRACE_VFORK);
                }

                ATF_REQUIRE_EQ(state.pe_other_pid, child);

                DPRINTF("Before resuming the forkee process where it left off "
                    "and without signal to be sent\n");
                SYSCALL_REQUIRE(
                    ptrace(PT_CONTINUE, child2, (void *)1, 0) != -1);

                DPRINTF("Before resuming the child process where it left off "
                    "and without signal to be sent\n");
                SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
        }

        if (strcmp(fn, "vforkdone") == 0) {
                DPRINTF("Before calling %s() for the child %d\n", TWAIT_FNAME,
                    child);
                TWAIT_REQUIRE_SUCCESS(
                    wpid = TWAIT_GENERIC(child, &status, 0), child);

                validate_status_stopped(status, SIGTRAP);

                name[3] = child;
                ATF_REQUIRE_EQ(sysctl(name, namelen, &kp, &len, NULL, 0), 0);

                /*
                 * SIGCHLD is now pending in the signal queue and
                 * the kernel presents it to userland as a masked signal.
                 */
                sigdelset((sigset_t *)&kp.p_sigmask, SIGCHLD);

                if (masked) {
                        DPRINTF("kp_sigmask="
                            "%#02" PRIx32 "%02" PRIx32 "%02" PRIx32 "%02"
                            PRIx32 "\n",
                            kp_sigmask.__bits[0], kp_sigmask.__bits[1],
                            kp_sigmask.__bits[2], kp_sigmask.__bits[3]);

                        DPRINTF("kp.p_sigmask="
                            "%#02" PRIx32 "%02" PRIx32 "%02" PRIx32 "%02"
                            PRIx32 "\n",
                            kp.p_sigmask.__bits[0], kp.p_sigmask.__bits[1],
                            kp.p_sigmask.__bits[2], kp.p_sigmask.__bits[3]);

                        ATF_REQUIRE(sigismember((sigset_t *)&kp.p_sigmask,
                            SIGTRAP));
                }

                if (ignored) {
                        DPRINTF("kp_sigignore="
                            "%#02" PRIx32 "%02" PRIx32 "%02" PRIx32 "%02"
                            PRIx32 "\n",
                            kp_sigignore.__bits[0], kp_sigignore.__bits[1],
                            kp_sigignore.__bits[2], kp_sigignore.__bits[3]);

                        DPRINTF("kp.p_sigignore="
                            "%#02" PRIx32 "%02" PRIx32 "%02" PRIx32 "%02"
                            PRIx32 "\n",
                            kp.p_sigignore.__bits[0], kp.p_sigignore.__bits[1],
                            kp.p_sigignore.__bits[2], kp.p_sigignore.__bits[3]);

                        ATF_REQUIRE(sigismember((sigset_t *)&kp.p_sigignore,
                            SIGTRAP));
                }

                SYSCALL_REQUIRE(
                    ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
                ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_VFORK_DONE);

                child2 = state.pe_other_pid;
                DPRINTF("Reported PTRACE_VFORK_DONE event with forkee %d\n",
                    child2);

                DPRINTF("Before resuming the child process where it left off "
                    "and without signal to be sent\n");
                SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
        }

        if (strcmp(fn, "spawn") == 0 || strcmp(fn, "fork") == 0 ||
            strcmp(fn, "vfork") == 0) {
                DPRINTF("Before calling %s() for the forkee - expected exited"
                    "\n", TWAIT_FNAME);
                TWAIT_REQUIRE_SUCCESS(
                    wpid = TWAIT_GENERIC(child2, &status, 0), child2);

                validate_status_exited(status, exitval2);

                DPRINTF("Before calling %s() for the forkee - expected no "
                    "process\n", TWAIT_FNAME);
                TWAIT_REQUIRE_FAILURE(ECHILD,
                    wpid = TWAIT_GENERIC(child2, &status, 0));
        }

        DPRINTF("Before calling %s() for the child - expected exited\n",
            TWAIT_FNAME);
        TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);

        validate_status_exited(status, exitval);

        DPRINTF("Before calling %s() for the child - expected no process\n",
            TWAIT_FNAME);
        TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
}

#define FORK2_TEST(name,fn,masked,ignored)                              \
ATF_TC(name);                                                           \
ATF_TC_HEAD(name, tc)                                                   \
{                                                                       \
        atf_tc_set_md_var(tc, "descr", "Verify that " fn " is caught "  \
            "regardless of signal %s%s",                                \
            masked ? "masked" : "", ignored ? "ignored" : "");          \
}                                                                       \
                                                                        \
ATF_TC_BODY(name, tc)                                                   \
{                                                                       \
                                                                        \
        fork2_body(fn, masked, ignored);                                \
}

FORK2_TEST(posix_spawn_signalmasked, "spawn", true, false)
FORK2_TEST(posix_spawn_signalignored, "spawn", false, true)
FORK2_TEST(fork_signalmasked, "fork", true, false)
FORK2_TEST(fork_signalignored, "fork", false, true)
FORK2_TEST(vfork_signalmasked, "vfork", true, false)
FORK2_TEST(vfork_signalignored, "vfork", false, true)
FORK2_TEST(vforkdone_signalmasked, "vforkdone", true, false)
FORK2_TEST(vforkdone_signalignored, "vforkdone", false, true)
#endif

#define ATF_TP_ADD_TCS_PTRACE_WAIT_FORK() \
        ATF_TP_ADD_TC(tp, fork1); \
        ATF_TP_ADD_TC_HAVE_PID(tp, fork2); \
        ATF_TP_ADD_TC_HAVE_PID(tp, fork3); \
        ATF_TP_ADD_TC_HAVE_PID(tp, fork4); \
        ATF_TP_ADD_TC(tp, fork5); \
        ATF_TP_ADD_TC_HAVE_PID(tp, fork6); \
        ATF_TP_ADD_TC_HAVE_PID(tp, fork7); \
        ATF_TP_ADD_TC_HAVE_PID(tp, fork8); \
        ATF_TP_ADD_TC(tp, fork9); \
        ATF_TP_ADD_TC_HAVE_PID(tp, fork10); \
        ATF_TP_ADD_TC_HAVE_PID(tp, fork11); \
        ATF_TP_ADD_TC_HAVE_PID(tp, fork12); \
        ATF_TP_ADD_TC(tp, fork13); \
        ATF_TP_ADD_TC_HAVE_PID(tp, fork14); \
        ATF_TP_ADD_TC_HAVE_PID(tp, fork15); \
        ATF_TP_ADD_TC_HAVE_PID(tp, fork16); \
        ATF_TP_ADD_TC_HAVE_PID(tp, fork_setpgid); \
        ATF_TP_ADD_TC(tp, vfork1); \
        ATF_TP_ADD_TC_HAVE_PID(tp, vfork2); \
        ATF_TP_ADD_TC_HAVE_PID(tp, vfork3); \
        ATF_TP_ADD_TC_HAVE_PID(tp, vfork4); \
        ATF_TP_ADD_TC(tp, vfork5); \
        ATF_TP_ADD_TC_HAVE_PID(tp, vfork6); \
        ATF_TP_ADD_TC_HAVE_PID(tp, vfork7); \
        ATF_TP_ADD_TC_HAVE_PID(tp, vfork8); \
        ATF_TP_ADD_TC(tp, vfork9); \
        ATF_TP_ADD_TC_HAVE_PID(tp, vfork10); \
        ATF_TP_ADD_TC_HAVE_PID(tp, vfork11); \
        ATF_TP_ADD_TC_HAVE_PID(tp, vfork12); \
        ATF_TP_ADD_TC(tp, vfork13); \
        ATF_TP_ADD_TC_HAVE_PID(tp, vfork14); \
        ATF_TP_ADD_TC_HAVE_PID(tp, vfork15); \
        ATF_TP_ADD_TC_HAVE_PID(tp, vfork16); \
        ATF_TP_ADD_TC_HAVE_PID(tp, vfork_setpgid); \
        ATF_TP_ADD_TC(tp, posix_spawn1); \
        ATF_TP_ADD_TC(tp, posix_spawn2); \
        ATF_TP_ADD_TC(tp, posix_spawn3); \
        ATF_TP_ADD_TC(tp, posix_spawn4); \
        ATF_TP_ADD_TC(tp, posix_spawn5); \
        ATF_TP_ADD_TC(tp, posix_spawn6); \
        ATF_TP_ADD_TC(tp, posix_spawn7); \
        ATF_TP_ADD_TC(tp, posix_spawn8); \
        ATF_TP_ADD_TC_HAVE_PID(tp, posix_spawn9); \
        ATF_TP_ADD_TC_HAVE_PID(tp, posix_spawn10); \
        ATF_TP_ADD_TC_HAVE_PID(tp, posix_spawn11); \
        ATF_TP_ADD_TC_HAVE_PID(tp, posix_spawn12); \
        ATF_TP_ADD_TC_HAVE_PID(tp, posix_spawn13); \
        ATF_TP_ADD_TC_HAVE_PID(tp, posix_spawn14); \
        ATF_TP_ADD_TC_HAVE_PID(tp, posix_spawn15); \
        ATF_TP_ADD_TC_HAVE_PID(tp, posix_spawn16); \
        ATF_TP_ADD_TC_HAVE_PID(tp, posix_spawn_setpgid); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_fork1); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_fork2); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_fork3); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_fork4); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_fork5); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_fork6); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_fork7); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_fork8); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_fork9); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_fork10); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_fork11); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_fork12); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_fork13); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_fork14); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_fork15); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_fork16); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_fork_setpgid); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_vfork1); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_vfork2); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_vfork3); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_vfork4); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_vfork5); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_vfork6); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_vfork7); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_vfork8); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_vfork9); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_vfork10); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_vfork11); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_vfork12); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_vfork13); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_vfork14); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_vfork15); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_vfork16); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_vfork_setpgid); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_posix_spawn1); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_posix_spawn2); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_posix_spawn3); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_posix_spawn4); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_posix_spawn5); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_posix_spawn6); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_posix_spawn7); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_posix_spawn8); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_posix_spawn9); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_posix_spawn10); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_posix_spawn11); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_posix_spawn12); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_posix_spawn13); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_posix_spawn14); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_posix_spawn15); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_posix_spawn16); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_posix_spawn_setpgid); \
        ATF_TP_ADD_TC_HAVE_PID(tp, posix_spawn_detach_spawner); \
        ATF_TP_ADD_TC_HAVE_PID(tp, fork_detach_forker); \
        ATF_TP_ADD_TC_HAVE_PID(tp, vfork_detach_vforker); \
        ATF_TP_ADD_TC_HAVE_PID(tp, vfork_detach_vforkerdone); \
        ATF_TP_ADD_TC_HAVE_PID(tp, posix_spawn_kill_spawner); \
        ATF_TP_ADD_TC_HAVE_PID(tp, fork_kill_forker); \
        ATF_TP_ADD_TC_HAVE_PID(tp, vfork_kill_vforker); \
        ATF_TP_ADD_TC_HAVE_PID(tp, vfork_kill_vforkerdone); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_posix_spawn_detach_spawner); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_fork_detach_forker); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_vfork_detach_vforker); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_vfork_detach_vforkerdone); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_posix_spawn_kill_spawner); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_fork_kill_forker); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_vfork_kill_vforker); \
        ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_vfork_kill_vforkerdone); \
        ATF_TP_ADD_TC(tp, traceme_vfork_fork); \
        ATF_TP_ADD_TC(tp, traceme_vfork_vfork); \
        ATF_TP_ADD_TC_HAVE_PID(tp, posix_spawn_signalmasked); \
        ATF_TP_ADD_TC_HAVE_PID(tp, posix_spawn_signalignored); \
        ATF_TP_ADD_TC_HAVE_PID(tp, fork_signalmasked); \
        ATF_TP_ADD_TC_HAVE_PID(tp, fork_signalignored); \
        ATF_TP_ADD_TC_HAVE_PID(tp, vfork_signalmasked); \
        ATF_TP_ADD_TC_HAVE_PID(tp, vfork_signalignored); \
        ATF_TP_ADD_TC_HAVE_PID(tp, vforkdone_signalmasked); \
        ATF_TP_ADD_TC_HAVE_PID(tp, vforkdone_signalignored);