line |
true |
false |
branch |
28
|
5 |
2 |
!ref($ns) ? : |
|
0 |
7 |
!defined($ns) ? : |
33
|
0 |
7 |
if ($self->trace) |
36
|
0 |
0 |
if ($@) { } |
47
|
0 |
7 |
if exists $params->rpc_serialized->{'handlers'} |
50
|
7 |
0 |
if exists $params->rpc_serialized->{'callbacks'} |
58
|
38 |
0 |
unless $self->trace |
69
|
0 |
13 |
if (scalar @{$args;} % 2 == 0 and exists $self->args_suppress_log->{$call} and ref $self->args_suppress_log->{$call} eq ref []) |
75
|
0 |
0 |
if (exists $args{$_}) |
95
|
6 |
19 |
if (@_) |
99
|
15 |
10 |
if exists $$self{'HANDLER'}{$call} |
107
|
0 |
13 |
if (@_) |
110
|
0 |
0 |
unless UNIVERSAL::isa($handler, 'RPC::Serialized::AuthzHandler') |
120
|
5 |
19 |
unless my($data, @token) = $self->SUPER::recv |
123
|
0 |
19 |
unless $call and not ref $call |
127
|
0 |
19 |
unless $args and ref $args eq 'ARRAY' |
151
|
9 |
10 |
if ($hc = $self->handler($call)) { } |
152
|
0 |
9 |
unless eval "require $hc" |
157
|
0 |
10 |
if $call =~ /\W/ |
164
|
8 |
4 |
unless eval "require ${ns}::$name" |
173
|
6 |
13 |
unless defined $hc |
176
|
0 |
13 |
unless $hc->isa('RPC::Serialized::Handler') |
179
|
0 |
13 |
unless $self->authorize($call, $hc->target(@$args)) |
182
|
2 |
11 |
if ($self->callbacks->{'pre_handler_argument_filter'}) |
188
|
0 |
2 |
if ($@) |
204
|
6 |
0 |
if (UNIVERSAL::isa($err, 'RPC::Serialized::X')) { } |
235
|
19 |
5 |
if ($call) |
244
|
6 |
18 |
if ($@) |
249
|
5 |
19 |
unless $response |
253
|
19 |
0 |
unless $self->debug |
262
|
0 |
19 |
if ($@) |
264
|
0 |
0 |
unless $self->debug |
269
|
19 |
0 |
unless $self->debug |