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

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