Branch Coverage

blib/lib/Linux/DVB/DVBT/Config.pm
Criterion Covered Total %
branch 145 364 39.8


line true false branch
87 0 0 if ($frequency == $$tuning_href{'ts'}{$this_tsid}{'frequency'})
123 0 0 if ($tsid and exists $$tuning_href{'ts'}{$tsid})
149 0 0 unless $pid
163 0 0 if ($tsid eq $$tuning_href{'pr'}{$chan}{'tsid'})
167 0 0 if ($pid == $$tuning_href{'pr'}{$chan}{$stream})
173 0 0 if $pr_href
179 0 0 if ($pid == $_)
187 0 0 if $pr_href
223 0 7 if $DEBUG
228 0 7 unless $pid
265 16 2427 if ($pid == $$aref[1])
267 0 16 if $DEBUG
322 0 15 if $DEBUG
326 15 0 if ($found_channel_name)
332 15 0 if ($demux_params_href)
355 3 15 if (exists $$search_href{$channel_name}) { }
384 0 135 if $DEBUG > 3
386 0 135 if $DEBUG > 3
391 0 15 if $DEBUG > 2
400 0 126 if $DEBUG > 2
401 14 112 if ($srch_chan eq $search)
404 0 14 if $DEBUG
409 14 56 if $found_channel_name
424 3 1 if ($alias_href and scalar keys %$alias_href)
426 0 3 if $DEBUG > 3
428 2 1 if ($alias_key)
431 0 2 if $DEBUG > 3
504 0 18 if $DEBUG
510 4 14 unless ($language_spec)
512 0 4 if $DEBUG
521 0 14 if $DEBUG
527 0 56 if $DEBUG >= 10
534 2 12 if ($language_spec =~ s/\+//g)
539 0 2 if $DEBUG >= 10
542 0 14 if $DEBUG >= 10
552 0 20 if $DEBUG >= 10
558 0 32 if $DEBUG >= 10
559 12 20 if ($$audio_href{'lang'} =~ /$lang/i)
562 0 12 if $DEBUG >= 10
565 0 12 if $DEBUG >= 10
568 8 12 unless @audio_details
572 8 6 if (@lang or not $pid)
574 8 0 if $lang
645 0 2 if $DEBUG
651 1 1 unless ($language_spec)
653 0 1 if $DEBUG
662 0 1 if $DEBUG
668 0 4 if $DEBUG >= 10
675 0 1 if ($language_spec =~ s/\+//g)
680 0 0 if $DEBUG >= 10
683 0 1 if $DEBUG >= 10
693 0 2 if $DEBUG >= 10
699 0 3 if $DEBUG >= 10
700 2 1 if ($$subtitle_href{'lang'} =~ /$lang/i)
703 0 2 if $DEBUG >= 10
706 0 2 if $DEBUG >= 10
709 1 1 unless @subtitle_details
713 0 1 if (@lang or not $pid)
715 0 0 if $lang
753 9 0 if ($out_spec =~ /a/i)
757 4 5 if $error
761 6 0 if $pid
772 4 1 if ($out_spec =~ /v/i)
775 4 0 if $pid
785 2 3 if ($out_spec =~ /s/i)
789 0 2 if $error
793 3 0 if $pid
836 217 441 if $pid != $audio_pid
872 21 7 if $pid != $sub_pid
896 0 5 unless defined $search_path
900 5 0 if ($dir)
908 0 15 if $DEBUG
916 0 5 if $DEBUG
917 0 5 if $DEBUG >= 5
935 0 1 unless defined $search_path
937 1 0 if ($dir and $href)
946 0 1 if $DEBUG
968 0 0 unless exists $FILES{$filetype}
970 0 0 unless defined $search_path
973 0 0 if ($dir)
997 0 0 unless exists $FILES{$filetype}
999 0 0 unless defined $search_path
1002 0 0 if ($dir)
1052 0 0 if ($tsid =~ /(\d+)([a-z])/i)
1074 0 0 if (exists $$tuning_href{'ts'}{$tsid})
1107 0 0 if $DEBUG >= 5
1115 0 0 if ($old_href and $new_href)
1120 0 0 if (exists $$new_href{$region})
1133 0 0 unless $old_href
1135 0 0 if $DEBUG >= 5
1201 0 0 if $DEBUG >= 5
1207 0 0 if $DEBUG
1209 0 0 if ($old_href and $new_href)
1211 0 0 if $DEBUG >= 2
1234 0 0 if $DEBUG
1245 0 0 unless $old_href
1247 0 0 if $DEBUG >= 5
1249 0 0 if $DEBUG
1263 0 0 if $DEBUG
1264 0 0 if $DEBUG >= 2
1282 0 0 if (exists $$new_old_info_href{'old'}{'tsid'}{$tsid})
1290 0 0 if ($old_freq == $new_freq)
1304 0 0 if (not $overlap) { }
1311 0 0 if ($$options_href{'duplicates'}) { }
1319 0 0 if (not $$options_href{'num_chans'} or $new_chans == $old_chans) { }
0 0 elsif ($new_chans < $old_chans) { }
1324 0 0 if (_strength_cmp($new_strength_href, $old_strength_href) < 0) { }
1357 0 0 if ($delete) { }
0 0 elsif ($duplicate) { }
1432 0 0 if $DEBUG
1433 0 0 if $DEBUG >= 2
1474 0 0 if $DEBUG
1475 0 0 if $DEBUG >= 2
1484 0 0 if $DEBUG
1486 0 0 if (exists $$new_old_info_href{'old'}{'tsid-pnr'}{"$tsid-$pnr"} and $$new_old_info_href{'old'}{'tsid-pnr'}{"$tsid-$pnr"} ne $chan)
1492 0 0 if $DEBUG
1497 0 0 if (exists $$old_href{'pr'}{$chan})
1500 0 0 if ($$new_href{'pr'}{$chan}{'tsid'} eq $$old_href{'pr'}{$chan}{'tsid'})
1512 0 0 if (not $overlap) { }
1519 0 0 if ($$options_href{'duplicates'}) { }
1654 10 5 if ($FILES{$region}{'required'})
1656 0 10 unless -f "$d/$FILES{$region}{'file'}"
1660 5 0 if ($found)
1667 0 0 $dir ? :
0 5 if $DEBUG
1687 0 1 if $DEBUG
1693 0 1 if $DEBUG
1696 1 0 unless (-d $d)
1702 0 1 if $@
1704 0 1 if $DEBUG
1707 1 0 if (-d $d)
1709 0 1 if $DEBUG
1714 3 0 if (open my $fh, ">>$d/$FILES{$region}{'file'}") { }
1718 0 3 if $DEBUG
1722 0 0 if $DEBUG
1730 1 0 if ($found)
1737 0 0 $dir ? :
0 1 if $DEBUG
1778 0 5 unless open my $fh, "<$fname"
1785 4 221 if $line =~ /^\s*#/
1787 18 203 if ($line =~ /\[([\da-z]+)\]/i) { }
184 19 elsif ($line =~ /(\S+)\s*=\s*(\S+)/) { }
0 19 elsif ($line =~ /(\S+)\s*=/) { }
1793 184 0 if ($tsid)
1835 0 5 if $DEBUG >= 5
1838 0 5 unless open my $fh, "<$fname"
1844 221 4 unless $line =~ /^\s*#/
1846 0 4 if $DEBUG >= 5
1849 2 2 if ($line =~ /^\s*#\s*VDR\s+(\d+)\s+(\d+)\s+(\d+)\s+(\d+)\s+(\d+)\s+(\d+)\s+(\d+)\s+(\d+)\s+(\d+)/i)
1853 0 2 if (exists $dvb_ts_freqs{$freq})
1859 0 2 if $DEBUG >= 5
1877 0 5 if $DEBUG >= 5
1895 0 1 unless open my $fh, ">$fname"
1897 0 1 if $DEBUG >= 5
1900 1 0 if ($freqs_href and keys %$freqs_href)
1964 18 0 if ($val =~ /\S+/)
2008 0 5 unless open my $fh, "<$fname"
2016 4 2094 if $line =~ /^\s*#/
2018 150 1944 if ($line =~ /\[([\da-z]+)\-([\d]+)\]/i) { }
1782 162 elsif ($line =~ /(\S+)\s*=\s*(\S+.*)/) { }
0 162 elsif ($line =~ /(\S+)\s*=/) { }
2024 1782 0 if ($pnr and $tsid)
2069 0 1 unless open my $fh, ">$fname"
2099 0 5 unless $$href{$a}{'tsid'} <=> $$href{$b}{'tsid'}
2109 64 0 if ($val =~ /\S+/)
2149 2 3 if (-f $fname)
2151 0 2 unless open my $fh, "<$fname"
2157 4 4 if $line =~ /^\s*#/
2162 3 1 if ($line =~ /(\S+[^=]+)\s*=\s*(\S+[^=]+)\s*/)
2193 0 1 unless open my $fh, ">$fname"
2205 0 0 if ($val =~ /\S+/)
2232 0 0 if $DEBUG
2234 0 0 if (ref $href eq 'HASH')
2238 0 0 if $DEBUG
2240 0 0 if exists $$href{$field}
2243 0 0 if ($$strength_href{$field} == 65535)
2245 0 0 if $DEBUG
2273 0 0 if (defined $$a_href{$field} and defined $$b_href{$field} and $$a_href{$field} > 0 and $$a_href{$field} > 0)
2280 0 0 if $DEBUG
2288 0 0 if ($use eq 'ber')
2294 0 0 if $DEBUG
2305 0 0 if ($$href{'use'})