src/cygwin/device.c

   1 /*
   2     device.c -- Interaction with Windows tap driver in a Cygwin environment
   3     Copyright (C) 2002-2003 Ivo Timmermans <ivo@o2w.nl>,
   4                   2002-2003 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.14 2003/07/29 23:21:01 guus Exp $
  21 */
  22
  23 #include "system.h"
  24
  25 #include <w32api/windows.h>
  26 #include <w32api/winioctl.h>
  27
  28 #include "conf.h"
  29 #include "logger.h"
  30 #include "net.h"
  31 #include "route.h"
  32 #include "utils.h"
  33 #include "xalloc.h"
  34
  35 #define NETCARD_REG_KEY_2000 "SYSTEM\\CurrentControlSet\\Control\\Class\\{4D36E972-E325-11CE-BFC1-08002BE10318}"
  36 #define NETCARD_REG_KEY      "SOFTWARE\\Microsoft\\Windows NT\\CurrentVersion\\NetworkCards"
  37 #define REG_SERVICE_KEY      "SYSTEM\\CurrentControlSet\\Services"
  38 #define REG_CONTROL_NET      "SYSTEM\\CurrentControlSet\\Control\\Network\\{4D36E972-E325-11CE-BFC1-08002BE10318}"
  39
  40 #define USERMODEDEVICEDIR "\\\\.\\"
  41 #define SYSDEVICEDIR  "\\Device\\"
  42 #define USERDEVICEDIR "\\??\\"
  43 #define TAPSUFFIX     ".tap"
  44
  45 #define TAP_CONTROL_CODE(request,method) CTL_CODE(FILE_DEVICE_PHYSICAL_NETCARD | 8000, request, method, FILE_ANY_ACCESS)
  46
  47 #define TAP_IOCTL_GET_LASTMAC    TAP_CONTROL_CODE(0, METHOD_BUFFERED)
  48 #define TAP_IOCTL_GET_MAC        TAP_CONTROL_CODE(1, METHOD_BUFFERED)
  49 #define TAP_IOCTL_SET_STATISTICS TAP_CONTROL_CODE(2, METHOD_BUFFERED)
  50
  51 /* FIXME: This only works for Windows 2000 */
  52 #define OSTYPE 5
  53
  54 int device_fd = -1;
  55 char *device = NULL;
  56 char *iface = NULL;
  57 char *device_info = NULL;
  58
  59 int device_total_in = 0;
  60 int device_total_out = 0;
  61
  62 HANDLE handle;
  63
  64 pid_t reader_pid;
  65 int sp[2];
  66
  67 bool setup_device(void)
  68 {
  69         HKEY key, key2;
  70         int i;
  71
  72         char regpath[1024];
  73         char adapterid[1024];
  74         char adaptername[1024];
  75         char tapname[1024];
  76         char gelukt = 0;
  77         long len;
  78
  79         bool found = false;
  80
  81         cp();
  82
  83         get_config_string(lookup_config(config_tree, "Device"), &device);
  84         get_config_string(lookup_config(config_tree, "Interface"), &iface);
  85
  86         /* Open registry and look for network adapters */
  87
  88         if(RegOpenKeyEx(HKEY_LOCAL_MACHINE, REG_CONTROL_NET, 0, KEY_READ, &key)) {
  89                 logger(LOG_ERR, _("Unable to read registry"));
  90                 return false;
  91         }
  92
  93         for (i = 0; ; i++) {
  94                 len = sizeof(adapterid);
  95                 if(RegEnumKeyEx(key, i, adapterid, &len, 0, 0, 0, NULL))
  96                         break;
  97
  98                 /* Find out more about this adapter */
  99
 100                 snprintf(regpath, sizeof(regpath), "%s\\%s\\Connection", REG_CONTROL_NET, adapterid);
 101
 102                 if(RegOpenKeyEx(HKEY_LOCAL_MACHINE, regpath, 0, KEY_READ, &key2))
 103                         continue;
 104
 105                 len = sizeof(adaptername);
 106                 RegQueryValueEx(key2, "Name", 0, 0, adaptername, &len);
 107
 108                 RegCloseKey(key2);
 109
 110                 if(device) {
 111                         if(!strcmp(device, adapterid)) {
 112                                 found = true;
 113                                 break;
 114                         } else
 115                                 continue;
 116                 }
 117
 118                 if(iface) {
 119                         if(!strcmp(iface, adaptername)) {
 120                                 found = true;
 121                                 break;
 122                         } else
 123                                 continue;
 124                 }
 125
 126                 snprintf(tapname, sizeof(tapname), USERMODEDEVICEDIR "%s" TAPSUFFIX, adapterid);
 127                 handle = CreateFile(tapname, GENERIC_WRITE | GENERIC_READ, 0, 0, OPEN_EXISTING, FILE_ATTRIBUTE_SYSTEM, 0);
 128                 if(handle != INVALID_HANDLE_VALUE) {
 129                         CloseHandle(handle);
 130                         found = true;
 131                         break;
 132                 }
 133         }
 134
 135         RegCloseKey(key);
 136
 137         if(!found) {
 138                 logger(LOG_ERR, _("No Windows tap device found!"));
 139                 return false;
 140         }
 141
 142         if(!device)
 143                 device = xstrdup(adapterid);
 144
 145         if(!iface)
 146                 iface = xstrdup(adaptername);
 147
 148         snprintf(tapname, sizeof(tapname), USERMODEDEVICEDIR "%s" TAPSUFFIX, device);
 149
 150         /* Now we are going to open this device twice: once for reading and once for writing.
 151            We do this because apparently it isn't possible to check for activity in the select() loop.
 152            Furthermore I don't really know how to do it the "Windows" way. */
 153
 154         if(socketpair(AF_UNIX, SOCK_DGRAM, PF_UNIX, sp)) {
 155                 logger(LOG_DEBUG, _("System call `%s' failed: %s"), "socketpair", strerror(errno));
 156                 return false;
 157         }
 158
 159         /* The parent opens the tap device for writing. */
 160
 161         handle = CreateFile(tapname, GENERIC_WRITE,  FILE_SHARE_READ,  0,  OPEN_EXISTING, FILE_ATTRIBUTE_SYSTEM , 0);
 162
 163         if(handle == INVALID_HANDLE_VALUE) {
 164                 logger(LOG_ERR, _("Could not open Windows tap device for writing!"));
 165                 return false;
 166         }
 167
 168         device_fd = sp[0];
 169
 170         /* Get MAC address from tap device */
 171
 172         if(!DeviceIoControl(handle, TAP_IOCTL_GET_MAC, mymac.x, sizeof(mymac.x), mymac.x, sizeof(mymac.x), &len, 0)) {
 173                 logger(LOG_ERR, _("Could not get MAC address from Windows tap device!"));
 174                 return false;
 175         }
 176
 177         if(routing_mode == RMODE_ROUTER) {
 178                 overwrite_mac = 1;
 179         }
 180
 181         /* Now we start the child */
 182
 183         reader_pid = fork();
 184
 185         if(reader_pid == -1) {
 186                 logger(LOG_DEBUG, _("System call `%s' failed: %s"), "fork", strerror(errno));
 187                 return false;
 188         }
 189
 190         if(!reader_pid) {
 191                 /* The child opens the tap device for reading, blocking.
 192                    It passes everything it reads to the socket. */
 193
 194                 char buf[MTU];
 195                 long lenin;
 196
 197                 CloseHandle(handle);
 198
 199                 handle = CreateFile(tapname, GENERIC_READ, FILE_SHARE_WRITE, 0,  OPEN_EXISTING, FILE_ATTRIBUTE_SYSTEM, 0);
 200
 201                 if(handle == INVALID_HANDLE_VALUE) {
 202                         logger(LOG_ERR, _("Could not open Windows tap device for reading!"));
 203                         buf[0] = 0;
 204                         write(sp[1], buf, 1);
 205                         exit(1);
 206                 }
 207
 208                 logger(LOG_DEBUG, _("Tap reader forked and running."));
 209
 210                 /* Notify success */
 211
 212                 buf[0] = 1;
 213                 write(sp[1], buf, 1);
 214
 215                 /* Pass packets */
 216
 217                 for(;;) {
 218                         ReadFile(handle, buf, MTU, &lenin, NULL);
 219                         write(sp[1], buf, lenin);
 220                 }
 221         }
 222
 223         read(device_fd, &gelukt, 1);
 224         if(gelukt != 1) {
 225                 logger(LOG_DEBUG, _("Tap reader failed!"));
 226                 return false;
 227         }
 228
 229         device_info = _("Windows tap device");
 230
 231         logger(LOG_INFO, _("%s (%s) is a %s"), device, iface, device_info);
 232
 233         return true;
 234 }
 235
 236 void close_device(void)
 237 {
 238         cp();
 239
 240         close(sp[0]);
 241         close(sp[1]);
 242         CloseHandle(handle);
 243
 244         kill(reader_pid, SIGKILL);
 245 }
 246
 247 bool read_packet(vpn_packet_t *packet)
 248 {
 249         int lenin;
 250
 251         cp();
 252
 253         if((lenin = read(sp[0], packet->data, MTU)) <= 0) {
 254                 logger(LOG_ERR, _("Error while reading from %s %s: %s"), device_info,
 255                            device, strerror(errno));
 256                 return false;
 257         }
 258
 259         packet->len = lenin;
 260
 261         device_total_in += packet->len;
 262
 263         ifdebug(TRAFFIC) logger(LOG_DEBUG, _("Read packet of %d bytes from %s"), packet->len,
 264                            device_info);
 265
 266         return true;
 267 }
 268
 269 bool write_packet(vpn_packet_t *packet)
 270 {
 271         long lenout;
 272
 273         cp();
 274
 275         ifdebug(TRAFFIC) logger(LOG_DEBUG, _("Writing packet of %d bytes to %s"),
 276                            packet->len, device_info);
 277
 278         if(!WriteFile (handle, packet->data, packet->len, &lenout, NULL)) {
 279                 logger(LOG_ERR, _("Error while writing to %s %s"), device_info, device);
 280                 return false;
 281         }
 282
 283         device_total_out += packet->len;
 284
 285         return true;
 286 }
 287
 288 void dump_device_stats(void)
 289 {
 290         cp();
 291
 292         logger(LOG_DEBUG, _("Statistics for %s %s:"), device_info, device);
 293         logger(LOG_DEBUG, _(" total bytes in:  %10d"), device_total_in);
 294         logger(LOG_DEBUG, _(" total bytes out: %10d"), device_total_out);
 295 }