line |
true |
false |
branch |
20
|
0 |
5 |
if @missing |
32
|
0 |
5 |
unless ($self->_set_mechanism($opts{'_mechanism'})) |
42
|
5 |
0 |
unless (ref $mechanism) |
46
|
0 |
5 |
unless (eval {
do {
&Module::Runtime::require_module($module);
1
}
}) |
61
|
0 |
0 |
$_[0]{'_negotiated_unix_fd'} ? : |
71
|
0 |
0 |
unless (defined $next_is_receive) |
86
|
4 |
0 |
if ($self->{'_sent_initial'}) |
89
|
0 |
4 |
if ($self->{'_io'}->get_write_queue_count) |
90
|
0 |
0 |
unless $self->flush_write_queue |
98
|
8 |
12 |
if ($cur->[0]) { } |
99
|
0 |
8 |
unless (my $line = $self->_read_line) |
109
|
2 |
10 |
if ('CODE' eq ref $cur->[1]) { } |
116
|
0 |
12 |
unless $self->_send_line(join($", @line_parts)) |
127
|
0 |
4 |
if $last_lines |
129
|
0 |
4 |
unless ($ok) |
131
|
0 |
0 |
if (eval {
do {
$err->isa('Protocol::DBus::X::Rejected')
}
}) { } |
138
|
0 |
0 |
unless (grep {$_ eq $mech;} @{$$self{"_tried_mechanism"};}) |
144
|
0 |
0 |
if ($self->_set_mechanism($mech)) |
177
|
5 |
0 |
unless ($self->{'_sent_initial'} or $self->{'_mechanism'}->must_send_initial) |
191
|
2 |
3 |
if ($self->{'_can_pass_unix_fd'}) |
206
|
2 |
0 |
if ($line eq 'AGREE_UNIX_FD') { } |
|
0 |
0 |
elsif (index($line, 'ERROR ') == 0) { } |
219
|
4 |
0 |
if (index($line, 'OK ') == 0) { } |
252
|
8 |
0 |
if ($line = $_[0]{'_io'}->read_until("\r\n")) |
257
|
0 |
8 |
if (0 == index($line, "REJECTED ")) |
271
|
0 |
2 |
unless my $sname = getsockname $sk |