Code

Added workaround for some ipv6 setups.
authorjanw <janw@594d385d-05f5-0310-b6e9-bd551577e9d8>
Mon, 28 Jan 2008 08:52:17 +0000 (08:52 +0000)
committerjanw <janw@594d385d-05f5-0310-b6e9-bd551577e9d8>
Mon, 28 Jan 2008 08:52:17 +0000 (08:52 +0000)
Commented open_socket - don't need this anymore on server side.

git-svn-id: https://oss.gonicus.de/repositories/gosa/trunk@8615 594d385d-05f5-0310-b6e9-bd551577e9d8

gosa-si/modules/ArpHandler.pm
gosa-si/modules/GosaPackages.pm
gosa-si/modules/GosaSupportDaemon.pm

index 7eb08205dee828165842d0937050dc001e788f6e..63ccb1df872cb8adc57106836b49432abd1ebecc 100644 (file)
@@ -44,6 +44,10 @@ sub get_module_info {
        # When interface is not configured (or 'all'), start arpwatch on all possible interfaces
        if ((!defined($interface)) || $interface eq 'all') {
                foreach my $device(&get_interfaces) {
+                       # TODO: Need a better workaround for IPv4-to-IPv6 bridges
+                       if($device =~ m/^sit.$/) {
+                               next;
+                       }
 
                        # If device has a valid mac address
                        if(not(&get_mac($device) eq "00:00:00:00:00:00")) {
index bf11e8e5ac4b7d7eaa7467e73fdf35ffa172ccab..d8942c9e6b1c629b1b3e714134a981d19ed8631d 100644 (file)
@@ -234,23 +234,23 @@ sub get_ip {
 #      RETURNS:  socket IO::Socket::INET
 #  DESCRIPTION:  open a socket to PeerAddr
 #===============================================================================
-sub open_socket {
-    my ($PeerAddr, $PeerPort) = @_ ;
-    if(defined($PeerPort)){
-        $PeerAddr = $PeerAddr.":".$PeerPort;
-    }
-    my $socket;
-    $socket = new IO::Socket::INET(PeerAddr => $PeerAddr ,
-            Porto => "tcp" ,
-            Type => SOCK_STREAM,
-            Timeout => 5,
-            );
-    if(not defined $socket) {
-        return;
-    }
-    &main::daemon_log("open_socket to: $PeerAddr", 7);
-    return $socket;
-}
+#sub open_socket {
+#    my ($PeerAddr, $PeerPort) = @_ ;
+#    if(defined($PeerPort)){
+#        $PeerAddr = $PeerAddr.":".$PeerPort;
+#    }
+#    my $socket;
+#    $socket = new IO::Socket::INET(PeerAddr => $PeerAddr ,
+#            Porto => "tcp" ,
+#            Type => SOCK_STREAM,
+#            Timeout => 5,
+#            );
+#    if(not defined $socket) {
+#        return;
+#    }
+#    &main::daemon_log("open_socket to: $PeerAddr", 7);
+#    return $socket;
+#}
 
 
 #===  FUNCTION  ================================================================
index 496ce8d4edb0d015cff3f794aef0bd5473bdfec4..1409411ba735f0d425dbd5a9bd9a4c6fda22092e 100644 (file)
@@ -254,23 +254,23 @@ sub create_ciphering {
 #      RETURNS:  socket IO::Socket::INET
 #  DESCRIPTION:  open a socket to PeerAddr
 #===============================================================================
-sub open_socket {
-    my ($PeerAddr, $PeerPort) = @_ ;
-    if(defined($PeerPort)){
-        $PeerAddr = $PeerAddr.":".$PeerPort;
-    }
-    my $socket;
-    $socket = new IO::Socket::INET(PeerAddr => $PeerAddr,
-            Porto => "tcp",
-            Type => SOCK_STREAM,
-            Timeout => 5,
-            );
-    if(not defined $socket) {
-        return;
-    }
-    &daemon_log("open_socket: $PeerAddr", 7);
-    return $socket;
-}
+#sub open_socket {
+#    my ($PeerAddr, $PeerPort) = @_ ;
+#    if(defined($PeerPort)){
+#        $PeerAddr = $PeerAddr.":".$PeerPort;
+#    }
+#    my $socket;
+#    $socket = new IO::Socket::INET(PeerAddr => $PeerAddr,
+#            Porto => "tcp",
+#            Type => SOCK_STREAM,
+#            Timeout => 5,
+#            );
+#    if(not defined $socket) {
+#        return;
+#    }
+#    &daemon_log("open_socket: $PeerAddr", 7);
+#    return $socket;
+#}
 
 
 sub get_time {