hush/procps/ps.c

265 lines
6.4 KiB
C
Raw Normal View History

/* vi: set sw=4 ts=4: */
1999-10-20 08:05:35 +00:00
/*
* Mini ps implementation(s) for busybox
1999-10-20 08:05:35 +00:00
*
* Copyright (C) 1999,2000 by Lineo, inc. and Erik Andersen
* Copyright (C) 1999,2000,2001 by Erik Andersen <andersee@debian.org>
*
* This program is free software; you can redistribute it and/or modify it
* under the terms of the GNU General Public License as published by the Free
* Software Foundation; either version 2 of the License, or (at your option)
* any later version.
*
* This program is distributed in the hope that it will be useful, but WITHOUT
* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
* FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
* more details.
*
* You should have received a copy of the GNU General Public License along with
* this program; if not, write to the Free Software Foundation, Inc., 59 Temple
* Place, Suite 330, Boston, MA 02111-1307 USA
*/
/*
* This contains _two_ implementations of ps for Linux. One uses the
* traditional /proc virtual filesystem, and the other use the devps kernel
* driver (written by Erik Andersen to avoid using /proc thereby saving 100k+).
1999-10-20 08:05:35 +00:00
*/
#include <stdio.h>
#include <stdlib.h>
1999-10-20 08:05:35 +00:00
#include <unistd.h>
#include <dirent.h>
#include <errno.h>
1999-10-20 19:18:15 +00:00
#include <fcntl.h>
#include <ctype.h>
#include <string.h>
2001-07-22 23:00:15 +00:00
#include <termios.h>
#include <sys/ioctl.h>
#include "busybox.h"
static const int TERMINAL_WIDTH = 79; /* not 80 in case terminal has linefold bug */
1999-10-20 19:18:15 +00:00
#if ! defined CONFIG_FEATURE_USE_DEVPS_PATCH
/* The following is the first ps implementation --
* the one using the /proc virtual filesystem.
*/
1999-10-20 19:18:15 +00:00
typedef struct proc_s {
char
cmd[16]; /* basename of executable file in call to exec(2) */
int
ruid, /* real only (sorry) */
pid, /* process id */
ppid; /* pid of parent process */
char
state; /* single-char code for process state (S=sleeping) */
1999-10-20 19:18:15 +00:00
} proc_t;
static int file2str(char *filename, char *ret, int cap)
1999-10-20 19:18:15 +00:00
{
int fd, num_read;
if ((fd = open(filename, O_RDONLY, 0)) == -1)
return -1;
if ((num_read = read(fd, ret, cap - 1)) <= 0)
return -1;
ret[num_read] = 0;
close(fd);
return num_read;
1999-10-20 19:18:15 +00:00
}
static void parse_proc_status(char *S, proc_t * P)
1999-10-20 19:18:15 +00:00
{
char *tmp;
memset(P->cmd, 0, sizeof P->cmd);
sscanf(S, "Name:\t%15c", P->cmd);
tmp = strchr(P->cmd, '\n');
if (tmp)
*tmp = '\0';
tmp = strstr(S, "State");
sscanf(tmp, "State:\t%c", &P->state);
tmp = strstr(S, "Pid:");
if (tmp)
sscanf(tmp, "Pid:\t%d\n" "PPid:\t%d\n", &P->pid, &P->ppid);
else
error_msg("Internal error!");
/* For busybox, ignoring effective, saved, etc. */
tmp = strstr(S, "Uid:");
if (tmp)
sscanf(tmp, "Uid:\t%d", &P->ruid);
else
error_msg("Internal error!");
1999-10-20 19:18:15 +00:00
}
1999-10-20 08:05:35 +00:00
extern int ps_main(int argc, char **argv)
{
proc_t p;
DIR *dir;
FILE *file;
struct dirent *entry;
char path[32], sbuf[512];
char uidName[9];
int len, i, c;
#ifdef CONFIG_FEATURE_AUTOWIDTH
2000-07-14 06:49:52 +00:00
struct winsize win = { 0, 0, 0, 0 };
int terminal_width = TERMINAL_WIDTH;
#else
#define terminal_width TERMINAL_WIDTH
#endif
dir = opendir("/proc");
if (!dir)
error_msg_and_die("Can't open /proc");
#ifdef CONFIG_FEATURE_AUTOWIDTH
ioctl(fileno(stdout), TIOCGWINSZ, &win);
if (win.ws_col > 0)
terminal_width = win.ws_col - 1;
#endif
2001-06-26 23:11:44 +00:00
printf(" PID Uid Stat Command\n");
while ((entry = readdir(dir)) != NULL) {
if (!isdigit(*entry->d_name))
continue;
sprintf(path, "/proc/%s/status", entry->d_name);
if ((file2str(path, sbuf, sizeof sbuf)) != -1) {
parse_proc_status(sbuf, &p);
}
/* Make some adjustments as needed */
my_getpwuid(uidName, p.ruid);
if (*uidName == '\0')
sprintf(uidName, "%d", p.ruid);
sprintf(path, "/proc/%s/cmdline", entry->d_name);
file = fopen(path, "r");
if (file == NULL)
2000-04-25 23:24:55 +00:00
continue;
i = 0;
2001-06-26 23:11:44 +00:00
len = printf("%5d %-8s %c ", p.pid, uidName, p.state);
while (((c = getc(file)) != EOF) && (i < (terminal_width-len))) {
i++;
if (c == '\0')
c = ' ';
putc(c, stdout);
}
2000-09-07 04:34:17 +00:00
fclose(file);
if (i == 0)
printf("[%s]", p.cmd);
putchar('\n');
1999-10-20 19:18:15 +00:00
}
closedir(dir);
return EXIT_SUCCESS;
1999-10-20 08:05:35 +00:00
}
#else /* CONFIG_FEATURE_USE_DEVPS_PATCH */
/* The following is the second ps implementation --
* this one uses the nifty new devps kernel device.
*/
2000-07-10 22:57:14 +00:00
#include <linux/devps.h> /* For Erik's nifty devps device driver */
extern int ps_main(int argc, char **argv)
{
char device[] = "/dev/ps";
int i, j, len, fd;
pid_t num_pids;
pid_t* pid_array = NULL;
struct pid_info info;
char uidName[9];
#ifdef CONFIG_FEATURE_AUTOWIDTH
2000-07-14 15:55:41 +00:00
struct winsize win = { 0, 0, 0, 0 };
int terminal_width = TERMINAL_WIDTH;
#else
#define terminal_width TERMINAL_WIDTH
#endif
if (argc > 1 && **(argv + 1) == '-')
show_usage();
/* open device */
fd = open(device, O_RDONLY);
if (fd < 0)
perror_msg_and_die( "open failed for `%s'", device);
/* Find out how many processes there are */
if (ioctl (fd, DEVPS_GET_NUM_PIDS, &num_pids)<0)
perror_msg_and_die( "\nDEVPS_GET_PID_LIST");
/* Allocate some memory -- grab a few extras just in case
* some new processes start up while we wait. The kernel will
* just ignore any extras if we give it too many, and will trunc.
* the list if we give it too few. */
pid_array = (pid_t*) xcalloc( num_pids+10, sizeof(pid_t));
pid_array[0] = num_pids+10;
/* Now grab the pid list */
if (ioctl (fd, DEVPS_GET_PID_LIST, pid_array)<0)
perror_msg_and_die("\nDEVPS_GET_PID_LIST");
#ifdef CONFIG_FEATURE_AUTOWIDTH
ioctl(fileno(stdout), TIOCGWINSZ, &win);
if (win.ws_col > 0)
terminal_width = win.ws_col - 1;
#endif
/* Print up a ps listing */
2001-06-26 23:11:44 +00:00
printf(" PID Uid Stat Command\n");
for (i=1; i<pid_array[0] ; i++) {
info.pid = pid_array[i];
if (ioctl (fd, DEVPS_GET_PID_INFO, &info)<0)
perror_msg_and_die("\nDEVPS_GET_PID_INFO");
/* Make some adjustments as needed */
my_getpwuid(uidName, info.euid);
if (*uidName == '\0')
sprintf(uidName, "%ld", info.euid);
2001-06-26 23:11:44 +00:00
len = printf("%5d %-8s %c ", info.pid, uidName, info.state);
if (strlen(info.command_line) > 1) {
for( j=0; j<(sizeof(info.command_line)-1) && j < (terminal_width-len); j++) {
if (*(info.command_line+j) == '\0' && *(info.command_line+j+1) != '\0') {
*(info.command_line+j) = ' ';
}
}
*(info.command_line+j) = '\0';
puts(info.command_line);
} else {
printf("[%s]\n", info.name);
}
}
/* Free memory */
free( pid_array);
/* close device */
if (close (fd) != 0)
perror_msg_and_die("close failed for `%s'", device);
exit (0);
}
#endif /* CONFIG_FEATURE_USE_DEVPS_PATCH */