-allow caller ID to differ from zone used for resolution
[oweals/gnunet.git] / src / transport / test_transport_api_monitoring_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_monitoring_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 GNUNET_SCHEDULER_TaskIdentifier die_task;
60
61 static GNUNET_SCHEDULER_TaskIdentifier 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 != GNUNET_SCHEDULER_NO_TASK)
96     GNUNET_SCHEDULER_cancel (send_task);
97
98   if (die_task != GNUNET_SCHEDULER_NO_TASK)
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 = GNUNET_SCHEDULER_NO_TASK;
128
129   GNUNET_log (GNUNET_ERROR_TYPE_INFO, "Fail! Stopping peers\n");
130
131
132   if (send_task != GNUNET_SCHEDULER_NO_TASK)
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 (GNUNET_SCHEDULER_NO_TASK != 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 (GNUNET_SCHEDULER_NO_TASK != 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 = GNUNET_SCHEDULER_NO_TASK;
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_PeerIdentity *peer,
396     const struct GNUNET_HELLO_Address *address,
397     struct GNUNET_TIME_Absolute last_validation,
398     struct GNUNET_TIME_Absolute valid_until,
399     struct GNUNET_TIME_Absolute next_validation,
400     enum GNUNET_TRANSPORT_ValidationState state)
401 {
402   if ((NULL == peer) || (NULL == p1))
403     return;
404
405   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Monitor 1: %s %s %s\n",
406       GNUNET_i2s (peer), GNUNET_TRANSPORT_vs2s(state), GNUNET_STRINGS_absolute_time_to_string(valid_until));
407   if (0 == memcmp (peer, &p2->id, sizeof (p2->id)))
408     p1_c++;
409 }
410
411
412 static void
413 monitor2_cb (void *cls,
414     const struct GNUNET_PeerIdentity *peer,
415     const struct GNUNET_HELLO_Address *address,
416     struct GNUNET_TIME_Absolute last_validation,
417     struct GNUNET_TIME_Absolute valid_until,
418     struct GNUNET_TIME_Absolute next_validation,
419     enum GNUNET_TRANSPORT_ValidationState state)
420 {
421   if ((NULL == peer) || (NULL == p2))
422     return;
423
424   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Monitor 2: %s %s %s\n",
425       GNUNET_i2s (peer), GNUNET_TRANSPORT_vs2s(state), GNUNET_STRINGS_absolute_time_to_string(valid_until));
426   if (0 == memcmp (peer, &p1->id, sizeof (p1->id)))
427     p2_c++;
428 }
429
430
431
432 static void
433 run (void *cls, char *const *args, const char *cfgfile,
434      const struct GNUNET_CONFIGURATION_Handle *cfg)
435 {
436   die_task = GNUNET_SCHEDULER_add_delayed (TIMEOUT, &end_badly, NULL);
437
438   s_started = GNUNET_NO;
439   s_connected = GNUNET_NO;
440   s_sending = GNUNET_NO;
441
442   p1 = GNUNET_TRANSPORT_TESTING_start_peer (tth, cfg_file_p1, 1,
443                                             &notify_receive, &notify_connect,
444                                             &notify_disconnect, &start_cb,
445                                             NULL);
446   vmc_p1 = GNUNET_TRANSPORT_monitor_validation_entries (p1->cfg, NULL, GNUNET_NO, GNUNET_TIME_UNIT_FOREVER_REL, &monitor1_cb, NULL);
447
448   p2 = GNUNET_TRANSPORT_TESTING_start_peer (tth, cfg_file_p2, 2,
449                                             &notify_receive, &notify_connect,
450                                             &notify_disconnect, &start_cb,
451                                             NULL);
452   vmc_p2 = GNUNET_TRANSPORT_monitor_validation_entries (p2->cfg, NULL, GNUNET_NO, GNUNET_TIME_UNIT_FOREVER_REL, &monitor2_cb, NULL);
453
454   if ((p1 == NULL) || (p2 == NULL))
455   {
456     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Fail! Could not start peers!\n");
457     if (die_task != GNUNET_SCHEDULER_NO_TASK)
458       GNUNET_SCHEDULER_cancel (die_task);
459     die_task = GNUNET_SCHEDULER_add_now (&end_badly, NULL);
460     return;
461   }
462 }
463
464
465 static int
466 check ()
467 {
468   static char *const argv[] = { "test-transport-api",
469     "-c",
470     "test_transport_api_data.conf",
471     NULL
472   };
473   static struct GNUNET_GETOPT_CommandLineOption options[] = {
474     GNUNET_GETOPT_OPTION_END
475   };
476
477   send_task = GNUNET_SCHEDULER_NO_TASK;
478
479   ok = 1;
480   GNUNET_PROGRAM_run ((sizeof (argv) / sizeof (char *)) - 1, argv, test_name,
481                       "nohelp", options, &run, &ok);
482
483   return ok;
484 }
485
486 int
487 main (int argc, char *argv[])
488 {
489   int ret;
490
491   ok = 1;
492
493   GNUNET_TRANSPORT_TESTING_get_test_name (argv[0], &test_name);
494   GNUNET_TRANSPORT_TESTING_get_test_source_name (__FILE__, &test_source);
495   GNUNET_TRANSPORT_TESTING_get_test_plugin_name (argv[0], test_source,
496                                                  &test_plugin);
497
498   GNUNET_log_setup (test_name,
499                     "WARNING",
500                     NULL);
501   tth = GNUNET_TRANSPORT_TESTING_init ();
502
503   GNUNET_TRANSPORT_TESTING_get_config_name (argv[0], &cfg_file_p1, 1);
504   GNUNET_TRANSPORT_TESTING_get_config_name (argv[0], &cfg_file_p2, 2);
505
506   ret = check ();
507
508   GNUNET_free (cfg_file_p1);
509   GNUNET_free (cfg_file_p2);
510
511   GNUNET_free (test_source);
512   GNUNET_free (test_plugin);
513   GNUNET_free (test_name);
514
515   GNUNET_TRANSPORT_TESTING_done (tth);
516
517   if (0 != ret)
518     return ret;
519   else
520     return ok;
521 }
522
523 /* end of test_transport_api_monitoring_validation.c */