| line |
true |
false |
branch |
|
67
|
1 |
2 |
if ($opt{'https'} or $opt{'ssl'}) { }
|
|
|
2 |
0 |
elsif ($opt{'file'}) { }
|
|
73
|
0 |
2 |
unless (-r $self->{'target'})
|
|
79
|
0 |
3 |
if ($opt{'timeout'})
|
|
89
|
1 |
1 |
unless ($self->{'expire_date'})
|
|
90
|
0 |
1 |
if ($self->{'type'} eq 'ssl') { }
|
|
|
1 |
0 |
elsif ($self->{'type'} eq 'file') { }
|
|
96
|
0 |
0 |
if $@
|
|
97
|
0 |
0 |
unless $cert
|
|
120
|
0 |
2 |
unless ($self->{'begin_date'})
|
|
134
|
0 |
3 |
unless ($self->{'begin_date'})
|
|
138
|
1 |
2 |
unless (ref $duration)
|
|
145
|
2 |
1 |
'DateTime'->compare($dx, $self->{'expire_date'}) >= 0 ? :
|
|
179
|
0 |
0 |
unless $sock = $Socket->new(%$sock)
|
|
182
|
0 |
0 |
unless ($host =~ /^[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}$/)
|
|
190
|
0 |
0 |
if ($record->{'type'} != $SSL3_RT_HANDSHAKE)
|
|
191
|
0 |
0 |
if ($record->{'type'} == $SSL3_RT_ALERT) { }
|
|
194
|
0 |
0 |
if ($d1 eq $SSL3_AL_WARNING) { }
|
|
205
|
0 |
0 |
if $do_loop++ >= 10
|
|
206
|
0 |
0 |
if ($handshake->{'type'} == $SSL3_MT_HELLO_REQUEST) { }
|
|
|
0 |
0 |
elsif ($handshake->{'type'} == $SSL3_MT_CERTIFICATE_REQUEST) { }
|
|
|
0 |
0 |
elsif ($handshake->{'type'} == $SSL3_MT_SERVER_HELLO) { }
|
|
|
0 |
0 |
elsif ($handshake->{'type'} == $SSL3_MT_CERTIFICATE) { }
|
|
|
0 |
0 |
elsif ($handshake->{'type'} == $SSL3_MT_SERVER_KEY_EXCHANGE) { }
|
|
|
0 |
0 |
elsif ($handshake->{'type'} == $SSL3_MT_SERVER_DONE) { }
|
|
217
|
0 |
0 |
if $len1 != $len2 + 3
|
|
230
|
0 |
0 |
unless _sendalert($sock, $SSL3_AL_FATAL, $SSL3_AD_HANDSHAKE_FAILURE)
|
|
345
|
0 |
0 |
if ($servername)
|
|
411
|
0 |
0 |
if ($ext_len > 0)
|
|
430
|
0 |
0 |
if ($c =~ /^[0-9]+$/) { }
|
|
451
|
0 |
0 |
unless $sock->read($record->{'type'}, 1)
|
|
454
|
0 |
0 |
unless $sock->read($record->{'version'}, 2)
|
|
457
|
0 |
0 |
unless $sock->read($record->{'length'}, 2)
|
|
460
|
0 |
0 |
unless $sock->read($record->{'data'}, $record->{'length'})
|
|
474
|
0 |
0 |
if $record->{'read'} >= $record->{'length'}
|
|
477
|
0 |
0 |
if $record->{'read'} + 3 > $record->{'length'}
|
|
484
|
0 |
0 |
if ($handshake->{'length'} > 0) { }
|
|
487
|
0 |
0 |
if $record->{'read'} > $record->{'length'}
|