line |
true |
false |
branch |
44
|
1 |
0 |
unless opendir OBD, '/proc/fs/lustre/obdfilter' |
46
|
0 |
0 |
if $dirent =~ /^\./ |
47
|
0 |
0 |
unless -d join('/', '/proc/fs/lustre/obdfilter', $dirent) |
63
|
0 |
0 |
unless opendir EXP, $export_dir |
65
|
0 |
0 |
if $dirent =~ /^\./ |
66
|
0 |
0 |
unless -d $export_dir . $dirent |
79
|
0 |
0 |
unless opendir OBD, '/proc/fs/lustre/mds' |
81
|
0 |
0 |
if $dirent =~ /^\./ |
82
|
0 |
0 |
unless -d join('/', '/proc/fs/lustre/mds', $dirent) |
92
|
0 |
1 |
-d '/proc/fs/lustre/ost' ? : |
98
|
0 |
1 |
-d '/proc/fs/lustre/mds' ? : |
104
|
0 |
1 |
-d '/proc/fs/lustre/mdt' ? : |
132
|
0 |
0 |
unless open LF, '/proc/fs/lustre/version' |
134
|
0 |
0 |
if ($_ =~ /^lustre: (\d.+)$/) |
150
|
0 |
0 |
unless open P, $fname |
153
|
0 |
0 |
if (my($name, $samples, $format, $min, $max, $count) = $_ =~ /^(\S+)\s+(\d+) samples \[(.+)\]\s+(\d+)\s+(\d+)\s+(\d+)[^\d]/) { } |
|
0 |
0 |
elsif (my($rqname, $rqx, $rqformat) = $_ =~ /^(\S+)\s+(\d+) samples \[(.+)\]/) { } |
|
0 |
0 |
elsif ($_ =~ /^snapshot_time\s+([0-9.]+) /) { } |
174
|
0 |
0 |
unless open P, $fname |
176
|
0 |
0 |
if ($_ =~ /^snapshot_time:\s+([0-9.]+) /) { } |
|
0 |
0 |
elsif ($_ =~ /([^:]+?)(\s+)ios .+ ios/) { } |
|
0 |
0 |
elsif ($_ =~ /^$/) { } |
|
0 |
0 |
elsif ($ctx and $_ =~ /^(.+):\s+(\d+)\s+\d+\s+\d+\s+\|\s*(\d+)\s+\d+/) { } |
201
|
0 |
0 |
unless open P, $fname |
203
|
0 |
0 |
if (my($k, $v) = $_ =~ /^(\S+):\s+(.+)$/) |
204
|
0 |
0 |
if ($v =~ m[^(\d+)/(\d+)$]) |
241
|
0 |
0 |
if $@ |