diff options
author | Richard Levitte <levitte@openssl.org> | 2017-04-28 09:20:05 +0200 |
---|---|---|
committer | Richard Levitte <levitte@openssl.org> | 2017-04-28 09:20:05 +0200 |
commit | 46d5e2b42e00ec392bf3326743519bc25136db09 (patch) | |
tree | 20a040431f0c475263ae8f607e371a7a32499b40 /util | |
parent | f2150cd74f45d49545d0787725f99723642b7c2c (diff) | |
download | openssl-46d5e2b42e00ec392bf3326743519bc25136db09.tar.gz |
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)
Diffstat (limited to 'util')
-rw-r--r-- | util/TLSProxy/Proxy.pm | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/util/TLSProxy/Proxy.pm b/util/TLSProxy/Proxy.pm index aaef753cd6..a826cb5257 100644 --- a/util/TLSProxy/Proxy.pm +++ b/util/TLSProxy/Proxy.pm @@ -171,6 +171,9 @@ sub start if ($self->serverflags ne "") { $execcmd .= " ".$self->serverflags; } + if ($self->debug) { + print STDERR "Server command: $execcmd\n"; + } exec($execcmd); } $self->serverpid($pid); @@ -232,6 +235,9 @@ sub clientstart if (defined $self->sessionfile) { $execcmd .= " -ign_eof"; } + if ($self->debug) { + print STDERR "Client command: $execcmd\n"; + } exec($execcmd); } } |