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