src/solaris/device.c

   1 /*
   2     device.c -- Interaction with Solaris tun device
   3     Copyright (C) 2001-2002 Ivo Timmermans <ivo@o2w.nl>,
   4                   2001-2002 Guus Sliepen <guus@sliepen.eu.org>
   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: device.c,v 1.1.2.11 2002/09/10 21:29:42 guus Exp $
  21 */
  22
  23
  24 #include "config.h"
  25
  26 #include <stdio.h>
  27 #include <errno.h>
  28 #include <sys/types.h>
  29 #include <sys/stat.h>
  30 #include <fcntl.h>
  31 #include <sys/socket.h>
  32 #include <net/if.h>
  33 #include <unistd.h>
  34 #include <syslog.h>
  35 #include <string.h>
  36 #include <sys/ioctl.h>
  37 #include <sys/stropts.h>
  38 #include <sys/sockio.h>
  39 #include <net/if_tun.h>
  40
  41 #define DEFAULT_DEVICE "/dev/tun"
  42
  43 #include <utils.h>
  44 #include "conf.h"
  45 #include "net.h"
  46 #include "subnet.h"
  47
  48 #include "system.h"
  49
  50 int device_fd = -1;
  51 int device_type;
  52 char *device = NULL;
  53 char *interface = NULL;
  54 char ifrname[IFNAMSIZ];
  55 char *device_info = NULL;
  56
  57 int device_total_in = 0;
  58 int device_total_out = 0;
  59
  60 subnet_t mymac;
  61
  62 int setup_device(void)
  63 {
  64         int ip_fd = -1, if_fd = -1;
  65         int ppa;
  66         char *ptr;
  67
  68         cp();
  69
  70         if(!get_config_string(lookup_config(config_tree, "Device"), &device))
  71                 device = DEFAULT_DEVICE;
  72
  73         if((device_fd = open(device, O_RDWR | O_NONBLOCK)) < 0) {
  74                 syslog(LOG_ERR, _("Could not open %s: %s"), device, strerror(errno));
  75                 return -1;
  76         }
  77
  78         ppa = 0;
  79
  80         ptr = device;
  81         while(*ptr && !isdigit((int) *ptr))
  82                 ptr++;
  83         ppa = atoi(ptr);
  84
  85         if((ip_fd = open("/dev/ip", O_RDWR, 0)) < 0) {
  86                 syslog(LOG_ERR, _("Could not open /dev/ip: %s"), strerror(errno));
  87                 return -1;
  88         }
  89
  90         /* Assign a new PPA and get its unit number. */
  91         if((ppa = ioctl(device_fd, TUNNEWPPA, ppa)) < 0) {
  92                 syslog(LOG_ERR, _("Can't assign new interface: %s"), strerror(errno));
  93                 return -1;
  94         }
  95
  96         if((if_fd = open(device, O_RDWR, 0)) < 0) {
  97                 syslog(LOG_ERR, _("Could not open %s twice: %s"), device,
  98                            strerror(errno));
  99                 return -1;
 100         }
 101
 102         if(ioctl(if_fd, I_PUSH, "ip") < 0) {
 103                 syslog(LOG_ERR, _("Can't push IP module: %s"), strerror(errno));
 104                 return -1;
 105         }
 106
 107         /* Assign ppa according to the unit number returned by tun device */
 108         if(ioctl(if_fd, IF_UNITSEL, (char *) &ppa) < 0) {
 109                 syslog(LOG_ERR, _("Can't set PPA %d: %s"), ppa, strerror(errno));
 110                 return -1;
 111         }
 112
 113         if(ioctl(ip_fd, I_LINK, if_fd) < 0) {
 114                 syslog(LOG_ERR, _("Can't link TUN device to IP: %s"), strerror(errno));
 115                 return -1;
 116         }
 117
 118         if(!get_config_string(lookup_config(config_tree, "Interface"), &interface))
 119                 asprintf(&interface, "tun%d", ppa);
 120
 121         device_info = _("Solaris tun device");
 122
 123         /* Set default MAC address for ethertap devices */
 124
 125         mymac.type = SUBNET_MAC;
 126         mymac.net.mac.address.x[0] = 0xfe;
 127         mymac.net.mac.address.x[1] = 0xfd;
 128         mymac.net.mac.address.x[2] = 0x00;
 129         mymac.net.mac.address.x[3] = 0x00;
 130         mymac.net.mac.address.x[4] = 0x00;
 131         mymac.net.mac.address.x[5] = 0x00;
 132
 133         syslog(LOG_INFO, _("%s is a %s"), device, device_info);
 134
 135         return 0;
 136 }
 137
 138 void close_device(void)
 139 {
 140         cp();
 141
 142         close(device_fd);
 143 }
 144
 145 int read_packet(vpn_packet_t *packet)
 146 {
 147         int lenin;
 148
 149         cp();
 150
 151         if((lenin = read(device_fd, packet->data + 14, MTU - 14)) <= 0) {
 152                 syslog(LOG_ERR, _("Error while reading from %s %s: %s"), device_info,
 153                            device, strerror(errno));
 154                 return -1;
 155         }
 156
 157         memcpy(packet->data, mymac.net.mac.address.x, 6);
 158         memcpy(packet->data + 6, mymac.net.mac.address.x, 6);
 159         packet->data[12] = 0x08;
 160         packet->data[13] = 0x00;
 161
 162         packet->len = lenin + 14;
 163
 164         device_total_in += packet->len;
 165
 166         if(debug_lvl >= DEBUG_TRAFFIC) {
 167                 syslog(LOG_DEBUG, _("Read packet of %d bytes from %s"), packet->len,
 168                            device_info);
 169         }
 170
 171         return 0;
 172 }
 173
 174 int write_packet(vpn_packet_t *packet)
 175 {
 176         cp();
 177
 178         if(debug_lvl >= DEBUG_TRAFFIC)
 179                 syslog(LOG_DEBUG, _("Writing packet of %d bytes to %s"),
 180                            packet->len, device_info);
 181
 182         if(write(device_fd, packet->data + 14, packet->len - 14) < 0) {
 183                 syslog(LOG_ERR, _("Can't write to %s %s: %s"), device_info, packet->len,
 184                            strerror(errno));
 185                 return -1;
 186         }
 187
 188         device_total_out += packet->len;
 189
 190         return 0;
 191 }
 192
 193 void dump_device_stats(void)
 194 {
 195         cp();
 196
 197         syslog(LOG_DEBUG, _("Statistics for %s %s:"), device_info, device);
 198         syslog(LOG_DEBUG, _(" total bytes in:  %10d"), device_total_in);
 199         syslog(LOG_DEBUG, _(" total bytes out: %10d"), device_total_out);
 200 }