| line |
true |
false |
branch |
|
40
|
0 |
0 |
if (find_option('-h'))
|
|
44
|
0 |
0 |
if (my $_pidfile = find_option('-p', 1)) { }
|
|
51
|
0 |
0 |
if (my $_logfile = find_option('-l', 1)) { }
|
|
58
|
0 |
0 |
if (my $_l4p_conf = find_option('-l4p', 1))
|
|
62
|
0 |
0 |
if (my $_as_user = find_option('-u', 1)) { }
|
|
69
|
0 |
0 |
if (my $_as_group = find_option('-g', 1)) { }
|
|
76
|
0 |
0 |
if ($> != 0)
|
|
82
|
0 |
0 |
unless defined $background
|
|
83
|
0 |
0 |
find_option('-X') ? :
|
|
85
|
0 |
0 |
$background ? :
|
|
|
0 |
0 |
unless defined $loglevel
|
|
87
|
0 |
0 |
find_option('-v') ? :
|
|
90
|
0 |
0 |
if (find_option($_))
|
|
96
|
0 |
0 |
if ($action eq 'stop' or $action eq 'status')
|
|
100
|
0 |
0 |
if ('Log::Log4perl'->initialized) { }
|
|
|
0 |
0 |
elsif ($action eq 'status') { }
|
|
|
0 |
0 |
elsif ($l4p_conf) { }
|
|
|
0 |
0 |
elsif ($logfile) { }
|
|
120
|
0 |
0 |
if (not $background)
|
|
131
|
0 |
0 |
if (not -w dirname($pidfile) or -f $pidfile and not -w $pidfile)
|
|
136
|
0 |
0 |
if ($action eq 'status')
|
|
140
|
0 |
0 |
if ($action eq 'stop' or $action eq 'restart')
|
|
143
|
0 |
0 |
if (-f $pidfile) { }
|
|
145
|
0 |
0 |
if (kill 0, $pid) { }
|
|
149
|
0 |
0 |
unless (kill 0, $pid)
|
|
151
|
0 |
0 |
unless unlink $pidfile
|
|
159
|
0 |
0 |
unless ($killed)
|
|
165
|
0 |
0 |
unless unlink $pidfile
|
|
174
|
0 |
0 |
if ($action eq 'restart') { }
|
|
181
|
0 |
0 |
if (my $num = pid_file_process_running())
|
|
186
|
0 |
0 |
if ($background) { }
|
|
|
0 |
0 |
elsif ($as_user) { }
|
|
201
|
0 |
0 |
if $prev_sig
|
|
203
|
0 |
0 |
if ($master_pid != $$) { }
|
|
|
0 |
0 |
elsif (not defined $^S or $^S != 0) { }
|
|
212
|
0 |
0 |
unless unlink $pidfile
|
|
233
|
0 |
0 |
unless (defined $child)
|
|
237
|
0 |
0 |
if ($child)
|
|
246
|
0 |
0 |
if (defined $pidfile)
|
|
252
|
0 |
0 |
if ($as_user)
|
|
257
|
0 |
0 |
if (-e '/dev/null') { }
|
|
275
|
0 |
0 |
if ($> == 0)
|
|
282
|
0 |
0 |
unless (defined $group)
|
|
288
|
0 |
0 |
unless (defined $name)
|
|
304
|
0 |
0 |
if (-f $pidfile) { }
|
|
308
|
0 |
0 |
$running ? :
|
|
309
|
0 |
0 |
if ($running) { }
|
|
321
|
0 |
0 |
if (proc_processtable_available())
|
|
340
|
0 |
0 |
if ($rc) { }
|
|
|
0 |
0 |
elsif ($! == 3) { }
|
|
|
0 |
0 |
elsif ($! == 1) { }
|
|
369
|
0 |
0 |
if ($p->cmndline =~ /\b\Q$name\E\b/)
|
|
370
|
0 |
0 |
if $p->pid == $$
|
|
397
|
0 |
0 |
if ($argv eq $opt)
|
|
398
|
0 |
0 |
if ($has_arg) { }
|
|
415
|
0 |
0 |
if (not defined $_[0])
|
|
425
|
0 |
0 |
unless sysopen FILE, $pidfile, 66, 420
|
|
436
|
0 |
0 |
unless open FILE, "<$pidfile"
|
|
439
|
0 |
0 |
if defined $pid
|
|
448
|
0 |
0 |
unless (-f $pidfile)
|
|
452
|
0 |
0 |
unless ($pid)
|
|
455
|
0 |
0 |
if (process_running($pid))
|
|
469
|
0 |
0 |
if ($@)
|