| line |
true |
false |
branch |
|
39
|
0 |
0 |
unless defined $self->{'path'}
|
|
50
|
0 |
0 |
unless (scalar keys %{$locks;})
|
|
53
|
0 |
0 |
unless open my $out, ">", $lockname
|
|
58
|
0 |
0 |
if (link $lockname, $lockfile)
|
|
96
|
0 |
0 |
unless (scalar keys %{$locks;})
|
|
100
|
0 |
0 |
unless (defined $self->{'sysfile_cache'})
|
|
105
|
0 |
0 |
unless opendir my $dir, $data_path
|
|
110
|
0 |
0 |
unless $entry =~ /^file\./
|
|
113
|
0 |
0 |
unless scalar @c_stat
|
|
136
|
0 |
0 |
unless ref $files eq "ARRAY"
|
|
143
|
0 |
0 |
unless $file
|
|
145
|
0 |
0 |
if (ref $file) { }
|
|
146
|
0 |
0 |
if ($file->isa('File::Information::Link')) { }
|
|
|
0 |
0 |
elsif ($file->isa('File::Information::Inode')) { }
|
|
157
|
0 |
0 |
if not defined $inode and defined $link
|
|
159
|
0 |
0 |
if defined $link
|
|
160
|
0 |
0 |
if defined $inode
|
|
162
|
0 |
0 |
unless defined $inode
|
|
187
|
0 |
0 |
if (exists $sysfile_cache->{$key})
|
|
188
|
0 |
0 |
if ($opts{'skip_already'})
|
|
195
|
0 |
0 |
if ($invalid and $opts{'skip_invalid'})
|
|
200
|
0 |
0 |
unless (defined $file->{'uuid'})
|
|
208
|
0 |
0 |
if ($invalid)
|
|
243
|
0 |
0 |
unless my $utag_name = $File::Information::Base::_digest_name_converter{$tagpool_name}
|
|
245
|
0 |
0 |
unless defined $digest
|
|
261
|
0 |
0 |
unless defined $info{$c}
|
|
266
|
0 |
0 |
unless $uuid
|
|
272
|
0 |
0 |
unless link $file->{'path'}, $self->_catfile("data", $pool_name_suffix)
|
|
290
|
0 |
0 |
if (defined $self->{'locks'} and scalar keys %{$$self{"locks"};})
|
|
322
|
0 |
0 |
unless (scalar keys %{$locks;})
|
|
323
|
0 |
0 |
if defined $self->{'lockfile'}
|
|
324
|
0 |
0 |
if defined $self->{'lockname'}
|
|
336
|
0 |
0 |
if $self->{'_loaded_tagpool_pool'}
|
|
342
|
0 |
0 |
unless $HAVE_FILE_VALUEFILE
|
|
350
|
0 |
0 |
unless defined $config
|
|
352
|
0 |
0 |
if defined $config->{'pool-uuid'} and length $config->{'pool-uuid'} == 36
|