]> 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
Merge pull request #7388 from keszybz/doc-tweak
[thirdparty/systemd.git] / src / tmpfiles / tmpfiles.c
1 /***
2 This file is part of systemd.
3
4 Copyright 2010 Lennart Poettering, Kay Sievers
5 Copyright 2015 Zbigniew Jędrzejewski-Szmek
6
7 systemd is free software; you can redistribute it and/or modify it
8 under the terms of the GNU Lesser General Public License as published by
9 the Free Software Foundation; either version 2.1 of the License, or
10 (at your option) any later version.
11
12 systemd is distributed in the hope that it will be useful, but
13 WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 Lesser General Public License for more details.
16
17 You should have received a copy of the GNU Lesser General Public License
18 along with systemd; If not, see <http://www.gnu.org/licenses/>.
19 ***/
20
21 #include <errno.h>
22 #include <fcntl.h>
23 #include <fnmatch.h>
24 #include <getopt.h>
25 #include <glob.h>
26 #include <limits.h>
27 #include <linux/fs.h>
28 #include <stdbool.h>
29 #include <stddef.h>
30 #include <stdio.h>
31 #include <stdlib.h>
32 #include <string.h>
33 #include <sys/stat.h>
34 #include <sys/xattr.h>
35 #include <time.h>
36 #include <unistd.h>
37
38 #include "acl-util.h"
39 #include "alloc-util.h"
40 #include "btrfs-util.h"
41 #include "capability-util.h"
42 #include "chattr-util.h"
43 #include "conf-files.h"
44 #include "copy.h"
45 #include "def.h"
46 #include "dirent-util.h"
47 #include "escape.h"
48 #include "fd-util.h"
49 #include "fileio.h"
50 #include "format-util.h"
51 #include "fs-util.h"
52 #include "glob-util.h"
53 #include "io-util.h"
54 #include "label.h"
55 #include "log.h"
56 #include "macro.h"
57 #include "missing.h"
58 #include "mkdir.h"
59 #include "mount-util.h"
60 #include "parse-util.h"
61 #include "path-util.h"
62 #include "rm-rf.h"
63 #include "selinux-util.h"
64 #include "set.h"
65 #include "specifier.h"
66 #include "stat-util.h"
67 #include "stdio-util.h"
68 #include "string-table.h"
69 #include "string-util.h"
70 #include "strv.h"
71 #include "umask-util.h"
72 #include "user-util.h"
73 #include "util.h"
74
75 /* This reads all files listed in /etc/tmpfiles.d/?*.conf and creates
76 * them in the file system. This is intended to be used to create
77 * properly owned directories beneath /tmp, /var/tmp, /run, which are
78 * volatile and hence need to be recreated on bootup. */
79
80 typedef enum ItemType {
81 /* These ones take file names */
82 CREATE_FILE = 'f',
83 TRUNCATE_FILE = 'F',
84 CREATE_DIRECTORY = 'd',
85 TRUNCATE_DIRECTORY = 'D',
86 CREATE_SUBVOLUME = 'v',
87 CREATE_SUBVOLUME_INHERIT_QUOTA = 'q',
88 CREATE_SUBVOLUME_NEW_QUOTA = 'Q',
89 CREATE_FIFO = 'p',
90 CREATE_SYMLINK = 'L',
91 CREATE_CHAR_DEVICE = 'c',
92 CREATE_BLOCK_DEVICE = 'b',
93 COPY_FILES = 'C',
94
95 /* These ones take globs */
96 WRITE_FILE = 'w',
97 EMPTY_DIRECTORY = 'e',
98 SET_XATTR = 't',
99 RECURSIVE_SET_XATTR = 'T',
100 SET_ACL = 'a',
101 RECURSIVE_SET_ACL = 'A',
102 SET_ATTRIBUTE = 'h',
103 RECURSIVE_SET_ATTRIBUTE = 'H',
104 IGNORE_PATH = 'x',
105 IGNORE_DIRECTORY_PATH = 'X',
106 REMOVE_PATH = 'r',
107 RECURSIVE_REMOVE_PATH = 'R',
108 RELABEL_PATH = 'z',
109 RECURSIVE_RELABEL_PATH = 'Z',
110 ADJUST_MODE = 'm', /* legacy, 'z' is identical to this */
111 } ItemType;
112
113 typedef struct Item {
114 ItemType type;
115
116 char *path;
117 char *argument;
118 char **xattrs;
119 #if HAVE_ACL
120 acl_t acl_access;
121 acl_t acl_default;
122 #endif
123 uid_t uid;
124 gid_t gid;
125 mode_t mode;
126 usec_t age;
127
128 dev_t major_minor;
129 unsigned attribute_value;
130 unsigned attribute_mask;
131
132 bool uid_set:1;
133 bool gid_set:1;
134 bool mode_set:1;
135 bool age_set:1;
136 bool mask_perms:1;
137 bool attribute_set:1;
138
139 bool keep_first_level:1;
140
141 bool force:1;
142
143 bool done:1;
144 } Item;
145
146 typedef struct ItemArray {
147 Item *items;
148 size_t count;
149 size_t size;
150 } ItemArray;
151
152 static bool arg_create = false;
153 static bool arg_clean = false;
154 static bool arg_remove = false;
155 static bool arg_boot = false;
156
157 static char **arg_include_prefixes = NULL;
158 static char **arg_exclude_prefixes = NULL;
159 static char *arg_root = NULL;
160
161 static const char conf_file_dirs[] = CONF_PATHS_NULSTR("tmpfiles.d");
162
163 #define MAX_DEPTH 256
164
165 static OrderedHashmap *items = NULL, *globs = NULL;
166 static Set *unix_sockets = NULL;
167
168 static int specifier_machine_id_safe(char specifier, void *data, void *userdata, char **ret);
169
170 static const Specifier specifier_table[] = {
171 { 'm', specifier_machine_id_safe, NULL },
172 { 'b', specifier_boot_id, NULL },
173 { 'H', specifier_host_name, NULL },
174 { 'v', specifier_kernel_release, NULL },
175 {}
176 };
177
178 static int specifier_machine_id_safe(char specifier, void *data, void *userdata, char **ret) {
179 int r;
180
181 /* If /etc/machine_id is missing (e.g. in a chroot environment), returns
182 * a recognizable error so that the caller can skip the rule
183 * gracefully. */
184
185 r = specifier_machine_id(specifier, data, userdata, ret);
186 if (r == -ENOENT)
187 return -ENOKEY;
188
189 return r;
190 }
191
192 static int log_unresolvable_specifier(const char *filename, unsigned line) {
193 static bool notified = false;
194
195 /* This is called when /etc is not fully initialized (e.g. in a chroot
196 * environment) where some specifiers are unresolvable. These cases are
197 * not considered as an error so log at LOG_NOTICE only for the first
198 * time and then downgrade this to LOG_DEBUG for the rest. */
199
200 log_full(notified ? LOG_DEBUG : LOG_NOTICE,
201 "[%s:%u] Failed to resolve specifier: uninitialized /etc detected, skipping",
202 filename, line);
203
204 if (!notified)
205 log_notice("All rules containing unresolvable specifiers will be skipped.");
206
207 notified = true;
208 return 0;
209 }
210
211 static bool needs_glob(ItemType t) {
212 return IN_SET(t,
213 WRITE_FILE,
214 IGNORE_PATH,
215 IGNORE_DIRECTORY_PATH,
216 REMOVE_PATH,
217 RECURSIVE_REMOVE_PATH,
218 EMPTY_DIRECTORY,
219 ADJUST_MODE,
220 RELABEL_PATH,
221 RECURSIVE_RELABEL_PATH,
222 SET_XATTR,
223 RECURSIVE_SET_XATTR,
224 SET_ACL,
225 RECURSIVE_SET_ACL,
226 SET_ATTRIBUTE,
227 RECURSIVE_SET_ATTRIBUTE);
228 }
229
230 static bool takes_ownership(ItemType t) {
231 return IN_SET(t,
232 CREATE_FILE,
233 TRUNCATE_FILE,
234 CREATE_DIRECTORY,
235 EMPTY_DIRECTORY,
236 TRUNCATE_DIRECTORY,
237 CREATE_SUBVOLUME,
238 CREATE_SUBVOLUME_INHERIT_QUOTA,
239 CREATE_SUBVOLUME_NEW_QUOTA,
240 CREATE_FIFO,
241 CREATE_SYMLINK,
242 CREATE_CHAR_DEVICE,
243 CREATE_BLOCK_DEVICE,
244 COPY_FILES,
245 WRITE_FILE,
246 IGNORE_PATH,
247 IGNORE_DIRECTORY_PATH,
248 REMOVE_PATH,
249 RECURSIVE_REMOVE_PATH);
250 }
251
252 static struct Item* find_glob(OrderedHashmap *h, const char *match) {
253 ItemArray *j;
254 Iterator i;
255
256 ORDERED_HASHMAP_FOREACH(j, h, i) {
257 unsigned n;
258
259 for (n = 0; n < j->count; n++) {
260 Item *item = j->items + n;
261
262 if (fnmatch(item->path, match, FNM_PATHNAME|FNM_PERIOD) == 0)
263 return item;
264 }
265 }
266
267 return NULL;
268 }
269
270 static void load_unix_sockets(void) {
271 _cleanup_fclose_ FILE *f = NULL;
272 char line[LINE_MAX];
273
274 if (unix_sockets)
275 return;
276
277 /* We maintain a cache of the sockets we found in
278 * /proc/net/unix to speed things up a little. */
279
280 unix_sockets = set_new(&string_hash_ops);
281 if (!unix_sockets)
282 return;
283
284 f = fopen("/proc/net/unix", "re");
285 if (!f)
286 return;
287
288 /* Skip header */
289 if (!fgets(line, sizeof(line), f))
290 goto fail;
291
292 for (;;) {
293 char *p, *s;
294 int k;
295
296 if (!fgets(line, sizeof(line), f))
297 break;
298
299 truncate_nl(line);
300
301 p = strchr(line, ':');
302 if (!p)
303 continue;
304
305 if (strlen(p) < 37)
306 continue;
307
308 p += 37;
309 p += strspn(p, WHITESPACE);
310 p += strcspn(p, WHITESPACE); /* skip one more word */
311 p += strspn(p, WHITESPACE);
312
313 if (*p != '/')
314 continue;
315
316 s = strdup(p);
317 if (!s)
318 goto fail;
319
320 path_kill_slashes(s);
321
322 k = set_consume(unix_sockets, s);
323 if (k < 0 && k != -EEXIST)
324 goto fail;
325 }
326
327 return;
328
329 fail:
330 set_free_free(unix_sockets);
331 unix_sockets = NULL;
332 }
333
334 static bool unix_socket_alive(const char *fn) {
335 assert(fn);
336
337 load_unix_sockets();
338
339 if (unix_sockets)
340 return !!set_get(unix_sockets, (char*) fn);
341
342 /* We don't know, so assume yes */
343 return true;
344 }
345
346 static int dir_is_mount_point(DIR *d, const char *subdir) {
347
348 union file_handle_union h = FILE_HANDLE_INIT;
349 int mount_id_parent, mount_id;
350 int r_p, r;
351
352 r_p = name_to_handle_at(dirfd(d), ".", &h.handle, &mount_id_parent, 0);
353 if (r_p < 0)
354 r_p = -errno;
355
356 h.handle.handle_bytes = MAX_HANDLE_SZ;
357 r = name_to_handle_at(dirfd(d), subdir, &h.handle, &mount_id, 0);
358 if (r < 0)
359 r = -errno;
360
361 /* got no handle; make no assumptions, return error */
362 if (r_p < 0 && r < 0)
363 return r_p;
364
365 /* got both handles; if they differ, it is a mount point */
366 if (r_p >= 0 && r >= 0)
367 return mount_id_parent != mount_id;
368
369 /* got only one handle; assume different mount points if one
370 * of both queries was not supported by the filesystem */
371 if (IN_SET(r_p, -ENOSYS, -EOPNOTSUPP) || IN_SET(r, -ENOSYS, -EOPNOTSUPP))
372 return true;
373
374 /* return error */
375 if (r_p < 0)
376 return r_p;
377 return r;
378 }
379
380 static DIR* xopendirat_nomod(int dirfd, const char *path) {
381 DIR *dir;
382
383 dir = xopendirat(dirfd, path, O_NOFOLLOW|O_NOATIME);
384 if (dir)
385 return dir;
386
387 log_debug_errno(errno, "Cannot open %sdirectory \"%s\": %m", dirfd == AT_FDCWD ? "" : "sub", path);
388 if (errno != EPERM)
389 return NULL;
390
391 dir = xopendirat(dirfd, path, O_NOFOLLOW);
392 if (!dir)
393 log_debug_errno(errno, "Cannot open %sdirectory \"%s\": %m", dirfd == AT_FDCWD ? "" : "sub", path);
394
395 return dir;
396 }
397
398 static DIR* opendir_nomod(const char *path) {
399 return xopendirat_nomod(AT_FDCWD, path);
400 }
401
402 static int dir_cleanup(
403 Item *i,
404 const char *p,
405 DIR *d,
406 const struct stat *ds,
407 usec_t cutoff,
408 dev_t rootdev,
409 bool mountpoint,
410 int maxdepth,
411 bool keep_this_level) {
412
413 struct dirent *dent;
414 struct timespec times[2];
415 bool deleted = false;
416 int r = 0;
417
418 FOREACH_DIRENT_ALL(dent, d, break) {
419 struct stat s;
420 usec_t age;
421 _cleanup_free_ char *sub_path = NULL;
422
423 if (dot_or_dot_dot(dent->d_name))
424 continue;
425
426 if (fstatat(dirfd(d), dent->d_name, &s, AT_SYMLINK_NOFOLLOW) < 0) {
427 if (errno == ENOENT)
428 continue;
429
430 /* FUSE, NFS mounts, SELinux might return EACCES */
431 if (errno == EACCES)
432 log_debug_errno(errno, "stat(%s/%s) failed: %m", p, dent->d_name);
433 else
434 log_error_errno(errno, "stat(%s/%s) failed: %m", p, dent->d_name);
435 r = -errno;
436 continue;
437 }
438
439 /* Stay on the same filesystem */
440 if (s.st_dev != rootdev) {
441 log_debug("Ignoring \"%s/%s\": different filesystem.", p, dent->d_name);
442 continue;
443 }
444
445 /* Try to detect bind mounts of the same filesystem instance; they
446 * do not differ in device major/minors. This type of query is not
447 * supported on all kernels or filesystem types though. */
448 if (S_ISDIR(s.st_mode) && dir_is_mount_point(d, dent->d_name) > 0) {
449 log_debug("Ignoring \"%s/%s\": different mount of the same filesystem.",
450 p, dent->d_name);
451 continue;
452 }
453
454 /* Do not delete read-only files owned by root */
455 if (s.st_uid == 0 && !(s.st_mode & S_IWUSR)) {
456 log_debug("Ignoring \"%s/%s\": read-only and owner by root.", p, dent->d_name);
457 continue;
458 }
459
460 sub_path = strjoin(p, "/", dent->d_name);
461 if (!sub_path) {
462 r = log_oom();
463 goto finish;
464 }
465
466 /* Is there an item configured for this path? */
467 if (ordered_hashmap_get(items, sub_path)) {
468 log_debug("Ignoring \"%s\": a separate entry exists.", sub_path);
469 continue;
470 }
471
472 if (find_glob(globs, sub_path)) {
473 log_debug("Ignoring \"%s\": a separate glob exists.", sub_path);
474 continue;
475 }
476
477 if (S_ISDIR(s.st_mode)) {
478
479 if (mountpoint &&
480 streq(dent->d_name, "lost+found") &&
481 s.st_uid == 0) {
482 log_debug("Ignoring \"%s\".", sub_path);
483 continue;
484 }
485
486 if (maxdepth <= 0)
487 log_warning("Reached max depth on \"%s\".", sub_path);
488 else {
489 _cleanup_closedir_ DIR *sub_dir;
490 int q;
491
492 sub_dir = xopendirat_nomod(dirfd(d), dent->d_name);
493 if (!sub_dir) {
494 if (errno != ENOENT)
495 r = log_error_errno(errno, "opendir(%s) failed: %m", sub_path);
496
497 continue;
498 }
499
500 q = dir_cleanup(i, sub_path, sub_dir, &s, cutoff, rootdev, false, maxdepth-1, false);
501 if (q < 0)
502 r = q;
503 }
504
505 /* Note: if you are wondering why we don't
506 * support the sticky bit for excluding
507 * directories from cleaning like we do it for
508 * other file system objects: well, the sticky
509 * bit already has a meaning for directories,
510 * so we don't want to overload that. */
511
512 if (keep_this_level) {
513 log_debug("Keeping \"%s\".", sub_path);
514 continue;
515 }
516
517 /* Ignore ctime, we change it when deleting */
518 age = timespec_load(&s.st_mtim);
519 if (age >= cutoff) {
520 char a[FORMAT_TIMESTAMP_MAX];
521 /* Follows spelling in stat(1). */
522 log_debug("Directory \"%s\": modify time %s is too new.",
523 sub_path,
524 format_timestamp_us(a, sizeof(a), age));
525 continue;
526 }
527
528 age = timespec_load(&s.st_atim);
529 if (age >= cutoff) {
530 char a[FORMAT_TIMESTAMP_MAX];
531 log_debug("Directory \"%s\": access time %s is too new.",
532 sub_path,
533 format_timestamp_us(a, sizeof(a), age));
534 continue;
535 }
536
537 log_debug("Removing directory \"%s\".", sub_path);
538 if (unlinkat(dirfd(d), dent->d_name, AT_REMOVEDIR) < 0)
539 if (!IN_SET(errno, ENOENT, ENOTEMPTY)) {
540 log_error_errno(errno, "rmdir(%s): %m", sub_path);
541 r = -errno;
542 }
543
544 } else {
545 /* Skip files for which the sticky bit is
546 * set. These are semantics we define, and are
547 * unknown elsewhere. See XDG_RUNTIME_DIR
548 * specification for details. */
549 if (s.st_mode & S_ISVTX) {
550 log_debug("Skipping \"%s\": sticky bit set.", sub_path);
551 continue;
552 }
553
554 if (mountpoint && S_ISREG(s.st_mode))
555 if (s.st_uid == 0 && STR_IN_SET(dent->d_name,
556 ".journal",
557 "aquota.user",
558 "aquota.group")) {
559 log_debug("Skipping \"%s\".", sub_path);
560 continue;
561 }
562
563 /* Ignore sockets that are listed in /proc/net/unix */
564 if (S_ISSOCK(s.st_mode) && unix_socket_alive(sub_path)) {
565 log_debug("Skipping \"%s\": live socket.", sub_path);
566 continue;
567 }
568
569 /* Ignore device nodes */
570 if (S_ISCHR(s.st_mode) || S_ISBLK(s.st_mode)) {
571 log_debug("Skipping \"%s\": a device.", sub_path);
572 continue;
573 }
574
575 /* Keep files on this level around if this is
576 * requested */
577 if (keep_this_level) {
578 log_debug("Keeping \"%s\".", sub_path);
579 continue;
580 }
581
582 age = timespec_load(&s.st_mtim);
583 if (age >= cutoff) {
584 char a[FORMAT_TIMESTAMP_MAX];
585 /* Follows spelling in stat(1). */
586 log_debug("File \"%s\": modify time %s is too new.",
587 sub_path,
588 format_timestamp_us(a, sizeof(a), age));
589 continue;
590 }
591
592 age = timespec_load(&s.st_atim);
593 if (age >= cutoff) {
594 char a[FORMAT_TIMESTAMP_MAX];
595 log_debug("File \"%s\": access time %s is too new.",
596 sub_path,
597 format_timestamp_us(a, sizeof(a), age));
598 continue;
599 }
600
601 age = timespec_load(&s.st_ctim);
602 if (age >= cutoff) {
603 char a[FORMAT_TIMESTAMP_MAX];
604 log_debug("File \"%s\": change time %s is too new.",
605 sub_path,
606 format_timestamp_us(a, sizeof(a), age));
607 continue;
608 }
609
610 log_debug("unlink \"%s\"", sub_path);
611
612 if (unlinkat(dirfd(d), dent->d_name, 0) < 0)
613 if (errno != ENOENT)
614 r = log_error_errno(errno, "unlink(%s): %m", sub_path);
615
616 deleted = true;
617 }
618 }
619
620 finish:
621 if (deleted) {
622 usec_t age1, age2;
623 char a[FORMAT_TIMESTAMP_MAX], b[FORMAT_TIMESTAMP_MAX];
624
625 /* Restore original directory timestamps */
626 times[0] = ds->st_atim;
627 times[1] = ds->st_mtim;
628
629 age1 = timespec_load(&ds->st_atim);
630 age2 = timespec_load(&ds->st_mtim);
631 log_debug("Restoring access and modification time on \"%s\": %s, %s",
632 p,
633 format_timestamp_us(a, sizeof(a), age1),
634 format_timestamp_us(b, sizeof(b), age2));
635 if (futimens(dirfd(d), times) < 0)
636 log_error_errno(errno, "utimensat(%s): %m", p);
637 }
638
639 return r;
640 }
641
642 static int path_set_perms(Item *i, const char *path) {
643 _cleanup_close_ int fd = -1;
644 struct stat st;
645
646 assert(i);
647 assert(path);
648
649 /* We open the file with O_PATH here, to make the operation
650 * somewhat atomic. Also there's unfortunately no fchmodat()
651 * with AT_SYMLINK_NOFOLLOW, hence we emulate it here via
652 * O_PATH. */
653
654 fd = open(path, O_NOFOLLOW|O_CLOEXEC|O_PATH);
655 if (fd < 0) {
656 int level = LOG_ERR, r = -errno;
657
658 /* Option "e" operates only on existing objects. Do not
659 * print errors about non-existent files or directories */
660 if (i->type == EMPTY_DIRECTORY && errno == ENOENT) {
661 level = LOG_DEBUG;
662 r = 0;
663 }
664
665 log_full_errno(level, errno, "Adjusting owner and mode for %s failed: %m", path);
666
667 return r;
668 }
669
670 if (fstatat(fd, "", &st, AT_EMPTY_PATH) < 0)
671 return log_error_errno(errno, "Failed to fstat() file %s: %m", path);
672
673 if (S_ISLNK(st.st_mode))
674 log_debug("Skipping mode an owner fix for symlink %s.", path);
675 else {
676 char fn[strlen("/proc/self/fd/") + DECIMAL_STR_MAX(int)];
677 xsprintf(fn, "/proc/self/fd/%i", fd);
678
679 /* not using i->path directly because it may be a glob */
680 if (i->mode_set) {
681 mode_t m = i->mode;
682
683 if (i->mask_perms) {
684 if (!(st.st_mode & 0111))
685 m &= ~0111;
686 if (!(st.st_mode & 0222))
687 m &= ~0222;
688 if (!(st.st_mode & 0444))
689 m &= ~0444;
690 if (!S_ISDIR(st.st_mode))
691 m &= ~07000; /* remove sticky/sgid/suid bit, unless directory */
692 }
693
694 if (m == (st.st_mode & 07777))
695 log_debug("\"%s\" has right mode %o", path, st.st_mode);
696 else {
697 log_debug("chmod \"%s\" to mode %o", path, m);
698 if (chmod(fn, m) < 0)
699 return log_error_errno(errno, "chmod() of %s via %s failed: %m", path, fn);
700 }
701 }
702
703 if ((i->uid != st.st_uid || i->gid != st.st_gid) &&
704 (i->uid_set || i->gid_set)) {
705 log_debug("chown \"%s\" to "UID_FMT"."GID_FMT,
706 path,
707 i->uid_set ? i->uid : UID_INVALID,
708 i->gid_set ? i->gid : GID_INVALID);
709 if (chown(fn,
710 i->uid_set ? i->uid : UID_INVALID,
711 i->gid_set ? i->gid : GID_INVALID) < 0)
712 return log_error_errno(errno, "chown() of %s via %s failed: %m", path, fn);
713 }
714 }
715
716 fd = safe_close(fd);
717
718 return label_fix(path, false, false);
719 }
720
721 static int parse_xattrs_from_arg(Item *i) {
722 const char *p;
723 int r;
724
725 assert(i);
726 assert(i->argument);
727
728 p = i->argument;
729
730 for (;;) {
731 _cleanup_free_ char *name = NULL, *value = NULL, *xattr = NULL;
732
733 r = extract_first_word(&p, &xattr, NULL, EXTRACT_QUOTES|EXTRACT_CUNESCAPE);
734 if (r < 0)
735 log_warning_errno(r, "Failed to parse extended attribute '%s', ignoring: %m", p);
736 if (r <= 0)
737 break;
738
739 r = split_pair(xattr, "=", &name, &value);
740 if (r < 0) {
741 log_warning_errno(r, "Failed to parse extended attribute, ignoring: %s", xattr);
742 continue;
743 }
744
745 if (isempty(name) || isempty(value)) {
746 log_warning("Malformed extended attribute found, ignoring: %s", xattr);
747 continue;
748 }
749
750 if (strv_push_pair(&i->xattrs, name, value) < 0)
751 return log_oom();
752
753 name = value = NULL;
754 }
755
756 return 0;
757 }
758
759 static int path_set_xattrs(Item *i, const char *path) {
760 char **name, **value;
761
762 assert(i);
763 assert(path);
764
765 STRV_FOREACH_PAIR(name, value, i->xattrs) {
766 int n;
767
768 n = strlen(*value);
769 log_debug("Setting extended attribute '%s=%s' on %s.", *name, *value, path);
770 if (lsetxattr(path, *name, *value, n, 0) < 0)
771 return log_error_errno(errno, "Setting extended attribute %s=%s on %s failed: %m",
772 *name, *value, path);
773 }
774 return 0;
775 }
776
777 static int parse_acls_from_arg(Item *item) {
778 #if HAVE_ACL
779 int r;
780
781 assert(item);
782
783 /* If force (= modify) is set, we will not modify the acl
784 * afterwards, so the mask can be added now if necessary. */
785
786 r = parse_acl(item->argument, &item->acl_access, &item->acl_default, !item->force);
787 if (r < 0)
788 log_warning_errno(r, "Failed to parse ACL \"%s\": %m. Ignoring", item->argument);
789 #else
790 log_warning_errno(ENOSYS, "ACLs are not supported. Ignoring");
791 #endif
792
793 return 0;
794 }
795
796 #if HAVE_ACL
797 static int path_set_acl(const char *path, const char *pretty, acl_type_t type, acl_t acl, bool modify) {
798 _cleanup_(acl_free_charpp) char *t = NULL;
799 _cleanup_(acl_freep) acl_t dup = NULL;
800 int r;
801
802 /* Returns 0 for success, positive error if already warned,
803 * negative error otherwise. */
804
805 if (modify) {
806 r = acls_for_file(path, type, acl, &dup);
807 if (r < 0)
808 return r;
809
810 r = calc_acl_mask_if_needed(&dup);
811 if (r < 0)
812 return r;
813 } else {
814 dup = acl_dup(acl);
815 if (!dup)
816 return -errno;
817
818 /* the mask was already added earlier if needed */
819 }
820
821 r = add_base_acls_if_needed(&dup, path);
822 if (r < 0)
823 return r;
824
825 t = acl_to_any_text(dup, NULL, ',', TEXT_ABBREVIATE);
826 log_debug("Setting %s ACL %s on %s.",
827 type == ACL_TYPE_ACCESS ? "access" : "default",
828 strna(t), pretty);
829
830 r = acl_set_file(path, type, dup);
831 if (r < 0)
832 /* Return positive to indicate we already warned */
833 return -log_error_errno(errno,
834 "Setting %s ACL \"%s\" on %s failed: %m",
835 type == ACL_TYPE_ACCESS ? "access" : "default",
836 strna(t), pretty);
837
838 return 0;
839 }
840 #endif
841
842 static int path_set_acls(Item *item, const char *path) {
843 int r = 0;
844 #if HAVE_ACL
845 char fn[strlen("/proc/self/fd/") + DECIMAL_STR_MAX(int)];
846 _cleanup_close_ int fd = -1;
847 struct stat st;
848
849 assert(item);
850 assert(path);
851
852 fd = open(path, O_NOFOLLOW|O_CLOEXEC|O_PATH);
853 if (fd < 0)
854 return log_error_errno(errno, "Adjusting ACL of %s failed: %m", path);
855
856 if (fstatat(fd, "", &st, AT_EMPTY_PATH) < 0)
857 return log_error_errno(errno, "Failed to fstat() file %s: %m", path);
858
859 if (S_ISLNK(st.st_mode)) {
860 log_debug("Skipping ACL fix for symlink %s.", path);
861 return 0;
862 }
863
864 xsprintf(fn, "/proc/self/fd/%i", fd);
865
866 if (item->acl_access)
867 r = path_set_acl(fn, path, ACL_TYPE_ACCESS, item->acl_access, item->force);
868
869 if (r == 0 && item->acl_default)
870 r = path_set_acl(fn, path, ACL_TYPE_DEFAULT, item->acl_default, item->force);
871
872 if (r > 0)
873 return -r; /* already warned */
874 else if (r == -EOPNOTSUPP) {
875 log_debug_errno(r, "ACLs not supported by file system at %s", path);
876 return 0;
877 } else if (r < 0)
878 log_error_errno(r, "ACL operation on \"%s\" failed: %m", path);
879 #endif
880 return r;
881 }
882
883 #define ATTRIBUTES_ALL \
884 (FS_NOATIME_FL | \
885 FS_SYNC_FL | \
886 FS_DIRSYNC_FL | \
887 FS_APPEND_FL | \
888 FS_COMPR_FL | \
889 FS_NODUMP_FL | \
890 FS_EXTENT_FL | \
891 FS_IMMUTABLE_FL | \
892 FS_JOURNAL_DATA_FL | \
893 FS_SECRM_FL | \
894 FS_UNRM_FL | \
895 FS_NOTAIL_FL | \
896 FS_TOPDIR_FL | \
897 FS_NOCOW_FL)
898
899 static int parse_attribute_from_arg(Item *item) {
900
901 static const struct {
902 char character;
903 unsigned value;
904 } attributes[] = {
905 { 'A', FS_NOATIME_FL }, /* do not update atime */
906 { 'S', FS_SYNC_FL }, /* Synchronous updates */
907 { 'D', FS_DIRSYNC_FL }, /* dirsync behaviour (directories only) */
908 { 'a', FS_APPEND_FL }, /* writes to file may only append */
909 { 'c', FS_COMPR_FL }, /* Compress file */
910 { 'd', FS_NODUMP_FL }, /* do not dump file */
911 { 'e', FS_EXTENT_FL }, /* Extents */
912 { 'i', FS_IMMUTABLE_FL }, /* Immutable file */
913 { 'j', FS_JOURNAL_DATA_FL }, /* Reserved for ext3 */
914 { 's', FS_SECRM_FL }, /* Secure deletion */
915 { 'u', FS_UNRM_FL }, /* Undelete */
916 { 't', FS_NOTAIL_FL }, /* file tail should not be merged */
917 { 'T', FS_TOPDIR_FL }, /* Top of directory hierarchies */
918 { 'C', FS_NOCOW_FL }, /* Do not cow file */
919 };
920
921 enum {
922 MODE_ADD,
923 MODE_DEL,
924 MODE_SET
925 } mode = MODE_ADD;
926
927 unsigned value = 0, mask = 0;
928 const char *p;
929
930 assert(item);
931
932 p = item->argument;
933 if (p) {
934 if (*p == '+') {
935 mode = MODE_ADD;
936 p++;
937 } else if (*p == '-') {
938 mode = MODE_DEL;
939 p++;
940 } else if (*p == '=') {
941 mode = MODE_SET;
942 p++;
943 }
944 }
945
946 if (isempty(p) && mode != MODE_SET) {
947 log_error("Setting file attribute on '%s' needs an attribute specification.", item->path);
948 return -EINVAL;
949 }
950
951 for (; p && *p ; p++) {
952 unsigned i, v;
953
954 for (i = 0; i < ELEMENTSOF(attributes); i++)
955 if (*p == attributes[i].character)
956 break;
957
958 if (i >= ELEMENTSOF(attributes)) {
959 log_error("Unknown file attribute '%c' on '%s'.", *p, item->path);
960 return -EINVAL;
961 }
962
963 v = attributes[i].value;
964
965 SET_FLAG(value, v, IN_SET(mode, MODE_ADD, MODE_SET));
966
967 mask |= v;
968 }
969
970 if (mode == MODE_SET)
971 mask |= ATTRIBUTES_ALL;
972
973 assert(mask != 0);
974
975 item->attribute_mask = mask;
976 item->attribute_value = value;
977 item->attribute_set = true;
978
979 return 0;
980 }
981
982 static int path_set_attribute(Item *item, const char *path) {
983 _cleanup_close_ int fd = -1;
984 struct stat st;
985 unsigned f;
986 int r;
987
988 if (!item->attribute_set || item->attribute_mask == 0)
989 return 0;
990
991 fd = open(path, O_RDONLY|O_NONBLOCK|O_CLOEXEC|O_NOATIME|O_NOFOLLOW);
992 if (fd < 0) {
993 if (errno == ELOOP)
994 return log_error_errno(errno, "Skipping file attributes adjustment on symlink %s.", path);
995
996 return log_error_errno(errno, "Cannot open '%s': %m", path);
997 }
998
999 if (fstat(fd, &st) < 0)
1000 return log_error_errno(errno, "Cannot stat '%s': %m", path);
1001
1002 /* Issuing the file attribute ioctls on device nodes is not
1003 * safe, as that will be delivered to the drivers, not the
1004 * file system containing the device node. */
1005 if (!S_ISREG(st.st_mode) && !S_ISDIR(st.st_mode)) {
1006 log_error("Setting file flags is only supported on regular files and directories, cannot set on '%s'.", path);
1007 return -EINVAL;
1008 }
1009
1010 f = item->attribute_value & item->attribute_mask;
1011
1012 /* Mask away directory-specific flags */
1013 if (!S_ISDIR(st.st_mode))
1014 f &= ~FS_DIRSYNC_FL;
1015
1016 r = chattr_fd(fd, f, item->attribute_mask);
1017 if (r < 0)
1018 log_full_errno(IN_SET(r, -ENOTTY, -EOPNOTSUPP) ? LOG_DEBUG : LOG_WARNING,
1019 r,
1020 "Cannot set file attribute for '%s', value=0x%08x, mask=0x%08x: %m",
1021 path, item->attribute_value, item->attribute_mask);
1022
1023 return 0;
1024 }
1025
1026 static int write_one_file(Item *i, const char *path) {
1027 _cleanup_close_ int fd = -1;
1028 int flags, r = 0;
1029 struct stat st;
1030
1031 assert(i);
1032 assert(path);
1033
1034 flags = i->type == CREATE_FILE ? O_CREAT|O_APPEND|O_NOFOLLOW :
1035 i->type == TRUNCATE_FILE ? O_CREAT|O_TRUNC|O_NOFOLLOW : 0;
1036
1037 RUN_WITH_UMASK(0000) {
1038 mac_selinux_create_file_prepare(path, S_IFREG);
1039 fd = open(path, flags|O_NDELAY|O_CLOEXEC|O_WRONLY|O_NOCTTY, i->mode);
1040 mac_selinux_create_file_clear();
1041 }
1042
1043 if (fd < 0) {
1044 if (i->type == WRITE_FILE && errno == ENOENT) {
1045 log_debug_errno(errno, "Not writing \"%s\": %m", path);
1046 return 0;
1047 }
1048
1049 r = -errno;
1050 if (!i->argument && errno == EROFS && stat(path, &st) == 0 &&
1051 (i->type == CREATE_FILE || st.st_size == 0))
1052 goto check_mode;
1053
1054 return log_error_errno(r, "Failed to create file %s: %m", path);
1055 }
1056
1057 if (i->argument) {
1058 log_debug("%s to \"%s\".", i->type == CREATE_FILE ? "Appending" : "Writing", path);
1059
1060 r = loop_write(fd, i->argument, strlen(i->argument), false);
1061 if (r < 0)
1062 return log_error_errno(r, "Failed to write file \"%s\": %m", path);
1063 } else
1064 log_debug("\"%s\" has been created.", path);
1065
1066 fd = safe_close(fd);
1067
1068 if (stat(path, &st) < 0)
1069 return log_error_errno(errno, "stat(%s) failed: %m", path);
1070
1071 check_mode:
1072 if (!S_ISREG(st.st_mode)) {
1073 log_error("%s is not a file.", path);
1074 return -EEXIST;
1075 }
1076
1077 r = path_set_perms(i, path);
1078 if (r < 0)
1079 return r;
1080
1081 return 0;
1082 }
1083
1084 typedef int (*action_t)(Item *, const char *);
1085
1086 static int item_do_children(Item *i, const char *path, action_t action) {
1087 _cleanup_closedir_ DIR *d;
1088 struct dirent *de;
1089 int r = 0;
1090
1091 assert(i);
1092 assert(path);
1093
1094 /* This returns the first error we run into, but nevertheless
1095 * tries to go on */
1096
1097 d = opendir_nomod(path);
1098 if (!d)
1099 return IN_SET(errno, ENOENT, ENOTDIR) ? 0 : -errno;
1100
1101 FOREACH_DIRENT_ALL(de, d, r = -errno) {
1102 _cleanup_free_ char *p = NULL;
1103 int q;
1104
1105 if (dot_or_dot_dot(de->d_name))
1106 continue;
1107
1108 p = strjoin(path, "/", de->d_name);
1109 if (!p)
1110 return -ENOMEM;
1111
1112 q = action(i, p);
1113 if (q < 0 && q != -ENOENT && r == 0)
1114 r = q;
1115
1116 if (IN_SET(de->d_type, DT_UNKNOWN, DT_DIR)) {
1117 q = item_do_children(i, p, action);
1118 if (q < 0 && r == 0)
1119 r = q;
1120 }
1121 }
1122
1123 return r;
1124 }
1125
1126 static int glob_item(Item *i, action_t action, bool recursive) {
1127 _cleanup_globfree_ glob_t g = {
1128 .gl_opendir = (void *(*)(const char *)) opendir_nomod,
1129 };
1130 int r = 0, k;
1131 char **fn;
1132
1133 k = safe_glob(i->path, GLOB_NOSORT|GLOB_BRACE, &g);
1134 if (k < 0 && k != -ENOENT)
1135 return log_error_errno(k, "glob(%s) failed: %m", i->path);
1136
1137 STRV_FOREACH(fn, g.gl_pathv) {
1138 k = action(i, *fn);
1139 if (k < 0 && r == 0)
1140 r = k;
1141
1142 if (recursive) {
1143 k = item_do_children(i, *fn, action);
1144 if (k < 0 && r == 0)
1145 r = k;
1146 }
1147 }
1148
1149 return r;
1150 }
1151
1152 typedef enum {
1153 CREATION_NORMAL,
1154 CREATION_EXISTING,
1155 CREATION_FORCE,
1156 _CREATION_MODE_MAX,
1157 _CREATION_MODE_INVALID = -1
1158 } CreationMode;
1159
1160 static const char *creation_mode_verb_table[_CREATION_MODE_MAX] = {
1161 [CREATION_NORMAL] = "Created",
1162 [CREATION_EXISTING] = "Found existing",
1163 [CREATION_FORCE] = "Created replacement",
1164 };
1165
1166 DEFINE_PRIVATE_STRING_TABLE_LOOKUP_TO_STRING(creation_mode_verb, CreationMode);
1167
1168 static int create_item(Item *i) {
1169 struct stat st;
1170 int r = 0;
1171 int q = 0;
1172 CreationMode creation;
1173
1174 assert(i);
1175
1176 log_debug("Running create action for entry %c %s", (char) i->type, i->path);
1177
1178 switch (i->type) {
1179
1180 case IGNORE_PATH:
1181 case IGNORE_DIRECTORY_PATH:
1182 case REMOVE_PATH:
1183 case RECURSIVE_REMOVE_PATH:
1184 return 0;
1185
1186 case CREATE_FILE:
1187 case TRUNCATE_FILE:
1188 r = write_one_file(i, i->path);
1189 if (r < 0)
1190 return r;
1191 break;
1192
1193 case COPY_FILES: {
1194 log_debug("Copying tree \"%s\" to \"%s\".", i->argument, i->path);
1195 r = copy_tree(i->argument, i->path, i->uid_set ? i->uid : UID_INVALID, i->gid_set ? i->gid : GID_INVALID, COPY_REFLINK);
1196
1197 if (r == -EROFS && stat(i->path, &st) == 0)
1198 r = -EEXIST;
1199
1200 if (r < 0) {
1201 struct stat a, b;
1202
1203 if (r != -EEXIST)
1204 return log_error_errno(r, "Failed to copy files to %s: %m", i->path);
1205
1206 if (stat(i->argument, &a) < 0)
1207 return log_error_errno(errno, "stat(%s) failed: %m", i->argument);
1208
1209 if (stat(i->path, &b) < 0)
1210 return log_error_errno(errno, "stat(%s) failed: %m", i->path);
1211
1212 if ((a.st_mode ^ b.st_mode) & S_IFMT) {
1213 log_debug("Can't copy to %s, file exists already and is of different type", i->path);
1214 return 0;
1215 }
1216 }
1217
1218 r = path_set_perms(i, i->path);
1219 if (r < 0)
1220 return r;
1221
1222 break;
1223
1224 case WRITE_FILE:
1225 r = glob_item(i, write_one_file, false);
1226 if (r < 0)
1227 return r;
1228
1229 break;
1230
1231 case CREATE_DIRECTORY:
1232 case TRUNCATE_DIRECTORY:
1233 case CREATE_SUBVOLUME:
1234 case CREATE_SUBVOLUME_INHERIT_QUOTA:
1235 case CREATE_SUBVOLUME_NEW_QUOTA:
1236 RUN_WITH_UMASK(0000)
1237 mkdir_parents_label(i->path, 0755);
1238
1239 if (IN_SET(i->type, CREATE_SUBVOLUME, CREATE_SUBVOLUME_INHERIT_QUOTA, CREATE_SUBVOLUME_NEW_QUOTA)) {
1240
1241 if (btrfs_is_subvol(isempty(arg_root) ? "/" : arg_root) <= 0)
1242
1243 /* Don't create a subvolume unless the
1244 * root directory is one, too. We do
1245 * this under the assumption that if
1246 * the root directory is just a plain
1247 * directory (i.e. very light-weight),
1248 * we shouldn't try to split it up
1249 * into subvolumes (i.e. more
1250 * heavy-weight). Thus, chroot()
1251 * environments and suchlike will get
1252 * a full brtfs subvolume set up below
1253 * their tree only if they
1254 * specifically set up a btrfs
1255 * subvolume for the root dir too. */
1256
1257 r = -ENOTTY;
1258 else {
1259 RUN_WITH_UMASK((~i->mode) & 0777)
1260 r = btrfs_subvol_make(i->path);
1261 }
1262 } else
1263 r = 0;
1264
1265 if (IN_SET(i->type, CREATE_DIRECTORY, TRUNCATE_DIRECTORY) || r == -ENOTTY)
1266 RUN_WITH_UMASK(0000)
1267 r = mkdir_label(i->path, i->mode);
1268
1269 if (r < 0) {
1270 int k;
1271
1272 if (!IN_SET(r, -EEXIST, -EROFS))
1273 return log_error_errno(r, "Failed to create directory or subvolume \"%s\": %m", i->path);
1274
1275 k = is_dir(i->path, false);
1276 if (k == -ENOENT && r == -EROFS)
1277 return log_error_errno(r, "%s does not exist and cannot be created as the file system is read-only.", i->path);
1278 if (k < 0)
1279 return log_error_errno(k, "Failed to check if %s exists: %m", i->path);
1280 if (!k) {
1281 log_warning("\"%s\" already exists and is not a directory.", i->path);
1282 return 0;
1283 }
1284
1285 creation = CREATION_EXISTING;
1286 } else
1287 creation = CREATION_NORMAL;
1288
1289 log_debug("%s directory \"%s\".", creation_mode_verb_to_string(creation), i->path);
1290
1291 if (IN_SET(i->type, CREATE_SUBVOLUME_NEW_QUOTA, CREATE_SUBVOLUME_INHERIT_QUOTA)) {
1292 r = btrfs_subvol_auto_qgroup(i->path, 0, i->type == CREATE_SUBVOLUME_NEW_QUOTA);
1293 if (r == -ENOTTY)
1294 log_debug_errno(r, "Couldn't adjust quota for subvolume \"%s\" (unsupported fs or dir not a subvolume): %m", i->path);
1295 else if (r == -EROFS)
1296 log_debug_errno(r, "Couldn't adjust quota for subvolume \"%s\" (fs is read-only).", i->path);
1297 else if (r == -ENOPROTOOPT)
1298 log_debug_errno(r, "Couldn't adjust quota for subvolume \"%s\" (quota support is disabled).", i->path);
1299 else if (r < 0)
1300 q = log_error_errno(r, "Failed to adjust quota for subvolume \"%s\": %m", i->path);
1301 else if (r > 0)
1302 log_debug("Adjusted quota for subvolume \"%s\".", i->path);
1303 else if (r == 0)
1304 log_debug("Quota for subvolume \"%s\" already in place, no change made.", i->path);
1305 }
1306
1307 /* fall through */
1308
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.