Condition Coverage

blib/lib/IPC/Shareable.pm
Criterion Covered Total %
condition 133 207 64.2


and 3 conditions

line !l l&&!r l&&r condition
172 362 0 92 ref $val and $knot->_need_tie($val, $key)
177 138 0 36 ref $val and $knot->_need_tie($val, $i)
182 73 1 14 ref $val and $knot->_need_tie($val)
229 461 0 503 ref $val and my $inner = _is_child($val)
253 25 0 2 ref $val and my $child = _is_child($val)
262 20 0 0 ref $val and my $child = _is_child($val)
289 4 0 2 ref $val and my $child = _is_child($val)
487 130 5 1 defined $code and ref $code ne "CODE"
523 46 0 89 $flags == 2 and $lock_success
639 7 0 18 defined $_[0] and not ref $_[0]
7 0 18 defined $_[0] and not ref $_[0] and UNIVERSAL::isa($_[0], __PACKAGE__)
680 0 0 0 $^O eq 'freebsd' && $IPC::Shareable::Config{'longsize'} == 8
804 0 0 1 $child_knot and $child_knot->{'_key_hex'}
811 0 0 5 $knot_filter and $knot_filter->{'_key_hex'}
993 0 0 8 $stored_key and $stored_key == $protect_key
1052 0 327 1 $sem_remove_status != 1 and $sem_remove_status ne "0 but true"
1062 0 1 327 $seg_removed and $sem_removed
1128 1165 0 55 ref $val && _is_child($val)
1139 298 0 37 ref $_ && _is_child($_)
1149 8 0 6 ref $val && _is_child($val)
1179 0 822 375 defined $knot and index($json, "\"__ics__\"") != -1
1182 0 1096 101 defined $knot and $knot->{'_type_int'} == 2
1096 17 84 defined $knot and $knot->{'_type_int'} == 2 and ref $data eq "HASH"
1185 1 0 43 defined $prev && ref $prev
1213 204 44 365 ref $data->{$key} eq "HASH" and exists $data->{$key}{'__ics__'}
1223 21 0 171 ref $data->[$i] eq "HASH" and exists $data->[$i]{'__ics__'}
1225 19 1 151 ref $prev eq 'ARRAY' && $i <= $prev->$#*
1236 2 0 518 ref $existing && _is_child($existing)
1237 2 8 510 $inner and $inner->{'_key'} == $info->{'child_key'}
1326 1 496 2 $knot->attributes("limit") and $shm_size > 1073741824
1376 0 1 1 $knot->attributes("create") and $knot->attributes("exclusive")
1433 0 0 3 $thaw_ok and defined $storable_data
1479 0 113 3 defined $stored_protected and $stored_protected != 0
1492 85 10 48 $parent->{'_key'} == IPC_PRIVATE() and $parent->attributes("serializer") ne "json"
1620 0 0 28 $child and $child->seg
1654 2 0 7 $child_type eq "HASH" and tied %{$$data{$id};}
2 0 0 $child_type eq "ARRAY" and tied @{$$data{$id};}
1666 3 0 0 $child_type eq "HASH" and tied %{$$data[$id];}
0 0 3 $child_type eq "ARRAY" and tied @{$$data[$id];}
1697 0 0 1 $child && $child->{'_key_hex'}
1717 0 0 0 $child && $child->{'_key_hex'}
1797 94 1 104 not $verified_exclusive and $check_count < 10

or 2 conditions

line l !l condition
454 4 3 $opts{'var'} || 'HASH'
546 122 0 $knot->{'_locked_children'} // []
716 2 1 $int_to_hex{$k_int} // (next)
791 8 0 builtin::reftype($data) // ""
799 1 0 builtin::reftype($v) // ""
817 6 0 $segs->{$h}{'child_keys'} // []
818 1 5 $extra_child_keys{$h} // []
848 6 0 $segs->{$hex} // {}
855 6 0 $id_by_hex{$hex} // "?"
865 6 0 $sem->id // "?"
866 6 0 $sem->getval(0) // "?"
867 6 0 $sem->getval(1) // "?"
868 6 0 $sem->getval(2) // "?"
869 6 0 $sem->getval(3) // "?"
891 6 0 $seg->{'child_keys'} // []
892 1 5 $extra_child_keys{$hex} // []
913 1 5 delete $opts{'_proc_dir'} // "/proc/sys/kernel"
1514 142 0 builtin::reftype($val) || ''
1611 146 4 builtin::reftype($data) // ""
1648 119 3 builtin::reftype($parent->{'_data'}) || ''
1653 7 2 builtin::reftype($data->{$id}) || ''
1665 3 0 builtin::reftype($data->[$id]) || ''
1679 6 0 builtin::reftype($data) // ""
1691 1 0 builtin::reftype($v) // ""
1711 0 0 builtin::reftype($v) // ""
1748 404 96 $knot->attributes('key') || ''
1936 211 288 $opts->{'magic'} || 0

or 3 conditions

line l !l&&r !l&&!r condition
577 1 2 5 not defined $_[0] or $_[0] ne __PACKAGE__
639 1 20 5 ref $_[0] or defined $_[0] and not ref $_[0] and UNIVERSAL::isa($_[0], __PACKAGE__)
919 0 0 0 $sysctl_out // `sysctl kern.sysv 2>/dev/null`
927 1 0 0 $sysctl_out // `sysctl kern.ipc 2>/dev/null`
1147 8 6 1 $type eq "SCALAR" or $type eq "REF"
1396 116 367 1 "IPC::Semaphore"->new($key, 0, $seg->flags & 511) // "IPC::Semaphore"->new($key, 4, $seg->flags)
1466 0 366 0 $process_register{$knot->seg->id} ||= $knot
1748 16 500 0 $key_str //= $knot->attributes('key') || ''
1935 212 287 0 $opts->{'owner'} || $$