| 1 | /* |
| 2 | * Copyright (c) 1980 The Regents of the University of California. |
| 3 | * All rights reserved. |
| 4 | * |
| 5 | * Redistribution and use in source and binary forms are permitted |
| 6 | * provided that the above copyright notice and this paragraph are |
| 7 | * duplicated in all such forms and that any documentation, |
| 8 | * advertising materials, and other materials related to such |
| 9 | * distribution and use acknowledge that the software was developed |
| 10 | * by the University of California, Berkeley. The name of the |
| 11 | * University may not be used to endorse or promote products derived |
| 12 | * from this software without specific prior written permission. |
| 13 | * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR |
| 14 | * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED |
| 15 | * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. |
| 16 | */ |
| 17 | |
| 18 | #ifndef lint |
| 19 | char copyright[] = |
| 20 | "@(#) Copyright (c) 1980 The Regents of the University of California.\n\ |
| 21 | All rights reserved.\n"; |
| 22 | #endif /* not lint */ |
| 23 | |
| 24 | #ifndef lint |
| 25 | static char sccsid[] = "@(#)vmstat.c 5.19 (Berkeley) %G%"; |
| 26 | #endif /* not lint */ |
| 27 | |
| 28 | #include <sys/param.h> |
| 29 | #include <sys/file.h> |
| 30 | #include <sys/vm.h> |
| 31 | #include <sys/dkstat.h> |
| 32 | #include <sys/buf.h> |
| 33 | #include <sys/namei.h> |
| 34 | #include <sys/text.h> |
| 35 | #include <sys/malloc.h> |
| 36 | #include <stdio.h> |
| 37 | #include <ctype.h> |
| 38 | #include <nlist.h> |
| 39 | #include <paths.h> |
| 40 | |
| 41 | struct nlist nl[] = { |
| 42 | #define X_CPTIME 0 |
| 43 | { "_cp_time" }, |
| 44 | #define X_RATE 1 |
| 45 | { "_rate" }, |
| 46 | #define X_TOTAL 2 |
| 47 | { "_total" }, |
| 48 | #define X_DEFICIT 3 |
| 49 | { "_deficit" }, |
| 50 | #define X_FORKSTAT 4 |
| 51 | { "_forkstat" }, |
| 52 | #define X_SUM 5 |
| 53 | { "_sum" }, |
| 54 | #define X_FIRSTFREE 6 |
| 55 | { "_firstfree" }, |
| 56 | #define X_MAXFREE 7 |
| 57 | { "_maxfree" }, |
| 58 | #define X_BOOTTIME 8 |
| 59 | { "_boottime" }, |
| 60 | #define X_DKXFER 9 |
| 61 | { "_dk_xfer" }, |
| 62 | #define X_REC 10 |
| 63 | { "_rectime" }, |
| 64 | #define X_PGIN 11 |
| 65 | { "_pgintime" }, |
| 66 | #define X_HZ 12 |
| 67 | { "_hz" }, |
| 68 | #define X_PHZ 13 |
| 69 | { "_phz" }, |
| 70 | #define X_NCHSTATS 14 |
| 71 | { "_nchstats" }, |
| 72 | #define X_INTRNAMES 15 |
| 73 | { "_intrnames" }, |
| 74 | #define X_EINTRNAMES 16 |
| 75 | { "_eintrnames" }, |
| 76 | #define X_INTRCNT 17 |
| 77 | { "_intrcnt" }, |
| 78 | #define X_EINTRCNT 18 |
| 79 | { "_eintrcnt" }, |
| 80 | #define X_DK_NDRIVE 19 |
| 81 | { "_dk_ndrive" }, |
| 82 | #define X_XSTATS 20 |
| 83 | { "_xstats" }, |
| 84 | #define X_KMEMSTAT 21 |
| 85 | { "_kmemstats" }, |
| 86 | #define X_KMEMBUCKETS 22 |
| 87 | { "_bucket" }, |
| 88 | #ifdef vax |
| 89 | #define X_MBDINIT (X_XSTATS+1) |
| 90 | { "_mbdinit" }, |
| 91 | #define X_UBDINIT (X_XSTATS+2) |
| 92 | { "_ubdinit" }, |
| 93 | #endif |
| 94 | #ifdef tahoe |
| 95 | #define X_VBDINIT (X_XSTATS+1) |
| 96 | { "_vbdinit" }, |
| 97 | #define X_CKEYSTATS (X_XSTATS+2) |
| 98 | { "_ckeystats" }, |
| 99 | #define X_DKEYSTATS (X_XSTATS+3) |
| 100 | { "_dkeystats" }, |
| 101 | #endif |
| 102 | { "" }, |
| 103 | }; |
| 104 | |
| 105 | char **dr_name; |
| 106 | int *dr_select; |
| 107 | int dk_ndrive; |
| 108 | int ndrives = 0; |
| 109 | #ifdef vax |
| 110 | char *defdrives[] = { "hp0", "hp1", "hp2", 0 }; |
| 111 | #else |
| 112 | char *defdrives[] = { 0 }; |
| 113 | #endif |
| 114 | double stat1(); |
| 115 | int firstfree, maxfree; |
| 116 | int hz; |
| 117 | int phz; |
| 118 | int HZ; |
| 119 | |
| 120 | struct { |
| 121 | int busy; |
| 122 | long time[CPUSTATES]; |
| 123 | long *xfer; |
| 124 | struct vmmeter Rate; |
| 125 | struct vmtotal Total; |
| 126 | struct vmmeter Sum; |
| 127 | struct forkstat Forkstat; |
| 128 | unsigned rectime; |
| 129 | unsigned pgintime; |
| 130 | } s, s1, z; |
| 131 | #define rate s.Rate |
| 132 | #define total s.Total |
| 133 | #define sum s.Sum |
| 134 | #define forkstat s.Forkstat |
| 135 | |
| 136 | struct vmmeter osum; |
| 137 | int deficit; |
| 138 | double etime; |
| 139 | int mf; |
| 140 | time_t now, boottime; |
| 141 | int printhdr(); |
| 142 | int lines = 1; |
| 143 | |
| 144 | #define INTS(x) ((x) - (hz + phz)) |
| 145 | |
| 146 | main(argc, argv) |
| 147 | int argc; |
| 148 | char **argv; |
| 149 | { |
| 150 | extern char *ctime(); |
| 151 | register i; |
| 152 | int iter, nintv, iflag = 0; |
| 153 | long t; |
| 154 | char *arg, **cp, buf[BUFSIZ]; |
| 155 | |
| 156 | nlist(_PATH_UNIX, nl); |
| 157 | if(nl[0].n_type == 0) { |
| 158 | fprintf(stderr, "vmstat: no %s namelist\n", _PATH_UNIX); |
| 159 | exit(1); |
| 160 | } |
| 161 | mf = open(_PATH_KMEM, 0); |
| 162 | if(mf < 0) { |
| 163 | fprintf(stderr, "vmstat: cannot open %s\n", _PATH_KMEM); |
| 164 | exit(1); |
| 165 | } |
| 166 | iter = 0; |
| 167 | argc--, argv++; |
| 168 | while (argc>0 && argv[0][0]=='-') { |
| 169 | char *cp = *argv++; |
| 170 | argc--; |
| 171 | while (*++cp) switch (*cp) { |
| 172 | |
| 173 | case 't': |
| 174 | dotimes(); |
| 175 | exit(0); |
| 176 | |
| 177 | case 'z': |
| 178 | close(mf); |
| 179 | mf = open(_PATH_KMEM, 2); |
| 180 | lseek(mf, (long)nl[X_SUM].n_value, L_SET); |
| 181 | write(mf, &z.Sum, sizeof z.Sum); |
| 182 | exit(0); |
| 183 | |
| 184 | case 'f': |
| 185 | doforkst(); |
| 186 | exit(0); |
| 187 | |
| 188 | case 'm': |
| 189 | domem(); |
| 190 | exit(0); |
| 191 | |
| 192 | case 's': |
| 193 | dosum(); |
| 194 | exit(0); |
| 195 | |
| 196 | case 'i': |
| 197 | iflag++; |
| 198 | break; |
| 199 | |
| 200 | default: |
| 201 | fprintf(stderr, |
| 202 | "usage: vmstat [ -fsim ] [ interval ] [ count]\n"); |
| 203 | exit(1); |
| 204 | } |
| 205 | } |
| 206 | lseek(mf, (long)nl[X_FIRSTFREE].n_value, L_SET); |
| 207 | read(mf, &firstfree, sizeof firstfree); |
| 208 | lseek(mf, (long)nl[X_MAXFREE].n_value, L_SET); |
| 209 | read(mf, &maxfree, sizeof maxfree); |
| 210 | lseek(mf, (long)nl[X_BOOTTIME].n_value, L_SET); |
| 211 | read(mf, &boottime, sizeof boottime); |
| 212 | lseek(mf, (long)nl[X_HZ].n_value, L_SET); |
| 213 | read(mf, &hz, sizeof hz); |
| 214 | if (nl[X_PHZ].n_value != 0) { |
| 215 | lseek(mf, (long)nl[X_PHZ].n_value, L_SET); |
| 216 | read(mf, &phz, sizeof phz); |
| 217 | } |
| 218 | HZ = phz ? phz : hz; |
| 219 | if (nl[X_DK_NDRIVE].n_value == 0) { |
| 220 | fprintf(stderr, "dk_ndrive undefined in system\n"); |
| 221 | exit(1); |
| 222 | } |
| 223 | lseek(mf, nl[X_DK_NDRIVE].n_value, L_SET); |
| 224 | read(mf, &dk_ndrive, sizeof (dk_ndrive)); |
| 225 | if (dk_ndrive <= 0) { |
| 226 | fprintf(stderr, "dk_ndrive %d\n", dk_ndrive); |
| 227 | exit(1); |
| 228 | } |
| 229 | dr_select = (int *)calloc(dk_ndrive, sizeof (int)); |
| 230 | dr_name = (char **)calloc(dk_ndrive, sizeof (char *)); |
| 231 | #define allocate(e, t) \ |
| 232 | s./**/e = (t *)calloc(dk_ndrive, sizeof (t)); \ |
| 233 | s1./**/e = (t *)calloc(dk_ndrive, sizeof (t)); |
| 234 | allocate(xfer, long); |
| 235 | for (arg = buf, i = 0; i < dk_ndrive; i++) { |
| 236 | dr_name[i] = arg; |
| 237 | sprintf(dr_name[i], "dk%d", i); |
| 238 | arg += strlen(dr_name[i]) + 1; |
| 239 | } |
| 240 | read_names(); |
| 241 | time(&now); |
| 242 | nintv = now - boottime; |
| 243 | if (nintv <= 0 || nintv > 60*60*24*365*10) { |
| 244 | fprintf(stderr, |
| 245 | "Time makes no sense... namelist must be wrong.\n"); |
| 246 | exit(1); |
| 247 | } |
| 248 | if (iflag) { |
| 249 | dointr(nintv); |
| 250 | exit(0); |
| 251 | } |
| 252 | /* |
| 253 | * Choose drives to be displayed. Priority |
| 254 | * goes to (in order) drives supplied as arguments, |
| 255 | * default drives. If everything isn't filled |
| 256 | * in and there are drives not taken care of, |
| 257 | * display the first few that fit. |
| 258 | */ |
| 259 | ndrives = 0; |
| 260 | while (argc > 0 && !isdigit(argv[0][0])) { |
| 261 | for (i = 0; i < dk_ndrive; i++) { |
| 262 | if (strcmp(dr_name[i], argv[0])) |
| 263 | continue; |
| 264 | dr_select[i] = 1; |
| 265 | ndrives++; |
| 266 | } |
| 267 | argc--, argv++; |
| 268 | } |
| 269 | for (i = 0; i < dk_ndrive && ndrives < 4; i++) { |
| 270 | if (dr_select[i]) |
| 271 | continue; |
| 272 | for (cp = defdrives; *cp; cp++) |
| 273 | if (strcmp(dr_name[i], *cp) == 0) { |
| 274 | dr_select[i] = 1; |
| 275 | ndrives++; |
| 276 | break; |
| 277 | } |
| 278 | } |
| 279 | for (i = 0; i < dk_ndrive && ndrives < 4; i++) { |
| 280 | if (dr_select[i]) |
| 281 | continue; |
| 282 | dr_select[i] = 1; |
| 283 | ndrives++; |
| 284 | } |
| 285 | if (argc > 1) |
| 286 | iter = atoi(argv[1]); |
| 287 | signal(SIGCONT, printhdr); |
| 288 | loop: |
| 289 | if (--lines == 0) |
| 290 | printhdr(); |
| 291 | lseek(mf, (long)nl[X_CPTIME].n_value, L_SET); |
| 292 | read(mf, s.time, sizeof s.time); |
| 293 | lseek(mf, (long)nl[X_DKXFER].n_value, L_SET); |
| 294 | read(mf, s.xfer, dk_ndrive * sizeof (long)); |
| 295 | if (nintv != 1) |
| 296 | lseek(mf, (long)nl[X_SUM].n_value, L_SET); |
| 297 | else |
| 298 | lseek(mf, (long)nl[X_RATE].n_value, L_SET); |
| 299 | read(mf, &rate, sizeof rate); |
| 300 | lseek(mf, (long)nl[X_TOTAL].n_value, L_SET); |
| 301 | read(mf, &total, sizeof total); |
| 302 | osum = sum; |
| 303 | lseek(mf, (long)nl[X_SUM].n_value, L_SET); |
| 304 | read(mf, &sum, sizeof sum); |
| 305 | lseek(mf, (long)nl[X_DEFICIT].n_value, L_SET); |
| 306 | read(mf, &deficit, sizeof deficit); |
| 307 | etime = 0; |
| 308 | for (i=0; i < dk_ndrive; i++) { |
| 309 | t = s.xfer[i]; |
| 310 | s.xfer[i] -= s1.xfer[i]; |
| 311 | s1.xfer[i] = t; |
| 312 | } |
| 313 | for (i=0; i < CPUSTATES; i++) { |
| 314 | t = s.time[i]; |
| 315 | s.time[i] -= s1.time[i]; |
| 316 | s1.time[i] = t; |
| 317 | etime += s.time[i]; |
| 318 | } |
| 319 | if(etime == 0.) |
| 320 | etime = 1.; |
| 321 | printf("%2d%2d%2d", total.t_rq, total.t_dw+total.t_pw, total.t_sw); |
| 322 | #define pgtok(a) ((a)*NBPG/1024) |
| 323 | printf("%6d%6d", pgtok(total.t_avm), pgtok(total.t_free)); |
| 324 | printf("%4d%3d", (rate.v_pgrec - (rate.v_xsfrec+rate.v_xifrec))/nintv, |
| 325 | (rate.v_xsfrec+rate.v_xifrec)/nintv); |
| 326 | printf("%4d", pgtok(rate.v_pgpgin)/nintv); |
| 327 | printf("%4d%4d%4d%4d", pgtok(rate.v_pgpgout)/nintv, |
| 328 | pgtok(rate.v_dfree)/nintv, pgtok(deficit), rate.v_scan/nintv); |
| 329 | etime /= (float)HZ; |
| 330 | for (i = 0; i < dk_ndrive; i++) |
| 331 | if (dr_select[i]) |
| 332 | stats(i); |
| 333 | printf("%4d%4d%4d", INTS(rate.v_intr/nintv), rate.v_syscall/nintv, |
| 334 | rate.v_swtch/nintv); |
| 335 | for(i=0; i<CPUSTATES; i++) { |
| 336 | float f = stat1(i); |
| 337 | if (i == 0) { /* US+NI */ |
| 338 | i++; |
| 339 | f += stat1(i); |
| 340 | } |
| 341 | printf("%3.0f", f); |
| 342 | } |
| 343 | printf("\n"); |
| 344 | fflush(stdout); |
| 345 | nintv = 1; |
| 346 | if (--iter &&argc > 0) { |
| 347 | sleep(atoi(argv[0])); |
| 348 | goto loop; |
| 349 | } |
| 350 | } |
| 351 | |
| 352 | printhdr() |
| 353 | { |
| 354 | register int i, j; |
| 355 | |
| 356 | printf(" procs memory page "); |
| 357 | i = (ndrives * 3 - 6) / 2; |
| 358 | if (i < 0) |
| 359 | i = 0; |
| 360 | for (j = 0; j < i; j++) |
| 361 | putchar(' '); |
| 362 | printf("faults"); |
| 363 | i = ndrives * 3 - 6 - i; |
| 364 | for (j = 0; j < i; j++) |
| 365 | putchar(' '); |
| 366 | printf(" cpu\n"); |
| 367 | printf(" r b w avm fre re at pi po fr de sr "); |
| 368 | for (i = 0; i < dk_ndrive; i++) |
| 369 | if (dr_select[i]) |
| 370 | printf("%c%c ", dr_name[i][0], dr_name[i][2]); |
| 371 | printf(" in sy cs us sy id\n"); |
| 372 | lines = 19; |
| 373 | } |
| 374 | |
| 375 | dotimes() |
| 376 | { |
| 377 | |
| 378 | lseek(mf, (long)nl[X_REC].n_value, L_SET); |
| 379 | read(mf, &s.rectime, sizeof s.rectime); |
| 380 | lseek(mf, (long)nl[X_PGIN].n_value, L_SET); |
| 381 | read(mf, &s.pgintime, sizeof s.pgintime); |
| 382 | lseek(mf, (long)nl[X_SUM].n_value, L_SET); |
| 383 | read(mf, &sum, sizeof sum); |
| 384 | printf("%d reclaims, %d total time (usec)\n", sum.v_pgrec, s.rectime); |
| 385 | printf("average: %d usec / reclaim\n", s.rectime/sum.v_pgrec); |
| 386 | printf("\n"); |
| 387 | printf("%d page ins, %d total time (msec)\n",sum.v_pgin, s.pgintime/10); |
| 388 | printf("average: %8.1f msec / page in\n", s.pgintime/(sum.v_pgin*10.0)); |
| 389 | } |
| 390 | |
| 391 | #if defined(tahoe) |
| 392 | #include <tahoe/cpu.h> |
| 393 | #endif |
| 394 | |
| 395 | dosum() |
| 396 | { |
| 397 | struct nchstats nchstats; |
| 398 | struct xstats xstats; |
| 399 | long nchtotal; |
| 400 | #if defined(tahoe) |
| 401 | struct keystats keystats; |
| 402 | #endif |
| 403 | |
| 404 | lseek(mf, (long)nl[X_SUM].n_value, L_SET); |
| 405 | read(mf, &sum, sizeof sum); |
| 406 | printf("%9d swap ins\n", sum.v_swpin); |
| 407 | printf("%9d swap outs\n", sum.v_swpout); |
| 408 | printf("%9d pages swapped in\n", sum.v_pswpin / CLSIZE); |
| 409 | printf("%9d pages swapped out\n", sum.v_pswpout / CLSIZE); |
| 410 | printf("%9d total address trans. faults taken\n", sum.v_faults); |
| 411 | printf("%9d page ins\n", sum.v_pgin); |
| 412 | printf("%9d page outs\n", sum.v_pgout); |
| 413 | printf("%9d pages paged in\n", sum.v_pgpgin); |
| 414 | printf("%9d pages paged out\n", sum.v_pgpgout); |
| 415 | printf("%9d sequential process pages freed\n", sum.v_seqfree); |
| 416 | printf("%9d total reclaims (%d%% fast)\n", sum.v_pgrec, |
| 417 | pct(sum.v_fastpgrec, sum.v_pgrec)); |
| 418 | printf("%9d reclaims from free list\n", sum.v_pgfrec); |
| 419 | printf("%9d intransit blocking page faults\n", sum.v_intrans); |
| 420 | printf("%9d zero fill pages created\n", sum.v_nzfod / CLSIZE); |
| 421 | printf("%9d zero fill page faults\n", sum.v_zfod / CLSIZE); |
| 422 | printf("%9d executable fill pages created\n", sum.v_nexfod / CLSIZE); |
| 423 | printf("%9d executable fill page faults\n", sum.v_exfod / CLSIZE); |
| 424 | printf("%9d swap text pages found in free list\n", sum.v_xsfrec); |
| 425 | printf("%9d inode text pages found in free list\n", sum.v_xifrec); |
| 426 | printf("%9d file fill pages created\n", sum.v_nvrfod / CLSIZE); |
| 427 | printf("%9d file fill page faults\n", sum.v_vrfod / CLSIZE); |
| 428 | printf("%9d pages examined by the clock daemon\n", sum.v_scan); |
| 429 | printf("%9d revolutions of the clock hand\n", sum.v_rev); |
| 430 | printf("%9d pages freed by the clock daemon\n", sum.v_dfree / CLSIZE); |
| 431 | printf("%9d cpu context switches\n", sum.v_swtch); |
| 432 | printf("%9d device interrupts\n", sum.v_intr); |
| 433 | printf("%9d software interrupts\n", sum.v_soft); |
| 434 | #ifdef vax |
| 435 | printf("%9d pseudo-dma dz interrupts\n", sum.v_pdma); |
| 436 | #endif |
| 437 | printf("%9d traps\n", sum.v_trap); |
| 438 | printf("%9d system calls\n", sum.v_syscall); |
| 439 | lseek(mf, (long)nl[X_NCHSTATS].n_value, 0); |
| 440 | read(mf, &nchstats, sizeof nchstats); |
| 441 | nchtotal = nchstats.ncs_goodhits + nchstats.ncs_neghits + |
| 442 | nchstats.ncs_badhits + nchstats.ncs_falsehits + |
| 443 | nchstats.ncs_miss + nchstats.ncs_long; |
| 444 | printf("%9d total name lookups\n", nchtotal); |
| 445 | printf("%9s cache hits (%d%% pos + %d%% neg) system %d%% per-process\n", |
| 446 | "", pct(nchstats.ncs_goodhits, nchtotal), |
| 447 | pct(nchstats.ncs_neghits, nchtotal), |
| 448 | pct(nchstats.ncs_pass2, nchtotal)); |
| 449 | printf("%9s deletions %d%%, falsehits %d%%, toolong %d%%\n", "", |
| 450 | pct(nchstats.ncs_badhits, nchtotal), |
| 451 | pct(nchstats.ncs_falsehits, nchtotal), |
| 452 | pct(nchstats.ncs_long, nchtotal)); |
| 453 | lseek(mf, (long)nl[X_XSTATS].n_value, 0); |
| 454 | read(mf, &xstats, sizeof xstats); |
| 455 | printf("%9d total calls to xalloc (cache hits %d%%)\n", |
| 456 | xstats.alloc, pct(xstats.alloc_cachehit, xstats.alloc)); |
| 457 | printf("%9s sticky %d flushed %d unused %d\n", "", |
| 458 | xstats.alloc_inuse, xstats.alloc_cacheflush, xstats.alloc_unused); |
| 459 | printf("%9d total calls to xfree", xstats.free); |
| 460 | printf(" (sticky %d cached %d swapped %d)\n", |
| 461 | xstats.free_inuse, xstats.free_cache, xstats.free_cacheswap); |
| 462 | #if defined(tahoe) |
| 463 | lseek(mf, (long)nl[X_CKEYSTATS].n_value, 0); |
| 464 | read(mf, &keystats, sizeof keystats); |
| 465 | printf("%9d %s (free %d%% norefs %d%% taken %d%% shared %d%%)\n", |
| 466 | keystats.ks_allocs, "code cache keys allocated", |
| 467 | pct(keystats.ks_allocfree, keystats.ks_allocs), |
| 468 | pct(keystats.ks_norefs, keystats.ks_allocs), |
| 469 | pct(keystats.ks_taken, keystats.ks_allocs), |
| 470 | pct(keystats.ks_shared, keystats.ks_allocs)); |
| 471 | lseek(mf, (long)nl[X_DKEYSTATS].n_value, 0); |
| 472 | read(mf, &keystats, sizeof keystats); |
| 473 | printf("%9d %s (free %d%% norefs %d%% taken %d%% shared %d%%)\n", |
| 474 | keystats.ks_allocs, "data cache keys allocated", |
| 475 | pct(keystats.ks_allocfree, keystats.ks_allocs), |
| 476 | pct(keystats.ks_norefs, keystats.ks_allocs), |
| 477 | pct(keystats.ks_taken, keystats.ks_allocs), |
| 478 | pct(keystats.ks_shared, keystats.ks_allocs)); |
| 479 | #endif |
| 480 | } |
| 481 | |
| 482 | doforkst() |
| 483 | { |
| 484 | |
| 485 | lseek(mf, (long)nl[X_FORKSTAT].n_value, L_SET); |
| 486 | read(mf, &forkstat, sizeof forkstat); |
| 487 | printf("%d forks, %d pages, average=%.2f\n", |
| 488 | forkstat.cntfork, forkstat.sizfork, |
| 489 | (float) forkstat.sizfork / forkstat.cntfork); |
| 490 | printf("%d vforks, %d pages, average=%.2f\n", |
| 491 | forkstat.cntvfork, forkstat.sizvfork, |
| 492 | (float)forkstat.sizvfork / forkstat.cntvfork); |
| 493 | } |
| 494 | |
| 495 | stats(dn) |
| 496 | { |
| 497 | |
| 498 | if (dn >= dk_ndrive) { |
| 499 | printf(" 0"); |
| 500 | return; |
| 501 | } |
| 502 | printf("%3.0f", s.xfer[dn]/etime); |
| 503 | } |
| 504 | |
| 505 | double |
| 506 | stat1(row) |
| 507 | { |
| 508 | double t; |
| 509 | register i; |
| 510 | |
| 511 | t = 0; |
| 512 | for(i=0; i<CPUSTATES; i++) |
| 513 | t += s.time[i]; |
| 514 | if(t == 0.) |
| 515 | t = 1.; |
| 516 | return(s.time[row]*100./t); |
| 517 | } |
| 518 | |
| 519 | pct(top, bot) |
| 520 | { |
| 521 | |
| 522 | if (bot == 0) |
| 523 | return (0); |
| 524 | return ((top * 100) / bot); |
| 525 | } |
| 526 | |
| 527 | dointr(nintv) |
| 528 | { |
| 529 | int nintr, inttotal; |
| 530 | long *intrcnt; |
| 531 | char *intrname, *malloc(); |
| 532 | |
| 533 | nintr = (nl[X_EINTRCNT].n_value - nl[X_INTRCNT].n_value) / sizeof(long); |
| 534 | intrcnt = (long *) malloc(nl[X_EINTRCNT].n_value - |
| 535 | nl[X_INTRCNT].n_value); |
| 536 | intrname = malloc(nl[X_EINTRNAMES].n_value - nl[X_INTRNAMES].n_value); |
| 537 | if (intrcnt == NULL || intrname == NULL) { |
| 538 | fprintf(stderr, "vmstat: out of memory\n"); |
| 539 | exit(9); |
| 540 | } |
| 541 | lseek(mf, (long)nl[X_INTRCNT].n_value, L_SET); |
| 542 | read(mf, intrcnt, nintr * sizeof (long)); |
| 543 | lseek(mf, (long)nl[X_INTRNAMES].n_value, L_SET); |
| 544 | read(mf, intrname, nl[X_EINTRNAMES].n_value - nl[X_INTRNAMES].n_value); |
| 545 | printf("interrupt total rate\n"); |
| 546 | inttotal = 0; |
| 547 | while (nintr--) { |
| 548 | if (*intrcnt) |
| 549 | printf("%-12s %8ld %8ld\n", intrname, |
| 550 | *intrcnt, *intrcnt / nintv); |
| 551 | intrname += strlen(intrname) + 1; |
| 552 | inttotal += *intrcnt++; |
| 553 | } |
| 554 | printf("Total %8ld %8ld\n", inttotal, inttotal / nintv); |
| 555 | } |
| 556 | |
| 557 | /* |
| 558 | * These names must be kept in sync with |
| 559 | * the types defined in <sys/malloc.h>. |
| 560 | */ |
| 561 | char *kmemnames[] = { |
| 562 | "free", /* 0 M_FREE */ |
| 563 | "mbuf", /* 1 M_MBUF */ |
| 564 | "devbuf", /* 2 M_DEVBUF */ |
| 565 | "socket", /* 3 M_SOCKET */ |
| 566 | "pcb", /* 4 M_PCB */ |
| 567 | "routetbl", /* 5 M_RTABLE */ |
| 568 | "hosttbl", /* 6 M_HTABLE */ |
| 569 | "fragtbl", /* 7 M_FTABLE */ |
| 570 | "zombie", /* 8 M_ZOMBIE */ |
| 571 | "ifaddr", /* 9 M_IFADDR */ |
| 572 | "soopts", /* 10 M_SOOPTS */ |
| 573 | "soname", /* 11 M_SONAME */ |
| 574 | "namei", /* 12 M_NAMEI */ |
| 575 | "gprof", /* 13 M_GPROF */ |
| 576 | "ioctlops", /* 14 M_IOCTLOPS */ |
| 577 | "superblk", /* 15 M_SUPERBLK */ |
| 578 | "cred", /* 16 M_CRED */ |
| 579 | "pgrp", /* 17 M_PGRP */ |
| 580 | "session", /* 18 M_SESSION */ |
| 581 | "iov", /* 19 M_IOV */ |
| 582 | "mount", /* 20 M_MOUNT */ |
| 583 | "fhandle", /* 21 M_FHANDLE */ |
| 584 | "NFS req", /* 22 M_NFSREQ */ |
| 585 | "NFS mount", /* 23 M_NFSMNT */ |
| 586 | "vnodes", /* 24 M_VNODE */ |
| 587 | "namecache", /* 25 M_CACHE */ |
| 588 | "UFS quota", /* 26 M_DQUOT */ |
| 589 | "UFS mount", /* 27 M_UFSMNT */ |
| 590 | 0, |
| 591 | 0, 0, 0, 0, 0, |
| 592 | 0, 0, 0, 0, 0, |
| 593 | 0, 0, 0, 0, 0, |
| 594 | 0, 0, 0, 0, 0, |
| 595 | "temp", /* 49 M_TEMP */ |
| 596 | }; |
| 597 | |
| 598 | domem() |
| 599 | { |
| 600 | struct kmemstats kmemstats[M_LAST]; |
| 601 | struct kmembuckets buckets[MINBUCKET + 16]; |
| 602 | register struct kmembuckets *kp; |
| 603 | register struct kmemstats *ks; |
| 604 | int i; |
| 605 | |
| 606 | lseek(mf, (long)nl[X_KMEMBUCKETS].n_value, L_SET); |
| 607 | read(mf, buckets, sizeof buckets); |
| 608 | printf("Memory statistics by bucket size\n"); |
| 609 | printf(" Size In Use Free Requests HighWater Couldfree\n"); |
| 610 | for (i = MINBUCKET, kp = &buckets[i]; i < MINBUCKET + 16; i++, kp++) { |
| 611 | if (kp->kb_calls == 0) |
| 612 | continue; |
| 613 | printf("%8d%9d%7d%11d%8d%11d\n", 1 << i, |
| 614 | kp->kb_total - kp->kb_totalfree, |
| 615 | kp->kb_totalfree, kp->kb_calls, |
| 616 | kp->kb_highwat, kp->kb_couldfree); |
| 617 | |
| 618 | } |
| 619 | lseek(mf, (long)nl[X_KMEMSTAT].n_value, L_SET); |
| 620 | read(mf, kmemstats, sizeof kmemstats); |
| 621 | printf("Memory statistics by type\n"); |
| 622 | printf(" Type In Use MemUse HighUse Limit Requests %s\n", |
| 623 | "TypeLimit KernLimit"); |
| 624 | for (i = 0, ks = &kmemstats[0]; i < M_LAST; i++, ks++) { |
| 625 | if (ks->ks_calls == 0) |
| 626 | continue; |
| 627 | printf("%10s%7d%8dK%9dK%6dK%9d%7d%10d\n", |
| 628 | kmemnames[i] ? kmemnames[i] : "undefined", |
| 629 | ks->ks_inuse, (ks->ks_memuse + 1023) / 1024, |
| 630 | (ks->ks_maxused + 1023) / 1024, |
| 631 | (ks->ks_limit + 1023) / 1024, ks->ks_calls, |
| 632 | ks->ks_limblocks, ks->ks_mapblocks); |
| 633 | } |
| 634 | } |
| 635 | |
| 636 | #define steal(where, var) \ |
| 637 | lseek(mf, where, L_SET); read(mf, &var, sizeof var); |
| 638 | /* |
| 639 | * Read the drive names out of kmem. |
| 640 | */ |
| 641 | #ifdef vax |
| 642 | #include <vaxuba/ubavar.h> |
| 643 | #include <vaxmba/mbavar.h> |
| 644 | |
| 645 | read_names() |
| 646 | { |
| 647 | struct mba_device mdev; |
| 648 | register struct mba_device *mp; |
| 649 | struct mba_driver mdrv; |
| 650 | short two_char; |
| 651 | char *cp = (char *) &two_char; |
| 652 | struct uba_device udev, *up; |
| 653 | struct uba_driver udrv; |
| 654 | |
| 655 | mp = (struct mba_device *) nl[X_MBDINIT].n_value; |
| 656 | up = (struct uba_device *) nl[X_UBDINIT].n_value; |
| 657 | if (up == 0) { |
| 658 | fprintf(stderr, "vmstat: Disk init info not in namelist\n"); |
| 659 | exit(1); |
| 660 | } |
| 661 | if (mp) for (;;) { |
| 662 | steal(mp++, mdev); |
| 663 | if (mdev.mi_driver == 0) |
| 664 | break; |
| 665 | if (mdev.mi_dk < 0 || mdev.mi_alive == 0) |
| 666 | continue; |
| 667 | steal(mdev.mi_driver, mdrv); |
| 668 | steal(mdrv.md_dname, two_char); |
| 669 | sprintf(dr_name[mdev.mi_dk], "%c%c%d", |
| 670 | cp[0], cp[1], mdev.mi_unit); |
| 671 | } |
| 672 | for (;;) { |
| 673 | steal(up++, udev); |
| 674 | if (udev.ui_driver == 0) |
| 675 | break; |
| 676 | if (udev.ui_dk < 0 || udev.ui_alive == 0) |
| 677 | continue; |
| 678 | steal(udev.ui_driver, udrv); |
| 679 | steal(udrv.ud_dname, two_char); |
| 680 | sprintf(dr_name[udev.ui_dk], "%c%c%d", |
| 681 | cp[0], cp[1], udev.ui_unit); |
| 682 | } |
| 683 | } |
| 684 | #endif |
| 685 | |
| 686 | #ifdef tahoe |
| 687 | #include <tahoevba/vbavar.h> |
| 688 | |
| 689 | /* |
| 690 | * Read the drive names out of kmem. |
| 691 | */ |
| 692 | read_names() |
| 693 | { |
| 694 | struct vba_device udev, *up; |
| 695 | struct vba_driver udrv; |
| 696 | short two_char; |
| 697 | char *cp = (char *)&two_char; |
| 698 | |
| 699 | up = (struct vba_device *) nl[X_VBDINIT].n_value; |
| 700 | if (up == 0) { |
| 701 | fprintf(stderr, "vmstat: Disk init info not in namelist\n"); |
| 702 | exit(1); |
| 703 | } |
| 704 | for (;;) { |
| 705 | steal(up++, udev); |
| 706 | if (udev.ui_driver == 0) |
| 707 | break; |
| 708 | if (udev.ui_dk < 0 || udev.ui_alive == 0) |
| 709 | continue; |
| 710 | steal(udev.ui_driver, udrv); |
| 711 | steal(udrv.ud_dname, two_char); |
| 712 | sprintf(dr_name[udev.ui_dk], "%c%c%d", |
| 713 | cp[0], cp[1], udev.ui_unit); |
| 714 | } |
| 715 | } |
| 716 | #endif |