#include <sys/types.h> #include <sys/sysctl.h> #include <math.h> #include <setjmp.h> #include <stdarg.h> #include <stdint.h> #include <stdio.h> #include <string.h> #include <unistd.h> #include "scheme.h" char *get_exename(char *buf, size_t size) { int mib[4] = { CTL_KERN, KERN_PROC_ARGS, -1, KERN_PROC_PATHNAME }; sysctl(mib, 4, buf, &size, 0, 0); return buf; }