1 /* $NetBSD: t_ptrace_lwp_wait.h,v 1.2 2025/05/02 02:24:32 riastradh Exp $ */ 2 3 /*- 4 * Copyright (c) 2016, 2017, 2018, 2019, 2020 The NetBSD Foundation, Inc. 5 * All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 16 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 17 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 18 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 19 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 20 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 21 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 22 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 23 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 24 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 25 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 26 * POSSIBILITY OF SUCH DAMAGE. 27 */ 28 29 static int lwpinfo_thread_sigmask[] = {SIGXCPU, SIGPIPE, SIGALRM, SIGURG}; 30 31 static pthread_mutex_t lwpinfo_thread_mtx = PTHREAD_MUTEX_INITIALIZER; 32 static pthread_cond_t lwpinfo_thread_cnd = PTHREAD_COND_INITIALIZER; 33 static volatile size_t lwpinfo_thread_done; 34 35 static void * 36 lwpinfo_thread(void *arg) 37 { 38 sigset_t s; 39 volatile void **tcb; 40 41 tcb = (volatile void **)arg; 42 43 *tcb = _lwp_getprivate(); 44 DPRINTF("Storing tcb[] = %p from thread %d\n", *tcb, _lwp_self()); 45 46 pthread_setname_np(pthread_self(), "thread %d", 47 (void *)(intptr_t)_lwp_self()); 48 49 sigemptyset(&s); 50 pthread_mutex_lock(&lwpinfo_thread_mtx); 51 sigaddset(&s, lwpinfo_thread_sigmask[lwpinfo_thread_done]); 52 lwpinfo_thread_done++; 53 pthread_sigmask(SIG_BLOCK, &s, NULL); 54 pthread_cond_signal(&lwpinfo_thread_cnd); 55 pthread_mutex_unlock(&lwpinfo_thread_mtx); 56 57 return infinite_thread(NULL); 58 } 59 60 static void 61 traceme_lwpinfo(const size_t threads, const char *iter) 62 { 63 const int sigval = SIGSTOP; 64 const int sigval2 = SIGINT; 65 pid_t child, wpid; 66 #if defined(TWAIT_HAVE_STATUS) 67 int status; 68 #endif 69 struct ptrace_lwpinfo lwp = {0, 0}; 70 struct ptrace_lwpstatus lwpstatus = {0}; 71 struct ptrace_siginfo info; 72 void *private; 73 char *name; 74 char namebuf[PL_LNAMELEN]; 75 volatile void *tcb[4]; 76 bool found; 77 sigset_t s; 78 79 /* Maximum number of supported threads in this test */ 80 pthread_t t[__arraycount(tcb) - 1]; 81 size_t n, m; 82 int rv; 83 size_t bytes_read; 84 85 struct ptrace_io_desc io; 86 sigset_t sigmask; 87 88 ATF_REQUIRE(__arraycount(t) >= threads); 89 memset(tcb, 0, sizeof(tcb)); 90 91 DPRINTF("Before forking process PID=%d\n", getpid()); 92 SYSCALL_REQUIRE((child = fork()) != -1); 93 if (child == 0) { 94 DPRINTF("Before calling PT_TRACE_ME from child %d\n", getpid()); 95 FORKEE_ASSERT(ptrace(PT_TRACE_ME, 0, NULL, 0) != -1); 96 97 tcb[0] = _lwp_getprivate(); 98 DPRINTF("Storing tcb[0] = %p\n", tcb[0]); 99 100 pthread_setname_np(pthread_self(), "thread %d", 101 (void *)(intptr_t)_lwp_self()); 102 103 sigemptyset(&s); 104 sigaddset(&s, lwpinfo_thread_sigmask[lwpinfo_thread_done]); 105 pthread_sigmask(SIG_BLOCK, &s, NULL); 106 107 DPRINTF("Before raising %s from child\n", strsignal(sigval)); 108 FORKEE_ASSERT(raise(sigval) == 0); 109 110 for (n = 0; n < threads; n++) { 111 rv = pthread_create(&t[n], NULL, lwpinfo_thread, 112 &tcb[n + 1]); 113 FORKEE_ASSERT(rv == 0); 114 } 115 116 pthread_mutex_lock(&lwpinfo_thread_mtx); 117 while (lwpinfo_thread_done < threads) { 118 pthread_cond_wait(&lwpinfo_thread_cnd, 119 &lwpinfo_thread_mtx); 120 } 121 pthread_mutex_unlock(&lwpinfo_thread_mtx); 122 123 DPRINTF("Before raising %s from child\n", strsignal(sigval2)); 124 FORKEE_ASSERT(raise(sigval2) == 0); 125 126 /* NOTREACHED */ 127 FORKEE_ASSERTX(0 && "Not reached"); 128 } 129 DPRINTF("Parent process PID=%d, child's PID=%d\n", getpid(), child); 130 131 DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 132 TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 133 134 validate_status_stopped(status, sigval); 135 136 DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child"); 137 SYSCALL_REQUIRE( 138 ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1); 139 140 DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid); 141 DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n", 142 info.psi_siginfo.si_signo, info.psi_siginfo.si_code, 143 info.psi_siginfo.si_errno); 144 145 ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigval); 146 ATF_REQUIRE_EQ(info.psi_siginfo.si_code, SI_LWP); 147 148 if (strstr(iter, "LWPINFO") != NULL) { 149 DPRINTF("Before calling ptrace(2) with PT_LWPINFO for child\n"); 150 SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &lwp, sizeof(lwp)) 151 != -1); 152 153 DPRINTF("Assert that there exists a single thread only\n"); 154 ATF_REQUIRE(lwp.pl_lwpid > 0); 155 156 DPRINTF("Assert that lwp thread %d received event " 157 "PL_EVENT_SIGNAL\n", lwp.pl_lwpid); 158 FORKEE_ASSERT_EQ(lwp.pl_event, PL_EVENT_SIGNAL); 159 160 if (strstr(iter, "LWPSTATUS") != NULL) { 161 DPRINTF("Before calling ptrace(2) with PT_LWPSTATUS " 162 "for child\n"); 163 lwpstatus.pl_lwpid = lwp.pl_lwpid; 164 SYSCALL_REQUIRE(ptrace(PT_LWPSTATUS, child, &lwpstatus, 165 sizeof(lwpstatus)) != -1); 166 } 167 168 DPRINTF("Before calling ptrace(2) with PT_LWPINFO for child\n"); 169 SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &lwp, sizeof(lwp)) 170 != -1); 171 172 DPRINTF("Assert that there exists a single thread only\n"); 173 ATF_REQUIRE_EQ(lwp.pl_lwpid, 0); 174 } else { 175 DPRINTF("Before calling ptrace(2) with PT_LWPNEXT for child\n"); 176 SYSCALL_REQUIRE(ptrace(PT_LWPNEXT, child, &lwpstatus, 177 sizeof(lwpstatus)) != -1); 178 179 DPRINTF("Assert that there exists a single thread only %d\n", lwpstatus.pl_lwpid); 180 ATF_REQUIRE(lwpstatus.pl_lwpid > 0); 181 182 DPRINTF("Before calling ptrace(2) with PT_LWPNEXT for child\n"); 183 SYSCALL_REQUIRE(ptrace(PT_LWPNEXT, child, &lwpstatus, 184 sizeof(lwpstatus)) != -1); 185 186 DPRINTF("Assert that there exists a single thread only\n"); 187 ATF_REQUIRE_EQ(lwpstatus.pl_lwpid, 0); 188 } 189 190 DPRINTF("Before resuming the child process where it left off and " 191 "without signal to be sent\n"); 192 SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, 0) != -1); 193 194 DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 195 TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 196 197 validate_status_stopped(status, sigval2); 198 199 DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for child"); 200 SYSCALL_REQUIRE( 201 ptrace(PT_GET_SIGINFO, child, &info, sizeof(info)) != -1); 202 203 DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid); 204 DPRINTF("Signal properties: si_signo=%#x si_code=%#x si_errno=%#x\n", 205 info.psi_siginfo.si_signo, info.psi_siginfo.si_code, 206 info.psi_siginfo.si_errno); 207 208 ATF_REQUIRE_EQ(info.psi_siginfo.si_signo, sigval2); 209 ATF_REQUIRE_EQ(info.psi_siginfo.si_code, SI_LWP); 210 211 memset(&lwp, 0, sizeof(lwp)); 212 memset(&lwpstatus, 0, sizeof(lwpstatus)); 213 214 memset(&io, 0, sizeof(io)); 215 216 bytes_read = 0; 217 io.piod_op = PIOD_READ_D; 218 io.piod_len = sizeof(tcb); 219 220 do { 221 io.piod_addr = (char *)&tcb + bytes_read; 222 io.piod_offs = io.piod_addr; 223 224 rv = ptrace(PT_IO, child, &io, sizeof(io)); 225 ATF_REQUIRE(rv != -1 && io.piod_len != 0); 226 227 bytes_read += io.piod_len; 228 io.piod_len = sizeof(tcb) - bytes_read; 229 } while (bytes_read < sizeof(tcb)); 230 231 for (n = 0; n <= threads; n++) { 232 if (strstr(iter, "LWPINFO") != NULL) { 233 DPRINTF("Before calling ptrace(2) with PT_LWPINFO for " 234 "child\n"); 235 SYSCALL_REQUIRE( 236 ptrace(PT_LWPINFO, child, &lwp, sizeof(lwp)) != -1); 237 DPRINTF("LWP=%d\n", lwp.pl_lwpid); 238 239 DPRINTF("Assert that the thread exists\n"); 240 ATF_REQUIRE(lwp.pl_lwpid > 0); 241 242 DPRINTF("Assert that lwp thread %d received expected " 243 "event\n", lwp.pl_lwpid); 244 FORKEE_ASSERT_EQ(lwp.pl_event, 245 info.psi_lwpid == lwp.pl_lwpid ? 246 PL_EVENT_SIGNAL : PL_EVENT_NONE); 247 248 if (strstr(iter, "LWPSTATUS") != NULL) { 249 DPRINTF("Before calling ptrace(2) with " 250 "PT_LWPSTATUS for child\n"); 251 lwpstatus.pl_lwpid = lwp.pl_lwpid; 252 SYSCALL_REQUIRE(ptrace(PT_LWPSTATUS, child, 253 &lwpstatus, sizeof(lwpstatus)) != -1); 254 255 goto check_lwpstatus; 256 } 257 } else { 258 DPRINTF("Before calling ptrace(2) with PT_LWPNEXT for " 259 "child\n"); 260 SYSCALL_REQUIRE( 261 ptrace(PT_LWPNEXT, child, &lwpstatus, 262 sizeof(lwpstatus)) != -1); 263 DPRINTF("LWP=%d\n", lwpstatus.pl_lwpid); 264 265 DPRINTF("Assert that the thread exists\n"); 266 ATF_REQUIRE(lwpstatus.pl_lwpid > 0); 267 268 check_lwpstatus: 269 270 if (strstr(iter, "pl_sigmask") != NULL) { 271 sigmask = lwpstatus.pl_sigmask; 272 273 DPRINTF("Retrieved sigmask: " 274 "%02x%02x%02x%02x\n", 275 sigmask.__bits[0], sigmask.__bits[1], 276 sigmask.__bits[2], sigmask.__bits[3]); 277 278 found = false; 279 for (m = 0; 280 m < __arraycount(lwpinfo_thread_sigmask); 281 m++) { 282 if (sigismember(&sigmask, 283 lwpinfo_thread_sigmask[m])) { 284 found = true; 285 lwpinfo_thread_sigmask[m] = 0; 286 break; 287 } 288 } 289 ATF_REQUIRE(found == true); 290 } else if (strstr(iter, "pl_name") != NULL) { 291 name = lwpstatus.pl_name; 292 293 DPRINTF("Retrieved thread name: " 294 "%s\n", name); 295 296 snprintf(namebuf, sizeof namebuf, "thread %d", 297 lwpstatus.pl_lwpid); 298 299 ATF_REQUIRE(strcmp(name, namebuf) == 0); 300 } else if (strstr(iter, "pl_private") != NULL) { 301 private = lwpstatus.pl_private; 302 303 DPRINTF("Retrieved thread private pointer: " 304 "%p\n", private); 305 306 found = false; 307 for (m = 0; m < __arraycount(tcb); m++) { 308 DPRINTF("Comparing %p and %p\n", 309 private, tcb[m]); 310 if (private == tcb[m]) { 311 found = true; 312 break; 313 } 314 } 315 ATF_REQUIRE(found == true); 316 } 317 } 318 } 319 320 if (strstr(iter, "LWPINFO") != NULL) { 321 DPRINTF("Before calling ptrace(2) with PT_LWPINFO for " 322 "child\n"); 323 SYSCALL_REQUIRE(ptrace(PT_LWPINFO, child, &lwp, sizeof(lwp)) 324 != -1); 325 DPRINTF("LWP=%d\n", lwp.pl_lwpid); 326 327 DPRINTF("Assert that there are no more threads\n"); 328 ATF_REQUIRE_EQ(lwp.pl_lwpid, 0); 329 } else { 330 DPRINTF("Before calling ptrace(2) with PT_LWPNEXT for child\n"); 331 SYSCALL_REQUIRE(ptrace(PT_LWPNEXT, child, &lwpstatus, 332 sizeof(lwpstatus)) != -1); 333 334 DPRINTF("Assert that there exists a single thread only\n"); 335 ATF_REQUIRE_EQ(lwpstatus.pl_lwpid, 0); 336 } 337 338 DPRINTF("Before resuming the child process where it left off and " 339 "without signal to be sent\n"); 340 SYSCALL_REQUIRE(ptrace(PT_CONTINUE, child, (void *)1, SIGKILL) != -1); 341 342 DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 343 TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(child, &status, 0), child); 344 345 validate_status_signaled(status, SIGKILL, 0); 346 347 DPRINTF("Before calling %s() for the child\n", TWAIT_FNAME); 348 TWAIT_REQUIRE_FAILURE(ECHILD, wpid = TWAIT_GENERIC(child, &status, 0)); 349 } 350 351 #define TRACEME_LWPINFO(test, threads, iter) \ 352 ATF_TC(test); \ 353 ATF_TC_HEAD(test, tc) \ 354 { \ 355 atf_tc_set_md_var(tc, "descr", \ 356 "Verify " iter " with the child with " #threads \ 357 " spawned extra threads"); \ 358 } \ 359 \ 360 ATF_TC_BODY(test, tc) \ 361 { \ 362 \ 363 traceme_lwpinfo(threads, iter); \ 364 } 365 366 TRACEME_LWPINFO(traceme_lwpinfo0, 0, "LWPINFO") 367 TRACEME_LWPINFO(traceme_lwpinfo1, 1, "LWPINFO") 368 TRACEME_LWPINFO(traceme_lwpinfo2, 2, "LWPINFO") 369 TRACEME_LWPINFO(traceme_lwpinfo3, 3, "LWPINFO") 370 371 TRACEME_LWPINFO(traceme_lwpinfo0_lwpstatus, 0, "LWPINFO+LWPSTATUS") 372 TRACEME_LWPINFO(traceme_lwpinfo1_lwpstatus, 1, "LWPINFO+LWPSTATUS") 373 TRACEME_LWPINFO(traceme_lwpinfo2_lwpstatus, 2, "LWPINFO+LWPSTATUS") 374 TRACEME_LWPINFO(traceme_lwpinfo3_lwpstatus, 3, "LWPINFO+LWPSTATUS") 375 376 TRACEME_LWPINFO(traceme_lwpinfo0_lwpstatus_pl_sigmask, 0, 377 "LWPINFO+LWPSTATUS+pl_sigmask") 378 TRACEME_LWPINFO(traceme_lwpinfo1_lwpstatus_pl_sigmask, 1, 379 "LWPINFO+LWPSTATUS+pl_sigmask") 380 TRACEME_LWPINFO(traceme_lwpinfo2_lwpstatus_pl_sigmask, 2, 381 "LWPINFO+LWPSTATUS+pl_sigmask") 382 TRACEME_LWPINFO(traceme_lwpinfo3_lwpstatus_pl_sigmask, 3, 383 "LWPINFO+LWPSTATUS+pl_sigmask") 384 385 TRACEME_LWPINFO(traceme_lwpinfo0_lwpstatus_pl_name, 0, 386 "LWPINFO+LWPSTATUS+pl_name") 387 TRACEME_LWPINFO(traceme_lwpinfo1_lwpstatus_pl_name, 1, 388 "LWPINFO+LWPSTATUS+pl_name") 389 TRACEME_LWPINFO(traceme_lwpinfo2_lwpstatus_pl_name, 2, 390 "LWPINFO+LWPSTATUS+pl_name") 391 TRACEME_LWPINFO(traceme_lwpinfo3_lwpstatus_pl_name, 3, 392 "LWPINFO+LWPSTATUS+pl_name") 393 394 TRACEME_LWPINFO(traceme_lwpinfo0_lwpstatus_pl_private, 0, 395 "LWPINFO+LWPSTATUS+pl_private") 396 TRACEME_LWPINFO(traceme_lwpinfo1_lwpstatus_pl_private, 1, 397 "LWPINFO+LWPSTATUS+pl_private") 398 TRACEME_LWPINFO(traceme_lwpinfo2_lwpstatus_pl_private, 2, 399 "LWPINFO+LWPSTATUS+pl_private") 400 TRACEME_LWPINFO(traceme_lwpinfo3_lwpstatus_pl_private, 3, 401 "LWPINFO+LWPSTATUS+pl_private") 402 403 TRACEME_LWPINFO(traceme_lwpnext0, 0, "LWPNEXT") 404 TRACEME_LWPINFO(traceme_lwpnext1, 1, "LWPNEXT") 405 TRACEME_LWPINFO(traceme_lwpnext2, 2, "LWPNEXT") 406 TRACEME_LWPINFO(traceme_lwpnext3, 3, "LWPNEXT") 407 408 TRACEME_LWPINFO(traceme_lwpnext0_pl_sigmask, 0, "LWPNEXT+pl_sigmask") 409 TRACEME_LWPINFO(traceme_lwpnext1_pl_sigmask, 1, "LWPNEXT+pl_sigmask") 410 TRACEME_LWPINFO(traceme_lwpnext2_pl_sigmask, 2, "LWPNEXT+pl_sigmask") 411 TRACEME_LWPINFO(traceme_lwpnext3_pl_sigmask, 3, "LWPNEXT+pl_sigmask") 412 413 TRACEME_LWPINFO(traceme_lwpnext0_pl_name, 0, "LWPNEXT+pl_name") 414 TRACEME_LWPINFO(traceme_lwpnext1_pl_name, 1, "LWPNEXT+pl_name") 415 TRACEME_LWPINFO(traceme_lwpnext2_pl_name, 2, "LWPNEXT+pl_name") 416 TRACEME_LWPINFO(traceme_lwpnext3_pl_name, 3, "LWPNEXT+pl_name") 417 418 TRACEME_LWPINFO(traceme_lwpnext0_pl_private, 0, "LWPNEXT+pl_private") 419 TRACEME_LWPINFO(traceme_lwpnext1_pl_private, 1, "LWPNEXT+pl_private") 420 TRACEME_LWPINFO(traceme_lwpnext2_pl_private, 2, "LWPNEXT+pl_private") 421 TRACEME_LWPINFO(traceme_lwpnext3_pl_private, 3, "LWPNEXT+pl_private") 422 423 /// ---------------------------------------------------------------------------- 424 425 #if defined(TWAIT_HAVE_PID) 426 static void 427 attach_lwpinfo(const int threads) 428 { 429 const int sigval = SIGINT; 430 struct msg_fds parent_tracee, parent_tracer; 431 const int exitval_tracer = 10; 432 pid_t tracee, tracer, wpid; 433 uint8_t msg = 0xde; /* dummy message for IPC based on pipe(2) */ 434 #if defined(TWAIT_HAVE_STATUS) 435 int status; 436 #endif 437 struct ptrace_lwpinfo lwp = {0, 0}; 438 struct ptrace_siginfo info; 439 440 /* Maximum number of supported threads in this test */ 441 pthread_t t[3]; 442 int n, rv; 443 444 DPRINTF("Spawn tracee\n"); 445 SYSCALL_REQUIRE(msg_open(&parent_tracee) == 0); 446 SYSCALL_REQUIRE(msg_open(&parent_tracer) == 0); 447 tracee = atf_utils_fork(); 448 if (tracee == 0) { 449 /* Wait for message from the parent */ 450 CHILD_TO_PARENT("tracee ready", parent_tracee, msg); 451 452 CHILD_FROM_PARENT("spawn threads", parent_tracee, msg); 453 454 for (n = 0; n < threads; n++) { 455 rv = pthread_create(&t[n], NULL, infinite_thread, NULL); 456 FORKEE_ASSERT(rv == 0); 457 } 458 459 CHILD_TO_PARENT("tracee exit", parent_tracee, msg); 460 461 DPRINTF("Before raising %s from child\n", strsignal(sigval)); 462 FORKEE_ASSERT(raise(sigval) == 0); 463 464 /* NOTREACHED */ 465 FORKEE_ASSERTX(0 && "Not reached"); 466 } 467 PARENT_FROM_CHILD("tracee ready", parent_tracee, msg); 468 469 DPRINTF("Spawn debugger\n"); 470 tracer = atf_utils_fork(); 471 if (tracer == 0) { 472 /* No IPC to communicate with the child */ 473 DPRINTF("Before calling PT_ATTACH from tracee %d\n", getpid()); 474 FORKEE_ASSERT(ptrace(PT_ATTACH, tracee, NULL, 0) != -1); 475 476 /* Wait for tracee and assert that it was stopped w/ SIGSTOP */ 477 FORKEE_REQUIRE_SUCCESS( 478 wpid = TWAIT_GENERIC(tracee, &status, 0), tracee); 479 480 forkee_status_stopped(status, SIGSTOP); 481 482 DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for " 483 "tracee"); 484 FORKEE_ASSERT( 485 ptrace(PT_GET_SIGINFO, tracee, &info, sizeof(info)) != -1); 486 487 DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid); 488 DPRINTF("Signal properties: si_signo=%#x si_code=%#x " 489 "si_errno=%#x\n", 490 info.psi_siginfo.si_signo, info.psi_siginfo.si_code, 491 info.psi_siginfo.si_errno); 492 493 FORKEE_ASSERT_EQ(info.psi_siginfo.si_signo, SIGSTOP); 494 FORKEE_ASSERT_EQ(info.psi_siginfo.si_code, SI_USER); 495 496 DPRINTF("Before calling ptrace(2) with PT_LWPINFO for child\n"); 497 FORKEE_ASSERT(ptrace(PT_LWPINFO, tracee, &lwp, sizeof(lwp)) 498 != -1); 499 500 DPRINTF("Assert that there exists a thread\n"); 501 FORKEE_ASSERTX(lwp.pl_lwpid > 0); 502 503 DPRINTF("Assert that lwp thread %d received event " 504 "PL_EVENT_SIGNAL\n", lwp.pl_lwpid); 505 FORKEE_ASSERT_EQ(lwp.pl_event, PL_EVENT_SIGNAL); 506 507 DPRINTF("Before calling ptrace(2) with PT_LWPINFO for " 508 "tracee\n"); 509 FORKEE_ASSERT(ptrace(PT_LWPINFO, tracee, &lwp, sizeof(lwp)) 510 != -1); 511 512 DPRINTF("Assert that there are no more lwp threads in " 513 "tracee\n"); 514 FORKEE_ASSERT_EQ(lwp.pl_lwpid, 0); 515 516 /* Resume tracee with PT_CONTINUE */ 517 FORKEE_ASSERT(ptrace(PT_CONTINUE, tracee, (void *)1, 0) != -1); 518 519 /* Inform parent that tracer has attached to tracee */ 520 CHILD_TO_PARENT("tracer ready", parent_tracer, msg); 521 522 /* Wait for parent */ 523 CHILD_FROM_PARENT("tracer wait", parent_tracer, msg); 524 525 /* Wait for tracee and assert that it raised a signal */ 526 FORKEE_REQUIRE_SUCCESS( 527 wpid = TWAIT_GENERIC(tracee, &status, 0), tracee); 528 529 forkee_status_stopped(status, SIGINT); 530 531 DPRINTF("Before calling ptrace(2) with PT_GET_SIGINFO for " 532 "child"); 533 FORKEE_ASSERT( 534 ptrace(PT_GET_SIGINFO, tracee, &info, sizeof(info)) != -1); 535 536 DPRINTF("Signal traced to lwpid=%d\n", info.psi_lwpid); 537 DPRINTF("Signal properties: si_signo=%#x si_code=%#x " 538 "si_errno=%#x\n", 539 info.psi_siginfo.si_signo, info.psi_siginfo.si_code, 540 info.psi_siginfo.si_errno); 541 542 FORKEE_ASSERT_EQ(info.psi_siginfo.si_signo, sigval); 543 FORKEE_ASSERT_EQ(info.psi_siginfo.si_code, SI_LWP); 544 545 memset(&lwp, 0, sizeof(lwp)); 546 547 for (n = 0; n <= threads; n++) { 548 DPRINTF("Before calling ptrace(2) with PT_LWPINFO for " 549 "child\n"); 550 FORKEE_ASSERT(ptrace(PT_LWPINFO, tracee, &lwp, 551 sizeof(lwp)) != -1); 552 DPRINTF("LWP=%d\n", lwp.pl_lwpid); 553 554 DPRINTF("Assert that the thread exists\n"); 555 FORKEE_ASSERT(lwp.pl_lwpid > 0); 556 557 DPRINTF("Assert that lwp thread %d received expected " 558 "event\n", lwp.pl_lwpid); 559 FORKEE_ASSERT_EQ(lwp.pl_event, 560 info.psi_lwpid == lwp.pl_lwpid ? 561 PL_EVENT_SIGNAL : PL_EVENT_NONE); 562 } 563 DPRINTF("Before calling ptrace(2) with PT_LWPINFO for " 564 "tracee\n"); 565 FORKEE_ASSERT(ptrace(PT_LWPINFO, tracee, &lwp, sizeof(lwp)) 566 != -1); 567 DPRINTF("LWP=%d\n", lwp.pl_lwpid); 568 569 DPRINTF("Assert that there are no more threads\n"); 570 FORKEE_ASSERT_EQ(lwp.pl_lwpid, 0); 571 572 DPRINTF("Before resuming the child process where it left off " 573 "and without signal to be sent\n"); 574 FORKEE_ASSERT(ptrace(PT_CONTINUE, tracee, (void *)1, SIGKILL) 575 != -1); 576 577 /* Wait for tracee and assert that it exited */ 578 FORKEE_REQUIRE_SUCCESS( 579 wpid = TWAIT_GENERIC(tracee, &status, 0), tracee); 580 581 forkee_status_signaled(status, SIGKILL, 0); 582 583 DPRINTF("Before exiting of the tracer process\n"); 584 _exit(exitval_tracer); 585 } 586 587 DPRINTF("Wait for the tracer to attach to the tracee\n"); 588 PARENT_FROM_CHILD("tracer ready", parent_tracer, msg); 589 590 DPRINTF("Resume the tracee and spawn threads\n"); 591 PARENT_TO_CHILD("spawn threads", parent_tracee, msg); 592 593 DPRINTF("Resume the tracee and let it exit\n"); 594 PARENT_FROM_CHILD("tracee exit", parent_tracee, msg); 595 596 DPRINTF("Resume the tracer and let it detect multiple threads\n"); 597 PARENT_TO_CHILD("tracer wait", parent_tracer, msg); 598 599 DPRINTF("Wait for tracer to finish its job and exit - calling %s()\n", 600 TWAIT_FNAME); 601 TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracer, &status, 0), 602 tracer); 603 604 validate_status_exited(status, exitval_tracer); 605 606 DPRINTF("Wait for tracee to finish its job and exit - calling %s()\n", 607 TWAIT_FNAME); 608 TWAIT_REQUIRE_SUCCESS(wpid = TWAIT_GENERIC(tracee, &status, WNOHANG), 609 tracee); 610 611 validate_status_signaled(status, SIGKILL, 0); 612 613 msg_close(&parent_tracer); 614 msg_close(&parent_tracee); 615 } 616 617 #define ATTACH_LWPINFO(test, threads) \ 618 ATF_TC(test); \ 619 ATF_TC_HEAD(test, tc) \ 620 { \ 621 atf_tc_set_md_var(tc, "descr", \ 622 "Verify LWPINFO with the child with " #threads \ 623 " spawned extra threads (tracer is not the original " \ 624 "parent)"); \ 625 } \ 626 \ 627 ATF_TC_BODY(test, tc) \ 628 { \ 629 \ 630 attach_lwpinfo(threads); \ 631 } 632 633 ATTACH_LWPINFO(attach_lwpinfo0, 0) 634 ATTACH_LWPINFO(attach_lwpinfo1, 1) 635 ATTACH_LWPINFO(attach_lwpinfo2, 2) 636 ATTACH_LWPINFO(attach_lwpinfo3, 3) 637 #endif 638 639 #define ATF_TP_ADD_TCS_PTRACE_WAIT_LWP() \ 640 ATF_TP_ADD_TC(tp, traceme_lwpinfo0); \ 641 ATF_TP_ADD_TC(tp, traceme_lwpinfo1); \ 642 ATF_TP_ADD_TC(tp, traceme_lwpinfo2); \ 643 ATF_TP_ADD_TC(tp, traceme_lwpinfo3); \ 644 ATF_TP_ADD_TC(tp, traceme_lwpinfo0_lwpstatus); \ 645 ATF_TP_ADD_TC(tp, traceme_lwpinfo1_lwpstatus); \ 646 ATF_TP_ADD_TC(tp, traceme_lwpinfo2_lwpstatus); \ 647 ATF_TP_ADD_TC(tp, traceme_lwpinfo3_lwpstatus); \ 648 ATF_TP_ADD_TC(tp, traceme_lwpinfo0_lwpstatus_pl_sigmask); \ 649 ATF_TP_ADD_TC(tp, traceme_lwpinfo1_lwpstatus_pl_sigmask); \ 650 ATF_TP_ADD_TC(tp, traceme_lwpinfo2_lwpstatus_pl_sigmask); \ 651 ATF_TP_ADD_TC(tp, traceme_lwpinfo3_lwpstatus_pl_sigmask); \ 652 ATF_TP_ADD_TC(tp, traceme_lwpinfo0_lwpstatus_pl_name); \ 653 ATF_TP_ADD_TC(tp, traceme_lwpinfo1_lwpstatus_pl_name); \ 654 ATF_TP_ADD_TC(tp, traceme_lwpinfo2_lwpstatus_pl_name); \ 655 ATF_TP_ADD_TC(tp, traceme_lwpinfo3_lwpstatus_pl_name); \ 656 ATF_TP_ADD_TC(tp, traceme_lwpinfo0_lwpstatus_pl_private); \ 657 ATF_TP_ADD_TC(tp, traceme_lwpinfo1_lwpstatus_pl_private); \ 658 ATF_TP_ADD_TC(tp, traceme_lwpinfo2_lwpstatus_pl_private); \ 659 ATF_TP_ADD_TC(tp, traceme_lwpinfo3_lwpstatus_pl_private); \ 660 ATF_TP_ADD_TC(tp, traceme_lwpnext0); \ 661 ATF_TP_ADD_TC(tp, traceme_lwpnext1); \ 662 ATF_TP_ADD_TC(tp, traceme_lwpnext2); \ 663 ATF_TP_ADD_TC(tp, traceme_lwpnext3); \ 664 ATF_TP_ADD_TC(tp, traceme_lwpnext0_pl_sigmask); \ 665 ATF_TP_ADD_TC(tp, traceme_lwpnext1_pl_sigmask); \ 666 ATF_TP_ADD_TC(tp, traceme_lwpnext2_pl_sigmask); \ 667 ATF_TP_ADD_TC(tp, traceme_lwpnext3_pl_sigmask); \ 668 ATF_TP_ADD_TC(tp, traceme_lwpnext0_pl_name); \ 669 ATF_TP_ADD_TC(tp, traceme_lwpnext1_pl_name); \ 670 ATF_TP_ADD_TC(tp, traceme_lwpnext2_pl_name); \ 671 ATF_TP_ADD_TC(tp, traceme_lwpnext3_pl_name); \ 672 ATF_TP_ADD_TC(tp, traceme_lwpnext0_pl_private); \ 673 ATF_TP_ADD_TC(tp, traceme_lwpnext1_pl_private); \ 674 ATF_TP_ADD_TC(tp, traceme_lwpnext2_pl_private); \ 675 ATF_TP_ADD_TC(tp, traceme_lwpnext3_pl_private); \ 676 ATF_TP_ADD_TC_HAVE_PID(tp, attach_lwpinfo0); \ 677 ATF_TP_ADD_TC_HAVE_PID(tp, attach_lwpinfo1); \ 678 ATF_TP_ADD_TC_HAVE_PID(tp, attach_lwpinfo2); \ 679 ATF_TP_ADD_TC_HAVE_PID(tp, attach_lwpinfo3); 680