1 | /* vi: set sw=4 ts=4: */
|
---|
2 | /*
|
---|
3 | * tiny fuser implementation
|
---|
4 | *
|
---|
5 | * Copyright 2004 Tony J. White
|
---|
6 | *
|
---|
7 | * May be distributed under the conditions of the
|
---|
8 | * GNU Library General Public License
|
---|
9 | */
|
---|
10 |
|
---|
11 | #include "libbb.h"
|
---|
12 |
|
---|
13 | #define FUSER_PROC_DIR "/proc"
|
---|
14 | #define FUSER_MAX_LINE 255
|
---|
15 |
|
---|
16 | #define FUSER_OPT_MOUNT 1
|
---|
17 | #define FUSER_OPT_KILL 2
|
---|
18 | #define FUSER_OPT_SILENT 4
|
---|
19 | #define FUSER_OPT_IP6 8
|
---|
20 | #define FUSER_OPT_IP4 16
|
---|
21 |
|
---|
22 | typedef struct inode_list {
|
---|
23 | ino_t inode;
|
---|
24 | dev_t dev;
|
---|
25 | struct inode_list *next;
|
---|
26 | } inode_list;
|
---|
27 |
|
---|
28 | typedef struct pid_list {
|
---|
29 | pid_t pid;
|
---|
30 | struct pid_list *next;
|
---|
31 | } pid_list;
|
---|
32 |
|
---|
33 | static int fuser_option(char *option)
|
---|
34 | {
|
---|
35 | int opt = 0;
|
---|
36 |
|
---|
37 | if (!option[0])
|
---|
38 | return 0;
|
---|
39 | if (option[0] != '-')
|
---|
40 | return 0;
|
---|
41 | ++option;
|
---|
42 | while (*option != '\0') {
|
---|
43 | if (*option == 'm') opt |= FUSER_OPT_MOUNT;
|
---|
44 | else if (*option == 'k') opt |= FUSER_OPT_KILL;
|
---|
45 | else if (*option == 's') opt |= FUSER_OPT_SILENT;
|
---|
46 | else if (*option == '6') opt |= FUSER_OPT_IP6;
|
---|
47 | else if (*option == '4') opt |= FUSER_OPT_IP4;
|
---|
48 | else
|
---|
49 | bb_error_msg_and_die("unsupported option '%c'", *option);
|
---|
50 | ++option;
|
---|
51 | }
|
---|
52 | return opt;
|
---|
53 | }
|
---|
54 |
|
---|
55 | static int fuser_file_to_dev_inode(const char *filename,
|
---|
56 | dev_t *dev, ino_t *inode)
|
---|
57 | {
|
---|
58 | struct stat f_stat;
|
---|
59 | if ((stat(filename, &f_stat)) < 0)
|
---|
60 | return 0;
|
---|
61 | *inode = f_stat.st_ino;
|
---|
62 | *dev = f_stat.st_dev;
|
---|
63 | return 1;
|
---|
64 | }
|
---|
65 |
|
---|
66 | static int fuser_find_socket_dev(dev_t *dev)
|
---|
67 | {
|
---|
68 | int fd = socket(PF_INET, SOCK_DGRAM,0);
|
---|
69 | struct stat buf;
|
---|
70 |
|
---|
71 | if (fd >= 0 && (fstat(fd, &buf)) == 0) {
|
---|
72 | *dev = buf.st_dev;
|
---|
73 | close(fd);
|
---|
74 | return 1;
|
---|
75 | }
|
---|
76 | return 0;
|
---|
77 | }
|
---|
78 |
|
---|
79 | static int fuser_parse_net_arg(const char *filename,
|
---|
80 | const char **proto, int *port)
|
---|
81 | {
|
---|
82 | char path[sizeof(FUSER_PROC_DIR)+12], tproto[5];
|
---|
83 |
|
---|
84 | if ((sscanf(filename, "%d/%4s", port, tproto)) != 2)
|
---|
85 | return 0;
|
---|
86 | sprintf(path, FUSER_PROC_DIR "/net/%s", tproto);
|
---|
87 | if ((access(path, R_OK)) != 0)
|
---|
88 | return 0;
|
---|
89 | *proto = xstrdup(tproto);
|
---|
90 | return 1;
|
---|
91 | }
|
---|
92 |
|
---|
93 | static int fuser_add_pid(pid_list *plist, pid_t pid)
|
---|
94 | {
|
---|
95 | pid_list *curr = NULL, *last = NULL;
|
---|
96 |
|
---|
97 | if (plist->pid == 0)
|
---|
98 | plist->pid = pid;
|
---|
99 | curr = plist;
|
---|
100 | while (curr != NULL) {
|
---|
101 | if (curr->pid == pid)
|
---|
102 | return 1;
|
---|
103 | last = curr;
|
---|
104 | curr = curr->next;
|
---|
105 | }
|
---|
106 | curr = xzalloc(sizeof(pid_list));
|
---|
107 | last->next = curr;
|
---|
108 | curr->pid = pid;
|
---|
109 | /*curr->next = NULL;*/
|
---|
110 | return 1;
|
---|
111 | }
|
---|
112 |
|
---|
113 | static int fuser_add_inode(inode_list *ilist, dev_t dev, ino_t inode)
|
---|
114 | {
|
---|
115 | inode_list *curr = NULL, *last = NULL;
|
---|
116 |
|
---|
117 | if (!ilist->inode && !ilist->dev) {
|
---|
118 | ilist->dev = dev;
|
---|
119 | ilist->inode = inode;
|
---|
120 | }
|
---|
121 | curr = ilist;
|
---|
122 | while (curr != NULL) {
|
---|
123 | if (curr->inode == inode && curr->dev == dev)
|
---|
124 | return 1;
|
---|
125 | last = curr;
|
---|
126 | curr = curr->next;
|
---|
127 | }
|
---|
128 | curr = xzalloc(sizeof(inode_list));
|
---|
129 | last->next = curr;
|
---|
130 | curr->dev = dev;
|
---|
131 | curr->inode = inode;
|
---|
132 | /*curr->next = NULL;*/
|
---|
133 | return 1;
|
---|
134 | }
|
---|
135 |
|
---|
136 | static int fuser_scan_proc_net(int opts, const char *proto,
|
---|
137 | int port, inode_list *ilist)
|
---|
138 | {
|
---|
139 | char path[sizeof(FUSER_PROC_DIR)+12], line[FUSER_MAX_LINE+1];
|
---|
140 | char addr[128];
|
---|
141 | ino_t tmp_inode;
|
---|
142 | dev_t tmp_dev;
|
---|
143 | long long uint64_inode;
|
---|
144 | int tmp_port;
|
---|
145 | FILE *f;
|
---|
146 |
|
---|
147 | if (!fuser_find_socket_dev(&tmp_dev))
|
---|
148 | tmp_dev = 0;
|
---|
149 | sprintf(path, FUSER_PROC_DIR "/net/%s", proto);
|
---|
150 |
|
---|
151 | f = fopen(path, "r");
|
---|
152 | if (!f)
|
---|
153 | return 0;
|
---|
154 | while (fgets(line, FUSER_MAX_LINE, f)) {
|
---|
155 | if (sscanf(line, "%*d: %64[0-9A-Fa-f]:%x %*x:%*x %*x %*x:%*x "
|
---|
156 | "%*x:%*x %*x %*d %*d %llu",
|
---|
157 | addr, &tmp_port, &uint64_inode) == 3
|
---|
158 | ) {
|
---|
159 | if (strlen(addr) == 8 && (opts & FUSER_OPT_IP6))
|
---|
160 | continue;
|
---|
161 | if (strlen(addr) > 8 && (opts & FUSER_OPT_IP4))
|
---|
162 | continue;
|
---|
163 | if (tmp_port == port) {
|
---|
164 | tmp_inode = uint64_inode;
|
---|
165 | fuser_add_inode(ilist, tmp_dev, tmp_inode);
|
---|
166 | }
|
---|
167 | }
|
---|
168 | }
|
---|
169 | fclose(f);
|
---|
170 | return 1;
|
---|
171 | }
|
---|
172 |
|
---|
173 | static int fuser_search_dev_inode(int opts, inode_list *ilist,
|
---|
174 | dev_t dev, ino_t inode)
|
---|
175 | {
|
---|
176 | inode_list *curr;
|
---|
177 | curr = ilist;
|
---|
178 |
|
---|
179 | while (curr) {
|
---|
180 | if ((opts & FUSER_OPT_MOUNT) && curr->dev == dev)
|
---|
181 | return 1;
|
---|
182 | if (curr->inode == inode && curr->dev == dev)
|
---|
183 | return 1;
|
---|
184 | curr = curr->next;
|
---|
185 | }
|
---|
186 | return 0;
|
---|
187 | }
|
---|
188 |
|
---|
189 | static int fuser_scan_pid_maps(int opts, const char *fname, pid_t pid,
|
---|
190 | inode_list *ilist, pid_list *plist)
|
---|
191 | {
|
---|
192 | FILE *file;
|
---|
193 | char line[FUSER_MAX_LINE + 1];
|
---|
194 | int major, minor;
|
---|
195 | ino_t inode;
|
---|
196 | long long uint64_inode;
|
---|
197 | dev_t dev;
|
---|
198 |
|
---|
199 | file = fopen(fname, "r");
|
---|
200 | if (!file)
|
---|
201 | return 0;
|
---|
202 | while (fgets(line, FUSER_MAX_LINE, file)) {
|
---|
203 | if (sscanf(line, "%*s %*s %*s %x:%x %llu", &major, &minor, &uint64_inode) != 3)
|
---|
204 | continue;
|
---|
205 | inode = uint64_inode;
|
---|
206 | if (major == 0 && minor == 0 && inode == 0)
|
---|
207 | continue;
|
---|
208 | dev = makedev(major, minor);
|
---|
209 | if (fuser_search_dev_inode(opts, ilist, dev, inode)) {
|
---|
210 | fuser_add_pid(plist, pid);
|
---|
211 | }
|
---|
212 | }
|
---|
213 | fclose(file);
|
---|
214 | return 1;
|
---|
215 | }
|
---|
216 |
|
---|
217 | static int fuser_scan_link(int opts, const char *lname, pid_t pid,
|
---|
218 | inode_list *ilist, pid_list *plist)
|
---|
219 | {
|
---|
220 | ino_t inode;
|
---|
221 | dev_t dev;
|
---|
222 |
|
---|
223 | if (!fuser_file_to_dev_inode(lname, &dev, &inode))
|
---|
224 | return 0;
|
---|
225 | if (fuser_search_dev_inode(opts, ilist, dev, inode))
|
---|
226 | fuser_add_pid(plist, pid);
|
---|
227 | return 1;
|
---|
228 | }
|
---|
229 |
|
---|
230 | static int fuser_scan_dir_links(int opts, const char *dname, pid_t pid,
|
---|
231 | inode_list *ilist, pid_list *plist)
|
---|
232 | {
|
---|
233 | DIR *d;
|
---|
234 | struct dirent *de;
|
---|
235 | char *lname;
|
---|
236 |
|
---|
237 | d = opendir(dname);
|
---|
238 | if (!d)
|
---|
239 | return 0;
|
---|
240 | while ((de = readdir(d)) != NULL) {
|
---|
241 | lname = concat_subpath_file(dname, de->d_name);
|
---|
242 | if (lname == NULL)
|
---|
243 | continue;
|
---|
244 | fuser_scan_link(opts, lname, pid, ilist, plist);
|
---|
245 | free(lname);
|
---|
246 | }
|
---|
247 | closedir(d);
|
---|
248 | return 1;
|
---|
249 | }
|
---|
250 |
|
---|
251 | static int fuser_scan_proc_pids(int opts, inode_list *ilist, pid_list *plist)
|
---|
252 | {
|
---|
253 | DIR *d;
|
---|
254 | struct dirent *de;
|
---|
255 | pid_t pid;
|
---|
256 | char *dname;
|
---|
257 |
|
---|
258 | d = opendir(FUSER_PROC_DIR);
|
---|
259 | if (!d)
|
---|
260 | return 0;
|
---|
261 | while ((de = readdir(d)) != NULL) {
|
---|
262 | pid = (pid_t)atoi(de->d_name);
|
---|
263 | if (!pid)
|
---|
264 | continue;
|
---|
265 | dname = concat_subpath_file(FUSER_PROC_DIR, de->d_name);
|
---|
266 | if (chdir(dname) < 0) {
|
---|
267 | free(dname);
|
---|
268 | continue;
|
---|
269 | }
|
---|
270 | free(dname);
|
---|
271 | fuser_scan_link(opts, "cwd", pid, ilist, plist);
|
---|
272 | fuser_scan_link(opts, "exe", pid, ilist, plist);
|
---|
273 | fuser_scan_link(opts, "root", pid, ilist, plist);
|
---|
274 | fuser_scan_dir_links(opts, "fd", pid, ilist, plist);
|
---|
275 | fuser_scan_dir_links(opts, "lib", pid, ilist, plist);
|
---|
276 | fuser_scan_dir_links(opts, "mmap", pid, ilist, plist);
|
---|
277 | fuser_scan_pid_maps(opts, "maps", pid, ilist, plist);
|
---|
278 | chdir("..");
|
---|
279 | }
|
---|
280 | closedir(d);
|
---|
281 | return 1;
|
---|
282 | }
|
---|
283 |
|
---|
284 | static int fuser_print_pid_list(pid_list *plist)
|
---|
285 | {
|
---|
286 | pid_list *curr = plist;
|
---|
287 |
|
---|
288 | if (plist == NULL)
|
---|
289 | return 0;
|
---|
290 | while (curr != NULL) {
|
---|
291 | if (curr->pid > 0)
|
---|
292 | printf("%d ", curr->pid);
|
---|
293 | curr = curr->next;
|
---|
294 | }
|
---|
295 | puts("");
|
---|
296 | return 1;
|
---|
297 | }
|
---|
298 |
|
---|
299 | static int fuser_kill_pid_list(pid_list *plist, int sig)
|
---|
300 | {
|
---|
301 | pid_list *curr = plist;
|
---|
302 | pid_t mypid = getpid();
|
---|
303 | int success = 1;
|
---|
304 |
|
---|
305 | if (plist == NULL)
|
---|
306 | return 0;
|
---|
307 | while (curr != NULL) {
|
---|
308 | if (curr->pid > 0 && curr->pid != mypid) {
|
---|
309 | if (kill(curr->pid, sig) != 0) {
|
---|
310 | bb_perror_msg("kill pid '%d'", curr->pid);
|
---|
311 | success = 0;
|
---|
312 | }
|
---|
313 | }
|
---|
314 | curr = curr->next;
|
---|
315 | }
|
---|
316 | return success;
|
---|
317 | }
|
---|
318 |
|
---|
319 | int fuser_main(int argc, char **argv);
|
---|
320 | int fuser_main(int argc, char **argv)
|
---|
321 | {
|
---|
322 | /*static -- huh???*/ int opt = 0; /* FUSER_OPT_ */
|
---|
323 |
|
---|
324 | int port, i, optn;
|
---|
325 | int* fni; /* file name indexes of argv */
|
---|
326 | int fnic = 0; /* file name index count */
|
---|
327 | const char *proto;
|
---|
328 | dev_t dev;
|
---|
329 | ino_t inode;
|
---|
330 | pid_list *pids;
|
---|
331 | inode_list *inodes;
|
---|
332 | int killsig = SIGTERM;
|
---|
333 | int success = 1;
|
---|
334 |
|
---|
335 | if (argc < 2)
|
---|
336 | bb_show_usage();
|
---|
337 |
|
---|
338 | fni = xmalloc(sizeof(int));
|
---|
339 | for (i = 1; i < argc; i++) {
|
---|
340 | optn = fuser_option(argv[i]);
|
---|
341 | if (optn)
|
---|
342 | opt |= optn;
|
---|
343 | else if (argv[i][0] == '-') {
|
---|
344 | killsig = get_signum(argv[i]+1);
|
---|
345 | if (killsig < 0)
|
---|
346 | killsig = SIGTERM;
|
---|
347 | } else {
|
---|
348 | fni = xrealloc(fni, sizeof(int) * (fnic+2));
|
---|
349 | fni[fnic++] = i;
|
---|
350 | }
|
---|
351 | }
|
---|
352 |
|
---|
353 | if (!fnic)
|
---|
354 | return 1;
|
---|
355 |
|
---|
356 | inodes = xmalloc(sizeof(inode_list));
|
---|
357 | for (i = 0; i < fnic; i++) {
|
---|
358 | if (fuser_parse_net_arg(argv[fni[i]], &proto, &port)) {
|
---|
359 | fuser_scan_proc_net(opt, proto, port, inodes);
|
---|
360 | } else {
|
---|
361 | if (!fuser_file_to_dev_inode(argv[fni[i]], &dev, &inode)) {
|
---|
362 | if (ENABLE_FEATURE_CLEAN_UP)
|
---|
363 | free(inodes);
|
---|
364 | bb_perror_msg_and_die("cannot open '%s'", argv[fni[i]]);
|
---|
365 | }
|
---|
366 | fuser_add_inode(inodes, dev, inode);
|
---|
367 | }
|
---|
368 | }
|
---|
369 | pids = xmalloc(sizeof(pid_list));
|
---|
370 | success = fuser_scan_proc_pids(opt, inodes, pids);
|
---|
371 | /* if the first pid in the list is 0, none have been found */
|
---|
372 | if (pids->pid == 0)
|
---|
373 | success = 0;
|
---|
374 | if (success) {
|
---|
375 | if (opt & FUSER_OPT_KILL) {
|
---|
376 | success = fuser_kill_pid_list(pids, killsig);
|
---|
377 | } else if (!(opt & FUSER_OPT_SILENT)) {
|
---|
378 | success = fuser_print_pid_list(pids);
|
---|
379 | }
|
---|
380 | }
|
---|
381 | if (ENABLE_FEATURE_CLEAN_UP) {
|
---|
382 | free(pids);
|
---|
383 | free(inodes);
|
---|
384 | }
|
---|
385 | /* return 0 on (success == 1) 1 otherwise */
|
---|
386 | return (success != 1);
|
---|
387 | }
|
---|