| line |
true |
false |
branch |
|
18
|
7 |
1 |
unless defined $opts{'posting'} and not $opts{'posting'} |
|
19
|
6 |
2 |
unless defined $opts{'handle_connects'} and not $opts{'handle_connects'} |
|
20
|
7 |
1 |
unless defined $opts{'extra_cmds'} and ref $opts{'extra_cmds'} eq 'ARRAY' |
|
24
|
8 |
0 |
ref $options eq 'HASH' ? : |
|
44
|
0 |
414 |
unless $wheel_id and defined $$self{'clients'}{$wheel_id} |
|
52
|
1 |
6 |
unless grep {$_ eq $cmd;} @{$$self{'cmds'};}, @{$$self{'extra_cmds'};} |
|
64
|
7 |
1 |
if ($$self{'alias'}) { } |
|
70
|
8 |
0 |
if ($kernel != $sender) |
|
84
|
7 |
1 |
defined $$self{'address'} ? : |
|
|
8 |
0 |
defined $$self{'port'} ? : |
|
111
|
0 |
7 |
unless $wheel |
|
139
|
0 |
381 |
unless $self->_conn_exists($id) |
|
141
|
374 |
7 |
if ($$self{'clients'}{$id}{'post_buffer'}) |
|
142
|
2 |
372 |
if ($input eq '.') |
|
156
|
0 |
7 |
unless $cmd |
|
157
|
1 |
6 |
unless ($self->_valid_cmd($cmd)) |
|
162
|
3 |
3 |
if ($cmd eq 'quit') |
|
173
|
0 |
0 |
unless $self->_conn_exists($id) |
|
181
|
0 |
16 |
unless $self->_conn_exists($id) |
|
182
|
13 |
3 |
unless $$self{'clients'}{$id}{'quit'} |
|
190
|
0 |
1 |
unless $self->_conn_exists($id) |
|
202
|
1 |
7 |
unless $$self{'alias'} |
|
212
|
0 |
0 |
unless (@events) |
|
220
|
0 |
0 |
unless /^_/ |
|
223
|
0 |
0 |
unless ($$self{'sessions'}{$sender_id}{'refcnt'}++ or $session == $sender) |
|
236
|
0 |
0 |
unless (@events) |
|
250
|
0 |
0 |
unless /^_/ |
|
252
|
0 |
0 |
unless ($blah) |
|
256
|
0 |
0 |
if (--$$self{'sessions'}{$sender_id}{'refcnt'} <= 0) |
|
258
|
0 |
0 |
unless ($session == $sender) |
|
270
|
8 |
0 |
if (--$$self{'sessions'}{$session_id}{'refcnt'} <= 0) |
|
272
|
8 |
0 |
unless $session_id eq $nntpd_id |
|
303
|
0 |
24 |
if $self->_pluggable_process('NNTPD', $event, \(@args), \@extra_args) == 4 |
|
305
|
0 |
24 |
if scalar @extra_args |
|
320
|
0 |
16 |
unless $self->_conn_exists($id) |
|
321
|
0 |
16 |
unless $output |
|
323
|
0 |
16 |
if $self->_pluggable_process('NNTPC', 'response', $id, \$output) == 4 |
|
332
|
2 |
5 |
unless $$self{'handle_connects'} |
|
333
|
4 |
1 |
if ($$self{'posting'}) { } |
|
347
|
14 |
2 |
unless $code and $code eq '340' || $code eq '335' |