Branch Coverage

blib/lib/File/KDBX/Loader/V4.pm

Criterion	Covered	Total	%
branch	64	98	65.3

line	true	false	branch
39	0	87	unless &read_all($fh, my $buf, 5)
43	74	13	if (0 < $size)
44	0	74	unless &read_all($fh, $val, $size)
49	14	73	if ($type == 0) { }
	0	73	elsif ($type == 1) { }
	14	59	elsif ($type == 2) { }
	14	45	elsif ($type == 3) { }
	14	31	elsif ($type == 4) { }
	14	17	elsif ($type == 7) { }
	14	3	elsif ($type == 11) { }
	3	0	elsif ($type == 12) { }
	0	0	elsif ($type == 10 or $type == 8 or $type == 5 or $type == 6 or $type == 9) { }
56	0	14	unless $size == 16
62	0	14	unless $size == 32
86	87	0	wantarray ? :
93	0	17	unless &read_all($fh, my $buf, 2)
95	0	17	unless 256 == ($version & 65280)
101	0	80	unless &read_all($fh, $buf, 1)
103	17	63	if $type == 0
105	0	63	unless &read_all($fh, $buf, 4)
108	0	63	unless &read_all($fh, my $key, $klen)
110	0	63	unless &read_all($fh, $buf, 4)
113	0	63	unless &read_all($fh, my $val, $vlen)
115	11	52	if ($type == 4) { }
	19	33	elsif ($type == 5) { }
	1	32	elsif ($type == 8) { }
	0	32	elsif ($type == 12) { }
	0	32	elsif ($type == 13) { }
	1	31	elsif ($type == 24) { }
	31	0	elsif ($type == 66) { }
159	0	42	unless defined $kdbx->headers->{$field}
165	0	14	unless &read_all($fh, my $header_hash, 32)
167	0	14	unless $got_header_hash eq $header_hash
176	0	14	unless &read_all($fh, my $header_hmac, 32)
183	6	8	unless $got_header_hmac eq $header_hmac
198	8	0	if ($compress == 1) { }
	0	0	elsif ($compress != 0) { }
200	0	8	unless $fh = "IO::Uncompress::Gunzip"->new($fh)
217	8	17	if $type == "end"
226	0	25	unless &read_all($fh, my $buf, 5)
230	17	8	if (0 < $size)
231	0	17	unless &read_all($fh, $val, $size)
235	8	17	if ($type == 0) { }
	8	9	elsif ($type == 1) { }
	8	1	elsif ($type == 2) { }
	1	0	elsif ($type == 3) { }
249	0	1	$flags & 1 ? :
256	0	0	wantarray ? :
259	25	0	wantarray ? :