1 /*
2  * Copyright (c) 2015-2016 Dmitry V. Levin <ldv@altlinux.org>
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  * 3. The name of the author may not be used to endorse or promote products
14  *    derived from this software without specific prior written permission.
15  *
16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
17  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
18  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
20  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
21  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
22  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
23  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
24  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
25  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26  */
27 
28 #include "tests.h"
29 #include <assert.h>
30 #include <fcntl.h>
31 #include <stdio.h>
32 #include <string.h>
33 #include <unistd.h>
34 #include <sys/wait.h>
35 
36 static inline int
37 logit_(const char *const str)
38 {
39 	return !chdir(str);
40 }
41 
42 #define prefix "vfork-f."
43 #define logit(arg) logit_(prefix arg)
44 
45 int main(int ac, char **av)
46 {
47 	if (ac < 1)
48 		return 1;
49 	if (ac > 1) {
50 		if (read(0, &ac, sizeof(int)))
51 			return 2;
52 		return logit("exec");
53 	}
54 
55 	logit("start");
56 
57 	int child_wait_fds[2];
58 	(void) close(0);
59 	if (pipe(child_wait_fds))
60 		perror_msg_and_fail("pipe");
61 	if (fcntl(child_wait_fds[1], F_SETFD, FD_CLOEXEC))
62 		perror_msg_and_fail("fcntl");
63 
64 	int parent_wait_fds[2];
65 	if (pipe(parent_wait_fds))
66 		perror_msg_and_fail("pipe");
67 	if (fcntl(parent_wait_fds[0], F_SETFD, FD_CLOEXEC))
68 		perror_msg_and_fail("fcntl");
69 	if (fcntl(parent_wait_fds[1], F_SETFD, FD_CLOEXEC))
70 		perror_msg_and_fail("fcntl");
71 
72 	char *const args[] = { av[0], (char *) "", NULL };
73 	pid_t pid = vfork();
74 
75 	if (pid < 0)
76 		perror_msg_and_fail("vfork");
77 
78 	if (!pid) {
79 		if (logit("child") || execve(args[0], args, args + 1))
80 			_exit(2);
81 	}
82 
83 	close(0);
84 	close(parent_wait_fds[1]);
85 
86 	if (read(parent_wait_fds[0], &parent_wait_fds[1], sizeof(int)))
87 		perror_msg_and_fail("read");
88 	logit("parent");
89 	close(child_wait_fds[1]);
90 
91 	int status;
92 	assert(wait(&status) == pid);
93 	assert(status == 0);
94 
95 	pid_t ppid = getpid();
96 	logit("finish");
97 
98 	printf("%-5d chdir(\"%sstart\") = -1 ENOENT (%m)\n"
99 	       "%-5d chdir(\"%schild\") = -1 ENOENT (%m)\n"
100 	       "%-5d chdir(\"%sparent\") = -1 ENOENT (%m)\n"
101 	       "%-5d chdir(\"%sexec\") = -1 ENOENT (%m)\n"
102 	       "%-5d chdir(\"%sfinish\") = -1 ENOENT (%m)\n",
103 	       ppid, prefix,
104 	       pid, prefix,
105 	       ppid, prefix,
106 	       pid, prefix,
107 	       ppid, prefix);
108 	return 0;
109 }
110