gpl3
[oweals/gnunet.git] / src / util / test_os_start_process.c
1 /*
2      This file is part of GNUnet.
3      (C) 2009 Christian Grothoff (and other contributing authors)
4
5      GNUnet is free software; you can redistribute it and/or modify
6      it under the terms of the GNU General Public License as published
7      by the Free Software Foundation; either version 3, or (at your
8      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      General Public License for more details.
14
15      You should have received a copy of the GNU General Public License
16      along with GNUnet; see the file COPYING.  If not, write to the
17      Free Software Foundation, Inc., 59 Temple Place - Suite 330,
18      Boston, MA 02111-1307, USA.
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_common.h"
30 #include "gnunet_getopt_lib.h"
31 #include "gnunet_os_lib.h"
32 #include "gnunet_program_lib.h"
33 #include "gnunet_scheduler_lib.h"
34 #include "disk.h"
35
36 #define VERBOSE GNUNET_NO
37
38 static char *test_phrase = "HELLO WORLD";
39 static int ok;
40
41 static pid_t pid;
42 /* Pipe to write to started processes stdin (on write end) */
43 static struct GNUNET_DISK_PipeHandle *hello_pipe_stdin;
44 /* Pipe to read from started processes stdout (on read end) */
45 static struct GNUNET_DISK_PipeHandle *hello_pipe_stdout;
46
47 static GNUNET_SCHEDULER_TaskIdentifier die_task;
48
49 static void
50 end_task (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
51 {
52
53   if (0 != PLIBC_KILL (pid, SIGTERM))
54     {
55       GNUNET_log_strerror (GNUNET_ERROR_TYPE_WARNING, "kill");
56     }
57   GNUNET_OS_process_wait (pid);
58   GNUNET_DISK_pipe_close(hello_pipe_stdout);
59   GNUNET_DISK_pipe_close(hello_pipe_stdin);
60 }
61
62 static void
63 read_call (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
64 {
65   struct GNUNET_DISK_FileHandle *stdout_read_handle = cls;
66   char buf[16];
67   memset(&buf, 0, sizeof(buf));
68   int bytes;
69   bytes = GNUNET_DISK_file_read(stdout_read_handle, &buf, sizeof(buf));
70
71 #if VERBOSE
72   fprintf(stderr, "bytes is %d\n", bytes);
73 #endif
74
75   if (bytes < 1)
76     {
77       GNUNET_break (0);
78       ok = 1;
79       GNUNET_SCHEDULER_cancel(tc->sched, die_task);
80       GNUNET_SCHEDULER_add_now(tc->sched, &end_task, NULL);
81       return;
82     }
83
84   ok = strncmp(&buf[0], test_phrase, strlen(test_phrase));
85 #if VERBOSE
86   fprintf(stderr, "read %s\n", &buf[0]);
87 #endif
88   if (ok == 0)
89     {
90       GNUNET_SCHEDULER_cancel(tc->sched, die_task);
91       GNUNET_SCHEDULER_add_now(tc->sched, &end_task, NULL);
92       return;
93     }
94
95   GNUNET_SCHEDULER_add_read_file (tc->sched,
96                                        GNUNET_TIME_UNIT_FOREVER_REL,
97                                        stdout_read_handle, &read_call, stdout_read_handle);
98
99 }
100
101
102 static void
103 task (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
104 {
105   char *fn;
106   const struct GNUNET_DISK_FileHandle *stdout_read_handle;
107   const struct GNUNET_DISK_FileHandle *wh;
108
109   GNUNET_asprintf(&fn, "cat");
110
111   hello_pipe_stdin = GNUNET_DISK_pipe(GNUNET_YES);
112   hello_pipe_stdout = GNUNET_DISK_pipe(GNUNET_YES);
113
114   if ((hello_pipe_stdout == NULL) || (hello_pipe_stdin == NULL))
115     {
116       GNUNET_break (0);
117       ok = 1;
118       GNUNET_free (fn);
119       return;
120     }
121
122   pid = GNUNET_OS_start_process (hello_pipe_stdin, hello_pipe_stdout, fn,
123                                  "test_gnunet_echo_hello", "-", NULL);
124   GNUNET_free (fn);
125
126   /* Close the write end of the read pipe */
127   GNUNET_DISK_pipe_close_end(hello_pipe_stdout, GNUNET_DISK_PIPE_END_WRITE);
128   /* Close the read end of the write pipe */
129   GNUNET_DISK_pipe_close_end(hello_pipe_stdin, GNUNET_DISK_PIPE_END_READ);
130
131   wh = GNUNET_DISK_pipe_handle (hello_pipe_stdin, GNUNET_DISK_PIPE_END_WRITE);
132
133   /* Write the test_phrase to the cat process */
134   if (GNUNET_DISK_file_write(wh, test_phrase, strlen(test_phrase) + 1) != strlen(test_phrase) + 1)
135     {
136       GNUNET_break (0);
137       ok = 1;
138       return;
139     }
140
141   /* Close the write end to end the cycle! */
142   GNUNET_DISK_pipe_close_end(hello_pipe_stdin, GNUNET_DISK_PIPE_END_WRITE);
143
144   stdout_read_handle = GNUNET_DISK_pipe_handle(hello_pipe_stdout, GNUNET_DISK_PIPE_END_READ);
145
146   die_task = GNUNET_SCHEDULER_add_delayed(tc->sched, GNUNET_TIME_relative_multiply(GNUNET_TIME_UNIT_MINUTES, 1), &end_task, NULL);
147
148   GNUNET_SCHEDULER_add_read_file (tc->sched,
149                                   GNUNET_TIME_UNIT_FOREVER_REL,
150                                   stdout_read_handle, &read_call, (void *)stdout_read_handle);
151
152 }
153
154 /**
155  * Main method, starts scheduler with task1,
156  * checks that "ok" is correct at the end.
157  */
158 static int
159 check ()
160 {
161   ok = 1;
162   GNUNET_SCHEDULER_run (&task, &ok);
163   return ok;
164 }
165
166
167 int
168 main (int argc, char *argv[])
169 {
170   int ret;
171
172   GNUNET_log_setup ("test-os-start-process",
173 #if VERBOSE
174                     "DEBUG",
175 #else
176                     "WARNING",
177 #endif
178                     NULL);
179   ret = check ();
180
181   return ret;
182 }