From b62cd617019e31c689eb4326591a07e9d58d31af Mon Sep 17 00:00:00 2001 From: Knut Auvor Grythe Date: Sat, 4 Apr 2015 08:12:36 +0200 Subject: Proper disconnect handling for smanagrun --- include/nms.pm | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) (limited to 'include/nms.pm') diff --git a/include/nms.pm b/include/nms.pm index e6f4d6c..c61cec7 100755 --- a/include/nms.pm +++ b/include/nms.pm @@ -148,9 +148,13 @@ sub switch_timeout { return ('Set timeout to ' . $timeout); } -sub switch_disconnect { - my ($conn) = @_; - $conn->close; +sub switch_disconnect($) { + my ($struct) = @_; + my $conn = $struct->{telnet}; + $conn->close(); + if ($struct->{pid}) { + waitpid($struct->{pid}, 0); + } } sub snmp_open_session { -- cgit v1.2.3