From: Bernd Edlinger <bernd.edlinger@hotmail.de>
Date: Tue, 21 Jan 2025 15:12:18 +0000 (+0100)
Subject: Give DTLS tests more time to complete
X-Git-Tag: openssl-3.3.3~19
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=8ff2dc8ed70c5f91e472de5f854b03b46fbaceb6;p=thirdparty%2Fopenssl.git

Give DTLS tests more time to complete

Increase the timeout for DTLS tests to 10 seconds.
But do that only for DTLS as this would waste time
for other tests, most of the TLS tests do not need
this at all.

Fixes #26491

Reviewed-by: Matt Caswell <matt@openssl.org>
Reviewed-by: Tomas Mraz <tomas@openssl.org>
(Merged from https://github.com/openssl/openssl/pull/26502)

(cherry picked from commit b999ea6bc43ef6c53d464f364b7799ac9049ddd9)
---

diff --git a/util/perl/TLSProxy/Proxy.pm b/util/perl/TLSProxy/Proxy.pm
index 8ffe8ee9ccb..e3e255de33d 100644
--- a/util/perl/TLSProxy/Proxy.pm
+++ b/util/perl/TLSProxy/Proxy.pm
@@ -293,7 +293,7 @@ sub start
     open(my $savedin, "<&STDIN");
 
     # Temporarily replace STDIN so that sink process can inherit it...
-    open(STDIN, "$^X -e 'sleep(1)' |");
+    open(STDIN, "$^X -e 'sleep(10)' |") if $self->{isdtls};
     $pid = open(STDIN, "$execcmd 2>&1 |") or die "Failed to $execcmd: $!\n";
     $self->{real_serverpid} = $pid;