From 18a5d236f999c0474bb14324569ce200c7b7a7bf Mon Sep 17 00:00:00 2001
From: Richard Fuchs <rfuchs@sipwise.com>
Date: Mon, 23 Jan 2023 08:48:01 -0500
Subject: [PATCH] MT#55283 prevent tests getting stuck

Don't wait forever for a response from the daemon. Prevents tests
getting stuck in case of broken code.

Change-Id: I83dde4c2d626928fdfb0486e7fb4780e239c83e9
---
 perl/NGCP/Rtpengine/AutoTest.pm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/perl/NGCP/Rtpengine/AutoTest.pm b/perl/NGCP/Rtpengine/AutoTest.pm
index 6d1bb6664..a404f5e4b 100644
--- a/perl/NGCP/Rtpengine/AutoTest.pm
+++ b/perl/NGCP/Rtpengine/AutoTest.pm
@@ -113,7 +113,9 @@ sub rtpe_req {
 	my ($cmd, $name, $req) = @_;
 	$req->{command} = $cmd;
 	$req->{'call-id'} = $cid;
+	alarm(3);
 	my $resp = $c->req($req);
+	alarm(0);
 	is $resp->{result}, 'ok', "$name - '$cmd' status";
 	return $resp;
 }