-fixes
[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.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.gnunet"
46 #define TEST_DOMAIN_NACK "doesnotexist.bob.gnunet"
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 /**
57  * Directory to store temp data in, defined in config file
58  */
59 static char *test_directory;
60
61 static struct GNUNET_TESTING_PeerGroup *pg;
62
63 /* Task handle to use to schedule test failure */
64 GNUNET_SCHEDULER_TaskIdentifier die_task;
65
66 /* Global return value (0 for success, anything else for failure) */
67 static int ok;
68
69 static struct GNUNET_NAMESTORE_Handle *namestore_handle;
70
71 static struct GNUNET_GNS_Handle *gns_handle;
72
73 const struct GNUNET_CONFIGURATION_Handle *cfg;
74
75 static unsigned long long max_parallel_lookups;
76
77 /**
78  * Check whether peers successfully shut down.
79  */
80 void
81 shutdown_callback (void *cls, const char *emsg)
82 {
83   if (emsg != NULL)
84   {
85     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Error on shutdown! ret=%d\n", ok);
86     if (ok == 0)
87       ok = 2;
88   }
89
90   GNUNET_log (GNUNET_ERROR_TYPE_INFO, "done(ret=%d)!\n", ok);
91 }
92
93 static void
94 on_lookup_result_dummy(void *cls, uint32_t rd_count,
95                        const struct GNUNET_NAMESTORE_RecordData *rd)
96 {
97   if (rd_count != 0)
98   {
99     GNUNET_log(GNUNET_ERROR_TYPE_ERROR,
100                "Got %d results from dummy lookup! Wanted: 0\n",
101                rd_count);
102     ok = -1;
103   }
104 }
105
106 static void
107 on_lookup_result(void *cls, uint32_t rd_count,
108                  const struct GNUNET_NAMESTORE_RecordData *rd)
109 {
110   struct in_addr a;
111   int i;
112   char* addr;
113   
114   if (rd_count == 0)
115   {
116     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
117                 "Lookup failed, rp_filtering?\n");
118     ok = 2;
119   }
120   else
121   {
122     ok = 1;
123     GNUNET_log (GNUNET_ERROR_TYPE_INFO, "name: %s\n", (char*)cls);
124     for (i=0; i<rd_count; i++)
125     {
126       GNUNET_log (GNUNET_ERROR_TYPE_INFO, "type: %d\n", rd[i].record_type);
127       if (rd[i].record_type == GNUNET_GNS_RECORD_TYPE_A)
128       {
129         memcpy(&a, rd[i].data, sizeof(a));
130         addr = inet_ntoa(a);
131         GNUNET_log (GNUNET_ERROR_TYPE_INFO, "address: %s\n", addr);
132         if (0 == strcmp(addr, TEST_IP))
133         {
134           GNUNET_log (GNUNET_ERROR_TYPE_INFO,
135                     "%s correctly resolved to %s!\n", TEST_DOMAIN, addr);
136           ok = 0;
137         }
138       }
139       else
140       {
141         GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "No resolution!\n");
142       }
143     }
144   }
145   GNUNET_GNS_disconnect(gns_handle);
146   GNUNET_log (GNUNET_ERROR_TYPE_INFO, "Shutting down peer1!\n");
147   //GNUNET_TESTING_daemon_stop (d1, TIMEOUT, &shutdown_callback, NULL,
148   //                            GNUNET_YES, GNUNET_NO);
149   GNUNET_TESTING_daemons_stop (pg, TIMEOUT, &shutdown_callback, NULL);
150 }
151
152
153 /**
154  * Function scheduled to be run on the successful start of services
155  * tries to look up the dns record for TEST_DOMAIN
156  */
157 static void
158 commence_testing (void *cls, int32_t success, const char *emsg)
159 {
160   int i;
161   char lookup_name[MAX_DNS_NAME_LENGTH];
162   
163   GNUNET_NAMESTORE_disconnect(namestore_handle, GNUNET_YES);
164   
165   gns_handle = GNUNET_GNS_connect(cfg);
166
167   if (NULL == gns_handle)
168   {
169     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
170                 "Failed to connect to GNS!\n");
171     ok = 2;
172   }
173
174
175   /* Now lookup some non existing records */
176   for (i=0; i<max_parallel_lookups+TEST_ADDITIONAL_LOOKUPS; i++)
177   {
178     GNUNET_snprintf(lookup_name,
179                     MAX_DNS_NAME_LENGTH,
180                     "www.doesnotexist-%d.bob.gnunet", i);
181     GNUNET_GNS_lookup(gns_handle, lookup_name, GNUNET_GNS_RECORD_TYPE_A,
182                       &on_lookup_result_dummy, NULL);
183   }
184
185   GNUNET_GNS_lookup(gns_handle, TEST_DOMAIN, GNUNET_GNS_RECORD_TYPE_A,
186                     &on_lookup_result, TEST_DOMAIN);
187 }
188
189
190 /**
191  * Continuation for the GNUNET_DHT_get_stop call, so that we don't shut
192  * down the peers without freeing memory associated with GET request.
193  */
194 static void
195 end_badly_cont (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
196 {
197
198   if (pg != NULL)
199     GNUNET_TESTING_daemons_stop (pg, TIMEOUT, &shutdown_callback, NULL);
200   GNUNET_SCHEDULER_cancel (die_task);
201 }
202
203 /**
204  * Check if the get_handle is being used, if so stop the request.  Either
205  * way, schedule the end_badly_cont function which actually shuts down the
206  * test.
207  */
208 static void
209 end_badly (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
210 {
211   GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Failing test with error: `%s'!\n",
212               (char *) cls);
213   GNUNET_SCHEDULER_add_now (&end_badly_cont, NULL);
214   ok = 1;
215 }
216
217 static void
218 do_lookup(void *cls, const struct GNUNET_PeerIdentity *id,
219           const struct GNUNET_CONFIGURATION_Handle *_cfg,
220           struct GNUNET_TESTING_Daemon *d, const char *emsg)
221 {
222   struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded alice_pkey;
223   struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded bob_pkey;
224   struct GNUNET_CRYPTO_RsaPrivateKey *alice_key;
225   struct GNUNET_CRYPTO_RsaPrivateKey *bob_key;
226   char* alice_keyfile;
227   struct GNUNET_CRYPTO_ShortHashCode bob_hash;
228
229   cfg = _cfg;
230
231   GNUNET_SCHEDULER_cancel (die_task);
232
233   /* put records into namestore */
234   namestore_handle = GNUNET_NAMESTORE_connect(cfg);
235   if (NULL == namestore_handle)
236   {
237     GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Failed to connect to namestore\n");
238     ok = -1;
239     return;
240   }
241
242   if (GNUNET_OK != GNUNET_CONFIGURATION_get_value_filename (cfg, "gns",
243                                                           "ZONEKEY",
244                                                           &alice_keyfile))
245   {
246     GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Failed to get key from cfg\n");
247     ok = -1;
248     return;
249   }
250
251   if (GNUNET_OK != GNUNET_CONFIGURATION_get_value_number (cfg, "gns",
252                                              "MAX_PARALLEL_BACKGROUND_QUERIES",
253                                              &max_parallel_lookups))
254   {
255     GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Failed to get max queries from cfg\n");
256     ok = -1;
257     GNUNET_free (alice_keyfile);
258     return;
259   }
260
261   alice_key = GNUNET_CRYPTO_rsa_key_create_from_file (alice_keyfile);
262   bob_key = GNUNET_CRYPTO_rsa_key_create_from_file (KEYFILE_BOB);
263
264   GNUNET_CRYPTO_rsa_key_get_public (alice_key, &alice_pkey);
265   GNUNET_CRYPTO_rsa_key_get_public (bob_key, &bob_pkey);
266   
267   GNUNET_free(alice_keyfile);
268
269   struct GNUNET_NAMESTORE_RecordData rd;
270   char* ip = TEST_IP;
271   struct in_addr *web = GNUNET_malloc(sizeof(struct in_addr));
272   rd.expiration = GNUNET_TIME_absolute_get_forever ();
273   GNUNET_assert(1 == inet_pton (AF_INET, ip, web));
274   rd.data_size = sizeof(struct in_addr);
275   rd.data = web;
276   rd.record_type = GNUNET_DNSPARSER_TYPE_A;
277
278   GNUNET_NAMESTORE_record_create (namestore_handle,
279                                   alice_key,
280                                   TEST_RECORD_NAME,
281                                   &rd,
282                                   NULL,
283                                   NULL);
284
285   GNUNET_CRYPTO_short_hash(&bob_pkey, sizeof(bob_pkey), &bob_hash);
286   rd.data_size = sizeof(struct GNUNET_CRYPTO_ShortHashCode);
287   rd.data = &bob_hash;
288   rd.record_type = GNUNET_GNS_RECORD_PKEY;
289
290   GNUNET_NAMESTORE_record_create (namestore_handle,
291                                   alice_key,
292                                   TEST_AUTHORITY_NAME,
293                                   &rd,
294                                   &commence_testing,
295                                   NULL);
296   
297   GNUNET_CRYPTO_rsa_key_free(alice_key);
298   GNUNET_CRYPTO_rsa_key_free(bob_key);
299   GNUNET_free(web);
300
301 }
302
303 static void
304 run (void *cls, char *const *args, const char *cfgfile,
305      const struct GNUNET_CONFIGURATION_Handle *c)
306 {
307   cfg = c;
308    /* Get path from configuration file */
309   if (GNUNET_YES !=
310       GNUNET_CONFIGURATION_get_value_string (cfg, "paths", "servicehome",
311                                              &test_directory))
312   {
313     ok = 404;
314     return;
315   }
316
317     
318   /* Set up a task to end testing if peer start fails */
319   die_task =
320       GNUNET_SCHEDULER_add_delayed (TIMEOUT, &end_badly,
321                                     "didn't start all daemons in reasonable amount of time!!!");
322   
323   /* Start alice */
324   //d1 = GNUNET_TESTING_daemon_start(cfg, TIMEOUT, GNUNET_NO, NULL, NULL, 0,
325   //                                 NULL, NULL, NULL, &do_lookup, NULL);
326   pg = GNUNET_TESTING_daemons_start(cfg, 1, 1, 1, TIMEOUT,
327                                     NULL, NULL, &do_lookup, NULL,
328                                     NULL, NULL, NULL);
329 }
330
331 static int
332 check ()
333 {
334   int ret;
335
336   /* Arguments for GNUNET_PROGRAM_run */
337   char *const argv[] = { "test-gns-max-queries", /* Name to give running binary */
338     "-c",
339     "test_gns_simple_lookup.conf",       /* Config file to use */
340 #if VERBOSE
341     "-L", "DEBUG",
342 #endif
343     NULL
344   };
345   struct GNUNET_GETOPT_CommandLineOption options[] = {
346     GNUNET_GETOPT_OPTION_END
347   };
348   /* Run the run function as a new program */
349   ret =
350       GNUNET_PROGRAM_run ((sizeof (argv) / sizeof (char *)) - 1, argv,
351                           "test-gns-max-queries", "nohelp", options, &run,
352                           &ok);
353   if (ret != GNUNET_OK)
354   {
355     GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
356                 "`test-gns-simple-lookup': Failed with error code %d\n", ret);
357   }
358   return ok;
359 }
360
361 int
362 main (int argc, char *argv[])
363 {
364   int ret;
365
366   GNUNET_log_setup ("test-gns-simple-lookup",
367 #if VERBOSE
368                     "DEBUG",
369 #else
370                     "WARNING",
371 #endif
372                     NULL);
373   ret = check ();
374   /**
375    * Need to remove base directory, subdirectories taken care
376    * of by the testing framework.
377    */
378   return ret;
379 }
380
381 /* end of test_gns_twopeer.c */