From c6000c9d9949b3326fb82f02431899ab6774b960 Mon Sep 17 00:00:00 2001
From: Florian Pritz <bluewind@xinu.at>
Date: Sun, 16 Dec 2012 11:51:24 +0100
Subject: big cleanup

---
 nmon/lmon13g.c | 5250 --------------------------------------------------------
 1 file changed, 5250 deletions(-)
 delete mode 100644 nmon/lmon13g.c

(limited to 'nmon/lmon13g.c')

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);
-		}
-	}
-}
-- 
cgit v1.2.3-24-g4f1b