1 /*-
2 * Copyright (c) 1998 Andrzej Bialecki
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 *
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24 * SUCH DAMAGE.
25 *
26 * $FreeBSD: stable/12/release/picobsd/tinyware/sps/sps.c 92071 2002-03-11 08:03:50Z luigi $
27 */
28
29 /*
30 * Small replacement for ps(1) - uses only sysctl(3) to retrieve info
31 */
32
33 #include <stdio.h>
34 #include <stdlib.h>
35 #include <string.h>
36 #include <sys/param.h>
37 #include <sys/sysctl.h>
38 #include <sys/stat.h>
39 #include <sys/user.h>
40
41 char p_stat[] = "?iRSTZWM";
42
43 int
main(int argc,char * argv[])44 main(int argc, char *argv[])
45 {
46 int mib[4], i, num, len, j, plen;
47 char buf[MAXPATHLEN], vty[5], pst[5], wmesg[10];
48 struct kinfo_proc *ki;
49 char *t;
50 int ma, mi;
51
52 mib[0] = CTL_KERN;
53 mib[1] = KERN_PROC;
54 mib[2] = KERN_PROC_ALL;
55 if (sysctl(mib, 3, NULL, &len, NULL, 0) != 0) {
56 perror("sysctl sizing");
57 exit(1);
58 }
59 t = (char *)malloc(len);
60 if (sysctl(mib, 3, t, &len, NULL, 0) != 0) {
61 perror("sysctl info");
62 exit(1);
63 }
64 mib[2] = KERN_PROC_ARGS;
65 num = len / KINFO_PROC_SIZE;
66 i = 0;
67 printf("USERNAME PID PPID PRI NICE TTY STAT WCHAN COMMAND\n");
68 while(i < num) {
69 ki = (struct kinfo_proc *)(t + (num - i - 1) * KINFO_PROC_SIZE);
70 mib[3] = ki->ki_pid;
71 plen = MAXPATHLEN;
72 if (sysctl(mib, 4, buf, &plen, NULL, 0) != 0) {
73 perror("sysctl cmd info");
74 exit(1);
75 }
76 if (plen == 0) {
77 sprintf(buf, "(%s)", ki->ki_comm);
78 } else {
79 for (j = 0; j < plen - 1; j++) {
80 if (buf[j] == '\0') buf[j] = ' ';
81 }
82 }
83 if (strcmp(ki->ki_wmesg, "") == 0) {
84 sprintf(wmesg, "-");
85 } else {
86 strcpy(wmesg, ki->ki_wmesg);
87 }
88 ma = major(ki->ki_tdev);
89 mi = minor(ki->ki_tdev);
90 switch(ma) {
91 case 255:
92 strcpy(vty, "??");
93 break;
94 case 12:
95 if(mi != 255) {
96 sprintf(vty, "v%d", mi);
97 break;
98 }
99 /* FALLTHROUGH */
100 case 0:
101 strcpy(vty, "con");
102 break;
103 case 5:
104 sprintf(vty, "p%d", mi);
105 break;
106 }
107 sprintf(pst, "%c", p_stat[ki->ki_stat]);
108 printf("%8s %5u %5u %3d %4d %3s %-4s %-7s %s\n",
109 ki->ki_login,
110 ki->ki_pid,
111 ki->ki_ppid,
112 ki->ki_pri.pri_level, /* XXX check this */
113 ki->ki_nice,
114 vty,
115 pst,
116 wmesg,
117 buf);
118 i++;
119 }
120 free((void *)t);
121 exit(0);
122 }
123