-fixes
[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   rd.expiration_time = GNUNET_TIME_UNIT_FOREVER_ABS.abs_value;
293   rd.data_size = strlen(TEST_PSEU_ALICE)+1;
294   rd.data = TEST_PSEU_ALICE;
295   rd.record_type = GNUNET_GNS_RECORD_PSEU;
296   rd.flags = 0;
297
298   sig = GNUNET_NAMESTORE_create_signature(alice_key,
299                                           GNUNET_TIME_UNIT_FOREVER_ABS,
300                                           "+",
301                                           &rd, 1);
302
303   GNUNET_assert (NULL != sig);
304
305   /*GNUNET_assert (GNUNET_OK == GNUNET_NAMESTORE_verify_signature (&alice_pkey,
306                                                                  GNUNET_TIME_UNIT_FOREVER_ABS,
307                                                                  "+",
308                                                                  1,
309                                                                  &rd,
310                                                                  sig));*/
311   rd_payload_length = GNUNET_NAMESTORE_records_get_size (1, &rd);
312   nrb = GNUNET_malloc(rd_payload_length + strlen("+") + 1
313                       + sizeof(struct GNSNameRecordBlock));
314   nrb->signature = *sig;
315   nrb->public_key = alice_pkey;
316   nrb->rd_count = htonl(1);
317   memset(&nrb[1], 0, strlen("+") + 1);
318   strcpy((char*)&nrb[1], "+");
319   nrb_data = (char*)&nrb[1];
320   nrb_data += strlen("+") + 1;
321
322   if (-1 == GNUNET_NAMESTORE_records_serialize (1,
323                                                 &rd,
324                                                 rd_payload_length,
325                                                 nrb_data))
326   {
327     GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Record serialization failed!\n");
328     ok = 3;
329     GNUNET_DHT_disconnect(dht_handle);
330     
331     
332     GNUNET_CRYPTO_rsa_key_free(our_key);
333     GNUNET_CRYPTO_rsa_key_free(bob_key);
334     GNUNET_CRYPTO_rsa_key_free(alice_key);
335     GNUNET_free(sig);
336     GNUNET_free (nrb);
337     return;
338   }
339   GNUNET_CRYPTO_short_hash("+", strlen("+"), &name_hash);
340   GNUNET_CRYPTO_short_hash(&alice_pkey,
341                      sizeof(struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded),
342                      &zone_hash);
343
344   GNUNET_CRYPTO_short_hash_double(&name_hash, &name_hash_double);
345   GNUNET_CRYPTO_short_hash_double(&zone_hash, &zone_hash_double);
346   GNUNET_CRYPTO_hash_xor(&zone_hash_double, &name_hash_double, &xor_hash);
347
348   rd_payload_length += sizeof(struct GNSNameRecordBlock) +
349     strlen("+") + 1;
350
351   GNUNET_DHT_put (dht_handle, &xor_hash,
352                   0,
353                   GNUNET_DHT_RO_NONE,
354                   GNUNET_BLOCK_TYPE_GNS_NAMERECORD,
355                   rd_payload_length,
356                   (char*)nrb,
357                   GNUNET_TIME_UNIT_FOREVER_ABS,
358                   DHT_OPERATION_TIMEOUT,
359                   &commence_testing,
360                   NULL);
361   
362   GNUNET_free(sig);
363   GNUNET_free (nrb);
364 }
365
366 static void
367 put_www_dht(void *cls, int success)
368 {
369   struct GNSNameRecordBlock *nrb;
370   struct GNUNET_CRYPTO_ShortHashCode name_hash;
371   struct GNUNET_CRYPTO_ShortHashCode zone_hash;
372   struct GNUNET_HashCode xor_hash;
373   struct GNUNET_HashCode name_hash_double;
374   struct GNUNET_HashCode zone_hash_double;
375   uint32_t rd_payload_length;
376   char* nrb_data = NULL;
377   struct GNUNET_CRYPTO_RsaSignature *sig;
378   struct GNUNET_NAMESTORE_RecordData rd;
379   char* ip = TEST_IP;
380   struct in_addr *web = GNUNET_malloc(sizeof(struct in_addr));
381   
382   rd.expiration_time = UINT64_MAX;
383   GNUNET_assert(1 == inet_pton (AF_INET, ip, web));
384   rd.data_size = sizeof(struct in_addr);
385   rd.data = web;
386   rd.record_type = GNUNET_DNSPARSER_TYPE_A;
387   rd.flags = GNUNET_NAMESTORE_RF_AUTHORITY;
388   
389   sig = GNUNET_NAMESTORE_create_signature(alice_key,
390                                           GNUNET_TIME_UNIT_FOREVER_ABS,
391                                           TEST_RECORD_NAME,
392                                           &rd, 1);
393   rd_payload_length = GNUNET_NAMESTORE_records_get_size (1, &rd);
394   nrb = GNUNET_malloc(rd_payload_length + strlen(TEST_RECORD_NAME) + 1
395                       + sizeof(struct GNSNameRecordBlock));
396   nrb->signature = *sig;
397   nrb->public_key = alice_pkey;
398   nrb->rd_count = htonl(1);
399   memset(&nrb[1], 0, strlen(TEST_RECORD_NAME) + 1);
400   strcpy((char*)&nrb[1], TEST_RECORD_NAME);
401   nrb_data = (char*)&nrb[1];
402   nrb_data += strlen(TEST_RECORD_NAME) + 1;
403
404   if (-1 == GNUNET_NAMESTORE_records_serialize (1,
405                                                 &rd,
406                                                 rd_payload_length,
407                                                 nrb_data))
408   {
409     GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Record serialization failed!\n");
410     ok = 3;
411     GNUNET_DHT_disconnect(dht_handle);
412     
413     GNUNET_CRYPTO_rsa_key_free(our_key);
414     GNUNET_CRYPTO_rsa_key_free(bob_key);
415     GNUNET_CRYPTO_rsa_key_free(alice_key);
416     GNUNET_free(web);
417     GNUNET_free (nrb);
418     return;
419   }
420   GNUNET_CRYPTO_short_hash(TEST_RECORD_NAME, strlen(TEST_RECORD_NAME), &name_hash);
421   GNUNET_CRYPTO_short_hash(&alice_pkey,
422                      sizeof(struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded),
423                      &zone_hash);
424   GNUNET_CRYPTO_short_hash_double(&zone_hash, &zone_hash_double);
425   GNUNET_CRYPTO_short_hash_double(&name_hash, &name_hash_double);
426   GNUNET_CRYPTO_hash_xor(&zone_hash_double, &name_hash_double, &xor_hash);
427
428   rd_payload_length += sizeof(struct GNSNameRecordBlock) +
429     strlen(TEST_RECORD_NAME) + 1;
430
431   GNUNET_DHT_put (dht_handle, &xor_hash,
432                   0,
433                   GNUNET_DHT_RO_NONE,
434                   GNUNET_BLOCK_TYPE_GNS_NAMERECORD,
435                   rd_payload_length,
436                   (char*)nrb,
437                   GNUNET_TIME_UNIT_FOREVER_ABS,
438                   DHT_OPERATION_TIMEOUT,
439                   &put_pseu_dht,
440                   NULL);
441
442   GNUNET_free(web);
443   GNUNET_free (nrb);
444 }
445
446
447 static void
448 put_pkey_dht(void *cls, int32_t success, const char *emsg)
449 {
450   struct GNSNameRecordBlock *nrb;
451   struct GNUNET_CRYPTO_ShortHashCode name_hash;
452   struct GNUNET_CRYPTO_ShortHashCode zone_hash;
453   struct GNUNET_HashCode xor_hash;
454   struct GNUNET_HashCode name_hash_double;
455   struct GNUNET_HashCode zone_hash_double;
456   uint32_t rd_payload_length;
457   char* nrb_data = NULL;
458   struct GNUNET_CRYPTO_RsaSignature *sig;
459   struct GNUNET_NAMESTORE_RecordData rd;
460   
461   rd.expiration_time = UINT64_MAX;
462   rd.data_size = sizeof(struct GNUNET_CRYPTO_ShortHashCode);
463   rd.data = &alice_hash;
464   rd.record_type = GNUNET_GNS_RECORD_PKEY;
465   rd.flags = GNUNET_NAMESTORE_RF_AUTHORITY;
466   
467   sig = GNUNET_NAMESTORE_create_signature(bob_key,
468                                           GNUNET_TIME_UNIT_FOREVER_ABS,
469                                           TEST_AUTHORITY_ALICE,
470                                           &rd,
471                                           1);
472
473   rd_payload_length = GNUNET_NAMESTORE_records_get_size (1, &rd);
474   nrb = GNUNET_malloc(rd_payload_length + strlen(TEST_AUTHORITY_ALICE) + 1
475                       + sizeof(struct GNSNameRecordBlock));
476   nrb->signature = *sig;
477   nrb->public_key = bob_pkey;
478   nrb->rd_count = htonl(1);
479   memset(&nrb[1], 0, strlen(TEST_AUTHORITY_ALICE) + 1);
480   strcpy((char*)&nrb[1], TEST_AUTHORITY_ALICE);
481   nrb_data = (char*)&nrb[1];
482   nrb_data += strlen(TEST_AUTHORITY_ALICE) + 1;
483
484   if (-1 == GNUNET_NAMESTORE_records_serialize (1,
485                                                 &rd,
486                                                 rd_payload_length,
487                                                 nrb_data))
488   {
489     GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Record serialization failed!\n");
490     ok = 3;
491     
492     GNUNET_CRYPTO_rsa_key_free(our_key);
493     GNUNET_CRYPTO_rsa_key_free(bob_key);
494     GNUNET_CRYPTO_rsa_key_free(alice_key);
495     GNUNET_free(sig);
496     GNUNET_free (nrb);
497     return;
498   }
499
500
501   GNUNET_CRYPTO_short_hash(TEST_AUTHORITY_ALICE,
502                      strlen(TEST_AUTHORITY_ALICE), &name_hash);
503   GNUNET_CRYPTO_short_hash(&bob_pkey,
504                      sizeof(struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded),
505                      &zone_hash);
506   GNUNET_CRYPTO_short_hash_double(&zone_hash, &zone_hash_double);
507   GNUNET_CRYPTO_short_hash_double(&name_hash, &name_hash_double);
508   GNUNET_CRYPTO_hash_xor(&zone_hash_double, &name_hash_double, &xor_hash); 
509
510   rd_payload_length += sizeof(struct GNSNameRecordBlock) +
511     strlen(TEST_AUTHORITY_ALICE) + 1;
512   GNUNET_DHT_put (dht_handle, &xor_hash,
513                   0,
514                   GNUNET_DHT_RO_NONE,
515                   GNUNET_BLOCK_TYPE_GNS_NAMERECORD,
516                   rd_payload_length,
517                   (char*)nrb,
518                   GNUNET_TIME_UNIT_FOREVER_ABS,
519                   DHT_OPERATION_TIMEOUT,
520                   &put_www_dht,
521                   NULL);
522   GNUNET_NAMESTORE_disconnect(namestore_handle, GNUNET_NO);
523   GNUNET_free (nrb);
524 }
525
526 static void
527 fin_init_zone (void *cls, int32_t success, const char *emsg)
528 {
529   struct GNUNET_NAMESTORE_RecordData rd;
530   rd.expiration_time = UINT64_MAX;
531   rd.data_size = sizeof(struct GNUNET_CRYPTO_ShortHashCode);
532   rd.data = &bob_hash;
533   rd.record_type = GNUNET_GNS_RECORD_PKEY;
534   rd.flags = GNUNET_NAMESTORE_RF_AUTHORITY;
535   
536   GNUNET_NAMESTORE_record_create (namestore_handle,
537                                   our_key,
538                                   TEST_AUTHORITY_BOB,
539                                   &rd,
540                                   &put_pkey_dht,
541                                   NULL);
542
543 }
544
545 static void
546 cont_init_zone (void *cls, int32_t success, const char *emsg)
547 {
548
549   struct GNUNET_NAMESTORE_RecordData rd;
550   rd.expiration_time = UINT64_MAX;
551   rd.data_size = sizeof(struct GNUNET_CRYPTO_ShortHashCode);
552   rd.data = &short_zone;
553   rd.record_type = GNUNET_GNS_RECORD_PKEY;
554   rd.flags = GNUNET_NAMESTORE_RF_AUTHORITY;
555
556   GNUNET_NAMESTORE_record_create (namestore_handle,
557                                   priv_key,
558                                   TEST_SHORTEN_ZONE,
559                                   &rd,
560                                   &fin_init_zone,
561                                   NULL);
562 }
563
564 static void
565 do_lookup (void *cls, const struct GNUNET_PeerIdentity *id,
566            const struct GNUNET_CONFIGURATION_Handle *_cfg,
567            struct GNUNET_TESTING_Daemon *d, const char *emsg)
568 {
569   
570   char* private_keyfile;
571   char* shorten_keyfile;
572   char* our_keyfile;
573   
574   cfg = _cfg;
575
576   GNUNET_SCHEDULER_cancel (die_task);
577
578   /* put records into namestore */
579   namestore_handle = GNUNET_NAMESTORE_connect(cfg);
580   if (NULL == namestore_handle)
581   {
582     GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Failed to connect to namestore\n");
583     ok = -1;
584     return;
585   }
586   
587   /* dht */
588   dht_handle = GNUNET_DHT_connect(cfg, 1);
589   if (NULL == dht_handle)
590   {
591     GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Failed to connect to dht\n");
592     ok = -1;
593     return;
594   }
595
596   if (GNUNET_OK != GNUNET_CONFIGURATION_get_value_filename (cfg, "gns",
597                                                           "ZONEKEY",
598                                                           &our_keyfile))
599   {
600     GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Failed to get key from cfg\n");
601     ok = -1;
602     return;
603   }
604   
605   if (GNUNET_OK != GNUNET_CONFIGURATION_get_value_filename (cfg, "gns",
606                                                           "SHORTEN_ZONEKEY",
607                                                           &shorten_keyfile))
608   {
609     GNUNET_log(GNUNET_ERROR_TYPE_ERROR,
610                "Failed to get shorten zone key from cfg\n");
611     ok = -1;
612     return;
613   }
614   
615   if (GNUNET_OK != GNUNET_CONFIGURATION_get_value_filename (cfg, "gns",
616                                                           "PRIVATE_ZONEKEY",
617                                                           &private_keyfile))
618   {
619     GNUNET_log(GNUNET_ERROR_TYPE_ERROR,
620                "Failed to get private zone key from cfg\n");
621     ok = -1;
622     return;
623   }
624   our_key = GNUNET_CRYPTO_rsa_key_create_from_file (our_keyfile);
625   priv_key = GNUNET_CRYPTO_rsa_key_create_from_file (private_keyfile);
626   short_key = GNUNET_CRYPTO_rsa_key_create_from_file (shorten_keyfile);
627   bob_key = GNUNET_CRYPTO_rsa_key_create_from_file (KEYFILE_BOB);
628   alice_key = GNUNET_CRYPTO_rsa_key_create_from_file (KEYFILE_ALICE);
629   
630   GNUNET_free(our_keyfile);
631   GNUNET_free(shorten_keyfile);
632   GNUNET_free(private_keyfile);
633
634   GNUNET_CRYPTO_rsa_key_get_public (our_key, &our_pkey);
635   GNUNET_CRYPTO_rsa_key_get_public (priv_key, &priv_pkey);
636   GNUNET_CRYPTO_rsa_key_get_public (short_key, &short_pkey);
637   GNUNET_CRYPTO_rsa_key_get_public (bob_key, &bob_pkey);
638   GNUNET_CRYPTO_rsa_key_get_public (alice_key, &alice_pkey);
639   GNUNET_CRYPTO_short_hash(&bob_pkey, sizeof(bob_pkey), &bob_hash);
640   GNUNET_CRYPTO_short_hash(&alice_pkey, sizeof(alice_pkey), &alice_hash);
641   GNUNET_CRYPTO_short_hash(&our_pkey, sizeof(our_pkey), &our_zone);
642   GNUNET_CRYPTO_short_hash(&priv_pkey, sizeof(priv_pkey), &priv_zone);
643   GNUNET_CRYPTO_short_hash(&short_pkey, sizeof(short_pkey), &short_zone);
644   
645   struct GNUNET_NAMESTORE_RecordData rd;
646   rd.expiration_time = UINT64_MAX;
647   rd.data_size = sizeof(struct GNUNET_CRYPTO_ShortHashCode);
648   rd.data = &priv_zone;
649   rd.record_type = GNUNET_GNS_RECORD_PKEY;
650   rd.flags = GNUNET_NAMESTORE_RF_AUTHORITY;
651
652   GNUNET_NAMESTORE_record_create (namestore_handle,
653                                   our_key,
654                                   TEST_PRIVATE_ZONE,
655                                   &rd,
656                                   &cont_init_zone,
657                                   NULL);
658
659
660
661
662 }
663
664 static void
665 run (void *cls, char *const *args, const char *cfgfile,
666      const struct GNUNET_CONFIGURATION_Handle *c)
667 {
668   cfg = c;
669    /* Get path from configuration file */
670   if (GNUNET_YES !=
671       GNUNET_CONFIGURATION_get_value_string (cfg, "paths", "servicehome",
672                                              &test_directory))
673   {
674     ok = 404;
675     return;
676   }
677
678     
679   /* Set up a task to end testing if peer start fails */
680   die_task =
681       GNUNET_SCHEDULER_add_delayed (TIMEOUT, &end_badly,
682                                     "didn't start all daemons in reasonable amount of time!!!");
683   
684   /* Start alice */
685   //d1 = GNUNET_TESTING_daemon_start(cfg, TIMEOUT, GNUNET_NO, NULL, NULL, 0,
686   //                                 NULL, NULL, NULL, &do_lookup, NULL);
687   pg = GNUNET_TESTING_daemons_start(cfg, 1, 1, 1, TIMEOUT,
688                                     NULL, NULL, &do_lookup, NULL,
689                                     NULL, NULL, NULL);
690 }
691
692 static int
693 check ()
694 {
695   int ret;
696
697   /* Arguments for GNUNET_PROGRAM_run */
698   char *const argv[] = { "test-gns-pseu-shorten", /* Name to give running binary */
699     "-c",
700     "test_gns_simple_lookup.conf",       /* Config file to use */
701 #if VERBOSE
702     "-L", "DEBUG",
703 #endif
704     NULL
705   };
706   struct GNUNET_GETOPT_CommandLineOption options[] = {
707     GNUNET_GETOPT_OPTION_END
708   };
709   /* Run the run function as a new program */
710   ret =
711       GNUNET_PROGRAM_run ((sizeof (argv) / sizeof (char *)) - 1, argv,
712                           "test-gns-pseu-shorten", "nohelp", options, &run,
713                           &ok);
714   if (ret != GNUNET_OK)
715   {
716     GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
717                 "`test-gns-pseu-shorten': Failed with error code %d\n", ret);
718   }
719   return ok;
720 }
721
722 int
723 main (int argc, char *argv[])
724 {
725   int ret;
726
727   GNUNET_log_setup ("test-gns-pseu-shorten",
728 #if VERBOSE
729                     "DEBUG",
730 #else
731                     "WARNING",
732 #endif
733                     NULL);
734   ret = check ();
735   /**
736    * Need to remove base directory, subdirectories taken care
737    * of by the testing framework.
738    */
739   return ret;
740 }
741
742 /* end of test_gns_twopeer.c */