line |
true |
false |
branch |
25
|
0 |
0 |
ref $req eq 'Perlbal::XS::HTTPHeaders' ? : |
35
|
0 |
0 |
$use_dynamic_cookie ? : |
42
|
0 |
0 |
if (defined $cookie) |
45
|
0 |
0 |
if (defined $cookies{$cookie_hdr}) |
49
|
0 |
0 |
if ref $backend |
65
|
0 |
0 |
$use_salt ? : |
72
|
0 |
0 |
$use_salt ? : |
100
|
0 |
0 |
if ($backendid eq $id) |
115
|
0 |
0 |
if ($backendid eq $id) |
153
|
0 |
0 |
if ($res eq 'yes' or $res == 1) { } |
|
0 |
0 |
elsif ($res eq 'no' or $res == 0) { } |
171
|
0 |
0 |
if ($res eq 'yes' or $res == 1) { } |
|
0 |
0 |
elsif ($res eq 'no' or $res == 0) { } |
189
|
0 |
0 |
if ($res eq 'yes' or $res == 1) { } |
|
0 |
0 |
elsif ($res eq 'no' or $res == 0) { } |
209
|
0 |
0 |
unless my $req = $client->{'req_headers'} |
219
|
0 |
0 |
if exists $Perlbal::pool{$poolid} |
227
|
0 |
0 |
if exists $Perlbal::service{$serviceid} |
238
|
0 |
0 |
if $tunable_name eq 'role' |
243
|
0 |
0 |
if $tunable_name eq 'persist_client_timeout' |
246
|
0 |
0 |
if $tunable_name eq 'pool' |
251
|
0 |
0 |
unless exists $svc->{$tunable_name} and defined $svc->{$tunable_name} |
257
|
0 |
0 |
if ($role eq '*' or $role eq $svc_role) |
262
|
0 |
0 |
if $value eq 'ARRAY' |
288
|
0 |
0 |
unless ($ip_port) |
289
|
0 |
0 |
unless $use_domain |
315
|
0 |
0 |
unless defined $backend |
322
|
0 |
0 |
$use_dynamic_cookie ? : |
327
|
0 |
0 |
if (my $cookie = $req->header('Cookie')) |
331
|
0 |
0 |
if (not defined $cookies{$cookie_hdr} or $cookies{$cookie_hdr}->value ne $backend_id) |
339
|
0 |
0 |
if (defined $res->header('set-cookie')) { } |