Merge tag 'upstream/0.3.6'
[debian/uanytun.git] / 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 <arpa/inet.h>
64 #include <errno.h>
65 #include <net/if.h>
66 #include <linux/ip.h>
67 #include <linux/if_ether.h>
68 #include <linux/if_tun.h>
69 #define DEFAULT_DEVICE "/dev/net/tun"
70
71 #include "log.h"
72 #include "sysexec.h"
73
74 int tun_init(tun_device_t* dev, const char* dev_name, const char* dev_type, const char* ifcfg_addr, u_int16_t ifcfg_prefix){
75   if(!dev)
76     return -1;
77
78   tun_conf(dev, dev_name, dev_type, ifcfg_addr, ifcfg_prefix, 1400);
79   dev->actual_name_ = NULL;
80
81   dev->fd_ = open(DEFAULT_DEVICE, O_RDWR);
82   if(dev->fd_ < 0) {
83     log_printf(ERROR, "can't open device file (%s): %s", DEFAULT_DEVICE, strerror(errno));
84     tun_close(dev);
85     return -1;
86   }
87
88   struct ifreq ifr;
89   memset(&ifr, 0, sizeof(ifr));
90
91   if(dev->type_ == TYPE_TUN) {
92     ifr.ifr_flags = IFF_TUN;
93     dev->with_pi_ = 1;
94   }
95   else if(dev->type_ == TYPE_TAP) {
96     ifr.ifr_flags = IFF_TAP | IFF_NO_PI;
97     dev->with_pi_ = 0;
98   }
99   else {
100     log_printf(ERROR, "unable to recognize type of device (tun or tap)");
101     tun_close(dev);
102     return -1;
103   }
104
105   if(dev_name)
106     strncpy(ifr.ifr_name, dev_name, IFNAMSIZ);
107
108   if(!ioctl(dev->fd_, TUNSETIFF, &ifr)) {
109     dev->actual_name_ = strdup(ifr.ifr_name);
110   } else if(!ioctl(dev->fd_, (('T' << 8) | 202), &ifr)) {
111     dev->actual_name_ = strdup(ifr.ifr_name);
112   } else {
113     log_printf(ERROR, "tun/tap device ioctl failed: %s", strerror(errno));
114     tun_close(dev);
115     return -1;
116   }
117
118   if(!dev->actual_name_) {
119     log_printf(ERROR, "can't open device file: memory error");
120     tun_close(dev);
121     return -2;
122   }
123
124   if(ifcfg_addr)
125     tun_do_ifconfig(dev);
126
127   return 0;
128 }
129
130 int tun_init_post(tun_device_t* dev)
131 {
132 // nothing yet
133   return 0;
134 }
135
136 void tun_close(tun_device_t* dev)
137 {
138   if(!dev)
139     return;
140
141   if(dev->fd_ > 0)
142     close(dev->fd_);
143
144   if(dev->actual_name_)
145     free(dev->actual_name_);
146
147   if(dev->net_addr_)
148     free(dev->net_addr_);
149
150   if(dev->net_mask_)
151     free(dev->net_mask_);
152 }
153
154 int tun_read(tun_device_t* dev, u_int8_t* buf, u_int32_t len)
155 {
156   if(!dev || dev->fd_ < 0)
157     return -1;
158
159   if(dev->with_pi_)
160   {
161     struct iovec iov[2];
162     struct tun_pi tpi;
163
164     iov[0].iov_base = &tpi;
165     iov[0].iov_len = sizeof(tpi);
166     iov[1].iov_base = buf;
167     iov[1].iov_len = len;
168     return(tun_fix_return(readv(dev->fd_, iov, 2), sizeof(tpi)));
169   }
170   else
171     return(read(dev->fd_, buf, len));
172 }
173
174 int tun_write(tun_device_t* dev, u_int8_t* buf, u_int32_t len)
175 {
176   if(!dev || dev->fd_ < 0)
177     return -1;
178
179   if(!buf)
180     return 0;
181
182   if(dev->with_pi_)
183   {
184     struct iovec iov[2];
185     struct tun_pi tpi;
186     struct iphdr *hdr = (struct iphdr *)buf;
187
188     tpi.flags = 0;
189     if(hdr->version == 4)
190       tpi.proto = htons(ETH_P_IP);
191     else
192       tpi.proto = htons(ETH_P_IPV6);
193
194     iov[0].iov_base = &tpi;
195     iov[0].iov_len = sizeof(tpi);
196     iov[1].iov_base = buf;
197     iov[1].iov_len = len;
198     return(tun_fix_return(writev(dev->fd_, iov, 2), sizeof(tpi)));
199   }
200   else
201     return(write(dev->fd_, buf, len));
202 }
203
204 void tun_do_ifconfig(tun_device_t* dev)
205 {
206   if(!dev || !dev->actual_name_ || !dev->net_addr_ || !dev->net_mask_)
207     return;
208
209   char* mtu_str = NULL;
210   int len = asprintf(&mtu_str, "%d", dev->mtu_);
211   if(len == -1) {
212     log_printf(ERROR, "Execution of ifconfig failed");
213     return;
214   }
215
216   char* const argv[] = { "/sbin/ifconfig", dev->actual_name_, dev->net_addr_, "netmask", dev->net_mask_, "mtu", mtu_str, NULL };
217   char* const evp[] = { NULL };
218   uanytun_exec("/sbin/ifconfig", argv, evp);
219
220   free(mtu_str);
221 }