Branch Coverage

lib/App/Context/HTTP.pm
Criterion Covered Total %
branch 10 138 7.2


line true false branch
88 0 1 if $App::trace
90 0 1 unless defined $args
95 0 1 if $@
97 0 1 if $App::trace
101 0 0 if $App::trace
103 0 0 if $App::trace
119 0 0 if $App::trace
129 0 0 if ($request_events and $#$request_events > -1)
134 0 0 if $App::trace
138 0 0 if $App::trace
159 0 0 if ($#$events > -1)
160 0 0 if ($profiler)
166 0 0 if ($authorization->is_authorized("/App/$service_type/$service_name/$method", $user))
168 0 0 if ($return_event_results)
175 0 0 if ($profiler)
176 0 0 ref $args eq 'ARRAY' ? :
184 0 0 if ($authorization->is_authorized("/App/$service_type/$service_name", $user)) { }
188 0 0 if ($self->session_object_exists("login_$app")) { }
196 0 0 unless $return_results
200 0 0 if (not $ref or $ref eq 'ARRAY' or $ref eq 'HASH') { }
0 0 elsif ($results->isa('App::Service')) { }
202 0 0 if ($profiler)
210 0 0 if ($profiler)
218 0 0 if ($profiler)
224 0 0 if ($profiler)
229 0 0 if ($profiler)
234 0 0 if ($@)
236 0 0 if ($profiler)
242 0 0 if ($$self{'options'}{'debug_context'})
247 0 0 if $App::trace
251 0 0 if $App::trace
255 0 0 if $App::trace
259 0 0 if $App::trace
276 0 0 if $App::trace
301 0 1 if $App::trace
304 1 0 unless (defined $$self{'request'})
311 1 0 unless ($request_class)
314 0 1 if ($ENV{'MOD_PERL'}) { }
0 1 elsif ($ENV{'HTTP_USER_AGENT'}) { }
331 0 1 if $App::trace
354 0 0 if $App::trace
362 0 0 if (ref $content)
370 0 0 unless $content_type
371 0 0 unless $content_type
374 0 0 if (defined $$self{'headers'})
379 0 0 if ($$self{'options'}{'gzip'})
383 0 0 if ($gzip_ok)
391 0 0 if ($$self{'messages'}) { }
400 0 0 if $App::trace
423 0 0 if $App::trace
425 0 0 if ($$self{'headers'}) { }
431 0 0 if $App::trace
456 0 0 if $App::trace
459 0 0 if $App::trace
496 0 0 if $App::trace
500 0 0 unless ($user)
504 0 0 if ($$options{'app_auth_required'}) { }
509 0 0 if (defined $password and defined $user)
511 0 0 if ($authentication->validate_password($user, $password))
522 0 0 if (defined $p_pass and defined $u_user)
524 0 0 if ($authentication->validate_password($u_user, $p_pass)) { }
539 0 0 unless $authenticated
542 0 0 if ($user and $authenticated)
544 0 0 if ($switchable_users and $switchable_users =~ /\b$user\b/)
546 0 0 if ($switchable_users eq $user or $switchable_users =~ /:$user:/ or $switchable_users =~ /^$user:/ or $switchable_users =~ /:$user$/)
550 0 0 if ($effective_user)
560 0 0 if $App::trace
565 0 0 if $App::trace
569 0 0 if $App::trace