www.tinc-vpn.org Git - tinc/blob - lib/netutl.c

   1 /*
   2     netutl.c -- some supporting network utility code
   3     Copyright (C) 1998-2002 Ivo Timmermans <itimmermans@bigfoot.com>
   4                   2000-2002 Guus Sliepen <guus@sliepen.warande.net>
   5
   6     This program is free software; you can redistribute it and/or modify
   7     it under the terms of the GNU General Public License as published by
   8     the Free Software Foundation; either version 2 of the License, or
   9     (at your option) any later version.
  10
  11     This program is distributed in the hope that it will be useful,
  12     but WITHOUT ANY WARRANTY; without even the implied warranty of
  13     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14     GNU General Public License for more details.
  15
  16     You should have received a copy of the GNU General Public License
  17     along with this program; if not, write to the Free Software
  18     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  19
  20     $Id: netutl.c,v 1.1 2002/04/28 12:46:25 zarq Exp $
  21 */
  22
  23 #include "config.h"
  24
  25 #include <fcntl.h>
  26 #include <netdb.h>
  27 #include <netinet/in.h>
  28 #include <stdio.h>
  29 #include <stdlib.h>
  30 #include <string.h>
  31 #include <signal.h>
  32 #include <sys/socket.h>
  33
  34 #include <arpa/inet.h>
  35
  36 #include <utils.h>
  37 #include <xalloc.h>
  38
  39 #include "errno.h"
  40 #include "conf.h"
  41 #include "net.h"
  42 #include "netutl.h"
  43 #include "logging.h"
  44
  45 #include "system.h"
  46
  47 int hostnames = 0;
  48
  49 /*
  50   Turn a string into a struct addrinfo.
  51   Return NULL on failure.
  52 */
  53 struct addrinfo *str2addrinfo(char *address, char *service, int socktype)
  54 {
  55   struct addrinfo hint, *ai;
  56   int err;
  57 cp
  58   memset(&hint, 0, sizeof(hint));
  59
  60   hint.ai_family = addressfamily;
  61   hint.ai_socktype = socktype;
  62
  63   if((err = getaddrinfo(address, service, &hint, &ai)))
  64     {
  65       if(debug_lvl >= DEBUG_ERROR)
  66         syslog(LOG_WARNING, _("Error looking up %s port %s: %s\n"), address, service, gai_strerror(err));
  67       cp_trace();
  68       return NULL;
  69     }
  70
  71 cp
  72   return ai;
  73 }
  74
  75 sockaddr_t str2sockaddr(char *address, char *port)
  76 {
  77   struct addrinfo hint, *ai;
  78   sockaddr_t result;
  79   int err;
  80 cp
  81   memset(&hint, 0, sizeof(hint));
  82
  83   hint.ai_family = AF_UNSPEC;
  84   hint.ai_flags = AI_NUMERICHOST;
  85   hint.ai_socktype = SOCK_STREAM;
  86
  87   if((err = getaddrinfo(address, port, &hint, &ai) || !ai))
  88     {
  89       syslog(LOG_ERR, _("Error looking up %s port %s: %s\n"), address, port, gai_strerror(err));
  90       cp_trace();
  91       raise(SIGFPE);
  92       exit(0);
  93     }
  94
  95   result = *(sockaddr_t *)ai->ai_addr;
  96   freeaddrinfo(ai);
  97 cp
  98   return result;
  99 }
 100
 101 void sockaddr2str(sockaddr_t *sa, char **addrstr, char **portstr)
 102 {
 103   char address[NI_MAXHOST];
 104   char port[NI_MAXSERV];
 105   char *scopeid;
 106   int err;
 107 cp
 108   if((err = getnameinfo(&sa->sa, SALEN(sa->sa), address, sizeof(address), port, sizeof(port), NI_NUMERICHOST|NI_NUMERICSERV)))
 109     {
 110       syslog(LOG_ERR, _("Error while translating addresses: %s"), gai_strerror(err));
 111       cp_trace();
 112       raise(SIGFPE);
 113       exit(0);
 114     }
 115
 116 #ifdef HAVE_LINUX
 117   if((scopeid = strchr(address, '%')))
 118     *scopeid = '\0';  /* Descope. */
 119 #endif
 120
 121   *addrstr = xstrdup(address);
 122   *portstr = xstrdup(port);
 123 cp
 124 }
 125
 126 char *sockaddr2hostname(sockaddr_t *sa)
 127 {
 128   char *str;
 129   char address[NI_MAXHOST] = "unknown";
 130   char port[NI_MAXSERV] = "unknown";
 131   int err;
 132 cp
 133   if((err = getnameinfo(&sa->sa, SALEN(sa->sa), address, sizeof(address), port, sizeof(port), hostnames?0:(NI_NUMERICHOST|NI_NUMERICSERV))))
 134     {
 135       syslog(LOG_ERR, _("Error while looking up hostname: %s"), gai_strerror(err));
 136     }
 137
 138   asprintf(&str, _("%s port %s"), address, port);
 139 cp
 140   return str;
 141 }
 142
 143 int sockaddrcmp(sockaddr_t *a, sockaddr_t *b)
 144 {
 145   int result;
 146 cp
 147   result = a->sa.sa_family - b->sa.sa_family;
 148
 149   if(result)
 150     return result;
 151
 152   switch(a->sa.sa_family)
 153     {
 154       case AF_UNSPEC:
 155         return 0;
 156       case AF_INET:
 157         result = memcmp(&a->in.sin_addr, &b->in.sin_addr, sizeof(a->in.sin_addr));
 158         if(result)
 159           return result;
 160         return memcmp(&a->in.sin_port, &b->in.sin_port, sizeof(a->in.sin_port));
 161       case AF_INET6:
 162         result = memcmp(&a->in6.sin6_addr, &b->in6.sin6_addr, sizeof(a->in6.sin6_addr));
 163         if(result)
 164           return result;
 165         return memcmp(&a->in6.sin6_port, &b->in6.sin6_port, sizeof(a->in6.sin6_port));
 166       default:
 167         syslog(LOG_ERR, _("sockaddrcmp() was called with unknown address family %d, exitting!"), a->sa.sa_family);
 168         cp_trace();
 169         raise(SIGFPE);
 170         exit(0);
 171     }
 172 cp
 173 }
 174
 175 void sockaddrunmap(sockaddr_t *sa)
 176 {
 177   if(sa->sa.sa_family == AF_INET6 && IN6_IS_ADDR_V4MAPPED(&sa->in6.sin6_addr))
 178     {
 179       sa->in.sin_addr.s_addr = ((uint32_t *)&sa->in6.sin6_addr)[3];
 180       sa->in.sin_family = AF_INET;
 181     }
 182 }
 183
 184 /* Subnet mask handling */
 185
 186 int maskcmp(char *a, char *b, int masklen, int len)
 187 {
 188   int i, m, result;
 189 cp
 190   for(m = masklen, i = 0; m >= 8; m -= 8, i++)
 191     if((result = a[i] - b[i]))
 192       return result;
 193
 194   if(m)
 195     return (a[i] & (0x100 - (1 << (8 - m)))) - (b[i] & (0x100 - (1 << (8 - m))));
 196
 197   return 0;
 198 }
 199
 200 void mask(char *a, int masklen, int len)
 201 {
 202   int i;
 203 cp
 204   i = masklen / 8;
 205   masklen %= 8;
 206
 207   if(masklen)
 208     a[i++] &= (0x100 - (1 << masklen));
 209
 210   for(; i < len; i++)
 211     a[i] = 0;
 212 }
 213
 214 void maskcpy(char *a, char *b, int masklen, int len)
 215 {
 216   int i, m;
 217 cp
 218   for(m = masklen, i = 0; m >= 8; m -= 8, i++)
 219     a[i] = b[i];
 220
 221   if(m)
 222     {
 223       a[i] = b[i] & (0x100 - (1 << m));
 224       i++;
 225     }
 226
 227   for(; i < len; i++)
 228     a[i] = 0;
 229 }
 230
 231 int maskcheck(char *a, int masklen, int len)
 232 {
 233   int i;
 234 cp
 235   i = masklen / 8;
 236   masklen %= 8;
 237
 238   if(masklen)
 239     if(a[i++] & (char)~(0x100 - (1 << masklen)))
 240       return -1;
 241
 242   for(; i < len; i++)
 243     if(a[i] != 0)
 244       return -1;
 245
 246   return 0;
 247 }