--- trunk/lib/BackupPC/SearchLib.pm 2005/08/25 11:41:58 72 +++ trunk/lib/BackupPC/SearchLib.pm 2005/08/26 23:37:10 79 @@ -32,10 +32,9 @@ sub epoch_to_iso { my $t = shift || return; - $t += 60 * 60 * +2; # FIXME add TZ - my $dt = DateTime->from_epoch( epoch => $t ) || return; - print STDERR "BUG: $t != " . $dt->epoch . "\n" unless ($t == $dt->epoch); - return $dt->ymd . ' ' . $dt->hms; + my $iso = BackupPC::Lib::timeStamp($t); + $iso =~ s/\s/ /g; + return $iso; } sub getWhere($) { @@ -98,7 +97,8 @@ files.date AS date, files.type AS filetype, files.size AS size, - dvds.name AS dvd + -- dvds.name AS dvd + null AS dvd }; my $sql_from = qq{ @@ -109,7 +109,7 @@ }; my $sql_dvd_from = qq{ - LEFT JOIN dvds ON dvds.ID = files.dvdid + -- LEFT JOIN dvds ON dvds.ID = files.dvdid }; my $sql_where; @@ -175,8 +175,10 @@ min(backups.type) AS type, min(backups.date) AS date, min(backups.size) AS size - FROM backups - INNER JOIN hosts ON hosts.ID = backups.hostID + FROM files + INNER JOIN shares ON files.shareID=shares.ID + INNER JOIN hosts ON hosts.ID = shares.hostID + INNER JOIN backups ON backups.num = files.backupNum and backups.hostID = hosts.ID AND backups.shareID = shares.ID WHERE files.dvdid IS NULL GROUP BY @@ -228,18 +230,21 @@ $retHTML.= q{}; $retHTML .= q{}; } - $retHTML .= qq{}; + $retHTML .= qq{ +
+ + }; if ($addForm) { $retHTML .= ""; } $retHTML .= qq{ - - - - - - + + + + + + }; @@ -317,16 +322,17 @@ $retHTML .= qq{ -
Found $results files showing $from - $to (took $dur) -
HostBackup noTypedateage/dayssize/MBHostBackup noTypedateage/dayssize/MB
- - - - - - - - +
+ Found $results files showing $from - $to (took $dur) +
+
ShareNameType#SizeDateMedia
+ + + + + + + }; @@ -347,19 +353,15 @@ foreach $file (@{ $files }) { my $typeStr = BackupPC::Attrib::fileType2Text(undef, $file->{'type'}); - $retHTML .= ""; + $retHTML .= qq{}; - foreach my $v (( - $file->{'sharename'}, - qq{ } . hilite_html( $file->{'fpath'}, $hilite ), - $typeStr, - restore_link( $typeStr, $file->{'hname'}, $file->{'backupno'}, $file->{'sname'}, $file->{'fpath'}, $file->{'backupno'} ), - $file->{'size'}, - epoch_to_iso( $file->{'date'} ), - $file->{'dvd'} - )) { - $retHTML .= qq{}; - } + $retHTML .= + qq{} . + qq{} . + qq{} . + qq{} . + qq{} . + qq{}; $retHTML .= ""; }
ShareType and Name#SizeDateMedia
$v} . $file->{'sharename'} . qq{$typeStr } . hilite_html( $file->{'fpath'}, $hilite ) . qq{} . restore_link( $typeStr, ${EscURI( $file->{'hname'} )}, $file->{'backupno'}, ${EscURI( $file->{'sname'})}, ${EscURI( $file->{'fpath'} )}, $file->{'backupno'} ) . qq{} . $file->{'size'} . qq{} . epoch_to_iso( $file->{'date'} ) . qq{} . $file->{'dvd'} . qq{