t_ptrace_wait.c revision 1.63
11.63Skamil/*	$NetBSD: t_ptrace_wait.c,v 1.63 2018/06/06 13:18:44 kamil Exp $	*/
21.1Skamil
31.1Skamil/*-
41.1Skamil * Copyright (c) 2016 The NetBSD Foundation, Inc.
51.1Skamil * All rights reserved.
61.1Skamil *
71.1Skamil * Redistribution and use in source and binary forms, with or without
81.1Skamil * modification, are permitted provided that the following conditions
91.1Skamil * are met:
101.1Skamil * 1. Redistributions of source code must retain the above copyright
111.1Skamil *    notice, this list of conditions and the following disclaimer.
121.1Skamil * 2. Redistributions in binary form must reproduce the above copyright
131.1Skamil *    notice, this list of conditions and the following disclaimer in the
141.1Skamil *    documentation and/or other materials provided with the distribution.
151.1Skamil *
161.1Skamil * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
171.1Skamil * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
181.1Skamil * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
191.1Skamil * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
201.1Skamil * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
211.1Skamil * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
221.1Skamil * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
231.1Skamil * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
241.1Skamil * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
251.1Skamil * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
261.1Skamil * POSSIBILITY OF SUCH DAMAGE.
271.1Skamil */
281.1Skamil
291.1Skamil#include <sys/cdefs.h>
301.63Skamil__RCSID("$NetBSD: t_ptrace_wait.c,v 1.63 2018/06/06 13:18:44 kamil Exp $");
311.1Skamil
321.1Skamil#include <sys/param.h>
331.1Skamil#include <sys/types.h>
341.39Skamil#include <sys/mman.h>
351.1Skamil#include <sys/ptrace.h>
361.1Skamil#include <sys/resource.h>
371.1Skamil#include <sys/stat.h>
381.1Skamil#include <sys/syscall.h>
391.1Skamil#include <sys/sysctl.h>
401.1Skamil#include <sys/wait.h>
411.1Skamil#include <machine/reg.h>
421.1Skamil#include <elf.h>
431.1Skamil#include <err.h>
441.1Skamil#include <errno.h>
451.1Skamil#include <lwp.h>
461.1Skamil#include <sched.h>
471.1Skamil#include <signal.h>
481.1Skamil#include <stdint.h>
491.1Skamil#include <stdio.h>
501.1Skamil#include <stdlib.h>
511.1Skamil#include <strings.h>
521.26Skamil#include <time.h>
531.1Skamil#include <unistd.h>
541.1Skamil
551.1Skamil#include <atf-c.h>
561.1Skamil
571.1Skamil#include "h_macros.h"
581.1Skamil
591.1Skamil#include "t_ptrace_wait.h"
601.1Skamil#include "msg.h"
611.1Skamil
621.1Skamil#define PARENT_TO_CHILD(info, fds, msg) \
631.61Skre    SYSCALL_REQUIRE(msg_write_child(info " to child " # fds, &fds, &msg, \
641.61Skre	sizeof(msg)) == 0)
651.1Skamil
661.1Skamil#define CHILD_FROM_PARENT(info, fds, msg) \
671.61Skre    FORKEE_ASSERT(msg_read_parent(info " from parent " # fds, &fds, &msg, \
681.61Skre	sizeof(msg)) == 0)
691.1Skamil
701.1Skamil#define CHILD_TO_PARENT(info, fds, msg) \
711.61Skre    FORKEE_ASSERT(msg_write_parent(info " to parent " # fds, &fds, &msg, \
721.61Skre	sizeof(msg)) == 0)
731.1Skamil
741.1Skamil#define PARENT_FROM_CHILD(info, fds, msg) \
751.61Skre    SYSCALL_REQUIRE(msg_read_child(info " from parent " # fds, &fds, &msg, \
761.61Skre	sizeof(msg)) == 0)
771.13Schristos
781.13Schristos#define SYSCALL_REQUIRE(expr) ATF_REQUIRE_MSG(expr, "%s: %s", # expr, \
791.13Schristos    strerror(errno))
801.18Schristos#define SYSCALL_REQUIRE_ERRNO(res, exp) ATF_REQUIRE_MSG(res == exp, \
811.18Schristos    "%d(%s) != %d", res, strerror(res), exp)
821.13Schristos
831.13Schristosstatic int debug = 0;
841.13Schristos
851.13Schristos#define DPRINTF(a, ...)	do  \
861.13Schristos	if (debug) printf(a,  ##__VA_ARGS__); \
871.13Schristos    while (/*CONSTCOND*/0)
881.1Skamil
891.34Skamil/// ----------------------------------------------------------------------------
901.34Skamil
911.33Skamilstatic void
921.33Skamiltraceme_raise(int sigval)
931.1Skamil{
941.1Skamil	const int exitval = 5;
951.1Skamil	pid_t child, wpid;
961.1Skamil#if defined(TWAIT_HAVE_STATUS)
971.1Skamil	int status;
981.1Skamil#endif
991.1Skamil
1001.45Skamil	struct ptrace_siginfo info;
1011.45Skamil	memset(&info, 0, sizeof(info));
1021.45Skamil
1031.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
1041.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
1051.1Skamil	if (child == 0) {
1061.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
1071.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
1081.1Skamil
1091.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
1101.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
1111.1Skamil
1121.36Skamil		switch (sigval) {
1131.36Skamil		case SIGKILL:
1141.36Skamil			/* NOTREACHED */
1151.36Skamil			FORKEE_ASSERTX(0 && "This shall not be reached");
1161.36Skamil		default:
1171.36Skamil			DPRINTF("Before exiting of the child process\n");
1181.36Skamil			_exit(exitval);
1191.36Skamil		}
1201.1Skamil	}
1211.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
1221.1Skamil
1231.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
1241.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
1251.1Skamil
1261.36Skamil	switch (sigval) {
1271.36Skamil	case SIGKILL:
1281.36Skamil		validate_status_signaled(status, sigval, 0);
1291.36Skamil		break;
1301.36Skamil	default:
1311.36Skamil		validate_status_stopped(status, sigval);
1321.1Skamil
1331.45Skamil		DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for "
1341.61Skre			"child\n");
1351.45Skamil		SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info,
1361.61Skre			sizeof(info)) != -1);
1371.45Skamil
1381.45Skamil		DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
1391.45Skamil		DPRINTF("Signal properties: si_signo=%#x si_code=%#x "
1401.61Skre			"si_errno=%#x\n",
1411.61Skre			info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
1421.61Skre			info.psi_siginfo.si_errno);
1431.45Skamil
1441.45Skamil		ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigval);
1451.45Skamil		ATF_REQUIRE_EQ(info.psi_siginfo.si_code, SI_LWP);
1461.45Skamil
1471.36Skamil		DPRINTF("Before resuming the child process where it left off "
1481.36Skamil		    "and without signal to be sent\n");
1491.36Skamil		SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
1501.1Skamil
1511.36Skamil		DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
1521.36Skamil		TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0),
1531.61Skre		    child);
1541.36Skamil		break;
1551.36Skamil	}
1561.1Skamil
1571.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
1581.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
1591.1Skamil}
1601.1Skamil
1611.61Skre#define TRACEME_RAISE(test, sig)					\
1621.61SkreATF_TC(test);								\
1631.61SkreATF_TC_HEAD(test, tc)							\
1641.61Skre{									\
1651.61Skre	atf_tc_set_md_var(tc, "descr",					\
1661.61Skre	    "Verify " #sig " followed by _exit(2) in a child");		\
1671.61Skre}									\
1681.61Skre									\
1691.61SkreATF_TC_BODY(test, tc)							\
1701.61Skre{									\
1711.61Skre									\
1721.61Skre	traceme_raise(sig);						\
1731.33Skamil}
1741.33Skamil
1751.36SkamilTRACEME_RAISE(traceme_raise1, SIGKILL) /* non-maskable */
1761.33SkamilTRACEME_RAISE(traceme_raise2, SIGSTOP) /* non-maskable */
1771.33SkamilTRACEME_RAISE(traceme_raise3, SIGABRT) /* regular abort trap */
1781.33SkamilTRACEME_RAISE(traceme_raise4, SIGHUP)  /* hangup */
1791.33SkamilTRACEME_RAISE(traceme_raise5, SIGCONT) /* continued? */
1801.33Skamil
1811.34Skamil/// ----------------------------------------------------------------------------
1821.1Skamil
1831.1Skamilstatic void
1841.59Skamiltraceme_crash(int sig)
1851.59Skamil{
1861.59Skamil	pid_t child, wpid;
1871.59Skamil#if defined(TWAIT_HAVE_STATUS)
1881.59Skamil	int status;
1891.59Skamil#endif
1901.59Skamil	struct ptrace_siginfo info;
1911.61Skre
1921.59Skamil	memset(&info, 0, sizeof(info));
1931.59Skamil
1941.59Skamil	DPRINTF("Before forking process PID=%d\n", getpid());
1951.59Skamil	SYSCALL_REQUIRE((child = fork()) != -1);
1961.59Skamil	if (child == 0) {
1971.59Skamil		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
1981.59Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
1991.59Skamil
2001.59Skamil		DPRINTF("Before executing a trap\n");
2011.59Skamil		switch (sig) {
2021.59Skamil		case SIGTRAP:
2031.59Skamil			trigger_trap();
2041.59Skamil			break;
2051.59Skamil		case SIGSEGV:
2061.59Skamil			trigger_segv();
2071.59Skamil			break;
2081.59Skamil		case SIGILL:
2091.59Skamil			trigger_ill();
2101.59Skamil			break;
2111.59Skamil		case SIGFPE:
2121.59Skamil			trigger_fpe();
2131.59Skamil			break;
2141.59Skamil		case SIGBUS:
2151.59Skamil			trigger_bus();
2161.59Skamil			break;
2171.59Skamil		default:
2181.59Skamil			/* NOTREACHED */
2191.59Skamil			FORKEE_ASSERTX(0 && "This shall not be reached");
2201.59Skamil		}
2211.59Skamil
2221.59Skamil		/* NOTREACHED */
2231.59Skamil		FORKEE_ASSERTX(0 && "This shall not be reached");
2241.59Skamil	}
2251.59Skamil	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
2261.59Skamil
2271.59Skamil	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
2281.59Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
2291.59Skamil
2301.59Skamil	validate_status_stopped(status, sig);
2311.59Skamil
2321.59Skamil	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child");
2331.61Skre	SYSCALL_REQUIRE(
2341.61Skre	    ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
2351.59Skamil
2361.59Skamil	DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
2371.59Skamil	DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n",
2381.61Skre	    info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
2391.61Skre	    info.psi_siginfo.si_errno);
2401.59Skamil
2411.59Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sig);
2421.59Skamil	switch (sig) {
2431.59Skamil	case SIGTRAP:
2441.59Skamil		ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_BRKPT);
2451.59Skamil		break;
2461.59Skamil	case SIGSEGV:
2471.59Skamil		ATF_REQUIRE_EQ(info.psi_siginfo.si_code, SEGV_MAPERR);
2481.59Skamil		break;
2491.59Skamil//	case SIGILL:
2501.59Skamil//		ATF_REQUIRE_EQ(info.psi_siginfo.si_code, ILL_ILLOP);
2511.59Skamil//		break;
2521.59Skamil	case SIGFPE:
2531.59Skamil		ATF_REQUIRE_EQ(info.psi_siginfo.si_code, FPE_INTDIV);
2541.59Skamil		break;
2551.59Skamil	case SIGBUS:
2561.59Skamil		ATF_REQUIRE_EQ(info.psi_siginfo.si_code, BUS_ADRERR);
2571.59Skamil		break;
2581.59Skamil	}
2591.59Skamil
2601.59Skamil	SYSCALL_REQUIRE(ptrace(PT_KILL, child, NULL, 0) != -1);
2611.59Skamil
2621.59Skamil	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
2631.59Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
2641.59Skamil
2651.59Skamil	validate_status_signaled(status, SIGKILL, 0);
2661.59Skamil
2671.59Skamil	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
2681.59Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
2691.59Skamil}
2701.59Skamil
2711.61Skre#define TRACEME_CRASH(test, sig)					\
2721.61SkreATF_TC(test);								\
2731.61SkreATF_TC_HEAD(test, tc)							\
2741.61Skre{									\
2751.61Skre	atf_tc_set_md_var(tc, "descr",					\
2761.61Skre	    "Verify crash signal " #sig " in a child after PT_TRACE_ME"); \
2771.61Skre}									\
2781.61Skre									\
2791.61SkreATF_TC_BODY(test, tc)							\
2801.61Skre{									\
2811.61Skre									\
2821.61Skre	traceme_crash(sig);						\
2831.59Skamil}
2841.59Skamil
2851.59SkamilTRACEME_CRASH(traceme_crash_trap, SIGTRAP)
2861.59SkamilTRACEME_CRASH(traceme_crash_segv, SIGSEGV)
2871.59Skamil//TRACEME_CRASH(traceme_crash_ill, SIGILL)
2881.59SkamilTRACEME_CRASH(traceme_crash_fpe, SIGFPE)
2891.59SkamilTRACEME_CRASH(traceme_crash_bus, SIGBUS)
2901.59Skamil
2911.59Skamil/// ----------------------------------------------------------------------------
2921.59Skamil
2931.59Skamilstatic void
2941.50Skamiltraceme_sendsignal_handle(int sigsent, void (*sah)(int a), int *traceme_caught)
2951.1Skamil{
2961.1Skamil	const int exitval = 5;
2971.34Skamil	const int sigval = SIGSTOP;
2981.1Skamil	pid_t child, wpid;
2991.1Skamil	struct sigaction sa;
3001.1Skamil#if defined(TWAIT_HAVE_STATUS)
3011.1Skamil	int status;
3021.1Skamil#endif
3031.61Skre	struct ptrace_siginfo info;
3041.1Skamil
3051.45Skamil	memset(&info, 0, sizeof(info));
3061.45Skamil
3071.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
3081.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
3091.1Skamil	if (child == 0) {
3101.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
3111.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
3121.1Skamil
3131.34Skamil		sa.sa_handler = sah;
3141.1Skamil		sa.sa_flags = SA_SIGINFO;
3151.1Skamil		sigemptyset(&sa.sa_mask);
3161.1Skamil
3171.1Skamil		FORKEE_ASSERT(sigaction(sigsent, &sa, NULL) != -1);
3181.1Skamil
3191.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
3201.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
3211.1Skamil
3221.34Skamil		FORKEE_ASSERT_EQ(*traceme_caught, 1);
3231.1Skamil
3241.13Schristos		DPRINTF("Before exiting of the child process\n");
3251.1Skamil		_exit(exitval);
3261.1Skamil	}
3271.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
3281.1Skamil
3291.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
3301.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
3311.1Skamil
3321.1Skamil	validate_status_stopped(status, sigval);
3331.1Skamil
3341.45Skamil	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
3351.61Skre	SYSCALL_REQUIRE(
3361.61Skre	    ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
3371.45Skamil
3381.45Skamil	DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
3391.45Skamil	DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n",
3401.45Skamil	    info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
3411.45Skamil	    info.psi_siginfo.si_errno);
3421.45Skamil
3431.45Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigval);
3441.45Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, SI_LWP);
3451.45Skamil
3461.13Schristos	DPRINTF("Before resuming the child process where it left off and with "
3471.1Skamil	    "signal %s to be sent\n", strsignal(sigsent));
3481.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, sigsent) != -1);
3491.1Skamil
3501.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
3511.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
3521.1Skamil
3531.1Skamil	validate_status_exited(status, exitval);
3541.1Skamil
3551.13Schristos	DPRINTF("Before calling %s() for the exited child\n", TWAIT_FNAME);
3561.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
3571.1Skamil}
3581.1Skamil
3591.61Skre#define TRACEME_SENDSIGNAL_HANDLE(test, sig)				\
3601.61SkreATF_TC(test);								\
3611.61SkreATF_TC_HEAD(test, tc)							\
3621.61Skre{									\
3631.61Skre	atf_tc_set_md_var(tc, "descr",					\
3641.61Skre	    "Verify that a signal " #sig " emitted by a tracer to a child is " \
3651.61Skre	    "handled correctly and caught by a signal handler");	\
3661.61Skre}									\
3671.61Skre									\
3681.61Skrestatic int test##_caught = 0;						\
3691.61Skre									\
3701.61Skrestatic void								\
3711.61Skretest##_sighandler(int arg)						\
3721.61Skre{									\
3731.61Skre	FORKEE_ASSERT_EQ(arg, sig);					\
3741.61Skre									\
3751.61Skre	++ test##_caught;						\
3761.61Skre}									\
3771.61Skre									\
3781.61SkreATF_TC_BODY(test, tc)							\
3791.61Skre{									\
3801.61Skre									\
3811.61Skre	traceme_sendsignal_handle(sig, test##_sighandler, & test##_caught); \
3821.34Skamil}
3831.34Skamil
3841.34Skamil// A signal handler for SIGKILL and SIGSTOP cannot be registered.
3851.50SkamilTRACEME_SENDSIGNAL_HANDLE(traceme_sendsignal_handle1, SIGABRT) /* abort trap */
3861.50SkamilTRACEME_SENDSIGNAL_HANDLE(traceme_sendsignal_handle2, SIGHUP)  /* hangup */
3871.50SkamilTRACEME_SENDSIGNAL_HANDLE(traceme_sendsignal_handle3, SIGCONT) /* continued? */
3881.34Skamil
3891.34Skamil/// ----------------------------------------------------------------------------
3901.34Skamil
3911.35Skamilstatic void
3921.50Skamiltraceme_sendsignal_masked(int sigsent)
3931.50Skamil{
3941.50Skamil	const int exitval = 5;
3951.50Skamil	const int sigval = SIGSTOP;
3961.50Skamil	pid_t child, wpid;
3971.50Skamil	sigset_t set;
3981.50Skamil#if defined(TWAIT_HAVE_STATUS)
3991.50Skamil	int status;
4001.50Skamil#endif
4011.61Skre	struct ptrace_siginfo info;
4021.50Skamil
4031.50Skamil	memset(&info, 0, sizeof(info));
4041.50Skamil
4051.50Skamil	DPRINTF("Before forking process PID=%d\n", getpid());
4061.50Skamil	SYSCALL_REQUIRE((child = fork()) != -1);
4071.50Skamil	if (child == 0) {
4081.50Skamil		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
4091.50Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
4101.50Skamil
4111.50Skamil		sigemptyset(&set);
4121.50Skamil		sigaddset(&set, sigsent);
4131.50Skamil		FORKEE_ASSERT(sigprocmask(SIG_BLOCK, &set, NULL) != -1);
4141.50Skamil
4151.50Skamil		DPRINTF("Before raising %s from child\n", strsignal(sigval));
4161.50Skamil		FORKEE_ASSERT(raise(sigval) == 0);
4171.50Skamil
4181.50Skamil		_exit(exitval);
4191.50Skamil	}
4201.50Skamil	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
4211.50Skamil
4221.50Skamil	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
4231.50Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
4241.50Skamil
4251.50Skamil	validate_status_stopped(status, sigval);
4261.50Skamil
4271.50Skamil	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
4281.61Skre	SYSCALL_REQUIRE(
4291.61Skre	    ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
4301.50Skamil
4311.50Skamil	DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
4321.50Skamil	DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n",
4331.50Skamil	    info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
4341.50Skamil	    info.psi_siginfo.si_errno);
4351.50Skamil
4361.50Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigval);
4371.50Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, SI_LWP);
4381.50Skamil
4391.50Skamil	DPRINTF("Before resuming the child process where it left off and with "
4401.50Skamil	    "signal %s to be sent\n", strsignal(sigsent));
4411.50Skamil	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, sigsent) != -1);
4421.50Skamil
4431.50Skamil	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
4441.50Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
4451.50Skamil
4461.50Skamil	validate_status_exited(status, exitval);
4471.50Skamil
4481.50Skamil	DPRINTF("Before calling %s() for the exited child\n", TWAIT_FNAME);
4491.50Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
4501.50Skamil}
4511.50Skamil
4521.61Skre#define TRACEME_SENDSIGNAL_MASKED(test, sig)				\
4531.61SkreATF_TC(test);								\
4541.61SkreATF_TC_HEAD(test, tc)							\
4551.61Skre{									\
4561.61Skre	atf_tc_set_md_var(tc, "descr",					\
4571.61Skre	    "Verify that a signal " #sig " emitted by a tracer to a child is " \
4581.61Skre	    "handled correctly and the signal is masked by SIG_BLOCK");	\
4591.61Skre}									\
4601.61Skre									\
4611.61SkreATF_TC_BODY(test, tc)							\
4621.61Skre{									\
4631.61Skre									\
4641.61Skre	traceme_sendsignal_masked(sig);					\
4651.50Skamil}
4661.50Skamil
4671.50Skamil// A signal handler for SIGKILL and SIGSTOP cannot be masked.
4681.50SkamilTRACEME_SENDSIGNAL_MASKED(traceme_sendsignal_masked1, SIGABRT) /* abort trap */
4691.50SkamilTRACEME_SENDSIGNAL_MASKED(traceme_sendsignal_masked2, SIGHUP)  /* hangup */
4701.50SkamilTRACEME_SENDSIGNAL_MASKED(traceme_sendsignal_masked3, SIGCONT) /* continued? */
4711.50Skamil
4721.50Skamil/// ----------------------------------------------------------------------------
4731.50Skamil
4741.50Skamilstatic void
4751.50Skamiltraceme_sendsignal_ignored(int sigsent)
4761.50Skamil{
4771.50Skamil	const int exitval = 5;
4781.50Skamil	const int sigval = SIGSTOP;
4791.50Skamil	pid_t child, wpid;
4801.50Skamil	struct sigaction sa;
4811.50Skamil#if defined(TWAIT_HAVE_STATUS)
4821.50Skamil	int status;
4831.50Skamil#endif
4841.61Skre	struct ptrace_siginfo info;
4851.50Skamil
4861.50Skamil	memset(&info, 0, sizeof(info));
4871.50Skamil
4881.50Skamil	DPRINTF("Before forking process PID=%d\n", getpid());
4891.50Skamil	SYSCALL_REQUIRE((child = fork()) != -1);
4901.50Skamil	if (child == 0) {
4911.50Skamil		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
4921.61Skre
4931.50Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
4941.50Skamil
4951.50Skamil		memset(&sa, 0, sizeof(sa));
4961.50Skamil		sa.sa_handler = SIG_IGN;
4971.50Skamil		sigemptyset(&sa.sa_mask);
4981.50Skamil		FORKEE_ASSERT(sigaction(sigsent, &sa, NULL) != -1);
4991.50Skamil
5001.50Skamil		DPRINTF("Before raising %s from child\n", strsignal(sigval));
5011.50Skamil		FORKEE_ASSERT(raise(sigval) == 0);
5021.50Skamil
5031.50Skamil		_exit(exitval);
5041.50Skamil	}
5051.50Skamil	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
5061.50Skamil
5071.50Skamil	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
5081.50Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
5091.50Skamil
5101.50Skamil	validate_status_stopped(status, sigval);
5111.50Skamil
5121.50Skamil	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
5131.61Skre	SYSCALL_REQUIRE(
5141.61Skre	    ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
5151.50Skamil
5161.50Skamil	DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
5171.50Skamil	DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n",
5181.50Skamil	    info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
5191.50Skamil	    info.psi_siginfo.si_errno);
5201.50Skamil
5211.50Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigval);
5221.50Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, SI_LWP);
5231.50Skamil
5241.50Skamil	DPRINTF("Before resuming the child process where it left off and with "
5251.50Skamil	    "signal %s to be sent\n", strsignal(sigsent));
5261.50Skamil	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, sigsent) != -1);
5271.50Skamil
5281.50Skamil	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
5291.50Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
5301.50Skamil
5311.50Skamil	validate_status_exited(status, exitval);
5321.50Skamil
5331.50Skamil	DPRINTF("Before calling %s() for the exited child\n", TWAIT_FNAME);
5341.50Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
5351.50Skamil}
5361.50Skamil
5371.61Skre#define TRACEME_SENDSIGNAL_IGNORED(test, sig)				\
5381.61SkreATF_TC(test);								\
5391.61SkreATF_TC_HEAD(test, tc)							\
5401.61Skre{									\
5411.61Skre	atf_tc_set_md_var(tc, "descr",					\
5421.61Skre	    "Verify that a signal " #sig " emitted by a tracer to a child is " \
5431.61Skre	    "handled correctly and the signal is masked by SIG_IGN");	\
5441.61Skre}									\
5451.61Skre									\
5461.61SkreATF_TC_BODY(test, tc)							\
5471.61Skre{									\
5481.61Skre									\
5491.61Skre	traceme_sendsignal_ignored(sig);				\
5501.50Skamil}
5511.50Skamil
5521.50Skamil// A signal handler for SIGKILL and SIGSTOP cannot be ignored.
5531.61SkreTRACEME_SENDSIGNAL_IGNORED(traceme_sendsignal_ignored1, SIGABRT) /* abort */
5541.50SkamilTRACEME_SENDSIGNAL_IGNORED(traceme_sendsignal_ignored2, SIGHUP)  /* hangup */
5551.61SkreTRACEME_SENDSIGNAL_IGNORED(traceme_sendsignal_ignored3, SIGCONT) /* continued */
5561.50Skamil
5571.50Skamil/// ----------------------------------------------------------------------------
5581.50Skamil
5591.50Skamilstatic void
5601.50Skamiltraceme_sendsignal_simple(int sigsent)
5611.1Skamil{
5621.35Skamil	const int sigval = SIGSTOP;
5631.35Skamil	int exitval = 0;
5641.1Skamil	pid_t child, wpid;
5651.1Skamil#if defined(TWAIT_HAVE_STATUS)
5661.1Skamil	int status;
5671.35Skamil	int expect_core = (sigsent == SIGABRT) ? 1 : 0;
5681.1Skamil#endif
5691.61Skre	struct ptrace_siginfo info;
5701.1Skamil
5711.45Skamil	memset(&info, 0, sizeof(info));
5721.45Skamil
5731.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
5741.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
5751.1Skamil	if (child == 0) {
5761.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
5771.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
5781.1Skamil
5791.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
5801.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
5811.1Skamil
5821.35Skamil		switch (sigsent) {
5831.35Skamil		case SIGCONT:
5841.48Skamil		case SIGSTOP:
5851.35Skamil			_exit(exitval);
5861.35Skamil		default:
5871.35Skamil			/* NOTREACHED */
5881.35Skamil			FORKEE_ASSERTX(0 && "This shall not be reached");
5891.35Skamil		}
5901.1Skamil	}
5911.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
5921.1Skamil
5931.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
5941.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
5951.1Skamil
5961.1Skamil	validate_status_stopped(status, sigval);
5971.1Skamil
5981.45Skamil	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
5991.61Skre	SYSCALL_REQUIRE(
6001.61Skre	    ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
6011.45Skamil
6021.45Skamil	DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
6031.45Skamil	DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n",
6041.45Skamil	    info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
6051.45Skamil	    info.psi_siginfo.si_errno);
6061.45Skamil
6071.45Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigval);
6081.45Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, SI_LWP);
6091.45Skamil
6101.13Schristos	DPRINTF("Before resuming the child process where it left off and with "
6111.1Skamil	    "signal %s to be sent\n", strsignal(sigsent));
6121.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, sigsent) != -1);
6131.1Skamil
6141.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
6151.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
6161.1Skamil
6171.35Skamil	switch (sigsent) {
6181.48Skamil	case SIGSTOP:
6191.48Skamil		validate_status_stopped(status, sigsent);
6201.48Skamil		DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for "
6211.61Skre		    "child\n");
6221.48Skamil		SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info,
6231.61Skre		    sizeof(info)) != -1);
6241.48Skamil
6251.48Skamil		DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
6261.48Skamil		DPRINTF("Signal properties: si_signo=%#x si_code=%#x "
6271.61Skre		    "si_errno=%#x\n",
6281.61Skre		    info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
6291.61Skre		    info.psi_siginfo.si_errno);
6301.48Skamil
6311.48Skamil		ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigval);
6321.48Skamil		ATF_REQUIRE_EQ(info.psi_siginfo.si_code, SI_LWP);
6331.48Skamil
6341.48Skamil		DPRINTF("Before resuming the child process where it left off "
6351.61Skre		    "and with signal %s to be sent\n", strsignal(sigsent));
6361.48Skamil		SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
6371.48Skamil
6381.48Skamil		DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
6391.48Skamil		TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0),
6401.61Skre		    child);
6411.48Skamil		/* FALLTHROUGH */
6421.35Skamil	case SIGCONT:
6431.35Skamil		validate_status_exited(status, exitval);
6441.35Skamil		break;
6451.35Skamil	default:
6461.35Skamil		validate_status_signaled(status, sigsent, expect_core);
6471.35Skamil		break;
6481.35Skamil	}
6491.1Skamil
6501.13Schristos	DPRINTF("Before calling %s() for the exited child\n", TWAIT_FNAME);
6511.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
6521.1Skamil}
6531.1Skamil
6541.61Skre#define TRACEME_SENDSIGNAL_SIMPLE(test, sig)				\
6551.61SkreATF_TC(test);								\
6561.61SkreATF_TC_HEAD(test, tc)							\
6571.61Skre{									\
6581.61Skre	atf_tc_set_md_var(tc, "descr",					\
6591.61Skre	    "Verify that a signal " #sig " emitted by a tracer to a child is " \
6601.61Skre	    "handled correctly in a child without a signal handler");	\
6611.61Skre}									\
6621.61Skre									\
6631.61SkreATF_TC_BODY(test, tc)							\
6641.61Skre{									\
6651.61Skre									\
6661.61Skre	traceme_sendsignal_simple(sig);					\
6671.35Skamil}
6681.35Skamil
6691.61SkreTRACEME_SENDSIGNAL_SIMPLE(traceme_sendsignal_simple1, SIGKILL) /* non-maskable*/
6701.61SkreTRACEME_SENDSIGNAL_SIMPLE(traceme_sendsignal_simple2, SIGSTOP) /* non-maskable*/
6711.50SkamilTRACEME_SENDSIGNAL_SIMPLE(traceme_sendsignal_simple3, SIGABRT) /* abort trap */
6721.50SkamilTRACEME_SENDSIGNAL_SIMPLE(traceme_sendsignal_simple4, SIGHUP)  /* hangup */
6731.50SkamilTRACEME_SENDSIGNAL_SIMPLE(traceme_sendsignal_simple5, SIGCONT) /* continued? */
6741.35Skamil
6751.35Skamil/// ----------------------------------------------------------------------------
6761.35Skamil
6771.37SkamilATF_TC(traceme_pid1_parent);
6781.37SkamilATF_TC_HEAD(traceme_pid1_parent, tc)
6791.37Skamil{
6801.37Skamil	atf_tc_set_md_var(tc, "descr",
6811.37Skamil	    "Verify that PT_TRACE_ME is not allowed when our parent is PID1");
6821.37Skamil}
6831.37Skamil
6841.37SkamilATF_TC_BODY(traceme_pid1_parent, tc)
6851.37Skamil{
6861.37Skamil	struct msg_fds parent_child;
6871.37Skamil	int exitval_child1 = 1, exitval_child2 = 2;
6881.37Skamil	pid_t child1, child2, wpid;
6891.37Skamil	uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */
6901.37Skamil#if defined(TWAIT_HAVE_STATUS)
6911.37Skamil	int status;
6921.37Skamil#endif
6931.37Skamil
6941.37Skamil	SYSCALL_REQUIRE(msg_open(&parent_child) == 0);
6951.37Skamil
6961.37Skamil	DPRINTF("Before forking process PID=%d\n", getpid());
6971.37Skamil	SYSCALL_REQUIRE((child1 = fork()) != -1);
6981.37Skamil	if (child1 == 0) {
6991.37Skamil		DPRINTF("Before forking process PID=%d\n", getpid());
7001.37Skamil		SYSCALL_REQUIRE((child2 = fork()) != -1);
7011.37Skamil		if (child2 != 0) {
7021.37Skamil			DPRINTF("Parent process PID=%d, child2's PID=%d\n",
7031.61Skre			    getpid(), child2);
7041.37Skamil			_exit(exitval_child1);
7051.37Skamil		}
7061.37Skamil		CHILD_FROM_PARENT("exit child1", parent_child, msg);
7071.37Skamil
7081.37Skamil		DPRINTF("Assert that our parent is PID1 (initproc)\n");
7091.37Skamil		FORKEE_ASSERT_EQ(getppid(), 1);
7101.37Skamil
7111.37Skamil		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
7121.37Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) == -1);
7131.37Skamil		SYSCALL_REQUIRE_ERRNO(errno, EPERM);
7141.37Skamil
7151.37Skamil		CHILD_TO_PARENT("child2 exiting", parent_child, msg);
7161.37Skamil
7171.37Skamil		_exit(exitval_child2);
7181.37Skamil	}
7191.37Skamil	DPRINTF("Parent process PID=%d, child1's PID=%d\n", getpid(), child1);
7201.37Skamil
7211.37Skamil	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
7221.61Skre	TWAIT_REQUIRE_SUCCESS(
7231.61Skre	    wpid = TWAIT_GENERIC(child1, &status, WEXITED), child1);
7241.37Skamil
7251.37Skamil	validate_status_exited(status, exitval_child1);
7261.37Skamil
7271.37Skamil	DPRINTF("Notify that child1 is dead\n");
7281.37Skamil	PARENT_TO_CHILD("exit child1", parent_child, msg);
7291.37Skamil
7301.37Skamil	DPRINTF("Wait for exiting of child2\n");
7311.37Skamil	PARENT_FROM_CHILD("child2 exiting", parent_child, msg);
7321.37Skamil}
7331.37Skamil
7341.37Skamil/// ----------------------------------------------------------------------------
7351.37Skamil
7361.40Skamilstatic void
7371.40Skamiltraceme_vfork_raise(int sigval)
7381.40Skamil{
7391.46Skamil	const int exitval = 5, exitval_watcher = 10;
7401.46Skamil	pid_t child, parent, watcher, wpid;
7411.46Skamil	int rv;
7421.40Skamil#if defined(TWAIT_HAVE_STATUS)
7431.40Skamil	int status;
7441.40Skamil	int expect_core = (sigval == SIGABRT) ? 1 : 0;
7451.40Skamil#endif
7461.40Skamil
7471.46Skamil	/*
7481.46Skamil	 * Spawn a dedicated thread to watch for a stopped child and emit
7491.46Skamil	 * the SIGKILL signal to it.
7501.46Skamil	 *
7511.46Skamil	 * vfork(2) might clobber watcher, this means that it's safer and
7521.46Skamil	 * simpler to reparent this process to initproc and forget about it.
7531.46Skamil	 */
7541.46Skamil	if (sigval == SIGSTOP) {
7551.46Skamil		parent = getpid();
7561.46Skamil
7571.46Skamil		watcher = fork();
7581.46Skamil		ATF_REQUIRE(watcher != 1);
7591.46Skamil		if (watcher == 0) {
7601.46Skamil			/* Double fork(2) trick to reparent to initproc */
7611.46Skamil			watcher = fork();
7621.46Skamil			FORKEE_ASSERT_NEQ(watcher, -1);
7631.46Skamil			if (watcher != 0)
7641.46Skamil				_exit(exitval_watcher);
7651.46Skamil
7661.46Skamil			child = await_stopped_child(parent);
7671.46Skamil
7681.46Skamil			errno = 0;
7691.46Skamil			rv = kill(child, SIGKILL);
7701.46Skamil			FORKEE_ASSERT_EQ(rv, 0);
7711.46Skamil			FORKEE_ASSERT_EQ(errno, 0);
7721.46Skamil
7731.46Skamil			/* This exit value will be collected by initproc */
7741.46Skamil			_exit(0);
7751.46Skamil		}
7761.46Skamil		DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
7771.46Skamil		TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(watcher, &status, 0),
7781.61Skre		    watcher);
7791.46Skamil
7801.46Skamil		validate_status_exited(status, exitval_watcher);
7811.46Skamil
7821.46Skamil		DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
7831.61Skre		TWAIT_REQUIRE_FAILURE(ECHILD,
7841.61Skre		    wpid = TWAIT_GENERIC(watcher, &status, 0));
7851.46Skamil	}
7861.46Skamil
7871.40Skamil	DPRINTF("Before forking process PID=%d\n", getpid());
7881.40Skamil	SYSCALL_REQUIRE((child = vfork()) != -1);
7891.40Skamil	if (child == 0) {
7901.40Skamil		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
7911.40Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
7921.40Skamil
7931.40Skamil		DPRINTF("Before raising %s from child\n", strsignal(sigval));
7941.40Skamil		FORKEE_ASSERT(raise(sigval) == 0);
7951.40Skamil
7961.40Skamil		switch (sigval) {
7971.46Skamil		case SIGSTOP:
7981.40Skamil		case SIGKILL:
7991.40Skamil		case SIGABRT:
8001.40Skamil		case SIGHUP:
8011.40Skamil			/* NOTREACHED */
8021.40Skamil			FORKEE_ASSERTX(0 && "This shall not be reached");
8031.40Skamil		default:
8041.40Skamil			DPRINTF("Before exiting of the child process\n");
8051.40Skamil			_exit(exitval);
8061.40Skamil		}
8071.40Skamil	}
8081.40Skamil	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
8091.40Skamil
8101.40Skamil	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
8111.40Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
8121.40Skamil
8131.40Skamil	switch (sigval) {
8141.40Skamil	case SIGKILL:
8151.40Skamil	case SIGABRT:
8161.40Skamil	case SIGHUP:
8171.40Skamil		validate_status_signaled(status, sigval, expect_core);
8181.40Skamil		break;
8191.40Skamil	case SIGSTOP:
8201.46Skamil		validate_status_signaled(status, SIGKILL, 0);
8211.46Skamil		break;
8221.40Skamil	case SIGCONT:
8231.47Skamil	case SIGTSTP:
8241.47Skamil	case SIGTTIN:
8251.47Skamil	case SIGTTOU:
8261.40Skamil		validate_status_exited(status, exitval);
8271.40Skamil		break;
8281.40Skamil	default:
8291.40Skamil		/* NOTREACHED */
8301.40Skamil		ATF_REQUIRE(0 && "NOT IMPLEMENTED");
8311.40Skamil		break;
8321.40Skamil	}
8331.40Skamil
8341.40Skamil	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
8351.40Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
8361.40Skamil}
8371.40Skamil
8381.61Skre#define TRACEME_VFORK_RAISE(test, sig)					\
8391.61SkreATF_TC(test);								\
8401.61SkreATF_TC_HEAD(test, tc)							\
8411.61Skre{									\
8421.61Skre	atf_tc_set_md_var(tc, "descr",					\
8431.61Skre	    "Verify PT_TRACE_ME followed by raise of " #sig " in a "	\
8441.61Skre	    "vfork(2)ed child");					\
8451.61Skre}									\
8461.61Skre									\
8471.61SkreATF_TC_BODY(test, tc)							\
8481.61Skre{									\
8491.61Skre									\
8501.61Skre	traceme_vfork_raise(sig);					\
8511.40Skamil}
8521.40Skamil
8531.40SkamilTRACEME_VFORK_RAISE(traceme_vfork_raise1, SIGKILL) /* non-maskable */
8541.46SkamilTRACEME_VFORK_RAISE(traceme_vfork_raise2, SIGSTOP) /* non-maskable */
8551.47SkamilTRACEME_VFORK_RAISE(traceme_vfork_raise3, SIGTSTP) /* ignored in vfork(2) */
8561.47SkamilTRACEME_VFORK_RAISE(traceme_vfork_raise4, SIGTTIN) /* ignored in vfork(2) */
8571.47SkamilTRACEME_VFORK_RAISE(traceme_vfork_raise5, SIGTTOU) /* ignored in vfork(2) */
8581.47SkamilTRACEME_VFORK_RAISE(traceme_vfork_raise6, SIGABRT) /* regular abort trap */
8591.47SkamilTRACEME_VFORK_RAISE(traceme_vfork_raise7, SIGHUP)  /* hangup */
8601.47SkamilTRACEME_VFORK_RAISE(traceme_vfork_raise8, SIGCONT) /* continued? */
8611.40Skamil
8621.40Skamil/// ----------------------------------------------------------------------------
8631.40Skamil
8641.52Skamilstatic void
8651.52Skamiltraceme_vfork_crash(int sig)
8661.41Skamil{
8671.41Skamil	pid_t child, wpid;
8681.41Skamil#if defined(TWAIT_HAVE_STATUS)
8691.41Skamil	int status;
8701.41Skamil#endif
8711.41Skamil
8721.63Skamil	if (sig == SIGBUS) {
8731.63Skamil		atf_tc_expect_fail("lib/53343");
8741.63Skamil	}
8751.63Skamil
8761.41Skamil	DPRINTF("Before forking process PID=%d\n", getpid());
8771.41Skamil	SYSCALL_REQUIRE((child = vfork()) != -1);
8781.41Skamil	if (child == 0) {
8791.41Skamil		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
8801.41Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
8811.41Skamil
8821.52Skamil		DPRINTF("Before executing a trap\n");
8831.52Skamil		switch (sig) {
8841.52Skamil		case SIGTRAP:
8851.52Skamil			trigger_trap();
8861.52Skamil			break;
8871.52Skamil		case SIGSEGV:
8881.52Skamil			trigger_segv();
8891.52Skamil			break;
8901.52Skamil		case SIGILL:
8911.52Skamil			trigger_ill();
8921.52Skamil			break;
8931.52Skamil		case SIGFPE:
8941.52Skamil			trigger_fpe();
8951.52Skamil			break;
8961.52Skamil		case SIGBUS:
8971.52Skamil			trigger_bus();
8981.52Skamil			break;
8991.52Skamil		default:
9001.52Skamil			/* NOTREACHED */
9011.52Skamil			FORKEE_ASSERTX(0 && "This shall not be reached");
9021.52Skamil		}
9031.41Skamil
9041.41Skamil		/* NOTREACHED */
9051.41Skamil		FORKEE_ASSERTX(0 && "This shall not be reached");
9061.41Skamil	}
9071.41Skamil	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
9081.41Skamil
9091.41Skamil	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
9101.41Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
9111.41Skamil
9121.52Skamil	validate_status_signaled(status, sig, 1);
9131.41Skamil
9141.41Skamil	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
9151.41Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
9161.41Skamil}
9171.41Skamil
9181.61Skre#define TRACEME_VFORK_CRASH(test, sig)					\
9191.61SkreATF_TC(test);								\
9201.61SkreATF_TC_HEAD(test, tc)							\
9211.61Skre{									\
9221.61Skre	atf_tc_set_md_var(tc, "descr",					\
9231.61Skre	    "Verify PT_TRACE_ME followed by a crash signal " #sig " in a " \
9241.61Skre	    "vfork(2)ed child");					\
9251.61Skre}									\
9261.61Skre									\
9271.61SkreATF_TC_BODY(test, tc)							\
9281.61Skre{									\
9291.61Skre									\
9301.61Skre	traceme_vfork_crash(sig);					\
9311.52Skamil}
9321.52Skamil
9331.52SkamilTRACEME_VFORK_CRASH(traceme_vfork_crash_trap, SIGTRAP)
9341.52SkamilTRACEME_VFORK_CRASH(traceme_vfork_crash_segv, SIGSEGV)
9351.52Skamil//TRACEME_VFORK_CRASH(traceme_vfork_crash_ill, SIGILL)
9361.52SkamilTRACEME_VFORK_CRASH(traceme_vfork_crash_fpe, SIGFPE)
9371.52SkamilTRACEME_VFORK_CRASH(traceme_vfork_crash_bus, SIGBUS)
9381.52Skamil
9391.41Skamil/// ----------------------------------------------------------------------------
9401.41Skamil
9411.43SkamilATF_TC(traceme_vfork_exec);
9421.43SkamilATF_TC_HEAD(traceme_vfork_exec, tc)
9431.43Skamil{
9441.43Skamil	atf_tc_set_md_var(tc, "descr",
9451.43Skamil	    "Verify PT_TRACE_ME followed by exec(3) in a vfork(2)ed child");
9461.43Skamil}
9471.43Skamil
9481.43SkamilATF_TC_BODY(traceme_vfork_exec, tc)
9491.43Skamil{
9501.43Skamil	const int sigval = SIGTRAP;
9511.43Skamil	pid_t child, wpid;
9521.43Skamil#if defined(TWAIT_HAVE_STATUS)
9531.43Skamil	int status;
9541.43Skamil#endif
9551.61Skre	struct ptrace_siginfo info;
9561.43Skamil
9571.43Skamil	memset(&info, 0, sizeof(info));
9581.43Skamil
9591.43Skamil	DPRINTF("Before forking process PID=%d\n", getpid());
9601.43Skamil	SYSCALL_REQUIRE((child = vfork()) != -1);
9611.43Skamil	if (child == 0) {
9621.43Skamil		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
9631.43Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
9641.43Skamil
9651.43Skamil		DPRINTF("Before calling execve(2) from child\n");
9661.43Skamil		execlp("/bin/echo", "/bin/echo", NULL);
9671.43Skamil
9681.43Skamil		/* NOTREACHED */
9691.43Skamil		FORKEE_ASSERTX(0 && "Not reached");
9701.43Skamil	}
9711.43Skamil	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
9721.43Skamil
9731.43Skamil	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
9741.43Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
9751.43Skamil
9761.43Skamil	validate_status_stopped(status, sigval);
9771.43Skamil
9781.43Skamil	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
9791.61Skre	SYSCALL_REQUIRE(
9801.61Skre	    ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
9811.43Skamil
9821.43Skamil	DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
9831.43Skamil	DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n",
9841.43Skamil	    info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
9851.43Skamil	    info.psi_siginfo.si_errno);
9861.43Skamil
9871.43Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigval);
9881.43Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_EXEC);
9891.43Skamil
9901.43Skamil	DPRINTF("Before resuming the child process where it left off and "
9911.43Skamil	    "without signal to be sent\n");
9921.43Skamil	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
9931.43Skamil
9941.43Skamil	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
9951.43Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
9961.43Skamil
9971.43Skamil	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
9981.43Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
9991.43Skamil}
10001.43Skamil
10011.43Skamil/// ----------------------------------------------------------------------------
10021.43Skamil
10031.1Skamil#if defined(TWAIT_HAVE_PID)
10041.51Skamilstatic void
10051.59Skamilunrelated_tracer_sees_crash(int sig)
10061.59Skamil{
10071.59Skamil	struct msg_fds parent_tracee, parent_tracer;
10081.59Skamil	const int exitval = 10;
10091.59Skamil	pid_t tracee, tracer, wpid;
10101.59Skamil	uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */
10111.59Skamil#if defined(TWAIT_HAVE_STATUS)
10121.59Skamil	int status;
10131.59Skamil#endif
10141.59Skamil	struct ptrace_siginfo info;
10151.61Skre
10161.59Skamil	memset(&info, 0, sizeof(info));
10171.59Skamil
10181.59Skamil	DPRINTF("Spawn tracee\n");
10191.59Skamil	SYSCALL_REQUIRE(msg_open(&parent_tracee) == 0);
10201.59Skamil	tracee = atf_utils_fork();
10211.59Skamil	if (tracee == 0) {
10221.59Skamil		// Wait for parent to let us crash
10231.59Skamil		CHILD_FROM_PARENT("exit tracee", parent_tracee, msg);
10241.61Skre
10251.59Skamil		DPRINTF("Before executing a trap\n");
10261.59Skamil		switch (sig) {
10271.59Skamil		case SIGTRAP:
10281.59Skamil			trigger_trap();
10291.59Skamil			break;
10301.59Skamil		case SIGSEGV:
10311.59Skamil			trigger_segv();
10321.59Skamil			break;
10331.59Skamil		case SIGILL:
10341.59Skamil			trigger_ill();
10351.59Skamil			break;
10361.59Skamil		case SIGFPE:
10371.59Skamil			trigger_fpe();
10381.59Skamil			break;
10391.59Skamil		case SIGBUS:
10401.59Skamil			trigger_bus();
10411.59Skamil			break;
10421.59Skamil		default:
10431.59Skamil			/* NOTREACHED */
10441.59Skamil			FORKEE_ASSERTX(0 && "This shall not be reached");
10451.59Skamil		}
10461.59Skamil
10471.59Skamil		/* NOTREACHED */
10481.59Skamil		FORKEE_ASSERTX(0 && "This shall not be reached");
10491.59Skamil	}
10501.59Skamil
10511.59Skamil	DPRINTF("Spawn debugger\n");
10521.59Skamil	SYSCALL_REQUIRE(msg_open(&parent_tracer) == 0);
10531.59Skamil	tracer = atf_utils_fork();
10541.59Skamil	if (tracer == 0) {
10551.59Skamil		/* Fork again and drop parent to reattach to PID 1 */
10561.59Skamil		tracer = atf_utils_fork();
10571.59Skamil		if (tracer != 0)
10581.61Skre			_exit(exitval);
10591.59Skamil
10601.59Skamil		DPRINTF("Before calling PT_ATTACH from tracee %d\n", getpid());
10611.59Skamil		FORKEE_ASSERT(ptrace(PT_ATTACH, tracee, NULL, 0) != -1);
10621.59Skamil
10631.59Skamil		/* Wait for tracee and assert that it was stopped w/ SIGSTOP */
10641.59Skamil		FORKEE_REQUIRE_SUCCESS(
10651.59Skamil		    wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);
10661.59Skamil
10671.59Skamil		forkee_status_stopped(status, SIGSTOP);
10681.59Skamil
10691.59Skamil		/* Resume tracee with PT_CONTINUE */
10701.59Skamil		FORKEE_ASSERT(ptrace(PT_CONTINUE, tracee, (void *)1, 0) != -1);
10711.59Skamil
10721.59Skamil		/* Inform parent that tracer has attached to tracee */
10731.59Skamil		CHILD_TO_PARENT("tracer ready", parent_tracer, msg);
10741.59Skamil
10751.59Skamil		/* Wait for parent to tell use that tracee should have exited */
10761.59Skamil		CHILD_FROM_PARENT("wait for tracee exit", parent_tracer, msg);
10771.59Skamil
10781.59Skamil		/* Wait for tracee and assert that it exited */
10791.59Skamil		FORKEE_REQUIRE_SUCCESS(
10801.59Skamil		    wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);
10811.59Skamil
10821.59Skamil		validate_status_stopped(status, sig);
10831.59Skamil
10841.59Skamil		DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for the "
10851.61Skre		    "traced process\n");
10861.61Skre		SYSCALL_REQUIRE(
10871.61Skre		    ptrace(PT_GET_SIGINFO, tracee, &info, sizeof(info)) != -1);
10881.59Skamil
10891.59Skamil		DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
10901.59Skamil		DPRINTF("Signal properties: si_signo=%#x si_code=%#x "
10911.61Skre		    "si_errno=%#x\n", info.psi_siginfo.si_signo,
10921.61Skre		    info.psi_siginfo.si_code, info.psi_siginfo.si_errno);
10931.59Skamil
10941.59Skamil		ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sig);
10951.59Skamil		switch (sig) {
10961.59Skamil		case SIGTRAP:
10971.59Skamil			ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_BRKPT);
10981.59Skamil			break;
10991.59Skamil		case SIGSEGV:
11001.59Skamil			ATF_REQUIRE_EQ(info.psi_siginfo.si_code, SEGV_MAPERR);
11011.59Skamil			break;
11021.59Skamil//		case SIGILL:
11031.59Skamil//			ATF_REQUIRE_EQ(info.psi_siginfo.si_code, ILL_ILLOP);
11041.59Skamil//			break;
11051.59Skamil		case SIGFPE:
11061.59Skamil			ATF_REQUIRE_EQ(info.psi_siginfo.si_code, FPE_INTDIV);
11071.59Skamil			break;
11081.59Skamil		case SIGBUS:
11091.59Skamil			ATF_REQUIRE_EQ(info.psi_siginfo.si_code, BUS_ADRERR);
11101.59Skamil			break;
11111.59Skamil		}
11121.59Skamil
11131.59Skamil		FORKEE_ASSERT(ptrace(PT_KILL, tracee, NULL, 0) != -1);
11141.59Skamil		DPRINTF("Before calling %s() for the tracee\n", TWAIT_FNAME);
11151.61Skre		TWAIT_REQUIRE_SUCCESS(
11161.61Skre		    wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);
11171.59Skamil
11181.59Skamil		validate_status_signaled(status, SIGKILL, 0);
11191.59Skamil
11201.59Skamil		DPRINTF("Before calling %s() for tracee\n", TWAIT_FNAME);
11211.59Skamil		TWAIT_REQUIRE_FAILURE(ECHILD,
11221.59Skamil		    wpid = TWAIT_GENERIC(tracee, &status, 0));
11231.59Skamil
11241.59Skamil		DPRINTF("Before exiting of the tracer process\n");
11251.59Skamil		_exit(0 /* collect by initproc */);
11261.59Skamil	}
11271.59Skamil
11281.59Skamil	DPRINTF("Wait for the tracer process (direct child) to exit "
11291.59Skamil	    "calling %s()\n", TWAIT_FNAME);
11301.59Skamil	TWAIT_REQUIRE_SUCCESS(
11311.59Skamil	    wpid = TWAIT_GENERIC(tracer, &status, 0), tracer);
11321.59Skamil
11331.59Skamil	validate_status_exited(status, exitval);
11341.59Skamil
11351.59Skamil	DPRINTF("Wait for the non-exited tracee process with %s()\n",
11361.59Skamil	    TWAIT_FNAME);
11371.59Skamil	TWAIT_REQUIRE_SUCCESS(
11381.59Skamil	    wpid = TWAIT_GENERIC(tracee, NULL, WNOHANG), 0);
11391.59Skamil
11401.59Skamil	DPRINTF("Wait for the tracer to attach to the tracee\n");
11411.59Skamil	PARENT_FROM_CHILD("tracer ready", parent_tracer, msg);
11421.59Skamil
11431.59Skamil	DPRINTF("Resume the tracee and let it crash\n");
11441.59Skamil	PARENT_TO_CHILD("exit tracee", parent_tracee,  msg);
11451.59Skamil
11461.59Skamil	DPRINTF("Resume the tracer and let it detect crashed tracee\n");
11471.59Skamil	PARENT_TO_CHILD("Message 2", parent_tracer, msg);
11481.59Skamil
11491.59Skamil	DPRINTF("Wait for tracee to finish its job and exit - calling %s()\n",
11501.59Skamil	    TWAIT_FNAME);
11511.59Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);
11521.59Skamil
11531.59Skamil	validate_status_signaled(status, SIGKILL, 0);
11541.59Skamil
11551.59Skamil	msg_close(&parent_tracer);
11561.59Skamil	msg_close(&parent_tracee);
11571.59Skamil}
11581.59Skamil
11591.61Skre#define UNRELATED_TRACER_SEES_CRASH(test, sig)				\
11601.61SkreATF_TC(test);								\
11611.61SkreATF_TC_HEAD(test, tc)							\
11621.61Skre{									\
11631.61Skre	atf_tc_set_md_var(tc, "descr",					\
11641.61Skre	    "Assert that an unrelated tracer sees crash signal from the " \
11651.61Skre	    "debuggee");						\
11661.61Skre}									\
11671.61Skre									\
11681.61SkreATF_TC_BODY(test, tc)							\
11691.61Skre{									\
11701.61Skre									\
11711.61Skre	unrelated_tracer_sees_crash(sig);				\
11721.59Skamil}
11731.59Skamil
11741.59SkamilUNRELATED_TRACER_SEES_CRASH(unrelated_tracer_sees_crash_trap, SIGTRAP)
11751.59SkamilUNRELATED_TRACER_SEES_CRASH(unrelated_tracer_sees_crash_segv, SIGSEGV)
11761.59Skamil//UNRELATED_TRACER_SEES_CRASH(unrelated_tracer_sees_crash_ill, SIGILL)
11771.59SkamilUNRELATED_TRACER_SEES_CRASH(unrelated_tracer_sees_crash_fpe, SIGFPE)
11781.59SkamilUNRELATED_TRACER_SEES_CRASH(unrelated_tracer_sees_crash_bus, SIGBUS)
11791.59Skamil#endif
11801.59Skamil
11811.59Skamil/// ----------------------------------------------------------------------------
11821.59Skamil
11831.59Skamil#if defined(TWAIT_HAVE_PID)
11841.59Skamilstatic void
11851.51Skamiltracer_sees_terminaton_before_the_parent_raw(bool notimeout, bool unrelated)
11861.1Skamil{
11871.51Skamil	/*
11881.51Skamil	 * notimeout - disable timeout in await zombie function
11891.51Skamil	 * unrelated - attach from unrelated tracer reparented to initproc
11901.51Skamil	 */
11911.1Skamil
11921.1Skamil	struct msg_fds parent_tracee, parent_tracer;
11931.1Skamil	const int exitval_tracee = 5;
11941.1Skamil	const int exitval_tracer = 10;
11951.1Skamil	pid_t tracee, tracer, wpid;
11961.1Skamil	uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */
11971.1Skamil#if defined(TWAIT_HAVE_STATUS)
11981.1Skamil	int status;
11991.1Skamil#endif
12001.1Skamil
12011.13Schristos	DPRINTF("Spawn tracee\n");
12021.13Schristos	SYSCALL_REQUIRE(msg_open(&parent_tracee) == 0);
12031.1Skamil	tracee = atf_utils_fork();
12041.1Skamil	if (tracee == 0) {
12051.1Skamil		// Wait for parent to let us exit
12061.1Skamil		CHILD_FROM_PARENT("exit tracee", parent_tracee, msg);
12071.1Skamil		_exit(exitval_tracee);
12081.1Skamil	}
12091.1Skamil
12101.13Schristos	DPRINTF("Spawn debugger\n");
12111.13Schristos	SYSCALL_REQUIRE(msg_open(&parent_tracer) == 0);
12121.1Skamil	tracer = atf_utils_fork();
12131.1Skamil	if (tracer == 0) {
12141.51Skamil		if(unrelated) {
12151.51Skamil			/* Fork again and drop parent to reattach to PID 1 */
12161.51Skamil			tracer = atf_utils_fork();
12171.51Skamil			if (tracer != 0)
12181.51Skamil				_exit(exitval_tracer);
12191.51Skamil		}
12201.51Skamil
12211.13Schristos		DPRINTF("Before calling PT_ATTACH from tracee %d\n", getpid());
12221.1Skamil		FORKEE_ASSERT(ptrace(PT_ATTACH, tracee, NULL, 0) != -1);
12231.1Skamil
12241.1Skamil		/* Wait for tracee and assert that it was stopped w/ SIGSTOP */
12251.1Skamil		FORKEE_REQUIRE_SUCCESS(
12261.1Skamil		    wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);
12271.1Skamil
12281.1Skamil		forkee_status_stopped(status, SIGSTOP);
12291.1Skamil
12301.1Skamil		/* Resume tracee with PT_CONTINUE */
12311.1Skamil		FORKEE_ASSERT(ptrace(PT_CONTINUE, tracee, (void *)1, 0) != -1);
12321.1Skamil
12331.1Skamil		/* Inform parent that tracer has attached to tracee */
12341.1Skamil		CHILD_TO_PARENT("tracer ready", parent_tracer, msg);
12351.1Skamil
12361.1Skamil		/* Wait for parent to tell use that tracee should have exited */
12371.1Skamil		CHILD_FROM_PARENT("wait for tracee exit", parent_tracer, msg);
12381.1Skamil
12391.1Skamil		/* Wait for tracee and assert that it exited */
12401.1Skamil		FORKEE_REQUIRE_SUCCESS(
12411.1Skamil		    wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);
12421.1Skamil
12431.1Skamil		forkee_status_exited(status, exitval_tracee);
12441.13Schristos		DPRINTF("Tracee %d exited with %d\n", tracee, exitval_tracee);
12451.1Skamil
12461.13Schristos		DPRINTF("Before exiting of the tracer process\n");
12471.51Skamil		_exit(unrelated ? 0 /* collect by initproc */ : exitval_tracer);
12481.51Skamil	}
12491.51Skamil
12501.51Skamil	if (unrelated) {
12511.51Skamil		DPRINTF("Wait for the tracer process (direct child) to exit "
12521.51Skamil		    "calling %s()\n", TWAIT_FNAME);
12531.51Skamil		TWAIT_REQUIRE_SUCCESS(
12541.51Skamil		    wpid = TWAIT_GENERIC(tracer, &status, 0), tracer);
12551.51Skamil
12561.51Skamil		validate_status_exited(status, exitval_tracer);
12571.51Skamil
12581.51Skamil		DPRINTF("Wait for the non-exited tracee process with %s()\n",
12591.51Skamil		    TWAIT_FNAME);
12601.51Skamil		TWAIT_REQUIRE_SUCCESS(
12611.51Skamil		    wpid = TWAIT_GENERIC(tracee, NULL, WNOHANG), 0);
12621.1Skamil	}
12631.1Skamil
12641.13Schristos	DPRINTF("Wait for the tracer to attach to the tracee\n");
12651.1Skamil	PARENT_FROM_CHILD("tracer ready", parent_tracer, msg);
12661.1Skamil
12671.13Schristos	DPRINTF("Resume the tracee and let it exit\n");
12681.1Skamil	PARENT_TO_CHILD("exit tracee", parent_tracee,  msg);
12691.1Skamil
12701.13Schristos	DPRINTF("Detect that tracee is zombie\n");
12711.51Skamil	if (notimeout)
12721.26Skamil		await_zombie_raw(tracee, 0);
12731.26Skamil	else
12741.26Skamil		await_zombie(tracee);
12751.1Skamil
12761.13Schristos	DPRINTF("Assert that there is no status about tracee %d - "
12771.1Skamil	    "Tracer must detect zombie first - calling %s()\n", tracee,
12781.1Skamil	    TWAIT_FNAME);
12791.1Skamil	TWAIT_REQUIRE_SUCCESS(
12801.1Skamil	    wpid = TWAIT_GENERIC(tracee, &status, WNOHANG), 0);
12811.1Skamil
12821.51Skamil	if (unrelated) {
12831.51Skamil		DPRINTF("Resume the tracer and let it detect exited tracee\n");
12841.51Skamil		PARENT_TO_CHILD("Message 2", parent_tracer, msg);
12851.51Skamil	} else {
12861.51Skamil		DPRINTF("Tell the tracer child should have exited\n");
12871.51Skamil		PARENT_TO_CHILD("wait for tracee exit", parent_tracer,  msg);
12881.51Skamil		DPRINTF("Wait for tracer to finish its job and exit - calling "
12891.59Skamil			"%s()\n", TWAIT_FNAME);
12901.51Skamil
12911.51Skamil		DPRINTF("Wait from tracer child to complete waiting for "
12921.59Skamil			"tracee\n");
12931.51Skamil		TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracer, &status, 0),
12941.51Skamil		    tracer);
12951.1Skamil
12961.51Skamil		validate_status_exited(status, exitval_tracer);
12971.51Skamil	}
12981.1Skamil
12991.13Schristos	DPRINTF("Wait for tracee to finish its job and exit - calling %s()\n",
13001.1Skamil	    TWAIT_FNAME);
13011.51Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);
13021.1Skamil
13031.1Skamil	validate_status_exited(status, exitval_tracee);
13041.1Skamil
13051.1Skamil	msg_close(&parent_tracer);
13061.1Skamil	msg_close(&parent_tracee);
13071.1Skamil}
13081.26Skamil
13091.51SkamilATF_TC(tracer_sees_terminaton_before_the_parent);
13101.51SkamilATF_TC_HEAD(tracer_sees_terminaton_before_the_parent, tc)
13111.51Skamil{
13121.51Skamil	atf_tc_set_md_var(tc, "descr",
13131.51Skamil	    "Assert that tracer sees process termination before the parent");
13141.51Skamil}
13151.51Skamil
13161.51SkamilATF_TC_BODY(tracer_sees_terminaton_before_the_parent, tc)
13171.26Skamil{
13181.26Skamil
13191.51Skamil	tracer_sees_terminaton_before_the_parent_raw(false, false);
13201.26Skamil}
13211.26Skamil
13221.51SkamilATF_TC(tracer_sysctl_lookup_without_duplicates);
13231.51SkamilATF_TC_HEAD(tracer_sysctl_lookup_without_duplicates, tc)
13241.1Skamil{
13251.1Skamil	atf_tc_set_md_var(tc, "descr",
13261.51Skamil	    "Assert that await_zombie() in attach1 always finds a single "
13271.51Skamil	    "process and no other error is reported");
13281.1Skamil}
13291.1Skamil
13301.51SkamilATF_TC_BODY(tracer_sysctl_lookup_without_duplicates, tc)
13311.1Skamil{
13321.51Skamil	time_t start, end;
13331.51Skamil	double diff;
13341.51Skamil	unsigned long N = 0;
13351.1Skamil
13361.51Skamil	/*
13371.51Skamil	 * Reuse this test with tracer_sees_terminaton_before_the_parent_raw().
13381.51Skamil	 * This test body isn't specific to this race, however it's just good
13391.51Skamil	 * enough for this purposes, no need to invent a dedicated code flow.
13401.51Skamil	 */
13411.1Skamil
13421.51Skamil	start = time(NULL);
13431.51Skamil	while (true) {
13441.51Skamil		DPRINTF("Step: %lu\n", N);
13451.51Skamil		tracer_sees_terminaton_before_the_parent_raw(true, false);
13461.51Skamil		end = time(NULL);
13471.51Skamil		diff = difftime(end, start);
13481.51Skamil		if (diff >= 5.0)
13491.51Skamil			break;
13501.51Skamil		++N;
13511.1Skamil	}
13521.51Skamil	DPRINTF("Iterations: %lu\n", N);
13531.51Skamil}
13541.1Skamil
13551.51SkamilATF_TC(unrelated_tracer_sees_terminaton_before_the_parent);
13561.51SkamilATF_TC_HEAD(unrelated_tracer_sees_terminaton_before_the_parent, tc)
13571.51Skamil{
13581.51Skamil	atf_tc_set_md_var(tc, "descr",
13591.51Skamil	    "Assert that tracer sees process termination before the parent");
13601.51Skamil}
13611.1Skamil
13621.51SkamilATF_TC_BODY(unrelated_tracer_sees_terminaton_before_the_parent, tc)
13631.51Skamil{
13641.1Skamil
13651.51Skamil	tracer_sees_terminaton_before_the_parent_raw(false, true);
13661.1Skamil}
13671.1Skamil#endif
13681.1Skamil
13691.51Skamil/// ----------------------------------------------------------------------------
13701.51Skamil
13711.51SkamilATF_TC(parent_attach_to_its_child);
13721.51SkamilATF_TC_HEAD(parent_attach_to_its_child, tc)
13731.1Skamil{
13741.1Skamil	atf_tc_set_md_var(tc, "descr",
13751.1Skamil	    "Assert that tracer parent can PT_ATTACH to its child");
13761.1Skamil}
13771.1Skamil
13781.51SkamilATF_TC_BODY(parent_attach_to_its_child, tc)
13791.1Skamil{
13801.1Skamil	struct msg_fds parent_tracee;
13811.1Skamil	const int exitval_tracee = 5;
13821.1Skamil	pid_t tracee, wpid;
13831.1Skamil	uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */
13841.1Skamil#if defined(TWAIT_HAVE_STATUS)
13851.1Skamil	int status;
13861.1Skamil#endif
13871.1Skamil
13881.13Schristos	DPRINTF("Spawn tracee\n");
13891.13Schristos	SYSCALL_REQUIRE(msg_open(&parent_tracee) == 0);
13901.1Skamil	tracee = atf_utils_fork();
13911.1Skamil	if (tracee == 0) {
13921.1Skamil		CHILD_FROM_PARENT("Message 1", parent_tracee, msg);
13931.13Schristos		DPRINTF("Parent should now attach to tracee\n");
13941.1Skamil
13951.1Skamil		CHILD_FROM_PARENT("Message 2", parent_tracee, msg);
13961.1Skamil		/* Wait for message from the parent */
13971.1Skamil		_exit(exitval_tracee);
13981.1Skamil	}
13991.1Skamil	PARENT_TO_CHILD("Message 1", parent_tracee, msg);
14001.57Skamil
14011.13Schristos	DPRINTF("Before calling PT_ATTACH for tracee %d\n", tracee);
14021.13Schristos	SYSCALL_REQUIRE(ptrace(PT_ATTACH, tracee, NULL, 0) != -1);
14031.1Skamil
14041.13Schristos	DPRINTF("Wait for the stopped tracee process with %s()\n",
14051.1Skamil	    TWAIT_FNAME);
14061.1Skamil	TWAIT_REQUIRE_SUCCESS(
14071.1Skamil	    wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);
14081.1Skamil
14091.1Skamil	validate_status_stopped(status, SIGSTOP);
14101.1Skamil
14111.13Schristos	DPRINTF("Resume tracee with PT_CONTINUE\n");
14121.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, tracee, (void *)1, 0) != -1);
14131.1Skamil
14141.13Schristos	DPRINTF("Let the tracee exit now\n");
14151.1Skamil	PARENT_TO_CHILD("Message 2", parent_tracee, msg);
14161.1Skamil
14171.13Schristos	DPRINTF("Wait for tracee to exit with %s()\n", TWAIT_FNAME);
14181.1Skamil	TWAIT_REQUIRE_SUCCESS(
14191.1Skamil	    wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);
14201.1Skamil
14211.1Skamil	validate_status_exited(status, exitval_tracee);
14221.1Skamil
14231.13Schristos	DPRINTF("Before calling %s() for tracee\n", TWAIT_FNAME);
14241.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD,
14251.1Skamil	    wpid = TWAIT_GENERIC(tracee, &status, 0));
14261.1Skamil
14271.1Skamil	msg_close(&parent_tracee);
14281.1Skamil}
14291.1Skamil
14301.51Skamil/// ----------------------------------------------------------------------------
14311.51Skamil
14321.51SkamilATF_TC(child_attach_to_its_parent);
14331.51SkamilATF_TC_HEAD(child_attach_to_its_parent, tc)
14341.1Skamil{
14351.1Skamil	atf_tc_set_md_var(tc, "descr",
14361.1Skamil	    "Assert that tracer child can PT_ATTACH to its parent");
14371.1Skamil}
14381.1Skamil
14391.51SkamilATF_TC_BODY(child_attach_to_its_parent, tc)
14401.1Skamil{
14411.1Skamil	struct msg_fds parent_tracee;
14421.1Skamil	const int exitval_tracer = 5;
14431.1Skamil	pid_t tracer, wpid;
14441.1Skamil	uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */
14451.1Skamil#if defined(TWAIT_HAVE_STATUS)
14461.1Skamil	int status;
14471.1Skamil#endif
14481.1Skamil
14491.13Schristos	DPRINTF("Spawn tracer\n");
14501.13Schristos	SYSCALL_REQUIRE(msg_open(&parent_tracee) == 0);
14511.1Skamil	tracer = atf_utils_fork();
14521.1Skamil	if (tracer == 0) {
14531.1Skamil
14541.1Skamil		/* Wait for message from the parent */
14551.1Skamil		CHILD_FROM_PARENT("Message 1", parent_tracee, msg);
14561.1Skamil
14571.13Schristos		DPRINTF("Attach to parent PID %d with PT_ATTACH from child\n",
14581.1Skamil		    getppid());
14591.1Skamil		FORKEE_ASSERT(ptrace(PT_ATTACH, getppid(), NULL, 0) != -1);
14601.1Skamil
14611.13Schristos		DPRINTF("Wait for the stopped parent process with %s()\n",
14621.1Skamil		    TWAIT_FNAME);
14631.1Skamil		FORKEE_REQUIRE_SUCCESS(
14641.1Skamil		    wpid = TWAIT_GENERIC(getppid(), &status, 0), getppid());
14651.1Skamil
14661.1Skamil		forkee_status_stopped(status, SIGSTOP);
14671.1Skamil
14681.13Schristos		DPRINTF("Resume parent with PT_DETACH\n");
14691.1Skamil		FORKEE_ASSERT(ptrace(PT_DETACH, getppid(), (void *)1, 0)
14701.1Skamil		    != -1);
14711.1Skamil
14721.1Skamil		/* Tell parent we are ready */
14731.1Skamil		CHILD_TO_PARENT("Message 1", parent_tracee, msg);
14741.1Skamil
14751.1Skamil		_exit(exitval_tracer);
14761.1Skamil	}
14771.1Skamil
14781.13Schristos	DPRINTF("Wait for the tracer to become ready\n");
14791.1Skamil	PARENT_TO_CHILD("Message 1", parent_tracee, msg);
14801.13Schristos	DPRINTF("Allow the tracer to exit now\n");
14811.1Skamil	PARENT_FROM_CHILD("Message 1", parent_tracee, msg);
14821.1Skamil
14831.13Schristos	DPRINTF("Wait for tracer to exit with %s()\n", TWAIT_FNAME);
14841.1Skamil	TWAIT_REQUIRE_SUCCESS(
14851.1Skamil	    wpid = TWAIT_GENERIC(tracer, &status, 0), tracer);
14861.1Skamil
14871.1Skamil	validate_status_exited(status, exitval_tracer);
14881.1Skamil
14891.13Schristos	DPRINTF("Before calling %s() for tracer\n", TWAIT_FNAME);
14901.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD,
14911.1Skamil	    wpid = TWAIT_GENERIC(tracer, &status, 0));
14921.1Skamil
14931.1Skamil	msg_close(&parent_tracee);
14941.1Skamil}
14951.1Skamil
14961.51Skamil/// ----------------------------------------------------------------------------
14971.51Skamil
14981.1Skamil#if defined(TWAIT_HAVE_PID)
14991.1Skamil
15001.51Skamilenum tracee_sees_its_original_parent_type {
15011.51Skamil	TRACEE_SEES_ITS_ORIGINAL_PARENT_GETPPID,
15021.51Skamil	TRACEE_SEES_ITS_ORIGINAL_PARENT_SYSCTL_KINFO_PROC2,
15031.51Skamil	TRACEE_SEES_ITS_ORIGINAL_PARENT_PROCFS_STATUS
15041.51Skamil};
15051.51Skamil
15061.51Skamilstatic void
15071.51Skamiltracee_sees_its_original_parent(enum tracee_sees_its_original_parent_type type)
15081.1Skamil{
15091.1Skamil	struct msg_fds parent_tracer, parent_tracee;
15101.1Skamil	const int exitval_tracee = 5;
15111.1Skamil	const int exitval_tracer = 10;
15121.1Skamil	pid_t parent, tracee, tracer, wpid;
15131.1Skamil	uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */
15141.1Skamil#if defined(TWAIT_HAVE_STATUS)
15151.1Skamil	int status;
15161.1Skamil#endif
15171.51Skamil	/* sysctl(3) - kinfo_proc2 */
15181.51Skamil	int name[CTL_MAXNAME];
15191.51Skamil	struct kinfo_proc2 kp;
15201.51Skamil	size_t len = sizeof(kp);
15211.51Skamil	unsigned int namelen;
15221.51Skamil
15231.51Skamil	/* procfs - status  */
15241.51Skamil	FILE *fp;
15251.51Skamil	struct stat st;
15261.51Skamil	const char *fname = "/proc/curproc/status";
15271.51Skamil	char s_executable[MAXPATHLEN];
15281.51Skamil	int s_pid, s_ppid;
15291.51Skamil	int rv;
15301.51Skamil
15311.51Skamil	if (type == TRACEE_SEES_ITS_ORIGINAL_PARENT_PROCFS_STATUS) {
15321.61Skre		SYSCALL_REQUIRE(
15331.61Skre		    (rv = stat(fname, &st)) == 0 || (errno == ENOENT));
15341.61Skre		if (rv != 0)
15351.51Skamil			atf_tc_skip("/proc/curproc/status not found");
15361.51Skamil	}
15371.1Skamil
15381.13Schristos	DPRINTF("Spawn tracee\n");
15391.13Schristos	SYSCALL_REQUIRE(msg_open(&parent_tracer) == 0);
15401.13Schristos	SYSCALL_REQUIRE(msg_open(&parent_tracee) == 0);
15411.1Skamil	tracee = atf_utils_fork();
15421.1Skamil	if (tracee == 0) {
15431.1Skamil		parent = getppid();
15441.1Skamil
15451.1Skamil		/* Emit message to the parent */
15461.1Skamil		CHILD_TO_PARENT("tracee ready", parent_tracee, msg);
15471.1Skamil		CHILD_FROM_PARENT("exit tracee", parent_tracee, msg);
15481.1Skamil
15491.51Skamil		switch (type) {
15501.51Skamil		case TRACEE_SEES_ITS_ORIGINAL_PARENT_GETPPID:
15511.51Skamil			FORKEE_ASSERT_EQ(parent, getppid());
15521.51Skamil			break;
15531.51Skamil		case TRACEE_SEES_ITS_ORIGINAL_PARENT_SYSCTL_KINFO_PROC2:
15541.51Skamil			namelen = 0;
15551.51Skamil			name[namelen++] = CTL_KERN;
15561.51Skamil			name[namelen++] = KERN_PROC2;
15571.51Skamil			name[namelen++] = KERN_PROC_PID;
15581.51Skamil			name[namelen++] = getpid();
15591.51Skamil			name[namelen++] = len;
15601.51Skamil			name[namelen++] = 1;
15611.51Skamil
15621.61Skre			FORKEE_ASSERT_EQ(
15631.61Skre			    sysctl(name, namelen, &kp, &len, NULL, 0), 0);
15641.51Skamil			FORKEE_ASSERT_EQ(parent, kp.p_ppid);
15651.51Skamil			break;
15661.51Skamil		case TRACEE_SEES_ITS_ORIGINAL_PARENT_PROCFS_STATUS:
15671.51Skamil			/*
15681.51Skamil			 * Format:
15691.51Skamil			 *  EXECUTABLE PID PPID ...
15701.51Skamil			 */
15711.51Skamil			FORKEE_ASSERT((fp = fopen(fname, "r")) != NULL);
15721.51Skamil			fscanf(fp, "%s %d %d", s_executable, &s_pid, &s_ppid);
15731.51Skamil			FORKEE_ASSERT_EQ(fclose(fp), 0);
15741.51Skamil			FORKEE_ASSERT_EQ(parent, s_ppid);
15751.51Skamil			break;
15761.51Skamil		}
15771.1Skamil
15781.1Skamil		_exit(exitval_tracee);
15791.1Skamil	}
15801.13Schristos	DPRINTF("Wait for child to record its parent identifier (pid)\n");
15811.1Skamil	PARENT_FROM_CHILD("tracee ready", parent_tracee, msg);
15821.1Skamil
15831.13Schristos	DPRINTF("Spawn debugger\n");
15841.1Skamil	tracer = atf_utils_fork();
15851.1Skamil	if (tracer == 0) {
15861.1Skamil		/* No IPC to communicate with the child */
15871.13Schristos		DPRINTF("Before calling PT_ATTACH from tracee %d\n", getpid());
15881.1Skamil		FORKEE_ASSERT(ptrace(PT_ATTACH, tracee, NULL, 0) != -1);
15891.1Skamil
15901.1Skamil		/* Wait for tracee and assert that it was stopped w/ SIGSTOP */
15911.1Skamil		FORKEE_REQUIRE_SUCCESS(
15921.1Skamil		    wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);
15931.1Skamil
15941.1Skamil		forkee_status_stopped(status, SIGSTOP);
15951.1Skamil
15961.1Skamil		/* Resume tracee with PT_CONTINUE */
15971.1Skamil		FORKEE_ASSERT(ptrace(PT_CONTINUE, tracee, (void *)1, 0) != -1);
15981.1Skamil
15991.1Skamil		/* Inform parent that tracer has attached to tracee */
16001.1Skamil		CHILD_TO_PARENT("tracer ready", parent_tracer, msg);
16011.1Skamil
16021.1Skamil		/* Wait for parent to tell use that tracee should have exited */
16031.1Skamil		CHILD_FROM_PARENT("wait for tracee exit", parent_tracer, msg);
16041.1Skamil
16051.1Skamil		/* Wait for tracee and assert that it exited */
16061.1Skamil		FORKEE_REQUIRE_SUCCESS(
16071.1Skamil		    wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);
16081.1Skamil
16091.1Skamil		forkee_status_exited(status, exitval_tracee);
16101.1Skamil
16111.13Schristos		DPRINTF("Before exiting of the tracer process\n");
16121.1Skamil		_exit(exitval_tracer);
16131.1Skamil	}
16141.1Skamil
16151.13Schristos	DPRINTF("Wait for the tracer to attach to the tracee\n");
16161.1Skamil	PARENT_FROM_CHILD("tracer ready",  parent_tracer, msg);
16171.1Skamil
16181.13Schristos	DPRINTF("Resume the tracee and let it exit\n");
16191.1Skamil	PARENT_TO_CHILD("exit tracee",  parent_tracee, msg);
16201.1Skamil
16211.13Schristos	DPRINTF("Detect that tracee is zombie\n");
16221.1Skamil	await_zombie(tracee);
16231.1Skamil
16241.13Schristos	DPRINTF("Assert that there is no status about tracee - "
16251.1Skamil	    "Tracer must detect zombie first - calling %s()\n", TWAIT_FNAME);
16261.1Skamil	TWAIT_REQUIRE_SUCCESS(
16271.1Skamil	    wpid = TWAIT_GENERIC(tracee, &status, WNOHANG), 0);
16281.1Skamil
16291.13Schristos	DPRINTF("Tell the tracer child should have exited\n");
16301.1Skamil	PARENT_TO_CHILD("wait for tracee exit",  parent_tracer, msg);
16311.1Skamil
16321.13Schristos	DPRINTF("Wait from tracer child to complete waiting for tracee\n");
16331.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracer, &status, 0),
16341.1Skamil	    tracer);
16351.1Skamil
16361.1Skamil	validate_status_exited(status, exitval_tracer);
16371.1Skamil
16381.13Schristos	DPRINTF("Wait for tracee to finish its job and exit - calling %s()\n",
16391.1Skamil	    TWAIT_FNAME);
16401.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracee, &status, WNOHANG),
16411.1Skamil	    tracee);
16421.1Skamil
16431.1Skamil	validate_status_exited(status, exitval_tracee);
16441.1Skamil
16451.1Skamil	msg_close(&parent_tracer);
16461.1Skamil	msg_close(&parent_tracee);
16471.1Skamil}
16481.1Skamil
16491.61Skre#define TRACEE_SEES_ITS_ORIGINAL_PARENT(test, type, descr)		\
16501.61SkreATF_TC(test);								\
16511.61SkreATF_TC_HEAD(test, tc)							\
16521.61Skre{									\
16531.61Skre	atf_tc_set_md_var(tc, "descr",					\
16541.61Skre	    "Assert that tracee sees its original parent when being traced " \
16551.61Skre	    "(check " descr ")");					\
16561.61Skre}									\
16571.61Skre									\
16581.61SkreATF_TC_BODY(test, tc)							\
16591.61Skre{									\
16601.61Skre									\
16611.61Skre	tracee_sees_its_original_parent(type);				\
16621.1Skamil}
16631.1Skamil
16641.51SkamilTRACEE_SEES_ITS_ORIGINAL_PARENT(
16651.51Skamil	tracee_sees_its_original_parent_getppid,
16661.51Skamil	TRACEE_SEES_ITS_ORIGINAL_PARENT_GETPPID,
16671.51Skamil	"getppid(2)");
16681.51SkamilTRACEE_SEES_ITS_ORIGINAL_PARENT(
16691.51Skamil	tracee_sees_its_original_parent_sysctl_kinfo_proc2,
16701.51Skamil	TRACEE_SEES_ITS_ORIGINAL_PARENT_SYSCTL_KINFO_PROC2,
16711.51Skamil	"sysctl(3) and kinfo_proc2");
16721.51SkamilTRACEE_SEES_ITS_ORIGINAL_PARENT(
16731.51Skamil	tracee_sees_its_original_parent_procfs_status,
16741.51Skamil	TRACEE_SEES_ITS_ORIGINAL_PARENT_PROCFS_STATUS,
16751.51Skamil	"the status file in procfs");
16761.1Skamil#endif
16771.1Skamil
16781.51Skamil/// ----------------------------------------------------------------------------
16791.1Skamil
16801.53Skamilstatic void
16811.53Skamileventmask_preserved(int event)
16821.1Skamil{
16831.1Skamil	const int exitval = 5;
16841.1Skamil	const int sigval = SIGSTOP;
16851.1Skamil	pid_t child, wpid;
16861.1Skamil#if defined(TWAIT_HAVE_STATUS)
16871.1Skamil	int status;
16881.1Skamil#endif
16891.1Skamil	ptrace_event_t set_event, get_event;
16901.1Skamil	const int len = sizeof(ptrace_event_t);
16911.1Skamil
16921.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
16931.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
16941.1Skamil	if (child == 0) {
16951.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
16961.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
16971.1Skamil
16981.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
16991.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
17001.1Skamil
17011.13Schristos		DPRINTF("Before exiting of the child process\n");
17021.1Skamil		_exit(exitval);
17031.1Skamil	}
17041.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
17051.1Skamil
17061.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
17071.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
17081.1Skamil
17091.1Skamil	validate_status_stopped(status, sigval);
17101.1Skamil
17111.53Skamil	set_event.pe_set_event = event;
17121.61Skre	SYSCALL_REQUIRE(
17131.61Skre	    ptrace(PT_SET_EVENT_MASK, child, &set_event, len) != -1);
17141.61Skre	SYSCALL_REQUIRE(
17151.61Skre	    ptrace(PT_GET_EVENT_MASK, child, &get_event, len) != -1);
17161.1Skamil	ATF_REQUIRE(memcmp(&set_event, &get_event, len) == 0);
17171.1Skamil
17181.13Schristos	DPRINTF("Before resuming the child process where it left off and "
17191.1Skamil	    "without signal to be sent\n");
17201.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
17211.1Skamil
17221.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
17231.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
17241.1Skamil
17251.1Skamil	validate_status_exited(status, exitval);
17261.1Skamil
17271.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
17281.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
17291.1Skamil}
17301.1Skamil
17311.61Skre#define EVENTMASK_PRESERVED(test, event)				\
17321.61SkreATF_TC(test);								\
17331.61SkreATF_TC_HEAD(test, tc)							\
17341.61Skre{									\
17351.61Skre	atf_tc_set_md_var(tc, "descr",					\
17361.61Skre	    "Verify that eventmask " #event " is preserved");		\
17371.61Skre}									\
17381.61Skre									\
17391.61SkreATF_TC_BODY(test, tc)							\
17401.61Skre{									\
17411.61Skre									\
17421.61Skre	eventmask_preserved(event);					\
17431.1Skamil}
17441.1Skamil
17451.53SkamilEVENTMASK_PRESERVED(eventmask_preserved_empty, 0)
17461.53SkamilEVENTMASK_PRESERVED(eventmask_preserved_fork, PTRACE_FORK)
17471.53SkamilEVENTMASK_PRESERVED(eventmask_preserved_vfork, PTRACE_VFORK)
17481.53SkamilEVENTMASK_PRESERVED(eventmask_preserved_vfork_done, PTRACE_VFORK_DONE)
17491.53SkamilEVENTMASK_PRESERVED(eventmask_preserved_lwp_create, PTRACE_LWP_CREATE)
17501.53SkamilEVENTMASK_PRESERVED(eventmask_preserved_lwp_exit, PTRACE_LWP_EXIT)
17511.1Skamil
17521.53Skamil/// ----------------------------------------------------------------------------
17531.1Skamil
17541.28Skamilstatic void
17551.32Skamilfork_body(pid_t (*fn)(void), bool trackfork, bool trackvfork,
17561.61Skre    bool trackvforkdone, bool detachchild, bool detachparent)
17571.1Skamil{
17581.1Skamil	const int exitval = 5;
17591.1Skamil	const int exitval2 = 15;
17601.1Skamil	const int sigval = SIGSTOP;
17611.31Skamil	pid_t child, child2 = 0, wpid;
17621.1Skamil#if defined(TWAIT_HAVE_STATUS)
17631.1Skamil	int status;
17641.1Skamil#endif
17651.1Skamil	ptrace_state_t state;
17661.1Skamil	const int slen = sizeof(state);
17671.1Skamil	ptrace_event_t event;
17681.1Skamil	const int elen = sizeof(event);
17691.1Skamil
17701.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
17711.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
17721.1Skamil	if (child == 0) {
17731.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
17741.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
17751.1Skamil
17761.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
17771.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
17781.1Skamil
17791.30Skamil		FORKEE_ASSERT((child2 = (fn)()) != -1);
17801.1Skamil
17811.1Skamil		if (child2 == 0)
17821.1Skamil			_exit(exitval2);
17831.1Skamil
17841.1Skamil		FORKEE_REQUIRE_SUCCESS
17851.1Skamil		    (wpid = TWAIT_GENERIC(child2, &status, 0), child2);
17861.1Skamil
17871.1Skamil		forkee_status_exited(status, exitval2);
17881.1Skamil
17891.13Schristos		DPRINTF("Before exiting of the child process\n");
17901.1Skamil		_exit(exitval);
17911.1Skamil	}
17921.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
17931.1Skamil
17941.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
17951.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
17961.1Skamil
17971.1Skamil	validate_status_stopped(status, sigval);
17981.1Skamil
17991.30Skamil	DPRINTF("Set 0%s%s%s in EVENT_MASK for the child %d\n",
18001.61Skre	    trackfork ? "|PTRACE_FORK" : "",
18011.61Skre	    trackvfork ? "|PTRACE_VFORK" : "",
18021.61Skre	    trackvforkdone ? "|PTRACE_VFORK_DONE" : "", child);
18031.30Skamil	event.pe_set_event = 0;
18041.30Skamil	if (trackfork)
18051.30Skamil		event.pe_set_event |= PTRACE_FORK;
18061.30Skamil	if (trackvfork)
18071.30Skamil		event.pe_set_event |= PTRACE_VFORK;
18081.30Skamil	if (trackvforkdone)
18091.30Skamil		event.pe_set_event |= PTRACE_VFORK_DONE;
18101.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);
18111.1Skamil
18121.13Schristos	DPRINTF("Before resuming the child process where it left off and "
18131.1Skamil	    "without signal to be sent\n");
18141.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
18151.1Skamil
18161.29Skamil#if defined(TWAIT_HAVE_PID)
18171.31Skamil	if ((trackfork && fn == fork) || (trackvfork && fn == vfork)) {
18181.29Skamil		DPRINTF("Before calling %s() for the child %d\n", TWAIT_FNAME,
18191.61Skre		    child);
18201.29Skamil		TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0),
18211.61Skre		    child);
18221.1Skamil
18231.29Skamil		validate_status_stopped(status, SIGTRAP);
18241.1Skamil
18251.61Skre		SYSCALL_REQUIRE(
18261.61Skre		    ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
18271.31Skamil		if (trackfork && fn == fork) {
18281.30Skamil			ATF_REQUIRE_EQ(state.pe_report_event & PTRACE_FORK,
18291.30Skamil			       PTRACE_FORK);
18301.30Skamil		}
18311.31Skamil		if (trackvfork && fn == vfork) {
18321.30Skamil			ATF_REQUIRE_EQ(state.pe_report_event & PTRACE_VFORK,
18331.30Skamil			       PTRACE_VFORK);
18341.30Skamil		}
18351.29Skamil
18361.29Skamil		child2 = state.pe_other_pid;
18371.30Skamil		DPRINTF("Reported ptrace event with forkee %d\n", child2);
18381.29Skamil
18391.29Skamil		DPRINTF("Before calling %s() for the forkee %d of the child "
18401.61Skre		    "%d\n", TWAIT_FNAME, child2, child);
18411.29Skamil		TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0),
18421.29Skamil		    child2);
18431.1Skamil
18441.29Skamil		validate_status_stopped(status, SIGTRAP);
18451.1Skamil
18461.61Skre		SYSCALL_REQUIRE(
18471.61Skre		    ptrace(PT_GET_PROCESS_STATE, child2, &state, slen) != -1);
18481.31Skamil		if (trackfork && fn == fork) {
18491.30Skamil			ATF_REQUIRE_EQ(state.pe_report_event & PTRACE_FORK,
18501.30Skamil			       PTRACE_FORK);
18511.30Skamil		}
18521.31Skamil		if (trackvfork && fn == vfork) {
18531.30Skamil			ATF_REQUIRE_EQ(state.pe_report_event & PTRACE_VFORK,
18541.30Skamil			       PTRACE_VFORK);
18551.30Skamil		}
18561.30Skamil
18571.29Skamil		ATF_REQUIRE_EQ(state.pe_other_pid, child);
18581.29Skamil
18591.29Skamil		DPRINTF("Before resuming the forkee process where it left off "
18601.29Skamil		    "and without signal to be sent\n");
18611.61Skre		SYSCALL_REQUIRE(
18621.61Skre		    ptrace(PT_CONTINUE, child2, (void *)1, 0) != -1);
18631.29Skamil
18641.29Skamil		DPRINTF("Before resuming the child process where it left off "
18651.61Skre		    "and without signal to be sent\n");
18661.29Skamil		SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
18671.30Skamil	}
18681.30Skamil#endif
18691.30Skamil
18701.31Skamil	if (trackvforkdone && fn == vfork) {
18711.30Skamil		DPRINTF("Before calling %s() for the child %d\n", TWAIT_FNAME,
18721.61Skre		    child);
18731.61Skre		TWAIT_REQUIRE_SUCCESS(
18741.61Skre		    wpid = TWAIT_GENERIC(child, &status, 0), child);
18751.30Skamil
18761.30Skamil		validate_status_stopped(status, SIGTRAP);
18771.30Skamil
18781.61Skre		SYSCALL_REQUIRE(
18791.61Skre		    ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
18801.30Skamil		ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_VFORK_DONE);
18811.30Skamil
18821.30Skamil		child2 = state.pe_other_pid;
18831.30Skamil		DPRINTF("Reported PTRACE_VFORK_DONE event with forkee %d\n",
18841.61Skre		    child2);
18851.30Skamil
18861.30Skamil		DPRINTF("Before resuming the child process where it left off "
18871.61Skre		    "and without signal to be sent\n");
18881.30Skamil		SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
18891.30Skamil	}
18901.29Skamil
18911.30Skamil#if defined(TWAIT_HAVE_PID)
18921.31Skamil	if ((trackfork && fn == fork) || (trackvfork && fn == vfork)) {
18931.29Skamil		DPRINTF("Before calling %s() for the forkee - expected exited"
18941.61Skre		    "\n", TWAIT_FNAME);
18951.61Skre		TWAIT_REQUIRE_SUCCESS(
18961.61Skre		    wpid = TWAIT_GENERIC(child2, &status, 0), child2);
18971.29Skamil
18981.29Skamil		validate_status_exited(status, exitval2);
18991.29Skamil
19001.29Skamil		DPRINTF("Before calling %s() for the forkee - expected no "
19011.61Skre		    "process\n", TWAIT_FNAME);
19021.29Skamil		TWAIT_REQUIRE_FAILURE(ECHILD,
19031.29Skamil		    wpid = TWAIT_GENERIC(child2, &status, 0));
19041.29Skamil	}
19051.29Skamil#endif
19061.1Skamil
19071.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
19081.1Skamil	    "SIGCHLD\n", TWAIT_FNAME);
19091.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
19101.1Skamil
19111.1Skamil	validate_status_stopped(status, SIGCHLD);
19121.1Skamil
19131.13Schristos	DPRINTF("Before resuming the child process where it left off and "
19141.1Skamil	    "without signal to be sent\n");
19151.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
19161.1Skamil
19171.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
19181.1Skamil	    TWAIT_FNAME);
19191.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
19201.1Skamil
19211.1Skamil	validate_status_exited(status, exitval);
19221.1Skamil
19231.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
19241.1Skamil	    TWAIT_FNAME);
19251.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
19261.1Skamil}
19271.28Skamil
19281.61Skre#define FORK_TEST(name,descr,fun,tfork,tvfork,tvforkdone,detchild,detparent) \
19291.61SkreATF_TC(name);								\
19301.61SkreATF_TC_HEAD(name, tc)							\
19311.61Skre{									\
19321.61Skre	atf_tc_set_md_var(tc, "descr", descr);				\
19331.61Skre}									\
19341.61Skre									\
19351.61SkreATF_TC_BODY(name, tc)							\
19361.61Skre{									\
19371.61Skre									\
19381.61Skre	fork_body(fun, tfork, tvfork, tvforkdone, detchild, detparent);	\
19391.32Skamil}
19401.32Skamil
19411.32Skamil#define F false
19421.32Skamil#define T true
19431.32Skamil
19441.32Skamil#define F_IF__0(x)
19451.32Skamil#define F_IF__1(x) x
19461.32Skamil#define F_IF__(x,y) F_IF__ ## x (y)
19471.32Skamil#define F_IF_(x,y) F_IF__(x,y)
19481.32Skamil#define F_IF(x,y) F_IF_(x,y)
19491.32Skamil
19501.61Skre#define DSCR(function,forkbit,vforkbit,vforkdonebit,dchildbit,dparentbit) \
19511.61Skre	"Verify " #function "(2) called with 0"				\
19521.61Skre	F_IF(forkbit,"|PTRACE_FORK")					\
19531.61Skre	F_IF(vforkbit,"|PTRACE_VFORK")					\
19541.61Skre	F_IF(vforkdonebit,"|PTRACE_VFORK_DONE")				\
19551.61Skre	" in EVENT_MASK."						\
19561.61Skre	F_IF(dchildbit," Detach child in this test.")			\
19571.61Skre	F_IF(dparentbit," Detach parent in this test.")
19581.1Skamil
19591.32SkamilFORK_TEST(fork1, DSCR(fork,0,0,0,0,0), fork, F, F, F, F, F)
19601.31Skamil#if defined(TWAIT_HAVE_PID)
19611.32SkamilFORK_TEST(fork2, DSCR(fork,1,0,0,0,0), fork, T, F, F, F, F)
19621.32SkamilFORK_TEST(fork3, DSCR(fork,0,1,0,0,0), fork, F, T, F, F, F)
19631.32SkamilFORK_TEST(fork4, DSCR(fork,1,1,0,0,0), fork, T, T, F, F, F)
19641.31Skamil#endif
19651.32SkamilFORK_TEST(fork5, DSCR(fork,0,0,1,0,0), fork, F, F, T, F, F)
19661.31Skamil#if defined(TWAIT_HAVE_PID)
19671.32SkamilFORK_TEST(fork6, DSCR(fork,1,0,1,0,0), fork, T, F, T, F, F)
19681.32SkamilFORK_TEST(fork7, DSCR(fork,0,1,1,0,0), fork, F, T, T, F, F)
19691.32SkamilFORK_TEST(fork8, DSCR(fork,1,1,1,0,0), fork, T, T, T, F, F)
19701.31Skamil#endif
19711.1Skamil
19721.32SkamilFORK_TEST(vfork1, DSCR(vfork,0,0,0,0,0), vfork, F, F, F, F, F)
19731.31Skamil#if defined(TWAIT_HAVE_PID)
19741.32SkamilFORK_TEST(vfork2, DSCR(vfork,1,0,0,0,0), vfork, T, F, F, F, F)
19751.32SkamilFORK_TEST(vfork3, DSCR(vfork,0,1,0,0,0), vfork, F, T, F, F, F)
19761.32SkamilFORK_TEST(vfork4, DSCR(vfork,1,1,0,0,0), vfork, T, T, F, F, F)
19771.31Skamil#endif
19781.32SkamilFORK_TEST(vfork5, DSCR(vfork,0,0,1,0,0), vfork, F, F, T, F, F)
19791.31Skamil#if defined(TWAIT_HAVE_PID)
19801.32SkamilFORK_TEST(vfork6, DSCR(vfork,1,0,1,0,0), vfork, T, F, T, F, F)
19811.32SkamilFORK_TEST(vfork7, DSCR(vfork,0,1,1,0,0), vfork, F, T, T, F, F)
19821.32SkamilFORK_TEST(vfork8, DSCR(vfork,1,1,1,0,0), vfork, T, T, T, F, F)
19831.31Skamil#endif
19841.31Skamil
19851.54Skamil/// ----------------------------------------------------------------------------
19861.31Skamil
19871.54Skamilenum bytes_transfer_type {
19881.54Skamil	BYTES_TRANSFER_DATA,
19891.54Skamil	BYTES_TRANSFER_DATAIO,
19901.54Skamil	BYTES_TRANSFER_TEXT,
19911.54Skamil	BYTES_TRANSFER_TEXTIO,
19921.54Skamil	BYTES_TRANSFER_AUXV
19931.54Skamil};
19941.31Skamil
19951.54Skamilstatic int __used
19961.54Skamilbytes_transfer_dummy(int a, int b, int c, int d)
19971.54Skamil{
19981.54Skamil	int e, f, g, h;
19991.1Skamil
20001.54Skamil	a *= 4;
20011.54Skamil	b += 3;
20021.54Skamil	c -= 2;
20031.54Skamil	d /= 1;
20041.1Skamil
20051.54Skamil	e = strtol("10", NULL, 10);
20061.54Skamil	f = strtol("20", NULL, 10);
20071.54Skamil	g = strtol("30", NULL, 10);
20081.54Skamil	h = strtol("40", NULL, 10);
20091.1Skamil
20101.54Skamil	return (a + b * c - d) + (e * f - g / h);
20111.1Skamil}
20121.1Skamil
20131.54Skamilstatic void
20141.55Schristosbytes_transfer(int operation, size_t size, enum bytes_transfer_type type)
20151.1Skamil{
20161.1Skamil	const int exitval = 5;
20171.1Skamil	const int sigval = SIGSTOP;
20181.1Skamil	pid_t child, wpid;
20191.54Skamil	bool skip = false;
20201.1Skamil
20211.54Skamil	int lookup_me = 0;
20221.54Skamil	uint8_t lookup_me8 = 0;
20231.54Skamil	uint16_t lookup_me16 = 0;
20241.54Skamil	uint32_t lookup_me32 = 0;
20251.54Skamil	uint64_t lookup_me64 = 0;
20261.1Skamil
20271.54Skamil	int magic = 0x13579246;
20281.54Skamil	uint8_t magic8 = 0xab;
20291.54Skamil	uint16_t magic16 = 0x1234;
20301.54Skamil	uint32_t magic32 = 0x98765432;
20311.54Skamil	uint64_t magic64 = 0xabcdef0123456789;
20321.1Skamil
20331.54Skamil	struct ptrace_io_desc io;
20341.1Skamil#if defined(TWAIT_HAVE_STATUS)
20351.1Skamil	int status;
20361.1Skamil#endif
20371.60Skre	/* 513 is just enough, for the purposes of ATF it's good enough */
20381.60Skre	AuxInfo ai[513], *aip;
20391.55Schristos
20401.55Schristos	ATF_REQUIRE(size < sizeof(ai));
20411.1Skamil
20421.54Skamil	/* Prepare variables for .TEXT transfers */
20431.54Skamil	switch (type) {
20441.54Skamil	case BYTES_TRANSFER_TEXT:
20451.54Skamil		memcpy(&magic, bytes_transfer_dummy, sizeof(magic));
20461.54Skamil		break;
20471.54Skamil	case BYTES_TRANSFER_TEXTIO:
20481.54Skamil		switch (size) {
20491.54Skamil		case 8:
20501.54Skamil			memcpy(&magic8, bytes_transfer_dummy, sizeof(magic8));
20511.54Skamil			break;
20521.54Skamil		case 16:
20531.54Skamil			memcpy(&magic16, bytes_transfer_dummy, sizeof(magic16));
20541.54Skamil			break;
20551.54Skamil		case 32:
20561.54Skamil			memcpy(&magic32, bytes_transfer_dummy, sizeof(magic32));
20571.54Skamil			break;
20581.54Skamil		case 64:
20591.54Skamil			memcpy(&magic64, bytes_transfer_dummy, sizeof(magic64));
20601.54Skamil			break;
20611.54Skamil		}
20621.54Skamil		break;
20631.54Skamil	default:
20641.54Skamil		break;
20651.54Skamil	}
20661.1Skamil
20671.54Skamil	/* Prepare variables for PIOD and AUXV transfers */
20681.54Skamil	switch (type) {
20691.54Skamil	case BYTES_TRANSFER_TEXTIO:
20701.54Skamil	case BYTES_TRANSFER_DATAIO:
20711.54Skamil		io.piod_op = operation;
20721.54Skamil		switch (size) {
20731.54Skamil		case 8:
20741.54Skamil			io.piod_offs = (type == BYTES_TRANSFER_TEXTIO) ?
20751.54Skamil			               (void *)bytes_transfer_dummy :
20761.54Skamil			               &lookup_me8;
20771.54Skamil			io.piod_addr = &lookup_me8;
20781.54Skamil			io.piod_len = sizeof(lookup_me8);
20791.54Skamil			break;
20801.54Skamil		case 16:
20811.54Skamil			io.piod_offs = (type == BYTES_TRANSFER_TEXTIO) ?
20821.54Skamil			               (void *)bytes_transfer_dummy :
20831.54Skamil			               &lookup_me16;
20841.54Skamil			io.piod_addr = &lookup_me16;
20851.54Skamil			io.piod_len = sizeof(lookup_me16);
20861.54Skamil			break;
20871.54Skamil		case 32:
20881.54Skamil			io.piod_offs = (type == BYTES_TRANSFER_TEXTIO) ?
20891.54Skamil			               (void *)bytes_transfer_dummy :
20901.54Skamil			               &lookup_me32;
20911.54Skamil			io.piod_addr = &lookup_me32;
20921.54Skamil			io.piod_len = sizeof(lookup_me32);
20931.54Skamil			break;
20941.54Skamil		case 64:
20951.54Skamil			io.piod_offs = (type == BYTES_TRANSFER_TEXTIO) ?
20961.54Skamil			               (void *)bytes_transfer_dummy :
20971.54Skamil			               &lookup_me64;
20981.54Skamil			io.piod_addr = &lookup_me64;
20991.54Skamil			io.piod_len = sizeof(lookup_me64);
21001.54Skamil			break;
21011.54Skamil		default:
21021.54Skamil			break;
21031.54Skamil		}
21041.54Skamil		break;
21051.54Skamil	case BYTES_TRANSFER_AUXV:
21061.54Skamil		io.piod_op = operation;
21071.54Skamil		io.piod_offs = 0;
21081.54Skamil		io.piod_addr = ai;
21091.54Skamil		io.piod_len = size;
21101.54Skamil		break;
21111.54Skamil	default:
21121.54Skamil		break;
21131.1Skamil	}
21141.1Skamil
21151.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
21161.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
21171.1Skamil	if (child == 0) {
21181.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
21191.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
21201.1Skamil
21211.54Skamil		switch (type) {
21221.54Skamil		case BYTES_TRANSFER_DATA:
21231.54Skamil			switch (operation) {
21241.54Skamil			case PT_READ_D:
21251.54Skamil			case PT_READ_I:
21261.54Skamil				lookup_me = magic;
21271.54Skamil				break;
21281.54Skamil			default:
21291.54Skamil				break;
21301.54Skamil			}
21311.54Skamil			break;
21321.54Skamil		case BYTES_TRANSFER_DATAIO:
21331.54Skamil			switch (operation) {
21341.54Skamil			case PIOD_READ_D:
21351.54Skamil			case PIOD_READ_I:
21361.54Skamil				switch (size) {
21371.54Skamil				case 8:
21381.54Skamil					lookup_me8 = magic8;
21391.54Skamil					break;
21401.54Skamil				case 16:
21411.54Skamil					lookup_me16 = magic16;
21421.54Skamil					break;
21431.54Skamil				case 32:
21441.54Skamil					lookup_me32 = magic32;
21451.54Skamil					break;
21461.54Skamil				case 64:
21471.54Skamil					lookup_me64 = magic64;
21481.54Skamil					break;
21491.54Skamil				default:
21501.54Skamil					break;
21511.54Skamil				}
21521.54Skamil				break;
21531.54Skamil			default:
21541.54Skamil				break;
21551.54Skamil			}
21561.54Skamil		default:
21571.54Skamil			break;
21581.54Skamil		}
21591.54Skamil
21601.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
21611.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
21621.1Skamil
21631.54Skamil		/* Handle PIOD and PT separately as operation values overlap */
21641.54Skamil		switch (type) {
21651.54Skamil		case BYTES_TRANSFER_DATA:
21661.54Skamil			switch (operation) {
21671.54Skamil			case PT_WRITE_D:
21681.54Skamil			case PT_WRITE_I:
21691.54Skamil				FORKEE_ASSERT_EQ(lookup_me, magic);
21701.54Skamil				break;
21711.54Skamil			default:
21721.54Skamil				break;
21731.54Skamil			}
21741.54Skamil			break;
21751.54Skamil		case BYTES_TRANSFER_DATAIO:
21761.54Skamil			switch (operation) {
21771.54Skamil			case PIOD_WRITE_D:
21781.54Skamil			case PIOD_WRITE_I:
21791.54Skamil				switch (size) {
21801.54Skamil				case 8:
21811.54Skamil					FORKEE_ASSERT_EQ(lookup_me8, magic8);
21821.54Skamil					break;
21831.54Skamil				case 16:
21841.54Skamil					FORKEE_ASSERT_EQ(lookup_me16, magic16);
21851.54Skamil					break;
21861.54Skamil				case 32:
21871.54Skamil					FORKEE_ASSERT_EQ(lookup_me32, magic32);
21881.54Skamil					break;
21891.54Skamil				case 64:
21901.54Skamil					FORKEE_ASSERT_EQ(lookup_me64, magic64);
21911.54Skamil					break;
21921.54Skamil				default:
21931.54Skamil					break;
21941.54Skamil				}
21951.54Skamil				break;
21961.54Skamil			default:
21971.54Skamil				break;
21981.54Skamil			}
21991.54Skamil			break;
22001.54Skamil		case BYTES_TRANSFER_TEXT:
22011.54Skamil			FORKEE_ASSERT(memcmp(&magic, bytes_transfer_dummy,
22021.54Skamil			                     sizeof(magic)) == 0);
22031.54Skamil			break;
22041.54Skamil		case BYTES_TRANSFER_TEXTIO:
22051.54Skamil			switch (size) {
22061.54Skamil			case 8:
22071.54Skamil				FORKEE_ASSERT(memcmp(&magic8,
22081.54Skamil				                     bytes_transfer_dummy,
22091.54Skamil				                     sizeof(magic8)) == 0);
22101.54Skamil				break;
22111.54Skamil			case 16:
22121.54Skamil				FORKEE_ASSERT(memcmp(&magic16,
22131.54Skamil				                     bytes_transfer_dummy,
22141.54Skamil				                     sizeof(magic16)) == 0);
22151.54Skamil				break;
22161.54Skamil			case 32:
22171.54Skamil				FORKEE_ASSERT(memcmp(&magic32,
22181.54Skamil				                     bytes_transfer_dummy,
22191.54Skamil				                     sizeof(magic32)) == 0);
22201.54Skamil				break;
22211.54Skamil			case 64:
22221.54Skamil				FORKEE_ASSERT(memcmp(&magic64,
22231.54Skamil				                     bytes_transfer_dummy,
22241.54Skamil				                     sizeof(magic64)) == 0);
22251.54Skamil				break;
22261.54Skamil			}
22271.54Skamil			break;
22281.54Skamil		default:
22291.54Skamil			break;
22301.54Skamil		}
22311.54Skamil
22321.13Schristos		DPRINTF("Before exiting of the child process\n");
22331.1Skamil		_exit(exitval);
22341.1Skamil	}
22351.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
22361.1Skamil
22371.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
22381.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
22391.1Skamil
22401.1Skamil	validate_status_stopped(status, sigval);
22411.1Skamil
22421.54Skamil	/* Check PaX MPROTECT */
22431.54Skamil	if (!can_we_write_to_text(child)) {
22441.54Skamil		switch (type) {
22451.54Skamil		case BYTES_TRANSFER_TEXTIO:
22461.54Skamil			switch (operation) {
22471.54Skamil			case PIOD_WRITE_D:
22481.54Skamil			case PIOD_WRITE_I:
22491.54Skamil				skip = true;
22501.54Skamil				break;
22511.54Skamil			default:
22521.54Skamil				break;
22531.54Skamil			}
22541.54Skamil			break;
22551.54Skamil		case BYTES_TRANSFER_TEXT:
22561.54Skamil			switch (operation) {
22571.54Skamil			case PT_WRITE_D:
22581.54Skamil			case PT_WRITE_I:
22591.54Skamil				skip = true;
22601.54Skamil				break;
22611.54Skamil			default:
22621.54Skamil				break;
22631.54Skamil			}
22641.54Skamil			break;
22651.54Skamil		default:
22661.54Skamil			break;
22671.54Skamil		}
22681.54Skamil	}
22691.1Skamil
22701.54Skamil	/* Bailout cleanly killing the child process */
22711.54Skamil	if (skip) {
22721.54Skamil		SYSCALL_REQUIRE(ptrace(PT_KILL, child, (void *)1, 0) != -1);
22731.54Skamil		DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
22741.54Skamil		TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0),
22751.54Skamil		                      child);
22761.1Skamil
22771.54Skamil		validate_status_signaled(status, SIGKILL, 0);
22781.1Skamil
22791.54Skamil		atf_tc_skip("PaX MPROTECT setup prevents writes to .text");
22801.54Skamil	}
22811.1Skamil
22821.54Skamil	DPRINTF("Calling operation to transfer bytes between child=%d and "
22831.54Skamil	       "parent=%d\n", child, getpid());
22841.1Skamil
22851.54Skamil	switch (type) {
22861.54Skamil	case BYTES_TRANSFER_TEXTIO:
22871.54Skamil	case BYTES_TRANSFER_DATAIO:
22881.54Skamil	case BYTES_TRANSFER_AUXV:
22891.54Skamil		switch (operation) {
22901.54Skamil		case PIOD_WRITE_D:
22911.54Skamil		case PIOD_WRITE_I:
22921.54Skamil			switch (size) {
22931.54Skamil			case 8:
22941.54Skamil				lookup_me8 = magic8;
22951.54Skamil				break;
22961.54Skamil			case 16:
22971.54Skamil				lookup_me16 = magic16;
22981.54Skamil				break;
22991.54Skamil			case 32:
23001.54Skamil				lookup_me32 = magic32;
23011.54Skamil				break;
23021.54Skamil			case 64:
23031.54Skamil				lookup_me64 = magic64;
23041.54Skamil				break;
23051.54Skamil			default:
23061.54Skamil				break;
23071.54Skamil			}
23081.54Skamil			break;
23091.54Skamil		default:
23101.54Skamil			break;
23111.54Skamil		}
23121.54Skamil		SYSCALL_REQUIRE(ptrace(PT_IO, child, &io, 0) != -1);
23131.54Skamil		switch (operation) {
23141.54Skamil		case PIOD_READ_D:
23151.54Skamil		case PIOD_READ_I:
23161.54Skamil			switch (size) {
23171.54Skamil			case 8:
23181.54Skamil				ATF_REQUIRE_EQ(lookup_me8, magic8);
23191.54Skamil				break;
23201.54Skamil			case 16:
23211.54Skamil				ATF_REQUIRE_EQ(lookup_me16, magic16);
23221.54Skamil				break;
23231.54Skamil			case 32:
23241.54Skamil				ATF_REQUIRE_EQ(lookup_me32, magic32);
23251.54Skamil				break;
23261.54Skamil			case 64:
23271.54Skamil				ATF_REQUIRE_EQ(lookup_me64, magic64);
23281.54Skamil				break;
23291.54Skamil			default:
23301.54Skamil				break;
23311.54Skamil			}
23321.54Skamil			break;
23331.54Skamil		case PIOD_READ_AUXV:
23341.54Skamil			DPRINTF("Asserting that AUXV length (%zu) is > 0\n",
23351.54Skamil			        io.piod_len);
23361.54Skamil			ATF_REQUIRE(io.piod_len > 0);
23371.54Skamil			for (aip = ai; aip->a_type != AT_NULL; aip++)
23381.54Skamil				DPRINTF("a_type=%#llx a_v=%#llx\n",
23391.54Skamil				    (long long int)aip->a_type,
23401.54Skamil				    (long long int)aip->a_v);
23411.54Skamil			break;
23421.54Skamil		default:
23431.54Skamil			break;
23441.54Skamil		}
23451.54Skamil		break;
23461.54Skamil	case BYTES_TRANSFER_TEXT:
23471.54Skamil		switch (operation) {
23481.54Skamil		case PT_READ_D:
23491.54Skamil		case PT_READ_I:
23501.54Skamil			errno = 0;
23511.54Skamil			lookup_me = ptrace(operation, child,
23521.54Skamil			                   bytes_transfer_dummy, 0);
23531.54Skamil			ATF_REQUIRE_EQ(lookup_me, magic);
23541.54Skamil			SYSCALL_REQUIRE_ERRNO(errno, 0);
23551.54Skamil			break;
23561.54Skamil		case PT_WRITE_D:
23571.54Skamil		case PT_WRITE_I:
23581.54Skamil			SYSCALL_REQUIRE(ptrace(operation, child,
23591.54Skamil			                       bytes_transfer_dummy, magic)
23601.54Skamil			                != -1);
23611.54Skamil			break;
23621.54Skamil		default:
23631.54Skamil			break;
23641.54Skamil		}
23651.54Skamil		break;
23661.54Skamil	case BYTES_TRANSFER_DATA:
23671.54Skamil		switch (operation) {
23681.54Skamil		case PT_READ_D:
23691.54Skamil		case PT_READ_I:
23701.54Skamil			errno = 0;
23711.54Skamil			lookup_me = ptrace(operation, child, &lookup_me, 0);
23721.54Skamil			ATF_REQUIRE_EQ(lookup_me, magic);
23731.54Skamil			SYSCALL_REQUIRE_ERRNO(errno, 0);
23741.54Skamil			break;
23751.54Skamil		case PT_WRITE_D:
23761.54Skamil		case PT_WRITE_I:
23771.54Skamil			lookup_me = magic;
23781.54Skamil			SYSCALL_REQUIRE(ptrace(operation, child, &lookup_me,
23791.54Skamil			                       magic) != -1);
23801.54Skamil			break;
23811.54Skamil		default:
23821.54Skamil			break;
23831.54Skamil		}
23841.54Skamil		break;
23851.54Skamil	default:
23861.54Skamil		break;
23871.54Skamil	}
23881.1Skamil
23891.13Schristos	DPRINTF("Before resuming the child process where it left off and "
23901.1Skamil	    "without signal to be sent\n");
23911.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
23921.1Skamil
23931.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
23941.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
23951.1Skamil
23961.1Skamil	validate_status_exited(status, exitval);
23971.1Skamil
23981.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
23991.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
24001.1Skamil}
24011.1Skamil
24021.61Skre#define BYTES_TRANSFER(test, operation, size, type)			\
24031.61SkreATF_TC(test);								\
24041.61SkreATF_TC_HEAD(test, tc)							\
24051.61Skre{									\
24061.61Skre	atf_tc_set_md_var(tc, "descr",					\
24071.61Skre	    "Verify bytes transfer operation" #operation " and size " #size \
24081.61Skre	    " of type " #type);						\
24091.61Skre}									\
24101.61Skre									\
24111.61SkreATF_TC_BODY(test, tc)							\
24121.61Skre{									\
24131.61Skre									\
24141.61Skre	bytes_transfer(operation, size, BYTES_TRANSFER_##type);		\
24151.1Skamil}
24161.1Skamil
24171.54Skamil// DATA
24181.1Skamil
24191.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_d_8, PIOD_READ_D, 8, DATAIO)
24201.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_d_16, PIOD_READ_D, 16, DATAIO)
24211.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_d_32, PIOD_READ_D, 32, DATAIO)
24221.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_d_64, PIOD_READ_D, 64, DATAIO)
24231.54Skamil
24241.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_i_8, PIOD_READ_I, 8, DATAIO)
24251.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_i_16, PIOD_READ_I, 16, DATAIO)
24261.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_i_32, PIOD_READ_I, 32, DATAIO)
24271.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_i_64, PIOD_READ_I, 64, DATAIO)
24281.54Skamil
24291.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_d_8, PIOD_WRITE_D, 8, DATAIO)
24301.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_d_16, PIOD_WRITE_D, 16, DATAIO)
24311.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_d_32, PIOD_WRITE_D, 32, DATAIO)
24321.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_d_64, PIOD_WRITE_D, 64, DATAIO)
24331.54Skamil
24341.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_i_8, PIOD_WRITE_I, 8, DATAIO)
24351.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_i_16, PIOD_WRITE_I, 16, DATAIO)
24361.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_i_32, PIOD_WRITE_I, 32, DATAIO)
24371.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_i_64, PIOD_WRITE_I, 64, DATAIO)
24381.54Skamil
24391.54SkamilBYTES_TRANSFER(bytes_transfer_read_d, PT_READ_D, 32, DATA)
24401.54SkamilBYTES_TRANSFER(bytes_transfer_read_i, PT_READ_I, 32, DATA)
24411.54SkamilBYTES_TRANSFER(bytes_transfer_write_d, PT_WRITE_D, 32, DATA)
24421.54SkamilBYTES_TRANSFER(bytes_transfer_write_i, PT_WRITE_I, 32, DATA)
24431.54Skamil
24441.54Skamil// TEXT
24451.54Skamil
24461.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_d_8_text, PIOD_READ_D, 8, TEXTIO)
24471.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_d_16_text, PIOD_READ_D, 16, TEXTIO)
24481.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_d_32_text, PIOD_READ_D, 32, TEXTIO)
24491.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_d_64_text, PIOD_READ_D, 64, TEXTIO)
24501.54Skamil
24511.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_i_8_text, PIOD_READ_I, 8, TEXTIO)
24521.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_i_16_text, PIOD_READ_I, 16, TEXTIO)
24531.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_i_32_text, PIOD_READ_I, 32, TEXTIO)
24541.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_i_64_text, PIOD_READ_I, 64, TEXTIO)
24551.54Skamil
24561.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_d_8_text, PIOD_WRITE_D, 8, TEXTIO)
24571.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_d_16_text, PIOD_WRITE_D, 16, TEXTIO)
24581.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_d_32_text, PIOD_WRITE_D, 32, TEXTIO)
24591.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_d_64_text, PIOD_WRITE_D, 64, TEXTIO)
24601.54Skamil
24611.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_i_8_text, PIOD_WRITE_I, 8, TEXTIO)
24621.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_i_16_text, PIOD_WRITE_I, 16, TEXTIO)
24631.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_i_32_text, PIOD_WRITE_I, 32, TEXTIO)
24641.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_i_64_text, PIOD_WRITE_I, 64, TEXTIO)
24651.54Skamil
24661.54SkamilBYTES_TRANSFER(bytes_transfer_read_d_text, PT_READ_D, 32, TEXT)
24671.54SkamilBYTES_TRANSFER(bytes_transfer_read_i_text, PT_READ_I, 32, TEXT)
24681.54SkamilBYTES_TRANSFER(bytes_transfer_write_d_text, PT_WRITE_D, 32, TEXT)
24691.54SkamilBYTES_TRANSFER(bytes_transfer_write_i_text, PT_WRITE_I, 32, TEXT)
24701.1Skamil
24711.54Skamil// AUXV
24721.1Skamil
24731.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_auxv, PIOD_READ_AUXV, 4096, AUXV)
24741.1Skamil
24751.54Skamil/// ----------------------------------------------------------------------------
24761.1Skamil
24771.1Skamil#if defined(HAVE_GPREGS)
24781.1SkamilATF_TC(regs1);
24791.1SkamilATF_TC_HEAD(regs1, tc)
24801.1Skamil{
24811.1Skamil	atf_tc_set_md_var(tc, "descr",
24821.1Skamil	    "Verify plain PT_GETREGS call without further steps");
24831.1Skamil}
24841.1Skamil
24851.1SkamilATF_TC_BODY(regs1, tc)
24861.1Skamil{
24871.1Skamil	const int exitval = 5;
24881.1Skamil	const int sigval = SIGSTOP;
24891.1Skamil	pid_t child, wpid;
24901.1Skamil#if defined(TWAIT_HAVE_STATUS)
24911.1Skamil	int status;
24921.1Skamil#endif
24931.1Skamil	struct reg r;
24941.1Skamil
24951.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
24961.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
24971.1Skamil	if (child == 0) {
24981.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
24991.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
25001.1Skamil
25011.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
25021.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
25031.1Skamil
25041.13Schristos		DPRINTF("Before exiting of the child process\n");
25051.1Skamil		_exit(exitval);
25061.1Skamil	}
25071.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
25081.1Skamil
25091.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
25101.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
25111.1Skamil
25121.1Skamil	validate_status_stopped(status, sigval);
25131.1Skamil
25141.13Schristos	DPRINTF("Call GETREGS for the child process\n");
25151.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GETREGS, child, &r, 0) != -1);
25161.1Skamil
25171.13Schristos	DPRINTF("Before resuming the child process where it left off and "
25181.1Skamil	    "without signal to be sent\n");
25191.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
25201.1Skamil
25211.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
25221.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
25231.1Skamil
25241.1Skamil	validate_status_exited(status, exitval);
25251.1Skamil
25261.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
25271.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
25281.1Skamil}
25291.1Skamil#endif
25301.1Skamil
25311.1Skamil#if defined(HAVE_GPREGS)
25321.1SkamilATF_TC(regs2);
25331.1SkamilATF_TC_HEAD(regs2, tc)
25341.1Skamil{
25351.1Skamil	atf_tc_set_md_var(tc, "descr",
25361.1Skamil	    "Verify plain PT_GETREGS call and retrieve PC");
25371.1Skamil}
25381.1Skamil
25391.1SkamilATF_TC_BODY(regs2, tc)
25401.1Skamil{
25411.1Skamil	const int exitval = 5;
25421.1Skamil	const int sigval = SIGSTOP;
25431.1Skamil	pid_t child, wpid;
25441.1Skamil#if defined(TWAIT_HAVE_STATUS)
25451.1Skamil	int status;
25461.1Skamil#endif
25471.1Skamil	struct reg r;
25481.1Skamil
25491.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
25501.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
25511.1Skamil	if (child == 0) {
25521.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
25531.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
25541.1Skamil
25551.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
25561.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
25571.1Skamil
25581.13Schristos		DPRINTF("Before exiting of the child process\n");
25591.1Skamil		_exit(exitval);
25601.1Skamil	}
25611.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
25621.1Skamil
25631.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
25641.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
25651.1Skamil
25661.1Skamil	validate_status_stopped(status, sigval);
25671.1Skamil
25681.13Schristos	DPRINTF("Call GETREGS for the child process\n");
25691.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GETREGS, child, &r, 0) != -1);
25701.1Skamil
25711.13Schristos	DPRINTF("Retrieved PC=%" PRIxREGISTER "\n", PTRACE_REG_PC(&r));
25721.1Skamil
25731.13Schristos	DPRINTF("Before resuming the child process where it left off and "
25741.1Skamil	    "without signal to be sent\n");
25751.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
25761.1Skamil
25771.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
25781.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
25791.1Skamil
25801.1Skamil	validate_status_exited(status, exitval);
25811.1Skamil
25821.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
25831.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
25841.1Skamil}
25851.1Skamil#endif
25861.1Skamil
25871.1Skamil#if defined(HAVE_GPREGS)
25881.1SkamilATF_TC(regs3);
25891.1SkamilATF_TC_HEAD(regs3, tc)
25901.1Skamil{
25911.1Skamil	atf_tc_set_md_var(tc, "descr",
25921.1Skamil	    "Verify plain PT_GETREGS call and retrieve SP");
25931.1Skamil}
25941.1Skamil
25951.1SkamilATF_TC_BODY(regs3, tc)
25961.1Skamil{
25971.1Skamil	const int exitval = 5;
25981.1Skamil	const int sigval = SIGSTOP;
25991.1Skamil	pid_t child, wpid;
26001.1Skamil#if defined(TWAIT_HAVE_STATUS)
26011.1Skamil	int status;
26021.1Skamil#endif
26031.1Skamil	struct reg r;
26041.1Skamil
26051.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
26061.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
26071.1Skamil	if (child == 0) {
26081.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
26091.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
26101.1Skamil
26111.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
26121.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
26131.1Skamil
26141.13Schristos		DPRINTF("Before exiting of the child process\n");
26151.1Skamil		_exit(exitval);
26161.1Skamil	}
26171.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
26181.1Skamil
26191.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
26201.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
26211.1Skamil
26221.1Skamil	validate_status_stopped(status, sigval);
26231.1Skamil
26241.13Schristos	DPRINTF("Call GETREGS for the child process\n");
26251.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GETREGS, child, &r, 0) != -1);
26261.1Skamil
26271.13Schristos	DPRINTF("Retrieved SP=%" PRIxREGISTER "\n", PTRACE_REG_SP(&r));
26281.1Skamil
26291.13Schristos	DPRINTF("Before resuming the child process where it left off and "
26301.1Skamil	    "without signal to be sent\n");
26311.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
26321.1Skamil
26331.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
26341.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
26351.1Skamil
26361.1Skamil	validate_status_exited(status, exitval);
26371.1Skamil
26381.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
26391.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
26401.1Skamil}
26411.1Skamil#endif
26421.1Skamil
26431.1Skamil#if defined(HAVE_GPREGS)
26441.1SkamilATF_TC(regs4);
26451.1SkamilATF_TC_HEAD(regs4, tc)
26461.1Skamil{
26471.1Skamil	atf_tc_set_md_var(tc, "descr",
26481.1Skamil	    "Verify plain PT_GETREGS call and retrieve INTRV");
26491.1Skamil}
26501.1Skamil
26511.1SkamilATF_TC_BODY(regs4, tc)
26521.1Skamil{
26531.1Skamil	const int exitval = 5;
26541.1Skamil	const int sigval = SIGSTOP;
26551.1Skamil	pid_t child, wpid;
26561.1Skamil#if defined(TWAIT_HAVE_STATUS)
26571.1Skamil	int status;
26581.1Skamil#endif
26591.1Skamil	struct reg r;
26601.1Skamil
26611.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
26621.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
26631.1Skamil	if (child == 0) {
26641.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
26651.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
26661.1Skamil
26671.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
26681.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
26691.1Skamil
26701.13Schristos		DPRINTF("Before exiting of the child process\n");
26711.1Skamil		_exit(exitval);
26721.1Skamil	}
26731.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
26741.1Skamil
26751.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
26761.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
26771.1Skamil
26781.1Skamil	validate_status_stopped(status, sigval);
26791.1Skamil
26801.13Schristos	DPRINTF("Call GETREGS for the child process\n");
26811.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GETREGS, child, &r, 0) != -1);
26821.1Skamil
26831.13Schristos	DPRINTF("Retrieved INTRV=%" PRIxREGISTER "\n", PTRACE_REG_INTRV(&r));
26841.1Skamil
26851.13Schristos	DPRINTF("Before resuming the child process where it left off and "
26861.1Skamil	    "without signal to be sent\n");
26871.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
26881.1Skamil
26891.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
26901.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
26911.1Skamil
26921.1Skamil	validate_status_exited(status, exitval);
26931.1Skamil
26941.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
26951.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
26961.1Skamil}
26971.1Skamil#endif
26981.1Skamil
26991.1Skamil#if defined(HAVE_GPREGS)
27001.1SkamilATF_TC(regs5);
27011.1SkamilATF_TC_HEAD(regs5, tc)
27021.1Skamil{
27031.1Skamil	atf_tc_set_md_var(tc, "descr",
27041.1Skamil	    "Verify PT_GETREGS and PT_SETREGS calls without changing regs");
27051.1Skamil}
27061.1Skamil
27071.1SkamilATF_TC_BODY(regs5, tc)
27081.1Skamil{
27091.1Skamil	const int exitval = 5;
27101.1Skamil	const int sigval = SIGSTOP;
27111.1Skamil	pid_t child, wpid;
27121.1Skamil#if defined(TWAIT_HAVE_STATUS)
27131.1Skamil	int status;
27141.1Skamil#endif
27151.1Skamil	struct reg r;
27161.1Skamil
27171.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
27181.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
27191.1Skamil	if (child == 0) {
27201.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
27211.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
27221.1Skamil
27231.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
27241.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
27251.1Skamil
27261.13Schristos		DPRINTF("Before exiting of the child process\n");
27271.1Skamil		_exit(exitval);
27281.1Skamil	}
27291.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
27301.1Skamil
27311.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
27321.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
27331.1Skamil
27341.1Skamil	validate_status_stopped(status, sigval);
27351.1Skamil
27361.13Schristos	DPRINTF("Call GETREGS for the child process\n");
27371.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GETREGS, child, &r, 0) != -1);
27381.1Skamil
27391.13Schristos	DPRINTF("Call SETREGS for the child process (without changed regs)\n");
27401.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GETREGS, child, &r, 0) != -1);
27411.1Skamil
27421.13Schristos	DPRINTF("Before resuming the child process where it left off and "
27431.1Skamil	    "without signal to be sent\n");
27441.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
27451.1Skamil
27461.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
27471.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
27481.1Skamil
27491.1Skamil	validate_status_exited(status, exitval);
27501.1Skamil
27511.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
27521.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
27531.1Skamil}
27541.1Skamil#endif
27551.1Skamil
27561.1Skamil#if defined(HAVE_FPREGS)
27571.1SkamilATF_TC(fpregs1);
27581.1SkamilATF_TC_HEAD(fpregs1, tc)
27591.1Skamil{
27601.1Skamil	atf_tc_set_md_var(tc, "descr",
27611.1Skamil	    "Verify plain PT_GETFPREGS call without further steps");
27621.1Skamil}
27631.1Skamil
27641.1SkamilATF_TC_BODY(fpregs1, tc)
27651.1Skamil{
27661.1Skamil	const int exitval = 5;
27671.1Skamil	const int sigval = SIGSTOP;
27681.1Skamil	pid_t child, wpid;
27691.1Skamil#if defined(TWAIT_HAVE_STATUS)
27701.1Skamil	int status;
27711.1Skamil#endif
27721.1Skamil	struct fpreg r;
27731.1Skamil
27741.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
27751.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
27761.1Skamil	if (child == 0) {
27771.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
27781.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
27791.1Skamil
27801.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
27811.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
27821.1Skamil
27831.13Schristos		DPRINTF("Before exiting of the child process\n");
27841.1Skamil		_exit(exitval);
27851.1Skamil	}
27861.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
27871.1Skamil
27881.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
27891.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
27901.1Skamil
27911.1Skamil	validate_status_stopped(status, sigval);
27921.1Skamil
27931.13Schristos	DPRINTF("Call GETFPREGS for the child process\n");
27941.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GETFPREGS, child, &r, 0) != -1);
27951.1Skamil
27961.13Schristos	DPRINTF("Before resuming the child process where it left off and "
27971.1Skamil	    "without signal to be sent\n");
27981.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
27991.1Skamil
28001.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
28011.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
28021.1Skamil
28031.1Skamil	validate_status_exited(status, exitval);
28041.1Skamil
28051.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
28061.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
28071.1Skamil}
28081.1Skamil#endif
28091.1Skamil
28101.1Skamil#if defined(HAVE_FPREGS)
28111.1SkamilATF_TC(fpregs2);
28121.1SkamilATF_TC_HEAD(fpregs2, tc)
28131.1Skamil{
28141.1Skamil	atf_tc_set_md_var(tc, "descr",
28151.1Skamil	    "Verify PT_GETFPREGS and PT_SETFPREGS calls without changing "
28161.1Skamil	    "regs");
28171.1Skamil}
28181.1Skamil
28191.1SkamilATF_TC_BODY(fpregs2, tc)
28201.1Skamil{
28211.1Skamil	const int exitval = 5;
28221.1Skamil	const int sigval = SIGSTOP;
28231.1Skamil	pid_t child, wpid;
28241.1Skamil#if defined(TWAIT_HAVE_STATUS)
28251.1Skamil	int status;
28261.1Skamil#endif
28271.1Skamil	struct fpreg r;
28281.1Skamil
28291.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
28301.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
28311.1Skamil	if (child == 0) {
28321.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
28331.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
28341.1Skamil
28351.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
28361.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
28371.1Skamil
28381.13Schristos		DPRINTF("Before exiting of the child process\n");
28391.1Skamil		_exit(exitval);
28401.1Skamil	}
28411.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
28421.1Skamil
28431.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
28441.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
28451.1Skamil
28461.1Skamil	validate_status_stopped(status, sigval);
28471.1Skamil
28481.13Schristos	DPRINTF("Call GETFPREGS for the child process\n");
28491.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GETFPREGS, child, &r, 0) != -1);
28501.1Skamil
28511.13Schristos	DPRINTF("Call SETFPREGS for the child (without changed regs)\n");
28521.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SETFPREGS, child, &r, 0) != -1);
28531.1Skamil
28541.13Schristos	DPRINTF("Before resuming the child process where it left off and "
28551.1Skamil	    "without signal to be sent\n");
28561.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
28571.1Skamil
28581.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
28591.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
28601.1Skamil
28611.1Skamil	validate_status_exited(status, exitval);
28621.1Skamil
28631.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
28641.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
28651.1Skamil}
28661.1Skamil#endif
28671.1Skamil
28681.1Skamil#if defined(PT_STEP)
28691.1Skamilstatic void
28701.2Skamilptrace_step(int N, int setstep)
28711.1Skamil{
28721.1Skamil	const int exitval = 5;
28731.1Skamil	const int sigval = SIGSTOP;
28741.1Skamil	pid_t child, wpid;
28751.1Skamil#if defined(TWAIT_HAVE_STATUS)
28761.1Skamil	int status;
28771.1Skamil#endif
28781.1Skamil	int happy;
28791.1Skamil
28801.1Skamil#if defined(__arm__)
28811.1Skamil	/* PT_STEP not supported on arm 32-bit */
28821.1Skamil	atf_tc_expect_fail("PR kern/52119");
28831.1Skamil#endif
28841.1Skamil
28851.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
28861.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
28871.1Skamil	if (child == 0) {
28881.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
28891.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
28901.1Skamil
28911.1Skamil		happy = check_happy(999);
28921.1Skamil
28931.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
28941.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
28951.1Skamil
28961.1Skamil		FORKEE_ASSERT_EQ(happy, check_happy(999));
28971.1Skamil
28981.13Schristos		DPRINTF("Before exiting of the child process\n");
28991.1Skamil		_exit(exitval);
29001.1Skamil	}
29011.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
29021.1Skamil
29031.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
29041.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
29051.1Skamil
29061.1Skamil	validate_status_stopped(status, sigval);
29071.1Skamil
29081.1Skamil	while (N --> 0) {
29091.2Skamil		if (setstep) {
29101.13Schristos			DPRINTF("Before resuming the child process where it "
29111.2Skamil			    "left off and without signal to be sent (use "
29121.9Skamil			    "PT_SETSTEP and PT_CONTINUE)\n");
29131.13Schristos			SYSCALL_REQUIRE(ptrace(PT_SETSTEP, child, 0, 0) != -1);
29141.13Schristos			SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0)
29151.2Skamil			    != -1);
29161.2Skamil		} else {
29171.13Schristos			DPRINTF("Before resuming the child process where it "
29181.2Skamil			    "left off and without signal to be sent (use "
29191.2Skamil			    "PT_STEP)\n");
29201.13Schristos			SYSCALL_REQUIRE(ptrace(PT_STEP, child, (void *)1, 0)
29211.2Skamil			    != -1);
29221.2Skamil		}
29231.1Skamil
29241.13Schristos		DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
29251.1Skamil		TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0),
29261.1Skamil		    child);
29271.1Skamil
29281.1Skamil		validate_status_stopped(status, SIGTRAP);
29291.2Skamil
29301.2Skamil		if (setstep) {
29311.13Schristos			SYSCALL_REQUIRE(ptrace(PT_CLEARSTEP, child, 0, 0) != -1);
29321.2Skamil		}
29331.1Skamil	}
29341.1Skamil
29351.13Schristos	DPRINTF("Before resuming the child process where it left off and "
29361.1Skamil	    "without signal to be sent\n");
29371.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
29381.1Skamil
29391.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
29401.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
29411.1Skamil
29421.1Skamil	validate_status_exited(status, exitval);
29431.1Skamil
29441.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
29451.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
29461.1Skamil}
29471.1Skamil#endif
29481.1Skamil
29491.1Skamil#if defined(PT_STEP)
29501.1SkamilATF_TC(step1);
29511.1SkamilATF_TC_HEAD(step1, tc)
29521.1Skamil{
29531.1Skamil	atf_tc_set_md_var(tc, "descr",
29541.1Skamil	    "Verify single PT_STEP call");
29551.1Skamil}
29561.1Skamil
29571.1SkamilATF_TC_BODY(step1, tc)
29581.1Skamil{
29591.2Skamil	ptrace_step(1, 0);
29601.1Skamil}
29611.1Skamil#endif
29621.1Skamil
29631.1Skamil#if defined(PT_STEP)
29641.1SkamilATF_TC(step2);
29651.1SkamilATF_TC_HEAD(step2, tc)
29661.1Skamil{
29671.1Skamil	atf_tc_set_md_var(tc, "descr",
29681.1Skamil	    "Verify PT_STEP called twice");
29691.1Skamil}
29701.1Skamil
29711.1SkamilATF_TC_BODY(step2, tc)
29721.1Skamil{
29731.2Skamil	ptrace_step(2, 0);
29741.1Skamil}
29751.1Skamil#endif
29761.1Skamil
29771.1Skamil#if defined(PT_STEP)
29781.1SkamilATF_TC(step3);
29791.1SkamilATF_TC_HEAD(step3, tc)
29801.1Skamil{
29811.1Skamil	atf_tc_set_md_var(tc, "descr",
29821.1Skamil	    "Verify PT_STEP called three times");
29831.1Skamil}
29841.1Skamil
29851.1SkamilATF_TC_BODY(step3, tc)
29861.1Skamil{
29871.2Skamil	ptrace_step(3, 0);
29881.1Skamil}
29891.1Skamil#endif
29901.1Skamil
29911.1Skamil#if defined(PT_STEP)
29921.1SkamilATF_TC(step4);
29931.1SkamilATF_TC_HEAD(step4, tc)
29941.1Skamil{
29951.1Skamil	atf_tc_set_md_var(tc, "descr",
29961.1Skamil	    "Verify PT_STEP called four times");
29971.1Skamil}
29981.1Skamil
29991.1SkamilATF_TC_BODY(step4, tc)
30001.1Skamil{
30011.2Skamil	ptrace_step(4, 0);
30021.2Skamil}
30031.2Skamil#endif
30041.2Skamil
30051.2Skamil#if defined(PT_STEP)
30061.2SkamilATF_TC(setstep1);
30071.2SkamilATF_TC_HEAD(setstep1, tc)
30081.2Skamil{
30091.2Skamil	atf_tc_set_md_var(tc, "descr",
30101.2Skamil	    "Verify single PT_SETSTEP call");
30111.2Skamil}
30121.2Skamil
30131.2SkamilATF_TC_BODY(setstep1, tc)
30141.2Skamil{
30151.2Skamil	ptrace_step(1, 1);
30161.2Skamil}
30171.2Skamil#endif
30181.2Skamil
30191.2Skamil#if defined(PT_STEP)
30201.2SkamilATF_TC(setstep2);
30211.2SkamilATF_TC_HEAD(setstep2, tc)
30221.2Skamil{
30231.2Skamil	atf_tc_set_md_var(tc, "descr",
30241.2Skamil	    "Verify PT_SETSTEP called twice");
30251.2Skamil}
30261.2Skamil
30271.2SkamilATF_TC_BODY(setstep2, tc)
30281.2Skamil{
30291.2Skamil	ptrace_step(2, 1);
30301.2Skamil}
30311.2Skamil#endif
30321.2Skamil
30331.2Skamil#if defined(PT_STEP)
30341.2SkamilATF_TC(setstep3);
30351.2SkamilATF_TC_HEAD(setstep3, tc)
30361.2Skamil{
30371.2Skamil	atf_tc_set_md_var(tc, "descr",
30381.2Skamil	    "Verify PT_SETSTEP called three times");
30391.2Skamil}
30401.2Skamil
30411.2SkamilATF_TC_BODY(setstep3, tc)
30421.2Skamil{
30431.2Skamil	ptrace_step(3, 1);
30441.2Skamil}
30451.2Skamil#endif
30461.2Skamil
30471.2Skamil#if defined(PT_STEP)
30481.2SkamilATF_TC(setstep4);
30491.2SkamilATF_TC_HEAD(setstep4, tc)
30501.2Skamil{
30511.2Skamil	atf_tc_set_md_var(tc, "descr",
30521.2Skamil	    "Verify PT_SETSTEP called four times");
30531.2Skamil}
30541.2Skamil
30551.2SkamilATF_TC_BODY(setstep4, tc)
30561.2Skamil{
30571.2Skamil	ptrace_step(4, 1);
30581.1Skamil}
30591.1Skamil#endif
30601.1Skamil
30611.1SkamilATF_TC(kill1);
30621.1SkamilATF_TC_HEAD(kill1, tc)
30631.1Skamil{
30641.1Skamil	atf_tc_set_md_var(tc, "descr",
30651.1Skamil	    "Verify that PT_CONTINUE with SIGKILL terminates child");
30661.1Skamil}
30671.1Skamil
30681.1SkamilATF_TC_BODY(kill1, tc)
30691.1Skamil{
30701.1Skamil	const int sigval = SIGSTOP, sigsent = SIGKILL;
30711.1Skamil	pid_t child, wpid;
30721.1Skamil#if defined(TWAIT_HAVE_STATUS)
30731.1Skamil	int status;
30741.1Skamil#endif
30751.1Skamil
30761.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
30771.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
30781.1Skamil	if (child == 0) {
30791.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
30801.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
30811.1Skamil
30821.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
30831.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
30841.1Skamil
30851.1Skamil		/* NOTREACHED */
30861.1Skamil		FORKEE_ASSERTX(0 &&
30871.1Skamil		    "Child should be terminated by a signal from its parent");
30881.1Skamil	}
30891.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
30901.1Skamil
30911.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
30921.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
30931.1Skamil
30941.1Skamil	validate_status_stopped(status, sigval);
30951.1Skamil
30961.13Schristos	DPRINTF("Before resuming the child process where it left off and "
30971.1Skamil	    "without signal to be sent\n");
30981.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, sigsent) != -1);
30991.1Skamil
31001.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
31011.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
31021.1Skamil
31031.1Skamil	validate_status_signaled(status, sigsent, 0);
31041.1Skamil
31051.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
31061.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
31071.1Skamil}
31081.1Skamil
31091.1SkamilATF_TC(kill2);
31101.1SkamilATF_TC_HEAD(kill2, tc)
31111.1Skamil{
31121.1Skamil	atf_tc_set_md_var(tc, "descr",
31131.1Skamil	    "Verify that PT_KILL terminates child");
31141.1Skamil}
31151.1Skamil
31161.1SkamilATF_TC_BODY(kill2, tc)
31171.1Skamil{
31181.1Skamil	const int sigval = SIGSTOP;
31191.1Skamil	pid_t child, wpid;
31201.1Skamil#if defined(TWAIT_HAVE_STATUS)
31211.1Skamil	int status;
31221.1Skamil#endif
31231.1Skamil
31241.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
31251.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
31261.1Skamil	if (child == 0) {
31271.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
31281.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
31291.1Skamil
31301.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
31311.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
31321.1Skamil
31331.1Skamil		/* NOTREACHED */
31341.1Skamil		FORKEE_ASSERTX(0 &&
31351.1Skamil		    "Child should be terminated by a signal from its parent");
31361.1Skamil	}
31371.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
31381.1Skamil
31391.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
31401.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
31411.1Skamil
31421.1Skamil	validate_status_stopped(status, sigval);
31431.1Skamil
31441.13Schristos	DPRINTF("Before resuming the child process where it left off and "
31451.1Skamil	    "without signal to be sent\n");
31461.13Schristos	SYSCALL_REQUIRE(ptrace(PT_KILL, child, (void*)1, 0) != -1);
31471.1Skamil
31481.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
31491.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
31501.1Skamil
31511.1Skamil	validate_status_signaled(status, SIGKILL, 0);
31521.1Skamil
31531.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
31541.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
31551.1Skamil}
31561.1Skamil
31571.1SkamilATF_TC(lwpinfo1);
31581.1SkamilATF_TC_HEAD(lwpinfo1, tc)
31591.1Skamil{
31601.1Skamil	atf_tc_set_md_var(tc, "descr",
31611.1Skamil	    "Verify basic LWPINFO call for single thread (PT_TRACE_ME)");
31621.1Skamil}
31631.1Skamil
31641.1SkamilATF_TC_BODY(lwpinfo1, tc)
31651.1Skamil{
31661.1Skamil	const int exitval = 5;
31671.1Skamil	const int sigval = SIGSTOP;
31681.1Skamil	pid_t child, wpid;
31691.1Skamil#if defined(TWAIT_HAVE_STATUS)
31701.1Skamil	int status;
31711.1Skamil#endif
31721.1Skamil	struct ptrace_lwpinfo info = {0, 0};
31731.1Skamil
31741.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
31751.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
31761.1Skamil	if (child == 0) {
31771.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
31781.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
31791.1Skamil
31801.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
31811.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
31821.1Skamil
31831.13Schristos		DPRINTF("Before exiting of the child process\n");
31841.1Skamil		_exit(exitval);
31851.1Skamil	}
31861.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
31871.1Skamil
31881.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
31891.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
31901.1Skamil
31911.1Skamil	validate_status_stopped(status, sigval);
31921.1Skamil
31931.13Schristos	DPRINTF("Before calling ptrace(2) with PT_LWPINFO for child\n");
31941.13Schristos	SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &info, sizeof(info)) != -1);
31951.1Skamil
31961.13Schristos	DPRINTF("Assert that there exists a thread\n");
31971.1Skamil	ATF_REQUIRE(info.pl_lwpid > 0);
31981.1Skamil
31991.13Schristos	DPRINTF("Assert that lwp thread %d received event PL_EVENT_SIGNAL\n",
32001.1Skamil	    info.pl_lwpid);
32011.1Skamil	ATF_REQUIRE_EQ_MSG(info.pl_event, PL_EVENT_SIGNAL,
32021.1Skamil	    "Received event %d != expected event %d",
32031.1Skamil	    info.pl_event, PL_EVENT_SIGNAL);
32041.1Skamil
32051.13Schristos	DPRINTF("Before calling ptrace(2) with PT_LWPINFO for child\n");
32061.13Schristos	SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &info, sizeof(info)) != -1);
32071.1Skamil
32081.13Schristos	DPRINTF("Assert that there are no more lwp threads in child\n");
32091.1Skamil	ATF_REQUIRE_EQ(info.pl_lwpid, 0);
32101.1Skamil
32111.13Schristos	DPRINTF("Before resuming the child process where it left off and "
32121.1Skamil	    "without signal to be sent\n");
32131.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
32141.1Skamil
32151.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
32161.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
32171.1Skamil
32181.1Skamil	validate_status_exited(status, exitval);
32191.1Skamil
32201.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
32211.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
32221.1Skamil}
32231.1Skamil
32241.1Skamil#if defined(TWAIT_HAVE_PID)
32251.1SkamilATF_TC(lwpinfo2);
32261.1SkamilATF_TC_HEAD(lwpinfo2, tc)
32271.1Skamil{
32281.1Skamil	atf_tc_set_md_var(tc, "descr",
32291.1Skamil	    "Verify basic LWPINFO call for single thread (PT_ATTACH from "
32301.1Skamil	    "tracer)");
32311.1Skamil}
32321.1Skamil
32331.1SkamilATF_TC_BODY(lwpinfo2, tc)
32341.1Skamil{
32351.1Skamil	struct msg_fds parent_tracee, parent_tracer;
32361.1Skamil	const int exitval_tracee = 5;
32371.1Skamil	const int exitval_tracer = 10;
32381.1Skamil	pid_t tracee, tracer, wpid;
32391.1Skamil	uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */
32401.1Skamil#if defined(TWAIT_HAVE_STATUS)
32411.1Skamil	int status;
32421.1Skamil#endif
32431.1Skamil	struct ptrace_lwpinfo info = {0, 0};
32441.1Skamil
32451.13Schristos	DPRINTF("Spawn tracee\n");
32461.13Schristos	SYSCALL_REQUIRE(msg_open(&parent_tracee) == 0);
32471.13Schristos	SYSCALL_REQUIRE(msg_open(&parent_tracer) == 0);
32481.1Skamil	tracee = atf_utils_fork();
32491.1Skamil	if (tracee == 0) {
32501.1Skamil
32511.1Skamil		/* Wait for message from the parent */
32521.1Skamil		CHILD_TO_PARENT("tracee ready", parent_tracee, msg);
32531.1Skamil		CHILD_FROM_PARENT("tracee exit", parent_tracee, msg);
32541.1Skamil
32551.1Skamil		_exit(exitval_tracee);
32561.1Skamil	}
32571.1Skamil	PARENT_FROM_CHILD("tracee ready", parent_tracee, msg);
32581.1Skamil
32591.13Schristos	DPRINTF("Spawn debugger\n");
32601.1Skamil	tracer = atf_utils_fork();
32611.1Skamil	if (tracer == 0) {
32621.1Skamil		/* No IPC to communicate with the child */
32631.13Schristos		DPRINTF("Before calling PT_ATTACH from tracee %d\n", getpid());
32641.1Skamil		FORKEE_ASSERT(ptrace(PT_ATTACH, tracee, NULL, 0) != -1);
32651.1Skamil
32661.1Skamil		/* Wait for tracee and assert that it was stopped w/ SIGSTOP */
32671.1Skamil		FORKEE_REQUIRE_SUCCESS(
32681.1Skamil		    wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);
32691.1Skamil
32701.1Skamil		forkee_status_stopped(status, SIGSTOP);
32711.1Skamil
32721.13Schristos		DPRINTF("Before calling ptrace(2) with PT_LWPINFO for child\n");
32731.1Skamil		FORKEE_ASSERT(ptrace(PT_LWPINFO, tracee, &info, sizeof(info))
32741.1Skamil		    != -1);
32751.1Skamil
32761.13Schristos		DPRINTF("Assert that there exists a thread\n");
32771.1Skamil		FORKEE_ASSERTX(info.pl_lwpid > 0);
32781.1Skamil
32791.13Schristos		DPRINTF("Assert that lwp thread %d received event "
32801.1Skamil		    "PL_EVENT_SIGNAL\n", info.pl_lwpid);
32811.1Skamil		FORKEE_ASSERT_EQ(info.pl_event, PL_EVENT_SIGNAL);
32821.1Skamil
32831.13Schristos		DPRINTF("Before calling ptrace(2) with PT_LWPINFO for child\n");
32841.1Skamil		FORKEE_ASSERT(ptrace(PT_LWPINFO, tracee, &info, sizeof(info))
32851.1Skamil		    != -1);
32861.1Skamil
32871.13Schristos		DPRINTF("Assert that there are no more lwp threads in child\n");
32881.1Skamil		FORKEE_ASSERTX(info.pl_lwpid == 0);
32891.1Skamil
32901.1Skamil		/* Resume tracee with PT_CONTINUE */
32911.1Skamil		FORKEE_ASSERT(ptrace(PT_CONTINUE, tracee, (void *)1, 0) != -1);
32921.1Skamil
32931.1Skamil		/* Inform parent that tracer has attached to tracee */
32941.1Skamil		CHILD_TO_PARENT("tracer ready", parent_tracer, msg);
32951.1Skamil		/* Wait for parent */
32961.1Skamil		CHILD_FROM_PARENT("tracer wait", parent_tracer, msg);
32971.1Skamil
32981.1Skamil		/* Wait for tracee and assert that it exited */
32991.1Skamil		FORKEE_REQUIRE_SUCCESS(
33001.1Skamil		    wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);
33011.1Skamil
33021.1Skamil		forkee_status_exited(status, exitval_tracee);
33031.1Skamil
33041.13Schristos		DPRINTF("Before exiting of the tracer process\n");
33051.1Skamil		_exit(exitval_tracer);
33061.1Skamil	}
33071.1Skamil
33081.13Schristos	DPRINTF("Wait for the tracer to attach to the tracee\n");
33091.1Skamil	PARENT_FROM_CHILD("tracer ready", parent_tracer, msg);
33101.1Skamil
33111.13Schristos	DPRINTF("Resume the tracee and let it exit\n");
33121.1Skamil	PARENT_TO_CHILD("tracee exit", parent_tracee, msg);
33131.1Skamil
33141.13Schristos	DPRINTF("Detect that tracee is zombie\n");
33151.1Skamil	await_zombie(tracee);
33161.1Skamil
33171.13Schristos	DPRINTF("Assert that there is no status about tracee - "
33181.1Skamil	    "Tracer must detect zombie first - calling %s()\n", TWAIT_FNAME);
33191.1Skamil	TWAIT_REQUIRE_SUCCESS(
33201.1Skamil	    wpid = TWAIT_GENERIC(tracee, &status, WNOHANG), 0);
33211.1Skamil
33221.13Schristos	DPRINTF("Resume the tracer and let it detect exited tracee\n");
33231.1Skamil	PARENT_TO_CHILD("tracer wait", parent_tracer, msg);
33241.1Skamil
33251.13Schristos	DPRINTF("Wait for tracer to finish its job and exit - calling %s()\n",
33261.1Skamil	    TWAIT_FNAME);
33271.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracer, &status, 0),
33281.1Skamil	    tracer);
33291.1Skamil
33301.1Skamil	validate_status_exited(status, exitval_tracer);
33311.1Skamil
33321.13Schristos	DPRINTF("Wait for tracee to finish its job and exit - calling %s()\n",
33331.1Skamil	    TWAIT_FNAME);
33341.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracee, &status, WNOHANG),
33351.1Skamil	    tracee);
33361.1Skamil
33371.1Skamil	validate_status_exited(status, exitval_tracee);
33381.1Skamil
33391.1Skamil	msg_close(&parent_tracer);
33401.1Skamil	msg_close(&parent_tracee);
33411.1Skamil}
33421.1Skamil#endif
33431.1Skamil
33441.1SkamilATF_TC(siginfo1);
33451.1SkamilATF_TC_HEAD(siginfo1, tc)
33461.1Skamil{
33471.1Skamil	atf_tc_set_md_var(tc, "descr",
33481.1Skamil	    "Verify basic PT_GET_SIGINFO call for SIGTRAP from tracee");
33491.1Skamil}
33501.1Skamil
33511.1SkamilATF_TC_BODY(siginfo1, tc)
33521.1Skamil{
33531.1Skamil	const int exitval = 5;
33541.1Skamil	const int sigval = SIGTRAP;
33551.1Skamil	pid_t child, wpid;
33561.1Skamil#if defined(TWAIT_HAVE_STATUS)
33571.1Skamil	int status;
33581.1Skamil#endif
33591.1Skamil	struct ptrace_siginfo info;
33601.1Skamil	memset(&info, 0, sizeof(info));
33611.1Skamil
33621.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
33631.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
33641.1Skamil	if (child == 0) {
33651.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
33661.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
33671.1Skamil
33681.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
33691.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
33701.1Skamil
33711.13Schristos		DPRINTF("Before exiting of the child process\n");
33721.1Skamil		_exit(exitval);
33731.1Skamil	}
33741.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
33751.1Skamil
33761.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
33771.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
33781.1Skamil
33791.1Skamil	validate_status_stopped(status, sigval);
33801.1Skamil
33811.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
33821.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
33831.1Skamil
33841.13Schristos	DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
33851.13Schristos	DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n",
33861.1Skamil	    info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
33871.1Skamil	    info.psi_siginfo.si_errno);
33881.1Skamil
33891.13Schristos	DPRINTF("Before resuming the child process where it left off and "
33901.1Skamil	    "without signal to be sent\n");
33911.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
33921.1Skamil
33931.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
33941.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
33951.1Skamil
33961.1Skamil	validate_status_exited(status, exitval);
33971.1Skamil
33981.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
33991.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
34001.1Skamil}
34011.1Skamil
34021.1SkamilATF_TC(siginfo2);
34031.1SkamilATF_TC_HEAD(siginfo2, tc)
34041.1Skamil{
34051.1Skamil	atf_tc_set_md_var(tc, "descr",
34061.1Skamil	    "Verify basic PT_GET_SIGINFO and PT_SET_SIGINFO calls without "
34071.1Skamil	    "modification of SIGINT from tracee");
34081.1Skamil}
34091.1Skamil
34101.1Skamilstatic int siginfo2_caught = 0;
34111.1Skamil
34121.1Skamilstatic void
34131.1Skamilsiginfo2_sighandler(int sig)
34141.1Skamil{
34151.1Skamil	FORKEE_ASSERT_EQ(sig, SIGINT);
34161.1Skamil
34171.1Skamil	++siginfo2_caught;
34181.1Skamil}
34191.1Skamil
34201.1SkamilATF_TC_BODY(siginfo2, tc)
34211.1Skamil{
34221.1Skamil	const int exitval = 5;
34231.1Skamil	const int sigval = SIGINT;
34241.1Skamil	pid_t child, wpid;
34251.1Skamil	struct sigaction sa;
34261.1Skamil#if defined(TWAIT_HAVE_STATUS)
34271.1Skamil	int status;
34281.1Skamil#endif
34291.1Skamil	struct ptrace_siginfo info;
34301.1Skamil	memset(&info, 0, sizeof(info));
34311.1Skamil
34321.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
34331.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
34341.1Skamil	if (child == 0) {
34351.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
34361.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
34371.1Skamil
34381.1Skamil		sa.sa_handler = siginfo2_sighandler;
34391.1Skamil		sa.sa_flags = SA_SIGINFO;
34401.1Skamil		sigemptyset(&sa.sa_mask);
34411.1Skamil
34421.1Skamil		FORKEE_ASSERT(sigaction(sigval, &sa, NULL) != -1);
34431.1Skamil
34441.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
34451.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
34461.1Skamil
34471.1Skamil		FORKEE_ASSERT_EQ(siginfo2_caught, 1);
34481.1Skamil
34491.13Schristos		DPRINTF("Before exiting of the child process\n");
34501.1Skamil		_exit(exitval);
34511.1Skamil	}
34521.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
34531.1Skamil
34541.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
34551.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
34561.1Skamil
34571.1Skamil	validate_status_stopped(status, sigval);
34581.1Skamil
34591.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
34601.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
34611.1Skamil
34621.13Schristos	DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
34631.13Schristos	DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n",
34641.1Skamil	    info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
34651.1Skamil	    info.psi_siginfo.si_errno);
34661.1Skamil
34671.13Schristos	DPRINTF("Before calling ptrace(2) with PT_SET_SIGINFO for child\n");
34681.61Skre	SYSCALL_REQUIRE(
34691.61Skre	    ptrace(PT_SET_SIGINFO, child, &info, sizeof(info)) != -1);
34701.1Skamil
34711.13Schristos	DPRINTF("Before resuming the child process where it left off and "
34721.1Skamil	    "without signal to be sent\n");
34731.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, sigval) != -1);
34741.1Skamil
34751.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
34761.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
34771.1Skamil
34781.1Skamil	validate_status_exited(status, exitval);
34791.1Skamil
34801.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
34811.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
34821.1Skamil}
34831.1Skamil
34841.1SkamilATF_TC(siginfo3);
34851.1SkamilATF_TC_HEAD(siginfo3, tc)
34861.1Skamil{
34871.1Skamil	atf_tc_set_md_var(tc, "descr",
34881.1Skamil	    "Verify basic PT_GET_SIGINFO and PT_SET_SIGINFO calls with "
34891.1Skamil	    "setting signal to new value");
34901.1Skamil}
34911.1Skamil
34921.1Skamilstatic int siginfo3_caught = 0;
34931.1Skamil
34941.1Skamilstatic void
34951.1Skamilsiginfo3_sigaction(int sig, siginfo_t *info, void *ctx)
34961.1Skamil{
34971.1Skamil	FORKEE_ASSERT_EQ(sig, SIGTRAP);
34981.1Skamil
34991.1Skamil	FORKEE_ASSERT_EQ(info->si_signo, SIGTRAP);
35001.1Skamil	FORKEE_ASSERT_EQ(info->si_code, TRAP_BRKPT);
35011.1Skamil
35021.1Skamil	++siginfo3_caught;
35031.1Skamil}
35041.1Skamil
35051.1SkamilATF_TC_BODY(siginfo3, tc)
35061.1Skamil{
35071.1Skamil	const int exitval = 5;
35081.1Skamil	const int sigval = SIGINT;
35091.1Skamil	const int sigfaked = SIGTRAP;
35101.1Skamil	const int sicodefaked = TRAP_BRKPT;
35111.1Skamil	pid_t child, wpid;
35121.1Skamil	struct sigaction sa;
35131.1Skamil#if defined(TWAIT_HAVE_STATUS)
35141.1Skamil	int status;
35151.1Skamil#endif
35161.1Skamil	struct ptrace_siginfo info;
35171.1Skamil	memset(&info, 0, sizeof(info));
35181.1Skamil
35191.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
35201.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
35211.1Skamil	if (child == 0) {
35221.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
35231.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
35241.1Skamil
35251.1Skamil		sa.sa_sigaction = siginfo3_sigaction;
35261.1Skamil		sa.sa_flags = SA_SIGINFO;
35271.1Skamil		sigemptyset(&sa.sa_mask);
35281.1Skamil
35291.1Skamil		FORKEE_ASSERT(sigaction(sigfaked, &sa, NULL) != -1);
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(siginfo3_caught, 1);
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.61Skre	SYSCALL_REQUIRE(
35481.61Skre	    ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
35491.1Skamil
35501.13Schristos	DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
35511.13Schristos	DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n",
35521.1Skamil	    info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
35531.1Skamil	    info.psi_siginfo.si_errno);
35541.1Skamil
35551.13Schristos	DPRINTF("Before setting new faked signal to signo=%d si_code=%d\n",
35561.1Skamil	    sigfaked, sicodefaked);
35571.1Skamil	info.psi_siginfo.si_signo = sigfaked;
35581.1Skamil	info.psi_siginfo.si_code = sicodefaked;
35591.1Skamil
35601.13Schristos	DPRINTF("Before calling ptrace(2) with PT_SET_SIGINFO for child\n");
35611.61Skre	SYSCALL_REQUIRE(
35621.61Skre	    ptrace(PT_SET_SIGINFO, child, &info, sizeof(info)) != -1);
35631.1Skamil
35641.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
35651.61Skre	SYSCALL_REQUIRE(
35661.61Skre	    ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
35671.1Skamil
35681.13Schristos	DPRINTF("Before checking siginfo_t\n");
35691.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigfaked);
35701.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, sicodefaked);
35711.1Skamil
35721.13Schristos	DPRINTF("Before resuming the child process where it left off and "
35731.1Skamil	    "without signal to be sent\n");
35741.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, sigfaked) != -1);
35751.1Skamil
35761.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
35771.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
35781.1Skamil
35791.1Skamil	validate_status_exited(status, exitval);
35801.1Skamil
35811.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
35821.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
35831.1Skamil}
35841.1Skamil
35851.1SkamilATF_TC(siginfo4);
35861.1SkamilATF_TC_HEAD(siginfo4, tc)
35871.1Skamil{
35881.1Skamil	atf_tc_set_md_var(tc, "descr",
35891.1Skamil	    "Detect SIGTRAP TRAP_EXEC from tracee");
35901.1Skamil}
35911.1Skamil
35921.1SkamilATF_TC_BODY(siginfo4, tc)
35931.1Skamil{
35941.1Skamil	const int sigval = SIGTRAP;
35951.1Skamil	pid_t child, wpid;
35961.1Skamil#if defined(TWAIT_HAVE_STATUS)
35971.1Skamil	int status;
35981.1Skamil#endif
35991.1Skamil
36001.1Skamil	struct ptrace_siginfo info;
36011.1Skamil	memset(&info, 0, sizeof(info));
36021.1Skamil
36031.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
36041.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
36051.1Skamil	if (child == 0) {
36061.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
36071.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
36081.1Skamil
36091.13Schristos		DPRINTF("Before calling execve(2) from child\n");
36101.1Skamil		execlp("/bin/echo", "/bin/echo", NULL);
36111.1Skamil
36121.1Skamil		FORKEE_ASSERT(0 && "Not reached");
36131.1Skamil	}
36141.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
36151.1Skamil
36161.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
36171.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
36181.1Skamil
36191.1Skamil	validate_status_stopped(status, sigval);
36201.1Skamil
36211.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
36221.61Skre	SYSCALL_REQUIRE(
36231.61Skre	    ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
36241.1Skamil
36251.13Schristos	DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
36261.13Schristos	DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n",
36271.1Skamil	    info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
36281.1Skamil	    info.psi_siginfo.si_errno);
36291.1Skamil
36301.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigval);
36311.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_EXEC);
36321.1Skamil
36331.13Schristos	DPRINTF("Before resuming the child process where it left off and "
36341.1Skamil	    "without signal to be sent\n");
36351.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
36361.1Skamil
36371.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
36381.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
36391.1Skamil
36401.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
36411.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
36421.1Skamil}
36431.1Skamil
36441.1Skamil#if defined(TWAIT_HAVE_PID)
36451.1SkamilATF_TC(siginfo5);
36461.1SkamilATF_TC_HEAD(siginfo5, tc)
36471.1Skamil{
36481.1Skamil	atf_tc_set_md_var(tc, "descr",
36491.1Skamil	    "Verify that fork(2) is intercepted by ptrace(2) with EVENT_MASK "
36501.1Skamil	    "set to PTRACE_FORK and reports correct signal information");
36511.1Skamil}
36521.1Skamil
36531.1SkamilATF_TC_BODY(siginfo5, tc)
36541.1Skamil{
36551.1Skamil	const int exitval = 5;
36561.1Skamil	const int exitval2 = 15;
36571.1Skamil	const int sigval = SIGSTOP;
36581.1Skamil	pid_t child, child2, wpid;
36591.1Skamil#if defined(TWAIT_HAVE_STATUS)
36601.1Skamil	int status;
36611.1Skamil#endif
36621.1Skamil	ptrace_state_t state;
36631.1Skamil	const int slen = sizeof(state);
36641.1Skamil	ptrace_event_t event;
36651.1Skamil	const int elen = sizeof(event);
36661.1Skamil	struct ptrace_siginfo info;
36671.1Skamil
36681.1Skamil	memset(&info, 0, sizeof(info));
36691.1Skamil
36701.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
36711.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
36721.1Skamil	if (child == 0) {
36731.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
36741.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
36751.1Skamil
36761.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
36771.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
36781.1Skamil
36791.1Skamil		FORKEE_ASSERT((child2 = fork()) != -1);
36801.1Skamil
36811.1Skamil		if (child2 == 0)
36821.1Skamil			_exit(exitval2);
36831.1Skamil
36841.1Skamil		FORKEE_REQUIRE_SUCCESS
36851.1Skamil		    (wpid = TWAIT_GENERIC(child2, &status, 0), child2);
36861.1Skamil
36871.1Skamil		forkee_status_exited(status, exitval2);
36881.1Skamil
36891.13Schristos		DPRINTF("Before exiting of the child process\n");
36901.1Skamil		_exit(exitval);
36911.1Skamil	}
36921.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
36931.1Skamil
36941.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
36951.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
36961.1Skamil
36971.1Skamil	validate_status_stopped(status, sigval);
36981.1Skamil
36991.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
37001.61Skre	SYSCALL_REQUIRE(
37011.61Skre	    ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
37021.1Skamil
37031.13Schristos	DPRINTF("Before checking siginfo_t\n");
37041.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigval);
37051.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, SI_LWP);
37061.1Skamil
37071.13Schristos	DPRINTF("Enable PTRACE_FORK in EVENT_MASK for the child %d\n", child);
37081.1Skamil	event.pe_set_event = PTRACE_FORK;
37091.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);
37101.1Skamil
37111.13Schristos	DPRINTF("Before resuming the child process where it left off and "
37121.1Skamil	    "without signal to be sent\n");
37131.13Schristos        DPRINTF("We expect two SIGTRAP events, for child %d (TRAP_CHLD, "
37141.1Skamil               "pe_report_event=PTRACE_FORK, state.pe_other_pid=child2) and "
37151.1Skamil               "for child2 (TRAP_CHLD, pe_report_event=PTRACE_FORK, "
37161.1Skamil                "state.pe_other_pid=child)\n", child);
37171.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
37181.1Skamil
37191.13Schristos	DPRINTF("Before calling %s() for the child %d\n", TWAIT_FNAME, child);
37201.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
37211.1Skamil
37221.1Skamil	validate_status_stopped(status, SIGTRAP);
37231.1Skamil
37241.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
37251.61Skre	SYSCALL_REQUIRE(
37261.61Skre	    ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
37271.1Skamil
37281.13Schristos	DPRINTF("Before checking siginfo_t\n");
37291.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, SIGTRAP);
37301.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_CHLD);
37311.1Skamil
37321.61Skre	SYSCALL_REQUIRE(
37331.61Skre	    ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
37341.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_FORK);
37351.1Skamil
37361.1Skamil	child2 = state.pe_other_pid;
37371.13Schristos	DPRINTF("Reported PTRACE_FORK event with forkee %d\n", child2);
37381.1Skamil
37391.13Schristos	DPRINTF("Before calling %s() for the forkee %d of the child %d\n",
37401.1Skamil	    TWAIT_FNAME, child2, child);
37411.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0),
37421.1Skamil	    child2);
37431.1Skamil
37441.1Skamil	validate_status_stopped(status, SIGTRAP);
37451.1Skamil
37461.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
37471.61Skre	SYSCALL_REQUIRE(
37481.61Skre	    ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
37491.1Skamil
37501.13Schristos	DPRINTF("Before checking siginfo_t\n");
37511.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, SIGTRAP);
37521.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_CHLD);
37531.1Skamil
37541.61Skre	SYSCALL_REQUIRE(
37551.61Skre	    ptrace(PT_GET_PROCESS_STATE, child2, &state, slen) != -1);
37561.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_FORK);
37571.1Skamil	ATF_REQUIRE_EQ(state.pe_other_pid, child);
37581.1Skamil
37591.13Schristos	DPRINTF("Before resuming the forkee process where it left off and "
37601.1Skamil	    "without signal to be sent\n");
37611.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child2, (void *)1, 0) != -1);
37621.1Skamil
37631.13Schristos	DPRINTF("Before resuming the child process where it left off and "
37641.1Skamil	    "without signal to be sent\n");
37651.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
37661.1Skamil
37671.13Schristos	DPRINTF("Before calling %s() for the forkee - expected exited\n",
37681.1Skamil	    TWAIT_FNAME);
37691.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0),
37701.1Skamil	    child2);
37711.1Skamil
37721.1Skamil	validate_status_exited(status, exitval2);
37731.1Skamil
37741.13Schristos	DPRINTF("Before calling %s() for the forkee - expected no process\n",
37751.1Skamil	    TWAIT_FNAME);
37761.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD,
37771.1Skamil	    wpid = TWAIT_GENERIC(child2, &status, 0));
37781.1Skamil
37791.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
37801.1Skamil	    "SIGCHLD\n", TWAIT_FNAME);
37811.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
37821.1Skamil
37831.1Skamil	validate_status_stopped(status, SIGCHLD);
37841.1Skamil
37851.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
37861.61Skre	SYSCALL_REQUIRE(
37871.61Skre	    ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
37881.1Skamil
37891.13Schristos	DPRINTF("Before checking siginfo_t\n");
37901.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, SIGCHLD);
37911.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, CLD_EXITED);
37921.1Skamil
37931.13Schristos	DPRINTF("Before resuming the child process where it left off and "
37941.1Skamil	    "without signal to be sent\n");
37951.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
37961.1Skamil
37971.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
37981.1Skamil	    TWAIT_FNAME);
37991.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
38001.1Skamil
38011.1Skamil	validate_status_exited(status, exitval);
38021.1Skamil
38031.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
38041.1Skamil	    TWAIT_FNAME);
38051.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
38061.1Skamil}
38071.1Skamil#endif
38081.1Skamil
38091.1Skamil#if defined(PT_STEP)
38101.1SkamilATF_TC(siginfo6);
38111.1SkamilATF_TC_HEAD(siginfo6, tc)
38121.1Skamil{
38131.1Skamil	atf_tc_set_md_var(tc, "descr",
38141.1Skamil	    "Verify single PT_STEP call with signal information check");
38151.1Skamil}
38161.1Skamil
38171.1SkamilATF_TC_BODY(siginfo6, tc)
38181.1Skamil{
38191.1Skamil	const int exitval = 5;
38201.1Skamil	const int sigval = SIGSTOP;
38211.1Skamil	pid_t child, wpid;
38221.1Skamil#if defined(TWAIT_HAVE_STATUS)
38231.1Skamil	int status;
38241.1Skamil#endif
38251.1Skamil	int happy;
38261.1Skamil	struct ptrace_siginfo info;
38271.1Skamil
38281.1Skamil#if defined(__arm__)
38291.1Skamil	/* PT_STEP not supported on arm 32-bit */
38301.1Skamil	atf_tc_expect_fail("PR kern/52119");
38311.1Skamil#endif
38321.1Skamil
38331.1Skamil	memset(&info, 0, sizeof(info));
38341.1Skamil
38351.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
38361.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
38371.1Skamil	if (child == 0) {
38381.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
38391.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
38401.1Skamil
38411.1Skamil		happy = check_happy(100);
38421.1Skamil
38431.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
38441.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
38451.1Skamil
38461.1Skamil		FORKEE_ASSERT_EQ(happy, check_happy(100));
38471.1Skamil
38481.13Schristos		DPRINTF("Before exiting of the child process\n");
38491.1Skamil		_exit(exitval);
38501.1Skamil	}
38511.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
38521.1Skamil
38531.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
38541.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
38551.1Skamil
38561.1Skamil	validate_status_stopped(status, sigval);
38571.1Skamil
38581.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
38591.61Skre	SYSCALL_REQUIRE(
38601.61Skre	    ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
38611.1Skamil
38621.13Schristos	DPRINTF("Before checking siginfo_t\n");
38631.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigval);
38641.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, SI_LWP);
38651.1Skamil
38661.13Schristos	DPRINTF("Before resuming the child process where it left off and "
38671.1Skamil	    "without signal to be sent (use PT_STEP)\n");
38681.13Schristos	SYSCALL_REQUIRE(ptrace(PT_STEP, child, (void *)1, 0) != -1);
38691.1Skamil
38701.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
38711.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
38721.1Skamil
38731.1Skamil	validate_status_stopped(status, SIGTRAP);
38741.1Skamil
38751.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
38761.61Skre	SYSCALL_REQUIRE(
38771.61Skre	    ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
38781.1Skamil
38791.13Schristos	DPRINTF("Before checking siginfo_t\n");
38801.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, SIGTRAP);
38811.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_TRACE);
38821.1Skamil
38831.13Schristos	DPRINTF("Before resuming the child process where it left off and "
38841.1Skamil	    "without signal to be sent\n");
38851.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
38861.1Skamil
38871.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
38881.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
38891.1Skamil
38901.1Skamil	validate_status_exited(status, exitval);
38911.1Skamil
38921.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
38931.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
38941.1Skamil}
38951.1Skamil#endif
38961.1Skamil
38971.1Skamilvolatile lwpid_t the_lwp_id = 0;
38981.1Skamil
38991.1Skamilstatic void
39001.1Skamillwp_main_func(void *arg)
39011.1Skamil{
39021.1Skamil	the_lwp_id = _lwp_self();
39031.1Skamil	_lwp_exit();
39041.1Skamil}
39051.1Skamil
39061.1SkamilATF_TC(lwp_create1);
39071.1SkamilATF_TC_HEAD(lwp_create1, tc)
39081.1Skamil{
39091.1Skamil	atf_tc_set_md_var(tc, "descr",
39101.1Skamil	    "Verify that 1 LWP creation is intercepted by ptrace(2) with "
39111.1Skamil	    "EVENT_MASK set to PTRACE_LWP_CREATE");
39121.1Skamil}
39131.1Skamil
39141.1SkamilATF_TC_BODY(lwp_create1, tc)
39151.1Skamil{
39161.1Skamil	const int exitval = 5;
39171.1Skamil	const int sigval = SIGSTOP;
39181.1Skamil	pid_t child, wpid;
39191.1Skamil#if defined(TWAIT_HAVE_STATUS)
39201.1Skamil	int status;
39211.1Skamil#endif
39221.1Skamil	ptrace_state_t state;
39231.1Skamil	const int slen = sizeof(state);
39241.1Skamil	ptrace_event_t event;
39251.1Skamil	const int elen = sizeof(event);
39261.1Skamil	ucontext_t uc;
39271.1Skamil	lwpid_t lid;
39281.1Skamil	static const size_t ssize = 16*1024;
39291.1Skamil	void *stack;
39301.1Skamil
39311.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
39321.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
39331.1Skamil	if (child == 0) {
39341.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
39351.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
39361.1Skamil
39371.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
39381.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
39391.1Skamil
39401.13Schristos		DPRINTF("Before allocating memory for stack in child\n");
39411.1Skamil		FORKEE_ASSERT((stack = malloc(ssize)) != NULL);
39421.1Skamil
39431.13Schristos		DPRINTF("Before making context for new lwp in child\n");
39441.1Skamil		_lwp_makecontext(&uc, lwp_main_func, NULL, NULL, stack, ssize);
39451.1Skamil
39461.13Schristos		DPRINTF("Before creating new in child\n");
39471.1Skamil		FORKEE_ASSERT(_lwp_create(&uc, 0, &lid) == 0);
39481.1Skamil
39491.13Schristos		DPRINTF("Before waiting for lwp %d to exit\n", lid);
39501.1Skamil		FORKEE_ASSERT(_lwp_wait(lid, NULL) == 0);
39511.1Skamil
39521.13Schristos		DPRINTF("Before verifying that reported %d and running lid %d "
39531.1Skamil		    "are the same\n", lid, the_lwp_id);
39541.1Skamil		FORKEE_ASSERT_EQ(lid, the_lwp_id);
39551.1Skamil
39561.13Schristos		DPRINTF("Before exiting of the child process\n");
39571.1Skamil		_exit(exitval);
39581.1Skamil	}
39591.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
39601.1Skamil
39611.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
39621.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
39631.1Skamil
39641.1Skamil	validate_status_stopped(status, sigval);
39651.1Skamil
39661.13Schristos	DPRINTF("Set empty EVENT_MASK for the child %d\n", child);
39671.1Skamil	event.pe_set_event = PTRACE_LWP_CREATE;
39681.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);
39691.1Skamil
39701.13Schristos	DPRINTF("Before resuming the child process where it left off and "
39711.1Skamil	    "without signal to be sent\n");
39721.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
39731.1Skamil
39741.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
39751.1Skamil	    "SIGTRAP\n", TWAIT_FNAME);
39761.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
39771.1Skamil
39781.1Skamil	validate_status_stopped(status, SIGTRAP);
39791.1Skamil
39801.61Skre	SYSCALL_REQUIRE(
39811.61Skre	    ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
39821.1Skamil
39831.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_LWP_CREATE);
39841.1Skamil
39851.1Skamil	lid = state.pe_lwp;
39861.13Schristos	DPRINTF("Reported PTRACE_LWP_CREATE event with lid %d\n", lid);
39871.1Skamil
39881.13Schristos	DPRINTF("Before resuming the child process where it left off and "
39891.1Skamil	    "without signal to be sent\n");
39901.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
39911.1Skamil
39921.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
39931.1Skamil	    TWAIT_FNAME);
39941.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
39951.1Skamil
39961.1Skamil	validate_status_exited(status, exitval);
39971.1Skamil
39981.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
39991.1Skamil	    TWAIT_FNAME);
40001.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
40011.1Skamil}
40021.1Skamil
40031.1SkamilATF_TC(lwp_exit1);
40041.1SkamilATF_TC_HEAD(lwp_exit1, tc)
40051.1Skamil{
40061.1Skamil	atf_tc_set_md_var(tc, "descr",
40071.1Skamil	    "Verify that 1 LWP creation is intercepted by ptrace(2) with "
40081.1Skamil	    "EVENT_MASK set to PTRACE_LWP_EXIT");
40091.1Skamil}
40101.1Skamil
40111.1SkamilATF_TC_BODY(lwp_exit1, tc)
40121.1Skamil{
40131.1Skamil	const int exitval = 5;
40141.1Skamil	const int sigval = SIGSTOP;
40151.1Skamil	pid_t child, wpid;
40161.1Skamil#if defined(TWAIT_HAVE_STATUS)
40171.1Skamil	int status;
40181.1Skamil#endif
40191.1Skamil	ptrace_state_t state;
40201.1Skamil	const int slen = sizeof(state);
40211.1Skamil	ptrace_event_t event;
40221.1Skamil	const int elen = sizeof(event);
40231.1Skamil	ucontext_t uc;
40241.1Skamil	lwpid_t lid;
40251.1Skamil	static const size_t ssize = 16*1024;
40261.1Skamil	void *stack;
40271.1Skamil
40281.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
40291.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
40301.1Skamil	if (child == 0) {
40311.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
40321.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
40331.1Skamil
40341.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
40351.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
40361.1Skamil
40371.13Schristos		DPRINTF("Before allocating memory for stack in child\n");
40381.1Skamil		FORKEE_ASSERT((stack = malloc(ssize)) != NULL);
40391.1Skamil
40401.13Schristos		DPRINTF("Before making context for new lwp in child\n");
40411.1Skamil		_lwp_makecontext(&uc, lwp_main_func, NULL, NULL, stack, ssize);
40421.1Skamil
40431.13Schristos		DPRINTF("Before creating new in child\n");
40441.1Skamil		FORKEE_ASSERT(_lwp_create(&uc, 0, &lid) == 0);
40451.1Skamil
40461.13Schristos		DPRINTF("Before waiting for lwp %d to exit\n", lid);
40471.1Skamil		FORKEE_ASSERT(_lwp_wait(lid, NULL) == 0);
40481.1Skamil
40491.13Schristos		DPRINTF("Before verifying that reported %d and running lid %d "
40501.1Skamil		    "are the same\n", lid, the_lwp_id);
40511.1Skamil		FORKEE_ASSERT_EQ(lid, the_lwp_id);
40521.1Skamil
40531.13Schristos		DPRINTF("Before exiting of the child process\n");
40541.1Skamil		_exit(exitval);
40551.1Skamil	}
40561.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
40571.1Skamil
40581.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
40591.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
40601.1Skamil
40611.1Skamil	validate_status_stopped(status, sigval);
40621.1Skamil
40631.13Schristos	DPRINTF("Set empty EVENT_MASK for the child %d\n", child);
40641.1Skamil	event.pe_set_event = PTRACE_LWP_EXIT;
40651.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);
40661.1Skamil
40671.13Schristos	DPRINTF("Before resuming the child process where it left off and "
40681.1Skamil	    "without signal to be sent\n");
40691.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
40701.1Skamil
40711.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
40721.1Skamil	    "SIGTRAP\n", TWAIT_FNAME);
40731.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
40741.1Skamil
40751.1Skamil	validate_status_stopped(status, SIGTRAP);
40761.1Skamil
40771.61Skre	SYSCALL_REQUIRE(
40781.61Skre	    ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
40791.1Skamil
40801.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_LWP_EXIT);
40811.1Skamil
40821.1Skamil	lid = state.pe_lwp;
40831.13Schristos	DPRINTF("Reported PTRACE_LWP_EXIT event with lid %d\n", lid);
40841.1Skamil
40851.13Schristos	DPRINTF("Before resuming the child process where it left off and "
40861.1Skamil	    "without signal to be sent\n");
40871.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
40881.1Skamil
40891.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
40901.1Skamil	    TWAIT_FNAME);
40911.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
40921.1Skamil
40931.1Skamil	validate_status_exited(status, exitval);
40941.1Skamil
40951.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
40961.1Skamil	    TWAIT_FNAME);
40971.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
40981.1Skamil}
40991.1Skamil
41001.1SkamilATF_TC(signal1);
41011.1SkamilATF_TC_HEAD(signal1, tc)
41021.1Skamil{
41031.1Skamil	atf_tc_set_md_var(tc, "descr",
41041.1Skamil	    "Verify that masking single unrelated signal does not stop tracer "
41051.1Skamil	    "from catching other signals");
41061.1Skamil}
41071.1Skamil
41081.1SkamilATF_TC_BODY(signal1, tc)
41091.1Skamil{
41101.1Skamil	const int exitval = 5;
41111.1Skamil	const int sigval = SIGSTOP;
41121.1Skamil	const int sigmasked = SIGTRAP;
41131.1Skamil	const int signotmasked = SIGINT;
41141.1Skamil	pid_t child, wpid;
41151.1Skamil#if defined(TWAIT_HAVE_STATUS)
41161.1Skamil	int status;
41171.1Skamil#endif
41181.1Skamil	sigset_t intmask;
41191.1Skamil
41201.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
41211.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
41221.1Skamil	if (child == 0) {
41231.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
41241.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
41251.1Skamil
41261.1Skamil		sigemptyset(&intmask);
41271.1Skamil		sigaddset(&intmask, sigmasked);
41281.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
41291.1Skamil
41301.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
41311.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
41321.1Skamil
41331.13Schristos		DPRINTF("Before raising %s from child\n",
41341.1Skamil		    strsignal(signotmasked));
41351.1Skamil		FORKEE_ASSERT(raise(signotmasked) == 0);
41361.1Skamil
41371.13Schristos		DPRINTF("Before exiting of the child process\n");
41381.1Skamil		_exit(exitval);
41391.1Skamil	}
41401.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
41411.1Skamil
41421.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
41431.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
41441.1Skamil
41451.1Skamil	validate_status_stopped(status, sigval);
41461.1Skamil
41471.13Schristos	DPRINTF("Before resuming the child process where it left off and "
41481.1Skamil	    "without signal to be sent\n");
41491.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
41501.1Skamil
41511.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
41521.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
41531.1Skamil
41541.1Skamil	validate_status_stopped(status, signotmasked);
41551.1Skamil
41561.13Schristos	DPRINTF("Before resuming the child process where it left off and "
41571.1Skamil	    "without signal to be sent\n");
41581.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
41591.1Skamil
41601.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
41611.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
41621.1Skamil
41631.1Skamil	validate_status_exited(status, exitval);
41641.1Skamil
41651.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
41661.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
41671.1Skamil}
41681.1Skamil
41691.1SkamilATF_TC(signal2);
41701.1SkamilATF_TC_HEAD(signal2, tc)
41711.1Skamil{
41721.1Skamil	atf_tc_set_md_var(tc, "descr",
41731.1Skamil	    "Verify that masking SIGTRAP in tracee stops tracer from "
41741.1Skamil	    "catching this raised signal");
41751.1Skamil}
41761.1Skamil
41771.1SkamilATF_TC_BODY(signal2, tc)
41781.1Skamil{
41791.1Skamil	const int exitval = 5;
41801.1Skamil	const int sigval = SIGSTOP;
41811.1Skamil	const int sigmasked = SIGTRAP;
41821.1Skamil	pid_t child, wpid;
41831.1Skamil#if defined(TWAIT_HAVE_STATUS)
41841.1Skamil	int status;
41851.1Skamil#endif
41861.1Skamil	sigset_t intmask;
41871.1Skamil
41881.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
41891.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
41901.1Skamil	if (child == 0) {
41911.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
41921.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
41931.1Skamil
41941.1Skamil		sigemptyset(&intmask);
41951.1Skamil		sigaddset(&intmask, sigmasked);
41961.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
41971.1Skamil
41981.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
41991.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
42001.1Skamil
42011.13Schristos		DPRINTF("Before raising %s breakpoint from child\n",
42021.1Skamil		    strsignal(sigmasked));
42031.1Skamil		FORKEE_ASSERT(raise(sigmasked) == 0);
42041.1Skamil
42051.13Schristos		DPRINTF("Before exiting of the child process\n");
42061.1Skamil		_exit(exitval);
42071.1Skamil	}
42081.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
42091.1Skamil
42101.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
42111.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
42121.1Skamil
42131.1Skamil	validate_status_stopped(status, sigval);
42141.1Skamil
42151.13Schristos	DPRINTF("Before resuming the child process where it left off and "
42161.1Skamil	    "without signal to be sent\n");
42171.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
42181.1Skamil
42191.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
42201.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
42211.1Skamil
42221.1Skamil	validate_status_exited(status, exitval);
42231.1Skamil
42241.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
42251.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
42261.1Skamil}
42271.1Skamil
42281.1SkamilATF_TC(signal3);
42291.1SkamilATF_TC_HEAD(signal3, tc)
42301.1Skamil{
42311.7Skamil	atf_tc_set_md_var(tc, "timeout", "5");
42321.1Skamil	atf_tc_set_md_var(tc, "descr",
42331.1Skamil	    "Verify that masking SIGTRAP in tracee does not stop tracer from "
42341.1Skamil	    "catching software breakpoints");
42351.1Skamil}
42361.1Skamil
42371.1SkamilATF_TC_BODY(signal3, tc)
42381.1Skamil{
42391.1Skamil	const int exitval = 5;
42401.1Skamil	const int sigval = SIGSTOP;
42411.1Skamil	const int sigmasked = SIGTRAP;
42421.1Skamil	pid_t child, wpid;
42431.1Skamil#if defined(TWAIT_HAVE_STATUS)
42441.1Skamil	int status;
42451.1Skamil#endif
42461.1Skamil	sigset_t intmask;
42471.1Skamil
42481.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
42491.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
42501.1Skamil	if (child == 0) {
42511.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
42521.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
42531.1Skamil
42541.1Skamil		sigemptyset(&intmask);
42551.1Skamil		sigaddset(&intmask, sigmasked);
42561.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
42571.1Skamil
42581.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
42591.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
42601.1Skamil
42611.13Schristos		DPRINTF("Before raising software breakpoint from child\n");
42621.52Skamil		trigger_trap();
42631.1Skamil
42641.13Schristos		DPRINTF("Before exiting of the child process\n");
42651.1Skamil		_exit(exitval);
42661.1Skamil	}
42671.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
42681.1Skamil
42691.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
42701.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
42711.1Skamil
42721.1Skamil	validate_status_stopped(status, sigval);
42731.1Skamil
42741.13Schristos	DPRINTF("Before resuming the child process where it left off and "
42751.1Skamil	    "without signal to be sent\n");
42761.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
42771.1Skamil
42781.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
42791.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
42801.1Skamil
42811.1Skamil	validate_status_stopped(status, sigmasked);
42821.1Skamil
42831.13Schristos	DPRINTF("Before resuming the child process where it left off and "
42841.1Skamil	    "without signal to be sent\n");
42851.49Skamil	SYSCALL_REQUIRE(ptrace(PT_KILL, child, NULL, 0) != -1);
42861.1Skamil
42871.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
42881.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
42891.1Skamil
42901.49Skamil	validate_status_signaled(status, SIGKILL, 0);
42911.1Skamil
42921.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
42931.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
42941.1Skamil}
42951.1Skamil
42961.1Skamil#if defined(PT_STEP)
42971.1SkamilATF_TC(signal4);
42981.1SkamilATF_TC_HEAD(signal4, tc)
42991.1Skamil{
43001.1Skamil	atf_tc_set_md_var(tc, "descr",
43011.1Skamil	    "Verify that masking SIGTRAP in tracee does not stop tracer from "
43021.1Skamil	    "catching single step trap");
43031.1Skamil}
43041.1Skamil
43051.1SkamilATF_TC_BODY(signal4, tc)
43061.1Skamil{
43071.1Skamil	const int exitval = 5;
43081.1Skamil	const int sigval = SIGSTOP;
43091.1Skamil	const int sigmasked = SIGTRAP;
43101.1Skamil	pid_t child, wpid;
43111.1Skamil#if defined(TWAIT_HAVE_STATUS)
43121.1Skamil	int status;
43131.1Skamil#endif
43141.1Skamil	sigset_t intmask;
43151.1Skamil	int happy;
43161.1Skamil
43171.1Skamil#if defined(__arm__)
43181.5Skamil	/* PT_STEP not supported on arm 32-bit */
43191.5Skamil	atf_tc_expect_fail("PR kern/51918 PR kern/52119");
43201.1Skamil#endif
43211.1Skamil
43221.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
43231.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
43241.1Skamil	if (child == 0) {
43251.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
43261.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
43271.1Skamil
43281.1Skamil		happy = check_happy(100);
43291.1Skamil
43301.1Skamil		sigemptyset(&intmask);
43311.1Skamil		sigaddset(&intmask, sigmasked);
43321.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
43331.1Skamil
43341.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
43351.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
43361.1Skamil
43371.1Skamil		FORKEE_ASSERT_EQ(happy, check_happy(100));
43381.1Skamil
43391.13Schristos		DPRINTF("Before exiting of the child process\n");
43401.1Skamil		_exit(exitval);
43411.1Skamil	}
43421.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
43431.1Skamil
43441.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
43451.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
43461.1Skamil
43471.1Skamil	validate_status_stopped(status, sigval);
43481.1Skamil
43491.13Schristos	DPRINTF("Before resuming the child process where it left off and "
43501.1Skamil	    "without signal to be sent\n");
43511.13Schristos	SYSCALL_REQUIRE(ptrace(PT_STEP, child, (void *)1, 0) != -1);
43521.1Skamil
43531.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
43541.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
43551.1Skamil
43561.1Skamil	validate_status_stopped(status, sigmasked);
43571.1Skamil
43581.13Schristos	DPRINTF("Before resuming the child process where it left off and "
43591.1Skamil	    "without signal to be sent\n");
43601.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
43611.1Skamil
43621.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
43631.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
43641.1Skamil
43651.1Skamil	validate_status_exited(status, exitval);
43661.1Skamil
43671.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
43681.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
43691.1Skamil}
43701.1Skamil#endif
43711.1Skamil
43721.1SkamilATF_TC(signal5);
43731.1SkamilATF_TC_HEAD(signal5, tc)
43741.1Skamil{
43751.1Skamil	atf_tc_set_md_var(tc, "descr",
43761.1Skamil	    "Verify that masking SIGTRAP in tracee does not stop tracer from "
43771.1Skamil	    "catching exec() breakpoint");
43781.1Skamil}
43791.1Skamil
43801.1SkamilATF_TC_BODY(signal5, tc)
43811.1Skamil{
43821.1Skamil	const int sigval = SIGSTOP;
43831.1Skamil	const int sigmasked = SIGTRAP;
43841.1Skamil	pid_t child, wpid;
43851.1Skamil#if defined(TWAIT_HAVE_STATUS)
43861.1Skamil	int status;
43871.1Skamil#endif
43881.58Skamil	struct ptrace_siginfo info;
43891.1Skamil	sigset_t intmask;
43901.1Skamil
43911.58Skamil	memset(&info, 0, sizeof(info));
43921.14Schristos
43931.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
43941.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
43951.1Skamil	if (child == 0) {
43961.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
43971.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
43981.1Skamil
43991.1Skamil		sigemptyset(&intmask);
44001.1Skamil		sigaddset(&intmask, sigmasked);
44011.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
44021.1Skamil
44031.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
44041.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
44051.1Skamil
44061.13Schristos		DPRINTF("Before calling execve(2) from child\n");
44071.1Skamil		execlp("/bin/echo", "/bin/echo", NULL);
44081.1Skamil
44091.58Skamil		/* NOTREACHED */
44101.58Skamil		FORKEE_ASSERTX(0 && "Not reached");
44111.1Skamil	}
44121.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
44131.1Skamil
44141.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
44151.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
44161.1Skamil
44171.1Skamil	validate_status_stopped(status, sigval);
44181.1Skamil
44191.13Schristos	DPRINTF("Before resuming the child process where it left off and "
44201.1Skamil	    "without signal to be sent\n");
44211.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
44221.1Skamil
44231.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
44241.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
44251.1Skamil
44261.1Skamil	validate_status_stopped(status, sigmasked);
44271.1Skamil
44281.58Skamil	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
44291.61Skre	SYSCALL_REQUIRE(
44301.61Skre	    ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
44311.58Skamil
44321.58Skamil	DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
44331.58Skamil	DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n",
44341.58Skamil	    info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
44351.58Skamil	    info.psi_siginfo.si_errno);
44361.58Skamil
44371.58Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigmasked);
44381.58Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_EXEC);
44391.58Skamil
44401.13Schristos	DPRINTF("Before resuming the child process where it left off and "
44411.1Skamil	    "without signal to be sent\n");
44421.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
44431.1Skamil
44441.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
44451.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
44461.1Skamil
44471.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
44481.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
44491.1Skamil}
44501.1Skamil
44511.1Skamil#if defined(TWAIT_HAVE_PID)
44521.1SkamilATF_TC(signal6);
44531.1SkamilATF_TC_HEAD(signal6, tc)
44541.1Skamil{
44551.1Skamil	atf_tc_set_md_var(tc, "timeout", "5");
44561.1Skamil	atf_tc_set_md_var(tc, "descr",
44571.1Skamil	    "Verify that masking SIGTRAP in tracee does not stop tracer from "
44581.1Skamil	    "catching PTRACE_FORK breakpoint");
44591.1Skamil}
44601.1Skamil
44611.1SkamilATF_TC_BODY(signal6, tc)
44621.1Skamil{
44631.1Skamil	const int exitval = 5;
44641.1Skamil	const int exitval2 = 15;
44651.1Skamil	const int sigval = SIGSTOP;
44661.1Skamil	const int sigmasked = SIGTRAP;
44671.1Skamil	pid_t child, child2, wpid;
44681.1Skamil#if defined(TWAIT_HAVE_STATUS)
44691.1Skamil	int status;
44701.1Skamil#endif
44711.1Skamil	sigset_t intmask;
44721.1Skamil	ptrace_state_t state;
44731.1Skamil	const int slen = sizeof(state);
44741.1Skamil	ptrace_event_t event;
44751.1Skamil	const int elen = sizeof(event);
44761.1Skamil
44771.38Skamil	atf_tc_expect_fail("PR kern/51918");
44781.14Schristos
44791.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
44801.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
44811.1Skamil	if (child == 0) {
44821.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
44831.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
44841.1Skamil
44851.1Skamil		sigemptyset(&intmask);
44861.1Skamil		sigaddset(&intmask, sigmasked);
44871.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
44881.1Skamil
44891.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
44901.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
44911.1Skamil
44921.1Skamil		FORKEE_ASSERT((child2 = fork()) != -1);
44931.1Skamil
44941.1Skamil		if (child2 == 0)
44951.1Skamil			_exit(exitval2);
44961.1Skamil
44971.1Skamil		FORKEE_REQUIRE_SUCCESS
44981.1Skamil			(wpid = TWAIT_GENERIC(child2, &status, 0), child2);
44991.1Skamil
45001.1Skamil		forkee_status_exited(status, exitval2);
45011.1Skamil
45021.13Schristos		DPRINTF("Before exiting of the child process\n");
45031.1Skamil		_exit(exitval);
45041.1Skamil	}
45051.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
45061.1Skamil
45071.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
45081.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
45091.1Skamil
45101.1Skamil	validate_status_stopped(status, sigval);
45111.1Skamil
45121.13Schristos	DPRINTF("Enable PTRACE_FORK in EVENT_MASK for the child %d\n", child);
45131.1Skamil	event.pe_set_event = PTRACE_FORK;
45141.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);
45151.1Skamil
45161.13Schristos	DPRINTF("Before resuming the child process where it left off and "
45171.1Skamil	    "without signal to be sent\n");
45181.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
45191.1Skamil
45201.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
45211.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
45221.1Skamil
45231.1Skamil	validate_status_stopped(status, sigmasked);
45241.1Skamil
45251.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
45261.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_FORK);
45271.1Skamil
45281.1Skamil	child2 = state.pe_other_pid;
45291.13Schristos	DPRINTF("Reported PTRACE_FORK event with forkee %d\n", child2);
45301.1Skamil
45311.13Schristos	DPRINTF("Before calling %s() for the child2\n", TWAIT_FNAME);
45321.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0),
45331.1Skamil	    child2);
45341.1Skamil
45351.1Skamil	validate_status_stopped(status, SIGTRAP);
45361.1Skamil
45371.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child2, &state, slen) != -1);
45381.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_FORK);
45391.1Skamil	ATF_REQUIRE_EQ(state.pe_other_pid, child);
45401.1Skamil
45411.13Schristos	DPRINTF("Before resuming the forkee process where it left off and "
45421.1Skamil	    "without signal to be sent\n");
45431.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child2, (void *)1, 0) != -1);
45441.1Skamil
45451.13Schristos	DPRINTF("Before resuming the child process where it left off and "
45461.1Skamil	    "without signal to be sent\n");
45471.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
45481.1Skamil
45491.13Schristos	DPRINTF("Before calling %s() for the forkee - expected exited\n",
45501.1Skamil	    TWAIT_FNAME);
45511.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0),
45521.57Skamil	    child2);
45531.1Skamil
45541.1Skamil	validate_status_exited(status, exitval2);
45551.1Skamil
45561.13Schristos	DPRINTF("Before calling %s() for the forkee - expected no process\n",
45571.1Skamil	    TWAIT_FNAME);
45581.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD,
45591.1Skamil	    wpid = TWAIT_GENERIC(child2, &status, 0));
45601.1Skamil
45611.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
45621.1Skamil	    "SIGCHLD\n", TWAIT_FNAME);
45631.57Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
45641.1Skamil
45651.1Skamil	validate_status_stopped(status, SIGCHLD);
45661.1Skamil
45671.57Skamil	DPRINTF("Before resuming the child process where it left off and "
45681.1Skamil	    "without signal to be sent\n");
45691.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
45701.1Skamil
45711.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
45721.1Skamil	    TWAIT_FNAME);
45731.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
45741.1Skamil
45751.1Skamil	validate_status_exited(status, exitval);
45761.1Skamil
45771.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
45781.57Skamil	    TWAIT_FNAME);
45791.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
45801.1Skamil}
45811.1Skamil#endif
45821.1Skamil
45831.1Skamil#if defined(TWAIT_HAVE_PID)
45841.1SkamilATF_TC(signal7);
45851.1SkamilATF_TC_HEAD(signal7, tc)
45861.1Skamil{
45871.1Skamil	atf_tc_set_md_var(tc, "descr",
45881.1Skamil	    "Verify that masking SIGTRAP in tracee does not stop tracer from "
45891.1Skamil	    "catching PTRACE_VFORK breakpoint");
45901.1Skamil}
45911.1Skamil
45921.1SkamilATF_TC_BODY(signal7, tc)
45931.1Skamil{
45941.1Skamil	const int exitval = 5;
45951.1Skamil	const int exitval2 = 15;
45961.1Skamil	const int sigval = SIGSTOP;
45971.1Skamil	const int sigmasked = SIGTRAP;
45981.1Skamil	pid_t child, child2, wpid;
45991.1Skamil#if defined(TWAIT_HAVE_STATUS)
46001.1Skamil	int status;
46011.1Skamil#endif
46021.1Skamil	sigset_t intmask;
46031.1Skamil	ptrace_state_t state;
46041.1Skamil	const int slen = sizeof(state);
46051.1Skamil	ptrace_event_t event;
46061.1Skamil	const int elen = sizeof(event);
46071.1Skamil
46081.38Skamil	atf_tc_expect_fail("PR kern/51918");
46091.14Schristos
46101.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
46111.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
46121.1Skamil	if (child == 0) {
46131.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
46141.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
46151.1Skamil
46161.1Skamil		sigemptyset(&intmask);
46171.1Skamil		sigaddset(&intmask, sigmasked);
46181.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
46191.1Skamil
46201.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
46211.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
46221.1Skamil
46231.1Skamil		FORKEE_ASSERT((child2 = fork()) != -1);
46241.1Skamil
46251.1Skamil		if (child2 == 0)
46261.1Skamil			_exit(exitval2);
46271.1Skamil
46281.1Skamil		FORKEE_REQUIRE_SUCCESS
46291.1Skamil			(wpid = TWAIT_GENERIC(child2, &status, 0), child2);
46301.1Skamil
46311.1Skamil		forkee_status_exited(status, exitval2);
46321.1Skamil
46331.13Schristos		DPRINTF("Before exiting of the child process\n");
46341.1Skamil		_exit(exitval);
46351.1Skamil	}
46361.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
46371.1Skamil
46381.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
46391.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
46401.1Skamil
46411.1Skamil	validate_status_stopped(status, sigval);
46421.1Skamil
46431.13Schristos	DPRINTF("Enable PTRACE_VFORK in EVENT_MASK for the child %d\n", child);
46441.1Skamil	event.pe_set_event = PTRACE_VFORK;
46451.61Skre	SYSCALL_REQUIRE(
46461.61Skre	    ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1 ||
46471.61Skre	    errno == ENOTSUP);
46481.1Skamil
46491.13Schristos	DPRINTF("Before resuming the child process where it left off and "
46501.1Skamil	    "without signal to be sent\n");
46511.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
46521.1Skamil
46531.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
46541.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
46551.1Skamil
46561.1Skamil	validate_status_stopped(status, sigmasked);
46571.1Skamil
46581.61Skre	SYSCALL_REQUIRE(
46591.61Skre	    ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
46601.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_VFORK);
46611.1Skamil
46621.1Skamil	child2 = state.pe_other_pid;
46631.13Schristos	DPRINTF("Reported PTRACE_VFORK event with forkee %d\n", child2);
46641.1Skamil
46651.13Schristos	DPRINTF("Before calling %s() for the child2\n", TWAIT_FNAME);
46661.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0),
46671.1Skamil	    child2);
46681.1Skamil
46691.1Skamil	validate_status_stopped(status, SIGTRAP);
46701.1Skamil
46711.61Skre	SYSCALL_REQUIRE(
46721.61Skre	    ptrace(PT_GET_PROCESS_STATE, child2, &state, slen) != -1);
46731.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_VFORK);
46741.1Skamil	ATF_REQUIRE_EQ(state.pe_other_pid, child);
46751.1Skamil
46761.13Schristos	DPRINTF("Before resuming the forkee process where it left off and "
46771.1Skamil	    "without signal to be sent\n");
46781.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child2, (void *)1, 0) != -1);
46791.1Skamil
46801.13Schristos	DPRINTF("Before resuming the child process where it left off and "
46811.1Skamil	    "without signal to be sent\n");
46821.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
46831.1Skamil
46841.13Schristos	DPRINTF("Before calling %s() for the forkee - expected exited\n",
46851.1Skamil	    TWAIT_FNAME);
46861.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0),
46871.57Skamil	    child2);
46881.1Skamil
46891.1Skamil	validate_status_exited(status, exitval2);
46901.1Skamil
46911.13Schristos	DPRINTF("Before calling %s() for the forkee - expected no process\n",
46921.1Skamil	    TWAIT_FNAME);
46931.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD,
46941.1Skamil	    wpid = TWAIT_GENERIC(child2, &status, 0));
46951.1Skamil
46961.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
46971.1Skamil	    "SIGCHLD\n", TWAIT_FNAME);
46981.57Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
46991.1Skamil
47001.1Skamil	validate_status_stopped(status, SIGCHLD);
47011.1Skamil
47021.57Skamil	DPRINTF("Before resuming the child process where it left off and "
47031.1Skamil	    "without signal to be sent\n");
47041.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
47051.1Skamil
47061.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
47071.1Skamil	    TWAIT_FNAME);
47081.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
47091.1Skamil
47101.1Skamil	validate_status_exited(status, exitval);
47111.1Skamil
47121.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
47131.57Skamil	    TWAIT_FNAME);
47141.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
47151.1Skamil}
47161.1Skamil#endif
47171.1Skamil
47181.1SkamilATF_TC(signal8);
47191.1SkamilATF_TC_HEAD(signal8, tc)
47201.1Skamil{
47211.1Skamil	atf_tc_set_md_var(tc, "descr",
47221.1Skamil	    "Verify that masking SIGTRAP in tracee does not stop tracer from "
47231.1Skamil	    "catching PTRACE_VFORK_DONE breakpoint");
47241.1Skamil}
47251.1Skamil
47261.1SkamilATF_TC_BODY(signal8, tc)
47271.1Skamil{
47281.1Skamil	const int exitval = 5;
47291.1Skamil	const int exitval2 = 15;
47301.1Skamil	const int sigval = SIGSTOP;
47311.1Skamil	const int sigmasked = SIGTRAP;
47321.1Skamil	pid_t child, child2, wpid;
47331.1Skamil#if defined(TWAIT_HAVE_STATUS)
47341.1Skamil	int status;
47351.1Skamil#endif
47361.1Skamil	sigset_t intmask;
47371.1Skamil	ptrace_state_t state;
47381.1Skamil	const int slen = sizeof(state);
47391.1Skamil	ptrace_event_t event;
47401.1Skamil	const int elen = sizeof(event);
47411.1Skamil
47421.14Schristos	atf_tc_expect_fail("PR kern/51918");
47431.14Schristos
47441.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
47451.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
47461.1Skamil	if (child == 0) {
47471.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
47481.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
47491.1Skamil
47501.1Skamil		sigemptyset(&intmask);
47511.1Skamil		sigaddset(&intmask, sigmasked);
47521.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
47531.1Skamil
47541.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
47551.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
47561.1Skamil
47571.1Skamil		FORKEE_ASSERT((child2 = vfork()) != -1);
47581.1Skamil
47591.1Skamil		if (child2 == 0)
47601.1Skamil			_exit(exitval2);
47611.1Skamil
47621.1Skamil		FORKEE_REQUIRE_SUCCESS
47631.1Skamil			(wpid = TWAIT_GENERIC(child2, &status, 0), child2);
47641.1Skamil
47651.1Skamil		forkee_status_exited(status, exitval2);
47661.1Skamil
47671.13Schristos		DPRINTF("Before exiting of the child process\n");
47681.1Skamil		_exit(exitval);
47691.1Skamil	}
47701.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
47711.1Skamil
47721.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
47731.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
47741.1Skamil
47751.1Skamil	validate_status_stopped(status, sigval);
47761.1Skamil
47771.13Schristos	DPRINTF("Enable PTRACE_VFORK_DONE in EVENT_MASK for the child %d\n",
47781.1Skamil	    child);
47791.1Skamil	event.pe_set_event = PTRACE_VFORK_DONE;
47801.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);
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\n", TWAIT_FNAME);
47871.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
47881.1Skamil
47891.1Skamil	validate_status_stopped(status, sigmasked);
47901.1Skamil
47911.61Skre	SYSCALL_REQUIRE(
47921.61Skre	    ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
47931.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_VFORK_DONE);
47941.1Skamil
47951.1Skamil	child2 = state.pe_other_pid;
47961.13Schristos	DPRINTF("Reported PTRACE_VFORK_DONE event with forkee %d\n", child2);
47971.1Skamil
47981.13Schristos	DPRINTF("Before resuming the child process where it left off and "
47991.1Skamil	    "without signal to be sent\n");
48001.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
48011.1Skamil
48021.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
48031.1Skamil	    "SIGCHLD\n", TWAIT_FNAME);
48041.57Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
48051.1Skamil
48061.1Skamil	validate_status_stopped(status, SIGCHLD);
48071.1Skamil
48081.57Skamil	DPRINTF("Before resuming the child process where it left off and "
48091.1Skamil	    "without signal to be sent\n");
48101.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
48111.1Skamil
48121.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
48131.1Skamil	    TWAIT_FNAME);
48141.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
48151.1Skamil
48161.1Skamil	validate_status_exited(status, exitval);
48171.1Skamil
48181.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
48191.57Skamil	    TWAIT_FNAME);
48201.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
48211.1Skamil}
48221.1Skamil
48231.1SkamilATF_TC(signal9);
48241.1SkamilATF_TC_HEAD(signal9, tc)
48251.1Skamil{
48261.1Skamil	atf_tc_set_md_var(tc, "descr",
48271.1Skamil	    "Verify that masking SIGTRAP in tracee does not stop tracer from "
48281.1Skamil	    "catching PTRACE_LWP_CREATE breakpoint");
48291.1Skamil}
48301.1Skamil
48311.1SkamilATF_TC_BODY(signal9, tc)
48321.1Skamil{
48331.1Skamil	const int exitval = 5;
48341.1Skamil	const int sigval = SIGSTOP;
48351.1Skamil	const int sigmasked = SIGTRAP;
48361.1Skamil	pid_t child, wpid;
48371.1Skamil#if defined(TWAIT_HAVE_STATUS)
48381.1Skamil	int status;
48391.1Skamil#endif
48401.1Skamil	sigset_t intmask;
48411.1Skamil	ptrace_state_t state;
48421.1Skamil	const int slen = sizeof(state);
48431.1Skamil	ptrace_event_t event;
48441.1Skamil	const int elen = sizeof(event);
48451.1Skamil	ucontext_t uc;
48461.1Skamil	lwpid_t lid;
48471.1Skamil	static const size_t ssize = 16*1024;
48481.1Skamil	void *stack;
48491.1Skamil
48501.14Schristos	atf_tc_expect_fail("PR kern/51918");
48511.14Schristos
48521.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
48531.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
48541.1Skamil	if (child == 0) {
48551.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
48561.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
48571.1Skamil
48581.1Skamil		sigemptyset(&intmask);
48591.1Skamil		sigaddset(&intmask, sigmasked);
48601.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
48611.1Skamil
48621.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
48631.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
48641.1Skamil
48651.13Schristos		DPRINTF("Before allocating memory for stack in child\n");
48661.1Skamil		FORKEE_ASSERT((stack = malloc(ssize)) != NULL);
48671.1Skamil
48681.13Schristos		DPRINTF("Before making context for new lwp in child\n");
48691.1Skamil		_lwp_makecontext(&uc, lwp_main_func, NULL, NULL, stack, ssize);
48701.1Skamil
48711.13Schristos		DPRINTF("Before creating new in child\n");
48721.1Skamil		FORKEE_ASSERT(_lwp_create(&uc, 0, &lid) == 0);
48731.1Skamil
48741.13Schristos		DPRINTF("Before waiting for lwp %d to exit\n", lid);
48751.1Skamil		FORKEE_ASSERT(_lwp_wait(lid, NULL) == 0);
48761.1Skamil
48771.13Schristos		DPRINTF("Before verifying that reported %d and running lid %d "
48781.1Skamil		    "are the same\n", lid, the_lwp_id);
48791.1Skamil		FORKEE_ASSERT_EQ(lid, the_lwp_id);
48801.1Skamil
48811.13Schristos		DPRINTF("Before exiting of the child process\n");
48821.1Skamil		_exit(exitval);
48831.1Skamil	}
48841.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
48851.1Skamil
48861.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
48871.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
48881.1Skamil
48891.1Skamil	validate_status_stopped(status, sigval);
48901.1Skamil
48911.13Schristos	DPRINTF("Set empty EVENT_MASK for the child %d\n", child);
48921.1Skamil	event.pe_set_event = PTRACE_LWP_CREATE;
48931.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);
48941.1Skamil
48951.13Schristos	DPRINTF("Before resuming the child process where it left off and "
48961.1Skamil	    "without signal to be sent\n");
48971.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
48981.1Skamil
48991.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
49001.1Skamil	    "SIGTRAP\n", TWAIT_FNAME);
49011.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
49021.1Skamil
49031.1Skamil	validate_status_stopped(status, sigmasked);
49041.1Skamil
49051.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
49061.1Skamil
49071.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_LWP_CREATE);
49081.1Skamil
49091.1Skamil	lid = state.pe_lwp;
49101.13Schristos	DPRINTF("Reported PTRACE_LWP_CREATE event with lid %d\n", lid);
49111.1Skamil
49121.13Schristos	DPRINTF("Before resuming the child process where it left off and "
49131.1Skamil	    "without signal to be sent\n");
49141.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
49151.1Skamil
49161.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
49171.1Skamil	    TWAIT_FNAME);
49181.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
49191.1Skamil
49201.1Skamil	validate_status_exited(status, exitval);
49211.1Skamil
49221.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
49231.1Skamil	    TWAIT_FNAME);
49241.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
49251.1Skamil}
49261.1Skamil
49271.1SkamilATF_TC(signal10);
49281.1SkamilATF_TC_HEAD(signal10, tc)
49291.1Skamil{
49301.1Skamil	atf_tc_set_md_var(tc, "descr",
49311.1Skamil	    "Verify that masking SIGTRAP in tracee does not stop tracer from "
49321.1Skamil	    "catching PTRACE_LWP_EXIT breakpoint");
49331.1Skamil}
49341.1Skamil
49351.1SkamilATF_TC_BODY(signal10, tc)
49361.1Skamil{
49371.1Skamil	const int exitval = 5;
49381.1Skamil	const int sigval = SIGSTOP;
49391.1Skamil	const int sigmasked = SIGTRAP;
49401.1Skamil	pid_t child, wpid;
49411.1Skamil#if defined(TWAIT_HAVE_STATUS)
49421.1Skamil	int status;
49431.1Skamil#endif
49441.1Skamil	sigset_t intmask;
49451.1Skamil	ptrace_state_t state;
49461.1Skamil	const int slen = sizeof(state);
49471.1Skamil	ptrace_event_t event;
49481.1Skamil	const int elen = sizeof(event);
49491.1Skamil	ucontext_t uc;
49501.1Skamil	lwpid_t lid;
49511.1Skamil	static const size_t ssize = 16*1024;
49521.1Skamil	void *stack;
49531.1Skamil
49541.14Schristos	atf_tc_expect_fail("PR kern/51918");
49551.14Schristos
49561.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
49571.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
49581.1Skamil	if (child == 0) {
49591.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
49601.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
49611.1Skamil
49621.1Skamil		sigemptyset(&intmask);
49631.1Skamil		sigaddset(&intmask, sigmasked);
49641.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
49651.1Skamil
49661.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
49671.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
49681.1Skamil
49691.13Schristos		DPRINTF("Before allocating memory for stack in child\n");
49701.1Skamil		FORKEE_ASSERT((stack = malloc(ssize)) != NULL);
49711.1Skamil
49721.13Schristos		DPRINTF("Before making context for new lwp in child\n");
49731.1Skamil		_lwp_makecontext(&uc, lwp_main_func, NULL, NULL, stack, ssize);
49741.1Skamil
49751.13Schristos		DPRINTF("Before creating new in child\n");
49761.1Skamil		FORKEE_ASSERT(_lwp_create(&uc, 0, &lid) == 0);
49771.1Skamil
49781.13Schristos		DPRINTF("Before waiting for lwp %d to exit\n", lid);
49791.1Skamil		FORKEE_ASSERT(_lwp_wait(lid, NULL) == 0);
49801.1Skamil
49811.13Schristos		DPRINTF("Before verifying that reported %d and running lid %d "
49821.1Skamil		    "are the same\n", lid, the_lwp_id);
49831.1Skamil		FORKEE_ASSERT_EQ(lid, the_lwp_id);
49841.1Skamil
49851.13Schristos		DPRINTF("Before exiting of the child process\n");
49861.1Skamil		_exit(exitval);
49871.1Skamil	}
49881.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
49891.1Skamil
49901.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
49911.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
49921.1Skamil
49931.1Skamil	validate_status_stopped(status, sigval);
49941.1Skamil
49951.13Schristos	DPRINTF("Set empty EVENT_MASK for the child %d\n", child);
49961.1Skamil	event.pe_set_event = PTRACE_LWP_EXIT;
49971.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);
49981.1Skamil
49991.13Schristos	DPRINTF("Before resuming the child process where it left off and "
50001.1Skamil	    "without signal to be sent\n");
50011.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
50021.1Skamil
50031.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
50041.1Skamil	    "SIGTRAP\n", TWAIT_FNAME);
50051.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
50061.1Skamil
50071.1Skamil	validate_status_stopped(status, sigmasked);
50081.1Skamil
50091.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
50101.1Skamil
50111.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_LWP_EXIT);
50121.1Skamil
50131.1Skamil	lid = state.pe_lwp;
50141.13Schristos	DPRINTF("Reported PTRACE_LWP_EXIT event with lid %d\n", lid);
50151.1Skamil
50161.13Schristos	DPRINTF("Before resuming the child process where it left off and "
50171.1Skamil	    "without signal to be sent\n");
50181.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
50191.1Skamil
50201.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
50211.1Skamil	    TWAIT_FNAME);
50221.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
50231.1Skamil
50241.1Skamil	validate_status_exited(status, exitval);
50251.1Skamil
50261.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
50271.1Skamil	    TWAIT_FNAME);
50281.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
50291.1Skamil}
50301.1Skamil
50311.1Skamilstatic void
50321.1Skamillwp_main_stop(void *arg)
50331.1Skamil{
50341.1Skamil	the_lwp_id = _lwp_self();
50351.1Skamil
50361.1Skamil	raise(SIGTRAP);
50371.1Skamil
50381.1Skamil	_lwp_exit();
50391.1Skamil}
50401.1Skamil
50411.1SkamilATF_TC(suspend1);
50421.1SkamilATF_TC_HEAD(suspend1, tc)
50431.1Skamil{
50441.1Skamil	atf_tc_set_md_var(tc, "descr",
50451.1Skamil	    "Verify that a thread can be suspended by a debugger and later "
50461.1Skamil	    "resumed by a tracee");
50471.1Skamil}
50481.1Skamil
50491.1SkamilATF_TC_BODY(suspend1, tc)
50501.1Skamil{
50511.1Skamil	const int exitval = 5;
50521.1Skamil	const int sigval = SIGSTOP;
50531.1Skamil	pid_t child, wpid;
50541.1Skamil#if defined(TWAIT_HAVE_STATUS)
50551.1Skamil	int status;
50561.1Skamil#endif
50571.1Skamil	ucontext_t uc;
50581.1Skamil	lwpid_t lid;
50591.1Skamil	static const size_t ssize = 16*1024;
50601.1Skamil	void *stack;
50611.1Skamil	struct ptrace_lwpinfo pl;
50621.1Skamil	struct ptrace_siginfo psi;
50631.1Skamil	volatile int go = 0;
50641.1Skamil
50651.17Skamil	// Feature pending for refactoring
50661.17Skamil	atf_tc_expect_fail("PR kern/51995");
50671.17Skamil
50681.16Skamil	// Hangs with qemu
50691.16Skamil	ATF_REQUIRE(0 && "In order to get reliable failure, abort");
50701.16Skamil
50711.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
50721.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
50731.1Skamil	if (child == 0) {
50741.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
50751.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
50761.1Skamil
50771.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
50781.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
50791.1Skamil
50801.13Schristos		DPRINTF("Before allocating memory for stack in child\n");
50811.1Skamil		FORKEE_ASSERT((stack = malloc(ssize)) != NULL);
50821.1Skamil
50831.13Schristos		DPRINTF("Before making context for new lwp in child\n");
50841.1Skamil		_lwp_makecontext(&uc, lwp_main_stop, NULL, NULL, stack, ssize);
50851.1Skamil
50861.13Schristos		DPRINTF("Before creating new in child\n");
50871.1Skamil		FORKEE_ASSERT(_lwp_create(&uc, 0, &lid) == 0);
50881.1Skamil
50891.1Skamil		while (go == 0)
50901.1Skamil			continue;
50911.1Skamil
50921.1Skamil		raise(SIGINT);
50931.1Skamil
50941.1Skamil		FORKEE_ASSERT(_lwp_continue(lid) == 0);
50951.1Skamil
50961.13Schristos		DPRINTF("Before waiting for lwp %d to exit\n", lid);
50971.1Skamil		FORKEE_ASSERT(_lwp_wait(lid, NULL) == 0);
50981.1Skamil
50991.13Schristos		DPRINTF("Before verifying that reported %d and running lid %d "
51001.1Skamil		    "are the same\n", lid, the_lwp_id);
51011.1Skamil		FORKEE_ASSERT_EQ(lid, the_lwp_id);
51021.1Skamil
51031.13Schristos		DPRINTF("Before exiting of the child process\n");
51041.1Skamil		_exit(exitval);
51051.1Skamil	}
51061.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
51071.1Skamil
51081.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
51091.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
51101.1Skamil
51111.1Skamil	validate_status_stopped(status, sigval);
51121.1Skamil
51131.13Schristos	DPRINTF("Before resuming the child process where it left off and "
51141.1Skamil	    "without signal to be sent\n");
51151.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
51161.1Skamil
51171.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
51181.1Skamil	    "SIGTRAP\n", TWAIT_FNAME);
51191.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
51201.1Skamil
51211.1Skamil	validate_status_stopped(status, SIGTRAP);
51221.1Skamil
51231.13Schristos	DPRINTF("Before reading siginfo and lwpid_t\n");
51241.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &psi, sizeof(psi)) != -1);
51251.1Skamil
51261.13Schristos	DPRINTF("Before suspending LWP %d\n", psi.psi_lwpid);
51271.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SUSPEND, child, NULL, psi.psi_lwpid) != -1);
51281.1Skamil
51291.13Schristos        DPRINTF("Write new go to tracee (PID=%d) from tracer (PID=%d)\n",
51301.1Skamil	    child, getpid());
51311.13Schristos	SYSCALL_REQUIRE(ptrace(PT_WRITE_D, child, __UNVOLATILE(&go), 1) != -1);
51321.1Skamil
51331.13Schristos	DPRINTF("Before resuming the child process where it left off and "
51341.1Skamil	    "without signal to be sent\n");
51351.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
51361.1Skamil
51371.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
51381.1Skamil	    "SIGINT\n", TWAIT_FNAME);
51391.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
51401.1Skamil
51411.1Skamil	validate_status_stopped(status, SIGINT);
51421.1Skamil
51431.1Skamil	pl.pl_lwpid = 0;
51441.1Skamil
51451.13Schristos	SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &pl, sizeof(pl)) != -1);
51461.1Skamil	while (pl.pl_lwpid != 0) {
51471.1Skamil
51481.13Schristos		SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &pl, sizeof(pl)) != -1);
51491.1Skamil		switch (pl.pl_lwpid) {
51501.1Skamil		case 1:
51511.1Skamil			ATF_REQUIRE_EQ(pl.pl_event, PL_EVENT_SIGNAL);
51521.1Skamil			break;
51531.1Skamil		case 2:
51541.1Skamil			ATF_REQUIRE_EQ(pl.pl_event, PL_EVENT_SUSPENDED);
51551.1Skamil			break;
51561.1Skamil		}
51571.1Skamil	}
51581.1Skamil
51591.13Schristos	DPRINTF("Before resuming the child process where it left off and "
51601.1Skamil	    "without signal to be sent\n");
51611.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
51621.1Skamil
51631.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
51641.1Skamil	    TWAIT_FNAME);
51651.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
51661.1Skamil
51671.1Skamil	validate_status_exited(status, exitval);
51681.1Skamil
51691.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
51701.1Skamil	    TWAIT_FNAME);
51711.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
51721.1Skamil}
51731.1Skamil
51741.1SkamilATF_TC(suspend2);
51751.1SkamilATF_TC_HEAD(suspend2, tc)
51761.1Skamil{
51771.1Skamil	atf_tc_set_md_var(tc, "descr",
51781.1Skamil	    "Verify that the while the only thread within a process is "
51791.1Skamil	    "suspended, the whole process cannot be unstopped");
51801.1Skamil}
51811.1Skamil
51821.1SkamilATF_TC_BODY(suspend2, tc)
51831.1Skamil{
51841.1Skamil	const int exitval = 5;
51851.1Skamil	const int sigval = SIGSTOP;
51861.1Skamil	pid_t child, wpid;
51871.1Skamil#if defined(TWAIT_HAVE_STATUS)
51881.1Skamil	int status;
51891.1Skamil#endif
51901.1Skamil	struct ptrace_siginfo psi;
51911.1Skamil
51921.17Skamil	// Feature pending for refactoring
51931.17Skamil	atf_tc_expect_fail("PR kern/51995");
51941.17Skamil
51951.16Skamil	// Hangs with qemu
51961.16Skamil	ATF_REQUIRE(0 && "In order to get reliable failure, abort");
51971.16Skamil
51981.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
51991.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
52001.1Skamil	if (child == 0) {
52011.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
52021.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
52031.1Skamil
52041.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
52051.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
52061.1Skamil
52071.13Schristos		DPRINTF("Before exiting of the child process\n");
52081.1Skamil		_exit(exitval);
52091.1Skamil	}
52101.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
52111.1Skamil
52121.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
52131.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
52141.1Skamil
52151.1Skamil	validate_status_stopped(status, sigval);
52161.1Skamil
52171.13Schristos	DPRINTF("Before reading siginfo and lwpid_t\n");
52181.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &psi, sizeof(psi)) != -1);
52191.1Skamil
52201.13Schristos	DPRINTF("Before suspending LWP %d\n", psi.psi_lwpid);
52211.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SUSPEND, child, NULL, psi.psi_lwpid) != -1);
52221.1Skamil
52231.13Schristos	DPRINTF("Before resuming the child process where it left off and "
52241.1Skamil	    "without signal to be sent\n");
52251.1Skamil	ATF_REQUIRE_ERRNO(EDEADLK,
52261.1Skamil	    ptrace(PT_CONTINUE, child, (void *)1, 0) == -1);
52271.1Skamil
52281.13Schristos	DPRINTF("Before resuming LWP %d\n", psi.psi_lwpid);
52291.13Schristos	SYSCALL_REQUIRE(ptrace(PT_RESUME, child, NULL, psi.psi_lwpid) != -1);
52301.1Skamil
52311.13Schristos	DPRINTF("Before resuming the child process where it left off and "
52321.1Skamil	    "without signal to be sent\n");
52331.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
52341.1Skamil
52351.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
52361.1Skamil	    TWAIT_FNAME);
52371.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
52381.1Skamil
52391.1Skamil	validate_status_exited(status, exitval);
52401.1Skamil
52411.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
52421.1Skamil	    TWAIT_FNAME);
52431.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
52441.1Skamil}
52451.1Skamil
52461.1SkamilATF_TC(resume1);
52471.1SkamilATF_TC_HEAD(resume1, tc)
52481.1Skamil{
52491.1Skamil	atf_tc_set_md_var(tc, "timeout", "5");
52501.1Skamil	atf_tc_set_md_var(tc, "descr",
52511.1Skamil	    "Verify that a thread can be suspended by a debugger and later "
52521.1Skamil	    "resumed by the debugger");
52531.1Skamil}
52541.1Skamil
52551.1SkamilATF_TC_BODY(resume1, tc)
52561.1Skamil{
52571.1Skamil	struct msg_fds fds;
52581.1Skamil	const int exitval = 5;
52591.1Skamil	const int sigval = SIGSTOP;
52601.1Skamil	pid_t child, wpid;
52611.1Skamil	uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */
52621.1Skamil#if defined(TWAIT_HAVE_STATUS)
52631.1Skamil	int status;
52641.1Skamil#endif
52651.1Skamil	ucontext_t uc;
52661.1Skamil	lwpid_t lid;
52671.1Skamil	static const size_t ssize = 16*1024;
52681.1Skamil	void *stack;
52691.1Skamil	struct ptrace_lwpinfo pl;
52701.1Skamil	struct ptrace_siginfo psi;
52711.1Skamil
52721.17Skamil	// Feature pending for refactoring
52731.17Skamil	atf_tc_expect_fail("PR kern/51995");
52741.17Skamil
52751.15Schristos	// Hangs with qemu
52761.15Schristos	ATF_REQUIRE(0 && "In order to get reliable failure, abort");
52771.1Skamil
52781.13Schristos	SYSCALL_REQUIRE(msg_open(&fds) == 0);
52791.1Skamil
52801.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
52811.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
52821.1Skamil	if (child == 0) {
52831.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
52841.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
52851.1Skamil
52861.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
52871.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
52881.1Skamil
52891.13Schristos		DPRINTF("Before allocating memory for stack in child\n");
52901.1Skamil		FORKEE_ASSERT((stack = malloc(ssize)) != NULL);
52911.1Skamil
52921.13Schristos		DPRINTF("Before making context for new lwp in child\n");
52931.1Skamil		_lwp_makecontext(&uc, lwp_main_stop, NULL, NULL, stack, ssize);
52941.1Skamil
52951.13Schristos		DPRINTF("Before creating new in child\n");
52961.1Skamil		FORKEE_ASSERT(_lwp_create(&uc, 0, &lid) == 0);
52971.1Skamil
52981.1Skamil		CHILD_TO_PARENT("Message", fds, msg);
52991.1Skamil
53001.1Skamil		raise(SIGINT);
53011.1Skamil
53021.13Schristos		DPRINTF("Before waiting for lwp %d to exit\n", lid);
53031.1Skamil		FORKEE_ASSERT(_lwp_wait(lid, NULL) == 0);
53041.1Skamil
53051.13Schristos		DPRINTF("Before verifying that reported %d and running lid %d "
53061.1Skamil		    "are the same\n", lid, the_lwp_id);
53071.1Skamil		FORKEE_ASSERT_EQ(lid, the_lwp_id);
53081.1Skamil
53091.13Schristos		DPRINTF("Before exiting of the child process\n");
53101.1Skamil		_exit(exitval);
53111.1Skamil	}
53121.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
53131.1Skamil
53141.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
53151.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
53161.1Skamil
53171.1Skamil	validate_status_stopped(status, sigval);
53181.1Skamil
53191.13Schristos	DPRINTF("Before resuming the child process where it left off and "
53201.1Skamil	    "without signal to be sent\n");
53211.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
53221.1Skamil
53231.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
53241.1Skamil	    "SIGTRAP\n", TWAIT_FNAME);
53251.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
53261.1Skamil
53271.1Skamil	validate_status_stopped(status, SIGTRAP);
53281.1Skamil
53291.13Schristos	DPRINTF("Before reading siginfo and lwpid_t\n");
53301.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &psi, sizeof(psi)) != -1);
53311.1Skamil
53321.13Schristos	DPRINTF("Before suspending LWP %d\n", psi.psi_lwpid);
53331.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SUSPEND, child, NULL, psi.psi_lwpid) != -1);
53341.1Skamil
53351.1Skamil	PARENT_FROM_CHILD("Message", fds, msg);
53361.1Skamil
53371.13Schristos	DPRINTF("Before resuming the child process where it left off and "
53381.1Skamil	    "without signal to be sent\n");
53391.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
53401.1Skamil
53411.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
53421.1Skamil	    "SIGINT\n", TWAIT_FNAME);
53431.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
53441.1Skamil
53451.1Skamil	validate_status_stopped(status, SIGINT);
53461.1Skamil
53471.1Skamil	pl.pl_lwpid = 0;
53481.1Skamil
53491.13Schristos	SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &pl, sizeof(pl)) != -1);
53501.1Skamil	while (pl.pl_lwpid != 0) {
53511.13Schristos		SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &pl, sizeof(pl)) != -1);
53521.1Skamil		switch (pl.pl_lwpid) {
53531.1Skamil		case 1:
53541.1Skamil			ATF_REQUIRE_EQ(pl.pl_event, PL_EVENT_SIGNAL);
53551.1Skamil			break;
53561.1Skamil		case 2:
53571.1Skamil			ATF_REQUIRE_EQ(pl.pl_event, PL_EVENT_SUSPENDED);
53581.1Skamil			break;
53591.1Skamil		}
53601.1Skamil	}
53611.1Skamil
53621.13Schristos	DPRINTF("Before resuming LWP %d\n", psi.psi_lwpid);
53631.13Schristos	SYSCALL_REQUIRE(ptrace(PT_RESUME, child, NULL, psi.psi_lwpid) != -1);
53641.1Skamil
53651.13Schristos	DPRINTF("Before resuming the child process where it left off and "
53661.1Skamil	    "without signal to be sent\n");
53671.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
53681.1Skamil
53691.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
53701.1Skamil	    TWAIT_FNAME);
53711.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
53721.1Skamil
53731.1Skamil	validate_status_exited(status, exitval);
53741.1Skamil
53751.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
53761.1Skamil	    TWAIT_FNAME);
53771.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
53781.1Skamil
53791.1Skamil	msg_close(&fds);
53801.1Skamil
53811.13Schristos	DPRINTF("XXX: Test worked this time but for consistency timeout it\n");
53821.1Skamil	sleep(10);
53831.1Skamil}
53841.1Skamil
53851.1SkamilATF_TC(syscall1);
53861.1SkamilATF_TC_HEAD(syscall1, tc)
53871.1Skamil{
53881.1Skamil	atf_tc_set_md_var(tc, "descr",
53891.1Skamil	    "Verify that getpid(2) can be traced with PT_SYSCALL");
53901.1Skamil}
53911.1Skamil
53921.1SkamilATF_TC_BODY(syscall1, tc)
53931.1Skamil{
53941.1Skamil	const int exitval = 5;
53951.1Skamil	const int sigval = SIGSTOP;
53961.1Skamil	pid_t child, wpid;
53971.1Skamil#if defined(TWAIT_HAVE_STATUS)
53981.1Skamil	int status;
53991.1Skamil#endif
54001.1Skamil	struct ptrace_siginfo info;
54011.1Skamil	memset(&info, 0, sizeof(info));
54021.1Skamil
54031.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
54041.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
54051.1Skamil	if (child == 0) {
54061.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
54071.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
54081.1Skamil
54091.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
54101.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
54111.1Skamil
54121.1Skamil		syscall(SYS_getpid);
54131.1Skamil
54141.13Schristos		DPRINTF("Before exiting of the child process\n");
54151.1Skamil		_exit(exitval);
54161.1Skamil	}
54171.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
54181.1Skamil
54191.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
54201.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
54211.1Skamil
54221.1Skamil	validate_status_stopped(status, sigval);
54231.1Skamil
54241.13Schristos	DPRINTF("Before resuming the child process where it left off and "
54251.1Skamil	    "without signal to be sent\n");
54261.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SYSCALL, child, (void *)1, 0) != -1);
54271.1Skamil
54281.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
54291.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
54301.1Skamil
54311.1Skamil	validate_status_stopped(status, SIGTRAP);
54321.1Skamil
54331.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
54341.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
54351.1Skamil
54361.38Skamil	DPRINTF("Before checking siginfo_t and lwpid\n");
54371.38Skamil	ATF_REQUIRE_EQ(info.psi_lwpid, 1);
54381.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, SIGTRAP);
54391.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_SCE);
54401.1Skamil
54411.13Schristos	DPRINTF("Before resuming the child process where it left off and "
54421.1Skamil	    "without signal to be sent\n");
54431.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SYSCALL, child, (void *)1, 0) != -1);
54441.1Skamil
54451.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
54461.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
54471.1Skamil
54481.1Skamil	validate_status_stopped(status, SIGTRAP);
54491.1Skamil
54501.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
54511.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
54521.1Skamil
54531.38Skamil	DPRINTF("Before checking siginfo_t and lwpid\n");
54541.38Skamil	ATF_REQUIRE_EQ(info.psi_lwpid, 1);
54551.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, SIGTRAP);
54561.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_SCX);
54571.1Skamil
54581.13Schristos	DPRINTF("Before resuming the child process where it left off and "
54591.1Skamil	    "without signal to be sent\n");
54601.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
54611.1Skamil
54621.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
54631.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
54641.1Skamil
54651.1Skamil	validate_status_exited(status, exitval);
54661.1Skamil
54671.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
54681.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
54691.1Skamil}
54701.1Skamil
54711.1SkamilATF_TC(syscallemu1);
54721.1SkamilATF_TC_HEAD(syscallemu1, tc)
54731.1Skamil{
54741.1Skamil	atf_tc_set_md_var(tc, "descr",
54751.1Skamil	    "Verify that exit(2) can be intercepted with PT_SYSCALLEMU");
54761.1Skamil}
54771.1Skamil
54781.1SkamilATF_TC_BODY(syscallemu1, tc)
54791.1Skamil{
54801.1Skamil	const int exitval = 5;
54811.1Skamil	const int sigval = SIGSTOP;
54821.1Skamil	pid_t child, wpid;
54831.1Skamil#if defined(TWAIT_HAVE_STATUS)
54841.1Skamil	int status;
54851.1Skamil#endif
54861.1Skamil
54871.6Skamil#if defined(__sparc__) && !defined(__sparc64__)
54881.6Skamil	/* syscallemu does not work on sparc (32-bit) */
54891.6Skamil	atf_tc_expect_fail("PR kern/52166");
54901.6Skamil#endif
54911.6Skamil
54921.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
54931.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
54941.1Skamil	if (child == 0) {
54951.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
54961.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
54971.1Skamil
54981.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
54991.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
55001.1Skamil
55011.1Skamil		syscall(SYS_exit, 100);
55021.1Skamil
55031.13Schristos		DPRINTF("Before exiting of the child process\n");
55041.1Skamil		_exit(exitval);
55051.1Skamil	}
55061.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
55071.1Skamil
55081.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
55091.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
55101.1Skamil
55111.1Skamil	validate_status_stopped(status, sigval);
55121.1Skamil
55131.13Schristos	DPRINTF("Before resuming the child process where it left off and "
55141.1Skamil	    "without signal to be sent\n");
55151.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SYSCALL, child, (void *)1, 0) != -1);
55161.1Skamil
55171.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
55181.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
55191.1Skamil
55201.1Skamil	validate_status_stopped(status, SIGTRAP);
55211.1Skamil
55221.13Schristos	DPRINTF("Set SYSCALLEMU for intercepted syscall\n");
55231.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SYSCALLEMU, child, (void *)1, 0) != -1);
55241.1Skamil
55251.13Schristos	DPRINTF("Before resuming the child process where it left off and "
55261.1Skamil	    "without signal to be sent\n");
55271.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SYSCALL, child, (void *)1, 0) != -1);
55281.1Skamil
55291.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
55301.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
55311.1Skamil
55321.1Skamil	validate_status_stopped(status, SIGTRAP);
55331.1Skamil
55341.13Schristos	DPRINTF("Before resuming the child process where it left off and "
55351.1Skamil	    "without signal to be sent\n");
55361.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
55371.1Skamil
55381.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
55391.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
55401.1Skamil
55411.1Skamil	validate_status_exited(status, exitval);
55421.1Skamil
55431.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
55441.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
55451.1Skamil}
55461.1Skamil
55471.1Skamil#include "t_ptrace_amd64_wait.h"
55481.1Skamil#include "t_ptrace_i386_wait.h"
55491.1Skamil#include "t_ptrace_x86_wait.h"
55501.1Skamil
55511.1SkamilATF_TP_ADD_TCS(tp)
55521.1Skamil{
55531.1Skamil	setvbuf(stdout, NULL, _IONBF, 0);
55541.1Skamil	setvbuf(stderr, NULL, _IONBF, 0);
55551.33Skamil
55561.36Skamil	ATF_TP_ADD_TC(tp, traceme_raise1);
55571.33Skamil	ATF_TP_ADD_TC(tp, traceme_raise2);
55581.33Skamil	ATF_TP_ADD_TC(tp, traceme_raise3);
55591.33Skamil	ATF_TP_ADD_TC(tp, traceme_raise4);
55601.33Skamil	ATF_TP_ADD_TC(tp, traceme_raise5);
55611.33Skamil
55621.59Skamil	ATF_TP_ADD_TC(tp, traceme_crash_trap);
55631.59Skamil	ATF_TP_ADD_TC(tp, traceme_crash_segv);
55641.59Skamil//	ATF_TP_ADD_TC(tp, traceme_crash_ill);
55651.59Skamil	ATF_TP_ADD_TC(tp, traceme_crash_fpe);
55661.59Skamil	ATF_TP_ADD_TC(tp, traceme_crash_bus);
55671.59Skamil
55681.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_handle1);
55691.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_handle2);
55701.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_handle3);
55711.50Skamil
55721.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_masked1);
55731.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_masked2);
55741.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_masked3);
55751.50Skamil
55761.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_ignored1);
55771.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_ignored2);
55781.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_ignored3);
55791.50Skamil
55801.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_simple1);
55811.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_simple2);
55821.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_simple3);
55831.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_simple4);
55841.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_simple5);
55851.1Skamil
55861.37Skamil	ATF_TP_ADD_TC(tp, traceme_pid1_parent);
55871.37Skamil
55881.40Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_raise1);
55891.46Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_raise2);
55901.40Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_raise3);
55911.40Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_raise4);
55921.40Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_raise5);
55931.47Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_raise6);
55941.47Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_raise7);
55951.47Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_raise8);
55961.40Skamil
55971.52Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_crash_trap);
55981.52Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_crash_segv);
55991.52Skamil//	ATF_TP_ADD_TC(tp, traceme_vfork_crash_ill);
56001.52Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_crash_fpe);
56011.52Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_crash_bus);
56021.41Skamil
56031.43Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_exec);
56041.43Skamil
56051.59Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_sees_crash_trap);
56061.59Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_sees_crash_segv);
56071.59Skamil//	ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_sees_crash_ill);
56081.59Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_sees_crash_fpe);
56091.59Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_sees_crash_bus);
56101.59Skamil
56111.51Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, tracer_sees_terminaton_before_the_parent);
56121.51Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, tracer_sysctl_lookup_without_duplicates);
56131.61Skre	ATF_TP_ADD_TC_HAVE_PID(tp,
56141.61Skre		unrelated_tracer_sees_terminaton_before_the_parent);
56151.51Skamil
56161.51Skamil	ATF_TP_ADD_TC(tp, parent_attach_to_its_child);
56171.51Skamil
56181.51Skamil	ATF_TP_ADD_TC(tp, child_attach_to_its_parent);
56191.51Skamil
56201.51Skamil	ATF_TP_ADD_TC_HAVE_PID(tp,
56211.51Skamil		tracee_sees_its_original_parent_getppid);
56221.51Skamil	ATF_TP_ADD_TC_HAVE_PID(tp,
56231.51Skamil		tracee_sees_its_original_parent_sysctl_kinfo_proc2);
56241.51Skamil	ATF_TP_ADD_TC_HAVE_PID(tp,
56251.51Skamil		tracee_sees_its_original_parent_procfs_status);
56261.1Skamil
56271.53Skamil	ATF_TP_ADD_TC(tp, eventmask_preserved_empty);
56281.53Skamil	ATF_TP_ADD_TC(tp, eventmask_preserved_fork);
56291.53Skamil	ATF_TP_ADD_TC(tp, eventmask_preserved_vfork);
56301.53Skamil	ATF_TP_ADD_TC(tp, eventmask_preserved_vfork_done);
56311.53Skamil	ATF_TP_ADD_TC(tp, eventmask_preserved_lwp_create);
56321.53Skamil	ATF_TP_ADD_TC(tp, eventmask_preserved_lwp_exit);
56331.1Skamil
56341.31Skamil	ATF_TP_ADD_TC(tp, fork1);
56351.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, fork2);
56361.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, fork3);
56371.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, fork4);
56381.31Skamil	ATF_TP_ADD_TC(tp, fork5);
56391.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, fork6);
56401.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, fork7);
56411.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, fork8);
56421.31Skamil
56431.31Skamil	ATF_TP_ADD_TC(tp, vfork1);
56441.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, vfork2);
56451.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, vfork3);
56461.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, vfork4);
56471.31Skamil	ATF_TP_ADD_TC(tp, vfork5);
56481.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, vfork6);
56491.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, vfork7);
56501.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, vfork8);
56511.1Skamil
56521.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_d_8);
56531.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_d_16);
56541.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_d_32);
56551.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_d_64);
56561.54Skamil
56571.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_i_8);
56581.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_i_16);
56591.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_i_32);
56601.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_i_64);
56611.54Skamil
56621.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_d_8);
56631.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_d_16);
56641.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_d_32);
56651.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_d_64);
56661.54Skamil
56671.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_i_8);
56681.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_i_16);
56691.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_i_32);
56701.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_i_64);
56711.54Skamil
56721.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_read_d);
56731.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_read_i);
56741.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_write_d);
56751.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_write_i);
56761.54Skamil
56771.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_d_8_text);
56781.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_d_16_text);
56791.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_d_32_text);
56801.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_d_64_text);
56811.54Skamil
56821.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_i_8_text);
56831.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_i_16_text);
56841.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_i_32_text);
56851.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_i_64_text);
56861.54Skamil
56871.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_d_8_text);
56881.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_d_16_text);
56891.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_d_32_text);
56901.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_d_64_text);
56911.54Skamil
56921.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_i_8_text);
56931.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_i_16_text);
56941.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_i_32_text);
56951.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_i_64_text);
56961.54Skamil
56971.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_read_d_text);
56981.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_read_i_text);
56991.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_write_d_text);
57001.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_write_i_text);
57011.1Skamil
57021.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_auxv);
57031.1Skamil
57041.1Skamil	ATF_TP_ADD_TC_HAVE_GPREGS(tp, regs1);
57051.1Skamil	ATF_TP_ADD_TC_HAVE_GPREGS(tp, regs2);
57061.1Skamil	ATF_TP_ADD_TC_HAVE_GPREGS(tp, regs3);
57071.1Skamil	ATF_TP_ADD_TC_HAVE_GPREGS(tp, regs4);
57081.1Skamil	ATF_TP_ADD_TC_HAVE_GPREGS(tp, regs5);
57091.1Skamil
57101.1Skamil	ATF_TP_ADD_TC_HAVE_FPREGS(tp, fpregs1);
57111.1Skamil	ATF_TP_ADD_TC_HAVE_FPREGS(tp, fpregs2);
57121.1Skamil
57131.1Skamil	ATF_TP_ADD_TC_PT_STEP(tp, step1);
57141.1Skamil	ATF_TP_ADD_TC_PT_STEP(tp, step2);
57151.1Skamil	ATF_TP_ADD_TC_PT_STEP(tp, step3);
57161.1Skamil	ATF_TP_ADD_TC_PT_STEP(tp, step4);
57171.1Skamil
57181.2Skamil	ATF_TP_ADD_TC_PT_STEP(tp, setstep1);
57191.2Skamil	ATF_TP_ADD_TC_PT_STEP(tp, setstep2);
57201.2Skamil	ATF_TP_ADD_TC_PT_STEP(tp, setstep3);
57211.2Skamil	ATF_TP_ADD_TC_PT_STEP(tp, setstep4);
57221.2Skamil
57231.1Skamil	ATF_TP_ADD_TC(tp, kill1);
57241.1Skamil	ATF_TP_ADD_TC(tp, kill2);
57251.1Skamil
57261.1Skamil	ATF_TP_ADD_TC(tp, lwpinfo1);
57271.1Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, lwpinfo2);
57281.1Skamil
57291.1Skamil	ATF_TP_ADD_TC(tp, siginfo1);
57301.1Skamil	ATF_TP_ADD_TC(tp, siginfo2);
57311.1Skamil	ATF_TP_ADD_TC(tp, siginfo3);
57321.1Skamil	ATF_TP_ADD_TC(tp, siginfo4);
57331.1Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, siginfo5);
57341.1Skamil	ATF_TP_ADD_TC_PT_STEP(tp, siginfo6);
57351.1Skamil
57361.1Skamil	ATF_TP_ADD_TC(tp, lwp_create1);
57371.1Skamil
57381.1Skamil	ATF_TP_ADD_TC(tp, lwp_exit1);
57391.1Skamil
57401.1Skamil	ATF_TP_ADD_TC(tp, signal1);
57411.1Skamil	ATF_TP_ADD_TC(tp, signal2);
57421.1Skamil	ATF_TP_ADD_TC(tp, signal3);
57431.1Skamil	ATF_TP_ADD_TC_PT_STEP(tp, signal4);
57441.1Skamil	ATF_TP_ADD_TC(tp, signal5);
57451.1Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, signal6);
57461.1Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, signal7);
57471.1Skamil	ATF_TP_ADD_TC(tp, signal8);
57481.1Skamil	ATF_TP_ADD_TC(tp, signal9);
57491.1Skamil	ATF_TP_ADD_TC(tp, signal10);
57501.1Skamil
57511.1Skamil	ATF_TP_ADD_TC(tp, suspend1);
57521.1Skamil	ATF_TP_ADD_TC(tp, suspend2);
57531.1Skamil
57541.1Skamil	ATF_TP_ADD_TC(tp, resume1);
57551.1Skamil
57561.1Skamil	ATF_TP_ADD_TC(tp, syscall1);
57571.1Skamil
57581.1Skamil	ATF_TP_ADD_TC(tp, syscallemu1);
57591.1Skamil
57601.1Skamil	ATF_TP_ADD_TCS_PTRACE_WAIT_AMD64();
57611.1Skamil	ATF_TP_ADD_TCS_PTRACE_WAIT_I386();
57621.1Skamil	ATF_TP_ADD_TCS_PTRACE_WAIT_X86();
57631.1Skamil
57641.1Skamil	return atf_no_error();
57651.1Skamil}
5766