|
|
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.