Branch Coverage

blib/lib/POE/Component/Server/NSCA.pm
Criterion Covered Total %
branch 31 74 41.8


line true false branch
99 0 3 unless defined $opts{'password'}
101 0 3 unless defined $opts{'encryption'}
103 0 3 unless defined $mcrypts{$opts{'encryption'}}
106 0 3 unless ref $access eq 'ARRAY'
108 0 3 unless $acl->isa('Net::Netmask')
112 1 2 ref $options eq 'HASH' ? :
143 0 3 unless $_[0]{'listener'}
156 2 2 if (length $$stuff <= 0) { }
2 0 elsif (length($$stuff) % 720 == 0) { }
0 0 elsif (length($$stuff) % 4304 == 0) { }
174 0 3 if ($self->{'alias'}) { }
183 3 0 defined $self->{'address'} ? :
3 0 defined $self->{'port'} ? :
198 2 0 if (ref $_[10] eq 'HASH') { }
0 0 elsif (ref $_[10] eq 'ARRAY') { }
208 0 2 unless ($args{'event'})
212 0 2 if (defined $self->{'sessions'}{$sender_id}) { }
226 0 0 if (ref $_[10] eq 'HASH') { }
0 0 elsif (ref $_[10] eq 'ARRAY') { }
237 0 0 if $data
248 3 0 unless $self->{'alias'}
266 0 3 unless grep {$_->match($peeraddr);} @{$$self{'access'};}
276 0 3 unless $wheel
299 0 5 unless $wheel_id and defined $self->{'clients'}{$wheel_id}
305 0 2 unless $self->_conn_exists($id)
312 0 1 unless $self->_conn_exists($id)
319 0 2 unless $self->_conn_exists($id)
324 0 2 unless $input
326 0 0 unless $version == 3 or $client->{'version_already_checked'}
373 2048 2048 if ($crc & 1) { }
390 1 1 if ($encryption_method == 0) { }
1 0 elsif ($encryption_method == 1) { }
421 1 0 if (scalar @salt_pw > 0)
440 0 0 if ($HAVE_MCRYPT) { }
442 0 0 if (defined $mcrypts{$encryption_method})
450 0 0 if (defined $td)
459 0 0 if $@