| line |
true |
false |
branch |
|
403
|
4 |
25 |
unless ($self->is_enabled) |
|
408
|
1 |
24 |
if ($self->is_running) |
|
415
|
19 |
5 |
if (my $pid = fork) { } |
|
430
|
17 |
27 |
if ($locked_pid and $self->is_running($pid)) |
|
435
|
17 |
0 |
if ($locked_pid == $pid) { } |
|
452
|
0 |
5 |
unless ($self->write_my_pid($$)) |
|
463
|
0 |
5 |
unless open STDIN, '<', '/dev/null' |
|
465
|
0 |
5 |
unless open STDOUT, '>>', $self->log_file |
|
466
|
0 |
5 |
unless open STDERR, '>>', $self->log_file |
|
468
|
0 |
5 |
unless setsid() |
|
475
|
0 |
5 |
if $self->run_as |
|
480
|
1 |
4 |
if ($self->pipe) |
|
483
|
1 |
0 |
unless (-p $named_pipe) |
|
485
|
0 |
1 |
unless POSIX::mkfifo($named_pipe, 448) |
|
487
|
0 |
1 |
unless open STDIN, '<', $named_pipe |
|
491
|
2 |
3 |
if ($self->class) { } |
|
499
|
0 |
2 |
if ($error) { } |
|
512
|
0 |
2 |
unless (eval {
do {
$obj = $class->new('context', $self->context);
1
}
}) |
|
524
|
0 |
2 |
unless (eval {
do {
$obj->$method($args);
1
}
}) |
|
535
|
0 |
1 |
unless (eval {
do {
$self->start_method->($args);
1
}
}) |
|
559
|
1 |
9 |
unless ($self->is_running) |
|
594
|
1 |
2 |
$sleep ? : |
|
618
|
112 |
19 |
unless ($pid) |
|
620
|
67 |
64 |
unless $pid |
|
628
|
50 |
14 |
if (kill 0, $pid) |
|
629
|
0 |
50 |
if ($!{'EPERM'}) { } |
|
679
|
3 |
6 |
unless ($self->is_running) |
|
707
|
1 |
16 |
if ($self->pipe) |
|
724
|
92 |
84 |
unless (-r $path) |
|
730
|
0 |
84 |
unless open my $fh, '<', $path |
|
735
|
0 |
84 |
unless close $fh |
|
737
|
1 |
83 |
unless $line |
|
739
|
0 |
83 |
unless $line |
|
741
|
0 |
83 |
unless ($line =~ /^\d+$/) |
|
766
|
0 |
5 |
unless ($pid) |
|
769
|
0 |
5 |
if $self->is_running |
|
774
|
0 |
5 |
unless open my $pid_fh, '>', $path |
|
777
|
0 |
5 |
unless close $pid_fh |
|
781
|
0 |
5 |
if (-r $self->pid_file) |
|
787
|
0 |
5 |
unless (rename $path, $self->pid_file) |
|
809
|
0 |
18 |
unless -r $self->pid_file |
|
852
|
0 |
1 |
unless $self->pipe |
|
855
|
0 |
1 |
unless (-r $self->pipe_file) |
|
864
|
0 |
1 |
unless sysopen my $fh, $self->pipe_file, &POSIX::O_WRONLY |
|
878
|
4 |
1 |
if ($self->is_enabled) |
|
894
|
4 |
1 |
unless ($self->is_enabled) |
|
913
|
11 |
33 |
if -r $self->disable_file |
|
922
|
382 |
18 |
unless $self->debug |