| line |
true |
false |
branch |
|
41
|
0 |
290 |
if not defined $bytes or length $bytes == 0 |
|
45
|
80 |
210 |
if ($bytes =~ /^(\x00+)/) |
|
50
|
290 |
0 |
if (defined $alphabet) |
|
52
|
0 |
290 |
unless $alphabet =~ /^[a-zA-Z0-9]{58}$/ |
|
54
|
0 |
290 |
if $@ |
|
63
|
0 |
291 |
if not defined $base58 or length $base58 == 0 |
|
66
|
291 |
0 |
if (defined $alphabet) |
|
67
|
1 |
290 |
unless $alphabet =~ /^[a-zA-Z0-9]{58}$/ and $base58 =~ /^[$alphabet]+$/ |
|
69
|
0 |
290 |
if $@ |
|
71
|
0 |
290 |
unless $base58 =~ /^[$default]+$/ |
|
75
|
80 |
210 |
if ($base58 =~ /^(0+)(.*)$/) |
|
79
|
265 |
25 |
if defined $base58 and length $base58 > 0 |
|
103
|
3 |
109 |
unless $content |
|
104
|
0 |
112 |
unless $content |
|
113
|
0 |
112 |
unless $b64 |
|
116
|
0 |
112 |
unless $binary |
|
121
|
33 |
43 |
if $k eq "Proc-Type" |
|
122
|
33 |
43 |
if $k eq "DEK-Info" |
|
124
|
33 |
0 |
if ($cipher_name and $iv_hex and $ptype and $ptype eq "4,ENCRYPTED") |
|
125
|
0 |
33 |
unless defined $password |
|
139
|
0 |
19 |
if ($password) |
|
149
|
0 |
19 |
if (@headers) |
|
162
|
0 |
224 |
unless -f $f |
|
163
|
0 |
224 |
unless open my $fh, "<", $f |
|
170
|
0 |
1 |
unless defined $_[1] |
|
171
|
0 |
1 |
unless open my $fh, ">", $_[0] |
|
173
|
0 |
1 |
unless print $fh $_[1] |
|
174
|
0 |
1 |
unless close $fh |
|
180
|
0 |
1 |
unless defined $a and defined $b |
|
205
|
0 |
1 |
unless $uuid |
|
206
|
1 |
0 |
if $uuid =~ /^[0-9a-f]{8}-[0-9a-f]{4}-4[0-9a-f]{3}-[89ab][0-9a-f]{3}-[0-9a-f]{12}$/i |
|
217
|
0 |
33 |
unless $cipher and $mode |
|
219
|
3 |
30 |
if $cipher eq "DES_EDE" |
|
220
|
3 |
30 |
if $cipher eq "DES" |
|
221
|
3 |
30 |
if $cipher eq "SEED" |
|
222
|
33 |
0 |
$klen ? : |
|
224
|
0 |
33 |
unless $klen and $ilen |
|
226
|
33 |
0 |
if $mode eq "CBC" |
|
227
|
0 |
0 |
if $mode eq "CFB" |
|
228
|
0 |
0 |
if $mode eq "ECB" |
|
229
|
0 |
0 |
if $mode eq "OFB" |