-trying to fix #2391: limit connect rate from topology
[oweals/gnunet.git] / src / fs / fs_download.c
1 /*
2      This file is part of GNUnet.
3      (C) 2001-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  * @file fs/fs_download.c
22  * @brief download methods
23  * @author Christian Grothoff
24  */
25 #include "platform.h"
26 #include "gnunet_constants.h"
27 #include "gnunet_fs_service.h"
28 #include "fs_api.h"
29 #include "fs_tree.h"
30
31
32 /**
33  * Determine if the given download (options and meta data) should cause
34  * use to try to do a recursive download.
35  */
36 static int
37 is_recursive_download (struct GNUNET_FS_DownloadContext *dc)
38 {
39   return (0 != (dc->options & GNUNET_FS_DOWNLOAD_OPTION_RECURSIVE)) &&
40       ((GNUNET_YES == GNUNET_FS_meta_data_test_for_directory (dc->meta)) ||
41        ((NULL == dc->meta) &&
42         ((NULL == dc->filename) ||
43          ((strlen (dc->filename) >= strlen (GNUNET_FS_DIRECTORY_EXT)) &&
44           (NULL !=
45            strstr (dc->filename + strlen (dc->filename) -
46                    strlen (GNUNET_FS_DIRECTORY_EXT),
47                    GNUNET_FS_DIRECTORY_EXT))))));
48 }
49
50
51 /**
52  * We're storing the IBLOCKS after the DBLOCKS on disk (so that we
53  * only have to truncate the file once we're done).
54  *
55  * Given the offset of a block (with respect to the DBLOCKS) and its
56  * depth, return the offset where we would store this block in the
57  * file.
58  *
59  * @param fsize overall file size
60  * @param off offset of the block in the file
61  * @param depth depth of the block in the tree, 0 for DBLOCK
62  * @return off for DBLOCKS (depth == treedepth),
63  *         otherwise an offset past the end
64  *         of the file that does not overlap
65  *         with the range for any other block
66  */
67 static uint64_t
68 compute_disk_offset (uint64_t fsize, uint64_t off, unsigned int depth)
69 {
70   unsigned int i;
71   uint64_t lsize;               /* what is the size of all IBlocks for depth "i"? */
72   uint64_t loff;                /* where do IBlocks for depth "i" start? */
73   unsigned int ioff;            /* which IBlock corresponds to "off" at depth "i"? */
74
75   if (0 == depth)
76     return off;
77   /* first IBlocks start at the end of file, rounded up
78    * to full DBLOCK_SIZE */
79   loff = ((fsize + DBLOCK_SIZE - 1) / DBLOCK_SIZE) * DBLOCK_SIZE;
80   lsize =
81       ((fsize + DBLOCK_SIZE -
82         1) / DBLOCK_SIZE) * sizeof (struct ContentHashKey);
83   GNUNET_assert (0 == (off % DBLOCK_SIZE));
84   ioff = (off / DBLOCK_SIZE);
85   for (i = 1; i < depth; i++)
86   {
87     loff += lsize;
88     lsize = (lsize + CHK_PER_INODE - 1) / CHK_PER_INODE;
89     GNUNET_assert (lsize > 0);
90     GNUNET_assert (0 == (ioff % CHK_PER_INODE));
91     ioff /= CHK_PER_INODE;
92   }
93   return loff + ioff * sizeof (struct ContentHashKey);
94 }
95
96
97 /**
98  * Fill in all of the generic fields for a download event and call the
99  * callback.
100  *
101  * @param pi structure to fill in
102  * @param dc overall download context
103  */
104 void
105 GNUNET_FS_download_make_status_ (struct GNUNET_FS_ProgressInfo *pi,
106                                  struct GNUNET_FS_DownloadContext *dc)
107 {
108   pi->value.download.dc = dc;
109   pi->value.download.cctx = dc->client_info;
110   pi->value.download.pctx =
111       (NULL == dc->parent) ? NULL : dc->parent->client_info;
112   pi->value.download.sctx =
113       (NULL == dc->search) ? NULL : dc->search->client_info;
114   pi->value.download.uri = dc->uri;
115   pi->value.download.filename = dc->filename;
116   pi->value.download.size = dc->length;
117   /* FIXME: Fix duration calculation to account for pauses */
118   pi->value.download.duration =
119       GNUNET_TIME_absolute_get_duration (dc->start_time);
120   pi->value.download.completed = dc->completed;
121   pi->value.download.anonymity = dc->anonymity;
122   pi->value.download.eta =
123       GNUNET_TIME_calculate_eta (dc->start_time, dc->completed, dc->length);
124   pi->value.download.is_active = (NULL == dc->client) ? GNUNET_NO : GNUNET_YES;
125   if (0 == (dc->options & GNUNET_FS_DOWNLOAD_IS_PROBE))
126     dc->client_info = dc->h->upcb (dc->h->upcb_cls, pi);
127   else
128     dc->client_info = GNUNET_FS_search_probe_progress_ (NULL, pi);
129 }
130
131
132 /**
133  * We're ready to transmit a search request to the
134  * file-sharing service.  Do it.  If there is
135  * more than one request pending, try to send
136  * multiple or request another transmission.
137  *
138  * @param cls closure
139  * @param size number of bytes available in buf
140  * @param buf where the callee should write the message
141  * @return number of bytes written to buf
142  */
143 static size_t
144 transmit_download_request (void *cls, size_t size, void *buf);
145
146
147 /**
148  * Closure for iterator processing results.
149  */
150 struct ProcessResultClosure
151 {
152
153   /**
154    * Hash of data.
155    */
156   GNUNET_HashCode query;
157
158   /**
159    * Data found in P2P network.
160    */
161   const void *data;
162
163   /**
164    * Our download context.
165    */
166   struct GNUNET_FS_DownloadContext *dc;
167
168   /**
169    * Number of bytes in data.
170    */
171   size_t size;
172
173   /**
174    * Type of data.
175    */
176   enum GNUNET_BLOCK_Type type;
177
178   /**
179    * Flag to indicate if this block should be stored on disk.
180    */
181   int do_store;
182
183   /**
184    * When did we last transmit the request?
185    */
186   struct GNUNET_TIME_Absolute last_transmission;
187
188 };
189
190
191 /**
192  * Iterator over entries in the pending requests in the 'active' map for the
193  * reply that we just got.
194  *
195  * @param cls closure (our 'struct ProcessResultClosure')
196  * @param key query for the given value / request
197  * @param value value in the hash map (a 'struct DownloadRequest')
198  * @return GNUNET_YES (we should continue to iterate); unless serious error
199  */
200 static int
201 process_result_with_request (void *cls, const GNUNET_HashCode * key,
202                              void *value);
203
204
205 /**
206  * We've found a matching block without downloading it.
207  * Encrypt it and pass it to our "receive" function as
208  * if we had received it from the network.
209  *
210  * @param dc download in question
211  * @param chk request this relates to
212  * @param dr request details
213  * @param block plaintext data matching request
214  * @param len number of bytes in block
215  * @param do_store should we still store the block on disk?
216  * @return GNUNET_OK on success
217  */
218 static int
219 encrypt_existing_match (struct GNUNET_FS_DownloadContext *dc,
220                         const struct ContentHashKey *chk,
221                         struct DownloadRequest *dr, const char *block,
222                         size_t len, int do_store)
223 {
224   struct ProcessResultClosure prc;
225   char enc[len];
226   struct GNUNET_CRYPTO_AesSessionKey sk;
227   struct GNUNET_CRYPTO_AesInitializationVector iv;
228   GNUNET_HashCode query;
229
230   GNUNET_CRYPTO_hash_to_aes_key (&chk->key, &sk, &iv);
231   if (-1 == GNUNET_CRYPTO_aes_encrypt (block, len, &sk, &iv, enc))
232   {
233     GNUNET_break (0);
234     return GNUNET_SYSERR;
235   }
236   GNUNET_CRYPTO_hash (enc, len, &query);
237   if (0 != memcmp (&query, &chk->query, sizeof (GNUNET_HashCode)))
238   {
239     GNUNET_break_op (0);
240     return GNUNET_SYSERR;
241   }
242   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
243               "Matching %u byte block for `%s' at offset %llu already present, no need for download!\n",
244               (unsigned int) len,
245               dc->filename, (unsigned long long) dr->offset);
246   /* already got it! */
247   prc.dc = dc;
248   prc.data = enc;
249   prc.size = len;
250   prc.type =
251       (0 ==
252        dr->depth) ? GNUNET_BLOCK_TYPE_FS_DBLOCK : GNUNET_BLOCK_TYPE_FS_IBLOCK;
253   prc.query = chk->query;
254   prc.do_store = do_store;
255   prc.last_transmission = GNUNET_TIME_UNIT_FOREVER_ABS;
256   process_result_with_request (&prc, &chk->key, dr);
257   return GNUNET_OK;
258 }
259
260
261 /**
262  * We've lost our connection with the FS service.
263  * Re-establish it and re-transmit all of our
264  * pending requests.
265  *
266  * @param dc download context that is having trouble
267  */
268 static void
269 try_reconnect (struct GNUNET_FS_DownloadContext *dc);
270
271
272 /**
273  * We found an entry in a directory.  Check if the respective child
274  * already exists and if not create the respective child download.
275  *
276  * @param cls the parent download
277  * @param filename name of the file in the directory
278  * @param uri URI of the file (CHK or LOC)
279  * @param meta meta data of the file
280  * @param length number of bytes in data
281  * @param data contents of the file (or NULL if they were not inlined)
282  */
283 static void
284 trigger_recursive_download (void *cls, const char *filename,
285                             const struct GNUNET_FS_Uri *uri,
286                             const struct GNUNET_CONTAINER_MetaData *meta,
287                             size_t length, const void *data);
288
289
290 /**
291  * We're done downloading a directory.  Open the file and
292  * trigger all of the (remaining) child downloads.
293  *
294  * @param dc context of download that just completed
295  */
296 static void
297 full_recursive_download (struct GNUNET_FS_DownloadContext *dc)
298 {
299   size_t size;
300   uint64_t size64;
301   void *data;
302   struct GNUNET_DISK_FileHandle *h;
303   struct GNUNET_DISK_MapHandle *m;
304
305   size64 = GNUNET_FS_uri_chk_get_file_size (dc->uri);
306   size = (size_t) size64;
307   if (size64 != (uint64_t) size)
308   {
309     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
310                 _
311                 ("Recursive downloads of directories larger than 4 GB are not supported on 32-bit systems\n"));
312     return;
313   }
314   if (NULL != dc->filename)
315   {
316     h = GNUNET_DISK_file_open (dc->filename, GNUNET_DISK_OPEN_READ,
317                                GNUNET_DISK_PERM_NONE);
318   }
319   else
320   {
321     GNUNET_assert (NULL != dc->temp_filename);
322     h = GNUNET_DISK_file_open (dc->temp_filename, GNUNET_DISK_OPEN_READ,
323                                GNUNET_DISK_PERM_NONE);
324   }
325   if (NULL == h)
326     return;                     /* oops */
327   data = GNUNET_DISK_file_map (h, &m, GNUNET_DISK_MAP_TYPE_READ, size);
328   if (NULL == data)
329   {
330     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
331                 _("Directory too large for system address space\n"));
332   }
333   else
334   {
335     GNUNET_FS_directory_list_contents (size, data, 0,
336                                        &trigger_recursive_download, dc);
337     GNUNET_DISK_file_unmap (m);
338   }
339   GNUNET_DISK_file_close (h);
340   if (NULL == dc->filename)
341   {
342     if (0 != UNLINK (dc->temp_filename))
343       GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING, "unlink",
344                                 dc->temp_filename);
345     GNUNET_free (dc->temp_filename);
346     dc->temp_filename = NULL;
347   }
348 }
349
350
351 /**
352  * Check if all child-downloads have completed (or trigger them if
353  * necessary) and once we're completely done, signal completion (and
354  * possibly recurse to parent).  This function MUST be called when the
355  * download of a file itself is done or when the download of a file is
356  * done and then later a direct child download has completed (and
357  * hence this download may complete itself).
358  *
359  * @param dc download to check for completion of children
360  */
361 static void
362 check_completed (struct GNUNET_FS_DownloadContext *dc)
363 {
364   struct GNUNET_FS_ProgressInfo pi;
365   struct GNUNET_FS_DownloadContext *pos;
366
367   /* first, check if we need to download children */
368   if ((NULL == dc->child_head) && (is_recursive_download (dc)))
369     full_recursive_download (dc);
370   /* then, check if children are done already */
371   for (pos = dc->child_head; NULL != pos; pos = pos->next)
372   {
373     if ((pos->emsg == NULL) && (pos->completed < pos->length))
374       return;                   /* not done yet */
375     if ((pos->child_head != NULL) && (pos->has_finished != GNUNET_YES))
376       return;                   /* not transitively done yet */
377   }
378   /* All of our children are done, so mark this download done */
379   dc->has_finished = GNUNET_YES;
380   if (NULL != dc->job_queue)
381   {
382     GNUNET_FS_dequeue_ (dc->job_queue);
383     dc->job_queue = NULL;
384   }
385   if (GNUNET_SCHEDULER_NO_TASK != dc->task)
386   {
387     GNUNET_SCHEDULER_cancel (dc->task);
388     dc->task = GNUNET_SCHEDULER_NO_TASK;
389   }
390   if (NULL != dc->rfh)
391   {
392     GNUNET_break (GNUNET_OK == GNUNET_DISK_file_close (dc->rfh));
393     dc->rfh = NULL;
394   }
395   GNUNET_FS_download_sync_ (dc);
396
397   /* signal completion */
398   pi.status = GNUNET_FS_STATUS_DOWNLOAD_COMPLETED;
399   GNUNET_FS_download_make_status_ (&pi, dc);
400
401   /* let parent know */
402   if (NULL != dc->parent)
403     check_completed (dc->parent);
404 }
405
406
407 /**
408  * We got a block of plaintext data (from the meta data).
409  * Try it for upward reconstruction of the data.  On success,
410  * the top-level block will move to state BRS_DOWNLOAD_UP.
411  *
412  * @param dc context for the download
413  * @param dr download request to match against
414  * @param data plaintext data, starting from the beginning of the file
415  * @param data_len number of bytes in data
416  */
417 static void
418 try_match_block (struct GNUNET_FS_DownloadContext *dc,
419                  struct DownloadRequest *dr, const char *data, size_t data_len)
420 {
421   struct GNUNET_FS_ProgressInfo pi;
422   unsigned int i;
423   char enc[DBLOCK_SIZE];
424   struct ContentHashKey chks[CHK_PER_INODE];
425   struct ContentHashKey in_chk;
426   struct GNUNET_CRYPTO_AesSessionKey sk;
427   struct GNUNET_CRYPTO_AesInitializationVector iv;
428   size_t dlen;
429   struct DownloadRequest *drc;
430   struct GNUNET_DISK_FileHandle *fh;
431   int complete;
432   const char *fn;
433   const char *odata;
434   size_t odata_len;
435
436   odata = data;
437   odata_len = data_len;
438   if (BRS_DOWNLOAD_UP == dr->state)
439     return;
440   if (dr->depth > 0)
441   {
442     complete = GNUNET_YES;
443     for (i = 0; i < dr->num_children; i++)
444     {
445       drc = dr->children[i];
446       try_match_block (dc, drc, data, data_len);
447       if (drc->state != BRS_RECONSTRUCT_META_UP)
448         complete = GNUNET_NO;
449       else
450         chks[i] = drc->chk;
451     }
452     if (GNUNET_YES != complete)
453       return;
454     data = (const char *) chks;
455     dlen = dr->num_children * sizeof (struct ContentHashKey);
456   }
457   else
458   {
459     if (dr->offset > data_len)
460       return;                   /* oops */
461     dlen = GNUNET_MIN (data_len - dr->offset, DBLOCK_SIZE);
462   }
463   GNUNET_CRYPTO_hash (&data[dr->offset], dlen, &in_chk.key);
464   GNUNET_CRYPTO_hash_to_aes_key (&in_chk.key, &sk, &iv);
465   if (-1 == GNUNET_CRYPTO_aes_encrypt (&data[dr->offset], dlen, &sk, &iv, enc))
466   {
467     GNUNET_break (0);
468     return;
469   }
470   GNUNET_CRYPTO_hash (enc, dlen, &in_chk.query);
471   switch (dr->state)
472   {
473   case BRS_INIT:
474     dr->chk = in_chk;
475     dr->state = BRS_RECONSTRUCT_META_UP;
476     break;
477   case BRS_CHK_SET:
478     if (0 != memcmp (&in_chk, &dr->chk, sizeof (struct ContentHashKey)))
479     {
480       /* other peer provided bogus meta data */
481       GNUNET_break_op (0);
482       break;
483     }
484     /* write block to disk */
485     fn = (NULL != dc->filename) ? dc->filename : dc->temp_filename;
486     fh = GNUNET_DISK_file_open (fn,
487                                 GNUNET_DISK_OPEN_READWRITE |
488                                 GNUNET_DISK_OPEN_CREATE |
489                                 GNUNET_DISK_OPEN_TRUNCATE,
490                                 GNUNET_DISK_PERM_USER_READ |
491                                 GNUNET_DISK_PERM_USER_WRITE |
492                                 GNUNET_DISK_PERM_GROUP_READ |
493                                 GNUNET_DISK_PERM_OTHER_READ);
494     if (NULL == fh)
495     {
496       GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_ERROR, "open", fn);
497       GNUNET_asprintf (&dc->emsg, _("Failed to open file `%s' for writing"),
498                        fn);
499       GNUNET_DISK_file_close (fh);
500       dr->state = BRS_ERROR;
501       pi.status = GNUNET_FS_STATUS_DOWNLOAD_ERROR;
502       pi.value.download.specifics.error.message = dc->emsg;
503       GNUNET_FS_download_make_status_ (&pi, dc);
504       return;
505     }
506     if (data_len != GNUNET_DISK_file_write (fh, odata, odata_len))
507     {
508       GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_ERROR, "write", fn);
509       GNUNET_asprintf (&dc->emsg, _("Failed to open file `%s' for writing"),
510                        fn);
511       GNUNET_DISK_file_close (fh);
512       dr->state = BRS_ERROR;
513       pi.status = GNUNET_FS_STATUS_DOWNLOAD_ERROR;
514       pi.value.download.specifics.error.message = dc->emsg;
515       GNUNET_FS_download_make_status_ (&pi, dc);
516       return;
517     }
518     GNUNET_DISK_file_close (fh);
519     /* signal success */
520     dr->state = BRS_DOWNLOAD_UP;
521     dc->completed = dc->length;
522     GNUNET_FS_download_sync_ (dc);
523     pi.status = GNUNET_FS_STATUS_DOWNLOAD_PROGRESS;
524     pi.value.download.specifics.progress.data = data;
525     pi.value.download.specifics.progress.offset = 0;
526     pi.value.download.specifics.progress.data_len = dlen;
527     pi.value.download.specifics.progress.depth = 0;
528     pi.value.download.specifics.progress.trust_offered = 0;
529     pi.value.download.specifics.progress.block_download_duration = GNUNET_TIME_UNIT_ZERO;
530     GNUNET_FS_download_make_status_ (&pi, dc);
531     if ((NULL != dc->filename) &&
532         (0 !=
533          truncate (dc->filename,
534                    GNUNET_ntohll (dc->uri->data.chk.file_length))))
535       GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING, "truncate",
536                                 dc->filename);
537     check_completed (dc);
538     break;
539   default:
540     /* how did we get here? */
541     GNUNET_break (0);
542     break;
543   }
544 }
545
546
547 /**
548  * Type of a function that libextractor calls for each
549  * meta data item found.  If we find full data meta data,
550  * call 'try_match_block' on it.
551  *
552  * @param cls our 'struct GNUNET_FS_DownloadContext*'
553  * @param plugin_name name of the plugin that produced this value;
554  *        special values can be used (i.e. '&lt;zlib&gt;' for zlib being
555  *        used in the main libextractor library and yielding
556  *        meta data).
557  * @param type libextractor-type describing the meta data
558  * @param format basic format information about data
559  * @param data_mime_type mime-type of data (not of the original file);
560  *        can be NULL (if mime-type is not known)
561  * @param data actual meta-data found
562  * @param data_len number of bytes in data
563  * @return 0 to continue extracting, 1 to abort
564  */
565 static int
566 match_full_data (void *cls, const char *plugin_name,
567                  enum EXTRACTOR_MetaType type, enum EXTRACTOR_MetaFormat format,
568                  const char *data_mime_type, const char *data, size_t data_len)
569 {
570   struct GNUNET_FS_DownloadContext *dc = cls;
571
572   if (EXTRACTOR_METATYPE_GNUNET_FULL_DATA != type)
573     return 0;
574   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Found %u bytes of FD!\n",
575               (unsigned int) data_len);
576   if (GNUNET_FS_uri_chk_get_file_size (dc->uri) != data_len)
577   {
578     GNUNET_break_op (0);
579     return 1;                   /* bogus meta data */
580   }
581   try_match_block (dc, dc->top_request, data, data_len);
582   return 1;
583 }
584
585
586 /**
587  * Set the state of the given download request to
588  * BRS_DOWNLOAD_UP and propagate it up the tree.
589  *
590  * @param dr download request that is done
591  */
592 static void
593 propagate_up (struct DownloadRequest *dr)
594 {
595   unsigned int i;
596
597   do
598   {
599     dr->state = BRS_DOWNLOAD_UP;
600     dr = dr->parent;
601     if (NULL == dr)
602       break;
603     for (i = 0; i < dr->num_children; i++)
604       if (dr->children[i]->state != BRS_DOWNLOAD_UP)
605         break;
606   }
607   while (i == dr->num_children);
608 }
609
610
611 /**
612  * Try top-down reconstruction.  Before, the given request node
613  * must have the state BRS_CHK_SET.  Afterwards, more nodes may
614  * have that state or advanced to BRS_DOWNLOAD_DOWN or even
615  * BRS_DOWNLOAD_UP.  It is also possible to get BRS_ERROR on the
616  * top level.
617  *
618  * @param dc overall download this block belongs to
619  * @param dr block to reconstruct
620  */
621 static void
622 try_top_down_reconstruction (struct GNUNET_FS_DownloadContext *dc,
623                              struct DownloadRequest *dr)
624 {
625   uint64_t off;
626   char block[DBLOCK_SIZE];
627   GNUNET_HashCode key;
628   uint64_t total;
629   size_t len;
630   unsigned int i;
631   struct DownloadRequest *drc;
632   uint64_t child_block_size;
633   const struct ContentHashKey *chks;
634   int up_done;
635
636   GNUNET_assert (NULL != dc->rfh);
637   GNUNET_assert (BRS_CHK_SET == dr->state);
638   total = GNUNET_FS_uri_chk_get_file_size (dc->uri);
639   GNUNET_assert (dr->depth < dc->treedepth);
640   len = GNUNET_FS_tree_calculate_block_size (total, dr->offset, dr->depth);
641   GNUNET_assert (len <= DBLOCK_SIZE);
642   off = compute_disk_offset (total, dr->offset, dr->depth);
643   if (dc->old_file_size < off + len)
644     return;                     /* failure */
645   if (off != GNUNET_DISK_file_seek (dc->rfh, off, GNUNET_DISK_SEEK_SET))
646   {
647     GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING, "seek", dc->filename);
648     return;                     /* failure */
649   }
650   if (len != GNUNET_DISK_file_read (dc->rfh, block, len))
651   {
652     GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING, "read", dc->filename);
653     return;                     /* failure */
654   }
655   GNUNET_CRYPTO_hash (block, len, &key);
656   if (0 != memcmp (&key, &dr->chk.key, sizeof (GNUNET_HashCode)))
657     return;                     /* mismatch */
658   if (GNUNET_OK !=
659       encrypt_existing_match (dc, &dr->chk, dr, block, len, GNUNET_NO))
660   {
661     /* hash matches but encrypted block does not, really bad */
662     dr->state = BRS_ERROR;
663     /* propagate up */
664     while (NULL != dr->parent)
665     {
666       dr = dr->parent;
667       dr->state = BRS_ERROR;
668     }
669     return;
670   }
671   /* block matches */
672   dr->state = BRS_DOWNLOAD_DOWN;
673
674   /* set CHKs for children */
675   up_done = GNUNET_YES;
676   chks = (const struct ContentHashKey *) block;
677   for (i = 0; i < dr->num_children; i++)
678   {
679     drc = dr->children[i];
680     GNUNET_assert (drc->offset >= dr->offset);
681     child_block_size = GNUNET_FS_tree_compute_tree_size (drc->depth);
682     GNUNET_assert (0 == (drc->offset - dr->offset) % child_block_size);     
683     if (BRS_INIT == drc->state)
684     {
685       drc->state = BRS_CHK_SET;
686       drc->chk = chks[drc->chk_idx];
687       try_top_down_reconstruction (dc, drc);
688     }
689     if (BRS_DOWNLOAD_UP != drc->state)
690       up_done = GNUNET_NO;      /* children not all done */
691   }
692   if (GNUNET_YES == up_done)
693     propagate_up (dr);          /* children all done (or no children...) */
694 }
695
696
697 /**
698  * Schedule the download of the specified block in the tree.
699  *
700  * @param dc overall download this block belongs to
701  * @param dr request to schedule
702  */
703 static void
704 schedule_block_download (struct GNUNET_FS_DownloadContext *dc,
705                          struct DownloadRequest *dr)
706 {
707   unsigned int i;
708
709   switch (dr->state)
710   {
711   case BRS_INIT:
712     GNUNET_assert (0);
713     break;
714   case BRS_RECONSTRUCT_DOWN:
715     GNUNET_assert (0);
716     break;
717   case BRS_RECONSTRUCT_META_UP:
718     GNUNET_assert (0);
719     break;
720   case BRS_RECONSTRUCT_UP:
721     GNUNET_assert (0);
722     break;
723   case BRS_CHK_SET:
724     /* normal case, start download */
725     break;
726   case BRS_DOWNLOAD_DOWN:
727     for (i = 0; i < dr->num_children; i++)
728       schedule_block_download (dc, dr->children[i]);
729     return;
730   case BRS_DOWNLOAD_UP:
731     /* We're done! */
732     return;
733   case BRS_ERROR:
734     GNUNET_break (0);
735     return;
736   }
737   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
738               "Scheduling download at offset %llu and depth %u for `%s'\n",
739               (unsigned long long) dr->offset, dr->depth,
740               GNUNET_h2s (&dr->chk.query));
741   if (GNUNET_NO !=
742       GNUNET_CONTAINER_multihashmap_contains_value (dc->active, &dr->chk.query,
743                                                     dr))
744     return;                     /* already active */
745   GNUNET_CONTAINER_multihashmap_put (dc->active, &dr->chk.query, dr,
746                                      GNUNET_CONTAINER_MULTIHASHMAPOPTION_MULTIPLE);
747   if (NULL == dc->client)
748     return;                     /* download not active */
749   GNUNET_CONTAINER_DLL_insert (dc->pending_head, dc->pending_tail, dr);
750   dr->is_pending = GNUNET_YES;
751   if (NULL == dc->th)
752     dc->th =
753         GNUNET_CLIENT_notify_transmit_ready (dc->client,
754                                              sizeof (struct SearchMessage),
755                                              GNUNET_CONSTANTS_SERVICE_TIMEOUT,
756                                              GNUNET_NO,
757                                              &transmit_download_request, dc);
758 }
759
760
761 #define GNUNET_FS_URI_CHK_PREFIX GNUNET_FS_URI_PREFIX GNUNET_FS_URI_CHK_INFIX
762
763 /**
764  * We found an entry in a directory.  Check if the respective child
765  * already exists and if not create the respective child download.
766  *
767  * @param cls the parent download
768  * @param filename name of the file in the directory
769  * @param uri URI of the file (CHK or LOC)
770  * @param meta meta data of the file
771  * @param length number of bytes in data
772  * @param data contents of the file (or NULL if they were not inlined)
773  */
774 static void
775 trigger_recursive_download (void *cls, const char *filename,
776                             const struct GNUNET_FS_Uri *uri,
777                             const struct GNUNET_CONTAINER_MetaData *meta,
778                             size_t length, const void *data)
779 {
780   struct GNUNET_FS_DownloadContext *dc = cls;
781   struct GNUNET_FS_DownloadContext *cpos;
782   char *temp_name;
783   char *fn;
784   char *us;
785   char *ext;
786   char *dn;
787   char *pos;
788   char *full_name;
789   char *sfn;
790
791   if (NULL == uri)
792     return;                     /* entry for the directory itself */
793   cpos = dc->child_head;
794   while (NULL != cpos)
795   {
796     if ((GNUNET_FS_uri_test_equal (uri, cpos->uri)) ||
797         ((NULL != filename) && (0 == strcmp (cpos->filename, filename))))
798       break;
799     cpos = cpos->next;
800   }
801   if (NULL != cpos)
802     return;                     /* already exists */
803   fn = NULL;
804   if (NULL == filename)
805   {
806     fn = GNUNET_FS_meta_data_suggest_filename (meta);
807     if (NULL == fn)
808     {
809       us = GNUNET_FS_uri_to_string (uri);
810       fn = GNUNET_strdup (&us[strlen (GNUNET_FS_URI_CHK_PREFIX)]);
811       GNUNET_free (us);
812     }
813     else if ('.' == fn[0])
814     {
815       ext = fn;
816       us = GNUNET_FS_uri_to_string (uri);
817       GNUNET_asprintf (&fn, "%s%s", &us[strlen (GNUNET_FS_URI_CHK_PREFIX)],
818                        ext);
819       GNUNET_free (ext);
820       GNUNET_free (us);
821     }
822     /* change '\' to '/' (this should have happened
823      * during insertion, but malicious peers may
824      * not have done this) */
825     while (NULL != (pos = strstr (fn, "\\")))
826       *pos = '/';
827     /* remove '../' everywhere (again, well-behaved
828      * peers don't do this, but don't trust that
829      * we did not get something nasty) */
830     while (NULL != (pos = strstr (fn, "../")))
831     {
832       pos[0] = '_';
833       pos[1] = '_';
834       pos[2] = '_';
835     }
836     filename = fn;
837   }
838   if (NULL == dc->filename)
839   {
840     full_name = NULL;
841   }
842   else
843   {
844     dn = GNUNET_strdup (dc->filename);
845     GNUNET_break ((strlen (dn) >= strlen (GNUNET_FS_DIRECTORY_EXT)) &&
846                   (NULL !=
847                    strstr (dn + strlen (dn) - strlen (GNUNET_FS_DIRECTORY_EXT),
848                            GNUNET_FS_DIRECTORY_EXT)));
849     sfn = GNUNET_strdup (filename);
850     while ((strlen (sfn) > 0) && ('/' == filename[strlen (sfn) - 1]))
851       sfn[strlen (sfn) - 1] = '\0';
852     if ((strlen (dn) >= strlen (GNUNET_FS_DIRECTORY_EXT)) &&
853         (NULL !=
854          strstr (dn + strlen (dn) - strlen (GNUNET_FS_DIRECTORY_EXT),
855                  GNUNET_FS_DIRECTORY_EXT)))
856       dn[strlen (dn) - strlen (GNUNET_FS_DIRECTORY_EXT)] = '\0';
857     if ((GNUNET_YES == GNUNET_FS_meta_data_test_for_directory (meta)) &&
858         ((strlen (filename) < strlen (GNUNET_FS_DIRECTORY_EXT)) ||
859          (NULL ==
860           strstr (filename + strlen (filename) -
861                   strlen (GNUNET_FS_DIRECTORY_EXT), GNUNET_FS_DIRECTORY_EXT))))
862     {
863       GNUNET_asprintf (&full_name, "%s%s%s%s", dn, DIR_SEPARATOR_STR, sfn,
864                        GNUNET_FS_DIRECTORY_EXT);
865     }
866     else
867     {
868       GNUNET_asprintf (&full_name, "%s%s%s", dn, DIR_SEPARATOR_STR, sfn);
869     }
870     GNUNET_free (sfn);
871     GNUNET_free (dn);
872   }
873   if ((NULL != full_name) &&
874       (GNUNET_OK != GNUNET_DISK_directory_create_for_file (full_name)))
875   {
876     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
877                 _
878                 ("Failed to create directory for recursive download of `%s'\n"),
879                 full_name);
880     GNUNET_free (full_name);
881     GNUNET_free_non_null (fn);
882     return;
883   }
884
885   temp_name = NULL;
886   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
887               "Triggering recursive download of size %llu with %u bytes MD\n",
888               (unsigned long long) GNUNET_FS_uri_chk_get_file_size (uri),
889               (unsigned int)
890               GNUNET_CONTAINER_meta_data_get_serialized_size (meta));
891   GNUNET_FS_download_start (dc->h, uri, meta, full_name, temp_name, 0,
892                             GNUNET_FS_uri_chk_get_file_size (uri),
893                             dc->anonymity, dc->options, NULL, dc);
894   GNUNET_free_non_null (full_name);
895   GNUNET_free_non_null (temp_name);
896   GNUNET_free_non_null (fn);
897 }
898
899
900 /**
901  * (recursively) free download request structure
902  *
903  * @param dr request to free
904  */
905 void
906 GNUNET_FS_free_download_request_ (struct DownloadRequest *dr)
907 {
908   unsigned int i;
909
910   if (NULL == dr)
911     return;
912   for (i = 0; i < dr->num_children; i++)
913     GNUNET_FS_free_download_request_ (dr->children[i]);
914   GNUNET_free_non_null (dr->children);
915   GNUNET_free (dr);
916 }
917
918
919 /**
920  * Iterator over entries in the pending requests in the 'active' map for the
921  * reply that we just got.
922  *
923  * @param cls closure (our 'struct ProcessResultClosure')
924  * @param key query for the given value / request
925  * @param value value in the hash map (a 'struct DownloadRequest')
926  * @return GNUNET_YES (we should continue to iterate); unless serious error
927  */
928 static int
929 process_result_with_request (void *cls, const GNUNET_HashCode * key,
930                              void *value)
931 {
932   struct ProcessResultClosure *prc = cls;
933   struct DownloadRequest *dr = value;
934   struct GNUNET_FS_DownloadContext *dc = prc->dc;
935   struct DownloadRequest *drc;
936   struct GNUNET_DISK_FileHandle *fh = NULL;
937   struct GNUNET_CRYPTO_AesSessionKey skey;
938   struct GNUNET_CRYPTO_AesInitializationVector iv;
939   char pt[prc->size];
940   struct GNUNET_FS_ProgressInfo pi;
941   uint64_t off;
942   size_t bs;
943   size_t app;
944   int i;
945   struct ContentHashKey *chkarr;
946
947   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
948               "Received %u byte block `%s' matching pending request at depth %u and offset %llu/%llu\n",
949               (unsigned int) prc->size,
950               GNUNET_h2s (key), dr->depth, (unsigned long long) dr->offset,
951               (unsigned long long) GNUNET_ntohll (dc->uri->data.
952                                                   chk.file_length));
953   bs = GNUNET_FS_tree_calculate_block_size (GNUNET_ntohll
954                                             (dc->uri->data.chk.file_length),
955                                             dr->offset, dr->depth);
956   if (prc->size != bs)
957   {
958     GNUNET_asprintf (&dc->emsg,
959                      _
960                      ("Internal error or bogus download URI (expected %u bytes at depth %u and offset %llu/%llu, got %u bytes)"),
961                      bs, dr->depth, (unsigned long long) dr->offset,
962                      (unsigned long long) GNUNET_ntohll (dc->uri->data.
963                                                          chk.file_length),
964                      prc->size);
965     GNUNET_log (GNUNET_ERROR_TYPE_WARNING, "%s\n", dc->emsg);
966     while (NULL != dr->parent)
967     {
968       dr->state = BRS_ERROR;
969       dr = dr->parent;
970     }
971     dr->state = BRS_ERROR;
972     goto signal_error;
973   }
974
975   (void) GNUNET_CONTAINER_multihashmap_remove (dc->active, &prc->query, dr);
976   if (GNUNET_YES == dr->is_pending)
977   {
978     GNUNET_CONTAINER_DLL_remove (dc->pending_head, dc->pending_tail, dr);
979     dr->is_pending = GNUNET_NO;
980   }
981
982   GNUNET_CRYPTO_hash_to_aes_key (&dr->chk.key, &skey, &iv);
983   if (-1 == GNUNET_CRYPTO_aes_decrypt (prc->data, prc->size, &skey, &iv, pt))
984   {
985     GNUNET_break (0);
986     dc->emsg = GNUNET_strdup (_("internal error decrypting content"));
987     goto signal_error;
988   }
989   off =
990       compute_disk_offset (GNUNET_ntohll (dc->uri->data.chk.file_length),
991                            dr->offset, dr->depth);
992   /* save to disk */
993   if ((GNUNET_YES == prc->do_store) &&
994       ((NULL != dc->filename) || (is_recursive_download (dc))) &&
995       ((dr->depth == dc->treedepth) ||
996        (0 == (dc->options & GNUNET_FS_DOWNLOAD_NO_TEMPORARIES))))
997   {
998     fh = GNUNET_DISK_file_open (NULL != dc->filename
999                                 ? dc->filename : dc->temp_filename,
1000                                 GNUNET_DISK_OPEN_READWRITE |
1001                                 GNUNET_DISK_OPEN_CREATE,
1002                                 GNUNET_DISK_PERM_USER_READ |
1003                                 GNUNET_DISK_PERM_USER_WRITE |
1004                                 GNUNET_DISK_PERM_GROUP_READ |
1005                                 GNUNET_DISK_PERM_OTHER_READ);
1006     if (NULL == fh)
1007     {
1008       GNUNET_asprintf (&dc->emsg,
1009                        _("Download failed: could not open file `%s': %s"),
1010                        dc->filename, STRERROR (errno));
1011       goto signal_error;
1012     }
1013     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1014                 "Saving decrypted block to disk at offset %llu\n",
1015                 (unsigned long long) off);
1016     if ((off != GNUNET_DISK_file_seek (fh, off, GNUNET_DISK_SEEK_SET)))
1017     {
1018       GNUNET_asprintf (&dc->emsg,
1019                        _("Failed to seek to offset %llu in file `%s': %s"),
1020                        (unsigned long long) off, dc->filename,
1021                        STRERROR (errno));
1022       goto signal_error;
1023     }
1024     if (prc->size != GNUNET_DISK_file_write (fh, pt, prc->size))
1025     {
1026       GNUNET_asprintf (&dc->emsg,
1027                        _
1028                        ("Failed to write block of %u bytes at offset %llu in file `%s': %s"),
1029                        (unsigned int) prc->size, (unsigned long long) off,
1030                        dc->filename, STRERROR (errno));
1031       goto signal_error;
1032     }
1033     GNUNET_break (GNUNET_OK == GNUNET_DISK_file_close (fh));
1034     fh = NULL;
1035   }
1036
1037   if (0 == dr->depth)
1038   {
1039     /* DBLOCK, update progress and try recursion if applicable */
1040     app = prc->size;
1041     if (dr->offset < dc->offset)
1042     {
1043       /* starting offset begins in the middle of pt,
1044        * do not count first bytes as progress */
1045       GNUNET_assert (app > (dc->offset - dr->offset));
1046       app -= (dc->offset - dr->offset);
1047     }
1048     if (dr->offset + prc->size > dc->offset + dc->length)
1049     {
1050       /* end of block is after relevant range,
1051        * do not count last bytes as progress */
1052       GNUNET_assert (app >
1053                      (dr->offset + prc->size) - (dc->offset + dc->length));
1054       app -= (dr->offset + prc->size) - (dc->offset + dc->length);
1055     }
1056     dc->completed += app;
1057
1058     /* do recursive download if option is set and either meta data
1059      * says it is a directory or if no meta data is given AND filename
1060      * ends in '.gnd' (top-level case) */
1061     if (is_recursive_download (dc))
1062       GNUNET_FS_directory_list_contents (prc->size, pt, off,
1063                                          &trigger_recursive_download, dc);
1064   }
1065   GNUNET_assert (dc->completed <= dc->length);
1066   dr->state = BRS_DOWNLOAD_DOWN;
1067   pi.status = GNUNET_FS_STATUS_DOWNLOAD_PROGRESS;
1068   pi.value.download.specifics.progress.data = pt;
1069   pi.value.download.specifics.progress.offset = dr->offset;
1070   pi.value.download.specifics.progress.data_len = prc->size;
1071   pi.value.download.specifics.progress.depth = dr->depth;
1072   pi.value.download.specifics.progress.trust_offered = 0;
1073   if (prc->last_transmission.abs_value != GNUNET_TIME_UNIT_FOREVER_ABS.abs_value)
1074     pi.value.download.specifics.progress.block_download_duration 
1075       = GNUNET_TIME_absolute_get_duration (prc->last_transmission);
1076   else
1077     pi.value.download.specifics.progress.block_download_duration
1078       = GNUNET_TIME_UNIT_ZERO; /* found locally */
1079   GNUNET_FS_download_make_status_ (&pi, dc);
1080   if (0 == dr->depth)
1081     propagate_up (dr);
1082
1083   if (dc->completed == dc->length)
1084   {
1085     /* download completed, signal */
1086     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1087                 "Download completed, truncating file to desired length %llu\n",
1088                 (unsigned long long) GNUNET_ntohll (dc->uri->data.
1089                                                     chk.file_length));
1090     /* truncate file to size (since we store IBlocks at the end) */
1091     if (NULL != dc->filename)
1092     {
1093       if (0 !=
1094           truncate (dc->filename,
1095                     GNUNET_ntohll (dc->uri->data.chk.file_length)))
1096         GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING, "truncate",
1097                                   dc->filename);
1098     }
1099     GNUNET_assert (0 == dr->depth);
1100     check_completed (dc);
1101   }
1102   if (0 == dr->depth)
1103   {
1104     /* bottom of the tree, no child downloads possible, just sync */
1105     GNUNET_FS_download_sync_ (dc);
1106     return GNUNET_YES;
1107   }
1108
1109   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1110               "Triggering downloads of children (this block was at depth %u and offset %llu)\n",
1111               dr->depth, (unsigned long long) dr->offset);
1112   GNUNET_assert (0 == (prc->size % sizeof (struct ContentHashKey)));
1113   chkarr = (struct ContentHashKey *) pt;
1114   for (i = dr->num_children - 1; i >= 0; i--)
1115   {
1116     drc = dr->children[i];
1117     switch (drc->state)
1118     {
1119     case BRS_INIT:
1120       if ((drc->chk_idx + 1) * sizeof (struct ContentHashKey) > prc->size)
1121       {
1122         /* 'chkarr' does not have enough space for this chk_idx;
1123            internal error! */
1124         GNUNET_break (0);
1125         dc->emsg = GNUNET_strdup (_("internal error decoding tree"));
1126         goto signal_error;
1127       }
1128       drc->chk = chkarr[drc->chk_idx];
1129       drc->state = BRS_CHK_SET;
1130       if (GNUNET_YES == dc->issue_requests)
1131         schedule_block_download (dc, drc);
1132       break;
1133     case BRS_RECONSTRUCT_DOWN:
1134       GNUNET_assert (0);
1135       break;
1136     case BRS_RECONSTRUCT_META_UP:
1137       GNUNET_assert (0);
1138       break;
1139     case BRS_RECONSTRUCT_UP:
1140       GNUNET_assert (0);
1141       break;
1142     case BRS_CHK_SET:
1143       GNUNET_assert (0);
1144       break;
1145     case BRS_DOWNLOAD_DOWN:
1146       GNUNET_assert (0);
1147       break;
1148     case BRS_DOWNLOAD_UP:
1149       GNUNET_assert (0);
1150       break;
1151     case BRS_ERROR:
1152       GNUNET_assert (0);
1153       break;
1154     default:
1155       GNUNET_assert (0);
1156       break;
1157     }
1158   }
1159   GNUNET_FS_download_sync_ (dc);
1160   return GNUNET_YES;
1161
1162 signal_error:
1163   if (NULL != fh)
1164     GNUNET_DISK_file_close (fh);
1165   pi.status = GNUNET_FS_STATUS_DOWNLOAD_ERROR;
1166   pi.value.download.specifics.error.message = dc->emsg;
1167   GNUNET_FS_download_make_status_ (&pi, dc);
1168   /* abort all pending requests */
1169   if (NULL != dc->th)
1170   {
1171     GNUNET_CLIENT_notify_transmit_ready_cancel (dc->th);
1172     dc->th = NULL;
1173   }
1174   GNUNET_CLIENT_disconnect (dc->client);
1175   dc->in_receive = GNUNET_NO;
1176   dc->client = NULL;
1177   GNUNET_FS_free_download_request_ (dc->top_request);
1178   dc->top_request = NULL;
1179   GNUNET_CONTAINER_multihashmap_destroy (dc->active);
1180   dc->active = NULL;
1181   dc->pending_head = NULL;
1182   dc->pending_tail = NULL;
1183   GNUNET_FS_download_sync_ (dc);
1184   return GNUNET_NO;
1185 }
1186
1187
1188 /**
1189  * Process a download result.
1190  *
1191  * @param dc our download context
1192  * @param type type of the result
1193  * @param last_transmission when was this block requested the last time? (FOREVER if unknown/not applicable)
1194  * @param data the (encrypted) response
1195  * @param size size of data
1196  */
1197 static void
1198 process_result (struct GNUNET_FS_DownloadContext *dc,
1199                 enum GNUNET_BLOCK_Type type,
1200                 struct GNUNET_TIME_Absolute last_transmission,
1201                 const void *data, size_t size)
1202 {
1203   struct ProcessResultClosure prc;
1204
1205   prc.dc = dc;
1206   prc.data = data;
1207   prc.size = size;
1208   prc.type = type;
1209   prc.do_store = GNUNET_YES;
1210   prc.last_transmission = last_transmission;
1211   GNUNET_CRYPTO_hash (data, size, &prc.query);
1212   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1213               "Received result for query `%s' from `%s'-service\n",
1214               GNUNET_h2s (&prc.query), "FS");
1215   GNUNET_CONTAINER_multihashmap_get_multiple (dc->active, &prc.query,
1216                                               &process_result_with_request,
1217                                               &prc);
1218 }
1219
1220
1221 /**
1222  * Type of a function to call when we receive a message
1223  * from the service.
1224  *
1225  * @param cls closure
1226  * @param msg message received, NULL on timeout or fatal error
1227  */
1228 static void
1229 receive_results (void *cls, const struct GNUNET_MessageHeader *msg)
1230 {
1231   struct GNUNET_FS_DownloadContext *dc = cls;
1232   const struct ClientPutMessage *cm;
1233   uint16_t msize;
1234
1235   if ((NULL == msg) || (ntohs (msg->type) != GNUNET_MESSAGE_TYPE_FS_PUT) ||
1236       (sizeof (struct ClientPutMessage) > ntohs (msg->size)))
1237   {
1238     GNUNET_break (NULL == msg);
1239     try_reconnect (dc);
1240     return;
1241   }
1242   msize = ntohs (msg->size);
1243   cm = (const struct ClientPutMessage *) msg;
1244   process_result (dc, ntohl (cm->type),
1245                   GNUNET_TIME_absolute_ntoh (cm->last_transmission), &cm[1],
1246                   msize - sizeof (struct ClientPutMessage));
1247   if (NULL == dc->client)
1248     return;                     /* fatal error */
1249   /* continue receiving */
1250   GNUNET_CLIENT_receive (dc->client, &receive_results, dc,
1251                          GNUNET_TIME_UNIT_FOREVER_REL);
1252 }
1253
1254
1255 /**
1256  * We're ready to transmit a search request to the
1257  * file-sharing service.  Do it.  If there is
1258  * more than one request pending, try to send
1259  * multiple or request another transmission.
1260  *
1261  * @param cls closure
1262  * @param size number of bytes available in buf
1263  * @param buf where the callee should write the message
1264  * @return number of bytes written to buf
1265  */
1266 static size_t
1267 transmit_download_request (void *cls, size_t size, void *buf)
1268 {
1269   struct GNUNET_FS_DownloadContext *dc = cls;
1270   size_t msize;
1271   struct SearchMessage *sm;
1272   struct DownloadRequest *dr;
1273
1274   dc->th = NULL;
1275   if (NULL == buf)
1276   {
1277     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1278                 "Transmitting download request failed, trying to reconnect\n");
1279     try_reconnect (dc);
1280     return 0;
1281   }
1282   GNUNET_assert (size >= sizeof (struct SearchMessage));
1283   msize = 0;
1284   sm = buf;
1285   while ((NULL != (dr = dc->pending_head)) &&
1286          (size >= msize + sizeof (struct SearchMessage)))
1287   {
1288     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1289                 "Transmitting download request for `%s' to `%s'-service\n",
1290                 GNUNET_h2s (&dr->chk.query), "FS");
1291     memset (sm, 0, sizeof (struct SearchMessage));
1292     sm->header.size = htons (sizeof (struct SearchMessage));
1293     sm->header.type = htons (GNUNET_MESSAGE_TYPE_FS_START_SEARCH);
1294     if (0 != (dc->options & GNUNET_FS_DOWNLOAD_OPTION_LOOPBACK_ONLY))
1295       sm->options = htonl (GNUNET_FS_SEARCH_OPTION_LOOPBACK_ONLY);
1296     else
1297       sm->options = htonl (GNUNET_FS_SEARCH_OPTION_NONE);
1298     if (0 == dr->depth)
1299       sm->type = htonl (GNUNET_BLOCK_TYPE_FS_DBLOCK);
1300     else
1301       sm->type = htonl (GNUNET_BLOCK_TYPE_FS_IBLOCK);
1302     sm->anonymity_level = htonl (dc->anonymity);
1303     sm->target = dc->target.hashPubKey;
1304     sm->query = dr->chk.query;
1305     GNUNET_CONTAINER_DLL_remove (dc->pending_head, dc->pending_tail, dr);
1306     dr->is_pending = GNUNET_NO;
1307     msize += sizeof (struct SearchMessage);
1308     sm++;
1309   }
1310   if (NULL != dc->pending_head)
1311   {
1312     dc->th =
1313         GNUNET_CLIENT_notify_transmit_ready (dc->client,
1314                                              sizeof (struct SearchMessage),
1315                                              GNUNET_CONSTANTS_SERVICE_TIMEOUT,
1316                                              GNUNET_NO,
1317                                              &transmit_download_request, dc);
1318     GNUNET_assert (NULL != dc->th);
1319   }
1320   if (GNUNET_NO == dc->in_receive)
1321   {
1322     dc->in_receive = GNUNET_YES;
1323     GNUNET_CLIENT_receive (dc->client, &receive_results, dc,
1324                            GNUNET_TIME_UNIT_FOREVER_REL);
1325   }
1326   return msize;
1327 }
1328
1329
1330 /**
1331  * Reconnect to the FS service and transmit our queries NOW.
1332  *
1333  * @param cls our download context
1334  * @param tc unused
1335  */
1336 static void
1337 do_reconnect (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
1338 {
1339   struct GNUNET_FS_DownloadContext *dc = cls;
1340   struct GNUNET_CLIENT_Connection *client;
1341
1342   dc->task = GNUNET_SCHEDULER_NO_TASK;
1343   client = GNUNET_CLIENT_connect ("fs", dc->h->cfg);
1344   if (NULL == client)
1345   {
1346     GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
1347                 "Connecting to `%s'-service failed, will try again.\n", "FS");
1348     try_reconnect (dc);
1349     return;
1350   }
1351   dc->client = client;
1352   if (NULL != dc->pending_head)
1353   {
1354     dc->th =
1355         GNUNET_CLIENT_notify_transmit_ready (client,
1356                                              sizeof (struct SearchMessage),
1357                                              GNUNET_CONSTANTS_SERVICE_TIMEOUT,
1358                                              GNUNET_NO,
1359                                              &transmit_download_request, dc);
1360     GNUNET_assert (NULL != dc->th);
1361   }
1362 }
1363
1364
1365 /**
1366  * Add entries to the pending list.
1367  *
1368  * @param cls our download context
1369  * @param key unused
1370  * @param entry entry of type "struct DownloadRequest"
1371  * @return GNUNET_OK
1372  */
1373 static int
1374 retry_entry (void *cls, const GNUNET_HashCode * key, void *entry)
1375 {
1376   struct GNUNET_FS_DownloadContext *dc = cls;
1377   struct DownloadRequest *dr = entry;
1378
1379   dr->next = NULL;
1380   dr->prev = NULL;
1381   GNUNET_CONTAINER_DLL_insert (dc->pending_head, dc->pending_tail, dr);
1382   dr->is_pending = GNUNET_YES;
1383   return GNUNET_OK;
1384 }
1385
1386
1387 /**
1388  * We've lost our connection with the FS service.
1389  * Re-establish it and re-transmit all of our
1390  * pending requests.
1391  *
1392  * @param dc download context that is having trouble
1393  */
1394 static void
1395 try_reconnect (struct GNUNET_FS_DownloadContext *dc)
1396 {
1397
1398   if (NULL != dc->client)
1399   {
1400     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1401                 "Moving all requests back to pending list\n");
1402     if (NULL != dc->th)
1403     {
1404       GNUNET_CLIENT_notify_transmit_ready_cancel (dc->th);
1405       dc->th = NULL;
1406     }
1407     /* full reset of the pending list */
1408     dc->pending_head = NULL;
1409     dc->pending_tail = NULL;
1410     GNUNET_CONTAINER_multihashmap_iterate (dc->active, &retry_entry, dc);
1411     GNUNET_CLIENT_disconnect (dc->client);
1412     dc->in_receive = GNUNET_NO;
1413     dc->client = NULL;
1414   }
1415   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Will try to reconnect in 1s\n");
1416   dc->task =
1417       GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_SECONDS, &do_reconnect,
1418                                     dc);
1419 }
1420
1421
1422 /**
1423  * We're allowed to ask the FS service for our blocks.  Start the download.
1424  *
1425  * @param cls the 'struct GNUNET_FS_DownloadContext'
1426  * @param client handle to use for communcation with FS (we must destroy it!)
1427  */
1428 static void
1429 activate_fs_download (void *cls, struct GNUNET_CLIENT_Connection *client)
1430 {
1431   struct GNUNET_FS_DownloadContext *dc = cls;
1432   struct GNUNET_FS_ProgressInfo pi;
1433
1434   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Download activated\n");
1435   GNUNET_assert (NULL != client);
1436   GNUNET_assert (NULL == dc->client);
1437   GNUNET_assert (NULL == dc->th);
1438   dc->client = client;
1439   pi.status = GNUNET_FS_STATUS_DOWNLOAD_ACTIVE;
1440   GNUNET_FS_download_make_status_ (&pi, dc);
1441   dc->pending_head = NULL;
1442   dc->pending_tail = NULL;
1443   GNUNET_CONTAINER_multihashmap_iterate (dc->active, &retry_entry, dc);
1444   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1445               "Asking for transmission to FS service\n");
1446   if (NULL != dc->pending_head)
1447   {
1448     dc->th =
1449         GNUNET_CLIENT_notify_transmit_ready (dc->client,
1450                                              sizeof (struct SearchMessage),
1451                                              GNUNET_CONSTANTS_SERVICE_TIMEOUT,
1452                                              GNUNET_NO,
1453                                              &transmit_download_request, dc);
1454     GNUNET_assert (NULL != dc->th);
1455   }
1456 }
1457
1458
1459 /**
1460  * We must stop to ask the FS service for our blocks.  Pause the download.
1461  *
1462  * @param cls the 'struct GNUNET_FS_DownloadContext'
1463  */
1464 static void
1465 deactivate_fs_download (void *cls)
1466 {
1467   struct GNUNET_FS_DownloadContext *dc = cls;
1468   struct GNUNET_FS_ProgressInfo pi;
1469
1470   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Download deactivated\n");
1471   if (NULL != dc->th)
1472   {
1473     GNUNET_CLIENT_notify_transmit_ready_cancel (dc->th);
1474     dc->th = NULL;
1475   }
1476   if (NULL != dc->client)
1477   {
1478     GNUNET_CLIENT_disconnect (dc->client);
1479     dc->in_receive = GNUNET_NO;
1480     dc->client = NULL;
1481   }
1482   dc->pending_head = NULL;
1483   dc->pending_tail = NULL;
1484   pi.status = GNUNET_FS_STATUS_DOWNLOAD_INACTIVE;
1485   GNUNET_FS_download_make_status_ (&pi, dc);
1486 }
1487
1488
1489 /**
1490  * (recursively) Create a download request structure.
1491  *
1492  * @param parent parent of the current entry
1493  * @param chk_idx index of the chk for this block in the parent block
1494  * @param depth depth of the current entry, 0 are the DBLOCKs,
1495  *              top level block is 'dc->treedepth - 1'
1496  * @param dr_offset offset in the original file this block maps to
1497  *              (as in, offset of the first byte of the first DBLOCK
1498  *               in the subtree rooted in the returned download request tree)
1499  * @param file_start_offset desired starting offset for the download
1500  *             in the original file; requesting tree should not contain
1501  *             DBLOCKs prior to the file_start_offset
1502  * @param desired_length desired number of bytes the user wanted to access
1503  *        (from file_start_offset).  Resulting tree should not contain
1504  *        DBLOCKs after file_start_offset + file_length.
1505  * @return download request tree for the given range of DBLOCKs at
1506  *         the specified depth
1507  */
1508 static struct DownloadRequest *
1509 create_download_request (struct DownloadRequest *parent, 
1510                          unsigned int chk_idx,
1511                          unsigned int depth,
1512                          uint64_t dr_offset, uint64_t file_start_offset,
1513                          uint64_t desired_length)
1514 {
1515   struct DownloadRequest *dr;
1516   unsigned int i;
1517   unsigned int head_skip;
1518   uint64_t child_block_size;
1519
1520   dr = GNUNET_malloc (sizeof (struct DownloadRequest));
1521   dr->parent = parent;
1522   dr->depth = depth;
1523   dr->offset = dr_offset;
1524   dr->chk_idx = chk_idx;
1525   if (0 == depth)
1526     return dr;
1527   child_block_size = GNUNET_FS_tree_compute_tree_size (depth - 1);
1528   
1529   /* calculate how many blocks at this level are not interesting
1530    * from the start (rounded down), either because of the requested
1531    * file offset or because this IBlock is further along */
1532   if (dr_offset < file_start_offset)
1533     head_skip = file_start_offset / child_block_size;
1534   else
1535     head_skip = 0;
1536   
1537   /* calculate index of last block at this level that is interesting (rounded up) */
1538   dr->num_children = (file_start_offset + desired_length - dr_offset) / child_block_size;
1539   if (dr->num_children * child_block_size <
1540       file_start_offset + desired_length - dr_offset)
1541     dr->num_children++;       /* round up */
1542   dr->num_children -= head_skip;
1543   if (dr->num_children > CHK_PER_INODE)
1544     dr->num_children = CHK_PER_INODE; /* cap at max */
1545   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1546               "Block at offset %llu and depth %u has %u children\n",
1547               (unsigned long long) dr_offset,
1548               depth,
1549               dr->num_children);
1550   
1551   /* now we can get the total number of *interesting* children for this block */
1552
1553   /* why else would we have gotten here to begin with? (that'd be a bad logic error) */
1554   GNUNET_assert (dr->num_children > 0);
1555   
1556   dr->children =
1557     GNUNET_malloc (dr->num_children * sizeof (struct DownloadRequest *));
1558   for (i = 0; i < dr->num_children; i++)
1559     dr->children[i] =
1560       create_download_request (dr, i + head_skip, depth - 1,
1561                                dr_offset + (i + head_skip) * child_block_size,
1562                                file_start_offset, desired_length);
1563   return dr;
1564 }
1565
1566
1567 /**
1568  * Continuation after a possible attempt to reconstruct
1569  * the current IBlock from the existing file.
1570  *
1571  * @param cls the 'struct ReconstructContext'
1572  * @param tc scheduler context
1573  */
1574 static void
1575 reconstruct_cont (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
1576 {
1577   struct GNUNET_FS_DownloadContext *dc = cls;
1578
1579   /* clean up state from tree encoder */  
1580   if (dc->task != GNUNET_SCHEDULER_NO_TASK)
1581   {
1582     GNUNET_SCHEDULER_cancel (dc->task);
1583     dc->task = GNUNET_SCHEDULER_NO_TASK;
1584   }
1585   if (NULL != dc->rfh)
1586   {
1587     GNUNET_break (GNUNET_OK == GNUNET_DISK_file_close (dc->rfh));
1588     dc->rfh = NULL;
1589   }
1590   /* start "normal" download */
1591   dc->issue_requests = GNUNET_YES;
1592   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1593               "Starting normal download\n");
1594   schedule_block_download (dc, dc->top_request);
1595 }
1596
1597
1598 /**
1599  * Task requesting the next block from the tree encoder.
1600  *
1601  * @param cls the 'struct GNUJNET_FS_DownloadContext' we're processing
1602  * @param tc task context
1603  */
1604 static void
1605 get_next_block (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
1606 {
1607   struct GNUNET_FS_DownloadContext *dc = cls;
1608
1609   dc->task = GNUNET_SCHEDULER_NO_TASK;
1610   GNUNET_FS_tree_encoder_next (dc->te);
1611 }
1612
1613
1614 /**
1615  * Function called asking for the current (encoded)
1616  * block to be processed.  After processing the
1617  * client should either call "GNUNET_FS_tree_encode_next"
1618  * or (on error) "GNUNET_FS_tree_encode_finish".
1619  *
1620  * This function checks if the content on disk matches
1621  * the expected content based on the URI.
1622  *
1623  * @param cls closure
1624  * @param chk content hash key for the block
1625  * @param offset offset of the block
1626  * @param depth depth of the block, 0 for DBLOCK
1627  * @param type type of the block (IBLOCK or DBLOCK)
1628  * @param block the (encrypted) block
1629  * @param block_size size of block (in bytes)
1630  */
1631 static void
1632 reconstruct_cb (void *cls, const struct ContentHashKey *chk, uint64_t offset,
1633                 unsigned int depth, enum GNUNET_BLOCK_Type type,
1634                 const void *block, uint16_t block_size)
1635 {
1636   struct GNUNET_FS_DownloadContext *dc = cls;
1637   struct GNUNET_FS_ProgressInfo pi;
1638   struct DownloadRequest *dr;
1639   uint64_t blen;
1640   unsigned int chld;
1641
1642   /* find corresponding request entry */
1643   dr = dc->top_request;
1644   while (dr->depth > depth)
1645   {
1646     GNUNET_assert (dr->num_children > 0);
1647     blen = GNUNET_FS_tree_compute_tree_size (dr->depth - 1);
1648     chld = (offset - dr->offset) / blen;
1649     if (chld < dr->children[0]->chk_idx)
1650     {
1651       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1652                   "Block %u < %u irrelevant for our range\n",
1653                   chld,
1654                   dr->children[0]->chk_idx);
1655       dc->task = GNUNET_SCHEDULER_add_now (&get_next_block, dc);
1656       return; /* irrelevant block */
1657     }
1658     if (chld > dr->children[dr->num_children-1]->chk_idx)
1659     {
1660       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1661                   "Block %u > %u irrelevant for our range\n",
1662                   chld,
1663                   dr->children[dr->num_children-1]->chk_idx);
1664       dc->task = GNUNET_SCHEDULER_add_now (&get_next_block, dc);
1665       return; /* irrelevant block */
1666     }
1667     dr = dr->children[chld - dr->children[0]->chk_idx];
1668   }
1669   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1670               "Matched TE block with request at offset %llu and depth %u in state %d\n",
1671               (unsigned long long) dr->offset,
1672               dr->depth,
1673               dr->state);
1674   /* FIXME: this code needs more testing and might
1675      need to handle more states... */
1676   switch (dr->state)
1677   {
1678   case BRS_INIT:
1679     break;
1680   case BRS_RECONSTRUCT_DOWN:
1681     break;
1682   case BRS_RECONSTRUCT_META_UP:
1683     break;
1684   case BRS_RECONSTRUCT_UP:
1685     break;
1686   case BRS_CHK_SET:
1687     if (0 == memcmp (chk, &dr->chk, sizeof (struct ContentHashKey)))
1688     {
1689       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1690                   "Reconstruction succeeded, can use block at offset %llu, depth %u\n",
1691                   (unsigned long long) offset,
1692                   depth);
1693       /* block matches, hence tree below matches;
1694        * this request is done! */
1695       dr->state = BRS_DOWNLOAD_UP;
1696       (void) GNUNET_CONTAINER_multihashmap_remove (dc->active, &dr->chk.query, dr);
1697       if (GNUNET_YES == dr->is_pending)
1698       {
1699         GNUNET_break (0); /* how did we get here? */
1700         GNUNET_CONTAINER_DLL_remove (dc->pending_head, dc->pending_tail, dr);
1701         dr->is_pending = GNUNET_NO;
1702       }
1703       /* calculate how many bytes of payload this block
1704        * corresponds to */
1705       blen = GNUNET_FS_tree_compute_tree_size (dr->depth);
1706       /* how many of those bytes are in the requested range? */
1707       blen = GNUNET_MIN (blen, dc->length + dc->offset - dr->offset);
1708       /* signal progress */
1709       dc->completed += blen;
1710       pi.status = GNUNET_FS_STATUS_DOWNLOAD_PROGRESS;
1711       pi.value.download.specifics.progress.data = NULL;
1712       pi.value.download.specifics.progress.offset = offset;
1713       pi.value.download.specifics.progress.data_len = 0;
1714       pi.value.download.specifics.progress.depth = 0;
1715       pi.value.download.specifics.progress.trust_offered = 0;
1716       pi.value.download.specifics.progress.block_download_duration = GNUNET_TIME_UNIT_ZERO;
1717       GNUNET_FS_download_make_status_ (&pi, dc);
1718       /* FIXME: duplicated code from 'process_result_with_request - refactor */
1719       if (dc->completed == dc->length)
1720       {
1721         /* download completed, signal */
1722         GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1723                     "Download completed, truncating file to desired length %llu\n",
1724                     (unsigned long long) GNUNET_ntohll (dc->uri->data.
1725                                                         chk.file_length));
1726         /* truncate file to size (since we store IBlocks at the end) */
1727         if (NULL != dc->filename)
1728         {
1729           if (0 !=
1730               truncate (dc->filename,
1731                         GNUNET_ntohll (dc->uri->data.chk.file_length)))
1732             GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING, "truncate",
1733                                       dc->filename);
1734         }
1735       }
1736     }
1737     else
1738       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1739                   "Reconstruction failed, need to download block at offset %llu, depth %u\n",
1740                   (unsigned long long) offset,
1741                   depth);
1742     break;
1743   case BRS_DOWNLOAD_DOWN:
1744     break;
1745   case BRS_DOWNLOAD_UP:
1746     break;
1747   case BRS_ERROR:
1748     break;
1749   default:
1750     GNUNET_assert (0);
1751     break;
1752   }
1753   dc->task = GNUNET_SCHEDULER_add_now (&get_next_block, dc);
1754   if ((dr == dc->top_request) && (dr->state == BRS_DOWNLOAD_UP))
1755     check_completed (dc);
1756 }
1757
1758
1759 /**
1760  * Function called by the tree encoder to obtain a block of plaintext
1761  * data (for the lowest level of the tree).
1762  *
1763  * @param cls our 'struct ReconstructContext'
1764  * @param offset identifies which block to get
1765  * @param max (maximum) number of bytes to get; returning
1766  *        fewer will also cause errors
1767  * @param buf where to copy the plaintext buffer
1768  * @param emsg location to store an error message (on error)
1769  * @return number of bytes copied to buf, 0 on error
1770  */
1771 static size_t
1772 fh_reader (void *cls, uint64_t offset, size_t max, void *buf, char **emsg)
1773 {
1774   struct GNUNET_FS_DownloadContext *dc = cls;
1775   struct GNUNET_DISK_FileHandle *fh = dc->rfh;
1776   ssize_t ret;
1777
1778   if (NULL != emsg)
1779     *emsg = NULL;
1780   if (offset != GNUNET_DISK_file_seek (fh, offset, GNUNET_DISK_SEEK_SET))
1781   {
1782     if (NULL != emsg)
1783       *emsg = GNUNET_strdup (strerror (errno));
1784     return 0;
1785   }
1786   ret = GNUNET_DISK_file_read (fh, buf, max);
1787   if (ret < 0)
1788   {
1789     if (NULL != emsg)
1790       *emsg = GNUNET_strdup (strerror (errno));
1791     return 0;
1792   }
1793   return ret;
1794 }
1795
1796
1797 /**
1798  * Task that creates the initial (top-level) download
1799  * request for the file.
1800  *
1801  * @param cls the 'struct GNUNET_FS_DownloadContext'
1802  * @param tc scheduler context
1803  */
1804 void
1805 GNUNET_FS_download_start_task_ (void *cls,
1806                                 const struct GNUNET_SCHEDULER_TaskContext *tc)
1807 {
1808   struct GNUNET_FS_DownloadContext *dc = cls;
1809   struct GNUNET_FS_ProgressInfo pi;
1810   struct GNUNET_DISK_FileHandle *fh;
1811
1812   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Start task running...\n");
1813   dc->task = GNUNET_SCHEDULER_NO_TASK;
1814   if (0 == dc->length)
1815   {
1816     /* no bytes required! */
1817     if (NULL != dc->filename)
1818     {
1819       fh = GNUNET_DISK_file_open (dc->filename,
1820                                   GNUNET_DISK_OPEN_READWRITE |
1821                                   GNUNET_DISK_OPEN_CREATE |
1822                                   ((0 ==
1823                                     GNUNET_FS_uri_chk_get_file_size (dc->uri)) ?
1824                                    GNUNET_DISK_OPEN_TRUNCATE : 0),
1825                                   GNUNET_DISK_PERM_USER_READ |
1826                                   GNUNET_DISK_PERM_USER_WRITE |
1827                                   GNUNET_DISK_PERM_GROUP_READ |
1828                                   GNUNET_DISK_PERM_OTHER_READ);
1829       GNUNET_DISK_file_close (fh);
1830     }
1831     GNUNET_FS_download_sync_ (dc);
1832     pi.status = GNUNET_FS_STATUS_DOWNLOAD_START;
1833     pi.value.download.specifics.start.meta = dc->meta;
1834     GNUNET_FS_download_make_status_ (&pi, dc);
1835     check_completed (dc);
1836     return;
1837   }
1838   if (NULL != dc->emsg)
1839     return;
1840   if (NULL == dc->top_request)
1841   {
1842     dc->top_request =
1843       create_download_request (NULL, 0, dc->treedepth - 1, 0, dc->offset,
1844                                dc->length);
1845     dc->top_request->state = BRS_CHK_SET;
1846     dc->top_request->chk =
1847         (dc->uri->type ==
1848          chk) ? dc->uri->data.chk.chk : dc->uri->data.loc.fi.chk;
1849     /* signal start */
1850     GNUNET_FS_download_sync_ (dc);
1851     if (NULL != dc->search)
1852       GNUNET_FS_search_result_sync_ (dc->search);
1853     pi.status = GNUNET_FS_STATUS_DOWNLOAD_START;
1854     pi.value.download.specifics.start.meta = dc->meta;
1855     GNUNET_FS_download_make_status_ (&pi, dc);
1856   }
1857   GNUNET_FS_download_start_downloading_ (dc);
1858   /* attempt reconstruction from disk */
1859   if (GNUNET_YES == GNUNET_DISK_file_test (dc->filename))
1860     dc->rfh =
1861         GNUNET_DISK_file_open (dc->filename, GNUNET_DISK_OPEN_READ,
1862                                GNUNET_DISK_PERM_NONE);
1863   if (dc->top_request->state == BRS_CHK_SET)
1864   {
1865     if (NULL != dc->rfh)
1866     {
1867       /* first, try top-down */
1868       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1869                   "Trying top-down reconstruction for `%s'\n", dc->filename);
1870       try_top_down_reconstruction (dc, dc->top_request);
1871       switch (dc->top_request->state)
1872       {
1873       case BRS_CHK_SET:
1874         break;                  /* normal */
1875       case BRS_DOWNLOAD_DOWN:
1876         break;                  /* normal, some blocks already down */
1877       case BRS_DOWNLOAD_UP:
1878         /* already done entirely, party! */
1879         if (NULL != dc->rfh)
1880         {
1881           /* avoid hanging on to file handle longer than
1882            * necessary */
1883           GNUNET_DISK_file_close (dc->rfh);
1884           dc->rfh = NULL;
1885         }
1886         return;
1887       case BRS_ERROR:
1888         GNUNET_asprintf (&dc->emsg, _("Invalid URI"));
1889         GNUNET_FS_download_sync_ (dc);
1890         pi.status = GNUNET_FS_STATUS_DOWNLOAD_ERROR;
1891         pi.value.download.specifics.error.message = dc->emsg;
1892         GNUNET_FS_download_make_status_ (&pi, dc);
1893         return;
1894       default:
1895         GNUNET_assert (0);
1896         break;
1897       }
1898     }
1899   }
1900   /* attempt reconstruction from meta data */
1901   if ((GNUNET_FS_uri_chk_get_file_size (dc->uri) <= MAX_INLINE_SIZE) &&
1902       (NULL != dc->meta))
1903   {
1904     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1905                 "Trying to find embedded meta data for download of size %llu with %u bytes MD\n",
1906                 (unsigned long long) GNUNET_FS_uri_chk_get_file_size (dc->uri),
1907                 (unsigned int)
1908                 GNUNET_CONTAINER_meta_data_get_serialized_size (dc->meta));
1909     GNUNET_CONTAINER_meta_data_iterate (dc->meta, &match_full_data, dc);
1910     if (BRS_DOWNLOAD_UP == dc->top_request->state)
1911     {
1912       if (NULL != dc->rfh)
1913       {
1914         /* avoid hanging on to file handle longer than
1915          * necessary */
1916         GNUNET_DISK_file_close (dc->rfh);
1917         dc->rfh = NULL;
1918       }
1919       return;                   /* finished, status update was already done for us */
1920     }
1921   }
1922   if (NULL != dc->rfh)
1923   {
1924     /* finally, actually run bottom-up */
1925     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1926                 "Trying bottom-up reconstruction of file `%s'\n", dc->filename);
1927     dc->te =
1928       GNUNET_FS_tree_encoder_create (dc->h, 
1929                                      GNUNET_FS_uri_chk_get_file_size (dc->uri),
1930                                      dc, &fh_reader,
1931                                      &reconstruct_cb, NULL,
1932                                      &reconstruct_cont);
1933     dc->task = GNUNET_SCHEDULER_add_now (&get_next_block, dc);
1934   }
1935   else
1936   {
1937     /* simple, top-level download */
1938     dc->issue_requests = GNUNET_YES;
1939     schedule_block_download (dc, dc->top_request);
1940   }
1941   if (BRS_DOWNLOAD_UP == dc->top_request->state)
1942     check_completed (dc);
1943 }
1944
1945
1946 /**
1947  * Create SUSPEND event for the given download operation
1948  * and then clean up our state (without stop signal).
1949  *
1950  * @param cls the 'struct GNUNET_FS_DownloadContext' to signal for
1951  */
1952 void
1953 GNUNET_FS_download_signal_suspend_ (void *cls)
1954 {
1955   struct GNUNET_FS_DownloadContext *dc = cls;
1956   struct GNUNET_FS_ProgressInfo pi;
1957
1958   if (NULL != dc->top)
1959     GNUNET_FS_end_top (dc->h, dc->top);
1960   while (NULL != dc->child_head)
1961     GNUNET_FS_download_signal_suspend_ (dc->child_head);
1962   if (NULL != dc->search)
1963   {
1964     dc->search->download = NULL;
1965     dc->search = NULL;
1966   }
1967   if (NULL != dc->job_queue)
1968   {
1969     GNUNET_FS_dequeue_ (dc->job_queue);
1970     dc->job_queue = NULL;
1971   }
1972   if (NULL != dc->parent)
1973     GNUNET_CONTAINER_DLL_remove (dc->parent->child_head, dc->parent->child_tail,
1974                                  dc);
1975   if (GNUNET_SCHEDULER_NO_TASK != dc->task)
1976   {
1977     GNUNET_SCHEDULER_cancel (dc->task);
1978     dc->task = GNUNET_SCHEDULER_NO_TASK;
1979   }
1980   pi.status = GNUNET_FS_STATUS_DOWNLOAD_SUSPEND;
1981   GNUNET_FS_download_make_status_ (&pi, dc);
1982   if (NULL != dc->te)
1983   {
1984     GNUNET_FS_tree_encoder_finish (dc->te, NULL, NULL);
1985     dc->te = NULL;
1986   }
1987   if (NULL != dc->rfh)
1988   {
1989     GNUNET_DISK_file_close (dc->rfh);
1990     dc->rfh = NULL;
1991   }
1992   GNUNET_FS_free_download_request_ (dc->top_request);
1993   if (NULL != dc->active)
1994   {
1995     GNUNET_CONTAINER_multihashmap_destroy (dc->active);
1996     dc->active = NULL;
1997   }
1998   GNUNET_free_non_null (dc->filename);
1999   GNUNET_CONTAINER_meta_data_destroy (dc->meta);
2000   GNUNET_FS_uri_destroy (dc->uri);
2001   GNUNET_free_non_null (dc->temp_filename);
2002   GNUNET_free_non_null (dc->serialization);
2003   GNUNET_free (dc);
2004 }
2005
2006
2007 /**
2008  * Helper function to setup the download context.
2009  *
2010  * @param h handle to the file sharing subsystem
2011  * @param uri the URI of the file (determines what to download); CHK or LOC URI
2012  * @param meta known metadata for the file (can be NULL)
2013  * @param filename where to store the file, maybe NULL (then no file is
2014  *        created on disk and data must be grabbed from the callbacks)
2015  * @param tempname where to store temporary file data, not used if filename is non-NULL;
2016  *        can be NULL (in which case we will pick a name if needed); the temporary file
2017  *        may already exist, in which case we will try to use the data that is there and
2018  *        if it is not what is desired, will overwrite it
2019  * @param offset at what offset should we start the download (typically 0)
2020  * @param length how many bytes should be downloaded starting at offset
2021  * @param anonymity anonymity level to use for the download
2022  * @param options various options
2023  * @param cctx initial value for the client context for this download
2024  * @return context that can be used to control this download
2025  */
2026 struct GNUNET_FS_DownloadContext *
2027 create_download_context (struct GNUNET_FS_Handle *h,
2028                          const struct GNUNET_FS_Uri *uri,
2029                          const struct GNUNET_CONTAINER_MetaData *meta,
2030                          const char *filename, const char *tempname,
2031                          uint64_t offset, uint64_t length, uint32_t anonymity,
2032                          enum GNUNET_FS_DownloadOptions options, void *cctx)
2033 {
2034   struct GNUNET_FS_DownloadContext *dc;
2035
2036   GNUNET_assert (GNUNET_FS_uri_test_chk (uri) || GNUNET_FS_uri_test_loc (uri));
2037   if ((offset + length < offset) ||
2038       (offset + length > GNUNET_FS_uri_chk_get_file_size (uri)))
2039   {
2040     GNUNET_break (0);
2041     return NULL;
2042   }
2043   dc = GNUNET_malloc (sizeof (struct GNUNET_FS_DownloadContext));
2044   dc->h = h;
2045   dc->uri = GNUNET_FS_uri_dup (uri);
2046   dc->meta = GNUNET_CONTAINER_meta_data_duplicate (meta);
2047   dc->client_info = cctx;
2048   dc->start_time = GNUNET_TIME_absolute_get ();
2049   if (NULL != filename)
2050   {
2051     dc->filename = GNUNET_strdup (filename);
2052     if (GNUNET_YES == GNUNET_DISK_file_test (filename))
2053       GNUNET_break (GNUNET_OK == GNUNET_DISK_file_size (filename, &dc->old_file_size, GNUNET_YES, GNUNET_YES));
2054   }
2055   if (GNUNET_FS_uri_test_loc (dc->uri))
2056     GNUNET_assert (GNUNET_OK ==
2057                    GNUNET_FS_uri_loc_get_peer_identity (dc->uri, &dc->target));
2058   dc->offset = offset;
2059   dc->length = length;
2060   dc->anonymity = anonymity;
2061   dc->options = options;
2062   dc->active =
2063       GNUNET_CONTAINER_multihashmap_create (1 + 2 * (length / DBLOCK_SIZE));
2064   dc->treedepth =
2065       GNUNET_FS_compute_depth (GNUNET_FS_uri_chk_get_file_size (dc->uri));
2066   if ((NULL == filename) && (is_recursive_download (dc)))
2067   {
2068     if (NULL != tempname)
2069       dc->temp_filename = GNUNET_strdup (tempname);
2070     else
2071       dc->temp_filename = GNUNET_DISK_mktemp ("gnunet-directory-download-tmp");
2072   }
2073   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, 
2074               "Starting download `%s' of %llu bytes with tree depth %u\n",
2075               filename,
2076               (unsigned long long) length,
2077               dc->treedepth);
2078   dc->task = GNUNET_SCHEDULER_add_now (&GNUNET_FS_download_start_task_, dc);
2079   return dc;
2080 }
2081
2082
2083 /**
2084  * Download parts of a file.  Note that this will store
2085  * the blocks at the respective offset in the given file.  Also, the
2086  * download is still using the blocking of the underlying FS
2087  * encoding.  As a result, the download may *write* outside of the
2088  * given boundaries (if offset and length do not match the 32k FS
2089  * block boundaries). <p>
2090  *
2091  * This function should be used to focus a download towards a
2092  * particular portion of the file (optimization), not to strictly
2093  * limit the download to exactly those bytes.
2094  *
2095  * @param h handle to the file sharing subsystem
2096  * @param uri the URI of the file (determines what to download); CHK or LOC URI
2097  * @param meta known metadata for the file (can be NULL)
2098  * @param filename where to store the file, maybe NULL (then no file is
2099  *        created on disk and data must be grabbed from the callbacks)
2100  * @param tempname where to store temporary file data, not used if filename is non-NULL;
2101  *        can be NULL (in which case we will pick a name if needed); the temporary file
2102  *        may already exist, in which case we will try to use the data that is there and
2103  *        if it is not what is desired, will overwrite it
2104  * @param offset at what offset should we start the download (typically 0)
2105  * @param length how many bytes should be downloaded starting at offset
2106  * @param anonymity anonymity level to use for the download
2107  * @param options various options
2108  * @param cctx initial value for the client context for this download
2109  * @param parent parent download to associate this download with (use NULL
2110  *        for top-level downloads; useful for manually-triggered recursive downloads)
2111  * @return context that can be used to control this download
2112  */
2113 struct GNUNET_FS_DownloadContext *
2114 GNUNET_FS_download_start (struct GNUNET_FS_Handle *h,
2115                           const struct GNUNET_FS_Uri *uri,
2116                           const struct GNUNET_CONTAINER_MetaData *meta,
2117                           const char *filename, const char *tempname,
2118                           uint64_t offset, uint64_t length, uint32_t anonymity,
2119                           enum GNUNET_FS_DownloadOptions options, void *cctx,
2120                           struct GNUNET_FS_DownloadContext *parent)
2121 {
2122   struct GNUNET_FS_DownloadContext *dc;
2123
2124   dc = create_download_context (h, uri, meta, filename, tempname,
2125                                 offset, length, anonymity, options, cctx);
2126   if (NULL == dc)
2127     return NULL;
2128   dc->parent = parent;
2129   if (NULL != parent)
2130     GNUNET_CONTAINER_DLL_insert (parent->child_head, parent->child_tail, dc);
2131   else
2132     dc->top =
2133         GNUNET_FS_make_top (dc->h, &GNUNET_FS_download_signal_suspend_, dc);
2134   return dc;
2135 }
2136
2137
2138 /**
2139  * Download parts of a file based on a search result.  The download
2140  * will be associated with the search result (and the association
2141  * will be preserved when serializing/deserializing the state).
2142  * If the search is stopped, the download will not be aborted but
2143  * be 'promoted' to a stand-alone download.
2144  *
2145  * As with the other download function, this will store
2146  * the blocks at the respective offset in the given file.  Also, the
2147  * download is still using the blocking of the underlying FS
2148  * encoding.  As a result, the download may *write* outside of the
2149  * given boundaries (if offset and length do not match the 32k FS
2150  * block boundaries). <p>
2151  *
2152  * The given range can be used to focus a download towards a
2153  * particular portion of the file (optimization), not to strictly
2154  * limit the download to exactly those bytes.
2155  *
2156  * @param h handle to the file sharing subsystem
2157  * @param sr the search result to use for the download (determines uri and
2158  *        meta data and associations)
2159  * @param filename where to store the file, maybe NULL (then no file is
2160  *        created on disk and data must be grabbed from the callbacks)
2161  * @param tempname where to store temporary file data, not used if filename is non-NULL;
2162  *        can be NULL (in which case we will pick a name if needed); the temporary file
2163  *        may already exist, in which case we will try to use the data that is there and
2164  *        if it is not what is desired, will overwrite it
2165  * @param offset at what offset should we start the download (typically 0)
2166  * @param length how many bytes should be downloaded starting at offset
2167  * @param anonymity anonymity level to use for the download
2168  * @param options various download options
2169  * @param cctx initial value for the client context for this download
2170  * @return context that can be used to control this download
2171  */
2172 struct GNUNET_FS_DownloadContext *
2173 GNUNET_FS_download_start_from_search (struct GNUNET_FS_Handle *h,
2174                                       struct GNUNET_FS_SearchResult *sr,
2175                                       const char *filename,
2176                                       const char *tempname, uint64_t offset,
2177                                       uint64_t length, uint32_t anonymity,
2178                                       enum GNUNET_FS_DownloadOptions options,
2179                                       void *cctx)
2180 {
2181   struct GNUNET_FS_DownloadContext *dc;
2182
2183   if ((NULL == sr) || (NULL != sr->download))
2184   {
2185     GNUNET_break (0);
2186     return NULL;
2187   }
2188   dc = create_download_context (h, sr->uri, sr->meta, filename, tempname,
2189                                 offset, length, anonymity, options, cctx);
2190   if (NULL == dc)
2191     return NULL;
2192   dc->search = sr;
2193   sr->download = dc;
2194   if (NULL != sr->probe_ctx)
2195   {
2196     GNUNET_FS_download_stop (sr->probe_ctx, GNUNET_YES);
2197     sr->probe_ctx = NULL;
2198   }
2199   return dc;
2200 }
2201
2202
2203 /**
2204  * Start the downloading process (by entering the queue).
2205  *
2206  * @param dc our download context
2207  */
2208 void
2209 GNUNET_FS_download_start_downloading_ (struct GNUNET_FS_DownloadContext *dc)
2210 {
2211   if (dc->completed == dc->length)
2212     return;
2213   GNUNET_assert (NULL == dc->job_queue);
2214   dc->job_queue =
2215       GNUNET_FS_queue_ (dc->h, &activate_fs_download, &deactivate_fs_download,
2216                         dc, (dc->length + DBLOCK_SIZE - 1) / DBLOCK_SIZE,
2217                         (0 == (dc->options & GNUNET_FS_DOWNLOAD_IS_PROBE))
2218                         ? GNUNET_FS_QUEUE_PRIORITY_NORMAL 
2219                         : GNUNET_FS_QUEUE_PRIORITY_PROBE);
2220 }
2221
2222
2223 /**
2224  * Stop a download (aborts if download is incomplete).
2225  *
2226  * @param dc handle for the download
2227  * @param do_delete delete files of incomplete downloads
2228  */
2229 void
2230 GNUNET_FS_download_stop (struct GNUNET_FS_DownloadContext *dc, int do_delete)
2231 {
2232   struct GNUNET_FS_ProgressInfo pi;
2233   int have_children;
2234   int search_was_null;
2235
2236   if (NULL != dc->top)
2237     GNUNET_FS_end_top (dc->h, dc->top);
2238   if (GNUNET_SCHEDULER_NO_TASK != dc->task)
2239   {
2240     GNUNET_SCHEDULER_cancel (dc->task);
2241     dc->task = GNUNET_SCHEDULER_NO_TASK;
2242   }
2243   search_was_null = (NULL == dc->search);
2244   if (NULL != dc->search)
2245   {
2246     dc->search->download = NULL;
2247     GNUNET_FS_search_result_sync_ (dc->search);
2248     dc->search = NULL;
2249   }
2250   if (NULL != dc->job_queue)
2251   {
2252     GNUNET_FS_dequeue_ (dc->job_queue);
2253     dc->job_queue = NULL;
2254   }
2255   if (NULL != dc->te)
2256   {
2257     GNUNET_FS_tree_encoder_finish (dc->te, NULL, NULL);
2258     dc->te = NULL;
2259   }
2260   have_children = (NULL != dc->child_head) ? GNUNET_YES : GNUNET_NO;
2261   while (NULL != dc->child_head)
2262     GNUNET_FS_download_stop (dc->child_head, do_delete);
2263   if (NULL != dc->parent)
2264     GNUNET_CONTAINER_DLL_remove (dc->parent->child_head, dc->parent->child_tail,
2265                                  dc);
2266   if (NULL != dc->serialization)
2267     GNUNET_FS_remove_sync_file_ (dc->h,
2268                                  ((NULL != dc->parent) ||
2269                                   (! search_was_null)) ? GNUNET_FS_SYNC_PATH_CHILD_DOWNLOAD :
2270                                  GNUNET_FS_SYNC_PATH_MASTER_DOWNLOAD,
2271                                  dc->serialization);
2272   if ((GNUNET_YES == have_children) && (NULL == dc->parent))
2273     GNUNET_FS_remove_sync_dir_ (dc->h,
2274                                 (! search_was_null) ? GNUNET_FS_SYNC_PATH_CHILD_DOWNLOAD :
2275                                 GNUNET_FS_SYNC_PATH_MASTER_DOWNLOAD,
2276                                 dc->serialization);
2277   pi.status = GNUNET_FS_STATUS_DOWNLOAD_STOPPED;
2278   GNUNET_FS_download_make_status_ (&pi, dc);
2279   GNUNET_FS_free_download_request_ (dc->top_request);
2280   dc->top_request = NULL;
2281   if (NULL != dc->active)
2282   {
2283     GNUNET_CONTAINER_multihashmap_destroy (dc->active);
2284     dc->active = NULL;
2285   }
2286   if (NULL != dc->filename)
2287   {
2288     if ((dc->completed != dc->length) && (GNUNET_YES == do_delete))
2289     {
2290       if (0 != UNLINK (dc->filename))
2291         GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING, "unlink",
2292                                   dc->filename);
2293     }
2294     GNUNET_free (dc->filename);
2295   }
2296   GNUNET_CONTAINER_meta_data_destroy (dc->meta);
2297   GNUNET_FS_uri_destroy (dc->uri);
2298   if (NULL != dc->temp_filename)
2299   {
2300     if (0 != UNLINK (dc->temp_filename))
2301       GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_ERROR, "unlink",
2302                                 dc->temp_filename);
2303     GNUNET_free (dc->temp_filename);
2304   }
2305   GNUNET_free_non_null (dc->serialization);
2306   GNUNET_free (dc);
2307 }
2308
2309 /* end of fs_download.c */