| line |
true |
false |
branch |
|
94
|
0 |
54 |
if $constname eq 'constant' |
|
96
|
3 |
51 |
if ($error) |
|
227
|
0 |
0 |
if ($key =~ /^local/i) |
|
229
|
0 |
0 |
if (length $newkey) { } |
|
236
|
0 |
0 |
if ($key =~ /^peer/i) |
|
238
|
0 |
0 |
if (length $newkey) { } |
|
246
|
0 |
0 |
unless fixup_args($args) |
|
247
|
0 |
0 |
unless enforce_required_args($args) |
|
252
|
0 |
0 |
if exists $args->{'Listen'} and $args->{'Listen'} |
|
253
|
0 |
0 |
unless (&looks_like_number($args->{'SocketType'})) |
|
260
|
0 |
0 |
if (exists $socket_types{lc $args->{'SocketType'}}) { } |
|
265
|
0 |
0 |
if $args->{'SocketType'} == 4 |
|
266
|
0 |
0 |
if $args->{'SocketType'} == 2 |
|
268
|
0 |
0 |
if $connectionless and $listener |
|
270
|
0 |
0 |
if $connectionless and $connector |
|
272
|
0 |
0 |
if $listener and $connector |
|
274
|
0 |
0 |
if $connector and $binder |
|
279
|
0 |
0 |
unless $socket->socket(PF_TIPC(), $args->{'SocketType'}, 0) |
|
283
|
0 |
0 |
if (exists $args->{'ConnectTimeout'}) |
|
285
|
0 |
0 |
unless $socket->setsockopt(SOL_TIPC(), TIPC_CONN_TIMEOUT(), $args->{'ConnectTimeout'}) |
|
287
|
0 |
0 |
if (exists $args->{'Importance'}) |
|
289
|
0 |
0 |
unless $socket->setsockopt(SOL_TIPC(), TIPC_IMPORTANCE(), $args->{'Importance'}) |
|
291
|
0 |
0 |
if ($binder) |
|
293
|
0 |
0 |
if (defined $local) { } |
|
294
|
0 |
0 |
if (ref $local and ref $local eq 'IO::Socket::TIPC::Sockaddr') { } |
|
302
|
0 |
0 |
unless $socket->bind($baddr) |
|
305
|
0 |
0 |
if ($connector) |
|
307
|
0 |
0 |
if (defined $peer) { } |
|
308
|
0 |
0 |
if (ref $peer and ref $peer eq 'IO::Socket::TIPC::Sockaddr') { } |
|
316
|
0 |
0 |
unless $socket->connect($caddr) |
|
319
|
0 |
0 |
if ($listener) |
|
320
|
0 |
0 |
unless $socket->listen |
|
337
|
0 |
0 |
if ($valid_args{$key}) |
|
339
|
0 |
0 |
unless (exists $args->{$key}) |
|
352
|
0 |
0 |
unless (exists $valid_args{$key}) |
|
357
|
0 |
0 |
if ($lckey eq lc $goodkey) |
|
365
|
0 |
0 |
unless $fixed |
|
402
|
0 |
0 |
unless defined $message |
|
403
|
0 |
0 |
unless ref $addr eq 'IO::Socket::TIPC::Sockaddr' |
|
405
|
0 |
0 |
unless defined $flags |
|
445
|
0 |
0 |
unless defined $flags |
|
446
|
0 |
0 |
unless defined $length |
|
447
|
0 |
0 |
unless $length > 0 |
|
524
|
0 |
0 |
unless defined $rv |
|
555
|
0 |
0 |
unless defined $rv |
|
641
|
5 |
0 |
if ($^O eq 'linux') { } |
|
|
0 |
0 |
elsif ($^O eq 'solaris') { } |
|
642
|
0 |
5 |
if `grep -c ^TIPC /proc/net/protocols` == 1 |
|
645
|
0 |
0 |
if `modinfo -c | grep -w tipc | grep -cv UNLOADED` == 1 |