12be8584ea00e36cf0f6b0b4ea17792776e88ec3
[oweals/gnunet.git] / src / transport / test_transport_api_monitor_validation.c
1 /*
2      This file is part of GNUnet.
3      (C) 2009, 2010 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 transport/test_transport_api_monitor_validation.c
22  * @brief base test case for transport validation monitorung
23  *
24  * This test case connects two peers and monitors validation monitoring
25  * callbacks
26  */
27 #include "platform.h"
28 #include "gnunet_transport_service.h"
29 #include "transport-testing.h"
30
31 /**
32  * How long until we give up on transmitting the message?
33  */
34 #define TIMEOUT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 120)
35
36 /**
37  * How long until we give up on transmitting the message?
38  */
39 #define TIMEOUT_TRANSMIT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 30)
40
41 #define TEST_MESSAGE_SIZE 2600
42
43 #define TEST_MESSAGE_TYPE 12345
44
45 static char *test_source;
46
47 static char *test_plugin;
48
49 static char *test_name;
50
51 static int ok;
52
53 static int s_started;
54
55 static int s_connected;
56
57 static int s_sending;
58
59 static struct GNUNET_SCHEDULER_Task * die_task;
60
61 static struct GNUNET_SCHEDULER_Task * send_task;
62
63 static struct PeerContext *p1;
64
65 static struct PeerContext *p2;
66
67 static GNUNET_TRANSPORT_TESTING_ConnectRequest cc;
68
69 static struct GNUNET_TRANSPORT_TransmitHandle *th;
70
71 static struct GNUNET_TRANSPORT_TESTING_handle *tth;
72
73 static char *cfg_file_p1;
74
75 static char *cfg_file_p2;
76
77 static struct GNUNET_TRANSPORT_ValidationMonitoringContext *vmc_p1;
78
79 static struct GNUNET_TRANSPORT_ValidationMonitoringContext *vmc_p2;
80
81 static int p1_c = GNUNET_NO;
82
83 static int p2_c = GNUNET_NO;
84
85 static int p1_c_notify = GNUNET_NO;
86
87 static int p2_c_notify = GNUNET_NO;
88
89 static void
90 end ()
91 {
92   GNUNET_log (GNUNET_ERROR_TYPE_INFO, "Stopping peers\n");
93
94
95   if (send_task != NULL)
96     GNUNET_SCHEDULER_cancel (send_task);
97
98   if (die_task != NULL)
99     GNUNET_SCHEDULER_cancel (die_task);
100
101   if (th != NULL)
102     GNUNET_TRANSPORT_notify_transmit_ready_cancel (th);
103   th = NULL;
104
105   GNUNET_TRANSPORT_TESTING_stop_peer (tth, p1);
106   p1 = NULL;
107   GNUNET_TRANSPORT_TESTING_stop_peer (tth, p2);
108   p2 = NULL;
109
110   if (NULL != vmc_p1)
111   {
112     GNUNET_TRANSPORT_monitor_validation_entries_cancel (vmc_p1);
113     vmc_p1 = NULL;
114   }
115   if (NULL != vmc_p2)
116   {
117     GNUNET_TRANSPORT_monitor_validation_entries_cancel (vmc_p2);
118     vmc_p2 = NULL;
119   }
120
121   ok = 0;
122 }
123
124 static void
125 end_badly (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
126 {
127   die_task = NULL;
128
129   GNUNET_log (GNUNET_ERROR_TYPE_INFO, "Fail! Stopping peers\n");
130
131
132   if (send_task != NULL)
133     GNUNET_SCHEDULER_cancel (send_task);
134
135   if (cc != NULL)
136   {
137     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, _("Fail! Could not connect peers\n"));
138     GNUNET_TRANSPORT_TESTING_connect_peers_cancel (tth, cc);
139     cc = NULL;
140   }
141
142   if (th != NULL)
143     GNUNET_TRANSPORT_notify_transmit_ready_cancel (th);
144   else
145     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, _("Peer were not ready to send data\n"));
146
147   if (s_started == GNUNET_NO)
148     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, _("Peers were not started \n"));
149   else
150     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, _("Peers were started \n"));
151
152   if (s_connected == GNUNET_NO)
153     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, _("Peer were not connected\n"));
154   else
155     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, _("Peer were connected\n"));
156
157   if (s_sending == GNUNET_NO)
158     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, _("Peer were not ready to send data\n"));
159   else
160     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, _("Peer were ready to send data\n"));
161
162   th = NULL;
163
164   if (NULL != vmc_p1)
165   {
166     GNUNET_TRANSPORT_monitor_validation_entries_cancel (vmc_p1);
167     vmc_p1 = NULL;
168   }
169   if (NULL != vmc_p2)
170   {
171     GNUNET_TRANSPORT_monitor_validation_entries_cancel (vmc_p2);
172     vmc_p2 = NULL;
173   }
174
175   if (p1 != NULL)
176     GNUNET_TRANSPORT_TESTING_stop_peer (tth, p1);
177   else
178     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, _("Peer 1 was not started\n"));
179   if (p2 != NULL)
180     GNUNET_TRANSPORT_TESTING_stop_peer (tth, p2);
181   else
182     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, _("Peer 2 was not started\n"));
183
184   ok = GNUNET_SYSERR;
185 }
186
187
188 static void
189 notify_receive (void *cls, const struct GNUNET_PeerIdentity *peer,
190                 const struct GNUNET_MessageHeader *message)
191 {
192   struct PeerContext *p = cls;
193   struct PeerContext *t = NULL;
194
195   if (0 == memcmp (peer, &p1->id, sizeof (struct GNUNET_PeerIdentity)))
196     t = p1;
197   if (0 == memcmp (peer, &p2->id, sizeof (struct GNUNET_PeerIdentity)))
198     t = p2;
199   GNUNET_assert (t != NULL);
200
201   char *ps = GNUNET_strdup (GNUNET_i2s (&p->id));
202
203   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
204               "Peer %u (`%4s') received message of type %d and size %u size from peer %u (`%4s')!\n",
205               p->no, ps, ntohs (message->type), ntohs (message->size), t->no,
206               GNUNET_i2s (&t->id));
207   GNUNET_free (ps);
208
209   if (0 >= p1_c)
210   {
211     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
212         "Peer 1 did not receive validation callbacks for peer 2\n");
213   }
214   if (0 >= p2_c)
215   {
216     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
217         "Peer 2 did not receive validation callbacks for peer 1\n");
218   }
219
220   if ((0 >= p1_c) || (0 >= p2_c))
221   {
222     if (NULL != die_task)
223       GNUNET_SCHEDULER_cancel (die_task);
224     die_task = GNUNET_SCHEDULER_add_now (&end_badly, NULL);
225   }
226   else
227     end ();
228 }
229
230
231 static size_t
232 notify_ready (void *cls, size_t size, void *buf)
233 {
234   struct PeerContext *p = cls;
235   struct GNUNET_MessageHeader *hdr;
236
237   th = NULL;
238
239   if (buf == NULL)
240   {
241     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
242                 "Timeout occurred while waiting for transmit_ready\n");
243     if (NULL != die_task)
244       GNUNET_SCHEDULER_cancel (die_task);
245     die_task = GNUNET_SCHEDULER_add_now (&end_badly, NULL);
246     ok = 42;
247     return 0;
248   }
249
250   GNUNET_assert (size >= TEST_MESSAGE_SIZE);
251   if (buf != NULL)
252   {
253     memset (buf, '\0', TEST_MESSAGE_SIZE);
254     hdr = buf;
255     hdr->size = htons (TEST_MESSAGE_SIZE);
256     hdr->type = htons (TEST_MESSAGE_TYPE);
257   }
258
259   char *ps = GNUNET_strdup (GNUNET_i2s (&p2->id));
260   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
261               "Peer %u (`%4s') sending message with type %u and size %u bytes to peer %u (`%4s')\n",
262               p2->no, ps, ntohs (hdr->type), ntohs (hdr->size), p->no,
263               GNUNET_i2s (&p->id));
264   GNUNET_free (ps);
265
266   return TEST_MESSAGE_SIZE;
267 }
268
269
270 static void
271 sendtask (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
272 {
273   send_task = NULL;
274
275   if ((tc->reason & GNUNET_SCHEDULER_REASON_SHUTDOWN) != 0)
276     return;
277   char *receiver_s = GNUNET_strdup (GNUNET_i2s (&p1->id));
278
279   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
280               "Sending message from peer %u (`%4s') -> peer %u (`%s') !\n",
281               p2->no, GNUNET_i2s (&p2->id), p1->no, receiver_s);
282   GNUNET_free (receiver_s);
283   s_sending = GNUNET_YES;
284   th = GNUNET_TRANSPORT_notify_transmit_ready (p2->th, &p1->id, TEST_MESSAGE_SIZE,
285                                                TIMEOUT_TRANSMIT, &notify_ready,
286                                                p1);
287 }
288
289
290 static void
291 done ()
292 {
293   if ((GNUNET_YES == p1_c) && (GNUNET_YES == p2_c) && p1_c_notify && p2_c_notify)
294   {
295     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Both peers state to be connected\n");
296     ok = 0;
297     end();
298   }
299 }
300
301
302 static void
303 notify_connect (void *cls, const struct GNUNET_PeerIdentity *peer)
304 {
305   static int c;
306
307   c++;
308   struct PeerContext *p = cls;
309   struct PeerContext *t = NULL;
310
311   if (0 == memcmp (peer, &p1->id, sizeof (struct GNUNET_PeerIdentity)))
312   {
313     p1_c_notify = GNUNET_YES;
314     t = p1;
315   }
316   if (0 == memcmp (peer, &p2->id, sizeof (struct GNUNET_PeerIdentity)))
317   {
318     p2_c_notify = GNUNET_YES;
319     t = p2;
320   }
321   GNUNET_assert (t != NULL);
322
323   char *ps = GNUNET_strdup (GNUNET_i2s (&p->id));
324
325   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
326               "Peer %u (`%4s'): peer %u (`%s') connected to me!\n", p->no, ps,
327               t->no, GNUNET_i2s (peer));
328   if (p1_c_notify && p2_c_notify)
329     GNUNET_SCHEDULER_add_now(&done, NULL);
330   GNUNET_free (ps);
331 }
332
333
334 static void
335 notify_disconnect (void *cls, const struct GNUNET_PeerIdentity *peer)
336 {
337   struct PeerContext *p = cls;
338   char *ps = GNUNET_strdup (GNUNET_i2s (&p->id));
339
340   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
341               "Peer %u (`%4s'): peer (`%s') disconnected from me!\n", p->no, ps,
342               GNUNET_i2s (peer));
343
344   GNUNET_free (ps);
345
346   if (th != NULL)
347     GNUNET_TRANSPORT_notify_transmit_ready_cancel (th);
348   th = NULL;
349 }
350
351
352 static void
353 testing_connect_cb (struct PeerContext *p1, struct PeerContext *p2, void *cls)
354 {
355   cc = NULL;
356   char *p1_c = GNUNET_strdup (GNUNET_i2s (&p1->id));
357
358   GNUNET_log (GNUNET_ERROR_TYPE_INFO, "Peers connected: %u (%s) <-> %u (%s)\n",
359               p1->no, p1_c, p2->no, GNUNET_i2s (&p2->id));
360   GNUNET_free (p1_c);
361
362   s_connected = GNUNET_YES;
363   send_task = GNUNET_SCHEDULER_add_now (&sendtask, NULL);
364 }
365
366
367 static void
368 start_cb (struct PeerContext *p, void *cls)
369 {
370   static int started;
371
372   started++;
373
374   GNUNET_log (GNUNET_ERROR_TYPE_INFO, "Peer %u (`%s') started\n", p->no,
375               GNUNET_i2s (&p->id));
376
377   if (started != 2)
378     return;
379   else
380     s_started = GNUNET_YES;
381   char *sender_c = GNUNET_strdup (GNUNET_i2s (&p1->id));
382
383   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
384               "Test tries to connect peer %u (`%s') -> peer %u (`%s')\n",
385               p1->no, sender_c, p2->no, GNUNET_i2s (&p2->id));
386   GNUNET_free (sender_c);
387
388   cc = GNUNET_TRANSPORT_TESTING_connect_peers (tth, p1, p2, &testing_connect_cb,
389                                                NULL);
390
391 }
392
393 static void
394 monitor1_cb (void *cls,
395              const struct GNUNET_HELLO_Address *address,
396              struct GNUNET_TIME_Absolute last_validation,
397              struct GNUNET_TIME_Absolute valid_until,
398              struct GNUNET_TIME_Absolute next_validation,
399              enum GNUNET_TRANSPORT_ValidationState state)
400 {
401   if ((NULL == address) || (NULL == p1))
402     return;
403
404   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
405               "Monitor 1: %s %s %s\n",
406               GNUNET_i2s (&address->peer), 
407               GNUNET_TRANSPORT_vs2s (state),
408               GNUNET_STRINGS_absolute_time_to_string(valid_until));
409   if (0 == memcmp (&address->peer,
410                    &p2->id,
411                    sizeof (p2->id)))
412     p1_c++;
413 }
414
415
416 static void
417 monitor2_cb (void *cls,
418              const struct GNUNET_HELLO_Address *address,
419              struct GNUNET_TIME_Absolute last_validation,
420              struct GNUNET_TIME_Absolute valid_until,
421              struct GNUNET_TIME_Absolute next_validation,
422              enum GNUNET_TRANSPORT_ValidationState state)
423 {
424   if ((NULL == address) || (NULL == p2))
425     return;
426
427   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
428               "Monitor 2: %s %s %s\n",
429               GNUNET_i2s (&address->peer),
430               GNUNET_TRANSPORT_vs2s(state), 
431               GNUNET_STRINGS_absolute_time_to_string(valid_until));
432   if (0 == memcmp (&address->peer,
433                    &p1->id,
434                    sizeof (p1->id)))
435     p2_c++;
436 }
437
438
439 static void
440 run (void *cls, char *const *args, const char *cfgfile,
441      const struct GNUNET_CONFIGURATION_Handle *cfg)
442 {
443   die_task = GNUNET_SCHEDULER_add_delayed (TIMEOUT, &end_badly, NULL);
444
445   s_started = GNUNET_NO;
446   s_connected = GNUNET_NO;
447   s_sending = GNUNET_NO;
448
449   p1 = GNUNET_TRANSPORT_TESTING_start_peer (tth, cfg_file_p1, 1,
450                                             &notify_receive, &notify_connect,
451                                             &notify_disconnect, &start_cb,
452                                             NULL);
453   vmc_p1 = GNUNET_TRANSPORT_monitor_validation_entries (p1->cfg, NULL, GNUNET_NO, GNUNET_TIME_UNIT_FOREVER_REL, &monitor1_cb, NULL);
454
455   p2 = GNUNET_TRANSPORT_TESTING_start_peer (tth, cfg_file_p2, 2,
456                                             &notify_receive, &notify_connect,
457                                             &notify_disconnect, &start_cb,
458                                             NULL);
459   vmc_p2 = GNUNET_TRANSPORT_monitor_validation_entries (p2->cfg, NULL, GNUNET_NO, GNUNET_TIME_UNIT_FOREVER_REL, &monitor2_cb, NULL);
460
461   if ((p1 == NULL) || (p2 == NULL))
462   {
463     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Fail! Could not start peers!\n");
464     if (die_task != NULL)
465       GNUNET_SCHEDULER_cancel (die_task);
466     die_task = GNUNET_SCHEDULER_add_now (&end_badly, NULL);
467     return;
468   }
469 }
470
471
472 static int
473 check ()
474 {
475   static char *const argv[] = { "test-transport-api",
476     "-c",
477     "test_transport_api_data.conf",
478     NULL
479   };
480   static struct GNUNET_GETOPT_CommandLineOption options[] = {
481     GNUNET_GETOPT_OPTION_END
482   };
483
484   send_task = NULL;
485
486   ok = 1;
487   GNUNET_PROGRAM_run ((sizeof (argv) / sizeof (char *)) - 1, argv, test_name,
488                       "nohelp", options, &run, &ok);
489
490   return ok;
491 }
492
493 int
494 main (int argc, char *argv[])
495 {
496   int ret;
497
498   ok = 1;
499
500   GNUNET_TRANSPORT_TESTING_get_test_name (argv[0], &test_name);
501   GNUNET_TRANSPORT_TESTING_get_test_source_name (__FILE__, &test_source);
502   GNUNET_TRANSPORT_TESTING_get_test_plugin_name (argv[0], test_source,
503                                                  &test_plugin);
504
505   GNUNET_log_setup (test_name,
506                     "WARNING",
507                     NULL);
508   tth = GNUNET_TRANSPORT_TESTING_init ();
509
510   GNUNET_TRANSPORT_TESTING_get_config_name (argv[0], &cfg_file_p1, 1);
511   GNUNET_TRANSPORT_TESTING_get_config_name (argv[0], &cfg_file_p2, 2);
512
513   ret = check ();
514
515   GNUNET_free (cfg_file_p1);
516   GNUNET_free (cfg_file_p2);
517
518   GNUNET_free (test_source);
519   GNUNET_free (test_plugin);
520   GNUNET_free (test_name);
521
522   GNUNET_TRANSPORT_TESTING_done (tth);
523
524   if (0 != ret)
525     return ret;
526   else
527     return ok;
528 }
529
530 /* end of test_transport_api_monitor_validation.c */