src/linux/tun.c

   1 /*
   2  *  uAnytun
   3  *
   4  *  uAnytun is a tiny implementation of SATP. Unlike Anytun which is a full
   5  *  featured implementation uAnytun has no support for multiple connections
   6  *  or synchronisation. It is a small single threaded implementation intended
   7  *  to act as a client on small platforms.
   8  *  The secure anycast tunneling protocol (satp) defines a protocol used
   9  *  for communication between any combination of unicast and anycast
  10  *  tunnel endpoints.  It has less protocol overhead than IPSec in Tunnel
  11  *  mode and allows tunneling of every ETHER TYPE protocol (e.g.
  12  *  ethernet, ip, arp ...). satp directly includes cryptography and
  13  *  message authentication based on the methods used by SRTP.  It is
  14  *  intended to deliver a generic, scaleable and secure solution for
  15  *  tunneling and relaying of packets of any protocol.
  16  *
  17  *
  18  *  Copyright (C) 2007-2014 Christian Pointner <equinox@anytun.org>
  19  *
  20  *  This file is part of uAnytun.
  21  *
  22  *  uAnytun is free software: you can redistribute it and/or modify
  23  *  it under the terms of the GNU General Public License as published by
  24  *  the Free Software Foundation, either version 3 of the License, or
  25  *  any later version.
  26  *
  27  *  uAnytun is distributed in the hope that it will be useful,
  28  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  29  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  30  *  GNU General Public License for more details.
  31  *
  32  *  You should have received a copy of the GNU General Public License
  33  *  along with uAnytun. If not, see <http://www.gnu.org/licenses/>.
  34  *
  35  *  In addition, as a special exception, the copyright holders give
  36  *  permission to link the code of portions of this program with the
  37  *  OpenSSL library under certain conditions as described in each
  38  *  individual source file, and distribute linked combinations
  39  *  including the two.
  40  *  You must obey the GNU General Public License in all respects
  41  *  for all of the code used other than OpenSSL.  If you modify
  42  *  file(s) with this exception, you may extend this exception to your
  43  *  version of the file(s), but you are not obligated to do so.  If you
  44  *  do not wish to do so, delete this exception statement from your
  45  *  version.  If you delete this exception statement from all source
  46  *  files in the program, then also delete it here.
  47  */
  48
  49 #define _GNU_SOURCE
  50 #include <stdio.h>
  51
  52 #include "datatypes.h"
  53
  54 #include "tun.h"
  55
  56 #include "tun_helper.h"
  57
  58 #include <stdlib.h>
  59 #include <unistd.h>
  60 #include <sys/wait.h>
  61 #include <fcntl.h>
  62 #include <sys/ioctl.h>
  63 #include <sys/uio.h>
  64 #include <arpa/inet.h>
  65 #include <errno.h>
  66 #include <net/if.h>
  67 #include <linux/ip.h>
  68 #include <linux/if_ether.h>
  69 #include <linux/if_tun.h>
  70 #define DEFAULT_DEVICE "/dev/net/tun"
  71
  72 #include "log.h"
  73 #include "sysexec.h"
  74
  75 int tun_init(tun_device_t* dev, const char* dev_name, const char* dev_type, const char* ifcfg_addr, u_int16_t ifcfg_prefix){
  76   if(!dev)
  77     return -1;
  78
  79   tun_conf(dev, dev_name, dev_type, ifcfg_addr, ifcfg_prefix, 1400);
  80   dev->actual_name_ = NULL;
  81
  82   dev->fd_ = open(DEFAULT_DEVICE, O_RDWR);
  83   if(dev->fd_ < 0) {
  84     log_printf(ERROR, "can't open device file (%s): %s", DEFAULT_DEVICE, strerror(errno));
  85     tun_close(dev);
  86     return -1;
  87   }
  88
  89   struct ifreq ifr;
  90   memset(&ifr, 0, sizeof(ifr));
  91
  92   if(dev->type_ == TYPE_TUN) {
  93     ifr.ifr_flags = IFF_TUN;
  94     dev->with_pi_ = 1;
  95   }
  96   else if(dev->type_ == TYPE_TAP) {
  97     ifr.ifr_flags = IFF_TAP | IFF_NO_PI;
  98     dev->with_pi_ = 0;
  99   }
 100   else {
 101     log_printf(ERROR, "unable to recognize type of device (tun or tap)");
 102     tun_close(dev);
 103     return -1;
 104   }
 105
 106   if(dev_name)
 107     strncpy(ifr.ifr_name, dev_name, IFNAMSIZ-1);
 108
 109   if(!ioctl(dev->fd_, TUNSETIFF, &ifr)) {
 110     dev->actual_name_ = strdup(ifr.ifr_name);
 111   } else if(!ioctl(dev->fd_, (('T' << 8) | 202), &ifr)) {
 112     dev->actual_name_ = strdup(ifr.ifr_name);
 113   } else {
 114     log_printf(ERROR, "tun/tap device ioctl failed: %s", strerror(errno));
 115     tun_close(dev);
 116     return -1;
 117   }
 118
 119   if(!dev->actual_name_) {
 120     log_printf(ERROR, "can't open device file: memory error");
 121     tun_close(dev);
 122     return -2;
 123   }
 124
 125   if(ifcfg_addr)
 126     tun_do_ifconfig(dev);
 127
 128   return 0;
 129 }
 130
 131 int tun_init_post(tun_device_t* dev)
 132 {
 133 // nothing yet
 134   return 0;
 135 }
 136
 137 void tun_close(tun_device_t* dev)
 138 {
 139   if(!dev)
 140     return;
 141
 142   if(dev->fd_ > 0)
 143     close(dev->fd_);
 144
 145   if(dev->actual_name_)
 146     free(dev->actual_name_);
 147
 148   if(dev->net_addr_)
 149     free(dev->net_addr_);
 150
 151   if(dev->net_mask_)
 152     free(dev->net_mask_);
 153 }
 154
 155 int tun_read(tun_device_t* dev, u_int8_t* buf, u_int32_t len)
 156 {
 157   if(!dev || dev->fd_ < 0)
 158     return -1;
 159
 160   if(dev->with_pi_)
 161   {
 162     struct iovec iov[2];
 163     struct tun_pi tpi;
 164
 165     iov[0].iov_base = &tpi;
 166     iov[0].iov_len = sizeof(tpi);
 167     iov[1].iov_base = buf;
 168     iov[1].iov_len = len;
 169     return(tun_fix_return(readv(dev->fd_, iov, 2), sizeof(tpi)));
 170   }
 171   else
 172     return(read(dev->fd_, buf, len));
 173 }
 174
 175 int tun_write(tun_device_t* dev, u_int8_t* buf, u_int32_t len)
 176 {
 177   if(!dev || dev->fd_ < 0)
 178     return -1;
 179
 180   if(!buf)
 181     return 0;
 182
 183   if(dev->with_pi_)
 184   {
 185     struct iovec iov[2];
 186     struct tun_pi tpi;
 187     struct iphdr *hdr = (struct iphdr *)buf;
 188
 189     tpi.flags = 0;
 190     if(hdr->version == 4)
 191       tpi.proto = htons(ETH_P_IP);
 192     else
 193       tpi.proto = htons(ETH_P_IPV6);
 194
 195     iov[0].iov_base = &tpi;
 196     iov[0].iov_len = sizeof(tpi);
 197     iov[1].iov_base = buf;
 198     iov[1].iov_len = len;
 199     return(tun_fix_return(writev(dev->fd_, iov, 2), sizeof(tpi)));
 200   }
 201   else
 202     return(write(dev->fd_, buf, len));
 203 }
 204
 205 void tun_do_ifconfig(tun_device_t* dev)
 206 {
 207   if(!dev || !dev->actual_name_ || !dev->net_addr_ || !dev->net_mask_)
 208     return;
 209
 210   char* mtu_str = NULL;
 211   int len = asprintf(&mtu_str, "%d", dev->mtu_);
 212   if(len == -1) {
 213     log_printf(ERROR, "Execution of ifconfig failed");
 214     return;
 215   }
 216
 217   char* const argv[] = { "/sbin/ifconfig", dev->actual_name_, dev->net_addr_, "netmask", dev->net_mask_, "mtu", mtu_str, NULL };
 218   char* const evp[] = { NULL };
 219   uanytun_exec("/sbin/ifconfig", argv, evp);
 220
 221   free(mtu_str);
 222 }