Branch Coverage

blib/lib/Data/iRealPro/Output/Imager.pm
Criterion Covered Total %
branch 0 376 0.0


line true false branch
47 0 0 if ($options->{'npp'})
49 0 0 unless $options->{'output'} =~ /\.(jpg|png)$/i
50 0 0 if ($options->{'npp'} =~ s/_strict//)
53 0 0 if ($options->{'npp'} =~ s/-$//) { }
59 0 0 unless $options->{'npp'} eq 'hand'
62 0 0 $options->{'npp'} eq 'hand' ? :
0 0 if (-s $self->{'prefab'} . 'quality_h' . ($options->{'npp'} eq 'hand' ? '_hand' : '') . '.png') { }
70 0 0 if $options->{'verbose'}
76 0 0 if exists $options->{$_}
81 0 0 if ($options->{'npp'}) { }
0 0 elsif ($options->{'scale'} and $options->{'scale'} =~ /^[\d.]+$/) { }
142 0 0 if ($plname and @{$u->{'playlist'}{'songs'};} > 1)
143 0 0 if ($self->{'output'} and not $self->{'output'} =~ /\%\d*[dt]/ and not $self->{'output'} =~ /\.pdf$/i)
150 0 0 if $options->{'verbose'}
153 0 0 unless defined $self->{'toc'}
160 0 0 if ($outtype eq 'pdf') { }
0 0 elsif ($outtype =~ /^png|jpg$/) { }
161 0 0 if (eval { do { require PDF::API2 } }) { }
171 0 0 if (eval { do { require Imager } }) { }
187 0 0 if ($outtype eq 'pdf' and @{$u->{'playlist'}{'songs'};} > 1)
207 0 0 if $self->{'verbose'}
214 0 0 unless $csv_fd
217 0 0 if ($numpages > 1) { }
239 0 0 if ($outtype eq 'pdf')
240 0 0 if $self->{'toc'}
242 0 0 if $self->{'verbose'}
243 0 0 if ($csv_fd)
245 0 0 if $self->{'verbose'}
256 0 0 if ($self->{'debug'})
263 0 0 if ($self->{'debug'})
318 0 0 if ($self->{'npp'}) { }
324 0 0 if ($self->{'npp'} eq 'hand')
335 0 0 if $v < 2480
349 0 0 unless ($self->{'pdf'})
358 0 0 unless $self->{'pdf'} or $self->{'im'}
374 0 0 if ($dy < 1.6 * $musicsize)
393 0 0 if $self->{'npp'}
396 0 0 if ($song->{'style'})
399 0 0 if $self->{'npp'}
403 0 0 if ($song->{'composer'})
407 0 0 if @t == 2
410 0 0 if $self->{'npp'}
429 0 0 unless ($onpage)
444 0 0 unless $_
445 0 0 if ($self->{'npp'}) { }
454 0 0 if ($y + $dy > $low)
461 0 0 unless $_
463 0 0 if ($self->{'npp'})
468 0 0 /^repeat(?:Right)?Left$/ ? :
474 0 0 unless $_
476 0 0 if ($self->{'npp'})
482 0 0 if (/^repeatRight$/)
484 0 0 if (($i + 1) % $numcols and $i < @$cells - 1 and $$cells[$i + 1]->lbar and $$cells[$i + 1]->lbar eq 'repeatLeft')
497 0 0 unless $_
499 0 0 if ($self->{'npp'})
500 0 0 if $t1 == 12 and $t2 == 8
511 0 0 if $t1 > 10 or $t2 > 10
526 0 0 unless $_
527 0 0 if ($self->{'npp'})
538 0 0 unless $_
565 0 0 if $t =~ s/\x{e2f}/\x{1d13e}/g
568 0 0 if $t =~ s/\x{491}/\x{1d13d}/g
571 0 0 if $t =~ s/\x{2555}/\x{1d13f}/g
574 0 0 if ($self->{'npp'})
575 0 0 $hack ? :
587 0 0 unless $_
589 0 0 $cell->sz ? :
591 0 0 if ($c =~ /repeat\dBars?/)
599 0 0 if ($self->{'npp_strict'}) { }
0 0 elsif ($c eq 'repeat1Bar' or $c eq 'repeat2Bars' and not $cell->rbar) { }
601 0 0 if ($c eq 'repeat1Bar') { }
615 0 0 if $cells->[$pb]->lbar or $pb > 1 and $$cells[$pb - 1]->rbar
622 0 0 if $cells->[$nb]->rbar or $nb + 1 < @$cells and $$cells[$nb + 1]->lbar
630 0 0 if ($self->{'npp'}) { }
631 0 0 if ($c eq 'repeat1Bar') { }
649 0 0 if $cells->[$nb]->rbar or $nb + 1 < @$cells and $$cells[$nb + 1]->lbar
656 0 0 if ($self->{'npp'}) { }
667 0 0 if ($c =~ /^repeat(Slash)$/)
668 0 0 if ($self->{'npp'}) { }
677 0 0 if ($self->{'npp'}) { }
678 0 0 $cell->sz ? :
688 0 0 unless $_
689 0 0 if ($self->{'npp'}) { }
700 0 0 unless defined $_
702 0 0 if ($self->{'npp'})
707 0 0 if $n
720 0 0 if ($cell->flags and $cell->flags & 1)
723 0 0 if ($self->{'npp'})
735 0 0 unless $_
736 0 0 if ($self->{'npp'})
742 0 0 if $t eq 'i'
743 0 0 if $t eq 'v'
761 0 0 if ($self->{'im'} and $self->{'crop'} and $low)
765 0 0 if ($self->{'outtype'} =~ /^png|jpg$/)
767 0 0 if ($self->{'npp'} and $self->{'im'}->getheight > 2480)
770 0 0 if $self->{'verbose'}
803 0 0 unless ($did)
806 0 0 if $ot eq 'jpg'
807 0 0 if $of =~ /\%\d*d/
811 0 0 if $self->{'verbose'}
830 0 0 if ($c =~ m[(.*?)/(.*)])
840 0 0 if $root eq 'W'
841 0 0 if ($root eq 'N' and $c[0] eq 'C') { }
849 0 0 if (@c)
850 0 0 if ($c[0] eq 'b') { }
0 0 elsif ($c[0] eq '#') { }
866 0 0 if ($c eq 'b') { }
0 0 elsif ($c eq '#') { }
0 0 elsif ($c =~ /\d/) { }
0 0 elsif ($c eq '^') { }
0 0 elsif ($c eq 'o') { }
0 0 elsif ($c eq 'h') { }
0 0 elsif ($c eq '-') { }
900 0 0 unless $bass
937 0 0 if ($pages == 1)
950 0 0 if ($y > $bm)
971 0 0 if ($self->{'im'})
976 0 0 if ($self->{'pdf'})
987 0 0 if ($self->{'im'})
999 0 0 if ($self->{'pdf'})
1014 0 0 if $lcr eq 'c'
1015 0 0 if $lcr eq 'r'
1017 0 0 if ($self->{'im'})
1022 0 0 if ($self->{'pdf'})
1025 0 0 if $col ne $black
1027 0 0 if $col ne $black
1051 0 0 unless exists $self->{'musicglyphs'}{$smc}
1061 0 0 unless exists $self->{'musicglyphs'}{$smc}
1072 0 0 if ($self->{'im'})
1078 0 0 if ($self->{'pdf'})
1101 0 0 unless $self->{'npp'}
1105 0 0 unless (-r $ff)
1108 0 0 unless $ENV{'FONTDIR'} or $App::Packager::PACKAGED
1111 0 0 if ($self->{'im'})
1113 0 0 unless $self->{$_} = ($fontcache{$ff} ||= 'Imager::Font'->new('file', $ff))
1116 0 0 if ($self->{'pdf'})
1117 0 0 unless ($fontcache{$ff})
1118 0 0 unless ($fontcache{$ff})
1132 0 0 if ($self->{'npp'}) { }
1161 0 0 if ($c eq 'NC')
1165 0 0 if ($flags & 1)
1169 0 0 if ($flags & 2)
1177 0 0 if ($c =~ /^(.+)\*(.*)\*(.*)$/)
1183 0 0 if ($flags & 2) { }
1198 0 0 if $c eq 'nc'
1200 0 0 if ($c =~ m[^(.*)/(.+)$])
1204 0 0 if ($c =~ /^([a-gw][b#]?)(.*)$/)
1207 0 0 if ($quality =~ s/^-/m/)
1237 0 0 if $bar eq 'repeatLeft' or $bar eq 'repeatRight'
1238 0 0 if $bar eq 'repeatRight'
1239 0 0 if $bar eq 'repeatLeft'
1240 0 0 if $bar eq 'barlineDouble'
1241 0 0 if $bar eq 'barlineFinal'
1242 0 0 if $bar eq 'barlineSingle'
1273 0 0 $n == 3 ? :
0 0 $n == 2 ? :
0 0 $n == 1 ? :
1283 0 0 if $sign eq 'fermata'
1298 0 0 if $npp_imgcache{$img}
1302 0 0 if ($self->{'npp'} eq 'hand')
1304 0 0 unless ($self->{'npp_strict'} and $img =~ /rehearsal_mark|root_nc|root_xx/)
1307 0 0 unless (-s $if)
1314 0 0 unless (-s $if)
1318 0 0 if $self->{'npp'} eq 'hand'
1320 0 0 unless $npp_imgcache{$img} = 'Imager'->new('file', $if)
1333 0 0 if $img =~ /(single|double)_barline/
1337 0 0 if $red
1348 0 0 if $npp_imgcache{$img}
1350 0 0 unless my $im = 'Imager'->new('xsize', 218, 'ysize', 262, 'model', 'rgba')
1356 0 0 if $root =~ /^([a-gw])([b#x])$/
1357 0 0 $acc eq 'b' ? :
0 0 if $acc
1359 0 0 $flags & 2 ? :
1360 0 0 $flags & 2 ? :
1363 0 0 if $acc
1365 0 0 if $quality
1368 0 0 if ($bass)
1371 0 0 $acc eq 'b' ? :
0 0 if $acc
1373 0 0 $flags & 1 ? :
1374 0 0 if $flags & 2
1375 0 0 $flags & 1 ? :
1376 0 0 if $flags & 2
1377 0 0 $flags & 1 ? :
1378 0 0 $flags & 1 ? :
1382 0 0 if $acc
1391 0 0 if $flags & 1
1392 0 0 if $flags & 2