t_ptrace_wait.c revision 1.52
11.52Skamil/*	$NetBSD: t_ptrace_wait.c,v 1.52 2018/05/23 13:51:27 kamil Exp $	*/
21.1Skamil
31.1Skamil/*-
41.1Skamil * Copyright (c) 2016 The NetBSD Foundation, Inc.
51.1Skamil * All rights reserved.
61.1Skamil *
71.1Skamil * Redistribution and use in source and binary forms, with or without
81.1Skamil * modification, are permitted provided that the following conditions
91.1Skamil * are met:
101.1Skamil * 1. Redistributions of source code must retain the above copyright
111.1Skamil *    notice, this list of conditions and the following disclaimer.
121.1Skamil * 2. Redistributions in binary form must reproduce the above copyright
131.1Skamil *    notice, this list of conditions and the following disclaimer in the
141.1Skamil *    documentation and/or other materials provided with the distribution.
151.1Skamil *
161.1Skamil * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
171.1Skamil * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
181.1Skamil * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
191.1Skamil * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
201.1Skamil * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
211.1Skamil * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
221.1Skamil * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
231.1Skamil * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
241.1Skamil * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
251.1Skamil * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
261.1Skamil * POSSIBILITY OF SUCH DAMAGE.
271.1Skamil */
281.1Skamil
291.1Skamil#include <sys/cdefs.h>
301.52Skamil__RCSID("$NetBSD: t_ptrace_wait.c,v 1.52 2018/05/23 13:51:27 kamil Exp $");
311.1Skamil
321.1Skamil#include <sys/param.h>
331.1Skamil#include <sys/types.h>
341.39Skamil#include <sys/mman.h>
351.1Skamil#include <sys/ptrace.h>
361.1Skamil#include <sys/resource.h>
371.1Skamil#include <sys/stat.h>
381.1Skamil#include <sys/syscall.h>
391.1Skamil#include <sys/sysctl.h>
401.1Skamil#include <sys/wait.h>
411.1Skamil#include <machine/reg.h>
421.1Skamil#include <elf.h>
431.1Skamil#include <err.h>
441.1Skamil#include <errno.h>
451.1Skamil#include <lwp.h>
461.1Skamil#include <sched.h>
471.1Skamil#include <signal.h>
481.1Skamil#include <stdint.h>
491.1Skamil#include <stdio.h>
501.1Skamil#include <stdlib.h>
511.1Skamil#include <strings.h>
521.26Skamil#include <time.h>
531.1Skamil#include <unistd.h>
541.1Skamil
551.1Skamil#include <atf-c.h>
561.1Skamil
571.1Skamil#include "h_macros.h"
581.1Skamil
591.1Skamil#include "t_ptrace_wait.h"
601.1Skamil#include "msg.h"
611.1Skamil
621.1Skamil#define PARENT_TO_CHILD(info, fds, msg) \
631.13Schristos    SYSCALL_REQUIRE(msg_write_child(info " to child " # fds, &fds, &msg, sizeof(msg)) == 0)
641.1Skamil
651.1Skamil#define CHILD_FROM_PARENT(info, fds, msg) \
661.1Skamil    FORKEE_ASSERT(msg_read_parent(info " from parent " # fds, &fds, &msg, sizeof(msg)) == 0)
671.1Skamil
681.1Skamil#define CHILD_TO_PARENT(info, fds, msg) \
691.1Skamil    FORKEE_ASSERT(msg_write_parent(info " to parent " # fds, &fds, &msg, sizeof(msg)) == 0)
701.1Skamil
711.1Skamil#define PARENT_FROM_CHILD(info, fds, msg) \
721.13Schristos    SYSCALL_REQUIRE(msg_read_child(info " from parent " # fds, &fds, &msg, sizeof(msg)) == 0)
731.13Schristos
741.13Schristos#define SYSCALL_REQUIRE(expr) ATF_REQUIRE_MSG(expr, "%s: %s", # expr, \
751.13Schristos    strerror(errno))
761.18Schristos#define SYSCALL_REQUIRE_ERRNO(res, exp) ATF_REQUIRE_MSG(res == exp, \
771.18Schristos    "%d(%s) != %d", res, strerror(res), exp)
781.13Schristos
791.13Schristosstatic int debug = 0;
801.13Schristos
811.13Schristos#define DPRINTF(a, ...)	do  \
821.13Schristos	if (debug) printf(a,  ##__VA_ARGS__); \
831.13Schristos    while (/*CONSTCOND*/0)
841.1Skamil
851.34Skamil/// ----------------------------------------------------------------------------
861.34Skamil
871.33Skamilstatic void
881.33Skamiltraceme_raise(int sigval)
891.1Skamil{
901.1Skamil	const int exitval = 5;
911.1Skamil	pid_t child, wpid;
921.1Skamil#if defined(TWAIT_HAVE_STATUS)
931.1Skamil	int status;
941.1Skamil#endif
951.1Skamil
961.45Skamil	struct ptrace_siginfo info;
971.45Skamil	memset(&info, 0, sizeof(info));
981.45Skamil
991.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
1001.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
1011.1Skamil	if (child == 0) {
1021.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
1031.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
1041.1Skamil
1051.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
1061.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
1071.1Skamil
1081.36Skamil		switch (sigval) {
1091.36Skamil		case SIGKILL:
1101.36Skamil			/* NOTREACHED */
1111.36Skamil			FORKEE_ASSERTX(0 && "This shall not be reached");
1121.36Skamil		default:
1131.36Skamil			DPRINTF("Before exiting of the child process\n");
1141.36Skamil			_exit(exitval);
1151.36Skamil		}
1161.1Skamil	}
1171.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
1181.1Skamil
1191.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
1201.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
1211.1Skamil
1221.36Skamil	switch (sigval) {
1231.36Skamil	case SIGKILL:
1241.36Skamil		validate_status_signaled(status, sigval, 0);
1251.36Skamil		break;
1261.36Skamil	default:
1271.36Skamil		validate_status_stopped(status, sigval);
1281.1Skamil
1291.45Skamil		DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for "
1301.45Skamil		        "child\n");
1311.45Skamil		SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info,
1321.45Skamil		                       sizeof(info)) != -1);
1331.45Skamil
1341.45Skamil		DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
1351.45Skamil		DPRINTF("Signal properties: si_signo=%#x si_code=%#x "
1361.45Skamil		        "si_errno=%#x\n",
1371.45Skamil		        info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
1381.45Skamil		        info.psi_siginfo.si_errno);
1391.45Skamil
1401.45Skamil		ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigval);
1411.45Skamil		ATF_REQUIRE_EQ(info.psi_siginfo.si_code, SI_LWP);
1421.45Skamil
1431.36Skamil		DPRINTF("Before resuming the child process where it left off "
1441.36Skamil		    "and without signal to be sent\n");
1451.36Skamil		SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
1461.1Skamil
1471.36Skamil		DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
1481.36Skamil		TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0),
1491.36Skamil		                      child);
1501.36Skamil		break;
1511.36Skamil	}
1521.1Skamil
1531.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
1541.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
1551.1Skamil}
1561.1Skamil
1571.33Skamil#define TRACEME_RAISE(test, sig)						\
1581.33SkamilATF_TC(test);									\
1591.33SkamilATF_TC_HEAD(test, tc)								\
1601.33Skamil{										\
1611.33Skamil	atf_tc_set_md_var(tc, "descr",						\
1621.33Skamil	    "Verify " #sig " followed by _exit(2) in a child");			\
1631.33Skamil}										\
1641.33Skamil										\
1651.33SkamilATF_TC_BODY(test, tc)								\
1661.33Skamil{										\
1671.33Skamil										\
1681.33Skamil	traceme_raise(sig);							\
1691.33Skamil}
1701.33Skamil
1711.36SkamilTRACEME_RAISE(traceme_raise1, SIGKILL) /* non-maskable */
1721.33SkamilTRACEME_RAISE(traceme_raise2, SIGSTOP) /* non-maskable */
1731.33SkamilTRACEME_RAISE(traceme_raise3, SIGABRT) /* regular abort trap */
1741.33SkamilTRACEME_RAISE(traceme_raise4, SIGHUP)  /* hangup */
1751.33SkamilTRACEME_RAISE(traceme_raise5, SIGCONT) /* continued? */
1761.33Skamil
1771.34Skamil/// ----------------------------------------------------------------------------
1781.1Skamil
1791.1Skamilstatic void
1801.50Skamiltraceme_sendsignal_handle(int sigsent, void (*sah)(int a), int *traceme_caught)
1811.1Skamil{
1821.1Skamil	const int exitval = 5;
1831.34Skamil	const int sigval = SIGSTOP;
1841.1Skamil	pid_t child, wpid;
1851.1Skamil	struct sigaction sa;
1861.1Skamil#if defined(TWAIT_HAVE_STATUS)
1871.1Skamil	int status;
1881.1Skamil#endif
1891.1Skamil
1901.45Skamil	struct ptrace_siginfo info;
1911.45Skamil	memset(&info, 0, sizeof(info));
1921.45Skamil
1931.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
1941.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
1951.1Skamil	if (child == 0) {
1961.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
1971.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
1981.1Skamil
1991.34Skamil		sa.sa_handler = sah;
2001.1Skamil		sa.sa_flags = SA_SIGINFO;
2011.1Skamil		sigemptyset(&sa.sa_mask);
2021.1Skamil
2031.1Skamil		FORKEE_ASSERT(sigaction(sigsent, &sa, NULL) != -1);
2041.1Skamil
2051.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
2061.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
2071.1Skamil
2081.34Skamil		FORKEE_ASSERT_EQ(*traceme_caught, 1);
2091.1Skamil
2101.13Schristos		DPRINTF("Before exiting of the child process\n");
2111.1Skamil		_exit(exitval);
2121.1Skamil	}
2131.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
2141.1Skamil
2151.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
2161.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
2171.1Skamil
2181.1Skamil	validate_status_stopped(status, sigval);
2191.1Skamil
2201.45Skamil	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
2211.45Skamil	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info))
2221.45Skamil	                != -1);
2231.45Skamil
2241.45Skamil	DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
2251.45Skamil	DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n",
2261.45Skamil	    info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
2271.45Skamil	    info.psi_siginfo.si_errno);
2281.45Skamil
2291.45Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigval);
2301.45Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, SI_LWP);
2311.45Skamil
2321.13Schristos	DPRINTF("Before resuming the child process where it left off and with "
2331.1Skamil	    "signal %s to be sent\n", strsignal(sigsent));
2341.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, sigsent) != -1);
2351.1Skamil
2361.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
2371.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
2381.1Skamil
2391.1Skamil	validate_status_exited(status, exitval);
2401.1Skamil
2411.13Schristos	DPRINTF("Before calling %s() for the exited child\n", TWAIT_FNAME);
2421.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
2431.1Skamil}
2441.1Skamil
2451.50Skamil#define TRACEME_SENDSIGNAL_HANDLE(test, sig)					\
2461.34SkamilATF_TC(test);									\
2471.34SkamilATF_TC_HEAD(test, tc)								\
2481.34Skamil{										\
2491.34Skamil	atf_tc_set_md_var(tc, "descr",						\
2501.34Skamil	    "Verify that a signal " #sig " emitted by a tracer to a child is "	\
2511.34Skamil	    "handled correctly and caught by a signal handler");		\
2521.34Skamil}										\
2531.34Skamil										\
2541.34Skamilstatic int test##_caught = 0;							\
2551.34Skamil										\
2561.34Skamilstatic void									\
2571.34Skamiltest##_sighandler(int arg)							\
2581.34Skamil{										\
2591.34Skamil	FORKEE_ASSERT_EQ(arg, sig);						\
2601.34Skamil										\
2611.34Skamil	++ test##_caught;							\
2621.34Skamil}										\
2631.34Skamil										\
2641.34SkamilATF_TC_BODY(test, tc)								\
2651.34Skamil{										\
2661.34Skamil										\
2671.50Skamil	traceme_sendsignal_handle(sig, test##_sighandler, & test##_caught);	\
2681.34Skamil}
2691.34Skamil
2701.34Skamil// A signal handler for SIGKILL and SIGSTOP cannot be registered.
2711.50SkamilTRACEME_SENDSIGNAL_HANDLE(traceme_sendsignal_handle1, SIGABRT) /* abort trap */
2721.50SkamilTRACEME_SENDSIGNAL_HANDLE(traceme_sendsignal_handle2, SIGHUP)  /* hangup */
2731.50SkamilTRACEME_SENDSIGNAL_HANDLE(traceme_sendsignal_handle3, SIGCONT) /* continued? */
2741.34Skamil
2751.34Skamil/// ----------------------------------------------------------------------------
2761.34Skamil
2771.35Skamilstatic void
2781.50Skamiltraceme_sendsignal_masked(int sigsent)
2791.50Skamil{
2801.50Skamil	const int exitval = 5;
2811.50Skamil	const int sigval = SIGSTOP;
2821.50Skamil	pid_t child, wpid;
2831.50Skamil	sigset_t set;
2841.50Skamil#if defined(TWAIT_HAVE_STATUS)
2851.50Skamil	int status;
2861.50Skamil#endif
2871.50Skamil
2881.50Skamil	struct ptrace_siginfo info;
2891.50Skamil	memset(&info, 0, sizeof(info));
2901.50Skamil
2911.50Skamil	DPRINTF("Before forking process PID=%d\n", getpid());
2921.50Skamil	SYSCALL_REQUIRE((child = fork()) != -1);
2931.50Skamil	if (child == 0) {
2941.50Skamil		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
2951.50Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
2961.50Skamil
2971.50Skamil		sigemptyset(&set);
2981.50Skamil		sigaddset(&set, sigsent);
2991.50Skamil		FORKEE_ASSERT(sigprocmask(SIG_BLOCK, &set, NULL) != -1);
3001.50Skamil
3011.50Skamil		DPRINTF("Before raising %s from child\n", strsignal(sigval));
3021.50Skamil		FORKEE_ASSERT(raise(sigval) == 0);
3031.50Skamil
3041.50Skamil		_exit(exitval);
3051.50Skamil	}
3061.50Skamil	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
3071.50Skamil
3081.50Skamil	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
3091.50Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
3101.50Skamil
3111.50Skamil	validate_status_stopped(status, sigval);
3121.50Skamil
3131.50Skamil	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
3141.50Skamil	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info))
3151.50Skamil	                != -1);
3161.50Skamil
3171.50Skamil	DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
3181.50Skamil	DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n",
3191.50Skamil	    info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
3201.50Skamil	    info.psi_siginfo.si_errno);
3211.50Skamil
3221.50Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigval);
3231.50Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, SI_LWP);
3241.50Skamil
3251.50Skamil	DPRINTF("Before resuming the child process where it left off and with "
3261.50Skamil	    "signal %s to be sent\n", strsignal(sigsent));
3271.50Skamil	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, sigsent) != -1);
3281.50Skamil
3291.50Skamil	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
3301.50Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
3311.50Skamil
3321.50Skamil	validate_status_exited(status, exitval);
3331.50Skamil
3341.50Skamil	DPRINTF("Before calling %s() for the exited child\n", TWAIT_FNAME);
3351.50Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
3361.50Skamil}
3371.50Skamil
3381.50Skamil#define TRACEME_SENDSIGNAL_MASKED(test, sig)					\
3391.50SkamilATF_TC(test);									\
3401.50SkamilATF_TC_HEAD(test, tc)								\
3411.50Skamil{										\
3421.50Skamil	atf_tc_set_md_var(tc, "descr",						\
3431.50Skamil	    "Verify that a signal " #sig " emitted by a tracer to a child is "	\
3441.50Skamil	    "handled correctly and the signal is masked by SIG_BLOCK");		\
3451.50Skamil}										\
3461.50Skamil										\
3471.50SkamilATF_TC_BODY(test, tc)								\
3481.50Skamil{										\
3491.50Skamil										\
3501.50Skamil	traceme_sendsignal_masked(sig);						\
3511.50Skamil}
3521.50Skamil
3531.50Skamil// A signal handler for SIGKILL and SIGSTOP cannot be masked.
3541.50SkamilTRACEME_SENDSIGNAL_MASKED(traceme_sendsignal_masked1, SIGABRT) /* abort trap */
3551.50SkamilTRACEME_SENDSIGNAL_MASKED(traceme_sendsignal_masked2, SIGHUP)  /* hangup */
3561.50SkamilTRACEME_SENDSIGNAL_MASKED(traceme_sendsignal_masked3, SIGCONT) /* continued? */
3571.50Skamil
3581.50Skamil/// ----------------------------------------------------------------------------
3591.50Skamil
3601.50Skamilstatic void
3611.50Skamiltraceme_sendsignal_ignored(int sigsent)
3621.50Skamil{
3631.50Skamil	const int exitval = 5;
3641.50Skamil	const int sigval = SIGSTOP;
3651.50Skamil	pid_t child, wpid;
3661.50Skamil	struct sigaction sa;
3671.50Skamil#if defined(TWAIT_HAVE_STATUS)
3681.50Skamil	int status;
3691.50Skamil#endif
3701.50Skamil
3711.50Skamil	struct ptrace_siginfo info;
3721.50Skamil	memset(&info, 0, sizeof(info));
3731.50Skamil
3741.50Skamil	DPRINTF("Before forking process PID=%d\n", getpid());
3751.50Skamil	SYSCALL_REQUIRE((child = fork()) != -1);
3761.50Skamil	if (child == 0) {
3771.50Skamil		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
3781.50Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
3791.50Skamil
3801.50Skamil		memset(&sa, 0, sizeof(sa));
3811.50Skamil		sa.sa_handler = SIG_IGN;
3821.50Skamil		sigemptyset(&sa.sa_mask);
3831.50Skamil		FORKEE_ASSERT(sigaction(sigsent, &sa, NULL) != -1);
3841.50Skamil
3851.50Skamil		DPRINTF("Before raising %s from child\n", strsignal(sigval));
3861.50Skamil		FORKEE_ASSERT(raise(sigval) == 0);
3871.50Skamil
3881.50Skamil		_exit(exitval);
3891.50Skamil	}
3901.50Skamil	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
3911.50Skamil
3921.50Skamil	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
3931.50Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
3941.50Skamil
3951.50Skamil	validate_status_stopped(status, sigval);
3961.50Skamil
3971.50Skamil	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
3981.50Skamil	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info))
3991.50Skamil	                != -1);
4001.50Skamil
4011.50Skamil	DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
4021.50Skamil	DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n",
4031.50Skamil	    info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
4041.50Skamil	    info.psi_siginfo.si_errno);
4051.50Skamil
4061.50Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigval);
4071.50Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, SI_LWP);
4081.50Skamil
4091.50Skamil	DPRINTF("Before resuming the child process where it left off and with "
4101.50Skamil	    "signal %s to be sent\n", strsignal(sigsent));
4111.50Skamil	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, sigsent) != -1);
4121.50Skamil
4131.50Skamil	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
4141.50Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
4151.50Skamil
4161.50Skamil	validate_status_exited(status, exitval);
4171.50Skamil
4181.50Skamil	DPRINTF("Before calling %s() for the exited child\n", TWAIT_FNAME);
4191.50Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
4201.50Skamil}
4211.50Skamil
4221.50Skamil#define TRACEME_SENDSIGNAL_IGNORED(test, sig)					\
4231.50SkamilATF_TC(test);									\
4241.50SkamilATF_TC_HEAD(test, tc)								\
4251.50Skamil{										\
4261.50Skamil	atf_tc_set_md_var(tc, "descr",						\
4271.50Skamil	    "Verify that a signal " #sig " emitted by a tracer to a child is "	\
4281.50Skamil	    "handled correctly and the signal is masked by SIG_IGN");		\
4291.50Skamil}										\
4301.50Skamil										\
4311.50SkamilATF_TC_BODY(test, tc)								\
4321.50Skamil{										\
4331.50Skamil										\
4341.50Skamil	traceme_sendsignal_ignored(sig);					\
4351.50Skamil}
4361.50Skamil
4371.50Skamil// A signal handler for SIGKILL and SIGSTOP cannot be ignored.
4381.50SkamilTRACEME_SENDSIGNAL_IGNORED(traceme_sendsignal_ignored1, SIGABRT) /* abort trap */
4391.50SkamilTRACEME_SENDSIGNAL_IGNORED(traceme_sendsignal_ignored2, SIGHUP)  /* hangup */
4401.50SkamilTRACEME_SENDSIGNAL_IGNORED(traceme_sendsignal_ignored3, SIGCONT) /* continued? */
4411.50Skamil
4421.50Skamil/// ----------------------------------------------------------------------------
4431.50Skamil
4441.50Skamilstatic void
4451.50Skamiltraceme_sendsignal_simple(int sigsent)
4461.1Skamil{
4471.35Skamil	const int sigval = SIGSTOP;
4481.35Skamil	int exitval = 0;
4491.1Skamil	pid_t child, wpid;
4501.1Skamil#if defined(TWAIT_HAVE_STATUS)
4511.1Skamil	int status;
4521.35Skamil	int expect_core = (sigsent == SIGABRT) ? 1 : 0;
4531.1Skamil#endif
4541.1Skamil
4551.45Skamil	struct ptrace_siginfo info;
4561.45Skamil	memset(&info, 0, sizeof(info));
4571.45Skamil
4581.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
4591.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
4601.1Skamil	if (child == 0) {
4611.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
4621.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
4631.1Skamil
4641.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
4651.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
4661.1Skamil
4671.35Skamil		switch (sigsent) {
4681.35Skamil		case SIGCONT:
4691.48Skamil		case SIGSTOP:
4701.35Skamil			_exit(exitval);
4711.35Skamil		default:
4721.35Skamil			/* NOTREACHED */
4731.35Skamil			FORKEE_ASSERTX(0 && "This shall not be reached");
4741.35Skamil		}
4751.1Skamil	}
4761.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
4771.1Skamil
4781.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
4791.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
4801.1Skamil
4811.1Skamil	validate_status_stopped(status, sigval);
4821.1Skamil
4831.45Skamil	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
4841.45Skamil	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info))
4851.45Skamil	                != -1);
4861.45Skamil
4871.45Skamil	DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
4881.45Skamil	DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n",
4891.45Skamil	    info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
4901.45Skamil	    info.psi_siginfo.si_errno);
4911.45Skamil
4921.45Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigval);
4931.45Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, SI_LWP);
4941.45Skamil
4951.13Schristos	DPRINTF("Before resuming the child process where it left off and with "
4961.1Skamil	    "signal %s to be sent\n", strsignal(sigsent));
4971.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, sigsent) != -1);
4981.1Skamil
4991.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
5001.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
5011.1Skamil
5021.35Skamil	switch (sigsent) {
5031.48Skamil	case SIGSTOP:
5041.48Skamil		validate_status_stopped(status, sigsent);
5051.48Skamil		DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for "
5061.48Skamil		        "child\n");
5071.48Skamil		SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info,
5081.48Skamil		                       sizeof(info)) != -1);
5091.48Skamil
5101.48Skamil		DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
5111.48Skamil		DPRINTF("Signal properties: si_signo=%#x si_code=%#x "
5121.48Skamil		        "si_errno=%#x\n",
5131.48Skamil			info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
5141.48Skamil		        info.psi_siginfo.si_errno);
5151.48Skamil
5161.48Skamil		ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigval);
5171.48Skamil		ATF_REQUIRE_EQ(info.psi_siginfo.si_code, SI_LWP);
5181.48Skamil
5191.48Skamil		DPRINTF("Before resuming the child process where it left off "
5201.48Skamil		        "and with signal %s to be sent\n", strsignal(sigsent));
5211.48Skamil		SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
5221.48Skamil
5231.48Skamil		DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
5241.48Skamil		TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0),
5251.48Skamil		                      child);
5261.48Skamil		/* FALLTHROUGH */
5271.35Skamil	case SIGCONT:
5281.35Skamil		validate_status_exited(status, exitval);
5291.35Skamil		break;
5301.35Skamil	default:
5311.35Skamil		validate_status_signaled(status, sigsent, expect_core);
5321.35Skamil		break;
5331.35Skamil	}
5341.1Skamil
5351.13Schristos	DPRINTF("Before calling %s() for the exited child\n", TWAIT_FNAME);
5361.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
5371.1Skamil}
5381.1Skamil
5391.50Skamil#define TRACEME_SENDSIGNAL_SIMPLE(test, sig)					\
5401.35SkamilATF_TC(test);									\
5411.35SkamilATF_TC_HEAD(test, tc)								\
5421.35Skamil{										\
5431.35Skamil	atf_tc_set_md_var(tc, "descr",						\
5441.35Skamil	    "Verify that a signal " #sig " emitted by a tracer to a child is "	\
5451.35Skamil	    "handled correctly in a child without a signal handler");		\
5461.35Skamil}										\
5471.35Skamil										\
5481.35SkamilATF_TC_BODY(test, tc)								\
5491.35Skamil{										\
5501.35Skamil										\
5511.50Skamil	traceme_sendsignal_simple(sig);						\
5521.35Skamil}
5531.35Skamil
5541.50SkamilTRACEME_SENDSIGNAL_SIMPLE(traceme_sendsignal_simple1, SIGKILL) /* non-maskable */
5551.50SkamilTRACEME_SENDSIGNAL_SIMPLE(traceme_sendsignal_simple2, SIGSTOP) /* non-maskable */
5561.50SkamilTRACEME_SENDSIGNAL_SIMPLE(traceme_sendsignal_simple3, SIGABRT) /* abort trap */
5571.50SkamilTRACEME_SENDSIGNAL_SIMPLE(traceme_sendsignal_simple4, SIGHUP)  /* hangup */
5581.50SkamilTRACEME_SENDSIGNAL_SIMPLE(traceme_sendsignal_simple5, SIGCONT) /* continued? */
5591.35Skamil
5601.35Skamil/// ----------------------------------------------------------------------------
5611.35Skamil
5621.37SkamilATF_TC(traceme_pid1_parent);
5631.37SkamilATF_TC_HEAD(traceme_pid1_parent, tc)
5641.37Skamil{
5651.37Skamil	atf_tc_set_md_var(tc, "descr",
5661.37Skamil	    "Verify that PT_TRACE_ME is not allowed when our parent is PID1");
5671.37Skamil}
5681.37Skamil
5691.37SkamilATF_TC_BODY(traceme_pid1_parent, tc)
5701.37Skamil{
5711.37Skamil	struct msg_fds parent_child;
5721.37Skamil	int exitval_child1 = 1, exitval_child2 = 2;
5731.37Skamil	pid_t child1, child2, wpid;
5741.37Skamil	uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */
5751.37Skamil#if defined(TWAIT_HAVE_STATUS)
5761.37Skamil	int status;
5771.37Skamil#endif
5781.37Skamil
5791.37Skamil	SYSCALL_REQUIRE(msg_open(&parent_child) == 0);
5801.37Skamil
5811.37Skamil	DPRINTF("Before forking process PID=%d\n", getpid());
5821.37Skamil	SYSCALL_REQUIRE((child1 = fork()) != -1);
5831.37Skamil	if (child1 == 0) {
5841.37Skamil		DPRINTF("Before forking process PID=%d\n", getpid());
5851.37Skamil		SYSCALL_REQUIRE((child2 = fork()) != -1);
5861.37Skamil		if (child2 != 0) {
5871.37Skamil			DPRINTF("Parent process PID=%d, child2's PID=%d\n",
5881.37Skamil			        getpid(), child2);
5891.37Skamil			_exit(exitval_child1);
5901.37Skamil		}
5911.37Skamil		CHILD_FROM_PARENT("exit child1", parent_child, msg);
5921.37Skamil
5931.37Skamil		DPRINTF("Assert that our parent is PID1 (initproc)\n");
5941.37Skamil		FORKEE_ASSERT_EQ(getppid(), 1);
5951.37Skamil
5961.37Skamil		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
5971.37Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) == -1);
5981.37Skamil		SYSCALL_REQUIRE_ERRNO(errno, EPERM);
5991.37Skamil
6001.37Skamil		CHILD_TO_PARENT("child2 exiting", parent_child, msg);
6011.37Skamil
6021.37Skamil		_exit(exitval_child2);
6031.37Skamil	}
6041.37Skamil	DPRINTF("Parent process PID=%d, child1's PID=%d\n", getpid(), child1);
6051.37Skamil
6061.37Skamil	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
6071.37Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child1, &status, WEXITED),
6081.37Skamil	                      child1);
6091.37Skamil
6101.37Skamil	validate_status_exited(status, exitval_child1);
6111.37Skamil
6121.37Skamil	DPRINTF("Notify that child1 is dead\n");
6131.37Skamil	PARENT_TO_CHILD("exit child1", parent_child, msg);
6141.37Skamil
6151.37Skamil	DPRINTF("Wait for exiting of child2\n");
6161.37Skamil	PARENT_FROM_CHILD("child2 exiting", parent_child, msg);
6171.37Skamil}
6181.37Skamil
6191.37Skamil/// ----------------------------------------------------------------------------
6201.37Skamil
6211.40Skamilstatic void
6221.40Skamiltraceme_vfork_raise(int sigval)
6231.40Skamil{
6241.46Skamil	const int exitval = 5, exitval_watcher = 10;
6251.46Skamil	pid_t child, parent, watcher, wpid;
6261.46Skamil	int rv;
6271.40Skamil#if defined(TWAIT_HAVE_STATUS)
6281.40Skamil	int status;
6291.40Skamil	int expect_core = (sigval == SIGABRT) ? 1 : 0;
6301.40Skamil#endif
6311.40Skamil
6321.46Skamil	/*
6331.46Skamil	 * Spawn a dedicated thread to watch for a stopped child and emit
6341.46Skamil	 * the SIGKILL signal to it.
6351.46Skamil	 *
6361.46Skamil	 * vfork(2) might clobber watcher, this means that it's safer and
6371.46Skamil	 * simpler to reparent this process to initproc and forget about it.
6381.46Skamil	 */
6391.46Skamil	if (sigval == SIGSTOP) {
6401.46Skamil		parent = getpid();
6411.46Skamil
6421.46Skamil		watcher = fork();
6431.46Skamil		ATF_REQUIRE(watcher != 1);
6441.46Skamil		if (watcher == 0) {
6451.46Skamil			/* Double fork(2) trick to reparent to initproc */
6461.46Skamil			watcher = fork();
6471.46Skamil			FORKEE_ASSERT_NEQ(watcher, -1);
6481.46Skamil			if (watcher != 0)
6491.46Skamil				_exit(exitval_watcher);
6501.46Skamil
6511.46Skamil			child = await_stopped_child(parent);
6521.46Skamil
6531.46Skamil			errno = 0;
6541.46Skamil			rv = kill(child, SIGKILL);
6551.46Skamil			FORKEE_ASSERT_EQ(rv, 0);
6561.46Skamil			FORKEE_ASSERT_EQ(errno, 0);
6571.46Skamil
6581.46Skamil			/* This exit value will be collected by initproc */
6591.46Skamil			_exit(0);
6601.46Skamil		}
6611.46Skamil		DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
6621.46Skamil		TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(watcher, &status, 0),
6631.46Skamil		                      watcher);
6641.46Skamil
6651.46Skamil		validate_status_exited(status, exitval_watcher);
6661.46Skamil
6671.46Skamil		DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
6681.46Skamil		TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(watcher,
6691.46Skamil		                                                   &status, 0));
6701.46Skamil	}
6711.46Skamil
6721.40Skamil	DPRINTF("Before forking process PID=%d\n", getpid());
6731.40Skamil	SYSCALL_REQUIRE((child = vfork()) != -1);
6741.40Skamil	if (child == 0) {
6751.40Skamil		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
6761.40Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
6771.40Skamil
6781.40Skamil		DPRINTF("Before raising %s from child\n", strsignal(sigval));
6791.40Skamil		FORKEE_ASSERT(raise(sigval) == 0);
6801.40Skamil
6811.40Skamil		switch (sigval) {
6821.46Skamil		case SIGSTOP:
6831.40Skamil		case SIGKILL:
6841.40Skamil		case SIGABRT:
6851.40Skamil		case SIGHUP:
6861.40Skamil			/* NOTREACHED */
6871.40Skamil			FORKEE_ASSERTX(0 && "This shall not be reached");
6881.40Skamil		default:
6891.40Skamil			DPRINTF("Before exiting of the child process\n");
6901.40Skamil			_exit(exitval);
6911.40Skamil		}
6921.40Skamil	}
6931.40Skamil	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
6941.40Skamil
6951.40Skamil	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
6961.40Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
6971.40Skamil
6981.40Skamil	switch (sigval) {
6991.40Skamil	case SIGKILL:
7001.40Skamil	case SIGABRT:
7011.40Skamil	case SIGHUP:
7021.40Skamil		validate_status_signaled(status, sigval, expect_core);
7031.40Skamil		break;
7041.40Skamil	case SIGSTOP:
7051.46Skamil		validate_status_signaled(status, SIGKILL, 0);
7061.46Skamil		break;
7071.40Skamil	case SIGCONT:
7081.47Skamil	case SIGTSTP:
7091.47Skamil	case SIGTTIN:
7101.47Skamil	case SIGTTOU:
7111.40Skamil		validate_status_exited(status, exitval);
7121.40Skamil		break;
7131.40Skamil	default:
7141.40Skamil		/* NOTREACHED */
7151.40Skamil		ATF_REQUIRE(0 && "NOT IMPLEMENTED");
7161.40Skamil		break;
7171.40Skamil	}
7181.40Skamil
7191.40Skamil	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
7201.40Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
7211.40Skamil}
7221.40Skamil
7231.40Skamil#define TRACEME_VFORK_RAISE(test, sig)						\
7241.40SkamilATF_TC(test);									\
7251.40SkamilATF_TC_HEAD(test, tc)								\
7261.40Skamil{										\
7271.40Skamil	atf_tc_set_md_var(tc, "descr",						\
7281.42Skamil	    "Verify PT_TRACE_ME followed by raise of " #sig " in a vfork(2)ed "	\
7291.42Skamil	    "child");								\
7301.40Skamil}										\
7311.40Skamil										\
7321.40SkamilATF_TC_BODY(test, tc)								\
7331.40Skamil{										\
7341.40Skamil										\
7351.40Skamil	traceme_vfork_raise(sig);						\
7361.40Skamil}
7371.40Skamil
7381.40SkamilTRACEME_VFORK_RAISE(traceme_vfork_raise1, SIGKILL) /* non-maskable */
7391.46SkamilTRACEME_VFORK_RAISE(traceme_vfork_raise2, SIGSTOP) /* non-maskable */
7401.47SkamilTRACEME_VFORK_RAISE(traceme_vfork_raise3, SIGTSTP) /* ignored in vfork(2) */
7411.47SkamilTRACEME_VFORK_RAISE(traceme_vfork_raise4, SIGTTIN) /* ignored in vfork(2) */
7421.47SkamilTRACEME_VFORK_RAISE(traceme_vfork_raise5, SIGTTOU) /* ignored in vfork(2) */
7431.47SkamilTRACEME_VFORK_RAISE(traceme_vfork_raise6, SIGABRT) /* regular abort trap */
7441.47SkamilTRACEME_VFORK_RAISE(traceme_vfork_raise7, SIGHUP)  /* hangup */
7451.47SkamilTRACEME_VFORK_RAISE(traceme_vfork_raise8, SIGCONT) /* continued? */
7461.40Skamil
7471.40Skamil/// ----------------------------------------------------------------------------
7481.40Skamil
7491.52Skamilstatic void
7501.52Skamiltraceme_vfork_crash(int sig)
7511.41Skamil{
7521.41Skamil	pid_t child, wpid;
7531.41Skamil#if defined(TWAIT_HAVE_STATUS)
7541.41Skamil	int status;
7551.41Skamil#endif
7561.41Skamil
7571.41Skamil	DPRINTF("Before forking process PID=%d\n", getpid());
7581.41Skamil	SYSCALL_REQUIRE((child = vfork()) != -1);
7591.41Skamil	if (child == 0) {
7601.41Skamil		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
7611.41Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
7621.41Skamil
7631.52Skamil		DPRINTF("Before executing a trap\n");
7641.52Skamil		switch (sig) {
7651.52Skamil		case SIGTRAP:
7661.52Skamil			trigger_trap();
7671.52Skamil			break;
7681.52Skamil		case SIGSEGV:
7691.52Skamil			trigger_segv();
7701.52Skamil			break;
7711.52Skamil		case SIGILL:
7721.52Skamil			trigger_ill();
7731.52Skamil			break;
7741.52Skamil		case SIGFPE:
7751.52Skamil			trigger_fpe();
7761.52Skamil			break;
7771.52Skamil		case SIGBUS:
7781.52Skamil			trigger_bus();
7791.52Skamil			break;
7801.52Skamil		default:
7811.52Skamil			/* NOTREACHED */
7821.52Skamil			FORKEE_ASSERTX(0 && "This shall not be reached");
7831.52Skamil		}
7841.41Skamil
7851.41Skamil		/* NOTREACHED */
7861.41Skamil		FORKEE_ASSERTX(0 && "This shall not be reached");
7871.41Skamil	}
7881.41Skamil	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
7891.41Skamil
7901.41Skamil	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
7911.41Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
7921.41Skamil
7931.52Skamil	validate_status_signaled(status, sig, 1);
7941.41Skamil
7951.41Skamil	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
7961.41Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
7971.41Skamil}
7981.41Skamil
7991.52Skamil#define TRACEME_VFORK_CRASH(test, sig)						\
8001.52SkamilATF_TC(test);									\
8011.52SkamilATF_TC_HEAD(test, tc)								\
8021.52Skamil{										\
8031.52Skamil	atf_tc_set_md_var(tc, "descr",						\
8041.52Skamil	    "Verify PT_TRACE_ME followed by a crash signal " #sig " in a "	\
8051.52Skamil	    "vfork(2)ed child");						\
8061.52Skamil}										\
8071.52Skamil										\
8081.52SkamilATF_TC_BODY(test, tc)								\
8091.52Skamil{										\
8101.52Skamil										\
8111.52Skamil	traceme_vfork_crash(sig);						\
8121.52Skamil}
8131.52Skamil
8141.52SkamilTRACEME_VFORK_CRASH(traceme_vfork_crash_trap, SIGTRAP)
8151.52SkamilTRACEME_VFORK_CRASH(traceme_vfork_crash_segv, SIGSEGV)
8161.52Skamil//TRACEME_VFORK_CRASH(traceme_vfork_crash_ill, SIGILL)
8171.52SkamilTRACEME_VFORK_CRASH(traceme_vfork_crash_fpe, SIGFPE)
8181.52SkamilTRACEME_VFORK_CRASH(traceme_vfork_crash_bus, SIGBUS)
8191.52Skamil
8201.41Skamil/// ----------------------------------------------------------------------------
8211.41Skamil
8221.43SkamilATF_TC(traceme_vfork_exec);
8231.43SkamilATF_TC_HEAD(traceme_vfork_exec, tc)
8241.43Skamil{
8251.43Skamil	atf_tc_set_md_var(tc, "descr",
8261.43Skamil	    "Verify PT_TRACE_ME followed by exec(3) in a vfork(2)ed child");
8271.43Skamil}
8281.43Skamil
8291.43SkamilATF_TC_BODY(traceme_vfork_exec, tc)
8301.43Skamil{
8311.43Skamil	const int sigval = SIGTRAP;
8321.43Skamil	pid_t child, wpid;
8331.43Skamil#if defined(TWAIT_HAVE_STATUS)
8341.43Skamil	int status;
8351.43Skamil#endif
8361.43Skamil
8371.43Skamil	struct ptrace_siginfo info;
8381.43Skamil	memset(&info, 0, sizeof(info));
8391.43Skamil
8401.43Skamil	DPRINTF("Before forking process PID=%d\n", getpid());
8411.43Skamil	SYSCALL_REQUIRE((child = vfork()) != -1);
8421.43Skamil	if (child == 0) {
8431.43Skamil		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
8441.43Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
8451.43Skamil
8461.43Skamil		DPRINTF("Before calling execve(2) from child\n");
8471.43Skamil		execlp("/bin/echo", "/bin/echo", NULL);
8481.43Skamil
8491.43Skamil		/* NOTREACHED */
8501.43Skamil		FORKEE_ASSERTX(0 && "Not reached");
8511.43Skamil	}
8521.43Skamil	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
8531.43Skamil
8541.43Skamil	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
8551.43Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
8561.43Skamil
8571.43Skamil	validate_status_stopped(status, sigval);
8581.43Skamil
8591.43Skamil	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
8601.43Skamil	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
8611.43Skamil
8621.43Skamil	DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
8631.43Skamil	DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n",
8641.43Skamil	    info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
8651.43Skamil	    info.psi_siginfo.si_errno);
8661.43Skamil
8671.43Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigval);
8681.43Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_EXEC);
8691.43Skamil
8701.43Skamil	DPRINTF("Before resuming the child process where it left off and "
8711.43Skamil	    "without signal to be sent\n");
8721.43Skamil	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
8731.43Skamil
8741.43Skamil	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
8751.43Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
8761.43Skamil
8771.43Skamil	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
8781.43Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
8791.43Skamil}
8801.43Skamil
8811.43Skamil/// ----------------------------------------------------------------------------
8821.43Skamil
8831.1Skamil#if defined(TWAIT_HAVE_PID)
8841.51Skamilstatic void
8851.51Skamiltracer_sees_terminaton_before_the_parent_raw(bool notimeout, bool unrelated)
8861.1Skamil{
8871.51Skamil	/*
8881.51Skamil	 * notimeout - disable timeout in await zombie function
8891.51Skamil	 * unrelated - attach from unrelated tracer reparented to initproc
8901.51Skamil	 */
8911.1Skamil
8921.1Skamil	struct msg_fds parent_tracee, parent_tracer;
8931.1Skamil	const int exitval_tracee = 5;
8941.1Skamil	const int exitval_tracer = 10;
8951.1Skamil	pid_t tracee, tracer, wpid;
8961.1Skamil	uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */
8971.1Skamil#if defined(TWAIT_HAVE_STATUS)
8981.1Skamil	int status;
8991.1Skamil#endif
9001.1Skamil
9011.13Schristos	DPRINTF("Spawn tracee\n");
9021.13Schristos	SYSCALL_REQUIRE(msg_open(&parent_tracee) == 0);
9031.1Skamil	tracee = atf_utils_fork();
9041.1Skamil	if (tracee == 0) {
9051.1Skamil		// Wait for parent to let us exit
9061.1Skamil		CHILD_FROM_PARENT("exit tracee", parent_tracee, msg);
9071.1Skamil		_exit(exitval_tracee);
9081.1Skamil	}
9091.1Skamil
9101.13Schristos	DPRINTF("Spawn debugger\n");
9111.13Schristos	SYSCALL_REQUIRE(msg_open(&parent_tracer) == 0);
9121.1Skamil	tracer = atf_utils_fork();
9131.1Skamil	if (tracer == 0) {
9141.51Skamil		if(unrelated) {
9151.51Skamil			/* Fork again and drop parent to reattach to PID 1 */
9161.51Skamil			tracer = atf_utils_fork();
9171.51Skamil			if (tracer != 0)
9181.51Skamil				_exit(exitval_tracer);
9191.51Skamil		}
9201.51Skamil
9211.13Schristos		DPRINTF("Before calling PT_ATTACH from tracee %d\n", getpid());
9221.1Skamil		FORKEE_ASSERT(ptrace(PT_ATTACH, tracee, NULL, 0) != -1);
9231.1Skamil
9241.1Skamil		/* Wait for tracee and assert that it was stopped w/ SIGSTOP */
9251.1Skamil		FORKEE_REQUIRE_SUCCESS(
9261.1Skamil		    wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);
9271.1Skamil
9281.1Skamil		forkee_status_stopped(status, SIGSTOP);
9291.1Skamil
9301.1Skamil		/* Resume tracee with PT_CONTINUE */
9311.1Skamil		FORKEE_ASSERT(ptrace(PT_CONTINUE, tracee, (void *)1, 0) != -1);
9321.1Skamil
9331.1Skamil		/* Inform parent that tracer has attached to tracee */
9341.1Skamil		CHILD_TO_PARENT("tracer ready", parent_tracer, msg);
9351.1Skamil
9361.1Skamil		/* Wait for parent to tell use that tracee should have exited */
9371.1Skamil		CHILD_FROM_PARENT("wait for tracee exit", parent_tracer, msg);
9381.1Skamil
9391.1Skamil		/* Wait for tracee and assert that it exited */
9401.1Skamil		FORKEE_REQUIRE_SUCCESS(
9411.1Skamil		    wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);
9421.1Skamil
9431.1Skamil		forkee_status_exited(status, exitval_tracee);
9441.13Schristos		DPRINTF("Tracee %d exited with %d\n", tracee, exitval_tracee);
9451.1Skamil
9461.13Schristos		DPRINTF("Before exiting of the tracer process\n");
9471.51Skamil		_exit(unrelated ? 0 /* collect by initproc */ : exitval_tracer);
9481.51Skamil	}
9491.51Skamil
9501.51Skamil	if (unrelated) {
9511.51Skamil		DPRINTF("Wait for the tracer process (direct child) to exit "
9521.51Skamil		    "calling %s()\n", TWAIT_FNAME);
9531.51Skamil		TWAIT_REQUIRE_SUCCESS(
9541.51Skamil		    wpid = TWAIT_GENERIC(tracer, &status, 0), tracer);
9551.51Skamil
9561.51Skamil		validate_status_exited(status, exitval_tracer);
9571.51Skamil
9581.51Skamil		DPRINTF("Wait for the non-exited tracee process with %s()\n",
9591.51Skamil		    TWAIT_FNAME);
9601.51Skamil		TWAIT_REQUIRE_SUCCESS(
9611.51Skamil		    wpid = TWAIT_GENERIC(tracee, NULL, WNOHANG), 0);
9621.1Skamil	}
9631.1Skamil
9641.13Schristos	DPRINTF("Wait for the tracer to attach to the tracee\n");
9651.1Skamil	PARENT_FROM_CHILD("tracer ready", parent_tracer, msg);
9661.1Skamil
9671.13Schristos	DPRINTF("Resume the tracee and let it exit\n");
9681.1Skamil	PARENT_TO_CHILD("exit tracee", parent_tracee,  msg);
9691.1Skamil
9701.13Schristos	DPRINTF("Detect that tracee is zombie\n");
9711.51Skamil	if (notimeout)
9721.26Skamil		await_zombie_raw(tracee, 0);
9731.26Skamil	else
9741.26Skamil		await_zombie(tracee);
9751.1Skamil
9761.13Schristos	DPRINTF("Assert that there is no status about tracee %d - "
9771.1Skamil	    "Tracer must detect zombie first - calling %s()\n", tracee,
9781.1Skamil	    TWAIT_FNAME);
9791.1Skamil	TWAIT_REQUIRE_SUCCESS(
9801.1Skamil	    wpid = TWAIT_GENERIC(tracee, &status, WNOHANG), 0);
9811.1Skamil
9821.51Skamil	if (unrelated) {
9831.51Skamil		DPRINTF("Resume the tracer and let it detect exited tracee\n");
9841.51Skamil		PARENT_TO_CHILD("Message 2", parent_tracer, msg);
9851.51Skamil	} else {
9861.51Skamil		DPRINTF("Tell the tracer child should have exited\n");
9871.51Skamil		PARENT_TO_CHILD("wait for tracee exit", parent_tracer,  msg);
9881.51Skamil		DPRINTF("Wait for tracer to finish its job and exit - calling "
9891.51Skamil		        "%s()\n", TWAIT_FNAME);
9901.51Skamil
9911.51Skamil		DPRINTF("Wait from tracer child to complete waiting for "
9921.51Skamil		        "tracee\n");
9931.51Skamil		TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracer, &status, 0),
9941.51Skamil		    tracer);
9951.1Skamil
9961.51Skamil		validate_status_exited(status, exitval_tracer);
9971.51Skamil	}
9981.1Skamil
9991.13Schristos	DPRINTF("Wait for tracee to finish its job and exit - calling %s()\n",
10001.1Skamil	    TWAIT_FNAME);
10011.51Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);
10021.1Skamil
10031.1Skamil	validate_status_exited(status, exitval_tracee);
10041.1Skamil
10051.1Skamil	msg_close(&parent_tracer);
10061.1Skamil	msg_close(&parent_tracee);
10071.1Skamil}
10081.26Skamil
10091.51SkamilATF_TC(tracer_sees_terminaton_before_the_parent);
10101.51SkamilATF_TC_HEAD(tracer_sees_terminaton_before_the_parent, tc)
10111.51Skamil{
10121.51Skamil	atf_tc_set_md_var(tc, "descr",
10131.51Skamil	    "Assert that tracer sees process termination before the parent");
10141.51Skamil}
10151.51Skamil
10161.51SkamilATF_TC_BODY(tracer_sees_terminaton_before_the_parent, tc)
10171.26Skamil{
10181.26Skamil
10191.51Skamil	tracer_sees_terminaton_before_the_parent_raw(false, false);
10201.26Skamil}
10211.26Skamil
10221.51SkamilATF_TC(tracer_sysctl_lookup_without_duplicates);
10231.51SkamilATF_TC_HEAD(tracer_sysctl_lookup_without_duplicates, tc)
10241.1Skamil{
10251.1Skamil	atf_tc_set_md_var(tc, "descr",
10261.51Skamil	    "Assert that await_zombie() in attach1 always finds a single "
10271.51Skamil	    "process and no other error is reported");
10281.1Skamil}
10291.1Skamil
10301.51SkamilATF_TC_BODY(tracer_sysctl_lookup_without_duplicates, tc)
10311.1Skamil{
10321.51Skamil	time_t start, end;
10331.51Skamil	double diff;
10341.51Skamil	unsigned long N = 0;
10351.1Skamil
10361.51Skamil	/*
10371.51Skamil	 * Reuse this test with tracer_sees_terminaton_before_the_parent_raw().
10381.51Skamil	 * This test body isn't specific to this race, however it's just good
10391.51Skamil	 * enough for this purposes, no need to invent a dedicated code flow.
10401.51Skamil	 */
10411.1Skamil
10421.51Skamil	start = time(NULL);
10431.51Skamil	while (true) {
10441.51Skamil		DPRINTF("Step: %lu\n", N);
10451.51Skamil		tracer_sees_terminaton_before_the_parent_raw(true, false);
10461.51Skamil		end = time(NULL);
10471.51Skamil		diff = difftime(end, start);
10481.51Skamil		if (diff >= 5.0)
10491.51Skamil			break;
10501.51Skamil		++N;
10511.1Skamil	}
10521.51Skamil	DPRINTF("Iterations: %lu\n", N);
10531.51Skamil}
10541.1Skamil
10551.51SkamilATF_TC(unrelated_tracer_sees_terminaton_before_the_parent);
10561.51SkamilATF_TC_HEAD(unrelated_tracer_sees_terminaton_before_the_parent, tc)
10571.51Skamil{
10581.51Skamil	atf_tc_set_md_var(tc, "descr",
10591.51Skamil	    "Assert that tracer sees process termination before the parent");
10601.51Skamil}
10611.1Skamil
10621.51SkamilATF_TC_BODY(unrelated_tracer_sees_terminaton_before_the_parent, tc)
10631.51Skamil{
10641.1Skamil
10651.51Skamil	tracer_sees_terminaton_before_the_parent_raw(false, true);
10661.1Skamil}
10671.1Skamil#endif
10681.1Skamil
10691.51Skamil/// ----------------------------------------------------------------------------
10701.51Skamil
10711.51SkamilATF_TC(parent_attach_to_its_child);
10721.51SkamilATF_TC_HEAD(parent_attach_to_its_child, tc)
10731.1Skamil{
10741.1Skamil	atf_tc_set_md_var(tc, "descr",
10751.1Skamil	    "Assert that tracer parent can PT_ATTACH to its child");
10761.1Skamil}
10771.1Skamil
10781.51SkamilATF_TC_BODY(parent_attach_to_its_child, tc)
10791.1Skamil{
10801.1Skamil	struct msg_fds parent_tracee;
10811.1Skamil	const int exitval_tracee = 5;
10821.1Skamil	pid_t tracee, wpid;
10831.1Skamil	uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */
10841.1Skamil#if defined(TWAIT_HAVE_STATUS)
10851.1Skamil	int status;
10861.1Skamil#endif
10871.1Skamil
10881.13Schristos	DPRINTF("Spawn tracee\n");
10891.13Schristos	SYSCALL_REQUIRE(msg_open(&parent_tracee) == 0);
10901.1Skamil	tracee = atf_utils_fork();
10911.1Skamil	if (tracee == 0) {
10921.1Skamil		CHILD_FROM_PARENT("Message 1", parent_tracee, msg);
10931.13Schristos		DPRINTF("Parent should now attach to tracee\n");
10941.1Skamil
10951.1Skamil		CHILD_FROM_PARENT("Message 2", parent_tracee, msg);
10961.1Skamil		/* Wait for message from the parent */
10971.1Skamil		_exit(exitval_tracee);
10981.1Skamil	}
10991.1Skamil	PARENT_TO_CHILD("Message 1", parent_tracee, msg);
11001.1Skamil
11011.13Schristos	DPRINTF("Before calling PT_ATTACH for tracee %d\n", tracee);
11021.13Schristos	SYSCALL_REQUIRE(ptrace(PT_ATTACH, tracee, NULL, 0) != -1);
11031.1Skamil
11041.13Schristos	DPRINTF("Wait for the stopped tracee process with %s()\n",
11051.1Skamil	    TWAIT_FNAME);
11061.1Skamil	TWAIT_REQUIRE_SUCCESS(
11071.1Skamil	    wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);
11081.1Skamil
11091.1Skamil	validate_status_stopped(status, SIGSTOP);
11101.1Skamil
11111.13Schristos	DPRINTF("Resume tracee with PT_CONTINUE\n");
11121.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, tracee, (void *)1, 0) != -1);
11131.1Skamil
11141.13Schristos	DPRINTF("Let the tracee exit now\n");
11151.1Skamil	PARENT_TO_CHILD("Message 2", parent_tracee, msg);
11161.1Skamil
11171.13Schristos	DPRINTF("Wait for tracee to exit with %s()\n", TWAIT_FNAME);
11181.1Skamil	TWAIT_REQUIRE_SUCCESS(
11191.1Skamil	    wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);
11201.1Skamil
11211.1Skamil	validate_status_exited(status, exitval_tracee);
11221.1Skamil
11231.13Schristos	DPRINTF("Before calling %s() for tracee\n", TWAIT_FNAME);
11241.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD,
11251.1Skamil	    wpid = TWAIT_GENERIC(tracee, &status, 0));
11261.1Skamil
11271.1Skamil	msg_close(&parent_tracee);
11281.1Skamil}
11291.1Skamil
11301.51Skamil/// ----------------------------------------------------------------------------
11311.51Skamil
11321.51SkamilATF_TC(child_attach_to_its_parent);
11331.51SkamilATF_TC_HEAD(child_attach_to_its_parent, tc)
11341.1Skamil{
11351.1Skamil	atf_tc_set_md_var(tc, "descr",
11361.1Skamil	    "Assert that tracer child can PT_ATTACH to its parent");
11371.1Skamil}
11381.1Skamil
11391.51SkamilATF_TC_BODY(child_attach_to_its_parent, tc)
11401.1Skamil{
11411.1Skamil	struct msg_fds parent_tracee;
11421.1Skamil	const int exitval_tracer = 5;
11431.1Skamil	pid_t tracer, wpid;
11441.1Skamil	uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */
11451.1Skamil#if defined(TWAIT_HAVE_STATUS)
11461.1Skamil	int status;
11471.1Skamil#endif
11481.1Skamil
11491.13Schristos	DPRINTF("Spawn tracer\n");
11501.13Schristos	SYSCALL_REQUIRE(msg_open(&parent_tracee) == 0);
11511.1Skamil	tracer = atf_utils_fork();
11521.1Skamil	if (tracer == 0) {
11531.1Skamil
11541.1Skamil		/* Wait for message from the parent */
11551.1Skamil		CHILD_FROM_PARENT("Message 1", parent_tracee, msg);
11561.1Skamil
11571.13Schristos		DPRINTF("Attach to parent PID %d with PT_ATTACH from child\n",
11581.1Skamil		    getppid());
11591.1Skamil		FORKEE_ASSERT(ptrace(PT_ATTACH, getppid(), NULL, 0) != -1);
11601.1Skamil
11611.13Schristos		DPRINTF("Wait for the stopped parent process with %s()\n",
11621.1Skamil		    TWAIT_FNAME);
11631.1Skamil		FORKEE_REQUIRE_SUCCESS(
11641.1Skamil		    wpid = TWAIT_GENERIC(getppid(), &status, 0), getppid());
11651.1Skamil
11661.1Skamil		forkee_status_stopped(status, SIGSTOP);
11671.1Skamil
11681.13Schristos		DPRINTF("Resume parent with PT_DETACH\n");
11691.1Skamil		FORKEE_ASSERT(ptrace(PT_DETACH, getppid(), (void *)1, 0)
11701.1Skamil		    != -1);
11711.1Skamil
11721.1Skamil		/* Tell parent we are ready */
11731.1Skamil		CHILD_TO_PARENT("Message 1", parent_tracee, msg);
11741.1Skamil
11751.1Skamil		_exit(exitval_tracer);
11761.1Skamil	}
11771.1Skamil
11781.13Schristos	DPRINTF("Wait for the tracer to become ready\n");
11791.1Skamil	PARENT_TO_CHILD("Message 1", parent_tracee, msg);
11801.13Schristos	DPRINTF("Allow the tracer to exit now\n");
11811.1Skamil	PARENT_FROM_CHILD("Message 1", parent_tracee, msg);
11821.1Skamil
11831.13Schristos	DPRINTF("Wait for tracer to exit with %s()\n", TWAIT_FNAME);
11841.1Skamil	TWAIT_REQUIRE_SUCCESS(
11851.1Skamil	    wpid = TWAIT_GENERIC(tracer, &status, 0), tracer);
11861.1Skamil
11871.1Skamil	validate_status_exited(status, exitval_tracer);
11881.1Skamil
11891.13Schristos	DPRINTF("Before calling %s() for tracer\n", TWAIT_FNAME);
11901.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD,
11911.1Skamil	    wpid = TWAIT_GENERIC(tracer, &status, 0));
11921.1Skamil
11931.1Skamil	msg_close(&parent_tracee);
11941.1Skamil}
11951.1Skamil
11961.51Skamil/// ----------------------------------------------------------------------------
11971.51Skamil
11981.1Skamil#if defined(TWAIT_HAVE_PID)
11991.1Skamil
12001.51Skamilenum tracee_sees_its_original_parent_type {
12011.51Skamil	TRACEE_SEES_ITS_ORIGINAL_PARENT_GETPPID,
12021.51Skamil	TRACEE_SEES_ITS_ORIGINAL_PARENT_SYSCTL_KINFO_PROC2,
12031.51Skamil	TRACEE_SEES_ITS_ORIGINAL_PARENT_PROCFS_STATUS
12041.51Skamil};
12051.51Skamil
12061.51Skamilstatic void
12071.51Skamiltracee_sees_its_original_parent(enum tracee_sees_its_original_parent_type type)
12081.1Skamil{
12091.1Skamil	struct msg_fds parent_tracer, parent_tracee;
12101.1Skamil	const int exitval_tracee = 5;
12111.1Skamil	const int exitval_tracer = 10;
12121.1Skamil	pid_t parent, tracee, tracer, wpid;
12131.1Skamil	uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */
12141.1Skamil#if defined(TWAIT_HAVE_STATUS)
12151.1Skamil	int status;
12161.1Skamil#endif
12171.51Skamil	/* sysctl(3) - kinfo_proc2 */
12181.51Skamil	int name[CTL_MAXNAME];
12191.51Skamil	struct kinfo_proc2 kp;
12201.51Skamil	size_t len = sizeof(kp);
12211.51Skamil	unsigned int namelen;
12221.51Skamil
12231.51Skamil	/* procfs - status  */
12241.51Skamil	FILE *fp;
12251.51Skamil	struct stat st;
12261.51Skamil	const char *fname = "/proc/curproc/status";
12271.51Skamil	char s_executable[MAXPATHLEN];
12281.51Skamil	int s_pid, s_ppid;
12291.51Skamil	int rv;
12301.51Skamil
12311.51Skamil	if (type == TRACEE_SEES_ITS_ORIGINAL_PARENT_PROCFS_STATUS) {
12321.51Skamil		SYSCALL_REQUIRE((rv = stat(fname, &st)) == 0 ||
12331.51Skamil		                (errno == ENOENT));
12341.51Skamil		if (rv != 0) {
12351.51Skamil			atf_tc_skip("/proc/curproc/status not found");
12361.51Skamil		}
12371.51Skamil	}
12381.1Skamil
12391.13Schristos	DPRINTF("Spawn tracee\n");
12401.13Schristos	SYSCALL_REQUIRE(msg_open(&parent_tracer) == 0);
12411.13Schristos	SYSCALL_REQUIRE(msg_open(&parent_tracee) == 0);
12421.1Skamil	tracee = atf_utils_fork();
12431.1Skamil	if (tracee == 0) {
12441.1Skamil		parent = getppid();
12451.1Skamil
12461.1Skamil		/* Emit message to the parent */
12471.1Skamil		CHILD_TO_PARENT("tracee ready", parent_tracee, msg);
12481.1Skamil		CHILD_FROM_PARENT("exit tracee", parent_tracee, msg);
12491.1Skamil
12501.51Skamil		switch (type) {
12511.51Skamil		case TRACEE_SEES_ITS_ORIGINAL_PARENT_GETPPID:
12521.51Skamil			FORKEE_ASSERT_EQ(parent, getppid());
12531.51Skamil			break;
12541.51Skamil		case TRACEE_SEES_ITS_ORIGINAL_PARENT_SYSCTL_KINFO_PROC2:
12551.51Skamil			namelen = 0;
12561.51Skamil			name[namelen++] = CTL_KERN;
12571.51Skamil			name[namelen++] = KERN_PROC2;
12581.51Skamil			name[namelen++] = KERN_PROC_PID;
12591.51Skamil			name[namelen++] = getpid();
12601.51Skamil			name[namelen++] = len;
12611.51Skamil			name[namelen++] = 1;
12621.51Skamil
12631.51Skamil			FORKEE_ASSERT_EQ(sysctl(name, namelen, &kp, &len, NULL,
12641.51Skamil			                        0),
12651.51Skamil			                 0);
12661.51Skamil			FORKEE_ASSERT_EQ(parent, kp.p_ppid);
12671.51Skamil			break;
12681.51Skamil		case TRACEE_SEES_ITS_ORIGINAL_PARENT_PROCFS_STATUS:
12691.51Skamil			/*
12701.51Skamil			 * Format:
12711.51Skamil			 *  EXECUTABLE PID PPID ...
12721.51Skamil			 */
12731.51Skamil			FORKEE_ASSERT((fp = fopen(fname, "r")) != NULL);
12741.51Skamil			fscanf(fp, "%s %d %d", s_executable, &s_pid, &s_ppid);
12751.51Skamil			FORKEE_ASSERT_EQ(fclose(fp), 0);
12761.51Skamil			FORKEE_ASSERT_EQ(parent, s_ppid);
12771.51Skamil			break;
12781.51Skamil		}
12791.1Skamil
12801.1Skamil		_exit(exitval_tracee);
12811.1Skamil	}
12821.13Schristos	DPRINTF("Wait for child to record its parent identifier (pid)\n");
12831.1Skamil	PARENT_FROM_CHILD("tracee ready", parent_tracee, msg);
12841.1Skamil
12851.13Schristos	DPRINTF("Spawn debugger\n");
12861.1Skamil	tracer = atf_utils_fork();
12871.1Skamil	if (tracer == 0) {
12881.1Skamil		/* No IPC to communicate with the child */
12891.13Schristos		DPRINTF("Before calling PT_ATTACH from tracee %d\n", getpid());
12901.1Skamil		FORKEE_ASSERT(ptrace(PT_ATTACH, tracee, NULL, 0) != -1);
12911.1Skamil
12921.1Skamil		/* Wait for tracee and assert that it was stopped w/ SIGSTOP */
12931.1Skamil		FORKEE_REQUIRE_SUCCESS(
12941.1Skamil		    wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);
12951.1Skamil
12961.1Skamil		forkee_status_stopped(status, SIGSTOP);
12971.1Skamil
12981.1Skamil		/* Resume tracee with PT_CONTINUE */
12991.1Skamil		FORKEE_ASSERT(ptrace(PT_CONTINUE, tracee, (void *)1, 0) != -1);
13001.1Skamil
13011.1Skamil		/* Inform parent that tracer has attached to tracee */
13021.1Skamil		CHILD_TO_PARENT("tracer ready", parent_tracer, msg);
13031.1Skamil
13041.1Skamil		/* Wait for parent to tell use that tracee should have exited */
13051.1Skamil		CHILD_FROM_PARENT("wait for tracee exit", parent_tracer, msg);
13061.1Skamil
13071.1Skamil		/* Wait for tracee and assert that it exited */
13081.1Skamil		FORKEE_REQUIRE_SUCCESS(
13091.1Skamil		    wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);
13101.1Skamil
13111.1Skamil		forkee_status_exited(status, exitval_tracee);
13121.1Skamil
13131.13Schristos		DPRINTF("Before exiting of the tracer process\n");
13141.1Skamil		_exit(exitval_tracer);
13151.1Skamil	}
13161.1Skamil
13171.13Schristos	DPRINTF("Wait for the tracer to attach to the tracee\n");
13181.1Skamil	PARENT_FROM_CHILD("tracer ready",  parent_tracer, msg);
13191.1Skamil
13201.13Schristos	DPRINTF("Resume the tracee and let it exit\n");
13211.1Skamil	PARENT_TO_CHILD("exit tracee",  parent_tracee, msg);
13221.1Skamil
13231.13Schristos	DPRINTF("Detect that tracee is zombie\n");
13241.1Skamil	await_zombie(tracee);
13251.1Skamil
13261.13Schristos	DPRINTF("Assert that there is no status about tracee - "
13271.1Skamil	    "Tracer must detect zombie first - calling %s()\n", TWAIT_FNAME);
13281.1Skamil	TWAIT_REQUIRE_SUCCESS(
13291.1Skamil	    wpid = TWAIT_GENERIC(tracee, &status, WNOHANG), 0);
13301.1Skamil
13311.13Schristos	DPRINTF("Tell the tracer child should have exited\n");
13321.1Skamil	PARENT_TO_CHILD("wait for tracee exit",  parent_tracer, msg);
13331.1Skamil
13341.13Schristos	DPRINTF("Wait from tracer child to complete waiting for tracee\n");
13351.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracer, &status, 0),
13361.1Skamil	    tracer);
13371.1Skamil
13381.1Skamil	validate_status_exited(status, exitval_tracer);
13391.1Skamil
13401.13Schristos	DPRINTF("Wait for tracee to finish its job and exit - calling %s()\n",
13411.1Skamil	    TWAIT_FNAME);
13421.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracee, &status, WNOHANG),
13431.1Skamil	    tracee);
13441.1Skamil
13451.1Skamil	validate_status_exited(status, exitval_tracee);
13461.1Skamil
13471.1Skamil	msg_close(&parent_tracer);
13481.1Skamil	msg_close(&parent_tracee);
13491.1Skamil}
13501.1Skamil
13511.51Skamil#define TRACEE_SEES_ITS_ORIGINAL_PARENT(test, type, descr)			\
13521.51SkamilATF_TC(test);									\
13531.51SkamilATF_TC_HEAD(test, tc)								\
13541.51Skamil{										\
13551.51Skamil	atf_tc_set_md_var(tc, "descr",						\
13561.51Skamil	    "Assert that tracee sees its original parent when being traced "	\
13571.51Skamil	    "(check " descr ")");						\
13581.51Skamil}										\
13591.51Skamil										\
13601.51SkamilATF_TC_BODY(test, tc)								\
13611.51Skamil{										\
13621.51Skamil										\
13631.51Skamil	tracee_sees_its_original_parent(type);					\
13641.1Skamil}
13651.1Skamil
13661.51SkamilTRACEE_SEES_ITS_ORIGINAL_PARENT(
13671.51Skamil	tracee_sees_its_original_parent_getppid,
13681.51Skamil	TRACEE_SEES_ITS_ORIGINAL_PARENT_GETPPID,
13691.51Skamil	"getppid(2)");
13701.51SkamilTRACEE_SEES_ITS_ORIGINAL_PARENT(
13711.51Skamil	tracee_sees_its_original_parent_sysctl_kinfo_proc2,
13721.51Skamil	TRACEE_SEES_ITS_ORIGINAL_PARENT_SYSCTL_KINFO_PROC2,
13731.51Skamil	"sysctl(3) and kinfo_proc2");
13741.51SkamilTRACEE_SEES_ITS_ORIGINAL_PARENT(
13751.51Skamil	tracee_sees_its_original_parent_procfs_status,
13761.51Skamil	TRACEE_SEES_ITS_ORIGINAL_PARENT_PROCFS_STATUS,
13771.51Skamil	"the status file in procfs");
13781.1Skamil#endif
13791.1Skamil
13801.51Skamil/// ----------------------------------------------------------------------------
13811.1Skamil
13821.1SkamilATF_TC(eventmask1);
13831.1SkamilATF_TC_HEAD(eventmask1, tc)
13841.1Skamil{
13851.1Skamil	atf_tc_set_md_var(tc, "descr",
13861.1Skamil	    "Verify that empty EVENT_MASK is preserved");
13871.1Skamil}
13881.1Skamil
13891.1SkamilATF_TC_BODY(eventmask1, tc)
13901.1Skamil{
13911.1Skamil	const int exitval = 5;
13921.1Skamil	const int sigval = SIGSTOP;
13931.1Skamil	pid_t child, wpid;
13941.1Skamil#if defined(TWAIT_HAVE_STATUS)
13951.1Skamil	int status;
13961.1Skamil#endif
13971.1Skamil	ptrace_event_t set_event, get_event;
13981.1Skamil	const int len = sizeof(ptrace_event_t);
13991.1Skamil
14001.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
14011.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
14021.1Skamil	if (child == 0) {
14031.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
14041.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
14051.1Skamil
14061.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
14071.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
14081.1Skamil
14091.13Schristos		DPRINTF("Before exiting of the child process\n");
14101.1Skamil		_exit(exitval);
14111.1Skamil	}
14121.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
14131.1Skamil
14141.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
14151.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
14161.1Skamil
14171.1Skamil	validate_status_stopped(status, sigval);
14181.1Skamil
14191.1Skamil	set_event.pe_set_event = 0;
14201.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &set_event, len) != -1);
14211.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_EVENT_MASK, child, &get_event, len) != -1);
14221.1Skamil	ATF_REQUIRE(memcmp(&set_event, &get_event, len) == 0);
14231.1Skamil
14241.13Schristos	DPRINTF("Before resuming the child process where it left off and "
14251.1Skamil	    "without signal to be sent\n");
14261.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
14271.1Skamil
14281.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
14291.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
14301.1Skamil
14311.1Skamil	validate_status_exited(status, exitval);
14321.1Skamil
14331.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
14341.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
14351.1Skamil}
14361.1Skamil
14371.1SkamilATF_TC(eventmask2);
14381.1SkamilATF_TC_HEAD(eventmask2, tc)
14391.1Skamil{
14401.1Skamil	atf_tc_set_md_var(tc, "descr",
14411.1Skamil	    "Verify that PTRACE_FORK in EVENT_MASK is preserved");
14421.1Skamil}
14431.1Skamil
14441.1SkamilATF_TC_BODY(eventmask2, tc)
14451.1Skamil{
14461.1Skamil	const int exitval = 5;
14471.1Skamil	const int sigval = SIGSTOP;
14481.1Skamil	pid_t child, wpid;
14491.1Skamil#if defined(TWAIT_HAVE_STATUS)
14501.1Skamil	int status;
14511.1Skamil#endif
14521.1Skamil	ptrace_event_t set_event, get_event;
14531.1Skamil	const int len = sizeof(ptrace_event_t);
14541.1Skamil
14551.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
14561.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
14571.1Skamil	if (child == 0) {
14581.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
14591.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
14601.1Skamil
14611.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
14621.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
14631.1Skamil
14641.13Schristos		DPRINTF("Before exiting of the child process\n");
14651.1Skamil		_exit(exitval);
14661.1Skamil	}
14671.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
14681.1Skamil
14691.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
14701.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
14711.1Skamil
14721.1Skamil	validate_status_stopped(status, sigval);
14731.1Skamil
14741.1Skamil	set_event.pe_set_event = PTRACE_FORK;
14751.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &set_event, len) != -1);
14761.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_EVENT_MASK, child, &get_event, len) != -1);
14771.1Skamil	ATF_REQUIRE(memcmp(&set_event, &get_event, len) == 0);
14781.1Skamil
14791.13Schristos	DPRINTF("Before resuming the child process where it left off and "
14801.1Skamil	    "without signal to be sent\n");
14811.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
14821.1Skamil
14831.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
14841.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
14851.1Skamil
14861.1Skamil	validate_status_exited(status, exitval);
14871.1Skamil
14881.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
14891.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
14901.1Skamil}
14911.1Skamil
14921.1SkamilATF_TC(eventmask3);
14931.1SkamilATF_TC_HEAD(eventmask3, tc)
14941.1Skamil{
14951.1Skamil	atf_tc_set_md_var(tc, "descr",
14961.1Skamil	    "Verify that PTRACE_VFORK in EVENT_MASK is preserved");
14971.1Skamil}
14981.1Skamil
14991.1SkamilATF_TC_BODY(eventmask3, tc)
15001.1Skamil{
15011.1Skamil	const int exitval = 5;
15021.1Skamil	const int sigval = SIGSTOP;
15031.1Skamil	pid_t child, wpid;
15041.1Skamil#if defined(TWAIT_HAVE_STATUS)
15051.1Skamil	int status;
15061.1Skamil#endif
15071.1Skamil	ptrace_event_t set_event, get_event;
15081.1Skamil	const int len = sizeof(ptrace_event_t);
15091.1Skamil
15101.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
15111.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
15121.1Skamil	if (child == 0) {
15131.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
15141.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
15151.1Skamil
15161.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
15171.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
15181.1Skamil
15191.13Schristos		DPRINTF("Before exiting of the child process\n");
15201.1Skamil		_exit(exitval);
15211.1Skamil	}
15221.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
15231.1Skamil
15241.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
15251.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
15261.1Skamil
15271.1Skamil	validate_status_stopped(status, sigval);
15281.1Skamil
15291.1Skamil	set_event.pe_set_event = PTRACE_VFORK;
15301.38Skamil	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &set_event, len) != -1);
15311.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_EVENT_MASK, child, &get_event, len) != -1);
15321.1Skamil	ATF_REQUIRE(memcmp(&set_event, &get_event, len) == 0);
15331.1Skamil
15341.13Schristos	DPRINTF("Before resuming the child process where it left off and "
15351.1Skamil	    "without signal to be sent\n");
15361.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
15371.1Skamil
15381.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
15391.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
15401.1Skamil
15411.1Skamil	validate_status_exited(status, exitval);
15421.1Skamil
15431.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
15441.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
15451.1Skamil}
15461.1Skamil
15471.1SkamilATF_TC(eventmask4);
15481.1SkamilATF_TC_HEAD(eventmask4, tc)
15491.1Skamil{
15501.1Skamil	atf_tc_set_md_var(tc, "descr",
15511.1Skamil	    "Verify that PTRACE_VFORK_DONE in EVENT_MASK is preserved");
15521.1Skamil}
15531.1Skamil
15541.1SkamilATF_TC_BODY(eventmask4, tc)
15551.1Skamil{
15561.1Skamil	const int exitval = 5;
15571.1Skamil	const int sigval = SIGSTOP;
15581.1Skamil	pid_t child, wpid;
15591.1Skamil#if defined(TWAIT_HAVE_STATUS)
15601.1Skamil	int status;
15611.1Skamil#endif
15621.1Skamil	ptrace_event_t set_event, get_event;
15631.1Skamil	const int len = sizeof(ptrace_event_t);
15641.1Skamil
15651.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
15661.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
15671.1Skamil	if (child == 0) {
15681.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
15691.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
15701.1Skamil
15711.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
15721.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
15731.1Skamil
15741.13Schristos		DPRINTF("Before exiting of the child process\n");
15751.1Skamil		_exit(exitval);
15761.1Skamil	}
15771.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
15781.1Skamil
15791.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
15801.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
15811.1Skamil
15821.1Skamil	validate_status_stopped(status, sigval);
15831.1Skamil
15841.1Skamil	set_event.pe_set_event = PTRACE_VFORK_DONE;
15851.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &set_event, len) != -1);
15861.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_EVENT_MASK, child, &get_event, len) != -1);
15871.1Skamil	ATF_REQUIRE(memcmp(&set_event, &get_event, len) == 0);
15881.1Skamil
15891.13Schristos	DPRINTF("Before resuming the child process where it left off and "
15901.1Skamil	    "without signal to be sent\n");
15911.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
15921.1Skamil
15931.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
15941.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
15951.1Skamil
15961.1Skamil	validate_status_exited(status, exitval);
15971.1Skamil
15981.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
15991.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
16001.1Skamil}
16011.1Skamil
16021.1SkamilATF_TC(eventmask5);
16031.1SkamilATF_TC_HEAD(eventmask5, tc)
16041.1Skamil{
16051.1Skamil	atf_tc_set_md_var(tc, "descr",
16061.1Skamil	    "Verify that PTRACE_LWP_CREATE in EVENT_MASK is preserved");
16071.1Skamil}
16081.1Skamil
16091.1SkamilATF_TC_BODY(eventmask5, tc)
16101.1Skamil{
16111.1Skamil	const int exitval = 5;
16121.1Skamil	const int sigval = SIGSTOP;
16131.1Skamil	pid_t child, wpid;
16141.1Skamil#if defined(TWAIT_HAVE_STATUS)
16151.1Skamil	int status;
16161.1Skamil#endif
16171.1Skamil	ptrace_event_t set_event, get_event;
16181.1Skamil	const int len = sizeof(ptrace_event_t);
16191.1Skamil
16201.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
16211.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
16221.1Skamil	if (child == 0) {
16231.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
16241.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
16251.1Skamil
16261.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
16271.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
16281.1Skamil
16291.13Schristos		DPRINTF("Before exiting of the child process\n");
16301.1Skamil		_exit(exitval);
16311.1Skamil	}
16321.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
16331.1Skamil
16341.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
16351.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
16361.1Skamil
16371.1Skamil	validate_status_stopped(status, sigval);
16381.1Skamil
16391.1Skamil	set_event.pe_set_event = PTRACE_LWP_CREATE;
16401.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &set_event, len) != -1);
16411.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_EVENT_MASK, child, &get_event, len) != -1);
16421.1Skamil	ATF_REQUIRE(memcmp(&set_event, &get_event, len) == 0);
16431.1Skamil
16441.13Schristos	DPRINTF("Before resuming the child process where it left off and "
16451.1Skamil	    "without signal to be sent\n");
16461.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
16471.1Skamil
16481.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
16491.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
16501.1Skamil
16511.1Skamil	validate_status_exited(status, exitval);
16521.1Skamil
16531.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
16541.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
16551.1Skamil}
16561.1Skamil
16571.1SkamilATF_TC(eventmask6);
16581.1SkamilATF_TC_HEAD(eventmask6, tc)
16591.1Skamil{
16601.1Skamil	atf_tc_set_md_var(tc, "descr",
16611.1Skamil	    "Verify that PTRACE_LWP_EXIT in EVENT_MASK is preserved");
16621.1Skamil}
16631.1Skamil
16641.1SkamilATF_TC_BODY(eventmask6, tc)
16651.1Skamil{
16661.1Skamil	const int exitval = 5;
16671.1Skamil	const int sigval = SIGSTOP;
16681.1Skamil	pid_t child, wpid;
16691.1Skamil#if defined(TWAIT_HAVE_STATUS)
16701.1Skamil	int status;
16711.1Skamil#endif
16721.1Skamil	ptrace_event_t set_event, get_event;
16731.1Skamil	const int len = sizeof(ptrace_event_t);
16741.1Skamil
16751.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
16761.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
16771.1Skamil	if (child == 0) {
16781.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
16791.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
16801.1Skamil
16811.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
16821.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
16831.1Skamil
16841.13Schristos		DPRINTF("Before exiting of the child process\n");
16851.1Skamil		_exit(exitval);
16861.1Skamil	}
16871.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
16881.1Skamil
16891.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
16901.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
16911.1Skamil
16921.1Skamil	validate_status_stopped(status, sigval);
16931.1Skamil
16941.1Skamil	set_event.pe_set_event = PTRACE_LWP_EXIT;
16951.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &set_event, len) != -1);
16961.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_EVENT_MASK, child, &get_event, len) != -1);
16971.1Skamil	ATF_REQUIRE(memcmp(&set_event, &get_event, len) == 0);
16981.1Skamil
16991.13Schristos	DPRINTF("Before resuming the child process where it left off and "
17001.1Skamil	    "without signal to be sent\n");
17011.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
17021.1Skamil
17031.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
17041.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
17051.1Skamil
17061.1Skamil	validate_status_exited(status, exitval);
17071.1Skamil
17081.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
17091.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
17101.1Skamil}
17111.1Skamil
17121.28Skamilstatic void
17131.32Skamilfork_body(pid_t (*fn)(void), bool trackfork, bool trackvfork,
17141.32Skamil          bool trackvforkdone, bool detachchild, bool detachparent)
17151.1Skamil{
17161.1Skamil	const int exitval = 5;
17171.1Skamil	const int exitval2 = 15;
17181.1Skamil	const int sigval = SIGSTOP;
17191.31Skamil	pid_t child, child2 = 0, wpid;
17201.1Skamil#if defined(TWAIT_HAVE_STATUS)
17211.1Skamil	int status;
17221.1Skamil#endif
17231.1Skamil	ptrace_state_t state;
17241.1Skamil	const int slen = sizeof(state);
17251.1Skamil	ptrace_event_t event;
17261.1Skamil	const int elen = sizeof(event);
17271.1Skamil
17281.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
17291.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
17301.1Skamil	if (child == 0) {
17311.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
17321.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
17331.1Skamil
17341.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
17351.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
17361.1Skamil
17371.30Skamil		FORKEE_ASSERT((child2 = (fn)()) != -1);
17381.1Skamil
17391.1Skamil		if (child2 == 0)
17401.1Skamil			_exit(exitval2);
17411.1Skamil
17421.1Skamil		FORKEE_REQUIRE_SUCCESS
17431.1Skamil		    (wpid = TWAIT_GENERIC(child2, &status, 0), child2);
17441.1Skamil
17451.1Skamil		forkee_status_exited(status, exitval2);
17461.1Skamil
17471.13Schristos		DPRINTF("Before exiting of the child process\n");
17481.1Skamil		_exit(exitval);
17491.1Skamil	}
17501.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
17511.1Skamil
17521.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
17531.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
17541.1Skamil
17551.1Skamil	validate_status_stopped(status, sigval);
17561.1Skamil
17571.30Skamil	DPRINTF("Set 0%s%s%s in EVENT_MASK for the child %d\n",
17581.30Skamil	        trackfork ? "|PTRACE_FORK" : "",
17591.30Skamil	        trackvfork ? "|PTRACE_VFORK" : "",
17601.30Skamil	        trackvforkdone ? "|PTRACE_VFORK_DONE" : "", child);
17611.30Skamil	event.pe_set_event = 0;
17621.30Skamil	if (trackfork)
17631.30Skamil		event.pe_set_event |= PTRACE_FORK;
17641.30Skamil	if (trackvfork)
17651.30Skamil		event.pe_set_event |= PTRACE_VFORK;
17661.30Skamil	if (trackvforkdone)
17671.30Skamil		event.pe_set_event |= PTRACE_VFORK_DONE;
17681.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);
17691.1Skamil
17701.13Schristos	DPRINTF("Before resuming the child process where it left off and "
17711.1Skamil	    "without signal to be sent\n");
17721.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
17731.1Skamil
17741.29Skamil#if defined(TWAIT_HAVE_PID)
17751.31Skamil	if ((trackfork && fn == fork) || (trackvfork && fn == vfork)) {
17761.29Skamil		DPRINTF("Before calling %s() for the child %d\n", TWAIT_FNAME,
17771.29Skamil		        child);
17781.29Skamil		TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0),
17791.29Skamil		                      child);
17801.1Skamil
17811.29Skamil		validate_status_stopped(status, SIGTRAP);
17821.1Skamil
17831.29Skamil		SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state,
17841.29Skamil		                       slen) != -1);
17851.31Skamil		if (trackfork && fn == fork) {
17861.30Skamil			ATF_REQUIRE_EQ(state.pe_report_event & PTRACE_FORK,
17871.30Skamil			       PTRACE_FORK);
17881.30Skamil		}
17891.31Skamil		if (trackvfork && fn == vfork) {
17901.30Skamil			ATF_REQUIRE_EQ(state.pe_report_event & PTRACE_VFORK,
17911.30Skamil			       PTRACE_VFORK);
17921.30Skamil		}
17931.29Skamil
17941.29Skamil		child2 = state.pe_other_pid;
17951.30Skamil		DPRINTF("Reported ptrace event with forkee %d\n", child2);
17961.29Skamil
17971.29Skamil		DPRINTF("Before calling %s() for the forkee %d of the child "
17981.29Skamil		        "%d\n", TWAIT_FNAME, child2, child);
17991.29Skamil		TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0),
18001.29Skamil		    child2);
18011.1Skamil
18021.29Skamil		validate_status_stopped(status, SIGTRAP);
18031.1Skamil
18041.29Skamil		SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child2, &state,
18051.29Skamil		                       slen) != -1);
18061.31Skamil		if (trackfork && fn == fork) {
18071.30Skamil			ATF_REQUIRE_EQ(state.pe_report_event & PTRACE_FORK,
18081.30Skamil			       PTRACE_FORK);
18091.30Skamil		}
18101.31Skamil		if (trackvfork && fn == vfork) {
18111.30Skamil			ATF_REQUIRE_EQ(state.pe_report_event & PTRACE_VFORK,
18121.30Skamil			       PTRACE_VFORK);
18131.30Skamil		}
18141.30Skamil
18151.29Skamil		ATF_REQUIRE_EQ(state.pe_other_pid, child);
18161.29Skamil
18171.29Skamil		DPRINTF("Before resuming the forkee process where it left off "
18181.29Skamil		    "and without signal to be sent\n");
18191.29Skamil		SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child2, (void *)1, 0)
18201.29Skamil		                != -1);
18211.29Skamil
18221.29Skamil		DPRINTF("Before resuming the child process where it left off "
18231.29Skamil		        "and without signal to be sent\n");
18241.29Skamil		SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
18251.30Skamil	}
18261.30Skamil#endif
18271.30Skamil
18281.31Skamil	if (trackvforkdone && fn == vfork) {
18291.30Skamil		DPRINTF("Before calling %s() for the child %d\n", TWAIT_FNAME,
18301.30Skamil		        child);
18311.30Skamil		TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0),
18321.30Skamil		                      child);
18331.30Skamil
18341.30Skamil		validate_status_stopped(status, SIGTRAP);
18351.30Skamil
18361.30Skamil		SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state,
18371.30Skamil		                       slen) != -1);
18381.30Skamil		ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_VFORK_DONE);
18391.30Skamil
18401.30Skamil		child2 = state.pe_other_pid;
18411.30Skamil		DPRINTF("Reported PTRACE_VFORK_DONE event with forkee %d\n",
18421.30Skamil		        child2);
18431.30Skamil
18441.30Skamil		DPRINTF("Before resuming the child process where it left off "
18451.30Skamil		        "and without signal to be sent\n");
18461.30Skamil		SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
18471.30Skamil	}
18481.29Skamil
18491.30Skamil#if defined(TWAIT_HAVE_PID)
18501.31Skamil	if ((trackfork && fn == fork) || (trackvfork && fn == vfork)) {
18511.29Skamil		DPRINTF("Before calling %s() for the forkee - expected exited"
18521.29Skamil		        "\n", TWAIT_FNAME);
18531.29Skamil		TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0),
18541.29Skamil		    child2);
18551.29Skamil
18561.29Skamil		validate_status_exited(status, exitval2);
18571.29Skamil
18581.29Skamil		DPRINTF("Before calling %s() for the forkee - expected no "
18591.29Skamil		        "process\n", TWAIT_FNAME);
18601.29Skamil		TWAIT_REQUIRE_FAILURE(ECHILD,
18611.29Skamil		    wpid = TWAIT_GENERIC(child2, &status, 0));
18621.29Skamil	}
18631.29Skamil#endif
18641.1Skamil
18651.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
18661.1Skamil	    "SIGCHLD\n", TWAIT_FNAME);
18671.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
18681.1Skamil
18691.1Skamil	validate_status_stopped(status, SIGCHLD);
18701.1Skamil
18711.13Schristos	DPRINTF("Before resuming the child process where it left off and "
18721.1Skamil	    "without signal to be sent\n");
18731.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
18741.1Skamil
18751.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
18761.1Skamil	    TWAIT_FNAME);
18771.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
18781.1Skamil
18791.1Skamil	validate_status_exited(status, exitval);
18801.1Skamil
18811.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
18821.1Skamil	    TWAIT_FNAME);
18831.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
18841.1Skamil}
18851.28Skamil
18861.32Skamil#define FORK_TEST(name,descr,fun,tfork,tvfork,tvforkdone,detchild,detparent)	\
18871.32SkamilATF_TC(name);									\
18881.32SkamilATF_TC_HEAD(name, tc)								\
18891.32Skamil{										\
18901.32Skamil	atf_tc_set_md_var(tc, "descr", descr);					\
18911.32Skamil}										\
18921.32Skamil										\
18931.32SkamilATF_TC_BODY(name, tc)								\
18941.32Skamil{										\
18951.32Skamil										\
18961.32Skamil	fork_body(fun, tfork, tvfork, tvforkdone, detchild, detparent);		\
18971.32Skamil}
18981.32Skamil
18991.32Skamil#define F false
19001.32Skamil#define T true
19011.32Skamil
19021.32Skamil#define F_IF__0(x)
19031.32Skamil#define F_IF__1(x) x
19041.32Skamil#define F_IF__(x,y) F_IF__ ## x (y)
19051.32Skamil#define F_IF_(x,y) F_IF__(x,y)
19061.32Skamil#define F_IF(x,y) F_IF_(x,y)
19071.32Skamil
19081.32Skamil#define DSCR(function,forkbit,vforkbit,vforkdonebit,dchildbit,dparentbit)	\
19091.32Skamil        "Verify " #function "(2) called with 0"					\
19101.32Skamil        F_IF(forkbit,"|PTRACE_FORK")						\
19111.32Skamil        F_IF(vforkbit,"|PTRACE_VFORK")						\
19121.32Skamil        F_IF(vforkdonebit,"|PTRACE_VFORK_DONE")					\
19131.32Skamil        " in EVENT_MASK."							\
19141.32Skamil        F_IF(dchildbit," Detach child in this test.")				\
19151.32Skamil        F_IF(dparentbit," Detach parent in this test.")
19161.1Skamil
19171.32SkamilFORK_TEST(fork1, DSCR(fork,0,0,0,0,0), fork, F, F, F, F, F)
19181.31Skamil#if defined(TWAIT_HAVE_PID)
19191.32SkamilFORK_TEST(fork2, DSCR(fork,1,0,0,0,0), fork, T, F, F, F, F)
19201.32SkamilFORK_TEST(fork3, DSCR(fork,0,1,0,0,0), fork, F, T, F, F, F)
19211.32SkamilFORK_TEST(fork4, DSCR(fork,1,1,0,0,0), fork, T, T, F, F, F)
19221.31Skamil#endif
19231.32SkamilFORK_TEST(fork5, DSCR(fork,0,0,1,0,0), fork, F, F, T, F, F)
19241.31Skamil#if defined(TWAIT_HAVE_PID)
19251.32SkamilFORK_TEST(fork6, DSCR(fork,1,0,1,0,0), fork, T, F, T, F, F)
19261.32SkamilFORK_TEST(fork7, DSCR(fork,0,1,1,0,0), fork, F, T, T, F, F)
19271.32SkamilFORK_TEST(fork8, DSCR(fork,1,1,1,0,0), fork, T, T, T, F, F)
19281.31Skamil#endif
19291.1Skamil
19301.32SkamilFORK_TEST(vfork1, DSCR(vfork,0,0,0,0,0), vfork, F, F, F, F, F)
19311.31Skamil#if defined(TWAIT_HAVE_PID)
19321.32SkamilFORK_TEST(vfork2, DSCR(vfork,1,0,0,0,0), vfork, T, F, F, F, F)
19331.32SkamilFORK_TEST(vfork3, DSCR(vfork,0,1,0,0,0), vfork, F, T, F, F, F)
19341.32SkamilFORK_TEST(vfork4, DSCR(vfork,1,1,0,0,0), vfork, T, T, F, F, F)
19351.31Skamil#endif
19361.32SkamilFORK_TEST(vfork5, DSCR(vfork,0,0,1,0,0), vfork, F, F, T, F, F)
19371.31Skamil#if defined(TWAIT_HAVE_PID)
19381.32SkamilFORK_TEST(vfork6, DSCR(vfork,1,0,1,0,0), vfork, T, F, T, F, F)
19391.32SkamilFORK_TEST(vfork7, DSCR(vfork,0,1,1,0,0), vfork, F, T, T, F, F)
19401.32SkamilFORK_TEST(vfork8, DSCR(vfork,1,1,1,0,0), vfork, T, T, T, F, F)
19411.31Skamil#endif
19421.31Skamil
19431.31Skamil
19441.31Skamil
19451.1Skamil
19461.1SkamilATF_TC(io_read_d1);
19471.1SkamilATF_TC_HEAD(io_read_d1, tc)
19481.1Skamil{
19491.1Skamil	atf_tc_set_md_var(tc, "descr",
19501.1Skamil	    "Verify PT_IO with PIOD_READ_D and len = sizeof(uint8_t)");
19511.1Skamil}
19521.1Skamil
19531.1SkamilATF_TC_BODY(io_read_d1, tc)
19541.1Skamil{
19551.1Skamil	const int exitval = 5;
19561.1Skamil	const int sigval = SIGSTOP;
19571.1Skamil	pid_t child, wpid;
19581.1Skamil	uint8_t lookup_me = 0;
19591.1Skamil	const uint8_t magic = 0xab;
19601.1Skamil	struct ptrace_io_desc io = {
19611.1Skamil		.piod_op = PIOD_READ_D,
19621.1Skamil		.piod_offs = &lookup_me,
19631.1Skamil		.piod_addr = &lookup_me,
19641.1Skamil		.piod_len = sizeof(lookup_me)
19651.1Skamil	};
19661.1Skamil#if defined(TWAIT_HAVE_STATUS)
19671.1Skamil	int status;
19681.1Skamil#endif
19691.1Skamil
19701.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
19711.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
19721.1Skamil	if (child == 0) {
19731.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
19741.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
19751.1Skamil
19761.1Skamil		lookup_me = magic;
19771.1Skamil
19781.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
19791.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
19801.1Skamil
19811.13Schristos		DPRINTF("Before exiting of the child process\n");
19821.1Skamil		_exit(exitval);
19831.1Skamil	}
19841.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
19851.1Skamil
19861.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
19871.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
19881.1Skamil
19891.1Skamil	validate_status_stopped(status, sigval);
19901.1Skamil
19911.13Schristos	DPRINTF("Read lookup_me from tracee (PID=%d) by tracer (PID=%d)\n",
19921.1Skamil	    child, getpid());
19931.13Schristos	SYSCALL_REQUIRE(ptrace(PT_IO, child, &io, 0) != -1);
19941.1Skamil
19951.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me, magic,
19961.1Skamil	    "got value %" PRIx8 " != expected %" PRIx8, lookup_me, magic);
19971.1Skamil
19981.13Schristos	DPRINTF("Before resuming the child process where it left off and "
19991.1Skamil	    "without signal to be sent\n");
20001.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
20011.1Skamil
20021.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
20031.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
20041.1Skamil
20051.1Skamil	validate_status_exited(status, exitval);
20061.1Skamil
20071.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
20081.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
20091.1Skamil}
20101.1Skamil
20111.1SkamilATF_TC(io_read_d2);
20121.1SkamilATF_TC_HEAD(io_read_d2, tc)
20131.1Skamil{
20141.1Skamil	atf_tc_set_md_var(tc, "descr",
20151.1Skamil	    "Verify PT_IO with PIOD_READ_D and len = sizeof(uint16_t)");
20161.1Skamil}
20171.1Skamil
20181.1SkamilATF_TC_BODY(io_read_d2, tc)
20191.1Skamil{
20201.1Skamil	const int exitval = 5;
20211.1Skamil	const int sigval = SIGSTOP;
20221.1Skamil	pid_t child, wpid;
20231.1Skamil	uint16_t lookup_me = 0;
20241.1Skamil	const uint16_t magic = 0x1234;
20251.1Skamil	struct ptrace_io_desc io = {
20261.1Skamil		.piod_op = PIOD_READ_D,
20271.1Skamil		.piod_offs = &lookup_me,
20281.1Skamil		.piod_addr = &lookup_me,
20291.1Skamil		.piod_len = sizeof(lookup_me)
20301.1Skamil	};
20311.1Skamil#if defined(TWAIT_HAVE_STATUS)
20321.1Skamil	int status;
20331.1Skamil#endif
20341.1Skamil
20351.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
20361.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
20371.1Skamil	if (child == 0) {
20381.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
20391.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
20401.1Skamil
20411.1Skamil		lookup_me = magic;
20421.1Skamil
20431.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
20441.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
20451.1Skamil
20461.13Schristos		DPRINTF("Before exiting of the child process\n");
20471.1Skamil		_exit(exitval);
20481.1Skamil	}
20491.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
20501.1Skamil
20511.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
20521.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
20531.1Skamil
20541.1Skamil	validate_status_stopped(status, sigval);
20551.1Skamil
20561.13Schristos	DPRINTF("Read lookup_me from tracee (PID=%d) by tracer (PID=%d)\n",
20571.1Skamil	    child, getpid());
20581.13Schristos	SYSCALL_REQUIRE(ptrace(PT_IO, child, &io, 0) != -1);
20591.1Skamil
20601.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me, magic,
20611.1Skamil	    "got value %" PRIx16 " != expected %" PRIx16, lookup_me, magic);
20621.1Skamil
20631.13Schristos	DPRINTF("Before resuming the child process where it left off and "
20641.1Skamil	    "without signal to be sent\n");
20651.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
20661.1Skamil
20671.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
20681.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
20691.1Skamil
20701.1Skamil	validate_status_exited(status, exitval);
20711.1Skamil
20721.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
20731.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
20741.1Skamil}
20751.1Skamil
20761.1SkamilATF_TC(io_read_d3);
20771.1SkamilATF_TC_HEAD(io_read_d3, tc)
20781.1Skamil{
20791.1Skamil	atf_tc_set_md_var(tc, "descr",
20801.1Skamil	    "Verify PT_IO with PIOD_READ_D and len = sizeof(uint32_t)");
20811.1Skamil}
20821.1Skamil
20831.1SkamilATF_TC_BODY(io_read_d3, tc)
20841.1Skamil{
20851.1Skamil	const int exitval = 5;
20861.1Skamil	const int sigval = SIGSTOP;
20871.1Skamil	pid_t child, wpid;
20881.1Skamil	uint32_t lookup_me = 0;
20891.1Skamil	const uint32_t magic = 0x1234abcd;
20901.1Skamil	struct ptrace_io_desc io = {
20911.1Skamil		.piod_op = PIOD_READ_D,
20921.1Skamil		.piod_offs = &lookup_me,
20931.1Skamil		.piod_addr = &lookup_me,
20941.1Skamil		.piod_len = sizeof(lookup_me)
20951.1Skamil	};
20961.1Skamil#if defined(TWAIT_HAVE_STATUS)
20971.1Skamil	int status;
20981.1Skamil#endif
20991.1Skamil
21001.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
21011.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
21021.1Skamil	if (child == 0) {
21031.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
21041.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
21051.1Skamil
21061.1Skamil		lookup_me = magic;
21071.1Skamil
21081.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
21091.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
21101.1Skamil
21111.13Schristos		DPRINTF("Before exiting of the child process\n");
21121.1Skamil		_exit(exitval);
21131.1Skamil	}
21141.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
21151.1Skamil
21161.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
21171.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
21181.1Skamil
21191.1Skamil	validate_status_stopped(status, sigval);
21201.1Skamil
21211.13Schristos	DPRINTF("Read lookup_me from tracee (PID=%d) by tracer (PID=%d)\n",
21221.1Skamil	    child, getpid());
21231.13Schristos	SYSCALL_REQUIRE(ptrace(PT_IO, child, &io, 0) != -1);
21241.1Skamil
21251.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me, magic,
21261.1Skamil	    "got value %" PRIx32 " != expected %" PRIx32, lookup_me, magic);
21271.1Skamil
21281.13Schristos	DPRINTF("Before resuming the child process where it left off and "
21291.1Skamil	    "without signal to be sent\n");
21301.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
21311.1Skamil
21321.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
21331.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
21341.1Skamil
21351.1Skamil	validate_status_exited(status, exitval);
21361.1Skamil
21371.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
21381.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
21391.1Skamil}
21401.1Skamil
21411.1SkamilATF_TC(io_read_d4);
21421.1SkamilATF_TC_HEAD(io_read_d4, tc)
21431.1Skamil{
21441.1Skamil	atf_tc_set_md_var(tc, "descr",
21451.1Skamil	    "Verify PT_IO with PIOD_READ_D and len = sizeof(uint64_t)");
21461.1Skamil}
21471.1Skamil
21481.1SkamilATF_TC_BODY(io_read_d4, tc)
21491.1Skamil{
21501.1Skamil	const int exitval = 5;
21511.1Skamil	const int sigval = SIGSTOP;
21521.1Skamil	pid_t child, wpid;
21531.1Skamil	uint64_t lookup_me = 0;
21541.1Skamil	const uint64_t magic = 0x1234abcd9876dcfa;
21551.1Skamil	struct ptrace_io_desc io = {
21561.1Skamil		.piod_op = PIOD_READ_D,
21571.1Skamil		.piod_offs = &lookup_me,
21581.1Skamil		.piod_addr = &lookup_me,
21591.1Skamil		.piod_len = sizeof(lookup_me)
21601.1Skamil	};
21611.1Skamil#if defined(TWAIT_HAVE_STATUS)
21621.1Skamil	int status;
21631.1Skamil#endif
21641.1Skamil
21651.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
21661.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
21671.1Skamil	if (child == 0) {
21681.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
21691.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
21701.1Skamil
21711.1Skamil		lookup_me = magic;
21721.1Skamil
21731.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
21741.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
21751.1Skamil
21761.13Schristos		DPRINTF("Before exiting of the child process\n");
21771.1Skamil		_exit(exitval);
21781.1Skamil	}
21791.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
21801.1Skamil
21811.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
21821.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
21831.1Skamil
21841.1Skamil	validate_status_stopped(status, sigval);
21851.1Skamil
21861.13Schristos	DPRINTF("Read lookup_me from tracee (PID=%d) by tracer (PID=%d)\n",
21871.1Skamil	    child, getpid());
21881.13Schristos	SYSCALL_REQUIRE(ptrace(PT_IO, child, &io, 0) != -1);
21891.1Skamil
21901.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me, magic,
21911.1Skamil	    "got value %" PRIx64 " != expected %" PRIx64, lookup_me, magic);
21921.1Skamil
21931.13Schristos	DPRINTF("Before resuming the child process where it left off and "
21941.1Skamil	    "without signal to be sent\n");
21951.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
21961.1Skamil
21971.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
21981.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
21991.1Skamil
22001.1Skamil	validate_status_exited(status, exitval);
22011.1Skamil
22021.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
22031.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
22041.1Skamil}
22051.1Skamil
22061.1SkamilATF_TC(io_write_d1);
22071.1SkamilATF_TC_HEAD(io_write_d1, tc)
22081.1Skamil{
22091.1Skamil	atf_tc_set_md_var(tc, "descr",
22101.1Skamil	    "Verify PT_IO with PIOD_WRITE_D and len = sizeof(uint8_t)");
22111.1Skamil}
22121.1Skamil
22131.1SkamilATF_TC_BODY(io_write_d1, tc)
22141.1Skamil{
22151.1Skamil	const int exitval = 5;
22161.1Skamil	const int sigval = SIGSTOP;
22171.1Skamil	pid_t child, wpid;
22181.1Skamil	uint8_t lookup_me = 0;
22191.1Skamil	const uint8_t magic = 0xab;
22201.1Skamil	struct ptrace_io_desc io = {
22211.1Skamil		.piod_op = PIOD_WRITE_D,
22221.1Skamil		.piod_offs = &lookup_me,
22231.1Skamil		.piod_addr = &lookup_me,
22241.1Skamil		.piod_len = sizeof(lookup_me)
22251.1Skamil	};
22261.1Skamil#if defined(TWAIT_HAVE_STATUS)
22271.1Skamil	int status;
22281.1Skamil#endif
22291.1Skamil
22301.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
22311.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
22321.1Skamil	if (child == 0) {
22331.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
22341.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
22351.1Skamil
22361.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
22371.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
22381.1Skamil
22391.1Skamil		FORKEE_ASSERT_EQ(lookup_me, magic);
22401.1Skamil
22411.13Schristos		DPRINTF("Before exiting of the child process\n");
22421.1Skamil		_exit(exitval);
22431.1Skamil	}
22441.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
22451.1Skamil
22461.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
22471.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
22481.1Skamil
22491.1Skamil	validate_status_stopped(status, sigval);
22501.1Skamil
22511.1Skamil	lookup_me = magic;
22521.1Skamil
22531.13Schristos	DPRINTF("Write new lookup_me to tracee (PID=%d) from tracer (PID=%d)\n",
22541.1Skamil	    child, getpid());
22551.13Schristos	SYSCALL_REQUIRE(ptrace(PT_IO, child, &io, 0) != -1);
22561.1Skamil
22571.13Schristos	DPRINTF("Before resuming the child process where it left off and "
22581.1Skamil	    "without signal to be sent\n");
22591.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
22601.1Skamil
22611.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
22621.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
22631.1Skamil
22641.1Skamil	validate_status_exited(status, exitval);
22651.1Skamil
22661.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
22671.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
22681.1Skamil}
22691.1Skamil
22701.1SkamilATF_TC(io_write_d2);
22711.1SkamilATF_TC_HEAD(io_write_d2, tc)
22721.1Skamil{
22731.1Skamil	atf_tc_set_md_var(tc, "descr",
22741.1Skamil	    "Verify PT_IO with PIOD_WRITE_D and len = sizeof(uint16_t)");
22751.1Skamil}
22761.1Skamil
22771.1SkamilATF_TC_BODY(io_write_d2, tc)
22781.1Skamil{
22791.1Skamil	const int exitval = 5;
22801.1Skamil	const int sigval = SIGSTOP;
22811.1Skamil	pid_t child, wpid;
22821.1Skamil	uint16_t lookup_me = 0;
22831.1Skamil	const uint16_t magic = 0xab12;
22841.1Skamil	struct ptrace_io_desc io = {
22851.1Skamil		.piod_op = PIOD_WRITE_D,
22861.1Skamil		.piod_offs = &lookup_me,
22871.1Skamil		.piod_addr = &lookup_me,
22881.1Skamil		.piod_len = sizeof(lookup_me)
22891.1Skamil	};
22901.1Skamil#if defined(TWAIT_HAVE_STATUS)
22911.1Skamil	int status;
22921.1Skamil#endif
22931.1Skamil
22941.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
22951.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
22961.1Skamil	if (child == 0) {
22971.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
22981.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
22991.1Skamil
23001.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
23011.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
23021.1Skamil
23031.1Skamil		FORKEE_ASSERT_EQ(lookup_me, magic);
23041.1Skamil
23051.13Schristos		DPRINTF("Before exiting of the child process\n");
23061.1Skamil		_exit(exitval);
23071.1Skamil	}
23081.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
23091.1Skamil
23101.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
23111.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
23121.1Skamil
23131.1Skamil	validate_status_stopped(status, sigval);
23141.1Skamil
23151.1Skamil	lookup_me = magic;
23161.1Skamil
23171.13Schristos	DPRINTF("Write new lookup_me to tracee (PID=%d) from tracer (PID=%d)\n",
23181.1Skamil	    child, getpid());
23191.13Schristos	SYSCALL_REQUIRE(ptrace(PT_IO, child, &io, 0) != -1);
23201.1Skamil
23211.13Schristos	DPRINTF("Before resuming the child process where it left off and "
23221.1Skamil	    "without signal to be sent\n");
23231.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
23241.1Skamil
23251.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
23261.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
23271.1Skamil
23281.1Skamil	validate_status_exited(status, exitval);
23291.1Skamil
23301.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
23311.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
23321.1Skamil}
23331.1Skamil
23341.1SkamilATF_TC(io_write_d3);
23351.1SkamilATF_TC_HEAD(io_write_d3, tc)
23361.1Skamil{
23371.1Skamil	atf_tc_set_md_var(tc, "descr",
23381.1Skamil	    "Verify PT_IO with PIOD_WRITE_D and len = sizeof(uint32_t)");
23391.1Skamil}
23401.1Skamil
23411.1SkamilATF_TC_BODY(io_write_d3, tc)
23421.1Skamil{
23431.1Skamil	const int exitval = 5;
23441.1Skamil	const int sigval = SIGSTOP;
23451.1Skamil	pid_t child, wpid;
23461.1Skamil	uint32_t lookup_me = 0;
23471.1Skamil	const uint32_t magic = 0xab127643;
23481.1Skamil	struct ptrace_io_desc io = {
23491.1Skamil		.piod_op = PIOD_WRITE_D,
23501.1Skamil		.piod_offs = &lookup_me,
23511.1Skamil		.piod_addr = &lookup_me,
23521.1Skamil		.piod_len = sizeof(lookup_me)
23531.1Skamil	};
23541.1Skamil#if defined(TWAIT_HAVE_STATUS)
23551.1Skamil	int status;
23561.1Skamil#endif
23571.1Skamil
23581.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
23591.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
23601.1Skamil	if (child == 0) {
23611.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
23621.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
23631.1Skamil
23641.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
23651.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
23661.1Skamil
23671.1Skamil		FORKEE_ASSERT_EQ(lookup_me, magic);
23681.1Skamil
23691.13Schristos		DPRINTF("Before exiting of the child process\n");
23701.1Skamil		_exit(exitval);
23711.1Skamil	}
23721.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
23731.1Skamil
23741.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
23751.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
23761.1Skamil
23771.1Skamil	validate_status_stopped(status, sigval);
23781.1Skamil
23791.1Skamil	lookup_me = magic;
23801.1Skamil
23811.13Schristos	DPRINTF("Write new lookup_me to tracee (PID=%d) from tracer (PID=%d)\n",
23821.1Skamil	    child, getpid());
23831.13Schristos	SYSCALL_REQUIRE(ptrace(PT_IO, child, &io, 0) != -1);
23841.1Skamil
23851.13Schristos	DPRINTF("Before resuming the child process where it left off and "
23861.1Skamil	    "without signal to be sent\n");
23871.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
23881.1Skamil
23891.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
23901.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
23911.1Skamil
23921.1Skamil	validate_status_exited(status, exitval);
23931.1Skamil
23941.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
23951.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
23961.1Skamil}
23971.1Skamil
23981.1SkamilATF_TC(io_write_d4);
23991.1SkamilATF_TC_HEAD(io_write_d4, tc)
24001.1Skamil{
24011.1Skamil	atf_tc_set_md_var(tc, "descr",
24021.1Skamil	    "Verify PT_IO with PIOD_WRITE_D and len = sizeof(uint64_t)");
24031.1Skamil}
24041.1Skamil
24051.1SkamilATF_TC_BODY(io_write_d4, tc)
24061.1Skamil{
24071.1Skamil	const int exitval = 5;
24081.1Skamil	const int sigval = SIGSTOP;
24091.1Skamil	pid_t child, wpid;
24101.1Skamil	uint64_t lookup_me = 0;
24111.1Skamil	const uint64_t magic = 0xab12764376490123;
24121.1Skamil	struct ptrace_io_desc io = {
24131.1Skamil		.piod_op = PIOD_WRITE_D,
24141.1Skamil		.piod_offs = &lookup_me,
24151.1Skamil		.piod_addr = &lookup_me,
24161.1Skamil		.piod_len = sizeof(lookup_me)
24171.1Skamil	};
24181.1Skamil#if defined(TWAIT_HAVE_STATUS)
24191.1Skamil	int status;
24201.1Skamil#endif
24211.1Skamil
24221.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
24231.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
24241.1Skamil	if (child == 0) {
24251.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
24261.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
24271.1Skamil
24281.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
24291.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
24301.1Skamil
24311.1Skamil		FORKEE_ASSERT_EQ(lookup_me, magic);
24321.1Skamil
24331.13Schristos		DPRINTF("Before exiting of the child process\n");
24341.1Skamil		_exit(exitval);
24351.1Skamil	}
24361.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
24371.1Skamil
24381.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
24391.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
24401.1Skamil
24411.1Skamil	validate_status_stopped(status, sigval);
24421.1Skamil
24431.1Skamil	lookup_me = magic;
24441.1Skamil
24451.13Schristos	DPRINTF("Write new lookup_me to tracee (PID=%d) from tracer (PID=%d)\n",
24461.1Skamil	    child, getpid());
24471.13Schristos	SYSCALL_REQUIRE(ptrace(PT_IO, child, &io, 0) != -1);
24481.1Skamil
24491.13Schristos	DPRINTF("Before resuming the child process where it left off and "
24501.1Skamil	    "without signal to be sent\n");
24511.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
24521.1Skamil
24531.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
24541.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
24551.1Skamil
24561.1Skamil	validate_status_exited(status, exitval);
24571.1Skamil
24581.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
24591.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
24601.1Skamil}
24611.1Skamil
24621.1SkamilATF_TC(io_read_auxv1);
24631.1SkamilATF_TC_HEAD(io_read_auxv1, tc)
24641.1Skamil{
24651.1Skamil	atf_tc_set_md_var(tc, "descr",
24661.1Skamil	    "Verify PT_READ_AUXV called for tracee");
24671.1Skamil}
24681.1Skamil
24691.1SkamilATF_TC_BODY(io_read_auxv1, tc)
24701.1Skamil{
24711.1Skamil	const int exitval = 5;
24721.1Skamil	const int sigval = SIGSTOP;
24731.1Skamil	pid_t child, wpid;
24741.1Skamil#if defined(TWAIT_HAVE_STATUS)
24751.1Skamil	int status;
24761.1Skamil#endif
24771.1Skamil	AuxInfo ai[100], *aip;
24781.1Skamil	struct ptrace_io_desc io = {
24791.1Skamil		.piod_op = PIOD_READ_AUXV,
24801.1Skamil		.piod_offs = 0,
24811.1Skamil		.piod_addr = ai,
24821.1Skamil		.piod_len = sizeof(ai)
24831.1Skamil	};
24841.1Skamil
24851.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
24861.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
24871.1Skamil	if (child == 0) {
24881.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
24891.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
24901.1Skamil
24911.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
24921.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
24931.1Skamil
24941.13Schristos		DPRINTF("Before exiting of the child process\n");
24951.1Skamil		_exit(exitval);
24961.1Skamil	}
24971.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
24981.1Skamil
24991.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
25001.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
25011.1Skamil
25021.1Skamil	validate_status_stopped(status, sigval);
25031.1Skamil
25041.13Schristos	DPRINTF("Read new AUXV from tracee (PID=%d) by tracer (PID=%d)\n",
25051.1Skamil	    child, getpid());
25061.13Schristos	SYSCALL_REQUIRE(ptrace(PT_IO, child, &io, 0) != -1);
25071.1Skamil
25081.13Schristos	DPRINTF("Asserting that AUXV length (%zu) is > 0\n", io.piod_len);
25091.1Skamil	ATF_REQUIRE(io.piod_len > 0);
25101.1Skamil
25111.1Skamil	for (aip = ai; aip->a_type != AT_NULL; aip++)
25121.13Schristos		DPRINTF("a_type=%#llx a_v=%#llx\n",
25131.1Skamil		    (long long int)aip->a_type, (long long int)aip->a_v);
25141.1Skamil
25151.13Schristos	DPRINTF("Before resuming the child process where it left off and "
25161.1Skamil	    "without signal to be sent\n");
25171.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
25181.1Skamil
25191.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
25201.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
25211.1Skamil
25221.1Skamil	validate_status_exited(status, exitval);
25231.1Skamil
25241.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
25251.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
25261.1Skamil}
25271.1Skamil
25281.1SkamilATF_TC(read_d1);
25291.1SkamilATF_TC_HEAD(read_d1, tc)
25301.1Skamil{
25311.1Skamil	atf_tc_set_md_var(tc, "descr",
25321.1Skamil	    "Verify PT_READ_D called once");
25331.1Skamil}
25341.1Skamil
25351.1SkamilATF_TC_BODY(read_d1, tc)
25361.1Skamil{
25371.1Skamil	const int exitval = 5;
25381.1Skamil	const int sigval = SIGSTOP;
25391.1Skamil	pid_t child, wpid;
25401.1Skamil	int lookup_me = 0;
25411.1Skamil	const int magic = (int)random();
25421.1Skamil#if defined(TWAIT_HAVE_STATUS)
25431.1Skamil	int status;
25441.1Skamil#endif
25451.1Skamil
25461.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
25471.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
25481.1Skamil	if (child == 0) {
25491.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
25501.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
25511.1Skamil
25521.1Skamil		lookup_me = magic;
25531.1Skamil
25541.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
25551.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
25561.1Skamil
25571.13Schristos		DPRINTF("Before exiting of the child process\n");
25581.1Skamil		_exit(exitval);
25591.1Skamil	}
25601.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
25611.1Skamil
25621.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
25631.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
25641.1Skamil
25651.1Skamil	validate_status_stopped(status, sigval);
25661.1Skamil
25671.13Schristos	DPRINTF("Read new lookup_me from tracee (PID=%d) by tracer (PID=%d)\n",
25681.1Skamil	    child, getpid());
25691.1Skamil	errno = 0;
25701.1Skamil	lookup_me = ptrace(PT_READ_D, child, &lookup_me, 0);
25711.18Schristos	SYSCALL_REQUIRE_ERRNO(errno, 0);
25721.1Skamil
25731.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me, magic,
25741.1Skamil	    "got value %#x != expected %#x", lookup_me, magic);
25751.1Skamil
25761.13Schristos	DPRINTF("Before resuming the child process where it left off and "
25771.1Skamil	    "without signal to be sent\n");
25781.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
25791.1Skamil
25801.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
25811.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
25821.1Skamil
25831.1Skamil	validate_status_exited(status, exitval);
25841.1Skamil
25851.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
25861.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
25871.1Skamil}
25881.1Skamil
25891.1SkamilATF_TC(read_d2);
25901.1SkamilATF_TC_HEAD(read_d2, tc)
25911.1Skamil{
25921.1Skamil	atf_tc_set_md_var(tc, "descr",
25931.1Skamil	    "Verify PT_READ_D called twice");
25941.1Skamil}
25951.1Skamil
25961.1SkamilATF_TC_BODY(read_d2, tc)
25971.1Skamil{
25981.1Skamil	const int exitval = 5;
25991.1Skamil	const int sigval = SIGSTOP;
26001.1Skamil	pid_t child, wpid;
26011.1Skamil	int lookup_me1 = 0;
26021.1Skamil	int lookup_me2 = 0;
26031.1Skamil	const int magic1 = (int)random();
26041.1Skamil	const int magic2 = (int)random();
26051.1Skamil#if defined(TWAIT_HAVE_STATUS)
26061.1Skamil	int status;
26071.1Skamil#endif
26081.1Skamil
26091.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
26101.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
26111.1Skamil	if (child == 0) {
26121.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
26131.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
26141.1Skamil
26151.1Skamil		lookup_me1 = magic1;
26161.1Skamil		lookup_me2 = magic2;
26171.1Skamil
26181.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
26191.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
26201.1Skamil
26211.13Schristos		DPRINTF("Before exiting of the child process\n");
26221.1Skamil		_exit(exitval);
26231.1Skamil	}
26241.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
26251.1Skamil
26261.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
26271.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
26281.1Skamil
26291.1Skamil	validate_status_stopped(status, sigval);
26301.1Skamil
26311.13Schristos	DPRINTF("Read new lookup_me1 from tracee (PID=%d) by tracer (PID=%d)\n",
26321.1Skamil	    child, getpid());
26331.1Skamil	errno = 0;
26341.1Skamil	lookup_me1 = ptrace(PT_READ_D, child, &lookup_me1, 0);
26351.18Schristos	SYSCALL_REQUIRE_ERRNO(errno, 0);
26361.1Skamil
26371.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me1, magic1,
26381.1Skamil	    "got value %#x != expected %#x", lookup_me1, magic1);
26391.1Skamil
26401.13Schristos	DPRINTF("Read new lookup_me2 from tracee (PID=%d) by tracer (PID=%d)\n",
26411.1Skamil	    child, getpid());
26421.1Skamil	errno = 0;
26431.1Skamil	lookup_me2 = ptrace(PT_READ_D, child, &lookup_me2, 0);
26441.18Schristos	SYSCALL_REQUIRE_ERRNO(errno, 0);
26451.1Skamil
26461.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me2, magic2,
26471.1Skamil	    "got value %#x != expected %#x", lookup_me2, magic2);
26481.1Skamil
26491.13Schristos	DPRINTF("Before resuming the child process where it left off and "
26501.1Skamil	    "without signal to be sent\n");
26511.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
26521.1Skamil
26531.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
26541.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
26551.1Skamil
26561.1Skamil	validate_status_exited(status, exitval);
26571.1Skamil
26581.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
26591.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
26601.1Skamil}
26611.1Skamil
26621.1SkamilATF_TC(read_d3);
26631.1SkamilATF_TC_HEAD(read_d3, tc)
26641.1Skamil{
26651.1Skamil	atf_tc_set_md_var(tc, "descr",
26661.1Skamil	    "Verify PT_READ_D called three times");
26671.1Skamil}
26681.1Skamil
26691.1SkamilATF_TC_BODY(read_d3, tc)
26701.1Skamil{
26711.1Skamil	const int exitval = 5;
26721.1Skamil	const int sigval = SIGSTOP;
26731.1Skamil	pid_t child, wpid;
26741.1Skamil	int lookup_me1 = 0;
26751.1Skamil	int lookup_me2 = 0;
26761.1Skamil	int lookup_me3 = 0;
26771.1Skamil	const int magic1 = (int)random();
26781.1Skamil	const int magic2 = (int)random();
26791.1Skamil	const int magic3 = (int)random();
26801.1Skamil#if defined(TWAIT_HAVE_STATUS)
26811.1Skamil	int status;
26821.1Skamil#endif
26831.1Skamil
26841.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
26851.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
26861.1Skamil	if (child == 0) {
26871.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
26881.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
26891.1Skamil
26901.1Skamil		lookup_me1 = magic1;
26911.1Skamil		lookup_me2 = magic2;
26921.1Skamil		lookup_me3 = magic3;
26931.1Skamil
26941.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
26951.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
26961.1Skamil
26971.13Schristos		DPRINTF("Before exiting of the child process\n");
26981.1Skamil		_exit(exitval);
26991.1Skamil	}
27001.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
27011.1Skamil
27021.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
27031.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
27041.1Skamil
27051.1Skamil	validate_status_stopped(status, sigval);
27061.1Skamil
27071.13Schristos	DPRINTF("Read new lookup_me1 from tracee (PID=%d) by tracer (PID=%d)\n",
27081.1Skamil	    child, getpid());
27091.1Skamil	errno = 0;
27101.1Skamil	lookup_me1 = ptrace(PT_READ_D, child, &lookup_me1, 0);
27111.18Schristos	SYSCALL_REQUIRE_ERRNO(errno, 0);
27121.1Skamil
27131.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me1, magic1,
27141.1Skamil	    "got value %#x != expected %#x", lookup_me1, magic1);
27151.1Skamil
27161.13Schristos	DPRINTF("Read new lookup_me2 from tracee (PID=%d) by tracer (PID=%d)\n",
27171.1Skamil	    child, getpid());
27181.1Skamil	errno = 0;
27191.1Skamil	lookup_me2 = ptrace(PT_READ_D, child, &lookup_me2, 0);
27201.18Schristos	SYSCALL_REQUIRE_ERRNO(errno, 0);
27211.1Skamil
27221.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me2, magic2,
27231.1Skamil	    "got value %#x != expected %#x", lookup_me2, magic2);
27241.1Skamil
27251.13Schristos	DPRINTF("Read new lookup_me3 from tracee (PID=%d) by tracer (PID=%d)\n",
27261.1Skamil	    child, getpid());
27271.1Skamil	errno = 0;
27281.1Skamil	lookup_me3 = ptrace(PT_READ_D, child, &lookup_me3, 0);
27291.18Schristos	SYSCALL_REQUIRE_ERRNO(errno, 0);
27301.1Skamil
27311.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me3, magic3,
27321.1Skamil	    "got value %#x != expected %#x", lookup_me3, magic3);
27331.1Skamil
27341.13Schristos	DPRINTF("Before resuming the child process where it left off and "
27351.1Skamil	    "without signal to be sent\n");
27361.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
27371.1Skamil
27381.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
27391.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
27401.1Skamil
27411.1Skamil	validate_status_exited(status, exitval);
27421.1Skamil
27431.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
27441.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
27451.1Skamil}
27461.1Skamil
27471.1SkamilATF_TC(read_d4);
27481.1SkamilATF_TC_HEAD(read_d4, tc)
27491.1Skamil{
27501.1Skamil	atf_tc_set_md_var(tc, "descr",
27511.1Skamil	    "Verify PT_READ_D called four times");
27521.1Skamil}
27531.1Skamil
27541.1SkamilATF_TC_BODY(read_d4, tc)
27551.1Skamil{
27561.1Skamil	const int exitval = 5;
27571.1Skamil	const int sigval = SIGSTOP;
27581.1Skamil	pid_t child, wpid;
27591.1Skamil	int lookup_me1 = 0;
27601.1Skamil	int lookup_me2 = 0;
27611.1Skamil	int lookup_me3 = 0;
27621.1Skamil	int lookup_me4 = 0;
27631.1Skamil	const int magic1 = (int)random();
27641.1Skamil	const int magic2 = (int)random();
27651.1Skamil	const int magic3 = (int)random();
27661.1Skamil	const int magic4 = (int)random();
27671.1Skamil#if defined(TWAIT_HAVE_STATUS)
27681.1Skamil	int status;
27691.1Skamil#endif
27701.1Skamil
27711.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
27721.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
27731.1Skamil	if (child == 0) {
27741.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
27751.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
27761.1Skamil
27771.1Skamil		lookup_me1 = magic1;
27781.1Skamil		lookup_me2 = magic2;
27791.1Skamil		lookup_me3 = magic3;
27801.1Skamil		lookup_me4 = magic4;
27811.1Skamil
27821.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
27831.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
27841.1Skamil
27851.13Schristos		DPRINTF("Before exiting of the child process\n");
27861.1Skamil		_exit(exitval);
27871.1Skamil	}
27881.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
27891.1Skamil
27901.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
27911.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
27921.1Skamil
27931.1Skamil	validate_status_stopped(status, sigval);
27941.1Skamil
27951.13Schristos	DPRINTF("Read new lookup_me1 from tracee (PID=%d) by tracer (PID=%d)\n",
27961.1Skamil	    child, getpid());
27971.1Skamil	errno = 0;
27981.1Skamil	lookup_me1 = ptrace(PT_READ_D, child, &lookup_me1, 0);
27991.18Schristos	SYSCALL_REQUIRE_ERRNO(errno, 0);
28001.1Skamil
28011.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me1, magic1,
28021.1Skamil	    "got value %#x != expected %#x", lookup_me1, magic1);
28031.1Skamil
28041.13Schristos	DPRINTF("Read new lookup_me2 from tracee (PID=%d) by tracer (PID=%d)\n",
28051.1Skamil	    child, getpid());
28061.1Skamil	errno = 0;
28071.1Skamil	lookup_me2 = ptrace(PT_READ_D, child, &lookup_me2, 0);
28081.18Schristos	SYSCALL_REQUIRE_ERRNO(errno, 0);
28091.1Skamil
28101.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me2, magic2,
28111.1Skamil	    "got value %#x != expected %#x", lookup_me2, magic2);
28121.1Skamil
28131.13Schristos	DPRINTF("Read new lookup_me3 from tracee (PID=%d) by tracer (PID=%d)\n",
28141.1Skamil	    child, getpid());
28151.1Skamil	errno = 0;
28161.1Skamil	lookup_me3 = ptrace(PT_READ_D, child, &lookup_me3, 0);
28171.18Schristos	SYSCALL_REQUIRE_ERRNO(errno, 0);
28181.1Skamil
28191.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me3, magic3,
28201.1Skamil	    "got value %#x != expected %#x", lookup_me3, magic3);
28211.1Skamil
28221.13Schristos	DPRINTF("Read new lookup_me4 from tracee (PID=%d) by tracer (PID=%d)\n",
28231.1Skamil	    child, getpid());
28241.1Skamil	errno = 0;
28251.1Skamil	lookup_me4 = ptrace(PT_READ_D, child, &lookup_me4, 0);
28261.18Schristos	SYSCALL_REQUIRE_ERRNO(errno, 0);
28271.1Skamil
28281.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me4, magic4,
28291.1Skamil	    "got value %#x != expected %#x", lookup_me4, magic4);
28301.1Skamil
28311.13Schristos	DPRINTF("Before resuming the child process where it left off and "
28321.1Skamil	    "without signal to be sent\n");
28331.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
28341.1Skamil
28351.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
28361.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
28371.1Skamil
28381.1Skamil	validate_status_exited(status, exitval);
28391.1Skamil
28401.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
28411.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
28421.1Skamil}
28431.1Skamil
28441.1SkamilATF_TC(write_d1);
28451.1SkamilATF_TC_HEAD(write_d1, tc)
28461.1Skamil{
28471.1Skamil	atf_tc_set_md_var(tc, "descr",
28481.1Skamil	    "Verify PT_WRITE_D called once");
28491.1Skamil}
28501.1Skamil
28511.1SkamilATF_TC_BODY(write_d1, tc)
28521.1Skamil{
28531.1Skamil	const int exitval = 5;
28541.1Skamil	const int sigval = SIGSTOP;
28551.1Skamil	pid_t child, wpid;
28561.1Skamil	int lookup_me = 0;
28571.1Skamil	const int magic = (int)random();
28581.1Skamil#if defined(TWAIT_HAVE_STATUS)
28591.1Skamil	int status;
28601.1Skamil#endif
28611.1Skamil
28621.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
28631.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
28641.1Skamil	if (child == 0) {
28651.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
28661.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
28671.1Skamil
28681.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
28691.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
28701.1Skamil
28711.1Skamil		FORKEE_ASSERT_EQ(lookup_me, magic);
28721.1Skamil
28731.13Schristos		DPRINTF("Before exiting of the child process\n");
28741.1Skamil		_exit(exitval);
28751.1Skamil	}
28761.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
28771.1Skamil
28781.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
28791.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
28801.1Skamil
28811.1Skamil	validate_status_stopped(status, sigval);
28821.1Skamil
28831.13Schristos	DPRINTF("Write new lookup_me to tracee (PID=%d) from tracer (PID=%d)\n",
28841.1Skamil	    child, getpid());
28851.13Schristos	SYSCALL_REQUIRE(ptrace(PT_WRITE_D, child, &lookup_me, magic) != -1);
28861.1Skamil
28871.13Schristos	DPRINTF("Before resuming the child process where it left off and "
28881.1Skamil	    "without signal to be sent\n");
28891.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
28901.1Skamil
28911.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
28921.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
28931.1Skamil
28941.1Skamil	validate_status_exited(status, exitval);
28951.1Skamil
28961.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
28971.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
28981.1Skamil}
28991.1Skamil
29001.1SkamilATF_TC(write_d2);
29011.1SkamilATF_TC_HEAD(write_d2, tc)
29021.1Skamil{
29031.1Skamil	atf_tc_set_md_var(tc, "descr",
29041.1Skamil	    "Verify PT_WRITE_D called twice");
29051.1Skamil}
29061.1Skamil
29071.1SkamilATF_TC_BODY(write_d2, tc)
29081.1Skamil{
29091.1Skamil	const int exitval = 5;
29101.1Skamil	const int sigval = SIGSTOP;
29111.1Skamil	pid_t child, wpid;
29121.1Skamil	int lookup_me1 = 0;
29131.1Skamil	int lookup_me2 = 0;
29141.1Skamil	const int magic1 = (int)random();
29151.1Skamil	const int magic2 = (int)random();
29161.1Skamil#if defined(TWAIT_HAVE_STATUS)
29171.1Skamil	int status;
29181.1Skamil#endif
29191.1Skamil
29201.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
29211.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
29221.1Skamil	if (child == 0) {
29231.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
29241.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
29251.1Skamil
29261.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
29271.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
29281.1Skamil
29291.1Skamil		FORKEE_ASSERT_EQ(lookup_me1, magic1);
29301.1Skamil		FORKEE_ASSERT_EQ(lookup_me2, magic2);
29311.1Skamil
29321.13Schristos		DPRINTF("Before exiting of the child process\n");
29331.1Skamil		_exit(exitval);
29341.1Skamil	}
29351.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
29361.1Skamil
29371.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
29381.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
29391.1Skamil
29401.1Skamil	validate_status_stopped(status, sigval);
29411.1Skamil
29421.13Schristos	DPRINTF("Write new lookup_me1 to tracee (PID=%d) from tracer (PID=%d)\n",
29431.1Skamil	    child, getpid());
29441.13Schristos	SYSCALL_REQUIRE(ptrace(PT_WRITE_D, child, &lookup_me1, magic1) != -1);
29451.1Skamil
29461.13Schristos	DPRINTF("Write new lookup_me2 to tracee (PID=%d) from tracer (PID=%d)\n",
29471.1Skamil	    child, getpid());
29481.13Schristos	SYSCALL_REQUIRE(ptrace(PT_WRITE_D, child, &lookup_me2, magic2) != -1);
29491.1Skamil
29501.13Schristos	DPRINTF("Before resuming the child process where it left off and "
29511.1Skamil	    "without signal to be sent\n");
29521.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
29531.1Skamil
29541.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
29551.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
29561.1Skamil
29571.1Skamil	validate_status_exited(status, exitval);
29581.1Skamil
29591.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
29601.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
29611.1Skamil}
29621.1Skamil
29631.1SkamilATF_TC(write_d3);
29641.1SkamilATF_TC_HEAD(write_d3, tc)
29651.1Skamil{
29661.1Skamil	atf_tc_set_md_var(tc, "descr",
29671.1Skamil	    "Verify PT_WRITE_D called three times");
29681.1Skamil}
29691.1Skamil
29701.1SkamilATF_TC_BODY(write_d3, tc)
29711.1Skamil{
29721.1Skamil	const int exitval = 5;
29731.1Skamil	const int sigval = SIGSTOP;
29741.1Skamil	pid_t child, wpid;
29751.1Skamil	int lookup_me1 = 0;
29761.1Skamil	int lookup_me2 = 0;
29771.1Skamil	int lookup_me3 = 0;
29781.1Skamil	const int magic1 = (int)random();
29791.1Skamil	const int magic2 = (int)random();
29801.1Skamil	const int magic3 = (int)random();
29811.1Skamil#if defined(TWAIT_HAVE_STATUS)
29821.1Skamil	int status;
29831.1Skamil#endif
29841.1Skamil
29851.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
29861.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
29871.1Skamil	if (child == 0) {
29881.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
29891.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
29901.1Skamil
29911.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
29921.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
29931.1Skamil
29941.1Skamil		FORKEE_ASSERT_EQ(lookup_me1, magic1);
29951.1Skamil		FORKEE_ASSERT_EQ(lookup_me2, magic2);
29961.1Skamil		FORKEE_ASSERT_EQ(lookup_me3, magic3);
29971.1Skamil
29981.13Schristos		DPRINTF("Before exiting of the child process\n");
29991.1Skamil		_exit(exitval);
30001.1Skamil	}
30011.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
30021.1Skamil
30031.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
30041.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
30051.1Skamil
30061.1Skamil	validate_status_stopped(status, sigval);
30071.1Skamil
30081.13Schristos	DPRINTF("Write new lookup_me1 to tracee (PID=%d) from tracer (PID=%d)\n",
30091.1Skamil	    child, getpid());
30101.13Schristos	SYSCALL_REQUIRE(ptrace(PT_WRITE_D, child, &lookup_me1, magic1) != -1);
30111.1Skamil
30121.13Schristos	DPRINTF("Write new lookup_me2 to tracee (PID=%d) from tracer (PID=%d)\n",
30131.1Skamil	    child, getpid());
30141.13Schristos	SYSCALL_REQUIRE(ptrace(PT_WRITE_D, child, &lookup_me2, magic2) != -1);
30151.1Skamil
30161.13Schristos	DPRINTF("Write new lookup_me3 to tracee (PID=%d) from tracer (PID=%d)\n",
30171.1Skamil	    child, getpid());
30181.13Schristos	SYSCALL_REQUIRE(ptrace(PT_WRITE_D, child, &lookup_me3, magic3) != -1);
30191.1Skamil
30201.13Schristos	DPRINTF("Before resuming the child process where it left off and "
30211.1Skamil	    "without signal to be sent\n");
30221.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
30231.1Skamil
30241.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
30251.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
30261.1Skamil
30271.1Skamil	validate_status_exited(status, exitval);
30281.1Skamil
30291.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
30301.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
30311.1Skamil}
30321.1Skamil
30331.1SkamilATF_TC(write_d4);
30341.1SkamilATF_TC_HEAD(write_d4, tc)
30351.1Skamil{
30361.1Skamil	atf_tc_set_md_var(tc, "descr",
30371.1Skamil	    "Verify PT_WRITE_D called four times");
30381.1Skamil}
30391.1Skamil
30401.1SkamilATF_TC_BODY(write_d4, tc)
30411.1Skamil{
30421.1Skamil	const int exitval = 5;
30431.1Skamil	const int sigval = SIGSTOP;
30441.1Skamil	pid_t child, wpid;
30451.1Skamil	int lookup_me1 = 0;
30461.1Skamil	int lookup_me2 = 0;
30471.1Skamil	int lookup_me3 = 0;
30481.1Skamil	int lookup_me4 = 0;
30491.1Skamil	const int magic1 = (int)random();
30501.1Skamil	const int magic2 = (int)random();
30511.1Skamil	const int magic3 = (int)random();
30521.1Skamil	const int magic4 = (int)random();
30531.1Skamil#if defined(TWAIT_HAVE_STATUS)
30541.1Skamil	int status;
30551.1Skamil#endif
30561.1Skamil
30571.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
30581.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
30591.1Skamil	if (child == 0) {
30601.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
30611.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
30621.1Skamil
30631.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
30641.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
30651.1Skamil
30661.1Skamil		FORKEE_ASSERT_EQ(lookup_me1, magic1);
30671.1Skamil		FORKEE_ASSERT_EQ(lookup_me2, magic2);
30681.1Skamil		FORKEE_ASSERT_EQ(lookup_me3, magic3);
30691.1Skamil		FORKEE_ASSERT_EQ(lookup_me4, magic4);
30701.1Skamil
30711.13Schristos		DPRINTF("Before exiting of the child process\n");
30721.1Skamil		_exit(exitval);
30731.1Skamil	}
30741.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
30751.1Skamil
30761.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
30771.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
30781.1Skamil
30791.1Skamil	validate_status_stopped(status, sigval);
30801.1Skamil
30811.13Schristos	DPRINTF("Write new lookup_me1 to tracee (PID=%d) from tracer (PID=%d)\n",
30821.1Skamil	    child, getpid());
30831.13Schristos	SYSCALL_REQUIRE(ptrace(PT_WRITE_D, child, &lookup_me1, magic1) != -1);
30841.1Skamil
30851.13Schristos	DPRINTF("Write new lookup_me2 to tracee (PID=%d) from tracer (PID=%d)\n",
30861.1Skamil	    child, getpid());
30871.13Schristos	SYSCALL_REQUIRE(ptrace(PT_WRITE_D, child, &lookup_me2, magic2) != -1);
30881.1Skamil
30891.13Schristos	DPRINTF("Write new lookup_me3 to tracee (PID=%d) from tracer (PID=%d)\n",
30901.1Skamil	    child, getpid());
30911.13Schristos	SYSCALL_REQUIRE(ptrace(PT_WRITE_D, child, &lookup_me3, magic3) != -1);
30921.1Skamil
30931.13Schristos	DPRINTF("Write new lookup_me4 to tracee (PID=%d) from tracer (PID=%d)\n",
30941.1Skamil	    child, getpid());
30951.13Schristos	SYSCALL_REQUIRE(ptrace(PT_WRITE_D, child, &lookup_me4, magic4) != -1);
30961.1Skamil
30971.13Schristos	DPRINTF("Before resuming the child process where it left off and "
30981.1Skamil	    "without signal to be sent\n");
30991.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
31001.1Skamil
31011.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
31021.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
31031.1Skamil
31041.1Skamil	validate_status_exited(status, exitval);
31051.1Skamil
31061.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
31071.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
31081.1Skamil}
31091.1Skamil
31101.1SkamilATF_TC(io_read_d_write_d_handshake1);
31111.1SkamilATF_TC_HEAD(io_read_d_write_d_handshake1, tc)
31121.1Skamil{
31131.1Skamil	atf_tc_set_md_var(tc, "descr",
31141.1Skamil	    "Verify PT_IO with PIOD_READ_D and PIOD_WRITE_D handshake");
31151.1Skamil}
31161.1Skamil
31171.1SkamilATF_TC_BODY(io_read_d_write_d_handshake1, tc)
31181.1Skamil{
31191.1Skamil	const int exitval = 5;
31201.1Skamil	const int sigval = SIGSTOP;
31211.1Skamil	pid_t child, wpid;
31221.1Skamil	uint8_t lookup_me_fromtracee = 0;
31231.1Skamil	const uint8_t magic_fromtracee = (uint8_t)random();
31241.1Skamil	uint8_t lookup_me_totracee = 0;
31251.1Skamil	const uint8_t magic_totracee = (uint8_t)random();
31261.1Skamil	struct ptrace_io_desc io_fromtracee = {
31271.1Skamil		.piod_op = PIOD_READ_D,
31281.1Skamil		.piod_offs = &lookup_me_fromtracee,
31291.1Skamil		.piod_addr = &lookup_me_fromtracee,
31301.1Skamil		.piod_len = sizeof(lookup_me_fromtracee)
31311.1Skamil	};
31321.1Skamil	struct ptrace_io_desc io_totracee = {
31331.1Skamil		.piod_op = PIOD_WRITE_D,
31341.1Skamil		.piod_offs = &lookup_me_totracee,
31351.1Skamil		.piod_addr = &lookup_me_totracee,
31361.1Skamil		.piod_len = sizeof(lookup_me_totracee)
31371.1Skamil	};
31381.1Skamil#if defined(TWAIT_HAVE_STATUS)
31391.1Skamil	int status;
31401.1Skamil#endif
31411.1Skamil
31421.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
31431.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
31441.1Skamil	if (child == 0) {
31451.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
31461.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
31471.1Skamil
31481.1Skamil		lookup_me_fromtracee = magic_fromtracee;
31491.1Skamil
31501.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
31511.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
31521.1Skamil
31531.1Skamil		FORKEE_ASSERT_EQ(lookup_me_totracee, magic_totracee);
31541.1Skamil
31551.13Schristos		DPRINTF("Before exiting of the child process\n");
31561.1Skamil		_exit(exitval);
31571.1Skamil	}
31581.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
31591.1Skamil
31601.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
31611.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
31621.1Skamil
31631.1Skamil	validate_status_stopped(status, sigval);
31641.1Skamil
31651.13Schristos	DPRINTF("Read lookup_me_fromtracee PID=%d by tracer (PID=%d)\n",
31661.1Skamil	    child, getpid());
31671.13Schristos	SYSCALL_REQUIRE(ptrace(PT_IO, child, &io_fromtracee, 0) != -1);
31681.1Skamil
31691.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me_fromtracee, magic_fromtracee,
31701.1Skamil	    "got value %" PRIx8 " != expected %" PRIx8, lookup_me_fromtracee,
31711.1Skamil	    magic_fromtracee);
31721.1Skamil
31731.1Skamil	lookup_me_totracee = magic_totracee;
31741.1Skamil
31751.13Schristos	DPRINTF("Write lookup_me_totracee to PID=%d by tracer (PID=%d)\n",
31761.1Skamil	    child, getpid());
31771.13Schristos	SYSCALL_REQUIRE(ptrace(PT_IO, child, &io_totracee, 0) != -1);
31781.1Skamil
31791.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me_totracee, magic_totracee,
31801.1Skamil	    "got value %" PRIx8 " != expected %" PRIx8, lookup_me_totracee,
31811.1Skamil	    magic_totracee);
31821.1Skamil
31831.13Schristos	DPRINTF("Before resuming the child process where it left off and "
31841.1Skamil	    "without signal to be sent\n");
31851.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
31861.1Skamil
31871.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
31881.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
31891.1Skamil
31901.1Skamil	validate_status_exited(status, exitval);
31911.1Skamil
31921.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
31931.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
31941.1Skamil}
31951.1Skamil
31961.1SkamilATF_TC(io_read_d_write_d_handshake2);
31971.1SkamilATF_TC_HEAD(io_read_d_write_d_handshake2, tc)
31981.1Skamil{
31991.1Skamil	atf_tc_set_md_var(tc, "descr",
32001.1Skamil	    "Verify PT_IO with PIOD_WRITE_D and PIOD_READ_D handshake");
32011.1Skamil}
32021.1Skamil
32031.1SkamilATF_TC_BODY(io_read_d_write_d_handshake2, tc)
32041.1Skamil{
32051.1Skamil	const int exitval = 5;
32061.1Skamil	const int sigval = SIGSTOP;
32071.1Skamil	pid_t child, wpid;
32081.1Skamil	uint8_t lookup_me_fromtracee = 0;
32091.1Skamil	const uint8_t magic_fromtracee = (uint8_t)random();
32101.1Skamil	uint8_t lookup_me_totracee = 0;
32111.1Skamil	const uint8_t magic_totracee = (uint8_t)random();
32121.1Skamil	struct ptrace_io_desc io_fromtracee = {
32131.1Skamil		.piod_op = PIOD_READ_D,
32141.1Skamil		.piod_offs = &lookup_me_fromtracee,
32151.1Skamil		.piod_addr = &lookup_me_fromtracee,
32161.1Skamil		.piod_len = sizeof(lookup_me_fromtracee)
32171.1Skamil	};
32181.1Skamil	struct ptrace_io_desc io_totracee = {
32191.1Skamil		.piod_op = PIOD_WRITE_D,
32201.1Skamil		.piod_offs = &lookup_me_totracee,
32211.1Skamil		.piod_addr = &lookup_me_totracee,
32221.1Skamil		.piod_len = sizeof(lookup_me_totracee)
32231.1Skamil	};
32241.1Skamil#if defined(TWAIT_HAVE_STATUS)
32251.1Skamil	int status;
32261.1Skamil#endif
32271.1Skamil
32281.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
32291.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
32301.1Skamil	if (child == 0) {
32311.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
32321.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
32331.1Skamil
32341.1Skamil		lookup_me_fromtracee = magic_fromtracee;
32351.1Skamil
32361.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
32371.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
32381.1Skamil
32391.1Skamil		FORKEE_ASSERT_EQ(lookup_me_totracee, magic_totracee);
32401.1Skamil
32411.13Schristos		DPRINTF("Before exiting of the child process\n");
32421.1Skamil		_exit(exitval);
32431.1Skamil	}
32441.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
32451.1Skamil
32461.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
32471.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
32481.1Skamil
32491.1Skamil	validate_status_stopped(status, sigval);
32501.1Skamil
32511.1Skamil	lookup_me_totracee = magic_totracee;
32521.1Skamil
32531.13Schristos	DPRINTF("Write lookup_me_totracee to PID=%d by tracer (PID=%d)\n",
32541.1Skamil	    child, getpid());
32551.13Schristos	SYSCALL_REQUIRE(ptrace(PT_IO, child, &io_totracee, 0) != -1);
32561.1Skamil
32571.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me_totracee, magic_totracee,
32581.1Skamil	    "got value %" PRIx8 " != expected %" PRIx8, lookup_me_totracee,
32591.1Skamil	    magic_totracee);
32601.1Skamil
32611.13Schristos	DPRINTF("Read lookup_me_fromtracee PID=%d by tracer (PID=%d)\n",
32621.1Skamil	    child, getpid());
32631.13Schristos	SYSCALL_REQUIRE(ptrace(PT_IO, child, &io_fromtracee, 0) != -1);
32641.1Skamil
32651.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me_fromtracee, magic_fromtracee,
32661.1Skamil	    "got value %" PRIx8 " != expected %" PRIx8, lookup_me_fromtracee,
32671.1Skamil	    magic_fromtracee);
32681.1Skamil
32691.13Schristos	DPRINTF("Before resuming the child process where it left off and "
32701.1Skamil	    "without signal to be sent\n");
32711.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
32721.1Skamil
32731.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
32741.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
32751.1Skamil
32761.1Skamil	validate_status_exited(status, exitval);
32771.1Skamil
32781.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
32791.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
32801.1Skamil}
32811.1Skamil
32821.1SkamilATF_TC(read_d_write_d_handshake1);
32831.1SkamilATF_TC_HEAD(read_d_write_d_handshake1, tc)
32841.1Skamil{
32851.1Skamil	atf_tc_set_md_var(tc, "descr",
32861.1Skamil	    "Verify PT_READ_D with PT_WRITE_D handshake");
32871.1Skamil}
32881.1Skamil
32891.1SkamilATF_TC_BODY(read_d_write_d_handshake1, tc)
32901.1Skamil{
32911.1Skamil	const int exitval = 5;
32921.1Skamil	const int sigval = SIGSTOP;
32931.1Skamil	pid_t child, wpid;
32941.1Skamil	int lookup_me_fromtracee = 0;
32951.1Skamil	const int magic_fromtracee = (int)random();
32961.1Skamil	int lookup_me_totracee = 0;
32971.1Skamil	const int magic_totracee = (int)random();
32981.1Skamil#if defined(TWAIT_HAVE_STATUS)
32991.1Skamil	int status;
33001.1Skamil#endif
33011.1Skamil
33021.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
33031.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
33041.1Skamil	if (child == 0) {
33051.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
33061.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
33071.1Skamil
33081.1Skamil		lookup_me_fromtracee = magic_fromtracee;
33091.1Skamil
33101.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
33111.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
33121.1Skamil
33131.1Skamil		FORKEE_ASSERT_EQ(lookup_me_totracee, magic_totracee);
33141.1Skamil
33151.13Schristos		DPRINTF("Before exiting of the child process\n");
33161.1Skamil		_exit(exitval);
33171.1Skamil	}
33181.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
33191.1Skamil
33201.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
33211.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
33221.1Skamil
33231.1Skamil	validate_status_stopped(status, sigval);
33241.1Skamil
33251.13Schristos	DPRINTF("Read new lookup_me_fromtracee PID=%d by tracer (PID=%d)\n",
33261.1Skamil	    child, getpid());
33271.1Skamil	errno = 0;
33281.1Skamil	lookup_me_fromtracee =
33291.1Skamil	    ptrace(PT_READ_D, child, &lookup_me_fromtracee, 0);
33301.18Schristos	SYSCALL_REQUIRE_ERRNO(errno, 0);
33311.1Skamil
33321.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me_fromtracee, magic_fromtracee,
33331.1Skamil	    "got value %#x != expected %#x", lookup_me_fromtracee,
33341.1Skamil	    magic_fromtracee);
33351.1Skamil
33361.13Schristos	DPRINTF("Write new lookup_me_totracee to PID=%d from tracer (PID=%d)\n",
33371.1Skamil	    child, getpid());
33381.1Skamil	ATF_REQUIRE
33391.1Skamil	    (ptrace(PT_WRITE_D, child, &lookup_me_totracee, magic_totracee)
33401.1Skamil	    != -1);
33411.1Skamil
33421.13Schristos	DPRINTF("Before resuming the child process where it left off and "
33431.1Skamil	    "without signal to be sent\n");
33441.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
33451.1Skamil
33461.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
33471.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
33481.1Skamil
33491.1Skamil	validate_status_exited(status, exitval);
33501.1Skamil
33511.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
33521.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
33531.1Skamil}
33541.1Skamil
33551.1SkamilATF_TC(read_d_write_d_handshake2);
33561.1SkamilATF_TC_HEAD(read_d_write_d_handshake2, tc)
33571.1Skamil{
33581.1Skamil	atf_tc_set_md_var(tc, "descr",
33591.1Skamil	    "Verify PT_WRITE_D with PT_READ_D handshake");
33601.1Skamil}
33611.1Skamil
33621.1SkamilATF_TC_BODY(read_d_write_d_handshake2, tc)
33631.1Skamil{
33641.1Skamil	const int exitval = 5;
33651.1Skamil	const int sigval = SIGSTOP;
33661.1Skamil	pid_t child, wpid;
33671.1Skamil	int lookup_me_fromtracee = 0;
33681.1Skamil	const int magic_fromtracee = (int)random();
33691.1Skamil	int lookup_me_totracee = 0;
33701.1Skamil	const int magic_totracee = (int)random();
33711.1Skamil#if defined(TWAIT_HAVE_STATUS)
33721.1Skamil	int status;
33731.1Skamil#endif
33741.1Skamil
33751.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
33761.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
33771.1Skamil	if (child == 0) {
33781.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
33791.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
33801.1Skamil
33811.1Skamil		lookup_me_fromtracee = magic_fromtracee;
33821.1Skamil
33831.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
33841.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
33851.1Skamil
33861.1Skamil		FORKEE_ASSERT_EQ(lookup_me_totracee, magic_totracee);
33871.1Skamil
33881.13Schristos		DPRINTF("Before exiting of the child process\n");
33891.1Skamil		_exit(exitval);
33901.1Skamil	}
33911.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
33921.1Skamil
33931.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
33941.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
33951.1Skamil
33961.1Skamil	validate_status_stopped(status, sigval);
33971.1Skamil
33981.13Schristos	DPRINTF("Write new lookup_me_totracee to PID=%d from tracer (PID=%d)\n",
33991.1Skamil	    child, getpid());
34001.1Skamil	ATF_REQUIRE
34011.1Skamil	    (ptrace(PT_WRITE_D, child, &lookup_me_totracee, magic_totracee)
34021.1Skamil	    != -1);
34031.1Skamil
34041.13Schristos	DPRINTF("Read new lookup_me_fromtracee PID=%d by tracer (PID=%d)\n",
34051.1Skamil	    child, getpid());
34061.1Skamil	errno = 0;
34071.1Skamil	lookup_me_fromtracee =
34081.1Skamil	    ptrace(PT_READ_D, child, &lookup_me_fromtracee, 0);
34091.18Schristos	SYSCALL_REQUIRE_ERRNO(errno, 0);
34101.1Skamil
34111.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me_fromtracee, magic_fromtracee,
34121.1Skamil	    "got value %#x != expected %#x", lookup_me_fromtracee,
34131.1Skamil	    magic_fromtracee);
34141.1Skamil
34151.13Schristos	DPRINTF("Before resuming the child process where it left off and "
34161.1Skamil	    "without signal to be sent\n");
34171.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
34181.1Skamil
34191.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
34201.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
34211.1Skamil
34221.1Skamil	validate_status_exited(status, exitval);
34231.1Skamil
34241.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
34251.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
34261.1Skamil}
34271.1Skamil
34281.1Skamil/* These dummy functions are used to be copied with ptrace(2) calls */
34291.1Skamilstatic int __used
34301.1Skamildummy_fn1(int a, int b, int c, int d)
34311.1Skamil{
34321.1Skamil
34331.1Skamil	a *= 1;
34341.1Skamil	b += 2;
34351.1Skamil	c -= 3;
34361.1Skamil	d /= 4;
34371.1Skamil
34381.1Skamil	return a + b * c - d;
34391.1Skamil}
34401.1Skamil
34411.1Skamilstatic int __used
34421.1Skamildummy_fn2(int a, int b, int c, int d)
34431.1Skamil{
34441.1Skamil
34451.1Skamil	a *= 4;
34461.1Skamil	b += 3;
34471.1Skamil	c -= 2;
34481.1Skamil	d /= 1;
34491.1Skamil
34501.1Skamil	return a + b * c - d;
34511.1Skamil}
34521.1Skamil
34531.1Skamilstatic int __used
34541.1Skamildummy_fn3(int a, int b, int c, int d)
34551.1Skamil{
34561.1Skamil
34571.1Skamil	a *= 10;
34581.1Skamil	b += 20;
34591.1Skamil	c -= 30;
34601.1Skamil	d /= 40;
34611.1Skamil
34621.1Skamil	return a + b * c - d;
34631.1Skamil}
34641.1Skamil
34651.1Skamilstatic int __used
34661.1Skamildummy_fn4(int a, int b, int c, int d)
34671.1Skamil{
34681.1Skamil
34691.1Skamil	a *= 40;
34701.1Skamil	b += 30;
34711.1Skamil	c -= 20;
34721.1Skamil	d /= 10;
34731.1Skamil
34741.1Skamil	return a + b * c - d;
34751.1Skamil}
34761.1Skamil
34771.1SkamilATF_TC(io_read_i1);
34781.1SkamilATF_TC_HEAD(io_read_i1, tc)
34791.1Skamil{
34801.1Skamil	atf_tc_set_md_var(tc, "descr",
34811.1Skamil	    "Verify PT_IO with PIOD_READ_I and len = sizeof(uint8_t)");
34821.1Skamil}
34831.1Skamil
34841.1SkamilATF_TC_BODY(io_read_i1, tc)
34851.1Skamil{
34861.1Skamil	const int exitval = 5;
34871.1Skamil	const int sigval = SIGSTOP;
34881.1Skamil	pid_t child, wpid;
34891.1Skamil	uint8_t lookup_me = 0;
34901.1Skamil	uint8_t magic;
34911.1Skamil	memcpy(&magic, dummy_fn1, sizeof(magic));
34921.1Skamil	struct ptrace_io_desc io = {
34931.1Skamil		.piod_op = PIOD_READ_I,
34941.1Skamil		.piod_offs = dummy_fn1,
34951.1Skamil		.piod_addr = &lookup_me,
34961.1Skamil		.piod_len = sizeof(lookup_me)
34971.1Skamil	};
34981.1Skamil#if defined(TWAIT_HAVE_STATUS)
34991.1Skamil	int status;
35001.1Skamil#endif
35011.1Skamil
35021.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
35031.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
35041.1Skamil	if (child == 0) {
35051.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
35061.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
35071.1Skamil
35081.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
35091.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
35101.1Skamil
35111.13Schristos		DPRINTF("Before exiting of the child process\n");
35121.1Skamil		_exit(exitval);
35131.1Skamil	}
35141.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
35151.1Skamil
35161.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
35171.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
35181.1Skamil
35191.1Skamil	validate_status_stopped(status, sigval);
35201.1Skamil
35211.13Schristos	DPRINTF("Read lookup_me from tracee (PID=%d) by tracer (PID=%d)\n",
35221.1Skamil	    child, getpid());
35231.13Schristos	SYSCALL_REQUIRE(ptrace(PT_IO, child, &io, 0) != -1);
35241.1Skamil
35251.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me, magic,
35261.1Skamil	    "got value %" PRIx8 " != expected %" PRIx8, lookup_me, magic);
35271.1Skamil
35281.13Schristos	DPRINTF("Before resuming the child process where it left off and "
35291.1Skamil	    "without signal to be sent\n");
35301.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
35311.1Skamil
35321.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
35331.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
35341.1Skamil
35351.1Skamil	validate_status_exited(status, exitval);
35361.1Skamil
35371.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
35381.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
35391.1Skamil}
35401.1Skamil
35411.1SkamilATF_TC(io_read_i2);
35421.1SkamilATF_TC_HEAD(io_read_i2, tc)
35431.1Skamil{
35441.1Skamil	atf_tc_set_md_var(tc, "descr",
35451.1Skamil	    "Verify PT_IO with PIOD_READ_I and len = sizeof(uint16_t)");
35461.1Skamil}
35471.1Skamil
35481.1SkamilATF_TC_BODY(io_read_i2, tc)
35491.1Skamil{
35501.1Skamil	const int exitval = 5;
35511.1Skamil	const int sigval = SIGSTOP;
35521.1Skamil	pid_t child, wpid;
35531.1Skamil	uint16_t lookup_me = 0;
35541.1Skamil	uint16_t magic;
35551.1Skamil	memcpy(&magic, dummy_fn1, sizeof(magic));
35561.1Skamil	struct ptrace_io_desc io = {
35571.1Skamil		.piod_op = PIOD_READ_I,
35581.1Skamil		.piod_offs = dummy_fn1,
35591.1Skamil		.piod_addr = &lookup_me,
35601.1Skamil		.piod_len = sizeof(lookup_me)
35611.1Skamil	};
35621.1Skamil#if defined(TWAIT_HAVE_STATUS)
35631.1Skamil	int status;
35641.1Skamil#endif
35651.1Skamil
35661.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
35671.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
35681.1Skamil	if (child == 0) {
35691.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
35701.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
35711.1Skamil
35721.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
35731.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
35741.1Skamil
35751.13Schristos		DPRINTF("Before exiting of the child process\n");
35761.1Skamil		_exit(exitval);
35771.1Skamil	}
35781.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
35791.1Skamil
35801.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
35811.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
35821.1Skamil
35831.1Skamil	validate_status_stopped(status, sigval);
35841.1Skamil
35851.13Schristos	DPRINTF("Read lookup_me from tracee (PID=%d) by tracer (PID=%d)\n",
35861.1Skamil	    child, getpid());
35871.13Schristos	SYSCALL_REQUIRE(ptrace(PT_IO, child, &io, 0) != -1);
35881.1Skamil
35891.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me, magic,
35901.1Skamil	    "got value %" PRIx16 " != expected %" PRIx16, lookup_me, magic);
35911.1Skamil
35921.13Schristos	DPRINTF("Before resuming the child process where it left off and "
35931.1Skamil	    "without signal to be sent\n");
35941.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
35951.1Skamil
35961.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
35971.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
35981.1Skamil
35991.1Skamil	validate_status_exited(status, exitval);
36001.1Skamil
36011.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
36021.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
36031.1Skamil}
36041.1Skamil
36051.1SkamilATF_TC(io_read_i3);
36061.1SkamilATF_TC_HEAD(io_read_i3, tc)
36071.1Skamil{
36081.1Skamil	atf_tc_set_md_var(tc, "descr",
36091.1Skamil	    "Verify PT_IO with PIOD_READ_I and len = sizeof(uint32_t)");
36101.1Skamil}
36111.1Skamil
36121.1SkamilATF_TC_BODY(io_read_i3, tc)
36131.1Skamil{
36141.1Skamil	const int exitval = 5;
36151.1Skamil	const int sigval = SIGSTOP;
36161.1Skamil	pid_t child, wpid;
36171.1Skamil	uint32_t lookup_me = 0;
36181.1Skamil	uint32_t magic;
36191.1Skamil	memcpy(&magic, dummy_fn1, sizeof(magic));
36201.1Skamil	struct ptrace_io_desc io = {
36211.1Skamil		.piod_op = PIOD_READ_I,
36221.1Skamil		.piod_offs = dummy_fn1,
36231.1Skamil		.piod_addr = &lookup_me,
36241.1Skamil		.piod_len = sizeof(lookup_me)
36251.1Skamil	};
36261.1Skamil#if defined(TWAIT_HAVE_STATUS)
36271.1Skamil	int status;
36281.1Skamil#endif
36291.1Skamil
36301.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
36311.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
36321.1Skamil	if (child == 0) {
36331.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
36341.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
36351.1Skamil
36361.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
36371.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
36381.1Skamil
36391.13Schristos		DPRINTF("Before exiting of the child process\n");
36401.1Skamil		_exit(exitval);
36411.1Skamil	}
36421.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
36431.1Skamil
36441.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
36451.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
36461.1Skamil
36471.1Skamil	validate_status_stopped(status, sigval);
36481.1Skamil
36491.13Schristos	DPRINTF("Read lookup_me from tracee (PID=%d) by tracer (PID=%d)\n",
36501.1Skamil	    child, getpid());
36511.13Schristos	SYSCALL_REQUIRE(ptrace(PT_IO, child, &io, 0) != -1);
36521.1Skamil
36531.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me, magic,
36541.1Skamil	    "got value %" PRIx32 " != expected %" PRIx32, lookup_me, magic);
36551.1Skamil
36561.13Schristos	DPRINTF("Before resuming the child process where it left off and "
36571.1Skamil	    "without signal to be sent\n");
36581.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
36591.1Skamil
36601.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
36611.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
36621.1Skamil
36631.1Skamil	validate_status_exited(status, exitval);
36641.1Skamil
36651.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
36661.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
36671.1Skamil}
36681.1Skamil
36691.1SkamilATF_TC(io_read_i4);
36701.1SkamilATF_TC_HEAD(io_read_i4, tc)
36711.1Skamil{
36721.1Skamil	atf_tc_set_md_var(tc, "descr",
36731.1Skamil	    "Verify PT_IO with PIOD_READ_I and len = sizeof(uint64_t)");
36741.1Skamil}
36751.1Skamil
36761.1SkamilATF_TC_BODY(io_read_i4, tc)
36771.1Skamil{
36781.1Skamil	const int exitval = 5;
36791.1Skamil	const int sigval = SIGSTOP;
36801.1Skamil	pid_t child, wpid;
36811.1Skamil	uint64_t lookup_me = 0;
36821.1Skamil	uint64_t magic;
36831.1Skamil	memcpy(&magic, dummy_fn1, sizeof(magic));
36841.1Skamil	struct ptrace_io_desc io = {
36851.1Skamil		.piod_op = PIOD_READ_I,
36861.1Skamil		.piod_offs = dummy_fn1,
36871.1Skamil		.piod_addr = &lookup_me,
36881.1Skamil		.piod_len = sizeof(lookup_me)
36891.1Skamil	};
36901.1Skamil#if defined(TWAIT_HAVE_STATUS)
36911.1Skamil	int status;
36921.1Skamil#endif
36931.1Skamil
36941.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
36951.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
36961.1Skamil	if (child == 0) {
36971.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
36981.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
36991.1Skamil
37001.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
37011.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
37021.1Skamil
37031.13Schristos		DPRINTF("Before exiting of the child process\n");
37041.1Skamil		_exit(exitval);
37051.1Skamil	}
37061.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
37071.1Skamil
37081.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
37091.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
37101.1Skamil
37111.1Skamil	validate_status_stopped(status, sigval);
37121.1Skamil
37131.13Schristos	DPRINTF("Read lookup_me from tracee (PID=%d) by tracer (PID=%d)\n",
37141.1Skamil	    child, getpid());
37151.13Schristos	SYSCALL_REQUIRE(ptrace(PT_IO, child, &io, 0) != -1);
37161.1Skamil
37171.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me, magic,
37181.1Skamil	    "got value %" PRIx64 " != expected %" PRIx64, lookup_me, magic);
37191.1Skamil
37201.13Schristos	DPRINTF("Before resuming the child process where it left off and "
37211.1Skamil	    "without signal to be sent\n");
37221.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
37231.1Skamil
37241.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
37251.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
37261.1Skamil
37271.1Skamil	validate_status_exited(status, exitval);
37281.1Skamil
37291.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
37301.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
37311.1Skamil}
37321.1Skamil
37331.1SkamilATF_TC(read_i1);
37341.1SkamilATF_TC_HEAD(read_i1, tc)
37351.1Skamil{
37361.1Skamil	atf_tc_set_md_var(tc, "descr",
37371.1Skamil	    "Verify PT_READ_I called once");
37381.1Skamil}
37391.1Skamil
37401.1SkamilATF_TC_BODY(read_i1, tc)
37411.1Skamil{
37421.1Skamil	const int exitval = 5;
37431.1Skamil	const int sigval = SIGSTOP;
37441.1Skamil	pid_t child, wpid;
37451.1Skamil	int lookup_me = 0;
37461.1Skamil	int magic;
37471.1Skamil	memcpy(&magic, dummy_fn1, sizeof(magic));
37481.1Skamil#if defined(TWAIT_HAVE_STATUS)
37491.1Skamil	int status;
37501.1Skamil#endif
37511.1Skamil
37521.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
37531.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
37541.1Skamil	if (child == 0) {
37551.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
37561.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
37571.1Skamil
37581.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
37591.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
37601.1Skamil
37611.13Schristos		DPRINTF("Before exiting of the child process\n");
37621.1Skamil		_exit(exitval);
37631.1Skamil	}
37641.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
37651.1Skamil
37661.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
37671.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
37681.1Skamil
37691.1Skamil	validate_status_stopped(status, sigval);
37701.1Skamil
37711.13Schristos	DPRINTF("Read new lookup_me from tracee (PID=%d) by tracer (PID=%d)\n",
37721.1Skamil	    child, getpid());
37731.1Skamil	errno = 0;
37741.1Skamil	lookup_me = ptrace(PT_READ_I, child, dummy_fn1, 0);
37751.18Schristos	SYSCALL_REQUIRE_ERRNO(errno, 0);
37761.1Skamil
37771.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me, magic,
37781.1Skamil	    "got value %#x != expected %#x", lookup_me, magic);
37791.1Skamil
37801.13Schristos	DPRINTF("Before resuming the child process where it left off and "
37811.1Skamil	    "without signal to be sent\n");
37821.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
37831.1Skamil
37841.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
37851.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
37861.1Skamil
37871.1Skamil	validate_status_exited(status, exitval);
37881.1Skamil
37891.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
37901.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
37911.1Skamil}
37921.1Skamil
37931.1SkamilATF_TC(read_i2);
37941.1SkamilATF_TC_HEAD(read_i2, tc)
37951.1Skamil{
37961.1Skamil	atf_tc_set_md_var(tc, "descr",
37971.1Skamil	    "Verify PT_READ_I called twice");
37981.1Skamil}
37991.1Skamil
38001.1SkamilATF_TC_BODY(read_i2, tc)
38011.1Skamil{
38021.1Skamil	const int exitval = 5;
38031.1Skamil	const int sigval = SIGSTOP;
38041.1Skamil	pid_t child, wpid;
38051.1Skamil	int lookup_me1 = 0;
38061.1Skamil	int lookup_me2 = 0;
38071.1Skamil	int magic1;
38081.1Skamil	int magic2;
38091.1Skamil	memcpy(&magic1, dummy_fn1, sizeof(magic1));
38101.1Skamil	memcpy(&magic2, dummy_fn2, sizeof(magic2));
38111.1Skamil#if defined(TWAIT_HAVE_STATUS)
38121.1Skamil	int status;
38131.1Skamil#endif
38141.1Skamil
38151.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
38161.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
38171.1Skamil	if (child == 0) {
38181.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
38191.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
38201.1Skamil
38211.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
38221.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
38231.1Skamil
38241.13Schristos		DPRINTF("Before exiting of the child process\n");
38251.1Skamil		_exit(exitval);
38261.1Skamil	}
38271.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
38281.1Skamil
38291.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
38301.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
38311.1Skamil
38321.1Skamil	validate_status_stopped(status, sigval);
38331.1Skamil
38341.13Schristos	DPRINTF("Read new lookup_me1 from tracee (PID=%d) by tracer (PID=%d)\n",
38351.1Skamil	    child, getpid());
38361.1Skamil	errno = 0;
38371.1Skamil	lookup_me1 = ptrace(PT_READ_I, child, dummy_fn1, 0);
38381.18Schristos	SYSCALL_REQUIRE_ERRNO(errno, 0);
38391.1Skamil
38401.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me1, magic1,
38411.1Skamil	    "got value %#x != expected %#x", lookup_me1, magic1);
38421.1Skamil
38431.13Schristos	DPRINTF("Read new lookup_me2 from tracee (PID=%d) by tracer (PID=%d)\n",
38441.1Skamil	    child, getpid());
38451.1Skamil	errno = 0;
38461.1Skamil	lookup_me2 = ptrace(PT_READ_I, child, dummy_fn2, 0);
38471.18Schristos	SYSCALL_REQUIRE_ERRNO(errno, 0);
38481.1Skamil
38491.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me2, magic2,
38501.1Skamil	    "got value %#x != expected %#x", lookup_me2, magic2);
38511.1Skamil
38521.13Schristos	DPRINTF("Before resuming the child process where it left off and "
38531.1Skamil	    "without signal to be sent\n");
38541.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
38551.1Skamil
38561.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
38571.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
38581.1Skamil
38591.1Skamil	validate_status_exited(status, exitval);
38601.1Skamil
38611.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
38621.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
38631.1Skamil}
38641.1Skamil
38651.1SkamilATF_TC(read_i3);
38661.1SkamilATF_TC_HEAD(read_i3, tc)
38671.1Skamil{
38681.1Skamil	atf_tc_set_md_var(tc, "descr",
38691.1Skamil	    "Verify PT_READ_I called three times");
38701.1Skamil}
38711.1Skamil
38721.1SkamilATF_TC_BODY(read_i3, tc)
38731.1Skamil{
38741.1Skamil	const int exitval = 5;
38751.1Skamil	const int sigval = SIGSTOP;
38761.1Skamil	pid_t child, wpid;
38771.1Skamil	int lookup_me1 = 0;
38781.1Skamil	int lookup_me2 = 0;
38791.1Skamil	int lookup_me3 = 0;
38801.1Skamil	int magic1;
38811.1Skamil	int magic2;
38821.1Skamil	int magic3;
38831.1Skamil	memcpy(&magic1, dummy_fn1, sizeof(magic1));
38841.1Skamil	memcpy(&magic2, dummy_fn2, sizeof(magic2));
38851.1Skamil	memcpy(&magic3, dummy_fn3, sizeof(magic3));
38861.1Skamil#if defined(TWAIT_HAVE_STATUS)
38871.1Skamil	int status;
38881.1Skamil#endif
38891.1Skamil
38901.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
38911.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
38921.1Skamil	if (child == 0) {
38931.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
38941.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
38951.1Skamil
38961.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
38971.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
38981.1Skamil
38991.13Schristos		DPRINTF("Before exiting of the child process\n");
39001.1Skamil		_exit(exitval);
39011.1Skamil	}
39021.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
39031.1Skamil
39041.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
39051.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
39061.1Skamil
39071.1Skamil	validate_status_stopped(status, sigval);
39081.1Skamil
39091.13Schristos	DPRINTF("Read new lookup_me1 from tracee (PID=%d) by tracer (PID=%d)\n",
39101.1Skamil	    child, getpid());
39111.1Skamil	errno = 0;
39121.1Skamil	lookup_me1 = ptrace(PT_READ_I, child, dummy_fn1, 0);
39131.18Schristos	SYSCALL_REQUIRE_ERRNO(errno, 0);
39141.1Skamil
39151.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me1, magic1,
39161.1Skamil	    "got value %#x != expected %#x", lookup_me1, magic1);
39171.1Skamil
39181.13Schristos	DPRINTF("Read new lookup_me2 from tracee (PID=%d) by tracer (PID=%d)\n",
39191.1Skamil	    child, getpid());
39201.1Skamil	errno = 0;
39211.1Skamil	lookup_me2 = ptrace(PT_READ_I, child, dummy_fn2, 0);
39221.18Schristos	SYSCALL_REQUIRE_ERRNO(errno, 0);
39231.1Skamil
39241.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me2, magic2,
39251.1Skamil	    "got value %#x != expected %#x", lookup_me2, magic2);
39261.1Skamil
39271.13Schristos	DPRINTF("Read new lookup_me3 from tracee (PID=%d) by tracer (PID=%d)\n",
39281.1Skamil	    child, getpid());
39291.1Skamil	errno = 0;
39301.1Skamil	lookup_me3 = ptrace(PT_READ_I, child, dummy_fn3, 0);
39311.18Schristos	SYSCALL_REQUIRE_ERRNO(errno, 0);
39321.1Skamil
39331.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me3, magic3,
39341.1Skamil	    "got value %#x != expected %#x", lookup_me3, magic3);
39351.1Skamil
39361.13Schristos	DPRINTF("Before resuming the child process where it left off and "
39371.1Skamil	    "without signal to be sent\n");
39381.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
39391.1Skamil
39401.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
39411.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
39421.1Skamil
39431.1Skamil	validate_status_exited(status, exitval);
39441.1Skamil
39451.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
39461.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
39471.1Skamil}
39481.1Skamil
39491.1SkamilATF_TC(read_i4);
39501.1SkamilATF_TC_HEAD(read_i4, tc)
39511.1Skamil{
39521.1Skamil	atf_tc_set_md_var(tc, "descr",
39531.1Skamil	    "Verify PT_READ_I called four times");
39541.1Skamil}
39551.1Skamil
39561.1SkamilATF_TC_BODY(read_i4, tc)
39571.1Skamil{
39581.1Skamil	const int exitval = 5;
39591.1Skamil	const int sigval = SIGSTOP;
39601.1Skamil	pid_t child, wpid;
39611.1Skamil	int lookup_me1 = 0;
39621.1Skamil	int lookup_me2 = 0;
39631.1Skamil	int lookup_me3 = 0;
39641.1Skamil	int lookup_me4 = 0;
39651.1Skamil	int magic1;
39661.1Skamil	int magic2;
39671.1Skamil	int magic3;
39681.1Skamil	int magic4;
39691.1Skamil	memcpy(&magic1, dummy_fn1, sizeof(magic1));
39701.1Skamil	memcpy(&magic2, dummy_fn2, sizeof(magic2));
39711.1Skamil	memcpy(&magic3, dummy_fn3, sizeof(magic3));
39721.1Skamil	memcpy(&magic4, dummy_fn4, sizeof(magic4));
39731.1Skamil#if defined(TWAIT_HAVE_STATUS)
39741.1Skamil	int status;
39751.1Skamil#endif
39761.1Skamil
39771.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
39781.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
39791.1Skamil	if (child == 0) {
39801.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
39811.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
39821.1Skamil
39831.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
39841.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
39851.1Skamil
39861.13Schristos		DPRINTF("Before exiting of the child process\n");
39871.1Skamil		_exit(exitval);
39881.1Skamil	}
39891.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
39901.1Skamil
39911.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
39921.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
39931.1Skamil
39941.1Skamil	validate_status_stopped(status, sigval);
39951.1Skamil
39961.13Schristos	DPRINTF("Read new lookup_me1 from tracee (PID=%d) by tracer (PID=%d)\n",
39971.1Skamil	    child, getpid());
39981.1Skamil	errno = 0;
39991.1Skamil	lookup_me1 = ptrace(PT_READ_I, child, dummy_fn1, 0);
40001.18Schristos	SYSCALL_REQUIRE_ERRNO(errno, 0);
40011.1Skamil
40021.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me1, magic1,
40031.1Skamil	    "got value %#x != expected %#x", lookup_me1, magic1);
40041.1Skamil
40051.13Schristos	DPRINTF("Read new lookup_me2 from tracee (PID=%d) by tracer (PID=%d)\n",
40061.1Skamil	    child, getpid());
40071.1Skamil	errno = 0;
40081.1Skamil	lookup_me2 = ptrace(PT_READ_I, child, dummy_fn2, 0);
40091.18Schristos	SYSCALL_REQUIRE_ERRNO(errno, 0);
40101.1Skamil
40111.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me2, magic2,
40121.1Skamil	    "got value %#x != expected %#x", lookup_me2, magic2);
40131.1Skamil
40141.13Schristos	DPRINTF("Read new lookup_me3 from tracee (PID=%d) by tracer (PID=%d)\n",
40151.1Skamil	    child, getpid());
40161.1Skamil	errno = 0;
40171.1Skamil	lookup_me3 = ptrace(PT_READ_I, child, dummy_fn3, 0);
40181.18Schristos	SYSCALL_REQUIRE_ERRNO(errno, 0);
40191.1Skamil
40201.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me3, magic3,
40211.1Skamil	    "got value %#x != expected %#x", lookup_me3, magic3);
40221.1Skamil
40231.13Schristos	DPRINTF("Read new lookup_me4 from tracee (PID=%d) by tracer (PID=%d)\n",
40241.1Skamil	    child, getpid());
40251.1Skamil	errno = 0;
40261.1Skamil	lookup_me4 = ptrace(PT_READ_I, child, dummy_fn4, 0);
40271.18Schristos	SYSCALL_REQUIRE_ERRNO(errno, 0);
40281.1Skamil
40291.1Skamil	ATF_REQUIRE_EQ_MSG(lookup_me4, magic4,
40301.1Skamil	    "got value %#x != expected %#x", lookup_me4, magic4);
40311.1Skamil
40321.13Schristos	DPRINTF("Before resuming the child process where it left off and "
40331.1Skamil	    "without signal to be sent\n");
40341.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
40351.1Skamil
40361.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
40371.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
40381.1Skamil
40391.1Skamil	validate_status_exited(status, exitval);
40401.1Skamil
40411.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
40421.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
40431.1Skamil}
40441.1Skamil
40451.1Skamil#if defined(HAVE_GPREGS)
40461.1SkamilATF_TC(regs1);
40471.1SkamilATF_TC_HEAD(regs1, tc)
40481.1Skamil{
40491.1Skamil	atf_tc_set_md_var(tc, "descr",
40501.1Skamil	    "Verify plain PT_GETREGS call without further steps");
40511.1Skamil}
40521.1Skamil
40531.1SkamilATF_TC_BODY(regs1, tc)
40541.1Skamil{
40551.1Skamil	const int exitval = 5;
40561.1Skamil	const int sigval = SIGSTOP;
40571.1Skamil	pid_t child, wpid;
40581.1Skamil#if defined(TWAIT_HAVE_STATUS)
40591.1Skamil	int status;
40601.1Skamil#endif
40611.1Skamil	struct reg r;
40621.1Skamil
40631.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
40641.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
40651.1Skamil	if (child == 0) {
40661.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
40671.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
40681.1Skamil
40691.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
40701.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
40711.1Skamil
40721.13Schristos		DPRINTF("Before exiting of the child process\n");
40731.1Skamil		_exit(exitval);
40741.1Skamil	}
40751.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
40761.1Skamil
40771.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
40781.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
40791.1Skamil
40801.1Skamil	validate_status_stopped(status, sigval);
40811.1Skamil
40821.13Schristos	DPRINTF("Call GETREGS for the child process\n");
40831.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GETREGS, child, &r, 0) != -1);
40841.1Skamil
40851.13Schristos	DPRINTF("Before resuming the child process where it left off and "
40861.1Skamil	    "without signal to be sent\n");
40871.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
40881.1Skamil
40891.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
40901.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
40911.1Skamil
40921.1Skamil	validate_status_exited(status, exitval);
40931.1Skamil
40941.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
40951.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
40961.1Skamil}
40971.1Skamil#endif
40981.1Skamil
40991.1Skamil#if defined(HAVE_GPREGS)
41001.1SkamilATF_TC(regs2);
41011.1SkamilATF_TC_HEAD(regs2, tc)
41021.1Skamil{
41031.1Skamil	atf_tc_set_md_var(tc, "descr",
41041.1Skamil	    "Verify plain PT_GETREGS call and retrieve PC");
41051.1Skamil}
41061.1Skamil
41071.1SkamilATF_TC_BODY(regs2, tc)
41081.1Skamil{
41091.1Skamil	const int exitval = 5;
41101.1Skamil	const int sigval = SIGSTOP;
41111.1Skamil	pid_t child, wpid;
41121.1Skamil#if defined(TWAIT_HAVE_STATUS)
41131.1Skamil	int status;
41141.1Skamil#endif
41151.1Skamil	struct reg r;
41161.1Skamil
41171.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
41181.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
41191.1Skamil	if (child == 0) {
41201.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
41211.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
41221.1Skamil
41231.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
41241.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
41251.1Skamil
41261.13Schristos		DPRINTF("Before exiting of the child process\n");
41271.1Skamil		_exit(exitval);
41281.1Skamil	}
41291.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
41301.1Skamil
41311.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
41321.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
41331.1Skamil
41341.1Skamil	validate_status_stopped(status, sigval);
41351.1Skamil
41361.13Schristos	DPRINTF("Call GETREGS for the child process\n");
41371.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GETREGS, child, &r, 0) != -1);
41381.1Skamil
41391.13Schristos	DPRINTF("Retrieved PC=%" PRIxREGISTER "\n", PTRACE_REG_PC(&r));
41401.1Skamil
41411.13Schristos	DPRINTF("Before resuming the child process where it left off and "
41421.1Skamil	    "without signal to be sent\n");
41431.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
41441.1Skamil
41451.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
41461.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
41471.1Skamil
41481.1Skamil	validate_status_exited(status, exitval);
41491.1Skamil
41501.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
41511.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
41521.1Skamil}
41531.1Skamil#endif
41541.1Skamil
41551.1Skamil#if defined(HAVE_GPREGS)
41561.1SkamilATF_TC(regs3);
41571.1SkamilATF_TC_HEAD(regs3, tc)
41581.1Skamil{
41591.1Skamil	atf_tc_set_md_var(tc, "descr",
41601.1Skamil	    "Verify plain PT_GETREGS call and retrieve SP");
41611.1Skamil}
41621.1Skamil
41631.1SkamilATF_TC_BODY(regs3, tc)
41641.1Skamil{
41651.1Skamil	const int exitval = 5;
41661.1Skamil	const int sigval = SIGSTOP;
41671.1Skamil	pid_t child, wpid;
41681.1Skamil#if defined(TWAIT_HAVE_STATUS)
41691.1Skamil	int status;
41701.1Skamil#endif
41711.1Skamil	struct reg r;
41721.1Skamil
41731.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
41741.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
41751.1Skamil	if (child == 0) {
41761.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
41771.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
41781.1Skamil
41791.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
41801.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
41811.1Skamil
41821.13Schristos		DPRINTF("Before exiting of the child process\n");
41831.1Skamil		_exit(exitval);
41841.1Skamil	}
41851.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
41861.1Skamil
41871.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
41881.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
41891.1Skamil
41901.1Skamil	validate_status_stopped(status, sigval);
41911.1Skamil
41921.13Schristos	DPRINTF("Call GETREGS for the child process\n");
41931.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GETREGS, child, &r, 0) != -1);
41941.1Skamil
41951.13Schristos	DPRINTF("Retrieved SP=%" PRIxREGISTER "\n", PTRACE_REG_SP(&r));
41961.1Skamil
41971.13Schristos	DPRINTF("Before resuming the child process where it left off and "
41981.1Skamil	    "without signal to be sent\n");
41991.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
42001.1Skamil
42011.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
42021.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
42031.1Skamil
42041.1Skamil	validate_status_exited(status, exitval);
42051.1Skamil
42061.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
42071.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
42081.1Skamil}
42091.1Skamil#endif
42101.1Skamil
42111.1Skamil#if defined(HAVE_GPREGS)
42121.1SkamilATF_TC(regs4);
42131.1SkamilATF_TC_HEAD(regs4, tc)
42141.1Skamil{
42151.1Skamil	atf_tc_set_md_var(tc, "descr",
42161.1Skamil	    "Verify plain PT_GETREGS call and retrieve INTRV");
42171.1Skamil}
42181.1Skamil
42191.1SkamilATF_TC_BODY(regs4, tc)
42201.1Skamil{
42211.1Skamil	const int exitval = 5;
42221.1Skamil	const int sigval = SIGSTOP;
42231.1Skamil	pid_t child, wpid;
42241.1Skamil#if defined(TWAIT_HAVE_STATUS)
42251.1Skamil	int status;
42261.1Skamil#endif
42271.1Skamil	struct reg r;
42281.1Skamil
42291.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
42301.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
42311.1Skamil	if (child == 0) {
42321.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
42331.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
42341.1Skamil
42351.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
42361.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
42371.1Skamil
42381.13Schristos		DPRINTF("Before exiting of the child process\n");
42391.1Skamil		_exit(exitval);
42401.1Skamil	}
42411.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
42421.1Skamil
42431.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
42441.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
42451.1Skamil
42461.1Skamil	validate_status_stopped(status, sigval);
42471.1Skamil
42481.13Schristos	DPRINTF("Call GETREGS for the child process\n");
42491.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GETREGS, child, &r, 0) != -1);
42501.1Skamil
42511.13Schristos	DPRINTF("Retrieved INTRV=%" PRIxREGISTER "\n", PTRACE_REG_INTRV(&r));
42521.1Skamil
42531.13Schristos	DPRINTF("Before resuming the child process where it left off and "
42541.1Skamil	    "without signal to be sent\n");
42551.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
42561.1Skamil
42571.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
42581.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
42591.1Skamil
42601.1Skamil	validate_status_exited(status, exitval);
42611.1Skamil
42621.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
42631.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
42641.1Skamil}
42651.1Skamil#endif
42661.1Skamil
42671.1Skamil#if defined(HAVE_GPREGS)
42681.1SkamilATF_TC(regs5);
42691.1SkamilATF_TC_HEAD(regs5, tc)
42701.1Skamil{
42711.1Skamil	atf_tc_set_md_var(tc, "descr",
42721.1Skamil	    "Verify PT_GETREGS and PT_SETREGS calls without changing regs");
42731.1Skamil}
42741.1Skamil
42751.1SkamilATF_TC_BODY(regs5, tc)
42761.1Skamil{
42771.1Skamil	const int exitval = 5;
42781.1Skamil	const int sigval = SIGSTOP;
42791.1Skamil	pid_t child, wpid;
42801.1Skamil#if defined(TWAIT_HAVE_STATUS)
42811.1Skamil	int status;
42821.1Skamil#endif
42831.1Skamil	struct reg r;
42841.1Skamil
42851.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
42861.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
42871.1Skamil	if (child == 0) {
42881.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
42891.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
42901.1Skamil
42911.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
42921.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
42931.1Skamil
42941.13Schristos		DPRINTF("Before exiting of the child process\n");
42951.1Skamil		_exit(exitval);
42961.1Skamil	}
42971.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
42981.1Skamil
42991.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
43001.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
43011.1Skamil
43021.1Skamil	validate_status_stopped(status, sigval);
43031.1Skamil
43041.13Schristos	DPRINTF("Call GETREGS for the child process\n");
43051.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GETREGS, child, &r, 0) != -1);
43061.1Skamil
43071.13Schristos	DPRINTF("Call SETREGS for the child process (without changed regs)\n");
43081.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GETREGS, child, &r, 0) != -1);
43091.1Skamil
43101.13Schristos	DPRINTF("Before resuming the child process where it left off and "
43111.1Skamil	    "without signal to be sent\n");
43121.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
43131.1Skamil
43141.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
43151.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
43161.1Skamil
43171.1Skamil	validate_status_exited(status, exitval);
43181.1Skamil
43191.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
43201.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
43211.1Skamil}
43221.1Skamil#endif
43231.1Skamil
43241.1Skamil#if defined(HAVE_FPREGS)
43251.1SkamilATF_TC(fpregs1);
43261.1SkamilATF_TC_HEAD(fpregs1, tc)
43271.1Skamil{
43281.1Skamil	atf_tc_set_md_var(tc, "descr",
43291.1Skamil	    "Verify plain PT_GETFPREGS call without further steps");
43301.1Skamil}
43311.1Skamil
43321.1SkamilATF_TC_BODY(fpregs1, tc)
43331.1Skamil{
43341.1Skamil	const int exitval = 5;
43351.1Skamil	const int sigval = SIGSTOP;
43361.1Skamil	pid_t child, wpid;
43371.1Skamil#if defined(TWAIT_HAVE_STATUS)
43381.1Skamil	int status;
43391.1Skamil#endif
43401.1Skamil	struct fpreg r;
43411.1Skamil
43421.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
43431.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
43441.1Skamil	if (child == 0) {
43451.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
43461.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
43471.1Skamil
43481.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
43491.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
43501.1Skamil
43511.13Schristos		DPRINTF("Before exiting of the child process\n");
43521.1Skamil		_exit(exitval);
43531.1Skamil	}
43541.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
43551.1Skamil
43561.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
43571.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
43581.1Skamil
43591.1Skamil	validate_status_stopped(status, sigval);
43601.1Skamil
43611.13Schristos	DPRINTF("Call GETFPREGS for the child process\n");
43621.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GETFPREGS, child, &r, 0) != -1);
43631.1Skamil
43641.13Schristos	DPRINTF("Before resuming the child process where it left off and "
43651.1Skamil	    "without signal to be sent\n");
43661.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
43671.1Skamil
43681.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
43691.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
43701.1Skamil
43711.1Skamil	validate_status_exited(status, exitval);
43721.1Skamil
43731.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
43741.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
43751.1Skamil}
43761.1Skamil#endif
43771.1Skamil
43781.1Skamil#if defined(HAVE_FPREGS)
43791.1SkamilATF_TC(fpregs2);
43801.1SkamilATF_TC_HEAD(fpregs2, tc)
43811.1Skamil{
43821.1Skamil	atf_tc_set_md_var(tc, "descr",
43831.1Skamil	    "Verify PT_GETFPREGS and PT_SETFPREGS calls without changing "
43841.1Skamil	    "regs");
43851.1Skamil}
43861.1Skamil
43871.1SkamilATF_TC_BODY(fpregs2, tc)
43881.1Skamil{
43891.1Skamil	const int exitval = 5;
43901.1Skamil	const int sigval = SIGSTOP;
43911.1Skamil	pid_t child, wpid;
43921.1Skamil#if defined(TWAIT_HAVE_STATUS)
43931.1Skamil	int status;
43941.1Skamil#endif
43951.1Skamil	struct fpreg r;
43961.1Skamil
43971.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
43981.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
43991.1Skamil	if (child == 0) {
44001.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
44011.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
44021.1Skamil
44031.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
44041.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
44051.1Skamil
44061.13Schristos		DPRINTF("Before exiting of the child process\n");
44071.1Skamil		_exit(exitval);
44081.1Skamil	}
44091.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
44101.1Skamil
44111.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
44121.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
44131.1Skamil
44141.1Skamil	validate_status_stopped(status, sigval);
44151.1Skamil
44161.13Schristos	DPRINTF("Call GETFPREGS for the child process\n");
44171.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GETFPREGS, child, &r, 0) != -1);
44181.1Skamil
44191.13Schristos	DPRINTF("Call SETFPREGS for the child (without changed regs)\n");
44201.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SETFPREGS, child, &r, 0) != -1);
44211.1Skamil
44221.13Schristos	DPRINTF("Before resuming the child process where it left off and "
44231.1Skamil	    "without signal to be sent\n");
44241.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
44251.1Skamil
44261.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
44271.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
44281.1Skamil
44291.1Skamil	validate_status_exited(status, exitval);
44301.1Skamil
44311.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
44321.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
44331.1Skamil}
44341.1Skamil#endif
44351.1Skamil
44361.1Skamil#if defined(PT_STEP)
44371.1Skamilstatic void
44381.2Skamilptrace_step(int N, int setstep)
44391.1Skamil{
44401.1Skamil	const int exitval = 5;
44411.1Skamil	const int sigval = SIGSTOP;
44421.1Skamil	pid_t child, wpid;
44431.1Skamil#if defined(TWAIT_HAVE_STATUS)
44441.1Skamil	int status;
44451.1Skamil#endif
44461.1Skamil	int happy;
44471.1Skamil
44481.1Skamil#if defined(__arm__)
44491.1Skamil	/* PT_STEP not supported on arm 32-bit */
44501.1Skamil	atf_tc_expect_fail("PR kern/52119");
44511.1Skamil#endif
44521.1Skamil
44531.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
44541.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
44551.1Skamil	if (child == 0) {
44561.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
44571.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
44581.1Skamil
44591.1Skamil		happy = check_happy(999);
44601.1Skamil
44611.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
44621.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
44631.1Skamil
44641.1Skamil		FORKEE_ASSERT_EQ(happy, check_happy(999));
44651.1Skamil
44661.13Schristos		DPRINTF("Before exiting of the child process\n");
44671.1Skamil		_exit(exitval);
44681.1Skamil	}
44691.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
44701.1Skamil
44711.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
44721.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
44731.1Skamil
44741.1Skamil	validate_status_stopped(status, sigval);
44751.1Skamil
44761.1Skamil	while (N --> 0) {
44771.2Skamil		if (setstep) {
44781.13Schristos			DPRINTF("Before resuming the child process where it "
44791.2Skamil			    "left off and without signal to be sent (use "
44801.9Skamil			    "PT_SETSTEP and PT_CONTINUE)\n");
44811.13Schristos			SYSCALL_REQUIRE(ptrace(PT_SETSTEP, child, 0, 0) != -1);
44821.13Schristos			SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0)
44831.2Skamil			    != -1);
44841.2Skamil		} else {
44851.13Schristos			DPRINTF("Before resuming the child process where it "
44861.2Skamil			    "left off and without signal to be sent (use "
44871.2Skamil			    "PT_STEP)\n");
44881.13Schristos			SYSCALL_REQUIRE(ptrace(PT_STEP, child, (void *)1, 0)
44891.2Skamil			    != -1);
44901.2Skamil		}
44911.1Skamil
44921.13Schristos		DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
44931.1Skamil		TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0),
44941.1Skamil		    child);
44951.1Skamil
44961.1Skamil		validate_status_stopped(status, SIGTRAP);
44971.2Skamil
44981.2Skamil		if (setstep) {
44991.13Schristos			SYSCALL_REQUIRE(ptrace(PT_CLEARSTEP, child, 0, 0) != -1);
45001.2Skamil		}
45011.1Skamil	}
45021.1Skamil
45031.13Schristos	DPRINTF("Before resuming the child process where it left off and "
45041.1Skamil	    "without signal to be sent\n");
45051.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
45061.1Skamil
45071.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
45081.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
45091.1Skamil
45101.1Skamil	validate_status_exited(status, exitval);
45111.1Skamil
45121.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
45131.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
45141.1Skamil}
45151.1Skamil#endif
45161.1Skamil
45171.1Skamil#if defined(PT_STEP)
45181.1SkamilATF_TC(step1);
45191.1SkamilATF_TC_HEAD(step1, tc)
45201.1Skamil{
45211.1Skamil	atf_tc_set_md_var(tc, "descr",
45221.1Skamil	    "Verify single PT_STEP call");
45231.1Skamil}
45241.1Skamil
45251.1SkamilATF_TC_BODY(step1, tc)
45261.1Skamil{
45271.2Skamil	ptrace_step(1, 0);
45281.1Skamil}
45291.1Skamil#endif
45301.1Skamil
45311.1Skamil#if defined(PT_STEP)
45321.1SkamilATF_TC(step2);
45331.1SkamilATF_TC_HEAD(step2, tc)
45341.1Skamil{
45351.1Skamil	atf_tc_set_md_var(tc, "descr",
45361.1Skamil	    "Verify PT_STEP called twice");
45371.1Skamil}
45381.1Skamil
45391.1SkamilATF_TC_BODY(step2, tc)
45401.1Skamil{
45411.2Skamil	ptrace_step(2, 0);
45421.1Skamil}
45431.1Skamil#endif
45441.1Skamil
45451.1Skamil#if defined(PT_STEP)
45461.1SkamilATF_TC(step3);
45471.1SkamilATF_TC_HEAD(step3, tc)
45481.1Skamil{
45491.1Skamil	atf_tc_set_md_var(tc, "descr",
45501.1Skamil	    "Verify PT_STEP called three times");
45511.1Skamil}
45521.1Skamil
45531.1SkamilATF_TC_BODY(step3, tc)
45541.1Skamil{
45551.2Skamil	ptrace_step(3, 0);
45561.1Skamil}
45571.1Skamil#endif
45581.1Skamil
45591.1Skamil#if defined(PT_STEP)
45601.1SkamilATF_TC(step4);
45611.1SkamilATF_TC_HEAD(step4, tc)
45621.1Skamil{
45631.1Skamil	atf_tc_set_md_var(tc, "descr",
45641.1Skamil	    "Verify PT_STEP called four times");
45651.1Skamil}
45661.1Skamil
45671.1SkamilATF_TC_BODY(step4, tc)
45681.1Skamil{
45691.2Skamil	ptrace_step(4, 0);
45701.2Skamil}
45711.2Skamil#endif
45721.2Skamil
45731.2Skamil#if defined(PT_STEP)
45741.2SkamilATF_TC(setstep1);
45751.2SkamilATF_TC_HEAD(setstep1, tc)
45761.2Skamil{
45771.2Skamil	atf_tc_set_md_var(tc, "descr",
45781.2Skamil	    "Verify single PT_SETSTEP call");
45791.2Skamil}
45801.2Skamil
45811.2SkamilATF_TC_BODY(setstep1, tc)
45821.2Skamil{
45831.2Skamil	ptrace_step(1, 1);
45841.2Skamil}
45851.2Skamil#endif
45861.2Skamil
45871.2Skamil#if defined(PT_STEP)
45881.2SkamilATF_TC(setstep2);
45891.2SkamilATF_TC_HEAD(setstep2, tc)
45901.2Skamil{
45911.2Skamil	atf_tc_set_md_var(tc, "descr",
45921.2Skamil	    "Verify PT_SETSTEP called twice");
45931.2Skamil}
45941.2Skamil
45951.2SkamilATF_TC_BODY(setstep2, tc)
45961.2Skamil{
45971.2Skamil	ptrace_step(2, 1);
45981.2Skamil}
45991.2Skamil#endif
46001.2Skamil
46011.2Skamil#if defined(PT_STEP)
46021.2SkamilATF_TC(setstep3);
46031.2SkamilATF_TC_HEAD(setstep3, tc)
46041.2Skamil{
46051.2Skamil	atf_tc_set_md_var(tc, "descr",
46061.2Skamil	    "Verify PT_SETSTEP called three times");
46071.2Skamil}
46081.2Skamil
46091.2SkamilATF_TC_BODY(setstep3, tc)
46101.2Skamil{
46111.2Skamil	ptrace_step(3, 1);
46121.2Skamil}
46131.2Skamil#endif
46141.2Skamil
46151.2Skamil#if defined(PT_STEP)
46161.2SkamilATF_TC(setstep4);
46171.2SkamilATF_TC_HEAD(setstep4, tc)
46181.2Skamil{
46191.2Skamil	atf_tc_set_md_var(tc, "descr",
46201.2Skamil	    "Verify PT_SETSTEP called four times");
46211.2Skamil}
46221.2Skamil
46231.2SkamilATF_TC_BODY(setstep4, tc)
46241.2Skamil{
46251.2Skamil	ptrace_step(4, 1);
46261.1Skamil}
46271.1Skamil#endif
46281.1Skamil
46291.1SkamilATF_TC(kill1);
46301.1SkamilATF_TC_HEAD(kill1, tc)
46311.1Skamil{
46321.1Skamil	atf_tc_set_md_var(tc, "descr",
46331.1Skamil	    "Verify that PT_CONTINUE with SIGKILL terminates child");
46341.1Skamil}
46351.1Skamil
46361.1SkamilATF_TC_BODY(kill1, tc)
46371.1Skamil{
46381.1Skamil	const int sigval = SIGSTOP, sigsent = SIGKILL;
46391.1Skamil	pid_t child, wpid;
46401.1Skamil#if defined(TWAIT_HAVE_STATUS)
46411.1Skamil	int status;
46421.1Skamil#endif
46431.1Skamil
46441.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
46451.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
46461.1Skamil	if (child == 0) {
46471.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
46481.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
46491.1Skamil
46501.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
46511.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
46521.1Skamil
46531.1Skamil		/* NOTREACHED */
46541.1Skamil		FORKEE_ASSERTX(0 &&
46551.1Skamil		    "Child should be terminated by a signal from its parent");
46561.1Skamil	}
46571.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
46581.1Skamil
46591.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
46601.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
46611.1Skamil
46621.1Skamil	validate_status_stopped(status, sigval);
46631.1Skamil
46641.13Schristos	DPRINTF("Before resuming the child process where it left off and "
46651.1Skamil	    "without signal to be sent\n");
46661.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, sigsent) != -1);
46671.1Skamil
46681.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
46691.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
46701.1Skamil
46711.1Skamil	validate_status_signaled(status, sigsent, 0);
46721.1Skamil
46731.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
46741.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
46751.1Skamil}
46761.1Skamil
46771.1SkamilATF_TC(kill2);
46781.1SkamilATF_TC_HEAD(kill2, tc)
46791.1Skamil{
46801.1Skamil	atf_tc_set_md_var(tc, "descr",
46811.1Skamil	    "Verify that PT_KILL terminates child");
46821.1Skamil}
46831.1Skamil
46841.1SkamilATF_TC_BODY(kill2, tc)
46851.1Skamil{
46861.1Skamil	const int sigval = SIGSTOP;
46871.1Skamil	pid_t child, wpid;
46881.1Skamil#if defined(TWAIT_HAVE_STATUS)
46891.1Skamil	int status;
46901.1Skamil#endif
46911.1Skamil
46921.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
46931.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
46941.1Skamil	if (child == 0) {
46951.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
46961.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
46971.1Skamil
46981.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
46991.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
47001.1Skamil
47011.1Skamil		/* NOTREACHED */
47021.1Skamil		FORKEE_ASSERTX(0 &&
47031.1Skamil		    "Child should be terminated by a signal from its parent");
47041.1Skamil	}
47051.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
47061.1Skamil
47071.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
47081.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
47091.1Skamil
47101.1Skamil	validate_status_stopped(status, sigval);
47111.1Skamil
47121.13Schristos	DPRINTF("Before resuming the child process where it left off and "
47131.1Skamil	    "without signal to be sent\n");
47141.13Schristos	SYSCALL_REQUIRE(ptrace(PT_KILL, child, (void*)1, 0) != -1);
47151.1Skamil
47161.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
47171.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
47181.1Skamil
47191.1Skamil	validate_status_signaled(status, SIGKILL, 0);
47201.1Skamil
47211.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
47221.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
47231.1Skamil}
47241.1Skamil
47251.1SkamilATF_TC(lwpinfo1);
47261.1SkamilATF_TC_HEAD(lwpinfo1, tc)
47271.1Skamil{
47281.1Skamil	atf_tc_set_md_var(tc, "descr",
47291.1Skamil	    "Verify basic LWPINFO call for single thread (PT_TRACE_ME)");
47301.1Skamil}
47311.1Skamil
47321.1SkamilATF_TC_BODY(lwpinfo1, tc)
47331.1Skamil{
47341.1Skamil	const int exitval = 5;
47351.1Skamil	const int sigval = SIGSTOP;
47361.1Skamil	pid_t child, wpid;
47371.1Skamil#if defined(TWAIT_HAVE_STATUS)
47381.1Skamil	int status;
47391.1Skamil#endif
47401.1Skamil	struct ptrace_lwpinfo info = {0, 0};
47411.1Skamil
47421.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
47431.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
47441.1Skamil	if (child == 0) {
47451.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
47461.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
47471.1Skamil
47481.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
47491.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
47501.1Skamil
47511.13Schristos		DPRINTF("Before exiting of the child process\n");
47521.1Skamil		_exit(exitval);
47531.1Skamil	}
47541.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
47551.1Skamil
47561.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
47571.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
47581.1Skamil
47591.1Skamil	validate_status_stopped(status, sigval);
47601.1Skamil
47611.13Schristos	DPRINTF("Before calling ptrace(2) with PT_LWPINFO for child\n");
47621.13Schristos	SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &info, sizeof(info)) != -1);
47631.1Skamil
47641.13Schristos	DPRINTF("Assert that there exists a thread\n");
47651.1Skamil	ATF_REQUIRE(info.pl_lwpid > 0);
47661.1Skamil
47671.13Schristos	DPRINTF("Assert that lwp thread %d received event PL_EVENT_SIGNAL\n",
47681.1Skamil	    info.pl_lwpid);
47691.1Skamil	ATF_REQUIRE_EQ_MSG(info.pl_event, PL_EVENT_SIGNAL,
47701.1Skamil	    "Received event %d != expected event %d",
47711.1Skamil	    info.pl_event, PL_EVENT_SIGNAL);
47721.1Skamil
47731.13Schristos	DPRINTF("Before calling ptrace(2) with PT_LWPINFO for child\n");
47741.13Schristos	SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &info, sizeof(info)) != -1);
47751.1Skamil
47761.13Schristos	DPRINTF("Assert that there are no more lwp threads in child\n");
47771.1Skamil	ATF_REQUIRE_EQ(info.pl_lwpid, 0);
47781.1Skamil
47791.13Schristos	DPRINTF("Before resuming the child process where it left off and "
47801.1Skamil	    "without signal to be sent\n");
47811.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
47821.1Skamil
47831.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
47841.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
47851.1Skamil
47861.1Skamil	validate_status_exited(status, exitval);
47871.1Skamil
47881.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
47891.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
47901.1Skamil}
47911.1Skamil
47921.1Skamil#if defined(TWAIT_HAVE_PID)
47931.1SkamilATF_TC(lwpinfo2);
47941.1SkamilATF_TC_HEAD(lwpinfo2, tc)
47951.1Skamil{
47961.1Skamil	atf_tc_set_md_var(tc, "descr",
47971.1Skamil	    "Verify basic LWPINFO call for single thread (PT_ATTACH from "
47981.1Skamil	    "tracer)");
47991.1Skamil}
48001.1Skamil
48011.1SkamilATF_TC_BODY(lwpinfo2, tc)
48021.1Skamil{
48031.1Skamil	struct msg_fds parent_tracee, parent_tracer;
48041.1Skamil	const int exitval_tracee = 5;
48051.1Skamil	const int exitval_tracer = 10;
48061.1Skamil	pid_t tracee, tracer, wpid;
48071.1Skamil	uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */
48081.1Skamil#if defined(TWAIT_HAVE_STATUS)
48091.1Skamil	int status;
48101.1Skamil#endif
48111.1Skamil	struct ptrace_lwpinfo info = {0, 0};
48121.1Skamil
48131.13Schristos	DPRINTF("Spawn tracee\n");
48141.13Schristos	SYSCALL_REQUIRE(msg_open(&parent_tracee) == 0);
48151.13Schristos	SYSCALL_REQUIRE(msg_open(&parent_tracer) == 0);
48161.1Skamil	tracee = atf_utils_fork();
48171.1Skamil	if (tracee == 0) {
48181.1Skamil
48191.1Skamil		/* Wait for message from the parent */
48201.1Skamil		CHILD_TO_PARENT("tracee ready", parent_tracee, msg);
48211.1Skamil		CHILD_FROM_PARENT("tracee exit", parent_tracee, msg);
48221.1Skamil
48231.1Skamil		_exit(exitval_tracee);
48241.1Skamil	}
48251.1Skamil	PARENT_FROM_CHILD("tracee ready", parent_tracee, msg);
48261.1Skamil
48271.13Schristos	DPRINTF("Spawn debugger\n");
48281.1Skamil	tracer = atf_utils_fork();
48291.1Skamil	if (tracer == 0) {
48301.1Skamil		/* No IPC to communicate with the child */
48311.13Schristos		DPRINTF("Before calling PT_ATTACH from tracee %d\n", getpid());
48321.1Skamil		FORKEE_ASSERT(ptrace(PT_ATTACH, tracee, NULL, 0) != -1);
48331.1Skamil
48341.1Skamil		/* Wait for tracee and assert that it was stopped w/ SIGSTOP */
48351.1Skamil		FORKEE_REQUIRE_SUCCESS(
48361.1Skamil		    wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);
48371.1Skamil
48381.1Skamil		forkee_status_stopped(status, SIGSTOP);
48391.1Skamil
48401.13Schristos		DPRINTF("Before calling ptrace(2) with PT_LWPINFO for child\n");
48411.1Skamil		FORKEE_ASSERT(ptrace(PT_LWPINFO, tracee, &info, sizeof(info))
48421.1Skamil		    != -1);
48431.1Skamil
48441.13Schristos		DPRINTF("Assert that there exists a thread\n");
48451.1Skamil		FORKEE_ASSERTX(info.pl_lwpid > 0);
48461.1Skamil
48471.13Schristos		DPRINTF("Assert that lwp thread %d received event "
48481.1Skamil		    "PL_EVENT_SIGNAL\n", info.pl_lwpid);
48491.1Skamil		FORKEE_ASSERT_EQ(info.pl_event, PL_EVENT_SIGNAL);
48501.1Skamil
48511.13Schristos		DPRINTF("Before calling ptrace(2) with PT_LWPINFO for child\n");
48521.1Skamil		FORKEE_ASSERT(ptrace(PT_LWPINFO, tracee, &info, sizeof(info))
48531.1Skamil		    != -1);
48541.1Skamil
48551.13Schristos		DPRINTF("Assert that there are no more lwp threads in child\n");
48561.1Skamil		FORKEE_ASSERTX(info.pl_lwpid == 0);
48571.1Skamil
48581.1Skamil		/* Resume tracee with PT_CONTINUE */
48591.1Skamil		FORKEE_ASSERT(ptrace(PT_CONTINUE, tracee, (void *)1, 0) != -1);
48601.1Skamil
48611.1Skamil		/* Inform parent that tracer has attached to tracee */
48621.1Skamil		CHILD_TO_PARENT("tracer ready", parent_tracer, msg);
48631.1Skamil		/* Wait for parent */
48641.1Skamil		CHILD_FROM_PARENT("tracer wait", parent_tracer, msg);
48651.1Skamil
48661.1Skamil		/* Wait for tracee and assert that it exited */
48671.1Skamil		FORKEE_REQUIRE_SUCCESS(
48681.1Skamil		    wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);
48691.1Skamil
48701.1Skamil		forkee_status_exited(status, exitval_tracee);
48711.1Skamil
48721.13Schristos		DPRINTF("Before exiting of the tracer process\n");
48731.1Skamil		_exit(exitval_tracer);
48741.1Skamil	}
48751.1Skamil
48761.13Schristos	DPRINTF("Wait for the tracer to attach to the tracee\n");
48771.1Skamil	PARENT_FROM_CHILD("tracer ready", parent_tracer, msg);
48781.1Skamil
48791.13Schristos	DPRINTF("Resume the tracee and let it exit\n");
48801.1Skamil	PARENT_TO_CHILD("tracee exit", parent_tracee, msg);
48811.1Skamil
48821.13Schristos	DPRINTF("Detect that tracee is zombie\n");
48831.1Skamil	await_zombie(tracee);
48841.1Skamil
48851.13Schristos	DPRINTF("Assert that there is no status about tracee - "
48861.1Skamil	    "Tracer must detect zombie first - calling %s()\n", TWAIT_FNAME);
48871.1Skamil	TWAIT_REQUIRE_SUCCESS(
48881.1Skamil	    wpid = TWAIT_GENERIC(tracee, &status, WNOHANG), 0);
48891.1Skamil
48901.13Schristos	DPRINTF("Resume the tracer and let it detect exited tracee\n");
48911.1Skamil	PARENT_TO_CHILD("tracer wait", parent_tracer, msg);
48921.1Skamil
48931.13Schristos	DPRINTF("Wait for tracer to finish its job and exit - calling %s()\n",
48941.1Skamil	    TWAIT_FNAME);
48951.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracer, &status, 0),
48961.1Skamil	    tracer);
48971.1Skamil
48981.1Skamil	validate_status_exited(status, exitval_tracer);
48991.1Skamil
49001.13Schristos	DPRINTF("Wait for tracee to finish its job and exit - calling %s()\n",
49011.1Skamil	    TWAIT_FNAME);
49021.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracee, &status, WNOHANG),
49031.1Skamil	    tracee);
49041.1Skamil
49051.1Skamil	validate_status_exited(status, exitval_tracee);
49061.1Skamil
49071.1Skamil	msg_close(&parent_tracer);
49081.1Skamil	msg_close(&parent_tracee);
49091.1Skamil}
49101.1Skamil#endif
49111.1Skamil
49121.1SkamilATF_TC(siginfo1);
49131.1SkamilATF_TC_HEAD(siginfo1, tc)
49141.1Skamil{
49151.1Skamil	atf_tc_set_md_var(tc, "descr",
49161.1Skamil	    "Verify basic PT_GET_SIGINFO call for SIGTRAP from tracee");
49171.1Skamil}
49181.1Skamil
49191.1SkamilATF_TC_BODY(siginfo1, tc)
49201.1Skamil{
49211.1Skamil	const int exitval = 5;
49221.1Skamil	const int sigval = SIGTRAP;
49231.1Skamil	pid_t child, wpid;
49241.1Skamil#if defined(TWAIT_HAVE_STATUS)
49251.1Skamil	int status;
49261.1Skamil#endif
49271.1Skamil	struct ptrace_siginfo info;
49281.1Skamil	memset(&info, 0, sizeof(info));
49291.1Skamil
49301.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
49311.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
49321.1Skamil	if (child == 0) {
49331.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
49341.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
49351.1Skamil
49361.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
49371.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
49381.1Skamil
49391.13Schristos		DPRINTF("Before exiting of the child process\n");
49401.1Skamil		_exit(exitval);
49411.1Skamil	}
49421.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
49431.1Skamil
49441.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
49451.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
49461.1Skamil
49471.1Skamil	validate_status_stopped(status, sigval);
49481.1Skamil
49491.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
49501.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
49511.1Skamil
49521.13Schristos	DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
49531.13Schristos	DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n",
49541.1Skamil	    info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
49551.1Skamil	    info.psi_siginfo.si_errno);
49561.1Skamil
49571.13Schristos	DPRINTF("Before resuming the child process where it left off and "
49581.1Skamil	    "without signal to be sent\n");
49591.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
49601.1Skamil
49611.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
49621.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
49631.1Skamil
49641.1Skamil	validate_status_exited(status, exitval);
49651.1Skamil
49661.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
49671.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
49681.1Skamil}
49691.1Skamil
49701.1SkamilATF_TC(siginfo2);
49711.1SkamilATF_TC_HEAD(siginfo2, tc)
49721.1Skamil{
49731.1Skamil	atf_tc_set_md_var(tc, "descr",
49741.1Skamil	    "Verify basic PT_GET_SIGINFO and PT_SET_SIGINFO calls without "
49751.1Skamil	    "modification of SIGINT from tracee");
49761.1Skamil}
49771.1Skamil
49781.1Skamilstatic int siginfo2_caught = 0;
49791.1Skamil
49801.1Skamilstatic void
49811.1Skamilsiginfo2_sighandler(int sig)
49821.1Skamil{
49831.1Skamil	FORKEE_ASSERT_EQ(sig, SIGINT);
49841.1Skamil
49851.1Skamil	++siginfo2_caught;
49861.1Skamil}
49871.1Skamil
49881.1SkamilATF_TC_BODY(siginfo2, tc)
49891.1Skamil{
49901.1Skamil	const int exitval = 5;
49911.1Skamil	const int sigval = SIGINT;
49921.1Skamil	pid_t child, wpid;
49931.1Skamil	struct sigaction sa;
49941.1Skamil#if defined(TWAIT_HAVE_STATUS)
49951.1Skamil	int status;
49961.1Skamil#endif
49971.1Skamil	struct ptrace_siginfo info;
49981.1Skamil	memset(&info, 0, sizeof(info));
49991.1Skamil
50001.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
50011.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
50021.1Skamil	if (child == 0) {
50031.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
50041.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
50051.1Skamil
50061.1Skamil		sa.sa_handler = siginfo2_sighandler;
50071.1Skamil		sa.sa_flags = SA_SIGINFO;
50081.1Skamil		sigemptyset(&sa.sa_mask);
50091.1Skamil
50101.1Skamil		FORKEE_ASSERT(sigaction(sigval, &sa, NULL) != -1);
50111.1Skamil
50121.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
50131.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
50141.1Skamil
50151.1Skamil		FORKEE_ASSERT_EQ(siginfo2_caught, 1);
50161.1Skamil
50171.13Schristos		DPRINTF("Before exiting of the child process\n");
50181.1Skamil		_exit(exitval);
50191.1Skamil	}
50201.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
50211.1Skamil
50221.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
50231.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
50241.1Skamil
50251.1Skamil	validate_status_stopped(status, sigval);
50261.1Skamil
50271.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
50281.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
50291.1Skamil
50301.13Schristos	DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
50311.13Schristos	DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n",
50321.1Skamil	    info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
50331.1Skamil	    info.psi_siginfo.si_errno);
50341.1Skamil
50351.13Schristos	DPRINTF("Before calling ptrace(2) with PT_SET_SIGINFO for child\n");
50361.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_SIGINFO, child, &info, sizeof(info)) != -1);
50371.1Skamil
50381.13Schristos	DPRINTF("Before resuming the child process where it left off and "
50391.1Skamil	    "without signal to be sent\n");
50401.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, sigval) != -1);
50411.1Skamil
50421.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
50431.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
50441.1Skamil
50451.1Skamil	validate_status_exited(status, exitval);
50461.1Skamil
50471.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
50481.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
50491.1Skamil}
50501.1Skamil
50511.1SkamilATF_TC(siginfo3);
50521.1SkamilATF_TC_HEAD(siginfo3, tc)
50531.1Skamil{
50541.1Skamil	atf_tc_set_md_var(tc, "descr",
50551.1Skamil	    "Verify basic PT_GET_SIGINFO and PT_SET_SIGINFO calls with "
50561.1Skamil	    "setting signal to new value");
50571.1Skamil}
50581.1Skamil
50591.1Skamilstatic int siginfo3_caught = 0;
50601.1Skamil
50611.1Skamilstatic void
50621.1Skamilsiginfo3_sigaction(int sig, siginfo_t *info, void *ctx)
50631.1Skamil{
50641.1Skamil	FORKEE_ASSERT_EQ(sig, SIGTRAP);
50651.1Skamil
50661.1Skamil	FORKEE_ASSERT_EQ(info->si_signo, SIGTRAP);
50671.1Skamil	FORKEE_ASSERT_EQ(info->si_code, TRAP_BRKPT);
50681.1Skamil
50691.1Skamil	++siginfo3_caught;
50701.1Skamil}
50711.1Skamil
50721.1SkamilATF_TC_BODY(siginfo3, tc)
50731.1Skamil{
50741.1Skamil	const int exitval = 5;
50751.1Skamil	const int sigval = SIGINT;
50761.1Skamil	const int sigfaked = SIGTRAP;
50771.1Skamil	const int sicodefaked = TRAP_BRKPT;
50781.1Skamil	pid_t child, wpid;
50791.1Skamil	struct sigaction sa;
50801.1Skamil#if defined(TWAIT_HAVE_STATUS)
50811.1Skamil	int status;
50821.1Skamil#endif
50831.1Skamil	struct ptrace_siginfo info;
50841.1Skamil	memset(&info, 0, sizeof(info));
50851.1Skamil
50861.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
50871.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
50881.1Skamil	if (child == 0) {
50891.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
50901.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
50911.1Skamil
50921.1Skamil		sa.sa_sigaction = siginfo3_sigaction;
50931.1Skamil		sa.sa_flags = SA_SIGINFO;
50941.1Skamil		sigemptyset(&sa.sa_mask);
50951.1Skamil
50961.1Skamil		FORKEE_ASSERT(sigaction(sigfaked, &sa, NULL) != -1);
50971.1Skamil
50981.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
50991.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
51001.1Skamil
51011.1Skamil		FORKEE_ASSERT_EQ(siginfo3_caught, 1);
51021.1Skamil
51031.13Schristos		DPRINTF("Before exiting of the child process\n");
51041.1Skamil		_exit(exitval);
51051.1Skamil	}
51061.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
51071.1Skamil
51081.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
51091.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
51101.1Skamil
51111.1Skamil	validate_status_stopped(status, sigval);
51121.1Skamil
51131.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
51141.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
51151.1Skamil
51161.13Schristos	DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
51171.13Schristos	DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n",
51181.1Skamil	    info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
51191.1Skamil	    info.psi_siginfo.si_errno);
51201.1Skamil
51211.13Schristos	DPRINTF("Before setting new faked signal to signo=%d si_code=%d\n",
51221.1Skamil	    sigfaked, sicodefaked);
51231.1Skamil	info.psi_siginfo.si_signo = sigfaked;
51241.1Skamil	info.psi_siginfo.si_code = sicodefaked;
51251.1Skamil
51261.13Schristos	DPRINTF("Before calling ptrace(2) with PT_SET_SIGINFO for child\n");
51271.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_SIGINFO, child, &info, sizeof(info)) != -1);
51281.1Skamil
51291.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
51301.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
51311.1Skamil
51321.13Schristos	DPRINTF("Before checking siginfo_t\n");
51331.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigfaked);
51341.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, sicodefaked);
51351.1Skamil
51361.13Schristos	DPRINTF("Before resuming the child process where it left off and "
51371.1Skamil	    "without signal to be sent\n");
51381.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, sigfaked) != -1);
51391.1Skamil
51401.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
51411.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
51421.1Skamil
51431.1Skamil	validate_status_exited(status, exitval);
51441.1Skamil
51451.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
51461.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
51471.1Skamil}
51481.1Skamil
51491.1SkamilATF_TC(siginfo4);
51501.1SkamilATF_TC_HEAD(siginfo4, tc)
51511.1Skamil{
51521.1Skamil	atf_tc_set_md_var(tc, "descr",
51531.1Skamil	    "Detect SIGTRAP TRAP_EXEC from tracee");
51541.1Skamil}
51551.1Skamil
51561.1SkamilATF_TC_BODY(siginfo4, tc)
51571.1Skamil{
51581.1Skamil	const int sigval = SIGTRAP;
51591.1Skamil	pid_t child, wpid;
51601.1Skamil#if defined(TWAIT_HAVE_STATUS)
51611.1Skamil	int status;
51621.1Skamil#endif
51631.1Skamil
51641.1Skamil	struct ptrace_siginfo info;
51651.1Skamil	memset(&info, 0, sizeof(info));
51661.1Skamil
51671.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
51681.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
51691.1Skamil	if (child == 0) {
51701.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
51711.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
51721.1Skamil
51731.13Schristos		DPRINTF("Before calling execve(2) from child\n");
51741.1Skamil		execlp("/bin/echo", "/bin/echo", NULL);
51751.1Skamil
51761.1Skamil		FORKEE_ASSERT(0 && "Not reached");
51771.1Skamil	}
51781.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
51791.1Skamil
51801.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
51811.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
51821.1Skamil
51831.1Skamil	validate_status_stopped(status, sigval);
51841.1Skamil
51851.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
51861.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
51871.1Skamil
51881.13Schristos	DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
51891.13Schristos	DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n",
51901.1Skamil	    info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
51911.1Skamil	    info.psi_siginfo.si_errno);
51921.1Skamil
51931.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigval);
51941.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_EXEC);
51951.1Skamil
51961.13Schristos	DPRINTF("Before resuming the child process where it left off and "
51971.1Skamil	    "without signal to be sent\n");
51981.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
51991.1Skamil
52001.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
52011.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
52021.1Skamil
52031.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
52041.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
52051.1Skamil}
52061.1Skamil
52071.1Skamil#if defined(TWAIT_HAVE_PID)
52081.1SkamilATF_TC(siginfo5);
52091.1SkamilATF_TC_HEAD(siginfo5, tc)
52101.1Skamil{
52111.1Skamil	atf_tc_set_md_var(tc, "descr",
52121.1Skamil	    "Verify that fork(2) is intercepted by ptrace(2) with EVENT_MASK "
52131.1Skamil	    "set to PTRACE_FORK and reports correct signal information");
52141.1Skamil}
52151.1Skamil
52161.1SkamilATF_TC_BODY(siginfo5, tc)
52171.1Skamil{
52181.1Skamil	const int exitval = 5;
52191.1Skamil	const int exitval2 = 15;
52201.1Skamil	const int sigval = SIGSTOP;
52211.1Skamil	pid_t child, child2, wpid;
52221.1Skamil#if defined(TWAIT_HAVE_STATUS)
52231.1Skamil	int status;
52241.1Skamil#endif
52251.1Skamil	ptrace_state_t state;
52261.1Skamil	const int slen = sizeof(state);
52271.1Skamil	ptrace_event_t event;
52281.1Skamil	const int elen = sizeof(event);
52291.1Skamil	struct ptrace_siginfo info;
52301.1Skamil
52311.1Skamil	memset(&info, 0, sizeof(info));
52321.1Skamil
52331.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
52341.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
52351.1Skamil	if (child == 0) {
52361.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
52371.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
52381.1Skamil
52391.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
52401.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
52411.1Skamil
52421.1Skamil		FORKEE_ASSERT((child2 = fork()) != -1);
52431.1Skamil
52441.1Skamil		if (child2 == 0)
52451.1Skamil			_exit(exitval2);
52461.1Skamil
52471.1Skamil		FORKEE_REQUIRE_SUCCESS
52481.1Skamil		    (wpid = TWAIT_GENERIC(child2, &status, 0), child2);
52491.1Skamil
52501.1Skamil		forkee_status_exited(status, exitval2);
52511.1Skamil
52521.13Schristos		DPRINTF("Before exiting of the child process\n");
52531.1Skamil		_exit(exitval);
52541.1Skamil	}
52551.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
52561.1Skamil
52571.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
52581.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
52591.1Skamil
52601.1Skamil	validate_status_stopped(status, sigval);
52611.1Skamil
52621.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
52631.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
52641.1Skamil
52651.13Schristos	DPRINTF("Before checking siginfo_t\n");
52661.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigval);
52671.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, SI_LWP);
52681.1Skamil
52691.13Schristos	DPRINTF("Enable PTRACE_FORK in EVENT_MASK for the child %d\n", child);
52701.1Skamil	event.pe_set_event = PTRACE_FORK;
52711.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);
52721.1Skamil
52731.13Schristos	DPRINTF("Before resuming the child process where it left off and "
52741.1Skamil	    "without signal to be sent\n");
52751.13Schristos        DPRINTF("We expect two SIGTRAP events, for child %d (TRAP_CHLD, "
52761.1Skamil               "pe_report_event=PTRACE_FORK, state.pe_other_pid=child2) and "
52771.1Skamil               "for child2 (TRAP_CHLD, pe_report_event=PTRACE_FORK, "
52781.1Skamil                "state.pe_other_pid=child)\n", child);
52791.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
52801.1Skamil
52811.13Schristos	DPRINTF("Before calling %s() for the child %d\n", TWAIT_FNAME, child);
52821.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
52831.1Skamil
52841.1Skamil	validate_status_stopped(status, SIGTRAP);
52851.1Skamil
52861.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
52871.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
52881.1Skamil
52891.13Schristos	DPRINTF("Before checking siginfo_t\n");
52901.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, SIGTRAP);
52911.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_CHLD);
52921.1Skamil
52931.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
52941.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_FORK);
52951.1Skamil
52961.1Skamil	child2 = state.pe_other_pid;
52971.13Schristos	DPRINTF("Reported PTRACE_FORK event with forkee %d\n", child2);
52981.1Skamil
52991.13Schristos	DPRINTF("Before calling %s() for the forkee %d of the child %d\n",
53001.1Skamil	    TWAIT_FNAME, child2, child);
53011.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0),
53021.1Skamil	    child2);
53031.1Skamil
53041.1Skamil	validate_status_stopped(status, SIGTRAP);
53051.1Skamil
53061.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
53071.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
53081.1Skamil
53091.13Schristos	DPRINTF("Before checking siginfo_t\n");
53101.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, SIGTRAP);
53111.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_CHLD);
53121.1Skamil
53131.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child2, &state, slen) != -1);
53141.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_FORK);
53151.1Skamil	ATF_REQUIRE_EQ(state.pe_other_pid, child);
53161.1Skamil
53171.13Schristos	DPRINTF("Before resuming the forkee process where it left off and "
53181.1Skamil	    "without signal to be sent\n");
53191.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child2, (void *)1, 0) != -1);
53201.1Skamil
53211.13Schristos	DPRINTF("Before resuming the child process where it left off and "
53221.1Skamil	    "without signal to be sent\n");
53231.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
53241.1Skamil
53251.13Schristos	DPRINTF("Before calling %s() for the forkee - expected exited\n",
53261.1Skamil	    TWAIT_FNAME);
53271.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0),
53281.1Skamil	    child2);
53291.1Skamil
53301.1Skamil	validate_status_exited(status, exitval2);
53311.1Skamil
53321.13Schristos	DPRINTF("Before calling %s() for the forkee - expected no process\n",
53331.1Skamil	    TWAIT_FNAME);
53341.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD,
53351.1Skamil	    wpid = TWAIT_GENERIC(child2, &status, 0));
53361.1Skamil
53371.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
53381.1Skamil	    "SIGCHLD\n", TWAIT_FNAME);
53391.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
53401.1Skamil
53411.1Skamil	validate_status_stopped(status, SIGCHLD);
53421.1Skamil
53431.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
53441.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
53451.1Skamil
53461.13Schristos	DPRINTF("Before checking siginfo_t\n");
53471.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, SIGCHLD);
53481.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, CLD_EXITED);
53491.1Skamil
53501.13Schristos	DPRINTF("Before resuming the child process where it left off and "
53511.1Skamil	    "without signal to be sent\n");
53521.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
53531.1Skamil
53541.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
53551.1Skamil	    TWAIT_FNAME);
53561.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
53571.1Skamil
53581.1Skamil	validate_status_exited(status, exitval);
53591.1Skamil
53601.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
53611.1Skamil	    TWAIT_FNAME);
53621.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
53631.1Skamil}
53641.1Skamil#endif
53651.1Skamil
53661.1Skamil#if defined(PT_STEP)
53671.1SkamilATF_TC(siginfo6);
53681.1SkamilATF_TC_HEAD(siginfo6, tc)
53691.1Skamil{
53701.1Skamil	atf_tc_set_md_var(tc, "descr",
53711.1Skamil	    "Verify single PT_STEP call with signal information check");
53721.1Skamil}
53731.1Skamil
53741.1SkamilATF_TC_BODY(siginfo6, tc)
53751.1Skamil{
53761.1Skamil	const int exitval = 5;
53771.1Skamil	const int sigval = SIGSTOP;
53781.1Skamil	pid_t child, wpid;
53791.1Skamil#if defined(TWAIT_HAVE_STATUS)
53801.1Skamil	int status;
53811.1Skamil#endif
53821.1Skamil	int happy;
53831.1Skamil	struct ptrace_siginfo info;
53841.1Skamil
53851.1Skamil#if defined(__arm__)
53861.1Skamil	/* PT_STEP not supported on arm 32-bit */
53871.1Skamil	atf_tc_expect_fail("PR kern/52119");
53881.1Skamil#endif
53891.1Skamil
53901.1Skamil	memset(&info, 0, sizeof(info));
53911.1Skamil
53921.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
53931.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
53941.1Skamil	if (child == 0) {
53951.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
53961.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
53971.1Skamil
53981.1Skamil		happy = check_happy(100);
53991.1Skamil
54001.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
54011.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
54021.1Skamil
54031.1Skamil		FORKEE_ASSERT_EQ(happy, check_happy(100));
54041.1Skamil
54051.13Schristos		DPRINTF("Before exiting of the child process\n");
54061.1Skamil		_exit(exitval);
54071.1Skamil	}
54081.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
54091.1Skamil
54101.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
54111.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
54121.1Skamil
54131.1Skamil	validate_status_stopped(status, sigval);
54141.1Skamil
54151.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
54161.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
54171.1Skamil
54181.13Schristos	DPRINTF("Before checking siginfo_t\n");
54191.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigval);
54201.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, SI_LWP);
54211.1Skamil
54221.13Schristos	DPRINTF("Before resuming the child process where it left off and "
54231.1Skamil	    "without signal to be sent (use PT_STEP)\n");
54241.13Schristos	SYSCALL_REQUIRE(ptrace(PT_STEP, child, (void *)1, 0) != -1);
54251.1Skamil
54261.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
54271.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
54281.1Skamil
54291.1Skamil	validate_status_stopped(status, SIGTRAP);
54301.1Skamil
54311.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
54321.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
54331.1Skamil
54341.13Schristos	DPRINTF("Before checking siginfo_t\n");
54351.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, SIGTRAP);
54361.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_TRACE);
54371.1Skamil
54381.13Schristos	DPRINTF("Before resuming the child process where it left off and "
54391.1Skamil	    "without signal to be sent\n");
54401.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
54411.1Skamil
54421.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
54431.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
54441.1Skamil
54451.1Skamil	validate_status_exited(status, exitval);
54461.1Skamil
54471.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
54481.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
54491.1Skamil}
54501.1Skamil#endif
54511.1Skamil
54521.1Skamilvolatile lwpid_t the_lwp_id = 0;
54531.1Skamil
54541.1Skamilstatic void
54551.1Skamillwp_main_func(void *arg)
54561.1Skamil{
54571.1Skamil	the_lwp_id = _lwp_self();
54581.1Skamil	_lwp_exit();
54591.1Skamil}
54601.1Skamil
54611.1SkamilATF_TC(lwp_create1);
54621.1SkamilATF_TC_HEAD(lwp_create1, tc)
54631.1Skamil{
54641.1Skamil	atf_tc_set_md_var(tc, "descr",
54651.1Skamil	    "Verify that 1 LWP creation is intercepted by ptrace(2) with "
54661.1Skamil	    "EVENT_MASK set to PTRACE_LWP_CREATE");
54671.1Skamil}
54681.1Skamil
54691.1SkamilATF_TC_BODY(lwp_create1, tc)
54701.1Skamil{
54711.1Skamil	const int exitval = 5;
54721.1Skamil	const int sigval = SIGSTOP;
54731.1Skamil	pid_t child, wpid;
54741.1Skamil#if defined(TWAIT_HAVE_STATUS)
54751.1Skamil	int status;
54761.1Skamil#endif
54771.1Skamil	ptrace_state_t state;
54781.1Skamil	const int slen = sizeof(state);
54791.1Skamil	ptrace_event_t event;
54801.1Skamil	const int elen = sizeof(event);
54811.1Skamil	ucontext_t uc;
54821.1Skamil	lwpid_t lid;
54831.1Skamil	static const size_t ssize = 16*1024;
54841.1Skamil	void *stack;
54851.1Skamil
54861.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
54871.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
54881.1Skamil	if (child == 0) {
54891.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
54901.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
54911.1Skamil
54921.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
54931.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
54941.1Skamil
54951.13Schristos		DPRINTF("Before allocating memory for stack in child\n");
54961.1Skamil		FORKEE_ASSERT((stack = malloc(ssize)) != NULL);
54971.1Skamil
54981.13Schristos		DPRINTF("Before making context for new lwp in child\n");
54991.1Skamil		_lwp_makecontext(&uc, lwp_main_func, NULL, NULL, stack, ssize);
55001.1Skamil
55011.13Schristos		DPRINTF("Before creating new in child\n");
55021.1Skamil		FORKEE_ASSERT(_lwp_create(&uc, 0, &lid) == 0);
55031.1Skamil
55041.13Schristos		DPRINTF("Before waiting for lwp %d to exit\n", lid);
55051.1Skamil		FORKEE_ASSERT(_lwp_wait(lid, NULL) == 0);
55061.1Skamil
55071.13Schristos		DPRINTF("Before verifying that reported %d and running lid %d "
55081.1Skamil		    "are the same\n", lid, the_lwp_id);
55091.1Skamil		FORKEE_ASSERT_EQ(lid, the_lwp_id);
55101.1Skamil
55111.13Schristos		DPRINTF("Before exiting of the child process\n");
55121.1Skamil		_exit(exitval);
55131.1Skamil	}
55141.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
55151.1Skamil
55161.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
55171.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
55181.1Skamil
55191.1Skamil	validate_status_stopped(status, sigval);
55201.1Skamil
55211.13Schristos	DPRINTF("Set empty EVENT_MASK for the child %d\n", child);
55221.1Skamil	event.pe_set_event = PTRACE_LWP_CREATE;
55231.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);
55241.1Skamil
55251.13Schristos	DPRINTF("Before resuming the child process where it left off and "
55261.1Skamil	    "without signal to be sent\n");
55271.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
55281.1Skamil
55291.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
55301.1Skamil	    "SIGTRAP\n", TWAIT_FNAME);
55311.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
55321.1Skamil
55331.1Skamil	validate_status_stopped(status, SIGTRAP);
55341.1Skamil
55351.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
55361.1Skamil
55371.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_LWP_CREATE);
55381.1Skamil
55391.1Skamil	lid = state.pe_lwp;
55401.13Schristos	DPRINTF("Reported PTRACE_LWP_CREATE event with lid %d\n", lid);
55411.1Skamil
55421.13Schristos	DPRINTF("Before resuming the child process where it left off and "
55431.1Skamil	    "without signal to be sent\n");
55441.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
55451.1Skamil
55461.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
55471.1Skamil	    TWAIT_FNAME);
55481.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
55491.1Skamil
55501.1Skamil	validate_status_exited(status, exitval);
55511.1Skamil
55521.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
55531.1Skamil	    TWAIT_FNAME);
55541.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
55551.1Skamil}
55561.1Skamil
55571.1SkamilATF_TC(lwp_exit1);
55581.1SkamilATF_TC_HEAD(lwp_exit1, tc)
55591.1Skamil{
55601.1Skamil	atf_tc_set_md_var(tc, "descr",
55611.1Skamil	    "Verify that 1 LWP creation is intercepted by ptrace(2) with "
55621.1Skamil	    "EVENT_MASK set to PTRACE_LWP_EXIT");
55631.1Skamil}
55641.1Skamil
55651.1SkamilATF_TC_BODY(lwp_exit1, tc)
55661.1Skamil{
55671.1Skamil	const int exitval = 5;
55681.1Skamil	const int sigval = SIGSTOP;
55691.1Skamil	pid_t child, wpid;
55701.1Skamil#if defined(TWAIT_HAVE_STATUS)
55711.1Skamil	int status;
55721.1Skamil#endif
55731.1Skamil	ptrace_state_t state;
55741.1Skamil	const int slen = sizeof(state);
55751.1Skamil	ptrace_event_t event;
55761.1Skamil	const int elen = sizeof(event);
55771.1Skamil	ucontext_t uc;
55781.1Skamil	lwpid_t lid;
55791.1Skamil	static const size_t ssize = 16*1024;
55801.1Skamil	void *stack;
55811.1Skamil
55821.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
55831.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
55841.1Skamil	if (child == 0) {
55851.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
55861.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
55871.1Skamil
55881.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
55891.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
55901.1Skamil
55911.13Schristos		DPRINTF("Before allocating memory for stack in child\n");
55921.1Skamil		FORKEE_ASSERT((stack = malloc(ssize)) != NULL);
55931.1Skamil
55941.13Schristos		DPRINTF("Before making context for new lwp in child\n");
55951.1Skamil		_lwp_makecontext(&uc, lwp_main_func, NULL, NULL, stack, ssize);
55961.1Skamil
55971.13Schristos		DPRINTF("Before creating new in child\n");
55981.1Skamil		FORKEE_ASSERT(_lwp_create(&uc, 0, &lid) == 0);
55991.1Skamil
56001.13Schristos		DPRINTF("Before waiting for lwp %d to exit\n", lid);
56011.1Skamil		FORKEE_ASSERT(_lwp_wait(lid, NULL) == 0);
56021.1Skamil
56031.13Schristos		DPRINTF("Before verifying that reported %d and running lid %d "
56041.1Skamil		    "are the same\n", lid, the_lwp_id);
56051.1Skamil		FORKEE_ASSERT_EQ(lid, the_lwp_id);
56061.1Skamil
56071.13Schristos		DPRINTF("Before exiting of the child process\n");
56081.1Skamil		_exit(exitval);
56091.1Skamil	}
56101.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
56111.1Skamil
56121.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
56131.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
56141.1Skamil
56151.1Skamil	validate_status_stopped(status, sigval);
56161.1Skamil
56171.13Schristos	DPRINTF("Set empty EVENT_MASK for the child %d\n", child);
56181.1Skamil	event.pe_set_event = PTRACE_LWP_EXIT;
56191.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);
56201.1Skamil
56211.13Schristos	DPRINTF("Before resuming the child process where it left off and "
56221.1Skamil	    "without signal to be sent\n");
56231.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
56241.1Skamil
56251.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
56261.1Skamil	    "SIGTRAP\n", TWAIT_FNAME);
56271.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
56281.1Skamil
56291.1Skamil	validate_status_stopped(status, SIGTRAP);
56301.1Skamil
56311.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
56321.1Skamil
56331.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_LWP_EXIT);
56341.1Skamil
56351.1Skamil	lid = state.pe_lwp;
56361.13Schristos	DPRINTF("Reported PTRACE_LWP_EXIT event with lid %d\n", lid);
56371.1Skamil
56381.13Schristos	DPRINTF("Before resuming the child process where it left off and "
56391.1Skamil	    "without signal to be sent\n");
56401.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
56411.1Skamil
56421.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
56431.1Skamil	    TWAIT_FNAME);
56441.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
56451.1Skamil
56461.1Skamil	validate_status_exited(status, exitval);
56471.1Skamil
56481.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
56491.1Skamil	    TWAIT_FNAME);
56501.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
56511.1Skamil}
56521.1Skamil
56531.1SkamilATF_TC(signal1);
56541.1SkamilATF_TC_HEAD(signal1, tc)
56551.1Skamil{
56561.1Skamil	atf_tc_set_md_var(tc, "descr",
56571.1Skamil	    "Verify that masking single unrelated signal does not stop tracer "
56581.1Skamil	    "from catching other signals");
56591.1Skamil}
56601.1Skamil
56611.1SkamilATF_TC_BODY(signal1, tc)
56621.1Skamil{
56631.1Skamil	const int exitval = 5;
56641.1Skamil	const int sigval = SIGSTOP;
56651.1Skamil	const int sigmasked = SIGTRAP;
56661.1Skamil	const int signotmasked = SIGINT;
56671.1Skamil	pid_t child, wpid;
56681.1Skamil#if defined(TWAIT_HAVE_STATUS)
56691.1Skamil	int status;
56701.1Skamil#endif
56711.1Skamil	sigset_t intmask;
56721.1Skamil
56731.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
56741.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
56751.1Skamil	if (child == 0) {
56761.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
56771.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
56781.1Skamil
56791.1Skamil		sigemptyset(&intmask);
56801.1Skamil		sigaddset(&intmask, sigmasked);
56811.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
56821.1Skamil
56831.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
56841.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
56851.1Skamil
56861.13Schristos		DPRINTF("Before raising %s from child\n",
56871.1Skamil		    strsignal(signotmasked));
56881.1Skamil		FORKEE_ASSERT(raise(signotmasked) == 0);
56891.1Skamil
56901.13Schristos		DPRINTF("Before exiting of the child process\n");
56911.1Skamil		_exit(exitval);
56921.1Skamil	}
56931.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
56941.1Skamil
56951.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
56961.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
56971.1Skamil
56981.1Skamil	validate_status_stopped(status, sigval);
56991.1Skamil
57001.13Schristos	DPRINTF("Before resuming the child process where it left off and "
57011.1Skamil	    "without signal to be sent\n");
57021.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
57031.1Skamil
57041.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
57051.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
57061.1Skamil
57071.1Skamil	validate_status_stopped(status, signotmasked);
57081.1Skamil
57091.13Schristos	DPRINTF("Before resuming the child process where it left off and "
57101.1Skamil	    "without signal to be sent\n");
57111.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
57121.1Skamil
57131.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
57141.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
57151.1Skamil
57161.1Skamil	validate_status_exited(status, exitval);
57171.1Skamil
57181.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
57191.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
57201.1Skamil}
57211.1Skamil
57221.1SkamilATF_TC(signal2);
57231.1SkamilATF_TC_HEAD(signal2, tc)
57241.1Skamil{
57251.1Skamil	atf_tc_set_md_var(tc, "descr",
57261.1Skamil	    "Verify that masking SIGTRAP in tracee stops tracer from "
57271.1Skamil	    "catching this raised signal");
57281.1Skamil}
57291.1Skamil
57301.1SkamilATF_TC_BODY(signal2, tc)
57311.1Skamil{
57321.1Skamil	const int exitval = 5;
57331.1Skamil	const int sigval = SIGSTOP;
57341.1Skamil	const int sigmasked = SIGTRAP;
57351.1Skamil	pid_t child, wpid;
57361.1Skamil#if defined(TWAIT_HAVE_STATUS)
57371.1Skamil	int status;
57381.1Skamil#endif
57391.1Skamil	sigset_t intmask;
57401.1Skamil
57411.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
57421.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
57431.1Skamil	if (child == 0) {
57441.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
57451.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
57461.1Skamil
57471.1Skamil		sigemptyset(&intmask);
57481.1Skamil		sigaddset(&intmask, sigmasked);
57491.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
57501.1Skamil
57511.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
57521.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
57531.1Skamil
57541.13Schristos		DPRINTF("Before raising %s breakpoint from child\n",
57551.1Skamil		    strsignal(sigmasked));
57561.1Skamil		FORKEE_ASSERT(raise(sigmasked) == 0);
57571.1Skamil
57581.13Schristos		DPRINTF("Before exiting of the child process\n");
57591.1Skamil		_exit(exitval);
57601.1Skamil	}
57611.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
57621.1Skamil
57631.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
57641.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
57651.1Skamil
57661.1Skamil	validate_status_stopped(status, sigval);
57671.1Skamil
57681.13Schristos	DPRINTF("Before resuming the child process where it left off and "
57691.1Skamil	    "without signal to be sent\n");
57701.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
57711.1Skamil
57721.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
57731.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
57741.1Skamil
57751.1Skamil	validate_status_exited(status, exitval);
57761.1Skamil
57771.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
57781.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
57791.1Skamil}
57801.1Skamil
57811.1SkamilATF_TC(signal3);
57821.1SkamilATF_TC_HEAD(signal3, tc)
57831.1Skamil{
57841.7Skamil	atf_tc_set_md_var(tc, "timeout", "5");
57851.1Skamil	atf_tc_set_md_var(tc, "descr",
57861.1Skamil	    "Verify that masking SIGTRAP in tracee does not stop tracer from "
57871.1Skamil	    "catching software breakpoints");
57881.1Skamil}
57891.1Skamil
57901.1SkamilATF_TC_BODY(signal3, tc)
57911.1Skamil{
57921.1Skamil	const int exitval = 5;
57931.1Skamil	const int sigval = SIGSTOP;
57941.1Skamil	const int sigmasked = SIGTRAP;
57951.1Skamil	pid_t child, wpid;
57961.1Skamil#if defined(TWAIT_HAVE_STATUS)
57971.1Skamil	int status;
57981.1Skamil#endif
57991.1Skamil	sigset_t intmask;
58001.1Skamil
58011.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
58021.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
58031.1Skamil	if (child == 0) {
58041.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
58051.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
58061.1Skamil
58071.1Skamil		sigemptyset(&intmask);
58081.1Skamil		sigaddset(&intmask, sigmasked);
58091.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
58101.1Skamil
58111.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
58121.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
58131.1Skamil
58141.13Schristos		DPRINTF("Before raising software breakpoint from child\n");
58151.52Skamil		trigger_trap();
58161.1Skamil
58171.13Schristos		DPRINTF("Before exiting of the child process\n");
58181.1Skamil		_exit(exitval);
58191.1Skamil	}
58201.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
58211.1Skamil
58221.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
58231.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
58241.1Skamil
58251.1Skamil	validate_status_stopped(status, sigval);
58261.1Skamil
58271.13Schristos	DPRINTF("Before resuming the child process where it left off and "
58281.1Skamil	    "without signal to be sent\n");
58291.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
58301.1Skamil
58311.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
58321.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
58331.1Skamil
58341.1Skamil	validate_status_stopped(status, sigmasked);
58351.1Skamil
58361.13Schristos	DPRINTF("Before resuming the child process where it left off and "
58371.1Skamil	    "without signal to be sent\n");
58381.49Skamil	SYSCALL_REQUIRE(ptrace(PT_KILL, child, NULL, 0) != -1);
58391.1Skamil
58401.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
58411.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
58421.1Skamil
58431.49Skamil	validate_status_signaled(status, SIGKILL, 0);
58441.1Skamil
58451.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
58461.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
58471.1Skamil}
58481.1Skamil
58491.1Skamil#if defined(PT_STEP)
58501.1SkamilATF_TC(signal4);
58511.1SkamilATF_TC_HEAD(signal4, tc)
58521.1Skamil{
58531.1Skamil	atf_tc_set_md_var(tc, "descr",
58541.1Skamil	    "Verify that masking SIGTRAP in tracee does not stop tracer from "
58551.1Skamil	    "catching single step trap");
58561.1Skamil}
58571.1Skamil
58581.1SkamilATF_TC_BODY(signal4, tc)
58591.1Skamil{
58601.1Skamil	const int exitval = 5;
58611.1Skamil	const int sigval = SIGSTOP;
58621.1Skamil	const int sigmasked = SIGTRAP;
58631.1Skamil	pid_t child, wpid;
58641.1Skamil#if defined(TWAIT_HAVE_STATUS)
58651.1Skamil	int status;
58661.1Skamil#endif
58671.1Skamil	sigset_t intmask;
58681.1Skamil	int happy;
58691.1Skamil
58701.1Skamil#if defined(__arm__)
58711.5Skamil	/* PT_STEP not supported on arm 32-bit */
58721.5Skamil	atf_tc_expect_fail("PR kern/51918 PR kern/52119");
58731.1Skamil#endif
58741.1Skamil
58751.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
58761.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
58771.1Skamil	if (child == 0) {
58781.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
58791.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
58801.1Skamil
58811.1Skamil		happy = check_happy(100);
58821.1Skamil
58831.1Skamil		sigemptyset(&intmask);
58841.1Skamil		sigaddset(&intmask, sigmasked);
58851.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
58861.1Skamil
58871.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
58881.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
58891.1Skamil
58901.1Skamil		FORKEE_ASSERT_EQ(happy, check_happy(100));
58911.1Skamil
58921.13Schristos		DPRINTF("Before exiting of the child process\n");
58931.1Skamil		_exit(exitval);
58941.1Skamil	}
58951.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
58961.1Skamil
58971.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
58981.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
58991.1Skamil
59001.1Skamil	validate_status_stopped(status, sigval);
59011.1Skamil
59021.13Schristos	DPRINTF("Before resuming the child process where it left off and "
59031.1Skamil	    "without signal to be sent\n");
59041.13Schristos	SYSCALL_REQUIRE(ptrace(PT_STEP, child, (void *)1, 0) != -1);
59051.1Skamil
59061.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
59071.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
59081.1Skamil
59091.1Skamil	validate_status_stopped(status, sigmasked);
59101.1Skamil
59111.13Schristos	DPRINTF("Before resuming the child process where it left off and "
59121.1Skamil	    "without signal to be sent\n");
59131.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
59141.1Skamil
59151.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
59161.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
59171.1Skamil
59181.1Skamil	validate_status_exited(status, exitval);
59191.1Skamil
59201.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
59211.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
59221.1Skamil}
59231.1Skamil#endif
59241.1Skamil
59251.1SkamilATF_TC(signal5);
59261.1SkamilATF_TC_HEAD(signal5, tc)
59271.1Skamil{
59281.1Skamil	atf_tc_set_md_var(tc, "descr",
59291.1Skamil	    "Verify that masking SIGTRAP in tracee does not stop tracer from "
59301.1Skamil	    "catching exec() breakpoint");
59311.1Skamil}
59321.1Skamil
59331.1SkamilATF_TC_BODY(signal5, tc)
59341.1Skamil{
59351.1Skamil	const int exitval = 5;
59361.1Skamil	const int sigval = SIGSTOP;
59371.1Skamil	const int sigmasked = SIGTRAP;
59381.1Skamil	pid_t child, wpid;
59391.1Skamil#if defined(TWAIT_HAVE_STATUS)
59401.1Skamil	int status;
59411.1Skamil#endif
59421.1Skamil	sigset_t intmask;
59431.1Skamil
59441.14Schristos	atf_tc_expect_fail("wrong signal");
59451.14Schristos
59461.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
59471.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
59481.1Skamil	if (child == 0) {
59491.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
59501.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
59511.1Skamil
59521.1Skamil		sigemptyset(&intmask);
59531.1Skamil		sigaddset(&intmask, sigmasked);
59541.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
59551.1Skamil
59561.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
59571.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
59581.1Skamil
59591.13Schristos		DPRINTF("Before calling execve(2) from child\n");
59601.1Skamil		execlp("/bin/echo", "/bin/echo", NULL);
59611.1Skamil
59621.13Schristos		DPRINTF("Before exiting of the child process\n");
59631.1Skamil		_exit(exitval);
59641.1Skamil	}
59651.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
59661.1Skamil
59671.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
59681.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
59691.1Skamil
59701.1Skamil	validate_status_stopped(status, sigval);
59711.1Skamil
59721.13Schristos	DPRINTF("Before resuming the child process where it left off and "
59731.1Skamil	    "without signal to be sent\n");
59741.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
59751.1Skamil
59761.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
59771.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
59781.1Skamil
59791.1Skamil	validate_status_stopped(status, sigmasked);
59801.1Skamil
59811.13Schristos	DPRINTF("Before resuming the child process where it left off and "
59821.1Skamil	    "without signal to be sent\n");
59831.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
59841.1Skamil
59851.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
59861.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
59871.1Skamil
59881.1Skamil	validate_status_exited(status, exitval);
59891.1Skamil
59901.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
59911.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
59921.1Skamil}
59931.1Skamil
59941.1Skamil#if defined(TWAIT_HAVE_PID)
59951.1SkamilATF_TC(signal6);
59961.1SkamilATF_TC_HEAD(signal6, tc)
59971.1Skamil{
59981.1Skamil	atf_tc_set_md_var(tc, "timeout", "5");
59991.1Skamil	atf_tc_set_md_var(tc, "descr",
60001.1Skamil	    "Verify that masking SIGTRAP in tracee does not stop tracer from "
60011.1Skamil	    "catching PTRACE_FORK breakpoint");
60021.1Skamil}
60031.1Skamil
60041.1SkamilATF_TC_BODY(signal6, tc)
60051.1Skamil{
60061.1Skamil	const int exitval = 5;
60071.1Skamil	const int exitval2 = 15;
60081.1Skamil	const int sigval = SIGSTOP;
60091.1Skamil	const int sigmasked = SIGTRAP;
60101.1Skamil	pid_t child, child2, wpid;
60111.1Skamil#if defined(TWAIT_HAVE_STATUS)
60121.1Skamil	int status;
60131.1Skamil#endif
60141.1Skamil	sigset_t intmask;
60151.1Skamil	ptrace_state_t state;
60161.1Skamil	const int slen = sizeof(state);
60171.1Skamil	ptrace_event_t event;
60181.1Skamil	const int elen = sizeof(event);
60191.1Skamil
60201.38Skamil	atf_tc_expect_fail("PR kern/51918");
60211.14Schristos
60221.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
60231.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
60241.1Skamil	if (child == 0) {
60251.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
60261.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
60271.1Skamil
60281.1Skamil		sigemptyset(&intmask);
60291.1Skamil		sigaddset(&intmask, sigmasked);
60301.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
60311.1Skamil
60321.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
60331.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
60341.1Skamil
60351.1Skamil		FORKEE_ASSERT((child2 = fork()) != -1);
60361.1Skamil
60371.1Skamil		if (child2 == 0)
60381.1Skamil			_exit(exitval2);
60391.1Skamil
60401.1Skamil		FORKEE_REQUIRE_SUCCESS
60411.1Skamil			(wpid = TWAIT_GENERIC(child2, &status, 0), child2);
60421.1Skamil
60431.1Skamil		forkee_status_exited(status, exitval2);
60441.1Skamil
60451.13Schristos		DPRINTF("Before exiting of the child process\n");
60461.1Skamil		_exit(exitval);
60471.1Skamil	}
60481.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
60491.1Skamil
60501.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
60511.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
60521.1Skamil
60531.1Skamil	validate_status_stopped(status, sigval);
60541.1Skamil
60551.13Schristos	DPRINTF("Enable PTRACE_FORK in EVENT_MASK for the child %d\n", child);
60561.1Skamil	event.pe_set_event = PTRACE_FORK;
60571.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);
60581.1Skamil
60591.13Schristos	DPRINTF("Before resuming the child process where it left off and "
60601.1Skamil	    "without signal to be sent\n");
60611.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
60621.1Skamil
60631.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
60641.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
60651.1Skamil
60661.1Skamil	validate_status_stopped(status, sigmasked);
60671.1Skamil
60681.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
60691.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_FORK);
60701.1Skamil
60711.1Skamil	child2 = state.pe_other_pid;
60721.13Schristos	DPRINTF("Reported PTRACE_FORK event with forkee %d\n", child2);
60731.1Skamil
60741.13Schristos	DPRINTF("Before calling %s() for the child2\n", TWAIT_FNAME);
60751.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0),
60761.1Skamil	    child2);
60771.1Skamil
60781.1Skamil	validate_status_stopped(status, SIGTRAP);
60791.1Skamil
60801.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child2, &state, slen) != -1);
60811.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_FORK);
60821.1Skamil	ATF_REQUIRE_EQ(state.pe_other_pid, child);
60831.1Skamil
60841.13Schristos	DPRINTF("Before resuming the forkee process where it left off and "
60851.1Skamil	    "without signal to be sent\n");
60861.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child2, (void *)1, 0) != -1);
60871.1Skamil
60881.13Schristos	DPRINTF("Before resuming the child process where it left off and "
60891.1Skamil	    "without signal to be sent\n");
60901.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
60911.1Skamil
60921.13Schristos	DPRINTF("Before calling %s() for the forkee - expected exited\n",
60931.1Skamil	    TWAIT_FNAME);
60941.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0),
60951.1Skamil	    child2);
60961.1Skamil
60971.1Skamil	validate_status_exited(status, exitval2);
60981.1Skamil
60991.13Schristos	DPRINTF("Before calling %s() for the forkee - expected no process\n",
61001.1Skamil	    TWAIT_FNAME);
61011.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD,
61021.1Skamil	    wpid = TWAIT_GENERIC(child2, &status, 0));
61031.1Skamil
61041.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
61051.1Skamil	    "SIGCHLD\n", TWAIT_FNAME);
61061.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
61071.1Skamil
61081.1Skamil	validate_status_stopped(status, SIGCHLD);
61091.1Skamil
61101.13Schristos	DPRINTF("Before resuming the child process where it left off and "
61111.1Skamil	    "without signal to be sent\n");
61121.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
61131.1Skamil
61141.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
61151.1Skamil	    TWAIT_FNAME);
61161.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
61171.1Skamil
61181.1Skamil	validate_status_exited(status, exitval);
61191.1Skamil
61201.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
61211.1Skamil	    TWAIT_FNAME);
61221.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
61231.1Skamil}
61241.1Skamil#endif
61251.1Skamil
61261.1Skamil#if defined(TWAIT_HAVE_PID)
61271.1SkamilATF_TC(signal7);
61281.1SkamilATF_TC_HEAD(signal7, tc)
61291.1Skamil{
61301.1Skamil	atf_tc_set_md_var(tc, "descr",
61311.1Skamil	    "Verify that masking SIGTRAP in tracee does not stop tracer from "
61321.1Skamil	    "catching PTRACE_VFORK breakpoint");
61331.1Skamil}
61341.1Skamil
61351.1SkamilATF_TC_BODY(signal7, tc)
61361.1Skamil{
61371.1Skamil	const int exitval = 5;
61381.1Skamil	const int exitval2 = 15;
61391.1Skamil	const int sigval = SIGSTOP;
61401.1Skamil	const int sigmasked = SIGTRAP;
61411.1Skamil	pid_t child, child2, wpid;
61421.1Skamil#if defined(TWAIT_HAVE_STATUS)
61431.1Skamil	int status;
61441.1Skamil#endif
61451.1Skamil	sigset_t intmask;
61461.1Skamil	ptrace_state_t state;
61471.1Skamil	const int slen = sizeof(state);
61481.1Skamil	ptrace_event_t event;
61491.1Skamil	const int elen = sizeof(event);
61501.1Skamil
61511.38Skamil	atf_tc_expect_fail("PR kern/51918");
61521.14Schristos
61531.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
61541.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
61551.1Skamil	if (child == 0) {
61561.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
61571.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
61581.1Skamil
61591.1Skamil		sigemptyset(&intmask);
61601.1Skamil		sigaddset(&intmask, sigmasked);
61611.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
61621.1Skamil
61631.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
61641.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
61651.1Skamil
61661.1Skamil		FORKEE_ASSERT((child2 = fork()) != -1);
61671.1Skamil
61681.1Skamil		if (child2 == 0)
61691.1Skamil			_exit(exitval2);
61701.1Skamil
61711.1Skamil		FORKEE_REQUIRE_SUCCESS
61721.1Skamil			(wpid = TWAIT_GENERIC(child2, &status, 0), child2);
61731.1Skamil
61741.1Skamil		forkee_status_exited(status, exitval2);
61751.1Skamil
61761.13Schristos		DPRINTF("Before exiting of the child process\n");
61771.1Skamil		_exit(exitval);
61781.1Skamil	}
61791.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
61801.1Skamil
61811.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
61821.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
61831.1Skamil
61841.1Skamil	validate_status_stopped(status, sigval);
61851.1Skamil
61861.13Schristos	DPRINTF("Enable PTRACE_VFORK in EVENT_MASK for the child %d\n", child);
61871.1Skamil	event.pe_set_event = PTRACE_VFORK;
61881.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1 || errno == ENOTSUP);
61891.1Skamil
61901.13Schristos	DPRINTF("Before resuming the child process where it left off and "
61911.1Skamil	    "without signal to be sent\n");
61921.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
61931.1Skamil
61941.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
61951.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
61961.1Skamil
61971.1Skamil	validate_status_stopped(status, sigmasked);
61981.1Skamil
61991.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
62001.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_VFORK);
62011.1Skamil
62021.1Skamil	child2 = state.pe_other_pid;
62031.13Schristos	DPRINTF("Reported PTRACE_VFORK event with forkee %d\n", child2);
62041.1Skamil
62051.13Schristos	DPRINTF("Before calling %s() for the child2\n", TWAIT_FNAME);
62061.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0),
62071.1Skamil	    child2);
62081.1Skamil
62091.1Skamil	validate_status_stopped(status, SIGTRAP);
62101.1Skamil
62111.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child2, &state, slen) != -1);
62121.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_VFORK);
62131.1Skamil	ATF_REQUIRE_EQ(state.pe_other_pid, child);
62141.1Skamil
62151.13Schristos	DPRINTF("Before resuming the forkee process where it left off and "
62161.1Skamil	    "without signal to be sent\n");
62171.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child2, (void *)1, 0) != -1);
62181.1Skamil
62191.13Schristos	DPRINTF("Before resuming the child process where it left off and "
62201.1Skamil	    "without signal to be sent\n");
62211.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
62221.1Skamil
62231.13Schristos	DPRINTF("Before calling %s() for the forkee - expected exited\n",
62241.1Skamil	    TWAIT_FNAME);
62251.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0),
62261.1Skamil	    child2);
62271.1Skamil
62281.1Skamil	validate_status_exited(status, exitval2);
62291.1Skamil
62301.13Schristos	DPRINTF("Before calling %s() for the forkee - expected no process\n",
62311.1Skamil	    TWAIT_FNAME);
62321.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD,
62331.1Skamil	    wpid = TWAIT_GENERIC(child2, &status, 0));
62341.1Skamil
62351.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
62361.1Skamil	    "SIGCHLD\n", TWAIT_FNAME);
62371.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
62381.1Skamil
62391.1Skamil	validate_status_stopped(status, SIGCHLD);
62401.1Skamil
62411.13Schristos	DPRINTF("Before resuming the child process where it left off and "
62421.1Skamil	    "without signal to be sent\n");
62431.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
62441.1Skamil
62451.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
62461.1Skamil	    TWAIT_FNAME);
62471.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
62481.1Skamil
62491.1Skamil	validate_status_exited(status, exitval);
62501.1Skamil
62511.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
62521.1Skamil	    TWAIT_FNAME);
62531.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
62541.1Skamil}
62551.1Skamil#endif
62561.1Skamil
62571.1SkamilATF_TC(signal8);
62581.1SkamilATF_TC_HEAD(signal8, tc)
62591.1Skamil{
62601.1Skamil	atf_tc_set_md_var(tc, "descr",
62611.1Skamil	    "Verify that masking SIGTRAP in tracee does not stop tracer from "
62621.1Skamil	    "catching PTRACE_VFORK_DONE breakpoint");
62631.1Skamil}
62641.1Skamil
62651.1SkamilATF_TC_BODY(signal8, tc)
62661.1Skamil{
62671.1Skamil	const int exitval = 5;
62681.1Skamil	const int exitval2 = 15;
62691.1Skamil	const int sigval = SIGSTOP;
62701.1Skamil	const int sigmasked = SIGTRAP;
62711.1Skamil	pid_t child, child2, wpid;
62721.1Skamil#if defined(TWAIT_HAVE_STATUS)
62731.1Skamil	int status;
62741.1Skamil#endif
62751.1Skamil	sigset_t intmask;
62761.1Skamil	ptrace_state_t state;
62771.1Skamil	const int slen = sizeof(state);
62781.1Skamil	ptrace_event_t event;
62791.1Skamil	const int elen = sizeof(event);
62801.1Skamil
62811.14Schristos	atf_tc_expect_fail("PR kern/51918");
62821.14Schristos
62831.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
62841.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
62851.1Skamil	if (child == 0) {
62861.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
62871.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
62881.1Skamil
62891.1Skamil		sigemptyset(&intmask);
62901.1Skamil		sigaddset(&intmask, sigmasked);
62911.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
62921.1Skamil
62931.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
62941.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
62951.1Skamil
62961.1Skamil		FORKEE_ASSERT((child2 = vfork()) != -1);
62971.1Skamil
62981.1Skamil		if (child2 == 0)
62991.1Skamil			_exit(exitval2);
63001.1Skamil
63011.1Skamil		FORKEE_REQUIRE_SUCCESS
63021.1Skamil			(wpid = TWAIT_GENERIC(child2, &status, 0), child2);
63031.1Skamil
63041.1Skamil		forkee_status_exited(status, exitval2);
63051.1Skamil
63061.13Schristos		DPRINTF("Before exiting of the child process\n");
63071.1Skamil		_exit(exitval);
63081.1Skamil	}
63091.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
63101.1Skamil
63111.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
63121.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
63131.1Skamil
63141.1Skamil	validate_status_stopped(status, sigval);
63151.1Skamil
63161.13Schristos	DPRINTF("Enable PTRACE_VFORK_DONE in EVENT_MASK for the child %d\n",
63171.1Skamil	    child);
63181.1Skamil	event.pe_set_event = PTRACE_VFORK_DONE;
63191.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);
63201.1Skamil
63211.13Schristos	DPRINTF("Before resuming the child process where it left off and "
63221.1Skamil	    "without signal to be sent\n");
63231.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
63241.1Skamil
63251.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
63261.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
63271.1Skamil
63281.1Skamil	validate_status_stopped(status, sigmasked);
63291.1Skamil
63301.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
63311.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_VFORK_DONE);
63321.1Skamil
63331.1Skamil	child2 = state.pe_other_pid;
63341.13Schristos	DPRINTF("Reported PTRACE_VFORK_DONE event with forkee %d\n", child2);
63351.1Skamil
63361.13Schristos	DPRINTF("Before resuming the child process where it left off and "
63371.1Skamil	    "without signal to be sent\n");
63381.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
63391.1Skamil
63401.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
63411.1Skamil	    "SIGCHLD\n", TWAIT_FNAME);
63421.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
63431.1Skamil
63441.1Skamil	validate_status_stopped(status, SIGCHLD);
63451.1Skamil
63461.13Schristos	DPRINTF("Before resuming the child process where it left off and "
63471.1Skamil	    "without signal to be sent\n");
63481.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
63491.1Skamil
63501.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
63511.1Skamil	    TWAIT_FNAME);
63521.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
63531.1Skamil
63541.1Skamil	validate_status_exited(status, exitval);
63551.1Skamil
63561.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
63571.1Skamil	    TWAIT_FNAME);
63581.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
63591.1Skamil}
63601.1Skamil
63611.1SkamilATF_TC(signal9);
63621.1SkamilATF_TC_HEAD(signal9, tc)
63631.1Skamil{
63641.1Skamil	atf_tc_set_md_var(tc, "descr",
63651.1Skamil	    "Verify that masking SIGTRAP in tracee does not stop tracer from "
63661.1Skamil	    "catching PTRACE_LWP_CREATE breakpoint");
63671.1Skamil}
63681.1Skamil
63691.1SkamilATF_TC_BODY(signal9, tc)
63701.1Skamil{
63711.1Skamil	const int exitval = 5;
63721.1Skamil	const int sigval = SIGSTOP;
63731.1Skamil	const int sigmasked = SIGTRAP;
63741.1Skamil	pid_t child, wpid;
63751.1Skamil#if defined(TWAIT_HAVE_STATUS)
63761.1Skamil	int status;
63771.1Skamil#endif
63781.1Skamil	sigset_t intmask;
63791.1Skamil	ptrace_state_t state;
63801.1Skamil	const int slen = sizeof(state);
63811.1Skamil	ptrace_event_t event;
63821.1Skamil	const int elen = sizeof(event);
63831.1Skamil	ucontext_t uc;
63841.1Skamil	lwpid_t lid;
63851.1Skamil	static const size_t ssize = 16*1024;
63861.1Skamil	void *stack;
63871.1Skamil
63881.14Schristos	atf_tc_expect_fail("PR kern/51918");
63891.14Schristos
63901.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
63911.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
63921.1Skamil	if (child == 0) {
63931.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
63941.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
63951.1Skamil
63961.1Skamil		sigemptyset(&intmask);
63971.1Skamil		sigaddset(&intmask, sigmasked);
63981.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
63991.1Skamil
64001.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
64011.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
64021.1Skamil
64031.13Schristos		DPRINTF("Before allocating memory for stack in child\n");
64041.1Skamil		FORKEE_ASSERT((stack = malloc(ssize)) != NULL);
64051.1Skamil
64061.13Schristos		DPRINTF("Before making context for new lwp in child\n");
64071.1Skamil		_lwp_makecontext(&uc, lwp_main_func, NULL, NULL, stack, ssize);
64081.1Skamil
64091.13Schristos		DPRINTF("Before creating new in child\n");
64101.1Skamil		FORKEE_ASSERT(_lwp_create(&uc, 0, &lid) == 0);
64111.1Skamil
64121.13Schristos		DPRINTF("Before waiting for lwp %d to exit\n", lid);
64131.1Skamil		FORKEE_ASSERT(_lwp_wait(lid, NULL) == 0);
64141.1Skamil
64151.13Schristos		DPRINTF("Before verifying that reported %d and running lid %d "
64161.1Skamil		    "are the same\n", lid, the_lwp_id);
64171.1Skamil		FORKEE_ASSERT_EQ(lid, the_lwp_id);
64181.1Skamil
64191.13Schristos		DPRINTF("Before exiting of the child process\n");
64201.1Skamil		_exit(exitval);
64211.1Skamil	}
64221.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
64231.1Skamil
64241.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
64251.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
64261.1Skamil
64271.1Skamil	validate_status_stopped(status, sigval);
64281.1Skamil
64291.13Schristos	DPRINTF("Set empty EVENT_MASK for the child %d\n", child);
64301.1Skamil	event.pe_set_event = PTRACE_LWP_CREATE;
64311.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);
64321.1Skamil
64331.13Schristos	DPRINTF("Before resuming the child process where it left off and "
64341.1Skamil	    "without signal to be sent\n");
64351.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
64361.1Skamil
64371.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
64381.1Skamil	    "SIGTRAP\n", TWAIT_FNAME);
64391.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
64401.1Skamil
64411.1Skamil	validate_status_stopped(status, sigmasked);
64421.1Skamil
64431.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
64441.1Skamil
64451.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_LWP_CREATE);
64461.1Skamil
64471.1Skamil	lid = state.pe_lwp;
64481.13Schristos	DPRINTF("Reported PTRACE_LWP_CREATE event with lid %d\n", lid);
64491.1Skamil
64501.13Schristos	DPRINTF("Before resuming the child process where it left off and "
64511.1Skamil	    "without signal to be sent\n");
64521.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
64531.1Skamil
64541.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
64551.1Skamil	    TWAIT_FNAME);
64561.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
64571.1Skamil
64581.1Skamil	validate_status_exited(status, exitval);
64591.1Skamil
64601.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
64611.1Skamil	    TWAIT_FNAME);
64621.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
64631.1Skamil}
64641.1Skamil
64651.1SkamilATF_TC(signal10);
64661.1SkamilATF_TC_HEAD(signal10, tc)
64671.1Skamil{
64681.1Skamil	atf_tc_set_md_var(tc, "descr",
64691.1Skamil	    "Verify that masking SIGTRAP in tracee does not stop tracer from "
64701.1Skamil	    "catching PTRACE_LWP_EXIT breakpoint");
64711.1Skamil}
64721.1Skamil
64731.1SkamilATF_TC_BODY(signal10, tc)
64741.1Skamil{
64751.1Skamil	const int exitval = 5;
64761.1Skamil	const int sigval = SIGSTOP;
64771.1Skamil	const int sigmasked = SIGTRAP;
64781.1Skamil	pid_t child, wpid;
64791.1Skamil#if defined(TWAIT_HAVE_STATUS)
64801.1Skamil	int status;
64811.1Skamil#endif
64821.1Skamil	sigset_t intmask;
64831.1Skamil	ptrace_state_t state;
64841.1Skamil	const int slen = sizeof(state);
64851.1Skamil	ptrace_event_t event;
64861.1Skamil	const int elen = sizeof(event);
64871.1Skamil	ucontext_t uc;
64881.1Skamil	lwpid_t lid;
64891.1Skamil	static const size_t ssize = 16*1024;
64901.1Skamil	void *stack;
64911.1Skamil
64921.14Schristos	atf_tc_expect_fail("PR kern/51918");
64931.14Schristos
64941.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
64951.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
64961.1Skamil	if (child == 0) {
64971.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
64981.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
64991.1Skamil
65001.1Skamil		sigemptyset(&intmask);
65011.1Skamil		sigaddset(&intmask, sigmasked);
65021.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
65031.1Skamil
65041.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
65051.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
65061.1Skamil
65071.13Schristos		DPRINTF("Before allocating memory for stack in child\n");
65081.1Skamil		FORKEE_ASSERT((stack = malloc(ssize)) != NULL);
65091.1Skamil
65101.13Schristos		DPRINTF("Before making context for new lwp in child\n");
65111.1Skamil		_lwp_makecontext(&uc, lwp_main_func, NULL, NULL, stack, ssize);
65121.1Skamil
65131.13Schristos		DPRINTF("Before creating new in child\n");
65141.1Skamil		FORKEE_ASSERT(_lwp_create(&uc, 0, &lid) == 0);
65151.1Skamil
65161.13Schristos		DPRINTF("Before waiting for lwp %d to exit\n", lid);
65171.1Skamil		FORKEE_ASSERT(_lwp_wait(lid, NULL) == 0);
65181.1Skamil
65191.13Schristos		DPRINTF("Before verifying that reported %d and running lid %d "
65201.1Skamil		    "are the same\n", lid, the_lwp_id);
65211.1Skamil		FORKEE_ASSERT_EQ(lid, the_lwp_id);
65221.1Skamil
65231.13Schristos		DPRINTF("Before exiting of the child process\n");
65241.1Skamil		_exit(exitval);
65251.1Skamil	}
65261.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
65271.1Skamil
65281.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
65291.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
65301.1Skamil
65311.1Skamil	validate_status_stopped(status, sigval);
65321.1Skamil
65331.13Schristos	DPRINTF("Set empty EVENT_MASK for the child %d\n", child);
65341.1Skamil	event.pe_set_event = PTRACE_LWP_EXIT;
65351.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);
65361.1Skamil
65371.13Schristos	DPRINTF("Before resuming the child process where it left off and "
65381.1Skamil	    "without signal to be sent\n");
65391.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
65401.1Skamil
65411.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
65421.1Skamil	    "SIGTRAP\n", TWAIT_FNAME);
65431.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
65441.1Skamil
65451.1Skamil	validate_status_stopped(status, sigmasked);
65461.1Skamil
65471.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
65481.1Skamil
65491.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_LWP_EXIT);
65501.1Skamil
65511.1Skamil	lid = state.pe_lwp;
65521.13Schristos	DPRINTF("Reported PTRACE_LWP_EXIT event with lid %d\n", lid);
65531.1Skamil
65541.13Schristos	DPRINTF("Before resuming the child process where it left off and "
65551.1Skamil	    "without signal to be sent\n");
65561.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
65571.1Skamil
65581.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
65591.1Skamil	    TWAIT_FNAME);
65601.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
65611.1Skamil
65621.1Skamil	validate_status_exited(status, exitval);
65631.1Skamil
65641.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
65651.1Skamil	    TWAIT_FNAME);
65661.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
65671.1Skamil}
65681.1Skamil
65691.1Skamilstatic void
65701.1Skamillwp_main_stop(void *arg)
65711.1Skamil{
65721.1Skamil	the_lwp_id = _lwp_self();
65731.1Skamil
65741.1Skamil	raise(SIGTRAP);
65751.1Skamil
65761.1Skamil	_lwp_exit();
65771.1Skamil}
65781.1Skamil
65791.1SkamilATF_TC(suspend1);
65801.1SkamilATF_TC_HEAD(suspend1, tc)
65811.1Skamil{
65821.1Skamil	atf_tc_set_md_var(tc, "descr",
65831.1Skamil	    "Verify that a thread can be suspended by a debugger and later "
65841.1Skamil	    "resumed by a tracee");
65851.1Skamil}
65861.1Skamil
65871.1SkamilATF_TC_BODY(suspend1, tc)
65881.1Skamil{
65891.1Skamil	const int exitval = 5;
65901.1Skamil	const int sigval = SIGSTOP;
65911.1Skamil	pid_t child, wpid;
65921.1Skamil#if defined(TWAIT_HAVE_STATUS)
65931.1Skamil	int status;
65941.1Skamil#endif
65951.1Skamil	ucontext_t uc;
65961.1Skamil	lwpid_t lid;
65971.1Skamil	static const size_t ssize = 16*1024;
65981.1Skamil	void *stack;
65991.1Skamil	struct ptrace_lwpinfo pl;
66001.1Skamil	struct ptrace_siginfo psi;
66011.1Skamil	volatile int go = 0;
66021.1Skamil
66031.17Skamil	// Feature pending for refactoring
66041.17Skamil	atf_tc_expect_fail("PR kern/51995");
66051.17Skamil
66061.16Skamil	// Hangs with qemu
66071.16Skamil	ATF_REQUIRE(0 && "In order to get reliable failure, abort");
66081.16Skamil
66091.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
66101.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
66111.1Skamil	if (child == 0) {
66121.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
66131.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
66141.1Skamil
66151.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
66161.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
66171.1Skamil
66181.13Schristos		DPRINTF("Before allocating memory for stack in child\n");
66191.1Skamil		FORKEE_ASSERT((stack = malloc(ssize)) != NULL);
66201.1Skamil
66211.13Schristos		DPRINTF("Before making context for new lwp in child\n");
66221.1Skamil		_lwp_makecontext(&uc, lwp_main_stop, NULL, NULL, stack, ssize);
66231.1Skamil
66241.13Schristos		DPRINTF("Before creating new in child\n");
66251.1Skamil		FORKEE_ASSERT(_lwp_create(&uc, 0, &lid) == 0);
66261.1Skamil
66271.1Skamil		while (go == 0)
66281.1Skamil			continue;
66291.1Skamil
66301.1Skamil		raise(SIGINT);
66311.1Skamil
66321.1Skamil		FORKEE_ASSERT(_lwp_continue(lid) == 0);
66331.1Skamil
66341.13Schristos		DPRINTF("Before waiting for lwp %d to exit\n", lid);
66351.1Skamil		FORKEE_ASSERT(_lwp_wait(lid, NULL) == 0);
66361.1Skamil
66371.13Schristos		DPRINTF("Before verifying that reported %d and running lid %d "
66381.1Skamil		    "are the same\n", lid, the_lwp_id);
66391.1Skamil		FORKEE_ASSERT_EQ(lid, the_lwp_id);
66401.1Skamil
66411.13Schristos		DPRINTF("Before exiting of the child process\n");
66421.1Skamil		_exit(exitval);
66431.1Skamil	}
66441.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
66451.1Skamil
66461.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
66471.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
66481.1Skamil
66491.1Skamil	validate_status_stopped(status, sigval);
66501.1Skamil
66511.13Schristos	DPRINTF("Before resuming the child process where it left off and "
66521.1Skamil	    "without signal to be sent\n");
66531.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
66541.1Skamil
66551.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
66561.1Skamil	    "SIGTRAP\n", TWAIT_FNAME);
66571.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
66581.1Skamil
66591.1Skamil	validate_status_stopped(status, SIGTRAP);
66601.1Skamil
66611.13Schristos	DPRINTF("Before reading siginfo and lwpid_t\n");
66621.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &psi, sizeof(psi)) != -1);
66631.1Skamil
66641.13Schristos	DPRINTF("Before suspending LWP %d\n", psi.psi_lwpid);
66651.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SUSPEND, child, NULL, psi.psi_lwpid) != -1);
66661.1Skamil
66671.13Schristos        DPRINTF("Write new go to tracee (PID=%d) from tracer (PID=%d)\n",
66681.1Skamil	    child, getpid());
66691.13Schristos	SYSCALL_REQUIRE(ptrace(PT_WRITE_D, child, __UNVOLATILE(&go), 1) != -1);
66701.1Skamil
66711.13Schristos	DPRINTF("Before resuming the child process where it left off and "
66721.1Skamil	    "without signal to be sent\n");
66731.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
66741.1Skamil
66751.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
66761.1Skamil	    "SIGINT\n", TWAIT_FNAME);
66771.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
66781.1Skamil
66791.1Skamil	validate_status_stopped(status, SIGINT);
66801.1Skamil
66811.1Skamil	pl.pl_lwpid = 0;
66821.1Skamil
66831.13Schristos	SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &pl, sizeof(pl)) != -1);
66841.1Skamil	while (pl.pl_lwpid != 0) {
66851.1Skamil
66861.13Schristos		SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &pl, sizeof(pl)) != -1);
66871.1Skamil		switch (pl.pl_lwpid) {
66881.1Skamil		case 1:
66891.1Skamil			ATF_REQUIRE_EQ(pl.pl_event, PL_EVENT_SIGNAL);
66901.1Skamil			break;
66911.1Skamil		case 2:
66921.1Skamil			ATF_REQUIRE_EQ(pl.pl_event, PL_EVENT_SUSPENDED);
66931.1Skamil			break;
66941.1Skamil		}
66951.1Skamil	}
66961.1Skamil
66971.13Schristos	DPRINTF("Before resuming the child process where it left off and "
66981.1Skamil	    "without signal to be sent\n");
66991.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
67001.1Skamil
67011.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
67021.1Skamil	    TWAIT_FNAME);
67031.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
67041.1Skamil
67051.1Skamil	validate_status_exited(status, exitval);
67061.1Skamil
67071.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
67081.1Skamil	    TWAIT_FNAME);
67091.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
67101.1Skamil}
67111.1Skamil
67121.1SkamilATF_TC(suspend2);
67131.1SkamilATF_TC_HEAD(suspend2, tc)
67141.1Skamil{
67151.1Skamil	atf_tc_set_md_var(tc, "descr",
67161.1Skamil	    "Verify that the while the only thread within a process is "
67171.1Skamil	    "suspended, the whole process cannot be unstopped");
67181.1Skamil}
67191.1Skamil
67201.1SkamilATF_TC_BODY(suspend2, tc)
67211.1Skamil{
67221.1Skamil	const int exitval = 5;
67231.1Skamil	const int sigval = SIGSTOP;
67241.1Skamil	pid_t child, wpid;
67251.1Skamil#if defined(TWAIT_HAVE_STATUS)
67261.1Skamil	int status;
67271.1Skamil#endif
67281.1Skamil	struct ptrace_siginfo psi;
67291.1Skamil
67301.17Skamil	// Feature pending for refactoring
67311.17Skamil	atf_tc_expect_fail("PR kern/51995");
67321.17Skamil
67331.16Skamil	// Hangs with qemu
67341.16Skamil	ATF_REQUIRE(0 && "In order to get reliable failure, abort");
67351.16Skamil
67361.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
67371.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
67381.1Skamil	if (child == 0) {
67391.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
67401.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
67411.1Skamil
67421.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
67431.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
67441.1Skamil
67451.13Schristos		DPRINTF("Before exiting of the child process\n");
67461.1Skamil		_exit(exitval);
67471.1Skamil	}
67481.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
67491.1Skamil
67501.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
67511.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
67521.1Skamil
67531.1Skamil	validate_status_stopped(status, sigval);
67541.1Skamil
67551.13Schristos	DPRINTF("Before reading siginfo and lwpid_t\n");
67561.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &psi, sizeof(psi)) != -1);
67571.1Skamil
67581.13Schristos	DPRINTF("Before suspending LWP %d\n", psi.psi_lwpid);
67591.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SUSPEND, child, NULL, psi.psi_lwpid) != -1);
67601.1Skamil
67611.13Schristos	DPRINTF("Before resuming the child process where it left off and "
67621.1Skamil	    "without signal to be sent\n");
67631.1Skamil	ATF_REQUIRE_ERRNO(EDEADLK,
67641.1Skamil	    ptrace(PT_CONTINUE, child, (void *)1, 0) == -1);
67651.1Skamil
67661.13Schristos	DPRINTF("Before resuming LWP %d\n", psi.psi_lwpid);
67671.13Schristos	SYSCALL_REQUIRE(ptrace(PT_RESUME, child, NULL, psi.psi_lwpid) != -1);
67681.1Skamil
67691.13Schristos	DPRINTF("Before resuming the child process where it left off and "
67701.1Skamil	    "without signal to be sent\n");
67711.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
67721.1Skamil
67731.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
67741.1Skamil	    TWAIT_FNAME);
67751.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
67761.1Skamil
67771.1Skamil	validate_status_exited(status, exitval);
67781.1Skamil
67791.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
67801.1Skamil	    TWAIT_FNAME);
67811.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
67821.1Skamil}
67831.1Skamil
67841.1SkamilATF_TC(resume1);
67851.1SkamilATF_TC_HEAD(resume1, tc)
67861.1Skamil{
67871.1Skamil	atf_tc_set_md_var(tc, "timeout", "5");
67881.1Skamil	atf_tc_set_md_var(tc, "descr",
67891.1Skamil	    "Verify that a thread can be suspended by a debugger and later "
67901.1Skamil	    "resumed by the debugger");
67911.1Skamil}
67921.1Skamil
67931.1SkamilATF_TC_BODY(resume1, tc)
67941.1Skamil{
67951.1Skamil	struct msg_fds fds;
67961.1Skamil	const int exitval = 5;
67971.1Skamil	const int sigval = SIGSTOP;
67981.1Skamil	pid_t child, wpid;
67991.1Skamil	uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */
68001.1Skamil#if defined(TWAIT_HAVE_STATUS)
68011.1Skamil	int status;
68021.1Skamil#endif
68031.1Skamil	ucontext_t uc;
68041.1Skamil	lwpid_t lid;
68051.1Skamil	static const size_t ssize = 16*1024;
68061.1Skamil	void *stack;
68071.1Skamil	struct ptrace_lwpinfo pl;
68081.1Skamil	struct ptrace_siginfo psi;
68091.1Skamil
68101.17Skamil	// Feature pending for refactoring
68111.17Skamil	atf_tc_expect_fail("PR kern/51995");
68121.17Skamil
68131.15Schristos	// Hangs with qemu
68141.15Schristos	ATF_REQUIRE(0 && "In order to get reliable failure, abort");
68151.1Skamil
68161.13Schristos	SYSCALL_REQUIRE(msg_open(&fds) == 0);
68171.1Skamil
68181.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
68191.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
68201.1Skamil	if (child == 0) {
68211.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
68221.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
68231.1Skamil
68241.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
68251.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
68261.1Skamil
68271.13Schristos		DPRINTF("Before allocating memory for stack in child\n");
68281.1Skamil		FORKEE_ASSERT((stack = malloc(ssize)) != NULL);
68291.1Skamil
68301.13Schristos		DPRINTF("Before making context for new lwp in child\n");
68311.1Skamil		_lwp_makecontext(&uc, lwp_main_stop, NULL, NULL, stack, ssize);
68321.1Skamil
68331.13Schristos		DPRINTF("Before creating new in child\n");
68341.1Skamil		FORKEE_ASSERT(_lwp_create(&uc, 0, &lid) == 0);
68351.1Skamil
68361.1Skamil		CHILD_TO_PARENT("Message", fds, msg);
68371.1Skamil
68381.1Skamil		raise(SIGINT);
68391.1Skamil
68401.13Schristos		DPRINTF("Before waiting for lwp %d to exit\n", lid);
68411.1Skamil		FORKEE_ASSERT(_lwp_wait(lid, NULL) == 0);
68421.1Skamil
68431.13Schristos		DPRINTF("Before verifying that reported %d and running lid %d "
68441.1Skamil		    "are the same\n", lid, the_lwp_id);
68451.1Skamil		FORKEE_ASSERT_EQ(lid, the_lwp_id);
68461.1Skamil
68471.13Schristos		DPRINTF("Before exiting of the child process\n");
68481.1Skamil		_exit(exitval);
68491.1Skamil	}
68501.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
68511.1Skamil
68521.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
68531.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
68541.1Skamil
68551.1Skamil	validate_status_stopped(status, sigval);
68561.1Skamil
68571.13Schristos	DPRINTF("Before resuming the child process where it left off and "
68581.1Skamil	    "without signal to be sent\n");
68591.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
68601.1Skamil
68611.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
68621.1Skamil	    "SIGTRAP\n", TWAIT_FNAME);
68631.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
68641.1Skamil
68651.1Skamil	validate_status_stopped(status, SIGTRAP);
68661.1Skamil
68671.13Schristos	DPRINTF("Before reading siginfo and lwpid_t\n");
68681.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &psi, sizeof(psi)) != -1);
68691.1Skamil
68701.13Schristos	DPRINTF("Before suspending LWP %d\n", psi.psi_lwpid);
68711.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SUSPEND, child, NULL, psi.psi_lwpid) != -1);
68721.1Skamil
68731.1Skamil	PARENT_FROM_CHILD("Message", fds, msg);
68741.1Skamil
68751.13Schristos	DPRINTF("Before resuming the child process where it left off and "
68761.1Skamil	    "without signal to be sent\n");
68771.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
68781.1Skamil
68791.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
68801.1Skamil	    "SIGINT\n", TWAIT_FNAME);
68811.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
68821.1Skamil
68831.1Skamil	validate_status_stopped(status, SIGINT);
68841.1Skamil
68851.1Skamil	pl.pl_lwpid = 0;
68861.1Skamil
68871.13Schristos	SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &pl, sizeof(pl)) != -1);
68881.1Skamil	while (pl.pl_lwpid != 0) {
68891.13Schristos		SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &pl, sizeof(pl)) != -1);
68901.1Skamil		switch (pl.pl_lwpid) {
68911.1Skamil		case 1:
68921.1Skamil			ATF_REQUIRE_EQ(pl.pl_event, PL_EVENT_SIGNAL);
68931.1Skamil			break;
68941.1Skamil		case 2:
68951.1Skamil			ATF_REQUIRE_EQ(pl.pl_event, PL_EVENT_SUSPENDED);
68961.1Skamil			break;
68971.1Skamil		}
68981.1Skamil	}
68991.1Skamil
69001.13Schristos	DPRINTF("Before resuming LWP %d\n", psi.psi_lwpid);
69011.13Schristos	SYSCALL_REQUIRE(ptrace(PT_RESUME, child, NULL, psi.psi_lwpid) != -1);
69021.1Skamil
69031.13Schristos	DPRINTF("Before resuming the child process where it left off and "
69041.1Skamil	    "without signal to be sent\n");
69051.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
69061.1Skamil
69071.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
69081.1Skamil	    TWAIT_FNAME);
69091.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
69101.1Skamil
69111.1Skamil	validate_status_exited(status, exitval);
69121.1Skamil
69131.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
69141.1Skamil	    TWAIT_FNAME);
69151.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
69161.1Skamil
69171.1Skamil	msg_close(&fds);
69181.1Skamil
69191.13Schristos	DPRINTF("XXX: Test worked this time but for consistency timeout it\n");
69201.1Skamil	sleep(10);
69211.1Skamil}
69221.1Skamil
69231.1SkamilATF_TC(syscall1);
69241.1SkamilATF_TC_HEAD(syscall1, tc)
69251.1Skamil{
69261.1Skamil	atf_tc_set_md_var(tc, "descr",
69271.1Skamil	    "Verify that getpid(2) can be traced with PT_SYSCALL");
69281.1Skamil}
69291.1Skamil
69301.1SkamilATF_TC_BODY(syscall1, tc)
69311.1Skamil{
69321.1Skamil	const int exitval = 5;
69331.1Skamil	const int sigval = SIGSTOP;
69341.1Skamil	pid_t child, wpid;
69351.1Skamil#if defined(TWAIT_HAVE_STATUS)
69361.1Skamil	int status;
69371.1Skamil#endif
69381.1Skamil	struct ptrace_siginfo info;
69391.1Skamil	memset(&info, 0, sizeof(info));
69401.1Skamil
69411.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
69421.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
69431.1Skamil	if (child == 0) {
69441.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
69451.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
69461.1Skamil
69471.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
69481.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
69491.1Skamil
69501.1Skamil		syscall(SYS_getpid);
69511.1Skamil
69521.13Schristos		DPRINTF("Before exiting of the child process\n");
69531.1Skamil		_exit(exitval);
69541.1Skamil	}
69551.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
69561.1Skamil
69571.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
69581.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
69591.1Skamil
69601.1Skamil	validate_status_stopped(status, sigval);
69611.1Skamil
69621.13Schristos	DPRINTF("Before resuming the child process where it left off and "
69631.1Skamil	    "without signal to be sent\n");
69641.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SYSCALL, child, (void *)1, 0) != -1);
69651.1Skamil
69661.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
69671.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
69681.1Skamil
69691.1Skamil	validate_status_stopped(status, SIGTRAP);
69701.1Skamil
69711.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
69721.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
69731.1Skamil
69741.38Skamil	DPRINTF("Before checking siginfo_t and lwpid\n");
69751.38Skamil	ATF_REQUIRE_EQ(info.psi_lwpid, 1);
69761.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, SIGTRAP);
69771.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_SCE);
69781.1Skamil
69791.13Schristos	DPRINTF("Before resuming the child process where it left off and "
69801.1Skamil	    "without signal to be sent\n");
69811.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SYSCALL, child, (void *)1, 0) != -1);
69821.1Skamil
69831.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
69841.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
69851.1Skamil
69861.1Skamil	validate_status_stopped(status, SIGTRAP);
69871.1Skamil
69881.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
69891.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
69901.1Skamil
69911.38Skamil	DPRINTF("Before checking siginfo_t and lwpid\n");
69921.38Skamil	ATF_REQUIRE_EQ(info.psi_lwpid, 1);
69931.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, SIGTRAP);
69941.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_SCX);
69951.1Skamil
69961.13Schristos	DPRINTF("Before resuming the child process where it left off and "
69971.1Skamil	    "without signal to be sent\n");
69981.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
69991.1Skamil
70001.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
70011.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
70021.1Skamil
70031.1Skamil	validate_status_exited(status, exitval);
70041.1Skamil
70051.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
70061.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
70071.1Skamil}
70081.1Skamil
70091.1SkamilATF_TC(syscallemu1);
70101.1SkamilATF_TC_HEAD(syscallemu1, tc)
70111.1Skamil{
70121.1Skamil	atf_tc_set_md_var(tc, "descr",
70131.1Skamil	    "Verify that exit(2) can be intercepted with PT_SYSCALLEMU");
70141.1Skamil}
70151.1Skamil
70161.1SkamilATF_TC_BODY(syscallemu1, tc)
70171.1Skamil{
70181.1Skamil	const int exitval = 5;
70191.1Skamil	const int sigval = SIGSTOP;
70201.1Skamil	pid_t child, wpid;
70211.1Skamil#if defined(TWAIT_HAVE_STATUS)
70221.1Skamil	int status;
70231.1Skamil#endif
70241.1Skamil
70251.6Skamil#if defined(__sparc__) && !defined(__sparc64__)
70261.6Skamil	/* syscallemu does not work on sparc (32-bit) */
70271.6Skamil	atf_tc_expect_fail("PR kern/52166");
70281.6Skamil#endif
70291.6Skamil
70301.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
70311.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
70321.1Skamil	if (child == 0) {
70331.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
70341.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
70351.1Skamil
70361.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
70371.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
70381.1Skamil
70391.1Skamil		syscall(SYS_exit, 100);
70401.1Skamil
70411.13Schristos		DPRINTF("Before exiting of the child process\n");
70421.1Skamil		_exit(exitval);
70431.1Skamil	}
70441.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
70451.1Skamil
70461.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
70471.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
70481.1Skamil
70491.1Skamil	validate_status_stopped(status, sigval);
70501.1Skamil
70511.13Schristos	DPRINTF("Before resuming the child process where it left off and "
70521.1Skamil	    "without signal to be sent\n");
70531.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SYSCALL, child, (void *)1, 0) != -1);
70541.1Skamil
70551.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
70561.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
70571.1Skamil
70581.1Skamil	validate_status_stopped(status, SIGTRAP);
70591.1Skamil
70601.13Schristos	DPRINTF("Set SYSCALLEMU for intercepted syscall\n");
70611.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SYSCALLEMU, child, (void *)1, 0) != -1);
70621.1Skamil
70631.13Schristos	DPRINTF("Before resuming the child process where it left off and "
70641.1Skamil	    "without signal to be sent\n");
70651.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SYSCALL, child, (void *)1, 0) != -1);
70661.1Skamil
70671.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
70681.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
70691.1Skamil
70701.1Skamil	validate_status_stopped(status, SIGTRAP);
70711.1Skamil
70721.13Schristos	DPRINTF("Before resuming the child process where it left off and "
70731.1Skamil	    "without signal to be sent\n");
70741.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
70751.1Skamil
70761.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
70771.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
70781.1Skamil
70791.1Skamil	validate_status_exited(status, exitval);
70801.1Skamil
70811.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
70821.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
70831.1Skamil}
70841.1Skamil
70851.1Skamil#include "t_ptrace_amd64_wait.h"
70861.1Skamil#include "t_ptrace_i386_wait.h"
70871.1Skamil#include "t_ptrace_x86_wait.h"
70881.1Skamil
70891.1SkamilATF_TP_ADD_TCS(tp)
70901.1Skamil{
70911.1Skamil	setvbuf(stdout, NULL, _IONBF, 0);
70921.1Skamil	setvbuf(stderr, NULL, _IONBF, 0);
70931.33Skamil
70941.36Skamil	ATF_TP_ADD_TC(tp, traceme_raise1);
70951.33Skamil	ATF_TP_ADD_TC(tp, traceme_raise2);
70961.33Skamil	ATF_TP_ADD_TC(tp, traceme_raise3);
70971.33Skamil	ATF_TP_ADD_TC(tp, traceme_raise4);
70981.33Skamil	ATF_TP_ADD_TC(tp, traceme_raise5);
70991.33Skamil
71001.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_handle1);
71011.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_handle2);
71021.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_handle3);
71031.50Skamil
71041.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_masked1);
71051.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_masked2);
71061.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_masked3);
71071.50Skamil
71081.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_ignored1);
71091.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_ignored2);
71101.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_ignored3);
71111.50Skamil
71121.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_simple1);
71131.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_simple2);
71141.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_simple3);
71151.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_simple4);
71161.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_simple5);
71171.1Skamil
71181.37Skamil	ATF_TP_ADD_TC(tp, traceme_pid1_parent);
71191.37Skamil
71201.40Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_raise1);
71211.46Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_raise2);
71221.40Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_raise3);
71231.40Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_raise4);
71241.40Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_raise5);
71251.47Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_raise6);
71261.47Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_raise7);
71271.47Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_raise8);
71281.40Skamil
71291.52Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_crash_trap);
71301.52Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_crash_segv);
71311.52Skamil//	ATF_TP_ADD_TC(tp, traceme_vfork_crash_ill);
71321.52Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_crash_fpe);
71331.52Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_crash_bus);
71341.41Skamil
71351.43Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_exec);
71361.43Skamil
71371.51Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, tracer_sees_terminaton_before_the_parent);
71381.51Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, tracer_sysctl_lookup_without_duplicates);
71391.51Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_sees_terminaton_before_the_parent);
71401.51Skamil
71411.51Skamil	ATF_TP_ADD_TC(tp, parent_attach_to_its_child);
71421.51Skamil
71431.51Skamil	ATF_TP_ADD_TC(tp, child_attach_to_its_parent);
71441.51Skamil
71451.51Skamil	ATF_TP_ADD_TC_HAVE_PID(tp,
71461.51Skamil		tracee_sees_its_original_parent_getppid);
71471.51Skamil	ATF_TP_ADD_TC_HAVE_PID(tp,
71481.51Skamil		tracee_sees_its_original_parent_sysctl_kinfo_proc2);
71491.51Skamil	ATF_TP_ADD_TC_HAVE_PID(tp,
71501.51Skamil		tracee_sees_its_original_parent_procfs_status);
71511.1Skamil
71521.1Skamil	ATF_TP_ADD_TC(tp, eventmask1);
71531.1Skamil	ATF_TP_ADD_TC(tp, eventmask2);
71541.1Skamil	ATF_TP_ADD_TC(tp, eventmask3);
71551.1Skamil	ATF_TP_ADD_TC(tp, eventmask4);
71561.1Skamil	ATF_TP_ADD_TC(tp, eventmask5);
71571.1Skamil	ATF_TP_ADD_TC(tp, eventmask6);
71581.1Skamil
71591.31Skamil	ATF_TP_ADD_TC(tp, fork1);
71601.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, fork2);
71611.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, fork3);
71621.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, fork4);
71631.31Skamil	ATF_TP_ADD_TC(tp, fork5);
71641.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, fork6);
71651.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, fork7);
71661.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, fork8);
71671.31Skamil
71681.31Skamil	ATF_TP_ADD_TC(tp, vfork1);
71691.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, vfork2);
71701.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, vfork3);
71711.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, vfork4);
71721.31Skamil	ATF_TP_ADD_TC(tp, vfork5);
71731.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, vfork6);
71741.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, vfork7);
71751.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, vfork8);
71761.1Skamil
71771.1Skamil	ATF_TP_ADD_TC(tp, io_read_d1);
71781.1Skamil	ATF_TP_ADD_TC(tp, io_read_d2);
71791.1Skamil	ATF_TP_ADD_TC(tp, io_read_d3);
71801.1Skamil	ATF_TP_ADD_TC(tp, io_read_d4);
71811.1Skamil
71821.1Skamil	ATF_TP_ADD_TC(tp, io_write_d1);
71831.1Skamil	ATF_TP_ADD_TC(tp, io_write_d2);
71841.1Skamil	ATF_TP_ADD_TC(tp, io_write_d3);
71851.1Skamil	ATF_TP_ADD_TC(tp, io_write_d4);
71861.1Skamil
71871.1Skamil	ATF_TP_ADD_TC(tp, read_d1);
71881.1Skamil	ATF_TP_ADD_TC(tp, read_d2);
71891.1Skamil	ATF_TP_ADD_TC(tp, read_d3);
71901.1Skamil	ATF_TP_ADD_TC(tp, read_d4);
71911.1Skamil
71921.1Skamil	ATF_TP_ADD_TC(tp, write_d1);
71931.1Skamil	ATF_TP_ADD_TC(tp, write_d2);
71941.1Skamil	ATF_TP_ADD_TC(tp, write_d3);
71951.1Skamil	ATF_TP_ADD_TC(tp, write_d4);
71961.1Skamil
71971.1Skamil	ATF_TP_ADD_TC(tp, io_read_d_write_d_handshake1);
71981.1Skamil	ATF_TP_ADD_TC(tp, io_read_d_write_d_handshake2);
71991.1Skamil
72001.1Skamil	ATF_TP_ADD_TC(tp, read_d_write_d_handshake1);
72011.1Skamil	ATF_TP_ADD_TC(tp, read_d_write_d_handshake2);
72021.1Skamil
72031.1Skamil	ATF_TP_ADD_TC(tp, io_read_i1);
72041.1Skamil	ATF_TP_ADD_TC(tp, io_read_i2);
72051.1Skamil	ATF_TP_ADD_TC(tp, io_read_i3);
72061.1Skamil	ATF_TP_ADD_TC(tp, io_read_i4);
72071.1Skamil
72081.1Skamil	ATF_TP_ADD_TC(tp, read_i1);
72091.1Skamil	ATF_TP_ADD_TC(tp, read_i2);
72101.1Skamil	ATF_TP_ADD_TC(tp, read_i3);
72111.1Skamil	ATF_TP_ADD_TC(tp, read_i4);
72121.1Skamil
72131.1Skamil	ATF_TP_ADD_TC(tp, io_read_auxv1);
72141.1Skamil
72151.1Skamil	ATF_TP_ADD_TC_HAVE_GPREGS(tp, regs1);
72161.1Skamil	ATF_TP_ADD_TC_HAVE_GPREGS(tp, regs2);
72171.1Skamil	ATF_TP_ADD_TC_HAVE_GPREGS(tp, regs3);
72181.1Skamil	ATF_TP_ADD_TC_HAVE_GPREGS(tp, regs4);
72191.1Skamil	ATF_TP_ADD_TC_HAVE_GPREGS(tp, regs5);
72201.1Skamil
72211.1Skamil	ATF_TP_ADD_TC_HAVE_FPREGS(tp, fpregs1);
72221.1Skamil	ATF_TP_ADD_TC_HAVE_FPREGS(tp, fpregs2);
72231.1Skamil
72241.1Skamil	ATF_TP_ADD_TC_PT_STEP(tp, step1);
72251.1Skamil	ATF_TP_ADD_TC_PT_STEP(tp, step2);
72261.1Skamil	ATF_TP_ADD_TC_PT_STEP(tp, step3);
72271.1Skamil	ATF_TP_ADD_TC_PT_STEP(tp, step4);
72281.1Skamil
72291.2Skamil	ATF_TP_ADD_TC_PT_STEP(tp, setstep1);
72301.2Skamil	ATF_TP_ADD_TC_PT_STEP(tp, setstep2);
72311.2Skamil	ATF_TP_ADD_TC_PT_STEP(tp, setstep3);
72321.2Skamil	ATF_TP_ADD_TC_PT_STEP(tp, setstep4);
72331.2Skamil
72341.1Skamil	ATF_TP_ADD_TC(tp, kill1);
72351.1Skamil	ATF_TP_ADD_TC(tp, kill2);
72361.1Skamil
72371.1Skamil	ATF_TP_ADD_TC(tp, lwpinfo1);
72381.1Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, lwpinfo2);
72391.1Skamil
72401.1Skamil	ATF_TP_ADD_TC(tp, siginfo1);
72411.1Skamil	ATF_TP_ADD_TC(tp, siginfo2);
72421.1Skamil	ATF_TP_ADD_TC(tp, siginfo3);
72431.1Skamil	ATF_TP_ADD_TC(tp, siginfo4);
72441.1Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, siginfo5);
72451.1Skamil	ATF_TP_ADD_TC_PT_STEP(tp, siginfo6);
72461.1Skamil
72471.1Skamil	ATF_TP_ADD_TC(tp, lwp_create1);
72481.1Skamil
72491.1Skamil	ATF_TP_ADD_TC(tp, lwp_exit1);
72501.1Skamil
72511.1Skamil	ATF_TP_ADD_TC(tp, signal1);
72521.1Skamil	ATF_TP_ADD_TC(tp, signal2);
72531.1Skamil	ATF_TP_ADD_TC(tp, signal3);
72541.1Skamil	ATF_TP_ADD_TC_PT_STEP(tp, signal4);
72551.1Skamil	ATF_TP_ADD_TC(tp, signal5);
72561.1Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, signal6);
72571.1Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, signal7);
72581.1Skamil	ATF_TP_ADD_TC(tp, signal8);
72591.1Skamil	ATF_TP_ADD_TC(tp, signal9);
72601.1Skamil	ATF_TP_ADD_TC(tp, signal10);
72611.1Skamil
72621.1Skamil	ATF_TP_ADD_TC(tp, suspend1);
72631.1Skamil	ATF_TP_ADD_TC(tp, suspend2);
72641.1Skamil
72651.1Skamil	ATF_TP_ADD_TC(tp, resume1);
72661.1Skamil
72671.1Skamil	ATF_TP_ADD_TC(tp, syscall1);
72681.1Skamil
72691.1Skamil	ATF_TP_ADD_TC(tp, syscallemu1);
72701.1Skamil
72711.1Skamil	ATF_TP_ADD_TCS_PTRACE_WAIT_AMD64();
72721.1Skamil	ATF_TP_ADD_TCS_PTRACE_WAIT_I386();
72731.1Skamil	ATF_TP_ADD_TCS_PTRACE_WAIT_X86();
72741.1Skamil
72751.1Skamil	return atf_no_error();
72761.1Skamil}
7277