22 lines
380 B
C
22 lines
380 B
C
#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;
|
|
}
|