checkpoint save
[oweals/gnunet.git] / src / stream / perf_stream_api.c
1  /*
2      This file is part of GNUnet.
3      (C) 2011, 2012 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 /**
22  * @file stream/perf_stream_api.c
23  * @brief performance benchmarks for stream api
24  * @author Sree Harsha Totakura
25  */
26
27 #define LOG(kind, ...)                         \
28   GNUNET_log (kind, __VA_ARGS__);
29
30 /****************************************************************************************/
31 /* Test is setup into the following major steps:                                        */
32 /*    1. Measurements over loopback (1 hop). i.e. we use only one peer and open         */
33 /*       stream connections over loopback. Messages will go through                     */
34 /*       STREAM_API->MESH_API->MESH_SERVICE->MESH_API->STREAM_API.                      */
35 /*    2. Measurements over 2 peers (2 hops). We use testbed to create 2 peers,          */
36 /*       connect them and then create stream connections. Messages will go through      */
37 /*       STREAM_API->MESH_API->MESH_SERVICE->CORE1.....CORE2->MESH_API->STREAM_API      */
38 /*    3. Measurements over 3 peers (3 hops). We use testbed to create 3 peers,          */
39 /*       connect them in a line topology: peer1->peer2->peer3. Messages will go         */
40 /*       through                                                                        */
41 /*       STREAM_API->MESH_API->MESH_SERVICE->CORE1..CORE2..CORE3->MESH_API->STREAM_API. */
42 /****************************************************************************************/
43
44 #include "platform.h"
45 #include "gnunet_common.h"
46 #include "gnunet_util_lib.h"
47 #include "gnunet_testing_lib.h"
48 #include "gnunet_testbed_service.h"
49 #include "gnunet_stream_lib.h"
50
51
52   
53 /**
54  * Simple struct to keep track of progress, and print a
55  * nice little percentage meter for long running tasks.
56  */
57 struct ProgressMeter
58 {
59   unsigned int total;
60
61   unsigned int modnum;
62
63   unsigned int dotnum;
64
65   unsigned int completed;
66
67   int print;
68
69   char *startup_string;
70 };
71
72
73 /**
74  * Steps in testing
75  */
76 enum TestStep
77 {
78   /**
79    * Single hop loopback testing
80    */
81   TEST_STEP_1_HOP,
82
83   /**
84    * Testing with 2 peers
85    */
86   TEST_STEP_2_HOP,
87
88   /**
89    * Testing with 3 peers
90    */
91   TEST_STEP_3_HOP
92 };
93
94
95 /**
96  * Structure for holding peer's sockets and IO Handles
97  */
98 struct PeerData
99 {
100   /**
101    * Peer's stream socket
102    */
103   struct GNUNET_STREAM_Socket *socket;
104
105   /**
106    * Peer's io write handle
107    */
108   struct GNUNET_STREAM_IOWriteHandle *io_write_handle;
109
110   /**
111    * Peer's io read handle
112    */
113   struct GNUNET_STREAM_IOReadHandle *io_read_handle;
114
115   /**
116    * The peer handle when we use the testbed servie
117    */
118   struct GNUNET_TESTBED_Peer *peer;
119
120   /**
121    * Handle to peer specific opearations while using testbed service
122    */
123   struct GNUNET_TESTBED_Operation *op;
124
125   /**
126    * The identity of this peer
127    */
128   struct GNUNET_PeerIdentity id;
129
130   /**
131    * Bytes the peer has written
132    */
133   unsigned int bytes_wrote;
134
135   /**
136    * Byte the peer has read
137    */
138   unsigned int bytes_read;
139 };
140
141
142 /**
143  * Enumeration of stages in this testing
144  */
145 enum TestStage
146 {
147   /**
148    * The initial stage
149    */
150   INIT,
151   
152   /**
153    * Uplink testing stage
154    */
155   UPLINK_OK,
156
157   /**
158    * Downlink testing stage
159    */
160   DOWNLINK_OK
161 };
162
163
164 /**
165  * Maximum size of the data which we will transfer during tests
166  */
167 #define DATA_SIZE 5000000      /* 5mB */
168
169 /**
170  * Listen socket of peer2
171  */
172 struct GNUNET_STREAM_ListenSocket *peer2_listen_socket;
173
174 /**
175  * Handle to configuration during TEST_STEP_1_HOP
176  */
177 const struct GNUNET_CONFIGURATION_Handle *config;
178
179 /**
180  * Handle for the progress meter
181  */
182 static struct ProgressMeter *meter;
183
184 /**
185  * Placeholder for peer data
186  */
187 static struct PeerData peer_data[3];
188
189 /**
190  * Handle to common operations while using testbed
191  */
192 static struct GNUNET_TESTBED_Operation *common_op;
193
194 /**
195  * Task ID for abort task
196  */
197 static GNUNET_SCHEDULER_TaskIdentifier abort_task;
198
199 /**
200  * Task ID for write task
201  */
202 static GNUNET_SCHEDULER_TaskIdentifier write_task;
203
204 /**
205  * Task ID for read task
206  */
207 static GNUNET_SCHEDULER_TaskIdentifier read_task;
208
209 /**
210  * Absolute time when profiling starts
211  */
212 static struct GNUNET_TIME_Absolute prof_start_time;
213
214 /**
215  * Test time taken for sending the data
216  */
217 static struct GNUNET_TIME_Relative prof_time;
218
219 /**
220  * Random data block. Should generate data first
221  */
222 static uint32_t data[DATA_SIZE / 4];
223
224 /**
225  * Payload sizes to test each major test with
226  */
227 static uint16_t payload_size[] = 
228 { 20, 500, 2000, 7000, 13000, 25000, 50000, 60000, 63000, 64000 };
229
230 /**
231  * Current step of testing
232  */
233 static enum TestStep test_step;
234
235 /**
236  * Index for choosing payload size
237  */
238 static unsigned int payload_size_index;
239
240 /**
241  * Number of peers we want to create while using the testbed service
242  */
243 static int num_peers;
244
245 /**
246  * Testing result of a major test
247  */
248 static enum TestStage result;
249
250 /**
251  * Create a meter to keep track of the progress of some task.
252  *
253  * @param total the total number of items to complete
254  * @param start_string a string to prefix the meter with (if printing)
255  * @param print GNUNET_YES to print the meter, GNUNET_NO to count
256  *              internally only
257  *
258  * @return the progress meter
259  */
260 static struct ProgressMeter *
261 create_meter (unsigned int total, char *start_string, int print)
262 {
263   struct ProgressMeter *ret;
264
265   ret = GNUNET_malloc (sizeof (struct ProgressMeter));
266   ret->print = print;
267   ret->total = total;
268   ret->modnum = total / 4;
269   if (ret->modnum == 0)         /* Divide by zero check */
270     ret->modnum = 1;
271   ret->dotnum = (total / 50) + 1;
272   if (start_string != NULL)
273     ret->startup_string = GNUNET_strdup (start_string);
274   else
275     ret->startup_string = GNUNET_strdup ("");
276
277   return ret;
278 }
279
280
281 /**
282  * Update progress meter (increment by one).
283  *
284  * @param meter the meter to update and print info for
285  *
286  * @return GNUNET_YES if called the total requested,
287  *         GNUNET_NO if more items expected
288  */
289 static int
290 update_meter (struct ProgressMeter *meter)
291 {
292   if (meter->print == GNUNET_YES)
293   {
294     if (meter->completed % meter->modnum == 0)
295     {
296       if (meter->completed == 0)
297       {
298         FPRINTF (stdout, "%sProgress: [0%%", meter->startup_string);
299       }
300       else
301         FPRINTF (stdout, "%d%%",
302                  (int) (((float) meter->completed / meter->total) * 100));
303     }
304     else if (meter->completed % meter->dotnum == 0)
305       FPRINTF (stdout, "%s",  ".");
306
307     if (meter->completed + 1 == meter->total)
308       FPRINTF (stdout, "%d%%]\n", 100);
309     fflush (stdout);
310   }
311   meter->completed++;
312
313   if (meter->completed == meter->total)
314     return GNUNET_YES;
315   if (meter->completed > meter->total)
316     GNUNET_log (GNUNET_ERROR_TYPE_WARNING, "Progress meter overflow!!\n");
317   return GNUNET_NO;
318 }
319
320
321 /**
322  * Reset progress meter.
323  *
324  * @param meter the meter to reset
325  *
326  * @return GNUNET_YES if meter reset,
327  *         GNUNET_SYSERR on error
328  */
329 static int
330 reset_meter (struct ProgressMeter *meter)
331 {
332   if (meter == NULL)
333     return GNUNET_SYSERR;
334
335   meter->completed = 0;
336   return GNUNET_YES;
337 }
338
339
340 /**
341  * Release resources for meter
342  *
343  * @param meter the meter to free
344  */
345 static void
346 free_meter (struct ProgressMeter *meter)
347 {
348   GNUNET_free_non_null (meter->startup_string);
349   GNUNET_free (meter);
350 }
351
352
353 /**
354  * Shutdown nicely
355  */
356 static void
357 do_shutdown (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
358 {
359   switch (test_step)
360   {
361   case TEST_STEP_1_HOP:
362     if (NULL != peer_data[0].socket)
363       GNUNET_STREAM_close (peer_data[0].socket);
364     if (NULL != peer_data[1].socket)
365       GNUNET_STREAM_close (peer_data[1].socket);
366     if (NULL != peer2_listen_socket)
367       GNUNET_STREAM_listen_close (peer2_listen_socket); /* Close listen socket */
368     break;
369   case TEST_STEP_2_HOP:
370     if (NULL != peer_data[1].socket)
371       GNUNET_STREAM_close (peer_data[1].socket);
372     if (NULL != peer_data[0].op)
373       GNUNET_TESTBED_operation_done (peer_data[0].op);
374     if (NULL != peer_data[1].op)
375       GNUNET_TESTBED_operation_done (peer_data[1].op);
376     break;
377   case TEST_STEP_3_HOP:
378     GNUNET_break (0);    
379   }  
380   if (GNUNET_SCHEDULER_NO_TASK != abort_task)
381     GNUNET_SCHEDULER_cancel (abort_task);
382   if (GNUNET_SCHEDULER_NO_TASK != write_task)
383     GNUNET_SCHEDULER_cancel (write_task);
384   GNUNET_SCHEDULER_shutdown (); /* Shutdown this testcase */
385   if (NULL != meter)
386   {
387     free_meter (meter);
388     meter = NULL;
389   }
390 }
391
392
393 /**
394  * Something went wrong and timed out. Kill everything and set error flag
395  */
396 static void
397 do_abort (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
398 {
399   abort_task = GNUNET_SCHEDULER_NO_TASK;
400   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "test: ABORT\n");
401   if (GNUNET_SCHEDULER_NO_TASK != read_task)
402     GNUNET_SCHEDULER_cancel (read_task);
403   result = GNUNET_SYSERR;
404   do_shutdown (cls, tc);
405 }
406
407   
408 /**
409  * Scheduler call back; to be executed when a new stream is connected
410  * Called from listen connect for peer2
411  */
412 static void
413 stream_read_task (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc);
414
415
416 /**
417  * Task for calling STREAM_write with a chunk of random data
418  *
419  * @param cls the peer data entity
420  * @param tc the task context
421  */
422 static void
423 stream_write_task (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc);
424
425
426 /**
427  * The write completion function; called upon writing some data to stream or
428  * upon error
429  *
430  * @param cls the closure from GNUNET_STREAM_write/read
431  * @param status the status of the stream at the time this function is called
432  * @param size the number of bytes read or written
433  */
434 static void 
435 write_completion (void *cls, enum GNUNET_STREAM_Status status, size_t size)
436 {
437   struct PeerData *pdata = cls;
438   double throughput;
439   double prof_time_sec;
440
441   if (GNUNET_STREAM_OK != status)
442   {
443     GNUNET_SCHEDULER_cancel (abort_task);
444     abort_task = GNUNET_SCHEDULER_add_now (&do_abort, NULL);
445     return;
446   }
447   GNUNET_assert (size <= DATA_SIZE);
448   pdata->bytes_wrote += size;
449   for (;size > 0; size--)
450     update_meter (meter);
451   if (pdata->bytes_wrote < DATA_SIZE) /* Have more data to send */
452   {
453     pdata->io_write_handle =
454         GNUNET_STREAM_write (pdata->socket,
455                              ((void *) data) + pdata->bytes_wrote,
456                              sizeof (data) - pdata->bytes_wrote,
457                              GNUNET_TIME_UNIT_FOREVER_REL, &write_completion,
458                              pdata);
459     GNUNET_assert (NULL != pdata->io_write_handle);
460   }
461   else
462   {
463     free_meter (meter);
464     meter = NULL;
465     prof_time = GNUNET_TIME_absolute_get_duration (prof_start_time);
466     prof_time_sec = (((double) prof_time.rel_value)/ ((double) 1000));
467     throughput = (((float) sizeof (data)) / prof_time_sec);
468     PRINTF ("Throughput %.2f kB/sec\n", throughput / 1000.00);
469     switch (result)
470     {
471     case INIT:
472       result = UPLINK_OK;
473       GNUNET_assert (GNUNET_SCHEDULER_NO_TASK == read_task);
474       GNUNET_assert (GNUNET_SCHEDULER_NO_TASK == write_task);
475       pdata->bytes_read = 0;
476       meter = create_meter (sizeof (data), "Testing Downlink\n", GNUNET_YES);
477       read_task = GNUNET_SCHEDULER_add_now (&stream_read_task, &peer_data[0]);
478       write_task = GNUNET_SCHEDULER_add_now (&stream_write_task, &peer_data[1]);
479       break;
480     case UPLINK_OK:
481       result = DOWNLINK_OK;
482       GNUNET_SCHEDULER_add_now (&do_shutdown, NULL);
483       break;
484     case DOWNLINK_OK:
485       GNUNET_assert (0);
486     }
487   }
488 }
489
490
491 /**
492  * Task for calling STREAM_write with a chunk of random data
493  *
494  * @param cls the peer data entity
495  * @param tc the task context
496  */
497 static void
498 stream_write_task (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
499 {
500   struct PeerData *pdata = cls;
501   
502   if (GNUNET_SCHEDULER_NO_TASK != abort_task)
503   {
504     GNUNET_SCHEDULER_cancel (abort_task);
505     abort_task = 
506       GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_relative_multiply
507                                     (GNUNET_TIME_UNIT_SECONDS, 300), &do_abort,
508                                     NULL);
509   }
510   write_task = GNUNET_SCHEDULER_NO_TASK;
511   prof_start_time = GNUNET_TIME_absolute_get ();
512   pdata->bytes_wrote = 0;
513   pdata->io_write_handle = GNUNET_STREAM_write (pdata->socket, data,
514                                                 sizeof (data),
515                                                 GNUNET_TIME_UNIT_FOREVER_REL,
516                                                 &write_completion, pdata);
517   GNUNET_assert (NULL != pdata->io_write_handle);
518 }
519
520
521 /**
522  * Scheduler call back; to be executed when a new stream is connected
523  * Called from listen connect for peer2
524  */
525 static void
526 stream_read_task (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc);
527
528
529 /**
530  * Input processor
531  *
532  * @param cls peer2
533  * @param status the status of the stream at the time this function is called
534  * @param data traffic from the other side
535  * @param size the number of bytes available in data read 
536  * @return number of bytes of processed from 'data' (any data remaining should be
537  *         given to the next time the read processor is called).
538  */
539 static size_t
540 input_processor (void *cls, enum GNUNET_STREAM_Status status,
541                  const void *input_data, size_t size)
542 {
543   struct PeerData *pdata = cls;
544
545   if (GNUNET_STREAM_OK != status)
546   {
547     GNUNET_SCHEDULER_cancel (abort_task);
548     abort_task = GNUNET_SCHEDULER_add_now (&do_abort, NULL);
549     return 0;
550   }
551   GNUNET_assert (size < DATA_SIZE);
552   GNUNET_assert (0 == memcmp (((void *)data ) + pdata->bytes_read, 
553                               input_data, size));
554   pdata->bytes_read += size;  
555   if (pdata->bytes_read < DATA_SIZE)
556   {
557     GNUNET_assert (GNUNET_SCHEDULER_NO_TASK == read_task);
558     read_task = GNUNET_SCHEDULER_add_now (&stream_read_task, pdata);
559   }
560   else 
561   {
562     LOG (GNUNET_ERROR_TYPE_DEBUG, "Reading finished successfully\n");
563   }
564   return size;
565 }
566
567   
568 /**
569  * Scheduler call back; to be executed when a new stream is connected
570  * Called from listen connect for peer2
571  */
572 static void
573 stream_read_task (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
574 {
575   struct PeerData *pdata = cls;
576
577   read_task = GNUNET_SCHEDULER_NO_TASK;
578   pdata->io_read_handle =
579       GNUNET_STREAM_read (pdata->socket, GNUNET_TIME_UNIT_FOREVER_REL,
580                           &input_processor, pdata);
581   GNUNET_assert (NULL != pdata->io_read_handle);
582 }
583
584
585 /**
586  * Functions of this type are called upon new stream connection from other peers
587  *
588  * @param cls the closure from GNUNET_STREAM_listen
589  * @param socket the socket representing the stream
590  * @param initiator the identity of the peer who wants to establish a stream
591  *            with us
592  * @return GNUNET_OK to keep the socket open, GNUNET_SYSERR to close the
593  *             stream (the socket will be invalid after the call)
594  */
595 static int
596 stream_listen_cb (void *cls, struct GNUNET_STREAM_Socket *socket,
597                   const struct GNUNET_PeerIdentity *initiator)
598 {
599   struct PeerData *pdata = cls;
600
601   
602   if ((NULL == socket) || (NULL == initiator))
603   {
604     GNUNET_log (GNUNET_ERROR_TYPE_WARNING, "Binding error\n");
605     if (GNUNET_SCHEDULER_NO_TASK != abort_task)
606       GNUNET_SCHEDULER_cancel (abort_task);
607     abort_task = GNUNET_SCHEDULER_add_now (&do_abort, NULL);
608     return GNUNET_OK;
609   }
610   GNUNET_assert (NULL != socket);
611   GNUNET_assert (pdata == &peer_data[1]);
612   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Peer connected: %s\n",
613               GNUNET_i2s(initiator));
614   pdata->socket = socket;
615   pdata->bytes_read = 0;
616   read_task = GNUNET_SCHEDULER_add_now (&stream_read_task, pdata);
617   return GNUNET_OK;
618 }
619
620
621 /**
622  * Function executed after stream has been established
623  *
624  * @param cls the closure from GNUNET_STREAM_open
625  * @param socket socket to use to communicate with the other side (read/write)
626  */
627 static void 
628 stream_open_cb (void *cls,
629                 struct GNUNET_STREAM_Socket *socket)
630 {
631   struct PeerData *pdata = cls;
632
633   GNUNET_assert (socket == pdata->socket);
634   meter = create_meter (sizeof (data), "Testing Uplink\n", GNUNET_YES);
635   write_task = GNUNET_SCHEDULER_add_now (&stream_write_task, pdata);
636 }
637
638
639 /**
640  * Listen success callback; connects a peer to stream as client
641  */
642 static void
643 stream_connect (void)
644 {
645   peer_data[0].socket = 
646       GNUNET_STREAM_open (config, &peer_data[1].id, 10, &stream_open_cb,
647                           &peer_data[0],
648                           GNUNET_STREAM_OPTION_MAX_PAYLOAD_SIZE,
649                           payload_size[payload_size_index],
650                           GNUNET_STREAM_OPTION_END);
651   GNUNET_assert (NULL != peer_data[0].socket);
652 }
653
654
655 /**
656  * Initialize framework and start test
657  *
658  * @param cls closure
659  * @param cfg configuration of the peer that was started
660  * @param peer identity of the peer that was created
661  */
662 static void
663 run (void *cls, 
664      const struct GNUNET_CONFIGURATION_Handle *cfg,
665      struct GNUNET_TESTING_Peer *peer)
666 {
667   struct GNUNET_PeerIdentity id;
668
669   GNUNET_TESTING_peer_get_identity (peer, &id);
670   config = cfg;
671   peer2_listen_socket = 
672       GNUNET_STREAM_listen (config, 10, &stream_listen_cb, &peer_data[1],
673                             GNUNET_STREAM_OPTION_SIGNAL_LISTEN_SUCCESS,
674                             &stream_connect,
675                             GNUNET_STREAM_OPTION_MAX_PAYLOAD_SIZE,
676                             payload_size[payload_size_index],
677                             GNUNET_STREAM_OPTION_END);
678   GNUNET_assert (NULL != peer2_listen_socket);
679   peer_data[0].id = id;
680   peer_data[1].id = id;
681   abort_task =
682       GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_relative_multiply
683                                     (GNUNET_TIME_UNIT_SECONDS, 300), &do_abort,
684                                     NULL);
685 }
686
687
688 /**
689  * Adapter function called to establish a connection to
690  * a service.
691  * 
692  * @param cls closure
693  * @param cfg configuration of the peer to connect to; will be available until
694  *          GNUNET_TESTBED_operation_done() is called on the operation returned
695  *          from GNUNET_TESTBED_service_connect()
696  * @return service handle to return in 'op_result', NULL on error
697  */
698 static void * 
699 stream_ca (void *cls, const struct GNUNET_CONFIGURATION_Handle *cfg);
700
701
702 /**
703  * Adapter function called to destroy a connection to
704  * a service.
705  * 
706  * @param cls closure
707  * @param op_result service handle returned from the connect adapter
708  */
709 static void
710 stream_da (void *cls, void *op_result)
711 {
712   if (&peer_data[1] == cls)
713   {
714     GNUNET_STREAM_listen_close (op_result);
715     return;
716   }
717   else if (&peer_data[0] == cls)
718   {
719     GNUNET_STREAM_close (op_result);
720     return;
721   }
722   GNUNET_assert (0);
723 }
724
725
726 /**
727  * Listen success callback; connects a peer to stream as client. Called from
728  * testbed stream_ca
729  */
730 static void
731 stream_connect2 (void)
732 {
733   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Stream listen open successful\n");
734   peer_data[0].op =
735       GNUNET_TESTBED_service_connect (&peer_data[0], peer_data[0].peer,
736                                       "stream", NULL, NULL, stream_ca,
737                                       stream_da, &peer_data[0]);
738 }
739
740
741 /**
742  * Adapter function called to establish a connection to
743  * a service.
744  * 
745  * @param cls closure
746  * @param cfg configuration of the peer to connect to; will be available until
747  *          GNUNET_TESTBED_operation_done() is called on the operation returned
748  *          from GNUNET_TESTBED_service_connect()
749  * @return service handle to return in 'op_result', NULL on error
750  */
751 static void * 
752 stream_ca (void *cls, const struct GNUNET_CONFIGURATION_Handle *cfg)
753 {
754   struct PeerData *pdata = cls;
755
756   if (&peer_data[1] == pdata)
757   {
758     peer2_listen_socket = NULL;
759     peer2_listen_socket =
760         GNUNET_STREAM_listen (cfg, 10, &stream_listen_cb, &peer_data[1],
761                               GNUNET_STREAM_OPTION_SIGNAL_LISTEN_SUCCESS,
762                               &stream_connect2,
763                               GNUNET_STREAM_OPTION_MAX_PAYLOAD_SIZE,
764                               payload_size[payload_size_index],
765                               GNUNET_STREAM_OPTION_END);
766     GNUNET_assert (NULL != peer2_listen_socket);
767     return peer2_listen_socket;
768   }
769   if (&peer_data[0] == pdata)
770   {
771     pdata->socket =
772         GNUNET_STREAM_open (cfg, &peer_data[1].id, 10, &stream_open_cb,
773                             &peer_data[0],
774                             GNUNET_STREAM_OPTION_MAX_PAYLOAD_SIZE,
775                             payload_size[payload_size_index],
776                             GNUNET_STREAM_OPTION_END);
777     GNUNET_assert (NULL != pdata->socket);
778     return pdata->socket;
779   }
780   GNUNET_assert (0);
781   return NULL;
782 }
783
784
785 /**
786  * Callback to be called when the requested peer information is available
787  *
788  * @param cb_cls the closure from GNUNET_TETSBED_peer_get_information()
789  * @param op the operation this callback corresponds to
790  * @param pinfo the result; will be NULL if the operation has failed
791  * @param emsg error message if the operation has failed; will be NULL if the
792  *          operation is successfull
793  */
794 static void 
795 peerinfo_cb (void *cb_cls, struct GNUNET_TESTBED_Operation *op,
796              const struct GNUNET_TESTBED_PeerInformation *pinfo,
797              const char *emsg)
798 {
799   struct PeerData *pdata = cb_cls;
800
801   GNUNET_assert (NULL == emsg);
802   GNUNET_assert (common_op == op);
803   GNUNET_assert (NULL != pdata);
804   memcpy (&pdata->id, pinfo->result.id, sizeof (struct GNUNET_PeerIdentity));
805   GNUNET_TESTBED_operation_done (op);
806   if (pdata == &peer_data[0])
807   {
808     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Peer 1 id: %s\n",
809                 GNUNET_i2s (&pdata->id));
810     common_op = GNUNET_TESTBED_peer_get_information (peer_data[1].peer,
811                                                      GNUNET_TESTBED_PIT_IDENTITY,
812                                                      &peerinfo_cb, &peer_data[1]);
813   }
814   else if (pdata == &peer_data[1])
815   {
816     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Peer 2 id: %s\n",
817                 GNUNET_i2s (&pdata->id));
818     if (TEST_STEP_2_HOP == test_step)
819       peer_data[1].op = 
820           GNUNET_TESTBED_service_connect (&peer_data[1], peer_data[1].peer,
821                                           "stream", NULL, NULL, stream_ca,
822                                           stream_da, &peer_data[1]);
823     else
824       GNUNET_break (0);         /* FIXME: 3 hop test case here... */
825   }
826 }
827
828
829 /**
830  * Controller event callback
831  *
832  * @param cls NULL
833  * @param event the controller event
834  */
835 static void
836 controller_event_cb (void *cls,
837                      const struct GNUNET_TESTBED_EventInformation *event)
838 {
839   switch (event->type)
840   {
841   case GNUNET_TESTBED_ET_OPERATION_FINISHED:
842     if (NULL != event->details.operation_finished.emsg)
843     {
844       FPRINTF (stderr, "Error while expecting an operation to succeed:%s \n",
845                event->details.operation_finished.emsg);
846       GNUNET_assert (0);
847     }
848     break;
849   case GNUNET_TESTBED_ET_CONNECT:
850     GNUNET_TESTBED_operation_done (common_op);
851     /* Get the peer identity and configuration of peers */
852     common_op =
853         GNUNET_TESTBED_peer_get_information (peer_data[0].peer,
854                                              GNUNET_TESTBED_PIT_IDENTITY,
855                                              &peerinfo_cb, &peer_data[0]);
856     break;
857   default:
858     GNUNET_assert (0);
859   }
860 }
861
862
863 /**
864  * Signature of a main function for a testcase.
865  *
866  * @param cls closure
867  * @param num_peers number of peers in 'peers'
868  * @param peers handle to peers run in the testbed
869  */
870 static void
871 test_master (void *cls, unsigned int num_peers_,
872              struct GNUNET_TESTBED_Peer **peers)
873 {
874   GNUNET_assert (NULL != peers);
875   GNUNET_assert (NULL != peers[0]);
876   GNUNET_assert (NULL != peers[1]);
877   GNUNET_assert (num_peers_ == num_peers);
878   peer_data[0].peer = peers[0];
879   peer_data[1].peer = peers[1];
880   if (2 == num_peers)
881     common_op = GNUNET_TESTBED_overlay_connect (NULL, NULL, NULL,
882                                                 peer_data[0].peer,
883                                                 peer_data[1].peer);
884   else
885     GNUNET_break (0);
886   abort_task =
887       GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_relative_multiply
888                                     (GNUNET_TIME_UNIT_SECONDS, 120), &do_abort,
889                                     NULL);
890 }
891
892
893 /**
894  * Main function
895  */
896 int main (int argc, char **argv)
897 {
898   char *test_name = "perf_stream_api";
899   char *cfg_file = "test_stream_local.conf";
900   uint64_t event_mask;
901   unsigned int count;
902   int ret;
903
904   meter = create_meter ((sizeof (data) / 4), "Generating random data\n", GNUNET_YES);
905   for (count=0; count < (sizeof (data) / 4); count++)
906   {
907     data[count] = GNUNET_CRYPTO_random_u32 (GNUNET_CRYPTO_QUALITY_WEAK,
908                                             UINT32_MAX);
909     update_meter (meter);
910   }
911   reset_meter (meter);
912   free_meter (meter);
913   meter = NULL;
914   test_step = TEST_STEP_1_HOP;
915   for (payload_size_index = 0;
916        payload_size_index < (sizeof (payload_size) / sizeof (uint16_t));
917        payload_size_index++)
918   {
919     PRINTF ("\nTesting over loopback with payload size %hu\n",
920             payload_size[payload_size_index]);
921     (void) memset (peer_data, 0, sizeof (peer_data));
922     result = INIT;
923     ret = GNUNET_TESTING_peer_run (test_name, cfg_file, &run, NULL);
924     if ((0 != ret) || (DOWNLINK_OK != result))
925       goto return_fail;
926   }
927   test_step = TEST_STEP_2_HOP;
928   num_peers = 2;
929   event_mask = 0;
930   event_mask |= (1LL << GNUNET_TESTBED_ET_CONNECT);
931   event_mask |= (1LL << GNUNET_TESTBED_ET_OPERATION_FINISHED);
932   for (payload_size_index = 0;
933        payload_size_index < (sizeof (payload_size) / sizeof (uint16_t));
934        payload_size_index++)
935   {
936     PRINTF ("\nTesting over 1 hop with payload size %hu\n",
937             payload_size[payload_size_index]);
938     (void) memset (peer_data, 0, sizeof (peer_data));
939     result = GNUNET_SYSERR;
940     GNUNET_TESTBED_test_run (test_name, cfg_file, num_peers, event_mask,
941                              &controller_event_cb, NULL, &test_master, NULL);
942     if (DOWNLINK_OK != result)
943       goto return_fail;
944   }
945   test_step = TEST_STEP_3_HOP;
946   for (payload_size_index = 0; 
947        payload_size_index < (sizeof (payload_size) / sizeof (uint16_t));
948        payload_size_index++)
949   {
950     /* Initialize testbed here */
951   }
952   return 0;
953
954  return_fail:
955   GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Test failed\n");
956   return 1;
957 }
958
959 /* end of perf_stream_api.c */