line |
true |
false |
branch |
22
|
0 |
0 |
ref $req eq 'Perlbal::XS::HTTPHeaders' ? : |
34
|
0 |
0 |
$use_dynamic_cookie ? : |
41
|
0 |
0 |
if (defined $cookie) |
44
|
0 |
0 |
if (defined $cookies{$cookie_hdr}) |
48
|
0 |
0 |
if ref $backend |
64
|
0 |
0 |
$use_salt ? : |
71
|
0 |
0 |
$use_salt ? : |
99
|
0 |
0 |
if ($backendid eq $id) |
114
|
0 |
0 |
if ($backendid eq $id) |
152
|
0 |
0 |
if ($res eq 'yes' or $res == 1) { } |
|
0 |
0 |
elsif ($res eq 'no' or $res == 0) { } |
170
|
0 |
0 |
if ($res eq 'yes' or $res == 1) { } |
|
0 |
0 |
elsif ($res eq 'no' or $res == 0) { } |
188
|
0 |
0 |
if ($res eq 'yes' or $res == 1) { } |
|
0 |
0 |
elsif ($res eq 'no' or $res == 0) { } |
208
|
0 |
0 |
unless my $req = $$client{'req_headers'} |
218
|
0 |
0 |
if exists $Perlbal::pool{$poolid} |
226
|
0 |
0 |
if exists $Perlbal::service{$serviceid} |
237
|
0 |
0 |
if $tunable_name eq 'role' |
242
|
0 |
0 |
if $tunable_name eq 'persist_client_timeout' |
245
|
0 |
0 |
if $tunable_name eq 'pool' |
248
|
0 |
0 |
unless defined $$svc{$tunable_name} |
253
|
0 |
0 |
if ($role eq '*' or $role eq $svc_role) |
278
|
0 |
0 |
unless ($ip_port) |
279
|
0 |
0 |
unless $use_domain |
305
|
0 |
0 |
unless defined $backend |
312
|
0 |
0 |
$use_dynamic_cookie ? : |
317
|
0 |
0 |
if (my $cookie = $req->header('Cookie')) |
321
|
0 |
0 |
if (not defined $cookies{$cookie_hdr} or $cookies{$cookie_hdr}->value ne $backend_id) |
329
|
0 |
0 |
if (defined $res->header('set-cookie')) { } |