| line |
true |
false |
branch |
|
95
|
1 |
28 |
if ($data{'TYPE'} =~ /hardlink/i) |
|
97
|
0 |
1 |
unless (exists $$self{'OBJECTS'}{$data{'SOURCE'}}) |
|
109
|
2 |
26 |
unless $object |
|
112
|
0 |
26 |
if $$self{'OBJECTS'}{$object->destination} |
|
137
|
0 |
1 |
if ($value) { } |
|
143
|
0 |
1 |
if ($$self{'LPP_PACKAGE_TYPE'}) { } |
|
149
|
1 |
0 |
if ($self->_lppmode eq 'I') { } |
|
177
|
1 |
4 |
if ($value) { } |
|
203
|
0 |
1 |
unless (scalar $self->program_name) |
|
208
|
0 |
1 |
unless (scalar $self->component_name) |
|
214
|
0 |
1 |
unless ($self->_setup) |
|
221
|
1 |
0 |
unless ($self->_create_bff) |
|
227
|
0 |
0 |
unless ($self->_cleanup) |
|
246
|
1 |
0 |
unless (-d $tmp_dir) |
|
248
|
0 |
1 |
unless (mkpath($tmp_dir, 0, 488)) |
|
257
|
1 |
0 |
if ($self->_find_lpp_type eq 'B') { } |
|
|
0 |
0 |
elsif ($self->_find_lpp_type eq 'U') { } |
|
|
0 |
0 |
elsif ($self->_find_lpp_type eq 'H') { } |
|
268
|
0 |
0 |
unless ($self->add_item(%data)) |
|
280
|
0 |
0 |
unless ($self->add_item(%data)) |
|
287
|
0 |
1 |
unless ($self->_create_control_files) |
|
294
|
0 |
1 |
unless ($self->_create_package_structure) |
|
301
|
0 |
1 |
unless ($self->_create_lpp_name) |
|
404
|
5 |
6 |
if (scalar $version) |
|
406
|
1 |
4 |
unless ($version =~ /^\d+(\.\d+){3,4}$/) |
|
413
|
1 |
4 |
unless $major |
|
414
|
2 |
3 |
unless $release |
|
415
|
2 |
3 |
unless $mod |
|
416
|
2 |
3 |
unless $fix |
|
419
|
1 |
4 |
if $major <= 0 |
|
420
|
2 |
3 |
if $release <= 0 |
|
423
|
1 |
4 |
if (length $major > 2) |
|
429
|
1 |
4 |
if (length $release > 2) |
|
435
|
1 |
4 |
if (length $mod > 4) |
|
441
|
1 |
4 |
if (length $fix > 4) |
|
447
|
1 |
4 |
if (defined $fixid and length $fixid > 9) |
|
455
|
2 |
3 |
if ($mod eq 0 and $fix eq 0) { } |
|
465
|
2 |
3 |
if defined $fixid |
|
495
|
6 |
1 |
if scalar $$self{'LPP_TYPE'} |
|
499
|
0 |
20 |
if ($object->lpp_type_is_share) |
|
500
|
18 |
2 |
if ($object->lpp_type_is_user) |
|
501
|
2 |
0 |
if ($object->lpp_type_is_root) |
|
504
|
0 |
1 |
if ($share and $user) { } |
|
|
0 |
1 |
elsif ($share and $root) { } |
|
|
1 |
0 |
elsif ($root) { } |
|
|
0 |
0 |
elsif ($user) { } |
|
|
0 |
0 |
elsif ($share) { } |
|
545
|
5 |
6 |
if ($value) { } |
|
578
|
0 |
1 |
if ($self->reboot_required) { } |
|
592
|
1 |
0 |
if ($self->prerequisites) |
|
637
|
1 |
7 |
if $dir eq '.' |
|
667
|
10 |
16 |
if ($type =~ /directory/i) { } |
|
|
15 |
1 |
elsif ($type =~ /file/i) { } |
|
|
0 |
1 |
elsif ($type =~ /hard/i) { } |
|
|
1 |
0 |
elsif ($type =~ /soft/i) { } |
|
669
|
10 |
0 |
unless (-d $destination) |
|
673
|
0 |
10 |
unless (system("chown $user $destination") eq 0) |
|
678
|
0 |
10 |
unless (system("chgrp $group $destination") eq 0) |
|
687
|
1 |
14 |
unless (-d $directory) |
|
691
|
0 |
15 |
unless (copy($source, $destination)) |
|
695
|
0 |
15 |
unless (system("chown $user $destination") eq 0) |
|
700
|
0 |
15 |
unless (system("chgrp $group $destination") eq 0) |
|
705
|
0 |
15 |
unless (system("chmod $mode $destination") eq 0) |
|
713
|
0 |
0 |
unless (link $source, $destination) |
|
721
|
0 |
1 |
unless (symlink $source, $destination) |
|
736
|
1 |
0 |
if -f "$tmp_dir/root_liblpp.a" |
|
767
|
0 |
1 |
if $self->_find_lpp_type eq 'H' |
|
768
|
1 |
0 |
if $self->_find_lpp_type =~ /U|B/ |
|
770
|
0 |
1 |
if ($self->_lppmode eq 'U') |
|
777
|
1 |
0 |
if $self->_find_lpp_type =~ /B/ |
|
786
|
1 |
0 |
unless (-d $control_dir) |
|
791
|
1 |
0 |
if ($self->_find_lpp_type eq 'B') |
|
805
|
20 |
2 |
unless $destination =~ m[/inst_root/] |
|
810
|
2 |
0 |
unless $inv_type eq 'SYMLINK' |
|
818
|
1 |
1 |
if ($inv_type =~ /FILE/) |
|
820
|
0 |
1 |
if ($type =~ /config|volatile/i) { } |
|
837
|
0 |
2 |
if (scalar $links) |
|
841
|
0 |
2 |
if ($inv_type eq 'SYMLINK') |
|
853
|
0 |
1 |
unless opendir DIR, "$control_dir" |
|
858
|
2 |
2 |
if $file =~ /^.$|^..$/ |
|
859
|
0 |
2 |
unless (system("ar -c -q $tmp_dir/root_liblpp.a $control_dir/$file") == 0) |
|
867
|
1 |
0 |
if (-f "$tmp_dir/root_liblpp.a") |
|
875
|
0 |
1 |
unless ($self->add_item(%data)) |
|
889
|
1 |
0 |
unless (-d $control_dir) |
|
915
|
7 |
18 |
if $destination =~ m[/usr/lpp] |
|
923
|
12 |
6 |
if ($inv_type =~ /FILE/) |
|
925
|
0 |
12 |
if ($type =~ /config|volatile/i) { } |
|
942
|
1 |
17 |
if (scalar $links) |
|
946
|
1 |
17 |
if ($inv_type eq 'SYMLINK') |
|
960
|
0 |
1 |
if ($self->license_file) { } |
|
962
|
0 |
0 |
unless copy($self->license_file, "$control_dir/$program_name.$component_name.copyright") |
|
972
|
0 |
1 |
if ($self->reboot_required) |
|
981
|
0 |
1 |
unless opendir DIR, "$control_dir" |
|
986
|
2 |
3 |
if $file =~ /^.$|^..$/ |
|
987
|
0 |
3 |
unless (system("ar -c -q $tmp_dir/user_liblpp.a $control_dir/$file") == 0) |
|
995
|
1 |
0 |
if (-f "$tmp_dir/user_liblpp.a") |
|
1003
|
0 |
1 |
unless ($self->add_item(%data)) |
|
1034
|
0 |
1 |
unless open FILE, '>./backup.list' |
|
1048
|
1 |
0 |
unless (system("backup -vi -q -f $package_file < ./backup.list") eq 0) |
|
1077
|
0 |
1 |
unless ($self->add_item(%data)) |
|
1082
|
0 |
1 |
if ($self->_lppmode eq 'U') |
|
1086
|
0 |
0 |
unless ($self->add_item(%data)) |
|
1091
|
0 |
0 |
unless ($self->add_item(%data)) |
|
1098
|
0 |
1 |
unless ($self->add_item(%data)) |
|
1107
|
20 |
2 |
if $destination =~ m[^/usr] |
|
1110
|
0 |
2 |
if ($self->_lppmode eq 'U') |
|
1117
|
0 |
2 |
unless ($object->destination($new_destination)) |
|
1144
|
0 |
1 |
if ($self->_lppmode eq 'U') |
|
1157
|
20 |
3 |
unless $destination =~ m[$root_dir/] |
|
1158
|
1 |
2 |
if $destination =~ m[$root_dir/liblpp.a] |
|
1167
|
2 |
2 |
unless (exists $destinations{$directory}) |
|
1173
|
0 |
2 |
unless ($self->add_item(%data)) |