#include <machine/reg.h>
#include <machine/psl.h>
#include "compat_43.h"
#include <sys/param.h>
#include <sys/systm.h>
#include <sys/ioctl.h>
#include <sys/proc_internal.h>
#include <sys/proc.h>
#include <sys/kauth.h>
#include <sys/tty.h>
#include <sys/time.h>
#include <sys/resource.h>
#include <sys/kernel.h>
#include <sys/wait.h>
#include <sys/file_internal.h>
#include <sys/vnode_internal.h>
#include <sys/syslog.h>
#include <sys/malloc.h>
#include <sys/resourcevar.h>
#include <sys/ptrace.h>
#include <sys/proc_info.h>
#include <sys/reason.h>
#include <sys/_types/_timeval64.h>
#include <sys/user.h>
#include <sys/aio_kern.h>
#include <sys/sysproto.h>
#include <sys/signalvar.h>
#include <sys/kdebug.h>
#include <sys/filedesc.h>
#if SYSV_SHM
#include <sys/shm_internal.h>
#endif
#include <sys/acct.h>
#if CONFIG_PERSONAS
#include <sys/persona.h>
#endif
#include <security/audit/audit.h>
#include <bsm/audit_kevents.h>
#include <mach/mach_types.h>
#include <kern/exc_resource.h>
#include <kern/kern_types.h>
#include <kern/kalloc.h>
#include <kern/task.h>
#include <corpses/task_corpse.h>
#include <kern/thread.h>
#include <kern/thread_call.h>
#include <kern/sched_prim.h>
#include <kern/assert.h>
#include <kern/policy_internal.h>
#include <sys/codesign.h>
#if CONFIG_MEMORYSTATUS
#include <sys/kern_memorystatus.h>
#endif
#if CONFIG_DTRACE
void dtrace_proc_exit(proc_t p);
#include <sys/dtrace_ptss.h>
#endif
#if CONFIG_MACF
#include <security/mac.h>
#include <security/mac_mach_internal.h>
#include <sys/syscall.h>
#endif
#include <mach/mach_types.h>
#include <mach/task.h>
#include <mach/thread_act.h>
#include <vm/vm_protos.h>
#include <sys/sdt.h>
void proc_prepareexit(proc_t p, int rv, boolean_t perf_notify);
void gather_populate_corpse_crashinfo(proc_t p, void *crash_info_ptr, mach_exception_data_type_t code, mach_exception_data_type_t subcode, uint64_t *udata_buffer, int num_udata);
mach_exception_data_type_t proc_encode_exit_exception_code(proc_t p);
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);
static void populate_corpse_crashinfo(proc_t p, void *crash_info_ptr, struct rusage_superset *rup, mach_exception_data_type_t code, mach_exception_data_type_t subcode, uint64_t *udata_buffer, int num_udata);
static void proc_update_corpse_exception_codes(proc_t p, mach_exception_data_type_t *code, mach_exception_data_type_t *subcode);
extern int proc_pidpathinfo_internal(proc_t p, uint64_t arg, char *buffer, uint32_t buffersize, int32_t *retval);
static void abort_with_payload_internal(proc_t p, uint32_t reason_namespace, uint64_t reason_code, user_addr_t payload,
uint32_t payload_size, user_addr_t reason_string, uint64_t reason_flags);
static __attribute__((noinline)) void launchd_crashed_panic(proc_t p, int rv);
extern void proc_piduniqidentifierinfo(proc_t p, struct proc_uniqidentifierinfo *p_uniqidinfo);
extern void task_coalition_ids(task_t task, uint64_t ids[COALITION_NUM_TYPES]);
extern uint64_t get_task_phys_footprint_limit(task_t);
int proc_list_uptrs(void *p, uint64_t *udata_buffer, int size);
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);
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);
out->si_value.sival_ptr = CAST_DOWN_EXPLICIT(user32_addr_t,in->si_value.sival_ptr);
out->si_band = in->si_band;
}
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;
out->si_value.sival_ptr = in->si_value.sival_ptr;
out->si_band = in->si_band;
}
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)));
}
}
void gather_populate_corpse_crashinfo(proc_t p, void *crash_info_ptr, mach_exception_data_type_t code, mach_exception_data_type_t subcode, uint64_t *udata_buffer, int num_udata)
{
struct rusage_superset rup;
gather_rusage_info(p, &rup.ri, RUSAGE_INFO_CURRENT);
rup.ri.ri_phys_footprint = 0;
populate_corpse_crashinfo(p, crash_info_ptr, &rup, code, subcode, udata_buffer, num_udata);
}
static void proc_update_corpse_exception_codes(proc_t p, mach_exception_data_type_t *code, mach_exception_data_type_t *subcode)
{
mach_exception_data_type_t code_update = *code;
mach_exception_data_type_t subcode_update = *subcode;
if (p->p_exit_reason == OS_REASON_NULL) {
return;
}
switch (p->p_exit_reason->osr_namespace) {
case OS_REASON_JETSAM:
if (p->p_exit_reason->osr_code == JETSAM_REASON_MEMORY_PERPROCESSLIMIT) {
EXC_RESOURCE_ENCODE_TYPE(code_update, RESOURCE_TYPE_MEMORY);
EXC_RESOURCE_ENCODE_FLAVOR(code_update, FLAVOR_HIGH_WATERMARK);
EXC_RESOURCE_HWM_ENCODE_LIMIT(code_update, ((get_task_phys_footprint_limit(p->task)) >> 20));
subcode_update = 0;
break;
}
break;
default:
break;
}
*code = code_update;
*subcode = subcode_update;
return;
}
mach_exception_data_type_t proc_encode_exit_exception_code(proc_t p)
{
uint64_t subcode = 0;
if (p->p_exit_reason == OS_REASON_NULL) {
return 0;
}
ENCODE_OSR_NAMESPACE_TO_MACH_EXCEPTION_CODE(subcode, p->p_exit_reason->osr_namespace);
ENCODE_OSR_CODE_TO_MACH_EXCEPTION_CODE(subcode, p->p_exit_reason->osr_code);
return (mach_exception_data_type_t)subcode;
}
static void populate_corpse_crashinfo(proc_t p, void *crash_info_ptr, struct rusage_superset *rup, mach_exception_data_type_t code, mach_exception_data_type_t subcode, uint64_t *udata_buffer, int num_udata)
{
mach_vm_address_t uaddr = 0;
mach_exception_data_type_t exc_codes[EXCEPTION_CODE_MAX];
exc_codes[0] = code;
exc_codes[1] = subcode;
cpu_type_t cputype;
struct proc_uniqidentifierinfo p_uniqidinfo;
struct proc_workqueueinfo pwqinfo;
int retval = 0;
uint64_t crashed_threadid = thread_tid(current_thread());
unsigned int pflags = 0;
uint64_t max_footprint_mb;
uint64_t max_footprint;
#if CONFIG_MEMORYSTATUS
int memstat_dirty_flags = 0;
#endif
if (KERN_SUCCESS == kcdata_get_memory_addr(crash_info_ptr, TASK_CRASHINFO_EXCEPTION_CODES, sizeof(exc_codes), &uaddr)) {
kcdata_memcpy(crash_info_ptr, uaddr, exc_codes, sizeof(exc_codes));
}
if (KERN_SUCCESS == kcdata_get_memory_addr(crash_info_ptr, TASK_CRASHINFO_PID, sizeof(p->p_pid), &uaddr)) {
kcdata_memcpy(crash_info_ptr, uaddr, &p->p_pid, sizeof(p->p_pid));
}
if (KERN_SUCCESS == kcdata_get_memory_addr(crash_info_ptr, TASK_CRASHINFO_PPID, sizeof(p->p_ppid), &uaddr)) {
kcdata_memcpy(crash_info_ptr, uaddr, &p->p_ppid, sizeof(p->p_ppid));
}
if (KERN_SUCCESS == kcdata_get_memory_addr(crash_info_ptr, TASK_CRASHINFO_CRASHED_THREADID, sizeof(uint64_t), &uaddr)) {
kcdata_memcpy(crash_info_ptr, uaddr, &crashed_threadid, sizeof(uint64_t));
}
if (KERN_SUCCESS ==
kcdata_get_memory_addr(crash_info_ptr, TASK_CRASHINFO_BSDINFOWITHUNIQID, sizeof(struct proc_uniqidentifierinfo), &uaddr)) {
proc_piduniqidentifierinfo(p, &p_uniqidinfo);
kcdata_memcpy(crash_info_ptr, uaddr, &p_uniqidinfo, sizeof(struct proc_uniqidentifierinfo));
}
if (KERN_SUCCESS == kcdata_get_memory_addr(crash_info_ptr, TASK_CRASHINFO_RUSAGE_INFO, sizeof(rusage_info_current), &uaddr)) {
kcdata_memcpy(crash_info_ptr, uaddr, &rup->ri, sizeof(rusage_info_current));
}
if (KERN_SUCCESS == kcdata_get_memory_addr(crash_info_ptr, TASK_CRASHINFO_PROC_CSFLAGS, sizeof(p->p_csflags), &uaddr)) {
kcdata_memcpy(crash_info_ptr, uaddr, &p->p_csflags, sizeof(p->p_csflags));
}
if (KERN_SUCCESS == kcdata_get_memory_addr(crash_info_ptr, TASK_CRASHINFO_PROC_NAME, sizeof(p->p_comm), &uaddr)) {
kcdata_memcpy(crash_info_ptr, uaddr, &p->p_comm, sizeof(p->p_comm));
}
if (KERN_SUCCESS == kcdata_get_memory_addr(crash_info_ptr, TASK_CRASHINFO_PROC_STARTTIME, sizeof(p->p_start), &uaddr)) {
struct timeval64 t64;
t64.tv_sec = (int64_t)p->p_start.tv_sec;
t64.tv_usec = (int64_t)p->p_start.tv_usec;
kcdata_memcpy(crash_info_ptr, uaddr, &t64, sizeof(t64));
}
if (KERN_SUCCESS == kcdata_get_memory_addr(crash_info_ptr, TASK_CRASHINFO_USERSTACK, sizeof(p->user_stack), &uaddr)) {
kcdata_memcpy(crash_info_ptr, uaddr, &p->user_stack, sizeof(p->user_stack));
}
if (KERN_SUCCESS == kcdata_get_memory_addr(crash_info_ptr, TASK_CRASHINFO_ARGSLEN, sizeof(p->p_argslen), &uaddr)) {
kcdata_memcpy(crash_info_ptr, uaddr, &p->p_argslen, sizeof(p->p_argslen));
}
if (KERN_SUCCESS == kcdata_get_memory_addr(crash_info_ptr, TASK_CRASHINFO_PROC_ARGC, sizeof(p->p_argc), &uaddr)) {
kcdata_memcpy(crash_info_ptr, uaddr, &p->p_argc, sizeof(p->p_argc));
}
if (KERN_SUCCESS == kcdata_get_memory_addr(crash_info_ptr, TASK_CRASHINFO_PROC_PATH, MAXPATHLEN, &uaddr)) {
char *buf = (char *) kalloc(MAXPATHLEN);
if (buf != NULL) {
bzero(buf, MAXPATHLEN);
proc_pidpathinfo_internal(p, 0, buf, MAXPATHLEN, &retval);
kcdata_memcpy(crash_info_ptr, uaddr, buf, MAXPATHLEN);
kfree(buf, MAXPATHLEN);
}
}
pflags = p->p_flag & (P_LP64 | P_SUGID);
if (KERN_SUCCESS == kcdata_get_memory_addr(crash_info_ptr, TASK_CRASHINFO_PROC_FLAGS, sizeof(pflags), &uaddr)) {
kcdata_memcpy(crash_info_ptr, uaddr, &pflags, sizeof(pflags));
}
if (KERN_SUCCESS == kcdata_get_memory_addr(crash_info_ptr, TASK_CRASHINFO_UID, sizeof(p->p_uid), &uaddr)) {
kcdata_memcpy(crash_info_ptr, uaddr, &p->p_uid, sizeof(p->p_uid));
}
if (KERN_SUCCESS == kcdata_get_memory_addr(crash_info_ptr, TASK_CRASHINFO_GID, sizeof(p->p_gid), &uaddr)) {
kcdata_memcpy(crash_info_ptr, uaddr, &p->p_gid, sizeof(p->p_gid));
}
cputype = cpu_type() & ~CPU_ARCH_MASK;
if (IS_64BIT_PROCESS(p))
cputype |= CPU_ARCH_ABI64;
if (KERN_SUCCESS == kcdata_get_memory_addr(crash_info_ptr, TASK_CRASHINFO_CPUTYPE, sizeof(cpu_type_t), &uaddr)) {
kcdata_memcpy(crash_info_ptr, uaddr, &cputype, sizeof(cpu_type_t));
}
if (KERN_SUCCESS == kcdata_get_memory_addr(crash_info_ptr, TASK_CRASHINFO_MEMORY_LIMIT, sizeof(max_footprint_mb), &uaddr)) {
max_footprint = get_task_phys_footprint_limit(p->task);
max_footprint_mb = max_footprint >> 20;
kcdata_memcpy(crash_info_ptr, uaddr, &max_footprint_mb, sizeof(max_footprint_mb));
}
bzero(&pwqinfo, sizeof(struct proc_workqueueinfo));
retval = fill_procworkqueue(p, &pwqinfo);
if (retval == 0) {
if (KERN_SUCCESS == kcdata_get_memory_addr(crash_info_ptr, TASK_CRASHINFO_WORKQUEUEINFO, sizeof(struct proc_workqueueinfo), &uaddr)) {
kcdata_memcpy(crash_info_ptr, uaddr, &pwqinfo, sizeof(struct proc_workqueueinfo));
}
}
if (KERN_SUCCESS == kcdata_get_memory_addr(crash_info_ptr, TASK_CRASHINFO_RESPONSIBLE_PID, sizeof(p->p_responsible_pid), &uaddr)) {
kcdata_memcpy(crash_info_ptr, uaddr, &p->p_responsible_pid, sizeof(p->p_responsible_pid));
}
#if CONFIG_COALITIONS
if (KERN_SUCCESS == kcdata_get_memory_addr_for_array(crash_info_ptr, TASK_CRASHINFO_COALITION_ID, sizeof(uint64_t), COALITION_NUM_TYPES, &uaddr)) {
uint64_t coalition_ids[COALITION_NUM_TYPES];
task_coalition_ids(p->task, coalition_ids);
kcdata_memcpy(crash_info_ptr, uaddr, coalition_ids, sizeof(coalition_ids));
}
#endif
#if CONFIG_MEMORYSTATUS
memstat_dirty_flags = memorystatus_dirty_get(p);
if (KERN_SUCCESS == kcdata_get_memory_addr(crash_info_ptr, TASK_CRASHINFO_DIRTY_FLAGS, sizeof(memstat_dirty_flags), &uaddr)) {
kcdata_memcpy(crash_info_ptr, uaddr, &memstat_dirty_flags, sizeof(memstat_dirty_flags));
}
#endif
if (p->p_exit_reason != OS_REASON_NULL) {
if (KERN_SUCCESS == kcdata_get_memory_addr(crash_info_ptr, EXIT_REASON_SNAPSHOT, sizeof(struct exit_reason_snapshot), &uaddr)) {
struct exit_reason_snapshot ers = {
.ers_namespace = p->p_exit_reason->osr_namespace,
.ers_code = p->p_exit_reason->osr_code,
.ers_flags = p->p_exit_reason->osr_flags
};
kcdata_memcpy(crash_info_ptr, uaddr, &ers, sizeof(ers));
}
if (p->p_exit_reason->osr_kcd_buf != 0) {
uint32_t reason_buf_size = kcdata_memory_get_used_bytes(&p->p_exit_reason->osr_kcd_descriptor);
assert(reason_buf_size != 0);
if (KERN_SUCCESS == kcdata_get_memory_addr(crash_info_ptr, KCDATA_TYPE_NESTED_KCDATA, reason_buf_size, &uaddr)) {
kcdata_memcpy(crash_info_ptr, uaddr, p->p_exit_reason->osr_kcd_buf, reason_buf_size);
}
}
}
if (num_udata > 0) {
if (KERN_SUCCESS == kcdata_get_memory_addr_for_array(crash_info_ptr, TASK_CRASHINFO_UDATA_PTRS,
sizeof(uint64_t), num_udata, &uaddr)) {
kcdata_memcpy(crash_info_ptr, uaddr, udata_buffer, sizeof(uint64_t) * num_udata);
}
}
}
char *
launchd_exit_reason_get_string_desc(os_reason_t exit_reason)
{
kcdata_iter_t iter;
if (exit_reason == OS_REASON_NULL || exit_reason->osr_kcd_buf == NULL ||
exit_reason->osr_bufsize == 0) {
return NULL;
}
iter = kcdata_iter(exit_reason->osr_kcd_buf, exit_reason->osr_bufsize);
if (!kcdata_iter_valid(iter)) {
#if DEBUG || DEVELOPMENT
printf("launchd exit reason has invalid exit reason buffer\n");
#endif
return NULL;
}
if (kcdata_iter_type(iter) != KCDATA_BUFFER_BEGIN_OS_REASON) {
#if DEBUG || DEVELOPMENT
printf("launchd exit reason buffer type mismatch, expected %d got %d\n",
KCDATA_BUFFER_BEGIN_OS_REASON, kcdata_iter_type(iter));
#endif
return NULL;
}
iter = kcdata_iter_find_type(iter, EXIT_REASON_USER_DESC);
if (!kcdata_iter_valid(iter)) {
return NULL;
}
return (char *)kcdata_iter_payload(iter);
}
static __attribute__((noinline)) void
launchd_crashed_panic(proc_t p, int rv)
{
char *launchd_exit_reason_desc = launchd_exit_reason_get_string_desc(p->p_exit_reason);
if (p->p_exit_reason == OS_REASON_NULL) {
printf("pid 1 exited -- no exit reason available -- (signal %d, exit %d)\n",
WTERMSIG(rv), WEXITSTATUS(rv));
} else {
printf("pid 1 exited -- exit reason namespace %d subcode 0x%llx, description %s\n",
p->p_exit_reason->osr_namespace, p->p_exit_reason->osr_code, launchd_exit_reason_desc ?
launchd_exit_reason_desc : "none");
}
#if (DEVELOPMENT || DEBUG) && CONFIG_COREDUMP
int err;
uint64_t coredump_start = mach_absolute_time();
uint64_t coredump_end;
clock_sec_t tv_sec;
clock_usec_t tv_usec;
uint32_t tv_msec;
err = coredump(p, 300, COREDUMP_IGNORE_ULIMIT | COREDUMP_FULLFSYNC);
coredump_end = mach_absolute_time();
absolutetime_to_microtime(coredump_end - coredump_start, &tv_sec, &tv_usec);
tv_msec = tv_usec / 1000;
if (err != 0) {
printf("Failed to generate initproc core file: error %d, took %d.%03d seconds\n",
err, (uint32_t)tv_sec, tv_msec);
} else {
printf("Generated initproc core file in %d.%03d seconds\n",
(uint32_t)tv_sec, tv_msec);
}
#endif
sync(p, (void *)NULL, (int *)NULL);
if (p->p_exit_reason == OS_REASON_NULL) {
panic_plain(LAUNCHD_CRASHED_PREFIX " -- no exit reason available -- (signal %d, exit status %d %s)",
WTERMSIG(rv), WEXITSTATUS(rv), ((p->p_csflags & CS_KILLED) ? "CS_KILLED" : ""));
} else {
panic_plain(LAUNCHD_CRASHED_PREFIX " %s -- exit reason namespace %d subcode 0x%llx description: %." LAUNCHD_PANIC_REASON_STRING_MAXLEN "s",
((p->p_csflags & CS_KILLED) ? "CS_KILLED" : ""),
p->p_exit_reason->osr_namespace, p->p_exit_reason->osr_code,
launchd_exit_reason_desc ? launchd_exit_reason_desc : "none");
}
}
static void
abort_with_payload_internal(proc_t p, uint32_t reason_namespace, uint64_t reason_code, user_addr_t payload, uint32_t payload_size,
user_addr_t reason_string, uint64_t reason_flags)
{
os_reason_t exit_reason = OS_REASON_NULL;
KERNEL_DEBUG_CONSTANT(BSDDBG_CODE(DBG_BSD_PROC, BSD_PROC_EXITREASON_CREATE) | DBG_FUNC_NONE,
p->p_pid, reason_namespace,
reason_code, 0, 0);
exit_reason = build_userspace_exit_reason(reason_namespace, reason_code, payload, payload_size, reason_string,
reason_flags);
psignal_try_thread_with_reason(p, current_thread(), SIGABRT, exit_reason);
return;
}
int
abort_with_payload(struct proc *cur_proc, struct abort_with_payload_args *args,
__unused void *retval)
{
abort_with_payload_internal(cur_proc, args->reason_namespace, args->reason_code, args->payload, args->payload_size,
args->reason_string, args->reason_flags);
return 0;
}
__attribute__((noreturn))
void
exit(proc_t p, struct exit_args *uap, int *retval)
{
exit1(p, W_EXITCODE(uap->rval, 0), retval);
thread_exception_return();
while (TRUE)
thread_block(THREAD_CONTINUE_NULL);
}
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)
{
return exit_with_reason(p, rv, retval, thread_can_terminate, perf_notify, jetsam_flags, OS_REASON_NULL);
}
int
exit_with_reason(proc_t p, int rv, int *retval, boolean_t thread_can_terminate, boolean_t perf_notify,
int jetsam_flags, struct os_reason *exit_reason)
{
thread_t self = current_thread();
struct task *task = p->task;
struct uthread *ut;
int error = 0;
ut = get_bsdthread_info(self);
if ((p == current_proc()) &&
(ut->uu_flag & UT_VFORK)) {
os_reason_free(exit_reason);
if (!thread_can_terminate) {
return EINVAL;
}
vfork_exit(p, rv);
vfork_return(p , retval, p->p_pid);
unix_syscall_return(0);
}
AUDIT_ARG(exit, WEXITSTATUS(rv), 0);
AUDIT_SYSCALL_EXIT(SYS_exit, p, ut, 0);
DTRACE_PROC1(exit, int, CLD_EXITED);
proc_set_task_policy(p->task, TASK_POLICY_ATTRIBUTE,
TASK_POLICY_TERMINATED, TASK_POLICY_ENABLE);
proc_lock(p);
error = proc_transstart(p, 1, (jetsam_flags ? 1 : 0));
if (error == EDEADLK) {
proc_unlock(p);
os_reason_free(exit_reason);
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);
}
if (thread_can_terminate) {
thread_exception_return();
}
}
return error;
}
while (p->exit_thread != self) {
if (sig_try_locked(p) <= 0) {
proc_transend(p, 1);
os_reason_free(exit_reason);
if (get_threadtask(self) != task) {
proc_unlock(p);
return(0);
}
proc_unlock(p);
thread_terminate(self);
if (!thread_can_terminate) {
return 0;
}
thread_exception_return();
}
sig_lock_to_exit(p);
}
if (exit_reason != OS_REASON_NULL) {
KERNEL_DEBUG_CONSTANT(BSDDBG_CODE(DBG_BSD_PROC, BSD_PROC_EXITREASON_COMMIT) | DBG_FUNC_NONE,
p->p_pid, exit_reason->osr_namespace,
exit_reason->osr_code, 0, 0);
}
assert(p->p_exit_reason == OS_REASON_NULL);
p->p_exit_reason = exit_reason;
p->p_lflag |= P_LEXIT;
p->p_xstat = rv;
p->p_lflag |= jetsam_flags;
proc_transend(p, 1);
proc_unlock(p);
proc_prepareexit(p, rv, perf_notify);
task_terminate_internal(task);
return(0);
}
void
proc_prepareexit(proc_t p, int rv, boolean_t perf_notify)
{
mach_exception_data_type_t code = 0, subcode = 0;
struct uthread *ut;
thread_t self = current_thread();
ut = get_bsdthread_info(self);
struct rusage_superset *rup;
int kr = 0;
int create_corpse = FALSE;
if (p == initproc) {
launchd_crashed_panic(p, rv);
}
if (!(PROC_HAS_EXITREASON(p) && (PROC_EXITREASON_FLAGS(p) & OS_REASON_FLAG_NO_CRASH_REPORT)) &&
(hassigprop(WTERMSIG(rv), SA_CORE) || ((p->p_csflags & CS_KILLED) != 0) ||
(PROC_HAS_EXITREASON(p) && (PROC_EXITREASON_FLAGS(p) &
OS_REASON_FLAG_GENERATE_CRASH_REPORT)))) {
if ((SIGSEGV == WTERMSIG(rv)) &&
(p->p_pptr->p_lflag & P_LNOATTACH)) {
goto skipcheck;
}
code = ((WTERMSIG(rv) & 0xff) << 24) |
((ut->uu_exception & 0x0f) << 20) |
((int)ut->uu_code & 0xfffff);
subcode = ut->uu_subcode;
kr = task_exception_notify(EXC_CRASH, code, subcode);
if (kr != 0) {
create_corpse = TRUE;
}
}
skipcheck:
if (perf_notify) {
(void)sys_perf_notify(self, p->p_pid);
}
if (create_corpse == TRUE) {
kr = task_mark_corpse(p->task);
if (kr != KERN_SUCCESS) {
if (kr == KERN_NO_SPACE) {
printf("Process[%d] has no vm space for corpse info.\n", p->p_pid);
} else if (kr == KERN_NOT_SUPPORTED) {
printf("Process[%d] was destined to be corpse. But corpse is disabled by config.\n", p->p_pid);
} else {
printf("Process[%d] crashed: %s. Too many corpses being created.\n", p->p_pid, p->p_comm);
}
create_corpse = FALSE;
}
}
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();
p->p_ru = rup;
}
if (create_corpse) {
int est_knotes = 0, num_knotes = 0;
uint64_t *buffer = NULL;
int buf_size = 0;
est_knotes = proc_list_uptrs(p, NULL, 0);
if (est_knotes > 0) {
buf_size = (est_knotes + 32) * sizeof(uint64_t);
buffer = (uint64_t *) kalloc(buf_size);
num_knotes = proc_list_uptrs(p, buffer, buf_size);
if (num_knotes > est_knotes + 32) {
num_knotes = est_knotes + 32;
}
}
proc_update_corpse_exception_codes(p, &code, &subcode);
populate_corpse_crashinfo(p, task_get_corpseinfo(p->task), rup, code, subcode, buffer, num_knotes);
if (buffer != NULL) {
kfree(buffer, buf_size);
}
}
proc_list_lock();
#if CONFIG_MEMORYSTATUS
memorystatus_remove(p, TRUE);
#endif
LIST_REMOVE(p, p_list);
LIST_INSERT_HEAD(&zombproc, p, p_list);
p->p_listflag |= P_LIST_EXITED;
proc_list_unlock();
#ifdef PGINPROF
vmsizmon();
#endif
proc_lock(p);
p->p_lflag &= ~(P_LTRACED | P_LPPWAIT);
p->p_sigignore = ~(sigcantmask);
ut->uu_siglist = 0;
proc_unlock(p);
}
void
proc_exit(proc_t p)
{
proc_t q;
proc_t pp;
struct task *task = p->task;
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)) {
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;
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);
#if CONFIG_DTRACE
dtrace_proc_exit(p);
#endif
nspace_proc_exit(p);
proc_refdrain(p);
task_clear_cpuusage(p->task, TRUE);
workqueue_mark_exiting(p);
workqueue_exit(p);
kqueue_dealloc(p->p_wqkqueue);
p->p_wqkqueue = NULL;
_aio_exit( p );
fdfree(p);
if (uth->uu_lowpri_window) {
throttle_lowpri_io(0);
}
#if SYSV_SHM
if (p->vm_shm)
shmexit(p);
#endif
#if SYSV_SEM
semexit(p);
#endif
#if PSYNCH
pth_proc_hashdelete(p);
#endif
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;
session_lock(sessp);
tp = SESSION_TP(sessp);
if ((tp != TTY_NULL) && (tp->t_session == sessp)) {
session_unlock(sessp);
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);
context.vc_ucred = kauth_cred_proc_ref(p);
VNOP_REVOKE(ttyvp, REVOKEALL, &context);
if (cttyflag) {
vnode_rele(ttyvp);
}
vnode_put(ttyvp);
kauth_cred_unref(&context.vc_ucred);
ttyvp = NULLVP;
}
if (tp) {
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;
(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);
}
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");
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;
(void)reap_child_locked(p, q, 1, reparentedtoinit, 1, 0);
} else {
if (q->p_lflag & P_LTRACED) {
struct proc *opp;
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 {
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);
thread_resume(thread);
clear_wait(thread, THREAD_INTERRUPTED);
threadsignal(thread, SIGKILL, 0, TRUE);
} 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);
}
}
}
proc_childdrainend(p);
proc_list_unlock();
tvp = p->p_textvp;
p->p_textvp = NULL;
if (tvp != NULLVP) {
vnode_rele(tvp);
}
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->ru), &p->p_stats->p_cru);
}
{
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);
}
}
proc_free_realitimer(p);
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;
vm_purgeable_disown(p->task);
p->task = TASK_NULL;
set_bsdtask_info(task, NULL);
knote_hint = NOTE_EXIT | (p->p_xstat & 0xffff);
proc_knote(p, knote_hint);
uth->uu_flag |= UT_PROCEXIT;
pp = proc_parent(p);
if (pp->p_flag & P_NOCLDWAIT) {
if (p->p_ru != NULL) {
proc_lock(pp);
#if 3839178
#else
ruadd(&pp->p_stats->p_cru, &p->p_ru->ru);
#endif
update_rusage_info_child(&pp->p_stats->ri_child, &p->p_ru->ri);
proc_unlock(pp);
}
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;
pp->si_uid = kauth_cred_getruid(p->p_ucred);
proc_unlock(pp);
}
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;
psignal(pp, SIGCHLD);
proc_list_lock();
wakeup((caddr_t)pp);
proc_list_unlock();
} else {
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);
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;
(void)reap_child_locked(pp, p, 1, 0, 1, 1);
}
if (uth->uu_lowpri_window) {
throttle_lowpri_io(0);
}
proc_rele(pp);
}
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;
if (locked == 1)
proc_list_unlock();
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_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);
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);
}
proc_knote(child, knote_hint);
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
proc_knote_drain(child);
child->p_xstat = 0;
if (child->p_ru) {
proc_lock(parent);
#if 3839178
if (!(parent->p_flag & P_NOCLDWAIT))
#endif
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);
}
AUDIT_SESSION_PROCEXIT(child);
#if CONFIG_PERSONAS
persona_proc_drop(child);
#endif
(void)chgproccnt(kauth_cred_getruid(child->p_ucred), -1);
os_reason_free(child->p_exit_reason);
if (IS_VALID_CRED(child->p_ucred)) {
kauth_cred_unref(&child->p_ucred);
}
leavepgrp(child);
proc_list_lock();
LIST_REMOVE(child, p_list);
parent->p_childrencnt--;
LIST_REMOVE(child, p_sibling);
if ((deadparent != 0) && (LIST_EMPTY(&parent->p_children)))
wakeup((caddr_t)parent);
child->p_listflag &= ~P_LIST_WAITING;
wakeup(&child->p_stat);
LIST_REMOVE(child, p_hash);
child->p_listflag &= ~P_LIST_INHASH;
proc_checkdeadrefs(child);
nprocs--;
if (deadparent) {
child->p_listflag |= P_LIST_DEADPARENT;
}
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);
lck_mtx_destroy(&child->p_ucred_mlock, proc_ucred_mlock_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
lck_mtx_destroy(&child->p_mlock, proc_lck_grp);
lck_mtx_destroy(&child->p_fdmlock, proc_lck_grp);
lck_mtx_destroy(&child->p_ucred_mlock, 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
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_pgrpid;
loop:
proc_list_lock();
loop1:
nfound = 0;
sibling_count = 0;
PCHILDREN_FOREACH(q, p) {
if ( p->p_sibling.le_next != 0 )
sibling_count++;
if (uap->pid != WAIT_ANY &&
p->p_pid != uap->pid &&
p->p_pgrpid != -(uap->pid))
continue;
nfound++;
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;
if (p->p_stat == SZOMB) {
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 = 0xffff & p->p_xstat;
error = copyout((caddr_t)&status,
uap->status,
sizeof(status));
if (error)
goto out;
}
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));
}
}
if (error)
goto out;
}
if ( sibling_count == 0 ) {
int mask = sigmask(SIGCHLD);
uth = current_uthread();
if ( (uth->uu_sigmask & mask) != 0 ) {
proc_lock(q);
uth->uu_siglist &= ~mask;
proc_unlock(q);
}
}
(void)reap_child_locked(q, p, 0, reparentedtoinit, 0, 0);
return (0);
}
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 (uap->status) {
status = W_STOPCODE(p->p_xstat);
error = copyout((caddr_t)&status,
uap->status,
sizeof(status));
} else
error = 0;
goto out;
}
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
OSBitAndAtomic(~((uint32_t)P_CONTINUED), &p->p_flag);
retval[0] = p->p_pid;
if (uap->status) {
status = W_STOPCODE(SIGCONT);
error = copyout((caddr_t)&status,
uap->status,
sizeof(status));
} else
error = 0;
goto out;
}
p->p_listflag &= ~P_LIST_WAITING;
wakeup(&p->p_stat);
}
if (nfound == 0) {
proc_list_unlock();
return (ECHILD);
}
if (uap->options & WNOHANG) {
retval[0] = 0;
proc_list_unlock();
return (0);
}
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)
#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));
}
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;
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);
switch (uap->idtype) {
case P_PID:
case P_PGID:
if (((int)uap->id) < 0)
return (EINVAL);
break;
case P_ALL:
break;
}
loop:
proc_list_lock();
loop1:
nfound = 0;
PCHILDREN_FOREACH(q, p) {
switch (uap->idtype) {
case P_PID:
if (p->p_pid != (pid_t)uap->id)
continue;
break;
case P_PGID:
if (p->p_pgrpid != (pid_t)uap->id)
continue;
break;
case P_ALL:
break;
}
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;
nfound++;
bzero(&siginfo, sizeof (siginfo));
switch (p->p_stat) {
case SZOMB:
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;
if (!(uap->options & WNOWAIT)) {
(void) reap_child_locked(q, p, 0, 0, 0, 0);
return (0);
}
goto out;
case SSTOP:
if (!(uap->options & WSTOPPED))
break;
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;
siginfo.si_code = CLD_STOPPED;
if ((error = copyoutsiginfo(&siginfo,
caller64, uap->infop)) != 0)
goto out;
if (!(uap->options & WNOWAIT)) {
proc_lock(p);
p->p_lflag |= P_LWAITED;
proc_unlock(p);
}
goto out;
default:
if (!(uap->options & WCONTINUED))
break;
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;
if (!(uap->options & WNOWAIT)) {
OSBitAndAtomic(~((uint32_t)P_CONTINUED),
&p->p_flag);
}
goto out;
}
ASSERT_LCK_MTX_OWNED(proc_list_mlock);
p->p_listflag &= ~P_LIST_WAITING;
wakeup(&p->p_stat);
}
ASSERT_LCK_MTX_OWNED(proc_list_mlock);
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
return (0);
}
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);
}
void
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();
}
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)
{
thread_t self = current_thread();
#ifdef FIXME
struct task *task = p->task;
#endif
struct uthread *ut;
ut = get_bsdthread_info(self);
proc_lock(p);
if ((p->p_lflag & P_LPEXIT) == P_LPEXIT) {
proc_unlock(p);
return;
}
p->p_lflag |= (P_LEXIT | P_LPEXIT);
proc_unlock(p);
if (forceexit == 0) {
(void)sys_perf_notify(self, p->p_pid);
}
proc_list_lock();
#if CONFIG_MEMORYSTATUS
memorystatus_remove(p, TRUE);
#endif
LIST_REMOVE(p, p_list);
LIST_INSERT_HEAD(&zombproc, p, p_list);
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_free_realitimer(p);
ut->uu_siglist = 0;
vproc_exit(p);
}
void
vproc_exit(proc_t p)
{
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;
MALLOC_ZONE(rup, struct rusage_superset *,
sizeof (*rup), M_ZOMBIE, M_WAITOK);
proc_refdrain(p);
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;
session_lock(sessp);
tp = SESSION_TP(sessp);
if ((tp != TTY_NULL) && (tp->t_session == sessp)) {
session_unlock(sessp);
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);
context.vc_ucred = kauth_cred_proc_ref(p);
VNOP_REVOKE(ttyvp, REVOKEALL, &context);
if (cttyflag) {
vnode_rele(ttyvp);
}
vnode_put(ttyvp);
kauth_cred_unref(&context.vc_ucred);
ttyvp = NULLVP;
}
if (tp) {
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");
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;
(void)reap_child_locked(p, q, 1, 0, 1, 0);
} else {
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 {
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);
thread_resume(thread);
clear_wait(thread, THREAD_INTERRUPTED);
threadsignal(thread, SIGKILL, 0, TRUE);
} 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();
tvp = p->p_textvp;
p->p_textvp = NULL;
if (tvp != NULLVP) {
vnode_rele(tvp);
}
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
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();
p->p_ru = rup;
}
{
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
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;
p->task = TASK_NULL;
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;
pp->si_uid = kauth_cred_getruid(p->p_ucred);
proc_unlock(pp);
}
p->p_stat = SZOMB;
psignal(pp, SIGCHLD);
proc_list_lock();
wakeup((caddr_t)pp);
proc_list_unlock();
} else {
proc_list_lock();
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;
(void)reap_child_locked(pp, p, 0, 0, 1, 1);
}
proc_rele(pp);
}
__private_extern__ void
munge_user64_rusage(struct rusage *a_rusage_p, struct user64_rusage *a_user_rusage_p)
{
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;
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;
}
__private_extern__ void
munge_user32_rusage(struct rusage *a_rusage_p, struct user32_rusage *a_user_rusage_p)
{
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;
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;
}