| /* vi: set sw=4 ts=4: */ |
| /* |
| * run command from specified directory |
| * |
| * |
| * Copyright (C) 2001 by Emanuele Aina <emanuele.aina@tiscali.it> |
| * rewrite to vfork usage by |
| * Copyright (C) 2002 by Vladimir Oleynik <dzo@simtreas.ru> |
| * |
| * Licensed under GPLv2 or later, see file LICENSE in this tarball for details. |
| */ |
| |
| |
| #include <sys/types.h> |
| #include <sys/wait.h> |
| #include <stdlib.h> |
| #include <dirent.h> |
| #include <unistd.h> |
| #include <ctype.h> |
| #include <errno.h> |
| |
| #include "libbb.h" |
| |
| /* valid_name */ |
| /* True or false? Is this a valid filename (upper/lower alpha, digits, |
| * underscores, and hyphens only?) |
| */ |
| static int valid_name(const struct dirent *d) |
| { |
| const char *c = d->d_name; |
| |
| while (*c) { |
| if (!isalnum(*c) && (*c != '_') && (*c != '-')) { |
| return 0; |
| } |
| ++c; |
| } |
| return 1; |
| } |
| |
| /* test mode = 1 is the same as official run_parts |
| * test_mode = 2 means to fail silently on missing directories |
| */ |
| |
| int run_parts(char **args, const unsigned char test_mode, char **env) |
| { |
| struct dirent **namelist = 0; |
| struct stat st; |
| char *filename; |
| char *arg0 = args[0]; |
| int entries; |
| int i; |
| int exitstatus = 0; |
| |
| #if __GNUC__ |
| /* Avoid longjmp clobbering */ |
| (void) &i; |
| (void) &exitstatus; |
| #endif |
| /* scandir() isn't POSIX, but it makes things easy. */ |
| entries = scandir(arg0, &namelist, valid_name, alphasort); |
| |
| if (entries == -1) { |
| if (test_mode & 2) { |
| return(2); |
| } |
| bb_perror_msg_and_die("cannot open '%s'", arg0); |
| } |
| |
| for (i = 0; i < entries; i++) { |
| |
| filename = concat_path_file(arg0, namelist[i]->d_name); |
| |
| xstat(filename, &st); |
| if (S_ISREG(st.st_mode) && !access(filename, X_OK)) { |
| if (test_mode) { |
| puts(filename); |
| } else { |
| /* exec_errno is common vfork variable */ |
| volatile int exec_errno = 0; |
| int result; |
| int pid; |
| |
| if ((pid = vfork()) < 0) { |
| bb_perror_msg_and_die("failed to fork"); |
| } else if (!pid) { |
| args[0] = filename; |
| execve(filename, args, env); |
| exec_errno = errno; |
| _exit(1); |
| } |
| |
| waitpid(pid, &result, 0); |
| if(exec_errno) { |
| errno = exec_errno; |
| bb_perror_msg("failed to exec %s", filename); |
| exitstatus = 1; |
| } |
| if (WIFEXITED(result) && WEXITSTATUS(result)) { |
| bb_perror_msg("%s exited with return code %d", filename, WEXITSTATUS(result)); |
| exitstatus = 1; |
| } else if (WIFSIGNALED(result)) { |
| bb_perror_msg("%s exited because of uncaught signal %d", filename, WTERMSIG(result)); |
| exitstatus = 1; |
| } |
| } |
| } |
| else if (!S_ISDIR(st.st_mode)) { |
| bb_error_msg("component %s is not an executable plain file", filename); |
| exitstatus = 1; |
| } |
| |
| free(namelist[i]); |
| free(filename); |
| } |
| free(namelist); |
| |
| return(exitstatus); |
| } |