line |
true |
false |
branch |
27
|
0 |
10 |
if (-f $rootdir and not -d $rootdir) |
45
|
0 |
15 |
unless _validate_dir($dir) |
54
|
0 |
117 |
if $P |
55
|
5 |
112 |
if (defined $timeout and &Time::HiRes::time() > $expire) |
57
|
0 |
5 |
if $P |
61
|
1 |
111 |
if (&Time::HiRes::time() > $last_check + $HEARTBEAT_CHECK) |
62
|
0 |
1 |
if $P |
69
|
0 |
10 |
if $P |
77
|
0 |
4 |
unless _validate_dir($dir) |
86
|
0 |
35 |
if $P |
87
|
1 |
34 |
if (defined $timeout and &Time::HiRes::time() > $expire) |
89
|
0 |
1 |
if $P |
93
|
0 |
34 |
if (&Time::HiRes::time() > $last_check + $HEARTBEAT_CHECK) |
94
|
0 |
0 |
if $P |
101
|
0 |
3 |
if $P |
111
|
1 |
4 |
if ($op & 4) |
114
|
3 |
2 |
if ($op & 2) |
117
|
0 |
2 |
if ($op & 1) |
120
|
2 |
0 |
if ($op & 8) |
130
|
1 |
13 |
unless (defined $LOCK{$dir}) |
131
|
0 |
1 |
if &__inGD() |
138
|
0 |
13 |
unless (defined $filename) |
139
|
0 |
0 |
if &__inGD() |
144
|
0 |
13 |
if $_DEBUG |
145
|
0 |
13 |
unless (-f $filename) |
146
|
0 |
0 |
if &__inGD() |
153
|
13 |
0 |
if ($z) |
154
|
0 |
13 |
if $_DEBUG |
155
|
0 |
13 |
if $_DEBUG |
159
|
0 |
0 |
if &__inGD() |
173
|
0 |
0 |
unless $ok |
180
|
0 |
0 |
unless $ok |
188
|
0 |
0 |
unless ($ok or &__inGD()) |
201
|
0 |
0 |
unless (lock_ex($dir, $timeout)) |
206
|
0 |
0 |
if (wantarray) { } |
212
|
0 |
0 |
if ($@) |
216
|
0 |
0 |
wantarray ? : |
221
|
0 |
0 |
unless (lock_sh($dir, $timeout)) |
226
|
0 |
0 |
if (wantarray) { } |
232
|
0 |
0 |
if ($@) |
236
|
0 |
0 |
wantarray ? : |
243
|
0 |
0 |
unless $ENV{'HOSTNAME'} or $^O eq 'MSWin32' and $ENV{'COMPUTERNAME'} |
248
|
0 |
371 |
$INC{'threads.pm'} ? : |
266
|
0 |
166 |
if ($excl) |
269
|
166 |
0 |
if @f1 > 0 |
275
|
0 |
1 |
unless $file |
280
|
0 |
1 |
if $_DEBUG |
281
|
0 |
1 |
if $_DEBUG |
288
|
1 |
0 |
if ($host eq _host() or $host eq 'localhost') { } |
293
|
0 |
1 |
if $_DEBUG |
298
|
0 |
0 |
if $_DEBUG |
301
|
1 |
0 |
if (not $status) |
320
|
0 |
19 |
unless (-d $dir) |
325
|
0 |
0 |
if (not -r $dir and -w $dir and -x $dir) |
335
|
14 |
0 |
if (defined ${^GLOBAL_PHASE}) { } |
336
|
0 |
1 |
if %{^GLOBAL_PHASE} eq 'DESTRUCT' |