3bdc40143d398d73e408ee099bb27ede0b9ba5b5
[oweals/gnunet.git] / src / util / resolver_api.c
1 /*
2      This file is part of GNUnet.
3      (C) 2009, 2011 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 /**
22  * @file util/resolver_api.c
23  * @brief resolver for writing a tool
24  * @author Christian Grothoff
25  */
26 #include "platform.h"
27 #include "gnunet_getopt_lib.h"
28 #include "gnunet_os_lib.h"
29 #include "gnunet_client_lib.h"
30 #include "gnunet_container_lib.h"
31 #include "gnunet_protocols.h"
32 #include "gnunet_resolver_service.h"
33 #include "gnunet_server_lib.h"
34 #include "resolver.h"
35
36 #define LOG(kind,...) GNUNET_log_from (kind, "resolver-api", __VA_ARGS__)
37
38 #define LOG_STRERROR(kind,syscall) GNUNET_log_from_strerror (kind, "resolver-api", syscall)
39
40 /**
41  * Maximum supported length for a hostname
42  */
43 #define MAX_HOSTNAME 1024
44
45
46 /**
47  * Possible hostnames for "loopback".
48  */
49 static const char *loopback[] = {
50   "localhost",
51   "ip6-localnet",
52   NULL
53 };
54
55
56 /**
57  * Configuration.
58  */
59 static const struct GNUNET_CONFIGURATION_Handle *resolver_cfg;
60
61 /**
62  * Our connection to the resolver service, created on-demand, but then
63  * persists until error or shutdown.
64  */
65 static struct GNUNET_CLIENT_Connection *client;
66
67 /**
68  * Head of DLL of requests.
69  */
70 static struct GNUNET_RESOLVER_RequestHandle *req_head;
71
72 /**
73  * Tail of DLL of requests.
74  */
75 static struct GNUNET_RESOLVER_RequestHandle *req_tail;
76
77 /**
78  * How long should we wait to reconnect?
79  */
80 static struct GNUNET_TIME_Relative backoff;
81
82 /**
83  * Task for reconnecting.
84  */
85 static GNUNET_SCHEDULER_TaskIdentifier r_task;
86
87 /**
88  * Task ID of shutdown task; only present while we have a
89  * connection to the resolver service.
90  */
91 static GNUNET_SCHEDULER_TaskIdentifier s_task;
92
93
94 /**
95  * Handle to a request given to the resolver.  Can be used to cancel
96  * the request prior to the timeout or successful execution.  Also
97  * used to track our internal state for the request.
98  */
99 struct GNUNET_RESOLVER_RequestHandle
100 {
101
102   /**
103    * Next entry in DLL of requests.
104    */
105   struct GNUNET_RESOLVER_RequestHandle *next;
106
107   /**
108    * Previous entry in DLL of requests.
109    */
110   struct GNUNET_RESOLVER_RequestHandle *prev;
111
112   /**
113    * Callback if this is an name resolution request,
114    * otherwise NULL.
115    */
116   GNUNET_RESOLVER_AddressCallback addr_callback;
117
118   /**
119    * Callback if this is a reverse lookup request,
120    * otherwise NULL.
121    */
122   GNUNET_RESOLVER_HostnameCallback name_callback;
123
124   /**
125    * Closure for the respective "callback".
126    */
127   void *cls;
128
129   /**
130    * When should this request time out?
131    */
132   struct GNUNET_TIME_Absolute timeout;
133
134   /**
135    * Task handle for numeric lookups.
136    */
137   GNUNET_SCHEDULER_TaskIdentifier task;
138
139   /**
140    * Desired address family.
141    */
142   int domain;
143
144   /**
145    * Has this request been transmitted to the service?
146    * GNUNET_YES if transmitted
147    * GNUNET_YES if not transmitted
148    * GNUNET_SYSERR when request was canceled
149    */
150   int was_transmitted;
151
152   /**
153    * Did we add this request to the queue?
154    */
155   int was_queued;
156
157   /**
158    * Desired direction (IP to name or name to IP)
159    */
160   int direction;
161
162   /**
163    * GNUNET_YES if a response was received
164    */
165   int received_response;
166
167   /**
168    * Length of the data that follows this struct.
169    */
170   size_t data_len;
171 };
172
173
174 /**
175  * Check that the resolver service runs on localhost
176  * (or equivalent).
177  */
178 static void
179 check_config ()
180 {
181   char *hostname;
182   unsigned int i;
183   struct sockaddr_in v4;
184   struct sockaddr_in6 v6;
185
186   memset (&v4, 0, sizeof (v4));
187   v4.sin_addr.s_addr = htonl (INADDR_LOOPBACK);
188   v4.sin_family = AF_INET;
189 #if HAVE_SOCKADDR_IN_SIN_LEN
190   v4.sin_len = sizeof (v4);
191 #endif
192   memset (&v6, 0, sizeof (v6));
193   v6.sin6_family = AF_INET6;
194 #if HAVE_SOCKADDR_IN_SIN_LEN
195   v6.sin6_len = sizeof (v6);
196 #endif
197   if (GNUNET_OK !=
198       GNUNET_CONFIGURATION_get_value_string (resolver_cfg, "resolver",
199                                              "HOSTNAME", &hostname))
200     {
201       LOG (GNUNET_ERROR_TYPE_ERROR,
202            _("Must specify `%s' for `%s' in configuration!\n"), "HOSTNAME",
203            "resolver");
204       GNUNET_assert (0);
205     }
206   if ((1 != inet_pton (AF_INET, hostname, &v4)) ||
207       (1 != inet_pton (AF_INET6, hostname, &v6)))
208     {
209       GNUNET_free (hostname);
210       return;
211     }
212   i = 0;
213   while (loopback[i] != NULL)
214     if (0 == strcasecmp (loopback[i++], hostname))
215       {
216         GNUNET_free (hostname);
217         return;
218       }
219   LOG (GNUNET_ERROR_TYPE_ERROR,
220        _
221        ("Must specify `%s' or numeric IP address for `%s' of `%s' in configuration!\n"),
222        "localhost", "HOSTNAME", "resolver");
223   GNUNET_free (hostname);
224   GNUNET_assert (0);
225 }
226
227
228 /**
229  * Create the connection to the resolver service.
230  *
231  * @param cfg configuration to use
232  */
233 void
234 GNUNET_RESOLVER_connect (const struct GNUNET_CONFIGURATION_Handle *cfg)
235 {
236   GNUNET_assert (NULL != cfg);
237   backoff = GNUNET_TIME_UNIT_MILLISECONDS;
238   resolver_cfg = cfg;
239   check_config ();
240 }
241
242
243 /**
244  * Destroy the connection to the resolver service.
245  */
246 void
247 GNUNET_RESOLVER_disconnect ()
248 {
249   GNUNET_assert (NULL == req_head);
250   GNUNET_assert (NULL == req_tail);
251   if (NULL != client)
252     {
253 #if DEBUG_RESOLVER
254       LOG (GNUNET_ERROR_TYPE_DEBUG, "Disconnecting from DNS service\n");
255 #endif
256       GNUNET_CLIENT_disconnect (client, GNUNET_NO);
257       client = NULL;
258     }
259   if (r_task != GNUNET_SCHEDULER_NO_TASK)
260     {
261       GNUNET_SCHEDULER_cancel (r_task);
262       r_task = GNUNET_SCHEDULER_NO_TASK;
263     }
264   if (s_task != GNUNET_SCHEDULER_NO_TASK)
265     {
266       GNUNET_SCHEDULER_cancel (s_task);
267       s_task = GNUNET_SCHEDULER_NO_TASK;
268     }
269 }
270
271
272 /**
273  * Convert IP address to string without DNS resolution.
274  *
275  * @param sa the address
276  * @param salen number of bytes in sa
277  * @return address as a string, NULL on error
278  */
279 static char *
280 no_resolve (const struct sockaddr *sa, socklen_t salen)
281 {
282   char *ret;
283   char inet4[INET_ADDRSTRLEN];
284   char inet6[INET6_ADDRSTRLEN];
285
286   if (salen < sizeof (struct sockaddr))
287     return NULL;
288   switch (sa->sa_family)
289     {
290     case AF_INET:
291       if (salen != sizeof (struct sockaddr_in))
292         return NULL;
293       if (NULL ==
294           inet_ntop (AF_INET, &((struct sockaddr_in *) sa)->sin_addr, inet4,
295                      INET_ADDRSTRLEN))
296         {
297           LOG_STRERROR (GNUNET_ERROR_TYPE_WARNING, "inet_ntop");
298           return NULL;
299         }
300       ret = GNUNET_strdup (inet4);
301       break;
302     case AF_INET6:
303       if (salen != sizeof (struct sockaddr_in6))
304         return NULL;
305       if (NULL ==
306           inet_ntop (AF_INET6, &((struct sockaddr_in6 *) sa)->sin6_addr,
307                      inet6, INET6_ADDRSTRLEN))
308         {
309           LOG_STRERROR (GNUNET_ERROR_TYPE_WARNING, "inet_ntop");
310           return NULL;
311         }
312       ret = GNUNET_strdup (inet6);
313       break;
314     default:
315       ret = NULL;
316       break;
317     }
318   return ret;
319 }
320
321
322 /**
323  * Adjust exponential back-off and reconnect to the service.
324  */
325 static void reconnect ();
326
327
328 /**
329  * Process pending requests to the resolver.
330  */
331 static void process_requests ();
332
333
334 /**
335  * Process response with a hostname for a DNS lookup.
336  *
337  * @param cls our "struct GNUNET_RESOLVER_RequestHandle" context
338  * @param msg message with the hostname, NULL on error
339  */
340 static void
341 handle_response (void *cls, const struct GNUNET_MessageHeader *msg)
342 {
343   struct GNUNET_RESOLVER_RequestHandle *rh = cls;
344   uint16_t size;
345   const char *hostname;
346   const struct sockaddr *sa;
347   socklen_t salen;
348
349 #if DEBUG_RESOLVER
350   LOG (GNUNET_ERROR_TYPE_DEBUG, "Receiving response from DNS service\n");
351 #endif
352   if (msg == NULL)
353     {
354       if (NULL != rh->name_callback)
355         LOG (GNUNET_ERROR_TYPE_INFO,
356              _("Timeout trying to resolve IP address `%s'.\n"),
357              GNUNET_a2s ((const void *) &rh[1], rh->data_len));
358       else
359         LOG (GNUNET_ERROR_TYPE_INFO,
360              _("Timeout trying to resolve hostname `%s'.\n"),
361              (const char *) &rh[1]);
362       /* check if request was canceled */
363       if (rh->was_transmitted != GNUNET_SYSERR)
364         {
365           if (NULL != rh->name_callback)
366             {
367               /* no reverse lookup was successful, return ip as string */
368               if (rh->received_response == GNUNET_NO)
369                 rh->name_callback (rh->cls,
370                                    no_resolve ((const struct sockaddr *)
371                                                &rh[1], rh->data_len));
372               /* at least one reverse lookup was successful */
373               else
374                 rh->name_callback (rh->cls, NULL);
375             }
376           if (NULL != rh->addr_callback)
377             rh->addr_callback (rh->cls, NULL, 0);
378         }
379       GNUNET_CONTAINER_DLL_remove (req_head, req_tail, rh);
380       GNUNET_free (rh);
381       GNUNET_CLIENT_disconnect (client, GNUNET_NO);
382       client = NULL;
383       reconnect ();
384       return;
385     }
386   if (GNUNET_MESSAGE_TYPE_RESOLVER_RESPONSE != ntohs (msg->type))
387     {
388       GNUNET_break (0);
389       GNUNET_CLIENT_disconnect (client, GNUNET_NO);
390       client = NULL;
391       reconnect ();
392       return;
393     }
394   size = ntohs (msg->size);
395   /* message contains not data, just header */
396   if (size == sizeof (struct GNUNET_MessageHeader))
397     {
398       /* check if request was canceled */
399       if (rh->was_transmitted != GNUNET_SYSERR)
400         {
401           if (NULL != rh->name_callback)
402             rh->name_callback (rh->cls, NULL);
403           if (NULL != rh->addr_callback)
404             rh->addr_callback (rh->cls, NULL, 0);
405         }
406       GNUNET_CONTAINER_DLL_remove (req_head, req_tail, rh);
407       GNUNET_free (rh);
408       process_requests ();
409       return;
410     }
411   /* return reverse lookup results to caller */
412   if (NULL != rh->name_callback)
413     {
414       hostname = (const char *) &msg[1];
415       if (hostname[size - sizeof (struct GNUNET_MessageHeader) - 1] != '\0')
416         {
417           GNUNET_break (0);
418           if (rh->was_transmitted != GNUNET_SYSERR)
419             rh->name_callback (rh->cls, NULL);
420           GNUNET_CONTAINER_DLL_remove (req_head, req_tail, rh);
421           GNUNET_free (rh);
422           GNUNET_CLIENT_disconnect (client, GNUNET_NO);
423           client = NULL;
424           reconnect ();
425           return;
426         }
427 #if DEBUG_RESOLVER
428       LOG (GNUNET_ERROR_TYPE_DEBUG, _("Resolver returns `%s' for IP `%s'.\n"),
429            hostname, GNUNET_a2s ((const void *) &rh[1], rh->data_len));
430 #endif
431       if (rh->was_transmitted != GNUNET_SYSERR)
432         rh->name_callback (rh->cls, hostname);
433       rh->received_response = GNUNET_YES;
434       GNUNET_CLIENT_receive (client, &handle_response, rh,
435                              GNUNET_TIME_absolute_get_remaining
436                              (rh->timeout));
437     }
438   /* return lookup results to caller */
439   if (NULL != rh->addr_callback)
440     {
441       sa = (const struct sockaddr *) &msg[1];
442       salen = size - sizeof (struct GNUNET_MessageHeader);
443       if (salen < sizeof (struct sockaddr))
444         {
445           GNUNET_break (0);
446           if (rh->was_transmitted != GNUNET_SYSERR)
447             rh->addr_callback (rh->cls, NULL, 0);
448           GNUNET_CONTAINER_DLL_remove (req_head, req_tail, rh);
449           GNUNET_free (rh);
450           GNUNET_CLIENT_disconnect (client, GNUNET_NO);
451           client = NULL;
452           reconnect ();
453           return;
454         }
455 #if DEBUG_RESOLVER
456       {
457         char *ips = no_resolve (sa, salen);
458
459         LOG (GNUNET_ERROR_TYPE_DEBUG, "Resolver returns `%s' for `%s'.\n",
460              ips, (const char *) &rh[1]);
461         GNUNET_free (ips);
462       }
463 #endif
464       rh->addr_callback (rh->cls, sa, salen);
465       GNUNET_CLIENT_receive (client, &handle_response, rh,
466                              GNUNET_TIME_absolute_get_remaining
467                              (rh->timeout));
468     }
469 }
470
471
472 /**
473  * We've been asked to lookup the address for a hostname and were
474  * given a valid numeric string.  Perform the callbacks for the
475  * numeric addresses.
476  *
477  * @param cls struct GNUNET_RESOLVER_RequestHandle for the request
478  * @param tc unused scheduler context
479  */
480 static void
481 numeric_resolution (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
482 {
483   struct GNUNET_RESOLVER_RequestHandle *rh = cls;
484   struct sockaddr_in v4;
485   struct sockaddr_in6 v6;
486   const char *hostname;
487
488   memset (&v4, 0, sizeof (v4));
489   v4.sin_family = AF_INET;
490 #if HAVE_SOCKADDR_IN_SIN_LEN
491   v4.sin_len = sizeof (v4);
492 #endif
493   memset (&v6, 0, sizeof (v6));
494   v6.sin6_family = AF_INET6;
495 #if HAVE_SOCKADDR_IN_SIN_LEN
496   v6.sin6_len = sizeof (v6);
497 #endif
498   hostname = (const char *) &rh[1];
499   if (((rh->domain == AF_UNSPEC) || (rh->domain == AF_INET)) &&
500       (1 == inet_pton (AF_INET, hostname, &v4.sin_addr)))
501     {
502       rh->addr_callback (rh->cls, (const struct sockaddr *) &v4, sizeof (v4));
503       if ((rh->domain == AF_UNSPEC) &&
504           (1 == inet_pton (AF_INET6, hostname, &v6.sin6_addr)))
505         {
506           /* this can happen on some systems IF "hostname" is "localhost" */
507           rh->addr_callback (rh->cls, (const struct sockaddr *) &v6,
508                              sizeof (v6));
509         }
510       rh->addr_callback (rh->cls, NULL, 0);
511       GNUNET_free (rh);
512       return;
513     }
514   if (((rh->domain == AF_UNSPEC) || (rh->domain == AF_INET6)) &&
515       (1 == inet_pton (AF_INET6, hostname, &v6.sin6_addr)))
516     {
517       rh->addr_callback (rh->cls, (const struct sockaddr *) &v6, sizeof (v6));
518       rh->addr_callback (rh->cls, NULL, 0);
519       GNUNET_free (rh);
520       return;
521     }
522   /* why are we here? this task should not have been scheduled! */
523   GNUNET_assert (0);
524   GNUNET_free (rh);
525 }
526
527
528 /**
529  * We've been asked to lookup the address for a hostname and were
530  * given a variant of "loopback".  Perform the callbacks for the
531  * respective loopback numeric addresses.
532  *
533  * @param cls struct GNUNET_RESOLVER_RequestHandle for the request
534  * @param tc unused scheduler context
535  */
536 static void
537 loopback_resolution (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
538 {
539   struct GNUNET_RESOLVER_RequestHandle *rh = cls;
540   struct sockaddr_in v4;
541   struct sockaddr_in6 v6;
542
543   memset (&v4, 0, sizeof (v4));
544   v4.sin_addr.s_addr = htonl (INADDR_LOOPBACK);
545   v4.sin_family = AF_INET;
546 #if HAVE_SOCKADDR_IN_SIN_LEN
547   v4.sin_len = sizeof (v4);
548 #endif
549   memset (&v6, 0, sizeof (v6));
550   v6.sin6_family = AF_INET6;
551 #if HAVE_SOCKADDR_IN_SIN_LEN
552   v6.sin6_len = sizeof (v6);
553 #endif
554   v6.sin6_addr = in6addr_loopback;
555   switch (rh->domain)
556     {
557     case AF_INET:
558       rh->addr_callback (rh->cls, (const struct sockaddr *) &v4, sizeof (v4));
559       break;
560     case AF_INET6:
561       rh->addr_callback (rh->cls, (const struct sockaddr *) &v6, sizeof (v6));
562       break;
563     case AF_UNSPEC:
564       rh->addr_callback (rh->cls, (const struct sockaddr *) &v6, sizeof (v6));
565       rh->addr_callback (rh->cls, (const struct sockaddr *) &v4, sizeof (v4));
566       break;
567     default:
568       GNUNET_break (0);
569       break;
570     }
571   rh->addr_callback (rh->cls, NULL, 0);
572   GNUNET_free (rh);
573 }
574
575
576 /**
577  * Task executed on system shutdown.
578  */
579 static void
580 shutdown_task (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
581 {
582   s_task = GNUNET_SCHEDULER_NO_TASK;
583   GNUNET_RESOLVER_disconnect ();
584 }
585
586
587 /**
588  * Process pending requests to the resolver.
589  */
590 static void
591 process_requests ()
592 {
593   struct GNUNET_RESOLVER_GetMessage *msg;
594   char buf[GNUNET_SERVER_MAX_MESSAGE_SIZE - 1];
595   struct GNUNET_RESOLVER_RequestHandle *rh;
596
597   if (NULL == client)
598     {
599       reconnect ();
600       return;
601     }
602   rh = req_head;
603   if (NULL == rh)
604     {
605       /* nothing to do, release socket really soon if there is nothing
606        * else happening... */
607       s_task =
608         GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_MILLISECONDS,
609                                       &shutdown_task, NULL);
610       return;
611     }
612   if (GNUNET_YES == rh->was_transmitted)
613     return;                     /* waiting for reply */
614   msg = (struct GNUNET_RESOLVER_GetMessage *) buf;
615   msg->header.size =
616     htons (sizeof (struct GNUNET_RESOLVER_GetMessage) + rh->data_len);
617   msg->header.type = htons (GNUNET_MESSAGE_TYPE_RESOLVER_REQUEST);
618   msg->direction = htonl (rh->direction);
619   msg->domain = htonl (rh->domain);
620   memcpy (&msg[1], &rh[1], rh->data_len);
621 #if DEBUG_RESOLVER
622   LOG (GNUNET_ERROR_TYPE_DEBUG,
623        "Transmitting DNS resolution request to DNS service\n");
624 #endif
625   if (GNUNET_OK !=
626       GNUNET_CLIENT_transmit_and_get_response (client, &msg->header,
627                                                GNUNET_TIME_absolute_get_remaining
628                                                (rh->timeout), GNUNET_YES,
629                                                &handle_response, rh))
630     {
631       GNUNET_CLIENT_disconnect (client, GNUNET_NO);
632       client = NULL;
633       reconnect ();
634       return;
635     }
636   rh->was_transmitted = GNUNET_YES;
637 }
638
639
640 /**
641  * Now try to reconnect to the resolver service.
642  *
643  * @param cls NULL
644  * @param tc scheduler context
645  */
646 static void
647 reconnect_task (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
648 {
649   r_task = GNUNET_SCHEDULER_NO_TASK;
650   if (NULL == req_head)
651     return;                     /* no work pending */
652   if (0 != (tc->reason & GNUNET_SCHEDULER_REASON_SHUTDOWN))
653     return;
654 #if DEBUG_RESOLVER
655   LOG (GNUNET_ERROR_TYPE_DEBUG, "Trying to connect to DNS service\n");
656 #endif
657   client = GNUNET_CLIENT_connect ("resolver", resolver_cfg);
658   if (NULL == client)
659     {
660       LOG (GNUNET_ERROR_TYPE_DEBUG,
661            "Failed to connect, will try again later\n");
662       reconnect ();
663       return;
664     }
665   process_requests ();
666 }
667
668
669 /**
670  * Adjust exponential back-off and reconnect to the service.
671  */
672 static void
673 reconnect ()
674 {
675   struct GNUNET_RESOLVER_RequestHandle *rh;
676
677   if (GNUNET_SCHEDULER_NO_TASK != r_task)
678     return;
679   GNUNET_assert (NULL == client);
680   if (NULL != (rh = req_head))
681     {
682       switch (rh->was_transmitted)
683         {
684         case GNUNET_NO:
685           /* nothing more to do */
686           break;
687         case GNUNET_YES:
688           /* disconnected, transmit again! */
689           rh->was_transmitted = GNUNET_NO;
690           break;
691         case GNUNET_SYSERR:
692           /* request was cancelled, remove entirely */
693           GNUNET_CONTAINER_DLL_remove (req_head, req_tail, rh);
694           GNUNET_free (rh);
695           break;
696         default:
697           GNUNET_assert (0);
698           break;
699         }
700     }
701 #if DEBUG_RESOLVER
702   LOG (GNUNET_ERROR_TYPE_DEBUG,
703        "Will try to connect to DNS service in %llu ms\n",
704        (unsigned long long) backoff.rel_value);
705 #endif
706   GNUNET_assert (NULL != resolver_cfg);
707   r_task = GNUNET_SCHEDULER_add_delayed (backoff, &reconnect_task, NULL);
708   backoff = GNUNET_TIME_relative_multiply (backoff, 2);
709 }
710
711
712 /**
713  * Convert a string to one or more IP addresses.
714  *
715  * @param hostname the hostname to resolve
716  * @param domain AF_INET or AF_INET6; use AF_UNSPEC for "any"
717  * @param callback function to call with addresses
718  * @param callback_cls closure for callback
719  * @param timeout how long to try resolving
720  * @return handle that can be used to cancel the request, NULL on error
721  */
722 struct GNUNET_RESOLVER_RequestHandle *
723 GNUNET_RESOLVER_ip_get (const char *hostname, int domain,
724                         struct GNUNET_TIME_Relative timeout,
725                         GNUNET_RESOLVER_AddressCallback callback,
726                         void *callback_cls)
727 {
728   struct GNUNET_RESOLVER_RequestHandle *rh;
729   size_t slen;
730   unsigned int i;
731   struct in_addr v4;
732   struct in6_addr v6;
733
734   slen = strlen (hostname) + 1;
735   if (slen + sizeof (struct GNUNET_RESOLVER_GetMessage) >=
736       GNUNET_SERVER_MAX_MESSAGE_SIZE)
737     {
738       GNUNET_break (0);
739       return NULL;
740     }
741   rh = GNUNET_malloc (sizeof (struct GNUNET_RESOLVER_RequestHandle) + slen);
742   rh->domain = domain;
743   rh->addr_callback = callback;
744   rh->cls = callback_cls;
745   memcpy (&rh[1], hostname, slen);
746   rh->data_len = slen;
747   rh->timeout = GNUNET_TIME_relative_to_absolute (timeout);
748   rh->direction = GNUNET_NO;
749   /* first, check if this is a numeric address */
750   if (((1 == inet_pton (AF_INET, hostname, &v4)) &&
751        ((domain == AF_INET) || (domain == AF_UNSPEC))) ||
752       ((1 == inet_pton (AF_INET6, hostname, &v6)) &&
753        ((domain == AF_INET6) || (domain == AF_UNSPEC))))
754     {
755       rh->task = GNUNET_SCHEDULER_add_now (&numeric_resolution, rh);
756       return rh;
757     }
758   /* then, check if this is a loopback address */
759   i = 0;
760   while (loopback[i] != NULL)
761     if (0 == strcasecmp (loopback[i++], hostname))
762       {
763         rh->task = GNUNET_SCHEDULER_add_now (&loopback_resolution, rh);
764         return rh;
765       }
766   GNUNET_CONTAINER_DLL_insert_tail (req_head, req_tail, rh);
767   rh->was_queued = GNUNET_YES;
768   if (s_task != GNUNET_SCHEDULER_NO_TASK)
769     {
770       GNUNET_SCHEDULER_cancel (s_task);
771       s_task = GNUNET_SCHEDULER_NO_TASK;
772     }
773   process_requests ();
774   return rh;
775 }
776
777
778 /**
779  * We've been asked to convert an address to a string without
780  * a reverse lookup.  Do it.
781  *
782  * @param cls struct GNUNET_RESOLVER_RequestHandle for the request
783  * @param tc unused scheduler context
784  */
785 static void
786 numeric_reverse (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
787 {
788   struct GNUNET_RESOLVER_RequestHandle *rh = cls;
789   char *result;
790
791   result = no_resolve ((const struct sockaddr *) &rh[1], rh->data_len);
792 #if DEBUG_RESOLVER
793   LOG (GNUNET_ERROR_TYPE_DEBUG, _("Resolver returns `%s'.\n"), result);
794 #endif
795   if (result != NULL)
796     {
797       rh->name_callback (rh->cls, result);
798       GNUNET_free (result);
799     }
800   rh->name_callback (rh->cls, NULL);
801   GNUNET_free (rh);
802 }
803
804
805 /**
806  * Get an IP address as a string.
807  *
808  * @param sa host address
809  * @param salen length of host address
810  * @param do_resolve use GNUNET_NO to return numeric hostname
811  * @param timeout how long to try resolving
812  * @param callback function to call with hostnames
813  *        last callback is NULL when finished
814  * @param cls closure for callback
815  * @return handle that can be used to cancel the request
816  */
817 struct GNUNET_RESOLVER_RequestHandle *
818 GNUNET_RESOLVER_hostname_get (const struct sockaddr *sa, socklen_t salen,
819                               int do_resolve,
820                               struct GNUNET_TIME_Relative timeout,
821                               GNUNET_RESOLVER_HostnameCallback callback,
822                               void *cls)
823 {
824   struct GNUNET_RESOLVER_RequestHandle *rh;
825
826   check_config ();
827   rh = GNUNET_malloc (sizeof (struct GNUNET_RESOLVER_RequestHandle) + salen);
828   rh->name_callback = callback;
829   rh->cls = cls;
830   rh->timeout = GNUNET_TIME_relative_to_absolute (timeout);
831   memcpy (&rh[1], sa, salen);
832   rh->data_len = salen;
833   rh->direction = GNUNET_YES;
834   rh->received_response = GNUNET_NO;
835   if (GNUNET_NO == do_resolve)
836     {
837       rh->task = GNUNET_SCHEDULER_add_now (&numeric_reverse, rh);
838       return rh;
839     }
840   if (salen + sizeof (struct GNUNET_RESOLVER_GetMessage) >=
841       GNUNET_SERVER_MAX_MESSAGE_SIZE)
842     {
843       GNUNET_break (0);
844       GNUNET_free (rh);
845       return NULL;
846     }
847   GNUNET_CONTAINER_DLL_insert_tail (req_head, req_tail, rh);
848   rh->was_queued = GNUNET_YES;
849   if (s_task != GNUNET_SCHEDULER_NO_TASK)
850     {
851       GNUNET_SCHEDULER_cancel (s_task);
852       s_task = GNUNET_SCHEDULER_NO_TASK;
853     }
854   process_requests ();
855   return rh;
856 }
857
858
859 /**
860  * Get local fully qualified domain name
861  *
862  * @return fqdn
863  */
864 char *
865 GNUNET_RESOLVER_local_fqdn_get ()
866 {
867   struct hostent *host;
868   char hostname[GNUNET_OS_get_hostname_max_length () + 1];
869
870   if (0 != gethostname (hostname, sizeof (hostname) - 1))
871     {
872       LOG_STRERROR (GNUNET_ERROR_TYPE_ERROR | GNUNET_ERROR_TYPE_BULK,
873                     "gethostname");
874       return NULL;
875     }
876 #if DEBUG_RESOLVER
877   LOG (GNUNET_ERROR_TYPE_DEBUG, _("Resolving our FQDN `%s'\n"), hostname);
878 #endif
879   host = gethostbyname (hostname);
880   if (NULL == host)
881     {
882       LOG (GNUNET_ERROR_TYPE_ERROR, _("Could not resolve our FQDN : %s\n"),
883            hstrerror (h_errno));
884       return NULL;
885     }
886   return GNUNET_strdup (host->h_name);
887 }
888
889
890 /**
891  * Looking our own hostname.
892  *
893  * @param domain AF_INET or AF_INET6; use AF_UNSPEC for "any"
894  * @param callback function to call with addresses
895  * @param cls closure for callback
896  * @param timeout how long to try resolving
897  * @return handle that can be used to cancel the request, NULL on error
898  */
899 struct GNUNET_RESOLVER_RequestHandle *
900 GNUNET_RESOLVER_hostname_resolve (int domain,
901                                   struct GNUNET_TIME_Relative timeout,
902                                   GNUNET_RESOLVER_AddressCallback callback,
903                                   void *cls)
904 {
905   char hostname[GNUNET_OS_get_hostname_max_length () + 1];
906
907   if (0 != gethostname (hostname, sizeof (hostname) - 1))
908     {
909       LOG_STRERROR (GNUNET_ERROR_TYPE_ERROR | GNUNET_ERROR_TYPE_BULK,
910                     "gethostname");
911       return NULL;
912     }
913 #if DEBUG_RESOLVER
914   LOG (GNUNET_ERROR_TYPE_DEBUG, _("Resolving our hostname `%s'\n"), hostname);
915 #endif
916   return GNUNET_RESOLVER_ip_get (hostname, domain, timeout, callback, cls);
917 }
918
919
920 /**
921  * Cancel a request that is still pending with the resolver.
922  * Note that a client MUST NOT cancel a request that has
923  * been completed (i.e, the callback has been called to
924  * signal timeout or the final result).
925  *
926  * @param rh handle of request to cancel
927  */
928 void
929 GNUNET_RESOLVER_request_cancel (struct GNUNET_RESOLVER_RequestHandle *rh)
930 {
931   if (rh->task != GNUNET_SCHEDULER_NO_TASK)
932     {
933       GNUNET_SCHEDULER_cancel (rh->task);
934       rh->task = GNUNET_SCHEDULER_NO_TASK;
935     }
936   if (rh->was_transmitted == GNUNET_NO)
937     {
938       if (rh->was_queued == GNUNET_YES)
939         GNUNET_CONTAINER_DLL_remove (req_head, req_tail, rh);
940       GNUNET_free (rh);
941       return;
942     }
943   GNUNET_assert (rh->was_transmitted == GNUNET_YES);
944   rh->was_transmitted = GNUNET_SYSERR;  /* mark as cancelled */
945 }
946
947
948 /* end of resolver_api.c */