blob: 0bb666abc9a234d18a37c71ec27fe3aa7297e352
1 | /* vi: set sw=4 ts=4: */ |
2 | /* |
3 | * Mini run-parts implementation for busybox |
4 | * |
5 | * Copyright (C) 2007 Bernhard Reutner-Fischer |
6 | * |
7 | * Based on a older version that was in busybox which was 1k big. |
8 | * Copyright (C) 2001 by Emanuele Aina <emanuele.aina@tiscali.it> |
9 | * |
10 | * Based on the Debian run-parts program, version 1.15 |
11 | * Copyright (C) 1996 Jeff Noxon <jeff@router.patch.net>, |
12 | * Copyright (C) 1996-1999 Guy Maor <maor@debian.org> |
13 | * |
14 | * Licensed under GPLv2 or later, see file LICENSE in this source tree. |
15 | */ |
16 | |
17 | /* This is my first attempt to write a program in C (well, this is my first |
18 | * attempt to write a program! :-) . */ |
19 | |
20 | /* This piece of code is heavily based on the original version of run-parts, |
21 | * taken from debian-utils. I've only removed the long options and the |
22 | * report mode. As the original run-parts support only long options, I've |
23 | * broken compatibility because the BusyBox policy doesn't allow them. |
24 | */ |
25 | //config:config RUN_PARTS |
26 | //config: bool "run-parts" |
27 | //config: default y |
28 | //config: help |
29 | //config: run-parts is a utility designed to run all the scripts in a directory. |
30 | //config: |
31 | //config: It is useful to set up a directory like cron.daily, where you need to |
32 | //config: execute all the scripts in that directory. |
33 | //config: |
34 | //config: In this implementation of run-parts some features (such as report |
35 | //config: mode) are not implemented. |
36 | //config: |
37 | //config: Unless you know that run-parts is used in some of your scripts |
38 | //config: you can safely say N here. |
39 | //config: |
40 | //config:config FEATURE_RUN_PARTS_LONG_OPTIONS |
41 | //config: bool "Enable long options" |
42 | //config: default y |
43 | //config: depends on RUN_PARTS && LONG_OPTS |
44 | //config: help |
45 | //config: Support long options for the run-parts applet. |
46 | //config: |
47 | //config:config FEATURE_RUN_PARTS_FANCY |
48 | //config: bool "Support additional arguments" |
49 | //config: default y |
50 | //config: depends on RUN_PARTS |
51 | //config: help |
52 | //config: Support additional options: |
53 | //config: -l --list print the names of the all matching files (not |
54 | //config: limited to executables), but don't actually run them. |
55 | |
56 | //applet:IF_RUN_PARTS(APPLET_ODDNAME(run-parts, run_parts, BB_DIR_BIN, BB_SUID_DROP, run_parts)) |
57 | |
58 | //kbuild:lib-$(CONFIG_RUN_PARTS) += run_parts.o |
59 | |
60 | //usage:#define run_parts_trivial_usage |
61 | //usage: "[-a ARG]... [-u UMASK] " |
62 | //usage: IF_FEATURE_RUN_PARTS_LONG_OPTIONS("[--reverse] [--test] [--exit-on-error] "IF_FEATURE_RUN_PARTS_FANCY("[--list] ")) |
63 | //usage: "DIRECTORY" |
64 | //usage:#define run_parts_full_usage "\n\n" |
65 | //usage: "Run a bunch of scripts in DIRECTORY\n" |
66 | //usage: "\n -a ARG Pass ARG as argument to scripts" |
67 | //usage: "\n -u UMASK Set UMASK before running scripts" |
68 | //usage: IF_FEATURE_RUN_PARTS_LONG_OPTIONS( |
69 | //usage: "\n --reverse Reverse execution order" |
70 | //usage: "\n --test Dry run" |
71 | //usage: "\n --exit-on-error Exit if a script exits with non-zero" |
72 | //usage: IF_FEATURE_RUN_PARTS_FANCY( |
73 | //usage: "\n --list Print names of matching files even if they are not executable" |
74 | //usage: ) |
75 | //usage: ) |
76 | //usage: |
77 | //usage:#define run_parts_example_usage |
78 | //usage: "$ run-parts -a start /etc/init.d\n" |
79 | //usage: "$ run-parts -a stop=now /etc/init.d\n\n" |
80 | //usage: "Let's assume you have a script foo/dosomething:\n" |
81 | //usage: "#!/bin/sh\n" |
82 | //usage: "for i in $*; do eval $i; done; unset i\n" |
83 | //usage: "case \"$1\" in\n" |
84 | //usage: "start*) echo starting something;;\n" |
85 | //usage: "stop*) set -x; shutdown -h $stop;;\n" |
86 | //usage: "esac\n\n" |
87 | //usage: "Running this yields:\n" |
88 | //usage: "$run-parts -a stop=+4m foo/\n" |
89 | //usage: "+ shutdown -h +4m" |
90 | |
91 | #include "libbb.h" |
92 | #include "common_bufsiz.h" |
93 | |
94 | struct globals { |
95 | char **names; |
96 | int cur; |
97 | char *cmd[2 /* using 1 provokes compiler warning */]; |
98 | } FIX_ALIASING; |
99 | #define G (*(struct globals*)bb_common_bufsiz1) |
100 | #define names (G.names) |
101 | #define cur (G.cur ) |
102 | #define cmd (G.cmd ) |
103 | #define INIT_G() do { setup_common_bufsiz(); } while (0) |
104 | |
105 | enum { NUM_CMD = (COMMON_BUFSIZE - sizeof(G)) / sizeof(cmd[0]) - 1 }; |
106 | |
107 | enum { |
108 | OPT_a = (1 << 0), |
109 | OPT_u = (1 << 1), |
110 | OPT_r = (1 << 2) * ENABLE_FEATURE_RUN_PARTS_LONG_OPTIONS, |
111 | OPT_t = (1 << 3) * ENABLE_FEATURE_RUN_PARTS_LONG_OPTIONS, |
112 | OPT_e = (1 << 4) * ENABLE_FEATURE_RUN_PARTS_LONG_OPTIONS, |
113 | OPT_l = (1 << 5) * ENABLE_FEATURE_RUN_PARTS_LONG_OPTIONS |
114 | * ENABLE_FEATURE_RUN_PARTS_FANCY, |
115 | }; |
116 | |
117 | /* Is this a valid filename (upper/lower alpha, digits, |
118 | * underscores, and hyphens only?) |
119 | */ |
120 | static bool invalid_name(const char *c) |
121 | { |
122 | c = bb_basename(c); |
123 | |
124 | while (*c && (isalnum(*c) || *c == '_' || *c == '-')) |
125 | c++; |
126 | |
127 | return *c; /* TRUE (!0) if terminating NUL is not reached */ |
128 | } |
129 | |
130 | static int bb_alphasort(const void *p1, const void *p2) |
131 | { |
132 | int r = strcmp(*(char **) p1, *(char **) p2); |
133 | return (option_mask32 & OPT_r) ? -r : r; |
134 | } |
135 | |
136 | static int FAST_FUNC act(const char *file, struct stat *statbuf, void *args UNUSED_PARAM, int depth) |
137 | { |
138 | if (depth == 1) |
139 | return TRUE; |
140 | |
141 | if (depth == 2 |
142 | && ( !(statbuf->st_mode & (S_IFREG | S_IFLNK)) |
143 | || invalid_name(file) |
144 | || (!(option_mask32 & OPT_l) && access(file, X_OK) != 0)) |
145 | ) { |
146 | return SKIP; |
147 | } |
148 | |
149 | names = xrealloc_vector(names, 4, cur); |
150 | names[cur++] = xstrdup(file); |
151 | /*names[cur] = NULL; - xrealloc_vector did it */ |
152 | |
153 | return TRUE; |
154 | } |
155 | |
156 | #if ENABLE_FEATURE_RUN_PARTS_LONG_OPTIONS |
157 | static const char runparts_longopts[] ALIGN1 = |
158 | "arg\0" Required_argument "a" |
159 | "umask\0" Required_argument "u" |
160 | //TODO: "verbose\0" No_argument "v" |
161 | "reverse\0" No_argument "\xf0" |
162 | "test\0" No_argument "\xf1" |
163 | "exit-on-error\0" No_argument "\xf2" |
164 | #if ENABLE_FEATURE_RUN_PARTS_FANCY |
165 | "list\0" No_argument "\xf3" |
166 | #endif |
167 | ; |
168 | #endif |
169 | |
170 | int run_parts_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE; |
171 | int run_parts_main(int argc UNUSED_PARAM, char **argv) |
172 | { |
173 | const char *umask_p = "22"; |
174 | llist_t *arg_list = NULL; |
175 | unsigned n; |
176 | int ret; |
177 | |
178 | INIT_G(); |
179 | |
180 | #if ENABLE_FEATURE_RUN_PARTS_LONG_OPTIONS |
181 | applet_long_options = runparts_longopts; |
182 | #endif |
183 | /* We require exactly one argument: the directory name */ |
184 | opt_complementary = "=1"; |
185 | getopt32(argv, "a:*u:", &arg_list, &umask_p); |
186 | |
187 | umask(xstrtou_range(umask_p, 8, 0, 07777)); |
188 | |
189 | n = 1; |
190 | while (arg_list && n < NUM_CMD) { |
191 | cmd[n++] = llist_pop(&arg_list); |
192 | } |
193 | /* cmd[n] = NULL; - is already zeroed out */ |
194 | |
195 | /* run-parts has to sort executables by name before running them */ |
196 | |
197 | recursive_action(argv[optind], |
198 | ACTION_RECURSE|ACTION_FOLLOWLINKS, |
199 | act, /* file action */ |
200 | act, /* dir action */ |
201 | NULL, /* user data */ |
202 | 1 /* depth */ |
203 | ); |
204 | |
205 | if (!names) |
206 | return 0; |
207 | |
208 | qsort(names, cur, sizeof(char *), bb_alphasort); |
209 | |
210 | n = 0; |
211 | while (1) { |
212 | char *name = *names++; |
213 | if (!name) |
214 | break; |
215 | if (option_mask32 & (OPT_t | OPT_l)) { |
216 | puts(name); |
217 | continue; |
218 | } |
219 | cmd[0] = name; |
220 | ret = spawn_and_wait(cmd); |
221 | if (ret == 0) |
222 | continue; |
223 | n = 1; |
224 | if (ret < 0) |
225 | bb_perror_msg("can't execute '%s'", name); |
226 | else /* ret > 0 */ |
227 | bb_error_msg("%s: exit status %u", name, ret & 0xff); |
228 | |
229 | if (option_mask32 & OPT_e) |
230 | xfunc_die(); |
231 | } |
232 | |
233 | return n; |
234 | } |
235 |