| line |
true |
false |
branch |
|
198
|
0 |
0 |
defined $$params{'port'} ? : |
|
199
|
0 |
0 |
defined $$params{'listen_address'} ? : |
|
200
|
0 |
0 |
defined $$params{'pdns_control'} ? : |
|
201
|
0 |
0 |
defined $$params{'rec_control'} ? : |
|
202
|
0 |
0 |
defined $$params{'debug'} ? : |
|
203
|
0 |
0 |
defined $$params{'syslog_ident'} ? : |
|
204
|
0 |
0 |
defined $$params{'syslog_option'} ? : |
|
205
|
0 |
0 |
defined $$params{'syslog_facility'} ? : |
|
206
|
0 |
0 |
defined $$params{'syslog_priority'} ? : |
|
207
|
0 |
0 |
defined $$params{'pid_file'} ? : |
|
208
|
0 |
0 |
defined $$params{'auth_cred'} ? : |
|
209
|
0 |
0 |
defined $$params{'allowed_ips'} ? : |
|
210
|
0 |
0 |
defined $$params{'socket_path'} ? : |
|
211
|
0 |
0 |
defined $$params{'pdns_control_socket'} ? : |
|
212
|
0 |
0 |
defined $$params{'rec_control_socket'} ? : |
|
216
|
0 |
0 |
unless $$self{'sock'} = 'IO::Socket::INET'->new('LocalAddr', $$self{'listen_address'}, 'LocalPort', $$self{'port'}, 'Proto', 'tcp', 'Reuse', 1, 'Listen', 20) |
|
225
|
0 |
0 |
if (defined $$params{'allowed_methods'}) |
|
254
|
0 |
0 |
if ($c_socket eq $$self{'rec_control_socket'}) { } |
|
266
|
0 |
0 |
if ($@) |
|
278
|
0 |
0 |
unless (bind $sock_fh, sockaddr_un($t_socket)) |
|
287
|
0 |
0 |
unless (connect $sock_fh, sockaddr_un($c_socket)) |
|
306
|
0 |
0 |
if ($@) |
|
336
|
0 |
0 |
if ($msg =~ /^Added/) { } |
|
363
|
0 |
0 |
if ($msg =~ /^\d+/) { } |
|
390
|
0 |
0 |
if ($msg =~ /^wiped/) { } |
|
415
|
0 |
0 |
if ($msg =~ /^pong/) { } |
|
440
|
0 |
0 |
if ($msg eq 'PONG') { } |
|
463
|
0 |
0 |
unless $$self{'debug'} |
|
466
|
0 |
0 |
unless $$self{'pid'}->pid_file_no_unlink($$self{'pid_file'}) |
|
478
|
0 |
0 |
if (defined $$self{'allowed_ips'}) |
|
480
|
0 |
0 |
unless (Net::CIDR::cidrlookup($peer, @{$$self{'allowed_ips'};})) |
|
490
|
0 |
0 |
if $pid |
|
493
|
0 |
0 |
if ($$self{'auth_cred'}) { } |
|
500
|
0 |
0 |
if ($auth ne "AUTH $$self{'auth_cred'}") { } |
|
528
|
0 |
0 |
if (not $method_is_allowed and $action ne 'quit') { } |
|
|
0 |
0 |
elsif ($action eq 'auth_retrieve') { } |
|
|
0 |
0 |
elsif ($action eq 'auth_wipe_cache') { } |
|
|
0 |
0 |
elsif ($action eq 'rec_wipe_cache') { } |
|
|
0 |
0 |
elsif ($action eq 'rec_ping') { } |
|
|
0 |
0 |
elsif ($action eq 'auth_ping') { } |
|
|
0 |
0 |
elsif ($action eq 'quit') { } |
|
535
|
0 |
0 |
unless ($arg1) |
|
547
|
0 |
0 |
unless ($arg1) |
|
558
|
0 |
0 |
unless ($arg1) |
|
609
|
0 |
0 |
if ($ret == 0) { } |
|
|
0 |
0 |
elsif (not defined $ret) { } |
|
|
0 |
0 |
elsif ($ret == -1) { } |
|
642
|
0 |
0 |
unless open STDIN, '/dev/null' |
|
643
|
0 |
0 |
unless open STDOUT, '>/dev/null' |
|
645
|
0 |
0 |
unless defined $pid |
|
646
|
0 |
0 |
if ($pid != 0) |
|
647
|
0 |
0 |
unless open STDERR, '>&STDOUT' |
|
662
|
0 |
0 |
if $$self{'debug'} |
|
666
|
0 |
0 |
if ($PowerDNS::Control::Server::EVAL_ERROR) |