handle errors better
[oweals/gnunet.git] / src / util / test_resolver_api.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 2, 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 resolver/test_resolver_api.c
22  * @brief testcase for resolver_api.c
23  */
24 #include "platform.h"
25 #include "gnunet_common.h"
26 #include "gnunet_getopt_lib.h"
27 #include "gnunet_os_lib.h"
28 #include "gnunet_program_lib.h"
29 #include "gnunet_scheduler_lib.h"
30 #include "gnunet_resolver_service.h"
31 #include "resolver.h"
32
33 #define VERBOSE GNUNET_NO
34
35 /** 
36  * Using DNS root servers to check gnunet's resolver service
37  * a.root-servers.net <-> 198.41.0.4 is a fix 1:1 mapping that should not change over years
38  * For more information have a look at IANA's website http://www.root-servers.org/
39  */
40 #define ROOTSERVER_NAME "a.root-servers.net"
41 #define ROOTSERVER_IP   "198.41.0.4"
42
43 static void
44 check_hostname(void *cls, const struct sockaddr *sa, socklen_t salen)
45 {
46   int *ok = cls;
47
48   if (salen == 0)
49     {
50       (*ok) &= ~8;
51       return;
52     }
53   GNUNET_log(GNUNET_ERROR_TYPE_INFO, _("Got IP address `%s' for our host.\n"),
54       GNUNET_a2s(sa, salen));
55 }
56
57 static void
58 check_localhost_num(void *cls, const char *hostname)
59 {
60   int *ok = cls;
61   if (hostname == NULL)
62     return;
63   if (0 == strcmp(hostname, "127.0.0.1"))
64     {
65 #if DEBUG_RESOLVER
66       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
67           "Received correct hostname `%s'.\n", hostname);
68 #endif
69       (*ok) &= ~4;
70     }
71   else
72     {
73 #if DEBUG_RESOLVER
74       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
75           "Received invalid hostname `%s'.\n", hostname);
76 #endif
77       GNUNET_break(0);
78     }
79 }
80
81 static void
82 check_localhost(void *cls, const char *hostname)
83 {
84   int *ok = cls;
85   if (hostname == NULL)
86     return;
87   if (0 == strcmp(hostname, "localhost"))
88     {
89 #if DEBUG_RESOLVER
90       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
91           "Received correct hostname `%s'.\n", hostname);
92 #endif
93       (*ok) &= ~2;
94     }
95   else
96     {
97 #if DEBUG_RESOLVER
98       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
99           "Received invalid hostname `%s'.\n", hostname);
100 #endif
101       GNUNET_break(0);
102     }
103 }
104
105 static void
106 check_127(void *cls, const struct sockaddr *sa, socklen_t salen)
107 {
108   int *ok = cls;
109   const struct sockaddr_in *sai = (const struct sockaddr_in *) sa;
110
111   if (sa == NULL)
112     return;
113   GNUNET_assert(sizeof(struct sockaddr_in) == salen);
114   if (sai->sin_addr.s_addr == htonl(INADDR_LOOPBACK))
115     {
116 #if DEBUG_RESOLVER
117       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Received correct address.\n");
118 #endif
119       (*ok) &= ~1;
120     }
121   else
122     {
123 #if DEBUG_RESOLVER
124       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Received incorrect address.\n");
125 #endif
126       GNUNET_break(0);
127     }
128 }
129
130 static void
131 check_local_fqdn(void *cls, const char *gnunet_fqdn)
132 {
133   int result = 0;
134
135   struct hostent *host;
136   char hostname[GNUNET_OS_get_hostname_max_length() + 1];
137
138   if (0 != gethostname (hostname, sizeof (hostname) - 1))
139     {
140       GNUNET_log_strerror (GNUNET_ERROR_TYPE_ERROR |
141                            GNUNET_ERROR_TYPE_BULK, "gethostname");
142       return;
143     }
144 #if DEBUG_RESOLVER
145   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
146               _("Resolving our FQDN `%s'\n"), hostname);
147 #endif
148   host = gethostbyname ( hostname );
149   if ( NULL == host)
150   {
151     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
152                 _("Could not resolve our FQDN : %s %u\n"),
153                 hstrerror (h_errno), h_errno);
154     return;
155   }
156
157   GNUNET_assert( 0 != host);
158
159   result = strcmp(host->h_name, gnunet_fqdn);
160   if ( 0 != result )
161   {
162     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
163         "Local resolved and resolver resolved fqdns are not equal\n");
164   }
165   GNUNET_assert( 0 == result);
166 }
167
168
169
170 static void
171 check_rootserver_ip(void *cls, const struct sockaddr *sa, socklen_t salen)
172 {
173   int *ok = cls;
174   const struct sockaddr_in *sai = (const struct sockaddr_in *) sa;
175
176   if (sa == NULL)
177     return;
178   GNUNET_assert(sizeof(struct sockaddr_in) == salen);
179
180   if (0 == strcmp(inet_ntoa(sai->sin_addr), ROOTSERVER_IP))
181     {
182 #if DEBUG_RESOLVER
183       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Received correct rootserver ip address.\n");
184 #endif
185       (*ok) &= ~1;
186     }
187   else
188     {
189 #if DEBUG_RESOLVER
190       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Received incorrect rootserver ip address.\n");
191 #endif
192       GNUNET_break(0);
193     }
194 }
195
196 static void
197 check_rootserver_name(void *cls, const char *hostname)
198 {
199   int *ok = cls;
200   if (hostname == NULL)
201     return;
202
203   if (0 == strcmp(hostname, ROOTSERVER_NAME))
204     {
205 #if DEBUG_RESOLVER
206       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
207           "Received correct rootserver hostname `%s'.\n", hostname);
208 #endif
209       (*ok) &= ~2;
210     }
211   else
212     {
213 #if DEBUG_RESOLVER
214       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
215           "Received invalid rootserver hostname `%s'.\n", hostname);
216 #endif
217       GNUNET_break(0);
218     }
219 }
220
221 static void
222 run(void *cls, struct GNUNET_SCHEDULER_Handle *sched, char * const *args,
223     const char *cfgfile, const struct GNUNET_CONFIGURATION_Handle *cfg)
224 {
225   struct sockaddr_in sa;
226   struct GNUNET_TIME_Relative timeout = GNUNET_TIME_relative_multiply(
227       GNUNET_TIME_UNIT_MILLISECONDS, 2500);
228   int count_ips = 0;
229   char * own_fqdn;
230
231   memset(&sa, 0, sizeof(sa));
232   sa.sin_family = AF_INET;
233   sa.sin_addr.s_addr = htonl(INADDR_LOOPBACK);
234   GNUNET_RESOLVER_ip_get(sched, cfg, "localhost", AF_INET, timeout, &check_127,
235       cls);
236   GNUNET_RESOLVER_hostname_get(sched, cfg, (const struct sockaddr *) &sa,
237       sizeof(struct sockaddr), GNUNET_YES, timeout, &check_localhost, cls);
238   GNUNET_RESOLVER_hostname_get(sched, cfg, (const struct sockaddr *) &sa,
239       sizeof(struct sockaddr), GNUNET_NO, timeout, &check_localhost_num, cls);
240   GNUNET_RESOLVER_hostname_resolve(sched, cfg, AF_UNSPEC, timeout,
241       &check_hostname, cls);
242
243
244   /*
245    * Looking up our own fqdn
246    */
247   own_fqdn = GNUNET_RESOLVER_local_fqdn_get();
248   check_local_fqdn( NULL, own_fqdn);
249   GNUNET_free_non_null (own_fqdn);
250
251   /*
252    * Testing non-local DNS resolution
253    * DNS rootserver to test: a.root-servers.net - 198.41.0.4
254    */
255
256   char const * rootserver_name = ROOTSERVER_NAME;
257   struct hostent *rootserver;
258
259   rootserver = gethostbyname(rootserver_name);
260   if (rootserver == NULL)
261     {
262       /* Error: resolving ip addresses does not work */
263 #if DEBUG_RESOLVER
264       GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
265           _("gethostbyname() could not lookup IP address: %s\n"),
266           hstrerror (h_errno));
267 #endif
268       fprintf (stderr,
269                "System seems to be off-line, will not run all DNS tests\n");
270       return;
271     }
272
273   /* Counting returned IP addresses */
274   while (rootserver->h_addr_list[count_ips] != NULL)
275     count_ips++;
276   if (count_ips > 1)
277     {
278 #if DEBUG_RESOLVER
279       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "IP received range for root name server, but a root name server has only 1 IP\n");
280 #endif
281       GNUNET_break(0);
282     }
283
284   /* Comparing to resolved address to the address the root name server should have */
285   if (strcmp(inet_ntoa(*(struct in_addr *) rootserver->h_addr_list[0]),
286       ROOTSERVER_IP) != 0)
287     {
288 #if DEBUG_RESOLVER
289       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "IP received and IP for root name server differ\n");
290 #endif
291       GNUNET_break(0);
292     }
293 #if DEBUG_RESOLVER
294   GNUNET_log (GNUNET_ERROR_TYPE_INFO, "System's own forward name resolution is working\n");
295 #endif
296
297   /* Resolve the same using GNUNET */
298   GNUNET_RESOLVER_ip_get(sched, cfg, ROOTSERVER_NAME, AF_INET, timeout,
299       &check_rootserver_ip, cls);
300
301   /*
302    * Success: forward lookups work as expected
303    * Next step: reverse lookups
304    */
305
306   struct in_addr rootserver_addr;
307   rootserver->h_name = "";
308   if (1 != inet_pton(AF_INET, ROOTSERVER_IP, &rootserver_addr))
309     {
310 #if DEBUG_RESOLVER
311       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Could not transform root name server IP address\n");
312 #endif
313       GNUNET_break(0);
314     }
315
316   rootserver
317       = gethostbyaddr(&rootserver_addr, sizeof(rootserver_addr), AF_INET);
318   if (rootserver == NULL)
319     {
320       /* Error: resolving IP addresses does not work */
321 #if DEBUG_RESOLVER
322       GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
323           _("gethostbyaddr() could not lookup hostname: %s\n"),
324           hstrerror (h_errno));
325 #endif
326       GNUNET_break(0);
327     }
328   else
329   {
330     if (0 != strcmp(rootserver->h_name, ROOTSERVER_NAME))
331     {
332 #if DEBUG_RESOLVER
333       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Received hostname and hostname for root name server differ\n");
334 #endif
335       GNUNET_break(0);
336     }
337   }
338
339 #if DEBUG_RESOLVER
340   GNUNET_log (GNUNET_ERROR_TYPE_INFO, "System's own reverse name resolution is working\n");
341 #endif
342   /* Resolve the same using GNUNET */
343
344   memset(&sa, 0, sizeof(sa));
345   sa.sin_family = AF_INET;
346 #ifndef MINGW
347   inet_aton(ROOTSERVER_IP, &sa.sin_addr);
348 #else
349   sa.sin_addr.S_un.S_addr = inet_addr(ROOTSERVER_IP);
350 #endif
351   GNUNET_RESOLVER_hostname_get(sched, cfg, (const struct sockaddr *) &sa,
352       sizeof(struct sockaddr), GNUNET_YES, timeout, &check_rootserver_name, cls);
353 }
354
355 static int
356 check()
357 {
358   int ok = 1 + 2 + 4 + 8;
359   char *fn;
360   char *pfx;
361   pid_t pid;
362   char * const argv[] =
363     { "test-resolver-api", "-c", "test_resolver_api_data.conf",
364 #if VERBOSE
365         "-L", "DEBUG",
366 #endif
367         NULL };
368   struct GNUNET_GETOPT_CommandLineOption options[] =
369     { GNUNET_GETOPT_OPTION_END };
370   pfx = GNUNET_OS_installation_get_path(GNUNET_OS_IPK_BINDIR);
371   GNUNET_asprintf(&fn, "%s%cgnunet-service-resolver", pfx, DIR_SEPARATOR);
372   GNUNET_free(pfx);
373   pid = GNUNET_OS_start_process(NULL, NULL, fn, "gnunet-service-resolver",
374 #if VERBOSE
375       "-L", "DEBUG",
376 #endif
377       "-c", "test_resolver_api_data.conf", NULL);
378   GNUNET_free(fn);
379   GNUNET_assert(GNUNET_OK == GNUNET_PROGRAM_run((sizeof(argv) / sizeof(char *))
380       - 1, argv, "test-resolver-api", "nohelp", options, &run, &ok));
381   if (0 != PLIBC_KILL(pid, SIGTERM))
382     {
383       GNUNET_log_strerror(GNUNET_ERROR_TYPE_WARNING, "kill");
384       ok = 1;
385     }
386   GNUNET_OS_process_wait(pid);
387   if (ok != 0)
388     fprintf(stderr, "Missed some resolutions: %u\n", ok);
389   return ok;
390 }
391
392 int
393 main(int argc, char *argv[])
394 {
395   int ret;
396
397   GNUNET_log_setup("test-resolver-api",
398 #if VERBOSE
399       "DEBUG",
400 #else
401       "WARNING",
402 #endif
403       NULL);
404   ret = check();
405
406   return ret;
407 }
408
409 /* end of test_resolver_api.c */