| line |
true |
false |
branch |
|
34
|
5 |
0 |
$@ ? : |
|
38
|
0 |
5 |
$@ ? : |
|
87
|
0 |
10 |
if @_ % 2 |
|
92
|
10 |
0 |
unless defined $opts{'alias'} and length $opts{'alias'} |
|
93
|
0 |
10 |
unless defined $opts{'name'} |
|
94
|
10 |
0 |
defined $opts{'time_out'} ? : |
|
95
|
0 |
10 |
unless defined $opts{'log_level'} |
|
98
|
0 |
10 |
if (defined $logger and not UNIVERSAL::can($logger, 'put')) |
|
103
|
10 |
0 |
unless (defined $logger) |
|
131
|
10 |
0 |
if $self->can('check_params') |
|
133
|
0 |
10 |
if ($opts{'max_connections'}) |
|
158
|
0 |
10 |
if $$self{'opts'}{'session_options'} |
|
161
|
10 |
0 |
if $$self{'opts'}{'alias'} |
|
165
|
10 |
0 |
if ($$self{'opts'}{'plugins'}) |
|
176
|
0 |
10 |
if (my $ev = delete $self->opts->{'event_manager'}) |
|
178
|
0 |
0 |
if ($@) |
|
183
|
0 |
0 |
unless $$ev{'options'} and ref $$ev{'options'} eq 'ARRAY' |
|
192
|
0 |
10 |
defined $sprocket_aio ? : |
|
194
|
10 |
0 |
if $$self{'time_out_check'} |
|
198
|
0 |
10 |
if $$self{'opts'}{'use_exception_handler'} |
|
201
|
10 |
0 |
unless $self->opts->{'no_tstp'} |
|
213
|
0 |
3 |
if $cmd =~ /^_(child|parent)/ |
|
215
|
3 |
0 |
if UNIVERSAL::can($con, 'ID') |
|
229
|
0 |
0 |
if ($signal_name eq 'INT') { } |
|
|
0 |
0 |
elsif ($signal_name eq 'TSTP') { } |
|
255
|
0 |
8 |
if $$self{'event_manager'} |
|
274
|
0 |
0 |
if (my $con = $$self{'heaps'}{$id}) |
|
278
|
0 |
0 |
if $norec |
|
284
|
0 |
24 |
ref $_[2] ? : |
|
285
|
0 |
24 |
unless defined $self->_logger |
|
292
|
8 |
0 |
if (my $con = $$self{'heaps'}{$con_id}) |
|
293
|
5 |
3 |
unless defined $con->error |
|
302
|
0 |
15 |
unless $con |
|
313
|
3 |
12 |
if $self->shutting_down and $self->connections <= 0 |
|
325
|
14 |
14 |
unless ($_[2] and ref $_[2]) |
|
331
|
2 |
12 |
if (lc $type eq 'soft') |
|
347
|
12 |
0 |
if $$self{'opts'}{'alias'} |
|
386
|
0 |
0 |
if UNIVERSAL::can($con, 'close') |
|
397
|
0 |
0 |
unless $con |
|
398
|
0 |
0 |
if (my $timeout = $con->time_out) |
|
399
|
0 |
0 |
if $con->active_time + $timeout < $time |
|
413
|
10 |
0 |
if ($plugin->can('uuid')) { } |
|
421
|
0 |
10 |
if exists $$t{$uuid} |
|
428
|
0 |
0 |
if $$_{'priority'} == $pri |
|
431
|
0 |
10 |
if $found |
|
467
|
0 |
0 |
unless $plugin |
|
485
|
0 |
41 |
$_[2] ? : |
|
487
|
0 |
41 |
unless @{$$self{'plugin_pri'};} |
|
490
|
40 |
1 |
if UNIVERSAL::can($con, 'state') |
|
493
|
24 |
17 |
if (UNIVERSAL::can($con, 'plugin') and my $t = $con->plugin) { } |
|
497
|
17 |
0 |
if ($#{$$self{'plugin_pri'};} >= $i) |
|
499
|
17 |
0 |
if $$self{'plugins'}{$$self{'plugin_pri'}[$i]}{'plugin'}->handle_event(@$args) |
|
504
|
0 |
0 |
if $#{$$self{'plugin_pri'};} < $i |
|
515
|
0 |
0 |
if exists $$self{'plugins'}{$uuid} |
|
527
|
0 |
0 |
$plugin ? : |
|
534
|
0 |
0 |
unless (exists $$self{'plugins'}{$uuid}) |
|
552
|
0 |
0 |
unless ($plugin) |
|
567
|
0 |
0 |
unless ($_[2] and ref $_[2]) |