| 1 | /* $NetBSD: linux_signal.c,v 1.77 2015/11/14 13:29:35 christos 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.77 2015/11/14 13:29:35 christos 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 | /* |
| 272 | * Convert between Linux and BSD sigaction structures. |
| 273 | */ |
| 274 | void |
| 275 | linux_old_to_native_sigaction(struct sigaction *bsa, const struct linux_old_sigaction *lsa) |
| 276 | { |
| 277 | bsa->sa_handler = lsa->linux_sa_handler; |
| 278 | linux_old_to_native_sigset(&bsa->sa_mask, &lsa->linux_sa_mask); |
| 279 | bsa->sa_flags = linux_to_native_sigflags(lsa->linux_sa_flags); |
| 280 | } |
| 281 | |
| 282 | void |
| 283 | native_to_linux_old_sigaction(struct linux_old_sigaction *lsa, const struct sigaction *bsa) |
| 284 | { |
| 285 | lsa->linux_sa_handler = bsa->sa_handler; |
| 286 | native_to_linux_old_sigset(&lsa->linux_sa_mask, &bsa->sa_mask); |
| 287 | lsa->linux_sa_flags = native_to_linux_sigflags(bsa->sa_flags); |
| 288 | #ifndef __alpha__ |
| 289 | lsa->linux_sa_restorer = NULL; |
| 290 | #endif |
| 291 | } |
| 292 | |
| 293 | /* ...and the new sigaction conversion funcs. */ |
| 294 | void |
| 295 | linux_to_native_sigaction(struct sigaction *bsa, const struct linux_sigaction *lsa) |
| 296 | { |
| 297 | bsa->sa_handler = lsa->linux_sa_handler; |
| 298 | linux_to_native_sigset(&bsa->sa_mask, &lsa->linux_sa_mask); |
| 299 | bsa->sa_flags = linux_to_native_sigflags(lsa->linux_sa_flags); |
| 300 | } |
| 301 | |
| 302 | void |
| 303 | native_to_linux_sigaction(struct linux_sigaction *lsa, const struct sigaction *bsa) |
| 304 | { |
| 305 | lsa->linux_sa_handler = bsa->sa_handler; |
| 306 | native_to_linux_sigset(&lsa->linux_sa_mask, &bsa->sa_mask); |
| 307 | lsa->linux_sa_flags = native_to_linux_sigflags(bsa->sa_flags); |
| 308 | #ifndef __alpha__ |
| 309 | lsa->linux_sa_restorer = NULL; |
| 310 | #endif |
| 311 | } |
| 312 | |
| 313 | /* ----------------------------------------------------------------------- */ |
| 314 | |
| 315 | /* |
| 316 | * The Linux sigaction() system call. Do the usual conversions, |
| 317 | * and just call sigaction(). Some flags and values are silently |
| 318 | * ignored (see above). |
| 319 | */ |
| 320 | int |
| 321 | linux_sys_rt_sigaction(struct lwp *l, const struct linux_sys_rt_sigaction_args *uap, register_t *retval) |
| 322 | { |
| 323 | /* { |
| 324 | syscallarg(int) signum; |
| 325 | syscallarg(const struct linux_sigaction *) nsa; |
| 326 | syscallarg(struct linux_sigaction *) osa; |
| 327 | syscallarg(size_t) sigsetsize; |
| 328 | } */ |
| 329 | struct linux_sigaction nlsa, olsa; |
| 330 | struct sigaction nbsa, obsa; |
| 331 | int error, sig; |
| 332 | void *tramp = NULL; |
| 333 | int vers = 0; |
| 334 | #ifdef LINUX_SA_RESTORER |
| 335 | struct sigacts *ps = l->l_proc->p_sigacts; |
| 336 | #endif |
| 337 | |
| 338 | if (SCARG(uap, sigsetsize) != sizeof(linux_sigset_t)) |
| 339 | return (EINVAL); |
| 340 | |
| 341 | if (SCARG(uap, nsa)) { |
| 342 | error = copyin(SCARG(uap, nsa), &nlsa, sizeof(nlsa)); |
| 343 | if (error) |
| 344 | return (error); |
| 345 | linux_to_native_sigaction(&nbsa, &nlsa); |
| 346 | } |
| 347 | |
| 348 | sig = SCARG(uap, signum); |
| 349 | if (sig < 0 || sig >= LINUX__NSIG) |
| 350 | return (EINVAL); |
| 351 | if (sig > 0 && !linux_to_native_signo[sig]) { |
| 352 | /* Pretend that we did something useful for unknown signals. */ |
| 353 | obsa.sa_handler = SIG_IGN; |
| 354 | sigemptyset(&obsa.sa_mask); |
| 355 | obsa.sa_flags = 0; |
| 356 | } else { |
| 357 | #ifdef LINUX_SA_RESTORER |
| 358 | if ((nlsa.linux_sa_flags & LINUX_SA_RESTORER) && |
| 359 | (tramp = nlsa.linux_sa_restorer) != NULL) |
| 360 | vers = 2; |
| 361 | #endif |
| 362 | |
| 363 | error = sigaction1(l, linux_to_native_signo[sig], |
| 364 | SCARG(uap, nsa) ? &nbsa : NULL, |
| 365 | SCARG(uap, osa) ? &obsa : NULL, |
| 366 | tramp, vers); |
| 367 | if (error) |
| 368 | return (error); |
| 369 | } |
| 370 | if (SCARG(uap, osa)) { |
| 371 | native_to_linux_sigaction(&olsa, &obsa); |
| 372 | |
| 373 | #ifdef LINUX_SA_RESTORER |
| 374 | if (ps->sa_sigdesc[sig].sd_vers != 0) { |
| 375 | olsa.linux_sa_restorer = ps->sa_sigdesc[sig].sd_tramp; |
| 376 | olsa.linux_sa_flags |= LINUX_SA_RESTORER; |
| 377 | } |
| 378 | #endif |
| 379 | |
| 380 | error = copyout(&olsa, SCARG(uap, osa), sizeof(olsa)); |
| 381 | if (error) |
| 382 | return (error); |
| 383 | } |
| 384 | return (0); |
| 385 | } |
| 386 | |
| 387 | int |
| 388 | linux_sigprocmask1(struct lwp *l, int how, const linux_old_sigset_t *set, linux_old_sigset_t *oset) |
| 389 | { |
| 390 | struct proc *p = l->l_proc; |
| 391 | linux_old_sigset_t nlss, olss; |
| 392 | sigset_t nbss, obss; |
| 393 | int error; |
| 394 | |
| 395 | switch (how) { |
| 396 | case LINUX_SIG_BLOCK: |
| 397 | how = SIG_BLOCK; |
| 398 | break; |
| 399 | case LINUX_SIG_UNBLOCK: |
| 400 | how = SIG_UNBLOCK; |
| 401 | break; |
| 402 | case LINUX_SIG_SETMASK: |
| 403 | how = SIG_SETMASK; |
| 404 | break; |
| 405 | default: |
| 406 | return (EINVAL); |
| 407 | } |
| 408 | |
| 409 | if (set) { |
| 410 | error = copyin(set, &nlss, sizeof(nlss)); |
| 411 | if (error) |
| 412 | return (error); |
| 413 | linux_old_to_native_sigset(&nbss, &nlss); |
| 414 | } |
| 415 | mutex_enter(p->p_lock); |
| 416 | error = sigprocmask1(l, how, |
| 417 | set ? &nbss : NULL, oset ? &obss : NULL); |
| 418 | mutex_exit(p->p_lock); |
| 419 | if (error) |
| 420 | return (error); |
| 421 | if (oset) { |
| 422 | native_to_linux_old_sigset(&olss, &obss); |
| 423 | error = copyout(&olss, oset, sizeof(olss)); |
| 424 | if (error) |
| 425 | return (error); |
| 426 | } |
| 427 | return (error); |
| 428 | } |
| 429 | |
| 430 | int |
| 431 | linux_sys_rt_sigprocmask(struct lwp *l, const struct linux_sys_rt_sigprocmask_args *uap, register_t *retval) |
| 432 | { |
| 433 | /* { |
| 434 | syscallarg(int) how; |
| 435 | syscallarg(const linux_sigset_t *) set; |
| 436 | syscallarg(linux_sigset_t *) oset; |
| 437 | syscallarg(size_t) sigsetsize; |
| 438 | } */ |
| 439 | linux_sigset_t nlss, olss, *oset; |
| 440 | const linux_sigset_t *set; |
| 441 | struct proc *p = l->l_proc; |
| 442 | sigset_t nbss, obss; |
| 443 | int error, how; |
| 444 | |
| 445 | if (SCARG(uap, sigsetsize) != sizeof(linux_sigset_t)) |
| 446 | return (EINVAL); |
| 447 | |
| 448 | switch (SCARG(uap, how)) { |
| 449 | case LINUX_SIG_BLOCK: |
| 450 | how = SIG_BLOCK; |
| 451 | break; |
| 452 | case LINUX_SIG_UNBLOCK: |
| 453 | how = SIG_UNBLOCK; |
| 454 | break; |
| 455 | case LINUX_SIG_SETMASK: |
| 456 | how = SIG_SETMASK; |
| 457 | break; |
| 458 | default: |
| 459 | return (EINVAL); |
| 460 | } |
| 461 | |
| 462 | set = SCARG(uap, set); |
| 463 | oset = SCARG(uap, oset); |
| 464 | |
| 465 | if (set) { |
| 466 | error = copyin(set, &nlss, sizeof(nlss)); |
| 467 | if (error) |
| 468 | return (error); |
| 469 | linux_to_native_sigset(&nbss, &nlss); |
| 470 | } |
| 471 | mutex_enter(p->p_lock); |
| 472 | error = sigprocmask1(l, how, |
| 473 | set ? &nbss : NULL, oset ? &obss : NULL); |
| 474 | mutex_exit(p->p_lock); |
| 475 | if (!error && oset) { |
| 476 | native_to_linux_sigset(&olss, &obss); |
| 477 | error = copyout(&olss, oset, sizeof(olss)); |
| 478 | } |
| 479 | return (error); |
| 480 | } |
| 481 | |
| 482 | int |
| 483 | linux_sys_rt_sigpending(struct lwp *l, const struct linux_sys_rt_sigpending_args *uap, register_t *retval) |
| 484 | { |
| 485 | /* { |
| 486 | syscallarg(linux_sigset_t *) set; |
| 487 | syscallarg(size_t) sigsetsize; |
| 488 | } */ |
| 489 | sigset_t bss; |
| 490 | linux_sigset_t lss; |
| 491 | |
| 492 | if (SCARG(uap, sigsetsize) != sizeof(linux_sigset_t)) |
| 493 | return (EINVAL); |
| 494 | |
| 495 | sigpending1(l, &bss); |
| 496 | native_to_linux_sigset(&lss, &bss); |
| 497 | return copyout(&lss, SCARG(uap, set), sizeof(lss)); |
| 498 | } |
| 499 | |
| 500 | #ifndef __amd64__ |
| 501 | int |
| 502 | linux_sys_sigpending(struct lwp *l, const struct linux_sys_sigpending_args *uap, register_t *retval) |
| 503 | { |
| 504 | /* { |
| 505 | syscallarg(linux_old_sigset_t *) mask; |
| 506 | } */ |
| 507 | sigset_t bss; |
| 508 | linux_old_sigset_t lss; |
| 509 | |
| 510 | sigpending1(l, &bss); |
| 511 | native_to_linux_old_sigset(&lss, &bss); |
| 512 | return copyout(&lss, SCARG(uap, set), sizeof(lss)); |
| 513 | } |
| 514 | |
| 515 | int |
| 516 | linux_sys_sigsuspend(struct lwp *l, const struct linux_sys_sigsuspend_args *uap, register_t *retval) |
| 517 | { |
| 518 | /* { |
| 519 | syscallarg(void *) restart; |
| 520 | syscallarg(int) oldmask; |
| 521 | syscallarg(int) mask; |
| 522 | } */ |
| 523 | linux_old_sigset_t lss; |
| 524 | sigset_t bss; |
| 525 | |
| 526 | lss = SCARG(uap, mask); |
| 527 | linux_old_to_native_sigset(&bss, &lss); |
| 528 | return (sigsuspend1(l, &bss)); |
| 529 | } |
| 530 | #endif /* __amd64__ */ |
| 531 | |
| 532 | int |
| 533 | linux_sys_rt_sigsuspend(struct lwp *l, const struct linux_sys_rt_sigsuspend_args *uap, register_t *retval) |
| 534 | { |
| 535 | /* { |
| 536 | syscallarg(linux_sigset_t *) unewset; |
| 537 | syscallarg(size_t) sigsetsize; |
| 538 | } */ |
| 539 | linux_sigset_t lss; |
| 540 | sigset_t bss; |
| 541 | int error; |
| 542 | |
| 543 | if (SCARG(uap, sigsetsize) != sizeof(linux_sigset_t)) |
| 544 | return (EINVAL); |
| 545 | |
| 546 | error = copyin(SCARG(uap, unewset), &lss, sizeof(linux_sigset_t)); |
| 547 | if (error) |
| 548 | return (error); |
| 549 | |
| 550 | linux_to_native_sigset(&bss, &lss); |
| 551 | |
| 552 | return (sigsuspend1(l, &bss)); |
| 553 | } |
| 554 | |
| 555 | static int |
| 556 | fetchss(const void *u, void *s, size_t len) |
| 557 | { |
| 558 | int error; |
| 559 | linux_sigset_t lss; |
| 560 | |
| 561 | if ((error = copyin(u, &lss, sizeof(lss))) != 0) |
| 562 | return error; |
| 563 | |
| 564 | linux_to_native_sigset(s, &lss); |
| 565 | return 0; |
| 566 | } |
| 567 | |
| 568 | static int |
| 569 | fetchts(const void *u, void *s, size_t len) |
| 570 | { |
| 571 | int error; |
| 572 | struct linux_timespec lts; |
| 573 | |
| 574 | if ((error = copyin(u, <s, sizeof(lts))) != 0) |
| 575 | return error; |
| 576 | |
| 577 | linux_to_native_timespec(s, <s); |
| 578 | return 0; |
| 579 | } |
| 580 | |
| 581 | static int |
| 582 | fakestorets(const void *u, void *s, size_t len) |
| 583 | { |
| 584 | /* Do nothing, sigtimedwait does not alter timeout like ours */ |
| 585 | return 0; |
| 586 | } |
| 587 | |
| 588 | static int |
| 589 | storeinfo(const void *s, void *u, size_t len) |
| 590 | { |
| 591 | struct linux_siginfo lsi; |
| 592 | |
| 593 | native_to_linux_siginfo(&lsi, &((const siginfo_t *)s)->_info); |
| 594 | return copyout(&lsi, u, sizeof(lsi)); |
| 595 | } |
| 596 | |
| 597 | int |
| 598 | linux_sys_rt_sigtimedwait(struct lwp *l, |
| 599 | const struct linux_sys_rt_sigtimedwait_args *uap, register_t *retval) |
| 600 | { |
| 601 | /* { |
| 602 | syscallarg(const linux_sigset_t *) set; |
| 603 | syscallarg(linux_siginfo_t *) info); |
| 604 | syscallarg(const struct linux_timespec *) timeout; |
| 605 | } */ |
| 606 | |
| 607 | return sigtimedwait1(l, (const struct sys_____sigtimedwait50_args *)uap, |
| 608 | retval, fetchss, storeinfo, fetchts, fakestorets); |
| 609 | } |
| 610 | |
| 611 | /* |
| 612 | * Once more: only a signal conversion is needed. |
| 613 | * Note: also used as sys_rt_queueinfo. The info field is ignored. |
| 614 | */ |
| 615 | int |
| 616 | linux_sys_rt_queueinfo(struct lwp *l, const struct linux_sys_rt_queueinfo_args *uap, register_t *retval) |
| 617 | { |
| 618 | /* |
| 619 | syscallarg(int) pid; |
| 620 | syscallarg(int) signum; |
| 621 | syscallarg(linix_siginfo_t *) uinfo; |
| 622 | */ |
| 623 | int error; |
| 624 | linux_siginfo_t info; |
| 625 | |
| 626 | error = copyin(SCARG(uap, uinfo), &info, sizeof(info)); |
| 627 | if (error) |
| 628 | return error; |
| 629 | if (info.lsi_code >= 0) |
| 630 | return EPERM; |
| 631 | |
| 632 | /* XXX To really implement this we need to */ |
| 633 | /* XXX keep a list of queued signals somewhere. */ |
| 634 | return (linux_sys_kill(l, (const void *)uap, retval)); |
| 635 | } |
| 636 | |
| 637 | int |
| 638 | linux_sys_kill(struct lwp *l, const struct linux_sys_kill_args *uap, register_t *retval) |
| 639 | { |
| 640 | /* { |
| 641 | syscallarg(int) pid; |
| 642 | syscallarg(int) signum; |
| 643 | } */ |
| 644 | |
| 645 | struct sys_kill_args ka; |
| 646 | int sig; |
| 647 | |
| 648 | SCARG(&ka, pid) = SCARG(uap, pid); |
| 649 | sig = SCARG(uap, signum); |
| 650 | if (sig < 0 || sig >= LINUX__NSIG) |
| 651 | return (EINVAL); |
| 652 | SCARG(&ka, signum) = linux_to_native_signo[sig]; |
| 653 | return sys_kill(l, &ka, retval); |
| 654 | } |
| 655 | |
| 656 | #ifdef LINUX_SS_ONSTACK |
| 657 | static void linux_to_native_sigaltstack(struct sigaltstack *, |
| 658 | const struct linux_sigaltstack *); |
| 659 | |
| 660 | static void |
| 661 | linux_to_native_sigaltstack(struct sigaltstack *bss, const struct linux_sigaltstack *lss) |
| 662 | { |
| 663 | bss->ss_sp = lss->ss_sp; |
| 664 | bss->ss_size = lss->ss_size; |
| 665 | if (lss->ss_flags & LINUX_SS_ONSTACK) |
| 666 | bss->ss_flags = SS_ONSTACK; |
| 667 | else if (lss->ss_flags & LINUX_SS_DISABLE) |
| 668 | bss->ss_flags = SS_DISABLE; |
| 669 | else |
| 670 | bss->ss_flags = 0; |
| 671 | } |
| 672 | |
| 673 | void |
| 674 | native_to_linux_sigaltstack(struct linux_sigaltstack *lss, const struct sigaltstack *bss) |
| 675 | { |
| 676 | lss->ss_sp = bss->ss_sp; |
| 677 | lss->ss_size = bss->ss_size; |
| 678 | if (bss->ss_flags & SS_ONSTACK) |
| 679 | lss->ss_flags = LINUX_SS_ONSTACK; |
| 680 | else if (bss->ss_flags & SS_DISABLE) |
| 681 | lss->ss_flags = LINUX_SS_DISABLE; |
| 682 | else |
| 683 | lss->ss_flags = 0; |
| 684 | } |
| 685 | |
| 686 | int |
| 687 | linux_sys_sigaltstack(struct lwp *l, const struct linux_sys_sigaltstack_args *uap, register_t *retval) |
| 688 | { |
| 689 | /* { |
| 690 | syscallarg(const struct linux_sigaltstack *) ss; |
| 691 | syscallarg(struct linux_sigaltstack *) oss; |
| 692 | } */ |
| 693 | struct linux_sigaltstack ss; |
| 694 | struct sigaltstack nss; |
| 695 | struct proc *p = l->l_proc; |
| 696 | int error = 0; |
| 697 | |
| 698 | if (SCARG(uap, oss)) { |
| 699 | native_to_linux_sigaltstack(&ss, &l->l_sigstk); |
| 700 | if ((error = copyout(&ss, SCARG(uap, oss), sizeof(ss))) != 0) |
| 701 | return error; |
| 702 | } |
| 703 | |
| 704 | if (SCARG(uap, ss) != NULL) { |
| 705 | if ((error = copyin(SCARG(uap, ss), &ss, sizeof(ss))) != 0) |
| 706 | return error; |
| 707 | linux_to_native_sigaltstack(&nss, &ss); |
| 708 | |
| 709 | mutex_enter(p->p_lock); |
| 710 | |
| 711 | if (nss.ss_flags & ~SS_ALLBITS) |
| 712 | error = EINVAL; |
| 713 | else if (nss.ss_flags & SS_DISABLE) { |
| 714 | if (l->l_sigstk.ss_flags & SS_ONSTACK) |
| 715 | error = EINVAL; |
| 716 | } else if (nss.ss_size < LINUX_MINSIGSTKSZ) |
| 717 | error = ENOMEM; |
| 718 | |
| 719 | if (error == 0) |
| 720 | l->l_sigstk = nss; |
| 721 | |
| 722 | mutex_exit(p->p_lock); |
| 723 | } |
| 724 | |
| 725 | return error; |
| 726 | } |
| 727 | #endif /* LINUX_SS_ONSTACK */ |
| 728 | |
| 729 | static int |
| 730 | linux_do_tkill(struct lwp *l, int tgid, int tid, int signum) |
| 731 | { |
| 732 | struct proc *p; |
| 733 | struct lwp *t; |
| 734 | ksiginfo_t ksi; |
| 735 | int error; |
| 736 | |
| 737 | if (signum < 0 || signum >= LINUX__NSIG) |
| 738 | return EINVAL; |
| 739 | signum = linux_to_native_signo[signum]; |
| 740 | |
| 741 | if (tgid == -1) { |
| 742 | tgid = tid; |
| 743 | } |
| 744 | |
| 745 | KSI_INIT(&ksi); |
| 746 | ksi.ksi_signo = signum; |
| 747 | ksi.ksi_code = SI_LWP; |
| 748 | ksi.ksi_pid = l->l_proc->p_pid; |
| 749 | ksi.ksi_uid = kauth_cred_geteuid(l->l_cred); |
| 750 | ksi.ksi_lid = tid; |
| 751 | |
| 752 | mutex_enter(proc_lock); |
| 753 | p = proc_find(tgid); |
| 754 | if (p == NULL) { |
| 755 | mutex_exit(proc_lock); |
| 756 | return ESRCH; |
| 757 | } |
| 758 | mutex_enter(p->p_lock); |
| 759 | error = kauth_authorize_process(l->l_cred, |
| 760 | KAUTH_PROCESS_SIGNAL, p, KAUTH_ARG(signum), NULL, NULL); |
| 761 | if ((t = lwp_find(p, ksi.ksi_lid)) == NULL) |
| 762 | error = ESRCH; |
| 763 | else if (signum != 0) |
| 764 | kpsignal2(p, &ksi); |
| 765 | mutex_exit(p->p_lock); |
| 766 | mutex_exit(proc_lock); |
| 767 | |
| 768 | return error; |
| 769 | } |
| 770 | |
| 771 | int |
| 772 | linux_sys_tkill(struct lwp *l, const struct linux_sys_tkill_args *uap, register_t *retval) |
| 773 | { |
| 774 | /* { |
| 775 | syscallarg(int) tid; |
| 776 | syscallarg(int) sig; |
| 777 | } */ |
| 778 | |
| 779 | if (SCARG(uap, tid) <= 0) |
| 780 | return EINVAL; |
| 781 | |
| 782 | return linux_do_tkill(l, -1, SCARG(uap, tid), SCARG(uap, sig)); |
| 783 | } |
| 784 | |
| 785 | int |
| 786 | linux_sys_tgkill(struct lwp *l, const struct linux_sys_tgkill_args *uap, register_t *retval) |
| 787 | { |
| 788 | /* { |
| 789 | syscallarg(int) tgid; |
| 790 | syscallarg(int) tid; |
| 791 | syscallarg(int) sig; |
| 792 | } */ |
| 793 | |
| 794 | if (SCARG(uap, tid) <= 0 || SCARG(uap, tgid) < -1) |
| 795 | return EINVAL; |
| 796 | |
| 797 | return linux_do_tkill(l, SCARG(uap, tgid), SCARG(uap, tid), SCARG(uap, sig)); |
| 798 | } |
| 799 | |
| 800 | int |
| 801 | native_to_linux_si_code(int code) |
| 802 | { |
| 803 | int si_codes[] = { |
| 804 | LINUX_SI_USER, LINUX_SI_QUEUE, LINUX_SI_TIMER, LINUX_SI_ASYNCIO, |
| 805 | LINUX_SI_MESGQ, LINUX_SI_TKILL /* SI_LWP */ |
| 806 | }; |
| 807 | |
| 808 | if (code <= 0 && -code < __arraycount(si_codes)) |
| 809 | return si_codes[-code]; |
| 810 | |
| 811 | return code; |
| 812 | } |
| 813 | |
| 814 | int |
| 815 | native_to_linux_si_status(int code, int status) |
| 816 | { |
| 817 | int sts; |
| 818 | |
| 819 | switch (code) { |
| 820 | case CLD_CONTINUED: |
| 821 | sts = LINUX_SIGCONT; |
| 822 | break; |
| 823 | case CLD_EXITED: |
| 824 | sts = WEXITSTATUS(status); |
| 825 | break; |
| 826 | case CLD_STOPPED: |
| 827 | case CLD_TRAPPED: |
| 828 | case CLD_DUMPED: |
| 829 | case CLD_KILLED: |
| 830 | default: |
| 831 | sts = native_to_linux_signo[WTERMSIG(status)]; |
| 832 | break; |
| 833 | } |
| 834 | |
| 835 | return sts; |
| 836 | } |
| 837 | |