1 /* $NetBSD: linux_signal.c,v 1.90 2024/10/01 16:41:29 riastradh Exp $ */ 2 3 /*- 4 * Copyright (c) 1995, 1998 The NetBSD Foundation, Inc. 5 * All rights reserved. 6 * 7 * This code is derived from software contributed to The NetBSD Foundation 8 * by Frank van der Linden and Eric Haszlakiewicz. 9 * 10 * Redistribution and use in source and binary forms, with or without 11 * modification, are permitted provided that the following conditions 12 * are met: 13 * 1. Redistributions of source code must retain the above copyright 14 * notice, this list of conditions and the following disclaimer. 15 * 2. Redistributions in binary form must reproduce the above copyright 16 * notice, this list of conditions and the following disclaimer in the 17 * documentation and/or other materials provided with the distribution. 18 * 19 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 20 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 21 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 22 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 23 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 24 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 25 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 26 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 27 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 28 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 29 * POSSIBILITY OF SUCH DAMAGE. 30 */ 31 /* 32 * heavily from: svr4_signal.c,v 1.7 1995/01/09 01:04:21 christos Exp 33 */ 34 35 /* 36 * Functions in multiarch: 37 * linux_sys_signal : linux_sig_notalpha.c 38 * linux_sys_siggetmask : linux_sig_notalpha.c 39 * linux_sys_sigsetmask : linux_sig_notalpha.c 40 * linux_sys_pause : linux_sig_notalpha.c 41 * linux_sys_sigaction : linux_sigaction.c 42 * 43 */ 44 45 /* 46 * Unimplemented: 47 * linux_sys_rt_sigtimedwait : sigsuspend w/timeout. 48 */ 49 50 #include <sys/cdefs.h> 51 __KERNEL_RCSID(0, "$NetBSD: linux_signal.c,v 1.90 2024/10/01 16:41:29 riastradh Exp $"); 52 53 #define COMPAT_LINUX 1 54 55 #include <sys/param.h> 56 #include <sys/systm.h> 57 #include <sys/namei.h> 58 #include <sys/proc.h> 59 #include <sys/filedesc.h> 60 #include <sys/ioctl.h> 61 #include <sys/mount.h> 62 #include <sys/kernel.h> 63 #include <sys/signal.h> 64 #include <sys/signalvar.h> 65 #include <sys/wait.h> 66 67 #include <sys/syscallargs.h> 68 69 #include <compat/linux/common/linux_types.h> 70 #include <compat/linux/common/linux_signal.h> 71 #include <compat/linux/common/linux_emuldata.h> 72 #include <compat/linux/common/linux_siginfo.h> 73 #include <compat/linux/common/linux_sigevent.h> 74 #include <compat/linux/common/linux_util.h> 75 #include <compat/linux/common/linux_ipc.h> 76 #include <compat/linux/common/linux_sem.h> 77 #include <compat/linux/common/linux_errno.h> 78 #include <compat/linux/common/linux_sched.h> 79 80 #include <compat/linux/linux_syscallargs.h> 81 82 /* Locally used defines (in bsd<->linux conversion functions): */ 83 #define linux_sigemptyset(s) memset((s), 0, sizeof(*(s))) 84 #define linux_sigismember(s, n) ((s)->sig[((n) - 1) / LINUX__NSIG_BPW] \ 85 & (1L << ((n) - 1) % LINUX__NSIG_BPW)) 86 #define linux_sigaddset(s, n) ((s)->sig[((n) - 1) / LINUX__NSIG_BPW] \ 87 |= (1L << ((n) - 1) % LINUX__NSIG_BPW)) 88 89 #ifdef DEBUG_LINUX 90 #define DPRINTF(a) uprintf a 91 #else 92 #define DPRINTF(a) 93 #endif 94 95 extern const int native_to_linux_signo[]; 96 extern const int linux_to_native_signo[]; 97 98 /* 99 * Convert between Linux and BSD signal sets. 100 */ 101 #if LINUX__NSIG_WORDS > 1 102 void 103 linux_old_extra_to_native_sigset(sigset_t *bss, const linux_old_sigset_t *lss, const unsigned long *extra) 104 { 105 linux_sigset_t lsnew; 106 107 /* convert old sigset to new sigset */ 108 linux_sigemptyset(&lsnew); 109 lsnew.sig[0] = *lss; 110 if (extra) 111 memcpy(&lsnew.sig[1], extra, 112 sizeof(linux_sigset_t) - sizeof(linux_old_sigset_t)); 113 114 linux_to_native_sigset(bss, &lsnew); 115 } 116 117 void 118 native_to_linux_old_extra_sigset(linux_old_sigset_t *lss, unsigned long *extra, const sigset_t *bss) 119 { 120 linux_sigset_t lsnew; 121 122 native_to_linux_sigset(&lsnew, bss); 123 124 /* convert new sigset to old sigset */ 125 *lss = lsnew.sig[0]; 126 if (extra) 127 memcpy(extra, &lsnew.sig[1], 128 sizeof(linux_sigset_t) - sizeof(linux_old_sigset_t)); 129 } 130 #endif /* LINUX__NSIG_WORDS > 1 */ 131 132 void 133 linux_to_native_sigset(sigset_t *bss, const linux_sigset_t *lss) 134 { 135 int i, newsig; 136 137 sigemptyset(bss); 138 for (i = 1; i < LINUX__NSIG; i++) { 139 if (linux_sigismember(lss, i)) { 140 newsig = linux_to_native_signo[i]; 141 if (newsig) 142 sigaddset(bss, newsig); 143 } 144 } 145 } 146 147 void 148 native_to_linux_sigset(linux_sigset_t *lss, const sigset_t *bss) 149 { 150 int i, newsig; 151 152 linux_sigemptyset(lss); 153 for (i = 1; i < NSIG; i++) { 154 if (sigismember(bss, i)) { 155 newsig = native_to_linux_signo[i]; 156 if (newsig) 157 linux_sigaddset(lss, newsig); 158 } 159 } 160 } 161 162 void 163 native_to_linux_siginfo(linux_siginfo_t *lsi, const struct _ksiginfo *ksi) 164 { 165 memset(lsi, 0, sizeof(*lsi)); 166 167 lsi->lsi_signo = native_to_linux_signo[ksi->_signo]; 168 lsi->lsi_errno = native_to_linux_errno[ksi->_errno]; 169 lsi->lsi_code = native_to_linux_si_code(ksi->_code); 170 171 switch (ksi->_code) { 172 case SI_NOINFO: 173 break; 174 175 case SI_USER: 176 lsi->lsi_pid = ksi->_reason._rt._pid; 177 lsi->lsi_uid = ksi->_reason._rt._uid; 178 if (lsi->lsi_signo == LINUX_SIGALRM || 179 lsi->lsi_signo >= LINUX_SIGRTMIN) 180 lsi->lsi_value.sival_ptr = 181 ksi->_reason._rt._value.sival_ptr; 182 break; 183 184 case SI_TIMER: 185 case SI_QUEUE: 186 lsi->lsi_uid = ksi->_reason._rt._uid; 187 lsi->lsi_uid = ksi->_reason._rt._uid; 188 lsi->lsi_value.sival_ptr = ksi->_reason._rt._value.sival_ptr; 189 break; 190 191 case SI_ASYNCIO: 192 case SI_MESGQ: 193 lsi->lsi_value.sival_ptr = ksi->_reason._rt._value.sival_ptr; 194 break; 195 196 default: 197 switch (ksi->_signo) { 198 case SIGCHLD: 199 lsi->lsi_uid = ksi->_reason._child._uid; 200 lsi->lsi_pid = ksi->_reason._child._pid; 201 lsi->lsi_status = native_to_linux_si_status( 202 ksi->_code, ksi->_reason._child._status); 203 lsi->lsi_utime = ksi->_reason._child._utime; 204 lsi->lsi_stime = ksi->_reason._child._stime; 205 break; 206 207 case SIGILL: 208 case SIGFPE: 209 case SIGSEGV: 210 case SIGBUS: 211 case SIGTRAP: 212 lsi->lsi_addr = ksi->_reason._fault._addr; 213 break; 214 215 case SIGIO: 216 lsi->lsi_fd = ksi->_reason._poll._fd; 217 lsi->lsi_band = ksi->_reason._poll._band; 218 break; 219 default: 220 break; 221 } 222 } 223 } 224 225 unsigned int 226 native_to_linux_sigflags(const int bsf) 227 { 228 unsigned int lsf = 0; 229 if ((bsf & SA_NOCLDSTOP) != 0) 230 lsf |= LINUX_SA_NOCLDSTOP; 231 if ((bsf & SA_NOCLDWAIT) != 0) 232 lsf |= LINUX_SA_NOCLDWAIT; 233 if ((bsf & SA_ONSTACK) != 0) 234 lsf |= LINUX_SA_ONSTACK; 235 if ((bsf & SA_RESTART) != 0) 236 lsf |= LINUX_SA_RESTART; 237 if ((bsf & SA_NODEFER) != 0) 238 lsf |= LINUX_SA_NOMASK; 239 if ((bsf & SA_RESETHAND) != 0) 240 lsf |= LINUX_SA_ONESHOT; 241 if ((bsf & SA_SIGINFO) != 0) 242 lsf |= LINUX_SA_SIGINFO; 243 return lsf; 244 } 245 246 int 247 linux_to_native_sigflags(const unsigned long lsf) 248 { 249 int bsf = 0; 250 if ((lsf & LINUX_SA_NOCLDSTOP) != 0) 251 bsf |= SA_NOCLDSTOP; 252 if ((lsf & LINUX_SA_NOCLDWAIT) != 0) 253 bsf |= SA_NOCLDWAIT; 254 if ((lsf & LINUX_SA_ONSTACK) != 0) 255 bsf |= SA_ONSTACK; 256 if ((lsf & LINUX_SA_RESTART) != 0) 257 bsf |= SA_RESTART; 258 if ((lsf & LINUX_SA_ONESHOT) != 0) 259 bsf |= SA_RESETHAND; 260 if ((lsf & LINUX_SA_NOMASK) != 0) 261 bsf |= SA_NODEFER; 262 if ((lsf & LINUX_SA_SIGINFO) != 0) 263 bsf |= SA_SIGINFO; 264 if ((lsf & ~LINUX_SA_ALLBITS) != 0) { 265 DPRINTF(("linux_old_to_native_sigflags: " 266 "%lx extra bits ignored\n", lsf)); 267 } 268 return bsf; 269 } 270 271 #if !defined(__aarch64__) 272 /* 273 * Convert between Linux and BSD sigaction structures. 274 */ 275 void 276 linux_old_to_native_sigaction(struct sigaction *bsa, const struct linux_old_sigaction *lsa) 277 { 278 279 memset(bsa, 0, sizeof(*bsa)); 280 bsa->sa_handler = lsa->linux_sa_handler; 281 linux_old_to_native_sigset(&bsa->sa_mask, &lsa->linux_sa_mask); 282 bsa->sa_flags = linux_to_native_sigflags(lsa->linux_sa_flags); 283 } 284 285 void 286 native_to_linux_old_sigaction(struct linux_old_sigaction *lsa, const struct sigaction *bsa) 287 { 288 289 memset(lsa, 0, sizeof(*lsa)); 290 lsa->linux_sa_handler = bsa->sa_handler; 291 native_to_linux_old_sigset(&lsa->linux_sa_mask, &bsa->sa_mask); 292 lsa->linux_sa_flags = native_to_linux_sigflags(bsa->sa_flags); 293 #ifndef __alpha__ 294 lsa->linux_sa_restorer = NULL; 295 #endif 296 } 297 #endif 298 299 /* ...and the new sigaction conversion funcs. */ 300 void 301 linux_to_native_sigaction(struct sigaction *bsa, const struct linux_sigaction *lsa) 302 { 303 304 memset(bsa, 0, sizeof(*bsa)); 305 bsa->sa_handler = lsa->linux_sa_handler; 306 linux_to_native_sigset(&bsa->sa_mask, &lsa->linux_sa_mask); 307 bsa->sa_flags = linux_to_native_sigflags(lsa->linux_sa_flags); 308 } 309 310 void 311 native_to_linux_sigaction(struct linux_sigaction *lsa, const struct sigaction *bsa) 312 { 313 314 memset(lsa, 0, sizeof(*lsa)); 315 lsa->linux_sa_handler = bsa->sa_handler; 316 native_to_linux_sigset(&lsa->linux_sa_mask, &bsa->sa_mask); 317 lsa->linux_sa_flags = native_to_linux_sigflags(bsa->sa_flags); 318 #ifndef __alpha__ 319 lsa->linux_sa_restorer = NULL; 320 #endif 321 } 322 323 /* ----------------------------------------------------------------------- */ 324 325 /* 326 * The Linux sigaction() system call. Do the usual conversions, 327 * and just call sigaction(). Some flags and values are silently 328 * ignored (see above). 329 */ 330 int 331 linux_sys_rt_sigaction(struct lwp *l, const struct linux_sys_rt_sigaction_args *uap, register_t *retval) 332 { 333 /* { 334 syscallarg(int) signum; 335 syscallarg(const struct linux_sigaction *) nsa; 336 syscallarg(struct linux_sigaction *) osa; 337 syscallarg(size_t) sigsetsize; 338 } */ 339 struct linux_sigaction nlsa, olsa; 340 struct sigaction nbsa, obsa; 341 int error, sig; 342 void *tramp = NULL; 343 int vers = 0; 344 #ifdef LINUX_SA_RESTORER 345 struct sigacts *ps = l->l_proc->p_sigacts; 346 #endif 347 348 if (SCARG(uap, sigsetsize) != sizeof(linux_sigset_t)) 349 return EINVAL; 350 351 if (SCARG(uap, nsa)) { 352 error = copyin(SCARG(uap, nsa), &nlsa, sizeof(nlsa)); 353 if (error) 354 return error; 355 linux_to_native_sigaction(&nbsa, &nlsa); 356 } 357 358 sig = SCARG(uap, signum); 359 /* 360 * XXX: Linux has 33 realtime signals, the go binary wants to 361 * reset all of them; nothing else uses the last RT signal, so for 362 * now ignore it. 363 */ 364 if (sig == LINUX__NSIG) { 365 uprintf("%s: setting signal %d ignored\n", __func__, sig); 366 sig--; /* back to 63 which is ignored */ 367 } 368 if (sig < 0 || sig >= LINUX__NSIG) 369 return EINVAL; 370 if (sig > 0 && !linux_to_native_signo[sig]) { 371 /* Pretend that we did something useful for unknown signals. */ 372 obsa.sa_handler = SIG_IGN; 373 sigemptyset(&obsa.sa_mask); 374 obsa.sa_flags = 0; 375 } else { 376 #ifdef LINUX_SA_RESTORER 377 if (SCARG(uap, nsa) && 378 (nlsa.linux_sa_flags & LINUX_SA_RESTORER) && 379 (tramp = nlsa.linux_sa_restorer) != NULL) 380 vers = 2; 381 #endif 382 383 error = sigaction1(l, linux_to_native_signo[sig], 384 SCARG(uap, nsa) ? &nbsa : NULL, 385 SCARG(uap, osa) ? &obsa : NULL, 386 tramp, vers); 387 if (error) 388 return error; 389 } 390 if (SCARG(uap, osa)) { 391 native_to_linux_sigaction(&olsa, &obsa); 392 393 #ifdef LINUX_SA_RESTORER 394 if (ps->sa_sigdesc[sig].sd_vers != __SIGTRAMP_SIGCODE_VERSION) { 395 olsa.linux_sa_restorer = ps->sa_sigdesc[sig].sd_tramp; 396 olsa.linux_sa_flags |= LINUX_SA_RESTORER; 397 } 398 #endif 399 400 error = copyout(&olsa, SCARG(uap, osa), sizeof(olsa)); 401 if (error) 402 return error; 403 } 404 return 0; 405 } 406 407 #if !defined(__aarch64__) 408 int 409 linux_sigprocmask1(struct lwp *l, int how, const linux_old_sigset_t *set, linux_old_sigset_t *oset) 410 { 411 struct proc *p = l->l_proc; 412 linux_old_sigset_t nlss, olss; 413 sigset_t nbss, obss; 414 int error; 415 416 switch (how) { 417 case LINUX_SIG_BLOCK: 418 how = SIG_BLOCK; 419 break; 420 case LINUX_SIG_UNBLOCK: 421 how = SIG_UNBLOCK; 422 break; 423 case LINUX_SIG_SETMASK: 424 how = SIG_SETMASK; 425 break; 426 default: 427 return EINVAL; 428 } 429 430 if (set) { 431 error = copyin(set, &nlss, sizeof(nlss)); 432 if (error) 433 return error; 434 linux_old_to_native_sigset(&nbss, &nlss); 435 } 436 mutex_enter(p->p_lock); 437 error = sigprocmask1(l, how, 438 set ? &nbss : NULL, oset ? &obss : NULL); 439 mutex_exit(p->p_lock); 440 if (error) 441 return error; 442 if (oset) { 443 native_to_linux_old_sigset(&olss, &obss); 444 error = copyout(&olss, oset, sizeof(olss)); 445 if (error) 446 return error; 447 } 448 return error; 449 } 450 #endif 451 452 int 453 linux_sys_rt_sigprocmask(struct lwp *l, const struct linux_sys_rt_sigprocmask_args *uap, register_t *retval) 454 { 455 /* { 456 syscallarg(int) how; 457 syscallarg(const linux_sigset_t *) set; 458 syscallarg(linux_sigset_t *) oset; 459 syscallarg(size_t) sigsetsize; 460 } */ 461 linux_sigset_t nlss, olss, *oset; 462 const linux_sigset_t *set; 463 struct proc *p = l->l_proc; 464 sigset_t nbss, obss; 465 int error, how; 466 467 if (SCARG(uap, sigsetsize) != sizeof(linux_sigset_t)) 468 return EINVAL; 469 470 switch (SCARG(uap, how)) { 471 case LINUX_SIG_BLOCK: 472 how = SIG_BLOCK; 473 break; 474 case LINUX_SIG_UNBLOCK: 475 how = SIG_UNBLOCK; 476 break; 477 case LINUX_SIG_SETMASK: 478 how = SIG_SETMASK; 479 break; 480 default: 481 return EINVAL; 482 } 483 484 set = SCARG(uap, set); 485 oset = SCARG(uap, oset); 486 487 if (set) { 488 error = copyin(set, &nlss, sizeof(nlss)); 489 if (error) 490 return error; 491 linux_to_native_sigset(&nbss, &nlss); 492 } 493 mutex_enter(p->p_lock); 494 error = sigprocmask1(l, how, 495 set ? &nbss : NULL, oset ? &obss : NULL); 496 mutex_exit(p->p_lock); 497 if (!error && oset) { 498 native_to_linux_sigset(&olss, &obss); 499 error = copyout(&olss, oset, sizeof(olss)); 500 } 501 return error; 502 } 503 504 int 505 linux_sys_rt_sigpending(struct lwp *l, const struct linux_sys_rt_sigpending_args *uap, register_t *retval) 506 { 507 /* { 508 syscallarg(linux_sigset_t *) set; 509 syscallarg(size_t) sigsetsize; 510 } */ 511 sigset_t bss; 512 linux_sigset_t lss; 513 514 if (SCARG(uap, sigsetsize) != sizeof(linux_sigset_t)) 515 return EINVAL; 516 517 sigpending1(l, &bss); 518 native_to_linux_sigset(&lss, &bss); 519 return copyout(&lss, SCARG(uap, set), sizeof(lss)); 520 } 521 522 #if !defined(__aarch64__) && !defined(__amd64__) 523 int 524 linux_sys_sigpending(struct lwp *l, const struct linux_sys_sigpending_args *uap, register_t *retval) 525 { 526 /* { 527 syscallarg(linux_old_sigset_t *) mask; 528 } */ 529 sigset_t bss; 530 linux_old_sigset_t lss; 531 532 sigpending1(l, &bss); 533 native_to_linux_old_sigset(&lss, &bss); 534 return copyout(&lss, SCARG(uap, set), sizeof(lss)); 535 } 536 537 int 538 linux_sys_sigsuspend(struct lwp *l, const struct linux_sys_sigsuspend_args *uap, register_t *retval) 539 { 540 /* { 541 syscallarg(void *) restart; 542 syscallarg(int) oldmask; 543 syscallarg(int) mask; 544 } */ 545 linux_old_sigset_t lss; 546 sigset_t bss; 547 548 lss = SCARG(uap, mask); 549 linux_old_to_native_sigset(&bss, &lss); 550 return sigsuspend1(l, &bss); 551 } 552 #endif /* !__aarch64__ && !__amd64__ */ 553 554 int 555 linux_sys_rt_sigsuspend(struct lwp *l, const struct linux_sys_rt_sigsuspend_args *uap, register_t *retval) 556 { 557 /* { 558 syscallarg(linux_sigset_t *) unewset; 559 syscallarg(size_t) sigsetsize; 560 } */ 561 linux_sigset_t lss; 562 sigset_t bss; 563 int error; 564 565 if (SCARG(uap, sigsetsize) != sizeof(linux_sigset_t)) 566 return EINVAL; 567 568 error = copyin(SCARG(uap, unewset), &lss, sizeof(linux_sigset_t)); 569 if (error) 570 return error; 571 572 linux_to_native_sigset(&bss, &lss); 573 574 return sigsuspend1(l, &bss); 575 } 576 577 static int 578 fetchss(const void *u, void *s, size_t len) 579 { 580 int error; 581 linux_sigset_t lss; 582 583 if ((error = copyin(u, &lss, sizeof(lss))) != 0) 584 return error; 585 586 linux_to_native_sigset(s, &lss); 587 return 0; 588 } 589 590 static int 591 fetchts(const void *u, void *s, size_t len) 592 { 593 int error; 594 struct linux_timespec lts; 595 596 if ((error = copyin(u, <s, sizeof(lts))) != 0) 597 return error; 598 599 linux_to_native_timespec(s, <s); 600 return 0; 601 } 602 603 static int 604 fakestorets(const void *u, void *s, size_t len) 605 { 606 /* Do nothing, sigtimedwait does not alter timeout like ours */ 607 return 0; 608 } 609 610 static int 611 storeinfo(const void *s, void *u, size_t len) 612 { 613 struct linux_siginfo lsi; 614 615 native_to_linux_siginfo(&lsi, &((const siginfo_t *)s)->_info); 616 return copyout(&lsi, u, sizeof(lsi)); 617 } 618 619 int 620 linux_sys_rt_sigtimedwait(struct lwp *l, 621 const struct linux_sys_rt_sigtimedwait_args *uap, register_t *retval) 622 { 623 /* { 624 syscallarg(const linux_sigset_t *) set; 625 syscallarg(linux_siginfo_t *) info); 626 syscallarg(const struct linux_timespec *) timeout; 627 } */ 628 629 return sigtimedwait1(l, (const struct sys_____sigtimedwait50_args *)uap, 630 retval, fetchss, storeinfo, fetchts, fakestorets); 631 } 632 633 #if !defined(__aarch64__) 634 /* 635 * Once more: only a signal conversion is needed. 636 * Note: also used as sys_rt_queueinfo. The info field is ignored. 637 */ 638 int 639 linux_sys_rt_queueinfo(struct lwp *l, const struct linux_sys_rt_queueinfo_args *uap, register_t *retval) 640 { 641 /* 642 syscallarg(int) pid; 643 syscallarg(int) signum; 644 syscallarg(linix_siginfo_t *) uinfo; 645 */ 646 int error; 647 linux_siginfo_t info; 648 649 error = copyin(SCARG(uap, uinfo), &info, sizeof(info)); 650 if (error) 651 return error; 652 if (info.lsi_code >= 0) 653 return EPERM; 654 655 /* XXX To really implement this we need to */ 656 /* XXX keep a list of queued signals somewhere. */ 657 return linux_sys_kill(l, (const void *)uap, retval); 658 } 659 #endif 660 661 int 662 linux_sys_kill(struct lwp *l, const struct linux_sys_kill_args *uap, register_t *retval) 663 { 664 /* { 665 syscallarg(int) pid; 666 syscallarg(int) signum; 667 } */ 668 669 struct sys_kill_args ka; 670 int sig; 671 672 SCARG(&ka, pid) = SCARG(uap, pid); 673 sig = SCARG(uap, signum); 674 if (sig < 0 || sig >= LINUX__NSIG) 675 return EINVAL; 676 SCARG(&ka, signum) = linux_to_native_signo[sig]; 677 return sys_kill(l, &ka, retval); 678 } 679 680 #ifdef LINUX_SS_ONSTACK 681 static void linux_to_native_sigaltstack(stack_t *, 682 const struct linux_sigaltstack *); 683 684 static void 685 linux_to_native_sigaltstack(stack_t *bss, const struct linux_sigaltstack *lss) 686 { 687 bss->ss_sp = lss->ss_sp; 688 bss->ss_size = lss->ss_size; 689 if (lss->ss_flags & LINUX_SS_ONSTACK) 690 bss->ss_flags = SS_ONSTACK; 691 else if (lss->ss_flags & LINUX_SS_DISABLE) 692 bss->ss_flags = SS_DISABLE; 693 else 694 bss->ss_flags = 0; 695 } 696 697 void 698 native_to_linux_sigaltstack(struct linux_sigaltstack *lss, const stack_t *bss) 699 { 700 memset(lss, 0, sizeof(*lss)); 701 lss->ss_sp = bss->ss_sp; 702 lss->ss_size = bss->ss_size; 703 if (bss->ss_flags & SS_ONSTACK) 704 lss->ss_flags = LINUX_SS_ONSTACK; 705 else if (bss->ss_flags & SS_DISABLE) 706 lss->ss_flags = LINUX_SS_DISABLE; 707 else 708 lss->ss_flags = 0; 709 } 710 711 int 712 linux_sys_sigaltstack(struct lwp *l, const struct linux_sys_sigaltstack_args *uap, register_t *retval) 713 { 714 /* { 715 syscallarg(const struct linux_sigaltstack *) ss; 716 syscallarg(struct linux_sigaltstack *) oss; 717 } */ 718 struct linux_sigaltstack ss; 719 stack_t nss; 720 struct proc *p = l->l_proc; 721 int error = 0; 722 723 if (SCARG(uap, oss)) { 724 native_to_linux_sigaltstack(&ss, &l->l_sigstk); 725 if ((error = copyout(&ss, SCARG(uap, oss), sizeof(ss))) != 0) 726 return error; 727 } 728 729 if (SCARG(uap, ss) != NULL) { 730 if ((error = copyin(SCARG(uap, ss), &ss, sizeof(ss))) != 0) 731 return error; 732 linux_to_native_sigaltstack(&nss, &ss); 733 734 mutex_enter(p->p_lock); 735 736 if (nss.ss_flags & ~SS_ALLBITS) 737 error = EINVAL; 738 else if (nss.ss_flags & SS_DISABLE) { 739 if (l->l_sigstk.ss_flags & SS_ONSTACK) 740 error = EINVAL; 741 } else if (nss.ss_size < LINUX_MINSIGSTKSZ) 742 error = ENOMEM; 743 744 if (error == 0) 745 l->l_sigstk = nss; 746 747 mutex_exit(p->p_lock); 748 } 749 750 return error; 751 } 752 #endif /* LINUX_SS_ONSTACK */ 753 754 static int 755 linux_do_tkill(struct lwp *l, int tgid, int tid, int signum) 756 { 757 struct proc *p; 758 struct lwp *t; 759 ksiginfo_t ksi; 760 int error; 761 762 if (signum < 0 || signum >= LINUX__NSIG) 763 return EINVAL; 764 signum = linux_to_native_signo[signum]; 765 766 KSI_INIT(&ksi); 767 ksi.ksi_signo = signum; 768 ksi.ksi_code = SI_LWP; 769 ksi.ksi_pid = l->l_proc->p_pid; 770 ksi.ksi_uid = kauth_cred_geteuid(l->l_cred); 771 ksi.ksi_lid = tid; 772 773 mutex_enter(&proc_lock); 774 if (tgid != -1) 775 p = proc_find(tgid); 776 else 777 p = proc_find_lwpid(tid); 778 if (p == NULL) { 779 mutex_exit(&proc_lock); 780 return ESRCH; 781 } 782 mutex_enter(p->p_lock); 783 error = kauth_authorize_process(l->l_cred, 784 KAUTH_PROCESS_SIGNAL, p, KAUTH_ARG(signum), NULL, NULL); 785 if ((t = lwp_find(p, ksi.ksi_lid)) == NULL) 786 error = ESRCH; 787 else if (signum != 0) 788 kpsignal2(p, &ksi); 789 mutex_exit(p->p_lock); 790 mutex_exit(&proc_lock); 791 792 return error; 793 } 794 795 int 796 linux_sys_tkill(struct lwp *l, const struct linux_sys_tkill_args *uap, register_t *retval) 797 { 798 /* { 799 syscallarg(int) tid; 800 syscallarg(int) sig; 801 } */ 802 803 if (SCARG(uap, tid) <= 0) 804 return EINVAL; 805 806 return linux_do_tkill(l, -1, SCARG(uap, tid), SCARG(uap, sig)); 807 } 808 809 int 810 linux_sys_tgkill(struct lwp *l, const struct linux_sys_tgkill_args *uap, register_t *retval) 811 { 812 /* { 813 syscallarg(int) tgid; 814 syscallarg(int) tid; 815 syscallarg(int) sig; 816 } */ 817 818 if (SCARG(uap, tid) <= 0 || SCARG(uap, tgid) < -1) 819 return EINVAL; 820 821 return linux_do_tkill(l, SCARG(uap, tgid), SCARG(uap, tid), SCARG(uap, sig)); 822 } 823 824 int 825 native_to_linux_si_code(int code) 826 { 827 int si_codes[] = { 828 LINUX_SI_USER, LINUX_SI_QUEUE, LINUX_SI_TIMER, LINUX_SI_ASYNCIO, 829 LINUX_SI_MESGQ, LINUX_SI_TKILL /* SI_LWP */ 830 }; 831 832 if (code <= 0 && -code < __arraycount(si_codes)) 833 return si_codes[-code]; 834 835 return code; 836 } 837 838 int 839 native_to_linux_si_status(int code, int status) 840 { 841 int sts; 842 843 switch (code) { 844 case CLD_CONTINUED: 845 sts = LINUX_SIGCONT; 846 break; 847 case CLD_EXITED: 848 sts = status; 849 break; 850 case CLD_STOPPED: 851 case CLD_TRAPPED: 852 case CLD_DUMPED: 853 case CLD_KILLED: 854 default: 855 sts = native_to_linux_signo[WTERMSIG(status)]; 856 break; 857 } 858 859 return sts; 860 } 861 862 int 863 linux_to_native_sigevent(struct sigevent *nsep, 864 const struct linux_sigevent *lsep) 865 { 866 memset(nsep, 0, sizeof(*nsep)); 867 868 switch (lsep->sigev_notify) { 869 case LINUX_SIGEV_SIGNAL: 870 nsep->sigev_notify = SIGEV_SIGNAL; 871 break; 872 873 case LINUX_SIGEV_NONE: 874 nsep->sigev_notify = SIGEV_NONE; 875 break; 876 877 case LINUX_SIGEV_THREAD: 878 case LINUX_SIGEV_THREAD_ID: 879 default: 880 return ENOTSUP; 881 } 882 883 nsep->sigev_value = lsep->sigev_value; 884 if (lsep->sigev_signo < 0 || lsep->sigev_signo >= LINUX__NSIG) { 885 return EINVAL; 886 } 887 nsep->sigev_signo = linux_to_native_signo[lsep->sigev_signo]; 888 889 return 0; 890 } 891 892 int 893 linux_sigevent_copyin(const void *src, void *dst, size_t size) 894 { 895 struct linux_sigevent lse; 896 struct sigevent *sep = dst; 897 int error; 898 899 KASSERT(size == sizeof(*sep)); 900 901 error = copyin(src, &lse, sizeof(lse)); 902 if (error) { 903 return error; 904 } 905 906 return linux_to_native_sigevent(sep, &lse); 907 } 908