-coverity
[oweals/gnunet.git] / src / gns / test_gns_pseu_shorten.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 gns/test_gns_pseu_shorten.c
22  * @brief base testcase for testing on the fly pseu import and shorten
23  *
24  */
25 #include "platform.h"
26 #include "gnunet_testing_lib.h"
27 #include "gnunet_core_service.h"
28 #include "block_gns.h"
29 #include "gnunet_signatures.h"
30 #include "gnunet_namestore_service.h"
31 #include "../namestore/namestore.h"
32 #include "gnunet_dnsparser_lib.h"
33 #include "gnunet_dht_service.h"
34 #include "gnunet_gns_service.h"
35
36 /* DEFINES */
37 #define VERBOSE GNUNET_YES
38
39 /* Timeout for entire testcase */
40 #define TIMEOUT GNUNET_TIME_relative_multiply(GNUNET_TIME_UNIT_SECONDS, 5)
41
42 /* If number of peers not in config file, use this number */
43 #define DEFAULT_NUM_PEERS 2
44
45 /* test records to resolve */
46 #define TEST_DOMAIN "www.alicewonderland.bobbuilder.gnunet"
47 #define TEST_IP "127.0.0.1"
48 #define TEST_RECORD_NAME "www"
49
50 #define TEST_PRIVATE_ZONE "private"
51 #define TEST_SHORTEN_ZONE "short"
52 #define TEST_AUTHORITY_BOB "bobbuilder"
53 #define TEST_AUTHORITY_ALICE "alicewonderland"
54 #define TEST_PSEU_ALICE "carol"
55 #define TEST_EXPECTED_RESULT "www.carol.short.private.gnunet"
56
57 #define DHT_OPERATION_TIMEOUT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 30)
58
59 #define KEYFILE_SHORTEN = "zonefiles/188JSUMKEF25GVU8TTV0PBNNN8JVCPUEDFV1UHJJU884JD25V0T0.zkey"
60 #define KEYFILE_PRIVATE = "zonefiles/OEFL7A4VEF1B40QLEMTG5D8G1CN6EN16QUSG5R2DT71GRJN34LSG.zkey"
61 #define KEYFILE_BOB "../namestore/zonefiles/HGU0A0VCU334DN7F2I9UIUMVQMM7JMSD142LIMNUGTTV9R0CF4EG.zkey"
62 #define KEYFILE_ALICE "../namestore/zonefiles/N0UJMP015AFUNR2BTNM3FKPBLG38913BL8IDMCO2H0A1LIB81960.zkey"
63
64 /* Globals */
65
66 /**
67  * Directory to store temp data in, defined in config file
68  */
69 static char *test_directory;
70
71 static struct GNUNET_TESTING_PeerGroup *pg;
72
73 /* Task handle to use to schedule test failure */
74 static GNUNET_SCHEDULER_TaskIdentifier die_task;
75
76 static GNUNET_SCHEDULER_TaskIdentifier disco_task;
77
78 /* Global return value (0 for success, anything else for failure) */
79 static int ok;
80
81 static struct GNUNET_NAMESTORE_Handle *namestore_handle;
82
83 static struct GNUNET_GNS_Handle *gns_handle;
84
85 static struct GNUNET_DHT_Handle *dht_handle;
86
87 const struct GNUNET_CONFIGURATION_Handle *cfg;
88
89 struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded alice_pkey;
90 struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded bob_pkey;
91 struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded our_pkey;
92 struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded priv_pkey;
93 struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded short_pkey;
94 struct GNUNET_CRYPTO_RsaPrivateKey *alice_key;
95 struct GNUNET_CRYPTO_RsaPrivateKey *bob_key;
96 struct GNUNET_CRYPTO_RsaPrivateKey *our_key;
97 struct GNUNET_CRYPTO_RsaPrivateKey *priv_key;
98 struct GNUNET_CRYPTO_RsaPrivateKey *short_key;
99 struct GNUNET_CRYPTO_ShortHashCode alice_hash;
100 struct GNUNET_CRYPTO_ShortHashCode bob_hash;
101 struct GNUNET_CRYPTO_ShortHashCode our_zone;
102 struct GNUNET_CRYPTO_ShortHashCode priv_zone;
103 struct GNUNET_CRYPTO_ShortHashCode short_zone;
104
105 /**
106  * Check whether peers successfully shut down.
107  */
108 void
109 shutdown_callback (void *cls, const char *emsg)
110 {
111   if (disco_task != GNUNET_SCHEDULER_NO_TASK)
112   {
113     disco_task = GNUNET_SCHEDULER_NO_TASK;
114     GNUNET_SCHEDULER_cancel(disco_task);
115     GNUNET_DHT_disconnect(dht_handle);
116     dht_handle = NULL;
117   }
118
119   if (emsg != NULL)
120   {
121     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Error on shutdown! ret=%d\n", ok);
122     if (ok == 0)
123       ok = 2;
124   }
125
126   GNUNET_log (GNUNET_ERROR_TYPE_INFO, "done(ret=%d)!\n", ok);
127 }
128
129 static void
130 disco_dht(void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
131 {
132   disco_task = GNUNET_SCHEDULER_NO_TASK;
133   GNUNET_DHT_disconnect(dht_handle);
134   dht_handle = NULL;
135 }
136
137 /**
138  * Called when gns shorten finishes
139  */
140 static void
141 process_shorten_result(void* cls, const char* sname)
142 {
143   GNUNET_GNS_disconnect(gns_handle);
144   //GNUNET_SCHEDULER_add_now(disco_dht, NULL);
145   ok = 0;
146
147   if (sname == NULL)
148   {
149     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
150                 "shorten test failed!\n");
151     ok = 1;
152   }
153   else
154   {
155     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
156                 "%s shortened to %s\n", (char*)cls, sname);
157     if (0 != strcmp(sname, TEST_EXPECTED_RESULT))
158     {
159       GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
160                   "shorten test failed! (wanted: %s got: %s\n",
161                   (char*)cls, sname);
162       ok = 1;
163     }
164
165     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "shorten test succeeded!\n");
166   }
167
168   GNUNET_log (GNUNET_ERROR_TYPE_INFO, "Shutting down peer1!\n");
169   GNUNET_TESTING_daemons_stop (pg, TIMEOUT, &shutdown_callback, NULL);
170 }
171
172 static void
173 do_shorten(void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
174 {
175   GNUNET_GNS_shorten_zone (gns_handle, TEST_DOMAIN,
176                      &our_zone,
177                      &process_shorten_result,
178                      TEST_DOMAIN);
179 }
180
181 static void
182 on_lookup_result(void *cls, uint32_t rd_count,
183                  const struct GNUNET_NAMESTORE_RecordData *rd)
184 {
185   struct in_addr a;
186   int i;
187   char* addr;
188   
189   if (rd_count == 0)
190   {
191     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
192                 "Lookup failed, rp_filtering?\n");
193     ok = 2;
194   }
195   else
196   {
197     ok = 1;
198     GNUNET_log (GNUNET_ERROR_TYPE_INFO, "name: %s\n", (char*)cls);
199     for (i=0; i<rd_count; i++)
200     {
201       GNUNET_log (GNUNET_ERROR_TYPE_INFO, "type: %d\n", rd[i].record_type);
202       if (rd[i].record_type == GNUNET_GNS_RECORD_TYPE_A)
203       {
204         memcpy(&a, rd[i].data, sizeof(a));
205         addr = inet_ntoa(a);
206         GNUNET_log (GNUNET_ERROR_TYPE_INFO, "address: %s\n", addr);
207         if (0 == strcmp(addr, TEST_IP))
208         {
209           GNUNET_log (GNUNET_ERROR_TYPE_INFO,
210                     "%s correctly resolved to %s!\n", TEST_DOMAIN, addr);
211           ok = 0;
212         }
213       }
214       else
215       {
216         GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "No resolution!\n");
217       }
218     }
219   }
220   
221   GNUNET_SCHEDULER_add_delayed (TIMEOUT, &do_shorten, NULL);
222 }
223
224
225 /**
226  * Function scheduled to be run on the successful start of services
227  * tries to look up the dns record for TEST_DOMAIN
228  */
229 static void
230 commence_testing (void *cls, int success)
231 {
232   GNUNET_SCHEDULER_add_now(disco_dht, NULL);
233   //GNUNET_DHT_disconnect(dht_handle);
234
235   GNUNET_CRYPTO_rsa_key_free(our_key);
236   GNUNET_CRYPTO_rsa_key_free(bob_key);
237   GNUNET_CRYPTO_rsa_key_free(alice_key);
238
239   gns_handle = GNUNET_GNS_connect(cfg);
240
241   if (NULL == gns_handle)
242   {
243     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
244                 "Failed to connect to GNS!\n");
245   }
246
247   GNUNET_GNS_lookup_zone (gns_handle, TEST_DOMAIN,
248                           &our_zone,
249                           GNUNET_GNS_RECORD_TYPE_A,
250                           GNUNET_NO,
251                           short_key,
252                           &on_lookup_result, TEST_DOMAIN);
253 }
254
255 /**
256  * Continuation for the GNUNET_DHT_get_stop call, so that we don't shut
257  * down the peers without freeing memory associated with GET request.
258  */
259 static void
260 end_badly (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
261 {
262   GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Failing test with error: `%s'!\n",
263               (char *) cls);
264   ok = 1;
265   
266   if (disco_task != GNUNET_SCHEDULER_NO_TASK)
267   {
268     disco_task = GNUNET_SCHEDULER_NO_TASK;
269     GNUNET_SCHEDULER_cancel(disco_task);
270     GNUNET_DHT_disconnect(dht_handle);
271     dht_handle = NULL;
272   }
273   if (pg != NULL)
274     GNUNET_TESTING_daemons_stop (pg, TIMEOUT, &shutdown_callback, NULL);
275   GNUNET_SCHEDULER_cancel (die_task);
276 }
277
278 static void
279 put_pseu_dht(void *cls, int success)
280 {
281   struct GNSNameRecordBlock *nrb;
282   struct GNUNET_CRYPTO_ShortHashCode name_hash;
283   struct GNUNET_CRYPTO_ShortHashCode zone_hash;
284   struct GNUNET_HashCode xor_hash;
285   struct GNUNET_HashCode name_hash_double;
286   struct GNUNET_HashCode zone_hash_double;
287   uint32_t rd_payload_length;
288   char* nrb_data = NULL;
289   struct GNUNET_CRYPTO_RsaSignature *sig;
290   struct GNUNET_NAMESTORE_RecordData rd;
291   
292   memset (&rd, 0, sizeof (struct GNUNET_NAMESTORE_RecordData));
293   rd.expiration_time = GNUNET_TIME_UNIT_FOREVER_ABS.abs_value;
294   rd.data_size = strlen(TEST_PSEU_ALICE)+1;
295   rd.data = TEST_PSEU_ALICE;
296   rd.record_type = GNUNET_GNS_RECORD_PSEU;
297   rd.flags = 0;
298
299   sig = GNUNET_NAMESTORE_create_signature(alice_key,
300                                           GNUNET_TIME_UNIT_FOREVER_ABS,
301                                           "+",
302                                           &rd, 1);
303
304   GNUNET_assert (NULL != sig);
305
306   /*GNUNET_assert (GNUNET_OK == GNUNET_NAMESTORE_verify_signature (&alice_pkey,
307                                                                  GNUNET_TIME_UNIT_FOREVER_ABS,
308                                                                  "+",
309                                                                  1,
310                                                                  &rd,
311                                                                  sig));*/
312   rd_payload_length = GNUNET_NAMESTORE_records_get_size (1, &rd);
313   nrb = GNUNET_malloc(rd_payload_length + strlen("+") + 1
314                       + sizeof(struct GNSNameRecordBlock));
315   nrb->signature = *sig;
316   nrb->public_key = alice_pkey;
317   nrb->rd_count = htonl(1);
318   memset(&nrb[1], 0, strlen("+") + 1);
319   strcpy((char*)&nrb[1], "+");
320   nrb_data = (char*)&nrb[1];
321   nrb_data += strlen("+") + 1;
322
323   if (-1 == GNUNET_NAMESTORE_records_serialize (1,
324                                                 &rd,
325                                                 rd_payload_length,
326                                                 nrb_data))
327   {
328     GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Record serialization failed!\n");
329     ok = 3;
330     GNUNET_DHT_disconnect(dht_handle);
331     
332     
333     GNUNET_CRYPTO_rsa_key_free(our_key);
334     GNUNET_CRYPTO_rsa_key_free(bob_key);
335     GNUNET_CRYPTO_rsa_key_free(alice_key);
336     GNUNET_free(sig);
337     GNUNET_free (nrb);
338     return;
339   }
340   GNUNET_CRYPTO_short_hash("+", strlen("+"), &name_hash);
341   GNUNET_CRYPTO_short_hash(&alice_pkey,
342                      sizeof(struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded),
343                      &zone_hash);
344
345   GNUNET_CRYPTO_short_hash_double(&name_hash, &name_hash_double);
346   GNUNET_CRYPTO_short_hash_double(&zone_hash, &zone_hash_double);
347   GNUNET_CRYPTO_hash_xor(&zone_hash_double, &name_hash_double, &xor_hash);
348
349   rd_payload_length += sizeof(struct GNSNameRecordBlock) +
350     strlen("+") + 1;
351
352   GNUNET_DHT_put (dht_handle, &xor_hash,
353                   0,
354                   GNUNET_DHT_RO_NONE,
355                   GNUNET_BLOCK_TYPE_GNS_NAMERECORD,
356                   rd_payload_length,
357                   (char*)nrb,
358                   GNUNET_TIME_UNIT_FOREVER_ABS,
359                   DHT_OPERATION_TIMEOUT,
360                   &commence_testing,
361                   NULL);
362   
363   GNUNET_free(sig);
364   GNUNET_free (nrb);
365 }
366
367 static void
368 put_www_dht(void *cls, int success)
369 {
370   struct GNSNameRecordBlock *nrb;
371   struct GNUNET_CRYPTO_ShortHashCode name_hash;
372   struct GNUNET_CRYPTO_ShortHashCode zone_hash;
373   struct GNUNET_HashCode xor_hash;
374   struct GNUNET_HashCode name_hash_double;
375   struct GNUNET_HashCode zone_hash_double;
376   uint32_t rd_payload_length;
377   char* nrb_data = NULL;
378   struct GNUNET_CRYPTO_RsaSignature *sig;
379   struct GNUNET_NAMESTORE_RecordData rd;
380   char* ip = TEST_IP;
381   struct in_addr *web = GNUNET_malloc(sizeof(struct in_addr));
382   
383   rd.expiration_time = UINT64_MAX;
384   GNUNET_assert(1 == inet_pton (AF_INET, ip, web));
385   rd.data_size = sizeof(struct in_addr);
386   rd.data = web;
387   rd.record_type = GNUNET_DNSPARSER_TYPE_A;
388   rd.flags = GNUNET_NAMESTORE_RF_AUTHORITY;
389   
390   sig = GNUNET_NAMESTORE_create_signature(alice_key,
391                                           GNUNET_TIME_UNIT_FOREVER_ABS,
392                                           TEST_RECORD_NAME,
393                                           &rd, 1);
394   rd_payload_length = GNUNET_NAMESTORE_records_get_size (1, &rd);
395   nrb = GNUNET_malloc(rd_payload_length + strlen(TEST_RECORD_NAME) + 1
396                       + sizeof(struct GNSNameRecordBlock));
397   nrb->signature = *sig;
398   nrb->public_key = alice_pkey;
399   nrb->rd_count = htonl(1);
400   memset(&nrb[1], 0, strlen(TEST_RECORD_NAME) + 1);
401   strcpy((char*)&nrb[1], TEST_RECORD_NAME);
402   nrb_data = (char*)&nrb[1];
403   nrb_data += strlen(TEST_RECORD_NAME) + 1;
404
405   if (-1 == GNUNET_NAMESTORE_records_serialize (1,
406                                                 &rd,
407                                                 rd_payload_length,
408                                                 nrb_data))
409   {
410     GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Record serialization failed!\n");
411     ok = 3;
412     GNUNET_DHT_disconnect(dht_handle);
413     
414     GNUNET_CRYPTO_rsa_key_free(our_key);
415     GNUNET_CRYPTO_rsa_key_free(bob_key);
416     GNUNET_CRYPTO_rsa_key_free(alice_key);
417     GNUNET_free(web);
418     GNUNET_free (nrb);
419     return;
420   }
421   GNUNET_CRYPTO_short_hash(TEST_RECORD_NAME, strlen(TEST_RECORD_NAME), &name_hash);
422   GNUNET_CRYPTO_short_hash(&alice_pkey,
423                      sizeof(struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded),
424                      &zone_hash);
425   GNUNET_CRYPTO_short_hash_double(&zone_hash, &zone_hash_double);
426   GNUNET_CRYPTO_short_hash_double(&name_hash, &name_hash_double);
427   GNUNET_CRYPTO_hash_xor(&zone_hash_double, &name_hash_double, &xor_hash);
428
429   rd_payload_length += sizeof(struct GNSNameRecordBlock) +
430     strlen(TEST_RECORD_NAME) + 1;
431
432   GNUNET_DHT_put (dht_handle, &xor_hash,
433                   0,
434                   GNUNET_DHT_RO_NONE,
435                   GNUNET_BLOCK_TYPE_GNS_NAMERECORD,
436                   rd_payload_length,
437                   (char*)nrb,
438                   GNUNET_TIME_UNIT_FOREVER_ABS,
439                   DHT_OPERATION_TIMEOUT,
440                   &put_pseu_dht,
441                   NULL);
442
443   GNUNET_free(web);
444   GNUNET_free (nrb);
445 }
446
447
448 static void
449 put_pkey_dht(void *cls, int32_t success, const char *emsg)
450 {
451   struct GNSNameRecordBlock *nrb;
452   struct GNUNET_CRYPTO_ShortHashCode name_hash;
453   struct GNUNET_CRYPTO_ShortHashCode zone_hash;
454   struct GNUNET_HashCode xor_hash;
455   struct GNUNET_HashCode name_hash_double;
456   struct GNUNET_HashCode zone_hash_double;
457   uint32_t rd_payload_length;
458   char* nrb_data = NULL;
459   struct GNUNET_CRYPTO_RsaSignature *sig;
460   struct GNUNET_NAMESTORE_RecordData rd;
461   
462   rd.expiration_time = UINT64_MAX;
463   rd.data_size = sizeof(struct GNUNET_CRYPTO_ShortHashCode);
464   rd.data = &alice_hash;
465   rd.record_type = GNUNET_GNS_RECORD_PKEY;
466   rd.flags = GNUNET_NAMESTORE_RF_AUTHORITY;
467   
468   sig = GNUNET_NAMESTORE_create_signature(bob_key,
469                                           GNUNET_TIME_UNIT_FOREVER_ABS,
470                                           TEST_AUTHORITY_ALICE,
471                                           &rd,
472                                           1);
473
474   rd_payload_length = GNUNET_NAMESTORE_records_get_size (1, &rd);
475   nrb = GNUNET_malloc(rd_payload_length + strlen(TEST_AUTHORITY_ALICE) + 1
476                       + sizeof(struct GNSNameRecordBlock));
477   nrb->signature = *sig;
478   nrb->public_key = bob_pkey;
479   nrb->rd_count = htonl(1);
480   memset(&nrb[1], 0, strlen(TEST_AUTHORITY_ALICE) + 1);
481   strcpy((char*)&nrb[1], TEST_AUTHORITY_ALICE);
482   nrb_data = (char*)&nrb[1];
483   nrb_data += strlen(TEST_AUTHORITY_ALICE) + 1;
484
485   if (-1 == GNUNET_NAMESTORE_records_serialize (1,
486                                                 &rd,
487                                                 rd_payload_length,
488                                                 nrb_data))
489   {
490     GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Record serialization failed!\n");
491     ok = 3;
492     
493     GNUNET_CRYPTO_rsa_key_free(our_key);
494     GNUNET_CRYPTO_rsa_key_free(bob_key);
495     GNUNET_CRYPTO_rsa_key_free(alice_key);
496     GNUNET_free(sig);
497     GNUNET_free (nrb);
498     return;
499   }
500
501
502   GNUNET_CRYPTO_short_hash(TEST_AUTHORITY_ALICE,
503                      strlen(TEST_AUTHORITY_ALICE), &name_hash);
504   GNUNET_CRYPTO_short_hash(&bob_pkey,
505                      sizeof(struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded),
506                      &zone_hash);
507   GNUNET_CRYPTO_short_hash_double(&zone_hash, &zone_hash_double);
508   GNUNET_CRYPTO_short_hash_double(&name_hash, &name_hash_double);
509   GNUNET_CRYPTO_hash_xor(&zone_hash_double, &name_hash_double, &xor_hash); 
510
511   rd_payload_length += sizeof(struct GNSNameRecordBlock) +
512     strlen(TEST_AUTHORITY_ALICE) + 1;
513   GNUNET_DHT_put (dht_handle, &xor_hash,
514                   0,
515                   GNUNET_DHT_RO_NONE,
516                   GNUNET_BLOCK_TYPE_GNS_NAMERECORD,
517                   rd_payload_length,
518                   (char*)nrb,
519                   GNUNET_TIME_UNIT_FOREVER_ABS,
520                   DHT_OPERATION_TIMEOUT,
521                   &put_www_dht,
522                   NULL);
523   GNUNET_NAMESTORE_disconnect(namestore_handle, GNUNET_NO);
524   GNUNET_free (nrb);
525 }
526
527 static void
528 fin_init_zone (void *cls, int32_t success, const char *emsg)
529 {
530   struct GNUNET_NAMESTORE_RecordData rd;
531   rd.expiration_time = UINT64_MAX;
532   rd.data_size = sizeof(struct GNUNET_CRYPTO_ShortHashCode);
533   rd.data = &bob_hash;
534   rd.record_type = GNUNET_GNS_RECORD_PKEY;
535   rd.flags = GNUNET_NAMESTORE_RF_AUTHORITY;
536   
537   GNUNET_NAMESTORE_record_create (namestore_handle,
538                                   our_key,
539                                   TEST_AUTHORITY_BOB,
540                                   &rd,
541                                   &put_pkey_dht,
542                                   NULL);
543
544 }
545
546 static void
547 cont_init_zone (void *cls, int32_t success, const char *emsg)
548 {
549
550   struct GNUNET_NAMESTORE_RecordData rd;
551   rd.expiration_time = UINT64_MAX;
552   rd.data_size = sizeof(struct GNUNET_CRYPTO_ShortHashCode);
553   rd.data = &short_zone;
554   rd.record_type = GNUNET_GNS_RECORD_PKEY;
555   rd.flags = GNUNET_NAMESTORE_RF_AUTHORITY;
556
557   GNUNET_NAMESTORE_record_create (namestore_handle,
558                                   priv_key,
559                                   TEST_SHORTEN_ZONE,
560                                   &rd,
561                                   &fin_init_zone,
562                                   NULL);
563 }
564
565 static void
566 do_lookup (void *cls, const struct GNUNET_PeerIdentity *id,
567            const struct GNUNET_CONFIGURATION_Handle *_cfg,
568            struct GNUNET_TESTING_Daemon *d, const char *emsg)
569 {
570   
571   char* private_keyfile;
572   char* shorten_keyfile;
573   char* our_keyfile;
574   
575   cfg = _cfg;
576
577   GNUNET_SCHEDULER_cancel (die_task);
578
579   /* put records into namestore */
580   namestore_handle = GNUNET_NAMESTORE_connect(cfg);
581   if (NULL == namestore_handle)
582   {
583     GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Failed to connect to namestore\n");
584     ok = -1;
585     return;
586   }
587   
588   /* dht */
589   dht_handle = GNUNET_DHT_connect(cfg, 1);
590   if (NULL == dht_handle)
591   {
592     GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Failed to connect to dht\n");
593     ok = -1;
594     return;
595   }
596
597   if (GNUNET_OK != GNUNET_CONFIGURATION_get_value_filename (cfg, "gns",
598                                                           "ZONEKEY",
599                                                           &our_keyfile))
600   {
601     GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Failed to get key from cfg\n");
602     ok = -1;
603     return;
604   }
605   
606   if (GNUNET_OK != GNUNET_CONFIGURATION_get_value_filename (cfg, "gns",
607                                                           "SHORTEN_ZONEKEY",
608                                                           &shorten_keyfile))
609   {
610     GNUNET_log(GNUNET_ERROR_TYPE_ERROR,
611                "Failed to get shorten zone key from cfg\n");
612     ok = -1;
613     return;
614   }
615   
616   if (GNUNET_OK != GNUNET_CONFIGURATION_get_value_filename (cfg, "gns",
617                                                           "PRIVATE_ZONEKEY",
618                                                           &private_keyfile))
619   {
620     GNUNET_log(GNUNET_ERROR_TYPE_ERROR,
621                "Failed to get private zone key from cfg\n");
622     ok = -1;
623     return;
624   }
625   our_key = GNUNET_CRYPTO_rsa_key_create_from_file (our_keyfile);
626   priv_key = GNUNET_CRYPTO_rsa_key_create_from_file (private_keyfile);
627   short_key = GNUNET_CRYPTO_rsa_key_create_from_file (shorten_keyfile);
628   bob_key = GNUNET_CRYPTO_rsa_key_create_from_file (KEYFILE_BOB);
629   alice_key = GNUNET_CRYPTO_rsa_key_create_from_file (KEYFILE_ALICE);
630   
631   GNUNET_free(our_keyfile);
632   GNUNET_free(shorten_keyfile);
633   GNUNET_free(private_keyfile);
634
635   GNUNET_CRYPTO_rsa_key_get_public (our_key, &our_pkey);
636   GNUNET_CRYPTO_rsa_key_get_public (priv_key, &priv_pkey);
637   GNUNET_CRYPTO_rsa_key_get_public (short_key, &short_pkey);
638   GNUNET_CRYPTO_rsa_key_get_public (bob_key, &bob_pkey);
639   GNUNET_CRYPTO_rsa_key_get_public (alice_key, &alice_pkey);
640   GNUNET_CRYPTO_short_hash(&bob_pkey, sizeof(bob_pkey), &bob_hash);
641   GNUNET_CRYPTO_short_hash(&alice_pkey, sizeof(alice_pkey), &alice_hash);
642   GNUNET_CRYPTO_short_hash(&our_pkey, sizeof(our_pkey), &our_zone);
643   GNUNET_CRYPTO_short_hash(&priv_pkey, sizeof(priv_pkey), &priv_zone);
644   GNUNET_CRYPTO_short_hash(&short_pkey, sizeof(short_pkey), &short_zone);
645   
646   struct GNUNET_NAMESTORE_RecordData rd;
647   rd.expiration_time = UINT64_MAX;
648   rd.data_size = sizeof(struct GNUNET_CRYPTO_ShortHashCode);
649   rd.data = &priv_zone;
650   rd.record_type = GNUNET_GNS_RECORD_PKEY;
651   rd.flags = GNUNET_NAMESTORE_RF_AUTHORITY;
652
653   GNUNET_NAMESTORE_record_create (namestore_handle,
654                                   our_key,
655                                   TEST_PRIVATE_ZONE,
656                                   &rd,
657                                   &cont_init_zone,
658                                   NULL);
659
660
661
662
663 }
664
665 static void
666 run (void *cls, char *const *args, const char *cfgfile,
667      const struct GNUNET_CONFIGURATION_Handle *c)
668 {
669   cfg = c;
670    /* Get path from configuration file */
671   if (GNUNET_YES !=
672       GNUNET_CONFIGURATION_get_value_string (cfg, "paths", "servicehome",
673                                              &test_directory))
674   {
675     ok = 404;
676     return;
677   }
678
679     
680   /* Set up a task to end testing if peer start fails */
681   die_task =
682       GNUNET_SCHEDULER_add_delayed (TIMEOUT, &end_badly,
683                                     "didn't start all daemons in reasonable amount of time!!!");
684   
685   /* Start alice */
686   //d1 = GNUNET_TESTING_daemon_start(cfg, TIMEOUT, GNUNET_NO, NULL, NULL, 0,
687   //                                 NULL, NULL, NULL, &do_lookup, NULL);
688   pg = GNUNET_TESTING_daemons_start(cfg, 1, 1, 1, TIMEOUT,
689                                     NULL, NULL, &do_lookup, NULL,
690                                     NULL, NULL, NULL);
691 }
692
693 static int
694 check ()
695 {
696   int ret;
697
698   /* Arguments for GNUNET_PROGRAM_run */
699   char *const argv[] = { "test-gns-pseu-shorten", /* Name to give running binary */
700     "-c",
701     "test_gns_simple_lookup.conf",       /* Config file to use */
702 #if VERBOSE
703     "-L", "DEBUG",
704 #endif
705     NULL
706   };
707   struct GNUNET_GETOPT_CommandLineOption options[] = {
708     GNUNET_GETOPT_OPTION_END
709   };
710   /* Run the run function as a new program */
711   ret =
712       GNUNET_PROGRAM_run ((sizeof (argv) / sizeof (char *)) - 1, argv,
713                           "test-gns-pseu-shorten", "nohelp", options, &run,
714                           &ok);
715   if (ret != GNUNET_OK)
716   {
717     GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
718                 "`test-gns-pseu-shorten': Failed with error code %d\n", ret);
719   }
720   return ok;
721 }
722
723 int
724 main (int argc, char *argv[])
725 {
726   int ret;
727
728   GNUNET_log_setup ("test-gns-pseu-shorten",
729 #if VERBOSE
730                     "DEBUG",
731 #else
732                     "WARNING",
733 #endif
734                     NULL);
735   ret = check ();
736   /**
737    * Need to remove base directory, subdirectories taken care
738    * of by the testing framework.
739    */
740   return ret;
741 }
742
743 /* end of test_gns_twopeer.c */