split and validate input more robustly

git-svn-id: https://nagiosplug.svn.sourceforge.net/svnroot/nagiosplug/nagiosplug/trunk@257 f882894a-f735-0410-b71e-b25c423dba1c
This commit is contained in:
Karl DeBisschop 2003-01-28 07:17:24 +00:00
parent 9452b46d95
commit dbad749293

View file

@ -30,7 +30,7 @@
# (in accordance with the plugin coding guidelines)
####################################
use Net::SNMP;
#use Net::SNMP;
use Getopt::Long;
&Getopt::Long::config('auto_abbrev');
@ -81,16 +81,19 @@ unless (defined($hostname)) {
}
if (defined($critical_vals)) {
die "Cannot Parse Critical Thresholds\n"
unless (split(/:/,$critical_vals)>=2);
($inlet_thresh,$outlet_thresh) = @_
if ($critical_vals =~ m/^([0-9]+)[,:]([0-9]+)$/) {
($inlet_thresh,$outlet_thresh) = ($1, $2);
} else {
die "Cannot Parse Critical Thresholds\n";
}
}
die unless(defined($inlet_thresh) && defined($outlet_thresh));
if (defined($warning_vals)) {
die "Cannot Parse Critical Thresholds\n"
unless (split(/:/,$warning_vals)>=2);
($inlet_warn,$outlet_warn) = @_;
if ($warning_vals =~ m/^([0-9]+)[:,]([0-9]+)$/) {
($inlet_warn,$outlet_warn) = ($1, $2);
} else {
die "Cannot Parse Warning Thresholds\n";
}
}else{
$inlet_warn=$inlet_thresh;
$outlet_warn=$outlet_thresh;