| line |
true |
false |
branch |
|
26
|
12 |
13 |
if (my $cert = $param{'Key'} and my $sym_key = $param{'SymKey'}) |
|
28
|
0 |
12 |
unless my $cipher = "Crypt::OpenPGP::Cipher"->new($alg) |
|
33
|
0 |
12 |
unless my $enc = $key->_encode($sym_key, $alg, $pk->bytesize) |
|
36
|
0 |
12 |
unless $key->{'C'} = $pk->encrypt($enc) |
|
49
|
0 |
13 |
unless $key->{'version'} == 2 or $key->{'version'} == 3 |
|
87
|
0 |
13 |
unless $key->key_id eq $sk->key_id |
|
89
|
0 |
13 |
unless my($sym_key, $alg) = __PACKAGE__->_decode($sk->key->decrypt($key->{'C'})) |
|
111
|
0 |
13 |
unless unpack("C", $ser) == 2 |
|
116
|
0 |
13 |
unless unpack("%16C*", $sym_key) == $csum |