X-Git-Url: https://git.librecmc.org/?a=blobdiff_plain;f=procps%2Ffuser.c;h=db28cca798c59b2fea8d6cd98f39c16e27b7eabc;hb=2b1559056cf32c42675ecd937796e1455bcb5c2c;hp=66e0988aed2686ae3d4499bbb2d0006f5897ff75;hpb=7eb8e453484c2dc75fbbdb76348c55134041a909;p=oweals%2Fbusybox.git

diff --git a/procps/fuser.c b/procps/fuser.c
index 66e0988ae..db28cca79 100644
--- a/procps/fuser.c
+++ b/procps/fuser.c
@@ -1,373 +1,334 @@
+/* vi: set sw=4 ts=4: */
 /*
- * tiny fuser implementation 
- * 
+ * tiny fuser implementation
+ *
  * 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 source tree.
  */
-
-#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 "busybox.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 
+//config:config FUSER
+//config:	bool "fuser"
+//config:	default y
+//config:	help
+//config:	  fuser lists all PIDs (Process IDs) that currently have a given
+//config:	  file open. fuser can also list all PIDs that have a given network
+//config:	  (TCP or UDP) port open.
+
+//applet:IF_FUSER(APPLET(fuser, BB_DIR_USR_BIN, BB_SUID_DROP))
+
+//kbuild:lib-$(CONFIG_FUSER) += fuser.o
+
+//usage:#define fuser_trivial_usage
+//usage:       "[OPTIONS] FILE or PORT/PROTO"
+//usage:#define fuser_full_usage "\n\n"
+//usage:       "Find processes which use FILEs or PORTs\n"
+//usage:     "\n	-m	Find processes which use same fs as FILEs"
+//usage:     "\n	-4,-6	Search only IPv4/IPv6 space"
+//usage:     "\n	-s	Don't display PIDs"
+//usage:     "\n	-k	Kill found processes"
+//usage:     "\n	-SIGNAL	Signal to send (default: KILL)"
+
+#include "libbb.h"
+#include "common_bufsiz.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_list;
-
-static int fuser_option(char *option) 
+struct globals {
+	int recursion_depth;
+	pid_t mypid;
+	inode_list *inode_list_head;
+	smallint kill_failed;
+	int killsig;
+} FIX_ALIASING;
+#define G (*(struct globals*)bb_common_bufsiz1)
+#define INIT_G() do { \
+	setup_common_bufsiz(); \
+	G.mypid = getpid(); \
+	G.killsig = SIGKILL; \
+} while (0)
+
+static void add_inode(const struct stat *st)
 {
-	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); 
+	inode_list **curr = &G.inode_list_head;
+
+	while (*curr) {
+		if ((*curr)->dev == st->st_dev
+		 && (*curr)->inode == st->st_ino
+		) {
+			return;
 		}
-		*++option;
+		curr = &(*curr)->next;
 	}
-	return opt;
-}
 
-static int fuser_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;
-	*inode = f_stat.st_ino;
-	*dev = f_stat.st_dev;
-        return 1;
+	*curr = xzalloc(sizeof(inode_list));
+	(*curr)->dev = st->st_dev;
+	(*curr)->inode = st->st_ino;
 }
 
-static int fuser_find_socket_dev(dev_t *dev) {
-	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;
+static smallint search_dev_inode(const struct stat *st)
+{
+	inode_list *ilist = G.inode_list_head;
+
+	while (ilist) {
+		if (ilist->dev == st->st_dev) {
+			if (option_mask32 & OPT_MOUNT)
+				return 1;
+			if (ilist->inode == st->st_ino)
+				return 1;
+		}
+		ilist = ilist->next;
 	}
 	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;	
-}
+enum {
+	PROC_NET = 0,
+	PROC_DIR,
+	PROC_DIR_LINKS,
+	PROC_SUBDIR_LINKS,
+};
 
-static int fuser_add_pid(pid_list *plist, pid_t pid)
+static smallint scan_proc_net_or_maps(const char *path, unsigned port)
 {
-        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;
-                curr = curr->next;
-        }
-        curr = xmalloc(sizeof(pid_list));
-        last->next = curr;
-        curr->pid = pid;
-	curr->next = NULL;
-        return 1;
-}
+	FILE *f;
+	char line[MAX_LINE + 1], addr[68];
+	int major, minor, r;
+	long long uint64_inode;
+	unsigned tmp_port;
+	smallint retval;
+	struct stat statbuf;
+	const char *fmt;
+	void *fag, *sag;
+
+	f = fopen_for_read(path);
+	if (!f)
+		return 0;
+
+	if (G.recursion_depth == PROC_NET) {
+		int fd;
+
+		/* find socket dev */
+		statbuf.st_dev = 0;
+		fd = socket(AF_INET, SOCK_DGRAM, 0);
+		if (fd >= 0) {
+			fstat(fd, &statbuf);
+			close(fd);
+		}
 
-static int fuser_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;
+		fmt = "%*d: %64[0-9A-Fa-f]:%x %*x:%*x %*x "
+			"%*x:%*x %*x:%*x %*x %*d %*d %llu";
+		fag = addr;
+		sag = &tmp_port;
+	} else {
+		fmt = "%*s %*s %*s %x:%x %llu";
+		fag = &major;
+		sag = &minor;
 	}
-        curr = ilist;
-        while(curr != NULL) {
-                if(curr->inode == inode && curr->dev == dev) return 1;
-                last = curr;
-                curr = curr->next;
-        }
-        curr = xmalloc(sizeof(inode_list));
-        last->next = curr;
-        curr->dev = dev;
-        curr->inode = inode;
-	curr->next = NULL;
-        return 1;
-}
 
-static int fuser_scan_proc_net(int opts, const char *proto, 
-	int port, inode_list *ilist) 
-{
-	char path[sizeof(FUSER_PROC_DIR)+12], line[FUSER_MAX_LINE+1];
-	char addr[128];
-	ino_t tmp_inode;
-	dev_t tmp_dev;
-	uint64_t  uint64_inode;
-	int tmp_port;
-	FILE *f;
+	retval = 0;
+	while (fgets(line, MAX_LINE, f)) {
+		r = sscanf(line, fmt, fag, sag, &uint64_inode);
+		if (r != 3)
+			continue;
 
-	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_inode = uint64_inode;
-				fuser_add_inode(ilist, tmp_dev, tmp_inode);
+		statbuf.st_ino = uint64_inode;
+		if (G.recursion_depth == PROC_NET) {
+			r = strlen(addr);
+			if (r == 8 && (option_mask32 & OPT_IP6))
+				continue;
+			if (r > 8 && (option_mask32 & OPT_IP4))
+				continue;
+			if (tmp_port == port)
+				add_inode(&statbuf);
+		} else {
+			if (major != 0 && minor != 0 && statbuf.st_ino != 0) {
+				statbuf.st_dev = makedev(major, minor);
+				retval = search_dev_inode(&statbuf);
+				if (retval)
+					break;
 			}
 		}
-
 	}
 	fclose(f);
-	return 1;
-}
 
-static int fuser_search_dev_inode(int opts, 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;
-        }
-        return 0;
+	return retval;
 }
 
-static int fuser_scan_pid_maps(int opts, const char *fname, pid_t pid,
-	inode_list *ilist, pid_list *plist) 
+static smallint scan_recursive(const char *path)
 {
-	FILE *file;
-	char line[FUSER_MAX_LINE + 1];
-	int major, minor;
-	ino_t inode;
-	uint64_t 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;
-		inode = uint64_inode;
-		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);
+	DIR *d;
+	struct dirent *d_ent;
+	smallint stop_scan;
+	smallint retval;
+
+	d = opendir(path);
+	if (d == NULL)
+		return 0;
+
+	G.recursion_depth++;
+	retval = 0;
+	stop_scan = 0;
+	while (!stop_scan && (d_ent = readdir(d)) != NULL) {
+		struct stat statbuf;
+		pid_t pid;
+		char *subpath;
+
+		subpath = concat_subpath_file(path, d_ent->d_name);
+		if (subpath == NULL)
+			continue; /* . or .. */
+
+		switch (G.recursion_depth) {
+		case PROC_DIR:
+			pid = (pid_t)bb_strtou(d_ent->d_name, NULL, 10);
+			if (errno != 0
+			 || pid == G.mypid
+			/* "this PID doesn't use specified FILEs or PORT/PROTO": */
+			 || scan_recursive(subpath) == 0
+			) {
+				break;
+			}
+			if (option_mask32 & OPT_KILL) {
+				if (kill(pid, G.killsig) != 0) {
+					bb_perror_msg("kill pid %s", d_ent->d_name);
+					G.kill_failed = 1;
+				}
+			}
+			if (!(option_mask32 & OPT_SILENT))
+				printf("%s ", d_ent->d_name);
+			retval = 1;
+			break;
+
+		case PROC_DIR_LINKS:
+			switch (
+				index_in_substrings(
+					"cwd"  "\0" "exe"  "\0"
+					"root" "\0" "fd"   "\0"
+					"lib"  "\0" "mmap" "\0"
+					"maps" "\0",
+					d_ent->d_name
+				)
+			) {
+			enum {
+				CWD_LINK,
+				EXE_LINK,
+				ROOT_LINK,
+				FD_DIR_LINKS,
+				LIB_DIR_LINKS,
+				MMAP_DIR_LINKS,
+				MAPS,
+			};
+			case CWD_LINK:
+			case EXE_LINK:
+			case ROOT_LINK:
+				goto scan_link;
+			case FD_DIR_LINKS:
+			case LIB_DIR_LINKS:
+			case MMAP_DIR_LINKS:
+				stop_scan = scan_recursive(subpath);
+				if (stop_scan)
+					retval = stop_scan;
+				break;
+			case MAPS:
+				stop_scan = scan_proc_net_or_maps(subpath, 0);
+				if (stop_scan)
+					retval = stop_scan;
+			default:
+				break;
+			}
+			break;
+		case PROC_SUBDIR_LINKS:
+  scan_link:
+			if (stat(subpath, &statbuf) < 0)
+				break;
+			stop_scan = search_dev_inode(&statbuf);
+			if (stop_scan)
+				retval = stop_scan;
+		default:
+			break;
 		}
-		
+		free(subpath);
 	}
-	fclose(file);
-	return 1;
+	closedir(d);
+	G.recursion_depth--;
+	return retval;
 }
 
-static int fuser_scan_link(int opts, const char *lname, pid_t pid, 
-	inode_list *ilist, pid_list *plist) 
+int fuser_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
+int fuser_main(int argc UNUSED_PARAM, char **argv)
 {
-	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;
-}
-
-static int fuser_scan_dir_links(int opts, 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);
+	char **pp;
+
+	INIT_G();
+
+	/* Handle -SIGNAL. Oh my... */
+	pp = argv;
+	while (*++pp) {
+		int sig;
+		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" */
+		sig = get_signum(&arg[1]);
+		if (sig < 0)
+			continue;
+		/* "-SIGNAL" option found. Remove it and bail out */
+		G.killsig = sig;
+		do {
+			pp[0] = arg = pp[1];
+			pp++;
+		} while (arg);
+		break;
 	}
-	else return 0;
-	return 1;
-
-} 
 
-static int fuser_scan_proc_pids(int opts, inode_list *ilist, pid_list *plist) 
-{
-	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);
-			continue; 
+	opt_complementary = "-1"; /* at least one param */
+	getopt32(argv, OPTION_STRING);
+	argv += optind;
+
+	pp = argv;
+	while (*pp) {
+		/* parse net arg */
+		unsigned port;
+		char path[sizeof("/proc/net/TCP6")];
+
+		strcpy(path, "/proc/net/");
+		if (sscanf(*pp, "%u/%4s", &port, path + sizeof("/proc/net/")-1) == 2
+		 && access(path, R_OK) == 0
+		) {
+			/* PORT/PROTO */
+			scan_proc_net_or_maps(path, port);
+		} else {
+			/* FILE */
+			struct stat statbuf;
+			xstat(*pp, &statbuf);
+			add_inode(&statbuf);
 		}
-		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("..");
-	} 
-	closedir(d);	
-	return 1;
-}
-
-static int fuser_print_pid_list(pid_list *plist) {
-	pid_list *curr;
-	curr = plist;
-
-	if(plist == NULL) return 0;
-	while(curr != NULL) {
-		if(curr->pid > 0) printf("%d ", curr->pid);
-		curr = curr->next;
+		pp++;
 	}
-	printf("\n");
-	return 1;
-}
 
-static int fuser_kill_pid_list(pid_list *plist, int sig) {
-        pid_list *curr;
-        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);
-				success = 0;		
-			}
-		}
-                curr = curr->next;
-        }
-        return success;
-}
-
-extern int fuser_main(int argc, 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_ */
-	dev_t dev;
-	ino_t inode;
-	pid_list *pids;
-	inode_list *inodes;
-	int killsig = SIGTERM;
-	int success = 1;
-
-	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;
-		}
+	if (scan_recursive("/proc")) {
+		if (!(option_mask32 & OPT_SILENT))
+			bb_putchar('\n');
+		return G.kill_failed;
 	}
-	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);
-		}
-	}
-	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);
-		}
-	}
-	free(pids);
-	free(inodes);
-	/* return 0 on (success == 1) 1 otherwise */
-	return (success != 1);
-} 
+	return EXIT_FAILURE;
+}