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