tmpdir: Use a good default directory on native Windows.
[gnulib.git] / tests / test-spawn-pipe-main.c
1 /* Test of create_pipe_bidi/wait_subprocess.
2    Copyright (C) 2009-2011 Free Software Foundation, Inc.
3
4    This program is free software; you can redistribute it and/or modify
5    it under the terms of the GNU General Public License as published by
6    the Free Software Foundation; either version 3, or (at your option)
7    any later version.
8
9    This program is distributed in the hope that it will be useful,
10    but WITHOUT ANY WARRANTY; without even the implied warranty of
11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12    GNU General Public License for more details.
13
14    You should have received a copy of the GNU General Public License
15    along with this program; if not, write to the Free Software Foundation,
16    Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.  */
17
18 #include <config.h>
19
20 #include "spawn-pipe.h"
21 #include "wait-process.h"
22
23 #include <stdbool.h>
24 #include <stdio.h>
25 #include <stdlib.h>
26 #include <string.h>
27 #include <unistd.h>
28
29 /* Depending on arguments, this test intentionally closes stderr or
30    starts life with stderr closed.  So, we arrange to have fd 10
31    (outside the range of interesting fd's during the test) set up to
32    duplicate the original stderr.  */
33
34 #define BACKUP_STDERR_FILENO 10
35 #define ASSERT_STREAM myerr
36 #include "macros.h"
37
38 static FILE *myerr;
39
40 /* Create a bi-directional pipe to a test child, and validate that the
41    child program returns the expected output.
42    PROG is the program to run in the child process.
43    STDERR_CLOSED is true if we have already closed fd 2.  */
44 static void
45 test_pipe (const char *prog, bool stderr_closed)
46 {
47   int fd[2];
48   char *argv[3];
49   pid_t pid;
50   char buffer[2] = { 'a', 't' };
51
52   /* Set up child.  */
53   argv[0] = (char *) prog;
54   argv[1] = (char *) (stderr_closed ? "1" : "0");
55   argv[2] = NULL;
56   pid = create_pipe_bidi (prog, prog, argv, false, true, true, fd);
57   ASSERT (0 <= pid);
58   ASSERT (STDERR_FILENO < fd[0]);
59   ASSERT (STDERR_FILENO < fd[1]);
60
61   /* Push child's input.  */
62   ASSERT (write (fd[1], buffer, 1) == 1);
63   ASSERT (close (fd[1]) == 0);
64
65   /* Get child's output.  */
66   ASSERT (read (fd[0], buffer, 2) == 1);
67
68   /* Wait for child.  */
69   ASSERT (wait_subprocess (pid, prog, true, false, true, true, NULL) == 0);
70   ASSERT (close (fd[0]) == 0);
71
72   /* Check the result.  */
73   ASSERT (buffer[0] == 'b');
74   ASSERT (buffer[1] == 't');
75 }
76
77 int
78 main (int argc, char *argv[])
79 {
80   int test;
81   int fd;
82
83   if (argc != 3)
84     {
85       fprintf (stderr, "%s: need 2 arguments\n", argv[0]);
86       return 2;
87     }
88   /* We might close fd 2 later, so save it in fd 10.  */
89   if (dup2 (STDERR_FILENO, BACKUP_STDERR_FILENO) != BACKUP_STDERR_FILENO
90       || (myerr = fdopen (BACKUP_STDERR_FILENO, "w")) == NULL)
91     return 2;
92
93   /* Selectively close various standard fds, to verify the child process is
94      not impacted by this.  */
95   test = atoi (argv[2]);
96   switch (test)
97     {
98     case 0:
99       break;
100     case 1:
101       close (0);
102       break;
103     case 2:
104       close (1);
105       break;
106     case 3:
107       close (0);
108       close (1);
109       break;
110     case 4:
111       close (2);
112       break;
113     case 5:
114       close (0);
115       close (2);
116       break;
117     case 6:
118       close (1);
119       close (2);
120       break;
121     case 7:
122       close (0);
123       close (1);
124       close (2);
125       break;
126     default:
127       ASSERT (false);
128     }
129
130   /* Plug any file descriptor leaks inherited from outside world before
131      starting, so that child has a clean slate (at least for the fds that we
132      might be manipulating).  */
133   for (fd = 3; fd < 7; fd++)
134     close (fd);
135
136   test_pipe (argv[1], test >= 4);
137
138   return 0;
139 }