| line |
true |
false |
branch |
|
159
|
0 |
0 |
unless (defined $self->{'_dynamic'})
|
|
200
|
0 |
0 |
unless defined $self->{'properties_values'}{'current'}{'mediatype'}{'raw'}
|
|
205
|
0 |
0 |
if $v eq $mediasubtype
|
|
223
|
0 |
0 |
if (($core) = $value =~ /^D:([0-9]{14})Z'{0,2}$/u) { }
|
|
|
0 |
0 |
elsif (my($mycore, $tz_dir, $tz_h, $tz_m) = $value =~ /^D:([0-9]{14})(\+|\-)([0-9]{2})'([0-9]{2})'$/u) { }
|
|
231
|
0 |
0 |
unless defined $core and defined $parser
|
|
240
|
0 |
0 |
if defined $self->{'_loaded_pdf'}
|
|
243
|
0 |
0 |
unless defined $self->{'path'}
|
|
244
|
0 |
0 |
unless $self->_check_mediatype("application/pdf")
|
|
247
|
0 |
0 |
if (eval {
|
|
260
|
0 |
0 |
if (defined(my $value = $info{$key}))
|
|
263
|
0 |
0 |
if ($_properties{$pv_key}{'parsing'} // "") eq "pdf_date"
|
|
276
|
0 |
0 |
if defined $self->{'_loaded_odf'}
|
|
279
|
0 |
0 |
unless defined $self->{'path'}
|
|
280
|
0 |
0 |
unless $self->_check_mediatype("application/vnd.oasis.opendocument.text")
|
|
283
|
0 |
0 |
if (eval {
|
|
297
|
0 |
0 |
unless defined $value and length $value
|
|
299
|
0 |
0 |
if ($_properties{$pv_key}{'parsing'} // "") eq "iso8601"
|
|
305
|
0 |
0 |
unless scalar @{$pv->{'odf_keywords'};}
|
|
312
|
0 |
0 |
unless defined $value and length $value
|
|
343
|
0 |
0 |
unless $fh
|
|
346
|
0 |
0 |
unless $fh->seek($start, 0)
|
|
347
|
0 |
0 |
if (read($fh, my $in, 2) != 2) { }
|
|
360
|
0 |
0 |
unless $opcode->{'first'} == 6 and $opcode->{'codeX'} == 0 and $opcode->{'S'} and $opcode->{'T'} < 4
|
|
363
|
0 |
0 |
if ($opcode->{'T'} == 1) { }
|
|
|
0 |
0 |
elsif ($opcode->{'T'} == 2) { }
|
|
364
|
0 |
0 |
unless read($fh, $in, 2) == 2
|
|
368
|
0 |
0 |
unless read($fh, $in, 4) == 4
|
|
373
|
0 |
0 |
unless defined $length
|
|
377
|
0 |
0 |
unless read($fh, $in, 4) == 4
|
|
382
|
0 |
0 |
if ($flags & 2)
|
|
383
|
0 |
0 |
unless read($fh, $in, 2) == 2
|
|
388
|
0 |
0 |
if (($flags & 49152) == 0) { }
|
|
|
0 |
0 |
elsif (($flags & 49152) == 16384) { }
|
|
401
|
0 |
0 |
$flags & 1 ? :
|
|
410
|
0 |
0 |
unless scalar @res
|
|
417
|
0 |
0 |
if (defined(my $fh = delete $opts{'fh'}))
|
|
418
|
0 |
0 |
unless $fh->seek($opts{'start'}, 0)
|
|
419
|
0 |
0 |
if (read($fh, my $in, 2) == 2)
|
|
421
|
0 |
0 |
if ($opcode->{'first'} == 0 and $opcode->{'codeX'} == 0 and $opcode->{'T'} & 4)
|
|
424
|
0 |
0 |
if ($n > 0)
|
|
426
|
0 |
0 |
unless read($fh, my $magic, $n) == $n
|
|
427
|
0 |
0 |
if (length $magic == $n)
|
|
433
|
0 |
0 |
if ($section_type == 5 or $section_type == 6)
|
|
448
|
0 |
0 |
if defined $self->{'_loaded_vmv0'}
|
|
451
|
0 |
0 |
unless $self->_check_mediatype("application/vnd.sirtx.vmv0")
|
|
465
|
0 |
0 |
if $code != 0
|
|
466
|
0 |
0 |
if $P > 2
|
|
467
|
0 |
0 |
if $codeX != 0
|
|
469
|
0 |
0 |
if $op0 == 0 and $codeX == 0 and $S > 2
|
|
475
|
0 |
0 |
if ($extra_len == 0) { }
|
|
|
0 |
0 |
elsif ($extra_len == 2) { }
|
|
|
0 |
0 |
elsif ($extra_len == 4) { }
|
|
483
|
0 |
0 |
if ($code == 0)
|
|
484
|
0 |
0 |
if ($P == 1)
|
|
485
|
0 |
0 |
if ($codeX == 0)
|
|
486
|
0 |
0 |
if (defined $extra_as_num)
|
|
487
|
0 |
0 |
if (defined(my $f = $_vmv0_code_P1_info{$S})) { }
|
|
|
0 |
0 |
elsif ($S == 1) { }
|
|
500
|
0 |
0 |
if (scalar keys %section_pointer)
|
|
511
|
0 |
0 |
if (defined $last)
|
|
516
|
0 |
0 |
if (defined $last)
|
|
528
|
0 |
0 |
if defined $self->{'_loaded_png'}
|
|
531
|
0 |
0 |
unless $self->_check_mediatype("image/png")
|
|
537
|
0 |
0 |
if (substr($data, 0, 8) eq "\211PNG\r\n\32\n")
|
|
538
|
0 |
0 |
if (substr($data, 8, 8) eq "\0\0\0\rIHDR")
|
|
541
|
0 |
0 |
if (substr($data, 29, 4) eq pack("H8", $crc->hexdigest))
|
|
547
|
0 |
0 |
if (defined(my $ct = $_PNG_colour_types{$color_type}))
|
|
550
|
0 |
0 |
if (defined(my $fm = $_PNG_filter_method{$filter_method}))
|
|
553
|
0 |
0 |
if (defined(my $cm = $_PNG_compression_method{$compression_method}))
|
|
566
|
0 |
0 |
if defined $self->{'_loaded_gif'}
|
|
569
|
0 |
0 |
unless $self->_check_mediatype("image/gif")
|
|
575
|
0 |
0 |
if (substr($data, 0, 6) eq "GIF89a")
|
|
577
|
0 |
0 |
if $width > 0
|
|
578
|
0 |
0 |
if $height > 0
|
|
587
|
0 |
0 |
if defined $self->{'_loaded_gpl'}
|
|
594
|
0 |
0 |
if ($data =~ /^GIMP Palette\r?\n/u)
|
|
598
|
0 |
0 |
unless eval {
|
|
603
|
0 |
0 |
unless length $line
|
|
604
|
0 |
0 |
if ($line eq 'GIMP Palette') { }
|
|
|
0 |
0 |
elsif ($line =~ /^Name:\s+(\S.+)$/u) { }
|
|
|
0 |
0 |
elsif ($line =~ /^Columns:\s+([1-9][0-9]*)$/u) { }
|
|
|
0 |
0 |
elsif ($line =~ /^(0|[1-9][0-9]*)\s+(0|[1-9][0-9]*)\s+(0|[1-9][0-9]*)\s+(\S(?:.*\S)?)$/u) { }
|
|
|
0 |
0 |
elsif ($line =~ /^(0|[1-9][0-9]*)\s+(0|[1-9][0-9]*)\s+(0|[1-9][0-9]*)$/u) { }
|
|
624
|
0 |
0 |
if scalar @colours
|
|
633
|
0 |
0 |
if defined $self->{'_loaded_rgbtxt'}
|
|
640
|
0 |
0 |
if ($data =~ /^\! \$Xorg: rgb\.txt,v .+ Exp \$\r?\n/u)
|
|
644
|
0 |
0 |
unless eval {
|
|
648
|
0 |
0 |
unless length $line
|
|
649
|
0 |
0 |
if ($line =~ /^(0|[1-9][0-9]*)\s+(0|[1-9][0-9]*)\s+(0|[1-9][0-9]*)\s+(\S(?:.*\S)?)$/u) { }
|
|
659
|
0 |
0 |
if scalar @colours
|
|
668
|
0 |
0 |
if defined $self->{'_loaded_image_info'}
|
|
671
|
0 |
0 |
unless defined $self->{'path'}
|
|
678
|
0 |
0 |
if defined $data->{'error'} and length $data->{'error'}
|
|
684
|
0 |
0 |
unless defined $value and length $value
|
|
692
|
0 |
0 |
unless defined $value and length $value
|
|
703
|
0 |
0 |
if defined $self->{'_loaded_audio_scan'}
|
|
706
|
0 |
0 |
unless defined $self->{'path'}
|
|
709
|
0 |
0 |
if (defined(my $data = eval {
|
|
722
|
0 |
0 |
unless defined $value and length $value
|
|
723
|
0 |
0 |
if ref $value
|
|
733
|
0 |
0 |
unless defined $value and length $value
|
|
734
|
0 |
0 |
if ref $value
|
|
743
|
0 |
0 |
if ($self->_check_mediatype('application/ogg', 'audio/ogg', 'video/ogg', 'audio/flac')) { }
|
|
|
0 |
0 |
elsif ($self->_check_mediatype('audio/x-wav')) { }
|
|
751
|
0 |
0 |
if (defined $style and defined(my $map = $_audio_scan_tags{$style}))
|
|
757
|
0 |
0 |
if (defined $value and ref $value eq "HASH" and defined $value->{'raw'})
|
|
771
|
0 |
0 |
if defined $self->{'_loaded_barcodes'}
|
|
774
|
0 |
0 |
unless defined $self->{'path'}
|
|
775
|
0 |
0 |
unless eval {
|
|
779
|
0 |
0 |
if (scalar @barcodes)
|
|
788
|
0 |
0 |
if defined $self->{'_loaded_libpng'}
|
|
791
|
0 |
0 |
unless $self->_check_mediatype("image/png")
|
|
792
|
0 |
0 |
unless defined $self->{'path'}
|
|
793
|
0 |
0 |
unless eval {
|
|
795
|
0 |
0 |
if (defined(my $png = eval {
|
|
801
|
0 |
0 |
if (defined(my $ct = $_PNG_colour_types{$IHDR->{'color_type'}}))
|
|
805
|
0 |
0 |
if (defined(my $PLTE = eval {
|
|
806
|
0 |
0 |
if (eval {
|
|
810
|
0 |
0 |
if scalar @colours
|