Author: fapeeler
Date: Mon Oct 21 17:33:01 2013
New Revision: 1534285

URL: http://svn.apache.org/r1534285
Log:
VCL-678

changed output flag for netstat output. While nice to see what connected on the 
open ports, it can produce a lot of unneccessary output.


Modified:
    vcl/trunk/managementnode/lib/VCL/Module/OS/Linux.pm
    vcl/trunk/managementnode/lib/VCL/Module/OS/Windows.pm

Modified: vcl/trunk/managementnode/lib/VCL/Module/OS/Linux.pm
URL: 
http://svn.apache.org/viewvc/vcl/trunk/managementnode/lib/VCL/Module/OS/Linux.pm?rev=1534285&r1=1534284&r2=1534285&view=diff
==============================================================================
--- vcl/trunk/managementnode/lib/VCL/Module/OS/Linux.pm (original)
+++ vcl/trunk/managementnode/lib/VCL/Module/OS/Linux.pm Mon Oct 21 17:33:01 2013
@@ -2984,7 +2984,7 @@ sub check_connection_on_port {
        
        my $ret_val = "no";
        my $command = "netstat -an";
-       my ($status, $output) = $self->execute($command, '', '', 1);
+       my ($status, $output) = $self->execute($command, '', '', 0);
        notify($ERRORS{'DEBUG'}, 0, "checking connections on node 
$computer_node_name on port $port");
        foreach my $line (@{$output}) {
                if ($line =~ /Connection refused|Permission denied/) {

Modified: vcl/trunk/managementnode/lib/VCL/Module/OS/Windows.pm
URL: 
http://svn.apache.org/viewvc/vcl/trunk/managementnode/lib/VCL/Module/OS/Windows.pm?rev=1534285&r1=1534284&r2=1534285&view=diff
==============================================================================
--- vcl/trunk/managementnode/lib/VCL/Module/OS/Windows.pm (original)
+++ vcl/trunk/managementnode/lib/VCL/Module/OS/Windows.pm Mon Oct 21 17:33:01 
2013
@@ -11006,7 +11006,7 @@ sub check_connection_on_port {
        
        my $ret_val = "no";
        my $command = "netstat -an";
-       my ($status, $output) = $self->execute($command, 0, 30, 1);
+       my ($status, $output) = $self->execute($command, 0, 30, 0);
        
        notify($ERRORS{'DEBUG'}, 0, "checking connections on node 
$computer_node_name on port $port");
        


Reply via email to