summaryrefslogtreecommitdiffstats
path: root/util/TLSProxy/Proxy.pm
diff options
context:
space:
mode:
Diffstat (limited to 'util/TLSProxy/Proxy.pm')
-rw-r--r--util/TLSProxy/Proxy.pm11
1 files changed, 11 insertions, 0 deletions
diff --git a/util/TLSProxy/Proxy.pm b/util/TLSProxy/Proxy.pm
index 65615891f8..84ca3a7510 100644
--- a/util/TLSProxy/Proxy.pm
+++ b/util/TLSProxy/Proxy.pm
@@ -25,6 +25,7 @@ my $have_IPv6 = 0;
my $IP_factory;
my $is_tls13 = 0;
+my $ciphersuite = undef;
sub new
{
@@ -108,6 +109,7 @@ sub clearClient
$self->{message_list} = [];
$self->{clientflags} = "";
$is_tls13 = 0;
+ $ciphersuite = undef;
TLSProxy::Message->clear();
TLSProxy::Record->clear();
@@ -535,4 +537,13 @@ sub reneg
return $self->{reneg};
}
+sub ciphersuite
+{
+ my $class = shift;
+ if (@_) {
+ $ciphersuite = shift;
+ }
+ return $ciphersuite;
+}
+
1;