Fix compatibility with TAP-Win32 9.0.0.21 and later.
[oweals/tinc.git] / src / mingw / device.c
index 00b57abfd392d094e3376992d57a0000cc4c9182..49b833abbe708f440aaf7af2307e676b22b1ffb2 100644 (file)
@@ -1,7 +1,7 @@
 /*
     device.c -- Interaction with Windows tap driver in a MinGW environment
-    Copyright (C) 2002-2004 Ivo Timmermans <ivo@tinc-vpn.org>,
-                  2002-2004 Guus Sliepen <guus@tinc-vpn.org>
+    Copyright (C) 2002-2005 Ivo Timmermans,
+                  2002-2014 Guus Sliepen <guus@tinc-vpn.org>
 
     This program is free software; you can redistribute it and/or modify
     it under the terms of the GNU General Public License as published by
     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
     GNU General Public License for more details.
 
-    You should have received a copy of the GNU General Public License
-    along with this program; if not, write to the Free Software
-    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
-
-    $Id$
+    You should have received a copy of the GNU General Public License along
+    with this program; if not, write to the Free Software Foundation, Inc.,
+    51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
 */
 
-#include "system.h"
+#include "../system.h"
 
 #include <windows.h>
 #include <winioctl.h>
 
-#include "conf.h"
-#include "logger.h"
-#include "net.h"
-#include "route.h"
-#include "utils.h"
-#include "xalloc.h"
-
-#define REG_CONTROL_NET      "SYSTEM\\CurrentControlSet\\Control\\Network\\{4D36E972-E325-11CE-BFC1-08002BE10318}"
-
-#define USERMODEDEVICEDIR "\\\\.\\"
-#define USERDEVICEDIR "\\??\\"
-#define TAPSUFFIX     ".tap"
-
-#define TAP_CONTROL_CODE(request,method) CTL_CODE(FILE_DEVICE_PHYSICAL_NETCARD | 8000, request, method, FILE_ANY_ACCESS)
+#include "../conf.h"
+#include "../device.h"
+#include "../logger.h"
+#include "../net.h"
+#include "../route.h"
+#include "../utils.h"
+#include "../xalloc.h"
 
-#define TAP_IOCTL_GET_LASTMAC           TAP_CONTROL_CODE(0, METHOD_BUFFERED)
-#define TAP_IOCTL_GET_MAC               TAP_CONTROL_CODE(1, METHOD_BUFFERED)
-#define TAP_IOCTL_SET_STATISTICS        TAP_CONTROL_CODE(2, METHOD_BUFFERED)
-#define TAP_IOCTL_GET_VERSION           TAP_CONTROL_CODE(3, METHOD_BUFFERED)
-#define TAP_IOCTL_GET_MTU               TAP_CONTROL_CODE(4, METHOD_BUFFERED)
-#define TAP_IOCTL_GET_INFO              TAP_CONTROL_CODE(5, METHOD_BUFFERED)
-#define TAP_IOCTL_CONFIG_POINT_TO_POINT TAP_CONTROL_CODE(6, METHOD_BUFFERED)
-#define TAP_IOCTL_SET_MEDIA_STATUS      TAP_CONTROL_CODE(7, METHOD_BUFFERED)
+#include "common.h"
 
-
-int device_fd = 0;
-HANDLE device_handle = INVALID_HANDLE_VALUE;
+int device_fd = -1;
+static HANDLE device_handle = INVALID_HANDLE_VALUE;
 char *device = NULL;
 char *iface = NULL;
-char *device_info = NULL;
+static char *device_info = NULL;
 
-int device_total_in = 0;
-int device_total_out = 0;
+static uint64_t device_total_in = 0;
+static uint64_t device_total_out = 0;
 
 extern char *myport;
+OVERLAPPED r_overlapped;
+OVERLAPPED w_overlapped;
 
-DWORD WINAPI tapreader(void *bla) {
-       int sock, err, status;
-       struct addrinfo *ai;
-       struct addrinfo hint = {
-               .ai_family = AF_UNSPEC,
-               .ai_socktype = SOCK_DGRAM,
-               .ai_protocol = IPPROTO_UDP,
-               .ai_flags = 0,
-       };
-       char buf[MTU];
-       long len;
-       OVERLAPPED overlapped;
-
-       /* Open a socket to the parent process */
-
-       err = getaddrinfo(NULL, myport, &hint, &ai);
-
-       if(err || !ai) {
-               logger(LOG_ERR, _("System call `%s' failed: %s"), "getaddrinfo", gai_strerror(errno));
-               return -1;
-       }
-
-       sock = socket(ai->ai_family, ai->ai_socktype, ai->ai_protocol);
+static DWORD WINAPI tapreader(void *bla) {
+       int status;
+       DWORD len;
+       vpn_packet_t packet;
+       int errors = 0;
 
-       freeaddrinfo(ai);
-
-       if(sock < 0) {
-               logger(LOG_ERR, _("System call `%s' failed: %s"), "socket", strerror(errno));
-               return -1;
-       }
-
-       if(connect(sock, ai->ai_addr, ai->ai_addrlen)) {
-               logger(LOG_ERR, _("System call `%s' failed: %s"), "connect", strerror(errno));
-               return -1;
-       }
-
-       logger(LOG_DEBUG, _("Tap reader running"));
+       logger(LOG_DEBUG, "Tap reader running");
 
        /* Read from tap device and send to parent */
 
-       overlapped.hEvent = CreateEvent(NULL, TRUE, FALSE, NULL);
-       
+       r_overlapped.hEvent = CreateEvent(NULL, TRUE, FALSE, NULL);
+
        for(;;) {
-               overlapped.Offset = 0;
-               overlapped.OffsetHigh = 0;
-               ResetEvent(overlapped.hEvent);
+               ResetEvent(r_overlapped.hEvent);
 
-               status = ReadFile(device_handle, buf, sizeof(buf), &len, &overlapped);
+               status = ReadFile(device_handle, packet.data, MTU, &len, &r_overlapped);
 
                if(!status) {
                        if(GetLastError() == ERROR_IO_PENDING) {
-                               WaitForSingleObject(overlapped.hEvent, INFINITE);
-                               if(!GetOverlappedResult(device_handle, &overlapped, &len, FALSE))
+                               WaitForSingleObject(r_overlapped.hEvent, INFINITE);
+                               if(!GetOverlappedResult(device_handle, &r_overlapped, &len, FALSE))
                                        continue;
                        } else {
-                               logger(LOG_ERR, _("Error while reading from %s %s: %s"), device_info,
+                               logger(LOG_ERR, "Error while reading from %s %s: %s", device_info,
                                           device, strerror(errno));
-                               return -1;
+                               errors++;
+                               if(errors >= 10) {
+                                       EnterCriticalSection(&mutex);
+                                       running = false;
+                                       LeaveCriticalSection(&mutex);
+                               }
+                               usleep(1000000);
+                               continue;
                        }
                }
 
-               if(send(sock, buf, len, 0) <= 0)
-                       return -1;
+               errors = 0;
+               packet.len = len;
+               packet.priority = 0;
+
+               EnterCriticalSection(&mutex);
+               route(myself, &packet);
+               LeaveCriticalSection(&mutex);
        }
+
+       return 0;
 }
 
-bool setup_device(void)
-{
+static bool setup_device(void) {
        HKEY key, key2;
        int i;
 
@@ -136,31 +102,21 @@ bool setup_device(void)
        char adapterid[1024];
        char adaptername[1024];
        char tapname[1024];
-       long len;
+       DWORD len;
        unsigned long status;
 
        bool found = false;
 
-       int sock, err;
+       int err;
        HANDLE thread;
 
-       struct addrinfo *ai;
-       struct addrinfo hint = {
-               .ai_family = AF_UNSPEC,
-               .ai_socktype = SOCK_DGRAM,
-               .ai_protocol = IPPROTO_UDP,
-               .ai_flags = 0,
-       };
-
-       cp();
-
        get_config_string(lookup_config(config_tree, "Device"), &device);
        get_config_string(lookup_config(config_tree, "Interface"), &iface);
 
        /* Open registry and look for network adapters */
 
-       if(RegOpenKeyEx(HKEY_LOCAL_MACHINE, REG_CONTROL_NET, 0, KEY_READ, &key)) {
-               logger(LOG_ERR, _("Unable to read registry: %s"), winerror(GetLastError()));
+       if(RegOpenKeyEx(HKEY_LOCAL_MACHINE, NETWORK_CONNECTIONS_KEY, 0, KEY_READ, &key)) {
+               logger(LOG_ERR, "Unable to read registry: %s", winerror(GetLastError()));
                return false;
        }
 
@@ -171,13 +127,13 @@ bool setup_device(void)
 
                /* Find out more about this adapter */
 
-               snprintf(regpath, sizeof(regpath), "%s\\%s\\Connection", REG_CONTROL_NET, adapterid);
+               snprintf(regpath, sizeof(regpath), "%s\\%s\\Connection", NETWORK_CONNECTIONS_KEY, adapterid);
 
                 if(RegOpenKeyEx(HKEY_LOCAL_MACHINE, regpath, 0, KEY_READ, &key2))
                        continue;
 
                len = sizeof(adaptername);
-               err = RegQueryValueEx(key2, "Name", 0, 0, adaptername, &len);
+               err = RegQueryValueEx(key2, "Name", 0, 0, (LPBYTE)adaptername, &len);
 
                RegCloseKey(key2);
 
@@ -211,7 +167,7 @@ bool setup_device(void)
        RegCloseKey(key);
 
        if(!found) {
-               logger(LOG_ERR, _("No Windows tap device found!"));
+               logger(LOG_ERR, "No Windows tap device found!");
                return false;
        }
 
@@ -229,14 +185,14 @@ bool setup_device(void)
        }
        
        if(device_handle == INVALID_HANDLE_VALUE) {
-               logger(LOG_ERR, _("%s (%s) is not a usable Windows tap device: %s"), device, iface, winerror(GetLastError()));
+               logger(LOG_ERR, "%s (%s) is not a usable Windows tap device: %s", device, iface, winerror(GetLastError()));
                return false;
        }
 
        /* Get MAC address from tap device */
 
        if(!DeviceIoControl(device_handle, TAP_IOCTL_GET_MAC, mymac.x, sizeof(mymac.x), mymac.x, sizeof(mymac.x), &len, 0)) {
-               logger(LOG_ERR, _("Could not get MAC address from Windows tap device %s (%s): %s"), device, iface, winerror(GetLastError()));
+               logger(LOG_ERR, "Could not get MAC address from Windows tap device %s (%s): %s", device, iface, winerror(GetLastError()));
                return false;
        }
 
@@ -244,106 +200,87 @@ bool setup_device(void)
                overwrite_mac = 1;
        }
 
-       /* Create a listening socket */
-
-       err = getaddrinfo(NULL, myport, &hint, &ai);
-
-       if(err || !ai) {
-               logger(LOG_ERR, _("System call `%s' failed: %s"), "getaddrinfo", gai_strerror(errno));
-               return false;
-       }
-
-       sock = socket(ai->ai_family, ai->ai_socktype, ai->ai_protocol);
-
-       if(sock < 0) {
-               logger(LOG_ERR, _("System call `%s' failed: %s"), "socket", strerror(errno));
-               return false;
-       }
-
-       if(bind(sock, ai->ai_addr, ai->ai_addrlen)) {
-               logger(LOG_ERR, _("System call `%s' failed: %s"), "bind", strerror(errno));
-               return false;
-       }
+       /* Create overlapped events for tap I/O */
 
-       freeaddrinfo(ai);
-
-       if(listen(sock, 1)) {
-               logger(LOG_ERR, _("System call `%s' failed: %s"), "listen", strerror(errno));
-               return false;
-       }
+       r_overlapped.hEvent = CreateEvent(NULL, TRUE, FALSE, NULL);
+       w_overlapped.hEvent = CreateEvent(NULL, TRUE, TRUE, NULL);
 
        /* Start the tap reader */
 
        thread = CreateThread(NULL, 0, tapreader, NULL, 0, NULL);
 
        if(!thread) {
-               logger(LOG_ERR, _("System call `%s' failed: %s"), "CreateThread", winerror(GetLastError()));
-               return false;
-       }
-
-       /* Wait for the tap reader to connect back to us */
-
-       if((device_fd = accept(sock, NULL, 0)) == -1) {
-               logger(LOG_ERR, _("System call `%s' failed: %s"), "accept", strerror(errno));
+               logger(LOG_ERR, "System call `%s' failed: %s", "CreateThread", winerror(GetLastError()));
                return false;
        }
 
-       closesocket(sock);
-
        /* Set media status for newer TAP-Win32 devices */
 
        status = true;
        DeviceIoControl(device_handle, TAP_IOCTL_SET_MEDIA_STATUS, &status, sizeof(status), &status, sizeof(status), &len, NULL);
 
-       device_info = _("Windows tap device");
+       device_info = "Windows tap device";
 
-       logger(LOG_INFO, _("%s (%s) is a %s"), device, iface, device_info);
+       logger(LOG_INFO, "%s (%s) is a %s", device, iface, device_info);
 
        return true;
 }
 
-void close_device(void)
-{
-       cp();
-
+static void close_device(void) {
        CloseHandle(device_handle);
-}
-
-bool read_packet(vpn_packet_t *packet)
-{
-       int lenin;
-
-       cp();
 
-       if((lenin = recv(device_fd, packet->data, MTU, 0)) <= 0) {
-               logger(LOG_ERR, _("Error while reading from %s %s: %s"), device_info,
-                          device, strerror(errno));
-               return false;
-       }
-       
-       packet->len = lenin;
+       free(device);
+       free(iface);
+}
 
-       device_total_in += packet->len;
+static bool read_packet(vpn_packet_t *packet) {
+       return false;
+}
 
-       ifdebug(TRAFFIC) logger(LOG_DEBUG, _("Read packet of %d bytes from %s"), packet->len,
-                          device_info);
+static bool write_packet(vpn_packet_t *packet) {
+       DWORD lenout;
+       static vpn_packet_t queue;
 
-       return true;
-}
+       ifdebug(TRAFFIC) logger(LOG_DEBUG, "Writing packet of %d bytes to %s",
+                          packet->len, device_info);
 
-bool write_packet(vpn_packet_t *packet)
-{
-       long lenout;
-       OVERLAPPED overlapped = {0};
+       /* Check if there is something in progress */
+
+       if(queue.len) {
+               DWORD size;
+               BOOL success = GetOverlappedResult(device_handle, &w_overlapped, &size, FALSE);
+               if(success) {
+                       ResetEvent(&w_overlapped);
+                       queue.len = 0;
+               } else {
+                       int err = GetLastError();
+                       if(err != ERROR_IO_INCOMPLETE) {
+                               ifdebug(TRAFFIC) logger(LOG_DEBUG, "Error completing previously queued write: %s", winerror(err));
+                               ResetEvent(&w_overlapped);
+                               queue.len = 0;
+                       } else {
+                               ifdebug(TRAFFIC) logger(LOG_DEBUG, "Previous overlapped write still in progress");
+                               // drop this packet
+                               return true;
+                       }
+               }
+       }
 
-       cp();
+       /* Otherwise, try to write. */
 
-       ifdebug(TRAFFIC) logger(LOG_DEBUG, _("Writing packet of %d bytes to %s"),
-                          packet->len, device_info);
+       memcpy(queue.data, packet->data, packet->len);
 
-       if(!WriteFile(device_handle, packet->data, packet->len, &lenout, &overlapped)) {
-               logger(LOG_ERR, _("Error while writing to %s %s: %s"), device_info, device, winerror(GetLastError()));
-               return false;
+       if(!WriteFile(device_handle, queue.data, packet->len, &lenout, &w_overlapped)) {
+               int err = GetLastError();
+               if(err != ERROR_IO_PENDING) {
+                       logger(LOG_ERR, "Error while writing to %s %s: %s", device_info, device, winerror(err));
+                       return false;
+               }
+               // Write is being done asynchronously.
+               queue.len = packet->len;
+       } else {
+               // Write was completed immediately.
+               ResetEvent(&w_overlapped);
        }
 
        device_total_out += packet->len;
@@ -351,11 +288,16 @@ bool write_packet(vpn_packet_t *packet)
        return true;
 }
 
-void dump_device_stats(void)
-{
-       cp();
-
-       logger(LOG_DEBUG, _("Statistics for %s %s:"), device_info, device);
-       logger(LOG_DEBUG, _(" total bytes in:  %10d"), device_total_in);
-       logger(LOG_DEBUG, _(" total bytes out: %10d"), device_total_out);
+static void dump_device_stats(void) {
+       logger(LOG_DEBUG, "Statistics for %s %s:", device_info, device);
+       logger(LOG_DEBUG, " total bytes in:  %10"PRIu64, device_total_in);
+       logger(LOG_DEBUG, " total bytes out: %10"PRIu64, device_total_out);
 }
+
+const devops_t os_devops = {
+       .setup = setup_device,
+       .close = close_device,
+       .read = read_packet,
+       .write = write_packet,
+       .dump_stats = dump_device_stats,
+};