507 lines
17 KiB
C
507 lines
17 KiB
C
/***
|
|
This file is part of systemd.
|
|
|
|
Copyright 2010 Lennart Poettering
|
|
Copyright 2013 Thomas H.P. Andersen
|
|
|
|
systemd is free software; you can redistribute it and/or modify it
|
|
under the terms of the GNU Lesser General Public License as published by
|
|
the Free Software Foundation; either version 2.1 of the License, or
|
|
(at your option) any later version.
|
|
|
|
systemd is distributed in the hope that it will be useful, but
|
|
WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
Lesser General Public License for more details.
|
|
|
|
You should have received a copy of the GNU Lesser General Public License
|
|
along with systemd; If not, see <http://www.gnu.org/licenses/>.
|
|
***/
|
|
|
|
#include <errno.h>
|
|
#include <fcntl.h>
|
|
#include <string.h>
|
|
#include <sys/types.h>
|
|
#include <sys/wait.h>
|
|
#include <sys/xattr.h>
|
|
#include <unistd.h>
|
|
|
|
#include "alloc-util.h"
|
|
#include "conf-parser.h"
|
|
#include "def.h"
|
|
#include "fd-util.h"
|
|
#include "fileio.h"
|
|
#include "fs-util.h"
|
|
#include "fstab-util.h"
|
|
#include "glob-util.h"
|
|
#include "io-util.h"
|
|
#include "mkdir.h"
|
|
#include "parse-util.h"
|
|
#include "path-util.h"
|
|
#include "proc-cmdline.h"
|
|
#include "process-util.h"
|
|
#include "rm-rf.h"
|
|
#include "special.h"
|
|
#include "string-util.h"
|
|
#include "strv.h"
|
|
#include "util.h"
|
|
#include "virt.h"
|
|
#include "xattr-util.h"
|
|
|
|
static void test_align_power2(void) {
|
|
unsigned long i, p2;
|
|
|
|
assert_se(ALIGN_POWER2(0) == 0);
|
|
assert_se(ALIGN_POWER2(1) == 1);
|
|
assert_se(ALIGN_POWER2(2) == 2);
|
|
assert_se(ALIGN_POWER2(3) == 4);
|
|
assert_se(ALIGN_POWER2(12) == 16);
|
|
|
|
assert_se(ALIGN_POWER2(ULONG_MAX) == 0);
|
|
assert_se(ALIGN_POWER2(ULONG_MAX - 1) == 0);
|
|
assert_se(ALIGN_POWER2(ULONG_MAX - 1024) == 0);
|
|
assert_se(ALIGN_POWER2(ULONG_MAX / 2) == ULONG_MAX / 2 + 1);
|
|
assert_se(ALIGN_POWER2(ULONG_MAX + 1) == 0);
|
|
|
|
for (i = 1; i < 131071; ++i) {
|
|
for (p2 = 1; p2 < i; p2 <<= 1)
|
|
/* empty */ ;
|
|
|
|
assert_se(ALIGN_POWER2(i) == p2);
|
|
}
|
|
|
|
for (i = ULONG_MAX - 1024; i < ULONG_MAX; ++i) {
|
|
for (p2 = 1; p2 && p2 < i; p2 <<= 1)
|
|
/* empty */ ;
|
|
|
|
assert_se(ALIGN_POWER2(i) == p2);
|
|
}
|
|
}
|
|
|
|
static void test_max(void) {
|
|
static const struct {
|
|
int a;
|
|
int b[CONST_MAX(10, 100)];
|
|
} val1 = {
|
|
.a = CONST_MAX(10, 100),
|
|
};
|
|
int d = 0;
|
|
|
|
assert_cc(sizeof(val1.b) == sizeof(int) * 100);
|
|
|
|
/* CONST_MAX returns (void) instead of a value if the passed arguments
|
|
* are not of the same type or not constant expressions. */
|
|
assert_cc(__builtin_types_compatible_p(typeof(CONST_MAX(1, 10)), int));
|
|
assert_cc(__builtin_types_compatible_p(typeof(CONST_MAX(1, 1U)), void));
|
|
|
|
assert_se(val1.a == 100);
|
|
assert_se(MAX(++d, 0) == 1);
|
|
assert_se(d == 1);
|
|
|
|
assert_cc(MAXSIZE(char[3], uint16_t) == 3);
|
|
assert_cc(MAXSIZE(char[3], uint32_t) == 4);
|
|
assert_cc(MAXSIZE(char, long) == sizeof(long));
|
|
|
|
assert_se(MAX(-5, 5) == 5);
|
|
assert_se(MAX(5, 5) == 5);
|
|
assert_se(MAX(MAX(1, MAX(2, MAX(3, 4))), 5) == 5);
|
|
assert_se(MAX(MAX(1, MAX(2, MAX(3, 2))), 1) == 3);
|
|
assert_se(MAX(MIN(1, MIN(2, MIN(3, 4))), 5) == 5);
|
|
assert_se(MAX(MAX(1, MIN(2, MIN(3, 2))), 1) == 2);
|
|
assert_se(LESS_BY(8, 4) == 4);
|
|
assert_se(LESS_BY(8, 8) == 0);
|
|
assert_se(LESS_BY(4, 8) == 0);
|
|
assert_se(LESS_BY(16, LESS_BY(8, 4)) == 12);
|
|
assert_se(LESS_BY(4, LESS_BY(8, 4)) == 0);
|
|
assert_se(CLAMP(-5, 0, 1) == 0);
|
|
assert_se(CLAMP(5, 0, 1) == 1);
|
|
assert_se(CLAMP(5, -10, 1) == 1);
|
|
assert_se(CLAMP(5, -10, 10) == 5);
|
|
assert_se(CLAMP(CLAMP(0, -10, 10), CLAMP(-5, 10, 20), CLAMP(100, -5, 20)) == 10);
|
|
}
|
|
|
|
static void test_container_of(void) {
|
|
struct mytype {
|
|
uint8_t pad1[3];
|
|
uint64_t v1;
|
|
uint8_t pad2[2];
|
|
uint32_t v2;
|
|
} _packed_ myval = { };
|
|
|
|
assert_cc(sizeof(myval) == 17);
|
|
assert_se(container_of(&myval.v1, struct mytype, v1) == &myval);
|
|
assert_se(container_of(&myval.v2, struct mytype, v2) == &myval);
|
|
assert_se(container_of(&container_of(&myval.v2,
|
|
struct mytype,
|
|
v2)->v1,
|
|
struct mytype,
|
|
v1) == &myval);
|
|
}
|
|
|
|
static void test_div_round_up(void) {
|
|
int div;
|
|
|
|
/* basic tests */
|
|
assert_se(DIV_ROUND_UP(0, 8) == 0);
|
|
assert_se(DIV_ROUND_UP(1, 8) == 1);
|
|
assert_se(DIV_ROUND_UP(8, 8) == 1);
|
|
assert_se(DIV_ROUND_UP(12, 8) == 2);
|
|
assert_se(DIV_ROUND_UP(16, 8) == 2);
|
|
|
|
/* test multiple evaluation */
|
|
div = 0;
|
|
assert_se(DIV_ROUND_UP(div++, 8) == 0 && div == 1);
|
|
assert_se(DIV_ROUND_UP(++div, 8) == 1 && div == 2);
|
|
assert_se(DIV_ROUND_UP(8, div++) == 4 && div == 3);
|
|
assert_se(DIV_ROUND_UP(8, ++div) == 2 && div == 4);
|
|
|
|
/* overflow test with exact division */
|
|
assert_se(sizeof(0U) == 4);
|
|
assert_se(0xfffffffaU % 10U == 0U);
|
|
assert_se(0xfffffffaU / 10U == 429496729U);
|
|
assert_se(DIV_ROUND_UP(0xfffffffaU, 10U) == 429496729U);
|
|
assert_se((0xfffffffaU + 10U - 1U) / 10U == 0U);
|
|
assert_se(0xfffffffaU / 10U + !!(0xfffffffaU % 10U) == 429496729U);
|
|
|
|
/* overflow test with rounded division */
|
|
assert_se(0xfffffffdU % 10U == 3U);
|
|
assert_se(0xfffffffdU / 10U == 429496729U);
|
|
assert_se(DIV_ROUND_UP(0xfffffffdU, 10U) == 429496730U);
|
|
assert_se((0xfffffffdU + 10U - 1U) / 10U == 0U);
|
|
assert_se(0xfffffffdU / 10U + !!(0xfffffffdU % 10U) == 429496730U);
|
|
}
|
|
|
|
static void test_u64log2(void) {
|
|
assert_se(u64log2(0) == 0);
|
|
assert_se(u64log2(8) == 3);
|
|
assert_se(u64log2(9) == 3);
|
|
assert_se(u64log2(15) == 3);
|
|
assert_se(u64log2(16) == 4);
|
|
assert_se(u64log2(1024*1024) == 20);
|
|
assert_se(u64log2(1024*1024+5) == 20);
|
|
}
|
|
|
|
static void test_protect_errno(void) {
|
|
errno = 12;
|
|
{
|
|
PROTECT_ERRNO;
|
|
errno = 11;
|
|
}
|
|
assert_se(errno == 12);
|
|
}
|
|
|
|
static void test_config_parse_iec_uint64(void) {
|
|
uint64_t offset = 0;
|
|
assert_se(config_parse_iec_uint64(NULL, "/this/file", 11, "Section", 22, "Size", 0, "4M", &offset, NULL) == 0);
|
|
assert_se(offset == 4 * 1024 * 1024);
|
|
|
|
assert_se(config_parse_iec_uint64(NULL, "/this/file", 11, "Section", 22, "Size", 0, "4.5M", &offset, NULL) == 0);
|
|
}
|
|
|
|
static void test_fstab_node_to_udev_node(void) {
|
|
char *n;
|
|
|
|
n = fstab_node_to_udev_node("LABEL=applé/jack");
|
|
puts(n);
|
|
assert_se(streq(n, "/dev/disk/by-label/applé\\x2fjack"));
|
|
free(n);
|
|
|
|
n = fstab_node_to_udev_node("PARTLABEL=pinkié pie");
|
|
puts(n);
|
|
assert_se(streq(n, "/dev/disk/by-partlabel/pinkié\\x20pie"));
|
|
free(n);
|
|
|
|
n = fstab_node_to_udev_node("UUID=037b9d94-148e-4ee4-8d38-67bfe15bb535");
|
|
puts(n);
|
|
assert_se(streq(n, "/dev/disk/by-uuid/037b9d94-148e-4ee4-8d38-67bfe15bb535"));
|
|
free(n);
|
|
|
|
n = fstab_node_to_udev_node("PARTUUID=037b9d94-148e-4ee4-8d38-67bfe15bb535");
|
|
puts(n);
|
|
assert_se(streq(n, "/dev/disk/by-partuuid/037b9d94-148e-4ee4-8d38-67bfe15bb535"));
|
|
free(n);
|
|
|
|
n = fstab_node_to_udev_node("PONIES=awesome");
|
|
puts(n);
|
|
assert_se(streq(n, "PONIES=awesome"));
|
|
free(n);
|
|
|
|
n = fstab_node_to_udev_node("/dev/xda1");
|
|
puts(n);
|
|
assert_se(streq(n, "/dev/xda1"));
|
|
free(n);
|
|
}
|
|
|
|
static void test_get_files_in_directory(void) {
|
|
_cleanup_strv_free_ char **l = NULL, **t = NULL;
|
|
|
|
assert_se(get_files_in_directory("/tmp", &l) >= 0);
|
|
assert_se(get_files_in_directory(".", &t) >= 0);
|
|
assert_se(get_files_in_directory(".", NULL) >= 0);
|
|
}
|
|
|
|
static void test_in_set(void) {
|
|
assert_se(IN_SET(1, 1));
|
|
assert_se(IN_SET(1, 1, 2, 3, 4));
|
|
assert_se(IN_SET(2, 1, 2, 3, 4));
|
|
assert_se(IN_SET(3, 1, 2, 3, 4));
|
|
assert_se(IN_SET(4, 1, 2, 3, 4));
|
|
assert_se(!IN_SET(0, 1));
|
|
assert_se(!IN_SET(0, 1, 2, 3, 4));
|
|
}
|
|
|
|
static void test_log2i(void) {
|
|
assert_se(log2i(1) == 0);
|
|
assert_se(log2i(2) == 1);
|
|
assert_se(log2i(3) == 1);
|
|
assert_se(log2i(4) == 2);
|
|
assert_se(log2i(32) == 5);
|
|
assert_se(log2i(33) == 5);
|
|
assert_se(log2i(63) == 5);
|
|
assert_se(log2i(INT_MAX) == sizeof(int)*8-2);
|
|
}
|
|
|
|
static void test_unlink_noerrno(void) {
|
|
char name[] = "/tmp/test-close_nointr.XXXXXX";
|
|
int fd;
|
|
|
|
fd = mkostemp_safe(name, O_RDWR|O_CLOEXEC);
|
|
assert_se(fd >= 0);
|
|
assert_se(close_nointr(fd) >= 0);
|
|
|
|
{
|
|
PROTECT_ERRNO;
|
|
errno = -42;
|
|
assert_se(unlink_noerrno(name) >= 0);
|
|
assert_se(errno == -42);
|
|
assert_se(unlink_noerrno(name) < 0);
|
|
assert_se(errno == -42);
|
|
}
|
|
}
|
|
|
|
static void test_readlink_and_make_absolute(void) {
|
|
char tempdir[] = "/tmp/test-readlink_and_make_absolute";
|
|
char name[] = "/tmp/test-readlink_and_make_absolute/original";
|
|
char name2[] = "test-readlink_and_make_absolute/original";
|
|
char name_alias[] = "/tmp/test-readlink_and_make_absolute-alias";
|
|
char *r = NULL;
|
|
|
|
assert_se(mkdir_safe(tempdir, 0755, getuid(), getgid()) >= 0);
|
|
assert_se(touch(name) >= 0);
|
|
|
|
assert_se(symlink(name, name_alias) >= 0);
|
|
assert_se(readlink_and_make_absolute(name_alias, &r) >= 0);
|
|
assert_se(streq(r, name));
|
|
free(r);
|
|
assert_se(unlink(name_alias) >= 0);
|
|
|
|
assert_se(chdir(tempdir) >= 0);
|
|
assert_se(symlink(name2, name_alias) >= 0);
|
|
assert_se(readlink_and_make_absolute(name_alias, &r) >= 0);
|
|
assert_se(streq(r, name));
|
|
free(r);
|
|
assert_se(unlink(name_alias) >= 0);
|
|
|
|
assert_se(rm_rf(tempdir, REMOVE_ROOT|REMOVE_PHYSICAL) >= 0);
|
|
}
|
|
|
|
static void test_glob_exists(void) {
|
|
char name[] = "/tmp/test-glob_exists.XXXXXX";
|
|
int fd = -1;
|
|
int r;
|
|
|
|
fd = mkostemp_safe(name, O_RDWR|O_CLOEXEC);
|
|
assert_se(fd >= 0);
|
|
close(fd);
|
|
|
|
r = glob_exists("/tmp/test-glob_exists*");
|
|
assert_se(r == 1);
|
|
|
|
r = unlink(name);
|
|
assert_se(r == 0);
|
|
r = glob_exists("/tmp/test-glob_exists*");
|
|
assert_se(r == 0);
|
|
}
|
|
|
|
static void test_execute_directory(void) {
|
|
char template_lo[] = "/tmp/test-readlink_and_make_absolute-lo.XXXXXXX";
|
|
char template_hi[] = "/tmp/test-readlink_and_make_absolute-hi.XXXXXXX";
|
|
const char * dirs[] = {template_hi, template_lo, NULL};
|
|
const char *name, *name2, *name3, *overridden, *override, *masked, *mask;
|
|
|
|
assert_se(mkdtemp(template_lo));
|
|
assert_se(mkdtemp(template_hi));
|
|
|
|
name = strjoina(template_lo, "/script");
|
|
name2 = strjoina(template_hi, "/script2");
|
|
name3 = strjoina(template_lo, "/useless");
|
|
overridden = strjoina(template_lo, "/overridden");
|
|
override = strjoina(template_hi, "/overridden");
|
|
masked = strjoina(template_lo, "/masked");
|
|
mask = strjoina(template_hi, "/masked");
|
|
|
|
assert_se(write_string_file(name, "#!/bin/sh\necho 'Executing '$0\ntouch $(dirname $0)/it_works", WRITE_STRING_FILE_CREATE) == 0);
|
|
assert_se(write_string_file(name2, "#!/bin/sh\necho 'Executing '$0\ntouch $(dirname $0)/it_works2", WRITE_STRING_FILE_CREATE) == 0);
|
|
assert_se(write_string_file(overridden, "#!/bin/sh\necho 'Executing '$0\ntouch $(dirname $0)/failed", WRITE_STRING_FILE_CREATE) == 0);
|
|
assert_se(write_string_file(override, "#!/bin/sh\necho 'Executing '$0", WRITE_STRING_FILE_CREATE) == 0);
|
|
assert_se(write_string_file(masked, "#!/bin/sh\necho 'Executing '$0\ntouch $(dirname $0)/failed", WRITE_STRING_FILE_CREATE) == 0);
|
|
assert_se(symlink("/dev/null", mask) == 0);
|
|
assert_se(chmod(name, 0755) == 0);
|
|
assert_se(chmod(name2, 0755) == 0);
|
|
assert_se(chmod(overridden, 0755) == 0);
|
|
assert_se(chmod(override, 0755) == 0);
|
|
assert_se(chmod(masked, 0755) == 0);
|
|
assert_se(touch(name3) >= 0);
|
|
|
|
execute_directories(dirs, DEFAULT_TIMEOUT_USEC, NULL);
|
|
|
|
assert_se(chdir(template_lo) == 0);
|
|
assert_se(access("it_works", F_OK) >= 0);
|
|
assert_se(access("failed", F_OK) < 0);
|
|
|
|
assert_se(chdir(template_hi) == 0);
|
|
assert_se(access("it_works2", F_OK) >= 0);
|
|
assert_se(access("failed", F_OK) < 0);
|
|
|
|
(void) rm_rf(template_lo, REMOVE_ROOT|REMOVE_PHYSICAL);
|
|
(void) rm_rf(template_hi, REMOVE_ROOT|REMOVE_PHYSICAL);
|
|
}
|
|
|
|
static int parse_item(const char *key, const char *value) {
|
|
assert_se(key);
|
|
|
|
log_info("kernel cmdline option <%s> = <%s>", key, strna(value));
|
|
return 0;
|
|
}
|
|
|
|
static void test_parse_proc_cmdline(void) {
|
|
assert_se(parse_proc_cmdline(parse_item) >= 0);
|
|
}
|
|
|
|
static void test_raw_clone(void) {
|
|
pid_t parent, pid, pid2;
|
|
|
|
parent = getpid();
|
|
log_info("before clone: getpid()→"PID_FMT, parent);
|
|
assert_se(raw_getpid() == parent);
|
|
|
|
pid = raw_clone(0, NULL);
|
|
assert_se(pid >= 0);
|
|
|
|
pid2 = raw_getpid();
|
|
log_info("raw_clone: "PID_FMT" getpid()→"PID_FMT" raw_getpid()→"PID_FMT,
|
|
pid, getpid(), pid2);
|
|
if (pid == 0) {
|
|
assert_se(pid2 != parent);
|
|
_exit(EXIT_SUCCESS);
|
|
} else {
|
|
int status;
|
|
|
|
assert_se(pid2 == parent);
|
|
waitpid(pid, &status, __WCLONE);
|
|
assert_se(WIFEXITED(status) && WEXITSTATUS(status) == EXIT_SUCCESS);
|
|
}
|
|
}
|
|
|
|
static void test_sparse_write_one(int fd, const char *buffer, size_t n) {
|
|
char check[n];
|
|
|
|
assert_se(lseek(fd, 0, SEEK_SET) == 0);
|
|
assert_se(ftruncate(fd, 0) >= 0);
|
|
assert_se(sparse_write(fd, buffer, n, 4) == (ssize_t) n);
|
|
|
|
assert_se(lseek(fd, 0, SEEK_CUR) == (off_t) n);
|
|
assert_se(ftruncate(fd, n) >= 0);
|
|
|
|
assert_se(lseek(fd, 0, SEEK_SET) == 0);
|
|
assert_se(read(fd, check, n) == (ssize_t) n);
|
|
|
|
assert_se(memcmp(buffer, check, n) == 0);
|
|
}
|
|
|
|
static void test_sparse_write(void) {
|
|
const char test_a[] = "test";
|
|
const char test_b[] = "\0\0\0\0test\0\0\0\0";
|
|
const char test_c[] = "\0\0test\0\0\0\0";
|
|
const char test_d[] = "\0\0test\0\0\0test\0\0\0\0test\0\0\0\0\0test\0\0\0test\0\0\0\0test\0\0\0\0\0\0\0\0";
|
|
const char test_e[] = "test\0\0\0\0test";
|
|
_cleanup_close_ int fd = -1;
|
|
char fn[] = "/tmp/sparseXXXXXX";
|
|
|
|
fd = mkostemp(fn, O_CLOEXEC);
|
|
assert_se(fd >= 0);
|
|
unlink(fn);
|
|
|
|
test_sparse_write_one(fd, test_a, sizeof(test_a));
|
|
test_sparse_write_one(fd, test_b, sizeof(test_b));
|
|
test_sparse_write_one(fd, test_c, sizeof(test_c));
|
|
test_sparse_write_one(fd, test_d, sizeof(test_d));
|
|
test_sparse_write_one(fd, test_e, sizeof(test_e));
|
|
}
|
|
|
|
static void test_fgetxattrat_fake(void) {
|
|
char t[] = "/var/tmp/xattrtestXXXXXX";
|
|
_cleanup_close_ int fd = -1;
|
|
const char *x;
|
|
char v[3] = {};
|
|
int r;
|
|
|
|
assert_se(mkdtemp(t));
|
|
x = strjoina(t, "/test");
|
|
assert_se(touch(x) >= 0);
|
|
|
|
r = setxattr(x, "user.foo", "bar", 3, 0);
|
|
if (r < 0 && errno == EOPNOTSUPP) /* no xattrs supported on /var/tmp... */
|
|
goto cleanup;
|
|
assert_se(r >= 0);
|
|
|
|
fd = open(t, O_RDONLY|O_DIRECTORY|O_CLOEXEC|O_NOCTTY);
|
|
assert_se(fd >= 0);
|
|
|
|
assert_se(fgetxattrat_fake(fd, "test", "user.foo", v, 3, 0) >= 0);
|
|
assert_se(memcmp(v, "bar", 3) == 0);
|
|
|
|
safe_close(fd);
|
|
fd = open("/", O_RDONLY|O_DIRECTORY|O_CLOEXEC|O_NOCTTY);
|
|
assert_se(fd >= 0);
|
|
assert_se(fgetxattrat_fake(fd, "usr", "user.idontexist", v, 3, 0) == -ENODATA);
|
|
|
|
cleanup:
|
|
assert_se(unlink(x) >= 0);
|
|
assert_se(rmdir(t) >= 0);
|
|
}
|
|
|
|
static void test_runlevel_to_target(void) {
|
|
assert_se(streq_ptr(runlevel_to_target(NULL), NULL));
|
|
assert_se(streq_ptr(runlevel_to_target("unknown-runlevel"), NULL));
|
|
assert_se(streq_ptr(runlevel_to_target("3"), SPECIAL_MULTI_USER_TARGET));
|
|
}
|
|
|
|
int main(int argc, char *argv[]) {
|
|
log_parse_environment();
|
|
log_open();
|
|
|
|
test_align_power2();
|
|
test_max();
|
|
test_container_of();
|
|
test_div_round_up();
|
|
test_u64log2();
|
|
test_protect_errno();
|
|
test_config_parse_iec_uint64();
|
|
test_fstab_node_to_udev_node();
|
|
test_get_files_in_directory();
|
|
test_in_set();
|
|
test_log2i();
|
|
test_unlink_noerrno();
|
|
test_readlink_and_make_absolute();
|
|
test_glob_exists();
|
|
test_execute_directory();
|
|
test_parse_proc_cmdline();
|
|
test_raw_clone();
|
|
test_sparse_write();
|
|
test_fgetxattrat_fake();
|
|
test_runlevel_to_target();
|
|
|
|
return 0;
|
|
}
|