2 Copyright (C) 2000-2015 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
4 Contributed by Ulrich Drepper <drepper@cygnus.com>, 2000.
6 The GNU C Library is free software; you can redistribute it and/or
7 modify it under the terms of the GNU Lesser General Public
8 License as published by the Free Software Foundation; either
9 version 2.1 of the License, or (at your option) any later version.
11 The GNU C Library is distributed in the hope that it will be useful,
12 but 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
17 License along with the GNU C Library; if not, see
18 <http://www.gnu.org/licenses/>. */
28 #include <sys/param.h>
31 /* Nonzero if the program gets called via `exec'. */
35 #define CMDLINE_OPTIONS \
36 { "restart", no_argument, &restart, 1 },
38 /* Prototype for our test function. */
39 extern void do_prepare (int argc
, char *argv
[]);
40 extern int do_test (int argc
, char *argv
[]);
42 /* We have a preparation function. */
43 #define PREPARE do_prepare
45 #include "../test-skeleton.c"
48 /* Name of the temporary files. */
53 /* The contents of our files. */
54 static const char fd1string
[] = "This file should get closed";
55 static const char fd2string
[] = "This file should stay opened";
56 static const char fd3string
[] = "This file will be opened";
59 /* We have a preparation function. */
61 do_prepare (int argc
, char *argv
[])
65 name_len
= strlen (test_dir
);
66 name1
= (char *) malloc (name_len
+ sizeof ("/spawnXXXXXX"));
67 mempcpy (mempcpy (name1
, test_dir
, name_len
),
68 "/spawnXXXXXX", sizeof ("/spawnXXXXXX"));
69 add_temp_file (name1
);
71 name2
= (char *) malloc (name_len
+ sizeof ("/spawnXXXXXX"));
72 mempcpy (mempcpy (name2
, test_dir
, name_len
),
73 "/spawnXXXXXX", sizeof ("/spawnXXXXXX"));
74 add_temp_file (name2
);
76 name3
= (char *) malloc (name_len
+ sizeof ("/spawnXXXXXX"));
77 mempcpy (mempcpy (name3
, test_dir
, name_len
),
78 "/spawnXXXXXX", sizeof ("/spawnXXXXXX"));
79 add_temp_file (name3
);
84 handle_restart (const char *fd1s
, const char *fd2s
, const char *fd3s
,
85 const char *fd4s
, const char *name
)
93 /* First get the descriptors. */
101 error (EXIT_FAILURE
, 0, "value of fd1 and fd2 is the same");
103 error (EXIT_FAILURE
, 0, "value of fd1 and fd3 is the same");
105 error (EXIT_FAILURE
, 0, "value of fd1 and fd4 is the same");
107 error (EXIT_FAILURE
, 0, "value of fd2 and fd3 is the same");
109 error (EXIT_FAILURE
, 0, "value of fd2 and fd4 is the same");
111 error (EXIT_FAILURE
, 0, "value of fd3 and fd4 is the same");
113 /* First the easy part: read from the file descriptor which is
114 supposed to be open. */
115 if (lseek (fd2
, 0, SEEK_CUR
) != strlen (fd2string
))
116 error (EXIT_FAILURE
, errno
, "file 2 not in right position");
117 /* The duped descriptor must have the same position. */
118 if (lseek (fd4
, 0, SEEK_CUR
) != strlen (fd2string
))
119 error (EXIT_FAILURE
, errno
, "file 4 not in right position");
120 if (lseek (fd2
, 0, SEEK_SET
) != 0)
121 error (EXIT_FAILURE
, 0, "cannot reset position in file 2");
122 if (lseek (fd4
, 0, SEEK_CUR
) != 0)
123 error (EXIT_FAILURE
, errno
, "file 4 not set back, too");
124 if (read (fd2
, buf
, sizeof buf
) != strlen (fd2string
))
125 error (EXIT_FAILURE
, 0, "cannot read file 2");
126 if (memcmp (fd2string
, buf
, strlen (fd2string
)) != 0)
127 error (EXIT_FAILURE
, 0, "file 2 does not match");
129 /* Now read from the third file. */
130 if (read (fd3
, buf
, sizeof buf
) != strlen (fd3string
))
131 error (EXIT_FAILURE
, 0, "cannot read file 3");
132 if (memcmp (fd3string
, buf
, strlen (fd3string
)) != 0)
133 error (EXIT_FAILURE
, 0, "file 3 does not match");
134 /* Try to write to the file. This should not be allowed. */
135 if (write (fd3
, "boo!", 4) != -1 || errno
!= EBADF
)
136 error (EXIT_FAILURE
, 0, "file 3 is writable");
138 /* Now try to read the first file. First make sure it is not opened. */
139 if (lseek (fd1
, 0, SEEK_CUR
) != (off_t
) -1 || errno
!= EBADF
)
140 error (EXIT_FAILURE
, 0, "file 1 (%d) is not closed", fd1
);
142 /* Now open the file and read it. */
143 fd1
= open (name
, O_RDONLY
);
145 error (EXIT_FAILURE
, errno
,
146 "cannot open first file \"%s\" for verification", name
);
148 if (read (fd1
, buf
, sizeof buf
) != strlen (fd1string
))
149 error (EXIT_FAILURE
, errno
, "cannot read file 1");
150 if (memcmp (fd1string
, buf
, strlen (fd1string
)) != 0)
151 error (EXIT_FAILURE
, 0, "file 1 does not match");
158 do_test (int argc
, char *argv
[])
166 posix_spawn_file_actions_t actions
;
176 - one or four parameters left if called initially
177 + path for ld.so optional
178 + "--library-path" optional
179 + the library path optional
180 + the application name
181 - five parameters left if called through re-execution
182 + file descriptor number which is supposed to be closed
183 + the open file descriptor
184 + the newly opened file descriptor
185 + thhe duped second descriptor
186 + the name of the closed descriptor
188 if (argc
!= (restart
? 6 : 2) && argc
!= (restart
? 6 : 5))
189 error (EXIT_FAILURE
, 0, "wrong number of arguments (%d)", argc
);
192 return handle_restart (argv
[1], argv
[2], argv
[3], argv
[4], argv
[5]);
194 /* Prepare the test. We are creating two files: one which file descriptor
195 will be marked with FD_CLOEXEC, another which is not. */
197 /* Open our test files. */
198 fd1
= mkstemp (name1
);
200 error (EXIT_FAILURE
, errno
, "cannot open test file `%s'", name1
);
201 fd2
= mkstemp (name2
);
203 error (EXIT_FAILURE
, errno
, "cannot open test file `%s'", name2
);
204 fd3
= mkstemp (name3
);
206 error (EXIT_FAILURE
, errno
, "cannot open test file `%s'", name3
);
208 /* Write something in the files. */
209 if (write (fd1
, fd1string
, strlen (fd1string
)) != strlen (fd1string
))
210 error (EXIT_FAILURE
, errno
, "cannot write to first file");
211 if (write (fd2
, fd2string
, strlen (fd2string
)) != strlen (fd2string
))
212 error (EXIT_FAILURE
, errno
, "cannot write to second file");
213 if (write (fd3
, fd3string
, strlen (fd3string
)) != strlen (fd3string
))
214 error (EXIT_FAILURE
, errno
, "cannot write to third file");
216 /* Close the third file. It'll be opened by `spawn'. */
219 /* Tell `spawn' what to do. */
220 if (posix_spawn_file_actions_init (&actions
) != 0)
221 error (EXIT_FAILURE
, errno
, "posix_spawn_file_actions_init");
223 if (posix_spawn_file_actions_addclose (&actions
, fd1
) != 0)
224 error (EXIT_FAILURE
, errno
, "posix_spawn_file_actions_addclose");
225 /* We want to open the third file. */
226 name3_copy
= strdup (name3
);
227 if (name3_copy
== NULL
)
228 error (EXIT_FAILURE
, errno
, "strdup");
229 if (posix_spawn_file_actions_addopen (&actions
, fd3
, name3_copy
,
230 O_RDONLY
, 0666) != 0)
231 error (EXIT_FAILURE
, errno
, "posix_spawn_file_actions_addopen");
232 /* Overwrite the name to check that a copy has been made. */
233 memset (name3_copy
, 'X', strlen (name3_copy
));
235 /* We dup the second descriptor. */
236 fd4
= MAX (2, MAX (fd1
, MAX (fd2
, fd3
))) + 1;
237 if (posix_spawn_file_actions_adddup2 (&actions
, fd2
, fd4
) != 0)
238 error (EXIT_FAILURE
, errno
, "posix_spawn_file_actions_adddup2");
240 /* Now spawn the process. */
241 snprintf (fd1name
, sizeof fd1name
, "%d", fd1
);
242 snprintf (fd2name
, sizeof fd2name
, "%d", fd2
);
243 snprintf (fd3name
, sizeof fd3name
, "%d", fd3
);
244 snprintf (fd4name
, sizeof fd4name
, "%d", fd4
);
246 for (i
= 0; i
< (argc
== (restart
? 6 : 5) ? 4 : 1); i
++)
247 spargv
[i
] = argv
[i
+ 1];
248 spargv
[i
++] = (char *) "--direct";
249 spargv
[i
++] = (char *) "--restart";
250 spargv
[i
++] = fd1name
;
251 spargv
[i
++] = fd2name
;
252 spargv
[i
++] = fd3name
;
253 spargv
[i
++] = fd4name
;
257 if (posix_spawn (&pid
, argv
[1], &actions
, NULL
, spargv
, environ
) != 0)
258 error (EXIT_FAILURE
, errno
, "posix_spawn");
261 if (posix_spawn_file_actions_destroy (&actions
) != 0)
262 error (EXIT_FAILURE
, errno
, "posix_spawn_file_actions_destroy");
265 /* Wait for the child. */
266 if (waitpid (pid
, &status
, 0) != pid
)
267 error (EXIT_FAILURE
, errno
, "wrong child");
269 if (WTERMSIG (status
) != 0)
270 error (EXIT_FAILURE
, 0, "Child terminated incorrectly");
271 status
= WEXITSTATUS (status
);
273 /* Remove the test files. */