330 |
my @data = @_; |
my @data = @_; |
331 |
shift @data; |
shift @data; |
332 |
|
|
333 |
my ($key, $shareID,undef,$name,$path,undef,$date,undef,$size) = @_; |
my ($key, $shareID,undef,$name,$path,$date,undef,$size) = @_; |
334 |
|
|
335 |
return $beenThere->{$key} if (defined($beenThere->{$key})); |
return $beenThere->{$key} if (defined($beenThere->{$key})); |
336 |
|
|
340 |
path = ? and |
path = ? and |
341 |
date = ? and |
date = ? and |
342 |
size = ? |
size = ? |
343 |
|
LIMIT 1 |
344 |
}); |
}); |
345 |
|
|
346 |
my @param = ($shareID,$path,$date,$size); |
my @param = ($shareID,$path,$date,$size); |
347 |
$sth->{file_in_db}->execute(@param); |
$sth->{file_in_db}->execute(@param); |
348 |
my $rows = $sth->{file_in_db}->rows; |
my $rows = $sth->{file_in_db}->rows; |
349 |
print STDERR "## found_in_db ",( $rows ? '+' : '-' ), join(" ",@param), "\n" if ($debug >= 3); |
print STDERR "## found_in_db($shareID,$path,$date,$size) ",( $rows ? '+' : '-' ), join(" ",@param), "\n" if ($debug >= 3); |
350 |
|
|
351 |
$beenThere->{$key}++; |
$beenThere->{$key}++; |
352 |
|
|