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)) {
250 hp = gethostbyaddr(addr, strlen(addr), AF_INET);
253 if (name_len < strlen(hp->h_name))
255 memset(name, 0, name_len);
256 strncpy(name, hp->h_name, strlen(hp->h_name));
262 /* Resolves hostname by IP address async. */
264 void silc_net_gethostbyaddr_async(const char *addr,
265 SilcSchedule schedule,
266 SilcNetResolveCallback completion,
269 SilcNetResolveContext r = silc_calloc(1, sizeof(*r));
271 r->completion = completion;
272 r->context = context;
273 r->schedule = schedule;
274 r->input = strdup(addr);
276 silc_thread_create(silc_net_gethostbyaddr_thread, r, FALSE);
279 /* Performs lookups for remote name and IP address. This peforms reverse
280 lookup as well to verify that the IP has FQDN. */
282 bool silc_net_check_host_by_sock(int sock, char **hostname, char **ip)
284 struct sockaddr_in remote;
285 struct hostent *dest;
286 char *host_ip = NULL;
287 char host_name[1024];
294 SILC_LOG_DEBUG(("Resolving remote hostname and IP address"));
296 memset(&remote, 0, sizeof(remote));
297 len = sizeof(remote);
298 rval = getpeername(sock, (struct sockaddr *)&remote, &len);
302 host_ip = inet_ntoa(remote.sin_addr);
306 *ip = silc_calloc(strlen(host_ip) + 1, sizeof(char));
307 memcpy(*ip, host_ip, strlen(host_ip));
309 /* Get host by address */
310 dest = gethostbyaddr((char *)&remote.sin_addr,
311 sizeof(struct in_addr), AF_INET);
315 /* Get same host by name to see that the remote host really is
316 the who it says it is */
317 memset(host_name, 0, sizeof(host_name));
318 memcpy(host_name, dest->h_name, strlen(dest->h_name));
320 *hostname = silc_calloc(strlen(host_name) + 1, sizeof(char));
321 memcpy(*hostname, host_name, strlen(host_name));
322 SILC_LOG_DEBUG(("Resolved hostname `%s'", *hostname));
324 dest = gethostbyname(host_name);
328 /* Find the address from list */
329 for (i = 0; dest->h_addr_list[i]; i++)
330 if (!memcmp(dest->h_addr_list[i], &remote.sin_addr,
331 sizeof(struct in_addr)))
333 if (!dest->h_addr_list[i])
337 *ip = silc_calloc(strlen(host_ip) + 1, sizeof(char));
338 memcpy(*ip, host_ip, strlen(host_ip));
339 SILC_LOG_DEBUG(("Resolved IP address `%s'", *ip));
344 /* Performs lookups for local name and IP address. This peforms reverse
345 lookup as well to verify that the IP has FQDN. */
347 bool silc_net_check_local_by_sock(int sock, char **hostname, char **ip)
349 struct sockaddr_in local;
350 struct hostent *dest;
351 char *host_ip = NULL;
352 char host_name[1024];
359 SILC_LOG_DEBUG(("Resolving local hostname and IP address"));
361 memset(&local, 0, sizeof(local));
363 rval = getsockname(sock, (struct sockaddr *)&local, &len);
367 host_ip = inet_ntoa(local.sin_addr);
371 *ip = silc_calloc(strlen(host_ip) + 1, sizeof(char));
372 memcpy(*ip, host_ip, strlen(host_ip));
374 /* Get host by address */
375 dest = gethostbyaddr((char *)&local.sin_addr,
376 sizeof(struct in_addr), AF_INET);
380 /* Get same host by name to see that the local host really is
381 the who it says it is */
382 memset(host_name, 0, sizeof(host_name));
383 memcpy(host_name, dest->h_name, strlen(dest->h_name));
385 *hostname = silc_calloc(strlen(host_name) + 1, sizeof(char));
386 memcpy(*hostname, host_name, strlen(host_name));
387 SILC_LOG_DEBUG(("Resolved hostname `%s'", *hostname));
389 dest = gethostbyname(host_name);
393 /* Find the address from list */
394 for (i = 0; dest->h_addr_list[i]; i++)
395 if (!memcmp(dest->h_addr_list[i], &local.sin_addr,
396 sizeof(struct in_addr)))
398 if (!dest->h_addr_list[i])
402 *ip = silc_calloc(strlen(host_ip) + 1, sizeof(char));
403 memcpy(*ip, host_ip, strlen(host_ip));
404 SILC_LOG_DEBUG(("Resolved IP address `%s'", *ip));
409 /* Return remote port by socket. */
411 SilcUInt16 silc_net_get_remote_port(int sock)
414 struct sockaddr_storage remote;
418 memset(&remote, 0, sizeof(remote));
419 len = sizeof(remote);
420 if (getpeername(sock, (struct sockaddr *)&remote, &len) < 0)
423 if (getnameinfo((struct sockaddr *)&remote, len, NULL, 0, s, sizeof(s),
429 struct sockaddr_in remote;
432 memset(&remote, 0, sizeof(remote));
433 len = sizeof(remote);
434 if (getpeername(sock, (struct sockaddr *)&remote, &len) < 0)
437 return ntohs(remote.sin_port);
441 /* Return local port by socket. */
443 SilcUInt16 silc_net_get_local_port(int sock)
446 struct sockaddr_storage local;
450 memset(&local, 0, sizeof(local));
452 if (getsockname(sock, (struct sockaddr *)&local, &len) < 0)
455 if (getnameinfo((struct sockaddr *)&local, len, NULL, 0, s, sizeof(s),
461 struct sockaddr_in local;
464 memset(&local, 0, sizeof(local));
466 if (getsockname(sock, (struct sockaddr *)&local, &len) < 0)
469 return ntohs(local.sin_port);
473 /* Return name of localhost. */
475 char *silc_net_localhost(void)
477 char hostname[256], ip_addr[64];
479 if (gethostname(hostname, sizeof(hostname)))
482 if (!silc_net_gethostbyname(hostname, TRUE, ip_addr, sizeof(ip_addr)))
483 return strdup(hostname);
485 silc_net_gethostbyaddr(ip_addr, hostname, sizeof(hostname));
486 return strdup(hostname);
489 /* Returns local IP address */
491 char *silc_net_localip(void)
493 char hostname[256], ip_addr[64];
495 if (gethostname(hostname, sizeof(hostname)))
498 if (!silc_net_gethostbyname(hostname, TRUE, ip_addr, sizeof(ip_addr)))
501 return strdup(ip_addr);