| line |
true |
false |
branch |
|
95
|
0 |
11 |
unless bless $self, $class |
|
123
|
0 |
11 |
unless (-d $self->{'path'}) |
|
124
|
0 |
0 |
unless mkdir $self->{'path'} |
|
129
|
1 |
10 |
if (not -e $file) |
|
131
|
0 |
1 |
if ($self->{'sticky'}) |
|
135
|
0 |
1 |
unless nstore(\%update, $file) |
|
143
|
0 |
0 |
unless $args{'add'} |
|
144
|
0 |
0 |
unless $args{'remove'} |
|
149
|
0 |
0 |
if $self->{'logger'} |
|
152
|
0 |
0 |
if (-e $file and not $override) |
|
154
|
0 |
0 |
if $self->{'logger'} |
|
156
|
0 |
0 |
if $self->{'logger'} |
|
157
|
0 |
0 |
if $self->{'logger'} |
|
159
|
0 |
0 |
if $self->{'logger'} |
|
161
|
0 |
0 |
if $self->{'logger'} |
|
165
|
0 |
0 |
if $self->{'logger'} |
|
170
|
0 |
0 |
unless nstore(\%data, $file) |
|
171
|
0 |
0 |
if ($self->{'sticky'}) |
|
176
|
0 |
0 |
if $self->{'logger'} |
|
189
|
0 |
0 |
if ($self->{'sticky'}) |
|
202
|
0 |
0 |
if ($self->{'sticky'} and exists $self->{'data'}{$self->{'files'}{'updates'}}) { } |
|
209
|
0 |
0 |
if $self->{'logger'} |
|
211
|
0 |
0 |
if ($self->{'sticky'}) |
|
226
|
0 |
0 |
if ($self->{'sticky'} and exists $self->{'data'}{$self->{'files'}{'updates'}}) { } |
|
233
|
0 |
0 |
if $self->{'logger'} |
|
235
|
0 |
0 |
if ($self->{'sticky'}) |
|
249
|
0 |
0 |
if ($self->{'sticky'} and exists $self->{'data'}{$self->list_to_file($list)}) { } |
|
254
|
0 |
0 |
if (not -e $file) { } |
|
258
|
0 |
0 |
if $self->{'logger'} |
|
261
|
0 |
0 |
if ($self->{'sticky'}) |
|
281
|
0 |
0 |
if ($self->{'sticky'} and exists $self->{'data'}{$self->{'files'}{'updates'}}) { } |
|
286
|
0 |
0 |
if $self->{'logger'} |
|
294
|
0 |
0 |
unless nstore($update, $file) |
|
296
|
0 |
0 |
if ($self->{'sticky'}) |
|
313
|
0 |
0 |
if ($self->{'sticky'} and exists $self->{'data'}{$self->{'files'}{'updates'}}) { } |
|
318
|
0 |
0 |
if $self->{'logger'} |
|
326
|
0 |
0 |
unless nstore($update, $file) |
|
327
|
0 |
0 |
if ($self->{'sticky'}) |
|
335
|
0 |
0 |
unless $args{'lists'} |
|
336
|
0 |
0 |
unless $args{'hashes'} |
|
339
|
0 |
0 |
if $self->{'logger'} |
|
342
|
0 |
0 |
if ($self->{'sticky'} and exists $self->{'data'}{$self->list_to_file($list)}) { } |
|
347
|
0 |
0 |
unless (-e $file) |
|
348
|
0 |
0 |
if $self->{'logger'} |
|
352
|
0 |
0 |
if $self->{'logger'} |
|
355
|
0 |
0 |
if ($self->{'sticky'}) |
|
363
|
0 |
0 |
if (defined $index) |
|
376
|
0 |
0 |
unless $args{'hashes'} |
|
382
|
0 |
0 |
if ($self->{'sticky'} and exists $self->{'data'}{$self->{'files'}{'full_hashes'}}) { } |
|
|
0 |
0 |
elsif (-e $file) { } |
|
392
|
0 |
0 |
if $self->{'logger'} |
|
398
|
0 |
0 |
if $self->{'logger'} |
|
399
|
0 |
0 |
unless nstore($db, $file) |
|
401
|
0 |
0 |
if ($self->{'sticky'}) |
|
411
|
0 |
0 |
unless $args{'lists'} |
|
415
|
0 |
0 |
if ($self->{'sticky'} and exists $self->{'data'}{$self->{'files'}{'full_hashes'}}) { } |
|
420
|
0 |
0 |
unless (-e $file) |
|
424
|
0 |
0 |
if $self->{'logger'} |
|
429
|
0 |
0 |
if $self->{'logger'} |
|
437
|
0 |
0 |
if $_->{'hash'} eq $hash and $_->{'list'}{'threatEntryType'} eq $list->{'threatEntryType'} and $_->{'list'}{'threatType'} eq $list->{'threatType'} and $_->{'list'}{'platformType'} eq $list->{'platformType'} |
|
439
|
0 |
0 |
if defined $result |
|
456
|
0 |
0 |
if ($self->{'keep_all'} == 0) |
|
461
|
0 |
0 |
unless (-e $file) |
|
468
|
0 |
0 |
if (scalar @results < scalar @{$db->{'hashes'};}) |
|
470
|
0 |
0 |
unless nstore($db, $file) |