delete out commented lines

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

diff --git a/gosa-si/gosa-si-server b/gosa-si/gosa-si-server
index 9f54c0088c3dfa36df4be20cf109e9b5bad5f549..d4361aad2513db83618d8b2de66c320cf4a9f9b8 100755 (executable)
--- a/gosa-si/gosa-si-server
+++ b/gosa-si/gosa-si-server
@@ -868,48 +868,6 @@ sub open_socket {
 }
 
 
-#sub get_local_ip_for_remote_ip {
-#      my $remote_ip= shift;
-#      my $result="0.0.0.0";
-#
-#      if($remote_ip =~ /^(\d\d?\d?\.){3}\d\d?\d?$/) {
-#              if($remote_ip eq "127.0.0.1") {
-#                      $result = "127.0.0.1";
-#              } else {
-#                      my $PROC_NET_ROUTE= ('/proc/net/route');
-#
-#                      open(PROC_NET_ROUTE, "<$PROC_NET_ROUTE")
-#                              or die "Could not open $PROC_NET_ROUTE";
-#
-#                      my @ifs = <PROC_NET_ROUTE>;
-#
-#                      close(PROC_NET_ROUTE);
-#
-#                      # Eat header line
-#                      shift @ifs;
-#                      chomp @ifs;
-#                      foreach my $line(@ifs) {
-#                              my ($Iface,$Destination,$Gateway,$Flags,$RefCnt,$Use,$Metric,$Mask,$MTU,$Window,$IRTT)=split(/\s/, $line);
-#                              my $destination;
-#                              my $mask;
-#                              my ($d,$c,$b,$a)=unpack('a2 a2 a2 a2', $Destination);
-#                              $destination= sprintf("%d.%d.%d.%d", hex($a), hex($b), hex($c), hex($d));
-#                              ($d,$c,$b,$a)=unpack('a2 a2 a2 a2', $Mask);
-#                              $mask= sprintf("%d.%d.%d.%d", hex($a), hex($b), hex($c), hex($d));
-#                              if(new NetAddr::IP($remote_ip)->within(new NetAddr::IP($destination, $mask))) {
-#                                      # destination matches route, save mac and exit
-#                                      $result= &get_ip($Iface);
-#                                      last;
-#                              }
-#                      }
-#              }
-#      } else {
-#              daemon_log("0 WARNING: get_local_ip_for_remote_ip() was called with a non-ip parameter: '$remote_ip'", 1);
-#      }
-#      return $result;
-#}
-
-
 sub send_msg_to_target {
     my ($msg, $address, $encrypt_key, $msg_header, $session_id) = @_ ;
     my $error = 0;