indentation
[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                 const struct GNUNET_TRANSPORT_ATS_Information *ats,
101                 uint32_t ats_count)
102 {
103   if (peer == NULL)
104     return;
105   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Peers connected, shutting down.\n");
106   ok = 0;
107   if (timeout_task != GNUNET_SCHEDULER_NO_TASK)
108   {
109     GNUNET_SCHEDULER_cancel (timeout_task);
110     timeout_task = GNUNET_SCHEDULER_NO_TASK;
111   }
112   GNUNET_SCHEDULER_add_now (&clean_up, NULL);
113 }
114
115
116 static void
117 process_hello (void *cls, const struct GNUNET_MessageHeader *message)
118 {
119   struct PeerContext *p = cls;
120
121   GNUNET_TRANSPORT_get_hello_cancel (p->th, &process_hello, p);
122   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
123               "Received HELLO, starting hostlist service.\n");
124 }
125
126
127 static void
128 setup_peer (struct PeerContext *p, const char *cfgname)
129 {
130   p->cfg = GNUNET_CONFIGURATION_create ();
131 #if START_ARM
132   p->arm_proc = GNUNET_OS_start_process (NULL, NULL, "gnunet-service-arm",
133                                          "gnunet-service-arm",
134 #if VERBOSE
135                                          "-L", "DEBUG",
136 #endif
137                                          "-c", cfgname, NULL);
138 #endif
139   GNUNET_assert (GNUNET_OK == GNUNET_CONFIGURATION_load (p->cfg, cfgname));
140   p->th = GNUNET_TRANSPORT_connect (p->cfg, NULL, p, NULL,
141                                     &notify_connect, NULL);
142   GNUNET_assert (p->th != NULL);
143   GNUNET_TRANSPORT_get_hello (p->th, &process_hello, p);
144 }
145
146
147 static void
148 waitpid_task (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
149 {
150   struct PeerContext *p = cls;
151
152 #if START_ARM
153   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Killing ARM process.\n");
154   if (0 != GNUNET_OS_process_kill (p->arm_proc, SIGTERM))
155     GNUNET_log_strerror (GNUNET_ERROR_TYPE_WARNING, "kill");
156   if (GNUNET_OS_process_wait (p->arm_proc) != GNUNET_OK)
157     GNUNET_log_strerror (GNUNET_ERROR_TYPE_WARNING, "waitpid");
158   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
159               "ARM process %u stopped\n",
160               GNUNET_OS_process_get_pid (p->arm_proc));
161   GNUNET_OS_process_close (p->arm_proc);
162   p->arm_proc = NULL;
163 #endif
164   GNUNET_CONFIGURATION_destroy (p->cfg);
165 }
166
167
168 static void
169 stop_arm (struct PeerContext *p)
170 {
171   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Asking ARM to stop core service\n");
172   GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_SECONDS, &waitpid_task, p);
173 }
174
175
176 /**
177  * Try again to connect to transport service.
178  */
179 static void
180 shutdown_task (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
181 {
182   stop_arm (&p1);
183   stop_arm (&p2);
184 }
185
186
187 static void
188 run (void *cls,
189      char *const *args,
190      const char *cfgfile, const struct GNUNET_CONFIGURATION_Handle *cfg)
191 {
192   GNUNET_assert (ok == 1);
193   ok++;
194   timeout_task = GNUNET_SCHEDULER_add_delayed (TIMEOUT, &timeout_error, NULL);
195   GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_FOREVER_REL,
196                                 &shutdown_task, NULL);
197   setup_peer (&p1, "test_gnunet_daemon_hostlist_peer1.conf");
198   setup_peer (&p2, "test_gnunet_daemon_hostlist_peer2.conf");
199 }
200
201
202 static int
203 check ()
204 {
205   char *const argv[] = { "test-gnunet-daemon-hostlist",
206     "-c", "test_gnunet_daemon_hostlist_data.conf",
207 #if VERBOSE
208     "-L", "DEBUG",
209 #endif
210     NULL
211   };
212   struct GNUNET_GETOPT_CommandLineOption options[] = {
213     GNUNET_GETOPT_OPTION_END
214   };
215   ok = 1;
216   GNUNET_PROGRAM_run ((sizeof (argv) / sizeof (char *)) - 1,
217                       argv, "test-gnunet-daemon-hostlist",
218                       "nohelp", options, &run, &ok);
219   return ok;
220 }
221
222
223 int
224 main (int argc, char *argv[])
225 {
226
227   int ret;
228
229   GNUNET_DISK_directory_remove ("/tmp/test-gnunet-hostlist-peer-1");
230   GNUNET_DISK_directory_remove ("/tmp/test-gnunet-hostlist-peer-2");
231   GNUNET_DISK_directory_remove ("/tmp/test-gnunet-hostlist");
232   GNUNET_log_setup ("test-gnunet-daemon-hostlist",
233 #if VERBOSE
234                     "DEBUG",
235 #else
236                     "WARNING",
237 #endif
238                     NULL);
239   ret = check ();
240   GNUNET_DISK_directory_remove ("/tmp/test-gnunet-hostlist-peer-1");
241   GNUNET_DISK_directory_remove ("/tmp/test-gnunet-hostlist-peer-2");
242   GNUNET_DISK_directory_remove ("/tmp/test-gnunet-hostlist");
243   return ret;
244 }
245
246 /* end of test_gnunet_daemon_hostlist.c */