vmstat.c revision 1.7 1 1.7 scottr /* $NetBSD: vmstat.c,v 1.7 1996/12/13 19:26:23 scottr 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.1 jtc #ifndef lint
37 1.2 jtc #if 0
38 1.1 jtc static char sccsid[] = "@(#)vmstat.c 8.2 (Berkeley) 1/12/94";
39 1.2 jtc #endif
40 1.7 scottr static char rcsid[] = "$NetBSD: vmstat.c,v 1.7 1996/12/13 19:26:23 scottr Exp $";
41 1.1 jtc #endif /* not lint */
42 1.1 jtc
43 1.1 jtc /*
44 1.1 jtc * Cursed vmstat -- from Robert Elz.
45 1.1 jtc */
46 1.1 jtc
47 1.1 jtc #include <sys/param.h>
48 1.1 jtc #include <sys/dkstat.h>
49 1.1 jtc #include <sys/buf.h>
50 1.1 jtc #include <sys/stat.h>
51 1.1 jtc #include <sys/time.h>
52 1.1 jtc #include <sys/user.h>
53 1.1 jtc #include <sys/proc.h>
54 1.1 jtc #include <sys/namei.h>
55 1.1 jtc #include <sys/sysctl.h>
56 1.1 jtc #include <vm/vm.h>
57 1.1 jtc
58 1.3 mycroft #include <ctype.h>
59 1.3 mycroft #include <err.h>
60 1.1 jtc #include <nlist.h>
61 1.1 jtc #include <paths.h>
62 1.3 mycroft #include <signal.h>
63 1.3 mycroft #include <stdlib.h>
64 1.1 jtc #include <string.h>
65 1.3 mycroft #include <utmp.h>
66 1.1 jtc #include <unistd.h>
67 1.3 mycroft
68 1.1 jtc #include "systat.h"
69 1.1 jtc #include "extern.h"
70 1.1 jtc
71 1.1 jtc static struct Info {
72 1.1 jtc long time[CPUSTATES];
73 1.1 jtc struct vmmeter Cnt;
74 1.1 jtc struct vmtotal Total;
75 1.1 jtc struct nchstats nchstats;
76 1.1 jtc long nchcount;
77 1.1 jtc long *intrcnt;
78 1.1 jtc } s, s1, s2, z;
79 1.1 jtc
80 1.5 thorpej #include "dkstats.h"
81 1.5 thorpej extern struct _disk cur;
82 1.5 thorpej
83 1.5 thorpej
84 1.1 jtc #define cnt s.Cnt
85 1.1 jtc #define oldcnt s1.Cnt
86 1.1 jtc #define total s.Total
87 1.1 jtc #define nchtotal s.nchstats
88 1.1 jtc #define oldnchtotal s1.nchstats
89 1.1 jtc
90 1.1 jtc static enum state { BOOT, TIME, RUN } state = TIME;
91 1.1 jtc
92 1.1 jtc static void allocinfo __P((struct Info *));
93 1.1 jtc static void copyinfo __P((struct Info *, struct Info *));
94 1.1 jtc static float cputime __P((int));
95 1.1 jtc static void dinfo __P((int, int));
96 1.1 jtc static void getinfo __P((struct Info *, enum state));
97 1.1 jtc static void putint __P((int, int, int, int));
98 1.1 jtc static void putfloat __P((double, int, int, int, int, int));
99 1.1 jtc static int ucount __P((void));
100 1.1 jtc
101 1.1 jtc static int ut;
102 1.1 jtc static char buf[26];
103 1.1 jtc static time_t t;
104 1.1 jtc static double etime;
105 1.1 jtc static float hertz;
106 1.1 jtc static int nintr;
107 1.1 jtc static long *intrloc;
108 1.1 jtc static char **intrname;
109 1.1 jtc static int nextintsrow;
110 1.1 jtc
111 1.1 jtc struct utmp utmp;
112 1.1 jtc
113 1.1 jtc
114 1.1 jtc WINDOW *
115 1.1 jtc openkre()
116 1.1 jtc {
117 1.1 jtc
118 1.1 jtc ut = open(_PATH_UTMP, O_RDONLY);
119 1.1 jtc if (ut < 0)
120 1.1 jtc error("No utmp");
121 1.1 jtc return (stdscr);
122 1.1 jtc }
123 1.1 jtc
124 1.1 jtc void
125 1.1 jtc closekre(w)
126 1.1 jtc WINDOW *w;
127 1.1 jtc {
128 1.1 jtc
129 1.1 jtc (void) close(ut);
130 1.1 jtc if (w == NULL)
131 1.1 jtc return;
132 1.1 jtc wclear(w);
133 1.1 jtc wrefresh(w);
134 1.1 jtc }
135 1.1 jtc
136 1.1 jtc
137 1.1 jtc static struct nlist namelist[] = {
138 1.1 jtc #define X_CPTIME 0
139 1.1 jtc { "_cp_time" },
140 1.1 jtc #define X_CNT 1
141 1.1 jtc { "_cnt" },
142 1.1 jtc #define X_TOTAL 2
143 1.1 jtc { "_total" },
144 1.6 explorer #define X_NCHSTATS 3
145 1.1 jtc { "_nchstats" },
146 1.6 explorer #define X_INTRNAMES 4
147 1.1 jtc { "_intrnames" },
148 1.6 explorer #define X_EINTRNAMES 5
149 1.1 jtc { "_eintrnames" },
150 1.6 explorer #define X_INTRCNT 6
151 1.1 jtc { "_intrcnt" },
152 1.6 explorer #define X_EINTRCNT 7
153 1.1 jtc { "_eintrcnt" },
154 1.1 jtc { "" },
155 1.1 jtc };
156 1.1 jtc
157 1.1 jtc /*
158 1.1 jtc * These constants define where the major pieces are laid out
159 1.1 jtc */
160 1.1 jtc #define STATROW 0 /* uses 1 row and 68 cols */
161 1.1 jtc #define STATCOL 2
162 1.1 jtc #define MEMROW 2 /* uses 4 rows and 31 cols */
163 1.1 jtc #define MEMCOL 0
164 1.1 jtc #define PAGEROW 2 /* uses 4 rows and 26 cols */
165 1.1 jtc #define PAGECOL 36
166 1.1 jtc #define INTSROW 2 /* uses all rows to bottom and 17 cols */
167 1.1 jtc #define INTSCOL 63
168 1.1 jtc #define PROCSROW 7 /* uses 2 rows and 20 cols */
169 1.1 jtc #define PROCSCOL 0
170 1.1 jtc #define GENSTATROW 7 /* uses 2 rows and 30 cols */
171 1.1 jtc #define GENSTATCOL 20
172 1.1 jtc #define VMSTATROW 7 /* uses 17 rows and 12 cols */
173 1.1 jtc #define VMSTATCOL 48
174 1.1 jtc #define GRAPHROW 10 /* uses 3 rows and 51 cols */
175 1.1 jtc #define GRAPHCOL 0
176 1.1 jtc #define NAMEIROW 14 /* uses 3 rows and 38 cols */
177 1.1 jtc #define NAMEICOL 0
178 1.1 jtc #define DISKROW 18 /* uses 5 rows and 50 cols (for 9 drives) */
179 1.1 jtc #define DISKCOL 0
180 1.1 jtc
181 1.1 jtc #define DRIVESPACE 9 /* max # for space */
182 1.1 jtc
183 1.1 jtc #if DK_NDRIVE > DRIVESPACE
184 1.1 jtc #define MAXDRIVES DRIVESPACE /* max # to display */
185 1.1 jtc #else
186 1.1 jtc #define MAXDRIVES DK_NDRIVE /* max # to display */
187 1.1 jtc #endif
188 1.1 jtc
189 1.1 jtc int
190 1.1 jtc initkre()
191 1.1 jtc {
192 1.1 jtc char *intrnamebuf, *cp;
193 1.1 jtc int i;
194 1.1 jtc static int once = 0;
195 1.1 jtc
196 1.1 jtc if (namelist[0].n_type == 0) {
197 1.1 jtc if (kvm_nlist(kd, namelist)) {
198 1.1 jtc nlisterr(namelist);
199 1.1 jtc return(0);
200 1.1 jtc }
201 1.1 jtc if (namelist[0].n_type == 0) {
202 1.1 jtc error("No namelist");
203 1.1 jtc return(0);
204 1.1 jtc }
205 1.1 jtc }
206 1.1 jtc hertz = stathz ? stathz : hz;
207 1.5 thorpej if (! dkinit(1))
208 1.1 jtc return(0);
209 1.1 jtc if (dk_ndrive && !once) {
210 1.1 jtc #define allocate(e, t) \
211 1.7 scottr s./**/e = (t *)calloc(dk_ndrive, sizeof (t)); \
212 1.7 scottr s1./**/e = (t *)calloc(dk_ndrive, sizeof (t)); \
213 1.7 scottr s2./**/e = (t *)calloc(dk_ndrive, sizeof (t)); \
214 1.7 scottr z./**/e = (t *)calloc(dk_ndrive, sizeof (t));
215 1.1 jtc once = 1;
216 1.1 jtc #undef allocate
217 1.1 jtc }
218 1.1 jtc if (nintr == 0) {
219 1.1 jtc nintr = (namelist[X_EINTRCNT].n_value -
220 1.1 jtc namelist[X_INTRCNT].n_value) / sizeof (long);
221 1.1 jtc intrloc = calloc(nintr, sizeof (long));
222 1.1 jtc intrname = calloc(nintr, sizeof (long));
223 1.1 jtc intrnamebuf = malloc(namelist[X_EINTRNAMES].n_value -
224 1.1 jtc namelist[X_INTRNAMES].n_value);
225 1.1 jtc if (intrnamebuf == 0 || intrname == 0 || intrloc == 0) {
226 1.1 jtc error("Out of memory\n");
227 1.1 jtc if (intrnamebuf)
228 1.1 jtc free(intrnamebuf);
229 1.1 jtc if (intrname)
230 1.1 jtc free(intrname);
231 1.1 jtc if (intrloc)
232 1.1 jtc free(intrloc);
233 1.1 jtc nintr = 0;
234 1.1 jtc return(0);
235 1.1 jtc }
236 1.1 jtc NREAD(X_INTRNAMES, intrnamebuf, NVAL(X_EINTRNAMES) -
237 1.1 jtc NVAL(X_INTRNAMES));
238 1.1 jtc for (cp = intrnamebuf, i = 0; i < nintr; i++) {
239 1.1 jtc intrname[i] = cp;
240 1.1 jtc cp += strlen(cp) + 1;
241 1.1 jtc }
242 1.1 jtc nextintsrow = INTSROW + 2;
243 1.1 jtc allocinfo(&s);
244 1.1 jtc allocinfo(&s1);
245 1.1 jtc allocinfo(&s2);
246 1.1 jtc allocinfo(&z);
247 1.1 jtc }
248 1.1 jtc getinfo(&s2, RUN);
249 1.1 jtc copyinfo(&s2, &s1);
250 1.1 jtc return(1);
251 1.1 jtc }
252 1.1 jtc
253 1.1 jtc void
254 1.1 jtc fetchkre()
255 1.1 jtc {
256 1.1 jtc time_t now;
257 1.1 jtc
258 1.1 jtc time(&now);
259 1.1 jtc strcpy(buf, ctime(&now));
260 1.1 jtc buf[16] = '\0';
261 1.1 jtc getinfo(&s, state);
262 1.1 jtc }
263 1.1 jtc
264 1.1 jtc void
265 1.1 jtc labelkre()
266 1.1 jtc {
267 1.1 jtc register int i, j;
268 1.1 jtc
269 1.1 jtc clear();
270 1.1 jtc mvprintw(STATROW, STATCOL + 4, "users Load");
271 1.1 jtc mvprintw(MEMROW, MEMCOL, "Mem:KB REAL VIRTUAL");
272 1.1 jtc mvprintw(MEMROW + 1, MEMCOL, " Tot Share Tot Share");
273 1.1 jtc mvprintw(MEMROW + 2, MEMCOL, "Act");
274 1.1 jtc mvprintw(MEMROW + 3, MEMCOL, "All");
275 1.1 jtc
276 1.1 jtc mvprintw(MEMROW + 1, MEMCOL + 31, "Free");
277 1.1 jtc
278 1.1 jtc mvprintw(PAGEROW, PAGECOL, " PAGING SWAPPING ");
279 1.1 jtc mvprintw(PAGEROW + 1, PAGECOL, " in out in out ");
280 1.1 jtc mvprintw(PAGEROW + 2, PAGECOL, "count");
281 1.1 jtc mvprintw(PAGEROW + 3, PAGECOL, "pages");
282 1.1 jtc
283 1.1 jtc mvprintw(INTSROW, INTSCOL + 3, " Interrupts");
284 1.1 jtc mvprintw(INTSROW + 1, INTSCOL + 9, "total");
285 1.1 jtc
286 1.1 jtc mvprintw(VMSTATROW + 0, VMSTATCOL + 10, "cow");
287 1.1 jtc mvprintw(VMSTATROW + 1, VMSTATCOL + 10, "objlk");
288 1.1 jtc mvprintw(VMSTATROW + 2, VMSTATCOL + 10, "objht");
289 1.1 jtc mvprintw(VMSTATROW + 3, VMSTATCOL + 10, "zfod");
290 1.1 jtc mvprintw(VMSTATROW + 4, VMSTATCOL + 10, "nzfod");
291 1.1 jtc mvprintw(VMSTATROW + 5, VMSTATCOL + 10, "%%zfod");
292 1.1 jtc mvprintw(VMSTATROW + 6, VMSTATCOL + 10, "kern");
293 1.1 jtc mvprintw(VMSTATROW + 7, VMSTATCOL + 10, "wire");
294 1.1 jtc mvprintw(VMSTATROW + 8, VMSTATCOL + 10, "act");
295 1.1 jtc mvprintw(VMSTATROW + 9, VMSTATCOL + 10, "inact");
296 1.1 jtc mvprintw(VMSTATROW + 10, VMSTATCOL + 10, "free");
297 1.1 jtc mvprintw(VMSTATROW + 11, VMSTATCOL + 10, "daefr");
298 1.1 jtc mvprintw(VMSTATROW + 12, VMSTATCOL + 10, "prcfr");
299 1.1 jtc mvprintw(VMSTATROW + 13, VMSTATCOL + 10, "react");
300 1.1 jtc mvprintw(VMSTATROW + 14, VMSTATCOL + 10, "scan");
301 1.1 jtc mvprintw(VMSTATROW + 15, VMSTATCOL + 10, "hdrev");
302 1.1 jtc if (LINES - 1 > VMSTATROW + 16)
303 1.1 jtc mvprintw(VMSTATROW + 16, VMSTATCOL + 10, "intrn");
304 1.1 jtc
305 1.1 jtc mvprintw(GENSTATROW, GENSTATCOL, " Csw Trp Sys Int Sof Flt");
306 1.1 jtc
307 1.1 jtc mvprintw(GRAPHROW, GRAPHCOL,
308 1.1 jtc " . %% Sys . %% User . %% Nice . %% Idle");
309 1.1 jtc mvprintw(PROCSROW, PROCSCOL, "Proc:r p d s w");
310 1.1 jtc mvprintw(GRAPHROW + 1, GRAPHCOL,
311 1.1 jtc "| | | | | | | | | | |");
312 1.1 jtc
313 1.1 jtc mvprintw(NAMEIROW, NAMEICOL, "Namei Sys-cache Proc-cache");
314 1.1 jtc mvprintw(NAMEIROW + 1, NAMEICOL,
315 1.1 jtc " Calls hits %% hits %%");
316 1.1 jtc mvprintw(DISKROW, DISKCOL, "Discs");
317 1.1 jtc mvprintw(DISKROW + 1, DISKCOL, "seeks");
318 1.1 jtc mvprintw(DISKROW + 2, DISKCOL, "xfers");
319 1.5 thorpej mvprintw(DISKROW + 3, DISKCOL, "Kbyte");
320 1.5 thorpej mvprintw(DISKROW + 4, DISKCOL, " sec");
321 1.1 jtc j = 0;
322 1.1 jtc for (i = 0; i < dk_ndrive && j < MAXDRIVES; i++)
323 1.1 jtc if (dk_select[i]) {
324 1.1 jtc mvprintw(DISKROW, DISKCOL + 5 + 5 * j,
325 1.1 jtc " %3.3s", dr_name[j]);
326 1.1 jtc j++;
327 1.1 jtc }
328 1.1 jtc for (i = 0; i < nintr; i++) {
329 1.1 jtc if (intrloc[i] == 0)
330 1.1 jtc continue;
331 1.1 jtc mvprintw(intrloc[i], INTSCOL + 9, "%-8.8s", intrname[i]);
332 1.1 jtc }
333 1.1 jtc }
334 1.1 jtc
335 1.1 jtc #define X(fld) {t=s.fld[i]; s.fld[i]-=s1.fld[i]; if(state==TIME) s1.fld[i]=t;}
336 1.1 jtc #define Y(fld) {t = s.fld; s.fld -= s1.fld; if(state == TIME) s1.fld = t;}
337 1.1 jtc #define Z(fld) {t = s.nchstats.fld; s.nchstats.fld -= s1.nchstats.fld; \
338 1.1 jtc if(state == TIME) s1.nchstats.fld = t;}
339 1.1 jtc #define PUTRATE(fld, l, c, w) \
340 1.1 jtc Y(fld); \
341 1.1 jtc putint((int)((float)s.fld/etime + 0.5), l, c, w)
342 1.1 jtc #define MAXFAIL 5
343 1.1 jtc
344 1.1 jtc static char cpuchar[CPUSTATES] = { '=' , '>', '-', ' ' };
345 1.1 jtc static char cpuorder[CPUSTATES] = { CP_SYS, CP_USER, CP_NICE, CP_IDLE };
346 1.1 jtc
347 1.1 jtc void
348 1.1 jtc showkre()
349 1.1 jtc {
350 1.1 jtc float f1, f2;
351 1.1 jtc int psiz, inttotal;
352 1.1 jtc int i, l, c;
353 1.1 jtc static int failcnt = 0;
354 1.1 jtc
355 1.5 thorpej
356 1.5 thorpej if (state == TIME)
357 1.5 thorpej dkswap();
358 1.1 jtc etime = 0;
359 1.1 jtc for(i = 0; i < CPUSTATES; i++) {
360 1.1 jtc X(time);
361 1.1 jtc etime += s.time[i];
362 1.1 jtc }
363 1.1 jtc if (etime < 5.0) { /* < 5 ticks - ignore this trash */
364 1.1 jtc if (failcnt++ >= MAXFAIL) {
365 1.1 jtc clear();
366 1.1 jtc mvprintw(2, 10, "The alternate system clock has died!");
367 1.1 jtc mvprintw(3, 10, "Reverting to ``pigs'' display.");
368 1.1 jtc move(CMDLINE, 0);
369 1.1 jtc refresh();
370 1.1 jtc failcnt = 0;
371 1.1 jtc sleep(5);
372 1.1 jtc command("pigs");
373 1.1 jtc }
374 1.1 jtc return;
375 1.1 jtc }
376 1.1 jtc failcnt = 0;
377 1.1 jtc etime /= hertz;
378 1.1 jtc inttotal = 0;
379 1.1 jtc for (i = 0; i < nintr; i++) {
380 1.1 jtc if (s.intrcnt[i] == 0)
381 1.1 jtc continue;
382 1.1 jtc if (intrloc[i] == 0) {
383 1.1 jtc if (nextintsrow == LINES)
384 1.1 jtc continue;
385 1.1 jtc intrloc[i] = nextintsrow++;
386 1.1 jtc mvprintw(intrloc[i], INTSCOL + 9, "%-8.8s",
387 1.1 jtc intrname[i]);
388 1.1 jtc }
389 1.1 jtc X(intrcnt);
390 1.1 jtc l = (int)((float)s.intrcnt[i]/etime + 0.5);
391 1.1 jtc inttotal += l;
392 1.1 jtc putint(l, intrloc[i], INTSCOL, 8);
393 1.1 jtc }
394 1.1 jtc putint(inttotal, INTSROW + 1, INTSCOL, 8);
395 1.1 jtc Z(ncs_goodhits); Z(ncs_badhits); Z(ncs_miss);
396 1.1 jtc Z(ncs_long); Z(ncs_pass2); Z(ncs_2passes);
397 1.1 jtc s.nchcount = nchtotal.ncs_goodhits + nchtotal.ncs_badhits +
398 1.1 jtc nchtotal.ncs_miss + nchtotal.ncs_long;
399 1.1 jtc if (state == TIME)
400 1.1 jtc s1.nchcount = s.nchcount;
401 1.1 jtc
402 1.1 jtc psiz = 0;
403 1.1 jtc f2 = 0.0;
404 1.1 jtc
405 1.1 jtc /*
406 1.1 jtc * Last CPU state not calculated yet.
407 1.1 jtc */
408 1.1 jtc for (c = 0; c < CPUSTATES - 1; c++) {
409 1.1 jtc i = cpuorder[c];
410 1.1 jtc f1 = cputime(i);
411 1.1 jtc f2 += f1;
412 1.1 jtc l = (int) ((f2 + 1.0) / 2.0) - psiz;
413 1.1 jtc if (c == 0)
414 1.1 jtc putfloat(f1, GRAPHROW, GRAPHCOL + 1, 5, 1, 0);
415 1.1 jtc else
416 1.1 jtc putfloat(f1, GRAPHROW, GRAPHCOL + 12 * c,
417 1.1 jtc 5, 1, 0);
418 1.1 jtc move(GRAPHROW + 2, psiz);
419 1.1 jtc psiz += l;
420 1.1 jtc while (l-- > 0)
421 1.1 jtc addch(cpuchar[c]);
422 1.1 jtc }
423 1.1 jtc
424 1.1 jtc putint(ucount(), STATROW, STATCOL, 3);
425 1.1 jtc putfloat(avenrun[0], STATROW, STATCOL + 17, 6, 2, 0);
426 1.1 jtc putfloat(avenrun[1], STATROW, STATCOL + 23, 6, 2, 0);
427 1.1 jtc putfloat(avenrun[2], STATROW, STATCOL + 29, 6, 2, 0);
428 1.1 jtc mvaddstr(STATROW, STATCOL + 53, buf);
429 1.1 jtc #define pgtokb(pg) ((pg) * cnt.v_page_size / 1024)
430 1.1 jtc putint(pgtokb(total.t_arm), MEMROW + 2, MEMCOL + 3, 6);
431 1.1 jtc putint(pgtokb(total.t_armshr), MEMROW + 2, MEMCOL + 9, 6);
432 1.1 jtc putint(pgtokb(total.t_avm), MEMROW + 2, MEMCOL + 15, 7);
433 1.1 jtc putint(pgtokb(total.t_avmshr), MEMROW + 2, MEMCOL + 22, 7);
434 1.1 jtc putint(pgtokb(total.t_rm), MEMROW + 3, MEMCOL + 3, 6);
435 1.1 jtc putint(pgtokb(total.t_rmshr), MEMROW + 3, MEMCOL + 9, 6);
436 1.1 jtc putint(pgtokb(total.t_vm), MEMROW + 3, MEMCOL + 15, 7);
437 1.1 jtc putint(pgtokb(total.t_vmshr), MEMROW + 3, MEMCOL + 22, 7);
438 1.1 jtc putint(pgtokb(total.t_free), MEMROW + 2, MEMCOL + 29, 6);
439 1.1 jtc putint(total.t_rq - 1, PROCSROW + 1, PROCSCOL + 3, 3);
440 1.1 jtc putint(total.t_pw, PROCSROW + 1, PROCSCOL + 6, 3);
441 1.1 jtc putint(total.t_dw, PROCSROW + 1, PROCSCOL + 9, 3);
442 1.1 jtc putint(total.t_sl, PROCSROW + 1, PROCSCOL + 12, 3);
443 1.1 jtc putint(total.t_sw, PROCSROW + 1, PROCSCOL + 15, 3);
444 1.1 jtc PUTRATE(Cnt.v_cow_faults, VMSTATROW + 0, VMSTATCOL + 3, 6);
445 1.1 jtc PUTRATE(Cnt.v_lookups, VMSTATROW + 1, VMSTATCOL + 3, 6);
446 1.1 jtc PUTRATE(Cnt.v_hits, VMSTATROW + 2, VMSTATCOL + 3, 6);
447 1.1 jtc PUTRATE(Cnt.v_zfod, VMSTATROW + 3, VMSTATCOL + 4, 5);
448 1.1 jtc PUTRATE(Cnt.v_nzfod, VMSTATROW + 4, VMSTATCOL + 3, 6);
449 1.1 jtc putfloat(cnt.v_nzfod == 0 ? 0.0 : (100.0 * cnt.v_zfod / cnt.v_nzfod),
450 1.1 jtc VMSTATROW + 5, VMSTATCOL + 2, 7, 2, 1);
451 1.1 jtc putint(pgtokb(cnt.v_kernel_pages), VMSTATROW + 6, VMSTATCOL, 9);
452 1.1 jtc putint(pgtokb(cnt.v_wire_count), VMSTATROW + 7, VMSTATCOL, 9);
453 1.1 jtc putint(pgtokb(cnt.v_active_count), VMSTATROW + 8, VMSTATCOL, 9);
454 1.1 jtc putint(pgtokb(cnt.v_inactive_count), VMSTATROW + 9, VMSTATCOL, 9);
455 1.1 jtc putint(pgtokb(cnt.v_free_count), VMSTATROW + 10, VMSTATCOL, 9);
456 1.1 jtc PUTRATE(Cnt.v_dfree, VMSTATROW + 11, VMSTATCOL, 9);
457 1.1 jtc PUTRATE(Cnt.v_pfree, VMSTATROW + 12, VMSTATCOL, 9);
458 1.1 jtc PUTRATE(Cnt.v_reactivated, VMSTATROW + 13, VMSTATCOL, 9);
459 1.1 jtc PUTRATE(Cnt.v_scan, VMSTATROW + 14, VMSTATCOL, 9);
460 1.1 jtc PUTRATE(Cnt.v_rev, VMSTATROW + 15, VMSTATCOL, 9);
461 1.1 jtc if (LINES - 1 > VMSTATROW + 16)
462 1.1 jtc PUTRATE(Cnt.v_intrans, VMSTATROW + 16, VMSTATCOL, 9);
463 1.1 jtc PUTRATE(Cnt.v_pageins, PAGEROW + 2, PAGECOL + 5, 5);
464 1.1 jtc PUTRATE(Cnt.v_pageouts, PAGEROW + 2, PAGECOL + 10, 5);
465 1.1 jtc PUTRATE(Cnt.v_swpin, PAGEROW + 2, PAGECOL + 15, 5); /* - */
466 1.1 jtc PUTRATE(Cnt.v_swpout, PAGEROW + 2, PAGECOL + 20, 5); /* - */
467 1.1 jtc PUTRATE(Cnt.v_pgpgin, PAGEROW + 3, PAGECOL + 5, 5); /* ? */
468 1.1 jtc PUTRATE(Cnt.v_pgpgout, PAGEROW + 3, PAGECOL + 10, 5); /* ? */
469 1.1 jtc PUTRATE(Cnt.v_pswpin, PAGEROW + 3, PAGECOL + 15, 5); /* - */
470 1.1 jtc PUTRATE(Cnt.v_pswpout, PAGEROW + 3, PAGECOL + 20, 5); /* - */
471 1.1 jtc PUTRATE(Cnt.v_swtch, GENSTATROW + 1, GENSTATCOL, 5);
472 1.1 jtc PUTRATE(Cnt.v_trap, GENSTATROW + 1, GENSTATCOL + 5, 5);
473 1.1 jtc PUTRATE(Cnt.v_syscall, GENSTATROW + 1, GENSTATCOL + 10, 5);
474 1.1 jtc PUTRATE(Cnt.v_intr, GENSTATROW + 1, GENSTATCOL + 15, 5);
475 1.1 jtc PUTRATE(Cnt.v_soft, GENSTATROW + 1, GENSTATCOL + 20, 5);
476 1.1 jtc PUTRATE(Cnt.v_faults, GENSTATROW + 1, GENSTATCOL + 25, 5);
477 1.1 jtc mvprintw(DISKROW, DISKCOL + 5, " ");
478 1.1 jtc for (i = 0, c = 0; i < dk_ndrive && c < MAXDRIVES; i++)
479 1.1 jtc if (dk_select[i]) {
480 1.1 jtc mvprintw(DISKROW, DISKCOL + 5 + 5 * c,
481 1.1 jtc " %3.3s", dr_name[i]);
482 1.1 jtc dinfo(i, ++c);
483 1.1 jtc }
484 1.1 jtc putint(s.nchcount, NAMEIROW + 2, NAMEICOL, 9);
485 1.1 jtc putint(nchtotal.ncs_goodhits, NAMEIROW + 2, NAMEICOL + 9, 9);
486 1.1 jtc #define nz(x) ((x) ? (x) : 1)
487 1.1 jtc putfloat(nchtotal.ncs_goodhits * 100.0 / nz(s.nchcount),
488 1.1 jtc NAMEIROW + 2, NAMEICOL + 19, 4, 0, 1);
489 1.1 jtc putint(nchtotal.ncs_pass2, NAMEIROW + 2, NAMEICOL + 23, 9);
490 1.1 jtc putfloat(nchtotal.ncs_pass2 * 100.0 / nz(s.nchcount),
491 1.1 jtc NAMEIROW + 2, NAMEICOL + 34, 4, 0, 1);
492 1.1 jtc #undef nz
493 1.1 jtc }
494 1.1 jtc
495 1.1 jtc int
496 1.1 jtc cmdkre(cmd, args)
497 1.1 jtc char *cmd, *args;
498 1.1 jtc {
499 1.1 jtc
500 1.1 jtc if (prefix(cmd, "run")) {
501 1.1 jtc copyinfo(&s2, &s1);
502 1.1 jtc state = RUN;
503 1.1 jtc return (1);
504 1.1 jtc }
505 1.1 jtc if (prefix(cmd, "boot")) {
506 1.1 jtc state = BOOT;
507 1.1 jtc copyinfo(&z, &s1);
508 1.1 jtc return (1);
509 1.1 jtc }
510 1.1 jtc if (prefix(cmd, "time")) {
511 1.1 jtc state = TIME;
512 1.1 jtc return (1);
513 1.1 jtc }
514 1.1 jtc if (prefix(cmd, "zero")) {
515 1.1 jtc if (state == RUN)
516 1.1 jtc getinfo(&s1, RUN);
517 1.1 jtc return (1);
518 1.1 jtc }
519 1.1 jtc return (dkcmd(cmd, args));
520 1.1 jtc }
521 1.1 jtc
522 1.1 jtc /* calculate number of users on the system */
523 1.1 jtc static int
524 1.1 jtc ucount()
525 1.1 jtc {
526 1.1 jtc register int nusers = 0;
527 1.1 jtc
528 1.1 jtc if (ut < 0)
529 1.1 jtc return (0);
530 1.1 jtc while (read(ut, &utmp, sizeof(utmp)))
531 1.1 jtc if (utmp.ut_name[0] != '\0')
532 1.1 jtc nusers++;
533 1.1 jtc
534 1.1 jtc lseek(ut, 0L, L_SET);
535 1.1 jtc return (nusers);
536 1.1 jtc }
537 1.1 jtc
538 1.1 jtc static float
539 1.1 jtc cputime(indx)
540 1.1 jtc int indx;
541 1.1 jtc {
542 1.1 jtc double t;
543 1.1 jtc register int i;
544 1.1 jtc
545 1.1 jtc t = 0;
546 1.1 jtc for (i = 0; i < CPUSTATES; i++)
547 1.1 jtc t += s.time[i];
548 1.1 jtc if (t == 0.0)
549 1.1 jtc t = 1.0;
550 1.1 jtc return (s.time[indx] * 100.0 / t);
551 1.1 jtc }
552 1.1 jtc
553 1.1 jtc static void
554 1.1 jtc putint(n, l, c, w)
555 1.1 jtc int n, l, c, w;
556 1.1 jtc {
557 1.1 jtc char b[128];
558 1.1 jtc
559 1.1 jtc move(l, c);
560 1.1 jtc if (n == 0) {
561 1.1 jtc while (w-- > 0)
562 1.1 jtc addch(' ');
563 1.1 jtc return;
564 1.1 jtc }
565 1.1 jtc sprintf(b, "%*d", w, n);
566 1.1 jtc if (strlen(b) > w) {
567 1.1 jtc while (w-- > 0)
568 1.1 jtc addch('*');
569 1.1 jtc return;
570 1.1 jtc }
571 1.1 jtc addstr(b);
572 1.1 jtc }
573 1.1 jtc
574 1.1 jtc static void
575 1.1 jtc putfloat(f, l, c, w, d, nz)
576 1.1 jtc double f;
577 1.1 jtc int l, c, w, d, nz;
578 1.1 jtc {
579 1.1 jtc char b[128];
580 1.1 jtc
581 1.1 jtc move(l, c);
582 1.1 jtc if (nz && f == 0.0) {
583 1.1 jtc while (--w >= 0)
584 1.1 jtc addch(' ');
585 1.1 jtc return;
586 1.1 jtc }
587 1.1 jtc sprintf(b, "%*.*f", w, d, f);
588 1.1 jtc if (strlen(b) > w) {
589 1.1 jtc while (--w >= 0)
590 1.1 jtc addch('*');
591 1.1 jtc return;
592 1.1 jtc }
593 1.1 jtc addstr(b);
594 1.1 jtc }
595 1.1 jtc
596 1.1 jtc static void
597 1.1 jtc getinfo(s, st)
598 1.1 jtc struct Info *s;
599 1.1 jtc enum state st;
600 1.1 jtc {
601 1.4 cgd int mib[2];
602 1.4 cgd size_t size;
603 1.1 jtc extern int errno;
604 1.1 jtc
605 1.5 thorpej dkreadstats();
606 1.1 jtc NREAD(X_CPTIME, s->time, sizeof s->time);
607 1.1 jtc NREAD(X_CNT, &s->Cnt, sizeof s->Cnt);
608 1.1 jtc NREAD(X_NCHSTATS, &s->nchstats, sizeof s->nchstats);
609 1.1 jtc NREAD(X_INTRCNT, s->intrcnt, nintr * LONG);
610 1.1 jtc size = sizeof(s->Total);
611 1.1 jtc mib[0] = CTL_VM;
612 1.1 jtc mib[1] = VM_METER;
613 1.1 jtc if (sysctl(mib, 2, &s->Total, &size, NULL, 0) < 0) {
614 1.1 jtc error("Can't get kernel info: %s\n", strerror(errno));
615 1.1 jtc bzero(&s->Total, sizeof(s->Total));
616 1.1 jtc }
617 1.1 jtc }
618 1.1 jtc
619 1.1 jtc static void
620 1.1 jtc allocinfo(s)
621 1.1 jtc struct Info *s;
622 1.1 jtc {
623 1.1 jtc
624 1.1 jtc s->intrcnt = (long *) malloc(nintr * sizeof(long));
625 1.3 mycroft if (s->intrcnt == NULL)
626 1.3 mycroft errx(2, "out of memory");
627 1.1 jtc }
628 1.1 jtc
629 1.1 jtc static void
630 1.1 jtc copyinfo(from, to)
631 1.1 jtc register struct Info *from, *to;
632 1.1 jtc {
633 1.1 jtc long *intrcnt;
634 1.1 jtc
635 1.5 thorpej intrcnt = to->intrcnt;
636 1.1 jtc *to = *from;
637 1.1 jtc bcopy(from->intrcnt, to->intrcnt = intrcnt, nintr * sizeof (int));
638 1.1 jtc }
639 1.1 jtc
640 1.1 jtc static void
641 1.1 jtc dinfo(dn, c)
642 1.1 jtc int dn, c;
643 1.1 jtc {
644 1.5 thorpej double words, atime;
645 1.1 jtc
646 1.1 jtc c = DISKCOL + c * 5;
647 1.5 thorpej
648 1.5 thorpej /* time busy in disk activity */
649 1.5 thorpej atime = (double)cur.dk_time[dn].tv_sec +
650 1.5 thorpej ((double)cur.dk_time[dn].tv_usec / (double)1000000);
651 1.5 thorpej
652 1.5 thorpej words = cur.dk_bytes[dn] / 1024.0; /* # of K transferred */
653 1.5 thorpej
654 1.5 thorpej putint((int)((float)cur.dk_seek[dn]/etime+0.5), DISKROW + 1, c, 5);
655 1.5 thorpej putint((int)((float)cur.dk_xfer[dn]/etime+0.5), DISKROW + 2, c, 5);
656 1.5 thorpej putint((int)(words/etime + 0.5), DISKROW + 3, c, 5);
657 1.5 thorpej putfloat(atime/etime, DISKROW + 4, c, 5, 1, 1);
658 1.1 jtc }
659