t_ptrace_wait.c revision 1.38
11.38Skamil/* $NetBSD: t_ptrace_wait.c,v 1.38 2018/05/01 16:37:23 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.38Skamil__RCSID("$NetBSD: t_ptrace_wait.c,v 1.38 2018/05/01 16:37:23 kamil Exp $"); 311.1Skamil 321.1Skamil#include <sys/param.h> 331.1Skamil#include <sys/types.h> 341.1Skamil#include <sys/ptrace.h> 351.1Skamil#include <sys/resource.h> 361.1Skamil#include <sys/stat.h> 371.1Skamil#include <sys/syscall.h> 381.1Skamil#include <sys/sysctl.h> 391.1Skamil#include <sys/wait.h> 401.1Skamil#include <machine/reg.h> 411.1Skamil#include <elf.h> 421.1Skamil#include <err.h> 431.1Skamil#include <errno.h> 441.1Skamil#include <lwp.h> 451.1Skamil#include <sched.h> 461.1Skamil#include <signal.h> 471.1Skamil#include <stdint.h> 481.1Skamil#include <stdio.h> 491.1Skamil#include <stdlib.h> 501.1Skamil#include <strings.h> 511.26Skamil#include <time.h> 521.1Skamil#include <unistd.h> 531.1Skamil 541.1Skamil#include <atf-c.h> 551.1Skamil 561.1Skamil#include "h_macros.h" 571.1Skamil 581.1Skamil#include "t_ptrace_wait.h" 591.1Skamil#include "msg.h" 601.1Skamil 611.1Skamil#define PARENT_TO_CHILD(info, fds, msg) \ 621.13Schristos SYSCALL_REQUIRE(msg_write_child(info " to child " # fds, &fds, &msg, sizeof(msg)) == 0) 631.1Skamil 641.1Skamil#define CHILD_FROM_PARENT(info, fds, msg) \ 651.1Skamil FORKEE_ASSERT(msg_read_parent(info " from parent " # fds, &fds, &msg, sizeof(msg)) == 0) 661.1Skamil 671.1Skamil#define CHILD_TO_PARENT(info, fds, msg) \ 681.1Skamil FORKEE_ASSERT(msg_write_parent(info " to parent " # fds, &fds, &msg, sizeof(msg)) == 0) 691.1Skamil 701.1Skamil#define PARENT_FROM_CHILD(info, fds, msg) \ 711.13Schristos SYSCALL_REQUIRE(msg_read_child(info " from parent " # fds, &fds, &msg, sizeof(msg)) == 0) 721.13Schristos 731.13Schristos#define SYSCALL_REQUIRE(expr) ATF_REQUIRE_MSG(expr, "%s: %s", # expr, \ 741.13Schristos strerror(errno)) 751.18Schristos#define SYSCALL_REQUIRE_ERRNO(res, exp) ATF_REQUIRE_MSG(res == exp, \ 761.18Schristos "%d(%s) != %d", res, strerror(res), exp) 771.13Schristos 781.13Schristosstatic int debug = 0; 791.13Schristos 801.13Schristos#define DPRINTF(a, ...) do \ 811.13Schristos if (debug) printf(a, ##__VA_ARGS__); \ 821.13Schristos while (/*CONSTCOND*/0) 831.1Skamil 841.34Skamil/// ---------------------------------------------------------------------------- 851.34Skamil 861.33Skamilstatic void 871.33Skamiltraceme_raise(int sigval) 881.1Skamil{ 891.1Skamil const int exitval = 5; 901.1Skamil pid_t child, wpid; 911.1Skamil#if defined(TWAIT_HAVE_STATUS) 921.1Skamil int status; 931.1Skamil#endif 941.1Skamil 951.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 961.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 971.1Skamil if (child == 0) { 981.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 991.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 1001.1Skamil 1011.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 1021.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 1031.1Skamil 1041.36Skamil switch (sigval) { 1051.36Skamil case SIGKILL: 1061.36Skamil /* NOTREACHED */ 1071.36Skamil FORKEE_ASSERTX(0 && "This shall not be reached"); 1081.36Skamil default: 1091.36Skamil DPRINTF("Before exiting of the child process\n"); 1101.36Skamil _exit(exitval); 1111.36Skamil } 1121.1Skamil } 1131.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 1141.1Skamil 1151.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 1161.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 1171.1Skamil 1181.36Skamil switch (sigval) { 1191.36Skamil case SIGKILL: 1201.36Skamil validate_status_signaled(status, sigval, 0); 1211.36Skamil break; 1221.36Skamil default: 1231.36Skamil validate_status_stopped(status, sigval); 1241.1Skamil 1251.36Skamil DPRINTF("Before resuming the child process where it left off " 1261.36Skamil "and without signal to be sent\n"); 1271.36Skamil SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 1281.1Skamil 1291.36Skamil DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 1301.36Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), 1311.36Skamil child); 1321.36Skamil break; 1331.36Skamil } 1341.1Skamil 1351.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 1361.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 1371.1Skamil} 1381.1Skamil 1391.33Skamil#define TRACEME_RAISE(test, sig) \ 1401.33SkamilATF_TC(test); \ 1411.33SkamilATF_TC_HEAD(test, tc) \ 1421.33Skamil{ \ 1431.33Skamil atf_tc_set_md_var(tc, "descr", \ 1441.33Skamil "Verify " #sig " followed by _exit(2) in a child"); \ 1451.33Skamil} \ 1461.33Skamil \ 1471.33SkamilATF_TC_BODY(test, tc) \ 1481.33Skamil{ \ 1491.33Skamil \ 1501.33Skamil traceme_raise(sig); \ 1511.33Skamil} 1521.33Skamil 1531.36SkamilTRACEME_RAISE(traceme_raise1, SIGKILL) /* non-maskable */ 1541.33SkamilTRACEME_RAISE(traceme_raise2, SIGSTOP) /* non-maskable */ 1551.33SkamilTRACEME_RAISE(traceme_raise3, SIGABRT) /* regular abort trap */ 1561.33SkamilTRACEME_RAISE(traceme_raise4, SIGHUP) /* hangup */ 1571.33SkamilTRACEME_RAISE(traceme_raise5, SIGCONT) /* continued? */ 1581.33Skamil 1591.34Skamil/// ---------------------------------------------------------------------------- 1601.1Skamil 1611.1Skamilstatic void 1621.34Skamiltraceme_sighandler_catch(int sigsent, void (*sah)(int arg), int *traceme_caught) 1631.1Skamil{ 1641.1Skamil const int exitval = 5; 1651.34Skamil const int sigval = SIGSTOP; 1661.1Skamil pid_t child, wpid; 1671.1Skamil struct sigaction sa; 1681.1Skamil#if defined(TWAIT_HAVE_STATUS) 1691.1Skamil int status; 1701.1Skamil#endif 1711.1Skamil 1721.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 1731.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 1741.1Skamil if (child == 0) { 1751.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 1761.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 1771.1Skamil 1781.34Skamil sa.sa_handler = sah; 1791.1Skamil sa.sa_flags = SA_SIGINFO; 1801.1Skamil sigemptyset(&sa.sa_mask); 1811.1Skamil 1821.1Skamil FORKEE_ASSERT(sigaction(sigsent, &sa, NULL) != -1); 1831.1Skamil 1841.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 1851.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 1861.1Skamil 1871.34Skamil FORKEE_ASSERT_EQ(*traceme_caught, 1); 1881.1Skamil 1891.13Schristos DPRINTF("Before exiting of the child process\n"); 1901.1Skamil _exit(exitval); 1911.1Skamil } 1921.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 1931.1Skamil 1941.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 1951.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 1961.1Skamil 1971.1Skamil validate_status_stopped(status, sigval); 1981.1Skamil 1991.13Schristos DPRINTF("Before resuming the child process where it left off and with " 2001.1Skamil "signal %s to be sent\n", strsignal(sigsent)); 2011.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, sigsent) != -1); 2021.1Skamil 2031.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 2041.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 2051.1Skamil 2061.1Skamil validate_status_exited(status, exitval); 2071.1Skamil 2081.13Schristos DPRINTF("Before calling %s() for the exited child\n", TWAIT_FNAME); 2091.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 2101.1Skamil} 2111.1Skamil 2121.34Skamil#define TRACEME_SIGHANDLER_CATCH(test, sig) \ 2131.34SkamilATF_TC(test); \ 2141.34SkamilATF_TC_HEAD(test, tc) \ 2151.34Skamil{ \ 2161.34Skamil atf_tc_set_md_var(tc, "descr", \ 2171.34Skamil "Verify that a signal " #sig " emitted by a tracer to a child is " \ 2181.34Skamil "handled correctly and caught by a signal handler"); \ 2191.34Skamil} \ 2201.34Skamil \ 2211.34Skamilstatic int test##_caught = 0; \ 2221.34Skamil \ 2231.34Skamilstatic void \ 2241.34Skamiltest##_sighandler(int arg) \ 2251.34Skamil{ \ 2261.34Skamil FORKEE_ASSERT_EQ(arg, sig); \ 2271.34Skamil \ 2281.34Skamil ++ test##_caught; \ 2291.34Skamil} \ 2301.34Skamil \ 2311.34SkamilATF_TC_BODY(test, tc) \ 2321.34Skamil{ \ 2331.34Skamil \ 2341.34Skamil traceme_sighandler_catch(sig, test##_sighandler, & test##_caught); \ 2351.34Skamil} 2361.34Skamil 2371.34Skamil// A signal handler for SIGKILL and SIGSTOP cannot be registered. 2381.34SkamilTRACEME_SIGHANDLER_CATCH(traceme_sighandler_catch1, SIGABRT) /* abort trap */ 2391.34SkamilTRACEME_SIGHANDLER_CATCH(traceme_sighandler_catch2, SIGHUP) /* hangup */ 2401.34SkamilTRACEME_SIGHANDLER_CATCH(traceme_sighandler_catch3, SIGCONT) /* continued? */ 2411.34Skamil 2421.34Skamil/// ---------------------------------------------------------------------------- 2431.34Skamil 2441.35Skamilstatic void 2451.35Skamiltraceme_signal_nohandler(int sigsent) 2461.1Skamil{ 2471.35Skamil const int sigval = SIGSTOP; 2481.35Skamil int exitval = 0; 2491.1Skamil pid_t child, wpid; 2501.1Skamil#if defined(TWAIT_HAVE_STATUS) 2511.1Skamil int status; 2521.35Skamil int expect_core = (sigsent == SIGABRT) ? 1 : 0; 2531.1Skamil#endif 2541.1Skamil 2551.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 2561.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 2571.1Skamil if (child == 0) { 2581.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 2591.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 2601.1Skamil 2611.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 2621.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 2631.1Skamil 2641.35Skamil switch (sigsent) { 2651.35Skamil case SIGCONT: 2661.35Skamil _exit(exitval); 2671.35Skamil default: 2681.35Skamil /* NOTREACHED */ 2691.35Skamil FORKEE_ASSERTX(0 && "This shall not be reached"); 2701.35Skamil } 2711.1Skamil } 2721.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 2731.1Skamil 2741.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 2751.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 2761.1Skamil 2771.1Skamil validate_status_stopped(status, sigval); 2781.1Skamil 2791.13Schristos DPRINTF("Before resuming the child process where it left off and with " 2801.1Skamil "signal %s to be sent\n", strsignal(sigsent)); 2811.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, sigsent) != -1); 2821.1Skamil 2831.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 2841.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 2851.1Skamil 2861.35Skamil switch (sigsent) { 2871.35Skamil case SIGCONT: 2881.35Skamil validate_status_exited(status, exitval); 2891.35Skamil break; 2901.35Skamil default: 2911.35Skamil validate_status_signaled(status, sigsent, expect_core); 2921.35Skamil break; 2931.35Skamil } 2941.1Skamil 2951.13Schristos DPRINTF("Before calling %s() for the exited child\n", TWAIT_FNAME); 2961.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 2971.1Skamil} 2981.1Skamil 2991.35Skamil#define TRACEME_SIGNAL_NOHANDLER(test, sig) \ 3001.35SkamilATF_TC(test); \ 3011.35SkamilATF_TC_HEAD(test, tc) \ 3021.35Skamil{ \ 3031.35Skamil atf_tc_set_md_var(tc, "descr", \ 3041.35Skamil "Verify that a signal " #sig " emitted by a tracer to a child is " \ 3051.35Skamil "handled correctly in a child without a signal handler"); \ 3061.35Skamil} \ 3071.35Skamil \ 3081.35SkamilATF_TC_BODY(test, tc) \ 3091.35Skamil{ \ 3101.35Skamil \ 3111.35Skamil traceme_signal_nohandler(sig); \ 3121.35Skamil} 3131.35Skamil 3141.35SkamilTRACEME_SIGNAL_NOHANDLER(traceme_signal_nohandler1, SIGKILL) /* non-maskable */ 3151.35Skamil//TRACEME_SIGNAL_NOHANDLER(traceme_signal_nohandler2, SIGSTOP) /* non-maskable */ 3161.35SkamilTRACEME_SIGNAL_NOHANDLER(traceme_signal_nohandler3, SIGABRT) /* abort trap */ 3171.35SkamilTRACEME_SIGNAL_NOHANDLER(traceme_signal_nohandler4, SIGHUP) /* hangup */ 3181.35SkamilTRACEME_SIGNAL_NOHANDLER(traceme_signal_nohandler5, SIGCONT) /* continued? */ 3191.35Skamil 3201.35Skamil/// ---------------------------------------------------------------------------- 3211.35Skamil 3221.37SkamilATF_TC(traceme_pid1_parent); 3231.37SkamilATF_TC_HEAD(traceme_pid1_parent, tc) 3241.37Skamil{ 3251.37Skamil atf_tc_set_md_var(tc, "descr", 3261.37Skamil "Verify that PT_TRACE_ME is not allowed when our parent is PID1"); 3271.37Skamil} 3281.37Skamil 3291.37SkamilATF_TC_BODY(traceme_pid1_parent, tc) 3301.37Skamil{ 3311.37Skamil struct msg_fds parent_child; 3321.37Skamil int exitval_child1 = 1, exitval_child2 = 2; 3331.37Skamil pid_t child1, child2, wpid; 3341.37Skamil uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */ 3351.37Skamil#if defined(TWAIT_HAVE_STATUS) 3361.37Skamil int status; 3371.37Skamil#endif 3381.37Skamil 3391.37Skamil SYSCALL_REQUIRE(msg_open(&parent_child) == 0); 3401.37Skamil 3411.37Skamil DPRINTF("Before forking process PID=%d\n", getpid()); 3421.37Skamil SYSCALL_REQUIRE((child1 = fork()) != -1); 3431.37Skamil if (child1 == 0) { 3441.37Skamil DPRINTF("Before forking process PID=%d\n", getpid()); 3451.37Skamil SYSCALL_REQUIRE((child2 = fork()) != -1); 3461.37Skamil if (child2 != 0) { 3471.37Skamil DPRINTF("Parent process PID=%d, child2's PID=%d\n", 3481.37Skamil getpid(), child2); 3491.37Skamil _exit(exitval_child1); 3501.37Skamil } 3511.37Skamil CHILD_FROM_PARENT("exit child1", parent_child, msg); 3521.37Skamil 3531.37Skamil DPRINTF("Assert that our parent is PID1 (initproc)\n"); 3541.37Skamil FORKEE_ASSERT_EQ(getppid(), 1); 3551.37Skamil 3561.37Skamil DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 3571.37Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) == -1); 3581.37Skamil SYSCALL_REQUIRE_ERRNO(errno, EPERM); 3591.37Skamil 3601.37Skamil CHILD_TO_PARENT("child2 exiting", parent_child, msg); 3611.37Skamil 3621.37Skamil _exit(exitval_child2); 3631.37Skamil } 3641.37Skamil DPRINTF("Parent process PID=%d, child1's PID=%d\n", getpid(), child1); 3651.37Skamil 3661.37Skamil DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 3671.37Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child1, &status, WEXITED), 3681.37Skamil child1); 3691.37Skamil 3701.37Skamil validate_status_exited(status, exitval_child1); 3711.37Skamil 3721.37Skamil DPRINTF("Notify that child1 is dead\n"); 3731.37Skamil PARENT_TO_CHILD("exit child1", parent_child, msg); 3741.37Skamil 3751.37Skamil DPRINTF("Wait for exiting of child2\n"); 3761.37Skamil PARENT_FROM_CHILD("child2 exiting", parent_child, msg); 3771.37Skamil} 3781.37Skamil 3791.37Skamil/// ---------------------------------------------------------------------------- 3801.37Skamil 3811.1Skamil#if defined(TWAIT_HAVE_PID) 3821.1SkamilATF_TC(attach1); 3831.1SkamilATF_TC_HEAD(attach1, tc) 3841.1Skamil{ 3851.1Skamil atf_tc_set_md_var(tc, "descr", 3861.1Skamil "Assert that tracer sees process termination before the parent"); 3871.1Skamil} 3881.1Skamil 3891.26Skamilstatic void 3901.26Skamilattach1_raw(bool raw) 3911.1Skamil{ 3921.1Skamil struct msg_fds parent_tracee, parent_tracer; 3931.1Skamil const int exitval_tracee = 5; 3941.1Skamil const int exitval_tracer = 10; 3951.1Skamil pid_t tracee, tracer, wpid; 3961.1Skamil uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */ 3971.1Skamil#if defined(TWAIT_HAVE_STATUS) 3981.1Skamil int status; 3991.1Skamil#endif 4001.1Skamil 4011.13Schristos DPRINTF("Spawn tracee\n"); 4021.13Schristos SYSCALL_REQUIRE(msg_open(&parent_tracee) == 0); 4031.1Skamil tracee = atf_utils_fork(); 4041.1Skamil if (tracee == 0) { 4051.1Skamil // Wait for parent to let us exit 4061.1Skamil CHILD_FROM_PARENT("exit tracee", parent_tracee, msg); 4071.1Skamil _exit(exitval_tracee); 4081.1Skamil } 4091.1Skamil 4101.13Schristos DPRINTF("Spawn debugger\n"); 4111.13Schristos SYSCALL_REQUIRE(msg_open(&parent_tracer) == 0); 4121.1Skamil tracer = atf_utils_fork(); 4131.1Skamil if (tracer == 0) { 4141.13Schristos DPRINTF("Before calling PT_ATTACH from tracee %d\n", getpid()); 4151.1Skamil FORKEE_ASSERT(ptrace(PT_ATTACH, tracee, NULL, 0) != -1); 4161.1Skamil 4171.1Skamil /* Wait for tracee and assert that it was stopped w/ SIGSTOP */ 4181.1Skamil FORKEE_REQUIRE_SUCCESS( 4191.1Skamil wpid = TWAIT_GENERIC(tracee, &status, 0), tracee); 4201.1Skamil 4211.1Skamil forkee_status_stopped(status, SIGSTOP); 4221.1Skamil 4231.1Skamil /* Resume tracee with PT_CONTINUE */ 4241.1Skamil FORKEE_ASSERT(ptrace(PT_CONTINUE, tracee, (void *)1, 0) != -1); 4251.1Skamil 4261.1Skamil /* Inform parent that tracer has attached to tracee */ 4271.1Skamil CHILD_TO_PARENT("tracer ready", parent_tracer, msg); 4281.1Skamil 4291.1Skamil /* Wait for parent to tell use that tracee should have exited */ 4301.1Skamil CHILD_FROM_PARENT("wait for tracee exit", parent_tracer, msg); 4311.1Skamil 4321.1Skamil /* Wait for tracee and assert that it exited */ 4331.1Skamil FORKEE_REQUIRE_SUCCESS( 4341.1Skamil wpid = TWAIT_GENERIC(tracee, &status, 0), tracee); 4351.1Skamil 4361.1Skamil forkee_status_exited(status, exitval_tracee); 4371.13Schristos DPRINTF("Tracee %d exited with %d\n", tracee, exitval_tracee); 4381.1Skamil 4391.13Schristos DPRINTF("Before exiting of the tracer process\n"); 4401.1Skamil _exit(exitval_tracer); 4411.1Skamil } 4421.1Skamil 4431.13Schristos DPRINTF("Wait for the tracer to attach to the tracee\n"); 4441.1Skamil PARENT_FROM_CHILD("tracer ready", parent_tracer, msg); 4451.1Skamil 4461.13Schristos DPRINTF("Resume the tracee and let it exit\n"); 4471.1Skamil PARENT_TO_CHILD("exit tracee", parent_tracee, msg); 4481.1Skamil 4491.13Schristos DPRINTF("Detect that tracee is zombie\n"); 4501.26Skamil if (raw) 4511.26Skamil await_zombie_raw(tracee, 0); 4521.26Skamil else 4531.26Skamil await_zombie(tracee); 4541.1Skamil 4551.13Schristos DPRINTF("Assert that there is no status about tracee %d - " 4561.1Skamil "Tracer must detect zombie first - calling %s()\n", tracee, 4571.1Skamil TWAIT_FNAME); 4581.1Skamil TWAIT_REQUIRE_SUCCESS( 4591.1Skamil wpid = TWAIT_GENERIC(tracee, &status, WNOHANG), 0); 4601.1Skamil 4611.13Schristos DPRINTF("Tell the tracer child should have exited\n"); 4621.1Skamil PARENT_TO_CHILD("wait for tracee exit", parent_tracer, msg); 4631.13Schristos DPRINTF("Wait for tracer to finish its job and exit - calling %s()\n", 4641.1Skamil TWAIT_FNAME); 4651.1Skamil 4661.13Schristos DPRINTF("Wait from tracer child to complete waiting for tracee\n"); 4671.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracer, &status, 0), 4681.1Skamil tracer); 4691.1Skamil 4701.1Skamil validate_status_exited(status, exitval_tracer); 4711.1Skamil 4721.13Schristos DPRINTF("Wait for tracee to finish its job and exit - calling %s()\n", 4731.1Skamil TWAIT_FNAME); 4741.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracee, &status, WNOHANG), 4751.1Skamil tracee); 4761.1Skamil 4771.1Skamil validate_status_exited(status, exitval_tracee); 4781.1Skamil 4791.1Skamil msg_close(&parent_tracer); 4801.1Skamil msg_close(&parent_tracee); 4811.1Skamil} 4821.26Skamil 4831.26SkamilATF_TC_BODY(attach1, tc) 4841.26Skamil{ 4851.26Skamil 4861.26Skamil /* Reuse this test with race1 */ 4871.26Skamil attach1_raw(false); 4881.26Skamil} 4891.26Skamil 4901.1Skamil#endif 4911.1Skamil 4921.1Skamil#if defined(TWAIT_HAVE_PID) 4931.1SkamilATF_TC(attach2); 4941.1SkamilATF_TC_HEAD(attach2, tc) 4951.1Skamil{ 4961.1Skamil atf_tc_set_md_var(tc, "descr", 4971.1Skamil "Assert that any tracer sees process termination before its " 4981.1Skamil "parent"); 4991.1Skamil} 5001.1Skamil 5011.1SkamilATF_TC_BODY(attach2, tc) 5021.1Skamil{ 5031.1Skamil struct msg_fds parent_tracer, parent_tracee; 5041.1Skamil const int exitval_tracee = 5; 5051.1Skamil const int exitval_tracer1 = 10, exitval_tracer2 = 20; 5061.1Skamil pid_t tracee, tracer, wpid; 5071.1Skamil uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */ 5081.1Skamil#if defined(TWAIT_HAVE_STATUS) 5091.1Skamil int status; 5101.1Skamil#endif 5111.1Skamil 5121.13Schristos DPRINTF("Spawn tracee\n"); 5131.13Schristos SYSCALL_REQUIRE(msg_open(&parent_tracee) == 0); 5141.1Skamil tracee = atf_utils_fork(); 5151.1Skamil if (tracee == 0) { 5161.1Skamil /* Wait for message from the parent */ 5171.1Skamil CHILD_FROM_PARENT("Message 1", parent_tracee, msg); 5181.1Skamil _exit(exitval_tracee); 5191.1Skamil } 5201.1Skamil 5211.13Schristos DPRINTF("Spawn debugger\n"); 5221.13Schristos SYSCALL_REQUIRE(msg_open(&parent_tracer) == 0); 5231.1Skamil tracer = atf_utils_fork(); 5241.1Skamil if (tracer == 0) { 5251.1Skamil /* Fork again and drop parent to reattach to PID 1 */ 5261.1Skamil tracer = atf_utils_fork(); 5271.1Skamil if (tracer != 0) 5281.1Skamil _exit(exitval_tracer1); 5291.1Skamil 5301.13Schristos DPRINTF("Before calling PT_ATTACH from tracee %d\n", getpid()); 5311.1Skamil FORKEE_ASSERT(ptrace(PT_ATTACH, tracee, NULL, 0) != -1); 5321.1Skamil 5331.1Skamil /* Wait for tracee and assert that it was stopped w/ SIGSTOP */ 5341.1Skamil FORKEE_REQUIRE_SUCCESS( 5351.1Skamil wpid = TWAIT_GENERIC(tracee, &status, 0), tracee); 5361.1Skamil 5371.1Skamil forkee_status_stopped(status, SIGSTOP); 5381.1Skamil 5391.1Skamil /* Resume tracee with PT_CONTINUE */ 5401.1Skamil FORKEE_ASSERT(ptrace(PT_CONTINUE, tracee, (void *)1, 0) != -1); 5411.1Skamil 5421.1Skamil /* Inform parent that tracer has attached to tracee */ 5431.1Skamil CHILD_TO_PARENT("Message 1", parent_tracer, msg); 5441.1Skamil CHILD_FROM_PARENT("Message 2", parent_tracer, msg); 5451.1Skamil 5461.1Skamil /* Wait for tracee and assert that it exited */ 5471.1Skamil FORKEE_REQUIRE_SUCCESS( 5481.1Skamil wpid = TWAIT_GENERIC(tracee, &status, 0), tracee); 5491.1Skamil 5501.1Skamil forkee_status_exited(status, exitval_tracee); 5511.1Skamil 5521.13Schristos DPRINTF("Before exiting of the tracer process\n"); 5531.1Skamil _exit(exitval_tracer2); 5541.1Skamil } 5551.13Schristos DPRINTF("Wait for the tracer process (direct child) to exit calling " 5561.1Skamil "%s()\n", TWAIT_FNAME); 5571.1Skamil TWAIT_REQUIRE_SUCCESS( 5581.1Skamil wpid = TWAIT_GENERIC(tracer, &status, 0), tracer); 5591.1Skamil 5601.1Skamil validate_status_exited(status, exitval_tracer1); 5611.1Skamil 5621.13Schristos DPRINTF("Wait for the non-exited tracee process with %s()\n", 5631.1Skamil TWAIT_FNAME); 5641.1Skamil TWAIT_REQUIRE_SUCCESS( 5651.1Skamil wpid = TWAIT_GENERIC(tracee, NULL, WNOHANG), 0); 5661.1Skamil 5671.13Schristos DPRINTF("Wait for the tracer to attach to the tracee\n"); 5681.1Skamil PARENT_FROM_CHILD("Message 1", parent_tracer, msg); 5691.13Schristos DPRINTF("Resume the tracee and let it exit\n"); 5701.1Skamil PARENT_TO_CHILD("Message 1", parent_tracee, msg); 5711.1Skamil 5721.13Schristos DPRINTF("Detect that tracee is zombie\n"); 5731.1Skamil await_zombie(tracee); 5741.1Skamil 5751.13Schristos DPRINTF("Assert that there is no status about tracee - " 5761.1Skamil "Tracer must detect zombie first - calling %s()\n", TWAIT_FNAME); 5771.1Skamil TWAIT_REQUIRE_SUCCESS( 5781.1Skamil wpid = TWAIT_GENERIC(tracee, &status, WNOHANG), 0); 5791.1Skamil 5801.13Schristos DPRINTF("Resume the tracer and let it detect exited tracee\n"); 5811.1Skamil PARENT_TO_CHILD("Message 2", parent_tracer, msg); 5821.1Skamil 5831.13Schristos DPRINTF("Wait for tracee to finish its job and exit - calling %s()\n", 5841.1Skamil TWAIT_FNAME); 5851.24Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracee, &status, 0), 5861.1Skamil tracee); 5871.1Skamil 5881.1Skamil validate_status_exited(status, exitval_tracee); 5891.1Skamil 5901.1Skamil msg_close(&parent_tracer); 5911.1Skamil msg_close(&parent_tracee); 5921.1Skamil} 5931.1Skamil#endif 5941.1Skamil 5951.1SkamilATF_TC(attach3); 5961.1SkamilATF_TC_HEAD(attach3, tc) 5971.1Skamil{ 5981.1Skamil atf_tc_set_md_var(tc, "descr", 5991.1Skamil "Assert that tracer parent can PT_ATTACH to its child"); 6001.1Skamil} 6011.1Skamil 6021.1SkamilATF_TC_BODY(attach3, tc) 6031.1Skamil{ 6041.1Skamil struct msg_fds parent_tracee; 6051.1Skamil const int exitval_tracee = 5; 6061.1Skamil pid_t tracee, wpid; 6071.1Skamil uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */ 6081.1Skamil#if defined(TWAIT_HAVE_STATUS) 6091.1Skamil int status; 6101.1Skamil#endif 6111.1Skamil 6121.13Schristos DPRINTF("Spawn tracee\n"); 6131.13Schristos SYSCALL_REQUIRE(msg_open(&parent_tracee) == 0); 6141.1Skamil tracee = atf_utils_fork(); 6151.1Skamil if (tracee == 0) { 6161.1Skamil CHILD_FROM_PARENT("Message 1", parent_tracee, msg); 6171.13Schristos DPRINTF("Parent should now attach to tracee\n"); 6181.1Skamil 6191.1Skamil CHILD_FROM_PARENT("Message 2", parent_tracee, msg); 6201.1Skamil /* Wait for message from the parent */ 6211.1Skamil _exit(exitval_tracee); 6221.1Skamil } 6231.1Skamil PARENT_TO_CHILD("Message 1", parent_tracee, msg); 6241.1Skamil 6251.13Schristos DPRINTF("Before calling PT_ATTACH for tracee %d\n", tracee); 6261.13Schristos SYSCALL_REQUIRE(ptrace(PT_ATTACH, tracee, NULL, 0) != -1); 6271.1Skamil 6281.13Schristos DPRINTF("Wait for the stopped tracee process with %s()\n", 6291.1Skamil TWAIT_FNAME); 6301.1Skamil TWAIT_REQUIRE_SUCCESS( 6311.1Skamil wpid = TWAIT_GENERIC(tracee, &status, 0), tracee); 6321.1Skamil 6331.1Skamil validate_status_stopped(status, SIGSTOP); 6341.1Skamil 6351.13Schristos DPRINTF("Resume tracee with PT_CONTINUE\n"); 6361.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, tracee, (void *)1, 0) != -1); 6371.1Skamil 6381.13Schristos DPRINTF("Let the tracee exit now\n"); 6391.1Skamil PARENT_TO_CHILD("Message 2", parent_tracee, msg); 6401.1Skamil 6411.13Schristos DPRINTF("Wait for tracee to exit with %s()\n", TWAIT_FNAME); 6421.1Skamil TWAIT_REQUIRE_SUCCESS( 6431.1Skamil wpid = TWAIT_GENERIC(tracee, &status, 0), tracee); 6441.1Skamil 6451.1Skamil validate_status_exited(status, exitval_tracee); 6461.1Skamil 6471.13Schristos DPRINTF("Before calling %s() for tracee\n", TWAIT_FNAME); 6481.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, 6491.1Skamil wpid = TWAIT_GENERIC(tracee, &status, 0)); 6501.1Skamil 6511.1Skamil msg_close(&parent_tracee); 6521.1Skamil} 6531.1Skamil 6541.1SkamilATF_TC(attach4); 6551.1SkamilATF_TC_HEAD(attach4, tc) 6561.1Skamil{ 6571.1Skamil atf_tc_set_md_var(tc, "descr", 6581.1Skamil "Assert that tracer child can PT_ATTACH to its parent"); 6591.1Skamil} 6601.1Skamil 6611.1SkamilATF_TC_BODY(attach4, tc) 6621.1Skamil{ 6631.1Skamil struct msg_fds parent_tracee; 6641.1Skamil const int exitval_tracer = 5; 6651.1Skamil pid_t tracer, wpid; 6661.1Skamil uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */ 6671.1Skamil#if defined(TWAIT_HAVE_STATUS) 6681.1Skamil int status; 6691.1Skamil#endif 6701.1Skamil 6711.13Schristos DPRINTF("Spawn tracer\n"); 6721.13Schristos SYSCALL_REQUIRE(msg_open(&parent_tracee) == 0); 6731.1Skamil tracer = atf_utils_fork(); 6741.1Skamil if (tracer == 0) { 6751.1Skamil 6761.1Skamil /* Wait for message from the parent */ 6771.1Skamil CHILD_FROM_PARENT("Message 1", parent_tracee, msg); 6781.1Skamil 6791.13Schristos DPRINTF("Attach to parent PID %d with PT_ATTACH from child\n", 6801.1Skamil getppid()); 6811.1Skamil FORKEE_ASSERT(ptrace(PT_ATTACH, getppid(), NULL, 0) != -1); 6821.1Skamil 6831.13Schristos DPRINTF("Wait for the stopped parent process with %s()\n", 6841.1Skamil TWAIT_FNAME); 6851.1Skamil FORKEE_REQUIRE_SUCCESS( 6861.1Skamil wpid = TWAIT_GENERIC(getppid(), &status, 0), getppid()); 6871.1Skamil 6881.1Skamil forkee_status_stopped(status, SIGSTOP); 6891.1Skamil 6901.13Schristos DPRINTF("Resume parent with PT_DETACH\n"); 6911.1Skamil FORKEE_ASSERT(ptrace(PT_DETACH, getppid(), (void *)1, 0) 6921.1Skamil != -1); 6931.1Skamil 6941.1Skamil /* Tell parent we are ready */ 6951.1Skamil CHILD_TO_PARENT("Message 1", parent_tracee, msg); 6961.1Skamil 6971.1Skamil _exit(exitval_tracer); 6981.1Skamil } 6991.1Skamil 7001.13Schristos DPRINTF("Wait for the tracer to become ready\n"); 7011.1Skamil PARENT_TO_CHILD("Message 1", parent_tracee, msg); 7021.13Schristos DPRINTF("Allow the tracer to exit now\n"); 7031.1Skamil PARENT_FROM_CHILD("Message 1", parent_tracee, msg); 7041.1Skamil 7051.13Schristos DPRINTF("Wait for tracer to exit with %s()\n", TWAIT_FNAME); 7061.1Skamil TWAIT_REQUIRE_SUCCESS( 7071.1Skamil wpid = TWAIT_GENERIC(tracer, &status, 0), tracer); 7081.1Skamil 7091.1Skamil validate_status_exited(status, exitval_tracer); 7101.1Skamil 7111.13Schristos DPRINTF("Before calling %s() for tracer\n", TWAIT_FNAME); 7121.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, 7131.1Skamil wpid = TWAIT_GENERIC(tracer, &status, 0)); 7141.1Skamil 7151.1Skamil msg_close(&parent_tracee); 7161.1Skamil} 7171.1Skamil 7181.1Skamil#if defined(TWAIT_HAVE_PID) 7191.1SkamilATF_TC(attach5); 7201.1SkamilATF_TC_HEAD(attach5, tc) 7211.1Skamil{ 7221.1Skamil atf_tc_set_md_var(tc, "descr", 7231.1Skamil "Assert that tracer sees its parent when attached to tracer " 7241.1Skamil "(check getppid(2))"); 7251.1Skamil} 7261.1Skamil 7271.1SkamilATF_TC_BODY(attach5, tc) 7281.1Skamil{ 7291.1Skamil struct msg_fds parent_tracer, parent_tracee; 7301.1Skamil const int exitval_tracee = 5; 7311.1Skamil const int exitval_tracer = 10; 7321.1Skamil pid_t parent, tracee, tracer, wpid; 7331.1Skamil uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */ 7341.1Skamil#if defined(TWAIT_HAVE_STATUS) 7351.1Skamil int status; 7361.1Skamil#endif 7371.1Skamil 7381.13Schristos DPRINTF("Spawn tracee\n"); 7391.13Schristos SYSCALL_REQUIRE(msg_open(&parent_tracer) == 0); 7401.13Schristos SYSCALL_REQUIRE(msg_open(&parent_tracee) == 0); 7411.1Skamil tracee = atf_utils_fork(); 7421.1Skamil if (tracee == 0) { 7431.1Skamil parent = getppid(); 7441.1Skamil 7451.1Skamil /* Emit message to the parent */ 7461.1Skamil CHILD_TO_PARENT("tracee ready", parent_tracee, msg); 7471.1Skamil CHILD_FROM_PARENT("exit tracee", parent_tracee, msg); 7481.1Skamil 7491.1Skamil FORKEE_ASSERT_EQ(parent, getppid()); 7501.1Skamil 7511.1Skamil _exit(exitval_tracee); 7521.1Skamil } 7531.13Schristos DPRINTF("Wait for child to record its parent identifier (pid)\n"); 7541.1Skamil PARENT_FROM_CHILD("tracee ready", parent_tracee, msg); 7551.1Skamil 7561.13Schristos DPRINTF("Spawn debugger\n"); 7571.1Skamil tracer = atf_utils_fork(); 7581.1Skamil if (tracer == 0) { 7591.1Skamil /* No IPC to communicate with the child */ 7601.13Schristos DPRINTF("Before calling PT_ATTACH from tracee %d\n", getpid()); 7611.1Skamil FORKEE_ASSERT(ptrace(PT_ATTACH, tracee, NULL, 0) != -1); 7621.1Skamil 7631.1Skamil /* Wait for tracee and assert that it was stopped w/ SIGSTOP */ 7641.1Skamil FORKEE_REQUIRE_SUCCESS( 7651.1Skamil wpid = TWAIT_GENERIC(tracee, &status, 0), tracee); 7661.1Skamil 7671.1Skamil forkee_status_stopped(status, SIGSTOP); 7681.1Skamil 7691.1Skamil /* Resume tracee with PT_CONTINUE */ 7701.1Skamil FORKEE_ASSERT(ptrace(PT_CONTINUE, tracee, (void *)1, 0) != -1); 7711.1Skamil 7721.1Skamil /* Inform parent that tracer has attached to tracee */ 7731.1Skamil CHILD_TO_PARENT("tracer ready", parent_tracer, msg); 7741.1Skamil 7751.1Skamil /* Wait for parent to tell use that tracee should have exited */ 7761.1Skamil CHILD_FROM_PARENT("wait for tracee exit", parent_tracer, msg); 7771.1Skamil 7781.1Skamil /* Wait for tracee and assert that it exited */ 7791.1Skamil FORKEE_REQUIRE_SUCCESS( 7801.1Skamil wpid = TWAIT_GENERIC(tracee, &status, 0), tracee); 7811.1Skamil 7821.1Skamil forkee_status_exited(status, exitval_tracee); 7831.1Skamil 7841.13Schristos DPRINTF("Before exiting of the tracer process\n"); 7851.1Skamil _exit(exitval_tracer); 7861.1Skamil } 7871.1Skamil 7881.13Schristos DPRINTF("Wait for the tracer to attach to the tracee\n"); 7891.1Skamil PARENT_FROM_CHILD("tracer ready", parent_tracer, msg); 7901.1Skamil 7911.13Schristos DPRINTF("Resume the tracee and let it exit\n"); 7921.1Skamil PARENT_TO_CHILD("exit tracee", parent_tracee, msg); 7931.1Skamil 7941.13Schristos DPRINTF("Detect that tracee is zombie\n"); 7951.1Skamil await_zombie(tracee); 7961.1Skamil 7971.13Schristos DPRINTF("Assert that there is no status about tracee - " 7981.1Skamil "Tracer must detect zombie first - calling %s()\n", TWAIT_FNAME); 7991.1Skamil TWAIT_REQUIRE_SUCCESS( 8001.1Skamil wpid = TWAIT_GENERIC(tracee, &status, WNOHANG), 0); 8011.1Skamil 8021.13Schristos DPRINTF("Tell the tracer child should have exited\n"); 8031.1Skamil PARENT_TO_CHILD("wait for tracee exit", parent_tracer, msg); 8041.1Skamil 8051.13Schristos DPRINTF("Wait from tracer child to complete waiting for tracee\n"); 8061.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracer, &status, 0), 8071.1Skamil tracer); 8081.1Skamil 8091.1Skamil validate_status_exited(status, exitval_tracer); 8101.1Skamil 8111.13Schristos DPRINTF("Wait for tracee to finish its job and exit - calling %s()\n", 8121.1Skamil TWAIT_FNAME); 8131.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracee, &status, WNOHANG), 8141.1Skamil tracee); 8151.1Skamil 8161.1Skamil validate_status_exited(status, exitval_tracee); 8171.1Skamil 8181.1Skamil msg_close(&parent_tracer); 8191.1Skamil msg_close(&parent_tracee); 8201.1Skamil} 8211.1Skamil#endif 8221.1Skamil 8231.1Skamil#if defined(TWAIT_HAVE_PID) 8241.1SkamilATF_TC(attach6); 8251.1SkamilATF_TC_HEAD(attach6, tc) 8261.1Skamil{ 8271.1Skamil atf_tc_set_md_var(tc, "descr", 8281.1Skamil "Assert that tracer sees its parent when attached to tracer " 8291.1Skamil "(check sysctl(7) and struct kinfo_proc2)"); 8301.1Skamil} 8311.1Skamil 8321.1SkamilATF_TC_BODY(attach6, tc) 8331.1Skamil{ 8341.1Skamil struct msg_fds parent_tracee, parent_tracer; 8351.1Skamil const int exitval_tracee = 5; 8361.1Skamil const int exitval_tracer = 10; 8371.1Skamil pid_t parent, tracee, tracer, wpid; 8381.1Skamil uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */ 8391.1Skamil#if defined(TWAIT_HAVE_STATUS) 8401.1Skamil int status; 8411.1Skamil#endif 8421.1Skamil int name[CTL_MAXNAME]; 8431.1Skamil struct kinfo_proc2 kp; 8441.1Skamil size_t len = sizeof(kp); 8451.1Skamil unsigned int namelen; 8461.1Skamil 8471.13Schristos DPRINTF("Spawn tracee\n"); 8481.13Schristos SYSCALL_REQUIRE(msg_open(&parent_tracee) == 0); 8491.13Schristos SYSCALL_REQUIRE(msg_open(&parent_tracer) == 0); 8501.1Skamil tracee = atf_utils_fork(); 8511.1Skamil if (tracee == 0) { 8521.1Skamil parent = getppid(); 8531.1Skamil 8541.1Skamil /* Emit message to the parent */ 8551.1Skamil CHILD_TO_PARENT("Message 1", parent_tracee, msg); 8561.1Skamil CHILD_FROM_PARENT("Message 2", parent_tracee, msg); 8571.1Skamil 8581.1Skamil namelen = 0; 8591.1Skamil name[namelen++] = CTL_KERN; 8601.1Skamil name[namelen++] = KERN_PROC2; 8611.1Skamil name[namelen++] = KERN_PROC_PID; 8621.1Skamil name[namelen++] = getpid(); 8631.1Skamil name[namelen++] = len; 8641.1Skamil name[namelen++] = 1; 8651.1Skamil 8661.1Skamil FORKEE_ASSERT(sysctl(name, namelen, &kp, &len, NULL, 0) == 0); 8671.1Skamil FORKEE_ASSERT_EQ(parent, kp.p_ppid); 8681.1Skamil 8691.1Skamil _exit(exitval_tracee); 8701.1Skamil } 8711.1Skamil 8721.13Schristos DPRINTF("Wait for child to record its parent identifier (pid)\n"); 8731.1Skamil PARENT_FROM_CHILD("Message 1", parent_tracee, msg); 8741.1Skamil 8751.13Schristos DPRINTF("Spawn debugger\n"); 8761.1Skamil tracer = atf_utils_fork(); 8771.1Skamil if (tracer == 0) { 8781.1Skamil /* No IPC to communicate with the child */ 8791.13Schristos DPRINTF("Before calling PT_ATTACH from tracee %d\n", getpid()); 8801.1Skamil FORKEE_ASSERT(ptrace(PT_ATTACH, tracee, NULL, 0) != -1); 8811.1Skamil 8821.1Skamil /* Wait for tracee and assert that it was stopped w/ SIGSTOP */ 8831.1Skamil FORKEE_REQUIRE_SUCCESS( 8841.1Skamil wpid = TWAIT_GENERIC(tracee, &status, 0), tracee); 8851.1Skamil 8861.1Skamil forkee_status_stopped(status, SIGSTOP); 8871.1Skamil 8881.1Skamil /* Resume tracee with PT_CONTINUE */ 8891.1Skamil FORKEE_ASSERT(ptrace(PT_CONTINUE, tracee, (void *)1, 0) != -1); 8901.1Skamil 8911.1Skamil /* Inform parent that tracer has attached to tracee */ 8921.1Skamil CHILD_TO_PARENT("Message 1", parent_tracer, msg); 8931.1Skamil 8941.1Skamil CHILD_FROM_PARENT("Message 2", parent_tracer, msg); 8951.1Skamil 8961.1Skamil /* Wait for tracee and assert that it exited */ 8971.1Skamil FORKEE_REQUIRE_SUCCESS( 8981.1Skamil wpid = TWAIT_GENERIC(tracee, &status, 0), tracee); 8991.1Skamil 9001.1Skamil forkee_status_exited(status, exitval_tracee); 9011.1Skamil 9021.13Schristos DPRINTF("Before exiting of the tracer process\n"); 9031.1Skamil _exit(exitval_tracer); 9041.1Skamil } 9051.1Skamil 9061.13Schristos DPRINTF("Wait for the tracer to attach to the tracee\n"); 9071.1Skamil PARENT_FROM_CHILD("Message 1", parent_tracer, msg); 9081.1Skamil 9091.13Schristos DPRINTF("Resume the tracee and let it exit\n"); 9101.1Skamil PARENT_TO_CHILD("Message 1", parent_tracee, msg); 9111.1Skamil 9121.13Schristos DPRINTF("Detect that tracee is zombie\n"); 9131.1Skamil await_zombie(tracee); 9141.1Skamil 9151.13Schristos DPRINTF("Assert that there is no status about tracee - " 9161.1Skamil "Tracer must detect zombie first - calling %s()\n", TWAIT_FNAME); 9171.1Skamil TWAIT_REQUIRE_SUCCESS( 9181.1Skamil wpid = TWAIT_GENERIC(tracee, &status, WNOHANG), 0); 9191.1Skamil 9201.13Schristos DPRINTF("Resume the tracer and let it detect exited tracee\n"); 9211.1Skamil PARENT_TO_CHILD("Message 2", parent_tracer, msg); 9221.1Skamil 9231.13Schristos DPRINTF("Wait for tracer to finish its job and exit - calling %s()\n", 9241.1Skamil TWAIT_FNAME); 9251.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracer, &status, 0), 9261.1Skamil tracer); 9271.1Skamil 9281.1Skamil validate_status_exited(status, exitval_tracer); 9291.1Skamil 9301.13Schristos DPRINTF("Wait for tracee to finish its job and exit - calling %s()\n", 9311.1Skamil TWAIT_FNAME); 9321.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracee, &status, WNOHANG), 9331.1Skamil tracee); 9341.1Skamil 9351.1Skamil validate_status_exited(status, exitval_tracee); 9361.1Skamil 9371.1Skamil msg_close(&parent_tracee); 9381.1Skamil msg_close(&parent_tracer); 9391.1Skamil} 9401.1Skamil#endif 9411.1Skamil 9421.1Skamil#if defined(TWAIT_HAVE_PID) 9431.1SkamilATF_TC(attach7); 9441.1SkamilATF_TC_HEAD(attach7, tc) 9451.1Skamil{ 9461.1Skamil atf_tc_set_md_var(tc, "descr", 9471.1Skamil "Assert that tracer sees its parent when attached to tracer " 9481.1Skamil "(check /proc/curproc/status 3rd column)"); 9491.1Skamil} 9501.1Skamil 9511.1SkamilATF_TC_BODY(attach7, tc) 9521.1Skamil{ 9531.1Skamil struct msg_fds parent_tracee, parent_tracer; 9541.1Skamil int rv; 9551.1Skamil const int exitval_tracee = 5; 9561.1Skamil const int exitval_tracer = 10; 9571.1Skamil pid_t parent, tracee, tracer, wpid; 9581.1Skamil uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */ 9591.1Skamil#if defined(TWAIT_HAVE_STATUS) 9601.1Skamil int status; 9611.1Skamil#endif 9621.1Skamil FILE *fp; 9631.1Skamil struct stat st; 9641.1Skamil const char *fname = "/proc/curproc/status"; 9651.1Skamil char s_executable[MAXPATHLEN]; 9661.1Skamil int s_pid, s_ppid; 9671.1Skamil /* 9681.1Skamil * Format: 9691.1Skamil * EXECUTABLE PID PPID ... 9701.1Skamil */ 9711.1Skamil 9721.13Schristos SYSCALL_REQUIRE((rv = stat(fname, &st)) == 0 || (errno == ENOENT)); 9731.1Skamil if (rv != 0) { 9741.1Skamil atf_tc_skip("/proc/curproc/status not found"); 9751.1Skamil } 9761.1Skamil 9771.13Schristos DPRINTF("Spawn tracee\n"); 9781.13Schristos SYSCALL_REQUIRE(msg_open(&parent_tracee) == 0); 9791.13Schristos SYSCALL_REQUIRE(msg_open(&parent_tracer) == 0); 9801.1Skamil tracee = atf_utils_fork(); 9811.1Skamil if (tracee == 0) { 9821.1Skamil parent = getppid(); 9831.1Skamil 9841.1Skamil // Wait for parent to let us exit 9851.1Skamil CHILD_TO_PARENT("tracee ready", parent_tracee, msg); 9861.1Skamil CHILD_FROM_PARENT("tracee exit", parent_tracee, msg); 9871.1Skamil 9881.1Skamil FORKEE_ASSERT((fp = fopen(fname, "r")) != NULL); 9891.1Skamil fscanf(fp, "%s %d %d", s_executable, &s_pid, &s_ppid); 9901.1Skamil FORKEE_ASSERT(fclose(fp) == 0); 9911.1Skamil FORKEE_ASSERT_EQ(parent, s_ppid); 9921.1Skamil 9931.1Skamil _exit(exitval_tracee); 9941.1Skamil } 9951.1Skamil 9961.13Schristos DPRINTF("Wait for child to record its parent identifier (pid)\n"); 9971.1Skamil PARENT_FROM_CHILD("tracee ready", parent_tracee, msg); 9981.1Skamil 9991.13Schristos DPRINTF("Spawn debugger\n"); 10001.1Skamil tracer = atf_utils_fork(); 10011.1Skamil if (tracer == 0) { 10021.13Schristos DPRINTF("Before calling PT_ATTACH from tracee %d\n", getpid()); 10031.1Skamil FORKEE_ASSERT(ptrace(PT_ATTACH, tracee, NULL, 0) != -1); 10041.1Skamil 10051.1Skamil /* Wait for tracee and assert that it was stopped w/ SIGSTOP */ 10061.1Skamil FORKEE_REQUIRE_SUCCESS( 10071.1Skamil wpid = TWAIT_GENERIC(tracee, &status, 0), tracee); 10081.1Skamil 10091.1Skamil forkee_status_stopped(status, SIGSTOP); 10101.1Skamil 10111.1Skamil /* Resume tracee with PT_CONTINUE */ 10121.1Skamil FORKEE_ASSERT(ptrace(PT_CONTINUE, tracee, (void *)1, 0) != -1); 10131.1Skamil 10141.1Skamil /* Inform parent that tracer has attached to tracee */ 10151.1Skamil CHILD_TO_PARENT("tracer ready", parent_tracer, msg); 10161.1Skamil 10171.1Skamil /* Wait for parent to tell use that tracee should have exited */ 10181.1Skamil CHILD_FROM_PARENT("wait for tracee exit", parent_tracer, msg); 10191.1Skamil 10201.1Skamil /* Wait for tracee and assert that it exited */ 10211.1Skamil FORKEE_REQUIRE_SUCCESS( 10221.1Skamil wpid = TWAIT_GENERIC(tracee, &status, 0), tracee); 10231.1Skamil 10241.1Skamil forkee_status_exited(status, exitval_tracee); 10251.1Skamil 10261.13Schristos DPRINTF("Before exiting of the tracer process\n"); 10271.1Skamil _exit(exitval_tracer); 10281.1Skamil } 10291.13Schristos DPRINTF("Wait for the tracer to attach to the tracee\n"); 10301.1Skamil PARENT_FROM_CHILD("tracer ready", parent_tracer, msg); 10311.13Schristos DPRINTF("Resume the tracee and let it exit\n"); 10321.1Skamil PARENT_TO_CHILD("tracee exit", parent_tracee, msg); 10331.1Skamil 10341.13Schristos DPRINTF("Detect that tracee is zombie\n"); 10351.1Skamil await_zombie(tracee); 10361.1Skamil 10371.13Schristos DPRINTF("Assert that there is no status about tracee - " 10381.1Skamil "Tracer must detect zombie first - calling %s()\n", TWAIT_FNAME); 10391.1Skamil TWAIT_REQUIRE_SUCCESS( 10401.1Skamil wpid = TWAIT_GENERIC(tracee, &status, WNOHANG), 0); 10411.1Skamil 10421.13Schristos DPRINTF("Resume the tracer and let it detect exited tracee\n"); 10431.1Skamil PARENT_TO_CHILD("Message 2", parent_tracer, msg); 10441.1Skamil 10451.13Schristos DPRINTF("Wait for tracer to finish its job and exit - calling %s()\n", 10461.1Skamil TWAIT_FNAME); 10471.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracer, &status, 0), 10481.1Skamil tracer); 10491.1Skamil 10501.1Skamil validate_status_exited(status, exitval_tracer); 10511.1Skamil 10521.13Schristos DPRINTF("Wait for tracee to finish its job and exit - calling %s()\n", 10531.1Skamil TWAIT_FNAME); 10541.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracee, &status, WNOHANG), 10551.1Skamil tracee); 10561.1Skamil 10571.1Skamil validate_status_exited(status, exitval_tracee); 10581.1Skamil 10591.1Skamil msg_close(&parent_tracee); 10601.1Skamil msg_close(&parent_tracer); 10611.1Skamil} 10621.1Skamil#endif 10631.1Skamil 10641.1SkamilATF_TC(eventmask1); 10651.1SkamilATF_TC_HEAD(eventmask1, tc) 10661.1Skamil{ 10671.1Skamil atf_tc_set_md_var(tc, "descr", 10681.1Skamil "Verify that empty EVENT_MASK is preserved"); 10691.1Skamil} 10701.1Skamil 10711.1SkamilATF_TC_BODY(eventmask1, tc) 10721.1Skamil{ 10731.1Skamil const int exitval = 5; 10741.1Skamil const int sigval = SIGSTOP; 10751.1Skamil pid_t child, wpid; 10761.1Skamil#if defined(TWAIT_HAVE_STATUS) 10771.1Skamil int status; 10781.1Skamil#endif 10791.1Skamil ptrace_event_t set_event, get_event; 10801.1Skamil const int len = sizeof(ptrace_event_t); 10811.1Skamil 10821.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 10831.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 10841.1Skamil if (child == 0) { 10851.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 10861.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 10871.1Skamil 10881.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 10891.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 10901.1Skamil 10911.13Schristos DPRINTF("Before exiting of the child process\n"); 10921.1Skamil _exit(exitval); 10931.1Skamil } 10941.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 10951.1Skamil 10961.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 10971.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 10981.1Skamil 10991.1Skamil validate_status_stopped(status, sigval); 11001.1Skamil 11011.1Skamil set_event.pe_set_event = 0; 11021.13Schristos SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &set_event, len) != -1); 11031.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_EVENT_MASK, child, &get_event, len) != -1); 11041.1Skamil ATF_REQUIRE(memcmp(&set_event, &get_event, len) == 0); 11051.1Skamil 11061.13Schristos DPRINTF("Before resuming the child process where it left off and " 11071.1Skamil "without signal to be sent\n"); 11081.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 11091.1Skamil 11101.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 11111.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 11121.1Skamil 11131.1Skamil validate_status_exited(status, exitval); 11141.1Skamil 11151.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 11161.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 11171.1Skamil} 11181.1Skamil 11191.1SkamilATF_TC(eventmask2); 11201.1SkamilATF_TC_HEAD(eventmask2, tc) 11211.1Skamil{ 11221.1Skamil atf_tc_set_md_var(tc, "descr", 11231.1Skamil "Verify that PTRACE_FORK in EVENT_MASK is preserved"); 11241.1Skamil} 11251.1Skamil 11261.1SkamilATF_TC_BODY(eventmask2, tc) 11271.1Skamil{ 11281.1Skamil const int exitval = 5; 11291.1Skamil const int sigval = SIGSTOP; 11301.1Skamil pid_t child, wpid; 11311.1Skamil#if defined(TWAIT_HAVE_STATUS) 11321.1Skamil int status; 11331.1Skamil#endif 11341.1Skamil ptrace_event_t set_event, get_event; 11351.1Skamil const int len = sizeof(ptrace_event_t); 11361.1Skamil 11371.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 11381.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 11391.1Skamil if (child == 0) { 11401.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 11411.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 11421.1Skamil 11431.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 11441.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 11451.1Skamil 11461.13Schristos DPRINTF("Before exiting of the child process\n"); 11471.1Skamil _exit(exitval); 11481.1Skamil } 11491.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 11501.1Skamil 11511.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 11521.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 11531.1Skamil 11541.1Skamil validate_status_stopped(status, sigval); 11551.1Skamil 11561.1Skamil set_event.pe_set_event = PTRACE_FORK; 11571.13Schristos SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &set_event, len) != -1); 11581.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_EVENT_MASK, child, &get_event, len) != -1); 11591.1Skamil ATF_REQUIRE(memcmp(&set_event, &get_event, len) == 0); 11601.1Skamil 11611.13Schristos DPRINTF("Before resuming the child process where it left off and " 11621.1Skamil "without signal to be sent\n"); 11631.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 11641.1Skamil 11651.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 11661.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 11671.1Skamil 11681.1Skamil validate_status_exited(status, exitval); 11691.1Skamil 11701.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 11711.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 11721.1Skamil} 11731.1Skamil 11741.1SkamilATF_TC(eventmask3); 11751.1SkamilATF_TC_HEAD(eventmask3, tc) 11761.1Skamil{ 11771.1Skamil atf_tc_set_md_var(tc, "descr", 11781.1Skamil "Verify that PTRACE_VFORK in EVENT_MASK is preserved"); 11791.1Skamil} 11801.1Skamil 11811.1SkamilATF_TC_BODY(eventmask3, tc) 11821.1Skamil{ 11831.1Skamil const int exitval = 5; 11841.1Skamil const int sigval = SIGSTOP; 11851.1Skamil pid_t child, wpid; 11861.1Skamil#if defined(TWAIT_HAVE_STATUS) 11871.1Skamil int status; 11881.1Skamil#endif 11891.1Skamil ptrace_event_t set_event, get_event; 11901.1Skamil const int len = sizeof(ptrace_event_t); 11911.1Skamil 11921.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 11931.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 11941.1Skamil if (child == 0) { 11951.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 11961.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 11971.1Skamil 11981.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 11991.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 12001.1Skamil 12011.13Schristos DPRINTF("Before exiting of the child process\n"); 12021.1Skamil _exit(exitval); 12031.1Skamil } 12041.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 12051.1Skamil 12061.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 12071.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 12081.1Skamil 12091.1Skamil validate_status_stopped(status, sigval); 12101.1Skamil 12111.1Skamil set_event.pe_set_event = PTRACE_VFORK; 12121.38Skamil SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &set_event, len) != -1); 12131.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_EVENT_MASK, child, &get_event, len) != -1); 12141.1Skamil ATF_REQUIRE(memcmp(&set_event, &get_event, len) == 0); 12151.1Skamil 12161.13Schristos DPRINTF("Before resuming the child process where it left off and " 12171.1Skamil "without signal to be sent\n"); 12181.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 12191.1Skamil 12201.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 12211.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 12221.1Skamil 12231.1Skamil validate_status_exited(status, exitval); 12241.1Skamil 12251.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 12261.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 12271.1Skamil} 12281.1Skamil 12291.1SkamilATF_TC(eventmask4); 12301.1SkamilATF_TC_HEAD(eventmask4, tc) 12311.1Skamil{ 12321.1Skamil atf_tc_set_md_var(tc, "descr", 12331.1Skamil "Verify that PTRACE_VFORK_DONE in EVENT_MASK is preserved"); 12341.1Skamil} 12351.1Skamil 12361.1SkamilATF_TC_BODY(eventmask4, tc) 12371.1Skamil{ 12381.1Skamil const int exitval = 5; 12391.1Skamil const int sigval = SIGSTOP; 12401.1Skamil pid_t child, wpid; 12411.1Skamil#if defined(TWAIT_HAVE_STATUS) 12421.1Skamil int status; 12431.1Skamil#endif 12441.1Skamil ptrace_event_t set_event, get_event; 12451.1Skamil const int len = sizeof(ptrace_event_t); 12461.1Skamil 12471.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 12481.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 12491.1Skamil if (child == 0) { 12501.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 12511.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 12521.1Skamil 12531.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 12541.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 12551.1Skamil 12561.13Schristos DPRINTF("Before exiting of the child process\n"); 12571.1Skamil _exit(exitval); 12581.1Skamil } 12591.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 12601.1Skamil 12611.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 12621.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 12631.1Skamil 12641.1Skamil validate_status_stopped(status, sigval); 12651.1Skamil 12661.1Skamil set_event.pe_set_event = PTRACE_VFORK_DONE; 12671.13Schristos SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &set_event, len) != -1); 12681.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_EVENT_MASK, child, &get_event, len) != -1); 12691.1Skamil ATF_REQUIRE(memcmp(&set_event, &get_event, len) == 0); 12701.1Skamil 12711.13Schristos DPRINTF("Before resuming the child process where it left off and " 12721.1Skamil "without signal to be sent\n"); 12731.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 12741.1Skamil 12751.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 12761.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 12771.1Skamil 12781.1Skamil validate_status_exited(status, exitval); 12791.1Skamil 12801.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 12811.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 12821.1Skamil} 12831.1Skamil 12841.1SkamilATF_TC(eventmask5); 12851.1SkamilATF_TC_HEAD(eventmask5, tc) 12861.1Skamil{ 12871.1Skamil atf_tc_set_md_var(tc, "descr", 12881.1Skamil "Verify that PTRACE_LWP_CREATE in EVENT_MASK is preserved"); 12891.1Skamil} 12901.1Skamil 12911.1SkamilATF_TC_BODY(eventmask5, tc) 12921.1Skamil{ 12931.1Skamil const int exitval = 5; 12941.1Skamil const int sigval = SIGSTOP; 12951.1Skamil pid_t child, wpid; 12961.1Skamil#if defined(TWAIT_HAVE_STATUS) 12971.1Skamil int status; 12981.1Skamil#endif 12991.1Skamil ptrace_event_t set_event, get_event; 13001.1Skamil const int len = sizeof(ptrace_event_t); 13011.1Skamil 13021.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 13031.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 13041.1Skamil if (child == 0) { 13051.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 13061.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 13071.1Skamil 13081.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 13091.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 13101.1Skamil 13111.13Schristos DPRINTF("Before exiting of the child process\n"); 13121.1Skamil _exit(exitval); 13131.1Skamil } 13141.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 13151.1Skamil 13161.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 13171.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 13181.1Skamil 13191.1Skamil validate_status_stopped(status, sigval); 13201.1Skamil 13211.1Skamil set_event.pe_set_event = PTRACE_LWP_CREATE; 13221.13Schristos SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &set_event, len) != -1); 13231.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_EVENT_MASK, child, &get_event, len) != -1); 13241.1Skamil ATF_REQUIRE(memcmp(&set_event, &get_event, len) == 0); 13251.1Skamil 13261.13Schristos DPRINTF("Before resuming the child process where it left off and " 13271.1Skamil "without signal to be sent\n"); 13281.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 13291.1Skamil 13301.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 13311.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 13321.1Skamil 13331.1Skamil validate_status_exited(status, exitval); 13341.1Skamil 13351.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 13361.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 13371.1Skamil} 13381.1Skamil 13391.1SkamilATF_TC(eventmask6); 13401.1SkamilATF_TC_HEAD(eventmask6, tc) 13411.1Skamil{ 13421.1Skamil atf_tc_set_md_var(tc, "descr", 13431.1Skamil "Verify that PTRACE_LWP_EXIT in EVENT_MASK is preserved"); 13441.1Skamil} 13451.1Skamil 13461.1SkamilATF_TC_BODY(eventmask6, tc) 13471.1Skamil{ 13481.1Skamil const int exitval = 5; 13491.1Skamil const int sigval = SIGSTOP; 13501.1Skamil pid_t child, wpid; 13511.1Skamil#if defined(TWAIT_HAVE_STATUS) 13521.1Skamil int status; 13531.1Skamil#endif 13541.1Skamil ptrace_event_t set_event, get_event; 13551.1Skamil const int len = sizeof(ptrace_event_t); 13561.1Skamil 13571.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 13581.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 13591.1Skamil if (child == 0) { 13601.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 13611.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 13621.1Skamil 13631.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 13641.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 13651.1Skamil 13661.13Schristos DPRINTF("Before exiting of the child process\n"); 13671.1Skamil _exit(exitval); 13681.1Skamil } 13691.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 13701.1Skamil 13711.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 13721.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 13731.1Skamil 13741.1Skamil validate_status_stopped(status, sigval); 13751.1Skamil 13761.1Skamil set_event.pe_set_event = PTRACE_LWP_EXIT; 13771.13Schristos SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &set_event, len) != -1); 13781.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_EVENT_MASK, child, &get_event, len) != -1); 13791.1Skamil ATF_REQUIRE(memcmp(&set_event, &get_event, len) == 0); 13801.1Skamil 13811.13Schristos DPRINTF("Before resuming the child process where it left off and " 13821.1Skamil "without signal to be sent\n"); 13831.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 13841.1Skamil 13851.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 13861.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 13871.1Skamil 13881.1Skamil validate_status_exited(status, exitval); 13891.1Skamil 13901.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 13911.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 13921.1Skamil} 13931.1Skamil 13941.28Skamilstatic void 13951.32Skamilfork_body(pid_t (*fn)(void), bool trackfork, bool trackvfork, 13961.32Skamil bool trackvforkdone, bool detachchild, bool detachparent) 13971.1Skamil{ 13981.1Skamil const int exitval = 5; 13991.1Skamil const int exitval2 = 15; 14001.1Skamil const int sigval = SIGSTOP; 14011.31Skamil pid_t child, child2 = 0, wpid; 14021.1Skamil#if defined(TWAIT_HAVE_STATUS) 14031.1Skamil int status; 14041.1Skamil#endif 14051.1Skamil ptrace_state_t state; 14061.1Skamil const int slen = sizeof(state); 14071.1Skamil ptrace_event_t event; 14081.1Skamil const int elen = sizeof(event); 14091.1Skamil 14101.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 14111.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 14121.1Skamil if (child == 0) { 14131.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 14141.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 14151.1Skamil 14161.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 14171.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 14181.1Skamil 14191.30Skamil FORKEE_ASSERT((child2 = (fn)()) != -1); 14201.1Skamil 14211.1Skamil if (child2 == 0) 14221.1Skamil _exit(exitval2); 14231.1Skamil 14241.1Skamil FORKEE_REQUIRE_SUCCESS 14251.1Skamil (wpid = TWAIT_GENERIC(child2, &status, 0), child2); 14261.1Skamil 14271.1Skamil forkee_status_exited(status, exitval2); 14281.1Skamil 14291.13Schristos DPRINTF("Before exiting of the child process\n"); 14301.1Skamil _exit(exitval); 14311.1Skamil } 14321.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 14331.1Skamil 14341.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 14351.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 14361.1Skamil 14371.1Skamil validate_status_stopped(status, sigval); 14381.1Skamil 14391.30Skamil DPRINTF("Set 0%s%s%s in EVENT_MASK for the child %d\n", 14401.30Skamil trackfork ? "|PTRACE_FORK" : "", 14411.30Skamil trackvfork ? "|PTRACE_VFORK" : "", 14421.30Skamil trackvforkdone ? "|PTRACE_VFORK_DONE" : "", child); 14431.30Skamil event.pe_set_event = 0; 14441.30Skamil if (trackfork) 14451.30Skamil event.pe_set_event |= PTRACE_FORK; 14461.30Skamil if (trackvfork) 14471.30Skamil event.pe_set_event |= PTRACE_VFORK; 14481.30Skamil if (trackvforkdone) 14491.30Skamil event.pe_set_event |= PTRACE_VFORK_DONE; 14501.13Schristos SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1); 14511.1Skamil 14521.13Schristos DPRINTF("Before resuming the child process where it left off and " 14531.1Skamil "without signal to be sent\n"); 14541.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 14551.1Skamil 14561.29Skamil#if defined(TWAIT_HAVE_PID) 14571.31Skamil if ((trackfork && fn == fork) || (trackvfork && fn == vfork)) { 14581.29Skamil DPRINTF("Before calling %s() for the child %d\n", TWAIT_FNAME, 14591.29Skamil child); 14601.29Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), 14611.29Skamil child); 14621.1Skamil 14631.29Skamil validate_status_stopped(status, SIGTRAP); 14641.1Skamil 14651.29Skamil SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state, 14661.29Skamil slen) != -1); 14671.31Skamil if (trackfork && fn == fork) { 14681.30Skamil ATF_REQUIRE_EQ(state.pe_report_event & PTRACE_FORK, 14691.30Skamil PTRACE_FORK); 14701.30Skamil } 14711.31Skamil if (trackvfork && fn == vfork) { 14721.30Skamil ATF_REQUIRE_EQ(state.pe_report_event & PTRACE_VFORK, 14731.30Skamil PTRACE_VFORK); 14741.30Skamil } 14751.29Skamil 14761.29Skamil child2 = state.pe_other_pid; 14771.30Skamil DPRINTF("Reported ptrace event with forkee %d\n", child2); 14781.29Skamil 14791.29Skamil DPRINTF("Before calling %s() for the forkee %d of the child " 14801.29Skamil "%d\n", TWAIT_FNAME, child2, child); 14811.29Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0), 14821.29Skamil child2); 14831.1Skamil 14841.29Skamil validate_status_stopped(status, SIGTRAP); 14851.1Skamil 14861.29Skamil SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child2, &state, 14871.29Skamil slen) != -1); 14881.31Skamil if (trackfork && fn == fork) { 14891.30Skamil ATF_REQUIRE_EQ(state.pe_report_event & PTRACE_FORK, 14901.30Skamil PTRACE_FORK); 14911.30Skamil } 14921.31Skamil if (trackvfork && fn == vfork) { 14931.30Skamil ATF_REQUIRE_EQ(state.pe_report_event & PTRACE_VFORK, 14941.30Skamil PTRACE_VFORK); 14951.30Skamil } 14961.30Skamil 14971.29Skamil ATF_REQUIRE_EQ(state.pe_other_pid, child); 14981.29Skamil 14991.29Skamil DPRINTF("Before resuming the forkee process where it left off " 15001.29Skamil "and without signal to be sent\n"); 15011.29Skamil SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child2, (void *)1, 0) 15021.29Skamil != -1); 15031.29Skamil 15041.29Skamil DPRINTF("Before resuming the child process where it left off " 15051.29Skamil "and without signal to be sent\n"); 15061.29Skamil SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 15071.30Skamil } 15081.30Skamil#endif 15091.30Skamil 15101.31Skamil if (trackvforkdone && fn == vfork) { 15111.30Skamil DPRINTF("Before calling %s() for the child %d\n", TWAIT_FNAME, 15121.30Skamil child); 15131.30Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), 15141.30Skamil child); 15151.30Skamil 15161.30Skamil validate_status_stopped(status, SIGTRAP); 15171.30Skamil 15181.30Skamil SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state, 15191.30Skamil slen) != -1); 15201.30Skamil ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_VFORK_DONE); 15211.30Skamil 15221.30Skamil child2 = state.pe_other_pid; 15231.30Skamil DPRINTF("Reported PTRACE_VFORK_DONE event with forkee %d\n", 15241.30Skamil child2); 15251.30Skamil 15261.30Skamil DPRINTF("Before resuming the child process where it left off " 15271.30Skamil "and without signal to be sent\n"); 15281.30Skamil SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 15291.30Skamil } 15301.29Skamil 15311.30Skamil#if defined(TWAIT_HAVE_PID) 15321.31Skamil if ((trackfork && fn == fork) || (trackvfork && fn == vfork)) { 15331.29Skamil DPRINTF("Before calling %s() for the forkee - expected exited" 15341.29Skamil "\n", TWAIT_FNAME); 15351.29Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0), 15361.29Skamil child2); 15371.29Skamil 15381.29Skamil validate_status_exited(status, exitval2); 15391.29Skamil 15401.29Skamil DPRINTF("Before calling %s() for the forkee - expected no " 15411.29Skamil "process\n", TWAIT_FNAME); 15421.29Skamil TWAIT_REQUIRE_FAILURE(ECHILD, 15431.29Skamil wpid = TWAIT_GENERIC(child2, &status, 0)); 15441.29Skamil } 15451.29Skamil#endif 15461.1Skamil 15471.13Schristos DPRINTF("Before calling %s() for the child - expected stopped " 15481.1Skamil "SIGCHLD\n", TWAIT_FNAME); 15491.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 15501.1Skamil 15511.1Skamil validate_status_stopped(status, SIGCHLD); 15521.1Skamil 15531.13Schristos DPRINTF("Before resuming the child process where it left off and " 15541.1Skamil "without signal to be sent\n"); 15551.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 15561.1Skamil 15571.13Schristos DPRINTF("Before calling %s() for the child - expected exited\n", 15581.1Skamil TWAIT_FNAME); 15591.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 15601.1Skamil 15611.1Skamil validate_status_exited(status, exitval); 15621.1Skamil 15631.13Schristos DPRINTF("Before calling %s() for the child - expected no process\n", 15641.1Skamil TWAIT_FNAME); 15651.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 15661.1Skamil} 15671.28Skamil 15681.32Skamil#define FORK_TEST(name,descr,fun,tfork,tvfork,tvforkdone,detchild,detparent) \ 15691.32SkamilATF_TC(name); \ 15701.32SkamilATF_TC_HEAD(name, tc) \ 15711.32Skamil{ \ 15721.32Skamil atf_tc_set_md_var(tc, "descr", descr); \ 15731.32Skamil} \ 15741.32Skamil \ 15751.32SkamilATF_TC_BODY(name, tc) \ 15761.32Skamil{ \ 15771.32Skamil \ 15781.32Skamil fork_body(fun, tfork, tvfork, tvforkdone, detchild, detparent); \ 15791.32Skamil} 15801.32Skamil 15811.32Skamil#define F false 15821.32Skamil#define T true 15831.32Skamil 15841.32Skamil#define F_IF__0(x) 15851.32Skamil#define F_IF__1(x) x 15861.32Skamil#define F_IF__(x,y) F_IF__ ## x (y) 15871.32Skamil#define F_IF_(x,y) F_IF__(x,y) 15881.32Skamil#define F_IF(x,y) F_IF_(x,y) 15891.32Skamil 15901.32Skamil#define DSCR(function,forkbit,vforkbit,vforkdonebit,dchildbit,dparentbit) \ 15911.32Skamil "Verify " #function "(2) called with 0" \ 15921.32Skamil F_IF(forkbit,"|PTRACE_FORK") \ 15931.32Skamil F_IF(vforkbit,"|PTRACE_VFORK") \ 15941.32Skamil F_IF(vforkdonebit,"|PTRACE_VFORK_DONE") \ 15951.32Skamil " in EVENT_MASK." \ 15961.32Skamil F_IF(dchildbit," Detach child in this test.") \ 15971.32Skamil F_IF(dparentbit," Detach parent in this test.") 15981.1Skamil 15991.32SkamilFORK_TEST(fork1, DSCR(fork,0,0,0,0,0), fork, F, F, F, F, F) 16001.31Skamil#if defined(TWAIT_HAVE_PID) 16011.32SkamilFORK_TEST(fork2, DSCR(fork,1,0,0,0,0), fork, T, F, F, F, F) 16021.32SkamilFORK_TEST(fork3, DSCR(fork,0,1,0,0,0), fork, F, T, F, F, F) 16031.32SkamilFORK_TEST(fork4, DSCR(fork,1,1,0,0,0), fork, T, T, F, F, F) 16041.31Skamil#endif 16051.32SkamilFORK_TEST(fork5, DSCR(fork,0,0,1,0,0), fork, F, F, T, F, F) 16061.31Skamil#if defined(TWAIT_HAVE_PID) 16071.32SkamilFORK_TEST(fork6, DSCR(fork,1,0,1,0,0), fork, T, F, T, F, F) 16081.32SkamilFORK_TEST(fork7, DSCR(fork,0,1,1,0,0), fork, F, T, T, F, F) 16091.32SkamilFORK_TEST(fork8, DSCR(fork,1,1,1,0,0), fork, T, T, T, F, F) 16101.31Skamil#endif 16111.1Skamil 16121.32SkamilFORK_TEST(vfork1, DSCR(vfork,0,0,0,0,0), vfork, F, F, F, F, F) 16131.31Skamil#if defined(TWAIT_HAVE_PID) 16141.32SkamilFORK_TEST(vfork2, DSCR(vfork,1,0,0,0,0), vfork, T, F, F, F, F) 16151.32SkamilFORK_TEST(vfork3, DSCR(vfork,0,1,0,0,0), vfork, F, T, F, F, F) 16161.32SkamilFORK_TEST(vfork4, DSCR(vfork,1,1,0,0,0), vfork, T, T, F, F, F) 16171.31Skamil#endif 16181.32SkamilFORK_TEST(vfork5, DSCR(vfork,0,0,1,0,0), vfork, F, F, T, F, F) 16191.31Skamil#if defined(TWAIT_HAVE_PID) 16201.32SkamilFORK_TEST(vfork6, DSCR(vfork,1,0,1,0,0), vfork, T, F, T, F, F) 16211.32SkamilFORK_TEST(vfork7, DSCR(vfork,0,1,1,0,0), vfork, F, T, T, F, F) 16221.32SkamilFORK_TEST(vfork8, DSCR(vfork,1,1,1,0,0), vfork, T, T, T, F, F) 16231.31Skamil#endif 16241.31Skamil 16251.31Skamil 16261.31Skamil 16271.1Skamil 16281.1SkamilATF_TC(io_read_d1); 16291.1SkamilATF_TC_HEAD(io_read_d1, tc) 16301.1Skamil{ 16311.1Skamil atf_tc_set_md_var(tc, "descr", 16321.1Skamil "Verify PT_IO with PIOD_READ_D and len = sizeof(uint8_t)"); 16331.1Skamil} 16341.1Skamil 16351.1SkamilATF_TC_BODY(io_read_d1, tc) 16361.1Skamil{ 16371.1Skamil const int exitval = 5; 16381.1Skamil const int sigval = SIGSTOP; 16391.1Skamil pid_t child, wpid; 16401.1Skamil uint8_t lookup_me = 0; 16411.1Skamil const uint8_t magic = 0xab; 16421.1Skamil struct ptrace_io_desc io = { 16431.1Skamil .piod_op = PIOD_READ_D, 16441.1Skamil .piod_offs = &lookup_me, 16451.1Skamil .piod_addr = &lookup_me, 16461.1Skamil .piod_len = sizeof(lookup_me) 16471.1Skamil }; 16481.1Skamil#if defined(TWAIT_HAVE_STATUS) 16491.1Skamil int status; 16501.1Skamil#endif 16511.1Skamil 16521.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 16531.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 16541.1Skamil if (child == 0) { 16551.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 16561.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 16571.1Skamil 16581.1Skamil lookup_me = magic; 16591.1Skamil 16601.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 16611.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 16621.1Skamil 16631.13Schristos DPRINTF("Before exiting of the child process\n"); 16641.1Skamil _exit(exitval); 16651.1Skamil } 16661.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 16671.1Skamil 16681.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 16691.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 16701.1Skamil 16711.1Skamil validate_status_stopped(status, sigval); 16721.1Skamil 16731.13Schristos DPRINTF("Read lookup_me from tracee (PID=%d) by tracer (PID=%d)\n", 16741.1Skamil child, getpid()); 16751.13Schristos SYSCALL_REQUIRE(ptrace(PT_IO, child, &io, 0) != -1); 16761.1Skamil 16771.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me, magic, 16781.1Skamil "got value %" PRIx8 " != expected %" PRIx8, lookup_me, magic); 16791.1Skamil 16801.13Schristos DPRINTF("Before resuming the child process where it left off and " 16811.1Skamil "without signal to be sent\n"); 16821.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 16831.1Skamil 16841.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 16851.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 16861.1Skamil 16871.1Skamil validate_status_exited(status, exitval); 16881.1Skamil 16891.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 16901.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 16911.1Skamil} 16921.1Skamil 16931.1SkamilATF_TC(io_read_d2); 16941.1SkamilATF_TC_HEAD(io_read_d2, tc) 16951.1Skamil{ 16961.1Skamil atf_tc_set_md_var(tc, "descr", 16971.1Skamil "Verify PT_IO with PIOD_READ_D and len = sizeof(uint16_t)"); 16981.1Skamil} 16991.1Skamil 17001.1SkamilATF_TC_BODY(io_read_d2, tc) 17011.1Skamil{ 17021.1Skamil const int exitval = 5; 17031.1Skamil const int sigval = SIGSTOP; 17041.1Skamil pid_t child, wpid; 17051.1Skamil uint16_t lookup_me = 0; 17061.1Skamil const uint16_t magic = 0x1234; 17071.1Skamil struct ptrace_io_desc io = { 17081.1Skamil .piod_op = PIOD_READ_D, 17091.1Skamil .piod_offs = &lookup_me, 17101.1Skamil .piod_addr = &lookup_me, 17111.1Skamil .piod_len = sizeof(lookup_me) 17121.1Skamil }; 17131.1Skamil#if defined(TWAIT_HAVE_STATUS) 17141.1Skamil int status; 17151.1Skamil#endif 17161.1Skamil 17171.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 17181.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 17191.1Skamil if (child == 0) { 17201.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 17211.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 17221.1Skamil 17231.1Skamil lookup_me = magic; 17241.1Skamil 17251.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 17261.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 17271.1Skamil 17281.13Schristos DPRINTF("Before exiting of the child process\n"); 17291.1Skamil _exit(exitval); 17301.1Skamil } 17311.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 17321.1Skamil 17331.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 17341.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 17351.1Skamil 17361.1Skamil validate_status_stopped(status, sigval); 17371.1Skamil 17381.13Schristos DPRINTF("Read lookup_me from tracee (PID=%d) by tracer (PID=%d)\n", 17391.1Skamil child, getpid()); 17401.13Schristos SYSCALL_REQUIRE(ptrace(PT_IO, child, &io, 0) != -1); 17411.1Skamil 17421.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me, magic, 17431.1Skamil "got value %" PRIx16 " != expected %" PRIx16, lookup_me, magic); 17441.1Skamil 17451.13Schristos DPRINTF("Before resuming the child process where it left off and " 17461.1Skamil "without signal to be sent\n"); 17471.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 17481.1Skamil 17491.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 17501.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 17511.1Skamil 17521.1Skamil validate_status_exited(status, exitval); 17531.1Skamil 17541.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 17551.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 17561.1Skamil} 17571.1Skamil 17581.1SkamilATF_TC(io_read_d3); 17591.1SkamilATF_TC_HEAD(io_read_d3, tc) 17601.1Skamil{ 17611.1Skamil atf_tc_set_md_var(tc, "descr", 17621.1Skamil "Verify PT_IO with PIOD_READ_D and len = sizeof(uint32_t)"); 17631.1Skamil} 17641.1Skamil 17651.1SkamilATF_TC_BODY(io_read_d3, tc) 17661.1Skamil{ 17671.1Skamil const int exitval = 5; 17681.1Skamil const int sigval = SIGSTOP; 17691.1Skamil pid_t child, wpid; 17701.1Skamil uint32_t lookup_me = 0; 17711.1Skamil const uint32_t magic = 0x1234abcd; 17721.1Skamil struct ptrace_io_desc io = { 17731.1Skamil .piod_op = PIOD_READ_D, 17741.1Skamil .piod_offs = &lookup_me, 17751.1Skamil .piod_addr = &lookup_me, 17761.1Skamil .piod_len = sizeof(lookup_me) 17771.1Skamil }; 17781.1Skamil#if defined(TWAIT_HAVE_STATUS) 17791.1Skamil int status; 17801.1Skamil#endif 17811.1Skamil 17821.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 17831.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 17841.1Skamil if (child == 0) { 17851.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 17861.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 17871.1Skamil 17881.1Skamil lookup_me = magic; 17891.1Skamil 17901.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 17911.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 17921.1Skamil 17931.13Schristos DPRINTF("Before exiting of the child process\n"); 17941.1Skamil _exit(exitval); 17951.1Skamil } 17961.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 17971.1Skamil 17981.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 17991.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 18001.1Skamil 18011.1Skamil validate_status_stopped(status, sigval); 18021.1Skamil 18031.13Schristos DPRINTF("Read lookup_me from tracee (PID=%d) by tracer (PID=%d)\n", 18041.1Skamil child, getpid()); 18051.13Schristos SYSCALL_REQUIRE(ptrace(PT_IO, child, &io, 0) != -1); 18061.1Skamil 18071.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me, magic, 18081.1Skamil "got value %" PRIx32 " != expected %" PRIx32, lookup_me, magic); 18091.1Skamil 18101.13Schristos DPRINTF("Before resuming the child process where it left off and " 18111.1Skamil "without signal to be sent\n"); 18121.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 18131.1Skamil 18141.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 18151.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 18161.1Skamil 18171.1Skamil validate_status_exited(status, exitval); 18181.1Skamil 18191.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 18201.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 18211.1Skamil} 18221.1Skamil 18231.1SkamilATF_TC(io_read_d4); 18241.1SkamilATF_TC_HEAD(io_read_d4, tc) 18251.1Skamil{ 18261.1Skamil atf_tc_set_md_var(tc, "descr", 18271.1Skamil "Verify PT_IO with PIOD_READ_D and len = sizeof(uint64_t)"); 18281.1Skamil} 18291.1Skamil 18301.1SkamilATF_TC_BODY(io_read_d4, tc) 18311.1Skamil{ 18321.1Skamil const int exitval = 5; 18331.1Skamil const int sigval = SIGSTOP; 18341.1Skamil pid_t child, wpid; 18351.1Skamil uint64_t lookup_me = 0; 18361.1Skamil const uint64_t magic = 0x1234abcd9876dcfa; 18371.1Skamil struct ptrace_io_desc io = { 18381.1Skamil .piod_op = PIOD_READ_D, 18391.1Skamil .piod_offs = &lookup_me, 18401.1Skamil .piod_addr = &lookup_me, 18411.1Skamil .piod_len = sizeof(lookup_me) 18421.1Skamil }; 18431.1Skamil#if defined(TWAIT_HAVE_STATUS) 18441.1Skamil int status; 18451.1Skamil#endif 18461.1Skamil 18471.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 18481.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 18491.1Skamil if (child == 0) { 18501.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 18511.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 18521.1Skamil 18531.1Skamil lookup_me = magic; 18541.1Skamil 18551.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 18561.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 18571.1Skamil 18581.13Schristos DPRINTF("Before exiting of the child process\n"); 18591.1Skamil _exit(exitval); 18601.1Skamil } 18611.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 18621.1Skamil 18631.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 18641.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 18651.1Skamil 18661.1Skamil validate_status_stopped(status, sigval); 18671.1Skamil 18681.13Schristos DPRINTF("Read lookup_me from tracee (PID=%d) by tracer (PID=%d)\n", 18691.1Skamil child, getpid()); 18701.13Schristos SYSCALL_REQUIRE(ptrace(PT_IO, child, &io, 0) != -1); 18711.1Skamil 18721.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me, magic, 18731.1Skamil "got value %" PRIx64 " != expected %" PRIx64, lookup_me, magic); 18741.1Skamil 18751.13Schristos DPRINTF("Before resuming the child process where it left off and " 18761.1Skamil "without signal to be sent\n"); 18771.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 18781.1Skamil 18791.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 18801.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 18811.1Skamil 18821.1Skamil validate_status_exited(status, exitval); 18831.1Skamil 18841.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 18851.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 18861.1Skamil} 18871.1Skamil 18881.1SkamilATF_TC(io_write_d1); 18891.1SkamilATF_TC_HEAD(io_write_d1, tc) 18901.1Skamil{ 18911.1Skamil atf_tc_set_md_var(tc, "descr", 18921.1Skamil "Verify PT_IO with PIOD_WRITE_D and len = sizeof(uint8_t)"); 18931.1Skamil} 18941.1Skamil 18951.1SkamilATF_TC_BODY(io_write_d1, tc) 18961.1Skamil{ 18971.1Skamil const int exitval = 5; 18981.1Skamil const int sigval = SIGSTOP; 18991.1Skamil pid_t child, wpid; 19001.1Skamil uint8_t lookup_me = 0; 19011.1Skamil const uint8_t magic = 0xab; 19021.1Skamil struct ptrace_io_desc io = { 19031.1Skamil .piod_op = PIOD_WRITE_D, 19041.1Skamil .piod_offs = &lookup_me, 19051.1Skamil .piod_addr = &lookup_me, 19061.1Skamil .piod_len = sizeof(lookup_me) 19071.1Skamil }; 19081.1Skamil#if defined(TWAIT_HAVE_STATUS) 19091.1Skamil int status; 19101.1Skamil#endif 19111.1Skamil 19121.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 19131.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 19141.1Skamil if (child == 0) { 19151.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 19161.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 19171.1Skamil 19181.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 19191.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 19201.1Skamil 19211.1Skamil FORKEE_ASSERT_EQ(lookup_me, magic); 19221.1Skamil 19231.13Schristos DPRINTF("Before exiting of the child process\n"); 19241.1Skamil _exit(exitval); 19251.1Skamil } 19261.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 19271.1Skamil 19281.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 19291.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 19301.1Skamil 19311.1Skamil validate_status_stopped(status, sigval); 19321.1Skamil 19331.1Skamil lookup_me = magic; 19341.1Skamil 19351.13Schristos DPRINTF("Write new lookup_me to tracee (PID=%d) from tracer (PID=%d)\n", 19361.1Skamil child, getpid()); 19371.13Schristos SYSCALL_REQUIRE(ptrace(PT_IO, child, &io, 0) != -1); 19381.1Skamil 19391.13Schristos DPRINTF("Before resuming the child process where it left off and " 19401.1Skamil "without signal to be sent\n"); 19411.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 19421.1Skamil 19431.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 19441.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 19451.1Skamil 19461.1Skamil validate_status_exited(status, exitval); 19471.1Skamil 19481.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 19491.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 19501.1Skamil} 19511.1Skamil 19521.1SkamilATF_TC(io_write_d2); 19531.1SkamilATF_TC_HEAD(io_write_d2, tc) 19541.1Skamil{ 19551.1Skamil atf_tc_set_md_var(tc, "descr", 19561.1Skamil "Verify PT_IO with PIOD_WRITE_D and len = sizeof(uint16_t)"); 19571.1Skamil} 19581.1Skamil 19591.1SkamilATF_TC_BODY(io_write_d2, tc) 19601.1Skamil{ 19611.1Skamil const int exitval = 5; 19621.1Skamil const int sigval = SIGSTOP; 19631.1Skamil pid_t child, wpid; 19641.1Skamil uint16_t lookup_me = 0; 19651.1Skamil const uint16_t magic = 0xab12; 19661.1Skamil struct ptrace_io_desc io = { 19671.1Skamil .piod_op = PIOD_WRITE_D, 19681.1Skamil .piod_offs = &lookup_me, 19691.1Skamil .piod_addr = &lookup_me, 19701.1Skamil .piod_len = sizeof(lookup_me) 19711.1Skamil }; 19721.1Skamil#if defined(TWAIT_HAVE_STATUS) 19731.1Skamil int status; 19741.1Skamil#endif 19751.1Skamil 19761.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 19771.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 19781.1Skamil if (child == 0) { 19791.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 19801.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 19811.1Skamil 19821.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 19831.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 19841.1Skamil 19851.1Skamil FORKEE_ASSERT_EQ(lookup_me, magic); 19861.1Skamil 19871.13Schristos DPRINTF("Before exiting of the child process\n"); 19881.1Skamil _exit(exitval); 19891.1Skamil } 19901.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 19911.1Skamil 19921.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 19931.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 19941.1Skamil 19951.1Skamil validate_status_stopped(status, sigval); 19961.1Skamil 19971.1Skamil lookup_me = magic; 19981.1Skamil 19991.13Schristos DPRINTF("Write new lookup_me to tracee (PID=%d) from tracer (PID=%d)\n", 20001.1Skamil child, getpid()); 20011.13Schristos SYSCALL_REQUIRE(ptrace(PT_IO, child, &io, 0) != -1); 20021.1Skamil 20031.13Schristos DPRINTF("Before resuming the child process where it left off and " 20041.1Skamil "without signal to be sent\n"); 20051.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 20061.1Skamil 20071.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 20081.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 20091.1Skamil 20101.1Skamil validate_status_exited(status, exitval); 20111.1Skamil 20121.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 20131.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 20141.1Skamil} 20151.1Skamil 20161.1SkamilATF_TC(io_write_d3); 20171.1SkamilATF_TC_HEAD(io_write_d3, tc) 20181.1Skamil{ 20191.1Skamil atf_tc_set_md_var(tc, "descr", 20201.1Skamil "Verify PT_IO with PIOD_WRITE_D and len = sizeof(uint32_t)"); 20211.1Skamil} 20221.1Skamil 20231.1SkamilATF_TC_BODY(io_write_d3, tc) 20241.1Skamil{ 20251.1Skamil const int exitval = 5; 20261.1Skamil const int sigval = SIGSTOP; 20271.1Skamil pid_t child, wpid; 20281.1Skamil uint32_t lookup_me = 0; 20291.1Skamil const uint32_t magic = 0xab127643; 20301.1Skamil struct ptrace_io_desc io = { 20311.1Skamil .piod_op = PIOD_WRITE_D, 20321.1Skamil .piod_offs = &lookup_me, 20331.1Skamil .piod_addr = &lookup_me, 20341.1Skamil .piod_len = sizeof(lookup_me) 20351.1Skamil }; 20361.1Skamil#if defined(TWAIT_HAVE_STATUS) 20371.1Skamil int status; 20381.1Skamil#endif 20391.1Skamil 20401.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 20411.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 20421.1Skamil if (child == 0) { 20431.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 20441.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 20451.1Skamil 20461.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 20471.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 20481.1Skamil 20491.1Skamil FORKEE_ASSERT_EQ(lookup_me, magic); 20501.1Skamil 20511.13Schristos DPRINTF("Before exiting of the child process\n"); 20521.1Skamil _exit(exitval); 20531.1Skamil } 20541.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 20551.1Skamil 20561.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 20571.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 20581.1Skamil 20591.1Skamil validate_status_stopped(status, sigval); 20601.1Skamil 20611.1Skamil lookup_me = magic; 20621.1Skamil 20631.13Schristos DPRINTF("Write new lookup_me to tracee (PID=%d) from tracer (PID=%d)\n", 20641.1Skamil child, getpid()); 20651.13Schristos SYSCALL_REQUIRE(ptrace(PT_IO, child, &io, 0) != -1); 20661.1Skamil 20671.13Schristos DPRINTF("Before resuming the child process where it left off and " 20681.1Skamil "without signal to be sent\n"); 20691.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 20701.1Skamil 20711.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 20721.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 20731.1Skamil 20741.1Skamil validate_status_exited(status, exitval); 20751.1Skamil 20761.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 20771.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 20781.1Skamil} 20791.1Skamil 20801.1SkamilATF_TC(io_write_d4); 20811.1SkamilATF_TC_HEAD(io_write_d4, tc) 20821.1Skamil{ 20831.1Skamil atf_tc_set_md_var(tc, "descr", 20841.1Skamil "Verify PT_IO with PIOD_WRITE_D and len = sizeof(uint64_t)"); 20851.1Skamil} 20861.1Skamil 20871.1SkamilATF_TC_BODY(io_write_d4, tc) 20881.1Skamil{ 20891.1Skamil const int exitval = 5; 20901.1Skamil const int sigval = SIGSTOP; 20911.1Skamil pid_t child, wpid; 20921.1Skamil uint64_t lookup_me = 0; 20931.1Skamil const uint64_t magic = 0xab12764376490123; 20941.1Skamil struct ptrace_io_desc io = { 20951.1Skamil .piod_op = PIOD_WRITE_D, 20961.1Skamil .piod_offs = &lookup_me, 20971.1Skamil .piod_addr = &lookup_me, 20981.1Skamil .piod_len = sizeof(lookup_me) 20991.1Skamil }; 21001.1Skamil#if defined(TWAIT_HAVE_STATUS) 21011.1Skamil int status; 21021.1Skamil#endif 21031.1Skamil 21041.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 21051.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 21061.1Skamil if (child == 0) { 21071.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 21081.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 21091.1Skamil 21101.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 21111.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 21121.1Skamil 21131.1Skamil FORKEE_ASSERT_EQ(lookup_me, magic); 21141.1Skamil 21151.13Schristos DPRINTF("Before exiting of the child process\n"); 21161.1Skamil _exit(exitval); 21171.1Skamil } 21181.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 21191.1Skamil 21201.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 21211.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 21221.1Skamil 21231.1Skamil validate_status_stopped(status, sigval); 21241.1Skamil 21251.1Skamil lookup_me = magic; 21261.1Skamil 21271.13Schristos DPRINTF("Write new lookup_me to tracee (PID=%d) from tracer (PID=%d)\n", 21281.1Skamil child, getpid()); 21291.13Schristos SYSCALL_REQUIRE(ptrace(PT_IO, child, &io, 0) != -1); 21301.1Skamil 21311.13Schristos DPRINTF("Before resuming the child process where it left off and " 21321.1Skamil "without signal to be sent\n"); 21331.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 21341.1Skamil 21351.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 21361.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 21371.1Skamil 21381.1Skamil validate_status_exited(status, exitval); 21391.1Skamil 21401.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 21411.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 21421.1Skamil} 21431.1Skamil 21441.1SkamilATF_TC(io_read_auxv1); 21451.1SkamilATF_TC_HEAD(io_read_auxv1, tc) 21461.1Skamil{ 21471.1Skamil atf_tc_set_md_var(tc, "descr", 21481.1Skamil "Verify PT_READ_AUXV called for tracee"); 21491.1Skamil} 21501.1Skamil 21511.1SkamilATF_TC_BODY(io_read_auxv1, tc) 21521.1Skamil{ 21531.1Skamil const int exitval = 5; 21541.1Skamil const int sigval = SIGSTOP; 21551.1Skamil pid_t child, wpid; 21561.1Skamil#if defined(TWAIT_HAVE_STATUS) 21571.1Skamil int status; 21581.1Skamil#endif 21591.1Skamil AuxInfo ai[100], *aip; 21601.1Skamil struct ptrace_io_desc io = { 21611.1Skamil .piod_op = PIOD_READ_AUXV, 21621.1Skamil .piod_offs = 0, 21631.1Skamil .piod_addr = ai, 21641.1Skamil .piod_len = sizeof(ai) 21651.1Skamil }; 21661.1Skamil 21671.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 21681.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 21691.1Skamil if (child == 0) { 21701.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 21711.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 21721.1Skamil 21731.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 21741.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 21751.1Skamil 21761.13Schristos DPRINTF("Before exiting of the child process\n"); 21771.1Skamil _exit(exitval); 21781.1Skamil } 21791.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 21801.1Skamil 21811.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 21821.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 21831.1Skamil 21841.1Skamil validate_status_stopped(status, sigval); 21851.1Skamil 21861.13Schristos DPRINTF("Read new AUXV from tracee (PID=%d) by tracer (PID=%d)\n", 21871.1Skamil child, getpid()); 21881.13Schristos SYSCALL_REQUIRE(ptrace(PT_IO, child, &io, 0) != -1); 21891.1Skamil 21901.13Schristos DPRINTF("Asserting that AUXV length (%zu) is > 0\n", io.piod_len); 21911.1Skamil ATF_REQUIRE(io.piod_len > 0); 21921.1Skamil 21931.1Skamil for (aip = ai; aip->a_type != AT_NULL; aip++) 21941.13Schristos DPRINTF("a_type=%#llx a_v=%#llx\n", 21951.1Skamil (long long int)aip->a_type, (long long int)aip->a_v); 21961.1Skamil 21971.13Schristos DPRINTF("Before resuming the child process where it left off and " 21981.1Skamil "without signal to be sent\n"); 21991.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 22001.1Skamil 22011.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 22021.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 22031.1Skamil 22041.1Skamil validate_status_exited(status, exitval); 22051.1Skamil 22061.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 22071.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 22081.1Skamil} 22091.1Skamil 22101.1SkamilATF_TC(read_d1); 22111.1SkamilATF_TC_HEAD(read_d1, tc) 22121.1Skamil{ 22131.1Skamil atf_tc_set_md_var(tc, "descr", 22141.1Skamil "Verify PT_READ_D called once"); 22151.1Skamil} 22161.1Skamil 22171.1SkamilATF_TC_BODY(read_d1, tc) 22181.1Skamil{ 22191.1Skamil const int exitval = 5; 22201.1Skamil const int sigval = SIGSTOP; 22211.1Skamil pid_t child, wpid; 22221.1Skamil int lookup_me = 0; 22231.1Skamil const int magic = (int)random(); 22241.1Skamil#if defined(TWAIT_HAVE_STATUS) 22251.1Skamil int status; 22261.1Skamil#endif 22271.1Skamil 22281.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 22291.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 22301.1Skamil if (child == 0) { 22311.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 22321.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 22331.1Skamil 22341.1Skamil lookup_me = magic; 22351.1Skamil 22361.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 22371.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 22381.1Skamil 22391.13Schristos DPRINTF("Before exiting of the child process\n"); 22401.1Skamil _exit(exitval); 22411.1Skamil } 22421.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 22431.1Skamil 22441.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 22451.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 22461.1Skamil 22471.1Skamil validate_status_stopped(status, sigval); 22481.1Skamil 22491.13Schristos DPRINTF("Read new lookup_me from tracee (PID=%d) by tracer (PID=%d)\n", 22501.1Skamil child, getpid()); 22511.1Skamil errno = 0; 22521.1Skamil lookup_me = ptrace(PT_READ_D, child, &lookup_me, 0); 22531.18Schristos SYSCALL_REQUIRE_ERRNO(errno, 0); 22541.1Skamil 22551.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me, magic, 22561.1Skamil "got value %#x != expected %#x", lookup_me, magic); 22571.1Skamil 22581.13Schristos DPRINTF("Before resuming the child process where it left off and " 22591.1Skamil "without signal to be sent\n"); 22601.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 22611.1Skamil 22621.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 22631.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 22641.1Skamil 22651.1Skamil validate_status_exited(status, exitval); 22661.1Skamil 22671.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 22681.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 22691.1Skamil} 22701.1Skamil 22711.1SkamilATF_TC(read_d2); 22721.1SkamilATF_TC_HEAD(read_d2, tc) 22731.1Skamil{ 22741.1Skamil atf_tc_set_md_var(tc, "descr", 22751.1Skamil "Verify PT_READ_D called twice"); 22761.1Skamil} 22771.1Skamil 22781.1SkamilATF_TC_BODY(read_d2, tc) 22791.1Skamil{ 22801.1Skamil const int exitval = 5; 22811.1Skamil const int sigval = SIGSTOP; 22821.1Skamil pid_t child, wpid; 22831.1Skamil int lookup_me1 = 0; 22841.1Skamil int lookup_me2 = 0; 22851.1Skamil const int magic1 = (int)random(); 22861.1Skamil const int magic2 = (int)random(); 22871.1Skamil#if defined(TWAIT_HAVE_STATUS) 22881.1Skamil int status; 22891.1Skamil#endif 22901.1Skamil 22911.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 22921.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 22931.1Skamil if (child == 0) { 22941.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 22951.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 22961.1Skamil 22971.1Skamil lookup_me1 = magic1; 22981.1Skamil lookup_me2 = magic2; 22991.1Skamil 23001.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 23011.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 23021.1Skamil 23031.13Schristos DPRINTF("Before exiting of the child process\n"); 23041.1Skamil _exit(exitval); 23051.1Skamil } 23061.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 23071.1Skamil 23081.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 23091.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 23101.1Skamil 23111.1Skamil validate_status_stopped(status, sigval); 23121.1Skamil 23131.13Schristos DPRINTF("Read new lookup_me1 from tracee (PID=%d) by tracer (PID=%d)\n", 23141.1Skamil child, getpid()); 23151.1Skamil errno = 0; 23161.1Skamil lookup_me1 = ptrace(PT_READ_D, child, &lookup_me1, 0); 23171.18Schristos SYSCALL_REQUIRE_ERRNO(errno, 0); 23181.1Skamil 23191.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me1, magic1, 23201.1Skamil "got value %#x != expected %#x", lookup_me1, magic1); 23211.1Skamil 23221.13Schristos DPRINTF("Read new lookup_me2 from tracee (PID=%d) by tracer (PID=%d)\n", 23231.1Skamil child, getpid()); 23241.1Skamil errno = 0; 23251.1Skamil lookup_me2 = ptrace(PT_READ_D, child, &lookup_me2, 0); 23261.18Schristos SYSCALL_REQUIRE_ERRNO(errno, 0); 23271.1Skamil 23281.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me2, magic2, 23291.1Skamil "got value %#x != expected %#x", lookup_me2, magic2); 23301.1Skamil 23311.13Schristos DPRINTF("Before resuming the child process where it left off and " 23321.1Skamil "without signal to be sent\n"); 23331.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 23341.1Skamil 23351.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 23361.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 23371.1Skamil 23381.1Skamil validate_status_exited(status, exitval); 23391.1Skamil 23401.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 23411.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 23421.1Skamil} 23431.1Skamil 23441.1SkamilATF_TC(read_d3); 23451.1SkamilATF_TC_HEAD(read_d3, tc) 23461.1Skamil{ 23471.1Skamil atf_tc_set_md_var(tc, "descr", 23481.1Skamil "Verify PT_READ_D called three times"); 23491.1Skamil} 23501.1Skamil 23511.1SkamilATF_TC_BODY(read_d3, tc) 23521.1Skamil{ 23531.1Skamil const int exitval = 5; 23541.1Skamil const int sigval = SIGSTOP; 23551.1Skamil pid_t child, wpid; 23561.1Skamil int lookup_me1 = 0; 23571.1Skamil int lookup_me2 = 0; 23581.1Skamil int lookup_me3 = 0; 23591.1Skamil const int magic1 = (int)random(); 23601.1Skamil const int magic2 = (int)random(); 23611.1Skamil const int magic3 = (int)random(); 23621.1Skamil#if defined(TWAIT_HAVE_STATUS) 23631.1Skamil int status; 23641.1Skamil#endif 23651.1Skamil 23661.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 23671.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 23681.1Skamil if (child == 0) { 23691.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 23701.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 23711.1Skamil 23721.1Skamil lookup_me1 = magic1; 23731.1Skamil lookup_me2 = magic2; 23741.1Skamil lookup_me3 = magic3; 23751.1Skamil 23761.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 23771.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 23781.1Skamil 23791.13Schristos DPRINTF("Before exiting of the child process\n"); 23801.1Skamil _exit(exitval); 23811.1Skamil } 23821.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 23831.1Skamil 23841.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 23851.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 23861.1Skamil 23871.1Skamil validate_status_stopped(status, sigval); 23881.1Skamil 23891.13Schristos DPRINTF("Read new lookup_me1 from tracee (PID=%d) by tracer (PID=%d)\n", 23901.1Skamil child, getpid()); 23911.1Skamil errno = 0; 23921.1Skamil lookup_me1 = ptrace(PT_READ_D, child, &lookup_me1, 0); 23931.18Schristos SYSCALL_REQUIRE_ERRNO(errno, 0); 23941.1Skamil 23951.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me1, magic1, 23961.1Skamil "got value %#x != expected %#x", lookup_me1, magic1); 23971.1Skamil 23981.13Schristos DPRINTF("Read new lookup_me2 from tracee (PID=%d) by tracer (PID=%d)\n", 23991.1Skamil child, getpid()); 24001.1Skamil errno = 0; 24011.1Skamil lookup_me2 = ptrace(PT_READ_D, child, &lookup_me2, 0); 24021.18Schristos SYSCALL_REQUIRE_ERRNO(errno, 0); 24031.1Skamil 24041.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me2, magic2, 24051.1Skamil "got value %#x != expected %#x", lookup_me2, magic2); 24061.1Skamil 24071.13Schristos DPRINTF("Read new lookup_me3 from tracee (PID=%d) by tracer (PID=%d)\n", 24081.1Skamil child, getpid()); 24091.1Skamil errno = 0; 24101.1Skamil lookup_me3 = ptrace(PT_READ_D, child, &lookup_me3, 0); 24111.18Schristos SYSCALL_REQUIRE_ERRNO(errno, 0); 24121.1Skamil 24131.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me3, magic3, 24141.1Skamil "got value %#x != expected %#x", lookup_me3, magic3); 24151.1Skamil 24161.13Schristos DPRINTF("Before resuming the child process where it left off and " 24171.1Skamil "without signal to be sent\n"); 24181.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 24191.1Skamil 24201.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 24211.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 24221.1Skamil 24231.1Skamil validate_status_exited(status, exitval); 24241.1Skamil 24251.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 24261.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 24271.1Skamil} 24281.1Skamil 24291.1SkamilATF_TC(read_d4); 24301.1SkamilATF_TC_HEAD(read_d4, tc) 24311.1Skamil{ 24321.1Skamil atf_tc_set_md_var(tc, "descr", 24331.1Skamil "Verify PT_READ_D called four times"); 24341.1Skamil} 24351.1Skamil 24361.1SkamilATF_TC_BODY(read_d4, tc) 24371.1Skamil{ 24381.1Skamil const int exitval = 5; 24391.1Skamil const int sigval = SIGSTOP; 24401.1Skamil pid_t child, wpid; 24411.1Skamil int lookup_me1 = 0; 24421.1Skamil int lookup_me2 = 0; 24431.1Skamil int lookup_me3 = 0; 24441.1Skamil int lookup_me4 = 0; 24451.1Skamil const int magic1 = (int)random(); 24461.1Skamil const int magic2 = (int)random(); 24471.1Skamil const int magic3 = (int)random(); 24481.1Skamil const int magic4 = (int)random(); 24491.1Skamil#if defined(TWAIT_HAVE_STATUS) 24501.1Skamil int status; 24511.1Skamil#endif 24521.1Skamil 24531.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 24541.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 24551.1Skamil if (child == 0) { 24561.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 24571.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 24581.1Skamil 24591.1Skamil lookup_me1 = magic1; 24601.1Skamil lookup_me2 = magic2; 24611.1Skamil lookup_me3 = magic3; 24621.1Skamil lookup_me4 = magic4; 24631.1Skamil 24641.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 24651.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 24661.1Skamil 24671.13Schristos DPRINTF("Before exiting of the child process\n"); 24681.1Skamil _exit(exitval); 24691.1Skamil } 24701.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 24711.1Skamil 24721.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 24731.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 24741.1Skamil 24751.1Skamil validate_status_stopped(status, sigval); 24761.1Skamil 24771.13Schristos DPRINTF("Read new lookup_me1 from tracee (PID=%d) by tracer (PID=%d)\n", 24781.1Skamil child, getpid()); 24791.1Skamil errno = 0; 24801.1Skamil lookup_me1 = ptrace(PT_READ_D, child, &lookup_me1, 0); 24811.18Schristos SYSCALL_REQUIRE_ERRNO(errno, 0); 24821.1Skamil 24831.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me1, magic1, 24841.1Skamil "got value %#x != expected %#x", lookup_me1, magic1); 24851.1Skamil 24861.13Schristos DPRINTF("Read new lookup_me2 from tracee (PID=%d) by tracer (PID=%d)\n", 24871.1Skamil child, getpid()); 24881.1Skamil errno = 0; 24891.1Skamil lookup_me2 = ptrace(PT_READ_D, child, &lookup_me2, 0); 24901.18Schristos SYSCALL_REQUIRE_ERRNO(errno, 0); 24911.1Skamil 24921.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me2, magic2, 24931.1Skamil "got value %#x != expected %#x", lookup_me2, magic2); 24941.1Skamil 24951.13Schristos DPRINTF("Read new lookup_me3 from tracee (PID=%d) by tracer (PID=%d)\n", 24961.1Skamil child, getpid()); 24971.1Skamil errno = 0; 24981.1Skamil lookup_me3 = ptrace(PT_READ_D, child, &lookup_me3, 0); 24991.18Schristos SYSCALL_REQUIRE_ERRNO(errno, 0); 25001.1Skamil 25011.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me3, magic3, 25021.1Skamil "got value %#x != expected %#x", lookup_me3, magic3); 25031.1Skamil 25041.13Schristos DPRINTF("Read new lookup_me4 from tracee (PID=%d) by tracer (PID=%d)\n", 25051.1Skamil child, getpid()); 25061.1Skamil errno = 0; 25071.1Skamil lookup_me4 = ptrace(PT_READ_D, child, &lookup_me4, 0); 25081.18Schristos SYSCALL_REQUIRE_ERRNO(errno, 0); 25091.1Skamil 25101.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me4, magic4, 25111.1Skamil "got value %#x != expected %#x", lookup_me4, magic4); 25121.1Skamil 25131.13Schristos DPRINTF("Before resuming the child process where it left off and " 25141.1Skamil "without signal to be sent\n"); 25151.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 25161.1Skamil 25171.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 25181.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 25191.1Skamil 25201.1Skamil validate_status_exited(status, exitval); 25211.1Skamil 25221.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 25231.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 25241.1Skamil} 25251.1Skamil 25261.1SkamilATF_TC(write_d1); 25271.1SkamilATF_TC_HEAD(write_d1, tc) 25281.1Skamil{ 25291.1Skamil atf_tc_set_md_var(tc, "descr", 25301.1Skamil "Verify PT_WRITE_D called once"); 25311.1Skamil} 25321.1Skamil 25331.1SkamilATF_TC_BODY(write_d1, tc) 25341.1Skamil{ 25351.1Skamil const int exitval = 5; 25361.1Skamil const int sigval = SIGSTOP; 25371.1Skamil pid_t child, wpid; 25381.1Skamil int lookup_me = 0; 25391.1Skamil const int magic = (int)random(); 25401.1Skamil#if defined(TWAIT_HAVE_STATUS) 25411.1Skamil int status; 25421.1Skamil#endif 25431.1Skamil 25441.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 25451.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 25461.1Skamil if (child == 0) { 25471.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 25481.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 25491.1Skamil 25501.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 25511.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 25521.1Skamil 25531.1Skamil FORKEE_ASSERT_EQ(lookup_me, magic); 25541.1Skamil 25551.13Schristos DPRINTF("Before exiting of the child process\n"); 25561.1Skamil _exit(exitval); 25571.1Skamil } 25581.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 25591.1Skamil 25601.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 25611.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 25621.1Skamil 25631.1Skamil validate_status_stopped(status, sigval); 25641.1Skamil 25651.13Schristos DPRINTF("Write new lookup_me to tracee (PID=%d) from tracer (PID=%d)\n", 25661.1Skamil child, getpid()); 25671.13Schristos SYSCALL_REQUIRE(ptrace(PT_WRITE_D, child, &lookup_me, magic) != -1); 25681.1Skamil 25691.13Schristos DPRINTF("Before resuming the child process where it left off and " 25701.1Skamil "without signal to be sent\n"); 25711.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 25721.1Skamil 25731.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 25741.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 25751.1Skamil 25761.1Skamil validate_status_exited(status, exitval); 25771.1Skamil 25781.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 25791.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 25801.1Skamil} 25811.1Skamil 25821.1SkamilATF_TC(write_d2); 25831.1SkamilATF_TC_HEAD(write_d2, tc) 25841.1Skamil{ 25851.1Skamil atf_tc_set_md_var(tc, "descr", 25861.1Skamil "Verify PT_WRITE_D called twice"); 25871.1Skamil} 25881.1Skamil 25891.1SkamilATF_TC_BODY(write_d2, tc) 25901.1Skamil{ 25911.1Skamil const int exitval = 5; 25921.1Skamil const int sigval = SIGSTOP; 25931.1Skamil pid_t child, wpid; 25941.1Skamil int lookup_me1 = 0; 25951.1Skamil int lookup_me2 = 0; 25961.1Skamil const int magic1 = (int)random(); 25971.1Skamil const int magic2 = (int)random(); 25981.1Skamil#if defined(TWAIT_HAVE_STATUS) 25991.1Skamil int status; 26001.1Skamil#endif 26011.1Skamil 26021.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 26031.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 26041.1Skamil if (child == 0) { 26051.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 26061.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 26071.1Skamil 26081.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 26091.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 26101.1Skamil 26111.1Skamil FORKEE_ASSERT_EQ(lookup_me1, magic1); 26121.1Skamil FORKEE_ASSERT_EQ(lookup_me2, magic2); 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("Write new lookup_me1 to tracee (PID=%d) from tracer (PID=%d)\n", 26251.1Skamil child, getpid()); 26261.13Schristos SYSCALL_REQUIRE(ptrace(PT_WRITE_D, child, &lookup_me1, magic1) != -1); 26271.1Skamil 26281.13Schristos DPRINTF("Write new lookup_me2 to tracee (PID=%d) from tracer (PID=%d)\n", 26291.1Skamil child, getpid()); 26301.13Schristos SYSCALL_REQUIRE(ptrace(PT_WRITE_D, child, &lookup_me2, magic2) != -1); 26311.1Skamil 26321.13Schristos DPRINTF("Before resuming the child process where it left off and " 26331.1Skamil "without signal to be sent\n"); 26341.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 26351.1Skamil 26361.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 26371.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 26381.1Skamil 26391.1Skamil validate_status_exited(status, exitval); 26401.1Skamil 26411.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 26421.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 26431.1Skamil} 26441.1Skamil 26451.1SkamilATF_TC(write_d3); 26461.1SkamilATF_TC_HEAD(write_d3, tc) 26471.1Skamil{ 26481.1Skamil atf_tc_set_md_var(tc, "descr", 26491.1Skamil "Verify PT_WRITE_D called three times"); 26501.1Skamil} 26511.1Skamil 26521.1SkamilATF_TC_BODY(write_d3, tc) 26531.1Skamil{ 26541.1Skamil const int exitval = 5; 26551.1Skamil const int sigval = SIGSTOP; 26561.1Skamil pid_t child, wpid; 26571.1Skamil int lookup_me1 = 0; 26581.1Skamil int lookup_me2 = 0; 26591.1Skamil int lookup_me3 = 0; 26601.1Skamil const int magic1 = (int)random(); 26611.1Skamil const int magic2 = (int)random(); 26621.1Skamil const int magic3 = (int)random(); 26631.1Skamil#if defined(TWAIT_HAVE_STATUS) 26641.1Skamil int status; 26651.1Skamil#endif 26661.1Skamil 26671.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 26681.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 26691.1Skamil if (child == 0) { 26701.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 26711.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 26721.1Skamil 26731.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 26741.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 26751.1Skamil 26761.1Skamil FORKEE_ASSERT_EQ(lookup_me1, magic1); 26771.1Skamil FORKEE_ASSERT_EQ(lookup_me2, magic2); 26781.1Skamil FORKEE_ASSERT_EQ(lookup_me3, magic3); 26791.1Skamil 26801.13Schristos DPRINTF("Before exiting of the child process\n"); 26811.1Skamil _exit(exitval); 26821.1Skamil } 26831.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 26841.1Skamil 26851.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 26861.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 26871.1Skamil 26881.1Skamil validate_status_stopped(status, sigval); 26891.1Skamil 26901.13Schristos DPRINTF("Write new lookup_me1 to tracee (PID=%d) from tracer (PID=%d)\n", 26911.1Skamil child, getpid()); 26921.13Schristos SYSCALL_REQUIRE(ptrace(PT_WRITE_D, child, &lookup_me1, magic1) != -1); 26931.1Skamil 26941.13Schristos DPRINTF("Write new lookup_me2 to tracee (PID=%d) from tracer (PID=%d)\n", 26951.1Skamil child, getpid()); 26961.13Schristos SYSCALL_REQUIRE(ptrace(PT_WRITE_D, child, &lookup_me2, magic2) != -1); 26971.1Skamil 26981.13Schristos DPRINTF("Write new lookup_me3 to tracee (PID=%d) from tracer (PID=%d)\n", 26991.1Skamil child, getpid()); 27001.13Schristos SYSCALL_REQUIRE(ptrace(PT_WRITE_D, child, &lookup_me3, magic3) != -1); 27011.1Skamil 27021.13Schristos DPRINTF("Before resuming the child process where it left off and " 27031.1Skamil "without signal to be sent\n"); 27041.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 27051.1Skamil 27061.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 27071.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 27081.1Skamil 27091.1Skamil validate_status_exited(status, exitval); 27101.1Skamil 27111.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 27121.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 27131.1Skamil} 27141.1Skamil 27151.1SkamilATF_TC(write_d4); 27161.1SkamilATF_TC_HEAD(write_d4, tc) 27171.1Skamil{ 27181.1Skamil atf_tc_set_md_var(tc, "descr", 27191.1Skamil "Verify PT_WRITE_D called four times"); 27201.1Skamil} 27211.1Skamil 27221.1SkamilATF_TC_BODY(write_d4, tc) 27231.1Skamil{ 27241.1Skamil const int exitval = 5; 27251.1Skamil const int sigval = SIGSTOP; 27261.1Skamil pid_t child, wpid; 27271.1Skamil int lookup_me1 = 0; 27281.1Skamil int lookup_me2 = 0; 27291.1Skamil int lookup_me3 = 0; 27301.1Skamil int lookup_me4 = 0; 27311.1Skamil const int magic1 = (int)random(); 27321.1Skamil const int magic2 = (int)random(); 27331.1Skamil const int magic3 = (int)random(); 27341.1Skamil const int magic4 = (int)random(); 27351.1Skamil#if defined(TWAIT_HAVE_STATUS) 27361.1Skamil int status; 27371.1Skamil#endif 27381.1Skamil 27391.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 27401.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 27411.1Skamil if (child == 0) { 27421.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 27431.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 27441.1Skamil 27451.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 27461.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 27471.1Skamil 27481.1Skamil FORKEE_ASSERT_EQ(lookup_me1, magic1); 27491.1Skamil FORKEE_ASSERT_EQ(lookup_me2, magic2); 27501.1Skamil FORKEE_ASSERT_EQ(lookup_me3, magic3); 27511.1Skamil FORKEE_ASSERT_EQ(lookup_me4, magic4); 27521.1Skamil 27531.13Schristos DPRINTF("Before exiting of the child process\n"); 27541.1Skamil _exit(exitval); 27551.1Skamil } 27561.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 27571.1Skamil 27581.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 27591.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 27601.1Skamil 27611.1Skamil validate_status_stopped(status, sigval); 27621.1Skamil 27631.13Schristos DPRINTF("Write new lookup_me1 to tracee (PID=%d) from tracer (PID=%d)\n", 27641.1Skamil child, getpid()); 27651.13Schristos SYSCALL_REQUIRE(ptrace(PT_WRITE_D, child, &lookup_me1, magic1) != -1); 27661.1Skamil 27671.13Schristos DPRINTF("Write new lookup_me2 to tracee (PID=%d) from tracer (PID=%d)\n", 27681.1Skamil child, getpid()); 27691.13Schristos SYSCALL_REQUIRE(ptrace(PT_WRITE_D, child, &lookup_me2, magic2) != -1); 27701.1Skamil 27711.13Schristos DPRINTF("Write new lookup_me3 to tracee (PID=%d) from tracer (PID=%d)\n", 27721.1Skamil child, getpid()); 27731.13Schristos SYSCALL_REQUIRE(ptrace(PT_WRITE_D, child, &lookup_me3, magic3) != -1); 27741.1Skamil 27751.13Schristos DPRINTF("Write new lookup_me4 to tracee (PID=%d) from tracer (PID=%d)\n", 27761.1Skamil child, getpid()); 27771.13Schristos SYSCALL_REQUIRE(ptrace(PT_WRITE_D, child, &lookup_me4, magic4) != -1); 27781.1Skamil 27791.13Schristos DPRINTF("Before resuming the child process where it left off and " 27801.1Skamil "without signal to be sent\n"); 27811.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 27821.1Skamil 27831.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 27841.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 27851.1Skamil 27861.1Skamil validate_status_exited(status, exitval); 27871.1Skamil 27881.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 27891.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 27901.1Skamil} 27911.1Skamil 27921.1SkamilATF_TC(io_read_d_write_d_handshake1); 27931.1SkamilATF_TC_HEAD(io_read_d_write_d_handshake1, tc) 27941.1Skamil{ 27951.1Skamil atf_tc_set_md_var(tc, "descr", 27961.1Skamil "Verify PT_IO with PIOD_READ_D and PIOD_WRITE_D handshake"); 27971.1Skamil} 27981.1Skamil 27991.1SkamilATF_TC_BODY(io_read_d_write_d_handshake1, tc) 28001.1Skamil{ 28011.1Skamil const int exitval = 5; 28021.1Skamil const int sigval = SIGSTOP; 28031.1Skamil pid_t child, wpid; 28041.1Skamil uint8_t lookup_me_fromtracee = 0; 28051.1Skamil const uint8_t magic_fromtracee = (uint8_t)random(); 28061.1Skamil uint8_t lookup_me_totracee = 0; 28071.1Skamil const uint8_t magic_totracee = (uint8_t)random(); 28081.1Skamil struct ptrace_io_desc io_fromtracee = { 28091.1Skamil .piod_op = PIOD_READ_D, 28101.1Skamil .piod_offs = &lookup_me_fromtracee, 28111.1Skamil .piod_addr = &lookup_me_fromtracee, 28121.1Skamil .piod_len = sizeof(lookup_me_fromtracee) 28131.1Skamil }; 28141.1Skamil struct ptrace_io_desc io_totracee = { 28151.1Skamil .piod_op = PIOD_WRITE_D, 28161.1Skamil .piod_offs = &lookup_me_totracee, 28171.1Skamil .piod_addr = &lookup_me_totracee, 28181.1Skamil .piod_len = sizeof(lookup_me_totracee) 28191.1Skamil }; 28201.1Skamil#if defined(TWAIT_HAVE_STATUS) 28211.1Skamil int status; 28221.1Skamil#endif 28231.1Skamil 28241.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 28251.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 28261.1Skamil if (child == 0) { 28271.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 28281.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 28291.1Skamil 28301.1Skamil lookup_me_fromtracee = magic_fromtracee; 28311.1Skamil 28321.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 28331.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 28341.1Skamil 28351.1Skamil FORKEE_ASSERT_EQ(lookup_me_totracee, magic_totracee); 28361.1Skamil 28371.13Schristos DPRINTF("Before exiting of the child process\n"); 28381.1Skamil _exit(exitval); 28391.1Skamil } 28401.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 28411.1Skamil 28421.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 28431.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 28441.1Skamil 28451.1Skamil validate_status_stopped(status, sigval); 28461.1Skamil 28471.13Schristos DPRINTF("Read lookup_me_fromtracee PID=%d by tracer (PID=%d)\n", 28481.1Skamil child, getpid()); 28491.13Schristos SYSCALL_REQUIRE(ptrace(PT_IO, child, &io_fromtracee, 0) != -1); 28501.1Skamil 28511.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me_fromtracee, magic_fromtracee, 28521.1Skamil "got value %" PRIx8 " != expected %" PRIx8, lookup_me_fromtracee, 28531.1Skamil magic_fromtracee); 28541.1Skamil 28551.1Skamil lookup_me_totracee = magic_totracee; 28561.1Skamil 28571.13Schristos DPRINTF("Write lookup_me_totracee to PID=%d by tracer (PID=%d)\n", 28581.1Skamil child, getpid()); 28591.13Schristos SYSCALL_REQUIRE(ptrace(PT_IO, child, &io_totracee, 0) != -1); 28601.1Skamil 28611.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me_totracee, magic_totracee, 28621.1Skamil "got value %" PRIx8 " != expected %" PRIx8, lookup_me_totracee, 28631.1Skamil magic_totracee); 28641.1Skamil 28651.13Schristos DPRINTF("Before resuming the child process where it left off and " 28661.1Skamil "without signal to be sent\n"); 28671.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 28681.1Skamil 28691.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 28701.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 28711.1Skamil 28721.1Skamil validate_status_exited(status, exitval); 28731.1Skamil 28741.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 28751.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 28761.1Skamil} 28771.1Skamil 28781.1SkamilATF_TC(io_read_d_write_d_handshake2); 28791.1SkamilATF_TC_HEAD(io_read_d_write_d_handshake2, tc) 28801.1Skamil{ 28811.1Skamil atf_tc_set_md_var(tc, "descr", 28821.1Skamil "Verify PT_IO with PIOD_WRITE_D and PIOD_READ_D handshake"); 28831.1Skamil} 28841.1Skamil 28851.1SkamilATF_TC_BODY(io_read_d_write_d_handshake2, tc) 28861.1Skamil{ 28871.1Skamil const int exitval = 5; 28881.1Skamil const int sigval = SIGSTOP; 28891.1Skamil pid_t child, wpid; 28901.1Skamil uint8_t lookup_me_fromtracee = 0; 28911.1Skamil const uint8_t magic_fromtracee = (uint8_t)random(); 28921.1Skamil uint8_t lookup_me_totracee = 0; 28931.1Skamil const uint8_t magic_totracee = (uint8_t)random(); 28941.1Skamil struct ptrace_io_desc io_fromtracee = { 28951.1Skamil .piod_op = PIOD_READ_D, 28961.1Skamil .piod_offs = &lookup_me_fromtracee, 28971.1Skamil .piod_addr = &lookup_me_fromtracee, 28981.1Skamil .piod_len = sizeof(lookup_me_fromtracee) 28991.1Skamil }; 29001.1Skamil struct ptrace_io_desc io_totracee = { 29011.1Skamil .piod_op = PIOD_WRITE_D, 29021.1Skamil .piod_offs = &lookup_me_totracee, 29031.1Skamil .piod_addr = &lookup_me_totracee, 29041.1Skamil .piod_len = sizeof(lookup_me_totracee) 29051.1Skamil }; 29061.1Skamil#if defined(TWAIT_HAVE_STATUS) 29071.1Skamil int status; 29081.1Skamil#endif 29091.1Skamil 29101.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 29111.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 29121.1Skamil if (child == 0) { 29131.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 29141.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 29151.1Skamil 29161.1Skamil lookup_me_fromtracee = magic_fromtracee; 29171.1Skamil 29181.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 29191.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 29201.1Skamil 29211.1Skamil FORKEE_ASSERT_EQ(lookup_me_totracee, magic_totracee); 29221.1Skamil 29231.13Schristos DPRINTF("Before exiting of the child process\n"); 29241.1Skamil _exit(exitval); 29251.1Skamil } 29261.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 29271.1Skamil 29281.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 29291.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 29301.1Skamil 29311.1Skamil validate_status_stopped(status, sigval); 29321.1Skamil 29331.1Skamil lookup_me_totracee = magic_totracee; 29341.1Skamil 29351.13Schristos DPRINTF("Write lookup_me_totracee to PID=%d by tracer (PID=%d)\n", 29361.1Skamil child, getpid()); 29371.13Schristos SYSCALL_REQUIRE(ptrace(PT_IO, child, &io_totracee, 0) != -1); 29381.1Skamil 29391.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me_totracee, magic_totracee, 29401.1Skamil "got value %" PRIx8 " != expected %" PRIx8, lookup_me_totracee, 29411.1Skamil magic_totracee); 29421.1Skamil 29431.13Schristos DPRINTF("Read lookup_me_fromtracee PID=%d by tracer (PID=%d)\n", 29441.1Skamil child, getpid()); 29451.13Schristos SYSCALL_REQUIRE(ptrace(PT_IO, child, &io_fromtracee, 0) != -1); 29461.1Skamil 29471.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me_fromtracee, magic_fromtracee, 29481.1Skamil "got value %" PRIx8 " != expected %" PRIx8, lookup_me_fromtracee, 29491.1Skamil magic_fromtracee); 29501.1Skamil 29511.13Schristos DPRINTF("Before resuming the child process where it left off and " 29521.1Skamil "without signal to be sent\n"); 29531.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 29541.1Skamil 29551.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 29561.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 29571.1Skamil 29581.1Skamil validate_status_exited(status, exitval); 29591.1Skamil 29601.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 29611.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 29621.1Skamil} 29631.1Skamil 29641.1SkamilATF_TC(read_d_write_d_handshake1); 29651.1SkamilATF_TC_HEAD(read_d_write_d_handshake1, tc) 29661.1Skamil{ 29671.1Skamil atf_tc_set_md_var(tc, "descr", 29681.1Skamil "Verify PT_READ_D with PT_WRITE_D handshake"); 29691.1Skamil} 29701.1Skamil 29711.1SkamilATF_TC_BODY(read_d_write_d_handshake1, tc) 29721.1Skamil{ 29731.1Skamil const int exitval = 5; 29741.1Skamil const int sigval = SIGSTOP; 29751.1Skamil pid_t child, wpid; 29761.1Skamil int lookup_me_fromtracee = 0; 29771.1Skamil const int magic_fromtracee = (int)random(); 29781.1Skamil int lookup_me_totracee = 0; 29791.1Skamil const int magic_totracee = (int)random(); 29801.1Skamil#if defined(TWAIT_HAVE_STATUS) 29811.1Skamil int status; 29821.1Skamil#endif 29831.1Skamil 29841.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 29851.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 29861.1Skamil if (child == 0) { 29871.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 29881.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 29891.1Skamil 29901.1Skamil lookup_me_fromtracee = magic_fromtracee; 29911.1Skamil 29921.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 29931.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 29941.1Skamil 29951.1Skamil FORKEE_ASSERT_EQ(lookup_me_totracee, magic_totracee); 29961.1Skamil 29971.13Schristos DPRINTF("Before exiting of the child process\n"); 29981.1Skamil _exit(exitval); 29991.1Skamil } 30001.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 30011.1Skamil 30021.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 30031.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 30041.1Skamil 30051.1Skamil validate_status_stopped(status, sigval); 30061.1Skamil 30071.13Schristos DPRINTF("Read new lookup_me_fromtracee PID=%d by tracer (PID=%d)\n", 30081.1Skamil child, getpid()); 30091.1Skamil errno = 0; 30101.1Skamil lookup_me_fromtracee = 30111.1Skamil ptrace(PT_READ_D, child, &lookup_me_fromtracee, 0); 30121.18Schristos SYSCALL_REQUIRE_ERRNO(errno, 0); 30131.1Skamil 30141.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me_fromtracee, magic_fromtracee, 30151.1Skamil "got value %#x != expected %#x", lookup_me_fromtracee, 30161.1Skamil magic_fromtracee); 30171.1Skamil 30181.13Schristos DPRINTF("Write new lookup_me_totracee to PID=%d from tracer (PID=%d)\n", 30191.1Skamil child, getpid()); 30201.1Skamil ATF_REQUIRE 30211.1Skamil (ptrace(PT_WRITE_D, child, &lookup_me_totracee, magic_totracee) 30221.1Skamil != -1); 30231.1Skamil 30241.13Schristos DPRINTF("Before resuming the child process where it left off and " 30251.1Skamil "without signal to be sent\n"); 30261.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 30271.1Skamil 30281.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 30291.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 30301.1Skamil 30311.1Skamil validate_status_exited(status, exitval); 30321.1Skamil 30331.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 30341.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 30351.1Skamil} 30361.1Skamil 30371.1SkamilATF_TC(read_d_write_d_handshake2); 30381.1SkamilATF_TC_HEAD(read_d_write_d_handshake2, tc) 30391.1Skamil{ 30401.1Skamil atf_tc_set_md_var(tc, "descr", 30411.1Skamil "Verify PT_WRITE_D with PT_READ_D handshake"); 30421.1Skamil} 30431.1Skamil 30441.1SkamilATF_TC_BODY(read_d_write_d_handshake2, tc) 30451.1Skamil{ 30461.1Skamil const int exitval = 5; 30471.1Skamil const int sigval = SIGSTOP; 30481.1Skamil pid_t child, wpid; 30491.1Skamil int lookup_me_fromtracee = 0; 30501.1Skamil const int magic_fromtracee = (int)random(); 30511.1Skamil int lookup_me_totracee = 0; 30521.1Skamil const int magic_totracee = (int)random(); 30531.1Skamil#if defined(TWAIT_HAVE_STATUS) 30541.1Skamil int status; 30551.1Skamil#endif 30561.1Skamil 30571.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 30581.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 30591.1Skamil if (child == 0) { 30601.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 30611.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 30621.1Skamil 30631.1Skamil lookup_me_fromtracee = magic_fromtracee; 30641.1Skamil 30651.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 30661.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 30671.1Skamil 30681.1Skamil FORKEE_ASSERT_EQ(lookup_me_totracee, magic_totracee); 30691.1Skamil 30701.13Schristos DPRINTF("Before exiting of the child process\n"); 30711.1Skamil _exit(exitval); 30721.1Skamil } 30731.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 30741.1Skamil 30751.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 30761.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 30771.1Skamil 30781.1Skamil validate_status_stopped(status, sigval); 30791.1Skamil 30801.13Schristos DPRINTF("Write new lookup_me_totracee to PID=%d from tracer (PID=%d)\n", 30811.1Skamil child, getpid()); 30821.1Skamil ATF_REQUIRE 30831.1Skamil (ptrace(PT_WRITE_D, child, &lookup_me_totracee, magic_totracee) 30841.1Skamil != -1); 30851.1Skamil 30861.13Schristos DPRINTF("Read new lookup_me_fromtracee PID=%d by tracer (PID=%d)\n", 30871.1Skamil child, getpid()); 30881.1Skamil errno = 0; 30891.1Skamil lookup_me_fromtracee = 30901.1Skamil ptrace(PT_READ_D, child, &lookup_me_fromtracee, 0); 30911.18Schristos SYSCALL_REQUIRE_ERRNO(errno, 0); 30921.1Skamil 30931.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me_fromtracee, magic_fromtracee, 30941.1Skamil "got value %#x != expected %#x", lookup_me_fromtracee, 30951.1Skamil magic_fromtracee); 30961.1Skamil 30971.13Schristos DPRINTF("Before resuming the child process where it left off and " 30981.1Skamil "without signal to be sent\n"); 30991.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 31001.1Skamil 31011.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 31021.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 31031.1Skamil 31041.1Skamil validate_status_exited(status, exitval); 31051.1Skamil 31061.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 31071.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 31081.1Skamil} 31091.1Skamil 31101.1Skamil/* These dummy functions are used to be copied with ptrace(2) calls */ 31111.1Skamilstatic int __used 31121.1Skamildummy_fn1(int a, int b, int c, int d) 31131.1Skamil{ 31141.1Skamil 31151.1Skamil a *= 1; 31161.1Skamil b += 2; 31171.1Skamil c -= 3; 31181.1Skamil d /= 4; 31191.1Skamil 31201.1Skamil return a + b * c - d; 31211.1Skamil} 31221.1Skamil 31231.1Skamilstatic int __used 31241.1Skamildummy_fn2(int a, int b, int c, int d) 31251.1Skamil{ 31261.1Skamil 31271.1Skamil a *= 4; 31281.1Skamil b += 3; 31291.1Skamil c -= 2; 31301.1Skamil d /= 1; 31311.1Skamil 31321.1Skamil return a + b * c - d; 31331.1Skamil} 31341.1Skamil 31351.1Skamilstatic int __used 31361.1Skamildummy_fn3(int a, int b, int c, int d) 31371.1Skamil{ 31381.1Skamil 31391.1Skamil a *= 10; 31401.1Skamil b += 20; 31411.1Skamil c -= 30; 31421.1Skamil d /= 40; 31431.1Skamil 31441.1Skamil return a + b * c - d; 31451.1Skamil} 31461.1Skamil 31471.1Skamilstatic int __used 31481.1Skamildummy_fn4(int a, int b, int c, int d) 31491.1Skamil{ 31501.1Skamil 31511.1Skamil a *= 40; 31521.1Skamil b += 30; 31531.1Skamil c -= 20; 31541.1Skamil d /= 10; 31551.1Skamil 31561.1Skamil return a + b * c - d; 31571.1Skamil} 31581.1Skamil 31591.1SkamilATF_TC(io_read_i1); 31601.1SkamilATF_TC_HEAD(io_read_i1, tc) 31611.1Skamil{ 31621.1Skamil atf_tc_set_md_var(tc, "descr", 31631.1Skamil "Verify PT_IO with PIOD_READ_I and len = sizeof(uint8_t)"); 31641.1Skamil} 31651.1Skamil 31661.1SkamilATF_TC_BODY(io_read_i1, tc) 31671.1Skamil{ 31681.1Skamil const int exitval = 5; 31691.1Skamil const int sigval = SIGSTOP; 31701.1Skamil pid_t child, wpid; 31711.1Skamil uint8_t lookup_me = 0; 31721.1Skamil uint8_t magic; 31731.1Skamil memcpy(&magic, dummy_fn1, sizeof(magic)); 31741.1Skamil struct ptrace_io_desc io = { 31751.1Skamil .piod_op = PIOD_READ_I, 31761.1Skamil .piod_offs = dummy_fn1, 31771.1Skamil .piod_addr = &lookup_me, 31781.1Skamil .piod_len = sizeof(lookup_me) 31791.1Skamil }; 31801.1Skamil#if defined(TWAIT_HAVE_STATUS) 31811.1Skamil int status; 31821.1Skamil#endif 31831.1Skamil 31841.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 31851.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 31861.1Skamil if (child == 0) { 31871.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 31881.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 31891.1Skamil 31901.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 31911.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 31921.1Skamil 31931.13Schristos DPRINTF("Before exiting of the child process\n"); 31941.1Skamil _exit(exitval); 31951.1Skamil } 31961.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 31971.1Skamil 31981.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 31991.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 32001.1Skamil 32011.1Skamil validate_status_stopped(status, sigval); 32021.1Skamil 32031.13Schristos DPRINTF("Read lookup_me from tracee (PID=%d) by tracer (PID=%d)\n", 32041.1Skamil child, getpid()); 32051.13Schristos SYSCALL_REQUIRE(ptrace(PT_IO, child, &io, 0) != -1); 32061.1Skamil 32071.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me, magic, 32081.1Skamil "got value %" PRIx8 " != expected %" PRIx8, lookup_me, magic); 32091.1Skamil 32101.13Schristos DPRINTF("Before resuming the child process where it left off and " 32111.1Skamil "without signal to be sent\n"); 32121.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 32131.1Skamil 32141.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 32151.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 32161.1Skamil 32171.1Skamil validate_status_exited(status, exitval); 32181.1Skamil 32191.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 32201.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 32211.1Skamil} 32221.1Skamil 32231.1SkamilATF_TC(io_read_i2); 32241.1SkamilATF_TC_HEAD(io_read_i2, tc) 32251.1Skamil{ 32261.1Skamil atf_tc_set_md_var(tc, "descr", 32271.1Skamil "Verify PT_IO with PIOD_READ_I and len = sizeof(uint16_t)"); 32281.1Skamil} 32291.1Skamil 32301.1SkamilATF_TC_BODY(io_read_i2, tc) 32311.1Skamil{ 32321.1Skamil const int exitval = 5; 32331.1Skamil const int sigval = SIGSTOP; 32341.1Skamil pid_t child, wpid; 32351.1Skamil uint16_t lookup_me = 0; 32361.1Skamil uint16_t magic; 32371.1Skamil memcpy(&magic, dummy_fn1, sizeof(magic)); 32381.1Skamil struct ptrace_io_desc io = { 32391.1Skamil .piod_op = PIOD_READ_I, 32401.1Skamil .piod_offs = dummy_fn1, 32411.1Skamil .piod_addr = &lookup_me, 32421.1Skamil .piod_len = sizeof(lookup_me) 32431.1Skamil }; 32441.1Skamil#if defined(TWAIT_HAVE_STATUS) 32451.1Skamil int status; 32461.1Skamil#endif 32471.1Skamil 32481.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 32491.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 32501.1Skamil if (child == 0) { 32511.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 32521.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 32531.1Skamil 32541.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 32551.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 32561.1Skamil 32571.13Schristos DPRINTF("Before exiting of the child process\n"); 32581.1Skamil _exit(exitval); 32591.1Skamil } 32601.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 32611.1Skamil 32621.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 32631.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 32641.1Skamil 32651.1Skamil validate_status_stopped(status, sigval); 32661.1Skamil 32671.13Schristos DPRINTF("Read lookup_me from tracee (PID=%d) by tracer (PID=%d)\n", 32681.1Skamil child, getpid()); 32691.13Schristos SYSCALL_REQUIRE(ptrace(PT_IO, child, &io, 0) != -1); 32701.1Skamil 32711.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me, magic, 32721.1Skamil "got value %" PRIx16 " != expected %" PRIx16, lookup_me, magic); 32731.1Skamil 32741.13Schristos DPRINTF("Before resuming the child process where it left off and " 32751.1Skamil "without signal to be sent\n"); 32761.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 32771.1Skamil 32781.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 32791.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 32801.1Skamil 32811.1Skamil validate_status_exited(status, exitval); 32821.1Skamil 32831.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 32841.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 32851.1Skamil} 32861.1Skamil 32871.1SkamilATF_TC(io_read_i3); 32881.1SkamilATF_TC_HEAD(io_read_i3, tc) 32891.1Skamil{ 32901.1Skamil atf_tc_set_md_var(tc, "descr", 32911.1Skamil "Verify PT_IO with PIOD_READ_I and len = sizeof(uint32_t)"); 32921.1Skamil} 32931.1Skamil 32941.1SkamilATF_TC_BODY(io_read_i3, tc) 32951.1Skamil{ 32961.1Skamil const int exitval = 5; 32971.1Skamil const int sigval = SIGSTOP; 32981.1Skamil pid_t child, wpid; 32991.1Skamil uint32_t lookup_me = 0; 33001.1Skamil uint32_t magic; 33011.1Skamil memcpy(&magic, dummy_fn1, sizeof(magic)); 33021.1Skamil struct ptrace_io_desc io = { 33031.1Skamil .piod_op = PIOD_READ_I, 33041.1Skamil .piod_offs = dummy_fn1, 33051.1Skamil .piod_addr = &lookup_me, 33061.1Skamil .piod_len = sizeof(lookup_me) 33071.1Skamil }; 33081.1Skamil#if defined(TWAIT_HAVE_STATUS) 33091.1Skamil int status; 33101.1Skamil#endif 33111.1Skamil 33121.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 33131.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 33141.1Skamil if (child == 0) { 33151.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 33161.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 33171.1Skamil 33181.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 33191.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 33201.1Skamil 33211.13Schristos DPRINTF("Before exiting of the child process\n"); 33221.1Skamil _exit(exitval); 33231.1Skamil } 33241.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 33251.1Skamil 33261.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 33271.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 33281.1Skamil 33291.1Skamil validate_status_stopped(status, sigval); 33301.1Skamil 33311.13Schristos DPRINTF("Read lookup_me from tracee (PID=%d) by tracer (PID=%d)\n", 33321.1Skamil child, getpid()); 33331.13Schristos SYSCALL_REQUIRE(ptrace(PT_IO, child, &io, 0) != -1); 33341.1Skamil 33351.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me, magic, 33361.1Skamil "got value %" PRIx32 " != expected %" PRIx32, lookup_me, magic); 33371.1Skamil 33381.13Schristos DPRINTF("Before resuming the child process where it left off and " 33391.1Skamil "without signal to be sent\n"); 33401.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 33411.1Skamil 33421.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 33431.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 33441.1Skamil 33451.1Skamil validate_status_exited(status, exitval); 33461.1Skamil 33471.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 33481.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 33491.1Skamil} 33501.1Skamil 33511.1SkamilATF_TC(io_read_i4); 33521.1SkamilATF_TC_HEAD(io_read_i4, tc) 33531.1Skamil{ 33541.1Skamil atf_tc_set_md_var(tc, "descr", 33551.1Skamil "Verify PT_IO with PIOD_READ_I and len = sizeof(uint64_t)"); 33561.1Skamil} 33571.1Skamil 33581.1SkamilATF_TC_BODY(io_read_i4, tc) 33591.1Skamil{ 33601.1Skamil const int exitval = 5; 33611.1Skamil const int sigval = SIGSTOP; 33621.1Skamil pid_t child, wpid; 33631.1Skamil uint64_t lookup_me = 0; 33641.1Skamil uint64_t magic; 33651.1Skamil memcpy(&magic, dummy_fn1, sizeof(magic)); 33661.1Skamil struct ptrace_io_desc io = { 33671.1Skamil .piod_op = PIOD_READ_I, 33681.1Skamil .piod_offs = dummy_fn1, 33691.1Skamil .piod_addr = &lookup_me, 33701.1Skamil .piod_len = sizeof(lookup_me) 33711.1Skamil }; 33721.1Skamil#if defined(TWAIT_HAVE_STATUS) 33731.1Skamil int status; 33741.1Skamil#endif 33751.1Skamil 33761.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 33771.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 33781.1Skamil if (child == 0) { 33791.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 33801.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 33811.1Skamil 33821.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 33831.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 33841.1Skamil 33851.13Schristos DPRINTF("Before exiting of the child process\n"); 33861.1Skamil _exit(exitval); 33871.1Skamil } 33881.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 33891.1Skamil 33901.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 33911.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 33921.1Skamil 33931.1Skamil validate_status_stopped(status, sigval); 33941.1Skamil 33951.13Schristos DPRINTF("Read lookup_me from tracee (PID=%d) by tracer (PID=%d)\n", 33961.1Skamil child, getpid()); 33971.13Schristos SYSCALL_REQUIRE(ptrace(PT_IO, child, &io, 0) != -1); 33981.1Skamil 33991.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me, magic, 34001.1Skamil "got value %" PRIx64 " != expected %" PRIx64, lookup_me, magic); 34011.1Skamil 34021.13Schristos DPRINTF("Before resuming the child process where it left off and " 34031.1Skamil "without signal to be sent\n"); 34041.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 34051.1Skamil 34061.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 34071.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 34081.1Skamil 34091.1Skamil validate_status_exited(status, exitval); 34101.1Skamil 34111.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 34121.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 34131.1Skamil} 34141.1Skamil 34151.1SkamilATF_TC(read_i1); 34161.1SkamilATF_TC_HEAD(read_i1, tc) 34171.1Skamil{ 34181.1Skamil atf_tc_set_md_var(tc, "descr", 34191.1Skamil "Verify PT_READ_I called once"); 34201.1Skamil} 34211.1Skamil 34221.1SkamilATF_TC_BODY(read_i1, tc) 34231.1Skamil{ 34241.1Skamil const int exitval = 5; 34251.1Skamil const int sigval = SIGSTOP; 34261.1Skamil pid_t child, wpid; 34271.1Skamil int lookup_me = 0; 34281.1Skamil int magic; 34291.1Skamil memcpy(&magic, dummy_fn1, sizeof(magic)); 34301.1Skamil#if defined(TWAIT_HAVE_STATUS) 34311.1Skamil int status; 34321.1Skamil#endif 34331.1Skamil 34341.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 34351.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 34361.1Skamil if (child == 0) { 34371.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 34381.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 34391.1Skamil 34401.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 34411.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 34421.1Skamil 34431.13Schristos DPRINTF("Before exiting of the child process\n"); 34441.1Skamil _exit(exitval); 34451.1Skamil } 34461.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 34471.1Skamil 34481.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 34491.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 34501.1Skamil 34511.1Skamil validate_status_stopped(status, sigval); 34521.1Skamil 34531.13Schristos DPRINTF("Read new lookup_me from tracee (PID=%d) by tracer (PID=%d)\n", 34541.1Skamil child, getpid()); 34551.1Skamil errno = 0; 34561.1Skamil lookup_me = ptrace(PT_READ_I, child, dummy_fn1, 0); 34571.18Schristos SYSCALL_REQUIRE_ERRNO(errno, 0); 34581.1Skamil 34591.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me, magic, 34601.1Skamil "got value %#x != expected %#x", lookup_me, magic); 34611.1Skamil 34621.13Schristos DPRINTF("Before resuming the child process where it left off and " 34631.1Skamil "without signal to be sent\n"); 34641.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 34651.1Skamil 34661.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 34671.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 34681.1Skamil 34691.1Skamil validate_status_exited(status, exitval); 34701.1Skamil 34711.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 34721.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 34731.1Skamil} 34741.1Skamil 34751.1SkamilATF_TC(read_i2); 34761.1SkamilATF_TC_HEAD(read_i2, tc) 34771.1Skamil{ 34781.1Skamil atf_tc_set_md_var(tc, "descr", 34791.1Skamil "Verify PT_READ_I called twice"); 34801.1Skamil} 34811.1Skamil 34821.1SkamilATF_TC_BODY(read_i2, tc) 34831.1Skamil{ 34841.1Skamil const int exitval = 5; 34851.1Skamil const int sigval = SIGSTOP; 34861.1Skamil pid_t child, wpid; 34871.1Skamil int lookup_me1 = 0; 34881.1Skamil int lookup_me2 = 0; 34891.1Skamil int magic1; 34901.1Skamil int magic2; 34911.1Skamil memcpy(&magic1, dummy_fn1, sizeof(magic1)); 34921.1Skamil memcpy(&magic2, dummy_fn2, sizeof(magic2)); 34931.1Skamil#if defined(TWAIT_HAVE_STATUS) 34941.1Skamil int status; 34951.1Skamil#endif 34961.1Skamil 34971.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 34981.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 34991.1Skamil if (child == 0) { 35001.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 35011.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 35021.1Skamil 35031.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 35041.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 35051.1Skamil 35061.13Schristos DPRINTF("Before exiting of the child process\n"); 35071.1Skamil _exit(exitval); 35081.1Skamil } 35091.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 35101.1Skamil 35111.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 35121.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 35131.1Skamil 35141.1Skamil validate_status_stopped(status, sigval); 35151.1Skamil 35161.13Schristos DPRINTF("Read new lookup_me1 from tracee (PID=%d) by tracer (PID=%d)\n", 35171.1Skamil child, getpid()); 35181.1Skamil errno = 0; 35191.1Skamil lookup_me1 = ptrace(PT_READ_I, child, dummy_fn1, 0); 35201.18Schristos SYSCALL_REQUIRE_ERRNO(errno, 0); 35211.1Skamil 35221.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me1, magic1, 35231.1Skamil "got value %#x != expected %#x", lookup_me1, magic1); 35241.1Skamil 35251.13Schristos DPRINTF("Read new lookup_me2 from tracee (PID=%d) by tracer (PID=%d)\n", 35261.1Skamil child, getpid()); 35271.1Skamil errno = 0; 35281.1Skamil lookup_me2 = ptrace(PT_READ_I, child, dummy_fn2, 0); 35291.18Schristos SYSCALL_REQUIRE_ERRNO(errno, 0); 35301.1Skamil 35311.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me2, magic2, 35321.1Skamil "got value %#x != expected %#x", lookup_me2, magic2); 35331.1Skamil 35341.13Schristos DPRINTF("Before resuming the child process where it left off and " 35351.1Skamil "without signal to be sent\n"); 35361.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 35371.1Skamil 35381.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 35391.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 35401.1Skamil 35411.1Skamil validate_status_exited(status, exitval); 35421.1Skamil 35431.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 35441.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 35451.1Skamil} 35461.1Skamil 35471.1SkamilATF_TC(read_i3); 35481.1SkamilATF_TC_HEAD(read_i3, tc) 35491.1Skamil{ 35501.1Skamil atf_tc_set_md_var(tc, "descr", 35511.1Skamil "Verify PT_READ_I called three times"); 35521.1Skamil} 35531.1Skamil 35541.1SkamilATF_TC_BODY(read_i3, tc) 35551.1Skamil{ 35561.1Skamil const int exitval = 5; 35571.1Skamil const int sigval = SIGSTOP; 35581.1Skamil pid_t child, wpid; 35591.1Skamil int lookup_me1 = 0; 35601.1Skamil int lookup_me2 = 0; 35611.1Skamil int lookup_me3 = 0; 35621.1Skamil int magic1; 35631.1Skamil int magic2; 35641.1Skamil int magic3; 35651.1Skamil memcpy(&magic1, dummy_fn1, sizeof(magic1)); 35661.1Skamil memcpy(&magic2, dummy_fn2, sizeof(magic2)); 35671.1Skamil memcpy(&magic3, dummy_fn3, sizeof(magic3)); 35681.1Skamil#if defined(TWAIT_HAVE_STATUS) 35691.1Skamil int status; 35701.1Skamil#endif 35711.1Skamil 35721.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 35731.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 35741.1Skamil if (child == 0) { 35751.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 35761.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 35771.1Skamil 35781.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 35791.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 35801.1Skamil 35811.13Schristos DPRINTF("Before exiting of the child process\n"); 35821.1Skamil _exit(exitval); 35831.1Skamil } 35841.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 35851.1Skamil 35861.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 35871.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 35881.1Skamil 35891.1Skamil validate_status_stopped(status, sigval); 35901.1Skamil 35911.13Schristos DPRINTF("Read new lookup_me1 from tracee (PID=%d) by tracer (PID=%d)\n", 35921.1Skamil child, getpid()); 35931.1Skamil errno = 0; 35941.1Skamil lookup_me1 = ptrace(PT_READ_I, child, dummy_fn1, 0); 35951.18Schristos SYSCALL_REQUIRE_ERRNO(errno, 0); 35961.1Skamil 35971.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me1, magic1, 35981.1Skamil "got value %#x != expected %#x", lookup_me1, magic1); 35991.1Skamil 36001.13Schristos DPRINTF("Read new lookup_me2 from tracee (PID=%d) by tracer (PID=%d)\n", 36011.1Skamil child, getpid()); 36021.1Skamil errno = 0; 36031.1Skamil lookup_me2 = ptrace(PT_READ_I, child, dummy_fn2, 0); 36041.18Schristos SYSCALL_REQUIRE_ERRNO(errno, 0); 36051.1Skamil 36061.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me2, magic2, 36071.1Skamil "got value %#x != expected %#x", lookup_me2, magic2); 36081.1Skamil 36091.13Schristos DPRINTF("Read new lookup_me3 from tracee (PID=%d) by tracer (PID=%d)\n", 36101.1Skamil child, getpid()); 36111.1Skamil errno = 0; 36121.1Skamil lookup_me3 = ptrace(PT_READ_I, child, dummy_fn3, 0); 36131.18Schristos SYSCALL_REQUIRE_ERRNO(errno, 0); 36141.1Skamil 36151.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me3, magic3, 36161.1Skamil "got value %#x != expected %#x", lookup_me3, magic3); 36171.1Skamil 36181.13Schristos DPRINTF("Before resuming the child process where it left off and " 36191.1Skamil "without signal to be sent\n"); 36201.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 36211.1Skamil 36221.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 36231.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 36241.1Skamil 36251.1Skamil validate_status_exited(status, exitval); 36261.1Skamil 36271.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 36281.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 36291.1Skamil} 36301.1Skamil 36311.1SkamilATF_TC(read_i4); 36321.1SkamilATF_TC_HEAD(read_i4, tc) 36331.1Skamil{ 36341.1Skamil atf_tc_set_md_var(tc, "descr", 36351.1Skamil "Verify PT_READ_I called four times"); 36361.1Skamil} 36371.1Skamil 36381.1SkamilATF_TC_BODY(read_i4, tc) 36391.1Skamil{ 36401.1Skamil const int exitval = 5; 36411.1Skamil const int sigval = SIGSTOP; 36421.1Skamil pid_t child, wpid; 36431.1Skamil int lookup_me1 = 0; 36441.1Skamil int lookup_me2 = 0; 36451.1Skamil int lookup_me3 = 0; 36461.1Skamil int lookup_me4 = 0; 36471.1Skamil int magic1; 36481.1Skamil int magic2; 36491.1Skamil int magic3; 36501.1Skamil int magic4; 36511.1Skamil memcpy(&magic1, dummy_fn1, sizeof(magic1)); 36521.1Skamil memcpy(&magic2, dummy_fn2, sizeof(magic2)); 36531.1Skamil memcpy(&magic3, dummy_fn3, sizeof(magic3)); 36541.1Skamil memcpy(&magic4, dummy_fn4, sizeof(magic4)); 36551.1Skamil#if defined(TWAIT_HAVE_STATUS) 36561.1Skamil int status; 36571.1Skamil#endif 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 raising %s from child\n", strsignal(sigval)); 36661.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 36671.1Skamil 36681.13Schristos DPRINTF("Before exiting of the child process\n"); 36691.1Skamil _exit(exitval); 36701.1Skamil } 36711.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 36721.1Skamil 36731.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 36741.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 36751.1Skamil 36761.1Skamil validate_status_stopped(status, sigval); 36771.1Skamil 36781.13Schristos DPRINTF("Read new lookup_me1 from tracee (PID=%d) by tracer (PID=%d)\n", 36791.1Skamil child, getpid()); 36801.1Skamil errno = 0; 36811.1Skamil lookup_me1 = ptrace(PT_READ_I, child, dummy_fn1, 0); 36821.18Schristos SYSCALL_REQUIRE_ERRNO(errno, 0); 36831.1Skamil 36841.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me1, magic1, 36851.1Skamil "got value %#x != expected %#x", lookup_me1, magic1); 36861.1Skamil 36871.13Schristos DPRINTF("Read new lookup_me2 from tracee (PID=%d) by tracer (PID=%d)\n", 36881.1Skamil child, getpid()); 36891.1Skamil errno = 0; 36901.1Skamil lookup_me2 = ptrace(PT_READ_I, child, dummy_fn2, 0); 36911.18Schristos SYSCALL_REQUIRE_ERRNO(errno, 0); 36921.1Skamil 36931.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me2, magic2, 36941.1Skamil "got value %#x != expected %#x", lookup_me2, magic2); 36951.1Skamil 36961.13Schristos DPRINTF("Read new lookup_me3 from tracee (PID=%d) by tracer (PID=%d)\n", 36971.1Skamil child, getpid()); 36981.1Skamil errno = 0; 36991.1Skamil lookup_me3 = ptrace(PT_READ_I, child, dummy_fn3, 0); 37001.18Schristos SYSCALL_REQUIRE_ERRNO(errno, 0); 37011.1Skamil 37021.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me3, magic3, 37031.1Skamil "got value %#x != expected %#x", lookup_me3, magic3); 37041.1Skamil 37051.13Schristos DPRINTF("Read new lookup_me4 from tracee (PID=%d) by tracer (PID=%d)\n", 37061.1Skamil child, getpid()); 37071.1Skamil errno = 0; 37081.1Skamil lookup_me4 = ptrace(PT_READ_I, child, dummy_fn4, 0); 37091.18Schristos SYSCALL_REQUIRE_ERRNO(errno, 0); 37101.1Skamil 37111.1Skamil ATF_REQUIRE_EQ_MSG(lookup_me4, magic4, 37121.1Skamil "got value %#x != expected %#x", lookup_me4, magic4); 37131.1Skamil 37141.13Schristos DPRINTF("Before resuming the child process where it left off and " 37151.1Skamil "without signal to be sent\n"); 37161.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 37171.1Skamil 37181.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 37191.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 37201.1Skamil 37211.1Skamil validate_status_exited(status, exitval); 37221.1Skamil 37231.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 37241.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 37251.1Skamil} 37261.1Skamil 37271.1Skamil#if defined(HAVE_GPREGS) 37281.1SkamilATF_TC(regs1); 37291.1SkamilATF_TC_HEAD(regs1, tc) 37301.1Skamil{ 37311.1Skamil atf_tc_set_md_var(tc, "descr", 37321.1Skamil "Verify plain PT_GETREGS call without further steps"); 37331.1Skamil} 37341.1Skamil 37351.1SkamilATF_TC_BODY(regs1, tc) 37361.1Skamil{ 37371.1Skamil const int exitval = 5; 37381.1Skamil const int sigval = SIGSTOP; 37391.1Skamil pid_t child, wpid; 37401.1Skamil#if defined(TWAIT_HAVE_STATUS) 37411.1Skamil int status; 37421.1Skamil#endif 37431.1Skamil struct reg r; 37441.1Skamil 37451.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 37461.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 37471.1Skamil if (child == 0) { 37481.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 37491.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 37501.1Skamil 37511.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 37521.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 37531.1Skamil 37541.13Schristos DPRINTF("Before exiting of the child process\n"); 37551.1Skamil _exit(exitval); 37561.1Skamil } 37571.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 37581.1Skamil 37591.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 37601.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 37611.1Skamil 37621.1Skamil validate_status_stopped(status, sigval); 37631.1Skamil 37641.13Schristos DPRINTF("Call GETREGS for the child process\n"); 37651.13Schristos SYSCALL_REQUIRE(ptrace(PT_GETREGS, child, &r, 0) != -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 SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 37701.1Skamil 37711.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 37721.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 37731.1Skamil 37741.1Skamil validate_status_exited(status, exitval); 37751.1Skamil 37761.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 37771.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 37781.1Skamil} 37791.1Skamil#endif 37801.1Skamil 37811.1Skamil#if defined(HAVE_GPREGS) 37821.1SkamilATF_TC(regs2); 37831.1SkamilATF_TC_HEAD(regs2, tc) 37841.1Skamil{ 37851.1Skamil atf_tc_set_md_var(tc, "descr", 37861.1Skamil "Verify plain PT_GETREGS call and retrieve PC"); 37871.1Skamil} 37881.1Skamil 37891.1SkamilATF_TC_BODY(regs2, tc) 37901.1Skamil{ 37911.1Skamil const int exitval = 5; 37921.1Skamil const int sigval = SIGSTOP; 37931.1Skamil pid_t child, wpid; 37941.1Skamil#if defined(TWAIT_HAVE_STATUS) 37951.1Skamil int status; 37961.1Skamil#endif 37971.1Skamil struct reg r; 37981.1Skamil 37991.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 38001.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 38011.1Skamil if (child == 0) { 38021.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 38031.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 38041.1Skamil 38051.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 38061.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 38071.1Skamil 38081.13Schristos DPRINTF("Before exiting of the child process\n"); 38091.1Skamil _exit(exitval); 38101.1Skamil } 38111.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 38121.1Skamil 38131.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 38141.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 38151.1Skamil 38161.1Skamil validate_status_stopped(status, sigval); 38171.1Skamil 38181.13Schristos DPRINTF("Call GETREGS for the child process\n"); 38191.13Schristos SYSCALL_REQUIRE(ptrace(PT_GETREGS, child, &r, 0) != -1); 38201.1Skamil 38211.13Schristos DPRINTF("Retrieved PC=%" PRIxREGISTER "\n", PTRACE_REG_PC(&r)); 38221.1Skamil 38231.13Schristos DPRINTF("Before resuming the child process where it left off and " 38241.1Skamil "without signal to be sent\n"); 38251.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 38261.1Skamil 38271.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 38281.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 38291.1Skamil 38301.1Skamil validate_status_exited(status, exitval); 38311.1Skamil 38321.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 38331.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 38341.1Skamil} 38351.1Skamil#endif 38361.1Skamil 38371.1Skamil#if defined(HAVE_GPREGS) 38381.1SkamilATF_TC(regs3); 38391.1SkamilATF_TC_HEAD(regs3, tc) 38401.1Skamil{ 38411.1Skamil atf_tc_set_md_var(tc, "descr", 38421.1Skamil "Verify plain PT_GETREGS call and retrieve SP"); 38431.1Skamil} 38441.1Skamil 38451.1SkamilATF_TC_BODY(regs3, tc) 38461.1Skamil{ 38471.1Skamil const int exitval = 5; 38481.1Skamil const int sigval = SIGSTOP; 38491.1Skamil pid_t child, wpid; 38501.1Skamil#if defined(TWAIT_HAVE_STATUS) 38511.1Skamil int status; 38521.1Skamil#endif 38531.1Skamil struct reg r; 38541.1Skamil 38551.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 38561.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 38571.1Skamil if (child == 0) { 38581.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 38591.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 38601.1Skamil 38611.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 38621.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 38631.1Skamil 38641.13Schristos DPRINTF("Before exiting of the child process\n"); 38651.1Skamil _exit(exitval); 38661.1Skamil } 38671.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 38681.1Skamil 38691.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 38701.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 38711.1Skamil 38721.1Skamil validate_status_stopped(status, sigval); 38731.1Skamil 38741.13Schristos DPRINTF("Call GETREGS for the child process\n"); 38751.13Schristos SYSCALL_REQUIRE(ptrace(PT_GETREGS, child, &r, 0) != -1); 38761.1Skamil 38771.13Schristos DPRINTF("Retrieved SP=%" PRIxREGISTER "\n", PTRACE_REG_SP(&r)); 38781.1Skamil 38791.13Schristos DPRINTF("Before resuming the child process where it left off and " 38801.1Skamil "without signal to be sent\n"); 38811.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 38821.1Skamil 38831.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 38841.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 38851.1Skamil 38861.1Skamil validate_status_exited(status, exitval); 38871.1Skamil 38881.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 38891.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 38901.1Skamil} 38911.1Skamil#endif 38921.1Skamil 38931.1Skamil#if defined(HAVE_GPREGS) 38941.1SkamilATF_TC(regs4); 38951.1SkamilATF_TC_HEAD(regs4, tc) 38961.1Skamil{ 38971.1Skamil atf_tc_set_md_var(tc, "descr", 38981.1Skamil "Verify plain PT_GETREGS call and retrieve INTRV"); 38991.1Skamil} 39001.1Skamil 39011.1SkamilATF_TC_BODY(regs4, tc) 39021.1Skamil{ 39031.1Skamil const int exitval = 5; 39041.1Skamil const int sigval = SIGSTOP; 39051.1Skamil pid_t child, wpid; 39061.1Skamil#if defined(TWAIT_HAVE_STATUS) 39071.1Skamil int status; 39081.1Skamil#endif 39091.1Skamil struct reg r; 39101.1Skamil 39111.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 39121.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 39131.1Skamil if (child == 0) { 39141.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 39151.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 39161.1Skamil 39171.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 39181.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 39191.1Skamil 39201.13Schristos DPRINTF("Before exiting of the child process\n"); 39211.1Skamil _exit(exitval); 39221.1Skamil } 39231.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 39241.1Skamil 39251.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 39261.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 39271.1Skamil 39281.1Skamil validate_status_stopped(status, sigval); 39291.1Skamil 39301.13Schristos DPRINTF("Call GETREGS for the child process\n"); 39311.13Schristos SYSCALL_REQUIRE(ptrace(PT_GETREGS, child, &r, 0) != -1); 39321.1Skamil 39331.13Schristos DPRINTF("Retrieved INTRV=%" PRIxREGISTER "\n", PTRACE_REG_INTRV(&r)); 39341.1Skamil 39351.13Schristos DPRINTF("Before resuming the child process where it left off and " 39361.1Skamil "without signal to be sent\n"); 39371.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 39381.1Skamil 39391.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 39401.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 39411.1Skamil 39421.1Skamil validate_status_exited(status, exitval); 39431.1Skamil 39441.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 39451.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 39461.1Skamil} 39471.1Skamil#endif 39481.1Skamil 39491.1Skamil#if defined(HAVE_GPREGS) 39501.1SkamilATF_TC(regs5); 39511.1SkamilATF_TC_HEAD(regs5, tc) 39521.1Skamil{ 39531.1Skamil atf_tc_set_md_var(tc, "descr", 39541.1Skamil "Verify PT_GETREGS and PT_SETREGS calls without changing regs"); 39551.1Skamil} 39561.1Skamil 39571.1SkamilATF_TC_BODY(regs5, tc) 39581.1Skamil{ 39591.1Skamil const int exitval = 5; 39601.1Skamil const int sigval = SIGSTOP; 39611.1Skamil pid_t child, wpid; 39621.1Skamil#if defined(TWAIT_HAVE_STATUS) 39631.1Skamil int status; 39641.1Skamil#endif 39651.1Skamil struct reg r; 39661.1Skamil 39671.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 39681.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 39691.1Skamil if (child == 0) { 39701.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 39711.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 39721.1Skamil 39731.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 39741.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 39751.1Skamil 39761.13Schristos DPRINTF("Before exiting of the child process\n"); 39771.1Skamil _exit(exitval); 39781.1Skamil } 39791.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 39801.1Skamil 39811.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 39821.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 39831.1Skamil 39841.1Skamil validate_status_stopped(status, sigval); 39851.1Skamil 39861.13Schristos DPRINTF("Call GETREGS for the child process\n"); 39871.13Schristos SYSCALL_REQUIRE(ptrace(PT_GETREGS, child, &r, 0) != -1); 39881.1Skamil 39891.13Schristos DPRINTF("Call SETREGS for the child process (without changed regs)\n"); 39901.13Schristos SYSCALL_REQUIRE(ptrace(PT_GETREGS, child, &r, 0) != -1); 39911.1Skamil 39921.13Schristos DPRINTF("Before resuming the child process where it left off and " 39931.1Skamil "without signal to be sent\n"); 39941.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 39951.1Skamil 39961.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 39971.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 39981.1Skamil 39991.1Skamil validate_status_exited(status, exitval); 40001.1Skamil 40011.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 40021.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 40031.1Skamil} 40041.1Skamil#endif 40051.1Skamil 40061.1Skamil#if defined(HAVE_FPREGS) 40071.1SkamilATF_TC(fpregs1); 40081.1SkamilATF_TC_HEAD(fpregs1, tc) 40091.1Skamil{ 40101.1Skamil atf_tc_set_md_var(tc, "descr", 40111.1Skamil "Verify plain PT_GETFPREGS call without further steps"); 40121.1Skamil} 40131.1Skamil 40141.1SkamilATF_TC_BODY(fpregs1, tc) 40151.1Skamil{ 40161.1Skamil const int exitval = 5; 40171.1Skamil const int sigval = SIGSTOP; 40181.1Skamil pid_t child, wpid; 40191.1Skamil#if defined(TWAIT_HAVE_STATUS) 40201.1Skamil int status; 40211.1Skamil#endif 40221.1Skamil struct fpreg r; 40231.1Skamil 40241.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 40251.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 40261.1Skamil if (child == 0) { 40271.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 40281.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 40291.1Skamil 40301.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 40311.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 40321.1Skamil 40331.13Schristos DPRINTF("Before exiting of the child process\n"); 40341.1Skamil _exit(exitval); 40351.1Skamil } 40361.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 40371.1Skamil 40381.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 40391.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 40401.1Skamil 40411.1Skamil validate_status_stopped(status, sigval); 40421.1Skamil 40431.13Schristos DPRINTF("Call GETFPREGS for the child process\n"); 40441.13Schristos SYSCALL_REQUIRE(ptrace(PT_GETFPREGS, child, &r, 0) != -1); 40451.1Skamil 40461.13Schristos DPRINTF("Before resuming the child process where it left off and " 40471.1Skamil "without signal to be sent\n"); 40481.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 40491.1Skamil 40501.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 40511.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 40521.1Skamil 40531.1Skamil validate_status_exited(status, exitval); 40541.1Skamil 40551.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 40561.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 40571.1Skamil} 40581.1Skamil#endif 40591.1Skamil 40601.1Skamil#if defined(HAVE_FPREGS) 40611.1SkamilATF_TC(fpregs2); 40621.1SkamilATF_TC_HEAD(fpregs2, tc) 40631.1Skamil{ 40641.1Skamil atf_tc_set_md_var(tc, "descr", 40651.1Skamil "Verify PT_GETFPREGS and PT_SETFPREGS calls without changing " 40661.1Skamil "regs"); 40671.1Skamil} 40681.1Skamil 40691.1SkamilATF_TC_BODY(fpregs2, tc) 40701.1Skamil{ 40711.1Skamil const int exitval = 5; 40721.1Skamil const int sigval = SIGSTOP; 40731.1Skamil pid_t child, wpid; 40741.1Skamil#if defined(TWAIT_HAVE_STATUS) 40751.1Skamil int status; 40761.1Skamil#endif 40771.1Skamil struct fpreg r; 40781.1Skamil 40791.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 40801.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 40811.1Skamil if (child == 0) { 40821.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 40831.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 40841.1Skamil 40851.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 40861.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 40871.1Skamil 40881.13Schristos DPRINTF("Before exiting of the child process\n"); 40891.1Skamil _exit(exitval); 40901.1Skamil } 40911.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 40921.1Skamil 40931.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 40941.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 40951.1Skamil 40961.1Skamil validate_status_stopped(status, sigval); 40971.1Skamil 40981.13Schristos DPRINTF("Call GETFPREGS for the child process\n"); 40991.13Schristos SYSCALL_REQUIRE(ptrace(PT_GETFPREGS, child, &r, 0) != -1); 41001.1Skamil 41011.13Schristos DPRINTF("Call SETFPREGS for the child (without changed regs)\n"); 41021.13Schristos SYSCALL_REQUIRE(ptrace(PT_SETFPREGS, child, &r, 0) != -1); 41031.1Skamil 41041.13Schristos DPRINTF("Before resuming the child process where it left off and " 41051.1Skamil "without signal to be sent\n"); 41061.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 41071.1Skamil 41081.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 41091.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 41101.1Skamil 41111.1Skamil validate_status_exited(status, exitval); 41121.1Skamil 41131.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 41141.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 41151.1Skamil} 41161.1Skamil#endif 41171.1Skamil 41181.1Skamil#if defined(PT_STEP) 41191.1Skamilstatic void 41201.2Skamilptrace_step(int N, int setstep) 41211.1Skamil{ 41221.1Skamil const int exitval = 5; 41231.1Skamil const int sigval = SIGSTOP; 41241.1Skamil pid_t child, wpid; 41251.1Skamil#if defined(TWAIT_HAVE_STATUS) 41261.1Skamil int status; 41271.1Skamil#endif 41281.1Skamil int happy; 41291.1Skamil 41301.1Skamil#if defined(__arm__) 41311.1Skamil /* PT_STEP not supported on arm 32-bit */ 41321.1Skamil atf_tc_expect_fail("PR kern/52119"); 41331.1Skamil#endif 41341.1Skamil 41351.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 41361.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 41371.1Skamil if (child == 0) { 41381.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 41391.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 41401.1Skamil 41411.1Skamil happy = check_happy(999); 41421.1Skamil 41431.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 41441.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 41451.1Skamil 41461.1Skamil FORKEE_ASSERT_EQ(happy, check_happy(999)); 41471.1Skamil 41481.13Schristos DPRINTF("Before exiting of the child process\n"); 41491.1Skamil _exit(exitval); 41501.1Skamil } 41511.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 41521.1Skamil 41531.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 41541.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 41551.1Skamil 41561.1Skamil validate_status_stopped(status, sigval); 41571.1Skamil 41581.1Skamil while (N --> 0) { 41591.2Skamil if (setstep) { 41601.13Schristos DPRINTF("Before resuming the child process where it " 41611.2Skamil "left off and without signal to be sent (use " 41621.9Skamil "PT_SETSTEP and PT_CONTINUE)\n"); 41631.13Schristos SYSCALL_REQUIRE(ptrace(PT_SETSTEP, child, 0, 0) != -1); 41641.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) 41651.2Skamil != -1); 41661.2Skamil } else { 41671.13Schristos DPRINTF("Before resuming the child process where it " 41681.2Skamil "left off and without signal to be sent (use " 41691.2Skamil "PT_STEP)\n"); 41701.13Schristos SYSCALL_REQUIRE(ptrace(PT_STEP, child, (void *)1, 0) 41711.2Skamil != -1); 41721.2Skamil } 41731.1Skamil 41741.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 41751.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), 41761.1Skamil child); 41771.1Skamil 41781.1Skamil validate_status_stopped(status, SIGTRAP); 41791.2Skamil 41801.2Skamil if (setstep) { 41811.13Schristos SYSCALL_REQUIRE(ptrace(PT_CLEARSTEP, child, 0, 0) != -1); 41821.2Skamil } 41831.1Skamil } 41841.1Skamil 41851.13Schristos DPRINTF("Before resuming the child process where it left off and " 41861.1Skamil "without signal to be sent\n"); 41871.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 41881.1Skamil 41891.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 41901.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 41911.1Skamil 41921.1Skamil validate_status_exited(status, exitval); 41931.1Skamil 41941.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 41951.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 41961.1Skamil} 41971.1Skamil#endif 41981.1Skamil 41991.1Skamil#if defined(PT_STEP) 42001.1SkamilATF_TC(step1); 42011.1SkamilATF_TC_HEAD(step1, tc) 42021.1Skamil{ 42031.1Skamil atf_tc_set_md_var(tc, "descr", 42041.1Skamil "Verify single PT_STEP call"); 42051.1Skamil} 42061.1Skamil 42071.1SkamilATF_TC_BODY(step1, tc) 42081.1Skamil{ 42091.2Skamil ptrace_step(1, 0); 42101.1Skamil} 42111.1Skamil#endif 42121.1Skamil 42131.1Skamil#if defined(PT_STEP) 42141.1SkamilATF_TC(step2); 42151.1SkamilATF_TC_HEAD(step2, tc) 42161.1Skamil{ 42171.1Skamil atf_tc_set_md_var(tc, "descr", 42181.1Skamil "Verify PT_STEP called twice"); 42191.1Skamil} 42201.1Skamil 42211.1SkamilATF_TC_BODY(step2, tc) 42221.1Skamil{ 42231.2Skamil ptrace_step(2, 0); 42241.1Skamil} 42251.1Skamil#endif 42261.1Skamil 42271.1Skamil#if defined(PT_STEP) 42281.1SkamilATF_TC(step3); 42291.1SkamilATF_TC_HEAD(step3, tc) 42301.1Skamil{ 42311.1Skamil atf_tc_set_md_var(tc, "descr", 42321.1Skamil "Verify PT_STEP called three times"); 42331.1Skamil} 42341.1Skamil 42351.1SkamilATF_TC_BODY(step3, tc) 42361.1Skamil{ 42371.2Skamil ptrace_step(3, 0); 42381.1Skamil} 42391.1Skamil#endif 42401.1Skamil 42411.1Skamil#if defined(PT_STEP) 42421.1SkamilATF_TC(step4); 42431.1SkamilATF_TC_HEAD(step4, tc) 42441.1Skamil{ 42451.1Skamil atf_tc_set_md_var(tc, "descr", 42461.1Skamil "Verify PT_STEP called four times"); 42471.1Skamil} 42481.1Skamil 42491.1SkamilATF_TC_BODY(step4, tc) 42501.1Skamil{ 42511.2Skamil ptrace_step(4, 0); 42521.2Skamil} 42531.2Skamil#endif 42541.2Skamil 42551.2Skamil#if defined(PT_STEP) 42561.2SkamilATF_TC(setstep1); 42571.2SkamilATF_TC_HEAD(setstep1, tc) 42581.2Skamil{ 42591.2Skamil atf_tc_set_md_var(tc, "descr", 42601.2Skamil "Verify single PT_SETSTEP call"); 42611.2Skamil} 42621.2Skamil 42631.2SkamilATF_TC_BODY(setstep1, tc) 42641.2Skamil{ 42651.2Skamil ptrace_step(1, 1); 42661.2Skamil} 42671.2Skamil#endif 42681.2Skamil 42691.2Skamil#if defined(PT_STEP) 42701.2SkamilATF_TC(setstep2); 42711.2SkamilATF_TC_HEAD(setstep2, tc) 42721.2Skamil{ 42731.2Skamil atf_tc_set_md_var(tc, "descr", 42741.2Skamil "Verify PT_SETSTEP called twice"); 42751.2Skamil} 42761.2Skamil 42771.2SkamilATF_TC_BODY(setstep2, tc) 42781.2Skamil{ 42791.2Skamil ptrace_step(2, 1); 42801.2Skamil} 42811.2Skamil#endif 42821.2Skamil 42831.2Skamil#if defined(PT_STEP) 42841.2SkamilATF_TC(setstep3); 42851.2SkamilATF_TC_HEAD(setstep3, tc) 42861.2Skamil{ 42871.2Skamil atf_tc_set_md_var(tc, "descr", 42881.2Skamil "Verify PT_SETSTEP called three times"); 42891.2Skamil} 42901.2Skamil 42911.2SkamilATF_TC_BODY(setstep3, tc) 42921.2Skamil{ 42931.2Skamil ptrace_step(3, 1); 42941.2Skamil} 42951.2Skamil#endif 42961.2Skamil 42971.2Skamil#if defined(PT_STEP) 42981.2SkamilATF_TC(setstep4); 42991.2SkamilATF_TC_HEAD(setstep4, tc) 43001.2Skamil{ 43011.2Skamil atf_tc_set_md_var(tc, "descr", 43021.2Skamil "Verify PT_SETSTEP called four times"); 43031.2Skamil} 43041.2Skamil 43051.2SkamilATF_TC_BODY(setstep4, tc) 43061.2Skamil{ 43071.2Skamil ptrace_step(4, 1); 43081.1Skamil} 43091.1Skamil#endif 43101.1Skamil 43111.1SkamilATF_TC(kill1); 43121.1SkamilATF_TC_HEAD(kill1, tc) 43131.1Skamil{ 43141.1Skamil atf_tc_set_md_var(tc, "descr", 43151.1Skamil "Verify that PT_CONTINUE with SIGKILL terminates child"); 43161.1Skamil} 43171.1Skamil 43181.1SkamilATF_TC_BODY(kill1, tc) 43191.1Skamil{ 43201.1Skamil const int sigval = SIGSTOP, sigsent = SIGKILL; 43211.1Skamil pid_t child, wpid; 43221.1Skamil#if defined(TWAIT_HAVE_STATUS) 43231.1Skamil int status; 43241.1Skamil#endif 43251.1Skamil 43261.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 43271.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 43281.1Skamil if (child == 0) { 43291.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 43301.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 43311.1Skamil 43321.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 43331.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 43341.1Skamil 43351.1Skamil /* NOTREACHED */ 43361.1Skamil FORKEE_ASSERTX(0 && 43371.1Skamil "Child should be terminated by a signal from its parent"); 43381.1Skamil } 43391.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 43401.1Skamil 43411.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 43421.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 43431.1Skamil 43441.1Skamil validate_status_stopped(status, sigval); 43451.1Skamil 43461.13Schristos DPRINTF("Before resuming the child process where it left off and " 43471.1Skamil "without signal to be sent\n"); 43481.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, sigsent) != -1); 43491.1Skamil 43501.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 43511.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 43521.1Skamil 43531.1Skamil validate_status_signaled(status, sigsent, 0); 43541.1Skamil 43551.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 43561.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 43571.1Skamil} 43581.1Skamil 43591.1SkamilATF_TC(kill2); 43601.1SkamilATF_TC_HEAD(kill2, tc) 43611.1Skamil{ 43621.1Skamil atf_tc_set_md_var(tc, "descr", 43631.1Skamil "Verify that PT_KILL terminates child"); 43641.1Skamil} 43651.1Skamil 43661.1SkamilATF_TC_BODY(kill2, tc) 43671.1Skamil{ 43681.1Skamil const int sigval = SIGSTOP; 43691.1Skamil pid_t child, wpid; 43701.1Skamil#if defined(TWAIT_HAVE_STATUS) 43711.1Skamil int status; 43721.1Skamil#endif 43731.1Skamil 43741.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 43751.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 43761.1Skamil if (child == 0) { 43771.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 43781.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 43791.1Skamil 43801.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 43811.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 43821.1Skamil 43831.1Skamil /* NOTREACHED */ 43841.1Skamil FORKEE_ASSERTX(0 && 43851.1Skamil "Child should be terminated by a signal from its parent"); 43861.1Skamil } 43871.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 43881.1Skamil 43891.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 43901.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 43911.1Skamil 43921.1Skamil validate_status_stopped(status, sigval); 43931.1Skamil 43941.13Schristos DPRINTF("Before resuming the child process where it left off and " 43951.1Skamil "without signal to be sent\n"); 43961.13Schristos SYSCALL_REQUIRE(ptrace(PT_KILL, child, (void*)1, 0) != -1); 43971.1Skamil 43981.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 43991.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 44001.1Skamil 44011.1Skamil validate_status_signaled(status, SIGKILL, 0); 44021.1Skamil 44031.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 44041.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 44051.1Skamil} 44061.1Skamil 44071.1SkamilATF_TC(lwpinfo1); 44081.1SkamilATF_TC_HEAD(lwpinfo1, tc) 44091.1Skamil{ 44101.1Skamil atf_tc_set_md_var(tc, "descr", 44111.1Skamil "Verify basic LWPINFO call for single thread (PT_TRACE_ME)"); 44121.1Skamil} 44131.1Skamil 44141.1SkamilATF_TC_BODY(lwpinfo1, tc) 44151.1Skamil{ 44161.1Skamil const int exitval = 5; 44171.1Skamil const int sigval = SIGSTOP; 44181.1Skamil pid_t child, wpid; 44191.1Skamil#if defined(TWAIT_HAVE_STATUS) 44201.1Skamil int status; 44211.1Skamil#endif 44221.1Skamil struct ptrace_lwpinfo info = {0, 0}; 44231.1Skamil 44241.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 44251.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 44261.1Skamil if (child == 0) { 44271.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 44281.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 44291.1Skamil 44301.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 44311.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 44321.1Skamil 44331.13Schristos DPRINTF("Before exiting of the child process\n"); 44341.1Skamil _exit(exitval); 44351.1Skamil } 44361.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 44371.1Skamil 44381.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 44391.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 44401.1Skamil 44411.1Skamil validate_status_stopped(status, sigval); 44421.1Skamil 44431.13Schristos DPRINTF("Before calling ptrace(2) with PT_LWPINFO for child\n"); 44441.13Schristos SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &info, sizeof(info)) != -1); 44451.1Skamil 44461.13Schristos DPRINTF("Assert that there exists a thread\n"); 44471.1Skamil ATF_REQUIRE(info.pl_lwpid > 0); 44481.1Skamil 44491.13Schristos DPRINTF("Assert that lwp thread %d received event PL_EVENT_SIGNAL\n", 44501.1Skamil info.pl_lwpid); 44511.1Skamil ATF_REQUIRE_EQ_MSG(info.pl_event, PL_EVENT_SIGNAL, 44521.1Skamil "Received event %d != expected event %d", 44531.1Skamil info.pl_event, PL_EVENT_SIGNAL); 44541.1Skamil 44551.13Schristos DPRINTF("Before calling ptrace(2) with PT_LWPINFO for child\n"); 44561.13Schristos SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &info, sizeof(info)) != -1); 44571.1Skamil 44581.13Schristos DPRINTF("Assert that there are no more lwp threads in child\n"); 44591.1Skamil ATF_REQUIRE_EQ(info.pl_lwpid, 0); 44601.1Skamil 44611.13Schristos DPRINTF("Before resuming the child process where it left off and " 44621.1Skamil "without signal to be sent\n"); 44631.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 44641.1Skamil 44651.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 44661.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 44671.1Skamil 44681.1Skamil validate_status_exited(status, exitval); 44691.1Skamil 44701.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 44711.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 44721.1Skamil} 44731.1Skamil 44741.1Skamil#if defined(TWAIT_HAVE_PID) 44751.1SkamilATF_TC(lwpinfo2); 44761.1SkamilATF_TC_HEAD(lwpinfo2, tc) 44771.1Skamil{ 44781.1Skamil atf_tc_set_md_var(tc, "descr", 44791.1Skamil "Verify basic LWPINFO call for single thread (PT_ATTACH from " 44801.1Skamil "tracer)"); 44811.1Skamil} 44821.1Skamil 44831.1SkamilATF_TC_BODY(lwpinfo2, tc) 44841.1Skamil{ 44851.1Skamil struct msg_fds parent_tracee, parent_tracer; 44861.1Skamil const int exitval_tracee = 5; 44871.1Skamil const int exitval_tracer = 10; 44881.1Skamil pid_t tracee, tracer, wpid; 44891.1Skamil uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */ 44901.1Skamil#if defined(TWAIT_HAVE_STATUS) 44911.1Skamil int status; 44921.1Skamil#endif 44931.1Skamil struct ptrace_lwpinfo info = {0, 0}; 44941.1Skamil 44951.13Schristos DPRINTF("Spawn tracee\n"); 44961.13Schristos SYSCALL_REQUIRE(msg_open(&parent_tracee) == 0); 44971.13Schristos SYSCALL_REQUIRE(msg_open(&parent_tracer) == 0); 44981.1Skamil tracee = atf_utils_fork(); 44991.1Skamil if (tracee == 0) { 45001.1Skamil 45011.1Skamil /* Wait for message from the parent */ 45021.1Skamil CHILD_TO_PARENT("tracee ready", parent_tracee, msg); 45031.1Skamil CHILD_FROM_PARENT("tracee exit", parent_tracee, msg); 45041.1Skamil 45051.1Skamil _exit(exitval_tracee); 45061.1Skamil } 45071.1Skamil PARENT_FROM_CHILD("tracee ready", parent_tracee, msg); 45081.1Skamil 45091.13Schristos DPRINTF("Spawn debugger\n"); 45101.1Skamil tracer = atf_utils_fork(); 45111.1Skamil if (tracer == 0) { 45121.1Skamil /* No IPC to communicate with the child */ 45131.13Schristos DPRINTF("Before calling PT_ATTACH from tracee %d\n", getpid()); 45141.1Skamil FORKEE_ASSERT(ptrace(PT_ATTACH, tracee, NULL, 0) != -1); 45151.1Skamil 45161.1Skamil /* Wait for tracee and assert that it was stopped w/ SIGSTOP */ 45171.1Skamil FORKEE_REQUIRE_SUCCESS( 45181.1Skamil wpid = TWAIT_GENERIC(tracee, &status, 0), tracee); 45191.1Skamil 45201.1Skamil forkee_status_stopped(status, SIGSTOP); 45211.1Skamil 45221.13Schristos DPRINTF("Before calling ptrace(2) with PT_LWPINFO for child\n"); 45231.1Skamil FORKEE_ASSERT(ptrace(PT_LWPINFO, tracee, &info, sizeof(info)) 45241.1Skamil != -1); 45251.1Skamil 45261.13Schristos DPRINTF("Assert that there exists a thread\n"); 45271.1Skamil FORKEE_ASSERTX(info.pl_lwpid > 0); 45281.1Skamil 45291.13Schristos DPRINTF("Assert that lwp thread %d received event " 45301.1Skamil "PL_EVENT_SIGNAL\n", info.pl_lwpid); 45311.1Skamil FORKEE_ASSERT_EQ(info.pl_event, PL_EVENT_SIGNAL); 45321.1Skamil 45331.13Schristos DPRINTF("Before calling ptrace(2) with PT_LWPINFO for child\n"); 45341.1Skamil FORKEE_ASSERT(ptrace(PT_LWPINFO, tracee, &info, sizeof(info)) 45351.1Skamil != -1); 45361.1Skamil 45371.13Schristos DPRINTF("Assert that there are no more lwp threads in child\n"); 45381.1Skamil FORKEE_ASSERTX(info.pl_lwpid == 0); 45391.1Skamil 45401.1Skamil /* Resume tracee with PT_CONTINUE */ 45411.1Skamil FORKEE_ASSERT(ptrace(PT_CONTINUE, tracee, (void *)1, 0) != -1); 45421.1Skamil 45431.1Skamil /* Inform parent that tracer has attached to tracee */ 45441.1Skamil CHILD_TO_PARENT("tracer ready", parent_tracer, msg); 45451.1Skamil /* Wait for parent */ 45461.1Skamil CHILD_FROM_PARENT("tracer wait", parent_tracer, msg); 45471.1Skamil 45481.1Skamil /* Wait for tracee and assert that it exited */ 45491.1Skamil FORKEE_REQUIRE_SUCCESS( 45501.1Skamil wpid = TWAIT_GENERIC(tracee, &status, 0), tracee); 45511.1Skamil 45521.1Skamil forkee_status_exited(status, exitval_tracee); 45531.1Skamil 45541.13Schristos DPRINTF("Before exiting of the tracer process\n"); 45551.1Skamil _exit(exitval_tracer); 45561.1Skamil } 45571.1Skamil 45581.13Schristos DPRINTF("Wait for the tracer to attach to the tracee\n"); 45591.1Skamil PARENT_FROM_CHILD("tracer ready", parent_tracer, msg); 45601.1Skamil 45611.13Schristos DPRINTF("Resume the tracee and let it exit\n"); 45621.1Skamil PARENT_TO_CHILD("tracee exit", parent_tracee, msg); 45631.1Skamil 45641.13Schristos DPRINTF("Detect that tracee is zombie\n"); 45651.1Skamil await_zombie(tracee); 45661.1Skamil 45671.13Schristos DPRINTF("Assert that there is no status about tracee - " 45681.1Skamil "Tracer must detect zombie first - calling %s()\n", TWAIT_FNAME); 45691.1Skamil TWAIT_REQUIRE_SUCCESS( 45701.1Skamil wpid = TWAIT_GENERIC(tracee, &status, WNOHANG), 0); 45711.1Skamil 45721.13Schristos DPRINTF("Resume the tracer and let it detect exited tracee\n"); 45731.1Skamil PARENT_TO_CHILD("tracer wait", parent_tracer, msg); 45741.1Skamil 45751.13Schristos DPRINTF("Wait for tracer to finish its job and exit - calling %s()\n", 45761.1Skamil TWAIT_FNAME); 45771.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracer, &status, 0), 45781.1Skamil tracer); 45791.1Skamil 45801.1Skamil validate_status_exited(status, exitval_tracer); 45811.1Skamil 45821.13Schristos DPRINTF("Wait for tracee to finish its job and exit - calling %s()\n", 45831.1Skamil TWAIT_FNAME); 45841.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracee, &status, WNOHANG), 45851.1Skamil tracee); 45861.1Skamil 45871.1Skamil validate_status_exited(status, exitval_tracee); 45881.1Skamil 45891.1Skamil msg_close(&parent_tracer); 45901.1Skamil msg_close(&parent_tracee); 45911.1Skamil} 45921.1Skamil#endif 45931.1Skamil 45941.1SkamilATF_TC(siginfo1); 45951.1SkamilATF_TC_HEAD(siginfo1, tc) 45961.1Skamil{ 45971.1Skamil atf_tc_set_md_var(tc, "descr", 45981.1Skamil "Verify basic PT_GET_SIGINFO call for SIGTRAP from tracee"); 45991.1Skamil} 46001.1Skamil 46011.1SkamilATF_TC_BODY(siginfo1, tc) 46021.1Skamil{ 46031.1Skamil const int exitval = 5; 46041.1Skamil const int sigval = SIGTRAP; 46051.1Skamil pid_t child, wpid; 46061.1Skamil#if defined(TWAIT_HAVE_STATUS) 46071.1Skamil int status; 46081.1Skamil#endif 46091.1Skamil struct ptrace_siginfo info; 46101.1Skamil memset(&info, 0, sizeof(info)); 46111.1Skamil 46121.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 46131.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 46141.1Skamil if (child == 0) { 46151.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 46161.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 46171.1Skamil 46181.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 46191.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 46201.1Skamil 46211.13Schristos DPRINTF("Before exiting of the child process\n"); 46221.1Skamil _exit(exitval); 46231.1Skamil } 46241.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 46251.1Skamil 46261.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 46271.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 46281.1Skamil 46291.1Skamil validate_status_stopped(status, sigval); 46301.1Skamil 46311.13Schristos DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n"); 46321.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1); 46331.1Skamil 46341.13Schristos DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid); 46351.13Schristos DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n", 46361.1Skamil info.psi_siginfo.si_signo, info.psi_siginfo.si_code, 46371.1Skamil info.psi_siginfo.si_errno); 46381.1Skamil 46391.13Schristos DPRINTF("Before resuming the child process where it left off and " 46401.1Skamil "without signal to be sent\n"); 46411.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 46421.1Skamil 46431.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 46441.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 46451.1Skamil 46461.1Skamil validate_status_exited(status, exitval); 46471.1Skamil 46481.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 46491.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 46501.1Skamil} 46511.1Skamil 46521.1SkamilATF_TC(siginfo2); 46531.1SkamilATF_TC_HEAD(siginfo2, tc) 46541.1Skamil{ 46551.1Skamil atf_tc_set_md_var(tc, "descr", 46561.1Skamil "Verify basic PT_GET_SIGINFO and PT_SET_SIGINFO calls without " 46571.1Skamil "modification of SIGINT from tracee"); 46581.1Skamil} 46591.1Skamil 46601.1Skamilstatic int siginfo2_caught = 0; 46611.1Skamil 46621.1Skamilstatic void 46631.1Skamilsiginfo2_sighandler(int sig) 46641.1Skamil{ 46651.1Skamil FORKEE_ASSERT_EQ(sig, SIGINT); 46661.1Skamil 46671.1Skamil ++siginfo2_caught; 46681.1Skamil} 46691.1Skamil 46701.1SkamilATF_TC_BODY(siginfo2, tc) 46711.1Skamil{ 46721.1Skamil const int exitval = 5; 46731.1Skamil const int sigval = SIGINT; 46741.1Skamil pid_t child, wpid; 46751.1Skamil struct sigaction sa; 46761.1Skamil#if defined(TWAIT_HAVE_STATUS) 46771.1Skamil int status; 46781.1Skamil#endif 46791.1Skamil struct ptrace_siginfo info; 46801.1Skamil memset(&info, 0, sizeof(info)); 46811.1Skamil 46821.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 46831.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 46841.1Skamil if (child == 0) { 46851.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 46861.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 46871.1Skamil 46881.1Skamil sa.sa_handler = siginfo2_sighandler; 46891.1Skamil sa.sa_flags = SA_SIGINFO; 46901.1Skamil sigemptyset(&sa.sa_mask); 46911.1Skamil 46921.1Skamil FORKEE_ASSERT(sigaction(sigval, &sa, NULL) != -1); 46931.1Skamil 46941.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 46951.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 46961.1Skamil 46971.1Skamil FORKEE_ASSERT_EQ(siginfo2_caught, 1); 46981.1Skamil 46991.13Schristos DPRINTF("Before exiting of the child process\n"); 47001.1Skamil _exit(exitval); 47011.1Skamil } 47021.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 47031.1Skamil 47041.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 47051.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 47061.1Skamil 47071.1Skamil validate_status_stopped(status, sigval); 47081.1Skamil 47091.13Schristos DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n"); 47101.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1); 47111.1Skamil 47121.13Schristos DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid); 47131.13Schristos DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n", 47141.1Skamil info.psi_siginfo.si_signo, info.psi_siginfo.si_code, 47151.1Skamil info.psi_siginfo.si_errno); 47161.1Skamil 47171.13Schristos DPRINTF("Before calling ptrace(2) with PT_SET_SIGINFO for child\n"); 47181.13Schristos SYSCALL_REQUIRE(ptrace(PT_SET_SIGINFO, child, &info, sizeof(info)) != -1); 47191.1Skamil 47201.13Schristos DPRINTF("Before resuming the child process where it left off and " 47211.1Skamil "without signal to be sent\n"); 47221.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, sigval) != -1); 47231.1Skamil 47241.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 47251.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 47261.1Skamil 47271.1Skamil validate_status_exited(status, exitval); 47281.1Skamil 47291.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 47301.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 47311.1Skamil} 47321.1Skamil 47331.1SkamilATF_TC(siginfo3); 47341.1SkamilATF_TC_HEAD(siginfo3, tc) 47351.1Skamil{ 47361.1Skamil atf_tc_set_md_var(tc, "descr", 47371.1Skamil "Verify basic PT_GET_SIGINFO and PT_SET_SIGINFO calls with " 47381.1Skamil "setting signal to new value"); 47391.1Skamil} 47401.1Skamil 47411.1Skamilstatic int siginfo3_caught = 0; 47421.1Skamil 47431.1Skamilstatic void 47441.1Skamilsiginfo3_sigaction(int sig, siginfo_t *info, void *ctx) 47451.1Skamil{ 47461.1Skamil FORKEE_ASSERT_EQ(sig, SIGTRAP); 47471.1Skamil 47481.1Skamil FORKEE_ASSERT_EQ(info->si_signo, SIGTRAP); 47491.1Skamil FORKEE_ASSERT_EQ(info->si_code, TRAP_BRKPT); 47501.1Skamil 47511.1Skamil ++siginfo3_caught; 47521.1Skamil} 47531.1Skamil 47541.1SkamilATF_TC_BODY(siginfo3, tc) 47551.1Skamil{ 47561.1Skamil const int exitval = 5; 47571.1Skamil const int sigval = SIGINT; 47581.1Skamil const int sigfaked = SIGTRAP; 47591.1Skamil const int sicodefaked = TRAP_BRKPT; 47601.1Skamil pid_t child, wpid; 47611.1Skamil struct sigaction sa; 47621.1Skamil#if defined(TWAIT_HAVE_STATUS) 47631.1Skamil int status; 47641.1Skamil#endif 47651.1Skamil struct ptrace_siginfo info; 47661.1Skamil memset(&info, 0, sizeof(info)); 47671.1Skamil 47681.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 47691.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 47701.1Skamil if (child == 0) { 47711.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 47721.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 47731.1Skamil 47741.1Skamil sa.sa_sigaction = siginfo3_sigaction; 47751.1Skamil sa.sa_flags = SA_SIGINFO; 47761.1Skamil sigemptyset(&sa.sa_mask); 47771.1Skamil 47781.1Skamil FORKEE_ASSERT(sigaction(sigfaked, &sa, NULL) != -1); 47791.1Skamil 47801.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 47811.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 47821.1Skamil 47831.1Skamil FORKEE_ASSERT_EQ(siginfo3_caught, 1); 47841.1Skamil 47851.13Schristos DPRINTF("Before exiting of the child process\n"); 47861.1Skamil _exit(exitval); 47871.1Skamil } 47881.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 47891.1Skamil 47901.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 47911.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 47921.1Skamil 47931.1Skamil validate_status_stopped(status, sigval); 47941.1Skamil 47951.13Schristos DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n"); 47961.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1); 47971.1Skamil 47981.13Schristos DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid); 47991.13Schristos DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n", 48001.1Skamil info.psi_siginfo.si_signo, info.psi_siginfo.si_code, 48011.1Skamil info.psi_siginfo.si_errno); 48021.1Skamil 48031.13Schristos DPRINTF("Before setting new faked signal to signo=%d si_code=%d\n", 48041.1Skamil sigfaked, sicodefaked); 48051.1Skamil info.psi_siginfo.si_signo = sigfaked; 48061.1Skamil info.psi_siginfo.si_code = sicodefaked; 48071.1Skamil 48081.13Schristos DPRINTF("Before calling ptrace(2) with PT_SET_SIGINFO for child\n"); 48091.13Schristos SYSCALL_REQUIRE(ptrace(PT_SET_SIGINFO, child, &info, sizeof(info)) != -1); 48101.1Skamil 48111.13Schristos DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n"); 48121.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1); 48131.1Skamil 48141.13Schristos DPRINTF("Before checking siginfo_t\n"); 48151.1Skamil ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigfaked); 48161.1Skamil ATF_REQUIRE_EQ(info.psi_siginfo.si_code, sicodefaked); 48171.1Skamil 48181.13Schristos DPRINTF("Before resuming the child process where it left off and " 48191.1Skamil "without signal to be sent\n"); 48201.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, sigfaked) != -1); 48211.1Skamil 48221.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 48231.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 48241.1Skamil 48251.1Skamil validate_status_exited(status, exitval); 48261.1Skamil 48271.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 48281.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 48291.1Skamil} 48301.1Skamil 48311.1SkamilATF_TC(siginfo4); 48321.1SkamilATF_TC_HEAD(siginfo4, tc) 48331.1Skamil{ 48341.1Skamil atf_tc_set_md_var(tc, "descr", 48351.1Skamil "Detect SIGTRAP TRAP_EXEC from tracee"); 48361.1Skamil} 48371.1Skamil 48381.1SkamilATF_TC_BODY(siginfo4, tc) 48391.1Skamil{ 48401.1Skamil const int sigval = SIGTRAP; 48411.1Skamil pid_t child, wpid; 48421.1Skamil#if defined(TWAIT_HAVE_STATUS) 48431.1Skamil int status; 48441.1Skamil#endif 48451.1Skamil 48461.1Skamil struct ptrace_siginfo info; 48471.1Skamil memset(&info, 0, sizeof(info)); 48481.1Skamil 48491.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 48501.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 48511.1Skamil if (child == 0) { 48521.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 48531.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 48541.1Skamil 48551.13Schristos DPRINTF("Before calling execve(2) from child\n"); 48561.1Skamil execlp("/bin/echo", "/bin/echo", NULL); 48571.1Skamil 48581.1Skamil FORKEE_ASSERT(0 && "Not reached"); 48591.1Skamil } 48601.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 48611.1Skamil 48621.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 48631.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 48641.1Skamil 48651.1Skamil validate_status_stopped(status, sigval); 48661.1Skamil 48671.13Schristos DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n"); 48681.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1); 48691.1Skamil 48701.13Schristos DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid); 48711.13Schristos DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n", 48721.1Skamil info.psi_siginfo.si_signo, info.psi_siginfo.si_code, 48731.1Skamil info.psi_siginfo.si_errno); 48741.1Skamil 48751.1Skamil ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigval); 48761.1Skamil ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_EXEC); 48771.1Skamil 48781.13Schristos DPRINTF("Before resuming the child process where it left off and " 48791.1Skamil "without signal to be sent\n"); 48801.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 48811.1Skamil 48821.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 48831.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 48841.1Skamil 48851.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 48861.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 48871.1Skamil} 48881.1Skamil 48891.1Skamil#if defined(TWAIT_HAVE_PID) 48901.1SkamilATF_TC(siginfo5); 48911.1SkamilATF_TC_HEAD(siginfo5, tc) 48921.1Skamil{ 48931.1Skamil atf_tc_set_md_var(tc, "descr", 48941.1Skamil "Verify that fork(2) is intercepted by ptrace(2) with EVENT_MASK " 48951.1Skamil "set to PTRACE_FORK and reports correct signal information"); 48961.1Skamil} 48971.1Skamil 48981.1SkamilATF_TC_BODY(siginfo5, tc) 48991.1Skamil{ 49001.1Skamil const int exitval = 5; 49011.1Skamil const int exitval2 = 15; 49021.1Skamil const int sigval = SIGSTOP; 49031.1Skamil pid_t child, child2, wpid; 49041.1Skamil#if defined(TWAIT_HAVE_STATUS) 49051.1Skamil int status; 49061.1Skamil#endif 49071.1Skamil ptrace_state_t state; 49081.1Skamil const int slen = sizeof(state); 49091.1Skamil ptrace_event_t event; 49101.1Skamil const int elen = sizeof(event); 49111.1Skamil struct ptrace_siginfo info; 49121.1Skamil 49131.1Skamil memset(&info, 0, sizeof(info)); 49141.1Skamil 49151.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 49161.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 49171.1Skamil if (child == 0) { 49181.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 49191.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 49201.1Skamil 49211.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 49221.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 49231.1Skamil 49241.1Skamil FORKEE_ASSERT((child2 = fork()) != -1); 49251.1Skamil 49261.1Skamil if (child2 == 0) 49271.1Skamil _exit(exitval2); 49281.1Skamil 49291.1Skamil FORKEE_REQUIRE_SUCCESS 49301.1Skamil (wpid = TWAIT_GENERIC(child2, &status, 0), child2); 49311.1Skamil 49321.1Skamil forkee_status_exited(status, exitval2); 49331.1Skamil 49341.13Schristos DPRINTF("Before exiting of the child process\n"); 49351.1Skamil _exit(exitval); 49361.1Skamil } 49371.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 49381.1Skamil 49391.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 49401.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 49411.1Skamil 49421.1Skamil validate_status_stopped(status, sigval); 49431.1Skamil 49441.13Schristos DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n"); 49451.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1); 49461.1Skamil 49471.13Schristos DPRINTF("Before checking siginfo_t\n"); 49481.1Skamil ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigval); 49491.1Skamil ATF_REQUIRE_EQ(info.psi_siginfo.si_code, SI_LWP); 49501.1Skamil 49511.13Schristos DPRINTF("Enable PTRACE_FORK in EVENT_MASK for the child %d\n", child); 49521.1Skamil event.pe_set_event = PTRACE_FORK; 49531.13Schristos SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1); 49541.1Skamil 49551.13Schristos DPRINTF("Before resuming the child process where it left off and " 49561.1Skamil "without signal to be sent\n"); 49571.13Schristos DPRINTF("We expect two SIGTRAP events, for child %d (TRAP_CHLD, " 49581.1Skamil "pe_report_event=PTRACE_FORK, state.pe_other_pid=child2) and " 49591.1Skamil "for child2 (TRAP_CHLD, pe_report_event=PTRACE_FORK, " 49601.1Skamil "state.pe_other_pid=child)\n", child); 49611.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 49621.1Skamil 49631.13Schristos DPRINTF("Before calling %s() for the child %d\n", TWAIT_FNAME, child); 49641.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 49651.1Skamil 49661.1Skamil validate_status_stopped(status, SIGTRAP); 49671.1Skamil 49681.13Schristos DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n"); 49691.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1); 49701.1Skamil 49711.13Schristos DPRINTF("Before checking siginfo_t\n"); 49721.1Skamil ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, SIGTRAP); 49731.1Skamil ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_CHLD); 49741.1Skamil 49751.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1); 49761.1Skamil ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_FORK); 49771.1Skamil 49781.1Skamil child2 = state.pe_other_pid; 49791.13Schristos DPRINTF("Reported PTRACE_FORK event with forkee %d\n", child2); 49801.1Skamil 49811.13Schristos DPRINTF("Before calling %s() for the forkee %d of the child %d\n", 49821.1Skamil TWAIT_FNAME, child2, child); 49831.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0), 49841.1Skamil child2); 49851.1Skamil 49861.1Skamil validate_status_stopped(status, SIGTRAP); 49871.1Skamil 49881.13Schristos DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n"); 49891.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1); 49901.1Skamil 49911.13Schristos DPRINTF("Before checking siginfo_t\n"); 49921.1Skamil ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, SIGTRAP); 49931.1Skamil ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_CHLD); 49941.1Skamil 49951.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child2, &state, slen) != -1); 49961.1Skamil ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_FORK); 49971.1Skamil ATF_REQUIRE_EQ(state.pe_other_pid, child); 49981.1Skamil 49991.13Schristos DPRINTF("Before resuming the forkee process where it left off and " 50001.1Skamil "without signal to be sent\n"); 50011.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child2, (void *)1, 0) != -1); 50021.1Skamil 50031.13Schristos DPRINTF("Before resuming the child process where it left off and " 50041.1Skamil "without signal to be sent\n"); 50051.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 50061.1Skamil 50071.13Schristos DPRINTF("Before calling %s() for the forkee - expected exited\n", 50081.1Skamil TWAIT_FNAME); 50091.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0), 50101.1Skamil child2); 50111.1Skamil 50121.1Skamil validate_status_exited(status, exitval2); 50131.1Skamil 50141.13Schristos DPRINTF("Before calling %s() for the forkee - expected no process\n", 50151.1Skamil TWAIT_FNAME); 50161.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, 50171.1Skamil wpid = TWAIT_GENERIC(child2, &status, 0)); 50181.1Skamil 50191.13Schristos DPRINTF("Before calling %s() for the child - expected stopped " 50201.1Skamil "SIGCHLD\n", TWAIT_FNAME); 50211.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 50221.1Skamil 50231.1Skamil validate_status_stopped(status, SIGCHLD); 50241.1Skamil 50251.13Schristos DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n"); 50261.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1); 50271.1Skamil 50281.13Schristos DPRINTF("Before checking siginfo_t\n"); 50291.1Skamil ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, SIGCHLD); 50301.1Skamil ATF_REQUIRE_EQ(info.psi_siginfo.si_code, CLD_EXITED); 50311.1Skamil 50321.13Schristos DPRINTF("Before resuming the child process where it left off and " 50331.1Skamil "without signal to be sent\n"); 50341.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 50351.1Skamil 50361.13Schristos DPRINTF("Before calling %s() for the child - expected exited\n", 50371.1Skamil TWAIT_FNAME); 50381.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 50391.1Skamil 50401.1Skamil validate_status_exited(status, exitval); 50411.1Skamil 50421.13Schristos DPRINTF("Before calling %s() for the child - expected no process\n", 50431.1Skamil TWAIT_FNAME); 50441.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 50451.1Skamil} 50461.1Skamil#endif 50471.1Skamil 50481.1Skamil#if defined(PT_STEP) 50491.1SkamilATF_TC(siginfo6); 50501.1SkamilATF_TC_HEAD(siginfo6, tc) 50511.1Skamil{ 50521.1Skamil atf_tc_set_md_var(tc, "descr", 50531.1Skamil "Verify single PT_STEP call with signal information check"); 50541.1Skamil} 50551.1Skamil 50561.1SkamilATF_TC_BODY(siginfo6, tc) 50571.1Skamil{ 50581.1Skamil const int exitval = 5; 50591.1Skamil const int sigval = SIGSTOP; 50601.1Skamil pid_t child, wpid; 50611.1Skamil#if defined(TWAIT_HAVE_STATUS) 50621.1Skamil int status; 50631.1Skamil#endif 50641.1Skamil int happy; 50651.1Skamil struct ptrace_siginfo info; 50661.1Skamil 50671.1Skamil#if defined(__arm__) 50681.1Skamil /* PT_STEP not supported on arm 32-bit */ 50691.1Skamil atf_tc_expect_fail("PR kern/52119"); 50701.1Skamil#endif 50711.1Skamil 50721.1Skamil memset(&info, 0, sizeof(info)); 50731.1Skamil 50741.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 50751.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 50761.1Skamil if (child == 0) { 50771.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 50781.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 50791.1Skamil 50801.1Skamil happy = check_happy(100); 50811.1Skamil 50821.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 50831.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 50841.1Skamil 50851.1Skamil FORKEE_ASSERT_EQ(happy, check_happy(100)); 50861.1Skamil 50871.13Schristos DPRINTF("Before exiting of the child process\n"); 50881.1Skamil _exit(exitval); 50891.1Skamil } 50901.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 50911.1Skamil 50921.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 50931.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 50941.1Skamil 50951.1Skamil validate_status_stopped(status, sigval); 50961.1Skamil 50971.13Schristos DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n"); 50981.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1); 50991.1Skamil 51001.13Schristos DPRINTF("Before checking siginfo_t\n"); 51011.1Skamil ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigval); 51021.1Skamil ATF_REQUIRE_EQ(info.psi_siginfo.si_code, SI_LWP); 51031.1Skamil 51041.13Schristos DPRINTF("Before resuming the child process where it left off and " 51051.1Skamil "without signal to be sent (use PT_STEP)\n"); 51061.13Schristos SYSCALL_REQUIRE(ptrace(PT_STEP, child, (void *)1, 0) != -1); 51071.1Skamil 51081.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 51091.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 51101.1Skamil 51111.1Skamil validate_status_stopped(status, SIGTRAP); 51121.1Skamil 51131.13Schristos DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n"); 51141.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1); 51151.1Skamil 51161.13Schristos DPRINTF("Before checking siginfo_t\n"); 51171.1Skamil ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, SIGTRAP); 51181.1Skamil ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_TRACE); 51191.1Skamil 51201.13Schristos DPRINTF("Before resuming the child process where it left off and " 51211.1Skamil "without signal to be sent\n"); 51221.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 51231.1Skamil 51241.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 51251.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 51261.1Skamil 51271.1Skamil validate_status_exited(status, exitval); 51281.1Skamil 51291.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 51301.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 51311.1Skamil} 51321.1Skamil#endif 51331.1Skamil 51341.1Skamilvolatile lwpid_t the_lwp_id = 0; 51351.1Skamil 51361.1Skamilstatic void 51371.1Skamillwp_main_func(void *arg) 51381.1Skamil{ 51391.1Skamil the_lwp_id = _lwp_self(); 51401.1Skamil _lwp_exit(); 51411.1Skamil} 51421.1Skamil 51431.1SkamilATF_TC(lwp_create1); 51441.1SkamilATF_TC_HEAD(lwp_create1, tc) 51451.1Skamil{ 51461.1Skamil atf_tc_set_md_var(tc, "descr", 51471.1Skamil "Verify that 1 LWP creation is intercepted by ptrace(2) with " 51481.1Skamil "EVENT_MASK set to PTRACE_LWP_CREATE"); 51491.1Skamil} 51501.1Skamil 51511.1SkamilATF_TC_BODY(lwp_create1, tc) 51521.1Skamil{ 51531.1Skamil const int exitval = 5; 51541.1Skamil const int sigval = SIGSTOP; 51551.1Skamil pid_t child, wpid; 51561.1Skamil#if defined(TWAIT_HAVE_STATUS) 51571.1Skamil int status; 51581.1Skamil#endif 51591.1Skamil ptrace_state_t state; 51601.1Skamil const int slen = sizeof(state); 51611.1Skamil ptrace_event_t event; 51621.1Skamil const int elen = sizeof(event); 51631.1Skamil ucontext_t uc; 51641.1Skamil lwpid_t lid; 51651.1Skamil static const size_t ssize = 16*1024; 51661.1Skamil void *stack; 51671.1Skamil 51681.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 51691.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 51701.1Skamil if (child == 0) { 51711.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 51721.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 51731.1Skamil 51741.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 51751.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 51761.1Skamil 51771.13Schristos DPRINTF("Before allocating memory for stack in child\n"); 51781.1Skamil FORKEE_ASSERT((stack = malloc(ssize)) != NULL); 51791.1Skamil 51801.13Schristos DPRINTF("Before making context for new lwp in child\n"); 51811.1Skamil _lwp_makecontext(&uc, lwp_main_func, NULL, NULL, stack, ssize); 51821.1Skamil 51831.13Schristos DPRINTF("Before creating new in child\n"); 51841.1Skamil FORKEE_ASSERT(_lwp_create(&uc, 0, &lid) == 0); 51851.1Skamil 51861.13Schristos DPRINTF("Before waiting for lwp %d to exit\n", lid); 51871.1Skamil FORKEE_ASSERT(_lwp_wait(lid, NULL) == 0); 51881.1Skamil 51891.13Schristos DPRINTF("Before verifying that reported %d and running lid %d " 51901.1Skamil "are the same\n", lid, the_lwp_id); 51911.1Skamil FORKEE_ASSERT_EQ(lid, the_lwp_id); 51921.1Skamil 51931.13Schristos DPRINTF("Before exiting of the child process\n"); 51941.1Skamil _exit(exitval); 51951.1Skamil } 51961.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 51971.1Skamil 51981.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 51991.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 52001.1Skamil 52011.1Skamil validate_status_stopped(status, sigval); 52021.1Skamil 52031.13Schristos DPRINTF("Set empty EVENT_MASK for the child %d\n", child); 52041.1Skamil event.pe_set_event = PTRACE_LWP_CREATE; 52051.13Schristos SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1); 52061.1Skamil 52071.13Schristos DPRINTF("Before resuming the child process where it left off and " 52081.1Skamil "without signal to be sent\n"); 52091.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 52101.1Skamil 52111.13Schristos DPRINTF("Before calling %s() for the child - expected stopped " 52121.1Skamil "SIGTRAP\n", TWAIT_FNAME); 52131.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 52141.1Skamil 52151.1Skamil validate_status_stopped(status, SIGTRAP); 52161.1Skamil 52171.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1); 52181.1Skamil 52191.1Skamil ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_LWP_CREATE); 52201.1Skamil 52211.1Skamil lid = state.pe_lwp; 52221.13Schristos DPRINTF("Reported PTRACE_LWP_CREATE event with lid %d\n", lid); 52231.1Skamil 52241.13Schristos DPRINTF("Before resuming the child process where it left off and " 52251.1Skamil "without signal to be sent\n"); 52261.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 52271.1Skamil 52281.13Schristos DPRINTF("Before calling %s() for the child - expected exited\n", 52291.1Skamil TWAIT_FNAME); 52301.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 52311.1Skamil 52321.1Skamil validate_status_exited(status, exitval); 52331.1Skamil 52341.13Schristos DPRINTF("Before calling %s() for the child - expected no process\n", 52351.1Skamil TWAIT_FNAME); 52361.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 52371.1Skamil} 52381.1Skamil 52391.1SkamilATF_TC(lwp_exit1); 52401.1SkamilATF_TC_HEAD(lwp_exit1, tc) 52411.1Skamil{ 52421.1Skamil atf_tc_set_md_var(tc, "descr", 52431.1Skamil "Verify that 1 LWP creation is intercepted by ptrace(2) with " 52441.1Skamil "EVENT_MASK set to PTRACE_LWP_EXIT"); 52451.1Skamil} 52461.1Skamil 52471.1SkamilATF_TC_BODY(lwp_exit1, tc) 52481.1Skamil{ 52491.1Skamil const int exitval = 5; 52501.1Skamil const int sigval = SIGSTOP; 52511.1Skamil pid_t child, wpid; 52521.1Skamil#if defined(TWAIT_HAVE_STATUS) 52531.1Skamil int status; 52541.1Skamil#endif 52551.1Skamil ptrace_state_t state; 52561.1Skamil const int slen = sizeof(state); 52571.1Skamil ptrace_event_t event; 52581.1Skamil const int elen = sizeof(event); 52591.1Skamil ucontext_t uc; 52601.1Skamil lwpid_t lid; 52611.1Skamil static const size_t ssize = 16*1024; 52621.1Skamil void *stack; 52631.1Skamil 52641.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 52651.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 52661.1Skamil if (child == 0) { 52671.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 52681.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 52691.1Skamil 52701.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 52711.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 52721.1Skamil 52731.13Schristos DPRINTF("Before allocating memory for stack in child\n"); 52741.1Skamil FORKEE_ASSERT((stack = malloc(ssize)) != NULL); 52751.1Skamil 52761.13Schristos DPRINTF("Before making context for new lwp in child\n"); 52771.1Skamil _lwp_makecontext(&uc, lwp_main_func, NULL, NULL, stack, ssize); 52781.1Skamil 52791.13Schristos DPRINTF("Before creating new in child\n"); 52801.1Skamil FORKEE_ASSERT(_lwp_create(&uc, 0, &lid) == 0); 52811.1Skamil 52821.13Schristos DPRINTF("Before waiting for lwp %d to exit\n", lid); 52831.1Skamil FORKEE_ASSERT(_lwp_wait(lid, NULL) == 0); 52841.1Skamil 52851.13Schristos DPRINTF("Before verifying that reported %d and running lid %d " 52861.1Skamil "are the same\n", lid, the_lwp_id); 52871.1Skamil FORKEE_ASSERT_EQ(lid, the_lwp_id); 52881.1Skamil 52891.13Schristos DPRINTF("Before exiting of the child process\n"); 52901.1Skamil _exit(exitval); 52911.1Skamil } 52921.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 52931.1Skamil 52941.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 52951.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 52961.1Skamil 52971.1Skamil validate_status_stopped(status, sigval); 52981.1Skamil 52991.13Schristos DPRINTF("Set empty EVENT_MASK for the child %d\n", child); 53001.1Skamil event.pe_set_event = PTRACE_LWP_EXIT; 53011.13Schristos SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1); 53021.1Skamil 53031.13Schristos DPRINTF("Before resuming the child process where it left off and " 53041.1Skamil "without signal to be sent\n"); 53051.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 53061.1Skamil 53071.13Schristos DPRINTF("Before calling %s() for the child - expected stopped " 53081.1Skamil "SIGTRAP\n", TWAIT_FNAME); 53091.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 53101.1Skamil 53111.1Skamil validate_status_stopped(status, SIGTRAP); 53121.1Skamil 53131.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1); 53141.1Skamil 53151.1Skamil ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_LWP_EXIT); 53161.1Skamil 53171.1Skamil lid = state.pe_lwp; 53181.13Schristos DPRINTF("Reported PTRACE_LWP_EXIT event with lid %d\n", lid); 53191.1Skamil 53201.13Schristos DPRINTF("Before resuming the child process where it left off and " 53211.1Skamil "without signal to be sent\n"); 53221.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 53231.1Skamil 53241.13Schristos DPRINTF("Before calling %s() for the child - expected exited\n", 53251.1Skamil TWAIT_FNAME); 53261.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 53271.1Skamil 53281.1Skamil validate_status_exited(status, exitval); 53291.1Skamil 53301.13Schristos DPRINTF("Before calling %s() for the child - expected no process\n", 53311.1Skamil TWAIT_FNAME); 53321.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 53331.1Skamil} 53341.1Skamil 53351.1SkamilATF_TC(signal1); 53361.1SkamilATF_TC_HEAD(signal1, tc) 53371.1Skamil{ 53381.1Skamil atf_tc_set_md_var(tc, "descr", 53391.1Skamil "Verify that masking single unrelated signal does not stop tracer " 53401.1Skamil "from catching other signals"); 53411.1Skamil} 53421.1Skamil 53431.1SkamilATF_TC_BODY(signal1, tc) 53441.1Skamil{ 53451.1Skamil const int exitval = 5; 53461.1Skamil const int sigval = SIGSTOP; 53471.1Skamil const int sigmasked = SIGTRAP; 53481.1Skamil const int signotmasked = SIGINT; 53491.1Skamil pid_t child, wpid; 53501.1Skamil#if defined(TWAIT_HAVE_STATUS) 53511.1Skamil int status; 53521.1Skamil#endif 53531.1Skamil sigset_t intmask; 53541.1Skamil 53551.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 53561.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 53571.1Skamil if (child == 0) { 53581.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 53591.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 53601.1Skamil 53611.1Skamil sigemptyset(&intmask); 53621.1Skamil sigaddset(&intmask, sigmasked); 53631.1Skamil sigprocmask(SIG_BLOCK, &intmask, NULL); 53641.1Skamil 53651.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 53661.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 53671.1Skamil 53681.13Schristos DPRINTF("Before raising %s from child\n", 53691.1Skamil strsignal(signotmasked)); 53701.1Skamil FORKEE_ASSERT(raise(signotmasked) == 0); 53711.1Skamil 53721.13Schristos DPRINTF("Before exiting of the child process\n"); 53731.1Skamil _exit(exitval); 53741.1Skamil } 53751.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 53761.1Skamil 53771.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 53781.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 53791.1Skamil 53801.1Skamil validate_status_stopped(status, sigval); 53811.1Skamil 53821.13Schristos DPRINTF("Before resuming the child process where it left off and " 53831.1Skamil "without signal to be sent\n"); 53841.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 53851.1Skamil 53861.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 53871.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 53881.1Skamil 53891.1Skamil validate_status_stopped(status, signotmasked); 53901.1Skamil 53911.13Schristos DPRINTF("Before resuming the child process where it left off and " 53921.1Skamil "without signal to be sent\n"); 53931.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 53941.1Skamil 53951.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 53961.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 53971.1Skamil 53981.1Skamil validate_status_exited(status, exitval); 53991.1Skamil 54001.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 54011.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 54021.1Skamil} 54031.1Skamil 54041.1SkamilATF_TC(signal2); 54051.1SkamilATF_TC_HEAD(signal2, tc) 54061.1Skamil{ 54071.1Skamil atf_tc_set_md_var(tc, "descr", 54081.1Skamil "Verify that masking SIGTRAP in tracee stops tracer from " 54091.1Skamil "catching this raised signal"); 54101.1Skamil} 54111.1Skamil 54121.1SkamilATF_TC_BODY(signal2, tc) 54131.1Skamil{ 54141.1Skamil const int exitval = 5; 54151.1Skamil const int sigval = SIGSTOP; 54161.1Skamil const int sigmasked = SIGTRAP; 54171.1Skamil pid_t child, wpid; 54181.1Skamil#if defined(TWAIT_HAVE_STATUS) 54191.1Skamil int status; 54201.1Skamil#endif 54211.1Skamil sigset_t intmask; 54221.1Skamil 54231.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 54241.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 54251.1Skamil if (child == 0) { 54261.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 54271.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 54281.1Skamil 54291.1Skamil sigemptyset(&intmask); 54301.1Skamil sigaddset(&intmask, sigmasked); 54311.1Skamil sigprocmask(SIG_BLOCK, &intmask, NULL); 54321.1Skamil 54331.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 54341.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 54351.1Skamil 54361.13Schristos DPRINTF("Before raising %s breakpoint from child\n", 54371.1Skamil strsignal(sigmasked)); 54381.1Skamil FORKEE_ASSERT(raise(sigmasked) == 0); 54391.1Skamil 54401.13Schristos DPRINTF("Before exiting of the child process\n"); 54411.1Skamil _exit(exitval); 54421.1Skamil } 54431.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 54441.1Skamil 54451.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 54461.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 54471.1Skamil 54481.1Skamil validate_status_stopped(status, sigval); 54491.1Skamil 54501.13Schristos DPRINTF("Before resuming the child process where it left off and " 54511.1Skamil "without signal to be sent\n"); 54521.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 54531.1Skamil 54541.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 54551.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 54561.1Skamil 54571.1Skamil validate_status_exited(status, exitval); 54581.1Skamil 54591.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 54601.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 54611.1Skamil} 54621.1Skamil 54631.1SkamilATF_TC(signal3); 54641.1SkamilATF_TC_HEAD(signal3, tc) 54651.1Skamil{ 54661.7Skamil atf_tc_set_md_var(tc, "timeout", "5"); 54671.1Skamil atf_tc_set_md_var(tc, "descr", 54681.1Skamil "Verify that masking SIGTRAP in tracee does not stop tracer from " 54691.1Skamil "catching software breakpoints"); 54701.1Skamil} 54711.1Skamil 54721.1SkamilATF_TC_BODY(signal3, tc) 54731.1Skamil{ 54741.1Skamil const int exitval = 5; 54751.1Skamil const int sigval = SIGSTOP; 54761.1Skamil const int sigmasked = SIGTRAP; 54771.1Skamil pid_t child, wpid; 54781.1Skamil#if defined(TWAIT_HAVE_STATUS) 54791.1Skamil int status; 54801.1Skamil#endif 54811.1Skamil sigset_t intmask; 54821.1Skamil 54831.20Skamil atf_tc_expect_fail("PR kern/51918"); 54841.20Skamil 54851.20Skamil // This test breaks now on some ports, temporarily disable it 54861.20Skamil ATF_REQUIRE(0 && "In order to get reliable failure, abort"); 54871.20Skamil 54881.10Smartin#if defined(__sparc__) 54891.7Skamil atf_tc_expect_timeout("PR kern/52167"); 54901.7Skamil 54911.7Skamil // timeout wins, failure still valid 54921.7Skamil // atf_tc_expect_fail("PR kern/51918"); 54931.7Skamil#endif 54941.1Skamil 54951.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 54961.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 54971.1Skamil if (child == 0) { 54981.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 54991.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 55001.1Skamil 55011.1Skamil sigemptyset(&intmask); 55021.1Skamil sigaddset(&intmask, sigmasked); 55031.1Skamil sigprocmask(SIG_BLOCK, &intmask, NULL); 55041.1Skamil 55051.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 55061.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 55071.1Skamil 55081.13Schristos DPRINTF("Before raising software breakpoint from child\n"); 55091.4Skamil 55101.4Skamil#ifdef PTRACE_BREAKPOINT_ASM 55111.4Skamil PTRACE_BREAKPOINT_ASM; 55121.1Skamil#else 55131.4Skamil /* port me */ 55141.1Skamil#endif 55151.1Skamil 55161.13Schristos DPRINTF("Before exiting of the child process\n"); 55171.1Skamil _exit(exitval); 55181.1Skamil } 55191.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 55201.1Skamil 55211.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 55221.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 55231.1Skamil 55241.1Skamil validate_status_stopped(status, sigval); 55251.1Skamil 55261.13Schristos DPRINTF("Before resuming the child process where it left off and " 55271.1Skamil "without signal to be sent\n"); 55281.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 55291.1Skamil 55301.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 55311.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 55321.1Skamil 55331.1Skamil validate_status_stopped(status, sigmasked); 55341.1Skamil 55351.13Schristos DPRINTF("Before resuming the child process where it left off and " 55361.1Skamil "without signal to be sent\n"); 55371.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 55381.1Skamil 55391.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 55401.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 55411.1Skamil 55421.1Skamil validate_status_exited(status, exitval); 55431.1Skamil 55441.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 55451.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 55461.1Skamil} 55471.1Skamil 55481.1Skamil#if defined(PT_STEP) 55491.1SkamilATF_TC(signal4); 55501.1SkamilATF_TC_HEAD(signal4, tc) 55511.1Skamil{ 55521.1Skamil atf_tc_set_md_var(tc, "descr", 55531.1Skamil "Verify that masking SIGTRAP in tracee does not stop tracer from " 55541.1Skamil "catching single step trap"); 55551.1Skamil} 55561.1Skamil 55571.1SkamilATF_TC_BODY(signal4, tc) 55581.1Skamil{ 55591.1Skamil const int exitval = 5; 55601.1Skamil const int sigval = SIGSTOP; 55611.1Skamil const int sigmasked = SIGTRAP; 55621.1Skamil pid_t child, wpid; 55631.1Skamil#if defined(TWAIT_HAVE_STATUS) 55641.1Skamil int status; 55651.1Skamil#endif 55661.1Skamil sigset_t intmask; 55671.1Skamil int happy; 55681.1Skamil 55691.1Skamil#if defined(__arm__) 55701.5Skamil /* PT_STEP not supported on arm 32-bit */ 55711.5Skamil atf_tc_expect_fail("PR kern/51918 PR kern/52119"); 55721.1Skamil#endif 55731.1Skamil 55741.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 55751.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 55761.1Skamil if (child == 0) { 55771.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 55781.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 55791.1Skamil 55801.1Skamil happy = check_happy(100); 55811.1Skamil 55821.1Skamil sigemptyset(&intmask); 55831.1Skamil sigaddset(&intmask, sigmasked); 55841.1Skamil sigprocmask(SIG_BLOCK, &intmask, NULL); 55851.1Skamil 55861.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 55871.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 55881.1Skamil 55891.1Skamil FORKEE_ASSERT_EQ(happy, check_happy(100)); 55901.1Skamil 55911.13Schristos DPRINTF("Before exiting of the child process\n"); 55921.1Skamil _exit(exitval); 55931.1Skamil } 55941.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 55951.1Skamil 55961.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 55971.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 55981.1Skamil 55991.1Skamil validate_status_stopped(status, sigval); 56001.1Skamil 56011.13Schristos DPRINTF("Before resuming the child process where it left off and " 56021.1Skamil "without signal to be sent\n"); 56031.13Schristos SYSCALL_REQUIRE(ptrace(PT_STEP, child, (void *)1, 0) != -1); 56041.1Skamil 56051.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 56061.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 56071.1Skamil 56081.1Skamil validate_status_stopped(status, sigmasked); 56091.1Skamil 56101.13Schristos DPRINTF("Before resuming the child process where it left off and " 56111.1Skamil "without signal to be sent\n"); 56121.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 56131.1Skamil 56141.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 56151.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 56161.1Skamil 56171.1Skamil validate_status_exited(status, exitval); 56181.1Skamil 56191.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 56201.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 56211.1Skamil} 56221.1Skamil#endif 56231.1Skamil 56241.1SkamilATF_TC(signal5); 56251.1SkamilATF_TC_HEAD(signal5, tc) 56261.1Skamil{ 56271.1Skamil atf_tc_set_md_var(tc, "descr", 56281.1Skamil "Verify that masking SIGTRAP in tracee does not stop tracer from " 56291.1Skamil "catching exec() breakpoint"); 56301.1Skamil} 56311.1Skamil 56321.1SkamilATF_TC_BODY(signal5, tc) 56331.1Skamil{ 56341.1Skamil const int exitval = 5; 56351.1Skamil const int sigval = SIGSTOP; 56361.1Skamil const int sigmasked = SIGTRAP; 56371.1Skamil pid_t child, wpid; 56381.1Skamil#if defined(TWAIT_HAVE_STATUS) 56391.1Skamil int status; 56401.1Skamil#endif 56411.1Skamil sigset_t intmask; 56421.1Skamil 56431.14Schristos atf_tc_expect_fail("wrong signal"); 56441.14Schristos 56451.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 56461.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 56471.1Skamil if (child == 0) { 56481.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 56491.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 56501.1Skamil 56511.1Skamil sigemptyset(&intmask); 56521.1Skamil sigaddset(&intmask, sigmasked); 56531.1Skamil sigprocmask(SIG_BLOCK, &intmask, NULL); 56541.1Skamil 56551.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 56561.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 56571.1Skamil 56581.13Schristos DPRINTF("Before calling execve(2) from child\n"); 56591.1Skamil execlp("/bin/echo", "/bin/echo", NULL); 56601.1Skamil 56611.13Schristos DPRINTF("Before exiting of the child process\n"); 56621.1Skamil _exit(exitval); 56631.1Skamil } 56641.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 56651.1Skamil 56661.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 56671.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 56681.1Skamil 56691.1Skamil validate_status_stopped(status, sigval); 56701.1Skamil 56711.13Schristos DPRINTF("Before resuming the child process where it left off and " 56721.1Skamil "without signal to be sent\n"); 56731.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 56741.1Skamil 56751.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 56761.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 56771.1Skamil 56781.1Skamil validate_status_stopped(status, sigmasked); 56791.1Skamil 56801.13Schristos DPRINTF("Before resuming the child process where it left off and " 56811.1Skamil "without signal to be sent\n"); 56821.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 56831.1Skamil 56841.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 56851.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 56861.1Skamil 56871.1Skamil validate_status_exited(status, exitval); 56881.1Skamil 56891.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 56901.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 56911.1Skamil} 56921.1Skamil 56931.1Skamil#if defined(TWAIT_HAVE_PID) 56941.1SkamilATF_TC(signal6); 56951.1SkamilATF_TC_HEAD(signal6, tc) 56961.1Skamil{ 56971.1Skamil atf_tc_set_md_var(tc, "timeout", "5"); 56981.1Skamil atf_tc_set_md_var(tc, "descr", 56991.1Skamil "Verify that masking SIGTRAP in tracee does not stop tracer from " 57001.1Skamil "catching PTRACE_FORK breakpoint"); 57011.1Skamil} 57021.1Skamil 57031.1SkamilATF_TC_BODY(signal6, tc) 57041.1Skamil{ 57051.1Skamil const int exitval = 5; 57061.1Skamil const int exitval2 = 15; 57071.1Skamil const int sigval = SIGSTOP; 57081.1Skamil const int sigmasked = SIGTRAP; 57091.1Skamil pid_t child, child2, wpid; 57101.1Skamil#if defined(TWAIT_HAVE_STATUS) 57111.1Skamil int status; 57121.1Skamil#endif 57131.1Skamil sigset_t intmask; 57141.1Skamil ptrace_state_t state; 57151.1Skamil const int slen = sizeof(state); 57161.1Skamil ptrace_event_t event; 57171.1Skamil const int elen = sizeof(event); 57181.1Skamil 57191.38Skamil atf_tc_expect_fail("PR kern/51918"); 57201.14Schristos 57211.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 57221.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 57231.1Skamil if (child == 0) { 57241.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 57251.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 57261.1Skamil 57271.1Skamil sigemptyset(&intmask); 57281.1Skamil sigaddset(&intmask, sigmasked); 57291.1Skamil sigprocmask(SIG_BLOCK, &intmask, NULL); 57301.1Skamil 57311.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 57321.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 57331.1Skamil 57341.1Skamil FORKEE_ASSERT((child2 = fork()) != -1); 57351.1Skamil 57361.1Skamil if (child2 == 0) 57371.1Skamil _exit(exitval2); 57381.1Skamil 57391.1Skamil FORKEE_REQUIRE_SUCCESS 57401.1Skamil (wpid = TWAIT_GENERIC(child2, &status, 0), child2); 57411.1Skamil 57421.1Skamil forkee_status_exited(status, exitval2); 57431.1Skamil 57441.13Schristos DPRINTF("Before exiting of the child process\n"); 57451.1Skamil _exit(exitval); 57461.1Skamil } 57471.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 57481.1Skamil 57491.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 57501.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 57511.1Skamil 57521.1Skamil validate_status_stopped(status, sigval); 57531.1Skamil 57541.13Schristos DPRINTF("Enable PTRACE_FORK in EVENT_MASK for the child %d\n", child); 57551.1Skamil event.pe_set_event = PTRACE_FORK; 57561.13Schristos SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1); 57571.1Skamil 57581.13Schristos DPRINTF("Before resuming the child process where it left off and " 57591.1Skamil "without signal to be sent\n"); 57601.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 57611.1Skamil 57621.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 57631.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 57641.1Skamil 57651.1Skamil validate_status_stopped(status, sigmasked); 57661.1Skamil 57671.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1); 57681.1Skamil ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_FORK); 57691.1Skamil 57701.1Skamil child2 = state.pe_other_pid; 57711.13Schristos DPRINTF("Reported PTRACE_FORK event with forkee %d\n", child2); 57721.1Skamil 57731.13Schristos DPRINTF("Before calling %s() for the child2\n", TWAIT_FNAME); 57741.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0), 57751.1Skamil child2); 57761.1Skamil 57771.1Skamil validate_status_stopped(status, SIGTRAP); 57781.1Skamil 57791.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child2, &state, slen) != -1); 57801.1Skamil ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_FORK); 57811.1Skamil ATF_REQUIRE_EQ(state.pe_other_pid, child); 57821.1Skamil 57831.13Schristos DPRINTF("Before resuming the forkee process where it left off and " 57841.1Skamil "without signal to be sent\n"); 57851.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child2, (void *)1, 0) != -1); 57861.1Skamil 57871.13Schristos DPRINTF("Before resuming the child process where it left off and " 57881.1Skamil "without signal to be sent\n"); 57891.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 57901.1Skamil 57911.13Schristos DPRINTF("Before calling %s() for the forkee - expected exited\n", 57921.1Skamil TWAIT_FNAME); 57931.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0), 57941.1Skamil child2); 57951.1Skamil 57961.1Skamil validate_status_exited(status, exitval2); 57971.1Skamil 57981.13Schristos DPRINTF("Before calling %s() for the forkee - expected no process\n", 57991.1Skamil TWAIT_FNAME); 58001.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, 58011.1Skamil wpid = TWAIT_GENERIC(child2, &status, 0)); 58021.1Skamil 58031.13Schristos DPRINTF("Before calling %s() for the child - expected stopped " 58041.1Skamil "SIGCHLD\n", TWAIT_FNAME); 58051.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 58061.1Skamil 58071.1Skamil validate_status_stopped(status, SIGCHLD); 58081.1Skamil 58091.13Schristos DPRINTF("Before resuming the child process where it left off and " 58101.1Skamil "without signal to be sent\n"); 58111.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 58121.1Skamil 58131.13Schristos DPRINTF("Before calling %s() for the child - expected exited\n", 58141.1Skamil TWAIT_FNAME); 58151.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 58161.1Skamil 58171.1Skamil validate_status_exited(status, exitval); 58181.1Skamil 58191.13Schristos DPRINTF("Before calling %s() for the child - expected no process\n", 58201.1Skamil TWAIT_FNAME); 58211.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 58221.1Skamil} 58231.1Skamil#endif 58241.1Skamil 58251.1Skamil#if defined(TWAIT_HAVE_PID) 58261.1SkamilATF_TC(signal7); 58271.1SkamilATF_TC_HEAD(signal7, tc) 58281.1Skamil{ 58291.1Skamil atf_tc_set_md_var(tc, "descr", 58301.1Skamil "Verify that masking SIGTRAP in tracee does not stop tracer from " 58311.1Skamil "catching PTRACE_VFORK breakpoint"); 58321.1Skamil} 58331.1Skamil 58341.1SkamilATF_TC_BODY(signal7, tc) 58351.1Skamil{ 58361.1Skamil const int exitval = 5; 58371.1Skamil const int exitval2 = 15; 58381.1Skamil const int sigval = SIGSTOP; 58391.1Skamil const int sigmasked = SIGTRAP; 58401.1Skamil pid_t child, child2, wpid; 58411.1Skamil#if defined(TWAIT_HAVE_STATUS) 58421.1Skamil int status; 58431.1Skamil#endif 58441.1Skamil sigset_t intmask; 58451.1Skamil ptrace_state_t state; 58461.1Skamil const int slen = sizeof(state); 58471.1Skamil ptrace_event_t event; 58481.1Skamil const int elen = sizeof(event); 58491.1Skamil 58501.38Skamil atf_tc_expect_fail("PR kern/51918"); 58511.14Schristos 58521.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 58531.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 58541.1Skamil if (child == 0) { 58551.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 58561.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 58571.1Skamil 58581.1Skamil sigemptyset(&intmask); 58591.1Skamil sigaddset(&intmask, sigmasked); 58601.1Skamil sigprocmask(SIG_BLOCK, &intmask, NULL); 58611.1Skamil 58621.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 58631.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 58641.1Skamil 58651.1Skamil FORKEE_ASSERT((child2 = fork()) != -1); 58661.1Skamil 58671.1Skamil if (child2 == 0) 58681.1Skamil _exit(exitval2); 58691.1Skamil 58701.1Skamil FORKEE_REQUIRE_SUCCESS 58711.1Skamil (wpid = TWAIT_GENERIC(child2, &status, 0), child2); 58721.1Skamil 58731.1Skamil forkee_status_exited(status, exitval2); 58741.1Skamil 58751.13Schristos DPRINTF("Before exiting of the child process\n"); 58761.1Skamil _exit(exitval); 58771.1Skamil } 58781.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 58791.1Skamil 58801.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 58811.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 58821.1Skamil 58831.1Skamil validate_status_stopped(status, sigval); 58841.1Skamil 58851.13Schristos DPRINTF("Enable PTRACE_VFORK in EVENT_MASK for the child %d\n", child); 58861.1Skamil event.pe_set_event = PTRACE_VFORK; 58871.13Schristos SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1 || errno == ENOTSUP); 58881.1Skamil 58891.13Schristos DPRINTF("Before resuming the child process where it left off and " 58901.1Skamil "without signal to be sent\n"); 58911.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 58921.1Skamil 58931.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 58941.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 58951.1Skamil 58961.1Skamil validate_status_stopped(status, sigmasked); 58971.1Skamil 58981.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1); 58991.1Skamil ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_VFORK); 59001.1Skamil 59011.1Skamil child2 = state.pe_other_pid; 59021.13Schristos DPRINTF("Reported PTRACE_VFORK event with forkee %d\n", child2); 59031.1Skamil 59041.13Schristos DPRINTF("Before calling %s() for the child2\n", TWAIT_FNAME); 59051.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0), 59061.1Skamil child2); 59071.1Skamil 59081.1Skamil validate_status_stopped(status, SIGTRAP); 59091.1Skamil 59101.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child2, &state, slen) != -1); 59111.1Skamil ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_VFORK); 59121.1Skamil ATF_REQUIRE_EQ(state.pe_other_pid, child); 59131.1Skamil 59141.13Schristos DPRINTF("Before resuming the forkee process where it left off and " 59151.1Skamil "without signal to be sent\n"); 59161.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child2, (void *)1, 0) != -1); 59171.1Skamil 59181.13Schristos DPRINTF("Before resuming the child process where it left off and " 59191.1Skamil "without signal to be sent\n"); 59201.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 59211.1Skamil 59221.13Schristos DPRINTF("Before calling %s() for the forkee - expected exited\n", 59231.1Skamil TWAIT_FNAME); 59241.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child2, &status, 0), 59251.1Skamil child2); 59261.1Skamil 59271.1Skamil validate_status_exited(status, exitval2); 59281.1Skamil 59291.13Schristos DPRINTF("Before calling %s() for the forkee - expected no process\n", 59301.1Skamil TWAIT_FNAME); 59311.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, 59321.1Skamil wpid = TWAIT_GENERIC(child2, &status, 0)); 59331.1Skamil 59341.13Schristos DPRINTF("Before calling %s() for the child - expected stopped " 59351.1Skamil "SIGCHLD\n", TWAIT_FNAME); 59361.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 59371.1Skamil 59381.1Skamil validate_status_stopped(status, SIGCHLD); 59391.1Skamil 59401.13Schristos DPRINTF("Before resuming the child process where it left off and " 59411.1Skamil "without signal to be sent\n"); 59421.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 59431.1Skamil 59441.13Schristos DPRINTF("Before calling %s() for the child - expected exited\n", 59451.1Skamil TWAIT_FNAME); 59461.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 59471.1Skamil 59481.1Skamil validate_status_exited(status, exitval); 59491.1Skamil 59501.13Schristos DPRINTF("Before calling %s() for the child - expected no process\n", 59511.1Skamil TWAIT_FNAME); 59521.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 59531.1Skamil} 59541.1Skamil#endif 59551.1Skamil 59561.1SkamilATF_TC(signal8); 59571.1SkamilATF_TC_HEAD(signal8, tc) 59581.1Skamil{ 59591.1Skamil atf_tc_set_md_var(tc, "descr", 59601.1Skamil "Verify that masking SIGTRAP in tracee does not stop tracer from " 59611.1Skamil "catching PTRACE_VFORK_DONE breakpoint"); 59621.1Skamil} 59631.1Skamil 59641.1SkamilATF_TC_BODY(signal8, tc) 59651.1Skamil{ 59661.1Skamil const int exitval = 5; 59671.1Skamil const int exitval2 = 15; 59681.1Skamil const int sigval = SIGSTOP; 59691.1Skamil const int sigmasked = SIGTRAP; 59701.1Skamil pid_t child, child2, wpid; 59711.1Skamil#if defined(TWAIT_HAVE_STATUS) 59721.1Skamil int status; 59731.1Skamil#endif 59741.1Skamil sigset_t intmask; 59751.1Skamil ptrace_state_t state; 59761.1Skamil const int slen = sizeof(state); 59771.1Skamil ptrace_event_t event; 59781.1Skamil const int elen = sizeof(event); 59791.1Skamil 59801.14Schristos atf_tc_expect_fail("PR kern/51918"); 59811.14Schristos 59821.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 59831.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 59841.1Skamil if (child == 0) { 59851.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 59861.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 59871.1Skamil 59881.1Skamil sigemptyset(&intmask); 59891.1Skamil sigaddset(&intmask, sigmasked); 59901.1Skamil sigprocmask(SIG_BLOCK, &intmask, NULL); 59911.1Skamil 59921.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 59931.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 59941.1Skamil 59951.1Skamil FORKEE_ASSERT((child2 = vfork()) != -1); 59961.1Skamil 59971.1Skamil if (child2 == 0) 59981.1Skamil _exit(exitval2); 59991.1Skamil 60001.1Skamil FORKEE_REQUIRE_SUCCESS 60011.1Skamil (wpid = TWAIT_GENERIC(child2, &status, 0), child2); 60021.1Skamil 60031.1Skamil forkee_status_exited(status, exitval2); 60041.1Skamil 60051.13Schristos DPRINTF("Before exiting of the child process\n"); 60061.1Skamil _exit(exitval); 60071.1Skamil } 60081.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 60091.1Skamil 60101.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 60111.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 60121.1Skamil 60131.1Skamil validate_status_stopped(status, sigval); 60141.1Skamil 60151.13Schristos DPRINTF("Enable PTRACE_VFORK_DONE in EVENT_MASK for the child %d\n", 60161.1Skamil child); 60171.1Skamil event.pe_set_event = PTRACE_VFORK_DONE; 60181.13Schristos SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1); 60191.1Skamil 60201.13Schristos DPRINTF("Before resuming the child process where it left off and " 60211.1Skamil "without signal to be sent\n"); 60221.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 60231.1Skamil 60241.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 60251.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 60261.1Skamil 60271.1Skamil validate_status_stopped(status, sigmasked); 60281.1Skamil 60291.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1); 60301.1Skamil ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_VFORK_DONE); 60311.1Skamil 60321.1Skamil child2 = state.pe_other_pid; 60331.13Schristos DPRINTF("Reported PTRACE_VFORK_DONE event with forkee %d\n", child2); 60341.1Skamil 60351.13Schristos DPRINTF("Before resuming the child process where it left off and " 60361.1Skamil "without signal to be sent\n"); 60371.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 60381.1Skamil 60391.13Schristos DPRINTF("Before calling %s() for the child - expected stopped " 60401.1Skamil "SIGCHLD\n", TWAIT_FNAME); 60411.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 60421.1Skamil 60431.1Skamil validate_status_stopped(status, SIGCHLD); 60441.1Skamil 60451.13Schristos DPRINTF("Before resuming the child process where it left off and " 60461.1Skamil "without signal to be sent\n"); 60471.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 60481.1Skamil 60491.13Schristos DPRINTF("Before calling %s() for the child - expected exited\n", 60501.1Skamil TWAIT_FNAME); 60511.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 60521.1Skamil 60531.1Skamil validate_status_exited(status, exitval); 60541.1Skamil 60551.13Schristos DPRINTF("Before calling %s() for the child - expected no process\n", 60561.1Skamil TWAIT_FNAME); 60571.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 60581.1Skamil} 60591.1Skamil 60601.1SkamilATF_TC(signal9); 60611.1SkamilATF_TC_HEAD(signal9, tc) 60621.1Skamil{ 60631.1Skamil atf_tc_set_md_var(tc, "descr", 60641.1Skamil "Verify that masking SIGTRAP in tracee does not stop tracer from " 60651.1Skamil "catching PTRACE_LWP_CREATE breakpoint"); 60661.1Skamil} 60671.1Skamil 60681.1SkamilATF_TC_BODY(signal9, tc) 60691.1Skamil{ 60701.1Skamil const int exitval = 5; 60711.1Skamil const int sigval = SIGSTOP; 60721.1Skamil const int sigmasked = SIGTRAP; 60731.1Skamil pid_t child, wpid; 60741.1Skamil#if defined(TWAIT_HAVE_STATUS) 60751.1Skamil int status; 60761.1Skamil#endif 60771.1Skamil sigset_t intmask; 60781.1Skamil ptrace_state_t state; 60791.1Skamil const int slen = sizeof(state); 60801.1Skamil ptrace_event_t event; 60811.1Skamil const int elen = sizeof(event); 60821.1Skamil ucontext_t uc; 60831.1Skamil lwpid_t lid; 60841.1Skamil static const size_t ssize = 16*1024; 60851.1Skamil void *stack; 60861.1Skamil 60871.14Schristos atf_tc_expect_fail("PR kern/51918"); 60881.14Schristos 60891.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 60901.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 60911.1Skamil if (child == 0) { 60921.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 60931.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 60941.1Skamil 60951.1Skamil sigemptyset(&intmask); 60961.1Skamil sigaddset(&intmask, sigmasked); 60971.1Skamil sigprocmask(SIG_BLOCK, &intmask, NULL); 60981.1Skamil 60991.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 61001.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 61011.1Skamil 61021.13Schristos DPRINTF("Before allocating memory for stack in child\n"); 61031.1Skamil FORKEE_ASSERT((stack = malloc(ssize)) != NULL); 61041.1Skamil 61051.13Schristos DPRINTF("Before making context for new lwp in child\n"); 61061.1Skamil _lwp_makecontext(&uc, lwp_main_func, NULL, NULL, stack, ssize); 61071.1Skamil 61081.13Schristos DPRINTF("Before creating new in child\n"); 61091.1Skamil FORKEE_ASSERT(_lwp_create(&uc, 0, &lid) == 0); 61101.1Skamil 61111.13Schristos DPRINTF("Before waiting for lwp %d to exit\n", lid); 61121.1Skamil FORKEE_ASSERT(_lwp_wait(lid, NULL) == 0); 61131.1Skamil 61141.13Schristos DPRINTF("Before verifying that reported %d and running lid %d " 61151.1Skamil "are the same\n", lid, the_lwp_id); 61161.1Skamil FORKEE_ASSERT_EQ(lid, the_lwp_id); 61171.1Skamil 61181.13Schristos DPRINTF("Before exiting of the child process\n"); 61191.1Skamil _exit(exitval); 61201.1Skamil } 61211.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 61221.1Skamil 61231.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 61241.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 61251.1Skamil 61261.1Skamil validate_status_stopped(status, sigval); 61271.1Skamil 61281.13Schristos DPRINTF("Set empty EVENT_MASK for the child %d\n", child); 61291.1Skamil event.pe_set_event = PTRACE_LWP_CREATE; 61301.13Schristos SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1); 61311.1Skamil 61321.13Schristos DPRINTF("Before resuming the child process where it left off and " 61331.1Skamil "without signal to be sent\n"); 61341.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 61351.1Skamil 61361.13Schristos DPRINTF("Before calling %s() for the child - expected stopped " 61371.1Skamil "SIGTRAP\n", TWAIT_FNAME); 61381.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 61391.1Skamil 61401.1Skamil validate_status_stopped(status, sigmasked); 61411.1Skamil 61421.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1); 61431.1Skamil 61441.1Skamil ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_LWP_CREATE); 61451.1Skamil 61461.1Skamil lid = state.pe_lwp; 61471.13Schristos DPRINTF("Reported PTRACE_LWP_CREATE event with lid %d\n", lid); 61481.1Skamil 61491.13Schristos DPRINTF("Before resuming the child process where it left off and " 61501.1Skamil "without signal to be sent\n"); 61511.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 61521.1Skamil 61531.13Schristos DPRINTF("Before calling %s() for the child - expected exited\n", 61541.1Skamil TWAIT_FNAME); 61551.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 61561.1Skamil 61571.1Skamil validate_status_exited(status, exitval); 61581.1Skamil 61591.13Schristos DPRINTF("Before calling %s() for the child - expected no process\n", 61601.1Skamil TWAIT_FNAME); 61611.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 61621.1Skamil} 61631.1Skamil 61641.1SkamilATF_TC(signal10); 61651.1SkamilATF_TC_HEAD(signal10, tc) 61661.1Skamil{ 61671.1Skamil atf_tc_set_md_var(tc, "descr", 61681.1Skamil "Verify that masking SIGTRAP in tracee does not stop tracer from " 61691.1Skamil "catching PTRACE_LWP_EXIT breakpoint"); 61701.1Skamil} 61711.1Skamil 61721.1SkamilATF_TC_BODY(signal10, tc) 61731.1Skamil{ 61741.1Skamil const int exitval = 5; 61751.1Skamil const int sigval = SIGSTOP; 61761.1Skamil const int sigmasked = SIGTRAP; 61771.1Skamil pid_t child, wpid; 61781.1Skamil#if defined(TWAIT_HAVE_STATUS) 61791.1Skamil int status; 61801.1Skamil#endif 61811.1Skamil sigset_t intmask; 61821.1Skamil ptrace_state_t state; 61831.1Skamil const int slen = sizeof(state); 61841.1Skamil ptrace_event_t event; 61851.1Skamil const int elen = sizeof(event); 61861.1Skamil ucontext_t uc; 61871.1Skamil lwpid_t lid; 61881.1Skamil static const size_t ssize = 16*1024; 61891.1Skamil void *stack; 61901.1Skamil 61911.14Schristos atf_tc_expect_fail("PR kern/51918"); 61921.14Schristos 61931.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 61941.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 61951.1Skamil if (child == 0) { 61961.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 61971.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 61981.1Skamil 61991.1Skamil sigemptyset(&intmask); 62001.1Skamil sigaddset(&intmask, sigmasked); 62011.1Skamil sigprocmask(SIG_BLOCK, &intmask, NULL); 62021.1Skamil 62031.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 62041.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 62051.1Skamil 62061.13Schristos DPRINTF("Before allocating memory for stack in child\n"); 62071.1Skamil FORKEE_ASSERT((stack = malloc(ssize)) != NULL); 62081.1Skamil 62091.13Schristos DPRINTF("Before making context for new lwp in child\n"); 62101.1Skamil _lwp_makecontext(&uc, lwp_main_func, NULL, NULL, stack, ssize); 62111.1Skamil 62121.13Schristos DPRINTF("Before creating new in child\n"); 62131.1Skamil FORKEE_ASSERT(_lwp_create(&uc, 0, &lid) == 0); 62141.1Skamil 62151.13Schristos DPRINTF("Before waiting for lwp %d to exit\n", lid); 62161.1Skamil FORKEE_ASSERT(_lwp_wait(lid, NULL) == 0); 62171.1Skamil 62181.13Schristos DPRINTF("Before verifying that reported %d and running lid %d " 62191.1Skamil "are the same\n", lid, the_lwp_id); 62201.1Skamil FORKEE_ASSERT_EQ(lid, the_lwp_id); 62211.1Skamil 62221.13Schristos DPRINTF("Before exiting of the child process\n"); 62231.1Skamil _exit(exitval); 62241.1Skamil } 62251.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 62261.1Skamil 62271.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 62281.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 62291.1Skamil 62301.1Skamil validate_status_stopped(status, sigval); 62311.1Skamil 62321.13Schristos DPRINTF("Set empty EVENT_MASK for the child %d\n", child); 62331.1Skamil event.pe_set_event = PTRACE_LWP_EXIT; 62341.13Schristos SYSCALL_REQUIRE(ptrace(PT_SET_EVENT_MASK, child, &event, elen) != -1); 62351.1Skamil 62361.13Schristos DPRINTF("Before resuming the child process where it left off and " 62371.1Skamil "without signal to be sent\n"); 62381.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 62391.1Skamil 62401.13Schristos DPRINTF("Before calling %s() for the child - expected stopped " 62411.1Skamil "SIGTRAP\n", TWAIT_FNAME); 62421.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 62431.1Skamil 62441.1Skamil validate_status_stopped(status, sigmasked); 62451.1Skamil 62461.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_PROCESS_STATE, child, &state, slen) != -1); 62471.1Skamil 62481.1Skamil ATF_REQUIRE_EQ(state.pe_report_event, PTRACE_LWP_EXIT); 62491.1Skamil 62501.1Skamil lid = state.pe_lwp; 62511.13Schristos DPRINTF("Reported PTRACE_LWP_EXIT event with lid %d\n", lid); 62521.1Skamil 62531.13Schristos DPRINTF("Before resuming the child process where it left off and " 62541.1Skamil "without signal to be sent\n"); 62551.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 62561.1Skamil 62571.13Schristos DPRINTF("Before calling %s() for the child - expected exited\n", 62581.1Skamil TWAIT_FNAME); 62591.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 62601.1Skamil 62611.1Skamil validate_status_exited(status, exitval); 62621.1Skamil 62631.13Schristos DPRINTF("Before calling %s() for the child - expected no process\n", 62641.1Skamil TWAIT_FNAME); 62651.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 62661.1Skamil} 62671.1Skamil 62681.1Skamilstatic void 62691.1Skamillwp_main_stop(void *arg) 62701.1Skamil{ 62711.1Skamil the_lwp_id = _lwp_self(); 62721.1Skamil 62731.1Skamil raise(SIGTRAP); 62741.1Skamil 62751.1Skamil _lwp_exit(); 62761.1Skamil} 62771.1Skamil 62781.1SkamilATF_TC(suspend1); 62791.1SkamilATF_TC_HEAD(suspend1, tc) 62801.1Skamil{ 62811.1Skamil atf_tc_set_md_var(tc, "descr", 62821.1Skamil "Verify that a thread can be suspended by a debugger and later " 62831.1Skamil "resumed by a tracee"); 62841.1Skamil} 62851.1Skamil 62861.1SkamilATF_TC_BODY(suspend1, tc) 62871.1Skamil{ 62881.1Skamil const int exitval = 5; 62891.1Skamil const int sigval = SIGSTOP; 62901.1Skamil pid_t child, wpid; 62911.1Skamil#if defined(TWAIT_HAVE_STATUS) 62921.1Skamil int status; 62931.1Skamil#endif 62941.1Skamil ucontext_t uc; 62951.1Skamil lwpid_t lid; 62961.1Skamil static const size_t ssize = 16*1024; 62971.1Skamil void *stack; 62981.1Skamil struct ptrace_lwpinfo pl; 62991.1Skamil struct ptrace_siginfo psi; 63001.1Skamil volatile int go = 0; 63011.1Skamil 63021.17Skamil // Feature pending for refactoring 63031.17Skamil atf_tc_expect_fail("PR kern/51995"); 63041.17Skamil 63051.16Skamil // Hangs with qemu 63061.16Skamil ATF_REQUIRE(0 && "In order to get reliable failure, abort"); 63071.16Skamil 63081.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 63091.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 63101.1Skamil if (child == 0) { 63111.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 63121.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 63131.1Skamil 63141.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 63151.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 63161.1Skamil 63171.13Schristos DPRINTF("Before allocating memory for stack in child\n"); 63181.1Skamil FORKEE_ASSERT((stack = malloc(ssize)) != NULL); 63191.1Skamil 63201.13Schristos DPRINTF("Before making context for new lwp in child\n"); 63211.1Skamil _lwp_makecontext(&uc, lwp_main_stop, NULL, NULL, stack, ssize); 63221.1Skamil 63231.13Schristos DPRINTF("Before creating new in child\n"); 63241.1Skamil FORKEE_ASSERT(_lwp_create(&uc, 0, &lid) == 0); 63251.1Skamil 63261.1Skamil while (go == 0) 63271.1Skamil continue; 63281.1Skamil 63291.1Skamil raise(SIGINT); 63301.1Skamil 63311.1Skamil FORKEE_ASSERT(_lwp_continue(lid) == 0); 63321.1Skamil 63331.13Schristos DPRINTF("Before waiting for lwp %d to exit\n", lid); 63341.1Skamil FORKEE_ASSERT(_lwp_wait(lid, NULL) == 0); 63351.1Skamil 63361.13Schristos DPRINTF("Before verifying that reported %d and running lid %d " 63371.1Skamil "are the same\n", lid, the_lwp_id); 63381.1Skamil FORKEE_ASSERT_EQ(lid, the_lwp_id); 63391.1Skamil 63401.13Schristos DPRINTF("Before exiting of the child process\n"); 63411.1Skamil _exit(exitval); 63421.1Skamil } 63431.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 63441.1Skamil 63451.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 63461.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 63471.1Skamil 63481.1Skamil validate_status_stopped(status, sigval); 63491.1Skamil 63501.13Schristos DPRINTF("Before resuming the child process where it left off and " 63511.1Skamil "without signal to be sent\n"); 63521.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 63531.1Skamil 63541.13Schristos DPRINTF("Before calling %s() for the child - expected stopped " 63551.1Skamil "SIGTRAP\n", TWAIT_FNAME); 63561.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 63571.1Skamil 63581.1Skamil validate_status_stopped(status, SIGTRAP); 63591.1Skamil 63601.13Schristos DPRINTF("Before reading siginfo and lwpid_t\n"); 63611.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &psi, sizeof(psi)) != -1); 63621.1Skamil 63631.13Schristos DPRINTF("Before suspending LWP %d\n", psi.psi_lwpid); 63641.13Schristos SYSCALL_REQUIRE(ptrace(PT_SUSPEND, child, NULL, psi.psi_lwpid) != -1); 63651.1Skamil 63661.13Schristos DPRINTF("Write new go to tracee (PID=%d) from tracer (PID=%d)\n", 63671.1Skamil child, getpid()); 63681.13Schristos SYSCALL_REQUIRE(ptrace(PT_WRITE_D, child, __UNVOLATILE(&go), 1) != -1); 63691.1Skamil 63701.13Schristos DPRINTF("Before resuming the child process where it left off and " 63711.1Skamil "without signal to be sent\n"); 63721.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 63731.1Skamil 63741.13Schristos DPRINTF("Before calling %s() for the child - expected stopped " 63751.1Skamil "SIGINT\n", TWAIT_FNAME); 63761.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 63771.1Skamil 63781.1Skamil validate_status_stopped(status, SIGINT); 63791.1Skamil 63801.1Skamil pl.pl_lwpid = 0; 63811.1Skamil 63821.13Schristos SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &pl, sizeof(pl)) != -1); 63831.1Skamil while (pl.pl_lwpid != 0) { 63841.1Skamil 63851.13Schristos SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &pl, sizeof(pl)) != -1); 63861.1Skamil switch (pl.pl_lwpid) { 63871.1Skamil case 1: 63881.1Skamil ATF_REQUIRE_EQ(pl.pl_event, PL_EVENT_SIGNAL); 63891.1Skamil break; 63901.1Skamil case 2: 63911.1Skamil ATF_REQUIRE_EQ(pl.pl_event, PL_EVENT_SUSPENDED); 63921.1Skamil break; 63931.1Skamil } 63941.1Skamil } 63951.1Skamil 63961.13Schristos DPRINTF("Before resuming the child process where it left off and " 63971.1Skamil "without signal to be sent\n"); 63981.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 63991.1Skamil 64001.13Schristos DPRINTF("Before calling %s() for the child - expected exited\n", 64011.1Skamil TWAIT_FNAME); 64021.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 64031.1Skamil 64041.1Skamil validate_status_exited(status, exitval); 64051.1Skamil 64061.13Schristos DPRINTF("Before calling %s() for the child - expected no process\n", 64071.1Skamil TWAIT_FNAME); 64081.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 64091.1Skamil} 64101.1Skamil 64111.1SkamilATF_TC(suspend2); 64121.1SkamilATF_TC_HEAD(suspend2, tc) 64131.1Skamil{ 64141.1Skamil atf_tc_set_md_var(tc, "descr", 64151.1Skamil "Verify that the while the only thread within a process is " 64161.1Skamil "suspended, the whole process cannot be unstopped"); 64171.1Skamil} 64181.1Skamil 64191.1SkamilATF_TC_BODY(suspend2, tc) 64201.1Skamil{ 64211.1Skamil const int exitval = 5; 64221.1Skamil const int sigval = SIGSTOP; 64231.1Skamil pid_t child, wpid; 64241.1Skamil#if defined(TWAIT_HAVE_STATUS) 64251.1Skamil int status; 64261.1Skamil#endif 64271.1Skamil struct ptrace_siginfo psi; 64281.1Skamil 64291.17Skamil // Feature pending for refactoring 64301.17Skamil atf_tc_expect_fail("PR kern/51995"); 64311.17Skamil 64321.16Skamil // Hangs with qemu 64331.16Skamil ATF_REQUIRE(0 && "In order to get reliable failure, abort"); 64341.16Skamil 64351.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 64361.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 64371.1Skamil if (child == 0) { 64381.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 64391.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 64401.1Skamil 64411.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 64421.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 64431.1Skamil 64441.13Schristos DPRINTF("Before exiting of the child process\n"); 64451.1Skamil _exit(exitval); 64461.1Skamil } 64471.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 64481.1Skamil 64491.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 64501.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 64511.1Skamil 64521.1Skamil validate_status_stopped(status, sigval); 64531.1Skamil 64541.13Schristos DPRINTF("Before reading siginfo and lwpid_t\n"); 64551.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &psi, sizeof(psi)) != -1); 64561.1Skamil 64571.13Schristos DPRINTF("Before suspending LWP %d\n", psi.psi_lwpid); 64581.13Schristos SYSCALL_REQUIRE(ptrace(PT_SUSPEND, child, NULL, psi.psi_lwpid) != -1); 64591.1Skamil 64601.13Schristos DPRINTF("Before resuming the child process where it left off and " 64611.1Skamil "without signal to be sent\n"); 64621.1Skamil ATF_REQUIRE_ERRNO(EDEADLK, 64631.1Skamil ptrace(PT_CONTINUE, child, (void *)1, 0) == -1); 64641.1Skamil 64651.13Schristos DPRINTF("Before resuming LWP %d\n", psi.psi_lwpid); 64661.13Schristos SYSCALL_REQUIRE(ptrace(PT_RESUME, child, NULL, psi.psi_lwpid) != -1); 64671.1Skamil 64681.13Schristos DPRINTF("Before resuming the child process where it left off and " 64691.1Skamil "without signal to be sent\n"); 64701.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 64711.1Skamil 64721.13Schristos DPRINTF("Before calling %s() for the child - expected exited\n", 64731.1Skamil TWAIT_FNAME); 64741.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 64751.1Skamil 64761.1Skamil validate_status_exited(status, exitval); 64771.1Skamil 64781.13Schristos DPRINTF("Before calling %s() for the child - expected no process\n", 64791.1Skamil TWAIT_FNAME); 64801.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 64811.1Skamil} 64821.1Skamil 64831.1SkamilATF_TC(resume1); 64841.1SkamilATF_TC_HEAD(resume1, tc) 64851.1Skamil{ 64861.1Skamil atf_tc_set_md_var(tc, "timeout", "5"); 64871.1Skamil atf_tc_set_md_var(tc, "descr", 64881.1Skamil "Verify that a thread can be suspended by a debugger and later " 64891.1Skamil "resumed by the debugger"); 64901.1Skamil} 64911.1Skamil 64921.1SkamilATF_TC_BODY(resume1, tc) 64931.1Skamil{ 64941.1Skamil struct msg_fds fds; 64951.1Skamil const int exitval = 5; 64961.1Skamil const int sigval = SIGSTOP; 64971.1Skamil pid_t child, wpid; 64981.1Skamil uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */ 64991.1Skamil#if defined(TWAIT_HAVE_STATUS) 65001.1Skamil int status; 65011.1Skamil#endif 65021.1Skamil ucontext_t uc; 65031.1Skamil lwpid_t lid; 65041.1Skamil static const size_t ssize = 16*1024; 65051.1Skamil void *stack; 65061.1Skamil struct ptrace_lwpinfo pl; 65071.1Skamil struct ptrace_siginfo psi; 65081.1Skamil 65091.17Skamil // Feature pending for refactoring 65101.17Skamil atf_tc_expect_fail("PR kern/51995"); 65111.17Skamil 65121.15Schristos // Hangs with qemu 65131.15Schristos ATF_REQUIRE(0 && "In order to get reliable failure, abort"); 65141.1Skamil 65151.13Schristos SYSCALL_REQUIRE(msg_open(&fds) == 0); 65161.1Skamil 65171.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 65181.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 65191.1Skamil if (child == 0) { 65201.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 65211.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 65221.1Skamil 65231.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 65241.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 65251.1Skamil 65261.13Schristos DPRINTF("Before allocating memory for stack in child\n"); 65271.1Skamil FORKEE_ASSERT((stack = malloc(ssize)) != NULL); 65281.1Skamil 65291.13Schristos DPRINTF("Before making context for new lwp in child\n"); 65301.1Skamil _lwp_makecontext(&uc, lwp_main_stop, NULL, NULL, stack, ssize); 65311.1Skamil 65321.13Schristos DPRINTF("Before creating new in child\n"); 65331.1Skamil FORKEE_ASSERT(_lwp_create(&uc, 0, &lid) == 0); 65341.1Skamil 65351.1Skamil CHILD_TO_PARENT("Message", fds, msg); 65361.1Skamil 65371.1Skamil raise(SIGINT); 65381.1Skamil 65391.13Schristos DPRINTF("Before waiting for lwp %d to exit\n", lid); 65401.1Skamil FORKEE_ASSERT(_lwp_wait(lid, NULL) == 0); 65411.1Skamil 65421.13Schristos DPRINTF("Before verifying that reported %d and running lid %d " 65431.1Skamil "are the same\n", lid, the_lwp_id); 65441.1Skamil FORKEE_ASSERT_EQ(lid, the_lwp_id); 65451.1Skamil 65461.13Schristos DPRINTF("Before exiting of the child process\n"); 65471.1Skamil _exit(exitval); 65481.1Skamil } 65491.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 65501.1Skamil 65511.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 65521.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 65531.1Skamil 65541.1Skamil validate_status_stopped(status, sigval); 65551.1Skamil 65561.13Schristos DPRINTF("Before resuming the child process where it left off and " 65571.1Skamil "without signal to be sent\n"); 65581.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 65591.1Skamil 65601.13Schristos DPRINTF("Before calling %s() for the child - expected stopped " 65611.1Skamil "SIGTRAP\n", TWAIT_FNAME); 65621.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 65631.1Skamil 65641.1Skamil validate_status_stopped(status, SIGTRAP); 65651.1Skamil 65661.13Schristos DPRINTF("Before reading siginfo and lwpid_t\n"); 65671.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &psi, sizeof(psi)) != -1); 65681.1Skamil 65691.13Schristos DPRINTF("Before suspending LWP %d\n", psi.psi_lwpid); 65701.13Schristos SYSCALL_REQUIRE(ptrace(PT_SUSPEND, child, NULL, psi.psi_lwpid) != -1); 65711.1Skamil 65721.1Skamil PARENT_FROM_CHILD("Message", fds, msg); 65731.1Skamil 65741.13Schristos DPRINTF("Before resuming the child process where it left off and " 65751.1Skamil "without signal to be sent\n"); 65761.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 65771.1Skamil 65781.13Schristos DPRINTF("Before calling %s() for the child - expected stopped " 65791.1Skamil "SIGINT\n", TWAIT_FNAME); 65801.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 65811.1Skamil 65821.1Skamil validate_status_stopped(status, SIGINT); 65831.1Skamil 65841.1Skamil pl.pl_lwpid = 0; 65851.1Skamil 65861.13Schristos SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &pl, sizeof(pl)) != -1); 65871.1Skamil while (pl.pl_lwpid != 0) { 65881.13Schristos SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &pl, sizeof(pl)) != -1); 65891.1Skamil switch (pl.pl_lwpid) { 65901.1Skamil case 1: 65911.1Skamil ATF_REQUIRE_EQ(pl.pl_event, PL_EVENT_SIGNAL); 65921.1Skamil break; 65931.1Skamil case 2: 65941.1Skamil ATF_REQUIRE_EQ(pl.pl_event, PL_EVENT_SUSPENDED); 65951.1Skamil break; 65961.1Skamil } 65971.1Skamil } 65981.1Skamil 65991.13Schristos DPRINTF("Before resuming LWP %d\n", psi.psi_lwpid); 66001.13Schristos SYSCALL_REQUIRE(ptrace(PT_RESUME, child, NULL, psi.psi_lwpid) != -1); 66011.1Skamil 66021.13Schristos DPRINTF("Before resuming the child process where it left off and " 66031.1Skamil "without signal to be sent\n"); 66041.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 66051.1Skamil 66061.13Schristos DPRINTF("Before calling %s() for the child - expected exited\n", 66071.1Skamil TWAIT_FNAME); 66081.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 66091.1Skamil 66101.1Skamil validate_status_exited(status, exitval); 66111.1Skamil 66121.13Schristos DPRINTF("Before calling %s() for the child - expected no process\n", 66131.1Skamil TWAIT_FNAME); 66141.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 66151.1Skamil 66161.1Skamil msg_close(&fds); 66171.1Skamil 66181.13Schristos DPRINTF("XXX: Test worked this time but for consistency timeout it\n"); 66191.1Skamil sleep(10); 66201.1Skamil} 66211.1Skamil 66221.1SkamilATF_TC(syscall1); 66231.1SkamilATF_TC_HEAD(syscall1, tc) 66241.1Skamil{ 66251.1Skamil atf_tc_set_md_var(tc, "descr", 66261.1Skamil "Verify that getpid(2) can be traced with PT_SYSCALL"); 66271.1Skamil} 66281.1Skamil 66291.1SkamilATF_TC_BODY(syscall1, tc) 66301.1Skamil{ 66311.1Skamil const int exitval = 5; 66321.1Skamil const int sigval = SIGSTOP; 66331.1Skamil pid_t child, wpid; 66341.1Skamil#if defined(TWAIT_HAVE_STATUS) 66351.1Skamil int status; 66361.1Skamil#endif 66371.1Skamil struct ptrace_siginfo info; 66381.1Skamil memset(&info, 0, sizeof(info)); 66391.1Skamil 66401.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 66411.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 66421.1Skamil if (child == 0) { 66431.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 66441.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 66451.1Skamil 66461.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 66471.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 66481.1Skamil 66491.1Skamil syscall(SYS_getpid); 66501.1Skamil 66511.13Schristos DPRINTF("Before exiting of the child process\n"); 66521.1Skamil _exit(exitval); 66531.1Skamil } 66541.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 66551.1Skamil 66561.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 66571.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 66581.1Skamil 66591.1Skamil validate_status_stopped(status, sigval); 66601.1Skamil 66611.13Schristos DPRINTF("Before resuming the child process where it left off and " 66621.1Skamil "without signal to be sent\n"); 66631.13Schristos SYSCALL_REQUIRE(ptrace(PT_SYSCALL, child, (void *)1, 0) != -1); 66641.1Skamil 66651.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 66661.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 66671.1Skamil 66681.1Skamil validate_status_stopped(status, SIGTRAP); 66691.1Skamil 66701.13Schristos DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n"); 66711.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1); 66721.1Skamil 66731.38Skamil DPRINTF("Before checking siginfo_t and lwpid\n"); 66741.38Skamil ATF_REQUIRE_EQ(info.psi_lwpid, 1); 66751.1Skamil ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, SIGTRAP); 66761.1Skamil ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_SCE); 66771.1Skamil 66781.13Schristos DPRINTF("Before resuming the child process where it left off and " 66791.1Skamil "without signal to be sent\n"); 66801.13Schristos SYSCALL_REQUIRE(ptrace(PT_SYSCALL, child, (void *)1, 0) != -1); 66811.1Skamil 66821.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 66831.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 66841.1Skamil 66851.1Skamil validate_status_stopped(status, SIGTRAP); 66861.1Skamil 66871.13Schristos DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child\n"); 66881.13Schristos SYSCALL_REQUIRE(ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1); 66891.1Skamil 66901.38Skamil DPRINTF("Before checking siginfo_t and lwpid\n"); 66911.38Skamil ATF_REQUIRE_EQ(info.psi_lwpid, 1); 66921.1Skamil ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, SIGTRAP); 66931.1Skamil ATF_REQUIRE_EQ(info.psi_siginfo.si_code, TRAP_SCX); 66941.1Skamil 66951.13Schristos DPRINTF("Before resuming the child process where it left off and " 66961.1Skamil "without signal to be sent\n"); 66971.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 66981.1Skamil 66991.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 67001.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 67011.1Skamil 67021.1Skamil validate_status_exited(status, exitval); 67031.1Skamil 67041.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 67051.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 67061.1Skamil} 67071.1Skamil 67081.1SkamilATF_TC(syscallemu1); 67091.1SkamilATF_TC_HEAD(syscallemu1, tc) 67101.1Skamil{ 67111.1Skamil atf_tc_set_md_var(tc, "descr", 67121.1Skamil "Verify that exit(2) can be intercepted with PT_SYSCALLEMU"); 67131.1Skamil} 67141.1Skamil 67151.1SkamilATF_TC_BODY(syscallemu1, tc) 67161.1Skamil{ 67171.1Skamil const int exitval = 5; 67181.1Skamil const int sigval = SIGSTOP; 67191.1Skamil pid_t child, wpid; 67201.1Skamil#if defined(TWAIT_HAVE_STATUS) 67211.1Skamil int status; 67221.1Skamil#endif 67231.1Skamil 67241.6Skamil#if defined(__sparc__) && !defined(__sparc64__) 67251.6Skamil /* syscallemu does not work on sparc (32-bit) */ 67261.6Skamil atf_tc_expect_fail("PR kern/52166"); 67271.6Skamil#endif 67281.6Skamil 67291.13Schristos DPRINTF("Before forking process PID=%d\n", getpid()); 67301.13Schristos SYSCALL_REQUIRE((child = fork()) != -1); 67311.1Skamil if (child == 0) { 67321.13Schristos DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 67331.1Skamil FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 67341.1Skamil 67351.13Schristos DPRINTF("Before raising %s from child\n", strsignal(sigval)); 67361.1Skamil FORKEE_ASSERT(raise(sigval) == 0); 67371.1Skamil 67381.1Skamil syscall(SYS_exit, 100); 67391.1Skamil 67401.13Schristos DPRINTF("Before exiting of the child process\n"); 67411.1Skamil _exit(exitval); 67421.1Skamil } 67431.13Schristos DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 67441.1Skamil 67451.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 67461.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 67471.1Skamil 67481.1Skamil validate_status_stopped(status, sigval); 67491.1Skamil 67501.13Schristos DPRINTF("Before resuming the child process where it left off and " 67511.1Skamil "without signal to be sent\n"); 67521.13Schristos SYSCALL_REQUIRE(ptrace(PT_SYSCALL, child, (void *)1, 0) != -1); 67531.1Skamil 67541.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 67551.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 67561.1Skamil 67571.1Skamil validate_status_stopped(status, SIGTRAP); 67581.1Skamil 67591.13Schristos DPRINTF("Set SYSCALLEMU for intercepted syscall\n"); 67601.13Schristos SYSCALL_REQUIRE(ptrace(PT_SYSCALLEMU, child, (void *)1, 0) != -1); 67611.1Skamil 67621.13Schristos DPRINTF("Before resuming the child process where it left off and " 67631.1Skamil "without signal to be sent\n"); 67641.13Schristos SYSCALL_REQUIRE(ptrace(PT_SYSCALL, child, (void *)1, 0) != -1); 67651.1Skamil 67661.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 67671.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 67681.1Skamil 67691.1Skamil validate_status_stopped(status, SIGTRAP); 67701.1Skamil 67711.13Schristos DPRINTF("Before resuming the child process where it left off and " 67721.1Skamil "without signal to be sent\n"); 67731.13Schristos SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 67741.1Skamil 67751.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 67761.1Skamil TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 67771.1Skamil 67781.1Skamil validate_status_exited(status, exitval); 67791.1Skamil 67801.13Schristos DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 67811.1Skamil TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 67821.1Skamil} 67831.1Skamil 67841.26Skamil#if defined(TWAIT_HAVE_PID) 67851.26SkamilATF_TC(race1); 67861.26SkamilATF_TC_HEAD(race1, tc) 67871.26Skamil{ 67881.26Skamil atf_tc_set_md_var(tc, "descr", 67891.26Skamil "Assert that await_zombie() in attach1 always finds a single " 67901.26Skamil "process and no other error is reported"); 67911.26Skamil} 67921.26Skamil 67931.26SkamilATF_TC_BODY(race1, tc) 67941.26Skamil{ 67951.26Skamil time_t start, end; 67961.26Skamil double diff; 67971.26Skamil unsigned long N = 0; 67981.26Skamil 67991.26Skamil /* Reuse this test with attach1 */ 68001.26Skamil 68011.26Skamil start = time(NULL); 68021.26Skamil while (true) { 68031.26Skamil DPRINTF("Step: %lu\n", N); 68041.26Skamil attach1_raw(true); 68051.26Skamil end = time(NULL); 68061.26Skamil diff = difftime(end, start); 68071.26Skamil if (diff >= 5.0) 68081.26Skamil break; 68091.26Skamil ++N; 68101.26Skamil } 68111.26Skamil DPRINTF("Iterations: %lu\n", N); 68121.26Skamil} 68131.26Skamil#endif 68141.26Skamil 68151.1Skamil#include "t_ptrace_amd64_wait.h" 68161.1Skamil#include "t_ptrace_i386_wait.h" 68171.1Skamil#include "t_ptrace_x86_wait.h" 68181.1Skamil 68191.1SkamilATF_TP_ADD_TCS(tp) 68201.1Skamil{ 68211.1Skamil setvbuf(stdout, NULL, _IONBF, 0); 68221.1Skamil setvbuf(stderr, NULL, _IONBF, 0); 68231.33Skamil 68241.36Skamil ATF_TP_ADD_TC(tp, traceme_raise1); 68251.33Skamil ATF_TP_ADD_TC(tp, traceme_raise2); 68261.33Skamil ATF_TP_ADD_TC(tp, traceme_raise3); 68271.33Skamil ATF_TP_ADD_TC(tp, traceme_raise4); 68281.33Skamil ATF_TP_ADD_TC(tp, traceme_raise5); 68291.33Skamil 68301.34Skamil ATF_TP_ADD_TC(tp, traceme_sighandler_catch1); 68311.34Skamil ATF_TP_ADD_TC(tp, traceme_sighandler_catch2); 68321.34Skamil ATF_TP_ADD_TC(tp, traceme_sighandler_catch3); 68331.34Skamil 68341.35Skamil ATF_TP_ADD_TC(tp, traceme_signal_nohandler1); 68351.35Skamil// ATF_TP_ADD_TC(tp, traceme_signal_nohandler2); // not yet 68361.35Skamil ATF_TP_ADD_TC(tp, traceme_signal_nohandler3); 68371.35Skamil ATF_TP_ADD_TC(tp, traceme_signal_nohandler4); 68381.35Skamil ATF_TP_ADD_TC(tp, traceme_signal_nohandler5); 68391.1Skamil 68401.37Skamil ATF_TP_ADD_TC(tp, traceme_pid1_parent); 68411.37Skamil 68421.1Skamil ATF_TP_ADD_TC_HAVE_PID(tp, attach1); 68431.1Skamil ATF_TP_ADD_TC_HAVE_PID(tp, attach2); 68441.1Skamil ATF_TP_ADD_TC(tp, attach3); 68451.1Skamil ATF_TP_ADD_TC(tp, attach4); 68461.1Skamil ATF_TP_ADD_TC_HAVE_PID(tp, attach5); 68471.1Skamil ATF_TP_ADD_TC_HAVE_PID(tp, attach6); 68481.1Skamil ATF_TP_ADD_TC_HAVE_PID(tp, attach7); 68491.1Skamil 68501.1Skamil ATF_TP_ADD_TC(tp, eventmask1); 68511.1Skamil ATF_TP_ADD_TC(tp, eventmask2); 68521.1Skamil ATF_TP_ADD_TC(tp, eventmask3); 68531.1Skamil ATF_TP_ADD_TC(tp, eventmask4); 68541.1Skamil ATF_TP_ADD_TC(tp, eventmask5); 68551.1Skamil ATF_TP_ADD_TC(tp, eventmask6); 68561.1Skamil 68571.31Skamil ATF_TP_ADD_TC(tp, fork1); 68581.31Skamil ATF_TP_ADD_TC_HAVE_PID(tp, fork2); 68591.31Skamil ATF_TP_ADD_TC_HAVE_PID(tp, fork3); 68601.31Skamil ATF_TP_ADD_TC_HAVE_PID(tp, fork4); 68611.31Skamil ATF_TP_ADD_TC(tp, fork5); 68621.31Skamil ATF_TP_ADD_TC_HAVE_PID(tp, fork6); 68631.31Skamil ATF_TP_ADD_TC_HAVE_PID(tp, fork7); 68641.31Skamil ATF_TP_ADD_TC_HAVE_PID(tp, fork8); 68651.31Skamil 68661.31Skamil ATF_TP_ADD_TC(tp, vfork1); 68671.31Skamil ATF_TP_ADD_TC_HAVE_PID(tp, vfork2); 68681.31Skamil ATF_TP_ADD_TC_HAVE_PID(tp, vfork3); 68691.31Skamil ATF_TP_ADD_TC_HAVE_PID(tp, vfork4); 68701.31Skamil ATF_TP_ADD_TC(tp, vfork5); 68711.31Skamil ATF_TP_ADD_TC_HAVE_PID(tp, vfork6); 68721.31Skamil ATF_TP_ADD_TC_HAVE_PID(tp, vfork7); 68731.31Skamil ATF_TP_ADD_TC_HAVE_PID(tp, vfork8); 68741.1Skamil 68751.1Skamil ATF_TP_ADD_TC(tp, io_read_d1); 68761.1Skamil ATF_TP_ADD_TC(tp, io_read_d2); 68771.1Skamil ATF_TP_ADD_TC(tp, io_read_d3); 68781.1Skamil ATF_TP_ADD_TC(tp, io_read_d4); 68791.1Skamil 68801.1Skamil ATF_TP_ADD_TC(tp, io_write_d1); 68811.1Skamil ATF_TP_ADD_TC(tp, io_write_d2); 68821.1Skamil ATF_TP_ADD_TC(tp, io_write_d3); 68831.1Skamil ATF_TP_ADD_TC(tp, io_write_d4); 68841.1Skamil 68851.1Skamil ATF_TP_ADD_TC(tp, read_d1); 68861.1Skamil ATF_TP_ADD_TC(tp, read_d2); 68871.1Skamil ATF_TP_ADD_TC(tp, read_d3); 68881.1Skamil ATF_TP_ADD_TC(tp, read_d4); 68891.1Skamil 68901.1Skamil ATF_TP_ADD_TC(tp, write_d1); 68911.1Skamil ATF_TP_ADD_TC(tp, write_d2); 68921.1Skamil ATF_TP_ADD_TC(tp, write_d3); 68931.1Skamil ATF_TP_ADD_TC(tp, write_d4); 68941.1Skamil 68951.1Skamil ATF_TP_ADD_TC(tp, io_read_d_write_d_handshake1); 68961.1Skamil ATF_TP_ADD_TC(tp, io_read_d_write_d_handshake2); 68971.1Skamil 68981.1Skamil ATF_TP_ADD_TC(tp, read_d_write_d_handshake1); 68991.1Skamil ATF_TP_ADD_TC(tp, read_d_write_d_handshake2); 69001.1Skamil 69011.1Skamil ATF_TP_ADD_TC(tp, io_read_i1); 69021.1Skamil ATF_TP_ADD_TC(tp, io_read_i2); 69031.1Skamil ATF_TP_ADD_TC(tp, io_read_i3); 69041.1Skamil ATF_TP_ADD_TC(tp, io_read_i4); 69051.1Skamil 69061.1Skamil ATF_TP_ADD_TC(tp, read_i1); 69071.1Skamil ATF_TP_ADD_TC(tp, read_i2); 69081.1Skamil ATF_TP_ADD_TC(tp, read_i3); 69091.1Skamil ATF_TP_ADD_TC(tp, read_i4); 69101.1Skamil 69111.1Skamil ATF_TP_ADD_TC(tp, io_read_auxv1); 69121.1Skamil 69131.1Skamil ATF_TP_ADD_TC_HAVE_GPREGS(tp, regs1); 69141.1Skamil ATF_TP_ADD_TC_HAVE_GPREGS(tp, regs2); 69151.1Skamil ATF_TP_ADD_TC_HAVE_GPREGS(tp, regs3); 69161.1Skamil ATF_TP_ADD_TC_HAVE_GPREGS(tp, regs4); 69171.1Skamil ATF_TP_ADD_TC_HAVE_GPREGS(tp, regs5); 69181.1Skamil 69191.1Skamil ATF_TP_ADD_TC_HAVE_FPREGS(tp, fpregs1); 69201.1Skamil ATF_TP_ADD_TC_HAVE_FPREGS(tp, fpregs2); 69211.1Skamil 69221.1Skamil ATF_TP_ADD_TC_PT_STEP(tp, step1); 69231.1Skamil ATF_TP_ADD_TC_PT_STEP(tp, step2); 69241.1Skamil ATF_TP_ADD_TC_PT_STEP(tp, step3); 69251.1Skamil ATF_TP_ADD_TC_PT_STEP(tp, step4); 69261.1Skamil 69271.2Skamil ATF_TP_ADD_TC_PT_STEP(tp, setstep1); 69281.2Skamil ATF_TP_ADD_TC_PT_STEP(tp, setstep2); 69291.2Skamil ATF_TP_ADD_TC_PT_STEP(tp, setstep3); 69301.2Skamil ATF_TP_ADD_TC_PT_STEP(tp, setstep4); 69311.2Skamil 69321.1Skamil ATF_TP_ADD_TC(tp, kill1); 69331.1Skamil ATF_TP_ADD_TC(tp, kill2); 69341.1Skamil 69351.1Skamil ATF_TP_ADD_TC(tp, lwpinfo1); 69361.1Skamil ATF_TP_ADD_TC_HAVE_PID(tp, lwpinfo2); 69371.1Skamil 69381.1Skamil ATF_TP_ADD_TC(tp, siginfo1); 69391.1Skamil ATF_TP_ADD_TC(tp, siginfo2); 69401.1Skamil ATF_TP_ADD_TC(tp, siginfo3); 69411.1Skamil ATF_TP_ADD_TC(tp, siginfo4); 69421.1Skamil ATF_TP_ADD_TC_HAVE_PID(tp, siginfo5); 69431.1Skamil ATF_TP_ADD_TC_PT_STEP(tp, siginfo6); 69441.1Skamil 69451.1Skamil ATF_TP_ADD_TC(tp, lwp_create1); 69461.1Skamil 69471.1Skamil ATF_TP_ADD_TC(tp, lwp_exit1); 69481.1Skamil 69491.1Skamil ATF_TP_ADD_TC(tp, signal1); 69501.1Skamil ATF_TP_ADD_TC(tp, signal2); 69511.1Skamil ATF_TP_ADD_TC(tp, signal3); 69521.1Skamil ATF_TP_ADD_TC_PT_STEP(tp, signal4); 69531.1Skamil ATF_TP_ADD_TC(tp, signal5); 69541.1Skamil ATF_TP_ADD_TC_HAVE_PID(tp, signal6); 69551.1Skamil ATF_TP_ADD_TC_HAVE_PID(tp, signal7); 69561.1Skamil ATF_TP_ADD_TC(tp, signal8); 69571.1Skamil ATF_TP_ADD_TC(tp, signal9); 69581.1Skamil ATF_TP_ADD_TC(tp, signal10); 69591.1Skamil 69601.1Skamil ATF_TP_ADD_TC(tp, suspend1); 69611.1Skamil ATF_TP_ADD_TC(tp, suspend2); 69621.1Skamil 69631.1Skamil ATF_TP_ADD_TC(tp, resume1); 69641.1Skamil 69651.1Skamil ATF_TP_ADD_TC(tp, syscall1); 69661.1Skamil 69671.1Skamil ATF_TP_ADD_TC(tp, syscallemu1); 69681.1Skamil 69691.26Skamil ATF_TP_ADD_TC_HAVE_PID(tp, race1); 69701.26Skamil 69711.1Skamil ATF_TP_ADD_TCS_PTRACE_WAIT_AMD64(); 69721.1Skamil ATF_TP_ADD_TCS_PTRACE_WAIT_I386(); 69731.1Skamil ATF_TP_ADD_TCS_PTRACE_WAIT_X86(); 69741.1Skamil 69751.1Skamil return atf_no_error(); 69761.1Skamil} 6977