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