src/solaris/device.c

   1 /*
   2     device.c -- Interaction with Solaris tun device
   3     Copyright (C) 2001-2002 Ivo Timmermans <itimmermans@bigfoot.com>,
   4                   2001-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: device.c,v 1.2 2002/04/09 15:32:14 zarq 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   if(!get_config_string(lookup_config(config_tree, "Device"), &device))
  70     device = DEFAULT_DEVICE;
  71
  72 cp
  73   if((device_fd = open(device, O_RDWR | O_NONBLOCK)) < 0)
  74     {
  75       syslog(LOG_ERR, _("Could not open %s: %s"), device, strerror(errno));
  76       return -1;
  77     }
  78 cp
  79   ppa = 0;
  80
  81   ptr = device;
  82   while(*ptr && !isdigit((int)*ptr)) 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, strerror(errno));
  98      return -1;
  99   }
 100
 101   if(ioctl(if_fd, I_PUSH, "ip") < 0){
 102      syslog(LOG_ERR, _("Can't push IP module: %s"), strerror(errno));
 103      return -1;
 104   }
 105
 106   /* Assign ppa according to the unit number returned by tun device */
 107   if(ioctl(if_fd, IF_UNITSEL, (char *)&ppa) < 0){
 108      syslog(LOG_ERR, _("Can't set PPA %d: %s"), ppa, strerror(errno));
 109      return -1;
 110   }
 111
 112   if(ioctl(ip_fd, I_LINK, if_fd) < 0){
 113      syslog(LOG_ERR, _("Can't link TUN device to IP: %s"), strerror(errno));
 114      return -1;
 115   }
 116
 117   if(!get_config_string(lookup_config(config_tree, "Interface"), &interface))
 118     asprintf(&interface, "tun%d", ppa);
 119
 120   device_info = _("Solaris tun device");
 121
 122   /* Set default MAC address for ethertap devices */
 123
 124   mymac.type = SUBNET_MAC;
 125   mymac.net.mac.address.x[0] = 0xfe;
 126   mymac.net.mac.address.x[1] = 0xfd;
 127   mymac.net.mac.address.x[2] = 0x00;
 128   mymac.net.mac.address.x[3] = 0x00;
 129   mymac.net.mac.address.x[4] = 0x00;
 130   mymac.net.mac.address.x[5] = 0x00;
 131
 132   syslog(LOG_INFO, _("%s is a %s"), device, device_info);
 133 cp
 134   return 0;
 135 }
 136
 137 void close_device(void)
 138 {
 139 cp
 140   close(device_fd);
 141 }
 142
 143 int read_packet(vpn_packet_t *packet)
 144 {
 145   int lenin;
 146 cp
 147   if((lenin = read(device_fd, packet->data + 14, MTU - 14)) <= 0)
 148     {
 149       syslog(LOG_ERR, _("Error while reading from %s %s: %s"), device_info, device, strerror(errno));
 150       return -1;
 151     }
 152
 153   memcpy(packet->data, mymac.net.mac.address.x, 6);
 154   memcpy(packet->data + 6, mymac.net.mac.address.x, 6);
 155   packet->data[12] = 0x08;
 156   packet->data[13] = 0x00;
 157
 158   packet->len = lenin + 14;
 159
 160   device_total_in += packet->len;
 161
 162   if(debug_lvl >= DEBUG_TRAFFIC)
 163     {
 164       syslog(LOG_DEBUG, _("Read packet of %d bytes from %s"), packet->len, device_info);
 165     }
 166
 167   return 0;
 168 cp
 169 }
 170
 171 int write_packet(vpn_packet_t *packet)
 172 {
 173 cp
 174   if(debug_lvl >= DEBUG_TRAFFIC)
 175     syslog(LOG_DEBUG, _("Writing packet of %d bytes to %s"),
 176            packet->len, device_info);
 177
 178   if(write(device_fd, packet->data + 14, packet->len - 14) < 0)
 179     {
 180       syslog(LOG_ERR, _("Can't write to %s %s: %s"), device_info, packet->len, strerror(errno));
 181       return -1;
 182     }
 183
 184   device_total_out += packet->len;
 185 cp
 186   return 0;
 187 }
 188
 189 void dump_device_stats(void)
 190 {
 191 cp
 192   syslog(LOG_DEBUG, _("Statistics for %s %s:"), device_info, device);
 193   syslog(LOG_DEBUG, _(" total bytes in:  %10d"), device_total_in);
 194   syslog(LOG_DEBUG, _(" total bytes out: %10d"), device_total_out);
 195 cp
 196 }