diff options
Diffstat (limited to 'clients/snmpfetch.pl')
| -rwxr-xr-x | clients/snmpfetch.pl | 7 | 
1 files changed, 4 insertions, 3 deletions
diff --git a/clients/snmpfetch.pl b/clients/snmpfetch.pl index ed332a6..a13ef3f 100755 --- a/clients/snmpfetch.pl +++ b/clients/snmpfetch.pl @@ -217,21 +217,22 @@ sub callback {  	my $ok = 1;  	if (!defined($in) || $in !~ /^\d+$/) {  		if (defined($ine)) { -			warn $switch->{'sysname'}.":$port: failed reading in"; +			warn $switch->{'sysname'}.":$port: failed reading in ($ine)" . (defined($in) ? ": $in" : "");  		}  		$ok = 0;  	}  	if (!defined($out) || $out !~ /^\d+$/) {  		if (defined($oute)) { -			warn $switch->{'sysname'}.":$port: failed reading in"; +			warn $switch->{'sysname'}.":$port: failed reading out ($oute)" . (defined($out) ? ": $out" : "");  		}  		$ok = 0;  	}  	if (!defined($ifdescr)) { +		warn $switch->{'sysname'}.":$port: failed reading ifdescr";  		$ok = 0;  	} elsif ($ifdescr =~ m/\./) {  		# Skip virtual ports -		$ok =0; +		$ok = 0;  	}  	if ($ok) {  | 
