diff options
| -rw-r--r-- | proc/info.c | 76 |
1 files changed, 76 insertions, 0 deletions
diff --git a/proc/info.c b/proc/info.c index 416c2b7f..7bfdb59c 100644 --- a/proc/info.c +++ b/proc/info.c @@ -26,6 +26,7 @@ the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */ #include <errno.h> #include <string.h> #include <sys/resource.h> +#include <assert.h> #include "proc.h" #include "proc_S.h" @@ -373,6 +374,81 @@ S_proc_getprocinfo (struct proc *callerp, return err; } +/* Implement proc_make_login_coll as described in <hurd/process.defs>. */ +error_t +S_proc_make_login_coll (struct proc *p) +{ + p->p_loginleader = 1; + return 0; +} + +/* Implement proc_getloginid as described in <hurd/process.defs>. */ +error_t +S_proc_getloginid (struct proc *callerp, + pid_t pid, + pid_t *leader) +{ + struct proc *proc = pid_find (pid); + struct proc *p; + + if (!proc) + return ESRCH; + + for (p = proc; !p->p_loginleader; p = p->p_parent) + assert (p); + + *leader = p->p_pid; + return 0; +} + +/* Implement proc_getloginpids as described in <hurd/process.defs>. */ +error_t +S_proc_getloginpids (struct proc *callerp, + pid_t id, + pid_t **pids, + u_int *npids) +{ + struct proc *l = pid_find (id); + struct proc *p; + struct proc **tail, **new, **parray; + int parraysize; + int i; + + if (!l || !l->p_loginleader) + return ESRCH; + + /* Simple breadth first search of the children of L. */ + parraysize = 50; + parray = malloc (sizeof (struct proc *) * parraysize); + parray[0] = l; + for (tail = parray, new = &parray[1]; tail != new; tail++) + { + for (p = (*tail)->p_ochild; p; p = p->p_sib) + if (!p->p_loginleader) + { + /* Add P to the list at NEW */ + if (new - parray > parraysize) + { + struct proc **newparray; + newparray = realloc (parray, parraysize *= 2); + tail = newparray + (tail - parray); + new = newparray + (new - parray); + parray = newparray; + } + *new++ = p; + } + } + + if (*npids < new - parray) + vm_allocate (mach_task_self (), (vm_address_t *) pids, + (new - parray) * sizeof (pid_t), 1); + *npids = new - parray; + for (i = 0; i < *npids; i++) + (*pids)[i] = parray[i]->p_pid; + free (parray); + return 0; +} + /* Implement proc_setlogin as described in <hurd/proc.defs>. */ error_t S_proc_setlogin (struct proc *p, |