t_ptrace_wait.c revision 1.65
11.65Skamil/*	$NetBSD: t_ptrace_wait.c,v 1.65 2018/08/13 21:36:55 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.65Skamil__RCSID("$NetBSD: t_ptrace_wait.c,v 1.65 2018/08/13 21:36:55 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.65Skamilstatic void
14331.65Skamilchild_attach_to_its_parent(bool stopped)
14341.1Skamil{
14351.1Skamil	struct msg_fds parent_tracee;
14361.1Skamil	const int exitval_tracer = 5;
14371.1Skamil	pid_t tracer, wpid;
14381.1Skamil	uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */
14391.1Skamil#if defined(TWAIT_HAVE_STATUS)
14401.1Skamil	int status;
14411.1Skamil#endif
14421.1Skamil
14431.13Schristos	DPRINTF("Spawn tracer\n");
14441.13Schristos	SYSCALL_REQUIRE(msg_open(&parent_tracee) == 0);
14451.1Skamil	tracer = atf_utils_fork();
14461.1Skamil	if (tracer == 0) {
14471.1Skamil		/* Wait for message from the parent */
14481.1Skamil		CHILD_FROM_PARENT("Message 1", parent_tracee, msg);
14491.1Skamil
14501.65Skamil		if (stopped) {
14511.65Skamil			DPRINTF("Await for a stopped parent PID %d\n",
14521.65Skamil			        getppid());
14531.65Skamil			await_stopped(getppid());
14541.65Skamil		}
14551.65Skamil
14561.13Schristos		DPRINTF("Attach to parent PID %d with PT_ATTACH from child\n",
14571.1Skamil		    getppid());
14581.1Skamil		FORKEE_ASSERT(ptrace(PT_ATTACH, getppid(), NULL, 0) != -1);
14591.1Skamil
14601.13Schristos		DPRINTF("Wait for the stopped parent process with %s()\n",
14611.1Skamil		    TWAIT_FNAME);
14621.1Skamil		FORKEE_REQUIRE_SUCCESS(
14631.1Skamil		    wpid = TWAIT_GENERIC(getppid(), &status, 0), getppid());
14641.1Skamil
14651.1Skamil		forkee_status_stopped(status, SIGSTOP);
14661.1Skamil
14671.13Schristos		DPRINTF("Resume parent with PT_DETACH\n");
14681.1Skamil		FORKEE_ASSERT(ptrace(PT_DETACH, getppid(), (void *)1, 0)
14691.1Skamil		    != -1);
14701.1Skamil
14711.1Skamil		/* Tell parent we are ready */
14721.1Skamil		CHILD_TO_PARENT("Message 1", parent_tracee, msg);
14731.1Skamil
14741.1Skamil		_exit(exitval_tracer);
14751.1Skamil	}
14761.1Skamil
14771.13Schristos	DPRINTF("Wait for the tracer to become ready\n");
14781.1Skamil	PARENT_TO_CHILD("Message 1", parent_tracee, msg);
14791.65Skamil
14801.65Skamil	if (stopped) {
14811.65Skamil		DPRINTF("Stop self PID %d\n", getpid());
14821.65Skamil		SYSCALL_REQUIRE(raise(SIGSTOP) != -1);
14831.65Skamil	}
14841.65Skamil
14851.13Schristos	DPRINTF("Allow the tracer to exit now\n");
14861.1Skamil	PARENT_FROM_CHILD("Message 1", parent_tracee, msg);
14871.1Skamil
14881.13Schristos	DPRINTF("Wait for tracer to exit with %s()\n", TWAIT_FNAME);
14891.1Skamil	TWAIT_REQUIRE_SUCCESS(
14901.1Skamil	    wpid = TWAIT_GENERIC(tracer, &status, 0), tracer);
14911.1Skamil
14921.1Skamil	validate_status_exited(status, exitval_tracer);
14931.1Skamil
14941.13Schristos	DPRINTF("Before calling %s() for tracer\n", TWAIT_FNAME);
14951.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD,
14961.1Skamil	    wpid = TWAIT_GENERIC(tracer, &status, 0));
14971.1Skamil
14981.1Skamil	msg_close(&parent_tracee);
14991.1Skamil}
15001.1Skamil
15011.65SkamilATF_TC(child_attach_to_its_parent);
15021.65SkamilATF_TC_HEAD(child_attach_to_its_parent, tc)
15031.65Skamil{
15041.65Skamil	atf_tc_set_md_var(tc, "descr",
15051.65Skamil	    "Assert that tracer child can PT_ATTACH to its parent");
15061.65Skamil}
15071.65Skamil
15081.65SkamilATF_TC_BODY(child_attach_to_its_parent, tc)
15091.65Skamil{
15101.65Skamil
15111.65Skamil	child_attach_to_its_parent(false);
15121.65Skamil}
15131.65Skamil
15141.65SkamilATF_TC(child_attach_to_its_stopped_parent);
15151.65SkamilATF_TC_HEAD(child_attach_to_its_stopped_parent, tc)
15161.65Skamil{
15171.65Skamil	atf_tc_set_md_var(tc, "descr",
15181.65Skamil	    "Assert that tracer child can PT_ATTACH to its stopped parent");
15191.65Skamil}
15201.65Skamil
15211.65SkamilATF_TC_BODY(child_attach_to_its_stopped_parent, tc)
15221.65Skamil{
15231.65Skamil	/*
15241.65Skamil	 * The ATF framework (atf-run) does not tolerate raise(SIGSTOP), as
15251.65Skamil	 * this causes a pipe (established from atf-run) to be broken.
15261.65Skamil	 * atf-run uses this mechanism to monitor whether a test is alive.
15271.65Skamil	 *
15281.65Skamil	 * As a workaround spawn this test as a subprocess.
15291.65Skamil	 */
15301.65Skamil
15311.65Skamil	const int exitval = 15;
15321.65Skamil	pid_t child, wpid;
15331.65Skamil#if defined(TWAIT_HAVE_STATUS)
15341.65Skamil	int status;
15351.65Skamil#endif
15361.65Skamil
15371.65Skamil	SYSCALL_REQUIRE((child = fork()) != -1);
15381.65Skamil	if (child == 0) {
15391.65Skamil		child_attach_to_its_parent(true);
15401.65Skamil		_exit(exitval);
15411.65Skamil	} else {
15421.65Skamil		DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
15431.65Skamil		TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
15441.65Skamil
15451.65Skamil		validate_status_exited(status, exitval);
15461.65Skamil
15471.65Skamil		DPRINTF("Before calling %s() for the exited child\n", TWAIT_FNAME);
15481.65Skamil		TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
15491.65Skamil	}
15501.65Skamil}
15511.65Skamil
15521.51Skamil/// ----------------------------------------------------------------------------
15531.51Skamil
15541.1Skamil#if defined(TWAIT_HAVE_PID)
15551.1Skamil
15561.51Skamilenum tracee_sees_its_original_parent_type {
15571.51Skamil	TRACEE_SEES_ITS_ORIGINAL_PARENT_GETPPID,
15581.51Skamil	TRACEE_SEES_ITS_ORIGINAL_PARENT_SYSCTL_KINFO_PROC2,
15591.51Skamil	TRACEE_SEES_ITS_ORIGINAL_PARENT_PROCFS_STATUS
15601.51Skamil};
15611.51Skamil
15621.51Skamilstatic void
15631.51Skamiltracee_sees_its_original_parent(enum tracee_sees_its_original_parent_type type)
15641.1Skamil{
15651.1Skamil	struct msg_fds parent_tracer, parent_tracee;
15661.1Skamil	const int exitval_tracee = 5;
15671.1Skamil	const int exitval_tracer = 10;
15681.1Skamil	pid_t parent, tracee, tracer, wpid;
15691.1Skamil	uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */
15701.1Skamil#if defined(TWAIT_HAVE_STATUS)
15711.1Skamil	int status;
15721.1Skamil#endif
15731.51Skamil	/* sysctl(3) - kinfo_proc2 */
15741.51Skamil	int name[CTL_MAXNAME];
15751.51Skamil	struct kinfo_proc2 kp;
15761.51Skamil	size_t len = sizeof(kp);
15771.51Skamil	unsigned int namelen;
15781.51Skamil
15791.51Skamil	/* procfs - status  */
15801.51Skamil	FILE *fp;
15811.51Skamil	struct stat st;
15821.51Skamil	const char *fname = "/proc/curproc/status";
15831.51Skamil	char s_executable[MAXPATHLEN];
15841.51Skamil	int s_pid, s_ppid;
15851.51Skamil	int rv;
15861.51Skamil
15871.51Skamil	if (type == TRACEE_SEES_ITS_ORIGINAL_PARENT_PROCFS_STATUS) {
15881.61Skre		SYSCALL_REQUIRE(
15891.61Skre		    (rv = stat(fname, &st)) == 0 || (errno == ENOENT));
15901.61Skre		if (rv != 0)
15911.51Skamil			atf_tc_skip("/proc/curproc/status not found");
15921.51Skamil	}
15931.1Skamil
15941.13Schristos	DPRINTF("Spawn tracee\n");
15951.13Schristos	SYSCALL_REQUIRE(msg_open(&parent_tracer) == 0);
15961.13Schristos	SYSCALL_REQUIRE(msg_open(&parent_tracee) == 0);
15971.1Skamil	tracee = atf_utils_fork();
15981.1Skamil	if (tracee == 0) {
15991.1Skamil		parent = getppid();
16001.1Skamil
16011.1Skamil		/* Emit message to the parent */
16021.1Skamil		CHILD_TO_PARENT("tracee ready", parent_tracee, msg);
16031.1Skamil		CHILD_FROM_PARENT("exit tracee", parent_tracee, msg);
16041.1Skamil
16051.51Skamil		switch (type) {
16061.51Skamil		case TRACEE_SEES_ITS_ORIGINAL_PARENT_GETPPID:
16071.51Skamil			FORKEE_ASSERT_EQ(parent, getppid());
16081.51Skamil			break;
16091.51Skamil		case TRACEE_SEES_ITS_ORIGINAL_PARENT_SYSCTL_KINFO_PROC2:
16101.51Skamil			namelen = 0;
16111.51Skamil			name[namelen++] = CTL_KERN;
16121.51Skamil			name[namelen++] = KERN_PROC2;
16131.51Skamil			name[namelen++] = KERN_PROC_PID;
16141.51Skamil			name[namelen++] = getpid();
16151.51Skamil			name[namelen++] = len;
16161.51Skamil			name[namelen++] = 1;
16171.51Skamil
16181.61Skre			FORKEE_ASSERT_EQ(
16191.61Skre			    sysctl(name, namelen, &kp, &len, NULL, 0), 0);
16201.51Skamil			FORKEE_ASSERT_EQ(parent, kp.p_ppid);
16211.51Skamil			break;
16221.51Skamil		case TRACEE_SEES_ITS_ORIGINAL_PARENT_PROCFS_STATUS:
16231.51Skamil			/*
16241.51Skamil			 * Format:
16251.51Skamil			 *  EXECUTABLE PID PPID ...
16261.51Skamil			 */
16271.51Skamil			FORKEE_ASSERT((fp = fopen(fname, "r")) != NULL);
16281.51Skamil			fscanf(fp, "%s %d %d", s_executable, &s_pid, &s_ppid);
16291.51Skamil			FORKEE_ASSERT_EQ(fclose(fp), 0);
16301.51Skamil			FORKEE_ASSERT_EQ(parent, s_ppid);
16311.51Skamil			break;
16321.51Skamil		}
16331.1Skamil
16341.1Skamil		_exit(exitval_tracee);
16351.1Skamil	}
16361.13Schristos	DPRINTF("Wait for child to record its parent identifier (pid)\n");
16371.1Skamil	PARENT_FROM_CHILD("tracee ready", parent_tracee, msg);
16381.1Skamil
16391.13Schristos	DPRINTF("Spawn debugger\n");
16401.1Skamil	tracer = atf_utils_fork();
16411.1Skamil	if (tracer == 0) {
16421.1Skamil		/* No IPC to communicate with the child */
16431.13Schristos		DPRINTF("Before calling PT_ATTACH from tracee %d\n", getpid());
16441.1Skamil		FORKEE_ASSERT(ptrace(PT_ATTACH, tracee, NULL, 0) != -1);
16451.1Skamil
16461.1Skamil		/* Wait for tracee and assert that it was stopped w/ SIGSTOP */
16471.1Skamil		FORKEE_REQUIRE_SUCCESS(
16481.1Skamil		    wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);
16491.1Skamil
16501.1Skamil		forkee_status_stopped(status, SIGSTOP);
16511.1Skamil
16521.1Skamil		/* Resume tracee with PT_CONTINUE */
16531.1Skamil		FORKEE_ASSERT(ptrace(PT_CONTINUE, tracee, (void *)1, 0) != -1);
16541.1Skamil
16551.1Skamil		/* Inform parent that tracer has attached to tracee */
16561.1Skamil		CHILD_TO_PARENT("tracer ready", parent_tracer, msg);
16571.1Skamil
16581.1Skamil		/* Wait for parent to tell use that tracee should have exited */
16591.1Skamil		CHILD_FROM_PARENT("wait for tracee exit", parent_tracer, msg);
16601.1Skamil
16611.1Skamil		/* Wait for tracee and assert that it exited */
16621.1Skamil		FORKEE_REQUIRE_SUCCESS(
16631.1Skamil		    wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);
16641.1Skamil
16651.1Skamil		forkee_status_exited(status, exitval_tracee);
16661.1Skamil
16671.13Schristos		DPRINTF("Before exiting of the tracer process\n");
16681.1Skamil		_exit(exitval_tracer);
16691.1Skamil	}
16701.1Skamil
16711.13Schristos	DPRINTF("Wait for the tracer to attach to the tracee\n");
16721.1Skamil	PARENT_FROM_CHILD("tracer ready",  parent_tracer, msg);
16731.1Skamil
16741.13Schristos	DPRINTF("Resume the tracee and let it exit\n");
16751.1Skamil	PARENT_TO_CHILD("exit tracee",  parent_tracee, msg);
16761.1Skamil
16771.13Schristos	DPRINTF("Detect that tracee is zombie\n");
16781.1Skamil	await_zombie(tracee);
16791.1Skamil
16801.13Schristos	DPRINTF("Assert that there is no status about tracee - "
16811.1Skamil	    "Tracer must detect zombie first - calling %s()\n", TWAIT_FNAME);
16821.1Skamil	TWAIT_REQUIRE_SUCCESS(
16831.1Skamil	    wpid = TWAIT_GENERIC(tracee, &status, WNOHANG), 0);
16841.1Skamil
16851.13Schristos	DPRINTF("Tell the tracer child should have exited\n");
16861.1Skamil	PARENT_TO_CHILD("wait for tracee exit",  parent_tracer, msg);
16871.1Skamil
16881.13Schristos	DPRINTF("Wait from tracer child to complete waiting for tracee\n");
16891.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracer, &status, 0),
16901.1Skamil	    tracer);
16911.1Skamil
16921.1Skamil	validate_status_exited(status, exitval_tracer);
16931.1Skamil
16941.13Schristos	DPRINTF("Wait for tracee to finish its job and exit - calling %s()\n",
16951.1Skamil	    TWAIT_FNAME);
16961.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracee, &status, WNOHANG),
16971.1Skamil	    tracee);
16981.1Skamil
16991.1Skamil	validate_status_exited(status, exitval_tracee);
17001.1Skamil
17011.1Skamil	msg_close(&parent_tracer);
17021.1Skamil	msg_close(&parent_tracee);
17031.1Skamil}
17041.1Skamil
17051.61Skre#define TRACEE_SEES_ITS_ORIGINAL_PARENT(test, type, descr)		\
17061.61SkreATF_TC(test);								\
17071.61SkreATF_TC_HEAD(test, tc)							\
17081.61Skre{									\
17091.61Skre	atf_tc_set_md_var(tc, "descr",					\
17101.61Skre	    "Assert that tracee sees its original parent when being traced " \
17111.61Skre	    "(check " descr ")");					\
17121.61Skre}									\
17131.61Skre									\
17141.61SkreATF_TC_BODY(test, tc)							\
17151.61Skre{									\
17161.61Skre									\
17171.61Skre	tracee_sees_its_original_parent(type);				\
17181.1Skamil}
17191.1Skamil
17201.51SkamilTRACEE_SEES_ITS_ORIGINAL_PARENT(
17211.51Skamil	tracee_sees_its_original_parent_getppid,
17221.51Skamil	TRACEE_SEES_ITS_ORIGINAL_PARENT_GETPPID,
17231.51Skamil	"getppid(2)");
17241.51SkamilTRACEE_SEES_ITS_ORIGINAL_PARENT(
17251.51Skamil	tracee_sees_its_original_parent_sysctl_kinfo_proc2,
17261.51Skamil	TRACEE_SEES_ITS_ORIGINAL_PARENT_SYSCTL_KINFO_PROC2,
17271.51Skamil	"sysctl(3) and kinfo_proc2");
17281.51SkamilTRACEE_SEES_ITS_ORIGINAL_PARENT(
17291.51Skamil	tracee_sees_its_original_parent_procfs_status,
17301.51Skamil	TRACEE_SEES_ITS_ORIGINAL_PARENT_PROCFS_STATUS,
17311.51Skamil	"the status file in procfs");
17321.1Skamil#endif
17331.1Skamil
17341.51Skamil/// ----------------------------------------------------------------------------
17351.1Skamil
17361.53Skamilstatic void
17371.53Skamileventmask_preserved(int event)
17381.1Skamil{
17391.1Skamil	const int exitval = 5;
17401.1Skamil	const int sigval = SIGSTOP;
17411.1Skamil	pid_t child, wpid;
17421.1Skamil#if defined(TWAIT_HAVE_STATUS)
17431.1Skamil	int status;
17441.1Skamil#endif
17451.1Skamil	ptrace_event_t set_event, get_event;
17461.1Skamil	const int len = sizeof(ptrace_event_t);
17471.1Skamil
17481.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
17491.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
17501.1Skamil	if (child == 0) {
17511.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
17521.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
17531.1Skamil
17541.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
17551.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
17561.1Skamil
17571.13Schristos		DPRINTF("Before exiting of the child process\n");
17581.1Skamil		_exit(exitval);
17591.1Skamil	}
17601.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
17611.1Skamil
17621.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
17631.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
17641.1Skamil
17651.1Skamil	validate_status_stopped(status, sigval);
17661.1Skamil
17671.53Skamil	set_event.pe_set_event = event;
17681.61Skre	SYSCALL_REQUIRE(
17691.61Skre	    ptrace(PT_SET_EVENT_MASK, child, &set_event, len) != -1);
17701.61Skre	SYSCALL_REQUIRE(
17711.61Skre	    ptrace(PT_GET_EVENT_MASK, child, &get_event, len) != -1);
17721.1Skamil	ATF_REQUIRE(memcmp(&set_event, &get_event, len) == 0);
17731.1Skamil
17741.13Schristos	DPRINTF("Before resuming the child process where it left off and "
17751.1Skamil	    "without signal to be sent\n");
17761.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
17771.1Skamil
17781.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
17791.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
17801.1Skamil
17811.1Skamil	validate_status_exited(status, exitval);
17821.1Skamil
17831.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
17841.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
17851.1Skamil}
17861.1Skamil
17871.61Skre#define EVENTMASK_PRESERVED(test, event)				\
17881.61SkreATF_TC(test);								\
17891.61SkreATF_TC_HEAD(test, tc)							\
17901.61Skre{									\
17911.61Skre	atf_tc_set_md_var(tc, "descr",					\
17921.61Skre	    "Verify that eventmask " #event " is preserved");		\
17931.61Skre}									\
17941.61Skre									\
17951.61SkreATF_TC_BODY(test, tc)							\
17961.61Skre{									\
17971.61Skre									\
17981.61Skre	eventmask_preserved(event);					\
17991.1Skamil}
18001.1Skamil
18011.53SkamilEVENTMASK_PRESERVED(eventmask_preserved_empty, 0)
18021.53SkamilEVENTMASK_PRESERVED(eventmask_preserved_fork, PTRACE_FORK)
18031.53SkamilEVENTMASK_PRESERVED(eventmask_preserved_vfork, PTRACE_VFORK)
18041.53SkamilEVENTMASK_PRESERVED(eventmask_preserved_vfork_done, PTRACE_VFORK_DONE)
18051.53SkamilEVENTMASK_PRESERVED(eventmask_preserved_lwp_create, PTRACE_LWP_CREATE)
18061.53SkamilEVENTMASK_PRESERVED(eventmask_preserved_lwp_exit, PTRACE_LWP_EXIT)
18071.1Skamil
18081.53Skamil/// ----------------------------------------------------------------------------
18091.1Skamil
18101.28Skamilstatic void
18111.32Skamilfork_body(pid_t (*fn)(void), bool trackfork, bool trackvfork,
18121.61Skre    bool trackvforkdone, bool detachchild, bool detachparent)
18131.1Skamil{
18141.1Skamil	const int exitval = 5;
18151.1Skamil	const int exitval2 = 15;
18161.1Skamil	const int sigval = SIGSTOP;
18171.31Skamil	pid_t child, child2 = 0, wpid;
18181.1Skamil#if defined(TWAIT_HAVE_STATUS)
18191.1Skamil	int status;
18201.1Skamil#endif
18211.1Skamil	ptrace_state_t state;
18221.1Skamil	const int slen = sizeof(state);
18231.1Skamil	ptrace_event_t event;
18241.1Skamil	const int elen = sizeof(event);
18251.1Skamil
18261.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
18271.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
18281.1Skamil	if (child == 0) {
18291.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
18301.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
18311.1Skamil
18321.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
18331.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
18341.1Skamil
18351.30Skamil		FORKEE_ASSERT((child2 = (fn)()) != -1);
18361.1Skamil
18371.1Skamil		if (child2 == 0)
18381.1Skamil			_exit(exitval2);
18391.1Skamil
18401.1Skamil		FORKEE_REQUIRE_SUCCESS
18411.1Skamil		    (wpid = TWAIT_GENERIC(child2, &status, 0), child2);
18421.1Skamil
18431.1Skamil		forkee_status_exited(status, exitval2);
18441.1Skamil
18451.13Schristos		DPRINTF("Before exiting of the child process\n");
18461.1Skamil		_exit(exitval);
18471.1Skamil	}
18481.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
18491.1Skamil
18501.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
18511.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
18521.1Skamil
18531.1Skamil	validate_status_stopped(status, sigval);
18541.1Skamil
18551.30Skamil	DPRINTF("Set 0%s%s%s in EVENT_MASK for the child %d\n",
18561.61Skre	    trackfork ? "|PTRACE_FORK" : "",
18571.61Skre	    trackvfork ? "|PTRACE_VFORK" : "",
18581.61Skre	    trackvforkdone ? "|PTRACE_VFORK_DONE" : "", child);
18591.30Skamil	event.pe_set_event = 0;
18601.30Skamil	if (trackfork)
18611.30Skamil		event.pe_set_event |= PTRACE_FORK;
18621.30Skamil	if (trackvfork)
18631.30Skamil		event.pe_set_event |= PTRACE_VFORK;
18641.30Skamil	if (trackvforkdone)
18651.30Skamil		event.pe_set_event |= PTRACE_VFORK_DONE;
18661.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);
18671.1Skamil
18681.13Schristos	DPRINTF("Before resuming the child process where it left off and "
18691.1Skamil	    "without signal to be sent\n");
18701.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
18711.1Skamil
18721.29Skamil#if defined(TWAIT_HAVE_PID)
18731.31Skamil	if ((trackfork && fn == fork) || (trackvfork && fn == vfork)) {
18741.29Skamil		DPRINTF("Before calling %s() for the child %d\n", TWAIT_FNAME,
18751.61Skre		    child);
18761.29Skamil		TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0),
18771.61Skre		    child);
18781.1Skamil
18791.29Skamil		validate_status_stopped(status, SIGTRAP);
18801.1Skamil
18811.61Skre		SYSCALL_REQUIRE(
18821.61Skre		    ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
18831.31Skamil		if (trackfork && fn == fork) {
18841.30Skamil			ATF_REQUIRE_EQ(state.pe_report_event & PTRACE_FORK,
18851.30Skamil			       PTRACE_FORK);
18861.30Skamil		}
18871.31Skamil		if (trackvfork && fn == vfork) {
18881.30Skamil			ATF_REQUIRE_EQ(state.pe_report_event & PTRACE_VFORK,
18891.30Skamil			       PTRACE_VFORK);
18901.30Skamil		}
18911.29Skamil
18921.29Skamil		child2 = state.pe_other_pid;
18931.30Skamil		DPRINTF("Reported ptrace event with forkee %d\n", child2);
18941.29Skamil
18951.29Skamil		DPRINTF("Before calling %s() for the forkee %d of the child "
18961.61Skre		    "%d\n", TWAIT_FNAME, child2, child);
18971.29Skamil		TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0),
18981.29Skamil		    child2);
18991.1Skamil
19001.29Skamil		validate_status_stopped(status, SIGTRAP);
19011.1Skamil
19021.61Skre		SYSCALL_REQUIRE(
19031.61Skre		    ptrace(PT_GET_PROCESS_STATE, child2, &state, slen) != -1);
19041.31Skamil		if (trackfork && fn == fork) {
19051.30Skamil			ATF_REQUIRE_EQ(state.pe_report_event & PTRACE_FORK,
19061.30Skamil			       PTRACE_FORK);
19071.30Skamil		}
19081.31Skamil		if (trackvfork && fn == vfork) {
19091.30Skamil			ATF_REQUIRE_EQ(state.pe_report_event & PTRACE_VFORK,
19101.30Skamil			       PTRACE_VFORK);
19111.30Skamil		}
19121.30Skamil
19131.29Skamil		ATF_REQUIRE_EQ(state.pe_other_pid, child);
19141.29Skamil
19151.29Skamil		DPRINTF("Before resuming the forkee process where it left off "
19161.29Skamil		    "and without signal to be sent\n");
19171.61Skre		SYSCALL_REQUIRE(
19181.61Skre		    ptrace(PT_CONTINUE, child2, (void *)1, 0) != -1);
19191.29Skamil
19201.29Skamil		DPRINTF("Before resuming the child process where it left off "
19211.61Skre		    "and without signal to be sent\n");
19221.29Skamil		SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
19231.30Skamil	}
19241.30Skamil#endif
19251.30Skamil
19261.31Skamil	if (trackvforkdone && fn == vfork) {
19271.30Skamil		DPRINTF("Before calling %s() for the child %d\n", TWAIT_FNAME,
19281.61Skre		    child);
19291.61Skre		TWAIT_REQUIRE_SUCCESS(
19301.61Skre		    wpid = TWAIT_GENERIC(child, &status, 0), child);
19311.30Skamil
19321.30Skamil		validate_status_stopped(status, SIGTRAP);
19331.30Skamil
19341.61Skre		SYSCALL_REQUIRE(
19351.61Skre		    ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
19361.30Skamil		ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_VFORK_DONE);
19371.30Skamil
19381.30Skamil		child2 = state.pe_other_pid;
19391.30Skamil		DPRINTF("Reported PTRACE_VFORK_DONE event with forkee %d\n",
19401.61Skre		    child2);
19411.30Skamil
19421.30Skamil		DPRINTF("Before resuming the child process where it left off "
19431.61Skre		    "and without signal to be sent\n");
19441.30Skamil		SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
19451.30Skamil	}
19461.29Skamil
19471.30Skamil#if defined(TWAIT_HAVE_PID)
19481.31Skamil	if ((trackfork && fn == fork) || (trackvfork && fn == vfork)) {
19491.29Skamil		DPRINTF("Before calling %s() for the forkee - expected exited"
19501.61Skre		    "\n", TWAIT_FNAME);
19511.61Skre		TWAIT_REQUIRE_SUCCESS(
19521.61Skre		    wpid = TWAIT_GENERIC(child2, &status, 0), child2);
19531.29Skamil
19541.29Skamil		validate_status_exited(status, exitval2);
19551.29Skamil
19561.29Skamil		DPRINTF("Before calling %s() for the forkee - expected no "
19571.61Skre		    "process\n", TWAIT_FNAME);
19581.29Skamil		TWAIT_REQUIRE_FAILURE(ECHILD,
19591.29Skamil		    wpid = TWAIT_GENERIC(child2, &status, 0));
19601.29Skamil	}
19611.29Skamil#endif
19621.1Skamil
19631.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
19641.1Skamil	    "SIGCHLD\n", TWAIT_FNAME);
19651.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
19661.1Skamil
19671.1Skamil	validate_status_stopped(status, SIGCHLD);
19681.1Skamil
19691.13Schristos	DPRINTF("Before resuming the child process where it left off and "
19701.1Skamil	    "without signal to be sent\n");
19711.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
19721.1Skamil
19731.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
19741.1Skamil	    TWAIT_FNAME);
19751.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
19761.1Skamil
19771.1Skamil	validate_status_exited(status, exitval);
19781.1Skamil
19791.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
19801.1Skamil	    TWAIT_FNAME);
19811.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
19821.1Skamil}
19831.28Skamil
19841.61Skre#define FORK_TEST(name,descr,fun,tfork,tvfork,tvforkdone,detchild,detparent) \
19851.61SkreATF_TC(name);								\
19861.61SkreATF_TC_HEAD(name, tc)							\
19871.61Skre{									\
19881.61Skre	atf_tc_set_md_var(tc, "descr", descr);				\
19891.61Skre}									\
19901.61Skre									\
19911.61SkreATF_TC_BODY(name, tc)							\
19921.61Skre{									\
19931.61Skre									\
19941.61Skre	fork_body(fun, tfork, tvfork, tvforkdone, detchild, detparent);	\
19951.32Skamil}
19961.32Skamil
19971.32Skamil#define F false
19981.32Skamil#define T true
19991.32Skamil
20001.32Skamil#define F_IF__0(x)
20011.32Skamil#define F_IF__1(x) x
20021.32Skamil#define F_IF__(x,y) F_IF__ ## x (y)
20031.32Skamil#define F_IF_(x,y) F_IF__(x,y)
20041.32Skamil#define F_IF(x,y) F_IF_(x,y)
20051.32Skamil
20061.61Skre#define DSCR(function,forkbit,vforkbit,vforkdonebit,dchildbit,dparentbit) \
20071.61Skre	"Verify " #function "(2) called with 0"				\
20081.61Skre	F_IF(forkbit,"|PTRACE_FORK")					\
20091.61Skre	F_IF(vforkbit,"|PTRACE_VFORK")					\
20101.61Skre	F_IF(vforkdonebit,"|PTRACE_VFORK_DONE")				\
20111.61Skre	" in EVENT_MASK."						\
20121.61Skre	F_IF(dchildbit," Detach child in this test.")			\
20131.61Skre	F_IF(dparentbit," Detach parent in this test.")
20141.1Skamil
20151.32SkamilFORK_TEST(fork1, DSCR(fork,0,0,0,0,0), fork, F, F, F, F, F)
20161.31Skamil#if defined(TWAIT_HAVE_PID)
20171.32SkamilFORK_TEST(fork2, DSCR(fork,1,0,0,0,0), fork, T, F, F, F, F)
20181.32SkamilFORK_TEST(fork3, DSCR(fork,0,1,0,0,0), fork, F, T, F, F, F)
20191.32SkamilFORK_TEST(fork4, DSCR(fork,1,1,0,0,0), fork, T, T, F, F, F)
20201.31Skamil#endif
20211.32SkamilFORK_TEST(fork5, DSCR(fork,0,0,1,0,0), fork, F, F, T, F, F)
20221.31Skamil#if defined(TWAIT_HAVE_PID)
20231.32SkamilFORK_TEST(fork6, DSCR(fork,1,0,1,0,0), fork, T, F, T, F, F)
20241.32SkamilFORK_TEST(fork7, DSCR(fork,0,1,1,0,0), fork, F, T, T, F, F)
20251.32SkamilFORK_TEST(fork8, DSCR(fork,1,1,1,0,0), fork, T, T, T, F, F)
20261.31Skamil#endif
20271.1Skamil
20281.32SkamilFORK_TEST(vfork1, DSCR(vfork,0,0,0,0,0), vfork, F, F, F, F, F)
20291.31Skamil#if defined(TWAIT_HAVE_PID)
20301.32SkamilFORK_TEST(vfork2, DSCR(vfork,1,0,0,0,0), vfork, T, F, F, F, F)
20311.32SkamilFORK_TEST(vfork3, DSCR(vfork,0,1,0,0,0), vfork, F, T, F, F, F)
20321.32SkamilFORK_TEST(vfork4, DSCR(vfork,1,1,0,0,0), vfork, T, T, F, F, F)
20331.31Skamil#endif
20341.32SkamilFORK_TEST(vfork5, DSCR(vfork,0,0,1,0,0), vfork, F, F, T, F, F)
20351.31Skamil#if defined(TWAIT_HAVE_PID)
20361.32SkamilFORK_TEST(vfork6, DSCR(vfork,1,0,1,0,0), vfork, T, F, T, F, F)
20371.32SkamilFORK_TEST(vfork7, DSCR(vfork,0,1,1,0,0), vfork, F, T, T, F, F)
20381.32SkamilFORK_TEST(vfork8, DSCR(vfork,1,1,1,0,0), vfork, T, T, T, F, F)
20391.31Skamil#endif
20401.31Skamil
20411.54Skamil/// ----------------------------------------------------------------------------
20421.31Skamil
20431.54Skamilenum bytes_transfer_type {
20441.54Skamil	BYTES_TRANSFER_DATA,
20451.54Skamil	BYTES_TRANSFER_DATAIO,
20461.54Skamil	BYTES_TRANSFER_TEXT,
20471.54Skamil	BYTES_TRANSFER_TEXTIO,
20481.54Skamil	BYTES_TRANSFER_AUXV
20491.54Skamil};
20501.31Skamil
20511.54Skamilstatic int __used
20521.54Skamilbytes_transfer_dummy(int a, int b, int c, int d)
20531.54Skamil{
20541.54Skamil	int e, f, g, h;
20551.1Skamil
20561.54Skamil	a *= 4;
20571.54Skamil	b += 3;
20581.54Skamil	c -= 2;
20591.54Skamil	d /= 1;
20601.1Skamil
20611.54Skamil	e = strtol("10", NULL, 10);
20621.54Skamil	f = strtol("20", NULL, 10);
20631.54Skamil	g = strtol("30", NULL, 10);
20641.54Skamil	h = strtol("40", NULL, 10);
20651.1Skamil
20661.54Skamil	return (a + b * c - d) + (e * f - g / h);
20671.1Skamil}
20681.1Skamil
20691.54Skamilstatic void
20701.55Schristosbytes_transfer(int operation, size_t size, enum bytes_transfer_type type)
20711.1Skamil{
20721.1Skamil	const int exitval = 5;
20731.1Skamil	const int sigval = SIGSTOP;
20741.1Skamil	pid_t child, wpid;
20751.54Skamil	bool skip = false;
20761.1Skamil
20771.54Skamil	int lookup_me = 0;
20781.54Skamil	uint8_t lookup_me8 = 0;
20791.54Skamil	uint16_t lookup_me16 = 0;
20801.54Skamil	uint32_t lookup_me32 = 0;
20811.54Skamil	uint64_t lookup_me64 = 0;
20821.1Skamil
20831.54Skamil	int magic = 0x13579246;
20841.54Skamil	uint8_t magic8 = 0xab;
20851.54Skamil	uint16_t magic16 = 0x1234;
20861.54Skamil	uint32_t magic32 = 0x98765432;
20871.54Skamil	uint64_t magic64 = 0xabcdef0123456789;
20881.1Skamil
20891.54Skamil	struct ptrace_io_desc io;
20901.1Skamil#if defined(TWAIT_HAVE_STATUS)
20911.1Skamil	int status;
20921.1Skamil#endif
20931.60Skre	/* 513 is just enough, for the purposes of ATF it's good enough */
20941.60Skre	AuxInfo ai[513], *aip;
20951.55Schristos
20961.55Schristos	ATF_REQUIRE(size < sizeof(ai));
20971.1Skamil
20981.54Skamil	/* Prepare variables for .TEXT transfers */
20991.54Skamil	switch (type) {
21001.54Skamil	case BYTES_TRANSFER_TEXT:
21011.54Skamil		memcpy(&magic, bytes_transfer_dummy, sizeof(magic));
21021.54Skamil		break;
21031.54Skamil	case BYTES_TRANSFER_TEXTIO:
21041.54Skamil		switch (size) {
21051.54Skamil		case 8:
21061.54Skamil			memcpy(&magic8, bytes_transfer_dummy, sizeof(magic8));
21071.54Skamil			break;
21081.54Skamil		case 16:
21091.54Skamil			memcpy(&magic16, bytes_transfer_dummy, sizeof(magic16));
21101.54Skamil			break;
21111.54Skamil		case 32:
21121.54Skamil			memcpy(&magic32, bytes_transfer_dummy, sizeof(magic32));
21131.54Skamil			break;
21141.54Skamil		case 64:
21151.54Skamil			memcpy(&magic64, bytes_transfer_dummy, sizeof(magic64));
21161.54Skamil			break;
21171.54Skamil		}
21181.54Skamil		break;
21191.54Skamil	default:
21201.54Skamil		break;
21211.54Skamil	}
21221.1Skamil
21231.54Skamil	/* Prepare variables for PIOD and AUXV transfers */
21241.54Skamil	switch (type) {
21251.54Skamil	case BYTES_TRANSFER_TEXTIO:
21261.54Skamil	case BYTES_TRANSFER_DATAIO:
21271.54Skamil		io.piod_op = operation;
21281.54Skamil		switch (size) {
21291.54Skamil		case 8:
21301.54Skamil			io.piod_offs = (type == BYTES_TRANSFER_TEXTIO) ?
21311.54Skamil			               (void *)bytes_transfer_dummy :
21321.54Skamil			               &lookup_me8;
21331.54Skamil			io.piod_addr = &lookup_me8;
21341.54Skamil			io.piod_len = sizeof(lookup_me8);
21351.54Skamil			break;
21361.54Skamil		case 16:
21371.54Skamil			io.piod_offs = (type == BYTES_TRANSFER_TEXTIO) ?
21381.54Skamil			               (void *)bytes_transfer_dummy :
21391.54Skamil			               &lookup_me16;
21401.54Skamil			io.piod_addr = &lookup_me16;
21411.54Skamil			io.piod_len = sizeof(lookup_me16);
21421.54Skamil			break;
21431.54Skamil		case 32:
21441.54Skamil			io.piod_offs = (type == BYTES_TRANSFER_TEXTIO) ?
21451.54Skamil			               (void *)bytes_transfer_dummy :
21461.54Skamil			               &lookup_me32;
21471.54Skamil			io.piod_addr = &lookup_me32;
21481.54Skamil			io.piod_len = sizeof(lookup_me32);
21491.54Skamil			break;
21501.54Skamil		case 64:
21511.54Skamil			io.piod_offs = (type == BYTES_TRANSFER_TEXTIO) ?
21521.54Skamil			               (void *)bytes_transfer_dummy :
21531.54Skamil			               &lookup_me64;
21541.54Skamil			io.piod_addr = &lookup_me64;
21551.54Skamil			io.piod_len = sizeof(lookup_me64);
21561.54Skamil			break;
21571.54Skamil		default:
21581.54Skamil			break;
21591.54Skamil		}
21601.54Skamil		break;
21611.54Skamil	case BYTES_TRANSFER_AUXV:
21621.54Skamil		io.piod_op = operation;
21631.54Skamil		io.piod_offs = 0;
21641.54Skamil		io.piod_addr = ai;
21651.54Skamil		io.piod_len = size;
21661.54Skamil		break;
21671.54Skamil	default:
21681.54Skamil		break;
21691.1Skamil	}
21701.1Skamil
21711.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
21721.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
21731.1Skamil	if (child == 0) {
21741.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
21751.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
21761.1Skamil
21771.54Skamil		switch (type) {
21781.54Skamil		case BYTES_TRANSFER_DATA:
21791.54Skamil			switch (operation) {
21801.54Skamil			case PT_READ_D:
21811.54Skamil			case PT_READ_I:
21821.54Skamil				lookup_me = magic;
21831.54Skamil				break;
21841.54Skamil			default:
21851.54Skamil				break;
21861.54Skamil			}
21871.54Skamil			break;
21881.54Skamil		case BYTES_TRANSFER_DATAIO:
21891.54Skamil			switch (operation) {
21901.54Skamil			case PIOD_READ_D:
21911.54Skamil			case PIOD_READ_I:
21921.54Skamil				switch (size) {
21931.54Skamil				case 8:
21941.54Skamil					lookup_me8 = magic8;
21951.54Skamil					break;
21961.54Skamil				case 16:
21971.54Skamil					lookup_me16 = magic16;
21981.54Skamil					break;
21991.54Skamil				case 32:
22001.54Skamil					lookup_me32 = magic32;
22011.54Skamil					break;
22021.54Skamil				case 64:
22031.54Skamil					lookup_me64 = magic64;
22041.54Skamil					break;
22051.54Skamil				default:
22061.54Skamil					break;
22071.54Skamil				}
22081.54Skamil				break;
22091.54Skamil			default:
22101.54Skamil				break;
22111.54Skamil			}
22121.54Skamil		default:
22131.54Skamil			break;
22141.54Skamil		}
22151.54Skamil
22161.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
22171.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
22181.1Skamil
22191.54Skamil		/* Handle PIOD and PT separately as operation values overlap */
22201.54Skamil		switch (type) {
22211.54Skamil		case BYTES_TRANSFER_DATA:
22221.54Skamil			switch (operation) {
22231.54Skamil			case PT_WRITE_D:
22241.54Skamil			case PT_WRITE_I:
22251.54Skamil				FORKEE_ASSERT_EQ(lookup_me, magic);
22261.54Skamil				break;
22271.54Skamil			default:
22281.54Skamil				break;
22291.54Skamil			}
22301.54Skamil			break;
22311.54Skamil		case BYTES_TRANSFER_DATAIO:
22321.54Skamil			switch (operation) {
22331.54Skamil			case PIOD_WRITE_D:
22341.54Skamil			case PIOD_WRITE_I:
22351.54Skamil				switch (size) {
22361.54Skamil				case 8:
22371.54Skamil					FORKEE_ASSERT_EQ(lookup_me8, magic8);
22381.54Skamil					break;
22391.54Skamil				case 16:
22401.54Skamil					FORKEE_ASSERT_EQ(lookup_me16, magic16);
22411.54Skamil					break;
22421.54Skamil				case 32:
22431.54Skamil					FORKEE_ASSERT_EQ(lookup_me32, magic32);
22441.54Skamil					break;
22451.54Skamil				case 64:
22461.54Skamil					FORKEE_ASSERT_EQ(lookup_me64, magic64);
22471.54Skamil					break;
22481.54Skamil				default:
22491.54Skamil					break;
22501.54Skamil				}
22511.54Skamil				break;
22521.54Skamil			default:
22531.54Skamil				break;
22541.54Skamil			}
22551.54Skamil			break;
22561.54Skamil		case BYTES_TRANSFER_TEXT:
22571.54Skamil			FORKEE_ASSERT(memcmp(&magic, bytes_transfer_dummy,
22581.54Skamil			                     sizeof(magic)) == 0);
22591.54Skamil			break;
22601.54Skamil		case BYTES_TRANSFER_TEXTIO:
22611.54Skamil			switch (size) {
22621.54Skamil			case 8:
22631.54Skamil				FORKEE_ASSERT(memcmp(&magic8,
22641.54Skamil				                     bytes_transfer_dummy,
22651.54Skamil				                     sizeof(magic8)) == 0);
22661.54Skamil				break;
22671.54Skamil			case 16:
22681.54Skamil				FORKEE_ASSERT(memcmp(&magic16,
22691.54Skamil				                     bytes_transfer_dummy,
22701.54Skamil				                     sizeof(magic16)) == 0);
22711.54Skamil				break;
22721.54Skamil			case 32:
22731.54Skamil				FORKEE_ASSERT(memcmp(&magic32,
22741.54Skamil				                     bytes_transfer_dummy,
22751.54Skamil				                     sizeof(magic32)) == 0);
22761.54Skamil				break;
22771.54Skamil			case 64:
22781.54Skamil				FORKEE_ASSERT(memcmp(&magic64,
22791.54Skamil				                     bytes_transfer_dummy,
22801.54Skamil				                     sizeof(magic64)) == 0);
22811.54Skamil				break;
22821.54Skamil			}
22831.54Skamil			break;
22841.54Skamil		default:
22851.54Skamil			break;
22861.54Skamil		}
22871.54Skamil
22881.13Schristos		DPRINTF("Before exiting of the child process\n");
22891.1Skamil		_exit(exitval);
22901.1Skamil	}
22911.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
22921.1Skamil
22931.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
22941.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
22951.1Skamil
22961.1Skamil	validate_status_stopped(status, sigval);
22971.1Skamil
22981.54Skamil	/* Check PaX MPROTECT */
22991.54Skamil	if (!can_we_write_to_text(child)) {
23001.54Skamil		switch (type) {
23011.54Skamil		case BYTES_TRANSFER_TEXTIO:
23021.54Skamil			switch (operation) {
23031.54Skamil			case PIOD_WRITE_D:
23041.54Skamil			case PIOD_WRITE_I:
23051.54Skamil				skip = true;
23061.54Skamil				break;
23071.54Skamil			default:
23081.54Skamil				break;
23091.54Skamil			}
23101.54Skamil			break;
23111.54Skamil		case BYTES_TRANSFER_TEXT:
23121.54Skamil			switch (operation) {
23131.54Skamil			case PT_WRITE_D:
23141.54Skamil			case PT_WRITE_I:
23151.54Skamil				skip = true;
23161.54Skamil				break;
23171.54Skamil			default:
23181.54Skamil				break;
23191.54Skamil			}
23201.54Skamil			break;
23211.54Skamil		default:
23221.54Skamil			break;
23231.54Skamil		}
23241.54Skamil	}
23251.1Skamil
23261.54Skamil	/* Bailout cleanly killing the child process */
23271.54Skamil	if (skip) {
23281.54Skamil		SYSCALL_REQUIRE(ptrace(PT_KILL, child, (void *)1, 0) != -1);
23291.54Skamil		DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
23301.54Skamil		TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0),
23311.54Skamil		                      child);
23321.1Skamil
23331.54Skamil		validate_status_signaled(status, SIGKILL, 0);
23341.1Skamil
23351.54Skamil		atf_tc_skip("PaX MPROTECT setup prevents writes to .text");
23361.54Skamil	}
23371.1Skamil
23381.54Skamil	DPRINTF("Calling operation to transfer bytes between child=%d and "
23391.54Skamil	       "parent=%d\n", child, getpid());
23401.1Skamil
23411.54Skamil	switch (type) {
23421.54Skamil	case BYTES_TRANSFER_TEXTIO:
23431.54Skamil	case BYTES_TRANSFER_DATAIO:
23441.54Skamil	case BYTES_TRANSFER_AUXV:
23451.54Skamil		switch (operation) {
23461.54Skamil		case PIOD_WRITE_D:
23471.54Skamil		case PIOD_WRITE_I:
23481.54Skamil			switch (size) {
23491.54Skamil			case 8:
23501.54Skamil				lookup_me8 = magic8;
23511.54Skamil				break;
23521.54Skamil			case 16:
23531.54Skamil				lookup_me16 = magic16;
23541.54Skamil				break;
23551.54Skamil			case 32:
23561.54Skamil				lookup_me32 = magic32;
23571.54Skamil				break;
23581.54Skamil			case 64:
23591.54Skamil				lookup_me64 = magic64;
23601.54Skamil				break;
23611.54Skamil			default:
23621.54Skamil				break;
23631.54Skamil			}
23641.54Skamil			break;
23651.54Skamil		default:
23661.54Skamil			break;
23671.54Skamil		}
23681.54Skamil		SYSCALL_REQUIRE(ptrace(PT_IO, child, &io, 0) != -1);
23691.54Skamil		switch (operation) {
23701.54Skamil		case PIOD_READ_D:
23711.54Skamil		case PIOD_READ_I:
23721.54Skamil			switch (size) {
23731.54Skamil			case 8:
23741.54Skamil				ATF_REQUIRE_EQ(lookup_me8, magic8);
23751.54Skamil				break;
23761.54Skamil			case 16:
23771.54Skamil				ATF_REQUIRE_EQ(lookup_me16, magic16);
23781.54Skamil				break;
23791.54Skamil			case 32:
23801.54Skamil				ATF_REQUIRE_EQ(lookup_me32, magic32);
23811.54Skamil				break;
23821.54Skamil			case 64:
23831.54Skamil				ATF_REQUIRE_EQ(lookup_me64, magic64);
23841.54Skamil				break;
23851.54Skamil			default:
23861.54Skamil				break;
23871.54Skamil			}
23881.54Skamil			break;
23891.54Skamil		case PIOD_READ_AUXV:
23901.54Skamil			DPRINTF("Asserting that AUXV length (%zu) is > 0\n",
23911.54Skamil			        io.piod_len);
23921.54Skamil			ATF_REQUIRE(io.piod_len > 0);
23931.54Skamil			for (aip = ai; aip->a_type != AT_NULL; aip++)
23941.54Skamil				DPRINTF("a_type=%#llx a_v=%#llx\n",
23951.54Skamil				    (long long int)aip->a_type,
23961.54Skamil				    (long long int)aip->a_v);
23971.54Skamil			break;
23981.54Skamil		default:
23991.54Skamil			break;
24001.54Skamil		}
24011.54Skamil		break;
24021.54Skamil	case BYTES_TRANSFER_TEXT:
24031.54Skamil		switch (operation) {
24041.54Skamil		case PT_READ_D:
24051.54Skamil		case PT_READ_I:
24061.54Skamil			errno = 0;
24071.54Skamil			lookup_me = ptrace(operation, child,
24081.54Skamil			                   bytes_transfer_dummy, 0);
24091.54Skamil			ATF_REQUIRE_EQ(lookup_me, magic);
24101.54Skamil			SYSCALL_REQUIRE_ERRNO(errno, 0);
24111.54Skamil			break;
24121.54Skamil		case PT_WRITE_D:
24131.54Skamil		case PT_WRITE_I:
24141.54Skamil			SYSCALL_REQUIRE(ptrace(operation, child,
24151.54Skamil			                       bytes_transfer_dummy, magic)
24161.54Skamil			                != -1);
24171.54Skamil			break;
24181.54Skamil		default:
24191.54Skamil			break;
24201.54Skamil		}
24211.54Skamil		break;
24221.54Skamil	case BYTES_TRANSFER_DATA:
24231.54Skamil		switch (operation) {
24241.54Skamil		case PT_READ_D:
24251.54Skamil		case PT_READ_I:
24261.54Skamil			errno = 0;
24271.54Skamil			lookup_me = ptrace(operation, child, &lookup_me, 0);
24281.54Skamil			ATF_REQUIRE_EQ(lookup_me, magic);
24291.54Skamil			SYSCALL_REQUIRE_ERRNO(errno, 0);
24301.54Skamil			break;
24311.54Skamil		case PT_WRITE_D:
24321.54Skamil		case PT_WRITE_I:
24331.54Skamil			lookup_me = magic;
24341.54Skamil			SYSCALL_REQUIRE(ptrace(operation, child, &lookup_me,
24351.54Skamil			                       magic) != -1);
24361.54Skamil			break;
24371.54Skamil		default:
24381.54Skamil			break;
24391.54Skamil		}
24401.54Skamil		break;
24411.54Skamil	default:
24421.54Skamil		break;
24431.54Skamil	}
24441.1Skamil
24451.13Schristos	DPRINTF("Before resuming the child process where it left off and "
24461.1Skamil	    "without signal to be sent\n");
24471.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
24481.1Skamil
24491.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
24501.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
24511.1Skamil
24521.1Skamil	validate_status_exited(status, exitval);
24531.1Skamil
24541.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
24551.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
24561.1Skamil}
24571.1Skamil
24581.61Skre#define BYTES_TRANSFER(test, operation, size, type)			\
24591.61SkreATF_TC(test);								\
24601.61SkreATF_TC_HEAD(test, tc)							\
24611.61Skre{									\
24621.61Skre	atf_tc_set_md_var(tc, "descr",					\
24631.61Skre	    "Verify bytes transfer operation" #operation " and size " #size \
24641.61Skre	    " of type " #type);						\
24651.61Skre}									\
24661.61Skre									\
24671.61SkreATF_TC_BODY(test, tc)							\
24681.61Skre{									\
24691.61Skre									\
24701.61Skre	bytes_transfer(operation, size, BYTES_TRANSFER_##type);		\
24711.1Skamil}
24721.1Skamil
24731.54Skamil// DATA
24741.1Skamil
24751.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_d_8, PIOD_READ_D, 8, DATAIO)
24761.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_d_16, PIOD_READ_D, 16, DATAIO)
24771.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_d_32, PIOD_READ_D, 32, DATAIO)
24781.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_d_64, PIOD_READ_D, 64, DATAIO)
24791.54Skamil
24801.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_i_8, PIOD_READ_I, 8, DATAIO)
24811.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_i_16, PIOD_READ_I, 16, DATAIO)
24821.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_i_32, PIOD_READ_I, 32, DATAIO)
24831.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_i_64, PIOD_READ_I, 64, DATAIO)
24841.54Skamil
24851.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_d_8, PIOD_WRITE_D, 8, DATAIO)
24861.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_d_16, PIOD_WRITE_D, 16, DATAIO)
24871.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_d_32, PIOD_WRITE_D, 32, DATAIO)
24881.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_d_64, PIOD_WRITE_D, 64, DATAIO)
24891.54Skamil
24901.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_i_8, PIOD_WRITE_I, 8, DATAIO)
24911.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_i_16, PIOD_WRITE_I, 16, DATAIO)
24921.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_i_32, PIOD_WRITE_I, 32, DATAIO)
24931.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_i_64, PIOD_WRITE_I, 64, DATAIO)
24941.54Skamil
24951.54SkamilBYTES_TRANSFER(bytes_transfer_read_d, PT_READ_D, 32, DATA)
24961.54SkamilBYTES_TRANSFER(bytes_transfer_read_i, PT_READ_I, 32, DATA)
24971.54SkamilBYTES_TRANSFER(bytes_transfer_write_d, PT_WRITE_D, 32, DATA)
24981.54SkamilBYTES_TRANSFER(bytes_transfer_write_i, PT_WRITE_I, 32, DATA)
24991.54Skamil
25001.54Skamil// TEXT
25011.54Skamil
25021.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_d_8_text, PIOD_READ_D, 8, TEXTIO)
25031.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_d_16_text, PIOD_READ_D, 16, TEXTIO)
25041.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_d_32_text, PIOD_READ_D, 32, TEXTIO)
25051.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_d_64_text, PIOD_READ_D, 64, TEXTIO)
25061.54Skamil
25071.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_i_8_text, PIOD_READ_I, 8, TEXTIO)
25081.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_i_16_text, PIOD_READ_I, 16, TEXTIO)
25091.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_i_32_text, PIOD_READ_I, 32, TEXTIO)
25101.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_i_64_text, PIOD_READ_I, 64, TEXTIO)
25111.54Skamil
25121.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_d_8_text, PIOD_WRITE_D, 8, TEXTIO)
25131.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_d_16_text, PIOD_WRITE_D, 16, TEXTIO)
25141.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_d_32_text, PIOD_WRITE_D, 32, TEXTIO)
25151.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_d_64_text, PIOD_WRITE_D, 64, TEXTIO)
25161.54Skamil
25171.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_i_8_text, PIOD_WRITE_I, 8, TEXTIO)
25181.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_i_16_text, PIOD_WRITE_I, 16, TEXTIO)
25191.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_i_32_text, PIOD_WRITE_I, 32, TEXTIO)
25201.54SkamilBYTES_TRANSFER(bytes_transfer_piod_write_i_64_text, PIOD_WRITE_I, 64, TEXTIO)
25211.54Skamil
25221.54SkamilBYTES_TRANSFER(bytes_transfer_read_d_text, PT_READ_D, 32, TEXT)
25231.54SkamilBYTES_TRANSFER(bytes_transfer_read_i_text, PT_READ_I, 32, TEXT)
25241.54SkamilBYTES_TRANSFER(bytes_transfer_write_d_text, PT_WRITE_D, 32, TEXT)
25251.54SkamilBYTES_TRANSFER(bytes_transfer_write_i_text, PT_WRITE_I, 32, TEXT)
25261.1Skamil
25271.54Skamil// AUXV
25281.1Skamil
25291.54SkamilBYTES_TRANSFER(bytes_transfer_piod_read_auxv, PIOD_READ_AUXV, 4096, AUXV)
25301.1Skamil
25311.54Skamil/// ----------------------------------------------------------------------------
25321.1Skamil
25331.1Skamil#if defined(HAVE_GPREGS)
25341.1SkamilATF_TC(regs1);
25351.1SkamilATF_TC_HEAD(regs1, tc)
25361.1Skamil{
25371.1Skamil	atf_tc_set_md_var(tc, "descr",
25381.1Skamil	    "Verify plain PT_GETREGS call without further steps");
25391.1Skamil}
25401.1Skamil
25411.1SkamilATF_TC_BODY(regs1, tc)
25421.1Skamil{
25431.1Skamil	const int exitval = 5;
25441.1Skamil	const int sigval = SIGSTOP;
25451.1Skamil	pid_t child, wpid;
25461.1Skamil#if defined(TWAIT_HAVE_STATUS)
25471.1Skamil	int status;
25481.1Skamil#endif
25491.1Skamil	struct reg r;
25501.1Skamil
25511.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
25521.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
25531.1Skamil	if (child == 0) {
25541.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
25551.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
25561.1Skamil
25571.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
25581.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
25591.1Skamil
25601.13Schristos		DPRINTF("Before exiting of the child process\n");
25611.1Skamil		_exit(exitval);
25621.1Skamil	}
25631.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
25641.1Skamil
25651.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
25661.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
25671.1Skamil
25681.1Skamil	validate_status_stopped(status, sigval);
25691.1Skamil
25701.13Schristos	DPRINTF("Call GETREGS for the child process\n");
25711.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GETREGS, child, &r, 0) != -1);
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(regs2);
25891.1SkamilATF_TC_HEAD(regs2, tc)
25901.1Skamil{
25911.1Skamil	atf_tc_set_md_var(tc, "descr",
25921.1Skamil	    "Verify plain PT_GETREGS call and retrieve PC");
25931.1Skamil}
25941.1Skamil
25951.1SkamilATF_TC_BODY(regs2, 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 PC=%" PRIxREGISTER "\n", PTRACE_REG_PC(&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(regs3);
26451.1SkamilATF_TC_HEAD(regs3, tc)
26461.1Skamil{
26471.1Skamil	atf_tc_set_md_var(tc, "descr",
26481.1Skamil	    "Verify plain PT_GETREGS call and retrieve SP");
26491.1Skamil}
26501.1Skamil
26511.1SkamilATF_TC_BODY(regs3, 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 SP=%" PRIxREGISTER "\n", PTRACE_REG_SP(&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(regs4);
27011.1SkamilATF_TC_HEAD(regs4, tc)
27021.1Skamil{
27031.1Skamil	atf_tc_set_md_var(tc, "descr",
27041.1Skamil	    "Verify plain PT_GETREGS call and retrieve INTRV");
27051.1Skamil}
27061.1Skamil
27071.1SkamilATF_TC_BODY(regs4, 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("Retrieved INTRV=%" PRIxREGISTER "\n", PTRACE_REG_INTRV(&r));
27401.1Skamil
27411.13Schristos	DPRINTF("Before resuming the child process where it left off and "
27421.1Skamil	    "without signal to be sent\n");
27431.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
27441.1Skamil
27451.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
27461.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
27471.1Skamil
27481.1Skamil	validate_status_exited(status, exitval);
27491.1Skamil
27501.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
27511.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
27521.1Skamil}
27531.1Skamil#endif
27541.1Skamil
27551.1Skamil#if defined(HAVE_GPREGS)
27561.1SkamilATF_TC(regs5);
27571.1SkamilATF_TC_HEAD(regs5, tc)
27581.1Skamil{
27591.1Skamil	atf_tc_set_md_var(tc, "descr",
27601.1Skamil	    "Verify PT_GETREGS and PT_SETREGS calls without changing regs");
27611.1Skamil}
27621.1Skamil
27631.1SkamilATF_TC_BODY(regs5, tc)
27641.1Skamil{
27651.1Skamil	const int exitval = 5;
27661.1Skamil	const int sigval = SIGSTOP;
27671.1Skamil	pid_t child, wpid;
27681.1Skamil#if defined(TWAIT_HAVE_STATUS)
27691.1Skamil	int status;
27701.1Skamil#endif
27711.1Skamil	struct reg r;
27721.1Skamil
27731.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
27741.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
27751.1Skamil	if (child == 0) {
27761.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
27771.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
27781.1Skamil
27791.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
27801.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
27811.1Skamil
27821.13Schristos		DPRINTF("Before exiting of the child process\n");
27831.1Skamil		_exit(exitval);
27841.1Skamil	}
27851.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
27861.1Skamil
27871.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
27881.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
27891.1Skamil
27901.1Skamil	validate_status_stopped(status, sigval);
27911.1Skamil
27921.13Schristos	DPRINTF("Call GETREGS for the child process\n");
27931.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GETREGS, child, &r, 0) != -1);
27941.1Skamil
27951.13Schristos	DPRINTF("Call SETREGS for the child process (without changed regs)\n");
27961.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GETREGS, child, &r, 0) != -1);
27971.1Skamil
27981.13Schristos	DPRINTF("Before resuming the child process where it left off and "
27991.1Skamil	    "without signal to be sent\n");
28001.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
28011.1Skamil
28021.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
28031.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
28041.1Skamil
28051.1Skamil	validate_status_exited(status, exitval);
28061.1Skamil
28071.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
28081.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
28091.1Skamil}
28101.1Skamil#endif
28111.1Skamil
28121.1Skamil#if defined(HAVE_FPREGS)
28131.1SkamilATF_TC(fpregs1);
28141.1SkamilATF_TC_HEAD(fpregs1, tc)
28151.1Skamil{
28161.1Skamil	atf_tc_set_md_var(tc, "descr",
28171.1Skamil	    "Verify plain PT_GETFPREGS call without further steps");
28181.1Skamil}
28191.1Skamil
28201.1SkamilATF_TC_BODY(fpregs1, tc)
28211.1Skamil{
28221.1Skamil	const int exitval = 5;
28231.1Skamil	const int sigval = SIGSTOP;
28241.1Skamil	pid_t child, wpid;
28251.1Skamil#if defined(TWAIT_HAVE_STATUS)
28261.1Skamil	int status;
28271.1Skamil#endif
28281.1Skamil	struct fpreg r;
28291.1Skamil
28301.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
28311.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
28321.1Skamil	if (child == 0) {
28331.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
28341.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
28351.1Skamil
28361.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
28371.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
28381.1Skamil
28391.13Schristos		DPRINTF("Before exiting of the child process\n");
28401.1Skamil		_exit(exitval);
28411.1Skamil	}
28421.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
28431.1Skamil
28441.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
28451.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
28461.1Skamil
28471.1Skamil	validate_status_stopped(status, sigval);
28481.1Skamil
28491.13Schristos	DPRINTF("Call GETFPREGS for the child process\n");
28501.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GETFPREGS, child, &r, 0) != -1);
28511.1Skamil
28521.13Schristos	DPRINTF("Before resuming the child process where it left off and "
28531.1Skamil	    "without signal to be sent\n");
28541.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
28551.1Skamil
28561.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
28571.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
28581.1Skamil
28591.1Skamil	validate_status_exited(status, exitval);
28601.1Skamil
28611.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
28621.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
28631.1Skamil}
28641.1Skamil#endif
28651.1Skamil
28661.1Skamil#if defined(HAVE_FPREGS)
28671.1SkamilATF_TC(fpregs2);
28681.1SkamilATF_TC_HEAD(fpregs2, tc)
28691.1Skamil{
28701.1Skamil	atf_tc_set_md_var(tc, "descr",
28711.1Skamil	    "Verify PT_GETFPREGS and PT_SETFPREGS calls without changing "
28721.1Skamil	    "regs");
28731.1Skamil}
28741.1Skamil
28751.1SkamilATF_TC_BODY(fpregs2, tc)
28761.1Skamil{
28771.1Skamil	const int exitval = 5;
28781.1Skamil	const int sigval = SIGSTOP;
28791.1Skamil	pid_t child, wpid;
28801.1Skamil#if defined(TWAIT_HAVE_STATUS)
28811.1Skamil	int status;
28821.1Skamil#endif
28831.1Skamil	struct fpreg r;
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.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
28921.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
28931.1Skamil
28941.13Schristos		DPRINTF("Before exiting of the child process\n");
28951.1Skamil		_exit(exitval);
28961.1Skamil	}
28971.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
28981.1Skamil
28991.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
29001.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
29011.1Skamil
29021.1Skamil	validate_status_stopped(status, sigval);
29031.1Skamil
29041.13Schristos	DPRINTF("Call GETFPREGS for the child process\n");
29051.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GETFPREGS, child, &r, 0) != -1);
29061.1Skamil
29071.13Schristos	DPRINTF("Call SETFPREGS for the child (without changed regs)\n");
29081.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SETFPREGS, child, &r, 0) != -1);
29091.1Skamil
29101.13Schristos	DPRINTF("Before resuming the child process where it left off and "
29111.1Skamil	    "without signal to be sent\n");
29121.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
29131.1Skamil
29141.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
29151.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
29161.1Skamil
29171.1Skamil	validate_status_exited(status, exitval);
29181.1Skamil
29191.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
29201.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
29211.1Skamil}
29221.1Skamil#endif
29231.1Skamil
29241.1Skamil#if defined(PT_STEP)
29251.1Skamilstatic void
29261.2Skamilptrace_step(int N, int setstep)
29271.1Skamil{
29281.1Skamil	const int exitval = 5;
29291.1Skamil	const int sigval = SIGSTOP;
29301.1Skamil	pid_t child, wpid;
29311.1Skamil#if defined(TWAIT_HAVE_STATUS)
29321.1Skamil	int status;
29331.1Skamil#endif
29341.1Skamil	int happy;
29351.1Skamil
29361.1Skamil#if defined(__arm__)
29371.1Skamil	/* PT_STEP not supported on arm 32-bit */
29381.1Skamil	atf_tc_expect_fail("PR kern/52119");
29391.1Skamil#endif
29401.1Skamil
29411.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
29421.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
29431.1Skamil	if (child == 0) {
29441.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
29451.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
29461.1Skamil
29471.1Skamil		happy = check_happy(999);
29481.1Skamil
29491.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
29501.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
29511.1Skamil
29521.1Skamil		FORKEE_ASSERT_EQ(happy, check_happy(999));
29531.1Skamil
29541.13Schristos		DPRINTF("Before exiting of the child process\n");
29551.1Skamil		_exit(exitval);
29561.1Skamil	}
29571.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
29581.1Skamil
29591.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
29601.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
29611.1Skamil
29621.1Skamil	validate_status_stopped(status, sigval);
29631.1Skamil
29641.1Skamil	while (N --> 0) {
29651.2Skamil		if (setstep) {
29661.13Schristos			DPRINTF("Before resuming the child process where it "
29671.2Skamil			    "left off and without signal to be sent (use "
29681.9Skamil			    "PT_SETSTEP and PT_CONTINUE)\n");
29691.13Schristos			SYSCALL_REQUIRE(ptrace(PT_SETSTEP, child, 0, 0) != -1);
29701.13Schristos			SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0)
29711.2Skamil			    != -1);
29721.2Skamil		} else {
29731.13Schristos			DPRINTF("Before resuming the child process where it "
29741.2Skamil			    "left off and without signal to be sent (use "
29751.2Skamil			    "PT_STEP)\n");
29761.13Schristos			SYSCALL_REQUIRE(ptrace(PT_STEP, child, (void *)1, 0)
29771.2Skamil			    != -1);
29781.2Skamil		}
29791.1Skamil
29801.13Schristos		DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
29811.1Skamil		TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0),
29821.1Skamil		    child);
29831.1Skamil
29841.1Skamil		validate_status_stopped(status, SIGTRAP);
29851.2Skamil
29861.2Skamil		if (setstep) {
29871.13Schristos			SYSCALL_REQUIRE(ptrace(PT_CLEARSTEP, child, 0, 0) != -1);
29881.2Skamil		}
29891.1Skamil	}
29901.1Skamil
29911.13Schristos	DPRINTF("Before resuming the child process where it left off and "
29921.1Skamil	    "without signal to be sent\n");
29931.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
29941.1Skamil
29951.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
29961.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
29971.1Skamil
29981.1Skamil	validate_status_exited(status, exitval);
29991.1Skamil
30001.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
30011.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
30021.1Skamil}
30031.1Skamil#endif
30041.1Skamil
30051.1Skamil#if defined(PT_STEP)
30061.1SkamilATF_TC(step1);
30071.1SkamilATF_TC_HEAD(step1, tc)
30081.1Skamil{
30091.1Skamil	atf_tc_set_md_var(tc, "descr",
30101.1Skamil	    "Verify single PT_STEP call");
30111.1Skamil}
30121.1Skamil
30131.1SkamilATF_TC_BODY(step1, tc)
30141.1Skamil{
30151.2Skamil	ptrace_step(1, 0);
30161.1Skamil}
30171.1Skamil#endif
30181.1Skamil
30191.1Skamil#if defined(PT_STEP)
30201.1SkamilATF_TC(step2);
30211.1SkamilATF_TC_HEAD(step2, tc)
30221.1Skamil{
30231.1Skamil	atf_tc_set_md_var(tc, "descr",
30241.1Skamil	    "Verify PT_STEP called twice");
30251.1Skamil}
30261.1Skamil
30271.1SkamilATF_TC_BODY(step2, tc)
30281.1Skamil{
30291.2Skamil	ptrace_step(2, 0);
30301.1Skamil}
30311.1Skamil#endif
30321.1Skamil
30331.1Skamil#if defined(PT_STEP)
30341.1SkamilATF_TC(step3);
30351.1SkamilATF_TC_HEAD(step3, tc)
30361.1Skamil{
30371.1Skamil	atf_tc_set_md_var(tc, "descr",
30381.1Skamil	    "Verify PT_STEP called three times");
30391.1Skamil}
30401.1Skamil
30411.1SkamilATF_TC_BODY(step3, tc)
30421.1Skamil{
30431.2Skamil	ptrace_step(3, 0);
30441.1Skamil}
30451.1Skamil#endif
30461.1Skamil
30471.1Skamil#if defined(PT_STEP)
30481.1SkamilATF_TC(step4);
30491.1SkamilATF_TC_HEAD(step4, tc)
30501.1Skamil{
30511.1Skamil	atf_tc_set_md_var(tc, "descr",
30521.1Skamil	    "Verify PT_STEP called four times");
30531.1Skamil}
30541.1Skamil
30551.1SkamilATF_TC_BODY(step4, tc)
30561.1Skamil{
30571.2Skamil	ptrace_step(4, 0);
30581.2Skamil}
30591.2Skamil#endif
30601.2Skamil
30611.2Skamil#if defined(PT_STEP)
30621.2SkamilATF_TC(setstep1);
30631.2SkamilATF_TC_HEAD(setstep1, tc)
30641.2Skamil{
30651.2Skamil	atf_tc_set_md_var(tc, "descr",
30661.2Skamil	    "Verify single PT_SETSTEP call");
30671.2Skamil}
30681.2Skamil
30691.2SkamilATF_TC_BODY(setstep1, tc)
30701.2Skamil{
30711.2Skamil	ptrace_step(1, 1);
30721.2Skamil}
30731.2Skamil#endif
30741.2Skamil
30751.2Skamil#if defined(PT_STEP)
30761.2SkamilATF_TC(setstep2);
30771.2SkamilATF_TC_HEAD(setstep2, tc)
30781.2Skamil{
30791.2Skamil	atf_tc_set_md_var(tc, "descr",
30801.2Skamil	    "Verify PT_SETSTEP called twice");
30811.2Skamil}
30821.2Skamil
30831.2SkamilATF_TC_BODY(setstep2, tc)
30841.2Skamil{
30851.2Skamil	ptrace_step(2, 1);
30861.2Skamil}
30871.2Skamil#endif
30881.2Skamil
30891.2Skamil#if defined(PT_STEP)
30901.2SkamilATF_TC(setstep3);
30911.2SkamilATF_TC_HEAD(setstep3, tc)
30921.2Skamil{
30931.2Skamil	atf_tc_set_md_var(tc, "descr",
30941.2Skamil	    "Verify PT_SETSTEP called three times");
30951.2Skamil}
30961.2Skamil
30971.2SkamilATF_TC_BODY(setstep3, tc)
30981.2Skamil{
30991.2Skamil	ptrace_step(3, 1);
31001.2Skamil}
31011.2Skamil#endif
31021.2Skamil
31031.2Skamil#if defined(PT_STEP)
31041.2SkamilATF_TC(setstep4);
31051.2SkamilATF_TC_HEAD(setstep4, tc)
31061.2Skamil{
31071.2Skamil	atf_tc_set_md_var(tc, "descr",
31081.2Skamil	    "Verify PT_SETSTEP called four times");
31091.2Skamil}
31101.2Skamil
31111.2SkamilATF_TC_BODY(setstep4, tc)
31121.2Skamil{
31131.2Skamil	ptrace_step(4, 1);
31141.1Skamil}
31151.1Skamil#endif
31161.1Skamil
31171.1SkamilATF_TC(kill1);
31181.1SkamilATF_TC_HEAD(kill1, tc)
31191.1Skamil{
31201.1Skamil	atf_tc_set_md_var(tc, "descr",
31211.1Skamil	    "Verify that PT_CONTINUE with SIGKILL terminates child");
31221.1Skamil}
31231.1Skamil
31241.1SkamilATF_TC_BODY(kill1, tc)
31251.1Skamil{
31261.1Skamil	const int sigval = SIGSTOP, sigsent = SIGKILL;
31271.1Skamil	pid_t child, wpid;
31281.1Skamil#if defined(TWAIT_HAVE_STATUS)
31291.1Skamil	int status;
31301.1Skamil#endif
31311.1Skamil
31321.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
31331.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
31341.1Skamil	if (child == 0) {
31351.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
31361.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
31371.1Skamil
31381.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
31391.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
31401.1Skamil
31411.1Skamil		/* NOTREACHED */
31421.1Skamil		FORKEE_ASSERTX(0 &&
31431.1Skamil		    "Child should be terminated by a signal from its parent");
31441.1Skamil	}
31451.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
31461.1Skamil
31471.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
31481.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
31491.1Skamil
31501.1Skamil	validate_status_stopped(status, sigval);
31511.1Skamil
31521.13Schristos	DPRINTF("Before resuming the child process where it left off and "
31531.1Skamil	    "without signal to be sent\n");
31541.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, sigsent) != -1);
31551.1Skamil
31561.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
31571.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
31581.1Skamil
31591.1Skamil	validate_status_signaled(status, sigsent, 0);
31601.1Skamil
31611.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
31621.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
31631.1Skamil}
31641.1Skamil
31651.1SkamilATF_TC(kill2);
31661.1SkamilATF_TC_HEAD(kill2, tc)
31671.1Skamil{
31681.1Skamil	atf_tc_set_md_var(tc, "descr",
31691.1Skamil	    "Verify that PT_KILL terminates child");
31701.1Skamil}
31711.1Skamil
31721.1SkamilATF_TC_BODY(kill2, tc)
31731.1Skamil{
31741.1Skamil	const int sigval = SIGSTOP;
31751.1Skamil	pid_t child, wpid;
31761.1Skamil#if defined(TWAIT_HAVE_STATUS)
31771.1Skamil	int status;
31781.1Skamil#endif
31791.1Skamil
31801.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
31811.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
31821.1Skamil	if (child == 0) {
31831.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
31841.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
31851.1Skamil
31861.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
31871.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
31881.1Skamil
31891.1Skamil		/* NOTREACHED */
31901.1Skamil		FORKEE_ASSERTX(0 &&
31911.1Skamil		    "Child should be terminated by a signal from its parent");
31921.1Skamil	}
31931.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
31941.1Skamil
31951.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
31961.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
31971.1Skamil
31981.1Skamil	validate_status_stopped(status, sigval);
31991.1Skamil
32001.13Schristos	DPRINTF("Before resuming the child process where it left off and "
32011.1Skamil	    "without signal to be sent\n");
32021.13Schristos	SYSCALL_REQUIRE(ptrace(PT_KILL, child, (void*)1, 0) != -1);
32031.1Skamil
32041.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
32051.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
32061.1Skamil
32071.1Skamil	validate_status_signaled(status, SIGKILL, 0);
32081.1Skamil
32091.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
32101.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
32111.1Skamil}
32121.1Skamil
32131.1SkamilATF_TC(lwpinfo1);
32141.1SkamilATF_TC_HEAD(lwpinfo1, tc)
32151.1Skamil{
32161.1Skamil	atf_tc_set_md_var(tc, "descr",
32171.1Skamil	    "Verify basic LWPINFO call for single thread (PT_TRACE_ME)");
32181.1Skamil}
32191.1Skamil
32201.1SkamilATF_TC_BODY(lwpinfo1, tc)
32211.1Skamil{
32221.1Skamil	const int exitval = 5;
32231.1Skamil	const int sigval = SIGSTOP;
32241.1Skamil	pid_t child, wpid;
32251.1Skamil#if defined(TWAIT_HAVE_STATUS)
32261.1Skamil	int status;
32271.1Skamil#endif
32281.1Skamil	struct ptrace_lwpinfo info = {0, 0};
32291.1Skamil
32301.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
32311.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
32321.1Skamil	if (child == 0) {
32331.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
32341.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
32351.1Skamil
32361.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
32371.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
32381.1Skamil
32391.13Schristos		DPRINTF("Before exiting of the child process\n");
32401.1Skamil		_exit(exitval);
32411.1Skamil	}
32421.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
32431.1Skamil
32441.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
32451.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
32461.1Skamil
32471.1Skamil	validate_status_stopped(status, sigval);
32481.1Skamil
32491.13Schristos	DPRINTF("Before calling ptrace(2) with PT_LWPINFO for child\n");
32501.13Schristos	SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &info, sizeof(info)) != -1);
32511.1Skamil
32521.13Schristos	DPRINTF("Assert that there exists a thread\n");
32531.1Skamil	ATF_REQUIRE(info.pl_lwpid > 0);
32541.1Skamil
32551.13Schristos	DPRINTF("Assert that lwp thread %d received event PL_EVENT_SIGNAL\n",
32561.1Skamil	    info.pl_lwpid);
32571.1Skamil	ATF_REQUIRE_EQ_MSG(info.pl_event, PL_EVENT_SIGNAL,
32581.1Skamil	    "Received event %d != expected event %d",
32591.1Skamil	    info.pl_event, PL_EVENT_SIGNAL);
32601.1Skamil
32611.13Schristos	DPRINTF("Before calling ptrace(2) with PT_LWPINFO for child\n");
32621.13Schristos	SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &info, sizeof(info)) != -1);
32631.1Skamil
32641.13Schristos	DPRINTF("Assert that there are no more lwp threads in child\n");
32651.1Skamil	ATF_REQUIRE_EQ(info.pl_lwpid, 0);
32661.1Skamil
32671.13Schristos	DPRINTF("Before resuming the child process where it left off and "
32681.1Skamil	    "without signal to be sent\n");
32691.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
32701.1Skamil
32711.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
32721.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
32731.1Skamil
32741.1Skamil	validate_status_exited(status, exitval);
32751.1Skamil
32761.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
32771.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
32781.1Skamil}
32791.1Skamil
32801.1Skamil#if defined(TWAIT_HAVE_PID)
32811.1SkamilATF_TC(lwpinfo2);
32821.1SkamilATF_TC_HEAD(lwpinfo2, tc)
32831.1Skamil{
32841.1Skamil	atf_tc_set_md_var(tc, "descr",
32851.1Skamil	    "Verify basic LWPINFO call for single thread (PT_ATTACH from "
32861.1Skamil	    "tracer)");
32871.1Skamil}
32881.1Skamil
32891.1SkamilATF_TC_BODY(lwpinfo2, tc)
32901.1Skamil{
32911.1Skamil	struct msg_fds parent_tracee, parent_tracer;
32921.1Skamil	const int exitval_tracee = 5;
32931.1Skamil	const int exitval_tracer = 10;
32941.1Skamil	pid_t tracee, tracer, wpid;
32951.1Skamil	uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */
32961.1Skamil#if defined(TWAIT_HAVE_STATUS)
32971.1Skamil	int status;
32981.1Skamil#endif
32991.1Skamil	struct ptrace_lwpinfo info = {0, 0};
33001.1Skamil
33011.13Schristos	DPRINTF("Spawn tracee\n");
33021.13Schristos	SYSCALL_REQUIRE(msg_open(&parent_tracee) == 0);
33031.13Schristos	SYSCALL_REQUIRE(msg_open(&parent_tracer) == 0);
33041.1Skamil	tracee = atf_utils_fork();
33051.1Skamil	if (tracee == 0) {
33061.1Skamil
33071.1Skamil		/* Wait for message from the parent */
33081.1Skamil		CHILD_TO_PARENT("tracee ready", parent_tracee, msg);
33091.1Skamil		CHILD_FROM_PARENT("tracee exit", parent_tracee, msg);
33101.1Skamil
33111.1Skamil		_exit(exitval_tracee);
33121.1Skamil	}
33131.1Skamil	PARENT_FROM_CHILD("tracee ready", parent_tracee, msg);
33141.1Skamil
33151.13Schristos	DPRINTF("Spawn debugger\n");
33161.1Skamil	tracer = atf_utils_fork();
33171.1Skamil	if (tracer == 0) {
33181.1Skamil		/* No IPC to communicate with the child */
33191.13Schristos		DPRINTF("Before calling PT_ATTACH from tracee %d\n", getpid());
33201.1Skamil		FORKEE_ASSERT(ptrace(PT_ATTACH, tracee, NULL, 0) != -1);
33211.1Skamil
33221.1Skamil		/* Wait for tracee and assert that it was stopped w/ SIGSTOP */
33231.1Skamil		FORKEE_REQUIRE_SUCCESS(
33241.1Skamil		    wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);
33251.1Skamil
33261.1Skamil		forkee_status_stopped(status, SIGSTOP);
33271.1Skamil
33281.13Schristos		DPRINTF("Before calling ptrace(2) with PT_LWPINFO for child\n");
33291.1Skamil		FORKEE_ASSERT(ptrace(PT_LWPINFO, tracee, &info, sizeof(info))
33301.1Skamil		    != -1);
33311.1Skamil
33321.13Schristos		DPRINTF("Assert that there exists a thread\n");
33331.1Skamil		FORKEE_ASSERTX(info.pl_lwpid > 0);
33341.1Skamil
33351.13Schristos		DPRINTF("Assert that lwp thread %d received event "
33361.1Skamil		    "PL_EVENT_SIGNAL\n", info.pl_lwpid);
33371.1Skamil		FORKEE_ASSERT_EQ(info.pl_event, PL_EVENT_SIGNAL);
33381.1Skamil
33391.13Schristos		DPRINTF("Before calling ptrace(2) with PT_LWPINFO for child\n");
33401.1Skamil		FORKEE_ASSERT(ptrace(PT_LWPINFO, tracee, &info, sizeof(info))
33411.1Skamil		    != -1);
33421.1Skamil
33431.13Schristos		DPRINTF("Assert that there are no more lwp threads in child\n");
33441.1Skamil		FORKEE_ASSERTX(info.pl_lwpid == 0);
33451.1Skamil
33461.1Skamil		/* Resume tracee with PT_CONTINUE */
33471.1Skamil		FORKEE_ASSERT(ptrace(PT_CONTINUE, tracee, (void *)1, 0) != -1);
33481.1Skamil
33491.1Skamil		/* Inform parent that tracer has attached to tracee */
33501.1Skamil		CHILD_TO_PARENT("tracer ready", parent_tracer, msg);
33511.1Skamil		/* Wait for parent */
33521.1Skamil		CHILD_FROM_PARENT("tracer wait", parent_tracer, msg);
33531.1Skamil
33541.1Skamil		/* Wait for tracee and assert that it exited */
33551.1Skamil		FORKEE_REQUIRE_SUCCESS(
33561.1Skamil		    wpid = TWAIT_GENERIC(tracee, &status, 0), tracee);
33571.1Skamil
33581.1Skamil		forkee_status_exited(status, exitval_tracee);
33591.1Skamil
33601.13Schristos		DPRINTF("Before exiting of the tracer process\n");
33611.1Skamil		_exit(exitval_tracer);
33621.1Skamil	}
33631.1Skamil
33641.13Schristos	DPRINTF("Wait for the tracer to attach to the tracee\n");
33651.1Skamil	PARENT_FROM_CHILD("tracer ready", parent_tracer, msg);
33661.1Skamil
33671.13Schristos	DPRINTF("Resume the tracee and let it exit\n");
33681.1Skamil	PARENT_TO_CHILD("tracee exit", parent_tracee, msg);
33691.1Skamil
33701.13Schristos	DPRINTF("Detect that tracee is zombie\n");
33711.1Skamil	await_zombie(tracee);
33721.1Skamil
33731.13Schristos	DPRINTF("Assert that there is no status about tracee - "
33741.1Skamil	    "Tracer must detect zombie first - calling %s()\n", TWAIT_FNAME);
33751.1Skamil	TWAIT_REQUIRE_SUCCESS(
33761.1Skamil	    wpid = TWAIT_GENERIC(tracee, &status, WNOHANG), 0);
33771.1Skamil
33781.13Schristos	DPRINTF("Resume the tracer and let it detect exited tracee\n");
33791.1Skamil	PARENT_TO_CHILD("tracer wait", parent_tracer, msg);
33801.1Skamil
33811.13Schristos	DPRINTF("Wait for tracer to finish its job and exit - calling %s()\n",
33821.1Skamil	    TWAIT_FNAME);
33831.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracer, &status, 0),
33841.1Skamil	    tracer);
33851.1Skamil
33861.1Skamil	validate_status_exited(status, exitval_tracer);
33871.1Skamil
33881.13Schristos	DPRINTF("Wait for tracee to finish its job and exit - calling %s()\n",
33891.1Skamil	    TWAIT_FNAME);
33901.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracee, &status, WNOHANG),
33911.1Skamil	    tracee);
33921.1Skamil
33931.1Skamil	validate_status_exited(status, exitval_tracee);
33941.1Skamil
33951.1Skamil	msg_close(&parent_tracer);
33961.1Skamil	msg_close(&parent_tracee);
33971.1Skamil}
33981.1Skamil#endif
33991.1Skamil
34001.1SkamilATF_TC(siginfo1);
34011.1SkamilATF_TC_HEAD(siginfo1, tc)
34021.1Skamil{
34031.1Skamil	atf_tc_set_md_var(tc, "descr",
34041.1Skamil	    "Verify basic PT_GET_SIGINFO call for SIGTRAP from tracee");
34051.1Skamil}
34061.1Skamil
34071.1SkamilATF_TC_BODY(siginfo1, tc)
34081.1Skamil{
34091.1Skamil	const int exitval = 5;
34101.1Skamil	const int sigval = SIGTRAP;
34111.1Skamil	pid_t child, wpid;
34121.1Skamil#if defined(TWAIT_HAVE_STATUS)
34131.1Skamil	int status;
34141.1Skamil#endif
34151.1Skamil	struct ptrace_siginfo info;
34161.1Skamil	memset(&info, 0, sizeof(info));
34171.1Skamil
34181.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
34191.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
34201.1Skamil	if (child == 0) {
34211.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
34221.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
34231.1Skamil
34241.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
34251.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
34261.1Skamil
34271.13Schristos		DPRINTF("Before exiting of the child process\n");
34281.1Skamil		_exit(exitval);
34291.1Skamil	}
34301.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
34311.1Skamil
34321.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
34331.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
34341.1Skamil
34351.1Skamil	validate_status_stopped(status, sigval);
34361.1Skamil
34371.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
34381.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
34391.1Skamil
34401.13Schristos	DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
34411.13Schristos	DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n",
34421.1Skamil	    info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
34431.1Skamil	    info.psi_siginfo.si_errno);
34441.1Skamil
34451.13Schristos	DPRINTF("Before resuming the child process where it left off and "
34461.1Skamil	    "without signal to be sent\n");
34471.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
34481.1Skamil
34491.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
34501.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
34511.1Skamil
34521.1Skamil	validate_status_exited(status, exitval);
34531.1Skamil
34541.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
34551.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
34561.1Skamil}
34571.1Skamil
34581.1SkamilATF_TC(siginfo2);
34591.1SkamilATF_TC_HEAD(siginfo2, tc)
34601.1Skamil{
34611.1Skamil	atf_tc_set_md_var(tc, "descr",
34621.1Skamil	    "Verify basic PT_GET_SIGINFO and PT_SET_SIGINFO calls without "
34631.1Skamil	    "modification of SIGINT from tracee");
34641.1Skamil}
34651.1Skamil
34661.1Skamilstatic int siginfo2_caught = 0;
34671.1Skamil
34681.1Skamilstatic void
34691.1Skamilsiginfo2_sighandler(int sig)
34701.1Skamil{
34711.1Skamil	FORKEE_ASSERT_EQ(sig, SIGINT);
34721.1Skamil
34731.1Skamil	++siginfo2_caught;
34741.1Skamil}
34751.1Skamil
34761.1SkamilATF_TC_BODY(siginfo2, tc)
34771.1Skamil{
34781.1Skamil	const int exitval = 5;
34791.1Skamil	const int sigval = SIGINT;
34801.1Skamil	pid_t child, wpid;
34811.1Skamil	struct sigaction sa;
34821.1Skamil#if defined(TWAIT_HAVE_STATUS)
34831.1Skamil	int status;
34841.1Skamil#endif
34851.1Skamil	struct ptrace_siginfo info;
34861.1Skamil	memset(&info, 0, sizeof(info));
34871.1Skamil
34881.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
34891.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
34901.1Skamil	if (child == 0) {
34911.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
34921.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
34931.1Skamil
34941.1Skamil		sa.sa_handler = siginfo2_sighandler;
34951.1Skamil		sa.sa_flags = SA_SIGINFO;
34961.1Skamil		sigemptyset(&sa.sa_mask);
34971.1Skamil
34981.1Skamil		FORKEE_ASSERT(sigaction(sigval, &sa, NULL) != -1);
34991.1Skamil
35001.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
35011.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
35021.1Skamil
35031.1Skamil		FORKEE_ASSERT_EQ(siginfo2_caught, 1);
35041.1Skamil
35051.13Schristos		DPRINTF("Before exiting of the child process\n");
35061.1Skamil		_exit(exitval);
35071.1Skamil	}
35081.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
35091.1Skamil
35101.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
35111.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
35121.1Skamil
35131.1Skamil	validate_status_stopped(status, sigval);
35141.1Skamil
35151.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
35161.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
35171.1Skamil
35181.13Schristos	DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
35191.13Schristos	DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n",
35201.1Skamil	    info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
35211.1Skamil	    info.psi_siginfo.si_errno);
35221.1Skamil
35231.13Schristos	DPRINTF("Before calling ptrace(2) with PT_SET_SIGINFO for child\n");
35241.61Skre	SYSCALL_REQUIRE(
35251.61Skre	    ptrace(PT_SET_SIGINFO, child, &info, sizeof(info)) != -1);
35261.1Skamil
35271.13Schristos	DPRINTF("Before resuming the child process where it left off and "
35281.1Skamil	    "without signal to be sent\n");
35291.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, sigval) != -1);
35301.1Skamil
35311.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
35321.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
35331.1Skamil
35341.1Skamil	validate_status_exited(status, exitval);
35351.1Skamil
35361.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
35371.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
35381.1Skamil}
35391.1Skamil
35401.1SkamilATF_TC(siginfo3);
35411.1SkamilATF_TC_HEAD(siginfo3, tc)
35421.1Skamil{
35431.1Skamil	atf_tc_set_md_var(tc, "descr",
35441.1Skamil	    "Verify basic PT_GET_SIGINFO and PT_SET_SIGINFO calls with "
35451.1Skamil	    "setting signal to new value");
35461.1Skamil}
35471.1Skamil
35481.1Skamilstatic int siginfo3_caught = 0;
35491.1Skamil
35501.1Skamilstatic void
35511.1Skamilsiginfo3_sigaction(int sig, siginfo_t *info, void *ctx)
35521.1Skamil{
35531.1Skamil	FORKEE_ASSERT_EQ(sig, SIGTRAP);
35541.1Skamil
35551.1Skamil	FORKEE_ASSERT_EQ(info->si_signo, SIGTRAP);
35561.1Skamil	FORKEE_ASSERT_EQ(info->si_code, TRAP_BRKPT);
35571.1Skamil
35581.1Skamil	++siginfo3_caught;
35591.1Skamil}
35601.1Skamil
35611.1SkamilATF_TC_BODY(siginfo3, tc)
35621.1Skamil{
35631.1Skamil	const int exitval = 5;
35641.1Skamil	const int sigval = SIGINT;
35651.1Skamil	const int sigfaked = SIGTRAP;
35661.1Skamil	const int sicodefaked = TRAP_BRKPT;
35671.1Skamil	pid_t child, wpid;
35681.1Skamil	struct sigaction sa;
35691.1Skamil#if defined(TWAIT_HAVE_STATUS)
35701.1Skamil	int status;
35711.1Skamil#endif
35721.1Skamil	struct ptrace_siginfo info;
35731.1Skamil	memset(&info, 0, sizeof(info));
35741.1Skamil
35751.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
35761.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
35771.1Skamil	if (child == 0) {
35781.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
35791.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
35801.1Skamil
35811.1Skamil		sa.sa_sigaction = siginfo3_sigaction;
35821.1Skamil		sa.sa_flags = SA_SIGINFO;
35831.1Skamil		sigemptyset(&sa.sa_mask);
35841.1Skamil
35851.1Skamil		FORKEE_ASSERT(sigaction(sigfaked, &sa, NULL) != -1);
35861.1Skamil
35871.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
35881.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
35891.1Skamil
35901.1Skamil		FORKEE_ASSERT_EQ(siginfo3_caught, 1);
35911.1Skamil
35921.13Schristos		DPRINTF("Before exiting of the child process\n");
35931.1Skamil		_exit(exitval);
35941.1Skamil	}
35951.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
35961.1Skamil
35971.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
35981.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
35991.1Skamil
36001.1Skamil	validate_status_stopped(status, sigval);
36011.1Skamil
36021.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
36031.61Skre	SYSCALL_REQUIRE(
36041.61Skre	    ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
36051.1Skamil
36061.13Schristos	DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
36071.13Schristos	DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n",
36081.1Skamil	    info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
36091.1Skamil	    info.psi_siginfo.si_errno);
36101.1Skamil
36111.13Schristos	DPRINTF("Before setting new faked signal to signo=%d si_code=%d\n",
36121.1Skamil	    sigfaked, sicodefaked);
36131.1Skamil	info.psi_siginfo.si_signo = sigfaked;
36141.1Skamil	info.psi_siginfo.si_code = sicodefaked;
36151.1Skamil
36161.13Schristos	DPRINTF("Before calling ptrace(2) with PT_SET_SIGINFO for child\n");
36171.61Skre	SYSCALL_REQUIRE(
36181.61Skre	    ptrace(PT_SET_SIGINFO, child, &info, sizeof(info)) != -1);
36191.1Skamil
36201.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
36211.61Skre	SYSCALL_REQUIRE(
36221.61Skre	    ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
36231.1Skamil
36241.13Schristos	DPRINTF("Before checking siginfo_t\n");
36251.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigfaked);
36261.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, sicodefaked);
36271.1Skamil
36281.13Schristos	DPRINTF("Before resuming the child process where it left off and "
36291.1Skamil	    "without signal to be sent\n");
36301.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, sigfaked) != -1);
36311.1Skamil
36321.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
36331.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
36341.1Skamil
36351.1Skamil	validate_status_exited(status, exitval);
36361.1Skamil
36371.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
36381.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
36391.1Skamil}
36401.1Skamil
36411.1SkamilATF_TC(siginfo4);
36421.1SkamilATF_TC_HEAD(siginfo4, tc)
36431.1Skamil{
36441.1Skamil	atf_tc_set_md_var(tc, "descr",
36451.1Skamil	    "Detect SIGTRAP TRAP_EXEC from tracee");
36461.1Skamil}
36471.1Skamil
36481.1SkamilATF_TC_BODY(siginfo4, tc)
36491.1Skamil{
36501.1Skamil	const int sigval = SIGTRAP;
36511.1Skamil	pid_t child, wpid;
36521.1Skamil#if defined(TWAIT_HAVE_STATUS)
36531.1Skamil	int status;
36541.1Skamil#endif
36551.1Skamil
36561.1Skamil	struct ptrace_siginfo info;
36571.1Skamil	memset(&info, 0, sizeof(info));
36581.1Skamil
36591.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
36601.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
36611.1Skamil	if (child == 0) {
36621.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
36631.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
36641.1Skamil
36651.13Schristos		DPRINTF("Before calling execve(2) from child\n");
36661.1Skamil		execlp("/bin/echo", "/bin/echo", NULL);
36671.1Skamil
36681.1Skamil		FORKEE_ASSERT(0 && "Not reached");
36691.1Skamil	}
36701.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
36711.1Skamil
36721.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
36731.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
36741.1Skamil
36751.1Skamil	validate_status_stopped(status, sigval);
36761.1Skamil
36771.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
36781.61Skre	SYSCALL_REQUIRE(
36791.61Skre	    ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
36801.1Skamil
36811.13Schristos	DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
36821.13Schristos	DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n",
36831.1Skamil	    info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
36841.1Skamil	    info.psi_siginfo.si_errno);
36851.1Skamil
36861.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigval);
36871.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_EXEC);
36881.1Skamil
36891.13Schristos	DPRINTF("Before resuming the child process where it left off and "
36901.1Skamil	    "without signal to be sent\n");
36911.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
36921.1Skamil
36931.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
36941.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
36951.1Skamil
36961.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
36971.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
36981.1Skamil}
36991.1Skamil
37001.1Skamil#if defined(TWAIT_HAVE_PID)
37011.1SkamilATF_TC(siginfo5);
37021.1SkamilATF_TC_HEAD(siginfo5, tc)
37031.1Skamil{
37041.1Skamil	atf_tc_set_md_var(tc, "descr",
37051.1Skamil	    "Verify that fork(2) is intercepted by ptrace(2) with EVENT_MASK "
37061.1Skamil	    "set to PTRACE_FORK and reports correct signal information");
37071.1Skamil}
37081.1Skamil
37091.1SkamilATF_TC_BODY(siginfo5, tc)
37101.1Skamil{
37111.1Skamil	const int exitval = 5;
37121.1Skamil	const int exitval2 = 15;
37131.1Skamil	const int sigval = SIGSTOP;
37141.1Skamil	pid_t child, child2, wpid;
37151.1Skamil#if defined(TWAIT_HAVE_STATUS)
37161.1Skamil	int status;
37171.1Skamil#endif
37181.1Skamil	ptrace_state_t state;
37191.1Skamil	const int slen = sizeof(state);
37201.1Skamil	ptrace_event_t event;
37211.1Skamil	const int elen = sizeof(event);
37221.1Skamil	struct ptrace_siginfo info;
37231.1Skamil
37241.1Skamil	memset(&info, 0, sizeof(info));
37251.1Skamil
37261.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
37271.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
37281.1Skamil	if (child == 0) {
37291.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
37301.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
37311.1Skamil
37321.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
37331.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
37341.1Skamil
37351.1Skamil		FORKEE_ASSERT((child2 = fork()) != -1);
37361.1Skamil
37371.1Skamil		if (child2 == 0)
37381.1Skamil			_exit(exitval2);
37391.1Skamil
37401.1Skamil		FORKEE_REQUIRE_SUCCESS
37411.1Skamil		    (wpid = TWAIT_GENERIC(child2, &status, 0), child2);
37421.1Skamil
37431.1Skamil		forkee_status_exited(status, exitval2);
37441.1Skamil
37451.13Schristos		DPRINTF("Before exiting of the child process\n");
37461.1Skamil		_exit(exitval);
37471.1Skamil	}
37481.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
37491.1Skamil
37501.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
37511.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
37521.1Skamil
37531.1Skamil	validate_status_stopped(status, sigval);
37541.1Skamil
37551.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
37561.61Skre	SYSCALL_REQUIRE(
37571.61Skre	    ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
37581.1Skamil
37591.13Schristos	DPRINTF("Before checking siginfo_t\n");
37601.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigval);
37611.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, SI_LWP);
37621.1Skamil
37631.13Schristos	DPRINTF("Enable PTRACE_FORK in EVENT_MASK for the child %d\n", child);
37641.1Skamil	event.pe_set_event = PTRACE_FORK;
37651.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);
37661.1Skamil
37671.13Schristos	DPRINTF("Before resuming the child process where it left off and "
37681.1Skamil	    "without signal to be sent\n");
37691.13Schristos        DPRINTF("We expect two SIGTRAP events, for child %d (TRAP_CHLD, "
37701.1Skamil               "pe_report_event=PTRACE_FORK, state.pe_other_pid=child2) and "
37711.1Skamil               "for child2 (TRAP_CHLD, pe_report_event=PTRACE_FORK, "
37721.1Skamil                "state.pe_other_pid=child)\n", child);
37731.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
37741.1Skamil
37751.13Schristos	DPRINTF("Before calling %s() for the child %d\n", TWAIT_FNAME, child);
37761.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
37771.1Skamil
37781.1Skamil	validate_status_stopped(status, SIGTRAP);
37791.1Skamil
37801.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
37811.61Skre	SYSCALL_REQUIRE(
37821.61Skre	    ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
37831.1Skamil
37841.13Schristos	DPRINTF("Before checking siginfo_t\n");
37851.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, SIGTRAP);
37861.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_CHLD);
37871.1Skamil
37881.61Skre	SYSCALL_REQUIRE(
37891.61Skre	    ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
37901.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_FORK);
37911.1Skamil
37921.1Skamil	child2 = state.pe_other_pid;
37931.13Schristos	DPRINTF("Reported PTRACE_FORK event with forkee %d\n", child2);
37941.1Skamil
37951.13Schristos	DPRINTF("Before calling %s() for the forkee %d of the child %d\n",
37961.1Skamil	    TWAIT_FNAME, child2, child);
37971.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0),
37981.1Skamil	    child2);
37991.1Skamil
38001.1Skamil	validate_status_stopped(status, SIGTRAP);
38011.1Skamil
38021.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
38031.61Skre	SYSCALL_REQUIRE(
38041.61Skre	    ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
38051.1Skamil
38061.13Schristos	DPRINTF("Before checking siginfo_t\n");
38071.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, SIGTRAP);
38081.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_CHLD);
38091.1Skamil
38101.61Skre	SYSCALL_REQUIRE(
38111.61Skre	    ptrace(PT_GET_PROCESS_STATE, child2, &state, slen) != -1);
38121.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_FORK);
38131.1Skamil	ATF_REQUIRE_EQ(state.pe_other_pid, child);
38141.1Skamil
38151.13Schristos	DPRINTF("Before resuming the forkee process where it left off and "
38161.1Skamil	    "without signal to be sent\n");
38171.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child2, (void *)1, 0) != -1);
38181.1Skamil
38191.13Schristos	DPRINTF("Before resuming the child process where it left off and "
38201.1Skamil	    "without signal to be sent\n");
38211.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
38221.1Skamil
38231.13Schristos	DPRINTF("Before calling %s() for the forkee - expected exited\n",
38241.1Skamil	    TWAIT_FNAME);
38251.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0),
38261.1Skamil	    child2);
38271.1Skamil
38281.1Skamil	validate_status_exited(status, exitval2);
38291.1Skamil
38301.13Schristos	DPRINTF("Before calling %s() for the forkee - expected no process\n",
38311.1Skamil	    TWAIT_FNAME);
38321.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD,
38331.1Skamil	    wpid = TWAIT_GENERIC(child2, &status, 0));
38341.1Skamil
38351.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
38361.1Skamil	    "SIGCHLD\n", TWAIT_FNAME);
38371.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
38381.1Skamil
38391.1Skamil	validate_status_stopped(status, SIGCHLD);
38401.1Skamil
38411.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
38421.61Skre	SYSCALL_REQUIRE(
38431.61Skre	    ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
38441.1Skamil
38451.13Schristos	DPRINTF("Before checking siginfo_t\n");
38461.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, SIGCHLD);
38471.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, CLD_EXITED);
38481.1Skamil
38491.13Schristos	DPRINTF("Before resuming the child process where it left off and "
38501.1Skamil	    "without signal to be sent\n");
38511.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
38521.1Skamil
38531.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
38541.1Skamil	    TWAIT_FNAME);
38551.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
38561.1Skamil
38571.1Skamil	validate_status_exited(status, exitval);
38581.1Skamil
38591.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
38601.1Skamil	    TWAIT_FNAME);
38611.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
38621.1Skamil}
38631.1Skamil#endif
38641.1Skamil
38651.1Skamil#if defined(PT_STEP)
38661.1SkamilATF_TC(siginfo6);
38671.1SkamilATF_TC_HEAD(siginfo6, tc)
38681.1Skamil{
38691.1Skamil	atf_tc_set_md_var(tc, "descr",
38701.1Skamil	    "Verify single PT_STEP call with signal information check");
38711.1Skamil}
38721.1Skamil
38731.1SkamilATF_TC_BODY(siginfo6, tc)
38741.1Skamil{
38751.1Skamil	const int exitval = 5;
38761.1Skamil	const int sigval = SIGSTOP;
38771.1Skamil	pid_t child, wpid;
38781.1Skamil#if defined(TWAIT_HAVE_STATUS)
38791.1Skamil	int status;
38801.1Skamil#endif
38811.1Skamil	int happy;
38821.1Skamil	struct ptrace_siginfo info;
38831.1Skamil
38841.1Skamil#if defined(__arm__)
38851.1Skamil	/* PT_STEP not supported on arm 32-bit */
38861.1Skamil	atf_tc_expect_fail("PR kern/52119");
38871.1Skamil#endif
38881.1Skamil
38891.1Skamil	memset(&info, 0, sizeof(info));
38901.1Skamil
38911.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
38921.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
38931.1Skamil	if (child == 0) {
38941.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
38951.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
38961.1Skamil
38971.1Skamil		happy = check_happy(100);
38981.1Skamil
38991.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
39001.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
39011.1Skamil
39021.1Skamil		FORKEE_ASSERT_EQ(happy, check_happy(100));
39031.1Skamil
39041.13Schristos		DPRINTF("Before exiting of the child process\n");
39051.1Skamil		_exit(exitval);
39061.1Skamil	}
39071.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
39081.1Skamil
39091.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
39101.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
39111.1Skamil
39121.1Skamil	validate_status_stopped(status, sigval);
39131.1Skamil
39141.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
39151.61Skre	SYSCALL_REQUIRE(
39161.61Skre	    ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
39171.1Skamil
39181.13Schristos	DPRINTF("Before checking siginfo_t\n");
39191.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigval);
39201.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, SI_LWP);
39211.1Skamil
39221.13Schristos	DPRINTF("Before resuming the child process where it left off and "
39231.1Skamil	    "without signal to be sent (use PT_STEP)\n");
39241.13Schristos	SYSCALL_REQUIRE(ptrace(PT_STEP, child, (void *)1, 0) != -1);
39251.1Skamil
39261.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
39271.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
39281.1Skamil
39291.1Skamil	validate_status_stopped(status, SIGTRAP);
39301.1Skamil
39311.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
39321.61Skre	SYSCALL_REQUIRE(
39331.61Skre	    ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
39341.1Skamil
39351.13Schristos	DPRINTF("Before checking siginfo_t\n");
39361.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, SIGTRAP);
39371.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_TRACE);
39381.1Skamil
39391.13Schristos	DPRINTF("Before resuming the child process where it left off and "
39401.1Skamil	    "without signal to be sent\n");
39411.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
39421.1Skamil
39431.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
39441.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
39451.1Skamil
39461.1Skamil	validate_status_exited(status, exitval);
39471.1Skamil
39481.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
39491.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
39501.1Skamil}
39511.1Skamil#endif
39521.1Skamil
39531.1Skamilvolatile lwpid_t the_lwp_id = 0;
39541.1Skamil
39551.1Skamilstatic void
39561.1Skamillwp_main_func(void *arg)
39571.1Skamil{
39581.1Skamil	the_lwp_id = _lwp_self();
39591.1Skamil	_lwp_exit();
39601.1Skamil}
39611.1Skamil
39621.1SkamilATF_TC(lwp_create1);
39631.1SkamilATF_TC_HEAD(lwp_create1, tc)
39641.1Skamil{
39651.1Skamil	atf_tc_set_md_var(tc, "descr",
39661.1Skamil	    "Verify that 1 LWP creation is intercepted by ptrace(2) with "
39671.1Skamil	    "EVENT_MASK set to PTRACE_LWP_CREATE");
39681.1Skamil}
39691.1Skamil
39701.1SkamilATF_TC_BODY(lwp_create1, tc)
39711.1Skamil{
39721.1Skamil	const int exitval = 5;
39731.1Skamil	const int sigval = SIGSTOP;
39741.1Skamil	pid_t child, wpid;
39751.1Skamil#if defined(TWAIT_HAVE_STATUS)
39761.1Skamil	int status;
39771.1Skamil#endif
39781.1Skamil	ptrace_state_t state;
39791.1Skamil	const int slen = sizeof(state);
39801.1Skamil	ptrace_event_t event;
39811.1Skamil	const int elen = sizeof(event);
39821.1Skamil	ucontext_t uc;
39831.1Skamil	lwpid_t lid;
39841.1Skamil	static const size_t ssize = 16*1024;
39851.1Skamil	void *stack;
39861.1Skamil
39871.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
39881.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
39891.1Skamil	if (child == 0) {
39901.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
39911.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
39921.1Skamil
39931.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
39941.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
39951.1Skamil
39961.13Schristos		DPRINTF("Before allocating memory for stack in child\n");
39971.1Skamil		FORKEE_ASSERT((stack = malloc(ssize)) != NULL);
39981.1Skamil
39991.13Schristos		DPRINTF("Before making context for new lwp in child\n");
40001.1Skamil		_lwp_makecontext(&uc, lwp_main_func, NULL, NULL, stack, ssize);
40011.1Skamil
40021.13Schristos		DPRINTF("Before creating new in child\n");
40031.1Skamil		FORKEE_ASSERT(_lwp_create(&uc, 0, &lid) == 0);
40041.1Skamil
40051.13Schristos		DPRINTF("Before waiting for lwp %d to exit\n", lid);
40061.1Skamil		FORKEE_ASSERT(_lwp_wait(lid, NULL) == 0);
40071.1Skamil
40081.13Schristos		DPRINTF("Before verifying that reported %d and running lid %d "
40091.1Skamil		    "are the same\n", lid, the_lwp_id);
40101.1Skamil		FORKEE_ASSERT_EQ(lid, the_lwp_id);
40111.1Skamil
40121.13Schristos		DPRINTF("Before exiting of the child process\n");
40131.1Skamil		_exit(exitval);
40141.1Skamil	}
40151.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
40161.1Skamil
40171.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
40181.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
40191.1Skamil
40201.1Skamil	validate_status_stopped(status, sigval);
40211.1Skamil
40221.13Schristos	DPRINTF("Set empty EVENT_MASK for the child %d\n", child);
40231.1Skamil	event.pe_set_event = PTRACE_LWP_CREATE;
40241.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);
40251.1Skamil
40261.13Schristos	DPRINTF("Before resuming the child process where it left off and "
40271.1Skamil	    "without signal to be sent\n");
40281.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
40291.1Skamil
40301.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
40311.1Skamil	    "SIGTRAP\n", TWAIT_FNAME);
40321.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
40331.1Skamil
40341.1Skamil	validate_status_stopped(status, SIGTRAP);
40351.1Skamil
40361.61Skre	SYSCALL_REQUIRE(
40371.61Skre	    ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
40381.1Skamil
40391.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_LWP_CREATE);
40401.1Skamil
40411.1Skamil	lid = state.pe_lwp;
40421.13Schristos	DPRINTF("Reported PTRACE_LWP_CREATE event with lid %d\n", lid);
40431.1Skamil
40441.13Schristos	DPRINTF("Before resuming the child process where it left off and "
40451.1Skamil	    "without signal to be sent\n");
40461.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
40471.1Skamil
40481.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
40491.1Skamil	    TWAIT_FNAME);
40501.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
40511.1Skamil
40521.1Skamil	validate_status_exited(status, exitval);
40531.1Skamil
40541.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
40551.1Skamil	    TWAIT_FNAME);
40561.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
40571.1Skamil}
40581.1Skamil
40591.1SkamilATF_TC(lwp_exit1);
40601.1SkamilATF_TC_HEAD(lwp_exit1, tc)
40611.1Skamil{
40621.1Skamil	atf_tc_set_md_var(tc, "descr",
40631.1Skamil	    "Verify that 1 LWP creation is intercepted by ptrace(2) with "
40641.1Skamil	    "EVENT_MASK set to PTRACE_LWP_EXIT");
40651.1Skamil}
40661.1Skamil
40671.1SkamilATF_TC_BODY(lwp_exit1, tc)
40681.1Skamil{
40691.1Skamil	const int exitval = 5;
40701.1Skamil	const int sigval = SIGSTOP;
40711.1Skamil	pid_t child, wpid;
40721.1Skamil#if defined(TWAIT_HAVE_STATUS)
40731.1Skamil	int status;
40741.1Skamil#endif
40751.1Skamil	ptrace_state_t state;
40761.1Skamil	const int slen = sizeof(state);
40771.1Skamil	ptrace_event_t event;
40781.1Skamil	const int elen = sizeof(event);
40791.1Skamil	ucontext_t uc;
40801.1Skamil	lwpid_t lid;
40811.1Skamil	static const size_t ssize = 16*1024;
40821.1Skamil	void *stack;
40831.1Skamil
40841.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
40851.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
40861.1Skamil	if (child == 0) {
40871.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
40881.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
40891.1Skamil
40901.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
40911.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
40921.1Skamil
40931.13Schristos		DPRINTF("Before allocating memory for stack in child\n");
40941.1Skamil		FORKEE_ASSERT((stack = malloc(ssize)) != NULL);
40951.1Skamil
40961.13Schristos		DPRINTF("Before making context for new lwp in child\n");
40971.1Skamil		_lwp_makecontext(&uc, lwp_main_func, NULL, NULL, stack, ssize);
40981.1Skamil
40991.13Schristos		DPRINTF("Before creating new in child\n");
41001.1Skamil		FORKEE_ASSERT(_lwp_create(&uc, 0, &lid) == 0);
41011.1Skamil
41021.13Schristos		DPRINTF("Before waiting for lwp %d to exit\n", lid);
41031.1Skamil		FORKEE_ASSERT(_lwp_wait(lid, NULL) == 0);
41041.1Skamil
41051.13Schristos		DPRINTF("Before verifying that reported %d and running lid %d "
41061.1Skamil		    "are the same\n", lid, the_lwp_id);
41071.1Skamil		FORKEE_ASSERT_EQ(lid, the_lwp_id);
41081.1Skamil
41091.13Schristos		DPRINTF("Before exiting of the child process\n");
41101.1Skamil		_exit(exitval);
41111.1Skamil	}
41121.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
41131.1Skamil
41141.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
41151.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
41161.1Skamil
41171.1Skamil	validate_status_stopped(status, sigval);
41181.1Skamil
41191.13Schristos	DPRINTF("Set empty EVENT_MASK for the child %d\n", child);
41201.1Skamil	event.pe_set_event = PTRACE_LWP_EXIT;
41211.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);
41221.1Skamil
41231.13Schristos	DPRINTF("Before resuming the child process where it left off and "
41241.1Skamil	    "without signal to be sent\n");
41251.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
41261.1Skamil
41271.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
41281.1Skamil	    "SIGTRAP\n", TWAIT_FNAME);
41291.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
41301.1Skamil
41311.1Skamil	validate_status_stopped(status, SIGTRAP);
41321.1Skamil
41331.61Skre	SYSCALL_REQUIRE(
41341.61Skre	    ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
41351.1Skamil
41361.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_LWP_EXIT);
41371.1Skamil
41381.1Skamil	lid = state.pe_lwp;
41391.13Schristos	DPRINTF("Reported PTRACE_LWP_EXIT event with lid %d\n", lid);
41401.1Skamil
41411.13Schristos	DPRINTF("Before resuming the child process where it left off and "
41421.1Skamil	    "without signal to be sent\n");
41431.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
41441.1Skamil
41451.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
41461.1Skamil	    TWAIT_FNAME);
41471.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
41481.1Skamil
41491.1Skamil	validate_status_exited(status, exitval);
41501.1Skamil
41511.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
41521.1Skamil	    TWAIT_FNAME);
41531.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
41541.1Skamil}
41551.1Skamil
41561.1SkamilATF_TC(signal1);
41571.1SkamilATF_TC_HEAD(signal1, tc)
41581.1Skamil{
41591.1Skamil	atf_tc_set_md_var(tc, "descr",
41601.1Skamil	    "Verify that masking single unrelated signal does not stop tracer "
41611.1Skamil	    "from catching other signals");
41621.1Skamil}
41631.1Skamil
41641.1SkamilATF_TC_BODY(signal1, tc)
41651.1Skamil{
41661.1Skamil	const int exitval = 5;
41671.1Skamil	const int sigval = SIGSTOP;
41681.1Skamil	const int sigmasked = SIGTRAP;
41691.1Skamil	const int signotmasked = SIGINT;
41701.1Skamil	pid_t child, wpid;
41711.1Skamil#if defined(TWAIT_HAVE_STATUS)
41721.1Skamil	int status;
41731.1Skamil#endif
41741.1Skamil	sigset_t intmask;
41751.1Skamil
41761.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
41771.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
41781.1Skamil	if (child == 0) {
41791.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
41801.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
41811.1Skamil
41821.1Skamil		sigemptyset(&intmask);
41831.1Skamil		sigaddset(&intmask, sigmasked);
41841.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
41851.1Skamil
41861.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
41871.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
41881.1Skamil
41891.13Schristos		DPRINTF("Before raising %s from child\n",
41901.1Skamil		    strsignal(signotmasked));
41911.1Skamil		FORKEE_ASSERT(raise(signotmasked) == 0);
41921.1Skamil
41931.13Schristos		DPRINTF("Before exiting of the child process\n");
41941.1Skamil		_exit(exitval);
41951.1Skamil	}
41961.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
41971.1Skamil
41981.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
41991.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
42001.1Skamil
42011.1Skamil	validate_status_stopped(status, sigval);
42021.1Skamil
42031.13Schristos	DPRINTF("Before resuming the child process where it left off and "
42041.1Skamil	    "without signal to be sent\n");
42051.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
42061.1Skamil
42071.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
42081.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
42091.1Skamil
42101.1Skamil	validate_status_stopped(status, signotmasked);
42111.1Skamil
42121.13Schristos	DPRINTF("Before resuming the child process where it left off and "
42131.1Skamil	    "without signal to be sent\n");
42141.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
42151.1Skamil
42161.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
42171.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
42181.1Skamil
42191.1Skamil	validate_status_exited(status, exitval);
42201.1Skamil
42211.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
42221.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
42231.1Skamil}
42241.1Skamil
42251.1SkamilATF_TC(signal2);
42261.1SkamilATF_TC_HEAD(signal2, tc)
42271.1Skamil{
42281.1Skamil	atf_tc_set_md_var(tc, "descr",
42291.1Skamil	    "Verify that masking SIGTRAP in tracee stops tracer from "
42301.1Skamil	    "catching this raised signal");
42311.1Skamil}
42321.1Skamil
42331.1SkamilATF_TC_BODY(signal2, tc)
42341.1Skamil{
42351.1Skamil	const int exitval = 5;
42361.1Skamil	const int sigval = SIGSTOP;
42371.1Skamil	const int sigmasked = SIGTRAP;
42381.1Skamil	pid_t child, wpid;
42391.1Skamil#if defined(TWAIT_HAVE_STATUS)
42401.1Skamil	int status;
42411.1Skamil#endif
42421.1Skamil	sigset_t intmask;
42431.1Skamil
42441.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
42451.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
42461.1Skamil	if (child == 0) {
42471.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
42481.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
42491.1Skamil
42501.1Skamil		sigemptyset(&intmask);
42511.1Skamil		sigaddset(&intmask, sigmasked);
42521.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
42531.1Skamil
42541.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
42551.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
42561.1Skamil
42571.13Schristos		DPRINTF("Before raising %s breakpoint from child\n",
42581.1Skamil		    strsignal(sigmasked));
42591.1Skamil		FORKEE_ASSERT(raise(sigmasked) == 0);
42601.1Skamil
42611.13Schristos		DPRINTF("Before exiting of the child process\n");
42621.1Skamil		_exit(exitval);
42631.1Skamil	}
42641.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
42651.1Skamil
42661.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
42671.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
42681.1Skamil
42691.1Skamil	validate_status_stopped(status, sigval);
42701.1Skamil
42711.13Schristos	DPRINTF("Before resuming the child process where it left off and "
42721.1Skamil	    "without signal to be sent\n");
42731.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
42741.1Skamil
42751.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
42761.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
42771.1Skamil
42781.1Skamil	validate_status_exited(status, exitval);
42791.1Skamil
42801.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
42811.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
42821.1Skamil}
42831.1Skamil
42841.1SkamilATF_TC(signal3);
42851.1SkamilATF_TC_HEAD(signal3, tc)
42861.1Skamil{
42871.7Skamil	atf_tc_set_md_var(tc, "timeout", "5");
42881.1Skamil	atf_tc_set_md_var(tc, "descr",
42891.1Skamil	    "Verify that masking SIGTRAP in tracee does not stop tracer from "
42901.1Skamil	    "catching software breakpoints");
42911.1Skamil}
42921.1Skamil
42931.1SkamilATF_TC_BODY(signal3, tc)
42941.1Skamil{
42951.1Skamil	const int exitval = 5;
42961.1Skamil	const int sigval = SIGSTOP;
42971.1Skamil	const int sigmasked = SIGTRAP;
42981.1Skamil	pid_t child, wpid;
42991.1Skamil#if defined(TWAIT_HAVE_STATUS)
43001.1Skamil	int status;
43011.1Skamil#endif
43021.1Skamil	sigset_t intmask;
43031.1Skamil
43041.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
43051.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
43061.1Skamil	if (child == 0) {
43071.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
43081.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
43091.1Skamil
43101.1Skamil		sigemptyset(&intmask);
43111.1Skamil		sigaddset(&intmask, sigmasked);
43121.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
43131.1Skamil
43141.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
43151.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
43161.1Skamil
43171.13Schristos		DPRINTF("Before raising software breakpoint from child\n");
43181.52Skamil		trigger_trap();
43191.1Skamil
43201.13Schristos		DPRINTF("Before exiting of the child process\n");
43211.1Skamil		_exit(exitval);
43221.1Skamil	}
43231.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
43241.1Skamil
43251.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
43261.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
43271.1Skamil
43281.1Skamil	validate_status_stopped(status, sigval);
43291.1Skamil
43301.13Schristos	DPRINTF("Before resuming the child process where it left off and "
43311.1Skamil	    "without signal to be sent\n");
43321.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
43331.1Skamil
43341.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
43351.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
43361.1Skamil
43371.1Skamil	validate_status_stopped(status, sigmasked);
43381.1Skamil
43391.13Schristos	DPRINTF("Before resuming the child process where it left off and "
43401.1Skamil	    "without signal to be sent\n");
43411.49Skamil	SYSCALL_REQUIRE(ptrace(PT_KILL, child, NULL, 0) != -1);
43421.1Skamil
43431.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
43441.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
43451.1Skamil
43461.49Skamil	validate_status_signaled(status, SIGKILL, 0);
43471.1Skamil
43481.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
43491.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
43501.1Skamil}
43511.1Skamil
43521.1Skamil#if defined(PT_STEP)
43531.1SkamilATF_TC(signal4);
43541.1SkamilATF_TC_HEAD(signal4, tc)
43551.1Skamil{
43561.1Skamil	atf_tc_set_md_var(tc, "descr",
43571.1Skamil	    "Verify that masking SIGTRAP in tracee does not stop tracer from "
43581.1Skamil	    "catching single step trap");
43591.1Skamil}
43601.1Skamil
43611.1SkamilATF_TC_BODY(signal4, tc)
43621.1Skamil{
43631.1Skamil	const int exitval = 5;
43641.1Skamil	const int sigval = SIGSTOP;
43651.1Skamil	const int sigmasked = SIGTRAP;
43661.1Skamil	pid_t child, wpid;
43671.1Skamil#if defined(TWAIT_HAVE_STATUS)
43681.1Skamil	int status;
43691.1Skamil#endif
43701.1Skamil	sigset_t intmask;
43711.1Skamil	int happy;
43721.1Skamil
43731.1Skamil#if defined(__arm__)
43741.5Skamil	/* PT_STEP not supported on arm 32-bit */
43751.5Skamil	atf_tc_expect_fail("PR kern/51918 PR kern/52119");
43761.1Skamil#endif
43771.1Skamil
43781.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
43791.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
43801.1Skamil	if (child == 0) {
43811.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
43821.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
43831.1Skamil
43841.1Skamil		happy = check_happy(100);
43851.1Skamil
43861.1Skamil		sigemptyset(&intmask);
43871.1Skamil		sigaddset(&intmask, sigmasked);
43881.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
43891.1Skamil
43901.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
43911.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
43921.1Skamil
43931.1Skamil		FORKEE_ASSERT_EQ(happy, check_happy(100));
43941.1Skamil
43951.13Schristos		DPRINTF("Before exiting of the child process\n");
43961.1Skamil		_exit(exitval);
43971.1Skamil	}
43981.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
43991.1Skamil
44001.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
44011.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
44021.1Skamil
44031.1Skamil	validate_status_stopped(status, sigval);
44041.1Skamil
44051.13Schristos	DPRINTF("Before resuming the child process where it left off and "
44061.1Skamil	    "without signal to be sent\n");
44071.13Schristos	SYSCALL_REQUIRE(ptrace(PT_STEP, child, (void *)1, 0) != -1);
44081.1Skamil
44091.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
44101.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
44111.1Skamil
44121.1Skamil	validate_status_stopped(status, sigmasked);
44131.1Skamil
44141.13Schristos	DPRINTF("Before resuming the child process where it left off and "
44151.1Skamil	    "without signal to be sent\n");
44161.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
44171.1Skamil
44181.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
44191.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
44201.1Skamil
44211.1Skamil	validate_status_exited(status, exitval);
44221.1Skamil
44231.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
44241.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
44251.1Skamil}
44261.1Skamil#endif
44271.1Skamil
44281.1SkamilATF_TC(signal5);
44291.1SkamilATF_TC_HEAD(signal5, tc)
44301.1Skamil{
44311.1Skamil	atf_tc_set_md_var(tc, "descr",
44321.1Skamil	    "Verify that masking SIGTRAP in tracee does not stop tracer from "
44331.1Skamil	    "catching exec() breakpoint");
44341.1Skamil}
44351.1Skamil
44361.1SkamilATF_TC_BODY(signal5, tc)
44371.1Skamil{
44381.1Skamil	const int sigval = SIGSTOP;
44391.1Skamil	const int sigmasked = SIGTRAP;
44401.1Skamil	pid_t child, wpid;
44411.1Skamil#if defined(TWAIT_HAVE_STATUS)
44421.1Skamil	int status;
44431.1Skamil#endif
44441.58Skamil	struct ptrace_siginfo info;
44451.1Skamil	sigset_t intmask;
44461.1Skamil
44471.58Skamil	memset(&info, 0, sizeof(info));
44481.14Schristos
44491.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
44501.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
44511.1Skamil	if (child == 0) {
44521.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
44531.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
44541.1Skamil
44551.1Skamil		sigemptyset(&intmask);
44561.1Skamil		sigaddset(&intmask, sigmasked);
44571.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
44581.1Skamil
44591.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
44601.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
44611.1Skamil
44621.13Schristos		DPRINTF("Before calling execve(2) from child\n");
44631.1Skamil		execlp("/bin/echo", "/bin/echo", NULL);
44641.1Skamil
44651.58Skamil		/* NOTREACHED */
44661.58Skamil		FORKEE_ASSERTX(0 && "Not reached");
44671.1Skamil	}
44681.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
44691.1Skamil
44701.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
44711.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
44721.1Skamil
44731.1Skamil	validate_status_stopped(status, sigval);
44741.1Skamil
44751.13Schristos	DPRINTF("Before resuming the child process where it left off and "
44761.1Skamil	    "without signal to be sent\n");
44771.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
44781.1Skamil
44791.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
44801.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
44811.1Skamil
44821.1Skamil	validate_status_stopped(status, sigmasked);
44831.1Skamil
44841.58Skamil	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
44851.61Skre	SYSCALL_REQUIRE(
44861.61Skre	    ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
44871.58Skamil
44881.58Skamil	DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid);
44891.58Skamil	DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n",
44901.58Skamil	    info.psi_siginfo.si_signo, info.psi_siginfo.si_code,
44911.58Skamil	    info.psi_siginfo.si_errno);
44921.58Skamil
44931.58Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigmasked);
44941.58Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_EXEC);
44951.58Skamil
44961.13Schristos	DPRINTF("Before resuming the child process where it left off and "
44971.1Skamil	    "without signal to be sent\n");
44981.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
44991.1Skamil
45001.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
45011.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
45021.1Skamil
45031.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
45041.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
45051.1Skamil}
45061.1Skamil
45071.1Skamil#if defined(TWAIT_HAVE_PID)
45081.1SkamilATF_TC(signal6);
45091.1SkamilATF_TC_HEAD(signal6, tc)
45101.1Skamil{
45111.1Skamil	atf_tc_set_md_var(tc, "timeout", "5");
45121.1Skamil	atf_tc_set_md_var(tc, "descr",
45131.1Skamil	    "Verify that masking SIGTRAP in tracee does not stop tracer from "
45141.1Skamil	    "catching PTRACE_FORK breakpoint");
45151.1Skamil}
45161.1Skamil
45171.1SkamilATF_TC_BODY(signal6, tc)
45181.1Skamil{
45191.1Skamil	const int exitval = 5;
45201.1Skamil	const int exitval2 = 15;
45211.1Skamil	const int sigval = SIGSTOP;
45221.1Skamil	const int sigmasked = SIGTRAP;
45231.1Skamil	pid_t child, child2, wpid;
45241.1Skamil#if defined(TWAIT_HAVE_STATUS)
45251.1Skamil	int status;
45261.1Skamil#endif
45271.1Skamil	sigset_t intmask;
45281.1Skamil	ptrace_state_t state;
45291.1Skamil	const int slen = sizeof(state);
45301.1Skamil	ptrace_event_t event;
45311.1Skamil	const int elen = sizeof(event);
45321.1Skamil
45331.38Skamil	atf_tc_expect_fail("PR kern/51918");
45341.14Schristos
45351.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
45361.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
45371.1Skamil	if (child == 0) {
45381.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
45391.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
45401.1Skamil
45411.1Skamil		sigemptyset(&intmask);
45421.1Skamil		sigaddset(&intmask, sigmasked);
45431.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
45441.1Skamil
45451.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
45461.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
45471.1Skamil
45481.1Skamil		FORKEE_ASSERT((child2 = fork()) != -1);
45491.1Skamil
45501.1Skamil		if (child2 == 0)
45511.1Skamil			_exit(exitval2);
45521.1Skamil
45531.1Skamil		FORKEE_REQUIRE_SUCCESS
45541.1Skamil			(wpid = TWAIT_GENERIC(child2, &status, 0), child2);
45551.1Skamil
45561.1Skamil		forkee_status_exited(status, exitval2);
45571.1Skamil
45581.13Schristos		DPRINTF("Before exiting of the child process\n");
45591.1Skamil		_exit(exitval);
45601.1Skamil	}
45611.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
45621.1Skamil
45631.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
45641.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
45651.1Skamil
45661.1Skamil	validate_status_stopped(status, sigval);
45671.1Skamil
45681.13Schristos	DPRINTF("Enable PTRACE_FORK in EVENT_MASK for the child %d\n", child);
45691.1Skamil	event.pe_set_event = PTRACE_FORK;
45701.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);
45711.1Skamil
45721.13Schristos	DPRINTF("Before resuming the child process where it left off and "
45731.1Skamil	    "without signal to be sent\n");
45741.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
45751.1Skamil
45761.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
45771.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
45781.1Skamil
45791.1Skamil	validate_status_stopped(status, sigmasked);
45801.1Skamil
45811.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
45821.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_FORK);
45831.1Skamil
45841.1Skamil	child2 = state.pe_other_pid;
45851.13Schristos	DPRINTF("Reported PTRACE_FORK event with forkee %d\n", child2);
45861.1Skamil
45871.13Schristos	DPRINTF("Before calling %s() for the child2\n", TWAIT_FNAME);
45881.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0),
45891.1Skamil	    child2);
45901.1Skamil
45911.1Skamil	validate_status_stopped(status, SIGTRAP);
45921.1Skamil
45931.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child2, &state, slen) != -1);
45941.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_FORK);
45951.1Skamil	ATF_REQUIRE_EQ(state.pe_other_pid, child);
45961.1Skamil
45971.13Schristos	DPRINTF("Before resuming the forkee process where it left off and "
45981.1Skamil	    "without signal to be sent\n");
45991.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child2, (void *)1, 0) != -1);
46001.1Skamil
46011.13Schristos	DPRINTF("Before resuming the child process where it left off and "
46021.1Skamil	    "without signal to be sent\n");
46031.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
46041.1Skamil
46051.13Schristos	DPRINTF("Before calling %s() for the forkee - expected exited\n",
46061.1Skamil	    TWAIT_FNAME);
46071.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0),
46081.57Skamil	    child2);
46091.1Skamil
46101.1Skamil	validate_status_exited(status, exitval2);
46111.1Skamil
46121.13Schristos	DPRINTF("Before calling %s() for the forkee - expected no process\n",
46131.1Skamil	    TWAIT_FNAME);
46141.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD,
46151.1Skamil	    wpid = TWAIT_GENERIC(child2, &status, 0));
46161.1Skamil
46171.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
46181.1Skamil	    "SIGCHLD\n", TWAIT_FNAME);
46191.57Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
46201.1Skamil
46211.1Skamil	validate_status_stopped(status, SIGCHLD);
46221.1Skamil
46231.57Skamil	DPRINTF("Before resuming the child process where it left off and "
46241.1Skamil	    "without signal to be sent\n");
46251.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
46261.1Skamil
46271.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
46281.1Skamil	    TWAIT_FNAME);
46291.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
46301.1Skamil
46311.1Skamil	validate_status_exited(status, exitval);
46321.1Skamil
46331.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
46341.57Skamil	    TWAIT_FNAME);
46351.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
46361.1Skamil}
46371.1Skamil#endif
46381.1Skamil
46391.1Skamil#if defined(TWAIT_HAVE_PID)
46401.1SkamilATF_TC(signal7);
46411.1SkamilATF_TC_HEAD(signal7, tc)
46421.1Skamil{
46431.1Skamil	atf_tc_set_md_var(tc, "descr",
46441.1Skamil	    "Verify that masking SIGTRAP in tracee does not stop tracer from "
46451.1Skamil	    "catching PTRACE_VFORK breakpoint");
46461.1Skamil}
46471.1Skamil
46481.1SkamilATF_TC_BODY(signal7, tc)
46491.1Skamil{
46501.1Skamil	const int exitval = 5;
46511.1Skamil	const int exitval2 = 15;
46521.1Skamil	const int sigval = SIGSTOP;
46531.1Skamil	const int sigmasked = SIGTRAP;
46541.1Skamil	pid_t child, child2, wpid;
46551.1Skamil#if defined(TWAIT_HAVE_STATUS)
46561.1Skamil	int status;
46571.1Skamil#endif
46581.1Skamil	sigset_t intmask;
46591.1Skamil	ptrace_state_t state;
46601.1Skamil	const int slen = sizeof(state);
46611.1Skamil	ptrace_event_t event;
46621.1Skamil	const int elen = sizeof(event);
46631.1Skamil
46641.38Skamil	atf_tc_expect_fail("PR kern/51918");
46651.14Schristos
46661.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
46671.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
46681.1Skamil	if (child == 0) {
46691.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
46701.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
46711.1Skamil
46721.1Skamil		sigemptyset(&intmask);
46731.1Skamil		sigaddset(&intmask, sigmasked);
46741.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
46751.1Skamil
46761.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
46771.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
46781.1Skamil
46791.1Skamil		FORKEE_ASSERT((child2 = fork()) != -1);
46801.1Skamil
46811.1Skamil		if (child2 == 0)
46821.1Skamil			_exit(exitval2);
46831.1Skamil
46841.1Skamil		FORKEE_REQUIRE_SUCCESS
46851.1Skamil			(wpid = TWAIT_GENERIC(child2, &status, 0), child2);
46861.1Skamil
46871.1Skamil		forkee_status_exited(status, exitval2);
46881.1Skamil
46891.13Schristos		DPRINTF("Before exiting of the child process\n");
46901.1Skamil		_exit(exitval);
46911.1Skamil	}
46921.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
46931.1Skamil
46941.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
46951.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
46961.1Skamil
46971.1Skamil	validate_status_stopped(status, sigval);
46981.1Skamil
46991.13Schristos	DPRINTF("Enable PTRACE_VFORK in EVENT_MASK for the child %d\n", child);
47001.1Skamil	event.pe_set_event = PTRACE_VFORK;
47011.61Skre	SYSCALL_REQUIRE(
47021.61Skre	    ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1 ||
47031.61Skre	    errno == ENOTSUP);
47041.1Skamil
47051.13Schristos	DPRINTF("Before resuming the child process where it left off and "
47061.1Skamil	    "without signal to be sent\n");
47071.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
47081.1Skamil
47091.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
47101.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
47111.1Skamil
47121.1Skamil	validate_status_stopped(status, sigmasked);
47131.1Skamil
47141.61Skre	SYSCALL_REQUIRE(
47151.61Skre	    ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
47161.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_VFORK);
47171.1Skamil
47181.1Skamil	child2 = state.pe_other_pid;
47191.13Schristos	DPRINTF("Reported PTRACE_VFORK event with forkee %d\n", child2);
47201.1Skamil
47211.13Schristos	DPRINTF("Before calling %s() for the child2\n", TWAIT_FNAME);
47221.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0),
47231.1Skamil	    child2);
47241.1Skamil
47251.1Skamil	validate_status_stopped(status, SIGTRAP);
47261.1Skamil
47271.61Skre	SYSCALL_REQUIRE(
47281.61Skre	    ptrace(PT_GET_PROCESS_STATE, child2, &state, slen) != -1);
47291.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_VFORK);
47301.1Skamil	ATF_REQUIRE_EQ(state.pe_other_pid, child);
47311.1Skamil
47321.13Schristos	DPRINTF("Before resuming the forkee process where it left off and "
47331.1Skamil	    "without signal to be sent\n");
47341.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child2, (void *)1, 0) != -1);
47351.1Skamil
47361.13Schristos	DPRINTF("Before resuming the child process where it left off and "
47371.1Skamil	    "without signal to be sent\n");
47381.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
47391.1Skamil
47401.13Schristos	DPRINTF("Before calling %s() for the forkee - expected exited\n",
47411.1Skamil	    TWAIT_FNAME);
47421.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0),
47431.57Skamil	    child2);
47441.1Skamil
47451.1Skamil	validate_status_exited(status, exitval2);
47461.1Skamil
47471.13Schristos	DPRINTF("Before calling %s() for the forkee - expected no process\n",
47481.1Skamil	    TWAIT_FNAME);
47491.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD,
47501.1Skamil	    wpid = TWAIT_GENERIC(child2, &status, 0));
47511.1Skamil
47521.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
47531.1Skamil	    "SIGCHLD\n", TWAIT_FNAME);
47541.57Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
47551.1Skamil
47561.1Skamil	validate_status_stopped(status, SIGCHLD);
47571.1Skamil
47581.57Skamil	DPRINTF("Before resuming the child process where it left off and "
47591.1Skamil	    "without signal to be sent\n");
47601.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
47611.1Skamil
47621.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
47631.1Skamil	    TWAIT_FNAME);
47641.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
47651.1Skamil
47661.1Skamil	validate_status_exited(status, exitval);
47671.1Skamil
47681.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
47691.57Skamil	    TWAIT_FNAME);
47701.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
47711.1Skamil}
47721.1Skamil#endif
47731.1Skamil
47741.1SkamilATF_TC(signal8);
47751.1SkamilATF_TC_HEAD(signal8, tc)
47761.1Skamil{
47771.1Skamil	atf_tc_set_md_var(tc, "descr",
47781.1Skamil	    "Verify that masking SIGTRAP in tracee does not stop tracer from "
47791.1Skamil	    "catching PTRACE_VFORK_DONE breakpoint");
47801.1Skamil}
47811.1Skamil
47821.1SkamilATF_TC_BODY(signal8, tc)
47831.1Skamil{
47841.1Skamil	const int exitval = 5;
47851.1Skamil	const int exitval2 = 15;
47861.1Skamil	const int sigval = SIGSTOP;
47871.1Skamil	const int sigmasked = SIGTRAP;
47881.1Skamil	pid_t child, child2, wpid;
47891.1Skamil#if defined(TWAIT_HAVE_STATUS)
47901.1Skamil	int status;
47911.1Skamil#endif
47921.1Skamil	sigset_t intmask;
47931.1Skamil	ptrace_state_t state;
47941.1Skamil	const int slen = sizeof(state);
47951.1Skamil	ptrace_event_t event;
47961.1Skamil	const int elen = sizeof(event);
47971.1Skamil
47981.14Schristos	atf_tc_expect_fail("PR kern/51918");
47991.14Schristos
48001.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
48011.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
48021.1Skamil	if (child == 0) {
48031.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
48041.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
48051.1Skamil
48061.1Skamil		sigemptyset(&intmask);
48071.1Skamil		sigaddset(&intmask, sigmasked);
48081.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
48091.1Skamil
48101.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
48111.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
48121.1Skamil
48131.1Skamil		FORKEE_ASSERT((child2 = vfork()) != -1);
48141.1Skamil
48151.1Skamil		if (child2 == 0)
48161.1Skamil			_exit(exitval2);
48171.1Skamil
48181.1Skamil		FORKEE_REQUIRE_SUCCESS
48191.1Skamil			(wpid = TWAIT_GENERIC(child2, &status, 0), child2);
48201.1Skamil
48211.1Skamil		forkee_status_exited(status, exitval2);
48221.1Skamil
48231.13Schristos		DPRINTF("Before exiting of the child process\n");
48241.1Skamil		_exit(exitval);
48251.1Skamil	}
48261.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
48271.1Skamil
48281.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
48291.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
48301.1Skamil
48311.1Skamil	validate_status_stopped(status, sigval);
48321.1Skamil
48331.13Schristos	DPRINTF("Enable PTRACE_VFORK_DONE in EVENT_MASK for the child %d\n",
48341.1Skamil	    child);
48351.1Skamil	event.pe_set_event = PTRACE_VFORK_DONE;
48361.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);
48371.1Skamil
48381.13Schristos	DPRINTF("Before resuming the child process where it left off and "
48391.1Skamil	    "without signal to be sent\n");
48401.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
48411.1Skamil
48421.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
48431.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
48441.1Skamil
48451.1Skamil	validate_status_stopped(status, sigmasked);
48461.1Skamil
48471.61Skre	SYSCALL_REQUIRE(
48481.61Skre	    ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
48491.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_VFORK_DONE);
48501.1Skamil
48511.1Skamil	child2 = state.pe_other_pid;
48521.13Schristos	DPRINTF("Reported PTRACE_VFORK_DONE event with forkee %d\n", child2);
48531.1Skamil
48541.13Schristos	DPRINTF("Before resuming the child process where it left off and "
48551.1Skamil	    "without signal to be sent\n");
48561.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
48571.1Skamil
48581.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
48591.1Skamil	    "SIGCHLD\n", TWAIT_FNAME);
48601.57Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
48611.1Skamil
48621.1Skamil	validate_status_stopped(status, SIGCHLD);
48631.1Skamil
48641.57Skamil	DPRINTF("Before resuming the child process where it left off and "
48651.1Skamil	    "without signal to be sent\n");
48661.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
48671.1Skamil
48681.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
48691.1Skamil	    TWAIT_FNAME);
48701.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
48711.1Skamil
48721.1Skamil	validate_status_exited(status, exitval);
48731.1Skamil
48741.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
48751.57Skamil	    TWAIT_FNAME);
48761.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
48771.1Skamil}
48781.1Skamil
48791.1SkamilATF_TC(signal9);
48801.1SkamilATF_TC_HEAD(signal9, tc)
48811.1Skamil{
48821.1Skamil	atf_tc_set_md_var(tc, "descr",
48831.1Skamil	    "Verify that masking SIGTRAP in tracee does not stop tracer from "
48841.1Skamil	    "catching PTRACE_LWP_CREATE breakpoint");
48851.1Skamil}
48861.1Skamil
48871.1SkamilATF_TC_BODY(signal9, tc)
48881.1Skamil{
48891.1Skamil	const int exitval = 5;
48901.1Skamil	const int sigval = SIGSTOP;
48911.1Skamil	const int sigmasked = SIGTRAP;
48921.1Skamil	pid_t child, wpid;
48931.1Skamil#if defined(TWAIT_HAVE_STATUS)
48941.1Skamil	int status;
48951.1Skamil#endif
48961.1Skamil	sigset_t intmask;
48971.1Skamil	ptrace_state_t state;
48981.1Skamil	const int slen = sizeof(state);
48991.1Skamil	ptrace_event_t event;
49001.1Skamil	const int elen = sizeof(event);
49011.1Skamil	ucontext_t uc;
49021.1Skamil	lwpid_t lid;
49031.1Skamil	static const size_t ssize = 16*1024;
49041.1Skamil	void *stack;
49051.1Skamil
49061.14Schristos	atf_tc_expect_fail("PR kern/51918");
49071.14Schristos
49081.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
49091.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
49101.1Skamil	if (child == 0) {
49111.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
49121.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
49131.1Skamil
49141.1Skamil		sigemptyset(&intmask);
49151.1Skamil		sigaddset(&intmask, sigmasked);
49161.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
49171.1Skamil
49181.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
49191.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
49201.1Skamil
49211.13Schristos		DPRINTF("Before allocating memory for stack in child\n");
49221.1Skamil		FORKEE_ASSERT((stack = malloc(ssize)) != NULL);
49231.1Skamil
49241.13Schristos		DPRINTF("Before making context for new lwp in child\n");
49251.1Skamil		_lwp_makecontext(&uc, lwp_main_func, NULL, NULL, stack, ssize);
49261.1Skamil
49271.13Schristos		DPRINTF("Before creating new in child\n");
49281.1Skamil		FORKEE_ASSERT(_lwp_create(&uc, 0, &lid) == 0);
49291.1Skamil
49301.13Schristos		DPRINTF("Before waiting for lwp %d to exit\n", lid);
49311.1Skamil		FORKEE_ASSERT(_lwp_wait(lid, NULL) == 0);
49321.1Skamil
49331.13Schristos		DPRINTF("Before verifying that reported %d and running lid %d "
49341.1Skamil		    "are the same\n", lid, the_lwp_id);
49351.1Skamil		FORKEE_ASSERT_EQ(lid, the_lwp_id);
49361.1Skamil
49371.13Schristos		DPRINTF("Before exiting of the child process\n");
49381.1Skamil		_exit(exitval);
49391.1Skamil	}
49401.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
49411.1Skamil
49421.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
49431.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
49441.1Skamil
49451.1Skamil	validate_status_stopped(status, sigval);
49461.1Skamil
49471.13Schristos	DPRINTF("Set empty EVENT_MASK for the child %d\n", child);
49481.1Skamil	event.pe_set_event = PTRACE_LWP_CREATE;
49491.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);
49501.1Skamil
49511.13Schristos	DPRINTF("Before resuming the child process where it left off and "
49521.1Skamil	    "without signal to be sent\n");
49531.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
49541.1Skamil
49551.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
49561.1Skamil	    "SIGTRAP\n", TWAIT_FNAME);
49571.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
49581.1Skamil
49591.1Skamil	validate_status_stopped(status, sigmasked);
49601.1Skamil
49611.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
49621.1Skamil
49631.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_LWP_CREATE);
49641.1Skamil
49651.1Skamil	lid = state.pe_lwp;
49661.13Schristos	DPRINTF("Reported PTRACE_LWP_CREATE event with lid %d\n", lid);
49671.1Skamil
49681.13Schristos	DPRINTF("Before resuming the child process where it left off and "
49691.1Skamil	    "without signal to be sent\n");
49701.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
49711.1Skamil
49721.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
49731.1Skamil	    TWAIT_FNAME);
49741.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
49751.1Skamil
49761.1Skamil	validate_status_exited(status, exitval);
49771.1Skamil
49781.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
49791.1Skamil	    TWAIT_FNAME);
49801.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
49811.1Skamil}
49821.1Skamil
49831.1SkamilATF_TC(signal10);
49841.1SkamilATF_TC_HEAD(signal10, tc)
49851.1Skamil{
49861.1Skamil	atf_tc_set_md_var(tc, "descr",
49871.1Skamil	    "Verify that masking SIGTRAP in tracee does not stop tracer from "
49881.1Skamil	    "catching PTRACE_LWP_EXIT breakpoint");
49891.1Skamil}
49901.1Skamil
49911.1SkamilATF_TC_BODY(signal10, tc)
49921.1Skamil{
49931.1Skamil	const int exitval = 5;
49941.1Skamil	const int sigval = SIGSTOP;
49951.1Skamil	const int sigmasked = SIGTRAP;
49961.1Skamil	pid_t child, wpid;
49971.1Skamil#if defined(TWAIT_HAVE_STATUS)
49981.1Skamil	int status;
49991.1Skamil#endif
50001.1Skamil	sigset_t intmask;
50011.1Skamil	ptrace_state_t state;
50021.1Skamil	const int slen = sizeof(state);
50031.1Skamil	ptrace_event_t event;
50041.1Skamil	const int elen = sizeof(event);
50051.1Skamil	ucontext_t uc;
50061.1Skamil	lwpid_t lid;
50071.1Skamil	static const size_t ssize = 16*1024;
50081.1Skamil	void *stack;
50091.1Skamil
50101.14Schristos	atf_tc_expect_fail("PR kern/51918");
50111.14Schristos
50121.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
50131.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
50141.1Skamil	if (child == 0) {
50151.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
50161.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
50171.1Skamil
50181.1Skamil		sigemptyset(&intmask);
50191.1Skamil		sigaddset(&intmask, sigmasked);
50201.1Skamil		sigprocmask(SIG_BLOCK, &intmask, NULL);
50211.1Skamil
50221.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
50231.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
50241.1Skamil
50251.13Schristos		DPRINTF("Before allocating memory for stack in child\n");
50261.1Skamil		FORKEE_ASSERT((stack = malloc(ssize)) != NULL);
50271.1Skamil
50281.13Schristos		DPRINTF("Before making context for new lwp in child\n");
50291.1Skamil		_lwp_makecontext(&uc, lwp_main_func, NULL, NULL, stack, ssize);
50301.1Skamil
50311.13Schristos		DPRINTF("Before creating new in child\n");
50321.1Skamil		FORKEE_ASSERT(_lwp_create(&uc, 0, &lid) == 0);
50331.1Skamil
50341.13Schristos		DPRINTF("Before waiting for lwp %d to exit\n", lid);
50351.1Skamil		FORKEE_ASSERT(_lwp_wait(lid, NULL) == 0);
50361.1Skamil
50371.13Schristos		DPRINTF("Before verifying that reported %d and running lid %d "
50381.1Skamil		    "are the same\n", lid, the_lwp_id);
50391.1Skamil		FORKEE_ASSERT_EQ(lid, the_lwp_id);
50401.1Skamil
50411.13Schristos		DPRINTF("Before exiting of the child process\n");
50421.1Skamil		_exit(exitval);
50431.1Skamil	}
50441.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
50451.1Skamil
50461.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
50471.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
50481.1Skamil
50491.1Skamil	validate_status_stopped(status, sigval);
50501.1Skamil
50511.13Schristos	DPRINTF("Set empty EVENT_MASK for the child %d\n", child);
50521.1Skamil	event.pe_set_event = PTRACE_LWP_EXIT;
50531.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1);
50541.1Skamil
50551.13Schristos	DPRINTF("Before resuming the child process where it left off and "
50561.1Skamil	    "without signal to be sent\n");
50571.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
50581.1Skamil
50591.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
50601.1Skamil	    "SIGTRAP\n", TWAIT_FNAME);
50611.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
50621.1Skamil
50631.1Skamil	validate_status_stopped(status, sigmasked);
50641.1Skamil
50651.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1);
50661.1Skamil
50671.1Skamil	ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_LWP_EXIT);
50681.1Skamil
50691.1Skamil	lid = state.pe_lwp;
50701.13Schristos	DPRINTF("Reported PTRACE_LWP_EXIT event with lid %d\n", lid);
50711.1Skamil
50721.13Schristos	DPRINTF("Before resuming the child process where it left off and "
50731.1Skamil	    "without signal to be sent\n");
50741.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
50751.1Skamil
50761.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
50771.1Skamil	    TWAIT_FNAME);
50781.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
50791.1Skamil
50801.1Skamil	validate_status_exited(status, exitval);
50811.1Skamil
50821.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
50831.1Skamil	    TWAIT_FNAME);
50841.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
50851.1Skamil}
50861.1Skamil
50871.1Skamilstatic void
50881.1Skamillwp_main_stop(void *arg)
50891.1Skamil{
50901.1Skamil	the_lwp_id = _lwp_self();
50911.1Skamil
50921.1Skamil	raise(SIGTRAP);
50931.1Skamil
50941.1Skamil	_lwp_exit();
50951.1Skamil}
50961.1Skamil
50971.1SkamilATF_TC(suspend1);
50981.1SkamilATF_TC_HEAD(suspend1, tc)
50991.1Skamil{
51001.1Skamil	atf_tc_set_md_var(tc, "descr",
51011.1Skamil	    "Verify that a thread can be suspended by a debugger and later "
51021.1Skamil	    "resumed by a tracee");
51031.1Skamil}
51041.1Skamil
51051.1SkamilATF_TC_BODY(suspend1, tc)
51061.1Skamil{
51071.1Skamil	const int exitval = 5;
51081.1Skamil	const int sigval = SIGSTOP;
51091.1Skamil	pid_t child, wpid;
51101.1Skamil#if defined(TWAIT_HAVE_STATUS)
51111.1Skamil	int status;
51121.1Skamil#endif
51131.1Skamil	ucontext_t uc;
51141.1Skamil	lwpid_t lid;
51151.1Skamil	static const size_t ssize = 16*1024;
51161.1Skamil	void *stack;
51171.1Skamil	struct ptrace_lwpinfo pl;
51181.1Skamil	struct ptrace_siginfo psi;
51191.1Skamil	volatile int go = 0;
51201.1Skamil
51211.17Skamil	// Feature pending for refactoring
51221.17Skamil	atf_tc_expect_fail("PR kern/51995");
51231.17Skamil
51241.16Skamil	// Hangs with qemu
51251.16Skamil	ATF_REQUIRE(0 && "In order to get reliable failure, abort");
51261.16Skamil
51271.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
51281.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
51291.1Skamil	if (child == 0) {
51301.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
51311.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
51321.1Skamil
51331.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
51341.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
51351.1Skamil
51361.13Schristos		DPRINTF("Before allocating memory for stack in child\n");
51371.1Skamil		FORKEE_ASSERT((stack = malloc(ssize)) != NULL);
51381.1Skamil
51391.13Schristos		DPRINTF("Before making context for new lwp in child\n");
51401.1Skamil		_lwp_makecontext(&uc, lwp_main_stop, NULL, NULL, stack, ssize);
51411.1Skamil
51421.13Schristos		DPRINTF("Before creating new in child\n");
51431.1Skamil		FORKEE_ASSERT(_lwp_create(&uc, 0, &lid) == 0);
51441.1Skamil
51451.1Skamil		while (go == 0)
51461.1Skamil			continue;
51471.1Skamil
51481.1Skamil		raise(SIGINT);
51491.1Skamil
51501.1Skamil		FORKEE_ASSERT(_lwp_continue(lid) == 0);
51511.1Skamil
51521.13Schristos		DPRINTF("Before waiting for lwp %d to exit\n", lid);
51531.1Skamil		FORKEE_ASSERT(_lwp_wait(lid, NULL) == 0);
51541.1Skamil
51551.13Schristos		DPRINTF("Before verifying that reported %d and running lid %d "
51561.1Skamil		    "are the same\n", lid, the_lwp_id);
51571.1Skamil		FORKEE_ASSERT_EQ(lid, the_lwp_id);
51581.1Skamil
51591.13Schristos		DPRINTF("Before exiting of the child process\n");
51601.1Skamil		_exit(exitval);
51611.1Skamil	}
51621.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
51631.1Skamil
51641.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
51651.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
51661.1Skamil
51671.1Skamil	validate_status_stopped(status, sigval);
51681.1Skamil
51691.13Schristos	DPRINTF("Before resuming the child process where it left off and "
51701.1Skamil	    "without signal to be sent\n");
51711.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
51721.1Skamil
51731.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
51741.1Skamil	    "SIGTRAP\n", TWAIT_FNAME);
51751.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
51761.1Skamil
51771.1Skamil	validate_status_stopped(status, SIGTRAP);
51781.1Skamil
51791.13Schristos	DPRINTF("Before reading siginfo and lwpid_t\n");
51801.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &psi, sizeof(psi)) != -1);
51811.1Skamil
51821.13Schristos	DPRINTF("Before suspending LWP %d\n", psi.psi_lwpid);
51831.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SUSPEND, child, NULL, psi.psi_lwpid) != -1);
51841.1Skamil
51851.13Schristos        DPRINTF("Write new go to tracee (PID=%d) from tracer (PID=%d)\n",
51861.1Skamil	    child, getpid());
51871.13Schristos	SYSCALL_REQUIRE(ptrace(PT_WRITE_D, child, __UNVOLATILE(&go), 1) != -1);
51881.1Skamil
51891.13Schristos	DPRINTF("Before resuming the child process where it left off and "
51901.1Skamil	    "without signal to be sent\n");
51911.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
51921.1Skamil
51931.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
51941.1Skamil	    "SIGINT\n", TWAIT_FNAME);
51951.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
51961.1Skamil
51971.1Skamil	validate_status_stopped(status, SIGINT);
51981.1Skamil
51991.1Skamil	pl.pl_lwpid = 0;
52001.1Skamil
52011.13Schristos	SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &pl, sizeof(pl)) != -1);
52021.1Skamil	while (pl.pl_lwpid != 0) {
52031.1Skamil
52041.13Schristos		SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &pl, sizeof(pl)) != -1);
52051.1Skamil		switch (pl.pl_lwpid) {
52061.1Skamil		case 1:
52071.1Skamil			ATF_REQUIRE_EQ(pl.pl_event, PL_EVENT_SIGNAL);
52081.1Skamil			break;
52091.1Skamil		case 2:
52101.1Skamil			ATF_REQUIRE_EQ(pl.pl_event, PL_EVENT_SUSPENDED);
52111.1Skamil			break;
52121.1Skamil		}
52131.1Skamil	}
52141.1Skamil
52151.13Schristos	DPRINTF("Before resuming the child process where it left off and "
52161.1Skamil	    "without signal to be sent\n");
52171.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
52181.1Skamil
52191.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
52201.1Skamil	    TWAIT_FNAME);
52211.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
52221.1Skamil
52231.1Skamil	validate_status_exited(status, exitval);
52241.1Skamil
52251.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
52261.1Skamil	    TWAIT_FNAME);
52271.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
52281.1Skamil}
52291.1Skamil
52301.1SkamilATF_TC(suspend2);
52311.1SkamilATF_TC_HEAD(suspend2, tc)
52321.1Skamil{
52331.1Skamil	atf_tc_set_md_var(tc, "descr",
52341.1Skamil	    "Verify that the while the only thread within a process is "
52351.1Skamil	    "suspended, the whole process cannot be unstopped");
52361.1Skamil}
52371.1Skamil
52381.1SkamilATF_TC_BODY(suspend2, tc)
52391.1Skamil{
52401.1Skamil	const int exitval = 5;
52411.1Skamil	const int sigval = SIGSTOP;
52421.1Skamil	pid_t child, wpid;
52431.1Skamil#if defined(TWAIT_HAVE_STATUS)
52441.1Skamil	int status;
52451.1Skamil#endif
52461.1Skamil	struct ptrace_siginfo psi;
52471.1Skamil
52481.17Skamil	// Feature pending for refactoring
52491.17Skamil	atf_tc_expect_fail("PR kern/51995");
52501.17Skamil
52511.16Skamil	// Hangs with qemu
52521.16Skamil	ATF_REQUIRE(0 && "In order to get reliable failure, abort");
52531.16Skamil
52541.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
52551.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
52561.1Skamil	if (child == 0) {
52571.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
52581.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
52591.1Skamil
52601.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
52611.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
52621.1Skamil
52631.13Schristos		DPRINTF("Before exiting of the child process\n");
52641.1Skamil		_exit(exitval);
52651.1Skamil	}
52661.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
52671.1Skamil
52681.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
52691.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
52701.1Skamil
52711.1Skamil	validate_status_stopped(status, sigval);
52721.1Skamil
52731.13Schristos	DPRINTF("Before reading siginfo and lwpid_t\n");
52741.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &psi, sizeof(psi)) != -1);
52751.1Skamil
52761.13Schristos	DPRINTF("Before suspending LWP %d\n", psi.psi_lwpid);
52771.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SUSPEND, child, NULL, psi.psi_lwpid) != -1);
52781.1Skamil
52791.13Schristos	DPRINTF("Before resuming the child process where it left off and "
52801.1Skamil	    "without signal to be sent\n");
52811.1Skamil	ATF_REQUIRE_ERRNO(EDEADLK,
52821.1Skamil	    ptrace(PT_CONTINUE, child, (void *)1, 0) == -1);
52831.1Skamil
52841.13Schristos	DPRINTF("Before resuming LWP %d\n", psi.psi_lwpid);
52851.13Schristos	SYSCALL_REQUIRE(ptrace(PT_RESUME, child, NULL, psi.psi_lwpid) != -1);
52861.1Skamil
52871.13Schristos	DPRINTF("Before resuming the child process where it left off and "
52881.1Skamil	    "without signal to be sent\n");
52891.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
52901.1Skamil
52911.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
52921.1Skamil	    TWAIT_FNAME);
52931.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
52941.1Skamil
52951.1Skamil	validate_status_exited(status, exitval);
52961.1Skamil
52971.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
52981.1Skamil	    TWAIT_FNAME);
52991.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
53001.1Skamil}
53011.1Skamil
53021.1SkamilATF_TC(resume1);
53031.1SkamilATF_TC_HEAD(resume1, tc)
53041.1Skamil{
53051.1Skamil	atf_tc_set_md_var(tc, "timeout", "5");
53061.1Skamil	atf_tc_set_md_var(tc, "descr",
53071.1Skamil	    "Verify that a thread can be suspended by a debugger and later "
53081.1Skamil	    "resumed by the debugger");
53091.1Skamil}
53101.1Skamil
53111.1SkamilATF_TC_BODY(resume1, tc)
53121.1Skamil{
53131.1Skamil	struct msg_fds fds;
53141.1Skamil	const int exitval = 5;
53151.1Skamil	const int sigval = SIGSTOP;
53161.1Skamil	pid_t child, wpid;
53171.1Skamil	uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */
53181.1Skamil#if defined(TWAIT_HAVE_STATUS)
53191.1Skamil	int status;
53201.1Skamil#endif
53211.1Skamil	ucontext_t uc;
53221.1Skamil	lwpid_t lid;
53231.1Skamil	static const size_t ssize = 16*1024;
53241.1Skamil	void *stack;
53251.1Skamil	struct ptrace_lwpinfo pl;
53261.1Skamil	struct ptrace_siginfo psi;
53271.1Skamil
53281.17Skamil	// Feature pending for refactoring
53291.17Skamil	atf_tc_expect_fail("PR kern/51995");
53301.17Skamil
53311.15Schristos	// Hangs with qemu
53321.15Schristos	ATF_REQUIRE(0 && "In order to get reliable failure, abort");
53331.1Skamil
53341.13Schristos	SYSCALL_REQUIRE(msg_open(&fds) == 0);
53351.1Skamil
53361.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
53371.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
53381.1Skamil	if (child == 0) {
53391.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
53401.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
53411.1Skamil
53421.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
53431.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
53441.1Skamil
53451.13Schristos		DPRINTF("Before allocating memory for stack in child\n");
53461.1Skamil		FORKEE_ASSERT((stack = malloc(ssize)) != NULL);
53471.1Skamil
53481.13Schristos		DPRINTF("Before making context for new lwp in child\n");
53491.1Skamil		_lwp_makecontext(&uc, lwp_main_stop, NULL, NULL, stack, ssize);
53501.1Skamil
53511.13Schristos		DPRINTF("Before creating new in child\n");
53521.1Skamil		FORKEE_ASSERT(_lwp_create(&uc, 0, &lid) == 0);
53531.1Skamil
53541.1Skamil		CHILD_TO_PARENT("Message", fds, msg);
53551.1Skamil
53561.1Skamil		raise(SIGINT);
53571.1Skamil
53581.13Schristos		DPRINTF("Before waiting for lwp %d to exit\n", lid);
53591.1Skamil		FORKEE_ASSERT(_lwp_wait(lid, NULL) == 0);
53601.1Skamil
53611.13Schristos		DPRINTF("Before verifying that reported %d and running lid %d "
53621.1Skamil		    "are the same\n", lid, the_lwp_id);
53631.1Skamil		FORKEE_ASSERT_EQ(lid, the_lwp_id);
53641.1Skamil
53651.13Schristos		DPRINTF("Before exiting of the child process\n");
53661.1Skamil		_exit(exitval);
53671.1Skamil	}
53681.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
53691.1Skamil
53701.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
53711.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
53721.1Skamil
53731.1Skamil	validate_status_stopped(status, sigval);
53741.1Skamil
53751.13Schristos	DPRINTF("Before resuming the child process where it left off and "
53761.1Skamil	    "without signal to be sent\n");
53771.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
53781.1Skamil
53791.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
53801.1Skamil	    "SIGTRAP\n", TWAIT_FNAME);
53811.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
53821.1Skamil
53831.1Skamil	validate_status_stopped(status, SIGTRAP);
53841.1Skamil
53851.13Schristos	DPRINTF("Before reading siginfo and lwpid_t\n");
53861.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &psi, sizeof(psi)) != -1);
53871.1Skamil
53881.13Schristos	DPRINTF("Before suspending LWP %d\n", psi.psi_lwpid);
53891.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SUSPEND, child, NULL, psi.psi_lwpid) != -1);
53901.1Skamil
53911.1Skamil	PARENT_FROM_CHILD("Message", fds, msg);
53921.1Skamil
53931.13Schristos	DPRINTF("Before resuming the child process where it left off and "
53941.1Skamil	    "without signal to be sent\n");
53951.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
53961.1Skamil
53971.13Schristos	DPRINTF("Before calling %s() for the child - expected stopped "
53981.1Skamil	    "SIGINT\n", TWAIT_FNAME);
53991.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
54001.1Skamil
54011.1Skamil	validate_status_stopped(status, SIGINT);
54021.1Skamil
54031.1Skamil	pl.pl_lwpid = 0;
54041.1Skamil
54051.13Schristos	SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &pl, sizeof(pl)) != -1);
54061.1Skamil	while (pl.pl_lwpid != 0) {
54071.13Schristos		SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &pl, sizeof(pl)) != -1);
54081.1Skamil		switch (pl.pl_lwpid) {
54091.1Skamil		case 1:
54101.1Skamil			ATF_REQUIRE_EQ(pl.pl_event, PL_EVENT_SIGNAL);
54111.1Skamil			break;
54121.1Skamil		case 2:
54131.1Skamil			ATF_REQUIRE_EQ(pl.pl_event, PL_EVENT_SUSPENDED);
54141.1Skamil			break;
54151.1Skamil		}
54161.1Skamil	}
54171.1Skamil
54181.13Schristos	DPRINTF("Before resuming LWP %d\n", psi.psi_lwpid);
54191.13Schristos	SYSCALL_REQUIRE(ptrace(PT_RESUME, child, NULL, psi.psi_lwpid) != -1);
54201.1Skamil
54211.13Schristos	DPRINTF("Before resuming the child process where it left off and "
54221.1Skamil	    "without signal to be sent\n");
54231.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
54241.1Skamil
54251.13Schristos	DPRINTF("Before calling %s() for the child - expected exited\n",
54261.1Skamil	    TWAIT_FNAME);
54271.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
54281.1Skamil
54291.1Skamil	validate_status_exited(status, exitval);
54301.1Skamil
54311.13Schristos	DPRINTF("Before calling %s() for the child - expected no process\n",
54321.1Skamil	    TWAIT_FNAME);
54331.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
54341.1Skamil
54351.1Skamil	msg_close(&fds);
54361.1Skamil
54371.13Schristos	DPRINTF("XXX: Test worked this time but for consistency timeout it\n");
54381.1Skamil	sleep(10);
54391.1Skamil}
54401.1Skamil
54411.1SkamilATF_TC(syscall1);
54421.1SkamilATF_TC_HEAD(syscall1, tc)
54431.1Skamil{
54441.1Skamil	atf_tc_set_md_var(tc, "descr",
54451.1Skamil	    "Verify that getpid(2) can be traced with PT_SYSCALL");
54461.1Skamil}
54471.1Skamil
54481.1SkamilATF_TC_BODY(syscall1, tc)
54491.1Skamil{
54501.1Skamil	const int exitval = 5;
54511.1Skamil	const int sigval = SIGSTOP;
54521.1Skamil	pid_t child, wpid;
54531.1Skamil#if defined(TWAIT_HAVE_STATUS)
54541.1Skamil	int status;
54551.1Skamil#endif
54561.1Skamil	struct ptrace_siginfo info;
54571.1Skamil	memset(&info, 0, sizeof(info));
54581.1Skamil
54591.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
54601.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
54611.1Skamil	if (child == 0) {
54621.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
54631.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
54641.1Skamil
54651.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
54661.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
54671.1Skamil
54681.1Skamil		syscall(SYS_getpid);
54691.1Skamil
54701.13Schristos		DPRINTF("Before exiting of the child process\n");
54711.1Skamil		_exit(exitval);
54721.1Skamil	}
54731.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
54741.1Skamil
54751.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
54761.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
54771.1Skamil
54781.1Skamil	validate_status_stopped(status, sigval);
54791.1Skamil
54801.13Schristos	DPRINTF("Before resuming the child process where it left off and "
54811.1Skamil	    "without signal to be sent\n");
54821.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SYSCALL, child, (void *)1, 0) != -1);
54831.1Skamil
54841.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
54851.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
54861.1Skamil
54871.1Skamil	validate_status_stopped(status, SIGTRAP);
54881.1Skamil
54891.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
54901.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
54911.1Skamil
54921.38Skamil	DPRINTF("Before checking siginfo_t and lwpid\n");
54931.38Skamil	ATF_REQUIRE_EQ(info.psi_lwpid, 1);
54941.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, SIGTRAP);
54951.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_SCE);
54961.1Skamil
54971.13Schristos	DPRINTF("Before resuming the child process where it left off and "
54981.1Skamil	    "without signal to be sent\n");
54991.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SYSCALL, child, (void *)1, 0) != -1);
55001.1Skamil
55011.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
55021.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
55031.1Skamil
55041.1Skamil	validate_status_stopped(status, SIGTRAP);
55051.1Skamil
55061.13Schristos	DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n");
55071.13Schristos	SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1);
55081.1Skamil
55091.38Skamil	DPRINTF("Before checking siginfo_t and lwpid\n");
55101.38Skamil	ATF_REQUIRE_EQ(info.psi_lwpid, 1);
55111.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, SIGTRAP);
55121.1Skamil	ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_SCX);
55131.1Skamil
55141.13Schristos	DPRINTF("Before resuming the child process where it left off and "
55151.1Skamil	    "without signal to be sent\n");
55161.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
55171.1Skamil
55181.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
55191.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
55201.1Skamil
55211.1Skamil	validate_status_exited(status, exitval);
55221.1Skamil
55231.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
55241.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
55251.1Skamil}
55261.1Skamil
55271.1SkamilATF_TC(syscallemu1);
55281.1SkamilATF_TC_HEAD(syscallemu1, tc)
55291.1Skamil{
55301.1Skamil	atf_tc_set_md_var(tc, "descr",
55311.1Skamil	    "Verify that exit(2) can be intercepted with PT_SYSCALLEMU");
55321.1Skamil}
55331.1Skamil
55341.1SkamilATF_TC_BODY(syscallemu1, tc)
55351.1Skamil{
55361.1Skamil	const int exitval = 5;
55371.1Skamil	const int sigval = SIGSTOP;
55381.1Skamil	pid_t child, wpid;
55391.1Skamil#if defined(TWAIT_HAVE_STATUS)
55401.1Skamil	int status;
55411.1Skamil#endif
55421.1Skamil
55431.6Skamil#if defined(__sparc__) && !defined(__sparc64__)
55441.6Skamil	/* syscallemu does not work on sparc (32-bit) */
55451.6Skamil	atf_tc_expect_fail("PR kern/52166");
55461.6Skamil#endif
55471.6Skamil
55481.13Schristos	DPRINTF("Before forking process PID=%d\n", getpid());
55491.13Schristos	SYSCALL_REQUIRE((child = fork()) != -1);
55501.1Skamil	if (child == 0) {
55511.13Schristos		DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid());
55521.1Skamil		FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1);
55531.1Skamil
55541.13Schristos		DPRINTF("Before raising %s from child\n", strsignal(sigval));
55551.1Skamil		FORKEE_ASSERT(raise(sigval) == 0);
55561.1Skamil
55571.1Skamil		syscall(SYS_exit, 100);
55581.1Skamil
55591.13Schristos		DPRINTF("Before exiting of the child process\n");
55601.1Skamil		_exit(exitval);
55611.1Skamil	}
55621.13Schristos	DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child);
55631.1Skamil
55641.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
55651.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
55661.1Skamil
55671.1Skamil	validate_status_stopped(status, sigval);
55681.1Skamil
55691.13Schristos	DPRINTF("Before resuming the child process where it left off and "
55701.1Skamil	    "without signal to be sent\n");
55711.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SYSCALL, child, (void *)1, 0) != -1);
55721.1Skamil
55731.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
55741.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
55751.1Skamil
55761.1Skamil	validate_status_stopped(status, SIGTRAP);
55771.1Skamil
55781.13Schristos	DPRINTF("Set SYSCALLEMU for intercepted syscall\n");
55791.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SYSCALLEMU, child, (void *)1, 0) != -1);
55801.1Skamil
55811.13Schristos	DPRINTF("Before resuming the child process where it left off and "
55821.1Skamil	    "without signal to be sent\n");
55831.13Schristos	SYSCALL_REQUIRE(ptrace(PT_SYSCALL, child, (void *)1, 0) != -1);
55841.1Skamil
55851.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
55861.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
55871.1Skamil
55881.1Skamil	validate_status_stopped(status, SIGTRAP);
55891.1Skamil
55901.13Schristos	DPRINTF("Before resuming the child process where it left off and "
55911.1Skamil	    "without signal to be sent\n");
55921.13Schristos	SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1);
55931.1Skamil
55941.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
55951.1Skamil	TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child);
55961.1Skamil
55971.1Skamil	validate_status_exited(status, exitval);
55981.1Skamil
55991.13Schristos	DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME);
56001.1Skamil	TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0));
56011.1Skamil}
56021.1Skamil
56031.1Skamil#include "t_ptrace_amd64_wait.h"
56041.1Skamil#include "t_ptrace_i386_wait.h"
56051.1Skamil#include "t_ptrace_x86_wait.h"
56061.1Skamil
56071.1SkamilATF_TP_ADD_TCS(tp)
56081.1Skamil{
56091.1Skamil	setvbuf(stdout, NULL, _IONBF, 0);
56101.1Skamil	setvbuf(stderr, NULL, _IONBF, 0);
56111.33Skamil
56121.36Skamil	ATF_TP_ADD_TC(tp, traceme_raise1);
56131.33Skamil	ATF_TP_ADD_TC(tp, traceme_raise2);
56141.33Skamil	ATF_TP_ADD_TC(tp, traceme_raise3);
56151.33Skamil	ATF_TP_ADD_TC(tp, traceme_raise4);
56161.33Skamil	ATF_TP_ADD_TC(tp, traceme_raise5);
56171.33Skamil
56181.59Skamil	ATF_TP_ADD_TC(tp, traceme_crash_trap);
56191.59Skamil	ATF_TP_ADD_TC(tp, traceme_crash_segv);
56201.59Skamil//	ATF_TP_ADD_TC(tp, traceme_crash_ill);
56211.59Skamil	ATF_TP_ADD_TC(tp, traceme_crash_fpe);
56221.59Skamil	ATF_TP_ADD_TC(tp, traceme_crash_bus);
56231.59Skamil
56241.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_handle1);
56251.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_handle2);
56261.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_handle3);
56271.50Skamil
56281.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_masked1);
56291.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_masked2);
56301.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_masked3);
56311.50Skamil
56321.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_ignored1);
56331.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_ignored2);
56341.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_ignored3);
56351.50Skamil
56361.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_simple1);
56371.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_simple2);
56381.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_simple3);
56391.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_simple4);
56401.50Skamil	ATF_TP_ADD_TC(tp, traceme_sendsignal_simple5);
56411.1Skamil
56421.37Skamil	ATF_TP_ADD_TC(tp, traceme_pid1_parent);
56431.37Skamil
56441.40Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_raise1);
56451.46Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_raise2);
56461.40Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_raise3);
56471.40Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_raise4);
56481.40Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_raise5);
56491.47Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_raise6);
56501.47Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_raise7);
56511.47Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_raise8);
56521.40Skamil
56531.52Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_crash_trap);
56541.52Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_crash_segv);
56551.52Skamil//	ATF_TP_ADD_TC(tp, traceme_vfork_crash_ill);
56561.52Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_crash_fpe);
56571.52Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_crash_bus);
56581.41Skamil
56591.43Skamil	ATF_TP_ADD_TC(tp, traceme_vfork_exec);
56601.43Skamil
56611.59Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_sees_crash_trap);
56621.59Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_sees_crash_segv);
56631.59Skamil//	ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_sees_crash_ill);
56641.59Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_sees_crash_fpe);
56651.59Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, unrelated_tracer_sees_crash_bus);
56661.59Skamil
56671.51Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, tracer_sees_terminaton_before_the_parent);
56681.51Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, tracer_sysctl_lookup_without_duplicates);
56691.61Skre	ATF_TP_ADD_TC_HAVE_PID(tp,
56701.61Skre		unrelated_tracer_sees_terminaton_before_the_parent);
56711.51Skamil
56721.51Skamil	ATF_TP_ADD_TC(tp, parent_attach_to_its_child);
56731.51Skamil
56741.51Skamil	ATF_TP_ADD_TC(tp, child_attach_to_its_parent);
56751.65Skamil	ATF_TP_ADD_TC(tp, child_attach_to_its_stopped_parent);
56761.51Skamil
56771.51Skamil	ATF_TP_ADD_TC_HAVE_PID(tp,
56781.51Skamil		tracee_sees_its_original_parent_getppid);
56791.51Skamil	ATF_TP_ADD_TC_HAVE_PID(tp,
56801.51Skamil		tracee_sees_its_original_parent_sysctl_kinfo_proc2);
56811.51Skamil	ATF_TP_ADD_TC_HAVE_PID(tp,
56821.51Skamil		tracee_sees_its_original_parent_procfs_status);
56831.1Skamil
56841.53Skamil	ATF_TP_ADD_TC(tp, eventmask_preserved_empty);
56851.53Skamil	ATF_TP_ADD_TC(tp, eventmask_preserved_fork);
56861.53Skamil	ATF_TP_ADD_TC(tp, eventmask_preserved_vfork);
56871.53Skamil	ATF_TP_ADD_TC(tp, eventmask_preserved_vfork_done);
56881.53Skamil	ATF_TP_ADD_TC(tp, eventmask_preserved_lwp_create);
56891.53Skamil	ATF_TP_ADD_TC(tp, eventmask_preserved_lwp_exit);
56901.1Skamil
56911.31Skamil	ATF_TP_ADD_TC(tp, fork1);
56921.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, fork2);
56931.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, fork3);
56941.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, fork4);
56951.31Skamil	ATF_TP_ADD_TC(tp, fork5);
56961.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, fork6);
56971.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, fork7);
56981.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, fork8);
56991.31Skamil
57001.31Skamil	ATF_TP_ADD_TC(tp, vfork1);
57011.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, vfork2);
57021.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, vfork3);
57031.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, vfork4);
57041.31Skamil	ATF_TP_ADD_TC(tp, vfork5);
57051.31Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, vfork6);
57061.64Smartin// thes tests hang on SMP machines, disable them for now
57071.64Smartin//	ATF_TP_ADD_TC_HAVE_PID(tp, vfork7);
57081.64Smartin//	ATF_TP_ADD_TC_HAVE_PID(tp, vfork8);
57091.1Skamil
57101.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_d_8);
57111.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_d_16);
57121.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_d_32);
57131.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_d_64);
57141.54Skamil
57151.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_i_8);
57161.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_i_16);
57171.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_i_32);
57181.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_i_64);
57191.54Skamil
57201.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_d_8);
57211.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_d_16);
57221.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_d_32);
57231.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_d_64);
57241.54Skamil
57251.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_i_8);
57261.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_i_16);
57271.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_i_32);
57281.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_i_64);
57291.54Skamil
57301.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_read_d);
57311.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_read_i);
57321.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_write_d);
57331.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_write_i);
57341.54Skamil
57351.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_d_8_text);
57361.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_d_16_text);
57371.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_d_32_text);
57381.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_d_64_text);
57391.54Skamil
57401.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_i_8_text);
57411.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_i_16_text);
57421.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_i_32_text);
57431.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_i_64_text);
57441.54Skamil
57451.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_d_8_text);
57461.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_d_16_text);
57471.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_d_32_text);
57481.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_d_64_text);
57491.54Skamil
57501.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_i_8_text);
57511.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_i_16_text);
57521.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_i_32_text);
57531.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_write_i_64_text);
57541.54Skamil
57551.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_read_d_text);
57561.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_read_i_text);
57571.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_write_d_text);
57581.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_write_i_text);
57591.1Skamil
57601.54Skamil	ATF_TP_ADD_TC(tp, bytes_transfer_piod_read_auxv);
57611.1Skamil
57621.1Skamil	ATF_TP_ADD_TC_HAVE_GPREGS(tp, regs1);
57631.1Skamil	ATF_TP_ADD_TC_HAVE_GPREGS(tp, regs2);
57641.1Skamil	ATF_TP_ADD_TC_HAVE_GPREGS(tp, regs3);
57651.1Skamil	ATF_TP_ADD_TC_HAVE_GPREGS(tp, regs4);
57661.1Skamil	ATF_TP_ADD_TC_HAVE_GPREGS(tp, regs5);
57671.1Skamil
57681.1Skamil	ATF_TP_ADD_TC_HAVE_FPREGS(tp, fpregs1);
57691.1Skamil	ATF_TP_ADD_TC_HAVE_FPREGS(tp, fpregs2);
57701.1Skamil
57711.1Skamil	ATF_TP_ADD_TC_PT_STEP(tp, step1);
57721.1Skamil	ATF_TP_ADD_TC_PT_STEP(tp, step2);
57731.1Skamil	ATF_TP_ADD_TC_PT_STEP(tp, step3);
57741.1Skamil	ATF_TP_ADD_TC_PT_STEP(tp, step4);
57751.1Skamil
57761.2Skamil	ATF_TP_ADD_TC_PT_STEP(tp, setstep1);
57771.2Skamil	ATF_TP_ADD_TC_PT_STEP(tp, setstep2);
57781.2Skamil	ATF_TP_ADD_TC_PT_STEP(tp, setstep3);
57791.2Skamil	ATF_TP_ADD_TC_PT_STEP(tp, setstep4);
57801.2Skamil
57811.1Skamil	ATF_TP_ADD_TC(tp, kill1);
57821.1Skamil	ATF_TP_ADD_TC(tp, kill2);
57831.1Skamil
57841.1Skamil	ATF_TP_ADD_TC(tp, lwpinfo1);
57851.1Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, lwpinfo2);
57861.1Skamil
57871.1Skamil	ATF_TP_ADD_TC(tp, siginfo1);
57881.1Skamil	ATF_TP_ADD_TC(tp, siginfo2);
57891.1Skamil	ATF_TP_ADD_TC(tp, siginfo3);
57901.1Skamil	ATF_TP_ADD_TC(tp, siginfo4);
57911.1Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, siginfo5);
57921.1Skamil	ATF_TP_ADD_TC_PT_STEP(tp, siginfo6);
57931.1Skamil
57941.1Skamil	ATF_TP_ADD_TC(tp, lwp_create1);
57951.1Skamil
57961.1Skamil	ATF_TP_ADD_TC(tp, lwp_exit1);
57971.1Skamil
57981.1Skamil	ATF_TP_ADD_TC(tp, signal1);
57991.1Skamil	ATF_TP_ADD_TC(tp, signal2);
58001.1Skamil	ATF_TP_ADD_TC(tp, signal3);
58011.1Skamil	ATF_TP_ADD_TC_PT_STEP(tp, signal4);
58021.1Skamil	ATF_TP_ADD_TC(tp, signal5);
58031.1Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, signal6);
58041.1Skamil	ATF_TP_ADD_TC_HAVE_PID(tp, signal7);
58051.1Skamil	ATF_TP_ADD_TC(tp, signal8);
58061.1Skamil	ATF_TP_ADD_TC(tp, signal9);
58071.1Skamil	ATF_TP_ADD_TC(tp, signal10);
58081.1Skamil
58091.1Skamil	ATF_TP_ADD_TC(tp, suspend1);
58101.1Skamil	ATF_TP_ADD_TC(tp, suspend2);
58111.1Skamil
58121.1Skamil	ATF_TP_ADD_TC(tp, resume1);
58131.1Skamil
58141.1Skamil	ATF_TP_ADD_TC(tp, syscall1);
58151.1Skamil
58161.1Skamil	ATF_TP_ADD_TC(tp, syscallemu1);
58171.1Skamil
58181.1Skamil	ATF_TP_ADD_TCS_PTRACE_WAIT_AMD64();
58191.1Skamil	ATF_TP_ADD_TCS_PTRACE_WAIT_I386();
58201.1Skamil	ATF_TP_ADD_TCS_PTRACE_WAIT_X86();
58211.1Skamil
58221.1Skamil	return atf_no_error();
58231.1Skamil}
5824