big scheduler refactoring, expect some issues
[oweals/gnunet.git] / src / hostlist / test_gnunet_daemon_hostlist.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 hostlist/test_gnunet_daemon_hostlist.c
22  * @brief test for gnunet_daemon_hostslist.c
23  * @author Christian Grothoff
24  */
25 #include "platform.h"
26 #include "gnunet_util_lib.h"
27 #include "gnunet_arm_service.h"
28 #include "gnunet_transport_service.h"
29
30 #define VERBOSE GNUNET_NO
31
32 #define START_ARM GNUNET_YES
33
34
35 /**
36  * How long until we give up on transmitting the message?
37  */
38 #define TIMEOUT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 150)
39
40 static int ok;
41
42 static GNUNET_SCHEDULER_TaskIdentifier timeout_task;
43     
44 struct PeerContext
45 {
46   struct GNUNET_CONFIGURATION_Handle *cfg;
47   struct GNUNET_TRANSPORT_Handle *th;
48   struct GNUNET_MessageHeader *hello;
49 #if START_ARM
50   struct GNUNET_OS_Process *arm_proc;
51 #endif
52 };
53
54 static struct PeerContext p1;
55
56 static struct PeerContext p2;
57
58
59 static void
60 clean_up (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
61 {
62   if (p1.th != NULL)
63     {
64       GNUNET_TRANSPORT_disconnect (p1.th);
65       p1.th = NULL;
66     }
67   if (p2.th != NULL)
68     {
69       GNUNET_TRANSPORT_disconnect (p2.th);
70       p2.th = NULL;
71     }
72   GNUNET_SCHEDULER_shutdown ();
73 }
74
75 /**
76  * Timeout, give up.
77  */
78 static void
79 timeout_error (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
80 {
81   timeout_task = GNUNET_SCHEDULER_NO_TASK;
82   GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
83               "Timeout trying to connect peers, test failed.\n");
84   clean_up (NULL, tc);
85 }
86
87
88 /**
89  * Function called to notify transport users that another
90  * peer connected to us.
91  *
92  * @param cls closure
93  * @param peer the peer that connected
94  * @param latency current latency of the connection
95  * @param distance in overlay hops, as given by transport plugin
96  */
97 static void
98 notify_connect (void *cls,
99                 const struct GNUNET_PeerIdentity * peer,
100                 struct GNUNET_TIME_Relative latency,
101                 unsigned int distance)
102 {
103   if (peer == NULL)
104     return;
105   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
106               "Peers connected, shutting down.\n");
107   ok = 0;
108   if (timeout_task != GNUNET_SCHEDULER_NO_TASK)
109     {
110       GNUNET_SCHEDULER_cancel (timeout_task);
111       timeout_task = GNUNET_SCHEDULER_NO_TASK;
112     }
113   GNUNET_SCHEDULER_add_now (&clean_up, NULL);
114 }
115
116
117 static void
118 process_hello (void *cls,
119                const struct GNUNET_MessageHeader *message)
120 {
121   struct PeerContext *p = cls;
122
123   GNUNET_TRANSPORT_get_hello_cancel (p->th, &process_hello, p);
124   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
125               "Received HELLO, starting hostlist service.\n");
126 }
127
128
129 static void
130 setup_peer (struct PeerContext *p, const char *cfgname)
131 {
132   p->cfg = GNUNET_CONFIGURATION_create ();
133 #if START_ARM
134   p->arm_proc = GNUNET_OS_start_process (NULL, NULL, "gnunet-service-arm",
135                                         "gnunet-service-arm",
136 #if VERBOSE
137                                         "-L", "DEBUG",
138 #endif
139                                         "-c", cfgname, NULL);
140 #endif
141   GNUNET_assert (GNUNET_OK == GNUNET_CONFIGURATION_load (p->cfg, cfgname));
142   p->th = GNUNET_TRANSPORT_connect (p->cfg, NULL, p, NULL,
143                                     &notify_connect, NULL);
144   GNUNET_assert (p->th != NULL);
145   GNUNET_TRANSPORT_get_hello (p->th, &process_hello, p);
146 }
147
148
149 static void
150 waitpid_task (void *cls, 
151               const struct GNUNET_SCHEDULER_TaskContext *tc)
152 {
153   struct PeerContext *p = cls;
154
155 #if START_ARM 
156   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
157               "Killing ARM process.\n");
158   if (0 != GNUNET_OS_process_kill (p->arm_proc, SIGTERM))
159     GNUNET_log_strerror (GNUNET_ERROR_TYPE_WARNING, "kill");
160   if (GNUNET_OS_process_wait(p->arm_proc) != GNUNET_OK)
161     GNUNET_log_strerror (GNUNET_ERROR_TYPE_WARNING, "waitpid");
162   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
163               "ARM process %u stopped\n", GNUNET_OS_process_get_pid (p->arm_proc));
164   GNUNET_OS_process_close (p->arm_proc);
165   p->arm_proc = NULL;
166 #endif
167   GNUNET_CONFIGURATION_destroy (p->cfg);
168 }
169
170
171 static void
172 stop_arm (struct PeerContext *p)
173 {
174   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
175               "Asking ARM to stop core service\n");
176   GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_SECONDS,
177                                 &waitpid_task, p);
178 }
179
180
181 /**
182  * Try again to connect to transport service.
183  */
184 static void
185 shutdown_task (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
186 {
187   stop_arm (&p1);
188   stop_arm (&p2);
189 }
190
191
192 static void
193 run (void *cls,
194      char *const *args,
195      const char *cfgfile, 
196      const struct GNUNET_CONFIGURATION_Handle *cfg)
197 {
198   GNUNET_assert (ok == 1);
199   ok++;
200   timeout_task = GNUNET_SCHEDULER_add_delayed (TIMEOUT,
201                                                &timeout_error,
202                                                NULL);
203   GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_FOREVER_REL,
204                                 &shutdown_task,
205                                 NULL);
206   setup_peer (&p1, "test_gnunet_daemon_hostlist_peer1.conf");
207   setup_peer (&p2, "test_gnunet_daemon_hostlist_peer2.conf");
208 }
209
210
211 static int
212 check ()
213 {
214   char *const argv[] = { "test-gnunet-daemon-hostlist",
215     "-c", "test_gnunet_daemon_hostlist_data.conf",
216 #if VERBOSE
217     "-L", "DEBUG",
218 #endif
219     NULL
220   };
221   struct GNUNET_GETOPT_CommandLineOption options[] = {
222     GNUNET_GETOPT_OPTION_END
223   };
224   ok = 1;
225   GNUNET_PROGRAM_run ((sizeof (argv) / sizeof (char *)) - 1,
226                       argv, "test-gnunet-daemon-hostlist",
227                       "nohelp", options, &run, &ok);
228   return ok;
229 }
230
231
232 int
233 main (int argc, char *argv[])
234 {
235   
236   int ret;
237
238   GNUNET_DISK_directory_remove ("/tmp/test-gnunetd-hostlist-peer-1");
239   GNUNET_DISK_directory_remove ("/tmp/test-gnunetd-hostlist-peer-2");
240   GNUNET_log_setup ("test-gnunet-daemon-hostlist",
241 #if VERBOSE
242                     "DEBUG",
243 #else
244                     "WARNING",
245 #endif
246                     NULL);
247   ret = check ();
248   GNUNET_DISK_directory_remove ("/tmp/test-gnunetd-hostlist-peer-1");
249   GNUNET_DISK_directory_remove ("/tmp/test-gnunetd-hostlist-peer-2");
250   return ret; 
251 }
252
253 /* end of test_gnunet_daemon_hostlist.c */