提交 7ad5fb62 编写于 作者: V Viktor Dukhovni

Fix TLSProxy race by adding missing eval

Reviewed-by: NRichard Levitte <levitte@openssl.org>
上级 f2b9c257
......@@ -226,12 +226,14 @@ sub clientstart
do {
my $servaddr = $self->server_addr;
$servaddr =~ s/[\[\]]//g; # Remove [ and ]
$server_sock = $IP_factory->(
PeerAddr => $servaddr,
PeerPort => $self->server_port,
MultiHomed => 1,
Proto => 'tcp'
);
eval {
$server_sock = $IP_factory->(
PeerAddr => $servaddr,
PeerPort => $self->server_port,
MultiHomed => 1,
Proto => 'tcp'
);
};
$retry--;
if ($@ || !defined($server_sock)) {
......
Markdown is supported
0% .
You are about to add 0 people to the discussion. Proceed with caution.
先完成此消息的编辑!
想要评论请 注册