Home | History | Annotate | Line # | Download | only in ps
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