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