summaryrefslogtreecommitdiffstats
path: root/util
diff options
context:
space:
mode:
authorRichard Levitte <levitte@openssl.org>2017-04-28 09:20:05 +0200
committerRichard Levitte <levitte@openssl.org>2017-04-28 15:00:43 +0200
commitaf50d454f9914a7c5864832087ea73caff1b4aae (patch)
tree3033cca576fdca70a149d3ed753814611d64a40b /util
parent4fc3523f9e00c9ffc1a7c674487ac2efd5e6af43 (diff)
TLSProxy: When in debug mode, show the exact subprocess commands
When you want to debug a test that goes wrong, it's useful to know exactly what subprocess commands are run. Reviewed-by: Andy Polyakov <appro@openssl.org> Reviewed-by: Rich Salz <rsalz@openssl.org> (Merged from https://github.com/openssl/openssl/pull/3342) (cherry picked from commit 46d5e2b42e00ec392bf3326743519bc25136db09)
Diffstat (limited to 'util')
-rw-r--r--util/TLSProxy/Proxy.pm6
1 files changed, 6 insertions, 0 deletions
diff --git a/util/TLSProxy/Proxy.pm b/util/TLSProxy/Proxy.pm
index d025075b5a..bdb2cd8b5c 100644
--- a/util/TLSProxy/Proxy.pm
+++ b/util/TLSProxy/Proxy.pm
@@ -159,6 +159,9 @@ sub start
if ($self->serverflags ne "") {
$execcmd .= " ".$self->serverflags;
}
+ if ($self->debug) {
+ print STDERR "Server command: $execcmd\n";
+ }
exec($execcmd);
}
$self->serverpid($pid);
@@ -217,6 +220,9 @@ sub clientstart
if ($self->clientflags ne "") {
$execcmd .= " ".$self->clientflags;
}
+ if ($self->debug) {
+ print STDERR "Client command: $execcmd\n";
+ }
exec($execcmd);
}
}