| line |
true |
false |
branch |
|
20
|
0 |
15 |
if ($@) |
|
23
|
0 |
0 |
if ($@) |
|
51
|
0 |
21 |
if @_ & 1 |
|
62
|
3 |
18 |
unless defined $port |
|
73
|
0 |
210 |
if defined $param{$_} and ref $param{$_} ne "CODE" |
|
85
|
0 |
21 |
if ($mark_param_count and $mark_param_count < 4) |
|
89
|
21 |
0 |
unless defined $high_event |
|
90
|
21 |
0 |
unless defined $low_event |
|
98
|
0 |
21 |
unless defined $accept_callback xor defined $client_input |
|
102
|
8 |
13 |
unless (defined $client_input) |
|
122
|
20 |
1 |
unless defined $listener_args |
|
123
|
0 |
21 |
unless ref $listener_args eq "ARRAY" |
|
126
|
0 |
21 |
if (exists $param{'Args'}) |
|
127
|
0 |
0 |
if (exists $param{'ClientArgs'}) { } |
|
138
|
0 |
21 |
if (defined $client_infilter and not defined $client_outfilter or defined $client_outfilter and not defined $client_infilter) |
|
143
|
0 |
21 |
if (defined $client_filter and defined $client_infilter) |
|
150
|
17 |
4 |
unless defined $concurrency |
|
153
|
0 |
21 |
if (not defined $address and defined $hname) |
|
156
|
0 |
21 |
unless defined $address |
|
158
|
21 |
0 |
unless defined $error_callback |
|
160
|
21 |
0 |
unless defined $session_type |
|
161
|
0 |
21 |
if (defined $session_params and ref $session_params) { } |
|
162
|
0 |
0 |
if (ref $session_params ne "ARRAY") |
|
169
|
12 |
9 |
if (defined $client_input) |
|
170
|
9 |
4 |
unless defined $client_error |
|
171
|
12 |
1 |
unless defined $client_args |
|
176
|
12 |
1 |
unless defined $inline_states |
|
179
|
12 |
1 |
unless defined $package_states |
|
182
|
12 |
1 |
unless defined $object_states |
|
185
|
0 |
13 |
if (exists $param{'ClientShutdownOnError'}) |
|
189
|
0 |
13 |
unless ref $inline_states eq "HASH" |
|
192
|
0 |
13 |
unless ref $package_states eq "ARRAY" |
|
195
|
0 |
13 |
unless ref $object_states eq "ARRAY" |
|
198
|
0 |
13 |
unless ref $client_args eq "ARRAY" |
|
217
|
0 |
14 |
if (my(@forbidden_inline_handlers) = grep({exists $inline_states->{$_};} keys %forbidden_handlers)) |
|
235
|
8 |
0 |
unless defined $handlers |
|
239
|
0 |
0 |
if (ref $handlers eq 'HASH') { } |
|
|
0 |
8 |
elsif (ref $handlers eq 'ARRAY') { } |
|
258
|
0 |
20 |
if @forbidden_handlers |
|
266
|
7 |
6 |
unless (defined $accept_callback) |
|
286
|
4 |
34 |
if ($domain == 1 or $domain == 1) { } |
|
|
30 |
6 |
elsif (length $remote_addr == 4) { } |
|
301
|
6 |
28 |
if ($client_pre_connect) |
|
303
|
4 |
2 |
unless (defined $socket and ref $socket and fileno $socket) |
|
312
|
0 |
38 |
$mark_param_count ? : |
|
340
|
30 |
0 |
if $client_connected |
|
349
|
0 |
40 |
if $_[3]{'shutdown'} |
|
357
|
24 |
0 |
unless ($_[10] eq "accept" and $_[11] == 103) |
|
359
|
22 |
2 |
if ($_[3]{'shutdown_on_error'}) |
|
368
|
36 |
0 |
if $client_flushed |
|
369
|
19 |
18 |
if ($heap->{'shutdown'}) |
|
371
|
20 |
0 |
if $client_disconnected |
|
379
|
28 |
18 |
if (defined $heap->{'client'}) |
|
380
|
18 |
10 |
if ($heap->{'got_an_error'} or not $heap->{'client'}->get_driver_out_octets) |
|
385
|
25 |
0 |
if $client_disconnected |
|
395
|
37 |
0 |
if (defined $accept_session_id) { } |
|
439
|
36 |
0 |
if ($_[3]{'concurrency'} != -1 and $_[3]{'listener'}) |
|
440
|
24 |
20 |
if ($_[3]{'connections'} >= $_[3]{'concurrency'}) |
|
459
|
12 |
2 |
if (defined $alias) |
|
467
|
0 |
14 |
$domain == 1 || $domain == 1 ? : |
|
478
|
14 |
0 |
if $server_started |
|
493
|
5 |
48 |
if ($_[3]{'connections'} < 0) |
|
500
|
32 |
4 |
if ($_[3]{'concurrency'} != -1 and $_[3]{'listener'}) |
|
501
|
23 |
16 |
if ($_[3]{'connections'} == $_[3]{'concurrency'} - 1) |
|
517
|
0 |
0 |
if ($_[3]{'concurrency'} != -1 and $_[3]{'listener'}) |
|
518
|
0 |
0 |
if ($_[3]{'connections'} >= $_[3]{'concurrency'}) { } |
|
539
|
10 |
0 |
if defined $_[3]{'alias'} |
|
545
|
0 |
14 |
if $server_stopped |
|
561
|
0 |
38 |
if (defined $client_infilter or defined $client_outfilter) { } |
|
|
6 |
32 |
elsif (defined $client_filter) { } |
|
580
|
2 |
4 |
if (ref $filter eq 'ARRAY') { } |
|
|
0 |
4 |
elsif (ref $filter) { } |
|
583
|
2 |
0 |
if (_test_filter($filter)) { } |
|
593
|
4 |
0 |
if (_test_filter($filter)) { } |
|
609
|
0 |
0 |
if (not $eval and $@) |
|
634
|
0 |
4 |
unless ($syscall eq "read" and $errno == 0 || $errno == 104) |
|
635
|
0 |
0 |
unless $errno |