1 /* SPDX-License-Identifier: LGPL-2.1+ */
5 #include "alloc-util.h"
8 #include "id128-util.h"
11 #include "path-util.h"
13 #include "stdio-util.h"
14 #include "string-util.h"
17 #include "tmpfile-util.h"
18 #include "umask-util.h"
19 #include "user-util.h"
23 static const char *arg_test_dir
= NULL
;
25 static void test_chase_symlinks(void) {
26 _cleanup_free_
char *result
= NULL
;
28 const char *top
, *p
, *pslash
, *q
, *qslash
;
32 log_info("/* %s */", __func__
);
34 temp
= strjoina(arg_test_dir
?: "/tmp", "/test-chase.XXXXXX");
35 assert_se(mkdtemp(temp
));
37 top
= strjoina(temp
, "/top");
38 assert_se(mkdir(top
, 0700) >= 0);
40 p
= strjoina(top
, "/dot");
41 if (symlink(".", p
) < 0) {
42 assert_se(IN_SET(errno
, EINVAL
, ENOSYS
, ENOTTY
, EPERM
));
43 log_tests_skipped_errno(errno
, "symlink() not possible");
47 p
= strjoina(top
, "/dotdot");
48 assert_se(symlink("..", p
) >= 0);
50 p
= strjoina(top
, "/dotdota");
51 assert_se(symlink("../a", p
) >= 0);
53 p
= strjoina(temp
, "/a");
54 assert_se(symlink("b", p
) >= 0);
56 p
= strjoina(temp
, "/b");
57 assert_se(symlink("/usr", p
) >= 0);
59 p
= strjoina(temp
, "/start");
60 assert_se(symlink("top/dot/dotdota", p
) >= 0);
62 /* Paths that use symlinks underneath the "root" */
64 r
= chase_symlinks(p
, NULL
, 0, &result
, NULL
);
66 assert_se(path_equal(result
, "/usr"));
67 result
= mfree(result
);
69 pslash
= strjoina(p
, "/");
70 r
= chase_symlinks(pslash
, NULL
, 0, &result
, NULL
);
72 assert_se(path_equal(result
, "/usr/"));
73 result
= mfree(result
);
75 r
= chase_symlinks(p
, temp
, 0, &result
, NULL
);
76 assert_se(r
== -ENOENT
);
78 r
= chase_symlinks(pslash
, temp
, 0, &result
, NULL
);
79 assert_se(r
== -ENOENT
);
81 q
= strjoina(temp
, "/usr");
83 r
= chase_symlinks(p
, temp
, CHASE_NONEXISTENT
, &result
, NULL
);
85 assert_se(path_equal(result
, q
));
86 result
= mfree(result
);
88 qslash
= strjoina(q
, "/");
90 r
= chase_symlinks(pslash
, temp
, CHASE_NONEXISTENT
, &result
, NULL
);
92 assert_se(path_equal(result
, qslash
));
93 result
= mfree(result
);
95 assert_se(mkdir(q
, 0700) >= 0);
97 r
= chase_symlinks(p
, temp
, 0, &result
, NULL
);
99 assert_se(path_equal(result
, q
));
100 result
= mfree(result
);
102 r
= chase_symlinks(pslash
, temp
, 0, &result
, NULL
);
104 assert_se(path_equal(result
, qslash
));
105 result
= mfree(result
);
107 p
= strjoina(temp
, "/slash");
108 assert_se(symlink("/", p
) >= 0);
110 r
= chase_symlinks(p
, NULL
, 0, &result
, NULL
);
112 assert_se(path_equal(result
, "/"));
113 result
= mfree(result
);
115 r
= chase_symlinks(p
, temp
, 0, &result
, NULL
);
117 assert_se(path_equal(result
, temp
));
118 result
= mfree(result
);
120 /* Paths that would "escape" outside of the "root" */
122 p
= strjoina(temp
, "/6dots");
123 assert_se(symlink("../../..", p
) >= 0);
125 r
= chase_symlinks(p
, temp
, 0, &result
, NULL
);
126 assert_se(r
> 0 && path_equal(result
, temp
));
127 result
= mfree(result
);
129 p
= strjoina(temp
, "/6dotsusr");
130 assert_se(symlink("../../../usr", p
) >= 0);
132 r
= chase_symlinks(p
, temp
, 0, &result
, NULL
);
133 assert_se(r
> 0 && path_equal(result
, q
));
134 result
= mfree(result
);
136 p
= strjoina(temp
, "/top/8dotsusr");
137 assert_se(symlink("../../../../usr", p
) >= 0);
139 r
= chase_symlinks(p
, temp
, 0, &result
, NULL
);
140 assert_se(r
> 0 && path_equal(result
, q
));
141 result
= mfree(result
);
143 /* Paths that contain repeated slashes */
145 p
= strjoina(temp
, "/slashslash");
146 assert_se(symlink("///usr///", p
) >= 0);
148 r
= chase_symlinks(p
, NULL
, 0, &result
, NULL
);
150 assert_se(path_equal(result
, "/usr"));
151 result
= mfree(result
);
153 r
= chase_symlinks(p
, temp
, 0, &result
, NULL
);
155 assert_se(path_equal(result
, q
));
156 result
= mfree(result
);
158 /* Paths underneath the "root" with different UIDs while using CHASE_SAFE */
160 if (geteuid() == 0) {
161 p
= strjoina(temp
, "/user");
162 assert_se(mkdir(p
, 0755) >= 0);
163 assert_se(chown(p
, UID_NOBODY
, GID_NOBODY
) >= 0);
165 q
= strjoina(temp
, "/user/root");
166 assert_se(mkdir(q
, 0755) >= 0);
168 p
= strjoina(q
, "/link");
169 assert_se(symlink("/", p
) >= 0);
171 /* Fail when user-owned directories contain root-owned subdirectories. */
172 r
= chase_symlinks(p
, temp
, CHASE_SAFE
, &result
, NULL
);
173 assert_se(r
== -ENOLINK
);
174 result
= mfree(result
);
176 /* Allow this when the user-owned directories are all in the "root". */
177 r
= chase_symlinks(p
, q
, CHASE_SAFE
, &result
, NULL
);
179 result
= mfree(result
);
184 r
= chase_symlinks("/etc/./.././", NULL
, 0, &result
, NULL
);
186 assert_se(path_equal(result
, "/"));
187 result
= mfree(result
);
189 r
= chase_symlinks("/etc/./.././", "/etc", 0, &result
, NULL
);
190 assert_se(r
> 0 && path_equal(result
, "/etc"));
191 result
= mfree(result
);
193 r
= chase_symlinks("/../.././//../../etc", NULL
, 0, &result
, NULL
);
195 assert_se(streq(result
, "/etc"));
196 result
= mfree(result
);
198 r
= chase_symlinks("/../.././//../../test-chase.fsldajfl", NULL
, CHASE_NONEXISTENT
, &result
, NULL
);
200 assert_se(streq(result
, "/test-chase.fsldajfl"));
201 result
= mfree(result
);
203 r
= chase_symlinks("/../.././//../../etc", "/", CHASE_PREFIX_ROOT
, &result
, NULL
);
205 assert_se(streq(result
, "/etc"));
206 result
= mfree(result
);
208 r
= chase_symlinks("/../.././//../../test-chase.fsldajfl", "/", CHASE_PREFIX_ROOT
|CHASE_NONEXISTENT
, &result
, NULL
);
210 assert_se(streq(result
, "/test-chase.fsldajfl"));
211 result
= mfree(result
);
213 r
= chase_symlinks("/etc/machine-id/foo", NULL
, 0, &result
, NULL
);
214 assert_se(r
== -ENOTDIR
);
215 result
= mfree(result
);
217 /* Path that loops back to self */
219 p
= strjoina(temp
, "/recursive-symlink");
220 assert_se(symlink("recursive-symlink", p
) >= 0);
221 r
= chase_symlinks(p
, NULL
, 0, &result
, NULL
);
222 assert_se(r
== -ELOOP
);
224 /* Path which doesn't exist */
226 p
= strjoina(temp
, "/idontexist");
227 r
= chase_symlinks(p
, NULL
, 0, &result
, NULL
);
228 assert_se(r
== -ENOENT
);
230 r
= chase_symlinks(p
, NULL
, CHASE_NONEXISTENT
, &result
, NULL
);
232 assert_se(path_equal(result
, p
));
233 result
= mfree(result
);
235 p
= strjoina(temp
, "/idontexist/meneither");
236 r
= chase_symlinks(p
, NULL
, 0, &result
, NULL
);
237 assert_se(r
== -ENOENT
);
239 r
= chase_symlinks(p
, NULL
, CHASE_NONEXISTENT
, &result
, NULL
);
241 assert_se(path_equal(result
, p
));
242 result
= mfree(result
);
244 /* Path which doesn't exist, but contains weird stuff */
246 p
= strjoina(temp
, "/idontexist/..");
247 r
= chase_symlinks(p
, NULL
, 0, &result
, NULL
);
248 assert_se(r
== -ENOENT
);
250 r
= chase_symlinks(p
, NULL
, CHASE_NONEXISTENT
, &result
, NULL
);
251 assert_se(r
== -ENOENT
);
253 p
= strjoina(temp
, "/target");
254 q
= strjoina(temp
, "/top");
255 assert_se(symlink(q
, p
) >= 0);
256 p
= strjoina(temp
, "/target/idontexist");
257 r
= chase_symlinks(p
, NULL
, 0, &result
, NULL
);
258 assert_se(r
== -ENOENT
);
260 if (geteuid() == 0) {
261 p
= strjoina(temp
, "/priv1");
262 assert_se(mkdir(p
, 0755) >= 0);
264 q
= strjoina(p
, "/priv2");
265 assert_se(mkdir(q
, 0755) >= 0);
267 assert_se(chase_symlinks(q
, NULL
, CHASE_SAFE
, NULL
, NULL
) >= 0);
269 assert_se(chown(q
, UID_NOBODY
, GID_NOBODY
) >= 0);
270 assert_se(chase_symlinks(q
, NULL
, CHASE_SAFE
, NULL
, NULL
) >= 0);
272 assert_se(chown(p
, UID_NOBODY
, GID_NOBODY
) >= 0);
273 assert_se(chase_symlinks(q
, NULL
, CHASE_SAFE
, NULL
, NULL
) >= 0);
275 assert_se(chown(q
, 0, 0) >= 0);
276 assert_se(chase_symlinks(q
, NULL
, CHASE_SAFE
, NULL
, NULL
) == -ENOLINK
);
278 assert_se(rmdir(q
) >= 0);
279 assert_se(symlink("/etc/passwd", q
) >= 0);
280 assert_se(chase_symlinks(q
, NULL
, CHASE_SAFE
, NULL
, NULL
) == -ENOLINK
);
282 assert_se(chown(p
, 0, 0) >= 0);
283 assert_se(chase_symlinks(q
, NULL
, CHASE_SAFE
, NULL
, NULL
) >= 0);
286 p
= strjoina(temp
, "/machine-id-test");
287 assert_se(symlink("/usr/../etc/./machine-id", p
) >= 0);
289 r
= chase_symlinks(p
, NULL
, 0, NULL
, &pfd
);
291 _cleanup_close_
int fd
= -1;
296 fd
= fd_reopen(pfd
, O_RDONLY
|O_CLOEXEC
);
300 assert_se(id128_read_fd(fd
, ID128_PLAIN
, &a
) >= 0);
301 assert_se(sd_id128_get_machine(&b
) >= 0);
302 assert_se(sd_id128_equal(a
, b
));
305 /* Test CHASE_NOFOLLOW */
307 p
= strjoina(temp
, "/target");
308 q
= strjoina(temp
, "/symlink");
309 assert_se(symlink(p
, q
) >= 0);
310 r
= chase_symlinks(q
, NULL
, CHASE_NOFOLLOW
, &result
, &pfd
);
313 assert_se(path_equal(result
, q
));
314 assert_se(fstat(pfd
, &st
) >= 0);
315 assert_se(S_ISLNK(st
.st_mode
));
316 result
= mfree(result
);
318 /* s1 -> s2 -> nonexistent */
319 q
= strjoina(temp
, "/s1");
320 assert_se(symlink("s2", q
) >= 0);
321 p
= strjoina(temp
, "/s2");
322 assert_se(symlink("nonexistent", p
) >= 0);
323 r
= chase_symlinks(q
, NULL
, CHASE_NOFOLLOW
, &result
, &pfd
);
326 assert_se(path_equal(result
, q
));
327 assert_se(fstat(pfd
, &st
) >= 0);
328 assert_se(S_ISLNK(st
.st_mode
));
329 result
= mfree(result
);
333 p
= strjoina(temp
, "/start");
334 r
= chase_symlinks(p
, NULL
, CHASE_STEP
, &result
, NULL
);
336 p
= strjoina(temp
, "/top/dot/dotdota");
337 assert_se(streq(p
, result
));
338 result
= mfree(result
);
340 r
= chase_symlinks(p
, NULL
, CHASE_STEP
, &result
, NULL
);
342 p
= strjoina(temp
, "/top/./dotdota");
343 assert_se(streq(p
, result
));
344 result
= mfree(result
);
346 r
= chase_symlinks(p
, NULL
, CHASE_STEP
, &result
, NULL
);
348 p
= strjoina(temp
, "/top/../a");
349 assert_se(streq(p
, result
));
350 result
= mfree(result
);
352 r
= chase_symlinks(p
, NULL
, CHASE_STEP
, &result
, NULL
);
354 p
= strjoina(temp
, "/a");
355 assert_se(streq(p
, result
));
356 result
= mfree(result
);
358 r
= chase_symlinks(p
, NULL
, CHASE_STEP
, &result
, NULL
);
360 p
= strjoina(temp
, "/b");
361 assert_se(streq(p
, result
));
362 result
= mfree(result
);
364 r
= chase_symlinks(p
, NULL
, CHASE_STEP
, &result
, NULL
);
366 assert_se(streq("/usr", result
));
367 result
= mfree(result
);
369 r
= chase_symlinks("/usr", NULL
, CHASE_STEP
, &result
, NULL
);
371 assert_se(streq("/usr", result
));
372 result
= mfree(result
);
375 assert_se(rm_rf(temp
, REMOVE_ROOT
|REMOVE_PHYSICAL
) >= 0);
378 static void test_unlink_noerrno(void) {
382 log_info("/* %s */", __func__
);
384 name
= strjoina(arg_test_dir
?: "/tmp", "/test-close_nointr.XXXXXX");
385 fd
= mkostemp_safe(name
);
387 assert_se(close_nointr(fd
) >= 0);
392 assert_se(unlink_noerrno(name
) >= 0);
393 assert_se(errno
== 42);
394 assert_se(unlink_noerrno(name
) < 0);
395 assert_se(errno
== 42);
399 static void test_readlink_and_make_absolute(void) {
400 const char *tempdir
, *name
, *name2
, *name_alias
;
401 _cleanup_free_
char *r1
= NULL
, *r2
= NULL
, *pwd
= NULL
;
403 log_info("/* %s */", __func__
);
405 tempdir
= strjoina(arg_test_dir
?: "/tmp", "/test-readlink_and_make_absolute");
406 name
= strjoina(tempdir
, "/original");
407 name2
= "test-readlink_and_make_absolute/original";
408 name_alias
= strjoina(arg_test_dir
?: "/tmp", "/test-readlink_and_make_absolute-alias");
410 assert_se(mkdir_safe(tempdir
, 0755, getuid(), getgid(), MKDIR_WARN_MODE
) >= 0);
411 assert_se(touch(name
) >= 0);
413 if (symlink(name
, name_alias
) < 0) {
414 assert_se(IN_SET(errno
, EINVAL
, ENOSYS
, ENOTTY
, EPERM
));
415 log_tests_skipped_errno(errno
, "symlink() not possible");
417 assert_se(readlink_and_make_absolute(name_alias
, &r1
) >= 0);
418 assert_se(streq(r1
, name
));
419 assert_se(unlink(name_alias
) >= 0);
421 assert_se(safe_getcwd(&pwd
) >= 0);
423 assert_se(chdir(tempdir
) >= 0);
424 assert_se(symlink(name2
, name_alias
) >= 0);
425 assert_se(readlink_and_make_absolute(name_alias
, &r2
) >= 0);
426 assert_se(streq(r2
, name
));
427 assert_se(unlink(name_alias
) >= 0);
429 assert_se(chdir(pwd
) >= 0);
432 assert_se(rm_rf(tempdir
, REMOVE_ROOT
|REMOVE_PHYSICAL
) >= 0);
435 static void test_get_files_in_directory(void) {
436 _cleanup_strv_free_
char **l
= NULL
, **t
= NULL
;
438 assert_se(get_files_in_directory(arg_test_dir
?: "/tmp", &l
) >= 0);
439 assert_se(get_files_in_directory(".", &t
) >= 0);
440 assert_se(get_files_in_directory(".", NULL
) >= 0);
443 static void test_var_tmp(void) {
444 _cleanup_free_
char *tmpdir_backup
= NULL
, *temp_backup
= NULL
, *tmp_backup
= NULL
;
445 const char *tmp_dir
= NULL
, *t
;
447 log_info("/* %s */", __func__
);
449 t
= getenv("TMPDIR");
451 tmpdir_backup
= strdup(t
);
452 assert_se(tmpdir_backup
);
457 temp_backup
= strdup(t
);
458 assert_se(temp_backup
);
463 tmp_backup
= strdup(t
);
464 assert_se(tmp_backup
);
467 assert_se(unsetenv("TMPDIR") >= 0);
468 assert_se(unsetenv("TEMP") >= 0);
469 assert_se(unsetenv("TMP") >= 0);
471 assert_se(var_tmp_dir(&tmp_dir
) >= 0);
472 assert_se(streq(tmp_dir
, "/var/tmp"));
474 assert_se(setenv("TMPDIR", "/tmp", true) >= 0);
475 assert_se(streq(getenv("TMPDIR"), "/tmp"));
477 assert_se(var_tmp_dir(&tmp_dir
) >= 0);
478 assert_se(streq(tmp_dir
, "/tmp"));
480 assert_se(setenv("TMPDIR", "/88_does_not_exist_88", true) >= 0);
481 assert_se(streq(getenv("TMPDIR"), "/88_does_not_exist_88"));
483 assert_se(var_tmp_dir(&tmp_dir
) >= 0);
484 assert_se(streq(tmp_dir
, "/var/tmp"));
487 assert_se(setenv("TMPDIR", tmpdir_backup
, true) >= 0);
488 assert_se(streq(getenv("TMPDIR"), tmpdir_backup
));
492 assert_se(setenv("TEMP", temp_backup
, true) >= 0);
493 assert_se(streq(getenv("TEMP"), temp_backup
));
497 assert_se(setenv("TMP", tmp_backup
, true) >= 0);
498 assert_se(streq(getenv("TMP"), tmp_backup
));
502 static void test_dot_or_dot_dot(void) {
503 log_info("/* %s */", __func__
);
505 assert_se(!dot_or_dot_dot(NULL
));
506 assert_se(!dot_or_dot_dot(""));
507 assert_se(!dot_or_dot_dot("xxx"));
508 assert_se(dot_or_dot_dot("."));
509 assert_se(dot_or_dot_dot(".."));
510 assert_se(!dot_or_dot_dot(".foo"));
511 assert_se(!dot_or_dot_dot("..foo"));
514 static void test_access_fd(void) {
515 _cleanup_(rmdir_and_freep
) char *p
= NULL
;
516 _cleanup_close_
int fd
= -1;
519 log_info("/* %s */", __func__
);
521 a
= strjoina(arg_test_dir
?: "/tmp", "/access-fd.XXXXXX");
522 assert_se(mkdtemp_malloc(a
, &p
) >= 0);
524 fd
= open(p
, O_RDONLY
|O_DIRECTORY
|O_CLOEXEC
);
527 assert_se(access_fd(fd
, R_OK
) >= 0);
528 assert_se(access_fd(fd
, F_OK
) >= 0);
529 assert_se(access_fd(fd
, W_OK
) >= 0);
531 assert_se(fchmod(fd
, 0000) >= 0);
533 assert_se(access_fd(fd
, F_OK
) >= 0);
535 if (geteuid() == 0) {
536 assert_se(access_fd(fd
, R_OK
) >= 0);
537 assert_se(access_fd(fd
, W_OK
) >= 0);
539 assert_se(access_fd(fd
, R_OK
) == -EACCES
);
540 assert_se(access_fd(fd
, W_OK
) == -EACCES
);
544 static void test_touch_file(void) {
545 uid_t test_uid
, test_gid
;
546 _cleanup_(rm_rf_physical_and_freep
) char *p
= NULL
;
552 log_info("/* %s */", __func__
);
554 test_uid
= geteuid() == 0 ? 65534 : getuid();
555 test_gid
= geteuid() == 0 ? 65534 : getgid();
557 test_mtime
= usec_sub_unsigned(now(CLOCK_REALTIME
), USEC_PER_WEEK
);
559 a
= strjoina(arg_test_dir
?: "/dev/shm", "/touch-file-XXXXXX");
560 assert_se(mkdtemp_malloc(a
, &p
) >= 0);
562 a
= strjoina(p
, "/regular");
563 r
= touch_file(a
, false, test_mtime
, test_uid
, test_gid
, 0640);
565 assert_se(IN_SET(r
, -EINVAL
, -ENOSYS
, -ENOTTY
, -EPERM
));
566 log_tests_skipped_errno(errno
, "touch_file() not possible");
570 assert_se(lstat(a
, &st
) >= 0);
571 assert_se(st
.st_uid
== test_uid
);
572 assert_se(st
.st_gid
== test_gid
);
573 assert_se(S_ISREG(st
.st_mode
));
574 assert_se((st
.st_mode
& 0777) == 0640);
575 assert_se(timespec_load(&st
.st_mtim
) == test_mtime
);
577 a
= strjoina(p
, "/dir");
578 assert_se(mkdir(a
, 0775) >= 0);
579 assert_se(touch_file(a
, false, test_mtime
, test_uid
, test_gid
, 0640) >= 0);
580 assert_se(lstat(a
, &st
) >= 0);
581 assert_se(st
.st_uid
== test_uid
);
582 assert_se(st
.st_gid
== test_gid
);
583 assert_se(S_ISDIR(st
.st_mode
));
584 assert_se((st
.st_mode
& 0777) == 0640);
585 assert_se(timespec_load(&st
.st_mtim
) == test_mtime
);
587 a
= strjoina(p
, "/fifo");
588 assert_se(mkfifo(a
, 0775) >= 0);
589 assert_se(touch_file(a
, false, test_mtime
, test_uid
, test_gid
, 0640) >= 0);
590 assert_se(lstat(a
, &st
) >= 0);
591 assert_se(st
.st_uid
== test_uid
);
592 assert_se(st
.st_gid
== test_gid
);
593 assert_se(S_ISFIFO(st
.st_mode
));
594 assert_se((st
.st_mode
& 0777) == 0640);
595 assert_se(timespec_load(&st
.st_mtim
) == test_mtime
);
597 a
= strjoina(p
, "/sock");
598 assert_se(mknod(a
, 0775 | S_IFSOCK
, 0) >= 0);
599 assert_se(touch_file(a
, false, test_mtime
, test_uid
, test_gid
, 0640) >= 0);
600 assert_se(lstat(a
, &st
) >= 0);
601 assert_se(st
.st_uid
== test_uid
);
602 assert_se(st
.st_gid
== test_gid
);
603 assert_se(S_ISSOCK(st
.st_mode
));
604 assert_se((st
.st_mode
& 0777) == 0640);
605 assert_se(timespec_load(&st
.st_mtim
) == test_mtime
);
607 if (geteuid() == 0) {
608 a
= strjoina(p
, "/cdev");
609 r
= mknod(a
, 0775 | S_IFCHR
, makedev(0, 0));
610 if (r
< 0 && errno
== EPERM
&& detect_container() > 0) {
611 log_notice("Running in unprivileged container? Skipping remaining tests in %s", __func__
);
615 assert_se(touch_file(a
, false, test_mtime
, test_uid
, test_gid
, 0640) >= 0);
616 assert_se(lstat(a
, &st
) >= 0);
617 assert_se(st
.st_uid
== test_uid
);
618 assert_se(st
.st_gid
== test_gid
);
619 assert_se(S_ISCHR(st
.st_mode
));
620 assert_se((st
.st_mode
& 0777) == 0640);
621 assert_se(timespec_load(&st
.st_mtim
) == test_mtime
);
623 a
= strjoina(p
, "/bdev");
624 assert_se(mknod(a
, 0775 | S_IFBLK
, makedev(0, 0)) >= 0);
625 assert_se(touch_file(a
, false, test_mtime
, test_uid
, test_gid
, 0640) >= 0);
626 assert_se(lstat(a
, &st
) >= 0);
627 assert_se(st
.st_uid
== test_uid
);
628 assert_se(st
.st_gid
== test_gid
);
629 assert_se(S_ISBLK(st
.st_mode
));
630 assert_se((st
.st_mode
& 0777) == 0640);
631 assert_se(timespec_load(&st
.st_mtim
) == test_mtime
);
634 a
= strjoina(p
, "/lnk");
635 assert_se(symlink("target", a
) >= 0);
636 assert_se(touch_file(a
, false, test_mtime
, test_uid
, test_gid
, 0640) >= 0);
637 assert_se(lstat(a
, &st
) >= 0);
638 assert_se(st
.st_uid
== test_uid
);
639 assert_se(st
.st_gid
== test_gid
);
640 assert_se(S_ISLNK(st
.st_mode
));
641 assert_se(timespec_load(&st
.st_mtim
) == test_mtime
);
644 static void test_unlinkat_deallocate(void) {
645 _cleanup_free_
char *p
= NULL
;
646 _cleanup_close_
int fd
= -1;
649 log_info("/* %s */", __func__
);
651 assert_se(tempfn_random_child(arg_test_dir
, "unlink-deallocation", &p
) >= 0);
653 fd
= open(p
, O_WRONLY
|O_CLOEXEC
|O_CREAT
|O_EXCL
, 0600);
656 assert_se(write(fd
, "hallo\n", 6) == 6);
658 assert_se(fstat(fd
, &st
) >= 0);
659 assert_se(st
.st_size
== 6);
660 assert_se(st
.st_blocks
> 0);
661 assert_se(st
.st_nlink
== 1);
663 assert_se(unlinkat_deallocate(AT_FDCWD
, p
, 0) >= 0);
665 assert_se(fstat(fd
, &st
) >= 0);
666 assert_se(IN_SET(st
.st_size
, 0, 6)); /* depending on whether hole punching worked the size will be 6
667 (it worked) or 0 (we had to resort to truncation) */
668 assert_se(st
.st_blocks
== 0);
669 assert_se(st
.st_nlink
== 0);
672 static void test_fsync_directory_of_file(void) {
673 _cleanup_close_
int fd
= -1;
675 log_info("/* %s */", __func__
);
677 fd
= open_tmpfile_unlinkable(arg_test_dir
, O_RDWR
);
680 assert_se(fsync_directory_of_file(fd
) >= 0);
683 static void test_rename_noreplace(void) {
684 static const char* const table
[] = {
693 _cleanup_(rm_rf_physical_and_freep
) char *z
= NULL
;
694 const char *j
= NULL
;
697 log_info("/* %s */", __func__
);
700 j
= strjoina(arg_test_dir
, "/testXXXXXX");
701 assert_se(mkdtemp_malloc(j
, &z
) >= 0);
703 j
= strjoina(z
, table
[0]);
704 assert_se(touch(j
) >= 0);
706 j
= strjoina(z
, table
[1]);
707 assert_se(mkdir(j
, 0777) >= 0);
709 j
= strjoina(z
, table
[2]);
710 (void) mkfifo(j
, 0777);
712 j
= strjoina(z
, table
[3]);
713 (void) mknod(j
, S_IFSOCK
| 0777, 0);
715 j
= strjoina(z
, table
[4]);
716 (void) symlink("foobar", j
);
718 STRV_FOREACH(a
, (char**) table
) {
719 _cleanup_free_
char *x
= NULL
, *y
= NULL
;
724 if (access(x
, F_OK
) < 0) {
725 assert_se(errno
== ENOENT
);
729 STRV_FOREACH(b
, (char**) table
) {
730 _cleanup_free_
char *w
= NULL
;
735 if (access(w
, F_OK
) < 0) {
736 assert_se(errno
== ENOENT
);
740 assert_se(rename_noreplace(AT_FDCWD
, w
, AT_FDCWD
, y
) == -EEXIST
);
743 y
= strjoin(z
, "/somethingelse");
746 assert_se(rename_noreplace(AT_FDCWD
, x
, AT_FDCWD
, y
) >= 0);
747 assert_se(rename_noreplace(AT_FDCWD
, y
, AT_FDCWD
, x
) >= 0);
751 static void test_chmod_and_chown(void) {
752 _cleanup_(rm_rf_physical_and_freep
) char *d
= NULL
;
753 _unused_ _cleanup_umask_ mode_t u
= umask(0000);
760 log_info("/* %s */", __func__
);
762 assert_se(mkdtemp_malloc(NULL
, &d
) >= 0);
764 p
= strjoina(d
, "/reg");
765 assert_se(mknod(p
, S_IFREG
| 0123, 0) >= 0);
767 assert_se(chmod_and_chown(p
, S_IFREG
| 0321, 1, 2) >= 0);
768 assert_se(chmod_and_chown(p
, S_IFDIR
| 0555, 3, 4) == -EINVAL
);
770 assert_se(lstat(p
, &st
) >= 0);
771 assert_se(S_ISREG(st
.st_mode
));
772 assert_se((st
.st_mode
& 07777) == 0321);
774 p
= strjoina(d
, "/dir");
775 assert_se(mkdir(p
, 0123) >= 0);
777 assert_se(chmod_and_chown(p
, S_IFDIR
| 0321, 1, 2) >= 0);
778 assert_se(chmod_and_chown(p
, S_IFREG
| 0555, 3, 4) == -EINVAL
);
780 assert_se(lstat(p
, &st
) >= 0);
781 assert_se(S_ISDIR(st
.st_mode
));
782 assert_se((st
.st_mode
& 07777) == 0321);
784 p
= strjoina(d
, "/lnk");
785 assert_se(symlink("idontexist", p
) >= 0);
787 assert_se(chmod_and_chown(p
, S_IFLNK
| 0321, 1, 2) >= 0);
788 assert_se(chmod_and_chown(p
, S_IFREG
| 0555, 3, 4) == -EINVAL
);
789 assert_se(chmod_and_chown(p
, S_IFDIR
| 0555, 3, 4) == -EINVAL
);
791 assert_se(lstat(p
, &st
) >= 0);
792 assert_se(S_ISLNK(st
.st_mode
));
795 int main(int argc
, char *argv
[]) {
796 test_setup_logging(LOG_INFO
);
798 arg_test_dir
= argv
[1];
800 test_chase_symlinks();
801 test_unlink_noerrno();
802 test_readlink_and_make_absolute();
803 test_get_files_in_directory();
805 test_dot_or_dot_dot();
808 test_unlinkat_deallocate();
809 test_fsync_directory_of_file();
810 test_rename_noreplace();
811 test_chmod_and_chown();