| line |
true |
false |
branch |
|
56
|
0 |
0 |
if (defined $_[1]) |
|
72
|
0 |
0 |
unless (defined $args{'scm'}) |
|
81
|
0 |
0 |
if (ref $args{'scm'} ne 'Sys::Config::Manage') |
|
90
|
0 |
0 |
if (defined $args{'defaultUID'}) |
|
92
|
0 |
0 |
unless ($args{'default'} =~ /^[0123456789]*$/) |
|
103
|
0 |
0 |
if (defined $args{'defaultGID'}) |
|
105
|
0 |
0 |
unless ($args{'default'} =~ /^[0123456789]*$/) |
|
151
|
0 |
0 |
if (defined $_[2]) |
|
157
|
0 |
0 |
unless ($self->errorblank) |
|
162
|
0 |
0 |
unless (defined $configDir) |
|
164
|
0 |
0 |
if ($$self{'scm'}->error) |
|
175
|
0 |
0 |
if ($$self{'scm'}->error) |
|
182
|
0 |
0 |
if (defined $valid) |
|
190
|
0 |
0 |
unless (-d $$self{'scm'}{'baseDir'} . '/' . $configDir) |
|
199
|
0 |
0 |
if (defined $files[$int]) { } |
|
201
|
0 |
0 |
if ($$self{'scm'}->error) |
|
215
|
0 |
0 |
if ($files[$int] eq $allfiles[$int2]) |
|
222
|
0 |
0 |
unless ($matched) |
|
235
|
0 |
0 |
if ($$self{'scm'}->error) |
|
249
|
0 |
0 |
if ($self->error) |
|
256
|
0 |
0 |
if ($self->error) |
|
262
|
0 |
0 |
unless (chmod $uid, $gid, $files[$int]) |
|
297
|
0 |
0 |
unless ($self->errorblank) |
|
302
|
0 |
0 |
unless (defined $configDir) |
|
304
|
0 |
0 |
if ($$self{'scm'}->error) |
|
315
|
0 |
0 |
if ($$self{'scm'}->error) |
|
322
|
0 |
0 |
if (defined $valid) |
|
330
|
0 |
0 |
unless (-d $$self{'scm'}{'baseDir'} . '/' . $configDir) |
|
338
|
0 |
0 |
unless (defined $file) |
|
346
|
0 |
0 |
unless (-f $$self{'scm'}{'baseDir'} . '/' . $configDir . '/' . $file) |
|
358
|
0 |
0 |
unless (-f $idfile) |
|
364
|
0 |
0 |
unless (open $fh, '<', $idfile) |
|
399
|
0 |
0 |
unless ($self->errorblank) |
|
404
|
0 |
0 |
unless (defined $configDir) |
|
406
|
0 |
0 |
if ($$self{'scm'}->error) |
|
417
|
0 |
0 |
if ($$self{'scm'}->error) |
|
424
|
0 |
0 |
if (defined $valid) |
|
432
|
0 |
0 |
unless (-d $$self{'scm'}{'baseDir'} . '/' . $configDir) |
|
440
|
0 |
0 |
unless (defined $file) |
|
448
|
0 |
0 |
unless (-f $$self{'scm'}{'baseDir'} . '/' . $configDir . '/' . $file) |
|
460
|
0 |
0 |
unless (-f $idfile) |
|
466
|
0 |
0 |
unless (open $fh, '<', $idfile) |
|
500
|
0 |
0 |
unless ($self->errorblank) |
|
505
|
0 |
0 |
unless (defined $configDir) |
|
507
|
0 |
0 |
if ($$self{'scm'}->error) |
|
518
|
0 |
0 |
if ($$self{'scm'}->error) |
|
525
|
0 |
0 |
if (defined $valid) |
|
533
|
0 |
0 |
unless (-d $$self{'scm'}{'baseDir'} . '/' . $configDir) |
|
560
|
0 |
0 |
if (-f $UIDfile or -f $GIDfile) |
|
601
|
0 |
0 |
unless ($self->errorblank) |
|
606
|
0 |
0 |
unless (defined $configDir) |
|
608
|
0 |
0 |
if ($$self{'scm'}->error) |
|
619
|
0 |
0 |
if ($$self{'scm'}->error) |
|
626
|
0 |
0 |
if (defined $valid) |
|
634
|
0 |
0 |
unless (-d $$self{'scm'}{'baseDir'} . '/' . $configDir) |
|
642
|
0 |
0 |
unless (defined $file) |
|
650
|
0 |
0 |
unless (-f $$self{'scm'}{'baseDir'} . '/' . $configDir . '/' . $file) |
|
658
|
0 |
0 |
unless (defined $id) |
|
666
|
0 |
0 |
unless ($id =~ /^[0123456789]*$/) |
|
676
|
0 |
0 |
unless (-d $scmd) |
|
677
|
0 |
0 |
unless (mkdir $scmd) |
|
687
|
0 |
0 |
unless (-d $iddir) |
|
688
|
0 |
0 |
unless (mkdir $iddir) |
|
701
|
0 |
0 |
if (-f $idfile) |
|
706
|
0 |
0 |
unless (open $fh, '>', $idfile) |
|
716
|
0 |
0 |
unless ($exists) |
|
717
|
0 |
0 |
if (defined $$self{'scm'}{'addCommand'}) |
|
724
|
0 |
0 |
if ($exit ne '0') |
|
764
|
0 |
0 |
unless ($self->errorblank) |
|
769
|
0 |
0 |
unless (defined $configDir) |
|
771
|
0 |
0 |
if ($$self{'scm'}->error) |
|
782
|
0 |
0 |
if ($$self{'scm'}->error) |
|
789
|
0 |
0 |
if (defined $valid) |
|
797
|
0 |
0 |
unless (-d $$self{'scm'}{'baseDir'} . '/' . $configDir) |
|
805
|
0 |
0 |
unless (defined $file) |
|
813
|
0 |
0 |
unless (-f $$self{'scm'}{'baseDir'} . '/' . $configDir . '/' . $file) |
|
821
|
0 |
0 |
unless (defined $id) |
|
829
|
0 |
0 |
unless ($id =~ /^[0123456789]*$/) |
|
839
|
0 |
0 |
unless (-d $scmd) |
|
840
|
0 |
0 |
unless (mkdir $scmd) |
|
850
|
0 |
0 |
unless (-d $iddir) |
|
851
|
0 |
0 |
unless (mkdir $iddir) |
|
864
|
0 |
0 |
if (-f $idfile) |
|
869
|
0 |
0 |
unless (open $fh, '>', $idfile) |
|
879
|
0 |
0 |
unless ($exists) |
|
880
|
0 |
0 |
if (defined $$self{'scm'}{'addCommand'}) |
|
887
|
0 |
0 |
if ($exit ne '0') |
|
924
|
0 |
0 |
unless ($self->errorblank) |
|
929
|
0 |
0 |
unless (defined $configDir) |
|
931
|
0 |
0 |
if ($$self{'scm'}->error) |
|
942
|
0 |
0 |
if ($$self{'scm'}->error) |
|
949
|
0 |
0 |
if (defined $valid) |
|
957
|
0 |
0 |
unless (-d $$self{'scm'}{'baseDir'} . '/' . $configDir) |
|
965
|
0 |
0 |
unless (defined $file) |
|
973
|
0 |
0 |
unless (-f $$self{'scm'}{'baseDir'} . '/' . $configDir . '/' . $file) |
|
981
|
0 |
0 |
unless (-f $file) |
|
989
|
0 |
0 |
unless ($$self{'scm'}->notUnderBase($file)) |
|
1000
|
0 |
0 |
if ($self->error) |
|
1033
|
0 |
0 |
unless ($self->errorblank) |
|
1038
|
0 |
0 |
unless (defined $configDir) |
|
1040
|
0 |
0 |
if ($$self{'scm'}->error) |
|
1051
|
0 |
0 |
if ($$self{'scm'}->error) |
|
1058
|
0 |
0 |
if (defined $valid) |
|
1066
|
0 |
0 |
unless (-d $$self{'scm'}{'baseDir'} . '/' . $configDir) |
|
1074
|
0 |
0 |
unless (defined $file) |
|
1082
|
0 |
0 |
unless (-f $$self{'scm'}{'baseDir'} . '/' . $configDir . '/' . $file) |
|
1090
|
0 |
0 |
unless (-f $file) |
|
1098
|
0 |
0 |
unless ($$self{'scm'}->notUnderBase($file)) |
|
1109
|
0 |
0 |
if ($self->error) |
|
1148
|
0 |
0 |
if (defined $_[2]) |
|
1154
|
0 |
0 |
unless ($self->errorblank) |
|
1159
|
0 |
0 |
unless (defined $configDir) |
|
1161
|
0 |
0 |
if ($$self{'scm'}->error) |
|
1172
|
0 |
0 |
if ($$self{'scm'}->error) |
|
1179
|
0 |
0 |
if (defined $valid) |
|
1187
|
0 |
0 |
unless (-d $$self{'scm'}{'baseDir'} . '/' . $configDir) |
|
1196
|
0 |
0 |
if (defined $files[$int]) { } |
|
1198
|
0 |
0 |
if ($$self{'scm'}->error) |
|
1212
|
0 |
0 |
if ($files[$int] eq $allfiles[$int2]) |
|
1219
|
0 |
0 |
unless ($matched) |
|
1232
|
0 |
0 |
if ($$self{'scm'}->error) |
|
1246
|
0 |
0 |
if ($self->error) |
|
1253
|
0 |
0 |
if ($self->error) |