/[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 91 by dpavlin, Sun Aug 28 17:53:46 2005 UTC revision 102 by dpavlin, Tue Aug 30 22:43:01 2005 UTC
# Line 248  sub getBackupsNotBurned() { Line 248  sub getBackupsNotBurned() {
248          SELECT          SELECT
249                  backups.hostID          AS hostid,                  backups.hostID          AS hostid,
250                  min(hosts.name)         AS host,                  min(hosts.name)         AS host,
251                    min(shares.name)        AS share,
252                  backups.num             AS backupnum,                  backups.num             AS backupnum,
253                  min(backups.type)       AS type,                  min(backups.type)       AS type,
254                  min(backups.date)       AS date,                  min(backups.date)       AS date,
# Line 257  sub getBackupsNotBurned() { Line 258  sub getBackupsNotBurned() {
258                  INNER JOIN hosts        ON hosts.ID = shares.hostID                  INNER JOIN hosts        ON hosts.ID = shares.hostID
259                  INNER JOIN backups      ON backups.num = files.backupnum and backups.hostID = hosts.ID AND backups.shareID = shares.ID                  INNER JOIN backups      ON backups.num = files.backupnum and backups.hostID = hosts.ID AND backups.shareID = shares.ID
260          GROUP BY          GROUP BY
261                  backups.hostID, backups.num                  backups.hostID, backups.num, backups.shareid
262          ORDER BY min(backups.date)          ORDER BY min(backups.date)
263          };          };
264          my $sth = $dbh->prepare( $sql );          my $sth = $dbh->prepare( $sql );
# Line 276  sub getBackupsNotBurned() { Line 277  sub getBackupsNotBurned() {
277  sub displayBackupsGrid()  sub displayBackupsGrid()
278    {    {
279        my $retHTML = "";        my $retHTML = "";
       my $addForm = 1;  
280                
281        if ($addForm) {          $retHTML .= <<EOF3;
   
             $retHTML .= <<EOF3;  
282  <script language="javascript" type="text/javascript">  <script language="javascript" type="text/javascript">
283  <!--  <!--
284    
# Line 301  sub displayBackupsGrid() Line 299  sub displayBackupsGrid()
299  //-->  //-->
300  </script>        </script>      
301  EOF3  EOF3
302                $retHTML .= q{<form name="forma" method="GET" action="}."$MyURL"."?action=burn\"";          $retHTML .= q{
303                $retHTML.= q{<input type="hidden" value="burn" name="action">};                  <form name="forma" method="GET" action="$MyURL?action=burn">
304                $retHTML .= q{<input type="hidden" value="results" name="search_results">};                  <input type="hidden" value="burn" name="action">
305          }                  <input type="hidden" value="results" name="search_results">
306          $retHTML .= qq{                  <table style="fview" border="0" cellspacing="0" cellpadding="2">
                 <table style="fview" border="1" cellspacing="0" cellpadding="3">  
307                  <tr class="tableheader">                  <tr class="tableheader">
308          };                  <td class="tableheader">
309                            <input type="checkbox" name="allFiles" onClick="checkAll('allFiles');">
310          if ($addForm) {                  </td>
311              $retHTML .= "<td class=\"tableheader\"><input type=\"checkbox\" name=\"allFiles\" onClick=\"checkAll('allFiles');\"></td>";                  <td align="center">Share</td>
         }  
         $retHTML .=  qq{  
                 <td align="center">Host</td>  
312                  <td align="center">Backup no</td>                  <td align="center">Backup no</td>
313                  <td align="center">Type</td>                  <td align="center">Type</td>
314                  <td align="center">date</td>                  <td align="center">date</td>
315                  <td align="center">age/days</td>                  <td align="center">age/days</td>
316                  <td align="center">size/MB</td>                  <td align="center">size/MB</td>
317                  </tr>                  </tr>
318    
319                    <tr><td colspan=7 style="tableheader">
320                    <input type="submit" value="Burn selected backups on medium" name="submitBurner">
321                    </td></tr>
322          };          };
323    
324          my @backups = getBackupsNotBurned();          my @color = (' bgcolor="#e0e0e0"', '');
         my $backup;  
325    
326          if ($addForm) {          my $i = 0;
327                  $retHTML .= qq{          my $host = '';
                         <tr><td colspan=7 style="tableheader">  
                         <input type="submit" value="Burn selected backups on medium" name="submitBurner">  
                         </td></tr>  
                 };  
         }  
328    
329          foreach $backup(@backups) {          foreach my $backup ( getBackupsNotBurned() ) {
330    
331                    if ($host ne $backup->{'host'}) {
332                            $i++;
333                            $host = $backup->{'host'};
334                    }
335                  my $ftype = "";                  my $ftype = "";
336                            
337                  $retHTML .= "<tr>";                  $retHTML .= "<tr" . $color[$i %2 ] . ">";
338                  if ($addForm) {                  $retHTML .= '<td class="fview"><input type="checkbox" name="fcb' .
                         $retHTML .= '<td class="fview"><input type="checkbox" name="fcb' .  
339                                  $backup->{'hostid'}.'_'.$backup->{'backupnum'} .                                  $backup->{'hostid'}.'_'.$backup->{'backupnum'} .
340                                  '" value="' . $backup->{'hostid'}.'_'.$backup->{'backupnum'} .                                  '" value="' . $backup->{'hostid'}.'_'.$backup->{'backupnum'} .
341                                  '"></td>';                                  '"></td>';
                 }            
342                            
343                  $retHTML .= '<td class="fviewborder">' . $backup->{'host'} . '</td>' .                  $retHTML .=
344                          '<td class="fviewborder">' . $backup->{'backupnum'} . '</td>' .                          '<td align="right">' . $backup->{'host'} . ':' . $backup->{'share'} . '</td>' .
345                          '<td class="fviewborder">' . $backup->{'type'} . '</td>' .                          '<td align="center">' . $backup->{'backupnum'} . '</td>' .
346                          '<td class="fviewborder">' . epoch_to_iso( $backup->{'date'} ) . '</td>' .                          '<td align="center">' . $backup->{'type'} . '</td>' .
347                          '<td class="fviewborder">' . $backup->{'age'} . '</td>' .                          '<td align="center">' . epoch_to_iso( $backup->{'date'} ) . '</td>' .
348                          '<td class="fviewborder">' . $backup->{'size'} . '</td>' .                          '<td align="center">' . $backup->{'age'} . '</td>' .
349                          '</tr>';                          '<td align="right">' . $backup->{'size'} . '</td>' .
350          }                          "</tr>\n";
351    
         $retHTML .= "</table>";  
352    
         if ($addForm) {  
                 $retHTML .= "</form>";  
353          }          }
354    
355            $retHTML .= "</table>";
356            $retHTML .= "</form>";
357                
358          return $retHTML;          return $retHTML;
359  }        }      
Legend:
Removed from v.91  
changed lines
  Added in v.102
  ViewVC Help
Powered by ViewVC 1.1.26