Something went wrong. Try again.
Cider Isn't Darwin Emulation, Really
Something went wrong. Try again.
123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383#include <sys/sysctl.h>#include <sys/errno.h>#include <stdbool.h>#include "../dirent/getdirentries.h"#include "../unistd/close.h"#include "../unistd/read.h"#include "../unistd/getuid.h"#include "../unistd/getgid.h"#include "../fcntl/open.h"#include "../simple.h"
#ifndef isdigit# define isdigit(c) (c >= '0' && c <= '9')#endif#ifndef DT_DIR# define DT_DIR 4#endif
struct kinfo_proc_chain{ struct kinfo_proc_chain* next; struct kinfo_proc kinfo;};
static struct kinfo_proc_chain* load_proc(const char* name, int what, int flag);static void free_chain(struct kinfo_proc_chain* chain);
extern void free(void* ptr);extern void* malloc(__SIZE_TYPE__ len);extern __SIZE_TYPE__ strlen(const char* ptr);extern char* strcpy(char* dst, const char* src);extern void* memset(void*, int, __SIZE_TYPE__);extern void* memcpy(void* dest, const void*, __SIZE_TYPE__);extern char *strncpy(char *dest, const char *src, __SIZE_TYPE__ n);
int _sysctl_proc(int what, int flag, struct kinfo_proc* out, unsigned long* buflen){ int fd, ret = 0; char dents[256]; long basep = 0; int nproc = 0; struct kinfo_proc_chain *first = NULL, *last = NULL;
if (buflen == NULL) return -EFAULT; if (*buflen > 0 && out == NULL) return -EFAULT;
fd = sys_open_nocancel("/proc", BSD_O_RDONLY | BSD_O_DIRECTORY, 0); if (fd < 0) return fd;
while ((ret = sys_getdirentries(fd, (char*) dents, sizeof(dents), &basep)) > 0) { int pos = 0; while (pos < ret) { struct bsd_dirent* dent = (struct bsd_dirent*) &dents[pos]; struct kinfo_proc_chain* cur; // __simple_printf("Looking at %s\n", dent->d_name);
if (dent->d_type != DT_DIR || !isdigit(dent->d_name[0])) { pos += dent->d_reclen; continue; }
// Avoid loading process info unless really needed if (what != KERN_PROC_ALL || *buflen > 0) { cur = load_proc(dent->d_name, what, flag);
if (cur != NULL) { nproc++;
if (first == NULL) first = cur; if (last != NULL) last->next = cur; cur->next = NULL; last = cur; } } else nproc++;
pos += dent->d_reclen; } }
if (*buflen < nproc*sizeof(struct kinfo_proc)) { *buflen = nproc*sizeof(struct kinfo_proc); ret = out ? -ENOSPC : 0; } else { struct kinfo_proc_chain *next; int i;
*buflen = nproc*sizeof(struct kinfo_proc);
next = first; for (i = 0; next != NULL; i++) { memcpy(&out[i], &next->kinfo, sizeof(struct kinfo_proc)); next = next->next; } }
free_chain(first); sys_close(fd);
// __simple_printf("sysctl_proc returning %d, len %d\n", ret, *buflen); return ret;}
static bool read_string(const char* path, char* dst, int maxlen){ int fd, rd;
fd = sys_open(path, BSD_O_RDONLY, 0); if (fd < 0) return false;
rd = sys_read(fd, dst, maxlen-1); if (rd >= 0) dst[rd] = '\0';
sys_close(fd); return rd >= 0;}
static const char* next_stat_elem(char** buf){ char* start;
start = *buf;
if (!*start) return NULL; else if (*start == '(') { char* end;
start++; end = start;
while (*end != ')' && *end) end++; *end = '\0'; *buf = end+2; } else { char* end;
end = start; while (*end != ' ' && *end) end++; *end = '\0'; *buf = end+1; }
// __simple_printf("Next stat elem: %s\n", start); return start;}
static void skip_stat_elems(char** buf, int count){ int i; for (i = 0; i < count; i++) next_stat_elem(buf);}
static struct kinfo_proc_chain* load_proc(const char* name, int what, int flag){ char path[56]; char stat[1024]; char *statptr; const char* elem; struct kinfo_proc_chain* kinfo; static int uid = -1, gid = -1;
__simple_sprintf(path, "/proc/%s/stat", name);
kinfo = (struct kinfo_proc_chain*) malloc(sizeof(*kinfo)); memset(kinfo, 0, sizeof(*kinfo));
kinfo->kinfo.kp_proc.p_pid = __simple_atoi(name, NULL);
if (!read_string(path, stat, sizeof(stat))) goto retnull;
statptr = stat; skip_stat_elems(&statptr, 1); // skip pid
#define READELEM() elem = next_stat_elem(&statptr); if (!elem) goto retnull
// comm READELEM(); strncpy(kinfo->kinfo.kp_proc.p_comm, elem, sizeof(kinfo->kinfo.kp_proc.p_comm));
// process state READELEM(); switch (*elem) { case 'R': kinfo->kinfo.kp_proc.p_stat = SRUN; break; case 'S': case 'D': kinfo->kinfo.kp_proc.p_stat = SSLEEP; break; case 'T': kinfo->kinfo.kp_proc.p_stat = SSTOP; break; case 'Z': kinfo->kinfo.kp_proc.p_stat = SZOMB; break; default: kinfo->kinfo.kp_proc.p_stat = SSLEEP; }
// ppid READELEM(); kinfo->kinfo.kp_eproc.e_ppid = __simple_atoi(elem, NULL);
// pgid READELEM(); kinfo->kinfo.kp_eproc.e_pgid = __simple_atoi(elem, NULL);
// sid READELEM(); if (what == KERN_PROC_SESSION) { int sid = __simple_atoi(elem, NULL); if (sid != flag) goto retnull; }
// tty_nr READELEM(); kinfo->kinfo.kp_eproc.e_tdev = __simple_atoi(elem, NULL); if (kinfo->kinfo.kp_eproc.e_tdev != 0) kinfo->kinfo.kp_proc.p_flag |= P_CONTROLT;
skip_stat_elems(&statptr, NULL);
READELEM(); kinfo->kinfo.kp_proc.p_priority = __simple_atoi(elem, NULL);
READELEM(); kinfo->kinfo.kp_proc.p_nice = __simple_atoi(elem, NULL);
// In the container, everything is owned by us if (uid == -1 || gid == -1) { uid = sys_getuid(); gid = sys_getgid(); }
kinfo->kinfo.kp_eproc.e_pcred.p_ruid = uid; kinfo->kinfo.kp_eproc.e_pcred.p_svuid = uid; kinfo->kinfo.kp_eproc.e_pcred.p_rgid = gid; kinfo->kinfo.kp_eproc.e_pcred.p_svgid = gid; kinfo->kinfo.kp_eproc.e_ucred.cr_uid = uid;
switch (what) { case KERN_PROC_ALL: break; case KERN_PROC_PID: if (flag != kinfo->kinfo.kp_proc.p_pid) goto retnull; break; case KERN_PROC_TTY: if (flag != kinfo->kinfo.kp_eproc.e_tdev) goto retnull; break; case KERN_PROC_UID: if (flag != kinfo->kinfo.kp_eproc.e_ucred.cr_uid) goto retnull; break; case KERN_PROC_PGRP: if (flag != kinfo->kinfo.kp_eproc.e_pgid) goto retnull; break; case KERN_PROC_SESSION: // Not present in the struct // Apple plans to introduce ki_sid? // -> Evaluated above break; case KERN_PROC_RUID: if (flag != kinfo->kinfo.kp_eproc.e_pcred.p_ruid) goto retnull; break; case KERN_PROC_LCID: break; default: goto retnull; }
return kinfo;retnull: free(kinfo); return NULL;}
static void free_chain(struct kinfo_proc_chain* chain){ struct kinfo_proc_chain* next = chain;
while (chain != NULL) { next = chain->next; free(chain); chain = next; }}
int _sysctl_procargs(int pid, char* buf, unsigned long* buflen){ char path[56]; char cmdline[2048]; int argc = 0, i, arg0len = 0, argslen = 0; int totallen, ret = 0;
__simple_sprintf(path, "/proc/%d/cmdline", pid);
if (!read_string(path, cmdline, sizeof(cmdline))) return -ENOTDIR;
if (!cmdline[0]) { int len;
// Provide comm instead __simple_sprintf(path, "/proc/%d/comm", pid); if (!read_string(path, cmdline, sizeof(cmdline))) return -ENOTDIR;
len = strlen(cmdline); cmdline[len-1] = '\0'; // comm ends with \r }
for (i = 0; i < sizeof(cmdline)-1; i++) { if (!cmdline[i]) { argc++; if (argc == 1) arg0len = i; } if (i > 0 && !cmdline[i-1] && !cmdline[i]) { argslen = i; break; } } totallen = sizeof(int) + arg0len + 2 + argslen + 1;
if (*buflen < totallen) { *buflen = totallen; ret = (buf) ? -ENOSPC : 0; } else { *buflen = totallen; memcpy(buf, &argc, sizeof(argc)); strcpy(buf+sizeof(argc), cmdline); // copy arg0 as executable_path (TODO: not 100% correct) buf[sizeof(argc)+arg0len+2] = 0; memcpy(buf+sizeof(argc)+arg0len+2, cmdline, argslen+1); }
return ret;}