| line |
true |
false |
branch |
|
43
|
0 |
0 |
defined $_[0] ? : |
|
|
0 |
0 |
ref $_[0] eq 'ARRAY' ? : |
|
50
|
0 |
0 |
ref $_ eq 'ARRAY' ? : |
|
52
|
0 |
0 |
if $socket |
|
57
|
0 |
0 |
unless @sockets |
|
77
|
0 |
0 |
if $args->{'docroot'} |
|
92
|
0 |
0 |
if $args->{'documents'} or $handler |
|
99
|
0 |
0 |
unless defined $listen |
|
101
|
0 |
0 |
if &blessed($listen) and $listen->isa('IO::Socket') |
|
104
|
0 |
0 |
$listen =~ s/\:([0-9]+)$// ? : |
|
108
|
0 |
0 |
if ($port == 443) { } |
|
110
|
0 |
0 |
unless eval 'require IO::Socket::SSL; require HTTP::Daemon::ClientConn::SSL;' |
|
133
|
0 |
0 |
if $socket or $! != 98 |
|
135
|
0 |
0 |
if $retry == 1 |
|
143
|
0 |
0 |
unless $socket |
|
146
|
0 |
0 |
if $elapse |
|
161
|
0 |
0 |
!defined($_[0]) ? : |
|
|
0 |
0 |
@_ > 1 ? : |
|
164
|
0 |
0 |
if (&blessed($config) and $config->isa('Any::Daemon::HTTP::VirtualHost')) { } |
|
|
0 |
0 |
elsif (ref $config eq 'HASH') { } |
|
181
|
0 |
0 |
!defined($_[0]) ? : |
|
|
0 |
0 |
@_ > 1 ? : |
|
183
|
0 |
0 |
if (UNIVERSAL::isa($config, 'Any::Daemon::HTTP::Proxy')) { } |
|
|
0 |
0 |
elsif (UNIVERSAL::isa($config, 'HASH')) { } |
|
189
|
0 |
0 |
unless $proxy->forwardMap |
|
201
|
0 |
0 |
&blessed($id) && $id->isa('Any::Daemon::HTTP::VirtualHost') ? : |
|
203
|
0 |
0 |
unless defined $vhost |
|
221
|
0 |
0 |
unless my $mapped = $proxy->forwardRewrite($session, $req, $uri) |
|
239
|
0 |
0 |
$client->isa('IO::Socket::SSL') ? : |
|
257
|
0 |
0 |
$0 =~ /^(\S+)/ ? : |
|
272
|
0 |
0 |
if $vhostn =~ /(.*)\:[0-9]+$/ |
|
276
|
0 |
0 |
if ($vhost) { } |
|
|
0 |
0 |
elsif (my($proxy, $where) = $self->findProxy($session, $req, $vhostn)) { } |
|
|
0 |
0 |
elsif (my $default = $self->virtualHost('default')) { } |
|
278
|
0 |
0 |
ref($client) =~ /SSL/ ? : |
|
293
|
0 |
0 |
unless ($resp) |
|
302
|
0 |
0 |
if (&is_error(scalar $resp->code)) |
|
304
|
0 |
0 |
unless $resp->content |
|
311
|
0 |
0 |
$close ? : |
|
314
|
0 |
0 |
if $close |
|
328
|
0 |
0 |
unless (keys %$vhosts) |
|
334
|
0 |
0 |
if (my $handler = delete $args{'handle_request'}) |
|
339
|
0 |
0 |
$0 =~ /^(\S+)/ ? : |
|
343
|
0 |
0 |
if $max_conn > 10 |
|
361
|
0 |
0 |
unless my $client = $socket->accept |
|
362
|
0 |
0 |
if defined $linger |
|
373
|
0 |
0 |
if $conn_count++ >= $max_conn or $req_count >= $max_req |