Commit | Line | Data |
---|---|---|
f42904bc | 1 | /* |
01c8685d KB |
2 | * Copyright (c) 1980 The Regents of the University of California. |
3 | * All rights reserved. | |
4 | * | |
32ce521f | 5 | * %sccs.include.redist.c% |
f42904bc DF |
6 | */ |
7 | ||
8 | #ifndef lint | |
9 | char copyright[] = | |
01c8685d | 10 | "@(#) Copyright (c) 1980 The Regents of the University of California.\n\ |
f42904bc | 11 | All rights reserved.\n"; |
01c8685d | 12 | #endif /* not lint */ |
f42904bc | 13 | |
338c4a5d | 14 | #ifndef lint |
468dd322 | 15 | static char sccsid[] = "@(#)vmstat.c 5.21 (Berkeley) %G%"; |
01c8685d | 16 | #endif /* not lint */ |
338c4a5d | 17 | |
7f02df2f | 18 | #include <sys/param.h> |
a448353a | 19 | #include <sys/file.h> |
7f02df2f | 20 | #include <sys/vm.h> |
920a4346 | 21 | #include <sys/dkstat.h> |
61d7d2b3 | 22 | #include <sys/buf.h> |
4b894a2c | 23 | #include <sys/namei.h> |
242684ee | 24 | #include <sys/text.h> |
0c429495 | 25 | #include <sys/malloc.h> |
f5506e0f KB |
26 | #include <stdio.h> |
27 | #include <ctype.h> | |
28 | #include <nlist.h> | |
29 | #include <paths.h> | |
7f02df2f BJ |
30 | |
31 | struct nlist nl[] = { | |
682f1dcb BJ |
32 | #define X_CPTIME 0 |
33 | { "_cp_time" }, | |
34 | #define X_RATE 1 | |
7f02df2f | 35 | { "_rate" }, |
682f1dcb | 36 | #define X_TOTAL 2 |
7f02df2f | 37 | { "_total" }, |
682f1dcb | 38 | #define X_DEFICIT 3 |
7f02df2f | 39 | { "_deficit" }, |
682f1dcb | 40 | #define X_FORKSTAT 4 |
7f02df2f | 41 | { "_forkstat" }, |
682f1dcb | 42 | #define X_SUM 5 |
7f02df2f | 43 | { "_sum" }, |
682f1dcb | 44 | #define X_FIRSTFREE 6 |
7f02df2f | 45 | { "_firstfree" }, |
682f1dcb | 46 | #define X_MAXFREE 7 |
7f02df2f | 47 | { "_maxfree" }, |
a43be079 SL |
48 | #define X_BOOTTIME 8 |
49 | { "_boottime" }, | |
682f1dcb BJ |
50 | #define X_DKXFER 9 |
51 | { "_dk_xfer" }, | |
338c4a5d | 52 | #define X_REC 10 |
7f02df2f | 53 | { "_rectime" }, |
338c4a5d | 54 | #define X_PGIN 11 |
7f02df2f | 55 | { "_pgintime" }, |
338c4a5d | 56 | #define X_HZ 12 |
61d7d2b3 | 57 | { "_hz" }, |
a448353a | 58 | #define X_PHZ 13 |
b3a37270 | 59 | { "_phz" }, |
dfdfb4c8 KM |
60 | #define X_NCHSTATS 14 |
61 | { "_nchstats" }, | |
4b894a2c KM |
62 | #define X_INTRNAMES 15 |
63 | { "_intrnames" }, | |
64 | #define X_EINTRNAMES 16 | |
65 | { "_eintrnames" }, | |
66 | #define X_INTRCNT 17 | |
67 | { "_intrcnt" }, | |
68 | #define X_EINTRCNT 18 | |
69 | { "_eintrcnt" }, | |
a448353a SL |
70 | #define X_DK_NDRIVE 19 |
71 | { "_dk_ndrive" }, | |
b6b10463 SL |
72 | #define X_XSTATS 20 |
73 | { "_xstats" }, | |
0c429495 KM |
74 | #define X_KMEMSTAT 21 |
75 | { "_kmemstats" }, | |
76 | #define X_KMEMBUCKETS 22 | |
77 | { "_bucket" }, | |
468dd322 | 78 | #define X_END 22 |
338c4a5d | 79 | #ifdef vax |
468dd322 | 80 | #define X_MBDINIT (X_END+1) |
338c4a5d | 81 | { "_mbdinit" }, |
468dd322 | 82 | #define X_UBDINIT (X_END+2) |
338c4a5d | 83 | { "_ubdinit" }, |
242684ee | 84 | #endif |
242684ee | 85 | #ifdef tahoe |
468dd322 | 86 | #define X_VBDINIT (X_END+1) |
242684ee | 87 | { "_vbdinit" }, |
468dd322 | 88 | #define X_CKEYSTATS (X_END+2) |
7aa7d88f | 89 | { "_ckeystats" }, |
468dd322 | 90 | #define X_DKEYSTATS (X_END+3) |
7aa7d88f | 91 | { "_dkeystats" }, |
468dd322 KB |
92 | #endif |
93 | #ifdef hp300 | |
94 | #define X_HPDINIT (X_END+1) | |
95 | { "_hp_dinit" }, | |
338c4a5d SL |
96 | #endif |
97 | { "" }, | |
7f02df2f BJ |
98 | }; |
99 | ||
a448353a SL |
100 | char **dr_name; |
101 | int *dr_select; | |
102 | int dk_ndrive; | |
103 | int ndrives = 0; | |
104 | #ifdef vax | |
105 | char *defdrives[] = { "hp0", "hp1", "hp2", 0 }; | |
106 | #else | |
468dd322 KB |
107 | #ifdef hp300 |
108 | char *defdrives[] = { "rd0", "rd1", "rd2", 0 }; | |
109 | #else | |
a448353a SL |
110 | char *defdrives[] = { 0 }; |
111 | #endif | |
468dd322 | 112 | #endif |
7f02df2f BJ |
113 | double stat1(); |
114 | int firstfree, maxfree; | |
61d7d2b3 | 115 | int hz; |
b3a37270 SL |
116 | int phz; |
117 | int HZ; | |
a448353a | 118 | |
a448353a | 119 | struct { |
7f02df2f | 120 | int busy; |
682f1dcb | 121 | long time[CPUSTATES]; |
a448353a | 122 | long *xfer; |
7f02df2f BJ |
123 | struct vmmeter Rate; |
124 | struct vmtotal Total; | |
125 | struct vmmeter Sum; | |
126 | struct forkstat Forkstat; | |
7f02df2f BJ |
127 | unsigned rectime; |
128 | unsigned pgintime; | |
7f02df2f BJ |
129 | } s, s1, z; |
130 | #define rate s.Rate | |
131 | #define total s.Total | |
132 | #define sum s.Sum | |
133 | #define forkstat s.Forkstat | |
134 | ||
338c4a5d | 135 | struct vmmeter osum; |
7f02df2f BJ |
136 | int deficit; |
137 | double etime; | |
138 | int mf; | |
4b894a2c KM |
139 | time_t now, boottime; |
140 | int printhdr(); | |
196ccf10 | 141 | int lines = 1; |
7f02df2f | 142 | |
920a4346 SL |
143 | #define INTS(x) ((x) - (hz + phz)) |
144 | ||
7f02df2f | 145 | main(argc, argv) |
338c4a5d SL |
146 | int argc; |
147 | char **argv; | |
7f02df2f | 148 | { |
7f02df2f | 149 | extern char *ctime(); |
920a4346 | 150 | register i; |
4b894a2c | 151 | int iter, nintv, iflag = 0; |
7f02df2f | 152 | long t; |
920a4346 | 153 | char *arg, **cp, buf[BUFSIZ]; |
7f02df2f | 154 | |
f5506e0f | 155 | nlist(_PATH_UNIX, nl); |
7f02df2f | 156 | if(nl[0].n_type == 0) { |
f5506e0f | 157 | fprintf(stderr, "vmstat: no %s namelist\n", _PATH_UNIX); |
7f02df2f BJ |
158 | exit(1); |
159 | } | |
f5506e0f | 160 | mf = open(_PATH_KMEM, 0); |
7f02df2f | 161 | if(mf < 0) { |
f5506e0f | 162 | fprintf(stderr, "vmstat: cannot open %s\n", _PATH_KMEM); |
7f02df2f BJ |
163 | exit(1); |
164 | } | |
165 | iter = 0; | |
166 | argc--, argv++; | |
167 | while (argc>0 && argv[0][0]=='-') { | |
168 | char *cp = *argv++; | |
169 | argc--; | |
170 | while (*++cp) switch (*cp) { | |
171 | ||
7f02df2f BJ |
172 | case 't': |
173 | dotimes(); | |
174 | exit(0); | |
338c4a5d | 175 | |
7f02df2f BJ |
176 | case 'z': |
177 | close(mf); | |
f5506e0f | 178 | mf = open(_PATH_KMEM, 2); |
a448353a | 179 | lseek(mf, (long)nl[X_SUM].n_value, L_SET); |
7f02df2f BJ |
180 | write(mf, &z.Sum, sizeof z.Sum); |
181 | exit(0); | |
182 | ||
183 | case 'f': | |
184 | doforkst(); | |
185 | exit(0); | |
186 | ||
0c429495 KM |
187 | case 'm': |
188 | domem(); | |
189 | exit(0); | |
190 | ||
7f02df2f BJ |
191 | case 's': |
192 | dosum(); | |
193 | exit(0); | |
194 | ||
4b894a2c KM |
195 | case 'i': |
196 | iflag++; | |
197 | break; | |
198 | ||
7f02df2f | 199 | default: |
a448353a | 200 | fprintf(stderr, |
0c429495 | 201 | "usage: vmstat [ -fsim ] [ interval ] [ count]\n"); |
7f02df2f BJ |
202 | exit(1); |
203 | } | |
204 | } | |
a448353a | 205 | lseek(mf, (long)nl[X_FIRSTFREE].n_value, L_SET); |
7f02df2f | 206 | read(mf, &firstfree, sizeof firstfree); |
a448353a | 207 | lseek(mf, (long)nl[X_MAXFREE].n_value, L_SET); |
7f02df2f | 208 | read(mf, &maxfree, sizeof maxfree); |
a448353a | 209 | lseek(mf, (long)nl[X_BOOTTIME].n_value, L_SET); |
a43be079 | 210 | read(mf, &boottime, sizeof boottime); |
a448353a | 211 | lseek(mf, (long)nl[X_HZ].n_value, L_SET); |
61d7d2b3 | 212 | read(mf, &hz, sizeof hz); |
a448353a SL |
213 | if (nl[X_PHZ].n_value != 0) { |
214 | lseek(mf, (long)nl[X_PHZ].n_value, L_SET); | |
215 | read(mf, &phz, sizeof phz); | |
216 | } | |
b3a37270 | 217 | HZ = phz ? phz : hz; |
9a122ff6 | 218 | if (nl[X_DK_NDRIVE].n_value == 0) { |
920a4346 | 219 | fprintf(stderr, "dk_ndrive undefined in system\n"); |
a448353a SL |
220 | exit(1); |
221 | } | |
222 | lseek(mf, nl[X_DK_NDRIVE].n_value, L_SET); | |
223 | read(mf, &dk_ndrive, sizeof (dk_ndrive)); | |
224 | if (dk_ndrive <= 0) { | |
920a4346 | 225 | fprintf(stderr, "dk_ndrive %d\n", dk_ndrive); |
a448353a SL |
226 | exit(1); |
227 | } | |
228 | dr_select = (int *)calloc(dk_ndrive, sizeof (int)); | |
229 | dr_name = (char **)calloc(dk_ndrive, sizeof (char *)); | |
230 | #define allocate(e, t) \ | |
231 | s./**/e = (t *)calloc(dk_ndrive, sizeof (t)); \ | |
232 | s1./**/e = (t *)calloc(dk_ndrive, sizeof (t)); | |
233 | allocate(xfer, long); | |
234 | for (arg = buf, i = 0; i < dk_ndrive; i++) { | |
235 | dr_name[i] = arg; | |
236 | sprintf(dr_name[i], "dk%d", i); | |
237 | arg += strlen(dr_name[i]) + 1; | |
61d7d2b3 MT |
238 | } |
239 | read_names(); | |
7f02df2f | 240 | time(&now); |
a43be079 | 241 | nintv = now - boottime; |
7f02df2f | 242 | if (nintv <= 0 || nintv > 60*60*24*365*10) { |
920a4346 SL |
243 | fprintf(stderr, |
244 | "Time makes no sense... namelist must be wrong.\n"); | |
7f02df2f BJ |
245 | exit(1); |
246 | } | |
4b894a2c KM |
247 | if (iflag) { |
248 | dointr(nintv); | |
249 | exit(0); | |
250 | } | |
a448353a SL |
251 | /* |
252 | * Choose drives to be displayed. Priority | |
253 | * goes to (in order) drives supplied as arguments, | |
254 | * default drives. If everything isn't filled | |
255 | * in and there are drives not taken care of, | |
256 | * display the first few that fit. | |
257 | */ | |
258 | ndrives = 0; | |
259 | while (argc > 0 && !isdigit(argv[0][0])) { | |
260 | for (i = 0; i < dk_ndrive; i++) { | |
261 | if (strcmp(dr_name[i], argv[0])) | |
262 | continue; | |
263 | dr_select[i] = 1; | |
264 | ndrives++; | |
265 | } | |
266 | argc--, argv++; | |
267 | } | |
268 | for (i = 0; i < dk_ndrive && ndrives < 4; i++) { | |
269 | if (dr_select[i]) | |
270 | continue; | |
271 | for (cp = defdrives; *cp; cp++) | |
272 | if (strcmp(dr_name[i], *cp) == 0) { | |
273 | dr_select[i] = 1; | |
274 | ndrives++; | |
275 | break; | |
276 | } | |
277 | } | |
278 | for (i = 0; i < dk_ndrive && ndrives < 4; i++) { | |
279 | if (dr_select[i]) | |
280 | continue; | |
281 | dr_select[i] = 1; | |
282 | ndrives++; | |
283 | } | |
284 | if (argc > 1) | |
285 | iter = atoi(argv[1]); | |
4b894a2c | 286 | signal(SIGCONT, printhdr); |
7f02df2f | 287 | loop: |
196ccf10 SL |
288 | if (--lines == 0) |
289 | printhdr(); | |
a448353a | 290 | lseek(mf, (long)nl[X_CPTIME].n_value, L_SET); |
682f1dcb | 291 | read(mf, s.time, sizeof s.time); |
a448353a SL |
292 | lseek(mf, (long)nl[X_DKXFER].n_value, L_SET); |
293 | read(mf, s.xfer, dk_ndrive * sizeof (long)); | |
294 | if (nintv != 1) | |
295 | lseek(mf, (long)nl[X_SUM].n_value, L_SET); | |
296 | else | |
297 | lseek(mf, (long)nl[X_RATE].n_value, L_SET); | |
298 | read(mf, &rate, sizeof rate); | |
299 | lseek(mf, (long)nl[X_TOTAL].n_value, L_SET); | |
7f02df2f | 300 | read(mf, &total, sizeof total); |
338c4a5d | 301 | osum = sum; |
a448353a | 302 | lseek(mf, (long)nl[X_SUM].n_value, L_SET); |
338c4a5d | 303 | read(mf, &sum, sizeof sum); |
a448353a | 304 | lseek(mf, (long)nl[X_DEFICIT].n_value, L_SET); |
7f02df2f | 305 | read(mf, &deficit, sizeof deficit); |
682f1dcb | 306 | etime = 0; |
a448353a | 307 | for (i=0; i < dk_ndrive; i++) { |
682f1dcb BJ |
308 | t = s.xfer[i]; |
309 | s.xfer[i] -= s1.xfer[i]; | |
310 | s1.xfer[i] = t; | |
7f02df2f BJ |
311 | } |
312 | for (i=0; i < CPUSTATES; i++) { | |
682f1dcb BJ |
313 | t = s.time[i]; |
314 | s.time[i] -= s1.time[i]; | |
315 | s1.time[i] = t; | |
316 | etime += s.time[i]; | |
7f02df2f | 317 | } |
7f02df2f BJ |
318 | if(etime == 0.) |
319 | etime = 1.; | |
61d7d2b3 | 320 | printf("%2d%2d%2d", total.t_rq, total.t_dw+total.t_pw, total.t_sw); |
338c4a5d | 321 | #define pgtok(a) ((a)*NBPG/1024) |
920a4346 | 322 | printf("%6d%6d", pgtok(total.t_avm), pgtok(total.t_free)); |
b3a37270 SL |
323 | printf("%4d%3d", (rate.v_pgrec - (rate.v_xsfrec+rate.v_xifrec))/nintv, |
324 | (rate.v_xsfrec+rate.v_xifrec)/nintv); | |
338c4a5d SL |
325 | printf("%4d", pgtok(rate.v_pgpgin)/nintv); |
326 | printf("%4d%4d%4d%4d", pgtok(rate.v_pgpgout)/nintv, | |
327 | pgtok(rate.v_dfree)/nintv, pgtok(deficit), rate.v_scan/nintv); | |
a448353a SL |
328 | etime /= (float)HZ; |
329 | for (i = 0; i < dk_ndrive; i++) | |
330 | if (dr_select[i]) | |
331 | stats(i); | |
b3a37270 SL |
332 | printf("%4d%4d%4d", INTS(rate.v_intr/nintv), rate.v_syscall/nintv, |
333 | rate.v_swtch/nintv); | |
7f02df2f BJ |
334 | for(i=0; i<CPUSTATES; i++) { |
335 | float f = stat1(i); | |
336 | if (i == 0) { /* US+NI */ | |
337 | i++; | |
338 | f += stat1(i); | |
339 | } | |
340 | printf("%3.0f", f); | |
341 | } | |
342 | printf("\n"); | |
343 | fflush(stdout); | |
7f02df2f | 344 | nintv = 1; |
196ccf10 | 345 | if (--iter &&argc > 0) { |
7f02df2f | 346 | sleep(atoi(argv[0])); |
7f02df2f BJ |
347 | goto loop; |
348 | } | |
349 | } | |
350 | ||
4b894a2c KM |
351 | printhdr() |
352 | { | |
a448353a SL |
353 | register int i, j; |
354 | ||
920a4346 | 355 | printf(" procs memory page "); |
a448353a SL |
356 | i = (ndrives * 3 - 6) / 2; |
357 | if (i < 0) | |
358 | i = 0; | |
359 | for (j = 0; j < i; j++) | |
360 | putchar(' '); | |
361 | printf("faults"); | |
362 | i = ndrives * 3 - 6 - i; | |
363 | for (j = 0; j < i; j++) | |
364 | putchar(' '); | |
365 | printf(" cpu\n"); | |
920a4346 | 366 | printf(" r b w avm fre re at pi po fr de sr "); |
a448353a SL |
367 | for (i = 0; i < dk_ndrive; i++) |
368 | if (dr_select[i]) | |
369 | printf("%c%c ", dr_name[i][0], dr_name[i][2]); | |
370 | printf(" in sy cs us sy id\n"); | |
196ccf10 | 371 | lines = 19; |
4b894a2c KM |
372 | } |
373 | ||
7f02df2f BJ |
374 | dotimes() |
375 | { | |
376 | ||
a448353a | 377 | lseek(mf, (long)nl[X_REC].n_value, L_SET); |
7f02df2f | 378 | read(mf, &s.rectime, sizeof s.rectime); |
a448353a | 379 | lseek(mf, (long)nl[X_PGIN].n_value, L_SET); |
7f02df2f | 380 | read(mf, &s.pgintime, sizeof s.pgintime); |
a448353a | 381 | lseek(mf, (long)nl[X_SUM].n_value, L_SET); |
7f02df2f BJ |
382 | read(mf, &sum, sizeof sum); |
383 | printf("%d reclaims, %d total time (usec)\n", sum.v_pgrec, s.rectime); | |
384 | printf("average: %d usec / reclaim\n", s.rectime/sum.v_pgrec); | |
385 | printf("\n"); | |
386 | printf("%d page ins, %d total time (msec)\n",sum.v_pgin, s.pgintime/10); | |
387 | printf("average: %8.1f msec / page in\n", s.pgintime/(sum.v_pgin*10.0)); | |
388 | } | |
7f02df2f | 389 | |
70b78b6e SL |
390 | #if defined(tahoe) |
391 | #include <tahoe/cpu.h> | |
392 | #endif | |
393 | ||
7f02df2f BJ |
394 | dosum() |
395 | { | |
a448353a | 396 | struct nchstats nchstats; |
7aa7d88f | 397 | struct xstats xstats; |
dfdfb4c8 | 398 | long nchtotal; |
7aa7d88f SL |
399 | #if defined(tahoe) |
400 | struct keystats keystats; | |
401 | #endif | |
7f02df2f | 402 | |
a448353a | 403 | lseek(mf, (long)nl[X_SUM].n_value, L_SET); |
7f02df2f BJ |
404 | read(mf, &sum, sizeof sum); |
405 | printf("%9d swap ins\n", sum.v_swpin); | |
406 | printf("%9d swap outs\n", sum.v_swpout); | |
407 | printf("%9d pages swapped in\n", sum.v_pswpin / CLSIZE); | |
408 | printf("%9d pages swapped out\n", sum.v_pswpout / CLSIZE); | |
409 | printf("%9d total address trans. faults taken\n", sum.v_faults); | |
410 | printf("%9d page ins\n", sum.v_pgin); | |
411 | printf("%9d page outs\n", sum.v_pgout); | |
513dfff1 BJ |
412 | printf("%9d pages paged in\n", sum.v_pgpgin); |
413 | printf("%9d pages paged out\n", sum.v_pgpgout); | |
414 | printf("%9d sequential process pages freed\n", sum.v_seqfree); | |
e23f616a | 415 | printf("%9d total reclaims (%d%% fast)\n", sum.v_pgrec, |
920a4346 | 416 | pct(sum.v_fastpgrec, sum.v_pgrec)); |
7f02df2f BJ |
417 | printf("%9d reclaims from free list\n", sum.v_pgfrec); |
418 | printf("%9d intransit blocking page faults\n", sum.v_intrans); | |
419 | printf("%9d zero fill pages created\n", sum.v_nzfod / CLSIZE); | |
420 | printf("%9d zero fill page faults\n", sum.v_zfod / CLSIZE); | |
421 | printf("%9d executable fill pages created\n", sum.v_nexfod / CLSIZE); | |
422 | printf("%9d executable fill page faults\n", sum.v_exfod / CLSIZE); | |
423 | printf("%9d swap text pages found in free list\n", sum.v_xsfrec); | |
424 | printf("%9d inode text pages found in free list\n", sum.v_xifrec); | |
425 | printf("%9d file fill pages created\n", sum.v_nvrfod / CLSIZE); | |
426 | printf("%9d file fill page faults\n", sum.v_vrfod / CLSIZE); | |
427 | printf("%9d pages examined by the clock daemon\n", sum.v_scan); | |
428 | printf("%9d revolutions of the clock hand\n", sum.v_rev); | |
429 | printf("%9d pages freed by the clock daemon\n", sum.v_dfree / CLSIZE); | |
430 | printf("%9d cpu context switches\n", sum.v_swtch); | |
431 | printf("%9d device interrupts\n", sum.v_intr); | |
4b894a2c | 432 | printf("%9d software interrupts\n", sum.v_soft); |
a448353a | 433 | #ifdef vax |
3d61d7ac | 434 | printf("%9d pseudo-dma dz interrupts\n", sum.v_pdma); |
a448353a | 435 | #endif |
7f02df2f BJ |
436 | printf("%9d traps\n", sum.v_trap); |
437 | printf("%9d system calls\n", sum.v_syscall); | |
dfdfb4c8 | 438 | lseek(mf, (long)nl[X_NCHSTATS].n_value, 0); |
a448353a | 439 | read(mf, &nchstats, sizeof nchstats); |
3aea8979 KM |
440 | nchtotal = nchstats.ncs_goodhits + nchstats.ncs_neghits + |
441 | nchstats.ncs_badhits + nchstats.ncs_falsehits + | |
442 | nchstats.ncs_miss + nchstats.ncs_long; | |
443 | printf("%9d total name lookups\n", nchtotal); | |
444 | printf("%9s cache hits (%d%% pos + %d%% neg) system %d%% per-process\n", | |
445 | "", pct(nchstats.ncs_goodhits, nchtotal), | |
446 | pct(nchstats.ncs_neghits, nchtotal), | |
920a4346 | 447 | pct(nchstats.ncs_pass2, nchtotal)); |
3aea8979 KM |
448 | printf("%9s deletions %d%%, falsehits %d%%, toolong %d%%\n", "", |
449 | pct(nchstats.ncs_badhits, nchtotal), | |
450 | pct(nchstats.ncs_falsehits, nchtotal), | |
451 | pct(nchstats.ncs_long, nchtotal)); | |
b6b10463 SL |
452 | lseek(mf, (long)nl[X_XSTATS].n_value, 0); |
453 | read(mf, &xstats, sizeof xstats); | |
454 | printf("%9d total calls to xalloc (cache hits %d%%)\n", | |
920a4346 | 455 | xstats.alloc, pct(xstats.alloc_cachehit, xstats.alloc)); |
b6b10463 SL |
456 | printf("%9s sticky %d flushed %d unused %d\n", "", |
457 | xstats.alloc_inuse, xstats.alloc_cacheflush, xstats.alloc_unused); | |
458 | printf("%9d total calls to xfree", xstats.free); | |
459 | printf(" (sticky %d cached %d swapped %d)\n", | |
460 | xstats.free_inuse, xstats.free_cache, xstats.free_cacheswap); | |
7aa7d88f SL |
461 | #if defined(tahoe) |
462 | lseek(mf, (long)nl[X_CKEYSTATS].n_value, 0); | |
463 | read(mf, &keystats, sizeof keystats); | |
464 | printf("%9d %s (free %d%% norefs %d%% taken %d%% shared %d%%)\n", | |
465 | keystats.ks_allocs, "code cache keys allocated", | |
0c429495 | 466 | pct(keystats.ks_allocfree, keystats.ks_allocs), |
920a4346 SL |
467 | pct(keystats.ks_norefs, keystats.ks_allocs), |
468 | pct(keystats.ks_taken, keystats.ks_allocs), | |
469 | pct(keystats.ks_shared, keystats.ks_allocs)); | |
7aa7d88f SL |
470 | lseek(mf, (long)nl[X_DKEYSTATS].n_value, 0); |
471 | read(mf, &keystats, sizeof keystats); | |
472 | printf("%9d %s (free %d%% norefs %d%% taken %d%% shared %d%%)\n", | |
473 | keystats.ks_allocs, "data cache keys allocated", | |
0c429495 | 474 | pct(keystats.ks_allocfree, keystats.ks_allocs), |
920a4346 SL |
475 | pct(keystats.ks_norefs, keystats.ks_allocs), |
476 | pct(keystats.ks_taken, keystats.ks_allocs), | |
477 | pct(keystats.ks_shared, keystats.ks_allocs)); | |
7aa7d88f | 478 | #endif |
7f02df2f BJ |
479 | } |
480 | ||
7f02df2f BJ |
481 | doforkst() |
482 | { | |
483 | ||
a448353a | 484 | lseek(mf, (long)nl[X_FORKSTAT].n_value, L_SET); |
7f02df2f BJ |
485 | read(mf, &forkstat, sizeof forkstat); |
486 | printf("%d forks, %d pages, average=%.2f\n", | |
487 | forkstat.cntfork, forkstat.sizfork, | |
488 | (float) forkstat.sizfork / forkstat.cntfork); | |
489 | printf("%d vforks, %d pages, average=%.2f\n", | |
490 | forkstat.cntvfork, forkstat.sizvfork, | |
491 | (float)forkstat.sizvfork / forkstat.cntvfork); | |
492 | } | |
493 | ||
494 | stats(dn) | |
495 | { | |
496 | ||
a448353a | 497 | if (dn >= dk_ndrive) { |
7f02df2f BJ |
498 | printf(" 0"); |
499 | return; | |
500 | } | |
682f1dcb | 501 | printf("%3.0f", s.xfer[dn]/etime); |
7f02df2f BJ |
502 | } |
503 | ||
504 | double | |
505 | stat1(row) | |
506 | { | |
682f1dcb BJ |
507 | double t; |
508 | register i; | |
7f02df2f BJ |
509 | |
510 | t = 0; | |
511 | for(i=0; i<CPUSTATES; i++) | |
682f1dcb BJ |
512 | t += s.time[i]; |
513 | if(t == 0.) | |
514 | t = 1.; | |
515 | return(s.time[row]*100./t); | |
7f02df2f BJ |
516 | } |
517 | ||
518 | pct(top, bot) | |
519 | { | |
520 | ||
521 | if (bot == 0) | |
522 | return (0); | |
523 | return ((top * 100) / bot); | |
524 | } | |
61d7d2b3 | 525 | |
4b894a2c KM |
526 | dointr(nintv) |
527 | { | |
528 | int nintr, inttotal; | |
529 | long *intrcnt; | |
530 | char *intrname, *malloc(); | |
531 | ||
532 | nintr = (nl[X_EINTRCNT].n_value - nl[X_INTRCNT].n_value) / sizeof(long); | |
533 | intrcnt = (long *) malloc(nl[X_EINTRCNT].n_value - | |
534 | nl[X_INTRCNT].n_value); | |
535 | intrname = malloc(nl[X_EINTRNAMES].n_value - nl[X_INTRNAMES].n_value); | |
536 | if (intrcnt == NULL || intrname == NULL) { | |
537 | fprintf(stderr, "vmstat: out of memory\n"); | |
538 | exit(9); | |
539 | } | |
a448353a | 540 | lseek(mf, (long)nl[X_INTRCNT].n_value, L_SET); |
4b894a2c | 541 | read(mf, intrcnt, nintr * sizeof (long)); |
a448353a | 542 | lseek(mf, (long)nl[X_INTRNAMES].n_value, L_SET); |
4b894a2c KM |
543 | read(mf, intrname, nl[X_EINTRNAMES].n_value - nl[X_INTRNAMES].n_value); |
544 | printf("interrupt total rate\n"); | |
545 | inttotal = 0; | |
546 | while (nintr--) { | |
547 | if (*intrcnt) | |
548 | printf("%-12s %8ld %8ld\n", intrname, | |
549 | *intrcnt, *intrcnt / nintv); | |
550 | intrname += strlen(intrname) + 1; | |
551 | inttotal += *intrcnt++; | |
552 | } | |
553 | printf("Total %8ld %8ld\n", inttotal, inttotal / nintv); | |
554 | } | |
555 | ||
0c429495 KM |
556 | /* |
557 | * These names must be kept in sync with | |
558 | * the types defined in <sys/malloc.h>. | |
559 | */ | |
560 | char *kmemnames[] = { | |
e268bd95 MT |
561 | "free", /* 0 M_FREE */ |
562 | "mbuf", /* 1 M_MBUF */ | |
563 | "devbuf", /* 2 M_DEVBUF */ | |
564 | "socket", /* 3 M_SOCKET */ | |
565 | "pcb", /* 4 M_PCB */ | |
566 | "routetbl", /* 5 M_RTABLE */ | |
567 | "hosttbl", /* 6 M_HTABLE */ | |
568 | "fragtbl", /* 7 M_FTABLE */ | |
569 | "zombie", /* 8 M_ZOMBIE */ | |
570 | "ifaddr", /* 9 M_IFADDR */ | |
571 | "soopts", /* 10 M_SOOPTS */ | |
572 | "soname", /* 11 M_SONAME */ | |
573 | "namei", /* 12 M_NAMEI */ | |
574 | "gprof", /* 13 M_GPROF */ | |
575 | "ioctlops", /* 14 M_IOCTLOPS */ | |
576 | "superblk", /* 15 M_SUPERBLK */ | |
577 | "cred", /* 16 M_CRED */ | |
578 | "pgrp", /* 17 M_PGRP */ | |
579 | "session", /* 18 M_SESSION */ | |
d8a6e15a | 580 | "iov", /* 19 M_IOV */ |
b567dcea KM |
581 | "mount", /* 20 M_MOUNT */ |
582 | "fhandle", /* 21 M_FHANDLE */ | |
583 | "NFS req", /* 22 M_NFSREQ */ | |
584 | "NFS mount", /* 23 M_NFSMNT */ | |
9f8ba8ea KM |
585 | "vnodes", /* 24 M_VNODE */ |
586 | "namecache", /* 25 M_CACHE */ | |
fa230d07 KM |
587 | "UFS quota", /* 26 M_DQUOT */ |
588 | "UFS mount", /* 27 M_UFSMNT */ | |
468dd322 KB |
589 | "mapmem", /* 28 M_MAPMEM */ |
590 | "shm", /* 29 M_SHM */ | |
591 | 0, 0, 0, 0, | |
e268bd95 MT |
592 | 0, 0, 0, 0, 0, |
593 | 0, 0, 0, 0, 0, | |
594 | 0, 0, 0, 0, 0, | |
e268bd95 | 595 | "temp", /* 49 M_TEMP */ |
0c429495 KM |
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 | ||
a448353a SL |
636 | #define steal(where, var) \ |
637 | lseek(mf, where, L_SET); read(mf, &var, sizeof var); | |
61d7d2b3 MT |
638 | /* |
639 | * Read the drive names out of kmem. | |
61d7d2b3 | 640 | */ |
338c4a5d | 641 | #ifdef vax |
a448353a SL |
642 | #include <vaxuba/ubavar.h> |
643 | #include <vaxmba/mbavar.h> | |
644 | ||
61d7d2b3 MT |
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; | |
93ca0bfe | 657 | if (up == 0) { |
338c4a5d | 658 | fprintf(stderr, "vmstat: Disk init info not in namelist\n"); |
61d7d2b3 MT |
659 | exit(1); |
660 | } | |
93ca0bfe | 661 | if (mp) for (;;) { |
61d7d2b3 MT |
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); | |
a448353a SL |
669 | sprintf(dr_name[mdev.mi_dk], "%c%c%d", |
670 | cp[0], cp[1], mdev.mi_unit); | |
61d7d2b3 | 671 | } |
93ca0bfe | 672 | for (;;) { |
61d7d2b3 MT |
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); | |
a448353a SL |
680 | sprintf(dr_name[udev.ui_dk], "%c%c%d", |
681 | cp[0], cp[1], udev.ui_unit); | |
61d7d2b3 MT |
682 | } |
683 | } | |
338c4a5d | 684 | #endif |
242684ee | 685 | |
242684ee SL |
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 | |
468dd322 KB |
717 | |
718 | #ifdef hp300 | |
719 | #include <hpdev/device.h> | |
720 | ||
721 | #define validdisk(cp) ((cp)[1] == 'd' && ((cp)[0] == 'r' || (cp)[0] == 's')) | |
722 | ||
723 | read_names() | |
724 | { | |
725 | struct hp_device hdev; | |
726 | register struct hp_device *hp; | |
727 | struct driver hdrv; | |
728 | short two_char; | |
729 | char *cp = (char *) &two_char; | |
730 | register char *dp; | |
731 | ||
732 | hp = (struct hp_device *) nl[X_HPDINIT].n_value; | |
733 | if (hp == 0) { | |
734 | fprintf(stderr, "vmstat: Disk init info not in namelist\n"); | |
735 | exit(1); | |
736 | } | |
737 | for (;;) { | |
738 | steal(hp++, hdev); | |
739 | if (hdev.hp_driver == 0) | |
740 | break; | |
741 | steal(hdev.hp_driver, hdrv); | |
742 | steal(hdrv.d_name, two_char); | |
743 | /* | |
744 | * hp_dk is meaningless if the device isn't a disk | |
745 | * (d_name not valid) or the disk was not found when | |
746 | * booting (hp_alive == 0). | |
747 | */ | |
748 | if (!validdisk(cp) || hdev.hp_alive == 0) | |
749 | continue; | |
750 | dp = dr_name[hdev.hp_dk]; | |
751 | sprintf(dp, "%c%c%d", cp[0], cp[1], hdev.hp_unit); | |
752 | } | |
753 | } | |
754 | #endif |