summaryrefslogtreecommitdiffstats
path: root/nmon/lmon13g.c
diff options
context:
space:
mode:
Diffstat (limited to 'nmon/lmon13g.c')
-rw-r--r--nmon/lmon13g.c5250
1 files changed, 0 insertions, 5250 deletions
diff --git a/nmon/lmon13g.c b/nmon/lmon13g.c
deleted file mode 100644
index c1ce72d..0000000
--- a/nmon/lmon13g.c
+++ /dev/null
@@ -1,5250 +0,0 @@
-/*
- * lmon.c -- Curses based Performance Monitor for Linux
- * Developer: Nigel Griffiths.
- */
-
-/*
- * Use the following Makefile
-CFLAGS= -g -DPOWER -DPARTITIONS
-LDFLAGS=-lcurses -lodm -lcfg
-nmon: nmon.o
- * end of Makefile
- */
-
-#define RAW(member) (long)((long)(p->cpuN[i].member) - (long)(q->cpuN[i].member))
-#define RAWTOTAL(member) (long)((long)(p->cpu_total.member) - (long)(q->cpu_total.member))
-
-#define VERSION "13g"
-char version[] = VERSION;
-static char *SccsId = "nmon " VERSION;
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <unistd.h>
-#include <string.h>
-#include <ctype.h>
-#include <ncurses.h>
-#include <signal.h>
-#include <pwd.h>
-#include <fcntl.h>
-#include <math.h>
-#include <time.h>
-#include <sys/errno.h>
-#include <sys/types.h>
-#include <sys/stat.h>
-#include <sys/ioctl.h>
-#include <sys/utsname.h>
-#include <sys/time.h>
-#include <sys/socket.h>
-#include <sys/wait.h>
-
-#define FLIP(variable) if(variable) variable=0; else variable=1;
-
-#ifdef MALLOC_DEBUG
-#define MALLOC(argument) mymalloc(argument,__LINE__)
-#define FREE(argument) myfree(argument,__LINE__)
-#define REALLOC(argument1,argument2) myrealloc(argument1,argument2,__LINE__)
-void *mymalloc(int size, int line)
-{
-void * ptr;
- ptr= malloc(size);
- fprintf(stderr,"0x%x = malloc(%d) at line=%d\n",ptr,size,line);
- return ptr;
-}
-void myfree(void *ptr,int line)
-{
- fprintf(stderr,"free(0x%x) at line=%d\n",ptr,line);
- free(ptr);
-}
-void *myrealloc(void *oldptr, int size, int line)
-{
-void * ptr;
- ptr= realloc(oldptr,size);
- fprintf(stderr,"0x%x = realloc(0x%x, %d) at line=%d\n",ptr,oldptr,size,line);
- return ptr;
-}
-#else
-#define MALLOC(argument) malloc(argument)
-#define FREE(argument) free(argument)
-#define REALLOC(argument1,argument2) realloc(argument1,argument2)
-#endif /* MALLOC STUFF */
-
-
-#define P_CPUINFO 0
-#define P_STAT 1
-#define P_VERSION 2
-#define P_MEMINFO 3
-#define P_UPTIME 4
-#define P_LOADAVG 5
-#define P_NFS 6
-#define P_NFSD 7
-#define P_NUMBER 8 /* one more than the max */
-
-char *month[12] = { "JAN", "FEB", "MAR", "APR", "MAY", "JUN",
- "JUL", "AUG", "SEP", "OCT", "NOV", "DEC" };
-
-/* Cut of everything after the first space in callback
- * Delete any '&' just before the space
- */
-char *check_call_string (char* callback, const char* name)
-{
- char * tmp_ptr = callback;
-
- if (strlen(callback) > 256) {
- fprintf(stderr,"ERROR nmon: ignoring %s - too long\n", name);
- return (char *) NULL;
- }
-
- for( ; *tmp_ptr != '\0' && *tmp_ptr != ' ' && *tmp_ptr != '&'; ++tmp_ptr )
- ;
-
- *tmp_ptr = '\0';
-
- if( tmp_ptr == callback )
- return (char *)NULL;
- else
- return callback;
-}
-
-/* Remove error output to this buffer and display it if NMONDEBUG=1 */
-char errorstr[70];
-int error_on = 0;
-void error(char *err)
-{
- strncpy(errorstr,err,69);
-}
-
-/* /proc/cpuinfo can be 512 bytes per CPU and we allow 256 CPUs */
-/* and 20 lines per CPU so boost the buffers for this one */
-#define PROC_MAXBUF (1024*4)
-#define CPUINFO_MAXBUF (512*256)
-#define PROC_MAXLINES (20*256*sizeof(char *))
-
-int reread =0;
-struct {
- FILE *fp;
- char *filename;
- int lines;
- char *line[PROC_MAXLINES];
- char *buf;
-} proc[P_NUMBER];
-
-void proc_init()
-{
-int i;
- /* Initialise the file pointers */
- for(i=0;i<P_NUMBER;i++) {
- proc[i].fp = 0;
- if(i == P_CPUINFO)
- proc[i].buf = (char *)malloc(CPUINFO_MAXBUF);
- else
- proc[i].buf = (char *)malloc(PROC_MAXBUF);
- }
- proc[P_CPUINFO].filename = "/proc/cpuinfo";
- proc[P_STAT].filename = "/proc/stat";
- proc[P_VERSION].filename = "/proc/version";
- proc[P_MEMINFO].filename = "/proc/meminfo";
- proc[P_UPTIME].filename = "/proc/uptime";
- proc[P_LOADAVG].filename = "/proc/loadavg";
- proc[P_NFS].filename = "/proc/net/rpc/nfs";
- proc[P_NFSD].filename = "/proc/net/rpc/nfsd";
-}
-
-void proc_read(int num)
-{
-int i;
-int size;
-int found;
-char buf[1024];
-int bytes;
-
- if(proc[num].fp == 0) {
- if( (proc[num].fp = fopen(proc[num].filename,"r")) == NULL) {
- sprintf(buf, "failed to open file %s", proc[num].filename);
- error(buf);
- proc[num].fp = 0;
- return;
- }
- }
- rewind(proc[num].fp);
- if(num == P_CPUINFO)
- bytes = CPUINFO_MAXBUF -1;
- else
- bytes = PROC_MAXBUF -1;
- size = fread(proc[num].buf, 1, bytes, proc[num].fp);
- proc[num].buf[size]=0;
- proc[num].lines=0;
- proc[num].line[0]=&proc[num].buf[0];
- if(num == P_VERSION) {
- found=0;
- for(i=0;i<size;i++) { /* remove some weird stuff */
- if( found== 0 &&
- proc[num].buf[i] == ')' &&
- proc[num].buf[i+1] == ' ' &&
- proc[num].buf[i+2] == '(' ) {
- proc[num].buf[i+1] = '\n';
- found=1;
- } else {
- if(
- proc[num].buf[i] == ')' &&
- proc[num].buf[i+1] == ' ' &&
- proc[num].buf[i+2] == '#' ) {
- proc[num].buf[i+1] = '\n';
- }
- if(
- proc[num].buf[i] == '#' &&
- proc[num].buf[i+2] == '1' ) {
- proc[num].buf[i] = '\n';
- }
- }
- }
- }
- for(i=0;i<size;i++) {
- if(proc[num].buf[i] == '\t')
- proc[num].buf[i]= ' ';
- if(proc[num].buf[i] == '\n') {
- proc[num].lines++;
- proc[num].buf[i] = 0;
- proc[num].line[proc[num].lines] = &proc[num].buf[i+1];
- }
- if(proc[num].lines==PROC_MAXLINES-1)
- break;
- }
- if(reread) {
- fclose( proc[num].fp);
- proc[num].fp = 0;
- }
-}
-
-#include <dirent.h>
-
-struct procsinfo {
- int pi_pid;
- char pi_comm[64];
- char pi_state;
- int pi_ppid;
- int pi_pgrp;
- int pi_session;
- int pi_tty_nr;
- int pi_tty_pgrp;
- unsigned long pi_flags;
- unsigned long pi_minflt;
- unsigned long pi_cmin_flt;
- unsigned long pi_majflt;
- unsigned long pi_cmaj_flt;
- unsigned long pi_utime;
- unsigned long pi_stime;
- long pi_cutime;
- long pi_cstime;
- long pi_pri;
- long pi_nice;
- long junk /* removed */;
- long pi_it_real_value;
- unsigned long pi_start_time;
- unsigned long pi_vsize;
- long pi_rss; /* - 3 */
- unsigned long pi_rlim_cur;
- unsigned long pi_start_code;
- unsigned long pi_end_code;
- unsigned long pi_start_stack;
- unsigned long pi_esp;
- unsigned long pi_eip;
- /* The signal information here is obsolete. */
- unsigned long pi_pending_signal;
- unsigned long pi_blocked_sig;
- unsigned long pi_sigign;
- unsigned long pi_sigcatch;
- unsigned long pi_wchan;
- unsigned long pi_nswap;
- unsigned long pi_cnswap;
- int pi_exit_signal;
- int pi_cpu;
-
- unsigned long statm_size; /* total program size */
- unsigned long statm_resident; /* resident set size */
- unsigned long statm_share; /* shared pages */
- unsigned long statm_trs; /* text (code) */
- unsigned long statm_drs; /* data/stack */
- unsigned long statm_lrs; /* library */
- unsigned long statm_dt; /* dirty pages */
-};
-
-
-#include <mntent.h>
-#include <fstab.h>
-#include <sys/stat.h>
-#include <sys/statfs.h>
-#include <net/if.h>
-
-int debug =0;
-time_t timer; /* used to work out the hour/min/second */
-
-/* Counts of resources */
-int cpus = 1; /* number of CPUs in system (lets hope its more than zero!) */
-int max_cpus = 1; /* highest number of CPUs in DLPAR */
-int networks = 0; /* number of networks in system */
-int partitions = 0; /* number of partitions in system */
-int partitions_short = 0; /* partitions file data short form (i.e. data missing) */
-int disks = 0; /* number of disks in system */
-int seconds = -1; /* pause interval */
-int maxloops = -1; /* stop after this number of updates */
-char hostname[256];
-char run_name[256];
-int run_name_set = 0;
-char fullhostname[256];
-int loop;
-
-#define DPL 150 /* Disks per line for file output to ensure it
- does not overflow the spreadsheet input line max */
-
-int disks_per_line = DPL;
-
-#define NEWDISKGROUP(disk) ( (disk) % disks_per_line == 0)
-
-/* Mode of output variables */
-int show_aaa = 1;
-int show_para = 1;
-int show_headings= 1;
-int show_cpu = 0;
-int show_smp = 0;
-int show_longterm= 0;
-int show_disk = 0;
-#define SHOW_DISK_NONE 0
-#define SHOW_DISK_STATS 1
-#define SHOW_DISK_GRAPH 2
-int show_diskmap = 0;
-int show_memory = 0;
-int show_large = 0;
-int show_kernel = 0;
-int show_nfs = 0;
-int show_net = 0;
-int show_neterror= 0;
-int show_partitions = 0;
-int show_help = 0;
-int show_top = 0;
-int show_topmode = 1;
-#define ARGS_NONE 0
-#define ARGS_ONLY 1
-int show_args = 0;
-int show_all = 1; /* 1=all procs& disk 0=only if 1% or more busy */
-int show_verbose = 0;
-int show_jfs = 0;
-int flash_on = 0;
-int first_huge = 1;
-long huge_peak = 0;
-int welcome = 1;
-int dotline = 0;
-int show_rrd = 0;
-int show_lpar = 0;
-int show_vm = 0;
-int show_dgroup = 0; /* disk groups */
-int dgroup_loaded = 0; /* 0 = no, 1=needed, 2=loaded */
-int show_raw = 0;
-
-#define RRD if(show_rrd)
-
-double ignore_procdisk_threshold = 0.1;
-double ignore_io_threshold = 0.1;
-/* Curses support */
-#define CURSE if(cursed) /* Only use this for single line curses calls */
-#define COLOUR if(colour) /* Only use this for single line colour curses calls */
-int cursed = 1; /* 1 = using curses and
- 0 = loging output for a spreadsheet */
-int colour = 1; /* 1 = using colour curses and
- 0 = using black and white curses (see -b flag) */
-#define MVPRINTW(row,col,string) {move((row),(col)); \
- attron(A_STANDOUT); \
- printw(string); \
- attroff(A_STANDOUT); }
-FILE *fp; /* filepointer for spreadsheet output */
-
-
-char *timestamp(int loop, time_t eon)
-{
-static char string[64];
- if(show_rrd)
- sprintf(string,"%ld",(long)eon);
- else
- sprintf(string,"T%04d",loop);
- return string;
-}
-#define LOOP timestamp(loop,timer)
-
-char *easy[5] = {"not found",0,0,0,0};
-char *lsb_release[5] = {"not found",0,0,0,0};
-
-void find_release()
-{
-FILE *pop;
-int i;
-char tmpstr[71];
-
- pop = popen("cat /etc/*ease 2>/dev/null", "r");
- if(pop != NULL) {
- tmpstr[0]=0;
- for(i=0;i<4;i++) {
- if(fgets(tmpstr, 70, pop) == NULL)
- break;
- tmpstr[strlen(tmpstr)-1]=0; /* remove newline */
- easy[i] = malloc(strlen(tmpstr)+1);
- strcpy(easy[i],tmpstr);
- }
- pclose(pop);
- }
- pop = popen("/usr/bin/lsb_release -idrc 2>/dev/null", "r");
- if(pop != NULL) {
- tmpstr[0]=0;
- for(i=0;i<4;i++) {
- if(fgets(tmpstr, 70, pop) == NULL)
- break;
- tmpstr[strlen(tmpstr)-1]=0; /* remove newline */
- lsb_release[i] = malloc(strlen(tmpstr)+1);
- strcpy(lsb_release[i],tmpstr);
- }
- pclose(pop);
- }
-}
-
-
-
-/* Full Args Mode stuff here */
-
-#define ARGSMAX 1024*8
-#define CMDLEN 4096
-
-struct {
- int pid;
- char *args;
-} arglist[ARGSMAX];
-
-void args_output(int pid, int loop, char *progname)
-{
-FILE *pop;
-int i;
-char tmpstr[CMDLEN];
-static int arg_first_time = 1;
-
- if(pid == 0)
- return; /* ignore init */
- for(i=0;i<ARGSMAX-1;i++ ) { /* clear data out */
- if(arglist[i].pid == pid){
- return;
- }
- if(arglist[i].pid == 0) /* got to empty slot */
- break;
- }
- sprintf(tmpstr,"ps -p %d -o args 2>/dev/null", pid);
- pop = popen(tmpstr, "r");
- if(pop == NULL) {
- return;
- } else {
- if(fgets(tmpstr, CMDLEN, pop) == NULL) { /* throw away header */
- pclose(pop);
- return;
- }
- tmpstr[0]=0;
- if(fgets(tmpstr, CMDLEN, pop) == NULL) {
- pclose(pop);
- return;
- }
- tmpstr[strlen(tmpstr)-1]=0;
- if(tmpstr[strlen(tmpstr)-1]== ' ')
- tmpstr[strlen(tmpstr)-1]=0;
- arglist[i].pid = pid;
- if(arg_first_time) {
- fprintf(fp,"UARG,+Time,PID,ProgName,FullCommand\n");
- arg_first_time = 0;
- }
- fprintf(fp,"UARG,%s,%07d,%s,%s\n",LOOP,pid,progname,tmpstr);
- pclose(pop);
- return;
- }
-}
-
-void args_load()
-{
-FILE *pop;
-int i;
-char tmpstr[CMDLEN];
-
- for(i=0;i<ARGSMAX;i++ ) { /* clear data out */
- if(arglist[i].pid == -1)
- break;
- if(arglist[i].pid != 0){
- arglist[i].pid = -1;
- free(arglist[i].args);
- }
- }
- pop = popen("ps -eo pid,args 2>/dev/null", "r");
- if(pop == NULL) {
- return;
- } else {
- if(fgets(tmpstr, CMDLEN, pop) == NULL) { /* throw away header */
- pclose(pop);
- return;
- }
- for(i=0;i<ARGSMAX;i++ ) {
- tmpstr[0]=0;
- if(fgets(tmpstr, CMDLEN, pop) == NULL) {
- pclose(pop);
- return;
- }
- tmpstr[strlen(tmpstr)-1]=0;
- if(tmpstr[strlen(tmpstr)-1]== ' ')
- tmpstr[strlen(tmpstr)-1]=0;
- arglist[i].pid = atoi(tmpstr);
- arglist[i].args = malloc(strlen(tmpstr));
- strcpy(arglist[i].args,&tmpstr[6]);
- }
- pclose(pop);
- }
-}
-
-char *args_lookup(int pid, char *progname)
-{
-int i;
- for(i=0;i<ARGSMAX;i++) {
- if(arglist[i].pid == pid)
- return arglist[i].args;
- if(arglist[i].pid == -1)
- return progname;
- }
- return progname;
-}
-/* end args mode stuff here */
-
-void linux_bbbp(char *name, char *cmd, char *err)
-{
- int i;
- int len;
-#define STRLEN 4096
- char str[STRLEN];
- FILE * pop;
- static int lineno = 0;
-
- pop = popen(cmd, "r");
- if (pop == NULL) {
- fprintf(fp, "BBBP,%03d,%s failed to run %s\n", lineno++, cmd, err);
- } else {
- fprintf(fp, "BBBP,%03d,%s\n", lineno++, name);
- for (i = 0; i < 2048 && (fgets(str, STRLEN, pop) != NULL); i++) { /* 2048=sanity check only */
- len = strlen(str);
- if(len>STRLEN) len=STRLEN;
- if (str[len-1] == '\n') /*strip off the newline */
- str[len-1] = 0;
- /* fix lsconf style output so it does not confuse spread sheets */
- if(str[0] == '+') str[0]='p';
- if(str[0] == '*') str[0]='m';
- if(str[0] == '-') str[0]='n';
- if(str[0] == '/') str[0]='d';
- if(str[0] == '=') str[0]='e';
- fprintf(fp, "BBBP,%03d,%s,\"%s\"\n", lineno++, name, str);
- }
- pclose(pop);
- }
-}
-
-#define WARNING "needs root permission or file not present"
-
-/* Global name of programme for printing it */
-char *progname;
-
-/* Main data structure for collected stats.
- * Two versions are previous and current data.
- * Often its the difference that is printed.
- * The pointers are swaped i.e. current becomes the previous
- * and the previous over written rather than moving data around.
- */
-struct cpu_stat {
- long long user;
- long long sys;
- long long wait;
- long long idle;
- long long irq;
- long long softirq;
- long long steal;
- long long nice;
- long long intr;
- long long ctxt;
- long long btime;
- long long procs;
- long long running;
- long long blocked;
- float uptime;
- float idletime;
- float mins1;
- float mins5;
- float mins15;
-};
-
-#define ulong unsigned long
-struct dsk_stat {
- char dk_name[32];
- int dk_major;
- int dk_minor;
- long dk_noinfo;
- ulong dk_reads;
- ulong dk_rmerge;
- ulong dk_rmsec;
- ulong dk_rkb;
- ulong dk_writes;
- ulong dk_wmerge;
- ulong dk_wmsec;
- ulong dk_wkb;
- ulong dk_xfers;
- ulong dk_bsize;
- ulong dk_time;
- ulong dk_inflight;
- ulong dk_11;
- ulong dk_partition;
- ulong dk_blocks; /* in /proc/partitions only */
- ulong dk_use;
- ulong dk_aveq;
-};
-
-struct mem_stat {
- long memtotal;
- long memfree;
- long memshared;
- long buffers;
- long cached;
- long swapcached;
- long active;
- long inactive;
- long hightotal;
- long highfree;
- long lowtotal;
- long lowfree;
- long swaptotal;
- long swapfree;
-#ifdef LARGEMEM
- long dirty;
- long writeback;
- long mapped;
- long slab;
- long committed_as;
- long pagetables;
- long hugetotal;
- long hugefree;
- long hugesize;
-#else
- long bigfree;
-#endif /*LARGEMEM*/
-};
-
-struct vm_stat {
-long long nr_dirty;
-long long nr_writeback;
-long long nr_unstable;
-long long nr_page_table_pages;
-long long nr_mapped;
-long long nr_slab;
-long long pgpgin;
-long long pgpgout;
-long long pswpin;
-long long pswpout;
-long long pgalloc_high;
-long long pgalloc_normal;
-long long pgalloc_dma;
-long long pgfree;
-long long pgactivate;
-long long pgdeactivate;
-long long pgfault;
-long long pgmajfault;
-long long pgrefill_high;
-long long pgrefill_normal;
-long long pgrefill_dma;
-long long pgsteal_high;
-long long pgsteal_normal;
-long long pgsteal_dma;
-long long pgscan_kswapd_high;
-long long pgscan_kswapd_normal;
-long long pgscan_kswapd_dma;
-long long pgscan_direct_high;
-long long pgscan_direct_normal;
-long long pgscan_direct_dma;
-long long pginodesteal;
-long long slabs_scanned;
-long long kswapd_steal;
-long long kswapd_inodesteal;
-long long pageoutrun;
-long long allocstall;
-long long pgrotated;
-};
-
-
-
-char *nfs_v2_names[18] = {
- "null", "getattr", "setattr", "root", "lookup", "readlink",
- "read", "wrcache", "write", "create", "remove", "rename",
- "link", "symlink", "mkdir", "rmdir", "readdir", "fsstat"};
-
-char *nfs_v3_names[22] ={
- "null", "getattr", "setattr", "lookup", "access", "readlink",
- "read", "write", "create", "mkdir", "symlink", "mknod",
- "remove", "rmdir", "rename", "link", "readdir", "readdirplus",
- "fsstat", "fsinfo", "pathconf", "commit"};
-
-struct nfs_stat {
- long v2c[18]; /* verison2 client */
- long v3c[22]; /* verison3 client */
- long v2s[18]; /* verison2 server */
- long v3s[22]; /* verison3 server */
-};
-
-#define NETMAX 32
-struct net_stat {
- unsigned long if_name[17];
- unsigned long long if_ibytes;
- unsigned long long if_obytes;
- unsigned long long if_ipackets;
- unsigned long long if_opackets;
- unsigned long if_ierrs;
- unsigned long if_oerrs;
- unsigned long if_idrop;
- unsigned long if_ififo;
- unsigned long if_iframe;
- unsigned long if_odrop;
- unsigned long if_ofifo;
- unsigned long if_ocarrier;
- unsigned long if_ocolls;
-} ;
-#ifdef PARTITIONS
-#define PARTMAX 256
-struct part_stat {
- int part_major;
- int part_minor;
- unsigned long part_blocks;
- char part_name[16];
- unsigned long part_rio;
- unsigned long part_rmerge;
- unsigned long part_rsect;
- unsigned long part_ruse;
- unsigned long part_wio;
- unsigned long part_wmerge;
- unsigned long part_wsect;
- unsigned long part_wuse;
- unsigned long part_run;
- unsigned long part_use;
- unsigned long part_aveq;
-};
-#endif /*PARTITIONS*/
-
-
-#ifdef POWER
-
-int lparcfg_reread=1;
-
-struct {
-char version_string[16]; /*lparcfg 1.3 */
-int version;
-char serial_number[16]; /*HAL,0210033EA*/
-char system_type[16]; /*HAL,9124-720*/
-int partition_id; /*11*/
-/*
-R4=0x14
-R5=0x0
-R6=0x800b0000
-R7=0x1000000040004
-*/
-int BoundThrds; /*=1*/
-int CapInc; /*=1*/
-long long DisWheRotPer; /*=2070000*/
-int MinEntCap; /*=10*/
-int MinEntCapPerVP; /*=10*/
-int MinMem; /*=2048*/
-int DesMem; /*=4096*/
-int MinProcs; /*=1*/
-int partition_max_entitled_capacity; /*=400*/
-int system_potential_processors; /*=4*/
- /**/
-int partition_entitled_capacity; /*=20*/
-int system_active_processors; /*=4*/
-int pool_capacity; /*=4*/
-int unallocated_capacity_weight; /*=0*/
-int capacity_weight; /*=0*/
-int capped; /*=1*/
-int unallocated_capacity; /*=0*/
-long long pool_idle_time; /*=0*/
-long long pool_idle_saved;
-long long pool_idle_diff;
-int pool_num_procs; /*=0*/
-long long purr; /*=0*/
-long long purr_saved;
-long long purr_diff;
-long long timebase;
-int partition_active_processors; /*=1*/
-int partition_potential_processors; /*=40*/
-int shared_processor_mode; /*=1*/
-int cmo_enabled; /* 1 means AMS is Active */
-int entitled_memory_pool_number; /* pool number = 0 */
-int entitled_memory_weight; /* 0 to 255 */
-long cmo_faults; /* Hypervisor Page-in faults = big number */
-long cmo_faults_save; /* above saved */
-long cmo_faults_diff; /* delta */
-long cmo_fault_time_usec; /* Hypervisor time in micro seconds = big */
-long cmo_fault_time_usec_save; /* above saved */
-long cmo_fault_time_usec_diff; /* delta */
-long backing_memory; /* AIX pmem in bytes */
-long cmo_page_size; /* AMS page size in bytes */
-long entitled_memory_pool_size; /* AMS whole pool size in bytes */
-long entitled_memory_loan_request; /* AMS requesting more memory loaning */
-} lparcfg;
-
-int lpar_count=0;
-
-#define LPAR_LINE_MAX 50
-#define LPAR_LINE_WIDTH 80
-char lpar_buffer[LPAR_LINE_MAX][LPAR_LINE_WIDTH];
-
-int lpar_sanity=55;
-
-char *locate(char *s)
-{
-int i;
-int len;
- len=strlen(s);
- for(i=0;i<lpar_count;i++)
- if( !strncmp(s,lpar_buffer[i],len))
- return lpar_buffer[i];
- return "";
-}
-
-#define NUMBER_NOT_VALID -999
-
-long long read_longlong(char *s)
-{
-long long x;
-int ret;
-int len;
-int i;
-char *str;
- str = locate(s);
- len=strlen(str);
- if(len == 0) {
- return NUMBER_NOT_VALID;
- }
- for(i=0;i<len;i++) {
- if(str[i] == '=') {
- ret = sscanf(&str[i+1], "%lld", &x);
- if(ret != 1) {
- fprintf(stderr,"sscanf for %s failed returned = %d line=%s\n", s, ret, str);
- return -1;
- }
-/* fprintf(fp,"DEBUG read %s value %lld\n",s,x);*/
- return x;
- }
- }
- fprintf(stderr,"read_long_long failed returned line=%s\n", str);
- return -2;
-}
-
-
-int proc_lparcfg()
-{
-static FILE *fp = (FILE *)-1;
-char *str;
- if( fp == (FILE *)-1) {
- if( (fp = fopen("/proc/ppc64/lparcfg","r")) == NULL) {
- error("failed to open - /proc/ppc64/lparcfg");
- fp = (FILE *)-1;
- return 0;
- }
- }
-
- for(lpar_count=0;lpar_count<LPAR_LINE_MAX-1;lpar_count++) {
- if(fgets(lpar_buffer[lpar_count],LPAR_LINE_WIDTH-1,fp) == NULL)
- break;
- }
- if(lparcfg_reread) {
- fclose(fp);
- fp = (FILE *)-1;
- } else rewind(fp);
-
- str=locate("lparcfg"); sscanf(str, "lparcfg %s", lparcfg.version_string);
- str=locate("serial_number"); sscanf(str, "serial_number=%s", lparcfg.serial_number);
- str=locate("system_type"); sscanf(str, "system_type=%s", lparcfg.system_type);
-
-#define GETDATA(variable) lparcfg.variable = read_longlong( __STRING(variable) );
-
- GETDATA(partition_id);
- GETDATA(BoundThrds);
- GETDATA(CapInc);
- GETDATA(DisWheRotPer);
- GETDATA(MinEntCap);
- GETDATA(MinEntCapPerVP);
- GETDATA(MinMem);
- GETDATA(DesMem);
- GETDATA(MinProcs);
- GETDATA(partition_max_entitled_capacity);
- GETDATA(system_potential_processors);
- GETDATA(partition_entitled_capacity);
- GETDATA(system_active_processors);
- GETDATA(pool_capacity);
- GETDATA(unallocated_capacity_weight);
- GETDATA(capacity_weight);
- GETDATA(capped);
- GETDATA(unallocated_capacity);
- lparcfg.pool_idle_saved = lparcfg.pool_idle_time;
- GETDATA(pool_idle_time);
- lparcfg.pool_idle_diff = lparcfg.pool_idle_time - lparcfg.pool_idle_saved;
- GETDATA(pool_num_procs);
- lparcfg.purr_saved = lparcfg.purr;
- GETDATA(purr);
- lparcfg.purr_diff = lparcfg.purr - lparcfg.purr_saved;
- GETDATA(partition_active_processors);
- GETDATA(partition_potential_processors);
- GETDATA(shared_processor_mode);
-/* AMS additions */
- GETDATA(cmo_enabled);
- if(lparcfg.cmo_enabled) {
- GETDATA(entitled_memory_pool_number); /* pool number = 0 */
- GETDATA(entitled_memory_weight); /* 0 to 255 */
-
- lparcfg.cmo_faults_save = lparcfg.cmo_faults;
- GETDATA(cmo_faults); /* Hypervisor Page-in faults = big number */
- lparcfg.cmo_faults_diff = lparcfg.cmo_faults - lparcfg.cmo_faults_save;
-
- lparcfg.cmo_fault_time_usec_save = lparcfg.cmo_fault_time_usec;
- GETDATA(cmo_fault_time_usec); /* Hypervisor time in micro seconds = big number */
- lparcfg.cmo_fault_time_usec_diff = lparcfg.cmo_fault_time_usec - lparcfg.cmo_fault_time_usec_save;
-
- GETDATA(backing_memory); /* AIX pmem in bytes */
- GETDATA(cmo_page_size); /* AMS page size in bytes */
- GETDATA(entitled_memory_pool_size); /* AMS whole pool size in bytes */
- GETDATA(entitled_memory_loan_request); /* AMS requesting more memory loaning */
- }
- return 1;
-}
-#endif /*POWER*/
-
-
-#define DISKMIN 256
-#define DISKMAX diskmax
-int diskmax = DISKMIN;
-
-#define CPUMAX 128
-
-struct data {
- struct dsk_stat *dk;
- struct cpu_stat cpu_total;
- struct cpu_stat cpuN[CPUMAX];
- struct mem_stat mem;
- struct vm_stat vm;
- struct nfs_stat nfs;
- struct net_stat ifnets[NETMAX];
-#ifdef PARTITIONS
- struct part_stat parts[PARTMAX];
-#endif /*PARTITIONS*/
-
- struct timeval tv;
- double time;
- struct procsinfo *procs;
-
- int nprocs;
-} database[2], *p, *q;
-
-
-long long read_vmline(FILE *fp, char *s)
-{
-char buffer[4096];
-int len;
- int ret;
-long long var;
-
- if(fgets(buffer,4096-1,fp) == NULL)
- return -1;
- len = strlen(s) +1;
- var = -1;
- ret = sscanf(&buffer[len],"%lld", &var);
- if(ret == 1)
- return var;
- else
- return -1;
-}
-
-#define GETVM(variable) p->vm.variable = read_vmline(fp, __STRING(variable) );
-
-int read_vmstat()
-{
-static FILE *fp = (FILE *)-1;
-
- if( fp == (FILE *)-1) {
- if( (fp = fopen("/proc/vmstat","r")) == NULL) {
- error("failed to open - /proc/vmstat");
- fp = (FILE *)-1;
- return -1;
- }
- }
- GETVM(nr_dirty);
- GETVM(nr_writeback);
- GETVM(nr_unstable);
- GETVM(nr_page_table_pages);
- GETVM(nr_mapped);
- GETVM(nr_slab);
- GETVM(pgpgin);
- GETVM(pgpgout);
- GETVM(pswpin);
- GETVM(pswpout);
- GETVM(pgalloc_high);
- GETVM(pgalloc_normal);
- GETVM(pgalloc_dma);
- GETVM(pgfree);
- GETVM(pgactivate);
- GETVM(pgdeactivate);
- GETVM(pgfault);
- GETVM(pgmajfault);
- GETVM(pgrefill_high);
- GETVM(pgrefill_normal);
- GETVM(pgrefill_dma);
- GETVM(pgsteal_high);
- GETVM(pgsteal_normal);
- GETVM(pgsteal_dma);
- GETVM(pgscan_kswapd_high);
- GETVM(pgscan_kswapd_normal);
- GETVM(pgscan_kswapd_dma);
- GETVM(pgscan_direct_high);
- GETVM(pgscan_direct_normal);
- GETVM(pgscan_direct_dma);
- GETVM(pginodesteal);
- GETVM(slabs_scanned);
- GETVM(kswapd_steal);
- GETVM(kswapd_inodesteal);
- GETVM(pageoutrun);
- GETVM(allocstall);
- GETVM(pgrotated);
- fclose(fp);
- fp=(FILE *)-1;
-/*
- rewind(fp);
-*/
- return 1;
-}
-
-
-/* These macro simplify the access to the Main data structure */
-#define DKDELTA(member) ( (q->dk[i].member > p->dk[i].member) ? 0 : (p->dk[i].member - q->dk[i].member))
-#define SIDELTA(member) ( (q->si.member > p->si.member) ? 0 : (p->si.member - q->si.member))
-
-#define IFNAME 64
-
-#define TIMEDELTA(member,index1,index2) ((p->procs[index1].member) - (q->procs[index2].member))
-#define COUNTDELTA(member) ( (q->procs[topper[j].other].member > p->procs[i].member) ? 0 : (p->procs[i].member - q->procs[topper[j].other].member) )
-
-#define TIMED(member) ((double)(p->procs[i].member.tv_sec))
-
-double *cpu_peak; /* ptr to array - 1 for each cpu - 0 = average for machine */
-double *disk_busy_peak;
-double *disk_rate_peak;
-double net_read_peak[NETMAX];
-double net_write_peak[NETMAX];
-int aiorunning;
-int aiorunning_max = 0;
-int aiocount;
-int aiocount_max = 0;
-float aiotime;
-float aiotime_max =0.0;
-
-char *dskgrp(int i)
-{
-static char error_string[] = { "Too-Many-Disks" };
-static char *string[16] = {"", "1", "2", "3",
- "4", "5", "6", "7",
- "8", "9", "10", "11",
- "12", "13", "14", "15"};
-
- i = (int)((float)i/(float)disks_per_line);
- if(0 <= i && i <= 15 )
- return string[i];
- return error_string;
-}
-
-/* command checking against a list */
-
-#define CMDMAX 64
-
-char *cmdlist[CMDMAX];
-int cmdfound = 0;
-
-int cmdcheck(char *cmd)
-{
- int i;
-#ifdef CMDDEBUG
- fprintf(stderr,"cmdfound=%d\n",cmdfound);
- for(i=0;i<cmdfound;i++)
- fprintf(stderr,"cmdlist[%d]=\"%s\"\n",i,cmdlist[i]);
-#endif /* CMDDEBUG */
- for(i=0;i<cmdfound;i++) {
- if(strlen(cmdlist[i]) == 0)
- continue;
- if( !strncmp(cmdlist[i],cmd,strlen(cmdlist[i])) )
- return 1;
- }
- return 0;
-}
-
-/* Convert secs + micro secs to a double */
-double doubletime(void)
-{
-
- gettimeofday(&p->tv, 0);
- return((double)p->tv.tv_sec + p->tv.tv_usec * 1.0e-6);
-}
-
-int stat8 = 0; /* used to determine the number of variables on a line */
-
-void proc_cpu()
-{
-int i;
-static int intr_line = 0;
-static int ctxt_line = 0;
-static int btime_line= 0;
-static int proc_line = 0;
-static int run_line = 0;
-static int block_line= 0;
-static int proc_cpu_first_time = 1;
-long long user;
-long long nice;
-long long sys;
-long long idle;
-long long iowait;
-long long hardirq;
-long long softirq;
-long long steal;
-
- if(proc_cpu_first_time) {
- stat8 = sscanf(&proc[P_STAT].line[0][5], "%lld %lld %lld %lld %lld %lld %lld %lld",
- &user,
- &nice,
- &sys,
- &idle,
- &iowait,
- &hardirq,
- &softirq,
- &steal);
- proc_cpu_first_time = 0;
- }
- user = nice = sys = idle = iowait = hardirq = softirq = steal = 0;
- if(stat8 == 8) {
- sscanf(&proc[P_STAT].line[0][5], "%lld %lld %lld %lld %lld %lld %lld %lld",
- &user,
- &nice,
- &sys,
- &idle,
- &iowait,
- &hardirq,
- &softirq,
- &steal);
- } else { /* stat 4 variables here as older Linux proc */
- sscanf(&proc[P_STAT].line[0][5], "%lld %lld %lld %lld",
- &user,
- &nice,
- &sys,
- &idle);
- }
- p->cpu_total.user = user + nice;
- p->cpu_total.wait = iowait; /* in the case of 4 variables = 0 */
- p->cpu_total.sys = sys;
- /* p->cpu_total.sys = sys + hardirq + softirq + steal;*/
- p->cpu_total.idle = idle;
-
- p->cpu_total.irq = hardirq;
- p->cpu_total.softirq = softirq;
- p->cpu_total.steal = steal;
- p->cpu_total.nice = nice;
-#ifdef DEBUG
- if(debug)fprintf(stderr,"XX user=%lld wait=%lld sys=%lld idle=%lld\n",
- p->cpu_total.user,
- p->cpu_total.wait,
- p->cpu_total.sys,
- p->cpu_total.idle);
-#endif /*DEBUG*/
-
- for(i=0;i<cpus;i++ ) {
- user = nice = sys = idle = iowait = hardirq = softirq = steal = 0;
- if(stat8 == 8) {
- sscanf(&proc[P_STAT].line[i+1][5],
- "%lld %lld %lld %lld %lld %lld %lld %lld",
- &user,
- &nice,
- &sys,
- &idle,
- &iowait,
- &hardirq,
- &softirq,
- &steal);
- } else {
- sscanf(&proc[P_STAT].line[i+1][5], "%lld %lld %lld %lld",
- &user,
- &nice,
- &sys,
- &idle);
- }
- p->cpuN[i].user = user + nice;
- p->cpuN[i].wait = iowait;
- p->cpuN[i].sys = sys;
- /*p->cpuN[i].sys = sys + hardirq + softirq + steal;*/
- p->cpuN[i].idle = idle;
-
- p->cpuN[i].irq = hardirq;
- p->cpuN[i].softirq = softirq;
- p->cpuN[i].steal = steal;
- p->cpuN[i].nice = nice;
- }
-
- if(intr_line == 0) {
- if(proc[P_STAT].line[i+1][0] == 'p' &&
- proc[P_STAT].line[i+1][1] == 'a' &&
- proc[P_STAT].line[i+1][2] == 'g' &&
- proc[P_STAT].line[i+1][3] == 'e' ) {
- /* 2.4 kernel */
- intr_line = i+3;
- ctxt_line = i+5;
- btime_line= i+6;
- proc_line = i+7;
- run_line = i+8;
- block_line= i+9;
- }else {
- /* 2.6 kernel */
- intr_line = i+1;
- ctxt_line = i+2;
- btime_line= i+3;
- proc_line = i+4;
- run_line = i+5;
- block_line= i+6;
- }
- }
- p->cpu_total.intr = -1;
- p->cpu_total.ctxt = -1;
- p->cpu_total.btime = -1;
- p->cpu_total.procs = -1;
- p->cpu_total.running = -1;
- p->cpu_total.blocked = -1;
- if(proc[P_STAT].lines >= intr_line)
- sscanf(&proc[P_STAT].line[intr_line][0], "intr %lld", &p->cpu_total.intr);
- if(proc[P_STAT].lines >= ctxt_line)
- sscanf(&proc[P_STAT].line[ctxt_line][0], "ctxt %lld", &p->cpu_total.ctxt);
- if(proc[P_STAT].lines >= btime_line)
- sscanf(&proc[P_STAT].line[btime_line][0], "btime %lld", &p->cpu_total.btime);
- if(proc[P_STAT].lines >= proc_line)
- sscanf(&proc[P_STAT].line[proc_line][0], "processes %lld", &p->cpu_total.procs);
- if(proc[P_STAT].lines >= run_line)
- sscanf(&proc[P_STAT].line[run_line][0], "procs_running %lld", &p->cpu_total.running);
- if(proc[P_STAT].lines >= block_line)
- sscanf(&proc[P_STAT].line[block_line][0], "procs_blocked %lld", &p->cpu_total.blocked);
-}
-
-void proc_nfs()
-{
-int i;
-int j;
- if(proc[P_NFS].fp != 0) {
- /* line readers "proc2 18 num num etc" */
- for(j=0,i=8;i<strlen(proc[P_NFS].line[2]);i++) {
- if(proc[P_NFS].line[2][i] == ' ') {
- p->nfs.v2c[j] =atol(&proc[P_NFS].line[2][i+1]);
- j++;
- }
- }
- /* line readers "proc3 22 num num etc" */
- for(j=0,i=8;i<strlen(proc[P_NFS].line[3]);i++) {
- if(proc[P_NFS].line[3][i] == ' ') {
- p->nfs.v3c[j] =atol(&proc[P_NFS].line[3][i+1]);
- j++;
- }
- }
- }
- /* line readers "proc2 18 num num etc" */
- if(proc[P_NFSD].fp != 0) {
- for(j=0,i=8;i<strlen(proc[P_NFSD].line[7]);i++) {
- if(proc[P_NFSD].line[2][i] == ' ') {
- p->nfs.v2s[j] =atol(&proc[P_NFSD].line[2][i+1]);
- j++;
- }
- }
- /* line readers "proc3 22 num num etc" */
- for(j=0,i=8;i<strlen(proc[P_NFSD].line[8]);i++) {
- if(proc[P_NFS].line[3][i] == ' ') {
- p->nfs.v3s[j] =atol(&proc[P_NFSD].line[3][i+1]);
- j++;
- }
- }
- }
-}
-
-void proc_kernel()
-{
-int i;
- p->cpu_total.uptime=0.0;
- p->cpu_total.idletime=0.0;
- p->cpu_total.uptime=atof(proc[P_UPTIME].line[0]);
- for(i=0;i<strlen(proc[P_UPTIME].line[0]);i++) {
- if(proc[P_UPTIME].line[0][i] == ' ') {
- p->cpu_total.idletime=atof(&proc[P_UPTIME].line[0][i+1]);
- break;
- }
- }
-
- sscanf(&proc[P_LOADAVG].line[0][0], "%f %f %f",
- &p->cpu_total.mins1,
- &p->cpu_total.mins5,
- &p->cpu_total.mins15);
-
-}
-
-char *proc_find_sb(char * p)
-{
- for(; *p != 0;p++)
- if(*p == ' ' && *(p+1) == '(')
- return p;
- return 0;
-}
-
-#define DISK_MODE_IO 1
-#define DISK_MODE_DISKSTATS 2
-#define DISK_MODE_PARTITIONS 3
-
-int disk_mode = 0;
-
-void proc_disk_io(double elapsed)
-{
-int diskline;
-int i;
-int ret;
-char *str;
-int fudged_busy;
-
- disks = 0;
- for(diskline=0;diskline<proc[P_STAT].lines;diskline++) {
- if(strncmp("disk_io", proc[P_STAT].line[diskline],7) == 0)
- break;
- }
- for(i=8;i<strlen(proc[P_STAT].line[diskline]);i++) {
- if( proc[P_STAT].line[diskline][i] == ':')
- disks++;
- }
-
- str=&proc[P_STAT].line[diskline][0];
- for(i=0;i<disks;i++) {
- str=proc_find_sb(str);
- if(str == 0)
- break;
- ret = sscanf(str, " (%d,%d):(%ld,%ld,%ld,%ld,%ld",
- &p->dk[i].dk_major,
- &p->dk[i].dk_minor,
- &p->dk[i].dk_noinfo,
- &p->dk[i].dk_reads,
- &p->dk[i].dk_rkb,
- &p->dk[i].dk_writes,
- &p->dk[i].dk_wkb);
- if(ret != 7)
- exit(7);
- p->dk[i].dk_xfers = p->dk[i].dk_noinfo;
- /* blocks are 512 bytes*/
- p->dk[i].dk_rkb = p->dk[i].dk_rkb/2;
- p->dk[i].dk_wkb = p->dk[i].dk_wkb/2;
-
- p->dk[i].dk_bsize = (p->dk[i].dk_rkb+p->dk[i].dk_wkb)/p->dk[i].dk_xfers*1024;
-
- /* assume a disk does 200 op per second */
- fudged_busy = (p->dk[i].dk_reads + p->dk[i].dk_writes)/2;
- if(fudged_busy > 100*elapsed)
- p->dk[i].dk_time += 100*elapsed;
- p->dk[i].dk_time = fudged_busy;
-
- sprintf(p->dk[i].dk_name,"dev-%d-%d",p->dk[i].dk_major,p->dk[i].dk_minor);
-/* fprintf(stderr,"disk=%d name=\"%s\" major=%d minor=%d\n", i,p->dk[i].dk_name, p->dk[i].dk_major,p->dk[i].dk_minor); */
- str++;
- }
-}
-
-void proc_diskstats(double elapsed)
-{
-static FILE *fp = (FILE *)-1;
-char buf[1024];
-int i;
-int ret;
-
- if( fp == (FILE *)-1) {
- if( (fp = fopen("/proc/diskstats","r")) == NULL) {
- /* DEBUG if( (fp = fopen("diskstats","r")) == NULL) { */
- error("failed to open - /proc/diskstats");
- disks=0;
- return;
- }
- }
-/*
- 2 0 fd0 1 0 2 13491 0 0 0 0 0 13491 13491
- 3 0 hda 41159 53633 1102978 620181 39342 67538 857108 4042631 0 289150 4668250
- 3 1 hda1 58209 58218 0 0
- 3 2 hda2 148 4794 10 20
- 3 3 hda3 65 520 0 0
- 3 4 hda4 35943 1036092 107136 857088
- 22 0 hdc 167 5394 22308 32250 0 0 0 0 0 22671 32250 <-- USB !!
- 8 0 sda 990 2325 4764 6860 9 3 12 417 0 6003 7277
- 8 1 sda1 3264 4356 12 12
-*/
- for(i=0;i<DISKMAX;) {
- if(fgets(buf,1024,fp) == NULL)
- break;
- /* zero the data ready for reading */
- p->dk[i].dk_major =
- p->dk[i].dk_minor =
- p->dk[i].dk_name[0] =
- p->dk[i].dk_reads =
- p->dk[i].dk_rmerge =
- p->dk[i].dk_rkb =
- p->dk[i].dk_rmsec =
- p->dk[i].dk_writes =
- p->dk[i].dk_wmerge =
- p->dk[i].dk_wkb =
- p->dk[i].dk_wmsec =
- p->dk[i].dk_inflight =
- p->dk[i].dk_time =
- p->dk[i].dk_11 =0;
-
- ret = sscanf(&buf[0], "%d %d %s %lu %lu %lu %lu %lu %lu %lu %lu %lu %lu %lu",
- &p->dk[i].dk_major,
- &p->dk[i].dk_minor,
- &p->dk[i].dk_name[0],
- &p->dk[i].dk_reads,
- &p->dk[i].dk_rmerge,
- &p->dk[i].dk_rkb,
- &p->dk[i].dk_rmsec,
- &p->dk[i].dk_writes,
- &p->dk[i].dk_wmerge,
- &p->dk[i].dk_wkb,
- &p->dk[i].dk_wmsec,
- &p->dk[i].dk_inflight,
- &p->dk[i].dk_time,
- &p->dk[i].dk_11 );
- if(ret == 7) { /* suffle the data around due to missing columns for partitions */
- p->dk[i].dk_partition = 1;
- p->dk[i].dk_wkb = p->dk[i].dk_rmsec;
- p->dk[i].dk_writes = p->dk[i].dk_rkb;
- p->dk[i].dk_rkb = p->dk[i].dk_rmerge;
- p->dk[i].dk_rmsec=0;
- p->dk[i].dk_rmerge=0;
-
- }
- else if(ret == 14) p->dk[i].dk_partition = 0;
- else fprintf(stderr,"disk sscanf wanted 14 but returned=%d line=%s\n",
- ret,buf);
-
- p->dk[i].dk_rkb /= 2; /* sectors = 512 bytes */
- p->dk[i].dk_wkb /= 2;
- /*p->dk[i].dk_xfers = p->dk[i].dk_rkb + p->dk[i].dk_wkb;*/
- p->dk[i].dk_xfers = p->dk[i].dk_reads + p->dk[i].dk_writes;
- if(p->dk[i].dk_xfers == 0)
- p->dk[i].dk_bsize = 0;
- else
- p->dk[i].dk_bsize = (p->dk[i].dk_rkb+p->dk[i].dk_wkb)/p->dk[i].dk_xfers*1024;
-
- p->dk[i].dk_time /= 10.0; /* in milli-seconds to make it upto 100%, 1000/100 = 10 */
-
- if(p->dk[i].dk_reads != 0 || p->dk[i].dk_writes != 0)
- i++;
- }
- if(reread) {
- fclose(fp);
- fp = (FILE *)-1;
- } else rewind(fp);
- disks = i;
-}
-
-void strip_spaces(char *s)
-{
-char *p;
-int spaced=1;
-
- p=s;
- for(p=s;*p!=0;p++) {
- if(*p == ':')
- *p=' ';
- if(*p != ' ') {
- *s=*p;
- s++;
- spaced=0;
- } else if(spaced) {
- /* do no thing as this is second space */
- } else {
- *s=*p;
- s++;
- spaced=1;
- }
-
- }
- *s = 0;
-}
-
-void proc_partitions(double elapsed)
-{
-static FILE *fp = (FILE *)-1;
-char buf[1024];
-int i = 0;
-int ret;
-
- if( fp == (FILE *)-1) {
- if( (fp = fopen("/proc/partitions","r")) == NULL) {
- error("failed to open - /proc/partitions");
- partitions=0;
- return;
- }
- }
- if(fgets(buf,1024,fp) == NULL) goto end; /* throw away the header lines */
- if(fgets(buf,1024,fp) == NULL) goto end;
-/*
-major minor #blocks name rio rmerge rsect ruse wio wmerge wsect wuse running use aveq
-
- 33 0 1052352 hde 2855 15 2890 4760 0 0 0 0 -4 7902400 11345292
- 33 1 1050304 hde1 2850 0 2850 3930 0 0 0 0 0 3930 3930
- 3 0 39070080 hda 9287 19942 226517 90620 8434 25707 235554 425790 -12 7954830 33997658
- 3 1 31744408 hda1 651 90 5297 2030 0 0 0 0 0 2030 2030
- 3 2 6138720 hda2 7808 19561 218922 79430 7299 20529 222872 241980 0 59950 321410
- 3 3 771120 hda3 13 41 168 80 0 0 0 0 0 80 80
- 3 4 1 hda4 0 0 0 0 0 0 0 0 0 0 0
- 3 5 408208 hda5 812 241 2106 9040 1135 5178 12682 183810 0 11230 192850
-*/
- for(i=0;i<DISKMAX;i++) {
- if(fgets(buf,1024,fp) == NULL)
- break;
- strip_spaces(buf);
- ret = sscanf(&buf[0], "%d %d %lu %s %lu %lu %lu %lu %lu %lu %lu %lu %lu %lu %lu",
- &p->dk[i].dk_major,
- &p->dk[i].dk_minor,
- &p->dk[i].dk_blocks,
- (char *)&p->dk[i].dk_name,
- &p->dk[i].dk_reads,
- &p->dk[i].dk_rmerge,
- &p->dk[i].dk_rkb,
- &p->dk[i].dk_rmsec,
- &p->dk[i].dk_writes,
- &p->dk[i].dk_wmerge,
- &p->dk[i].dk_wkb,
- &p->dk[i].dk_wmsec,
- &p->dk[i].dk_inflight,
- &p->dk[i].dk_use,
- &p->dk[i].dk_aveq
- );
- p->dk[i].dk_rkb /= 2; /* sectors = 512 bytes */
- p->dk[i].dk_wkb /= 2;
- p->dk[i].dk_xfers = p->dk[i].dk_rkb + p->dk[i].dk_wkb;
- if(p->dk[i].dk_xfers == 0)
- p->dk[i].dk_bsize = 0;
- else
- p->dk[i].dk_bsize = (p->dk[i].dk_rkb+p->dk[i].dk_wkb)/p->dk[i].dk_xfers*1024;
-
- p->dk[i].dk_time /= 10.0; /* in milli-seconds to make it upto 100%, 1000/100 = 10 */
-
- if(ret != 15) {
-#ifdef DEBUG
- if(debug)fprintf(stderr,"sscanf wanted 15 returned = %d line=%s\n", ret,buf);
-#endif /*DEBUG*/
- partitions_short = 1;
- } else partitions_short = 0;
- }
- end:
- if(reread) {
- fclose(fp);
- fp = (FILE *)-1;
- } else rewind(fp);
- disks = i;
-}
-
-void proc_disk(double elapsed)
-{
-struct stat buf;
-int ret;
- if(disk_mode == 0) {
- ret = stat("/proc/diskstats", &buf);
- if(ret == 0) {
- disk_mode=DISK_MODE_DISKSTATS;
- } else {
- ret = stat("/proc/partitions", &buf);
- if(ret == 0) {
- disk_mode=DISK_MODE_PARTITIONS;
- } else {
- disk_mode=DISK_MODE_IO;
- }
- }
- }
- switch(disk_mode){
- case DISK_MODE_IO: proc_disk_io(elapsed); break;
- case DISK_MODE_DISKSTATS: proc_diskstats(elapsed); break;
- case DISK_MODE_PARTITIONS: proc_partitions(elapsed); break;
- }
-}
-#undef isdigit
-#define isdigit(ch) ( ( '0' <= (ch) && (ch) >= '9')? 0: 1 )
-
-long proc_mem_search( char *s)
-{
-int i;
-int j;
-int len;
- len=strlen(s);
- for(i=0;i<proc[P_MEMINFO].lines;i++ ) {
- if( !strncmp(s, proc[P_MEMINFO].line[i],len) ) {
- for(j=len;
- !isdigit(proc[P_MEMINFO].line[i][j]) &&
- proc[P_MEMINFO].line[i][j] != 0;
- j++)
- /* do nothing */ ;
- return atol( &proc[P_MEMINFO].line[i][j]);
- }
- }
- return -1;
-}
-
-void proc_mem()
-{
- p->mem.memtotal = proc_mem_search("MemTotal");
- p->mem.memfree = proc_mem_search("MemFree");
- p->mem.memshared = proc_mem_search("MemShared");
- p->mem.buffers = proc_mem_search("Buffers");
- p->mem.cached = proc_mem_search("Cached");
- p->mem.swapcached = proc_mem_search("SwapCached");
- p->mem.active = proc_mem_search("Active");
- p->mem.inactive = proc_mem_search("Inactive");
- p->mem.hightotal = proc_mem_search("HighTotal");
- p->mem.highfree = proc_mem_search("HighFree");
- p->mem.lowtotal = proc_mem_search("LowTotal");
- p->mem.lowfree = proc_mem_search("LowFree");
- p->mem.swaptotal = proc_mem_search("SwapTotal");
- p->mem.swapfree = proc_mem_search("SwapFree");
-#ifdef LARGEMEM
- p->mem.dirty = proc_mem_search("Dirty");
- p->mem.writeback = proc_mem_search("Writeback");
- p->mem.mapped = proc_mem_search("Mapped");
- p->mem.slab = proc_mem_search("Slab");
- p->mem.committed_as = proc_mem_search("Committed_AS");
- p->mem.pagetables = proc_mem_search("PageTables");
- p->mem.hugetotal = proc_mem_search("HugePages_Total");
- p->mem.hugefree = proc_mem_search("HugePages_Free");
- p->mem.hugesize = proc_mem_search("Hugepagesize");
-#else
- p->mem.bigfree = proc_mem_search("BigFree");
-#endif /*LARGEMEM*/
-}
-
-#define MAX_SNAPS 72
-#define MAX_SNAP_ROWS 20
-#define SNAP_OFFSET 6
-
-int next_cpu_snap = 0;
-int cpu_snap_all = 0;
-
-struct {
- double user;
- double kernel;
- double iowait;
- double idle;
-} cpu_snap[MAX_SNAPS];
-
-int snap_average()
-{
-int i;
-int end;
-int total = 0;
-
- if(cpu_snap_all)
- end = MAX_SNAPS;
- else
- end = next_cpu_snap;
-
- for(i=0;i<end;i++) {
- total = total + cpu_snap[i].user + cpu_snap[i].kernel;
- }
- return (total / end) ;
-}
-
-void snap_clear()
-{
-int i;
- for(i=0;i<MAX_SNAPS;i++) {
- cpu_snap[i].user = 0;
- cpu_snap[i].kernel = 0;
- cpu_snap[i].iowait = 0;
- cpu_snap[i].idle = 0;
- }
- next_cpu_snap=0;
- cpu_snap_all=0;
-}
-
-void plot_snap(WINDOW *pad)
-{
-int i;
-int j;
- if (cursed) {
- mvwprintw(pad,0, 0, " CPU +-------------------------------------------------------------------------+");
- mvwprintw(pad,1, 0,"100%%-|");
- mvwprintw(pad,2, 1, "95%%-|");
- mvwprintw(pad,3, 1, "90%%-|");
- mvwprintw(pad,4, 1, "85%%-|");
- mvwprintw(pad,5, 1, "80%%-|");
- mvwprintw(pad,6, 1, "75%%-|");
- mvwprintw(pad,7, 1, "70%%-|");
- mvwprintw(pad,8, 1, "65%%-|");
- mvwprintw(pad,9, 1, "60%%-|");
- mvwprintw(pad,10, 1, "55%%-|");
- mvwprintw(pad,11, 1, "50%%-|");
- mvwprintw(pad,12, 1, "45%%-|");
- mvwprintw(pad,13, 1, "40%%-|");
- mvwprintw(pad,14, 1, "35%%-|");
- mvwprintw(pad,15, 1, "30%%-|");
- mvwprintw(pad,16, 1, "25%%-|");
- mvwprintw(pad,17, 1, "20%%-|");
- mvwprintw(pad,18, 1,"15%%-|");
- mvwprintw(pad,19, 1,"10%%-|");
- mvwprintw(pad,20, 1," 5%%-|");
-
- if (colour){
- mvwprintw(pad,21, 4, " +--------------------");
- COLOUR wattrset(pad, COLOR_PAIR(2));
- mvwprintw(pad,21, 26, "User%%");
- COLOUR wattrset(pad, COLOR_PAIR(0));
- mvwprintw(pad,21, 30, "---------");
- COLOUR wattrset(pad, COLOR_PAIR(1));
- mvwprintw(pad,21, 39, "System%%");
- COLOUR wattrset(pad, COLOR_PAIR(0));
- mvwprintw(pad,21, 45, "---------");
- COLOUR wattrset(pad, COLOR_PAIR(4));
- mvwprintw(pad,21, 54, "Wait%%");
- COLOUR wattrset(pad, COLOR_PAIR(0));
- mvwprintw(pad,21, 58, "---------------------+");
- } else {
- mvwprintw(pad,21, 4, " +-------------------------------------------------------------------------+");
- }
-
- for (j = 0; j < MAX_SNAPS; j++) {
- for (i = 0; i < MAX_SNAP_ROWS; i++) {
- wmove(pad,MAX_SNAP_ROWS-i, j+SNAP_OFFSET);
- if( (cpu_snap[j].user / 100 * MAX_SNAP_ROWS) > i+0.5) {
- COLOUR wattrset(pad,COLOR_PAIR(9));
- wprintw(pad,"U");
- COLOUR wattrset(pad,COLOR_PAIR(0));
- } else if( (cpu_snap[j].user + cpu_snap[j].kernel )/ 100 * MAX_SNAP_ROWS > i+0.5) {
- COLOUR wattrset(pad,COLOR_PAIR(8));
- wprintw(pad,"s");
- COLOUR wattrset(pad,COLOR_PAIR(0));
- } else if( (cpu_snap[j].user + cpu_snap[j].kernel +cpu_snap[j].iowait )/ 100 * MAX_SNAP_ROWS > i+0.5) {
- COLOUR wattrset(pad,COLOR_PAIR(10));
- wprintw(pad,"w");
- COLOUR wattrset(pad,COLOR_PAIR(0));
- } else
- wprintw(pad," ");
- }
- }
- for (i = 0; i < MAX_SNAP_ROWS; i++) {
- wmove(pad,MAX_SNAP_ROWS-i, next_cpu_snap+SNAP_OFFSET);
- wprintw(pad,"|");
- }
- wmove(pad,MAX_SNAP_ROWS+1 - (snap_average() /5), next_cpu_snap+SNAP_OFFSET);
- wprintw(pad,"+");
- if(dotline) {
- for (i = 0; i < MAX_SNAPS; i++) {
- wmove(pad,MAX_SNAP_ROWS+1-dotline*2, i+SNAP_OFFSET);
- wprintw(pad,"+");
- }
- dotline = 0;
- }
- }
-}
-
-/* This saves the CPU overall usage for later ploting on the screen */
-void plot_save(double user, double kernel, double iowait, double idle)
-{
- cpu_snap[next_cpu_snap].user = user;
- cpu_snap[next_cpu_snap].kernel = kernel;
- cpu_snap[next_cpu_snap].iowait = iowait;
- cpu_snap[next_cpu_snap].idle = idle;
- next_cpu_snap++;
- if(next_cpu_snap >= MAX_SNAPS) {
- next_cpu_snap=0;
- cpu_snap_all=1;
- }
-}
-
-/* This puts the CPU usage on the screen and draws the CPU graphs or outputs to the file */
-
-void save_smp(WINDOW *pad, int cpu_no, int row, long user, long kernel, long iowait, long idle, long nice, long irq, long softirq, long steal)
-{
-static int firsttime = 1;
- if (cursed) {
- mvwprintw(pad,row,0, "%02d usr=%4ld sys=%4ld wait=%4ld idle=%4ld steal=%2ld nice=%4ld irq=%2ld sirq=%2ld\n",
- cpu_no, user, kernel, iowait, idle, steal, nice, irq, softirq, steal);
- return;
- }
- if(firsttime) {
- fprintf(fp,"CPUTICKS_ALL,AAA,user,sys,wait,idle,nice,irq,softirq,steal\n");
- fprintf(fp,"CPUTICKS%02d,AAA,user,sys,wait,idle,nice,irq,softirq,steal\n", cpu_no);
- firsttime=0;
- }
- if(cpu_no==0) {
- fprintf(fp,"CPUTICKS_ALL,%s,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld\n",
- LOOP, user, kernel, iowait, idle, nice, irq, softirq, steal);
- } else {
- fprintf(fp,"CPUTICKS%02d,%s,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld\n",
- cpu_no, LOOP, user, kernel, iowait, idle, nice, irq, softirq, steal);
- }
-}
-
-void plot_smp(WINDOW *pad, int cpu_no, int row, double user, double kernel, double iowait, double idle)
-{
- int i;
- int peak_col;
-
- if(show_rrd) return;
-
- if(cpu_peak[cpu_no] < (user + kernel + iowait) )
- cpu_peak[cpu_no] = (double)((int)user/2 + (int)kernel/2 + (int)iowait/2)*2.0;
-
- if (cursed) {
- if(cpu_no == 0)
- mvwprintw(pad,row, 0, "Avg");
- else
- mvwprintw(pad,row, 0, "%2d", cpu_no);
- mvwprintw(pad,row, 3, "%5.1lf", user);
- mvwprintw(pad,row, 9, "%5.1lf", kernel);
- mvwprintw(pad,row, 15, "%5.1lf", iowait);
- mvwprintw(pad,row, 22, "%5.1lf", idle);
- mvwprintw(pad,row, 27, "|");
- wmove(pad,row, 28);
- for (i = 0; i < (int)(user / 2); i++){
- COLOUR wattrset(pad,COLOR_PAIR(9));
- wprintw(pad,"U");
- COLOUR wattrset(pad,COLOR_PAIR(0));
- }
- for (i = 0; i < (int)(kernel / 2); i++){
- COLOUR wattrset(pad,COLOR_PAIR(8));
- wprintw(pad,"s");
- COLOUR wattrset(pad,COLOR_PAIR(0));
- }
- for (i = 0; i < (int)(iowait / 2); i++) {
- COLOUR wattrset(pad,COLOR_PAIR(10));
- wprintw(pad,"W");
- COLOUR wattrset(pad,COLOR_PAIR(0));
- }
- for (i = 0; i < (int)(idle / 2); i++)
- wprintw(pad," ");
- mvwprintw(pad,row, 77, "|");
-
- peak_col = 29 +(int)(cpu_peak[cpu_no]/2);
- if(peak_col > 77)
- peak_col=77;
- mvwprintw(pad,row, peak_col, ">");
- } else {
- /* Sanity check the numnbers */
- if( user < 0.0 || kernel < 0.0 || iowait < 0.0 || idle < 0.0 || idle >100.0) {
- user = kernel = iowait = idle = 0;
- }
-
- if(cpu_no == 0)
- fprintf(fp,"CPU_ALL,%s,%.1lf,%.1lf,%.1lf,%.1lf,,%d\n", LOOP,
- user, kernel, iowait, idle,cpus);
- else {
- fprintf(fp,"CPU%02d,%s,%.1lf,%.1lf,%.1lf,%.1lf\n", cpu_no, LOOP,
- user, kernel, iowait, idle);
- }
- }
-}
-/* Added variable to remember started children
- * 0 - start
- * 1 - snap
- * 2 - end
-*/
-#define CHLD_START 0
-#define CHLD_SNAP 1
-#define CHLD_END 2
-int nmon_children[3] = {-1,-1,-1};
-
-void init_pairs()
-{
- COLOUR init_pair((short)0,(short)7,(short)0); /* White */
- COLOUR init_pair((short)1,(short)1,(short)0); /* Red */
- COLOUR init_pair((short)2,(short)2,(short)0); /* Green */
- COLOUR init_pair((short)3,(short)3,(short)0); /* Yellow */
- COLOUR init_pair((short)4,(short)4,(short)0); /* Blue */
- COLOUR init_pair((short)5,(short)5,(short)0); /* Magenta */
- COLOUR init_pair((short)6,(short)6,(short)0); /* Cyan */
- COLOUR init_pair((short)7,(short)7,(short)0); /* White */
- COLOUR init_pair((short)8,(short)0,(short)1); /* Red background, red text */
- COLOUR init_pair((short)9,(short)0,(short)2); /* Green background, green text */
- COLOUR init_pair((short)10,(short)0,(short)4); /* Blue background, blue text */
- COLOUR init_pair((short)11,(short)0,(short)3); /* Yellow background, yellow text */
- COLOUR init_pair((short)12,(short)0,(short)6); /* Cyan background, cyan text */
-}
-
-/* Signal handler
- * SIGUSR1 or 2 is used to stop nmon cleanly
- * SIGWINCH is used when the window size is changed
- */
-void interrupt(int signum)
-{
-int child_pid;
-int waitstatus;
- if (signum == SIGCHLD ) {
- while((child_pid = waitpid(0, &waitstatus, 0)) == -1 ) {
- if( errno == EINTR) /* retry */
- continue;
- return; /* ECHLD, EFAULT */
- }
- if(child_pid == nmon_children[CHLD_SNAP])
- nmon_children[CHLD_SNAP] = -1;
- signal(SIGCHLD, interrupt);
- return;
- }
- if (signum == SIGUSR1 || signum == SIGUSR2) {
- maxloops = loop;
- return;
- }
- if (signum == SIGWINCH) {
- CURSE endwin(); /* stop + start curses so it works out the # of row and cols */
- CURSE initscr();
- CURSE cbreak();
- signal(SIGWINCH, interrupt);
- COLOUR colour = has_colors();
- COLOUR start_color();
- COLOUR init_pairs();
- CURSE clear();
- return;
- }
- CURSE endwin();
- exit(0);
-}
-
-
-/* only place the q=previous and p=currect pointers are modified */
-void switcher(void)
-{
- static int which = 1;
-
- if (which) {
- p = &database[0];
- q = &database[1];
- which = 0;
- } else {
- p = &database[1];
- q = &database[0];
- which = 1;
- }
- if(flash_on)
- flash_on = 0;
- else
- flash_on = 1;
-}
-
-
-/* Lookup the right string */
-char *status(int n)
-{
- switch (n) {
- case 0:
- return "Run ";
- default:
- return "Sleep";
- }
-}
-
-/* Lookup the right process state string */
-char *get_state( char n)
-{
- static char duff[64];
- switch (n) {
- case 'R': return "Running ";
- case 'S': return "Sleeping ";
- case 'D': return "DiskSleep";
- case 'Z': return "Zombie ";
- case 'T': return "Traced ";
- case 'W': return "Paging ";
- default:
- sprintf(duff, "%d", n);
- return duff;
- }
-}
-
-#ifdef GETUSER
-/* Convert User id (UID) to a name with caching for speed
- * getpwuid() should be NFS/yellow pages safe
- */
-char *getuser(uid_t uid)
-{
-#define NAMESIZE 16
- struct user_info {
- uid_t uid;
- char name[NAMESIZE];
- };
- static struct user_info *u = NULL;
- static int used = 0;
- int i;
- struct passwd *pw;
-
- i = 0;
- if (u != NULL) {
- for (i = 0; i < used; i++) {
- if (u[i].uid == uid) {
- return u[i].name;
- }
- }
- u = (struct user_info *)realloc(u, (sizeof(struct user_info ) * (i + 1)));
- } else
- u = (struct user_info *)malloc(sizeof(struct user_info ));
- used++;
-
- /* failed to find a match so add it */
- u[i].uid = uid;
- pw = getpwuid(uid);
-
- if (pw != NULL)
- strncpy(u[i].name, pw->pw_name, NAMESIZE);
- else
- sprintf(u[i].name, "unknown%d",uid);
- return u[i].name;
-}
-#endif /* GETUSER */
-
-/* User Defined Disk Groups */
-
-char *save_word(char *in, char *out)
-{
- int len;
- int i;
- len = strlen(in);
- out[0] = 0;
- for (i = 0; i < len; i++) {
- if ( isalnum(in[i]) || in[i] == '_' || in[i] == '-' || in[i] == '/' ) {
- out[i] = in[i];
- out[i+1] = 0;
- } else
- break;
- }
- for (; i < len; i++)
- if (isalnum(in[i]))
- return &in[i];
- return &in[i];
-}
-
-#define DGROUPS 64
-#define DGROUPITEMS 512
-
-char *dgroup_filename;
-char *dgroup_name[DGROUPS];
-int *dgroup_data;
-int dgroup_disks[DGROUPS];
-int dgroup_total_disks;
-int dgroup_total_groups;
-
-void load_dgroup(struct dsk_stat *dk)
-{
- FILE * gp;
- char line[4096];
- char name[1024];
- int i, j;
- char *nextp;
-
- if (dgroup_loaded == 2)
- return;
- dgroup_data = MALLOC(sizeof(int)*DGROUPS * DGROUPITEMS);
- for (i = 0; i < DGROUPS; i++)
- for (j = 0; j < DGROUPITEMS; j++)
- dgroup_data[i*DGROUPITEMS+j] = -1;
-
- gp = fopen(dgroup_filename, "r");
-
- if (gp == NULL) {
- perror("opening disk group file");
- fprintf(stderr,"ERROR: failed to open %s\n", dgroup_filename);
- exit(9);
- }
-
- for (dgroup_total_groups = 0;
- fgets(line, 4096-1, gp) != NULL && dgroup_total_groups < DGROUPS;
- dgroup_total_groups++) {
- /* save the name */
- nextp = save_word(line, name);
- if(strlen(name) == 0) { /* was a blank line */
- fprintf(stderr,"ERROR nmon:ignoring odd line in diskgroup file \"%s\"\n",line);
- /* Decrement dgroup_total_groups by 1 to correct index for next loop */
- --dgroup_total_groups;
- continue;
- }
- /* Added +1 to be able to correctly store the terminating \0 character */
- dgroup_name[dgroup_total_groups] = MALLOC(strlen(name)+1);
- strcpy(dgroup_name[dgroup_total_groups], name);
-
- /* save the hdisks */
- for (i = 0; i < DGROUPITEMS && *nextp != 0; i++) {
- nextp = save_word(nextp, name);
- for (j = 0; j < disks; j++) {
- if ( (strlen(dk[j].dk_name) == strlen(name)) && !strcmp(dk[j].dk_name, name) ) {
- /*DEBUG printf("DGadd group=%s,name=%s,disk=%s,dgroup_total_groups=%d,dgroup_total_disks=%d,j=%d,i=%d,index=%d.\n",
- dgroup_name[dgroup_total_groups],
- name, dk[j].dk_name, dgroup_total_groups, dgroup_total_disks, j, i,dgroup_total_groups*DGROUPITEMS+i);
- */
- dgroup_data[dgroup_total_groups*DGROUPITEMS+i] = j;
- dgroup_disks[dgroup_total_groups]++;
- dgroup_total_disks++;
- break;
- }
- }
- if (j == disks)
- fprintf(stderr,"ERROR nmon:diskgroup file - failed to find disk=%s for group=%s disks know=%d\n",
- name, dgroup_name[dgroup_total_groups],disks);
- }
- }
- fclose(gp);
- dgroup_loaded = 2;
-}
-
-
-void list_dgroup(struct dsk_stat *dk)
-{
- int i, j, k, n;
- int first = 1;
-
- /* DEBUG for (n = 0, i = 0; i < dgroup_total_groups; i++) {
- fprintf(fp, "CCCG,%03d,%s", n++, dgroup_name[i]);
- for (j = 0; j < dgroup_disks[i]; j++) {
- if (dgroup_data[i*DGROUPITEMS+j] != -1) {
- fprintf(fp, ",%d=%d", j, dgroup_data[i*DGROUPITEMS+j]);
- }
- }
- fprintf(fp, "\n");
- }
- */
- for (n = 0, i = 0; i < dgroup_total_groups; i++) {
- if (first) {
- fprintf(fp, "BBBG,%03d,User Defined Disk Groups Name,Disks\n", n++);
- first = 0;
- }
- fprintf(fp, "BBBG,%03d,%s", n++, dgroup_name[i]);
- for (k = 0, j = 0; j < dgroup_disks[i]; j++) {
- if (dgroup_data[i*DGROUPITEMS+j] != -1) {
- fprintf(fp, ",%s", dk[dgroup_data[i*DGROUPITEMS+j]].dk_name);
- k++;
- }
- /* add extra line if we have lots to stop spreadsheet line width problems */
- if (k == 128) {
- fprintf(fp, "\nBBBG,%03d,%s continued", n++, dgroup_name[i]);
- }
- }
- fprintf(fp, "\n");
- }
- fprintf(fp, "DGBUSY,Disk Group Busy %s", hostname);
- for (i = 0; i < DGROUPS; i++) {
- if (dgroup_name[i] != 0)
- fprintf(fp, ",%s", dgroup_name[i]);
- }
- fprintf(fp, "\n");
- fprintf(fp, "DGREAD,Disk Group Read KB/s %s", hostname);
- for (i = 0; i < DGROUPS; i++) {
- if (dgroup_name[i] != 0)
- fprintf(fp, ",%s", dgroup_name[i]);
- }
- fprintf(fp, "\n");
- fprintf(fp, "DGWRITE,Disk Group Write KB/s %s", hostname);
- for (i = 0; i < DGROUPS; i++) {
- if (dgroup_name[i] != 0)
- fprintf(fp, ",%s", dgroup_name[i]);
- }
- fprintf(fp, "\n");
- fprintf(fp, "DGSIZE,Disk Group Block Size KB %s", hostname);
- for (i = 0; i < DGROUPS; i++) {
- if (dgroup_name[i] != 0)
- fprintf(fp, ",%s", dgroup_name[i]);
- }
- fprintf(fp, "\n");
- fprintf(fp, "DGXFER,Disk Group Transfers/s %s", hostname);
- for (i = 0; i < DGROUPS; i++) {
- if (dgroup_name[i] != 0)
- fprintf(fp, ",%s", dgroup_name[i]);
- }
- fprintf(fp, "\n");
-}
-
-
-
-void hint(void)
-{
- printf("\nHint: %s [-h] [-s <seconds>] [-c <count>] [-f -d <disks> -t -r <name>] [-x]\n\n", progname);
- printf("\t-h FULL help information\n");
- printf("\tInteractive-Mode:\n");
- printf("\tread startup banner and type: \"h\" once it is running\n");
- printf("\tFor Data-Collect-Mode (-f)\n");
- printf("\t-f spreadsheet output format [note: default -s300 -c288]\n");
- printf("\toptional\n");
- printf("\t-s <seconds> between refreshing the screen [default 2]\n");
- printf("\t-c <number> of refreshes [default millions]\n");
- printf("\t-d <disks> to increase the number of disks [default 256]\n");
- printf("\t-t spreadsheet includes top processes\n");
- printf("\t-x capacity planning (15 min for 1 day = -fdt -s 900 -c 96)\n");
- printf("\n");
-}
-
-void help(void)
-{
- hint();
- printf("Version - %s\n\n",SccsId);
- printf("For Interactive-Mode\n");
- printf("\t-s <seconds> time between refreshing the screen [default 2]\n");
- printf("\t-c <number> of refreshes [default millions]\n");
- printf("\t-g <filename> User Defined Disk Groups [hit g to show them]\n");
- printf("\t - file = on each line: group_name <disks list> space separated\n");
- printf("\t - like: database sdb sdc sdd sde\n");
- printf("\t - upto 64 disk groups, 512 disks per line\n");
- printf("\t - disks can appear more than once and in many groups\n");
- printf("\t-b black and white [default is colour]\n");
- printf("\texample: %s -s 1 -c 100\n",progname);
- printf("\n");
- printf("For Data-Collect-Mode = spreadsheet format (comma separated values)\n");
- printf("\tNote: use only one of f,F,z,x or X and make it the first argument\n");
- printf("\t-f spreadsheet output format [note: default -s300 -c288]\n");
- printf("\t\t\t output file is <hostname>_YYYYMMDD_HHMM.nmon\n");
- printf("\t-F <filename> same as -f but user supplied filename\n");
- printf("\t-r <runname> used in the spreadsheet file [default hostname]\n");
- printf("\t-t include top processes in the output\n");
- printf("\t-T as -t plus saves command line arguments in UARG section\n");
- printf("\t-s <seconds> between snap shots\n");
- printf("\t-c <number> of snapshots before nmon stops\n");
- printf("\t-d <disks> to increase the number of disks [default 256]\n");
- printf("\t-l <dpl> disks/line default 150 to avoid spreadsheet issues. EMC=64.\n");
- printf("\t-g <filename> User Defined Disk Groups (see above) - see BBBG & DG lines\n");
-
- printf("\t-N include NFS Network File System\n");
- printf("\t-I <percent> Include process & disks busy threshold (default 0.1)\n");
- printf("\t don't save or show proc/disk using less than this percent\n");
- printf("\t-m <directory> nmon changes to this directory before saving to file\n");
- printf("\texample: collect for 1 hour at 30 second intervals with top procs\n");
- printf("\t\t %s -f -t -r Test1 -s30 -c120\n",progname);
- printf("\n");
- printf("\tTo load into a spreadsheet:\n");
- printf("\tsort -A *nmon >stats.csv\n");
- printf("\ttransfer the stats.csv file to your PC\n");
- printf("\tStart spreadsheet & then Open type=comma-separated-value ASCII file\n");
- printf("\t The nmon analyser or consolidator does not need the file sorted.\n");
- printf("\n");
- printf("Capacity planning mode - use cron to run each day\n");
- printf("\t-x sensible spreadsheet output for CP = one day\n");
- printf("\t every 15 mins for 1 day ( i.e. -ft -s 900 -c 96)\n");
- printf("\t-X sensible spreadsheet output for CP = busy hour\n");
- printf("\t every 30 secs for 1 hour ( i.e. -ft -s 30 -c 120)\n");
- printf("\n");
-
- printf("Interactive Mode Commands\n");
- printf("\tkey --- Toggles to control what is displayed ---\n");
- printf("\th = Online help information\n");
- printf("\tr = Machine type, machine name, cache details and OS version + LPAR\n");
- printf("\tc = CPU by processor stats with bar graphs\n");
- printf("\tl = long term CPU (over 75 snapshots) with bar graphs\n");
- printf("\tm = Memory stats\n");
- printf("\tL = Huge memory page stats\n");
- printf("\tV = Virtual Memory and Swap stats\n");
- printf("\tk = Kernel Internal stats\n");
- printf("\tn = Network stats and errors\n");
- printf("\tN = NFS Network File System\n");
- printf("\td = Disk I/O Graphs\n");
- printf("\tD = Disk I/O Stats\n");
- printf("\to = Disk I/O Map (one character per disk showing how busy it is)\n");
- printf("\to = User Defined Disk Groups\n");
- printf("\tj = File Systems \n");
- printf("\tt = Top Process stats use 1,3,4,5 to select the data & order\n");
- printf("\tu = Top Process full command details\n");
- printf("\tv = Verbose mode - tries to make recommendations\n");
-#ifdef PARTITIONS
- printf("\tP = Partitions Disk I/O Stats\n");
-#endif
-#ifdef POWER
- printf("\tp = Logical Partitions Stats\n");
-#endif
- printf("\tb = black and white mode (or use -b option)\n");
- printf("\t. = minimum mode i.e. only busy disks and processes\n");
- printf("\n");
- printf("\tkey --- Other Controls ---\n");
- printf("\t+ = double the screen refresh time\n");
- printf("\t- = halves the screen refresh time\n");
- printf("\tq = quit (also x, e or control-C)\n");
- printf("\t0 = reset peak counts to zero (peak = \">\")\n");
- printf("\tspace = refresh screen now\n");
- printf("\n");
- printf("Startup Control\n");
- printf("\tIf you find you always type the same toggles every time you start\n");
- printf("\tthen place them in the NMON shell variable. For example:\n");
- printf("\t export NMON=cmdrvtan\n");
-
- printf("\n");
- printf("Others:\n");
- printf("\ta) To you want to stop nmon - kill -USR2 <nmon-pid>\n");
- printf("\tb) Use -p and nmon outputs the background process pid\n");
- printf("\tc) To limit the processes nmon lists (online and to a file)\n");
- printf("\t Either set NMONCMD0 to NMONCMD63 to the program names\n");
- printf("\t or use -C cmd:cmd:cmd etc. example: -C ksh:vi:syncd\n");
- printf("\td) If you want to pipe nmon output to other commands use a FIFO:\n");
- printf("\t mkfifo /tmp/mypipe\n");
- printf("\t nmon -F /tmp/mypipe &\n");
- printf("\t grep /tmp/mypipe\n");
- printf("\te) If nmon fails please report it with:\n");
- printf("\t 1) nmon version like: %s\n",VERSION);
- printf("\t 2) the output of cat /proc/cpuinfo\n");
- printf("\t 3) some clue of what you were doing\n");
- printf("\t 4) I may ask you to run the debug version\n");
- printf("\n");
- printf("\tDeveloper Nigel Griffiths\n");
- printf("\tFeedback welcome - on the current release only and state exactly the problem\n");
- printf("\tNo warranty given or implied.\n");
- exit(0);
-}
-
-#define JFSMAX 128
-#define LOAD 1
-#define UNLOAD 0
-#define JFSNAMELEN 64
-#define JFSTYPELEN 8
-
-struct jfs {
- char name[JFSNAMELEN];
- char device[JFSNAMELEN];
- char type[JFSNAMELEN];
- int fd;
- int mounted;
- } jfs[JFSMAX];
-
-int jfses =0;
-void jfs_load(int load)
-{
-int i;
-struct stat stat_buffer;
-FILE * mfp; /* FILE pointer for mtab file*/
-struct mntent *mp; /* mnt point stats */
-static int jfs_loaded = 0;
-
- if(load==LOAD) {
- if(jfs_loaded == 0) {
- mfp = setmntent("/etc/mtab","r");
- for(i=0; i<JFSMAX && (mp = getmntent(mfp) ) != NULL; i++) {
- strncpy(jfs[i].device, mp->mnt_fsname,JFSNAMELEN);
- strncpy(jfs[i].name,mp->mnt_dir,JFSNAMELEN);
- strncpy(jfs[i].type, mp->mnt_type,JFSTYPELEN);
- mp->mnt_fsname[JFSNAMELEN-1]=0;
- mp->mnt_dir[JFSNAMELEN-1]=0;
- mp->mnt_type[JFSTYPELEN-1]=0;
- }
- endfsent();
- jfs_loaded = 1;
- jfses=i;
- }
-
- /* 1st or later time - just reopen the mount points */
- for(i=0;i<JFSMAX && jfs[i].name[0] !=0;i++) {
- if(stat(jfs[i].name, &stat_buffer) != -1 ) {
-
- jfs[i].fd = open(jfs[i].name, O_RDONLY);
- if(jfs[i].fd != -1 )
- jfs[i].mounted = 1;
- else
- jfs[i].mounted = 0;
- }
- else jfs[i].mounted = 0;
- }
- } else { /* this is an unload request */
- if(jfs_loaded)
- for(i=0;i<JFSMAX && jfs[i].name[0] != 0;i++) {
- if(jfs[i].mounted)
- close(jfs[i].fd);
- jfs[i].fd=0;
- }
- else
- /* do nothing */ ;
- }
-}
-
-/* We order this array rather than the actual process tables
- * the index is the position in the process table and
- * the time is the CPU used in the last period in seconds
- */
-struct topper {
- int index;
- int other;
- double size;
- double io;
- int time;
-} *topper;
-int topper_size = 200;
-
-/* Routine used by qsort to order the processes by CPU usage */
-int cpu_compare(const void *a, const void *b)
-{
- return (int)(((struct topper *)b)->time - ((struct topper *)a)->time);
-}
-
-int size_compare(const void *a, const void *b)
-{
- return (int)((((struct topper *)b)->size - ((struct topper *)a)->size));
-}
-
-int disk_compare(void *a, void *b)
-{
- return (int)((((struct topper *)b)->io - ((struct topper *)a)->io));
-}
-
-
-/* checkinput is the subroutine to handle user input */
-int checkinput(void)
-{
- static int use_env = 1;
- char buf[1024];
- int bytes;
- int chars;
- int i;
- char *p;
-
- if (!cursed) /* not user input so stop with control-C */
- return 0;
- ioctl(fileno(stdin), FIONREAD, &bytes);
-
- if (bytes > 0 || use_env) {
- if(use_env) {
- use_env = 0;
- p=getenv("NMON");
- if(p!=0){
- strcpy(buf,p);
- chars = strlen(buf);
- }
- else chars = 0;
- }
- else
- chars = read(fileno(stdin), buf, bytes);
- if (chars > 0) {
- welcome = 0;
- for (i = 0; i < chars; i++) {
- switch (buf[i]) {
- case 'x':
- case 'q':
- nocbreak();
- endwin();
- exit(0);
-
- case '6':
- case '7':
- case '8':
- case '9':
- dotline = buf[i] - '0';
- break;
- case '+':
- seconds = seconds * 2;
- break;
- case '-':
- seconds = seconds / 2;
- if (seconds < 1)
- seconds = 1;
- break;
- case '.':
- if (show_all)
- show_all = 0;
- else {
- show_all = 1;
- show_disk = SHOW_DISK_STATS;
- show_top = 1;
- show_topmode =3;
- }
- clear();
- break;
- case '?':
- case 'h':
- case 'H':
- if (show_help)
- show_help = 0;
- else {
- show_help = 1;
- show_verbose = 0;
- }
- clear();
- break;
- case 'b':
- case 'B':
- FLIP(colour);
- clear();
- break;
- case 'Z':
- FLIP(show_raw);
- show_smp=1;
- clear();
- break;
- case 'l':
- FLIP (show_longterm);
- clear();
- break;
- case 'p':
- FLIP(show_lpar);
- clear();
- break;
- case 'V':
- FLIP(show_vm);
- clear();
- break;
- case 'j':
- case 'J':
- FLIP(show_jfs);
- jfs_load(show_jfs);
- clear();
- break;
-#ifdef PARTITIONS
- case 'P':
- FLIP(show_partitions);
- clear();
- break;
-#endif /*PARTITIONS*/
- case 'k':
- case 'K':
- FLIP(show_kernel);
- clear();
- break;
- case 'm':
- case 'M':
- FLIP(show_memory);
- clear();
- break;
- case 'L':
- FLIP(show_large);
- clear();
- break;
- case 'D':
- switch (show_disk) {
- case SHOW_DISK_NONE:
- show_disk = SHOW_DISK_STATS;
- break;
- case SHOW_DISK_STATS:
- show_disk = SHOW_DISK_NONE;
- break;
- case SHOW_DISK_GRAPH:
- show_disk = SHOW_DISK_STATS;
- break;
- }
- clear();
- break;
- case 'd':
- switch (show_disk) {
- case SHOW_DISK_NONE:
- show_disk = SHOW_DISK_GRAPH;
- break;
- case SHOW_DISK_STATS:
- show_disk = SHOW_DISK_GRAPH;
- break;
- case SHOW_DISK_GRAPH:
- show_disk = 0;
- break;
- }
- clear();
- break;
- case 'o':
- case 'O':
- FLIP(show_diskmap);
- clear();
- break;
- case 'n':
- if (show_net) {
- show_net = 0;
- show_neterror = 0;
- } else {
- show_net = 1;
- show_neterror = 3;
- }
- clear();
- break;
- case 'N':
- FLIP(show_nfs);
- clear();
- break;
- case 'c':
- case 'C':
- FLIP(show_smp);
- clear();
- break;
- case 'r':
- case 'R':
- FLIP(show_cpu);
- clear();
- break;
- case 't':
- show_topmode = 3; /* Fall Through */
- case 'T':
- FLIP(show_top);
- clear();
- break;
- case 'v':
- FLIP(show_verbose);
- clear();
- break;
- case 'u':
- if (show_args == ARGS_NONE) {
- args_load();
- show_args = ARGS_ONLY;
- show_top = 1;
- if( show_topmode != 3 &&
- show_topmode != 4 &&
- show_topmode != 5 )
- show_topmode = 3;
- } else
- show_args = ARGS_NONE;
- clear();
- break;
- case '1':
- show_topmode = 1;
- show_top = 1;
- clear();
- break;
-/*
- case '2':
- show_topmode = 2;
- show_top = 1;
- clear();
- break;
-*/
- case '3':
- show_topmode = 3;
- show_top = 1;
- clear();
- break;
- case '4':
- show_topmode = 4;
- show_top = 1;
- clear();
- break;
- case '5':
- show_topmode = 5;
- show_top = 1;
- clear();
- break;
- case '0':
- for(i=0;i<max_cpus+1;i++)
- cpu_peak[i]=0;
- for(i=0;i<networks;i++) {
- net_read_peak[i]=0.0;
- net_write_peak[i]=0.0;
- }
- for(i=0;i<disks;i++) {
- disk_busy_peak[i]=0.0;
- disk_rate_peak[i]=0.0;
- }
- snap_clear();
- aiocount_max = 0;
- aiotime_max = 0.0;
- aiorunning_max = 0;
- huge_peak = 0;
- break;
- case ' ':
- clear();
- break;
- case 'g':
- FLIP(show_dgroup);
- clear();
- break;
-
- default: return 0;
- }
- }
- return 1;
- }
- }
- return 0;
-}
-
-void go_background(int def_loops, int def_secs)
-{
- cursed = 0;
- if (maxloops == -1)
- maxloops = def_loops;
- if (seconds == -1)
- seconds = def_secs;
- show_cpu = 1;
- show_smp = 1;
- show_disk = SHOW_DISK_STATS;
- show_jfs = 1;
- show_memory = 1;
- show_large = 1;
- show_kernel = 1;
- show_net = 1;
- show_all = 1;
- show_top = 0; /* top process */
- show_topmode = 3;
- show_partitions = 1;
- show_lpar = 1;
- show_vm = 1;
-}
-
-void proc_net()
-{
-static FILE *fp = (FILE *)-1;
-char buf[1024];
-int i=0;
-int ret;
-unsigned long junk;
-
- if( fp == (FILE *)-1) {
- if( (fp = fopen("/proc/net/dev","r")) == NULL) {
- error("failed to open - /proc/net/dev");
- networks=0;
- return;
- }
- }
- if(fgets(buf,1024,fp) == NULL) goto end; /* throw away the header lines */
- if(fgets(buf,1024,fp) == NULL) goto end; /* throw away the header lines */
-/*
-Inter-| Receive | Transmit
- face |bytes packets errs drop fifo frame compressed multicast|bytes packets errs drop fifo colls carrier compressed
- lo: 1956 30 0 0 0 0 0 0 1956 30 0 0 0 0 0 0
- eth0: 0 0 0 0 0 0 0 0 458718 0 781 0 0 0 781 0
- sit0: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
- eth1: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
-*/
- for(i=0;i<NETMAX;i++) {
- if(fgets(buf,1024,fp) == NULL)
- break;
- strip_spaces(buf);
- /* 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 */
- ret = sscanf(&buf[0], "%s %llu %llu %lu %lu %lu %lu %lu %lu %llu %llu %lu %lu %lu %lu %lu",
- (char *)&p->ifnets[i].if_name,
- &p->ifnets[i].if_ibytes,
- &p->ifnets[i].if_ipackets,
- &p->ifnets[i].if_ierrs,
- &p->ifnets[i].if_idrop,
- &p->ifnets[i].if_ififo,
- &p->ifnets[i].if_iframe,
- &junk,
- &junk,
- &p->ifnets[i].if_obytes,
- &p->ifnets[i].if_opackets,
- &p->ifnets[i].if_oerrs,
- &p->ifnets[i].if_odrop,
- &p->ifnets[i].if_ofifo,
- &p->ifnets[i].if_ocolls,
- &p->ifnets[i].if_ocarrier
- );
- if(ret != 16)
- fprintf(stderr,"sscanf wanted 16 returned = %d line=%s\n", ret, (char *)buf);
- }
- end:
- if(reread) {
- fclose(fp);
- fp = (FILE *)-1;
- } else rewind(fp);
- networks = i;
-}
-
-
-int proc_procsinfo(int pid, int index)
-{
-FILE *fp;
-char filename[64];
-char buf[1024*4];
-int size=0;
-int ret=0;
-int count=0;
-
- sprintf(filename,"/proc/%d/stat",pid);
- if( (fp = fopen(filename,"r")) == NULL) {
- sprintf(buf,"failed to open file %s",filename);
- error(buf);
- return 0;
- }
- size = fread(buf, 1, 1024-1, fp);
- if(size == -1) {
-#ifdef DEBUG
- fprintf(stderr,"procsinfo read returned = %d assuming process stopped pid=%d\n", ret,pid);
-#endif /*DEBUG*/
- return 0;
- }
- fclose(fp);
- ret = sscanf(buf, "%d (%s)",
- &p->procs[index].pi_pid,
- &p->procs[index].pi_comm[0]);
- if(ret != 2) {
- fprintf(stderr,"procsinfo sscanf returned = %d line=%s\n", ret,buf);
- return 0;
- }
- p->procs[index].pi_comm[strlen(p->procs[index].pi_comm)-1] = 0;
-
- for(count=0; count<size;count++) /* now look for ") " as dumb Infiniban driver includes "()" */
- if(buf[count] == ')' && buf[count+1] == ' ' ) break;
-
- if(count == size) {
-#ifdef DEBUG
- fprintf(stderr,"procsinfo failed to find end of command buf=%s\n", buf);
-#endif /*DEBUG*/
- return 0;
- }
- count++; count++;
-
- ret = sscanf(&buf[count],
-"%c %d %d %d %d %d %lu %lu %lu %lu %lu %lu %lu %ld %ld %ld %ld %ld %ld %lu %lu %ld %lu %lu %lu %lu %lu %lu %lu %lu %lu %lu %lu %lu %lu %d %d",
- &p->procs[index].pi_state,
- &p->procs[index].pi_ppid,
- &p->procs[index].pi_pgrp,
- &p->procs[index].pi_session,
- &p->procs[index].pi_tty_nr,
- &p->procs[index].pi_tty_pgrp,
- &p->procs[index].pi_flags,
- &p->procs[index].pi_minflt,
- &p->procs[index].pi_cmin_flt,
- &p->procs[index].pi_majflt,
- &p->procs[index].pi_cmaj_flt,
- &p->procs[index].pi_utime,
- &p->procs[index].pi_stime,
- &p->procs[index].pi_cutime,
- &p->procs[index].pi_cstime,
- &p->procs[index].pi_pri,
- &p->procs[index].pi_nice,
- &p->procs[index].junk,
- &p->procs[index].pi_it_real_value,
- &p->procs[index].pi_start_time,
- &p->procs[index].pi_vsize,
- &p->procs[index].pi_rss,
- &p->procs[index].pi_rlim_cur,
- &p->procs[index].pi_start_code,
- &p->procs[index].pi_end_code,
- &p->procs[index].pi_start_stack,
- &p->procs[index].pi_esp,
- &p->procs[index].pi_eip,
- &p->procs[index].pi_pending_signal,
- &p->procs[index].pi_blocked_sig,
- &p->procs[index].pi_sigign,
- &p->procs[index].pi_sigcatch,
- &p->procs[index].pi_wchan,
- &p->procs[index].pi_nswap,
- &p->procs[index].pi_cnswap,
- &p->procs[index].pi_exit_signal,
- &p->procs[index].pi_cpu
- );
- if(ret != 37) {
- fprintf(stderr,"procsinfo2 sscanf wanted 37 returned = %d pid=%d line=%s\n", ret,pid,buf);
- return 0;
- }
-
- sprintf(filename,"/proc/%d/statm",pid);
- if( (fp = fopen(filename,"r")) == NULL) {
- sprintf(buf,"failed to open file %s",filename);
- error(buf);
- return 0;
- }
- size = fread(buf, 1, 1024*4-1, fp);
- if(size == -1) {
- sprintf(buf,"failed to read file %s",filename);
- error(buf);
- return 0;
- }
- fclose(fp);
-
- ret = sscanf(&buf[0], "%lu %lu %lu %lu %lu %lu %lu",
- &p->procs[index].statm_size,
- &p->procs[index].statm_resident,
- &p->procs[index].statm_share,
- &p->procs[index].statm_trs,
- &p->procs[index].statm_drs,
- &p->procs[index].statm_lrs,
- &p->procs[index].statm_dt
- );
- if(ret != 7) {
- fprintf(stderr,"sscanf wanted 7 returned = %d line=%s\n", ret,buf);
- return 0;
- }
- return 1;
-}
-#ifdef DEBUGPROC
-print_procs(int index)
-{
-printf("procs[%d].pid =%d\n",index,procs[index].pi_pid);
-printf("procs[%d].comm[0] =%s\n",index,&procs[index].pi_comm[0]);
-printf("procs[%d].state =%c\n",index,procs[index].pi_state);
-printf("procs[%d].ppid =%d\n",index,procs[index].pi_ppid);
-printf("procs[%d].pgrp =%d\n",index,procs[index].pi_pgrp);
-printf("procs[%d].session =%d\n",index,procs[index].pi_session);
-printf("procs[%d].tty_nr =%d\n",index,procs[index].pi_tty_nr);
-printf("procs[%d].tty_pgrp =%d\n",index,procs[index].pi_tty_pgrp);
-printf("procs[%d].flags =%lu\n",index,procs[index].pi_flags);
-printf("procs[%d].minflt =%lu\n",index,procs[index].pi_minflt);
-printf("procs[%d].cmin_flt =%lu\n",index,procs[index].pi_cmin_flt);
-printf("procs[%d].majflt =%lu\n",index,procs[index].pi_majflt);
-printf("procs[%d].cmaj_flt =%lu\n",index,procs[index].pi_cmaj_flt);
-printf("procs[%d].utime =%lu\n",index,procs[index].pi_utime);
-printf("procs[%d].stime =%lu\n",index,procs[index].pi_stime);
-printf("procs[%d].cutime =%ld\n",index,procs[index].pi_cutime);
-printf("procs[%d].cstime =%ld\n",index,procs[index].pi_cstime);
-printf("procs[%d].pri =%d\n",index,procs[index].pi_pri);
-printf("procs[%d].nice =%d\n",index,procs[index].pi_nice);
-printf("procs[%d].junk =%d\n",index,procs[index].junk);
-printf("procs[%d].it_real_value =%lu\n",index,procs[index].pi_it_real_value);
-printf("procs[%d].start_time =%lu\n",index,procs[index].pi_start_time);
-printf("procs[%d].vsize =%lu\n",index,procs[index].pi_vsize);
-printf("procs[%d].rss =%lu\n",index,procs[index].pi_rss);
-printf("procs[%d].rlim_cur =%lu\n",index,procs[index].pi_rlim_cur);
-printf("procs[%d].start_code =%lu\n",index,procs[index].pi_start_code);
-printf("procs[%d].end_code =%lu\n",index,procs[index].pi_end_code);
-printf("procs[%d].start_stack =%lu\n",index,procs[index].pi_start_stack);
-printf("procs[%d].esp =%lu\n",index,procs[index].pi_esp);
-printf("procs[%d].eip =%lu\n",index,procs[index].pi_eip);
-printf("procs[%d].pending_signal=%lu\n",index,procs[index].pi_pending_signal);
-printf("procs[%d].blocked_sig =%lu\n",index,procs[index].pi_blocked_sig);
-printf("procs[%d].sigign =%lu\n",index,procs[index].pi_sigign);
-printf("procs[%d].sigcatch =%lu\n",index,procs[index].pi_sigcatch);
-printf("procs[%d].wchan =%lu\n",index,procs[index].pi_wchan);
-printf("procs[%d].nswap =%lu\n",index,procs[index].pi_nswap);
-printf("procs[%d].cnswap =%lu\n",index,procs[index].pi_cnswap);
-printf("procs[%d].exit_signal =%d\n",index,procs[index].pi_exit_signal);
-printf("procs[%d].cpu =%d\n",index,procs[index].pi_cpu);
-printf("OK\n");
-}
-#endif /*DEBUG*/
-/* --- */
-
-int isnumbers(char *s)
-{
- while(*s != 0) {
- if( *s < '0' || *s > '9')
- return 0;
- s++;
- }
- return 1;
-}
-
-int getprocs(int details)
-{
-struct dirent *dent;
-DIR *procdir;
-int count =0;
-
- if((char *)(procdir = opendir("/proc")) == NULL) {
- printf("opendir(/proc) failed");
- return 0;
- }
- while( (char *)(dent = readdir(procdir)) != NULL ) {
- if(dent->d_type == 4) { /* is this a directlory */
-/* mainframes report 0 = unknown every time !!!! */
-/*
- printf("inode=%d type=%d name=%s\n",
- dent->d_ino,
- dent->d_type,
- dent->d_name);
-*/
- if(isnumbers(dent->d_name)) {
-/* printf("%s pid\n",dent->d_name); */
- if(details) {
- count=count+proc_procsinfo(atoi(dent->d_name),count);
- } else {
- count++;
- }
- }
-/*
- else
- printf("NOT numbers\n");
-*/
- }
- }
- closedir(procdir);
- return count;
-}
-/* --- */
-
-char cpu_line[] = "+-------------------------------------------------+";
-/* Start process as specified in cmd in a child process without waiting
- * for completion
- * not sure if want to prevent this funcitonality for root user
- * when: CHLD_START, CHLD_SNAP or CHLD_END
- * cmd: pointer to command string - assumed to be cleansed ....
- * timestamp_type: 0 - T%04d, 1 - detailed time stamp
- * loop: loop id (0 for CHLD_START)
- * the_time: time to use for timestamp generation
- */
-void child_start(int when,
- char *cmd,
- int timestamp_type,
- int loop,
- time_t the_time)
-{
- int i;
- pid_t child_pid;
- char time_stamp_str[20]="";
- char *when_info="";
- struct tm *tim; /* used to work out the hour/min/second */
-
-#ifdef DEBUG2
-fprintf(fp,"child start when=%d cmd=%s time=%d loop=%d\n",when,cmd,timestamp_type,loop);
-#endif
- /* Validate parameter and initialize error text */
- switch( when ) {
- case CHLD_START:
- when_info = "nmon fork exec failure CHLD_START";
- break;
- case CHLD_END:
- when_info = "nmon fork exec failure CHLD_END";
- break;
-
- case CHLD_SNAP:
- /* check if old child has finished - otherwise we do nothing */
- if( nmon_children[CHLD_SNAP] != -1 ) {
- if(!cursed)fprintf(fp,"ERROR,T%04d, Starting snap command \"%s\" failed as previous child still running - killing it now\n", loop, cmd);
- kill( nmon_children[CHLD_SNAP],9);
- }
-
- when_info = "nmon fork exec failure CHLD_SNAP";
- break;
- }
-
-
- /* now fork off a child process. */
- switch (child_pid = fork()) {
- case -1: /* fork failed. */
- perror(when_info);
- return;
-
- case 0: /* inside child process. */
- /* create requested timestamp */
- if( timestamp_type == 1 ) {
- tim = localtime(&the_time);
- sprintf(time_stamp_str,"%02d:%02d:%02d,%02d,%02d,%04d",
- tim->tm_hour, tim->tm_min, tim->tm_sec,
- tim->tm_mday, tim->tm_mon + 1, tim->tm_year + 1900);
- }
- else {
- sprintf(time_stamp_str,"T%04d", loop);
- }
-
- /* close all open file pointers except the defaults */
- for( i=3; i<5; ++i )
- close(i);
-
- /* Now switch to the defined command */
- execlp(cmd, cmd, time_stamp_str,(void *)0);
-
- /* If we get here the specified command could not be started */
- perror(when_info);
- exit(1); /* We can't do anything more */
- /* never reached */
-
- default: /* inside parent process. */
- /* In father - remember child pid for future */
- nmon_children[when] = child_pid;
- }
-}
-
-int main(int argc, char **argv)
-{
- int secs;
- char mapch;
- int old_cpus;
- int cpu_idle;
- int cpu_user;
- int cpu_sys;
- int cpu_wait;
- int n=0; /* reusable counters */
- int i=0;
- int j=0;
- int k=0;
- int ret=0;
- int max_sorted;
- int skipped;
- int x = 0; /* curses row */
- int y = 0; /* curses column */
- double elapsed; /* actual seconds between screen updates */
- double cpu_sum;
- double cpu_busy;
- double ftmp;
- int top_first_time =1;
- int disk_first_time =1;
- int nfs_first_time =1;
- int vm_first_time =1;
-#ifdef POWER
- int lpar_first_time =1;
-#endif /* POWER */
- int smp_first_time =1;
- int proc_first_time =1;
- pid_t firstproc = (pid_t)0;
- pid_t childpid = -1;
- int ralfmode = 0;
- char pgrp[32];
- struct tm *tim; /* used to work out the hour/min/second */
- float total_busy; /* general totals */
- float total_rbytes; /* general totals */
- float total_wbytes;
- float total_xfers;
- struct utsname uts; /* UNIX name, version, etc */
- double top_disk_busy = 0.0;
- char *top_disk_name = "";
- int disk_mb;
- double disk_total;
- double disk_busy;
- double disk_read;
- double disk_size;
- double disk_write;
- double disk_xfers;
- double total_disk_read;
- double total_disk_write;
- double total_disk_xfers;
- double readers;
- double writers;
-
- /* for popen on oslevel */
- char str[512];
- char * str_p;
- int varperftmp = 0;
- char *formatstring;
- char user_filename[512];
- char user_filename_set = 0;
- struct statfs statfs_buffer;
- float fs_size;
- float fs_free;
- float fs_size_used;
- char cmdstr[256];
- int disk_stats_read = 0;
- int updays, uphours, upmins;
- float v2c_total;
- float v2s_total;
- float v3c_total;
- float v3s_total;
- int room =1;
- int errors=0;
- WINDOW * padmem = NULL;
- WINDOW * padlarge = NULL;
- WINDOW * padpage = NULL;
- WINDOW * padker = NULL;
- WINDOW * padres = NULL;
- WINDOW * padnet = NULL;
- WINDOW * padneterr = NULL;
- WINDOW * padnfs = NULL;
- WINDOW * padcpu = NULL;
- WINDOW * padsmp = NULL;
- WINDOW * padlong = NULL;
- WINDOW * paddisk = NULL;
- WINDOW * paddg = NULL;
- WINDOW * padmap = NULL;
- WINDOW * padtop = NULL;
- WINDOW * padjfs = NULL;
- WINDOW * padlpar = NULL;
- WINDOW * padverb = NULL;
- WINDOW * padhelp = NULL;
-
- char *nmon_start = (char *)NULL;
- char *nmon_end = (char *)NULL;
- char *nmon_snap = (char *)NULL;
- char *nmon_tmp = (char *)NULL;
- int nmon_one_in = 1;
- /* Flag what kind of time stamp we give to started children
- * 0: "T%04d"
- * 1: "hh:mm:ss,dd,mm,yyyy"
- */
- int time_stamp_type =0;
-
-
-#define MAXROWS 256
-#define MAXCOLS 150 /* changed to allow maximum column widths */
-#define BANNER(pad,string) {mvwhline(pad, 0, 0, ACS_HLINE,COLS-2); \
- wmove(pad,0,0); \
- wattron(pad,A_STANDOUT); \
- wprintw(pad," "); \
- wprintw(pad,string); \
- wprintw(pad," "); \
- wattroff(pad,A_STANDOUT); }
-
-#define DISPLAY(pad,rows) { \
- if(x+2+(rows)>LINES)\
- pnoutrefresh(pad, 0,0,x,1,LINES-2,COLS-2); \
- else \
- pnoutrefresh(pad, 0,0,x,1,x+rows+1,COLS-2); \
- x=x+(rows); \
- if(x+4>LINES) { \
- room=0; \
- mvwprintw(stdscr,LINES-1,10,"Warning: Some Statistics may not shown"); \
- } \
- }
-
- /* check the user supplied options */
- progname = argv[0];
- for (i=(int)strlen(progname)-1;i>0;i--)
- if(progname[i] == '/') {
- progname = &progname[i+1];
- }
-
- if(getenv("NMONDEBUG") != NULL)
- debug=1;
- if(getenv("NMONERROR") != NULL)
- error_on=1;
- if(getenv("NMONBUG1") != NULL)
- reread=1;
- if (getenv("NMONDEBUG") != NULL)
- debug = 1;
-
- if ((nmon_start = getenv("NMON_START")) != NULL) {
- nmon_start = check_call_string(nmon_start, "NMON_START");
- }
-
- if ((nmon_end = getenv("NMON_END")) != NULL) {
- nmon_end = check_call_string(nmon_end, "NMON_END");
- }
-
- if ((nmon_tmp = getenv("NMON_ONE_IN")) != NULL) {
- nmon_one_in = atoi(nmon_tmp);
- if( errno != 0 ) {
- fprintf(stderr,"ERROR nmon: invalid NMON_ONE_IN shell variable\n");
- nmon_one_in = 1;
- }
- }
-
- if ((nmon_snap = getenv("NMON_SNAP")) != NULL) {
- nmon_snap = check_call_string(nmon_snap, "NMON_SNAP");
- }
-
- if ((nmon_tmp = getenv("NMON_TIMESTAMP")) != NULL) {
- time_stamp_type = atoi(nmon_tmp);
- if (time_stamp_type != 0 && time_stamp_type != 1 )
- time_stamp_type = 1;
- }
-#ifdef DEBUG2
-printf("NMON_START=%s.\n",nmon_start);
-printf("NMON_END=%s.\n",nmon_end);
-printf("NMON_SNAP=%s.\n",nmon_snap);
-printf("ONE_IN=%d.\n",nmon_one_in);
-printf("TIMESTAMP=%d.\n",time_stamp_type);
-#endif
-
-#ifdef REREAD
- reread=1;
-#endif
- for(i=0; i<CMDMAX;i++) {
- sprintf(cmdstr,"NMONCMD%d",i);
- cmdlist[i] = getenv(cmdstr);
- if(cmdlist[i] != 0)
- cmdfound = i+1;
- }
- /* Setup long and short Hostname */
- gethostname(hostname, sizeof(hostname));
- strcpy(fullhostname, hostname);
- for (i = 0; i < sizeof(hostname); i++)
- if (hostname[i] == '.')
- hostname[i] = 0;
- if(run_name_set == 0)
- strcpy(run_name,hostname);
-
- /* Check the version of OS */
- uname(&uts);
-
- proc_init();
-
- while ( -1 != (i = getopt(argc, argv, "?Rhs:bc:d:fF:r:tTxXzeEl:qpC:Vg:Nm:I:Z" ))) {
- switch (i) {
- case '?':
- hint();
- exit(0);
- case 'h':
- help();
- break;
- case 's':
- seconds = atoi(optarg);
- break;
- case 'p':
- ralfmode = 1;
- break;
- case 'b':
- colour = 0;
- break;
- case 'c':
- maxloops = atoi(optarg);
- break;
- case 'N':
- show_nfs = 1;
- break;
- case 'm':
- if(chdir(optarg) == -1) {
- perror("changing directory failed");
- printf("Directory attempted was:%s\n",optarg);
- exit(993);
- }
- break;
- case 'I':
- ignore_procdisk_threshold = atof(optarg);
- break;
- case 'd':
- diskmax = atoi(optarg);
- if(diskmax < DISKMIN) {
- printf("nmon: ignoring -d %d option as the minimum is %d\n", diskmax, DISKMIN);
- diskmax = DISKMIN;
- }
- break;
- case 'R':
- show_rrd = 1;
- go_background(288, 300);
- show_aaa = 0;
- show_para = 0;
- show_headings = 0;
- break;
- case 'r': strcpy(run_name,optarg);
- run_name_set++;
- break;
- case 'F': /* background mode with user supplied filename */
- strcpy(user_filename,optarg);
- user_filename_set++;
- go_background(288, 300);
- break;
-
- case 'f': /* background mode i.e. for spread sheet output */
- go_background(288, 300);
- break;
- case 'T':
- show_args = ARGS_ONLY; /* drop through */
- case 't':
- show_top = 1; /* put top process output in spreadsheet mode */
- show_topmode = 3;
- break;
- case 'z': /* background mode for 1 day output to /var/perf/tmp */
- varperftmp++;
- go_background(4*24, 15*60);
- break;
-
- case 'x': /* background mode for 1 day capacity planning */
- show_top =1;
- show_topmode = 3;
- go_background(4*24, 15*60);
- break;
- case 'X': /* background mode for 1 hour capacity planning */
- show_top =1;
- show_topmode = 3;
- go_background(120, 30);
- break;
- case 'Z':
- show_raw=1;
- break;
- case 'l':
- disks_per_line = atoi(optarg);
- if(disks_per_line < 3 || disks_per_line >250) disks_per_line = 100;
- break;
- case 'C': /* commandlist argument */
- cmdlist[0] = malloc(strlen(optarg)+1); /* create buffer */
- strcpy(cmdlist[0],optarg);
- if(cmdlist[0][0]!= 0)
- cmdfound=1;
- for(i=0,j=1;cmdlist[0][i] != 0;i++) {
- if(cmdlist[0][i] == ':') {
- cmdlist[0][i] = 0;
- cmdlist[j] = &cmdlist[0][i+1];
- j++;
- cmdfound=j;
- if(j >= CMDMAX) break;
- }
- }
- break;
- case 'V': /* nmon version */
- printf("nmon verion %s\n",VERSION);
- exit(0);
- break;
- case 'g': /* disk groups */
- show_dgroup = 1;
- dgroup_loaded = 1;
- dgroup_filename = optarg;
- break;
- }
- }
- /* Set parameters if not set by above */
- if (maxloops == -1)
- maxloops = 9999999;
- if (seconds == -1)
- seconds = 2;
- if (cursed)
- show_dgroup = 0;
-
- /* To get the pointers setup */
- switcher();
-
- /* Initialise the time stamps for the first loop */
- p->time = doubletime();
- q->time = doubletime();
-
- find_release();
-
- proc_read(P_STAT);
- for(i=1;i<proc[P_STAT].lines;i++) {
- if(strncmp("cpu",proc[P_STAT].line[i],3) == 0)
- max_cpus = cpus=i;
- else
- break;
- }
- proc_read(P_STAT);
- proc_cpu();
- proc_read(P_UPTIME);
- proc_read(P_LOADAVG);
- proc_kernel();
- memcpy(&q->cpu_total, &p->cpu_total, sizeof(struct cpu_stat));
-
- p->dk = malloc(sizeof(struct dsk_stat) * diskmax+1);
- q->dk = malloc(sizeof(struct dsk_stat) * diskmax+1);
- disk_busy_peak = malloc(sizeof(double) * diskmax);
- disk_rate_peak = malloc(sizeof(double) * diskmax);
- for(i=0;i<diskmax;i++) {
- disk_busy_peak[i]=0.0;
- disk_rate_peak[i]=0.0;
- }
-
- cpu_peak = malloc(sizeof(double) * 128); /* MAGIC */
- for(i=0;i<(max_cpus+1);i++)
- cpu_peak[i]=0.0;
-
- n = getprocs(0);
- p->procs = malloc(sizeof(struct procsinfo ) * n +8);
- q->procs = malloc(sizeof(struct procsinfo ) * n +8);
- p->nprocs = q->nprocs = n;
-
- /* Initialise the top processes table */
- topper = malloc(sizeof(struct topper ) * topper_size); /* round up */
-
- /* Get Disk Stats. */
- proc_disk(0.0);
- memcpy(q->dk, p->dk, sizeof(struct dsk_stat) * disks);
-
- /* load dgroup - if required */
- if (dgroup_loaded == 1) {
- load_dgroup(p->dk);
- }
-
- /* Get Network Stats. */
- proc_net();
- memcpy(q->ifnets, p->ifnets, sizeof(struct net_stat) * networks);
- for(i=0;i<networks;i++) {
- net_read_peak[i]=0.0;
- net_write_peak[i]=0.0;
- }
-
- /* Set the pointer ready for the next round */
- switcher();
-
- /* Initialise signal handlers so we can tidy up curses on exit */
- signal(SIGUSR1, interrupt);
- signal(SIGUSR2, interrupt);
- signal(SIGINT, interrupt);
- signal(SIGWINCH, interrupt);
- signal(SIGCHLD, interrupt);
-
- /* Start Curses */
- if (cursed) {
- initscr();
- cbreak();
- move(0, 0);
- refresh();
- COLOUR colour = has_colors();
- COLOUR start_color();
- COLOUR init_pairs();
- clear();
- padlpar = newpad(11,MAXCOLS);
- padmap = newpad(24,MAXCOLS);
- padhelp = newpad(24,MAXCOLS);
- padmem = newpad(20,MAXCOLS);
- padlarge = newpad(20,MAXCOLS);
- padpage = newpad(20,MAXCOLS);
- padcpu = newpad(20,MAXCOLS);
- padsmp = newpad(MAXROWS,MAXCOLS);
- padlong = newpad(MAXROWS,MAXCOLS);
- padnet = newpad(MAXROWS,MAXCOLS);
- padneterr = newpad(MAXROWS,MAXCOLS);
- paddisk = newpad(MAXROWS,MAXCOLS);
- paddg = newpad(MAXROWS,MAXCOLS);
- padjfs = newpad(MAXROWS,MAXCOLS);
- padker = newpad(5,MAXCOLS);
- padverb = newpad(8,MAXCOLS);
- padres = newpad(23,MAXCOLS);
- padnfs = newpad(25,MAXCOLS);
- padtop = newpad(MAXROWS,MAXCOLS*2);
-
-
- } else {
- /* Output the header lines for the spread sheet */
- timer = time(0);
- tim = localtime(&timer);
- tim->tm_year += 1900 - 2000; /* read localtime() manual page!! */
- tim->tm_mon += 1; /* because it is 0 to 11 */
- if(varperftmp)
- sprintf( str, "/var/perf/tmp/%s_%02d.nmon", hostname, tim->tm_mday);
- else if(user_filename_set)
- strcpy( str, user_filename);
- else
- sprintf( str, "%s_%02d%02d%02d_%02d%02d.nmon",
- hostname,
- tim->tm_year,
- tim->tm_mon,
- tim->tm_mday,
- tim->tm_hour,
- tim->tm_min);
- if((fp = fopen(str,"w")) ==0 ) {
- perror("nmon: failed to open output file");
- printf("nmon: output filename=%s\n",str);
- exit(42);
- }
- /* disconnect from terminal */
- fflush(NULL);
- if (!debug && (childpid = fork()) != 0) {
- if(ralfmode)
- printf("%d\n",childpid);
- exit(0); /* parent returns OK */
- }
- if(!debug) {
- close(0);
- close(1);
- close(2);
- setpgrp(); /* become process group leader */
- signal(SIGHUP, SIG_IGN); /* ignore hangups */
- }
- /* Do the nmon_start activity early on */
- if (nmon_start) {
- timer = time(0);
- child_start(CHLD_START, nmon_start, time_stamp_type, 1, timer);
- }
-
- if(show_aaa) {
- fprintf(fp,"AAA,progname,%s\n", progname);
- fprintf(fp,"AAA,command,");
- for(i=0;i<argc;i++)
- fprintf(fp,"%s ",argv[i]);
- fprintf(fp,"\n");
- fprintf(fp,"AAA,version,%s\n", VERSION);
- fprintf(fp,"AAA,disks_per_line,%d\n", disks_per_line);
- fprintf(fp,"AAA,max_disks,%d,set by -d option\n", diskmax);
- fprintf(fp,"AAA,disks,%d,\n", disks);
-
- fprintf(fp,"AAA,host,%s\n", hostname);
- fprintf(fp,"AAA,user,%s\n", getenv("USER"));
- fprintf(fp,"AAA,OS,Linux,%s,%s,%s\n",uts.release,uts.version,uts.machine);
- fprintf(fp,"AAA,runname,%s\n", run_name);
- fprintf(fp,"AAA,time,%02d:%02d.%02d\n", tim->tm_hour, tim->tm_min, tim->tm_sec);
- fprintf(fp,"AAA,date,%02d-%3s-%02d\n", tim->tm_mday, month[tim->tm_mon-1], tim->tm_year+2000);
- fprintf(fp,"AAA,interval,%d\n", seconds);
- fprintf(fp,"AAA,snapshots,%d\n", maxloops);
- fprintf(fp,"AAA,cpus,%d,%d\n", cpus,cpus);
- fprintf(fp,"AAA,proc_stat_variables,%d\n", stat8);
-
- fprintf(fp,"AAA,note0, Warning - use the UNIX sort command to order this file before loading into a spreadsheet\n");
- fprintf(fp,"AAA,note1, The First Column is simply to get the output sorted in the right order\n");
- fprintf(fp,"AAA,note2, The T0001-T9999 column is a snapshot number. To work out the actual time; see the ZZZ section at the end\n");
- }
- fflush(NULL);
-
- for (i = 1; i <= cpus; i++)
- fprintf(fp,"CPU%02d,CPU %d %s,User%%,Sys%%,Wait%%,Idle%%\n", i, i, run_name);
- fprintf(fp,"CPU_ALL,CPU Total %s,User%%,Sys%%,Wait%%,Idle%%,Busy,CPUs\n", run_name);
- fprintf(fp,"MEM,Memory MB %s,memtotal,hightotal,lowtotal,swaptotal,memfree,highfree,lowfree,swapfree,memshared,cached,active,bigfree,buffers,swapcached,inactive\n", run_name);
-
-#ifdef POWER
- proc_lparcfg();
- if(lparcfg.cmo_enabled)
- fprintf(fp,"MEMAMS,AMS %s,Poolid,Weight,Hypervisor-Page-in/s,HypervisorTime(seconds),not_available_1,not_available_2,not_available_3,Physical-Memory(MB),Page-Size(KB),Pool-Size(MB),Loan-Request(KB)\n", run_name);
-#endif /* POWER */
-
- fprintf(fp,"PROC,Processes %s,Runnable,Swap-in,pswitch,syscall,read,write,fork,exec,sem,msg\n", run_name);
-/*
- fprintf(fp,"PAGE,Paging %s,faults,pgin,pgout,pgsin,pgsout,reclaims,scans,cycles\n", run_name);
- fprintf(fp,"FILE,File I/O %s,iget,namei,dirblk,readch,writech,ttyrawch,ttycanch,ttyoutch\n", run_name);
-*/
-
-
- fprintf(fp,"NET,Network I/O %s,", run_name);
- for (i = 0; i < networks; i++)
- fprintf(fp,"%-2s-read-KB/s,", (char *)p->ifnets[i].if_name);
- for (i = 0; i < networks; i++)
- fprintf(fp,"%-2s-write-KB/s,", (char *)p->ifnets[i].if_name);
- fprintf(fp,"\n");
- fprintf(fp,"NETPACKET,Network Packets %s,", run_name);
- for (i = 0; i < networks; i++)
- fprintf(fp,"%-2s-read/s,", (char *)p->ifnets[i].if_name);
- for (i = 0; i < networks; i++)
- fprintf(fp,"%-2s-write/s,", (char *)p->ifnets[i].if_name);
- /* iremoved as it is not below in the BUSY line fprintf(fp,"\n"); */
-#ifdef DEBUG
- if(debug)printf("disks=%d x%sx\n",(char *)disks,p->dk[0].dk_name);
-#endif /*DEBUG*/
- for (i = 0; i < disks; i++) {
- if(NEWDISKGROUP(i))
- fprintf(fp,"\nDISKBUSY%s,Disk %%Busy %s", dskgrp(i) ,run_name);
- fprintf(fp,",%s", (char *)p->dk[i].dk_name);
- }
- for (i = 0; i < disks; i++) {
- if(NEWDISKGROUP(i))
- fprintf(fp,"\nDISKREAD%s,Disk Read KB/s %s", dskgrp(i),run_name);
- fprintf(fp,",%s", (char *)p->dk[i].dk_name);
- }
- for (i = 0; i < disks; i++) {
- if(NEWDISKGROUP(i))
- fprintf(fp,"\nDISKWRITE%s,Disk Write KB/s %s", (char *)dskgrp(i),run_name);
- fprintf(fp,",%s", (char *)p->dk[i].dk_name);
- }
- for (i = 0; i < disks; i++) {
- if(NEWDISKGROUP(i))
- fprintf(fp,"\nDISKXFER%s,Disk transfers per second %s", (char *)dskgrp(i),run_name);
- fprintf(fp,",%s", p->dk[i].dk_name);
- }
- for (i = 0; i < disks; i++) {
- if(NEWDISKGROUP(i))
- fprintf(fp,"\nDISKBSIZE%s,Disk Block Size %s", dskgrp(i),run_name);
- fprintf(fp,",%s", (char *)p->dk[i].dk_name);
- }
- fprintf(fp,"\n");
- list_dgroup(p->dk);
- jfs_load(LOAD);
- fprintf(fp,"JFSFILE,JFS Filespace %%Used %s", hostname);
- for (k = 0; k < jfses; k++) {
- if(jfs[k].mounted && strncmp(jfs[k].name,"/proc",5)
- && strncmp(jfs[k].name,"/sys",4)
- && strncmp(jfs[k].name,"/dev/pts",8)
- ) /* /proc gives invalid/insane values */
- fprintf(fp,",%s", jfs[k].name);
- }
- fprintf(fp,"\n");
- jfs_load(UNLOAD);
-#ifdef POWER
- fprintf(fp,"LPAR,Shared CPU LPAR Stats %s,PhysicalCPU,capped,shared_processor_mode,system_potential_processors,system_active_processors,pool_capacity,MinEntCap,partition_entitled_capacity,partition_max_entitled_capacity,MinProcs,partition_active_processors,partition_potential_processors,capacity_weight,unallocated_capacity_weight,BoundThrds,MinMem,unallocated_capacity,pool_idle_time\n",hostname);
-#endif /*POWER*/
- if(show_top){
- fprintf(fp,"TOP,%%CPU Utilisation\n");
- fprintf(fp,"TOP,+PID,Time,%%CPU,%%Usr,%%Sys,Size,ResSet,ResText,ResData,ShdLib,MajorFault,MinorFault,Command\n");
- }
- linux_bbbp("/etc/release", "/bin/cat /etc/*ease 2>/dev/null", WARNING);
- linux_bbbp("lsb_release", "/usr/bin/lsb_release -a 2>/dev/null", WARNING);
- linux_bbbp("fdisk-l", "/sbin/fdisk -l 2>/dev/null", WARNING);
- linux_bbbp("/proc/cpuinfo", "/bin/cat /proc/cpuinfo 2>/dev/null", WARNING);
- linux_bbbp("/proc/meminfo", "/bin/cat /proc/meminfo 2>/dev/null", WARNING);
- linux_bbbp("/proc/stat", "/bin/cat /proc/stat 2>/dev/null", WARNING);
- linux_bbbp("/proc/version", "/bin/cat /proc/version 2>/dev/null", WARNING);
- linux_bbbp("/proc/net/dev", "/bin/cat /proc/net/dev 2>/dev/null", WARNING);
- linux_bbbp("/proc/diskinfo", "/bin/cat /proc/diskinfo 2>/dev/null", WARNING);
- linux_bbbp("/proc/diskstats", "/bin/cat /proc/diskstats 2>/dev/null", WARNING);
- linux_bbbp("/proc/partitions", "/bin/cat /proc/partitions 2>/dev/null", WARNING);
- linux_bbbp("/proc/1/stat", "/bin/cat /proc/1/stat 2>/dev/null", WARNING);
- linux_bbbp("/proc/1/statm", "/bin/cat /proc/1/statm 2>/dev/null", WARNING);
-#ifdef POWER
- linux_bbbp("/proc/ppc64/lparcfg", "/bin/cat /proc/ppc64/lparcfg 2>/dev/null", WARNING);
-#endif
-#ifdef MAINFRAME
- linux_bbbp("/proc/sysinfo", "/bin/cat /proc/sysinfo 2>/dev/null", WARNING);
-#endif
- linux_bbbp("/proc/net/rpc/nfs", "/bin/cat /proc/net/rpc/nfs 2>/dev/null", WARNING);
- linux_bbbp("/proc/net/rpc/nfsd", "/bin/cat /proc/net/rpc/nfsd 2>/dev/null", WARNING);
- linux_bbbp("ifconfig", "/sbin/ifconfig 2>/dev/null", WARNING);
- linux_bbbp("/bin/df-m", "/bin/df -m 2>/dev/null", WARNING);
- linux_bbbp("/bin/mount", "/bin/mount 2>/dev/null", WARNING);
- linux_bbbp("/etc/fstab", "/bin/cat /etc/fstab 2>/dev/null", WARNING);
-
- sleep(1); /* to get the first stats to cover this one second */
- }
- /* To get the pointers setup */
- switcher();
- checkinput();
- fflush(NULL);
-#ifdef POWER
-lparcfg.timebase = -1;
-#endif
-
- /* Main loop of the code */
- for(loop=1; ; loop++) {
- disk_stats_read = 0;
-
- if(loop == 3) /* This stops the nmon causing the cpu peak at startup */
- for(i=0;i<(max_cpus+1);i++)
- cpu_peak[i]=0.0;
-
- /* Reset the cursor position to top left */
- y = x = 0;
-
- /* Save the time and work out how long we were actually asleep */
- p->time = doubletime();
- elapsed = p->time - q->time;
- timer = time(0);
- tim = localtime(&timer);
- if (cursed) { /* Top line */
- box(stdscr,0,0);
- mvprintw(x, 1, "nmon");
- mvprintw(x, 6, "%s", VERSION);
- if(flash_on) mvprintw(x,15,"[H for help]");
- mvprintw(x, 30, "Hostname=%s", hostname);
- mvprintw(x, 52, "Refresh=%2.0fsecs ", elapsed);
- mvprintw(x, 70, "%02d:%02d.%02d",
- tim->tm_hour, tim->tm_min, tim->tm_sec);
- wnoutrefresh(stdscr);
- x = x + 1;
-
- if(welcome && getenv("NMON") == 0) {
-
- COLOUR attrset(COLOR_PAIR(2));
-mvprintw(x+1, 3, "------------------------------");
-mvprintw(x+2, 3, "# # # # #### # #");
-mvprintw(x+3, 3, "## # ## ## # # ## #");
-mvprintw(x+4, 3, "# # # # ## # # # # # #");
-mvprintw(x+5, 3, "# # # # # # # # # #");
-mvprintw(x+6, 3, "# ## # # # # # ##");
-mvprintw(x+7, 3, "# # # # #### # #");
-mvprintw(x+8, 3, "------------------------------");
- COLOUR attrset(COLOR_PAIR(0));
-mvprintw(x+1, 40, "For help type H or ...");
-mvprintw(x+2, 40, " nmon -? - hint");
-mvprintw(x+3, 40, " nmon -h - full");
-mvprintw(x+5, 40, "To start the same way every time");
-mvprintw(x+6, 40, " set the NMON ksh variable");
-
-mvprintw(x+10, 3, "Use these keys to toggle statistics on/off:");
-mvprintw(x+11, 3, " c = CPU l = CPU Long-term - = Faster screen updates");
-mvprintw(x+12, 3, " m = Memory j = Filesystems + = Slower screen updates");
-mvprintw(x+13, 3, " d = Disks n = Network V = Virtual Memory");
-mvprintw(x+14, 3, " r = Resource N = NFS v = Verbose hints");
-mvprintw(x+15, 3, " k = kernel t = Top-processes . = only busy disks/procs");
-mvprintw(x+16, 3, " h = more options q = Quit");
- x = x + 17;
- }
- } else {
- if (!cursed && nmon_snap && (loop % nmon_one_in) == 0 ) {
- child_start(CHLD_SNAP, nmon_snap, time_stamp_type, loop, timer);
- }
-
-
- if(!show_rrd)
- fprintf(fp,"ZZZZ,%s,%02d:%02d:%02d,%02d-%s-%4d\n", LOOP,
- tim->tm_hour, tim->tm_min, tim->tm_sec,
- tim->tm_mday, month[tim->tm_mon], tim->tm_year+1900);
- fflush(NULL);
- }
- if (show_verbose && cursed) {
- BANNER(padverb, "Verbose Mode");
- mvwprintw(padverb,1, 0, " Code Resource Stats Now\tWarn\tDanger ");
- /* DISPLAY(padverb,7); */
- /* move(x,0); */
- x=x+6;
- }
- if (show_help && cursed) {
- BANNER(padhelp, "HELP");
- mvwprintw(padhelp, 1, 5, "key --- statistics which toggle on/off ---");
- mvwprintw(padhelp, 2, 5, "h = This help information");
- mvwprintw(padhelp, 3, 5, "r = RS6000/pSeries CPU/cache/OS/kernel/hostname details + LPAR");
- mvwprintw(padhelp, 4, 5, "t = Top Process Stats 1=basic 3=CPU");
- mvwprintw(padhelp, 5, 5, " u = shows command arguments (hit twice to refresh)");
- mvwprintw(padhelp, 6, 5, "c = CPU by processor l = longer term CPU averages");
- mvwprintw(padhelp, 7, 5, "m = Memory & Swap stats L=Huge j = JFS Usage Stats");
- mvwprintw(padhelp, 8, 5, "n = Network stats N = NFS");
- mvwprintw(padhelp, 9, 5, "d = Disk I/O Graphs D=Stats o = Disks %%Busy Map");
- mvwprintw(padhelp,10, 5, "k = Kernel stats & loadavg V = Virtual Memory");
- mvwprintw(padhelp,11, 5, "g = User Defined Disk Groups [start nmon with -g <filename>]");
- mvwprintw(padhelp,12, 5, "v = Verbose Simple Checks - OK/Warnings/Danger");
- mvwprintw(padhelp,13, 5, "b = black & white mode");
- mvwprintw(padhelp,14, 5, "--- controls ---");
- mvwprintw(padhelp,15, 5, "+ and - = double or half the screen refresh time");
- mvwprintw(padhelp,16, 5, "q = quit space = refresh screen now");
- mvwprintw(padhelp,17, 5, ". = Minimum Mode =display only busy disks and processes");
- mvwprintw(padhelp,18, 5, "0 = reset peak counts to zero (peak = \">\")");
- mvwprintw(padhelp,19, 5, "Developer Nigel Griffiths see http://nmon.sourceforge.net");
- DISPLAY(padhelp,20);
-
- }
-/*
- if(error_on && errorstr[0] != 0) {
- mvprintw(x, 0, "Error: %s ",errorstr);
- x = x + 1;
- }
-*/
- if (show_cpu && cursed) {
- proc_read(P_CPUINFO);
- proc_read(P_VERSION);
- BANNER(padcpu,"Linux and Processor Details");
- mvwprintw(padcpu,1, 4, "Linux: %s", proc[P_VERSION].line[0]);
- mvwprintw(padcpu,2, 4, "Build: %s", proc[P_VERSION].line[1]);
- mvwprintw(padcpu,3, 4, "Release : %s", uts.release );
- mvwprintw(padcpu,4, 4, "Version : %s", uts.version);
-#ifdef POWER
- mvwprintw(padcpu,5, 4, "cpuinfo: %s", proc[P_CPUINFO].line[1]);
- mvwprintw(padcpu,6, 4, "cpuinfo: %s", proc[P_CPUINFO].line[2]);
- mvwprintw(padcpu,7, 4, "cpuinfo: %s", proc[P_CPUINFO].line[3]);
- mvwprintw(padcpu,8, 4, "cpuinfo: %s", proc[P_CPUINFO].line[proc[P_CPUINFO].lines-1]);
-#else
-#ifdef MAINFRAME
- mvwprintw(padcpu,5, 4, "cpuinfo: %s", proc[P_CPUINFO].line[1]);
- mvwprintw(padcpu,6, 4, "cpuinfo: %s", proc[P_CPUINFO].line[2]);
- mvwprintw(padcpu,7, 4, "cpuinfo: %s", proc[P_CPUINFO].line[3]);
- mvwprintw(padcpu,8, 4, "cpuinfo: %s", proc[P_CPUINFO].line[4]);
-#else /* Intel is the default */
- mvwprintw(padcpu,5, 4, "cpuinfo: %s", proc[P_CPUINFO].line[4]);
- mvwprintw(padcpu,6, 4, "cpuinfo: %s", proc[P_CPUINFO].line[1]);
- mvwprintw(padcpu,7, 4, "cpuinfo: %s", proc[P_CPUINFO].line[6]);
- mvwprintw(padcpu,8, 4, "cpuinfo: %s", proc[P_CPUINFO].line[17]);
-#endif /*MAINFRAME*/
-#endif /*POWER*/
- mvwprintw(padcpu,9, 4, "# of CPUs: %d", cpus);
- mvwprintw(padcpu,10, 4,"Machine : %s", uts.machine);
- mvwprintw(padcpu,11, 4,"Nodename : %s", uts.nodename);
- mvwprintw(padcpu,12, 4,"/etc/*ease[1]: %s", easy[0]);
- mvwprintw(padcpu,13, 4,"/etc/*ease[2]: %s", easy[1]);
- mvwprintw(padcpu,14, 4,"/etc/*ease[3]: %s", easy[2]);
- mvwprintw(padcpu,15, 4,"/etc/*ease[4]: %s", easy[3]);
- mvwprintw(padcpu,16, 4,"lsb_release: %s", lsb_release[0]);
- mvwprintw(padcpu,17, 4,"lsb_release: %s", lsb_release[1]);
- mvwprintw(padcpu,18, 4,"lsb_release: %s", lsb_release[2]);
- mvwprintw(padcpu,19, 4,"lsb_release: %s", lsb_release[3]);
- DISPLAY(padcpu,20);
- }
- if (show_longterm ) {
- proc_read(P_STAT);
- proc_cpu();
- cpu_user = p->cpu_total.user - q->cpu_total.user;
- cpu_sys = p->cpu_total.sys - q->cpu_total.sys;
- cpu_wait = p->cpu_total.wait - q->cpu_total.wait;
- cpu_idle = p->cpu_total.idle - q->cpu_total.idle;
- cpu_sum = cpu_idle + cpu_user + cpu_sys + cpu_wait;
-
- plot_save(
- (double)cpu_user / (double)cpu_sum * 100.0,
- (double)cpu_sys / (double)cpu_sum * 100.0,
- (double)cpu_wait / (double)cpu_sum * 100.0,
- (double)cpu_idle / (double)cpu_sum * 100.0);
- plot_snap(padlong);
- DISPLAY(padlong,MAX_SNAP_ROWS+2);
- }
- if (show_smp || show_verbose) {
- old_cpus = cpus;
- if(old_cpus != cpus) {
- CURSE wclrtobot(padtop);
- }
- if(cpus>max_cpus && !cursed) {
- for (i = max_cpus+1; i <= cpus; i++)
- fprintf(fp,"CPU%02d,CPU %d %s,User%%,Sys%%,Wait%%,Idle%%\n", i, i, run_name);
- max_cpus= cpus;
- }
- if (show_smp) {
- if(cursed) {
- BANNER(padsmp,"CPU Utilisation");
- mvwprintw(padsmp,1, 27, cpu_line);
-/*
-mvwprintw(padsmp,2, 0, "CPU User%% Sys%% Wait%% Idle|0 |25 |50 |75 100|");
-*/
- mvwprintw(padsmp,1, 27, cpu_line);
- mvwprintw(padsmp,2, 0, "CPU ");
- COLOUR wattrset(padsmp, COLOR_PAIR(2));
- mvwprintw(padsmp,2, 5, "User%%");
- COLOUR wattrset(padsmp, COLOR_PAIR(1));
- mvwprintw(padsmp,2, 10, " Sys%%");
- COLOUR wattrset(padsmp, COLOR_PAIR(4));
- mvwprintw(padsmp,2, 16, " Wait%%");
- COLOUR wattrset(padsmp, COLOR_PAIR(0));
- mvwprintw(padsmp,2, 22, " Idle|0 |25 |50 |75 100|");
-
- }
- proc_read(P_STAT);
- proc_cpu();
- for (i = 0; i < cpus; i++) {
- cpu_user = p->cpuN[i].user - q->cpuN[i].user;
- cpu_sys = p->cpuN[i].sys - q->cpuN[i].sys;
- cpu_wait = p->cpuN[i].wait - q->cpuN[i].wait;
- cpu_idle = p->cpuN[i].idle - q->cpuN[i].idle;
- cpu_sum = cpu_idle + cpu_user + cpu_sys + cpu_wait;
- if(smp_first_time && cursed) {
- mvwprintw(padsmp,3 + i, 27, "| Please wait gathering data");
- } else {
- if(!show_raw)
- plot_smp(padsmp,i+1, 3 + i,
- (double)cpu_user / (double)cpu_sum * 100.0,
- (double)cpu_sys / (double)cpu_sum * 100.0,
- (double)cpu_wait / (double)cpu_sum * 100.0,
- (double)cpu_idle / (double)cpu_sum * 100.0);
- else
- save_smp(padsmp,i+1, 3+i,
- RAW(user) - RAW(nice),
- RAW(sys),
- RAW(wait),
- RAW(idle),
- RAW(nice),
- RAW(irq),
- RAW(softirq),
- RAW(steal));
- RRD fprintf(fp,"rrdtool update cpu%02d.rrd %s:%.1f:%.1f:%.1f:%.1f\n",i,LOOP,
- (double)cpu_user / (double)cpu_sum * 100.0,
- (double)cpu_sys / (double)cpu_sum * 100.0,
- (double)cpu_wait / (double)cpu_sum * 100.0,
- (double)cpu_idle / (double)cpu_sum * 100.0);
- }
- }
- CURSE mvwprintw(padsmp,i + 3, 27, cpu_line);
- cpu_user = p->cpu_total.user - q->cpu_total.user;
- cpu_sys = p->cpu_total.sys - q->cpu_total.sys;
- cpu_wait = p->cpu_total.wait - q->cpu_total.wait;
- cpu_idle = p->cpu_total.idle - q->cpu_total.idle;
- cpu_sum = cpu_idle + cpu_user + cpu_sys + cpu_wait;
-
- RRD fprintf(fp,"rrdtool update cpu.rrd %s:%.1f:%.1f:%.1f:%.1f\n",LOOP,
- (double)cpu_user / (double)cpu_sum * 100.0,
- (double)cpu_sys / (double)cpu_sum * 100.0,
- (double)cpu_wait / (double)cpu_sum * 100.0,
- (double)cpu_idle / (double)cpu_sum * 100.0);
- if (cpus > 1 || !cursed) {
- if(!smp_first_time || !cursed) {
- if(!show_raw) {
- plot_smp(padsmp,0, 4 + i,
- (double)cpu_user / (double)cpu_sum * 100.0,
- (double)cpu_sys / (double)cpu_sum * 100.0,
- (double)cpu_wait / (double)cpu_sum * 100.0,
- (double)cpu_idle / (double)cpu_sum * 100.0);
- } else {
- save_smp(padsmp,0, 4+i,
- RAWTOTAL(user) - RAWTOTAL(nice),
- RAWTOTAL(sys),
- RAWTOTAL(wait),
- RAWTOTAL(idle),
- RAWTOTAL(nice),
- RAWTOTAL(irq),
- RAWTOTAL(softirq),
- RAWTOTAL(steal));
- }
- }
-
- CURSE mvwprintw(padsmp, i + 5, 27, cpu_line);
- i = i + 2;
- }
- smp_first_time=0;
- DISPLAY(padsmp, i + 4);
- }
- if(show_verbose && cursed) {
- cpu_user = p->cpu_total.user - q->cpu_total.user;
- cpu_sys = p->cpu_total.sys - q->cpu_total.sys;
- cpu_wait = p->cpu_total.wait - q->cpu_total.wait;
- cpu_idle = p->cpu_total.idle - q->cpu_total.idle;
- cpu_sum = cpu_idle + cpu_user + cpu_sys + cpu_wait;
-
- cpu_busy= (double)(cpu_user + cpu_sys)/ (double)cpu_sum * 100.0;
- mvwprintw(padverb,2, 0, " -> CPU %%busy %5.1f%%\t>80%%\t>90%% ",cpu_busy);
- if(cpu_busy > 90.0){
- COLOUR wattrset(padverb,COLOR_PAIR(1));
- mvwprintw(padverb,2, 0, " DANGER");
- }
- else if(cpu_busy > 80.0) {
- COLOUR wattrset(padverb,COLOR_PAIR(4));
- mvwprintw(padverb,2, 0, "Warning");
- }
- else {
- COLOUR wattrset(padverb,COLOR_PAIR(2));
- mvwprintw(padverb,2, 0, " OK");
- }
- COLOUR wattrset(padverb,COLOR_PAIR(0));
- }
- }
-#ifdef POWER
- if (show_lpar) {
- if(lparcfg.timebase == -1) {
- lparcfg.timebase=0;
- proc_read(P_CPUINFO);
- for(i=0;i<proc[P_CPUINFO].lines-1;i++) {
- if(!strncmp("timebase",proc[P_CPUINFO].line[i],8)) {
- sscanf(proc[P_CPUINFO].line[i],"timebase : %lld",&lparcfg.timebase);
- break;
- }
- }
- }
- ret = proc_lparcfg();
- if(cursed) {
- BANNER(padlpar,"LPAR Stats");
- if(ret == 0) {
- mvwprintw(padlpar,2, 0, "Reading data from /proc/ppc64/lparcfg failed");
- mvwprintw(padlpar,3, 0, "Either run as the root user or ");
- mvwprintw(padlpar,4, 0, "as the root user run: chmod ugo+r /proc/ppc64/lparcfg");
- } else {
- mvwprintw(padlpar,1, 0, "LPAR=%d SerialNumber=%s Type=%s",
- lparcfg.partition_id, lparcfg.serial_number, lparcfg.system_type);
- mvwprintw(padlpar,2, 0, "Flags: Shared-CPU=%-5s Capped=%-5s",
- lparcfg.shared_processor_mode?"true":"false",
- lparcfg.capped?"true":"false");
- mvwprintw(padlpar,3, 0, "Systems CPU Pool=%8.2f Active=%8.2f Total=%8.2f",
- (float)lparcfg.pool_capacity,
- (float)lparcfg.system_active_processors,
- (float)lparcfg.system_potential_processors);
- mvwprintw(padlpar,4, 0, "LPARs CPU Min=%8.2f Entitlement=%8.2f Max=%8.2f",
- lparcfg.MinEntCap/100.0,
- lparcfg.partition_entitled_capacity/100.0,
- lparcfg.partition_max_entitled_capacity/100.0);
- mvwprintw(padlpar,5, 0, "Virtual CPU Min=%8.2f VP Now=%8.2f Max=%8.2f",
- (float)lparcfg.MinProcs,
- (float)lparcfg.partition_active_processors,
- (float)lparcfg.partition_potential_processors);
- mvwprintw(padlpar,6, 0, "Memory Min= unknown Now=%8.2f Max=%8.2f",
- (float)lparcfg.MinMem,
- (float)lparcfg.DesMem);
- mvwprintw(padlpar,7, 0, "Other Weight=%8.2f UnallocWeight=%8.2f Capacity=%8.2f",
- (float)lparcfg.capacity_weight,
- (float)lparcfg.unallocated_capacity_weight,
- (float)lparcfg.CapInc/100.0);
-
- mvwprintw(padlpar,8, 0, " BoundThrds=%8.2f UnallocCapacity=%8.2f Increment",
- (float)lparcfg.BoundThrds,
- (float)lparcfg.unallocated_capacity);
- if(lparcfg.purr_diff == 0 || lparcfg.timebase <1) {
- mvwprintw(padlpar,9, 0, "lparcfg: purr field always zero, upgrade to SLES9+sp1 or RHEL4+u1");
- } else {
- if(lpar_first_time) {
- mvwprintw(padlpar,9, 0, "Please wait gathering data");
-
- lpar_first_time=0;
- } else {
- mvwprintw(padlpar,9, 0, "Physical CPU use=%8.3f ",
- (double)lparcfg.purr_diff/(double)lparcfg.timebase/elapsed);
- if( lparcfg.pool_idle_time != NUMBER_NOT_VALID && lparcfg.pool_idle_saved != 0)
- mvwprintw(padlpar,9, 29, "PoolIdleTime=%8.2f",
- (double)lparcfg.pool_idle_diff/(double)lparcfg.timebase/elapsed);
- mvwprintw(padlpar,9, 54, "[timebase=%lld]", lparcfg.timebase);
- }
- }
- }
- DISPLAY(padlpar,10);
- } else {
- if(ret != 0)
- fprintf(fp,"LPAR,%s,%9.6f,%d,%d,%d,%d,%d,%.1f,%.1f,%.1f,%d,%d,%d,%d,%d,%d,%d,%d,%lld\n",
- LOOP,
- (double)lparcfg.purr_diff/(double)lparcfg.timebase/elapsed,
- lparcfg.capped,
- lparcfg.shared_processor_mode,
- lparcfg.system_potential_processors,
- lparcfg.system_active_processors,
- lparcfg.pool_capacity,
- lparcfg.MinEntCap/100.0,
- lparcfg.partition_entitled_capacity/100.0,
- lparcfg.partition_max_entitled_capacity/100.0,
- lparcfg.MinProcs,
- lparcfg.partition_active_processors,
- lparcfg.partition_potential_processors,
- lparcfg.capacity_weight,
- lparcfg.unallocated_capacity_weight,
- lparcfg.BoundThrds,
- lparcfg.MinMem,
- lparcfg.unallocated_capacity,
- lparcfg.pool_idle_time);
- }
- }
-#endif /*POWER*/
- if (show_memory) {
- proc_read(P_MEMINFO);
- proc_mem();
- if(cursed) {
- BANNER(padmem,"Memory Stats");
- mvwprintw(padmem,1, 1, " RAM High Low Swap");
- mvwprintw(padmem,2, 1, "Total MB %8.1f %8.1f %8.1f %8.1f ",
- p->mem.memtotal/1024.0,
- p->mem.hightotal/1024.0,
- p->mem.lowtotal/1024.0,
- p->mem.swaptotal/1024.0);
- mvwprintw(padmem,3, 1, "Free MB %8.1f %8.1f %8.1f %8.1f ",
- p->mem.memfree/1024.0,
- p->mem.highfree/1024.0,
- p->mem.lowfree/1024.0,
- p->mem.swapfree/1024.0);
- mvwprintw(padmem,4, 1, "Free Percent %7.1f%% %7.1f%% %7.1f%% %7.1f%% ",
- p->mem.memfree == 0 ? 0.0 : 100.0*(float)p->mem.memfree/(float)p->mem.memtotal,
- p->mem.highfree == 0 ? 0.0 : 100.0*(float)p->mem.highfree/(float)p->mem.hightotal,
- p->mem.lowfree == 0 ? 0.0 : 100.0*(float)p->mem.lowfree/(float)p->mem.lowtotal,
- p->mem.swapfree == 0 ? 0.0 : 100.0*(float)p->mem.swapfree/(float)p->mem.swaptotal);
-
-
- mvwprintw(padmem,5, 1, " MB MB MB");
-#ifdef LARGEMEM
- mvwprintw(padmem,6, 1, " Cached=%8.1f Active=%8.1f",
- p->mem.cached/1024.0,
- p->mem.active/1024.0);
-#else
- mvwprintw(padmem,6, 1, " Shared=%8.1f Cached=%8.1f Active=%8.1f",
- p->mem.memshared/1024.0,
- p->mem.cached/1024.0,
- p->mem.active/1024.0);
- mvwprintw(padmem,5, 68, "MB");
- mvwprintw(padmem,6, 55, "bigfree=%8.1f",
- p->mem.bigfree/1024);
-#endif /*LARGEMEM*/
- mvwprintw(padmem,7, 1, "Buffers=%8.1f Swapcached=%8.1f Inactive =%8.1f",
- p->mem.buffers/1024.0,
- p->mem.swapcached/1024.0,
- p->mem.inactive/1024.0);
-
- mvwprintw(padmem,8, 1, "Dirty =%8.1f Writeback =%8.1f Mapped =%8.1f",
- p->mem.dirty/1024.0,
- p->mem.writeback/1024.0,
- p->mem.mapped/1024.0);
- mvwprintw(padmem,9, 1, "Slab =%8.1f Commit_AS =%8.1f PageTables=%8.1f",
- p->mem.slab/1024.0,
- p->mem.committed_as/1024.0,
- p->mem.pagetables/1024.0);
-#ifdef POWER
- if(!show_lpar) /* check if already called above */
- proc_lparcfg();
- if(!lparcfg.cmo_enabled)
- mvwprintw(padmem,10, 1, "AMS is not active");
- else
- mvwprintw(padmem,10, 1, "AMS id=%d Weight=%-3d pmem=%ldMB hpi=%.1f/s hpit=%.1f(sec) Pool=%ldMB Loan=%ldKB ",
- (int)lparcfg.entitled_memory_pool_number,
- (int)lparcfg.entitled_memory_weight,
- (long)(lparcfg.backing_memory)/1024/1024,
- (double)(lparcfg.cmo_faults_diff)/elapsed,
- (double)(lparcfg.cmo_fault_time_usec_diff)/1000/1000/elapsed,
- (long)lparcfg.entitled_memory_pool_size/1024/1024,
- (long)lparcfg.entitled_memory_loan_request/1024);
-
- DISPLAY(padmem,11);
-#else /* POWER */
- DISPLAY(padmem,10);
-#endif /* POWER */
- } else {
-
- if(show_rrd)
- str_p = "rrdtool update mem.rrd %s:%.1f:%.1f:%.1f:%.1f:%.1f:%.1f:%.1f:%.1f:%.1f:%.1f:%.1f:%.1f:%.1f:%.1f:%.1f\n";
- else
- str_p = "MEM,%s,%.1f,%.1f,%.1f,%.1f,%.1f,%.1f,%.1f,%.1f,%.1f,%.1f,%.1f,%.1f,%.1f,%.1f,%.1f\n";
- fprintf(fp,str_p,
- LOOP,
- p->mem.memtotal/1024.0,
- p->mem.hightotal/1024.0,
- p->mem.lowtotal/1024.0,
- p->mem.swaptotal/1024.0,
- p->mem.memfree/1024.0,
- p->mem.highfree/1024.0,
- p->mem.lowfree/1024.0,
- p->mem.swapfree/1024.0,
- p->mem.memshared/1024.0,
- p->mem.cached/1024.0,
- p->mem.active/1024.0,
-#ifdef LARGEMEM
- -1.0,
-#else
- p->mem.bigfree/1024.0,
-#endif /*LARGEMEM*/
- p->mem.buffers/1024.0,
- p->mem.swapcached/1024.0,
- p->mem.inactive/1024.0);
-#ifdef POWER
- if(!show_rrd)fprintf(fp,"MEMAMS,%s,%d,%d,%.1f,%.3lf,0,0,0,%.1f,%ld,%ld,%ld\n",
- LOOP,
- (int)lparcfg.entitled_memory_pool_number,
- (int)lparcfg.entitled_memory_weight,
- (float)(lparcfg.cmo_faults_diff)/elapsed,
- (float)(lparcfg.cmo_fault_time_usec_diff)/1000/1000/elapsed,
- /* three zeros here */
- (float)(lparcfg.backing_memory)/1024/1024,
- lparcfg.cmo_page_size/1024,
- lparcfg.entitled_memory_pool_size/1024/1024,
- lparcfg.entitled_memory_loan_request/1024);
-#endif /* POWER */
- }
-/* for testing large page
- p->mem.hugefree = 250;
- p->mem.hugetotal = 1000;
- p->mem.hugesize = 16*1024;
-*/
- }
- if (show_large) {
- proc_read(P_MEMINFO);
- proc_mem();
- if(cursed) {
- BANNER(padlarge,"Large (Huge) Page Stats");
- if(p->mem.hugetotal > 0) {
- if(p->mem.hugetotal - p->mem.hugefree > huge_peak)
- huge_peak = p->mem.hugetotal - p->mem.hugefree;
- mvwprintw(padlarge,1, 1, "Total Pages=%7ld 100.0%% Huge Page Size =%ld KB", p->mem.hugetotal, p->mem.hugesize);
- mvwprintw(padlarge,2, 1, "Used Pages=%7ld %5.1f%% Used Pages Peak=%-8ld",
- (long)(p->mem.hugetotal - p->mem.hugefree),
- (p->mem.hugetotal - p->mem.hugefree)/(float)p->mem.hugetotal*100.0,
- huge_peak);
- mvwprintw(padlarge,3, 1, "Free Pages=%7ld %5.1f%%", p->mem.hugefree, p->mem.hugefree/(float)p->mem.hugetotal*100.0);
- } else {
- mvwprintw(padlarge,1, 1, " There are no Huge Pages");
- mvwprintw(padlarge,2, 1, " - see /proc/meminfo");
- }
- DISPLAY(padlarge,4);
- } else {
- if(p->mem.hugetotal > 0) {
- if(first_huge == 1){
- first_huge=0;
- fprintf(fp,"HUGEPAGES,Huge Page Use %s,HugeTotal,HugeFree,HugeSizeMB\n", run_name);
- }
- fprintf(fp,"HUGEPAGES,%s,%ld,%ld,%.1f\n",
- LOOP,
- p->mem.hugetotal,
- p->mem.hugefree,
- p->mem.hugesize/1024.0);
- }
- }
- }
- if (show_vm) {
-#define VMDELTA(variable) (p->vm.variable - q->vm.variable)
-#define VMCOUNT(variable) (p->vm.variable )
- ret = read_vmstat();
- if(cursed) {
- BANNER(padpage,"Virtual-Memory");
- if(ret < 0 ) {
- mvwprintw(padpage,2, 2, "Virtual Memory stats not supported with this kernel");
- mvwprintw(padpage,3, 2, "/proc/vmstat only seems to appear in 2.6 onwards");
-
- } else {
- if(vm_first_time) {
- mvwprintw(padpage,2, 2, "Please wait - collecting data");
- vm_first_time=0;
- } else {
- mvwprintw(padpage,1, 0, "nr_dirty =%9lld pgpgin =%8lld",
- VMCOUNT(nr_dirty),
- VMDELTA(pgpgin));
- mvwprintw(padpage,2, 0, "nr_writeback=%9lld pgpgout =%8lld",
- VMCOUNT(nr_writeback),
- VMDELTA(pgpgout));
- mvwprintw(padpage,3, 0, "nr_unstable =%9lld pgpswpin =%8lld",
- VMCOUNT(nr_unstable),
- VMDELTA(pswpin));
- mvwprintw(padpage,4, 0, "nr_table_pgs=%9lld pgpswpout =%8lld",
- VMCOUNT(nr_page_table_pages),
- VMDELTA(pswpout));
- mvwprintw(padpage,5, 0, "nr_mapped =%9lld pgfree =%8lld",
- VMCOUNT(nr_mapped),
- VMDELTA(pgfree));
- mvwprintw(padpage,6, 0, "nr_slab =%9lld pgactivate =%8lld",
- VMCOUNT(nr_slab),
- VMDELTA(pgactivate));
- mvwprintw(padpage,7, 0, " pgdeactivate=%8lld",
- VMDELTA(pgdeactivate));
- mvwprintw(padpage,8, 0, "allocstall =%9lld pgfault =%8lld kswapd_steal =%7lld",
- VMDELTA(allocstall),
- VMDELTA(pgfault),
- VMDELTA(kswapd_steal));
- mvwprintw(padpage,9, 0, "pageoutrun =%9lld pgmajfault =%8lld kswapd_inodesteal=%7lld",
- VMDELTA(pageoutrun),
- VMDELTA(pgmajfault),
- VMDELTA(kswapd_inodesteal));
- mvwprintw(padpage,10, 0,"slabs_scanned=%8lld pgrotated =%8lld pginodesteal =%7lld",
- VMDELTA(slabs_scanned),
- VMDELTA(pgrotated),
- VMDELTA(pginodesteal));
-
-
-
- mvwprintw(padpage,1, 46, " High Normal DMA");
- mvwprintw(padpage,2, 46, "alloc %7lld%7lld%7lld",
- VMDELTA(pgalloc_high),
- VMDELTA(pgalloc_normal),
- VMDELTA(pgalloc_dma));
- mvwprintw(padpage,3, 46, "refill %7lld%7lld%7lld",
- VMDELTA(pgrefill_high),
- VMDELTA(pgrefill_normal),
- VMDELTA(pgrefill_dma));
- mvwprintw(padpage,4, 46, "steal %7lld%7lld%7lld",
- VMDELTA(pgsteal_high),
- VMDELTA(pgsteal_normal),
- VMDELTA(pgsteal_dma));
- mvwprintw(padpage,5, 46, "scan_kswapd%7lld%7lld%7lld",
- VMDELTA(pgscan_kswapd_high),
- VMDELTA(pgscan_kswapd_normal),
- VMDELTA(pgscan_kswapd_dma));
- mvwprintw(padpage,6, 46, "scan_direct%7lld%7lld%7lld",
- VMDELTA(pgscan_direct_high),
- VMDELTA(pgscan_direct_normal),
- VMDELTA(pgscan_direct_dma));
- }
- }
- DISPLAY(padpage,11);
- } else {
- if( ret < 0) {
- show_vm=0;
- } else if(vm_first_time) {
- vm_first_time=0;
-fprintf(fp,"VM,Paging and Virtual Memory,nr_dirty,nr_writeback,nr_unstable,nr_page_table_pages,nr_mapped,nr_slab,pgpgin,pgpgout,pswpin,pswpout,pgfree,pgactivate,pgdeactivate,pgfault,pgmajfault,pginodesteal,slabs_scanned,kswapd_steal,kswapd_inodesteal,pageoutrun,allocstall,pgrotated,pgalloc_high,pgalloc_normal,pgalloc_dma,pgrefill_high,pgrefill_normal,pgrefill_dma,pgsteal_high,pgsteal_normal,pgsteal_dma,pgscan_kswapd_high,pgscan_kswapd_normal,pgscan_kswapd_dma,pgscan_direct_high,pgscan_direct_normal,pgscan_direct_dma\n");
- }
- if(show_rrd)
- str_p = "rrdtool update vm.rrd %s"
- ":%lld:%lld:%lld:%lld:%lld"
- ":%lld:%lld:%lld:%lld:%lld"
- ":%lld:%lld:%lld:%lld:%lld"
- ":%lld:%lld:%lld:%lld:%lld"
- ":%lld:%lld:%lld:%lld:%lld"
- ":%lld:%lld:%lld:%lld:%lld"
- ":%lld:%lld:%lld:%lld:%lld"
- ":%lld:%lld\n";
- else
- str_p = "VM,%s"
- ",%lld,%lld,%lld,%lld,%lld"
- ",%lld,%lld,%lld,%lld,%lld"
- ",%lld,%lld,%lld,%lld,%lld"
- ",%lld,%lld,%lld,%lld,%lld"
- ",%lld,%lld,%lld,%lld,%lld"
- ",%lld,%lld,%lld,%lld,%lld"
- ",%lld,%lld,%lld,%lld,%lld"
- ",%lld,%lld\n";
-
- fprintf(fp, str_p,
- LOOP,
- VMCOUNT(nr_dirty),
- VMCOUNT(nr_writeback),
- VMCOUNT(nr_unstable),
- VMCOUNT(nr_page_table_pages),
- VMCOUNT(nr_mapped),
- VMCOUNT(nr_slab),
- VMDELTA(pgpgin),
- VMDELTA(pgpgout),
- VMDELTA(pswpin),
- VMDELTA(pswpout),
- VMDELTA(pgfree),
- VMDELTA(pgactivate),
- VMDELTA(pgdeactivate),
- VMDELTA(pgfault),
- VMDELTA(pgmajfault),
- VMDELTA(pginodesteal),
- VMDELTA(slabs_scanned),
- VMDELTA(kswapd_steal),
- VMDELTA(kswapd_inodesteal),
- VMDELTA(pageoutrun),
- VMDELTA(allocstall),
- VMDELTA(pgrotated),
- VMDELTA(pgalloc_high),
- VMDELTA(pgalloc_normal),
- VMDELTA(pgalloc_dma),
- VMDELTA(pgrefill_high),
- VMDELTA(pgrefill_normal),
- VMDELTA(pgrefill_dma),
- VMDELTA(pgsteal_high),
- VMDELTA(pgsteal_normal),
- VMDELTA(pgsteal_dma),
- VMDELTA(pgscan_kswapd_high),
- VMDELTA(pgscan_kswapd_normal),
- VMDELTA(pgscan_kswapd_dma),
- VMDELTA(pgscan_direct_high),
- VMDELTA(pgscan_direct_normal),
- VMDELTA(pgscan_direct_dma));
- }
- }
- if (show_kernel) {
- proc_read(P_STAT);
- proc_cpu();
- proc_read(P_UPTIME);
- proc_read(P_LOADAVG);
- proc_kernel();
- if(cursed) {
- BANNER(padker,"Kernel Stats");
- mvwprintw(padker,1, 1, "RunQueue %8lld Load Average CPU use since boot time",
- p->cpu_total.running);
- updays=p->cpu_total.uptime/60/60/24;
- uphours=(p->cpu_total.uptime-updays*60*60*24)/60/60;
- upmins=(p->cpu_total.uptime-updays*60*60*24-uphours*60*60)/60;
- mvwprintw(padker,2, 1, "ContextSwitch %8.1f 1 mins %5.2f Uptime Days=%3d Hours=%2d Mins=%2d",
- (float)(p->cpu_total.ctxt - q->cpu_total.ctxt)/elapsed,
- (float)p->cpu_total.mins1,
- updays, uphours, upmins);
- updays=p->cpu_total.idletime/60/60/24;
- uphours=(p->cpu_total.idletime-updays*60*60*24)/60/60;
- upmins=(p->cpu_total.idletime-updays*60*60*24-uphours*60*60)/60;
- mvwprintw(padker,3, 1, "Forks %8.1f 5 mins %5.2f Idle Days=%3d Hours=%2d Mins=%2d",
- (float)(p->cpu_total.procs - q->cpu_total.procs)/elapsed,
- (float)p->cpu_total.mins5,
- updays, uphours, upmins);
-
- mvwprintw(padker,4, 1, "Interrupts %8.1f 15 mins %5.2f Average CPU use=%6.2f%%",
- (float)(p->cpu_total.intr - q->cpu_total.intr)/elapsed,
- (float)p->cpu_total.mins15,
- (float)(
- (p->cpu_total.uptime -
- p->cpu_total.idletime)/
- p->cpu_total.uptime *100.0));
- DISPLAY(padker,5);
- } else {
- if(proc_first_time) {
- q->cpu_total.ctxt = p->cpu_total.ctxt;
- q->cpu_total.procs= p->cpu_total.procs;
- proc_first_time=0;
- }
-/*fprintf(fp,"PROC,Processes %s,Runnable,Swap-in,pswitch,syscall,read,write,fork,exec,sem,msg\n", run_name);*/
- if(show_rrd)
- str_p = "rrdtool update proc.rrd %s:%.1f:%.1f:%.1f:%.1f:%.1f:%.1f:%.1f:%.1f:%.1f:%.1f\n";
- else
- str_p = "PROC,%s,%.1f,%.1f,%.1f,%.1f,%.1f,%.1f,%.1f,%.1f,%.1f,%.1f\n";
-
- fprintf(fp,str_p,
- LOOP,
- (float)p->cpu_total.running,/*runqueue*/
- -1.0, /*swapin*/
- /*pswitch*/
- (float)(p->cpu_total.ctxt - q->cpu_total.ctxt)/elapsed,
- -1.0, /*syscall*/
- -1.0, /*read*/
- -1.0, /*write*/
- /*fork*/
- (float)(p->cpu_total.procs - q->cpu_total.procs)/elapsed,
- -1.0, /*exec*/
- -1.0, /*sem*/
- -1.0); /*msg*/
- }
- }
-
- if (show_nfs) {
- proc_read(P_NFS);
- proc_read(P_NFSD);
- proc_nfs();
-
- if(cursed) {
- BANNER(padnfs,"Network Filesystem (NFS) I/O");
- mvwprintw(padnfs,1, 0, " Version 2 Client Server");
- mvwprintw(padnfs,1, 41, "Version 3 Client Server");
-#define NFS_TOTAL(member) (float)(p->member)
-#define NFS_DELTA(member) (((float)(p->member - q->member)/elapsed))
- v2c_total =0;
- v2s_total =0;
- v3c_total =0;
- v3s_total =0;
- for(i=0;i<18;i++) {
- mvwprintw(padnfs,2+i, 1, "%12s %8.1f %8.1f",
- nfs_v2_names[i],
- NFS_DELTA(nfs.v2c[i]),
- NFS_DELTA(nfs.v2s[i]));
- v2c_total +=NFS_DELTA(nfs.v2c[i]);
- v2s_total +=NFS_DELTA(nfs.v2s[i]);
- }
- for(i=0;i<22;i++) {
- mvwprintw(padnfs,2+i, 41, "%12s %8.1f %8.1f",
- nfs_v3_names[i],
- NFS_DELTA(nfs.v3c[i]),
- NFS_DELTA(nfs.v3s[i]));
- v3c_total +=NFS_DELTA(nfs.v3c[i]);
- v3s_total +=NFS_DELTA(nfs.v3s[i]);
- }
- mvwprintw(padnfs,2+19, 1, "%12s %8.1f %8.1f",
- "V2 Totals", v2c_total,v2s_total);
- mvwprintw(padnfs,2+20, 1, "%12s %8.1f %8.1f",
- "V3 Totals", v3c_total,v3s_total);
-
- DISPLAY(padnfs,24);
- } else {
- if(nfs_first_time && ! show_rrd) {
- fprintf(fp,"NFSCLIV2,NFS Client v2");
- for(i=0;i<18;i++)
- fprintf(fp,",%s",nfs_v2_names[i]);
- fprintf(fp,"\n");
- fprintf(fp,"NFSSVRV2,NFS Server v2");
- for(i=0;i<18;i++)
- fprintf(fp,",%s",nfs_v2_names[i]);
- fprintf(fp,"\n");
-
- fprintf(fp,"NFSCLIV3,NFS Client v3");
- for(i=0;i<22;i++)
- fprintf(fp,",%s",nfs_v3_names[i]);
- fprintf(fp,"\n");
- fprintf(fp,"NFSSVRV3,NFS Server v3");
- for(i=0;i<22;i++)
- fprintf(fp,",%s",nfs_v3_names[i]);
- fprintf(fp,"\n");
- memcpy(&q->nfs,&p->nfs,sizeof(struct nfs_stat));
- nfs_first_time=0;
- }
- fprintf(fp,show_rrd ? "rrdtool update nfscliv2.rrd %s" : "NFSCLIV2,%s", LOOP);
- for(i=0;i<18;i++) {
- fprintf(fp,show_rrd ? ":%d" : ",%d",
- (int)NFS_DELTA(nfs.v2c[i]));
- }
- fprintf(fp,"\n");
- fprintf(fp,show_rrd ? "rrdtool update nfsvriv2.rrd %s" : "NFSSVRV2,%s,", LOOP);
- for(i=0;i<18;i++) {
- fprintf(fp,show_rrd ? ":%d" : ",%d",
- (int)NFS_DELTA(nfs.v2s[i]));
- }
- fprintf(fp,"\n");
- fprintf(fp,show_rrd ? "rrdtool update nfscliv3.rrd %s" : "NFSCLIV3,%s,", LOOP);
- for(i=0;i<22;i++) {
- fprintf(fp,show_rrd ? ":%d" : ",%d",
- (int)NFS_DELTA(nfs.v3c[i]));
- }
- fprintf(fp,"\n");
- fprintf(fp,show_rrd ? "rrdtool update nfsvriv3.rrd %s" : "NFSSVRV3,%s,", LOOP);
- for(i=0;i<22;i++) {
- fprintf(fp,show_rrd ? ":%d" : ",%d",
- (int)NFS_DELTA(nfs.v3s[i]));
- }
- fprintf(fp,"\n");
- }
- }
- if (show_net) {
- if(cursed) {
- BANNER(padnet,"Network I/O");
- mvwprintw(padnet,1, 0, "I/F Name Recv=KB/s Trans=KB/s packin packout insize outsize Peak->Recv Trans");
- }
- proc_net();
- for (i = 0; i < networks; i++) {
-
-#define IFDELTA(member) ((float)( (q->ifnets[i].member > p->ifnets[i].member) ? 0 : (p->ifnets[i].member - q->ifnets[i].member)/elapsed) )
-#define IFDELTA_ZERO(member1,member2) ((IFDELTA(member1) == 0) || (IFDELTA(member2)== 0)? 0.0 : IFDELTA(member1)/IFDELTA(member2) )
-
- if(net_read_peak[i] < IFDELTA(if_ibytes) / 1024.0)
- net_read_peak[i] = IFDELTA(if_ibytes) / 1024.0;
- if(net_write_peak[i] < IFDELTA(if_obytes) / 1024.0)
- net_write_peak[i] = IFDELTA(if_obytes) / 1024.0;
-
- CURSE mvwprintw(padnet,2 + i, 0, "%8s %7.1f %7.1f %6.1f %6.1f %6.1f %6.1f %7.1f %7.1f ",
- &p->ifnets[i].if_name[0],
- IFDELTA(if_ibytes) / 1024.0,
- IFDELTA(if_obytes) / 1024.0,
- IFDELTA(if_ipackets),
- IFDELTA(if_opackets),
- IFDELTA_ZERO(if_ibytes, if_ipackets),
- IFDELTA_ZERO(if_obytes, if_opackets),
- net_read_peak[i],
- net_write_peak[i]
- );
- }
- DISPLAY(padnet,networks + 2);
- if (!cursed) {
- fprintf(fp,show_rrd ? "rrdtool update net.rrd %s" : "NET,%s,", LOOP);
- for (i = 0; i < networks; i++) {
- fprintf(fp,show_rrd ? ":%.1f" : "%.1f,", IFDELTA(if_ibytes) / 1024.0);
- }
- for (i = 0; i < networks; i++) {
- fprintf(fp,show_rrd ? ":%.1f" : "%.1f,", IFDELTA(if_obytes) / 1024.0);
- }
- fprintf(fp,"\n");
- fprintf(fp,show_rrd ? "rrdtool update netpacket.rrd %s" : "NETPACKET,%s,", LOOP);
- for (i = 0; i < networks; i++) {
- fprintf(fp,show_rrd ? ":%.1f" : "%.1f,", IFDELTA(if_ipackets) );
- }
- for (i = 0; i < networks; i++) {
- fprintf(fp,show_rrd ? ":%.1f" : "%.1f,", IFDELTA(if_opackets) );
- }
- fprintf(fp,"\n");
- }
- }
- errors=0;
- for (i = 0; i < networks; i++) {
- errors += p->ifnets[i].if_ierrs - q->ifnets[i].if_ierrs
- + p->ifnets[i].if_oerrs - q->ifnets[i].if_oerrs
- + p->ifnets[i].if_ocolls - q->ifnets[i].if_ocolls;
- }
- if(errors) show_neterror=3;
- if(show_neterror) {
- if(cursed) {
- BANNER(padneterr,"Network Error Counters");
- mvwprintw(padneterr,1, 0, "I/F Name iErrors iDrop iOverrun iFrame oErrors oDrop oOverrun oCarrier oColls ");
- }
- for (i = 0; i < networks; i++) {
- CURSE mvwprintw(padneterr,2 + i, 0, "%8s %7lu %7lu %7lu %7lu %7lu %7lu %7lu %7lu %7lu",
- &p->ifnets[i].if_name[0],
- p->ifnets[i].if_ierrs,
- p->ifnets[i].if_idrop,
- p->ifnets[i].if_ififo,
- p->ifnets[i].if_iframe,
- p->ifnets[i].if_oerrs,
- p->ifnets[i].if_odrop,
- p->ifnets[i].if_ofifo,
- p->ifnets[i].if_ocarrier,
- p->ifnets[i].if_ocolls);
-
- }
- DISPLAY(padneterr,networks + 2);
- if(show_neterror > 0) show_neterror--;
- }
-#ifdef JFS
- if (show_jfs) {
- if(cursed) {
- BANNER(padjfs,"Filesystems");
- mvwprintw(padjfs,1, 0, "Filesystem SizeMB FreeMB %%Used Type MountPoint");
-
- for (k = 0; k < jfses; k++) {
- fs_size=0;
- fs_free=0;
- fs_size_used=100.0;
- if(jfs[k].mounted) {
- if(!strncmp(jfs[k].name,"/proc/",6) /* sub directorys have to be fake too */
- || !strncmp(jfs[k].name,"/sys/",5)
- || !strncmp(jfs[k].name,"/dev/",5)
- || !strncmp(jfs[k].name,"/proc",6) /* one more than the string to ensure the NULL */
- || !strncmp(jfs[k].name,"/sys",5)
- || !strncmp(jfs[k].name,"/dev",5)
- ) { /* /proc gives invalid/insane values */
- mvwprintw(padjfs,2+k, 0, "%-14s", jfs[k].name);
- mvwprintw(padjfs,2+k, 43, "%-8s not a real filesystem",jfs[k].type);
- } else {
- statfs_buffer.f_blocks=0;
- if((ret=fstatfs( jfs[k].fd, &statfs_buffer)) != -1) {
- if(statfs_buffer.f_blocks != 0) {
- fs_size = (float)statfs_buffer.f_blocks*4.0/1024.0;
- fs_free = (float)statfs_buffer.f_bfree*4.0/1024.0;
- fs_size_used = ((float)statfs_buffer.f_blocks - (float)statfs_buffer.f_bfree)/(float)statfs_buffer.f_blocks*100.0;
-
- if( (i=strlen(jfs[k].device)) <20)
- str_p=&jfs[k].device[0];
- else {
- str_p=&jfs[k].device[i-20];
- }
- mvwprintw(padjfs,2+k, 0, "%-20s %7.1f %7.1f %5.1f %-8s %s",
- str_p,
- fs_size,
- fs_free,
- fs_size_used,
- jfs[k].type,
- jfs[k].name
- );
-
- } else {
- mvwprintw(padjfs,2+k, 0, "%s", jfs[k].name);
- mvwprintw(padjfs,2+k, 43, "%-8s fstatfs returned zero blocks!!", jfs[k].type);
- }
- }
- else {
- mvwprintw(padjfs,2+k, 0, "%s", jfs[k].name);
- mvwprintw(padjfs,2+k, 43, "%-8s statfs failed", jfs[k].type);
- }
- }
- } else {
- mvwprintw(padjfs,2+k, 0, "%-14s", jfs[k].name);
- mvwprintw(padjfs,2+k, 43, "%-8s not mounted",jfs[k].type);
- }
- }
- DISPLAY(padjfs,2 + jfses);
- } else {
- jfs_load(LOAD);
- fprintf(fp,show_rrd ? "rrdtool update jfsfile.rrd %s" : "JFSFILE,%s", LOOP);
- for (k = 0; k < jfses; k++) {
- if(jfs[k].mounted && strncmp(jfs[k].name,"/proc",5)
- && strncmp(jfs[k].name,"/sys",4)
- && strncmp(jfs[k].name,"/dev/pts",8)
- ) { /* /proc gives invalid/insane values */
- if(fstatfs( jfs[k].fd, &statfs_buffer) != -1) {
- fprintf(fp, show_rrd ? ":%.1f" : ",%.1f",
- ((float)statfs_buffer.f_blocks - (float)statfs_buffer.f_bfree)/(float)statfs_buffer.f_blocks*100.0);
- }
- else
- fprintf(fp, show_rrd? ":U" : ",0.0");
- }
- }
- fprintf(fp, "\n");
- jfs_load(UNLOAD);
- }
- }
-
-#endif /* JFS */
-
- if (show_disk || show_verbose || show_diskmap || show_dgroup) {
- proc_read(P_STAT);
- proc_disk(elapsed);
- }
- if (show_diskmap) {
- BANNER(padmap,"Disk %%Busy Map");
- mvwprintw(padmap,0, 20,"Key: #=80%% X=60%% O=40%% o=30%% +=20%% -=10%% .=5%% _=0%%");
- mvwprintw(padmap,1, 0," Disk No. 1 2 3 4 5 6 ");
- if(disk_first_time) {
- disk_first_time=0;
- mvwprintw(padmap,2, 0,"Please wait - collecting disk data");
- } else {
- mvwprintw(padmap,2, 0,"Disks=%-4d 0123456789012345678901234567890123456789012345678901234567890123", disks);
- mvwprintw(padmap,3, 0,"hdisk0 to 63 ");
- for (i = 0; i < disks; i++) {
- disk_busy = DKDELTA(dk_time) / elapsed;
- disk_read = DKDELTA(dk_rkb) / elapsed;
- disk_write = DKDELTA(dk_wkb) / elapsed;
- if(disk_busy >80) mapch = '#';
- else if(disk_busy>60) mapch = 'X';
- else if(disk_busy>40) mapch = 'O';
- else if(disk_busy>30) mapch = 'o';
- else if(disk_busy>20) mapch = '+';
- else if(disk_busy>10) mapch = '-';
- else if(disk_busy> 5) mapch = '.';
- else mapch = '_';
-#define MAPWRAP 64
- mvwprintw(padmap,3 + (int)(i/MAPWRAP), 13+ (i%MAPWRAP), "%c",mapch);
- }
- }
- DISPLAY(padmap,4 + disks/MAPWRAP);
- }
- if(show_verbose) {
- top_disk_busy = 0.0;
- top_disk_name = "";
- for (i = 0,k=0; i < disks; i++) {
- disk_busy = DKDELTA(dk_time) / elapsed;
- if( disk_busy > top_disk_busy) {
- top_disk_busy = disk_busy;
- top_disk_name = p->dk[i].dk_name;
- }
- }
- if(top_disk_busy > 80.0) {
- COLOUR wattrset(padverb,COLOR_PAIR(1));
- mvwprintw(padverb,3, 0, " DANGER");
- }
- else if(top_disk_busy > 60.0) {
- COLOUR wattrset(padverb,COLOR_PAIR(4));
- mvwprintw(padverb,3, 0, "Warning");
- }
- else {
- COLOUR wattrset(padverb,COLOR_PAIR(2));
- mvwprintw(padverb,3, 0, " OK");
- }
- COLOUR wattrset(padverb,COLOR_PAIR(0));
- mvwprintw(padverb,3, 8, "-> Top Disk %8s %%busy %5.1f%%\t>40%%\t>60%% ",top_disk_name,top_disk_busy);
- move(x,0);
- }
- if (show_disk) {
- if (cursed) {
- if(show_disk) {
- BANNER(paddisk,"Disk I/O");
- switch(disk_mode) {
- case DISK_MODE_PARTITIONS: mvwprintw(paddisk, 0, 12, "/proc/partitions");break;
- case DISK_MODE_DISKSTATS: mvwprintw(paddisk, 0, 12, "/proc/diskstats");break;
- case DISK_MODE_IO: mvwprintw(paddisk, 0, 12, "/proc/stat+disk_io");break;
- }
- mvwprintw(paddisk,0, 31, "mostly in KB/s");
- mvwprintw(paddisk,0, 50, "Warning:contains duplicates");
- switch (show_disk) {
- case SHOW_DISK_STATS:
- mvwprintw(paddisk,1, 0, "DiskName Busy Read Write Xfers Size Peak%% Peak-RW InFlight ");
- break;
- case SHOW_DISK_GRAPH:
- mvwprintw(paddisk,1, 0, "DiskName Busy ");
- COLOUR wattrset(paddisk,COLOR_PAIR(6));
- mvwprintw(paddisk,1, 15, "Read ");
- COLOUR wattrset(paddisk,COLOR_PAIR(3));
- mvwprintw(paddisk,1, 20, "Write");
- COLOUR wattrset(paddisk,COLOR_PAIR(0));
- mvwprintw(paddisk,1, 25, "KB|0 |25 |50 |75 100|");
- break;
- }
- }
- if(disk_first_time) {
- disk_first_time=0;
- mvwprintw(paddisk,2, 0, "Please wait - collecting disk data");
- } else {
- total_disk_read = 0.0;
- total_disk_write = 0.0;
- total_disk_xfers = 0.0;
- disk_mb = 0;
- for (i = 0,k=0; i < disks; i++) {
- disk_read = DKDELTA(dk_rkb) / elapsed;
- disk_write = DKDELTA(dk_wkb) / elapsed;
- if(disk_read > 9999.9 || disk_write > 9999.9) {
- disk_mb=1;
- COLOUR wattrset(paddisk, COLOR_PAIR(1));
- mvwprintw(paddisk,1, 25, "MB");
- COLOUR wattrset(paddisk, COLOR_PAIR(0));
- break;
- }
- }
- for (i = 0,k=0; i < disks; i++) {
-/*
- if(p->dk[i].dk_name[0] == 'h')
- continue;
-*/
- disk_busy = DKDELTA(dk_time) / elapsed;
- disk_read = DKDELTA(dk_rkb) / elapsed;
- disk_write = DKDELTA(dk_wkb) / elapsed;
- disk_xfers = DKDELTA(dk_xfers);
-
- total_disk_read +=disk_read;
- total_disk_write +=disk_write;
- total_disk_xfers +=disk_xfers;
-
- if(disk_busy_peak[i] < disk_busy)
- disk_busy_peak[i] = disk_busy;
- if(disk_rate_peak[i] < (disk_read+disk_write))
- disk_rate_peak[i] = disk_read+disk_write;
- if(!show_all && disk_busy < 1)
- continue;
-
- if(strlen(p->dk[i].dk_name) > 8)
- str_p = &p->dk[i].dk_name[strlen(p->dk[i].dk_name) -8];
- else
- str_p = &p->dk[i].dk_name[0];
-
- if(show_disk == SHOW_DISK_STATS) {
- /* output disks stats */
- mvwprintw(paddisk,2 + k, 0, "%-8s %3.0f%% %8.1f %8.1fKB/s %6.1f %5.1fKB %3.0f%% %9.1fKB/s %3d",
- str_p,
- disk_busy,
- disk_read,
- disk_write,
- disk_xfers / elapsed,
- disk_xfers == 0.0 ? 0.0 :
- (DKDELTA(dk_rkb) + DKDELTA(dk_wkb) ) / disk_xfers,
- disk_busy_peak[i],
- disk_rate_peak[i],
- p->dk[i].dk_inflight);
- k++;
- }
- if(show_disk == SHOW_DISK_GRAPH) {
- /* output disk bar graphs */
-
-
- if(disk_mb) mvwprintw(paddisk,2 + k, 0, "%-8s %3.0f%% %6.1f %6.1f",
- str_p,
- disk_busy,
- disk_read/1024.0,
- disk_write/1024.0);
- else mvwprintw(paddisk,2 + k, 0, "%-8s %3.0f%% %6.1f %6.1f",
- str_p,
- disk_busy,
- disk_read,
- disk_write);
- mvwprintw(paddisk,2 + k, 27, "| ");
- wmove(paddisk,2 + k, 28);
- if(disk_busy >100) disk_busy=100;
- if( disk_busy > 0.0 && (disk_write+disk_read) > 0.1) {
- /* 50 columns in the disk graph area so divide % by two */
- readers = disk_busy*disk_read/(disk_write+disk_read)/2;
- writers = disk_busy*disk_write/(disk_write+disk_read)/2;
- if(readers + writers > 50) {
- readers=0;
- writers=0;
- }
- /* don't go beyond row 78 i.e. j = 28 + 50 */
- for (j = 0; j < readers && j<50; j++) {
- COLOUR wattrset(paddisk,COLOR_PAIR(12));
- wprintw(paddisk,"R");
- COLOUR wattrset(paddisk,COLOR_PAIR(0));
- }
- for (; j < readers + writers && j<50; j++) {
- COLOUR wattrset(paddisk,COLOR_PAIR(11));
- wprintw(paddisk,"W");
- COLOUR wattrset(paddisk,COLOR_PAIR(0));
- }
- for (j = disk_busy; j < 50; j++)
- wprintw(paddisk," ");
- } else {
- for (j = 0; j < 50; j++)
- wprintw(paddisk," ");
- if(p->dk[i].dk_time == 0.0)
- mvwprintw(paddisk,2 + k, 27, "| disk busy not available");
- }
- if(disk_busy_peak[i] >100)
- disk_busy_peak[i]=100;
-
- mvwprintw(paddisk,2 + i, 77, "|");
- /* check rounding has not got the peak ">" over the 100% */
- j = 28+(int)(disk_busy_peak[i]/2);
- if(j>77)
- j=77;
- mvwprintw(paddisk,2 + i, j, ">");
- k++;
- }
- }
- mvwprintw(paddisk,2 + k, 0, "Totals Read-MB/s=%-8.1f Writes-MB/s=%-8.1f Transfers/sec=%-8.1f",
- total_disk_read / 1024.0,
- total_disk_write / 1024.0,
- total_disk_xfers / elapsed);
-
- }
- DISPLAY(paddisk,3 + k);
- } else {
- for (i = 0; i < disks; i++) {
- if(NEWDISKGROUP(i))
- fprintf(fp,show_rrd ? "%srrdtool update diskbusy%s.rrd %s" : "%sDISKBUSY%s,%s",i == 0 ? "": "\n", dskgrp(i), LOOP);
- /* check percentage is correct */
- ftmp = DKDELTA(dk_time) / elapsed;
- if(ftmp > 100.0 || ftmp < 0.0)
- fprintf(fp,show_rrd ? ":U" : ",101.00");
- else
- fprintf(fp,show_rrd ? ":%.1f" : ",%.1f",
- DKDELTA(dk_time) / elapsed);
- }
- for (i = 0; i < disks; i++) {
- if(NEWDISKGROUP(i))
- fprintf(fp,show_rrd ? "\nrrdtool update diskread%s.rrd %s" : "\nDISKREAD%s,%s", dskgrp(i),LOOP);
- fprintf(fp,show_rrd ? ":%.1f" : ",%.1f",
- DKDELTA(dk_rkb) / elapsed);
- }
- for (i = 0; i < disks; i++) {
- if(NEWDISKGROUP(i))
- fprintf(fp,show_rrd ? "\nrrdtool update diskwrite%s.rrd %s" : "\nDISKWRITE%s,%s", dskgrp(i),LOOP);
- fprintf(fp,show_rrd ? ":%.1f" : ",%.1f",
- DKDELTA(dk_wkb) / elapsed);
- }
- for (i = 0; i < disks; i++) {
- if(NEWDISKGROUP(i))
- fprintf(fp,show_rrd ? "\nrrdtool update diskxfer%s.rrd %s" : "\nDISKXFER%s,%s", dskgrp(i),LOOP);
- disk_xfers = DKDELTA(dk_xfers);
- fprintf(fp,show_rrd ? ":%.1f" : ",%.1f",
- disk_xfers / elapsed);
- }
- for (i = 0; i < disks; i++) {
- if(NEWDISKGROUP(i))
- fprintf(fp,show_rrd ? "\nrrdtool update diskbsize%s.rrd %s" : "\nDISKBSIZE%s,%s", dskgrp(i),LOOP);
- disk_xfers = DKDELTA(dk_xfers);
- fprintf(fp,show_rrd ? ":%.1f" : ",%.1f",
- disk_xfers == 0.0 ? 0.0 :
- (DKDELTA(dk_rkb) + DKDELTA(dk_wkb) ) / disk_xfers);
- }
- fprintf(fp,"\n");
- }
- }
- if ((show_dgroup || (!cursed && dgroup_loaded))) {
- if (cursed) {
- BANNER(paddg,"Disk-Group-I/O");
- if (dgroup_loaded != 2 || dgroup_total_disks == 0) {
- mvwprintw(paddg, 1, 1, "No Disk Groups found use -g groupfile when starting nmon");
- n = 0;
- } else if (disk_first_time) {
- disk_first_time=0;
- mvwprintw(paddg, 1, 1, "Please wait - collecting disk data");
- } else {
- mvwprintw(paddg, 1, 1, "Name Disks AvgBusy Read|Write-KB/s TotalMB/s xfers/s BlockSizeKB");
- total_busy = 0.0;
- total_rbytes = 0.0;
- total_wbytes = 0.0;
- total_xfers = 0.0;
- for(k = n = 0; k < dgroup_total_groups; k++) {
-/*
- if (dgroup_name[k] == 0 )
- continue;
-*/
- disk_busy = 0.0;
- disk_read = 0.0;
- disk_write = 0.0;
- disk_xfers = 0.0;
- for (j = 0; j < dgroup_disks[k]; j++) {
- i = dgroup_data[k*DGROUPITEMS+j];
- if (i != -1) {
- disk_busy += DKDELTA(dk_time) / elapsed;
-/*
- disk_read += DKDELTA(dk_reads) * p->dk[i].dk_bsize / 1024.0 /elapsed;
- disk_write += DKDELTA(dk_writes) * p->dk[i].dk_bsize / 1024.0 /elapsed;
-*/
- disk_read += DKDELTA(dk_rkb) /elapsed;
- disk_write += DKDELTA(dk_wkb) /elapsed;
- disk_xfers += DKDELTA(dk_xfers) /elapsed;
- }
- }
- if (dgroup_disks[k] == 0)
- disk_busy = 0.0;
- else
- disk_busy = disk_busy / dgroup_disks[k];
- total_busy += disk_busy;
- total_rbytes += disk_read;
- total_wbytes += disk_write;
- total_xfers += disk_xfers;
-/* if (!show_all && (disk_read < 1.0 && disk_write < 1.0))
- continue;
-*/
- if ((disk_read + disk_write) == 0 || disk_xfers == 0)
- disk_size = 0.0;
- else
- disk_size = ((float)disk_read + (float)disk_write) / (float)disk_xfers;
- mvwprintw(paddg, n + 2, 1, "%-14s %3d %5.1f%% %9.1f|%-9.1f %6.1f %9.1f %6.1f ",
- dgroup_name[k],
- dgroup_disks[k],
- disk_busy,
- disk_read,
- disk_write,
- (disk_read + disk_write) / 1024, /* in MB */
- disk_xfers,
- disk_size
- );
- n++;
- }
- mvwprintw(paddg, n + 2, 1, "Groups=%2d TOTALS %3d %5.1f%% %9.1f|%-9.1f %6.1f %9.1f",
- n,
- dgroup_total_disks,
- total_busy / dgroup_total_disks,
- total_rbytes,
- total_wbytes,
- (((double)total_rbytes + (double)total_wbytes)) / 1024, /* in MB */
- total_xfers
- );
- }
- DISPLAY(paddg, 3 + dgroup_total_groups);
- } else {
- if (dgroup_loaded == 2) {
- fprintf(fp, show_rrd ? "rrdtool update dgbusy.rdd %s" : "DGBUSY,%s", LOOP);
- for (k = 0; k < dgroup_total_groups; k++) {
- if (dgroup_name[k] != 0) {
- disk_total = 0.0;
- for (j = 0; j < dgroup_disks[k]; j++) {
- i = dgroup_data[k*DGROUPITEMS+j];
- if (i != -1) {
- disk_total += DKDELTA(dk_time) / elapsed;
- }
- }
- fprintf(fp, show_rrd ? ":%.1f" : ",%.1f", (float)(disk_total / dgroup_disks[k]));
- }
- }
- fprintf(fp, "\n");
- fprintf(fp, show_rrd ? "rrdtool update dgread.rdd %s" : "DGREAD,%s", LOOP);
- for (k = 0; k < dgroup_total_groups; k++) {
- if (dgroup_name[k] != 0) {
- disk_total = 0.0;
- for (j = 0; j < dgroup_disks[k]; j++) {
- i = dgroup_data[k*DGROUPITEMS+j];
- if (i != -1) {
-/*
- disk_total += DKDELTA(dk_reads) * p->dk[i].dk_bsize / 1024.0;
-*/
- disk_total += DKDELTA(dk_rkb);
- }
- }
- fprintf(fp, show_rrd ? ":%.1f" : ",%.1f", disk_total / elapsed);
- }
- }
- fprintf(fp, "\n");
- fprintf(fp, show_rrd ? "rrdtool update dgwrite.rdd %s" : "DGWRITE,%s", LOOP);
- for (k = 0; k < dgroup_total_groups; k++) {
- if (dgroup_name[k] != 0) {
- disk_total = 0.0;
- for (j = 0; j < dgroup_disks[k]; j++) {
- i = dgroup_data[k*DGROUPITEMS+j];
- if (i != -1) {
-/*
- disk_total += DKDELTA(dk_writes) * p->dk[i].dk_bsize / 1024.0;
-*/
- disk_total += DKDELTA(dk_wkb);
- }
- }
- fprintf(fp, show_rrd ? ":%.1f" : ",%.1f", disk_total / elapsed);
- }
- }
- fprintf(fp, "\n");
- fprintf(fp, show_rrd ? "rrdtool update dgbsize.rdd %s" : "DGSIZE,%s", LOOP);
- for (k = 0; k < dgroup_total_groups; k++) {
- if (dgroup_name[k] != 0) {
- disk_write = 0.0;
- disk_xfers = 0.0;
- for (j = 0; j < dgroup_disks[k]; j++) {
- i = dgroup_data[k*DGROUPITEMS+j];
- if (i != -1) {
-/*
- disk_write += (DKDELTA(dk_reads) + DKDELTA(dk_writes) ) * p->dk[i].dk_bsize / 1024.0;
-*/
- disk_write += (DKDELTA(dk_rkb) + DKDELTA(dk_wkb) );
- disk_xfers += DKDELTA(dk_xfers);
- }
- }
- if ( disk_write == 0.0 || disk_xfers == 0.0)
- disk_size = 0.0;
- else
- disk_size = disk_write / disk_xfers;
- fprintf(fp, show_rrd ? ":%.1f" : ",%.1f", disk_size);
- }
- }
- fprintf(fp, "\n");
- fprintf(fp, show_rrd ? "rrdtool update dgxfer.rdd %s" : "DGXFER,%s", LOOP);
- for (k = 0; k < dgroup_total_groups; k++) {
- if (dgroup_name[k] != 0) {
- disk_total = 0.0;
- for (j = 0; j < dgroup_disks[k]; j++) {
- i = dgroup_data[k*DGROUPITEMS+j];
- if (i != -1) {
- disk_total += DKDELTA(dk_xfers);
- }
- }
- fprintf(fp, show_rrd ? ":%.1f" : ",%.1f", disk_total / elapsed);
- }
- }
- fprintf(fp, "\n");
- }
- }
- }
-
- if (show_top) {
- /* Get the details of the running processes */
- firstproc = 0;
- skipped = 0;
- n = getprocs(0);
- if (n > p->nprocs) {
- n = n +128; /* allow for growth in the number of processes in the mean time */
- p->procs = realloc(p->procs, sizeof(struct procsinfo ) * (n+1) ); /* add one to avoid overrun */
- p->nprocs = n;
- }
-
- firstproc = 0;
- n = getprocs(1);
-
- if (topper_size < n) {
- topper = realloc(topper, sizeof(struct topper ) * (n+1) ); /* add one to avoid overrun */
- topper_size = n;
- }
- /* Sort the processes by CPU utilisation */
- for ( i = 0, max_sorted = 0; i < n; i++) {
- /* move forward in the previous array to find a match*/
- for(j=0;j < q->nprocs;j++) {
- if (p->procs[i].pi_pid == q->procs[j].pi_pid) { /* found a match */
- topper[max_sorted].index = i;
- topper[max_sorted].other = j;
- topper[max_sorted].time = TIMEDELTA(pi_utime,i,j) +
- TIMEDELTA(pi_stime,i,j);
- topper[max_sorted].size = p->procs[i].statm_resident;
-
- max_sorted++;
- break;
- }
- }
- }
- switch(show_topmode) {
- default:
- case 3: qsort((void *) & topper[0], max_sorted, sizeof(struct topper ), &cpu_compare );
- break;
- case 4: qsort((void *) & topper[0], max_sorted, sizeof(struct topper ), &size_compare );
- break;
-#ifdef DISK
- case 5: qsort((void *) & topper[0], max_sorted, sizeof(struct topper ), &disk_compare );
- break;
-#endif /* DISK */
- }
- CURSE BANNER(padtop,"Top Processes");
- CURSE mvwprintw(padtop,0, 15, "Procs=%d mode=%d (1=Basic, 3=Perf 4=Size 5=I/O)", n, show_topmode);
- if(cursed && top_first_time) {
- top_first_time = 0;
- mvwprintw(padtop,1, 1, "Please wait - information being collected");
- }
- else {
- switch (show_topmode) {
- case 1:
- CURSE mvwprintw(padtop,1, 1, " PID PPID Pgrp Nice Prior Status proc-Flag Command");
- for (j = 0; j < max_sorted; j++) {
- i = topper[j].index;
- if (p->procs[i].pi_pgrp == p->procs[i].pi_pid)
- strcpy(pgrp, "none");
- else
- sprintf(&pgrp[0], "%d", p->procs[i].pi_pgrp);
- /* skip over processes with 0 CPU */
- if(!show_all && (topper[j].time/elapsed < ignore_procdisk_threshold) && !cmdfound)
- break;
- if( x + j + 2 - skipped > LINES+2) /* +2 to for safety :-) */
- break;
- CURSE mvwprintw(padtop,j + 2 - skipped, 1, "%7d %7d %6s %4d %4d %9s 0x%08x %1s %-32s",
- p->procs[i].pi_pid,
- p->procs[i].pi_ppid,
- pgrp,
- p->procs[i].pi_nice,
- p->procs[i].pi_pri,
-
- (topper[j].time * 100 / elapsed) ? "Running "
- : get_state(p->procs[i].pi_state),
- p->procs[i].pi_flags,
- (p->procs[i].pi_tty_nr ? "F" : " "),
- p->procs[i].pi_comm);
- }
- break;
- case 3:
- case 4:
- case 5:
-
- if(show_args == ARGS_ONLY)
- formatstring = " PID %%CPU ResSize Command ";
-
- else if(COLS > 119)
- formatstring = " PID %%CPU Size Res Res Res Res Shared Faults Command";
- else
- formatstring = " PID %%CPU Size Res Res Res Res Shared Faults Command";
- CURSE mvwprintw(padtop,1, y, formatstring);
-
- if(show_args == ARGS_ONLY)
- formatstring = " Used KB ";
- else if(COLS > 119)
- formatstring = " Used KB Set Text Data Lib KB Min Maj";
- else
- formatstring = " Used KB Set Text Data Lib KB Min Maj ";
- CURSE mvwprintw(padtop,2, 1, formatstring);
- for (j = 0; j < max_sorted; j++) {
- i = topper[j].index;
- if(!show_all) {
- /* skip processes with zero CPU/io */
- if(show_topmode == 3 && (topper[j].time/elapsed) < ignore_procdisk_threshold && !cmdfound)
- break;
- if(show_topmode == 5 && (topper[j].io < ignore_io_threshold && !cmdfound))
- break;
- }
- if(cursed) {
- if( x + j + 3 - skipped > LINES+2) /* +2 to for safety :-) */
- break;
- if(cmdfound && !cmdcheck(p->procs[i].pi_comm)) {
- skipped++;
- continue;
- }
- if(show_args == ARGS_ONLY){
- mvwprintw(padtop,j + 3 - skipped, 1,
- "%7d %5.1f %7lu %-120s",
- p->procs[i].pi_pid,
- topper[j].time / elapsed,
- p->procs[i].statm_resident*4,
- args_lookup(p->procs[i].pi_pid,
- p->procs[i].pi_comm));
- }
- else {
- if(COLS > 119)
- formatstring = "%8d %7.1f %7lu %7lu %7lu %7lu %7lu %5lu %6d %6d %-32s";
- else
- formatstring = "%7d %5.1f %5lu %5lu %5lu %5lu %5lu %5lu %4d %4d %-32s";
- mvwprintw(padtop,j + 3 - skipped, 1, formatstring,
- p->procs[i].pi_pid,
- topper[j].time/elapsed,
- /* topper[j].time /1000.0 / elapsed,*/
- p->procs[i].statm_size*4 ,
- p->procs[i].statm_resident*4,
- p->procs[i].statm_trs*4,
- p->procs[i].statm_drs*4,
- p->procs[i].statm_lrs*4,
- p->procs[i].statm_share*4,
- (int)(COUNTDELTA(pi_minflt) / elapsed),
- (int)(COUNTDELTA(pi_majflt) / elapsed),
- p->procs[i].pi_comm);
- }
- }
- else {
- if((cmdfound && cmdcheck(p->procs[i].pi_comm)) ||
- (!cmdfound && ((topper[j].time / elapsed) > ignore_procdisk_threshold)) )
- {
- fprintf(fp,"TOP,%07d,%s,%.1f,%.1f,%.1f,%lu,%lu,%lu,%lu,%lu,%d,%d,%s\n",
- /* 1 */ p->procs[i].pi_pid,
- /* 2 */ LOOP,
- /* 3 */ topper[j].time / elapsed,
- /* 4 */ TIMEDELTA(pi_utime,i,topper[j].other) / elapsed,
- /* 5 */ TIMEDELTA(pi_stime,i,topper[j].other) / elapsed,
- /* 6 */ p->procs[i].statm_size*4,
- /* 7 */ p->procs[i].statm_resident*4,
- /* 8 */ p->procs[i].statm_trs*4,
- /* 9 */ p->procs[i].statm_drs*4,
- /* 10*/ p->procs[i].statm_share*4,
- /* 11*/ (int)(COUNTDELTA(pi_minflt) / elapsed),
- /* 12*/ (int)(COUNTDELTA(pi_majflt) / elapsed),
- /* 13*/ p->procs[i].pi_comm);
-
- if(show_args)
- args_output(p->procs[i].pi_pid,loop, p->procs[i].pi_comm);
-
- } else skipped++;
- }
- }
- break;
- }
- }
- CURSE DISPLAY(padtop,j + 3);
- }
-
- if(cursed) {
- if(show_verbose) {
- y=x;
- x=1;
- DISPLAY(padverb,4);
- x=y;
- }
- if(x<LINES-2)mvwhline(stdscr, x, 1, ACS_HLINE,COLS-2);
- wmove(stdscr,0, 0);
- wrefresh(stdscr);
- doupdate();
-
- for (i = 0; i < seconds; i++) {
- sleep(1);
- if (checkinput())
- break;
- }
- }
- else {
- fflush(NULL);
- secs = seconds;
-redo:
- errno = 0;
- ret = sleep(secs);
- if( ret != 0 || errno != 0) {
- fprintf(fp,"sleep got interrupted\n");
- fprintf(fp,"ret was %d\n",ret);
- fprintf(fp,"errno was %d\n",errno);
- secs=ret;
- goto redo;
- }
- }
-
- switcher();
-
- if (loop >= maxloops) {
- CURSE endwin();
- if (nmon_end) {
- child_start(CHLD_END, nmon_end, time_stamp_type, loop, timer);
- /* Give the end - processing some time - 5s for now */
- sleep(5);
- }
-
- fflush(NULL);
- exit(0);
- }
- }
-}