line |
true |
false |
branch |
51
|
0 |
0 |
unless $self->brik_help_run_undef_arg("verify_server", $uri) |
53
|
0 |
0 |
unless my $su = "Metabrik::String::Uri"->new_from_brik_init($self) |
54
|
0 |
0 |
unless my $parsed = $su->parse($uri) |
69
|
0 |
0 |
if (not defined $client || length $!) { } |
|
0 |
0 |
elsif (not defined $client) { } |
92
|
0 |
0 |
unless $self->brik_help_run_undef_arg("getcertificate", $uri) |
94
|
0 |
0 |
unless ($uri =~ m[^https://]) |
113
|
0 |
0 |
unless (defined $cc) |
117
|
0 |
0 |
if (scalar @$cc == 0) |
125
|
0 |
0 |
if ($sock->can('peer_certificate')) { } |
163
|
0 |
0 |
unless $x509 |
178
|
0 |
0 |
$nid > 0 ? : |
|
0 |
0 |
$nid > 0 ? : |
|
0 |
0 |
$nid > 0 ? : |
201
|
0 |
0 |
$nid > 0 ? : |
|
0 |
0 |
$nid > 0 ? : |
|
0 |
0 |
$nid > 0 ? : |
247
|
0 |
0 |
$nid > 0 ? : |
|
0 |
0 |
$nid > 0 ? : |
|
0 |
0 |
$nid > 0 ? : |
290
|
0 |
0 |
if ($x) |
309
|
0 |
0 |
unless $self->brik_help_run_undef_arg("getcertificate2", $host) |
310
|
0 |
0 |
unless $self->brik_help_run_undef_arg("getcertificate2", $port) |
314
|
0 |
0 |
if (defined $ENV{'HTTPS_PROXY'}) |
319
|
0 |
0 |
if (defined $userinfo) |
329
|
0 |
0 |
unless ($got) |
336
|
0 |
0 |
if ($errs = print_errs('Net::SSLeay::new_x_ctx') || !$ctx) |
341
|
0 |
0 |
if ($errs = print_errs("Net::SSLeay::CTX_set_options")) |
348
|
0 |
0 |
unless &Net::SSLeay::CTX_load_verify_locations($ctx, "", $cert_dir) |
356
|
0 |
0 |
if ($errs = print_errs("Net::SSLeay::new")) |
361
|
0 |
0 |
if ($errs = print_errs("fileno")) |
371
|
0 |
0 |
unless ($cipher) |
382
|
0 |
0 |
unless ($got) |