| line |
true |
false |
branch |
|
292
|
4 |
5 |
if defined $decoded |
|
296
|
0 |
5 |
unless defined $ci |
|
303
|
0 |
5 |
unless defined $content_der |
|
306
|
5 |
0 |
length $content_der ? : |
|
307
|
0 |
5 |
if ($first_tag == 4) |
|
309
|
0 |
0 |
unless defined $octets |
|
314
|
5 |
0 |
if (defined $ci->{'contentType'} and $ci->{'contentType'} eq $OID_CT_TSTDATA) |
|
316
|
0 |
5 |
unless defined $tsd |
|
321
|
0 |
0 |
if (defined $ci->{'contentType'} and $ci->{'contentType'} eq $OID_CT_SIGNEDDATA) |
|
323
|
0 |
0 |
unless defined $sd |
|
327
|
0 |
0 |
unless defined $econtent |
|
328
|
0 |
0 |
unless (defined $econtent_type and $econtent_type eq $OID_CT_TSTDATA) |
|
333
|
0 |
0 |
unless defined $tsd |
|
343
|
0 |
5 |
unless defined $der |
|
349
|
0 |
6 |
unless open my $fh, "<:raw", $filepath |
|
357
|
0 |
1 |
unless open my $fh, ">:raw", $filepath |
|
368
|
1 |
6 |
unless defined $content_der |
|
372
|
0 |
6 |
unless defined $ci |
|
376
|
0 |
6 |
unless defined $econtent |
|
380
|
6 |
0 |
if (defined $content_type and $content_type eq "1.2.840.113549.1.7.1") |
|
381
|
6 |
0 |
length $econtent ? : |
|
382
|
6 |
0 |
if ($first_tag == 4) |
|
384
|
6 |
0 |
if defined $octets |
|
400
|
0 |
4 |
unless defined $evidence |
|
402
|
4 |
0 |
if (exists $evidence->{'tstEvidence'}) |
|
403
|
0 |
4 |
unless $evidence->{'tstEvidence'} |
|
405
|
0 |
4 |
unless defined $ci_struct |
|
407
|
4 |
0 |
if defined $der |
|
417
|
0 |
1 |
unless defined $bytes |
|
418
|
0 |
1 |
unless open my $fh, ">:raw", $filepath |
|
429
|
0 |
0 |
unless defined $content_der |
|
431
|
0 |
0 |
unless my $ci = $CONTENTINFO_CODEC->decode($content_der) |
|
432
|
0 |
0 |
unless defined $ci->{'contentType'} and $ci->{'contentType'} eq $OID_CT_SIGNEDDATA |
|
434
|
0 |
0 |
unless my $sd = $SIGNEDDATA_CODEC->decode($sd_der) |
|
437
|
0 |
0 |
unless defined $econtent |
|
439
|
0 |
0 |
length $econtent ? : |
|
440
|
0 |
0 |
if ($first_tag == 4) |
|
442
|
0 |
0 |
if defined $octets |
|
450
|
0 |
0 |
unless defined $bytes |
|
451
|
0 |
0 |
unless open my $fh, ">:raw", $filepath |
|
463
|
0 |
2 |
unless open my $fh, ">:raw", $out |
|
491
|
0 |
4 |
unless defined $marked_filepath |
|
492
|
0 |
4 |
unless open my $in_fh, "<:raw", $marked_filepath |
|
499
|
0 |
4 |
if (defined $ci_probe and ref $ci_probe eq 'HASH' and exists $ci_probe->{'contentType'}) { } |
|
503
|
0 |
4 |
unless my $octets_der = $OCTETSTRING_CODEC->encode($marked_bytes) |
|
505
|
0 |
4 |
unless $contentinfo_der = $CONTENTINFO_CODEC->encode({"contentType", $DATA_OID, "content", $octets_der}) |
|
510
|
0 |
4 |
ref $tsr_input eq 'ARRAY' ? : |
|
511
|
0 |
4 |
unless @tsr_items |
|
516
|
4 |
0 |
if (defined $item and not ref $item and -e $item) { } |
|
517
|
0 |
4 |
unless open my $fh, "<:raw", $item |
|
522
|
0 |
4 |
unless defined $der and length $der |
|
523
|
0 |
4 |
unless my $ci_struct = $CONTENTINFO_CODEC->decode($der) |
|
529
|
4 |
0 |
defined $fname ? : |
|
543
|
0 |
4 |
unless (defined $out and length $out) |
|
549
|
0 |
4 |
unless my $tsd_der = $TSD_CODEC->encode($tsd_hashref) |
|
551
|
0 |
4 |
unless my $ci_tsd_der = $CONTENTINFO_CODEC->encode({"contentType", $OID_CT_TSTDATA, "content", $tsd_der}) |
|
553
|
0 |
4 |
unless open my $out_fh, ">:raw", $out |