From 372a20962b00cf3974e8530eb3ee981df11caba4 Mon Sep 17 00:00:00 2001 From: Tobias Oetiker Date: Fri, 6 Jul 2012 09:06:30 +0200 Subject: respect the probe timeout -- Dmitry Melekhov --- lib/Smokeping/probes/TelnetIOSPing.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'lib/Smokeping') diff --git a/lib/Smokeping/probes/TelnetIOSPing.pm b/lib/Smokeping/probes/TelnetIOSPing.pm index 3b78581..7fe9dff 100644 --- a/lib/Smokeping/probes/TelnetIOSPing.pm +++ b/lib/Smokeping/probes/TelnetIOSPing.pm @@ -137,13 +137,14 @@ sub pingone ($$){ my $pssword = $target->{vars}{iospass}; my $bytes = $self->{properties}{packetsize}; my $pings = $self->pings($target); + my $timeout = $self->{properties}{timeout}; # do NOT call superclass ... the ping method MUST be overwriten my %upd; my @args = (); - my $telnet = Net::Telnet->new(); + my $telnet = Net::Telnet->new( Timeout => $timeout ); # These are for debugging # $telnet->errmode("TIPreturn"); # $telnet->input_log("TIPinlog"); -- cgit v1.2.3-24-g4f1b