- return value
[oweals/gnunet.git] / src / namestore / test_namestore_api_create_update.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  * @file namestore/test_namestore_api.c
22  * @brief testcase for namestore_api.c for updating an existing record
23  */
24 #include "platform.h"
25 #include "gnunet_common.h"
26 #include "gnunet_namestore_service.h"
27 #include "namestore.h"
28 #include "gnunet_signatures.h"
29
30 #define VERBOSE GNUNET_NO
31
32 #define RECORDS 1
33 #define TEST_RECORD_TYPE 1234
34 #define TEST_RECORD_DATALEN 123
35 #define TEST_RECORD_DATA 'a'
36
37 #define TEST_CREATE_RECORD_TYPE 4321
38 #define TEST_CREATE_RECORD_DATALEN 255
39 #define TEST_CREATE_RECORD_DATA 'b'
40
41 #define TIMEOUT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 10)
42
43 static struct GNUNET_NAMESTORE_Handle * nsh;
44
45 static GNUNET_SCHEDULER_TaskIdentifier endbadly_task;
46 static struct GNUNET_OS_Process *arm;
47
48 static struct GNUNET_CRYPTO_RsaPrivateKey * privkey;
49 static struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded pubkey;
50 struct GNUNET_CRYPTO_RsaSignature *s_signature;
51 struct GNUNET_CRYPTO_RsaSignature *s_signature_updated;
52 static GNUNET_HashCode s_zone;
53 struct GNUNET_NAMESTORE_RecordData *s_first_record;
54 struct GNUNET_NAMESTORE_RecordData *s_second_record;
55 static char *s_name;
56
57
58
59 static int res;
60
61 static void
62 start_arm (const char *cfgname)
63 {
64   arm = GNUNET_OS_start_process (GNUNET_YES, NULL, NULL, "gnunet-service-arm",
65                                "gnunet-service-arm", "-c", cfgname,
66 #if VERBOSE_PEERS
67                                "-L", "DEBUG",
68 #else
69                                "-L", "ERROR",
70 #endif
71                                NULL);
72 }
73
74 static void
75 stop_arm ()
76 {
77   if (NULL != arm)
78   {
79     if (0 != GNUNET_OS_process_kill (arm, SIGTERM))
80       GNUNET_log_strerror (GNUNET_ERROR_TYPE_WARNING, "kill");
81     GNUNET_OS_process_wait (arm);
82     GNUNET_OS_process_close (arm);
83     arm = NULL;
84   }
85 }
86
87 /**
88  * Re-establish the connection to the service.
89  *
90  * @param cls handle to use to re-connect.
91  * @param tc scheduler context
92  */
93 static void
94 endbadly (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
95 {
96   if (nsh != NULL)
97     GNUNET_NAMESTORE_disconnect (nsh, GNUNET_YES);
98   nsh = NULL;
99
100   if (privkey != NULL)
101     GNUNET_CRYPTO_rsa_key_free (privkey);
102   privkey = NULL;
103
104   if (NULL != arm)
105     stop_arm();
106
107   res = 1;
108 }
109
110
111 static void
112 end (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
113 {
114   if (endbadly_task != GNUNET_SCHEDULER_NO_TASK)
115   {
116     GNUNET_SCHEDULER_cancel (endbadly_task);
117     endbadly_task = GNUNET_SCHEDULER_NO_TASK;
118   }
119
120   GNUNET_free ((void *) s_first_record->data);
121   GNUNET_free (s_first_record);
122   GNUNET_free_non_null (s_second_record);
123
124   if (privkey != NULL)
125     GNUNET_CRYPTO_rsa_key_free (privkey);
126   privkey = NULL;
127
128   if (nsh != NULL)
129     GNUNET_NAMESTORE_disconnect (nsh, GNUNET_YES);
130   nsh = NULL;
131
132   if (NULL != arm)
133     stop_arm();
134 }
135
136 void name_lookup_second_proc (void *cls,
137                             const struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded *zone_key,
138                             struct GNUNET_TIME_Absolute expire,
139                             const char *n,
140                             unsigned int rd_count,
141                             const struct GNUNET_NAMESTORE_RecordData *rd,
142                             const struct GNUNET_CRYPTO_RsaSignature *signature)
143 {
144   static int found = GNUNET_NO;
145   int failed = GNUNET_NO;
146   int c;
147
148   if (n != NULL)
149   {
150     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Checking returned results\n");
151     if (0 != memcmp (zone_key, &pubkey, sizeof (struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded)))
152     {
153       GNUNET_break (0);
154       failed = GNUNET_YES;
155     }
156
157     if (0 != strcmp(n, s_name))
158     {
159       GNUNET_break (0);
160       failed = GNUNET_YES;
161     }
162
163     if (2 != rd_count)
164     {
165       GNUNET_break (0);
166       failed = GNUNET_YES;
167     }
168
169     for (c = 0; c < rd_count; c++)
170     {
171       if ((GNUNET_NO == GNUNET_NAMESTORE_records_cmp(&rd[c], s_first_record)) &&
172           (GNUNET_NO == GNUNET_NAMESTORE_records_cmp(&rd[c], s_second_record)))
173       {
174         GNUNET_break (0);
175         failed = GNUNET_YES;
176       }
177     }
178
179     if (GNUNET_OK != GNUNET_NAMESTORE_verify_signature(&pubkey, n, rd_count, rd, signature))
180     {
181       GNUNET_break (0);
182       failed = GNUNET_YES;
183     }
184
185     struct GNUNET_NAMESTORE_RecordData rd_new[2];
186     rd_new[0] = *s_first_record;
187     rd_new[1] = *s_second_record;
188     s_signature_updated = GNUNET_NAMESTORE_create_signature(privkey, s_name, rd_new, 2);
189
190     if (0 != memcmp (s_signature_updated, signature, sizeof (struct GNUNET_CRYPTO_RsaSignature)))
191     {
192       GNUNET_break (0);
193       failed = GNUNET_YES;
194     }
195
196     found = GNUNET_YES;
197     if (failed == GNUNET_NO)
198       res = 0;
199     else
200       res = 1;
201   }
202   else
203   {
204     if (found != GNUNET_YES)
205     {
206       GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Failed to lookup records for name `%s'\n", s_name);
207       res = 1;
208     }
209     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Lookup done for name %s'\n", s_name);
210   }
211   GNUNET_SCHEDULER_add_now(&end, NULL);
212 }
213
214
215 void
216 create_second_cont (void *cls, int32_t success, const char *emsg)
217 {
218   char *name = cls;
219   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Create second record for `%s': %s\n", name, (success == GNUNET_OK) ? "SUCCESS" : "FAIL");
220   if (success == GNUNET_OK)
221   {
222     res = 0;
223     GNUNET_NAMESTORE_lookup_record (nsh, &s_zone, name, 0, &name_lookup_second_proc, name);
224   }
225   else
226   {
227     res = 1;
228     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Failed to put records for name `%s'\n", name);
229     GNUNET_SCHEDULER_add_now(&end, NULL);
230   }
231
232 }
233
234 void name_lookup_initial_proc (void *cls,
235                             const struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded *zone_key,
236                             struct GNUNET_TIME_Absolute expire,
237                             const char *n,
238                             unsigned int rd_count,
239                             const struct GNUNET_NAMESTORE_RecordData *rd,
240                             const struct GNUNET_CRYPTO_RsaSignature *signature)
241 {
242   char * name = cls;
243   static int found = GNUNET_NO;
244   int failed = GNUNET_NO;
245   int c;
246
247   if (n != NULL)
248   {
249     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Checking returned results\n");
250     if (0 != memcmp (zone_key, &pubkey, sizeof (struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded)))
251     {
252       GNUNET_break (0);
253       failed = GNUNET_YES;
254     }
255
256     if (0 != strcmp(n, s_name))
257     {
258       GNUNET_break (0);
259       failed = GNUNET_YES;
260     }
261
262     if (RECORDS != rd_count)
263     {
264       GNUNET_break (0);
265       failed = GNUNET_YES;
266     }
267
268     for (c = 0; c < RECORDS; c++)
269     {
270       if (GNUNET_NO == GNUNET_NAMESTORE_records_cmp(&rd[c], &s_first_record[c]))
271       {
272         GNUNET_break (0);
273         failed = GNUNET_YES;
274       }
275     }
276
277     if (GNUNET_OK != GNUNET_NAMESTORE_verify_signature(&pubkey, n, rd_count, rd, signature))
278     {
279       GNUNET_break (0);
280       failed = GNUNET_YES;
281     }
282
283     if (0 != memcmp (s_signature, signature, sizeof (struct GNUNET_CRYPTO_RsaSignature)))
284     {
285       GNUNET_break (0);
286       failed = GNUNET_YES;
287     }
288
289     found = GNUNET_YES;
290     if (failed == GNUNET_NO)
291       res = 0;
292     else
293       res = 1;
294
295     /* create a second record */
296     s_second_record = GNUNET_malloc(sizeof (struct GNUNET_NAMESTORE_RecordData) + TEST_CREATE_RECORD_DATALEN);
297     s_second_record->expiration = GNUNET_TIME_absolute_get_forever();
298     s_second_record->record_type = TEST_CREATE_RECORD_TYPE;
299     s_second_record->flags = GNUNET_NAMESTORE_RF_AUTHORITY;
300     s_second_record->data = &s_second_record[1];
301     s_second_record->data_size = TEST_CREATE_RECORD_DATALEN;
302     memset ((char *) s_second_record->data, TEST_CREATE_RECORD_DATA, TEST_CREATE_RECORD_DATALEN);
303
304     GNUNET_NAMESTORE_record_create (nsh, privkey, name, s_second_record, &create_second_cont, name);
305
306   }
307   else
308   {
309     if (found != GNUNET_YES)
310     {
311       GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Failed to lookup records for name `%s'\n", s_name);
312       res = 1;
313     }
314     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Lookup done for name %s'\n", s_name);
315     GNUNET_SCHEDULER_add_now (&end, NULL);
316   }
317 }
318
319
320 void
321 create_updated_cont (void *cls, int32_t success, const char *emsg)
322 {
323   char *name = cls;
324   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Updating expiration for record `%s': %s `%s'\n", name, ((success == GNUNET_YES) || (success == GNUNET_NO)) ? "SUCCESS" : "FAIL", emsg);
325   if (success == GNUNET_NO)
326   {
327     res = 0;
328     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Updated record for name `%s'\n", name);
329   }
330   else if (success == GNUNET_OK)
331   {
332     res = 1;
333     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "FAIL, Create new record for name `%s'\n", name);
334   }
335   else
336   {
337     res = 1;
338     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Failed to create records for name `%s'\n", name);
339   }
340   GNUNET_SCHEDULER_add_now(&end, NULL);
341 }
342
343 void
344 create_identical_cont (void *cls, int32_t success, const char *emsg)
345 {
346   char *name = cls;
347   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Updating identical record for `%s': %s `%s'\n", name, ((success == GNUNET_YES) || (success == GNUNET_NO)) ? "SUCCESS" : "FAIL", emsg);
348   if (success == GNUNET_NO)
349   {
350     res = 0;
351     s_first_record->expiration = GNUNET_TIME_absolute_get ();
352     GNUNET_NAMESTORE_record_create (nsh, privkey, s_name, s_first_record, &create_updated_cont, s_name);
353   }
354   else
355   {
356     res = 1;
357     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Updating identical record for `%s': %s `%s'\n", name, ((success == GNUNET_YES) || (success == GNUNET_NO)) ? "SUCCESS" : "FAIL", emsg);
358     GNUNET_SCHEDULER_add_now(&end, NULL);
359   }
360
361 }
362
363 void
364 create_first_cont (void *cls, int32_t success, const char *emsg)
365 {
366   char *name = cls;
367   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Create record for `%s': %s `%s'\n", name, (success == GNUNET_OK) ? "SUCCESS" : "FAIL", emsg);
368   if (success == GNUNET_OK)
369   {
370     res = 0;
371     /* check if record was created correct */
372     GNUNET_NAMESTORE_record_create (nsh, privkey, s_name, s_first_record, &create_identical_cont, s_name);
373   }
374   else
375   {
376     res = 1;
377     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Failed to put records for name `%s'\n", name);
378     GNUNET_SCHEDULER_add_now(&end, NULL);
379   }
380
381 }
382
383 void
384 put_cont (void *cls, int32_t success, const char *emsg)
385 {
386   char *name = cls;
387   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Name store added record for `%s': %s `%s'\n", name, (success == GNUNET_OK) ? "SUCCESS" : "FAIL", emsg);
388   if (success == GNUNET_OK)
389   {
390
391   }
392   else
393   {
394     res = 1;
395     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Failed to put records for name `%s'\n", name);
396     GNUNET_SCHEDULER_add_now(&end, NULL);
397   }
398 }
399
400 static struct GNUNET_NAMESTORE_RecordData *
401 create_record (int count)
402 {
403   int c;
404   struct GNUNET_NAMESTORE_RecordData * rd;
405   rd = GNUNET_malloc (count * sizeof (struct GNUNET_NAMESTORE_RecordData));
406
407   for (c = 0; c < count; c++)
408   {
409   rd[c].expiration = GNUNET_TIME_absolute_get_zero();
410   rd[c].record_type = TEST_RECORD_TYPE;
411   rd[c].data_size = TEST_RECORD_DATALEN;
412   rd[c].data = GNUNET_malloc(TEST_RECORD_DATALEN);
413   memset ((char *) rd[c].data, TEST_RECORD_DATA, TEST_RECORD_DATALEN);
414   }
415
416   return rd;
417 }
418
419 void
420 delete_existing_db (const struct GNUNET_CONFIGURATION_Handle *cfg)
421 {
422   char *afsdir;
423
424   if (GNUNET_OK ==
425       GNUNET_CONFIGURATION_get_value_filename (cfg, "namestore-sqlite",
426                                                "FILENAME", &afsdir))
427   {
428     if (GNUNET_OK == GNUNET_DISK_file_test (afsdir))
429       if (GNUNET_OK == GNUNET_DISK_file_test (afsdir))
430         if (GNUNET_OK == GNUNET_DISK_directory_remove(afsdir))
431           GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Deleted existing database `%s' \n", afsdir);
432    GNUNET_free (afsdir);
433   }
434
435 }
436
437 static void
438 run (void *cls, char *const *args, const char *cfgfile,
439      const struct GNUNET_CONFIGURATION_Handle *cfg)
440 {
441   delete_existing_db(cfg);
442
443   endbadly_task = GNUNET_SCHEDULER_add_delayed(TIMEOUT,endbadly, NULL);
444   size_t rd_ser_len;
445
446   /* load privat key */
447   privkey = GNUNET_CRYPTO_rsa_key_create_from_file("hostkey");
448   GNUNET_assert (privkey != NULL);
449   /* get public key */
450   GNUNET_CRYPTO_rsa_key_get_public(privkey, &pubkey);
451
452   /* create record */
453   s_name = "dummy.dummy.gnunet";
454   s_first_record = create_record (1);
455
456   rd_ser_len = GNUNET_NAMESTORE_records_get_size(1, s_first_record);
457   char rd_ser[rd_ser_len];
458   GNUNET_NAMESTORE_records_serialize(1, s_first_record, rd_ser_len, rd_ser);
459
460   s_signature = GNUNET_NAMESTORE_create_signature(privkey, s_name, s_first_record, 1);
461
462   /* create random zone hash */
463   GNUNET_CRYPTO_hash (&pubkey, sizeof (struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded), &s_zone);
464
465   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Name: `%s' Zone: `%s' \n", s_name, GNUNET_h2s_full(&s_zone));
466
467   start_arm (cfgfile);
468   GNUNET_assert (arm != NULL);
469
470   nsh = GNUNET_NAMESTORE_connect (cfg);
471   GNUNET_break (NULL != nsh);
472
473   GNUNET_break (s_first_record != NULL);
474   GNUNET_break (s_name != NULL);
475
476   /* create initial record */
477   GNUNET_NAMESTORE_record_create (nsh, privkey, s_name, s_first_record, &create_first_cont, s_name);
478 }
479
480 static int
481 check ()
482 {
483   static char *const argv[] = { "test-namestore-api",
484     "-c",
485     "test_namestore_api.conf",
486 #if VERBOSE
487     "-L", "DEBUG",
488 #endif
489     NULL
490   };
491   static struct GNUNET_GETOPT_CommandLineOption options[] = {
492     GNUNET_GETOPT_OPTION_END
493   };
494
495   res = 1;
496   GNUNET_PROGRAM_run ((sizeof (argv) / sizeof (char *)) - 1, argv, "test-namestore-api",
497                       "nohelp", options, &run, &res);
498   return res;
499 }
500
501 int
502 main (int argc, char *argv[])
503 {
504   int ret;
505
506   ret = check ();
507   GNUNET_free (s_signature);
508   return ret;
509 }
510
511 /* end of test_namestore_api.c */