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