Branch Coverage

blib/lib/IO/Socket/TIPC.pm
Criterion Covered Total %
branch 5 98 5.1


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'})
284 0 0 unless $socket->setsockopt(SOL_TIPC(), TIPC_CONN_TIMEOUT(), $$args{'ConnectTimeout'})
287 0 0 if (exists $$args{'Importance'})
288 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