| line |
true |
false |
branch |
|
26
|
6 |
0 |
unless (defined &POE::Component::Server::SimpleHTTP::DEBUG)
|
|
31
|
6 |
0 |
if (not defined &POE::Component::Server::SimpleHTTP::MAX_RETRIES)
|
|
175
|
0 |
0 |
if ($args{'sslkeycert'} and ref $args{'sslkeycert'} eq 'ARRAY' and scalar @{$args{'sslkeycert'};} == 2)
|
|
184
|
0 |
0 |
if ($@) { }
|
|
189
|
0 |
0 |
if ($args{'sslintermediatecacert'})
|
|
231
|
6 |
0 |
if $self->alias
|
|
232
|
0 |
6 |
unless $self->alias
|
|
245
|
6 |
0 |
if $self->_factory
|
|
251
|
0 |
6 |
if ($graceful)
|
|
254
|
0 |
0 |
if (keys %{$self->_requests;} == 0 and keys %{$self->_connections;} == 0)
|
|
262
|
0 |
0 |
unless $self->alias
|
|
279
|
0 |
0 |
if (defined $S->{$conn}->wheel and defined $S->{$conn}->wheel->get_input_handle)
|
|
292
|
0 |
6 |
unless $self->alias
|
|
309
|
0 |
6 |
if ($self->retries == 5) { }
|
|
316
|
6 |
0 |
unless $noinc
|
|
319
|
6 |
0 |
$self->address ? :
|
|
329
|
6 |
0 |
if $self->port == 0
|
|
333
|
6 |
0 |
if ($self->setuphandler)
|
|
335
|
0 |
6 |
if ($setuphandler->{'POSTBACK'} and ref $setuphandler->{'POSTBACK'} eq 'POE::Session::AnonEvent') { }
|
|
344
|
6 |
0 |
if $setuphandler->{'SESSION'} and $setuphandler->{'EVENT'}
|
|
378
|
0 |
0 |
if $self->_factory
|
|
395
|
0 |
0 |
unless $session and $event
|
|
409
|
0 |
6 |
if (not ref $handler or ref $handler ne 'ARRAY')
|
|
418
|
18 |
0 |
if (ref $handler->[$count] and ref $handler->[$count] eq 'HASH') { }
|
|
425
|
0 |
18 |
unless (exists $handler->[$count]{'SESSION'} and defined $handler->[$count]{'SESSION'})
|
|
430
|
0 |
18 |
unless (exists $handler->[$count]{'EVENT'} and defined $handler->[$count]{'EVENT'})
|
|
435
|
0 |
18 |
unless (exists $handler->[$count]{'DIR'} and defined $handler->[$count]{'DIR'})
|
|
442
|
0 |
18 |
if (UNIVERSAL::isa($handler->[$count]{'SESSION'}, 'POE::Session'))
|
|
454
|
0 |
18 |
if ($@) { }
|
|
482
|
0 |
9 |
if ($self->sslkeycert)
|
|
486
|
0 |
0 |
if ($@)
|
|
537
|
3 |
9 |
if ($self->_connections->{$id})
|
|
548
|
0 |
12 |
unless ($self->_requests->{$id}->wheel_alive)
|
|
558
|
3 |
9 |
if $connection
|
|
562
|
0 |
9 |
if ($self->sslkeycert)
|
|
583
|
0 |
12 |
if ($request->isa('HTTP::Response')) { }
|
|
601
|
0 |
12 |
if ($self->proxymode) { }
|
|
610
|
0 |
12 |
if (not defined $path or $path eq '')
|
|
626
|
0 |
12 |
if keys %{$self->headers;} != 0
|
|
630
|
0 |
12 |
unless (defined $response->connection)
|
|
640
|
0 |
12 |
if ($self->sslkeycert)
|
|
649
|
0 |
12 |
unless (defined $request)
|
|
665
|
0 |
12 |
if ($self->loghandler and scalar keys %{$self->loghandler;} == 2)
|
|
678
|
0 |
0 |
if $!
|
|
686
|
0 |
12 |
if ($malformed_req)
|
|
693
|
0 |
0 |
if $self->errorhandler and $self->errorhandler->{'SESSION'} and $self->errorhandler->{'EVENT'}
|
|
702
|
9 |
23 |
if ($path =~ /$handler->{'RE'}/)
|
|
709
|
0 |
9 |
if $!
|
|
732
|
0 |
12 |
unless defined $self->_requests->{$id}
|
|
737
|
0 |
12 |
if ($self->_requests->{$id}->streaming)
|
|
744
|
12 |
0 |
if ($self->_requests->{$id}->done) { }
|
|
746
|
3 |
9 |
if ($self->must_keepalive($id)) { }
|
|
772
|
0 |
12 |
unless ($self->_factory)
|
|
774
|
0 |
0 |
if (keys %{$self->_requests;} == 0 and keys %{$self->_connections;} == 0)
|
|
790
|
8 |
4 |
unless $self->keepalive
|
|
796
|
1 |
3 |
if $resp->is_error
|
|
800
|
0 |
3 |
if ",$conn," =~ /,\s*close\s*,/
|
|
802
|
0 |
3 |
if ",$conn," =~ /,\s*close\s*,/
|
|
804
|
0 |
3 |
if ",$conn," =~ /,\s*close\s*,/
|
|
807
|
3 |
0 |
if $req->protocol eq 'HTTP/1.1'
|
|
825
|
0 |
0 |
if ($self->_connections->{$id}) { }
|
|
832
|
0 |
0 |
if (defined $self->_requests->{$id}->response) { }
|
|
847
|
0 |
0 |
if $connection
|
|
860
|
0 |
12 |
unless (defined $response and UNIVERSAL::isa($response, 'HTTP::Response'))
|
|
870
|
0 |
12 |
unless (exists $self->_requests->{$id})
|
|
881
|
0 |
0 |
if $self->errorhandler and $self->errorhandler->{'SESSION'} and $self->errorhandler->{'EVENT'}
|
|
889
|
0 |
12 |
if ($self->_requests->{$id}->done)
|
|
896
|
0 |
12 |
unless ($self->_requests->{$id}->wheel_alive)
|
|
902
|
0 |
0 |
if $self->errorhandler and $self->errorhandler->{'SESSION'} and $self->errorhandler->{'EVENT'}
|
|
908
|
0 |
12 |
if ($self->_requests->{$id}->streaming)
|
|
912
|
0 |
0 |
unless ($self->_requests->{$id}->wheel->get_driver_out_messages)
|
|
928
|
0 |
12 |
if ($self->log2handler and scalar keys %{$self->log2handler;} == 2)
|
|
941
|
0 |
0 |
if $!
|
|
959
|
0 |
0 |
unless (defined $response and UNIVERSAL::isa($response, 'HTTP::Response'))
|
|
969
|
0 |
0 |
if (defined $response->STREAM) { }
|
|
972
|
0 |
0 |
if ($self->_responses->{$id}) { }
|
|
990
|
0 |
0 |
unless (exists $self->_requests->{$id})
|
|
1001
|
0 |
0 |
if $self->errorhandler and $self->errorhandler->{'SESSION'} and $self->errorhandler->{'EVENT'}
|
|
1009
|
0 |
0 |
unless ($self->_requests->{$id}->wheel_alive)
|
|
1015
|
0 |
0 |
if $self->errorhandler and $self->errorhandler->{'SESSION'} and $self->errorhandler->{'EVENT'}
|
|
1022
|
0 |
0 |
unless (defined $response->IS_STREAMING)
|
|
1036
|
0 |
0 |
if ($self->_chunkcount->{$id} > 1) { }
|
|
1049
|
0 |
0 |
unless ($response->DONT_FLUSH)
|
|
1066
|
12 |
0 |
unless ($response->header('Date'))
|
|
1071
|
12 |
0 |
if (not $stream || $self->proxymode || defined $response->header('Content-Length') and my $len = length $response->content)
|
|
1080
|
5 |
7 |
unless ($response->header('Content-Type'))
|
|
1084
|
12 |
0 |
if (not $response->protocol)
|
|
1086
|
0 |
12 |
unless $request and $request->isa('HTTP::Request')
|
|
1087
|
12 |
0 |
unless ($request->method eq 'HEAD')
|
|
1099
|
0 |
0 |
unless (defined $response and UNIVERSAL::isa($response, 'HTTP::Response'))
|
|
1108
|
0 |
0 |
if ($self->_connections->{$id})
|
|
1113
|
0 |
0 |
unless (exists $self->_requests->{$id})
|
|
1121
|
0 |
0 |
if $self->_requests->{$id}->wheel_alive
|
|
1146
|
2 |
0 |
unless (ref $connection)
|
|
1148
|
0 |
2 |
if ($self->_connections->{$id}) { }
|
|
|
2 |
0 |
elsif ($self->_requests->{$id} and $self->_requests->{$id}->response) { }
|
|
1156
|
0 |
2 |
unless (ref $connection)
|
|
1161
|
2 |
0 |
if ($state) { }
|