line |
true |
false |
branch |
127
|
1 |
0 |
unless (defined $self->{'min_nproc'}) |
128
|
1 |
0 |
unless (defined $self->{'max_nproc'}) |
129
|
1 |
0 |
unless (defined $self->{'delta_nproc'}) |
130
|
1 |
0 |
unless (defined $self->{'delta_time'}) |
135
|
0 |
1 |
unless (defined($self->{'ipcqueue'} = msgget(IPC_PRIVATE(), IPC_CREAT() | 438))) |
154
|
0 |
0 |
if ($pid > 0) |
167
|
0 |
0 |
if ($code eq '1') { } |
|
0 |
0 |
elsif ($code eq '2') { } |
181
|
0 |
0 |
if (not defined $self->{'PIDS'}{$cpid}) { } |
193
|
0 |
0 |
if ($self->{'USED_PROCS'} >= $self->{'n_processes'}) { } |
|
0 |
0 |
elsif (keys %{$$self{'PIDS'};} < $self->{'min_nproc'}) { } |
|
0 |
0 |
elsif ($self->{'USED_PROCS'} < $self->{'min_nproc'} and time - $self->{'_last_delta_time'} >= $self->{'delta_time'}) { } |
|
0 |
0 |
elsif (keys %{$$self{'PIDS'};} < $self->{'n_processes'}) { } |
|
0 |
0 |
elsif ($self->{'USED_PROCS'} >= $self->{'n_processes'} - $self->{'delta_nproc'}) { } |
196
|
0 |
0 |
$self->{'n_processes'} + $self->{'delta_nproc'} < $self->{'max_nproc'} ? : |
198
|
0 |
0 |
if ($newnp != $self->{'n_processes'}) |
218
|
0 |
0 |
$self->{'n_processes'} - $self->{'delta_nproc'} > $self->{'min_nproc'} ? : |
220
|
0 |
0 |
if ($newnp != $self->{'n_processes'}) |
229
|
0 |
0 |
unless (defined $self->{'USEDPIDS'}{$dpid}) |
231
|
0 |
0 |
if ($i <= $self->{'n_processes'} - $newnp) { } |
260
|
0 |
0 |
if ($pid == 0) |
274
|
0 |
0 |
if (not msgsnd($self->{'ipcqueue'}, pack('l! l!', 1, $$), IPC_NOWAIT())) { } |
282
|
0 |
0 |
if (not defined $self->{'requestcount'}) { } |
293
|
0 |
0 |
unless ($self->{'msgsenderr'}) |
300
|
0 |
0 |
if (defined $self->{'max_requests'} and $self->{'max_requests'} ne '' and $self->{'requestcount'} >= $self->{'max_requests'}) |
301
|
0 |
0 |
if ($self->{'pm_loop_used'}) { } |
330
|
0 |
0 |
if (defined $msg) |