| line |
true |
false |
branch |
|
166
|
0 |
0 |
unless ($svcname) |
|
171
|
0 |
0 |
unless $ss |
|
176
|
0 |
0 |
if ($cmd eq 'reload') { } |
|
177
|
0 |
0 |
if ($what eq 'whitelist') { } |
|
|
0 |
0 |
elsif ($what eq 'blacklist') { } |
|
|
0 |
0 |
elsif ($what eq 'config') { } |
|
178
|
0 |
0 |
if (my $whitelist = $$cfg{'whitelist_file'}) { } |
|
180
|
0 |
0 |
if $@ or not $$stash{'whitelist'} |
|
188
|
0 |
0 |
if (my $blacklist = $$cfg{'blacklist_file'}) { } |
|
190
|
0 |
0 |
if $@ or not $$stash{'blacklist'} |
|
244
|
0 |
0 |
if $$cfg{'whitelist_file'} |
|
245
|
0 |
0 |
if $$cfg{'blacklist_file'} |
|
255
|
0 |
0 |
if $_ eq 'ban' |
|
256
|
0 |
0 |
if $_ eq 'unban' |
|
257
|
0 |
0 |
if $_ eq 'whitelisted' |
|
258
|
0 |
0 |
if $_ eq 'banned' |
|
259
|
0 |
0 |
if $_ eq 'blacklisted' |
|
261
|
0 |
0 |
if $_ eq 'concurrent' |
|
262
|
0 |
0 |
if $_ eq 'throttled' |
|
263
|
0 |
0 |
if $_ eq 'all' |
|
264
|
0 |
0 |
if $_ eq 'none' |
|
268
|
0 |
0 |
if (grep {$_;} @log_events) |
|
270
|
0 |
0 |
if ($has_syslogger and $$cfg{'syslog_host'}) { } |
|
274
|
0 |
0 |
unless $log_events[$action] |
|
282
|
0 |
0 |
unless $log_events[$action] |
|
288
|
0 |
0 |
$$cfg{'path_regex'} ? : |
|
289
|
0 |
0 |
$$cfg{'method_regex'} ? : |
|
307
|
0 |
0 |
unless ($cp) |
|
313
|
0 |
0 |
unless ($headers) |
|
321
|
0 |
0 |
unless (defined $ip) |
|
329
|
0 |
0 |
if defined $DELAYED |
|
336
|
0 |
0 |
if ($$stash{'whitelist'} and $$stash{'whitelist'}->find($ip)) |
|
342
|
0 |
0 |
if ($banned{$ip}) |
|
348
|
0 |
0 |
if ($$stash{'blacklist'} and $$stash{'blacklist'}->find($ip)) |
|
349
|
0 |
0 |
if ($$cfg{'blacklist_action'} eq 'deny') { } |
|
359
|
0 |
0 |
if (exists $throttled{$ip} and $throttled{$ip} > $$cfg{'max_concurrent'}) |
|
365
|
0 |
0 |
if (defined $path_regex and not $uri =~ /$path_regex/) |
|
369
|
0 |
0 |
if (defined $method_regex and not $method =~ /$method_regex/) |
|
374
|
0 |
0 |
$$cfg{'default_action'} eq 'allow' ? : |
|
377
|
0 |
0 |
if ($result == 2) { } |
|
|
0 |
0 |
elsif ($result == 0) { } |
|
378
|
0 |
0 |
unless ($$cfg{'log_only'}) |
|
406
|
0 |
0 |
if (defined $last_request_time) |
|
418
|
0 |
0 |
if $$cfg{'log_only'} |
|
435
|
0 |
0 |
unless (defined $time_since_last_request) |
|
440
|
0 |
0 |
if ($time_since_last_request >= $$cfg{'throttle_threshold_seconds'}) |
|
454
|
0 |
0 |
if ($$cfg{'ban_threshold'} and $violations >= $$cfg{'ban_threshold'}) |
|
456
|
0 |
0 |
unless $$cfg{'log_only'} |
|
483
|
0 |
0 |
if ($@) { } |
|
497
|
0 |
0 |
unless $ip |
|
499
|
0 |
0 |
unless --$throttled{$ip} > 0 |
|
514
|
0 |
0 |
unless open my $fh, '<', $file |
|
517
|
0 |
0 |
if ($line =~ m[([0-9/\.]+)]) |
|
519
|
0 |
0 |
if (index($cidr, '/') < 0) { } |
|
530
|
0 |
0 |
if $empty |
|
544
|
0 |
0 |
if ($want_memcached and not $has_memcached) |
|
547
|
0 |
0 |
$want_memcached ? : |
|
574
|
0 |
0 |
unless $value |
|
607
|
0 |
0 |
if $entry and time < $$entry[0] |