015d0d50d3906e52cdf910593fc781cee5c9a120
[oweals/gnunet.git] / src / gns / test_gns_ns_lookup.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_ns_lookup.c
22  * @brief base testcase for testing a local GNS record lookup through NS
23  *
24  */
25 #include "platform.h"
26 #include "gnunet_testing_lib-new.h"
27 #include "gnunet_core_service.h"
28 #include "block_dns.h"
29 #include "gnunet_signatures.h"
30 #include "gnunet_namestore_service.h"
31 #include "gnunet_resolver_service.h"
32 #include "gnunet_dnsparser_lib.h"
33 #include "gnunet_gns_service.h"
34
35 /* Timeout for entire testcase */
36 #define TIMEOUT GNUNET_TIME_relative_multiply(GNUNET_TIME_UNIT_SECONDS, 20)
37
38 /* If number of peers not in config file, use this number */
39 #define DEFAULT_NUM_PEERS 2
40
41 /* test records to resolve */
42 #define TEST_DOMAIN "www.homepage.gnunet"
43 #define TEST_DOMAIN_ALT "homepage.gnunet"
44 #define TEST_DOMAIN_ALT2 "uk.homepage.gnunet"
45 #define TEST_IP_ALT2 "81.187.252.184"
46 #define TEST_IP "131.159.74.67"
47 #define TEST_IP_NS "216.69.185.1" //ns01.domaincontrol.com
48 #define TEST_RECORD_NAME "homepage"
49 #define TEST_RECORD_NS "gnunet.org"
50
51 /* Globals */
52
53
54 /* Task handle to use to schedule test failure */
55 GNUNET_SCHEDULER_TaskIdentifier die_task;
56
57 /* Global return value (0 for success, anything else for failure) */
58 static int ok;
59
60 static int resolver_working;
61
62 static struct GNUNET_NAMESTORE_Handle *namestore_handle;
63
64 static struct GNUNET_GNS_Handle *gns_handle;
65
66 static struct GNUNET_RESOLVER_RequestHandle *resolver_handle;
67
68 const struct GNUNET_CONFIGURATION_Handle *cfg;
69
70 /**
71  * Check if the get_handle is being used, if so stop the request.  Either
72  * way, schedule the end_badly_cont function which actually shuts down the
73  * test.
74  */
75 static void
76 end_badly (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
77 {
78   die_task = GNUNET_SCHEDULER_NO_TASK;
79   GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "Test failed, shutting down...\n");
80   if (NULL != resolver_handle)
81   {
82     GNUNET_RESOLVER_request_cancel (resolver_handle);
83     resolver_handle = NULL;
84   }
85
86   if (NULL != gns_handle)
87   {
88     GNUNET_GNS_disconnect(gns_handle);
89     gns_handle = NULL;
90   }
91
92   if (NULL != namestore_handle)
93   {
94     GNUNET_NAMESTORE_disconnect (namestore_handle);
95     namestore_handle = NULL;
96   }
97   GNUNET_break (0);
98   GNUNET_SCHEDULER_shutdown ();
99   ok = 1;
100 }
101
102 static void
103 end_badly_now ()
104 {
105   GNUNET_SCHEDULER_cancel (die_task);
106   die_task = GNUNET_SCHEDULER_add_now (&end_badly, NULL);
107 }
108
109 static void
110 end_now ()
111 {
112   GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "Test successful, shutting down...\n");
113   if (GNUNET_SCHEDULER_NO_TASK != die_task)
114   {
115       GNUNET_SCHEDULER_cancel (die_task);
116       die_task = GNUNET_SCHEDULER_NO_TASK;
117   }
118   if (NULL != resolver_handle)
119   {
120     GNUNET_RESOLVER_request_cancel (resolver_handle);
121     resolver_handle = NULL;
122   }
123
124   if (NULL != gns_handle)
125   {
126     GNUNET_GNS_disconnect(gns_handle);
127     gns_handle = NULL;
128   }
129
130   if (NULL != namestore_handle)
131   {
132     GNUNET_NAMESTORE_disconnect (namestore_handle);
133     namestore_handle = NULL;
134   }
135   GNUNET_log (GNUNET_ERROR_TYPE_INFO, "Shutting down peer!\n");
136   GNUNET_SCHEDULER_shutdown ();
137 }
138
139 static void
140 on_lookup_result_alt2 (void *cls, uint32_t rd_count,
141                  const struct GNUNET_NAMESTORE_RecordData *rd)
142 {
143   struct in_addr a;
144   int i;
145   char* addr;
146   GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "Received alternative results 2\n");
147   if (rd_count == 0)
148   {
149     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
150                 "Lookup failed\n");
151     ok = 2;
152   }
153   else
154   {
155     ok = 1;
156     GNUNET_log (GNUNET_ERROR_TYPE_INFO, "name: %s\n", (char*)cls);
157     for (i=0; i<rd_count; i++)
158     {
159       GNUNET_log (GNUNET_ERROR_TYPE_INFO, "type: %d\n", rd[i].record_type);
160       if (rd[i].record_type == GNUNET_GNS_RECORD_A)
161       {
162         memcpy(&a, rd[i].data, sizeof(a));
163         addr = inet_ntoa(a);
164         GNUNET_log (GNUNET_ERROR_TYPE_INFO, "address: %s\n", addr);
165         if (0 == strcmp(addr, TEST_IP_ALT2))
166         {
167           GNUNET_log (GNUNET_ERROR_TYPE_INFO,
168                     "%s correctly resolved to %s!\n", TEST_DOMAIN, addr);
169           ok = 0;
170         }
171       }
172       else
173       {
174         GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "No resolution!\n");
175       }
176     }
177   }
178   end_now ();
179 }
180
181 static void
182 on_lookup_result_alt (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   GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "Received alternative results\n");
189   if (rd_count == 0)
190   {
191     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
192                 "Lookup failed\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_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_GNS_lookup(gns_handle, TEST_DOMAIN_ALT2, GNUNET_GNS_RECORD_A,
222                     GNUNET_YES,
223                     NULL,
224                     &on_lookup_result_alt2, TEST_DOMAIN_ALT2);
225 }
226
227 static void
228 on_lookup_result(void *cls, uint32_t rd_count,
229                  const struct GNUNET_NAMESTORE_RecordData *rd)
230 {
231   struct in_addr a;
232   int i;
233   char* addr;
234   GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "Received results\n");
235   if (rd_count == 0)
236   {
237     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
238                 "Lookup failed\n");
239     ok = 2;
240   }
241   else
242   {
243     ok = 1;
244     GNUNET_log (GNUNET_ERROR_TYPE_INFO, "name: %s\n", (char*)cls);
245     for (i=0; i<rd_count; i++)
246     {
247       GNUNET_log (GNUNET_ERROR_TYPE_INFO, "type: %d\n", rd[i].record_type);
248       if (rd[i].record_type == GNUNET_GNS_RECORD_A)
249       {
250         memcpy(&a, rd[i].data, sizeof(a));
251         addr = inet_ntoa(a);
252         GNUNET_log (GNUNET_ERROR_TYPE_INFO, "address: %s\n", addr);
253         if (0 == strcmp(addr, TEST_IP))
254         {
255           GNUNET_log (GNUNET_ERROR_TYPE_INFO,
256                     "%s correctly resolved to %s!\n", TEST_DOMAIN, addr);
257           ok = 0;
258         }
259       }
260       else
261       {
262         GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "No resolution!\n");
263       }
264     }
265   }
266
267   GNUNET_GNS_lookup(gns_handle, TEST_DOMAIN_ALT, GNUNET_GNS_RECORD_A,
268                     GNUNET_YES,
269                     NULL,
270                     &on_lookup_result_alt, TEST_DOMAIN_ALT);
271 }
272
273
274 static void
275 start_lookup (void)
276 {
277   GNUNET_NAMESTORE_disconnect (namestore_handle);
278   namestore_handle = NULL;
279
280   gns_handle = GNUNET_GNS_connect(cfg);
281   if (NULL == gns_handle)
282   {
283     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
284                 "Failed to connect to GNS!\n");
285     end_badly_now ();
286     return;
287   }
288
289   GNUNET_GNS_lookup (gns_handle, TEST_DOMAIN, GNUNET_GNS_RECORD_A,
290                      GNUNET_YES,
291                      NULL,
292                      &on_lookup_result, TEST_DOMAIN);
293 }
294
295
296 static void
297 handle_dns_test (void *cls,
298                  const struct sockaddr *addr,
299                  socklen_t addrlen)
300 {
301   struct sockaddr_in* sai;
302   GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "Received DNS response\n");
303   resolver_handle = NULL;
304   if (NULL == addr)
305   {
306     /* end of results */
307     if (GNUNET_YES != resolver_working)
308     {
309       ok = 0;
310       GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
311                   "System resolver not working. Test inconclusive!\n");
312       GNUNET_log (GNUNET_ERROR_TYPE_INFO, "Shutting down peer1!\n");
313       end_now ();
314       return;
315     }
316     GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "Starting lookup \n");
317     start_lookup ();
318     return;
319   }
320
321   if (addrlen == sizeof (struct sockaddr_in))
322   {
323     sai = (struct sockaddr_in*) addr;
324     if (0 == strcmp (TEST_IP, inet_ntoa (sai->sin_addr)))
325     {
326       resolver_working = GNUNET_YES;
327       GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "Resolver is working\n");
328     }
329
330   }
331 }
332
333
334
335
336 /**
337  * Function scheduled to be run on the successful start of services
338  * tries to look up the dns record for TEST_DOMAIN
339  */
340 static void
341 commence_testing (void *cls, int32_t success, const char *emsg)
342 {
343   resolver_working = GNUNET_NO;
344   GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "Resolving NS record\n");
345   GNUNET_RESOLVER_connect (cfg);
346   resolver_handle = GNUNET_RESOLVER_ip_get (TEST_RECORD_NS,
347                                             AF_INET,
348                                             TIMEOUT,
349                                             &handle_dns_test,
350                                             NULL);
351 }
352
353 static void
354 do_check (void *cls,
355           const struct GNUNET_CONFIGURATION_Handle *ccfg,
356           struct GNUNET_TESTING_Peer *peer)
357 {
358   struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded alice_pkey;
359   struct GNUNET_CRYPTO_RsaPrivateKey *alice_key;
360   char* alice_keyfile;
361   
362   cfg = ccfg;
363   die_task = GNUNET_SCHEDULER_add_delayed (TIMEOUT, &end_badly, NULL);
364
365   /* put records into namestore */
366   GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "Connecting to namestore\n");
367   namestore_handle = GNUNET_NAMESTORE_connect(cfg);
368   if (NULL == namestore_handle)
369   {
370     GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Failed to connect to namestore\n");
371     end_badly_now ();
372     return;
373   }
374
375   if (GNUNET_OK != GNUNET_CONFIGURATION_get_value_filename (cfg, "gns",
376                                                           "ZONEKEY",
377                                                           &alice_keyfile))
378   {
379     GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Failed to get key from cfg\n");
380     end_badly_now ();
381     return;
382   }
383
384   alice_key = GNUNET_CRYPTO_rsa_key_create_from_file (alice_keyfile);
385
386   GNUNET_CRYPTO_rsa_key_get_public (alice_key, &alice_pkey);
387   
388   GNUNET_free(alice_keyfile);
389
390   struct GNUNET_NAMESTORE_RecordData rd;
391   char* ip = TEST_IP_NS;
392   struct in_addr *ns = GNUNET_malloc(sizeof(struct in_addr));
393   rd.expiration_time = UINT64_MAX;
394   GNUNET_assert(1 == inet_pton (AF_INET, ip, ns));
395   rd.data_size = sizeof(struct in_addr);
396   rd.data = ns;
397   rd.record_type = GNUNET_DNSPARSER_TYPE_A;
398   rd.flags = GNUNET_NAMESTORE_RF_AUTHORITY;
399
400   GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "Creating records\n");
401   GNUNET_NAMESTORE_record_create (namestore_handle,
402                                   alice_key,
403                                   TEST_RECORD_NAME,
404                                   &rd,
405                                   NULL,
406                                   NULL);
407
408   rd.data_size = strlen (TEST_RECORD_NS);
409   rd.data = TEST_RECORD_NS;
410   rd.record_type = GNUNET_GNS_RECORD_NS;
411  
412   GNUNET_NAMESTORE_record_create (namestore_handle,
413                                   alice_key,
414                                   TEST_RECORD_NAME,
415                                   &rd,
416                                   &commence_testing,
417                                   NULL);
418   GNUNET_CRYPTO_rsa_key_free(alice_key);
419   GNUNET_free(ns);
420
421 }
422
423 int
424 main (int argc, char *argv[])
425 {
426   ok = 1;
427
428   GNUNET_log_setup ("test-gns-simple-ns-lookup",
429 #if VERBOSE
430                     "DEBUG",
431 #else
432                     "WARNING",
433 #endif
434                     NULL);
435   GNUNET_TESTING_peer_run ("test-gns-simple-ns-lookup", "test_gns_simple_lookup.conf", &do_check, NULL);
436   return ok;
437 }
438
439 /* end of test_gns_simple_ns_lookup.c */