X-Git-Url: https://git.saurik.com/apple/xnu.git/blobdiff_plain/1c79356b52d46aa6b508fb032f5ae709b1f2897b..c18c124eaa464aaaa5549e99e5a70fc9cbb50944:/bsd/kern/kern_exit.c diff --git a/bsd/kern/kern_exit.c b/bsd/kern/kern_exit.c index 385c63711..3d17f687c 100644 --- a/bsd/kern/kern_exit.c +++ b/bsd/kern/kern_exit.c @@ -1,23 +1,29 @@ /* - * Copyright (c) 2000 Apple Computer, Inc. All rights reserved. + * Copyright (c) 2000-2011 Apple Inc. All rights reserved. * - * @APPLE_LICENSE_HEADER_START@ + * @APPLE_OSREFERENCE_LICENSE_HEADER_START@ * - * The contents of this file constitute Original Code as defined in and - * are subject to the Apple Public Source License Version 1.1 (the - * "License"). You may not use this file except in compliance with the - * License. Please obtain a copy of the License at - * http://www.apple.com/publicsource and read it before using this file. + * This file contains Original Code and/or Modifications of Original Code + * as defined in and that are subject to the Apple Public Source License + * Version 2.0 (the 'License'). You may not use this file except in + * compliance with the License. The rights granted to you under the License + * may not be used to create, or enable the creation or redistribution of, + * unlawful or unlicensed copies of an Apple operating system, or to + * circumvent, violate, or enable the circumvention or violation of, any + * terms of an Apple operating system software license agreement. * - * This Original Code and all software distributed under the License are - * distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, EITHER + * Please obtain a copy of the License at + * http://www.opensource.apple.com/apsl/ and read it before using this file. + * + * The Original Code and all software distributed under the License are + * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES, * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY, - * FITNESS FOR A PARTICULAR PURPOSE OR NON-INFRINGEMENT. Please see the - * License for the specific language governing rights and limitations - * under the License. + * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT. + * Please see the License for the specific language governing rights and + * limitations under the License. * - * @APPLE_LICENSE_HEADER_END@ + * @APPLE_OSREFERENCE_LICENSE_HEADER_END@ */ /* Copyright (c) 1995, 1997 Apple Computer, Inc. All Rights Reserved */ /* @@ -59,6 +65,12 @@ * * @(#)kern_exit.c 8.7 (Berkeley) 2/12/94 */ +/* + * NOTICE: This file was modified by SPARTA, Inc. in 2005 to introduce + * support for mandatory and extensible security protections. This notice + * is included in support of clause 2.2 (b) of the Apple Public License, + * Version 2.0. + */ #include #include @@ -68,50 +80,161 @@ #include #include #include +#include #include +#include #include #include #include #include -#include #include -#include -#include +#include +#include #include #include #include #include #include +#include +#include +#include +#include +#include /* fdfree */ +#if SYSV_SHM +#include /* shmexit */ +#endif +#include /* acct_process */ + +#include +#include #include + +#include +#include +#include #include -#include +#include +#include #include +#include + +#if VM_PRESSURE_EVENTS +#include +#endif + +#if CONFIG_MEMORYSTATUS +#include +#endif + +#if CONFIG_DTRACE +/* Do not include dtrace.h, it redefines kmem_[alloc/free] */ +extern void (*dtrace_fasttrap_exit_ptr)(proc_t); +extern void (*dtrace_helpers_cleanup)(proc_t); +extern void dtrace_lazy_dofs_destroy(proc_t); + +#include +#endif + +#if CONFIG_MACF +#include +#include +#endif + +#include +#include +#include + +#include +#include + +extern boolean_t init_task_died; extern char init_task_failure_data[]; -void exit1 __P((struct proc *, int)); +void proc_prepareexit(proc_t p, int rv, boolean_t perf_notify); +void vfork_exit(proc_t p, int rv); +void vproc_exit(proc_t p); +__private_extern__ void munge_user64_rusage(struct rusage *a_rusage_p, struct user64_rusage *a_user_rusage_p); +__private_extern__ void munge_user32_rusage(struct rusage *a_rusage_p, struct user32_rusage *a_user_rusage_p); +static int reap_child_locked(proc_t parent, proc_t child, int deadparent, int reparentedtoinit, int locked, int droplock); + +/* + * Things which should have prototypes in headers, but don't + */ +void proc_exit(proc_t p); +int wait1continue(int result); +int waitidcontinue(int result); +kern_return_t sys_perf_notify(thread_t thread, int pid); +kern_return_t task_exception_notify(exception_type_t exception, + mach_exception_data_type_t code, mach_exception_data_type_t subcode); +void delay(int); +void gather_rusage_info(proc_t p, rusage_info_current *ru, int flavor); + +/* + * NOTE: Source and target may *NOT* overlap! + * XXX Should share code with bsd/dev/ppc/unix_signal.c + */ +void +siginfo_user_to_user32(user_siginfo_t *in, user32_siginfo_t *out) +{ + out->si_signo = in->si_signo; + out->si_errno = in->si_errno; + out->si_code = in->si_code; + out->si_pid = in->si_pid; + out->si_uid = in->si_uid; + out->si_status = in->si_status; + out->si_addr = CAST_DOWN_EXPLICIT(user32_addr_t,in->si_addr); + /* following cast works for sival_int because of padding */ + out->si_value.sival_ptr = CAST_DOWN_EXPLICIT(user32_addr_t,in->si_value.sival_ptr); + out->si_band = in->si_band; /* range reduction */ +} + +void +siginfo_user_to_user64(user_siginfo_t *in, user64_siginfo_t *out) +{ + out->si_signo = in->si_signo; + out->si_errno = in->si_errno; + out->si_code = in->si_code; + out->si_pid = in->si_pid; + out->si_uid = in->si_uid; + out->si_status = in->si_status; + out->si_addr = in->si_addr; + /* following cast works for sival_int because of padding */ + out->si_value.sival_ptr = in->si_value.sival_ptr; + out->si_band = in->si_band; /* range reduction */ +} + +static int +copyoutsiginfo(user_siginfo_t *native, boolean_t is64, user_addr_t uaddr) +{ + if (is64) { + user64_siginfo_t sinfo64; + + bzero(&sinfo64, sizeof (sinfo64)); + siginfo_user_to_user64(native, &sinfo64); + return (copyout(&sinfo64, uaddr, sizeof (sinfo64))); + } else { + user32_siginfo_t sinfo32; + + bzero(&sinfo32, sizeof (sinfo32)); + siginfo_user_to_user32(native, &sinfo32); + return (copyout(&sinfo32, uaddr, sizeof (sinfo32))); + } +} /* * exit -- * Death of process. */ -struct exit_args { - int rval; -}; void -exit(p, uap, retval) - struct proc *p; - struct exit_args *uap; - int *retval; +exit(proc_t p, struct exit_args *uap, int *retval) { - exit1(p, W_EXITCODE(uap->rval, 0)); + exit1(p, W_EXITCODE(uap->rval, 0), retval); - /* drop funnel befewo we return */ - thread_funnel_set(kernel_flock, FALSE); thread_exception_return(); /* NOTREACHED */ while (TRUE) - thread_block(0); + thread_block(THREAD_CONTINUE_NULL); /* NOTREACHED */ } @@ -120,80 +243,199 @@ exit(p, uap, retval) * to zombie, and unlink proc from allproc and parent's lists. Save exit * status and rusage for wait(). Check for child processes and orphan them. */ -void -exit1(p, rv) - register struct proc *p; - int rv; +int +exit1(proc_t p, int rv, int *retval) +{ + return exit1_internal(p, rv, retval, TRUE, TRUE, 0); +} + +int +exit1_internal(proc_t p, int rv, int *retval, boolean_t thread_can_terminate, boolean_t perf_notify, + int jetsam_flags) { - register struct proc *q, *nq; thread_t self = current_thread(); - thread_act_t th_act_self = current_act(); struct task *task = p->task; - register int i,s; struct uthread *ut; + int error = 0; /* * If a thread in this task has already * called exit(), then halt any others * right here. */ - signal_lock(p); + + ut = get_bsdthread_info(self); + if (ut->uu_flag & UT_VFORK) { + if (!thread_can_terminate) { + return EINVAL; + } + + vfork_exit(p, rv); + vfork_return(p , retval, p->p_pid); + unix_syscall_return(0); + /* NOT REACHED */ + } + + /* + * The parameter list of audit_syscall_exit() was augmented to + * take the Darwin syscall number as the first parameter, + * which is currently required by mac_audit_postselect(). + */ + + /* + * The BSM token contains two components: an exit status as passed + * to exit(), and a return value to indicate what sort of exit it + * was. The exit status is WEXITSTATUS(rv), but it's not clear + * what the return value is. + */ + AUDIT_ARG(exit, WEXITSTATUS(rv), 0); + AUDIT_SYSCALL_EXIT(SYS_exit, p, ut, 0); /* Exit is always successfull */ + + DTRACE_PROC1(exit, int, CLD_EXITED); + + /* mark process is going to exit and pull out of DBG/disk throttle */ + /* TODO: This should be done after becoming exit thread */ + proc_set_task_policy(p->task, THREAD_NULL, TASK_POLICY_ATTRIBUTE, + TASK_POLICY_TERMINATED, TASK_POLICY_ENABLE); + + proc_lock(p); + error = proc_transstart(p, 1, ((jetsam_flags & P_JETSAM_VNODE) ? 1 : 0)); + if (error == EDEADLK) { + /* Temp: If deadlock error, then it implies multithreaded exec is + * in progress. Instread of letting exit continue and + * corrupting the freed memory, let the exit thread + * return. This will save corruption in remote case. + */ + proc_unlock(p); + if (current_proc() == p){ + if (p->exit_thread == self) + printf("exit_thread failed to exit, leaving process %s[%d] in unkillable limbo\n", + p->p_comm, p->p_pid); + thread_exception_return(); + } else { + /* external termination like jetsam */ + return(error); + } + } + while (p->exit_thread != self) { if (sig_try_locked(p) <= 0) { - if (get_threadtask(th_act_self) != task) { - signal_unlock(p); - return; + proc_transend(p, 1); + if (get_threadtask(self) != task) { + proc_unlock(p); + return(0); } - signal_unlock(p); - thread_terminate(th_act_self); - thread_funnel_set(kernel_flock, FALSE); + proc_unlock(p); + + thread_terminate(self); + if (!thread_can_terminate) { + return 0; + } + thread_exception_return(); /* NOTREACHED */ } sig_lock_to_exit(p); } - signal_unlock(p); - if (p->p_pid == 1) { + if (p == initproc && current_proc() == p) { + proc_unlock(p); printf("pid 1 exited (signal %d, exit %d)", WTERMSIG(rv), WEXITSTATUS(rv)); - panic("init died\nState at Last Exception:\n\n%s", +#if (DEVELOPMENT || DEBUG) + int err; + /* + * For debugging purposes, generate a core file of initproc before + * panicking. Leave at least 300 MB free on the root volume, and ignore + * the process's corefile ulimit. + */ + if ((err = coredump(p, 300, 1)) != 0) { + printf("Failed to generate initproc core file: error %d", err); + } else { + printf("Generated initproc core file"); + sync(p, (void *)NULL, (int *)NULL); + } +#endif + init_task_died = TRUE; + panic("%s died\nState at Last Exception:\n\n%s", + (p->p_comm[0] != '\0' ? + p->p_comm : + "launchd"), init_task_failure_data); } - s = splsched(); - p->p_flag |= P_WEXIT; - splx(s); - proc_prepareexit(p); + p->p_lflag |= P_LEXIT; p->p_xstat = rv; + p->p_lflag |= jetsam_flags; - /* task terminate will call proc_terminate and that cleans it up */ - task_terminate_internal(task); + proc_transend(p, 1); + proc_unlock(p); - /* - * we come back and returns to AST which - * should cleanup the rest - */ -#if 0 - if (task == current_task()) { - thread_exception_return(); - /*NOTREACHED*/ - } + proc_prepareexit(p, rv, perf_notify); - while (task == current_task()) { - thread_terminate_self(); - /*NOTREACHED*/ - } -#endif + /* Last thread to terminate will call proc_exit() */ + task_terminate_internal(task); + + return(0); } void -proc_prepareexit(struct proc *p) +proc_prepareexit(proc_t p, int rv, boolean_t perf_notify) { - int s; + mach_exception_data_type_t code, subcode; struct uthread *ut; thread_t self = current_thread(); - thread_act_t th_act_self = current_act(); + ut = get_bsdthread_info(self); + struct rusage_superset *rup; + + /* If a core should be generated, notify crash reporter */ + if (hassigprop(WTERMSIG(rv), SA_CORE) || ((p->p_csflags & CS_KILLED) != 0)) { + /* + * Workaround for processes checking up on PT_DENY_ATTACH: + * should be backed out post-Leopard (details in 5431025). + */ + if ((SIGSEGV == WTERMSIG(rv)) && + (p->p_pptr->p_lflag & P_LNOATTACH)) { + goto skipcheck; + } + + /* + * Crash Reporter looks for the signal value, original exception + * type, and low 20 bits of the original code in code[0] + * (8, 4, and 20 bits respectively). code[1] is unmodified. + */ + code = ((WTERMSIG(rv) & 0xff) << 24) | + ((ut->uu_exception & 0x0f) << 20) | + ((int)ut->uu_code & 0xfffff); + subcode = ut->uu_subcode; + (void) task_exception_notify(EXC_CRASH, code, subcode); + } + +skipcheck: + /* Notify the perf server? */ + if (perf_notify) { + (void)sys_perf_notify(self, p->p_pid); + } + + /* + * Before this process becomes a zombie, stash resource usage + * stats in the proc for external observers to query + * via proc_pid_rusage(). + * + * If the zombie allocation fails, just punt the stats. + */ + MALLOC_ZONE(rup, struct rusage_superset *, + sizeof (*rup), M_ZOMBIE, M_WAITOK); + if (rup != NULL) { + gather_rusage_info(p, &rup->ri, RUSAGE_INFO_CURRENT); + rup->ri.ri_phys_footprint = 0; + rup->ri.ri_proc_exit_abstime = mach_absolute_time(); + /* + * Make the rusage_info visible to external observers + * only after it has been completely filled in. + */ + p->p_ru = rup; + } /* * Remove proc from allproc queue and from pidhash chain. @@ -201,50 +443,141 @@ proc_prepareexit(struct proc *p) * Not doing causes things like mount() find this on allproc * in partially cleaned state. */ + + proc_list_lock(); + +#if CONFIG_MEMORYSTATUS + memorystatus_remove(p, TRUE); +#endif + LIST_REMOVE(p, p_list); - LIST_REMOVE(p, p_hash); + LIST_INSERT_HEAD(&zombproc, p, p_list); /* Place onto zombproc. */ + /* will not be visible via proc_find */ + p->p_listflag |= P_LIST_EXITED; + + proc_list_unlock(); + #ifdef PGINPROF vmsizmon(); #endif /* * If parent is waiting for us to exit or exec, - * P_PPWAIT is set; we will wakeup the parent below. + * P_LPPWAIT is set; we will wakeup the parent below. */ - p->p_flag &= ~(P_TRACED | P_PPWAIT); - p->p_sigignore = ~0; - p->p_siglist = 0; - ut = get_bsdthread_info(th_act_self); - ut->uu_sig = 0; - untimeout(realitexpire, (caddr_t)p); - + proc_lock(p); + p->p_lflag &= ~(P_LTRACED | P_LPPWAIT); + p->p_sigignore = ~(sigcantmask); + ut->uu_siglist = 0; + proc_unlock(p); } void -proc_exit(struct proc *p) +proc_exit(proc_t p) { - register struct proc *q, *nq; - thread_t self = current_thread(); - thread_act_t th_act_self = current_act(); + proc_t q; + proc_t pp; struct task *task = p->task; - register int i,s; - struct uthread *ut; - boolean_t funnel_state; + vnode_t tvp = NULLVP; + struct pgrp * pg; + struct session *sessp; + struct uthread * uth; + pid_t pid; + int exitval; + int knote_hint; + + uth = current_uthread(); + + proc_lock(p); + proc_transstart(p, 1, 0); + if( !(p->p_lflag & P_LEXIT)) { + /* + * This can happen if a thread_terminate() occurs + * in a single-threaded process. + */ + p->p_lflag |= P_LEXIT; + proc_transend(p, 1); + proc_unlock(p); + proc_prepareexit(p, 0, TRUE); + (void) task_terminate_internal(task); + proc_lock(p); + } else { + proc_transend(p, 1); + } + + p->p_lflag |= P_LPEXIT; + + /* + * Other kernel threads may be in the middle of signalling this process. + * Wait for those threads to wrap it up before making the process + * disappear on them. + */ + if ((p->p_lflag & P_LINSIGNAL) || (p->p_sigwaitcnt > 0)) { + p->p_sigwaitcnt++; + while ((p->p_lflag & P_LINSIGNAL) || (p->p_sigwaitcnt > 1)) + msleep(&p->p_sigmask, &p->p_mlock, PWAIT, "proc_sigdrain", NULL); + p->p_sigwaitcnt--; + } + + proc_unlock(p); + pid = p->p_pid; + exitval = p->p_xstat; + KERNEL_DEBUG_CONSTANT_IST(KDEBUG_COMMON, + BSDDBG_CODE(DBG_BSD_PROC, BSD_PROC_EXIT) | DBG_FUNC_START, + pid, exitval, 0, 0, 0); - /* This can happen if thread_terminate of the single thread - * process +#if CONFIG_DTRACE + /* + * Free any outstanding lazy dof entries. It is imperative we + * always call dtrace_lazy_dofs_destroy, rather than null check + * and call if !NULL. If we NULL test, during lazy dof faulting + * we can race with the faulting code and proceed from here to + * beyond the helpers cleanup. The lazy dof faulting will then + * install new helpers which will never be cleaned up, and leak. + */ + dtrace_lazy_dofs_destroy(p); + + /* + * Clean up any DTrace helper actions or probes for the process. */ + if (p->p_dtrace_helpers != NULL) { + (*dtrace_helpers_cleanup)(p); + } - funnel_state = thread_funnel_set(kernel_flock, TRUE); - if( !(p->p_flag & P_WEXIT)) { - s = splsched(); - p->p_flag |= P_WEXIT; - splx(s); - proc_prepareexit(p); + /* + * Clean up any DTrace probes associated with this process. + */ + /* + * APPLE NOTE: We release ptss pages/entries in dtrace_fasttrap_exit_ptr(), + * call this after dtrace_helpers_cleanup() + */ + proc_lock(p); + if (p->p_dtrace_probes && dtrace_fasttrap_exit_ptr) { + (*dtrace_fasttrap_exit_ptr)(p); } + proc_unlock(p); +#endif + + nspace_proc_exit(p); + +#if VM_PRESSURE_EVENTS + vm_pressure_proc_cleanup(p); +#endif + + /* + * need to cancel async IO requests that can be cancelled and wait for those + * already active. MAY BLOCK! + */ + + proc_refdrain(p); + + /* if any pending cpu limits action, clear it */ + task_clear_cpuusage(p->task, TRUE); - MALLOC_ZONE(p->p_ru, struct rusage *, - sizeof (*p->p_ru), M_ZOMBIE, M_WAITOK); + workqueue_mark_exiting(p); + workqueue_exit(p); + + _aio_exit( p ); /* * Close open files and release open-file table. @@ -252,122 +585,246 @@ proc_exit(struct proc *p) */ fdfree(p); + if (uth->uu_lowpri_window) { + /* + * task is marked as a low priority I/O type + * and the I/O we issued while in flushing files on close + * collided with normal I/O operations... + * no need to throttle this thread since its going away + * but we do need to update our bookeeping w/r to throttled threads + */ + throttle_lowpri_io(0); + } + +#if SYSV_SHM /* Close ref SYSV Shared memory*/ if (p->vm_shm) shmexit(p); +#endif +#if SYSV_SEM + /* Release SYSV semaphores */ + semexit(p); +#endif - if (SESS_LEADER(p)) { - register struct session *sp = p->p_session; +#if PSYNCH + pth_proc_hashdelete(p); +#endif /* PSYNCH */ + + sessp = proc_session(p); + if (SESS_LEADER(p, sessp)) { + + if (sessp->s_ttyvp != NULLVP) { + struct vnode *ttyvp; + int ttyvid; + int cttyflag = 0; + struct vfs_context context; + struct tty *tp; - if (sp->s_ttyvp) { /* * Controlling process. * Signal foreground pgrp, * drain controlling terminal * and revoke access to controlling terminal. */ - if (sp->s_ttyp->t_session == sp) { - if (sp->s_ttyp->t_pgrp) - pgsignal(sp->s_ttyp->t_pgrp, SIGHUP, 1); - (void) ttywait(sp->s_ttyp); + session_lock(sessp); + tp = SESSION_TP(sessp); + if ((tp != TTY_NULL) && (tp->t_session == sessp)) { + session_unlock(sessp); + /* - * The tty could have been revoked - * if we blocked. + * We're going to SIGHUP the foreground process + * group. It can't change from this point on + * until the revoke is complete. + * The process group changes under both the tty + * lock and proc_list_lock but we need only one */ - if (sp->s_ttyvp) - VOP_REVOKE(sp->s_ttyvp, REVOKEALL); + tty_lock(tp); + ttysetpgrphup(tp); + tty_unlock(tp); + + tty_pgsignal(tp, SIGHUP, 1); + + session_lock(sessp); + tp = SESSION_TP(sessp); + } + cttyflag = sessp->s_flags & S_CTTYREF; + sessp->s_flags &= ~S_CTTYREF; + ttyvp = sessp->s_ttyvp; + ttyvid = sessp->s_ttyvid; + sessp->s_ttyvp = NULLVP; + sessp->s_ttyvid = 0; + sessp->s_ttyp = TTY_NULL; + sessp->s_ttypgrpid = NO_PID; + session_unlock(sessp); + + if ((ttyvp != NULLVP) && (vnode_getwithvid(ttyvp, ttyvid) == 0)) { + if (tp != TTY_NULL) { + tty_lock(tp); + (void) ttywait(tp); + tty_unlock(tp); + } + context.vc_thread = proc_thread(p); /* XXX */ + context.vc_ucred = kauth_cred_proc_ref(p); + VNOP_REVOKE(ttyvp, REVOKEALL, &context); + if (cttyflag) { + /* + * Release the extra usecount taken in cttyopen. + * usecount should be released after VNOP_REVOKE is called. + * This usecount was taken to ensure that + * the VNOP_REVOKE results in a close to + * the tty since cttyclose is a no-op. + */ + vnode_rele(ttyvp); + } + vnode_put(ttyvp); + kauth_cred_unref(&context.vc_ucred); + ttyvp = NULLVP; + } + if (tp) { + /* + * This is cleared even if not set. This is also done in + * spec_close to ensure that the flag is cleared. + */ + tty_lock(tp); + ttyclrpgrphup(tp); + tty_unlock(tp); + + ttyfree(tp); } - if (sp->s_ttyvp) - vrele(sp->s_ttyvp); - sp->s_ttyvp = NULL; - /* - * s_ttyp is not zero'd; we use this to indicate - * that the session once had a controlling terminal. - * (for logging and informational purposes) - */ } - sp->s_leader = NULL; + session_lock(sessp); + sessp->s_leader = NULL; + session_unlock(sessp); } + session_rele(sessp); + + pg = proc_pgrp(p); + fixjobc(p, pg, 0); + pg_rele(pg); - fixjobc(p, p->p_pgrp, 0); p->p_rlimit[RLIMIT_FSIZE].rlim_cur = RLIM_INFINITY; -#if KTRACE - /* - * release trace file - */ - p->p_traceflag = 0; /* don't trace the vrele() */ - if (p->p_tracep) - vrele(p->p_tracep); -#endif + (void)acct_process(p); + proc_list_lock(); + + if ((p->p_listflag & P_LIST_EXITCOUNT) == P_LIST_EXITCOUNT) { + p->p_listflag &= ~P_LIST_EXITCOUNT; + proc_shutdown_exitcount--; + if (proc_shutdown_exitcount == 0) + wakeup(&proc_shutdown_exitcount); + } + + /* wait till parentrefs are dropped and grant no more */ + proc_childdrainstart(p); + while ((q = p->p_children.lh_first) != NULL) { + int reparentedtoinit = (q->p_listflag & P_LIST_DEADPARENT) ? 1 : 0; + if (q->p_stat == SZOMB) { + if (p != q->p_pptr) + panic("parent child linkage broken"); + /* check for sysctl zomb lookup */ + while ((q->p_listflag & P_LIST_WAITING) == P_LIST_WAITING) { + msleep(&q->p_stat, proc_list_mlock, PWAIT, "waitcoll", 0); + } + q->p_listflag |= P_LIST_WAITING; + /* + * This is a named reference and it is not granted + * if the reap is already in progress. So we get + * the reference here exclusively and their can be + * no waiters. So there is no need for a wakeup + * after we are done. Also the reap frees the structure + * and the proc struct cannot be used for wakeups as well. + * It is safe to use q here as this is system reap + */ + (void)reap_child_locked(p, q, 1, reparentedtoinit, 1, 0); + } else { + /* + * Traced processes are killed + * since their existence means someone is messing up. + */ + if (q->p_lflag & P_LTRACED) { + struct proc *opp; - q = p->p_children.lh_first; - if (q) /* only need this if any child is S_ZOMB */ - wakeup((caddr_t) initproc); - for (; q != 0; q = nq) { - nq = q->p_sibling.le_next; - proc_reparent(q, initproc); - /* - * Traced processes are killed - * since their existence means someone is messing up. - */ - if (q->p_flag & P_TRACED) { - q->p_flag &= ~P_TRACED; - if (q->sigwait_thread) { - thread_t sig_shuttle = getshuttle_thread(q->sigwait_thread); /* - * The sigwait_thread could be stopped at a - * breakpoint. Wake it up to kill. - * Need to do this as it could be a thread which is not - * the first thread in the task. So any attempts to kill - * the process would result into a deadlock on q->sigwait. + * Take a reference on the child process to + * ensure it doesn't exit and disappear between + * the time we drop the list_lock and attempt + * to acquire its proc_lock. */ - thread_resume((struct thread *)q->sigwait_thread); - clear_wait(sig_shuttle, THREAD_INTERRUPTED); - threadsignal(q->sigwait_thread, SIGKILL, 0); + if (proc_ref_locked(q) != q) + continue; + + proc_list_unlock(); + + opp = proc_find(q->p_oppid); + if (opp != PROC_NULL) { + proc_list_lock(); + q->p_oppid = 0; + proc_list_unlock(); + proc_reparentlocked(q, opp, 0, 0); + proc_rele(opp); + } else { + /* original parent exited while traced */ + proc_list_lock(); + q->p_listflag |= P_LIST_DEADPARENT; + q->p_oppid = 0; + proc_list_unlock(); + proc_reparentlocked(q, initproc, 0, 0); + } + + proc_lock(q); + q->p_lflag &= ~P_LTRACED; + + if (q->sigwait_thread) { + thread_t thread = q->sigwait_thread; + + proc_unlock(q); + /* + * The sigwait_thread could be stopped at a + * breakpoint. Wake it up to kill. + * Need to do this as it could be a thread which is not + * the first thread in the task. So any attempts to kill + * the process would result into a deadlock on q->sigwait. + */ + thread_resume(thread); + clear_wait(thread, THREAD_INTERRUPTED); + threadsignal(thread, SIGKILL, 0); + } else { + proc_unlock(q); + } + + psignal(q, SIGKILL); + proc_list_lock(); + proc_rele_locked(q); + } else { + q->p_listflag |= P_LIST_DEADPARENT; + proc_reparentlocked(q, initproc, 0, 1); } - psignal(q, SIGKILL); } } + proc_childdrainend(p); + proc_list_unlock(); /* - * Save exit status and final rusage info, adding in child rusage - * info and self times. + * Release reference to text vnode */ - *p->p_ru = p->p_stats->p_ru; - - timerclear(&p->p_ru->ru_utime); - timerclear(&p->p_ru->ru_stime); - - if (task) { - task_basic_info_data_t tinfo; - task_thread_times_info_data_t ttimesinfo; - int task_info_stuff, task_ttimes_stuff; - struct timeval ut,st; - - task_info_stuff = TASK_BASIC_INFO_COUNT; - task_info(task, TASK_BASIC_INFO, - &tinfo, &task_info_stuff); - p->p_ru->ru_utime.tv_sec = tinfo.user_time.seconds; - p->p_ru->ru_utime.tv_usec = tinfo.user_time.microseconds; - p->p_ru->ru_stime.tv_sec = tinfo.system_time.seconds; - p->p_ru->ru_stime.tv_usec = tinfo.system_time.microseconds; - - task_ttimes_stuff = TASK_THREAD_TIMES_INFO_COUNT; - task_info(task, TASK_THREAD_TIMES_INFO, - &ttimesinfo, &task_ttimes_stuff); - - ut.tv_sec = ttimesinfo.user_time.seconds; - ut.tv_usec = ttimesinfo.user_time.microseconds; - st.tv_sec = ttimesinfo.system_time.seconds; - st.tv_usec = ttimesinfo.system_time.microseconds; - timeradd(&ut,&p->p_ru->ru_utime,&p->p_ru->ru_utime); - timeradd(&st,&p->p_ru->ru_stime,&p->p_ru->ru_stime); + tvp = p->p_textvp; + p->p_textvp = NULL; + if (tvp != NULLVP) { + vnode_rele(tvp); } + /* + * Save exit status and final rusage info, adding in child rusage + * info and self times. If we were unable to allocate a zombie + * structure, this information is lost. + */ + if (p->p_ru != NULL) { + calcru(p, &p->p_stats->p_ru.ru_utime, &p->p_stats->p_ru.ru_stime, NULL); + p->p_ru->ru = p->p_stats->p_ru; - ruadd(p->p_ru, &p->p_stats->p_cru); + ruadd(&(p->p_ru->ru), &p->p_stats->p_cru); + } /* * Free up profiling buffers. @@ -381,341 +838,1407 @@ proc_exit(struct proc *p) for (; p1 != NULL; p1 = pn) { pn = p1->pr_next; - kfree((vm_offset_t)p1, sizeof *p1); + kfree(p1, sizeof *p1); } } + proc_spinlock(p); + if (thread_call_cancel(p->p_rcall)) + p->p_ractive--; + + while (p->p_ractive > 0) { + proc_spinunlock(p); + + delay(1); + + proc_spinlock(p); + } + proc_spinunlock(p); + + thread_call_free(p->p_rcall); + p->p_rcall = NULL; + /* * Other substructures are freed from wait(). */ - FREE_ZONE(p->p_stats, sizeof *p->p_stats, M_SUBPROC); + FREE_ZONE(p->p_stats, sizeof *p->p_stats, M_PSTATS); p->p_stats = NULL; - FREE_ZONE(p->p_sigacts, sizeof *p->p_sigacts, M_SUBPROC); + FREE_ZONE(p->p_sigacts, sizeof *p->p_sigacts, M_SIGACTS); p->p_sigacts = NULL; - if (--p->p_limit->p_refcnt == 0) - FREE_ZONE(p->p_limit, sizeof *p->p_limit, M_SUBPROC); + proc_limitdrop(p, 1); p->p_limit = NULL; + vm_purgeable_disown(p->task); + /* * Finish up by terminating the task * and halt this thread (only if a * member of the task exiting). */ p->task = TASK_NULL; - //task->proc = NULL; set_bsdtask_info(task, NULL); + knote_hint = NOTE_EXIT | (p->p_xstat & 0xffff); + proc_knote(p, knote_hint); + + /* mark the thread as the one that is doing proc_exit + * no need to hold proc lock in uthread_free + */ + uth->uu_flag |= UT_PROCEXIT; /* * Notify parent that we're gone. */ - psignal(p->p_pptr, SIGCHLD); - - /* Place onto zombproc. */ - LIST_INSERT_HEAD(&zombproc, p, p_list); - p->p_stat = SZOMB; - - /* and now wakeup the parent */ - wakeup((caddr_t)p->p_pptr); - - (void) thread_funnel_set(kernel_flock, funnel_state); -} + pp = proc_parent(p); + if (pp->p_flag & P_NOCLDWAIT) { + if (p->p_ru != NULL) { + proc_lock(pp); +#if 3839178 + /* + * If the parent is ignoring SIGCHLD, then POSIX requires + * us to not add the resource usage to the parent process - + * we are only going to hand it off to init to get reaped. + * We should contest the standard in this case on the basis + * of RLIMIT_CPU. + */ +#else /* !3839178 */ + /* + * Add child resource usage to parent before giving + * zombie to init. If we were unable to allocate a + * zombie structure, this information is lost. + */ + ruadd(&pp->p_stats->p_cru, &p->p_ru->ru); +#endif /* !3839178 */ + update_rusage_info_child(&pp->p_stats->ri_child, &p->p_ru->ri); + proc_unlock(pp); + } + + /* kernel can reap this one, no need to move it to launchd */ + proc_list_lock(); + p->p_listflag |= P_LIST_DEADPARENT; + proc_list_unlock(); + } + if ((p->p_listflag & P_LIST_DEADPARENT) == 0 || p->p_oppid) { + if (pp != initproc) { + proc_lock(pp); + pp->si_pid = p->p_pid; + pp->si_status = p->p_xstat; + pp->si_code = CLD_EXITED; + /* + * p_ucred usage is safe as it is an exiting process + * and reference is dropped in reap + */ + pp->si_uid = kauth_cred_getruid(p->p_ucred); + proc_unlock(pp); + } + /* mark as a zombie */ + /* No need to take proc lock as all refs are drained and + * no one except parent (reaping ) can look at this. + * The write is to an int and is coherent. Also parent is + * keyed off of list lock for reaping + */ + KERNEL_DEBUG_CONSTANT_IST(KDEBUG_COMMON, + BSDDBG_CODE(DBG_BSD_PROC, BSD_PROC_EXIT) | DBG_FUNC_END, + pid, exitval, 0, 0, 0); + p->p_stat = SZOMB; + /* + * The current process can be reaped so, no one + * can depend on this + */ -struct wait4_args { - int pid; - int *status; - int options; - struct rusage *rusage; -}; + psignal(pp, SIGCHLD); + + /* and now wakeup the parent */ + proc_list_lock(); + wakeup((caddr_t)pp); + proc_list_unlock(); + } else { + /* should be fine as parent proc would be initproc */ + /* mark as a zombie */ + /* No need to take proc lock as all refs are drained and + * no one except parent (reaping ) can look at this. + * The write is to an int and is coherent. Also parent is + * keyed off of list lock for reaping + */ + proc_list_lock(); + KERNEL_DEBUG_CONSTANT_IST(KDEBUG_COMMON, + BSDDBG_CODE(DBG_BSD_PROC, BSD_PROC_EXIT) | DBG_FUNC_END, + pid, exitval, 0, 0, 0); + /* check for sysctl zomb lookup */ + while ((p->p_listflag & P_LIST_WAITING) == P_LIST_WAITING) { + msleep(&p->p_stat, proc_list_mlock, PWAIT, "waitcoll", 0); + } + /* safe to use p as this is a system reap */ + p->p_stat = SZOMB; + p->p_listflag |= P_LIST_WAITING; -#if COMPAT_43 -int -owait(p, uap, retval) - struct proc *p; - void *uap; - int *retval; -{ - struct wait4_args *a; + /* + * This is a named reference and it is not granted + * if the reap is already in progress. So we get + * the reference here exclusively and their can be + * no waiters. So there is no need for a wakeup + * after we are done. AlsO the reap frees the structure + * and the proc struct cannot be used for wakeups as well. + * It is safe to use p here as this is system reap + */ + (void)reap_child_locked(pp, p, 1, 0, 1, 1); + /* list lock dropped by reap_child_locked */ + } + if (uth->uu_lowpri_window) { + /* + * task is marked as a low priority I/O type and we've + * somehow picked up another throttle during exit processing... + * no need to throttle this thread since its going away + * but we do need to update our bookeeping w/r to throttled threads + */ + throttle_lowpri_io(0); + } - a = (struct wait4_args *)get_bsduthreadarg(current_act()); + proc_rele(pp); - a->options = 0; - a->rusage = NULL; - a->pid = WAIT_ANY; - a->status = NULL; - return (wait1(p, a, retval, 1)); } -int -wait4(p, uap, retval) - struct proc *p; - struct wait4_args *uap; - int *retval; -{ - return (wait1(p, uap, retval, 0)); -} +/* + * reap_child_locked + * + * Description: Given a process from which all status information needed + * has already been extracted, if the process is a ptrace + * attach process, detach it and give it back to its real + * parent, else recover all resources remaining associated + * with it. + * + * Parameters: proc_t parent Parent of process being reaped + * proc_t child Process to reap + * + * Returns: 0 Process was not reaped because it + * came from an attach + * 1 Process was reaped + */ +static int +reap_child_locked(proc_t parent, proc_t child, int deadparent, int reparentedtoinit, int locked, int droplock) +{ + proc_t trace_parent = PROC_NULL; /* Traced parent process, if tracing */ -struct owait3_args { - int *status; - int options; - struct rusage *rusage; -}; + if (locked == 1) + proc_list_unlock(); + + /* + * If we got the child via a ptrace 'attach', + * we need to give it back to the old parent. + * + * Exception: someone who has been reparented to launchd before being + * ptraced can simply be reaped, refer to radar 5677288 + * p_oppid -> ptraced + * trace_parent == initproc -> away from launchd + * reparentedtoinit -> came to launchd by reparenting + */ + if (child->p_oppid) { + int knote_hint; + pid_t oppid; + + proc_lock(child); + oppid = child->p_oppid; + child->p_oppid = 0; + knote_hint = NOTE_EXIT | (child->p_xstat & 0xffff); + proc_unlock(child); + + if ((trace_parent = proc_find(oppid)) + && !((trace_parent == initproc) && reparentedtoinit)) { + + if (trace_parent != initproc) { + /* + * proc internal fileds and p_ucred usage safe + * here as child is dead and is not reaped or + * reparented yet + */ + proc_lock(trace_parent); + trace_parent->si_pid = child->p_pid; + trace_parent->si_status = child->p_xstat; + trace_parent->si_code = CLD_CONTINUED; + trace_parent->si_uid = kauth_cred_getruid(child->p_ucred); + proc_unlock(trace_parent); + } + proc_reparentlocked(child, trace_parent, 1, 0); + + /* resend knote to original parent (and others) after reparenting */ + proc_knote(child, knote_hint); + + psignal(trace_parent, SIGCHLD); + proc_list_lock(); + wakeup((caddr_t)trace_parent); + child->p_listflag &= ~P_LIST_WAITING; + wakeup(&child->p_stat); + proc_list_unlock(); + proc_rele(trace_parent); + if ((locked == 1) && (droplock == 0)) + proc_list_lock(); + return (0); + } -int -owait3(p, uap, retval) - struct proc *p; - struct owait3_args *uap; - int *retval; -{ - struct wait4_args *a; + /* + * If we can't reparent (e.g. the original parent exited while child was being debugged, or + * original parent is the same as the debugger currently exiting), we still need to satisfy + * the knote lifecycle for other observers on the system. While the debugger was attached, + * the NOTE_EXIT would not have been broadcast during initial child termination. + */ + proc_knote(child, knote_hint); - a = (struct wait4_args *)get_bsduthreadarg(current_act); + if (trace_parent != PROC_NULL) { + proc_rele(trace_parent); + } + } + +#pragma clang diagnostic push +#pragma clang diagnostic ignored "-Wdeprecated-declarations" + proc_knote(child, NOTE_REAP); +#pragma clang diagnostic pop - a->rusage = uap->rusage; - a->options = uap->options; - a->status = uap->status; - a->pid = WAIT_ANY; + proc_knote_drain(child); - return (wait1(p, a, retval, 1)); -} + child->p_xstat = 0; + if (child->p_ru) { + proc_lock(parent); +#if 3839178 + /* + * If the parent is ignoring SIGCHLD, then POSIX requires + * us to not add the resource usage to the parent process - + * we are only going to hand it off to init to get reaped. + * We should contest the standard in this case on the basis + * of RLIMIT_CPU. + */ + if (!(parent->p_flag & P_NOCLDWAIT)) +#endif /* 3839178 */ + ruadd(&parent->p_stats->p_cru, &child->p_ru->ru); + update_rusage_info_child(&parent->p_stats->ri_child, &child->p_ru->ri); + proc_unlock(parent); + FREE_ZONE(child->p_ru, sizeof *child->p_ru, M_ZOMBIE); + child->p_ru = NULL; + } else { + printf("Warning : lost p_ru for %s\n", child->p_comm); + } -#else -#define wait1 wait4 -#endif + AUDIT_SESSION_PROCEXIT(child); -int -wait1continue(result) -{ - void *vt; - thread_act_t thread; - struct uthread *ut; - int *retval; - struct proc *p; + /* + * Decrement the count of procs running with this uid. + * p_ucred usage is safe here as it is an exited process. + * and refernce is dropped after these calls down below + * (locking protection is provided by list lock held in chgproccnt) + */ + (void)chgproccnt(kauth_cred_getruid(child->p_ucred), -1); - p = get_bsdtask_info(current_task()); - p->p_flag &= ~P_WAITING; +#if CONFIG_LCTX + ALLLCTX_LOCK; + leavelctx(child); + ALLLCTX_UNLOCK; +#endif - if (result != 0) { - return(result); + /* + * Free up credentials. + */ + if (IS_VALID_CRED(child->p_ucred)) { + kauth_cred_unref(&child->p_ucred); } - thread = current_act(); - ut = get_bsdthread_info(thread); - vt = get_bsduthreadarg(thread); - retval = get_bsduthreadrval(thread); - wait1((struct proc *)p, (struct wait4_args *)vt, retval, 0); -} - -int -wait1(q, uap, retval, compat) - register struct proc *q; - register struct wait4_args *uap; - register_t *retval; -#if COMPAT_43 - int compat; -#endif -{ - register int nfound; - register struct proc *p, *t; - int status, error; + /* XXXX Note NOT SAFE TO USE p_ucred from this point onwards */ + /* + * Finally finished with old proc entry. + * Unlink it from its process group and free it. + */ + leavepgrp(child); -#if 0 - /* since we are funneled we don't need to do this atomically, yet */ - if (q->p_flag & P_WAITING) { - return(EINVAL); + proc_list_lock(); + LIST_REMOVE(child, p_list); /* off zombproc */ + parent->p_childrencnt--; + LIST_REMOVE(child, p_sibling); + /* If there are no more children wakeup parent */ + if ((deadparent != 0) && (LIST_EMPTY(&parent->p_children))) + wakeup((caddr_t)parent); /* with list lock held */ + child->p_listflag &= ~P_LIST_WAITING; + wakeup(&child->p_stat); + + /* Take it out of process hash */ + LIST_REMOVE(child, p_hash); + child->p_listflag &= ~P_LIST_INHASH; + proc_checkdeadrefs(child); + nprocs--; + + if (deadparent) { + /* + * If a child zombie is being reaped because its parent + * is exiting, make sure we update the list flag + */ + child->p_listflag |= P_LIST_DEADPARENT; } - q->p_flag |= P_WAITING; /* only allow single thread to wait() */ + + proc_list_unlock(); + +#if CONFIG_FINE_LOCK_GROUPS + lck_mtx_destroy(&child->p_mlock, proc_mlock_grp); + lck_mtx_destroy(&child->p_fdmlock, proc_fdmlock_grp); +#if CONFIG_DTRACE + lck_mtx_destroy(&child->p_dtrace_sprlock, proc_lck_grp); +#endif + lck_spin_destroy(&child->p_slock, proc_slock_grp); +#else /* CONFIG_FINE_LOCK_GROUPS */ + lck_mtx_destroy(&child->p_mlock, proc_lck_grp); + lck_mtx_destroy(&child->p_fdmlock, proc_lck_grp); +#if CONFIG_DTRACE + lck_mtx_destroy(&child->p_dtrace_sprlock, proc_lck_grp); #endif + lck_spin_destroy(&child->p_slock, proc_lck_grp); +#endif /* CONFIG_FINE_LOCK_GROUPS */ + workqueue_destroy_lock(child); + + FREE_ZONE(child, sizeof *child, M_PROC); + if ((locked == 1) && (droplock == 0)) + proc_list_lock(); + + return (1); +} + + +int +wait1continue(int result) +{ + proc_t p; + thread_t thread; + uthread_t uth; + struct _wait4_data *wait4_data; + struct wait4_nocancel_args *uap; + int *retval; + + if (result) + return(result); + + p = current_proc(); + thread = current_thread(); + uth = (struct uthread *)get_bsdthread_info(thread); + + wait4_data = &uth->uu_kevent.uu_wait4_data; + uap = wait4_data->args; + retval = wait4_data->retval; + return(wait4_nocancel(p, uap, retval)); +} + +int +wait4(proc_t q, struct wait4_args *uap, int32_t *retval) +{ + __pthread_testcancel(1); + return(wait4_nocancel(q, (struct wait4_nocancel_args *)uap, retval)); +} + +int +wait4_nocancel(proc_t q, struct wait4_nocancel_args *uap, int32_t *retval) +{ + int nfound; + int sibling_count; + proc_t p; + int status, error; + uthread_t uth; + struct _wait4_data *wait4_data; + + AUDIT_ARG(pid, uap->pid); if (uap->pid == 0) - uap->pid = -q->p_pgid; + uap->pid = -q->p_pgrpid; loop: + proc_list_lock(); +loop1: nfound = 0; + sibling_count = 0; + for (p = q->p_children.lh_first; p != 0; p = p->p_sibling.le_next) { + if ( p->p_sibling.le_next != 0 ) + sibling_count++; if (uap->pid != WAIT_ANY && p->p_pid != uap->pid && - p->p_pgid != -(uap->pid)) + p->p_pgrpid != -(uap->pid)) continue; + nfound++; + + /* XXX This is racy because we don't get the lock!!!! */ + + if (p->p_listflag & P_LIST_WAITING) { + (void)msleep(&p->p_stat, proc_list_mlock, PWAIT, "waitcoll", 0); + goto loop1; + } + p->p_listflag |= P_LIST_WAITING; /* only allow single thread to wait() */ + + if (p->p_stat == SZOMB) { - retval[0] = p->p_pid; -#if COMPAT_43 - if (compat) - retval[1] = p->p_xstat; - else + int reparentedtoinit = (p->p_listflag & P_LIST_DEADPARENT) ? 1 : 0; + + proc_list_unlock(); +#if CONFIG_MACF + if ((error = mac_proc_check_wait(q, p)) != 0) + goto out; #endif + retval[0] = p->p_pid; if (uap->status) { - status = p->p_xstat; /* convert to int */ - if (error = copyout((caddr_t)&status, - (caddr_t)uap->status, - sizeof(status))) { - q->p_flag &= ~P_WAITING; - return (error); - } - } - if (uap->rusage && - (error = copyout((caddr_t)p->p_ru, - (caddr_t)uap->rusage, - sizeof (struct rusage)))) { - q->p_flag &= ~P_WAITING; - return (error); - } - /* - * If we got the child via a ptrace 'attach', - * we need to give it back to the old parent. - */ - if (p->p_oppid && (t = pfind(p->p_oppid))) { - p->p_oppid = 0; - proc_reparent(p, t); - psignal(t, SIGCHLD); - wakeup((caddr_t)t); - q->p_flag &= ~P_WAITING; - return (0); + /* Legacy apps expect only 8 bits of status */ + status = 0xffff & p->p_xstat; /* convert to int */ + error = copyout((caddr_t)&status, + uap->status, + sizeof(status)); + if (error) + goto out; } - p->p_xstat = 0; - if (p->p_ru) { - ruadd(&q->p_stats->p_cru, p->p_ru); - FREE_ZONE(p->p_ru, sizeof *p->p_ru, M_ZOMBIE); - p->p_ru = NULL; - } else { - printf("Warning : lost p_ru for %s\n", p->p_comm); + if (uap->rusage) { + if (p->p_ru == NULL) { + error = ENOMEM; + } else { + if (IS_64BIT_PROCESS(q)) { + struct user64_rusage my_rusage; + munge_user64_rusage(&p->p_ru->ru, &my_rusage); + error = copyout((caddr_t)&my_rusage, + uap->rusage, + sizeof (my_rusage)); + } + else { + struct user32_rusage my_rusage; + munge_user32_rusage(&p->p_ru->ru, &my_rusage); + error = copyout((caddr_t)&my_rusage, + uap->rusage, + sizeof (my_rusage)); + } + } + /* information unavailable? */ + if (error) + goto out; } - /* - * Decrement the count of procs running with this uid. - */ - (void)chgproccnt(p->p_cred->p_ruid, -1); - - /* - * Free up credentials. + /* Conformance change for 6577252. + * When SIGCHLD is blocked and wait() returns because the status + * of a child process is available and there are no other + * children processes, then any pending SIGCHLD signal is cleared. */ - if (--p->p_cred->p_refcnt == 0) { - struct ucred *ucr = p->p_ucred; - struct pcred *pcr; - - if (ucr != NOCRED) { - p->p_ucred = NOCRED; - crfree(ucr); + if ( sibling_count == 0 ) { + int mask = sigmask(SIGCHLD); + uth = current_uthread(); + + if ( (uth->uu_sigmask & mask) != 0 ) { + /* we are blocking SIGCHLD signals. clear any pending SIGCHLD. + * This locking looks funny but it is protecting access to the + * thread via p_uthlist. + */ + proc_lock(q); + uth->uu_siglist &= ~mask; /* clear pending signal */ + proc_unlock(q); } - pcr = p->p_cred; - p->p_cred = NULL; - FREE_ZONE(pcr, sizeof *pcr, M_SUBPROC); } + + /* Clean up */ + (void)reap_child_locked(q, p, 0, reparentedtoinit, 0, 0); - /* - * Release reference to text vnode - */ - if (p->p_textvp) - vrele(p->p_textvp); - - /* - * Finally finished with old proc entry. - * Unlink it from its process group and free it. - */ - leavepgrp(p); - LIST_REMOVE(p, p_list); /* off zombproc */ - LIST_REMOVE(p, p_sibling); - FREE_ZONE(p, sizeof *p, M_PROC); - nprocs--; - q->p_flag &= ~P_WAITING; return (0); } - if (p->p_stat == SSTOP && (p->p_flag & P_WAITED) == 0 && - (p->p_flag & P_TRACED || uap->options & WUNTRACED)) { - p->p_flag |= P_WAITED; + if (p->p_stat == SSTOP && (p->p_lflag & P_LWAITED) == 0 && + (p->p_lflag & P_LTRACED || uap->options & WUNTRACED)) { + proc_list_unlock(); +#if CONFIG_MACF + if ((error = mac_proc_check_wait(q, p)) != 0) + goto out; +#endif + proc_lock(p); + p->p_lflag |= P_LWAITED; + proc_unlock(p); retval[0] = p->p_pid; -#if COMPAT_43 - if (compat) { - retval[1] = W_STOPCODE(p->p_xstat); - error = 0; + if (uap->status) { + status = W_STOPCODE(p->p_xstat); + error = copyout((caddr_t)&status, + uap->status, + sizeof(status)); } else + error = 0; + goto out; + } + /* + * If we are waiting for continued processses, and this + * process was continued + */ + if ((uap->options & WCONTINUED) && + (p->p_flag & P_CONTINUED)) { + proc_list_unlock(); +#if CONFIG_MACF + if ((error = mac_proc_check_wait(q, p)) != 0) + goto out; #endif + + /* Prevent other process for waiting for this event */ + OSBitAndAtomic(~((uint32_t)P_CONTINUED), &p->p_flag); + retval[0] = p->p_pid; if (uap->status) { - status = W_STOPCODE(p->p_xstat); + status = W_STOPCODE(SIGCONT); error = copyout((caddr_t)&status, - (caddr_t)uap->status, + uap->status, sizeof(status)); } else error = 0; - q->p_flag &= ~P_WAITING; - return (error); + goto out; } + p->p_listflag &= ~P_LIST_WAITING; + wakeup(&p->p_stat); } + /* list lock is held when we get here any which way */ if (nfound == 0) { - q->p_flag &= ~P_WAITING; + proc_list_unlock(); return (ECHILD); } + if (uap->options & WNOHANG) { retval[0] = 0; - q->p_flag &= ~P_WAITING; + proc_list_unlock(); return (0); } - if (error = tsleep0((caddr_t)q, PWAIT | PCATCH, "wait", 0, wait1continue)) { - q->p_flag &= ~P_WAITING; + /* Save arguments for continuation. Backing storage is in uthread->uu_arg, and will not be deallocated */ + uth = current_uthread(); + wait4_data = &uth->uu_kevent.uu_wait4_data; + wait4_data->args = uap; + wait4_data->retval = retval; + + if ((error = msleep0((caddr_t)q, proc_list_mlock, PWAIT | PCATCH | PDROP, "wait", 0, wait1continue))) return (error); + + goto loop; +out: + proc_list_lock(); + p->p_listflag &= ~P_LIST_WAITING; + wakeup(&p->p_stat); + proc_list_unlock(); + return (error); +} + +#if DEBUG +#define ASSERT_LCK_MTX_OWNED(lock) \ + lck_mtx_assert(lock, LCK_MTX_ASSERT_OWNED) +#else +#define ASSERT_LCK_MTX_OWNED(lock) /* nothing */ +#endif + +int +waitidcontinue(int result) +{ + proc_t p; + thread_t thread; + uthread_t uth; + struct _waitid_data *waitid_data; + struct waitid_nocancel_args *uap; + int *retval; + + if (result) + return (result); + + p = current_proc(); + thread = current_thread(); + uth = (struct uthread *)get_bsdthread_info(thread); + + waitid_data = &uth->uu_kevent.uu_waitid_data; + uap = waitid_data->args; + retval = waitid_data->retval; + return(waitid_nocancel(p, uap, retval)); +} + +/* + * Description: Suspend the calling thread until one child of the process + * containing the calling thread changes state. + * + * Parameters: uap->idtype one of P_PID, P_PGID, P_ALL + * uap->id pid_t or gid_t or ignored + * uap->infop Address of siginfo_t struct in + * user space into which to return status + * uap->options flag values + * + * Returns: 0 Success + * !0 Error returning status to user space + */ +int +waitid(proc_t q, struct waitid_args *uap, int32_t *retval) +{ + __pthread_testcancel(1); + return (waitid_nocancel(q, (struct waitid_nocancel_args *)uap, retval)); +} + +int +waitid_nocancel(proc_t q, struct waitid_nocancel_args *uap, + __unused int32_t *retval) +{ + user_siginfo_t siginfo; /* siginfo data to return to caller */ + boolean_t caller64 = IS_64BIT_PROCESS(q); + int nfound; + proc_t p; + int error; + uthread_t uth; + struct _waitid_data *waitid_data; + + if (uap->options == 0 || + (uap->options & ~(WNOHANG|WNOWAIT|WCONTINUED|WSTOPPED|WEXITED))) + return (EINVAL); /* bits set that aren't recognized */ + + switch (uap->idtype) { + case P_PID: /* child with process ID equal to... */ + case P_PGID: /* child with process group ID equal to... */ + if (((int)uap->id) < 0) + return (EINVAL); + break; + case P_ALL: /* any child */ + break; + } + +loop: + proc_list_lock(); +loop1: + nfound = 0; + for (p = q->p_children.lh_first; p != 0; p = p->p_sibling.le_next) { + + switch (uap->idtype) { + case P_PID: /* child with process ID equal to... */ + if (p->p_pid != (pid_t)uap->id) + continue; + break; + case P_PGID: /* child with process group ID equal to... */ + if (p->p_pgrpid != (pid_t)uap->id) + continue; + break; + case P_ALL: /* any child */ + break; + } + + /* XXX This is racy because we don't get the lock!!!! */ + + /* + * Wait collision; go to sleep and restart; used to maintain + * the single return for waited process guarantee. + */ + if (p->p_listflag & P_LIST_WAITING) { + (void) msleep(&p->p_stat, proc_list_mlock, + PWAIT, "waitidcoll", 0); + goto loop1; + } + p->p_listflag |= P_LIST_WAITING; /* mark busy */ + + nfound++; + + bzero(&siginfo, sizeof (siginfo)); + + switch (p->p_stat) { + case SZOMB: /* Exited */ + if (!(uap->options & WEXITED)) + break; + proc_list_unlock(); +#if CONFIG_MACF + if ((error = mac_proc_check_wait(q, p)) != 0) + goto out; +#endif + siginfo.si_signo = SIGCHLD; + siginfo.si_pid = p->p_pid; + siginfo.si_status = WEXITSTATUS(p->p_xstat); + if (WIFSIGNALED(p->p_xstat)) { + siginfo.si_code = WCOREDUMP(p->p_xstat) ? + CLD_DUMPED : CLD_KILLED; + } else + siginfo.si_code = CLD_EXITED; + + if ((error = copyoutsiginfo(&siginfo, + caller64, uap->infop)) != 0) + goto out; + + /* Prevent other process for waiting for this event? */ + if (!(uap->options & WNOWAIT)) { + (void) reap_child_locked(q, p, 0, 0, 0, 0); + return (0); + } + goto out; + + case SSTOP: /* Stopped */ + /* + * If we are not interested in stopped processes, then + * ignore this one. + */ + if (!(uap->options & WSTOPPED)) + break; + + /* + * If someone has already waited it, we lost a race + * to be the one to return status. + */ + if ((p->p_lflag & P_LWAITED) != 0) + break; + proc_list_unlock(); +#if CONFIG_MACF + if ((error = mac_proc_check_wait(q, p)) != 0) + goto out; +#endif + siginfo.si_signo = SIGCHLD; + siginfo.si_pid = p->p_pid; + siginfo.si_status = p->p_xstat; /* signal number */ + siginfo.si_code = CLD_STOPPED; + + if ((error = copyoutsiginfo(&siginfo, + caller64, uap->infop)) != 0) + goto out; + + /* Prevent other process for waiting for this event? */ + if (!(uap->options & WNOWAIT)) { + proc_lock(p); + p->p_lflag |= P_LWAITED; + proc_unlock(p); + } + goto out; + + default: /* All other states => Continued */ + if (!(uap->options & WCONTINUED)) + break; + + /* + * If the flag isn't set, then this process has not + * been stopped and continued, or the status has + * already been reaped by another caller of waitid(). + */ + if ((p->p_flag & P_CONTINUED) == 0) + break; + proc_list_unlock(); +#if CONFIG_MACF + if ((error = mac_proc_check_wait(q, p)) != 0) + goto out; +#endif + siginfo.si_signo = SIGCHLD; + siginfo.si_code = CLD_CONTINUED; + proc_lock(p); + siginfo.si_pid = p->p_contproc; + siginfo.si_status = p->p_xstat; + proc_unlock(p); + + if ((error = copyoutsiginfo(&siginfo, + caller64, uap->infop)) != 0) + goto out; + + /* Prevent other process for waiting for this event? */ + if (!(uap->options & WNOWAIT)) { + OSBitAndAtomic(~((uint32_t)P_CONTINUED), + &p->p_flag); + } + goto out; + } + ASSERT_LCK_MTX_OWNED(proc_list_mlock); + + /* Not a process we are interested in; go on to next child */ + + p->p_listflag &= ~P_LIST_WAITING; + wakeup(&p->p_stat); } + ASSERT_LCK_MTX_OWNED(proc_list_mlock); + + /* No child processes that could possibly satisfy the request? */ + + if (nfound == 0) { + proc_list_unlock(); + return (ECHILD); + } + + if (uap->options & WNOHANG) { + proc_list_unlock(); +#if CONFIG_MACF + if ((error = mac_proc_check_wait(q, p)) != 0) + return (error); +#endif + /* + * The state of the siginfo structure in this case + * is undefined. Some implementations bzero it, some + * (like here) leave it untouched for efficiency. + * + * Thus the most portable check for "no matching pid with + * WNOHANG" is to store a zero into si_pid before + * invocation, then check for a non-zero value afterwards. + */ + return (0); + } + + /* Save arguments for continuation. Backing storage is in uthread->uu_arg, and will not be deallocated */ + uth = current_uthread(); + waitid_data = &uth->uu_kevent.uu_waitid_data; + waitid_data->args = uap; + waitid_data->retval = retval; + + if ((error = msleep0(q, proc_list_mlock, + PWAIT | PCATCH | PDROP, "waitid", 0, waitidcontinue)) != 0) + return (error); + goto loop; +out: + proc_list_lock(); + p->p_listflag &= ~P_LIST_WAITING; + wakeup(&p->p_stat); + proc_list_unlock(); + return (error); } /* * make process 'parent' the new parent of process 'child'. */ void -proc_reparent(child, parent) - register struct proc *child; - register struct proc *parent; +proc_reparentlocked(proc_t child, proc_t parent, int cansignal, int locked) { + proc_t oldparent = PROC_NULL; if (child->p_pptr == parent) return; + if (locked == 0) + proc_list_lock(); + + oldparent = child->p_pptr; +#if __PROC_INTERNAL_DEBUG + if (oldparent == PROC_NULL) + panic("proc_reparent: process %p does not have a parent\n", child); +#endif + LIST_REMOVE(child, p_sibling); +#if __PROC_INTERNAL_DEBUG + if (oldparent->p_childrencnt == 0) + panic("process children count already 0\n"); +#endif + oldparent->p_childrencnt--; +#if __PROC_INTERNAL_DEBUG1 + if (oldparent->p_childrencnt < 0) + panic("process children count -ve\n"); +#endif LIST_INSERT_HEAD(&parent->p_children, child, p_sibling); + parent->p_childrencnt++; child->p_pptr = parent; + child->p_ppid = parent->p_pid; + + proc_list_unlock(); + + if ((cansignal != 0) && (initproc == parent) && (child->p_stat == SZOMB)) + psignal(initproc, SIGCHLD); + if (locked == 1) + proc_list_lock(); } -kern_return_t -init_process(void) /* - * Make the current process an "init" process, meaning - * that it doesn't have a parent, and that it won't be - * gunned down by kill(-1, 0). + * Exit: deallocate address space and other resources, change proc state + * to zombie, and unlink proc from allproc and parent's lists. Save exit + * status and rusage for wait(). Check for child processes and orphan them. */ + +void +vfork_exit(proc_t p, int rv) +{ + vfork_exit_internal(p, rv, 0); +} + +void +vfork_exit_internal(proc_t p, int rv, int forceexit) { - register struct proc *p = current_proc(); + thread_t self = current_thread(); +#ifdef FIXME + struct task *task = p->task; +#endif + struct uthread *ut; + + /* + * If a thread in this task has already + * called exit(), then halt any others + * right here. + */ - if (suser(p->p_ucred, &p->p_acflag)) - return(KERN_NO_ACCESS); + ut = get_bsdthread_info(self); - if (p->p_pid != 1 && p->p_pgid != p->p_pid) - enterpgrp(p, p->p_pid, 0); - p->p_flag |= P_SYSTEM; + + proc_lock(p); + if ((p->p_lflag & P_LPEXIT) == P_LPEXIT) { + /* + * This happens when a parent exits/killed and vfork is in progress + * other threads. But shutdown code for ex has already called exit1() + */ + proc_unlock(p); + return; + } + p->p_lflag |= (P_LEXIT | P_LPEXIT); + proc_unlock(p); + + if (forceexit == 0) { + /* + * parent of a vfork child has already called exit() and the + * thread that has vfork in proress terminates. So there is no + * separate address space here and it has already been marked for + * termination. This was never covered before and could cause problems + * if we block here for outside code. + */ + /* Notify the perf server */ + (void)sys_perf_notify(self, p->p_pid); + } /* - * Take us out of the sibling chain, and - * out of our parent's child chain. + * Remove proc from allproc queue and from pidhash chain. + * Need to do this before we do anything that can block. + * Not doing causes things like mount() find this on allproc + * in partially cleaned state. */ - LIST_REMOVE(p, p_sibling); - p->p_sibling.le_prev = NULL; - p->p_sibling.le_next = NULL; - p->p_pptr = kernproc; - return(KERN_SUCCESS); + proc_list_lock(); + +#if CONFIG_MEMORYSTATUS + memorystatus_remove(p, TRUE); +#endif + + LIST_REMOVE(p, p_list); + LIST_INSERT_HEAD(&zombproc, p, p_list); /* Place onto zombproc. */ + /* will not be visible via proc_find */ + p->p_listflag |= P_LIST_EXITED; + + proc_list_unlock(); + + proc_lock(p); + p->p_xstat = rv; + p->p_lflag &= ~(P_LTRACED | P_LPPWAIT); + p->p_sigignore = ~0; + proc_unlock(p); + + proc_spinlock(p); + if (thread_call_cancel(p->p_rcall)) + p->p_ractive--; + + while (p->p_ractive > 0) { + proc_spinunlock(p); + + delay(1); + + proc_spinlock(p); + } + proc_spinunlock(p); + + thread_call_free(p->p_rcall); + p->p_rcall = NULL; + + ut->uu_siglist = 0; + + vproc_exit(p); } -void -process_terminate_self(void) +void +vproc_exit(proc_t p) { - struct proc *p = current_proc(); + proc_t q; + proc_t pp; + + vnode_t tvp; +#ifdef FIXME + struct task *task = p->task; +#endif + struct pgrp * pg; + struct session *sessp; + struct rusage_superset *rup; + + /* XXX Zombie allocation may fail, in which case stats get lost */ + MALLOC_ZONE(rup, struct rusage_superset *, + sizeof (*rup), M_ZOMBIE, M_WAITOK); + + proc_refdrain(p); - if (p != NULL) { - exit1(p, W_EXITCODE(0, SIGKILL)); - /*NOTREACHED*/ + /* + * Close open files and release open-file table. + * This may block! + */ + fdfree(p); + + sessp = proc_session(p); + if (SESS_LEADER(p, sessp)) { + + if (sessp->s_ttyvp != NULLVP) { + struct vnode *ttyvp; + int ttyvid; + int cttyflag = 0; + struct vfs_context context; + struct tty *tp; + + /* + * Controlling process. + * Signal foreground pgrp, + * drain controlling terminal + * and revoke access to controlling terminal. + */ + session_lock(sessp); + tp = SESSION_TP(sessp); + if ((tp != TTY_NULL) && (tp->t_session == sessp)) { + session_unlock(sessp); + + /* + * We're going to SIGHUP the foreground process + * group. It can't change from this point on + * until the revoke is complete. + * The process group changes under both the tty + * lock and proc_list_lock but we need only one + */ + tty_lock(tp); + ttysetpgrphup(tp); + tty_unlock(tp); + + tty_pgsignal(tp, SIGHUP, 1); + + session_lock(sessp); + tp = SESSION_TP(sessp); + } + cttyflag = sessp->s_flags & S_CTTYREF; + sessp->s_flags &= ~S_CTTYREF; + ttyvp = sessp->s_ttyvp; + ttyvid = sessp->s_ttyvid; + sessp->s_ttyvp = NULL; + sessp->s_ttyvid = 0; + sessp->s_ttyp = TTY_NULL; + sessp->s_ttypgrpid = NO_PID; + session_unlock(sessp); + + if ((ttyvp != NULLVP) && (vnode_getwithvid(ttyvp, ttyvid) == 0)) { + if (tp != TTY_NULL) { + tty_lock(tp); + (void) ttywait(tp); + tty_unlock(tp); + } + context.vc_thread = proc_thread(p); /* XXX */ + context.vc_ucred = kauth_cred_proc_ref(p); + VNOP_REVOKE(ttyvp, REVOKEALL, &context); + if (cttyflag) { + /* + * Release the extra usecount taken in cttyopen. + * usecount should be released after VNOP_REVOKE is called. + * This usecount was taken to ensure that + * the VNOP_REVOKE results in a close to + * the tty since cttyclose is a no-op. + */ + vnode_rele(ttyvp); + } + vnode_put(ttyvp); + kauth_cred_unref(&context.vc_ucred); + ttyvp = NULLVP; + } + if (tp) { + /* + * This is cleared even if not set. This is also done in + * spec_close to ensure that the flag is cleared. + */ + tty_lock(tp); + ttyclrpgrphup(tp); + tty_unlock(tp); + + ttyfree(tp); + } + } + session_lock(sessp); + sessp->s_leader = NULL; + session_unlock(sessp); + } + session_rele(sessp); + + pg = proc_pgrp(p); + fixjobc(p, pg, 0); + pg_rele(pg); + + p->p_rlimit[RLIMIT_FSIZE].rlim_cur = RLIM_INFINITY; + + proc_list_lock(); + proc_childdrainstart(p); + while ((q = p->p_children.lh_first) != NULL) { + if (q->p_stat == SZOMB) { + if (p != q->p_pptr) + panic("parent child linkage broken"); + /* check for lookups by zomb sysctl */ + while ((q->p_listflag & P_LIST_WAITING) == P_LIST_WAITING) { + msleep(&q->p_stat, proc_list_mlock, PWAIT, "waitcoll", 0); + } + q->p_listflag |= P_LIST_WAITING; + /* + * This is a named reference and it is not granted + * if the reap is already in progress. So we get + * the reference here exclusively and their can be + * no waiters. So there is no need for a wakeup + * after we are done. AlsO the reap frees the structure + * and the proc struct cannot be used for wakeups as well. + * It is safe to use q here as this is system reap + */ + (void)reap_child_locked(p, q, 1, 0, 1, 0); + } else { + /* + * Traced processes are killed + * since their existence means someone is messing up. + */ + if (q->p_lflag & P_LTRACED) { + struct proc *opp; + + proc_list_unlock(); + + opp = proc_find(q->p_oppid); + if (opp != PROC_NULL) { + proc_list_lock(); + q->p_oppid = 0; + proc_list_unlock(); + proc_reparentlocked(q, opp, 0, 0); + proc_rele(opp); + } else { + /* original parent exited while traced */ + proc_list_lock(); + q->p_listflag |= P_LIST_DEADPARENT; + q->p_oppid = 0; + proc_list_unlock(); + proc_reparentlocked(q, initproc, 0, 0); + } + + proc_lock(q); + q->p_lflag &= ~P_LTRACED; + + if (q->sigwait_thread) { + thread_t thread = q->sigwait_thread; + + proc_unlock(q); + /* + * The sigwait_thread could be stopped at a + * breakpoint. Wake it up to kill. + * Need to do this as it could be a thread which is not + * the first thread in the task. So any attempts to kill + * the process would result into a deadlock on q->sigwait. + */ + thread_resume(thread); + clear_wait(thread, THREAD_INTERRUPTED); + threadsignal(thread, SIGKILL, 0); + } else { + proc_unlock(q); + } + + psignal(q, SIGKILL); + proc_list_lock(); + } else { + q->p_listflag |= P_LIST_DEADPARENT; + proc_reparentlocked(q, initproc, 0, 1); + } + } } + + proc_childdrainend(p); + proc_list_unlock(); + + /* + * Release reference to text vnode + */ + tvp = p->p_textvp; + p->p_textvp = NULL; + if (tvp != NULLVP) { + vnode_rele(tvp); + } + + /* + * Save exit status and final rusage info, adding in child rusage + * info and self times. If we were unable to allocate a zombie + * structure, this information is lost. + */ + if (rup != NULL) { + rup->ru = p->p_stats->p_ru; + timerclear(&rup->ru.ru_utime); + timerclear(&rup->ru.ru_stime); + +#ifdef FIXME + if (task) { + mach_task_basic_info_data_t tinfo; + task_thread_times_info_data_t ttimesinfo; + int task_info_stuff, task_ttimes_stuff; + struct timeval ut,st; + + task_info_stuff = MACH_TASK_BASIC_INFO_COUNT; + task_info(task, MACH_TASK_BASIC_INFO, + &tinfo, &task_info_stuff); + p->p_ru->ru.ru_utime.tv_sec = tinfo.user_time.seconds; + p->p_ru->ru.ru_utime.tv_usec = tinfo.user_time.microseconds; + p->p_ru->ru.ru_stime.tv_sec = tinfo.system_time.seconds; + p->p_ru->ru.ru_stime.tv_usec = tinfo.system_time.microseconds; + + task_ttimes_stuff = TASK_THREAD_TIMES_INFO_COUNT; + task_info(task, TASK_THREAD_TIMES_INFO, + &ttimesinfo, &task_ttimes_stuff); + + ut.tv_sec = ttimesinfo.user_time.seconds; + ut.tv_usec = ttimesinfo.user_time.microseconds; + st.tv_sec = ttimesinfo.system_time.seconds; + st.tv_usec = ttimesinfo.system_time.microseconds; + timeradd(&ut,&p->p_ru->ru.ru_utime,&p->p_ru->ru.ru_utime); + timeradd(&st,&p->p_ru->ru.ru_stime,&p->p_ru->ru.ru_stime); + } +#endif /* FIXME */ + + ruadd(&rup->ru, &p->p_stats->p_cru); + + gather_rusage_info(p, &rup->ri, RUSAGE_INFO_CURRENT); + rup->ri.ri_phys_footprint = 0; + rup->ri.ri_proc_exit_abstime = mach_absolute_time(); + + /* + * Now that we have filled in the rusage info, make it + * visible to an external observer via proc_pid_rusage(). + */ + p->p_ru = rup; + } + + /* + * Free up profiling buffers. + */ + { + struct uprof *p0 = &p->p_stats->p_prof, *p1, *pn; + + p1 = p0->pr_next; + p0->pr_next = NULL; + p0->pr_scale = 0; + + for (; p1 != NULL; p1 = pn) { + pn = p1->pr_next; + kfree(p1, sizeof *p1); + } + } + +#if PSYNCH + pth_proc_hashdelete(p); +#endif /* PSYNCH */ + + /* + * Other substructures are freed from wait(). + */ + FREE_ZONE(p->p_stats, sizeof *p->p_stats, M_PSTATS); + p->p_stats = NULL; + + FREE_ZONE(p->p_sigacts, sizeof *p->p_sigacts, M_SIGACTS); + p->p_sigacts = NULL; + + proc_limitdrop(p, 1); + p->p_limit = NULL; + + /* + * Finish up by terminating the task + * and halt this thread (only if a + * member of the task exiting). + */ + p->task = TASK_NULL; + + /* + * Notify parent that we're gone. + */ + pp = proc_parent(p); + if ((p->p_listflag & P_LIST_DEADPARENT) == 0) { + if (pp != initproc) { + proc_lock(pp); + pp->si_pid = p->p_pid; + pp->si_status = p->p_xstat; + pp->si_code = CLD_EXITED; + /* + * p_ucred usage is safe as it is an exiting process + * and reference is dropped in reap + */ + pp->si_uid = kauth_cred_getruid(p->p_ucred); + proc_unlock(pp); + } + /* mark as a zombie */ + /* mark as a zombie */ + /* No need to take proc lock as all refs are drained and + * no one except parent (reaping ) can look at this. + * The write is to an int and is coherent. Also parent is + * keyed off of list lock for reaping + */ + p->p_stat = SZOMB; + + psignal(pp, SIGCHLD); + + /* and now wakeup the parent */ + proc_list_lock(); + wakeup((caddr_t)pp); + proc_list_unlock(); + } else { + proc_list_lock(); + /* check for lookups by zomb sysctl */ + while ((p->p_listflag & P_LIST_WAITING) == P_LIST_WAITING) { + msleep(&p->p_stat, proc_list_mlock, PWAIT, "waitcoll", 0); + } + p->p_stat = SZOMB; + p->p_listflag |= P_LIST_WAITING; + + /* + * This is a named reference and it is not granted + * if the reap is already in progress. So we get + * the reference here exclusively and their can be + * no waiters. So there is no need for a wakeup + * after we are done. AlsO the reap frees the structure + * and the proc struct cannot be used for wakeups as well. + * It is safe to use p here as this is system reap + */ + (void)reap_child_locked(pp, p, 0, 0, 1, 1); + /* list lock dropped by reap_child_locked */ + } + proc_rele(pp); +} + + +/* + * munge_rusage + * LP64 support - long is 64 bits if we are dealing with a 64 bit user + * process. We munge the kernel version of rusage into the + * 64 bit version. + */ +__private_extern__ void +munge_user64_rusage(struct rusage *a_rusage_p, struct user64_rusage *a_user_rusage_p) +{ + /* timeval changes size, so utime and stime need special handling */ + a_user_rusage_p->ru_utime.tv_sec = a_rusage_p->ru_utime.tv_sec; + a_user_rusage_p->ru_utime.tv_usec = a_rusage_p->ru_utime.tv_usec; + a_user_rusage_p->ru_stime.tv_sec = a_rusage_p->ru_stime.tv_sec; + a_user_rusage_p->ru_stime.tv_usec = a_rusage_p->ru_stime.tv_usec; + /* + * everything else can be a direct assign, since there is no loss + * of precision implied boing 32->64. + */ + a_user_rusage_p->ru_maxrss = a_rusage_p->ru_maxrss; + a_user_rusage_p->ru_ixrss = a_rusage_p->ru_ixrss; + a_user_rusage_p->ru_idrss = a_rusage_p->ru_idrss; + a_user_rusage_p->ru_isrss = a_rusage_p->ru_isrss; + a_user_rusage_p->ru_minflt = a_rusage_p->ru_minflt; + a_user_rusage_p->ru_majflt = a_rusage_p->ru_majflt; + a_user_rusage_p->ru_nswap = a_rusage_p->ru_nswap; + a_user_rusage_p->ru_inblock = a_rusage_p->ru_inblock; + a_user_rusage_p->ru_oublock = a_rusage_p->ru_oublock; + a_user_rusage_p->ru_msgsnd = a_rusage_p->ru_msgsnd; + a_user_rusage_p->ru_msgrcv = a_rusage_p->ru_msgrcv; + a_user_rusage_p->ru_nsignals = a_rusage_p->ru_nsignals; + a_user_rusage_p->ru_nvcsw = a_rusage_p->ru_nvcsw; + a_user_rusage_p->ru_nivcsw = a_rusage_p->ru_nivcsw; +} + +/* For a 64-bit kernel and 32-bit userspace, munging may be needed */ +__private_extern__ void +munge_user32_rusage(struct rusage *a_rusage_p, struct user32_rusage *a_user_rusage_p) +{ + /* timeval changes size, so utime and stime need special handling */ + a_user_rusage_p->ru_utime.tv_sec = a_rusage_p->ru_utime.tv_sec; + a_user_rusage_p->ru_utime.tv_usec = a_rusage_p->ru_utime.tv_usec; + a_user_rusage_p->ru_stime.tv_sec = a_rusage_p->ru_stime.tv_sec; + a_user_rusage_p->ru_stime.tv_usec = a_rusage_p->ru_stime.tv_usec; + /* + * everything else can be a direct assign. We currently ignore + * the loss of precision + */ + a_user_rusage_p->ru_maxrss = a_rusage_p->ru_maxrss; + a_user_rusage_p->ru_ixrss = a_rusage_p->ru_ixrss; + a_user_rusage_p->ru_idrss = a_rusage_p->ru_idrss; + a_user_rusage_p->ru_isrss = a_rusage_p->ru_isrss; + a_user_rusage_p->ru_minflt = a_rusage_p->ru_minflt; + a_user_rusage_p->ru_majflt = a_rusage_p->ru_majflt; + a_user_rusage_p->ru_nswap = a_rusage_p->ru_nswap; + a_user_rusage_p->ru_inblock = a_rusage_p->ru_inblock; + a_user_rusage_p->ru_oublock = a_rusage_p->ru_oublock; + a_user_rusage_p->ru_msgsnd = a_rusage_p->ru_msgsnd; + a_user_rusage_p->ru_msgrcv = a_rusage_p->ru_msgrcv; + a_user_rusage_p->ru_nsignals = a_rusage_p->ru_nsignals; + a_user_rusage_p->ru_nvcsw = a_rusage_p->ru_nvcsw; + a_user_rusage_p->ru_nivcsw = a_rusage_p->ru_nivcsw; }