-#!/usr/bin/perl -w
+#!/usr/bin/python
#
-# lbs-util: Tool for managing LBS archives.
-#
-# Usage: lbs-util <repository> <cmd> <args>
-#
-# Available commands:
-# --list-snapshots
-# --list-segments
-
-use strict;
-use LBS qw(parse_headers);
-
-die "Too few arguments!\n" unless scalar(@ARGV) >= 2;
-die "Must specify a repository!\n" unless -d $ARGV[0];
-
-my $store = new LBS::Store $ARGV[0];
-my $cmd = $ARGV[1];
-my @args = @ARGV[2 .. $#ARGV];
-
-if ($cmd eq "--list-snapshots") {
- foreach ($store->list_snapshots()) {
- print $_, "\n";
- }
-} elsif ($cmd eq "--list-segments") {
- foreach ($store->list_segments()) {
- print $_, "\n";
- }
-} elsif ($cmd eq "--verify-snapshot") {
- my $snapshot = $store->load_snapshot($args[0]);
- my %info = parse_headers($snapshot);
- print "Root: $info{Root}\n";
-
- my $metadata = new LBS::MetadataParser $store, $info{Root};
- while ((my %item = $metadata->get_item())) {
- print $item{name}, "\n";
- if ($item{type} eq '-') {
- my $size = 0;
- my $verifier = new LBS::ChecksumVerifier $item{checksum};
- foreach (split /\s+/, $item{data}) {
- my $data = $store->load_ref($_);
- $verifier->add($data);
- $size += length($data);
- }
- if (!$verifier->verify() || $size != $item{size}) {
- fprintf STDERR "Verification failure for $item{name}\n";
- }
- }
- }
-} else {
- die "Unknown command: $cmd\n";
-}
+# Utility for managing LBS archives.
+
+import getpass, os, sys
+from optparse import OptionParser
+import lbs
+
+parser = OptionParser(usage="%prog [option]... command [arg]...")
+parser.add_option("-v", action="store_true", dest="verbose", default=False,
+ help="increase verbosity")
+parser.add_option("--store", dest="store",
+ help="specify path to backup data store")
+parser.add_option("--localdb", dest="localdb",
+ help="specify path to local database")
+(options, args) = parser.parse_args(sys.argv[1:])
+
+# Read a passphrase from the user and store it in the LBS_GPG_PASSPHRASE
+# environment variable.
+def get_passphrase():
+ ENV_KEY = 'LBS_GPG_PASSPHRASE'
+ if not os.environ.has_key(ENV_KEY):
+ os.environ[ENV_KEY] = getpass.getpass()
+
+# Delete old snapshots from the local database, though do not actually schedule
+# any segment cleaning.
+# Syntax: $0 --localdb=LOCALDB prune-db
+def cmd_prune_db():
+ db = lbs.LocalDatabase(options.localdb)
+
+ # Delete old snapshots from the local database.
+ db.garbage_collect()
+ db.commit()
+
+# Run the segment cleaner.
+# Syntax: $0 --localdb=LOCALDB clean
+def cmd_clean(clean_threshold=7.0):
+ db = lbs.LocalDatabase(options.localdb)
+
+ # Delete old snapshots from the local database.
+ db.garbage_collect()
+
+ # Expire segments which are poorly-utilized.
+ for s in db.get_segment_cleaning_list():
+ if s.cleaning_benefit > clean_threshold:
+ print "Cleaning segment %d (benefit %.2f)" % (s.id,
+ s.cleaning_benefit)
+ db.mark_segment_expired(s)
+ else:
+ break
+ db.balance_expired_objects()
+ db.commit()
+
+# List snapshots stored.
+# Syntax: $0 --data=DATADIR list-snapshots
+def cmd_list_snapshots():
+ store = lbs.LowlevelDataStore(options.store)
+ for s in sorted(store.list_snapshots()):
+ print s
+
+# List size of data needed for each snapshot.
+# Syntax: $0 --data=DATADIR list-snapshot-sizes
+def cmd_list_snapshot_sizes():
+ lowlevel = lbs.LowlevelDataStore(options.store)
+ store = lbs.ObjectStore(lowlevel)
+ previous = set()
+ for s in sorted(lowlevel.list_snapshots()):
+ d = lbs.parse_full(store.load_snapshot(s))
+ segments = d['Segments'].split()
+ (size, added, removed) = (0, 0, 0)
+ for seg in segments:
+ segsize = lowlevel.lowlevel_stat(seg + ".tar.gpg")['size']
+ size += segsize
+ if seg not in previous: added += segsize
+ for seg in previous:
+ if seg not in segments:
+ removed += lowlevel.lowlevel_stat(seg + ".tar.gpg")['size']
+ previous = set(segments)
+ print "%s: %.3f +%.3f -%.3f" % (s, size / 1024.0**2, added / 1024.0**2, removed / 1024.0**2)
+
+# Build checksum list for objects in the given segments, or all segments if
+# none are specified.
+def cmd_object_checksums(segments):
+ get_passphrase()
+ lowlevel = lbs.LowlevelDataStore(options.store)
+ store = lbs.ObjectStore(lowlevel)
+ if len(segments) == 0:
+ segments = sorted(lowlevel.list_segments())
+ for s in segments:
+ for (o, data) in store.load_segment(s):
+ csum = lbs.ChecksumCreator().update(data).compute()
+ print "%s/%s:%d:%s" % (s, o, len(data), csum)
+ store.cleanup()
+
+# Read a snapshot file
+def cmd_read_snapshots(snapshots):
+ get_passphrase()
+ lowlevel = lbs.LowlevelDataStore(options.store)
+ store = lbs.ObjectStore(lowlevel)
+ for s in snapshots:
+ d = lbs.parse_full(store.load_snapshot(s))
+ print d
+ print d['Segments'].split()
+ store.cleanup()
+
+# Verify snapshot integrity
+def cmd_verify_snapshots(snapshots):
+ get_passphrase()
+ lowlevel = lbs.LowlevelDataStore(options.store)
+ store = lbs.ObjectStore(lowlevel)
+ for s in snapshots:
+ print "#### Snapshot", s
+ d = lbs.parse_full(store.load_snapshot(s))
+ print "## Root:", d['Root']
+ metadata = lbs.iterate_metadata(store, d['Root'])
+ for m in metadata:
+ if m.fields['type'] != '-': continue
+ print "%s [%d bytes]" % (m.fields['name'], int(m.fields['size']))
+ verifier = lbs.ChecksumVerifier(m.fields['checksum'])
+ size = 0
+ for block in m.data():
+ data = store.get(block)
+ verifier.update(data)
+ size += len(data)
+ if int(m.fields['size']) != size:
+ raise ValueError("File size does not match!")
+ if not verifier.valid():
+ raise ValueError("Bad checksum found")
+ store.cleanup()
+
+if len(args) == 0:
+ parser.print_usage()
+ sys.exit(1)
+cmd = args[0]
+args = args[1:]
+if cmd == 'clean':
+ cmd_clean()
+elif cmd == 'prune-db':
+ cmd_prune_db()
+elif cmd == 'list-snapshots':
+ cmd_list_snapshots()
+elif cmd == 'object-sums':
+ cmd_object_checksums(args)
+elif cmd == 'read-snapshots':
+ cmd_read_snapshots(args)
+elif cmd == 'list-snapshot-sizes':
+ cmd_list_snapshot_sizes()
+elif cmd == 'verify-snapshots':
+ cmd_verify_snapshots(args)
+else:
+ print "Unknown command:", cmd
+ parser.print_usage()
+ sys.exit(1)
projects / cumulus.git / blobdiff