line |
true |
false |
branch |
40
|
1 |
1 |
unless my $pid = -r $self->pid_file && $self->pid_file->slurp |
42
|
1 |
0 |
if $pid and kill 0, $pid |
48
|
0 |
1 |
if -s (my $file = $self->pid_file) |
54
|
0 |
0 |
unless my $pid = $self->check_pid |
56
|
0 |
0 |
kill('USR2', $pid) ? : |
62
|
0 |
0 |
if (my $pid = $self->check_pid) |
73
|
0 |
0 |
if $self->workers > 0 |
102
|
0 |
0 |
if $self->{'worker_read'} |
103
|
0 |
0 |
unless pipe $self->{'worker_read'}, $self->{'worker_write'} |
109
|
0 |
0 |
if $w->{$signal} |
122
|
0 |
0 |
if (my $signal = $self->{'stop_signal'}) |
123
|
0 |
0 |
unless keys %$pool |
136
|
0 |
0 |
unless my $w = $pool->{$pid} |
137
|
0 |
0 |
if ($w->{'graceful'}) { } |
|
0 |
0 |
elsif (not $w->{'time'}) { } |
|
0 |
0 |
elsif ($w->{'time'} + $ht <= $time) { } |
145
|
0 |
0 |
if ($n_missing > 0) { } |
|
0 |
0 |
elsif (not @starting) { } |
152
|
0 |
0 |
unless my $w = $pool->{$pid} |
153
|
0 |
0 |
if ($gt and $w->{'graceful'} + $gt < $time) { } |
165
|
0 |
0 |
unless $select->can_read("0.1") |
166
|
0 |
0 |
unless $self->{'worker_read'}->sysread(my $chunk, 4194304) |
170
|
0 |
0 |
unless my $w = $self->{'pool'}{$1} |
171
|
0 |
0 |
if $2 eq "k" |
172
|
0 |
0 |
if $2 eq "g" |
181
|
0 |
0 |
unless defined(my $pid = fork) |
182
|
0 |
0 |
if ($pid) |
199
|
0 |
0 |
unless my $flags = fcntl($fh, 1, 0) |
200
|
0 |
0 |
unless fcntl $fh, 2, $flags & '18446744073709551614' |
202
|
0 |
0 |
if $fh eq $self->{'worker_write'} |
221
|
0 |
0 |
unless my $w = delete $self->{'pool'}{$pid} |
229
|
1 |
1 |
if $path and -e $path |