| blib/lib/Crypt/MagicSignatures/Key.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 31 | 43 | 72.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 79 | 3 | 2 | 22 | @_ == 1 and index($_[0], 'RSA.') >= 0 |
| 365 | 1 | 1 | 13 | $encoded_message and $message |
| 402 | 16 | 1 | 1 | $_[0] and $self->d |
| 588 | 31 | 23 | 1 | $l and $num > $base ** $l |
| line | l | !l | condition |
|---|---|---|---|
| 321 | 19 | 5 | $self->[2] // undef |
| 583 | 24 | 31 | shift() || 0 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 155 | 1 | 1 | 19 | $size < 512 or $size > 4096 |
| 186 | 0 | 0 | 0 | $size < 512 or $size > 4096 |
| 0 | 0 | 0 | $size < 512 or $size > 4096 or $size % 2 | |
| 301 | 34 | 2 | 0 | $self->[1] //= 'Math::BigInt'->new('65537') |
| 339 | 10 | 21 | 0 | $_[0][3] // ($_[0][3] = _bitsize($_[0]->n)) |
| 448 | 24 | 19 | 0 | $_[0][4] // ($_[0][4] = _octet_len($_[0]->n)) |
| 501 | 2 | 0 | 8 | $m >= $K->n or $m < 0 |
| 518 | 0 | 0 | 10 | $s > $K->n or $s < 0 |
| 581 | 1 | 1 | 55 | $num->is_nan or $num->length > 30000 |