| line |
true |
false |
branch |
|
84
|
1 |
1 |
unless ($args{'SSL_server'} or defined $args{'SSL_verify_mode'} or defined $args{'SSL_ca_file'} or defined $args{'SSL_ca_path'}) |
|
86
|
0 |
1 |
unless (%SSL_ca_args) |
|
111
|
16 |
264 |
if ($fh->pending) |
|
124
|
0 |
263 |
unless utf8::downgrade($_[1]) |
|
209
|
0 |
22 |
unless $params{'handle'} |
|
213
|
16 |
6 |
if ($params{'handle'}->isa('IO::Async::Stream')) { } |
|
223
|
0 |
22 |
unless my $on_upgraded = delete $params{'on_upgraded'} or defined wantarray |
|
225
|
0 |
22 |
unless my $on_error = delete $params{'on_error'} or defined wantarray |
|
227
|
6 |
16 |
if $on_upgraded |
|
228
|
6 |
16 |
if $on_error |
|
240
|
1 |
21 |
unless $socket = 'IO::Socket::SSL'->start_SSL($socket, _SSL_args('SSL_startHandshake', 0, 'SSL_error_trap', sub {
}
, %ssl_params)) |
|
242
|
1 |
21 |
unless (eval {
do {
die 'IO::Socket::SSL'->errstr unless $socket = 'IO::Socket::SSL'->start_SSL($socket, _SSL_args('SSL_startHandshake', 0, 'SSL_error_trap', sub {
}
, %ssl_params))
}
}) |
|
247
|
10 |
11 |
$ssl_params{'SSL_server'} ? : |
|
251
|
17 |
38 |
if ($socket->$ready_method) |
|
254
|
15 |
2 |
if ($stream) |
|
266
|
4 |
34 |
if ($! != 11 and $! != 11) |
|
279
|
16 |
5 |
if $stream |
|
289
|
19 |
2 |
if defined wantarray |
|
349
|
1 |
5 |
if (exists $params{'on_connected'}) { } |
|
|
1 |
4 |
elsif (exists $params{'on_stream'}) { } |
|
361
|
0 |
4 |
unless defined wantarray |
|
365
|
0 |
6 |
unless my $on_ssl_error = delete $params{'on_ssl_error'} or defined wantarray |
|
372
|
0 |
6 |
unless $stream->isa('IO::Async::Stream') |
|
393
|
2 |
4 |
if $on_done |
|
395
|
1 |
0 |
if defined $_[1] and $_[1] eq 'ssl' |
|
396
|
3 |
3 |
if $on_ssl_error |
|
398
|
4 |
2 |
if defined wantarray |
|
447
|
0 |
5 |
unless my $on_ssl_error = delete $params{'on_ssl_error'} or defined wantarray |
|
460
|
0 |
5 |
unless not defined $stream or $stream->isa('IO::Async::Stream') |
|
466
|
0 |
5 |
unless $socket |
|
468
|
4 |
1 |
if $stream |
|
475
|
1 |
0 |
if ($on_ssl_error) |
|
487
|
3 |
2 |
if defined wantarray |
|
517
|
0 |
2 |
unless my $on_upgraded = delete $params{'on_upgraded'} |
|
519
|
0 |
2 |
unless my $loop = $protocol->get_loop |