don't bypass GNUnet IO
[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_hostname(void *cls, const char *hostname)
132 {
133   int result = 0;
134
135   char own_hostname[GNUNET_OS_get_hostname_max_length() + 1];
136 #if DEBUG_RESOLVER
137       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
138           "Hostname resolved here is `%s'.\n", own_hostname);
139       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
140           "Hostname resolved using resolver is `%s'.\n", hostname);
141 #endif
142
143   result = gethostname (own_hostname, sizeof (own_hostname) - 1);
144
145   if ( 0 != result )
146   {
147     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
148         "Could not resolve local hostname\n", own_hostname);
149   }
150   GNUNET_assert( 0 == result);
151
152   result = strcmp(hostname, own_hostname);
153   if ( 0 != result )
154   {
155     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
156         "Local resolved and resolver resolved hostnames are not equal\n", own_hostname);
157   }
158   GNUNET_assert( 0 == result);
159 }
160
161
162 static void
163 check_rootserver_ip(void *cls, const struct sockaddr *sa, socklen_t salen)
164 {
165   int *ok = cls;
166   const struct sockaddr_in *sai = (const struct sockaddr_in *) sa;
167
168   if (sa == NULL)
169     return;
170   GNUNET_assert(sizeof(struct sockaddr_in) == salen);
171
172   if (0 == strcmp(inet_ntoa(sai->sin_addr), ROOTSERVER_IP))
173     {
174 #if DEBUG_RESOLVER
175       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Received correct rootserver ip address.\n");
176 #endif
177       (*ok) &= ~1;
178     }
179   else
180     {
181 #if DEBUG_RESOLVER
182       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Received incorrect rootserver ip address.\n");
183 #endif
184       GNUNET_break(0);
185     }
186 }
187
188 static void
189 check_rootserver_name(void *cls, const char *hostname)
190 {
191   int *ok = cls;
192   if (hostname == NULL)
193     return;
194
195   if (0 == strcmp(hostname, ROOTSERVER_NAME))
196     {
197 #if DEBUG_RESOLVER
198       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
199           "Received correct rootserver hostname `%s'.\n", hostname);
200 #endif
201       (*ok) &= ~2;
202     }
203   else
204     {
205 #if DEBUG_RESOLVER
206       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
207           "Received invalid rootserver hostname `%s'.\n", hostname);
208 #endif
209       GNUNET_break(0);
210     }
211 }
212
213 static void
214 run(void *cls, struct GNUNET_SCHEDULER_Handle *sched, char * const *args,
215     const char *cfgfile, const struct GNUNET_CONFIGURATION_Handle *cfg)
216 {
217   struct sockaddr_in sa;
218   struct GNUNET_TIME_Relative timeout = GNUNET_TIME_relative_multiply(
219       GNUNET_TIME_UNIT_MILLISECONDS, 2500);
220   int count_ips = 0;
221   char * own_hostname;
222
223   memset(&sa, 0, sizeof(sa));
224   sa.sin_family = AF_INET;
225   sa.sin_addr.s_addr = htonl(INADDR_LOOPBACK);
226   GNUNET_RESOLVER_ip_get(sched, cfg, "localhost", AF_INET, timeout, &check_127,
227       cls);
228   GNUNET_RESOLVER_hostname_get(sched, cfg, (const struct sockaddr *) &sa,
229       sizeof(struct sockaddr), GNUNET_YES, timeout, &check_localhost, cls);
230   GNUNET_RESOLVER_hostname_get(sched, cfg, (const struct sockaddr *) &sa,
231       sizeof(struct sockaddr), GNUNET_NO, timeout, &check_localhost_num, cls);
232   GNUNET_RESOLVER_hostname_resolve(sched, cfg, AF_UNSPEC, timeout,
233       &check_hostname, cls);
234
235   /*
236    * Looking up our own hostname
237    */
238   own_hostname = GNUNET_RESOLVER_local_hostname_get();
239   check_local_hostname( NULL, own_hostname);
240   GNUNET_free (own_hostname);
241
242   /*
243    * Testing non-local DNS resolution
244    * DNS rootserver to test: a.root-servers.net - 198.41.0.4
245    */
246
247   char const * rootserver_name = ROOTSERVER_NAME;
248   struct hostent *rootserver;
249
250   rootserver = gethostbyname(rootserver_name);
251   if (rootserver == NULL)
252     {
253       /* Error: resolving ip addresses does not work */
254 #if DEBUG_RESOLVER
255       GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
256           _("gethostbyname() could not lookup IP address: %s\n"),
257           hstrerror (h_errno));
258 #endif
259       GNUNET_break(0);
260       return;
261     }
262
263   /* Counting returned IP addresses */
264   while (rootserver->h_addr_list[count_ips] != NULL)
265     count_ips++;
266   if (count_ips > 1)
267     {
268 #if DEBUG_RESOLVER
269       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "IP received range for root name server, but a root name server has only 1 IP\n");
270 #endif
271       GNUNET_break(0);
272     }
273
274   /* Comparing to resolved address to the address the root name server should have */
275   if (strcmp(inet_ntoa(*(struct in_addr *) rootserver->h_addr_list[0]),
276       ROOTSERVER_IP) != 0)
277     {
278 #if DEBUG_RESOLVER
279       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "IP received and IP for root name server differ\n");
280 #endif
281       GNUNET_break(0);
282     }
283 #if DEBUG_RESOLVER
284   GNUNET_log (GNUNET_ERROR_TYPE_INFO, "System's own forward name resolution is working\n");
285 #endif
286
287   /* Resolve the same using GNUNET */
288   GNUNET_RESOLVER_ip_get(sched, cfg, ROOTSERVER_NAME, AF_INET, timeout,
289       &check_rootserver_ip, cls);
290
291   /*
292    * Success: forward lookups work as expected
293    * Next step: reverse lookups
294    */
295
296   struct in_addr rootserver_addr;
297   rootserver->h_name = "";
298   if (1 != inet_pton(AF_INET, ROOTSERVER_IP, &rootserver_addr))
299     {
300 #if DEBUG_RESOLVER
301       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Could not transform root name server IP address\n");
302 #endif
303       GNUNET_break(0);
304     }
305
306   rootserver
307       = gethostbyaddr(&rootserver_addr, sizeof(rootserver_addr), AF_INET);
308   if (rootserver == NULL)
309     {
310       /* Error: resolving IP addresses does not work */
311 #if DEBUG_RESOLVER
312       GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
313           _("gethostbyaddr() could not lookup hostname: %s\n"),
314           hstrerror (h_errno));
315 #endif
316       GNUNET_break(0);
317     }
318   else
319   {
320     if (0 != strcmp(rootserver->h_name, ROOTSERVER_NAME))
321     {
322 #if DEBUG_RESOLVER
323       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Received hostname and hostname for root name server differ\n");
324 #endif
325       GNUNET_break(0);
326     }
327   }
328
329 #if DEBUG_RESOLVER
330   GNUNET_log (GNUNET_ERROR_TYPE_INFO, "System's own reverse name resolution is working\n");
331 #endif
332   /* Resolve the same using GNUNET */
333
334   memset(&sa, 0, sizeof(sa));
335   sa.sin_family = AF_INET;
336 #ifndef MINGW
337   inet_aton(ROOTSERVER_IP, &sa.sin_addr);
338 #else
339   sa.sin_addr.S_un.S_addr = inet_addr(ROOTSERVER_IP);
340 #endif
341   GNUNET_RESOLVER_hostname_get(sched, cfg, (const struct sockaddr *) &sa,
342       sizeof(struct sockaddr), GNUNET_YES, timeout, &check_rootserver_name, cls);
343 }
344
345 static int
346 check()
347 {
348   int ok = 1 + 2 + 4 + 8;
349   char *fn;
350   char *pfx;
351   pid_t pid;
352   char * const argv[] =
353     { "test-resolver-api", "-c", "test_resolver_api_data.conf",
354 #if VERBOSE
355         "-L", "DEBUG",
356 #endif
357         NULL };
358   struct GNUNET_GETOPT_CommandLineOption options[] =
359     { GNUNET_GETOPT_OPTION_END };
360   pfx = GNUNET_OS_installation_get_path(GNUNET_OS_IPK_BINDIR);
361   GNUNET_asprintf(&fn, "%s%cgnunet-service-resolver", pfx, DIR_SEPARATOR);
362   GNUNET_free(pfx);
363   pid = GNUNET_OS_start_process(NULL, NULL, fn, "gnunet-service-resolver",
364 #if VERBOSE
365       "-L", "DEBUG",
366 #endif
367       "-c", "test_resolver_api_data.conf", NULL);
368   GNUNET_free(fn);
369   GNUNET_assert(GNUNET_OK == GNUNET_PROGRAM_run((sizeof(argv) / sizeof(char *))
370       - 1, argv, "test-resolver-api", "nohelp", options, &run, &ok));
371   if (0 != PLIBC_KILL(pid, SIGTERM))
372     {
373       GNUNET_log_strerror(GNUNET_ERROR_TYPE_WARNING, "kill");
374       ok = 1;
375     }
376   GNUNET_OS_process_wait(pid);
377   if (ok != 0)
378     fprintf(stderr, "Missed some resolutions: %u\n", ok);
379   return ok;
380 }
381
382 int
383 main(int argc, char *argv[])
384 {
385   int ret;
386
387   GNUNET_log_setup("test-resolver-api",
388 #if VERBOSE
389       "DEBUG",
390 #else
391       "WARNING",
392 #endif
393       NULL);
394   ret = check();
395
396   return ret;
397 }
398
399 /* end of test_resolver_api.c */