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