| line |
true |
false |
branch |
|
28
|
0 |
0 |
if $^O eq 'MSWin32' or $^O eq 'NetWare' |
|
67
|
0 |
1 |
if (my $proxy = $self->proxy) |
|
69
|
0 |
0 |
unless $$arg{'PeerPort'} |
|
77
|
0 |
0 |
unless (shift())->SUPER::timeout |
|
91
|
0 |
1 |
if ($@) |
|
97
|
0 |
1 |
if (my $rv = *$self->{'ssl_ctx'}->set_verify) |
|
101
|
0 |
1 |
if ($self->proxy) { } |
|
104
|
0 |
0 |
if (not $proxy_connect or $@) |
|
110
|
1 |
0 |
@_ == 1 ? : |
|
111
|
1 |
0 |
unless ($self->SUPER::connect(@_)) |
|
125
|
0 |
0 |
if $ssl->can('set_tlsext_host_name') |
|
138
|
0 |
0 |
if (not defined $rv or $rv <= 0) |
|
143
|
0 |
0 |
if (*$self->{'ssl_version'} == 23) { } |
|
|
0 |
0 |
elsif (*$self->{'ssl_version'} == 3) { } |
|
167
|
0 |
0 |
if ($@) |
|
235
|
0 |
0 |
unless defined $n |
|
244
|
0 |
0 |
unless defined $n |
|
271
|
0 |
0 |
unless defined $n |
|
300
|
0 |
0 |
unless @stack |
|
303
|
0 |
0 |
if ref $stack_object and $stack_object->isa('LWP::UserAgent') |
|
311
|
0 |
0 |
if (my $val = shift()) |
|
322
|
0 |
0 |
unless $proxy_port |
|
325
|
0 |
0 |
unless $proxy_addr |
|
328
|
0 |
0 |
unless $peer_addr |
|
329
|
0 |
0 |
unless $peer_port |
|
336
|
0 |
0 |
if ($peer_addr =~ /\Q$domain\E$/) |
|
342
|
0 |
0 |
if ($is_proxied) { } |
|
343
|
0 |
0 |
unless $self->SUPER::connect($proxy_port, $proxy_addr) |
|
349
|
0 |
0 |
unless $self->SUPER::connect($peer_port, $peer_addr_packed) |
|
354
|
0 |
0 |
if ($ENV{'HTTPS_PROXY_USERNAME'} or $ENV{'HTTPS_PROXY_PASSWORD'}) { } |
|
369
|
0 |
0 |
if (send_useragent_to_proxy()) |
|
371
|
0 |
0 |
if ($lwp_object and $lwp_object->agent) |
|
389
|
0 |
0 |
unless length $header |
|
391
|
0 |
0 |
if $n <= 0 |
|
394
|
0 |
0 |
if defined $timeout |
|
395
|
0 |
0 |
$header =~ m[HTTP/[0-9]+[.][0-9]+\s+200\s+]is ? : |
|
397
|
0 |
0 |
unless ($conn_ok) |
|
409
|
2 |
0 |
unless $proxy_server |
|
415
|
0 |
0 |
unless $peer_addr |
|
416
|
0 |
0 |
unless $peer_port |
|
424
|
0 |
0 |
if ($peer_addr =~ /\Q$domain\E\z/) |
|
445
|
0 |
3 |
if ($file) |
|
446
|
0 |
0 |
unless -e $file |
|
447
|
0 |
0 |
unless -r $file |
|
449
|
0 |
0 |
if (/PKCS12/) { } |
|
|
0 |
0 |
elsif (/CERT/) { } |
|
|
0 |
0 |
elsif (/KEY/) { } |
|
451
|
0 |
0 |
unless $ctx->use_pkcs12_file($file, $ENV{'HTTPS_PKCS12_PASSWORD'}) |
|
455
|
0 |
0 |
unless $ctx->use_certificate_file($file, 1) |
|
458
|
0 |
0 |
unless $ctx->use_PrivateKey_file($file, 1) |
|
467
|
0 |
1 |
if ($count == 2) |
|
468
|
0 |
0 |
unless ($ctx->check_private_key) |