Branch Coverage

blib/lib/Slackware/Slackget/Package.pm
Criterion Covered Total %
branch 39 190 20.5


line true false branch
69 0 4 unless $id
72 0 4 if (scalar(@args) % 2 == 0) { }
102 0 2 unless $package
121 0 2 unless $w
123 2 0 if $w eq $hw
164 24 0 if ($o_pack->can('version')) { }
167 0 24 unless defined $o_pack->version
168 0 24 unless defined $self->version
174 0 32 unless defined $self_version[$k]
175 0 32 unless defined $o_pack_version[$k]
176 32 0 if ($self_version[$k] =~ /^\d+$/ and $o_pack_version[$k] =~ /^\d+$/) { }
178 8 24 if ($self_version[$k] > $o_pack_version[$k]) { }
12 12 elsif ($self_version[$k] < $o_pack_version[$k]) { }
180 0 8 if $ENV{'SG_DAEMON_DEBUG'}
185 0 12 if $ENV{'SG_DAEMON_DEBUG'}
191 0 0 if ($self_version[$k] gt $o_pack_version[$k]) { }
0 0 elsif ($self_version[$k] lt $o_pack_version[$k]) { }
193 0 0 if $ENV{'SG_DAEMON_DEBUG'}
198 0 0 if $ENV{'SG_DAEMON_DEBUG'}
203 4 0 if ($self->getValue('package-version') and $o_pack->getValue('package-version'))
204 0 4 if ($self->getValue('package-version') gt $o_pack->getValue('package-version')) { }
0 4 elsif ($self->getValue('package-version') lt $o_pack->getValue('package-version')) { }
205 0 0 if $ENV{'SG_DAEMON_DEBUG'}
209 0 0 if $ENV{'SG_DAEMON_DEBUG'}
213 0 4 if $ENV{'SG_DAEMON_DEBUG'}
232 4 0 if ($self->{'ROOT'} =~ /^(.*)-([0-9].*)-(i[0-9]86|noarch)-(\d{1,2})(\.tgz)?$/) { }
0 0 elsif ($self->{'ROOT'} =~ /^(.*)-([0-9].*)-(i[0-9]86|noarch)-([^\-]+)(\.tgz)?$/) { }
0 0 elsif ($self->{'ROOT'} =~ /^(.*)-([0-9].*)-(i[0-9]86|noarch)-(\d{1,2})(\w*)(\.tgz)?$/) { }
0 0 elsif ($self->{'ROOT'} =~ /^(.*)-([^-]+)-(i[0-9]86|noarch)-(\d{1,2})(\.tgz)?$/) { }
0 0 elsif ($self->{'ROOT'} =~ /^(.*)-([^-]+)-(i[0-9]86|noarch)-(\d{1,2})(\w*)(\.tgz)?$/) { }
238 4 0 if defined $self->{'SOURCE'} and $self->{'SOURCE'} =~ /^slackware$/i
262 0 0 if defined $self->{'SOURCE'} and $self->{'SOURCE'} =~ /^slackware$/i
296 0 0 if ($_ =~ /^\s*PACKAGE NAME\s*:\s*(.*)\.tgz\s*/) { }
0 0 elsif ($_ =~ /^\s*(COMPRESSED PACKAGE SIZE|PACKAGE SIZE \(compressed\))\s*:\s*(.*) K/) { }
0 0 elsif ($_ =~ /^\s*(UNCOMPRESSED PACKAGE SIZE|PACKAGE SIZE \(uncompressed\))\s*:\s*(.*) K/) { }
0 0 elsif ($_ =~ /^\s*PACKAGE LOCATION\s*:\s*(.*)\s*/) { }
0 0 elsif ($_ =~ /^\s*PACKAGE REQUIRED\s*:\s*(.*)\s*/) { }
0 0 elsif ($_ =~ /^\s*PACKAGE SUGGESTS\s*:\s*([^\n]*)\s*/) { }
0 0 elsif ($_ =~ /^\s*PACKAGE DESCRIPTION:\s*\n*(.*)/ms) { }
0 0 elsif ($is_descr) { }
326 0 0 if ($i =~ /^\s*([^><=\s]+)\s*([><=]+)\s*(.+)\s*$/) { }
0 0 elsif (defined $i and not $i =~ /(,|;|\|)/) { }
328 0 0 if $ref->{'required_version'} =~ /^(.+)-(.+)-(.+)$/
349 0 0 if ($i =~ /^\s*([^><=]+)\s*([><=]+)\s*(.+)\s*$/) { }
0 0 elsif (defined $i and not $i =~ /(,|;|\|)/) { }
351 0 0 if $ref->{'required_version'} =~ /^(.+)-(.+)-(.+)$/
352 0 0 if $ref->{'comparison_type'} eq '<='
353 0 0 if $ref->{'comparison_type'} eq '=>'
368 0 0 if (defined $1)
377 0 0 if (/^\s*[^:]+\s*:\s*(.+)$/)
379 0 0 unless ($have_sd)
402 0 0 if ($self->{'PACK'}{'name'} and defined $self->{'PACK'}{'description'} and $self->{'PACK'}{'description'})
427 0 0 unless defined $self->{'PACK'}{'description'}
429 0 0 if ($self->{'PACK'}{'description'} =~ /this\s+version\s+.*\s+was\s+comp(iled|lied)\s+for\s+([^\n]*)\s+(.|\n)*\s+by\s+([^\n\t]*)/i)
433 0 0 if ($self->{'PACK'}{'description'} =~ m[\s*(http://[^\s]+)]i)
436 0 0 if ($self->{'PACK'}{'description'} =~ /\s*([\w\.\-]+\@[^\s]+\.[\w]+)/i)
440 0 0 if ($self->{'PACK'}{'description'} =~ /Package\s+created\s+by:\s+(.*)\s+&lt;([^\n\t]*)&gt;/i) { }
0 0 elsif ($self->{'PACK'}{'description'} =~ /Packager:\s+(.*)\s+&lt;(.*)&gt;/i) { }
0 0 elsif ($self->{'PACK'}{'description'} =~ /Package\s+created\s+.*by\s+(.*)\s+\(([^\n\t]*)\)/i) { }
0 0 elsif ($self->{'PACK'}{'description'} =~ /Packaged by ([^\s]+) ([^\s]+) \((.*)\)/i) { }
0 0 elsif ($self->{'PACK'}{'description'} =~ /\s*Package\s+Maintainer:\s+(.*)\s+\(([^\n\t]*)\)/i) { }
0 0 elsif ($self->{'PACK'}{'description'} =~ /Packaged\s+by\s+(.*)\s+&lt;([^\n\t]*)&gt;/i) { }
466 0 0 if ($self->{'PACK'}{'description'} =~ /Package created by ([^\s]+) ([^\s]+)/i)
471 0 0 if ($self->{'PACK'}{'description'} =~ /Packaged\s+by:?\s+(.*)(\s+(by|for|to|on))?/i)
474 0 0 if ($self->{'PACK'}{'description'} =~ /Package\s+created\s+by:?\s+([^\n\t]*)/i)
478 0 0 if ($self->{'PACK'}{'description'} =~ /Package\s+created\s+by\s+(.*)\s+\[([^\n\t]*)\]/i)
482 0 0 if ($self->{'PACK'}{'description'} =~ /Packager:\s+([^\n\t]*)/i)
485 0 0 if ($self->{'PACK'}{'description'} =~ /Packager\s+([^\n\t]*)/i)
488 0 0 if ($self->{'PACK'}{'description'} =~ /Home\s{0,1}page: ([^\n\t]*)/i)
491 0 0 if ($self->{'PACK'}{'description'} =~ /Package URL: ([^\n\t]*)/i)
495 0 0 if ($self->{'PACK'}{'description'} =~ /Package creat(ed|e) with ([^\s]*) ([^\s]*)/i)
525 0 4 if (defined $self->{'STATUS'} and ref $self->{'STATUS'} eq 'Slackware::Slackget::Status')
529 0 4 if ($self->{'PACK'}{'package-date'})
534 0 4 if ($self->{'PACK'}{'date'})
539 4 0 if ($self->{'STATS'})
540 2 0 if ($self->{'STATS'}{'dwc'} == 0 and scalar @{$self->{'STATS'}{'hw'};} > 0 and defined $self->getValue('description'))
549 0 4 if ($self->{'PACK'}{'required'})
552 0 0 if ref $dep ne 'ARRAY'
556 0 0 if $ad->{'required_version'}
557 0 0 if $ad->{'comparison_type'}
566 0 4 if ($self->{'PACK'}{'suggested'})
569 0 0 if ref $dep ne 'ARRAY'
573 0 0 if $ad->{'required_version'}
574 0 0 if $ad->{'comparison_type'}
584 0 26 if /^_[A-Z_]+$/
585 24 2 if defined $self->{'PACK'}{$_}
628 0 2 if (defined $self->{'STATUS'} and ref $self->{'STATUS'} eq 'Slackware::Slackget::Status')
632 0 2 if ($self->{'PACK'}{'package-date'})
637 0 2 if ($self->{'PACK'}{'date'})
643 0 14 if ($_ eq 'package-source') { }
645 0 0 if defined $self->{'PACK'}{$_}
649 12 2 if defined $self->{'PACK'}{$_}
796 0 0 if (defined $status) { }
798 0 0 if ref $status ne 'Slackware::Slackget::Status'
913 0 0 if (exists $self->{'PACK'}{'package-location'} and defined $self->{'PACK'}{'package-location'}) { }