/[BackupPC]/trunk/lib/BackupPC/SearchLib.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/lib/BackupPC/SearchLib.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 197 by dpavlin, Thu Oct 13 18:33:00 2005 UTC revision 209 by dpavlin, Sun Oct 16 10:57:51 2005 UTC
# Line 862  sub displayGrid($) { Line 862  sub displayGrid($) {
862                  return sprintf(qq{<a href="?action=%s&host=%s&num=%d&share=%s&dir=%s">%s</a>}, $action, @_);                  return sprintf(qq{<a href="?action=%s&host=%s&num=%d&share=%s&dir=%s">%s</a>}, $action, @_);
863          }          }
864    
865            my $sth_archived;
866            my %archived_cache;
867    
868            sub check_archived($$$) {
869                    my ($host, $share, $num) = @_;
870    
871                    if (my $html = $archived_cache{"$host $share $num"}) {
872                            return $html;
873                    }
874    
875                    $sth_archived ||= $dbh->prepare(qq{
876                            select
877                                    dvd_nr, note,
878                                    count(archive_burned.copy) as copies
879                            from archive
880                            inner join archive_burned on archive_burned.archive_id = archive.id
881                            inner join archive_backup on archive.id = archive_backup.archive_id
882                            inner join backups on backups.id = archive_backup.backup_id
883                            inner join hosts on hosts.id = backups.hostid
884                            inner join shares on shares.id = backups.shareid
885                            where hosts.name = ? and shares.name = ? and backups.num = ?
886                            group by dvd_nr, note
887                    });
888    
889                    my @mediums;
890    
891                    $sth_archived->execute($host, $share, $num);
892                    while (my $row = $sth_archived->fetchrow_hashref()) {
893                            push @mediums, '<abbr title="' .
894                                    $row->{'note'} .
895                                    ' [' . $row->{'copies'} . ']' .
896                                    '">' .$row->{'dvd_nr'} .
897                                    '</abbr>';
898                    }
899    
900                    my $html = join(", ",@mediums);
901                    $archived_cache{"$host $share $num"} = $html;
902                    return $html;
903            }
904    
905          my $i = $offset * $on_page;          my $i = $offset * $on_page;
906    
907          foreach $file (@{ $files }) {          foreach $file (@{ $files }) {
# Line 878  sub displayGrid($) { Line 918  sub displayGrid($) {
918                          qq{<td class="fviewborder" align="center">} . restore_link( $typeStr, ${EscURI( $file->{'hname'} )}, $file->{'backupnum'}, ${EscURI( $file->{'sname'})}, ${EscURI( $file->{'filepath'} )}, $file->{'backupnum'} ) . qq{</td>} .                          qq{<td class="fviewborder" align="center">} . restore_link( $typeStr, ${EscURI( $file->{'hname'} )}, $file->{'backupnum'}, ${EscURI( $file->{'sname'})}, ${EscURI( $file->{'filepath'} )}, $file->{'backupnum'} ) . qq{</td>} .
919                          qq{<td class="fviewborder" align="right">} . $file->{'size'} . qq{</td>} .                          qq{<td class="fviewborder" align="right">} . $file->{'size'} . qq{</td>} .
920                          qq{<td class="fviewborder">} . epoch_to_iso( $file->{'date'} ) . qq{</td>} .                          qq{<td class="fviewborder">} . epoch_to_iso( $file->{'date'} ) . qq{</td>} .
921                          qq{<td class="fviewborder">} . '?' . qq{</td>};                          qq{<td class="fviewborder">} . check_archived( $file->{'hname'}, $file->{'sname'}, $file->{'backupnum'} ) . qq{</td>};
922    
923                  $retHTML .= "</tr>";                  $retHTML .= "</tr>";
924          }          }
Legend:
Removed from v.197  
changed lines
  Added in v.209
  ViewVC Help
Powered by ViewVC 1.1.26