linux top命令源代码

/* * top - a top users display for Unix * * SYNOPSIS: Any Sun running SunOS 5.x (Solaris 2.x) * * DESCRIPTION: * This is the machine-dependent module for SunOS 5.x (Solaris 2). * There is some support for MP architectures. * This makes top work on the following systems: * SunOS 5.0 (not tested) * SunOS 5.1 * SunOS 5.2 * SunOS 5.3 * * Tested on a SPARCclassic with SunOS 5.1, using gcc-2.3.3, and * SPARCsystem 600 with SunOS 5.2, using Sun C * * Note that this same file is used for SunOS 5.4, but only with * SOLARIS24 defined. Use the file "m_sunos54.c" to make that happen * automagically. * * LIBS: -lelf -lkvm -lkstat * * CFLAGS: -DHAVE_GETOPT -DORDER * * * AUTHORS: Torsten Kasch <torsten@techfak.uni-bielefeld.de> * Robert Boucher <boucher@sofkin.ca> * CONTRIBUTORS: Marc Cohen <marc@aai.com> * Charles Hedrick <hedrick@geneva.rutgers.edu> * William L. Jones <jones@chpc> * Petri Kutvonen <kutvonen@cs.helsinki.fi> * Casper Dik <casper@fwi.uva.nl> * Tim Pugh <tpugh@oce.orst.edu> */ #define _KMEMUSER #include "top.h" #include "machine.h" #include "utils.h" #include <stdio.h> #include <fcntl.h> #include <unistd.h> #include <stdlib.h> #include <errno.h> #include <dirent.h> #include <nlist.h> #include <string.h> #include <kvm.h> #include <sys/types.h> #include <sys/param.h> #include <sys/signal.h> #include <sys/fault.h> #include <sys/sysinfo.h> #include <sys/sysmacros.h> #include <sys/syscall.h> #include <sys/user.h> #include <sys/proc.h> #include <sys/procfs.h> #include <sys/vm.h> #include <sys/var.h> #include <sys/cpuvar.h> #include <sys/file.h> #include <sys/time.h> #include <sys/priocntl.h> #include <sys/tspriocntl.h> #include <sys/processor.h> #include <vm/anon.h> #include <math.h> #define USE_KSTAT #ifdef USE_KSTAT #include <kstat.h> #endif #define UNIX "/dev/ksyms" #define KMEM "/dev/kmem" #define PROCFS "/proc" #define CPUSTATES 5 #ifndef PRIO_MIN #define PRIO_MIN -20 #endif #ifndef PRIO_MAX #define PRIO_MAX 20 #endif #ifndef FSCALE #define FSHIFT 8 /* bits to right of fixed binary point */ #define FSCALE (1<<FSHIFT) #endif /* FSCALE */ #define loaddouble(la) ((double)(la) / FSCALE) #define dbl_align(x) (((unsigned long)(x)+(sizeof(double)-1)) & \ ~(sizeof(double)-1)) #ifdef SOLARIS24 /* * snarfed from <sys/procfs.h>: * The following percent numbers are 16-bit binary * fractions [0 .. 1] with the binary point to the * right of the high-order bit (one == 0x8000) */ #define percent_cpu(pp) (((double)pp->pr_pctcpu)/0x8000*100) #define weighted_cpu(pp) (*(double *)dbl_align(pp->pr_filler)) #else #define percent_cpu(pp) (*(double *)dbl_align(&pp->pr_filler[0])) #define weighted_cpu(pp) (*(double *)dbl_align(&pp->pr_filler[2])) #endif /* definitions for indices in the nlist array */ #define X_AVENRUN 0 #define X_MPID 1 #define X_CPU 2 #define X_V 3 #define X_NPROC 4 #define X_ANONINFO 5 #define X_FREEMEM 6 #define X_MAXMEM 7 #define X_AVAILRMEM 8 #define X_SWAPFS_MINFREE 9 #define X_NCPUS 10 static struct nlist nlst[] = { {"avenrun"}, /* 0 */ {"mpid"}, /* 1 */ {"cpu"}, /* 2 */ {"v"}, /* 3 */ {"nproc"}, /* 4 */ {"anoninfo"}, /* 5 */ {"freemem"}, /* 6 */ {"maxmem"}, /* 7 */ {"availrmem"}, /* 8 */ {"swapfs_minfree"}, /* 9 */ {"ncpus"}, /* 10 */ {0} }; static unsigned long avenrun_offset; static unsigned long mpid_offset; #ifdef USE_KSTAT static kstat_t **cpu_ks; static cpu_stat_t *cpu_stat; #else static unsigned long *cpu_offset; #endif static unsigned long nproc_offset; static unsigned long freemem_offset; static unsigned long maxmem_offset; static unsigned long availrmem_offset; static unsigned long swapfs_minfree_offset; static unsigned long anoninfo_offset; /* get_process_info passes back a handle. This is what it looks like: */ struct handle { struct prpsinfo **next_proc;/* points to next valid proc pointer */ int remaining; /* number of pointers remaining */ }; /* * Structure for keeping track of CPU times from last time around * the program. We keep these things in a hash table, which is * recreated at every cycle. */ struct oldproc { pid_t oldpid; double oldtime; double oldpct; }; int oldprocs; /* size of table */ #define HASH(x) ((x << 1) % oldprocs) /* * GCC assumes that all doubles are aligned. Unfortunately it * doesn't round up the structure size to be a multiple of 8. * Thus we'll get a coredump when going through array. The * following is a size rounded up to 8. */ #define PRPSINFOSIZE dbl_align(sizeof(struct prpsinfo)) /* * These definitions control the format of the per-process area */ static char header[] = " PID X PRI NICE SIZE RES STATE TIME WCPU CPU COMMAND"; /* 0123456 -- field to fill in starts at header+6 */ #define UNAME_START 6 #define Proc_format \ "%5d %-8.8s %3d %4d %5s %5s %-5s %6s %5.2f%% %5.2f%% %s" /* process state names for the "STATE" column of the display */ /* the extra nulls in the string "run" are for adding a slash and the processor number when needed */ char *state_abbrev[] = {"", "sleep", "run", "zombie", "stop", "start", "cpu", "swap"}; int process_states[8]; char *procstatenames[] = { "", " sleeping, ", " running, ", " zombie, ", " stopped, ", " starting, ", " on cpu, ", " swapped, ", NULL }; int cpu_states[CPUSTATES]; char *cpustatenames[] = {"idle", "user", "kernel", "iowait", "swap", NULL}; #define CPUSTATE_IOWAIT 3 #define CPUSTATE_SWAP 4 /* these are for detailing the memory statistics */ int memory_stats[5]; char *memorynames[] = {"K real, ", "K active, ", "K free, ", "K swap, ", "K free swap", NULL}; /* these are names given to allowed sorting orders -- first is default */ char *ordernames[] = {"cpu", "size", "res", "time", NULL}; /* forward definitions for comparison functions */ int compare_cpu(); int compare_size(); int compare_res(); int compare_time(); int (*proc_compares[])() = { compare_cpu, compare_size, compare_res, compare_time, NULL }; kvm_t *kd; static DIR *procdir; static int nproc; static int ncpus; /* these are for keeping track of the proc array */ static int bytes; static struct prpsinfo *pbase; static struct prpsinfo **pref; static struct oldproc *oldbase; /* pagetok function is really a pointer to an appropriate function */ static int pageshift; static int (*p_pagetok) (); #define pagetok(size) ((*p_pagetok)(size)) /* useful externals */ extern int errno; extern char *sys_errlist[]; extern char *myname; extern int check_nlist (); extern int gettimeofday (); extern int getkval (); extern void perror (); extern void getptable (); extern void quit (); extern int nlist (); int pagetok_none(int size) { return(size); } int pagetok_left(int size) { return(size << pageshift); } int pagetok_right(int size) { return(size >> pageshift); } int machine_init (struct statics *statics) { static struct var v; struct oldproc *op, *endbase; int i; int offset; processor_info_t pi; /* perform the kvm_open */ kd = kvm_open (NULL, NULL, NULL, O_RDONLY, "top"); /* turn off super user privs */ seteuid(getuid()); /* fill in the statics information */ statics->procstate_names = procstatenames; statics->cpustate_names = cpustatenames; statics->memory_names = memorynames; statics->order_names = ordernames; /* test kvm_open return value */ if (kd == NULL) { perror ("kvm_open"); return (-1); } if (kvm_nlist (kd, nlst) < 0) { perror ("kvm_nlist"); return (-1); } if (check_nlist (nlst) != 0) return (-1); /* NPROC Tuning parameter for max number of processes */ (void) getkval (nlst[X_V].n_value, &v, sizeof (struct var), nlst[X_V].n_name); np