addgroup: mention -S in the help text
[oweals/busybox.git] / selinux / setfiles.c
1 /*
2   setfiles: based on policycoreutils 2.0.19
3   policycoreutils was released under GPL 2.
4   Port to BusyBox (c) 2007 by Yuichi Nakamura <ynakam@hitachisoft.jp>
5 */
6
7 //usage:#define setfiles_trivial_usage
8 //usage:       "[-dnpqsvW] [-e DIR]... [-o FILE] [-r alt_root_path]"
9 //usage:        IF_FEATURE_SETFILES_CHECK_OPTION(
10 //usage:       " [-c policyfile] spec_file"
11 //usage:        )
12 //usage:       " pathname"
13 //usage:#define setfiles_full_usage "\n\n"
14 //usage:       "Reset file contexts under pathname according to spec_file\n"
15 //usage:        IF_FEATURE_SETFILES_CHECK_OPTION(
16 //usage:     "\n        -c FILE Check the validity of the contexts against the specified binary policy"
17 //usage:        )
18 //usage:     "\n        -d      Show which specification matched each file"
19 //usage:     "\n        -l      Log changes in file labels to syslog"
20 //usage:     "\n        -n      Don't change any file labels"
21 //usage:     "\n        -q      Suppress warnings"
22 //usage:     "\n        -r DIR  Use an alternate root path"
23 //usage:     "\n        -e DIR  Exclude DIR"
24 //usage:     "\n        -F      Force reset of context to match file_context for customizable files"
25 //usage:     "\n        -o FILE Save list of files with incorrect context"
26 //usage:     "\n        -s      Take a list of files from stdin (instead of command line)"
27 //usage:     "\n        -v      Show changes in file labels, if type or role are changing"
28 //usage:     "\n        -vv     Show changes in file labels, if type, role, or user are changing"
29 //usage:     "\n        -W      Display warnings about entries that had no matching files"
30 //usage:
31 //usage:#define restorecon_trivial_usage
32 //usage:       "[-iFnRv] [-e EXCLUDEDIR]... [-o FILE] [-f FILE]"
33 //usage:#define restorecon_full_usage "\n\n"
34 //usage:       "Reset security contexts of files in pathname\n"
35 //usage:     "\n        -i      Ignore files that don't exist"
36 //usage:     "\n        -f FILE File with list of files to process"
37 //usage:     "\n        -e DIR  Directory to exclude"
38 //usage:     "\n        -R,-r   Recurse"
39 //usage:     "\n        -n      Don't change any file labels"
40 //usage:     "\n        -o FILE Save list of files with incorrect context"
41 //usage:     "\n        -v      Verbose"
42 //usage:     "\n        -vv     Show changed labels"
43 //usage:     "\n        -F      Force reset of context to match file_context"
44 //usage:     "\n                for customizable files, or the user section,"
45 //usage:     "\n                if it has changed"
46
47 #include "libbb.h"
48 #if ENABLE_FEATURE_SETFILES_CHECK_OPTION
49 #include <sepol/sepol.h>
50 #endif
51
52 #define MAX_EXCLUDES 50
53
54 struct edir {
55         char *directory;
56         size_t size;
57 };
58
59 struct globals {
60         FILE *outfile;
61         char *policyfile;
62         char *rootpath;
63         int rootpathlen;
64         unsigned count;
65         int excludeCtr;
66         int errors;
67         int verbose; /* getopt32 uses it, has to be int */
68         smallint recurse; /* Recursive descent */
69         smallint follow_mounts;
70         /* Behavior flags determined based on setfiles vs. restorecon */
71         smallint expand_realpath;  /* Expand paths via realpath */
72         smallint abort_on_error; /* Abort the file tree walk upon an error */
73         int add_assoc; /* Track inode associations for conflict detection */
74         int matchpathcon_flags; /* Flags to matchpathcon */
75         dev_t dev_id; /* Device id where target file exists */
76         int nerr;
77         struct edir excludeArray[MAX_EXCLUDES];
78 } FIX_ALIASING;
79 #define G (*(struct globals*)&bb_common_bufsiz1)
80 void BUG_setfiles_globals_too_big(void);
81 #define INIT_G() do { \
82         if (sizeof(G) > COMMON_BUFSIZE) \
83                 BUG_setfiles_globals_too_big(); \
84         /* memset(&G, 0, sizeof(G)); - already is */ \
85 } while (0)
86 #define outfile            (G.outfile           )
87 #define policyfile         (G.policyfile        )
88 #define rootpath           (G.rootpath          )
89 #define rootpathlen        (G.rootpathlen       )
90 #define count              (G.count             )
91 #define excludeCtr         (G.excludeCtr        )
92 #define errors             (G.errors            )
93 #define verbose            (G.verbose           )
94 #define recurse            (G.recurse           )
95 #define follow_mounts      (G.follow_mounts     )
96 #define expand_realpath    (G.expand_realpath   )
97 #define abort_on_error     (G.abort_on_error    )
98 #define add_assoc          (G.add_assoc         )
99 #define matchpathcon_flags (G.matchpathcon_flags)
100 #define dev_id             (G.dev_id            )
101 #define nerr               (G.nerr              )
102 #define excludeArray       (G.excludeArray      )
103
104 /* Must match getopt32 string! */
105 enum {
106         OPT_d = (1 << 0),
107         OPT_e = (1 << 1),
108         OPT_f = (1 << 2),
109         OPT_i = (1 << 3),
110         OPT_l = (1 << 4),
111         OPT_n = (1 << 5),
112         OPT_p = (1 << 6),
113         OPT_q = (1 << 7),
114         OPT_r = (1 << 8),
115         OPT_s = (1 << 9),
116         OPT_v = (1 << 10),
117         OPT_o = (1 << 11),
118         OPT_F = (1 << 12),
119         OPT_W = (1 << 13),
120         OPT_c = (1 << 14), /* c only for setfiles */
121         OPT_R = (1 << 14), /* R only for restorecon */
122 };
123 #define FLAG_d_debug         (option_mask32 & OPT_d)
124 #define FLAG_e               (option_mask32 & OPT_e)
125 #define FLAG_f               (option_mask32 & OPT_f)
126 #define FLAG_i_ignore_enoent (option_mask32 & OPT_i)
127 #define FLAG_l_take_log      (option_mask32 & OPT_l)
128 #define FLAG_n_dry_run       (option_mask32 & OPT_n)
129 #define FLAG_p_progress      (option_mask32 & OPT_p)
130 #define FLAG_q_quiet         (option_mask32 & OPT_q)
131 #define FLAG_r               (option_mask32 & OPT_r)
132 #define FLAG_s               (option_mask32 & OPT_s)
133 #define FLAG_v               (option_mask32 & OPT_v)
134 #define FLAG_o               (option_mask32 & OPT_o)
135 #define FLAG_F_force         (option_mask32 & OPT_F)
136 #define FLAG_W_warn_no_match (option_mask32 & OPT_W)
137 #define FLAG_c               (option_mask32 & OPT_c)
138 #define FLAG_R               (option_mask32 & OPT_R)
139
140
141 static void qprintf(const char *fmt UNUSED_PARAM, ...)
142 {
143         /* quiet, do nothing */
144 }
145
146 static void inc_err(void)
147 {
148         nerr++;
149         if (nerr > 9 && !FLAG_d_debug) {
150                 bb_error_msg_and_die("exiting after 10 errors");
151         }
152 }
153
154 static void add_exclude(const char *directory)
155 {
156         struct stat sb;
157         size_t len;
158
159         if (directory == NULL || directory[0] != '/') {
160                 bb_error_msg_and_die("full path required for exclude: %s", directory);
161         }
162         if (lstat(directory, &sb)) {
163                 bb_error_msg("directory \"%s\" not found, ignoring", directory);
164                 return;
165         }
166         if ((sb.st_mode & S_IFDIR) == 0) {
167                 bb_error_msg("\"%s\" is not a directory: mode %o, ignoring",
168                         directory, sb.st_mode);
169                 return;
170         }
171         if (excludeCtr == MAX_EXCLUDES) {
172                 bb_error_msg_and_die("maximum excludes %d exceeded", MAX_EXCLUDES);
173         }
174
175         len = strlen(directory);
176         while (len > 1 && directory[len - 1] == '/') {
177                 len--;
178         }
179         excludeArray[excludeCtr].directory = xstrndup(directory, len);
180         excludeArray[excludeCtr++].size = len;
181 }
182
183 static bool exclude(const char *file)
184 {
185         int i = 0;
186         for (i = 0; i < excludeCtr; i++) {
187                 if (strncmp(file, excludeArray[i].directory,
188                                         excludeArray[i].size) == 0) {
189                         if (file[excludeArray[i].size] == '\0'
190                          || file[excludeArray[i].size] == '/') {
191                                 return 1;
192                         }
193                 }
194         }
195         return 0;
196 }
197
198 static int match(const char *name, struct stat *sb, char **con)
199 {
200         int ret;
201         char path[PATH_MAX + 1];
202         char *tmp_path = xstrdup(name);
203
204         if (excludeCtr > 0 && exclude(name)) {
205                 goto err;
206         }
207         ret = lstat(name, sb);
208         if (ret) {
209                 if (FLAG_i_ignore_enoent && errno == ENOENT) {
210                         free(tmp_path);
211                         return 0;
212                 }
213                 bb_error_msg("stat(%s)", name);
214                 goto err;
215         }
216
217         if (expand_realpath) {
218                 if (S_ISLNK(sb->st_mode)) {
219                         char *p = NULL;
220                         char *file_sep;
221
222                         size_t len = 0;
223
224                         if (verbose > 1)
225                                 bb_error_msg("warning! %s refers to a symbolic link, not following last component", name);
226
227                         file_sep = strrchr(tmp_path, '/');
228                         if (file_sep == tmp_path) {
229                                 file_sep++;
230                                 path[0] = '\0';
231                                 p = path;
232                         } else if (file_sep) {
233                                 *file_sep++ = '\0';
234                                 p = realpath(tmp_path, path);
235                         } else {
236                                 file_sep = tmp_path;
237                                 p = realpath("./", path);
238                         }
239                         if (p)
240                                 len = strlen(p);
241                         if (!p || len + strlen(file_sep) + 2 > PATH_MAX) {
242                                 bb_perror_msg("realpath(%s) failed", name);
243                                 goto err;
244                         }
245                         p += len;
246                         /* ensure trailing slash of directory name */
247                         if (len == 0 || p[-1] != '/') {
248                                 *p++ = '/';
249                         }
250                         strcpy(p, file_sep);
251                         name = path;
252                         if (excludeCtr > 0 && exclude(name))
253                                 goto err;
254
255                 } else {
256                         char *p;
257                         p = realpath(name, path);
258                         if (!p) {
259                                 bb_perror_msg("realpath(%s)", name);
260                                 goto err;
261                         }
262                         name = p;
263                         if (excludeCtr > 0 && exclude(name))
264                                 goto err;
265                 }
266         }
267
268         /* name will be what is matched in the policy */
269         if (NULL != rootpath) {
270                 if (0 != strncmp(rootpath, name, rootpathlen)) {
271                         bb_error_msg("%s is not located in %s",
272                                 name, rootpath);
273                         goto err;
274                 }
275                 name += rootpathlen;
276         }
277
278         free(tmp_path);
279         if (rootpath != NULL && name[0] == '\0')
280                 /* this is actually the root dir of the alt root */
281                 return matchpathcon_index("/", sb->st_mode, con);
282         return matchpathcon_index(name, sb->st_mode, con);
283  err:
284         free(tmp_path);
285         return -1;
286 }
287
288 /* Compare two contexts to see if their differences are "significant",
289  * or whether the only difference is in the user. */
290 static bool only_changed_user(const char *a, const char *b)
291 {
292         if (FLAG_F_force)
293                 return 0;
294         if (!a || !b)
295                 return 0;
296         a = strchr(a, ':'); /* Rest of the context after the user */
297         b = strchr(b, ':');
298         if (!a || !b)
299                 return 0;
300         return (strcmp(a, b) == 0);
301 }
302
303 static int restore(const char *file)
304 {
305         char *my_file;
306         struct stat my_sb;
307         int i, j, ret;
308         char *context = NULL;
309         char *newcon = NULL;
310         bool user_only_changed = 0;
311         int retval = 0;
312
313         my_file = bb_simplify_path(file);
314
315         i = match(my_file, &my_sb, &newcon);
316
317         if (i < 0) /* No matching specification. */
318                 goto out;
319
320         if (FLAG_p_progress) {
321                 count++;
322                 if (count % 0x400 == 0) { /* every 1024 times */
323                         count = (count % (80*0x400));
324                         if (count == 0)
325                                 bb_putchar('\n');
326                         bb_putchar('*');
327                         fflush_all();
328                 }
329         }
330
331         /*
332          * Try to add an association between this inode and
333          * this specification. If there is already an association
334          * for this inode and it conflicts with this specification,
335          * then use the last matching specification.
336          */
337         if (add_assoc) {
338                 j = matchpathcon_filespec_add(my_sb.st_ino, i, my_file);
339                 if (j < 0)
340                         goto err;
341
342                 if (j != i) {
343                         /* There was already an association and it took precedence. */
344                         goto out;
345                 }
346         }
347
348         if (FLAG_d_debug)
349                 printf("%s: %s matched by %s\n", applet_name, my_file, newcon);
350
351         /* Get the current context of the file. */
352         ret = lgetfilecon_raw(my_file, &context);
353         if (ret < 0) {
354                 if (errno == ENODATA) {
355                         context = NULL; /* paranoia */
356                 } else {
357                         bb_perror_msg("lgetfilecon_raw on %s", my_file);
358                         goto err;
359                 }
360                 user_only_changed = 0;
361         } else
362                 user_only_changed = only_changed_user(context, newcon);
363
364         /*
365          * Do not relabel the file if the matching specification is
366          * <<none>> or the file is already labeled according to the
367          * specification.
368          */
369         if ((strcmp(newcon, "<<none>>") == 0)
370          || (context && (strcmp(context, newcon) == 0) && !FLAG_F_force)) {
371                 goto out;
372         }
373
374         if (!FLAG_F_force && context && (is_context_customizable(context) > 0)) {
375                 if (verbose > 1) {
376                         bb_error_msg("skipping %s. %s is customizable_types",
377                                 my_file, context);
378                 }
379                 goto out;
380         }
381
382         if (verbose) {
383                 /* If we're just doing "-v", trim out any relabels where
384                  * the user has changed but the role and type are the
385                  * same.  For "-vv", emit everything. */
386                 if (verbose > 1 || !user_only_changed) {
387                         bb_info_msg("%s: reset %s context %s->%s",
388                                 applet_name, my_file, context ? context : "", newcon);
389                 }
390         }
391
392         if (FLAG_l_take_log && !user_only_changed) {
393                 if (context)
394                         bb_info_msg("relabeling %s from %s to %s", my_file, context, newcon);
395                 else
396                         bb_info_msg("labeling %s to %s", my_file, newcon);
397         }
398
399         if (outfile && !user_only_changed)
400                 fprintf(outfile, "%s\n", my_file);
401
402         /*
403          * Do not relabel the file if -n was used.
404          */
405         if (FLAG_n_dry_run || user_only_changed)
406                 goto out;
407
408         /*
409          * Relabel the file to the specified context.
410          */
411         ret = lsetfilecon(my_file, newcon);
412         if (ret) {
413                 bb_perror_msg("lsetfileconon(%s,%s)", my_file, newcon);
414                 goto err;
415         }
416
417  out:
418         freecon(context);
419         freecon(newcon);
420         free(my_file);
421         return retval;
422  err:
423         retval--; /* -1 */
424         goto out;
425 }
426
427 /*
428  * Apply the last matching specification to a file.
429  * This function is called by recursive_action on each file during
430  * the directory traversal.
431  */
432 static int FAST_FUNC apply_spec(
433                 const char *file,
434                 struct stat *sb,
435                 void *userData UNUSED_PARAM,
436                 int depth UNUSED_PARAM)
437 {
438         if (!follow_mounts) {
439                 /* setfiles does not process across different mount points */
440                 if (sb->st_dev != dev_id) {
441                         return SKIP;
442                 }
443         }
444         errors |= restore(file);
445         if (abort_on_error && errors)
446                 return FALSE;
447         return TRUE;
448 }
449
450
451 static int canoncon(const char *path, unsigned lineno, char **contextp)
452 {
453         static const char err_msg[] ALIGN1 = "%s: line %u has invalid context %s";
454
455         char *tmpcon;
456         char *context = *contextp;
457         int invalid = 0;
458
459 #if ENABLE_FEATURE_SETFILES_CHECK_OPTION
460         if (policyfile) {
461                 if (sepol_check_context(context) >= 0)
462                         return 0;
463                 /* Exit immediately if we're in checking mode. */
464                 bb_error_msg_and_die(err_msg, path, lineno, context);
465         }
466 #endif
467
468         if (security_canonicalize_context_raw(context, &tmpcon) < 0) {
469                 if (errno != ENOENT) {
470                         invalid = 1;
471                         inc_err();
472                 }
473         } else {
474                 free(context);
475                 *contextp = tmpcon;
476         }
477
478         if (invalid) {
479                 bb_error_msg(err_msg, path, lineno, context);
480         }
481
482         return invalid;
483 }
484
485 static int process_one(char *name)
486 {
487         struct stat sb;
488         int rc;
489
490         rc = lstat(name, &sb);
491         if (rc < 0) {
492                 if (FLAG_i_ignore_enoent && errno == ENOENT)
493                         return 0;
494                 bb_perror_msg("stat(%s)", name);
495                 goto err;
496         }
497         dev_id = sb.st_dev;
498
499         if (S_ISDIR(sb.st_mode) && recurse) {
500                 if (recursive_action(name,
501                                 ACTION_RECURSE,
502                                 apply_spec,
503                                 apply_spec,
504                                 NULL, 0) != TRUE
505                 ) {
506                         bb_error_msg("error while labeling %s", name);
507                         goto err;
508                 }
509         } else {
510                 rc = restore(name);
511                 if (rc)
512                         goto err;
513         }
514
515  out:
516         if (add_assoc) {
517                 if (FLAG_q_quiet)
518                         set_matchpathcon_printf(&qprintf);
519                 matchpathcon_filespec_eval();
520                 set_matchpathcon_printf(NULL);
521                 matchpathcon_filespec_destroy();
522         }
523
524         return rc;
525
526  err:
527         rc = -1;
528         goto out;
529 }
530
531 int setfiles_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
532 int setfiles_main(int argc UNUSED_PARAM, char **argv)
533 {
534         struct stat sb;
535         int rc, i = 0;
536         const char *input_filename = NULL;
537         char *buf = NULL;
538         size_t buf_len;
539         int flags;
540         llist_t *exclude_dir = NULL;
541         char *out_filename = NULL;
542
543         INIT_G();
544
545         if (applet_name[0] == 's') { /* "setfiles" */
546                 /*
547                  * setfiles:
548                  * Recursive descent,
549                  * Does not expand paths via realpath,
550                  * Aborts on errors during the file tree walk,
551                  * Try to track inode associations for conflict detection,
552                  * Does not follow mounts,
553                  * Validates all file contexts at init time.
554                  */
555                 recurse = 1;
556                 abort_on_error = 1;
557                 add_assoc = 1;
558                 /* follow_mounts = 0; - already is */
559                 matchpathcon_flags = MATCHPATHCON_VALIDATE | MATCHPATHCON_NOTRANS;
560         } else {
561                 /*
562                  * restorecon:
563                  * No recursive descent unless -r/-R,
564                  * Expands paths via realpath,
565                  * Do not abort on errors during the file tree walk,
566                  * Do not try to track inode associations for conflict detection,
567                  * Follows mounts,
568                  * Does lazy validation of contexts upon use.
569                  */
570                 expand_realpath = 1;
571                 follow_mounts = 1;
572                 matchpathcon_flags = MATCHPATHCON_NOTRANS;
573                 /* restorecon only */
574                 selinux_or_die();
575         }
576
577         set_matchpathcon_flags(matchpathcon_flags);
578
579         opt_complementary = "e::vv:v--p:p--v:v--q:q--v";
580         /* Option order must match OPT_x definitions! */
581         if (applet_name[0] == 'r') { /* restorecon */
582                 flags = getopt32(argv, "de:f:ilnpqrsvo:FWR",
583                         &exclude_dir, &input_filename, &out_filename, &verbose);
584         } else { /* setfiles */
585                 flags = getopt32(argv, "de:f:ilnpqr:svo:FW"
586                                 IF_FEATURE_SETFILES_CHECK_OPTION("c:"),
587                         &exclude_dir, &input_filename, &rootpath, &out_filename,
588                                 IF_FEATURE_SETFILES_CHECK_OPTION(&policyfile,)
589                         &verbose);
590         }
591         argv += optind;
592
593 #if ENABLE_FEATURE_SETFILES_CHECK_OPTION
594         if ((applet_name[0] == 's') && (flags & OPT_c)) {
595                 FILE *policystream;
596
597                 policystream = xfopen_for_read(policyfile);
598                 if (sepol_set_policydb_from_file(policystream) < 0) {
599                         bb_error_msg_and_die("sepol_set_policydb_from_file on %s", policyfile);
600                 }
601                 fclose(policystream);
602
603                 /* Only process the specified file_contexts file, not
604                  * any .homedirs or .local files, and do not perform
605                  * context translations. */
606                 set_matchpathcon_flags(MATCHPATHCON_BASEONLY |
607                                        MATCHPATHCON_NOTRANS |
608                                        MATCHPATHCON_VALIDATE);
609         }
610 #endif
611
612         while (exclude_dir)
613                 add_exclude(llist_pop(&exclude_dir));
614
615         if (flags & OPT_o) {
616                 outfile = stdout;
617                 if (NOT_LONE_CHAR(out_filename, '-')) {
618                         outfile = xfopen_for_write(out_filename);
619                 }
620         }
621         if (applet_name[0] == 'r') { /* restorecon */
622                 if (flags & (OPT_r | OPT_R))
623                         recurse = 1;
624         } else { /* setfiles */
625                 if (flags & OPT_r)
626                         rootpathlen = strlen(rootpath);
627         }
628         if (flags & OPT_s) {
629                 input_filename = "-";
630                 add_assoc = 0;
631         }
632
633         if (applet_name[0] == 's') { /* setfiles */
634                 /* Use our own invalid context checking function so that
635                  * we can support either checking against the active policy or
636                  * checking against a binary policy file. */
637                 set_matchpathcon_canoncon(&canoncon);
638                 if (!argv[0])
639                         bb_show_usage();
640                 xstat(argv[0], &sb);
641                 if (!S_ISREG(sb.st_mode)) {
642                         bb_error_msg_and_die("spec file %s is not a regular file", argv[0]);
643                 }
644                 /* Load the file contexts configuration and check it. */
645                 rc = matchpathcon_init(argv[0]);
646                 if (rc < 0) {
647                         bb_simple_perror_msg_and_die(argv[0]);
648                 }
649                 if (nerr)
650                         exit(EXIT_FAILURE);
651                 argv++;
652         }
653
654         if (input_filename) {
655                 ssize_t len;
656                 FILE *f = stdin;
657
658                 if (NOT_LONE_CHAR(input_filename, '-'))
659                         f = xfopen_for_read(input_filename);
660                 while ((len = getline(&buf, &buf_len, f)) > 0) {
661                         buf[len - 1] = '\0';
662                         errors |= process_one(buf);
663                 }
664                 if (ENABLE_FEATURE_CLEAN_UP)
665                         fclose_if_not_stdin(f);
666         } else {
667                 if (!argv[0])
668                         bb_show_usage();
669                 for (i = 0; argv[i]; i++) {
670                         errors |= process_one(argv[i]);
671                 }
672         }
673
674         if (FLAG_W_warn_no_match)
675                 matchpathcon_checkmatches(argv[0]);
676
677         if (ENABLE_FEATURE_CLEAN_UP && outfile)
678                 fclose(outfile);
679
680         return errors;
681 }