-consistently use struct GNUNET_HashCode
[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                       GNUNET_NO,
183                       &on_lookup_result_dummy, NULL);
184   }
185
186   GNUNET_GNS_lookup(gns_handle, TEST_DOMAIN, GNUNET_GNS_RECORD_TYPE_A,
187                     GNUNET_NO,
188                     &on_lookup_result, TEST_DOMAIN);
189 }
190
191
192 /**
193  * Continuation for the GNUNET_DHT_get_stop call, so that we don't shut
194  * down the peers without freeing memory associated with GET request.
195  */
196 static void
197 end_badly_cont (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
198 {
199
200   if (pg != NULL)
201     GNUNET_TESTING_daemons_stop (pg, TIMEOUT, &shutdown_callback, NULL);
202   GNUNET_SCHEDULER_cancel (die_task);
203 }
204
205 /**
206  * Check if the get_handle is being used, if so stop the request.  Either
207  * way, schedule the end_badly_cont function which actually shuts down the
208  * test.
209  */
210 static void
211 end_badly (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
212 {
213   GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Failing test with error: `%s'!\n",
214               (char *) cls);
215   GNUNET_SCHEDULER_add_now (&end_badly_cont, NULL);
216   ok = 1;
217 }
218
219 static void
220 do_lookup(void *cls, const struct GNUNET_PeerIdentity *id,
221           const struct GNUNET_CONFIGURATION_Handle *_cfg,
222           struct GNUNET_TESTING_Daemon *d, const char *emsg)
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 = _cfg;
232
233   GNUNET_SCHEDULER_cancel (die_task);
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     ok = -1;
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     ok = -1;
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     ok = -1;
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 = GNUNET_TIME_UNIT_FOREVER_ABS;
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
280   GNUNET_NAMESTORE_record_create (namestore_handle,
281                                   alice_key,
282                                   TEST_RECORD_NAME,
283                                   &rd,
284                                   NULL,
285                                   NULL);
286
287   GNUNET_CRYPTO_short_hash(&bob_pkey, sizeof(bob_pkey), &bob_hash);
288   rd.data_size = sizeof(struct GNUNET_CRYPTO_ShortHashCode);
289   rd.data = &bob_hash;
290   rd.record_type = GNUNET_GNS_RECORD_PKEY;
291
292   GNUNET_NAMESTORE_record_create (namestore_handle,
293                                   alice_key,
294                                   TEST_AUTHORITY_NAME,
295                                   &rd,
296                                   &commence_testing,
297                                   NULL);
298   
299   GNUNET_CRYPTO_rsa_key_free(alice_key);
300   GNUNET_CRYPTO_rsa_key_free(bob_key);
301   GNUNET_free(web);
302
303 }
304
305 static void
306 run (void *cls, char *const *args, const char *cfgfile,
307      const struct GNUNET_CONFIGURATION_Handle *c)
308 {
309   cfg = c;
310    /* Get path from configuration file */
311   if (GNUNET_YES !=
312       GNUNET_CONFIGURATION_get_value_string (cfg, "paths", "servicehome",
313                                              &test_directory))
314   {
315     ok = 404;
316     return;
317   }
318
319     
320   /* Set up a task to end testing if peer start fails */
321   die_task =
322       GNUNET_SCHEDULER_add_delayed (TIMEOUT, &end_badly,
323                                     "didn't start all daemons in reasonable amount of time!!!");
324   
325   /* Start alice */
326   //d1 = GNUNET_TESTING_daemon_start(cfg, TIMEOUT, GNUNET_NO, NULL, NULL, 0,
327   //                                 NULL, NULL, NULL, &do_lookup, NULL);
328   pg = GNUNET_TESTING_daemons_start(cfg, 1, 1, 1, TIMEOUT,
329                                     NULL, NULL, &do_lookup, NULL,
330                                     NULL, NULL, NULL);
331 }
332
333 static int
334 check ()
335 {
336   int ret;
337
338   /* Arguments for GNUNET_PROGRAM_run */
339   char *const argv[] = { "test-gns-max-queries", /* Name to give running binary */
340     "-c",
341     "test_gns_simple_lookup.conf",       /* Config file to use */
342 #if VERBOSE
343     "-L", "DEBUG",
344 #endif
345     NULL
346   };
347   struct GNUNET_GETOPT_CommandLineOption options[] = {
348     GNUNET_GETOPT_OPTION_END
349   };
350   /* Run the run function as a new program */
351   ret =
352       GNUNET_PROGRAM_run ((sizeof (argv) / sizeof (char *)) - 1, argv,
353                           "test-gns-max-queries", "nohelp", options, &run,
354                           &ok);
355   if (ret != GNUNET_OK)
356   {
357     GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
358                 "`test-gns-simple-lookup': Failed with error code %d\n", ret);
359   }
360   return ok;
361 }
362
363 int
364 main (int argc, char *argv[])
365 {
366   int ret;
367
368   GNUNET_log_setup ("test-gns-simple-lookup",
369 #if VERBOSE
370                     "DEBUG",
371 #else
372                     "WARNING",
373 #endif
374                     NULL);
375   ret = check ();
376   /**
377    * Need to remove base directory, subdirectories taken care
378    * of by the testing framework.
379    */
380   return ret;
381 }
382
383 /* end of test_gns_twopeer.c */