c91dbd530b371d69b2272a10cd0c18857205d726
[oweals/gnunet.git] / src / fs / fs_file_information.c
1 /*
2      This file is part of GNUnet.
3      (C) 2009 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_file_information.c
23  * @brief  Manage information for publishing directory hierarchies
24  * @author Christian Grothoff
25  *
26  * TODO:
27  * - metadata filename clean up code
28  * - metadata/ksk generation for directories from contained files
29  */
30 #include "platform.h"
31 #include <extractor.h>
32 #include "gnunet_fs_service.h"
33 #include "fs.h"
34 #include "fs_tree.h"
35
36
37 /**
38  * Add meta data that libextractor finds to our meta data
39  * container.
40  *
41  * @param cls closure, our meta data container
42  * @param plugin_name name of the plugin that produced this value;
43  *        special values can be used (i.e. '&lt;zlib&gt;' for zlib being
44  *        used in the main libextractor library and yielding
45  *        meta data).
46  * @param type libextractor-type describing the meta data
47  * @param format basic format information about data
48  * @param data_mime_type mime-type of data (not of the original file);
49  *        can be NULL (if mime-type is not known)
50  * @param data actual meta-data found
51  * @param data_len number of bytes in data
52  * @return always 0 to continue extracting
53  */
54 static int
55 add_to_md(void *cls,
56           const char *plugin_name,
57           enum EXTRACTOR_MetaType type,
58           enum EXTRACTOR_MetaFormat format,
59           const char *data_mime_type,
60           const char *data,
61           size_t data_len)
62 {
63   struct GNUNET_CONTAINER_MetaData *md = cls;
64   (void) GNUNET_CONTAINER_meta_data_insert (md,
65                                             plugin_name,
66                                             type,
67                                             format,
68                                             data_mime_type,
69                                             data,
70                                             data_len);
71   return 0;
72 }
73
74
75 /**
76  * Extract meta-data from a file.
77  *
78  * @return GNUNET_SYSERR on error, otherwise the number
79  *   of meta-data items obtained
80  */
81 int
82 GNUNET_FS_meta_data_extract_from_file (struct GNUNET_CONTAINER_MetaData
83                                        *md, const char *filename,
84                                        struct EXTRACTOR_PluginList *
85                                        extractors)
86 {
87   int old;
88
89   if (filename == NULL)
90     return GNUNET_SYSERR;
91   if (extractors == NULL)
92     return 0;
93   old = GNUNET_CONTAINER_meta_data_iterate (md, NULL, NULL);
94   GNUNET_assert (old >= 0);
95   EXTRACTOR_extract (extractors, 
96                      filename,
97                      NULL, 0,
98                      &add_to_md,
99                      md);
100   return (GNUNET_CONTAINER_meta_data_iterate (md, NULL, NULL) - old);
101 }
102
103
104
105 /**
106  * Obtain the name under which this file information
107  * structure is stored on disk.  Only works for top-level
108  * file information structures.
109  *
110  * @param s structure to get the filename for
111  * @return NULL on error, otherwise filename that
112  *         can be passed to "GNUNET_FS_file_information_recover"
113  *         to read this fi-struct from disk.
114  */
115 const char *
116 GNUNET_FS_file_information_get_id (struct GNUNET_FS_FileInformation *s)
117 {
118   if (NULL != s->dir)
119     return NULL;
120   return s->serialization;
121 }
122
123
124 /**
125  * Create an entry for a file in a publish-structure.
126  *
127  * @param h handle to the file sharing subsystem
128  * @param client_info initial value for the client-info value for this entry
129  * @param filename name of the file or directory to publish
130  * @param keywords under which keywords should this file be available
131  *         directly; can be NULL
132  * @param meta metadata for the file
133  * @param do_index GNUNET_YES for index, GNUNET_NO for insertion,
134  *                GNUNET_SYSERR for simulation
135  * @param anonymity what is the desired anonymity level for sharing?
136  * @param priority what is the priority for OUR node to
137  *   keep this file available?  Use 0 for maximum anonymity and
138  *   minimum reliability...
139  * @param expirationTime when should this content expire?
140  * @return publish structure entry for the file
141  */
142 struct GNUNET_FS_FileInformation *
143 GNUNET_FS_file_information_create_from_file (struct GNUNET_FS_Handle *h,
144                                              void *client_info,
145                                              const char *filename,
146                                              const struct GNUNET_FS_Uri *keywords,
147                                              const struct GNUNET_CONTAINER_MetaData *meta,
148                                              int do_index,
149                                              uint32_t anonymity,
150                                              uint32_t priority,
151                                              struct GNUNET_TIME_Absolute expirationTime)
152 {
153   struct FileInfo *fi;
154   struct stat sbuf;
155   struct GNUNET_FS_FileInformation *ret;
156   const char *fn;
157   const char *ss;
158
159   if (0 != STAT (filename, &sbuf))
160     {
161       GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING,
162                                 "stat",
163                                 filename);
164       return NULL;
165     }
166   fi = GNUNET_FS_make_file_reader_context_ (filename);
167   if (fi == NULL)
168     {
169       GNUNET_break (0);
170       return NULL;
171     }
172   ret = GNUNET_FS_file_information_create_from_reader (h,
173                                                        client_info,
174                                                        sbuf.st_size,
175                                                        &GNUNET_FS_data_reader_file_,
176                                                        fi,
177                                                        keywords,
178                                                        meta,
179                                                        do_index,
180                                                        anonymity,
181                                                        priority,
182                                                        expirationTime);
183   if (ret == NULL)
184     return NULL;
185   ret->h = h;
186   ret->filename = GNUNET_strdup (filename);
187   fn = filename;
188   while (NULL != (ss = strstr (fn,
189                                DIR_SEPARATOR_STR)))
190     fn = ss + 1;
191   GNUNET_CONTAINER_meta_data_insert (ret->meta,
192                                      "<gnunet>",
193                                      EXTRACTOR_METATYPE_FILENAME,
194                                      EXTRACTOR_METAFORMAT_C_STRING,
195                                      "text/plain",
196                                      fn,
197                                      strlen (fn) + 1);
198   return ret;
199 }
200
201
202 /**
203  * Create an entry for a file in a publish-structure.
204  *
205  * @param h handle to the file sharing subsystem
206  * @param client_info initial value for the client-info value for this entry
207  * @param length length of the file
208  * @param data data for the file (should not be used afterwards by
209  *        the caller; callee will "free")
210  * @param keywords under which keywords should this file be available
211  *         directly; can be NULL
212  * @param meta metadata for the file
213  * @param do_index GNUNET_YES for index, GNUNET_NO for insertion,
214  *                GNUNET_SYSERR for simulation
215  * @param anonymity what is the desired anonymity level for sharing?
216  * @param priority what is the priority for OUR node to
217  *   keep this file available?  Use 0 for maximum anonymity and
218  *   minimum reliability...
219  * @param expirationTime when should this content expire?
220  * @return publish structure entry for the file
221  */
222 struct GNUNET_FS_FileInformation *
223 GNUNET_FS_file_information_create_from_data (struct GNUNET_FS_Handle *h,
224                                              void *client_info,
225                                              uint64_t length,
226                                              void *data,
227                                              const struct GNUNET_FS_Uri *keywords,
228                                              const struct GNUNET_CONTAINER_MetaData *meta,
229                                              int do_index,
230                                              uint32_t anonymity,
231                                              uint32_t priority,
232                                              struct GNUNET_TIME_Absolute expirationTime)
233 {
234   if (GNUNET_YES == do_index)        
235     {
236       GNUNET_break (0);
237       return NULL;
238     }
239   return GNUNET_FS_file_information_create_from_reader (h,
240                                                         client_info,
241                                                         length,
242                                                         &GNUNET_FS_data_reader_copy_,
243                                                         data,
244                                                         keywords,
245                                                         meta,
246                                                         do_index,
247                                                         anonymity,
248                                                         priority,
249                                                         expirationTime);
250 }
251
252
253 /**
254  * Create an entry for a file in a publish-structure.
255  *
256  * @param h handle to the file sharing subsystem
257  * @param client_info initial value for the client-info value for this entry
258  * @param length length of the file
259  * @param reader function that can be used to obtain the data for the file 
260  * @param reader_cls closure for "reader"
261  * @param keywords under which keywords should this file be available
262  *         directly; can be NULL
263  * @param meta metadata for the file
264  * @param do_index GNUNET_YES for index, GNUNET_NO for insertion,
265  *                GNUNET_SYSERR for simulation
266  * @param anonymity what is the desired anonymity level for sharing?
267  * @param priority what is the priority for OUR node to
268  *   keep this file available?  Use 0 for maximum anonymity and
269  *   minimum reliability...
270  * @param expirationTime when should this content expire?
271  * @return publish structure entry for the file
272  */
273 struct GNUNET_FS_FileInformation *
274 GNUNET_FS_file_information_create_from_reader (struct GNUNET_FS_Handle *h,
275                                                void *client_info,
276                                                uint64_t length,
277                                                GNUNET_FS_DataReader reader,
278                                                void *reader_cls,
279                                                const struct GNUNET_FS_Uri *keywords,
280                                                const struct GNUNET_CONTAINER_MetaData *meta,
281                                                int do_index,
282                                                uint32_t anonymity,
283                                                uint32_t priority,
284                                                struct GNUNET_TIME_Absolute expirationTime)
285 {
286   struct GNUNET_FS_FileInformation *ret;
287
288   if ( (GNUNET_YES == do_index) &&
289        (reader != &GNUNET_FS_data_reader_file_) )
290     {
291       GNUNET_break (0);
292       return NULL;
293     }
294   ret = GNUNET_malloc (sizeof (struct GNUNET_FS_FileInformation));
295   ret->h = h;
296   ret->client_info = client_info;  
297   ret->meta = GNUNET_CONTAINER_meta_data_duplicate (meta);
298   if (ret->meta == NULL)
299     ret->meta = GNUNET_CONTAINER_meta_data_create ();
300   ret->keywords = (keywords == NULL) ? NULL : GNUNET_FS_uri_dup (keywords);
301   ret->expirationTime = expirationTime;
302   ret->data.file.reader = reader; 
303   ret->data.file.reader_cls = reader_cls;
304   ret->data.file.do_index = do_index;
305   ret->data.file.file_size = length;
306   ret->anonymity = anonymity;
307   ret->priority = priority;
308   return ret;
309 }
310
311
312 /**
313  * Closure for "dir_scan_cb".
314  */
315 struct DirScanCls 
316 {
317   /**
318    * Metadata extractors to use.
319    */
320   struct EXTRACTOR_PluginList *extractors;
321
322   /**
323    * Master context.
324    */ 
325   struct GNUNET_FS_Handle *h;
326
327   /**
328    * Function to call on each directory entry.
329    */
330   GNUNET_FS_FileProcessor proc;
331   
332   /**
333    * Closure for proc.
334    */
335   void *proc_cls;
336
337   /**
338    * Scanner to use for subdirectories.
339    */
340   GNUNET_FS_DirectoryScanner scanner;
341
342   /**
343    * Closure for scanner.
344    */
345   void *scanner_cls;
346
347   /**
348    * Set to an error message (if any).
349    */
350   char *emsg; 
351
352   /**
353    * Should files be indexed?
354    */ 
355   int do_index;
356
357   /**
358    * Desired anonymity level.
359    */
360   uint32_t anonymity;
361
362   /**
363    * Desired publishing priority.
364    */
365   uint32_t priority;
366
367   /**
368    * Expiration time for publication.
369    */
370   struct GNUNET_TIME_Absolute expiration;
371 };
372
373
374 /**
375  * Function called on each entry in a file to
376  * cause default-publishing.
377  * @param cls closure (struct DirScanCls)
378  * @param filename name of the file to be published
379  * @return GNUNET_OK on success, GNUNET_SYSERR to abort
380  */
381 static int
382 dir_scan_cb (void *cls,
383              const char *filename)
384 {
385   struct DirScanCls *dsc = cls;  
386   struct stat sbuf;
387   struct GNUNET_FS_FileInformation *fi;
388   struct GNUNET_FS_Uri *ksk_uri;
389   struct GNUNET_FS_Uri *keywords;
390   struct GNUNET_CONTAINER_MetaData *meta;
391
392   if (0 != STAT (filename, &sbuf))
393     {
394       GNUNET_asprintf (&dsc->emsg,
395                        _("`%s' failed on file `%s': %s"),
396                        "stat",
397                        filename,
398                        STRERROR (errno));
399       return GNUNET_SYSERR;
400     }
401   if (S_ISDIR (sbuf.st_mode))
402     {
403       fi = GNUNET_FS_file_information_create_from_directory (dsc->h,
404                                                              NULL,
405                                                              filename,
406                                                              dsc->scanner,
407                                                              dsc->scanner_cls,
408                                                              dsc->do_index,
409                                                              dsc->anonymity,
410                                                              dsc->priority,
411                                                              dsc->expiration,
412                                                              &dsc->emsg);
413       if (NULL == fi)
414         {
415           GNUNET_assert (NULL != dsc->emsg);
416           return GNUNET_SYSERR;
417         }
418     }
419   else
420     {
421       meta = GNUNET_CONTAINER_meta_data_create ();
422       GNUNET_FS_meta_data_extract_from_file (meta,
423                                              filename,
424                                              dsc->extractors);
425       // FIXME: remove path from filename in metadata!
426       keywords = GNUNET_FS_uri_ksk_create_from_meta_data (meta);
427       ksk_uri = GNUNET_FS_uri_ksk_canonicalize (keywords);
428       fi = GNUNET_FS_file_information_create_from_file (dsc->h,
429                                                         NULL,
430                                                         filename,
431                                                         ksk_uri,
432                                                         meta,
433                                                         dsc->do_index,
434                                                         dsc->anonymity,
435                                                         dsc->priority,
436                                                         dsc->expiration);
437       GNUNET_CONTAINER_meta_data_destroy (meta);
438       GNUNET_FS_uri_destroy (keywords);
439       GNUNET_FS_uri_destroy (ksk_uri);
440     }
441   dsc->proc (dsc->proc_cls,
442              filename,
443              fi);
444   return GNUNET_OK;
445 }
446
447
448 /**
449  * Simple, useful default implementation of a directory scanner
450  * (GNUNET_FS_DirectoryScanner).  This implementation expects to get a
451  * UNIX filename, will publish all files in the directory except hidden
452  * files (those starting with a ".").  Metadata will be extracted
453  * using GNU libextractor; the specific list of plugins should be
454  * specified in "cls", passing NULL will disable (!)  metadata
455  * extraction.  Keywords will be derived from the metadata and be
456  * subject to default canonicalization.  This is strictly a
457  * convenience function.
458  *
459  * @param cls must be of type "struct EXTRACTOR_Extractor*"
460  * @param h handle to the file sharing subsystem
461  * @param dirname name of the directory to scan
462  * @param do_index should files be indexed or inserted
463  * @param anonymity desired anonymity level
464  * @param priority priority for publishing
465  * @param expirationTime expiration for publication
466  * @param proc function called on each entry
467  * @param proc_cls closure for proc
468  * @param emsg where to store an error message (on errors)
469  * @return GNUNET_OK on success
470  */
471 int
472 GNUNET_FS_directory_scanner_default (void *cls,
473                                      struct GNUNET_FS_Handle *h,
474                                      const char *dirname,
475                                      int do_index,
476                                      uint32_t anonymity,
477                                      uint32_t priority,
478                                      struct GNUNET_TIME_Absolute expirationTime,
479                                      GNUNET_FS_FileProcessor proc,
480                                      void *proc_cls,
481                                      char **emsg)
482 {
483   struct EXTRACTOR_PluginList *ex = cls;
484   struct DirScanCls dsc;
485
486   dsc.h = h;
487   dsc.extractors = ex;
488   dsc.proc = proc;
489   dsc.proc_cls = proc_cls;
490   dsc.scanner = &GNUNET_FS_directory_scanner_default;
491   dsc.scanner_cls = cls;
492   dsc.do_index = do_index;
493   dsc.anonymity = anonymity;
494   dsc.priority = priority;
495   dsc.expiration = expirationTime;
496   if (-1 == GNUNET_DISK_directory_scan (dirname,
497                                         &dir_scan_cb,
498                                         &dsc))
499     {
500       GNUNET_assert (NULL != dsc.emsg);
501       *emsg = dsc.emsg;
502       return GNUNET_SYSERR;
503     }
504   return GNUNET_OK;
505 }
506
507
508 /**
509  * Closure for dirproc function.
510  */
511 struct EntryProcCls
512 {
513   /**
514    * Linked list of directory entries that is being
515    * created.
516    */
517   struct GNUNET_FS_FileInformation *entries;
518
519 };
520
521
522 /**
523  * Function that processes a directory entry that
524  * was obtained from the scanner.
525  * @param cls our closure
526  * @param filename name of the file (unused, why there???)
527  * @param fi information for publishing the file
528  */
529 static void
530 dirproc (void *cls,
531          const char *filename,
532          struct GNUNET_FS_FileInformation *fi)
533 {
534   struct EntryProcCls *dc = cls;
535
536   GNUNET_assert (fi->next == NULL);
537   GNUNET_assert (fi->dir == NULL);
538   fi->next = dc->entries;
539   dc->entries = fi;
540 }
541
542
543 /**
544  * Create a publish-structure from an existing file hierarchy, inferring
545  * and organizing keywords and metadata as much as possible.  This
546  * function primarily performs the recursive build and re-organizes
547  * keywords and metadata; for automatically getting metadata
548  * extraction, scanning of directories and creation of the respective
549  * GNUNET_FS_FileInformation entries the default scanner should be
550  * passed (GNUNET_FS_directory_scanner_default).  This is strictly a
551  * convenience function.
552  *
553  * @param h handle to the file sharing subsystem
554  * @param client_info initial value for the client-info value for this entry
555  * @param filename name of the top-level file or directory
556  * @param scanner function used to get a list of files in a directory
557  * @param scanner_cls closure for scanner
558  * @param do_index should files in the hierarchy be indexed?
559  * @param anonymity what is the desired anonymity level for sharing?
560  * @param priority what is the priority for OUR node to
561  *   keep this file available?  Use 0 for maximum anonymity and
562  *   minimum reliability...
563  * @param expirationTime when should this content expire?
564  * @param emsg where to store an error message
565  * @return publish structure entry for the directory, NULL on error
566  */
567 struct GNUNET_FS_FileInformation *
568 GNUNET_FS_file_information_create_from_directory (struct GNUNET_FS_Handle *h,
569                                                   void *client_info,
570                                                   const char *filename,
571                                                   GNUNET_FS_DirectoryScanner scanner,
572                                                   void *scanner_cls,
573                                                   int do_index,
574                                                   uint32_t anonymity,
575                                                   uint32_t priority,
576                                                   struct GNUNET_TIME_Absolute expirationTime,
577                                                   char **emsg)
578 {
579   struct GNUNET_FS_FileInformation *ret;
580   struct EntryProcCls dc;
581   struct GNUNET_FS_Uri *ksk;
582   struct GNUNET_CONTAINER_MetaData *meta;
583   const char *fn;
584   const char *ss;
585
586   dc.entries = NULL;
587   meta = GNUNET_CONTAINER_meta_data_create ();
588   GNUNET_FS_meta_data_make_directory (meta);
589   scanner (scanner_cls,
590            h,
591            filename,
592            do_index,
593            anonymity,
594            priority,
595            expirationTime,
596            &dirproc,
597            &dc,
598            emsg);
599   ksk = NULL; // FIXME...
600   // FIXME: create meta!
601   ret = GNUNET_FS_file_information_create_empty_directory (h,
602                                                            client_info,
603                                                            ksk,
604                                                            meta,
605                                                            anonymity,
606                                                            priority,
607                                                            expirationTime);
608   GNUNET_CONTAINER_meta_data_destroy (meta);
609   ret->data.dir.entries = dc.entries;
610   while (dc.entries != NULL)
611     {
612       dc.entries->dir = ret;
613       dc.entries = dc.entries->next;
614     }
615   fn = filename;
616   while ( (NULL != (ss = strstr (fn,
617                                  DIR_SEPARATOR_STR))) &&
618           (strlen (ss) > 1) )
619     fn = ss + 1;
620   GNUNET_CONTAINER_meta_data_insert (ret->meta,
621                                      "<gnunet>",
622                                      EXTRACTOR_METATYPE_FILENAME,
623                                      EXTRACTOR_METAFORMAT_C_STRING,
624                                      "text/plain",
625                                      fn,
626                                      strlen (fn) + 1);
627   ret->filename = GNUNET_strdup (filename);
628   return ret;
629 }
630
631
632 /**
633  * Test if a given entry represents a directory.
634  *
635  * @param ent check if this FI represents a directory
636  * @return GNUNET_YES if so, GNUNET_NO if not
637  */
638 int
639 GNUNET_FS_file_information_is_directory (struct GNUNET_FS_FileInformation *ent)
640 {
641   return ent->is_directory;
642 }
643
644
645 /**
646  * Create an entry for an empty directory in a publish-structure.
647  * This function should be used by applications for which the
648  * use of "GNUNET_FS_file_information_create_from_directory"
649  * is not appropriate.
650  *
651  * @param h handle to the file sharing subsystem
652  * @param client_info initial value for the client-info value for this entry
653  * @param meta metadata for the directory
654  * @param keywords under which keywords should this directory be available
655  *         directly; can be NULL
656  * @param anonymity what is the desired anonymity level for sharing?
657  * @param priority what is the priority for OUR node to
658  *   keep this file available?  Use 0 for maximum anonymity and
659  *   minimum reliability...
660  * @param expirationTime when should this content expire?
661  * @return publish structure entry for the directory , NULL on error
662  */
663 struct GNUNET_FS_FileInformation *
664 GNUNET_FS_file_information_create_empty_directory (struct GNUNET_FS_Handle *h,
665                                                    void *client_info,
666                                                    const struct GNUNET_FS_Uri *keywords,
667                                                    const struct GNUNET_CONTAINER_MetaData *meta,
668                                                    uint32_t anonymity,
669                                                    uint32_t priority,
670                                                    struct GNUNET_TIME_Absolute expirationTime)
671 {
672   struct GNUNET_FS_FileInformation *ret;
673
674   ret = GNUNET_malloc (sizeof (struct GNUNET_FS_FileInformation));
675   ret->h = h;
676   ret->client_info = client_info;
677   ret->meta = GNUNET_CONTAINER_meta_data_duplicate (meta);
678   ret->keywords = GNUNET_FS_uri_dup (keywords);
679   ret->expirationTime = expirationTime;
680   ret->is_directory = GNUNET_YES;
681   ret->anonymity = anonymity;
682   ret->priority = priority;
683   return ret;
684 }
685
686
687 /**
688  * Add an entry to a directory in a publish-structure.  Clients
689  * should never modify publish structures that were passed to
690  * "GNUNET_FS_publish_start" already.
691  *
692  * @param dir the directory
693  * @param ent the entry to add; the entry must not have been
694  *            added to any other directory at this point and 
695  *            must not include "dir" in its structure
696  * @return GNUNET_OK on success, GNUNET_SYSERR on error
697  */
698 int
699 GNUNET_FS_file_information_add (struct GNUNET_FS_FileInformation *dir,
700                                 struct GNUNET_FS_FileInformation *ent)
701 {
702   if ( (ent->dir != NULL) ||
703        (ent->next != NULL) ||
704        (! dir->is_directory) )
705     {
706       GNUNET_break (0);
707       return GNUNET_SYSERR;
708     }
709   ent->dir = dir;
710   ent->next = dir->data.dir.entries;
711   dir->data.dir.entries = ent;
712   dir->data.dir.dir_size = 0;
713   return GNUNET_OK;
714 }
715
716
717 /**
718  * Inspect a file or directory in a publish-structure.  Clients
719  * should never modify publish structures that were passed to
720  * "GNUNET_FS_publish_start" already.  When called on a directory,
721  * this function will FIRST call "proc" with information about
722  * the directory itself and then for each of the files in the
723  * directory (but not for files in subdirectories).  When called
724  * on a file, "proc" will be called exactly once (with information
725  * about the specific file).
726  *
727  * @param dir the directory
728  * @param proc function to call on each entry
729  * @param proc_cls closure for proc
730  */
731 void
732 GNUNET_FS_file_information_inspect (struct GNUNET_FS_FileInformation *dir,
733                                     GNUNET_FS_FileInformationProcessor proc,
734                                     void *proc_cls)
735 {
736   struct GNUNET_FS_FileInformation *pos;
737   int no;
738
739   no = GNUNET_NO;
740   if (GNUNET_OK !=
741       proc (proc_cls, 
742             dir,
743             (dir->is_directory) ? dir->data.dir.dir_size : dir->data.file.file_size,
744             dir->meta,
745             &dir->keywords,
746             &dir->anonymity,
747             &dir->priority,
748             (dir->is_directory) ? &no : &dir->data.file.do_index,
749             &dir->expirationTime,
750             &dir->client_info))
751     return;
752   if (! dir->is_directory)
753     return;
754   pos = dir->data.dir.entries;
755   while (pos != NULL)
756     {
757       no = GNUNET_NO;
758       if (GNUNET_OK != 
759           proc (proc_cls, 
760                 pos,
761                 (pos->is_directory) ? pos->data.dir.dir_size : pos->data.file.file_size,
762                 pos->meta,
763                 &pos->keywords,
764                 &pos->anonymity,
765                 &pos->priority,
766                 (dir->is_directory) ? &no : &dir->data.file.do_index,
767                 &pos->expirationTime,
768                 &pos->client_info))
769         break;
770       pos = pos->next;
771     }
772 }
773
774
775 /**
776  * Destroy publish-structure.  Clients should never destroy publish
777  * structures that were passed to "GNUNET_FS_publish_start" already.
778  *
779  * @param fi structure to destroy
780  * @param cleaner function to call on each entry in the structure
781  *        (useful to clean up client_info); can be NULL; return
782  *        values are ignored
783  * @param cleaner_cls closure for cleaner
784  */
785 void
786 GNUNET_FS_file_information_destroy (struct GNUNET_FS_FileInformation *fi,
787                                     GNUNET_FS_FileInformationProcessor cleaner,
788                                     void *cleaner_cls)
789 {
790   struct GNUNET_FS_FileInformation *pos;
791   int no;
792
793   no = GNUNET_NO;
794   if (fi->is_directory)
795     {
796       /* clean up directory */
797       while (NULL != (pos = fi->data.dir.entries))
798         {
799           fi->data.dir.entries = pos->next;
800           GNUNET_FS_file_information_destroy (pos, cleaner, cleaner_cls);
801         }
802       /* clean up client-info */
803       if (NULL != cleaner)
804         cleaner (cleaner_cls, 
805                  fi,
806                  fi->data.dir.dir_size,
807                  fi->meta,
808                  &fi->keywords,
809                  &fi->anonymity,
810                  &fi->priority,
811                  &no,
812                  &fi->expirationTime,
813                  &fi->client_info);
814       GNUNET_free_non_null (fi->data.dir.dir_data);
815     }
816   else
817     {
818       /* call clean-up function of the reader */
819       if (fi->data.file.reader != NULL)
820         fi->data.file.reader (fi->data.file.reader_cls, 0, 0, 
821                               NULL, NULL);
822       /* clean up client-info */
823       if (NULL != cleaner)
824         cleaner (cleaner_cls, 
825                  fi,
826                  fi->data.file.file_size,
827                  fi->meta,
828                  &fi->keywords,
829                  &fi->anonymity,
830                  &fi->priority,
831                  &fi->data.file.do_index,
832                  &fi->expirationTime,
833                  &fi->client_info);
834     }
835   GNUNET_free_non_null (fi->filename);
836   GNUNET_free_non_null (fi->emsg);
837   GNUNET_free_non_null (fi->chk_uri);
838   /* clean up serialization */
839   if ( (NULL != fi->serialization) &&
840        (0 != UNLINK (fi->serialization)) )
841     GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING,
842                               "unlink",
843                               fi->serialization);
844   if (NULL != fi->keywords)
845     GNUNET_FS_uri_destroy (fi->keywords);
846   if (NULL != fi->meta)
847     GNUNET_CONTAINER_meta_data_destroy (fi->meta);
848   GNUNET_free_non_null (fi->serialization);
849   if (fi->te != NULL)
850     {
851       GNUNET_FS_tree_encoder_finish (fi->te,
852                                      NULL, NULL);
853       fi->te = NULL;
854     }
855   GNUNET_free (fi);
856 }
857
858
859 /* end of fs_file_information.c */