X-Git-Url: https://git.saurik.com/apple/xnu.git/blobdiff_plain/316670eb35587141e969394ae8537d66b9211e80..eb6b6ca394357805f2bdba989abae309f718b4d8:/bsd/kern/proc_info.c diff --git a/bsd/kern/proc_info.c b/bsd/kern/proc_info.c index 482f83e0e..d4bc5e794 100644 --- a/bsd/kern/proc_info.c +++ b/bsd/kern/proc_info.c @@ -1,8 +1,8 @@ /* - * Copyright (c) 2005, 2010 Apple Computer, Inc. All rights reserved. + * Copyright (c) 2005-2016 Apple Inc. All rights reserved. * * @APPLE_OSREFERENCE_LICENSE_HEADER_START@ - * + * * 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 @@ -11,10 +11,10 @@ * 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. - * + * * 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, @@ -22,7 +22,7 @@ * 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_OSREFERENCE_LICENSE_HEADER_END@ */ @@ -45,6 +45,7 @@ #include #include #include +#include #include #include #include @@ -56,15 +57,17 @@ #include #include #include -#include #include #include +#include + #include #include #include #include #include #include +#include #include #include @@ -72,8 +75,9 @@ #include #include #include +#include -#include +#include #include @@ -81,6 +85,19 @@ #include +/* Needed by proc_pidnoteexit(), proc_pidlistuptrs() */ +#include +#include + +/* Needed by proc_listcoalitions() */ +#ifdef CONFIG_COALITIONS +#include +#endif + +#if CONFIG_MACF +#include +#endif + struct pshmnode; struct psemnode; struct pipe; @@ -88,63 +105,148 @@ struct kqueue; struct atalk; uint64_t get_dispatchqueue_offset_from_proc(void *); +uint64_t get_dispatchqueue_serialno_offset_from_proc(void *); +uint64_t get_dispatchqueue_label_offset_from_proc(void *p); +uint64_t get_return_to_kernel_offset_from_proc(void *p); int proc_info_internal(int callnum, int pid, int flavor, uint64_t arg, user_addr_t buffer, uint32_t buffersize, int32_t * retval); +/* + * TODO: Replace the noinline attribute below. Currently, it serves + * to avoid stack bloat caused by inlining multiple functions that + * have large stack footprints; when the functions are independent + * of each other (will not both be called in any given call to the + * caller), this only serves to bloat the stack, as we allocate + * space for both functions, despite the fact that we only need a + * fraction of that space. + * + * Long term, these functions should not be allocating everything on + * the stack, and should move large allocations (the huge structs + * that proc info deals in) to the heap, or eliminate them if + * possible. + * + * The functions that most desperately need to improve stack usage + * (starting with the worst offenders): + * proc_pidvnodepathinfo + * proc_pidinfo + * proc_pidregionpathinfo + * pid_vnodeinfopath + * pid_pshminfo + * pid_pseminfo + * pid_socketinfo + * proc_pid_rusage + * proc_pidoriginatorinfo + */ + /* protos for proc_info calls */ -int proc_listpids(uint32_t type, uint32_t tyoneinfo, user_addr_t buffer, uint32_t buffersize, int32_t * retval); -int proc_pidinfo(int pid, int flavor, uint64_t arg, user_addr_t buffer, uint32_t buffersize, int32_t * retval); -int proc_pidfdinfo(int pid, int flavor,int fd, user_addr_t buffer, uint32_t buffersize, int32_t * retval); -int proc_kernmsgbuf(user_addr_t buffer, uint32_t buffersize, int32_t * retval); -int proc_setcontrol(int pid, int flavor, uint64_t arg, user_addr_t buffer, uint32_t buffersize, int32_t * retval); -int proc_pidfileportinfo(int pid, int flavor, mach_port_name_t name, user_addr_t buffer, uint32_t buffersize, int32_t *retval); -int proc_dirtycontrol(int pid, int flavor, uint64_t arg, int32_t * retval); -int proc_terminate(int pid, int32_t * retval); +int __attribute__ ((noinline)) proc_listpids(uint32_t type, uint32_t tyoneinfo, user_addr_t buffer, uint32_t buffersize, int32_t * retval); +int __attribute__ ((noinline)) proc_pidinfo(int pid, int flavor, uint64_t arg, user_addr_t buffer, uint32_t buffersize, int32_t * retval); +int __attribute__ ((noinline)) proc_pidfdinfo(int pid, int flavor, int fd, user_addr_t buffer, uint32_t buffersize, int32_t * retval); +int __attribute__ ((noinline)) proc_kernmsgbuf(user_addr_t buffer, uint32_t buffersize, int32_t * retval); +int __attribute__ ((noinline)) proc_setcontrol(int pid, int flavor, uint64_t arg, user_addr_t buffer, uint32_t buffersize, int32_t * retval); +int __attribute__ ((noinline)) proc_pidfileportinfo(int pid, int flavor, mach_port_name_t name, user_addr_t buffer, uint32_t buffersize, int32_t *retval); +int __attribute__ ((noinline)) proc_dirtycontrol(int pid, int flavor, uint64_t arg, int32_t * retval); +int __attribute__ ((noinline)) proc_terminate(int pid, int32_t * retval); +int __attribute__ ((noinline)) proc_pid_rusage(int pid, int flavor, user_addr_t buffer, int32_t * retval); +int __attribute__ ((noinline)) proc_pidoriginatorinfo(int pid, int flavor, user_addr_t buffer, uint32_t buffersize, int32_t * retval); +int __attribute__ ((noinline)) proc_listcoalitions(int flavor, int coaltype, user_addr_t buffer, uint32_t buffersize, int32_t *retval); +int __attribute__ ((noinline)) proc_can_use_foreground_hw(int pid, user_addr_t reason, uint32_t resonsize, int32_t *retval); /* protos for procpidinfo calls */ -int proc_pidfdlist(proc_t p, user_addr_t buffer, uint32_t buffersize, int32_t *retval); -int proc_pidbsdinfo(proc_t p, struct proc_bsdinfo *pbsd, int zombie); -int proc_pidshortbsdinfo(proc_t p, struct proc_bsdshortinfo *pbsd_shortp, int zombie); -int proc_pidtaskinfo(proc_t p, struct proc_taskinfo *ptinfo); -int proc_pidallinfo(proc_t p, int flavor, uint64_t arg, user_addr_t buffer, uint32_t buffersize, int32_t *retval); -int proc_pidthreadinfo(proc_t p, uint64_t arg, int thuniqueid, struct proc_threadinfo *pthinfo); -int proc_pidthreadpathinfo(proc_t p, uint64_t arg, struct proc_threadwithpathinfo *pinfo); -int proc_pidlistthreads(proc_t p, user_addr_t buffer, uint32_t buffersize, int32_t *retval); -int proc_pidregioninfo(proc_t p, uint64_t arg, user_addr_t buffer, uint32_t buffersize, int32_t *retval); -int proc_pidregionpathinfo(proc_t p, uint64_t arg, user_addr_t buffer, uint32_t buffersize, int32_t *retval); -int proc_pidvnodepathinfo(proc_t p, uint64_t arg, user_addr_t buffer, uint32_t buffersize, int32_t *retval); -int proc_pidpathinfo(proc_t p, uint64_t arg, user_addr_t buffer, uint32_t buffersize, int32_t *retval); -int proc_pidworkqueueinfo(proc_t p, struct proc_workqueueinfo *pwqinfo); -int proc_pidfileportlist(proc_t p, user_addr_t buffer, uint32_t buffersize, int32_t *retval); +int __attribute__ ((noinline)) proc_pidfdlist(proc_t p, user_addr_t buffer, uint32_t buffersize, int32_t *retval); +int __attribute__ ((noinline)) proc_pidbsdinfo(proc_t p, struct proc_bsdinfo *pbsd, int zombie); +int __attribute__ ((noinline)) proc_pidshortbsdinfo(proc_t p, struct proc_bsdshortinfo *pbsd_shortp, int zombie); +int __attribute__ ((noinline)) proc_pidtaskinfo(proc_t p, struct proc_taskinfo *ptinfo); +int __attribute__ ((noinline)) proc_pidthreadinfo(proc_t p, uint64_t arg, bool thuniqueid, struct proc_threadinfo *pthinfo); +int __attribute__ ((noinline)) proc_pidthreadpathinfo(proc_t p, uint64_t arg, struct proc_threadwithpathinfo *pinfo); +int __attribute__ ((noinline)) proc_pidlistthreads(proc_t p, bool thuniqueid, user_addr_t buffer, uint32_t buffersize, int32_t *retval); +int __attribute__ ((noinline)) proc_pidregioninfo(proc_t p, uint64_t arg, user_addr_t buffer, uint32_t buffersize, int32_t *retval); +int __attribute__ ((noinline)) proc_pidregionpathinfo(proc_t p, uint64_t arg, user_addr_t buffer, uint32_t buffersize, int32_t *retval); +int __attribute__ ((noinline)) proc_pidregionpathinfo2(proc_t p, uint64_t arg, user_addr_t buffer, uint32_t buffersize, int32_t *retval); +int __attribute__ ((noinline)) proc_pidregionpathinfo3(proc_t p, uint64_t arg, user_addr_t buffer, uint32_t buffersize, int32_t *retval); +int __attribute__ ((noinline)) proc_pidvnodepathinfo(proc_t p, uint64_t arg, user_addr_t buffer, uint32_t buffersize, int32_t *retval); +int __attribute__ ((noinline)) proc_pidpathinfo(proc_t p, uint64_t arg, user_addr_t buffer, uint32_t buffersize, int32_t *retval); +int __attribute__ ((noinline)) proc_pidworkqueueinfo(proc_t p, struct proc_workqueueinfo *pwqinfo); +int __attribute__ ((noinline)) proc_pidfileportlist(proc_t p, user_addr_t buffer, uint32_t buffersize, int32_t *retval); +void __attribute__ ((noinline)) proc_piduniqidentifierinfo(proc_t p, struct proc_uniqidentifierinfo *p_uniqidinfo); +void __attribute__ ((noinline)) proc_archinfo(proc_t p, struct proc_archinfo *pai); +void __attribute__ ((noinline)) proc_pidcoalitioninfo(proc_t p, struct proc_pidcoalitioninfo *pci); +int __attribute__ ((noinline)) proc_pidnoteexit(proc_t p, uint64_t arg, uint32_t *data); +int __attribute__ ((noinline)) proc_pidexitreasoninfo(proc_t p, struct proc_exitreasoninfo *peri, struct proc_exitreasonbasicinfo *pberi); +int __attribute__ ((noinline)) proc_pidoriginatorpid_uuid(uuid_t uuid, uint32_t buffersize, pid_t *pid); +int __attribute__ ((noinline)) proc_pidlistuptrs(proc_t p, user_addr_t buffer, uint32_t buffersize, int32_t *retval); +int __attribute__ ((noinline)) proc_piddynkqueueinfo(pid_t pid, int flavor, kqueue_id_t id, user_addr_t buffer, uint32_t buffersize, int32_t *retval); +int __attribute__ ((noinline)) proc_pidregionpath(proc_t p, uint64_t arg, user_addr_t buffer, __unused uint32_t buffersize, int32_t *retval); +int __attribute__ ((noinline)) proc_pidipctableinfo(proc_t p, struct proc_ipctableinfo *table_info); +#if !CONFIG_EMBEDDED +int __attribute__ ((noinline)) proc_udata_info(pid_t pid, int flavor, user_addr_t buffer, uint32_t buffersize, int32_t *retval); +#endif /* protos for proc_pidfdinfo calls */ -int pid_vnodeinfo(vnode_t vp, uint32_t vid, struct fileproc * fp, int closeonexec, user_addr_t buffer, uint32_t buffersize, int32_t * retval); -int pid_vnodeinfopath(vnode_t vp, uint32_t vid, struct fileproc * fp, int closeonexec, user_addr_t buffer, uint32_t buffersize, int32_t * retval); -int pid_socketinfo(socket_t so, struct fileproc *fp, int closeonexec, user_addr_t buffer, uint32_t buffersize, int32_t * retval); -int pid_pseminfo(struct psemnode * psem, struct fileproc * fp, int closeonexec, user_addr_t buffer, uint32_t buffersize, int32_t * retval); -int pid_pshminfo(struct pshmnode * pshm, struct fileproc * fp, int closeonexec, user_addr_t buffer, uint32_t buffersize, int32_t * retval); -int pid_pipeinfo(struct pipe * p, struct fileproc * fp, int closeonexec, user_addr_t buffer, uint32_t buffersize, int32_t * retval); -int pid_kqueueinfo(struct kqueue * kq, struct fileproc * fp, int closeonexec, user_addr_t buffer, uint32_t buffersize, int32_t * retval); -int pid_atalkinfo(struct atalk * at, struct fileproc * fp, int closeonexec, user_addr_t buffer, uint32_t buffersize, int32_t * retval); +int __attribute__ ((noinline)) pid_vnodeinfo(vnode_t vp, uint32_t vid, struct fileproc * fp, proc_t proc, int fd, user_addr_t buffer, uint32_t buffersize, int32_t * retval); +int __attribute__ ((noinline)) pid_vnodeinfopath(vnode_t vp, uint32_t vid, struct fileproc * fp, proc_t proc, int fd, user_addr_t buffer, uint32_t buffersize, int32_t * retval); +int __attribute__ ((noinline)) pid_socketinfo(socket_t so, struct fileproc *fp, proc_t proc, int fd, user_addr_t buffer, uint32_t buffersize, int32_t * retval); +int __attribute__ ((noinline)) pid_pseminfo(struct psemnode * psem, struct fileproc * fp, proc_t proc, int fd, user_addr_t buffer, uint32_t buffersize, int32_t * retval); +int __attribute__ ((noinline)) pid_pshminfo(struct pshmnode * pshm, struct fileproc * fp, proc_t proc, int fd, user_addr_t buffer, uint32_t buffersize, int32_t * retval); +int __attribute__ ((noinline)) pid_pipeinfo(struct pipe * p, struct fileproc * fp, proc_t proc, int fd, user_addr_t buffer, uint32_t buffersize, int32_t * retval); +int __attribute__ ((noinline)) pid_kqueueinfo(struct kqueue * kq, struct fileproc * fp, proc_t proc, int fd, user_addr_t buffer, uint32_t buffersize, int32_t * retval); +int __attribute__ ((noinline)) pid_atalkinfo(struct atalk * at, struct fileproc * fp, proc_t proc, int fd, user_addr_t buffer, uint32_t buffersize, int32_t * retval); /* protos for misc */ -void proc_dirty_start(struct proc *p); -void proc_dirty_end(struct proc *p); - -int fill_vnodeinfo(vnode_t vp, struct vnode_info *vinfo); -void fill_fileinfo(struct fileproc * fp, int closeonexec, struct proc_fileinfo * finfo); -static int proc_security_policy(proc_t p); +int fill_vnodeinfo(vnode_t vp, struct vnode_info *vinfo, boolean_t check_fsgetpath); +void fill_fileinfo(struct fileproc * fp, proc_t proc, int fd, struct proc_fileinfo * finfo); +int proc_security_policy(proc_t targetp, int callnum, int flavor, boolean_t check_same_user); static void munge_vinfo_stat(struct stat64 *sbp, struct vinfo_stat *vsbp); +static int proc_piduuidinfo(pid_t pid, uuid_t uuid_buf, uint32_t buffersize); +int proc_pidpathinfo_internal(proc_t p, __unused uint64_t arg, char *buf, uint32_t buffersize, __unused int32_t *retval); + +extern int cansignal(struct proc *, kauth_cred_t, struct proc *, int); +extern int proc_get_rusage(proc_t proc, int flavor, user_addr_t buffer, int is_zombie); + +#define CHECK_SAME_USER TRUE +#define NO_CHECK_SAME_USER FALSE + +uint64_t +get_dispatchqueue_offset_from_proc(void *p) +{ + if (p != NULL) { + proc_t pself = (proc_t)p; + return pself->p_dispatchqueue_offset; + } else { + return (uint64_t)0; + } +} + +uint64_t +get_dispatchqueue_serialno_offset_from_proc(void *p) +{ + if (p != NULL) { + proc_t pself = (proc_t)p; + return pself->p_dispatchqueue_serialno_offset; + } else { + return (uint64_t)0; + } +} -extern int cansignal(struct proc *, kauth_cred_t, struct proc *, int, int); +uint64_t +get_dispatchqueue_label_offset_from_proc(void *p) +{ + if (p != NULL) { + proc_t pself = (proc_t)p; + return pself->p_dispatchqueue_label_offset; + } else { + return (uint64_t)0; + } +} -uint64_t get_dispatchqueue_offset_from_proc(void *p) +uint64_t +get_return_to_kernel_offset_from_proc(void *p) { - if(p != NULL) { + if (p != NULL) { proc_t pself = (proc_t)p; - return (pself->p_dispatchqueue_offset); + return pself->p_return_to_kernel_offset; } else { return (uint64_t)0; } @@ -155,74 +257,98 @@ uint64_t get_dispatchqueue_offset_from_proc(void *p) int proc_info(__unused struct proc *p, struct proc_info_args * uap, int32_t *retval) { - return(proc_info_internal(uap->callnum, uap->pid, uap->flavor, uap->arg, uap->buffer, uap->buffersize, retval)); + return proc_info_internal(uap->callnum, uap->pid, uap->flavor, uap->arg, uap->buffer, uap->buffersize, retval); } -int +int proc_info_internal(int callnum, int pid, int flavor, uint64_t arg, user_addr_t buffer, uint32_t buffersize, int32_t * retval) { - - switch(callnum) { - case 1: /* proc_listpids */ - /* pid contains type and flavor contains typeinfo */ - return(proc_listpids(pid, flavor, buffer, buffersize, retval)); - case 2: /* proc_pidinfo */ - return(proc_pidinfo(pid, flavor, arg, buffer, buffersize, retval)); - case 3: /* proc_pidfdinfo */ - return(proc_pidfdinfo(pid, flavor, (int)arg, buffer, buffersize, retval)); - case 4: /* proc_kernmsgbuf */ - return(proc_kernmsgbuf(buffer, buffersize, retval)); - case 5: /* set on self properties proc_setcontrol */ - return(proc_setcontrol(pid, flavor, arg, buffer, buffersize, retval)); - case 6: /* proc_pidfileportinfo */ - return(proc_pidfileportinfo(pid, flavor, (mach_port_name_t)arg, buffer, buffersize, retval)); - case 7: /* proc_terminate */ - return(proc_terminate(pid, retval)); - case 8: /* proc_dirtycontrol */ - return(proc_dirtycontrol(pid, flavor, arg, retval)); - default: - return(EINVAL); + switch (callnum) { + case PROC_INFO_CALL_LISTPIDS: + /* pid contains type and flavor contains typeinfo */ + return proc_listpids(pid, flavor, buffer, buffersize, retval); + case PROC_INFO_CALL_PIDINFO: + return proc_pidinfo(pid, flavor, arg, buffer, buffersize, retval); + case PROC_INFO_CALL_PIDFDINFO: + return proc_pidfdinfo(pid, flavor, (int)arg, buffer, buffersize, retval); + case PROC_INFO_CALL_KERNMSGBUF: + return proc_kernmsgbuf(buffer, buffersize, retval); + case PROC_INFO_CALL_SETCONTROL: + return proc_setcontrol(pid, flavor, arg, buffer, buffersize, retval); + case PROC_INFO_CALL_PIDFILEPORTINFO: + return proc_pidfileportinfo(pid, flavor, (mach_port_name_t)arg, buffer, buffersize, retval); + case PROC_INFO_CALL_TERMINATE: + return proc_terminate(pid, retval); + case PROC_INFO_CALL_DIRTYCONTROL: + return proc_dirtycontrol(pid, flavor, arg, retval); + case PROC_INFO_CALL_PIDRUSAGE: + return proc_pid_rusage(pid, flavor, buffer, retval); + case PROC_INFO_CALL_PIDORIGINATORINFO: + return proc_pidoriginatorinfo(pid, flavor, buffer, buffersize, retval); + case PROC_INFO_CALL_LISTCOALITIONS: + return proc_listcoalitions(pid /* flavor */, flavor /* coaltype */, buffer, + buffersize, retval); + case PROC_INFO_CALL_CANUSEFGHW: + return proc_can_use_foreground_hw(pid, buffer, buffersize, retval); + case PROC_INFO_CALL_PIDDYNKQUEUEINFO: + return proc_piddynkqueueinfo(pid, flavor, (kqueue_id_t)arg, buffer, buffersize, retval); +#if !CONFIG_EMBEDDED + case PROC_INFO_CALL_UDATA_INFO: + return proc_udata_info(pid, flavor, buffer, buffersize, retval); +#endif /* !CONFIG_EMBEDDED */ + default: + return EINVAL; } - return(EINVAL); + return EINVAL; } /******************* proc_listpids routine ****************/ int proc_listpids(uint32_t type, uint32_t typeinfo, user_addr_t buffer, uint32_t buffersize, int32_t * retval) { - int numprocs, wantpids; + uint32_t numprocs = 0; + uint32_t wantpids; char * kbuf; int * ptr; - int n, skip; + uint32_t n; + int skip; struct proc * p; struct tty * tp; int error = 0; struct proclist *current_list; + /* Do we have permission to look into this? */ + if ((error = proc_security_policy(PROC_NULL, PROC_INFO_CALL_LISTPIDS, type, NO_CHECK_SAME_USER))) { + return error; + } + /* if the buffer is null, return num of procs */ if (buffer == (user_addr_t)0) { - *retval = ((nprocs+20) * sizeof(int)); - return(0); + *retval = ((nprocs + 20) * sizeof(int)); + return 0; } if (buffersize < sizeof(int)) { - return(ENOMEM); + return ENOMEM; + } + wantpids = buffersize / sizeof(int); + if ((nprocs + 20) > 0) { + numprocs = (uint32_t)(nprocs + 20); } - wantpids = buffersize/sizeof(int); - numprocs = nprocs+20; - if (numprocs > wantpids) + if (numprocs > wantpids) { numprocs = wantpids; + } kbuf = (char *)kalloc((vm_size_t)(numprocs * sizeof(int))); - if (kbuf == NULL) - return(ENOMEM); - bzero(kbuf, sizeof(int)); + if (kbuf == NULL) { + return ENOMEM; + } + bzero(kbuf, numprocs * sizeof(int)); proc_list_lock(); - n = 0; ptr = (int *)kbuf; current_list = &allproc; @@ -230,67 +356,79 @@ proc_loop: LIST_FOREACH(p, current_list, p_list) { skip = 0; switch (type) { - case PROC_PGRP_ONLY: - if (p->p_pgrpid != (pid_t)typeinfo) - skip = 1; - break; - case PROC_PPID_ONLY: - if ((p->p_ppid != (pid_t)typeinfo) && (((p->p_lflag & P_LTRACED) == 0) || (p->p_oppid != (pid_t)typeinfo))) - skip = 1; - break; - - case PROC_ALL_PIDS: - skip = 0; - break; - case PROC_TTY_ONLY: - /* racy but list lock is held */ - if ((p->p_flag & P_CONTROLT) == 0 || - (p->p_pgrp == NULL) || (p->p_pgrp->pg_session == NULL) || - (tp = SESSION_TP(p->p_pgrp->pg_session)) == TTY_NULL || - tp->t_dev != (dev_t)typeinfo) - skip = 1; - break; - case PROC_UID_ONLY: - if (p->p_ucred == NULL) + case PROC_PGRP_ONLY: + if (p->p_pgrpid != (pid_t)typeinfo) { + skip = 1; + } + break; + case PROC_PPID_ONLY: + if ((p->p_ppid != (pid_t)typeinfo) && (((p->p_lflag & P_LTRACED) == 0) || (p->p_oppid != (pid_t)typeinfo))) { + skip = 1; + } + break; + + case PROC_ALL_PIDS: + skip = 0; + break; + case PROC_TTY_ONLY: + /* racy but list lock is held */ + if ((p->p_flag & P_CONTROLT) == 0 || + (p->p_pgrp == NULL) || (p->p_pgrp->pg_session == NULL) || + (tp = SESSION_TP(p->p_pgrp->pg_session)) == TTY_NULL || + tp->t_dev != (dev_t)typeinfo) { + skip = 1; + } + break; + case PROC_UID_ONLY: + if (p->p_ucred == NULL) { + skip = 1; + } else { + kauth_cred_t my_cred; + uid_t uid; + + my_cred = kauth_cred_proc_ref(p); + uid = kauth_cred_getuid(my_cred); + kauth_cred_unref(&my_cred); + if (uid != (uid_t)typeinfo) { skip = 1; - else { - kauth_cred_t my_cred; - uid_t uid; - - my_cred = kauth_cred_proc_ref(p); - uid = kauth_cred_getuid(my_cred); - kauth_cred_unref(&my_cred); - if (uid != (uid_t)typeinfo) - skip = 1; } - break; - case PROC_RUID_ONLY: - if (p->p_ucred == NULL) + } + break; + case PROC_RUID_ONLY: + if (p->p_ucred == NULL) { + skip = 1; + } else { + kauth_cred_t my_cred; + uid_t uid; + + my_cred = kauth_cred_proc_ref(p); + uid = kauth_cred_getruid(my_cred); + kauth_cred_unref(&my_cred); + if (uid != (uid_t)typeinfo) { skip = 1; - else { - kauth_cred_t my_cred; - uid_t uid; - - my_cred = kauth_cred_proc_ref(p); - uid = kauth_cred_getruid(my_cred); - kauth_cred_unref(&my_cred); - if (uid != (uid_t)typeinfo) - skip = 1; } - break; - default: - skip = 1; - break; - }; + } + break; + case PROC_KDBG_ONLY: + if (p->p_kdebug == 0) { + skip = 1; + } + break; + default: + skip = 1; + break; + } + ; - if(skip == 0) { + if (skip == 0) { *ptr++ = p->p_pid; n++; } - if (n >= numprocs) + if (n >= numprocs) { break; + } } - + if ((n < numprocs) && (current_list == &allproc)) { current_list = &zombproc; goto proc_loop; @@ -300,66 +438,75 @@ proc_loop: ptr = (int *)kbuf; error = copyout((caddr_t)ptr, buffer, n * sizeof(int)); - if (error == 0) + if (error == 0) { *retval = (n * sizeof(int)); - kfree((void *)kbuf, (vm_size_t)(numprocs * sizeof(int))); + } + kfree(kbuf, (vm_size_t)(numprocs * sizeof(int))); - return(error); + return error; } -/********************************** proc_pidinfo routines ********************************/ +/********************************** proc_pidfdlist routines ********************************/ -int +int proc_pidfdlist(proc_t p, user_addr_t buffer, uint32_t buffersize, int32_t *retval) { - int numfds, needfds; - char * kbuf; - struct proc_fdinfo * pfd; - struct fileproc * fp; - int n; - int count = 0; - int error = 0; - - numfds = p->p_fd->fd_nfiles; + uint32_t numfds = 0; + uint32_t needfds; + char * kbuf; + struct proc_fdinfo * pfd; + struct fileproc * fp; + int n; + int count = 0; + int error = 0; - if (buffer == (user_addr_t) 0) { - numfds += 20; - *retval = (numfds * sizeof(struct proc_fdinfo)); - return(0); - } + if (p->p_fd->fd_nfiles > 0) { + numfds = (uint32_t)p->p_fd->fd_nfiles; + } - /* buffersize is big enough atleast for one struct */ - needfds = buffersize/sizeof(struct proc_fdinfo); + if (buffer == (user_addr_t) 0) { + numfds += 20; + *retval = (numfds * sizeof(struct proc_fdinfo)); + return 0; + } - if (numfds > needfds) - numfds = needfds; + /* buffersize is big enough atleast for one struct */ + needfds = buffersize / sizeof(struct proc_fdinfo); - kbuf = (char *)kalloc((vm_size_t)(numfds * sizeof(struct proc_fdinfo))); - if (kbuf == NULL) - return(ENOMEM); - bzero(kbuf, numfds * sizeof(struct proc_fdinfo)); + if (numfds > needfds) { + numfds = needfds; + } - proc_fdlock(p); + kbuf = (char *)kalloc((vm_size_t)(numfds * sizeof(struct proc_fdinfo))); + if (kbuf == NULL) { + return ENOMEM; + } + bzero(kbuf, numfds * sizeof(struct proc_fdinfo)); - pfd = (struct proc_fdinfo *)kbuf; + proc_fdlock(p); - for (n = 0; ((n < numfds) && (n < p->p_fd->fd_nfiles)); n++) { - if (((fp = p->p_fd->fd_ofiles[n]) != 0) - && ((p->p_fd->fd_ofileflags[n] & UF_RESERVED) == 0)) { - pfd->proc_fd = n; - pfd->proc_fdtype = fp->f_fglob->fg_type; - count++; - pfd++; - } + pfd = (struct proc_fdinfo *)kbuf; + + for (n = 0; ((n < (int)numfds) && (n < p->p_fd->fd_nfiles)); n++) { + if (((fp = p->p_fd->fd_ofiles[n]) != 0) + && ((p->p_fd->fd_ofileflags[n] & UF_RESERVED) == 0)) { + file_type_t fdtype = FILEGLOB_DTYPE(fp->f_fglob); + pfd->proc_fd = n; + pfd->proc_fdtype = (fdtype != DTYPE_ATALK) ? + fdtype : PROX_FDTYPE_ATALK; + count++; + pfd++; } - proc_fdunlock(p); + } + proc_fdunlock(p); - error = copyout(kbuf, buffer, count * sizeof(struct proc_fdinfo)); - kfree((void *)kbuf, (vm_size_t)(numfds * sizeof(struct proc_fdinfo))); - if (error == 0) - *retval = (count * sizeof(struct proc_fdinfo)); - return(error); + error = copyout(kbuf, buffer, count * sizeof(struct proc_fdinfo)); + kfree(kbuf, (vm_size_t)(numfds * sizeof(struct proc_fdinfo))); + if (error == 0) { + *retval = (count * sizeof(struct proc_fdinfo)); + } + return error; } /* @@ -372,7 +519,7 @@ proc_fileport_count(__unused mach_port_name_t name, uint32_t *counter = arg; *counter += 1; - return (0); + return 0; } struct fileport_fdtype_args { @@ -386,17 +533,21 @@ proc_fileport_fdtype(mach_port_name_t name, struct fileglob *fg, void *arg) struct fileport_fdtype_args *ffa = arg; if (ffa->ffa_pfi != ffa->ffa_pfi_end) { - ffa->ffa_pfi->proc_fdtype = fg->fg_type; + file_type_t fdtype = FILEGLOB_DTYPE(fg); + + ffa->ffa_pfi->proc_fdtype = (fdtype != DTYPE_ATALK) ? + fdtype : PROX_FDTYPE_ATALK; ffa->ffa_pfi->proc_fileport = name; ffa->ffa_pfi++; - return (0); /* keep walking */ - } else - return (-1); /* stop the walk! */ + return 0; /* keep walking */ + } else { + return -1; /* stop the walk! */ + } } int proc_pidfileportlist(proc_t p, - user_addr_t buffer, uint32_t buffersize, int32_t *retval) + user_addr_t buffer, uint32_t buffersize, int32_t *retval) { void *kbuf; vm_size_t kbufsize; @@ -405,7 +556,7 @@ proc_pidfileportlist(proc_t p, struct fileport_fdtype_args ffa; int error; - needfileports = buffersize / sizeof (*pfi); + needfileports = buffersize / sizeof(*pfi); if ((user_addr_t)0 == buffer || needfileports > (uint32_t)maxfiles) { /* * Either (i) the user is asking for a fileport count, @@ -419,32 +570,34 @@ proc_pidfileportlist(proc_t p, case KERN_SUCCESS: break; case KERN_RESOURCE_SHORTAGE: - return (ENOMEM); + return ENOMEM; case KERN_INVALID_TASK: - return (ESRCH); + return ESRCH; default: - return (EINVAL); + return EINVAL; } if (numfileports == 0) { - *retval = 0; /* none at all, bail */ - return (0); + *retval = 0; /* none at all, bail */ + return 0; } if ((user_addr_t)0 == buffer) { - numfileports += 20; /* accelerate convergence */ - *retval = numfileports * sizeof (*pfi); - return (0); + numfileports += 20; /* accelerate convergence */ + *retval = numfileports * sizeof(*pfi); + return 0; } - if (needfileports > numfileports) + if (needfileports > numfileports) { needfileports = numfileports; + } } assert(buffersize >= PROC_PIDLISTFILEPORTS_SIZE); - kbufsize = (vm_size_t)needfileports * sizeof (*pfi); + kbufsize = (vm_size_t)needfileports * sizeof(*pfi); pfi = kbuf = kalloc(kbufsize); - if (kbuf == NULL) - return (ENOMEM); + if (kbuf == NULL) { + return ENOMEM; + } bzero(kbuf, kbufsize); ffa.ffa_pfi = pfi; @@ -454,11 +607,13 @@ proc_pidfileportlist(proc_t p, case KERN_SUCCESS: error = 0; pfi = ffa.ffa_pfi; - if ((numfileports = pfi - (typeof(pfi))kbuf) == 0) + if ((numfileports = pfi - (typeof(pfi))kbuf) == 0) { break; - if (numfileports > needfileports) + } + if (numfileports > needfileports) { panic("more fileports returned than requested"); - error = copyout(kbuf, buffer, numfileports * sizeof (*pfi)); + } + error = copyout(kbuf, buffer, numfileports * sizeof(*pfi)); break; case KERN_RESOURCE_SHORTAGE: error = ENOMEM; @@ -471,15 +626,16 @@ proc_pidfileportlist(proc_t p, break; } kfree(kbuf, kbufsize); - if (error == 0) - *retval = numfileports * sizeof (*pfi); - return (error); + if (error == 0) { + *retval = numfileports * sizeof(*pfi); + } + return error; } -int +int proc_pidbsdinfo(proc_t p, struct proc_bsdinfo * pbsd, int zombie) { - register struct tty *tp; + struct tty *tp; struct session *sessionp = NULL; struct pgrp * pg; kauth_cred_t my_cred; @@ -494,81 +650,97 @@ proc_pidbsdinfo(proc_t p, struct proc_bsdinfo * pbsd, int zombie) pbsd->pbi_pid = p->p_pid; pbsd->pbi_ppid = p->p_ppid; pbsd->pbi_uid = kauth_cred_getuid(my_cred); - pbsd->pbi_gid = kauth_cred_getgid(my_cred); + pbsd->pbi_gid = kauth_cred_getgid(my_cred); pbsd->pbi_ruid = kauth_cred_getruid(my_cred); pbsd->pbi_rgid = kauth_cred_getrgid(my_cred); pbsd->pbi_svuid = kauth_cred_getsvuid(my_cred); pbsd->pbi_svgid = kauth_cred_getsvgid(my_cred); kauth_cred_unref(&my_cred); - + pbsd->pbi_nice = p->p_nice; pbsd->pbi_start_tvsec = p->p_start.tv_sec; pbsd->pbi_start_tvusec = p->p_start.tv_usec; bcopy(&p->p_comm, &pbsd->pbi_comm[0], MAXCOMLEN); pbsd->pbi_comm[MAXCOMLEN - 1] = '\0'; - bcopy(&p->p_name, &pbsd->pbi_name[0], 2*MAXCOMLEN); - pbsd->pbi_name[(2*MAXCOMLEN) - 1] = '\0'; + bcopy(&p->p_name, &pbsd->pbi_name[0], 2 * MAXCOMLEN); + pbsd->pbi_name[(2 * MAXCOMLEN) - 1] = '\0'; - pbsd->pbi_flags = 0; - if ((p->p_flag & P_SYSTEM) == P_SYSTEM) + pbsd->pbi_flags = 0; + if ((p->p_flag & P_SYSTEM) == P_SYSTEM) { pbsd->pbi_flags |= PROC_FLAG_SYSTEM; - if ((p->p_lflag & P_LTRACED) == P_LTRACED) + } + if ((p->p_lflag & P_LTRACED) == P_LTRACED) { pbsd->pbi_flags |= PROC_FLAG_TRACED; - if ((p->p_lflag & P_LEXIT) == P_LEXIT) + } + if ((p->p_lflag & P_LEXIT) == P_LEXIT) { pbsd->pbi_flags |= PROC_FLAG_INEXIT; - if ((p->p_lflag & P_LPPWAIT) == P_LPPWAIT) + } + if ((p->p_lflag & P_LPPWAIT) == P_LPPWAIT) { pbsd->pbi_flags |= PROC_FLAG_PPWAIT; - if ((p->p_flag & P_LP64) == P_LP64) + } + if ((p->p_flag & P_LP64) == P_LP64) { pbsd->pbi_flags |= PROC_FLAG_LP64; - if ((p->p_flag & P_CONTROLT) == P_CONTROLT) + } + if ((p->p_flag & P_CONTROLT) == P_CONTROLT) { pbsd->pbi_flags |= PROC_FLAG_CONTROLT; - if ((p->p_flag & P_THCWD) == P_THCWD) + } + if ((p->p_flag & P_THCWD) == P_THCWD) { pbsd->pbi_flags |= PROC_FLAG_THCWD; - if ((p->p_flag & P_SUGID) == P_SUGID) + } + if ((p->p_flag & P_SUGID) == P_SUGID) { pbsd->pbi_flags |= PROC_FLAG_PSUGID; - if ((p->p_flag & P_EXEC) == P_EXEC) + } + if ((p->p_flag & P_EXEC) == P_EXEC) { pbsd->pbi_flags |= PROC_FLAG_EXEC; + } if (sessionp != SESSION_NULL) { - if (SESS_LEADER(p, sessionp)) + if (SESS_LEADER(p, sessionp)) { pbsd->pbi_flags |= PROC_FLAG_SLEADER; - if (sessionp->s_ttyvp) + } + if (sessionp->s_ttyvp) { pbsd->pbi_flags |= PROC_FLAG_CTTY; + } } #if !CONFIG_EMBEDDED - if ((p->p_flag & P_DELAYIDLESLEEP) == P_DELAYIDLESLEEP) + if ((p->p_flag & P_DELAYIDLESLEEP) == P_DELAYIDLESLEEP) { pbsd->pbi_flags |= PROC_FLAG_DELAYIDLESLEEP; + } #endif /* !CONFIG_EMBEDDED */ - switch(PROC_CONTROL_STATE(p)) { - case P_PCTHROTTLE: - pbsd->pbi_flags |= PROC_FLAG_PC_THROTTLE; - break; - case P_PCSUSP: - pbsd->pbi_flags |= PROC_FLAG_PC_SUSP; - break; - case P_PCKILL: - pbsd->pbi_flags |= PROC_FLAG_PC_KILL; - break; - }; + switch (PROC_CONTROL_STATE(p)) { + case P_PCTHROTTLE: + pbsd->pbi_flags |= PROC_FLAG_PC_THROTTLE; + break; + case P_PCSUSP: + pbsd->pbi_flags |= PROC_FLAG_PC_SUSP; + break; + case P_PCKILL: + pbsd->pbi_flags |= PROC_FLAG_PC_KILL; + break; + } + ; + + switch (PROC_ACTION_STATE(p)) { + case P_PCTHROTTLE: + pbsd->pbi_flags |= PROC_FLAG_PA_THROTTLE; + break; + case P_PCSUSP: + pbsd->pbi_flags |= PROC_FLAG_PA_SUSP; + break; + } + ; - switch(PROC_ACTION_STATE(p)) { - case P_PCTHROTTLE: - pbsd->pbi_flags |= PROC_FLAG_PA_THROTTLE; - break; - case P_PCSUSP: - pbsd->pbi_flags |= PROC_FLAG_PA_SUSP; - break; - }; - /* if process is a zombie skip bg state */ - if ((zombie == 0) && (p->p_stat != SZOMB) && (p->task != TASK_NULL)) + if ((zombie == 0) && (p->p_stat != SZOMB) && (p->task != TASK_NULL)) { proc_get_darwinbgstate(p->task, &pbsd->pbi_flags); + } - if (zombie == 0) + if (zombie == 0) { pbsd->pbi_nfiles = p->p_fd->fd_nfiles; - + } + pbsd->e_tdev = NODEV; if (pg != PGRP_NULL) { pbsd->pbi_pgid = p->p_pgrpid; @@ -577,17 +749,19 @@ proc_pidbsdinfo(proc_t p, struct proc_bsdinfo * pbsd, int zombie) pbsd->e_tdev = tp->t_dev; pbsd->e_tpgid = sessionp->s_ttypgrpid; } - } - if (sessionp != SESSION_NULL) + } + if (sessionp != SESSION_NULL) { session_rele(sessionp); - if (pg != PGRP_NULL) + } + if (pg != PGRP_NULL) { pg_rele(pg); + } - return(0); + return 0; } -int +int proc_pidshortbsdinfo(proc_t p, struct proc_bsdshortinfo * pbsd_shortp, int zombie) { bzero(pbsd_shortp, sizeof(struct proc_bsdshortinfo)); @@ -598,82 +772,95 @@ proc_pidshortbsdinfo(proc_t p, struct proc_bsdshortinfo * pbsd_shortp, int zombi bcopy(&p->p_comm, &pbsd_shortp->pbsi_comm[0], MAXCOMLEN); pbsd_shortp->pbsi_comm[MAXCOMLEN - 1] = '\0'; - pbsd_shortp->pbsi_flags = 0; - if ((p->p_flag & P_SYSTEM) == P_SYSTEM) + pbsd_shortp->pbsi_flags = 0; + if ((p->p_flag & P_SYSTEM) == P_SYSTEM) { pbsd_shortp->pbsi_flags |= PROC_FLAG_SYSTEM; - if ((p->p_lflag & P_LTRACED) == P_LTRACED) + } + if ((p->p_lflag & P_LTRACED) == P_LTRACED) { pbsd_shortp->pbsi_flags |= PROC_FLAG_TRACED; - if ((p->p_lflag & P_LEXIT) == P_LEXIT) + } + if ((p->p_lflag & P_LEXIT) == P_LEXIT) { pbsd_shortp->pbsi_flags |= PROC_FLAG_INEXIT; - if ((p->p_lflag & P_LPPWAIT) == P_LPPWAIT) + } + if ((p->p_lflag & P_LPPWAIT) == P_LPPWAIT) { pbsd_shortp->pbsi_flags |= PROC_FLAG_PPWAIT; - if ((p->p_flag & P_LP64) == P_LP64) + } + if ((p->p_flag & P_LP64) == P_LP64) { pbsd_shortp->pbsi_flags |= PROC_FLAG_LP64; - if ((p->p_flag & P_CONTROLT) == P_CONTROLT) + } + if ((p->p_flag & P_CONTROLT) == P_CONTROLT) { pbsd_shortp->pbsi_flags |= PROC_FLAG_CONTROLT; - if ((p->p_flag & P_THCWD) == P_THCWD) + } + if ((p->p_flag & P_THCWD) == P_THCWD) { pbsd_shortp->pbsi_flags |= PROC_FLAG_THCWD; - if ((p->p_flag & P_SUGID) == P_SUGID) + } + if ((p->p_flag & P_SUGID) == P_SUGID) { pbsd_shortp->pbsi_flags |= PROC_FLAG_PSUGID; - if ((p->p_flag & P_EXEC) == P_EXEC) + } + if ((p->p_flag & P_EXEC) == P_EXEC) { pbsd_shortp->pbsi_flags |= PROC_FLAG_EXEC; + } #if !CONFIG_EMBEDDED - if ((p->p_flag & P_DELAYIDLESLEEP) == P_DELAYIDLESLEEP) + if ((p->p_flag & P_DELAYIDLESLEEP) == P_DELAYIDLESLEEP) { pbsd_shortp->pbsi_flags |= PROC_FLAG_DELAYIDLESLEEP; + } #endif /* !CONFIG_EMBEDDED */ - switch(PROC_CONTROL_STATE(p)) { - case P_PCTHROTTLE: - pbsd_shortp->pbsi_flags |= PROC_FLAG_PC_THROTTLE; - break; - case P_PCSUSP: - pbsd_shortp->pbsi_flags |= PROC_FLAG_PC_SUSP; - break; - case P_PCKILL: - pbsd_shortp->pbsi_flags |= PROC_FLAG_PC_KILL; - break; - }; + switch (PROC_CONTROL_STATE(p)) { + case P_PCTHROTTLE: + pbsd_shortp->pbsi_flags |= PROC_FLAG_PC_THROTTLE; + break; + case P_PCSUSP: + pbsd_shortp->pbsi_flags |= PROC_FLAG_PC_SUSP; + break; + case P_PCKILL: + pbsd_shortp->pbsi_flags |= PROC_FLAG_PC_KILL; + break; + } + ; + + switch (PROC_ACTION_STATE(p)) { + case P_PCTHROTTLE: + pbsd_shortp->pbsi_flags |= PROC_FLAG_PA_THROTTLE; + break; + case P_PCSUSP: + pbsd_shortp->pbsi_flags |= PROC_FLAG_PA_SUSP; + break; + } + ; - switch(PROC_ACTION_STATE(p)) { - case P_PCTHROTTLE: - pbsd_shortp->pbsi_flags |= PROC_FLAG_PA_THROTTLE; - break; - case P_PCSUSP: - pbsd_shortp->pbsi_flags |= PROC_FLAG_PA_SUSP; - break; - }; - /* if process is a zombie skip bg state */ - if ((zombie == 0) && (p->p_stat != SZOMB) && (p->task != TASK_NULL)) + if ((zombie == 0) && (p->p_stat != SZOMB) && (p->task != TASK_NULL)) { proc_get_darwinbgstate(p->task, &pbsd_shortp->pbsi_flags); + } pbsd_shortp->pbsi_uid = p->p_uid; - pbsd_shortp->pbsi_gid = p->p_gid; + pbsd_shortp->pbsi_gid = p->p_gid; pbsd_shortp->pbsi_ruid = p->p_ruid; pbsd_shortp->pbsi_rgid = p->p_rgid; pbsd_shortp->pbsi_svuid = p->p_svuid; pbsd_shortp->pbsi_svgid = p->p_svgid; - - return(0); + + return 0; } -int +int proc_pidtaskinfo(proc_t p, struct proc_taskinfo * ptinfo) { task_t task; - + task = p->task; bzero(ptinfo, sizeof(struct proc_taskinfo)); fill_taskprocinfo(task, (struct proc_taskinfo_internal *)ptinfo); - return(0); + return 0; } -int -proc_pidthreadinfo(proc_t p, uint64_t arg, int thuniqueid, struct proc_threadinfo *pthinfo) +int +proc_pidthreadinfo(proc_t p, uint64_t arg, bool thuniqueid, struct proc_threadinfo *pthinfo) { int error = 0; uint64_t threadaddr = (uint64_t)arg; @@ -681,19 +868,82 @@ proc_pidthreadinfo(proc_t p, uint64_t arg, int thuniqueid, struct proc_threadin bzero(pthinfo, sizeof(struct proc_threadinfo)); error = fill_taskthreadinfo(p->task, threadaddr, thuniqueid, (struct proc_threadinfo_internal *)pthinfo, NULL, NULL); - if (error) - return(ESRCH); - else - return(0); + if (error) { + return ESRCH; + } else { + return 0; + } +} + +boolean_t +bsd_hasthreadname(void *uth) +{ + struct uthread *ut = (struct uthread*)uth; + /* This doesn't check for the empty string; do we care? */ + if (ut->pth_name) { + return TRUE; + } else { + return FALSE; + } } -void +void bsd_getthreadname(void *uth, char *buffer) { struct uthread *ut = (struct uthread *)uth; - if(ut->pth_name) - bcopy(ut->pth_name,buffer,MAXTHREADNAMESIZE); + if (ut->pth_name) { + bcopy(ut->pth_name, buffer, MAXTHREADNAMESIZE); + } +} + +/* + * This is known to race with regards to the contents of the thread name; concurrent + * callers may result in a garbled name. + */ +void +bsd_setthreadname(void *uth, const char *name) +{ + struct uthread *ut = (struct uthread *)uth; + char * name_buf = NULL; + + if (!ut->pth_name) { + /* If there is no existing thread name, allocate a buffer for one. */ + name_buf = kalloc(MAXTHREADNAMESIZE); + assert(name_buf); + bzero(name_buf, MAXTHREADNAMESIZE); + + /* Someone could conceivably have named the thread at the same time we did. */ + if (!OSCompareAndSwapPtr(NULL, name_buf, &ut->pth_name)) { + kfree(name_buf, MAXTHREADNAMESIZE); + } + } else { + kernel_debug_string_simple(TRACE_STRING_THREADNAME_PREV, ut->pth_name); + } + + strncpy(ut->pth_name, name, MAXTHREADNAMESIZE - 1); + kernel_debug_string_simple(TRACE_STRING_THREADNAME, ut->pth_name); +} + +void +bsd_copythreadname(void *dst_uth, void *src_uth) +{ + struct uthread *dst_ut = (struct uthread *)dst_uth; + struct uthread *src_ut = (struct uthread *)src_uth; + + if (src_ut->pth_name == NULL) { + return; + } + + if (dst_ut->pth_name == NULL) { + dst_ut->pth_name = (char *)kalloc(MAXTHREADNAMESIZE); + if (dst_ut->pth_name == NULL) { + return; + } + } + + bcopy(src_ut->pth_name, dst_ut->pth_name, MAXTHREADNAMESIZE); + return; } void @@ -704,18 +954,19 @@ bsd_threadcdir(void * uth, void *vptr, int *vidp) vnode_t *vpp = (vnode_t *)vptr; vp = ut->uu_cdir; - if (vp != NULLVP) { + if (vp != NULLVP) { if (vpp != NULL) { *vpp = vp; - if (vidp != NULL) + if (vidp != NULL) { *vidp = vp->v_id; + } } } } -int -proc_pidthreadpathinfo(proc_t p, uint64_t arg, struct proc_threadwithpathinfo *pinfo) +int +proc_pidthreadpathinfo(proc_t p, uint64_t arg, struct proc_threadwithpathinfo *pinfo) { vnode_t vp = NULLVP; int vid; @@ -726,58 +977,62 @@ proc_pidthreadpathinfo(proc_t p, uint64_t arg, struct proc_threadwithpathinfo * bzero(pinfo, sizeof(struct proc_threadwithpathinfo)); error = fill_taskthreadinfo(p->task, threadaddr, 0, (struct proc_threadinfo_internal *)&pinfo->pt, (void *)&vp, &vid); - if (error) - return(ESRCH); + if (error) { + return ESRCH; + } if ((vp != NULLVP) && ((vnode_getwithvid(vp, vid)) == 0)) { - error = fill_vnodeinfo(vp, &pinfo->pvip.vip_vi) ; + error = fill_vnodeinfo(vp, &pinfo->pvip.vip_vi, FALSE); if (error == 0) { count = MAXPATHLEN; vn_getpath(vp, &pinfo->pvip.vip_path[0], &count); - pinfo->pvip.vip_path[MAXPATHLEN-1] = 0; + pinfo->pvip.vip_path[MAXPATHLEN - 1] = 0; } vnode_put(vp); - } - return(error); + } + return error; } -int -proc_pidlistthreads(proc_t p, user_addr_t buffer, uint32_t buffersize, int32_t *retval) +int +proc_pidlistthreads(proc_t p, bool thuniqueid, user_addr_t buffer, uint32_t buffersize, int32_t *retval) { - int count = 0; + uint32_t count = 0; int ret = 0; int error = 0; void * kbuf; - int numthreads; + uint32_t numthreads = 0; - - count = buffersize/(sizeof(uint64_t)); - numthreads = get_numthreads(p->task); + int num = get_numthreads(p->task) + 10; + if (num > 0) { + numthreads = (uint32_t)num; + } - numthreads += 10; + count = buffersize / (sizeof(uint64_t)); - if (numthreads > count) + if (numthreads > count) { numthreads = count; + } kbuf = (void *)kalloc(numthreads * sizeof(uint64_t)); - if (kbuf == NULL) - return(ENOMEM); + if (kbuf == NULL) { + return ENOMEM; + } bzero(kbuf, numthreads * sizeof(uint64_t)); - - ret = fill_taskthreadlist(p->task, kbuf, numthreads); - + + ret = fill_taskthreadlist(p->task, kbuf, numthreads, thuniqueid); + error = copyout(kbuf, buffer, ret); kfree(kbuf, numthreads * sizeof(uint64_t)); - if (error == 0) + if (error == 0) { *retval = ret; - return(error); - + } + return error; } -int +int proc_pidregioninfo(proc_t p, uint64_t arg, user_addr_t buffer, __unused uint32_t buffersize, int32_t *retval) { struct proc_regioninfo preginfo; @@ -785,85 +1040,234 @@ proc_pidregioninfo(proc_t p, uint64_t arg, user_addr_t buffer, __unused uint32_t bzero(&preginfo, sizeof(struct proc_regioninfo)); ret = fill_procregioninfo( p->task, arg, (struct proc_regioninfo_internal *)&preginfo, (uintptr_t *)0, (uint32_t *)0); - if (ret == 0) - return(EINVAL); + if (ret == 0) { + return EINVAL; + } error = copyout(&preginfo, buffer, sizeof(struct proc_regioninfo)); - if (error == 0) + if (error == 0) { *retval = sizeof(struct proc_regioninfo); - return(error); + } + return error; } -int +int proc_pidregionpathinfo(proc_t p, uint64_t arg, user_addr_t buffer, __unused uint32_t buffersize, int32_t *retval) { struct proc_regionwithpathinfo preginfo; int ret, error = 0; - uintptr_t vnodeaddr= 0; - uint32_t vnodeid= 0; + uintptr_t vnodeaddr = 0; + uint32_t vnodeid = 0; vnode_t vp; int count; bzero(&preginfo, sizeof(struct proc_regionwithpathinfo)); ret = fill_procregioninfo( p->task, arg, (struct proc_regioninfo_internal *)&preginfo.prp_prinfo, (uintptr_t *)&vnodeaddr, (uint32_t *)&vnodeid); - if (ret == 0) - return(EINVAL); + if (ret == 0) { + return EINVAL; + } if (vnodeaddr) { vp = (vnode_t)vnodeaddr; if ((vnode_getwithvid(vp, vnodeid)) == 0) { /* FILL THE VNODEINFO */ - error = fill_vnodeinfo(vp, &preginfo.prp_vip.vip_vi); + error = fill_vnodeinfo(vp, &preginfo.prp_vip.vip_vi, FALSE); count = MAXPATHLEN; vn_getpath(vp, &preginfo.prp_vip.vip_path[0], &count); /* Always make sure it is null terminated */ - preginfo.prp_vip.vip_path[MAXPATHLEN-1] = 0; + preginfo.prp_vip.vip_path[MAXPATHLEN - 1] = 0; vnode_put(vp); } } error = copyout(&preginfo, buffer, sizeof(struct proc_regionwithpathinfo)); - if (error == 0) + if (error == 0) { *retval = sizeof(struct proc_regionwithpathinfo); - return(error); + } + return error; } -/* - * Path is relative to current process directory; may different from current - * thread directory. - */ -int -proc_pidvnodepathinfo(proc_t p, __unused uint64_t arg, user_addr_t buffer, __unused uint32_t buffersize, int32_t *retval) +int +proc_pidregionpathinfo2(proc_t p, uint64_t arg, user_addr_t buffer, __unused uint32_t buffersize, int32_t *retval) { - struct proc_vnodepathinfo pvninfo; - int error = 0; - vnode_t vncdirvp = NULLVP; - uint32_t vncdirid=0; - vnode_t vnrdirvp = NULLVP; - uint32_t vnrdirid=0; + struct proc_regionwithpathinfo preginfo; + int ret, error = 0; + uintptr_t vnodeaddr = 0; + uint32_t vnodeid = 0; + vnode_t vp; int count; - bzero(&pvninfo, sizeof(struct proc_vnodepathinfo)); + bzero(&preginfo, sizeof(struct proc_regionwithpathinfo)); - proc_fdlock(p); - if (p->p_fd->fd_cdir) { - vncdirvp = p->p_fd->fd_cdir; - vncdirid = p->p_fd->fd_cdir->v_id; + ret = fill_procregioninfo_onlymappedvnodes( p->task, arg, (struct proc_regioninfo_internal *)&preginfo.prp_prinfo, (uintptr_t *)&vnodeaddr, (uint32_t *)&vnodeid); + if (ret == 0) { + return EINVAL; } - if (p->p_fd->fd_rdir) { - vnrdirvp = p->p_fd->fd_rdir; - vnrdirid = p->p_fd->fd_rdir->v_id; + if (!vnodeaddr) { + return EINVAL; } - proc_fdunlock(p); - if (vncdirvp != NULLVP) { - if ((error = vnode_getwithvid(vncdirvp, vncdirid)) == 0) { - /* FILL THE VNODEINFO */ - error = fill_vnodeinfo(vncdirvp, &pvninfo.pvi_cdir.vip_vi); - if ( error == 0) { - count = MAXPATHLEN; - vn_getpath(vncdirvp, &pvninfo.pvi_cdir.vip_path[0], &count); - pvninfo.pvi_cdir.vip_path[MAXPATHLEN-1] = 0; - } + vp = (vnode_t)vnodeaddr; + if ((vnode_getwithvid(vp, vnodeid)) == 0) { + /* FILL THE VNODEINFO */ + error = fill_vnodeinfo(vp, &preginfo.prp_vip.vip_vi, FALSE); + count = MAXPATHLEN; + vn_getpath(vp, &preginfo.prp_vip.vip_path[0], &count); + /* Always make sure it is null terminated */ + preginfo.prp_vip.vip_path[MAXPATHLEN - 1] = 0; + vnode_put(vp); + } else { + return EINVAL; + } + + error = copyout(&preginfo, buffer, sizeof(struct proc_regionwithpathinfo)); + if (error == 0) { + *retval = sizeof(struct proc_regionwithpathinfo); + } + return error; +} + +int +proc_pidregionpath(proc_t p, uint64_t arg, user_addr_t buffer, __unused uint32_t buffersize, int32_t *retval) +{ + struct proc_regionpath path; + int ret, error = 0; + uintptr_t vnodeaddr = 0; + uint32_t vnodeid = 0; + vnode_t vp; + + bzero(&path, sizeof(struct proc_regionpath)); + + ret = find_region_details(p->task, (vm_map_offset_t) arg, + (uintptr_t *)&vnodeaddr, (uint32_t *)&vnodeid, + &path.prpo_addr, &path.prpo_regionlength); + if (ret == 0) { + return EINVAL; + } + if (!vnodeaddr) { + return EINVAL; + } + + vp = (vnode_t)vnodeaddr; + if ((vnode_getwithvid(vp, vnodeid)) == 0) { + int count = MAXPATHLEN; + vn_getpath(vp, &path.prpo_path[0], &count); + /* Always make sure it is null terminated */ + path.prpo_path[MAXPATHLEN - 1] = 0; + vnode_put(vp); + } else { + return EINVAL; + } + + error = copyout(&path, buffer, sizeof(struct proc_regionpath)); + if (error == 0) { + *retval = sizeof(struct proc_regionpath); + } + return error; +} + +int +proc_pidregionpathinfo3(proc_t p, uint64_t arg, user_addr_t buffer, __unused uint32_t buffersize, int32_t *retval) +{ + struct proc_regionwithpathinfo preginfo; + int ret, error = 0; + uintptr_t vnodeaddr; + uint32_t vnodeid; + vnode_t vp; + int count; + uint64_t addr = 0; + + /* Loop while looking for vnodes that match dev_t filter */ + do { + bzero(&preginfo, sizeof(struct proc_regionwithpathinfo)); + vnodeaddr = 0; + vnodeid = 0; + + ret = fill_procregioninfo_onlymappedvnodes( p->task, addr, (struct proc_regioninfo_internal *)&preginfo.prp_prinfo, (uintptr_t *)&vnodeaddr, (uint32_t *)&vnodeid); + if (ret == 0) { + return EINVAL; + } + if (!vnodeaddr) { + return EINVAL; + } + + vp = (vnode_t)vnodeaddr; + if ((vnode_getwithvid(vp, vnodeid)) == 0) { + /* Check if the vnode matches the filter, otherwise loop looking for the next memory region backed by a vnode */ + struct vnode_attr va; + + memset(&va, 0, sizeof(va)); + VATTR_INIT(&va); + VATTR_WANTED(&va, va_fsid); + VATTR_WANTED(&va, va_fsid64); + + ret = vnode_getattr(vp, &va, vfs_context_current()); + if (ret) { + vnode_put(vp); + return EINVAL; + } + + if (vnode_get_va_fsid(&va) == arg) { + /* FILL THE VNODEINFO */ + error = fill_vnodeinfo(vp, &preginfo.prp_vip.vip_vi, FALSE); + count = MAXPATHLEN; + vn_getpath(vp, &preginfo.prp_vip.vip_path[0], &count); + /* Always make sure it is null terminated */ + preginfo.prp_vip.vip_path[MAXPATHLEN - 1] = 0; + vnode_put(vp); + break; + } + vnode_put(vp); + } else { + return EINVAL; + } + + addr = preginfo.prp_prinfo.pri_address + preginfo.prp_prinfo.pri_size; + } while (1); + + error = copyout(&preginfo, buffer, sizeof(struct proc_regionwithpathinfo)); + if (error == 0) { + *retval = sizeof(struct proc_regionwithpathinfo); + } + return error; +} + +/* + * Path is relative to current process directory; may different from current + * thread directory. + */ +int +proc_pidvnodepathinfo(proc_t p, __unused uint64_t arg, user_addr_t buffer, __unused uint32_t buffersize, int32_t *retval) +{ + struct proc_vnodepathinfo pvninfo; + int error = 0; + vnode_t vncdirvp = NULLVP; + uint32_t vncdirid = 0; + vnode_t vnrdirvp = NULLVP; + uint32_t vnrdirid = 0; + int count; + + bzero(&pvninfo, sizeof(struct proc_vnodepathinfo)); + + proc_fdlock(p); + if (p->p_fd->fd_cdir) { + vncdirvp = p->p_fd->fd_cdir; + vncdirid = p->p_fd->fd_cdir->v_id; + } + if (p->p_fd->fd_rdir) { + vnrdirvp = p->p_fd->fd_rdir; + vnrdirid = p->p_fd->fd_rdir->v_id; + } + proc_fdunlock(p); + + if (vncdirvp != NULLVP) { + if ((error = vnode_getwithvid(vncdirvp, vncdirid)) == 0) { + /* FILL THE VNODEINFO */ + error = fill_vnodeinfo(vncdirvp, &pvninfo.pvi_cdir.vip_vi, TRUE); + if (error == 0) { + count = MAXPATHLEN; + vn_getpath(vncdirvp, &pvninfo.pvi_cdir.vip_path[0], &count); + pvninfo.pvi_cdir.vip_path[MAXPATHLEN - 1] = 0; + } vnode_put(vncdirvp); } else { goto out; @@ -873,12 +1277,12 @@ proc_pidvnodepathinfo(proc_t p, __unused uint64_t arg, user_addr_t buffer, __unu if ((error == 0) && (vnrdirvp != NULLVP)) { if ((error = vnode_getwithvid(vnrdirvp, vnrdirid)) == 0) { /* FILL THE VNODEINFO */ - error = fill_vnodeinfo(vnrdirvp, &pvninfo.pvi_rdir.vip_vi); - if ( error == 0) { + error = fill_vnodeinfo(vnrdirvp, &pvninfo.pvi_rdir.vip_vi, TRUE); + if (error == 0) { count = MAXPATHLEN; vn_getpath(vnrdirvp, &pvninfo.pvi_rdir.vip_path[0], &count); - pvninfo.pvi_rdir.vip_path[MAXPATHLEN-1] = 0; - } + pvninfo.pvi_rdir.vip_path[MAXPATHLEN - 1] = 0; + } vnode_put(vnrdirvp); } else { goto out; @@ -886,31 +1290,56 @@ proc_pidvnodepathinfo(proc_t p, __unused uint64_t arg, user_addr_t buffer, __unu } if (error == 0) { error = copyout(&pvninfo, buffer, sizeof(struct proc_vnodepathinfo)); - if (error == 0) + if (error == 0) { *retval = sizeof(struct proc_vnodepathinfo); + } } out: - return(error); + return error; } -int +int proc_pidpathinfo(proc_t p, __unused uint64_t arg, user_addr_t buffer, uint32_t buffersize, __unused int32_t *retval) { - int vid, error; + int error; vnode_t tvp; - vnode_t nvp = NULLVP; - int len = buffersize; + int len = buffersize; char * buf; tvp = p->p_textvp; - if (tvp == NULLVP) - return(ESRCH); + if (tvp == NULLVP) { + return ESRCH; + } buf = (char *)kalloc(buffersize); - if (buf == NULL) - return(ENOMEM); + if (buf == NULL) { + return ENOMEM; + } + + bzero(buf, buffersize); + + error = proc_pidpathinfo_internal(p, arg, buf, buffersize, retval); + if (error == 0) { + error = copyout(buf, buffer, len); + } + kfree(buf, buffersize); + return error; +} +int +proc_pidpathinfo_internal(proc_t p, __unused uint64_t arg, char *buf, uint32_t buffersize, __unused int32_t *retval) +{ + int vid, error; + vnode_t tvp; + vnode_t nvp = NULLVP; + int len = buffersize; + + tvp = p->p_textvp; + + if (tvp == NULLVP) { + return ESRCH; + } vid = vnode_vid(tvp); error = vnode_getwithvid(tvp, vid); @@ -918,20 +1347,17 @@ proc_pidpathinfo(proc_t p, __unused uint64_t arg, user_addr_t buffer, uint32_t b error = vn_getpath_fsenter(tvp, buf, &len); vnode_put(tvp); if (error == 0) { - error = vnode_lookup(buf, 0, &nvp, vfs_context_current()); - if ((error == 0) && ( nvp != NULLVP)) + error = vnode_lookup(buf, 0, &nvp, vfs_context_current()); + if ((error == 0) && (nvp != NULLVP)) { vnode_put(nvp); - if (error == 0) { - error = copyout(buf, buffer, len); } } } - kfree(buf, buffersize); - return(error); + return error; } -int +int proc_pidworkqueueinfo(proc_t p, struct proc_workqueueinfo *pwqinfo) { int error = 0; @@ -939,12 +1365,478 @@ proc_pidworkqueueinfo(proc_t p, struct proc_workqueueinfo *pwqinfo) bzero(pwqinfo, sizeof(struct proc_workqueueinfo)); error = fill_procworkqueue(p, pwqinfo); - if (error) - return(ESRCH); - else - return(0); + if (error) { + return ESRCH; + } else { + return 0; + } +} + + +void +proc_piduniqidentifierinfo(proc_t p, struct proc_uniqidentifierinfo *p_uniqidinfo) +{ + p_uniqidinfo->p_uniqueid = proc_uniqueid(p); + proc_getexecutableuuid(p, (unsigned char *)&p_uniqidinfo->p_uuid, sizeof(p_uniqidinfo->p_uuid)); + p_uniqidinfo->p_puniqueid = proc_puniqueid(p); + p_uniqidinfo->p_reserve2 = 0; + p_uniqidinfo->p_reserve3 = 0; + p_uniqidinfo->p_reserve4 = 0; +} + + +static int +proc_piduuidinfo(pid_t pid, uuid_t uuid_buf, uint32_t buffersize) +{ + struct proc * p = PROC_NULL; + int zombref = 0; + + if (buffersize < sizeof(uuid_t)) { + return EINVAL; + } + + if ((p = proc_find(pid)) == PROC_NULL) { + p = proc_find_zombref(pid); + zombref = 1; + } + if (p == PROC_NULL) { + return ESRCH; + } + + proc_getexecutableuuid(p, (unsigned char *)uuid_buf, buffersize); + + if (zombref) { + proc_drop_zombref(p); + } else { + proc_rele(p); + } + + return 0; +} + +/* + * Function to get the uuid and pid of the originator of the voucher. + */ +int +proc_pidoriginatorpid_uuid(uuid_t uuid, uint32_t buffersize, pid_t *pid) +{ + pid_t originator_pid; + kern_return_t kr; + int error; + + /* + * Get the current voucher origin pid. The pid returned here + * might not be valid or may have been recycled. + */ + kr = thread_get_current_voucher_origin_pid(&originator_pid); + /* If errors, convert errors to appropriate format */ + if (kr) { + if (kr == KERN_INVALID_TASK) { + error = ESRCH; + } else if (kr == KERN_INVALID_VALUE) { + error = ENOATTR; + } else { + error = EINVAL; + } + return error; + } + + *pid = originator_pid; + error = proc_piduuidinfo(originator_pid, uuid, buffersize); + return error; +} + +/* + * Function to get the uuid of the originator of the voucher. + */ +int +proc_pidoriginatoruuid(uuid_t uuid, uint32_t buffersize) +{ + pid_t originator_pid; + return proc_pidoriginatorpid_uuid(uuid, buffersize, &originator_pid); +} + +/* + * Function to get the task ipc table size. + */ +int +proc_pidipctableinfo(proc_t p, struct proc_ipctableinfo *table_info) +{ + task_t task; + int error = 0; + + task = p->task; + + bzero(table_info, sizeof(struct proc_ipctableinfo)); + error = fill_taskipctableinfo(task, &(table_info->table_size), &(table_info->table_free)); + + if (error) { + error = EINVAL; + } + + return error; +} + +/***************************** proc_pidoriginatorinfo ***************************/ + +int +proc_pidoriginatorinfo(int pid, int flavor, user_addr_t buffer, uint32_t buffersize, int32_t * retval) +{ + int error = ENOTSUP; + uint32_t size; + + switch (flavor) { + case PROC_PIDORIGINATOR_UUID: + size = PROC_PIDORIGINATOR_UUID_SIZE; + break; + case PROC_PIDORIGINATOR_BGSTATE: + size = PROC_PIDORIGINATOR_BGSTATE_SIZE; + break; + case PROC_PIDORIGINATOR_PID_UUID: + size = PROC_PIDORIGINATOR_PID_UUID_SIZE; + break; + default: + return EINVAL; + } + + if (buffersize < size) { + return ENOMEM; + } + + if (pid != 0 && pid != proc_selfpid()) { + return EINVAL; + } + + switch (flavor) { + case PROC_PIDORIGINATOR_UUID: { + uuid_t uuid = {}; + + error = proc_pidoriginatoruuid(uuid, sizeof(uuid)); + if (error != 0) { + goto out; + } + + error = copyout(uuid, buffer, size); + if (error == 0) { + *retval = size; + } + } + break; + + case PROC_PIDORIGINATOR_PID_UUID: { + struct proc_originatorinfo originator_info; + bzero(&originator_info, sizeof(originator_info)); + + error = proc_pidoriginatorpid_uuid(originator_info.originator_uuid, + sizeof(uuid_t), &originator_info.originator_pid); + if (error != 0) { + goto out; + } + + error = copyout(&originator_info, buffer, size); + if (error == 0) { + *retval = size; + } + } + break; + + case PROC_PIDORIGINATOR_BGSTATE: { + uint32_t is_backgrounded = 0; + error = proc_get_originatorbgstate(&is_backgrounded); + if (error) { + goto out; + } + + error = copyout(&is_backgrounded, buffer, size); + if (error == 0) { + *retval = size; + } + } + break; + default: + error = ENOTSUP; + } +out: + return error; } + +/***************************** proc_listcoalitions ***************************/ +int +proc_listcoalitions(int flavor, int type, user_addr_t buffer, + uint32_t buffersize, int32_t *retval) +{ +#if CONFIG_COALITIONS + int error = ENOTSUP; + int coal_type; + uint32_t elem_size; + void *coalinfo = NULL; + uint32_t k_buffersize = 0, copyout_sz = 0; + int ncoals = 0, ncoals_ = 0; + + /* struct procinfo_coalinfo; */ + + switch (flavor) { + case LISTCOALITIONS_ALL_COALS: + elem_size = LISTCOALITIONS_ALL_COALS_SIZE; + coal_type = -1; + break; + case LISTCOALITIONS_SINGLE_TYPE: + elem_size = LISTCOALITIONS_SINGLE_TYPE_SIZE; + coal_type = type; + break; + default: + return EINVAL; + } + + /* find the total number of coalitions */ + ncoals = coalitions_get_list(coal_type, NULL, 0); + + if (ncoals == 0 || buffer == 0 || buffersize == 0) { + /* + * user just wants buffer size + * or there are no coalitions + */ + error = 0; + *retval = (int)(ncoals * elem_size); + goto out; + } + + k_buffersize = ncoals * elem_size; + coalinfo = kalloc((vm_size_t)k_buffersize); + if (!coalinfo) { + error = ENOMEM; + goto out; + } + bzero(coalinfo, k_buffersize); + + switch (flavor) { + case LISTCOALITIONS_ALL_COALS: + case LISTCOALITIONS_SINGLE_TYPE: + ncoals_ = coalitions_get_list(coal_type, coalinfo, ncoals); + break; + default: + panic("memory corruption?!"); + } + + if (ncoals_ == 0) { + /* all the coalitions disappeared... weird but valid */ + error = 0; + *retval = 0; + goto out; + } + + /* + * Some coalitions may have disappeared between our initial check, + * and the the actual list acquisition. + * Only copy out what we really need. + */ + copyout_sz = k_buffersize; + if (ncoals_ < ncoals) { + copyout_sz = ncoals_ * elem_size; + } + + /* + * copy the list up to user space + * (we're guaranteed to have a non-null pointer/size here) + */ + error = copyout(coalinfo, buffer, + copyout_sz < buffersize ? copyout_sz : buffersize); + + if (error == 0) { + *retval = (int)copyout_sz; + } + +out: + if (coalinfo) { + kfree(coalinfo, k_buffersize); + } + + return error; +#else + /* no coalition support */ + (void)flavor; + (void)type; + (void)buffer; + (void)buffersize; + (void)retval; + return ENOTSUP; +#endif +} + + +/*************************** proc_can_use_forgeound_hw **************************/ +int +proc_can_use_foreground_hw(int pid, user_addr_t u_reason, uint32_t reasonsize, int32_t *retval) +{ + proc_t p = PROC_NULL; + int error = 0; + uint32_t reason = PROC_FGHW_ERROR; + uint32_t isBG = 0; + task_t task = TASK_NULL; +#if CONFIG_COALITIONS + coalition_t coal = COALITION_NULL; +#endif + + *retval = 0; + + if (pid <= 0) { + error = EINVAL; + reason = PROC_FGHW_ERROR; + goto out; + } + + p = proc_find(pid); + if (p == PROC_NULL) { + error = ESRCH; + reason = PROC_FGHW_ERROR; + goto out; + } + +#if CONFIG_COALITIONS + if (p != current_proc() && + !kauth_cred_issuser(kauth_cred_get())) { + error = EPERM; + reason = PROC_FGHW_ERROR; + goto out; + } + + task = p->task; + if (coalition_is_leader(task, task_get_coalition(task, COALITION_TYPE_JETSAM))) { + task_reference(task); + } else { + /* current task is not a coalition leader: find the leader */ + task = coalition_get_leader(coal); + } + + if (task != TASK_NULL) { + /* + * If task is non-null, then it is the coalition leader of the + * current process' coalition. This could be the same task as + * the current_task, and that's OK. + */ + uint32_t flags = 0; + int role; + + proc_get_darwinbgstate(task, &flags); + if ((flags & PROC_FLAG_APPLICATION) != PROC_FLAG_APPLICATION) { + /* + * Coalition leader is not an application, continue + * searching for other ways this task could gain + * access to HW + */ + reason = PROC_FGHW_DAEMON_LEADER; + goto no_leader; + } + + if (proc_get_effective_task_policy(task, TASK_POLICY_DARWIN_BG)) { + /* + * If the leader of the current process' coalition has + * been marked as DARWIN_BG, then it definitely should + * not be using foreground hardware resources. + */ + reason = PROC_FGHW_LEADER_BACKGROUND; + goto out; + } + + role = proc_get_effective_task_policy(task, TASK_POLICY_ROLE); + switch (role) { + case TASK_FOREGROUND_APPLICATION: /* DARWIN_ROLE_UI_FOCAL */ + case TASK_BACKGROUND_APPLICATION: /* DARWIN_ROLE_UI */ + /* + * The leader of this coalition is a focal, UI app: + * access granted + * TODO: should extensions/plugins be allowed to use + * this hardware? + */ + *retval = 1; + reason = PROC_FGHW_OK; + goto out; + case TASK_DEFAULT_APPLICATION: /* DARWIN_ROLE_UI_NON_FOCAL */ + case TASK_NONUI_APPLICATION: /* DARWIN_ROLE_NON_UI */ + case TASK_THROTTLE_APPLICATION: + case TASK_UNSPECIFIED: + default: + /* non-focal, non-ui apps don't get access */ + reason = PROC_FGHW_LEADER_NONUI; + goto out; + } + } + +no_leader: + if (task != TASK_NULL) { + task_deallocate(task); + task = TASK_NULL; + } +#endif /* CONFIG_COALITIONS */ + + /* + * There is no reasonable semantic to investigate the currently + * adopted voucher of an arbitrary thread in a non-current process. + * We return '0' + */ + if (p != current_proc()) { + error = EINVAL; + goto out; + } + + /* + * In the absence of coalitions, fall back to a voucher-based lookup + * where a daemon can used foreground HW if it's operating on behalf + * of a foreground application. + * NOTE: this is equivalent to a call to + * proc_pidoriginatorinfo(PROC_PIDORIGINATOR_BGSTATE, &isBG, sizeof(isBG)) + */ + isBG = 1; + error = proc_get_originatorbgstate(&isBG); + switch (error) { + case 0: + break; + case ESRCH: + reason = PROC_FGHW_NO_ORIGINATOR; + error = 0; + goto out; + case ENOATTR: + reason = PROC_FGHW_NO_VOUCHER_ATTR; + error = 0; + goto out; + case EINVAL: + reason = PROC_FGHW_DAEMON_NO_VOUCHER; + error = 0; + goto out; + default: + /* some other error occurred: report that to the caller */ + reason = PROC_FGHW_VOUCHER_ERROR; + goto out; + } + + if (isBG) { + reason = PROC_FGHW_ORIGINATOR_BACKGROUND; + error = 0; + } else { + /* + * The process itself is either a foreground app, or has + * adopted a voucher originating from an app that's still in + * the foreground + */ + reason = PROC_FGHW_DAEMON_OK; + *retval = 1; + } + +out: + if (task != TASK_NULL) { + task_deallocate(task); + } + if (p != PROC_NULL) { + proc_rele(p); + } + if (reasonsize >= sizeof(reason) && u_reason != (user_addr_t)0) { + (void)copyout(&reason, u_reason, sizeof(reason)); + } + return error; +} + + /********************************** proc_pidinfo ********************************/ @@ -955,614 +1847,971 @@ proc_pidinfo(int pid, int flavor, uint64_t arg, user_addr_t buffer, uint32_t bu int error = ENOTSUP; int gotref = 0; int findzomb = 0; - int refheld = 0, shortversion = 0; + int shortversion = 0; uint32_t size; int zombie = 0; - int thuniqueid = 0; + bool thuniqueid = false; + int uniqidversion = 0; + boolean_t check_same_user; switch (flavor) { - case PROC_PIDLISTFDS: - size = PROC_PIDLISTFD_SIZE; - if (buffer == (user_addr_t)0) - size = 0; - break; - case PROC_PIDTBSDINFO: - size = PROC_PIDTBSDINFO_SIZE; - break; - case PROC_PIDTASKINFO: - size = PROC_PIDTASKINFO_SIZE; - break; - case PROC_PIDTASKALLINFO: - size = PROC_PIDTASKALLINFO_SIZE; - break; - case PROC_PIDTHREADINFO: - size = PROC_PIDTHREADINFO_SIZE; - break; - case PROC_PIDLISTTHREADS: - size = PROC_PIDLISTTHREADS_SIZE; - break; - case PROC_PIDREGIONINFO: - size = PROC_PIDREGIONINFO_SIZE; - break; - case PROC_PIDREGIONPATHINFO: - size = PROC_PIDREGIONPATHINFO_SIZE; - break; - case PROC_PIDVNODEPATHINFO: - size = PROC_PIDVNODEPATHINFO_SIZE; - break; - case PROC_PIDTHREADPATHINFO: - size = PROC_PIDTHREADPATHINFO_SIZE; - break; - case PROC_PIDPATHINFO: - size = MAXPATHLEN; - break; - case PROC_PIDWORKQUEUEINFO: - /* kernel does not have workq info */ - if (pid == 0) - return(EINVAL); - else - size = PROC_PIDWORKQUEUEINFO_SIZE; - break; - case PROC_PIDT_SHORTBSDINFO: - size = PROC_PIDT_SHORTBSDINFO_SIZE; - break; - case PROC_PIDLISTFILEPORTS: - size = PROC_PIDLISTFILEPORTS_SIZE; - if (buffer == (user_addr_t)0) - size = 0; - break; - case PROC_PIDTHREADID64INFO: - size = PROC_PIDTHREADID64INFO_SIZE; - break; - default: - return(EINVAL); + case PROC_PIDLISTFDS: + size = PROC_PIDLISTFD_SIZE; + if (buffer == USER_ADDR_NULL) { + size = 0; + } + break; + case PROC_PIDTBSDINFO: + size = PROC_PIDTBSDINFO_SIZE; + break; + case PROC_PIDTASKINFO: + size = PROC_PIDTASKINFO_SIZE; + break; + case PROC_PIDTASKALLINFO: + size = PROC_PIDTASKALLINFO_SIZE; + break; + case PROC_PIDTHREADINFO: + size = PROC_PIDTHREADINFO_SIZE; + break; + case PROC_PIDLISTTHREADIDS: + size = PROC_PIDLISTTHREADIDS_SIZE; + break; + case PROC_PIDLISTTHREADS: + size = PROC_PIDLISTTHREADS_SIZE; + break; + case PROC_PIDREGIONINFO: + size = PROC_PIDREGIONINFO_SIZE; + break; + case PROC_PIDREGIONPATHINFO: + size = PROC_PIDREGIONPATHINFO_SIZE; + break; + case PROC_PIDVNODEPATHINFO: + size = PROC_PIDVNODEPATHINFO_SIZE; + break; + case PROC_PIDTHREADPATHINFO: + size = PROC_PIDTHREADPATHINFO_SIZE; + break; + case PROC_PIDPATHINFO: + size = MAXPATHLEN; + break; + case PROC_PIDWORKQUEUEINFO: + /* kernel does not have workq info */ + if (pid == 0) { + return EINVAL; + } else { + size = PROC_PIDWORKQUEUEINFO_SIZE; + } + break; + case PROC_PIDT_SHORTBSDINFO: + size = PROC_PIDT_SHORTBSDINFO_SIZE; + break; + case PROC_PIDLISTFILEPORTS: + size = PROC_PIDLISTFILEPORTS_SIZE; + if (buffer == (user_addr_t)0) { + size = 0; + } + break; + case PROC_PIDTHREADID64INFO: + size = PROC_PIDTHREADID64INFO_SIZE; + break; + case PROC_PIDUNIQIDENTIFIERINFO: + size = PROC_PIDUNIQIDENTIFIERINFO_SIZE; + break; + case PROC_PIDT_BSDINFOWITHUNIQID: + size = PROC_PIDT_BSDINFOWITHUNIQID_SIZE; + break; + case PROC_PIDARCHINFO: + size = PROC_PIDARCHINFO_SIZE; + break; + case PROC_PIDCOALITIONINFO: + size = PROC_PIDCOALITIONINFO_SIZE; + break; + case PROC_PIDNOTEEXIT: + /* + * Set findzomb explicitly because arg passed + * in is used as note exit status bits. + */ + size = PROC_PIDNOTEEXIT_SIZE; + findzomb = 1; + break; + case PROC_PIDEXITREASONINFO: + size = PROC_PIDEXITREASONINFO_SIZE; + findzomb = 1; + break; + case PROC_PIDEXITREASONBASICINFO: + size = PROC_PIDEXITREASONBASICINFOSIZE; + findzomb = 1; + break; + case PROC_PIDREGIONPATHINFO2: + size = PROC_PIDREGIONPATHINFO2_SIZE; + break; + case PROC_PIDREGIONPATHINFO3: + size = PROC_PIDREGIONPATHINFO3_SIZE; + break; + case PROC_PIDLISTUPTRS: + size = PROC_PIDLISTUPTRS_SIZE; + if (buffer == USER_ADDR_NULL) { + size = 0; + } + break; + case PROC_PIDLISTDYNKQUEUES: + size = PROC_PIDLISTDYNKQUEUES_SIZE; + if (buffer == USER_ADDR_NULL) { + size = 0; + } + break; + case PROC_PIDVMRTFAULTINFO: + size = sizeof(vm_rtfault_record_t); + if (buffer == USER_ADDR_NULL) { + size = 0; + } + break; + case PROC_PIDPLATFORMINFO: + size = PROC_PIDPLATFORMINFO_SIZE; + findzomb = 1; + break; + case PROC_PIDREGIONPATH: + size = PROC_PIDREGIONPATH_SIZE; + break; + case PROC_PIDIPCTABLEINFO: + size = PROC_PIDIPCTABLEINFO_SIZE; + break; + default: + return EINVAL; } - if (buffersize < size) - return(ENOMEM); + if (buffersize < size) { + return ENOMEM; + } if ((flavor == PROC_PIDPATHINFO) && (buffersize > PROC_PIDPATHINFO_MAXSIZE)) { - return(EOVERFLOW); + return EOVERFLOW; + } + + /* Check if we need to look for zombies */ + if ((flavor == PROC_PIDTBSDINFO) || (flavor == PROC_PIDT_SHORTBSDINFO) || (flavor == PROC_PIDT_BSDINFOWITHUNIQID) + || (flavor == PROC_PIDUNIQIDENTIFIERINFO)) { + if (arg) { + findzomb = 1; + } + } + + if ((p = proc_find(pid)) == PROC_NULL) { + if (findzomb) { + p = proc_find_zombref(pid); + } + if (p == PROC_NULL) { + error = ESRCH; + goto out; + } + zombie = 1; + } else { + gotref = 1; + } + + /* Certain operations don't require privileges */ + switch (flavor) { + case PROC_PIDT_SHORTBSDINFO: + case PROC_PIDUNIQIDENTIFIERINFO: + case PROC_PIDPATHINFO: + case PROC_PIDCOALITIONINFO: + case PROC_PIDPLATFORMINFO: + check_same_user = NO_CHECK_SAME_USER; + break; + default: + check_same_user = CHECK_SAME_USER; + break; + } + + /* Do we have permission to look into this? */ + if ((error = proc_security_policy(p, PROC_INFO_CALL_PIDINFO, flavor, check_same_user))) { + goto out; + } + + switch (flavor) { + case PROC_PIDLISTFDS: { + error = proc_pidfdlist(p, buffer, buffersize, retval); + } + break; + + case PROC_PIDUNIQIDENTIFIERINFO: { + struct proc_uniqidentifierinfo p_uniqidinfo; + bzero(&p_uniqidinfo, sizeof(p_uniqidinfo)); + proc_piduniqidentifierinfo(p, &p_uniqidinfo); + error = copyout(&p_uniqidinfo, buffer, sizeof(struct proc_uniqidentifierinfo)); + if (error == 0) { + *retval = sizeof(struct proc_uniqidentifierinfo); + } + } + break; + + case PROC_PIDT_SHORTBSDINFO: + shortversion = 1; + case PROC_PIDT_BSDINFOWITHUNIQID: + case PROC_PIDTBSDINFO: { + struct proc_bsdinfo pbsd; + struct proc_bsdshortinfo pbsd_short; + struct proc_bsdinfowithuniqid pbsd_uniqid; + + if (flavor == PROC_PIDT_BSDINFOWITHUNIQID) { + uniqidversion = 1; + } + + if (shortversion != 0) { + error = proc_pidshortbsdinfo(p, &pbsd_short, zombie); + } else { + error = proc_pidbsdinfo(p, &pbsd, zombie); + if (uniqidversion != 0) { + bzero(&pbsd_uniqid, sizeof(pbsd_uniqid)); + proc_piduniqidentifierinfo(p, &pbsd_uniqid.p_uniqidentifier); + pbsd_uniqid.pbsd = pbsd; + } + } + + if (error == 0) { + if (shortversion != 0) { + error = copyout(&pbsd_short, buffer, sizeof(struct proc_bsdshortinfo)); + if (error == 0) { + *retval = sizeof(struct proc_bsdshortinfo); + } + } else if (uniqidversion != 0) { + error = copyout(&pbsd_uniqid, buffer, sizeof(struct proc_bsdinfowithuniqid)); + if (error == 0) { + *retval = sizeof(struct proc_bsdinfowithuniqid); + } + } else { + error = copyout(&pbsd, buffer, sizeof(struct proc_bsdinfo)); + if (error == 0) { + *retval = sizeof(struct proc_bsdinfo); + } + } + } + } + break; + + case PROC_PIDTASKINFO: { + struct proc_taskinfo ptinfo; + + error = proc_pidtaskinfo(p, &ptinfo); + if (error == 0) { + error = copyout(&ptinfo, buffer, sizeof(struct proc_taskinfo)); + if (error == 0) { + *retval = sizeof(struct proc_taskinfo); + } + } + } + break; + + case PROC_PIDTASKALLINFO: { + struct proc_taskallinfo pall; + bzero(&pall, sizeof(pall)); + error = proc_pidbsdinfo(p, &pall.pbsd, 0); + error = proc_pidtaskinfo(p, &pall.ptinfo); + if (error == 0) { + error = copyout(&pall, buffer, sizeof(struct proc_taskallinfo)); + if (error == 0) { + *retval = sizeof(struct proc_taskallinfo); + } + } + } + break; + + case PROC_PIDTHREADID64INFO: + thuniqueid = true; + case PROC_PIDTHREADINFO:{ + struct proc_threadinfo pthinfo; + + error = proc_pidthreadinfo(p, arg, thuniqueid, &pthinfo); + if (error == 0) { + error = copyout(&pthinfo, buffer, sizeof(struct proc_threadinfo)); + if (error == 0) { + *retval = sizeof(struct proc_threadinfo); + } + } + } + break; + + case PROC_PIDLISTTHREADIDS: + thuniqueid = true; + case PROC_PIDLISTTHREADS:{ + error = proc_pidlistthreads(p, thuniqueid, buffer, buffersize, retval); + } + break; + + case PROC_PIDREGIONINFO:{ + error = proc_pidregioninfo(p, arg, buffer, buffersize, retval); + } + break; + + + case PROC_PIDREGIONPATHINFO:{ + error = proc_pidregionpathinfo(p, arg, buffer, buffersize, retval); + } + break; + + case PROC_PIDREGIONPATHINFO2:{ + error = proc_pidregionpathinfo2(p, arg, buffer, buffersize, retval); + } + break; + + case PROC_PIDREGIONPATHINFO3:{ + error = proc_pidregionpathinfo3(p, arg, buffer, buffersize, retval); + } + break; + + case PROC_PIDVNODEPATHINFO:{ + error = proc_pidvnodepathinfo(p, arg, buffer, buffersize, retval); } + break; - if ((flavor != PROC_PIDTBSDINFO) && (flavor != PROC_PIDPATHINFO) && (flavor != PROC_PIDT_SHORTBSDINFO)) { - if ((p = proc_find(pid)) == PROC_NULL) { - error = ESRCH; - goto out; - } else { - gotref = 1; - /* Do we have permission to look into this ? */ - if ((error = proc_security_policy(p)) != 0) { - goto out; - } - } - } - switch (flavor) { - case PROC_PIDLISTFDS: { - error = proc_pidfdlist(p, buffer, buffersize, retval); - } - break; - - case PROC_PIDT_SHORTBSDINFO: - shortversion = 1; - case PROC_PIDTBSDINFO: { - struct proc_bsdinfo pbsd; - struct proc_bsdshortinfo pbsd_short; - - zombie = 0; - if (arg) - findzomb = 1; - p = proc_find(pid); - if (p == PROC_NULL) { - if (findzomb) - p = proc_find_zombref(pid); - if (p == NULL) { - error = ESRCH; - goto out; - } - zombie = 1; - } - refheld = 1; - /* Do we have permission to look into this ? */ - if ((flavor != PROC_PIDT_SHORTBSDINFO) && ((error = proc_security_policy(p)) != 0)) { - if (refheld != 0) { - if (zombie != 0) - proc_drop_zombref(p); - else - proc_rele(p); - } - goto out; - } - if (shortversion != 0) { - error = proc_pidshortbsdinfo(p, &pbsd_short, zombie); - } else { - error = proc_pidbsdinfo(p, &pbsd, zombie); - } - if (refheld != 0) { - if (zombie != 0) - proc_drop_zombref(p); - else - proc_rele(p); - } + case PROC_PIDTHREADPATHINFO:{ + struct proc_threadwithpathinfo pinfo; + + error = proc_pidthreadpathinfo(p, arg, &pinfo); + if (error == 0) { + error = copyout((caddr_t)&pinfo, buffer, sizeof(struct proc_threadwithpathinfo)); if (error == 0) { - if (shortversion != 0) { - error = copyout(&pbsd_short, buffer, sizeof(struct proc_bsdshortinfo)); - if (error == 0) - *retval = sizeof(struct proc_bsdshortinfo); - } else { - error = copyout(&pbsd, buffer, sizeof(struct proc_bsdinfo)); - if (error == 0) - *retval = sizeof(struct proc_bsdinfo); - } - } + *retval = sizeof(struct proc_threadwithpathinfo); + } } - break; + } + break; - case PROC_PIDTASKINFO: { - struct proc_taskinfo ptinfo; + case PROC_PIDPATHINFO: { + error = proc_pidpathinfo(p, arg, buffer, buffersize, retval); + } + break; - error = proc_pidtaskinfo(p, &ptinfo); - if (error == 0) { - error = copyout(&ptinfo, buffer, sizeof(struct proc_taskinfo)); - if (error == 0) - *retval = sizeof(struct proc_taskinfo); - } - } - break; - case PROC_PIDTASKALLINFO: { - struct proc_taskallinfo pall; + case PROC_PIDWORKQUEUEINFO:{ + struct proc_workqueueinfo pwqinfo; - error = proc_pidbsdinfo(p, &pall.pbsd, 0); - error = proc_pidtaskinfo(p, &pall.ptinfo); + error = proc_pidworkqueueinfo(p, &pwqinfo); + if (error == 0) { + error = copyout(&pwqinfo, buffer, sizeof(struct proc_workqueueinfo)); if (error == 0) { - error = copyout(&pall, buffer, sizeof(struct proc_taskallinfo)); - if (error == 0) - *retval = sizeof(struct proc_taskallinfo); - } + *retval = sizeof(struct proc_workqueueinfo); + } } - break; + } + break; - case PROC_PIDTHREADID64INFO: - thuniqueid = 1; - case PROC_PIDTHREADINFO:{ - struct proc_threadinfo pthinfo; + case PROC_PIDLISTFILEPORTS: { + error = proc_pidfileportlist(p, buffer, buffersize, retval); + } + break; - error = proc_pidthreadinfo(p, arg, thuniqueid, &pthinfo); - if (error == 0) { - error = copyout(&pthinfo, buffer, sizeof(struct proc_threadinfo)); - if (error == 0) - *retval = sizeof(struct proc_threadinfo); - } + case PROC_PIDARCHINFO: { + struct proc_archinfo pai; + bzero(&pai, sizeof(pai)); + proc_archinfo(p, &pai); + error = copyout(&pai, buffer, sizeof(struct proc_archinfo)); + if (error == 0) { + *retval = sizeof(struct proc_archinfo); } - break; + } + break; - case PROC_PIDLISTTHREADS:{ - error = proc_pidlistthreads(p, buffer, buffersize, retval); + case PROC_PIDCOALITIONINFO: { + struct proc_pidcoalitioninfo pci; + proc_pidcoalitioninfo(p, &pci); + error = copyout(&pci, buffer, sizeof(struct proc_pidcoalitioninfo)); + if (error == 0) { + *retval = sizeof(struct proc_pidcoalitioninfo); } - break; + } + break; - case PROC_PIDREGIONINFO:{ - error = proc_pidregioninfo(p, arg, buffer, buffersize, retval); + case PROC_PIDNOTEEXIT: { + uint32_t data; + error = proc_pidnoteexit(p, arg, &data); + if (error == 0) { + error = copyout(&data, buffer, sizeof(data)); + if (error == 0) { + *retval = sizeof(data); + } } - break; + } + break; + case PROC_PIDEXITREASONINFO: { + struct proc_exitreasoninfo eri; - case PROC_PIDREGIONPATHINFO:{ - error = proc_pidregionpathinfo(p, arg, buffer, buffersize, retval); + error = copyin(buffer, &eri, sizeof(eri)); + if (error != 0) { + break; } - break; - case PROC_PIDVNODEPATHINFO:{ - error = proc_pidvnodepathinfo(p, arg, buffer, buffersize, retval); + error = proc_pidexitreasoninfo(p, &eri, NULL); + if (error == 0) { + error = copyout(&eri, buffer, sizeof(eri)); + if (error == 0) { + *retval = sizeof(eri); + } } - break; + } + break; + case PROC_PIDEXITREASONBASICINFO: { + struct proc_exitreasonbasicinfo beri; - case PROC_PIDTHREADPATHINFO:{ - struct proc_threadwithpathinfo pinfo; + bzero(&beri, sizeof(struct proc_exitreasonbasicinfo)); - error = proc_pidthreadpathinfo(p, arg, &pinfo); + error = proc_pidexitreasoninfo(p, NULL, &beri); + if (error == 0) { + error = copyout(&beri, buffer, sizeof(beri)); if (error == 0) { - error = copyout((caddr_t)&pinfo, buffer, sizeof(struct proc_threadwithpathinfo)); - if (error == 0) - *retval = sizeof(struct proc_threadwithpathinfo); + *retval = sizeof(beri); } } + } + break; + + case PROC_PIDLISTUPTRS: + error = proc_pidlistuptrs(p, buffer, buffersize, retval); break; - case PROC_PIDPATHINFO: { - p = proc_find(pid); - if (p == PROC_NULL) { - error = ESRCH; - goto out; - } - gotref = 1; - error = proc_pidpathinfo(p, arg, buffer, buffersize, retval); - } + case PROC_PIDLISTDYNKQUEUES: + error = kevent_copyout_proc_dynkqids(p, buffer, buffersize, retval); break; + case PROC_PIDVMRTFAULTINFO: { + /* This interface can only be employed on the current + * process. We will eventually enforce an entitlement. + */ + *retval = 0; + if (p != current_proc()) { + error = EINVAL; + break; + } - case PROC_PIDWORKQUEUEINFO:{ - struct proc_workqueueinfo pwqinfo; + size_t kbufsz = MIN(buffersize, vmrtfaultinfo_bufsz()); + void *vmrtfbuf = kalloc(kbufsz); - error = proc_pidworkqueueinfo(p, &pwqinfo); - if (error == 0) { - error = copyout(&pwqinfo, buffer, sizeof(struct proc_workqueueinfo)); - if (error == 0) - *retval = sizeof(struct proc_workqueueinfo); - } + if (vmrtfbuf == NULL) { + error = ENOMEM; + break; } - break; - case PROC_PIDLISTFILEPORTS: { - error = proc_pidfileportlist(p, buffer, buffersize, - retval); + bzero(vmrtfbuf, kbufsz); + + uint64_t effpid = get_current_unique_pid(); + /* The VM may choose to provide more comprehensive records + * for root-privileged users on internal configurations. + */ + boolean_t isroot = (suser(kauth_cred_get(), (u_short *)0) == 0); + int vmf_residue = vmrtf_extract(effpid, isroot, kbufsz, vmrtfbuf, retval); + int vmfsz = *retval * sizeof(vm_rtfault_record_t); + + error = 0; + if (vmfsz) { + error = copyout(vmrtfbuf, buffer, vmfsz); } - break; - default: - error = ENOTSUP; + if (error == 0) { + if (vmf_residue) { + error = ENOMEM; + } + } + kfree(vmrtfbuf, kbufsz); + } + break; + case PROC_PIDPLATFORMINFO: { + proc_lock(p); + uint32_t platform = p->p_platform; + proc_unlock(p); + error = copyout(&platform, buffer, sizeof(uint32_t)); + if (error == 0) { + *retval = sizeof(uint32_t); + } + } break; + case PROC_PIDREGIONPATH: { + error = proc_pidregionpath(p, arg, buffer, buffersize, retval); + } + break; + case PROC_PIDIPCTABLEINFO: { + struct proc_ipctableinfo table_info; + + error = proc_pidipctableinfo(p, &table_info); + if (error == 0) { + error = copyout(&table_info, buffer, sizeof(struct proc_ipctableinfo)); + if (error == 0) { + *retval = sizeof(struct proc_ipctableinfo); + } + } } - + break; + default: + error = ENOTSUP; + break; + } + out: - if (gotref) + if (gotref) { proc_rele(p); - return(error); + } else if (zombie) { + proc_drop_zombref(p); + } + return error; } -int -pid_vnodeinfo(vnode_t vp, uint32_t vid, struct fileproc * fp, int closeonexec, user_addr_t buffer, __unused uint32_t buffersize, int32_t * retval) +int +pid_vnodeinfo(vnode_t vp, uint32_t vid, struct fileproc * fp, proc_t proc, int fd, user_addr_t buffer, __unused uint32_t buffersize, int32_t * retval) { struct vnode_fdinfo vfi; - int error= 0; + int error = 0; if ((error = vnode_getwithvid(vp, vid)) != 0) { - return(error); + return error; } bzero(&vfi, sizeof(struct vnode_fdinfo)); - fill_fileinfo(fp, closeonexec, &vfi.pfi); - error = fill_vnodeinfo(vp, &vfi.pvi); + fill_fileinfo(fp, proc, fd, &vfi.pfi); + error = fill_vnodeinfo(vp, &vfi.pvi, FALSE); vnode_put(vp); if (error == 0) { error = copyout((caddr_t)&vfi, buffer, sizeof(struct vnode_fdinfo)); - if (error == 0) + if (error == 0) { *retval = sizeof(struct vnode_fdinfo); + } } - return(error); + return error; } -int -pid_vnodeinfopath(vnode_t vp, uint32_t vid, struct fileproc * fp, int closeonexec, user_addr_t buffer, __unused uint32_t buffersize, int32_t * retval) +int +pid_vnodeinfopath(vnode_t vp, uint32_t vid, struct fileproc * fp, proc_t proc, int fd, user_addr_t buffer, __unused uint32_t buffersize, int32_t * retval) { struct vnode_fdinfowithpath vfip; - int count, error= 0; + int count, error = 0; if ((error = vnode_getwithvid(vp, vid)) != 0) { - return(error); + return error; } bzero(&vfip, sizeof(struct vnode_fdinfowithpath)); - fill_fileinfo(fp, closeonexec, &vfip.pfi); - error = fill_vnodeinfo(vp, &vfip.pvip.vip_vi) ; + fill_fileinfo(fp, proc, fd, &vfip.pfi); + error = fill_vnodeinfo(vp, &vfip.pvip.vip_vi, TRUE); if (error == 0) { count = MAXPATHLEN; vn_getpath(vp, &vfip.pvip.vip_path[0], &count); - vfip.pvip.vip_path[MAXPATHLEN-1] = 0; + vfip.pvip.vip_path[MAXPATHLEN - 1] = 0; vnode_put(vp); error = copyout((caddr_t)&vfip, buffer, sizeof(struct vnode_fdinfowithpath)); - if (error == 0) + if (error == 0) { *retval = sizeof(struct vnode_fdinfowithpath); - } else + } + } else { vnode_put(vp); - return(error); + } + return error; } -void -fill_fileinfo(struct fileproc * fp, int closeonexec, struct proc_fileinfo * fproc) +void +fill_fileinfo(struct fileproc * fp, proc_t proc, int fd, struct proc_fileinfo * fproc) { - fproc->fi_openflags = fp->f_fglob->fg_flag; - fproc->fi_status = 0; - fproc->fi_offset = fp->f_fglob->fg_offset; - fproc->fi_type = fp->f_fglob->fg_type; - if (fp->f_fglob->fg_count) - fproc->fi_status |= PROC_FP_SHARED; - if (closeonexec != 0) + fproc->fi_openflags = fp->f_fglob->fg_flag; + fproc->fi_status = 0; + fproc->fi_offset = fp->f_fglob->fg_offset; + fproc->fi_type = FILEGLOB_DTYPE(fp->f_fglob); + if (fp->f_fglob->fg_count > 1) { + fproc->fi_status |= PROC_FP_SHARED; + } + if (proc != PROC_NULL) { + if ((FDFLAGS_GET(proc, fd) & UF_EXCLOSE) != 0) { fproc->fi_status |= PROC_FP_CLEXEC; + } + if ((FDFLAGS_GET(proc, fd) & UF_FORKCLOSE) != 0) { + fproc->fi_status |= PROC_FP_CLFORK; + } + } + if (FILEPROC_TYPE(fp) == FTYPE_GUARDED) { + fproc->fi_status |= PROC_FP_GUARDED; + fproc->fi_guardflags = 0; + if (fp_isguarded(fp, GUARD_CLOSE)) { + fproc->fi_guardflags |= PROC_FI_GUARD_CLOSE; + } + if (fp_isguarded(fp, GUARD_DUP)) { + fproc->fi_guardflags |= PROC_FI_GUARD_DUP; + } + if (fp_isguarded(fp, GUARD_SOCKET_IPC)) { + fproc->fi_guardflags |= PROC_FI_GUARD_SOCKET_IPC; + } + if (fp_isguarded(fp, GUARD_FILEPORT)) { + fproc->fi_guardflags |= PROC_FI_GUARD_FILEPORT; + } + } } int -fill_vnodeinfo(vnode_t vp, struct vnode_info *vinfo) +fill_vnodeinfo(vnode_t vp, struct vnode_info *vinfo, __unused boolean_t check_fsgetpath) { - vfs_context_t context; - struct stat64 sb; - int error = 0; - - context = vfs_context_create((vfs_context_t)0); - error = vn_stat(vp, &sb, NULL, 1, context); - (void)vfs_context_rele(context); + vfs_context_t context; + struct stat64 sb; + int error = 0; + bzero(&sb, sizeof(struct stat64)); + context = vfs_context_create((vfs_context_t)0); +#if CONFIG_MACF + /* Called when vnode info is used by the caller to get vnode's path */ + if (check_fsgetpath) { + error = mac_vnode_check_fsgetpath(context, vp); + } +#endif + if (!error) { + error = vn_stat(vp, &sb, NULL, 1, 0, context); munge_vinfo_stat(&sb, &vinfo->vi_stat); + } + (void)vfs_context_rele(context); + if (error != 0) { + goto out; + } - if (error != 0) - goto out; - - if (vp->v_mount != dead_mountp) { - vinfo->vi_fsid = vp->v_mount->mnt_vfsstat.f_fsid; - } else { - vinfo->vi_fsid.val[0] = 0; - vinfo->vi_fsid.val[1] = 0; - } - vinfo->vi_type = vp->v_type; + if (vp->v_mount != dead_mountp) { + vinfo->vi_fsid = vp->v_mount->mnt_vfsstat.f_fsid; + } else { + vinfo->vi_fsid.val[0] = 0; + vinfo->vi_fsid.val[1] = 0; + } + vinfo->vi_type = vp->v_type; out: - return(error); + return error; } int -pid_socketinfo(socket_t so, struct fileproc *fp, int closeonexec, user_addr_t buffer, __unused uint32_t buffersize, int32_t * retval) +pid_socketinfo(socket_t so, struct fileproc *fp, proc_t proc, int fd, user_addr_t buffer, __unused uint32_t buffersize, int32_t * retval) { #if SOCKETS struct socket_fdinfo s; int error = 0; bzero(&s, sizeof(struct socket_fdinfo)); - fill_fileinfo(fp, closeonexec, &s.pfi); + fill_fileinfo(fp, proc, fd, &s.pfi); if ((error = fill_socketinfo(so, &s.psi)) == 0) { - if ((error = copyout(&s, buffer, sizeof(struct socket_fdinfo))) == 0) - *retval = sizeof(struct socket_fdinfo); + if ((error = copyout(&s, buffer, sizeof(struct socket_fdinfo))) == 0) { + *retval = sizeof(struct socket_fdinfo); + } } - return (error); + return error; #else +#pragma unused(so, fp, proc, fd, buffer) *retval = 0; - return (ENOTSUP); + return ENOTSUP; #endif } int -pid_pseminfo(struct psemnode *psem, struct fileproc *fp, int closeonexec, user_addr_t buffer, __unused uint32_t buffersize, int32_t * retval) +pid_pseminfo(struct psemnode *psem, struct fileproc *fp, proc_t proc, int fd, user_addr_t buffer, __unused uint32_t buffersize, int32_t * retval) { struct psem_fdinfo pseminfo; int error = 0; - + bzero(&pseminfo, sizeof(struct psem_fdinfo)); - fill_fileinfo(fp, closeonexec, &pseminfo.pfi); + fill_fileinfo(fp, proc, fd, &pseminfo.pfi); if ((error = fill_pseminfo(psem, &pseminfo.pseminfo)) == 0) { - if ((error = copyout(&pseminfo, buffer, sizeof(struct psem_fdinfo))) == 0) - *retval = sizeof(struct psem_fdinfo); + if ((error = copyout(&pseminfo, buffer, sizeof(struct psem_fdinfo))) == 0) { + *retval = sizeof(struct psem_fdinfo); + } } - return(error); + return error; } int -pid_pshminfo(struct pshmnode *pshm, struct fileproc *fp, int closeonexec, user_addr_t buffer, __unused uint32_t buffersize, int32_t * retval) +pid_pshminfo(struct pshmnode *pshm, struct fileproc *fp, proc_t proc, int fd, user_addr_t buffer, __unused uint32_t buffersize, int32_t * retval) { struct pshm_fdinfo pshminfo; int error = 0; - + bzero(&pshminfo, sizeof(struct pshm_fdinfo)); - fill_fileinfo(fp, closeonexec, &pshminfo.pfi); + fill_fileinfo(fp, proc, fd, &pshminfo.pfi); if ((error = fill_pshminfo(pshm, &pshminfo.pshminfo)) == 0) { - if ((error = copyout(&pshminfo, buffer, sizeof(struct pshm_fdinfo))) == 0) - *retval = sizeof(struct pshm_fdinfo); + if ((error = copyout(&pshminfo, buffer, sizeof(struct pshm_fdinfo))) == 0) { + *retval = sizeof(struct pshm_fdinfo); + } } - return(error); + return error; } int -pid_pipeinfo(struct pipe * p, struct fileproc *fp, int closeonexec, user_addr_t buffer, __unused uint32_t buffersize, int32_t * retval) +pid_pipeinfo(struct pipe * p, struct fileproc *fp, proc_t proc, int fd, user_addr_t buffer, __unused uint32_t buffersize, int32_t * retval) { struct pipe_fdinfo pipeinfo; int error = 0; bzero(&pipeinfo, sizeof(struct pipe_fdinfo)); - fill_fileinfo(fp, closeonexec, &pipeinfo.pfi); + fill_fileinfo(fp, proc, fd, &pipeinfo.pfi); if ((error = fill_pipeinfo(p, &pipeinfo.pipeinfo)) == 0) { - if ((error = copyout(&pipeinfo, buffer, sizeof(struct pipe_fdinfo))) == 0) - *retval = sizeof(struct pipe_fdinfo); + if ((error = copyout(&pipeinfo, buffer, sizeof(struct pipe_fdinfo))) == 0) { + *retval = sizeof(struct pipe_fdinfo); + } } - return(error); + return error; } int -pid_kqueueinfo(struct kqueue * kq, struct fileproc *fp, int closeonexec, user_addr_t buffer, __unused uint32_t buffersize, int32_t * retval) +pid_kqueueinfo(struct kqueue * kq, struct fileproc *fp, proc_t proc, int fd, user_addr_t buffer, __unused uint32_t buffersize, int32_t * retval) { struct kqueue_fdinfo kqinfo; int error = 0; - + bzero(&kqinfo, sizeof(struct kqueue_fdinfo)); - - fill_fileinfo(fp, closeonexec, &kqinfo.pfi); + + /* not all kq's are associated with a file (e.g. workqkq) */ + if (fp) { + assert(fd >= 0); + fill_fileinfo(fp, proc, fd, &kqinfo.pfi); + } if ((error = fill_kqueueinfo(kq, &kqinfo.kqueueinfo)) == 0) { - if ((error = copyout(&kqinfo, buffer, sizeof(struct kqueue_fdinfo))) == 0) - *retval = sizeof(struct kqueue_fdinfo); + if ((error = copyout(&kqinfo, buffer, sizeof(struct kqueue_fdinfo))) == 0) { + *retval = sizeof(struct kqueue_fdinfo); + } } - return(error); + return error; } int -pid_atalkinfo(__unused struct atalk * at, __unused struct fileproc *fp, __unused int closeonexec, __unused user_addr_t buffer, __unused uint32_t buffersize, __unused int32_t * retval) +pid_atalkinfo(__unused struct atalk * at, __unused struct fileproc *fp, __unused proc_t proc, __unused int fd, __unused user_addr_t buffer, __unused uint32_t buffersize, __unused int32_t * retval) { return ENOTSUP; } - /************************** proc_pidfdinfo routine ***************************/ int -proc_pidfdinfo(int pid, int flavor, int fd, user_addr_t buffer, uint32_t buffersize, int32_t * retval) +proc_pidfdinfo(int pid, int flavor, int fd, user_addr_t buffer, uint32_t buffersize, int32_t * retval) { proc_t p; int error = ENOTSUP; - struct fileproc * fp; + struct fileproc * fp = NULL; uint32_t size; - int closeonexec = 0; switch (flavor) { - case PROC_PIDFDVNODEINFO: - size = PROC_PIDFDVNODEINFO_SIZE; - break; - case PROC_PIDFDVNODEPATHINFO: - size = PROC_PIDFDVNODEPATHINFO_SIZE; - break; - case PROC_PIDFDSOCKETINFO: - size = PROC_PIDFDSOCKETINFO_SIZE; - break; - case PROC_PIDFDPSEMINFO: - size = PROC_PIDFDPSEMINFO_SIZE; - break; - case PROC_PIDFDPSHMINFO: - size = PROC_PIDFDPSHMINFO_SIZE; - break; - case PROC_PIDFDPIPEINFO: - size = PROC_PIDFDPIPEINFO_SIZE; - break; - case PROC_PIDFDKQUEUEINFO: - size = PROC_PIDFDKQUEUEINFO_SIZE; - break; - case PROC_PIDFDATALKINFO: - size = PROC_PIDFDATALKINFO_SIZE; - break; - - default: - return(EINVAL); + case PROC_PIDFDVNODEINFO: + size = PROC_PIDFDVNODEINFO_SIZE; + break; + case PROC_PIDFDVNODEPATHINFO: + size = PROC_PIDFDVNODEPATHINFO_SIZE; + break; + case PROC_PIDFDSOCKETINFO: + size = PROC_PIDFDSOCKETINFO_SIZE; + break; + case PROC_PIDFDPSEMINFO: + size = PROC_PIDFDPSEMINFO_SIZE; + break; + case PROC_PIDFDPSHMINFO: + size = PROC_PIDFDPSHMINFO_SIZE; + break; + case PROC_PIDFDPIPEINFO: + size = PROC_PIDFDPIPEINFO_SIZE; + break; + case PROC_PIDFDKQUEUEINFO: + size = PROC_PIDFDKQUEUEINFO_SIZE; + break; + case PROC_PIDFDKQUEUE_EXTINFO: + size = PROC_PIDFDKQUEUE_EXTINFO_SIZE; + if (buffer == (user_addr_t)0) { + size = 0; + } + break; + case PROC_PIDFDATALKINFO: + size = PROC_PIDFDATALKINFO_SIZE; + break; + default: + return EINVAL; } - if (buffersize < size) - return(ENOMEM); + if (buffersize < size) { + return ENOMEM; + } if ((p = proc_find(pid)) == PROC_NULL) { error = ESRCH; goto out; } - /* Do we have permission to look into this ? */ - if ((error = proc_security_policy(p)) != 0) { + + /* Do we have permission to look into this? */ + if ((error = proc_security_policy(p, PROC_INFO_CALL_PIDFDINFO, flavor, CHECK_SAME_USER))) { goto out1; } switch (flavor) { - case PROC_PIDFDVNODEINFO: { - vnode_t vp; - uint32_t vid=0; + case PROC_PIDFDVNODEINFO: { + vnode_t vp; + uint32_t vid = 0; - if ((error = fp_getfvpandvid(p, fd, &fp, &vp, &vid)) !=0) { - goto out1; - } - /* no need to be under the fdlock */ - closeonexec = p->p_fd->fd_ofileflags[fd] & UF_EXCLOSE; - error = pid_vnodeinfo(vp, vid, fp, closeonexec, buffer, buffersize, retval); + if ((error = fp_getfvpandvid(p, fd, &fp, &vp, &vid)) != 0) { + goto out1; } - break; + /* no need to be under the fdlock */ + error = pid_vnodeinfo(vp, vid, fp, p, fd, buffer, buffersize, retval); + } + break; + + case PROC_PIDFDVNODEPATHINFO: { + vnode_t vp; + uint32_t vid = 0; - case PROC_PIDFDVNODEPATHINFO: { - vnode_t vp; - uint32_t vid=0; + if ((error = fp_getfvpandvid(p, fd, &fp, &vp, &vid)) != 0) { + goto out1; + } - if ((error = fp_getfvpandvid(p, fd, &fp, &vp, &vid)) !=0) { - goto out1; - } + /* no need to be under the fdlock */ + error = pid_vnodeinfopath(vp, vid, fp, p, fd, buffer, buffersize, retval); + } + break; + + case PROC_PIDFDSOCKETINFO: { + socket_t so; - /* no need to be under the fdlock */ - closeonexec = p->p_fd->fd_ofileflags[fd] & UF_EXCLOSE; - error = pid_vnodeinfopath(vp, vid, fp, closeonexec, buffer, buffersize, retval); + if ((error = fp_getfsock(p, fd, &fp, &so)) != 0) { + goto out1; } - break; + /* no need to be under the fdlock */ + error = pid_socketinfo(so, fp, p, fd, buffer, buffersize, retval); + } + break; - case PROC_PIDFDSOCKETINFO: { - socket_t so; + case PROC_PIDFDPSEMINFO: { + struct psemnode * psem; - if ((error = fp_getfsock(p, fd, &fp, &so)) !=0) { - goto out1; - } - /* no need to be under the fdlock */ - closeonexec = p->p_fd->fd_ofileflags[fd] & UF_EXCLOSE; - error = pid_socketinfo(so, fp, closeonexec, buffer, buffersize, retval); + if ((error = fp_getfpsem(p, fd, &fp, &psem)) != 0) { + goto out1; } - break; + /* no need to be under the fdlock */ + error = pid_pseminfo(psem, fp, p, fd, buffer, buffersize, retval); + } + break; - case PROC_PIDFDPSEMINFO: { - struct psemnode * psem; + case PROC_PIDFDPSHMINFO: { + struct pshmnode * pshm; - if ((error = fp_getfpsem(p, fd, &fp, &psem)) !=0) { - goto out1; - } - /* no need to be under the fdlock */ - closeonexec = p->p_fd->fd_ofileflags[fd] & UF_EXCLOSE; - error = pid_pseminfo(psem, fp, closeonexec, buffer, buffersize, retval); + if ((error = fp_getfpshm(p, fd, &fp, &pshm)) != 0) { + goto out1; } - break; + /* no need to be under the fdlock */ + error = pid_pshminfo(pshm, fp, p, fd, buffer, buffersize, retval); + } + break; - case PROC_PIDFDPSHMINFO: { - struct pshmnode * pshm; + case PROC_PIDFDPIPEINFO: { + struct pipe * cpipe; - if ((error = fp_getfpshm(p, fd, &fp, &pshm)) !=0) { - goto out1; - } - /* no need to be under the fdlock */ - closeonexec = p->p_fd->fd_ofileflags[fd] & UF_EXCLOSE; - error = pid_pshminfo(pshm, fp, closeonexec, buffer, buffersize, retval); + if ((error = fp_getfpipe(p, fd, &fp, &cpipe)) != 0) { + goto out1; } - break; + /* no need to be under the fdlock */ + error = pid_pipeinfo(cpipe, fp, p, fd, buffer, buffersize, retval); + } + break; - case PROC_PIDFDPIPEINFO: { - struct pipe * cpipe; + case PROC_PIDFDKQUEUEINFO: { + kqueue_t kqu; - if ((error = fp_getfpipe(p, fd, &fp, &cpipe)) !=0) { - goto out1; + if (fd == -1) { + if ((kqu.kqwq = p->p_fd->fd_wqkqueue) == NULL) { + /* wqkqueue is initialized on-demand */ + error = 0; + break; } - /* no need to be under the fdlock */ - closeonexec = p->p_fd->fd_ofileflags[fd] & UF_EXCLOSE; - error = pid_pipeinfo(cpipe, fp, closeonexec, buffer, buffersize, retval); + } else if ((error = fp_getfkq(p, fd, &fp, &kqu.kq)) != 0) { + goto out1; } - break; - case PROC_PIDFDKQUEUEINFO: { - struct kqueue * kq; + /* no need to be under the fdlock */ + error = pid_kqueueinfo(kqu.kq, fp, p, fd, buffer, buffersize, retval); + } + break; + + case PROC_PIDFDKQUEUE_EXTINFO: { + kqueue_t kqu; - if ((error = fp_getfkq(p, fd, &fp, &kq)) !=0) { - goto out1; + if (fd == -1) { + if ((kqu.kqwq = p->p_fd->fd_wqkqueue) == NULL) { + /* wqkqueue is initialized on-demand */ + error = 0; + break; } - /* no need to be under the fdlock */ - closeonexec = p->p_fd->fd_ofileflags[fd] & UF_EXCLOSE; - error = pid_kqueueinfo(kq, fp, closeonexec, buffer, buffersize, retval); + } else if ((error = fp_getfkq(p, fd, &fp, &kqu.kq)) != 0) { + goto out1; } - break; + error = pid_kqueue_extinfo(p, kqu.kq, buffer, buffersize, retval); + } + break; -#if NETAT - case PROC_PIDFDATALKINFO: { - struct atalk * at; + default: { + error = EINVAL; + goto out1; + } + } - if ((error = fp_getfatalk(p, fd, &fp, &at)) !=0) { - goto out1; - } + if (fp) { + fp_drop(p, fd, fp, 0); + } +out1: + proc_rele(p); +out: + return error; +} + +#define MAX_UPTRS 16392 + +int +proc_pidlistuptrs(proc_t p, user_addr_t buffer, uint32_t buffersize, int32_t *retval) +{ + uint32_t count = 0; + int error = 0; + void *kbuf = NULL; + int32_t nuptrs = 0; - /* no need to be under the fdlock */ - closeonexec = p->p_fd->fd_ofileflags[fd] & UF_EXCLOSE; - error = pid_atalkinfo(at, fp, closeonexec, buffer, buffersize, retval); + if (buffer != USER_ADDR_NULL) { + count = buffersize / sizeof(uint64_t); + if (count > MAX_UPTRS) { + count = MAX_UPTRS; } - break; -#endif /* NETAT */ - default: { - error = EINVAL; - goto out1; + if (count > 0) { + buffersize = count * sizeof(uint64_t); + kbuf = kalloc(buffersize); + bzero(kbuf, buffersize); + assert(kbuf != NULL); + } else { + buffersize = 0; } + } else { + buffersize = 0; + } + + nuptrs = kevent_proc_copy_uptrs(p, kbuf, buffersize); + + if (kbuf) { + size_t copysize; + if (os_mul_overflow(nuptrs, sizeof(uint64_t), ©size)) { + error = ERANGE; + goto out; + } + if (copysize > buffersize) { + copysize = buffersize; + } + error = copyout(kbuf, buffer, copysize); } - fp_drop(p, fd, fp , 0); -out1 : - proc_rele(p); out: - return(error); + *retval = nuptrs; + + if (kbuf) { + kfree(kbuf, buffersize); + kbuf = NULL; + } + + return error; } /* @@ -1570,91 +2819,91 @@ out: */ struct fileport_info_args { - int fia_flavor; - user_addr_t fia_buffer; - uint32_t fia_buffersize; - int32_t *fia_retval; + int fia_flavor; + user_addr_t fia_buffer; + uint32_t fia_buffersize; + int32_t *fia_retval; }; static kern_return_t proc_fileport_info(__unused mach_port_name_t name, - struct fileglob *fg, void *arg) + struct fileglob *fg, void *arg) { struct fileport_info_args *fia = arg; struct fileproc __fileproc, *fp = &__fileproc; int error; - bzero(fp, sizeof (*fp)); + bzero(fp, sizeof(*fp)); fp->f_fglob = fg; switch (fia->fia_flavor) { case PROC_PIDFILEPORTVNODEPATHINFO: { vnode_t vp; - if (fg->fg_type != DTYPE_VNODE) { + if (FILEGLOB_DTYPE(fg) != DTYPE_VNODE) { error = ENOTSUP; break; } vp = (struct vnode *)fg->fg_data; - error = pid_vnodeinfopath(vp, vnode_vid(vp), fp, 0, + error = pid_vnodeinfopath(vp, vnode_vid(vp), fp, PROC_NULL, 0, fia->fia_buffer, fia->fia_buffersize, fia->fia_retval); - } break; + } break; case PROC_PIDFILEPORTSOCKETINFO: { socket_t so; - if (fg->fg_type != DTYPE_SOCKET) { + if (FILEGLOB_DTYPE(fg) != DTYPE_SOCKET) { error = EOPNOTSUPP; break; } so = (socket_t)fg->fg_data; - error = pid_socketinfo(so, fp, 0, + error = pid_socketinfo(so, fp, PROC_NULL, 0, fia->fia_buffer, fia->fia_buffersize, fia->fia_retval); - } break; + } break; case PROC_PIDFILEPORTPSHMINFO: { struct pshmnode *pshm; - if (fg->fg_type != DTYPE_PSXSHM) { - error = EBADF; /* ick - mirror fp_getfpshm */ + if (FILEGLOB_DTYPE(fg) != DTYPE_PSXSHM) { + error = EBADF; /* ick - mirror fp_getfpshm */ break; } pshm = (struct pshmnode *)fg->fg_data; - error = pid_pshminfo(pshm, fp, 0, + error = pid_pshminfo(pshm, fp, PROC_NULL, 0, fia->fia_buffer, fia->fia_buffersize, fia->fia_retval); - } break; + } break; case PROC_PIDFILEPORTPIPEINFO: { struct pipe *cpipe; - if (fg->fg_type != DTYPE_PIPE) { - error = EBADF; /* ick - mirror fp_getfpipe */ + if (FILEGLOB_DTYPE(fg) != DTYPE_PIPE) { + error = EBADF; /* ick - mirror fp_getfpipe */ break; } cpipe = (struct pipe *)fg->fg_data; - error = pid_pipeinfo(cpipe, fp, 0, + error = pid_pipeinfo(cpipe, fp, PROC_NULL, 0, fia->fia_buffer, fia->fia_buffersize, fia->fia_retval); - } break; + } break; default: error = EINVAL; break; } - return (error); + return error; } /************************* proc_pidfileportinfo routine *********************/ int proc_pidfileportinfo(int pid, int flavor, mach_port_name_t name, - user_addr_t buffer, uint32_t buffersize, int32_t *retval) + user_addr_t buffer, uint32_t buffersize, int32_t *retval) { proc_t p; int error = ENOTSUP; uint32_t size; struct fileport_info_args fia; - /* fileport types are restricted by filetype_issendable() */ + /* fileport types are restricted by file_issendable() */ switch (flavor) { case PROC_PIDFILEPORTVNODEPATHINFO: @@ -1670,16 +2919,19 @@ proc_pidfileportinfo(int pid, int flavor, mach_port_name_t name, size = PROC_PIDFILEPORTPIPEINFO_SIZE; break; default: - return (EINVAL); + return EINVAL; + } + + if (buffersize < size) { + return ENOMEM; } - - if (buffersize < size) - return (ENOMEM); if ((p = proc_find(pid)) == PROC_NULL) { error = ESRCH; goto out; } - if ((error = proc_security_policy(p)) != 0) { + + /* Do we have permission to look into this? */ + if ((error = proc_security_policy(p, PROC_INFO_CALL_PIDFILEPORTINFO, flavor, CHECK_SAME_USER))) { goto out1; } @@ -1689,290 +2941,262 @@ proc_pidfileportinfo(int pid, int flavor, mach_port_name_t name, fia.fia_retval = retval; if (fileport_invoke(p->task, name, - proc_fileport_info, &fia, &error) != KERN_SUCCESS) + proc_fileport_info, &fia, &error) != KERN_SUCCESS) { error = EINVAL; + } out1: proc_rele(p); out: - return (error); + return error; } -static int -proc_security_policy(proc_t p) +int +proc_security_policy(proc_t targetp, __unused int callnum, __unused int flavor, boolean_t check_same_user) { - kauth_cred_t my_cred; - uid_t uid; +#if CONFIG_MACF + int error = 0; - my_cred = kauth_cred_proc_ref(p); - uid = kauth_cred_getuid(my_cred) ; - kauth_cred_unref(&my_cred); - - if ((uid != kauth_cred_getuid(kauth_cred_get())) - && suser(kauth_cred_get(), (u_short *)0)) { - return(EPERM); + if ((error = mac_proc_check_proc_info(current_proc(), targetp, callnum, flavor))) { + return error; + } +#endif + + /* The 'listpids' call doesn't have a target proc */ + if (targetp == PROC_NULL) { + assert(callnum == PROC_INFO_CALL_LISTPIDS && check_same_user == NO_CHECK_SAME_USER); + return 0; + } + + /* + * Check for 'get information for processes owned by other users' privilege + * root has this privilege by default + */ + if (priv_check_cred(kauth_cred_get(), PRIV_GLOBAL_PROC_INFO, 0) == 0) { + check_same_user = FALSE; + } + + if (check_same_user) { + kauth_cred_t target_cred; + uid_t target_uid; + + target_cred = kauth_cred_proc_ref(targetp); + target_uid = kauth_cred_getuid(target_cred); + kauth_cred_unref(&target_cred); + + if (kauth_getuid() != target_uid) { + return EPERM; } + } - return(0); + return 0; } -int +int proc_kernmsgbuf(user_addr_t buffer, uint32_t buffersize, int32_t * retval) { if (suser(kauth_cred_get(), (u_short *)0) == 0) { - return(log_dmesg(buffer, buffersize, retval)); - } else - return(EPERM); + return log_dmesg(buffer, buffersize, retval); + } else { + return EPERM; + } } /* ********* process control sets on self only */ -int +int proc_setcontrol(int pid, int flavor, uint64_t arg, user_addr_t buffer, uint32_t buffersize, __unused int32_t * retval) { struct proc * pself = PROC_NULL; int error = 0; uint32_t pcontrol = (uint32_t)arg; struct uthread *ut = NULL; - + char name_buf[MAXTHREADNAMESIZE]; pself = current_proc(); - if (pid != pself->p_pid) - return(EINVAL); + if (pid != pself->p_pid) { + return EINVAL; + } + /* Do we have permission to look into this? */ + if ((error = proc_security_policy(pself, PROC_INFO_CALL_SETCONTROL, flavor, NO_CHECK_SAME_USER))) { + goto out; + } switch (flavor) { - case PROC_SELFSET_PCONTROL: { - if (pcontrol > P_PCMAX) - return(EINVAL); - proc_lock(pself); - /* reset existing control setting while retaining action state */ - pself->p_pcaction &= PROC_ACTION_MASK; - /* set new control state */ - pself->p_pcaction |= pcontrol; - proc_unlock(pself); - } - break; - - case PROC_SELFSET_THREADNAME: { - /* PROC_SELFSET_THREADNAME_SIZE = (MAXTHREADNAMESIZE -1) */ - if(buffersize > PROC_SELFSET_THREADNAME_SIZE) - return ENAMETOOLONG; - ut = current_uthread(); - - if(!ut->pth_name) - { - ut->pth_name = (char*)kalloc(MAXTHREADNAMESIZE ); - if(!ut->pth_name) - return ENOMEM; - } - bzero(ut->pth_name, MAXTHREADNAMESIZE); - error = copyin(buffer, ut->pth_name, buffersize); + case PROC_SELFSET_PCONTROL: { + if (pcontrol > P_PCMAX) { + return EINVAL; } - break; + proc_lock(pself); + /* reset existing control setting while retaining action state */ + pself->p_pcaction &= PROC_ACTION_MASK; + /* set new control state */ + pself->p_pcaction |= pcontrol; + proc_unlock(pself); + } + break; - case PROC_SELFSET_VMRSRCOWNER: { - /* need to to be superuser */ - if (suser(kauth_cred_get(), (u_short *)0) != 0) { - error = EPERM; - goto out; - } + case PROC_SELFSET_THREADNAME: { + /* + * This is a bit ugly, as it copies the name into the kernel, and then + * invokes bsd_setthreadname again to copy it into the uthread name + * buffer. Hopefully this isn't such a hot codepath that an additional + * MAXTHREADNAMESIZE copy is a big issue. + */ + if (buffersize > (MAXTHREADNAMESIZE - 1)) { + return ENAMETOOLONG; + } + + ut = current_uthread(); + + bzero(name_buf, MAXTHREADNAMESIZE); + error = copyin(buffer, name_buf, buffersize); - proc_lock(pself); - /* reset existing control setting while retaining action state */ - pself->p_lflag |= P_LVMRSRCOWNER; - proc_unlock(pself); + if (!error) { + bsd_setthreadname(ut, name_buf); } - break; + } + break; - case PROC_SELFSET_DELAYIDLESLEEP: { - /* mark or clear the process property to delay idle sleep disk IO */ - if (pcontrol != 0) - OSBitOrAtomic(P_DELAYIDLESLEEP, &pself->p_flag); - else - OSBitAndAtomic(~((uint32_t)P_DELAYIDLESLEEP), &pself->p_flag); + case PROC_SELFSET_VMRSRCOWNER: { + /* need to to be superuser */ + if (suser(kauth_cred_get(), (u_short *)0) != 0) { + error = EPERM; + goto out; } - break; - default: - error = ENOTSUP; + proc_lock(pself); + /* reset existing control setting while retaining action state */ + pself->p_lflag |= P_LVMRSRCOWNER; + proc_unlock(pself); } - -out: - return(error); -} + break; -void -proc_dirty_start(struct proc *p) -{ - proc_lock(p); - while (p->p_dirty & P_DIRTY_BUSY) { - msleep(&p->p_dirty, &p->p_mlock, 0, "proc_dirty_start", NULL); + case PROC_SELFSET_DELAYIDLESLEEP: { + /* mark or clear the process property to delay idle sleep disk IO */ + if (pcontrol != 0) { + OSBitOrAtomic(P_DELAYIDLESLEEP, &pself->p_flag); + } else { + OSBitAndAtomic(~((uint32_t)P_DELAYIDLESLEEP), &pself->p_flag); + } } - p->p_dirty |= P_DIRTY_BUSY; - proc_unlock(p); -} + break; -void -proc_dirty_end(struct proc *p) -{ - proc_lock(p); - if (p->p_dirty & P_DIRTY_BUSY) { - p->p_dirty &= ~P_DIRTY_BUSY; - wakeup(&p->p_dirty); + default: + error = ENOTSUP; } - proc_unlock(p); -} -static boolean_t -proc_validate_track_flags(uint32_t pcontrol, struct proc *target_p) { - /* Check idle exit isn't specified independently */ - if ((pcontrol & PROC_DIRTY_TRACK_MASK) == PROC_DIRTY_ALLOW_IDLE_EXIT) { - return false; - } - - /* See that the process isn't marked for termination */ - if (target_p->p_dirty & P_DIRTY_TERMINATED) { - return false; - } - - return true; +out: + return error; } +#if CONFIG_MEMORYSTATUS + int -proc_dirtycontrol(int pid, int flavor, uint64_t arg, int32_t *retval) { +proc_dirtycontrol(int pid, int flavor, uint64_t arg, int32_t *retval) +{ struct proc *target_p; int error = 0; uint32_t pcontrol = (uint32_t)arg; kauth_cred_t my_cred, target_cred; boolean_t self = FALSE; boolean_t child = FALSE; + boolean_t zombref = FALSE; pid_t selfpid; target_p = proc_find(pid); + if (target_p == PROC_NULL) { - return(ESRCH); + if (flavor == PROC_DIRTYCONTROL_GET) { + target_p = proc_find_zombref(pid); + zombref = 1; + } + + if (target_p == PROC_NULL) { + return ESRCH; + } } - + my_cred = kauth_cred_get(); target_cred = kauth_cred_proc_ref(target_p); - + + /* Do we have permission to look into this? */ + if ((error = proc_security_policy(target_p, PROC_INFO_CALL_DIRTYCONTROL, flavor, NO_CHECK_SAME_USER))) { + goto out; + } + selfpid = proc_selfpid(); if (pid == selfpid) { self = TRUE; } else if (target_p->p_ppid == selfpid) { child = TRUE; } - + switch (flavor) { - case PROC_DIRTYCONTROL_TRACK: { - /* Only allow the process itself, its parent, or root */ - if ((self == FALSE) && (child == FALSE) && kauth_cred_issuser(kauth_cred_get()) != TRUE) { - error = EPERM; - goto out; - } - - proc_dirty_start(target_p); - - if (proc_validate_track_flags(pcontrol, target_p)) { - /* Cumulative, as per */ - target_p->p_dirty |= - ((pcontrol & PROC_DIRTY_TRACK) ? P_DIRTY_TRACK : 0) | - ((pcontrol & PROC_DIRTY_ALLOW_IDLE_EXIT) ? P_DIRTY_ALLOW_IDLE_EXIT : 0); -#if CONFIG_MEMORYSTATUS - if ((target_p->p_dirty & P_DIRTY_CAN_IDLE_EXIT) == P_DIRTY_CAN_IDLE_EXIT) { - memorystatus_on_track_dirty(pid, TRUE); - } -#endif - } else { - error = EINVAL; - } - - proc_dirty_end(target_p); + case PROC_DIRTYCONTROL_TRACK: { + /* Only allow the process itself, its parent, or root */ + if ((self == FALSE) && (child == FALSE) && kauth_cred_issuser(kauth_cred_get()) != TRUE) { + error = EPERM; + goto out; } - break; - case PROC_DIRTYCONTROL_SET: { - boolean_t kill = false; - - /* Check privileges; use cansignal() here since the process could be terminated */ - if (!cansignal(current_proc(), my_cred, target_p, SIGKILL, 0)) { - error = EPERM; - goto out; - } - - proc_dirty_start(target_p); - - if (!(target_p->p_dirty & P_DIRTY_TRACK)) { - /* Dirty tracking not enabled */ - error = EINVAL; - } else if (pcontrol && (target_p->p_dirty & P_DIRTY_TERMINATED)) { - /* - * Process is set to be terminated and we're attempting to mark it dirty. - * Set for termination and marking as clean is OK - see . - */ - error = EBUSY; - } else { - int flag = (self == TRUE) ? P_DIRTY : P_DIRTY_SHUTDOWN; - if (pcontrol && !(target_p->p_dirty & flag)) { - target_p->p_dirty |= flag; - } else if ((pcontrol == 0) && (target_p->p_dirty & flag)) { - if ((flag == P_DIRTY_SHUTDOWN) && (!target_p->p_dirty & P_DIRTY)) { - /* Clearing the dirty shutdown flag, and the process is otherwise clean - kill */ - target_p->p_dirty |= P_DIRTY_TERMINATED; - kill = true; - } else if ((flag == P_DIRTY) && (target_p->p_dirty & P_DIRTY_TERMINATED)) { - /* Kill previously terminated processes if set clean */ - kill = true; - } - target_p->p_dirty &= ~flag; - } else { - /* Already set */ - error = EALREADY; - } - } -#if CONFIG_MEMORYSTATUS - if ((error == 0) && ((target_p->p_dirty & P_DIRTY_CAN_IDLE_EXIT) == P_DIRTY_CAN_IDLE_EXIT)) { - memorystatus_on_dirty(pid, pcontrol ? TRUE : FALSE); - } -#endif - proc_dirty_end(target_p); + error = memorystatus_dirty_track(target_p, pcontrol); + } + break; - if ((error == 0) && (kill == true)) { - psignal(target_p, SIGKILL); - } + case PROC_DIRTYCONTROL_SET: { + /* Check privileges; use cansignal() here since the process could be terminated */ + if (!cansignal(current_proc(), my_cred, target_p, SIGKILL)) { + error = EPERM; + goto out; } - break; - - case PROC_DIRTYCONTROL_GET: { - /* No permissions check - dirty state is freely available */ - if (retval) { - proc_dirty_start(target_p); - - *retval = 0; - if (target_p->p_dirty & P_DIRTY_TRACK) { - *retval |= PROC_DIRTY_TRACKED; - if (target_p->p_dirty & P_DIRTY_ALLOW_IDLE_EXIT) { - *retval |= PROC_DIRTY_ALLOWS_IDLE_EXIT; - } - if (target_p->p_dirty & P_DIRTY) { - *retval |= PROC_DIRTY_IS_DIRTY; - } - } - - proc_dirty_end(target_p); - } else { - error = EINVAL; - } + + error = memorystatus_dirty_set(target_p, self, pcontrol); + } + break; + + case PROC_DIRTYCONTROL_GET: { + /* No permissions check - dirty state is freely available */ + if (retval) { + *retval = memorystatus_dirty_get(target_p, FALSE); + } else { + error = EINVAL; } - break; + } + break; + + case PROC_DIRTYCONTROL_CLEAR: { + /* Check privileges; use cansignal() here since the process could be terminated */ + if (!cansignal(current_proc(), my_cred, target_p, SIGKILL)) { + error = EPERM; + goto out; + } + + error = memorystatus_dirty_clear(target_p, pcontrol); + } + break; } out: - proc_rele(target_p); - kauth_cred_unref(&target_cred); - - return(error); + if (zombref) { + proc_drop_zombref(target_p); + } else { + proc_rele(target_p); + } + + kauth_cred_unref(&target_cred); + + return error; +} +#else + +int +proc_dirtycontrol(__unused int pid, __unused int flavor, __unused uint64_t arg, __unused int32_t *retval) +{ + return ENOTSUP; } +#endif /* CONFIG_MEMORYSTATUS */ + /* * proc_terminate() provides support for sudden termination. * SIGKILL is issued to tracked, clean processes; otherwise, @@ -1994,11 +3218,11 @@ proc_terminate(int pid, int32_t *retval) #endif if (pid <= 0 || retval == NULL) { - return (EINVAL); + return EINVAL; } if ((p = proc_find(pid)) == NULL) { - return (ESRCH); + return ESRCH; } #if 0 @@ -2007,63 +3231,43 @@ proc_terminate(int pid, int32_t *retval) #endif /* Check privileges; if SIGKILL can be issued, then SIGTERM is also OK */ - if (!cansignal(current_proc(), uc, p, SIGKILL, 0)) { + if (!cansignal(current_proc(), uc, p, SIGKILL)) { error = EPERM; goto out; } - - proc_dirty_start(p); - - p->p_dirty |= P_DIRTY_TERMINATED; - - if ((p->p_dirty & (P_DIRTY_TRACK|P_DIRTY_IS_DIRTY)) == P_DIRTY_TRACK) { - /* Clean; mark as terminated and issue SIGKILL */ - sig = SIGKILL; - } else { - /* Dirty, terminated, or state tracking is unsupported; issue SIGTERM to allow cleanup */ - sig = SIGTERM; + + /* Not allowed to sudden terminate yourself */ + if (p == current_proc()) { + error = EPERM; + goto out; } - proc_dirty_end(p); +#if CONFIG_MEMORYSTATUS + /* Determine requisite signal to issue */ + sig = memorystatus_on_terminate(p); +#else + sig = SIGTERM; +#endif - proc_removethrottle(p); + proc_set_task_policy(p->task, TASK_POLICY_ATTRIBUTE, + TASK_POLICY_TERMINATED, TASK_POLICY_ENABLE); psignal(p, sig); *retval = sig; out: proc_rele(p); - - return error; -} - -void -proc_removethrottle(proc_t p) - -{ - /* remove throttled states in all threads; process is going to terminate soon */ - proc_lock(p); - - /* if already marked marked for proc_termiantion.. */ - if ((p->p_lflag & P_LPTERMINATE) != 0) { - proc_unlock(p); - return; - } - p->p_lflag |= P_LPTERMINATE; - proc_unlock(p); - - (void)proc_task_remove_throttle(p->task); + return error; } - /* * copy stat64 structure into vinfo_stat structure. */ static void munge_vinfo_stat(struct stat64 *sbp, struct vinfo_stat *vsbp) { - bzero(vsbp, sizeof(struct vinfo_stat)); + bzero(vsbp, sizeof(struct vinfo_stat)); vsbp->vst_dev = sbp->st_dev; vsbp->vst_mode = sbp->st_mode; @@ -2088,3 +3292,286 @@ munge_vinfo_stat(struct stat64 *sbp, struct vinfo_stat *vsbp) vsbp->vst_qspare[0] = sbp->st_qspare[0]; vsbp->vst_qspare[1] = sbp->st_qspare[1]; } + +int +proc_pid_rusage(int pid, int flavor, user_addr_t buffer, __unused int32_t *retval) +{ + proc_t p; + int error; + int zombie = 0; + + if ((p = proc_find(pid)) == PROC_NULL) { + if ((p = proc_find_zombref(pid)) == PROC_NULL) { + return ESRCH; + } + zombie = 1; + } + + /* Do we have permission to look into this? */ + if ((error = proc_security_policy(p, PROC_INFO_CALL_PIDRUSAGE, flavor, CHECK_SAME_USER))) { + goto out; + } + + error = proc_get_rusage(p, flavor, buffer, zombie); + +out: + if (zombie) { + proc_drop_zombref(p); + } else { + proc_rele(p); + } + + return error; +} + +void +proc_archinfo(proc_t p, struct proc_archinfo *pai) +{ + proc_lock(p); + pai->p_cputype = p->p_cputype; + pai->p_cpusubtype = p->p_cpusubtype; + proc_unlock(p); +} + +void +proc_pidcoalitioninfo(proc_t p, struct proc_pidcoalitioninfo *ppci) +{ + bzero(ppci, sizeof(*ppci)); + proc_coalitionids(p, ppci->coalition_id); +} + +int +proc_pidexitreasoninfo(proc_t p, struct proc_exitreasoninfo *peri, struct proc_exitreasonbasicinfo *pberi) +{ + uint32_t reason_data_size = 0; + int error = 0; + pid_t selfpid = proc_selfpid(); + + proc_lock(p); + + /* + * One (and only one) of peri and pberi must be non-NULL. + */ + assert((peri != NULL) || (pberi != NULL)); + assert((peri == NULL) || (pberi == NULL)); + + /* + * Allow access to the parent of the exiting + * child or the parent debugger only. + */ + do { + if (p->p_ppid == selfpid) { + break; /* parent => ok */ + } + if ((p->p_lflag & P_LTRACED) != 0 && + (p->p_oppid == selfpid)) { + break; /* parent-in-waiting => ok */ + } + proc_unlock(p); + return EACCES; + } while (0); + + if (p->p_exit_reason == OS_REASON_NULL) { + proc_unlock(p); + return ENOENT; + } + + if (p->p_exit_reason->osr_kcd_buf != NULL) { + reason_data_size = kcdata_memory_get_used_bytes(&p->p_exit_reason->osr_kcd_descriptor); + } + + if (peri != NULL) { + peri->eri_namespace = p->p_exit_reason->osr_namespace; + peri->eri_code = p->p_exit_reason->osr_code; + peri->eri_flags = p->p_exit_reason->osr_flags; + + if ((peri->eri_kcd_buf == 0) || (peri->eri_reason_buf_size < reason_data_size)) { + proc_unlock(p); + return ENOMEM; + } + + peri->eri_reason_buf_size = reason_data_size; + if (reason_data_size != 0) { + error = copyout(p->p_exit_reason->osr_kcd_buf, peri->eri_kcd_buf, reason_data_size); + } + } else { + pberi->beri_namespace = p->p_exit_reason->osr_namespace; + pberi->beri_code = p->p_exit_reason->osr_code; + pberi->beri_flags = p->p_exit_reason->osr_flags; + pberi->beri_reason_buf_size = reason_data_size; + } + + proc_unlock(p); + + return error; +} + +/* + * Wrapper to provide NOTE_EXIT_DETAIL and NOTE_EXITSTATUS + * It mimics the data that is typically captured by the + * EVFILT_PROC, NOTE_EXIT event mechanism. + * See filt_proc() in kern_event.c. + */ +int +proc_pidnoteexit(proc_t p, uint64_t flags, uint32_t *data) +{ + uint32_t exit_data = 0; + uint32_t exit_flags = (uint32_t)flags; + + proc_lock(p); + + /* + * Allow access to the parent of the exiting + * child or the parent debugger only. + */ + do { + pid_t selfpid = proc_selfpid(); + + if (p->p_ppid == selfpid) { + break; /* parent => ok */ + } + if ((p->p_lflag & P_LTRACED) != 0 && + (p->p_oppid == selfpid)) { + break; /* parent-in-waiting => ok */ + } + proc_unlock(p); + return EACCES; + } while (0); + + if ((exit_flags & NOTE_EXITSTATUS) != 0) { + /* The signal and exit status */ + exit_data |= (p->p_xstat & NOTE_PDATAMASK); + } + + if ((exit_flags & NOTE_EXIT_DETAIL) != 0) { + /* The exit detail */ + if ((p->p_lflag & P_LTERM_DECRYPTFAIL) != 0) { + exit_data |= NOTE_EXIT_DECRYPTFAIL; + } + + if ((p->p_lflag & P_LTERM_JETSAM) != 0) { + exit_data |= NOTE_EXIT_MEMORY; + + switch (p->p_lflag & P_JETSAM_MASK) { + case P_JETSAM_VMPAGESHORTAGE: + exit_data |= NOTE_EXIT_MEMORY_VMPAGESHORTAGE; + break; + case P_JETSAM_VMTHRASHING: + exit_data |= NOTE_EXIT_MEMORY_VMTHRASHING; + break; + case P_JETSAM_FCTHRASHING: + exit_data |= NOTE_EXIT_MEMORY_FCTHRASHING; + break; + case P_JETSAM_VNODE: + exit_data |= NOTE_EXIT_MEMORY_VNODE; + break; + case P_JETSAM_HIWAT: + exit_data |= NOTE_EXIT_MEMORY_HIWAT; + break; + case P_JETSAM_PID: + exit_data |= NOTE_EXIT_MEMORY_PID; + break; + case P_JETSAM_IDLEEXIT: + exit_data |= NOTE_EXIT_MEMORY_IDLE; + break; + } + } + + if ((p->p_csflags & CS_KILLED) != 0) { + exit_data |= NOTE_EXIT_CSERROR; + } + } + + proc_unlock(p); + + *data = exit_data; + + return 0; +} + +int +proc_piddynkqueueinfo(int pid, int flavor, kqueue_id_t kq_id, + user_addr_t ubuf, uint32_t bufsize, int32_t *retval) +{ + proc_t p; + int err; + + if (ubuf == USER_ADDR_NULL) { + return EFAULT; + } + + p = proc_find(pid); + if (p == PROC_NULL) { + return ESRCH; + } + + err = proc_security_policy(p, PROC_INFO_CALL_PIDDYNKQUEUEINFO, 0, CHECK_SAME_USER); + if (err) { + goto out; + } + + switch (flavor) { + case PROC_PIDDYNKQUEUE_INFO: + err = kevent_copyout_dynkqinfo(p, kq_id, ubuf, bufsize, retval); + break; + case PROC_PIDDYNKQUEUE_EXTINFO: + err = kevent_copyout_dynkqextinfo(p, kq_id, ubuf, bufsize, retval); + break; + default: + err = ENOTSUP; + break; + } + +out: + proc_rele(p); + + return err; +} + +#if !CONFIG_EMBEDDED +int +proc_udata_info(int pid, int flavor, user_addr_t buffer, uint32_t bufsize, int32_t *retval) +{ + int err = 0; + proc_t p; + + p = proc_find(pid); + if (p == PROC_NULL) { + return ESRCH; + } + + /* + * Only support calls against oneself for the moment. + */ + if (p->p_pid != proc_selfpid()) { + err = EACCES; + goto out; + } + + if (bufsize != sizeof(p->p_user_data)) { + err = EINVAL; + goto out; + } + + switch (flavor) { + case PROC_UDATA_INFO_SET: + err = copyin(buffer, &p->p_user_data, sizeof(p->p_user_data)); + break; + case PROC_UDATA_INFO_GET: + err = copyout(&p->p_user_data, buffer, sizeof(p->p_user_data)); + break; + default: + err = ENOTSUP; + break; + } + +out: + proc_rele(p); + + if (err == 0) { + *retval = 0; + } + + return err; +} +#endif /* !CONFIG_EMBEDDED */