5 Author: Pekka Riikonen <priikone@silcnet.org>
7 Copyright (C) 1997 - 2001 Pekka Riikonen
9 This program is free software; you can redistribute it and/or modify
10 it under the terms of the GNU General Public License as published by
11 the Free Software Foundation; either version 2 of the License, or
12 (at your option) any later version.
14 This program is distributed in the hope that it will be useful,
15 but WITHOUT ANY WARRANTY; without even the implied warranty of
16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 GNU General Public License for more details.
22 #include "silcincludes.h"
25 /* Accepts a connection from a particular socket */
27 int silc_net_accept_connection(int sock)
29 return accept(sock, 0, 0);
32 /* Sets a option for a socket. */
34 int silc_net_set_socket_opt(int sock, int level, int option, int on)
36 return setsockopt(sock, level, option, (void *)&on, sizeof(on));
39 /* Get socket options */
41 int silc_net_get_socket_opt(int sock, int level, int option,
42 void *optval, int *opt_len)
44 return getsockopt(sock, level, option, optval, opt_len);
47 /* Checks whether IP address sent as argument is valid IPv4 address. */
49 bool silc_net_is_ip4(const char *addr)
54 if (*addr != '.' && !isdigit(*addr))
67 /* Checks whether IP address sent as argument is valid IPv6 address. */
69 bool silc_net_is_ip6(const char *addr)
71 /* XXX does this work with all kinds of IPv6 addresses? */
73 if (*addr != ':' && !isxdigit(*addr))
81 /* Checks whether IP address sent as argument is valid IP address. */
83 bool silc_net_is_ip(const char *addr)
85 if (silc_net_is_ip4(addr))
87 return silc_net_is_ip6(addr);
90 /* Internal context for async resolving */
92 SilcNetResolveCallback completion;
95 SilcSchedule schedule;
98 } *SilcNetResolveContext;
100 SILC_TASK_CALLBACK(silc_net_resolve_completion)
102 SilcNetResolveContext r = (SilcNetResolveContext)context;
104 /* Call the completion callback */
106 (*r->completion)(r->result, r->context);
109 silc_free(r->result);
113 /* Thread function to resolve the address for hostname. */
115 static void *silc_net_gethostbyname_thread(void *context)
117 SilcNetResolveContext r = (SilcNetResolveContext)context;
118 SilcSchedule schedule = r->schedule;
121 if (silc_net_gethostbyname(r->input, r->prefer_ipv6, tmp, sizeof(tmp)))
122 r->result = strdup(tmp);
124 silc_schedule_task_add(schedule, 0, silc_net_resolve_completion, r, 0, 1,
125 SILC_TASK_TIMEOUT, SILC_TASK_PRI_NORMAL);
126 silc_schedule_wakeup(schedule);
130 /* Thread function to resolve the hostname for address. */
132 static void *silc_net_gethostbyaddr_thread(void *context)
134 SilcNetResolveContext r = (SilcNetResolveContext)context;
135 SilcSchedule schedule = r->schedule;
138 if (silc_net_gethostbyaddr(r->input, tmp, sizeof(tmp)))
139 r->result = strdup(tmp);
141 silc_schedule_task_add(schedule, 0, silc_net_resolve_completion, r, 0, 1,
142 SILC_TASK_TIMEOUT, SILC_TASK_PRI_NORMAL);
143 silc_schedule_wakeup(schedule);
147 /* Resolves IP address for hostname. */
149 bool silc_net_gethostbyname(const char *name, bool prefer_ipv6, char *address,
150 SilcUInt32 address_len)
153 struct addrinfo hints, *ai, *tmp, *ip4 = NULL, *ip6 = NULL;
155 memset(&hints, 0, sizeof(hints));
156 hints.ai_socktype = SOCK_STREAM;
157 if (getaddrinfo(name, NULL, &hints, &ai))
160 for (tmp = ai; tmp; tmp = tmp->ai_next) {
161 if (tmp->ai_family == AF_INET6) {
167 if (tmp->ai_family == AF_INET) {
175 tmp = (prefer_ipv6 ? (ip6 ? ip6 : ip4) : (ip4 ? ip4 : ip6));
181 if (getnameinfo(tmp->ai_addr, tmp->ai_addrlen, address,
182 address_len, NULL, 0, NI_NUMERICHOST)) {
193 hp = gethostbyname(name);
197 memcpy(&ip.s_addr, hp->h_addr_list[0], 4);
201 if (address_len < strlen(tmp))
203 memset(address, 0, address_len);
204 strncpy(address, tmp, strlen(tmp));
210 /* Resolves IP address for hostname async. */
212 void silc_net_gethostbyname_async(const char *name,
214 SilcSchedule schedule,
215 SilcNetResolveCallback completion,
218 SilcNetResolveContext r = silc_calloc(1, sizeof(*r));
220 r->completion = completion;
221 r->context = context;
222 r->prefer_ipv6 = prefer_ipv6;
223 r->schedule = schedule;
224 r->input = strdup(name);
226 silc_thread_create(silc_net_gethostbyname_thread, r, FALSE);
229 /* Resolves hostname by IP address. */
231 bool silc_net_gethostbyaddr(const char *addr, char *name, SilcUInt32 name_len)
234 struct addrinfo req, *ai;
236 memset(&req, 0, sizeof(req));
237 req.ai_socktype = SOCK_STREAM;
238 req.ai_flags = AI_CANONNAME;
240 if (getaddrinfo(addr, NULL, &req, &ai))
242 if (getnameinfo(ai->ai_addr, ai->ai_addrlen, name, name_len, NULL, 0, 0)) {
251 if (!silc_net_addr2bin(addr, a, sizeof(a)))
254 hp = gethostbyaddr(a, 4, AF_INET);
257 if (name_len < strlen(hp->h_name))
259 memset(name, 0, name_len);
260 strncpy(name, hp->h_name, strlen(hp->h_name));
266 /* Resolves hostname by IP address async. */
268 void silc_net_gethostbyaddr_async(const char *addr,
269 SilcSchedule schedule,
270 SilcNetResolveCallback completion,
273 SilcNetResolveContext r = silc_calloc(1, sizeof(*r));
275 r->completion = completion;
276 r->context = context;
277 r->schedule = schedule;
278 r->input = strdup(addr);
280 silc_thread_create(silc_net_gethostbyaddr_thread, r, FALSE);
283 /* Performs lookups for remote name and IP address. This peforms reverse
284 lookup as well to verify that the IP has FQDN. */
286 bool silc_net_check_host_by_sock(int sock, char **hostname, char **ip)
292 struct sockaddr_storage remote;
299 SILC_LOG_DEBUG(("Resolving remote hostname and IP address"));
301 memset(&remote, 0, sizeof(remote));
302 memset(&s, 0, sizeof(s));
303 len = sizeof(remote);
304 rval = getpeername(sock, (struct sockaddr *)&remote, &len);
308 if (getnameinfo((struct sockaddr *)&remote, len, s, sizeof(s), NULL, 0,
312 *ip = silc_memdup(s, strlen(s));
316 struct sockaddr_in remote;
323 SILC_LOG_DEBUG(("Resolving remote hostname and IP address"));
325 memset(&remote, 0, sizeof(remote));
326 len = sizeof(remote);
327 rval = getpeername(sock, (struct sockaddr *)&remote, &len);
331 host_ip = inet_ntoa(remote.sin_addr);
335 *ip = silc_memdup(host_ip, strlen(host_ip));
340 /* Do reverse lookup if we want hostname too. */
342 /* Get host by address */
343 if (!silc_net_gethostbyaddr(*ip, host, sizeof(host)))
346 *hostname = silc_memdup(host, strlen(host));
347 SILC_LOG_DEBUG(("Resolved hostname `%s'", *hostname));
350 if (!silc_net_gethostbyname(*hostname, TRUE, host, sizeof(host)))
353 if (strcmp(*ip, host))
357 SILC_LOG_DEBUG(("Resolved IP address `%s'", *ip));
361 /* Performs lookups for local name and IP address. This peforms reverse
362 lookup as well to verify that the IP has FQDN. */
364 bool silc_net_check_local_by_sock(int sock, char **hostname, char **ip)
370 struct sockaddr_storage local;
377 SILC_LOG_DEBUG(("Resolving local hostname and IP address"));
379 memset(&local, 0, sizeof(local));
380 memset(&s, 0, sizeof(s));
382 rval = getsockname(sock, (struct sockaddr *)&local, &len);
386 if (getnameinfo((struct sockaddr *)&local, len, s, sizeof(s), NULL, 0,
390 *ip = silc_memdup(s, strlen(s));
394 struct sockaddr_in local;
401 SILC_LOG_DEBUG(("Resolving local hostname and IP address"));
403 memset(&local, 0, sizeof(local));
405 rval = getsockname(sock, (struct sockaddr *)&local, &len);
409 host_ip = inet_ntoa(local.sin_addr);
413 *ip = silc_memdup(host_ip, strlen(host_ip));
418 /* Do reverse lookup if we want hostname too. */
420 /* Get host by address */
421 if (!silc_net_gethostbyaddr(*ip, host, sizeof(host)))
424 *hostname = silc_memdup(host, strlen(host));
425 SILC_LOG_DEBUG(("Resolved hostname `%s'", *hostname));
428 if (!silc_net_gethostbyname(*hostname, TRUE, host, sizeof(host)))
431 if (strcmp(*ip, host))
435 SILC_LOG_DEBUG(("Resolved IP address `%s'", *ip));
439 /* Return remote port by socket. */
441 SilcUInt16 silc_net_get_remote_port(int sock)
444 struct sockaddr_storage remote;
448 memset(&remote, 0, sizeof(remote));
449 len = sizeof(remote);
450 if (getpeername(sock, (struct sockaddr *)&remote, &len) < 0)
453 if (getnameinfo((struct sockaddr *)&remote, len, NULL, 0, s, sizeof(s),
459 struct sockaddr_in remote;
462 memset(&remote, 0, sizeof(remote));
463 len = sizeof(remote);
464 if (getpeername(sock, (struct sockaddr *)&remote, &len) < 0)
467 return ntohs(remote.sin_port);
471 /* Return local port by socket. */
473 SilcUInt16 silc_net_get_local_port(int sock)
476 struct sockaddr_storage local;
480 memset(&local, 0, sizeof(local));
482 if (getsockname(sock, (struct sockaddr *)&local, &len) < 0)
485 if (getnameinfo((struct sockaddr *)&local, len, NULL, 0, s, sizeof(s),
491 struct sockaddr_in local;
494 memset(&local, 0, sizeof(local));
496 if (getsockname(sock, (struct sockaddr *)&local, &len) < 0)
499 return ntohs(local.sin_port);
503 /* Return name of localhost. */
505 char *silc_net_localhost(void)
507 char hostname[256], ip_addr[64];
509 if (gethostname(hostname, sizeof(hostname)))
512 if (!silc_net_gethostbyname(hostname, TRUE, ip_addr, sizeof(ip_addr)))
513 return strdup(hostname);
515 silc_net_gethostbyaddr(ip_addr, hostname, sizeof(hostname));
516 return strdup(hostname);
519 /* Returns local IP address */
521 char *silc_net_localip(void)
523 char hostname[256], ip_addr[64];
525 if (gethostname(hostname, sizeof(hostname)))
528 if (!silc_net_gethostbyname(hostname, TRUE, ip_addr, sizeof(ip_addr)))
531 return strdup(ip_addr);