print.c revision 1.44 1 1.44 mrg /* $NetBSD: print.c,v 1.44 1999/10/11 09:18:09 mrg Exp $ */
2 1.18 cgd
3 1.1 cgd /*-
4 1.12 cgd * Copyright (c) 1990, 1993, 1994
5 1.12 cgd * The Regents of the University of California. All rights reserved.
6 1.1 cgd *
7 1.1 cgd * Redistribution and use in source and binary forms, with or without
8 1.1 cgd * modification, are permitted provided that the following conditions
9 1.1 cgd * are met:
10 1.1 cgd * 1. Redistributions of source code must retain the above copyright
11 1.1 cgd * notice, this list of conditions and the following disclaimer.
12 1.1 cgd * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 cgd * notice, this list of conditions and the following disclaimer in the
14 1.1 cgd * documentation and/or other materials provided with the distribution.
15 1.1 cgd * 3. All advertising materials mentioning features or use of this software
16 1.1 cgd * must display the following acknowledgement:
17 1.1 cgd * This product includes software developed by the University of
18 1.1 cgd * California, Berkeley and its contributors.
19 1.1 cgd * 4. Neither the name of the University nor the names of its contributors
20 1.1 cgd * may be used to endorse or promote products derived from this software
21 1.1 cgd * without specific prior written permission.
22 1.1 cgd *
23 1.1 cgd * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24 1.1 cgd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 1.1 cgd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 1.1 cgd * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27 1.1 cgd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 1.1 cgd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 1.1 cgd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 1.1 cgd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 1.1 cgd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 1.1 cgd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 1.1 cgd * SUCH DAMAGE.
34 1.1 cgd */
35 1.1 cgd
36 1.33 christos #include <sys/cdefs.h>
37 1.1 cgd #ifndef lint
38 1.18 cgd #if 0
39 1.12 cgd static char sccsid[] = "@(#)print.c 8.6 (Berkeley) 4/16/94";
40 1.18 cgd #else
41 1.44 mrg __RCSID("$NetBSD: print.c,v 1.44 1999/10/11 09:18:09 mrg Exp $");
42 1.18 cgd #endif
43 1.1 cgd #endif /* not lint */
44 1.1 cgd
45 1.1 cgd #include <sys/param.h>
46 1.1 cgd #include <sys/time.h>
47 1.1 cgd #include <sys/resource.h>
48 1.1 cgd #include <sys/proc.h>
49 1.1 cgd #include <sys/stat.h>
50 1.12 cgd #include <sys/ucred.h>
51 1.12 cgd #include <sys/sysctl.h>
52 1.36 mrg
53 1.1 cgd #include <vm/vm.h>
54 1.1 cgd
55 1.12 cgd #include <err.h>
56 1.21 mycroft #include <kvm.h>
57 1.12 cgd #include <math.h>
58 1.12 cgd #include <nlist.h>
59 1.28 explorer #include <pwd.h>
60 1.12 cgd #include <stddef.h>
61 1.12 cgd #include <stdio.h>
62 1.12 cgd #include <stdlib.h>
63 1.12 cgd #include <string.h>
64 1.37 kleink #include <time.h>
65 1.12 cgd #include <tzfile.h>
66 1.16 cgd #include <unistd.h>
67 1.12 cgd
68 1.12 cgd #include "ps.h"
69 1.12 cgd
70 1.21 mycroft extern kvm_t *kd;
71 1.21 mycroft extern int needenv, needcomm, commandonly;
72 1.21 mycroft
73 1.21 mycroft static char *cmdpart __P((char *));
74 1.33 christos static void printval __P((char *, VAR *));
75 1.39 mycroft static int titlecmp __P((char *, char **));
76 1.21 mycroft
77 1.32 mycroft #define min(a,b) ((a) <= (b) ? (a) : (b))
78 1.32 mycroft #define max(a,b) ((a) >= (b) ? (a) : (b))
79 1.32 mycroft
80 1.21 mycroft static char *
81 1.21 mycroft cmdpart(arg0)
82 1.21 mycroft char *arg0;
83 1.21 mycroft {
84 1.21 mycroft char *cp;
85 1.21 mycroft
86 1.21 mycroft return ((cp = strrchr(arg0, '/')) != NULL ? cp + 1 : arg0);
87 1.21 mycroft }
88 1.21 mycroft
89 1.12 cgd void
90 1.1 cgd printheader()
91 1.1 cgd {
92 1.12 cgd VAR *v;
93 1.12 cgd struct varent *vent;
94 1.1 cgd
95 1.1 cgd for (vent = vhead; vent; vent = vent->next) {
96 1.1 cgd v = vent->var;
97 1.1 cgd if (v->flag & LJUST) {
98 1.1 cgd if (vent->next == NULL) /* last one */
99 1.12 cgd (void)printf("%s", v->header);
100 1.1 cgd else
101 1.12 cgd (void)printf("%-*s", v->width, v->header);
102 1.1 cgd } else
103 1.12 cgd (void)printf("%*s", v->width, v->header);
104 1.1 cgd if (vent->next != NULL)
105 1.12 cgd (void)putchar(' ');
106 1.1 cgd }
107 1.12 cgd (void)putchar('\n');
108 1.21 mycroft }
109 1.21 mycroft
110 1.39 mycroft static int
111 1.39 mycroft titlecmp(name, argv)
112 1.39 mycroft char *name;
113 1.39 mycroft char **argv;
114 1.39 mycroft {
115 1.39 mycroft char *title;
116 1.39 mycroft int namelen;
117 1.39 mycroft
118 1.39 mycroft if (argv == 0 || argv[0] == 0)
119 1.39 mycroft return (1);
120 1.39 mycroft
121 1.39 mycroft title = cmdpart(argv[0]);
122 1.39 mycroft
123 1.39 mycroft if (!strcmp(name, title))
124 1.39 mycroft return (0);
125 1.39 mycroft
126 1.39 mycroft if (title[0] == '-' && !strcmp(name, title+1))
127 1.39 mycroft return (0);
128 1.39 mycroft
129 1.39 mycroft namelen = strlen(name);
130 1.39 mycroft
131 1.39 mycroft if (argv[1] == 0 &&
132 1.39 mycroft !strncmp(name, title, namelen) &&
133 1.39 mycroft title[namelen+0] == ':' &&
134 1.39 mycroft title[namelen+1] == ' ')
135 1.39 mycroft return (0);
136 1.39 mycroft
137 1.39 mycroft return (1);
138 1.39 mycroft }
139 1.39 mycroft
140 1.12 cgd void
141 1.21 mycroft command(ki, ve)
142 1.21 mycroft KINFO *ki;
143 1.12 cgd VARENT *ve;
144 1.12 cgd {
145 1.1 cgd VAR *v;
146 1.12 cgd int left;
147 1.39 mycroft char **argv, **p, *name;
148 1.7 cgd
149 1.12 cgd v = ve->var;
150 1.21 mycroft if (ve->next != NULL || termwidth != UNLIMITED) {
151 1.21 mycroft if (ve->next == NULL) {
152 1.12 cgd left = termwidth - (totwidth - v->width);
153 1.1 cgd if (left < 1) /* already wrapped, just use std width */
154 1.1 cgd left = v->width;
155 1.21 mycroft } else
156 1.21 mycroft left = v->width;
157 1.21 mycroft } else
158 1.21 mycroft left = -1;
159 1.21 mycroft if (needenv) {
160 1.21 mycroft argv = kvm_getenvv(kd, ki->ki_p, termwidth);
161 1.33 christos if ((p = argv) != NULL) {
162 1.21 mycroft while (*p) {
163 1.21 mycroft fmt_puts(*p, &left);
164 1.21 mycroft p++;
165 1.21 mycroft fmt_putc(' ', &left);
166 1.4 cgd }
167 1.1 cgd }
168 1.21 mycroft }
169 1.21 mycroft if (needcomm) {
170 1.39 mycroft name = KI_PROC(ki)->p_comm;
171 1.21 mycroft if (!commandonly) {
172 1.21 mycroft argv = kvm_getargv(kd, ki->ki_p, termwidth);
173 1.33 christos if ((p = argv) != NULL) {
174 1.21 mycroft while (*p) {
175 1.21 mycroft fmt_puts(*p, &left);
176 1.21 mycroft p++;
177 1.21 mycroft fmt_putc(' ', &left);
178 1.21 mycroft }
179 1.21 mycroft }
180 1.39 mycroft if (titlecmp(name, argv)) {
181 1.21 mycroft fmt_putc('(', &left);
182 1.39 mycroft fmt_puts(name, &left);
183 1.21 mycroft fmt_putc(')', &left);
184 1.21 mycroft }
185 1.21 mycroft } else {
186 1.39 mycroft fmt_puts(name, &left);
187 1.21 mycroft }
188 1.21 mycroft }
189 1.23 mycroft if (ve->next && left > 0)
190 1.23 mycroft printf("%*s", left, "");
191 1.1 cgd }
192 1.1 cgd
193 1.12 cgd void
194 1.12 cgd ucomm(k, ve)
195 1.1 cgd KINFO *k;
196 1.12 cgd VARENT *ve;
197 1.12 cgd {
198 1.1 cgd VAR *v;
199 1.12 cgd
200 1.12 cgd v = ve->var;
201 1.12 cgd (void)printf("%-*s", v->width, KI_PROC(k)->p_comm);
202 1.1 cgd }
203 1.1 cgd
204 1.12 cgd void
205 1.12 cgd logname(k, ve)
206 1.1 cgd KINFO *k;
207 1.12 cgd VARENT *ve;
208 1.12 cgd {
209 1.1 cgd VAR *v;
210 1.32 mycroft int n;
211 1.12 cgd
212 1.12 cgd v = ve->var;
213 1.32 mycroft n = min(v->width, MAXLOGNAME);
214 1.32 mycroft (void)printf("%-*.*s", n, n, KI_EPROC(k)->e_login);
215 1.32 mycroft if (v->width > n)
216 1.32 mycroft (void)printf("%*s", v->width - n, "");
217 1.1 cgd }
218 1.1 cgd
219 1.12 cgd void
220 1.12 cgd state(k, ve)
221 1.1 cgd KINFO *k;
222 1.12 cgd VARENT *ve;
223 1.12 cgd {
224 1.12 cgd struct proc *p;
225 1.12 cgd int flag;
226 1.12 cgd char *cp;
227 1.1 cgd VAR *v;
228 1.1 cgd char buf[16];
229 1.12 cgd
230 1.12 cgd v = ve->var;
231 1.12 cgd p = KI_PROC(k);
232 1.12 cgd flag = p->p_flag;
233 1.12 cgd cp = buf;
234 1.1 cgd
235 1.1 cgd switch (p->p_stat) {
236 1.1 cgd
237 1.1 cgd case SSTOP:
238 1.1 cgd *cp = 'T';
239 1.1 cgd break;
240 1.1 cgd
241 1.1 cgd case SSLEEP:
242 1.10 cgd if (flag & P_SINTR) /* interuptable (long) */
243 1.1 cgd *cp = p->p_slptime >= MAXSLP ? 'I' : 'S';
244 1.1 cgd else
245 1.10 cgd *cp = 'D';
246 1.1 cgd break;
247 1.1 cgd
248 1.1 cgd case SRUN:
249 1.1 cgd case SIDL:
250 1.1 cgd *cp = 'R';
251 1.1 cgd break;
252 1.1 cgd
253 1.1 cgd case SZOMB:
254 1.43 veego case SDEAD:
255 1.1 cgd *cp = 'Z';
256 1.1 cgd break;
257 1.1 cgd
258 1.1 cgd default:
259 1.1 cgd *cp = '?';
260 1.1 cgd }
261 1.1 cgd cp++;
262 1.10 cgd if (flag & P_INMEM) {
263 1.1 cgd } else
264 1.1 cgd *cp++ = 'W';
265 1.1 cgd if (p->p_nice < NZERO)
266 1.1 cgd *cp++ = '<';
267 1.1 cgd else if (p->p_nice > NZERO)
268 1.1 cgd *cp++ = 'N';
269 1.10 cgd if (flag & P_TRACED)
270 1.1 cgd *cp++ = 'X';
271 1.42 thorpej if (flag & P_WEXIT && P_ZOMBIE(p) == 0)
272 1.1 cgd *cp++ = 'E';
273 1.10 cgd if (flag & P_PPWAIT)
274 1.1 cgd *cp++ = 'V';
275 1.13 pk if ((flag & P_SYSTEM) || p->p_holdcnt)
276 1.1 cgd *cp++ = 'L';
277 1.12 cgd if (KI_EPROC(k)->e_flag & EPROC_SLEADER)
278 1.1 cgd *cp++ = 's';
279 1.12 cgd if ((flag & P_CONTROLT) && KI_EPROC(k)->e_pgid == KI_EPROC(k)->e_tpgid)
280 1.1 cgd *cp++ = '+';
281 1.1 cgd *cp = '\0';
282 1.12 cgd (void)printf("%-*s", v->width, buf);
283 1.1 cgd }
284 1.1 cgd
285 1.12 cgd void
286 1.30 ws pnice(k, ve)
287 1.30 ws KINFO *k;
288 1.30 ws VARENT *ve;
289 1.30 ws {
290 1.30 ws VAR *v;
291 1.30 ws
292 1.30 ws v = ve->var;
293 1.30 ws (void)printf("%*d", v->width, KI_PROC(k)->p_nice - NZERO);
294 1.30 ws }
295 1.30 ws
296 1.30 ws void
297 1.12 cgd pri(k, ve)
298 1.1 cgd KINFO *k;
299 1.12 cgd VARENT *ve;
300 1.12 cgd {
301 1.1 cgd VAR *v;
302 1.12 cgd
303 1.12 cgd v = ve->var;
304 1.12 cgd (void)printf("%*d", v->width, KI_PROC(k)->p_priority - PZERO);
305 1.1 cgd }
306 1.1 cgd
307 1.12 cgd void
308 1.12 cgd uname(k, ve)
309 1.1 cgd KINFO *k;
310 1.12 cgd VARENT *ve;
311 1.12 cgd {
312 1.1 cgd VAR *v;
313 1.12 cgd
314 1.12 cgd v = ve->var;
315 1.12 cgd (void)printf("%-*s",
316 1.12 cgd (int)v->width, user_from_uid(KI_EPROC(k)->e_ucred.cr_uid, 0));
317 1.1 cgd }
318 1.1 cgd
319 1.12 cgd void
320 1.12 cgd runame(k, ve)
321 1.1 cgd KINFO *k;
322 1.12 cgd VARENT *ve;
323 1.12 cgd {
324 1.1 cgd VAR *v;
325 1.12 cgd
326 1.12 cgd v = ve->var;
327 1.12 cgd (void)printf("%-*s",
328 1.12 cgd (int)v->width, user_from_uid(KI_EPROC(k)->e_pcred.p_ruid, 0));
329 1.1 cgd }
330 1.1 cgd
331 1.12 cgd void
332 1.12 cgd tdev(k, ve)
333 1.1 cgd KINFO *k;
334 1.12 cgd VARENT *ve;
335 1.12 cgd {
336 1.1 cgd VAR *v;
337 1.12 cgd dev_t dev;
338 1.12 cgd char buff[16];
339 1.1 cgd
340 1.12 cgd v = ve->var;
341 1.12 cgd dev = KI_EPROC(k)->e_tdev;
342 1.1 cgd if (dev == NODEV)
343 1.12 cgd (void)printf("%*s", v->width, "??");
344 1.1 cgd else {
345 1.12 cgd (void)snprintf(buff, sizeof(buff),
346 1.12 cgd "%d/%d", major(dev), minor(dev));
347 1.12 cgd (void)printf("%*s", v->width, buff);
348 1.1 cgd }
349 1.1 cgd }
350 1.1 cgd
351 1.12 cgd void
352 1.12 cgd tname(k, ve)
353 1.1 cgd KINFO *k;
354 1.12 cgd VARENT *ve;
355 1.12 cgd {
356 1.1 cgd VAR *v;
357 1.1 cgd dev_t dev;
358 1.38 mycroft const char *ttname;
359 1.1 cgd
360 1.12 cgd v = ve->var;
361 1.12 cgd dev = KI_EPROC(k)->e_tdev;
362 1.1 cgd if (dev == NODEV || (ttname = devname(dev, S_IFCHR)) == NULL)
363 1.12 cgd (void)printf("%-*s", v->width, "??");
364 1.1 cgd else {
365 1.44 mrg if (strncmp(ttname, "tty", 3) == 0 ||
366 1.44 mrg strncmp(ttname, "dty", 3) == 0)
367 1.1 cgd ttname += 3;
368 1.12 cgd (void)printf("%*.*s%c", v->width-1, v->width-1, ttname,
369 1.12 cgd KI_EPROC(k)->e_flag & EPROC_CTTY ? ' ' : '-');
370 1.1 cgd }
371 1.1 cgd }
372 1.1 cgd
373 1.12 cgd void
374 1.12 cgd longtname(k, ve)
375 1.1 cgd KINFO *k;
376 1.12 cgd VARENT *ve;
377 1.12 cgd {
378 1.1 cgd VAR *v;
379 1.1 cgd dev_t dev;
380 1.38 mycroft const char *ttname;
381 1.1 cgd
382 1.12 cgd v = ve->var;
383 1.12 cgd dev = KI_EPROC(k)->e_tdev;
384 1.1 cgd if (dev == NODEV || (ttname = devname(dev, S_IFCHR)) == NULL)
385 1.12 cgd (void)printf("%-*s", v->width, "??");
386 1.1 cgd else
387 1.12 cgd (void)printf("%-*s", v->width, ttname);
388 1.1 cgd }
389 1.1 cgd
390 1.12 cgd void
391 1.12 cgd started(k, ve)
392 1.1 cgd KINFO *k;
393 1.12 cgd VARENT *ve;
394 1.12 cgd {
395 1.1 cgd VAR *v;
396 1.1 cgd static time_t now;
397 1.24 cgd time_t startt;
398 1.1 cgd struct tm *tp;
399 1.1 cgd char buf[100];
400 1.1 cgd
401 1.12 cgd v = ve->var;
402 1.12 cgd if (!k->ki_u.u_valid) {
403 1.12 cgd (void)printf("%-*s", v->width, "-");
404 1.1 cgd return;
405 1.1 cgd }
406 1.1 cgd
407 1.24 cgd startt = k->ki_u.u_start.tv_sec;
408 1.24 cgd tp = localtime(&startt);
409 1.1 cgd if (!now)
410 1.1 cgd (void)time(&now);
411 1.12 cgd if (now - k->ki_u.u_start.tv_sec < 24 * SECSPERHOUR) {
412 1.12 cgd /* I *hate* SCCS... */
413 1.12 cgd static char fmt[] = __CONCAT("%l:%", "M%p");
414 1.12 cgd (void)strftime(buf, sizeof(buf) - 1, fmt, tp);
415 1.12 cgd } else if (now - k->ki_u.u_start.tv_sec < 7 * SECSPERDAY) {
416 1.12 cgd /* I *hate* SCCS... */
417 1.12 cgd static char fmt[] = __CONCAT("%a%", "I%p");
418 1.12 cgd (void)strftime(buf, sizeof(buf) - 1, fmt, tp);
419 1.1 cgd } else
420 1.12 cgd (void)strftime(buf, sizeof(buf) - 1, "%e%b%y", tp);
421 1.12 cgd (void)printf("%-*s", v->width, buf);
422 1.1 cgd }
423 1.1 cgd
424 1.12 cgd void
425 1.12 cgd lstarted(k, ve)
426 1.1 cgd KINFO *k;
427 1.12 cgd VARENT *ve;
428 1.12 cgd {
429 1.1 cgd VAR *v;
430 1.24 cgd time_t startt;
431 1.1 cgd char buf[100];
432 1.1 cgd
433 1.12 cgd v = ve->var;
434 1.12 cgd if (!k->ki_u.u_valid) {
435 1.12 cgd (void)printf("%-*s", v->width, "-");
436 1.1 cgd return;
437 1.1 cgd }
438 1.24 cgd startt = k->ki_u.u_start.tv_sec;
439 1.34 mikel (void)strftime(buf, sizeof(buf) -1, "%c",
440 1.24 cgd localtime(&startt));
441 1.12 cgd (void)printf("%-*s", v->width, buf);
442 1.1 cgd }
443 1.1 cgd
444 1.12 cgd void
445 1.12 cgd wchan(k, ve)
446 1.1 cgd KINFO *k;
447 1.12 cgd VARENT *ve;
448 1.12 cgd {
449 1.1 cgd VAR *v;
450 1.32 mycroft int n;
451 1.12 cgd
452 1.12 cgd v = ve->var;
453 1.12 cgd if (KI_PROC(k)->p_wchan) {
454 1.32 mycroft if (KI_PROC(k)->p_wmesg) {
455 1.32 mycroft n = min(v->width, WMESGLEN);
456 1.32 mycroft (void)printf("%-*.*s", n, n, KI_EPROC(k)->e_wmesg);
457 1.32 mycroft if (v->width > n)
458 1.32 mycroft (void)printf("%*s", v->width - n, "");
459 1.32 mycroft } else
460 1.17 cgd (void)printf("%-*lx", v->width,
461 1.35 gwr (long)KI_PROC(k)->p_wchan);
462 1.1 cgd } else
463 1.12 cgd (void)printf("%-*s", v->width, "-");
464 1.1 cgd }
465 1.1 cgd
466 1.14 deraadt #define pgtok(a) (((a)*getpagesize())/1024)
467 1.1 cgd
468 1.12 cgd void
469 1.12 cgd vsize(k, ve)
470 1.1 cgd KINFO *k;
471 1.12 cgd VARENT *ve;
472 1.12 cgd {
473 1.1 cgd VAR *v;
474 1.12 cgd
475 1.12 cgd v = ve->var;
476 1.12 cgd (void)printf("%*d", v->width,
477 1.12 cgd pgtok(KI_EPROC(k)->e_vm.vm_dsize + KI_EPROC(k)->e_vm.vm_ssize +
478 1.12 cgd KI_EPROC(k)->e_vm.vm_tsize));
479 1.1 cgd }
480 1.1 cgd
481 1.12 cgd void
482 1.12 cgd rssize(k, ve)
483 1.1 cgd KINFO *k;
484 1.12 cgd VARENT *ve;
485 1.12 cgd {
486 1.1 cgd VAR *v;
487 1.12 cgd
488 1.12 cgd v = ve->var;
489 1.1 cgd /* XXX don't have info about shared */
490 1.12 cgd (void)printf("%*d", v->width, pgtok(KI_EPROC(k)->e_vm.vm_rssize));
491 1.1 cgd }
492 1.1 cgd
493 1.12 cgd void
494 1.12 cgd p_rssize(k, ve) /* doesn't account for text */
495 1.1 cgd KINFO *k;
496 1.12 cgd VARENT *ve;
497 1.12 cgd {
498 1.1 cgd VAR *v;
499 1.12 cgd
500 1.12 cgd v = ve->var;
501 1.12 cgd (void)printf("%*d", v->width, pgtok(KI_EPROC(k)->e_vm.vm_rssize));
502 1.1 cgd }
503 1.1 cgd
504 1.12 cgd void
505 1.12 cgd cputime(k, ve)
506 1.1 cgd KINFO *k;
507 1.12 cgd VARENT *ve;
508 1.12 cgd {
509 1.1 cgd VAR *v;
510 1.1 cgd long secs;
511 1.1 cgd long psecs; /* "parts" of a second. first micro, then centi */
512 1.1 cgd char obuff[128];
513 1.1 cgd
514 1.12 cgd v = ve->var;
515 1.42 thorpej if (P_ZOMBIE(KI_PROC(k)) || k->ki_u.u_valid == 0) {
516 1.1 cgd secs = 0;
517 1.1 cgd psecs = 0;
518 1.1 cgd } else {
519 1.12 cgd /*
520 1.12 cgd * This counts time spent handling interrupts. We could
521 1.12 cgd * fix this, but it is not 100% trivial (and interrupt
522 1.12 cgd * time fractions only work on the sparc anyway). XXX
523 1.12 cgd */
524 1.12 cgd secs = KI_PROC(k)->p_rtime.tv_sec;
525 1.12 cgd psecs = KI_PROC(k)->p_rtime.tv_usec;
526 1.1 cgd if (sumrusage) {
527 1.12 cgd secs += k->ki_u.u_cru.ru_utime.tv_sec +
528 1.12 cgd k->ki_u.u_cru.ru_stime.tv_sec;
529 1.12 cgd psecs += k->ki_u.u_cru.ru_utime.tv_usec +
530 1.12 cgd k->ki_u.u_cru.ru_stime.tv_usec;
531 1.1 cgd }
532 1.1 cgd /*
533 1.1 cgd * round and scale to 100's
534 1.1 cgd */
535 1.1 cgd psecs = (psecs + 5000) / 10000;
536 1.1 cgd secs += psecs / 100;
537 1.1 cgd psecs = psecs % 100;
538 1.1 cgd }
539 1.12 cgd (void)snprintf(obuff, sizeof(obuff),
540 1.12 cgd "%3ld:%02ld.%02ld", secs/60, secs%60, psecs);
541 1.12 cgd (void)printf("%*s", v->width, obuff);
542 1.1 cgd }
543 1.1 cgd
544 1.1 cgd double
545 1.1 cgd getpcpu(k)
546 1.1 cgd KINFO *k;
547 1.1 cgd {
548 1.1 cgd struct proc *p;
549 1.1 cgd static int failure;
550 1.1 cgd
551 1.1 cgd if (!nlistread)
552 1.1 cgd failure = donlist();
553 1.1 cgd if (failure)
554 1.1 cgd return (0.0);
555 1.1 cgd
556 1.12 cgd p = KI_PROC(k);
557 1.1 cgd #define fxtofl(fixpt) ((double)(fixpt) / fscale)
558 1.1 cgd
559 1.1 cgd /* XXX - I don't like this */
560 1.42 thorpej if (p->p_swtime == 0 || (p->p_flag & P_INMEM) == 0 ||
561 1.42 thorpej P_ZOMBIE(p))
562 1.1 cgd return (0.0);
563 1.1 cgd if (rawcpu)
564 1.1 cgd return (100.0 * fxtofl(p->p_pctcpu));
565 1.1 cgd return (100.0 * fxtofl(p->p_pctcpu) /
566 1.11 cgd (1.0 - exp(p->p_swtime * log(fxtofl(ccpu)))));
567 1.1 cgd }
568 1.1 cgd
569 1.12 cgd void
570 1.12 cgd pcpu(k, ve)
571 1.1 cgd KINFO *k;
572 1.12 cgd VARENT *ve;
573 1.12 cgd {
574 1.1 cgd VAR *v;
575 1.12 cgd
576 1.12 cgd v = ve->var;
577 1.12 cgd (void)printf("%*.1f", v->width, getpcpu(k));
578 1.1 cgd }
579 1.1 cgd
580 1.1 cgd double
581 1.1 cgd getpmem(k)
582 1.1 cgd KINFO *k;
583 1.1 cgd {
584 1.1 cgd static int failure;
585 1.1 cgd struct proc *p;
586 1.1 cgd struct eproc *e;
587 1.1 cgd double fracmem;
588 1.1 cgd int szptudot;
589 1.1 cgd
590 1.1 cgd if (!nlistread)
591 1.1 cgd failure = donlist();
592 1.1 cgd if (failure)
593 1.1 cgd return (0.0);
594 1.1 cgd
595 1.12 cgd p = KI_PROC(k);
596 1.12 cgd e = KI_EPROC(k);
597 1.12 cgd if ((p->p_flag & P_INMEM) == 0)
598 1.1 cgd return (0.0);
599 1.1 cgd /* XXX want pmap ptpages, segtab, etc. (per architecture) */
600 1.15 deraadt szptudot = USPACE/getpagesize();
601 1.1 cgd /* XXX don't have info about shared */
602 1.1 cgd fracmem = ((float)e->e_vm.vm_rssize + szptudot)/CLSIZE/mempages;
603 1.1 cgd return (100.0 * fracmem);
604 1.1 cgd }
605 1.1 cgd
606 1.12 cgd void
607 1.12 cgd pmem(k, ve)
608 1.1 cgd KINFO *k;
609 1.12 cgd VARENT *ve;
610 1.12 cgd {
611 1.1 cgd VAR *v;
612 1.12 cgd
613 1.12 cgd v = ve->var;
614 1.12 cgd (void)printf("%*.1f", v->width, getpmem(k));
615 1.1 cgd }
616 1.1 cgd
617 1.12 cgd void
618 1.12 cgd pagein(k, ve)
619 1.1 cgd KINFO *k;
620 1.12 cgd VARENT *ve;
621 1.12 cgd {
622 1.1 cgd VAR *v;
623 1.12 cgd
624 1.12 cgd v = ve->var;
625 1.28 explorer (void)printf("%*ld", v->width,
626 1.12 cgd k->ki_u.u_valid ? k->ki_u.u_ru.ru_majflt : 0);
627 1.1 cgd }
628 1.1 cgd
629 1.12 cgd void
630 1.12 cgd maxrss(k, ve)
631 1.1 cgd KINFO *k;
632 1.12 cgd VARENT *ve;
633 1.12 cgd {
634 1.1 cgd VAR *v;
635 1.12 cgd
636 1.12 cgd v = ve->var;
637 1.36 mrg (void)printf("%*s", v->width, "-");
638 1.1 cgd }
639 1.1 cgd
640 1.12 cgd void
641 1.12 cgd tsize(k, ve)
642 1.1 cgd KINFO *k;
643 1.12 cgd VARENT *ve;
644 1.12 cgd {
645 1.1 cgd VAR *v;
646 1.12 cgd
647 1.12 cgd v = ve->var;
648 1.12 cgd (void)printf("%*d", v->width, pgtok(KI_EPROC(k)->e_vm.vm_tsize));
649 1.1 cgd }
650 1.1 cgd
651 1.1 cgd /*
652 1.1 cgd * Generic output routines. Print fields from various prototype
653 1.1 cgd * structures.
654 1.1 cgd */
655 1.12 cgd static void
656 1.1 cgd printval(bp, v)
657 1.1 cgd char *bp;
658 1.1 cgd VAR *v;
659 1.1 cgd {
660 1.1 cgd static char ofmt[32] = "%";
661 1.12 cgd char *fcp, *cp;
662 1.27 cgd enum type type;
663 1.1 cgd
664 1.12 cgd cp = ofmt + 1;
665 1.12 cgd fcp = v->fmt;
666 1.1 cgd if (v->flag & LJUST)
667 1.1 cgd *cp++ = '-';
668 1.1 cgd *cp++ = '*';
669 1.33 christos while ((*cp++ = *fcp++) != '\0')
670 1.33 christos continue;
671 1.1 cgd
672 1.25 cgd /*
673 1.26 cgd * Note that the "INF127" check is nonsensical for types
674 1.25 cgd * that are or can be signed.
675 1.25 cgd */
676 1.25 cgd #define GET(type) (*(type *)bp)
677 1.26 cgd #define CHK_INF127(n) (((n) > 127) && (v->flag & INF127) ? 127 : (n))
678 1.25 cgd
679 1.1 cgd switch (v->type) {
680 1.27 cgd case INT32:
681 1.27 cgd if (sizeof(int32_t) == sizeof(int))
682 1.27 cgd type = INT;
683 1.27 cgd else if (sizeof(int32_t) == sizeof(long))
684 1.27 cgd type = LONG;
685 1.27 cgd else
686 1.27 cgd errx(1, "unknown conversion for type %d", v->type);
687 1.27 cgd break;
688 1.27 cgd case UINT32:
689 1.27 cgd if (sizeof(u_int32_t) == sizeof(u_int))
690 1.27 cgd type = UINT;
691 1.27 cgd else if (sizeof(u_int32_t) == sizeof(u_long))
692 1.27 cgd type = ULONG;
693 1.27 cgd else
694 1.27 cgd errx(1, "unknown conversion for type %d", v->type);
695 1.27 cgd break;
696 1.27 cgd default:
697 1.27 cgd type = v->type;
698 1.27 cgd break;
699 1.27 cgd }
700 1.27 cgd
701 1.27 cgd switch (type) {
702 1.1 cgd case CHAR:
703 1.25 cgd (void)printf(ofmt, v->width, GET(char));
704 1.1 cgd break;
705 1.1 cgd case UCHAR:
706 1.26 cgd (void)printf(ofmt, v->width, CHK_INF127(GET(u_char)));
707 1.1 cgd break;
708 1.1 cgd case SHORT:
709 1.25 cgd (void)printf(ofmt, v->width, GET(short));
710 1.1 cgd break;
711 1.1 cgd case USHORT:
712 1.26 cgd (void)printf(ofmt, v->width, CHK_INF127(GET(u_short)));
713 1.19 cgd break;
714 1.19 cgd case INT:
715 1.25 cgd (void)printf(ofmt, v->width, GET(int));
716 1.19 cgd break;
717 1.19 cgd case UINT:
718 1.26 cgd (void)printf(ofmt, v->width, CHK_INF127(GET(u_int)));
719 1.1 cgd break;
720 1.1 cgd case LONG:
721 1.25 cgd (void)printf(ofmt, v->width, GET(long));
722 1.1 cgd break;
723 1.1 cgd case ULONG:
724 1.26 cgd (void)printf(ofmt, v->width, CHK_INF127(GET(u_long)));
725 1.1 cgd break;
726 1.1 cgd case KPTR:
727 1.35 gwr (void)printf(ofmt, v->width, GET(u_long));
728 1.41 mrg break;
729 1.41 mrg case KPTR24:
730 1.41 mrg (void)printf(ofmt, v->width, GET(u_long) & 0xffffff);
731 1.40 christos break;
732 1.40 christos case SIGLIST:
733 1.40 christos {
734 1.40 christos sigset_t *s = (sigset_t *)(void *)bp;
735 1.40 christos size_t i;
736 1.40 christos #define SIGSETSIZE (sizeof(s->__bits) / sizeof(s->__bits[0]))
737 1.40 christos char buf[SIGSETSIZE * 8 + 1];
738 1.40 christos
739 1.40 christos for (i = 0; i < SIGSETSIZE; i++)
740 1.40 christos (void)snprintf(&buf[i * 8], 9, "%.8x",
741 1.40 christos s->__bits[(SIGSETSIZE - 1) - i]);
742 1.40 christos
743 1.40 christos /* Skip leading zeroes */
744 1.40 christos for (i = 0; buf[i]; i++)
745 1.40 christos if (buf[i] != '0')
746 1.40 christos break;
747 1.40 christos
748 1.40 christos if (buf[i] == '\0')
749 1.40 christos i--;
750 1.40 christos (void)printf(ofmt, v->width, &buf[i]);
751 1.40 christos }
752 1.1 cgd break;
753 1.1 cgd default:
754 1.12 cgd errx(1, "unknown type %d", v->type);
755 1.1 cgd }
756 1.25 cgd #undef GET
757 1.26 cgd #undef CHK_INF127
758 1.12 cgd }
759 1.12 cgd
760 1.12 cgd void
761 1.12 cgd pvar(k, ve)
762 1.12 cgd KINFO *k;
763 1.12 cgd VARENT *ve;
764 1.12 cgd {
765 1.12 cgd VAR *v;
766 1.12 cgd
767 1.12 cgd v = ve->var;
768 1.30 ws printval((char *)KI_PROC(k) + v->off, v);
769 1.12 cgd }
770 1.12 cgd
771 1.12 cgd void
772 1.12 cgd evar(k, ve)
773 1.12 cgd KINFO *k;
774 1.12 cgd VARENT *ve;
775 1.12 cgd {
776 1.12 cgd VAR *v;
777 1.12 cgd
778 1.12 cgd v = ve->var;
779 1.30 ws printval((char *)KI_EPROC(k) + v->off, v);
780 1.12 cgd }
781 1.12 cgd
782 1.12 cgd void
783 1.12 cgd uvar(k, ve)
784 1.12 cgd KINFO *k;
785 1.12 cgd VARENT *ve;
786 1.12 cgd {
787 1.12 cgd VAR *v;
788 1.12 cgd
789 1.12 cgd v = ve->var;
790 1.12 cgd if (k->ki_u.u_valid)
791 1.30 ws printval((char *)&k->ki_u + v->off, v);
792 1.12 cgd else
793 1.12 cgd (void)printf("%*s", v->width, "-");
794 1.12 cgd }
795 1.12 cgd
796 1.12 cgd void
797 1.12 cgd rvar(k, ve)
798 1.12 cgd KINFO *k;
799 1.12 cgd VARENT *ve;
800 1.12 cgd {
801 1.12 cgd VAR *v;
802 1.12 cgd
803 1.12 cgd v = ve->var;
804 1.12 cgd if (k->ki_u.u_valid)
805 1.30 ws printval((char *)&k->ki_u.u_ru + v->off, v);
806 1.12 cgd else
807 1.12 cgd (void)printf("%*s", v->width, "-");
808 1.1 cgd }
809