From 25bbf036015a103f8b827f8b4bf9d3fbbcb7c7ca Mon Sep 17 00:00:00 2001 From: Lucian Balaceanu Date: Fri, 27 May 2016 16:55:39 +0300 Subject: [PATCH] Set timeout of 3s for send/receive socket operations --- utils/rtpengine-ctl | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/utils/rtpengine-ctl b/utils/rtpengine-ctl index 5c7b0bfcf..62d5a5511 100755 --- a/utils/rtpengine-ctl +++ b/utils/rtpengine-ctl @@ -38,7 +38,11 @@ my $socket = new IO::Socket::INET ( Proto => 'tcp', ); die "Cannot connect to the rtpengine $!\n" unless $socket; - + +#set send/recv timeout so script doesn't hang when rtpengine doesn't interact +setsockopt($socket, SOL_SOCKET, SO_SNDTIMEO, pack('L!L!', 3, 0) ) or die $!; +setsockopt($socket, SOL_SOCKET, SO_RCVTIMEO, pack('L!L!', 3, 0) ) or die $!; + $argumentstring = trim($argumentstring); my $size = $socket->send($argumentstring);