*
* Copyright 2004 Tony J. White
*
- * May be distributed under the conditions of the
- * GNU Library General Public License
+ * Licensed under GPLv2, see file LICENSE in this tarball for details.
*/
-#include "busybox.h"
-#include <stdio.h>
-#include <stdlib.h>
-#include <unistd.h>
-#include <string.h>
-#include <limits.h>
-#include <dirent.h>
-#include <signal.h>
-#include <sys/types.h>
-#include <sys/ioctl.h>
-#include <sys/stat.h>
-#include <sys/socket.h>
-#include <sys/sysmacros.h>
-
-#define FUSER_PROC_DIR "/proc"
-#define FUSER_MAX_LINE 255
-
-#define FUSER_OPT_MOUNT 1
-#define FUSER_OPT_KILL 2
-#define FUSER_OPT_SILENT 4
-#define FUSER_OPT_IP6 8
-#define FUSER_OPT_IP4 16
+#include "libbb.h"
+
+#define MAX_LINE 255
+
+#define OPTION_STRING "mks64"
+enum {
+ OPT_MOUNT = (1 << 0),
+ OPT_KILL = (1 << 1),
+ OPT_SILENT = (1 << 2),
+ OPT_IP6 = (1 << 3),
+ OPT_IP4 = (1 << 4),
+};
typedef struct inode_list {
+ struct inode_list *next;
ino_t inode;
dev_t dev;
- struct inode_list *next;
} inode_list;
typedef struct pid_list {
- pid_t pid;
struct pid_list *next;
+ pid_t pid;
} pid_list;
-static int fuser_option(char *option)
+static dev_t find_socket_dev(void)
{
- int opt = 0;
-
- if(!(strlen(option))) return 0;
- if(option[0] != '-') return 0;
- ++option;
- while(*option != '\0') {
- if(*option == 'm') opt |= FUSER_OPT_MOUNT;
- else if(*option == 'k') opt |= FUSER_OPT_KILL;
- else if(*option == 's') opt |= FUSER_OPT_SILENT;
- else if(*option == '6') opt |= FUSER_OPT_IP6;
- else if(*option == '4') opt |= FUSER_OPT_IP4;
- else {
- bb_error_msg_and_die(
- "Unsupported option '%c'", *option);
- }
- ++option;
+ int fd = socket(AF_INET, SOCK_DGRAM, 0);
+ if (fd >= 0) {
+ struct stat buf;
+ int r = fstat(fd, &buf);
+ close(fd);
+ if (r == 0)
+ return buf.st_dev;
}
- return opt;
+ return 0;
}
-static int fuser_file_to_dev_inode(const char *filename,
- dev_t *dev, ino_t *inode)
+static int file_to_dev_inode(const char *filename, dev_t *dev, ino_t *inode)
{
struct stat f_stat;
- if((stat(filename, &f_stat)) < 0) return 0;
+ if (stat(filename, &f_stat))
+ return 0;
*inode = f_stat.st_ino;
*dev = f_stat.st_dev;
return 1;
}
-static int fuser_find_socket_dev(dev_t *dev)
+static char *parse_net_arg(const char *arg, unsigned *port)
{
- int fd = socket(PF_INET, SOCK_DGRAM,0);
- struct stat buf;
-
- if (fd >= 0 && (fstat(fd, &buf)) == 0) {
- *dev = buf.st_dev;
- close(fd);
- return 1;
- }
- return 0;
-}
-
-static int fuser_parse_net_arg(const char *filename,
- const char **proto, int *port)
-{
- char path[sizeof(FUSER_PROC_DIR)+12], tproto[5];
-
- if((sscanf(filename, "%d/%4s", port, tproto)) != 2) return 0;
- sprintf(path, "%s/net/%s", FUSER_PROC_DIR, tproto);
- if((access(path, R_OK)) != 0) return 0;
- *proto = bb_xstrdup(tproto);
- return 1;
+ char path[20], tproto[5];
+
+ if (sscanf(arg, "%u/%4s", port, tproto) != 2)
+ return NULL;
+ sprintf(path, "/proc/net/%s", tproto);
+ if (access(path, R_OK) != 0)
+ return NULL;
+ return xstrdup(tproto);
}
-static int fuser_add_pid(pid_list *plist, pid_t pid)
+static pid_list *add_pid(pid_list *plist, pid_t pid)
{
- pid_list *curr = NULL, *last = NULL;
-
- if(plist->pid == 0) plist->pid = pid;
- curr = plist;
- while(curr != NULL) {
- if(curr->pid == pid) return 1;
- last = curr;
+ pid_list *curr = plist;
+ while (curr != NULL) {
+ if (curr->pid == pid)
+ return plist;
curr = curr->next;
}
curr = xmalloc(sizeof(pid_list));
- last->next = curr;
curr->pid = pid;
- curr->next = NULL;
- return 1;
+ curr->next = plist;
+ return curr;
}
-static int fuser_add_inode(inode_list *ilist, dev_t dev, ino_t inode)
+static inode_list *add_inode(inode_list *ilist, dev_t dev, ino_t inode)
{
- inode_list *curr = NULL, *last = NULL;
-
- if(!ilist->inode && !ilist->dev) {
- ilist->dev = dev;
- ilist->inode = inode;
- }
- curr = ilist;
- while(curr != NULL) {
- if(curr->inode == inode && curr->dev == dev) return 1;
- last = curr;
+ inode_list *curr = ilist;
+ while (curr != NULL) {
+ if (curr->inode == inode && curr->dev == dev)
+ return ilist;
curr = curr->next;
}
curr = xmalloc(sizeof(inode_list));
- last->next = curr;
curr->dev = dev;
curr->inode = inode;
- curr->next = NULL;
- return 1;
+ curr->next = ilist;
+ return curr;
}
-static int fuser_scan_proc_net(int opts, const char *proto,
- int port, inode_list *ilist)
+static inode_list *scan_proc_net(const char *proto,
+ unsigned port, inode_list *ilist)
{
- char path[sizeof(FUSER_PROC_DIR)+12], line[FUSER_MAX_LINE+1];
- char addr[128];
+ char path[20], line[MAX_LINE + 1];
ino_t tmp_inode;
dev_t tmp_dev;
- long long uint64_inode;
- int tmp_port;
+ long long uint64_inode;
+ unsigned tmp_port;
FILE *f;
- if(!fuser_find_socket_dev(&tmp_dev)) tmp_dev = 0;
- sprintf(path, "%s/net/%s", FUSER_PROC_DIR, proto);
-
- if (!(f = fopen(path, "r"))) return 0;
- while(fgets(line, FUSER_MAX_LINE, f)) {
- if(sscanf(line,
- "%*d: %64[0-9A-Fa-f]:%x %*x:%*x %*x %*x:%*x "
- "%*x:%*x %*x %*d %*d %llu",
- addr, &tmp_port, &uint64_inode) == 3) {
- if((strlen(addr) == 8) &&
- (opts & FUSER_OPT_IP6)) continue;
- else if((strlen(addr) > 8) &&
- (opts & FUSER_OPT_IP4)) continue;
- if(tmp_port == port) {
+ tmp_dev = find_socket_dev();
+
+ sprintf(path, "/proc/net/%s", proto);
+ f = fopen_for_read(path);
+ if (!f)
+ return ilist;
+
+ while (fgets(line, MAX_LINE, f)) {
+ char addr[68];
+ if (sscanf(line, "%*d: %64[0-9A-Fa-f]:%x %*x:%*x %*x %*x:%*x "
+ "%*x:%*x %*x %*d %*d %llu",
+ addr, &tmp_port, &uint64_inode) == 3
+ ) {
+ int len = strlen(addr);
+ if (len == 8 && (option_mask32 & OPT_IP6))
+ continue;
+ if (len > 8 && (option_mask32 & OPT_IP4))
+ continue;
+ if (tmp_port == port) {
tmp_inode = uint64_inode;
- fuser_add_inode(ilist, tmp_dev, tmp_inode);
+ ilist = add_inode(ilist, tmp_dev, tmp_inode);
}
}
-
}
fclose(f);
- return 1;
+ return ilist;
}
-static int fuser_search_dev_inode(int opts, inode_list *ilist,
- dev_t dev, ino_t inode)
+static int search_dev_inode(inode_list *ilist, dev_t dev, ino_t inode)
{
- inode_list *curr;
- curr = ilist;
-
- while(curr) {
- if((opts & FUSER_OPT_MOUNT) && curr->dev == dev)
- return 1;
- if(curr->inode == inode && curr->dev == dev)
- return 1;
- curr = curr->next;
+ while (ilist) {
+ if (ilist->dev == dev) {
+ if (option_mask32 & OPT_MOUNT)
+ return 1;
+ if (ilist->inode == inode)
+ return 1;
+ }
+ ilist = ilist->next;
}
return 0;
}
-static int fuser_scan_pid_maps(int opts, const char *fname, pid_t pid,
- inode_list *ilist, pid_list *plist)
+static pid_list *scan_pid_maps(const char *fname, pid_t pid,
+ inode_list *ilist, pid_list *plist)
{
FILE *file;
- char line[FUSER_MAX_LINE + 1];
+ char line[MAX_LINE + 1];
int major, minor;
ino_t inode;
long long uint64_inode;
dev_t dev;
- if (!(file = fopen(fname, "r"))) return 0;
- while (fgets(line, FUSER_MAX_LINE, file)) {
- if(sscanf(line, "%*s %*s %*s %x:%x %llu",
- &major, &minor, &uint64_inode) != 3) continue;
+ file = fopen_for_read(fname);
+ if (!file)
+ return plist;
+ while (fgets(line, MAX_LINE, file)) {
+ if (sscanf(line, "%*s %*s %*s %x:%x %llu", &major, &minor, &uint64_inode) != 3)
+ continue;
inode = uint64_inode;
- if(major == 0 && minor == 0 && inode == 0) continue;
+ if (major == 0 && minor == 0 && inode == 0)
+ continue;
dev = makedev(major, minor);
- if(fuser_search_dev_inode(opts, ilist, dev, inode)) {
- fuser_add_pid(plist, pid);
- }
-
+ if (search_dev_inode(ilist, dev, inode))
+ plist = add_pid(plist, pid);
}
fclose(file);
- return 1;
+ return plist;
}
-static int fuser_scan_link(int opts, const char *lname, pid_t pid,
- inode_list *ilist, pid_list *plist)
+static pid_list *scan_link(const char *lname, pid_t pid,
+ inode_list *ilist, pid_list *plist)
{
ino_t inode;
dev_t dev;
- if(!fuser_file_to_dev_inode(lname, &dev, &inode)) return 0;
- if(fuser_search_dev_inode(opts, ilist, dev, inode))
- fuser_add_pid(plist, pid);
- return 1;
+ if (!file_to_dev_inode(lname, &dev, &inode))
+ return plist;
+ if (search_dev_inode(ilist, dev, inode))
+ plist = add_pid(plist, pid);
+ return plist;
}
-static int fuser_scan_dir_links(int opts, const char *dname, pid_t pid,
- inode_list *ilist, pid_list *plist)
+static pid_list *scan_dir_links(const char *dname, pid_t pid,
+ inode_list *ilist, pid_list *plist)
{
DIR *d;
struct dirent *de;
char *lname;
- if((d = opendir(dname))) {
- while((de = readdir(d)) != NULL) {
- lname = concat_subpath_file(dname, de->d_name);
- if(lname == NULL)
- continue;
- fuser_scan_link(opts, lname, pid, ilist, plist);
- free(lname);
- }
- closedir(d);
+ d = opendir(dname);
+ if (!d)
+ return plist;
+ while ((de = readdir(d)) != NULL) {
+ lname = concat_subpath_file(dname, de->d_name);
+ if (lname == NULL)
+ continue;
+ plist = scan_link(lname, pid, ilist, plist);
+ free(lname);
}
- else return 0;
- return 1;
-
+ closedir(d);
+ return plist;
}
-static int fuser_scan_proc_pids(int opts, inode_list *ilist, pid_list *plist)
+/* NB: does chdir internally */
+static pid_list *scan_proc_pids(inode_list *ilist)
{
DIR *d;
struct dirent *de;
pid_t pid;
- char *dname;
-
- if(!(d = opendir(FUSER_PROC_DIR))) return 0;
- while((de = readdir(d)) != NULL) {
- pid = (pid_t)atoi(de->d_name);
- if(!pid) continue;
- dname = concat_subpath_file(FUSER_PROC_DIR, de->d_name);
- if(chdir(dname) < 0) {
- free(dname);
+ pid_list *plist;
+
+ xchdir("/proc");
+ d = opendir("/proc");
+ if (!d)
+ return NULL;
+
+ plist = NULL;
+ while ((de = readdir(d)) != NULL) {
+ pid = (pid_t)bb_strtou(de->d_name, NULL, 10);
+ if (errno)
continue;
- }
- free(dname);
- fuser_scan_link(opts, "cwd", pid, ilist, plist);
- fuser_scan_link(opts, "exe", pid, ilist, plist);
- fuser_scan_link(opts, "root", pid, ilist, plist);
- fuser_scan_dir_links(opts, "fd", pid, ilist, plist);
- fuser_scan_dir_links(opts, "lib", pid, ilist, plist);
- fuser_scan_dir_links(opts, "mmap", pid, ilist, plist);
- fuser_scan_pid_maps(opts, "maps", pid, ilist, plist);
- chdir("..");
+ if (chdir(de->d_name) < 0)
+ continue;
+ plist = scan_link("cwd", pid, ilist, plist);
+ plist = scan_link("exe", pid, ilist, plist);
+ plist = scan_link("root", pid, ilist, plist);
+ plist = scan_dir_links("fd", pid, ilist, plist);
+ plist = scan_dir_links("lib", pid, ilist, plist);
+ plist = scan_dir_links("mmap", pid, ilist, plist);
+ plist = scan_pid_maps("maps", pid, ilist, plist);
+ xchdir("/proc");
}
closedir(d);
- return 1;
+ return plist;
}
-static int fuser_print_pid_list(pid_list *plist)
+static int print_pid_list(pid_list *plist)
{
- pid_list *curr = plist;
-
- if(plist == NULL) return 0;
- while(curr != NULL) {
- if(curr->pid > 0) printf("%d ", curr->pid);
- curr = curr->next;
+ while (plist != NULL) {
+ printf("%u ", (unsigned)plist->pid);
+ plist = plist->next;
}
- printf("\n");
+ bb_putchar('\n');
return 1;
}
-static int fuser_kill_pid_list(pid_list *plist, int sig)
+static int kill_pid_list(pid_list *plist, int sig)
{
- pid_list *curr = plist;
pid_t mypid = getpid();
int success = 1;
- if(plist == NULL) return 0;
- while(curr != NULL) {
- if(curr->pid > 0 && curr->pid != mypid) {
- if (kill(curr->pid, sig) != 0) {
- bb_perror_msg(
- "Could not kill pid '%d'", curr->pid);
+ while (plist != NULL) {
+ if (plist->pid != mypid) {
+ if (kill(plist->pid, sig) != 0) {
+ bb_perror_msg("kill pid %u", (unsigned)plist->pid);
success = 0;
}
}
- curr = curr->next;
+ plist = plist->next;
}
return success;
}
-int fuser_main(int argc, char **argv)
+int fuser_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
+int fuser_main(int argc UNUSED_PARAM, char **argv)
{
- int port, i, optn;
- int* fni; /* file name indexes of argv */
- int fnic = 0; /* file name index count */
- const char *proto;
- static int opt = 0; /* FUSER_OPT_ */
+ pid_list *plist;
+ inode_list *ilist;
+ char **pp;
dev_t dev;
ino_t inode;
- pid_list *pids;
- inode_list *inodes;
- int killsig = SIGTERM;
- int success = 1;
-
- if (argc < 2)
- bb_show_usage();
-
- fni = xmalloc(sizeof(int));
- for(i=1;i<argc;i++) {
- optn = fuser_option(argv[i]);
- if(optn) opt |= optn;
- else if(argv[i][0] == '-') {
- if(!(u_signal_names(argv[i]+1, &killsig, 0)))
- killsig = SIGTERM;
- }
- else {
- fni = xrealloc(fni, sizeof(int) * (fnic+2));
- fni[fnic++] = i;
- }
+ unsigned port;
+ int opt;
+ int success;
+ int killsig;
+/*
+fuser [options] FILEs or PORT/PROTOs
+Find processes which use FILEs or PORTs
+ -m Find processes which use same fs as FILEs
+ -4 Search only IPv4 space
+ -6 Search only IPv6 space
+ -s Silent: just exit with 0 if any processes are found
+ -k Kill found processes (otherwise display PIDs)
+ -SIGNAL Signal to send (default: TERM)
+*/
+ /* Handle -SIGNAL. Oh my... */
+ killsig = SIGTERM;
+ pp = argv;
+ while (*++pp) {
+ char *arg = *pp;
+ if (arg[0] != '-')
+ continue;
+ if (arg[1] == '-' && arg[2] == '\0') /* "--" */
+ break;
+ if ((arg[1] == '4' || arg[1] == '6') && arg[2] == '\0')
+ continue; /* it's "-4" or "-6" */
+ opt = get_signum(&arg[1]);
+ if (opt < 0)
+ continue;
+ /* "-SIGNAL" option found. Remove it and bail out */
+ killsig = opt;
+ do {
+ pp[0] = arg = pp[1];
+ pp++;
+ } while (arg);
+ break;
}
- if(!fnic) return 1;
- pids = xmalloc(sizeof(pid_list));
- inodes = xmalloc(sizeof(inode_list));
- for(i=0;i<fnic;i++) {
- if(fuser_parse_net_arg(argv[fni[i]], &proto, &port)) {
- fuser_scan_proc_net(opt, proto, port, inodes);
- }
- else {
- if(!fuser_file_to_dev_inode(
- argv[fni[i]], &dev, &inode)) {
- free(pids);
- free(inodes);
- bb_perror_msg_and_die(
- "Could not open '%s'", argv[fni[i]]);
- }
- fuser_add_inode(inodes, dev, inode);
+ opt = getopt32(argv, OPTION_STRING);
+ argv += optind;
+
+ ilist = NULL;
+ pp = argv;
+ while (*pp) {
+ char *proto = parse_net_arg(*pp, &port);
+ if (proto) { /* PORT/PROTO */
+ ilist = scan_proc_net(proto, port, ilist);
+ free(proto);
+ } else { /* FILE */
+ if (!file_to_dev_inode(*pp, &dev, &inode))
+ bb_perror_msg_and_die("can't open '%s'", *pp);
+ ilist = add_inode(ilist, dev, inode);
}
+ pp++;
}
- success = fuser_scan_proc_pids(opt, inodes, pids);
- /* if the first pid in the list is 0, none have been found */
- if(pids->pid == 0) success = 0;
- if(success) {
- if(opt & FUSER_OPT_KILL) {
- success = fuser_kill_pid_list(pids, killsig);
- }
- else if(!(opt & FUSER_OPT_SILENT)) {
- success = fuser_print_pid_list(pids);
- }
+
+ plist = scan_proc_pids(ilist); /* changes dir to "/proc" */
+
+ if (!plist)
+ return EXIT_FAILURE;
+ success = 1;
+ if (opt & OPT_KILL) {
+ success = kill_pid_list(plist, killsig);
+ } else if (!(opt & OPT_SILENT)) {
+ success = print_pid_list(plist);
}
- free(pids);
- free(inodes);
- /* return 0 on (success == 1) 1 otherwise */
- return (success != 1);
+ return (success != 1); /* 0 == success */
}