error handling
[oweals/gnunet.git] / src / util / test_os_start_process.c
1 /*
2      This file is part of GNUnet.
3      Copyright (C) 2009 GNUnet e.V.
4
5      GNUnet is free software: you can redistribute it and/or modify it
6      under the terms of the GNU Affero General Public License as published
7      by the Free Software Foundation, either version 3 of the License,
8      or (at your option) any later version.
9
10      GNUnet is distributed in the hope that it will be useful, but
11      WITHOUT ANY WARRANTY; without even the implied warranty of
12      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13      Affero General Public License for more details.
14
15      You should have received a copy of the GNU Affero General Public License
16      along with this program.  If not, see <http://www.gnu.org/licenses/>.
17
18      SPDX-License-Identifier: AGPL3.0-or-later
19  */
20 /**
21  * @file util/test_os_start_process.c
22  * @brief testcase for os start process code
23  *
24  * This testcase simply calls the os start process code
25  * giving a file descriptor to write stdout to.  If the
26  * correct data "HELLO" is read then all is well.
27  */
28 #include "platform.h"
29 #include "gnunet_util_lib.h"
30 #include "disk.h"
31
32
33 static const char *test_phrase = "HELLO WORLD";
34
35 static int ok;
36
37 static struct GNUNET_OS_Process *proc;
38
39 /**
40  * Pipe to write to started processes stdin (on write end)
41  */
42 static struct GNUNET_DISK_PipeHandle *hello_pipe_stdin;
43
44 /**
45  * Pipe to read from started processes stdout (on read end)
46  */
47 static struct GNUNET_DISK_PipeHandle *hello_pipe_stdout;
48
49 static struct GNUNET_SCHEDULER_Task *die_task;
50
51 struct read_context
52 {
53   char buf[16];
54   int buf_offset;
55   const struct GNUNET_DISK_FileHandle *stdout_read_handle;
56 };
57
58
59 static struct read_context rc;
60
61
62 static void
63 end_task (void *cls)
64 {
65   if (0 != GNUNET_OS_process_kill (proc, GNUNET_TERM_SIG))
66   {
67     GNUNET_log_strerror (GNUNET_ERROR_TYPE_WARNING, "kill");
68   }
69   GNUNET_assert (GNUNET_OK == GNUNET_OS_process_wait (proc));
70   GNUNET_OS_process_destroy (proc);
71   proc = NULL;
72   GNUNET_DISK_pipe_close (hello_pipe_stdout);
73   GNUNET_DISK_pipe_close (hello_pipe_stdin);
74 }
75
76
77 static void
78 read_call (void *cls)
79 {
80   int bytes;
81
82   bytes = GNUNET_DISK_file_read (rc.stdout_read_handle,
83                                  &rc.buf[rc.buf_offset],
84                                  sizeof(rc.buf) - rc.buf_offset);
85   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
86               "bytes is %d\n",
87               bytes);
88
89   if (bytes < 1)
90   {
91     GNUNET_break (0);
92     ok = 1;
93     GNUNET_SCHEDULER_cancel (die_task);
94     (void) GNUNET_SCHEDULER_add_now (&end_task, NULL);
95     return;
96   }
97
98   ok = strncmp (rc.buf, test_phrase, strlen (test_phrase));
99   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
100               "read %s\n",
101               &rc.buf[rc.buf_offset]);
102   rc.buf_offset += bytes;
103
104   if (0 == ok)
105   {
106     GNUNET_SCHEDULER_cancel (die_task);
107     (void) GNUNET_SCHEDULER_add_now (&end_task, NULL);
108     return;
109   }
110
111   GNUNET_SCHEDULER_add_read_file (GNUNET_TIME_UNIT_FOREVER_REL,
112                                   rc.stdout_read_handle,
113                                   &read_call,
114                                   NULL);
115 }
116
117
118 static void
119 run_task (void *cls)
120 {
121   char *fn;
122   const struct GNUNET_DISK_FileHandle *stdout_read_handle;
123   const struct GNUNET_DISK_FileHandle *wh;
124
125   GNUNET_asprintf (&fn, "cat");
126
127   hello_pipe_stdin = GNUNET_DISK_pipe (GNUNET_YES, GNUNET_YES, GNUNET_YES,
128                                        GNUNET_NO);
129   hello_pipe_stdout = GNUNET_DISK_pipe (GNUNET_YES, GNUNET_YES, GNUNET_NO,
130                                         GNUNET_YES);
131
132   if ((hello_pipe_stdout == NULL) || (hello_pipe_stdin == NULL))
133   {
134     GNUNET_break (0);
135     ok = 1;
136     GNUNET_free (fn);
137     return;
138   }
139
140   proc =
141     GNUNET_OS_start_process (GNUNET_NO, GNUNET_OS_INHERIT_STD_ERR,
142                              hello_pipe_stdin, hello_pipe_stdout, NULL,
143                              fn,
144                              "test_gnunet_echo_hello", "-", NULL);
145   GNUNET_free (fn);
146
147   /* Close the write end of the read pipe */
148   GNUNET_DISK_pipe_close_end (hello_pipe_stdout, GNUNET_DISK_PIPE_END_WRITE);
149   /* Close the read end of the write pipe */
150   GNUNET_DISK_pipe_close_end (hello_pipe_stdin, GNUNET_DISK_PIPE_END_READ);
151
152   wh = GNUNET_DISK_pipe_handle (hello_pipe_stdin, GNUNET_DISK_PIPE_END_WRITE);
153
154   /* Write the test_phrase to the cat process */
155   if (GNUNET_DISK_file_write (wh, test_phrase, strlen (test_phrase) + 1) !=
156       strlen (test_phrase) + 1)
157   {
158     GNUNET_break (0);
159     ok = 1;
160     return;
161   }
162
163   /* Close the write end to end the cycle! */
164   GNUNET_DISK_pipe_close_end (hello_pipe_stdin, GNUNET_DISK_PIPE_END_WRITE);
165
166   stdout_read_handle =
167     GNUNET_DISK_pipe_handle (hello_pipe_stdout, GNUNET_DISK_PIPE_END_READ);
168
169   die_task =
170     GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_relative_multiply
171                                     (GNUNET_TIME_UNIT_MINUTES, 1),
172                                   &end_task,
173                                   NULL);
174
175   memset (&rc, 0, sizeof(rc));
176   rc.stdout_read_handle = stdout_read_handle;
177   GNUNET_SCHEDULER_add_read_file (GNUNET_TIME_UNIT_FOREVER_REL,
178                                   stdout_read_handle,
179                                   &read_call,
180                                   NULL);
181 }
182
183
184 /**
185  * Main method, starts scheduler with task1,
186  * checks that "ok" is correct at the end.
187  */
188 static int
189 check_run ()
190 {
191   ok = 1;
192   GNUNET_SCHEDULER_run (&run_task, &ok);
193   return ok;
194 }
195
196
197 /**
198  * Test killing via pipe.
199  */
200 static int
201 check_kill ()
202 {
203   char *fn;
204
205   hello_pipe_stdin = GNUNET_DISK_pipe (GNUNET_YES, GNUNET_YES, GNUNET_YES,
206                                        GNUNET_NO);
207   hello_pipe_stdout = GNUNET_DISK_pipe (GNUNET_YES, GNUNET_YES, GNUNET_NO,
208                                         GNUNET_YES);
209   if ((hello_pipe_stdout == NULL) || (hello_pipe_stdin == NULL))
210   {
211     return 1;
212   }
213   fn = GNUNET_OS_get_libexec_binary_path ("gnunet-service-resolver");
214   proc =
215     GNUNET_OS_start_process (GNUNET_YES, GNUNET_OS_INHERIT_STD_ERR,
216                              hello_pipe_stdin,
217                              hello_pipe_stdout,
218                              NULL,
219                              fn,
220                              "gnunet-service-resolver", "-",
221                              NULL);
222   if (NULL == proc)
223   {
224     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
225                 "Failed to launch gnunet-service-resolver. Is your system setup correct?\n");
226     return 77;
227   }
228   sleep (1);  /* give process time to start, so we actually use the pipe-kill mechanism! */
229   GNUNET_free (fn);
230   if (0 != GNUNET_OS_process_kill (proc, GNUNET_TERM_SIG))
231     GNUNET_log_strerror (GNUNET_ERROR_TYPE_WARNING, "kill");
232   GNUNET_assert (GNUNET_OK == GNUNET_OS_process_wait (proc));
233   GNUNET_OS_process_destroy (proc);
234   proc = NULL;
235   GNUNET_DISK_pipe_close (hello_pipe_stdout);
236   GNUNET_DISK_pipe_close (hello_pipe_stdin);
237   return 0;
238 }
239
240
241 /**
242  * Test killing via pipe.
243  */
244 static int
245 check_instant_kill ()
246 {
247   char *fn;
248
249   hello_pipe_stdin = GNUNET_DISK_pipe (GNUNET_YES, GNUNET_YES, GNUNET_YES,
250                                        GNUNET_NO);
251   hello_pipe_stdout = GNUNET_DISK_pipe (GNUNET_YES, GNUNET_YES, GNUNET_NO,
252                                         GNUNET_YES);
253   if ((hello_pipe_stdout == NULL) || (hello_pipe_stdin == NULL))
254   {
255     return 1;
256   }
257   fn = GNUNET_OS_get_libexec_binary_path ("gnunet-service-resolver");
258   proc =
259     GNUNET_OS_start_process (GNUNET_YES, GNUNET_OS_INHERIT_STD_ERR,
260                              hello_pipe_stdin, hello_pipe_stdout, NULL,
261                              fn,
262                              "gnunet-service-resolver", "-", NULL);
263   if (NULL == proc)
264   {
265     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
266                 "Failed to launch gnunet-service-resolver. Is your system setup correct?\n");
267     return 77;
268   }
269   if (0 != GNUNET_OS_process_kill (proc,
270                                    GNUNET_TERM_SIG))
271   {
272     GNUNET_log_strerror (GNUNET_ERROR_TYPE_WARNING, "kill");
273   }
274   GNUNET_free (fn);
275   GNUNET_assert (GNUNET_OK == GNUNET_OS_process_wait (proc));
276   GNUNET_OS_process_destroy (proc);
277   proc = NULL;
278   GNUNET_DISK_pipe_close (hello_pipe_stdout);
279   GNUNET_DISK_pipe_close (hello_pipe_stdin);
280   return 0;
281 }
282
283
284 int
285 main (int argc, char *argv[])
286 {
287   int ret;
288
289   GNUNET_log_setup ("test-os-start-process",
290                     "WARNING",
291                     NULL);
292   ret = 0;
293   ret |= check_run ();
294   ret |= check_kill ();
295   ret |= check_instant_kill ();
296   return ret;
297 }
298
299
300 /* end of test_os_start_process.c */