line |
true |
false |
branch |
18
|
0 |
24 |
unless $subtype =~ /^2[abxy]$/ |
19
|
0 |
24 |
if $cost < 4 or $cost > 31 |
20
|
0 |
24 |
if length $salt != 16 |
39
|
2 |
0 |
if (length $algorithm) { } |
44
|
0 |
2 |
unless $hash =~ s/ ^ \$ ($subtype_qr) \$ ($cost_qr) \$ ($salt_qr) /\$bcrypt-$algorithm\$v=2,t=$1,r=$2\$$3\$/x |
54
|
4 |
0 |
if ($hash =~ s/ ^ \$ bcrypt-(\w+) \$ v=2,t=($subtype_qr),r=($cost_qr) \$ ($salt_qr) \$ /\$$2\$$3\$$4/x) { } |
55
|
0 |
4 |
unless my $hasher = $hash_for{$1} |
69
|
3 |
0 |
if ($hash =~ / \A \$ ($subtype_qr) \$ ($cost_qr) \$ /x) { } |
|
0 |
0 |
elsif ($hash =~ / ^ \$ bcrypt-($algo_qr) \$ v=2,t=($subtype_qr),r=($cost_qr) \$ /x) { } |