t_ptrace_wait.c revision 1.55
11.55Schristos/*	$NetBSD: t_ptrace_wait.c,v 1.55 2018/05/27 00:36:56 christos 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.55Schristos__RCSID("$NetBSD: t_ptrace_wait.c,v 1.55 2018/05/27 00:36:56 christos 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.53Skamilstatic void
13831.53Skamileventmask_preserved(int event)
13841.1Skamil{
13851.1Skamil	const int exitval = 5;
13861.1Skamil	const int sigval = SIGSTOP;
13871.1Skamil	pid_t child, wpid;
13881.1Skamil#if defined(TWAIT_HAVE_STATUS)
13891.1Skamil	int status;
13901.1Skamil#endif
13911.1Skamil	ptrace_event_t set_event, get_event;
13921.1Skamil	const int len = sizeof(ptrace_event_t);
13931.1Skamil
13941.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
13951.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
13961.1Skamil	if (child == 0) {
13971.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
13981.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
13991.1Skamil
14001.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
14011.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
14021.1Skamil
14031.13Schristos		DPRINTF("Before exiting of the child process\n");
14041.1Skamil		_exit(exitval);
14051.1Skamil	}
14061.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
14071.1Skamil
14081.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
14091.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
14101.1Skamil
14111.1Skamil	validate_status_stopped(status, sigval);
14121.1Skamil
14131.53Skamil	set_event.pe_set_event = event;
14141.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &set_event, len) != -1);
14151.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_EVENT_MASK, child, &get_event, len) != -1);
14161.1Skamil	ATF_REQUIRE(memcmp(&set_event, &get_event, len) == 0);
14171.1Skamil
14181.13Schristos	DPRINTF("Before resuming the child process where it left off and "
14191.1Skamil	    "without signal to be sent\n");
14201.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
14211.1Skamil
14221.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
14231.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
14241.1Skamil
14251.1Skamil	validate_status_exited(status, exitval);
14261.1Skamil
14271.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
14281.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
14291.1Skamil}
14301.1Skamil
14311.53Skamil#define EVENTMASK_PRESERVED(test, event)					\
14321.53SkamilATF_TC(test);									\
14331.53SkamilATF_TC_HEAD(test, tc)								\
14341.53Skamil{										\
14351.53Skamil	atf_tc_set_md_var(tc, "descr",						\
14361.53Skamil	    "Verify that eventmask " #event " is preserved");			\
14371.53Skamil}										\
14381.53Skamil										\
14391.53SkamilATF_TC_BODY(test, tc)								\
14401.53Skamil{										\
14411.53Skamil										\
14421.53Skamil	eventmask_preserved(event);						\
14431.1Skamil}
14441.1Skamil
14451.53SkamilEVENTMASK_PRESERVED(eventmask_preserved_empty, 0)
14461.53SkamilEVENTMASK_PRESERVED(eventmask_preserved_fork, PTRACE_FORK)
14471.53SkamilEVENTMASK_PRESERVED(eventmask_preserved_vfork, PTRACE_VFORK)
14481.53SkamilEVENTMASK_PRESERVED(eventmask_preserved_vfork_done, PTRACE_VFORK_DONE)
14491.53SkamilEVENTMASK_PRESERVED(eventmask_preserved_lwp_create, PTRACE_LWP_CREATE)
14501.53SkamilEVENTMASK_PRESERVED(eventmask_preserved_lwp_exit, PTRACE_LWP_EXIT)
14511.1Skamil
14521.53Skamil/// ----------------------------------------------------------------------------
14531.1Skamil
14541.28Skamilstatic void
14551.32Skamilfork_body(pid_t (*fn)(void), bool trackfork, bool trackvfork,
14561.32Skamil          bool trackvforkdone, bool detachchild, bool detachparent)
14571.1Skamil{
14581.1Skamil	const int exitval = 5;
14591.1Skamil	const int exitval2 = 15;
14601.1Skamil	const int sigval = SIGSTOP;
14611.31Skamil	pid_t child, child2 = 0, wpid;
14621.1Skamil#if defined(TWAIT_HAVE_STATUS)
14631.1Skamil	int status;
14641.1Skamil#endif
14651.1Skamil	ptrace_state_t state;
14661.1Skamil	const int slen = sizeof(state);
14671.1Skamil	ptrace_event_t event;
14681.1Skamil	const int elen = sizeof(event);
14691.1Skamil
14701.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
14711.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
14721.1Skamil	if (child == 0) {
14731.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
14741.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
14751.1Skamil
14761.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
14771.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
14781.1Skamil
14791.30Skamil		FORKEE_ASSERT((child2 = (fn)()) != -1);
14801.1Skamil
14811.1Skamil		if (child2 == 0)
14821.1Skamil			_exit(exitval2);
14831.1Skamil
14841.1Skamil		FORKEE_REQUIRE_SUCCESS
14851.1Skamil		    (wpid = TWAIT_GENERIC(child2, &status, 0), child2);
14861.1Skamil
14871.1Skamil		forkee_status_exited(status, exitval2);
14881.1Skamil
14891.13Schristos		DPRINTF("Before exiting of the child process\n");
14901.1Skamil		_exit(exitval);
14911.1Skamil	}
14921.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
14931.1Skamil
14941.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
14951.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
14961.1Skamil
14971.1Skamil	validate_status_stopped(status, sigval);
14981.1Skamil
14991.30Skamil	DPRINTF("Set 0%s%s%s in EVENT_MASK for the child %d\n",
15001.30Skamil	        trackfork ? "|PTRACE_FORK" : "",
15011.30Skamil	        trackvfork ? "|PTRACE_VFORK" : "",
15021.30Skamil	        trackvforkdone ? "|PTRACE_VFORK_DONE" : "", child);
15031.30Skamil	event.pe_set_event = 0;
15041.30Skamil	if (trackfork)
15051.30Skamil		event.pe_set_event |= PTRACE_FORK;
15061.30Skamil	if (trackvfork)
15071.30Skamil		event.pe_set_event |= PTRACE_VFORK;
15081.30Skamil	if (trackvforkdone)
15091.30Skamil		event.pe_set_event |= PTRACE_VFORK_DONE;
15101.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);
15111.1Skamil
15121.13Schristos	DPRINTF("Before resuming the child process where it left off and "
15131.1Skamil	    "without signal to be sent\n");
15141.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
15151.1Skamil
15161.29Skamil#if defined(TWAIT_HAVE_PID)
15171.31Skamil	if ((trackfork && fn == fork) || (trackvfork && fn == vfork)) {
15181.29Skamil		DPRINTF("Before calling %s() for the child %d\n", TWAIT_FNAME,
15191.29Skamil		        child);
15201.29Skamil		TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0),
15211.29Skamil		                      child);
15221.1Skamil
15231.29Skamil		validate_status_stopped(status, SIGTRAP);
15241.1Skamil
15251.29Skamil		SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state,
15261.29Skamil		                       slen) != -1);
15271.31Skamil		if (trackfork && fn == fork) {
15281.30Skamil			ATF_REQUIRE_EQ(state.pe_report_event & PTRACE_FORK,
15291.30Skamil			       PTRACE_FORK);
15301.30Skamil		}
15311.31Skamil		if (trackvfork && fn == vfork) {
15321.30Skamil			ATF_REQUIRE_EQ(state.pe_report_event & PTRACE_VFORK,
15331.30Skamil			       PTRACE_VFORK);
15341.30Skamil		}
15351.29Skamil
15361.29Skamil		child2 = state.pe_other_pid;
15371.30Skamil		DPRINTF("Reported ptrace event with forkee %d\n", child2);
15381.29Skamil
15391.29Skamil		DPRINTF("Before calling %s() for the forkee %d of the child "
15401.29Skamil		        "%d\n", TWAIT_FNAME, child2, child);
15411.29Skamil		TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0),
15421.29Skamil		    child2);
15431.1Skamil
15441.29Skamil		validate_status_stopped(status, SIGTRAP);
15451.1Skamil
15461.29Skamil		SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child2, &state,
15471.29Skamil		                       slen) != -1);
15481.31Skamil		if (trackfork && fn == fork) {
15491.30Skamil			ATF_REQUIRE_EQ(state.pe_report_event & PTRACE_FORK,
15501.30Skamil			       PTRACE_FORK);
15511.30Skamil		}
15521.31Skamil		if (trackvfork && fn == vfork) {
15531.30Skamil			ATF_REQUIRE_EQ(state.pe_report_event & PTRACE_VFORK,
15541.30Skamil			       PTRACE_VFORK);
15551.30Skamil		}
15561.30Skamil
15571.29Skamil		ATF_REQUIRE_EQ(state.pe_other_pid, child);
15581.29Skamil
15591.29Skamil		DPRINTF("Before resuming the forkee process where it left off "
15601.29Skamil		    "and without signal to be sent\n");
15611.29Skamil		SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child2, (void *)1, 0)
15621.29Skamil		                != -1);
15631.29Skamil
15641.29Skamil		DPRINTF("Before resuming the child process where it left off "
15651.29Skamil		        "and without signal to be sent\n");
15661.29Skamil		SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
15671.30Skamil	}
15681.30Skamil#endif
15691.30Skamil
15701.31Skamil	if (trackvforkdone && fn == vfork) {
15711.30Skamil		DPRINTF("Before calling %s() for the child %d\n", TWAIT_FNAME,
15721.30Skamil		        child);
15731.30Skamil		TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0),
15741.30Skamil		                      child);
15751.30Skamil
15761.30Skamil		validate_status_stopped(status, SIGTRAP);
15771.30Skamil
15781.30Skamil		SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state,
15791.30Skamil		                       slen) != -1);
15801.30Skamil		ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_VFORK_DONE);
15811.30Skamil
15821.30Skamil		child2 = state.pe_other_pid;
15831.30Skamil		DPRINTF("Reported PTRACE_VFORK_DONE event with forkee %d\n",
15841.30Skamil		        child2);
15851.30Skamil
15861.30Skamil		DPRINTF("Before resuming the child process where it left off "
15871.30Skamil		        "and without signal to be sent\n");
15881.30Skamil		SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
15891.30Skamil	}
15901.29Skamil
15911.30Skamil#if defined(TWAIT_HAVE_PID)
15921.31Skamil	if ((trackfork && fn == fork) || (trackvfork && fn == vfork)) {
15931.29Skamil		DPRINTF("Before calling %s() for the forkee - expected exited"
15941.29Skamil		        "\n", TWAIT_FNAME);
15951.29Skamil		TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0),
15961.29Skamil		    child2);
15971.29Skamil
15981.29Skamil		validate_status_exited(status, exitval2);
15991.29Skamil
16001.29Skamil		DPRINTF("Before calling %s() for the forkee - expected no "
16011.29Skamil		        "process\n", TWAIT_FNAME);
16021.29Skamil		TWAIT_REQUIRE_FAILURE(ECHILD,
16031.29Skamil		    wpid = TWAIT_GENERIC(child2, &status, 0));
16041.29Skamil	}
16051.29Skamil#endif
16061.1Skamil
16071.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
16081.1Skamil	    "SIGCHLD\n", TWAIT_FNAME);
16091.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
16101.1Skamil
16111.1Skamil	validate_status_stopped(status, SIGCHLD);
16121.1Skamil
16131.13Schristos	DPRINTF("Before resuming the child process where it left off and "
16141.1Skamil	    "without signal to be sent\n");
16151.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
16161.1Skamil
16171.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
16181.1Skamil	    TWAIT_FNAME);
16191.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
16201.1Skamil
16211.1Skamil	validate_status_exited(status, exitval);
16221.1Skamil
16231.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
16241.1Skamil	    TWAIT_FNAME);
16251.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
16261.1Skamil}
16271.28Skamil
16281.32Skamil#define FORK_TEST(name,descr,fun,tfork,tvfork,tvforkdone,detchild,detparent)	\
16291.32SkamilATF_TC(name);									\
16301.32SkamilATF_TC_HEAD(name, tc)								\
16311.32Skamil{										\
16321.32Skamil	atf_tc_set_md_var(tc, "descr", descr);					\
16331.32Skamil}										\
16341.32Skamil										\
16351.32SkamilATF_TC_BODY(name, tc)								\
16361.32Skamil{										\
16371.32Skamil										\
16381.32Skamil	fork_body(fun, tfork, tvfork, tvforkdone, detchild, detparent);		\
16391.32Skamil}
16401.32Skamil
16411.32Skamil#define F false
16421.32Skamil#define T true
16431.32Skamil
16441.32Skamil#define F_IF__0(x)
16451.32Skamil#define F_IF__1(x) x
16461.32Skamil#define F_IF__(x,y) F_IF__ ## x (y)
16471.32Skamil#define F_IF_(x,y) F_IF__(x,y)
16481.32Skamil#define F_IF(x,y) F_IF_(x,y)
16491.32Skamil
16501.32Skamil#define DSCR(function,forkbit,vforkbit,vforkdonebit,dchildbit,dparentbit)	\
16511.32Skamil        "Verify " #function "(2) called with 0"					\
16521.32Skamil        F_IF(forkbit,"|PTRACE_FORK")						\
16531.32Skamil        F_IF(vforkbit,"|PTRACE_VFORK")						\
16541.32Skamil        F_IF(vforkdonebit,"|PTRACE_VFORK_DONE")					\
16551.32Skamil        " in EVENT_MASK."							\
16561.32Skamil        F_IF(dchildbit," Detach child in this test.")				\
16571.32Skamil        F_IF(dparentbit," Detach parent in this test.")
16581.1Skamil
16591.32SkamilFORK_TEST(fork1, DSCR(fork,0,0,0,0,0), fork, F, F, F, F, F)
16601.31Skamil#if defined(TWAIT_HAVE_PID)
16611.32SkamilFORK_TEST(fork2, DSCR(fork,1,0,0,0,0), fork, T, F, F, F, F)
16621.32SkamilFORK_TEST(fork3, DSCR(fork,0,1,0,0,0), fork, F, T, F, F, F)
16631.32SkamilFORK_TEST(fork4, DSCR(fork,1,1,0,0,0), fork, T, T, F, F, F)
16641.31Skamil#endif
16651.32SkamilFORK_TEST(fork5, DSCR(fork,0,0,1,0,0), fork, F, F, T, F, F)
16661.31Skamil#if defined(TWAIT_HAVE_PID)
16671.32SkamilFORK_TEST(fork6, DSCR(fork,1,0,1,0,0), fork, T, F, T, F, F)
16681.32SkamilFORK_TEST(fork7, DSCR(fork,0,1,1,0,0), fork, F, T, T, F, F)
16691.32SkamilFORK_TEST(fork8, DSCR(fork,1,1,1,0,0), fork, T, T, T, F, F)
16701.31Skamil#endif
16711.1Skamil
16721.32SkamilFORK_TEST(vfork1, DSCR(vfork,0,0,0,0,0), vfork, F, F, F, F, F)
16731.31Skamil#if defined(TWAIT_HAVE_PID)
16741.32SkamilFORK_TEST(vfork2, DSCR(vfork,1,0,0,0,0), vfork, T, F, F, F, F)
16751.32SkamilFORK_TEST(vfork3, DSCR(vfork,0,1,0,0,0), vfork, F, T, F, F, F)
16761.32SkamilFORK_TEST(vfork4, DSCR(vfork,1,1,0,0,0), vfork, T, T, F, F, F)
16771.31Skamil#endif
16781.32SkamilFORK_TEST(vfork5, DSCR(vfork,0,0,1,0,0), vfork, F, F, T, F, F)
16791.31Skamil#if defined(TWAIT_HAVE_PID)
16801.32SkamilFORK_TEST(vfork6, DSCR(vfork,1,0,1,0,0), vfork, T, F, T, F, F)
16811.32SkamilFORK_TEST(vfork7, DSCR(vfork,0,1,1,0,0), vfork, F, T, T, F, F)
16821.32SkamilFORK_TEST(vfork8, DSCR(vfork,1,1,1,0,0), vfork, T, T, T, F, F)
16831.31Skamil#endif
16841.31Skamil
16851.54Skamil/// ----------------------------------------------------------------------------
16861.31Skamil
16871.54Skamilenum bytes_transfer_type {
16881.54Skamil	BYTES_TRANSFER_DATA,
16891.54Skamil	BYTES_TRANSFER_DATAIO,
16901.54Skamil	BYTES_TRANSFER_TEXT,
16911.54Skamil	BYTES_TRANSFER_TEXTIO,
16921.54Skamil	BYTES_TRANSFER_AUXV
16931.54Skamil};
16941.31Skamil
16951.54Skamilstatic int __used
16961.54Skamilbytes_transfer_dummy(int a, int b, int c, int d)
16971.54Skamil{
16981.54Skamil	int e, f, g, h;
16991.1Skamil
17001.54Skamil	a *= 4;
17011.54Skamil	b += 3;
17021.54Skamil	c -= 2;
17031.54Skamil	d /= 1;
17041.1Skamil
17051.54Skamil	e = strtol("10", NULL, 10);
17061.54Skamil	f = strtol("20", NULL, 10);
17071.54Skamil	g = strtol("30", NULL, 10);
17081.54Skamil	h = strtol("40", NULL, 10);
17091.1Skamil
17101.54Skamil	return (a + b * c - d) + (e * f - g / h);
17111.1Skamil}
17121.1Skamil
17131.54Skamilstatic void
17141.55Schristosbytes_transfer(int operation, size_t size, enum bytes_transfer_type type)
17151.1Skamil{
17161.1Skamil	const int exitval = 5;
17171.1Skamil	const int sigval = SIGSTOP;
17181.1Skamil	pid_t child, wpid;
17191.54Skamil	bool skip = false;
17201.1Skamil
17211.54Skamil	int lookup_me = 0;
17221.54Skamil	uint8_t lookup_me8 = 0;
17231.54Skamil	uint16_t lookup_me16 = 0;
17241.54Skamil	uint32_t lookup_me32 = 0;
17251.54Skamil	uint64_t lookup_me64 = 0;
17261.1Skamil
17271.54Skamil	int magic = 0x13579246;
17281.54Skamil	uint8_t magic8 = 0xab;
17291.54Skamil	uint16_t magic16 = 0x1234;
17301.54Skamil	uint32_t magic32 = 0x98765432;
17311.54Skamil	uint64_t magic64 = 0xabcdef0123456789;
17321.1Skamil
17331.54Skamil	struct ptrace_io_desc io;
17341.1Skamil#if defined(TWAIT_HAVE_STATUS)
17351.1Skamil	int status;
17361.1Skamil#endif
17371.55Schristos	AuxInfo ai[64], *aip;
17381.55Schristos
17391.55Schristos	ATF_REQUIRE(size < sizeof(ai));
17401.1Skamil
17411.54Skamil	/* Prepare variables for .TEXT transfers */
17421.54Skamil	switch (type) {
17431.54Skamil	case BYTES_TRANSFER_TEXT:
17441.54Skamil		memcpy(&magic, bytes_transfer_dummy, sizeof(magic));
17451.54Skamil		break;
17461.54Skamil	case BYTES_TRANSFER_TEXTIO:
17471.54Skamil		switch (size) {
17481.54Skamil		case 8:
17491.54Skamil			memcpy(&magic8, bytes_transfer_dummy, sizeof(magic8));
17501.54Skamil			break;
17511.54Skamil		case 16:
17521.54Skamil			memcpy(&magic16, bytes_transfer_dummy, sizeof(magic16));
17531.54Skamil			break;
17541.54Skamil		case 32:
17551.54Skamil			memcpy(&magic32, bytes_transfer_dummy, sizeof(magic32));
17561.54Skamil			break;
17571.54Skamil		case 64:
17581.54Skamil			memcpy(&magic64, bytes_transfer_dummy, sizeof(magic64));
17591.54Skamil			break;
17601.54Skamil		}
17611.54Skamil		break;
17621.54Skamil	default:
17631.54Skamil		break;
17641.54Skamil	}
17651.1Skamil
17661.54Skamil	/* Prepare variables for PIOD and AUXV transfers */
17671.54Skamil	switch (type) {
17681.54Skamil	case BYTES_TRANSFER_TEXTIO:
17691.54Skamil	case BYTES_TRANSFER_DATAIO:
17701.54Skamil		io.piod_op = operation;
17711.54Skamil		switch (size) {
17721.54Skamil		case 8:
17731.54Skamil			io.piod_offs = (type == BYTES_TRANSFER_TEXTIO) ?
17741.54Skamil			               (void *)bytes_transfer_dummy :
17751.54Skamil			               &lookup_me8;
17761.54Skamil			io.piod_addr = &lookup_me8;
17771.54Skamil			io.piod_len = sizeof(lookup_me8);
17781.54Skamil			break;
17791.54Skamil		case 16:
17801.54Skamil			io.piod_offs = (type == BYTES_TRANSFER_TEXTIO) ?
17811.54Skamil			               (void *)bytes_transfer_dummy :
17821.54Skamil			               &lookup_me16;
17831.54Skamil			io.piod_addr = &lookup_me16;
17841.54Skamil			io.piod_len = sizeof(lookup_me16);
17851.54Skamil			break;
17861.54Skamil		case 32:
17871.54Skamil			io.piod_offs = (type == BYTES_TRANSFER_TEXTIO) ?
17881.54Skamil			               (void *)bytes_transfer_dummy :
17891.54Skamil			               &lookup_me32;
17901.54Skamil			io.piod_addr = &lookup_me32;
17911.54Skamil			io.piod_len = sizeof(lookup_me32);
17921.54Skamil			break;
17931.54Skamil		case 64:
17941.54Skamil			io.piod_offs = (type == BYTES_TRANSFER_TEXTIO) ?
17951.54Skamil			               (void *)bytes_transfer_dummy :
17961.54Skamil			               &lookup_me64;
17971.54Skamil			io.piod_addr = &lookup_me64;
17981.54Skamil			io.piod_len = sizeof(lookup_me64);
17991.54Skamil			break;
18001.54Skamil		default:
18011.54Skamil			break;
18021.54Skamil		}
18031.54Skamil		break;
18041.54Skamil	case BYTES_TRANSFER_AUXV:
18051.54Skamil		io.piod_op = operation;
18061.54Skamil		io.piod_offs = 0;
18071.54Skamil		io.piod_addr = ai;
18081.54Skamil		io.piod_len = size;
18091.54Skamil		break;
18101.54Skamil	default:
18111.54Skamil		break;
18121.1Skamil	}
18131.1Skamil
18141.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
18151.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
18161.1Skamil	if (child == 0) {
18171.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
18181.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
18191.1Skamil
18201.54Skamil		switch (type) {
18211.54Skamil		case BYTES_TRANSFER_DATA:
18221.54Skamil			switch (operation) {
18231.54Skamil			case PT_READ_D:
18241.54Skamil			case PT_READ_I:
18251.54Skamil				lookup_me = magic;
18261.54Skamil				break;
18271.54Skamil			default:
18281.54Skamil				break;
18291.54Skamil			}
18301.54Skamil			break;
18311.54Skamil		case BYTES_TRANSFER_DATAIO:
18321.54Skamil			switch (operation) {
18331.54Skamil			case PIOD_READ_D:
18341.54Skamil			case PIOD_READ_I:
18351.54Skamil				switch (size) {
18361.54Skamil				case 8:
18371.54Skamil					lookup_me8 = magic8;
18381.54Skamil					break;
18391.54Skamil				case 16:
18401.54Skamil					lookup_me16 = magic16;
18411.54Skamil					break;
18421.54Skamil				case 32:
18431.54Skamil					lookup_me32 = magic32;
18441.54Skamil					break;
18451.54Skamil				case 64:
18461.54Skamil					lookup_me64 = magic64;
18471.54Skamil					break;
18481.54Skamil				default:
18491.54Skamil					break;
18501.54Skamil				}
18511.54Skamil				break;
18521.54Skamil			default:
18531.54Skamil				break;
18541.54Skamil			}
18551.54Skamil		default:
18561.54Skamil			break;
18571.54Skamil		}
18581.54Skamil
18591.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
18601.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
18611.1Skamil
18621.54Skamil		/* Handle PIOD and PT separately as operation values overlap */
18631.54Skamil		switch (type) {
18641.54Skamil		case BYTES_TRANSFER_DATA:
18651.54Skamil			switch (operation) {
18661.54Skamil			case PT_WRITE_D:
18671.54Skamil			case PT_WRITE_I:
18681.54Skamil				FORKEE_ASSERT_EQ(lookup_me, magic);
18691.54Skamil				break;
18701.54Skamil			default:
18711.54Skamil				break;
18721.54Skamil			}
18731.54Skamil			break;
18741.54Skamil		case BYTES_TRANSFER_DATAIO:
18751.54Skamil			switch (operation) {
18761.54Skamil			case PIOD_WRITE_D:
18771.54Skamil			case PIOD_WRITE_I:
18781.54Skamil				switch (size) {
18791.54Skamil				case 8:
18801.54Skamil					FORKEE_ASSERT_EQ(lookup_me8, magic8);
18811.54Skamil					break;
18821.54Skamil				case 16:
18831.54Skamil					FORKEE_ASSERT_EQ(lookup_me16, magic16);
18841.54Skamil					break;
18851.54Skamil				case 32:
18861.54Skamil					FORKEE_ASSERT_EQ(lookup_me32, magic32);
18871.54Skamil					break;
18881.54Skamil				case 64:
18891.54Skamil					FORKEE_ASSERT_EQ(lookup_me64, magic64);
18901.54Skamil					break;
18911.54Skamil				default:
18921.54Skamil					break;
18931.54Skamil				}
18941.54Skamil				break;
18951.54Skamil			default:
18961.54Skamil				break;
18971.54Skamil			}
18981.54Skamil			break;
18991.54Skamil		case BYTES_TRANSFER_TEXT:
19001.54Skamil			FORKEE_ASSERT(memcmp(&magic, bytes_transfer_dummy,
19011.54Skamil			                     sizeof(magic)) == 0);
19021.54Skamil			break;
19031.54Skamil		case BYTES_TRANSFER_TEXTIO:
19041.54Skamil			switch (size) {
19051.54Skamil			case 8:
19061.54Skamil				FORKEE_ASSERT(memcmp(&magic8,
19071.54Skamil				                     bytes_transfer_dummy,
19081.54Skamil				                     sizeof(magic8)) == 0);
19091.54Skamil				break;
19101.54Skamil			case 16:
19111.54Skamil				FORKEE_ASSERT(memcmp(&magic16,
19121.54Skamil				                     bytes_transfer_dummy,
19131.54Skamil				                     sizeof(magic16)) == 0);
19141.54Skamil				break;
19151.54Skamil			case 32:
19161.54Skamil				FORKEE_ASSERT(memcmp(&magic32,
19171.54Skamil				                     bytes_transfer_dummy,
19181.54Skamil				                     sizeof(magic32)) == 0);
19191.54Skamil				break;
19201.54Skamil			case 64:
19211.54Skamil				FORKEE_ASSERT(memcmp(&magic64,
19221.54Skamil				                     bytes_transfer_dummy,
19231.54Skamil				                     sizeof(magic64)) == 0);
19241.54Skamil				break;
19251.54Skamil			}
19261.54Skamil			break;
19271.54Skamil		default:
19281.54Skamil			break;
19291.54Skamil		}
19301.54Skamil
19311.13Schristos		DPRINTF("Before exiting of the child process\n");
19321.1Skamil		_exit(exitval);
19331.1Skamil	}
19341.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
19351.1Skamil
19361.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
19371.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
19381.1Skamil
19391.1Skamil	validate_status_stopped(status, sigval);
19401.1Skamil
19411.54Skamil	/* Check PaX MPROTECT */
19421.54Skamil	if (!can_we_write_to_text(child)) {
19431.54Skamil		switch (type) {
19441.54Skamil		case BYTES_TRANSFER_TEXTIO:
19451.54Skamil			switch (operation) {
19461.54Skamil			case PIOD_WRITE_D:
19471.54Skamil			case PIOD_WRITE_I:
19481.54Skamil				skip = true;
19491.54Skamil				break;
19501.54Skamil			default:
19511.54Skamil				break;
19521.54Skamil			}
19531.54Skamil			break;
19541.54Skamil		case BYTES_TRANSFER_TEXT:
19551.54Skamil			switch (operation) {
19561.54Skamil			case PT_WRITE_D:
19571.54Skamil			case PT_WRITE_I:
19581.54Skamil				skip = true;
19591.54Skamil				break;
19601.54Skamil			default:
19611.54Skamil				break;
19621.54Skamil			}
19631.54Skamil			break;
19641.54Skamil		default:
19651.54Skamil			break;
19661.54Skamil		}
19671.54Skamil	}
19681.1Skamil
19691.54Skamil	/* Bailout cleanly killing the child process */
19701.54Skamil	if (skip) {
19711.54Skamil		SYSCALL_REQUIRE(ptrace(PT_KILL, child, (void *)1, 0) != -1);
19721.54Skamil		DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
19731.54Skamil		TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0),
19741.54Skamil		                      child);
19751.1Skamil
19761.54Skamil		validate_status_signaled(status, SIGKILL, 0);
19771.1Skamil
19781.54Skamil		atf_tc_skip("PaX MPROTECT setup prevents writes to .text");
19791.54Skamil	}
19801.1Skamil
19811.54Skamil	DPRINTF("Calling operation to transfer bytes between child=%d and "
19821.54Skamil	       "parent=%d\n", child, getpid());
19831.1Skamil
19841.54Skamil	switch (type) {
19851.54Skamil	case BYTES_TRANSFER_TEXTIO:
19861.54Skamil	case BYTES_TRANSFER_DATAIO:
19871.54Skamil	case BYTES_TRANSFER_AUXV:
19881.54Skamil		switch (operation) {
19891.54Skamil		case PIOD_WRITE_D:
19901.54Skamil		case PIOD_WRITE_I:
19911.54Skamil			switch (size) {
19921.54Skamil			case 8:
19931.54Skamil				lookup_me8 = magic8;
19941.54Skamil				break;
19951.54Skamil			case 16:
19961.54Skamil				lookup_me16 = magic16;
19971.54Skamil				break;
19981.54Skamil			case 32:
19991.54Skamil				lookup_me32 = magic32;
20001.54Skamil				break;
20011.54Skamil			case 64:
20021.54Skamil				lookup_me64 = magic64;
20031.54Skamil				break;
20041.54Skamil			default:
20051.54Skamil				break;
20061.54Skamil			}
20071.54Skamil			break;
20081.54Skamil		default:
20091.54Skamil			break;
20101.54Skamil		}
20111.54Skamil		SYSCALL_REQUIRE(ptrace(PT_IO, child, &io, 0) != -1);
20121.54Skamil		switch (operation) {
20131.54Skamil		case PIOD_READ_D:
20141.54Skamil		case PIOD_READ_I:
20151.54Skamil			switch (size) {
20161.54Skamil			case 8:
20171.54Skamil				ATF_REQUIRE_EQ(lookup_me8, magic8);
20181.54Skamil				break;
20191.54Skamil			case 16:
20201.54Skamil				ATF_REQUIRE_EQ(lookup_me16, magic16);
20211.54Skamil				break;
20221.54Skamil			case 32:
20231.54Skamil				ATF_REQUIRE_EQ(lookup_me32, magic32);
20241.54Skamil				break;
20251.54Skamil			case 64:
20261.54Skamil				ATF_REQUIRE_EQ(lookup_me64, magic64);
20271.54Skamil				break;
20281.54Skamil			default:
20291.54Skamil				break;
20301.54Skamil			}
20311.54Skamil			break;
20321.54Skamil		case PIOD_READ_AUXV:
20331.54Skamil			DPRINTF("Asserting that AUXV length (%zu) is > 0\n",
20341.54Skamil			        io.piod_len);
20351.54Skamil			ATF_REQUIRE(io.piod_len > 0);
20361.54Skamil			for (aip = ai; aip->a_type != AT_NULL; aip++)
20371.54Skamil				DPRINTF("a_type=%#llx a_v=%#llx\n",
20381.54Skamil				    (long long int)aip->a_type,
20391.54Skamil				    (long long int)aip->a_v);
20401.54Skamil			break;
20411.54Skamil		default:
20421.54Skamil			break;
20431.54Skamil		}
20441.54Skamil		break;
20451.54Skamil	case BYTES_TRANSFER_TEXT:
20461.54Skamil		switch (operation) {
20471.54Skamil		case PT_READ_D:
20481.54Skamil		case PT_READ_I:
20491.54Skamil			errno = 0;
20501.54Skamil			lookup_me = ptrace(operation, child,
20511.54Skamil			                   bytes_transfer_dummy, 0);
20521.54Skamil			ATF_REQUIRE_EQ(lookup_me, magic);
20531.54Skamil			SYSCALL_REQUIRE_ERRNO(errno, 0);
20541.54Skamil			break;
20551.54Skamil		case PT_WRITE_D:
20561.54Skamil		case PT_WRITE_I:
20571.54Skamil			SYSCALL_REQUIRE(ptrace(operation, child,
20581.54Skamil			                       bytes_transfer_dummy, magic)
20591.54Skamil			                != -1);
20601.54Skamil			break;
20611.54Skamil		default:
20621.54Skamil			break;
20631.54Skamil		}
20641.54Skamil		break;
20651.54Skamil	case BYTES_TRANSFER_DATA:
20661.54Skamil		switch (operation) {
20671.54Skamil		case PT_READ_D:
20681.54Skamil		case PT_READ_I:
20691.54Skamil			errno = 0;
20701.54Skamil			lookup_me = ptrace(operation, child, &lookup_me, 0);
20711.54Skamil			ATF_REQUIRE_EQ(lookup_me, magic);
20721.54Skamil			SYSCALL_REQUIRE_ERRNO(errno, 0);
20731.54Skamil			break;
20741.54Skamil		case PT_WRITE_D:
20751.54Skamil		case PT_WRITE_I:
20761.54Skamil			lookup_me = magic;
20771.54Skamil			SYSCALL_REQUIRE(ptrace(operation, child, &lookup_me,
20781.54Skamil			                       magic) != -1);
20791.54Skamil			break;
20801.54Skamil		default:
20811.54Skamil			break;
20821.54Skamil		}
20831.54Skamil		break;
20841.54Skamil	default:
20851.54Skamil		break;
20861.54Skamil	}
20871.1Skamil
20881.13Schristos	DPRINTF("Before resuming the child process where it left off and "
20891.1Skamil	    "without signal to be sent\n");
20901.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
20911.1Skamil
20921.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
20931.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
20941.1Skamil
20951.1Skamil	validate_status_exited(status, exitval);
20961.1Skamil
20971.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
20981.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
20991.1Skamil}
21001.1Skamil
21011.54Skamil#define BYTES_TRANSFER(test, operation, size, type)				\
21021.54SkamilATF_TC(test);									\
21031.54SkamilATF_TC_HEAD(test, tc)								\
21041.54Skamil{										\
21051.54Skamil	atf_tc_set_md_var(tc, "descr",						\
21061.54Skamil	    "Verify bytes transfer operation" #operation " and size " #size	\
21071.54Skamil	    " of type " #type);							\
21081.54Skamil}										\
21091.54Skamil										\
21101.54SkamilATF_TC_BODY(test, tc)								\
21111.54Skamil{										\
21121.54Skamil										\
21131.54Skamil	bytes_transfer(operation, size, BYTES_TRANSFER_##type);			\
21141.1Skamil}
21151.1Skamil
21161.54Skamil// DATA
21171.1Skamil
21181.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_d_8, PIOD_READ_D, 8, DATAIO)
21191.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_d_16, PIOD_READ_D, 16, DATAIO)
21201.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_d_32, PIOD_READ_D, 32, DATAIO)
21211.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_d_64, PIOD_READ_D, 64, DATAIO)
21221.54Skamil
21231.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_i_8, PIOD_READ_I, 8, DATAIO)
21241.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_i_16, PIOD_READ_I, 16, DATAIO)
21251.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_i_32, PIOD_READ_I, 32, DATAIO)
21261.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_i_64, PIOD_READ_I, 64, DATAIO)
21271.54Skamil
21281.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_d_8, PIOD_WRITE_D, 8, DATAIO)
21291.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_d_16, PIOD_WRITE_D, 16, DATAIO)
21301.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_d_32, PIOD_WRITE_D, 32, DATAIO)
21311.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_d_64, PIOD_WRITE_D, 64, DATAIO)
21321.54Skamil
21331.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_i_8, PIOD_WRITE_I, 8, DATAIO)
21341.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_i_16, PIOD_WRITE_I, 16, DATAIO)
21351.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_i_32, PIOD_WRITE_I, 32, DATAIO)
21361.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_i_64, PIOD_WRITE_I, 64, DATAIO)
21371.54Skamil
21381.54SkamilBYTES_TRANSFER(bytes_transfer_read_d, PT_READ_D, 32, DATA)
21391.54SkamilBYTES_TRANSFER(bytes_transfer_read_i, PT_READ_I, 32, DATA)
21401.54SkamilBYTES_TRANSFER(bytes_transfer_write_d, PT_WRITE_D, 32, DATA)
21411.54SkamilBYTES_TRANSFER(bytes_transfer_write_i, PT_WRITE_I, 32, DATA)
21421.54Skamil
21431.54Skamil// TEXT
21441.54Skamil
21451.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_d_8_text, PIOD_READ_D, 8, TEXTIO)
21461.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_d_16_text, PIOD_READ_D, 16, TEXTIO)
21471.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_d_32_text, PIOD_READ_D, 32, TEXTIO)
21481.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_d_64_text, PIOD_READ_D, 64, TEXTIO)
21491.54Skamil
21501.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_i_8_text, PIOD_READ_I, 8, TEXTIO)
21511.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_i_16_text, PIOD_READ_I, 16, TEXTIO)
21521.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_i_32_text, PIOD_READ_I, 32, TEXTIO)
21531.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_i_64_text, PIOD_READ_I, 64, TEXTIO)
21541.54Skamil
21551.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_d_8_text, PIOD_WRITE_D, 8, TEXTIO)
21561.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_d_16_text, PIOD_WRITE_D, 16, TEXTIO)
21571.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_d_32_text, PIOD_WRITE_D, 32, TEXTIO)
21581.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_d_64_text, PIOD_WRITE_D, 64, TEXTIO)
21591.54Skamil
21601.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_i_8_text, PIOD_WRITE_I, 8, TEXTIO)
21611.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_i_16_text, PIOD_WRITE_I, 16, TEXTIO)
21621.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_i_32_text, PIOD_WRITE_I, 32, TEXTIO)
21631.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_i_64_text, PIOD_WRITE_I, 64, TEXTIO)
21641.54Skamil
21651.54SkamilBYTES_TRANSFER(bytes_transfer_read_d_text, PT_READ_D, 32, TEXT)
21661.54SkamilBYTES_TRANSFER(bytes_transfer_read_i_text, PT_READ_I, 32, TEXT)
21671.54SkamilBYTES_TRANSFER(bytes_transfer_write_d_text, PT_WRITE_D, 32, TEXT)
21681.54SkamilBYTES_TRANSFER(bytes_transfer_write_i_text, PT_WRITE_I, 32, TEXT)
21691.1Skamil
21701.54Skamil// AUXV
21711.1Skamil
21721.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_auxv, PIOD_READ_AUXV, 4096, AUXV)
21731.1Skamil
21741.54Skamil/// ----------------------------------------------------------------------------
21751.1Skamil
21761.1Skamil#if defined(HAVE_GPREGS)
21771.1SkamilATF_TC(regs1);
21781.1SkamilATF_TC_HEAD(regs1, tc)
21791.1Skamil{
21801.1Skamil	atf_tc_set_md_var(tc, "descr",
21811.1Skamil	    "Verify plain PT_GETREGS call without further steps");
21821.1Skamil}
21831.1Skamil
21841.1SkamilATF_TC_BODY(regs1, tc)
21851.1Skamil{
21861.1Skamil	const int exitval = 5;
21871.1Skamil	const int sigval = SIGSTOP;
21881.1Skamil	pid_t child, wpid;
21891.1Skamil#if defined(TWAIT_HAVE_STATUS)
21901.1Skamil	int status;
21911.1Skamil#endif
21921.1Skamil	struct reg r;
21931.1Skamil
21941.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
21951.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
21961.1Skamil	if (child == 0) {
21971.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
21981.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
21991.1Skamil
22001.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
22011.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
22021.1Skamil
22031.13Schristos		DPRINTF("Before exiting of the child process\n");
22041.1Skamil		_exit(exitval);
22051.1Skamil	}
22061.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
22071.1Skamil
22081.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
22091.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
22101.1Skamil
22111.1Skamil	validate_status_stopped(status, sigval);
22121.1Skamil
22131.13Schristos	DPRINTF("Call GETREGS for the child process\n");
22141.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GETREGS, child, &r, 0) != -1);
22151.1Skamil
22161.13Schristos	DPRINTF("Before resuming the child process where it left off and "
22171.1Skamil	    "without signal to be sent\n");
22181.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
22191.1Skamil
22201.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
22211.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
22221.1Skamil
22231.1Skamil	validate_status_exited(status, exitval);
22241.1Skamil
22251.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
22261.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
22271.1Skamil}
22281.1Skamil#endif
22291.1Skamil
22301.1Skamil#if defined(HAVE_GPREGS)
22311.1SkamilATF_TC(regs2);
22321.1SkamilATF_TC_HEAD(regs2, tc)
22331.1Skamil{
22341.1Skamil	atf_tc_set_md_var(tc, "descr",
22351.1Skamil	    "Verify plain PT_GETREGS call and retrieve PC");
22361.1Skamil}
22371.1Skamil
22381.1SkamilATF_TC_BODY(regs2, tc)
22391.1Skamil{
22401.1Skamil	const int exitval = 5;
22411.1Skamil	const int sigval = SIGSTOP;
22421.1Skamil	pid_t child, wpid;
22431.1Skamil#if defined(TWAIT_HAVE_STATUS)
22441.1Skamil	int status;
22451.1Skamil#endif
22461.1Skamil	struct reg r;
22471.1Skamil
22481.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
22491.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
22501.1Skamil	if (child == 0) {
22511.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
22521.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
22531.1Skamil
22541.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
22551.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
22561.1Skamil
22571.13Schristos		DPRINTF("Before exiting of the child process\n");
22581.1Skamil		_exit(exitval);
22591.1Skamil	}
22601.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
22611.1Skamil
22621.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
22631.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
22641.1Skamil
22651.1Skamil	validate_status_stopped(status, sigval);
22661.1Skamil
22671.13Schristos	DPRINTF("Call GETREGS for the child process\n");
22681.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GETREGS, child, &r, 0) != -1);
22691.1Skamil
22701.13Schristos	DPRINTF("Retrieved PC=%" PRIxREGISTER "\n", PTRACE_REG_PC(&r));
22711.1Skamil
22721.13Schristos	DPRINTF("Before resuming the child process where it left off and "
22731.1Skamil	    "without signal to be sent\n");
22741.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
22751.1Skamil
22761.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
22771.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
22781.1Skamil
22791.1Skamil	validate_status_exited(status, exitval);
22801.1Skamil
22811.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
22821.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
22831.1Skamil}
22841.1Skamil#endif
22851.1Skamil
22861.1Skamil#if defined(HAVE_GPREGS)
22871.1SkamilATF_TC(regs3);
22881.1SkamilATF_TC_HEAD(regs3, tc)
22891.1Skamil{
22901.1Skamil	atf_tc_set_md_var(tc, "descr",
22911.1Skamil	    "Verify plain PT_GETREGS call and retrieve SP");
22921.1Skamil}
22931.1Skamil
22941.1SkamilATF_TC_BODY(regs3, tc)
22951.1Skamil{
22961.1Skamil	const int exitval = 5;
22971.1Skamil	const int sigval = SIGSTOP;
22981.1Skamil	pid_t child, wpid;
22991.1Skamil#if defined(TWAIT_HAVE_STATUS)
23001.1Skamil	int status;
23011.1Skamil#endif
23021.1Skamil	struct reg r;
23031.1Skamil
23041.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
23051.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
23061.1Skamil	if (child == 0) {
23071.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
23081.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
23091.1Skamil
23101.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
23111.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
23121.1Skamil
23131.13Schristos		DPRINTF("Before exiting of the child process\n");
23141.1Skamil		_exit(exitval);
23151.1Skamil	}
23161.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
23171.1Skamil
23181.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
23191.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
23201.1Skamil
23211.1Skamil	validate_status_stopped(status, sigval);
23221.1Skamil
23231.13Schristos	DPRINTF("Call GETREGS for the child process\n");
23241.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GETREGS, child, &r, 0) != -1);
23251.1Skamil
23261.13Schristos	DPRINTF("Retrieved SP=%" PRIxREGISTER "\n", PTRACE_REG_SP(&r));
23271.1Skamil
23281.13Schristos	DPRINTF("Before resuming the child process where it left off and "
23291.1Skamil	    "without signal to be sent\n");
23301.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
23311.1Skamil
23321.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
23331.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
23341.1Skamil
23351.1Skamil	validate_status_exited(status, exitval);
23361.1Skamil
23371.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
23381.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
23391.1Skamil}
23401.1Skamil#endif
23411.1Skamil
23421.1Skamil#if defined(HAVE_GPREGS)
23431.1SkamilATF_TC(regs4);
23441.1SkamilATF_TC_HEAD(regs4, tc)
23451.1Skamil{
23461.1Skamil	atf_tc_set_md_var(tc, "descr",
23471.1Skamil	    "Verify plain PT_GETREGS call and retrieve INTRV");
23481.1Skamil}
23491.1Skamil
23501.1SkamilATF_TC_BODY(regs4, tc)
23511.1Skamil{
23521.1Skamil	const int exitval = 5;
23531.1Skamil	const int sigval = SIGSTOP;
23541.1Skamil	pid_t child, wpid;
23551.1Skamil#if defined(TWAIT_HAVE_STATUS)
23561.1Skamil	int status;
23571.1Skamil#endif
23581.1Skamil	struct reg r;
23591.1Skamil
23601.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
23611.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
23621.1Skamil	if (child == 0) {
23631.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
23641.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
23651.1Skamil
23661.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
23671.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
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.13Schristos	DPRINTF("Call GETREGS for the child process\n");
23801.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GETREGS, child, &r, 0) != -1);
23811.1Skamil
23821.13Schristos	DPRINTF("Retrieved INTRV=%" PRIxREGISTER "\n", PTRACE_REG_INTRV(&r));
23831.1Skamil
23841.13Schristos	DPRINTF("Before resuming the child process where it left off and "
23851.1Skamil	    "without signal to be sent\n");
23861.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
23871.1Skamil
23881.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
23891.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
23901.1Skamil
23911.1Skamil	validate_status_exited(status, exitval);
23921.1Skamil
23931.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
23941.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
23951.1Skamil}
23961.1Skamil#endif
23971.1Skamil
23981.1Skamil#if defined(HAVE_GPREGS)
23991.1SkamilATF_TC(regs5);
24001.1SkamilATF_TC_HEAD(regs5, tc)
24011.1Skamil{
24021.1Skamil	atf_tc_set_md_var(tc, "descr",
24031.1Skamil	    "Verify PT_GETREGS and PT_SETREGS calls without changing regs");
24041.1Skamil}
24051.1Skamil
24061.1SkamilATF_TC_BODY(regs5, tc)
24071.1Skamil{
24081.1Skamil	const int exitval = 5;
24091.1Skamil	const int sigval = SIGSTOP;
24101.1Skamil	pid_t child, wpid;
24111.1Skamil#if defined(TWAIT_HAVE_STATUS)
24121.1Skamil	int status;
24131.1Skamil#endif
24141.1Skamil	struct reg r;
24151.1Skamil
24161.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
24171.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
24181.1Skamil	if (child == 0) {
24191.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
24201.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
24211.1Skamil
24221.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
24231.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
24241.1Skamil
24251.13Schristos		DPRINTF("Before exiting of the child process\n");
24261.1Skamil		_exit(exitval);
24271.1Skamil	}
24281.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
24291.1Skamil
24301.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
24311.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
24321.1Skamil
24331.1Skamil	validate_status_stopped(status, sigval);
24341.1Skamil
24351.13Schristos	DPRINTF("Call GETREGS for the child process\n");
24361.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GETREGS, child, &r, 0) != -1);
24371.1Skamil
24381.13Schristos	DPRINTF("Call SETREGS for the child process (without changed regs)\n");
24391.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GETREGS, child, &r, 0) != -1);
24401.1Skamil
24411.13Schristos	DPRINTF("Before resuming the child process where it left off and "
24421.1Skamil	    "without signal to be sent\n");
24431.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
24441.1Skamil
24451.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
24461.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
24471.1Skamil
24481.1Skamil	validate_status_exited(status, exitval);
24491.1Skamil
24501.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
24511.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
24521.1Skamil}
24531.1Skamil#endif
24541.1Skamil
24551.1Skamil#if defined(HAVE_FPREGS)
24561.1SkamilATF_TC(fpregs1);
24571.1SkamilATF_TC_HEAD(fpregs1, tc)
24581.1Skamil{
24591.1Skamil	atf_tc_set_md_var(tc, "descr",
24601.1Skamil	    "Verify plain PT_GETFPREGS call without further steps");
24611.1Skamil}
24621.1Skamil
24631.1SkamilATF_TC_BODY(fpregs1, tc)
24641.1Skamil{
24651.1Skamil	const int exitval = 5;
24661.1Skamil	const int sigval = SIGSTOP;
24671.1Skamil	pid_t child, wpid;
24681.1Skamil#if defined(TWAIT_HAVE_STATUS)
24691.1Skamil	int status;
24701.1Skamil#endif
24711.1Skamil	struct fpreg r;
24721.1Skamil
24731.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
24741.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
24751.1Skamil	if (child == 0) {
24761.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
24771.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
24781.1Skamil
24791.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
24801.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
24811.1Skamil
24821.13Schristos		DPRINTF("Before exiting of the child process\n");
24831.1Skamil		_exit(exitval);
24841.1Skamil	}
24851.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
24861.1Skamil
24871.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
24881.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
24891.1Skamil
24901.1Skamil	validate_status_stopped(status, sigval);
24911.1Skamil
24921.13Schristos	DPRINTF("Call GETFPREGS for the child process\n");
24931.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GETFPREGS, child, &r, 0) != -1);
24941.1Skamil
24951.13Schristos	DPRINTF("Before resuming the child process where it left off and "
24961.1Skamil	    "without signal to be sent\n");
24971.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
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_exited(status, exitval);
25031.1Skamil
25041.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
25051.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
25061.1Skamil}
25071.1Skamil#endif
25081.1Skamil
25091.1Skamil#if defined(HAVE_FPREGS)
25101.1SkamilATF_TC(fpregs2);
25111.1SkamilATF_TC_HEAD(fpregs2, tc)
25121.1Skamil{
25131.1Skamil	atf_tc_set_md_var(tc, "descr",
25141.1Skamil	    "Verify PT_GETFPREGS and PT_SETFPREGS calls without changing "
25151.1Skamil	    "regs");
25161.1Skamil}
25171.1Skamil
25181.1SkamilATF_TC_BODY(fpregs2, tc)
25191.1Skamil{
25201.1Skamil	const int exitval = 5;
25211.1Skamil	const int sigval = SIGSTOP;
25221.1Skamil	pid_t child, wpid;
25231.1Skamil#if defined(TWAIT_HAVE_STATUS)
25241.1Skamil	int status;
25251.1Skamil#endif
25261.1Skamil	struct fpreg r;
25271.1Skamil
25281.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
25291.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
25301.1Skamil	if (child == 0) {
25311.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
25321.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
25331.1Skamil
25341.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
25351.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
25361.1Skamil
25371.13Schristos		DPRINTF("Before exiting of the child process\n");
25381.1Skamil		_exit(exitval);
25391.1Skamil	}
25401.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
25411.1Skamil
25421.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
25431.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
25441.1Skamil
25451.1Skamil	validate_status_stopped(status, sigval);
25461.1Skamil
25471.13Schristos	DPRINTF("Call GETFPREGS for the child process\n");
25481.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GETFPREGS, child, &r, 0) != -1);
25491.1Skamil
25501.13Schristos	DPRINTF("Call SETFPREGS for the child (without changed regs)\n");
25511.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SETFPREGS, child, &r, 0) != -1);
25521.1Skamil
25531.13Schristos	DPRINTF("Before resuming the child process where it left off and "
25541.1Skamil	    "without signal to be sent\n");
25551.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
25561.1Skamil
25571.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
25581.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
25591.1Skamil
25601.1Skamil	validate_status_exited(status, exitval);
25611.1Skamil
25621.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
25631.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
25641.1Skamil}
25651.1Skamil#endif
25661.1Skamil
25671.1Skamil#if defined(PT_STEP)
25681.1Skamilstatic void
25691.2Skamilptrace_step(int N, int setstep)
25701.1Skamil{
25711.1Skamil	const int exitval = 5;
25721.1Skamil	const int sigval = SIGSTOP;
25731.1Skamil	pid_t child, wpid;
25741.1Skamil#if defined(TWAIT_HAVE_STATUS)
25751.1Skamil	int status;
25761.1Skamil#endif
25771.1Skamil	int happy;
25781.1Skamil
25791.1Skamil#if defined(__arm__)
25801.1Skamil	/* PT_STEP not supported on arm 32-bit */
25811.1Skamil	atf_tc_expect_fail("PR kern/52119");
25821.1Skamil#endif
25831.1Skamil
25841.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
25851.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
25861.1Skamil	if (child == 0) {
25871.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
25881.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
25891.1Skamil
25901.1Skamil		happy = check_happy(999);
25911.1Skamil
25921.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
25931.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
25941.1Skamil
25951.1Skamil		FORKEE_ASSERT_EQ(happy, check_happy(999));
25961.1Skamil
25971.13Schristos		DPRINTF("Before exiting of the child process\n");
25981.1Skamil		_exit(exitval);
25991.1Skamil	}
26001.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
26011.1Skamil
26021.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
26031.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
26041.1Skamil
26051.1Skamil	validate_status_stopped(status, sigval);
26061.1Skamil
26071.1Skamil	while (N --> 0) {
26081.2Skamil		if (setstep) {
26091.13Schristos			DPRINTF("Before resuming the child process where it "
26101.2Skamil			    "left off and without signal to be sent (use "
26111.9Skamil			    "PT_SETSTEP and PT_CONTINUE)\n");
26121.13Schristos			SYSCALL_REQUIRE(ptrace(PT_SETSTEP, child, 0, 0) != -1);
26131.13Schristos			SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0)
26141.2Skamil			    != -1);
26151.2Skamil		} else {
26161.13Schristos			DPRINTF("Before resuming the child process where it "
26171.2Skamil			    "left off and without signal to be sent (use "
26181.2Skamil			    "PT_STEP)\n");
26191.13Schristos			SYSCALL_REQUIRE(ptrace(PT_STEP, child, (void *)1, 0)
26201.2Skamil			    != -1);
26211.2Skamil		}
26221.1Skamil
26231.13Schristos		DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
26241.1Skamil		TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0),
26251.1Skamil		    child);
26261.1Skamil
26271.1Skamil		validate_status_stopped(status, SIGTRAP);
26281.2Skamil
26291.2Skamil		if (setstep) {
26301.13Schristos			SYSCALL_REQUIRE(ptrace(PT_CLEARSTEP, child, 0, 0) != -1);
26311.2Skamil		}
26321.1Skamil	}
26331.1Skamil
26341.13Schristos	DPRINTF("Before resuming the child process where it left off and "
26351.1Skamil	    "without signal to be sent\n");
26361.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
26371.1Skamil
26381.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
26391.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
26401.1Skamil
26411.1Skamil	validate_status_exited(status, exitval);
26421.1Skamil
26431.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
26441.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
26451.1Skamil}
26461.1Skamil#endif
26471.1Skamil
26481.1Skamil#if defined(PT_STEP)
26491.1SkamilATF_TC(step1);
26501.1SkamilATF_TC_HEAD(step1, tc)
26511.1Skamil{
26521.1Skamil	atf_tc_set_md_var(tc, "descr",
26531.1Skamil	    "Verify single PT_STEP call");
26541.1Skamil}
26551.1Skamil
26561.1SkamilATF_TC_BODY(step1, tc)
26571.1Skamil{
26581.2Skamil	ptrace_step(1, 0);
26591.1Skamil}
26601.1Skamil#endif
26611.1Skamil
26621.1Skamil#if defined(PT_STEP)
26631.1SkamilATF_TC(step2);
26641.1SkamilATF_TC_HEAD(step2, tc)
26651.1Skamil{
26661.1Skamil	atf_tc_set_md_var(tc, "descr",
26671.1Skamil	    "Verify PT_STEP called twice");
26681.1Skamil}
26691.1Skamil
26701.1SkamilATF_TC_BODY(step2, tc)
26711.1Skamil{
26721.2Skamil	ptrace_step(2, 0);
26731.1Skamil}
26741.1Skamil#endif
26751.1Skamil
26761.1Skamil#if defined(PT_STEP)
26771.1SkamilATF_TC(step3);
26781.1SkamilATF_TC_HEAD(step3, tc)
26791.1Skamil{
26801.1Skamil	atf_tc_set_md_var(tc, "descr",
26811.1Skamil	    "Verify PT_STEP called three times");
26821.1Skamil}
26831.1Skamil
26841.1SkamilATF_TC_BODY(step3, tc)
26851.1Skamil{
26861.2Skamil	ptrace_step(3, 0);
26871.1Skamil}
26881.1Skamil#endif
26891.1Skamil
26901.1Skamil#if defined(PT_STEP)
26911.1SkamilATF_TC(step4);
26921.1SkamilATF_TC_HEAD(step4, tc)
26931.1Skamil{
26941.1Skamil	atf_tc_set_md_var(tc, "descr",
26951.1Skamil	    "Verify PT_STEP called four times");
26961.1Skamil}
26971.1Skamil
26981.1SkamilATF_TC_BODY(step4, tc)
26991.1Skamil{
27001.2Skamil	ptrace_step(4, 0);
27011.2Skamil}
27021.2Skamil#endif
27031.2Skamil
27041.2Skamil#if defined(PT_STEP)
27051.2SkamilATF_TC(setstep1);
27061.2SkamilATF_TC_HEAD(setstep1, tc)
27071.2Skamil{
27081.2Skamil	atf_tc_set_md_var(tc, "descr",
27091.2Skamil	    "Verify single PT_SETSTEP call");
27101.2Skamil}
27111.2Skamil
27121.2SkamilATF_TC_BODY(setstep1, tc)
27131.2Skamil{
27141.2Skamil	ptrace_step(1, 1);
27151.2Skamil}
27161.2Skamil#endif
27171.2Skamil
27181.2Skamil#if defined(PT_STEP)
27191.2SkamilATF_TC(setstep2);
27201.2SkamilATF_TC_HEAD(setstep2, tc)
27211.2Skamil{
27221.2Skamil	atf_tc_set_md_var(tc, "descr",
27231.2Skamil	    "Verify PT_SETSTEP called twice");
27241.2Skamil}
27251.2Skamil
27261.2SkamilATF_TC_BODY(setstep2, tc)
27271.2Skamil{
27281.2Skamil	ptrace_step(2, 1);
27291.2Skamil}
27301.2Skamil#endif
27311.2Skamil
27321.2Skamil#if defined(PT_STEP)
27331.2SkamilATF_TC(setstep3);
27341.2SkamilATF_TC_HEAD(setstep3, tc)
27351.2Skamil{
27361.2Skamil	atf_tc_set_md_var(tc, "descr",
27371.2Skamil	    "Verify PT_SETSTEP called three times");
27381.2Skamil}
27391.2Skamil
27401.2SkamilATF_TC_BODY(setstep3, tc)
27411.2Skamil{
27421.2Skamil	ptrace_step(3, 1);
27431.2Skamil}
27441.2Skamil#endif
27451.2Skamil
27461.2Skamil#if defined(PT_STEP)
27471.2SkamilATF_TC(setstep4);
27481.2SkamilATF_TC_HEAD(setstep4, tc)
27491.2Skamil{
27501.2Skamil	atf_tc_set_md_var(tc, "descr",
27511.2Skamil	    "Verify PT_SETSTEP called four times");
27521.2Skamil}
27531.2Skamil
27541.2SkamilATF_TC_BODY(setstep4, tc)
27551.2Skamil{
27561.2Skamil	ptrace_step(4, 1);
27571.1Skamil}
27581.1Skamil#endif
27591.1Skamil
27601.1SkamilATF_TC(kill1);
27611.1SkamilATF_TC_HEAD(kill1, tc)
27621.1Skamil{
27631.1Skamil	atf_tc_set_md_var(tc, "descr",
27641.1Skamil	    "Verify that PT_CONTINUE with SIGKILL terminates child");
27651.1Skamil}
27661.1Skamil
27671.1SkamilATF_TC_BODY(kill1, tc)
27681.1Skamil{
27691.1Skamil	const int sigval = SIGSTOP, sigsent = SIGKILL;
27701.1Skamil	pid_t child, wpid;
27711.1Skamil#if defined(TWAIT_HAVE_STATUS)
27721.1Skamil	int status;
27731.1Skamil#endif
27741.1Skamil
27751.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
27761.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
27771.1Skamil	if (child == 0) {
27781.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
27791.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
27801.1Skamil
27811.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
27821.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
27831.1Skamil
27841.1Skamil		/* NOTREACHED */
27851.1Skamil		FORKEE_ASSERTX(0 &&
27861.1Skamil		    "Child should be terminated by a signal from its parent");
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("Before resuming the child process where it left off and "
27961.1Skamil	    "without signal to be sent\n");
27971.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, sigsent) != -1);
27981.1Skamil
27991.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
28001.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
28011.1Skamil
28021.1Skamil	validate_status_signaled(status, sigsent, 0);
28031.1Skamil
28041.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
28051.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
28061.1Skamil}
28071.1Skamil
28081.1SkamilATF_TC(kill2);
28091.1SkamilATF_TC_HEAD(kill2, tc)
28101.1Skamil{
28111.1Skamil	atf_tc_set_md_var(tc, "descr",
28121.1Skamil	    "Verify that PT_KILL terminates child");
28131.1Skamil}
28141.1Skamil
28151.1SkamilATF_TC_BODY(kill2, tc)
28161.1Skamil{
28171.1Skamil	const int sigval = SIGSTOP;
28181.1Skamil	pid_t child, wpid;
28191.1Skamil#if defined(TWAIT_HAVE_STATUS)
28201.1Skamil	int status;
28211.1Skamil#endif
28221.1Skamil
28231.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
28241.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
28251.1Skamil	if (child == 0) {
28261.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
28271.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
28281.1Skamil
28291.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
28301.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
28311.1Skamil
28321.1Skamil		/* NOTREACHED */
28331.1Skamil		FORKEE_ASSERTX(0 &&
28341.1Skamil		    "Child should be terminated by a signal from its parent");
28351.1Skamil	}
28361.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
28371.1Skamil
28381.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
28391.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
28401.1Skamil
28411.1Skamil	validate_status_stopped(status, sigval);
28421.1Skamil
28431.13Schristos	DPRINTF("Before resuming the child process where it left off and "
28441.1Skamil	    "without signal to be sent\n");
28451.13Schristos	SYSCALL_REQUIRE(ptrace(PT_KILL, child, (void*)1, 0) != -1);
28461.1Skamil
28471.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
28481.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
28491.1Skamil
28501.1Skamil	validate_status_signaled(status, SIGKILL, 0);
28511.1Skamil
28521.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
28531.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
28541.1Skamil}
28551.1Skamil
28561.1SkamilATF_TC(lwpinfo1);
28571.1SkamilATF_TC_HEAD(lwpinfo1, tc)
28581.1Skamil{
28591.1Skamil	atf_tc_set_md_var(tc, "descr",
28601.1Skamil	    "Verify basic LWPINFO call for single thread (PT_TRACE_ME)");
28611.1Skamil}
28621.1Skamil
28631.1SkamilATF_TC_BODY(lwpinfo1, tc)
28641.1Skamil{
28651.1Skamil	const int exitval = 5;
28661.1Skamil	const int sigval = SIGSTOP;
28671.1Skamil	pid_t child, wpid;
28681.1Skamil#if defined(TWAIT_HAVE_STATUS)
28691.1Skamil	int status;
28701.1Skamil#endif
28711.1Skamil	struct ptrace_lwpinfo info = {0, 0};
28721.1Skamil
28731.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
28741.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
28751.1Skamil	if (child == 0) {
28761.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
28771.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
28781.1Skamil
28791.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
28801.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
28811.1Skamil
28821.13Schristos		DPRINTF("Before exiting of the child process\n");
28831.1Skamil		_exit(exitval);
28841.1Skamil	}
28851.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
28861.1Skamil
28871.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
28881.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
28891.1Skamil
28901.1Skamil	validate_status_stopped(status, sigval);
28911.1Skamil
28921.13Schristos	DPRINTF("Before calling ptrace(2) with PT_LWPINFO for child\n");
28931.13Schristos	SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &info, sizeof(info)) != -1);
28941.1Skamil
28951.13Schristos	DPRINTF("Assert that there exists a thread\n");
28961.1Skamil	ATF_REQUIRE(info.pl_lwpid > 0);
28971.1Skamil
28981.13Schristos	DPRINTF("Assert that lwp thread %d received event PL_EVENT_SIGNAL\n",
28991.1Skamil	    info.pl_lwpid);
29001.1Skamil	ATF_REQUIRE_EQ_MSG(info.pl_event, PL_EVENT_SIGNAL,
29011.1Skamil	    "Received event %d != expected event %d",
29021.1Skamil	    info.pl_event, PL_EVENT_SIGNAL);
29031.1Skamil
29041.13Schristos	DPRINTF("Before calling ptrace(2) with PT_LWPINFO for child\n");
29051.13Schristos	SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &info, sizeof(info)) != -1);
29061.1Skamil
29071.13Schristos	DPRINTF("Assert that there are no more lwp threads in child\n");
29081.1Skamil	ATF_REQUIRE_EQ(info.pl_lwpid, 0);
29091.1Skamil
29101.13Schristos	DPRINTF("Before resuming the child process where it left off and "
29111.1Skamil	    "without signal to be sent\n");
29121.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
29131.1Skamil
29141.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
29151.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
29161.1Skamil
29171.1Skamil	validate_status_exited(status, exitval);
29181.1Skamil
29191.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
29201.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
29211.1Skamil}
29221.1Skamil
29231.1Skamil#if defined(TWAIT_HAVE_PID)
29241.1SkamilATF_TC(lwpinfo2);
29251.1SkamilATF_TC_HEAD(lwpinfo2, tc)
29261.1Skamil{
29271.1Skamil	atf_tc_set_md_var(tc, "descr",
29281.1Skamil	    "Verify basic LWPINFO call for single thread (PT_ATTACH from "
29291.1Skamil	    "tracer)");
29301.1Skamil}
29311.1Skamil
29321.1SkamilATF_TC_BODY(lwpinfo2, tc)
29331.1Skamil{
29341.1Skamil	struct msg_fds parent_tracee, parent_tracer;
29351.1Skamil	const int exitval_tracee = 5;
29361.1Skamil	const int exitval_tracer = 10;
29371.1Skamil	pid_t tracee, tracer, wpid;
29381.1Skamil	uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */
29391.1Skamil#if defined(TWAIT_HAVE_STATUS)
29401.1Skamil	int status;
29411.1Skamil#endif
29421.1Skamil	struct ptrace_lwpinfo info = {0, 0};
29431.1Skamil
29441.13Schristos	DPRINTF("Spawn tracee\n");
29451.13Schristos	SYSCALL_REQUIRE(msg_open(&parent_tracee) == 0);
29461.13Schristos	SYSCALL_REQUIRE(msg_open(&parent_tracer) == 0);
29471.1Skamil	tracee = atf_utils_fork();
29481.1Skamil	if (tracee == 0) {
29491.1Skamil
29501.1Skamil		/* Wait for message from the parent */
29511.1Skamil		CHILD_TO_PARENT("tracee ready", parent_tracee, msg);
29521.1Skamil		CHILD_FROM_PARENT("tracee exit", parent_tracee, msg);
29531.1Skamil
29541.1Skamil		_exit(exitval_tracee);
29551.1Skamil	}
29561.1Skamil	PARENT_FROM_CHILD("tracee ready", parent_tracee, msg);
29571.1Skamil
29581.13Schristos	DPRINTF("Spawn debugger\n");
29591.1Skamil	tracer = atf_utils_fork();
29601.1Skamil	if (tracer == 0) {
29611.1Skamil		/* No IPC to communicate with the child */
29621.13Schristos		DPRINTF("Before calling PT_ATTACH from tracee %d\n", getpid());
29631.1Skamil		FORKEE_ASSERT(ptrace(PT_ATTACH, tracee, NULL, 0) != -1);
29641.1Skamil
29651.1Skamil		/* Wait for tracee and assert that it was stopped w/ SIGSTOP */
29661.1Skamil		FORKEE_REQUIRE_SUCCESS(
29671.1Skamil		    wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);
29681.1Skamil
29691.1Skamil		forkee_status_stopped(status, SIGSTOP);
29701.1Skamil
29711.13Schristos		DPRINTF("Before calling ptrace(2) with PT_LWPINFO for child\n");
29721.1Skamil		FORKEE_ASSERT(ptrace(PT_LWPINFO, tracee, &info, sizeof(info))
29731.1Skamil		    != -1);
29741.1Skamil
29751.13Schristos		DPRINTF("Assert that there exists a thread\n");
29761.1Skamil		FORKEE_ASSERTX(info.pl_lwpid > 0);
29771.1Skamil
29781.13Schristos		DPRINTF("Assert that lwp thread %d received event "
29791.1Skamil		    "PL_EVENT_SIGNAL\n", info.pl_lwpid);
29801.1Skamil		FORKEE_ASSERT_EQ(info.pl_event, PL_EVENT_SIGNAL);
29811.1Skamil
29821.13Schristos		DPRINTF("Before calling ptrace(2) with PT_LWPINFO for child\n");
29831.1Skamil		FORKEE_ASSERT(ptrace(PT_LWPINFO, tracee, &info, sizeof(info))
29841.1Skamil		    != -1);
29851.1Skamil
29861.13Schristos		DPRINTF("Assert that there are no more lwp threads in child\n");
29871.1Skamil		FORKEE_ASSERTX(info.pl_lwpid == 0);
29881.1Skamil
29891.1Skamil		/* Resume tracee with PT_CONTINUE */
29901.1Skamil		FORKEE_ASSERT(ptrace(PT_CONTINUE, tracee, (void *)1, 0) != -1);
29911.1Skamil
29921.1Skamil		/* Inform parent that tracer has attached to tracee */
29931.1Skamil		CHILD_TO_PARENT("tracer ready", parent_tracer, msg);
29941.1Skamil		/* Wait for parent */
29951.1Skamil		CHILD_FROM_PARENT("tracer wait", parent_tracer, msg);
29961.1Skamil
29971.1Skamil		/* Wait for tracee and assert that it exited */
29981.1Skamil		FORKEE_REQUIRE_SUCCESS(
29991.1Skamil		    wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);
30001.1Skamil
30011.1Skamil		forkee_status_exited(status, exitval_tracee);
30021.1Skamil
30031.13Schristos		DPRINTF("Before exiting of the tracer process\n");
30041.1Skamil		_exit(exitval_tracer);
30051.1Skamil	}
30061.1Skamil
30071.13Schristos	DPRINTF("Wait for the tracer to attach to the tracee\n");
30081.1Skamil	PARENT_FROM_CHILD("tracer ready", parent_tracer, msg);
30091.1Skamil
30101.13Schristos	DPRINTF("Resume the tracee and let it exit\n");
30111.1Skamil	PARENT_TO_CHILD("tracee exit", parent_tracee, msg);
30121.1Skamil
30131.13Schristos	DPRINTF("Detect that tracee is zombie\n");
30141.1Skamil	await_zombie(tracee);
30151.1Skamil
30161.13Schristos	DPRINTF("Assert that there is no status about tracee - "
30171.1Skamil	    "Tracer must detect zombie first - calling %s()\n", TWAIT_FNAME);
30181.1Skamil	TWAIT_REQUIRE_SUCCESS(
30191.1Skamil	    wpid = TWAIT_GENERIC(tracee, &status, WNOHANG), 0);
30201.1Skamil
30211.13Schristos	DPRINTF("Resume the tracer and let it detect exited tracee\n");
30221.1Skamil	PARENT_TO_CHILD("tracer wait", parent_tracer, msg);
30231.1Skamil
30241.13Schristos	DPRINTF("Wait for tracer to finish its job and exit - calling %s()\n",
30251.1Skamil	    TWAIT_FNAME);
30261.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracer, &status, 0),
30271.1Skamil	    tracer);
30281.1Skamil
30291.1Skamil	validate_status_exited(status, exitval_tracer);
30301.1Skamil
30311.13Schristos	DPRINTF("Wait for tracee to finish its job and exit - calling %s()\n",
30321.1Skamil	    TWAIT_FNAME);
30331.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracee, &status, WNOHANG),
30341.1Skamil	    tracee);
30351.1Skamil
30361.1Skamil	validate_status_exited(status, exitval_tracee);
30371.1Skamil
30381.1Skamil	msg_close(&parent_tracer);
30391.1Skamil	msg_close(&parent_tracee);
30401.1Skamil}
30411.1Skamil#endif
30421.1Skamil
30431.1SkamilATF_TC(siginfo1);
30441.1SkamilATF_TC_HEAD(siginfo1, tc)
30451.1Skamil{
30461.1Skamil	atf_tc_set_md_var(tc, "descr",
30471.1Skamil	    "Verify basic PT_GET_SIGINFO call for SIGTRAP from tracee");
30481.1Skamil}
30491.1Skamil
30501.1SkamilATF_TC_BODY(siginfo1, tc)
30511.1Skamil{
30521.1Skamil	const int exitval = 5;
30531.1Skamil	const int sigval = SIGTRAP;
30541.1Skamil	pid_t child, wpid;
30551.1Skamil#if defined(TWAIT_HAVE_STATUS)
30561.1Skamil	int status;
30571.1Skamil#endif
30581.1Skamil	struct ptrace_siginfo info;
30591.1Skamil	memset(&info, 0, sizeof(info));
30601.1Skamil
30611.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
30621.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
30631.1Skamil	if (child == 0) {
30641.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
30651.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
30661.1Skamil
30671.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
30681.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
30691.1Skamil
30701.13Schristos		DPRINTF("Before exiting of the child process\n");
30711.1Skamil		_exit(exitval);
30721.1Skamil	}
30731.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
30741.1Skamil
30751.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
30761.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
30771.1Skamil
30781.1Skamil	validate_status_stopped(status, sigval);
30791.1Skamil
30801.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
30811.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
30821.1Skamil
30831.13Schristos	DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
30841.13Schristos	DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n",
30851.1Skamil	    info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
30861.1Skamil	    info.psi_siginfo.si_errno);
30871.1Skamil
30881.13Schristos	DPRINTF("Before resuming the child process where it left off and "
30891.1Skamil	    "without signal to be sent\n");
30901.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
30911.1Skamil
30921.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
30931.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
30941.1Skamil
30951.1Skamil	validate_status_exited(status, exitval);
30961.1Skamil
30971.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
30981.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
30991.1Skamil}
31001.1Skamil
31011.1SkamilATF_TC(siginfo2);
31021.1SkamilATF_TC_HEAD(siginfo2, tc)
31031.1Skamil{
31041.1Skamil	atf_tc_set_md_var(tc, "descr",
31051.1Skamil	    "Verify basic PT_GET_SIGINFO and PT_SET_SIGINFO calls without "
31061.1Skamil	    "modification of SIGINT from tracee");
31071.1Skamil}
31081.1Skamil
31091.1Skamilstatic int siginfo2_caught = 0;
31101.1Skamil
31111.1Skamilstatic void
31121.1Skamilsiginfo2_sighandler(int sig)
31131.1Skamil{
31141.1Skamil	FORKEE_ASSERT_EQ(sig, SIGINT);
31151.1Skamil
31161.1Skamil	++siginfo2_caught;
31171.1Skamil}
31181.1Skamil
31191.1SkamilATF_TC_BODY(siginfo2, tc)
31201.1Skamil{
31211.1Skamil	const int exitval = 5;
31221.1Skamil	const int sigval = SIGINT;
31231.1Skamil	pid_t child, wpid;
31241.1Skamil	struct sigaction sa;
31251.1Skamil#if defined(TWAIT_HAVE_STATUS)
31261.1Skamil	int status;
31271.1Skamil#endif
31281.1Skamil	struct ptrace_siginfo info;
31291.1Skamil	memset(&info, 0, sizeof(info));
31301.1Skamil
31311.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
31321.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
31331.1Skamil	if (child == 0) {
31341.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
31351.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
31361.1Skamil
31371.1Skamil		sa.sa_handler = siginfo2_sighandler;
31381.1Skamil		sa.sa_flags = SA_SIGINFO;
31391.1Skamil		sigemptyset(&sa.sa_mask);
31401.1Skamil
31411.1Skamil		FORKEE_ASSERT(sigaction(sigval, &sa, NULL) != -1);
31421.1Skamil
31431.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
31441.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
31451.1Skamil
31461.1Skamil		FORKEE_ASSERT_EQ(siginfo2_caught, 1);
31471.1Skamil
31481.13Schristos		DPRINTF("Before exiting of the child process\n");
31491.1Skamil		_exit(exitval);
31501.1Skamil	}
31511.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
31521.1Skamil
31531.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
31541.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
31551.1Skamil
31561.1Skamil	validate_status_stopped(status, sigval);
31571.1Skamil
31581.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
31591.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
31601.1Skamil
31611.13Schristos	DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
31621.13Schristos	DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n",
31631.1Skamil	    info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
31641.1Skamil	    info.psi_siginfo.si_errno);
31651.1Skamil
31661.13Schristos	DPRINTF("Before calling ptrace(2) with PT_SET_SIGINFO for child\n");
31671.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_SIGINFO, child, &info, sizeof(info)) != -1);
31681.1Skamil
31691.13Schristos	DPRINTF("Before resuming the child process where it left off and "
31701.1Skamil	    "without signal to be sent\n");
31711.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, sigval) != -1);
31721.1Skamil
31731.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
31741.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
31751.1Skamil
31761.1Skamil	validate_status_exited(status, exitval);
31771.1Skamil
31781.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
31791.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
31801.1Skamil}
31811.1Skamil
31821.1SkamilATF_TC(siginfo3);
31831.1SkamilATF_TC_HEAD(siginfo3, tc)
31841.1Skamil{
31851.1Skamil	atf_tc_set_md_var(tc, "descr",
31861.1Skamil	    "Verify basic PT_GET_SIGINFO and PT_SET_SIGINFO calls with "
31871.1Skamil	    "setting signal to new value");
31881.1Skamil}
31891.1Skamil
31901.1Skamilstatic int siginfo3_caught = 0;
31911.1Skamil
31921.1Skamilstatic void
31931.1Skamilsiginfo3_sigaction(int sig, siginfo_t *info, void *ctx)
31941.1Skamil{
31951.1Skamil	FORKEE_ASSERT_EQ(sig, SIGTRAP);
31961.1Skamil
31971.1Skamil	FORKEE_ASSERT_EQ(info->si_signo, SIGTRAP);
31981.1Skamil	FORKEE_ASSERT_EQ(info->si_code, TRAP_BRKPT);
31991.1Skamil
32001.1Skamil	++siginfo3_caught;
32011.1Skamil}
32021.1Skamil
32031.1SkamilATF_TC_BODY(siginfo3, tc)
32041.1Skamil{
32051.1Skamil	const int exitval = 5;
32061.1Skamil	const int sigval = SIGINT;
32071.1Skamil	const int sigfaked = SIGTRAP;
32081.1Skamil	const int sicodefaked = TRAP_BRKPT;
32091.1Skamil	pid_t child, wpid;
32101.1Skamil	struct sigaction sa;
32111.1Skamil#if defined(TWAIT_HAVE_STATUS)
32121.1Skamil	int status;
32131.1Skamil#endif
32141.1Skamil	struct ptrace_siginfo info;
32151.1Skamil	memset(&info, 0, sizeof(info));
32161.1Skamil
32171.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
32181.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
32191.1Skamil	if (child == 0) {
32201.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
32211.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
32221.1Skamil
32231.1Skamil		sa.sa_sigaction = siginfo3_sigaction;
32241.1Skamil		sa.sa_flags = SA_SIGINFO;
32251.1Skamil		sigemptyset(&sa.sa_mask);
32261.1Skamil
32271.1Skamil		FORKEE_ASSERT(sigaction(sigfaked, &sa, NULL) != -1);
32281.1Skamil
32291.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
32301.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
32311.1Skamil
32321.1Skamil		FORKEE_ASSERT_EQ(siginfo3_caught, 1);
32331.1Skamil
32341.13Schristos		DPRINTF("Before exiting of the child process\n");
32351.1Skamil		_exit(exitval);
32361.1Skamil	}
32371.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
32381.1Skamil
32391.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
32401.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
32411.1Skamil
32421.1Skamil	validate_status_stopped(status, sigval);
32431.1Skamil
32441.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
32451.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
32461.1Skamil
32471.13Schristos	DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
32481.13Schristos	DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n",
32491.1Skamil	    info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
32501.1Skamil	    info.psi_siginfo.si_errno);
32511.1Skamil
32521.13Schristos	DPRINTF("Before setting new faked signal to signo=%d si_code=%d\n",
32531.1Skamil	    sigfaked, sicodefaked);
32541.1Skamil	info.psi_siginfo.si_signo = sigfaked;
32551.1Skamil	info.psi_siginfo.si_code = sicodefaked;
32561.1Skamil
32571.13Schristos	DPRINTF("Before calling ptrace(2) with PT_SET_SIGINFO for child\n");
32581.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_SIGINFO, child, &info, sizeof(info)) != -1);
32591.1Skamil
32601.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
32611.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
32621.1Skamil
32631.13Schristos	DPRINTF("Before checking siginfo_t\n");
32641.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigfaked);
32651.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, sicodefaked);
32661.1Skamil
32671.13Schristos	DPRINTF("Before resuming the child process where it left off and "
32681.1Skamil	    "without signal to be sent\n");
32691.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, sigfaked) != -1);
32701.1Skamil
32711.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
32721.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
32731.1Skamil
32741.1Skamil	validate_status_exited(status, exitval);
32751.1Skamil
32761.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
32771.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
32781.1Skamil}
32791.1Skamil
32801.1SkamilATF_TC(siginfo4);
32811.1SkamilATF_TC_HEAD(siginfo4, tc)
32821.1Skamil{
32831.1Skamil	atf_tc_set_md_var(tc, "descr",
32841.1Skamil	    "Detect SIGTRAP TRAP_EXEC from tracee");
32851.1Skamil}
32861.1Skamil
32871.1SkamilATF_TC_BODY(siginfo4, tc)
32881.1Skamil{
32891.1Skamil	const int sigval = SIGTRAP;
32901.1Skamil	pid_t child, wpid;
32911.1Skamil#if defined(TWAIT_HAVE_STATUS)
32921.1Skamil	int status;
32931.1Skamil#endif
32941.1Skamil
32951.1Skamil	struct ptrace_siginfo info;
32961.1Skamil	memset(&info, 0, sizeof(info));
32971.1Skamil
32981.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
32991.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
33001.1Skamil	if (child == 0) {
33011.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
33021.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
33031.1Skamil
33041.13Schristos		DPRINTF("Before calling execve(2) from child\n");
33051.1Skamil		execlp("/bin/echo", "/bin/echo", NULL);
33061.1Skamil
33071.1Skamil		FORKEE_ASSERT(0 && "Not reached");
33081.1Skamil	}
33091.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
33101.1Skamil
33111.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
33121.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
33131.1Skamil
33141.1Skamil	validate_status_stopped(status, sigval);
33151.1Skamil
33161.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
33171.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
33181.1Skamil
33191.13Schristos	DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
33201.13Schristos	DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n",
33211.1Skamil	    info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
33221.1Skamil	    info.psi_siginfo.si_errno);
33231.1Skamil
33241.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigval);
33251.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_EXEC);
33261.1Skamil
33271.13Schristos	DPRINTF("Before resuming the child process where it left off and "
33281.1Skamil	    "without signal to be sent\n");
33291.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
33301.1Skamil
33311.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
33321.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
33331.1Skamil
33341.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
33351.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
33361.1Skamil}
33371.1Skamil
33381.1Skamil#if defined(TWAIT_HAVE_PID)
33391.1SkamilATF_TC(siginfo5);
33401.1SkamilATF_TC_HEAD(siginfo5, tc)
33411.1Skamil{
33421.1Skamil	atf_tc_set_md_var(tc, "descr",
33431.1Skamil	    "Verify that fork(2) is intercepted by ptrace(2) with EVENT_MASK "
33441.1Skamil	    "set to PTRACE_FORK and reports correct signal information");
33451.1Skamil}
33461.1Skamil
33471.1SkamilATF_TC_BODY(siginfo5, tc)
33481.1Skamil{
33491.1Skamil	const int exitval = 5;
33501.1Skamil	const int exitval2 = 15;
33511.1Skamil	const int sigval = SIGSTOP;
33521.1Skamil	pid_t child, child2, wpid;
33531.1Skamil#if defined(TWAIT_HAVE_STATUS)
33541.1Skamil	int status;
33551.1Skamil#endif
33561.1Skamil	ptrace_state_t state;
33571.1Skamil	const int slen = sizeof(state);
33581.1Skamil	ptrace_event_t event;
33591.1Skamil	const int elen = sizeof(event);
33601.1Skamil	struct ptrace_siginfo info;
33611.1Skamil
33621.1Skamil	memset(&info, 0, sizeof(info));
33631.1Skamil
33641.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
33651.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
33661.1Skamil	if (child == 0) {
33671.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
33681.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
33691.1Skamil
33701.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
33711.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
33721.1Skamil
33731.1Skamil		FORKEE_ASSERT((child2 = fork()) != -1);
33741.1Skamil
33751.1Skamil		if (child2 == 0)
33761.1Skamil			_exit(exitval2);
33771.1Skamil
33781.1Skamil		FORKEE_REQUIRE_SUCCESS
33791.1Skamil		    (wpid = TWAIT_GENERIC(child2, &status, 0), child2);
33801.1Skamil
33811.1Skamil		forkee_status_exited(status, exitval2);
33821.1Skamil
33831.13Schristos		DPRINTF("Before exiting of the child process\n");
33841.1Skamil		_exit(exitval);
33851.1Skamil	}
33861.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
33871.1Skamil
33881.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
33891.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
33901.1Skamil
33911.1Skamil	validate_status_stopped(status, sigval);
33921.1Skamil
33931.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
33941.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
33951.1Skamil
33961.13Schristos	DPRINTF("Before checking siginfo_t\n");
33971.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigval);
33981.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, SI_LWP);
33991.1Skamil
34001.13Schristos	DPRINTF("Enable PTRACE_FORK in EVENT_MASK for the child %d\n", child);
34011.1Skamil	event.pe_set_event = PTRACE_FORK;
34021.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);
34031.1Skamil
34041.13Schristos	DPRINTF("Before resuming the child process where it left off and "
34051.1Skamil	    "without signal to be sent\n");
34061.13Schristos        DPRINTF("We expect two SIGTRAP events, for child %d (TRAP_CHLD, "
34071.1Skamil               "pe_report_event=PTRACE_FORK, state.pe_other_pid=child2) and "
34081.1Skamil               "for child2 (TRAP_CHLD, pe_report_event=PTRACE_FORK, "
34091.1Skamil                "state.pe_other_pid=child)\n", child);
34101.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
34111.1Skamil
34121.13Schristos	DPRINTF("Before calling %s() for the child %d\n", TWAIT_FNAME, child);
34131.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
34141.1Skamil
34151.1Skamil	validate_status_stopped(status, SIGTRAP);
34161.1Skamil
34171.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
34181.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
34191.1Skamil
34201.13Schristos	DPRINTF("Before checking siginfo_t\n");
34211.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, SIGTRAP);
34221.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_CHLD);
34231.1Skamil
34241.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
34251.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_FORK);
34261.1Skamil
34271.1Skamil	child2 = state.pe_other_pid;
34281.13Schristos	DPRINTF("Reported PTRACE_FORK event with forkee %d\n", child2);
34291.1Skamil
34301.13Schristos	DPRINTF("Before calling %s() for the forkee %d of the child %d\n",
34311.1Skamil	    TWAIT_FNAME, child2, child);
34321.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0),
34331.1Skamil	    child2);
34341.1Skamil
34351.1Skamil	validate_status_stopped(status, SIGTRAP);
34361.1Skamil
34371.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
34381.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
34391.1Skamil
34401.13Schristos	DPRINTF("Before checking siginfo_t\n");
34411.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, SIGTRAP);
34421.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_CHLD);
34431.1Skamil
34441.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child2, &state, slen) != -1);
34451.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_FORK);
34461.1Skamil	ATF_REQUIRE_EQ(state.pe_other_pid, child);
34471.1Skamil
34481.13Schristos	DPRINTF("Before resuming the forkee process where it left off and "
34491.1Skamil	    "without signal to be sent\n");
34501.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child2, (void *)1, 0) != -1);
34511.1Skamil
34521.13Schristos	DPRINTF("Before resuming the child process where it left off and "
34531.1Skamil	    "without signal to be sent\n");
34541.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
34551.1Skamil
34561.13Schristos	DPRINTF("Before calling %s() for the forkee - expected exited\n",
34571.1Skamil	    TWAIT_FNAME);
34581.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0),
34591.1Skamil	    child2);
34601.1Skamil
34611.1Skamil	validate_status_exited(status, exitval2);
34621.1Skamil
34631.13Schristos	DPRINTF("Before calling %s() for the forkee - expected no process\n",
34641.1Skamil	    TWAIT_FNAME);
34651.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD,
34661.1Skamil	    wpid = TWAIT_GENERIC(child2, &status, 0));
34671.1Skamil
34681.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
34691.1Skamil	    "SIGCHLD\n", TWAIT_FNAME);
34701.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
34711.1Skamil
34721.1Skamil	validate_status_stopped(status, SIGCHLD);
34731.1Skamil
34741.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
34751.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
34761.1Skamil
34771.13Schristos	DPRINTF("Before checking siginfo_t\n");
34781.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, SIGCHLD);
34791.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, CLD_EXITED);
34801.1Skamil
34811.13Schristos	DPRINTF("Before resuming the child process where it left off and "
34821.1Skamil	    "without signal to be sent\n");
34831.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
34841.1Skamil
34851.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
34861.1Skamil	    TWAIT_FNAME);
34871.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
34881.1Skamil
34891.1Skamil	validate_status_exited(status, exitval);
34901.1Skamil
34911.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
34921.1Skamil	    TWAIT_FNAME);
34931.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
34941.1Skamil}
34951.1Skamil#endif
34961.1Skamil
34971.1Skamil#if defined(PT_STEP)
34981.1SkamilATF_TC(siginfo6);
34991.1SkamilATF_TC_HEAD(siginfo6, tc)
35001.1Skamil{
35011.1Skamil	atf_tc_set_md_var(tc, "descr",
35021.1Skamil	    "Verify single PT_STEP call with signal information check");
35031.1Skamil}
35041.1Skamil
35051.1SkamilATF_TC_BODY(siginfo6, tc)
35061.1Skamil{
35071.1Skamil	const int exitval = 5;
35081.1Skamil	const int sigval = SIGSTOP;
35091.1Skamil	pid_t child, wpid;
35101.1Skamil#if defined(TWAIT_HAVE_STATUS)
35111.1Skamil	int status;
35121.1Skamil#endif
35131.1Skamil	int happy;
35141.1Skamil	struct ptrace_siginfo info;
35151.1Skamil
35161.1Skamil#if defined(__arm__)
35171.1Skamil	/* PT_STEP not supported on arm 32-bit */
35181.1Skamil	atf_tc_expect_fail("PR kern/52119");
35191.1Skamil#endif
35201.1Skamil
35211.1Skamil	memset(&info, 0, sizeof(info));
35221.1Skamil
35231.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
35241.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
35251.1Skamil	if (child == 0) {
35261.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
35271.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
35281.1Skamil
35291.1Skamil		happy = check_happy(100);
35301.1Skamil
35311.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
35321.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
35331.1Skamil
35341.1Skamil		FORKEE_ASSERT_EQ(happy, check_happy(100));
35351.1Skamil
35361.13Schristos		DPRINTF("Before exiting of the child process\n");
35371.1Skamil		_exit(exitval);
35381.1Skamil	}
35391.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
35401.1Skamil
35411.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
35421.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
35431.1Skamil
35441.1Skamil	validate_status_stopped(status, sigval);
35451.1Skamil
35461.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
35471.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
35481.1Skamil
35491.13Schristos	DPRINTF("Before checking siginfo_t\n");
35501.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigval);
35511.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, SI_LWP);
35521.1Skamil
35531.13Schristos	DPRINTF("Before resuming the child process where it left off and "
35541.1Skamil	    "without signal to be sent (use PT_STEP)\n");
35551.13Schristos	SYSCALL_REQUIRE(ptrace(PT_STEP, child, (void *)1, 0) != -1);
35561.1Skamil
35571.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
35581.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
35591.1Skamil
35601.1Skamil	validate_status_stopped(status, SIGTRAP);
35611.1Skamil
35621.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
35631.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
35641.1Skamil
35651.13Schristos	DPRINTF("Before checking siginfo_t\n");
35661.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, SIGTRAP);
35671.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_TRACE);
35681.1Skamil
35691.13Schristos	DPRINTF("Before resuming the child process where it left off and "
35701.1Skamil	    "without signal to be sent\n");
35711.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
35721.1Skamil
35731.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
35741.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
35751.1Skamil
35761.1Skamil	validate_status_exited(status, exitval);
35771.1Skamil
35781.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
35791.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
35801.1Skamil}
35811.1Skamil#endif
35821.1Skamil
35831.1Skamilvolatile lwpid_t the_lwp_id = 0;
35841.1Skamil
35851.1Skamilstatic void
35861.1Skamillwp_main_func(void *arg)
35871.1Skamil{
35881.1Skamil	the_lwp_id = _lwp_self();
35891.1Skamil	_lwp_exit();
35901.1Skamil}
35911.1Skamil
35921.1SkamilATF_TC(lwp_create1);
35931.1SkamilATF_TC_HEAD(lwp_create1, tc)
35941.1Skamil{
35951.1Skamil	atf_tc_set_md_var(tc, "descr",
35961.1Skamil	    "Verify that 1 LWP creation is intercepted by ptrace(2) with "
35971.1Skamil	    "EVENT_MASK set to PTRACE_LWP_CREATE");
35981.1Skamil}
35991.1Skamil
36001.1SkamilATF_TC_BODY(lwp_create1, tc)
36011.1Skamil{
36021.1Skamil	const int exitval = 5;
36031.1Skamil	const int sigval = SIGSTOP;
36041.1Skamil	pid_t child, wpid;
36051.1Skamil#if defined(TWAIT_HAVE_STATUS)
36061.1Skamil	int status;
36071.1Skamil#endif
36081.1Skamil	ptrace_state_t state;
36091.1Skamil	const int slen = sizeof(state);
36101.1Skamil	ptrace_event_t event;
36111.1Skamil	const int elen = sizeof(event);
36121.1Skamil	ucontext_t uc;
36131.1Skamil	lwpid_t lid;
36141.1Skamil	static const size_t ssize = 16*1024;
36151.1Skamil	void *stack;
36161.1Skamil
36171.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
36181.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
36191.1Skamil	if (child == 0) {
36201.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
36211.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
36221.1Skamil
36231.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
36241.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
36251.1Skamil
36261.13Schristos		DPRINTF("Before allocating memory for stack in child\n");
36271.1Skamil		FORKEE_ASSERT((stack = malloc(ssize)) != NULL);
36281.1Skamil
36291.13Schristos		DPRINTF("Before making context for new lwp in child\n");
36301.1Skamil		_lwp_makecontext(&uc, lwp_main_func, NULL, NULL, stack, ssize);
36311.1Skamil
36321.13Schristos		DPRINTF("Before creating new in child\n");
36331.1Skamil		FORKEE_ASSERT(_lwp_create(&uc, 0, &lid) == 0);
36341.1Skamil
36351.13Schristos		DPRINTF("Before waiting for lwp %d to exit\n", lid);
36361.1Skamil		FORKEE_ASSERT(_lwp_wait(lid, NULL) == 0);
36371.1Skamil
36381.13Schristos		DPRINTF("Before verifying that reported %d and running lid %d "
36391.1Skamil		    "are the same\n", lid, the_lwp_id);
36401.1Skamil		FORKEE_ASSERT_EQ(lid, the_lwp_id);
36411.1Skamil
36421.13Schristos		DPRINTF("Before exiting of the child process\n");
36431.1Skamil		_exit(exitval);
36441.1Skamil	}
36451.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
36461.1Skamil
36471.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
36481.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
36491.1Skamil
36501.1Skamil	validate_status_stopped(status, sigval);
36511.1Skamil
36521.13Schristos	DPRINTF("Set empty EVENT_MASK for the child %d\n", child);
36531.1Skamil	event.pe_set_event = PTRACE_LWP_CREATE;
36541.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);
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 - expected stopped "
36611.1Skamil	    "SIGTRAP\n", TWAIT_FNAME);
36621.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
36631.1Skamil
36641.1Skamil	validate_status_stopped(status, SIGTRAP);
36651.1Skamil
36661.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
36671.1Skamil
36681.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_LWP_CREATE);
36691.1Skamil
36701.1Skamil	lid = state.pe_lwp;
36711.13Schristos	DPRINTF("Reported PTRACE_LWP_CREATE event with lid %d\n", lid);
36721.1Skamil
36731.13Schristos	DPRINTF("Before resuming the child process where it left off and "
36741.1Skamil	    "without signal to be sent\n");
36751.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
36761.1Skamil
36771.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
36781.1Skamil	    TWAIT_FNAME);
36791.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
36801.1Skamil
36811.1Skamil	validate_status_exited(status, exitval);
36821.1Skamil
36831.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
36841.1Skamil	    TWAIT_FNAME);
36851.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
36861.1Skamil}
36871.1Skamil
36881.1SkamilATF_TC(lwp_exit1);
36891.1SkamilATF_TC_HEAD(lwp_exit1, tc)
36901.1Skamil{
36911.1Skamil	atf_tc_set_md_var(tc, "descr",
36921.1Skamil	    "Verify that 1 LWP creation is intercepted by ptrace(2) with "
36931.1Skamil	    "EVENT_MASK set to PTRACE_LWP_EXIT");
36941.1Skamil}
36951.1Skamil
36961.1SkamilATF_TC_BODY(lwp_exit1, tc)
36971.1Skamil{
36981.1Skamil	const int exitval = 5;
36991.1Skamil	const int sigval = SIGSTOP;
37001.1Skamil	pid_t child, wpid;
37011.1Skamil#if defined(TWAIT_HAVE_STATUS)
37021.1Skamil	int status;
37031.1Skamil#endif
37041.1Skamil	ptrace_state_t state;
37051.1Skamil	const int slen = sizeof(state);
37061.1Skamil	ptrace_event_t event;
37071.1Skamil	const int elen = sizeof(event);
37081.1Skamil	ucontext_t uc;
37091.1Skamil	lwpid_t lid;
37101.1Skamil	static const size_t ssize = 16*1024;
37111.1Skamil	void *stack;
37121.1Skamil
37131.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
37141.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
37151.1Skamil	if (child == 0) {
37161.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
37171.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
37181.1Skamil
37191.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
37201.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
37211.1Skamil
37221.13Schristos		DPRINTF("Before allocating memory for stack in child\n");
37231.1Skamil		FORKEE_ASSERT((stack = malloc(ssize)) != NULL);
37241.1Skamil
37251.13Schristos		DPRINTF("Before making context for new lwp in child\n");
37261.1Skamil		_lwp_makecontext(&uc, lwp_main_func, NULL, NULL, stack, ssize);
37271.1Skamil
37281.13Schristos		DPRINTF("Before creating new in child\n");
37291.1Skamil		FORKEE_ASSERT(_lwp_create(&uc, 0, &lid) == 0);
37301.1Skamil
37311.13Schristos		DPRINTF("Before waiting for lwp %d to exit\n", lid);
37321.1Skamil		FORKEE_ASSERT(_lwp_wait(lid, NULL) == 0);
37331.1Skamil
37341.13Schristos		DPRINTF("Before verifying that reported %d and running lid %d "
37351.1Skamil		    "are the same\n", lid, the_lwp_id);
37361.1Skamil		FORKEE_ASSERT_EQ(lid, the_lwp_id);
37371.1Skamil
37381.13Schristos		DPRINTF("Before exiting of the child process\n");
37391.1Skamil		_exit(exitval);
37401.1Skamil	}
37411.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
37421.1Skamil
37431.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
37441.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
37451.1Skamil
37461.1Skamil	validate_status_stopped(status, sigval);
37471.1Skamil
37481.13Schristos	DPRINTF("Set empty EVENT_MASK for the child %d\n", child);
37491.1Skamil	event.pe_set_event = PTRACE_LWP_EXIT;
37501.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);
37511.1Skamil
37521.13Schristos	DPRINTF("Before resuming the child process where it left off and "
37531.1Skamil	    "without signal to be sent\n");
37541.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
37551.1Skamil
37561.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
37571.1Skamil	    "SIGTRAP\n", TWAIT_FNAME);
37581.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
37591.1Skamil
37601.1Skamil	validate_status_stopped(status, SIGTRAP);
37611.1Skamil
37621.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
37631.1Skamil
37641.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_LWP_EXIT);
37651.1Skamil
37661.1Skamil	lid = state.pe_lwp;
37671.13Schristos	DPRINTF("Reported PTRACE_LWP_EXIT event with lid %d\n", lid);
37681.1Skamil
37691.13Schristos	DPRINTF("Before resuming the child process where it left off and "
37701.1Skamil	    "without signal to be sent\n");
37711.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
37721.1Skamil
37731.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
37741.1Skamil	    TWAIT_FNAME);
37751.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
37761.1Skamil
37771.1Skamil	validate_status_exited(status, exitval);
37781.1Skamil
37791.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
37801.1Skamil	    TWAIT_FNAME);
37811.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
37821.1Skamil}
37831.1Skamil
37841.1SkamilATF_TC(signal1);
37851.1SkamilATF_TC_HEAD(signal1, tc)
37861.1Skamil{
37871.1Skamil	atf_tc_set_md_var(tc, "descr",
37881.1Skamil	    "Verify that masking single unrelated signal does not stop tracer "
37891.1Skamil	    "from catching other signals");
37901.1Skamil}
37911.1Skamil
37921.1SkamilATF_TC_BODY(signal1, tc)
37931.1Skamil{
37941.1Skamil	const int exitval = 5;
37951.1Skamil	const int sigval = SIGSTOP;
37961.1Skamil	const int sigmasked = SIGTRAP;
37971.1Skamil	const int signotmasked = SIGINT;
37981.1Skamil	pid_t child, wpid;
37991.1Skamil#if defined(TWAIT_HAVE_STATUS)
38001.1Skamil	int status;
38011.1Skamil#endif
38021.1Skamil	sigset_t intmask;
38031.1Skamil
38041.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
38051.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
38061.1Skamil	if (child == 0) {
38071.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
38081.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
38091.1Skamil
38101.1Skamil		sigemptyset(&intmask);
38111.1Skamil		sigaddset(&intmask, sigmasked);
38121.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
38131.1Skamil
38141.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
38151.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
38161.1Skamil
38171.13Schristos		DPRINTF("Before raising %s from child\n",
38181.1Skamil		    strsignal(signotmasked));
38191.1Skamil		FORKEE_ASSERT(raise(signotmasked) == 0);
38201.1Skamil
38211.13Schristos		DPRINTF("Before exiting of the child process\n");
38221.1Skamil		_exit(exitval);
38231.1Skamil	}
38241.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
38251.1Skamil
38261.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
38271.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
38281.1Skamil
38291.1Skamil	validate_status_stopped(status, sigval);
38301.1Skamil
38311.13Schristos	DPRINTF("Before resuming the child process where it left off and "
38321.1Skamil	    "without signal to be sent\n");
38331.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
38341.1Skamil
38351.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
38361.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
38371.1Skamil
38381.1Skamil	validate_status_stopped(status, signotmasked);
38391.1Skamil
38401.13Schristos	DPRINTF("Before resuming the child process where it left off and "
38411.1Skamil	    "without signal to be sent\n");
38421.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
38431.1Skamil
38441.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
38451.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
38461.1Skamil
38471.1Skamil	validate_status_exited(status, exitval);
38481.1Skamil
38491.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
38501.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
38511.1Skamil}
38521.1Skamil
38531.1SkamilATF_TC(signal2);
38541.1SkamilATF_TC_HEAD(signal2, tc)
38551.1Skamil{
38561.1Skamil	atf_tc_set_md_var(tc, "descr",
38571.1Skamil	    "Verify that masking SIGTRAP in tracee stops tracer from "
38581.1Skamil	    "catching this raised signal");
38591.1Skamil}
38601.1Skamil
38611.1SkamilATF_TC_BODY(signal2, tc)
38621.1Skamil{
38631.1Skamil	const int exitval = 5;
38641.1Skamil	const int sigval = SIGSTOP;
38651.1Skamil	const int sigmasked = SIGTRAP;
38661.1Skamil	pid_t child, wpid;
38671.1Skamil#if defined(TWAIT_HAVE_STATUS)
38681.1Skamil	int status;
38691.1Skamil#endif
38701.1Skamil	sigset_t intmask;
38711.1Skamil
38721.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
38731.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
38741.1Skamil	if (child == 0) {
38751.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
38761.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
38771.1Skamil
38781.1Skamil		sigemptyset(&intmask);
38791.1Skamil		sigaddset(&intmask, sigmasked);
38801.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
38811.1Skamil
38821.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
38831.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
38841.1Skamil
38851.13Schristos		DPRINTF("Before raising %s breakpoint from child\n",
38861.1Skamil		    strsignal(sigmasked));
38871.1Skamil		FORKEE_ASSERT(raise(sigmasked) == 0);
38881.1Skamil
38891.13Schristos		DPRINTF("Before exiting of the child process\n");
38901.1Skamil		_exit(exitval);
38911.1Skamil	}
38921.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
38931.1Skamil
38941.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
38951.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
38961.1Skamil
38971.1Skamil	validate_status_stopped(status, sigval);
38981.1Skamil
38991.13Schristos	DPRINTF("Before resuming the child process where it left off and "
39001.1Skamil	    "without signal to be sent\n");
39011.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
39021.1Skamil
39031.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
39041.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
39051.1Skamil
39061.1Skamil	validate_status_exited(status, exitval);
39071.1Skamil
39081.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
39091.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
39101.1Skamil}
39111.1Skamil
39121.1SkamilATF_TC(signal3);
39131.1SkamilATF_TC_HEAD(signal3, tc)
39141.1Skamil{
39151.7Skamil	atf_tc_set_md_var(tc, "timeout", "5");
39161.1Skamil	atf_tc_set_md_var(tc, "descr",
39171.1Skamil	    "Verify that masking SIGTRAP in tracee does not stop tracer from "
39181.1Skamil	    "catching software breakpoints");
39191.1Skamil}
39201.1Skamil
39211.1SkamilATF_TC_BODY(signal3, tc)
39221.1Skamil{
39231.1Skamil	const int exitval = 5;
39241.1Skamil	const int sigval = SIGSTOP;
39251.1Skamil	const int sigmasked = SIGTRAP;
39261.1Skamil	pid_t child, wpid;
39271.1Skamil#if defined(TWAIT_HAVE_STATUS)
39281.1Skamil	int status;
39291.1Skamil#endif
39301.1Skamil	sigset_t intmask;
39311.1Skamil
39321.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
39331.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
39341.1Skamil	if (child == 0) {
39351.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
39361.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
39371.1Skamil
39381.1Skamil		sigemptyset(&intmask);
39391.1Skamil		sigaddset(&intmask, sigmasked);
39401.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
39411.1Skamil
39421.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
39431.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
39441.1Skamil
39451.13Schristos		DPRINTF("Before raising software breakpoint from child\n");
39461.52Skamil		trigger_trap();
39471.1Skamil
39481.13Schristos		DPRINTF("Before exiting of the child process\n");
39491.1Skamil		_exit(exitval);
39501.1Skamil	}
39511.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
39521.1Skamil
39531.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
39541.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
39551.1Skamil
39561.1Skamil	validate_status_stopped(status, sigval);
39571.1Skamil
39581.13Schristos	DPRINTF("Before resuming the child process where it left off and "
39591.1Skamil	    "without signal to be sent\n");
39601.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
39611.1Skamil
39621.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
39631.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
39641.1Skamil
39651.1Skamil	validate_status_stopped(status, sigmasked);
39661.1Skamil
39671.13Schristos	DPRINTF("Before resuming the child process where it left off and "
39681.1Skamil	    "without signal to be sent\n");
39691.49Skamil	SYSCALL_REQUIRE(ptrace(PT_KILL, child, NULL, 0) != -1);
39701.1Skamil
39711.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
39721.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
39731.1Skamil
39741.49Skamil	validate_status_signaled(status, SIGKILL, 0);
39751.1Skamil
39761.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
39771.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
39781.1Skamil}
39791.1Skamil
39801.1Skamil#if defined(PT_STEP)
39811.1SkamilATF_TC(signal4);
39821.1SkamilATF_TC_HEAD(signal4, tc)
39831.1Skamil{
39841.1Skamil	atf_tc_set_md_var(tc, "descr",
39851.1Skamil	    "Verify that masking SIGTRAP in tracee does not stop tracer from "
39861.1Skamil	    "catching single step trap");
39871.1Skamil}
39881.1Skamil
39891.1SkamilATF_TC_BODY(signal4, tc)
39901.1Skamil{
39911.1Skamil	const int exitval = 5;
39921.1Skamil	const int sigval = SIGSTOP;
39931.1Skamil	const int sigmasked = SIGTRAP;
39941.1Skamil	pid_t child, wpid;
39951.1Skamil#if defined(TWAIT_HAVE_STATUS)
39961.1Skamil	int status;
39971.1Skamil#endif
39981.1Skamil	sigset_t intmask;
39991.1Skamil	int happy;
40001.1Skamil
40011.1Skamil#if defined(__arm__)
40021.5Skamil	/* PT_STEP not supported on arm 32-bit */
40031.5Skamil	atf_tc_expect_fail("PR kern/51918 PR kern/52119");
40041.1Skamil#endif
40051.1Skamil
40061.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
40071.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
40081.1Skamil	if (child == 0) {
40091.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
40101.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
40111.1Skamil
40121.1Skamil		happy = check_happy(100);
40131.1Skamil
40141.1Skamil		sigemptyset(&intmask);
40151.1Skamil		sigaddset(&intmask, sigmasked);
40161.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
40171.1Skamil
40181.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
40191.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
40201.1Skamil
40211.1Skamil		FORKEE_ASSERT_EQ(happy, check_happy(100));
40221.1Skamil
40231.13Schristos		DPRINTF("Before exiting of the child process\n");
40241.1Skamil		_exit(exitval);
40251.1Skamil	}
40261.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
40271.1Skamil
40281.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
40291.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
40301.1Skamil
40311.1Skamil	validate_status_stopped(status, sigval);
40321.1Skamil
40331.13Schristos	DPRINTF("Before resuming the child process where it left off and "
40341.1Skamil	    "without signal to be sent\n");
40351.13Schristos	SYSCALL_REQUIRE(ptrace(PT_STEP, child, (void *)1, 0) != -1);
40361.1Skamil
40371.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
40381.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
40391.1Skamil
40401.1Skamil	validate_status_stopped(status, sigmasked);
40411.1Skamil
40421.13Schristos	DPRINTF("Before resuming the child process where it left off and "
40431.1Skamil	    "without signal to be sent\n");
40441.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
40451.1Skamil
40461.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
40471.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
40481.1Skamil
40491.1Skamil	validate_status_exited(status, exitval);
40501.1Skamil
40511.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
40521.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
40531.1Skamil}
40541.1Skamil#endif
40551.1Skamil
40561.1SkamilATF_TC(signal5);
40571.1SkamilATF_TC_HEAD(signal5, tc)
40581.1Skamil{
40591.1Skamil	atf_tc_set_md_var(tc, "descr",
40601.1Skamil	    "Verify that masking SIGTRAP in tracee does not stop tracer from "
40611.1Skamil	    "catching exec() breakpoint");
40621.1Skamil}
40631.1Skamil
40641.1SkamilATF_TC_BODY(signal5, tc)
40651.1Skamil{
40661.1Skamil	const int exitval = 5;
40671.1Skamil	const int sigval = SIGSTOP;
40681.1Skamil	const int sigmasked = SIGTRAP;
40691.1Skamil	pid_t child, wpid;
40701.1Skamil#if defined(TWAIT_HAVE_STATUS)
40711.1Skamil	int status;
40721.1Skamil#endif
40731.1Skamil	sigset_t intmask;
40741.1Skamil
40751.14Schristos	atf_tc_expect_fail("wrong signal");
40761.14Schristos
40771.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
40781.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
40791.1Skamil	if (child == 0) {
40801.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
40811.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
40821.1Skamil
40831.1Skamil		sigemptyset(&intmask);
40841.1Skamil		sigaddset(&intmask, sigmasked);
40851.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
40861.1Skamil
40871.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
40881.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
40891.1Skamil
40901.13Schristos		DPRINTF("Before calling execve(2) from child\n");
40911.1Skamil		execlp("/bin/echo", "/bin/echo", NULL);
40921.1Skamil
40931.13Schristos		DPRINTF("Before exiting of the child process\n");
40941.1Skamil		_exit(exitval);
40951.1Skamil	}
40961.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
40971.1Skamil
40981.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
40991.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
41001.1Skamil
41011.1Skamil	validate_status_stopped(status, sigval);
41021.1Skamil
41031.13Schristos	DPRINTF("Before resuming the child process where it left off and "
41041.1Skamil	    "without signal to be sent\n");
41051.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
41061.1Skamil
41071.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
41081.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
41091.1Skamil
41101.1Skamil	validate_status_stopped(status, sigmasked);
41111.1Skamil
41121.13Schristos	DPRINTF("Before resuming the child process where it left off and "
41131.1Skamil	    "without signal to be sent\n");
41141.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
41151.1Skamil
41161.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
41171.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
41181.1Skamil
41191.1Skamil	validate_status_exited(status, exitval);
41201.1Skamil
41211.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
41221.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
41231.1Skamil}
41241.1Skamil
41251.1Skamil#if defined(TWAIT_HAVE_PID)
41261.1SkamilATF_TC(signal6);
41271.1SkamilATF_TC_HEAD(signal6, tc)
41281.1Skamil{
41291.1Skamil	atf_tc_set_md_var(tc, "timeout", "5");
41301.1Skamil	atf_tc_set_md_var(tc, "descr",
41311.1Skamil	    "Verify that masking SIGTRAP in tracee does not stop tracer from "
41321.1Skamil	    "catching PTRACE_FORK breakpoint");
41331.1Skamil}
41341.1Skamil
41351.1SkamilATF_TC_BODY(signal6, tc)
41361.1Skamil{
41371.1Skamil	const int exitval = 5;
41381.1Skamil	const int exitval2 = 15;
41391.1Skamil	const int sigval = SIGSTOP;
41401.1Skamil	const int sigmasked = SIGTRAP;
41411.1Skamil	pid_t child, child2, wpid;
41421.1Skamil#if defined(TWAIT_HAVE_STATUS)
41431.1Skamil	int status;
41441.1Skamil#endif
41451.1Skamil	sigset_t intmask;
41461.1Skamil	ptrace_state_t state;
41471.1Skamil	const int slen = sizeof(state);
41481.1Skamil	ptrace_event_t event;
41491.1Skamil	const int elen = sizeof(event);
41501.1Skamil
41511.38Skamil	atf_tc_expect_fail("PR kern/51918");
41521.14Schristos
41531.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
41541.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
41551.1Skamil	if (child == 0) {
41561.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
41571.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
41581.1Skamil
41591.1Skamil		sigemptyset(&intmask);
41601.1Skamil		sigaddset(&intmask, sigmasked);
41611.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
41621.1Skamil
41631.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
41641.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
41651.1Skamil
41661.1Skamil		FORKEE_ASSERT((child2 = fork()) != -1);
41671.1Skamil
41681.1Skamil		if (child2 == 0)
41691.1Skamil			_exit(exitval2);
41701.1Skamil
41711.1Skamil		FORKEE_REQUIRE_SUCCESS
41721.1Skamil			(wpid = TWAIT_GENERIC(child2, &status, 0), child2);
41731.1Skamil
41741.1Skamil		forkee_status_exited(status, exitval2);
41751.1Skamil
41761.13Schristos		DPRINTF("Before exiting of the child process\n");
41771.1Skamil		_exit(exitval);
41781.1Skamil	}
41791.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
41801.1Skamil
41811.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
41821.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
41831.1Skamil
41841.1Skamil	validate_status_stopped(status, sigval);
41851.1Skamil
41861.13Schristos	DPRINTF("Enable PTRACE_FORK in EVENT_MASK for the child %d\n", child);
41871.1Skamil	event.pe_set_event = PTRACE_FORK;
41881.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);
41891.1Skamil
41901.13Schristos	DPRINTF("Before resuming the child process where it left off and "
41911.1Skamil	    "without signal to be sent\n");
41921.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
41931.1Skamil
41941.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
41951.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
41961.1Skamil
41971.1Skamil	validate_status_stopped(status, sigmasked);
41981.1Skamil
41991.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
42001.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_FORK);
42011.1Skamil
42021.1Skamil	child2 = state.pe_other_pid;
42031.13Schristos	DPRINTF("Reported PTRACE_FORK event with forkee %d\n", child2);
42041.1Skamil
42051.13Schristos	DPRINTF("Before calling %s() for the child2\n", TWAIT_FNAME);
42061.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0),
42071.1Skamil	    child2);
42081.1Skamil
42091.1Skamil	validate_status_stopped(status, SIGTRAP);
42101.1Skamil
42111.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child2, &state, slen) != -1);
42121.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_FORK);
42131.1Skamil	ATF_REQUIRE_EQ(state.pe_other_pid, child);
42141.1Skamil
42151.13Schristos	DPRINTF("Before resuming the forkee process where it left off and "
42161.1Skamil	    "without signal to be sent\n");
42171.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child2, (void *)1, 0) != -1);
42181.1Skamil
42191.13Schristos	DPRINTF("Before resuming the child process where it left off and "
42201.1Skamil	    "without signal to be sent\n");
42211.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
42221.1Skamil
42231.13Schristos	DPRINTF("Before calling %s() for the forkee - expected exited\n",
42241.1Skamil	    TWAIT_FNAME);
42251.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0),
42261.1Skamil	    child2);
42271.1Skamil
42281.1Skamil	validate_status_exited(status, exitval2);
42291.1Skamil
42301.13Schristos	DPRINTF("Before calling %s() for the forkee - expected no process\n",
42311.1Skamil	    TWAIT_FNAME);
42321.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD,
42331.1Skamil	    wpid = TWAIT_GENERIC(child2, &status, 0));
42341.1Skamil
42351.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
42361.1Skamil	    "SIGCHLD\n", TWAIT_FNAME);
42371.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
42381.1Skamil
42391.1Skamil	validate_status_stopped(status, SIGCHLD);
42401.1Skamil
42411.13Schristos	DPRINTF("Before resuming the child process where it left off and "
42421.1Skamil	    "without signal to be sent\n");
42431.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
42441.1Skamil
42451.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
42461.1Skamil	    TWAIT_FNAME);
42471.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
42481.1Skamil
42491.1Skamil	validate_status_exited(status, exitval);
42501.1Skamil
42511.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
42521.1Skamil	    TWAIT_FNAME);
42531.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
42541.1Skamil}
42551.1Skamil#endif
42561.1Skamil
42571.1Skamil#if defined(TWAIT_HAVE_PID)
42581.1SkamilATF_TC(signal7);
42591.1SkamilATF_TC_HEAD(signal7, tc)
42601.1Skamil{
42611.1Skamil	atf_tc_set_md_var(tc, "descr",
42621.1Skamil	    "Verify that masking SIGTRAP in tracee does not stop tracer from "
42631.1Skamil	    "catching PTRACE_VFORK breakpoint");
42641.1Skamil}
42651.1Skamil
42661.1SkamilATF_TC_BODY(signal7, tc)
42671.1Skamil{
42681.1Skamil	const int exitval = 5;
42691.1Skamil	const int exitval2 = 15;
42701.1Skamil	const int sigval = SIGSTOP;
42711.1Skamil	const int sigmasked = SIGTRAP;
42721.1Skamil	pid_t child, child2, wpid;
42731.1Skamil#if defined(TWAIT_HAVE_STATUS)
42741.1Skamil	int status;
42751.1Skamil#endif
42761.1Skamil	sigset_t intmask;
42771.1Skamil	ptrace_state_t state;
42781.1Skamil	const int slen = sizeof(state);
42791.1Skamil	ptrace_event_t event;
42801.1Skamil	const int elen = sizeof(event);
42811.1Skamil
42821.38Skamil	atf_tc_expect_fail("PR kern/51918");
42831.14Schristos
42841.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
42851.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
42861.1Skamil	if (child == 0) {
42871.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
42881.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
42891.1Skamil
42901.1Skamil		sigemptyset(&intmask);
42911.1Skamil		sigaddset(&intmask, sigmasked);
42921.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
42931.1Skamil
42941.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
42951.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
42961.1Skamil
42971.1Skamil		FORKEE_ASSERT((child2 = fork()) != -1);
42981.1Skamil
42991.1Skamil		if (child2 == 0)
43001.1Skamil			_exit(exitval2);
43011.1Skamil
43021.1Skamil		FORKEE_REQUIRE_SUCCESS
43031.1Skamil			(wpid = TWAIT_GENERIC(child2, &status, 0), child2);
43041.1Skamil
43051.1Skamil		forkee_status_exited(status, exitval2);
43061.1Skamil
43071.13Schristos		DPRINTF("Before exiting of the child process\n");
43081.1Skamil		_exit(exitval);
43091.1Skamil	}
43101.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
43111.1Skamil
43121.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
43131.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
43141.1Skamil
43151.1Skamil	validate_status_stopped(status, sigval);
43161.1Skamil
43171.13Schristos	DPRINTF("Enable PTRACE_VFORK in EVENT_MASK for the child %d\n", child);
43181.1Skamil	event.pe_set_event = PTRACE_VFORK;
43191.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1 || errno == ENOTSUP);
43201.1Skamil
43211.13Schristos	DPRINTF("Before resuming the child process where it left off and "
43221.1Skamil	    "without signal to be sent\n");
43231.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
43241.1Skamil
43251.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
43261.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
43271.1Skamil
43281.1Skamil	validate_status_stopped(status, sigmasked);
43291.1Skamil
43301.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
43311.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_VFORK);
43321.1Skamil
43331.1Skamil	child2 = state.pe_other_pid;
43341.13Schristos	DPRINTF("Reported PTRACE_VFORK event with forkee %d\n", child2);
43351.1Skamil
43361.13Schristos	DPRINTF("Before calling %s() for the child2\n", TWAIT_FNAME);
43371.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0),
43381.1Skamil	    child2);
43391.1Skamil
43401.1Skamil	validate_status_stopped(status, SIGTRAP);
43411.1Skamil
43421.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child2, &state, slen) != -1);
43431.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_VFORK);
43441.1Skamil	ATF_REQUIRE_EQ(state.pe_other_pid, child);
43451.1Skamil
43461.13Schristos	DPRINTF("Before resuming the forkee process where it left off and "
43471.1Skamil	    "without signal to be sent\n");
43481.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child2, (void *)1, 0) != -1);
43491.1Skamil
43501.13Schristos	DPRINTF("Before resuming the child process where it left off and "
43511.1Skamil	    "without signal to be sent\n");
43521.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
43531.1Skamil
43541.13Schristos	DPRINTF("Before calling %s() for the forkee - expected exited\n",
43551.1Skamil	    TWAIT_FNAME);
43561.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0),
43571.1Skamil	    child2);
43581.1Skamil
43591.1Skamil	validate_status_exited(status, exitval2);
43601.1Skamil
43611.13Schristos	DPRINTF("Before calling %s() for the forkee - expected no process\n",
43621.1Skamil	    TWAIT_FNAME);
43631.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD,
43641.1Skamil	    wpid = TWAIT_GENERIC(child2, &status, 0));
43651.1Skamil
43661.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
43671.1Skamil	    "SIGCHLD\n", TWAIT_FNAME);
43681.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
43691.1Skamil
43701.1Skamil	validate_status_stopped(status, SIGCHLD);
43711.1Skamil
43721.13Schristos	DPRINTF("Before resuming the child process where it left off and "
43731.1Skamil	    "without signal to be sent\n");
43741.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
43751.1Skamil
43761.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
43771.1Skamil	    TWAIT_FNAME);
43781.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
43791.1Skamil
43801.1Skamil	validate_status_exited(status, exitval);
43811.1Skamil
43821.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
43831.1Skamil	    TWAIT_FNAME);
43841.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
43851.1Skamil}
43861.1Skamil#endif
43871.1Skamil
43881.1SkamilATF_TC(signal8);
43891.1SkamilATF_TC_HEAD(signal8, tc)
43901.1Skamil{
43911.1Skamil	atf_tc_set_md_var(tc, "descr",
43921.1Skamil	    "Verify that masking SIGTRAP in tracee does not stop tracer from "
43931.1Skamil	    "catching PTRACE_VFORK_DONE breakpoint");
43941.1Skamil}
43951.1Skamil
43961.1SkamilATF_TC_BODY(signal8, tc)
43971.1Skamil{
43981.1Skamil	const int exitval = 5;
43991.1Skamil	const int exitval2 = 15;
44001.1Skamil	const int sigval = SIGSTOP;
44011.1Skamil	const int sigmasked = SIGTRAP;
44021.1Skamil	pid_t child, child2, wpid;
44031.1Skamil#if defined(TWAIT_HAVE_STATUS)
44041.1Skamil	int status;
44051.1Skamil#endif
44061.1Skamil	sigset_t intmask;
44071.1Skamil	ptrace_state_t state;
44081.1Skamil	const int slen = sizeof(state);
44091.1Skamil	ptrace_event_t event;
44101.1Skamil	const int elen = sizeof(event);
44111.1Skamil
44121.14Schristos	atf_tc_expect_fail("PR kern/51918");
44131.14Schristos
44141.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
44151.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
44161.1Skamil	if (child == 0) {
44171.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
44181.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
44191.1Skamil
44201.1Skamil		sigemptyset(&intmask);
44211.1Skamil		sigaddset(&intmask, sigmasked);
44221.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
44231.1Skamil
44241.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
44251.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
44261.1Skamil
44271.1Skamil		FORKEE_ASSERT((child2 = vfork()) != -1);
44281.1Skamil
44291.1Skamil		if (child2 == 0)
44301.1Skamil			_exit(exitval2);
44311.1Skamil
44321.1Skamil		FORKEE_REQUIRE_SUCCESS
44331.1Skamil			(wpid = TWAIT_GENERIC(child2, &status, 0), child2);
44341.1Skamil
44351.1Skamil		forkee_status_exited(status, exitval2);
44361.1Skamil
44371.13Schristos		DPRINTF("Before exiting of the child process\n");
44381.1Skamil		_exit(exitval);
44391.1Skamil	}
44401.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
44411.1Skamil
44421.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
44431.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
44441.1Skamil
44451.1Skamil	validate_status_stopped(status, sigval);
44461.1Skamil
44471.13Schristos	DPRINTF("Enable PTRACE_VFORK_DONE in EVENT_MASK for the child %d\n",
44481.1Skamil	    child);
44491.1Skamil	event.pe_set_event = PTRACE_VFORK_DONE;
44501.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);
44511.1Skamil
44521.13Schristos	DPRINTF("Before resuming the child process where it left off and "
44531.1Skamil	    "without signal to be sent\n");
44541.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
44551.1Skamil
44561.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
44571.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
44581.1Skamil
44591.1Skamil	validate_status_stopped(status, sigmasked);
44601.1Skamil
44611.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
44621.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_VFORK_DONE);
44631.1Skamil
44641.1Skamil	child2 = state.pe_other_pid;
44651.13Schristos	DPRINTF("Reported PTRACE_VFORK_DONE event with forkee %d\n", child2);
44661.1Skamil
44671.13Schristos	DPRINTF("Before resuming the child process where it left off and "
44681.1Skamil	    "without signal to be sent\n");
44691.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
44701.1Skamil
44711.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
44721.1Skamil	    "SIGCHLD\n", TWAIT_FNAME);
44731.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
44741.1Skamil
44751.1Skamil	validate_status_stopped(status, SIGCHLD);
44761.1Skamil
44771.13Schristos	DPRINTF("Before resuming the child process where it left off and "
44781.1Skamil	    "without signal to be sent\n");
44791.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
44801.1Skamil
44811.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
44821.1Skamil	    TWAIT_FNAME);
44831.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
44841.1Skamil
44851.1Skamil	validate_status_exited(status, exitval);
44861.1Skamil
44871.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
44881.1Skamil	    TWAIT_FNAME);
44891.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
44901.1Skamil}
44911.1Skamil
44921.1SkamilATF_TC(signal9);
44931.1SkamilATF_TC_HEAD(signal9, tc)
44941.1Skamil{
44951.1Skamil	atf_tc_set_md_var(tc, "descr",
44961.1Skamil	    "Verify that masking SIGTRAP in tracee does not stop tracer from "
44971.1Skamil	    "catching PTRACE_LWP_CREATE breakpoint");
44981.1Skamil}
44991.1Skamil
45001.1SkamilATF_TC_BODY(signal9, tc)
45011.1Skamil{
45021.1Skamil	const int exitval = 5;
45031.1Skamil	const int sigval = SIGSTOP;
45041.1Skamil	const int sigmasked = SIGTRAP;
45051.1Skamil	pid_t child, wpid;
45061.1Skamil#if defined(TWAIT_HAVE_STATUS)
45071.1Skamil	int status;
45081.1Skamil#endif
45091.1Skamil	sigset_t intmask;
45101.1Skamil	ptrace_state_t state;
45111.1Skamil	const int slen = sizeof(state);
45121.1Skamil	ptrace_event_t event;
45131.1Skamil	const int elen = sizeof(event);
45141.1Skamil	ucontext_t uc;
45151.1Skamil	lwpid_t lid;
45161.1Skamil	static const size_t ssize = 16*1024;
45171.1Skamil	void *stack;
45181.1Skamil
45191.14Schristos	atf_tc_expect_fail("PR kern/51918");
45201.14Schristos
45211.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
45221.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
45231.1Skamil	if (child == 0) {
45241.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
45251.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
45261.1Skamil
45271.1Skamil		sigemptyset(&intmask);
45281.1Skamil		sigaddset(&intmask, sigmasked);
45291.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
45301.1Skamil
45311.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
45321.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
45331.1Skamil
45341.13Schristos		DPRINTF("Before allocating memory for stack in child\n");
45351.1Skamil		FORKEE_ASSERT((stack = malloc(ssize)) != NULL);
45361.1Skamil
45371.13Schristos		DPRINTF("Before making context for new lwp in child\n");
45381.1Skamil		_lwp_makecontext(&uc, lwp_main_func, NULL, NULL, stack, ssize);
45391.1Skamil
45401.13Schristos		DPRINTF("Before creating new in child\n");
45411.1Skamil		FORKEE_ASSERT(_lwp_create(&uc, 0, &lid) == 0);
45421.1Skamil
45431.13Schristos		DPRINTF("Before waiting for lwp %d to exit\n", lid);
45441.1Skamil		FORKEE_ASSERT(_lwp_wait(lid, NULL) == 0);
45451.1Skamil
45461.13Schristos		DPRINTF("Before verifying that reported %d and running lid %d "
45471.1Skamil		    "are the same\n", lid, the_lwp_id);
45481.1Skamil		FORKEE_ASSERT_EQ(lid, the_lwp_id);
45491.1Skamil
45501.13Schristos		DPRINTF("Before exiting of the child process\n");
45511.1Skamil		_exit(exitval);
45521.1Skamil	}
45531.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
45541.1Skamil
45551.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
45561.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
45571.1Skamil
45581.1Skamil	validate_status_stopped(status, sigval);
45591.1Skamil
45601.13Schristos	DPRINTF("Set empty EVENT_MASK for the child %d\n", child);
45611.1Skamil	event.pe_set_event = PTRACE_LWP_CREATE;
45621.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);
45631.1Skamil
45641.13Schristos	DPRINTF("Before resuming the child process where it left off and "
45651.1Skamil	    "without signal to be sent\n");
45661.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
45671.1Skamil
45681.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
45691.1Skamil	    "SIGTRAP\n", TWAIT_FNAME);
45701.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
45711.1Skamil
45721.1Skamil	validate_status_stopped(status, sigmasked);
45731.1Skamil
45741.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
45751.1Skamil
45761.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_LWP_CREATE);
45771.1Skamil
45781.1Skamil	lid = state.pe_lwp;
45791.13Schristos	DPRINTF("Reported PTRACE_LWP_CREATE event with lid %d\n", lid);
45801.1Skamil
45811.13Schristos	DPRINTF("Before resuming the child process where it left off and "
45821.1Skamil	    "without signal to be sent\n");
45831.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
45841.1Skamil
45851.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
45861.1Skamil	    TWAIT_FNAME);
45871.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
45881.1Skamil
45891.1Skamil	validate_status_exited(status, exitval);
45901.1Skamil
45911.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
45921.1Skamil	    TWAIT_FNAME);
45931.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
45941.1Skamil}
45951.1Skamil
45961.1SkamilATF_TC(signal10);
45971.1SkamilATF_TC_HEAD(signal10, tc)
45981.1Skamil{
45991.1Skamil	atf_tc_set_md_var(tc, "descr",
46001.1Skamil	    "Verify that masking SIGTRAP in tracee does not stop tracer from "
46011.1Skamil	    "catching PTRACE_LWP_EXIT breakpoint");
46021.1Skamil}
46031.1Skamil
46041.1SkamilATF_TC_BODY(signal10, tc)
46051.1Skamil{
46061.1Skamil	const int exitval = 5;
46071.1Skamil	const int sigval = SIGSTOP;
46081.1Skamil	const int sigmasked = SIGTRAP;
46091.1Skamil	pid_t child, wpid;
46101.1Skamil#if defined(TWAIT_HAVE_STATUS)
46111.1Skamil	int status;
46121.1Skamil#endif
46131.1Skamil	sigset_t intmask;
46141.1Skamil	ptrace_state_t state;
46151.1Skamil	const int slen = sizeof(state);
46161.1Skamil	ptrace_event_t event;
46171.1Skamil	const int elen = sizeof(event);
46181.1Skamil	ucontext_t uc;
46191.1Skamil	lwpid_t lid;
46201.1Skamil	static const size_t ssize = 16*1024;
46211.1Skamil	void *stack;
46221.1Skamil
46231.14Schristos	atf_tc_expect_fail("PR kern/51918");
46241.14Schristos
46251.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
46261.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
46271.1Skamil	if (child == 0) {
46281.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
46291.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
46301.1Skamil
46311.1Skamil		sigemptyset(&intmask);
46321.1Skamil		sigaddset(&intmask, sigmasked);
46331.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
46341.1Skamil
46351.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
46361.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
46371.1Skamil
46381.13Schristos		DPRINTF("Before allocating memory for stack in child\n");
46391.1Skamil		FORKEE_ASSERT((stack = malloc(ssize)) != NULL);
46401.1Skamil
46411.13Schristos		DPRINTF("Before making context for new lwp in child\n");
46421.1Skamil		_lwp_makecontext(&uc, lwp_main_func, NULL, NULL, stack, ssize);
46431.1Skamil
46441.13Schristos		DPRINTF("Before creating new in child\n");
46451.1Skamil		FORKEE_ASSERT(_lwp_create(&uc, 0, &lid) == 0);
46461.1Skamil
46471.13Schristos		DPRINTF("Before waiting for lwp %d to exit\n", lid);
46481.1Skamil		FORKEE_ASSERT(_lwp_wait(lid, NULL) == 0);
46491.1Skamil
46501.13Schristos		DPRINTF("Before verifying that reported %d and running lid %d "
46511.1Skamil		    "are the same\n", lid, the_lwp_id);
46521.1Skamil		FORKEE_ASSERT_EQ(lid, the_lwp_id);
46531.1Skamil
46541.13Schristos		DPRINTF("Before exiting of the child process\n");
46551.1Skamil		_exit(exitval);
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("Set empty EVENT_MASK for the child %d\n", child);
46651.1Skamil	event.pe_set_event = PTRACE_LWP_EXIT;
46661.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);
46671.1Skamil
46681.13Schristos	DPRINTF("Before resuming the child process where it left off and "
46691.1Skamil	    "without signal to be sent\n");
46701.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
46711.1Skamil
46721.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
46731.1Skamil	    "SIGTRAP\n", TWAIT_FNAME);
46741.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
46751.1Skamil
46761.1Skamil	validate_status_stopped(status, sigmasked);
46771.1Skamil
46781.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
46791.1Skamil
46801.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_LWP_EXIT);
46811.1Skamil
46821.1Skamil	lid = state.pe_lwp;
46831.13Schristos	DPRINTF("Reported PTRACE_LWP_EXIT event with lid %d\n", lid);
46841.1Skamil
46851.13Schristos	DPRINTF("Before resuming the child process where it left off and "
46861.1Skamil	    "without signal to be sent\n");
46871.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
46881.1Skamil
46891.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
46901.1Skamil	    TWAIT_FNAME);
46911.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
46921.1Skamil
46931.1Skamil	validate_status_exited(status, exitval);
46941.1Skamil
46951.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
46961.1Skamil	    TWAIT_FNAME);
46971.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
46981.1Skamil}
46991.1Skamil
47001.1Skamilstatic void
47011.1Skamillwp_main_stop(void *arg)
47021.1Skamil{
47031.1Skamil	the_lwp_id = _lwp_self();
47041.1Skamil
47051.1Skamil	raise(SIGTRAP);
47061.1Skamil
47071.1Skamil	_lwp_exit();
47081.1Skamil}
47091.1Skamil
47101.1SkamilATF_TC(suspend1);
47111.1SkamilATF_TC_HEAD(suspend1, tc)
47121.1Skamil{
47131.1Skamil	atf_tc_set_md_var(tc, "descr",
47141.1Skamil	    "Verify that a thread can be suspended by a debugger and later "
47151.1Skamil	    "resumed by a tracee");
47161.1Skamil}
47171.1Skamil
47181.1SkamilATF_TC_BODY(suspend1, tc)
47191.1Skamil{
47201.1Skamil	const int exitval = 5;
47211.1Skamil	const int sigval = SIGSTOP;
47221.1Skamil	pid_t child, wpid;
47231.1Skamil#if defined(TWAIT_HAVE_STATUS)
47241.1Skamil	int status;
47251.1Skamil#endif
47261.1Skamil	ucontext_t uc;
47271.1Skamil	lwpid_t lid;
47281.1Skamil	static const size_t ssize = 16*1024;
47291.1Skamil	void *stack;
47301.1Skamil	struct ptrace_lwpinfo pl;
47311.1Skamil	struct ptrace_siginfo psi;
47321.1Skamil	volatile int go = 0;
47331.1Skamil
47341.17Skamil	// Feature pending for refactoring
47351.17Skamil	atf_tc_expect_fail("PR kern/51995");
47361.17Skamil
47371.16Skamil	// Hangs with qemu
47381.16Skamil	ATF_REQUIRE(0 && "In order to get reliable failure, abort");
47391.16Skamil
47401.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
47411.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
47421.1Skamil	if (child == 0) {
47431.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
47441.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
47451.1Skamil
47461.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
47471.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
47481.1Skamil
47491.13Schristos		DPRINTF("Before allocating memory for stack in child\n");
47501.1Skamil		FORKEE_ASSERT((stack = malloc(ssize)) != NULL);
47511.1Skamil
47521.13Schristos		DPRINTF("Before making context for new lwp in child\n");
47531.1Skamil		_lwp_makecontext(&uc, lwp_main_stop, NULL, NULL, stack, ssize);
47541.1Skamil
47551.13Schristos		DPRINTF("Before creating new in child\n");
47561.1Skamil		FORKEE_ASSERT(_lwp_create(&uc, 0, &lid) == 0);
47571.1Skamil
47581.1Skamil		while (go == 0)
47591.1Skamil			continue;
47601.1Skamil
47611.1Skamil		raise(SIGINT);
47621.1Skamil
47631.1Skamil		FORKEE_ASSERT(_lwp_continue(lid) == 0);
47641.1Skamil
47651.13Schristos		DPRINTF("Before waiting for lwp %d to exit\n", lid);
47661.1Skamil		FORKEE_ASSERT(_lwp_wait(lid, NULL) == 0);
47671.1Skamil
47681.13Schristos		DPRINTF("Before verifying that reported %d and running lid %d "
47691.1Skamil		    "are the same\n", lid, the_lwp_id);
47701.1Skamil		FORKEE_ASSERT_EQ(lid, the_lwp_id);
47711.1Skamil
47721.13Schristos		DPRINTF("Before exiting of the child process\n");
47731.1Skamil		_exit(exitval);
47741.1Skamil	}
47751.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
47761.1Skamil
47771.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
47781.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
47791.1Skamil
47801.1Skamil	validate_status_stopped(status, sigval);
47811.1Skamil
47821.13Schristos	DPRINTF("Before resuming the child process where it left off and "
47831.1Skamil	    "without signal to be sent\n");
47841.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
47851.1Skamil
47861.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
47871.1Skamil	    "SIGTRAP\n", TWAIT_FNAME);
47881.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
47891.1Skamil
47901.1Skamil	validate_status_stopped(status, SIGTRAP);
47911.1Skamil
47921.13Schristos	DPRINTF("Before reading siginfo and lwpid_t\n");
47931.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &psi, sizeof(psi)) != -1);
47941.1Skamil
47951.13Schristos	DPRINTF("Before suspending LWP %d\n", psi.psi_lwpid);
47961.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SUSPEND, child, NULL, psi.psi_lwpid) != -1);
47971.1Skamil
47981.13Schristos        DPRINTF("Write new go to tracee (PID=%d) from tracer (PID=%d)\n",
47991.1Skamil	    child, getpid());
48001.13Schristos	SYSCALL_REQUIRE(ptrace(PT_WRITE_D, child, __UNVOLATILE(&go), 1) != -1);
48011.1Skamil
48021.13Schristos	DPRINTF("Before resuming the child process where it left off and "
48031.1Skamil	    "without signal to be sent\n");
48041.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
48051.1Skamil
48061.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
48071.1Skamil	    "SIGINT\n", TWAIT_FNAME);
48081.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
48091.1Skamil
48101.1Skamil	validate_status_stopped(status, SIGINT);
48111.1Skamil
48121.1Skamil	pl.pl_lwpid = 0;
48131.1Skamil
48141.13Schristos	SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &pl, sizeof(pl)) != -1);
48151.1Skamil	while (pl.pl_lwpid != 0) {
48161.1Skamil
48171.13Schristos		SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &pl, sizeof(pl)) != -1);
48181.1Skamil		switch (pl.pl_lwpid) {
48191.1Skamil		case 1:
48201.1Skamil			ATF_REQUIRE_EQ(pl.pl_event, PL_EVENT_SIGNAL);
48211.1Skamil			break;
48221.1Skamil		case 2:
48231.1Skamil			ATF_REQUIRE_EQ(pl.pl_event, PL_EVENT_SUSPENDED);
48241.1Skamil			break;
48251.1Skamil		}
48261.1Skamil	}
48271.1Skamil
48281.13Schristos	DPRINTF("Before resuming the child process where it left off and "
48291.1Skamil	    "without signal to be sent\n");
48301.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
48311.1Skamil
48321.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
48331.1Skamil	    TWAIT_FNAME);
48341.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
48351.1Skamil
48361.1Skamil	validate_status_exited(status, exitval);
48371.1Skamil
48381.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
48391.1Skamil	    TWAIT_FNAME);
48401.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
48411.1Skamil}
48421.1Skamil
48431.1SkamilATF_TC(suspend2);
48441.1SkamilATF_TC_HEAD(suspend2, tc)
48451.1Skamil{
48461.1Skamil	atf_tc_set_md_var(tc, "descr",
48471.1Skamil	    "Verify that the while the only thread within a process is "
48481.1Skamil	    "suspended, the whole process cannot be unstopped");
48491.1Skamil}
48501.1Skamil
48511.1SkamilATF_TC_BODY(suspend2, tc)
48521.1Skamil{
48531.1Skamil	const int exitval = 5;
48541.1Skamil	const int sigval = SIGSTOP;
48551.1Skamil	pid_t child, wpid;
48561.1Skamil#if defined(TWAIT_HAVE_STATUS)
48571.1Skamil	int status;
48581.1Skamil#endif
48591.1Skamil	struct ptrace_siginfo psi;
48601.1Skamil
48611.17Skamil	// Feature pending for refactoring
48621.17Skamil	atf_tc_expect_fail("PR kern/51995");
48631.17Skamil
48641.16Skamil	// Hangs with qemu
48651.16Skamil	ATF_REQUIRE(0 && "In order to get reliable failure, abort");
48661.16Skamil
48671.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
48681.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
48691.1Skamil	if (child == 0) {
48701.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
48711.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
48721.1Skamil
48731.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
48741.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
48751.1Skamil
48761.13Schristos		DPRINTF("Before exiting of the child process\n");
48771.1Skamil		_exit(exitval);
48781.1Skamil	}
48791.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
48801.1Skamil
48811.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
48821.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
48831.1Skamil
48841.1Skamil	validate_status_stopped(status, sigval);
48851.1Skamil
48861.13Schristos	DPRINTF("Before reading siginfo and lwpid_t\n");
48871.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &psi, sizeof(psi)) != -1);
48881.1Skamil
48891.13Schristos	DPRINTF("Before suspending LWP %d\n", psi.psi_lwpid);
48901.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SUSPEND, child, NULL, psi.psi_lwpid) != -1);
48911.1Skamil
48921.13Schristos	DPRINTF("Before resuming the child process where it left off and "
48931.1Skamil	    "without signal to be sent\n");
48941.1Skamil	ATF_REQUIRE_ERRNO(EDEADLK,
48951.1Skamil	    ptrace(PT_CONTINUE, child, (void *)1, 0) == -1);
48961.1Skamil
48971.13Schristos	DPRINTF("Before resuming LWP %d\n", psi.psi_lwpid);
48981.13Schristos	SYSCALL_REQUIRE(ptrace(PT_RESUME, child, NULL, psi.psi_lwpid) != -1);
48991.1Skamil
49001.13Schristos	DPRINTF("Before resuming the child process where it left off and "
49011.1Skamil	    "without signal to be sent\n");
49021.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
49031.1Skamil
49041.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
49051.1Skamil	    TWAIT_FNAME);
49061.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
49071.1Skamil
49081.1Skamil	validate_status_exited(status, exitval);
49091.1Skamil
49101.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
49111.1Skamil	    TWAIT_FNAME);
49121.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
49131.1Skamil}
49141.1Skamil
49151.1SkamilATF_TC(resume1);
49161.1SkamilATF_TC_HEAD(resume1, tc)
49171.1Skamil{
49181.1Skamil	atf_tc_set_md_var(tc, "timeout", "5");
49191.1Skamil	atf_tc_set_md_var(tc, "descr",
49201.1Skamil	    "Verify that a thread can be suspended by a debugger and later "
49211.1Skamil	    "resumed by the debugger");
49221.1Skamil}
49231.1Skamil
49241.1SkamilATF_TC_BODY(resume1, tc)
49251.1Skamil{
49261.1Skamil	struct msg_fds fds;
49271.1Skamil	const int exitval = 5;
49281.1Skamil	const int sigval = SIGSTOP;
49291.1Skamil	pid_t child, wpid;
49301.1Skamil	uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */
49311.1Skamil#if defined(TWAIT_HAVE_STATUS)
49321.1Skamil	int status;
49331.1Skamil#endif
49341.1Skamil	ucontext_t uc;
49351.1Skamil	lwpid_t lid;
49361.1Skamil	static const size_t ssize = 16*1024;
49371.1Skamil	void *stack;
49381.1Skamil	struct ptrace_lwpinfo pl;
49391.1Skamil	struct ptrace_siginfo psi;
49401.1Skamil
49411.17Skamil	// Feature pending for refactoring
49421.17Skamil	atf_tc_expect_fail("PR kern/51995");
49431.17Skamil
49441.15Schristos	// Hangs with qemu
49451.15Schristos	ATF_REQUIRE(0 && "In order to get reliable failure, abort");
49461.1Skamil
49471.13Schristos	SYSCALL_REQUIRE(msg_open(&fds) == 0);
49481.1Skamil
49491.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
49501.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
49511.1Skamil	if (child == 0) {
49521.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
49531.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
49541.1Skamil
49551.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
49561.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
49571.1Skamil
49581.13Schristos		DPRINTF("Before allocating memory for stack in child\n");
49591.1Skamil		FORKEE_ASSERT((stack = malloc(ssize)) != NULL);
49601.1Skamil
49611.13Schristos		DPRINTF("Before making context for new lwp in child\n");
49621.1Skamil		_lwp_makecontext(&uc, lwp_main_stop, NULL, NULL, stack, ssize);
49631.1Skamil
49641.13Schristos		DPRINTF("Before creating new in child\n");
49651.1Skamil		FORKEE_ASSERT(_lwp_create(&uc, 0, &lid) == 0);
49661.1Skamil
49671.1Skamil		CHILD_TO_PARENT("Message", fds, msg);
49681.1Skamil
49691.1Skamil		raise(SIGINT);
49701.1Skamil
49711.13Schristos		DPRINTF("Before waiting for lwp %d to exit\n", lid);
49721.1Skamil		FORKEE_ASSERT(_lwp_wait(lid, NULL) == 0);
49731.1Skamil
49741.13Schristos		DPRINTF("Before verifying that reported %d and running lid %d "
49751.1Skamil		    "are the same\n", lid, the_lwp_id);
49761.1Skamil		FORKEE_ASSERT_EQ(lid, the_lwp_id);
49771.1Skamil
49781.13Schristos		DPRINTF("Before exiting of the child process\n");
49791.1Skamil		_exit(exitval);
49801.1Skamil	}
49811.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
49821.1Skamil
49831.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
49841.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
49851.1Skamil
49861.1Skamil	validate_status_stopped(status, sigval);
49871.1Skamil
49881.13Schristos	DPRINTF("Before resuming the child process where it left off and "
49891.1Skamil	    "without signal to be sent\n");
49901.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
49911.1Skamil
49921.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
49931.1Skamil	    "SIGTRAP\n", TWAIT_FNAME);
49941.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
49951.1Skamil
49961.1Skamil	validate_status_stopped(status, SIGTRAP);
49971.1Skamil
49981.13Schristos	DPRINTF("Before reading siginfo and lwpid_t\n");
49991.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &psi, sizeof(psi)) != -1);
50001.1Skamil
50011.13Schristos	DPRINTF("Before suspending LWP %d\n", psi.psi_lwpid);
50021.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SUSPEND, child, NULL, psi.psi_lwpid) != -1);
50031.1Skamil
50041.1Skamil	PARENT_FROM_CHILD("Message", fds, msg);
50051.1Skamil
50061.13Schristos	DPRINTF("Before resuming the child process where it left off and "
50071.1Skamil	    "without signal to be sent\n");
50081.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
50091.1Skamil
50101.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
50111.1Skamil	    "SIGINT\n", TWAIT_FNAME);
50121.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
50131.1Skamil
50141.1Skamil	validate_status_stopped(status, SIGINT);
50151.1Skamil
50161.1Skamil	pl.pl_lwpid = 0;
50171.1Skamil
50181.13Schristos	SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &pl, sizeof(pl)) != -1);
50191.1Skamil	while (pl.pl_lwpid != 0) {
50201.13Schristos		SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &pl, sizeof(pl)) != -1);
50211.1Skamil		switch (pl.pl_lwpid) {
50221.1Skamil		case 1:
50231.1Skamil			ATF_REQUIRE_EQ(pl.pl_event, PL_EVENT_SIGNAL);
50241.1Skamil			break;
50251.1Skamil		case 2:
50261.1Skamil			ATF_REQUIRE_EQ(pl.pl_event, PL_EVENT_SUSPENDED);
50271.1Skamil			break;
50281.1Skamil		}
50291.1Skamil	}
50301.1Skamil
50311.13Schristos	DPRINTF("Before resuming LWP %d\n", psi.psi_lwpid);
50321.13Schristos	SYSCALL_REQUIRE(ptrace(PT_RESUME, child, NULL, psi.psi_lwpid) != -1);
50331.1Skamil
50341.13Schristos	DPRINTF("Before resuming the child process where it left off and "
50351.1Skamil	    "without signal to be sent\n");
50361.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
50371.1Skamil
50381.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
50391.1Skamil	    TWAIT_FNAME);
50401.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
50411.1Skamil
50421.1Skamil	validate_status_exited(status, exitval);
50431.1Skamil
50441.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
50451.1Skamil	    TWAIT_FNAME);
50461.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
50471.1Skamil
50481.1Skamil	msg_close(&fds);
50491.1Skamil
50501.13Schristos	DPRINTF("XXX: Test worked this time but for consistency timeout it\n");
50511.1Skamil	sleep(10);
50521.1Skamil}
50531.1Skamil
50541.1SkamilATF_TC(syscall1);
50551.1SkamilATF_TC_HEAD(syscall1, tc)
50561.1Skamil{
50571.1Skamil	atf_tc_set_md_var(tc, "descr",
50581.1Skamil	    "Verify that getpid(2) can be traced with PT_SYSCALL");
50591.1Skamil}
50601.1Skamil
50611.1SkamilATF_TC_BODY(syscall1, tc)
50621.1Skamil{
50631.1Skamil	const int exitval = 5;
50641.1Skamil	const int sigval = SIGSTOP;
50651.1Skamil	pid_t child, wpid;
50661.1Skamil#if defined(TWAIT_HAVE_STATUS)
50671.1Skamil	int status;
50681.1Skamil#endif
50691.1Skamil	struct ptrace_siginfo info;
50701.1Skamil	memset(&info, 0, sizeof(info));
50711.1Skamil
50721.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
50731.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
50741.1Skamil	if (child == 0) {
50751.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
50761.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
50771.1Skamil
50781.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
50791.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
50801.1Skamil
50811.1Skamil		syscall(SYS_getpid);
50821.1Skamil
50831.13Schristos		DPRINTF("Before exiting of the child process\n");
50841.1Skamil		_exit(exitval);
50851.1Skamil	}
50861.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
50871.1Skamil
50881.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
50891.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
50901.1Skamil
50911.1Skamil	validate_status_stopped(status, sigval);
50921.1Skamil
50931.13Schristos	DPRINTF("Before resuming the child process where it left off and "
50941.1Skamil	    "without signal to be sent\n");
50951.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SYSCALL, child, (void *)1, 0) != -1);
50961.1Skamil
50971.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
50981.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
50991.1Skamil
51001.1Skamil	validate_status_stopped(status, SIGTRAP);
51011.1Skamil
51021.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
51031.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
51041.1Skamil
51051.38Skamil	DPRINTF("Before checking siginfo_t and lwpid\n");
51061.38Skamil	ATF_REQUIRE_EQ(info.psi_lwpid, 1);
51071.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, SIGTRAP);
51081.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_SCE);
51091.1Skamil
51101.13Schristos	DPRINTF("Before resuming the child process where it left off and "
51111.1Skamil	    "without signal to be sent\n");
51121.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SYSCALL, child, (void *)1, 0) != -1);
51131.1Skamil
51141.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
51151.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
51161.1Skamil
51171.1Skamil	validate_status_stopped(status, SIGTRAP);
51181.1Skamil
51191.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
51201.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
51211.1Skamil
51221.38Skamil	DPRINTF("Before checking siginfo_t and lwpid\n");
51231.38Skamil	ATF_REQUIRE_EQ(info.psi_lwpid, 1);
51241.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, SIGTRAP);
51251.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_SCX);
51261.1Skamil
51271.13Schristos	DPRINTF("Before resuming the child process where it left off and "
51281.1Skamil	    "without signal to be sent\n");
51291.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
51301.1Skamil
51311.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
51321.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
51331.1Skamil
51341.1Skamil	validate_status_exited(status, exitval);
51351.1Skamil
51361.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
51371.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
51381.1Skamil}
51391.1Skamil
51401.1SkamilATF_TC(syscallemu1);
51411.1SkamilATF_TC_HEAD(syscallemu1, tc)
51421.1Skamil{
51431.1Skamil	atf_tc_set_md_var(tc, "descr",
51441.1Skamil	    "Verify that exit(2) can be intercepted with PT_SYSCALLEMU");
51451.1Skamil}
51461.1Skamil
51471.1SkamilATF_TC_BODY(syscallemu1, tc)
51481.1Skamil{
51491.1Skamil	const int exitval = 5;
51501.1Skamil	const int sigval = SIGSTOP;
51511.1Skamil	pid_t child, wpid;
51521.1Skamil#if defined(TWAIT_HAVE_STATUS)
51531.1Skamil	int status;
51541.1Skamil#endif
51551.1Skamil
51561.6Skamil#if defined(__sparc__) && !defined(__sparc64__)
51571.6Skamil	/* syscallemu does not work on sparc (32-bit) */
51581.6Skamil	atf_tc_expect_fail("PR kern/52166");
51591.6Skamil#endif
51601.6Skamil
51611.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
51621.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
51631.1Skamil	if (child == 0) {
51641.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
51651.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
51661.1Skamil
51671.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
51681.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
51691.1Skamil
51701.1Skamil		syscall(SYS_exit, 100);
51711.1Skamil
51721.13Schristos		DPRINTF("Before exiting of the child process\n");
51731.1Skamil		_exit(exitval);
51741.1Skamil	}
51751.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
51761.1Skamil
51771.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
51781.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
51791.1Skamil
51801.1Skamil	validate_status_stopped(status, sigval);
51811.1Skamil
51821.13Schristos	DPRINTF("Before resuming the child process where it left off and "
51831.1Skamil	    "without signal to be sent\n");
51841.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SYSCALL, child, (void *)1, 0) != -1);
51851.1Skamil
51861.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
51871.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
51881.1Skamil
51891.1Skamil	validate_status_stopped(status, SIGTRAP);
51901.1Skamil
51911.13Schristos	DPRINTF("Set SYSCALLEMU for intercepted syscall\n");
51921.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SYSCALLEMU, child, (void *)1, 0) != -1);
51931.1Skamil
51941.13Schristos	DPRINTF("Before resuming the child process where it left off and "
51951.1Skamil	    "without signal to be sent\n");
51961.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SYSCALL, child, (void *)1, 0) != -1);
51971.1Skamil
51981.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
51991.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
52001.1Skamil
52011.1Skamil	validate_status_stopped(status, SIGTRAP);
52021.1Skamil
52031.13Schristos	DPRINTF("Before resuming the child process where it left off and "
52041.1Skamil	    "without signal to be sent\n");
52051.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
52061.1Skamil
52071.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
52081.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
52091.1Skamil
52101.1Skamil	validate_status_exited(status, exitval);
52111.1Skamil
52121.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
52131.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
52141.1Skamil}
52151.1Skamil
52161.1Skamil#include "t_ptrace_amd64_wait.h"
52171.1Skamil#include "t_ptrace_i386_wait.h"
52181.1Skamil#include "t_ptrace_x86_wait.h"
52191.1Skamil
52201.1SkamilATF_TP_ADD_TCS(tp)
52211.1Skamil{
52221.1Skamil	setvbuf(stdout, NULL, _IONBF, 0);
52231.1Skamil	setvbuf(stderr, NULL, _IONBF, 0);
52241.33Skamil
52251.36Skamil	ATF_TP_ADD_TC(tp, traceme_raise1);
52261.33Skamil	ATF_TP_ADD_TC(tp, traceme_raise2);
52271.33Skamil	ATF_TP_ADD_TC(tp, traceme_raise3);
52281.33Skamil	ATF_TP_ADD_TC(tp, traceme_raise4);
52291.33Skamil	ATF_TP_ADD_TC(tp, traceme_raise5);
52301.33Skamil
52311.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_handle1);
52321.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_handle2);
52331.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_handle3);
52341.50Skamil
52351.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_masked1);
52361.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_masked2);
52371.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_masked3);
52381.50Skamil
52391.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_ignored1);
52401.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_ignored2);
52411.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_ignored3);
52421.50Skamil
52431.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_simple1);
52441.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_simple2);
52451.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_simple3);
52461.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_simple4);
52471.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_simple5);
52481.1Skamil
52491.37Skamil	ATF_TP_ADD_TC(tp, traceme_pid1_parent);
52501.37Skamil
52511.40Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_raise1);
52521.46Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_raise2);
52531.40Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_raise3);
52541.40Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_raise4);
52551.40Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_raise5);
52561.47Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_raise6);
52571.47Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_raise7);
52581.47Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_raise8);
52591.40Skamil
52601.52Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_crash_trap);
52611.52Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_crash_segv);
52621.52Skamil//	ATF_TP_ADD_TC(tp, traceme_vfork_crash_ill);
52631.52Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_crash_fpe);
52641.52Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_crash_bus);
52651.41Skamil
52661.43Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_exec);
52671.43Skamil
52681.51Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, tracer_sees_terminaton_before_the_parent);
52691.51Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, tracer_sysctl_lookup_without_duplicates);
52701.51Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_sees_terminaton_before_the_parent);
52711.51Skamil
52721.51Skamil	ATF_TP_ADD_TC(tp, parent_attach_to_its_child);
52731.51Skamil
52741.51Skamil	ATF_TP_ADD_TC(tp, child_attach_to_its_parent);
52751.51Skamil
52761.51Skamil	ATF_TP_ADD_TC_HAVE_PID(tp,
52771.51Skamil		tracee_sees_its_original_parent_getppid);
52781.51Skamil	ATF_TP_ADD_TC_HAVE_PID(tp,
52791.51Skamil		tracee_sees_its_original_parent_sysctl_kinfo_proc2);
52801.51Skamil	ATF_TP_ADD_TC_HAVE_PID(tp,
52811.51Skamil		tracee_sees_its_original_parent_procfs_status);
52821.1Skamil
52831.53Skamil	ATF_TP_ADD_TC(tp, eventmask_preserved_empty);
52841.53Skamil	ATF_TP_ADD_TC(tp, eventmask_preserved_fork);
52851.53Skamil	ATF_TP_ADD_TC(tp, eventmask_preserved_vfork);
52861.53Skamil	ATF_TP_ADD_TC(tp, eventmask_preserved_vfork_done);
52871.53Skamil	ATF_TP_ADD_TC(tp, eventmask_preserved_lwp_create);
52881.53Skamil	ATF_TP_ADD_TC(tp, eventmask_preserved_lwp_exit);
52891.1Skamil
52901.31Skamil	ATF_TP_ADD_TC(tp, fork1);
52911.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, fork2);
52921.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, fork3);
52931.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, fork4);
52941.31Skamil	ATF_TP_ADD_TC(tp, fork5);
52951.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, fork6);
52961.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, fork7);
52971.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, fork8);
52981.31Skamil
52991.31Skamil	ATF_TP_ADD_TC(tp, vfork1);
53001.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, vfork2);
53011.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, vfork3);
53021.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, vfork4);
53031.31Skamil	ATF_TP_ADD_TC(tp, vfork5);
53041.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, vfork6);
53051.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, vfork7);
53061.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, vfork8);
53071.1Skamil
53081.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_d_8);
53091.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_d_16);
53101.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_d_32);
53111.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_d_64);
53121.54Skamil
53131.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_i_8);
53141.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_i_16);
53151.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_i_32);
53161.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_i_64);
53171.54Skamil
53181.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_d_8);
53191.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_d_16);
53201.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_d_32);
53211.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_d_64);
53221.54Skamil
53231.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_i_8);
53241.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_i_16);
53251.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_i_32);
53261.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_i_64);
53271.54Skamil
53281.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_read_d);
53291.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_read_i);
53301.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_write_d);
53311.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_write_i);
53321.54Skamil
53331.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_d_8_text);
53341.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_d_16_text);
53351.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_d_32_text);
53361.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_d_64_text);
53371.54Skamil
53381.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_i_8_text);
53391.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_i_16_text);
53401.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_i_32_text);
53411.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_i_64_text);
53421.54Skamil
53431.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_d_8_text);
53441.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_d_16_text);
53451.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_d_32_text);
53461.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_d_64_text);
53471.54Skamil
53481.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_i_8_text);
53491.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_i_16_text);
53501.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_i_32_text);
53511.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_i_64_text);
53521.54Skamil
53531.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_read_d_text);
53541.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_read_i_text);
53551.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_write_d_text);
53561.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_write_i_text);
53571.1Skamil
53581.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_auxv);
53591.1Skamil
53601.1Skamil	ATF_TP_ADD_TC_HAVE_GPREGS(tp, regs1);
53611.1Skamil	ATF_TP_ADD_TC_HAVE_GPREGS(tp, regs2);
53621.1Skamil	ATF_TP_ADD_TC_HAVE_GPREGS(tp, regs3);
53631.1Skamil	ATF_TP_ADD_TC_HAVE_GPREGS(tp, regs4);
53641.1Skamil	ATF_TP_ADD_TC_HAVE_GPREGS(tp, regs5);
53651.1Skamil
53661.1Skamil	ATF_TP_ADD_TC_HAVE_FPREGS(tp, fpregs1);
53671.1Skamil	ATF_TP_ADD_TC_HAVE_FPREGS(tp, fpregs2);
53681.1Skamil
53691.1Skamil	ATF_TP_ADD_TC_PT_STEP(tp, step1);
53701.1Skamil	ATF_TP_ADD_TC_PT_STEP(tp, step2);
53711.1Skamil	ATF_TP_ADD_TC_PT_STEP(tp, step3);
53721.1Skamil	ATF_TP_ADD_TC_PT_STEP(tp, step4);
53731.1Skamil
53741.2Skamil	ATF_TP_ADD_TC_PT_STEP(tp, setstep1);
53751.2Skamil	ATF_TP_ADD_TC_PT_STEP(tp, setstep2);
53761.2Skamil	ATF_TP_ADD_TC_PT_STEP(tp, setstep3);
53771.2Skamil	ATF_TP_ADD_TC_PT_STEP(tp, setstep4);
53781.2Skamil
53791.1Skamil	ATF_TP_ADD_TC(tp, kill1);
53801.1Skamil	ATF_TP_ADD_TC(tp, kill2);
53811.1Skamil
53821.1Skamil	ATF_TP_ADD_TC(tp, lwpinfo1);
53831.1Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, lwpinfo2);
53841.1Skamil
53851.1Skamil	ATF_TP_ADD_TC(tp, siginfo1);
53861.1Skamil	ATF_TP_ADD_TC(tp, siginfo2);
53871.1Skamil	ATF_TP_ADD_TC(tp, siginfo3);
53881.1Skamil	ATF_TP_ADD_TC(tp, siginfo4);
53891.1Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, siginfo5);
53901.1Skamil	ATF_TP_ADD_TC_PT_STEP(tp, siginfo6);
53911.1Skamil
53921.1Skamil	ATF_TP_ADD_TC(tp, lwp_create1);
53931.1Skamil
53941.1Skamil	ATF_TP_ADD_TC(tp, lwp_exit1);
53951.1Skamil
53961.1Skamil	ATF_TP_ADD_TC(tp, signal1);
53971.1Skamil	ATF_TP_ADD_TC(tp, signal2);
53981.1Skamil	ATF_TP_ADD_TC(tp, signal3);
53991.1Skamil	ATF_TP_ADD_TC_PT_STEP(tp, signal4);
54001.1Skamil	ATF_TP_ADD_TC(tp, signal5);
54011.1Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, signal6);
54021.1Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, signal7);
54031.1Skamil	ATF_TP_ADD_TC(tp, signal8);
54041.1Skamil	ATF_TP_ADD_TC(tp, signal9);
54051.1Skamil	ATF_TP_ADD_TC(tp, signal10);
54061.1Skamil
54071.1Skamil	ATF_TP_ADD_TC(tp, suspend1);
54081.1Skamil	ATF_TP_ADD_TC(tp, suspend2);
54091.1Skamil
54101.1Skamil	ATF_TP_ADD_TC(tp, resume1);
54111.1Skamil
54121.1Skamil	ATF_TP_ADD_TC(tp, syscall1);
54131.1Skamil
54141.1Skamil	ATF_TP_ADD_TC(tp, syscallemu1);
54151.1Skamil
54161.1Skamil	ATF_TP_ADD_TCS_PTRACE_WAIT_AMD64();
54171.1Skamil	ATF_TP_ADD_TCS_PTRACE_WAIT_I386();
54181.1Skamil	ATF_TP_ADD_TCS_PTRACE_WAIT_X86();
54191.1Skamil
54201.1Skamil	return atf_no_error();
54211.1Skamil}
5422