Branch Coverage

blib/lib/POE/Filter/SSL.pm

Criterion	Covered	Total	%
branch	0	258	0.0

line	true	false	branch
46	0	0	if (checkForDoSendback($_[10])) { }
47	0	0	unless (defined $$temp_flushed_event)
64	0	0	if (defined $self->[$EVENT_FLUSHED])
73	0	0	if ($self->[$HANDSHAKE])
87	0	0	if (@$return)
94	0	0	if checkForDoSendback($return) and $return->[0] eq $filter
96	0	0	unless $exchanged
103	0	0	exists $self->[0][0] ? :
110	0	0	if (checkForDoSendback($data))
112	0	0	if ($data->[0] eq $filter)
118	0	0	if ($found) { }
121	0	0	unless $ok or $filter eq $data->[0] and checkForDoSendback($data)
124	0	0	unless @$data
139	0	0	if ref $chunks eq 'ARRAY' and scalar @$chunks
141	0	0	if &blessed($chunks) and $chunks->can('DOSENDBACK') and $chunks->DOSENDBACK
152	0	0	unless $x509result = &Net::SSLeay::PEM_read_bio_X509($bio)
163	0	0	unless $evp_pkey = &Net::SSLeay::PEM_read_bio_PrivateKey($bio)
174	0	0	if $err and $err != 1
177	0	0	if $err and $err != 1
187	0	0	if $unblessed->{'debug'}
188	0	0	if $sent != length $data
203	0	0	if $self->{'cacrl'}
211	0	0	$params->{'tls1_2'} ? :
	0	0	$params->{'tls'} || $params->{'tls1_2'} ? :
216	0	0	unless $self->{'client'} or $params->{'nohonor'}
219	0	0	if ($params->{'chain'})
221	0	0	if $err and $err != 1
224	0	0	if ($params->{'keymem'} or $params->{'key'})
225	0	0	if ($params->{'keymem'}) { }
228	0	0	if $self->{'unblessed'}{'debug'}
232	0	0	if $self->{'unblessed'}{'debug'}
234	0	0	if $err and $err != 1
237	0	0	if ($params->{'crtmem'} or $params->{'crt'})
238	0	0	if ($params->{'crtmem'}) { }
242	0	0	if $self->{'unblessed'}{'debug'}
247	0	0	if $self->{'unblessed'}{'debug'}
249	0	0	if $err and $err != 1
254	0	0	if ($params->{'cacrt'} or $params->{'cacrtmem'})
256	0	0	if ($params->{'cacrtmem'}) { }
257	0	0	if (ref $params->{'cacrtmem'} eq 'ARRAY') { }
261	0	0	unless $err
266	0	0	if $self->{'unblessed'}{'debug'}
271	0	0	if $self->{'unblessed'}{'debug'}
272	0	0	unless $err and $err == 1
275	0	0	if $self->{'unblessed'}{'debug'}
277	0	0	unless $err and $err == 1
280	0	0	if $err and $err != 1
285	0	0	if $params->{'cipher'}
286	0	0	if $err and $err != 1
290	0	0	unless $self->{'rbio'} = &Net::SSLeay::BIO_new(scalar &Net::SSLeay::BIO_s_mem())
292	0	0	unless $self->{'wbio'} = &Net::SSLeay::BIO_new(scalar &Net::SSLeay::BIO_s_mem())
297	0	0	if $err and $err != 1
300	0	0	if ($params->{'dhcert'} or $params->{'dhcertmem'})
303	0	0	if ($params->{'dhcertmem'}) { }
307	0	0	unless -s $params->{'dhcert'} and $dhbio = &Net::SSLeay::BIO_new_file($params->{'dhcert'}, 'r')
312	0	0	if $self->{'unblessed'}{'debug'}
315	0	0	if POE_FILTER_SSL_set_tmp_dh($self->{'ssl'}, $dhret) < 0
317	0	0	if $self->{'unblessed'}{'debug'}
325	0	0	unless POE_FILTER_SSL_CTX_set_tmp_rsa($self->{'context'}, $rsa)
327	0	0	if $self->{'unblessed'}{'debug'}
333	0	0	if $params->{'clientcert'}
336	0	0	if $params->{'clientcert'} and $params->{'blockbadclientcert'}
341	0	0	$params->{'blockbadclientcert'} ? :
	0	0	if $self->{'unblessed'}{'debug'}
342	0	0	if ($params->{'sni'})
345	0	0	if $self->{'unblessed'}{'debug'}
346	0	0	if $err and $err != 1
351	0	0	if $params->{'ignoreVerifyErrors'} and ref $params->{'ignoreVerifyErrors'} eq 'ARRAY'
361	0	0	if $unblessed->{'debug'}
363	0	0	if ($unblessed->{'ignoreVerifyErrors'} and ref $unblessed->{'ignoreVerifyErrors'} eq 'ARRAY' and scalar grep({$errcode == $_;} @{$$unblessed{'ignoreVerifyErrors'};}))
368	0	0	if $unblessed->{'debug'}
371	0	0	if $unblessed->{'debug'}
374	0	0	$ok ? :
	0	0	if not defined $unblessed->{'ok'} or $unblessed->{'ok'} != 2
383	0	0	if (my $x = &Net::SSLeay::X509_STORE_CTX_get_current_cert($x509_store_ctx))
401	0	0	if $self->{'unblessed'}{'debug'}
402	0	0	$self->{'accepted'} ? :
409	0	0	if $self->{'unblessed'}{'debug'}
411	0	0	if $self->doSSL or $self->{'buffer'}
413	0	0	if $data
416	0	0	if $self->{'unblessed'}{'debug'}
423	0	0	if $self->{'unblessed'}{'debug'}
427	0	0	if $self->doSSL or $self->{'buffer'}
430	0	0	if $self->{'unblessed'}{'debug'}
434	0	0	if $self->{'unblessed'}{'debug'}
443	0	0	if $self->{'unblessed'}{'debug'}
446	0	0	if ($self->{'accepted'})
447	0	0	if (defined $self->{'sendbuf'})
455	0	0	if ref $data eq 'POE::Filter::SSL'
457	0	0	if $self->{'unblessed'}{'debug'}
458	0	0	if ($self->{'accepted'}) { }
461	0	0	if $data
466	0	0	if $self->{'buffer'}
474	0	0	if ((my $sent = &Net::SSLeay::write($self->{'ssl'}, $data)) != length $data)
485	0	0	if ((my $sent = &Net::SSLeay::BIO_write($self->{'rbio'}, $data)) != length $data)
489	0	0	unless $nodoSSL
500	0	0	if $self->{'unblessed'}{'debug'}
501	0	0	unless ($self->{'accepted'})
504	0	0	$self->{'client'} ? :
505	0	0	if ($err == 1) { }
511	0	0	unless ($err2 == Net::SSLeay::ERROR_WANT_READ())
512	0	0	$self->{'client'} ? :
514	0	0	if ($err3 = &Net::SSLeay::ERR_get_error()) { }
519	0	0	if (defined $self->{'errorhandler'}) { }
520	0	0	if (ref $self->{'errorhandler'} eq 'CODE') { }
	0	0	elsif (lc $self->{'errorhandler'} eq 'ignore') { }
	0	0	elsif (lc $self->{'errorhandler'} eq 'carp') { }
	0	0	elsif (lc $self->{'errorhandler'} eq 'confess') { }
	0	0	elsif (lc $self->{'errorhandler'} eq 'carponetime') { }
535	0	0	unless $self->{'errorstat'}{$err or '-'}{$err2 or '-'}{$err3 or '-'}++
541	0	0	unless $self->{'accepted'}++
549	0	0	if $self->{'unblessed'}{'debug'}
566	0	0	if (defined $self->{'cacrl'})
567	0	0	$self->clientCertNotOnCRL($self->{'cacrl'}) ? :
569	0	0	$self->clientCertExists ? :
574	0	0	$self->clientCertExists ? :
581	0	0	if (scalar @certids)
586	0	0	if $self->{'unblessed'}{'debug'}
589	0	0	if $crlstatus
590	0	0	!($crlstatus =~ /^CRL:/) ? :
	0	0	$crlstatus ? :
592	0	0	if (ref $_ eq 'ARRAY') { }
593	0	0	if ($self->{'unblessed'}{'debug'})
594	0	0	if $t
602	0	0	if $self->{'unblessed'}{'debug'}
607	0	0	if $self->{'unblessed'}{'debug'}
608	0	0	unless $badcrls
624	0	0	if $self->{'ssl'}
626	0	0	if $self->{'context'}