2 This file is part of systemd.
4 Copyright 2010-2012 Lennart Poettering
6 systemd is free software; you can redistribute it and/or modify it
7 under the terms of the GNU Lesser General Public License as published by
8 the Free Software Foundation; either version 2.1 of the License, or
9 (at your option) any later version.
11 systemd is distributed in the hope that it will be useful, but
12 WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 Lesser General Public License for more details.
16 You should have received a copy of the GNU Lesser General Public License
17 along with systemd; If not, see <http://www.gnu.org/licenses/>.
28 /* When we include libgen.h because we need dirname() we immediately
29 * undefine basename() since libgen.h defines it as a macro to the
30 * POSIX version which is really broken. We prefer GNU basename(). */
34 #include "alloc-util.h"
35 #include "extract-word.h"
40 #include "path-util.h"
41 #include "stat-util.h"
42 #include "string-util.h"
44 #include "time-util.h"
46 bool path_is_absolute(const char *p) {
50 bool is_path(const char *p) {
51 return !!strchr(p, '/');
54 #if 0 /// UNNEEDED by elogind
55 int path_split_and_make_absolute(const char *p, char ***ret) {
62 l = strv_split(p, ":");
66 r = path_strv_make_absolute_cwd(l);
76 char *path_make_absolute(const char *p, const char *prefix) {
79 /* Makes every item in the list an absolute path by prepending
80 * the prefix, if specified and necessary */
82 if (path_is_absolute(p) || !prefix)
85 return strjoin(prefix, "/", p);
89 int path_make_absolute_cwd(const char *p, char **ret) {
95 /* Similar to path_make_absolute(), but prefixes with the
96 * current working directory. */
98 if (path_is_absolute(p))
101 _cleanup_free_ char *cwd = NULL;
103 cwd = get_current_dir_name();
105 return negative_errno();
107 c = strjoin(cwd, "/", p);
116 #if 0 /// UNNEEDED by elogind
117 int path_make_relative(const char *from_dir, const char *to_path, char **_r) {
125 /* Strips the common part, and adds ".." elements as necessary. */
127 if (!path_is_absolute(from_dir))
130 if (!path_is_absolute(to_path))
133 /* Skip the common part. */
138 from_dir += strspn(from_dir, "/");
139 to_path += strspn(to_path, "/");
143 /* from_dir equals to_path. */
146 /* from_dir is a parent directory of to_path. */
152 path_kill_slashes(r);
161 a = strcspn(from_dir, "/");
162 b = strcspn(to_path, "/");
167 if (memcmp(from_dir, to_path, a) != 0)
174 /* If we're here, then "from_dir" has one or more elements that need to
175 * be replaced with "..". */
177 /* Count the number of necessary ".." elements. */
178 for (n_parents = 0;;) {
179 from_dir += strspn(from_dir, "/");
184 from_dir += strcspn(from_dir, "/");
188 r = malloc(n_parents * 3 + strlen(to_path) + 1);
192 for (p = r; n_parents > 0; n_parents--, p += 3)
196 path_kill_slashes(r);
202 int path_strv_make_absolute_cwd(char **l) {
206 /* Goes through every item in the string list and makes it
207 * absolute. This works in place and won't rollback any
208 * changes on failure. */
213 r = path_make_absolute_cwd(*s, &t);
225 char **path_strv_resolve(char **l, const char *prefix) {
233 /* Goes through every item in the string list and canonicalize
234 * the path. This works in place and won't rollback any
235 * changes on failure. */
239 _cleanup_free_ char *orig = NULL;
241 if (!path_is_absolute(*s)) {
248 t = strappend(prefix, orig);
257 u = canonicalize_file_name(t);
259 if (errno == ENOENT) {
268 if (errno == ENOMEM || errno == 0)
277 x = path_startswith(u, prefix);
279 /* restore the slash if it was lost */
280 if (!startswith(x, "/"))
291 /* canonicalized path goes outside of
292 * prefix, keep the original path instead */
293 free_and_replace(u, orig);
309 char **path_strv_resolve_uniq(char **l, const char *prefix) {
314 if (!path_strv_resolve(l, prefix))
320 char *path_kill_slashes(char *path) {
324 /* Removes redundant inner and trailing slashes. Modifies the
325 * passed string in-place.
327 * ///foo///bar/ becomes /foo/bar
330 for (f = path, t = path; *f; f++) {
345 /* Special rule, if we are talking of the root directory, a
346 trailing slash is good */
348 if (t == path && slash)
355 char* path_startswith(const char *path, const char *prefix) {
359 if ((path[0] == '/') != (prefix[0] == '/'))
365 path += strspn(path, "/");
366 prefix += strspn(prefix, "/");
374 a = strcspn(path, "/");
375 b = strcspn(prefix, "/");
380 if (memcmp(path, prefix, a) != 0)
388 int path_compare(const char *a, const char *b) {
394 /* A relative path and an abolute path must not compare as equal.
395 * Which one is sorted before the other does not really matter.
396 * Here a relative path is ordered before an absolute path. */
397 d = (a[0] == '/') - (b[0] == '/');
407 if (*a == 0 && *b == 0)
410 /* Order prefixes first: "/foo" before "/foo/bar" */
419 /* Alphabetical sort: "/foo/aaa" before "/foo/b" */
420 d = memcmp(a, b, MIN(j, k));
422 return (d > 0) - (d < 0); /* sign of d */
424 /* Sort "/foo/a" before "/foo/aaa" */
425 d = (j > k) - (j < k); /* sign of (j - k) */
434 bool path_equal(const char *a, const char *b) {
435 return path_compare(a, b) == 0;
438 bool path_equal_or_files_same(const char *a, const char *b) {
439 return path_equal(a, b) || files_same(a, b) > 0;
442 #if 0 /// UNNEEDED by elogind
443 char* path_join(const char *root, const char *path, const char *rest) {
447 return strjoin(root, endswith(root, "/") ? "" : "/",
448 path[0] == '/' ? path+1 : path,
449 rest ? (endswith(path, "/") ? "" : "/") : NULL,
450 rest && rest[0] == '/' ? rest+1 : rest);
453 rest ? (endswith(path, "/") ? "" : "/") : NULL,
454 rest && rest[0] == '/' ? rest+1 : rest);
457 int find_binary(const char *name, char **ret) {
464 if (access(name, X_OK) < 0)
468 r = path_make_absolute_cwd(name, ret);
477 * Plain getenv, not secure_getenv, because we want
478 * to actually allow the user to pick the binary.
484 last_error = -ENOENT;
487 _cleanup_free_ char *j = NULL, *element = NULL;
489 r = extract_first_word(&p, &element, ":", EXTRACT_RELAX|EXTRACT_DONT_COALESCE_SEPARATORS);
495 if (!path_is_absolute(element))
498 j = strjoin(element, "/", name);
502 if (access(j, X_OK) >= 0) {
506 *ret = path_kill_slashes(j);
519 bool paths_check_timestamp(const char* const* paths, usec_t *timestamp, bool update) {
520 bool changed = false;
521 const char* const* i;
528 STRV_FOREACH(i, paths) {
532 if (stat(*i, &stats) < 0)
535 u = timespec_load(&stats.st_mtim);
541 log_debug("timestamp of '%s' changed", *i);
543 /* update timestamp */
554 static int binary_is_good(const char *binary) {
555 _cleanup_free_ char *p = NULL, *d = NULL;
558 r = find_binary(binary, &p);
564 /* An fsck that is linked to /bin/true is a non-existent
567 r = readlink_malloc(p, &d);
568 if (r == -EINVAL) /* not a symlink */
573 return !PATH_IN_SET(d, "true"
579 int fsck_exists(const char *fstype) {
584 if (streq(fstype, "auto"))
587 checker = strjoina("fsck.", fstype);
588 return binary_is_good(checker);
591 int mkfs_exists(const char *fstype) {
596 if (streq(fstype, "auto"))
599 mkfs = strjoina("mkfs.", fstype);
600 return binary_is_good(mkfs);
603 char *prefix_root(const char *root, const char *path) {
607 /* If root is passed, prefixes path with it. Otherwise returns
612 /* First, drop duplicate prefixing slashes from the path */
613 while (path[0] == '/' && path[1] == '/')
616 if (isempty(root) || path_equal(root, "/"))
619 l = strlen(root) + 1 + strlen(path) + 1;
627 while (p > n && p[-1] == '/')
637 int parse_path_argument_and_warn(const char *path, bool suppress_root, char **arg) {
642 * This function is intended to be used in command line
643 * parsers, to handle paths that are passed in. It makes the
644 * path absolute, and reduces it to NULL if omitted or
645 * root (the latter optionally).
647 * NOTE THAT THIS WILL FREE THE PREVIOUS ARGUMENT POINTER ON
648 * SUCCESS! Hence, do not pass in uninitialized pointers.
656 r = path_make_absolute_cwd(path, &p);
658 return log_error_errno(r, "Failed to parse path \"%s\" and make it absolute: %m", path);
660 path_kill_slashes(p);
661 if (suppress_root && path_equal(p, "/"))
670 char* dirname_malloc(const char *path) {
671 char *d, *dir, *dir2;
691 bool filename_is_valid(const char *p) {
703 e = strchrnul(p, '/');
707 if (e - p > FILENAME_MAX)
713 bool path_is_safe(const char *p) {
718 if (streq(p, "..") || startswith(p, "../") || endswith(p, "/..") || strstr(p, "/../"))
721 if (strlen(p)+1 > PATH_MAX)
724 /* The following two checks are not really dangerous, but hey, they still are confusing */
725 if (streq(p, ".") || startswith(p, "./") || endswith(p, "/.") || strstr(p, "/./"))
734 char *file_in_same_dir(const char *path, const char *filename) {
741 /* This removes the last component of path and appends
742 * filename, unless the latter is absolute anyway or the
745 if (path_is_absolute(filename))
746 return strdup(filename);
748 e = strrchr(path, '/');
750 return strdup(filename);
752 k = strlen(filename);
753 ret = new(char, (e + 1 - path) + k + 1);
757 memcpy(mempcpy(ret, path, e + 1 - path), filename, k + 1);
761 bool hidden_or_backup_file(const char *filename) {
766 if (filename[0] == '.' ||
767 streq(filename, "lost+found") ||
768 streq(filename, "aquota.user") ||
769 streq(filename, "aquota.group") ||
770 endswith(filename, "~"))
773 p = strrchr(filename, '.');
777 /* Please, let's not add more entries to the list below. If external projects think it's a good idea to come up
778 * with always new suffixes and that everybody else should just adjust to that, then it really should be on
779 * them. Hence, in future, let's not add any more entries. Instead, let's ask those packages to instead adopt
780 * one of the generic suffixes/prefixes for hidden files or backups, possibly augmented with an additional
781 * string. Specifically: there's now:
783 * The generic suffixes "~" and ".bak" for backup files
784 * The generic prefix "." for hidden files
786 * Thus, if a new package manager "foopkg" wants its own set of ".foopkg-new", ".foopkg-old", ".foopkg-dist"
787 * or so registered, let's refuse that and ask them to use ".foopkg.new", ".foopkg.old" or ".foopkg~" instead.
790 return STR_IN_SET(p + 1,
810 #if 0 /// UNNEEDED by elogind
811 bool is_device_path(const char *path) {
813 /* Returns true on paths that refer to a device, either in
814 * sysfs or in /dev */
816 return path_startswith(path, "/dev/") ||
817 path_startswith(path, "/sys/");
820 bool is_deviceallow_pattern(const char *path) {
821 return path_startswith(path, "/dev/") ||
822 startswith(path, "block-") ||
823 startswith(path, "char-");
826 int systemd_installation_has_version(const char *root, unsigned minimal_version) {
830 /* Try to guess if systemd installation is later than the specified version. This
831 * is hacky and likely to yield false negatives, particularly if the installation
832 * is non-standard. False positives should be relatively rare.
835 NULSTR_FOREACH(pattern,
836 /* /lib works for systems without usr-merge, and for systems with a sane
837 * usr-merge, where /lib is a symlink to /usr/lib. /usr/lib is necessary
838 * for Gentoo which does a merge without making /lib a symlink.
840 "lib/systemd/libsystemd-shared-*.so\0"
841 "usr/lib/systemd/libsystemd-shared-*.so\0") {
843 _cleanup_strv_free_ char **names = NULL;
844 _cleanup_free_ char *path = NULL;
847 path = prefix_root(root, pattern);
851 r = glob_extend(&names, path);
857 assert_se((c = endswith(path, "*.so")));
858 *c = '\0'; /* truncate the glob part */
860 STRV_FOREACH(name, names) {
861 /* This is most likely to run only once, hence let's not optimize anything. */
865 t = startswith(*name, path);
869 t2 = endswith(t, ".so");
873 t2[0] = '\0'; /* truncate the suffix */
875 r = safe_atou(t, &version);
877 log_debug_errno(r, "Found libsystemd shared at \"%s.so\", but failed to parse version: %m", *name);
881 log_debug("Found libsystemd shared at \"%s.so\", version %u (%s).",
883 version >= minimal_version ? "OK" : "too old");
884 if (version >= minimal_version)