提交 96153874 编写于 作者: M Matt Caswell

Fix various indentation

The indentation was a bit off in some of the perl files following the
extensions refactor.

Perl changes reviewed by Richard Levitte. Non-perl changes reviewed by Rich
Salz
Reviewed-by: NRich Salz <rsalz@openssl.org>
Reviewed-by: NRichard Levitte <levitte@openssl.org>
上级 1e566129
...@@ -163,9 +163,9 @@ $proxy->clear(); ...@@ -163,9 +163,9 @@ $proxy->clear();
$proxy->clientflags("-no_tls1_3 -status"); $proxy->clientflags("-no_tls1_3 -status");
$proxy->start(); $proxy->start();
checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE, checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE,
checkhandshake::DEFAULT_EXTENSIONS checkhandshake::DEFAULT_EXTENSIONS
| checkhandshake::STATUS_REQUEST_CLI_EXTENSION, | checkhandshake::STATUS_REQUEST_CLI_EXTENSION,
"status_request handshake test (client)"); "status_request handshake test (client)");
#Test 4: A status_request handshake (server support only) #Test 4: A status_request handshake (server support only)
$proxy->clear(); $proxy->clear();
...@@ -175,7 +175,7 @@ $proxy->serverflags("-status_file " ...@@ -175,7 +175,7 @@ $proxy->serverflags("-status_file "
$proxy->start(); $proxy->start();
checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE, checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE,
checkhandshake::DEFAULT_EXTENSIONS, checkhandshake::DEFAULT_EXTENSIONS,
"status_request handshake test (server)"); "status_request handshake test (server)");
#Test 5: A status_request handshake (client and server) #Test 5: A status_request handshake (client and server)
$proxy->clear(); $proxy->clear();
...@@ -184,10 +184,10 @@ $proxy->serverflags("-status_file " ...@@ -184,10 +184,10 @@ $proxy->serverflags("-status_file "
.srctop_file("test", "recipes", "ocsp-response.der")); .srctop_file("test", "recipes", "ocsp-response.der"));
$proxy->start(); $proxy->start();
checkhandshake($proxy, checkhandshake::OCSP_HANDSHAKE, checkhandshake($proxy, checkhandshake::OCSP_HANDSHAKE,
checkhandshake::DEFAULT_EXTENSIONS checkhandshake::DEFAULT_EXTENSIONS
| checkhandshake::STATUS_REQUEST_CLI_EXTENSION | checkhandshake::STATUS_REQUEST_CLI_EXTENSION
| checkhandshake::STATUS_REQUEST_SRV_EXTENSION, | checkhandshake::STATUS_REQUEST_SRV_EXTENSION,
"status_request handshake test"); "status_request handshake test");
#Test 6: A client auth handshake #Test 6: A client auth handshake
$proxy->clear(); $proxy->clear();
...@@ -214,7 +214,7 @@ $proxy->start(); ...@@ -214,7 +214,7 @@ $proxy->start();
checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE, checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE,
checkhandshake::DEFAULT_EXTENSIONS checkhandshake::DEFAULT_EXTENSIONS
| checkhandshake::SERVER_NAME_CLI_EXTENSION, | checkhandshake::SERVER_NAME_CLI_EXTENSION,
"Server name handshake test (client)"); "Server name handshake test (client)");
#Test 9: Server name handshake (server support only) #Test 9: Server name handshake (server support only)
$proxy->clear(); $proxy->clear();
...@@ -223,7 +223,7 @@ $proxy->serverflags("-servername testhost"); ...@@ -223,7 +223,7 @@ $proxy->serverflags("-servername testhost");
$proxy->start(); $proxy->start();
checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE, checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE,
checkhandshake::DEFAULT_EXTENSIONS, checkhandshake::DEFAULT_EXTENSIONS,
"Server name handshake test (server)"); "Server name handshake test (server)");
#Test 10: Server name handshake (client and server) #Test 10: Server name handshake (client and server)
$proxy->clear(); $proxy->clear();
...@@ -231,10 +231,10 @@ $proxy->clientflags("-no_tls1_3 -servername testhost"); ...@@ -231,10 +231,10 @@ $proxy->clientflags("-no_tls1_3 -servername testhost");
$proxy->serverflags("-servername testhost"); $proxy->serverflags("-servername testhost");
$proxy->start(); $proxy->start();
checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE, checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE,
checkhandshake::DEFAULT_EXTENSIONS checkhandshake::DEFAULT_EXTENSIONS
| checkhandshake::SERVER_NAME_CLI_EXTENSION | checkhandshake::SERVER_NAME_CLI_EXTENSION
| checkhandshake::SERVER_NAME_SRV_EXTENSION, | checkhandshake::SERVER_NAME_SRV_EXTENSION,
"Server name handshake test"); "Server name handshake test");
#Test 11: ALPN handshake (client request only) #Test 11: ALPN handshake (client request only)
$proxy->clear(); $proxy->clear();
...@@ -243,7 +243,7 @@ $proxy->start(); ...@@ -243,7 +243,7 @@ $proxy->start();
checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE, checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE,
checkhandshake::DEFAULT_EXTENSIONS checkhandshake::DEFAULT_EXTENSIONS
| checkhandshake::ALPN_CLI_EXTENSION, | checkhandshake::ALPN_CLI_EXTENSION,
"ALPN handshake test (client)"); "ALPN handshake test (client)");
#Test 12: ALPN handshake (server support only) #Test 12: ALPN handshake (server support only)
$proxy->clear(); $proxy->clear();
...@@ -252,7 +252,7 @@ $proxy->serverflags("-alpn test"); ...@@ -252,7 +252,7 @@ $proxy->serverflags("-alpn test");
$proxy->start(); $proxy->start();
checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE, checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE,
checkhandshake::DEFAULT_EXTENSIONS, checkhandshake::DEFAULT_EXTENSIONS,
"ALPN handshake test (server)"); "ALPN handshake test (server)");
#Test 13: ALPN handshake (client and server) #Test 13: ALPN handshake (client and server)
$proxy->clear(); $proxy->clear();
...@@ -260,10 +260,10 @@ $proxy->clientflags("-no_tls1_3 -alpn test"); ...@@ -260,10 +260,10 @@ $proxy->clientflags("-no_tls1_3 -alpn test");
$proxy->serverflags("-alpn test"); $proxy->serverflags("-alpn test");
$proxy->start(); $proxy->start();
checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE, checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE,
checkhandshake::DEFAULT_EXTENSIONS checkhandshake::DEFAULT_EXTENSIONS
| checkhandshake::ALPN_CLI_EXTENSION | checkhandshake::ALPN_CLI_EXTENSION
| checkhandshake::ALPN_SRV_EXTENSION, | checkhandshake::ALPN_SRV_EXTENSION,
"ALPN handshake test"); "ALPN handshake test");
#Test 14: SCT handshake (client request only) #Test 14: SCT handshake (client request only)
$proxy->clear(); $proxy->clear();
...@@ -273,11 +273,11 @@ $proxy->serverflags("-status_file " ...@@ -273,11 +273,11 @@ $proxy->serverflags("-status_file "
.srctop_file("test", "recipes", "ocsp-response.der")); .srctop_file("test", "recipes", "ocsp-response.der"));
$proxy->start(); $proxy->start();
checkhandshake($proxy, checkhandshake::OCSP_HANDSHAKE, checkhandshake($proxy, checkhandshake::OCSP_HANDSHAKE,
checkhandshake::DEFAULT_EXTENSIONS checkhandshake::DEFAULT_EXTENSIONS
| checkhandshake::SCT_CLI_EXTENSION | checkhandshake::SCT_CLI_EXTENSION
| checkhandshake::STATUS_REQUEST_CLI_EXTENSION | checkhandshake::STATUS_REQUEST_CLI_EXTENSION
| checkhandshake::STATUS_REQUEST_SRV_EXTENSION, | checkhandshake::STATUS_REQUEST_SRV_EXTENSION,
"SCT handshake test (client)"); "SCT handshake test (client)");
#Test 15: SCT handshake (server support only) #Test 15: SCT handshake (server support only)
$proxy->clear(); $proxy->clear();
...@@ -287,8 +287,8 @@ $proxy->serverflags("-status_file " ...@@ -287,8 +287,8 @@ $proxy->serverflags("-status_file "
.srctop_file("test", "recipes", "ocsp-response.der")); .srctop_file("test", "recipes", "ocsp-response.der"));
$proxy->start(); $proxy->start();
checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE, checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE,
checkhandshake::DEFAULT_EXTENSIONS, checkhandshake::DEFAULT_EXTENSIONS,
"SCT handshake test (server)"); "SCT handshake test (server)");
#Test 16: SCT handshake (client and server) #Test 16: SCT handshake (client and server)
#There is no built-in server side support for this so we are actually also #There is no built-in server side support for this so we are actually also
...@@ -301,12 +301,12 @@ $proxy->serverflags("-status_file " ...@@ -301,12 +301,12 @@ $proxy->serverflags("-status_file "
." -serverinfo ".srctop_file("test", "serverinfo.pem")); ." -serverinfo ".srctop_file("test", "serverinfo.pem"));
$proxy->start(); $proxy->start();
checkhandshake($proxy, checkhandshake::OCSP_HANDSHAKE, checkhandshake($proxy, checkhandshake::OCSP_HANDSHAKE,
checkhandshake::DEFAULT_EXTENSIONS checkhandshake::DEFAULT_EXTENSIONS
| checkhandshake::SCT_CLI_EXTENSION | checkhandshake::SCT_CLI_EXTENSION
| checkhandshake::SCT_SRV_EXTENSION | checkhandshake::SCT_SRV_EXTENSION
| checkhandshake::STATUS_REQUEST_CLI_EXTENSION | checkhandshake::STATUS_REQUEST_CLI_EXTENSION
| checkhandshake::STATUS_REQUEST_SRV_EXTENSION, | checkhandshake::STATUS_REQUEST_SRV_EXTENSION,
"SCT handshake test"); "SCT handshake test");
#Test 17: NPN handshake (client request only) #Test 17: NPN handshake (client request only)
...@@ -333,10 +333,10 @@ $proxy->clientflags("-no_tls1_3 -nextprotoneg test"); ...@@ -333,10 +333,10 @@ $proxy->clientflags("-no_tls1_3 -nextprotoneg test");
$proxy->serverflags("-nextprotoneg test"); $proxy->serverflags("-nextprotoneg test");
$proxy->start(); $proxy->start();
checkhandshake($proxy, checkhandshake::NPN_HANDSHAKE, checkhandshake($proxy, checkhandshake::NPN_HANDSHAKE,
checkhandshake::DEFAULT_EXTENSIONS checkhandshake::DEFAULT_EXTENSIONS
| checkhandshake::NPN_CLI_EXTENSION | checkhandshake::NPN_CLI_EXTENSION
| checkhandshake::NPN_SRV_EXTENSION, | checkhandshake::NPN_SRV_EXTENSION,
"NPN handshake test"); "NPN handshake test");
#Test 20: SRP extension #Test 20: SRP extension
#Note: We are not actually going to perform an SRP handshake (TLSProxy does not #Note: We are not actually going to perform an SRP handshake (TLSProxy does not
...@@ -347,6 +347,6 @@ $proxy->clear(); ...@@ -347,6 +347,6 @@ $proxy->clear();
$proxy->clientflags("-no_tls1_3 -srpuser user -srppass pass:pass"); $proxy->clientflags("-no_tls1_3 -srpuser user -srppass pass:pass");
$proxy->start(); $proxy->start();
checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE, checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE,
checkhandshake::DEFAULT_EXTENSIONS checkhandshake::DEFAULT_EXTENSIONS
| checkhandshake::SRP_CLI_EXTENSION, | checkhandshake::SRP_CLI_EXTENSION,
"SRP extension test"); "SRP extension test");
...@@ -124,9 +124,9 @@ $proxy->clear(); ...@@ -124,9 +124,9 @@ $proxy->clear();
$proxy->clientflags("-status"); $proxy->clientflags("-status");
$proxy->start(); $proxy->start();
checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE, checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE,
checkhandshake::DEFAULT_EXTENSIONS checkhandshake::DEFAULT_EXTENSIONS
| checkhandshake::STATUS_REQUEST_CLI_EXTENSION, | checkhandshake::STATUS_REQUEST_CLI_EXTENSION,
"status_request handshake test (client)"); "status_request handshake test (client)");
#Test 4: A status_request handshake (server support only) #Test 4: A status_request handshake (server support only)
$proxy->clear(); $proxy->clear();
...@@ -135,7 +135,7 @@ $proxy->serverflags("-status_file " ...@@ -135,7 +135,7 @@ $proxy->serverflags("-status_file "
$proxy->start(); $proxy->start();
checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE, checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE,
checkhandshake::DEFAULT_EXTENSIONS, checkhandshake::DEFAULT_EXTENSIONS,
"status_request handshake test (server)"); "status_request handshake test (server)");
#Test 5: A status_request handshake (client and server) #Test 5: A status_request handshake (client and server)
#TODO(TLS1.3): TLS1.3 doesn't actually have CertificateStatus messages. This is #TODO(TLS1.3): TLS1.3 doesn't actually have CertificateStatus messages. This is
...@@ -147,10 +147,10 @@ $proxy->serverflags("-status_file " ...@@ -147,10 +147,10 @@ $proxy->serverflags("-status_file "
.srctop_file("test", "recipes", "ocsp-response.der")); .srctop_file("test", "recipes", "ocsp-response.der"));
$proxy->start(); $proxy->start();
checkhandshake($proxy, checkhandshake::OCSP_HANDSHAKE, checkhandshake($proxy, checkhandshake::OCSP_HANDSHAKE,
checkhandshake::DEFAULT_EXTENSIONS checkhandshake::DEFAULT_EXTENSIONS
| checkhandshake::STATUS_REQUEST_CLI_EXTENSION | checkhandshake::STATUS_REQUEST_CLI_EXTENSION
| checkhandshake::STATUS_REQUEST_SRV_EXTENSION, | checkhandshake::STATUS_REQUEST_SRV_EXTENSION,
"status_request handshake test"); "status_request handshake test");
#Test 6: A client auth handshake #Test 6: A client auth handshake
$proxy->clear(); $proxy->clear();
...@@ -159,7 +159,7 @@ $proxy->serverflags("-Verify 5"); ...@@ -159,7 +159,7 @@ $proxy->serverflags("-Verify 5");
$proxy->start(); $proxy->start();
checkhandshake($proxy, checkhandshake::CLIENT_AUTH_HANDSHAKE, checkhandshake($proxy, checkhandshake::CLIENT_AUTH_HANDSHAKE,
checkhandshake::DEFAULT_EXTENSIONS, checkhandshake::DEFAULT_EXTENSIONS,
"Client auth handshake test"); "Client auth handshake test");
#Test 7: Server name handshake (client request only) #Test 7: Server name handshake (client request only)
$proxy->clear(); $proxy->clear();
...@@ -168,7 +168,7 @@ $proxy->start(); ...@@ -168,7 +168,7 @@ $proxy->start();
checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE, checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE,
checkhandshake::DEFAULT_EXTENSIONS checkhandshake::DEFAULT_EXTENSIONS
| checkhandshake::SERVER_NAME_CLI_EXTENSION, | checkhandshake::SERVER_NAME_CLI_EXTENSION,
"Server name handshake test (client)"); "Server name handshake test (client)");
#Test 8: Server name handshake (server support only) #Test 8: Server name handshake (server support only)
$proxy->clear(); $proxy->clear();
...@@ -176,7 +176,7 @@ $proxy->serverflags("-servername testhost"); ...@@ -176,7 +176,7 @@ $proxy->serverflags("-servername testhost");
$proxy->start(); $proxy->start();
checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE, checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE,
checkhandshake::DEFAULT_EXTENSIONS, checkhandshake::DEFAULT_EXTENSIONS,
"Server name handshake test (server)"); "Server name handshake test (server)");
#Test 9: Server name handshake (client and server) #Test 9: Server name handshake (client and server)
$proxy->clear(); $proxy->clear();
...@@ -184,10 +184,10 @@ $proxy->clientflags("-servername testhost"); ...@@ -184,10 +184,10 @@ $proxy->clientflags("-servername testhost");
$proxy->serverflags("-servername testhost"); $proxy->serverflags("-servername testhost");
$proxy->start(); $proxy->start();
checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE, checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE,
checkhandshake::DEFAULT_EXTENSIONS checkhandshake::DEFAULT_EXTENSIONS
| checkhandshake::SERVER_NAME_CLI_EXTENSION | checkhandshake::SERVER_NAME_CLI_EXTENSION
| checkhandshake::SERVER_NAME_SRV_EXTENSION, | checkhandshake::SERVER_NAME_SRV_EXTENSION,
"Server name handshake test"); "Server name handshake test");
#Test 10: ALPN handshake (client request only) #Test 10: ALPN handshake (client request only)
$proxy->clear(); $proxy->clear();
...@@ -196,7 +196,7 @@ $proxy->start(); ...@@ -196,7 +196,7 @@ $proxy->start();
checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE, checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE,
checkhandshake::DEFAULT_EXTENSIONS checkhandshake::DEFAULT_EXTENSIONS
| checkhandshake::ALPN_CLI_EXTENSION, | checkhandshake::ALPN_CLI_EXTENSION,
"ALPN handshake test (client)"); "ALPN handshake test (client)");
#Test 11: ALPN handshake (server support only) #Test 11: ALPN handshake (server support only)
$proxy->clear(); $proxy->clear();
...@@ -204,7 +204,7 @@ $proxy->serverflags("-alpn test"); ...@@ -204,7 +204,7 @@ $proxy->serverflags("-alpn test");
$proxy->start(); $proxy->start();
checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE, checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE,
checkhandshake::DEFAULT_EXTENSIONS, checkhandshake::DEFAULT_EXTENSIONS,
"ALPN handshake test (server)"); "ALPN handshake test (server)");
#Test 12: ALPN handshake (client and server) #Test 12: ALPN handshake (client and server)
$proxy->clear(); $proxy->clear();
...@@ -212,10 +212,10 @@ $proxy->clientflags("-alpn test"); ...@@ -212,10 +212,10 @@ $proxy->clientflags("-alpn test");
$proxy->serverflags("-alpn test"); $proxy->serverflags("-alpn test");
$proxy->start(); $proxy->start();
checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE, checkhandshake($proxy, checkhandshake::DEFAULT_HANDSHAKE,
checkhandshake::DEFAULT_EXTENSIONS checkhandshake::DEFAULT_EXTENSIONS
| checkhandshake::ALPN_CLI_EXTENSION | checkhandshake::ALPN_CLI_EXTENSION
| checkhandshake::ALPN_SRV_EXTENSION, | checkhandshake::ALPN_SRV_EXTENSION,
"ALPN handshake test"); "ALPN handshake test");
#Test 13: SCT handshake (client request only) #Test 13: SCT handshake (client request only)
#TODO(TLS1.3): This only checks that the client side extension appears. The #TODO(TLS1.3): This only checks that the client side extension appears. The
...@@ -231,8 +231,8 @@ $proxy->serverflags("-status_file " ...@@ -231,8 +231,8 @@ $proxy->serverflags("-status_file "
.srctop_file("test", "recipes", "ocsp-response.der")); .srctop_file("test", "recipes", "ocsp-response.der"));
$proxy->start(); $proxy->start();
checkhandshake($proxy, checkhandshake::OCSP_HANDSHAKE, checkhandshake($proxy, checkhandshake::OCSP_HANDSHAKE,
checkhandshake::DEFAULT_EXTENSIONS checkhandshake::DEFAULT_EXTENSIONS
| checkhandshake::SCT_CLI_EXTENSION | checkhandshake::SCT_CLI_EXTENSION
| checkhandshake::STATUS_REQUEST_CLI_EXTENSION | checkhandshake::STATUS_REQUEST_CLI_EXTENSION
| checkhandshake::STATUS_REQUEST_SRV_EXTENSION, | checkhandshake::STATUS_REQUEST_SRV_EXTENSION,
"SCT handshake test"); "SCT handshake test");
...@@ -82,9 +82,9 @@ sub set_message_contents ...@@ -82,9 +82,9 @@ sub set_message_contents
$extensions .= pack("n", length($extdata)); $extensions .= pack("n", length($extdata));
$extensions .= $extdata; $extensions .= $extdata;
if ($key == TLSProxy::Message::EXT_DUPLICATE_EXTENSION) { if ($key == TLSProxy::Message::EXT_DUPLICATE_EXTENSION) {
$extensions .= pack("n", $key); $extensions .= pack("n", $key);
$extensions .= pack("n", length($extdata)); $extensions .= pack("n", length($extdata));
$extensions .= $extdata; $extensions .= $extdata;
} }
} }
...@@ -98,7 +98,7 @@ sub extension_data ...@@ -98,7 +98,7 @@ sub extension_data
{ {
my $self = shift; my $self = shift;
if (@_) { if (@_) {
$self->{extension_data} = shift; $self->{extension_data} = shift;
} }
return $self->{extension_data}; return $self->{extension_data};
} }
......
...@@ -410,7 +410,7 @@ sub proxy_addr ...@@ -410,7 +410,7 @@ sub proxy_addr
{ {
my $self = shift; my $self = shift;
if (@_) { if (@_) {
$self->{proxy_addr} = shift; $self->{proxy_addr} = shift;
} }
return $self->{proxy_addr}; return $self->{proxy_addr};
} }
...@@ -418,7 +418,7 @@ sub proxy_port ...@@ -418,7 +418,7 @@ sub proxy_port
{ {
my $self = shift; my $self = shift;
if (@_) { if (@_) {
$self->{proxy_port} = shift; $self->{proxy_port} = shift;
} }
return $self->{proxy_port}; return $self->{proxy_port};
} }
...@@ -426,7 +426,7 @@ sub server_addr ...@@ -426,7 +426,7 @@ sub server_addr
{ {
my $self = shift; my $self = shift;
if (@_) { if (@_) {
$self->{server_addr} = shift; $self->{server_addr} = shift;
} }
return $self->{server_addr}; return $self->{server_addr};
} }
...@@ -434,7 +434,7 @@ sub server_port ...@@ -434,7 +434,7 @@ sub server_port
{ {
my $self = shift; my $self = shift;
if (@_) { if (@_) {
$self->{server_port} = shift; $self->{server_port} = shift;
} }
return $self->{server_port}; return $self->{server_port};
} }
...@@ -442,7 +442,7 @@ sub filter ...@@ -442,7 +442,7 @@ sub filter
{ {
my $self = shift; my $self = shift;
if (@_) { if (@_) {
$self->{filter} = shift; $self->{filter} = shift;
} }
return $self->{filter}; return $self->{filter};
} }
...@@ -450,7 +450,7 @@ sub cipherc ...@@ -450,7 +450,7 @@ sub cipherc
{ {
my $self = shift; my $self = shift;
if (@_) { if (@_) {
$self->{cipherc} = shift; $self->{cipherc} = shift;
} }
return $self->{cipherc}; return $self->{cipherc};
} }
...@@ -458,7 +458,7 @@ sub ciphers ...@@ -458,7 +458,7 @@ sub ciphers
{ {
my $self = shift; my $self = shift;
if (@_) { if (@_) {
$self->{ciphers} = shift; $self->{ciphers} = shift;
} }
return $self->{ciphers}; return $self->{ciphers};
} }
...@@ -466,7 +466,7 @@ sub serverflags ...@@ -466,7 +466,7 @@ sub serverflags
{ {
my $self = shift; my $self = shift;
if (@_) { if (@_) {
$self->{serverflags} = shift; $self->{serverflags} = shift;
} }
return $self->{serverflags}; return $self->{serverflags};
} }
...@@ -474,7 +474,7 @@ sub clientflags ...@@ -474,7 +474,7 @@ sub clientflags
{ {
my $self = shift; my $self = shift;
if (@_) { if (@_) {
$self->{clientflags} = shift; $self->{clientflags} = shift;
} }
return $self->{clientflags}; return $self->{clientflags};
} }
...@@ -482,7 +482,7 @@ sub serverconnects ...@@ -482,7 +482,7 @@ sub serverconnects
{ {
my $self = shift; my $self = shift;
if (@_) { if (@_) {
$self->{serverconnects} = shift; $self->{serverconnects} = shift;
} }
return $self->{serverconnects}; return $self->{serverconnects};
} }
...@@ -502,7 +502,7 @@ sub serverpid ...@@ -502,7 +502,7 @@ sub serverpid
{ {
my $self = shift; my $self = shift;
if (@_) { if (@_) {
$self->{serverpid} = shift; $self->{serverpid} = shift;
} }
return $self->{serverpid}; return $self->{serverpid};
} }
...@@ -521,7 +521,7 @@ sub is_tls13 ...@@ -521,7 +521,7 @@ sub is_tls13
{ {
my $class = shift; my $class = shift;
if (@_) { if (@_) {
$is_tls13 = shift; $is_tls13 = shift;
} }
return $is_tls13; return $is_tls13;
} }
...@@ -530,7 +530,7 @@ sub reneg ...@@ -530,7 +530,7 @@ sub reneg
{ {
my $self = shift; my $self = shift;
if (@_) { if (@_) {
$self->{reneg} = shift; $self->{reneg} = shift;
} }
return $self->{reneg}; return $self->{reneg};
} }
......
Markdown is supported
0% .
You are about to add 0 people to the discussion. Proceed with caution.
先完成此消息的编辑!
想要评论请 注册