--- gvpe/src/vpn.C	2003/04/06 18:12:18	1.7
+++ gvpe/src/vpn.C	2003/04/07 01:28:56	1.8
@@ -73,26 +73,20 @@
 int
 vpn::setup ()
 {
-  udpv4_fd = -1;
+  ipv4_fd = -1;
 
-  if (THISNODE->protocols & PROT_UDPv4)
+  if (THISNODE->protocols & PROT_IPv4 && ::conf.ip_proto)
     {
-      udpv4_fd = socket (PF_INET, SOCK_DGRAM, IPPROTO_UDP);
+      ipv4_fd = socket (PF_INET, SOCK_RAW, ::conf.ip_proto);
 
-      if (udpv4_fd < 0)
+      if (ipv4_fd < 0)
         return -1;
 
-      // standard daemon practise...
-      {
-        int oval = 1;
-        setsockopt (udpv4_fd, SOL_SOCKET, SO_REUSEADDR, &oval, sizeof oval);
-      }
-
-      sockinfo si (THISNODE, PROT_UDPv4);
+      sockinfo si (THISNODE, PROT_IPv4);
 
-      if (bind (udpv4_fd, si.sav4 (), si.salenv4 ()))
+      if (bind (ipv4_fd, si.sav4 (), si.salenv4 ()))
         {
-          slog (L_ERR, _("can't bind udpv4 on %s: %s"), (const char *)si, strerror (errno));
+          slog (L_ERR, _("can't bind ipv4 socket on %s: %s"), (const char *)si, strerror (errno));
           exit (1);
         }
 
@@ -102,26 +96,33 @@
       // fragment for me sometimes.
       {
         int oval = IP_PMTUDISC_DONT;
-        setsockopt (udpv4_fd, SOL_IP, IP_MTU_DISCOVER, &oval, sizeof oval);
+        setsockopt (ipv4_fd, SOL_IP, IP_MTU_DISCOVER, &oval, sizeof oval);
       }
 #endif
 
-      udpv4_ev_watcher.start (udpv4_fd, POLLIN);
+      ipv4_ev_watcher.start (ipv4_fd, POLLIN);
     }
 
-  ipv4_fd = -1;
-  if (THISNODE->protocols & PROT_IPv4)
+  udpv4_fd = -1;
+
+  if (THISNODE->protocols & PROT_UDPv4 && THISNODE->udp_port)
     {
-      ipv4_fd = socket (PF_INET, SOCK_RAW, ::conf.ip_proto);
+      udpv4_fd = socket (PF_INET, SOCK_DGRAM, IPPROTO_UDP);
 
-      if (ipv4_fd < 0)
+      if (udpv4_fd < 0)
         return -1;
 
-      sockinfo si (THISNODE, PROT_IPv4);
+      // standard daemon practise...
+      {
+        int oval = 1;
+        setsockopt (udpv4_fd, SOL_SOCKET, SO_REUSEADDR, &oval, sizeof oval);
+      }
 
-      if (bind (ipv4_fd, si.sav4 (), si.salenv4 ()))
+      sockinfo si (THISNODE, PROT_UDPv4);
+
+      if (bind (udpv4_fd, si.sav4 (), si.salenv4 ()))
         {
-          slog (L_ERR, _("can't bind ipv4 socket on %s: %s"), (const char *)si, strerror (errno));
+          slog (L_ERR, _("can't bind udpv4 on %s: %s"), (const char *)si, strerror (errno));
           exit (1);
         }
 
@@ -131,15 +132,17 @@
       // fragment for me sometimes.
       {
         int oval = IP_PMTUDISC_DONT;
-        setsockopt (ipv4_fd, SOL_IP, IP_MTU_DISCOVER, &oval, sizeof oval);
+        setsockopt (udpv4_fd, SOL_IP, IP_MTU_DISCOVER, &oval, sizeof oval);
       }
 #endif
 
-      ipv4_ev_watcher.start (ipv4_fd, POLLIN);
+      udpv4_ev_watcher.start (udpv4_fd, POLLIN);
     }
 
+  tcpv4_fd = -1;
+
 #if ENABLE_TCP
-  if (THISNODE->protocols & PROT_TCPv4)
+  if (THISNODE->protocols & PROT_TCPv4 && THISNODE->tcp_port)
     {
       tcpv4_fd = socket (PF_INET, SOCK_STREAM, IPPROTO_TCP);