Home | History | Annotate | Line # | Download | only in common
linux_signal.c revision 1.72.2.1
      1 /*	$NetBSD: linux_signal.c,v 1.72.2.1 2012/04/17 00:07:17 yamt 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.72.2.1 2012/04/17 00:07:17 yamt 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/malloc.h>
     66 #include <sys/wait.h>
     67 
     68 #include <sys/syscallargs.h>
     69 
     70 #include <compat/linux/common/linux_types.h>
     71 #include <compat/linux/common/linux_signal.h>
     72 #include <compat/linux/common/linux_emuldata.h>
     73 #include <compat/linux/common/linux_siginfo.h>
     74 #include <compat/linux/common/linux_sigevent.h>
     75 #include <compat/linux/common/linux_util.h>
     76 #include <compat/linux/common/linux_ipc.h>
     77 #include <compat/linux/common/linux_sem.h>
     78 #include <compat/linux/common/linux_errno.h>
     79 #include <compat/linux/common/linux_sched.h>
     80 
     81 #include <compat/linux/linux_syscallargs.h>
     82 
     83 /* Locally used defines (in bsd<->linux conversion functions): */
     84 #define	linux_sigemptyset(s)	memset((s), 0, sizeof(*(s)))
     85 #define	linux_sigismember(s, n)	((s)->sig[((n) - 1) / LINUX__NSIG_BPW]	\
     86 					& (1L << ((n) - 1) % LINUX__NSIG_BPW))
     87 #define	linux_sigaddset(s, n)	((s)->sig[((n) - 1) / LINUX__NSIG_BPW]	\
     88 					|= (1L << ((n) - 1) % LINUX__NSIG_BPW))
     89 
     90 #ifdef DEBUG_LINUX
     91 #define DPRINTF(a)	uprintf a
     92 #else
     93 #define DPRINTF(a)
     94 #endif
     95 
     96 extern const int native_to_linux_signo[];
     97 extern const int linux_to_native_signo[];
     98 
     99 /*
    100  * Convert between Linux and BSD signal sets.
    101  */
    102 #if LINUX__NSIG_WORDS > 1
    103 void
    104 linux_old_extra_to_native_sigset(sigset_t *bss, const linux_old_sigset_t *lss, const unsigned long *extra)
    105 {
    106 	linux_sigset_t lsnew;
    107 
    108 	/* convert old sigset to new sigset */
    109 	linux_sigemptyset(&lsnew);
    110 	lsnew.sig[0] = *lss;
    111 	if (extra)
    112 		memcpy(&lsnew.sig[1], extra,
    113 		    sizeof(linux_sigset_t) - sizeof(linux_old_sigset_t));
    114 
    115 	linux_to_native_sigset(bss, &lsnew);
    116 }
    117 
    118 void
    119 native_to_linux_old_extra_sigset(linux_old_sigset_t *lss, unsigned long *extra, const sigset_t *bss)
    120 {
    121 	linux_sigset_t lsnew;
    122 
    123 	native_to_linux_sigset(&lsnew, bss);
    124 
    125 	/* convert new sigset to old sigset */
    126 	*lss = lsnew.sig[0];
    127 	if (extra)
    128 		memcpy(extra, &lsnew.sig[1],
    129 		    sizeof(linux_sigset_t) - sizeof(linux_old_sigset_t));
    130 }
    131 #endif /* LINUX__NSIG_WORDS > 1 */
    132 
    133 void
    134 linux_to_native_sigset(sigset_t *bss, const linux_sigset_t *lss)
    135 {
    136 	int i, newsig;
    137 
    138 	sigemptyset(bss);
    139 	for (i = 1; i < LINUX__NSIG; i++) {
    140 		if (linux_sigismember(lss, i)) {
    141 			newsig = linux_to_native_signo[i];
    142 			if (newsig)
    143 				sigaddset(bss, newsig);
    144 		}
    145 	}
    146 }
    147 
    148 void
    149 native_to_linux_sigset(linux_sigset_t *lss, const sigset_t *bss)
    150 {
    151 	int i, newsig;
    152 
    153 	linux_sigemptyset(lss);
    154 	for (i = 1; i < NSIG; i++) {
    155 		if (sigismember(bss, i)) {
    156 			newsig = native_to_linux_signo[i];
    157 			if (newsig)
    158 				linux_sigaddset(lss, newsig);
    159 		}
    160 	}
    161 }
    162 
    163 void
    164 native_to_linux_siginfo(linux_siginfo_t *lsi, const struct _ksiginfo *ksi)
    165 {
    166 	memset(lsi, 0, sizeof(*lsi));
    167 
    168 	lsi->lsi_signo = native_to_linux_signo[ksi->_signo];
    169 	lsi->lsi_errno = native_to_linux_errno[ksi->_errno];
    170 	lsi->lsi_code = native_to_linux_si_code(ksi->_code);
    171 
    172 	switch (ksi->_code) {
    173 	case SI_NOINFO:
    174 		break;
    175 
    176 	case SI_USER:
    177 		lsi->lsi_pid = ksi->_reason._rt._pid;
    178 		lsi->lsi_uid = ksi->_reason._rt._uid;
    179 		if (lsi->lsi_signo == LINUX_SIGALRM ||
    180 		    lsi->lsi_signo >= LINUX_SIGRTMIN)
    181 			lsi->lsi_value.sival_ptr =
    182 			    ksi->_reason._rt._value.sival_ptr;
    183 		break;
    184 
    185 	case SI_TIMER:
    186 	case SI_QUEUE:
    187 		lsi->lsi_uid = ksi->_reason._rt._uid;
    188 		lsi->lsi_uid = ksi->_reason._rt._uid;
    189 		lsi->lsi_value.sival_ptr = ksi->_reason._rt._value.sival_ptr;
    190 		break;
    191 
    192 	case SI_ASYNCIO:
    193 	case SI_MESGQ:
    194 		lsi->lsi_value.sival_ptr = ksi->_reason._rt._value.sival_ptr;
    195 		break;
    196 
    197 	default:
    198 		switch (ksi->_signo) {
    199 		case SIGCHLD:
    200 			lsi->lsi_uid = ksi->_reason._child._uid;
    201 			lsi->lsi_pid = ksi->_reason._child._pid;
    202 			lsi->lsi_status = native_to_linux_si_status(
    203 			    ksi->_code, ksi->_reason._child._status);
    204 			lsi->lsi_utime = ksi->_reason._child._utime;
    205 			lsi->lsi_stime = ksi->_reason._child._stime;
    206 			break;
    207 
    208 		case SIGILL:
    209 		case SIGFPE:
    210 		case SIGSEGV:
    211 		case SIGBUS:
    212 		case SIGTRAP:
    213 			lsi->lsi_addr = ksi->_reason._fault._addr;
    214 			break;
    215 
    216 		case SIGIO:
    217 			lsi->lsi_fd = ksi->_reason._poll._fd;
    218 			lsi->lsi_band = ksi->_reason._poll._band;
    219 			break;
    220 		default:
    221 			break;
    222 		}
    223 	}
    224 }
    225 
    226 unsigned int
    227 native_to_linux_sigflags(const int bsf)
    228 {
    229 	unsigned int lsf = 0;
    230 	if ((bsf & SA_NOCLDSTOP) != 0)
    231 		lsf |= LINUX_SA_NOCLDSTOP;
    232 	if ((bsf & SA_NOCLDWAIT) != 0)
    233 		lsf |= LINUX_SA_NOCLDWAIT;
    234 	if ((bsf & SA_ONSTACK) != 0)
    235 		lsf |= LINUX_SA_ONSTACK;
    236 	if ((bsf & SA_RESTART) != 0)
    237 		lsf |= LINUX_SA_RESTART;
    238 	if ((bsf & SA_NODEFER) != 0)
    239 		lsf |= LINUX_SA_NOMASK;
    240 	if ((bsf & SA_RESETHAND) != 0)
    241 		lsf |= LINUX_SA_ONESHOT;
    242 	if ((bsf & SA_SIGINFO) != 0)
    243 		lsf |= LINUX_SA_SIGINFO;
    244 	return lsf;
    245 }
    246 
    247 int
    248 linux_to_native_sigflags(const unsigned long lsf)
    249 {
    250 	int bsf = 0;
    251 	if ((lsf & LINUX_SA_NOCLDSTOP) != 0)
    252 		bsf |= SA_NOCLDSTOP;
    253 	if ((lsf & LINUX_SA_NOCLDWAIT) != 0)
    254 		bsf |= SA_NOCLDWAIT;
    255 	if ((lsf & LINUX_SA_ONSTACK) != 0)
    256 		bsf |= SA_ONSTACK;
    257 	if ((lsf & LINUX_SA_RESTART) != 0)
    258 		bsf |= SA_RESTART;
    259 	if ((lsf & LINUX_SA_ONESHOT) != 0)
    260 		bsf |= SA_RESETHAND;
    261 	if ((lsf & LINUX_SA_NOMASK) != 0)
    262 		bsf |= SA_NODEFER;
    263 	if ((lsf & LINUX_SA_SIGINFO) != 0)
    264 		bsf |= SA_SIGINFO;
    265 	if ((lsf & ~LINUX_SA_ALLBITS) != 0) {
    266 		DPRINTF(("linux_old_to_native_sigflags: "
    267 		    "%lx extra bits ignored\n", lsf));
    268 	}
    269 	return bsf;
    270 }
    271 
    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 	bsa->sa_handler = lsa->linux_sa_handler;
    279 	linux_old_to_native_sigset(&bsa->sa_mask, &lsa->linux_sa_mask);
    280 	bsa->sa_flags = linux_to_native_sigflags(lsa->linux_sa_flags);
    281 }
    282 
    283 void
    284 native_to_linux_old_sigaction(struct linux_old_sigaction *lsa, const struct sigaction *bsa)
    285 {
    286 	lsa->linux_sa_handler = bsa->sa_handler;
    287 	native_to_linux_old_sigset(&lsa->linux_sa_mask, &bsa->sa_mask);
    288 	lsa->linux_sa_flags = native_to_linux_sigflags(bsa->sa_flags);
    289 #ifndef __alpha__
    290 	lsa->linux_sa_restorer = NULL;
    291 #endif
    292 }
    293 
    294 /* ...and the new sigaction conversion funcs. */
    295 void
    296 linux_to_native_sigaction(struct sigaction *bsa, const struct linux_sigaction *lsa)
    297 {
    298 	bsa->sa_handler = lsa->linux_sa_handler;
    299 	linux_to_native_sigset(&bsa->sa_mask, &lsa->linux_sa_mask);
    300 	bsa->sa_flags = linux_to_native_sigflags(lsa->linux_sa_flags);
    301 }
    302 
    303 void
    304 native_to_linux_sigaction(struct linux_sigaction *lsa, const struct sigaction *bsa)
    305 {
    306 	lsa->linux_sa_handler = bsa->sa_handler;
    307 	native_to_linux_sigset(&lsa->linux_sa_mask, &bsa->sa_mask);
    308 	lsa->linux_sa_flags = native_to_linux_sigflags(bsa->sa_flags);
    309 #ifndef __alpha__
    310 	lsa->linux_sa_restorer = NULL;
    311 #endif
    312 }
    313 
    314 /* ----------------------------------------------------------------------- */
    315 
    316 /*
    317  * The Linux sigaction() system call. Do the usual conversions,
    318  * and just call sigaction(). Some flags and values are silently
    319  * ignored (see above).
    320  */
    321 int
    322 linux_sys_rt_sigaction(struct lwp *l, const struct linux_sys_rt_sigaction_args *uap, register_t *retval)
    323 {
    324 	/* {
    325 		syscallarg(int) signum;
    326 		syscallarg(const struct linux_sigaction *) nsa;
    327 		syscallarg(struct linux_sigaction *) osa;
    328 		syscallarg(size_t) sigsetsize;
    329 	} */
    330 	struct linux_sigaction nlsa, olsa;
    331 	struct sigaction nbsa, obsa;
    332 	int error, sig;
    333 	void *tramp = NULL;
    334 	int vers = 0;
    335 #if defined __amd64__
    336 	struct sigacts *ps = l->l_proc->p_sigacts;
    337 #endif
    338 
    339 	if (SCARG(uap, sigsetsize) != sizeof(linux_sigset_t))
    340 		return (EINVAL);
    341 
    342 	if (SCARG(uap, nsa)) {
    343 		error = copyin(SCARG(uap, nsa), &nlsa, sizeof(nlsa));
    344 		if (error)
    345 			return (error);
    346 		linux_to_native_sigaction(&nbsa, &nlsa);
    347 	}
    348 
    349 	sig = SCARG(uap, signum);
    350 	if (sig < 0 || sig >= LINUX__NSIG)
    351 		return (EINVAL);
    352 	if (sig > 0 && !linux_to_native_signo[sig]) {
    353 		/* Pretend that we did something useful for unknown signals. */
    354 		obsa.sa_handler = SIG_IGN;
    355 		sigemptyset(&obsa.sa_mask);
    356 		obsa.sa_flags = 0;
    357 	} else {
    358 #if defined __amd64__
    359 		if (nlsa.linux_sa_flags & LINUX_SA_RESTORER) {
    360 			if ((tramp = nlsa.linux_sa_restorer) != NULL)
    361 				vers = 2; /* XXX arch dependent */
    362 		}
    363 #endif
    364 
    365 		error = sigaction1(l, linux_to_native_signo[sig],
    366 		    SCARG(uap, nsa) ? &nbsa : NULL,
    367 		    SCARG(uap, osa) ? &obsa : NULL,
    368 		    tramp, vers);
    369 		if (error)
    370 			return (error);
    371 	}
    372 	if (SCARG(uap, osa)) {
    373 		native_to_linux_sigaction(&olsa, &obsa);
    374 
    375 #if defined __amd64__
    376 		if (ps->sa_sigdesc[sig].sd_vers != 0) {
    377 			olsa.linux_sa_restorer = ps->sa_sigdesc[sig].sd_tramp;
    378 			olsa.linux_sa_flags |= LINUX_SA_RESTORER;
    379 		}
    380 #endif
    381 
    382 		error = copyout(&olsa, SCARG(uap, osa), sizeof(olsa));
    383 		if (error)
    384 			return (error);
    385 	}
    386 	return (0);
    387 }
    388 
    389 int
    390 linux_sigprocmask1(struct lwp *l, int how, const linux_old_sigset_t *set, linux_old_sigset_t *oset)
    391 {
    392 	struct proc *p = l->l_proc;
    393 	linux_old_sigset_t nlss, olss;
    394 	sigset_t nbss, obss;
    395 	int error;
    396 
    397 	switch (how) {
    398 	case LINUX_SIG_BLOCK:
    399 		how = SIG_BLOCK;
    400 		break;
    401 	case LINUX_SIG_UNBLOCK:
    402 		how = SIG_UNBLOCK;
    403 		break;
    404 	case LINUX_SIG_SETMASK:
    405 		how = SIG_SETMASK;
    406 		break;
    407 	default:
    408 		return (EINVAL);
    409 	}
    410 
    411 	if (set) {
    412 		error = copyin(set, &nlss, sizeof(nlss));
    413 		if (error)
    414 			return (error);
    415 		linux_old_to_native_sigset(&nbss, &nlss);
    416 	}
    417 	mutex_enter(p->p_lock);
    418 	error = sigprocmask1(l, how,
    419 	    set ? &nbss : NULL, oset ? &obss : NULL);
    420 	mutex_exit(p->p_lock);
    421 	if (error)
    422 		return (error);
    423 	if (oset) {
    424 		native_to_linux_old_sigset(&olss, &obss);
    425 		error = copyout(&olss, oset, sizeof(olss));
    426 		if (error)
    427 			return (error);
    428 	}
    429 	return (error);
    430 }
    431 
    432 int
    433 linux_sys_rt_sigprocmask(struct lwp *l, const struct linux_sys_rt_sigprocmask_args *uap, register_t *retval)
    434 {
    435 	/* {
    436 		syscallarg(int) how;
    437 		syscallarg(const linux_sigset_t *) set;
    438 		syscallarg(linux_sigset_t *) oset;
    439 		syscallarg(size_t) sigsetsize;
    440 	} */
    441 	linux_sigset_t nlss, olss, *oset;
    442 	const linux_sigset_t *set;
    443 	struct proc *p = l->l_proc;
    444 	sigset_t nbss, obss;
    445 	int error, how;
    446 
    447 	if (SCARG(uap, sigsetsize) != sizeof(linux_sigset_t))
    448 		return (EINVAL);
    449 
    450 	switch (SCARG(uap, how)) {
    451 	case LINUX_SIG_BLOCK:
    452 		how = SIG_BLOCK;
    453 		break;
    454 	case LINUX_SIG_UNBLOCK:
    455 		how = SIG_UNBLOCK;
    456 		break;
    457 	case LINUX_SIG_SETMASK:
    458 		how = SIG_SETMASK;
    459 		break;
    460 	default:
    461 		return (EINVAL);
    462 	}
    463 
    464 	set = SCARG(uap, set);
    465 	oset = SCARG(uap, oset);
    466 
    467 	if (set) {
    468 		error = copyin(set, &nlss, sizeof(nlss));
    469 		if (error)
    470 			return (error);
    471 		linux_to_native_sigset(&nbss, &nlss);
    472 	}
    473 	mutex_enter(p->p_lock);
    474 	error = sigprocmask1(l, how,
    475 	    set ? &nbss : NULL, oset ? &obss : NULL);
    476 	mutex_exit(p->p_lock);
    477 	if (!error && oset) {
    478 		native_to_linux_sigset(&olss, &obss);
    479 		error = copyout(&olss, oset, sizeof(olss));
    480 	}
    481 	return (error);
    482 }
    483 
    484 int
    485 linux_sys_rt_sigpending(struct lwp *l, const struct linux_sys_rt_sigpending_args *uap, register_t *retval)
    486 {
    487 	/* {
    488 		syscallarg(linux_sigset_t *) set;
    489 		syscallarg(size_t) sigsetsize;
    490 	} */
    491 	sigset_t bss;
    492 	linux_sigset_t lss;
    493 
    494 	if (SCARG(uap, sigsetsize) != sizeof(linux_sigset_t))
    495 		return (EINVAL);
    496 
    497 	sigpending1(l, &bss);
    498 	native_to_linux_sigset(&lss, &bss);
    499 	return copyout(&lss, SCARG(uap, set), sizeof(lss));
    500 }
    501 
    502 #ifndef __amd64__
    503 int
    504 linux_sys_sigpending(struct lwp *l, const struct linux_sys_sigpending_args *uap, register_t *retval)
    505 {
    506 	/* {
    507 		syscallarg(linux_old_sigset_t *) mask;
    508 	} */
    509 	sigset_t bss;
    510 	linux_old_sigset_t lss;
    511 
    512 	sigpending1(l, &bss);
    513 	native_to_linux_old_sigset(&lss, &bss);
    514 	return copyout(&lss, SCARG(uap, set), sizeof(lss));
    515 }
    516 
    517 int
    518 linux_sys_sigsuspend(struct lwp *l, const struct linux_sys_sigsuspend_args *uap, register_t *retval)
    519 {
    520 	/* {
    521 		syscallarg(void *) restart;
    522 		syscallarg(int) oldmask;
    523 		syscallarg(int) mask;
    524 	} */
    525 	linux_old_sigset_t lss;
    526 	sigset_t bss;
    527 
    528 	lss = SCARG(uap, mask);
    529 	linux_old_to_native_sigset(&bss, &lss);
    530 	return (sigsuspend1(l, &bss));
    531 }
    532 #endif /* __amd64__ */
    533 
    534 int
    535 linux_sys_rt_sigsuspend(struct lwp *l, const struct linux_sys_rt_sigsuspend_args *uap, register_t *retval)
    536 {
    537 	/* {
    538 		syscallarg(linux_sigset_t *) unewset;
    539 		syscallarg(size_t) sigsetsize;
    540 	} */
    541 	linux_sigset_t lss;
    542 	sigset_t bss;
    543 	int error;
    544 
    545 	if (SCARG(uap, sigsetsize) != sizeof(linux_sigset_t))
    546 		return (EINVAL);
    547 
    548 	error = copyin(SCARG(uap, unewset), &lss, sizeof(linux_sigset_t));
    549 	if (error)
    550 		return (error);
    551 
    552 	linux_to_native_sigset(&bss, &lss);
    553 
    554 	return (sigsuspend1(l, &bss));
    555 }
    556 
    557 static int
    558 fetchss(const void *u, void *s, size_t len)
    559 {
    560 	int error;
    561 	linux_sigset_t lss;
    562 
    563 	if ((error = copyin(u, &lss, sizeof(lss))) != 0)
    564 		return error;
    565 
    566 	linux_to_native_sigset(s, &lss);
    567 	return 0;
    568 }
    569 
    570 static int
    571 fetchts(const void *u, void *s, size_t len)
    572 {
    573 	int error;
    574 	struct linux_timespec lts;
    575 
    576 	if ((error = copyin(u, &lts, sizeof(lts))) != 0)
    577 		return error;
    578 
    579 	linux_to_native_timespec(s, &lts);
    580 	return 0;
    581 }
    582 
    583 static int
    584 fakestorets(const void *u, void *s, size_t len)
    585 {
    586 	/* Do nothing, sigtimedwait does not alter timeout like ours */
    587 	return 0;
    588 }
    589 
    590 static int
    591 storeinfo(const void *s, void *u, size_t len)
    592 {
    593 	struct linux_siginfo lsi;
    594 
    595 	native_to_linux_siginfo(&lsi, &((const siginfo_t *)s)->_info);
    596 	return copyout(&lsi, u, sizeof(lsi));
    597 }
    598 
    599 int
    600 linux_sys_rt_sigtimedwait(struct lwp *l,
    601     const struct linux_sys_rt_sigtimedwait_args *uap, register_t *retval)
    602 {
    603 	/* {
    604 		syscallarg(const linux_sigset_t *) set;
    605 		syscallarg(linux_siginfo_t *) info);
    606 		syscallarg(const struct linux_timespec *) timeout;
    607 	} */
    608 
    609 	return sigtimedwait1(l, (const struct sys_____sigtimedwait50_args *)uap,
    610 	    retval, fetchss, storeinfo, fetchts, fakestorets);
    611 }
    612 
    613 /*
    614  * Once more: only a signal conversion is needed.
    615  * Note: also used as sys_rt_queueinfo.  The info field is ignored.
    616  */
    617 int
    618 linux_sys_rt_queueinfo(struct lwp *l, const struct linux_sys_rt_queueinfo_args *uap, register_t *retval)
    619 {
    620 	/*
    621 		syscallarg(int) pid;
    622 		syscallarg(int) signum;
    623 		syscallarg(linix_siginfo_t *) uinfo;
    624 	*/
    625 	int error;
    626 	linux_siginfo_t info;
    627 
    628 	error = copyin(SCARG(uap, uinfo), &info, sizeof(info));
    629 	if (error)
    630 		return error;
    631 	if (info.lsi_code >= 0)
    632 		return EPERM;
    633 
    634 	/* XXX To really implement this we need to	*/
    635 	/* XXX keep a list of queued signals somewhere.	*/
    636 	return (linux_sys_kill(l, (const void *)uap, retval));
    637 }
    638 
    639 int
    640 linux_sys_kill(struct lwp *l, const struct linux_sys_kill_args *uap, register_t *retval)
    641 {
    642 	/* {
    643 		syscallarg(int) pid;
    644 		syscallarg(int) signum;
    645 	} */
    646 
    647 	struct sys_kill_args ka;
    648 	int sig;
    649 
    650 	SCARG(&ka, pid) = SCARG(uap, pid);
    651 	sig = SCARG(uap, signum);
    652 	if (sig < 0 || sig >= LINUX__NSIG)
    653 		return (EINVAL);
    654 	SCARG(&ka, signum) = linux_to_native_signo[sig];
    655 	return sys_kill(l, &ka, retval);
    656 }
    657 
    658 #ifdef LINUX_SS_ONSTACK
    659 static void linux_to_native_sigaltstack(struct sigaltstack *,
    660     const struct linux_sigaltstack *);
    661 
    662 static void
    663 linux_to_native_sigaltstack(struct sigaltstack *bss, const struct linux_sigaltstack *lss)
    664 {
    665 	bss->ss_sp = lss->ss_sp;
    666 	bss->ss_size = lss->ss_size;
    667 	if (lss->ss_flags & LINUX_SS_ONSTACK)
    668 	    bss->ss_flags = SS_ONSTACK;
    669 	else if (lss->ss_flags & LINUX_SS_DISABLE)
    670 	    bss->ss_flags = SS_DISABLE;
    671 	else
    672 	    bss->ss_flags = 0;
    673 }
    674 
    675 void
    676 native_to_linux_sigaltstack(struct linux_sigaltstack *lss, const struct sigaltstack *bss)
    677 {
    678 	lss->ss_sp = bss->ss_sp;
    679 	lss->ss_size = bss->ss_size;
    680 	if (bss->ss_flags & SS_ONSTACK)
    681 	    lss->ss_flags = LINUX_SS_ONSTACK;
    682 	else if (bss->ss_flags & SS_DISABLE)
    683 	    lss->ss_flags = LINUX_SS_DISABLE;
    684 	else
    685 	    lss->ss_flags = 0;
    686 }
    687 
    688 int
    689 linux_sys_sigaltstack(struct lwp *l, const struct linux_sys_sigaltstack_args *uap, register_t *retval)
    690 {
    691 	/* {
    692 		syscallarg(const struct linux_sigaltstack *) ss;
    693 		syscallarg(struct linux_sigaltstack *) oss;
    694 	} */
    695 	struct linux_sigaltstack ss;
    696 	struct sigaltstack nss;
    697 	struct proc *p = l->l_proc;
    698 	int error = 0;
    699 
    700 	if (SCARG(uap, oss)) {
    701 		native_to_linux_sigaltstack(&ss, &l->l_sigstk);
    702 		if ((error = copyout(&ss, SCARG(uap, oss), sizeof(ss))) != 0)
    703 			return error;
    704 	}
    705 
    706 	if (SCARG(uap, ss) != NULL) {
    707 		if ((error = copyin(SCARG(uap, ss), &ss, sizeof(ss))) != 0)
    708 			return error;
    709 		linux_to_native_sigaltstack(&nss, &ss);
    710 
    711 		mutex_enter(p->p_lock);
    712 
    713 		if (nss.ss_flags & ~SS_ALLBITS)
    714 			error = EINVAL;
    715 		else if (nss.ss_flags & SS_DISABLE) {
    716 			if (l->l_sigstk.ss_flags & SS_ONSTACK)
    717 				error = EINVAL;
    718 		} else if (nss.ss_size < LINUX_MINSIGSTKSZ)
    719 			error = ENOMEM;
    720 
    721 		if (error == 0)
    722 			l->l_sigstk = nss;
    723 
    724 		mutex_exit(p->p_lock);
    725 	}
    726 
    727 	return error;
    728 }
    729 #endif /* LINUX_SS_ONSTACK */
    730 
    731 static int
    732 linux_do_tkill(struct lwp *l, int tgid, int tid, int signum)
    733 {
    734 	struct proc *p;
    735 	struct lwp *t;
    736 	ksiginfo_t ksi;
    737 	int error;
    738 
    739 	if (signum < 0 || signum >= LINUX__NSIG)
    740 		return EINVAL;
    741 	signum = linux_to_native_signo[signum];
    742 
    743 	if (tgid == -1) {
    744 		tgid = tid;
    745 	}
    746 
    747 	KSI_INIT(&ksi);
    748 	ksi.ksi_signo = signum;
    749 	ksi.ksi_code = SI_LWP;
    750 	ksi.ksi_pid = l->l_proc->p_pid;
    751 	ksi.ksi_uid = kauth_cred_geteuid(l->l_cred);
    752 	ksi.ksi_lid = tid;
    753 
    754 	mutex_enter(proc_lock);
    755 	p = proc_find(tgid);
    756 	if (p == NULL) {
    757 		mutex_exit(proc_lock);
    758 		return ESRCH;
    759 	}
    760 	mutex_enter(p->p_lock);
    761 	error = kauth_authorize_process(l->l_cred,
    762 	    KAUTH_PROCESS_SIGNAL, p, KAUTH_ARG(signum), NULL, NULL);
    763 	if ((t = lwp_find(p, ksi.ksi_lid)) == NULL)
    764 		error = ESRCH;
    765 	else if (signum != 0)
    766 		kpsignal2(p, &ksi);
    767 	mutex_exit(p->p_lock);
    768 	mutex_exit(proc_lock);
    769 
    770 	return error;
    771 }
    772 
    773 int
    774 linux_sys_tkill(struct lwp *l, const struct linux_sys_tkill_args *uap, register_t *retval)
    775 {
    776 	/* {
    777 		syscallarg(int) tid;
    778 		syscallarg(int) sig;
    779 	} */
    780 
    781 	if (SCARG(uap, tid) <= 0)
    782 		return EINVAL;
    783 
    784 	return linux_do_tkill(l, -1, SCARG(uap, tid), SCARG(uap, sig));
    785 }
    786 
    787 int
    788 linux_sys_tgkill(struct lwp *l, const struct linux_sys_tgkill_args *uap, register_t *retval)
    789 {
    790 	/* {
    791 		syscallarg(int) tgid;
    792 		syscallarg(int) tid;
    793 		syscallarg(int) sig;
    794 	} */
    795 
    796 	if (SCARG(uap, tid) <= 0 || SCARG(uap, tgid) < -1)
    797 		return EINVAL;
    798 
    799 	return linux_do_tkill(l, SCARG(uap, tgid), SCARG(uap, tid), SCARG(uap, sig));
    800 }
    801 
    802 int
    803 native_to_linux_si_code(int code)
    804 {
    805 	int si_codes[] = {
    806 	    LINUX_SI_USER, LINUX_SI_QUEUE, LINUX_SI_TIMER, LINUX_SI_ASYNCIO,
    807 	    LINUX_SI_MESGQ, LINUX_SI_TKILL /* SI_LWP */
    808 	};
    809 
    810 	if (code <= 0 && -code < __arraycount(si_codes))
    811 		return si_codes[-code];
    812 
    813 	return code;
    814 }
    815 
    816 int
    817 native_to_linux_si_status(int code, int status)
    818 {
    819 	int sts;
    820 
    821 	switch (code) {
    822 	case CLD_CONTINUED:
    823 		sts = LINUX_SIGCONT;
    824 		break;
    825 	case CLD_EXITED:
    826 		sts = WEXITSTATUS(status);
    827 		break;
    828 	case CLD_STOPPED:
    829 	case CLD_TRAPPED:
    830 	case CLD_DUMPED:
    831 	case CLD_KILLED:
    832 	default:
    833 		sts = native_to_linux_signo[WTERMSIG(status)];
    834 		break;
    835 	}
    836 
    837 	return sts;
    838 }
    839