kern_exit.c revision 1.196 1 1.196 ad /* $NetBSD: kern_exit.c,v 1.196 2007/12/26 16:01:36 ad Exp $ */
2 1.56 thorpej
3 1.56 thorpej /*-
4 1.165 ad * Copyright (c) 1998, 1999, 2006, 2007 The NetBSD Foundation, Inc.
5 1.56 thorpej * All rights reserved.
6 1.58 christos *
7 1.56 thorpej * This code is derived from software contributed to The NetBSD Foundation
8 1.56 thorpej * by Jason R. Thorpe of the Numerical Aerospace Simulation Facility,
9 1.165 ad * NASA Ames Research Center, and by Andrew Doran.
10 1.56 thorpej *
11 1.56 thorpej * Redistribution and use in source and binary forms, with or without
12 1.56 thorpej * modification, are permitted provided that the following conditions
13 1.56 thorpej * are met:
14 1.56 thorpej * 1. Redistributions of source code must retain the above copyright
15 1.56 thorpej * notice, this list of conditions and the following disclaimer.
16 1.58 christos * 2. Redistributions in binary form must reproduce the above copyright
17 1.56 thorpej * notice, this list of conditions and the following disclaimer in the
18 1.56 thorpej * documentation and/or other materials provided with the distribution.
19 1.56 thorpej * 3. All advertising materials mentioning features or use of this software
20 1.56 thorpej * must display the following acknowledgement:
21 1.58 christos * This product includes software developed by the NetBSD
22 1.58 christos * Foundation, Inc. and its contributors.
23 1.56 thorpej * 4. Neither the name of The NetBSD Foundation nor the names of its
24 1.56 thorpej * contributors may be used to endorse or promote products derived
25 1.56 thorpej * from this software without specific prior written permission.
26 1.58 christos *
27 1.56 thorpej * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
28 1.56 thorpej * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
29 1.56 thorpej * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
30 1.56 thorpej * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
31 1.56 thorpej * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
32 1.56 thorpej * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
33 1.56 thorpej * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
34 1.56 thorpej * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
35 1.56 thorpej * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
36 1.56 thorpej * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
37 1.56 thorpej * POSSIBILITY OF SUCH DAMAGE.
38 1.56 thorpej */
39 1.24 cgd
40 1.24 cgd /*
41 1.24 cgd * Copyright (c) 1982, 1986, 1989, 1991, 1993
42 1.24 cgd * The Regents of the University of California. All rights reserved.
43 1.24 cgd * (c) UNIX System Laboratories, Inc.
44 1.24 cgd * All or some portions of this file are derived from material licensed
45 1.24 cgd * to the University of California by American Telephone and Telegraph
46 1.24 cgd * Co. or Unix System Laboratories, Inc. and are reproduced herein with
47 1.24 cgd * the permission of UNIX System Laboratories, Inc.
48 1.24 cgd *
49 1.24 cgd * Redistribution and use in source and binary forms, with or without
50 1.24 cgd * modification, are permitted provided that the following conditions
51 1.24 cgd * are met:
52 1.24 cgd * 1. Redistributions of source code must retain the above copyright
53 1.24 cgd * notice, this list of conditions and the following disclaimer.
54 1.24 cgd * 2. Redistributions in binary form must reproduce the above copyright
55 1.24 cgd * notice, this list of conditions and the following disclaimer in the
56 1.24 cgd * documentation and/or other materials provided with the distribution.
57 1.119 agc * 3. Neither the name of the University nor the names of its contributors
58 1.24 cgd * may be used to endorse or promote products derived from this software
59 1.24 cgd * without specific prior written permission.
60 1.24 cgd *
61 1.24 cgd * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
62 1.24 cgd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
63 1.24 cgd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
64 1.24 cgd * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
65 1.24 cgd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
66 1.24 cgd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
67 1.24 cgd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
68 1.24 cgd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
69 1.24 cgd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
70 1.24 cgd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
71 1.24 cgd * SUCH DAMAGE.
72 1.24 cgd *
73 1.49 fvdl * @(#)kern_exit.c 8.10 (Berkeley) 2/23/95
74 1.24 cgd */
75 1.92 lukem
76 1.92 lukem #include <sys/cdefs.h>
77 1.196 ad __KERNEL_RCSID(0, "$NetBSD: kern_exit.c,v 1.196 2007/12/26 16:01:36 ad Exp $");
78 1.48 mrg
79 1.51 thorpej #include "opt_ktrace.h"
80 1.97 briggs #include "opt_perfctrs.h"
81 1.94 christos #include "opt_systrace.h"
82 1.60 tron #include "opt_sysv.h"
83 1.24 cgd
84 1.24 cgd #include <sys/param.h>
85 1.174 rmind #include <sys/aio.h>
86 1.24 cgd #include <sys/systm.h>
87 1.24 cgd #include <sys/ioctl.h>
88 1.24 cgd #include <sys/tty.h>
89 1.24 cgd #include <sys/time.h>
90 1.24 cgd #include <sys/resource.h>
91 1.24 cgd #include <sys/kernel.h>
92 1.24 cgd #include <sys/proc.h>
93 1.24 cgd #include <sys/buf.h>
94 1.24 cgd #include <sys/wait.h>
95 1.24 cgd #include <sys/file.h>
96 1.24 cgd #include <sys/vnode.h>
97 1.24 cgd #include <sys/syslog.h>
98 1.24 cgd #include <sys/malloc.h>
99 1.53 thorpej #include <sys/pool.h>
100 1.24 cgd #include <sys/resourcevar.h>
101 1.98 briggs #if defined(PERFCTRS)
102 1.97 briggs #include <sys/pmc.h>
103 1.98 briggs #endif
104 1.24 cgd #include <sys/ptrace.h>
105 1.29 cgd #include <sys/acct.h>
106 1.36 christos #include <sys/filedesc.h>
107 1.100 gmcgarry #include <sys/ras.h>
108 1.36 christos #include <sys/signalvar.h>
109 1.64 ross #include <sys/sched.h>
110 1.26 cgd #include <sys/mount.h>
111 1.26 cgd #include <sys/syscallargs.h>
112 1.94 christos #include <sys/systrace.h>
113 1.156 elad #include <sys/kauth.h>
114 1.165 ad #include <sys/sleepq.h>
115 1.165 ad #include <sys/lockdebug.h>
116 1.165 ad #include <sys/ktrace.h>
117 1.189 ad #include <sys/cpu.h>
118 1.193 ad #include <sys/lwpctl.h>
119 1.194 ad #include <sys/atomic.h>
120 1.24 cgd
121 1.47 mrg #include <uvm/uvm_extern.h>
122 1.47 mrg
123 1.107 thorpej #define DEBUG_EXIT
124 1.107 thorpej
125 1.107 thorpej #ifdef DEBUG_EXIT
126 1.107 thorpej int debug_exit = 0;
127 1.107 thorpej #define DPRINTF(x) if (debug_exit) printf x
128 1.107 thorpej #else
129 1.107 thorpej #define DPRINTF(x)
130 1.107 thorpej #endif
131 1.107 thorpej
132 1.178 dsl static int find_stopped_child(struct proc *, pid_t, int, struct proc **, int *);
133 1.178 dsl static void proc_free(struct proc *, struct rusage *);
134 1.177 dsl
135 1.123 christos /*
136 1.132 jdolecek * Fill in the appropriate signal information, and signal the parent.
137 1.123 christos */
138 1.123 christos static void
139 1.162 yamt exit_psignal(struct proc *p, struct proc *pp, ksiginfo_t *ksi)
140 1.123 christos {
141 1.123 christos
142 1.163 yamt KSI_INIT(ksi);
143 1.140 pk if ((ksi->ksi_signo = P_EXITSIG(p)) == SIGCHLD) {
144 1.123 christos if (WIFSIGNALED(p->p_xstat)) {
145 1.123 christos if (WCOREDUMP(p->p_xstat))
146 1.140 pk ksi->ksi_code = CLD_DUMPED;
147 1.123 christos else
148 1.140 pk ksi->ksi_code = CLD_KILLED;
149 1.123 christos } else {
150 1.140 pk ksi->ksi_code = CLD_EXITED;
151 1.123 christos }
152 1.123 christos }
153 1.123 christos /*
154 1.165 ad * We fill those in, even for non-SIGCHLD.
155 1.165 ad * It's safe to access p->p_cred unlocked here.
156 1.123 christos */
157 1.140 pk ksi->ksi_pid = p->p_pid;
158 1.156 elad ksi->ksi_uid = kauth_cred_geteuid(p->p_cred);
159 1.140 pk ksi->ksi_status = p->p_xstat;
160 1.123 christos /* XXX: is this still valid? */
161 1.175 dsl ksi->ksi_utime = p->p_stats->p_ru.ru_utime.tv_sec;
162 1.175 dsl ksi->ksi_stime = p->p_stats->p_ru.ru_stime.tv_sec;
163 1.123 christos }
164 1.94 christos
165 1.24 cgd /*
166 1.24 cgd * exit --
167 1.24 cgd * Death of process.
168 1.24 cgd */
169 1.31 thorpej int
170 1.195 dsl sys_exit(struct lwp *l, const struct sys_exit_args *uap, register_t *retval)
171 1.31 thorpej {
172 1.195 dsl /* {
173 1.89 lukem syscallarg(int) rval;
174 1.195 dsl } */
175 1.165 ad struct proc *p = l->l_proc;
176 1.24 cgd
177 1.165 ad /* Don't call exit1() multiple times in the same process. */
178 1.165 ad mutex_enter(&p->p_smutex);
179 1.165 ad if (p->p_sflag & PS_WEXIT) {
180 1.165 ad mutex_exit(&p->p_smutex);
181 1.107 thorpej lwp_exit(l);
182 1.165 ad }
183 1.107 thorpej
184 1.165 ad /* exit1() will release the mutex. */
185 1.107 thorpej exit1(l, W_EXITCODE(SCARG(uap, rval), 0));
186 1.24 cgd /* NOTREACHED */
187 1.31 thorpej return (0);
188 1.24 cgd }
189 1.24 cgd
190 1.24 cgd /*
191 1.24 cgd * Exit: deallocate address space and other resources, change proc state
192 1.24 cgd * to zombie, and unlink proc from allproc and parent's lists. Save exit
193 1.24 cgd * status and rusage for wait(). Check for child processes and orphan them.
194 1.165 ad *
195 1.165 ad * Must be called with p->p_smutex held. Does not return.
196 1.24 cgd */
197 1.31 thorpej void
198 1.107 thorpej exit1(struct lwp *l, int rv)
199 1.24 cgd {
200 1.107 thorpej struct proc *p, *q, *nq;
201 1.140 pk ksiginfo_t ksi;
202 1.165 ad ksiginfoq_t kq;
203 1.192 ad int wakeinit;
204 1.24 cgd
205 1.107 thorpej p = l->l_proc;
206 1.107 thorpej
207 1.172 ad KASSERT(mutex_owned(&p->p_smutex));
208 1.165 ad
209 1.78 thorpej if (__predict_false(p == initproc))
210 1.24 cgd panic("init died (signal %d, exit %d)",
211 1.24 cgd WTERMSIG(rv), WEXITSTATUS(rv));
212 1.73 thorpej
213 1.165 ad p->p_sflag |= PS_WEXIT;
214 1.165 ad
215 1.165 ad /*
216 1.165 ad * Force all other LWPs to exit before we do. Only then can we
217 1.165 ad * begin to tear down the rest of the process state.
218 1.165 ad */
219 1.165 ad if (p->p_nlwps > 1)
220 1.165 ad exit_lwps(l);
221 1.165 ad
222 1.165 ad ksiginfo_queue_init(&kq);
223 1.165 ad
224 1.165 ad /*
225 1.165 ad * If we have been asked to stop on exit, do so now.
226 1.165 ad */
227 1.165 ad if (p->p_sflag & PS_STOPEXIT) {
228 1.165 ad KERNEL_UNLOCK_ALL(l, &l->l_biglocks);
229 1.165 ad sigclearall(p, &contsigmask, &kq);
230 1.165 ad p->p_waited = 0;
231 1.194 ad membar_producer();
232 1.130 atatat p->p_stat = SSTOP;
233 1.165 ad lwp_lock(l);
234 1.165 ad p->p_nrlwps--;
235 1.130 atatat l->l_stat = LSSTOP;
236 1.165 ad mutex_exit(&p->p_smutex);
237 1.179 yamt mi_switch(l);
238 1.165 ad KERNEL_LOCK(l->l_biglocks, l);
239 1.165 ad } else
240 1.165 ad mutex_exit(&p->p_smutex);
241 1.165 ad
242 1.193 ad /* Destroy any lwpctl info. */
243 1.193 ad if (p->p_lwpctl != NULL)
244 1.193 ad lwp_ctl_exit();
245 1.193 ad
246 1.174 rmind /* Destroy all AIO works */
247 1.180 rmind aio_exit(p, p->p_aio);
248 1.174 rmind
249 1.165 ad /*
250 1.165 ad * Drain all remaining references that procfs, ptrace and others may
251 1.165 ad * have on the process.
252 1.165 ad */
253 1.191 ad rw_enter(&p->p_reflock, RW_WRITER);
254 1.112 nathanw
255 1.107 thorpej /*
256 1.165 ad * Bin any remaining signals and mark the process as dying so it will
257 1.165 ad * not be found for, e.g. signals.
258 1.107 thorpej */
259 1.165 ad mutex_enter(&p->p_smutex);
260 1.165 ad sigfillset(&p->p_sigctx.ps_sigignore);
261 1.165 ad sigclearall(p, NULL, &kq);
262 1.165 ad p->p_stat = SDYING;
263 1.165 ad mutex_exit(&p->p_smutex);
264 1.165 ad ksiginfo_queue_drain(&kq);
265 1.165 ad
266 1.165 ad DPRINTF(("exit1: %d.%d exiting.\n", p->p_pid, l->l_lid));
267 1.107 thorpej
268 1.24 cgd #ifdef PGINPROF
269 1.24 cgd vmsizmon();
270 1.24 cgd #endif
271 1.107 thorpej timers_free(p, TIMERS_ALL);
272 1.100 gmcgarry #if defined(__HAVE_RAS)
273 1.190 ad ras_purgeall();
274 1.100 gmcgarry #endif
275 1.24 cgd
276 1.24 cgd /*
277 1.165 ad * Close open files, release open-file table and free signal
278 1.165 ad * actions. This may block!
279 1.24 cgd */
280 1.154 christos fdfree(l);
281 1.141 pk cwdfree(p->p_cwdi);
282 1.165 ad p->p_cwdi = NULL;
283 1.93 christos doexithooks(p);
284 1.165 ad sigactsfree(p->p_sigacts);
285 1.157 ad
286 1.157 ad /*
287 1.164 ad * Write out accounting data.
288 1.157 ad */
289 1.154 christos (void)acct_process(l);
290 1.157 ad
291 1.24 cgd #ifdef KTRACE
292 1.145 perry /*
293 1.157 ad * Release trace file.
294 1.24 cgd */
295 1.165 ad if (p->p_tracep != NULL) {
296 1.185 ad mutex_enter(&ktrace_lock);
297 1.165 ad ktrderef(p);
298 1.185 ad mutex_exit(&ktrace_lock);
299 1.165 ad }
300 1.94 christos #endif
301 1.94 christos #ifdef SYSTRACE
302 1.94 christos systrace_sys_exit(p);
303 1.24 cgd #endif
304 1.157 ad
305 1.24 cgd /*
306 1.99 manu * If emulation has process exit hook, call it now.
307 1.158 manu * Set the exit status now so that the exit hook has
308 1.158 manu * an opportunity to tweak it (COMPAT_LINUX requires
309 1.158 manu * this for thread group emulation)
310 1.99 manu */
311 1.158 manu p->p_xstat = rv;
312 1.99 manu if (p->p_emul->e_proc_exit)
313 1.99 manu (*p->p_emul->e_proc_exit)(p);
314 1.99 manu
315 1.165 ad /* Collect child u-areas. */
316 1.168 thorpej uvm_uarea_drain(false);
317 1.165 ad
318 1.160 thorpej /*
319 1.140 pk * Free the VM resources we're still holding on to.
320 1.140 pk * We must do this from a valid thread because doing
321 1.140 pk * so may block. This frees vmspace, which we don't
322 1.140 pk * need anymore. The only remaining lwp is the one
323 1.140 pk * we run at this moment, nothing runs in userland
324 1.140 pk * anymore.
325 1.140 pk */
326 1.140 pk uvm_proc_exit(p);
327 1.140 pk
328 1.140 pk /*
329 1.183 ad * While we can still block, and mark the LWP as unswappable to
330 1.183 ad * prevent conflicts with the with the swapper. We also shouldn't
331 1.183 ad * be swapped out, because we are about to exit and will release
332 1.183 ad * memory.
333 1.183 ad */
334 1.183 ad uvm_lwp_hold(l);
335 1.183 ad
336 1.183 ad /*
337 1.165 ad * Stop profiling.
338 1.140 pk */
339 1.165 ad if ((p->p_stflag & PST_PROFIL) != 0) {
340 1.165 ad mutex_spin_enter(&p->p_stmutex);
341 1.165 ad stopprofclock(p);
342 1.165 ad mutex_spin_exit(&p->p_stmutex);
343 1.165 ad }
344 1.140 pk
345 1.140 pk /*
346 1.165 ad * If parent is waiting for us to exit or exec, P_PPWAIT is set; we
347 1.165 ad * wake up the parent early to avoid deadlock. We can do this once
348 1.165 ad * the VM resources are released.
349 1.140 pk */
350 1.169 ad mutex_enter(&proclist_lock);
351 1.165 ad
352 1.165 ad mutex_enter(&p->p_smutex);
353 1.165 ad if (p->p_sflag & PS_PPWAIT) {
354 1.165 ad p->p_sflag &= ~PS_PPWAIT;
355 1.184 ad cv_broadcast(&p->p_pptr->p_waitcv);
356 1.165 ad }
357 1.165 ad mutex_exit(&p->p_smutex);
358 1.165 ad
359 1.165 ad if (SESS_LEADER(p)) {
360 1.165 ad struct vnode *vprele = NULL, *vprevoke = NULL;
361 1.165 ad struct session *sp = p->p_session;
362 1.165 ad struct tty *tp;
363 1.165 ad
364 1.165 ad if (sp->s_ttyvp) {
365 1.165 ad /*
366 1.165 ad * Controlling process.
367 1.165 ad * Signal foreground pgrp,
368 1.165 ad * drain controlling terminal
369 1.165 ad * and revoke access to controlling terminal.
370 1.165 ad */
371 1.165 ad tp = sp->s_ttyp;
372 1.192 ad mutex_spin_enter(&tty_lock);
373 1.165 ad if (tp->t_session == sp) {
374 1.165 ad if (tp->t_pgrp) {
375 1.165 ad mutex_enter(&proclist_mutex);
376 1.165 ad pgsignal(tp->t_pgrp, SIGHUP, 1);
377 1.165 ad mutex_exit(&proclist_mutex);
378 1.165 ad }
379 1.165 ad /* we can't guarantee the revoke will do this */
380 1.165 ad tp->t_pgrp = NULL;
381 1.165 ad tp->t_session = NULL;
382 1.192 ad mutex_spin_exit(&tty_lock);
383 1.165 ad SESSRELE(sp);
384 1.169 ad mutex_exit(&proclist_lock);
385 1.165 ad (void) ttywait(tp);
386 1.169 ad mutex_enter(&proclist_lock);
387 1.165 ad
388 1.165 ad /*
389 1.165 ad * The tty could have been revoked
390 1.165 ad * if we blocked.
391 1.165 ad */
392 1.165 ad vprevoke = sp->s_ttyvp;
393 1.192 ad } else
394 1.192 ad mutex_spin_exit(&tty_lock);
395 1.165 ad vprele = sp->s_ttyvp;
396 1.165 ad sp->s_ttyvp = NULL;
397 1.165 ad /*
398 1.165 ad * s_ttyp is not zero'd; we use this to indicate
399 1.165 ad * that the session once had a controlling terminal.
400 1.165 ad * (for logging and informational purposes)
401 1.165 ad */
402 1.165 ad }
403 1.165 ad sp->s_leader = NULL;
404 1.140 pk
405 1.165 ad if (vprevoke != NULL || vprele != NULL) {
406 1.169 ad mutex_exit(&proclist_lock);
407 1.165 ad if (vprevoke != NULL)
408 1.165 ad VOP_REVOKE(vprevoke, REVOKEALL);
409 1.165 ad if (vprele != NULL)
410 1.165 ad vrele(vprele);
411 1.169 ad mutex_enter(&proclist_lock);
412 1.165 ad }
413 1.165 ad }
414 1.165 ad mutex_enter(&proclist_mutex);
415 1.165 ad fixjobc(p, p->p_pgrp, 0);
416 1.165 ad mutex_exit(&proclist_mutex);
417 1.140 pk
418 1.140 pk /*
419 1.171 ad * Finalize the last LWP's specificdata, as well as the
420 1.171 ad * specificdata for the proc itself.
421 1.171 ad */
422 1.171 ad lwp_finispecific(l);
423 1.171 ad proc_finispecific(p);
424 1.171 ad
425 1.171 ad /*
426 1.140 pk * Notify interested parties of our demise.
427 1.140 pk */
428 1.140 pk KNOTE(&p->p_klist, NOTE_EXIT);
429 1.140 pk
430 1.196 ad
431 1.140 pk #if PERFCTRS
432 1.140 pk /*
433 1.140 pk * Save final PMC information in parent process & clean up.
434 1.140 pk */
435 1.140 pk if (PMC_ENABLED(p)) {
436 1.140 pk pmc_save_context(p);
437 1.140 pk pmc_accumulate(p->p_pptr, p);
438 1.140 pk pmc_process_exit(p);
439 1.140 pk }
440 1.140 pk #endif
441 1.140 pk
442 1.140 pk /*
443 1.128 dsl * Reset p_opptr pointer of all former children which got
444 1.128 dsl * traced by another process and were reparented. We reset
445 1.128 dsl * it to NULL here; the trace detach code then reparents
446 1.128 dsl * the child to initproc. We only check allproc list, since
447 1.128 dsl * eventual former children on zombproc list won't reference
448 1.128 dsl * p_opptr anymore.
449 1.128 dsl */
450 1.165 ad if (p->p_slflag & PSL_CHTRACED) {
451 1.143 yamt PROCLIST_FOREACH(q, &allproc) {
452 1.128 dsl if (q->p_opptr == p)
453 1.128 dsl q->p_opptr = NULL;
454 1.128 dsl }
455 1.128 dsl }
456 1.128 dsl
457 1.128 dsl /*
458 1.72 thorpej * Give orphaned children to init(8).
459 1.72 thorpej */
460 1.101 matt q = LIST_FIRST(&p->p_children);
461 1.165 ad wakeinit = (q != NULL);
462 1.132 jdolecek for (; q != NULL; q = nq) {
463 1.101 matt nq = LIST_NEXT(q, p_sibling);
464 1.104 jdolecek
465 1.24 cgd /*
466 1.104 jdolecek * Traced processes are killed since their existence
467 1.104 jdolecek * means someone is screwing up. Since we reset the
468 1.104 jdolecek * trace flags, the logic in sys_wait4() would not be
469 1.104 jdolecek * triggered to reparent the process to its
470 1.106 jdolecek * original parent, so we must do this here.
471 1.24 cgd */
472 1.165 ad if (q->p_slflag & PSL_TRACED) {
473 1.165 ad mutex_enter(&p->p_smutex);
474 1.165 ad q->p_slflag &= ~(PSL_TRACED|PSL_FSTRACE|PSL_SYSCALL);
475 1.165 ad mutex_exit(&p->p_smutex);
476 1.104 jdolecek if (q->p_opptr != q->p_pptr) {
477 1.104 jdolecek struct proc *t = q->p_opptr;
478 1.104 jdolecek proc_reparent(q, t ? t : initproc);
479 1.104 jdolecek q->p_opptr = NULL;
480 1.105 jdolecek } else
481 1.105 jdolecek proc_reparent(q, initproc);
482 1.153 jdolecek killproc(q, "orphaned traced process");
483 1.165 ad } else
484 1.104 jdolecek proc_reparent(q, initproc);
485 1.24 cgd }
486 1.115 dsl
487 1.115 dsl /*
488 1.165 ad * Move proc from allproc to zombproc, it's now nearly ready to be
489 1.165 ad * collected by parent.
490 1.115 dsl */
491 1.165 ad mutex_enter(&proclist_mutex);
492 1.165 ad LIST_REMOVE(l, l_list);
493 1.115 dsl LIST_REMOVE(p, p_list);
494 1.115 dsl LIST_INSERT_HEAD(&zombproc, p, p_list);
495 1.133 jdolecek
496 1.165 ad /*
497 1.165 ad * Mark the process as dead. We must do this before we signal
498 1.165 ad * the parent.
499 1.165 ad */
500 1.165 ad p->p_stat = SDEAD;
501 1.133 jdolecek
502 1.133 jdolecek /* Put in front of parent's sibling list for parent to collect it */
503 1.133 jdolecek q = p->p_pptr;
504 1.133 jdolecek q->p_nstopchild++;
505 1.133 jdolecek if (LIST_FIRST(&q->p_children) != p) {
506 1.133 jdolecek /* Put child where it can be found quickly */
507 1.133 jdolecek LIST_REMOVE(p, p_sibling);
508 1.133 jdolecek LIST_INSERT_HEAD(&q->p_children, p, p_sibling);
509 1.133 jdolecek }
510 1.165 ad mutex_exit(&proclist_mutex);
511 1.133 jdolecek
512 1.59 christos /*
513 1.59 christos * Notify parent that we're gone. If parent has the P_NOCLDWAIT
514 1.59 christos * flag set, notify init instead (and hope it will handle
515 1.59 christos * this situation).
516 1.59 christos */
517 1.165 ad mutex_enter(&q->p_mutex);
518 1.167 pavel if (q->p_flag & (PK_NOCLDWAIT|PK_CLDSIGIGN)) {
519 1.59 christos proc_reparent(p, initproc);
520 1.165 ad wakeinit = 1;
521 1.133 jdolecek
522 1.59 christos /*
523 1.59 christos * If this was the last child of our parent, notify
524 1.59 christos * parent, so in case he was wait(2)ing, he will
525 1.59 christos * continue.
526 1.59 christos */
527 1.140 pk if (LIST_FIRST(&q->p_children) == NULL)
528 1.184 ad cv_broadcast(&q->p_waitcv);
529 1.59 christos }
530 1.165 ad mutex_exit(&q->p_mutex);
531 1.24 cgd
532 1.140 pk /* Reload parent pointer, since p may have been reparented above */
533 1.140 pk q = p->p_pptr;
534 1.140 pk
535 1.165 ad if ((p->p_slflag & PSL_FSTRACE) == 0 && p->p_exitsig != 0) {
536 1.140 pk exit_psignal(p, q, &ksi);
537 1.165 ad mutex_enter(&proclist_mutex);
538 1.165 ad kpsignal(q, &ksi, NULL);
539 1.165 ad mutex_exit(&proclist_mutex);
540 1.140 pk }
541 1.140 pk
542 1.175 dsl /* Calculate the final rusage info. */
543 1.175 dsl calcru(p, &p->p_stats->p_ru.ru_utime, &p->p_stats->p_ru.ru_stime,
544 1.175 dsl NULL, NULL);
545 1.140 pk
546 1.165 ad if (wakeinit)
547 1.184 ad cv_broadcast(&initproc->p_waitcv);
548 1.165 ad
549 1.187 ad callout_destroy(&l->l_timeout_ch);
550 1.183 ad
551 1.165 ad /*
552 1.165 ad * Remaining lwp resources will be freed in lwp_exit2() once we've
553 1.165 ad * switch to idle context; at that point, we will be marked as a
554 1.165 ad * full blown zombie.
555 1.165 ad *
556 1.165 ad * XXXSMP disable preemption.
557 1.165 ad */
558 1.165 ad mutex_enter(&p->p_smutex);
559 1.165 ad lwp_drainrefs(l);
560 1.165 ad lwp_lock(l);
561 1.165 ad l->l_prflag &= ~LPR_DETACHED;
562 1.165 ad l->l_stat = LSZOMB;
563 1.165 ad lwp_unlock(l);
564 1.165 ad KASSERT(curlwp == l);
565 1.165 ad KASSERT(p->p_nrlwps == 1);
566 1.165 ad KASSERT(p->p_nlwps == 1);
567 1.165 ad p->p_stat = SZOMB;
568 1.165 ad p->p_nrlwps--;
569 1.165 ad p->p_nzlwps++;
570 1.165 ad p->p_ndlwps = 0;
571 1.165 ad mutex_exit(&p->p_smutex);
572 1.140 pk
573 1.165 ad /*
574 1.165 ad * Signal the parent to collect us, and drop the proclist lock.
575 1.191 ad * Drop debugger/procfs lock; no new references can be gained.
576 1.165 ad */
577 1.184 ad cv_broadcast(&p->p_pptr->p_waitcv);
578 1.169 ad mutex_exit(&proclist_lock);
579 1.191 ad rw_exit(&p->p_reflock);
580 1.140 pk
581 1.165 ad /* Verify that we hold no locks other than the kernel lock. */
582 1.165 ad #ifdef MULTIPROCESSOR
583 1.165 ad LOCKDEBUG_BARRIER(&kernel_lock, 0);
584 1.165 ad #else
585 1.165 ad LOCKDEBUG_BARRIER(NULL, 0);
586 1.165 ad #endif
587 1.85 thorpej
588 1.165 ad /*
589 1.165 ad * NOTE: WE ARE NO LONGER ALLOWED TO SLEEP!
590 1.165 ad */
591 1.157 ad
592 1.165 ad /*
593 1.165 ad * Give machine-dependent code a chance to free any MD LWP
594 1.165 ad * resources. This must be done before uvm_lwp_exit(), in
595 1.165 ad * case these resources are in the PCB.
596 1.165 ad */
597 1.165 ad #ifndef __NO_CPU_LWP_FREE
598 1.165 ad cpu_lwp_free(l, 1);
599 1.133 jdolecek #endif
600 1.165 ad pmap_deactivate(l);
601 1.133 jdolecek
602 1.140 pk /* This process no longer needs to hold the kernel lock. */
603 1.165 ad #ifdef notyet
604 1.165 ad /* XXXSMP hold in lwp_userret() */
605 1.165 ad KERNEL_UNLOCK_LAST(l);
606 1.165 ad #else
607 1.165 ad KERNEL_UNLOCK_ALL(l, NULL);
608 1.165 ad #endif
609 1.140 pk
610 1.179 yamt lwp_exit_switchaway(l);
611 1.107 thorpej }
612 1.107 thorpej
613 1.107 thorpej void
614 1.107 thorpej exit_lwps(struct lwp *l)
615 1.107 thorpej {
616 1.107 thorpej struct proc *p;
617 1.107 thorpej struct lwp *l2;
618 1.165 ad int error;
619 1.165 ad lwpid_t waited;
620 1.165 ad #if defined(MULTIPROCESSOR)
621 1.165 ad int nlocks;
622 1.165 ad #endif
623 1.165 ad
624 1.165 ad KERNEL_UNLOCK_ALL(l, &nlocks);
625 1.107 thorpej
626 1.107 thorpej p = l->l_proc;
627 1.181 yamt KASSERT(mutex_owned(&p->p_smutex));
628 1.107 thorpej
629 1.165 ad retry:
630 1.107 thorpej /*
631 1.107 thorpej * Interrupt LWPs in interruptable sleep, unsuspend suspended
632 1.165 ad * LWPs and then wait for everyone else to finish.
633 1.107 thorpej */
634 1.107 thorpej LIST_FOREACH(l2, &p->p_lwps, l_sibling) {
635 1.165 ad if (l2 == l)
636 1.165 ad continue;
637 1.165 ad lwp_lock(l2);
638 1.167 pavel l2->l_flag |= LW_WEXIT;
639 1.167 pavel if ((l2->l_stat == LSSLEEP && (l2->l_flag & LW_SINTR)) ||
640 1.118 fvdl l2->l_stat == LSSUSPENDED || l2->l_stat == LSSTOP) {
641 1.165 ad /* setrunnable() will release the lock. */
642 1.107 thorpej setrunnable(l2);
643 1.107 thorpej DPRINTF(("exit_lwps: Made %d.%d runnable\n",
644 1.107 thorpej p->p_pid, l2->l_lid));
645 1.165 ad continue;
646 1.107 thorpej }
647 1.165 ad lwp_unlock(l2);
648 1.107 thorpej }
649 1.107 thorpej while (p->p_nlwps > 1) {
650 1.165 ad DPRINTF(("exit_lwps: waiting for %d LWPs (%d zombies)\n",
651 1.165 ad p->p_nlwps, p->p_nzlwps));
652 1.107 thorpej error = lwp_wait1(l, 0, &waited, LWPWAIT_EXITCONTROL);
653 1.165 ad if (p->p_nlwps == 1)
654 1.165 ad break;
655 1.150 yamt if (error == EDEADLK) {
656 1.150 yamt /*
657 1.150 yamt * LWPs can get suspended/slept behind us.
658 1.150 yamt * (eg. sa_setwoken)
659 1.150 yamt * kick them again and retry.
660 1.150 yamt */
661 1.150 yamt goto retry;
662 1.150 yamt }
663 1.107 thorpej if (error)
664 1.147 christos panic("exit_lwps: lwp_wait1 failed with error %d",
665 1.107 thorpej error);
666 1.107 thorpej DPRINTF(("exit_lwps: Got LWP %d from lwp_wait1()\n", waited));
667 1.145 perry }
668 1.107 thorpej
669 1.181 yamt #if defined(MULTIPROCESSOR)
670 1.181 yamt if (nlocks > 0) {
671 1.181 yamt mutex_exit(&p->p_smutex);
672 1.181 yamt KERNEL_LOCK(nlocks, l);
673 1.181 yamt mutex_enter(&p->p_smutex);
674 1.181 yamt }
675 1.181 yamt #endif /* defined(MULTIPROCESSOR) */
676 1.181 yamt KASSERT(p->p_nlwps == 1);
677 1.24 cgd }
678 1.24 cgd
679 1.24 cgd int
680 1.177 dsl do_sys_wait(struct lwp *l, int *pid, int *status, int options,
681 1.177 dsl struct rusage *ru, int *was_zombie)
682 1.177 dsl {
683 1.177 dsl struct proc *child;
684 1.177 dsl int error;
685 1.177 dsl
686 1.177 dsl mutex_enter(&proclist_lock);
687 1.177 dsl
688 1.177 dsl error = find_stopped_child(l->l_proc, *pid, options, &child, status);
689 1.177 dsl
690 1.177 dsl if (child == NULL) {
691 1.177 dsl mutex_exit(&proclist_lock);
692 1.177 dsl *pid = 0;
693 1.177 dsl return error;
694 1.177 dsl }
695 1.177 dsl
696 1.177 dsl *pid = child->p_pid;
697 1.177 dsl
698 1.177 dsl if (child->p_stat == SZOMB) {
699 1.177 dsl /* proc_free() will release the proclist_lock. */
700 1.177 dsl *was_zombie = 1;
701 1.177 dsl if (options & WNOWAIT)
702 1.177 dsl mutex_exit(&proclist_lock);
703 1.177 dsl else {
704 1.177 dsl KERNEL_LOCK(1, l); /* XXXSMP */
705 1.178 dsl proc_free(child, ru);
706 1.177 dsl KERNEL_UNLOCK_ONE(l); /* XXXSMP */
707 1.177 dsl }
708 1.177 dsl } else {
709 1.177 dsl /* Child state must have been SSTOP. */
710 1.177 dsl *was_zombie = 0;
711 1.177 dsl mutex_exit(&proclist_lock);
712 1.177 dsl *status = W_STOPCODE(*status);
713 1.177 dsl }
714 1.177 dsl
715 1.177 dsl return 0;
716 1.177 dsl }
717 1.177 dsl
718 1.177 dsl int
719 1.195 dsl sys_wait4(struct lwp *l, const struct sys_wait4_args *uap, register_t *retval)
720 1.31 thorpej {
721 1.195 dsl /* {
722 1.89 lukem syscallarg(int) pid;
723 1.89 lukem syscallarg(int *) status;
724 1.89 lukem syscallarg(int) options;
725 1.89 lukem syscallarg(struct rusage *) rusage;
726 1.195 dsl } */
727 1.109 dsl int status, error;
728 1.177 dsl int was_zombie;
729 1.166 ad struct rusage ru;
730 1.195 dsl int pid = SCARG(uap, pid);
731 1.24 cgd
732 1.195 dsl error = do_sys_wait(l, &pid, &status, SCARG(uap, options),
733 1.177 dsl SCARG(uap, rusage) != NULL ? &ru : NULL, &was_zombie);
734 1.107 thorpej
735 1.195 dsl retval[0] = pid;
736 1.195 dsl if (pid == 0)
737 1.109 dsl return error;
738 1.165 ad
739 1.177 dsl if (SCARG(uap, rusage))
740 1.177 dsl error = copyout(&ru, SCARG(uap, rusage), sizeof(ru));
741 1.109 dsl
742 1.177 dsl if (error == 0 && SCARG(uap, status))
743 1.177 dsl error = copyout(&status, SCARG(uap, status), sizeof(status));
744 1.109 dsl
745 1.177 dsl return error;
746 1.109 dsl }
747 1.109 dsl
748 1.109 dsl /*
749 1.109 dsl * Scan list of child processes for a child process that has stopped or
750 1.109 dsl * exited. Used by sys_wait4 and 'compat' equivalents.
751 1.165 ad *
752 1.169 ad * Must be called with the proclist_lock held, and may release
753 1.165 ad * while waiting.
754 1.109 dsl */
755 1.177 dsl static int
756 1.109 dsl find_stopped_child(struct proc *parent, pid_t pid, int options,
757 1.165 ad struct proc **child_p, int *status_p)
758 1.109 dsl {
759 1.165 ad struct proc *child, *dead;
760 1.128 dsl int error;
761 1.68 thorpej
762 1.169 ad KASSERT(mutex_owned(&proclist_lock));
763 1.165 ad
764 1.177 dsl if (options & ~(WUNTRACED|WNOHANG|WALTSIG|WALLSIG)
765 1.177 dsl && !(options & WOPTSCHECKED)) {
766 1.177 dsl *child_p = NULL;
767 1.177 dsl return EINVAL;
768 1.177 dsl }
769 1.177 dsl
770 1.177 dsl if (pid == 0 && !(options & WOPTSCHECKED))
771 1.177 dsl pid = -parent->p_pgid;
772 1.177 dsl
773 1.120 yamt for (;;) {
774 1.128 dsl error = ECHILD;
775 1.165 ad dead = NULL;
776 1.165 ad
777 1.165 ad mutex_enter(&proclist_mutex);
778 1.109 dsl LIST_FOREACH(child, &parent->p_children, p_sibling) {
779 1.128 dsl if (pid >= 0) {
780 1.128 dsl if (child->p_pid != pid) {
781 1.128 dsl child = p_find(pid, PFIND_ZOMBIE |
782 1.165 ad PFIND_LOCKED);
783 1.165 ad if (child == NULL ||
784 1.165 ad child->p_pptr != parent) {
785 1.128 dsl child = NULL;
786 1.128 dsl break;
787 1.128 dsl }
788 1.128 dsl }
789 1.165 ad } else if (pid != WAIT_ANY && child->p_pgid != -pid) {
790 1.165 ad /* Child not in correct pgrp */
791 1.165 ad continue;
792 1.165 ad }
793 1.165 ad
794 1.109 dsl /*
795 1.109 dsl * Wait for processes with p_exitsig != SIGCHLD
796 1.109 dsl * processes only if WALTSIG is set; wait for
797 1.109 dsl * processes with p_exitsig == SIGCHLD only
798 1.109 dsl * if WALTSIG is clear.
799 1.109 dsl */
800 1.109 dsl if (((options & WALLSIG) == 0) &&
801 1.109 dsl (options & WALTSIG ? child->p_exitsig == SIGCHLD
802 1.128 dsl : P_EXITSIG(child) != SIGCHLD)){
803 1.128 dsl if (child->p_pid == pid) {
804 1.128 dsl child = NULL;
805 1.128 dsl break;
806 1.128 dsl }
807 1.109 dsl continue;
808 1.128 dsl }
809 1.109 dsl
810 1.128 dsl error = 0;
811 1.165 ad if ((options & WNOZOMBIE) == 0) {
812 1.165 ad if (child->p_stat == SZOMB)
813 1.165 ad break;
814 1.165 ad if (child->p_stat == SDEAD) {
815 1.165 ad /*
816 1.165 ad * We may occasionally arrive here
817 1.165 ad * after receiving a signal, but
818 1.165 ad * immediatley before the child
819 1.165 ad * process is zombified. The wait
820 1.165 ad * will be short, so avoid returning
821 1.165 ad * to userspace.
822 1.165 ad */
823 1.165 ad dead = child;
824 1.165 ad }
825 1.165 ad }
826 1.109 dsl
827 1.109 dsl if (child->p_stat == SSTOP &&
828 1.165 ad child->p_waited == 0 &&
829 1.165 ad (child->p_slflag & PSL_TRACED ||
830 1.165 ad options & WUNTRACED)) {
831 1.128 dsl if ((options & WNOWAIT) == 0) {
832 1.165 ad child->p_waited = 1;
833 1.128 dsl parent->p_nstopchild--;
834 1.128 dsl }
835 1.128 dsl break;
836 1.128 dsl }
837 1.128 dsl if (parent->p_nstopchild == 0 || child->p_pid == pid) {
838 1.128 dsl child = NULL;
839 1.128 dsl break;
840 1.24 cgd }
841 1.109 dsl }
842 1.165 ad
843 1.165 ad if (child != NULL || error != 0 ||
844 1.165 ad ((options & WNOHANG) != 0 && dead == NULL)) {
845 1.176 dsl if (child != NULL) {
846 1.165 ad *status_p = child->p_xstat;
847 1.176 dsl }
848 1.165 ad mutex_exit(&proclist_mutex);
849 1.128 dsl *child_p = child;
850 1.128 dsl return error;
851 1.109 dsl }
852 1.165 ad
853 1.165 ad /*
854 1.165 ad * Wait for another child process to stop.
855 1.165 ad */
856 1.169 ad mutex_exit(&proclist_lock);
857 1.165 ad error = cv_wait_sig(&parent->p_waitcv, &proclist_mutex);
858 1.165 ad mutex_exit(&proclist_mutex);
859 1.169 ad mutex_enter(&proclist_lock);
860 1.165 ad
861 1.177 dsl if (error != 0) {
862 1.177 dsl *child_p = NULL;
863 1.109 dsl return error;
864 1.177 dsl }
865 1.109 dsl }
866 1.109 dsl }
867 1.109 dsl
868 1.109 dsl /*
869 1.165 ad * Free a process after parent has taken all the state info. Must be called
870 1.169 ad * with the proclist lock held, and will release before returning.
871 1.165 ad *
872 1.165 ad * *ru is returned to the caller, and must be freed by the caller.
873 1.109 dsl */
874 1.178 dsl static void
875 1.178 dsl proc_free(struct proc *p, struct rusage *ru)
876 1.109 dsl {
877 1.165 ad struct proc *parent;
878 1.165 ad struct lwp *l;
879 1.140 pk ksiginfo_t ksi;
880 1.182 ad kauth_cred_t cred1, cred2;
881 1.165 ad uid_t uid;
882 1.24 cgd
883 1.169 ad KASSERT(mutex_owned(&proclist_lock));
884 1.165 ad KASSERT(p->p_nlwps == 1);
885 1.165 ad KASSERT(p->p_nzlwps == 1);
886 1.137 yamt KASSERT(p->p_nrlwps == 0);
887 1.165 ad KASSERT(p->p_stat == SZOMB);
888 1.137 yamt
889 1.109 dsl /*
890 1.109 dsl * If we got the child via ptrace(2) or procfs, and
891 1.109 dsl * the parent is different (meaning the process was
892 1.109 dsl * attached, rather than run as a child), then we need
893 1.109 dsl * to give it back to the old parent, and send the
894 1.109 dsl * parent the exit signal. The rest of the cleanup
895 1.109 dsl * will be done when the old parent waits on the child.
896 1.109 dsl */
897 1.165 ad if ((p->p_slflag & PSL_TRACED) != 0) {
898 1.165 ad parent = p->p_pptr;
899 1.165 ad if (p->p_opptr != parent){
900 1.165 ad mutex_enter(&p->p_smutex);
901 1.165 ad p->p_slflag &= ~(PSL_TRACED|PSL_FSTRACE|PSL_SYSCALL);
902 1.165 ad mutex_exit(&p->p_smutex);
903 1.165 ad parent = p->p_opptr;
904 1.165 ad if (parent == NULL)
905 1.165 ad parent = initproc;
906 1.165 ad proc_reparent(p, parent);
907 1.165 ad p->p_opptr = NULL;
908 1.165 ad if (p->p_exitsig != 0) {
909 1.165 ad exit_psignal(p, parent, &ksi);
910 1.165 ad mutex_enter(&proclist_mutex);
911 1.165 ad kpsignal(parent, &ksi, NULL);
912 1.165 ad mutex_exit(&proclist_mutex);
913 1.165 ad }
914 1.184 ad cv_broadcast(&parent->p_waitcv);
915 1.169 ad mutex_exit(&proclist_lock);
916 1.165 ad return;
917 1.140 pk }
918 1.109 dsl }
919 1.109 dsl
920 1.165 ad /*
921 1.165 ad * Finally finished with old proc entry. Unlink it from its process
922 1.165 ad * group.
923 1.165 ad */
924 1.165 ad leavepgrp(p);
925 1.165 ad
926 1.165 ad parent = p->p_pptr;
927 1.179 yamt sched_proc_exit(parent, p);
928 1.178 dsl /*
929 1.178 dsl * Add child times of exiting process onto its own times.
930 1.178 dsl * This cannot be done any earlier else it might get done twice.
931 1.178 dsl */
932 1.178 dsl ruadd(&p->p_stats->p_ru, &p->p_stats->p_cru);
933 1.175 dsl ruadd(&parent->p_stats->p_cru, &p->p_stats->p_ru);
934 1.178 dsl if (ru != NULL)
935 1.178 dsl *ru = p->p_stats->p_ru;
936 1.109 dsl p->p_xstat = 0;
937 1.115 dsl
938 1.115 dsl /*
939 1.165 ad * At this point we are going to start freeing the final resources.
940 1.165 ad * If anyone tries to access the proc structure after here they will
941 1.165 ad * get a shock - bits are missing. Attempt to make it hard! We
942 1.165 ad * don't bother with any further locking past this point.
943 1.115 dsl */
944 1.165 ad mutex_enter(&proclist_mutex);
945 1.165 ad p->p_stat = SIDL; /* not even a zombie any more */
946 1.165 ad LIST_REMOVE(p, p_list); /* off zombproc */
947 1.165 ad parent = p->p_pptr;
948 1.165 ad p->p_pptr->p_nstopchild--;
949 1.165 ad mutex_exit(&proclist_mutex);
950 1.165 ad LIST_REMOVE(p, p_sibling);
951 1.115 dsl
952 1.188 ad /*
953 1.188 ad * Let pid be reallocated.
954 1.188 ad */
955 1.188 ad proc_free_pid(p);
956 1.188 ad mutex_exit(&proclist_lock);
957 1.182 ad
958 1.165 ad l = LIST_FIRST(&p->p_lwps);
959 1.165 ad
960 1.109 dsl /*
961 1.188 ad * Delay release until after lwp_free.
962 1.109 dsl */
963 1.182 ad cred2 = l->l_cred;
964 1.182 ad
965 1.182 ad /*
966 1.188 ad * Free the last LWP's resources.
967 1.188 ad *
968 1.188 ad * lwp_free ensures the LWP is no longer running on another CPU.
969 1.182 ad */
970 1.182 ad lwp_free(l, false, true);
971 1.56 thorpej
972 1.165 ad /*
973 1.188 ad * Now no one except us can reach the process p.
974 1.165 ad */
975 1.35 mycroft
976 1.109 dsl /*
977 1.109 dsl * Decrement the count of procs running with this uid.
978 1.109 dsl */
979 1.188 ad cred1 = p->p_cred;
980 1.188 ad uid = kauth_cred_getuid(cred1);
981 1.165 ad (void)chgproccnt(uid, -1);
982 1.24 cgd
983 1.109 dsl /*
984 1.165 ad * Release substructures.
985 1.109 dsl */
986 1.188 ad
987 1.188 ad limfree(p->p_limit);
988 1.188 ad pstatsfree(p->p_stats);
989 1.182 ad kauth_cred_free(cred1);
990 1.182 ad kauth_cred_free(cred2);
991 1.107 thorpej
992 1.109 dsl /*
993 1.109 dsl * Release reference to text vnode
994 1.109 dsl */
995 1.188 ad if (p->p_textvp)
996 1.188 ad vrele(p->p_textvp);
997 1.188 ad
998 1.190 ad mutex_destroy(&p->p_raslock);
999 1.188 ad mutex_destroy(&p->p_mutex);
1000 1.188 ad mutex_destroy(&p->p_stmutex);
1001 1.188 ad mutex_destroy(&p->p_smutex);
1002 1.188 ad cv_destroy(&p->p_waitcv);
1003 1.188 ad cv_destroy(&p->p_lwpcv);
1004 1.191 ad rw_destroy(&p->p_reflock);
1005 1.188 ad
1006 1.196 ad proc_free_mem(p);
1007 1.24 cgd
1008 1.165 ad /*
1009 1.165 ad * Collect child u-areas.
1010 1.165 ad */
1011 1.168 thorpej uvm_uarea_drain(false);
1012 1.24 cgd }
1013 1.24 cgd
1014 1.24 cgd /*
1015 1.24 cgd * make process 'parent' the new parent of process 'child'.
1016 1.128 dsl *
1017 1.169 ad * Must be called with proclist_lock lock held.
1018 1.24 cgd */
1019 1.24 cgd void
1020 1.82 thorpej proc_reparent(struct proc *child, struct proc *parent)
1021 1.24 cgd {
1022 1.24 cgd
1023 1.169 ad KASSERT(mutex_owned(&proclist_lock));
1024 1.165 ad
1025 1.24 cgd if (child->p_pptr == parent)
1026 1.24 cgd return;
1027 1.70 thorpej
1028 1.165 ad mutex_enter(&proclist_mutex);
1029 1.165 ad if (child->p_stat == SZOMB ||
1030 1.165 ad (child->p_stat == SSTOP && !child->p_waited)) {
1031 1.128 dsl child->p_pptr->p_nstopchild--;
1032 1.128 dsl parent->p_nstopchild++;
1033 1.128 dsl }
1034 1.165 ad mutex_exit(&proclist_mutex);
1035 1.70 thorpej if (parent == initproc)
1036 1.70 thorpej child->p_exitsig = SIGCHLD;
1037 1.24 cgd
1038 1.25 mycroft LIST_REMOVE(child, p_sibling);
1039 1.25 mycroft LIST_INSERT_HEAD(&parent->p_children, child, p_sibling);
1040 1.24 cgd child->p_pptr = parent;
1041 1.24 cgd }
1042