| line |
true |
false |
branch |
|
75
|
0 |
1 |
if ($opt and ref $opt ne 'HASH') { } |
|
83
|
0 |
1 |
if ($< != 0 and not $$opt{'opt'}{'no_root_check'}) |
|
105
|
0 |
1 |
unless $self->_populate_zfs_list |
|
112
|
0 |
4 |
if not @list and $self->errstr |
|
157
|
0 |
4 |
unless $$self{'init'} |
|
161
|
0 |
4 |
unless $vkeys{$key} |
|
168
|
0 |
4 |
if (not $curse) { } |
|
216
|
0 |
0 |
if ($$self{'nlevel'}) { } |
|
|
0 |
0 |
elsif (exists $$self{'level'}) { } |
|
221
|
0 |
0 |
if $$self{'state'} |
|
239
|
0 |
0 |
if $_[0]{'errors'} |
|
271
|
0 |
0 |
if $_[0]{'scan'} |
|
337
|
0 |
0 |
if $$self{'status'} |
|
354
|
0 |
0 |
if $_[0]{'action'} |
|
365
|
0 |
0 |
if ($$self{'nlevel'}) { } |
|
381
|
0 |
0 |
if ($$self{'nlevel'}) { } |
|
397
|
0 |
0 |
if ($$self{'nlevel'}) { } |
|
413
|
0 |
0 |
if ($$self{'nlevel'}) { } |
|
434
|
0 |
0 |
if $_[0]{'config'} |
|
468
|
0 |
0 |
if ($$self{'nlevel'}) { } |
|
|
0 |
0 |
elsif (not $$self{'level'}) { } |
|
513
|
0 |
0 |
unless ($name) |
|
517
|
0 |
0 |
if ($name =~ /^(raidz[123]\-\d+|mirror\-\d+|logs|cache|spares|replacing\-\d+)$/) { } |
|
535
|
1 |
0 |
if ((split(/\s+/, $res[0], 0))[3] eq 'healthy') { } |
|
550
|
0 |
0 |
unless $$self{'init'} |
|
552
|
0 |
0 |
if (ref $$self{'buf'}{'properties'}{$pool}{'order'} eq 'ARRAY') |
|
566
|
0 |
0 |
unless $$self{'init'} |
|
567
|
0 |
0 |
if (ref $$self{'buf'}{'properties'}{$pool}{'set'}{$key} eq 'ARRAY') |
|
598
|
0 |
5 |
if (not @res and $self->_run_err) |
|
602
|
1 |
4 |
if ($type eq 'filesystem') |
|
608
|
0 |
4 |
if ($_ eq 'no datasets available') { } |
|
612
|
4 |
0 |
if $used |
|
613
|
3 |
1 |
if $free |
|
614
|
4 |
0 |
if $refer |
|
635
|
0 |
4 |
unless (@res) |
|
643
|
24 |
52 |
if ($res[$i] =~ /^\s*(pool|state|scrub|scan|errors|config|status|action):\s*(.+)?$/) { } |
|
|
44 |
8 |
elsif ($n and $res[$i]) { } |
|
647
|
4 |
20 |
unless $v |
|
654
|
4 |
0 |
if (ref $$self{'buf'}{'pools'}{$pool}{'config'} eq 'ARRAY') |
|
662
|
0 |
38 |
if /^\s{8}NAME\s+STATE/ or not $_ |
|
666
|
30 |
8 |
if (/^\t(\s*)([^\s]+)\s+([A-Z]+)\s+(\d+)\s+(\d+)\s+(\d+)(\s+(.+))?$/) |
|
668
|
26 |
4 |
if ($d) { } |
|
696
|
0 |
4 |
if (not @res and $self->_run_err) |
|
714
|
0 |
0 |
if (opendir my $dh, '/dev/disk/by-id') { } |
|
717
|
0 |
0 |
if ($_ eq '.' or $_ eq '..') { } |
|
721
|
0 |
0 |
if readlink('/dev/disk/by-id/' . $_) =~ m[/([^/]+)$] |
|
723
|
0 |
0 |
if ($link eq $dev) { } |
|
|
0 |
0 |
elsif ($dev eq $_) { } |
|
748
|
69 |
0 |
if $com[$i] =~ /(.+)/ |
|
751
|
14 |
0 |
if (open __ZFSERR, '+>', undef) { } |
|
763
|
0 |
0 |
if $_ |