The Perl and Raku Conference 2025: Greenville, South Carolina - June 27-29 Learn more

#include <stdlib.h>
#include <stdio.h>
#include <fcntl.h>
#include <dirent.h>
#include <string.h>
#include <sys/resource.h>
#include <unistd.h>
#include <sys/proc.h> /* needed for process state constants */
#include <sys/statvfs.h>
#include <sys/types.h>
#if defined(PROC_FS)
#include <procfs.h>
#else
#include <sys/procfs.h>
#endif
#ifdef i386
#undef SP
#define SP sp
#endif
/****************************************/
/* Process state strings that we return */
/****************************************/
#define SLEEP "sleep"
#define WAIT "wait"
#define RUN "run"
#define IDLE "idle"
#define ZOMBIE "defunct"
#define STOP "stop"
#define ONPROC "onprocessor"
/* Solaris is an all-or-nothing deal, all this stuff comes out of
one structure, so we don't need to dick around with the format much */
#if defined(PROC_FS)
static char Format[] = "iiiiiiiilllllliilllslssiss";
#else
static char Format[] = "iiiiiiiilllllllllslssss";
#endif
/* Mapping of field to type */
static char* Fields[] = {
"uid",
"gid",
"euid",
"egid",
"pid",
"ppid",
"pgrp",
"sess",
"priority",
"nice",
"ttynum",
"flags",
"time",
"ctime",
#if defined(PROC_FS)
"timensec",
"ctimensec",
#endif
"size",
"rss",
"wchan",
"fname",
"start",
"pctcpu",
"state",
#if defined(PROC_FS)
"onpro",
#endif
"pctmem",
"cmndline"
};