| line |
true |
false |
branch |
|
143
|
0 |
0 |
unless exists $self->{'secret'} |
|
147
|
0 |
0 |
if (exists $config->{'cert'}) |
|
167
|
0 |
0 |
$self->{'fh'} ? : |
|
|
0 |
0 |
exists $config->{'nodelay'} ? : |
|
172
|
0 |
0 |
if $self->{'tls_ctx'} |
|
179
|
0 |
0 |
$protocol eq 'aemp' ? : |
|
181
|
0 |
0 |
if exists $self->{'on_greet'} |
|
193
|
0 |
0 |
unless $self |
|
205
|
0 |
0 |
/^([^=]+)(?:=(.*))?/u ? : |
|
210
|
0 |
0 |
if ($protocol eq 'aemp' and $aemp =~ /^aemp-\w+$/u) |
|
215
|
0 |
0 |
$protocol eq 'aemp' ? : |
|
217
|
0 |
0 |
if exists $self->{'on_greeted'} |
|
219
|
0 |
0 |
if ($aemp ne $protocol and $aemp ne 'aemp') { } |
|
|
0 |
0 |
elsif ($version != $PROTOCOL_VERSION) { } |
|
|
0 |
0 |
elsif ($protocol eq 'aemp') { } |
|
224
|
0 |
0 |
if ($rnode eq $AnyEvent::MP::Kernel::NODE) { } |
|
|
0 |
0 |
elsif ($AnyEvent::MP::Kernel::NODE{$rnode} and $AnyEvent::MP::Kernel::NODE{$rnode}{'transport'}) { } |
|
235
|
0 |
0 |
unless "$lgreeting1\n$lgreeting2" ne "$rgreeting1\n$rgreeting2" |
|
242
|
0 |
0 |
if (grep(($auth_ eq $_), @$auth_snd) and !($auth_ =~ /^tls_/u) || $tls) |
|
248
|
0 |
0 |
unless defined $s_auth |
|
253
|
0 |
0 |
if (grep(($framing_ eq $_), @$lframing)) |
|
259
|
0 |
0 |
unless defined $s_framing |
|
264
|
0 |
0 |
if ($tls) { } |
|
|
0 |
0 |
elsif (length $secret) { } |
|
265
|
0 |
0 |
$lgreeting2 lt $rgreeting2 ? : |
|
267
|
0 |
0 |
unless $self->{'hdl'} |
|
269
|
0 |
0 |
$s_auth eq 'tls_sha3_512' ? : |
|
|
0 |
0 |
$s_auth eq 'tls_anon' ? : |
|
275
|
0 |
0 |
unless $s_auth eq 'hmac_sha3_512' |
|
285
|
0 |
0 |
unless $self |
|
293
|
0 |
0 |
$tls ? : |
|
|
0 |
0 |
$tls ? : |
|
|
0 |
0 |
$auth_method eq 'tls_sha3_512' ? : |
|
|
0 |
0 |
$auth_method eq 'tls_anon' ? : |
|
|
0 |
0 |
$auth_method eq 'cleartext' ? : |
|
|
0 |
0 |
$auth_method eq 'hmac_sha3_512' ? : |
|
300
|
0 |
0 |
if ($rauth2 ne $rauth) |
|
312
|
0 |
0 |
if $auth_method eq 'tls_anon' |
|
315
|
0 |
0 |
if ($protocol eq 'aemp' and $self->{'hdl'}) |
|
343
|
0 |
0 |
if ($framing eq 'cbor') { } |
|
|
0 |
0 |
elsif ($framing eq 'json') { } |
|
368
|
0 |
0 |
if ($framing eq 'cbor') { } |
|
|
0 |
0 |
elsif ($framing eq 'json') { } |
|
403
|
0 |
0 |
if $@ |
|
413
|
0 |
0 |
if ($self->{'protocol'}) { } |
|
419
|
0 |
0 |
if $self->{'node'} and $self->{'node'}{'transport'} == $self |
|
423
|
0 |
0 |
if exists $self->{'release'} |
|
433
|
0 |
0 |
if ($self->{'protocol'}) { } |
|
447
|
0 |
0 |
if exists $self->{'release'} |
|
450
|
0 |
0 |
if exists $self->{'on_connect'} |
|
457
|
0 |
0 |
if exists $self->{'release'} |
|
460
|
0 |
0 |
if $self->{'hdl'} |
|
463
|
0 |
0 |
if exists $self->{'on_destroy'} |
|
464
|
0 |
0 |
$self->{'protocol'} ? : |