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