X-Git-Url: http://git.rot13.org/?p=BackupPC.git;a=blobdiff_plain;f=bin%2FBackupPC_updatedb;h=9315026e413c7738e9b79216a7769ee711dce0fb;hp=e72ba3dd7a87d6246eb135cd0762ac32a77464cc;hb=d44122e00f7b7b95696a872c23b985b82ebb34bb;hpb=4bebd36661ae62a8bae93097d00a8e43247a5064

diff --git a/bin/BackupPC_updatedb b/bin/BackupPC_updatedb
index e72ba3d..9315026 100755
--- a/bin/BackupPC_updatedb
+++ b/bin/BackupPC_updatedb
@@ -1,8 +1,7 @@
 #!/usr/bin/perl
 
 use strict;
-#use lib "/data/backuppc/lib";
-use lib "/usr/share/backuppc/lib";
+use lib "/usr/local/BackupPC/lib";
 
 use DBI;
 use BackupPC::Lib;
@@ -352,6 +351,28 @@ if ($opt{c}) {
 			date timestamp default now(),
 			primary key(id)
 		);
+
+		-- report backups and corresponding dvd
+
+		create view backups_on_dvds as
+		select
+			backups.id as id,
+			hosts.name || ':' || shares.name as share,
+			backups.num as num,
+			backups.type as type,
+			abstime(backups.date) as backup_date,
+			backups.size as size,
+			backups.inc_size as gzip_size,
+			archive.id as archive_id,
+			archive.dvd_nr
+		from backups
+		join shares on backups.shareid=shares.id
+		join hosts on shares.hostid = hosts.id
+		left outer join archive_backup on backups.id = archive_backup.backup_id
+		left outer join archive on archive_backup.archive_id = archive.id
+		where backups.parts > 0 and size > 0
+		order by backups.date
+		;
 	});
 
 	print "creating indexes: ";
@@ -552,7 +573,8 @@ warn "XXXX ",dump(@backups);
 		);
 		print $share_header unless ($opt{q});
 
-		my $files = BackupPC::View->new($bpc, $hostname, \@backups, 1);
+		my $files = BackupPC::View->new($bpc, $hostname, \@backups, { only_first => 1 });
+
 		foreach my $share ($files->shareList($backupNum)) {
 
 			my $t = time();