src/fs/fs_publish.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 2, or (at your
   8      option) any later version.
   9
  10      GNUnet is distributed in the hope that it will be useful, but
  11      WITHOUT ANY WARRANTY; without even the implied warranty of
  12      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13      General Public License for more details.
  14
  15      You should have received a copy of the GNU General Public License
  16      along with GNUnet; see the file COPYING.  If not, write to the
  17      Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  18      Boston, MA 02111-1307, USA.
  19 */
  20
  21 /**
  22  * @file fs/fs_publish.c
  23  * @brief publish a file or directory in GNUnet
  24  * @see http://gnunet.org/encoding.php3
  25  * @author Krista Bennett
  26  * @author Christian Grothoff
  27  *
  28  * TODO:
  29  * - code-sharing with unindex (write unindex code)
  30  * - indexing cleanup: unindex on failure (can wait)
  31  * - persistence support (can wait)
  32  * - datastore reservation support (optimization)
  33  * - location URIs (publish with anonymity-level zero)
  34  */
  35
  36 #include "platform.h"
  37 #include "gnunet_constants.h"
  38 #include "gnunet_signatures.h"
  39 #include "gnunet_util_lib.h"
  40 #include "gnunet_fs_service.h"
  41 #include "fs.h"
  42 #include "fs_tree.h"
  43
  44 #define DEBUG_PUBLISH GNUNET_YES
  45
  46 /**
  47  * Maximum allowed size for a KBlock.
  48  */
  49 #define MAX_KBLOCK_SIZE 60000
  50
  51 /**
  52  * Maximum allowed size for an SBlock.
  53  */
  54 #define MAX_SBLOCK_SIZE 60000
  55
  56 /**
  57  * Main function that performs the upload.
  58  * @param cls "struct GNUNET_FS_PublishContext" identifies the upload
  59  * @param tc task context
  60  */
  61 static void
  62 do_upload (void *cls,
  63            const struct GNUNET_SCHEDULER_TaskContext *tc);
  64
  65
  66 /**
  67  * Context for "ds_put_cont".
  68  */
  69 struct PutContCtx
  70 {
  71   /**
  72    * Current publishing context.
  73    */
  74   struct GNUNET_FS_PublishContext *sc;
  75
  76   /**
  77    * Specific file with the block.
  78    */
  79   struct GNUNET_FS_FileInformation *p;
  80
  81   /**
  82    * Function to run next, if any (can be NULL).
  83    */
  84   GNUNET_SCHEDULER_Task cont;
  85
  86   /**
  87    * Closure for cont.
  88    */
  89   void *cont_cls;
  90 };
  91
  92
  93 /**
  94  * Fill in all of the generic fields for
  95  * a publish event.
  96  *
  97  * @param pc structure to fill in
  98  * @param sc overall publishing context
  99  * @param p file information for the file being published
 100  * @param offset where in the file are we so far
 101  */
 102 static void
 103 make_publish_status (struct GNUNET_FS_ProgressInfo *pi,
 104                      struct GNUNET_FS_PublishContext *sc,
 105                      const struct GNUNET_FS_FileInformation *p,
 106                      uint64_t offset)
 107 {
 108   pi->value.publish.sc = sc;
 109   pi->value.publish.fi = p;
 110   pi->value.publish.cctx
 111     = p->client_info;
 112   pi->value.publish.pctx
 113     = (NULL == p->dir) ? NULL : p->dir->client_info;
 114   pi->value.publish.filename
 115     = (p->is_directory) ? p->data.dir.dirname : p->data.file.filename;
 116   pi->value.publish.size
 117     = (p->is_directory) ? p->data.dir.dir_size : p->data.file.file_size;
 118   pi->value.publish.eta
 119     = GNUNET_TIME_calculate_eta (p->start_time,
 120                                  offset,
 121                                  pi->value.publish.size);
 122   pi->value.publish.completed = offset;
 123   pi->value.publish.duration = GNUNET_TIME_absolute_get_duration (p->start_time);
 124   pi->value.publish.anonymity = p->anonymity;
 125 }
 126
 127
 128 /**
 129  * Cleanup the publish context, we're done
 130  * with it.
 131  *
 132  * @param pc struct to clean up after
 133  */
 134 static void
 135 publish_cleanup (struct GNUNET_FS_PublishContext *sc)
 136 {
 137   GNUNET_FS_file_information_destroy (sc->fi, NULL, NULL);
 138   GNUNET_FS_namespace_delete (sc->namespace, GNUNET_NO);
 139   GNUNET_free_non_null (sc->nid);
 140   GNUNET_free_non_null (sc->nuid);
 141   GNUNET_DATASTORE_disconnect (sc->dsh, GNUNET_NO);
 142   GNUNET_free (sc);
 143 }
 144
 145
 146 /**
 147  * Function called by the datastore API with
 148  * the result from the PUT request.
 149  *
 150  * @param cls our closure
 151  * @param success GNUNET_OK on success
 152  * @param msg error message (or NULL)
 153  */
 154 static void
 155 ds_put_cont (void *cls,
 156              int success,
 157              const char *msg)
 158 {
 159   struct PutContCtx *pcc = cls;
 160   struct GNUNET_FS_ProgressInfo pi;
 161
 162   if (GNUNET_SYSERR == pcc->sc->in_network_wait)
 163     {
 164       /* we were aborted in the meantime,
 165          finish shutdown! */
 166       publish_cleanup (pcc->sc);
 167       return;
 168     }
 169   GNUNET_assert (GNUNET_YES == pcc->sc->in_network_wait);
 170   pcc->sc->in_network_wait = GNUNET_NO;
 171   if (GNUNET_OK != success)
 172     {
 173       GNUNET_asprintf (&pcc->p->emsg,
 174                        _("Upload failed: %s"),
 175                        msg);
 176       GNUNET_FS_file_information_sync (pcc->p);
 177       pi.status = GNUNET_FS_STATUS_PUBLISH_ERROR;
 178       make_publish_status (&pi, pcc->sc, pcc->p, 0);
 179       pi.value.publish.eta = GNUNET_TIME_UNIT_FOREVER_REL;
 180       pi.value.publish.specifics.error.message = pcc->p->emsg;
 181       pcc->p->client_info
 182         = pcc->sc->h->upcb (pcc->sc->h->upcb_cls,
 183                             &pi);
 184       return;
 185     }
 186   GNUNET_FS_file_information_sync (pcc->p);
 187   if (NULL != pcc->cont)
 188     pcc->sc->upload_task
 189       = GNUNET_SCHEDULER_add_delayed (pcc->sc->h->sched,
 190                                       GNUNET_NO,
 191                                       GNUNET_SCHEDULER_PRIORITY_BACKGROUND,
 192                                       GNUNET_SCHEDULER_NO_TASK,
 193                                       GNUNET_TIME_UNIT_ZERO,
 194                                       pcc->cont,
 195                                       pcc->cont_cls);
 196   GNUNET_free (pcc);
 197 }
 198
 199
 200 /**
 201  * Generate the callback that signals clients
 202  * that a file (or directory) has been completely
 203  * published.
 204  *
 205  * @param p the completed upload
 206  * @param sc context of the publication
 207  */
 208 static void
 209 signal_publish_completion (struct GNUNET_FS_FileInformation *p,
 210                            struct GNUNET_FS_PublishContext *sc)
 211 {
 212   struct GNUNET_FS_ProgressInfo pi;
 213
 214   pi.status = GNUNET_FS_STATUS_PUBLISH_COMPLETED;
 215   make_publish_status (&pi, sc, p,
 216                        GNUNET_ntohll (p->chk_uri->data.chk.file_length));
 217   pi.value.publish.eta = GNUNET_TIME_UNIT_ZERO;
 218   pi.value.publish.specifics.completed.chk_uri = p->chk_uri;
 219   p->client_info
 220     = sc->h->upcb (sc->h->upcb_cls,
 221                   &pi);
 222 }
 223
 224
 225 /**
 226  * Generate the callback that signals clients
 227  * that a file (or directory) has encountered
 228  * a problem during publication.
 229  *
 230  * @param p the upload that had trouble
 231  * @param sc context of the publication
 232  * @param emsg error message
 233  */
 234 static void
 235 signal_publish_error (struct GNUNET_FS_FileInformation *p,
 236                       struct GNUNET_FS_PublishContext *sc,
 237                       const char *emsg)
 238 {
 239   struct GNUNET_FS_ProgressInfo pi;
 240
 241   p->emsg = GNUNET_strdup (emsg);
 242   pi.status = GNUNET_FS_STATUS_PUBLISH_ERROR;
 243   make_publish_status (&pi, sc, p, 0);
 244   pi.value.publish.eta = GNUNET_TIME_UNIT_FOREVER_REL;
 245   pi.value.publish.specifics.error.message =emsg;
 246   p->client_info
 247     = sc->h->upcb (sc->h->upcb_cls,
 248                   &pi);
 249 }
 250
 251
 252 /**
 253  * We've finished publishing the SBlock as part of a larger upload.
 254  * Check the result and complete the larger upload.
 255  *
 256  * @param cls the "struct GNUNET_FS_PublishContext*" of the larger upload
 257  * @param uri URI of the published SBlock
 258  * @param emsg NULL on success, otherwise error message
 259  */
 260 static void
 261 publish_sblocks_cont (void *cls,
 262                       const struct GNUNET_FS_Uri *uri,
 263                       const char *emsg)
 264 {
 265   struct GNUNET_FS_PublishContext *sc = cls;
 266   if (NULL != emsg)
 267     {
 268       signal_publish_error (sc->fi,
 269                             sc,
 270                             emsg);
 271       return;
 272     }
 273   // FIXME: release the datastore reserve here!
 274   signal_publish_completion (sc->fi, sc);
 275 }
 276
 277
 278 /**
 279  * We are almost done publishing the structure,
 280  * add SBlocks (if needed).
 281  *
 282  * @param sc overall upload data
 283  */
 284 static void
 285 publish_sblock (struct GNUNET_FS_PublishContext *sc)
 286 {
 287   if (NULL != sc->namespace)
 288     GNUNET_FS_publish_sks (sc->h,
 289                            sc->namespace,
 290                            sc->nid,
 291                            sc->nuid,
 292                            sc->fi->meta,
 293                            sc->fi->chk_uri,
 294                            sc->fi->expirationTime,
 295                            sc->fi->anonymity,
 296                            sc->fi->priority,
 297                            sc->options,
 298                            &publish_sblocks_cont,
 299                            sc);
 300   else
 301     publish_sblocks_cont (sc, NULL, NULL);
 302 }
 303
 304
 305 /**
 306  * We've finished publishing a KBlock
 307  * as part of a larger upload.  Check
 308  * the result and continue the larger
 309  * upload.
 310  *
 311  * @param cls the "struct GNUNET_FS_PublishContext*"
 312  *        of the larger upload
 313  * @param uri URI of the published blocks
 314  * @param emsg NULL on success, otherwise error message
 315  */
 316 static void
 317 publish_kblocks_cont (void *cls,
 318                       const struct GNUNET_FS_Uri *uri,
 319                       const char *emsg)
 320 {
 321   struct GNUNET_FS_PublishContext *sc = cls;
 322   struct GNUNET_FS_FileInformation *p = sc->fi_pos;
 323
 324   if (NULL != emsg)
 325     {
 326       signal_publish_error (p, sc, emsg);
 327       sc->upload_task
 328         = GNUNET_SCHEDULER_add_delayed (sc->h->sched,
 329                                         GNUNET_NO,
 330                                         GNUNET_SCHEDULER_PRIORITY_BACKGROUND,
 331                                         GNUNET_SCHEDULER_NO_TASK,
 332                                         GNUNET_TIME_UNIT_ZERO,
 333                                         &do_upload,
 334                                         sc);
 335       return;
 336     }
 337   GNUNET_FS_file_information_sync (p);
 338   if (NULL != p->dir)
 339     signal_publish_completion (p, sc);
 340   /* move on to next file */
 341   if (NULL != p->next)
 342     sc->fi_pos = p->next;
 343   else
 344     sc->fi_pos = p->dir;
 345   sc->upload_task
 346     = GNUNET_SCHEDULER_add_delayed (sc->h->sched,
 347                                     GNUNET_NO,
 348                                     GNUNET_SCHEDULER_PRIORITY_BACKGROUND,
 349                                     GNUNET_SCHEDULER_NO_TASK,
 350                                     GNUNET_TIME_UNIT_ZERO,
 351                                     &do_upload,
 352                                     sc);
 353 }
 354
 355
 356 /**
 357  * Function called by the tree encoder to obtain
 358  * a block of plaintext data (for the lowest level
 359  * of the tree).
 360  *
 361  * @param cls our publishing context
 362  * @param offset identifies which block to get
 363  * @param max (maximum) number of bytes to get; returning
 364  *        fewer will also cause errors
 365  * @param buf where to copy the plaintext buffer
 366  * @param emsg location to store an error message (on error)
 367  * @return number of bytes copied to buf, 0 on error
 368  */
 369 static size_t
 370 block_reader (void *cls,
 371               uint64_t offset,
 372               size_t max,
 373               void *buf,
 374               char **emsg)
 375 {
 376   struct GNUNET_FS_PublishContext *sc = cls;
 377   struct GNUNET_FS_FileInformation *p;
 378   size_t pt_size;
 379   const char *dd;
 380
 381   p = sc->fi_pos;
 382   if (p->is_directory)
 383     {
 384       pt_size = GNUNET_MIN(max,
 385                            p->data.dir.dir_size - offset);
 386       dd = p->data.dir.dir_data;
 387       memcpy (&buf,
 388               &dd[offset],
 389               pt_size);
 390     }
 391   else
 392     {
 393       pt_size = GNUNET_MIN(max,
 394                            p->data.file.file_size - offset);
 395       if (pt_size !=
 396           p->data.file.reader (p->data.file.reader_cls,
 397                                offset,
 398                                pt_size,
 399                                buf,
 400                                emsg))
 401         return 0;
 402     }
 403   return pt_size;
 404 }
 405
 406
 407 /**
 408  * The tree encoder has finished processing a
 409  * file.   Call it's finish method and deal with
 410  * the final result.
 411  *
 412  * @param cls our publishing context
 413  * @param tc scheduler's task context (not used)
 414  */
 415 static void
 416 encode_cont (void *cls,
 417              const struct GNUNET_SCHEDULER_TaskContext *tc)
 418 {
 419   struct GNUNET_FS_PublishContext *sc = cls;
 420   struct GNUNET_FS_FileInformation *p;
 421   struct GNUNET_FS_ProgressInfo pi;
 422   char *emsg;
 423
 424   p = sc->fi_pos;
 425   GNUNET_FS_tree_encoder_finish (p->te,
 426                                  &p->chk_uri,
 427                                  &emsg);
 428   p->te = NULL;
 429   if (NULL != emsg)
 430     {
 431       GNUNET_asprintf (&p->emsg,
 432                        _("Upload failed: %s"),
 433                        emsg);
 434       GNUNET_free (emsg);
 435       GNUNET_FS_file_information_sync (p);
 436       pi.status = GNUNET_FS_STATUS_PUBLISH_ERROR;
 437       make_publish_status (&pi, sc, p, 0);
 438       pi.value.publish.eta = GNUNET_TIME_UNIT_FOREVER_REL;
 439       pi.value.publish.specifics.error.message = p->emsg;
 440       p->client_info
 441         = sc->h->upcb (sc->h->upcb_cls,
 442                        &pi);
 443     }
 444   /* continue with main */
 445   sc->upload_task
 446     = GNUNET_SCHEDULER_add_delayed (sc->h->sched,
 447                                     GNUNET_NO,
 448                                     GNUNET_SCHEDULER_PRIORITY_BACKGROUND,
 449                                     GNUNET_SCHEDULER_NO_TASK,
 450                                     GNUNET_TIME_UNIT_ZERO,
 451                                     &do_upload,
 452                                     sc);
 453 }
 454
 455
 456 /**
 457  * Function called asking for the current (encoded)
 458  * block to be processed.  After processing the
 459  * client should either call "GNUNET_FS_tree_encode_next"
 460  * or (on error) "GNUNET_FS_tree_encode_finish".
 461  *
 462  * @param cls closure
 463  * @param query the query for the block (key for lookup in the datastore)
 464  * @param type type of the block (IBLOCK or DBLOCK)
 465  * @param block the (encrypted) block
 466  * @param block_size size of block (in bytes)
 467  */
 468 static void
 469 block_proc (void *cls,
 470             const GNUNET_HashCode *query,
 471             uint64_t offset,
 472             uint32_t type,
 473             const void *block,
 474             uint16_t block_size)
 475 {
 476   struct GNUNET_FS_PublishContext *sc = cls;
 477   struct GNUNET_FS_FileInformation *p;
 478   struct PutContCtx * dpc_cls;
 479   struct OnDemandBlock odb;
 480
 481   p = sc->fi_pos;
 482   if (NULL == sc->dsh)
 483     {
 484       sc->upload_task
 485         = GNUNET_SCHEDULER_add_delayed (sc->h->sched,
 486                                         GNUNET_NO,
 487                                         GNUNET_SCHEDULER_PRIORITY_BACKGROUND,
 488                                         GNUNET_SCHEDULER_NO_TASK,
 489                                         GNUNET_TIME_UNIT_ZERO,
 490                                         &do_upload,
 491                                         sc);
 492       return;
 493     }
 494
 495   GNUNET_assert (GNUNET_NO == sc->in_network_wait);
 496   sc->in_network_wait = GNUNET_YES;
 497   dpc_cls = GNUNET_malloc(sizeof(struct PutContCtx));
 498   dpc_cls->cont = &do_upload;
 499   dpc_cls->cont_cls = sc;
 500   dpc_cls->p = p;
 501   if ( (p->is_directory) &&
 502        (p->data.file.do_index) &&
 503        (type == GNUNET_DATASTORE_BLOCKTYPE_DBLOCK) )
 504     {
 505       odb.offset = offset;
 506       odb.file_id = p->data.file.file_id;
 507       GNUNET_DATASTORE_put (sc->dsh,
 508                             sc->rid,
 509                             query,
 510                             sizeof(struct OnDemandBlock),
 511                             &odb,
 512                             GNUNET_DATASTORE_BLOCKTYPE_ONDEMAND,
 513                             p->priority,
 514                             p->anonymity,
 515                             p->expirationTime,
 516                             GNUNET_CONSTANTS_SERVICE_TIMEOUT,
 517                             &ds_put_cont,
 518                             dpc_cls);
 519       return;
 520     }
 521   GNUNET_DATASTORE_put (sc->dsh,
 522                         sc->rid,
 523                         query,
 524                         block_size,
 525                         block,
 526                         type,
 527                         p->priority,
 528                         p->anonymity,
 529                         p->expirationTime,
 530                         GNUNET_CONSTANTS_SERVICE_TIMEOUT,
 531                         &ds_put_cont,
 532                         dpc_cls);
 533 }
 534
 535
 536 /**
 537  * Function called with information about our
 538  * progress in computing the tree encoding.
 539  *
 540  * @param cls closure
 541  * @param offset where are we in the file
 542  * @param pt_block plaintext of the currently processed block
 543  * @param pt_size size of pt_block
 544  * @param depth depth of the block in the tree
 545  */
 546 static void
 547 progress_proc (void *cls,
 548                uint64_t offset,
 549                const void *pt_block,
 550                size_t pt_size,
 551                unsigned int depth)
 552 {
 553   struct GNUNET_FS_PublishContext *sc = cls;
 554   struct GNUNET_FS_FileInformation *p;
 555   struct GNUNET_FS_ProgressInfo pi;
 556
 557   p = sc->fi_pos;
 558   pi.status = GNUNET_FS_STATUS_PUBLISH_PROGRESS;
 559   make_publish_status (&pi, sc, p, offset);
 560   pi.value.publish.specifics.progress.data = pt_block;
 561   pi.value.publish.specifics.progress.offset = offset;
 562   pi.value.publish.specifics.progress.data_len = pt_size;
 563   pi.value.publish.specifics.progress.depth = depth;
 564   p->client_info
 565     = sc->h->upcb (sc->h->upcb_cls,
 566                    &pi);
 567 }
 568
 569
 570 /**
 571  * We are uploading a file or directory; load (if necessary) the next
 572  * block into memory, encrypt it and send it to the FS service.  Then
 573  * continue with the main task.
 574  *
 575  * @param sc overall upload data
 576  */
 577 static void
 578 publish_content (struct GNUNET_FS_PublishContext *sc)
 579 {
 580   struct GNUNET_FS_FileInformation *p;
 581   char *emsg;
 582   struct GNUNET_FS_DirectoryBuilder *db;
 583   struct GNUNET_FS_FileInformation *dirpos;
 584   void *raw_data;
 585   uint64_t size;
 586
 587   p = sc->fi_pos;
 588   if (NULL == p->te)
 589     {
 590       if (p->is_directory)
 591         {
 592           db = GNUNET_FS_directory_builder_create (p->meta);
 593           dirpos = p->data.dir.entries;
 594           while (NULL != dirpos)
 595             {
 596               if (dirpos->is_directory)
 597                 {
 598                   raw_data = dirpos->data.dir.dir_data;
 599                   dirpos->data.dir.dir_data = NULL;
 600                 }
 601               else
 602                 {
 603                   raw_data = NULL;
 604                   if ( (dirpos->data.file.file_size < MAX_INLINE_SIZE) &&
 605                        (dirpos->data.file.file_size > 0) )
 606                     {
 607                       raw_data = GNUNET_malloc (dirpos->data.file.file_size);
 608                       emsg = NULL;
 609                       if (dirpos->data.file.file_size !=
 610                           dirpos->data.file.reader (dirpos->data.file.reader_cls,
 611                                                     0,
 612                                                     dirpos->data.file.file_size,
 613                                                     raw_data,
 614                                                     &emsg))
 615                         {
 616                           GNUNET_free_non_null (emsg);
 617                           GNUNET_free (raw_data);
 618                           raw_data = NULL;
 619                         }
 620                     }
 621                 }
 622               GNUNET_FS_directory_builder_add (db,
 623                                                dirpos->chk_uri,
 624                                                dirpos->meta,
 625                                                raw_data);
 626               GNUNET_free_non_null (raw_data);
 627               dirpos = dirpos->next;
 628             }
 629           GNUNET_FS_directory_builder_finish (db,
 630                                               &p->data.dir.dir_size,
 631                                               &p->data.dir.dir_data);
 632         }
 633       size = (p->is_directory)
 634         ? p->data.dir.dir_size
 635         : p->data.file.file_size;
 636       p->te = GNUNET_FS_tree_encoder_create (sc->h,
 637                                              size,
 638                                              sc,
 639                                              &block_reader,
 640                                              &block_proc,
 641                                              &progress_proc,
 642                                              &encode_cont);
 643
 644     }
 645   GNUNET_FS_tree_encoder_next (p->te);
 646 }
 647
 648
 649 /**
 650  * Process the response (or lack thereof) from
 651  * the "fs" service to our 'start index' request.
 652  *
 653  * @param cls closure (of type "struct GNUNET_FS_PublishContext*"_)
 654  * @param msg the response we got
 655  */
 656 static void
 657 process_index_start_response (void *cls,
 658                               const struct GNUNET_MessageHeader *msg)
 659 {
 660   struct GNUNET_FS_PublishContext *sc = cls;
 661   struct GNUNET_FS_FileInformation *p;
 662   const char *emsg;
 663   uint16_t msize;
 664
 665   GNUNET_CLIENT_disconnect (sc->client);
 666   sc->client = NULL;
 667   p = sc->fi_pos;
 668   if (msg == NULL)
 669     {
 670       GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
 671                   _("Can not index file `%s': %s.  Will try to insert instead.\n"),
 672                   p->data.file.filename,
 673                   _("timeout on index-start request to `fs' service"));
 674       p->data.file.do_index = GNUNET_NO;
 675       publish_content (sc);
 676       return;
 677     }
 678   if (ntohs (msg->type) != GNUNET_MESSAGE_TYPE_FS_INDEX_START_OK)
 679     {
 680       msize = ntohs (msg->size);
 681       emsg = (const char *) &msg[1];
 682       if ( (msize <= sizeof (struct GNUNET_MessageHeader)) ||
 683            (emsg[msize - sizeof(struct GNUNET_MessageHeader) - 1] != '\0') )
 684         emsg = gettext_noop ("unknown error");
 685       GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
 686                   _("Can not index file `%s': %s.  Will try to insert instead.\n"),
 687                   p->data.file.filename,
 688                   gettext (emsg));
 689       p->data.file.do_index = GNUNET_NO;
 690       publish_content (sc);
 691       return;
 692     }
 693   /* success! continue with indexing */
 694   publish_content (sc);
 695 }
 696
 697
 698 /**
 699  * Function called once the hash computation over an
 700  * indexed file has completed.
 701  *
 702  * @param cls closure, our publishing context
 703  * @param res resulting hash, NULL on error
 704  */
 705 static void
 706 hash_for_index_cb (void *cls,
 707                    const GNUNET_HashCode *
 708                    res)
 709 {
 710   struct GNUNET_FS_PublishContext *sc = cls;
 711   struct GNUNET_FS_FileInformation *p;
 712   struct IndexStartMessage *ism;
 713   size_t slen;
 714   struct GNUNET_CLIENT_Connection *client;
 715   uint32_t dev;
 716   uint64_t ino;
 717
 718   p = sc->fi_pos;
 719   if (NULL == res)
 720     {
 721       GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
 722                   _("Can not index file `%s': %s.  Will try to insert instead.\n"),
 723                   p->data.file.filename,
 724                   _("failed to compute hash"));
 725       p->data.file.do_index = GNUNET_NO;
 726       publish_content (sc);
 727       return;
 728     }
 729   slen = strlen (p->data.file.filename) + 1;
 730   if (slen > GNUNET_SERVER_MAX_MESSAGE_SIZE - sizeof(struct IndexStartMessage))
 731     {
 732       GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
 733                   _("Can not index file `%s': %s.  Will try to insert instead.\n"),
 734                   p->data.file.filename,
 735                   _("filename too long"));
 736       p->data.file.do_index = GNUNET_NO;
 737       publish_content (sc);
 738       return;
 739     }
 740   client = GNUNET_CLIENT_connect (sc->h->sched,
 741                                   "fs",
 742                                   sc->h->cfg);
 743   if (NULL == client)
 744     {
 745       GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
 746                   _("Can not index file `%s': %s.  Will try to insert instead.\n"),
 747                   p->data.file.filename,
 748                   _("could not connect to `fs' service"));
 749       p->data.file.do_index = GNUNET_NO;
 750       publish_content (sc);
 751       return;
 752     }
 753   p->data.file.file_id = *res;
 754   ism = GNUNET_malloc (sizeof(struct IndexStartMessage) +
 755                        slen);
 756   ism->header.size = htons(sizeof(struct IndexStartMessage) +
 757                            slen);
 758   ism->header.type = htons(GNUNET_MESSAGE_TYPE_FS_INDEX_START);
 759   if (GNUNET_OK ==
 760       GNUNET_DISK_file_get_identifiers (p->data.file.filename,
 761                                         &dev,
 762                                         &ino))
 763     {
 764       ism->device = htonl (dev);
 765       ism->inode = GNUNET_htonll(ino);
 766     }
 767   memcpy (&ism[1],
 768           p->data.file.filename,
 769           slen);
 770   sc->client = client;
 771   GNUNET_CLIENT_transmit_and_get_response (client,
 772                                            &ism->header,
 773                                            GNUNET_TIME_UNIT_FOREVER_REL,
 774                                            &process_index_start_response,
 775                                            sc);
 776   GNUNET_free (ism);
 777 }
 778
 779
 780 /**
 781  * Main function that performs the upload.
 782  * @param cls "struct GNUNET_FS_PublishContext" identifies the upload
 783  * @param tc task context
 784  */
 785 static void
 786 do_upload (void *cls,
 787            const struct GNUNET_SCHEDULER_TaskContext *tc)
 788 {
 789   struct GNUNET_FS_PublishContext *sc = cls;
 790   struct GNUNET_FS_ProgressInfo pi;
 791   struct GNUNET_FS_FileInformation *p;
 792   char *fn;
 793
 794   sc->upload_task = GNUNET_SCHEDULER_NO_TASK;
 795   p = sc->fi_pos;
 796   if (NULL == p)
 797     {
 798       /* upload of entire hierarchy complete,
 799          publish namespace entries */
 800       publish_sblock (sc);
 801       return;
 802     }
 803   /* find starting position */
 804   while ( (p->is_directory) &&
 805           (NULL != p->data.dir.entries) &&
 806           (NULL == p->emsg) &&
 807           (NULL == p->data.dir.entries->chk_uri) )
 808     {
 809       p = p->data.dir.entries;
 810       sc->fi_pos = p;
 811     }
 812   /* abort on error */
 813   if (NULL != p->emsg)
 814     {
 815       /* error with current file, abort all
 816          related files as well! */
 817       while (NULL != p->dir)
 818         {
 819           fn = GNUNET_CONTAINER_meta_data_get_by_type (p->meta,
 820                                                        EXTRACTOR_FILENAME);
 821           p = p->dir;
 822           GNUNET_asprintf (&p->emsg,
 823                            _("Recursive upload failed at `%s'"),
 824                            fn);
 825           GNUNET_free (fn);
 826           GNUNET_FS_file_information_sync (p);
 827           pi.status = GNUNET_FS_STATUS_PUBLISH_ERROR;
 828           make_publish_status (&pi, sc, p, 0);
 829           pi.value.publish.eta = GNUNET_TIME_UNIT_FOREVER_REL;
 830           pi.value.publish.specifics.error.message = p->emsg;
 831           p->client_info
 832             = sc->h->upcb (sc->h->upcb_cls,
 833                            &pi);
 834         }
 835       return;
 836     }
 837   /* handle completion */
 838   if (NULL != p->chk_uri)
 839     {
 840       /* upload of "p" complete, publish KBlocks! */
 841       GNUNET_FS_publish_ksk (sc->h,
 842                              p->keywords,
 843                              p->meta,
 844                              p->chk_uri,
 845                              p->expirationTime,
 846                              p->anonymity,
 847                              p->priority,
 848                              sc->options,
 849                              &publish_kblocks_cont,
 850                              sc);
 851       return;
 852     }
 853   if ( (!p->is_directory) &&
 854        (p->data.file.do_index) )
 855     {
 856       if (NULL == p->data.file.filename)
 857         {
 858           p->data.file.do_index = GNUNET_NO;
 859           GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
 860                       _("Can not index file `%s': %s.  Will try to insert instead.\n"),
 861                       "<no-name>",
 862                       _("needs to be an actual file"));
 863           publish_content (sc);
 864           return;
 865         }
 866       GNUNET_CRYPTO_hash_file (sc->h->sched,
 867                                GNUNET_SCHEDULER_PRIORITY_IDLE,
 868                                GNUNET_NO,
 869                                p->data.file.filename,
 870                                HASHING_BLOCKSIZE,
 871                                &hash_for_index_cb,
 872                                sc);
 873       return;
 874     }
 875   publish_content (sc);
 876 }
 877
 878
 879 /**
 880  * Signal the FS's progress function that we are starting
 881  * an upload.
 882  *
 883  * @param cls closure (of type "struct GNUNET_FS_PublishContext*")
 884  * @param fi the entry in the publish-structure
 885  * @param length length of the file or directory
 886  * @param meta metadata for the file or directory (can be modified)
 887  * @param uri pointer to the keywords that will be used for this entry (can be modified)
 888  * @param anonymity pointer to selected anonymity level (can be modified)
 889  * @param priority pointer to selected priority (can be modified)
 890  * @param expirationTime pointer to selected expiration time (can be modified)
 891  * @param client_info pointer to client context set upon creation (can be modified)
 892  * @return GNUNET_OK to continue (always)
 893  */
 894 static int
 895 fip_signal_start(void *cls,
 896                  struct GNUNET_FS_FileInformation *fi,
 897                  uint64_t length,
 898                  struct GNUNET_CONTAINER_MetaData *meta,
 899                  struct GNUNET_FS_Uri **uri,
 900                  uint32_t *anonymity,
 901                  uint32_t *priority,
 902                  struct GNUNET_TIME_Absolute *expirationTime,
 903                  void **client_info)
 904 {
 905   struct GNUNET_FS_PublishContext *sc = cls;
 906   struct GNUNET_FS_ProgressInfo pi;
 907
 908   pi.status = GNUNET_FS_STATUS_PUBLISH_START;
 909   make_publish_status (&pi, sc, fi, 0);
 910   *client_info = sc->h->upcb (sc->h->upcb_cls,
 911                               &pi);
 912   return GNUNET_OK;
 913 }
 914
 915
 916 /**
 917  * Publish a file or directory.
 918  *
 919  * @param h handle to the file sharing subsystem
 920  * @param ctx initial value to use for the '*ctx'
 921  *        in the callback (for the GNUNET_FS_STATUS_PUBLISH_START event).
 922  * @param fi information about the file or directory structure to publish
 923  * @param namespace namespace to publish the file in, NULL for no namespace
 924  * @param nid identifier to use for the publishd content in the namespace
 925  *        (can be NULL, must be NULL if namespace is NULL)
 926  * @param nuid update-identifier that will be used for future updates
 927  *        (can be NULL, must be NULL if namespace or nid is NULL)
 928  * @param options options for the publication
 929  * @return context that can be used to control the publish operation
 930  */
 931 struct GNUNET_FS_PublishContext *
 932 GNUNET_FS_publish_start (struct GNUNET_FS_Handle *h,
 933                          void *ctx,
 934                          struct GNUNET_FS_FileInformation *fi,
 935                          struct GNUNET_FS_Namespace *namespace,
 936                          const char *nid,
 937                          const char *nuid,
 938                          enum GNUNET_FS_PublishOptions options)
 939 {
 940   struct GNUNET_FS_PublishContext *ret;
 941   struct GNUNET_DATASTORE_Handle *dsh;
 942
 943   if (0 == (options & GNUNET_FS_PUBLISH_OPTION_SIMULATE_ONLY))
 944     {
 945       dsh = GNUNET_DATASTORE_connect (h->cfg,
 946                                       h->sched);
 947       if (NULL == dsh)
 948         return NULL;
 949     }
 950   else
 951     {
 952       dsh = NULL;
 953     }
 954   ret = GNUNET_malloc (sizeof (struct GNUNET_FS_PublishContext));
 955   ret->dsh = dsh;
 956   ret->h = h;
 957   ret->client_ctx = ctx;
 958   ret->fi = fi;
 959   ret->namespace = namespace;
 960   if (namespace != NULL)
 961     {
 962       namespace->rc++;
 963       GNUNET_assert (NULL != nid);
 964       ret->nid = GNUNET_strdup (nid);
 965       if (NULL != nuid)
 966         ret->nuid = GNUNET_strdup (nuid);
 967     }
 968   // FIXME: make upload persistent!
 969
 970   /* signal start */
 971   GNUNET_FS_file_information_inspect (ret->fi,
 972                                       &fip_signal_start,
 973                                       ret);
 974   ret->fi_pos = ret->fi;
 975
 976   // FIXME: calculate space needed for "fi"
 977   // and reserve as first task (then trigger
 978   // "do_upload" from that continuation)!
 979   ret->upload_task
 980     = GNUNET_SCHEDULER_add_delayed (h->sched,
 981                                     GNUNET_NO,
 982                                     GNUNET_SCHEDULER_PRIORITY_BACKGROUND,
 983                                     GNUNET_SCHEDULER_NO_TASK,
 984                                     GNUNET_TIME_UNIT_ZERO,
 985                                     &do_upload,
 986                                     ret);
 987   return ret;
 988 }
 989
 990
 991 /**
 992  * Signal the FS's progress function that we are stopping
 993  * an upload.
 994  *
 995  * @param cls closure (of type "struct GNUNET_FS_PublishContext*")
 996  * @param fi the entry in the publish-structure
 997  * @param length length of the file or directory
 998  * @param meta metadata for the file or directory (can be modified)
 999  * @param uri pointer to the keywords that will be used for this entry (can be modified)
1000  * @param anonymity pointer to selected anonymity level (can be modified)
1001  * @param priority pointer to selected priority (can be modified)
1002  * @param expirationTime pointer to selected expiration time (can be modified)
1003  * @param client_info pointer to client context set upon creation (can be modified)
1004  * @return GNUNET_OK to continue (always)
1005  */
1006 static int
1007 fip_signal_stop(void *cls,
1008                 struct GNUNET_FS_FileInformation *fi,
1009                 uint64_t length,
1010                 struct GNUNET_CONTAINER_MetaData *meta,
1011                 struct GNUNET_FS_Uri **uri,
1012                 uint32_t *anonymity,
1013                 uint32_t *priority,
1014                 struct GNUNET_TIME_Absolute *expirationTime,
1015                 void **client_info)
1016 {
1017   struct GNUNET_FS_PublishContext*sc = cls;
1018   struct GNUNET_FS_ProgressInfo pi;
1019   uint64_t off;
1020
1021   off = (fi->chk_uri == NULL) ? 0 : length;
1022   pi.status = GNUNET_FS_STATUS_PUBLISH_STOPPED;
1023   make_publish_status (&pi, sc, fi, off);
1024   GNUNET_break (NULL ==
1025                 sc->h->upcb (sc->h->upcb_cls,
1026                              &pi));
1027   *client_info = NULL;
1028   return GNUNET_OK;
1029 }
1030
1031
1032 /**
1033  * Stop an upload.  Will abort incomplete uploads (but
1034  * not remove blocks that have already been publishd) or
1035  * simply clean up the state for completed uploads.
1036  *
1037  * @param sc context for the upload to stop
1038  */
1039 void
1040 GNUNET_FS_publish_stop (struct GNUNET_FS_PublishContext *sc)
1041 {
1042   if (GNUNET_SCHEDULER_NO_TASK != sc->upload_task)
1043     GNUNET_SCHEDULER_cancel (sc->h->sched, sc->upload_task);
1044   // FIXME: remove from persistence DB (?) --- think more about
1045   //        shutdown / persistent-resume APIs!!!
1046   GNUNET_FS_file_information_inspect (sc->fi,
1047                                       &fip_signal_stop,
1048                                       sc);
1049   if (GNUNET_YES == sc->in_network_wait)
1050     {
1051       sc->in_network_wait = GNUNET_SYSERR;
1052       return;
1053     }
1054   publish_cleanup (sc);
1055 }
1056
1057
1058 /**
1059  * Context for the KSK publication.
1060  */
1061 struct PublishKskContext
1062 {
1063
1064   /**
1065    * Keywords to use.
1066    */
1067   struct GNUNET_FS_Uri *ksk_uri;
1068
1069   /**
1070    * Global FS context.
1071    */
1072   struct GNUNET_FS_Handle *h;
1073
1074   /**
1075    * The master block that we are sending
1076    * (in plaintext), has "mdsize+slen" more
1077    * bytes than the struct would suggest.
1078    */
1079   struct KBlock *kb;
1080
1081   /**
1082    * Buffer of the same size as "kb" for
1083    * the encrypted version.
1084    */
1085   struct KBlock *cpy;
1086
1087   /**
1088    * Handle to the datastore, NULL if we are just
1089    * simulating.
1090    */
1091   struct GNUNET_DATASTORE_Handle *dsh;
1092
1093   /**
1094    * Function to call once we're done.
1095    */
1096   GNUNET_FS_PublishContinuation cont;
1097
1098   /**
1099    * Closure for cont.
1100    */
1101   void *cont_cls;
1102
1103   /**
1104    * When should the KBlocks expire?
1105    */
1106   struct GNUNET_TIME_Absolute expirationTime;
1107
1108   /**
1109    * Size of the serialized metadata.
1110    */
1111   ssize_t mdsize;
1112
1113   /**
1114    * Size of the (CHK) URI as a string.
1115    */
1116   size_t slen;
1117
1118   /**
1119    * Keyword that we are currently processing.
1120    */
1121   unsigned int i;
1122
1123   /**
1124    * Anonymity level for the KBlocks.
1125    */
1126   uint32_t anonymity;
1127
1128   /**
1129    * Priority for the KBlocks.
1130    */
1131   uint32_t priority;
1132 };
1133
1134
1135 /**
1136  * Continuation of "GNUNET_FS_publish_ksk" that performs
1137  * the actual publishing operation (iterating over all
1138  * of the keywords).
1139  *
1140  * @param cls closure of type "struct PublishKskContext*"
1141  * @param tc unused
1142  */
1143 static void
1144 publish_ksk_cont (void *cls,
1145                   const struct GNUNET_SCHEDULER_TaskContext *tc);
1146
1147
1148 /**
1149  * Function called by the datastore API with
1150  * the result from the PUT request.
1151  *
1152  * @param cls closure of type "struct PublishKskContext*"
1153  * @param success GNUNET_OK on success
1154  * @param msg error message (or NULL)
1155  */
1156 static void
1157 kb_put_cont (void *cls,
1158              int success,
1159              const char *msg)
1160 {
1161   struct PublishKskContext *pkc = cls;
1162
1163   if (GNUNET_OK != success)
1164     {
1165       GNUNET_DATASTORE_disconnect (pkc->dsh, GNUNET_NO);
1166       GNUNET_free (pkc->cpy);
1167       GNUNET_free (pkc->kb);
1168       pkc->cont (pkc->cont_cls,
1169                  NULL,
1170                  msg);
1171       GNUNET_FS_uri_destroy (pkc->ksk_uri);
1172       GNUNET_free (pkc);
1173       return;
1174     }
1175   GNUNET_SCHEDULER_add_continuation (pkc->h->sched,
1176                                      GNUNET_NO,
1177                                      &publish_ksk_cont,
1178                                      pkc,
1179                                      GNUNET_SCHEDULER_REASON_PREREQ_DONE);
1180 }
1181
1182
1183 /**
1184  * Continuation of "GNUNET_FS_publish_ksk" that performs
1185  * the actual publishing operation (iterating over all
1186  * of the keywords).
1187  *
1188  * @param cls closure of type "struct PublishKskContext*"
1189  * @param tc unused
1190  */
1191 static void
1192 publish_ksk_cont (void *cls,
1193                   const struct GNUNET_SCHEDULER_TaskContext *tc)
1194 {
1195   struct PublishKskContext *pkc = cls;
1196   const char *keyword;
1197   GNUNET_HashCode key;
1198   GNUNET_HashCode query;
1199   struct GNUNET_CRYPTO_AesSessionKey skey;
1200   struct GNUNET_CRYPTO_AesInitializationVector iv;
1201   struct GNUNET_CRYPTO_RsaPrivateKey *pk;
1202
1203
1204   if ( (pkc->i == pkc->ksk_uri->data.ksk.keywordCount) ||
1205        (NULL == pkc->dsh) )
1206     {
1207       if (NULL != pkc->dsh)
1208         GNUNET_DATASTORE_disconnect (pkc->dsh, GNUNET_NO);
1209       GNUNET_free (pkc->cpy);
1210       GNUNET_free (pkc->kb);
1211       pkc->cont (pkc->cont_cls,
1212                  pkc->ksk_uri,
1213                  NULL);
1214       GNUNET_FS_uri_destroy (pkc->ksk_uri);
1215       GNUNET_free (pkc);
1216       return;
1217     }
1218   keyword = pkc->ksk_uri->data.ksk.keywords[pkc->i++];
1219   /* first character of keyword indicates if it is
1220      mandatory or not -- ignore for hashing */
1221   GNUNET_CRYPTO_hash (&keyword[1], strlen (&keyword[1]), &key);
1222   GNUNET_CRYPTO_hash_to_aes_key (&key, &skey, &iv);
1223   GNUNET_CRYPTO_aes_encrypt (&pkc->kb[1],
1224                              pkc->slen + pkc->mdsize,
1225                              &skey,
1226                              &iv,
1227                              &pkc->cpy[1]);
1228   pk = GNUNET_CRYPTO_rsa_key_create_from_hash (&key);
1229   GNUNET_CRYPTO_rsa_key_get_public (pk, &pkc->cpy->keyspace);
1230   GNUNET_CRYPTO_hash (&pkc->cpy->keyspace,
1231                       sizeof (struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded),
1232                       &query);
1233   GNUNET_assert (GNUNET_OK ==
1234                  GNUNET_CRYPTO_rsa_sign (pk,
1235                                          &pkc->cpy->purpose,
1236                                          &pkc->cpy->signature));
1237   GNUNET_CRYPTO_rsa_key_free (pk);
1238   GNUNET_DATASTORE_put (pkc->dsh,
1239                         0,
1240                         &query,
1241                         pkc->mdsize +
1242                         sizeof (struct KBlock) +
1243                         pkc->slen,
1244                         pkc->cpy,
1245                         GNUNET_DATASTORE_BLOCKTYPE_KBLOCK,
1246                         pkc->priority,
1247                         pkc->anonymity,
1248                         pkc->expirationTime,
1249                         GNUNET_CONSTANTS_SERVICE_TIMEOUT,
1250                         &kb_put_cont,
1251                         pkc);
1252 }
1253
1254
1255 /**
1256  * Publish a CHK under various keywords on GNUnet.
1257  *
1258  * @param h handle to the file sharing subsystem
1259  * @param ksk_uri keywords to use
1260  * @param meta metadata to use
1261  * @param uri URI to refer to in the KBlock
1262  * @param expirationTime when the KBlock expires
1263  * @param anonymity anonymity level for the KBlock
1264  * @param priority priority for the KBlock
1265  * @param options publication options
1266  * @param cont continuation
1267  * @param cont_cls closure for cont
1268  */
1269 void
1270 GNUNET_FS_publish_ksk (struct GNUNET_FS_Handle *h,
1271                        struct GNUNET_FS_Uri *ksk_uri,
1272                        struct GNUNET_CONTAINER_MetaData *meta,
1273                        struct GNUNET_FS_Uri *uri,
1274                        struct GNUNET_TIME_Absolute expirationTime,
1275                        uint32_t anonymity,
1276                        uint32_t priority,
1277                        enum GNUNET_FS_PublishOptions options,
1278                        GNUNET_FS_PublishContinuation cont,
1279                        void *cont_cls)
1280 {
1281   struct PublishKskContext *pkc;
1282   char *uris;
1283   size_t size;
1284   char *kbe;
1285
1286   pkc = GNUNET_malloc (sizeof (struct PublishKskContext));
1287   pkc->h = h;
1288   pkc->expirationTime = expirationTime;
1289   pkc->anonymity = anonymity;
1290   pkc->priority = priority;
1291   pkc->cont = cont;
1292   pkc->cont_cls = cont_cls;
1293   if (0 == (options & GNUNET_FS_PUBLISH_OPTION_SIMULATE_ONLY))
1294     {
1295       pkc->dsh = GNUNET_DATASTORE_connect (h->cfg,
1296                                            h->sched);
1297       if (pkc->dsh == NULL)
1298         {
1299           cont (cont_cls, NULL, _("Could not connect to datastore."));
1300           GNUNET_free (pkc);
1301           return;
1302         }
1303     }
1304   pkc->mdsize = GNUNET_CONTAINER_meta_data_get_serialized_size (meta,
1305                                                                 GNUNET_CONTAINER_META_DATA_SERIALIZE_PART);
1306   GNUNET_assert (pkc->mdsize >= 0);
1307   uris = GNUNET_FS_uri_to_string (uri);
1308   pkc->slen = strlen (uris) + 1;
1309   size = pkc->mdsize + sizeof (struct KBlock) + pkc->slen;
1310   if (size > MAX_KBLOCK_SIZE)
1311     {
1312       size = MAX_KBLOCK_SIZE;
1313       pkc->mdsize = size - sizeof (struct KBlock) - pkc->slen;
1314     }
1315   pkc->kb = GNUNET_malloc (size);
1316   kbe = (char *) &pkc->kb[1];
1317   memcpy (kbe, uris, pkc->slen);
1318   GNUNET_free (uris);
1319   pkc->mdsize = GNUNET_CONTAINER_meta_data_serialize (meta,
1320                                                       &kbe[pkc->slen],
1321                                                       pkc->mdsize,
1322                                                       GNUNET_CONTAINER_META_DATA_SERIALIZE_PART);
1323   if (pkc->mdsize == -1)
1324     {
1325       GNUNET_break (0);
1326       GNUNET_free (uris);
1327       GNUNET_free (pkc->kb);
1328       if (pkc->dsh != NULL)
1329         GNUNET_DATASTORE_disconnect (pkc->dsh, GNUNET_NO);
1330       cont (cont_cls, NULL, _("Internal error."));
1331       GNUNET_free (pkc);
1332       return;
1333     }
1334   size = sizeof (struct KBlock) + pkc->slen + pkc->mdsize;
1335
1336   pkc->cpy = GNUNET_malloc (size);
1337   pkc->cpy->purpose.size = htonl (sizeof (struct GNUNET_CRYPTO_RsaSignaturePurpose) +
1338                                   sizeof(struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded) +
1339                                   pkc->mdsize +
1340                                   pkc->slen);
1341   pkc->cpy->purpose.purpose = htonl(GNUNET_SIGNATURE_PURPOSE_FS_KBLOCK);
1342   pkc->ksk_uri = GNUNET_FS_uri_dup (ksk_uri);
1343   GNUNET_SCHEDULER_add_continuation (h->sched,
1344                                      GNUNET_NO,
1345                                      &publish_ksk_cont,
1346                                      pkc,
1347                                      GNUNET_SCHEDULER_REASON_PREREQ_DONE);
1348 }
1349
1350
1351 /**
1352  * Context for the SKS publication.
1353  */
1354 struct PublishSksContext
1355 {
1356
1357   /**
1358    * Global FS context.
1359    */
1360   struct GNUNET_FS_Uri *uri;
1361
1362   /**
1363    * Handle to the datastore.
1364    */
1365   struct GNUNET_DATASTORE_Handle *dsh;
1366
1367   /**
1368    * Function to call once we're done.
1369    */
1370   GNUNET_FS_PublishContinuation cont;
1371
1372   /**
1373    * Closure for cont.
1374    */
1375   void *cont_cls;
1376
1377 };
1378
1379
1380 /**
1381  * Function called by the datastore API with
1382  * the result from the PUT (SBlock) request.
1383  *
1384  * @param cls closure of type "struct PublishSksContext*"
1385  * @param success GNUNET_OK on success
1386  * @param msg error message (or NULL)
1387  */
1388 static void
1389 sb_put_cont (void *cls,
1390              int success,
1391              const char *msg)
1392 {
1393   struct PublishSksContext *psc = cls;
1394
1395   if (NULL != psc->dsh)
1396     GNUNET_DATASTORE_disconnect (psc->dsh, GNUNET_NO);
1397   if (GNUNET_OK != success)
1398     psc->cont (psc->cont_cls,
1399                NULL,
1400                msg);
1401   else
1402     psc->cont (psc->cont_cls,
1403                psc->uri,
1404                NULL);
1405   GNUNET_FS_uri_destroy (psc->uri);
1406   GNUNET_free (psc);
1407 }
1408
1409
1410 /**
1411  * Publish an SBlock on GNUnet.
1412  *
1413  * @param h handle to the file sharing subsystem
1414  * @param namespace namespace to publish in
1415  * @param identifier identifier to use
1416  * @param update update identifier to use
1417  * @param meta metadata to use
1418  * @param uri URI to refer to in the SBlock
1419  * @param expirationTime when the SBlock expires
1420  * @param anonymity anonymity level for the SBlock
1421  * @param priority priority for the SBlock
1422  * @param options publication options
1423  * @param cont continuation
1424  * @param cont_cls closure for cont
1425  */
1426 void
1427 GNUNET_FS_publish_sks (struct GNUNET_FS_Handle *h,
1428                        struct GNUNET_FS_Namespace *namespace,
1429                        const char *identifier,
1430                        const char *update,
1431                        struct GNUNET_CONTAINER_MetaData *meta,
1432                        struct GNUNET_FS_Uri *uri,
1433                        struct GNUNET_TIME_Absolute expirationTime,
1434                        uint32_t anonymity,
1435                        uint32_t priority,
1436                        enum GNUNET_FS_PublishOptions options,
1437                        GNUNET_FS_PublishContinuation cont,
1438                        void *cont_cls)
1439 {
1440   struct PublishSksContext *psc;
1441   struct GNUNET_CRYPTO_AesSessionKey sk;
1442   struct GNUNET_CRYPTO_AesInitializationVector iv;
1443   struct GNUNET_FS_Uri *sks_uri;
1444   char *uris;
1445   size_t size;
1446   size_t slen;
1447   size_t nidlen;
1448   size_t idlen;
1449   ssize_t mdsize;
1450   struct SBlock *sb;
1451   struct SBlock *sb_enc;
1452   char *dest;
1453   GNUNET_HashCode key;           /* hash of thisId = key */
1454   GNUNET_HashCode id;          /* hash of hc = identifier */
1455
1456   uris = GNUNET_FS_uri_to_string (uri);
1457   slen = strlen (uris) + 1;
1458   idlen = strlen (identifier);
1459   if (update == NULL)
1460     update = "";
1461   nidlen = strlen (update) + 1;
1462   mdsize = GNUNET_CONTAINER_meta_data_get_serialized_size (meta,
1463                                                            GNUNET_CONTAINER_META_DATA_SERIALIZE_PART);
1464
1465   size = sizeof (struct SBlock) + slen + nidlen + mdsize;
1466   if (size > MAX_SBLOCK_SIZE)
1467     {
1468       size = MAX_SBLOCK_SIZE;
1469       mdsize = size - (sizeof (struct SBlock) + slen + nidlen);
1470     }
1471   sb = GNUNET_malloc (sizeof (struct SBlock) + size);
1472   dest = (char *) &sb[1];
1473   memcpy (dest, update, nidlen);
1474   dest += nidlen;
1475   memcpy (dest, uris, slen);
1476   dest += slen;
1477   mdsize = GNUNET_CONTAINER_meta_data_serialize (meta,
1478                                                  dest,
1479                                                  mdsize,
1480                                                  GNUNET_CONTAINER_META_DATA_SERIALIZE_PART);
1481   if (mdsize == -1)
1482     {
1483       GNUNET_break (0);
1484       GNUNET_free (uris);
1485       GNUNET_free (sb);
1486       cont (cont_cls,
1487             NULL,
1488             _("Internal error."));
1489       return;
1490     }
1491   size = sizeof (struct SBlock) + mdsize + slen + nidlen;
1492   sb_enc = GNUNET_malloc (sizeof (struct SBlock) + size);
1493   GNUNET_CRYPTO_hash (identifier, idlen, &key);
1494   GNUNET_CRYPTO_hash (&key, sizeof (GNUNET_HashCode), &id);
1495   sks_uri = GNUNET_malloc (sizeof (struct GNUNET_FS_Uri));
1496   sks_uri->type = sks;
1497   GNUNET_CRYPTO_rsa_key_get_public (namespace->key, &sb_enc->subspace);
1498   GNUNET_CRYPTO_hash (&sb_enc->subspace,
1499                       sizeof (struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded),
1500                       &sks_uri->data.sks.namespace);
1501   sks_uri->data.sks.identifier = GNUNET_strdup (identifier);
1502   GNUNET_CRYPTO_hash_xor (&id,
1503                           &sks_uri->data.sks.namespace,
1504                           &sb_enc->identifier);
1505   GNUNET_CRYPTO_hash_to_aes_key (&key, &sk, &iv);
1506   GNUNET_CRYPTO_aes_encrypt (&sb[1],
1507                              size - sizeof (struct SBlock),
1508                              &sk,
1509                              &iv,
1510                              &sb_enc[1]);
1511   GNUNET_free (sb);
1512   sb_enc->purpose.purpose = htonl (GNUNET_SIGNATURE_PURPOSE_FS_SBLOCK);
1513   sb_enc->purpose.size = htonl(slen + mdsize + nidlen
1514                                + sizeof(struct SBlock)
1515                                - sizeof(struct GNUNET_CRYPTO_RsaSignature));
1516   GNUNET_assert (GNUNET_OK ==
1517                  GNUNET_CRYPTO_rsa_sign (namespace->key,
1518                                          &sb_enc->purpose,
1519                                          &sb_enc->signature));
1520   psc = GNUNET_malloc (sizeof(struct PublishSksContext));
1521   psc->uri = sks_uri;
1522   psc->cont = cont;
1523   psc->cont_cls = cont_cls;
1524   if (0 != (options & GNUNET_FS_PUBLISH_OPTION_SIMULATE_ONLY))
1525     {
1526       GNUNET_free (sb_enc);
1527       sb_put_cont (psc,
1528                    GNUNET_OK,
1529                    NULL);
1530       return;
1531     }
1532   psc->dsh = GNUNET_DATASTORE_connect (h->cfg, h->sched);
1533   if (NULL == psc->dsh)
1534     {
1535       GNUNET_free (sb_enc);
1536       sb_put_cont (psc,
1537                    GNUNET_NO,
1538                    _("Failed to connect to datastore."));
1539       return;
1540     }
1541
1542   GNUNET_DATASTORE_put (psc->dsh,
1543                         0,
1544                         &sb->identifier,
1545                         size,
1546                         sb_enc,
1547                         GNUNET_DATASTORE_BLOCKTYPE_SBLOCK,
1548                         priority,
1549                         anonymity,
1550                         expirationTime,
1551                         GNUNET_CONSTANTS_SERVICE_TIMEOUT,
1552                         &sb_put_cont,
1553                         psc);
1554   GNUNET_free (sb_enc);
1555 }
1556
1557
1558 /* end of fs_publish.c */