src/fs/test_fs_unindex_persistence.c

   1 /*
   2      This file is part of GNUnet.
   3      (C) 2004, 2005, 2006, 2008, 2009, 2010 Christian Grothoff (and other contributing authors)
   4
   5      GNUnet is free software; you can redistribute it and/or modify
   6      it under the terms of the GNU General Public License as published
   7      by the Free Software Foundation; either version 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/test_fs_unindex_persistence.c
  23  * @brief simple testcase for simple publish + unindex operation
  24  * @author Christian Grothoff
  25  */
  26 #include "platform.h"
  27 #include "gnunet_util_lib.h"
  28 #include "gnunet_arm_service.h"
  29 #include "gnunet_fs_service.h"
  30
  31 #define VERBOSE GNUNET_EXTRA_LOGGING
  32
  33 #define START_ARM GNUNET_YES
  34
  35 /**
  36  * File-size we use for testing.
  37  */
  38 #define FILESIZE (1024 * 1024 * 2)
  39
  40 /**
  41  * How long until we give up on transmitting the message?
  42  */
  43 #define TIMEOUT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 60)
  44
  45 /**
  46  * How long should our test-content live?
  47  */
  48 #define LIFETIME GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_MINUTES, 15)
  49
  50 struct PeerContext
  51 {
  52   struct GNUNET_CONFIGURATION_Handle *cfg;
  53 #if START_ARM
  54   struct GNUNET_OS_Process *arm_proc;
  55 #endif
  56 };
  57
  58 static struct PeerContext p1;
  59
  60 static struct GNUNET_TIME_Absolute start;
  61
  62 static struct GNUNET_FS_Handle *fs;
  63
  64 static struct GNUNET_FS_UnindexContext *unindex;
  65
  66 static struct GNUNET_FS_PublishContext *publish;
  67
  68 static char *fn;
  69
  70 static const struct GNUNET_CONFIGURATION_Handle *cfg;
  71
  72 static void
  73 abort_publish_task (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
  74 {
  75   GNUNET_FS_publish_stop (publish);
  76   publish = NULL;
  77 }
  78
  79
  80 static void
  81 abort_unindex_task (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
  82 {
  83   if (unindex != NULL)
  84   {
  85     GNUNET_FS_unindex_stop (unindex);
  86     unindex = NULL;
  87   }
  88   if (fn != NULL)
  89   {
  90     GNUNET_DISK_directory_remove (fn);
  91     GNUNET_free (fn);
  92     fn = NULL;
  93   }
  94 }
  95
  96
  97 static void *
  98 progress_cb (void *cls, const struct GNUNET_FS_ProgressInfo *event);
  99
 100
 101 static void
 102 restart_fs_task (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
 103 {
 104   GNUNET_FS_stop (fs);
 105   fs = GNUNET_FS_start (cfg, "test-fs-unindex-persistence", &progress_cb, NULL,
 106                         GNUNET_FS_FLAGS_PERSISTENCE, GNUNET_FS_OPTIONS_END);
 107 }
 108
 109
 110 /**
 111  * Consider scheduling the restart-task.
 112  * Only runs the restart task once per event
 113  * category.
 114  *
 115  * @param ev type of the event to consider
 116  */
 117 static void
 118 consider_restart (int ev)
 119 {
 120   static int prev[32];
 121   static int off;
 122   int i;
 123
 124   for (i = 0; i < off; i++)
 125     if (prev[i] == ev)
 126       return;
 127   prev[off++] = ev;
 128   GNUNET_SCHEDULER_add_with_priority (GNUNET_SCHEDULER_PRIORITY_URGENT,
 129                                       &restart_fs_task, NULL);
 130 }
 131
 132
 133 static void *
 134 progress_cb (void *cls, const struct GNUNET_FS_ProgressInfo *event)
 135 {
 136   switch (event->status)
 137   {
 138   case GNUNET_FS_STATUS_PUBLISH_PROGRESS:
 139 #if VERBOSE
 140     printf ("Publish is progressing (%llu/%llu at level %u off %llu)...\n",
 141             (unsigned long long) event->value.publish.completed,
 142             (unsigned long long) event->value.publish.size,
 143             event->value.publish.specifics.progress.depth,
 144             (unsigned long long) event->value.publish.specifics.
 145             progress.offset);
 146 #endif
 147     break;
 148   case GNUNET_FS_STATUS_PUBLISH_COMPLETED:
 149     printf ("Publishing complete, %llu kbps.\n",
 150             (unsigned long long) (FILESIZE * 1000 /
 151                                   (1 +
 152                                    GNUNET_TIME_absolute_get_duration
 153                                    (start).rel_value) / 1024));
 154     start = GNUNET_TIME_absolute_get ();
 155     unindex = GNUNET_FS_unindex_start (fs, fn, "unindex");
 156     GNUNET_assert (unindex != NULL);
 157     break;
 158   case GNUNET_FS_STATUS_UNINDEX_COMPLETED:
 159     printf ("Unindex complete,  %llu kbps.\n",
 160             (unsigned long long) (FILESIZE * 1000 /
 161                                   (1 +
 162                                    GNUNET_TIME_absolute_get_duration
 163                                    (start).rel_value) / 1024));
 164     GNUNET_SCHEDULER_add_continuation (&abort_unindex_task, NULL,
 165                                        GNUNET_SCHEDULER_REASON_PREREQ_DONE);
 166     break;
 167   case GNUNET_FS_STATUS_UNINDEX_PROGRESS:
 168     consider_restart (event->status);
 169     GNUNET_assert (unindex == event->value.unindex.uc);
 170 #if VERBOSE
 171     printf ("Unindex is progressing (%llu/%llu at level %u off %llu)...\n",
 172             (unsigned long long) event->value.unindex.completed,
 173             (unsigned long long) event->value.unindex.size,
 174             event->value.unindex.specifics.progress.depth,
 175             (unsigned long long) event->value.unindex.specifics.
 176             progress.offset);
 177 #endif
 178     break;
 179   case GNUNET_FS_STATUS_PUBLISH_SUSPEND:
 180     if (event->value.publish.pc == publish)
 181       publish = NULL;
 182     break;
 183   case GNUNET_FS_STATUS_PUBLISH_RESUME:
 184     if (NULL == publish)
 185     {
 186       publish = event->value.publish.pc;
 187       return "publish-context";
 188     }
 189     break;
 190   case GNUNET_FS_STATUS_UNINDEX_SUSPEND:
 191     GNUNET_assert (event->value.unindex.uc == unindex);
 192     unindex = NULL;
 193     break;
 194   case GNUNET_FS_STATUS_UNINDEX_RESUME:
 195     GNUNET_assert (NULL == unindex);
 196     unindex = event->value.unindex.uc;
 197     return "unindex";
 198   case GNUNET_FS_STATUS_PUBLISH_ERROR:
 199     FPRINTF (stderr, "Error publishing file: %s\n",
 200              event->value.publish.specifics.error.message);
 201     GNUNET_break (0);
 202     GNUNET_SCHEDULER_add_continuation (&abort_publish_task, NULL,
 203                                        GNUNET_SCHEDULER_REASON_PREREQ_DONE);
 204     break;
 205   case GNUNET_FS_STATUS_UNINDEX_ERROR:
 206     FPRINTF (stderr, "Error unindexing file: %s\n",
 207              event->value.unindex.specifics.error.message);
 208     GNUNET_SCHEDULER_add_continuation (&abort_unindex_task, NULL,
 209                                        GNUNET_SCHEDULER_REASON_PREREQ_DONE);
 210     break;
 211   case GNUNET_FS_STATUS_PUBLISH_START:
 212     GNUNET_assert (0 == strcmp ("publish-context", event->value.publish.cctx));
 213     GNUNET_assert (NULL == event->value.publish.pctx);
 214     GNUNET_assert (FILESIZE == event->value.publish.size);
 215     GNUNET_assert (0 == event->value.publish.completed);
 216     GNUNET_assert (1 == event->value.publish.anonymity);
 217     break;
 218   case GNUNET_FS_STATUS_PUBLISH_STOPPED:
 219     GNUNET_assert (publish == event->value.publish.pc);
 220     GNUNET_assert (FILESIZE == event->value.publish.size);
 221     GNUNET_assert (1 == event->value.publish.anonymity);
 222     GNUNET_FS_stop (fs);
 223     fs = NULL;
 224     break;
 225   case GNUNET_FS_STATUS_UNINDEX_START:
 226     consider_restart (event->status);
 227     GNUNET_assert (unindex == NULL);
 228     GNUNET_assert (0 == strcmp ("unindex", event->value.unindex.cctx));
 229     GNUNET_assert (0 == strcmp (fn, event->value.unindex.filename));
 230     GNUNET_assert (FILESIZE == event->value.unindex.size);
 231     GNUNET_assert (0 == event->value.unindex.completed);
 232     break;
 233   case GNUNET_FS_STATUS_UNINDEX_STOPPED:
 234     GNUNET_assert (unindex == event->value.unindex.uc);
 235     GNUNET_SCHEDULER_add_continuation (&abort_publish_task, NULL,
 236                                        GNUNET_SCHEDULER_REASON_PREREQ_DONE);
 237     break;
 238   default:
 239     printf ("Unexpected event: %d\n", event->status);
 240     break;
 241   }
 242   return NULL;
 243 }
 244
 245
 246 static void
 247 setup_peer (struct PeerContext *p, const char *cfgname)
 248 {
 249   p->cfg = GNUNET_CONFIGURATION_create ();
 250 #if START_ARM
 251   p->arm_proc =
 252       GNUNET_OS_start_process (NULL, NULL, "gnunet-service-arm",
 253                                "gnunet-service-arm",
 254 #if VERBOSE
 255                                "-L", "DEBUG",
 256 #endif
 257                                "-c", cfgname, NULL);
 258 #endif
 259   GNUNET_assert (GNUNET_OK == GNUNET_CONFIGURATION_load (p->cfg, cfgname));
 260 }
 261
 262
 263 static void
 264 stop_arm (struct PeerContext *p)
 265 {
 266 #if START_ARM
 267   if (NULL != p->arm_proc)
 268   {
 269     if (0 != GNUNET_OS_process_kill (p->arm_proc, SIGTERM))
 270       GNUNET_log_strerror (GNUNET_ERROR_TYPE_WARNING, "kill");
 271     if (GNUNET_OS_process_wait (p->arm_proc) != GNUNET_OK)
 272       GNUNET_log_strerror (GNUNET_ERROR_TYPE_WARNING, "waitpid");
 273     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "ARM process %u stopped\n",
 274                 GNUNET_OS_process_get_pid (p->arm_proc));
 275     GNUNET_OS_process_close (p->arm_proc);
 276     p->arm_proc = NULL;
 277   }
 278 #endif
 279   GNUNET_CONFIGURATION_destroy (p->cfg);
 280 }
 281
 282
 283 static void
 284 run (void *cls, char *const *args, const char *cfgfile,
 285      const struct GNUNET_CONFIGURATION_Handle *c)
 286 {
 287   const char *keywords[] = {
 288     "down_foo",
 289     "down_bar",
 290   };
 291   char *buf;
 292   struct GNUNET_CONTAINER_MetaData *meta;
 293   struct GNUNET_FS_Uri *kuri;
 294   struct GNUNET_FS_FileInformation *fi;
 295   size_t i;
 296   struct GNUNET_FS_BlockOptions bo;
 297
 298   cfg = c;
 299   setup_peer (&p1, "test_fs_unindex_data.conf");
 300   fn = GNUNET_DISK_mktemp ("gnunet-unindex-test-dst");
 301   fs = GNUNET_FS_start (cfg, "test-fs-unindex-persistence", &progress_cb, NULL,
 302                         GNUNET_FS_FLAGS_PERSISTENCE, GNUNET_FS_OPTIONS_END);
 303   GNUNET_assert (NULL != fs);
 304   buf = GNUNET_malloc (FILESIZE);
 305   for (i = 0; i < FILESIZE; i++)
 306     buf[i] = GNUNET_CRYPTO_random_u32 (GNUNET_CRYPTO_QUALITY_WEAK, 256);
 307   GNUNET_assert (FILESIZE ==
 308                  GNUNET_DISK_fn_write (fn, buf, FILESIZE,
 309                                        GNUNET_DISK_PERM_USER_READ |
 310                                        GNUNET_DISK_PERM_USER_WRITE));
 311   GNUNET_free (buf);
 312   meta = GNUNET_CONTAINER_meta_data_create ();
 313   kuri = GNUNET_FS_uri_ksk_create_from_args (2, keywords);
 314   bo.content_priority = 42;
 315   bo.anonymity_level = 1;
 316   bo.replication_level = 0;
 317   bo.expiration_time = GNUNET_TIME_relative_to_absolute (LIFETIME);
 318   fi = GNUNET_FS_file_information_create_from_file (fs, "publish-context", fn,
 319                                                     kuri, meta, GNUNET_YES,
 320                                                     &bo);
 321   GNUNET_FS_uri_destroy (kuri);
 322   GNUNET_CONTAINER_meta_data_destroy (meta);
 323   GNUNET_assert (NULL != fi);
 324   start = GNUNET_TIME_absolute_get ();
 325   publish =
 326       GNUNET_FS_publish_start (fs, fi, NULL, NULL, NULL,
 327                                GNUNET_FS_PUBLISH_OPTION_NONE);
 328   GNUNET_assert (publish != NULL);
 329 }
 330
 331
 332 int
 333 main (int argc, char *argv[])
 334 {
 335   char *const argvx[] = {
 336     "test-fs-unindex",
 337     "-c",
 338     "test_fs_unindex_data.conf",
 339 #if VERBOSE
 340     "-L", "DEBUG",
 341 #endif
 342     NULL
 343   };
 344   struct GNUNET_GETOPT_CommandLineOption options[] = {
 345     GNUNET_GETOPT_OPTION_END
 346   };
 347
 348   GNUNET_log_setup ("test_fs_unindex_persistence",
 349 #if VERBOSE
 350                     "DEBUG",
 351 #else
 352                     "WARNING",
 353 #endif
 354                     NULL);
 355   GNUNET_PROGRAM_run ((sizeof (argvx) / sizeof (char *)) - 1, argvx,
 356                       "test-fs-unindex", "nohelp", options, &run, NULL);
 357   stop_arm (&p1);
 358   GNUNET_DISK_directory_remove ("/tmp/gnunet-test-fs-unindex/");
 359   if (NULL != fn)
 360   {
 361     GNUNET_DISK_directory_remove (fn);
 362     GNUNET_free (fn);
 363   }
 364   return 0;
 365 }
 366
 367 /* end of test_fs_unindex_persistence.c */