Branch Coverage

blib/lib/RPM/Header/PurePerl.pm
Criterion Covered Total %
branch 32 56 57.1


line true false branch
21 0 1 unless (defined $filename and open RPMFILE, "<$filename")
40 0 1 if (!$$self{'hash'}{'LEAD_MAGIC'} eq $RPM_FILE_MAGIC)
43 0 1 if (defined $readtype and $readtype eq 'onlylead')
62 2 0 if ($header_magic eq $RPM_HEADER_MAGIC)
68 1 1 if ($header_num == 1) { }
71 1 0 if ($header_size % 8 == 0) { }
92 4 47 if ($header_num == 1)
95 0 51 if (not defined $RPM::Header::PurePerl::hdr_tags{$tag}) { }
0 51 elsif ($type == 0) { }
0 51 elsif ($type == 1) { }
0 51 elsif ($type == 2) { }
2 49 elsif ($type == 3) { }
14 35 elsif ($type == 4) { }
0 35 elsif ($type == 5) { }
133 32 19 if ($type == 6 or $type == 8 or $type == 9) { }
3 16 elsif ($type == 7) { }
147 36 15 if (defined $RPM::Header::PurePerl::hdr_tags{$tag}{'TYPE'} and $RPM::Header::PurePerl::hdr_tags{$tag}{'TYPE'} == 1) { }
163 0 1 if (defined $$self{'hash'}{'FILENAMES'})
169 0 0 if ($filename =~ m[(.*/)(.*$)]) { }
175 0 0 unless (defined $quick_dirnames{$dir})
191 0 0 unless (defined $quick_provides{$$self{'hash'}{'NAME'}} or defined $quick_provideflags{'8'} or defined $quick_provideversion{$$self{'hash'}{'VERSION'}})
201 1 0 if ($$self{'hash'}{'FILEVERIFYFLAGS'})
204 1 0 if (int $val == $val and $val >= 2147483648 and $val <= 4294967295)
212 0 1 if (defined $$self{'hash'}{'SIGNATURE_MD5'})
218 0 1 if (defined $$self{'hash'}{'EPOCH'})
222 1 0 if (defined $$self{'hash'}{'LICENSE'})
226 1 0 if (defined $$self{'hash'}{'PROVIDENAME'})
230 0 1 if (defined $$self{'hash'}{'OBSOLETENAME'})