1 /* $NetBSD: linux32_signal.c,v 1.19 2018/01/07 21:16:00 christos Exp $ */ 2 3 /*- 4 * Copyright (c) 2006 Emmanuel Dreyfus, all rights reserved. 5 * 6 * Redistribution and use in source and binary forms, with or without 7 * modification, are permitted provided that the following conditions 8 * are met: 9 * 1. Redistributions of source code must retain the above copyright 10 * notice, this list of conditions and the following disclaimer. 11 * 2. Redistributions in binary form must reproduce the above copyright 12 * notice, this list of conditions and the following disclaimer in the 13 * documentation and/or other materials provided with the distribution. 14 * 3. All advertising materials mentioning features or use of this software 15 * must display the following acknowledgement: 16 * This product includes software developed by Emmanuel Dreyfus 17 * 4. The name of the author may not be used to endorse or promote 18 * products derived from this software without specific prior written 19 * permission. 20 * 21 * THIS SOFTWARE IS PROVIDED BY THE THE AUTHOR AND CONTRIBUTORS ``AS IS'' 22 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, 23 * THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 24 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS 25 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 26 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 27 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 28 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 29 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 30 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 31 * POSSIBILITY OF SUCH DAMAGE. 32 */ 33 34 #include <sys/cdefs.h> 35 __KERNEL_RCSID(0, "$NetBSD: linux32_signal.c,v 1.19 2018/01/07 21:16:00 christos Exp $"); 36 37 #include <sys/param.h> 38 #include <sys/ucred.h> 39 #include <sys/signalvar.h> 40 #include <sys/lwp.h> 41 #include <sys/time.h> 42 #include <sys/proc.h> 43 #include <sys/wait.h> 44 45 #include <compat/netbsd32/netbsd32.h> 46 47 #include <compat/linux/common/linux_types.h> 48 #include <compat/linux/common/linux_signal.h> 49 50 #include <compat/linux32/common/linux32_types.h> 51 #include <compat/linux32/common/linux32_signal.h> 52 #include <compat/linux32/common/linux32_siginfo.h> 53 #include <compat/linux32/linux32_syscallargs.h> 54 #include <compat/linux32/common/linux32_errno.h> 55 #include <compat/linux32/common/linux32_sched.h> 56 57 #define linux32_sigemptyset(s) memset((s), 0, sizeof(*(s))) 58 #define linux32_sigismember(s, n) ((s)->sig[((n) - 1) / LINUX32__NSIG_BPW] \ 59 & (1 << ((n) - 1) % LINUX32__NSIG_BPW)) 60 #define linux32_sigaddset(s, n) ((s)->sig[((n) - 1) / LINUX32__NSIG_BPW] \ 61 |= (1 << ((n) - 1) % LINUX32__NSIG_BPW)) 62 63 extern const int native_to_linux32_signo[]; 64 extern const int linux32_to_native_signo[]; 65 66 #ifdef DEBUG_LINUX 67 #define DPRINTF(a) uprintf a 68 #else 69 #define DPRINTF(a) 70 #endif 71 72 void 73 linux32_to_native_sigset(sigset_t *bss, const linux32_sigset_t *lss) 74 { 75 int i, newsig; 76 77 sigemptyset(bss); 78 for (i = 1; i < LINUX32__NSIG; i++) { 79 if (linux32_sigismember(lss, i)) { 80 newsig = linux32_to_native_signo[i]; 81 if (newsig) 82 sigaddset(bss, newsig); 83 } 84 } 85 } 86 87 void 88 native_to_linux32_sigset(linux32_sigset_t *lss, const sigset_t *bss) 89 { 90 int i, newsig; 91 92 linux32_sigemptyset(lss); 93 for (i = 1; i < NSIG; i++) { 94 if (sigismember(bss, i)) { 95 newsig = native_to_linux32_signo[i]; 96 if (newsig) 97 linux32_sigaddset(lss, newsig); 98 } 99 } 100 } 101 102 void 103 native_to_linux32_siginfo(linux32_siginfo_t *lsi, const struct _ksiginfo *ksi) 104 { 105 memset(lsi, 0, sizeof(*lsi)); 106 107 lsi->lsi_signo = native_to_linux32_signo[ksi->_signo]; 108 lsi->lsi_errno = native_to_linux32_errno[ksi->_errno]; 109 lsi->lsi_code = native_to_linux32_si_code(ksi->_code); 110 111 switch (ksi->_code) { 112 case SI_NOINFO: 113 break; 114 115 case SI_USER: 116 lsi->lsi_pid = ksi->_reason._rt._pid; 117 lsi->lsi_uid = ksi->_reason._rt._uid; 118 if (lsi->lsi_signo == LINUX_SIGALRM || 119 lsi->lsi_signo >= LINUX_SIGRTMIN) 120 NETBSD32PTR32(lsi->lsi_value.sival_ptr, 121 ksi->_reason._rt._value.sival_ptr); 122 break; 123 124 case SI_TIMER: 125 case SI_QUEUE: 126 lsi->lsi_uid = ksi->_reason._rt._uid; 127 lsi->lsi_uid = ksi->_reason._rt._uid; 128 NETBSD32PTR32(lsi->lsi_value.sival_ptr, 129 ksi->_reason._rt._value.sival_ptr); 130 break; 131 132 case SI_ASYNCIO: 133 case SI_MESGQ: 134 NETBSD32PTR32(lsi->lsi_value.sival_ptr, 135 ksi->_reason._rt._value.sival_ptr); 136 break; 137 138 default: 139 switch (ksi->_signo) { 140 case SIGCHLD: 141 lsi->lsi_uid = ksi->_reason._child._uid; 142 lsi->lsi_pid = ksi->_reason._child._pid; 143 lsi->lsi_status = native_to_linux32_si_status( 144 ksi->_code, ksi->_reason._child._status); 145 lsi->lsi_utime = ksi->_reason._child._utime; 146 lsi->lsi_stime = ksi->_reason._child._stime; 147 break; 148 149 case SIGILL: 150 case SIGFPE: 151 case SIGSEGV: 152 case SIGBUS: 153 case SIGTRAP: 154 NETBSD32PTR32(lsi->lsi_addr, ksi->_reason._fault._addr); 155 break; 156 157 case SIGIO: 158 lsi->lsi_fd = ksi->_reason._poll._fd; 159 lsi->lsi_band = ksi->_reason._poll._band; 160 break; 161 default: 162 break; 163 } 164 } 165 } 166 167 unsigned int 168 native_to_linux32_sigflags(const int bsf) 169 { 170 unsigned int lsf = 0; 171 if ((bsf & SA_NOCLDSTOP) != 0) 172 lsf |= LINUX32_SA_NOCLDSTOP; 173 if ((bsf & SA_NOCLDWAIT) != 0) 174 lsf |= LINUX32_SA_NOCLDWAIT; 175 if ((bsf & SA_ONSTACK) != 0) 176 lsf |= LINUX32_SA_ONSTACK; 177 if ((bsf & SA_RESTART) != 0) 178 lsf |= LINUX32_SA_RESTART; 179 if ((bsf & SA_NODEFER) != 0) 180 lsf |= LINUX32_SA_NOMASK; 181 if ((bsf & SA_RESETHAND) != 0) 182 lsf |= LINUX32_SA_ONESHOT; 183 if ((bsf & SA_SIGINFO) != 0) 184 lsf |= LINUX32_SA_SIGINFO; 185 return lsf; 186 } 187 188 int 189 linux32_to_native_sigflags(const unsigned long lsf) 190 { 191 int bsf = 0; 192 if ((lsf & LINUX32_SA_NOCLDSTOP) != 0) 193 bsf |= SA_NOCLDSTOP; 194 if ((lsf & LINUX32_SA_NOCLDWAIT) != 0) 195 bsf |= SA_NOCLDWAIT; 196 if ((lsf & LINUX32_SA_ONSTACK) != 0) 197 bsf |= SA_ONSTACK; 198 if ((lsf & LINUX32_SA_RESTART) != 0) 199 bsf |= SA_RESTART; 200 if ((lsf & LINUX32_SA_ONESHOT) != 0) 201 bsf |= SA_RESETHAND; 202 if ((lsf & LINUX32_SA_NOMASK) != 0) 203 bsf |= SA_NODEFER; 204 if ((lsf & LINUX32_SA_SIGINFO) != 0) 205 bsf |= SA_SIGINFO; 206 if ((lsf & ~LINUX32_SA_ALLBITS) != 0) { 207 #ifdef DEBUG_LINUX 208 printf("linux32_old_to_native_sigflags: " 209 "%lx extra bits ignored\n", lsf); 210 #endif 211 } 212 return bsf; 213 } 214 215 void 216 linux32_to_native_sigaction(struct sigaction *bsa, const struct linux32_sigaction *lsa) 217 { 218 bsa->sa_handler = NETBSD32PTR64(lsa->linux_sa_handler); 219 linux32_to_native_sigset(&bsa->sa_mask, &lsa->linux_sa_mask); 220 bsa->sa_flags = linux32_to_native_sigflags(lsa->linux_sa_flags); 221 } 222 223 void 224 native_to_linux32_sigaction(struct linux32_sigaction *lsa, const struct sigaction *bsa) 225 { 226 NETBSD32PTR32(lsa->linux_sa_handler, bsa->sa_handler); 227 native_to_linux32_sigset(&lsa->linux_sa_mask, &bsa->sa_mask); 228 lsa->linux_sa_flags = native_to_linux32_sigflags(bsa->sa_flags); 229 NETBSD32PTR32(lsa->linux_sa_restorer, NULL); 230 } 231 232 void 233 native_to_linux32_sigaltstack(struct linux32_sigaltstack *lss, const struct sigaltstack *bss) 234 { 235 NETBSD32PTR32(lss->ss_sp, bss->ss_sp); 236 lss->ss_size = bss->ss_size; 237 if (bss->ss_flags & SS_ONSTACK) 238 lss->ss_flags = LINUX32_SS_ONSTACK; 239 else if (bss->ss_flags & SS_DISABLE) 240 lss->ss_flags = LINUX32_SS_DISABLE; 241 else 242 lss->ss_flags = 0; 243 } 244 245 246 void 247 native_to_linux32_old_sigset(linux32_old_sigset_t *lss, const sigset_t *bss) 248 { 249 linux32_sigset_t lsnew; 250 251 native_to_linux32_sigset(&lsnew, bss); 252 253 /* convert new sigset to old sigset */ 254 *lss = lsnew.sig[0]; 255 } 256 257 void 258 linux32_old_to_native_sigset(sigset_t *bss, const linux32_old_sigset_t *lss) 259 { 260 linux32_sigset_t ls; 261 262 memset(&ls, 0, sizeof(ls)); 263 ls.sig[0] = *lss; 264 265 linux32_to_native_sigset(bss, &ls); 266 } 267 268 int 269 linux32_sys_rt_sigaction(struct lwp *l, const struct linux32_sys_rt_sigaction_args *uap, register_t *retval) 270 { 271 /* { 272 syscallarg(int) signum; 273 syscallarg(const linux32_sigactionp_t) nsa; 274 syscallarg(linux32_sigactionp_t) osa; 275 syscallarg(netbsd32_size_t) sigsetsize; 276 } */ 277 struct linux32_sigaction nls32; 278 struct linux32_sigaction ols32; 279 struct sigaction ns; 280 struct sigaction os; 281 int error; 282 int sig; 283 int vers = 0; 284 void *tramp = NULL; 285 286 if (SCARG(uap, sigsetsize) != sizeof(linux32_sigset_t)) { 287 DPRINTF(("rt_sigaction: Inconsistent sigsetsize %u %zu\n", 288 SCARG(uap, sigsetsize), sizeof(linux32_sigset_t))); 289 return EINVAL; 290 } 291 292 if (SCARG_P32(uap, nsa) != NULL) { 293 if ((error = copyin(SCARG_P32(uap, nsa), 294 &nls32, sizeof(nls32))) != 0) { 295 DPRINTF(("rt_sigaction: Copyin %d\n", error)); 296 return error; 297 } 298 linux32_to_native_sigaction(&ns, &nls32); 299 } 300 301 sig = SCARG(uap, signum); 302 /* 303 * XXX: Linux has 33 realtime signals, the go binary wants to 304 * reset all of them; nothing else uses the last RT signal, so for 305 * now ignore it. 306 */ 307 if (sig == LINUX__NSIG) { 308 uprintf("%s: setting signal %d ignored\n", __func__, sig); 309 sig--; /* back to 63 which is ignored */ 310 } 311 if (sig < 0 || sig >= LINUX32__NSIG) { 312 DPRINTF(("rt_sigaction: Bad signal number %d %d\n", 313 sig, LINUX32__NSIG)); 314 return EINVAL; 315 } 316 if (sig > 0 && !linux32_to_native_signo[sig]) { 317 /* unknown signal... */ 318 os.sa_handler = SIG_IGN; 319 sigemptyset(&os.sa_mask); 320 os.sa_flags = 0; 321 } else { 322 if ((error = sigaction1(l, 323 linux32_to_native_signo[sig], 324 SCARG_P32(uap, nsa) ? &ns : NULL, 325 SCARG_P32(uap, osa) ? &os : NULL, 326 tramp, vers)) != 0) { 327 DPRINTF(("rt_sigaction: sigaction %d\n", error)); 328 return error; 329 } 330 } 331 332 if (SCARG_P32(uap, osa) != NULL) { 333 native_to_linux32_sigaction(&ols32, &os); 334 335 if ((error = copyout(&ols32, SCARG_P32(uap, osa), 336 sizeof(ols32))) != 0) { 337 DPRINTF(("rt_sigaction: Copyout %d\n", error)); 338 return error; 339 } 340 } 341 342 return 0; 343 } 344 345 int 346 linux32_sys_rt_sigprocmask(struct lwp *l, const struct linux32_sys_rt_sigprocmask_args *uap, register_t *retval) 347 { 348 /* { 349 syscallarg(int) how; 350 syscallarg(const linux32_sigsetp_t) set; 351 syscallarg(linux32_sigsetp_t) oset; 352 syscallarg(netbsd32_size_t) sigsetsize; 353 } */ 354 struct proc *p = l->l_proc; 355 linux32_sigset_t nls32, ols32; 356 sigset_t ns, os; 357 int error; 358 int how; 359 360 if (SCARG(uap, sigsetsize) != sizeof(linux32_sigset_t)) 361 return EINVAL; 362 363 switch (SCARG(uap, how)) { 364 case LINUX32_SIG_BLOCK: 365 how = SIG_BLOCK; 366 break; 367 case LINUX32_SIG_UNBLOCK: 368 how = SIG_UNBLOCK; 369 break; 370 case LINUX32_SIG_SETMASK: 371 how = SIG_SETMASK; 372 break; 373 default: 374 return EINVAL; 375 break; 376 } 377 378 if (SCARG_P32(uap, set) != NULL) { 379 if ((error = copyin(SCARG_P32(uap, set), 380 &nls32, sizeof(nls32))) != 0) 381 return error; 382 linux32_to_native_sigset(&ns, &nls32); 383 } 384 385 mutex_enter(p->p_lock); 386 error = sigprocmask1(l, how, 387 SCARG_P32(uap, set) ? &ns : NULL, 388 SCARG_P32(uap, oset) ? &os : NULL); 389 mutex_exit(p->p_lock); 390 391 if (error != 0) 392 return error; 393 394 if (SCARG_P32(uap, oset) != NULL) { 395 native_to_linux32_sigset(&ols32, &os); 396 if ((error = copyout(&ols32, 397 SCARG_P32(uap, oset), sizeof(ols32))) != 0) 398 return error; 399 } 400 401 return 0; 402 } 403 404 int 405 linux32_sys_kill(struct lwp *l, const struct linux32_sys_kill_args *uap, register_t *retval) 406 { 407 /* { 408 syscallarg(int) pid; 409 syscallarg(int) signum; 410 } */ 411 412 struct sys_kill_args ka; 413 int sig; 414 415 SCARG(&ka, pid) = SCARG(uap, pid); 416 sig = SCARG(uap, signum); 417 if (sig < 0 || sig >= LINUX32__NSIG) 418 return (EINVAL); 419 SCARG(&ka, signum) = linux32_to_native_signo[sig]; 420 return sys_kill(l, &ka, retval); 421 } 422 423 int 424 linux32_sys_rt_sigsuspend(struct lwp *l, const struct linux32_sys_rt_sigsuspend_args *uap, register_t *retval) 425 { 426 /* { 427 syscallarg(linux32_sigsetp_t) unewset; 428 syscallarg(netbsd32_size_t) sigsetsize; 429 } */ 430 linux32_sigset_t lss; 431 sigset_t bss; 432 int error; 433 434 if (SCARG(uap, sigsetsize) != sizeof(linux32_sigset_t)) 435 return EINVAL; 436 437 if ((error = copyin(SCARG_P32(uap, unewset), 438 &lss, sizeof(linux32_sigset_t))) != 0) 439 return error; 440 441 linux32_to_native_sigset(&bss, &lss); 442 443 return sigsuspend1(l, &bss); 444 } 445 446 static int 447 fetchss(const void *u, void *s, size_t len) 448 { 449 int error; 450 linux32_sigset_t lss; 451 452 if ((error = copyin(u, &lss, sizeof(lss))) != 0) 453 return error; 454 455 linux32_to_native_sigset(s, &lss); 456 return 0; 457 } 458 459 static int 460 fetchts(const void *u, void *s, size_t len) 461 { 462 int error; 463 struct linux32_timespec lts; 464 465 if ((error = copyin(u, <s, sizeof(lts))) != 0) 466 return error; 467 468 linux32_to_native_timespec(s, <s); 469 return 0; 470 } 471 472 static int 473 fakestorets(const void *u, void *s, size_t len) 474 { 475 /* Do nothing, sigtimedwait does not alter timeout like ours */ 476 return 0; 477 } 478 479 static int 480 storeinfo(const void *s, void *u, size_t len) 481 { 482 linux32_siginfo_t lsi; 483 484 485 native_to_linux32_siginfo(&lsi, &((const siginfo_t *)s)->_info); 486 return copyout(&lsi, u, sizeof(lsi)); 487 } 488 489 int 490 linux32_sys_rt_sigtimedwait(struct lwp *l, 491 const struct linux32_sys_rt_sigtimedwait_args *uap, register_t *retval) 492 { 493 /* { 494 syscallarg(const linux32_sigset_t *) set; 495 syscallarg(linux32_siginfo_t *) info); 496 syscallarg(const struct linux32_timespec *) timeout; 497 } */ 498 struct sys_____sigtimedwait50_args ap; 499 500 SCARG(&ap, set) = SCARG_P32(uap, set); 501 SCARG(&ap, info) = SCARG_P32(uap, info); 502 SCARG(&ap, timeout) = SCARG_P32(uap, timeout); 503 504 return sigtimedwait1(l, &ap, 505 retval, fetchss, storeinfo, fetchts, fakestorets); 506 } 507 508 int 509 linux32_sys_signal(struct lwp *l, const struct linux32_sys_signal_args *uap, register_t *retval) 510 { 511 /* { 512 syscallarg(int) signum; 513 syscallarg(linux32_handlerp_t) handler; 514 } */ 515 struct sigaction nbsa, obsa; 516 int error, sig; 517 518 *retval = -1; 519 520 sig = SCARG(uap, signum); 521 if (sig < 0 || sig >= LINUX32__NSIG) 522 return EINVAL; 523 524 nbsa.sa_handler = SCARG_P32(uap, handler); 525 sigemptyset(&nbsa.sa_mask); 526 nbsa.sa_flags = SA_RESETHAND | SA_NODEFER; 527 528 if ((error = sigaction1(l, linux32_to_native_signo[sig], 529 &nbsa, &obsa, NULL, 0)) != 0) 530 return error; 531 532 *retval = (int)(long)obsa.sa_handler; 533 return 0; 534 } 535 536 int 537 linux32_sys_rt_sigpending(struct lwp *l, const struct linux32_sys_rt_sigpending_args *uap, register_t *retval) 538 { 539 /* { 540 syscallarg(linux32_sigsetp_t) set; 541 syscallarg(netbsd32_size_t) sigsetsize; 542 } */ 543 sigset_t bss; 544 linux32_sigset_t lss; 545 546 if (SCARG(uap, sigsetsize) != sizeof(linux32_sigset_t)) 547 return EINVAL; 548 549 sigpending1(l, &bss); 550 native_to_linux32_sigset(&lss, &bss); 551 return copyout(&lss, SCARG_P32(uap, set), sizeof(lss)); 552 } 553 554 int 555 linux32_sys_siggetmask(struct lwp *l, const void *v, register_t *retval) 556 { 557 struct proc *p = l->l_proc; 558 sigset_t bss; 559 linux32_old_sigset_t lss; 560 int error; 561 562 mutex_enter(p->p_lock); 563 error = sigprocmask1(l, SIG_SETMASK, 0, &bss); 564 mutex_exit(p->p_lock); 565 if (error) 566 return error; 567 native_to_linux32_old_sigset(&lss, &bss); 568 *retval = lss; 569 return 0; 570 } 571 572 int 573 linux32_sys_sigsetmask(struct lwp *l, const struct linux32_sys_sigsetmask_args *uap, register_t *retval) 574 { 575 /* { 576 syscallarg(linux32_old_sigset_t) mask; 577 } */ 578 sigset_t nbss, obss; 579 linux32_old_sigset_t nlss, olss; 580 struct proc *p = l->l_proc; 581 int error; 582 583 nlss = SCARG(uap, mask); 584 linux32_old_to_native_sigset(&nbss, &nlss); 585 mutex_enter(p->p_lock); 586 error = sigprocmask1(l, SIG_SETMASK, &nbss, &obss); 587 mutex_exit(p->p_lock); 588 if (error) 589 return error; 590 native_to_linux32_old_sigset(&olss, &obss); 591 *retval = olss; 592 return 0; 593 } 594 595 int 596 linux32_sys_rt_queueinfo(struct lwp *l, const struct linux32_sys_rt_queueinfo_args *uap, register_t *retval) 597 { 598 /* 599 syscallarg(int) pid; 600 syscallarg(int) sig; 601 syscallarg(linux32_siginfop_t) uinfo; 602 */ 603 int error; 604 linux32_siginfo_t info; 605 606 error = copyin(SCARG_P32(uap, uinfo), &info, sizeof(info)); 607 if (error) 608 return error; 609 if (info.lsi_code >= 0) 610 return EPERM; 611 612 /* XXX To really implement this we need to */ 613 /* XXX keep a list of queued signals somewhere. */ 614 return linux32_sys_kill(l, (const void *)uap, retval); 615 } 616 617 int 618 native_to_linux32_si_code(int code) 619 { 620 int si_codes[] = { 621 LINUX32_SI_USER, LINUX32_SI_QUEUE, LINUX32_SI_TIMER, 622 LINUX32_SI_ASYNCIO, LINUX32_SI_MESGQ, LINUX32_SI_TKILL /* SI_LWP */ 623 }; 624 625 if (code <= 0 && -code < __arraycount(si_codes)) 626 return si_codes[-code]; 627 628 return code; 629 } 630 631 int 632 native_to_linux32_si_status(int code, int status) 633 { 634 int sts; 635 636 switch (code) { 637 case CLD_CONTINUED: 638 sts = LINUX_SIGCONT; 639 break; 640 case CLD_EXITED: 641 sts = WEXITSTATUS(status); 642 break; 643 case CLD_STOPPED: 644 case CLD_TRAPPED: 645 case CLD_DUMPED: 646 case CLD_KILLED: 647 default: 648 sts = native_to_linux32_signo[WTERMSIG(status)]; 649 break; 650 } 651 652 return sts; 653 } 654