introduce and use bb_basename()
[oweals/busybox.git] / debianutils / run_parts.c
1 /* vi: set sw=4 ts=4: */
2 /*
3  * Mini run-parts implementation for busybox
4  *
5  * Copyright (C) 2007 Bernhard 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  *
15  * Licensed under GPL v2 or later, see file LICENSE in this tarball for details.
16  */
17
18 /* This is my first attempt to write a program in C (well, this is my first
19  * attempt to write a program! :-) . */
20
21 /* This piece of code is heavily based on the original version of run-parts,
22  * taken from debian-utils. I've only removed the long options and a the
23  * report mode. As the original run-parts support only long options, I've
24  * broken compatibility because the BusyBox policy doesn't allow them.
25  * The supported options are:
26  * -t                   test. Print the name of the files to be executed, without
27  *                              execute them.
28  * -a ARG               argument. Pass ARG as an argument the program executed. It can
29  *                              be repeated to pass multiple arguments.
30  * -u MASK              umask. Set the umask of the program executed to MASK.
31  */
32
33 #include <getopt.h>
34
35 #include "libbb.h"
36
37 #if ENABLE_FEATURE_RUN_PARTS_LONG_OPTIONS
38 static const struct option runparts_long_options[] = {
39         { "arg",        1,      NULL,   'a' },
40         { "umask",      1,      NULL,   'u' },
41         { "test",       0,      NULL,   't' },
42 #if ENABLE_FEATURE_RUN_PARTS_FANCY
43         { "list",       0,      NULL,   'l' },
44 //XXX:TODO:     { "reverse",       0,      NULL,   'r' },
45 //XXX:TODO:     { "verbose",       0,      NULL,   'v' },
46 #endif
47         { 0,            0,      0,      0   }
48 };
49 #endif
50
51 struct globals {
52         smalluint mode;
53         char *cmd[10]; /* merely arbitrary arg count */
54 };
55 #define G (*(struct globals*)&bb_common_bufsiz1)
56
57 /* valid_name */
58 /* True or false? Is this a valid filename (upper/lower alpha, digits,
59  * underscores, and hyphens only?)
60  */
61 static bool invalid_name(const char *c)
62 {
63         c = bb_basename(c);
64
65         while (*c && (isalnum(*c) || *c == '_' || *c == '-'))
66                 c++;
67
68         return *c; /* TRUE (!0) if terminating NUL is not reached */
69 }
70
71 #define RUN_PARTS_OPT_a (1<<0)
72 #define RUN_PARTS_OPT_u (1<<1)
73 #define RUN_PARTS_OPT_t (1<<2)
74 #if ENABLE_FEATURE_RUN_PARTS_FANCY
75 #define RUN_PARTS_OPT_l (1<<3)
76 #endif
77
78 #define test_mode (G.mode & RUN_PARTS_OPT_t)
79 #if ENABLE_FEATURE_RUN_PARTS_FANCY
80 #define list_mode (G.mode & RUN_PARTS_OPT_l)
81 #else
82 #define list_mode (0)
83 #endif
84
85 static int act(const char *file, struct stat *statbuf, void *args, int depth)
86 {
87         int ret;
88
89         if (depth == 1)
90                 return TRUE;
91
92         if (depth == 2 &&
93                 ((!list_mode && access(file, X_OK)) ||
94                  invalid_name(file) ||
95                  !(statbuf->st_mode & (S_IFREG | S_IFLNK))) )
96                 return SKIP;
97
98         if (test_mode || list_mode) {
99                 puts(file);
100                 return TRUE;
101         }
102         G.cmd[0] = (char*)file;
103         ret = wait4pid(spawn(G.cmd));
104         if (ret < 0) {
105                 bb_perror_msg("failed to exec %s", file);
106         } else if (ret > 0) {
107                 bb_error_msg("%s exited with return code %d", file, ret);
108         }
109         return !ret;
110 }
111
112 int run_parts_main(int argc, char **argv);
113 int run_parts_main(int argc, char **argv)
114 {
115         char *umask_p;
116         llist_t *arg_list = NULL;
117         unsigned tmp;
118
119         umask(022);
120         /* We require exactly one argument: the directory name */
121         opt_complementary = "=1:a::";
122 #if ENABLE_FEATURE_RUN_PARTS_LONG_OPTIONS
123         applet_long_options = runparts_long_options;
124 #endif
125         tmp = getopt32(argc, argv, "a:u:t"USE_FEATURE_RUN_PARTS_FANCY("l"), &arg_list, &umask_p);
126         G.mode = tmp &~ (RUN_PARTS_OPT_a|RUN_PARTS_OPT_u);
127         if (tmp & RUN_PARTS_OPT_u) {
128                 /* Check and set the umask of the program executed.
129                  * As stated in the original run-parts, the octal conversion in
130                  * libc is not foolproof; it will take the 8 and 9 digits under
131                  * some circumstances. We'll just have to live with it.
132                  */
133                 umask(xstrtoul_range(umask_p, 8, 0, 07777));
134         }
135         for (tmp = 1; arg_list; arg_list = arg_list->link, tmp++)
136                 G.cmd[tmp] = arg_list->data;
137         /* G.cmd[tmp] = NULL; - G is already zeroed out */
138         if (!recursive_action(argv[argc - 1],
139                         ACTION_RECURSE|ACTION_FOLLOWLINKS,
140                         act,            /* file action */
141                         act,            /* dir action */
142                         NULL,           /* user data */
143                         1                       /* depth */
144                         ))
145                         return EXIT_FAILURE;
146         return EXIT_SUCCESS;
147 }