vmstat.c revision 1.41 1 1.41 abs /* $NetBSD: vmstat.c,v 1.41 2002/08/08 17:06:32 abs Exp $ */
2 1.2 jtc
3 1.1 jtc /*-
4 1.1 jtc * Copyright (c) 1983, 1989, 1992, 1993
5 1.1 jtc * The Regents of the University of California. All rights reserved.
6 1.1 jtc *
7 1.1 jtc * Redistribution and use in source and binary forms, with or without
8 1.1 jtc * modification, are permitted provided that the following conditions
9 1.1 jtc * are met:
10 1.1 jtc * 1. Redistributions of source code must retain the above copyright
11 1.1 jtc * notice, this list of conditions and the following disclaimer.
12 1.1 jtc * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 jtc * notice, this list of conditions and the following disclaimer in the
14 1.1 jtc * documentation and/or other materials provided with the distribution.
15 1.1 jtc * 3. All advertising materials mentioning features or use of this software
16 1.1 jtc * must display the following acknowledgement:
17 1.1 jtc * This product includes software developed by the University of
18 1.1 jtc * California, Berkeley and its contributors.
19 1.1 jtc * 4. Neither the name of the University nor the names of its contributors
20 1.1 jtc * may be used to endorse or promote products derived from this software
21 1.1 jtc * without specific prior written permission.
22 1.1 jtc *
23 1.1 jtc * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24 1.1 jtc * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 1.1 jtc * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 1.1 jtc * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27 1.1 jtc * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 1.1 jtc * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 1.1 jtc * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 1.1 jtc * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 1.1 jtc * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 1.1 jtc * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 1.1 jtc * SUCH DAMAGE.
34 1.1 jtc */
35 1.1 jtc
36 1.8 mrg #include <sys/cdefs.h>
37 1.1 jtc #ifndef lint
38 1.2 jtc #if 0
39 1.1 jtc static char sccsid[] = "@(#)vmstat.c 8.2 (Berkeley) 1/12/94";
40 1.2 jtc #endif
41 1.41 abs __RCSID("$NetBSD: vmstat.c,v 1.41 2002/08/08 17:06:32 abs Exp $");
42 1.1 jtc #endif /* not lint */
43 1.1 jtc
44 1.1 jtc /*
45 1.1 jtc * Cursed vmstat -- from Robert Elz.
46 1.1 jtc */
47 1.1 jtc
48 1.1 jtc #include <sys/param.h>
49 1.1 jtc #include <sys/dkstat.h>
50 1.1 jtc #include <sys/user.h>
51 1.1 jtc #include <sys/namei.h>
52 1.1 jtc #include <sys/sysctl.h>
53 1.1 jtc
54 1.11 mrg #include <uvm/uvm_extern.h>
55 1.11 mrg
56 1.3 mycroft #include <stdlib.h>
57 1.1 jtc #include <string.h>
58 1.41 abs #include <util.h>
59 1.3 mycroft
60 1.1 jtc #include "systat.h"
61 1.1 jtc #include "extern.h"
62 1.35 simonb #include "dkstats.h"
63 1.40 christos #include "utmpentry.h"
64 1.1 jtc
65 1.1 jtc static struct Info {
66 1.34 simonb struct uvmexp_sysctl uvmexp;
67 1.1 jtc struct vmtotal Total;
68 1.1 jtc struct nchstats nchstats;
69 1.1 jtc long nchcount;
70 1.1 jtc long *intrcnt;
71 1.1 jtc } s, s1, s2, z;
72 1.1 jtc
73 1.1 jtc #define cnt s.Cnt
74 1.1 jtc #define oldcnt s1.Cnt
75 1.1 jtc #define total s.Total
76 1.1 jtc #define nchtotal s.nchstats
77 1.1 jtc #define oldnchtotal s1.nchstats
78 1.1 jtc
79 1.1 jtc static enum state { BOOT, TIME, RUN } state = TIME;
80 1.1 jtc
81 1.33 ad static void allocinfo(struct Info *);
82 1.33 ad static void copyinfo(struct Info *, struct Info *);
83 1.33 ad static float cputime(int);
84 1.33 ad static void dinfo(int, int);
85 1.33 ad static void getinfo(struct Info *, enum state);
86 1.33 ad static void putint(int, int, int, int);
87 1.33 ad static void putfloat(double, int, int, int, int, int);
88 1.33 ad static int ucount(void);
89 1.1 jtc
90 1.1 jtc static char buf[26];
91 1.25 simonb static u_int64_t t;
92 1.1 jtc static double etime;
93 1.1 jtc static float hertz;
94 1.1 jtc static int nintr;
95 1.1 jtc static long *intrloc;
96 1.1 jtc static char **intrname;
97 1.1 jtc static int nextintsrow;
98 1.1 jtc
99 1.1 jtc WINDOW *
100 1.33 ad openvmstat(void)
101 1.1 jtc {
102 1.1 jtc return (stdscr);
103 1.1 jtc }
104 1.1 jtc
105 1.1 jtc void
106 1.33 ad closevmstat(WINDOW *w)
107 1.1 jtc {
108 1.1 jtc
109 1.1 jtc if (w == NULL)
110 1.1 jtc return;
111 1.1 jtc wclear(w);
112 1.1 jtc wrefresh(w);
113 1.1 jtc }
114 1.1 jtc
115 1.1 jtc
116 1.1 jtc static struct nlist namelist[] = {
117 1.38 kleink #define X_NCHSTATS 0
118 1.1 jtc { "_nchstats" },
119 1.38 kleink #define X_INTRNAMES 1
120 1.1 jtc { "_intrnames" },
121 1.38 kleink #define X_EINTRNAMES 2
122 1.1 jtc { "_eintrnames" },
123 1.38 kleink #define X_INTRCNT 3
124 1.1 jtc { "_intrcnt" },
125 1.38 kleink #define X_EINTRCNT 4
126 1.1 jtc { "_eintrcnt" },
127 1.1 jtc { "" },
128 1.1 jtc };
129 1.1 jtc
130 1.1 jtc /*
131 1.1 jtc * These constants define where the major pieces are laid out
132 1.1 jtc */
133 1.1 jtc #define STATROW 0 /* uses 1 row and 68 cols */
134 1.1 jtc #define STATCOL 2
135 1.1 jtc #define MEMROW 2 /* uses 4 rows and 31 cols */
136 1.1 jtc #define MEMCOL 0
137 1.1 jtc #define PAGEROW 2 /* uses 4 rows and 26 cols */
138 1.1 jtc #define PAGECOL 36
139 1.1 jtc #define INTSROW 2 /* uses all rows to bottom and 17 cols */
140 1.1 jtc #define INTSCOL 63
141 1.1 jtc #define PROCSROW 7 /* uses 2 rows and 20 cols */
142 1.1 jtc #define PROCSCOL 0
143 1.1 jtc #define GENSTATROW 7 /* uses 2 rows and 30 cols */
144 1.36 augustss #define GENSTATCOL 18
145 1.1 jtc #define VMSTATROW 7 /* uses 17 rows and 12 cols */
146 1.1 jtc #define VMSTATCOL 48
147 1.1 jtc #define GRAPHROW 10 /* uses 3 rows and 51 cols */
148 1.1 jtc #define GRAPHCOL 0
149 1.1 jtc #define NAMEIROW 14 /* uses 3 rows and 38 cols */
150 1.1 jtc #define NAMEICOL 0
151 1.1 jtc #define DISKROW 18 /* uses 5 rows and 50 cols (for 9 drives) */
152 1.1 jtc #define DISKCOL 0
153 1.1 jtc
154 1.1 jtc #define DRIVESPACE 9 /* max # for space */
155 1.1 jtc
156 1.1 jtc #if DK_NDRIVE > DRIVESPACE
157 1.1 jtc #define MAXDRIVES DRIVESPACE /* max # to display */
158 1.1 jtc #else
159 1.1 jtc #define MAXDRIVES DK_NDRIVE /* max # to display */
160 1.1 jtc #endif
161 1.1 jtc
162 1.1 jtc int
163 1.33 ad initvmstat(void)
164 1.1 jtc {
165 1.1 jtc char *intrnamebuf, *cp;
166 1.1 jtc int i;
167 1.1 jtc static int once = 0;
168 1.1 jtc
169 1.1 jtc if (namelist[0].n_type == 0) {
170 1.1 jtc if (kvm_nlist(kd, namelist)) {
171 1.1 jtc nlisterr(namelist);
172 1.1 jtc return(0);
173 1.1 jtc }
174 1.1 jtc if (namelist[0].n_type == 0) {
175 1.1 jtc error("No namelist");
176 1.1 jtc return(0);
177 1.1 jtc }
178 1.1 jtc }
179 1.1 jtc hertz = stathz ? stathz : hz;
180 1.37 augustss if (! dkinit(1))
181 1.1 jtc return(0);
182 1.1 jtc if (dk_ndrive && !once) {
183 1.1 jtc #define allocate(e, t) \
184 1.7 scottr s./**/e = (t *)calloc(dk_ndrive, sizeof (t)); \
185 1.7 scottr s1./**/e = (t *)calloc(dk_ndrive, sizeof (t)); \
186 1.7 scottr s2./**/e = (t *)calloc(dk_ndrive, sizeof (t)); \
187 1.7 scottr z./**/e = (t *)calloc(dk_ndrive, sizeof (t));
188 1.1 jtc once = 1;
189 1.1 jtc #undef allocate
190 1.1 jtc }
191 1.1 jtc if (nintr == 0) {
192 1.1 jtc nintr = (namelist[X_EINTRCNT].n_value -
193 1.1 jtc namelist[X_INTRCNT].n_value) / sizeof (long);
194 1.1 jtc intrloc = calloc(nintr, sizeof (long));
195 1.1 jtc intrname = calloc(nintr, sizeof (long));
196 1.1 jtc intrnamebuf = malloc(namelist[X_EINTRNAMES].n_value -
197 1.1 jtc namelist[X_INTRNAMES].n_value);
198 1.23 jwise if (intrnamebuf == NULL || intrname == 0 || intrloc == 0) {
199 1.1 jtc error("Out of memory\n");
200 1.1 jtc if (intrnamebuf)
201 1.1 jtc free(intrnamebuf);
202 1.1 jtc if (intrname)
203 1.1 jtc free(intrname);
204 1.1 jtc if (intrloc)
205 1.1 jtc free(intrloc);
206 1.1 jtc nintr = 0;
207 1.1 jtc return(0);
208 1.1 jtc }
209 1.1 jtc NREAD(X_INTRNAMES, intrnamebuf, NVAL(X_EINTRNAMES) -
210 1.1 jtc NVAL(X_INTRNAMES));
211 1.1 jtc for (cp = intrnamebuf, i = 0; i < nintr; i++) {
212 1.1 jtc intrname[i] = cp;
213 1.1 jtc cp += strlen(cp) + 1;
214 1.1 jtc }
215 1.1 jtc nextintsrow = INTSROW + 2;
216 1.1 jtc allocinfo(&s);
217 1.1 jtc allocinfo(&s1);
218 1.1 jtc allocinfo(&s2);
219 1.1 jtc allocinfo(&z);
220 1.1 jtc }
221 1.1 jtc getinfo(&s2, RUN);
222 1.1 jtc copyinfo(&s2, &s1);
223 1.1 jtc return(1);
224 1.1 jtc }
225 1.1 jtc
226 1.1 jtc void
227 1.33 ad fetchvmstat(void)
228 1.1 jtc {
229 1.1 jtc time_t now;
230 1.1 jtc
231 1.1 jtc time(&now);
232 1.1 jtc strcpy(buf, ctime(&now));
233 1.18 marc buf[19] = '\0';
234 1.1 jtc getinfo(&s, state);
235 1.1 jtc }
236 1.1 jtc
237 1.1 jtc void
238 1.33 ad labelvmstat(void)
239 1.1 jtc {
240 1.10 lukem int i, j;
241 1.1 jtc
242 1.1 jtc clear();
243 1.1 jtc mvprintw(STATROW, STATCOL + 4, "users Load");
244 1.13 mrg mvprintw(MEMROW, MEMCOL, " memory totals (in KB)");
245 1.13 mrg mvprintw(MEMROW + 1, MEMCOL, " real virtual free");
246 1.13 mrg mvprintw(MEMROW + 2, MEMCOL, "Active");
247 1.13 mrg mvprintw(MEMROW + 3, MEMCOL, "All");
248 1.13 mrg
249 1.13 mrg mvprintw(PAGEROW, PAGECOL, " PAGING SWAPPING ");
250 1.13 mrg mvprintw(PAGEROW + 1, PAGECOL, " in out in out ");
251 1.13 mrg mvprintw(PAGEROW + 2, PAGECOL, "ops");
252 1.13 mrg mvprintw(PAGEROW + 3, PAGECOL, "pages");
253 1.1 jtc
254 1.1 jtc mvprintw(INTSROW, INTSCOL + 3, " Interrupts");
255 1.1 jtc mvprintw(INTSROW + 1, INTSCOL + 9, "total");
256 1.1 jtc
257 1.12 mrg mvprintw(VMSTATROW + 0, VMSTATCOL + 10, "forks");
258 1.12 mrg mvprintw(VMSTATROW + 1, VMSTATCOL + 10, "fkppw");
259 1.12 mrg mvprintw(VMSTATROW + 2, VMSTATCOL + 10, "fksvm");
260 1.12 mrg mvprintw(VMSTATROW + 3, VMSTATCOL + 10, "pwait");
261 1.12 mrg mvprintw(VMSTATROW + 4, VMSTATCOL + 10, "relck");
262 1.12 mrg mvprintw(VMSTATROW + 5, VMSTATCOL + 10, "rlkok");
263 1.12 mrg mvprintw(VMSTATROW + 6, VMSTATCOL + 10, "noram");
264 1.12 mrg mvprintw(VMSTATROW + 7, VMSTATCOL + 10, "ndcpy");
265 1.12 mrg mvprintw(VMSTATROW + 8, VMSTATCOL + 10, "fltcp");
266 1.12 mrg mvprintw(VMSTATROW + 9, VMSTATCOL + 10, "zfod");
267 1.12 mrg mvprintw(VMSTATROW + 10, VMSTATCOL + 10, "cow");
268 1.12 mrg mvprintw(VMSTATROW + 11, VMSTATCOL + 10, "fmin");
269 1.12 mrg mvprintw(VMSTATROW + 12, VMSTATCOL + 10, "ftarg");
270 1.12 mrg mvprintw(VMSTATROW + 13, VMSTATCOL + 10, "itarg");
271 1.12 mrg mvprintw(VMSTATROW + 14, VMSTATCOL + 10, "wired");
272 1.12 mrg mvprintw(VMSTATROW + 15, VMSTATCOL + 10, "pdfre");
273 1.12 mrg if (LINES - 1 > VMSTATROW + 16)
274 1.12 mrg mvprintw(VMSTATROW + 16, VMSTATCOL + 10, "pdscn");
275 1.1 jtc
276 1.36 augustss mvprintw(GENSTATROW, GENSTATCOL, " Csw Trp Sys Int Sof Flt");
277 1.1 jtc
278 1.1 jtc mvprintw(GRAPHROW, GRAPHCOL,
279 1.28 mycroft " . %% Sy . %% Us . %% Ni . %% In . %% Id");
280 1.13 mrg mvprintw(PROCSROW, PROCSCOL, "Proc:r d s w");
281 1.1 jtc mvprintw(GRAPHROW + 1, GRAPHCOL,
282 1.1 jtc "| | | | | | | | | | |");
283 1.1 jtc
284 1.1 jtc mvprintw(NAMEIROW, NAMEICOL, "Namei Sys-cache Proc-cache");
285 1.1 jtc mvprintw(NAMEIROW + 1, NAMEICOL,
286 1.1 jtc " Calls hits %% hits %%");
287 1.1 jtc mvprintw(DISKROW, DISKCOL, "Discs");
288 1.1 jtc mvprintw(DISKROW + 1, DISKCOL, "seeks");
289 1.1 jtc mvprintw(DISKROW + 2, DISKCOL, "xfers");
290 1.41 abs mvprintw(DISKROW + 3, DISKCOL, "bytes");
291 1.31 mycroft mvprintw(DISKROW + 4, DISKCOL, "%%busy");
292 1.1 jtc j = 0;
293 1.1 jtc for (i = 0; i < dk_ndrive && j < MAXDRIVES; i++)
294 1.1 jtc if (dk_select[i]) {
295 1.1 jtc mvprintw(DISKROW, DISKCOL + 5 + 5 * j,
296 1.20 soren " %4.4s", dr_name[j]);
297 1.1 jtc j++;
298 1.1 jtc }
299 1.1 jtc for (i = 0; i < nintr; i++) {
300 1.1 jtc if (intrloc[i] == 0)
301 1.1 jtc continue;
302 1.1 jtc mvprintw(intrloc[i], INTSCOL + 9, "%-8.8s", intrname[i]);
303 1.1 jtc }
304 1.1 jtc }
305 1.1 jtc
306 1.1 jtc #define X(fld) {t=s.fld[i]; s.fld[i]-=s1.fld[i]; if(state==TIME) s1.fld[i]=t;}
307 1.1 jtc #define Y(fld) {t = s.fld; s.fld -= s1.fld; if(state == TIME) s1.fld = t;}
308 1.1 jtc #define Z(fld) {t = s.nchstats.fld; s.nchstats.fld -= s1.nchstats.fld; \
309 1.1 jtc if(state == TIME) s1.nchstats.fld = t;}
310 1.16 mycroft #define PUTRATE(fld, l, c, w) {Y(fld); putint((int)((float)s.fld/etime + 0.5), l, c, w);}
311 1.1 jtc #define MAXFAIL 5
312 1.1 jtc
313 1.25 simonb static char cpuchar[CPUSTATES] = { '=' , '>', '-', '%', ' ' };
314 1.25 simonb static char cpuorder[CPUSTATES] = { CP_SYS, CP_USER, CP_NICE, CP_INTR, CP_IDLE };
315 1.1 jtc
316 1.1 jtc void
317 1.33 ad showvmstat(void)
318 1.1 jtc {
319 1.1 jtc float f1, f2;
320 1.1 jtc int psiz, inttotal;
321 1.1 jtc int i, l, c;
322 1.1 jtc static int failcnt = 0;
323 1.39 sommerfe
324 1.5 thorpej if (state == TIME)
325 1.5 thorpej dkswap();
326 1.39 sommerfe etime = cur.cp_etime;
327 1.39 sommerfe if ((etime * hertz) < 1.0) { /* < 5 ticks - ignore this trash */
328 1.1 jtc if (failcnt++ >= MAXFAIL) {
329 1.1 jtc clear();
330 1.1 jtc mvprintw(2, 10, "The alternate system clock has died!");
331 1.1 jtc mvprintw(3, 10, "Reverting to ``pigs'' display.");
332 1.1 jtc move(CMDLINE, 0);
333 1.1 jtc refresh();
334 1.1 jtc failcnt = 0;
335 1.1 jtc sleep(5);
336 1.1 jtc command("pigs");
337 1.1 jtc }
338 1.1 jtc return;
339 1.1 jtc }
340 1.1 jtc failcnt = 0;
341 1.1 jtc inttotal = 0;
342 1.1 jtc for (i = 0; i < nintr; i++) {
343 1.1 jtc if (s.intrcnt[i] == 0)
344 1.1 jtc continue;
345 1.1 jtc if (intrloc[i] == 0) {
346 1.1 jtc if (nextintsrow == LINES)
347 1.1 jtc continue;
348 1.1 jtc intrloc[i] = nextintsrow++;
349 1.1 jtc mvprintw(intrloc[i], INTSCOL + 9, "%-8.8s",
350 1.1 jtc intrname[i]);
351 1.1 jtc }
352 1.1 jtc X(intrcnt);
353 1.1 jtc l = (int)((float)s.intrcnt[i]/etime + 0.5);
354 1.1 jtc inttotal += l;
355 1.1 jtc putint(l, intrloc[i], INTSCOL, 8);
356 1.1 jtc }
357 1.1 jtc putint(inttotal, INTSROW + 1, INTSCOL, 8);
358 1.1 jtc Z(ncs_goodhits); Z(ncs_badhits); Z(ncs_miss);
359 1.1 jtc Z(ncs_long); Z(ncs_pass2); Z(ncs_2passes);
360 1.1 jtc s.nchcount = nchtotal.ncs_goodhits + nchtotal.ncs_badhits +
361 1.1 jtc nchtotal.ncs_miss + nchtotal.ncs_long;
362 1.1 jtc if (state == TIME)
363 1.1 jtc s1.nchcount = s.nchcount;
364 1.1 jtc
365 1.1 jtc psiz = 0;
366 1.1 jtc f2 = 0.0;
367 1.1 jtc
368 1.39 sommerfe /*
369 1.1 jtc * Last CPU state not calculated yet.
370 1.1 jtc */
371 1.28 mycroft for (c = 0; c < CPUSTATES; c++) {
372 1.1 jtc i = cpuorder[c];
373 1.1 jtc f1 = cputime(i);
374 1.1 jtc f2 += f1;
375 1.1 jtc l = (int) ((f2 + 1.0) / 2.0) - psiz;
376 1.1 jtc if (c == 0)
377 1.1 jtc putfloat(f1, GRAPHROW, GRAPHCOL + 1, 5, 1, 0);
378 1.1 jtc else
379 1.28 mycroft putfloat(f1, GRAPHROW, GRAPHCOL + 10 * c + 1, 5, 1, 0);
380 1.28 mycroft mvhline(GRAPHROW + 2, psiz, cpuchar[c], l);
381 1.1 jtc psiz += l;
382 1.1 jtc }
383 1.1 jtc
384 1.1 jtc putint(ucount(), STATROW, STATCOL, 3);
385 1.1 jtc putfloat(avenrun[0], STATROW, STATCOL + 17, 6, 2, 0);
386 1.1 jtc putfloat(avenrun[1], STATROW, STATCOL + 23, 6, 2, 0);
387 1.1 jtc putfloat(avenrun[2], STATROW, STATCOL + 29, 6, 2, 0);
388 1.1 jtc mvaddstr(STATROW, STATCOL + 53, buf);
389 1.17 drochner #define pgtokb(pg) ((pg) * (s.uvmexp.pagesize / 1024))
390 1.11 mrg
391 1.13 mrg putint(pgtokb(s.uvmexp.active), MEMROW + 2, MEMCOL + 6, 7);
392 1.12 mrg putint(pgtokb(s.uvmexp.active + s.uvmexp.swpginuse), /* XXX */
393 1.13 mrg MEMROW + 2, MEMCOL + 16, 7);
394 1.13 mrg putint(pgtokb(s.uvmexp.npages - s.uvmexp.free), MEMROW + 3, MEMCOL + 6, 7);
395 1.12 mrg putint(pgtokb(s.uvmexp.npages - s.uvmexp.free + s.uvmexp.swpginuse),
396 1.13 mrg MEMROW + 3, MEMCOL + 16, 7);
397 1.13 mrg putint(pgtokb(s.uvmexp.free), MEMROW + 2, MEMCOL + 24, 7);
398 1.12 mrg putint(pgtokb(s.uvmexp.free + s.uvmexp.swpages - s.uvmexp.swpginuse),
399 1.13 mrg MEMROW + 3, MEMCOL + 24, 7);
400 1.1 jtc putint(total.t_rq - 1, PROCSROW + 1, PROCSCOL + 3, 3);
401 1.13 mrg putint(total.t_dw, PROCSROW + 1, PROCSCOL + 6, 3);
402 1.13 mrg putint(total.t_sl, PROCSROW + 1, PROCSCOL + 9, 3);
403 1.13 mrg putint(total.t_sw, PROCSROW + 1, PROCSCOL + 12, 3);
404 1.12 mrg PUTRATE(uvmexp.forks, VMSTATROW + 0, VMSTATCOL + 3, 6);
405 1.12 mrg PUTRATE(uvmexp.forks_ppwait, VMSTATROW + 1, VMSTATCOL + 3, 6);
406 1.12 mrg PUTRATE(uvmexp.forks_sharevm, VMSTATROW + 2, VMSTATCOL + 3, 6);
407 1.12 mrg PUTRATE(uvmexp.fltpgwait, VMSTATROW + 3, VMSTATCOL + 4, 5);
408 1.12 mrg PUTRATE(uvmexp.fltrelck, VMSTATROW + 4, VMSTATCOL + 3, 6);
409 1.12 mrg PUTRATE(uvmexp.fltrelckok, VMSTATROW + 5, VMSTATCOL + 3, 6);
410 1.12 mrg PUTRATE(uvmexp.fltnoram, VMSTATROW + 6, VMSTATCOL + 3, 6);
411 1.12 mrg PUTRATE(uvmexp.fltamcopy, VMSTATROW + 7, VMSTATCOL + 3, 6);
412 1.12 mrg PUTRATE(uvmexp.flt_prcopy, VMSTATROW + 8, VMSTATCOL + 3, 6);
413 1.12 mrg PUTRATE(uvmexp.flt_przero, VMSTATROW + 9, VMSTATCOL + 3, 6);
414 1.12 mrg PUTRATE(uvmexp.flt_acow, VMSTATROW + 10, VMSTATCOL, 9);
415 1.12 mrg putint(s.uvmexp.freemin, VMSTATROW + 11, VMSTATCOL, 9);
416 1.12 mrg putint(s.uvmexp.freetarg, VMSTATROW + 12, VMSTATCOL, 9);
417 1.12 mrg putint(s.uvmexp.inactarg, VMSTATROW + 13, VMSTATCOL, 9);
418 1.12 mrg putint(s.uvmexp.wired, VMSTATROW + 14, VMSTATCOL, 9);
419 1.12 mrg PUTRATE(uvmexp.pdfreed, VMSTATROW + 15, VMSTATCOL, 9);
420 1.11 mrg if (LINES - 1 > VMSTATROW + 16)
421 1.12 mrg PUTRATE(uvmexp.pdscans, VMSTATROW + 16, VMSTATCOL, 9);
422 1.12 mrg
423 1.12 mrg PUTRATE(uvmexp.pageins, PAGEROW + 2, PAGECOL + 5, 5);
424 1.11 mrg PUTRATE(uvmexp.pdpageouts, PAGEROW + 2, PAGECOL + 10, 5);
425 1.12 mrg PUTRATE(uvmexp.swapins, PAGEROW + 2, PAGECOL + 15, 5);
426 1.12 mrg PUTRATE(uvmexp.swapouts, PAGEROW + 2, PAGECOL + 20, 5);
427 1.12 mrg PUTRATE(uvmexp.pgswapin, PAGEROW + 3, PAGECOL + 5, 5);
428 1.12 mrg PUTRATE(uvmexp.pgswapout, PAGEROW + 3, PAGECOL + 10, 5);
429 1.12 mrg
430 1.36 augustss PUTRATE(uvmexp.swtch, GENSTATROW + 1, GENSTATCOL, 4);
431 1.36 augustss PUTRATE(uvmexp.traps, GENSTATROW + 1, GENSTATCOL + 4, 6);
432 1.36 augustss PUTRATE(uvmexp.syscalls, GENSTATROW + 1, GENSTATCOL + 10, 6);
433 1.36 augustss PUTRATE(uvmexp.intrs, GENSTATROW + 1, GENSTATCOL + 16, 5);
434 1.36 augustss PUTRATE(uvmexp.softs, GENSTATROW + 1, GENSTATCOL + 21, 5);
435 1.36 augustss PUTRATE(uvmexp.faults, GENSTATROW + 1, GENSTATCOL + 26, 6);
436 1.1 jtc mvprintw(DISKROW, DISKCOL + 5, " ");
437 1.1 jtc for (i = 0, c = 0; i < dk_ndrive && c < MAXDRIVES; i++)
438 1.1 jtc if (dk_select[i]) {
439 1.1 jtc mvprintw(DISKROW, DISKCOL + 5 + 5 * c,
440 1.20 soren " %4.4s", dr_name[i]);
441 1.1 jtc dinfo(i, ++c);
442 1.1 jtc }
443 1.1 jtc putint(s.nchcount, NAMEIROW + 2, NAMEICOL, 9);
444 1.1 jtc putint(nchtotal.ncs_goodhits, NAMEIROW + 2, NAMEICOL + 9, 9);
445 1.1 jtc #define nz(x) ((x) ? (x) : 1)
446 1.1 jtc putfloat(nchtotal.ncs_goodhits * 100.0 / nz(s.nchcount),
447 1.1 jtc NAMEIROW + 2, NAMEICOL + 19, 4, 0, 1);
448 1.1 jtc putint(nchtotal.ncs_pass2, NAMEIROW + 2, NAMEICOL + 23, 9);
449 1.1 jtc putfloat(nchtotal.ncs_pass2 * 100.0 / nz(s.nchcount),
450 1.1 jtc NAMEIROW + 2, NAMEICOL + 34, 4, 0, 1);
451 1.1 jtc #undef nz
452 1.1 jtc }
453 1.1 jtc
454 1.22 jwise void
455 1.33 ad vmstat_boot(char *args)
456 1.22 jwise {
457 1.22 jwise copyinfo(&z, &s1);
458 1.22 jwise state = BOOT;
459 1.22 jwise }
460 1.22 jwise
461 1.22 jwise void
462 1.33 ad vmstat_run(char *args)
463 1.22 jwise {
464 1.22 jwise copyinfo(&s1, &s2);
465 1.22 jwise state = RUN;
466 1.22 jwise }
467 1.22 jwise
468 1.22 jwise void
469 1.22 jwise vmstat_time (args)
470 1.22 jwise char * args;
471 1.1 jtc {
472 1.22 jwise state = TIME;
473 1.22 jwise }
474 1.1 jtc
475 1.22 jwise void
476 1.33 ad vmstat_zero(char *args)
477 1.22 jwise {
478 1.22 jwise if (state == RUN)
479 1.22 jwise getinfo(&s1, RUN);
480 1.1 jtc }
481 1.1 jtc
482 1.1 jtc /* calculate number of users on the system */
483 1.1 jtc static int
484 1.33 ad ucount(void)
485 1.1 jtc {
486 1.40 christos static int onusers = -1;
487 1.40 christos static struct utmpentry *oehead = NULL;
488 1.40 christos int nusers = 0;
489 1.40 christos struct utmpentry *ehead;
490 1.40 christos
491 1.40 christos nusers = getutentries(NULL, &ehead);
492 1.40 christos if (oehead != ehead) {
493 1.40 christos freeutentries(oehead);
494 1.40 christos oehead = ehead;
495 1.40 christos }
496 1.1 jtc
497 1.21 mrg if (nusers != onusers) {
498 1.21 mrg if (nusers == 1)
499 1.21 mrg mvprintw(STATROW, STATCOL + 8, " ");
500 1.21 mrg else
501 1.21 mrg mvprintw(STATROW, STATCOL + 8, "s");
502 1.21 mrg }
503 1.21 mrg onusers = nusers;
504 1.1 jtc return (nusers);
505 1.1 jtc }
506 1.1 jtc
507 1.1 jtc static float
508 1.33 ad cputime(int indx)
509 1.1 jtc {
510 1.1 jtc double t;
511 1.10 lukem int i;
512 1.1 jtc
513 1.1 jtc t = 0;
514 1.1 jtc for (i = 0; i < CPUSTATES; i++)
515 1.39 sommerfe t += cur.cp_time[i];
516 1.1 jtc if (t == 0.0)
517 1.1 jtc t = 1.0;
518 1.39 sommerfe return (cur.cp_time[indx] * 100.0 / t);
519 1.1 jtc }
520 1.1 jtc
521 1.1 jtc static void
522 1.41 abs puthumanint(int n, int l, int c, int w)
523 1.41 abs {
524 1.41 abs char b[128];
525 1.41 abs
526 1.41 abs move(l, c);
527 1.41 abs if (n == 0) {
528 1.41 abs hline(' ', w);
529 1.41 abs return;
530 1.41 abs }
531 1.41 abs if (humanize_number(b, w, (int64_t)n * 1024, "", HN_AUTOSCALE,
532 1.41 abs HN_NOSPACE) == -1 ) {
533 1.41 abs hline('*', w);
534 1.41 abs return;
535 1.41 abs }
536 1.41 abs hline(' ', w - strlen(b));
537 1.41 abs move(l, c + w - strlen(b));
538 1.41 abs addstr(b);
539 1.41 abs }
540 1.41 abs
541 1.41 abs static void
542 1.33 ad putint(int n, int l, int c, int w)
543 1.1 jtc {
544 1.1 jtc char b[128];
545 1.1 jtc
546 1.1 jtc move(l, c);
547 1.1 jtc if (n == 0) {
548 1.30 mycroft hline(' ', w);
549 1.1 jtc return;
550 1.1 jtc }
551 1.14 mrg (void)snprintf(b, sizeof b, "%*d", w, n);
552 1.1 jtc if (strlen(b) > w) {
553 1.30 mycroft hline('*', w);
554 1.1 jtc return;
555 1.1 jtc }
556 1.1 jtc addstr(b);
557 1.1 jtc }
558 1.1 jtc
559 1.1 jtc static void
560 1.33 ad putfloat(double f, int l, int c, int w, int d, int nz)
561 1.1 jtc {
562 1.1 jtc char b[128];
563 1.1 jtc
564 1.1 jtc move(l, c);
565 1.1 jtc if (nz && f == 0.0) {
566 1.30 mycroft hline(' ', w);
567 1.1 jtc return;
568 1.1 jtc }
569 1.14 mrg (void)snprintf(b, sizeof b, "%*.*f", w, d, f);
570 1.1 jtc if (strlen(b) > w) {
571 1.30 mycroft hline('*', w);
572 1.1 jtc return;
573 1.1 jtc }
574 1.1 jtc addstr(b);
575 1.1 jtc }
576 1.1 jtc
577 1.1 jtc static void
578 1.33 ad getinfo(struct Info *s, enum state st)
579 1.1 jtc {
580 1.4 cgd int mib[2];
581 1.4 cgd size_t size;
582 1.1 jtc
583 1.5 thorpej dkreadstats();
584 1.1 jtc NREAD(X_NCHSTATS, &s->nchstats, sizeof s->nchstats);
585 1.1 jtc NREAD(X_INTRCNT, s->intrcnt, nintr * LONG);
586 1.11 mrg size = sizeof(s->uvmexp);
587 1.11 mrg mib[0] = CTL_VM;
588 1.34 simonb mib[1] = VM_UVMEXP2;
589 1.11 mrg if (sysctl(mib, 2, &s->uvmexp, &size, NULL, 0) < 0) {
590 1.11 mrg error("can't get uvmexp: %s\n", strerror(errno));
591 1.11 mrg memset(&s->uvmexp, 0, sizeof(s->uvmexp));
592 1.11 mrg }
593 1.1 jtc size = sizeof(s->Total);
594 1.1 jtc mib[0] = CTL_VM;
595 1.1 jtc mib[1] = VM_METER;
596 1.1 jtc if (sysctl(mib, 2, &s->Total, &size, NULL, 0) < 0) {
597 1.1 jtc error("Can't get kernel info: %s\n", strerror(errno));
598 1.10 lukem memset(&s->Total, 0, sizeof(s->Total));
599 1.1 jtc }
600 1.1 jtc }
601 1.1 jtc
602 1.1 jtc static void
603 1.33 ad allocinfo(struct Info *s)
604 1.1 jtc {
605 1.1 jtc
606 1.23 jwise if ((s->intrcnt = malloc(nintr * sizeof(long))) == NULL) {
607 1.23 jwise error("malloc failed");
608 1.23 jwise die(0);
609 1.23 jwise }
610 1.1 jtc }
611 1.1 jtc
612 1.1 jtc static void
613 1.33 ad copyinfo(struct Info *from, struct Info *to)
614 1.1 jtc {
615 1.1 jtc long *intrcnt;
616 1.1 jtc
617 1.5 thorpej intrcnt = to->intrcnt;
618 1.1 jtc *to = *from;
619 1.10 lukem memmove(to->intrcnt = intrcnt, from->intrcnt, nintr * sizeof (int));
620 1.1 jtc }
621 1.1 jtc
622 1.1 jtc static void
623 1.33 ad dinfo(int dn, int c)
624 1.1 jtc {
625 1.5 thorpej double words, atime;
626 1.1 jtc
627 1.1 jtc c = DISKCOL + c * 5;
628 1.5 thorpej
629 1.5 thorpej /* time busy in disk activity */
630 1.5 thorpej atime = (double)cur.dk_time[dn].tv_sec +
631 1.5 thorpej ((double)cur.dk_time[dn].tv_usec / (double)1000000);
632 1.5 thorpej
633 1.5 thorpej words = cur.dk_bytes[dn] / 1024.0; /* # of K transferred */
634 1.5 thorpej
635 1.5 thorpej putint((int)((float)cur.dk_seek[dn]/etime+0.5), DISKROW + 1, c, 5);
636 1.5 thorpej putint((int)((float)cur.dk_xfer[dn]/etime+0.5), DISKROW + 2, c, 5);
637 1.41 abs puthumanint((int)(words/etime + 0.5), DISKROW + 3, c, 5);
638 1.41 abs if (atime*100.0/etime >= 100)
639 1.41 abs putint(100, DISKROW + 4, c, 5);
640 1.41 abs else
641 1.41 abs putfloat(atime*100.0/etime, DISKROW + 4, c, 5, 1, 1);
642 1.1 jtc }
643