--- trunk/lib/BackupPC/SearchLib.pm 2005/08/30 22:42:22 101 +++ trunk/lib/BackupPC/SearchLib.pm 2005/08/30 22:43:01 102 @@ -248,6 +248,7 @@ SELECT backups.hostID AS hostid, min(hosts.name) AS host, + min(shares.name) AS share, backups.num AS backupnum, min(backups.type) AS type, min(backups.date) AS date, @@ -257,7 +258,7 @@ 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 GROUP BY - backups.hostID, backups.num + backups.hostID, backups.num, backups.shareid ORDER BY min(backups.date) }; my $sth = $dbh->prepare( $sql ); @@ -276,11 +277,8 @@ sub displayBackupsGrid() { my $retHTML = ""; - my $addForm = 1; - if ($addForm) { - - $retHTML .= < EOF3 - $retHTML .= q{
}; - $retHTML .= q{}; - } - $retHTML .= qq{ - + $retHTML .= q{ + + + +
- }; - - if ($addForm) { - $retHTML .= ""; - } - $retHTML .= qq{ - + + + + }; - my @backups = getBackupsNotBurned(); - my $backup; + my @color = (' bgcolor="#e0e0e0"', ''); - if ($addForm) { - $retHTML .= qq{ - - }; - } + my $i = 0; + my $host = ''; - foreach $backup(@backups) { + foreach my $backup ( getBackupsNotBurned() ) { + if ($host ne $backup->{'host'}) { + $i++; + $host = $backup->{'host'}; + } my $ftype = ""; - $retHTML .= ""; - if ($addForm) { - $retHTML .= ''; - } - $retHTML .= '' . - '' . - '' . - '' . - '' . - '' . - ''; - } + $retHTML .= + '' . + '' . + '' . + '' . + '' . + '' . + "\n"; - $retHTML .= "
Host + + Share Backup no Type date age/days size/MB
+ +
- -
"; + $retHTML .= '' . $backup->{'host'} . '' . $backup->{'backupnum'} . '' . $backup->{'type'} . '' . epoch_to_iso( $backup->{'date'} ) . '' . $backup->{'age'} . '' . $backup->{'size'} . '
' . $backup->{'host'} . ':' . $backup->{'share'} . '' . $backup->{'backupnum'} . '' . $backup->{'type'} . '' . epoch_to_iso( $backup->{'date'} ) . '' . $backup->{'age'} . '' . $backup->{'size'} . '
"; - if ($addForm) { - $retHTML .= "
"; } + + $retHTML .= ""; + $retHTML .= ""; return $retHTML; }