| line |
true |
false |
branch |
|
283
|
4 |
5 |
if defined $decoded |
|
287
|
0 |
5 |
unless defined $ci |
|
294
|
0 |
5 |
unless defined $content_der |
|
297
|
5 |
0 |
length $content_der ? : |
|
298
|
0 |
5 |
if ($first_tag == 4) |
|
300
|
0 |
0 |
unless defined $octets |
|
305
|
5 |
0 |
if (defined $ci->{'contentType'} and $ci->{'contentType'} eq $OID_CT_TSTDATA) |
|
307
|
0 |
5 |
unless defined $tsd |
|
312
|
0 |
0 |
if (defined $ci->{'contentType'} and $ci->{'contentType'} eq $OID_CT_SIGNEDDATA) |
|
314
|
0 |
0 |
unless defined $sd |
|
318
|
0 |
0 |
unless defined $econtent |
|
319
|
0 |
0 |
unless (defined $econtent_type and $econtent_type eq $OID_CT_TSTDATA) |
|
324
|
0 |
0 |
unless defined $tsd |
|
334
|
0 |
5 |
unless defined $der |
|
340
|
0 |
6 |
unless open my $fh, "<:raw", $filepath |
|
348
|
0 |
1 |
unless open my $fh, ">:raw", $filepath |
|
359
|
1 |
6 |
unless defined $content_der |
|
363
|
0 |
6 |
unless defined $ci |
|
367
|
0 |
6 |
unless defined $econtent |
|
371
|
6 |
0 |
if (defined $content_type and $content_type eq "1.2.840.113549.1.7.1") |
|
372
|
6 |
0 |
length $econtent ? : |
|
373
|
6 |
0 |
if ($first_tag == 4) |
|
375
|
6 |
0 |
if defined $octets |
|
391
|
0 |
4 |
unless defined $evidence |
|
393
|
4 |
0 |
if (exists $evidence->{'tstEvidence'}) |
|
394
|
0 |
4 |
unless $evidence->{'tstEvidence'} |
|
396
|
0 |
4 |
unless defined $ci_struct |
|
398
|
4 |
0 |
if defined $der |
|
408
|
0 |
1 |
unless defined $bytes |
|
409
|
0 |
1 |
unless open my $fh, ">:raw", $filepath |
|
420
|
0 |
0 |
unless defined $content_der |
|
422
|
0 |
0 |
unless my $ci = $CONTENTINFO_CODEC->decode($content_der) |
|
423
|
0 |
0 |
unless defined $ci->{'contentType'} and $ci->{'contentType'} eq $OID_CT_SIGNEDDATA |
|
425
|
0 |
0 |
unless my $sd = $SIGNEDDATA_CODEC->decode($sd_der) |
|
428
|
0 |
0 |
unless defined $econtent |
|
430
|
0 |
0 |
length $econtent ? : |
|
431
|
0 |
0 |
if ($first_tag == 4) |
|
433
|
0 |
0 |
if defined $octets |
|
441
|
0 |
0 |
unless defined $bytes |
|
442
|
0 |
0 |
unless open my $fh, ">:raw", $filepath |
|
454
|
0 |
2 |
unless open my $fh, ">:raw", $out |
|
482
|
0 |
4 |
unless defined $marked_filepath |
|
483
|
0 |
4 |
unless open my $in_fh, "<:raw", $marked_filepath |
|
490
|
0 |
4 |
if (defined $ci_probe and ref $ci_probe eq 'HASH' and exists $ci_probe->{'contentType'}) { } |
|
494
|
0 |
4 |
unless my $octets_der = $OCTETSTRING_CODEC->encode($marked_bytes) |
|
496
|
0 |
4 |
unless $contentinfo_der = $CONTENTINFO_CODEC->encode({"contentType", $DATA_OID, "content", $octets_der}) |
|
501
|
0 |
4 |
ref $tsr_input eq 'ARRAY' ? : |
|
502
|
0 |
4 |
unless @tsr_items |
|
507
|
4 |
0 |
if (defined $item and not ref $item and -e $item) { } |
|
508
|
0 |
4 |
unless open my $fh, "<:raw", $item |
|
513
|
0 |
4 |
unless defined $der and length $der |
|
514
|
0 |
4 |
unless my $ci_struct = $CONTENTINFO_CODEC->decode($der) |
|
520
|
4 |
0 |
defined $fname ? : |
|
534
|
0 |
4 |
unless (defined $out and length $out) |
|
540
|
0 |
4 |
unless my $tsd_der = $TSD_CODEC->encode($tsd_hashref) |
|
542
|
0 |
4 |
unless my $ci_tsd_der = $CONTENTINFO_CODEC->encode({"contentType", $OID_CT_TSTDATA, "content", $tsd_der}) |
|
544
|
0 |
4 |
unless open my $out_fh, ">:raw", $out |