tinc-vpn.org Git - tinc/blob - src/cygwin/device.c

   1 /*\r
   2     device.c -- Interaction with CIPE driver in a Cygwin environment\r
   3     Copyright (C) 2002-2003 Ivo Timmermans <ivo@o2w.nl>,\r
   4                   2002-2003 Guus Sliepen <guus@sliepen.eu.org>\r
   5 \r
   6     This program is free software; you can redistribute it and/or modify\r
   7     it under the terms of the GNU General Public License as published by\r
   8     the Free Software Foundation; either version 2 of the License, or\r
   9     (at your option) any later version.\r
  10 \r
  11     This program is distributed in the hope that it will be useful,\r
  12     but WITHOUT ANY WARRANTY; without even the implied warranty of\r
  13     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the\r
  14     GNU General Public License for more details.\r
  15 \r
  16     You should have received a copy of the GNU General Public License\r
  17     along with this program; if not, write to the Free Software\r
  18     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.\r
  19 \r
  20     $Id: device.c,v 1.1.2.10 2003/07/22 20:55:20 guus Exp $\r
  21 */\r
  22 \r
  23 #include "system.h"\r
  24 \r
  25 #include <w32api/windows.h>\r
  26 #include <w32api/winioctl.h>\r
  27 \r
  28 #include "conf.h"\r
  29 #include "logger.h"\r
  30 #include "net.h"\r
  31 #include "route.h"\r
  32 #include "utils.h"\r
  33 #include "xalloc.h"\r
  34 \r
  35 /* Definitions from CIPE */\r
  36 \r
  37 #define NETCARD_REG_KEY_2000 "SYSTEM\\CurrentControlSet\\Control\\Class\\{4D36E972-E325-11CE-BFC1-08002BE10318}"\r
  38 #define NETCARD_REG_KEY      "SOFTWARE\\Microsoft\\Windows NT\\CurrentVersion\\NetworkCards"\r
  39 #define REG_SERVICE_KEY      "SYSTEM\\CurrentControlSet\\Services"\r
  40 \r
  41 #define USERMODEDEVICEDIR "\\\\.\\"\r
  42 #define SYSDEVICEDIR  "\\Device\\"\r
  43 #define USERDEVICEDIR "\\??\\"\r
  44 #define TAPSUFFIX     ".tap"\r
  45 \r
  46 #define PRODUCT_STRING "DKW Heavy Industries VPN Adapter."\r
  47 #define CIPE_SERVICE_NAME "CIPE_Daemon"\r
  48 #define CIPE_DRIVER_NAME "CIPE"\r
  49 \r
  50 #define CIPE_NDIS_MAJOR_VERSION 4\r
  51 #define CIPE_NDIS_MINOR_VERSION 0\r
  52 \r
  53 #ifndef CIPE_DRIVER_MAJOR_VERSION\r
  54 #   define CIPE_DRIVER_MAJOR_VERSION 2\r
  55 #endif\r
  56 \r
  57 #ifndef CIPE_DRIVER_MINOR_VERSION\r
  58 #   define CIPE_DRIVER_MINOR_VERSION 1\r
  59 #endif\r
  60 \r
  61 #ifndef CIPE_MAC_ROOT_ADDRESS\r
  62 #   define CIPE_MAC_ROOT_ADDRESS "8:0:58:0:0:1"\r
  63 #endif\r
  64 \r
  65 #define CIPE_CONTROL_CODE(request,method) CTL_CODE (FILE_DEVICE_PHYSICAL_NETCARD | 8000, request, method, FILE_ANY_ACCESS)\r
  66 \r
  67 #define CIPE_IOCTL_GET_LASTMAC    CIPE_CONTROL_CODE (0, METHOD_BUFFERED)\r
  68 #define CIPE_IOCTL_GET_MAC        CIPE_CONTROL_CODE (1, METHOD_BUFFERED)\r
  69 #define CIPE_IOCTL_SET_STATISTICS CIPE_CONTROL_CODE (2, METHOD_BUFFERED)\r
  70 \r
  71 /* Windows 2000 */\r
  72 #define OSTYPE 5\r
  73 \r
  74 int device_fd = -1;\r
  75 char *device = NULL;\r
  76 char *iface = NULL;\r
  77 char *device_info = NULL;\r
  78 \r
  79 int device_total_in = 0;\r
  80 int device_total_out = 0;\r
  81 \r
  82 HANDLE handle;\r
  83 \r
  84 pid_t reader_pid;\r
  85 int sp[2];\r
  86 \r
  87 bool setup_device(void)\r
  88 {\r
  89         HKEY key, key2, adapterkey;\r
  90         int i;\r
  91 \r
  92         char adapterid[1024];\r
  93         char manufacturer[1024];\r
  94         char productname[1024];\r
  95         char adaptername[1024];\r
  96         char tapname[1024];\r
  97         char gelukt = 0;\r
  98         long len;\r
  99 \r
 100         FILETIME filetime;\r
 101         bool found = false;\r
 102 \r
 103         cp();\r
 104 \r
 105         get_config_string(lookup_config(config_tree, "Device"), &device);\r
 106 \r
 107         /* Open registry and look for network adapters */\r
 108 \r
 109         if (RegOpenKeyEx (HKEY_LOCAL_MACHINE, (OSTYPE > 4 ? NETCARD_REG_KEY_2000 : NETCARD_REG_KEY), 0, KEY_READ, &key)) {\r
 110                 logger(LOG_ERR, _("Unable to read registry"));\r
 111                 return false;\r
 112         }\r
 113 \r
 114         for (i = 0; ; i++) {\r
 115                 len = sizeof(adapterid);\r
 116                 if(RegEnumKeyEx (key, i, adapterid, &len, 0, 0, 0, &filetime))\r
 117                         break;\r
 118 \r
 119                 /* Find out more about this adapter */\r
 120 \r
 121                 if(RegOpenKeyEx (key, adapterid, 0, KEY_READ, &adapterkey)) {\r
 122                         logger(LOG_ERR, _("Unable to read registry"));\r
 123                         return false;\r
 124                 }\r
 125 \r
 126                 len = sizeof(productname);\r
 127                 if(RegQueryValueEx(adapterkey, "ProductName", 0, 0, productname, &len))\r
 128                         goto skip;\r
 129 \r
 130                 len = sizeof(manufacturer);\r
 131                 if(RegQueryValueEx(adapterkey, "Manufacturer", 0, 0, manufacturer, &len))\r
 132                         goto skip;\r
 133 \r
 134                 if(!strcmp(productname, "CIPE") && !strcmp(manufacturer, "DKWHeavyIndustries")) {\r
 135                         if(device && strcmp(adapterid, device))\r
 136                                 continue;\r
 137                         if(!device)\r
 138                                 device = xstrdup(adapterid);\r
 139                         found = true;\r
 140                         break;\r
 141                 }\r
 142                 \r
 143 skip:\r
 144                 RegCloseKey (adapterkey);\r
 145         }\r
 146 \r
 147         if(!found) {\r
 148                 logger(LOG_ERR, _("No CIPE adapters found!"));\r
 149                 return false;\r
 150         }\r
 151 \r
 152         /* Get adapter name */\r
 153 \r
 154         len = sizeof(adaptername);\r
 155         RegQueryValueEx(adapterkey, (OSTYPE > 4 ? "NetCfgInstanceId" : "ServiceName"), 0, 0, adaptername, &len);\r
 156 \r
 157         /* FIXME? cipsrvr checks if the device is in use at this point */\r
 158 \r
 159         /* Try to open the corresponding tap device */\r
 160 \r
 161         snprintf(tapname, sizeof(tapname), USERMODEDEVICEDIR "%s" TAPSUFFIX, adaptername);\r
 162         \r
 163         /* Now we are going to open this device twice: once for reading and once for writing.\r
 164            We do this because apparently it isn't possible to check for activity in the select() loop.\r
 165            Furthermore I don't really know how to do it the "Windows" way. */\r
 166 \r
 167         if(socketpair(AF_UNIX, SOCK_DGRAM, PF_UNIX, sp)) {\r
 168                 logger(LOG_DEBUG, _("System call `%s' failed: %s"), "socketpair", strerror(errno));\r
 169                 return false;\r
 170         }\r
 171 \r
 172         reader_pid = fork();\r
 173 \r
 174         if(reader_pid == -1) {\r
 175                 logger(LOG_DEBUG, _("System call `%s' failed: %s"), "fork", strerror(errno));\r
 176                 return false;\r
 177         }\r
 178 \r
 179         if(!reader_pid) {\r
 180                 /* The child opens the tap device for reading, blocking.\r
 181                    It passes everything it reads to the socket. */\r
 182         \r
 183                 char buf[MTU];\r
 184                 int lenin;\r
 185 \r
 186                 handle = CreateFile(tapname, GENERIC_READ,  FILE_SHARE_WRITE,  0,  OPEN_EXISTING, FILE_ATTRIBUTE_SYSTEM , 0);\r
 187 \r
 188                 if(handle == INVALID_HANDLE_VALUE) {\r
 189                         logger(LOG_ERR, _("Could not open CIPE tap device for reading!"));\r
 190                         buf[0] = 0;\r
 191                         write(sp[1], buf, 1);\r
 192                         exit(1);\r
 193                 }\r
 194 \r
 195                 logger(LOG_DEBUG, _("Tap reader forked and running."));\r
 196 \r
 197                 /* Notify success */\r
 198 \r
 199                 buf[0] = 1;\r
 200                 write(sp[1], buf, 1);\r
 201 \r
 202                 /* Pass packets */\r
 203 \r
 204                 for(;;) {\r
 205                         ReadFile (handle, buf, MTU, &lenin, NULL);\r
 206                         write(sp[1], buf, lenin);\r
 207                 }\r
 208         }\r
 209 \r
 210         /* The parent opens the tap device for writing. */\r
 211         \r
 212         handle = CreateFile(tapname, GENERIC_WRITE,  FILE_SHARE_READ,  0,  OPEN_EXISTING, FILE_ATTRIBUTE_SYSTEM , 0);\r
 213         \r
 214         if(handle == INVALID_HANDLE_VALUE) {\r
 215                 logger(LOG_ERR, _("Could not open CIPE tap device for writing!"));\r
 216                 return false;\r
 217         }\r
 218 \r
 219         device_fd = sp[0];\r
 220 \r
 221         /* Get MAC address from tap device */\r
 222 \r
 223         if(routing_mode == RMODE_ROUTER) {\r
 224                 DeviceIoControl (handle, CIPE_IOCTL_GET_MAC, mymac.x, sizeof(mymac.x), mymac.x, sizeof(mymac.x), &len, 0);\r
 225                 overwrite_mac = 1;\r
 226         }\r
 227 \r
 228         read(device_fd, &gelukt, 1);\r
 229         if(gelukt != 1) {\r
 230                 logger(LOG_DEBUG, "Tap reader failed!");\r
 231                 return false;\r
 232         }\r
 233 \r
 234         if(!get_config_string(lookup_config(config_tree, "Interface"), &iface))\r
 235                 iface = device;\r
 236 \r
 237         device_info = _("Cygwin CIPE device");\r
 238 \r
 239         logger(LOG_INFO, _("%s is a %s"), device, device_info);\r
 240 \r
 241         return false;\r
 242 }\r
 243 \r
 244 void close_device(void)\r
 245 {\r
 246         cp();\r
 247 \r
 248         close(sp[0]);\r
 249         close(sp[1]);\r
 250         CloseHandle(handle);\r
 251 \r
 252         kill(reader_pid, SIGKILL);\r
 253 }\r
 254 \r
 255 bool read_packet(vpn_packet_t *packet)\r
 256 {\r
 257         int lenin;\r
 258 \r
 259         cp();\r
 260 \r
 261         if((lenin = read(sp[0], packet->data, MTU)) <= 0) {\r
 262                 logger(LOG_ERR, _("Error while reading from %s %s: %s"), device_info,\r
 263                            device, strerror(errno));\r
 264                 return false;\r
 265         }\r
 266         \r
 267         packet->len = lenin;\r
 268 \r
 269         device_total_in += packet->len;\r
 270 \r
 271         ifdebug(TRAFFIC) logger(LOG_DEBUG, _("Read packet of %d bytes from %s"), packet->len,\r
 272                            device_info);\r
 273 \r
 274         return true;\r
 275 }\r
 276 \r
 277 bool write_packet(vpn_packet_t *packet)\r
 278 {\r
 279         int lenout;\r
 280 \r
 281         cp();\r
 282 \r
 283         ifdebug(TRAFFIC) logger(LOG_DEBUG, _("Writing packet of %d bytes to %s"),\r
 284                            packet->len, device_info);\r
 285 \r
 286         if(!WriteFile (handle, packet->data, packet->len, &lenout, NULL)) {\r
 287                 logger(LOG_ERR, "Error while writing to %s %s", device_info, device);\r
 288                 return false;\r
 289         }\r
 290 \r
 291         device_total_out += packet->len;\r
 292 \r
 293         return true;\r
 294 }\r
 295 \r
 296 void dump_device_stats(void)\r
 297 {\r
 298         cp();\r
 299 \r
 300         logger(LOG_DEBUG, _("Statistics for %s %s:"), device_info, device);\r
 301         logger(LOG_DEBUG, _(" total bytes in:  %10d"), device_total_in);\r
 302         logger(LOG_DEBUG, _(" total bytes out: %10d"), device_total_out);\r
 303 }\r