2 device.c -- Interaction with Solaris tun device
3 Copyright (C) 2001-2005 Ivo Timmermans,
4 2002-2010 OpenVPN Technologies, Inc. <sales@openvpn.net>
5 2001-2022 Guus Sliepen <guus@tinc-vpn.org>
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2 of the License, or
10 (at your option) any later version.
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License along
18 with this program; if not, write to the Free Software Foundation, Inc.,
19 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
23 #include "../system.h"
25 #include <sys/stropts.h>
26 #include <sys/sockio.h>
30 #include "../device.h"
31 #include "../logger.h"
36 #include "../xalloc.h"
39 #warning Missing net/if_tun.h, using hardcoded value for TUNNEWPPA
40 #define TUNNEWPPA (('T'<<16) | 0x0001)
43 #define DEFAULT_TUN_DEVICE "/dev/tun"
44 #define DEFAULT_TAP_DEVICE "/dev/tap"
45 #define IP_DEVICE "/dev/udp"
50 } device_type = DEVICE_TYPE_TUN;
53 static int ip_fd = -1;
56 static const char *device_info = NULL;
58 static bool setup_device(void) {
61 if(!get_config_string(lookup_config(&config_tree, "Device"), &device)) {
62 if(routing_mode == RMODE_ROUTER) {
63 device = xstrdup(DEFAULT_TUN_DEVICE);
65 device = xstrdup(DEFAULT_TAP_DEVICE);
69 if(get_config_string(lookup_config(&config_tree, "DeviceType"), &type)) {
70 if(!strcasecmp(type, "tun"))
72 else if(!strcasecmp(type, "tap")) {
73 device_type = DEVICE_TYPE_TAP;
75 logger(DEBUG_ALWAYS, LOG_ERR, "Unknown device type %s!", type);
79 if(strstr(device, "tap") || routing_mode != RMODE_ROUTER) {
80 device_type = DEVICE_TYPE_TAP;
84 if(device_type == DEVICE_TYPE_TUN) {
85 device_info = "Solaris tun device";
87 device_info = "Solaris tap device";
90 /* The following is black magic copied from OpenVPN. */
92 if((ip_fd = open(IP_DEVICE, O_RDWR, 0)) < 0) {
93 logger(DEBUG_ALWAYS, LOG_ERR, "Could not open %s: %s\n", IP_DEVICE, strerror(errno));
97 if((device_fd = open(device, O_RDWR, 0)) < 0) {
98 logger(DEBUG_ALWAYS, LOG_ERR, "Could not open %s: %s\n", device, strerror(errno));
102 /* Get unit number. */
105 get_config_string(lookup_config(&config_tree, "Interface"), &ptr);
107 while(*ptr && !isdigit((uint8_t) *ptr)) {
113 /* Assign a new PPA and get its unit number. */
115 struct strioctl strioc_ppa = {
117 .ic_len = sizeof(ppa),
118 .ic_dp = (char *) &ppa,
121 if(!*ptr) { /* no number given, try dynamic */
124 while(!found && ppa < 64) {
125 int new_ppa = ioctl(device_fd, I_STR, &strioc_ppa);
137 logger(DEBUG_ALWAYS, LOG_ERR, "Could not find free PPA for %s %s!", device_info, device);
140 } else { /* try this particular one */
141 if((ppa = ioctl(device_fd, I_STR, &strioc_ppa)) < 0) {
142 logger(DEBUG_ALWAYS, LOG_ERR, "Could not assign PPA %d for %s %s!", ppa, device_info, device);
149 if((if_fd = open(device, O_RDWR, 0)) < 0) {
150 logger(DEBUG_ALWAYS, LOG_ERR, "Could not open %s: %s\n", device, strerror(errno));
154 if(ioctl(if_fd, I_PUSH, "ip") < 0) {
155 logger(DEBUG_ALWAYS, LOG_ERR, "Could not push IP module onto %s %s!", device_info, device);
159 xasprintf(&iface, "%s%d", device_type == DEVICE_TYPE_TUN ? "tun" : "tap", ppa);
162 /* Remove muxes just in case they are left over from a crashed tincd */
164 memset(&ifr, 0, sizeof(ifr));
165 strncpy(ifr.lifr_name, iface, sizeof(ifr.lifr_name));
167 if(ioctl(ip_fd, SIOCGLIFMUXID, &ifr) >= 0) {
168 int muxid = ifr.lifr_arp_muxid;
169 ioctl(ip_fd, I_PUNLINK, muxid);
170 muxid = ifr.lifr_ip_muxid;
171 ioctl(ip_fd, I_PUNLINK, muxid);
175 if(device_type == DEVICE_TYPE_TUN) {
176 /* Assign ppa according to the unit number returned by tun device */
177 if(ioctl(if_fd, IF_UNITSEL, (char *)&ppa) < 0) {
178 logger(DEBUG_ALWAYS, LOG_ERR, "Could not set PPA %d on %s %s!", ppa, device_info, device);
185 if(device_type == DEVICE_TYPE_TAP) {
187 memset(&ifr, 0, sizeof(ifr));
189 if(ioctl(if_fd, SIOCGLIFFLAGS, &ifr) < 0) {
190 logger(DEBUG_ALWAYS, LOG_ERR, "Could not set flags on %s %s!", device_info, device);
194 strncpy(ifr.lifr_name, iface, sizeof(ifr.lifr_name));
197 /* Assign ppa according to the unit number returned by tun device */
198 if(ioctl(if_fd, SIOCSLIFNAME, &ifr) < 0) {
199 logger(DEBUG_ALWAYS, LOG_ERR, "Could not set PPA %d on %s %s!", ppa, device_info, device);
203 if(ioctl(if_fd, SIOCGLIFFLAGS, &ifr) < 0) {
204 logger(DEBUG_ALWAYS, LOG_ERR, "Could not set flags on %s %s!", device_info, device);
208 /* Push arp module to if_fd */
209 if(ioctl(if_fd, I_PUSH, "arp") < 0) {
210 logger(DEBUG_ALWAYS, LOG_ERR, "Could not push ARP module onto %s %s!", device_info, device);
214 /* Pop any modules on the stream */
216 if(ioctl(ip_fd, I_POP, NULL) < 0) {
221 /* Push arp module to ip_fd */
222 if(ioctl(ip_fd, I_PUSH, "arp") < 0) {
223 logger(DEBUG_ALWAYS, LOG_ERR, "Could not push ARP module onto %s!", IP_DEVICE);
228 if((arp_fd = open(device, O_RDWR, 0)) < 0) {
229 logger(DEBUG_ALWAYS, LOG_ERR, "Could not open %s: %s\n", device, strerror(errno));
233 /* Push arp module to arp_fd */
234 if(ioctl(arp_fd, I_PUSH, "arp") < 0) {
235 logger(DEBUG_ALWAYS, LOG_ERR, "Could not push ARP module onto %s %s!", device_info, device);
239 /* Set ifname to arp */
240 struct strioctl strioc_if = {
241 .ic_cmd = SIOCSLIFNAME,
242 .ic_len = sizeof(ifr),
243 .ic_dp = (char *) &ifr,
246 if(ioctl(arp_fd, I_STR, &strioc_if) < 0) {
247 logger(DEBUG_ALWAYS, LOG_ERR, "Could not set ifname to %s %s", device_info, device);
252 int ip_muxid, arp_muxid;
254 if((ip_muxid = ioctl(ip_fd, I_PLINK, if_fd)) < 0) {
255 logger(DEBUG_ALWAYS, LOG_ERR, "Could not link %s %s to IP", device_info, device);
259 if(device_type == DEVICE_TYPE_TAP) {
260 if((arp_muxid = ioctl(ip_fd, I_PLINK, arp_fd)) < 0) {
261 logger(DEBUG_ALWAYS, LOG_ERR, "Could not link %s %s to ARP", device_info, device);
270 memset(&ifr, 0, sizeof(ifr));
272 strncpy(ifr.lifr_name, iface, sizeof(ifr.lifr_name));
274 ifr.lifr_ip_muxid = ip_muxid;
276 if(device_type == DEVICE_TYPE_TAP) {
277 ifr.lifr_arp_muxid = arp_muxid;
280 if(ioctl(ip_fd, SIOCSLIFMUXID, &ifr) < 0) {
281 if(device_type == DEVICE_TYPE_TAP) {
282 ioctl(ip_fd, I_PUNLINK, arp_muxid);
285 ioctl(ip_fd, I_PUNLINK, ip_muxid);
286 logger(DEBUG_ALWAYS, LOG_ERR, "Could not set multiplexor id for %s %s", device_info, device);
293 fcntl(device_fd, F_SETFD, FD_CLOEXEC);
294 fcntl(ip_fd, F_SETFD, FD_CLOEXEC);
297 logger(DEBUG_ALWAYS, LOG_INFO, "%s is a %s", device, device_info);
302 static void close_device(void) {
305 memset(&ifr, 0, sizeof(ifr));
306 strncpy(ifr.lifr_name, iface, sizeof(ifr.lifr_name));
308 if(ioctl(ip_fd, SIOCGLIFMUXID, &ifr) >= 0) {
309 int muxid = ifr.lifr_arp_muxid;
310 ioctl(ip_fd, I_PUNLINK, muxid);
311 muxid = ifr.lifr_ip_muxid;
312 ioctl(ip_fd, I_PUNLINK, muxid);
327 static bool read_packet(vpn_packet_t *packet) {
332 switch(device_type) {
333 case DEVICE_TYPE_TUN:
334 sbuf.maxlen = MTU - 14;
335 sbuf.buf = (char *)DATA(packet) + 14;
337 if((result = getmsg(device_fd, NULL, &sbuf, &f)) < 0) {
338 logger(DEBUG_ALWAYS, LOG_ERR, "Error while reading from %s %s: %s", device_info, device, strerror(errno));
342 switch(DATA(packet)[14] >> 4) {
344 DATA(packet)[12] = 0x08;
345 DATA(packet)[13] = 0x00;
349 DATA(packet)[12] = 0x86;
350 DATA(packet)[13] = 0xDD;
354 logger(DEBUG_TRAFFIC, LOG_ERR, "Unknown IP version %d while reading packet from %s %s", DATA(packet)[14] >> 4, device_info, device);
358 memset(DATA(packet), 0, 12);
359 packet->len = sbuf.len + 14;
362 case DEVICE_TYPE_TAP:
364 sbuf.buf = (char *)DATA(packet);
366 if((result = getmsg(device_fd, NULL, &sbuf, &f)) < 0) {
367 logger(DEBUG_TRAFFIC, LOG_ERR, "Error while reading from %s %s: %s", device_info, device, strerror(errno));
371 packet->len = sbuf.len;
378 logger(DEBUG_TRAFFIC, LOG_DEBUG, "Read packet of %d bytes from %s", packet->len, device_info);
383 static bool write_packet(vpn_packet_t *packet) {
384 logger(DEBUG_TRAFFIC, LOG_DEBUG, "Writing packet of %d bytes to %s", packet->len, device_info);
388 switch(device_type) {
389 case DEVICE_TYPE_TUN:
390 sbuf.len = packet->len - 14;
391 sbuf.buf = (char *)DATA(packet) + 14;
393 if(putmsg(device_fd, NULL, &sbuf, 0) < 0) {
394 logger(DEBUG_TRAFFIC, LOG_ERR, "Can't write to %s %s: %s", device_info, device, strerror(errno));
400 case DEVICE_TYPE_TAP:
401 sbuf.len = packet->len;
402 sbuf.buf = (char *)DATA(packet);
404 if(putmsg(device_fd, NULL, &sbuf, 0) < 0) {
405 logger(DEBUG_TRAFFIC, LOG_ERR, "Can't write to %s %s: %s", device_info, device, strerror(errno));
418 const devops_t os_devops = {
419 .setup = setup_device,
420 .close = close_device,
422 .write = write_packet,