| blib/lib/Authen/SCRAM/Role/Common.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 11 | 18 | 61.1 |
| line | true | false | branch |
|---|---|---|---|
| 56 | 7 | 0 | if (eval { do { require String::Compare::ConstantTime; 1 } }) { } |
| 63 | 0 | 0 | unless $dk1_length == length $dk2 |
| 66 | 0 | 0 | substr($dk1, $offset, 1) eq substr($dk2, $offset, 1) ? : |
| 96 | 0 | 47 | if length $key > $block_size |
| 157 | 7 | 17 | defined $authz && length $authz ? : |
| 193 | 29 | 109 | if ($k eq 'a' or $k eq 'n') |
| 207 | 11 | 87 | if ($k eq 'a' or $k eq 'n') { } |
| 3 | 154 | elsif ($k eq 'i' and not $v =~ /^[0-9]+$/) { } | |
| 221 | 0 | 54 | if $self->skip_saslprep |