- distribute peers equally among island nodes on SuperMUC
[oweals/gnunet.git] / src / transport / test_transport_api_manipulation_cfg.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_manipulation_send_tcp.c
22  * @brief base test case for transport traffic manipulation implementation
23  *
24  * This test case will setup 2 peers and connect them, the first message
25  * will be sent without manipulation, then a send delay of 1 second will
26  * be configured and 1 more message will be sent. Time will be measured.
27  *
28  * In addition the distance on receiver side will be manipulated to be 10
29  */
30 #include "platform.h"
31 #include "gnunet_transport_service.h"
32 #include "transport-testing.h"
33
34 /**
35  * How long until we give up on transmitting the message?
36  */
37 #define TIMEOUT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 120)
38
39 /**
40  * How long until we give up on transmitting the message?
41  */
42 #define TIMEOUT_TRANSMIT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 30)
43
44 #define TEST_MESSAGE_SIZE 2600
45
46 #define TEST_MESSAGE_TYPE 12345
47
48 static char *test_source;
49
50 static char *test_plugin;
51
52 static char *test_name;
53
54 static int ok;
55
56 static int s_started;
57
58 static int s_connected;
59
60 static int s_sending;
61
62 static GNUNET_SCHEDULER_TaskIdentifier die_task;
63
64 static GNUNET_SCHEDULER_TaskIdentifier send_task;
65
66 static struct PeerContext *p1;
67
68 static struct PeerContext *p2;
69
70 static GNUNET_TRANSPORT_TESTING_ConnectRequest cc;
71
72 static struct GNUNET_TRANSPORT_TransmitHandle *th;
73
74 static struct GNUNET_TRANSPORT_TESTING_handle *tth;
75
76 static char *cfg_file_p1;
77
78 static char *cfg_file_p2;
79
80 static int messages_recv;
81
82 static struct GNUNET_TIME_Absolute start_normal;
83 static struct GNUNET_TIME_Relative dur_normal;
84
85 static struct GNUNET_TIME_Absolute start_delayed;
86 static struct GNUNET_TIME_Relative dur_delayed;
87
88 static void
89 end ()
90 {
91   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Stopping peers\n");
92
93   if (send_task != GNUNET_SCHEDULER_NO_TASK)
94     GNUNET_SCHEDULER_cancel (send_task);
95
96   if (die_task != GNUNET_SCHEDULER_NO_TASK)
97     GNUNET_SCHEDULER_cancel (die_task);
98
99   if (th != NULL)
100     GNUNET_TRANSPORT_notify_transmit_ready_cancel (th);
101   th = NULL;
102
103   GNUNET_TRANSPORT_TESTING_stop_peer (tth, p1);
104   GNUNET_TRANSPORT_TESTING_stop_peer (tth, p2);
105 }
106
107 static void
108 end_badly (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
109 {
110   die_task = GNUNET_SCHEDULER_NO_TASK;
111
112   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Fail! Stopping peers\n");
113
114
115   if (send_task != GNUNET_SCHEDULER_NO_TASK)
116     GNUNET_SCHEDULER_cancel (send_task);
117
118   if (cc != NULL)
119   {
120     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, _("Fail! Could not connect peers\n"));
121     GNUNET_TRANSPORT_TESTING_connect_peers_cancel (tth, cc);
122     cc = NULL;
123   }
124
125   if (th != NULL)
126     GNUNET_TRANSPORT_notify_transmit_ready_cancel (th);
127   else
128     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, _("Peer were not ready to send data\n"));
129
130   if (s_started == GNUNET_NO)
131     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, _("Peers were not started \n"));
132   else
133     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, _("Peers were started \n"));
134
135   if (s_connected == GNUNET_NO)
136     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, _("Peer were not connected\n"));
137   else
138     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, _("Peer were connected\n"));
139
140   if (s_sending == GNUNET_NO)
141     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, _("Peer were not ready to send data\n"));
142   else
143     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, _("Peer were ready to send data\n"));
144
145   th = NULL;
146
147   if (p1 != NULL)
148     GNUNET_TRANSPORT_TESTING_stop_peer (tth, p1);
149   else
150     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, _("Peer 1 was not started\n"));
151   if (p2 != NULL)
152     GNUNET_TRANSPORT_TESTING_stop_peer (tth, p2);
153   else
154     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, _("Peer 2 was not started\n"));
155
156   ok = GNUNET_SYSERR;
157 }
158
159
160 static void
161 sendtask (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc);
162
163 static void
164 notify_receive (void *cls, const struct GNUNET_PeerIdentity *peer,
165                 const struct GNUNET_MessageHeader *message)
166 {
167   struct PeerContext *p = cls;
168   struct PeerContext *t = NULL;
169
170   if (0 == memcmp (peer, &p1->id, sizeof (struct GNUNET_PeerIdentity)))
171     t = p1;
172   if (0 == memcmp (peer, &p2->id, sizeof (struct GNUNET_PeerIdentity)))
173     t = p2;
174   GNUNET_assert (t != NULL);
175
176   char *ps = GNUNET_strdup (GNUNET_i2s (&p->id));
177
178   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
179               "Peer %u (`%4s') received message of type %d and size %u size from peer %u (`%4s')!\n",
180               p->no, ps, ntohs (message->type), ntohs (message->size), t->no,
181               GNUNET_i2s (&t->id));
182   GNUNET_free (ps);
183
184   if ((TEST_MESSAGE_TYPE == ntohs (message->type)) &&
185       (TEST_MESSAGE_SIZE == ntohs (message->size)))
186   {
187     ok = 0;
188
189   }
190   else
191   {
192     GNUNET_break (0);
193     ok = 1;
194     end ();
195     return;
196   }
197
198   if (0 == messages_recv)
199   {
200         /* Received outbound only delayed message message */
201         dur_normal = GNUNET_TIME_absolute_get_duration(start_normal);
202     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
203                 "Received outbound message %u after %llu\n",
204                 messages_recv,
205                 (long long unsigned int) dur_normal.rel_value);
206     send_task = GNUNET_SCHEDULER_add_now (&sendtask, NULL);
207   }
208   if (1 == messages_recv)
209   {
210         /* Received outbound and inbound delayed message  */
211         dur_delayed = GNUNET_TIME_absolute_get_duration(start_delayed);
212       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
213                   "Received delayed message %u after %llu\n",
214                   messages_recv,
215                   (long long unsigned int) dur_delayed.rel_value);
216       if (dur_delayed.rel_value < (dur_normal.rel_value * 1.80))
217       {
218                                 GNUNET_break (0);
219                                 ok += 1;
220         GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
221                     "Outbound and inbound delayed message was not delayed correctly: took only %llu\n",
222                     (long long unsigned int) dur_delayed.rel_value);
223       }
224
225       /* shutdown */
226       end ();
227   }
228   messages_recv ++;
229 }
230
231
232 static size_t
233 notify_ready (void *cls, size_t size, void *buf)
234 {
235   struct PeerContext *p = cls;
236   struct GNUNET_MessageHeader *hdr;
237
238   th = NULL;
239
240   if (buf == NULL)
241   {
242     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
243                 "Timeout occurred while waiting for transmit_ready\n");
244     if (GNUNET_SCHEDULER_NO_TASK != die_task)
245       GNUNET_SCHEDULER_cancel (die_task);
246     die_task = GNUNET_SCHEDULER_add_now (&end_badly, NULL);
247     ok = 42;
248     return 0;
249   }
250
251   GNUNET_assert (size >= TEST_MESSAGE_SIZE);
252   if (buf != NULL)
253   {
254     memset (buf, '\0', TEST_MESSAGE_SIZE);
255     hdr = buf;
256     hdr->size = htons (TEST_MESSAGE_SIZE);
257     hdr->type = htons (TEST_MESSAGE_TYPE);
258   }
259
260   char *ps = GNUNET_strdup (GNUNET_i2s (&p2->id));
261   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
262               "Peer %u (`%4s') sending message with type %u and size %u bytes to peer %u (`%4s')\n",
263               p2->no, ps, ntohs (hdr->type), ntohs (hdr->size), p->no,
264               GNUNET_i2s (&p->id));
265   GNUNET_free (ps);
266
267   return TEST_MESSAGE_SIZE;
268 }
269
270
271 static void
272 sendtask (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
273 {
274   send_task = GNUNET_SCHEDULER_NO_TASK;
275
276   if ((tc->reason & GNUNET_SCHEDULER_REASON_SHUTDOWN) != 0)
277     return;
278   char *receiver_s = GNUNET_strdup (GNUNET_i2s (&p1->id));
279
280   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
281               "Sending message from peer %u (`%4s') -> peer %u (`%s') !\n",
282               p2->no, GNUNET_i2s (&p2->id), p1->no, receiver_s);
283   GNUNET_free (receiver_s);
284
285
286   if (0 == messages_recv)
287   {
288         start_normal = GNUNET_TIME_absolute_get();
289   }
290   if (1 == messages_recv)
291   {
292                 start_delayed = GNUNET_TIME_absolute_get();
293   }
294
295   s_sending = GNUNET_YES;
296   th = GNUNET_TRANSPORT_notify_transmit_ready (p2->th, &p1->id, TEST_MESSAGE_SIZE, 0,
297                                                TIMEOUT_TRANSMIT, &notify_ready,
298                                                p1);
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     t = p1;
313   if (0 == memcmp (peer, &p2->id, sizeof (struct GNUNET_PeerIdentity)))
314     t = p2;
315   GNUNET_assert (t != NULL);
316
317   char *ps = GNUNET_strdup (GNUNET_i2s (&p->id));
318
319   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
320               "Peer %u (`%4s'): peer %u (`%s') connected to me!\n", p->no, ps,
321               t->no, GNUNET_i2s (peer));
322   GNUNET_free (ps);
323 }
324
325
326 static void
327 notify_disconnect (void *cls, const struct GNUNET_PeerIdentity *peer)
328 {
329   struct PeerContext *p = cls;
330   char *ps = GNUNET_strdup (GNUNET_i2s (&p->id));
331
332   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
333               "Peer %u (`%4s'): peer (`%s') disconnected from me!\n", p->no, ps,
334               GNUNET_i2s (peer));
335
336   GNUNET_free (ps);
337
338   if (th != NULL)
339     GNUNET_TRANSPORT_notify_transmit_ready_cancel (th);
340   th = NULL;
341 }
342
343
344 static void
345 testing_connect_cb (struct PeerContext *p1, struct PeerContext *p2, void *cls)
346 {
347   cc = NULL;
348   char *p1_c = GNUNET_strdup (GNUNET_i2s (&p1->id));
349
350   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Peers connected: %u (%s) <-> %u (%s)\n",
351               p1->no, p1_c, p2->no, GNUNET_i2s (&p2->id));
352   GNUNET_free (p1_c);
353
354   s_connected = GNUNET_YES;
355   send_task = GNUNET_SCHEDULER_add_now (&sendtask, NULL);
356 }
357
358
359 static void
360 start_cb (struct PeerContext *p, void *cls)
361 {
362   static int started;
363   started++;
364
365   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Peer %u (`%s') started\n", p->no,
366               GNUNET_i2s (&p->id));
367
368   if (started != 2)
369     return;
370   else
371     s_started = GNUNET_YES;
372   char *sender_c = GNUNET_strdup (GNUNET_i2s (&p1->id));
373
374   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
375               "Test tries to connect peer %u (`%s') -> peer %u (`%s')\n",
376               p1->no, sender_c, p2->no, GNUNET_i2s (&p2->id));
377   GNUNET_free (sender_c);
378   /*
379   struct GNUNET_ATS_Information ats[2];
380         ats[0].type = htonl (GNUNET_ATS_QUALITY_NET_DELAY);
381         ats[0].value = htonl (1000);
382         ats[1].type = htonl (GNUNET_ATS_QUALITY_NET_DISTANCE);
383         ats[1].value = htonl (10);
384
385   GNUNET_TRANSPORT_set_traffic_metric (p1->th, &p2->id, TM_RECEIVE, ats, 2);
386 */
387   cc = GNUNET_TRANSPORT_TESTING_connect_peers (tth, p1, p2, &testing_connect_cb,
388                                                NULL);
389
390 }
391
392
393 static void
394 run (void *cls, char *const *args, const char *cfgfile,
395      const struct GNUNET_CONFIGURATION_Handle *cfg)
396 {
397   die_task = GNUNET_SCHEDULER_add_delayed (TIMEOUT, &end_badly, NULL);
398
399   s_started = GNUNET_NO;
400   s_connected = GNUNET_NO;
401   s_sending = GNUNET_NO;
402
403   p1 = GNUNET_TRANSPORT_TESTING_start_peer (tth, cfg_file_p1, 1,
404                                             &notify_receive, &notify_connect,
405                                             &notify_disconnect, &start_cb,
406                                             NULL);
407
408   p2 = GNUNET_TRANSPORT_TESTING_start_peer (tth, cfg_file_p2, 2,
409                                             &notify_receive, &notify_connect,
410                                             &notify_disconnect, &start_cb,
411                                             NULL);
412
413   if ((p1 == NULL) || (p2 == NULL))
414   {
415     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Fail! Could not start peers!\n");
416     if (die_task != GNUNET_SCHEDULER_NO_TASK)
417       GNUNET_SCHEDULER_cancel (die_task);
418     die_task = GNUNET_SCHEDULER_add_now (&end_badly, NULL);
419     return;
420   }
421 }
422
423
424 static int
425 check ()
426 {
427   static char *const argv[] = { "test-transport-api-manipulation",
428     "-c",
429     "test_transport_api_data.conf",
430     NULL
431   };
432   static struct GNUNET_GETOPT_CommandLineOption options[] = {
433     GNUNET_GETOPT_OPTION_END
434   };
435
436   send_task = GNUNET_SCHEDULER_NO_TASK;
437
438   ok = 1;
439   GNUNET_PROGRAM_run ((sizeof (argv) / sizeof (char *)) - 1, argv, test_name,
440                       "nohelp", options, &run, &ok);
441
442   return ok;
443 }
444
445 int
446 main (int argc, char *argv[])
447 {
448   int ret;
449
450   GNUNET_TRANSPORT_TESTING_get_test_name (argv[0], &test_name);
451   GNUNET_TRANSPORT_TESTING_get_test_source_name (__FILE__, &test_source);
452   GNUNET_TRANSPORT_TESTING_get_test_plugin_name (argv[0], test_source,
453                                                  &test_plugin);
454
455   GNUNET_log_setup (test_name,
456                     "WARNING",
457                     NULL);
458   tth = GNUNET_TRANSPORT_TESTING_init ();
459
460   GNUNET_TRANSPORT_TESTING_get_config_name (argv[0], &cfg_file_p1, 1);
461   GNUNET_TRANSPORT_TESTING_get_config_name (argv[0], &cfg_file_p2, 2);
462
463   ret = check ();
464
465   GNUNET_free (cfg_file_p1);
466   GNUNET_free (cfg_file_p2);
467
468   GNUNET_free (test_source);
469   GNUNET_free (test_plugin);
470   GNUNET_free (test_name);
471
472   GNUNET_TRANSPORT_TESTING_done (tth);
473
474   return ret;
475 }
476
477 /* end of test_transport_api.c */