small API change: do no longer pass rarely needed GNUNET_SCHEDULER_TaskContext to...
[oweals/gnunet.git] / src / transport / test_transport_api_monitor_validation.c
1 /*
2      This file is part of GNUnet.
3      Copyright (C) 2009, 2010 GNUnet e.V.
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., 51 Franklin Street, Fifth Floor,
18      Boston, MA 02110-1301, 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 struct 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)
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,
233               size_t size,
234               void *buf)
235 {
236   struct PeerContext *p = cls;
237   struct GNUNET_MessageHeader *hdr;
238
239   th = NULL;
240   if (NULL == buf)
241   {
242     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
243                 "Timeout occurred while waiting for transmit_ready\n");
244     if (NULL != die_task)
245       GNUNET_SCHEDULER_cancel (die_task);
246     die_task = GNUNET_SCHEDULER_add_now (&end_badly,
247                                          NULL);
248     ok = 42;
249     return 0;
250   }
251
252   GNUNET_assert (size >= TEST_MESSAGE_SIZE);
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,
263                 ps,
264                 ntohs (hdr->type),
265                 ntohs (hdr->size),
266                 p->no,
267                 GNUNET_i2s (&p->id));
268     GNUNET_free (ps);
269   }
270
271   return TEST_MESSAGE_SIZE;
272 }
273
274
275 static void
276 sendtask (void *cls)
277 {
278   const struct GNUNET_SCHEDULER_TaskContext *tc;
279
280   send_task = NULL;
281   tc = GNUNET_SCHEDULER_get_task_context ();
282   if ((tc->reason & GNUNET_SCHEDULER_REASON_SHUTDOWN) != 0)
283     return;
284   char *receiver_s = GNUNET_strdup (GNUNET_i2s (&p1->id));
285
286   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
287               "Sending message from peer %u (`%4s') -> peer %u (`%s') !\n",
288               p2->no, GNUNET_i2s (&p2->id), p1->no, receiver_s);
289   GNUNET_free (receiver_s);
290   s_sending = GNUNET_YES;
291   th = GNUNET_TRANSPORT_notify_transmit_ready (p2->th, &p1->id, TEST_MESSAGE_SIZE,
292                                                TIMEOUT_TRANSMIT, &notify_ready,
293                                                p1);
294 }
295
296
297 static void
298 done ()
299 {
300   if ( (GNUNET_YES == p1_c) &&
301        (GNUNET_YES == p2_c) &&
302        p1_c_notify &&
303        p2_c_notify)
304   {
305     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
306                 "Both peers state to be connected\n");
307     ok = 0;
308     end();
309   }
310 }
311
312
313 static void
314 notify_connect (void *cls, const struct GNUNET_PeerIdentity *peer)
315 {
316   static int c;
317
318   c++;
319   struct PeerContext *p = cls;
320   struct PeerContext *t = NULL;
321
322   if (0 == memcmp (peer, &p1->id, sizeof (struct GNUNET_PeerIdentity)))
323   {
324     p1_c_notify = GNUNET_YES;
325     t = p1;
326   }
327   if (0 == memcmp (peer, &p2->id, sizeof (struct GNUNET_PeerIdentity)))
328   {
329     p2_c_notify = GNUNET_YES;
330     t = p2;
331   }
332   GNUNET_assert (t != NULL);
333
334   char *ps = GNUNET_strdup (GNUNET_i2s (&p->id));
335
336   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
337               "Peer %u (`%4s'): peer %u (`%s') connected to me!\n", p->no, ps,
338               t->no, GNUNET_i2s (peer));
339   if (p1_c_notify && p2_c_notify)
340     GNUNET_SCHEDULER_add_now(&done, NULL);
341   GNUNET_free (ps);
342 }
343
344
345 static void
346 notify_disconnect (void *cls, const struct GNUNET_PeerIdentity *peer)
347 {
348   struct PeerContext *p = cls;
349   char *ps = GNUNET_strdup (GNUNET_i2s (&p->id));
350
351   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
352               "Peer %u (`%4s'): peer (`%s') disconnected from me!\n", p->no, ps,
353               GNUNET_i2s (peer));
354
355   GNUNET_free (ps);
356
357   if (th != NULL)
358     GNUNET_TRANSPORT_notify_transmit_ready_cancel (th);
359   th = NULL;
360 }
361
362
363 static void
364 testing_connect_cb (struct PeerContext *p1, struct PeerContext *p2, void *cls)
365 {
366   cc = NULL;
367   char *p1_c = GNUNET_strdup (GNUNET_i2s (&p1->id));
368
369   GNUNET_log (GNUNET_ERROR_TYPE_INFO, "Peers connected: %u (%s) <-> %u (%s)\n",
370               p1->no, p1_c, p2->no, GNUNET_i2s (&p2->id));
371   GNUNET_free (p1_c);
372
373   s_connected = GNUNET_YES;
374   send_task = GNUNET_SCHEDULER_add_now (&sendtask, NULL);
375 }
376
377
378 static void
379 start_cb (struct PeerContext *p, void *cls)
380 {
381   static int started;
382
383   started++;
384
385   GNUNET_log (GNUNET_ERROR_TYPE_INFO, "Peer %u (`%s') started\n", p->no,
386               GNUNET_i2s (&p->id));
387
388   if (started != 2)
389     return;
390   else
391     s_started = GNUNET_YES;
392   char *sender_c = GNUNET_strdup (GNUNET_i2s (&p1->id));
393
394   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
395               "Test tries to connect peer %u (`%s') -> peer %u (`%s')\n",
396               p1->no, sender_c, p2->no, GNUNET_i2s (&p2->id));
397   GNUNET_free (sender_c);
398
399   cc = GNUNET_TRANSPORT_TESTING_connect_peers (tth, p1, p2, &testing_connect_cb,
400                                                NULL);
401
402 }
403
404 static void
405 monitor1_cb (void *cls,
406              const struct GNUNET_HELLO_Address *address,
407              struct GNUNET_TIME_Absolute last_validation,
408              struct GNUNET_TIME_Absolute valid_until,
409              struct GNUNET_TIME_Absolute next_validation,
410              enum GNUNET_TRANSPORT_ValidationState state)
411 {
412   if ((NULL == address) || (NULL == p1))
413     return;
414
415   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
416               "Monitor 1: %s %s %s\n",
417               GNUNET_i2s (&address->peer),
418               GNUNET_TRANSPORT_vs2s (state),
419               GNUNET_STRINGS_absolute_time_to_string(valid_until));
420   if (0 == memcmp (&address->peer,
421                    &p2->id,
422                    sizeof (p2->id)))
423     p1_c++;
424 }
425
426
427 static void
428 monitor2_cb (void *cls,
429              const struct GNUNET_HELLO_Address *address,
430              struct GNUNET_TIME_Absolute last_validation,
431              struct GNUNET_TIME_Absolute valid_until,
432              struct GNUNET_TIME_Absolute next_validation,
433              enum GNUNET_TRANSPORT_ValidationState state)
434 {
435   if ((NULL == address) || (NULL == p2))
436     return;
437
438   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
439               "Monitor 2: %s %s %s\n",
440               GNUNET_i2s (&address->peer),
441               GNUNET_TRANSPORT_vs2s(state),
442               GNUNET_STRINGS_absolute_time_to_string(valid_until));
443   if (0 == memcmp (&address->peer,
444                    &p1->id,
445                    sizeof (p1->id)))
446     p2_c++;
447 }
448
449
450 static void
451 run (void *cls, char *const *args, const char *cfgfile,
452      const struct GNUNET_CONFIGURATION_Handle *cfg)
453 {
454   die_task = GNUNET_SCHEDULER_add_delayed (TIMEOUT, &end_badly, NULL);
455
456   s_started = GNUNET_NO;
457   s_connected = GNUNET_NO;
458   s_sending = GNUNET_NO;
459
460   p1 = GNUNET_TRANSPORT_TESTING_start_peer (tth, cfg_file_p1, 1,
461                                             &notify_receive, &notify_connect,
462                                             &notify_disconnect, &start_cb,
463                                             NULL);
464   vmc_p1 = GNUNET_TRANSPORT_monitor_validation_entries (p1->cfg, NULL, GNUNET_NO, GNUNET_TIME_UNIT_FOREVER_REL, &monitor1_cb, NULL);
465
466   p2 = GNUNET_TRANSPORT_TESTING_start_peer (tth, cfg_file_p2, 2,
467                                             &notify_receive, &notify_connect,
468                                             &notify_disconnect, &start_cb,
469                                             NULL);
470   vmc_p2 = GNUNET_TRANSPORT_monitor_validation_entries (p2->cfg, NULL, GNUNET_NO, GNUNET_TIME_UNIT_FOREVER_REL, &monitor2_cb, NULL);
471
472   if ((p1 == NULL) || (p2 == NULL))
473   {
474     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Fail! Could not start peers!\n");
475     if (die_task != NULL)
476       GNUNET_SCHEDULER_cancel (die_task);
477     die_task = GNUNET_SCHEDULER_add_now (&end_badly, NULL);
478     return;
479   }
480 }
481
482
483 static int
484 check ()
485 {
486   static char *const argv[] = { "test-transport-api",
487     "-c",
488     "test_transport_api_data.conf",
489     NULL
490   };
491   static struct GNUNET_GETOPT_CommandLineOption options[] = {
492     GNUNET_GETOPT_OPTION_END
493   };
494
495   send_task = NULL;
496
497   ok = 1;
498   GNUNET_PROGRAM_run ((sizeof (argv) / sizeof (char *)) - 1, argv, test_name,
499                       "nohelp", options, &run, &ok);
500
501   return ok;
502 }
503
504 int
505 main (int argc, char *argv[])
506 {
507   int ret;
508
509   ok = 1;
510
511   GNUNET_TRANSPORT_TESTING_get_test_name (argv[0], &test_name);
512   GNUNET_TRANSPORT_TESTING_get_test_source_name (__FILE__, &test_source);
513   GNUNET_TRANSPORT_TESTING_get_test_plugin_name (argv[0], test_source,
514                                                  &test_plugin);
515
516   GNUNET_log_setup (test_name,
517                     "WARNING",
518                     NULL);
519   tth = GNUNET_TRANSPORT_TESTING_init ();
520
521   GNUNET_TRANSPORT_TESTING_get_config_name (argv[0], &cfg_file_p1, 1);
522   GNUNET_TRANSPORT_TESTING_get_config_name (argv[0], &cfg_file_p2, 2);
523
524   ret = check ();
525
526   GNUNET_free (cfg_file_p1);
527   GNUNET_free (cfg_file_p2);
528
529   GNUNET_free (test_source);
530   GNUNET_free (test_plugin);
531   GNUNET_free (test_name);
532
533   GNUNET_TRANSPORT_TESTING_done (tth);
534
535   if (0 != ret)
536     return ret;
537   else
538     return ok;
539 }
540
541 /* end of test_transport_api_monitor_validation.c */