| line |
true |
false |
branch |
|
51
|
21 |
54 |
if (exists $params->{$prop}) |
|
59
|
11 |
14 |
exists $params->{'x509'} ? : |
|
60
|
14 |
11 |
if (exists $params->{'key'}) |
|
63
|
6 |
17 |
if (exists $params->{'cert'}) |
|
66
|
1 |
22 |
if (exists $params->{'cert_text'}) |
|
77
|
1 |
8 |
unless $self->key |
|
86
|
0 |
8 |
if $XML::Sig::DEBUG |
|
105
|
0 |
10 |
if $XML::Sig::DEBUG |
|
122
|
0 |
10 |
if $XML::Sig::DEBUG |
|
126
|
0 |
10 |
if $XML::Sig::DEBUG |
|
151
|
4 |
6 |
if ($self->{'key_type'} eq 'dsa') { } |
|
152
|
0 |
4 |
if $XML::Sig::DEBUG |
|
168
|
0 |
6 |
if $XML::Sig::DEBUG |
|
179
|
0 |
10 |
if $XML::Sig::DEBUG |
|
201
|
0 |
18 |
if $XML::Sig::DEBUG |
|
207
|
0 |
23 |
if $XML::Sig::DEBUG |
|
214
|
0 |
23 |
if $XML::Sig::DEBUG |
|
220
|
2 |
21 |
unless ($self->{'parser'}->findvalue(q(//*[@ID=') . $reference . q(']))) |
|
221
|
0 |
2 |
if $XML::Sig::DEBUG |
|
222
|
1 |
1 |
if ($numsigs <= 1) { } |
|
234
|
0 |
21 |
if $XML::Sig::DEBUG |
|
241
|
0 |
21 |
if $XML::Sig::DEBUG |
|
245
|
0 |
21 |
if $XML::Sig::DEBUG |
|
252
|
0 |
21 |
if $XML::Sig::DEBUG |
|
258
|
0 |
21 |
if $XML::Sig::DEBUG |
|
259
|
21 |
0 |
if ('Digest::SHA'->can($digest_method)) { } |
|
271
|
9 |
12 |
if (defined $self->{'cert_obj'}) { } |
|
273
|
0 |
9 |
unless ($self->_verify_x509_cert($self->{'cert_obj'}, $signed_info_canon, $signature)) |
|
289
|
12 |
12 |
if ($key_info_sig_type eq 'X509Data') { } |
|
298
|
12 |
12 |
if ($keyinfo_nodeset->size) |
|
300
|
0 |
12 |
if $XML::Sig::DEBUG |
|
301
|
0 |
12 |
if (not $self->$verify_method($keyinfo_nodeset->get_node(0), $signed_info_canon, $signature)) { } |
|
303
|
0 |
0 |
if $XML::Sig::DEBUG |
|
307
|
0 |
12 |
if $XML::Sig::DEBUG |
|
312
|
0 |
12 |
unless $keyinfo_nodeset and $keyinfo_nodeset->size > 0 |
|
333
|
0 |
21 |
if $XML::Sig::DEBUG |
|
335
|
0 |
21 |
if $XML::Sig::DEBUG |
|
338
|
0 |
21 |
unless $refdigest eq _trim(&encode_base64($digest, '')) |
|
340
|
0 |
21 |
if $XML::Sig::DEBUG |
|
373
|
0 |
10 |
unless $i |
|
395
|
0 |
10 |
unless $id |
|
419
|
0 |
21 |
if $XML::Sig::DEBUG |
|
448
|
0 |
21 |
if $XML::Sig::DEBUG |
|
452
|
0 |
42 |
if $XML::Sig::DEBUG |
|
453
|
21 |
21 |
if ($alg eq 'http://www.w3.org/2000/09/xmldsig#enveloped-signature') { } |
|
|
0 |
21 |
elsif ($alg eq 'http://www.w3.org/TR/2001/REC-xml-c14n-20010315') { } |
|
|
0 |
21 |
elsif ($alg eq 'http://www.w3.org/TR/2001/REC-xml-c14n-20010315#WithComments') { } |
|
|
21 |
0 |
elsif ($alg eq 'http://www.w3.org/2001/10/xml-exc-c14n#') { } |
|
|
0 |
0 |
elsif ($alg eq 'http://www.w3.org/2001/10/xml-exc-c14n#WithComments') { } |
|
459
|
0 |
0 |
if $XML::Sig::DEBUG |
|
463
|
0 |
0 |
if $XML::Sig::DEBUG |
|
468
|
0 |
21 |
if $XML::Sig::DEBUG |
|
473
|
0 |
0 |
if $XML::Sig::DEBUG |
|
500
|
1 |
0 |
if ($child) |
|
535
|
2 |
0 |
if $rsa_pub->verify($canonical, $bin_signature) |
|
554
|
0 |
5 |
if ref $cert |
|
592
|
0 |
5 |
if $@ |
|
632
|
14 |
0 |
if ($rsa_pub->verify($canonical, $bin_signature)) |
|
735
|
5 |
0 |
if $dsa_pub->do_verify($self->{'digest_method'}->($canonical), $sigobj) |
|
754
|
21 |
10 |
if ($context) { } |
|
769
|
0 |
0 |
if ($node) { } |
|
781
|
0 |
0 |
if (defined $self->{'dsig_prefix'} and length $self->{'dsig_prefix'}) |
|
831
|
0 |
3 |
if $@ |
|
835
|
3 |
0 |
if ($dsa_key) { } |
|
882
|
9 |
0 |
if ($rsaKey) { } |
|
887
|
6 |
3 |
if (not $self->{'x509'}) |
|
932
|
0 |
0 |
if ($x509Key) { } |
|
961
|
0 |
6 |
if $@ |
|
964
|
6 |
0 |
if (open my $CERT, '<', $file) { } |
|
971
|
6 |
0 |
if ($cert) { } |
|
1007
|
0 |
1 |
if $@ |
|
1011
|
1 |
0 |
if ($cert) { } |
|
1037
|
13 |
1 |
if (open my $KEY, '<', $file) { } |
|
1043
|
11 |
2 |
if ($text =~ /BEGIN ([DR]SA) PRIVATE KEY/) { } |
|
|
1 |
1 |
elsif ($text =~ /BEGIN PRIVATE KEY/) { } |
|
|
0 |
1 |
elsif ($text =~ /BEGIN CERTIFICATE/) { } |
|
1046
|
8 |
3 |
if ($key_used eq 'RSA') { } |
|
1155
|
0 |
31 |
if $XML::Sig::DEBUG |
|
1163
|
0 |
31 |
if $XML::Sig::DEBUG |
|
1164
|
1 |
30 |
if ($alg eq 'http://www.w3.org/TR/2001/REC-xml-c14n-20010315') { } |
|
|
24 |
6 |
elsif ($alg eq 'http://www.w3.org/TR/2001/REC-xml-c14n-20010315#WithComments') { } |
|
|
0 |
6 |
elsif ($alg eq 'http://www.w3.org/TR/2008/REC-xml-c14n11-20080502') { } |
|
|
0 |
6 |
elsif ($alg eq 'http://www.w3.org/TR/2008/REC-xml-c14n11-20080502#WithComments') { } |
|
|
6 |
0 |
elsif ($alg eq 'http://www.w3.org/2001/10/xml-exc-c14n#') { } |
|
|
0 |
0 |
elsif ($alg eq 'http://www.w3.org/2001/10/xml-exc-c14n#WithComments') { } |
|
1165
|
0 |
1 |
if $XML::Sig::DEBUG |
|
1169
|
0 |
24 |
if $XML::Sig::DEBUG |
|
1173
|
0 |
0 |
if $XML::Sig::DEBUG |
|
1177
|
0 |
0 |
if $XML::Sig::DEBUG |
|
1181
|
0 |
6 |
if $XML::Sig::DEBUG |
|
1185
|
0 |
0 |
if $XML::Sig::DEBUG |