]> git.ipfire.org Git - thirdparty/systemd.git/blob - src/tmpfiles/tmpfiles.c
projects / thirdparty / systemd.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
tree-wide: adjust fall through comments so that gcc is happy
[thirdparty/systemd.git] / src / tmpfiles / tmpfiles.c
1 /* SPDX-License-Identifier: LGPL-2.1+ */
2 /***
3 This file is part of systemd.
4
5 Copyright 2010 Lennart Poettering, Kay Sievers
6 Copyright 2015 Zbigniew Jędrzejewski-Szmek
7
8 systemd is free software; you can redistribute it and/or modify it
9 under the terms of the GNU Lesser General Public License as published by
10 the Free Software Foundation; either version 2.1 of the License, or
11 (at your option) any later version.
12
13 systemd is distributed in the hope that it will be useful, but
14 WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 Lesser General Public License for more details.
17
18 You should have received a copy of the GNU Lesser General Public License
19 along with systemd; If not, see <http://www.gnu.org/licenses/>.
20 ***/
21
22 #include <errno.h>
23 #include <fcntl.h>
24 #include <fnmatch.h>
25 #include <getopt.h>
26 #include <glob.h>
27 #include <limits.h>
28 #include <linux/fs.h>
29 #include <stdbool.h>
30 #include <stddef.h>
31 #include <stdio.h>
32 #include <stdlib.h>
33 #include <string.h>
34 #include <sys/stat.h>
35 #include <sys/xattr.h>
36 #include <time.h>
37 #include <unistd.h>
38
39 #include "acl-util.h"
40 #include "alloc-util.h"
41 #include "btrfs-util.h"
42 #include "capability-util.h"
43 #include "chattr-util.h"
44 #include "conf-files.h"
45 #include "copy.h"
46 #include "def.h"
47 #include "dirent-util.h"
48 #include "escape.h"
49 #include "fd-util.h"
50 #include "fileio.h"
51 #include "format-util.h"
52 #include "fs-util.h"
53 #include "glob-util.h"
54 #include "io-util.h"
55 #include "label.h"
56 #include "log.h"
57 #include "macro.h"
58 #include "missing.h"
59 #include "mkdir.h"
60 #include "mount-util.h"
61 #include "parse-util.h"
62 #include "path-util.h"
63 #include "rm-rf.h"
64 #include "selinux-util.h"
65 #include "set.h"
66 #include "specifier.h"
67 #include "stat-util.h"
68 #include "stdio-util.h"
69 #include "string-table.h"
70 #include "string-util.h"
71 #include "strv.h"
72 #include "umask-util.h"
73 #include "user-util.h"
74 #include "util.h"
75
76 /* This reads all files listed in /etc/tmpfiles.d/?*.conf and creates
77 * them in the file system. This is intended to be used to create
78 * properly owned directories beneath /tmp, /var/tmp, /run, which are
79 * volatile and hence need to be recreated on bootup. */
80
81 typedef enum ItemType {
82 /* These ones take file names */
83 CREATE_FILE = 'f',
84 TRUNCATE_FILE = 'F',
85 CREATE_DIRECTORY = 'd',
86 TRUNCATE_DIRECTORY = 'D',
87 CREATE_SUBVOLUME = 'v',
88 CREATE_SUBVOLUME_INHERIT_QUOTA = 'q',
89 CREATE_SUBVOLUME_NEW_QUOTA = 'Q',
90 CREATE_FIFO = 'p',
91 CREATE_SYMLINK = 'L',
92 CREATE_CHAR_DEVICE = 'c',
93 CREATE_BLOCK_DEVICE = 'b',
94 COPY_FILES = 'C',
95
96 /* These ones take globs */
97 WRITE_FILE = 'w',
98 EMPTY_DIRECTORY = 'e',
99 SET_XATTR = 't',
100 RECURSIVE_SET_XATTR = 'T',
101 SET_ACL = 'a',
102 RECURSIVE_SET_ACL = 'A',
103 SET_ATTRIBUTE = 'h',
104 RECURSIVE_SET_ATTRIBUTE = 'H',
105 IGNORE_PATH = 'x',
106 IGNORE_DIRECTORY_PATH = 'X',
107 REMOVE_PATH = 'r',
108 RECURSIVE_REMOVE_PATH = 'R',
109 RELABEL_PATH = 'z',
110 RECURSIVE_RELABEL_PATH = 'Z',
111 ADJUST_MODE = 'm', /* legacy, 'z' is identical to this */
112 } ItemType;
113
114 typedef struct Item {
115 ItemType type;
116
117 char *path;
118 char *argument;
119 char **xattrs;
120 #if HAVE_ACL
121 acl_t acl_access;
122 acl_t acl_default;
123 #endif
124 uid_t uid;
125 gid_t gid;
126 mode_t mode;
127 usec_t age;
128
129 dev_t major_minor;
130 unsigned attribute_value;
131 unsigned attribute_mask;
132
133 bool uid_set:1;
134 bool gid_set:1;
135 bool mode_set:1;
136 bool age_set:1;
137 bool mask_perms:1;
138 bool attribute_set:1;
139
140 bool keep_first_level:1;
141
142 bool force:1;
143
144 bool done:1;
145 } Item;
146
147 typedef struct ItemArray {
148 Item *items;
149 size_t count;
150 size_t size;
151 } ItemArray;
152
153 static bool arg_create = false;
154 static bool arg_clean = false;
155 static bool arg_remove = false;
156 static bool arg_boot = false;
157
158 static char **arg_include_prefixes = NULL;
159 static char **arg_exclude_prefixes = NULL;
160 static char *arg_root = NULL;
161
162 static const char conf_file_dirs[] = CONF_PATHS_NULSTR("tmpfiles.d");
163
164 #define MAX_DEPTH 256
165
166 static OrderedHashmap *items = NULL, *globs = NULL;
167 static Set *unix_sockets = NULL;
168
169 static int specifier_machine_id_safe(char specifier, void *data, void *userdata, char **ret);
170
171 static const Specifier specifier_table[] = {
172 { 'm', specifier_machine_id_safe, NULL },
173 { 'b', specifier_boot_id, NULL },
174 { 'H', specifier_host_name, NULL },
175 { 'v', specifier_kernel_release, NULL },
176 {}
177 };
178
179 static int specifier_machine_id_safe(char specifier, void *data, void *userdata, char **ret) {
180 int r;
181
182 /* If /etc/machine_id is missing (e.g. in a chroot environment), returns
183 * a recognizable error so that the caller can skip the rule
184 * gracefully. */
185
186 r = specifier_machine_id(specifier, data, userdata, ret);
187 if (r == -ENOENT)
188 return -ENOKEY;
189
190 return r;
191 }
192
193 static int log_unresolvable_specifier(const char *filename, unsigned line) {
194 static bool notified = false;
195
196 /* This is called when /etc is not fully initialized (e.g. in a chroot
197 * environment) where some specifiers are unresolvable. These cases are
198 * not considered as an error so log at LOG_NOTICE only for the first
199 * time and then downgrade this to LOG_DEBUG for the rest. */
200
201 log_full(notified ? LOG_DEBUG : LOG_NOTICE,
202 "[%s:%u] Failed to resolve specifier: uninitialized /etc detected, skipping",
203 filename, line);
204
205 if (!notified)
206 log_notice("All rules containing unresolvable specifiers will be skipped.");
207
208 notified = true;
209 return 0;
210 }
211
212 static bool needs_glob(ItemType t) {
213 return IN_SET(t,
214 WRITE_FILE,
215 IGNORE_PATH,
216 IGNORE_DIRECTORY_PATH,
217 REMOVE_PATH,
218 RECURSIVE_REMOVE_PATH,
219 EMPTY_DIRECTORY,
220 ADJUST_MODE,
221 RELABEL_PATH,
222 RECURSIVE_RELABEL_PATH,
223 SET_XATTR,
224 RECURSIVE_SET_XATTR,
225 SET_ACL,
226 RECURSIVE_SET_ACL,
227 SET_ATTRIBUTE,
228 RECURSIVE_SET_ATTRIBUTE);
229 }
230
231 static bool takes_ownership(ItemType t) {
232 return IN_SET(t,
233 CREATE_FILE,
234 TRUNCATE_FILE,
235 CREATE_DIRECTORY,
236 EMPTY_DIRECTORY,
237 TRUNCATE_DIRECTORY,
238 CREATE_SUBVOLUME,
239 CREATE_SUBVOLUME_INHERIT_QUOTA,
240 CREATE_SUBVOLUME_NEW_QUOTA,
241 CREATE_FIFO,
242 CREATE_SYMLINK,
243 CREATE_CHAR_DEVICE,
244 CREATE_BLOCK_DEVICE,
245 COPY_FILES,
246 WRITE_FILE,
247 IGNORE_PATH,
248 IGNORE_DIRECTORY_PATH,
249 REMOVE_PATH,
250 RECURSIVE_REMOVE_PATH);
251 }
252
253 static struct Item* find_glob(OrderedHashmap *h, const char *match) {
254 ItemArray *j;
255 Iterator i;
256
257 ORDERED_HASHMAP_FOREACH(j, h, i) {
258 unsigned n;
259
260 for (n = 0; n < j->count; n++) {
261 Item *item = j->items + n;
262
263 if (fnmatch(item->path, match, FNM_PATHNAME|FNM_PERIOD) == 0)
264 return item;
265 }
266 }
267
268 return NULL;
269 }
270
271 static void load_unix_sockets(void) {
272 _cleanup_fclose_ FILE *f = NULL;
273 char line[LINE_MAX];
274
275 if (unix_sockets)
276 return;
277
278 /* We maintain a cache of the sockets we found in
279 * /proc/net/unix to speed things up a little. */
280
281 unix_sockets = set_new(&string_hash_ops);
282 if (!unix_sockets)
283 return;
284
285 f = fopen("/proc/net/unix", "re");
286 if (!f)
287 return;
288
289 /* Skip header */
290 if (!fgets(line, sizeof(line), f))
291 goto fail;
292
293 for (;;) {
294 char *p, *s;
295 int k;
296
297 if (!fgets(line, sizeof(line), f))
298 break;
299
300 truncate_nl(line);
301
302 p = strchr(line, ':');
303 if (!p)
304 continue;
305
306 if (strlen(p) < 37)
307 continue;
308
309 p += 37;
310 p += strspn(p, WHITESPACE);
311 p += strcspn(p, WHITESPACE); /* skip one more word */
312 p += strspn(p, WHITESPACE);
313
314 if (*p != '/')
315 continue;
316
317 s = strdup(p);
318 if (!s)
319 goto fail;
320
321 path_kill_slashes(s);
322
323 k = set_consume(unix_sockets, s);
324 if (k < 0 && k != -EEXIST)
325 goto fail;
326 }
327
328 return;
329
330 fail:
331 set_free_free(unix_sockets);
332 unix_sockets = NULL;
333 }
334
335 static bool unix_socket_alive(const char *fn) {
336 assert(fn);
337
338 load_unix_sockets();
339
340 if (unix_sockets)
341 return !!set_get(unix_sockets, (char*) fn);
342
343 /* We don't know, so assume yes */
344 return true;
345 }
346
347 static int dir_is_mount_point(DIR *d, const char *subdir) {
348
349 union file_handle_union h = FILE_HANDLE_INIT;
350 int mount_id_parent, mount_id;
351 int r_p, r;
352
353 r_p = name_to_handle_at(dirfd(d), ".", &h.handle, &mount_id_parent, 0);
354 if (r_p < 0)
355 r_p = -errno;
356
357 h.handle.handle_bytes = MAX_HANDLE_SZ;
358 r = name_to_handle_at(dirfd(d), subdir, &h.handle, &mount_id, 0);
359 if (r < 0)
360 r = -errno;
361
362 /* got no handle; make no assumptions, return error */
363 if (r_p < 0 && r < 0)
364 return r_p;
365
366 /* got both handles; if they differ, it is a mount point */
367 if (r_p >= 0 && r >= 0)
368 return mount_id_parent != mount_id;
369
370 /* got only one handle; assume different mount points if one
371 * of both queries was not supported by the filesystem */
372 if (IN_SET(r_p, -ENOSYS, -EOPNOTSUPP) || IN_SET(r, -ENOSYS, -EOPNOTSUPP))
373 return true;
374
375 /* return error */
376 if (r_p < 0)
377 return r_p;
378 return r;
379 }
380
381 static DIR* xopendirat_nomod(int dirfd, const char *path) {
382 DIR *dir;
383
384 dir = xopendirat(dirfd, path, O_NOFOLLOW|O_NOATIME);
385 if (dir)
386 return dir;
387
388 log_debug_errno(errno, "Cannot open %sdirectory \"%s\": %m", dirfd == AT_FDCWD ? "" : "sub", path);
389 if (errno != EPERM)
390 return NULL;
391
392 dir = xopendirat(dirfd, path, O_NOFOLLOW);
393 if (!dir)
394 log_debug_errno(errno, "Cannot open %sdirectory \"%s\": %m", dirfd == AT_FDCWD ? "" : "sub", path);
395
396 return dir;
397 }
398
399 static DIR* opendir_nomod(const char *path) {
400 return xopendirat_nomod(AT_FDCWD, path);
401 }
402
403 static int dir_cleanup(
404 Item *i,
405 const char *p,
406 DIR *d,
407 const struct stat *ds,
408 usec_t cutoff,
409 dev_t rootdev,
410 bool mountpoint,
411 int maxdepth,
412 bool keep_this_level) {
413
414 struct dirent *dent;
415 struct timespec times[2];
416 bool deleted = false;
417 int r = 0;
418
419 FOREACH_DIRENT_ALL(dent, d, break) {
420 struct stat s;
421 usec_t age;
422 _cleanup_free_ char *sub_path = NULL;
423
424 if (dot_or_dot_dot(dent->d_name))
425 continue;
426
427 if (fstatat(dirfd(d), dent->d_name, &s, AT_SYMLINK_NOFOLLOW) < 0) {
428 if (errno == ENOENT)
429 continue;
430
431 /* FUSE, NFS mounts, SELinux might return EACCES */
432 if (errno == EACCES)
433 log_debug_errno(errno, "stat(%s/%s) failed: %m", p, dent->d_name);
434 else
435 log_error_errno(errno, "stat(%s/%s) failed: %m", p, dent->d_name);
436 r = -errno;
437 continue;
438 }
439
440 /* Stay on the same filesystem */
441 if (s.st_dev != rootdev) {
442 log_debug("Ignoring \"%s/%s\": different filesystem.", p, dent->d_name);
443 continue;
444 }
445
446 /* Try to detect bind mounts of the same filesystem instance; they
447 * do not differ in device major/minors. This type of query is not
448 * supported on all kernels or filesystem types though. */
449 if (S_ISDIR(s.st_mode) && dir_is_mount_point(d, dent->d_name) > 0) {
450 log_debug("Ignoring \"%s/%s\": different mount of the same filesystem.",
451 p, dent->d_name);
452 continue;
453 }
454
455 /* Do not delete read-only files owned by root */
456 if (s.st_uid == 0 && !(s.st_mode & S_IWUSR)) {
457 log_debug("Ignoring \"%s/%s\": read-only and owner by root.", p, dent->d_name);
458 continue;
459 }
460
461 sub_path = strjoin(p, "/", dent->d_name);
462 if (!sub_path) {
463 r = log_oom();
464 goto finish;
465 }
466
467 /* Is there an item configured for this path? */
468 if (ordered_hashmap_get(items, sub_path)) {
469 log_debug("Ignoring \"%s\": a separate entry exists.", sub_path);
470 continue;
471 }
472
473 if (find_glob(globs, sub_path)) {
474 log_debug("Ignoring \"%s\": a separate glob exists.", sub_path);
475 continue;
476 }
477
478 if (S_ISDIR(s.st_mode)) {
479
480 if (mountpoint &&
481 streq(dent->d_name, "lost+found") &&
482 s.st_uid == 0) {
483 log_debug("Ignoring \"%s\".", sub_path);
484 continue;
485 }
486
487 if (maxdepth <= 0)
488 log_warning("Reached max depth on \"%s\".", sub_path);
489 else {
490 _cleanup_closedir_ DIR *sub_dir;
491 int q;
492
493 sub_dir = xopendirat_nomod(dirfd(d), dent->d_name);
494 if (!sub_dir) {
495 if (errno != ENOENT)
496 r = log_error_errno(errno, "opendir(%s) failed: %m", sub_path);
497
498 continue;
499 }
500
501 q = dir_cleanup(i, sub_path, sub_dir, &s, cutoff, rootdev, false, maxdepth-1, false);
502 if (q < 0)
503 r = q;
504 }
505
506 /* Note: if you are wondering why we don't
507 * support the sticky bit for excluding
508 * directories from cleaning like we do it for
509 * other file system objects: well, the sticky
510 * bit already has a meaning for directories,
511 * so we don't want to overload that. */
512
513 if (keep_this_level) {
514 log_debug("Keeping \"%s\".", sub_path);
515 continue;
516 }
517
518 /* Ignore ctime, we change it when deleting */
519 age = timespec_load(&s.st_mtim);
520 if (age >= cutoff) {
521 char a[FORMAT_TIMESTAMP_MAX];
522 /* Follows spelling in stat(1). */
523 log_debug("Directory \"%s\": modify time %s is too new.",
524 sub_path,
525 format_timestamp_us(a, sizeof(a), age));
526 continue;
527 }
528
529 age = timespec_load(&s.st_atim);
530 if (age >= cutoff) {
531 char a[FORMAT_TIMESTAMP_MAX];
532 log_debug("Directory \"%s\": access time %s is too new.",
533 sub_path,
534 format_timestamp_us(a, sizeof(a), age));
535 continue;
536 }
537
538 log_debug("Removing directory \"%s\".", sub_path);
539 if (unlinkat(dirfd(d), dent->d_name, AT_REMOVEDIR) < 0)
540 if (!IN_SET(errno, ENOENT, ENOTEMPTY)) {
541 log_error_errno(errno, "rmdir(%s): %m", sub_path);
542 r = -errno;
543 }
544
545 } else {
546 /* Skip files for which the sticky bit is
547 * set. These are semantics we define, and are
548 * unknown elsewhere. See XDG_RUNTIME_DIR
549 * specification for details. */
550 if (s.st_mode & S_ISVTX) {
551 log_debug("Skipping \"%s\": sticky bit set.", sub_path);
552 continue;
553 }
554
555 if (mountpoint && S_ISREG(s.st_mode))
556 if (s.st_uid == 0 && STR_IN_SET(dent->d_name,
557 ".journal",
558 "aquota.user",
559 "aquota.group")) {
560 log_debug("Skipping \"%s\".", sub_path);
561 continue;
562 }
563
564 /* Ignore sockets that are listed in /proc/net/unix */
565 if (S_ISSOCK(s.st_mode) && unix_socket_alive(sub_path)) {
566 log_debug("Skipping \"%s\": live socket.", sub_path);
567 continue;
568 }
569
570 /* Ignore device nodes */
571 if (S_ISCHR(s.st_mode) || S_ISBLK(s.st_mode)) {
572 log_debug("Skipping \"%s\": a device.", sub_path);
573 continue;
574 }
575
576 /* Keep files on this level around if this is
577 * requested */
578 if (keep_this_level) {
579 log_debug("Keeping \"%s\".", sub_path);
580 continue;
581 }
582
583 age = timespec_load(&s.st_mtim);
584 if (age >= cutoff) {
585 char a[FORMAT_TIMESTAMP_MAX];
586 /* Follows spelling in stat(1). */
587 log_debug("File \"%s\": modify time %s is too new.",
588 sub_path,
589 format_timestamp_us(a, sizeof(a), age));
590 continue;
591 }
592
593 age = timespec_load(&s.st_atim);
594 if (age >= cutoff) {
595 char a[FORMAT_TIMESTAMP_MAX];
596 log_debug("File \"%s\": access time %s is too new.",
597 sub_path,
598 format_timestamp_us(a, sizeof(a), age));
599 continue;
600 }
601
602 age = timespec_load(&s.st_ctim);
603 if (age >= cutoff) {
604 char a[FORMAT_TIMESTAMP_MAX];
605 log_debug("File \"%s\": change time %s is too new.",
606 sub_path,
607 format_timestamp_us(a, sizeof(a), age));
608 continue;
609 }
610
611 log_debug("unlink \"%s\"", sub_path);
612
613 if (unlinkat(dirfd(d), dent->d_name, 0) < 0)
614 if (errno != ENOENT)
615 r = log_error_errno(errno, "unlink(%s): %m", sub_path);
616
617 deleted = true;
618 }
619 }
620
621 finish:
622 if (deleted) {
623 usec_t age1, age2;
624 char a[FORMAT_TIMESTAMP_MAX], b[FORMAT_TIMESTAMP_MAX];
625
626 /* Restore original directory timestamps */
627 times[0] = ds->st_atim;
628 times[1] = ds->st_mtim;
629
630 age1 = timespec_load(&ds->st_atim);
631 age2 = timespec_load(&ds->st_mtim);
632 log_debug("Restoring access and modification time on \"%s\": %s, %s",
633 p,
634 format_timestamp_us(a, sizeof(a), age1),
635 format_timestamp_us(b, sizeof(b), age2));
636 if (futimens(dirfd(d), times) < 0)
637 log_error_errno(errno, "utimensat(%s): %m", p);
638 }
639
640 return r;
641 }
642
643 static int path_set_perms(Item *i, const char *path) {
644 _cleanup_close_ int fd = -1;
645 struct stat st;
646
647 assert(i);
648 assert(path);
649
650 /* We open the file with O_PATH here, to make the operation
651 * somewhat atomic. Also there's unfortunately no fchmodat()
652 * with AT_SYMLINK_NOFOLLOW, hence we emulate it here via
653 * O_PATH. */
654
655 fd = open(path, O_NOFOLLOW|O_CLOEXEC|O_PATH);
656 if (fd < 0) {
657 int level = LOG_ERR, r = -errno;
658
659 /* Option "e" operates only on existing objects. Do not
660 * print errors about non-existent files or directories */
661 if (i->type == EMPTY_DIRECTORY && errno == ENOENT) {
662 level = LOG_DEBUG;
663 r = 0;
664 }
665
666 log_full_errno(level, errno, "Adjusting owner and mode for %s failed: %m", path);
667
668 return r;
669 }
670
671 if (fstatat(fd, "", &st, AT_EMPTY_PATH) < 0)
672 return log_error_errno(errno, "Failed to fstat() file %s: %m", path);
673
674 if (S_ISLNK(st.st_mode))
675 log_debug("Skipping mode an owner fix for symlink %s.", path);
676 else {
677 char fn[strlen("/proc/self/fd/") + DECIMAL_STR_MAX(int)];
678 xsprintf(fn, "/proc/self/fd/%i", fd);
679
680 /* not using i->path directly because it may be a glob */
681 if (i->mode_set) {
682 mode_t m = i->mode;
683
684 if (i->mask_perms) {
685 if (!(st.st_mode & 0111))
686 m &= ~0111;
687 if (!(st.st_mode & 0222))
688 m &= ~0222;
689 if (!(st.st_mode & 0444))
690 m &= ~0444;
691 if (!S_ISDIR(st.st_mode))
692 m &= ~07000; /* remove sticky/sgid/suid bit, unless directory */
693 }
694
695 if (m == (st.st_mode & 07777))
696 log_debug("\"%s\" has right mode %o", path, st.st_mode);
697 else {
698 log_debug("chmod \"%s\" to mode %o", path, m);
699 if (chmod(fn, m) < 0)
700 return log_error_errno(errno, "chmod() of %s via %s failed: %m", path, fn);
701 }
702 }
703
704 if ((i->uid != st.st_uid || i->gid != st.st_gid) &&
705 (i->uid_set || i->gid_set)) {
706 log_debug("chown \"%s\" to "UID_FMT"."GID_FMT,
707 path,
708 i->uid_set ? i->uid : UID_INVALID,
709 i->gid_set ? i->gid : GID_INVALID);
710 if (chown(fn,
711 i->uid_set ? i->uid : UID_INVALID,
712 i->gid_set ? i->gid : GID_INVALID) < 0)
713 return log_error_errno(errno, "chown() of %s via %s failed: %m", path, fn);
714 }
715 }
716
717 fd = safe_close(fd);
718
719 return label_fix(path, false, false);
720 }
721
722 static int parse_xattrs_from_arg(Item *i) {
723 const char *p;
724 int r;
725
726 assert(i);
727 assert(i->argument);
728
729 p = i->argument;
730
731 for (;;) {
732 _cleanup_free_ char *name = NULL, *value = NULL, *xattr = NULL;
733
734 r = extract_first_word(&p, &xattr, NULL, EXTRACT_QUOTES|EXTRACT_CUNESCAPE);
735 if (r < 0)
736 log_warning_errno(r, "Failed to parse extended attribute '%s', ignoring: %m", p);
737 if (r <= 0)
738 break;
739
740 r = split_pair(xattr, "=", &name, &value);
741 if (r < 0) {
742 log_warning_errno(r, "Failed to parse extended attribute, ignoring: %s", xattr);
743 continue;
744 }
745
746 if (isempty(name) || isempty(value)) {
747 log_warning("Malformed extended attribute found, ignoring: %s", xattr);
748 continue;
749 }
750
751 if (strv_push_pair(&i->xattrs, name, value) < 0)
752 return log_oom();
753
754 name = value = NULL;
755 }
756
757 return 0;
758 }
759
760 static int path_set_xattrs(Item *i, const char *path) {
761 char **name, **value;
762
763 assert(i);
764 assert(path);
765
766 STRV_FOREACH_PAIR(name, value, i->xattrs) {
767 int n;
768
769 n = strlen(*value);
770 log_debug("Setting extended attribute '%s=%s' on %s.", *name, *value, path);
771 if (lsetxattr(path, *name, *value, n, 0) < 0)
772 return log_error_errno(errno, "Setting extended attribute %s=%s on %s failed: %m",
773 *name, *value, path);
774 }
775 return 0;
776 }
777
778 static int parse_acls_from_arg(Item *item) {
779 #if HAVE_ACL
780 int r;
781
782 assert(item);
783
784 /* If force (= modify) is set, we will not modify the acl
785 * afterwards, so the mask can be added now if necessary. */
786
787 r = parse_acl(item->argument, &item->acl_access, &item->acl_default, !item->force);
788 if (r < 0)
789 log_warning_errno(r, "Failed to parse ACL \"%s\": %m. Ignoring", item->argument);
790 #else
791 log_warning_errno(ENOSYS, "ACLs are not supported. Ignoring");
792 #endif
793
794 return 0;
795 }
796
797 #if HAVE_ACL
798 static int path_set_acl(const char *path, const char *pretty, acl_type_t type, acl_t acl, bool modify) {
799 _cleanup_(acl_free_charpp) char *t = NULL;
800 _cleanup_(acl_freep) acl_t dup = NULL;
801 int r;
802
803 /* Returns 0 for success, positive error if already warned,
804 * negative error otherwise. */
805
806 if (modify) {
807 r = acls_for_file(path, type, acl, &dup);
808 if (r < 0)
809 return r;
810
811 r = calc_acl_mask_if_needed(&dup);
812 if (r < 0)
813 return r;
814 } else {
815 dup = acl_dup(acl);
816 if (!dup)
817 return -errno;
818
819 /* the mask was already added earlier if needed */
820 }
821
822 r = add_base_acls_if_needed(&dup, path);
823 if (r < 0)
824 return r;
825
826 t = acl_to_any_text(dup, NULL, ',', TEXT_ABBREVIATE);
827 log_debug("Setting %s ACL %s on %s.",
828 type == ACL_TYPE_ACCESS ? "access" : "default",
829 strna(t), pretty);
830
831 r = acl_set_file(path, type, dup);
832 if (r < 0)
833 /* Return positive to indicate we already warned */
834 return -log_error_errno(errno,
835 "Setting %s ACL \"%s\" on %s failed: %m",
836 type == ACL_TYPE_ACCESS ? "access" : "default",
837 strna(t), pretty);
838
839 return 0;
840 }
841 #endif
842
843 static int path_set_acls(Item *item, const char *path) {
844 int r = 0;
845 #if HAVE_ACL
846 char fn[strlen("/proc/self/fd/") + DECIMAL_STR_MAX(int)];
847 _cleanup_close_ int fd = -1;
848 struct stat st;
849
850 assert(item);
851 assert(path);
852
853 fd = open(path, O_NOFOLLOW|O_CLOEXEC|O_PATH);
854 if (fd < 0)
855 return log_error_errno(errno, "Adjusting ACL of %s failed: %m", path);
856
857 if (fstatat(fd, "", &st, AT_EMPTY_PATH) < 0)
858 return log_error_errno(errno, "Failed to fstat() file %s: %m", path);
859
860 if (S_ISLNK(st.st_mode)) {
861 log_debug("Skipping ACL fix for symlink %s.", path);
862 return 0;
863 }
864
865 xsprintf(fn, "/proc/self/fd/%i", fd);
866
867 if (item->acl_access)
868 r = path_set_acl(fn, path, ACL_TYPE_ACCESS, item->acl_access, item->force);
869
870 if (r == 0 && item->acl_default)
871 r = path_set_acl(fn, path, ACL_TYPE_DEFAULT, item->acl_default, item->force);
872
873 if (r > 0)
874 return -r; /* already warned */
875 else if (r == -EOPNOTSUPP) {
876 log_debug_errno(r, "ACLs not supported by file system at %s", path);
877 return 0;
878 } else if (r < 0)
879 log_error_errno(r, "ACL operation on \"%s\" failed: %m", path);
880 #endif
881 return r;
882 }
883
884 #define ATTRIBUTES_ALL \
885 (FS_NOATIME_FL | \
886 FS_SYNC_FL | \
887 FS_DIRSYNC_FL | \
888 FS_APPEND_FL | \
889 FS_COMPR_FL | \
890 FS_NODUMP_FL | \
891 FS_EXTENT_FL | \
892 FS_IMMUTABLE_FL | \
893 FS_JOURNAL_DATA_FL | \
894 FS_SECRM_FL | \
895 FS_UNRM_FL | \
896 FS_NOTAIL_FL | \
897 FS_TOPDIR_FL | \
898 FS_NOCOW_FL)
899
900 static int parse_attribute_from_arg(Item *item) {
901
902 static const struct {
903 char character;
904 unsigned value;
905 } attributes[] = {
906 { 'A', FS_NOATIME_FL }, /* do not update atime */
907 { 'S', FS_SYNC_FL }, /* Synchronous updates */
908 { 'D', FS_DIRSYNC_FL }, /* dirsync behaviour (directories only) */
909 { 'a', FS_APPEND_FL }, /* writes to file may only append */
910 { 'c', FS_COMPR_FL }, /* Compress file */
911 { 'd', FS_NODUMP_FL }, /* do not dump file */
912 { 'e', FS_EXTENT_FL }, /* Extents */
913 { 'i', FS_IMMUTABLE_FL }, /* Immutable file */
914 { 'j', FS_JOURNAL_DATA_FL }, /* Reserved for ext3 */
915 { 's', FS_SECRM_FL }, /* Secure deletion */
916 { 'u', FS_UNRM_FL }, /* Undelete */
917 { 't', FS_NOTAIL_FL }, /* file tail should not be merged */
918 { 'T', FS_TOPDIR_FL }, /* Top of directory hierarchies */
919 { 'C', FS_NOCOW_FL }, /* Do not cow file */
920 };
921
922 enum {
923 MODE_ADD,
924 MODE_DEL,
925 MODE_SET
926 } mode = MODE_ADD;
927
928 unsigned value = 0, mask = 0;
929 const char *p;
930
931 assert(item);
932
933 p = item->argument;
934 if (p) {
935 if (*p == '+') {
936 mode = MODE_ADD;
937 p++;
938 } else if (*p == '-') {
939 mode = MODE_DEL;
940 p++;
941 } else if (*p == '=') {
942 mode = MODE_SET;
943 p++;
944 }
945 }
946
947 if (isempty(p) && mode != MODE_SET) {
948 log_error("Setting file attribute on '%s' needs an attribute specification.", item->path);
949 return -EINVAL;
950 }
951
952 for (; p && *p ; p++) {
953 unsigned i, v;
954
955 for (i = 0; i < ELEMENTSOF(attributes); i++)
956 if (*p == attributes[i].character)
957 break;
958
959 if (i >= ELEMENTSOF(attributes)) {
960 log_error("Unknown file attribute '%c' on '%s'.", *p, item->path);
961 return -EINVAL;
962 }
963
964 v = attributes[i].value;
965
966 SET_FLAG(value, v, IN_SET(mode, MODE_ADD, MODE_SET));
967
968 mask |= v;
969 }
970
971 if (mode == MODE_SET)
972 mask |= ATTRIBUTES_ALL;
973
974 assert(mask != 0);
975
976 item->attribute_mask = mask;
977 item->attribute_value = value;
978 item->attribute_set = true;
979
980 return 0;
981 }
982
983 static int path_set_attribute(Item *item, const char *path) {
984 _cleanup_close_ int fd = -1;
985 struct stat st;
986 unsigned f;
987 int r;
988
989 if (!item->attribute_set || item->attribute_mask == 0)
990 return 0;
991
992 fd = open(path, O_RDONLY|O_NONBLOCK|O_CLOEXEC|O_NOATIME|O_NOFOLLOW);
993 if (fd < 0) {
994 if (errno == ELOOP)
995 return log_error_errno(errno, "Skipping file attributes adjustment on symlink %s.", path);
996
997 return log_error_errno(errno, "Cannot open '%s': %m", path);
998 }
999
1000 if (fstat(fd, &st) < 0)
1001 return log_error_errno(errno, "Cannot stat '%s': %m", path);
1002
1003 /* Issuing the file attribute ioctls on device nodes is not
1004 * safe, as that will be delivered to the drivers, not the
1005 * file system containing the device node. */
1006 if (!S_ISREG(st.st_mode) && !S_ISDIR(st.st_mode)) {
1007 log_error("Setting file flags is only supported on regular files and directories, cannot set on '%s'.", path);
1008 return -EINVAL;
1009 }
1010
1011 f = item->attribute_value & item->attribute_mask;
1012
1013 /* Mask away directory-specific flags */
1014 if (!S_ISDIR(st.st_mode))
1015 f &= ~FS_DIRSYNC_FL;
1016
1017 r = chattr_fd(fd, f, item->attribute_mask);
1018 if (r < 0)
1019 log_full_errno(IN_SET(r, -ENOTTY, -EOPNOTSUPP) ? LOG_DEBUG : LOG_WARNING,
1020 r,
1021 "Cannot set file attribute for '%s', value=0x%08x, mask=0x%08x: %m",
1022 path, item->attribute_value, item->attribute_mask);
1023
1024 return 0;
1025 }
1026
1027 static int write_one_file(Item *i, const char *path) {
1028 _cleanup_close_ int fd = -1;
1029 int flags, r = 0;
1030 struct stat st;
1031
1032 assert(i);
1033 assert(path);
1034
1035 flags = i->type == CREATE_FILE ? O_CREAT|O_APPEND|O_NOFOLLOW :
1036 i->type == TRUNCATE_FILE ? O_CREAT|O_TRUNC|O_NOFOLLOW : 0;
1037
1038 RUN_WITH_UMASK(0000) {
1039 mac_selinux_create_file_prepare(path, S_IFREG);
1040 fd = open(path, flags|O_NDELAY|O_CLOEXEC|O_WRONLY|O_NOCTTY, i->mode);
1041 mac_selinux_create_file_clear();
1042 }
1043
1044 if (fd < 0) {
1045 if (i->type == WRITE_FILE && errno == ENOENT) {
1046 log_debug_errno(errno, "Not writing \"%s\": %m", path);
1047 return 0;
1048 }
1049
1050 r = -errno;
1051 if (!i->argument && errno == EROFS && stat(path, &st) == 0 &&
1052 (i->type == CREATE_FILE || st.st_size == 0))
1053 goto check_mode;
1054
1055 return log_error_errno(r, "Failed to create file %s: %m", path);
1056 }
1057
1058 if (i->argument) {
1059 log_debug("%s to \"%s\".", i->type == CREATE_FILE ? "Appending" : "Writing", path);
1060
1061 r = loop_write(fd, i->argument, strlen(i->argument), false);
1062 if (r < 0)
1063 return log_error_errno(r, "Failed to write file \"%s\": %m", path);
1064 } else
1065 log_debug("\"%s\" has been created.", path);
1066
1067 fd = safe_close(fd);
1068
1069 if (stat(path, &st) < 0)
1070 return log_error_errno(errno, "stat(%s) failed: %m", path);
1071
1072 check_mode:
1073 if (!S_ISREG(st.st_mode)) {
1074 log_error("%s is not a file.", path);
1075 return -EEXIST;
1076 }
1077
1078 r = path_set_perms(i, path);
1079 if (r < 0)
1080 return r;
1081
1082 return 0;
1083 }
1084
1085 typedef int (*action_t)(Item *, const char *);
1086
1087 static int item_do_children(Item *i, const char *path, action_t action) {
1088 _cleanup_closedir_ DIR *d;
1089 struct dirent *de;
1090 int r = 0;
1091
1092 assert(i);
1093 assert(path);
1094
1095 /* This returns the first error we run into, but nevertheless
1096 * tries to go on */
1097
1098 d = opendir_nomod(path);
1099 if (!d)
1100 return IN_SET(errno, ENOENT, ENOTDIR) ? 0 : -errno;
1101
1102 FOREACH_DIRENT_ALL(de, d, r = -errno) {
1103 _cleanup_free_ char *p = NULL;
1104 int q;
1105
1106 if (dot_or_dot_dot(de->d_name))
1107 continue;
1108
1109 p = strjoin(path, "/", de->d_name);
1110 if (!p)
1111 return -ENOMEM;
1112
1113 q = action(i, p);
1114 if (q < 0 && q != -ENOENT && r == 0)
1115 r = q;
1116
1117 if (IN_SET(de->d_type, DT_UNKNOWN, DT_DIR)) {
1118 q = item_do_children(i, p, action);
1119 if (q < 0 && r == 0)
1120 r = q;
1121 }
1122 }
1123
1124 return r;
1125 }
1126
1127 static int glob_item(Item *i, action_t action, bool recursive) {
1128 _cleanup_globfree_ glob_t g = {
1129 .gl_opendir = (void *(*)(const char *)) opendir_nomod,
1130 };
1131 int r = 0, k;
1132 char **fn;
1133
1134 k = safe_glob(i->path, GLOB_NOSORT|GLOB_BRACE, &g);
1135 if (k < 0 && k != -ENOENT)
1136 return log_error_errno(k, "glob(%s) failed: %m", i->path);
1137
1138 STRV_FOREACH(fn, g.gl_pathv) {
1139 k = action(i, *fn);
1140 if (k < 0 && r == 0)
1141 r = k;
1142
1143 if (recursive) {
1144 k = item_do_children(i, *fn, action);
1145 if (k < 0 && r == 0)
1146 r = k;
1147 }
1148 }
1149
1150 return r;
1151 }
1152
1153 typedef enum {
1154 CREATION_NORMAL,
1155 CREATION_EXISTING,
1156 CREATION_FORCE,
1157 _CREATION_MODE_MAX,
1158 _CREATION_MODE_INVALID = -1
1159 } CreationMode;
1160
1161 static const char *creation_mode_verb_table[_CREATION_MODE_MAX] = {
1162 [CREATION_NORMAL] = "Created",
1163 [CREATION_EXISTING] = "Found existing",
1164 [CREATION_FORCE] = "Created replacement",
1165 };
1166
1167 DEFINE_PRIVATE_STRING_TABLE_LOOKUP_TO_STRING(creation_mode_verb, CreationMode);
1168
1169 static int create_item(Item *i) {
1170 struct stat st;
1171 int r = 0;
1172 int q = 0;
1173 CreationMode creation;
1174
1175 assert(i);
1176
1177 log_debug("Running create action for entry %c %s", (char) i->type, i->path);
1178
1179 switch (i->type) {
1180
1181 case IGNORE_PATH:
1182 case IGNORE_DIRECTORY_PATH:
1183 case REMOVE_PATH:
1184 case RECURSIVE_REMOVE_PATH:
1185 return 0;
1186
1187 case CREATE_FILE:
1188 case TRUNCATE_FILE:
1189 r = write_one_file(i, i->path);
1190 if (r < 0)
1191 return r;
1192 break;
1193
1194 case COPY_FILES: {
1195 log_debug("Copying tree \"%s\" to \"%s\".", i->argument, i->path);
1196 r = copy_tree(i->argument, i->path, i->uid_set ? i->uid : UID_INVALID, i->gid_set ? i->gid : GID_INVALID, COPY_REFLINK);
1197
1198 if (r == -EROFS && stat(i->path, &st) == 0)
1199 r = -EEXIST;
1200
1201 if (r < 0) {
1202 struct stat a, b;
1203
1204 if (r != -EEXIST)
1205 return log_error_errno(r, "Failed to copy files to %s: %m", i->path);
1206
1207 if (stat(i->argument, &a) < 0)
1208 return log_error_errno(errno, "stat(%s) failed: %m", i->argument);
1209
1210 if (stat(i->path, &b) < 0)
1211 return log_error_errno(errno, "stat(%s) failed: %m", i->path);
1212
1213 if ((a.st_mode ^ b.st_mode) & S_IFMT) {
1214 log_debug("Can't copy to %s, file exists already and is of different type", i->path);
1215 return 0;
1216 }
1217 }
1218
1219 r = path_set_perms(i, i->path);
1220 if (r < 0)
1221 return r;
1222
1223 break;
1224
1225 case WRITE_FILE:
1226 r = glob_item(i, write_one_file, false);
1227 if (r < 0)
1228 return r;
1229
1230 break;
1231
1232 case CREATE_DIRECTORY:
1233 case TRUNCATE_DIRECTORY:
1234 case CREATE_SUBVOLUME:
1235 case CREATE_SUBVOLUME_INHERIT_QUOTA:
1236 case CREATE_SUBVOLUME_NEW_QUOTA:
1237 RUN_WITH_UMASK(0000)
1238 mkdir_parents_label(i->path, 0755);
1239
1240 if (IN_SET(i->type, CREATE_SUBVOLUME, CREATE_SUBVOLUME_INHERIT_QUOTA, CREATE_SUBVOLUME_NEW_QUOTA)) {
1241
1242 if (btrfs_is_subvol(isempty(arg_root) ? "/" : arg_root) <= 0)
1243
1244 /* Don't create a subvolume unless the
1245 * root directory is one, too. We do
1246 * this under the assumption that if
1247 * the root directory is just a plain
1248 * directory (i.e. very light-weight),
1249 * we shouldn't try to split it up
1250 * into subvolumes (i.e. more
1251 * heavy-weight). Thus, chroot()
1252 * environments and suchlike will get
1253 * a full brtfs subvolume set up below
1254 * their tree only if they
1255 * specifically set up a btrfs
1256 * subvolume for the root dir too. */
1257
1258 r = -ENOTTY;
1259 else {
1260 RUN_WITH_UMASK((~i->mode) & 0777)
1261 r = btrfs_subvol_make(i->path);
1262 }
1263 } else
1264 r = 0;
1265
1266 if (IN_SET(i->type, CREATE_DIRECTORY, TRUNCATE_DIRECTORY) || r == -ENOTTY)
1267 RUN_WITH_UMASK(0000)
1268 r = mkdir_label(i->path, i->mode);
1269
1270 if (r < 0) {
1271 int k;
1272
1273 if (!IN_SET(r, -EEXIST, -EROFS))
1274 return log_error_errno(r, "Failed to create directory or subvolume \"%s\": %m", i->path);
1275
1276 k = is_dir(i->path, false);
1277 if (k == -ENOENT && r == -EROFS)
1278 return log_error_errno(r, "%s does not exist and cannot be created as the file system is read-only.", i->path);
1279 if (k < 0)
1280 return log_error_errno(k, "Failed to check if %s exists: %m", i->path);
1281 if (!k) {
1282 log_warning("\"%s\" already exists and is not a directory.", i->path);
1283 return 0;
1284 }
1285
1286 creation = CREATION_EXISTING;
1287 } else
1288 creation = CREATION_NORMAL;
1289
1290 log_debug("%s directory \"%s\".", creation_mode_verb_to_string(creation), i->path);
1291
1292 if (IN_SET(i->type, CREATE_SUBVOLUME_NEW_QUOTA, CREATE_SUBVOLUME_INHERIT_QUOTA)) {
1293 r = btrfs_subvol_auto_qgroup(i->path, 0, i->type == CREATE_SUBVOLUME_NEW_QUOTA);
1294 if (r == -ENOTTY)
1295 log_debug_errno(r, "Couldn't adjust quota for subvolume \"%s\" (unsupported fs or dir not a subvolume): %m", i->path);
1296 else if (r == -EROFS)
1297 log_debug_errno(r, "Couldn't adjust quota for subvolume \"%s\" (fs is read-only).", i->path);
1298 else if (r == -ENOPROTOOPT)
1299 log_debug_errno(r, "Couldn't adjust quota for subvolume \"%s\" (quota support is disabled).", i->path);
1300 else if (r < 0)
1301 q = log_error_errno(r, "Failed to adjust quota for subvolume \"%s\": %m", i->path);
1302 else if (r > 0)
1303 log_debug("Adjusted quota for subvolume \"%s\".", i->path);
1304 else if (r == 0)
1305 log_debug("Quota for subvolume \"%s\" already in place, no change made.", i->path);
1306 }
1307
1308 _fallthrough_;
1309 case EMPTY_DIRECTORY:
1310 r = path_set_perms(i, i->path);
1311 if (q < 0)
1312 return q;
1313 if (r < 0)
1314 return r;
1315
1316 break;
1317
1318 case CREATE_FIFO:
1319 RUN_WITH_UMASK(0000) {
1320 mac_selinux_create_file_prepare(i->path, S_IFIFO);
1321 r = mkfifo(i->path, i->mode);
1322 mac_selinux_create_file_clear();
1323 }
1324
1325 if (r < 0) {
1326 if (errno != EEXIST)
1327 return log_error_errno(errno, "Failed to create fifo %s: %m", i->path);
1328
1329 if (lstat(i->path, &st) < 0)
1330 return log_error_errno(errno, "stat(%s) failed: %m", i->path);
1331
1332 if (!S_ISFIFO(st.st_mode)) {
1333
1334 if (i->force) {
1335 RUN_WITH_UMASK(0000) {
1336 mac_selinux_create_file_prepare(i->path, S_IFIFO);
1337 r = mkfifo_atomic(i->path, i->mode);
1338 mac_selinux_create_file_clear();
1339 }
1340
1341 if (r < 0)
1342 return log_error_errno(r, "Failed to create fifo %s: %m", i->path);
1343 creation = CREATION_FORCE;
1344 } else {
1345 log_warning("\"%s\" already exists and is not a fifo.", i->path);
1346 return 0;
1347 }
1348 } else
1349 creation = CREATION_EXISTING;
1350 } else
1351 creation = CREATION_NORMAL;
1352 log_debug("%s fifo \"%s\".", creation_mode_verb_to_string(creation), i->path);
1353
1354 r = path_set_perms(i, i->path);
1355 if (r < 0)
1356 return r;
1357
1358 break;
1359 }
1360
1361 case CREATE_SYMLINK: {
1362 mac_selinux_create_file_prepare(i->path, S_IFLNK);
1363 r = symlink(i->argument, i->path);
1364 mac_selinux_create_file_clear();
1365
1366 if (r < 0) {
1367 _cleanup_free_ char *x = NULL;
1368
1369 if (errno != EEXIST)
1370 return log_error_errno(errno, "symlink(%s, %s) failed: %m", i->argument, i->path);
1371
1372 r = readlink_malloc(i->path, &x);
1373 if (r < 0 || !streq(i->argument, x)) {
1374
1375 if (i->force) {
1376 mac_selinux_create_file_prepare(i->path, S_IFLNK);
1377 r = symlink_atomic(i->argument, i->path);
1378 mac_selinux_create_file_clear();
1379
1380 if (IN_SET(r, -EEXIST, -ENOTEMPTY)) {
1381 r = rm_rf(i->path, REMOVE_ROOT|REMOVE_PHYSICAL);
1382 if (r < 0)
1383 return log_error_errno(r, "rm -fr %s failed: %m", i->path);
1384
1385 mac_selinux_create_file_prepare(i->path, S_IFLNK);
1386 r = symlink(i->argument, i->path) < 0 ? -errno : 0;
1387 mac_selinux_create_file_clear();
1388 }
1389 if (r < 0)
1390 return log_error_errno(r, "symlink(%s, %s) failed: %m", i->argument, i->path);
1391
1392 creation = CREATION_FORCE;
1393 } else {
1394 log_debug("\"%s\" is not a symlink or does not point to the correct path.", i->path);
1395 return 0;
1396 }
1397 } else
1398 creation = CREATION_EXISTING;
1399 } else
1400
1401 creation = CREATION_NORMAL;
1402 log_debug("%s symlink \"%s\".", creation_mode_verb_to_string(creation), i->path);
1403 break;
1404 }
1405
1406 case CREATE_BLOCK_DEVICE:
1407 case CREATE_CHAR_DEVICE: {
1408 mode_t file_type;
1409
1410 if (have_effective_cap(CAP_MKNOD) == 0) {
1411 /* In a container we lack CAP_MKNOD. We
1412 shouldn't attempt to create the device node in
1413 that case to avoid noise, and we don't support
1414 virtualized devices in containers anyway. */
1415
1416 log_debug("We lack CAP_MKNOD, skipping creation of device node %s.", i->path);
1417 return 0;
1418 }
1419
1420 file_type = i->type == CREATE_BLOCK_DEVICE ? S_IFBLK : S_IFCHR;
1421
1422 RUN_WITH_UMASK(0000) {
1423 mac_selinux_create_file_prepare(i->path, file_type);
1424 r = mknod(i->path, i->mode | file_type, i->major_minor);
1425 mac_selinux_create_file_clear();
1426 }
1427
1428 if (r < 0) {
1429 if (errno == EPERM) {
1430 log_debug("We lack permissions, possibly because of cgroup configuration; "
1431 "skipping creation of device node %s.", i->path);
1432 return 0;
1433 }
1434
1435 if (errno != EEXIST)
1436 return log_error_errno(errno, "Failed to create device node %s: %m", i->path);
1437
1438 if (lstat(i->path, &st) < 0)
1439 return log_error_errno(errno, "stat(%s) failed: %m", i->path);
1440
1441 if ((st.st_mode & S_IFMT) != file_type) {
1442
1443 if (i->force) {
1444
1445 RUN_WITH_UMASK(0000) {
1446 mac_selinux_create_file_prepare(i->path, file_type);
1447 r = mknod_atomic(i->path, i->mode | file_type, i->major_minor);
1448 mac_selinux_create_file_clear();
1449 }
1450
1451 if (r < 0)
1452 return log_error_errno(r, "Failed to create device node \"%s\": %m", i->path);
1453 creation = CREATION_FORCE;
1454 } else {
1455 log_debug("%s is not a device node.", i->path);
1456 return 0;
1457 }
1458 } else
1459 creation = CREATION_EXISTING;
1460 } else
1461 creation = CREATION_NORMAL;
1462
1463 log_debug("%s %s device node \"%s\" %u:%u.",
1464 creation_mode_verb_to_string(creation),
1465 i->type == CREATE_BLOCK_DEVICE ? "block" : "char",
1466 i->path, major(i->mode), minor(i->mode));
1467
1468 r = path_set_perms(i, i->path);
1469 if (r < 0)
1470 return r;
1471
1472 break;
1473 }
1474
1475 case ADJUST_MODE:
1476 case RELABEL_PATH:
1477 r = glob_item(i, path_set_perms, false);
1478 if (r < 0)
1479 return r;
1480 break;
1481
1482 case RECURSIVE_RELABEL_PATH:
1483 r = glob_item(i, path_set_perms, true);
1484 if (r < 0)
1485 return r;
1486 break;
1487
1488 case SET_XATTR:
1489 r = glob_item(i, path_set_xattrs, false);
1490 if (r < 0)
1491 return r;
1492 break;
1493
1494 case RECURSIVE_SET_XATTR:
1495 r = glob_item(i, path_set_xattrs, true);
1496 if (r < 0)
1497 return r;
1498 break;
1499
1500 case SET_ACL:
1501 r = glob_item(i, path_set_acls, false);
1502 if (r < 0)
1503 return r;
1504 break;
1505
1506 case RECURSIVE_SET_ACL:
1507 r = glob_item(i, path_set_acls, true);
1508 if (r < 0)
1509 return r;
1510 break;
1511
1512 case SET_ATTRIBUTE:
1513 r = glob_item(i, path_set_attribute, false);
1514 if (r < 0)
1515 return r;
1516 break;
1517
1518 case RECURSIVE_SET_ATTRIBUTE:
1519 r = glob_item(i, path_set_attribute, true);
1520 if (r < 0)
1521 return r;
1522 break;
1523 }
1524
1525 return 0;
1526 }
1527
1528 static int remove_item_instance(Item *i, const char *instance) {
1529 int r;
1530
1531 assert(i);
1532
1533 switch (i->type) {
1534
1535 case REMOVE_PATH:
1536 if (remove(instance) < 0 && errno != ENOENT)
1537 return log_error_errno(errno, "rm(%s): %m", instance);
1538
1539 break;
1540
1541 case TRUNCATE_DIRECTORY:
1542 case RECURSIVE_REMOVE_PATH:
1543 /* FIXME: we probably should use dir_cleanup() here
1544 * instead of rm_rf() so that 'x' is honoured. */
1545 log_debug("rm -rf \"%s\"", instance);
1546 r = rm_rf(instance, (i->type == RECURSIVE_REMOVE_PATH ? REMOVE_ROOT|REMOVE_SUBVOLUME : 0) | REMOVE_PHYSICAL);
1547 if (r < 0 && r != -ENOENT)
1548 return log_error_errno(r, "rm_rf(%s): %m", instance);
1549
1550 break;
1551
1552 default:
1553 assert_not_reached("wut?");
1554 }
1555
1556 return 0;
1557 }
1558
1559 static int remove_item(Item *i) {
1560 assert(i);
1561
1562 log_debug("Running remove action for entry %c %s", (char) i->type, i->path);
1563
1564 switch (i->type) {
1565
1566 case REMOVE_PATH:
1567 case TRUNCATE_DIRECTORY:
1568 case RECURSIVE_REMOVE_PATH:
1569 return glob_item(i, remove_item_instance, false);
1570
1571 default:
1572 return 0;
1573 }
1574 }
1575
1576 static int clean_item_instance(Item *i, const char* instance) {
1577 _cleanup_closedir_ DIR *d = NULL;
1578 struct stat s, ps;
1579 bool mountpoint;
1580 usec_t cutoff, n;
1581 char timestamp[FORMAT_TIMESTAMP_MAX];
1582
1583 assert(i);
1584
1585 if (!i->age_set)
1586 return 0;
1587
1588 n = now(CLOCK_REALTIME);
1589 if (n < i->age)
1590 return 0;
1591
1592 cutoff = n - i->age;
1593
1594 d = opendir_nomod(instance);
1595 if (!d) {
1596 if (IN_SET(errno, ENOENT, ENOTDIR)) {
1597 log_debug_errno(errno, "Directory \"%s\": %m", instance);
1598 return 0;
1599 }
1600
1601 return log_error_errno(errno, "Failed to open directory %s: %m", instance);
1602 }
1603
1604 if (fstat(dirfd(d), &s) < 0)
1605 return log_error_errno(errno, "stat(%s) failed: %m", i->path);
1606
1607 if (!S_ISDIR(s.st_mode)) {
1608 log_error("%s is not a directory.", i->path);
1609 return -ENOTDIR;
1610 }
1611
1612 if (fstatat(dirfd(d), "..", &ps, AT_SYMLINK_NOFOLLOW) != 0)
1613 return log_error_errno(errno, "stat(%s/..) failed: %m", i->path);
1614
1615 mountpoint = s.st_dev != ps.st_dev || s.st_ino == ps.st_ino;
1616
1617 log_debug("Cleanup threshold for %s \"%s\" is %s",
1618 mountpoint ? "mount point" : "directory",
1619 instance,
1620 format_timestamp_us(timestamp, sizeof(timestamp), cutoff));
1621
1622 return dir_cleanup(i, instance, d, &s, cutoff, s.st_dev, mountpoint,
1623 MAX_DEPTH, i->keep_first_level);
1624 }
1625
1626 static int clean_item(Item *i) {
1627 assert(i);
1628
1629 log_debug("Running clean action for entry %c %s", (char) i->type, i->path);
1630
1631 switch (i->type) {
1632 case CREATE_DIRECTORY:
1633 case CREATE_SUBVOLUME:
1634 case CREATE_SUBVOLUME_INHERIT_QUOTA:
1635 case CREATE_SUBVOLUME_NEW_QUOTA:
1636 case EMPTY_DIRECTORY:
1637 case TRUNCATE_DIRECTORY:
1638 case IGNORE_PATH:
1639 case COPY_FILES:
1640 clean_item_instance(i, i->path);
1641 return 0;
1642 case IGNORE_DIRECTORY_PATH:
1643 return glob_item(i, clean_item_instance, false);
1644 default:
1645 return 0;
1646 }
1647 }
1648
1649 static int process_item_array(ItemArray *array);
1650
1651 static int process_item(Item *i) {
1652 int r, q, p, t = 0;
1653 _cleanup_free_ char *prefix = NULL;
1654
1655 assert(i);
1656
1657 if (i->done)
1658 return 0;
1659
1660 i->done = true;
1661
1662 prefix = malloc(strlen(i->path) + 1);
1663 if (!prefix)
1664 return log_oom();
1665
1666 PATH_FOREACH_PREFIX(prefix, i->path) {
1667 ItemArray *j;
1668
1669 j = ordered_hashmap_get(items, prefix);
1670 if (j) {
1671 int s;
1672
1673 s = process_item_array(j);
1674 if (s < 0 && t == 0)
1675 t = s;
1676 }
1677 }
1678
1679 if (chase_symlinks(i->path, NULL, CHASE_NO_AUTOFS, NULL) == -EREMOTE)
1680 return t;
1681
1682 r = arg_create ? create_item(i) : 0;
1683 q = arg_remove ? remove_item(i) : 0;
1684 p = arg_clean ? clean_item(i) : 0;
1685
1686 return t < 0 ? t :
1687 r < 0 ? r :
1688 q < 0 ? q :
1689 p;
1690 }
1691
1692 static int process_item_array(ItemArray *array) {
1693 unsigned n;
1694 int r = 0, k;
1695
1696 assert(array);
1697
1698 for (n = 0; n < array->count; n++) {
1699 k = process_item(array->items + n);
1700 if (k < 0 && r == 0)
1701 r = k;
1702 }
1703
1704 return r;
1705 }
1706
1707 static void item_free_contents(Item *i) {
1708 assert(i);
1709 free(i->path);
1710 free(i->argument);
1711 strv_free(i->xattrs);
1712
1713 #if HAVE_ACL
1714 acl_free(i->acl_access);
1715 acl_free(i->acl_default);
1716 #endif
1717 }
1718
1719 static void item_array_free(ItemArray *a) {
1720 unsigned n;
1721
1722 if (!a)
1723 return;
1724
1725 for (n = 0; n < a->count; n++)
1726 item_free_contents(a->items + n);
1727 free(a->items);
1728 free(a);
1729 }
1730
1731 static int item_compare(const void *a, const void *b) {
1732 const Item *x = a, *y = b;
1733
1734 /* Make sure that the ownership taking item is put first, so
1735 * that we first create the node, and then can adjust it */
1736
1737 if (takes_ownership(x->type) && !takes_ownership(y->type))
1738 return -1;
1739 if (!takes_ownership(x->type) && takes_ownership(y->type))
1740 return 1;
1741
1742 return (int) x->type - (int) y->type;
1743 }
1744
1745 static bool item_compatible(Item *a, Item *b) {
1746 assert(a);
1747 assert(b);
1748 assert(streq(a->path, b->path));
1749
1750 if (takes_ownership(a->type) && takes_ownership(b->type))
1751 /* check if the items are the same */
1752 return streq_ptr(a->argument, b->argument) &&
1753
1754 a->uid_set == b->uid_set &&
1755 a->uid == b->uid &&
1756
1757 a->gid_set == b->gid_set &&
1758 a->gid == b->gid &&
1759
1760 a->mode_set == b->mode_set &&
1761 a->mode == b->mode &&
1762
1763 a->age_set == b->age_set &&
1764 a->age == b->age &&
1765
1766 a->mask_perms == b->mask_perms &&
1767
1768 a->keep_first_level == b->keep_first_level &&
1769
1770 a->major_minor == b->major_minor;
1771
1772 return true;
1773 }
1774
1775 static bool should_include_path(const char *path) {
1776 char **prefix;
1777
1778 STRV_FOREACH(prefix, arg_exclude_prefixes)
1779 if (path_startswith(path, *prefix)) {
1780 log_debug("Entry \"%s\" matches exclude prefix \"%s\", skipping.",
1781 path, *prefix);
1782 return false;
1783 }
1784
1785 STRV_FOREACH(prefix, arg_include_prefixes)
1786 if (path_startswith(path, *prefix)) {
1787 log_debug("Entry \"%s\" matches include prefix \"%s\".", path, *prefix);
1788 return true;
1789 }
1790
1791 /* no matches, so we should include this path only if we
1792 * have no whitelist at all */
1793 if (strv_length(arg_include_prefixes) == 0)
1794 return true;
1795
1796 log_debug("Entry \"%s\" does not match any include prefix, skipping.", path);
1797 return false;
1798 }
1799
1800 static int specifier_expansion_from_arg(Item *i) {
1801 _cleanup_free_ char *unescaped = NULL, *resolved = NULL;
1802 char **xattr;
1803 int r;
1804
1805 assert(i);
1806
1807 if (i->argument == NULL)
1808 return 0;
1809
1810 switch (i->type) {
1811 case COPY_FILES:
1812 case CREATE_SYMLINK:
1813 case CREATE_FILE:
1814 case TRUNCATE_FILE:
1815 case WRITE_FILE:
1816 r = cunescape(i->argument, 0, &unescaped);
1817 if (r < 0)
1818 return log_error_errno(r, "Failed to unescape parameter to write: %s", i->argument);
1819
1820 r = specifier_printf(unescaped, specifier_table, NULL, &resolved);
1821 if (r < 0)
1822 return r;
1823
1824 free_and_replace(i->argument, resolved);
1825 break;
1826
1827 case SET_XATTR:
1828 case RECURSIVE_SET_XATTR:
1829 assert(i->xattrs);
1830
1831 STRV_FOREACH (xattr, i->xattrs) {
1832 r = specifier_printf(*xattr, specifier_table, NULL, &resolved);
1833 if (r < 0)
1834 return r;
1835
1836 free_and_replace(*xattr, resolved);
1837 }
1838 break;
1839
1840 default:
1841 break;
1842 }
1843 return 0;
1844 }
1845
1846 static int parse_line(const char *fname, unsigned line, const char *buffer) {
1847
1848 _cleanup_free_ char *action = NULL, *mode = NULL, *user = NULL, *group = NULL, *age = NULL, *path = NULL;
1849 _cleanup_(item_free_contents) Item i = {};
1850 ItemArray *existing;
1851 OrderedHashmap *h;
1852 int r, pos;
1853 bool force = false, boot = false;
1854
1855 assert(fname);
1856 assert(line >= 1);
1857 assert(buffer);
1858
1859 r = extract_many_words(
1860 &buffer,
1861 NULL,
1862 EXTRACT_QUOTES,
1863 &action,
1864 &path,
1865 &mode,
1866 &user,
1867 &group,
1868 &age,
1869 NULL);
1870 if (r < 0)
1871 return log_error_errno(r, "[%s:%u] Failed to parse line: %m", fname, line);
1872 else if (r < 2) {
1873 log_error("[%s:%u] Syntax error.", fname, line);
1874 return -EIO;
1875 }
1876
1877 if (!isempty(buffer) && !streq(buffer, "-")) {
1878 i.argument = strdup(buffer);
1879 if (!i.argument)
1880 return log_oom();
1881 }
1882
1883 if (isempty(action)) {
1884 log_error("[%s:%u] Command too short '%s'.", fname, line, action);
1885 return -EINVAL;
1886 }
1887
1888 for (pos = 1; action[pos]; pos++) {
1889 if (action[pos] == '!' && !boot)
1890 boot = true;
1891 else if (action[pos] == '+' && !force)
1892 force = true;
1893 else {
1894 log_error("[%s:%u] Unknown modifiers in command '%s'",
1895 fname, line, action);
1896 return -EINVAL;
1897 }
1898 }
1899
1900 if (boot && !arg_boot) {
1901 log_debug("Ignoring entry %s \"%s\" because --boot is not specified.",
1902 action, path);
1903 return 0;
1904 }
1905
1906 i.type = action[0];
1907 i.force = force;
1908
1909 r = specifier_printf(path, specifier_table, NULL, &i.path);
1910 if (r == -ENOKEY)
1911 return log_unresolvable_specifier(fname, line);
1912 if (r < 0)
1913 return log_error_errno(r, "[%s:%u] Failed to replace specifiers: %s", fname, line, path);
1914
1915 switch (i.type) {
1916
1917 case CREATE_DIRECTORY:
1918 case CREATE_SUBVOLUME:
1919 case CREATE_SUBVOLUME_INHERIT_QUOTA:
1920 case CREATE_SUBVOLUME_NEW_QUOTA:
1921 case EMPTY_DIRECTORY:
1922 case TRUNCATE_DIRECTORY:
1923 case CREATE_FIFO:
1924 case IGNORE_PATH:
1925 case IGNORE_DIRECTORY_PATH:
1926 case REMOVE_PATH:
1927 case RECURSIVE_REMOVE_PATH:
1928 case ADJUST_MODE:
1929 case RELABEL_PATH:
1930 case RECURSIVE_RELABEL_PATH:
1931 if (i.argument)
1932 log_warning("[%s:%u] %c lines don't take argument fields, ignoring.", fname, line, i.type);
1933
1934 break;
1935
1936 case CREATE_FILE:
1937 case TRUNCATE_FILE:
1938 break;
1939
1940 case CREATE_SYMLINK:
1941 if (!i.argument) {
1942 i.argument = strappend("/usr/share/factory/", i.path);
1943 if (!i.argument)
1944 return log_oom();
1945 }
1946 break;
1947
1948 case WRITE_FILE:
1949 if (!i.argument) {
1950 log_error("[%s:%u] Write file requires argument.", fname, line);
1951 return -EBADMSG;
1952 }
1953 break;
1954
1955 case COPY_FILES:
1956 if (!i.argument) {
1957 i.argument = strappend("/usr/share/factory/", i.path);
1958 if (!i.argument)
1959 return log_oom();
1960 } else if (!path_is_absolute(i.argument)) {
1961 log_error("[%s:%u] Source path is not absolute.", fname, line);
1962 return -EBADMSG;
1963 }
1964
1965 path_kill_slashes(i.argument);
1966 break;
1967
1968 case CREATE_CHAR_DEVICE:
1969 case CREATE_BLOCK_DEVICE: {
1970 unsigned major, minor;
1971
1972 if (!i.argument) {
1973 log_error("[%s:%u] Device file requires argument.", fname, line);
1974 return -EBADMSG;
1975 }
1976
1977 if (sscanf(i.argument, "%u:%u", &major, &minor) != 2) {
1978 log_error("[%s:%u] Can't parse device file major/minor '%s'.", fname, line, i.argument);
1979 return -EBADMSG;
1980 }
1981
1982 i.major_minor = makedev(major, minor);
1983 break;
1984 }
1985
1986 case SET_XATTR:
1987 case RECURSIVE_SET_XATTR:
1988 if (!i.argument) {
1989 log_error("[%s:%u] Set extended attribute requires argument.", fname, line);
1990 return -EBADMSG;
1991 }
1992 r = parse_xattrs_from_arg(&i);
1993 if (r < 0)
1994 return r;
1995 break;
1996
1997 case SET_ACL:
1998 case RECURSIVE_SET_ACL:
1999 if (!i.argument) {
2000 log_error("[%s:%u] Set ACLs requires argument.", fname, line);
2001 return -EBADMSG;
2002 }
2003 r = parse_acls_from_arg(&i);
2004 if (r < 0)
2005 return r;
2006 break;
2007
2008 case SET_ATTRIBUTE:
2009 case RECURSIVE_SET_ATTRIBUTE:
2010 if (!i.argument) {
2011 log_error("[%s:%u] Set file attribute requires argument.", fname, line);
2012 return -EBADMSG;
2013 }
2014 r = parse_attribute_from_arg(&i);
2015 if (r < 0)
2016 return r;
2017 break;
2018
2019 default:
2020 log_error("[%s:%u] Unknown command type '%c'.", fname, line, (char) i.type);
2021 return -EBADMSG;
2022 }
2023
2024 if (!path_is_absolute(i.path)) {
2025 log_error("[%s:%u] Path '%s' not absolute.", fname, line, i.path);
2026 return -EBADMSG;
2027 }
2028
2029 path_kill_slashes(i.path);
2030
2031 if (!should_include_path(i.path))
2032 return 0;
2033
2034 r = specifier_expansion_from_arg(&i);
2035 if (r == -ENOKEY)
2036 return log_unresolvable_specifier(fname, line);
2037 if (r < 0)
2038 return log_error_errno(r, "[%s:%u] Failed to substitute specifiers in argument: %m",
2039 fname, line);
2040
2041 if (arg_root) {
2042 char *p;
2043
2044 p = prefix_root(arg_root, i.path);
2045 if (!p)
2046 return log_oom();
2047
2048 free(i.path);
2049 i.path = p;
2050 }
2051
2052 if (!isempty(user) && !streq(user, "-")) {
2053 const char *u = user;
2054
2055 r = get_user_creds(&u, &i.uid, NULL, NULL, NULL);
2056 if (r < 0) {
2057 log_error("[%s:%u] Unknown user '%s'.", fname, line, user);
2058 return r;
2059 }
2060
2061 i.uid_set = true;
2062 }
2063
2064 if (!isempty(group) && !streq(group, "-")) {
2065 const char *g = group;
2066
2067 r = get_group_creds(&g, &i.gid);
2068 if (r < 0) {
2069 log_error("[%s:%u] Unknown group '%s'.", fname, line, group);
2070 return r;
2071 }
2072
2073 i.gid_set = true;
2074 }
2075
2076 if (!isempty(mode) && !streq(mode, "-")) {
2077 const char *mm = mode;
2078 unsigned m;
2079
2080 if (*mm == '~') {
2081 i.mask_perms = true;
2082 mm++;
2083 }
2084
2085 if (parse_mode(mm, &m) < 0) {
2086 log_error("[%s:%u] Invalid mode '%s'.", fname, line, mode);
2087 return -EBADMSG;
2088 }
2089
2090 i.mode = m;
2091 i.mode_set = true;
2092 } else
2093 i.mode = IN_SET(i.type, CREATE_DIRECTORY, TRUNCATE_DIRECTORY, CREATE_SUBVOLUME, CREATE_SUBVOLUME_INHERIT_QUOTA, CREATE_SUBVOLUME_NEW_QUOTA) ? 0755 : 0644;
2094
2095 if (!isempty(age) && !streq(age, "-")) {
2096 const char *a = age;
2097
2098 if (*a == '~') {
2099 i.keep_first_level = true;
2100 a++;
2101 }
2102
2103 if (parse_sec(a, &i.age) < 0) {
2104 log_error("[%s:%u] Invalid age '%s'.", fname, line, age);
2105 return -EBADMSG;
2106 }
2107
2108 i.age_set = true;
2109 }
2110
2111 h = needs_glob(i.type) ? globs : items;
2112
2113 existing = ordered_hashmap_get(h, i.path);
2114 if (existing) {
2115 unsigned n;
2116
2117 for (n = 0; n < existing->count; n++) {
2118 if (!item_compatible(existing->items + n, &i)) {
2119 log_warning("[%s:%u] Duplicate line for path \"%s\", ignoring.",
2120 fname, line, i.path);
2121 return 0;
2122 }
2123 }
2124 } else {
2125 existing = new0(ItemArray, 1);
2126 r = ordered_hashmap_put(h, i.path, existing);
2127 if (r < 0)
2128 return log_oom();
2129 }
2130
2131 if (!GREEDY_REALLOC(existing->items, existing->size, existing->count + 1))
2132 return log_oom();
2133
2134 memcpy(existing->items + existing->count++, &i, sizeof(i));
2135
2136 /* Sort item array, to enforce stable ordering of application */
2137 qsort_safe(existing->items, existing->count, sizeof(Item), item_compare);
2138
2139 zero(i);
2140 return 0;
2141 }
2142
2143 static void help(void) {
2144 printf("%s [OPTIONS...] [CONFIGURATION FILE...]\n\n"
2145 "Creates, deletes and cleans up volatile and temporary files and directories.\n\n"
2146 " -h --help Show this help\n"
2147 " --version Show package version\n"
2148 " --create Create marked files/directories\n"
2149 " --clean Clean up marked directories\n"
2150 " --remove Remove marked files/directories\n"
2151 " --boot Execute actions only safe at boot\n"
2152 " --prefix=PATH Only apply rules with the specified prefix\n"
2153 " --exclude-prefix=PATH Ignore rules with the specified prefix\n"
2154 " --root=PATH Operate on an alternate filesystem root\n",
2155 program_invocation_short_name);
2156 }
2157
2158 static int parse_argv(int argc, char *argv[]) {
2159
2160 enum {
2161 ARG_VERSION = 0x100,
2162 ARG_CREATE,
2163 ARG_CLEAN,
2164 ARG_REMOVE,
2165 ARG_BOOT,
2166 ARG_PREFIX,
2167 ARG_EXCLUDE_PREFIX,
2168 ARG_ROOT,
2169 };
2170
2171 static const struct option options[] = {
2172 { "help", no_argument, NULL, 'h' },
2173 { "version", no_argument, NULL, ARG_VERSION },
2174 { "create", no_argument, NULL, ARG_CREATE },
2175 { "clean", no_argument, NULL, ARG_CLEAN },
2176 { "remove", no_argument, NULL, ARG_REMOVE },
2177 { "boot", no_argument, NULL, ARG_BOOT },
2178 { "prefix", required_argument, NULL, ARG_PREFIX },
2179 { "exclude-prefix", required_argument, NULL, ARG_EXCLUDE_PREFIX },
2180 { "root", required_argument, NULL, ARG_ROOT },
2181 {}
2182 };
2183
2184 int c, r;
2185
2186 assert(argc >= 0);
2187 assert(argv);
2188
2189 while ((c = getopt_long(argc, argv, "h", options, NULL)) >= 0)
2190
2191 switch (c) {
2192
2193 case 'h':
2194 help();
2195 return 0;
2196
2197 case ARG_VERSION:
2198 return version();
2199
2200 case ARG_CREATE:
2201 arg_create = true;
2202 break;
2203
2204 case ARG_CLEAN:
2205 arg_clean = true;
2206 break;
2207
2208 case ARG_REMOVE:
2209 arg_remove = true;
2210 break;
2211
2212 case ARG_BOOT:
2213 arg_boot = true;
2214 break;
2215
2216 case ARG_PREFIX:
2217 if (strv_push(&arg_include_prefixes, optarg) < 0)
2218 return log_oom();
2219 break;
2220
2221 case ARG_EXCLUDE_PREFIX:
2222 if (strv_push(&arg_exclude_prefixes, optarg) < 0)
2223 return log_oom();
2224 break;
2225
2226 case ARG_ROOT:
2227 r = parse_path_argument_and_warn(optarg, true, &arg_root);
2228 if (r < 0)
2229 return r;
2230 break;
2231
2232 case '?':
2233 return -EINVAL;
2234
2235 default:
2236 assert_not_reached("Unhandled option");
2237 }
2238
2239 if (!arg_clean && !arg_create && !arg_remove) {
2240 log_error("You need to specify at least one of --clean, --create or --remove.");
2241 return -EINVAL;
2242 }
2243
2244 return 1;
2245 }
2246
2247 static int read_config_file(const char *fn, bool ignore_enoent) {
2248 _cleanup_fclose_ FILE *_f = NULL;
2249 FILE *f;
2250 char line[LINE_MAX];
2251 Iterator iterator;
2252 unsigned v = 0;
2253 Item *i;
2254 int r = 0;
2255
2256 assert(fn);
2257
2258 if (streq(fn, "-")) {
2259 log_debug("Reading config from stdin.");
2260 fn = "<stdin>";
2261 f = stdin;
2262 } else {
2263 r = search_and_fopen_nulstr(fn, "re", arg_root, conf_file_dirs, &_f);
2264 if (r < 0) {
2265 if (ignore_enoent && r == -ENOENT) {
2266 log_debug_errno(r, "Failed to open \"%s\", ignoring: %m", fn);
2267 return 0;
2268 }
2269
2270 return log_error_errno(r, "Failed to open '%s': %m", fn);
2271 }
2272 log_debug("Reading config file \"%s\".", fn);
2273 f = _f;
2274 }
2275
2276 FOREACH_LINE(line, f, break) {
2277 char *l;
2278 int k;
2279
2280 v++;
2281
2282 l = strstrip(line);
2283 if (IN_SET(*l, 0, '#'))
2284 continue;
2285
2286 k = parse_line(fn, v, l);
2287 if (k < 0 && r == 0)
2288 r = k;
2289 }
2290
2291 /* we have to determine age parameter for each entry of type X */
2292 ORDERED_HASHMAP_FOREACH(i, globs, iterator) {
2293 Iterator iter;
2294 Item *j, *candidate_item = NULL;
2295
2296 if (i->type != IGNORE_DIRECTORY_PATH)
2297 continue;
2298
2299 ORDERED_HASHMAP_FOREACH(j, items, iter) {
2300 if (!IN_SET(j->type, CREATE_DIRECTORY, TRUNCATE_DIRECTORY, CREATE_SUBVOLUME, CREATE_SUBVOLUME_INHERIT_QUOTA, CREATE_SUBVOLUME_NEW_QUOTA))
2301 continue;
2302
2303 if (path_equal(j->path, i->path)) {
2304 candidate_item = j;
2305 break;
2306 }
2307
2308 if ((!candidate_item && path_startswith(i->path, j->path)) ||
2309 (candidate_item && path_startswith(j->path, candidate_item->path) && (fnmatch(i->path, j->path, FNM_PATHNAME | FNM_PERIOD) == 0)))
2310 candidate_item = j;
2311 }
2312
2313 if (candidate_item && candidate_item->age_set) {
2314 i->age = candidate_item->age;
2315 i->age_set = true;
2316 }
2317 }
2318
2319 if (ferror(f)) {
2320 log_error_errno(errno, "Failed to read from file %s: %m", fn);
2321 if (r == 0)
2322 r = -EIO;
2323 }
2324
2325 return r;
2326 }
2327
2328 int main(int argc, char *argv[]) {
2329 int r, k;
2330 ItemArray *a;
2331 Iterator iterator;
2332
2333 r = parse_argv(argc, argv);
2334 if (r <= 0)
2335 goto finish;
2336
2337 log_set_target(LOG_TARGET_AUTO);
2338 log_parse_environment();
2339 log_open();
2340
2341 umask(0022);
2342
2343 mac_selinux_init();
2344
2345 items = ordered_hashmap_new(&string_hash_ops);
2346 globs = ordered_hashmap_new(&string_hash_ops);
2347
2348 if (!items || !globs) {
2349 r = log_oom();
2350 goto finish;
2351 }
2352
2353 r = 0;
2354
2355 if (optind < argc) {
2356 int j;
2357
2358 for (j = optind; j < argc; j++) {
2359 k = read_config_file(argv[j], false);
2360 if (k < 0 && r == 0)
2361 r = k;
2362 }
2363
2364 } else {
2365 _cleanup_strv_free_ char **files = NULL;
2366 char **f;
2367
2368 r = conf_files_list_nulstr(&files, ".conf", arg_root, 0, conf_file_dirs);
2369 if (r < 0) {
2370 log_error_errno(r, "Failed to enumerate tmpfiles.d files: %m");
2371 goto finish;
2372 }
2373
2374 STRV_FOREACH(f, files) {
2375 k = read_config_file(*f, true);
2376 if (k < 0 && r == 0)
2377 r = k;
2378 }
2379 }
2380
2381 /* The non-globbing ones usually create things, hence we apply
2382 * them first */
2383 ORDERED_HASHMAP_FOREACH(a, items, iterator) {
2384 k = process_item_array(a);
2385 if (k < 0 && r == 0)
2386 r = k;
2387 }
2388
2389 /* The globbing ones usually alter things, hence we apply them
2390 * second. */
2391 ORDERED_HASHMAP_FOREACH(a, globs, iterator) {
2392 k = process_item_array(a);
2393 if (k < 0 && r == 0)
2394 r = k;
2395 }
2396
2397 finish:
2398 while ((a = ordered_hashmap_steal_first(items)))
2399 item_array_free(a);
2400
2401 while ((a = ordered_hashmap_steal_first(globs)))
2402 item_array_free(a);
2403
2404 ordered_hashmap_free(items);
2405 ordered_hashmap_free(globs);
2406
2407 free(arg_include_prefixes);
2408 free(arg_exclude_prefixes);
2409 free(arg_root);
2410
2411 set_free_free(unix_sockets);
2412
2413 mac_selinux_finish();
2414
2415 return r < 0 ? EXIT_FAILURE : EXIT_SUCCESS;
2416 }
Unnamed repository; edit this file 'description' to name the repository.