-fix
[oweals/gnunet.git] / src / gns / test_gns_max_queries.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_max_queries.c
22  * @brief base testcase for testing GNS background queries
23  * in particular query replacement and clean shutdown
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 "gns.h"
30 #include "gnunet_signatures.h"
31 #include "gnunet_namestore_service.h"
32 #include "gnunet_dnsparser_lib.h"
33 #include "gnunet_gns_service.h"
34
35 /* DEFINES */
36 #define VERBOSE GNUNET_YES
37
38 /* Timeout for entire testcase */
39 #define TIMEOUT GNUNET_TIME_relative_multiply(GNUNET_TIME_UNIT_SECONDS, 20)
40
41 /* If number of peers not in config file, use this number */
42 #define DEFAULT_NUM_PEERS 2
43
44 /* test records to resolve */
45 #define TEST_DOMAIN "www.gads"
46 #define TEST_DOMAIN_NACK "doesnotexist.bob.gads"
47 #define TEST_IP "127.0.0.1"
48 #define TEST_RECORD_NAME "www"
49 #define TEST_ADDITIONAL_LOOKUPS 5
50 #define TEST_AUTHORITY_NAME "bob"
51
52 #define KEYFILE_BOB "../namestore/zonefiles/HGU0A0VCU334DN7F2I9UIUMVQMM7JMSD142LIMNUGTTV9R0CF4EG.zkey"
53
54 /* Globals */
55
56 /* Task handle to use to schedule test failure */
57 GNUNET_SCHEDULER_TaskIdentifier die_task;
58
59 /* Global return value (0 for success, anything else for failure) */
60 static int ok;
61
62 static struct GNUNET_NAMESTORE_Handle *namestore_handle;
63
64 static struct GNUNET_GNS_Handle *gns_handle;
65
66 const struct GNUNET_CONFIGURATION_Handle *cfg;
67
68 static unsigned long long max_parallel_lookups;
69
70
71 /**
72  * Check if the get_handle is being used, if so stop the request.  Either
73  * way, schedule the end_badly_cont function which actually shuts down the
74  * test.
75  */
76 static void
77 end_badly (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
78 {
79   die_task = GNUNET_SCHEDULER_NO_TASK;
80   if (NULL != gns_handle)
81   {
82     GNUNET_GNS_disconnect(gns_handle);
83     gns_handle = NULL;
84   }
85
86   if (NULL != namestore_handle)
87   {
88     GNUNET_NAMESTORE_disconnect (namestore_handle);
89     namestore_handle = NULL;
90   }
91   GNUNET_break (0);
92   GNUNET_SCHEDULER_shutdown ();
93   ok = 1;
94 }
95
96 static void
97 end_badly_now ()
98 {
99   GNUNET_SCHEDULER_cancel (die_task);
100   die_task = GNUNET_SCHEDULER_add_now (&end_badly, NULL);
101 }
102
103
104 static void
105 on_lookup_result_dummy(void *cls, uint32_t rd_count,
106                        const struct GNUNET_NAMESTORE_RecordData *rd)
107 {
108   if (GNUNET_SCHEDULER_NO_TASK != die_task)
109   {
110       GNUNET_SCHEDULER_cancel (die_task);
111       die_task = GNUNET_SCHEDULER_add_delayed (TIMEOUT, &end_badly, NULL);
112   }
113   if (rd_count != 0)
114   {
115     GNUNET_log(GNUNET_ERROR_TYPE_ERROR,
116                "Got %d results from dummy lookup! Wanted: 0\n",
117                rd_count);
118     ok = -1;
119   }
120   fprintf (stderr, ".");
121 }
122
123 static void
124 on_lookup_result(void *cls, uint32_t rd_count,
125                  const struct GNUNET_NAMESTORE_RecordData *rd)
126 {
127   struct in_addr a;
128   int i;
129   char* addr;
130   
131   if (GNUNET_SCHEDULER_NO_TASK != die_task)
132   {
133       GNUNET_SCHEDULER_cancel (die_task);
134       die_task = GNUNET_SCHEDULER_NO_TASK;
135   }
136
137   GNUNET_NAMESTORE_disconnect (namestore_handle);
138   namestore_handle = NULL;
139   fprintf (stderr, "\n");
140   if (rd_count == 0)
141   {
142     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
143                 "Lookup failed, rp_filtering?\n");
144     ok = 2;
145   }
146   else
147   {
148     ok = 1;
149     GNUNET_log (GNUNET_ERROR_TYPE_INFO, "name: %s\n", (char*)cls);
150     for (i=0; i<rd_count; i++)
151     {
152       GNUNET_log (GNUNET_ERROR_TYPE_INFO, "type: %d\n", rd[i].record_type);
153       if (rd[i].record_type == GNUNET_GNS_RECORD_A)
154       {
155         memcpy(&a, rd[i].data, sizeof(a));
156         addr = inet_ntoa(a);
157         GNUNET_log (GNUNET_ERROR_TYPE_INFO, "address: %s\n", addr);
158         if (0 == strcmp(addr, TEST_IP))
159         {
160           GNUNET_log (GNUNET_ERROR_TYPE_INFO,
161                     "%s correctly resolved to %s!\n", TEST_DOMAIN, addr);
162           ok = 0;
163         }
164       }
165       else
166       {
167         GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "No resolution!\n");
168       }
169     }
170   }
171   GNUNET_GNS_disconnect(gns_handle);
172   gns_handle = NULL;
173   GNUNET_log (GNUNET_ERROR_TYPE_INFO, "Shutting down peer!\n");
174   GNUNET_SCHEDULER_shutdown ();
175 }
176
177
178 /**
179  * Function scheduled to be run on the successful start of services
180  * tries to look up the dns record for TEST_DOMAIN
181  */
182 static void
183 commence_testing (void *cls, int32_t success, const char *emsg)
184 {
185   int i;
186   char lookup_name[MAX_DNS_NAME_LENGTH];
187   
188   
189   gns_handle = GNUNET_GNS_connect(cfg);
190
191   if (NULL == gns_handle)
192   {
193     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
194                 "Failed to connect to GNS!\n");
195     ok = 2;
196   }
197
198
199   /* Now lookup some non existing records */
200   for (i=0; i<max_parallel_lookups+TEST_ADDITIONAL_LOOKUPS; i++)
201   {
202     GNUNET_snprintf(lookup_name,
203                     MAX_DNS_NAME_LENGTH,
204                     "www.doesnotexist-%d.bob.gads", i);
205     GNUNET_GNS_lookup(gns_handle, lookup_name, GNUNET_GNS_RECORD_A,
206                       GNUNET_NO,
207                       NULL,
208                       &on_lookup_result_dummy, NULL);
209   }
210
211   GNUNET_GNS_lookup(gns_handle, TEST_DOMAIN, GNUNET_GNS_RECORD_A,
212                     GNUNET_NO,
213                     NULL,
214                     &on_lookup_result, TEST_DOMAIN);
215 }
216
217
218
219 static void
220 do_check (void *cls,
221           const struct GNUNET_CONFIGURATION_Handle *ccfg,
222           struct GNUNET_TESTING_Peer *peer)
223 {
224   struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded alice_pkey;
225   struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded bob_pkey;
226   struct GNUNET_CRYPTO_RsaPrivateKey *alice_key;
227   struct GNUNET_CRYPTO_RsaPrivateKey *bob_key;
228   char* alice_keyfile;
229   struct GNUNET_CRYPTO_ShortHashCode bob_hash;
230
231   cfg = ccfg;
232   die_task = GNUNET_SCHEDULER_add_delayed (TIMEOUT, &end_badly, NULL);
233
234
235   /* put records into namestore */
236   namestore_handle = GNUNET_NAMESTORE_connect(cfg);
237   if (NULL == namestore_handle)
238   {
239     GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Failed to connect to namestore\n");
240     end_badly_now();
241     return;
242   }
243
244   if (GNUNET_OK != GNUNET_CONFIGURATION_get_value_filename (cfg, "gns",
245                                                           "ZONEKEY",
246                                                           &alice_keyfile))
247   {
248     GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Failed to get key from cfg\n");
249     end_badly_now();
250     return;
251   }
252
253   if (GNUNET_OK != GNUNET_CONFIGURATION_get_value_number (cfg, "gns",
254                                              "MAX_PARALLEL_BACKGROUND_QUERIES",
255                                              &max_parallel_lookups))
256   {
257     GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Failed to get max queries from cfg\n");
258     end_badly_now();
259     GNUNET_free (alice_keyfile);
260     return;
261   }
262
263   alice_key = GNUNET_CRYPTO_rsa_key_create_from_file (alice_keyfile);
264   bob_key = GNUNET_CRYPTO_rsa_key_create_from_file (KEYFILE_BOB);
265
266   GNUNET_CRYPTO_rsa_key_get_public (alice_key, &alice_pkey);
267   GNUNET_CRYPTO_rsa_key_get_public (bob_key, &bob_pkey);
268   
269   GNUNET_free(alice_keyfile);
270
271   struct GNUNET_NAMESTORE_RecordData rd;
272   char* ip = TEST_IP;
273   struct in_addr *web = GNUNET_malloc(sizeof(struct in_addr));
274   rd.expiration_time = UINT64_MAX;
275   GNUNET_assert(1 == inet_pton (AF_INET, ip, web));
276   rd.data_size = sizeof(struct in_addr);
277   rd.data = web;
278   rd.record_type = GNUNET_DNSPARSER_TYPE_A;
279   rd.flags = GNUNET_NAMESTORE_RF_AUTHORITY;
280
281   GNUNET_NAMESTORE_record_create (namestore_handle,
282                                   alice_key,
283                                   TEST_RECORD_NAME,
284                                   &rd,
285                                   NULL,
286                                   NULL);
287
288   GNUNET_CRYPTO_short_hash(&bob_pkey, sizeof(bob_pkey), &bob_hash);
289   rd.data_size = sizeof(struct GNUNET_CRYPTO_ShortHashCode);
290   rd.data = &bob_hash;
291   rd.record_type = GNUNET_GNS_RECORD_PKEY;
292
293   GNUNET_NAMESTORE_record_create (namestore_handle,
294                                   alice_key,
295                                   TEST_AUTHORITY_NAME,
296                                   &rd,
297                                   &commence_testing,
298                                   NULL);
299   
300   GNUNET_CRYPTO_rsa_key_free(alice_key);
301   GNUNET_CRYPTO_rsa_key_free(bob_key);
302   GNUNET_free(web);
303
304 }
305
306
307 int
308 main (int argc, char *argv[])
309 {
310   ok = 1;
311
312   GNUNET_log_setup ("test-gns-max-queries",
313 #if VERBOSE
314                     "DEBUG",
315 #else
316                     "WARNING",
317 #endif
318                     NULL);
319   GNUNET_TESTING_peer_run ("test-gns-max-queries", "test_gns_simple_lookup.conf", &do_check, NULL);
320   return ok;
321 }
322
323
324 /* end of test_gns_simple_zkey_lookup.c */