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"
37 #include "glob-util.h"
41 #include "parse-util.h"
42 #include "path-util.h"
43 #include "stat-util.h"
44 #include "string-util.h"
46 #include "time-util.h"
48 bool path_is_absolute(const char *p
) {
52 bool is_path(const char *p
) {
53 return !!strchr(p
, '/');
56 int path_split_and_make_absolute(const char *p
, char ***ret
) {
63 l
= strv_split(p
, ":");
67 r
= path_strv_make_absolute_cwd(l
);
77 char *path_make_absolute(const char *p
, const char *prefix
) {
80 /* Makes every item in the list an absolute path by prepending
81 * the prefix, if specified and necessary */
83 if (path_is_absolute(p
) || !prefix
)
86 return strjoin(prefix
, "/", p
, NULL
);
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
, NULL
);
116 int path_make_relative(const char *from_dir
, const char *to_path
, char **_r
) {
124 /* Strips the common part, and adds ".." elements as necessary. */
126 if (!path_is_absolute(from_dir
))
129 if (!path_is_absolute(to_path
))
132 /* Skip the common part. */
137 from_dir
+= strspn(from_dir
, "/");
138 to_path
+= strspn(to_path
, "/");
142 /* from_dir equals to_path. */
145 /* from_dir is a parent directory of to_path. */
151 path_kill_slashes(r
);
160 a
= strcspn(from_dir
, "/");
161 b
= strcspn(to_path
, "/");
166 if (memcmp(from_dir
, to_path
, a
) != 0)
173 /* If we're here, then "from_dir" has one or more elements that need to
174 * be replaced with "..". */
176 /* Count the number of necessary ".." elements. */
177 for (n_parents
= 0;;) {
178 from_dir
+= strspn(from_dir
, "/");
183 from_dir
+= strcspn(from_dir
, "/");
187 r
= malloc(n_parents
* 3 + strlen(to_path
) + 1);
191 for (p
= r
; n_parents
> 0; n_parents
--, p
+= 3)
195 path_kill_slashes(r
);
201 int path_strv_make_absolute_cwd(char **l
) {
205 /* Goes through every item in the string list and makes it
206 * absolute. This works in place and won't rollback any
207 * changes on failure. */
212 r
= path_make_absolute_cwd(*s
, &t
);
223 char **path_strv_resolve(char **l
, const char *prefix
) {
231 /* Goes through every item in the string list and canonicalize
232 * the path. This works in place and won't rollback any
233 * changes on failure. */
237 _cleanup_free_
char *orig
= NULL
;
239 if (!path_is_absolute(*s
)) {
246 t
= strappend(prefix
, orig
);
255 u
= canonicalize_file_name(t
);
257 if (errno
== ENOENT
) {
266 if (errno
== ENOMEM
|| errno
== 0)
275 x
= path_startswith(u
, prefix
);
277 /* restore the slash if it was lost */
278 if (!startswith(x
, "/"))
289 /* canonicalized path goes outside of
290 * prefix, keep the original path instead */
291 free_and_replace(u
, orig
);
307 char **path_strv_resolve_uniq(char **l
, const char *prefix
) {
312 if (!path_strv_resolve(l
, prefix
))
318 char *path_kill_slashes(char *path
) {
322 /* Removes redundant inner and trailing slashes. Modifies the
323 * passed string in-place.
325 * ///foo///bar/ becomes /foo/bar
328 for (f
= path
, t
= path
; *f
; f
++) {
343 /* Special rule, if we are talking of the root directory, a
344 trailing slash is good */
346 if (t
== path
&& slash
)
353 char* path_startswith(const char *path
, const char *prefix
) {
357 if ((path
[0] == '/') != (prefix
[0] == '/'))
363 path
+= strspn(path
, "/");
364 prefix
+= strspn(prefix
, "/");
372 a
= strcspn(path
, "/");
373 b
= strcspn(prefix
, "/");
378 if (memcmp(path
, prefix
, a
) != 0)
386 int path_compare(const char *a
, const char *b
) {
392 /* A relative path and an abolute path must not compare as equal.
393 * Which one is sorted before the other does not really matter.
394 * Here a relative path is ordered before an absolute path. */
395 d
= (a
[0] == '/') - (b
[0] == '/');
405 if (*a
== 0 && *b
== 0)
408 /* Order prefixes first: "/foo" before "/foo/bar" */
417 /* Alphabetical sort: "/foo/aaa" before "/foo/b" */
418 d
= memcmp(a
, b
, MIN(j
, k
));
420 return (d
> 0) - (d
< 0); /* sign of d */
422 /* Sort "/foo/a" before "/foo/aaa" */
423 d
= (j
> k
) - (j
< k
); /* sign of (j - k) */
432 bool path_equal(const char *a
, const char *b
) {
433 return path_compare(a
, b
) == 0;
436 bool path_equal_or_files_same(const char *a
, const char *b
) {
437 return path_equal(a
, b
) || files_same(a
, b
) > 0;
440 char* path_join(const char *root
, const char *path
, const char *rest
) {
444 return strjoin(root
, endswith(root
, "/") ? "" : "/",
445 path
[0] == '/' ? path
+1 : path
,
446 rest
? (endswith(path
, "/") ? "" : "/") : NULL
,
447 rest
&& rest
[0] == '/' ? rest
+1 : rest
,
451 rest
? (endswith(path
, "/") ? "" : "/") : NULL
,
452 rest
&& rest
[0] == '/' ? rest
+1 : rest
,
456 int find_binary(const char *name
, char **ret
) {
463 if (access(name
, X_OK
) < 0)
467 r
= path_make_absolute_cwd(name
, ret
);
476 * Plain getenv, not secure_getenv, because we want
477 * to actually allow the user to pick the binary.
483 last_error
= -ENOENT
;
486 _cleanup_free_
char *j
= NULL
, *element
= NULL
;
488 r
= extract_first_word(&p
, &element
, ":", EXTRACT_RELAX
|EXTRACT_DONT_COALESCE_SEPARATORS
);
494 if (!path_is_absolute(element
))
497 j
= strjoin(element
, "/", name
, NULL
);
501 if (access(j
, X_OK
) >= 0) {
505 *ret
= path_kill_slashes(j
);
518 bool paths_check_timestamp(const char* const* paths
, usec_t
*timestamp
, bool update
) {
519 bool changed
= false;
520 const char* const* i
;
527 STRV_FOREACH(i
, paths
) {
531 if (stat(*i
, &stats
) < 0)
534 u
= timespec_load(&stats
.st_mtim
);
540 log_debug("timestamp of '%s' changed", *i
);
542 /* update timestamp */
553 static int binary_is_good(const char *binary
) {
554 _cleanup_free_
char *p
= NULL
, *d
= NULL
;
557 r
= find_binary(binary
, &p
);
563 /* An fsck that is linked to /bin/true is a non-existent
566 r
= readlink_malloc(p
, &d
);
567 if (r
== -EINVAL
) /* not a symlink */
572 return !PATH_IN_SET(d
, "true"
578 int fsck_exists(const char *fstype
) {
583 if (streq(fstype
, "auto"))
586 checker
= strjoina("fsck.", fstype
);
587 return binary_is_good(checker
);
590 int mkfs_exists(const char *fstype
) {
595 if (streq(fstype
, "auto"))
598 mkfs
= strjoina("mkfs.", fstype
);
599 return binary_is_good(mkfs
);
602 char *prefix_root(const char *root
, const char *path
) {
606 /* If root is passed, prefixes path with it. Otherwise returns
611 /* First, drop duplicate prefixing slashes from the path */
612 while (path
[0] == '/' && path
[1] == '/')
615 if (isempty(root
) || path_equal(root
, "/"))
618 l
= strlen(root
) + 1 + strlen(path
) + 1;
626 while (p
> n
&& p
[-1] == '/')
636 int parse_path_argument_and_warn(const char *path
, bool suppress_root
, char **arg
) {
641 * This function is intended to be used in command line
642 * parsers, to handle paths that are passed in. It makes the
643 * path absolute, and reduces it to NULL if omitted or
644 * root (the latter optionally).
646 * NOTE THAT THIS WILL FREE THE PREVIOUS ARGUMENT POINTER ON
647 * SUCCESS! Hence, do not pass in uninitialized pointers.
655 r
= path_make_absolute_cwd(path
, &p
);
657 return log_error_errno(r
, "Failed to parse path \"%s\" and make it absolute: %m", path
);
659 path_kill_slashes(p
);
660 if (suppress_root
&& path_equal(p
, "/"))
668 char* dirname_malloc(const char *path
) {
669 char *d
, *dir
, *dir2
;
689 bool filename_is_valid(const char *p
) {
701 e
= strchrnul(p
, '/');
705 if (e
- p
> FILENAME_MAX
)
711 bool path_is_safe(const char *p
) {
716 if (streq(p
, "..") || startswith(p
, "../") || endswith(p
, "/..") || strstr(p
, "/../"))
719 if (strlen(p
)+1 > PATH_MAX
)
722 /* The following two checks are not really dangerous, but hey, they still are confusing */
723 if (streq(p
, ".") || startswith(p
, "./") || endswith(p
, "/.") || strstr(p
, "/./"))
732 char *file_in_same_dir(const char *path
, const char *filename
) {
739 /* This removes the last component of path and appends
740 * filename, unless the latter is absolute anyway or the
743 if (path_is_absolute(filename
))
744 return strdup(filename
);
746 e
= strrchr(path
, '/');
748 return strdup(filename
);
750 k
= strlen(filename
);
751 ret
= new(char, (e
+ 1 - path
) + k
+ 1);
755 memcpy(mempcpy(ret
, path
, e
+ 1 - path
), filename
, k
+ 1);
759 bool hidden_or_backup_file(const char *filename
) {
764 if (filename
[0] == '.' ||
765 streq(filename
, "lost+found") ||
766 streq(filename
, "aquota.user") ||
767 streq(filename
, "aquota.group") ||
768 endswith(filename
, "~"))
771 p
= strrchr(filename
, '.');
775 /* Please, let's not add more entries to the list below. If external projects think it's a good idea to come up
776 * with always new suffixes and that everybody else should just adjust to that, then it really should be on
777 * them. Hence, in future, let's not add any more entries. Instead, let's ask those packages to instead adopt
778 * one of the generic suffixes/prefixes for hidden files or backups, possibly augmented with an additional
779 * string. Specifically: there's now:
781 * The generic suffixes "~" and ".bak" for backup files
782 * The generic prefix "." for hidden files
784 * Thus, if a new package manager "foopkg" wants its own set of ".foopkg-new", ".foopkg-old", ".foopkg-dist"
785 * or so registered, let's refuse that and ask them to use ".foopkg.new", ".foopkg.old" or ".foopkg~" instead.
788 return STR_IN_SET(p
+ 1,
808 bool is_device_path(const char *path
) {
810 /* Returns true on paths that refer to a device, either in
811 * sysfs or in /dev */
813 return path_startswith(path
, "/dev/") ||
814 path_startswith(path
, "/sys/");
817 bool is_deviceallow_pattern(const char *path
) {
818 return path_startswith(path
, "/dev/") ||
819 startswith(path
, "block-") ||
820 startswith(path
, "char-");
823 int systemd_installation_has_version(const char *root
, unsigned minimal_version
) {
827 /* Try to guess if systemd installation is later than the specified version. This
828 * is hacky and likely to yield false negatives, particularly if the installation
829 * is non-standard. False positives should be relatively rare.
832 NULSTR_FOREACH(pattern
,
833 /* /lib works for systems without usr-merge, and for systems with a sane
834 * usr-merge, where /lib is a symlink to /usr/lib. /usr/lib is necessary
835 * for Gentoo which does a merge without making /lib a symlink.
837 "lib/systemd/libsystemd-shared-*.so\0"
838 "usr/lib/systemd/libsystemd-shared-*.so\0") {
840 _cleanup_strv_free_
char **names
= NULL
;
841 _cleanup_free_
char *path
= NULL
;
844 path
= prefix_root(root
, pattern
);
848 r
= glob_extend(&names
, path
);
854 assert_se((c
= endswith(path
, "*.so")));
855 *c
= '\0'; /* truncate the glob part */
857 STRV_FOREACH(name
, names
) {
858 /* This is most likely to run only once, hence let's not optimize anything. */
862 t
= startswith(*name
, path
);
866 t2
= endswith(t
, ".so");
870 t2
[0] = '\0'; /* truncate the suffix */
872 r
= safe_atou(t
, &version
);
874 log_debug_errno(r
, "Found libsystemd shared at \"%s.so\", but failed to parse version: %m", *name
);
878 log_debug("Found libsystemd shared at \"%s.so\", version %u (%s).",
880 version
>= minimal_version
? "OK" : "too old");
881 if (version
>= minimal_version
)