Home | History | Annotate | Line # | Download | only in kern
kern_sig.c revision 1.341
      1  1.341     kamil /*	$NetBSD: kern_sig.c,v 1.341 2018/05/01 13:48:38 kamil Exp $	*/
      2  1.243        ad 
      3  1.243        ad /*-
      4  1.277        ad  * Copyright (c) 2006, 2007, 2008 The NetBSD Foundation, Inc.
      5  1.243        ad  * All rights reserved.
      6  1.243        ad  *
      7  1.243        ad  * This code is derived from software contributed to The NetBSD Foundation
      8  1.243        ad  * by Andrew Doran.
      9  1.243        ad  *
     10  1.243        ad  * Redistribution and use in source and binary forms, with or without
     11  1.243        ad  * modification, are permitted provided that the following conditions
     12  1.243        ad  * are met:
     13  1.243        ad  * 1. Redistributions of source code must retain the above copyright
     14  1.243        ad  *    notice, this list of conditions and the following disclaimer.
     15  1.243        ad  * 2. Redistributions in binary form must reproduce the above copyright
     16  1.243        ad  *    notice, this list of conditions and the following disclaimer in the
     17  1.243        ad  *    documentation and/or other materials provided with the distribution.
     18  1.243        ad  *
     19  1.243        ad  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     20  1.243        ad  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     21  1.243        ad  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     22  1.243        ad  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     23  1.243        ad  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     24  1.243        ad  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     25  1.243        ad  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     26  1.243        ad  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     27  1.243        ad  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     28  1.243        ad  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     29  1.243        ad  * POSSIBILITY OF SUCH DAMAGE.
     30  1.243        ad  */
     31   1.29       cgd 
     32   1.29       cgd /*
     33   1.29       cgd  * Copyright (c) 1982, 1986, 1989, 1991, 1993
     34   1.29       cgd  *	The Regents of the University of California.  All rights reserved.
     35   1.29       cgd  * (c) UNIX System Laboratories, Inc.
     36   1.29       cgd  * All or some portions of this file are derived from material licensed
     37   1.29       cgd  * to the University of California by American Telephone and Telegraph
     38   1.29       cgd  * Co. or Unix System Laboratories, Inc. and are reproduced herein with
     39   1.29       cgd  * the permission of UNIX System Laboratories, Inc.
     40   1.29       cgd  *
     41   1.29       cgd  * Redistribution and use in source and binary forms, with or without
     42   1.29       cgd  * modification, are permitted provided that the following conditions
     43   1.29       cgd  * are met:
     44   1.29       cgd  * 1. Redistributions of source code must retain the above copyright
     45   1.29       cgd  *    notice, this list of conditions and the following disclaimer.
     46   1.29       cgd  * 2. Redistributions in binary form must reproduce the above copyright
     47   1.29       cgd  *    notice, this list of conditions and the following disclaimer in the
     48   1.29       cgd  *    documentation and/or other materials provided with the distribution.
     49  1.146       agc  * 3. Neither the name of the University nor the names of its contributors
     50   1.29       cgd  *    may be used to endorse or promote products derived from this software
     51   1.29       cgd  *    without specific prior written permission.
     52   1.29       cgd  *
     53   1.29       cgd  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     54   1.29       cgd  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     55   1.29       cgd  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     56   1.29       cgd  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     57   1.29       cgd  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     58   1.29       cgd  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     59   1.29       cgd  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     60   1.29       cgd  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     61   1.29       cgd  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     62   1.29       cgd  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     63   1.29       cgd  * SUCH DAMAGE.
     64   1.29       cgd  *
     65   1.71      fvdl  *	@(#)kern_sig.c	8.14 (Berkeley) 5/14/95
     66   1.29       cgd  */
     67  1.116     lukem 
     68  1.308     rmind /*
     69  1.308     rmind  * Signal subsystem.
     70  1.308     rmind  */
     71  1.308     rmind 
     72  1.116     lukem #include <sys/cdefs.h>
     73  1.341     kamil __KERNEL_RCSID(0, "$NetBSD: kern_sig.c,v 1.341 2018/05/01 13:48:38 kamil Exp $");
     74   1.70       mrg 
     75  1.227      matt #include "opt_ptrace.h"
     76  1.320  christos #include "opt_dtrace.h"
     77   1.74   thorpej #include "opt_compat_sunos.h"
     78  1.158  christos #include "opt_compat_netbsd.h"
     79  1.202     perry #include "opt_compat_netbsd32.h"
     80  1.240      elad #include "opt_pax.h"
     81   1.29       cgd 
     82   1.29       cgd #define	SIGPROP		/* include signal properties table */
     83   1.29       cgd #include <sys/param.h>
     84   1.29       cgd #include <sys/signalvar.h>
     85   1.29       cgd #include <sys/proc.h>
     86  1.334  christos #include <sys/ptrace.h>
     87   1.29       cgd #include <sys/systm.h>
     88   1.29       cgd #include <sys/wait.h>
     89   1.29       cgd #include <sys/ktrace.h>
     90   1.29       cgd #include <sys/syslog.h>
     91   1.59       cgd #include <sys/filedesc.h>
     92  1.243        ad #include <sys/file.h>
     93   1.89   thorpej #include <sys/pool.h>
     94  1.130   thorpej #include <sys/ucontext.h>
     95  1.118   thorpej #include <sys/exec.h>
     96  1.220      elad #include <sys/kauth.h>
     97  1.243        ad #include <sys/acct.h>
     98  1.243        ad #include <sys/callout.h>
     99  1.260        ad #include <sys/atomic.h>
    100  1.258        ad #include <sys/cpu.h>
    101  1.290        ad #include <sys/module.h>
    102  1.303    darran #include <sys/sdt.h>
    103   1.29       cgd 
    104  1.240      elad #ifdef PAX_SEGVGUARD
    105  1.240      elad #include <sys/pax.h>
    106  1.240      elad #endif /* PAX_SEGVGUARD */
    107  1.240      elad 
    108  1.307  uebayasi #include <uvm/uvm_extern.h>
    109   1.69       mrg 
    110  1.328  christos #define	SIGQUEUE_MAX	32
    111  1.308     rmind static pool_cache_t	sigacts_cache	__read_mostly;
    112  1.308     rmind static pool_cache_t	ksiginfo_cache	__read_mostly;
    113  1.308     rmind static callout_t	proc_stop_ch	__cacheline_aligned;
    114  1.308     rmind 
    115  1.308     rmind sigset_t		contsigmask	__cacheline_aligned;
    116  1.308     rmind static sigset_t		stopsigmask	__cacheline_aligned;
    117  1.308     rmind sigset_t		sigcantmask	__cacheline_aligned;
    118  1.308     rmind 
    119  1.243        ad static void	ksiginfo_exechook(struct proc *, void *);
    120  1.334  christos static void	proc_stop(struct proc *, int);
    121  1.243        ad static void	proc_stop_callout(void *);
    122  1.297     rmind static int	sigchecktrace(void);
    123  1.317     rmind static int	sigpost(struct lwp *, sig_t, int, int);
    124  1.328  christos static int	sigput(sigpend_t *, struct proc *, ksiginfo_t *);
    125  1.297     rmind static int	sigunwait(struct proc *, const ksiginfo_t *);
    126  1.340     kamil static void	sigswitch(int, int);
    127  1.152  christos 
    128  1.243        ad static void	sigacts_poolpage_free(struct pool *, void *);
    129  1.243        ad static void	*sigacts_poolpage_alloc(struct pool *, int);
    130  1.196     skrll 
    131  1.290        ad void (*sendsig_sigcontext_vec)(const struct ksiginfo *, const sigset_t *);
    132  1.290        ad int (*coredump_vec)(struct lwp *, const char *) =
    133  1.290        ad     (int (*)(struct lwp *, const char *))enosys;
    134  1.290        ad 
    135  1.303    darran /*
    136  1.303    darran  * DTrace SDT provider definitions
    137  1.303    darran  */
    138  1.320  christos SDT_PROVIDER_DECLARE(proc);
    139  1.320  christos SDT_PROBE_DEFINE3(proc, kernel, , signal__send,
    140  1.320  christos     "struct lwp *", 	/* target thread */
    141  1.320  christos     "struct proc *", 	/* target process */
    142  1.320  christos     "int");		/* signal */
    143  1.320  christos SDT_PROBE_DEFINE3(proc, kernel, , signal__discard,
    144  1.320  christos     "struct lwp *",	/* target thread */
    145  1.320  christos     "struct proc *",	/* target process */
    146  1.320  christos     "int");  		/* signal */
    147  1.320  christos SDT_PROBE_DEFINE3(proc, kernel, , signal__handle,
    148  1.320  christos     "int", 		/* signal */
    149  1.320  christos     "ksiginfo_t *", 	/* signal info */
    150  1.320  christos     "void (*)(void)");	/* handler address */
    151  1.303    darran 
    152  1.303    darran 
    153  1.196     skrll static struct pool_allocator sigactspool_allocator = {
    154  1.301     rmind 	.pa_alloc = sigacts_poolpage_alloc,
    155  1.301     rmind 	.pa_free = sigacts_poolpage_free
    156  1.196     skrll };
    157  1.196     skrll 
    158  1.243        ad #ifdef DEBUG
    159  1.243        ad int	kern_logsigexit = 1;
    160  1.243        ad #else
    161  1.243        ad int	kern_logsigexit = 0;
    162  1.243        ad #endif
    163   1.89   thorpej 
    164  1.301     rmind static const char logcoredump[] =
    165  1.243        ad     "pid %d (%s), uid %d: exited on signal %d (core dumped)\n";
    166  1.301     rmind static const char lognocoredump[] =
    167  1.243        ad     "pid %d (%s), uid %d: exited on signal %d (core not dumped, err = %d)\n";
    168  1.237      yamt 
    169  1.299      elad static kauth_listener_t signal_listener;
    170  1.299      elad 
    171  1.299      elad static int
    172  1.299      elad signal_listener_cb(kauth_cred_t cred, kauth_action_t action, void *cookie,
    173  1.299      elad     void *arg0, void *arg1, void *arg2, void *arg3)
    174  1.299      elad {
    175  1.299      elad 	struct proc *p;
    176  1.299      elad 	int result, signum;
    177  1.299      elad 
    178  1.299      elad 	result = KAUTH_RESULT_DEFER;
    179  1.299      elad 	p = arg0;
    180  1.299      elad 	signum = (int)(unsigned long)arg1;
    181  1.299      elad 
    182  1.299      elad 	if (action != KAUTH_PROCESS_SIGNAL)
    183  1.299      elad 		return result;
    184  1.299      elad 
    185  1.299      elad 	if (kauth_cred_uidmatch(cred, p->p_cred) ||
    186  1.299      elad 	    (signum == SIGCONT && (curproc->p_session == p->p_session)))
    187  1.299      elad 		result = KAUTH_RESULT_ALLOW;
    188  1.299      elad 
    189  1.299      elad 	return result;
    190  1.299      elad }
    191  1.299      elad 
    192   1.29       cgd /*
    193  1.243        ad  * signal_init:
    194  1.243        ad  *
    195  1.301     rmind  *	Initialize global signal-related data structures.
    196  1.152  christos  */
    197  1.243        ad void
    198  1.243        ad signal_init(void)
    199  1.152  christos {
    200  1.152  christos 
    201  1.243        ad 	sigactspool_allocator.pa_pagesz = (PAGE_SIZE)*2;
    202  1.152  christos 
    203  1.279        ad 	sigacts_cache = pool_cache_init(sizeof(struct sigacts), 0, 0, 0,
    204  1.279        ad 	    "sigacts", sizeof(struct sigacts) > PAGE_SIZE ?
    205  1.279        ad 	    &sigactspool_allocator : NULL, IPL_NONE, NULL, NULL, NULL);
    206  1.286        ad 	ksiginfo_cache = pool_cache_init(sizeof(ksiginfo_t), 0, 0, 0,
    207  1.286        ad 	    "ksiginfo", NULL, IPL_VM, NULL, NULL, NULL);
    208  1.286        ad 
    209  1.243        ad 	exechook_establish(ksiginfo_exechook, NULL);
    210  1.152  christos 
    211  1.265        ad 	callout_init(&proc_stop_ch, CALLOUT_MPSAFE);
    212  1.243        ad 	callout_setfunc(&proc_stop_ch, proc_stop_callout, NULL);
    213  1.299      elad 
    214  1.299      elad 	signal_listener = kauth_listen_scope(KAUTH_SCOPE_PROCESS,
    215  1.299      elad 	    signal_listener_cb, NULL);
    216  1.152  christos }
    217  1.152  christos 
    218  1.152  christos /*
    219  1.243        ad  * sigacts_poolpage_alloc:
    220  1.243        ad  *
    221  1.301     rmind  *	Allocate a page for the sigacts memory pool.
    222  1.152  christos  */
    223  1.243        ad static void *
    224  1.243        ad sigacts_poolpage_alloc(struct pool *pp, int flags)
    225  1.152  christos {
    226  1.152  christos 
    227  1.243        ad 	return (void *)uvm_km_alloc(kernel_map,
    228  1.301     rmind 	    PAGE_SIZE * 2, PAGE_SIZE * 2,
    229  1.243        ad 	    ((flags & PR_WAITOK) ? 0 : UVM_KMF_NOWAIT | UVM_KMF_TRYLOCK)
    230  1.243        ad 	    | UVM_KMF_WIRED);
    231  1.152  christos }
    232  1.152  christos 
    233  1.152  christos /*
    234  1.243        ad  * sigacts_poolpage_free:
    235  1.243        ad  *
    236  1.301     rmind  *	Free a page on behalf of the sigacts memory pool.
    237   1.89   thorpej  */
    238  1.243        ad static void
    239  1.243        ad sigacts_poolpage_free(struct pool *pp, void *v)
    240   1.89   thorpej {
    241  1.279        ad 
    242  1.301     rmind 	uvm_km_free(kernel_map, (vaddr_t)v, PAGE_SIZE * 2, UVM_KMF_WIRED);
    243   1.89   thorpej }
    244   1.89   thorpej 
    245   1.89   thorpej /*
    246  1.243        ad  * sigactsinit:
    247  1.301     rmind  *
    248  1.301     rmind  *	Create an initial sigacts structure, using the same signal state
    249  1.301     rmind  *	as of specified process.  If 'share' is set, share the sigacts by
    250  1.301     rmind  *	holding a reference, otherwise just copy it from parent.
    251   1.89   thorpej  */
    252  1.243        ad struct sigacts *
    253  1.243        ad sigactsinit(struct proc *pp, int share)
    254   1.89   thorpej {
    255  1.302     rmind 	struct sigacts *ps = pp->p_sigacts, *ps2;
    256   1.89   thorpej 
    257  1.302     rmind 	if (__predict_false(share)) {
    258  1.279        ad 		atomic_inc_uint(&ps->sa_refcnt);
    259  1.302     rmind 		return ps;
    260  1.109  jdolecek 	}
    261  1.302     rmind 	ps2 = pool_cache_get(sigacts_cache, PR_WAITOK);
    262  1.302     rmind 	mutex_init(&ps2->sa_mutex, MUTEX_DEFAULT, IPL_SCHED);
    263  1.302     rmind 	ps2->sa_refcnt = 1;
    264  1.243        ad 
    265  1.302     rmind 	mutex_enter(&ps->sa_mutex);
    266  1.302     rmind 	memcpy(ps2->sa_sigdesc, ps->sa_sigdesc, sizeof(ps2->sa_sigdesc));
    267  1.302     rmind 	mutex_exit(&ps->sa_mutex);
    268  1.259        ad 	return ps2;
    269   1.89   thorpej }
    270   1.89   thorpej 
    271   1.89   thorpej /*
    272  1.243        ad  * sigactsunshare:
    273  1.301     rmind  *
    274  1.301     rmind  *	Make this process not share its sigacts, maintaining all signal state.
    275   1.89   thorpej  */
    276   1.89   thorpej void
    277  1.112     lukem sigactsunshare(struct proc *p)
    278   1.89   thorpej {
    279  1.302     rmind 	struct sigacts *ps, *oldps = p->p_sigacts;
    280  1.243        ad 
    281  1.302     rmind 	if (__predict_true(oldps->sa_refcnt == 1))
    282   1.89   thorpej 		return;
    283  1.302     rmind 
    284  1.279        ad 	ps = pool_cache_get(sigacts_cache, PR_WAITOK);
    285  1.262        ad 	mutex_init(&ps->sa_mutex, MUTEX_DEFAULT, IPL_SCHED);
    286  1.316   reinoud 	memcpy(ps->sa_sigdesc, oldps->sa_sigdesc, sizeof(ps->sa_sigdesc));
    287  1.302     rmind 	ps->sa_refcnt = 1;
    288  1.302     rmind 
    289  1.243        ad 	p->p_sigacts = ps;
    290  1.243        ad 	sigactsfree(oldps);
    291   1.89   thorpej }
    292   1.89   thorpej 
    293   1.89   thorpej /*
    294  1.243        ad  * sigactsfree;
    295  1.243        ad  *
    296  1.301     rmind  *	Release a sigacts structure.
    297   1.89   thorpej  */
    298   1.89   thorpej void
    299  1.195        pk sigactsfree(struct sigacts *ps)
    300   1.89   thorpej {
    301   1.89   thorpej 
    302  1.279        ad 	if (atomic_dec_uint_nv(&ps->sa_refcnt) == 0) {
    303  1.243        ad 		mutex_destroy(&ps->sa_mutex);
    304  1.279        ad 		pool_cache_put(sigacts_cache, ps);
    305   1.29       cgd 	}
    306   1.29       cgd }
    307   1.29       cgd 
    308   1.29       cgd /*
    309  1.243        ad  * siginit:
    310  1.243        ad  *
    311  1.243        ad  *	Initialize signal state for process 0; set to ignore signals that
    312  1.243        ad  *	are ignored by default and disable the signal stack.  Locking not
    313  1.243        ad  *	required as the system is still cold.
    314   1.29       cgd  */
    315   1.29       cgd void
    316  1.112     lukem siginit(struct proc *p)
    317   1.29       cgd {
    318  1.243        ad 	struct lwp *l;
    319  1.243        ad 	struct sigacts *ps;
    320  1.243        ad 	int signo, prop;
    321   1.79   mycroft 
    322  1.112     lukem 	ps = p->p_sigacts;
    323   1.79   mycroft 	sigemptyset(&contsigmask);
    324   1.79   mycroft 	sigemptyset(&stopsigmask);
    325   1.79   mycroft 	sigemptyset(&sigcantmask);
    326  1.243        ad 	for (signo = 1; signo < NSIG; signo++) {
    327  1.243        ad 		prop = sigprop[signo];
    328   1.79   mycroft 		if (prop & SA_CONT)
    329  1.243        ad 			sigaddset(&contsigmask, signo);
    330   1.79   mycroft 		if (prop & SA_STOP)
    331  1.243        ad 			sigaddset(&stopsigmask, signo);
    332   1.79   mycroft 		if (prop & SA_CANTMASK)
    333  1.243        ad 			sigaddset(&sigcantmask, signo);
    334  1.243        ad 		if (prop & SA_IGNORE && signo != SIGCONT)
    335  1.243        ad 			sigaddset(&p->p_sigctx.ps_sigignore, signo);
    336  1.243        ad 		sigemptyset(&SIGACTION_PS(ps, signo).sa_mask);
    337  1.243        ad 		SIGACTION_PS(ps, signo).sa_flags = SA_RESTART;
    338   1.79   mycroft 	}
    339  1.109  jdolecek 	sigemptyset(&p->p_sigctx.ps_sigcatch);
    340  1.243        ad 	p->p_sflag &= ~PS_NOCLDSTOP;
    341  1.243        ad 
    342  1.243        ad 	ksiginfo_queue_init(&p->p_sigpend.sp_info);
    343  1.243        ad 	sigemptyset(&p->p_sigpend.sp_set);
    344   1.29       cgd 
    345   1.79   mycroft 	/*
    346  1.243        ad 	 * Reset per LWP state.
    347   1.79   mycroft 	 */
    348  1.243        ad 	l = LIST_FIRST(&p->p_lwps);
    349  1.243        ad 	l->l_sigwaited = NULL;
    350  1.336  christos 	l->l_sigstk = SS_INIT;
    351  1.243        ad 	ksiginfo_queue_init(&l->l_sigpend.sp_info);
    352  1.243        ad 	sigemptyset(&l->l_sigpend.sp_set);
    353   1.89   thorpej 
    354   1.89   thorpej 	/* One reference. */
    355  1.109  jdolecek 	ps->sa_refcnt = 1;
    356   1.29       cgd }
    357   1.29       cgd 
    358   1.29       cgd /*
    359  1.243        ad  * execsigs:
    360  1.243        ad  *
    361  1.243        ad  *	Reset signals for an exec of the specified process.
    362   1.29       cgd  */
    363   1.29       cgd void
    364  1.112     lukem execsigs(struct proc *p)
    365   1.29       cgd {
    366  1.243        ad 	struct sigacts *ps;
    367  1.243        ad 	struct lwp *l;
    368  1.243        ad 	int signo, prop;
    369  1.243        ad 	sigset_t tset;
    370  1.243        ad 	ksiginfoq_t kq;
    371  1.243        ad 
    372  1.243        ad 	KASSERT(p->p_nlwps == 1);
    373  1.243        ad 
    374  1.115   thorpej 	sigactsunshare(p);
    375  1.112     lukem 	ps = p->p_sigacts;
    376  1.115   thorpej 
    377   1.29       cgd 	/*
    378  1.243        ad 	 * Reset caught signals.  Held signals remain held through
    379  1.243        ad 	 * l->l_sigmask (unless they were caught, and are now ignored
    380  1.243        ad 	 * by default).
    381  1.259        ad 	 *
    382  1.259        ad 	 * No need to lock yet, the process has only one LWP and
    383  1.259        ad 	 * at this point the sigacts are private to the process.
    384  1.243        ad 	 */
    385  1.243        ad 	sigemptyset(&tset);
    386  1.243        ad 	for (signo = 1; signo < NSIG; signo++) {
    387  1.243        ad 		if (sigismember(&p->p_sigctx.ps_sigcatch, signo)) {
    388  1.243        ad 			prop = sigprop[signo];
    389   1.79   mycroft 			if (prop & SA_IGNORE) {
    390   1.79   mycroft 				if ((prop & SA_CONT) == 0)
    391  1.112     lukem 					sigaddset(&p->p_sigctx.ps_sigignore,
    392  1.243        ad 					    signo);
    393  1.243        ad 				sigaddset(&tset, signo);
    394   1.79   mycroft 			}
    395  1.243        ad 			SIGACTION_PS(ps, signo).sa_handler = SIG_DFL;
    396   1.29       cgd 		}
    397  1.243        ad 		sigemptyset(&SIGACTION_PS(ps, signo).sa_mask);
    398  1.243        ad 		SIGACTION_PS(ps, signo).sa_flags = SA_RESTART;
    399   1.29       cgd 	}
    400  1.243        ad 	ksiginfo_queue_init(&kq);
    401  1.259        ad 
    402  1.277        ad 	mutex_enter(p->p_lock);
    403  1.243        ad 	sigclearall(p, &tset, &kq);
    404  1.109  jdolecek 	sigemptyset(&p->p_sigctx.ps_sigcatch);
    405  1.205  christos 
    406  1.205  christos 	/*
    407  1.205  christos 	 * Reset no zombies if child dies flag as Solaris does.
    408  1.205  christos 	 */
    409  1.246     pavel 	p->p_flag &= ~(PK_NOCLDWAIT | PK_CLDSIGIGN);
    410  1.205  christos 	if (SIGACTION_PS(ps, SIGCHLD).sa_handler == SIG_IGN)
    411  1.205  christos 		SIGACTION_PS(ps, SIGCHLD).sa_handler = SIG_DFL;
    412   1.79   mycroft 
    413   1.29       cgd 	/*
    414  1.243        ad 	 * Reset per-LWP state.
    415   1.29       cgd 	 */
    416  1.243        ad 	l = LIST_FIRST(&p->p_lwps);
    417  1.243        ad 	l->l_sigwaited = NULL;
    418  1.336  christos 	l->l_sigstk = SS_INIT;
    419  1.243        ad 	ksiginfo_queue_init(&l->l_sigpend.sp_info);
    420  1.243        ad 	sigemptyset(&l->l_sigpend.sp_set);
    421  1.277        ad 	mutex_exit(p->p_lock);
    422  1.243        ad 
    423  1.243        ad 	ksiginfo_queue_drain(&kq);
    424   1.29       cgd }
    425   1.29       cgd 
    426  1.243        ad /*
    427  1.243        ad  * ksiginfo_exechook:
    428  1.243        ad  *
    429  1.243        ad  *	Free all pending ksiginfo entries from a process on exec.
    430  1.243        ad  *	Additionally, drain any unused ksiginfo structures in the
    431  1.243        ad  *	system back to the pool.
    432  1.243        ad  *
    433  1.243        ad  *	XXX This should not be a hook, every process has signals.
    434  1.243        ad  */
    435  1.243        ad static void
    436  1.243        ad ksiginfo_exechook(struct proc *p, void *v)
    437   1.79   mycroft {
    438  1.243        ad 	ksiginfoq_t kq;
    439   1.79   mycroft 
    440  1.243        ad 	ksiginfo_queue_init(&kq);
    441   1.79   mycroft 
    442  1.277        ad 	mutex_enter(p->p_lock);
    443  1.243        ad 	sigclearall(p, NULL, &kq);
    444  1.277        ad 	mutex_exit(p->p_lock);
    445   1.79   mycroft 
    446  1.243        ad 	ksiginfo_queue_drain(&kq);
    447   1.79   mycroft }
    448  1.202     perry 
    449   1.29       cgd /*
    450  1.243        ad  * ksiginfo_alloc:
    451  1.243        ad  *
    452  1.243        ad  *	Allocate a new ksiginfo structure from the pool, and optionally copy
    453  1.243        ad  *	an existing one.  If the existing ksiginfo_t is from the pool, and
    454  1.243        ad  *	has not been queued somewhere, then just return it.  Additionally,
    455  1.243        ad  *	if the existing ksiginfo_t does not contain any information beyond
    456  1.243        ad  *	the signal number, then just return it.
    457   1.29       cgd  */
    458  1.243        ad ksiginfo_t *
    459  1.243        ad ksiginfo_alloc(struct proc *p, ksiginfo_t *ok, int flags)
    460   1.48   thorpej {
    461  1.243        ad 	ksiginfo_t *kp;
    462   1.29       cgd 
    463  1.243        ad 	if (ok != NULL) {
    464  1.243        ad 		if ((ok->ksi_flags & (KSI_QUEUED | KSI_FROMPOOL)) ==
    465  1.243        ad 		    KSI_FROMPOOL)
    466  1.301     rmind 			return ok;
    467  1.243        ad 		if (KSI_EMPTY_P(ok))
    468  1.243        ad 			return ok;
    469   1.79   mycroft 	}
    470  1.243        ad 
    471  1.286        ad 	kp = pool_cache_get(ksiginfo_cache, flags);
    472  1.243        ad 	if (kp == NULL) {
    473  1.243        ad #ifdef DIAGNOSTIC
    474  1.243        ad 		printf("Out of memory allocating ksiginfo for pid %d\n",
    475  1.243        ad 		    p->p_pid);
    476  1.243        ad #endif
    477  1.243        ad 		return NULL;
    478   1.79   mycroft 	}
    479  1.243        ad 
    480  1.243        ad 	if (ok != NULL) {
    481  1.243        ad 		memcpy(kp, ok, sizeof(*kp));
    482  1.243        ad 		kp->ksi_flags &= ~KSI_QUEUED;
    483  1.243        ad 	} else
    484  1.243        ad 		KSI_INIT_EMPTY(kp);
    485  1.243        ad 
    486  1.243        ad 	kp->ksi_flags |= KSI_FROMPOOL;
    487  1.243        ad 
    488  1.243        ad 	return kp;
    489   1.79   mycroft }
    490   1.79   mycroft 
    491  1.243        ad /*
    492  1.243        ad  * ksiginfo_free:
    493  1.243        ad  *
    494  1.243        ad  *	If the given ksiginfo_t is from the pool and has not been queued,
    495  1.243        ad  *	then free it.
    496  1.243        ad  */
    497   1.79   mycroft void
    498  1.243        ad ksiginfo_free(ksiginfo_t *kp)
    499   1.79   mycroft {
    500   1.29       cgd 
    501  1.243        ad 	if ((kp->ksi_flags & (KSI_QUEUED | KSI_FROMPOOL)) != KSI_FROMPOOL)
    502  1.243        ad 		return;
    503  1.286        ad 	pool_cache_put(ksiginfo_cache, kp);
    504   1.29       cgd }
    505   1.29       cgd 
    506  1.243        ad /*
    507  1.243        ad  * ksiginfo_queue_drain:
    508  1.243        ad  *
    509  1.243        ad  *	Drain a non-empty ksiginfo_t queue.
    510  1.243        ad  */
    511  1.243        ad void
    512  1.243        ad ksiginfo_queue_drain0(ksiginfoq_t *kq)
    513   1.29       cgd {
    514  1.243        ad 	ksiginfo_t *ksi;
    515   1.79   mycroft 
    516  1.319  christos 	KASSERT(!TAILQ_EMPTY(kq));
    517  1.243        ad 
    518  1.319  christos 	while (!TAILQ_EMPTY(kq)) {
    519  1.319  christos 		ksi = TAILQ_FIRST(kq);
    520  1.319  christos 		TAILQ_REMOVE(kq, ksi, ksi_list);
    521  1.286        ad 		pool_cache_put(ksiginfo_cache, ksi);
    522  1.243        ad 	}
    523   1.79   mycroft }
    524   1.79   mycroft 
    525  1.328  christos static int
    526  1.314  christos siggetinfo(sigpend_t *sp, ksiginfo_t *out, int signo)
    527  1.314  christos {
    528  1.329   hannken 	ksiginfo_t *ksi, *nksi;
    529  1.314  christos 
    530  1.314  christos 	if (sp == NULL)
    531  1.314  christos 		goto out;
    532  1.314  christos 
    533  1.314  christos 	/* Find siginfo and copy it out. */
    534  1.328  christos 	int count = 0;
    535  1.329   hannken 	TAILQ_FOREACH_SAFE(ksi, &sp->sp_info, ksi_list, nksi) {
    536  1.314  christos 		if (ksi->ksi_signo != signo)
    537  1.314  christos 			continue;
    538  1.328  christos 		if (count++ > 0) /* Only remove the first, count all of them */
    539  1.328  christos 			continue;
    540  1.319  christos 		TAILQ_REMOVE(&sp->sp_info, ksi, ksi_list);
    541  1.314  christos 		KASSERT((ksi->ksi_flags & KSI_FROMPOOL) != 0);
    542  1.314  christos 		KASSERT((ksi->ksi_flags & KSI_QUEUED) != 0);
    543  1.314  christos 		ksi->ksi_flags &= ~KSI_QUEUED;
    544  1.314  christos 		if (out != NULL) {
    545  1.314  christos 			memcpy(out, ksi, sizeof(*out));
    546  1.314  christos 			out->ksi_flags &= ~(KSI_FROMPOOL | KSI_QUEUED);
    547  1.314  christos 		}
    548  1.328  christos 		ksiginfo_free(ksi);
    549  1.314  christos 	}
    550  1.328  christos 	if (count)
    551  1.328  christos 		return count;
    552  1.314  christos 
    553  1.314  christos out:
    554  1.314  christos 	/* If there is no siginfo, then manufacture it. */
    555  1.314  christos 	if (out != NULL) {
    556  1.314  christos 		KSI_INIT(out);
    557  1.314  christos 		out->ksi_info._signo = signo;
    558  1.314  christos 		out->ksi_info._code = SI_NOINFO;
    559  1.314  christos 	}
    560  1.328  christos 	return 0;
    561  1.314  christos }
    562  1.314  christos 
    563  1.243        ad /*
    564  1.243        ad  * sigget:
    565  1.243        ad  *
    566  1.243        ad  *	Fetch the first pending signal from a set.  Optionally, also fetch
    567  1.243        ad  *	or manufacture a ksiginfo element.  Returns the number of the first
    568  1.243        ad  *	pending signal, or zero.
    569  1.243        ad  */
    570  1.243        ad int
    571  1.270      yamt sigget(sigpend_t *sp, ksiginfo_t *out, int signo, const sigset_t *mask)
    572  1.243        ad {
    573  1.243        ad 	sigset_t tset;
    574  1.328  christos 	int count;
    575  1.243        ad 
    576  1.243        ad 	/* If there's no pending set, the signal is from the debugger. */
    577  1.287  christos 	if (sp == NULL)
    578  1.287  christos 		goto out;
    579  1.243        ad 
    580  1.243        ad 	/* Construct mask from signo, and 'mask'. */
    581  1.243        ad 	if (signo == 0) {
    582  1.243        ad 		if (mask != NULL) {
    583  1.243        ad 			tset = *mask;
    584  1.243        ad 			__sigandset(&sp->sp_set, &tset);
    585  1.243        ad 		} else
    586  1.243        ad 			tset = sp->sp_set;
    587  1.301     rmind 
    588  1.301     rmind 		/* If there are no signals pending - return. */
    589  1.243        ad 		if ((signo = firstsig(&tset)) == 0)
    590  1.287  christos 			goto out;
    591  1.243        ad 	} else {
    592  1.243        ad 		KASSERT(sigismember(&sp->sp_set, signo));
    593  1.243        ad 	}
    594  1.243        ad 
    595  1.243        ad 	sigdelset(&sp->sp_set, signo);
    596  1.287  christos out:
    597  1.328  christos 	count = siggetinfo(sp, out, signo);
    598  1.328  christos 	if (count > 1)
    599  1.328  christos 		sigaddset(&sp->sp_set, signo);
    600  1.243        ad 	return signo;
    601   1.29       cgd }
    602   1.29       cgd 
    603   1.29       cgd /*
    604  1.243        ad  * sigput:
    605  1.301     rmind  *
    606  1.296  drochner  *	Append a new ksiginfo element to the list of pending ksiginfo's.
    607   1.29       cgd  */
    608  1.328  christos static int
    609  1.243        ad sigput(sigpend_t *sp, struct proc *p, ksiginfo_t *ksi)
    610   1.48   thorpej {
    611  1.243        ad 	ksiginfo_t *kp;
    612  1.243        ad 
    613  1.277        ad 	KASSERT(mutex_owned(p->p_lock));
    614  1.243        ad 	KASSERT((ksi->ksi_flags & KSI_QUEUED) == 0);
    615  1.243        ad 
    616  1.243        ad 	sigaddset(&sp->sp_set, ksi->ksi_signo);
    617  1.243        ad 
    618  1.243        ad 	/*
    619  1.296  drochner 	 * If there is no siginfo, we are done.
    620  1.243        ad 	 */
    621  1.296  drochner 	if (KSI_EMPTY_P(ksi))
    622  1.328  christos 		return 0;
    623  1.243        ad 
    624  1.243        ad 	KASSERT((ksi->ksi_flags & KSI_FROMPOOL) != 0);
    625   1.79   mycroft 
    626  1.328  christos 	size_t count = 0;
    627  1.328  christos 	TAILQ_FOREACH(kp, &sp->sp_info, ksi_list) {
    628  1.328  christos 		count++;
    629  1.328  christos 		if (ksi->ksi_signo >= SIGRTMIN && ksi->ksi_signo <= SIGRTMAX)
    630  1.328  christos 			continue;
    631  1.328  christos 		if (kp->ksi_signo == ksi->ksi_signo) {
    632  1.328  christos 			KSI_COPY(ksi, kp);
    633  1.328  christos 			kp->ksi_flags |= KSI_QUEUED;
    634  1.328  christos 			return 0;
    635  1.328  christos 		}
    636  1.328  christos 	}
    637  1.328  christos 
    638  1.328  christos 	if (count >= SIGQUEUE_MAX) {
    639  1.328  christos #ifdef DIAGNOSTIC
    640  1.328  christos 		printf("%s(%d): Signal queue is full signal=%d\n",
    641  1.328  christos 		    p->p_comm, p->p_pid, ksi->ksi_signo);
    642  1.243        ad #endif
    643  1.328  christos 		return EAGAIN;
    644   1.79   mycroft 	}
    645  1.243        ad 	ksi->ksi_flags |= KSI_QUEUED;
    646  1.319  christos 	TAILQ_INSERT_TAIL(&sp->sp_info, ksi, ksi_list);
    647  1.328  christos 
    648  1.328  christos 	return 0;
    649   1.79   mycroft }
    650   1.79   mycroft 
    651  1.243        ad /*
    652  1.243        ad  * sigclear:
    653  1.243        ad  *
    654  1.243        ad  *	Clear all pending signals in the specified set.
    655  1.243        ad  */
    656  1.243        ad void
    657  1.270      yamt sigclear(sigpend_t *sp, const sigset_t *mask, ksiginfoq_t *kq)
    658   1.79   mycroft {
    659  1.243        ad 	ksiginfo_t *ksi, *next;
    660  1.112     lukem 
    661  1.243        ad 	if (mask == NULL)
    662  1.243        ad 		sigemptyset(&sp->sp_set);
    663  1.243        ad 	else
    664  1.243        ad 		sigminusset(mask, &sp->sp_set);
    665   1.79   mycroft 
    666  1.319  christos 	TAILQ_FOREACH_SAFE(ksi, &sp->sp_info, ksi_list, next) {
    667  1.243        ad 		if (mask == NULL || sigismember(mask, ksi->ksi_signo)) {
    668  1.319  christos 			TAILQ_REMOVE(&sp->sp_info, ksi, ksi_list);
    669  1.243        ad 			KASSERT((ksi->ksi_flags & KSI_FROMPOOL) != 0);
    670  1.243        ad 			KASSERT((ksi->ksi_flags & KSI_QUEUED) != 0);
    671  1.319  christos 			TAILQ_INSERT_TAIL(kq, ksi, ksi_list);
    672   1.79   mycroft 		}
    673   1.79   mycroft 	}
    674  1.243        ad }
    675  1.243        ad 
    676  1.243        ad /*
    677  1.243        ad  * sigclearall:
    678  1.243        ad  *
    679  1.243        ad  *	Clear all pending signals in the specified set from a process and
    680  1.243        ad  *	its LWPs.
    681  1.243        ad  */
    682  1.243        ad void
    683  1.270      yamt sigclearall(struct proc *p, const sigset_t *mask, ksiginfoq_t *kq)
    684  1.243        ad {
    685  1.243        ad 	struct lwp *l;
    686  1.243        ad 
    687  1.277        ad 	KASSERT(mutex_owned(p->p_lock));
    688   1.79   mycroft 
    689  1.243        ad 	sigclear(&p->p_sigpend, mask, kq);
    690  1.243        ad 
    691  1.243        ad 	LIST_FOREACH(l, &p->p_lwps, l_sibling) {
    692  1.243        ad 		sigclear(&l->l_sigpend, mask, kq);
    693  1.243        ad 	}
    694   1.29       cgd }
    695   1.29       cgd 
    696  1.243        ad /*
    697  1.243        ad  * sigispending:
    698  1.243        ad  *
    699  1.311  christos  *	Return the first signal number if there are pending signals for the
    700  1.311  christos  *	current LWP.  May be called unlocked provided that LW_PENDSIG is set,
    701  1.311  christos  *	and that the signal has been posted to the appopriate queue before
    702  1.311  christos  *	LW_PENDSIG is set.
    703  1.243        ad  */
    704   1.52  christos int
    705  1.243        ad sigispending(struct lwp *l, int signo)
    706   1.48   thorpej {
    707  1.243        ad 	struct proc *p = l->l_proc;
    708  1.243        ad 	sigset_t tset;
    709  1.243        ad 
    710  1.260        ad 	membar_consumer();
    711  1.243        ad 
    712  1.243        ad 	tset = l->l_sigpend.sp_set;
    713  1.243        ad 	sigplusset(&p->p_sigpend.sp_set, &tset);
    714  1.243        ad 	sigminusset(&p->p_sigctx.ps_sigignore, &tset);
    715  1.243        ad 	sigminusset(&l->l_sigmask, &tset);
    716  1.243        ad 
    717  1.243        ad 	if (signo == 0) {
    718  1.312     rmind 		return firstsig(&tset);
    719  1.312     rmind 	}
    720  1.312     rmind 	return sigismember(&tset, signo) ? signo : 0;
    721  1.243        ad }
    722  1.243        ad 
    723  1.243        ad void
    724  1.243        ad getucontext(struct lwp *l, ucontext_t *ucp)
    725  1.243        ad {
    726  1.243        ad 	struct proc *p = l->l_proc;
    727  1.243        ad 
    728  1.277        ad 	KASSERT(mutex_owned(p->p_lock));
    729  1.243        ad 
    730  1.243        ad 	ucp->uc_flags = 0;
    731  1.243        ad 	ucp->uc_link = l->l_ctxlink;
    732  1.317     rmind 	ucp->uc_sigmask = l->l_sigmask;
    733  1.243        ad 	ucp->uc_flags |= _UC_SIGMASK;
    734  1.243        ad 
    735  1.243        ad 	/*
    736  1.243        ad 	 * The (unsupplied) definition of the `current execution stack'
    737  1.243        ad 	 * in the System V Interface Definition appears to allow returning
    738  1.243        ad 	 * the main context stack.
    739  1.243        ad 	 */
    740  1.243        ad 	if ((l->l_sigstk.ss_flags & SS_ONSTACK) == 0) {
    741  1.263  christos 		ucp->uc_stack.ss_sp = (void *)l->l_proc->p_stackbase;
    742  1.243        ad 		ucp->uc_stack.ss_size = ctob(l->l_proc->p_vmspace->vm_ssize);
    743  1.243        ad 		ucp->uc_stack.ss_flags = 0;	/* XXX, def. is Very Fishy */
    744  1.243        ad 	} else {
    745  1.243        ad 		/* Simply copy alternate signal execution stack. */
    746  1.243        ad 		ucp->uc_stack = l->l_sigstk;
    747   1.79   mycroft 	}
    748  1.243        ad 	ucp->uc_flags |= _UC_STACK;
    749  1.277        ad 	mutex_exit(p->p_lock);
    750  1.243        ad 	cpu_getmcontext(l, &ucp->uc_mcontext, &ucp->uc_flags);
    751  1.277        ad 	mutex_enter(p->p_lock);
    752   1.29       cgd }
    753   1.29       cgd 
    754   1.29       cgd int
    755  1.243        ad setucontext(struct lwp *l, const ucontext_t *ucp)
    756   1.48   thorpej {
    757  1.243        ad 	struct proc *p = l->l_proc;
    758  1.223      yamt 	int error;
    759   1.29       cgd 
    760  1.277        ad 	KASSERT(mutex_owned(p->p_lock));
    761  1.243        ad 
    762  1.243        ad 	if ((ucp->uc_flags & _UC_SIGMASK) != 0) {
    763  1.243        ad 		error = sigprocmask1(l, SIG_SETMASK, &ucp->uc_sigmask, NULL);
    764  1.243        ad 		if (error != 0)
    765  1.223      yamt 			return error;
    766   1.29       cgd 	}
    767  1.243        ad 
    768  1.277        ad 	mutex_exit(p->p_lock);
    769  1.243        ad 	error = cpu_setmcontext(l, &ucp->uc_mcontext, ucp->uc_flags);
    770  1.277        ad 	mutex_enter(p->p_lock);
    771  1.243        ad 	if (error != 0)
    772  1.243        ad 		return (error);
    773  1.243        ad 
    774  1.243        ad 	l->l_ctxlink = ucp->uc_link;
    775  1.243        ad 
    776  1.243        ad 	/*
    777  1.243        ad 	 * If there was stack information, update whether or not we are
    778  1.243        ad 	 * still running on an alternate signal stack.
    779  1.243        ad 	 */
    780  1.243        ad 	if ((ucp->uc_flags & _UC_STACK) != 0) {
    781  1.243        ad 		if (ucp->uc_stack.ss_flags & SS_ONSTACK)
    782  1.243        ad 			l->l_sigstk.ss_flags |= SS_ONSTACK;
    783  1.243        ad 		else
    784  1.243        ad 			l->l_sigstk.ss_flags &= ~SS_ONSTACK;
    785  1.243        ad 	}
    786  1.243        ad 
    787  1.243        ad 	return 0;
    788   1.29       cgd }
    789   1.29       cgd 
    790   1.29       cgd /*
    791  1.301     rmind  * killpg1: common code for kill process group/broadcast kill.
    792   1.29       cgd  */
    793   1.52  christos int
    794  1.224        ad killpg1(struct lwp *l, ksiginfo_t *ksi, int pgid, int all)
    795   1.29       cgd {
    796  1.224        ad 	struct proc	*p, *cp;
    797  1.220      elad 	kauth_cred_t	pc;
    798  1.112     lukem 	struct pgrp	*pgrp;
    799  1.112     lukem 	int		nfound;
    800  1.243        ad 	int		signo = ksi->ksi_signo;
    801  1.202     perry 
    802  1.224        ad 	cp = l->l_proc;
    803  1.224        ad 	pc = l->l_cred;
    804  1.112     lukem 	nfound = 0;
    805  1.243        ad 
    806  1.276        ad 	mutex_enter(proc_lock);
    807   1.91   thorpej 	if (all) {
    808  1.202     perry 		/*
    809  1.301     rmind 		 * Broadcast.
    810   1.29       cgd 		 */
    811  1.199      yamt 		PROCLIST_FOREACH(p, &allproc) {
    812  1.283        ad 			if (p->p_pid <= 1 || p == cp ||
    813  1.304      yamt 			    (p->p_flag & PK_SYSTEM) != 0)
    814   1.29       cgd 				continue;
    815  1.277        ad 			mutex_enter(p->p_lock);
    816  1.243        ad 			if (kauth_authorize_process(pc,
    817  1.264      elad 			    KAUTH_PROCESS_SIGNAL, p, KAUTH_ARG(signo), NULL,
    818  1.264      elad 			    NULL) == 0) {
    819  1.243        ad 				nfound++;
    820  1.277        ad 				if (signo)
    821  1.243        ad 					kpsignal2(p, ksi);
    822  1.243        ad 			}
    823  1.277        ad 			mutex_exit(p->p_lock);
    824   1.29       cgd 		}
    825   1.91   thorpej 	} else {
    826  1.202     perry 		if (pgid == 0)
    827  1.301     rmind 			/* Zero pgid means send to my process group. */
    828   1.29       cgd 			pgrp = cp->p_pgrp;
    829   1.29       cgd 		else {
    830  1.306     rmind 			pgrp = pgrp_find(pgid);
    831   1.29       cgd 			if (pgrp == NULL)
    832  1.243        ad 				goto out;
    833   1.29       cgd 		}
    834  1.124      matt 		LIST_FOREACH(p, &pgrp->pg_members, p_pglist) {
    835  1.246     pavel 			if (p->p_pid <= 1 || p->p_flag & PK_SYSTEM)
    836   1.29       cgd 				continue;
    837  1.277        ad 			mutex_enter(p->p_lock);
    838  1.264      elad 			if (kauth_authorize_process(pc, KAUTH_PROCESS_SIGNAL,
    839  1.264      elad 			    p, KAUTH_ARG(signo), NULL, NULL) == 0) {
    840  1.243        ad 				nfound++;
    841  1.277        ad 				if (signo && P_ZOMBIE(p) == 0)
    842  1.277        ad 					kpsignal2(p, ksi);
    843  1.243        ad 			}
    844  1.277        ad 			mutex_exit(p->p_lock);
    845   1.29       cgd 		}
    846   1.29       cgd 	}
    847  1.301     rmind out:
    848  1.276        ad 	mutex_exit(proc_lock);
    849  1.301     rmind 	return nfound ? 0 : ESRCH;
    850   1.29       cgd }
    851   1.29       cgd 
    852   1.29       cgd /*
    853  1.301     rmind  * Send a signal to a process group.  If checktty is set, limit to members
    854  1.243        ad  * which have a controlling terminal.
    855   1.29       cgd  */
    856   1.29       cgd void
    857  1.243        ad pgsignal(struct pgrp *pgrp, int sig, int checkctty)
    858   1.29       cgd {
    859  1.148  christos 	ksiginfo_t ksi;
    860  1.148  christos 
    861  1.276        ad 	KASSERT(!cpu_intr_p());
    862  1.276        ad 	KASSERT(mutex_owned(proc_lock));
    863   1.29       cgd 
    864  1.192      matt 	KSI_INIT_EMPTY(&ksi);
    865  1.148  christos 	ksi.ksi_signo = sig;
    866  1.148  christos 	kpgsignal(pgrp, &ksi, NULL, checkctty);
    867  1.148  christos }
    868  1.148  christos 
    869  1.148  christos void
    870  1.148  christos kpgsignal(struct pgrp *pgrp, ksiginfo_t *ksi, void *data, int checkctty)
    871   1.29       cgd {
    872   1.98  augustss 	struct proc *p;
    873   1.29       cgd 
    874  1.276        ad 	KASSERT(!cpu_intr_p());
    875  1.276        ad 	KASSERT(mutex_owned(proc_lock));
    876  1.301     rmind 	KASSERT(pgrp != NULL);
    877  1.243        ad 
    878  1.297     rmind 	LIST_FOREACH(p, &pgrp->pg_members, p_pglist)
    879  1.297     rmind 		if (checkctty == 0 || p->p_lflag & PL_CONTROLT)
    880  1.297     rmind 			kpsignal(p, ksi, data);
    881   1.29       cgd }
    882   1.29       cgd 
    883   1.29       cgd /*
    884  1.243        ad  * Send a signal caused by a trap to the current LWP.  If it will be caught
    885  1.243        ad  * immediately, deliver it with correct code.  Otherwise, post it normally.
    886   1.29       cgd  */
    887  1.148  christos void
    888  1.243        ad trapsignal(struct lwp *l, ksiginfo_t *ksi)
    889  1.148  christos {
    890  1.130   thorpej 	struct proc	*p;
    891  1.130   thorpej 	struct sigacts	*ps;
    892  1.243        ad 	int signo = ksi->ksi_signo;
    893  1.288  wrstuden 	sigset_t *mask;
    894   1.29       cgd 
    895  1.166   thorpej 	KASSERT(KSI_TRAP_P(ksi));
    896  1.166   thorpej 
    897  1.243        ad 	ksi->ksi_lid = l->l_lid;
    898  1.130   thorpej 	p = l->l_proc;
    899  1.243        ad 
    900  1.276        ad 	KASSERT(!cpu_intr_p());
    901  1.276        ad 	mutex_enter(proc_lock);
    902  1.277        ad 	mutex_enter(p->p_lock);
    903  1.317     rmind 	mask = &l->l_sigmask;
    904  1.112     lukem 	ps = p->p_sigacts;
    905  1.317     rmind 
    906  1.339  christos 	const bool traced = (p->p_slflag & PSL_TRACED) != 0;
    907  1.339  christos 	const bool caught = sigismember(&p->p_sigctx.ps_sigcatch, signo);
    908  1.339  christos 	const bool masked = sigismember(mask, signo);
    909  1.339  christos 	if (!traced && caught && !masked) {
    910  1.276        ad 		mutex_exit(proc_lock);
    911  1.275        ad 		l->l_ru.ru_nsignals++;
    912  1.288  wrstuden 		kpsendsig(l, ksi, mask);
    913  1.277        ad 		mutex_exit(p->p_lock);
    914  1.325  christos 		if (ktrpoint(KTR_PSIG)) {
    915  1.330    martin 			if (p->p_emul->e_ktrpsig)
    916  1.330    martin 				p->p_emul->e_ktrpsig(signo,
    917  1.330    martin 				    SIGACTION_PS(ps, signo).sa_handler,
    918  1.330    martin 				    mask, ksi);
    919  1.330    martin 			else
    920  1.330    martin 				ktrpsig(signo,
    921  1.330    martin 				    SIGACTION_PS(ps, signo).sa_handler,
    922  1.330    martin 				    mask, ksi);
    923  1.325  christos 		}
    924  1.339  christos 		return;
    925  1.339  christos 	}
    926  1.339  christos 
    927  1.339  christos 	/*
    928  1.339  christos 	 * If the signal is masked or ignored, then unmask it and
    929  1.339  christos 	 * reset it to the default action so that the process or
    930  1.339  christos 	 * its tracer will be notified.
    931  1.339  christos 	 */
    932  1.339  christos 	const bool ignored = SIGACTION_PS(ps, signo).sa_handler == SIG_IGN;
    933  1.339  christos 	if (masked || ignored) {
    934  1.339  christos 		mutex_enter(&ps->sa_mutex);
    935  1.339  christos 		sigdelset(mask, signo);
    936  1.339  christos 		sigdelset(&p->p_sigctx.ps_sigcatch, signo);
    937  1.339  christos 		sigdelset(&p->p_sigctx.ps_sigignore, signo);
    938  1.339  christos 		sigdelset(&SIGACTION_PS(ps, signo).sa_mask, signo);
    939  1.339  christos 		SIGACTION_PS(ps, signo).sa_handler = SIG_DFL;
    940  1.339  christos 		mutex_exit(&ps->sa_mutex);
    941   1.29       cgd 	}
    942  1.339  christos 
    943  1.339  christos 	kpsignal2(p, ksi);
    944  1.339  christos 	mutex_exit(p->p_lock);
    945  1.339  christos 	mutex_exit(proc_lock);
    946   1.29       cgd }
    947   1.29       cgd 
    948   1.29       cgd /*
    949  1.151  christos  * Fill in signal information and signal the parent for a child status change.
    950  1.151  christos  */
    951  1.216  christos void
    952  1.243        ad child_psignal(struct proc *p, int mask)
    953  1.151  christos {
    954  1.151  christos 	ksiginfo_t ksi;
    955  1.243        ad 	struct proc *q;
    956  1.322  christos 	int xsig;
    957  1.243        ad 
    958  1.276        ad 	KASSERT(mutex_owned(proc_lock));
    959  1.277        ad 	KASSERT(mutex_owned(p->p_lock));
    960  1.243        ad 
    961  1.322  christos 	xsig = p->p_xsig;
    962  1.151  christos 
    963  1.191      matt 	KSI_INIT(&ksi);
    964  1.151  christos 	ksi.ksi_signo = SIGCHLD;
    965  1.322  christos 	ksi.ksi_code = (xsig == SIGCONT ? CLD_CONTINUED : CLD_STOPPED);
    966  1.151  christos 	ksi.ksi_pid = p->p_pid;
    967  1.220      elad 	ksi.ksi_uid = kauth_cred_geteuid(p->p_cred);
    968  1.322  christos 	ksi.ksi_status = xsig;
    969  1.151  christos 	ksi.ksi_utime = p->p_stats->p_ru.ru_utime.tv_sec;
    970  1.151  christos 	ksi.ksi_stime = p->p_stats->p_ru.ru_stime.tv_sec;
    971  1.243        ad 
    972  1.243        ad 	q = p->p_pptr;
    973  1.243        ad 
    974  1.277        ad 	mutex_exit(p->p_lock);
    975  1.277        ad 	mutex_enter(q->p_lock);
    976  1.243        ad 
    977  1.243        ad 	if ((q->p_sflag & mask) == 0)
    978  1.243        ad 		kpsignal2(q, &ksi);
    979  1.243        ad 
    980  1.277        ad 	mutex_exit(q->p_lock);
    981  1.277        ad 	mutex_enter(p->p_lock);
    982  1.151  christos }
    983  1.151  christos 
    984   1.29       cgd void
    985  1.243        ad psignal(struct proc *p, int signo)
    986  1.148  christos {
    987  1.165   thorpej 	ksiginfo_t ksi;
    988  1.165   thorpej 
    989  1.276        ad 	KASSERT(!cpu_intr_p());
    990  1.276        ad 	KASSERT(mutex_owned(proc_lock));
    991  1.243        ad 
    992  1.192      matt 	KSI_INIT_EMPTY(&ksi);
    993  1.243        ad 	ksi.ksi_signo = signo;
    994  1.277        ad 	mutex_enter(p->p_lock);
    995  1.234      yamt 	kpsignal2(p, &ksi);
    996  1.277        ad 	mutex_exit(p->p_lock);
    997  1.148  christos }
    998  1.148  christos 
    999  1.148  christos void
   1000  1.234      yamt kpsignal(struct proc *p, ksiginfo_t *ksi, void *data)
   1001  1.160  christos {
   1002  1.274        ad 	fdfile_t *ff;
   1003  1.274        ad 	file_t *fp;
   1004  1.298        ad 	fdtab_t *dt;
   1005  1.165   thorpej 
   1006  1.276        ad 	KASSERT(!cpu_intr_p());
   1007  1.276        ad 	KASSERT(mutex_owned(proc_lock));
   1008  1.243        ad 
   1009  1.243        ad 	if ((p->p_sflag & PS_WEXIT) == 0 && data) {
   1010  1.160  christos 		size_t fd;
   1011  1.274        ad 		filedesc_t *fdp = p->p_fd;
   1012  1.165   thorpej 
   1013  1.274        ad 		/* XXXSMP locking */
   1014  1.160  christos 		ksi->ksi_fd = -1;
   1015  1.298        ad 		dt = fdp->fd_dt;
   1016  1.298        ad 		for (fd = 0; fd < dt->dt_nfiles; fd++) {
   1017  1.298        ad 			if ((ff = dt->dt_ff[fd]) == NULL)
   1018  1.274        ad 				continue;
   1019  1.274        ad 			if ((fp = ff->ff_file) == NULL)
   1020  1.274        ad 				continue;
   1021  1.274        ad 			if (fp->f_data == data) {
   1022  1.160  christos 				ksi->ksi_fd = fd;
   1023  1.160  christos 				break;
   1024  1.160  christos 			}
   1025  1.160  christos 		}
   1026  1.160  christos 	}
   1027  1.277        ad 	mutex_enter(p->p_lock);
   1028  1.234      yamt 	kpsignal2(p, ksi);
   1029  1.277        ad 	mutex_exit(p->p_lock);
   1030  1.160  christos }
   1031  1.160  christos 
   1032  1.243        ad /*
   1033  1.243        ad  * sigismasked:
   1034  1.243        ad  *
   1035  1.301     rmind  *	Returns true if signal is ignored or masked for the specified LWP.
   1036  1.243        ad  */
   1037  1.243        ad int
   1038  1.243        ad sigismasked(struct lwp *l, int sig)
   1039   1.29       cgd {
   1040  1.243        ad 	struct proc *p = l->l_proc;
   1041  1.243        ad 
   1042  1.317     rmind 	return sigismember(&p->p_sigctx.ps_sigignore, sig) ||
   1043  1.317     rmind 	    sigismember(&l->l_sigmask, sig);
   1044  1.243        ad }
   1045   1.29       cgd 
   1046  1.243        ad /*
   1047  1.243        ad  * sigpost:
   1048  1.243        ad  *
   1049  1.301     rmind  *	Post a pending signal to an LWP.  Returns non-zero if the LWP may
   1050  1.301     rmind  *	be able to take the signal.
   1051  1.243        ad  */
   1052  1.297     rmind static int
   1053  1.317     rmind sigpost(struct lwp *l, sig_t action, int prop, int sig)
   1054  1.243        ad {
   1055  1.243        ad 	int rv, masked;
   1056  1.288  wrstuden 	struct proc *p = l->l_proc;
   1057  1.148  christos 
   1058  1.288  wrstuden 	KASSERT(mutex_owned(p->p_lock));
   1059  1.148  christos 
   1060  1.183      fvdl 	/*
   1061  1.243        ad 	 * If the LWP is on the way out, sigclear() will be busy draining all
   1062  1.243        ad 	 * pending signals.  Don't give it more.
   1063  1.126  jdolecek 	 */
   1064  1.243        ad 	if (l->l_refcnt == 0)
   1065  1.243        ad 		return 0;
   1066  1.243        ad 
   1067  1.320  christos 	SDT_PROBE(proc, kernel, , signal__send, l, p, sig, 0, 0);
   1068  1.303    darran 
   1069  1.289  wrstuden 	/*
   1070  1.243        ad 	 * Have the LWP check for signals.  This ensures that even if no LWP
   1071  1.243        ad 	 * is found to take the signal immediately, it should be taken soon.
   1072  1.243        ad 	 */
   1073  1.293        ad 	lwp_lock(l);
   1074  1.246     pavel 	l->l_flag |= LW_PENDSIG;
   1075   1.29       cgd 
   1076   1.29       cgd 	/*
   1077  1.297     rmind 	 * SIGCONT can be masked, but if LWP is stopped, it needs restart.
   1078  1.297     rmind 	 * Note: SIGKILL and SIGSTOP cannot be masked.
   1079   1.29       cgd 	 */
   1080  1.317     rmind 	masked = sigismember(&l->l_sigmask, sig);
   1081  1.243        ad 	if (masked && ((prop & SA_CONT) == 0 || l->l_stat != LSSTOP)) {
   1082  1.243        ad 		lwp_unlock(l);
   1083  1.243        ad 		return 0;
   1084  1.243        ad 	}
   1085  1.198  jdolecek 
   1086  1.243        ad 	/*
   1087  1.247        ad 	 * If killing the process, make it run fast.
   1088  1.247        ad 	 */
   1089  1.247        ad 	if (__predict_false((prop & SA_KILL) != 0) &&
   1090  1.266     rmind 	    action == SIG_DFL && l->l_priority < MAXPRI_USER) {
   1091  1.266     rmind 		KASSERT(l->l_class == SCHED_OTHER);
   1092  1.266     rmind 		lwp_changepri(l, MAXPRI_USER);
   1093  1.266     rmind 	}
   1094  1.247        ad 
   1095  1.247        ad 	/*
   1096  1.243        ad 	 * If the LWP is running or on a run queue, then we win.  If it's
   1097  1.243        ad 	 * sleeping interruptably, wake it and make it take the signal.  If
   1098  1.243        ad 	 * the sleep isn't interruptable, then the chances are it will get
   1099  1.243        ad 	 * to see the signal soon anyhow.  If suspended, it can't take the
   1100  1.243        ad 	 * signal right now.  If it's LWP private or for all LWPs, save it
   1101  1.243        ad 	 * for later; otherwise punt.
   1102  1.243        ad 	 */
   1103  1.243        ad 	rv = 0;
   1104  1.243        ad 
   1105  1.243        ad 	switch (l->l_stat) {
   1106  1.243        ad 	case LSRUN:
   1107  1.243        ad 	case LSONPROC:
   1108  1.243        ad 		lwp_need_userret(l);
   1109  1.243        ad 		rv = 1;
   1110  1.243        ad 		break;
   1111  1.243        ad 
   1112  1.243        ad 	case LSSLEEP:
   1113  1.246     pavel 		if ((l->l_flag & LW_SINTR) != 0) {
   1114  1.243        ad 			/* setrunnable() will release the lock. */
   1115  1.243        ad 			setrunnable(l);
   1116  1.243        ad 			return 1;
   1117  1.232       mrg 		}
   1118  1.243        ad 		break;
   1119  1.243        ad 
   1120  1.243        ad 	case LSSUSPENDED:
   1121  1.309      yamt 		if ((prop & SA_KILL) != 0 && (l->l_flag & LW_WCORE) != 0) {
   1122  1.243        ad 			/* lwp_continue() will release the lock. */
   1123  1.243        ad 			lwp_continue(l);
   1124  1.243        ad 			return 1;
   1125  1.190      matt 		}
   1126  1.243        ad 		break;
   1127  1.243        ad 
   1128  1.243        ad 	case LSSTOP:
   1129  1.243        ad 		if ((prop & SA_STOP) != 0)
   1130  1.243        ad 			break;
   1131  1.198  jdolecek 
   1132  1.198  jdolecek 		/*
   1133  1.243        ad 		 * If the LWP is stopped and we are sending a continue
   1134  1.243        ad 		 * signal, then start it again.
   1135  1.198  jdolecek 		 */
   1136  1.243        ad 		if ((prop & SA_CONT) != 0) {
   1137  1.243        ad 			if (l->l_wchan != NULL) {
   1138  1.243        ad 				l->l_stat = LSSLEEP;
   1139  1.288  wrstuden 				p->p_nrlwps++;
   1140  1.243        ad 				rv = 1;
   1141  1.243        ad 				break;
   1142  1.243        ad 			}
   1143  1.243        ad 			/* setrunnable() will release the lock. */
   1144  1.243        ad 			setrunnable(l);
   1145  1.243        ad 			return 1;
   1146  1.246     pavel 		} else if (l->l_wchan == NULL || (l->l_flag & LW_SINTR) != 0) {
   1147  1.243        ad 			/* setrunnable() will release the lock. */
   1148  1.243        ad 			setrunnable(l);
   1149  1.243        ad 			return 1;
   1150  1.243        ad 		}
   1151  1.243        ad 		break;
   1152  1.198  jdolecek 
   1153  1.243        ad 	default:
   1154  1.243        ad 		break;
   1155  1.243        ad 	}
   1156   1.44   mycroft 
   1157  1.243        ad 	lwp_unlock(l);
   1158  1.243        ad 	return rv;
   1159  1.243        ad }
   1160   1.29       cgd 
   1161  1.243        ad /*
   1162  1.243        ad  * Notify an LWP that it has a pending signal.
   1163  1.243        ad  */
   1164  1.243        ad void
   1165  1.243        ad signotify(struct lwp *l)
   1166  1.243        ad {
   1167  1.250        ad 	KASSERT(lwp_locked(l, NULL));
   1168   1.29       cgd 
   1169  1.246     pavel 	l->l_flag |= LW_PENDSIG;
   1170  1.243        ad 	lwp_need_userret(l);
   1171  1.243        ad }
   1172   1.44   mycroft 
   1173  1.243        ad /*
   1174  1.243        ad  * Find an LWP within process p that is waiting on signal ksi, and hand
   1175  1.243        ad  * it on.
   1176  1.243        ad  */
   1177  1.297     rmind static int
   1178  1.243        ad sigunwait(struct proc *p, const ksiginfo_t *ksi)
   1179  1.243        ad {
   1180  1.243        ad 	struct lwp *l;
   1181  1.243        ad 	int signo;
   1182  1.135  jdolecek 
   1183  1.277        ad 	KASSERT(mutex_owned(p->p_lock));
   1184  1.171  jdolecek 
   1185  1.243        ad 	signo = ksi->ksi_signo;
   1186  1.243        ad 
   1187  1.243        ad 	if (ksi->ksi_lid != 0) {
   1188  1.243        ad 		/*
   1189  1.243        ad 		 * Signal came via _lwp_kill().  Find the LWP and see if
   1190  1.243        ad 		 * it's interested.
   1191  1.243        ad 		 */
   1192  1.243        ad 		if ((l = lwp_find(p, ksi->ksi_lid)) == NULL)
   1193  1.243        ad 			return 0;
   1194  1.243        ad 		if (l->l_sigwaited == NULL ||
   1195  1.243        ad 		    !sigismember(&l->l_sigwaitset, signo))
   1196  1.243        ad 			return 0;
   1197  1.243        ad 	} else {
   1198  1.243        ad 		/*
   1199  1.243        ad 		 * Look for any LWP that may be interested.
   1200  1.243        ad 		 */
   1201  1.243        ad 		LIST_FOREACH(l, &p->p_sigwaiters, l_sigwaiter) {
   1202  1.243        ad 			KASSERT(l->l_sigwaited != NULL);
   1203  1.243        ad 			if (sigismember(&l->l_sigwaitset, signo))
   1204  1.243        ad 				break;
   1205  1.243        ad 		}
   1206  1.243        ad 	}
   1207  1.243        ad 
   1208  1.243        ad 	if (l != NULL) {
   1209  1.243        ad 		l->l_sigwaited->ksi_info = ksi->ksi_info;
   1210  1.243        ad 		l->l_sigwaited = NULL;
   1211  1.243        ad 		LIST_REMOVE(l, l_sigwaiter);
   1212  1.243        ad 		cv_signal(&l->l_sigcv);
   1213  1.243        ad 		return 1;
   1214  1.243        ad 	}
   1215  1.243        ad 
   1216  1.243        ad 	return 0;
   1217  1.243        ad }
   1218  1.243        ad 
   1219  1.243        ad /*
   1220  1.243        ad  * Send the signal to the process.  If the signal has an action, the action
   1221  1.243        ad  * is usually performed by the target process rather than the caller; we add
   1222  1.243        ad  * the signal to the set of pending signals for the process.
   1223  1.243        ad  *
   1224  1.243        ad  * Exceptions:
   1225  1.243        ad  *   o When a stop signal is sent to a sleeping process that takes the
   1226  1.243        ad  *     default action, the process is stopped without awakening it.
   1227  1.243        ad  *   o SIGCONT restarts stopped processes (or puts them back to sleep)
   1228  1.243        ad  *     regardless of the signal action (eg, blocked or ignored).
   1229  1.243        ad  *
   1230  1.243        ad  * Other ignored signals are discarded immediately.
   1231  1.243        ad  */
   1232  1.328  christos int
   1233  1.243        ad kpsignal2(struct proc *p, ksiginfo_t *ksi)
   1234  1.243        ad {
   1235  1.301     rmind 	int prop, signo = ksi->ksi_signo;
   1236  1.320  christos 	struct lwp *l = NULL;
   1237  1.243        ad 	ksiginfo_t *kp;
   1238  1.301     rmind 	lwpid_t lid;
   1239  1.243        ad 	sig_t action;
   1240  1.335    martin 	bool toall, debtrap = false;
   1241  1.328  christos 	int error = 0;
   1242  1.243        ad 
   1243  1.276        ad 	KASSERT(!cpu_intr_p());
   1244  1.276        ad 	KASSERT(mutex_owned(proc_lock));
   1245  1.277        ad 	KASSERT(mutex_owned(p->p_lock));
   1246  1.243        ad 	KASSERT((ksi->ksi_flags & KSI_QUEUED) == 0);
   1247  1.243        ad 	KASSERT(signo > 0 && signo < NSIG);
   1248  1.171  jdolecek 
   1249  1.135  jdolecek 	/*
   1250  1.243        ad 	 * If the process is being created by fork, is a zombie or is
   1251  1.243        ad 	 * exiting, then just drop the signal here and bail out.
   1252   1.29       cgd 	 */
   1253  1.335    martin 	if (p->p_stat == SIDL && signo == SIGTRAP
   1254  1.335    martin 	    && (p->p_slflag & PSL_TRACED)) {
   1255  1.335    martin 		/* allow an initial SIGTRAP for traced processes */
   1256  1.335    martin 		debtrap = true;
   1257  1.335    martin 	} else if (p->p_stat != SACTIVE && p->p_stat != SSTOP) {
   1258  1.328  christos 		return 0;
   1259  1.335    martin 	}
   1260  1.231       mrg 
   1261  1.331  christos 	/* XXX for core dump/debugger */
   1262  1.331  christos 	p->p_sigctx.ps_lwp = ksi->ksi_lid;
   1263  1.332     kamil 	p->p_sigctx.ps_info = ksi->ksi_info;
   1264  1.331  christos 
   1265  1.231       mrg 	/*
   1266  1.243        ad 	 * Notify any interested parties of the signal.
   1267  1.301     rmind 	 */
   1268  1.243        ad 	KNOTE(&p->p_klist, NOTE_SIGNAL | signo);
   1269  1.243        ad 
   1270  1.243        ad 	/*
   1271  1.243        ad 	 * Some signals including SIGKILL must act on the entire process.
   1272  1.231       mrg 	 */
   1273  1.243        ad 	kp = NULL;
   1274  1.243        ad 	prop = sigprop[signo];
   1275  1.243        ad 	toall = ((prop & SA_TOALL) != 0);
   1276  1.301     rmind 	lid = toall ? 0 : ksi->ksi_lid;
   1277  1.231       mrg 
   1278  1.243        ad 	/*
   1279  1.243        ad 	 * If proc is traced, always give parent a chance.
   1280  1.243        ad 	 */
   1281  1.243        ad 	if (p->p_slflag & PSL_TRACED) {
   1282  1.243        ad 		action = SIG_DFL;
   1283  1.104   thorpej 
   1284  1.243        ad 		if (lid == 0) {
   1285  1.243        ad 			/*
   1286  1.243        ad 			 * If the process is being traced and the signal
   1287  1.243        ad 			 * is being caught, make sure to save any ksiginfo.
   1288  1.243        ad 			 */
   1289  1.243        ad 			if ((kp = ksiginfo_alloc(p, ksi, PR_NOWAIT)) == NULL)
   1290  1.320  christos 				goto discard;
   1291  1.328  christos 			if ((error = sigput(&p->p_sigpend, p, kp)) != 0)
   1292  1.328  christos 				goto out;
   1293  1.243        ad 		}
   1294  1.243        ad 	} else {
   1295  1.243        ad 
   1296   1.29       cgd 		/*
   1297  1.243        ad 		 * If the signal is being ignored, then drop it.  Note: we
   1298  1.243        ad 		 * don't set SIGCONT in ps_sigignore, and if it is set to
   1299  1.243        ad 		 * SIG_IGN, action will be SIG_DFL here.
   1300   1.29       cgd 		 */
   1301  1.243        ad 		if (sigismember(&p->p_sigctx.ps_sigignore, signo))
   1302  1.320  christos 			goto discard;
   1303  1.243        ad 
   1304  1.243        ad 		else if (sigismember(&p->p_sigctx.ps_sigcatch, signo))
   1305  1.243        ad 			action = SIG_CATCH;
   1306  1.243        ad 		else {
   1307  1.243        ad 			action = SIG_DFL;
   1308  1.243        ad 
   1309  1.243        ad 			/*
   1310  1.243        ad 			 * If sending a tty stop signal to a member of an
   1311  1.243        ad 			 * orphaned process group, discard the signal here if
   1312  1.243        ad 			 * the action is default; don't stop the process below
   1313  1.243        ad 			 * if sleeping, and don't clear any pending SIGCONT.
   1314  1.243        ad 			 */
   1315  1.276        ad 			if (prop & SA_TTYSTOP && p->p_pgrp->pg_jobc == 0)
   1316  1.320  christos 				goto discard;
   1317  1.243        ad 
   1318  1.243        ad 			if (prop & SA_KILL && p->p_nice > NZERO)
   1319  1.243        ad 				p->p_nice = NZERO;
   1320   1.29       cgd 		}
   1321  1.175        cl 	}
   1322  1.175        cl 
   1323  1.243        ad 	/*
   1324  1.243        ad 	 * If stopping or continuing a process, discard any pending
   1325  1.243        ad 	 * signals that would do the inverse.
   1326  1.243        ad 	 */
   1327  1.243        ad 	if ((prop & (SA_CONT | SA_STOP)) != 0) {
   1328  1.301     rmind 		ksiginfoq_t kq;
   1329  1.301     rmind 
   1330  1.243        ad 		ksiginfo_queue_init(&kq);
   1331  1.243        ad 		if ((prop & SA_CONT) != 0)
   1332  1.243        ad 			sigclear(&p->p_sigpend, &stopsigmask, &kq);
   1333  1.243        ad 		if ((prop & SA_STOP) != 0)
   1334  1.243        ad 			sigclear(&p->p_sigpend, &contsigmask, &kq);
   1335  1.243        ad 		ksiginfo_queue_drain(&kq);	/* XXXSMP */
   1336  1.243        ad 	}
   1337  1.243        ad 
   1338  1.317     rmind 	/*
   1339  1.243        ad 	 * If the signal doesn't have SA_CANTMASK (no override for SIGKILL,
   1340  1.243        ad 	 * please!), check if any LWPs are waiting on it.  If yes, pass on
   1341  1.243        ad 	 * the signal info.  The signal won't be processed further here.
   1342  1.243        ad 	 */
   1343  1.243        ad 	if ((prop & SA_CANTMASK) == 0 && !LIST_EMPTY(&p->p_sigwaiters) &&
   1344  1.243        ad 	    p->p_stat == SACTIVE && (p->p_sflag & PS_STOPPING) == 0 &&
   1345  1.243        ad 	    sigunwait(p, ksi))
   1346  1.320  christos 		goto discard;
   1347  1.243        ad 
   1348  1.243        ad 	/*
   1349  1.243        ad 	 * XXXSMP Should be allocated by the caller, we're holding locks
   1350  1.243        ad 	 * here.
   1351  1.243        ad 	 */
   1352  1.243        ad 	if (kp == NULL && (kp = ksiginfo_alloc(p, ksi, PR_NOWAIT)) == NULL)
   1353  1.320  christos 		goto discard;
   1354  1.243        ad 
   1355  1.243        ad 	/*
   1356  1.243        ad 	 * LWP private signals are easy - just find the LWP and post
   1357  1.243        ad 	 * the signal to it.
   1358  1.243        ad 	 */
   1359  1.243        ad 	if (lid != 0) {
   1360  1.335    martin 		if (__predict_false(debtrap)) {
   1361  1.335    martin 			l = LIST_FIRST(&p->p_lwps);
   1362  1.335    martin 			if (l->l_lid != lid)
   1363  1.335    martin 				l = NULL;
   1364  1.335    martin 		} else {
   1365  1.335    martin 			l = lwp_find(p, lid);
   1366  1.335    martin 		}
   1367  1.243        ad 		if (l != NULL) {
   1368  1.328  christos 			if ((error = sigput(&l->l_sigpend, p, kp)) != 0)
   1369  1.328  christos 				goto out;
   1370  1.260        ad 			membar_producer();
   1371  1.339  christos 			if (sigpost(l, action, prop, kp->ksi_signo) != 0)
   1372  1.339  christos 				signo = -1;
   1373  1.243        ad 		}
   1374  1.243        ad 		goto out;
   1375  1.243        ad 	}
   1376  1.130   thorpej 
   1377  1.243        ad 	/*
   1378  1.288  wrstuden 	 * Some signals go to all LWPs, even if posted with _lwp_kill()
   1379  1.288  wrstuden 	 * or for an SA process.
   1380  1.243        ad 	 */
   1381  1.243        ad 	if (p->p_stat == SACTIVE && (p->p_sflag & PS_STOPPING) == 0) {
   1382  1.243        ad 		if ((p->p_slflag & PSL_TRACED) != 0)
   1383  1.243        ad 			goto deliver;
   1384  1.202     perry 
   1385  1.176        cl 		/*
   1386  1.176        cl 		 * If SIGCONT is default (or ignored) and process is
   1387  1.176        cl 		 * asleep, we are finished; the process should not
   1388  1.176        cl 		 * be awakened.
   1389  1.176        cl 		 */
   1390  1.243        ad 		if ((prop & SA_CONT) != 0 && action == SIG_DFL)
   1391  1.243        ad 			goto out;
   1392  1.243        ad 	} else {
   1393  1.176        cl 		/*
   1394  1.300     rmind 		 * Process is stopped or stopping.
   1395  1.300     rmind 		 * - If traced, then no action is needed, unless killing.
   1396  1.300     rmind 		 * - Run the process only if sending SIGCONT or SIGKILL.
   1397  1.176        cl 		 */
   1398  1.300     rmind 		if ((p->p_slflag & PSL_TRACED) != 0 && signo != SIGKILL) {
   1399  1.243        ad 			goto out;
   1400  1.300     rmind 		}
   1401  1.297     rmind 		if ((prop & SA_CONT) != 0 || signo == SIGKILL) {
   1402  1.243        ad 			/*
   1403  1.321  pgoyette 			 * Re-adjust p_nstopchild if the process was
   1404  1.321  pgoyette 			 * stopped but not yet collected by its parent.
   1405  1.243        ad 			 */
   1406  1.321  pgoyette 			if (p->p_stat == SSTOP && !p->p_waited)
   1407  1.321  pgoyette 				p->p_pptr->p_nstopchild--;
   1408  1.243        ad 			p->p_stat = SACTIVE;
   1409  1.243        ad 			p->p_sflag &= ~PS_STOPPING;
   1410  1.300     rmind 			if (p->p_slflag & PSL_TRACED) {
   1411  1.300     rmind 				KASSERT(signo == SIGKILL);
   1412  1.300     rmind 				goto deliver;
   1413  1.300     rmind 			}
   1414   1.29       cgd 			/*
   1415  1.297     rmind 			 * Do not make signal pending if SIGCONT is default.
   1416  1.297     rmind 			 *
   1417  1.297     rmind 			 * If the process catches SIGCONT, let it handle the
   1418  1.297     rmind 			 * signal itself (if waiting on event - process runs,
   1419  1.297     rmind 			 * otherwise continues sleeping).
   1420   1.29       cgd 			 */
   1421  1.324  christos 			if ((prop & SA_CONT) != 0) {
   1422  1.324  christos 				p->p_xsig = SIGCONT;
   1423  1.326  christos 				p->p_sflag |= PS_CONTINUED;
   1424  1.324  christos 				child_psignal(p, 0);
   1425  1.324  christos 				if (action == SIG_DFL) {
   1426  1.324  christos 					KASSERT(signo != SIGKILL);
   1427  1.324  christos 					goto deliver;
   1428  1.324  christos 				}
   1429  1.297     rmind 			}
   1430  1.243        ad 		} else if ((prop & SA_STOP) != 0) {
   1431   1.29       cgd 			/*
   1432  1.176        cl 			 * Already stopped, don't need to stop again.
   1433  1.176        cl 			 * (If we did the shell could get confused.)
   1434   1.29       cgd 			 */
   1435  1.243        ad 			goto out;
   1436  1.297     rmind 		}
   1437  1.243        ad 	}
   1438  1.297     rmind 	/*
   1439  1.297     rmind 	 * Make signal pending.
   1440  1.297     rmind 	 */
   1441  1.300     rmind 	KASSERT((p->p_slflag & PSL_TRACED) == 0);
   1442  1.328  christos 	if ((error = sigput(&p->p_sigpend, p, kp)) != 0)
   1443  1.328  christos 		goto out;
   1444  1.301     rmind deliver:
   1445  1.243        ad 	/*
   1446  1.271      yamt 	 * Before we set LW_PENDSIG on any LWP, ensure that the signal is
   1447  1.243        ad 	 * visible on the per process list (for sigispending()).  This
   1448  1.243        ad 	 * is unlikely to be needed in practice, but...
   1449  1.243        ad 	 */
   1450  1.260        ad 	membar_producer();
   1451   1.29       cgd 
   1452   1.29       cgd 	/*
   1453  1.243        ad 	 * Try to find an LWP that can take the signal.
   1454   1.29       cgd 	 */
   1455  1.301     rmind 	LIST_FOREACH(l, &p->p_lwps, l_sibling) {
   1456  1.317     rmind 		if (sigpost(l, action, prop, kp->ksi_signo) && !toall)
   1457  1.301     rmind 			break;
   1458  1.288  wrstuden 	}
   1459  1.320  christos 	signo = -1;
   1460  1.301     rmind out:
   1461  1.301     rmind 	/*
   1462  1.301     rmind 	 * If the ksiginfo wasn't used, then bin it.  XXXSMP freeing memory
   1463  1.301     rmind 	 * with locks held.  The caller should take care of this.
   1464  1.301     rmind 	 */
   1465  1.301     rmind 	ksiginfo_free(kp);
   1466  1.320  christos 	if (signo == -1)
   1467  1.328  christos 		return error;
   1468  1.320  christos discard:
   1469  1.320  christos 	SDT_PROBE(proc, kernel, , signal__discard, l, p, signo, 0, 0);
   1470  1.328  christos 	return error;
   1471   1.29       cgd }
   1472   1.29       cgd 
   1473  1.243        ad void
   1474  1.243        ad kpsendsig(struct lwp *l, const ksiginfo_t *ksi, const sigset_t *mask)
   1475  1.209       chs {
   1476  1.243        ad 	struct proc *p = l->l_proc;
   1477  1.243        ad 
   1478  1.277        ad 	KASSERT(mutex_owned(p->p_lock));
   1479  1.243        ad 	(*p->p_emul->e_sendsig)(ksi, mask);
   1480  1.209       chs }
   1481  1.209       chs 
   1482  1.243        ad /*
   1483  1.272      yamt  * Stop any LWPs sleeping interruptably.
   1484  1.272      yamt  */
   1485  1.272      yamt static void
   1486  1.272      yamt proc_stop_lwps(struct proc *p)
   1487  1.272      yamt {
   1488  1.272      yamt 	struct lwp *l;
   1489  1.272      yamt 
   1490  1.277        ad 	KASSERT(mutex_owned(p->p_lock));
   1491  1.272      yamt 	KASSERT((p->p_sflag & PS_STOPPING) != 0);
   1492  1.272      yamt 
   1493  1.272      yamt 	LIST_FOREACH(l, &p->p_lwps, l_sibling) {
   1494  1.272      yamt 		lwp_lock(l);
   1495  1.272      yamt 		if (l->l_stat == LSSLEEP && (l->l_flag & LW_SINTR) != 0) {
   1496  1.272      yamt 			l->l_stat = LSSTOP;
   1497  1.272      yamt 			p->p_nrlwps--;
   1498  1.272      yamt 		}
   1499  1.272      yamt 		lwp_unlock(l);
   1500  1.272      yamt 	}
   1501  1.272      yamt }
   1502  1.272      yamt 
   1503  1.272      yamt /*
   1504  1.272      yamt  * Finish stopping of a process.  Mark it stopped and notify the parent.
   1505  1.272      yamt  *
   1506  1.277        ad  * Drop p_lock briefly if PS_NOTIFYSTOP is set and ppsig is true.
   1507  1.272      yamt  */
   1508  1.272      yamt static void
   1509  1.340     kamil proc_stop_done(struct proc *p, int ppmask)
   1510  1.272      yamt {
   1511  1.272      yamt 
   1512  1.276        ad 	KASSERT(mutex_owned(proc_lock));
   1513  1.277        ad 	KASSERT(mutex_owned(p->p_lock));
   1514  1.272      yamt 	KASSERT((p->p_sflag & PS_STOPPING) != 0);
   1515  1.272      yamt 	KASSERT(p->p_nrlwps == 0 || (p->p_nrlwps == 1 && p == curproc));
   1516  1.272      yamt 
   1517  1.272      yamt 	p->p_sflag &= ~PS_STOPPING;
   1518  1.272      yamt 	p->p_stat = SSTOP;
   1519  1.272      yamt 	p->p_waited = 0;
   1520  1.272      yamt 	p->p_pptr->p_nstopchild++;
   1521  1.272      yamt 	if ((p->p_sflag & PS_NOTIFYSTOP) != 0) {
   1522  1.340     kamil 		/* child_psignal drops p_lock briefly. */
   1523  1.340     kamil 		child_psignal(p, ppmask);
   1524  1.272      yamt 		cv_broadcast(&p->p_pptr->p_waitcv);
   1525  1.272      yamt 	}
   1526  1.272      yamt }
   1527  1.272      yamt 
   1528  1.272      yamt /*
   1529  1.243        ad  * Stop the current process and switch away when being stopped or traced.
   1530  1.243        ad  */
   1531  1.297     rmind static void
   1532  1.340     kamil sigswitch(int ppmask, int signo)
   1533  1.209       chs {
   1534  1.272      yamt 	struct lwp *l = curlwp;
   1535  1.243        ad 	struct proc *p = l->l_proc;
   1536  1.245        ad 	int biglocks;
   1537  1.243        ad 
   1538  1.277        ad 	KASSERT(mutex_owned(p->p_lock));
   1539  1.250        ad 	KASSERT(l->l_stat == LSONPROC);
   1540  1.250        ad 	KASSERT(p->p_nrlwps > 0);
   1541  1.243        ad 
   1542  1.243        ad 	/*
   1543  1.243        ad 	 * On entry we know that the process needs to stop.  If it's
   1544  1.243        ad 	 * the result of a 'sideways' stop signal that has been sourced
   1545  1.243        ad 	 * through issignal(), then stop other LWPs in the process too.
   1546  1.243        ad 	 */
   1547  1.243        ad 	if (p->p_stat == SACTIVE && (p->p_sflag & PS_STOPPING) == 0) {
   1548  1.243        ad 		KASSERT(signo != 0);
   1549  1.334  christos 		proc_stop(p, signo);
   1550  1.250        ad 		KASSERT(p->p_nrlwps > 0);
   1551  1.243        ad 	}
   1552  1.243        ad 
   1553  1.243        ad 	/*
   1554  1.243        ad 	 * If we are the last live LWP, and the stop was a result of
   1555  1.243        ad 	 * a new signal, then signal the parent.
   1556  1.243        ad 	 */
   1557  1.243        ad 	if ((p->p_sflag & PS_STOPPING) != 0) {
   1558  1.276        ad 		if (!mutex_tryenter(proc_lock)) {
   1559  1.277        ad 			mutex_exit(p->p_lock);
   1560  1.276        ad 			mutex_enter(proc_lock);
   1561  1.277        ad 			mutex_enter(p->p_lock);
   1562  1.243        ad 		}
   1563  1.243        ad 
   1564  1.243        ad 		if (p->p_nrlwps == 1 && (p->p_sflag & PS_STOPPING) != 0) {
   1565  1.272      yamt 			/*
   1566  1.272      yamt 			 * Note that proc_stop_done() can drop
   1567  1.277        ad 			 * p->p_lock briefly.
   1568  1.272      yamt 			 */
   1569  1.340     kamil 			proc_stop_done(p, ppmask);
   1570  1.243        ad 		}
   1571  1.243        ad 
   1572  1.276        ad 		mutex_exit(proc_lock);
   1573  1.243        ad 	}
   1574  1.243        ad 
   1575  1.243        ad 	/*
   1576  1.243        ad 	 * Unlock and switch away.
   1577  1.243        ad 	 */
   1578  1.245        ad 	KERNEL_UNLOCK_ALL(l, &biglocks);
   1579  1.243        ad 	if (p->p_stat == SSTOP || (p->p_sflag & PS_STOPPING) != 0) {
   1580  1.243        ad 		p->p_nrlwps--;
   1581  1.243        ad 		lwp_lock(l);
   1582  1.243        ad 		KASSERT(l->l_stat == LSONPROC || l->l_stat == LSSLEEP);
   1583  1.243        ad 		l->l_stat = LSSTOP;
   1584  1.243        ad 		lwp_unlock(l);
   1585  1.243        ad 	}
   1586  1.243        ad 
   1587  1.277        ad 	mutex_exit(p->p_lock);
   1588  1.243        ad 	lwp_lock(l);
   1589  1.253      yamt 	mi_switch(l);
   1590  1.245        ad 	KERNEL_LOCK(biglocks, l);
   1591  1.277        ad 	mutex_enter(p->p_lock);
   1592  1.209       chs }
   1593  1.209       chs 
   1594  1.243        ad /*
   1595  1.243        ad  * Check for a signal from the debugger.
   1596  1.243        ad  */
   1597  1.297     rmind static int
   1598  1.293        ad sigchecktrace(void)
   1599  1.130   thorpej {
   1600  1.243        ad 	struct lwp *l = curlwp;
   1601  1.130   thorpej 	struct proc *p = l->l_proc;
   1602  1.243        ad 	int signo;
   1603  1.243        ad 
   1604  1.277        ad 	KASSERT(mutex_owned(p->p_lock));
   1605  1.130   thorpej 
   1606  1.292        ad 	/* If there's a pending SIGKILL, process it immediately. */
   1607  1.292        ad 	if (sigismember(&p->p_sigpend.sp_set, SIGKILL))
   1608  1.292        ad 		return 0;
   1609  1.292        ad 
   1610  1.243        ad 	/*
   1611  1.243        ad 	 * If we are no longer being traced, or the parent didn't
   1612  1.305  christos 	 * give us a signal, or we're stopping, look for more signals.
   1613  1.243        ad 	 */
   1614  1.322  christos 	if ((p->p_slflag & PSL_TRACED) == 0 || p->p_xsig == 0 ||
   1615  1.305  christos 	    (p->p_sflag & PS_STOPPING) != 0)
   1616  1.243        ad 		return 0;
   1617  1.130   thorpej 
   1618  1.243        ad 	/*
   1619  1.243        ad 	 * If the new signal is being masked, look for other signals.
   1620  1.243        ad 	 * `p->p_sigctx.ps_siglist |= mask' is done in setrunnable().
   1621  1.243        ad 	 */
   1622  1.322  christos 	signo = p->p_xsig;
   1623  1.322  christos 	p->p_xsig = 0;
   1624  1.317     rmind 	if (sigismember(&l->l_sigmask, signo)) {
   1625  1.243        ad 		signo = 0;
   1626  1.317     rmind 	}
   1627  1.243        ad 	return signo;
   1628   1.79   mycroft }
   1629   1.79   mycroft 
   1630   1.29       cgd /*
   1631   1.29       cgd  * If the current process has received a signal (should be caught or cause
   1632   1.29       cgd  * termination, should interrupt current syscall), return the signal number.
   1633  1.243        ad  *
   1634   1.29       cgd  * Stop signals with default action are processed immediately, then cleared;
   1635   1.29       cgd  * they aren't returned.  This is checked after each entry to the system for
   1636  1.243        ad  * a syscall or trap.
   1637  1.243        ad  *
   1638  1.243        ad  * We will also return -1 if the process is exiting and the current LWP must
   1639  1.243        ad  * follow suit.
   1640   1.29       cgd  */
   1641   1.29       cgd int
   1642  1.130   thorpej issignal(struct lwp *l)
   1643   1.29       cgd {
   1644  1.293        ad 	struct proc *p;
   1645  1.293        ad 	int signo, prop;
   1646  1.293        ad 	sigpend_t *sp;
   1647  1.243        ad 	sigset_t ss;
   1648  1.243        ad 
   1649  1.293        ad 	p = l->l_proc;
   1650  1.293        ad 	sp = NULL;
   1651  1.293        ad 	signo = 0;
   1652  1.293        ad 
   1653  1.293        ad 	KASSERT(p == curproc);
   1654  1.277        ad 	KASSERT(mutex_owned(p->p_lock));
   1655   1.29       cgd 
   1656  1.243        ad 	for (;;) {
   1657  1.243        ad 		/* Discard any signals that we have decided not to take. */
   1658  1.314  christos 		if (signo != 0) {
   1659  1.243        ad 			(void)sigget(sp, NULL, signo, NULL);
   1660  1.314  christos 		}
   1661  1.144      fvdl 
   1662  1.243        ad 		/*
   1663  1.243        ad 		 * If the process is stopped/stopping, then stop ourselves
   1664  1.243        ad 		 * now that we're on the kernel/userspace boundary.  When
   1665  1.243        ad 		 * we awaken, check for a signal from the debugger.
   1666  1.243        ad 		 */
   1667  1.243        ad 		if (p->p_stat == SSTOP || (p->p_sflag & PS_STOPPING) != 0) {
   1668  1.340     kamil 			sigswitch(PS_NOCLDSTOP, 0);
   1669  1.293        ad 			signo = sigchecktrace();
   1670  1.243        ad 		} else
   1671  1.243        ad 			signo = 0;
   1672  1.238        ad 
   1673  1.293        ad 		/* Signals from the debugger are "out of band". */
   1674  1.293        ad 		sp = NULL;
   1675  1.293        ad 
   1676  1.130   thorpej 		/*
   1677  1.243        ad 		 * If the debugger didn't provide a signal, find a pending
   1678  1.243        ad 		 * signal from our set.  Check per-LWP signals first, and
   1679  1.243        ad 		 * then per-process.
   1680  1.243        ad 		 */
   1681  1.243        ad 		if (signo == 0) {
   1682  1.243        ad 			sp = &l->l_sigpend;
   1683  1.243        ad 			ss = sp->sp_set;
   1684  1.285        ad 			if ((p->p_lflag & PL_PPWAIT) != 0)
   1685  1.243        ad 				sigminusset(&stopsigmask, &ss);
   1686  1.243        ad 			sigminusset(&l->l_sigmask, &ss);
   1687  1.243        ad 
   1688  1.243        ad 			if ((signo = firstsig(&ss)) == 0) {
   1689  1.243        ad 				sp = &p->p_sigpend;
   1690  1.243        ad 				ss = sp->sp_set;
   1691  1.285        ad 				if ((p->p_lflag & PL_PPWAIT) != 0)
   1692  1.243        ad 					sigminusset(&stopsigmask, &ss);
   1693  1.243        ad 				sigminusset(&l->l_sigmask, &ss);
   1694  1.243        ad 
   1695  1.243        ad 				if ((signo = firstsig(&ss)) == 0) {
   1696  1.243        ad 					/*
   1697  1.243        ad 					 * No signal pending - clear the
   1698  1.243        ad 					 * indicator and bail out.
   1699  1.243        ad 					 */
   1700  1.243        ad 					lwp_lock(l);
   1701  1.246     pavel 					l->l_flag &= ~LW_PENDSIG;
   1702  1.243        ad 					lwp_unlock(l);
   1703  1.243        ad 					sp = NULL;
   1704  1.243        ad 					break;
   1705  1.243        ad 				}
   1706  1.243        ad 			}
   1707   1.79   mycroft 		}
   1708   1.42   mycroft 
   1709   1.29       cgd 		/*
   1710  1.243        ad 		 * We should see pending but ignored signals only if
   1711  1.243        ad 		 * we are being traced.
   1712   1.29       cgd 		 */
   1713  1.243        ad 		if (sigismember(&p->p_sigctx.ps_sigignore, signo) &&
   1714  1.243        ad 		    (p->p_slflag & PSL_TRACED) == 0) {
   1715  1.243        ad 			/* Discard the signal. */
   1716   1.29       cgd 			continue;
   1717  1.243        ad 		}
   1718   1.42   mycroft 
   1719  1.243        ad 		/*
   1720  1.243        ad 		 * If traced, always stop, and stay stopped until released
   1721  1.243        ad 		 * by the debugger.  If the our parent process is waiting
   1722  1.243        ad 		 * for us, don't hang as we could deadlock.
   1723  1.243        ad 		 */
   1724  1.243        ad 		if ((p->p_slflag & PSL_TRACED) != 0 &&
   1725  1.285        ad 		    (p->p_lflag & PL_PPWAIT) == 0 && signo != SIGKILL) {
   1726  1.313  christos 			/*
   1727  1.313  christos 			 * Take the signal, but don't remove it from the
   1728  1.313  christos 			 * siginfo queue, because the debugger can send
   1729  1.313  christos 			 * it later.
   1730  1.313  christos 			 */
   1731  1.315  christos 			if (sp)
   1732  1.315  christos 				sigdelset(&sp->sp_set, signo);
   1733  1.322  christos 			p->p_xsig = signo;
   1734  1.184      manu 
   1735  1.184      manu 			/* Emulation-specific handling of signal trace */
   1736  1.243        ad 			if (p->p_emul->e_tracesig == NULL ||
   1737  1.243        ad 			    (*p->p_emul->e_tracesig)(p, signo) == 0)
   1738  1.340     kamil 				sigswitch(0, signo);
   1739   1.29       cgd 
   1740  1.243        ad 			/* Check for a signal from the debugger. */
   1741  1.293        ad 			if ((signo = sigchecktrace()) == 0)
   1742   1.29       cgd 				continue;
   1743  1.293        ad 
   1744  1.293        ad 			/* Signals from the debugger are "out of band". */
   1745  1.293        ad 			sp = NULL;
   1746   1.29       cgd 		}
   1747   1.29       cgd 
   1748  1.243        ad 		prop = sigprop[signo];
   1749   1.42   mycroft 
   1750   1.29       cgd 		/*
   1751   1.29       cgd 		 * Decide whether the signal should be returned.
   1752   1.29       cgd 		 */
   1753  1.243        ad 		switch ((long)SIGACTION(p, signo).sa_handler) {
   1754   1.33       cgd 		case (long)SIG_DFL:
   1755   1.29       cgd 			/*
   1756   1.29       cgd 			 * Don't take default actions on system processes.
   1757   1.29       cgd 			 */
   1758   1.29       cgd 			if (p->p_pid <= 1) {
   1759   1.29       cgd #ifdef DIAGNOSTIC
   1760   1.29       cgd 				/*
   1761   1.29       cgd 				 * Are you sure you want to ignore SIGSEGV
   1762   1.29       cgd 				 * in init? XXX
   1763   1.29       cgd 				 */
   1764  1.243        ad 				printf_nolog("Process (pid %d) got sig %d\n",
   1765  1.243        ad 				    p->p_pid, signo);
   1766   1.29       cgd #endif
   1767  1.243        ad 				continue;
   1768   1.29       cgd 			}
   1769  1.243        ad 
   1770   1.29       cgd 			/*
   1771  1.243        ad 			 * If there is a pending stop signal to process with
   1772  1.243        ad 			 * default action, stop here, then clear the signal.
   1773  1.243        ad 			 * However, if process is member of an orphaned
   1774   1.29       cgd 			 * process group, ignore tty stop signals.
   1775   1.29       cgd 			 */
   1776   1.29       cgd 			if (prop & SA_STOP) {
   1777  1.276        ad 				/*
   1778  1.276        ad 				 * XXX Don't hold proc_lock for p_lflag,
   1779  1.276        ad 				 * but it's not a big deal.
   1780  1.276        ad 				 */
   1781  1.243        ad 				if (p->p_slflag & PSL_TRACED ||
   1782  1.301     rmind 				    ((p->p_lflag & PL_ORPHANPG) != 0 &&
   1783  1.243        ad 				    prop & SA_TTYSTOP)) {
   1784  1.301     rmind 					/* Ignore the signal. */
   1785  1.243        ad 					continue;
   1786  1.243        ad 				}
   1787  1.243        ad 				/* Take the signal. */
   1788  1.243        ad 				(void)sigget(sp, NULL, signo, NULL);
   1789  1.322  christos 				p->p_xsig = signo;
   1790  1.327  christos 				p->p_sflag &= ~PS_CONTINUED;
   1791  1.243        ad 				signo = 0;
   1792  1.340     kamil 				sigswitch(PS_NOCLDSTOP, p->p_xsig);
   1793   1.29       cgd 			} else if (prop & SA_IGNORE) {
   1794   1.29       cgd 				/*
   1795   1.29       cgd 				 * Except for SIGCONT, shouldn't get here.
   1796   1.29       cgd 				 * Default action is to ignore; drop it.
   1797   1.29       cgd 				 */
   1798  1.243        ad 				continue;
   1799  1.243        ad 			}
   1800  1.243        ad 			break;
   1801   1.29       cgd 
   1802   1.33       cgd 		case (long)SIG_IGN:
   1803  1.243        ad #ifdef DEBUG_ISSIGNAL
   1804   1.29       cgd 			/*
   1805   1.29       cgd 			 * Masking above should prevent us ever trying
   1806   1.29       cgd 			 * to take action on an ignored signal other
   1807   1.29       cgd 			 * than SIGCONT, unless process is traced.
   1808   1.29       cgd 			 */
   1809   1.29       cgd 			if ((prop & SA_CONT) == 0 &&
   1810  1.243        ad 			    (p->p_slflag & PSL_TRACED) == 0)
   1811  1.243        ad 				printf_nolog("issignal\n");
   1812  1.128  jdolecek #endif
   1813  1.243        ad 			continue;
   1814   1.29       cgd 
   1815   1.29       cgd 		default:
   1816   1.29       cgd 			/*
   1817  1.243        ad 			 * This signal has an action, let postsig() process
   1818  1.243        ad 			 * it.
   1819   1.29       cgd 			 */
   1820  1.243        ad 			break;
   1821   1.29       cgd 		}
   1822  1.243        ad 
   1823  1.243        ad 		break;
   1824   1.29       cgd 	}
   1825   1.42   mycroft 
   1826  1.243        ad 	l->l_sigpendset = sp;
   1827  1.243        ad 	return signo;
   1828   1.29       cgd }
   1829   1.29       cgd 
   1830   1.29       cgd /*
   1831  1.243        ad  * Take the action for the specified signal
   1832  1.243        ad  * from the current set of pending signals.
   1833   1.29       cgd  */
   1834  1.179  christos void
   1835  1.243        ad postsig(int signo)
   1836   1.29       cgd {
   1837  1.243        ad 	struct lwp	*l;
   1838  1.243        ad 	struct proc	*p;
   1839  1.243        ad 	struct sigacts	*ps;
   1840  1.243        ad 	sig_t		action;
   1841  1.243        ad 	sigset_t	*returnmask;
   1842  1.243        ad 	ksiginfo_t	ksi;
   1843  1.243        ad 
   1844  1.243        ad 	l = curlwp;
   1845  1.243        ad 	p = l->l_proc;
   1846  1.243        ad 	ps = p->p_sigacts;
   1847  1.243        ad 
   1848  1.277        ad 	KASSERT(mutex_owned(p->p_lock));
   1849  1.243        ad 	KASSERT(signo > 0);
   1850  1.243        ad 
   1851  1.243        ad 	/*
   1852  1.243        ad 	 * Set the new mask value and also defer further occurrences of this
   1853  1.243        ad 	 * signal.
   1854  1.243        ad 	 *
   1855  1.268      yamt 	 * Special case: user has done a sigsuspend.  Here the current mask is
   1856  1.293        ad 	 * not of interest, but rather the mask from before the sigsuspend is
   1857  1.243        ad 	 * what we want restored after the signal processing is completed.
   1858  1.243        ad 	 */
   1859  1.243        ad 	if (l->l_sigrestore) {
   1860  1.243        ad 		returnmask = &l->l_sigoldmask;
   1861  1.243        ad 		l->l_sigrestore = 0;
   1862  1.243        ad 	} else
   1863  1.243        ad 		returnmask = &l->l_sigmask;
   1864   1.29       cgd 
   1865  1.243        ad 	/*
   1866  1.243        ad 	 * Commit to taking the signal before releasing the mutex.
   1867  1.243        ad 	 */
   1868  1.243        ad 	action = SIGACTION_PS(ps, signo).sa_handler;
   1869  1.275        ad 	l->l_ru.ru_nsignals++;
   1870  1.314  christos 	if (l->l_sigpendset == NULL) {
   1871  1.313  christos 		/* From the debugger */
   1872  1.332     kamil 		if (p->p_sigctx.ps_faked &&
   1873  1.332     kamil 		    signo == p->p_sigctx.ps_info._signo) {
   1874  1.332     kamil 			KSI_INIT(&ksi);
   1875  1.332     kamil 			ksi.ksi_info = p->p_sigctx.ps_info;
   1876  1.332     kamil 			ksi.ksi_lid = p->p_sigctx.ps_lwp;
   1877  1.332     kamil 			p->p_sigctx.ps_faked = false;
   1878  1.332     kamil 		} else {
   1879  1.332     kamil 			if (!siggetinfo(&l->l_sigpend, &ksi, signo))
   1880  1.332     kamil 				(void)siggetinfo(&p->p_sigpend, &ksi, signo);
   1881  1.332     kamil 		}
   1882  1.314  christos 	} else
   1883  1.314  christos 		sigget(l->l_sigpendset, &ksi, signo, NULL);
   1884  1.104   thorpej 
   1885  1.255        ad 	if (ktrpoint(KTR_PSIG)) {
   1886  1.277        ad 		mutex_exit(p->p_lock);
   1887  1.330    martin 		if (p->p_emul->e_ktrpsig)
   1888  1.330    martin 			p->p_emul->e_ktrpsig(signo, action,
   1889  1.330    martin 			    returnmask, &ksi);
   1890  1.330    martin 		else
   1891  1.330    martin 			ktrpsig(signo, action, returnmask, &ksi);
   1892  1.277        ad 		mutex_enter(p->p_lock);
   1893  1.243        ad 	}
   1894  1.130   thorpej 
   1895  1.320  christos 	SDT_PROBE(proc, kernel, , signal__handle, signo, &ksi, action, 0, 0);
   1896  1.320  christos 
   1897  1.243        ad 	if (action == SIG_DFL) {
   1898  1.175        cl 		/*
   1899  1.243        ad 		 * Default action, where the default is to kill
   1900  1.243        ad 		 * the process.  (Other cases were ignored above.)
   1901  1.175        cl 		 */
   1902  1.243        ad 		sigexit(l, signo);
   1903  1.243        ad 		return;
   1904  1.175        cl 	}
   1905  1.175        cl 
   1906  1.202     perry 	/*
   1907  1.243        ad 	 * If we get here, the signal must be caught.
   1908  1.130   thorpej 	 */
   1909  1.130   thorpej #ifdef DIAGNOSTIC
   1910  1.243        ad 	if (action == SIG_IGN || sigismember(&l->l_sigmask, signo))
   1911  1.243        ad 		panic("postsig action");
   1912  1.130   thorpej #endif
   1913  1.144      fvdl 
   1914  1.243        ad 	kpsendsig(l, &ksi, returnmask);
   1915   1.29       cgd }
   1916   1.29       cgd 
   1917  1.133   nathanw /*
   1918  1.290        ad  * sendsig:
   1919  1.290        ad  *
   1920  1.290        ad  *	Default signal delivery method for NetBSD.
   1921  1.290        ad  */
   1922  1.290        ad void
   1923  1.290        ad sendsig(const struct ksiginfo *ksi, const sigset_t *mask)
   1924  1.290        ad {
   1925  1.290        ad 	struct sigacts *sa;
   1926  1.290        ad 	int sig;
   1927  1.290        ad 
   1928  1.290        ad 	sig = ksi->ksi_signo;
   1929  1.290        ad 	sa = curproc->p_sigacts;
   1930  1.290        ad 
   1931  1.290        ad 	switch (sa->sa_sigdesc[sig].sd_vers)  {
   1932  1.290        ad 	case 0:
   1933  1.290        ad 	case 1:
   1934  1.290        ad 		/* Compat for 1.6 and earlier. */
   1935  1.290        ad 		if (sendsig_sigcontext_vec == NULL) {
   1936  1.290        ad 			break;
   1937  1.290        ad 		}
   1938  1.290        ad 		(*sendsig_sigcontext_vec)(ksi, mask);
   1939  1.290        ad 		return;
   1940  1.290        ad 	case 2:
   1941  1.291        ad 	case 3:
   1942  1.290        ad 		sendsig_siginfo(ksi, mask);
   1943  1.290        ad 		return;
   1944  1.290        ad 	default:
   1945  1.290        ad 		break;
   1946  1.290        ad 	}
   1947  1.290        ad 
   1948  1.290        ad 	printf("sendsig: bad version %d\n", sa->sa_sigdesc[sig].sd_vers);
   1949  1.290        ad 	sigexit(curlwp, SIGILL);
   1950  1.290        ad }
   1951  1.290        ad 
   1952  1.290        ad /*
   1953  1.243        ad  * sendsig_reset:
   1954  1.133   nathanw  *
   1955  1.243        ad  *	Reset the signal action.  Called from emulation specific sendsig()
   1956  1.243        ad  *	before unlocking to deliver the signal.
   1957   1.29       cgd  */
   1958   1.29       cgd void
   1959  1.243        ad sendsig_reset(struct lwp *l, int signo)
   1960   1.29       cgd {
   1961  1.243        ad 	struct proc *p = l->l_proc;
   1962  1.243        ad 	struct sigacts *ps = p->p_sigacts;
   1963   1.29       cgd 
   1964  1.277        ad 	KASSERT(mutex_owned(p->p_lock));
   1965  1.106   thorpej 
   1966  1.243        ad 	p->p_sigctx.ps_lwp = 0;
   1967  1.332     kamil 	memset(&p->p_sigctx.ps_info, 0, sizeof(p->p_sigctx.ps_info));
   1968  1.243        ad 
   1969  1.259        ad 	mutex_enter(&ps->sa_mutex);
   1970  1.317     rmind 	sigplusset(&SIGACTION_PS(ps, signo).sa_mask, &l->l_sigmask);
   1971  1.243        ad 	if (SIGACTION_PS(ps, signo).sa_flags & SA_RESETHAND) {
   1972  1.243        ad 		sigdelset(&p->p_sigctx.ps_sigcatch, signo);
   1973  1.243        ad 		if (signo != SIGCONT && sigprop[signo] & SA_IGNORE)
   1974  1.243        ad 			sigaddset(&p->p_sigctx.ps_sigignore, signo);
   1975  1.243        ad 		SIGACTION_PS(ps, signo).sa_handler = SIG_DFL;
   1976   1.29       cgd 	}
   1977  1.259        ad 	mutex_exit(&ps->sa_mutex);
   1978   1.29       cgd }
   1979   1.29       cgd 
   1980   1.29       cgd /*
   1981   1.29       cgd  * Kill the current process for stated reason.
   1982   1.29       cgd  */
   1983   1.52  christos void
   1984  1.122      manu killproc(struct proc *p, const char *why)
   1985   1.29       cgd {
   1986  1.276        ad 
   1987  1.276        ad 	KASSERT(mutex_owned(proc_lock));
   1988  1.276        ad 
   1989   1.29       cgd 	log(LOG_ERR, "pid %d was killed: %s\n", p->p_pid, why);
   1990  1.243        ad 	uprintf_locked("sorry, pid %d was killed: %s\n", p->p_pid, why);
   1991   1.29       cgd 	psignal(p, SIGKILL);
   1992   1.29       cgd }
   1993   1.29       cgd 
   1994   1.29       cgd /*
   1995   1.29       cgd  * Force the current process to exit with the specified signal, dumping core
   1996  1.243        ad  * if appropriate.  We bypass the normal tests for masked and caught
   1997  1.243        ad  * signals, allowing unrecoverable failures to terminate the process without
   1998  1.243        ad  * changing signal state.  Mark the accounting record with the signal
   1999  1.243        ad  * termination.  If dumping core, save the signal number for the debugger.
   2000  1.243        ad  * Calls exit and does not return.
   2001   1.29       cgd  */
   2002  1.243        ad void
   2003  1.243        ad sigexit(struct lwp *l, int signo)
   2004  1.243        ad {
   2005  1.323  christos 	int exitsig, error, docore;
   2006  1.243        ad 	struct proc *p;
   2007  1.243        ad 	struct lwp *t;
   2008   1.96      fair 
   2009  1.243        ad 	p = l->l_proc;
   2010   1.96      fair 
   2011  1.277        ad 	KASSERT(mutex_owned(p->p_lock));
   2012  1.243        ad 	KERNEL_UNLOCK_ALL(l, NULL);
   2013   1.96      fair 
   2014  1.243        ad 	/*
   2015  1.243        ad 	 * Don't permit coredump() multiple times in the same process.
   2016  1.243        ad 	 * Call back into sigexit, where we will be suspended until
   2017  1.243        ad 	 * the deed is done.  Note that this is a recursive call, but
   2018  1.246     pavel 	 * LW_WCORE will prevent us from coming back this way.
   2019  1.243        ad 	 */
   2020  1.243        ad 	if ((p->p_sflag & PS_WCORE) != 0) {
   2021  1.243        ad 		lwp_lock(l);
   2022  1.246     pavel 		l->l_flag |= (LW_WCORE | LW_WEXIT | LW_WSUSPEND);
   2023  1.243        ad 		lwp_unlock(l);
   2024  1.277        ad 		mutex_exit(p->p_lock);
   2025  1.243        ad 		lwp_userret(l);
   2026  1.281        ad 		panic("sigexit 1");
   2027  1.281        ad 		/* NOTREACHED */
   2028  1.281        ad 	}
   2029  1.281        ad 
   2030  1.281        ad 	/* If process is already on the way out, then bail now. */
   2031  1.281        ad 	if ((p->p_sflag & PS_WEXIT) != 0) {
   2032  1.281        ad 		mutex_exit(p->p_lock);
   2033  1.281        ad 		lwp_exit(l);
   2034  1.281        ad 		panic("sigexit 2");
   2035  1.243        ad 		/* NOTREACHED */
   2036  1.243        ad 	}
   2037  1.130   thorpej 
   2038  1.130   thorpej 	/*
   2039  1.243        ad 	 * Prepare all other LWPs for exit.  If dumping core, suspend them
   2040  1.243        ad 	 * so that their registers are available long enough to be dumped.
   2041  1.243        ad  	 */
   2042  1.243        ad 	if ((docore = (sigprop[signo] & SA_CORE)) != 0) {
   2043  1.243        ad 		p->p_sflag |= PS_WCORE;
   2044  1.243        ad 		for (;;) {
   2045  1.243        ad 			LIST_FOREACH(t, &p->p_lwps, l_sibling) {
   2046  1.243        ad 				lwp_lock(t);
   2047  1.243        ad 				if (t == l) {
   2048  1.246     pavel 					t->l_flag &= ~LW_WSUSPEND;
   2049  1.243        ad 					lwp_unlock(t);
   2050  1.243        ad 					continue;
   2051  1.243        ad 				}
   2052  1.246     pavel 				t->l_flag |= (LW_WCORE | LW_WEXIT);
   2053  1.243        ad 				lwp_suspend(l, t);
   2054  1.243        ad 			}
   2055  1.130   thorpej 
   2056  1.243        ad 			if (p->p_nrlwps == 1)
   2057  1.243        ad 				break;
   2058  1.130   thorpej 
   2059  1.243        ad 			/*
   2060  1.243        ad 			 * Kick any LWPs sitting in lwp_wait1(), and wait
   2061  1.243        ad 			 * for everyone else to stop before proceeding.
   2062  1.243        ad 			 */
   2063  1.243        ad 			p->p_nlwpwait++;
   2064  1.243        ad 			cv_broadcast(&p->p_lwpcv);
   2065  1.277        ad 			cv_wait(&p->p_lwpcv, p->p_lock);
   2066  1.243        ad 			p->p_nlwpwait--;
   2067  1.243        ad 		}
   2068  1.243        ad 	}
   2069  1.130   thorpej 
   2070  1.243        ad 	exitsig = signo;
   2071  1.243        ad 	p->p_acflag |= AXSIG;
   2072  1.332     kamil 	memset(&p->p_sigctx.ps_info, 0, sizeof(p->p_sigctx.ps_info));
   2073  1.332     kamil 	p->p_sigctx.ps_info._signo = signo;
   2074  1.332     kamil 	p->p_sigctx.ps_info._code = SI_NOINFO;
   2075  1.130   thorpej 
   2076  1.243        ad 	if (docore) {
   2077  1.281        ad 		mutex_exit(p->p_lock);
   2078  1.323  christos 		error = (*coredump_vec)(l, NULL);
   2079  1.102  sommerfe 
   2080  1.102  sommerfe 		if (kern_logsigexit) {
   2081  1.224        ad 			int uid = l->l_cred ?
   2082  1.224        ad 			    (int)kauth_cred_geteuid(l->l_cred) : -1;
   2083  1.102  sommerfe 
   2084  1.202     perry 			if (error)
   2085  1.102  sommerfe 				log(LOG_INFO, lognocoredump, p->p_pid,
   2086  1.243        ad 				    p->p_comm, uid, signo, error);
   2087  1.102  sommerfe 			else
   2088  1.102  sommerfe 				log(LOG_INFO, logcoredump, p->p_pid,
   2089  1.243        ad 				    p->p_comm, uid, signo);
   2090   1.96      fair 		}
   2091   1.96      fair 
   2092  1.240      elad #ifdef PAX_SEGVGUARD
   2093  1.249   thorpej 		pax_segvguard(l, p->p_textvp, p->p_comm, true);
   2094  1.240      elad #endif /* PAX_SEGVGUARD */
   2095  1.281        ad 		/* Acquire the sched state mutex.  exit1() will release it. */
   2096  1.281        ad 		mutex_enter(p->p_lock);
   2097  1.323  christos 		if (error == 0)
   2098  1.323  christos 			p->p_sflag |= PS_COREDUMP;
   2099   1.29       cgd 	}
   2100   1.96      fair 
   2101  1.243        ad 	/* No longer dumping core. */
   2102  1.243        ad 	p->p_sflag &= ~PS_WCORE;
   2103  1.243        ad 
   2104  1.323  christos 	exit1(l, 0, exitsig);
   2105   1.29       cgd 	/* NOTREACHED */
   2106   1.29       cgd }
   2107   1.29       cgd 
   2108   1.29       cgd /*
   2109  1.243        ad  * Put process 'p' into the stopped state and optionally, notify the parent.
   2110   1.29       cgd  */
   2111  1.243        ad void
   2112  1.334  christos proc_stop(struct proc *p, int signo)
   2113   1.29       cgd {
   2114  1.243        ad 	struct lwp *l;
   2115  1.112     lukem 
   2116  1.277        ad 	KASSERT(mutex_owned(p->p_lock));
   2117   1.29       cgd 
   2118   1.59       cgd 	/*
   2119  1.243        ad 	 * First off, set the stopping indicator and bring all sleeping
   2120  1.243        ad 	 * LWPs to a halt so they are included in p->p_nrlwps.  We musn't
   2121  1.243        ad 	 * unlock between here and the p->p_nrlwps check below.
   2122   1.59       cgd 	 */
   2123  1.333  christos 	p->p_sflag |= PS_STOPPING | PS_NOTIFYSTOP;
   2124  1.260        ad 	membar_producer();
   2125   1.59       cgd 
   2126  1.272      yamt 	proc_stop_lwps(p);
   2127   1.59       cgd 
   2128   1.59       cgd 	/*
   2129  1.243        ad 	 * If there are no LWPs available to take the signal, then we
   2130  1.243        ad 	 * signal the parent process immediately.  Otherwise, the last
   2131  1.243        ad 	 * LWP to stop will take care of it.
   2132   1.59       cgd 	 */
   2133   1.59       cgd 
   2134  1.334  christos 	if (p->p_nrlwps == 0) {
   2135  1.340     kamil 		proc_stop_done(p, PS_NOCLDSTOP);
   2136  1.243        ad 	} else {
   2137  1.243        ad 		/*
   2138  1.243        ad 		 * Have the remaining LWPs come to a halt, and trigger
   2139  1.243        ad 		 * proc_stop_callout() to ensure that they do.
   2140  1.243        ad 		 */
   2141  1.317     rmind 		LIST_FOREACH(l, &p->p_lwps, l_sibling) {
   2142  1.317     rmind 			sigpost(l, SIG_DFL, SA_STOP, signo);
   2143  1.317     rmind 		}
   2144  1.243        ad 		callout_schedule(&proc_stop_ch, 1);
   2145  1.169   hannken 	}
   2146   1.29       cgd }
   2147   1.29       cgd 
   2148   1.29       cgd /*
   2149  1.243        ad  * When stopping a process, we do not immediatly set sleeping LWPs stopped,
   2150  1.243        ad  * but wait for them to come to a halt at the kernel-user boundary.  This is
   2151  1.243        ad  * to allow LWPs to release any locks that they may hold before stopping.
   2152  1.243        ad  *
   2153  1.243        ad  * Non-interruptable sleeps can be long, and there is the potential for an
   2154  1.243        ad  * LWP to begin sleeping interruptably soon after the process has been set
   2155  1.243        ad  * stopping (PS_STOPPING).  These LWPs will not notice that the process is
   2156  1.243        ad  * stopping, and so complete halt of the process and the return of status
   2157  1.243        ad  * information to the parent could be delayed indefinitely.
   2158  1.243        ad  *
   2159  1.243        ad  * To handle this race, proc_stop_callout() runs once per tick while there
   2160  1.256        ad  * are stopping processes in the system.  It sets LWPs that are sleeping
   2161  1.243        ad  * interruptably into the LSSTOP state.
   2162  1.243        ad  *
   2163  1.243        ad  * Note that we are not concerned about keeping all LWPs stopped while the
   2164  1.243        ad  * process is stopped: stopped LWPs can awaken briefly to handle signals.
   2165  1.243        ad  * What we do need to ensure is that all LWPs in a stopping process have
   2166  1.243        ad  * stopped at least once, so that notification can be sent to the parent
   2167  1.243        ad  * process.
   2168   1.29       cgd  */
   2169  1.243        ad static void
   2170  1.243        ad proc_stop_callout(void *cookie)
   2171   1.29       cgd {
   2172  1.248   thorpej 	bool more, restart;
   2173  1.243        ad 	struct proc *p;
   2174   1.29       cgd 
   2175  1.243        ad 	(void)cookie;
   2176   1.94    bouyer 
   2177  1.243        ad 	do {
   2178  1.249   thorpej 		restart = false;
   2179  1.249   thorpej 		more = false;
   2180  1.130   thorpej 
   2181  1.276        ad 		mutex_enter(proc_lock);
   2182  1.243        ad 		PROCLIST_FOREACH(p, &allproc) {
   2183  1.277        ad 			mutex_enter(p->p_lock);
   2184  1.130   thorpej 
   2185  1.243        ad 			if ((p->p_sflag & PS_STOPPING) == 0) {
   2186  1.277        ad 				mutex_exit(p->p_lock);
   2187  1.243        ad 				continue;
   2188  1.243        ad 			}
   2189  1.130   thorpej 
   2190  1.243        ad 			/* Stop any LWPs sleeping interruptably. */
   2191  1.272      yamt 			proc_stop_lwps(p);
   2192  1.243        ad 			if (p->p_nrlwps == 0) {
   2193  1.243        ad 				/*
   2194  1.243        ad 				 * We brought the process to a halt.
   2195  1.243        ad 				 * Mark it as stopped and notify the
   2196  1.243        ad 				 * parent.
   2197  1.243        ad 				 */
   2198  1.243        ad 				if ((p->p_sflag & PS_NOTIFYSTOP) != 0) {
   2199  1.243        ad 					/*
   2200  1.272      yamt 					 * Note that proc_stop_done() will
   2201  1.277        ad 					 * drop p->p_lock briefly.
   2202  1.243        ad 					 * Arrange to restart and check
   2203  1.243        ad 					 * all processes again.
   2204  1.243        ad 					 */
   2205  1.249   thorpej 					restart = true;
   2206  1.243        ad 				}
   2207  1.340     kamil 				proc_stop_done(p, PS_NOCLDSTOP);
   2208  1.243        ad 			} else
   2209  1.249   thorpej 				more = true;
   2210  1.130   thorpej 
   2211  1.277        ad 			mutex_exit(p->p_lock);
   2212  1.243        ad 			if (restart)
   2213  1.243        ad 				break;
   2214  1.243        ad 		}
   2215  1.276        ad 		mutex_exit(proc_lock);
   2216  1.243        ad 	} while (restart);
   2217  1.185      matt 
   2218  1.130   thorpej 	/*
   2219  1.243        ad 	 * If we noted processes that are stopping but still have
   2220  1.243        ad 	 * running LWPs, then arrange to check again in 1 tick.
   2221  1.130   thorpej 	 */
   2222  1.243        ad 	if (more)
   2223  1.243        ad 		callout_schedule(&proc_stop_ch, 1);
   2224  1.108  jdolecek }
   2225  1.130   thorpej 
   2226  1.135  jdolecek /*
   2227  1.243        ad  * Given a process in state SSTOP, set the state back to SACTIVE and
   2228  1.243        ad  * move LSSTOP'd LWPs to LSSLEEP or make them runnable.
   2229  1.135  jdolecek  */
   2230  1.243        ad void
   2231  1.243        ad proc_unstop(struct proc *p)
   2232  1.135  jdolecek {
   2233  1.243        ad 	struct lwp *l;
   2234  1.243        ad 	int sig;
   2235  1.208      cube 
   2236  1.276        ad 	KASSERT(mutex_owned(proc_lock));
   2237  1.277        ad 	KASSERT(mutex_owned(p->p_lock));
   2238  1.135  jdolecek 
   2239  1.243        ad 	p->p_stat = SACTIVE;
   2240  1.243        ad 	p->p_sflag &= ~PS_STOPPING;
   2241  1.322  christos 	sig = p->p_xsig;
   2242  1.219       mrg 
   2243  1.243        ad 	if (!p->p_waited)
   2244  1.243        ad 		p->p_pptr->p_nstopchild--;
   2245  1.173  jdolecek 
   2246  1.243        ad 	LIST_FOREACH(l, &p->p_lwps, l_sibling) {
   2247  1.243        ad 		lwp_lock(l);
   2248  1.243        ad 		if (l->l_stat != LSSTOP) {
   2249  1.243        ad 			lwp_unlock(l);
   2250  1.243        ad 			continue;
   2251  1.171  jdolecek 		}
   2252  1.243        ad 		if (l->l_wchan == NULL) {
   2253  1.243        ad 			setrunnable(l);
   2254  1.243        ad 			continue;
   2255  1.241     enami 		}
   2256  1.246     pavel 		if (sig && (l->l_flag & LW_SINTR) != 0) {
   2257  1.301     rmind 			setrunnable(l);
   2258  1.301     rmind 			sig = 0;
   2259  1.250        ad 		} else {
   2260  1.250        ad 			l->l_stat = LSSLEEP;
   2261  1.250        ad 			p->p_nrlwps++;
   2262  1.243        ad 			lwp_unlock(l);
   2263  1.250        ad 		}
   2264  1.135  jdolecek 	}
   2265   1.29       cgd }
   2266  1.126  jdolecek 
   2267  1.334  christos void
   2268  1.334  christos proc_stoptrace(int trapno)
   2269  1.334  christos {
   2270  1.334  christos 	struct lwp *l = curlwp;
   2271  1.341     kamil 	struct proc *p = l->l_proc;
   2272  1.341     kamil 	struct sigacts *ps;
   2273  1.341     kamil 	sigset_t *mask;
   2274  1.341     kamil 	sig_t action;
   2275  1.341     kamil 	ksiginfo_t ksi;
   2276  1.341     kamil 	const int signo = SIGTRAP;
   2277  1.341     kamil 
   2278  1.341     kamil 	KASSERT((trapno == TRAP_SCE) || (trapno == TRAP_SCX));
   2279  1.341     kamil 
   2280  1.341     kamil 	KSI_INIT_TRAP(&ksi);
   2281  1.341     kamil 	ksi.ksi_lid = l->l_lid;
   2282  1.341     kamil 	ksi.ksi_info._signo = signo;
   2283  1.341     kamil 	ksi.ksi_info._code = trapno;
   2284  1.334  christos 
   2285  1.334  christos 	mutex_enter(p->p_lock);
   2286  1.334  christos 
   2287  1.341     kamil 	/* Needed for ktrace */
   2288  1.341     kamil 	ps = p->p_sigacts;
   2289  1.341     kamil 	action = SIGACTION_PS(ps, signo).sa_handler;
   2290  1.341     kamil 	mask = &l->l_sigmask;
   2291  1.341     kamil 
   2292  1.341     kamil 	/* initproc (PID1) cannot became a debugger */
   2293  1.341     kamil 	KASSERT(p->p_pptr != initproc);
   2294  1.341     kamil 
   2295  1.341     kamil 	KASSERT(ISSET(p->p_slflag, PSL_TRACED));
   2296  1.341     kamil 	KASSERT(ISSET(p->p_slflag, PSL_SYSCALL));
   2297  1.341     kamil 
   2298  1.341     kamil 	p->p_xsig = signo;
   2299  1.341     kamil 	p->p_sigctx.ps_lwp = ksi.ksi_lid;
   2300  1.341     kamil 	p->p_sigctx.ps_info = ksi.ksi_info;
   2301  1.341     kamil 	sigswitch(0, signo);
   2302  1.334  christos 	mutex_exit(p->p_lock);
   2303  1.341     kamil 
   2304  1.341     kamil 	if (ktrpoint(KTR_PSIG)) {
   2305  1.341     kamil 		if (p->p_emul->e_ktrpsig)
   2306  1.341     kamil 			p->p_emul->e_ktrpsig(signo, action, mask, &ksi);
   2307  1.341     kamil 		else
   2308  1.341     kamil 			ktrpsig(signo, action, mask, &ksi);
   2309  1.341     kamil 	}
   2310  1.334  christos }
   2311  1.334  christos 
   2312  1.126  jdolecek static int
   2313  1.126  jdolecek filt_sigattach(struct knote *kn)
   2314  1.126  jdolecek {
   2315  1.126  jdolecek 	struct proc *p = curproc;
   2316  1.126  jdolecek 
   2317  1.274        ad 	kn->kn_obj = p;
   2318  1.301     rmind 	kn->kn_flags |= EV_CLEAR;	/* automatically set */
   2319  1.126  jdolecek 
   2320  1.277        ad 	mutex_enter(p->p_lock);
   2321  1.126  jdolecek 	SLIST_INSERT_HEAD(&p->p_klist, kn, kn_selnext);
   2322  1.277        ad 	mutex_exit(p->p_lock);
   2323  1.126  jdolecek 
   2324  1.301     rmind 	return 0;
   2325  1.126  jdolecek }
   2326  1.126  jdolecek 
   2327  1.126  jdolecek static void
   2328  1.126  jdolecek filt_sigdetach(struct knote *kn)
   2329  1.126  jdolecek {
   2330  1.274        ad 	struct proc *p = kn->kn_obj;
   2331  1.126  jdolecek 
   2332  1.277        ad 	mutex_enter(p->p_lock);
   2333  1.126  jdolecek 	SLIST_REMOVE(&p->p_klist, kn, knote, kn_selnext);
   2334  1.277        ad 	mutex_exit(p->p_lock);
   2335  1.126  jdolecek }
   2336  1.126  jdolecek 
   2337  1.126  jdolecek /*
   2338  1.301     rmind  * Signal knotes are shared with proc knotes, so we apply a mask to
   2339  1.126  jdolecek  * the hint in order to differentiate them from process hints.  This
   2340  1.126  jdolecek  * could be avoided by using a signal-specific knote list, but probably
   2341  1.126  jdolecek  * isn't worth the trouble.
   2342  1.126  jdolecek  */
   2343  1.126  jdolecek static int
   2344  1.126  jdolecek filt_signal(struct knote *kn, long hint)
   2345  1.126  jdolecek {
   2346  1.126  jdolecek 
   2347  1.126  jdolecek 	if (hint & NOTE_SIGNAL) {
   2348  1.126  jdolecek 		hint &= ~NOTE_SIGNAL;
   2349  1.126  jdolecek 
   2350  1.126  jdolecek 		if (kn->kn_id == hint)
   2351  1.126  jdolecek 			kn->kn_data++;
   2352  1.126  jdolecek 	}
   2353  1.126  jdolecek 	return (kn->kn_data != 0);
   2354  1.126  jdolecek }
   2355  1.126  jdolecek 
   2356  1.126  jdolecek const struct filterops sig_filtops = {
   2357  1.338      maya 		.f_isfd = 0,
   2358  1.338      maya 		.f_attach = filt_sigattach,
   2359  1.338      maya 		.f_detach = filt_sigdetach,
   2360  1.338      maya 		.f_event = filt_signal,
   2361  1.126  jdolecek };
   2362