Fix listening sockets.
[tinc] / src / linux / device.c
1 /*
2     device.c -- Interaction with Linux ethertap and tun/tap 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.1.2.7 2002/02/18 16:25:19 guus Exp $
21 */
22
23 #include "config.h"
24
25 #include <stdio.h>
26 #include <errno.h>
27 #include <sys/types.h>
28 #include <sys/stat.h>
29 #include <fcntl.h>
30 #include <net/if.h>
31 #include <unistd.h>
32 #include <syslog.h>
33 #include <string.h>
34 #include <sys/ioctl.h>
35
36 #ifdef HAVE_TUNTAP
37  #ifdef LINUX_IF_TUN_H
38   #include LINUX_IF_TUN_H
39  #else
40   #include <linux/if_tun.h>
41  #endif
42  #define DEFAULT_DEVICE "/dev/misc/net/tun"
43 #else
44  #define DEFAULT_DEVICE "/dev/tap0"
45 #endif
46
47 #include <utils.h>
48 #include "conf.h"
49 #include "net.h"
50 #include "subnet.h"
51
52 #include "system.h"
53
54 #define DEVICE_TYPE_ETHERTAP 0
55 #define DEVICE_TYPE_TUNTAP 1
56
57 int device_fd = -1;
58 int device_type;
59 char *device;
60 char *interface;
61 char ifrname[IFNAMSIZ];
62 char *device_info;
63
64 int device_total_in = 0;
65 int device_total_out = 0;
66
67 extern subnet_t mymac;
68
69 /*
70   open the local ethertap device
71 */
72 int setup_device(void)
73 {
74   struct ifreq ifr;
75
76 cp
77   if(!get_config_string(lookup_config(config_tree, "Device"), &device))
78     device = DEFAULT_DEVICE;
79
80   if(!get_config_string(lookup_config(config_tree, "Interface"), &interface))
81 #ifdef HAVE_TUNTAP
82     interface = netname;
83 #else
84     interface = rindex(device, '/')?rindex(device, '/')+1:device;
85 #endif
86 cp
87   if((device_fd = open(device, O_RDWR | O_NONBLOCK)) < 0)
88     {
89       syslog(LOG_ERR, _("Could not open %s: %s"), device, strerror(errno));
90       return -1;
91     }
92 cp
93   /* Set default MAC address for ethertap devices */
94
95   mymac.type = SUBNET_MAC;
96   mymac.net.mac.address.x[0] = 0xfe;
97   mymac.net.mac.address.x[1] = 0xfd;
98   mymac.net.mac.address.x[2] = 0x00;
99   mymac.net.mac.address.x[3] = 0x00;
100   mymac.net.mac.address.x[4] = 0x00;
101   mymac.net.mac.address.x[5] = 0x00;
102
103 #ifdef HAVE_TUNTAP
104   /* Ok now check if this is an old ethertap or a new tun/tap thingie */
105
106   memset(&ifr, 0, sizeof(ifr));
107 cp
108   ifr.ifr_flags = IFF_TAP | IFF_NO_PI;
109   if (interface)
110     strncpy(ifr.ifr_name, interface, IFNAMSIZ);
111 cp
112   if (!ioctl(device_fd, TUNSETIFF, (void *) &ifr))
113   {
114     device_info = _("Linux tun/tap device");
115     device_type = DEVICE_TYPE_TUNTAP;
116     strncpy(ifrname, ifr.ifr_name, IFNAMSIZ);
117     interface = ifrname;
118   }
119   else
120     if (!ioctl(device_fd, (('T'<< 8) | 202), (void *) &ifr))
121     {
122       syslog(LOG_WARNING, _("Old ioctl() request was needed for %s"), device);
123       device_type = DEVICE_TYPE_TUNTAP;
124       device_info = _("Linux tun/tap device");
125       strncpy(ifrname, ifr.ifr_name, IFNAMSIZ);
126       interface = ifrname;
127     }
128     else
129 #endif
130     {
131       device_info = _("Linux ethertap device");
132       device_type = DEVICE_TYPE_ETHERTAP;
133     }
134
135   syslog(LOG_INFO, _("%s is a %s"), device, device_info);
136 cp
137   return 0;
138 }
139
140 void close_device(void)
141 {
142 cp
143   close(device_fd);
144 }
145
146 /*
147   read, encrypt and send data that is
148   available through the ethertap device
149 */
150 int read_packet(vpn_packet_t *packet)
151 {
152   int lenin;
153 cp
154   if(device_type == DEVICE_TYPE_TUNTAP)
155     {
156       if((lenin = read(device_fd, packet->data, MTU)) <= 0)
157         {
158           syslog(LOG_ERR, _("Error while reading from %s %s: %s"), device_info, device, strerror(errno));
159           return -1;
160         }
161
162       packet->len = lenin;
163     }
164   else /* ethertap */
165     {
166       if((lenin = read(device_fd, packet->data - 2, MTU + 2)) <= 0)
167         {
168           syslog(LOG_ERR, _("Error while reading from %s %s: %s"), device_info, device, strerror(errno));
169           return -1;
170         }
171
172       packet->len = lenin - 2;
173     }
174
175   device_total_in += packet->len;
176
177   if(debug_lvl >= DEBUG_TRAFFIC)
178     {
179       syslog(LOG_DEBUG, _("Read packet of %d bytes from %s"), packet->len, device_info);
180     }
181
182   return 0;
183 cp
184 }
185
186 int write_packet(vpn_packet_t *packet)
187 {
188 cp
189   if(debug_lvl >= DEBUG_TRAFFIC)
190     syslog(LOG_DEBUG, _("Writing packet of %d bytes to %s"),
191            packet->len, device_info);
192
193   if(device_type == DEVICE_TYPE_TUNTAP)
194     {
195       if(write(device_fd, packet->data, packet->len) < 0)
196         {
197           syslog(LOG_ERR, _("Can't write to %s %s: %s"), device_info, device, strerror(errno));
198           return -1;
199         }
200     }
201   else/* ethertap */
202     {
203       *(short int *)(packet->data - 2) = packet->len;
204       if(write(device_fd, packet->data - 2, packet->len + 2) < 0)
205         {
206           syslog(LOG_ERR, _("Can't write to %s %s: %s"), device_info, device, strerror(errno));
207           return -1;
208         }
209     }
210
211   device_total_out += packet->len;
212 cp
213   return 0;
214 }
215
216 void dump_device_stats(void)
217 {
218 cp
219   syslog(LOG_DEBUG, _("Statistics for %s %s:"), device_info, device);
220   syslog(LOG_DEBUG, _(" total bytes in:  %10d"), device_total_in);
221   syslog(LOG_DEBUG, _(" total bytes out: %10d"), device_total_out);
222 cp
223 }