From 4d43d06143f6d6ba40d7eac95b4b7b7de5e9b0f4 Mon Sep 17 00:00:00 2001 From: Marc Hoersken Date: Mon, 9 Mar 2020 17:12:35 +0100 Subject: [PATCH] runtests: log minimal and maximal used port numbers --- tests/runtests.pl | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/tests/runtests.pl b/tests/runtests.pl index 905faa215..ec5462be5 100755 --- a/tests/runtests.pl +++ b/tests/runtests.pl @@ -120,6 +120,8 @@ my $CLIENTIP="127.0.0.1"; # address which curl uses for incoming connections my $CLIENT6IP="[::1]"; # address which curl uses for incoming connections my $base = 8990; # base port number +my $minport; # minimum used port number +my $maxport; # maximum used port number my $HTTPPORT; # HTTP server port my $HTTP6PORT; # HTTP IPv6 server port @@ -3031,6 +3033,7 @@ sub checksystem { $run_event_based?"event-based ":""); logmsg sprintf("%s\n", $libtool?"Libtool ":""); logmsg ("* Seed: $randseed\n"); + logmsg ("* Port range: $minport-$maxport\n"); if($verbose) { logmsg "* Ports:\n"; @@ -5324,6 +5327,8 @@ if ($gdbthis) { } } +$minport = $base; # original base port number + $HTTPPORT = $base++; # HTTP server port $HTTPSPORT = $base++; # HTTPS (stunnel) server port $FTPPORT = $base++; # FTP server port @@ -5355,6 +5360,8 @@ $SMBSPORT = $base++; # SMBS port $NEGTELNETPORT = $base++; # TELNET port with negotiation $HTTPUNIXPATH = 'http.sock'; # HTTP server Unix domain socket path +$maxport = $base-1; # updated base port number + ####################################################################### # clear and create logging directory: #