f69990a171e294fcd9291369508fed91e720b75b
[oweals/gnunet.git] / src / fs / fs_test_lib.c
1 /*
2      This file is part of GNUnet.
3      (C) 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 2, 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 fs/fs_test_lib.c
23  * @brief library routines for testing FS publishing and downloading
24  *        with multiple peers; this code is limited to flat files
25  *        and no keywords (those functions can be tested with
26  *        single-peer setups; this is for testing routing).
27  * @author Christian Grothoff
28  */
29 #include "platform.h"
30 #include "fs_test_lib.h"
31 #include "gnunet_testing_lib.h"
32
33 #define CONNECT_ATTEMPTS 4
34
35 /**
36  * Handle for a daemon started for testing FS.
37  */
38 struct GNUNET_FS_TestDaemon
39 {
40
41   /**
42    * Handle to the file sharing context using this daemon.
43    */
44   struct GNUNET_FS_Handle *fs;
45
46   /**
47    * Handle to the daemon via testing.
48    */
49   struct GNUNET_TESTING_Daemon *daemon;
50
51   /**
52    * Note that 'group' will be the same value for all of the
53    * daemons started jointly.
54    */
55   struct GNUNET_TESTING_PeerGroup *group;
56
57   /**
58    * Configuration for accessing this peer.
59    */
60   struct GNUNET_CONFIGURATION_Handle *cfg;
61
62   /**
63    * ID of this peer.
64    */
65   struct GNUNET_PeerIdentity id;
66
67   /**
68    * Scheduler to use (for publish_cont).
69    */
70   struct GNUNET_SCHEDULER_Handle *publish_sched;
71
72   /**
73    * Function to call when upload is done.
74    */
75   GNUNET_FS_TEST_UriContinuation publish_cont;
76   
77   /**
78    * Closure for publish_cont.
79    */
80   void *publish_cont_cls;
81
82   /**
83    * Task to abort publishing (timeout).
84    */
85   GNUNET_SCHEDULER_TaskIdentifier publish_timeout_task;
86
87   /**
88    * Seed for file generation.
89    */
90   uint32_t publish_seed;
91
92   /**
93    * Context for current publishing operation.
94    */
95   struct GNUNET_FS_PublishContext *publish_context;
96
97   /**
98    * Result URI.
99    */
100   struct GNUNET_FS_Uri *publish_uri;
101
102   /**
103    * Scheduler to use (for download_cont).
104    */
105   struct GNUNET_SCHEDULER_Handle *download_sched;
106
107   /**
108    * Function to call when download is done.
109    */
110   GNUNET_SCHEDULER_Task download_cont;
111
112   /**
113    * Closure for download_cont.
114    */
115   void *download_cont_cls;
116
117   /**
118    * Seed for download verification.
119    */
120   uint32_t download_seed;
121
122   /**
123    * Task to abort downloading (timeout).
124    */
125   GNUNET_SCHEDULER_TaskIdentifier download_timeout_task;
126
127   /**
128    * Context for current download operation.
129    */  
130   struct GNUNET_FS_DownloadContext *download_context;
131
132   /**
133    * Verbosity level of the current operation.
134    */
135   int verbose;
136
137                 
138 };
139
140
141 static void
142 report_uri (void *cls,
143             const struct GNUNET_SCHEDULER_TaskContext *tc)
144 {
145   struct GNUNET_FS_TestDaemon *daemon = cls;
146   GNUNET_FS_TEST_UriContinuation cont;
147   struct GNUNET_FS_Uri *uri;
148
149   GNUNET_FS_publish_stop (daemon->publish_context);
150   daemon->publish_context = NULL;
151   daemon->publish_sched = NULL;
152   cont = daemon->publish_cont;
153   daemon->publish_cont = NULL;
154   uri = daemon->publish_uri;
155   cont (daemon->publish_cont_cls,
156         uri);
157   GNUNET_FS_uri_destroy (uri);
158 }            
159
160
161 static void
162 report_success (void *cls,
163                 const struct GNUNET_SCHEDULER_TaskContext *tc)
164 {
165   struct GNUNET_FS_TestDaemon *daemon = cls;
166
167   GNUNET_FS_download_stop (daemon->download_context, GNUNET_YES);
168   daemon->download_context = NULL;
169   GNUNET_SCHEDULER_add_continuation (daemon->download_sched,
170                                      daemon->download_cont,
171                                      daemon->download_cont_cls,
172                                      GNUNET_SCHEDULER_REASON_PREREQ_DONE);      
173   daemon->download_cont = NULL;
174   daemon->download_sched = NULL;
175 }
176
177 static void*
178 progress_cb (void *cls,
179              const struct GNUNET_FS_ProgressInfo *info)
180 {
181   struct GNUNET_FS_TestDaemon *daemon = cls;
182
183   switch (info->status)
184     {
185     case GNUNET_FS_STATUS_PUBLISH_COMPLETED:      
186       GNUNET_SCHEDULER_cancel (daemon->publish_sched,
187                                daemon->publish_timeout_task);
188       daemon->publish_timeout_task = GNUNET_SCHEDULER_NO_TASK;
189       daemon->publish_uri = GNUNET_FS_uri_dup (info->value.publish.specifics.completed.chk_uri);
190       GNUNET_SCHEDULER_add_continuation (daemon->publish_sched,
191                                          &report_uri,
192                                          daemon,
193                                          GNUNET_SCHEDULER_REASON_PREREQ_DONE);
194       break;
195     case GNUNET_FS_STATUS_PUBLISH_PROGRESS:
196       if (daemon->verbose)
197         GNUNET_log (GNUNET_ERROR_TYPE_INFO,
198                     "Publishing at %llu/%llu bytes\n",
199                     (unsigned long long) info->value.publish.completed,
200                     (unsigned long long) info->value.publish.size);
201       break;
202     case GNUNET_FS_STATUS_DOWNLOAD_PROGRESS:
203       if (daemon->verbose)
204         GNUNET_log (GNUNET_ERROR_TYPE_INFO,
205                     "Download at %llu/%llu bytes\n",
206                     (unsigned long long) info->value.download.completed,
207                     (unsigned long long) info->value.download.size);
208       break;
209     case GNUNET_FS_STATUS_DOWNLOAD_COMPLETED:
210       GNUNET_SCHEDULER_cancel (daemon->download_sched,
211                                daemon->download_timeout_task);
212       daemon->download_timeout_task = GNUNET_SCHEDULER_NO_TASK;
213       GNUNET_SCHEDULER_add_continuation (daemon->download_sched,
214                                          &report_success,
215                                          daemon,
216                                          GNUNET_SCHEDULER_REASON_PREREQ_DONE);
217       break;
218     case GNUNET_FS_STATUS_DOWNLOAD_ACTIVE:
219     case GNUNET_FS_STATUS_DOWNLOAD_INACTIVE:
220       break;
221       /* FIXME: monitor data correctness during download progress */
222       /* FIXME: do performance reports given sufficient verbosity */
223       /* FIXME: advance timeout task to "immediate" on error */
224     default:
225       break;
226     }
227   return NULL;
228 }
229
230
231 struct StartContext
232 {
233   struct GNUNET_SCHEDULER_Handle *sched;
234   struct GNUNET_TIME_Relative timeout;
235   unsigned int total;
236   unsigned int have;
237   struct GNUNET_FS_TestDaemon **daemons;
238   GNUNET_SCHEDULER_Task cont;
239   void *cont_cls;
240   struct GNUNET_TESTING_PeerGroup *group;
241   struct GNUNET_CONFIGURATION_Handle *cfg;
242   GNUNET_SCHEDULER_TaskIdentifier timeout_task;
243 };
244
245
246 static void 
247 notify_running (void *cls,
248                 const struct GNUNET_PeerIdentity *id,
249                 const struct GNUNET_CONFIGURATION_Handle *cfg,
250                 struct GNUNET_TESTING_Daemon *d,
251                 const char *emsg)
252 {
253   struct StartContext *sctx = cls;
254   unsigned int i;
255
256   if (emsg != NULL)
257     {
258       GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
259                   _("Failed to start daemon: %s\n"),
260                   emsg);
261       return;
262     }
263   i = 0;
264   while (i < sctx->total)
265     {
266       if (GNUNET_TESTING_daemon_get (sctx->group,
267                                      i) == d)
268         break;
269       i++;
270     }
271   GNUNET_assert (i < sctx->total);
272   GNUNET_assert (sctx->have < sctx->total);
273   GNUNET_assert (sctx->daemons[i]->cfg == NULL);
274   sctx->daemons[i]->cfg = GNUNET_CONFIGURATION_dup (cfg);
275   sctx->daemons[i]->group = sctx->group;
276   sctx->daemons[i]->daemon = d;
277   sctx->daemons[i]->id = *id;
278   sctx->have++;
279   if (sctx->have == sctx->total)
280     {
281       GNUNET_SCHEDULER_add_continuation (sctx->sched,
282                                          sctx->cont,
283                                          sctx->cont_cls,
284                                          GNUNET_SCHEDULER_REASON_PREREQ_DONE);
285       GNUNET_CONFIGURATION_destroy (sctx->cfg);
286       GNUNET_SCHEDULER_cancel (sctx->sched,
287                                sctx->timeout_task);
288       for (i=0;i<sctx->total;i++)
289         {
290           sctx->daemons[i]->fs = GNUNET_FS_start (sctx->sched,
291                                                   sctx->daemons[i]->cfg,
292                                                   "<tester>",
293                                                   &progress_cb,
294                                                   sctx->daemons[i],
295                                                   GNUNET_FS_FLAGS_NONE,
296                                                   GNUNET_FS_OPTIONS_END);
297         }
298       GNUNET_free (sctx);
299     }
300 }
301
302
303 static void
304 start_timeout (void *cls,
305                const struct GNUNET_SCHEDULER_TaskContext *tc)
306 {
307   struct StartContext *sctx = cls;
308   unsigned int i;
309
310   GNUNET_TESTING_daemons_stop (sctx->group, GNUNET_TIME_relative_multiply(GNUNET_TIME_UNIT_SECONDS, 30));
311   for (i=0;i<sctx->total;i++)
312     {
313       if (i < sctx->have)
314         GNUNET_CONFIGURATION_destroy (sctx->daemons[i]->cfg);
315       GNUNET_free (sctx->daemons[i]);
316     }
317   GNUNET_CONFIGURATION_destroy (sctx->cfg);
318   GNUNET_SCHEDULER_add_continuation (sctx->sched,
319                                      sctx->cont,
320                                      sctx->cont_cls,
321                                      GNUNET_SCHEDULER_REASON_TIMEOUT);
322   GNUNET_free (sctx);
323 }
324
325
326 /**
327  * Start daemons for testing.
328  *
329  * @param sched scheduler to use
330  * @param template_cfg_file configuration template to use
331  * @param timeout if this operation cannot be completed within the
332  *                given period, call the continuation with an error code
333  * @param total number of daemons to start
334  * @param daemons array of 'total' entries to be initialized
335  *                (array must already be allocated, will be filled)
336  * @param cont function to call when done
337  * @param cont_cls closure for cont
338  */
339 void
340 GNUNET_FS_TEST_daemons_start (struct GNUNET_SCHEDULER_Handle *sched,
341                               const char *template_cfg_file,
342                               struct GNUNET_TIME_Relative timeout,
343                               unsigned int total,
344                               struct GNUNET_FS_TestDaemon **daemons,
345                               GNUNET_SCHEDULER_Task cont,
346                               void *cont_cls)
347 {
348   struct StartContext *sctx;
349   unsigned int i;
350
351   GNUNET_assert (total > 0);
352   sctx = GNUNET_malloc (sizeof (struct StartContext));
353   sctx->sched = sched;
354   sctx->daemons = daemons;
355   sctx->total = total;
356   sctx->cont = cont;
357   sctx->cont_cls = cont_cls;
358   sctx->cfg = GNUNET_CONFIGURATION_create ();
359   if (GNUNET_OK !=
360       GNUNET_CONFIGURATION_load (sctx->cfg,
361                                  template_cfg_file))
362     {
363       GNUNET_break (0);
364       GNUNET_CONFIGURATION_destroy (sctx->cfg);
365       GNUNET_free (sctx);
366       GNUNET_SCHEDULER_add_continuation (sched,
367                                          cont,
368                                          cont_cls,
369                                          GNUNET_SCHEDULER_REASON_TIMEOUT);
370       return;
371     }
372   for (i=0;i<total;i++)
373     daemons[i] = GNUNET_malloc (sizeof (struct GNUNET_FS_TestDaemon));
374   sctx->group = GNUNET_TESTING_daemons_start (sched,
375                                               sctx->cfg,
376                                               total,
377                                               timeout,
378                                               NULL,
379                                               NULL,
380                                               &notify_running,
381                                               sctx,
382                                               NULL, NULL,
383                                               NULL);
384   sctx->timeout_task = GNUNET_SCHEDULER_add_delayed (sched,
385                                                      timeout,
386                                                      &start_timeout,
387                                                      sctx);
388 }
389
390
391 struct ConnectContext
392 {
393   struct GNUNET_SCHEDULER_Handle *sched;
394   GNUNET_SCHEDULER_Task cont;
395   void *cont_cls;
396 };
397
398
399 static void
400 notify_connection (void *cls,
401                    const struct GNUNET_PeerIdentity *first,
402                    const struct GNUNET_PeerIdentity *second,
403                    const struct GNUNET_CONFIGURATION_Handle *first_cfg,
404                    const struct GNUNET_CONFIGURATION_Handle *second_cfg,
405                    struct GNUNET_TESTING_Daemon *first_daemon,
406                    struct GNUNET_TESTING_Daemon *second_daemon,
407                    const char *emsg)
408 {
409   struct ConnectContext *cc = cls;
410   
411   if (emsg != NULL)
412     GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
413                 _("Failed to connect peers: %s\n"),
414                 emsg);
415   GNUNET_SCHEDULER_add_continuation (cc->sched,
416                                      cc->cont,
417                                      cc->cont_cls,
418                                      (emsg != NULL) 
419                                      ? GNUNET_SCHEDULER_REASON_TIMEOUT 
420                                      : GNUNET_SCHEDULER_REASON_PREREQ_DONE);
421   GNUNET_free (cc);
422 }
423
424
425 /**
426  * Connect two daemons for testing.
427  *
428  * @param sched scheduler to use
429  * @param daemon1 first daemon to connect
430  * @param daemon2 second first daemon to connect
431  * @param timeout if this operation cannot be completed within the
432  *                given period, call the continuation with an error code
433  * @param cont function to call when done
434  * @param cont_cls closure for cont
435  */
436 void
437 GNUNET_FS_TEST_daemons_connect (struct GNUNET_SCHEDULER_Handle *sched,
438                                 struct GNUNET_FS_TestDaemon *daemon1,
439                                 struct GNUNET_FS_TestDaemon *daemon2,
440                                 struct GNUNET_TIME_Relative timeout,
441                                 GNUNET_SCHEDULER_Task cont,
442                                 void *cont_cls)
443 {
444   struct ConnectContext *ncc;
445
446   ncc = GNUNET_malloc (sizeof (struct ConnectContext));
447   ncc->sched = sched;
448   ncc->cont = cont;
449   ncc->cont_cls = cont_cls;
450   GNUNET_TESTING_daemons_connect (daemon1->daemon,
451                                   daemon2->daemon,
452                                   timeout,
453                                   CONNECT_ATTEMPTS,
454                                   &notify_connection,
455                                   ncc);
456 }
457
458
459 /**
460  * Obtain peer group used for testing.
461  *
462  * @param daemons array with the daemons (must contain at least one)
463  * @return peer group
464  */
465 struct GNUNET_TESTING_PeerGroup *
466 GNUNET_FS_TEST_get_group (struct GNUNET_FS_TestDaemon **daemons)
467 {
468   return daemons[0]->group;  
469 }
470
471
472 /**
473  * Stop daemons used for testing.
474  *
475  * @param sched scheduler to use
476  * @param total number of daemons to stop
477  * @param daemons array with the daemons (values will be clobbered)
478  */
479 void
480 GNUNET_FS_TEST_daemons_stop (struct GNUNET_SCHEDULER_Handle *sched,
481                              unsigned int total,
482                              struct GNUNET_FS_TestDaemon **daemons)
483 {
484   unsigned int i;
485   struct GNUNET_TESTING_PeerGroup *pg;
486
487   GNUNET_assert (total > 0);
488   pg = daemons[0]->group;
489   for (i=0;i<total;i++)
490     {
491       GNUNET_FS_stop (daemons[i]->fs);
492       GNUNET_CONFIGURATION_destroy (daemons[i]->cfg);
493       GNUNET_free (daemons[i]);
494       daemons[i] = NULL;
495     }  
496   GNUNET_TESTING_daemons_stop (pg, GNUNET_TIME_relative_multiply(GNUNET_TIME_UNIT_SECONDS, 30));
497 }
498
499
500 static void
501 publish_timeout (void *cls,
502                  const struct GNUNET_SCHEDULER_TaskContext *tc)
503 {
504   struct GNUNET_FS_TestDaemon *daemon = cls;
505   GNUNET_FS_TEST_UriContinuation cont;
506   
507   cont = daemon->publish_cont;
508   daemon->publish_timeout_task = GNUNET_SCHEDULER_NO_TASK;
509   daemon->publish_cont = NULL;
510   GNUNET_FS_publish_stop (daemon->publish_context);
511   daemon->publish_context = NULL;
512   cont (daemon->publish_cont_cls,
513         NULL);
514 }
515
516
517 static size_t
518 file_generator (void *cls, 
519                 uint64_t offset,
520                 size_t max, 
521                 void *buf,
522                 char **emsg)
523 {
524   struct GNUNET_FS_TestDaemon *daemon = cls;
525   uint64_t pos;
526   uint8_t *cbuf = buf;
527   int mod;
528
529   for (pos=0;pos<max;pos++)
530     {
531       mod = (255 - (offset / 1024 / 32));
532       if (mod == 0)
533         mod = 1;
534       cbuf[pos] = (uint8_t) ((offset * daemon->publish_seed) % mod);  
535     }
536   return max;
537 }
538
539
540
541 /**
542  * Publish a file at the given daemon.
543  *
544  * @param sched scheduler to use
545  * @param daemon where to publish
546  * @param timeout if this operation cannot be completed within the
547  *                given period, call the continuation with an error code
548  * @param anonymity option for publication
549  * @param do_index GNUNET_YES for index, GNUNET_NO for insertion,
550  *                GNUNET_SYSERR for simulation
551  * @param size size of the file to publish
552  * @param seed seed to use for file generation
553  * @param verbose how verbose to be in reporting
554  * @param cont function to call when done
555  * @param cont_cls closure for cont
556  */
557 void
558 GNUNET_FS_TEST_publish (struct GNUNET_SCHEDULER_Handle *sched,
559                         struct GNUNET_FS_TestDaemon *daemon,
560                         struct GNUNET_TIME_Relative timeout,
561                         uint32_t anonymity,
562                         int do_index,
563                         uint64_t size,
564                         uint32_t seed,
565                         unsigned int verbose,
566                         GNUNET_FS_TEST_UriContinuation cont,
567                         void *cont_cls)
568 {
569   GNUNET_assert (daemon->publish_cont == NULL);
570   struct GNUNET_FS_FileInformation *fi;
571
572   daemon->publish_cont = cont;
573   daemon->publish_cont_cls = cont_cls;
574   daemon->publish_seed = seed;
575   daemon->verbose = verbose;
576   daemon->publish_sched = sched;
577   fi = GNUNET_FS_file_information_create_from_reader (daemon->fs,
578                                                       daemon,                                                 
579                                                       size,
580                                                       &file_generator,
581                                                       daemon,
582                                                       NULL,
583                                                       NULL,
584                                                       do_index,
585                                                       anonymity,
586                                                       42 /* priority */,
587                                                       GNUNET_TIME_relative_to_absolute (GNUNET_TIME_UNIT_HOURS));
588   daemon->publish_context = GNUNET_FS_publish_start (daemon->fs,
589                                                      fi,
590                                                      NULL, NULL, NULL,
591                                                      GNUNET_FS_PUBLISH_OPTION_NONE);
592   daemon->publish_timeout_task = GNUNET_SCHEDULER_add_delayed (sched,
593                                                                timeout,
594                                                                &publish_timeout,
595                                                                daemon);
596 }
597
598
599 static void
600 download_timeout (void *cls,
601                   const struct GNUNET_SCHEDULER_TaskContext *tc)
602 {
603   struct GNUNET_FS_TestDaemon *daemon = cls;
604
605   daemon->download_timeout_task = GNUNET_SCHEDULER_NO_TASK;
606   GNUNET_FS_download_stop (daemon->download_context, GNUNET_YES);
607   daemon->download_context = NULL;
608   GNUNET_SCHEDULER_add_continuation (daemon->download_sched,
609                                      daemon->download_cont,
610                                      daemon->download_cont_cls,
611                                      GNUNET_SCHEDULER_REASON_TIMEOUT);
612   daemon->download_cont = NULL;
613   daemon->download_sched = NULL;
614 }
615
616
617 /**
618  * Perform test download.
619  *
620  * @param sched scheduler to use
621  * @param daemon which peer to download from
622  * @param timeout if this operation cannot be completed within the
623  *                given period, call the continuation with an error code
624  * @param anonymity option for download
625  * @param seed used for file validation
626  * @param uri URI of file to download (CHK/LOC only)
627  * @param verbose how verbose to be in reporting
628  * @param cont function to call when done
629  * @param cont_cls closure for cont
630  */
631 void
632 GNUNET_FS_TEST_download (struct GNUNET_SCHEDULER_Handle *sched,
633                          struct GNUNET_FS_TestDaemon *daemon,
634                          struct GNUNET_TIME_Relative timeout,
635                          uint32_t anonymity,
636                          uint32_t seed,
637                          const struct GNUNET_FS_Uri *uri,
638                          unsigned int verbose,
639                          GNUNET_SCHEDULER_Task cont,
640                          void *cont_cls)
641 {
642   uint64_t size;
643  
644   GNUNET_assert (daemon->download_cont == NULL);
645   size = GNUNET_FS_uri_chk_get_file_size (uri);
646   daemon->verbose = verbose;
647   daemon->download_sched = sched;
648   daemon->download_cont = cont;
649   daemon->download_cont_cls = cont_cls;
650   daemon->download_seed = seed;  
651   daemon->download_context = GNUNET_FS_download_start (daemon->fs,
652                                                        uri,
653                                                        NULL, NULL,
654                                                        NULL,
655                                                        0,
656                                                        size,
657                                                        anonymity,
658                                                        GNUNET_FS_DOWNLOAD_OPTION_NONE,
659                                                        NULL,
660                                                        NULL);
661   daemon->download_timeout_task = GNUNET_SCHEDULER_add_delayed (sched,
662                                                                 timeout,
663                                                                 &download_timeout,
664                                                                 daemon);
665 }
666
667 /* end of test_fs_lib.c */