sys_sig.c revision 1.13 1 /* $NetBSD: sys_sig.c,v 1.13 2008/04/24 15:35:30 ad Exp $ */
2
3 /*-
4 * Copyright (c) 2006, 2007 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Andrew Doran.
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 * 3. All advertising materials mentioning features or use of this software
19 * must display the following acknowledgement:
20 * This product includes software developed by the NetBSD
21 * Foundation, Inc. and its contributors.
22 * 4. Neither the name of The NetBSD Foundation nor the names of its
23 * contributors may be used to endorse or promote products derived
24 * from this software without specific prior written permission.
25 *
26 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 * POSSIBILITY OF SUCH DAMAGE.
37 */
38
39 /*
40 * Copyright (c) 1982, 1986, 1989, 1991, 1993
41 * The Regents of the University of California. All rights reserved.
42 * (c) UNIX System Laboratories, Inc.
43 * All or some portions of this file are derived from material licensed
44 * to the University of California by American Telephone and Telegraph
45 * Co. or Unix System Laboratories, Inc. and are reproduced herein with
46 * the permission of UNIX System Laboratories, Inc.
47 *
48 * Redistribution and use in source and binary forms, with or without
49 * modification, are permitted provided that the following conditions
50 * are met:
51 * 1. Redistributions of source code must retain the above copyright
52 * notice, this list of conditions and the following disclaimer.
53 * 2. Redistributions in binary form must reproduce the above copyright
54 * notice, this list of conditions and the following disclaimer in the
55 * documentation and/or other materials provided with the distribution.
56 * 3. Neither the name of the University nor the names of its contributors
57 * may be used to endorse or promote products derived from this software
58 * without specific prior written permission.
59 *
60 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
61 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
62 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
63 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
64 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
65 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
66 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
67 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
68 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
69 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
70 * SUCH DAMAGE.
71 *
72 * @(#)kern_sig.c 8.14 (Berkeley) 5/14/95
73 */
74
75 #include <sys/cdefs.h>
76 __KERNEL_RCSID(0, "$NetBSD: sys_sig.c,v 1.13 2008/04/24 15:35:30 ad Exp $");
77
78 #include "opt_ptrace.h"
79 #include "opt_compat_netbsd.h"
80 #include "opt_compat_netbsd32.h"
81
82 #include <sys/param.h>
83 #include <sys/kernel.h>
84 #include <sys/signalvar.h>
85 #include <sys/proc.h>
86 #include <sys/pool.h>
87 #include <sys/syscallargs.h>
88 #include <sys/kauth.h>
89 #include <sys/wait.h>
90 #include <sys/kmem.h>
91
92 #ifdef COMPAT_16
93 /* ARGSUSED */
94 int
95 compat_16_sys___sigaction14(struct lwp *l, const struct compat_16_sys___sigaction14_args *uap, register_t *retval)
96 {
97 /* {
98 syscallarg(int) signum;
99 syscallarg(const struct sigaction *) nsa;
100 syscallarg(struct sigaction *) osa;
101 } */
102 struct sigaction nsa, osa;
103 int error;
104
105 if (SCARG(uap, nsa)) {
106 error = copyin(SCARG(uap, nsa), &nsa, sizeof(nsa));
107 if (error)
108 return (error);
109 }
110 error = sigaction1(l, SCARG(uap, signum),
111 SCARG(uap, nsa) ? &nsa : 0, SCARG(uap, osa) ? &osa : 0,
112 NULL, 0);
113 if (error)
114 return (error);
115 if (SCARG(uap, osa)) {
116 error = copyout(&osa, SCARG(uap, osa), sizeof(osa));
117 if (error)
118 return (error);
119 }
120 return (0);
121 }
122 #endif
123
124 /* ARGSUSED */
125 int
126 sys___sigaction_sigtramp(struct lwp *l, const struct sys___sigaction_sigtramp_args *uap, register_t *retval)
127 {
128 /* {
129 syscallarg(int) signum;
130 syscallarg(const struct sigaction *) nsa;
131 syscallarg(struct sigaction *) osa;
132 syscallarg(void *) tramp;
133 syscallarg(int) vers;
134 } */
135 struct sigaction nsa, osa;
136 int error;
137
138 if (SCARG(uap, nsa)) {
139 error = copyin(SCARG(uap, nsa), &nsa, sizeof(nsa));
140 if (error)
141 return (error);
142 }
143 error = sigaction1(l, SCARG(uap, signum),
144 SCARG(uap, nsa) ? &nsa : 0, SCARG(uap, osa) ? &osa : 0,
145 SCARG(uap, tramp), SCARG(uap, vers));
146 if (error)
147 return (error);
148 if (SCARG(uap, osa)) {
149 error = copyout(&osa, SCARG(uap, osa), sizeof(osa));
150 if (error)
151 return (error);
152 }
153 return (0);
154 }
155
156 /*
157 * Manipulate signal mask. Note that we receive new mask, not pointer, and
158 * return old mask as return value; the library stub does the rest.
159 */
160 int
161 sys___sigprocmask14(struct lwp *l, const struct sys___sigprocmask14_args *uap, register_t *retval)
162 {
163 /* {
164 syscallarg(int) how;
165 syscallarg(const sigset_t *) set;
166 syscallarg(sigset_t *) oset;
167 } */
168 struct proc *p = l->l_proc;
169 sigset_t nss, oss;
170 int error;
171
172 if (SCARG(uap, set)) {
173 error = copyin(SCARG(uap, set), &nss, sizeof(nss));
174 if (error)
175 return (error);
176 }
177 mutex_enter(&p->p_smutex);
178 error = sigprocmask1(l, SCARG(uap, how),
179 SCARG(uap, set) ? &nss : 0, SCARG(uap, oset) ? &oss : 0);
180 mutex_exit(&p->p_smutex);
181 if (error)
182 return (error);
183 if (SCARG(uap, oset)) {
184 error = copyout(&oss, SCARG(uap, oset), sizeof(oss));
185 if (error)
186 return (error);
187 }
188 return (0);
189 }
190
191 /* ARGSUSED */
192 int
193 sys___sigpending14(struct lwp *l, const struct sys___sigpending14_args *uap, register_t *retval)
194 {
195 /* {
196 syscallarg(sigset_t *) set;
197 } */
198 sigset_t ss;
199
200 sigpending1(l, &ss);
201 return (copyout(&ss, SCARG(uap, set), sizeof(ss)));
202 }
203
204 /*
205 * Suspend process until signal, providing mask to be set in the meantime.
206 * Note nonstandard calling convention: libc stub passes mask, not pointer,
207 * to save a copyin.
208 */
209 /* ARGSUSED */
210 int
211 sys___sigsuspend14(struct lwp *l, const struct sys___sigsuspend14_args *uap, register_t *retval)
212 {
213 /* {
214 syscallarg(const sigset_t *) set;
215 } */
216 sigset_t ss;
217 int error;
218
219 if (SCARG(uap, set)) {
220 error = copyin(SCARG(uap, set), &ss, sizeof(ss));
221 if (error)
222 return (error);
223 }
224
225 return (sigsuspend1(l, SCARG(uap, set) ? &ss : 0));
226 }
227
228 /* ARGSUSED */
229 int
230 sys___sigaltstack14(struct lwp *l, const struct sys___sigaltstack14_args *uap, register_t *retval)
231 {
232 /* {
233 syscallarg(const struct sigaltstack *) nss;
234 syscallarg(struct sigaltstack *) oss;
235 } */
236 struct sigaltstack nss, oss;
237 int error;
238
239 if (SCARG(uap, nss)) {
240 error = copyin(SCARG(uap, nss), &nss, sizeof(nss));
241 if (error)
242 return (error);
243 }
244 error = sigaltstack1(l,
245 SCARG(uap, nss) ? &nss : 0, SCARG(uap, oss) ? &oss : 0);
246 if (error)
247 return (error);
248 if (SCARG(uap, oss)) {
249 error = copyout(&oss, SCARG(uap, oss), sizeof(oss));
250 if (error)
251 return (error);
252 }
253 return (0);
254 }
255
256 /* ARGSUSED */
257 int
258 sys_kill(struct lwp *l, const struct sys_kill_args *uap, register_t *retval)
259 {
260 /* {
261 syscallarg(int) pid;
262 syscallarg(int) signum;
263 } */
264 struct proc *p;
265 ksiginfo_t ksi;
266 int signum = SCARG(uap, signum);
267 int error;
268
269 if ((u_int)signum >= NSIG)
270 return (EINVAL);
271 KSI_INIT(&ksi);
272 ksi.ksi_signo = signum;
273 ksi.ksi_code = SI_USER;
274 ksi.ksi_pid = l->l_proc->p_pid;
275 ksi.ksi_uid = kauth_cred_geteuid(l->l_cred);
276 if (SCARG(uap, pid) > 0) {
277 /* kill single process */
278 mutex_enter(proc_lock);
279 if ((p = p_find(SCARG(uap, pid), PFIND_LOCKED)) == NULL) {
280 mutex_exit(proc_lock);
281 return (ESRCH);
282 }
283 mutex_enter(&p->p_mutex);
284 error = kauth_authorize_process(l->l_cred,
285 KAUTH_PROCESS_SIGNAL, p, KAUTH_ARG(signum),
286 NULL, NULL);
287 if (!error && signum) {
288 mutex_enter(&p->p_smutex);
289 kpsignal2(p, &ksi);
290 mutex_exit(&p->p_smutex);
291 }
292 mutex_exit(&p->p_mutex);
293 mutex_exit(proc_lock);
294 return (error);
295 }
296 switch (SCARG(uap, pid)) {
297 case -1: /* broadcast signal */
298 return (killpg1(l, &ksi, 0, 1));
299 case 0: /* signal own process group */
300 return (killpg1(l, &ksi, 0, 0));
301 default: /* negative explicit process group */
302 return (killpg1(l, &ksi, -SCARG(uap, pid), 0));
303 }
304 /* NOTREACHED */
305 }
306
307 /* ARGSUSED */
308 int
309 sys_getcontext(struct lwp *l, const struct sys_getcontext_args *uap, register_t *retval)
310 {
311 /* {
312 syscallarg(struct __ucontext *) ucp;
313 } */
314 struct proc *p = l->l_proc;
315 ucontext_t uc;
316
317 mutex_enter(&p->p_smutex);
318 getucontext(l, &uc);
319 mutex_exit(&p->p_smutex);
320
321 return (copyout(&uc, SCARG(uap, ucp), sizeof (*SCARG(uap, ucp))));
322 }
323
324 /* ARGSUSED */
325 int
326 sys_setcontext(struct lwp *l, const struct sys_setcontext_args *uap, register_t *retval)
327 {
328 /* {
329 syscallarg(const ucontext_t *) ucp;
330 } */
331 struct proc *p = l->l_proc;
332 ucontext_t uc;
333 int error;
334
335 error = copyin(SCARG(uap, ucp), &uc, sizeof (uc));
336 if (error)
337 return (error);
338 if (!(uc.uc_flags & _UC_CPU))
339 return (EINVAL);
340 mutex_enter(&p->p_smutex);
341 error = setucontext(l, &uc);
342 mutex_exit(&p->p_smutex);
343 if (error)
344 return (error);
345
346 return (EJUSTRETURN);
347 }
348
349 /*
350 * sigtimedwait(2) system call, used also for implementation
351 * of sigwaitinfo() and sigwait().
352 *
353 * This only handles single LWP in signal wait. libpthread provides
354 * it's own sigtimedwait() wrapper to DTRT WRT individual threads.
355 */
356 int
357 sys___sigtimedwait(struct lwp *l, const struct sys___sigtimedwait_args *uap, register_t *retval)
358 {
359
360 return __sigtimedwait1(l, uap, retval, copyout, copyin, copyout);
361 }
362
363 int
364 sigaction1(struct lwp *l, int signum, const struct sigaction *nsa,
365 struct sigaction *osa, const void *tramp, int vers)
366 {
367 struct proc *p;
368 struct sigacts *ps;
369 sigset_t tset;
370 int prop, error;
371 ksiginfoq_t kq;
372
373 if (signum <= 0 || signum >= NSIG)
374 return (EINVAL);
375
376 p = l->l_proc;
377 error = 0;
378 ksiginfo_queue_init(&kq);
379
380 /*
381 * Trampoline ABI version 0 is reserved for the legacy kernel
382 * provided on-stack trampoline. Conversely, if we are using a
383 * non-0 ABI version, we must have a trampoline. Only validate the
384 * vers if a new sigaction was supplied. Emulations use legacy
385 * kernel trampolines with version 0, alternatively check for that
386 * too.
387 */
388 if ((vers != 0 && tramp == NULL) ||
389 #ifdef SIGTRAMP_VALID
390 (nsa != NULL &&
391 ((vers == 0) ?
392 (p->p_emul->e_sigcode == NULL) :
393 !SIGTRAMP_VALID(vers))) ||
394 #endif
395 (vers == 0 && tramp != NULL)) {
396 return (EINVAL);
397 }
398
399 mutex_enter(&p->p_mutex); /* p_flag */
400 mutex_enter(&p->p_smutex);
401
402 ps = p->p_sigacts;
403 if (osa)
404 *osa = SIGACTION_PS(ps, signum);
405 if (!nsa)
406 goto out;
407
408 prop = sigprop[signum];
409 if ((nsa->sa_flags & ~SA_ALLBITS) || (prop & SA_CANTMASK)) {
410 error = EINVAL;
411 goto out;
412 }
413
414 SIGACTION_PS(ps, signum) = *nsa;
415 ps->sa_sigdesc[signum].sd_tramp = tramp;
416 ps->sa_sigdesc[signum].sd_vers = vers;
417 sigminusset(&sigcantmask, &SIGACTION_PS(ps, signum).sa_mask);
418
419 if ((prop & SA_NORESET) != 0)
420 SIGACTION_PS(ps, signum).sa_flags &= ~SA_RESETHAND;
421
422 if (signum == SIGCHLD) {
423 if (nsa->sa_flags & SA_NOCLDSTOP)
424 p->p_sflag |= PS_NOCLDSTOP;
425 else
426 p->p_sflag &= ~PS_NOCLDSTOP;
427 if (nsa->sa_flags & SA_NOCLDWAIT) {
428 /*
429 * Paranoia: since SA_NOCLDWAIT is implemented by
430 * reparenting the dying child to PID 1 (and trust
431 * it to reap the zombie), PID 1 itself is forbidden
432 * to set SA_NOCLDWAIT.
433 */
434 if (p->p_pid == 1)
435 p->p_flag &= ~PK_NOCLDWAIT;
436 else
437 p->p_flag |= PK_NOCLDWAIT;
438 } else
439 p->p_flag &= ~PK_NOCLDWAIT;
440
441 if (nsa->sa_handler == SIG_IGN) {
442 /*
443 * Paranoia: same as above.
444 */
445 if (p->p_pid == 1)
446 p->p_flag &= ~PK_CLDSIGIGN;
447 else
448 p->p_flag |= PK_CLDSIGIGN;
449 } else
450 p->p_flag &= ~PK_CLDSIGIGN;
451 }
452
453 if ((nsa->sa_flags & SA_NODEFER) == 0)
454 sigaddset(&SIGACTION_PS(ps, signum).sa_mask, signum);
455 else
456 sigdelset(&SIGACTION_PS(ps, signum).sa_mask, signum);
457
458 /*
459 * Set bit in p_sigctx.ps_sigignore for signals that are set to
460 * SIG_IGN, and for signals set to SIG_DFL where the default is to
461 * ignore. However, don't put SIGCONT in p_sigctx.ps_sigignore, as
462 * we have to restart the process.
463 */
464 if (nsa->sa_handler == SIG_IGN ||
465 (nsa->sa_handler == SIG_DFL && (prop & SA_IGNORE) != 0)) {
466 /* Never to be seen again. */
467 sigemptyset(&tset);
468 sigaddset(&tset, signum);
469 sigclearall(p, &tset, &kq);
470 if (signum != SIGCONT) {
471 /* Easier in psignal */
472 sigaddset(&p->p_sigctx.ps_sigignore, signum);
473 }
474 sigdelset(&p->p_sigctx.ps_sigcatch, signum);
475 } else {
476 sigdelset(&p->p_sigctx.ps_sigignore, signum);
477 if (nsa->sa_handler == SIG_DFL)
478 sigdelset(&p->p_sigctx.ps_sigcatch, signum);
479 else
480 sigaddset(&p->p_sigctx.ps_sigcatch, signum);
481 }
482
483 /*
484 * Previously held signals may now have become visible. Ensure that
485 * we check for them before returning to userspace.
486 */
487 if (sigispending(l, 0)) {
488 lwp_lock(l);
489 l->l_flag |= LW_PENDSIG;
490 lwp_unlock(l);
491 }
492 out:
493 mutex_exit(&p->p_smutex);
494 mutex_exit(&p->p_mutex);
495 ksiginfo_queue_drain(&kq);
496
497 return (error);
498 }
499
500 int
501 sigprocmask1(struct lwp *l, int how, const sigset_t *nss, sigset_t *oss)
502 {
503 int more;
504
505 KASSERT(mutex_owned(&l->l_proc->p_smutex));
506
507 if (oss)
508 *oss = l->l_sigmask;
509 if (nss) {
510 switch (how) {
511 case SIG_BLOCK:
512 sigplusset(nss, &l->l_sigmask);
513 more = 0;
514 break;
515 case SIG_UNBLOCK:
516 sigminusset(nss, &l->l_sigmask);
517 more = 1;
518 break;
519 case SIG_SETMASK:
520 l->l_sigmask = *nss;
521 more = 1;
522 break;
523 default:
524 return (EINVAL);
525 }
526 sigminusset(&sigcantmask, &l->l_sigmask);
527 if (more && sigispending(l, 0)) {
528 /*
529 * Check for pending signals on return to user.
530 */
531 lwp_lock(l);
532 l->l_flag |= LW_PENDSIG;
533 lwp_unlock(l);
534 }
535 }
536
537 return (0);
538 }
539
540 void
541 sigpending1(struct lwp *l, sigset_t *ss)
542 {
543 struct proc *p = l->l_proc;
544
545 mutex_enter(&p->p_smutex);
546 *ss = l->l_sigpend.sp_set;
547 sigplusset(&p->p_sigpend.sp_set, ss);
548 sigminusset(&l->l_sigmask, ss);
549 mutex_exit(&p->p_smutex);
550 }
551
552 int
553 sigsuspend1(struct lwp *l, const sigset_t *ss)
554 {
555 struct proc *p;
556
557 p = l->l_proc;
558
559 if (ss) {
560 /*
561 * When returning from sigsuspend, we want
562 * the old mask to be restored after the
563 * signal handler has finished. Thus, we
564 * save it here and mark the sigctx structure
565 * to indicate this.
566 */
567 mutex_enter(&p->p_smutex);
568 l->l_sigrestore = 1;
569 l->l_sigoldmask = l->l_sigmask;
570 l->l_sigmask = *ss;
571 sigminusset(&sigcantmask, &l->l_sigmask);
572
573 /* Check for pending signals when sleeping. */
574 if (sigispending(l, 0)) {
575 lwp_lock(l);
576 l->l_flag |= LW_PENDSIG;
577 lwp_unlock(l);
578 }
579 mutex_exit(&p->p_smutex);
580 }
581
582 while (kpause("pause", true, 0, NULL) == 0)
583 ;
584
585 /* always return EINTR rather than ERESTART... */
586 return (EINTR);
587 }
588
589 int
590 sigaltstack1(struct lwp *l, const struct sigaltstack *nss,
591 struct sigaltstack *oss)
592 {
593 struct proc *p = l->l_proc;
594 int error = 0;
595
596 mutex_enter(&p->p_smutex);
597
598 if (oss)
599 *oss = l->l_sigstk;
600
601 if (nss) {
602 if (nss->ss_flags & ~SS_ALLBITS)
603 error = EINVAL;
604 else if (nss->ss_flags & SS_DISABLE) {
605 if (l->l_sigstk.ss_flags & SS_ONSTACK)
606 error = EINVAL;
607 } else if (nss->ss_size < MINSIGSTKSZ)
608 error = ENOMEM;
609
610 if (!error)
611 l->l_sigstk = *nss;
612 }
613
614 mutex_exit(&p->p_smutex);
615
616 return (error);
617 }
618
619 int
620 __sigtimedwait1(struct lwp *l, const struct sys___sigtimedwait_args *uap, register_t *retval,
621 copyout_t put_info, copyin_t fetch_timeout, copyout_t put_timeout)
622 {
623 /* {
624 syscallarg(const sigset_t *) set;
625 syscallarg(siginfo_t *) info;
626 syscallarg(struct timespec *) timeout;
627 } */
628 struct proc *p = l->l_proc;
629 int error, signum;
630 int timo = 0;
631 struct timespec ts, tsstart, tsnow;
632 ksiginfo_t *ksi;
633
634 memset(&tsstart, 0, sizeof tsstart); /* XXX gcc */
635
636 /*
637 * Calculate timeout, if it was specified.
638 */
639 if (SCARG(uap, timeout)) {
640 uint64_t ms;
641
642 if ((error = (*fetch_timeout)(SCARG(uap, timeout), &ts, sizeof(ts))))
643 return (error);
644
645 ms = (ts.tv_sec * 1000) + (ts.tv_nsec / 1000000);
646 timo = mstohz(ms);
647 if (timo == 0 && ts.tv_sec == 0 && ts.tv_nsec > 0)
648 timo = 1;
649 if (timo <= 0)
650 return (EAGAIN);
651
652 /*
653 * Remember current uptime, it would be used in
654 * ECANCELED/ERESTART case.
655 */
656 getnanouptime(&tsstart);
657 }
658
659 error = copyin(SCARG(uap, set), &l->l_sigwaitset,
660 sizeof(l->l_sigwaitset));
661 if (error != 0)
662 return (error);
663
664 /*
665 * Silently ignore SA_CANTMASK signals. psignal1() would ignore
666 * SA_CANTMASK signals in waitset, we do this only for the below
667 * siglist check.
668 */
669 sigminusset(&sigcantmask, &l->l_sigwaitset);
670
671 /*
672 * Allocate a ksi up front. We can't sleep with the mutex held.
673 */
674 ksi = ksiginfo_alloc(p, NULL, PR_WAITOK);
675 if (ksi == NULL)
676 return (ENOMEM);
677
678 mutex_enter(&p->p_smutex);
679
680 if ((signum = sigget(&p->p_sigpend, ksi, 0, &l->l_sigwaitset)) == 0)
681 signum = sigget(&l->l_sigpend, ksi, 0, &l->l_sigwaitset);
682
683 if (signum != 0) {
684 /*
685 * We found a pending signal - copy it out to the user.
686 */
687 mutex_exit(&p->p_smutex);
688 goto out;
689 }
690
691 /*
692 * Set up the sigwait list.
693 */
694 l->l_sigwaited = ksi;
695 LIST_INSERT_HEAD(&p->p_sigwaiters, l, l_sigwaiter);
696
697 /*
698 * Wait for signal to arrive. We can either be woken up or time out.
699 */
700 error = cv_timedwait_sig(&l->l_sigcv, &p->p_smutex, timo);
701
702 /*
703 * Need to find out if we woke as a result of lwp_wakeup() or a
704 * signal outside our wait set.
705 */
706 if (l->l_sigwaited != NULL) {
707 if (error == EINTR) {
708 /* wakeup via _lwp_wakeup() */
709 error = ECANCELED;
710 } else if (!error) {
711 /* spurious wakeup - arrange for syscall restart */
712 error = ERESTART;
713 }
714 l->l_sigwaited = NULL;
715 LIST_REMOVE(l, l_sigwaiter);
716 }
717
718 mutex_exit(&p->p_smutex);
719
720 /*
721 * If the sleep was interrupted (either by signal or wakeup), update
722 * the timeout and copyout new value back. It would be used when
723 * the syscall would be restarted or called again.
724 */
725 if (timo && (error == ERESTART || error == ECANCELED)) {
726 getnanouptime(&tsnow);
727
728 /* compute how much time has passed since start */
729 timespecsub(&tsnow, &tsstart, &tsnow);
730 /* substract passed time from timeout */
731 timespecsub(&ts, &tsnow, &ts);
732
733 if (ts.tv_sec < 0)
734 error = EAGAIN;
735 else {
736 /* copy updated timeout to userland */
737 error = (*put_timeout)(&ts, SCARG(uap, timeout),
738 sizeof(ts));
739 }
740 }
741
742 /*
743 * If a signal from the wait set arrived, copy it to userland.
744 * Copy only the used part of siginfo, the padding part is
745 * left unchanged (userland is not supposed to touch it anyway).
746 */
747 out:
748 if (error == 0)
749 error = (*put_info)(&ksi->ksi_info, SCARG(uap, info),
750 sizeof(ksi->ksi_info));
751
752 ksiginfo_free(ksi);
753
754 return error;
755 }
756