/release/picobsd/tinyware/sps/sps.c
https://bitbucket.org/freebsd/freebsd-head/ · C · 122 lines · 86 code · 5 blank · 31 comment · 19 complexity · 3b7c2b6e753361f712cd22fd7b6db2cb MD5 · raw file
- /*-
- * Copyright (c) 1998 Andrzej Bialecki
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- * 1. Redistributions of source code must retain the above copyright
- * notice, this list of conditions and the following disclaimer.
- * 2. Redistributions in binary form must reproduce the above copyright
- * notice, this list of conditions and the following disclaimer in the
- * documentation and/or other materials provided with the distribution.
- *
- * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
- * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
- * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
- * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
- * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
- * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
- * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
- * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
- * SUCH DAMAGE.
- *
- * $FreeBSD$
- */
- /*
- * Small replacement for ps(1) - uses only sysctl(3) to retrieve info
- */
- #include <stdio.h>
- #include <stdlib.h>
- #include <string.h>
- #include <sys/param.h>
- #include <sys/sysctl.h>
- #include <sys/stat.h>
- #include <sys/user.h>
- char p_stat[] = "?iRSTZWM";
- int
- main(int argc, char *argv[])
- {
- int mib[4], i, num, len, j, plen;
- char buf[MAXPATHLEN], vty[5], pst[5], wmesg[10];
- struct kinfo_proc *ki;
- char *t;
- int ma, mi;
- mib[0] = CTL_KERN;
- mib[1] = KERN_PROC;
- mib[2] = KERN_PROC_ALL;
- if (sysctl(mib, 3, NULL, &len, NULL, 0) != 0) {
- perror("sysctl sizing");
- exit(1);
- }
- t = (char *)malloc(len);
- if (sysctl(mib, 3, t, &len, NULL, 0) != 0) {
- perror("sysctl info");
- exit(1);
- }
- mib[2] = KERN_PROC_ARGS;
- num = len / KINFO_PROC_SIZE;
- i = 0;
- printf("USERNAME PID PPID PRI NICE TTY STAT WCHAN COMMAND\n");
- while(i < num) {
- ki = (struct kinfo_proc *)(t + (num - i - 1) * KINFO_PROC_SIZE);
- mib[3] = ki->ki_pid;
- plen = MAXPATHLEN;
- if (sysctl(mib, 4, buf, &plen, NULL, 0) != 0) {
- perror("sysctl cmd info");
- exit(1);
- }
- if (plen == 0) {
- sprintf(buf, "(%s)", ki->ki_comm);
- } else {
- for (j = 0; j < plen - 1; j++) {
- if (buf[j] == '\0') buf[j] = ' ';
- }
- }
- if (strcmp(ki->ki_wmesg, "") == 0) {
- sprintf(wmesg, "-");
- } else {
- strcpy(wmesg, ki->ki_wmesg);
- }
- ma = major(ki->ki_tdev);
- mi = minor(ki->ki_tdev);
- switch(ma) {
- case 255:
- strcpy(vty, "??");
- break;
- case 12:
- if(mi != 255) {
- sprintf(vty, "v%d", mi);
- break;
- }
- /* FALLTHROUGH */
- case 0:
- strcpy(vty, "con");
- break;
- case 5:
- sprintf(vty, "p%d", mi);
- break;
- }
- sprintf(pst, "%c", p_stat[ki->ki_stat]);
- printf("%8s %5u %5u %3d %4d %3s %-4s %-7s %s\n",
- ki->ki_login,
- ki->ki_pid,
- ki->ki_ppid,
- ki->ki_pri.pri_level, /* XXX check this */
- ki->ki_nice,
- vty,
- pst,
- wmesg,
- buf);
- i++;
- }
- free((void *)t);
- exit(0);
- }