Branch Coverage

blib/lib/Authen/Simple/Password.pm
Criterion Covered Total %
branch 47 80 58.7


line true false branch
15 1 15 if $password eq $encrypted
25 2 13 if crypt($password, $encrypted) eq $encrypted
28 1 12 if ($encrypted =~ /^\$(\w+)\$/)
29 1 0 if $class->_check_modular($password, $encrypted, lc $1)
33 6 6 if ($encrypted =~ /^\{(\w+)\}/)
34 6 0 if $class->_check_ldap($password, $encrypted, lc $1)
38 1 5 if (length $encrypted == 16)
39 1 0 if Digest::MD5::md5($password) eq $encrypted
42 1 4 if (length $encrypted == 22)
43 1 0 if Digest::MD5::md5_base64($password) eq $encrypted
46 1 3 if (length $encrypted == 32)
47 1 0 if Digest::MD5::md5_hex($password) eq $encrypted
51 1 2 if (length $encrypted == 20)
52 1 0 if &Digest::SHA::sha1($password) eq $encrypted
55 1 1 if (length $encrypted == 27)
56 1 0 if &Digest::SHA::sha1_base64($password) eq $encrypted
59 1 0 if (length $encrypted == 40)
60 1 0 if &Digest::SHA::sha1_hex($password) eq $encrypted
64 0 0 if (length $encrypted == 32)
65 0 0 if &Digest::SHA::sha256($password) eq $encrypted
68 0 0 if (length $encrypted == 43)
69 0 0 if &Digest::SHA::sha256_base64($password) eq $encrypted
72 0 0 if (length $encrypted == 64)
73 0 0 if &Digest::SHA::sha256_hex($password) eq $encrypted
82 1 5 if ($scheme eq 'cleartext')
84 1 0 if $password eq $hash
87 1 4 if ($scheme eq 'crypt')
89 1 0 if crypt($password, $hash) eq $hash
92 1 3 if ($scheme eq 'md5')
94 1 0 if Digest::MD5::md5($password) eq $hash
97 1 2 if ($scheme eq 'smd5')
100 1 0 if Digest::MD5::md5($password, $salt) . $salt eq $hash
103 1 1 if ($scheme eq 'sha')
105 1 0 if &Digest::SHA::sha1($password) eq $hash
108 1 0 if ($scheme eq 'ssha')
111 1 0 if &Digest::SHA::sha1($password, $salt) . $salt eq $hash
120 0 1 if ($format eq '1')
121 0 0 if Crypt::PasswdMD5::unix_md5_crypt($password, $encrypted) eq $encrypted
124 1 0 if ($format eq 'apr1')
125 1 0 if Crypt::PasswdMD5::apache_md5_crypt($password, $encrypted) eq $encrypted