lib/Crypt/Perl/ECDSA/EncodedPoint.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 9 | 12 | 75.0 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
33 | 107 | 94 | 511 | $first_octet == 6 or $first_octet == 7 |
99 | 105 | 0 | $first_octet == 2 or $first_octet == 3 | |
53 | 4 | 3 | 0 | $self->{'_compressed_bin'} ||= do { Crypt::Perl::ECDSA::Utils::compress_point($self->{'_bin'}) } |
64 | 790 | 112 | 0 | $self->{'_bin'} ||= do { die 'Need compressed bin!' unless $self->{'_compressed_bin'}; Crypt::Perl::ECDSA::Utils::decompress_point($self->{'_compressed_bin'}, @{$curve_hr;}{'p', 'a', 'b'}) } |