[unix-history] / usr / src / usr.bin / vmstat / vmstat.c

static char *sccsid = "@(#)vmstat.c	4.4 (Berkeley) %G%";
#include <stdio.h>
#include <sys/param.h>
#include <sys/vm.h>
#include <sys/dk.h>
#include <nlist.h>
#include <sys/buf.h>
#include <sys/ubavar.h>
#include <sys/mbavar.h>

struct nlist nl[] = {
#define	X_CPTIME	0
	{ "_cp_time" },
#define	X_RATE		1
	{ "_rate" },
#define X_TOTAL		2
	{ "_total" },
#define	X_DEFICIT	3
	{ "_deficit" },
#define	X_FORKSTAT	4
	{ "_forkstat" },
#define X_SUM		5
	{ "_sum" },
#define	X_FIRSTFREE	6
	{ "_firstfree" },
#define	X_MAXFREE	7
	{ "_maxfree" },
#define	X_BOOTIME	8
	{ "_bootime" },
#define	X_DKXFER	9
	{ "_dk_xfer" },
#define X_MBDINIT	10
	{ "_mbdinit" },
#define X_UBDINIT	11
	{ "_ubdinit" },
#define X_REC		12
	{ "_rectime" },
#define X_PGIN		13
	{ "_pgintime" },
#define X_HZ		14
	{ "_hz" },
	{ 0 },
};

char dr_name[DK_NDRIVE][10];
char dr_unit[DK_NDRIVE];
double	stat1();
int	firstfree, maxfree;
int	hz;
struct
{
	int	busy;
	long	time[CPUSTATES];
	long	xfer[DK_NDRIVE];
	struct	vmmeter Rate;
	struct	vmtotal	Total;
	struct	vmmeter Sum;
	struct	forkstat Forkstat;
	unsigned rectime;
	unsigned pgintime;
} s, s1, z;
#define	rate		s.Rate
#define	total		s.Total
#define	sum		s.Sum
#define	forkstat	s.Forkstat

int	zero;
int	deficit;
double	etime;
int 	mf;

main(argc, argv)
char **argv;
{
	time_t now;
	int lines;
	extern char *ctime();
	register i,j;
	int iter, nintv;
	time_t bootime;
	double f1, f2;
	long t;
	extern char _sobuf[];

	setbuf(stdout, _sobuf);
	nlist("/vmunix", nl);
	if(nl[0].n_type == 0) {
		printf("no /vmunix namelist\n");
		exit(1);
	}
	mf = open("/dev/kmem", 0);
	if(mf < 0) {
		printf("cannot open /dev/kmem\n");
		exit(1);
	}
	iter = 0;
	argc--, argv++;
	while (argc>0 && argv[0][0]=='-') {
		char *cp = *argv++;
		argc--;
		while (*++cp) switch (*cp) {

		case 't':
			dotimes();
			exit(0);
		case 'z':
			close(mf);
			mf = open("/dev/kmem", 2);
			lseek(mf, (long)nl[X_SUM].n_value, 0);
			write(mf, &z.Sum, sizeof z.Sum);
			exit(0);

		case 'f':
			doforkst();
			exit(0);
		
		case 's':
			dosum();
			exit(0);

		default:
			fprintf(stderr, "usage: vmstat [ -fs ] [ interval ] [ count]\n");
			exit(1);
		}
	}
	if(argc > 1)
		iter = atoi(argv[1]);
	lseek(mf, (long)nl[X_FIRSTFREE].n_value, 0);
	read(mf, &firstfree, sizeof firstfree);
	lseek(mf, (long)nl[X_MAXFREE].n_value, 0);
	read(mf, &maxfree, sizeof maxfree);
	lseek(mf, (long)nl[X_BOOTIME].n_value, 0);
	read(mf, &bootime, sizeof bootime);
	lseek(mf, (long)nl[X_HZ].n_value, 0);
	read(mf, &hz, sizeof hz);
	for (i = 0; i < DK_NDRIVE; i++)
	{
		strcpy(dr_name[i], "DK");
		dr_unit[i] = i;
	}
	read_names();
	time(&now);
	nintv = now - bootime;
	if (nintv <= 0 || nintv > 60*60*24*365*10) {
		printf("Time makes no sense... namelist must be wrong.\n");
		exit(1);
	}
reprint:
	lines = 20;
	/* s1 = z; */
printf("\
 procs     memory            page        swap  %s %s %s %s  faults          cpu\n\
 r b w   avm  fre  re at pi po fr  de  sr i o  %-2d %-2d %-2d %-2d  in  sy  cs us sy id\n\
", dr_name[0], dr_name[1], dr_name[2], dr_name[3], dr_unit[0], dr_unit[1], dr_unit[2], dr_unit[3]);
loop:
	lseek(mf, (long)nl[X_CPTIME].n_value, 0);
 	read(mf, s.time, sizeof s.time);
	lseek(mf, (long)nl[X_DKXFER].n_value, 0);
	read(mf, s.xfer, sizeof s.xfer);
	if (nintv != 1) {
		lseek(mf, (long)nl[X_SUM].n_value, 0);
		read(mf, &rate, sizeof rate);
	} else {
		lseek(mf, (long)nl[X_RATE].n_value, 0);
		read(mf, &rate, sizeof rate);
	}
	lseek(mf, (long)nl[X_TOTAL].n_value, 0);
	read(mf, &total, sizeof total);
	lseek(mf, (long)nl[X_DEFICIT].n_value, 0);
	read(mf, &deficit, sizeof deficit);
	etime = 0;
	for (i=0; i < DK_NDRIVE; i++) {
		t = s.xfer[i];
		s.xfer[i] -= s1.xfer[i];
		s1.xfer[i] = t;
	}
	for (i=0; i < CPUSTATES; i++) {
		t = s.time[i];
		s.time[i] -= s1.time[i];
		s1.time[i] = t;
		etime += s.time[i];
	}
	if(etime == 0.)
		etime = 1.;
	printf("%2d%2d%2d", total.t_rq, total.t_dw+total.t_pw, total.t_sw);
	printf("%6d%5d", total.t_avm/2, total.t_free/2);
	printf("%4d%3d%3d",
	    (rate.v_pgrec - (rate.v_xsfrec+rate.v_xifrec))/nintv,
	    (rate.v_xsfrec+rate.v_xifrec)/nintv, rate.v_pgin/nintv);
	printf("%3d%3d%4d%4.1f%2d%2d", rate.v_pgout/nintv,
	    rate.v_dfree/nintv, deficit/2,
	    (60.0 * rate.v_scan) / (LOOPSIZ*nintv),
	    rate.v_swpin/nintv, rate.v_swpout/nintv);
	etime /= 60.;
	printf(" ");
	for(i=0; i<4; i++)
		stats(i);
	printf("%4d%4d", (rate.v_intr/nintv) - hz, rate.v_syscall/nintv);
	printf("%4d", rate.v_swtch/nintv);
	for(i=0; i<CPUSTATES; i++) {
		float f = stat1(i);
		if (i == 0) {		/* US+NI */
			i++;
			f += stat1(i);
		}
		printf("%3.0f", f);
	}
	printf("\n");
	fflush(stdout);
contin:
	nintv = 1;
	--iter;
	if(iter)
	if(argc > 0) {
		sleep(atoi(argv[0]));
		if (--lines <= 0)
			goto reprint;
		goto loop;
	}
}

dotimes()
{

	lseek(mf, (long)nl[X_REC].n_value, 0);
	read(mf, &s.rectime, sizeof s.rectime);
	lseek(mf, (long)nl[X_PGIN].n_value, 0);
	read(mf, &s.pgintime, sizeof s.pgintime);
	lseek(mf, (long)nl[X_SUM].n_value, 0);
	read(mf, &sum, sizeof sum);
	printf("%d reclaims, %d total time (usec)\n", sum.v_pgrec, s.rectime);
	printf("average: %d usec / reclaim\n", s.rectime/sum.v_pgrec);
	printf("\n");
	printf("%d page ins, %d total time (msec)\n",sum.v_pgin, s.pgintime/10);
	printf("average: %8.1f msec / page in\n", s.pgintime/(sum.v_pgin*10.0));
}

dosum()
{

	lseek(mf, (long)nl[X_SUM].n_value, 0);
	read(mf, &sum, sizeof sum);
	printf("%9d swap ins\n", sum.v_swpin);
	printf("%9d swap outs\n", sum.v_swpout);
	printf("%9d pages swapped in\n", sum.v_pswpin / CLSIZE);
	printf("%9d pages swapped out\n", sum.v_pswpout / CLSIZE);
	printf("%9d total address trans. faults taken\n", sum.v_faults);
	printf("%9d page ins\n", sum.v_pgin);
	printf("%9d page outs\n", sum.v_pgout);
	printf("%9d total reclaims\n", sum.v_pgrec);
	printf("%9d reclaims from free list\n", sum.v_pgfrec);
	printf("%9d intransit blocking page faults\n", sum.v_intrans);
	printf("%9d zero fill pages created\n", sum.v_nzfod / CLSIZE);
	printf("%9d zero fill page faults\n", sum.v_zfod / CLSIZE);
	printf("%9d executable fill pages created\n", sum.v_nexfod / CLSIZE);
	printf("%9d executable fill page faults\n", sum.v_exfod / CLSIZE);
	printf("%9d swap text pages found in free list\n", sum.v_xsfrec);
	printf("%9d inode text pages found in free list\n", sum.v_xifrec);
	printf("%9d file fill pages created\n", sum.v_nvrfod / CLSIZE);
	printf("%9d file fill page faults\n", sum.v_vrfod / CLSIZE);
	printf("%9d pages examined by the clock daemon\n", sum.v_scan);
	printf("%9d revolutions of the clock hand\n", sum.v_rev);
	printf("%9d pages freed by the clock daemon\n", sum.v_dfree / CLSIZE);
	printf("%9d cpu context switches\n", sum.v_swtch);
	printf("%9d device interrupts\n", sum.v_intr);
	printf("%9d pseduo-dma dz interrupts\n", sum.v_pdma);
	printf("%9d traps\n", sum.v_trap);
	printf("%9d system calls\n", sum.v_syscall);
}


doforkst()
{

	lseek(mf, (long)nl[X_FORKSTAT].n_value, 0);
	read(mf, &forkstat, sizeof forkstat);
	printf("%d forks, %d pages, average=%.2f\n",
		forkstat.cntfork, forkstat.sizfork,
		(float) forkstat.sizfork / forkstat.cntfork);
	printf("%d vforks, %d pages, average=%.2f\n",
		forkstat.cntvfork, forkstat.sizvfork,
		(float)forkstat.sizvfork / forkstat.cntvfork);
}

stats(dn)
{

	if (dn >= DK_NDRIVE) {
		printf("  0");
		return;
	}
	printf("%3.0f", s.xfer[dn]/etime);
}

double
stat1(row)
{
	double t;
	register i;

	t = 0;
	for(i=0; i<CPUSTATES; i++)
		t += s.time[i];
	if(t == 0.)
		t = 1.;
	return(s.time[row]*100./t);
}

pct(top, bot)
{

	if (bot == 0)
		return (0);
	return ((top * 100) / bot);
}

/*
 * Read the drive names out of kmem.
 * ARGH ARGH ARGH ARGH !!!!!!!!!!!!
 */

#define steal(where, var) lseek(mf, where, 0); read(mf, &var, sizeof var);
read_names()
{
	struct mba_device mdev;
	register struct mba_device *mp;
	struct mba_driver mdrv;
	short two_char;
	char *cp = (char *) &two_char;
	struct uba_device udev, *up;
	struct uba_driver udrv;

	mp = (struct mba_device *) nl[X_MBDINIT].n_value;
	up = (struct uba_device *) nl[X_UBDINIT].n_value;
	if (mp == 0 || up == 0)
	{
		fprintf(stderr, "iostat: Disk init info not in namelist\n");
		exit(1);
	}
	while(1)
	{
		steal(mp++, mdev);
		if (mdev.mi_driver == 0)
			break;
		if (mdev.mi_dk < 0 || mdev.mi_alive == 0)
			continue;
		steal(mdev.mi_driver, mdrv);
		steal(mdrv.md_dname, two_char);
		sprintf(dr_name[mdev.mi_dk], "%c%c", cp[0], cp[1]);
		dr_unit[mdev.mi_dk] = mdev.mi_unit;
	}
	while(1)
	{
		steal(up++, udev);
		if (udev.ui_driver == 0)
			break;
		if (udev.ui_dk < 0 || udev.ui_alive == 0)
			continue;
		steal(udev.ui_driver, udrv);
		steal(udrv.ud_dname, two_char);
		sprintf(dr_name[udev.ui_dk], "%c%c", cp[0], cp[1]);
		dr_unit[udev.ui_dk] = udev.ui_unit;
	}
}
Commit	Line	Data
df3e00cc	1	static char *sccsid = "@(#)vmstat.c 4.4 (Berkeley) %G%";
7f02df2f BJ	2	#include <stdio.h>
	3	#include <sys/param.h>
	4	#include <sys/vm.h>
	5	#include <sys/dk.h>
	6	#include <nlist.h>
61d7d2b3 MT	7	#include <sys/buf.h>
	8	#include <sys/ubavar.h>
	9	#include <sys/mbavar.h>
7f02df2f BJ	10
7f02df2f BJ	11	struct nlist nl[] = {
682f1dcb BJ	12	#define X_CPTIME 0
	13	{ "_cp_time" },
	14	#define X_RATE 1
7f02df2f	15	{ "_rate" },
682f1dcb	16	#define X_TOTAL 2
7f02df2f	17	{ "_total" },
682f1dcb	18	#define X_DEFICIT 3
7f02df2f	19	{ "_deficit" },
682f1dcb	20	#define X_FORKSTAT 4
7f02df2f	21	{ "_forkstat" },
682f1dcb	22	#define X_SUM 5
7f02df2f	23	{ "_sum" },
682f1dcb	24	#define X_FIRSTFREE 6
7f02df2f	25	{ "_firstfree" },
682f1dcb	26	#define X_MAXFREE 7
7f02df2f	27	{ "_maxfree" },
682f1dcb	28	#define X_BOOTIME 8
7f02df2f	29	{ "_bootime" },
682f1dcb BJ	30	#define X_DKXFER 9
682f1dcb BJ	31	{ "_dk_xfer" },
61d7d2b3 MT	32	#define X_MBDINIT 10
	33	{ "_mbdinit" },
	34	#define X_UBDINIT 11
	35	{ "_ubdinit" },
	36	#define X_REC 12
7f02df2f	37	{ "_rectime" },
61d7d2b3	38	#define X_PGIN 13
7f02df2f	39	{ "_pgintime" },
61d7d2b3 MT	40	#define X_HZ 14
61d7d2b3 MT	41	{ "_hz" },
7f02df2f BJ	42	{ 0 },
	43	};
	44
61d7d2b3 MT	45	char dr_name[DK_NDRIVE][10];
61d7d2b3 MT	46	char dr_unit[DK_NDRIVE];
7f02df2f BJ	47	double stat1();
7f02df2f BJ	48	int firstfree, maxfree;
61d7d2b3	49	int hz;
7f02df2f BJ	50	struct
	51	{
	52	int busy;
682f1dcb BJ	53	long time[CPUSTATES];
682f1dcb BJ	54	long xfer[DK_NDRIVE];
7f02df2f BJ	55	struct vmmeter Rate;
	56	struct vmtotal Total;
	57	struct vmmeter Sum;
	58	struct forkstat Forkstat;
7f02df2f BJ	59	unsigned rectime;
7f02df2f BJ	60	unsigned pgintime;
7f02df2f BJ	61	} s, s1, z;
	62	#define rate s.Rate
	63	#define total s.Total
	64	#define sum s.Sum
	65	#define forkstat s.Forkstat
	66
7f02df2f BJ	67	int zero;
	68	int deficit;
	69	double etime;
	70	int mf;
	71
	72	main(argc, argv)
	73	char **argv;
	74	{
	75	time_t now;
	76	int lines;
	77	extern char *ctime();
	78	register i,j;
	79	int iter, nintv;
	80	time_t bootime;
	81	double f1, f2;
	82	long t;
	83	extern char _sobuf[];
	84
	85	setbuf(stdout, _sobuf);
	86	nlist("/vmunix", nl);
	87	if(nl[0].n_type == 0) {
	88	printf("no /vmunix namelist\n");
	89	exit(1);
	90	}
	91	mf = open("/dev/kmem", 0);
	92	if(mf < 0) {
	93	printf("cannot open /dev/kmem\n");
	94	exit(1);
	95	}
	96	iter = 0;
	97	argc--, argv++;
	98	while (argc>0 && argv[0][0]=='-') {
	99	char cp = argv++;
	100	argc--;
	101	while (++cp) switch (cp) {
	102
7f02df2f BJ	103	case 't':
	104	dotimes();
	105	exit(0);
7f02df2f BJ	106	case 'z':
	107	close(mf);
	108	mf = open("/dev/kmem", 2);
	109	lseek(mf, (long)nl[X_SUM].n_value, 0);
	110	write(mf, &z.Sum, sizeof z.Sum);
	111	exit(0);
	112
	113	case 'f':
	114	doforkst();
	115	exit(0);
	116
	117	case 's':
	118	dosum();
	119	exit(0);
	120
7f02df2f BJ	121	default:
	122	fprintf(stderr, "usage: vmstat [ -fs ] [ interval ] [ count]\n");
	123	exit(1);
	124	}
	125	}
	126	if(argc > 1)
	127	iter = atoi(argv[1]);
	128	lseek(mf, (long)nl[X_FIRSTFREE].n_value, 0);
	129	read(mf, &firstfree, sizeof firstfree);
	130	lseek(mf, (long)nl[X_MAXFREE].n_value, 0);
	131	read(mf, &maxfree, sizeof maxfree);
	132	lseek(mf, (long)nl[X_BOOTIME].n_value, 0);
	133	read(mf, &bootime, sizeof bootime);
61d7d2b3 MT	134	lseek(mf, (long)nl[X_HZ].n_value, 0);
	135	read(mf, &hz, sizeof hz);
	136	for (i = 0; i < DK_NDRIVE; i++)
	137	{
	138	strcpy(dr_name[i], "DK");
	139	dr_unit[i] = i;
	140	}
	141	read_names();
7f02df2f BJ	142	time(&now);
	143	nintv = now - bootime;
	144	if (nintv <= 0 \|\| nintv > 60602436510) {
	145	printf("Time makes no sense... namelist must be wrong.\n");
	146	exit(1);
	147	}
	148	reprint:
	149	lines = 20;
	150	/* s1 = z; */
7f02df2f	151	printf("\
df3e00cc BJ	152	procs memory page swap %s %s %s %s faults cpu\n\
df3e00cc BJ	153	r b w avm fre re at pi po fr de sr i o %-2d %-2d %-2d %-2d in sy cs us sy id\n\
61d7d2b3	154	", dr_name[0], dr_name[1], dr_name[2], dr_name[3], dr_unit[0], dr_unit[1], dr_unit[2], dr_unit[3]);
7f02df2f	155	loop:
682f1dcb BJ	156	lseek(mf, (long)nl[X_CPTIME].n_value, 0);
	157	read(mf, s.time, sizeof s.time);
	158	lseek(mf, (long)nl[X_DKXFER].n_value, 0);
	159	read(mf, s.xfer, sizeof s.xfer);
7f02df2f BJ	160	if (nintv != 1) {
	161	lseek(mf, (long)nl[X_SUM].n_value, 0);
	162	read(mf, &rate, sizeof rate);
	163	} else {
	164	lseek(mf, (long)nl[X_RATE].n_value, 0);
	165	read(mf, &rate, sizeof rate);
	166	}
	167	lseek(mf, (long)nl[X_TOTAL].n_value, 0);
	168	read(mf, &total, sizeof total);
	169	lseek(mf, (long)nl[X_DEFICIT].n_value, 0);
	170	read(mf, &deficit, sizeof deficit);
682f1dcb	171	etime = 0;
7f02df2f	172	for (i=0; i < DK_NDRIVE; i++) {
682f1dcb BJ	173	t = s.xfer[i];
	174	s.xfer[i] -= s1.xfer[i];
	175	s1.xfer[i] = t;
7f02df2f BJ	176	}
7f02df2f BJ	177	for (i=0; i < CPUSTATES; i++) {
682f1dcb BJ	178	t = s.time[i];
	179	s.time[i] -= s1.time[i];
	180	s1.time[i] = t;
	181	etime += s.time[i];
7f02df2f	182	}
7f02df2f BJ	183	if(etime == 0.)
7f02df2f BJ	184	etime = 1.;
61d7d2b3 MT	185	printf("%2d%2d%2d", total.t_rq, total.t_dw+total.t_pw, total.t_sw);
61d7d2b3 MT	186	printf("%6d%5d", total.t_avm/2, total.t_free/2);
7f02df2f BJ	187	printf("%4d%3d%3d",
	188	(rate.v_pgrec - (rate.v_xsfrec+rate.v_xifrec))/nintv,
	189	(rate.v_xsfrec+rate.v_xifrec)/nintv, rate.v_pgin/nintv);
	190	printf("%3d%3d%4d%4.1f%2d%2d", rate.v_pgout/nintv,
	191	rate.v_dfree/nintv, deficit/2,
	192	(60.0 * rate.v_scan) / (LOOPSIZ*nintv),
	193	rate.v_swpin/nintv, rate.v_swpout/nintv);
	194	etime /= 60.;
	195	printf(" ");
	196	for(i=0; i<4; i++)
	197	stats(i);
61d7d2b3	198	printf("%4d%4d", (rate.v_intr/nintv) - hz, rate.v_syscall/nintv);
7f02df2f BJ	199	printf("%4d", rate.v_swtch/nintv);
	200	for(i=0; i<CPUSTATES; i++) {
	201	float f = stat1(i);
	202	if (i == 0) { /* US+NI */
	203	i++;
	204	f += stat1(i);
	205	}
	206	printf("%3.0f", f);
	207	}
	208	printf("\n");
	209	fflush(stdout);
	210	contin:
	211	nintv = 1;
	212	--iter;
	213	if(iter)
	214	if(argc > 0) {
	215	sleep(atoi(argv[0]));
	216	if (--lines <= 0)
	217	goto reprint;
	218	goto loop;
	219	}
	220	}
	221
7f02df2f BJ	222	dotimes()
	223	{
	224
	225	lseek(mf, (long)nl[X_REC].n_value, 0);
	226	read(mf, &s.rectime, sizeof s.rectime);
	227	lseek(mf, (long)nl[X_PGIN].n_value, 0);
	228	read(mf, &s.pgintime, sizeof s.pgintime);
	229	lseek(mf, (long)nl[X_SUM].n_value, 0);
	230	read(mf, &sum, sizeof sum);
	231	printf("%d reclaims, %d total time (usec)\n", sum.v_pgrec, s.rectime);
	232	printf("average: %d usec / reclaim\n", s.rectime/sum.v_pgrec);
	233	printf("\n");
	234	printf("%d page ins, %d total time (msec)\n",sum.v_pgin, s.pgintime/10);
	235	printf("average: %8.1f msec / page in\n", s.pgintime/(sum.v_pgin*10.0));
	236	}
7f02df2f BJ	237
	238	dosum()
	239	{
	240
	241	lseek(mf, (long)nl[X_SUM].n_value, 0);
	242	read(mf, &sum, sizeof sum);
	243	printf("%9d swap ins\n", sum.v_swpin);
	244	printf("%9d swap outs\n", sum.v_swpout);
	245	printf("%9d pages swapped in\n", sum.v_pswpin / CLSIZE);
	246	printf("%9d pages swapped out\n", sum.v_pswpout / CLSIZE);
	247	printf("%9d total address trans. faults taken\n", sum.v_faults);
	248	printf("%9d page ins\n", sum.v_pgin);
	249	printf("%9d page outs\n", sum.v_pgout);
	250	printf("%9d total reclaims\n", sum.v_pgrec);
	251	printf("%9d reclaims from free list\n", sum.v_pgfrec);
	252	printf("%9d intransit blocking page faults\n", sum.v_intrans);
	253	printf("%9d zero fill pages created\n", sum.v_nzfod / CLSIZE);
	254	printf("%9d zero fill page faults\n", sum.v_zfod / CLSIZE);
	255	printf("%9d executable fill pages created\n", sum.v_nexfod / CLSIZE);
	256	printf("%9d executable fill page faults\n", sum.v_exfod / CLSIZE);
	257	printf("%9d swap text pages found in free list\n", sum.v_xsfrec);
	258	printf("%9d inode text pages found in free list\n", sum.v_xifrec);
	259	printf("%9d file fill pages created\n", sum.v_nvrfod / CLSIZE);
	260	printf("%9d file fill page faults\n", sum.v_vrfod / CLSIZE);
	261	printf("%9d pages examined by the clock daemon\n", sum.v_scan);
	262	printf("%9d revolutions of the clock hand\n", sum.v_rev);
	263	printf("%9d pages freed by the clock daemon\n", sum.v_dfree / CLSIZE);
	264	printf("%9d cpu context switches\n", sum.v_swtch);
	265	printf("%9d device interrupts\n", sum.v_intr);
	266	printf("%9d pseduo-dma dz interrupts\n", sum.v_pdma);
	267	printf("%9d traps\n", sum.v_trap);
	268	printf("%9d system calls\n", sum.v_syscall);
	269	}
	270
	271
	272	doforkst()
	273	{
	274
	275	lseek(mf, (long)nl[X_FORKSTAT].n_value, 0);
	276	read(mf, &forkstat, sizeof forkstat);
	277	printf("%d forks, %d pages, average=%.2f\n",
	278	forkstat.cntfork, forkstat.sizfork,
	279	(float) forkstat.sizfork / forkstat.cntfork);
	280	printf("%d vforks, %d pages, average=%.2f\n",
	281	forkstat.cntvfork, forkstat.sizvfork,
	282	(float)forkstat.sizvfork / forkstat.cntvfork);
	283	}
	284
	285	stats(dn)
	286	{
	287
	288	if (dn >= DK_NDRIVE) {
	289	printf(" 0");
	290	return;
	291	}
682f1dcb	292	printf("%3.0f", s.xfer[dn]/etime);
7f02df2f BJ	293	}
	294
	295	double
	296	stat1(row)
	297	{
682f1dcb BJ	298	double t;
682f1dcb BJ	299	register i;
7f02df2f BJ	300
	301	t = 0;
	302	for(i=0; i<CPUSTATES; i++)
682f1dcb BJ	303	t += s.time[i];
	304	if(t == 0.)
	305	t = 1.;
	306	return(s.time[row]*100./t);
7f02df2f BJ	307	}
	308
	309	pct(top, bot)
	310	{
	311
	312	if (bot == 0)
	313	return (0);
	314	return ((top * 100) / bot);
	315	}
61d7d2b3 MT	316
	317	/*
	318	* Read the drive names out of kmem.
	319	* ARGH ARGH ARGH ARGH !!!!!!!!!!!!
	320	*/
	321
	322	#define steal(where, var) lseek(mf, where, 0); read(mf, &var, sizeof var);
	323	read_names()
	324	{
	325	struct mba_device mdev;
	326	register struct mba_device *mp;
	327	struct mba_driver mdrv;
	328	short two_char;
	329	char cp = (char ) &two_char;
	330	struct uba_device udev, *up;
	331	struct uba_driver udrv;
	332
	333	mp = (struct mba_device *) nl[X_MBDINIT].n_value;
	334	up = (struct uba_device *) nl[X_UBDINIT].n_value;
	335	if (mp == 0 \|\| up == 0)
	336	{
	337	fprintf(stderr, "iostat: Disk init info not in namelist\n");
	338	exit(1);
	339	}
	340	while(1)
	341	{
	342	steal(mp++, mdev);
	343	if (mdev.mi_driver == 0)
	344	break;
	345	if (mdev.mi_dk < 0 \|\| mdev.mi_alive == 0)
	346	continue;
	347	steal(mdev.mi_driver, mdrv);
	348	steal(mdrv.md_dname, two_char);
	349	sprintf(dr_name[mdev.mi_dk], "%c%c", cp[0], cp[1]);
	350	dr_unit[mdev.mi_dk] = mdev.mi_unit;
	351	}
	352	while(1)
	353	{
	354	steal(up++, udev);
	355	if (udev.ui_driver == 0)
	356	break;
	357	if (udev.ui_dk < 0 \|\| udev.ui_alive == 0)
	358	continue;
	359	steal(udev.ui_driver, udrv);
	360	steal(udrv.ud_dname, two_char);
	361	sprintf(dr_name[udev.ui_dk], "%c%c", cp[0], cp[1]);
	362	dr_unit[udev.ui_dk] = udev.ui_unit;
	363	}
	364	}