diff options
| author | Marc Hoersken <info@marc-hoersken.de> | 2020-03-09 17:12:35 +0100 |
|---|---|---|
| committer | Marc Hoersken <info@marc-hoersken.de> | 2020-03-10 03:55:37 +0100 |
| commit | 4d43d06143f6d6ba40d7eac95b4b7b7de5e9b0f4 (patch) | |
| tree | 3a1b9f863d9b4c992330872cde0b247c8c6e7eb6 | |
| parent | e96fe70cabcb3a5a009821dbb453dc0160ddc3f5 (diff) | |
runtests: log minimal and maximal used port numbers
| -rwxr-xr-x | tests/runtests.pl | 7 |
1 files changed, 7 insertions, 0 deletions
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: # |