[thirdparty/systemd.git] / src / test / test-fd-util.c

/* SPDX-License-Identifier: LGPL-2.1+ */

#include <fcntl.h>
#include <unistd.h>

#include "alloc-util.h"
#include "fd-util.h"
#include "fileio.h"
#include "macro.h"
#include "memory-util.h"
#include "path-util.h"
#include "process-util.h"
#include "random-util.h"
#include "rlimit-util.h"
#include "serialize.h"
#include "string-util.h"
#include "tests.h"
#include "tmpfile-util.h"

static void test_close_many(void) {
        int fds[3];
        char name0[] = "/tmp/test-close-many.XXXXXX";
        char name1[] = "/tmp/test-close-many.XXXXXX";
        char name2[] = "/tmp/test-close-many.XXXXXX";

        fds[0] = mkostemp_safe(name0);
        fds[1] = mkostemp_safe(name1);
        fds[2] = mkostemp_safe(name2);

        close_many(fds, 2);

        assert_se(fcntl(fds[0], F_GETFD) == -1);
        assert_se(fcntl(fds[1], F_GETFD) == -1);
        assert_se(fcntl(fds[2], F_GETFD) >= 0);

        safe_close(fds[2]);

        unlink(name0);
        unlink(name1);
        unlink(name2);
}

static void test_close_nointr(void) {
        char name[] = "/tmp/test-test-close_nointr.XXXXXX";
        int fd;

        fd = mkostemp_safe(name);
        assert_se(fd >= 0);
        assert_se(close_nointr(fd) >= 0);
        assert_se(close_nointr(fd) < 0);

        unlink(name);
}

static void test_same_fd(void) {
        _cleanup_close_pair_ int p[2] = { -1, -1 };
        _cleanup_close_ int a = -1, b = -1, c = -1;

        assert_se(pipe2(p, O_CLOEXEC) >= 0);
        assert_se((a = fcntl(p[0], F_DUPFD, 3)) >= 0);
        assert_se((b = open("/dev/null", O_RDONLY|O_CLOEXEC)) >= 0);
        assert_se((c = fcntl(a, F_DUPFD, 3)) >= 0);

        assert_se(same_fd(p[0], p[0]) > 0);
        assert_se(same_fd(p[1], p[1]) > 0);
        assert_se(same_fd(a, a) > 0);
        assert_se(same_fd(b, b) > 0);

        assert_se(same_fd(a, p[0]) > 0);
        assert_se(same_fd(p[0], a) > 0);
        assert_se(same_fd(c, p[0]) > 0);
        assert_se(same_fd(p[0], c) > 0);
        assert_se(same_fd(a, c) > 0);
        assert_se(same_fd(c, a) > 0);

        assert_se(same_fd(p[0], p[1]) == 0);
        assert_se(same_fd(p[1], p[0]) == 0);
        assert_se(same_fd(p[0], b) == 0);
        assert_se(same_fd(b, p[0]) == 0);
        assert_se(same_fd(p[1], a) == 0);
        assert_se(same_fd(a, p[1]) == 0);
        assert_se(same_fd(p[1], b) == 0);
        assert_se(same_fd(b, p[1]) == 0);

        assert_se(same_fd(a, b) == 0);
        assert_se(same_fd(b, a) == 0);
}

static void test_open_serialization_fd(void) {
        _cleanup_close_ int fd = -1;

        fd = open_serialization_fd("test");
        assert_se(fd >= 0);

        assert_se(write(fd, "test\n", 5) == 5);
}

static void test_acquire_data_fd_one(unsigned flags) {
        char wbuffer[196*1024 - 7];
        char rbuffer[sizeof(wbuffer)];
        int fd;

        fd = acquire_data_fd("foo", 3, flags);
        assert_se(fd >= 0);

        zero(rbuffer);
        assert_se(read(fd, rbuffer, sizeof(rbuffer)) == 3);
        assert_se(streq(rbuffer, "foo"));

        fd = safe_close(fd);

        fd = acquire_data_fd("", 0, flags);
        assert_se(fd >= 0);

        zero(rbuffer);
        assert_se(read(fd, rbuffer, sizeof(rbuffer)) == 0);
        assert_se(streq(rbuffer, ""));

        fd = safe_close(fd);

        random_bytes(wbuffer, sizeof(wbuffer));

        fd = acquire_data_fd(wbuffer, sizeof(wbuffer), flags);
        assert_se(fd >= 0);

        zero(rbuffer);
        assert_se(read(fd, rbuffer, sizeof(rbuffer)) == sizeof(rbuffer));
        assert_se(memcmp(rbuffer, wbuffer, sizeof(rbuffer)) == 0);

        fd = safe_close(fd);
}

static void test_acquire_data_fd(void) {

        test_acquire_data_fd_one(0);
        test_acquire_data_fd_one(ACQUIRE_NO_DEV_NULL);
        test_acquire_data_fd_one(ACQUIRE_NO_MEMFD);
        test_acquire_data_fd_one(ACQUIRE_NO_DEV_NULL|ACQUIRE_NO_MEMFD);
        test_acquire_data_fd_one(ACQUIRE_NO_PIPE);
        test_acquire_data_fd_one(ACQUIRE_NO_DEV_NULL|ACQUIRE_NO_PIPE);
        test_acquire_data_fd_one(ACQUIRE_NO_MEMFD|ACQUIRE_NO_PIPE);
        test_acquire_data_fd_one(ACQUIRE_NO_DEV_NULL|ACQUIRE_NO_MEMFD|ACQUIRE_NO_PIPE);
        test_acquire_data_fd_one(ACQUIRE_NO_DEV_NULL|ACQUIRE_NO_MEMFD|ACQUIRE_NO_PIPE|ACQUIRE_NO_TMPFILE);
}

static void test_fd_move_above_stdio(void) {
        int original_stdin, new_fd;

        original_stdin = fcntl(0, F_DUPFD, 3);
        assert_se(original_stdin >= 3);
        assert_se(close_nointr(0) != EBADF);

        new_fd = open("/dev/null", O_RDONLY);
        assert_se(new_fd == 0);

        new_fd = fd_move_above_stdio(new_fd);
        assert_se(new_fd >= 3);

        assert_se(dup(original_stdin) == 0);
        assert_se(close_nointr(original_stdin) != EBADF);
        assert_se(close_nointr(new_fd) != EBADF);
}

static void test_rearrange_stdio(void) {
        pid_t pid;
        int r;

        r = safe_fork("rearrange", FORK_WAIT|FORK_LOG, &pid);
        assert_se(r >= 0);

        if (r == 0) {
                _cleanup_free_ char *path = NULL;
                char buffer[10];

                /* Child */

                safe_close(STDERR_FILENO); /* Let's close an fd < 2, to make it more interesting */

                assert_se(rearrange_stdio(-1, -1, -1) >= 0);

                assert_se(fd_get_path(STDIN_FILENO, &path) >= 0);
                assert_se(path_equal(path, "/dev/null"));
                path = mfree(path);

                assert_se(fd_get_path(STDOUT_FILENO, &path) >= 0);
                assert_se(path_equal(path, "/dev/null"));
                path = mfree(path);

                assert_se(fd_get_path(STDOUT_FILENO, &path) >= 0);
                assert_se(path_equal(path, "/dev/null"));
                path = mfree(path);

                safe_close(STDIN_FILENO);
                safe_close(STDOUT_FILENO);
                safe_close(STDERR_FILENO);

                {
                        int pair[2];
                        assert_se(pipe(pair) >= 0);
                        assert_se(pair[0] == 0);
                        assert_se(pair[1] == 1);
                        assert_se(fd_move_above_stdio(0) == 3);
                }
                assert_se(open("/dev/full", O_WRONLY|O_CLOEXEC) == 0);
                assert_se(acquire_data_fd("foobar", 6, 0) == 2);

                assert_se(rearrange_stdio(2, 0, 1) >= 0);

                assert_se(write(1, "x", 1) < 0 && errno == ENOSPC);
                assert_se(write(2, "z", 1) == 1);
                assert_se(read(3, buffer, sizeof(buffer)) == 1);
                assert_se(buffer[0] == 'z');
                assert_se(read(0, buffer, sizeof(buffer)) == 6);
                assert_se(memcmp(buffer, "foobar", 6) == 0);

                assert_se(rearrange_stdio(-1, 1, 2) >= 0);
                assert_se(write(1, "a", 1) < 0 && errno == ENOSPC);
                assert_se(write(2, "y", 1) == 1);
                assert_se(read(3, buffer, sizeof(buffer)) == 1);
                assert_se(buffer[0] == 'y');

                assert_se(fd_get_path(0, &path) >= 0);
                assert_se(path_equal(path, "/dev/null"));
                path = mfree(path);

                _exit(EXIT_SUCCESS);
        }
}

static void assert_equal_fd(int fd1, int fd2) {

        for (;;) {
                uint8_t a[4096], b[4096];
                ssize_t x, y;

                x = read(fd1, a, sizeof(a));
                assert_se(x >= 0);

                y = read(fd2, b, sizeof(b));
                assert_se(y >= 0);

                assert_se(x == y);

                if (x == 0)
                        break;

                assert_se(memcmp(a, b, x) == 0);
        }
}

static void test_fd_duplicate_data_fd(void) {
        _cleanup_close_ int fd1 = -1, fd2 = -1;
        _cleanup_(close_pairp) int sfd[2] = { -1, -1 };
        _cleanup_(sigkill_waitp) pid_t pid = -1;
        uint64_t i, j;
        int r;

        fd1 = open("/etc/fstab", O_RDONLY|O_CLOEXEC);
        if (fd1 >= 0) {

                fd2 = fd_duplicate_data_fd(fd1);
                assert_se(fd2 >= 0);

                assert_se(lseek(fd1, 0, SEEK_SET) == 0);
                assert_equal_fd(fd1, fd2);
        }

        fd1 = safe_close(fd1);
        fd2 = safe_close(fd2);

        fd1 = acquire_data_fd("hallo", 6,  0);
        assert_se(fd1 >= 0);

        fd2 = fd_duplicate_data_fd(fd1);
        assert_se(fd2 >= 0);

        safe_close(fd1);
        fd1 = acquire_data_fd("hallo", 6,  0);
        assert_se(fd1 >= 0);

        assert_equal_fd(fd1, fd2);

        fd1 = safe_close(fd1);
        fd2 = safe_close(fd2);

        assert_se(socketpair(AF_UNIX, SOCK_STREAM|SOCK_CLOEXEC, 0, sfd) >= 0);

        r = safe_fork("(sd-pipe)", FORK_RESET_SIGNALS|FORK_DEATHSIG|FORK_LOG, &pid);
        assert_se(r >= 0);

        if (r == 0) {
                /* child */

                sfd[0] = safe_close(sfd[0]);

                for (i = 0; i < 1536*1024 / sizeof(uint64_t); i++)
                        assert_se(write(sfd[1], &i, sizeof(i)) == sizeof(i));

                sfd[1] = safe_close(sfd[1]);

                _exit(EXIT_SUCCESS);
        }

        sfd[1] = safe_close(sfd[1]);

        fd2 = fd_duplicate_data_fd(sfd[0]);
        assert_se(fd2 >= 0);

        for (i = 0; i < 1536*1024 / sizeof(uint64_t); i++) {
                assert_se(read(fd2, &j, sizeof(j)) == sizeof(j));
                assert_se(i == j);
        }

        assert_se(read(fd2, &j, sizeof(j)) == 0);
}

static void test_read_nr_open(void) {
        log_info("nr-open: %i", read_nr_open());
}

static size_t validate_fds(
                bool opened,
                const int *fds,
                size_t n_fds) {

        size_t c = 0;

        /* Validates that fds in the specified array are one of the following three:
         *
         *  1. < 0 (test is skipped) or
         *  2. opened (if 'opened' param is true) or
         *  3. closed (if 'opened' param is false)
         */

        for (size_t i = 0; i < n_fds; i++) {
                if (fds[i] < 0)
                        continue;

                if (opened)
                        assert_se(fcntl(fds[i], F_GETFD) >= 0);
                else
                        assert_se(fcntl(fds[i], F_GETFD) < 0 && errno == EBADF);

                c++;
        }

        return c; /* Return number of fds >= 0 in the array */
}

static void test_close_all_fds(void) {
        _cleanup_free_ int *fds = NULL, *keep = NULL;
        struct rlimit rl;
        size_t n_fds, n_keep;

        log_info("/* %s */", __func__);

        rlimit_nofile_bump(-1);

        assert_se(getrlimit(RLIMIT_NOFILE, &rl) >= 0);
        assert_se(rl.rlim_cur > 10);

        /* Try to use 5000 fds, but when we can't bump the rlimit to make that happen use the whole limit minus 10 */
        n_fds = MIN((rl.rlim_cur & ~1U) - 10U, 5000U);
        assert_se((n_fds & 1U) == 0U); /* make sure even number of fds */

        /* Allocate the determined number of fds, always two at a time */
        assert_se(fds = new(int, n_fds));
        for (size_t i = 0; i < n_fds; i += 2)
                assert_se(pipe2(fds + i, O_CLOEXEC) >= 0);

        /* Validate this worked */
        assert_se(validate_fds(true, fds, n_fds) == n_fds);

        /* Randomized number of fds to keep, but at most every second */
        n_keep = (random_u64() % (n_fds / 2));

        /* Now randomly select a number of fds from the array above to keep */
        assert_se(keep = new(int, n_keep));
        for (size_t k = 0; k < n_keep; k++) {
                for (;;) {
                        size_t p;

                        p = random_u64() % n_fds;
                        if (fds[p] >= 0) {
                                keep[k] = TAKE_FD(fds[p]);
                                break;
                        }
                }
        }

        /* Check that all fds from both arrays are still open, and test how many in each are >= 0 */
        assert_se(validate_fds(true, fds, n_fds) == n_fds - n_keep);
        assert_se(validate_fds(true, keep, n_keep) == n_keep);

        /* Close logging fd first, so that we don't confuse it by closing its fd */
        log_close();
        log_set_open_when_needed(true);

        /* Close all but the ones to keep */
        assert_se(close_all_fds(keep, n_keep) >= 0);

        assert_se(validate_fds(false, fds, n_fds) == n_fds - n_keep);
        assert_se(validate_fds(true, keep, n_keep) == n_keep);

        /* Close everything else too! */
        assert_se(close_all_fds(NULL, 0) >= 0);

        assert_se(validate_fds(false, fds, n_fds) == n_fds - n_keep);
        assert_se(validate_fds(false, keep, n_keep) == n_keep);

        log_set_open_when_needed(false);
        log_open();
}

int main(int argc, char *argv[]) {

        test_setup_logging(LOG_DEBUG);

        test_close_many();
        test_close_nointr();
        test_same_fd();
        test_open_serialization_fd();
        test_acquire_data_fd();
        test_fd_move_above_stdio();
        test_rearrange_stdio();
        test_fd_duplicate_data_fd();
        test_read_nr_open();
        test_close_all_fds();

        return 0;
}
Commit	Line	Data
53e1b683	1	/* SPDX-License-Identifier: LGPL-2.1+ */
0999c8ad RC	2
	3	#include <fcntl.h>
	4	#include <unistd.h>
	5
	6	#include "alloc-util.h"
	7	#include "fd-util.h"
	8	#include "fileio.h"
	9	#include "macro.h"
0a970718	10	#include "memory-util.h"
aa11e28b LP	11	#include "path-util.h"
aa11e28b LP	12	#include "process-util.h"
a548e14d	13	#include "random-util.h"
59c4bbfb	14	#include "rlimit-util.h"
0a2152f0	15	#include "serialize.h"
a548e14d	16	#include "string-util.h"
6d7c4033	17	#include "tests.h"
e4de7287	18	#include "tmpfile-util.h"
0999c8ad RC	19
	20	static void test_close_many(void) {
	21	int fds[3];
	22	char name0[] = "/tmp/test-close-many.XXXXXX";
	23	char name1[] = "/tmp/test-close-many.XXXXXX";
	24	char name2[] = "/tmp/test-close-many.XXXXXX";
	25
646853bd TM	26	fds[0] = mkostemp_safe(name0);
	27	fds[1] = mkostemp_safe(name1);
	28	fds[2] = mkostemp_safe(name2);
0999c8ad RC	29
	30	close_many(fds, 2);
	31
	32	assert_se(fcntl(fds[0], F_GETFD) == -1);
	33	assert_se(fcntl(fds[1], F_GETFD) == -1);
	34	assert_se(fcntl(fds[2], F_GETFD) >= 0);
	35
	36	safe_close(fds[2]);
	37
	38	unlink(name0);
	39	unlink(name1);
	40	unlink(name2);
	41	}
	42
	43	static void test_close_nointr(void) {
	44	char name[] = "/tmp/test-test-close_nointr.XXXXXX";
	45	int fd;
	46
646853bd	47	fd = mkostemp_safe(name);
0999c8ad RC	48	assert_se(fd >= 0);
	49	assert_se(close_nointr(fd) >= 0);
	50	assert_se(close_nointr(fd) < 0);
	51
	52	unlink(name);
	53	}
	54
	55	static void test_same_fd(void) {
	56	_cleanup_close_pair_ int p[2] = { -1, -1 };
	57	_cleanup_close_ int a = -1, b = -1, c = -1;
	58
	59	assert_se(pipe2(p, O_CLOEXEC) >= 0);
43dc7aa2	60	assert_se((a = fcntl(p[0], F_DUPFD, 3)) >= 0);
0999c8ad	61	assert_se((b = open("/dev/null", O_RDONLY\|O_CLOEXEC)) >= 0);
43dc7aa2	62	assert_se((c = fcntl(a, F_DUPFD, 3)) >= 0);
0999c8ad RC	63
	64	assert_se(same_fd(p[0], p[0]) > 0);
	65	assert_se(same_fd(p[1], p[1]) > 0);
	66	assert_se(same_fd(a, a) > 0);
	67	assert_se(same_fd(b, b) > 0);
	68
	69	assert_se(same_fd(a, p[0]) > 0);
	70	assert_se(same_fd(p[0], a) > 0);
	71	assert_se(same_fd(c, p[0]) > 0);
	72	assert_se(same_fd(p[0], c) > 0);
	73	assert_se(same_fd(a, c) > 0);
	74	assert_se(same_fd(c, a) > 0);
	75
	76	assert_se(same_fd(p[0], p[1]) == 0);
	77	assert_se(same_fd(p[1], p[0]) == 0);
	78	assert_se(same_fd(p[0], b) == 0);
	79	assert_se(same_fd(b, p[0]) == 0);
	80	assert_se(same_fd(p[1], a) == 0);
	81	assert_se(same_fd(a, p[1]) == 0);
	82	assert_se(same_fd(p[1], b) == 0);
	83	assert_se(same_fd(b, p[1]) == 0);
	84
	85	assert_se(same_fd(a, b) == 0);
	86	assert_se(same_fd(b, a) == 0);
	87	}
	88
504afd7c ZJS	89	static void test_open_serialization_fd(void) {
	90	_cleanup_close_ int fd = -1;
	91
	92	fd = open_serialization_fd("test");
	93	assert_se(fd >= 0);
	94
ca9b2b4d	95	assert_se(write(fd, "test\n", 5) == 5);
504afd7c ZJS	96	}
504afd7c ZJS	97
a548e14d LP	98	static void test_acquire_data_fd_one(unsigned flags) {
	99	char wbuffer[196*1024 - 7];
	100	char rbuffer[sizeof(wbuffer)];
	101	int fd;
	102
	103	fd = acquire_data_fd("foo", 3, flags);
	104	assert_se(fd >= 0);
	105
	106	zero(rbuffer);
	107	assert_se(read(fd, rbuffer, sizeof(rbuffer)) == 3);
	108	assert_se(streq(rbuffer, "foo"));
	109
	110	fd = safe_close(fd);
	111
	112	fd = acquire_data_fd("", 0, flags);
	113	assert_se(fd >= 0);
	114
	115	zero(rbuffer);
	116	assert_se(read(fd, rbuffer, sizeof(rbuffer)) == 0);
	117	assert_se(streq(rbuffer, ""));
	118
	119	fd = safe_close(fd);
	120
	121	random_bytes(wbuffer, sizeof(wbuffer));
	122
	123	fd = acquire_data_fd(wbuffer, sizeof(wbuffer), flags);
	124	assert_se(fd >= 0);
	125
	126	zero(rbuffer);
	127	assert_se(read(fd, rbuffer, sizeof(rbuffer)) == sizeof(rbuffer));
	128	assert_se(memcmp(rbuffer, wbuffer, sizeof(rbuffer)) == 0);
	129
	130	fd = safe_close(fd);
	131	}
	132
	133	static void test_acquire_data_fd(void) {
	134
	135	test_acquire_data_fd_one(0);
	136	test_acquire_data_fd_one(ACQUIRE_NO_DEV_NULL);
	137	test_acquire_data_fd_one(ACQUIRE_NO_MEMFD);
	138	test_acquire_data_fd_one(ACQUIRE_NO_DEV_NULL\|ACQUIRE_NO_MEMFD);
	139	test_acquire_data_fd_one(ACQUIRE_NO_PIPE);
	140	test_acquire_data_fd_one(ACQUIRE_NO_DEV_NULL\|ACQUIRE_NO_PIPE);
	141	test_acquire_data_fd_one(ACQUIRE_NO_MEMFD\|ACQUIRE_NO_PIPE);
	142	test_acquire_data_fd_one(ACQUIRE_NO_DEV_NULL\|ACQUIRE_NO_MEMFD\|ACQUIRE_NO_PIPE);
	143	test_acquire_data_fd_one(ACQUIRE_NO_DEV_NULL\|ACQUIRE_NO_MEMFD\|ACQUIRE_NO_PIPE\|ACQUIRE_NO_TMPFILE);
	144	}
	145
7fe2903c LP	146	static void test_fd_move_above_stdio(void) {
	147	int original_stdin, new_fd;
	148
	149	original_stdin = fcntl(0, F_DUPFD, 3);
	150	assert_se(original_stdin >= 3);
	151	assert_se(close_nointr(0) != EBADF);
	152
	153	new_fd = open("/dev/null", O_RDONLY);
	154	assert_se(new_fd == 0);
	155
	156	new_fd = fd_move_above_stdio(new_fd);
	157	assert_se(new_fd >= 3);
	158
	159	assert_se(dup(original_stdin) == 0);
	160	assert_se(close_nointr(original_stdin) != EBADF);
	161	assert_se(close_nointr(new_fd) != EBADF);
	162	}
	163
aa11e28b LP	164	static void test_rearrange_stdio(void) {
	165	pid_t pid;
	166	int r;
	167
	168	r = safe_fork("rearrange", FORK_WAIT\|FORK_LOG, &pid);
	169	assert_se(r >= 0);
	170
	171	if (r == 0) {
	172	_cleanup_free_ char *path = NULL;
	173	char buffer[10];
	174
	175	/* Child */
	176
	177	safe_close(STDERR_FILENO); /* Let's close an fd < 2, to make it more interesting */
	178
	179	assert_se(rearrange_stdio(-1, -1, -1) >= 0);
	180
	181	assert_se(fd_get_path(STDIN_FILENO, &path) >= 0);
	182	assert_se(path_equal(path, "/dev/null"));
	183	path = mfree(path);
	184
	185	assert_se(fd_get_path(STDOUT_FILENO, &path) >= 0);
	186	assert_se(path_equal(path, "/dev/null"));
	187	path = mfree(path);
	188
	189	assert_se(fd_get_path(STDOUT_FILENO, &path) >= 0);
	190	assert_se(path_equal(path, "/dev/null"));
	191	path = mfree(path);
	192
	193	safe_close(STDIN_FILENO);
	194	safe_close(STDOUT_FILENO);
	195	safe_close(STDERR_FILENO);
	196
	197	{
	198	int pair[2];
	199	assert_se(pipe(pair) >= 0);
	200	assert_se(pair[0] == 0);
	201	assert_se(pair[1] == 1);
	202	assert_se(fd_move_above_stdio(0) == 3);
	203	}
	204	assert_se(open("/dev/full", O_WRONLY\|O_CLOEXEC) == 0);
	205	assert_se(acquire_data_fd("foobar", 6, 0) == 2);
	206
	207	assert_se(rearrange_stdio(2, 0, 1) >= 0);
	208
	209	assert_se(write(1, "x", 1) < 0 && errno == ENOSPC);
	210	assert_se(write(2, "z", 1) == 1);
	211	assert_se(read(3, buffer, sizeof(buffer)) == 1);
	212	assert_se(buffer[0] == 'z');
	213	assert_se(read(0, buffer, sizeof(buffer)) == 6);
	214	assert_se(memcmp(buffer, "foobar", 6) == 0);
	215
	216	assert_se(rearrange_stdio(-1, 1, 2) >= 0);
	217	assert_se(write(1, "a", 1) < 0 && errno == ENOSPC);
	218	assert_se(write(2, "y", 1) == 1);
	219	assert_se(read(3, buffer, sizeof(buffer)) == 1);
	220	assert_se(buffer[0] == 'y');
	221
	222	assert_se(fd_get_path(0, &path) >= 0);
	223	assert_se(path_equal(path, "/dev/null"));
	224	path = mfree(path);
	225
	226	_exit(EXIT_SUCCESS);
	227	}
228	}
229
4960ce43 LP	230	static void assert_equal_fd(int fd1, int fd2) {
	231
	232	for (;;) {
	233	uint8_t a[4096], b[4096];
	234	ssize_t x, y;
	235
	236	x = read(fd1, a, sizeof(a));
060d9c61	237	assert_se(x >= 0);
4960ce43 LP	238
4960ce43 LP	239	y = read(fd2, b, sizeof(b));
060d9c61	240	assert_se(y >= 0);
4960ce43	241
060d9c61	242	assert_se(x == y);
4960ce43 LP	243
	244	if (x == 0)
	245	break;
	246
060d9c61	247	assert_se(memcmp(a, b, x) == 0);
4960ce43 LP	248	}
	249	}
	250
	251	static void test_fd_duplicate_data_fd(void) {
	252	_cleanup_close_ int fd1 = -1, fd2 = -1;
	253	_cleanup_(close_pairp) int sfd[2] = { -1, -1 };
	254	_cleanup_(sigkill_waitp) pid_t pid = -1;
	255	uint64_t i, j;
	256	int r;
	257
	258	fd1 = open("/etc/fstab", O_RDONLY\|O_CLOEXEC);
	259	if (fd1 >= 0) {
	260
	261	fd2 = fd_duplicate_data_fd(fd1);
	262	assert_se(fd2 >= 0);
	263
	264	assert_se(lseek(fd1, 0, SEEK_SET) == 0);
	265	assert_equal_fd(fd1, fd2);
	266	}
	267
	268	fd1 = safe_close(fd1);
	269	fd2 = safe_close(fd2);
	270
	271	fd1 = acquire_data_fd("hallo", 6, 0);
	272	assert_se(fd1 >= 0);
	273
	274	fd2 = fd_duplicate_data_fd(fd1);
	275	assert_se(fd2 >= 0);
	276
	277	safe_close(fd1);
	278	fd1 = acquire_data_fd("hallo", 6, 0);
	279	assert_se(fd1 >= 0);
	280
	281	assert_equal_fd(fd1, fd2);
	282
	283	fd1 = safe_close(fd1);
	284	fd2 = safe_close(fd2);
	285
	286	assert_se(socketpair(AF_UNIX, SOCK_STREAM\|SOCK_CLOEXEC, 0, sfd) >= 0);
	287
	288	r = safe_fork("(sd-pipe)", FORK_RESET_SIGNALS\|FORK_DEATHSIG\|FORK_LOG, &pid);
	289	assert_se(r >= 0);
	290
	291	if (r == 0) {
	292	/* child */
	293
	294	sfd[0] = safe_close(sfd[0]);
	295
	296	for (i = 0; i < 1536*1024 / sizeof(uint64_t); i++)
	297	assert_se(write(sfd[1], &i, sizeof(i)) == sizeof(i));
	298
	299	sfd[1] = safe_close(sfd[1]);
	300
	301	_exit(EXIT_SUCCESS);
	302	}
	303
	304	sfd[1] = safe_close(sfd[1]);
	305
	306	fd2 = fd_duplicate_data_fd(sfd[0]);
	307	assert_se(fd2 >= 0);
	308
	309	for (i = 0; i < 1536*1024 / sizeof(uint64_t); i++) {
	310	assert_se(read(fd2, &j, sizeof(j)) == sizeof(j));
	311	assert_se(i == j);
312	}
313
314	assert_se(read(fd2, &j, sizeof(j)) == 0);
315	}
316
9264cc39 LP	317	static void test_read_nr_open(void) {
	318	log_info("nr-open: %i", read_nr_open());
	319	}
	320
59c4bbfb LP	321	static size_t validate_fds(
	322	bool opened,
	323	const int *fds,
	324	size_t n_fds) {
	325
	326	size_t c = 0;
	327
	328	/* Validates that fds in the specified array are one of the following three:
	329	*
	330	* 1. < 0 (test is skipped) or
	331	* 2. opened (if 'opened' param is true) or
	332	* 3. closed (if 'opened' param is false)
	333	*/
	334
	335	for (size_t i = 0; i < n_fds; i++) {
	336	if (fds[i] < 0)
	337	continue;
	338
	339	if (opened)
	340	assert_se(fcntl(fds[i], F_GETFD) >= 0);
	341	else
	342	assert_se(fcntl(fds[i], F_GETFD) < 0 && errno == EBADF);
	343
	344	c++;
	345	}
	346
	347	return c; /* Return number of fds >= 0 in the array */
	348	}
	349
	350	static void test_close_all_fds(void) {
	351	_cleanup_free_ int fds = NULL, keep = NULL;
	352	struct rlimit rl;
	353	size_t n_fds, n_keep;
	354
	355	log_info("/* %s */", __func__);
	356
	357	rlimit_nofile_bump(-1);
	358
	359	assert_se(getrlimit(RLIMIT_NOFILE, &rl) >= 0);
	360	assert_se(rl.rlim_cur > 10);
	361
	362	/* Try to use 5000 fds, but when we can't bump the rlimit to make that happen use the whole limit minus 10 */
	363	n_fds = MIN((rl.rlim_cur & ~1U) - 10U, 5000U);
	364	assert_se((n_fds & 1U) == 0U); /* make sure even number of fds */
	365
	366	/* Allocate the determined number of fds, always two at a time */
	367	assert_se(fds = new(int, n_fds));
	368	for (size_t i = 0; i < n_fds; i += 2)
	369	assert_se(pipe2(fds + i, O_CLOEXEC) >= 0);
	370
	371	/* Validate this worked */
	372	assert_se(validate_fds(true, fds, n_fds) == n_fds);
	373
	374	/* Randomized number of fds to keep, but at most every second */
	375	n_keep = (random_u64() % (n_fds / 2));
	376
	377	/* Now randomly select a number of fds from the array above to keep */
	378	assert_se(keep = new(int, n_keep));
	379	for (size_t k = 0; k < n_keep; k++) {
	380	for (;;) {
	381	size_t p;
	382
	383	p = random_u64() % n_fds;
	384	if (fds[p] >= 0) {
385	keep[k] = TAKE_FD(fds[p]);
386	break;
387	}
388	}
389	}
390
391	/* Check that all fds from both arrays are still open, and test how many in each are >= 0 */
392	assert_se(validate_fds(true, fds, n_fds) == n_fds - n_keep);
393	assert_se(validate_fds(true, keep, n_keep) == n_keep);
394
395	/* Close logging fd first, so that we don't confuse it by closing its fd */
396	log_close();
397	log_set_open_when_needed(true);
398
399	/* Close all but the ones to keep */
400	assert_se(close_all_fds(keep, n_keep) >= 0);
401
402	assert_se(validate_fds(false, fds, n_fds) == n_fds - n_keep);
403	assert_se(validate_fds(true, keep, n_keep) == n_keep);
404
405	/* Close everything else too! */
406	assert_se(close_all_fds(NULL, 0) >= 0);
407
408	assert_se(validate_fds(false, fds, n_fds) == n_fds - n_keep);
409	assert_se(validate_fds(false, keep, n_keep) == n_keep);
410
411	log_set_open_when_needed(false);
412	log_open();
413	}
414
0999c8ad	415	int main(int argc, char *argv[]) {
9264cc39	416
6d7c4033	417	test_setup_logging(LOG_DEBUG);
9264cc39	418
0999c8ad RC	419	test_close_many();
	420	test_close_nointr();
	421	test_same_fd();
504afd7c	422	test_open_serialization_fd();
a548e14d	423	test_acquire_data_fd();
7fe2903c	424	test_fd_move_above_stdio();
aa11e28b	425	test_rearrange_stdio();
4960ce43	426	test_fd_duplicate_data_fd();
9264cc39	427	test_read_nr_open();
59c4bbfb	428	test_close_all_fds();
0999c8ad RC	429
	430	return 0;
	431	}