# rhona, cleans up unassociated binary and source packages
# Copyright (C) 2000, 2001 James Troup <james@nocrew.org>
-# $Id: rhona,v 1.13 2001-03-20 00:28:11 troup Exp $
+# $Id: rhona,v 1.19 2001-11-24 18:42:10 troup Exp $
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
-###################################################################################################
+################################################################################
# 07:05|<elmo> well.. *shrug*.. no, probably not.. but to fix it,
# | we're going to have to implement reference counting
#
# 07:05|<Culus> elmo: Augh! <brain jumps out of skull>
-###################################################################################################
+################################################################################
import os, pg, stat, string, sys, time
import apt_pkg
import utils
-###################################################################################################
+################################################################################
-projectB = None
-Cnf = None
-delete_date = None;
-overrides = {};
+projectB = None;
+Cnf = None;
+Options = None;
+now_date = None; # mark newly "deleted" things as deleted "now"
+delete_date = None; # delete things marked "deleted" earler than this
-###################################################################################################
+################################################################################
-def usage (exit_code):
- print """Usage: rhona [OPTION]... [CHANGES]...
- -D, --debug=VALUE debug
- -n, --no-action don't do anything
- -v, --verbose be verbose
- -V, --version display version number and exit"""
- sys.exit(exit_code)
+def usage (exit_code=0):
+ print """Usage: rhona [OPTIONS]
+Clean old packages from suites.
-###################################################################################################
+ -n, --no-action don't do anything
+ -h, --help show this help and exit"""
+ sys.exit(exit_code)
-# FIXME: why can't we make (sane speed) UPDATEs out of these SELECTs?
+################################################################################
def check_binaries():
- global delete_date;
-
+ global delete_date, now_date;
+
print "Checking for orphaned binary packages..."
# Get the list of binary packages not in a suite and mark them for
projectB.query("BEGIN WORK");
for i in ql:
file_id = i[0];
- projectB.query("UPDATE files SET last_used = '%s' WHERE id = %s" % (delete_date, file_id))
+ projectB.query("UPDATE files SET last_used = '%s' WHERE id = %s AND last_used IS NULL" % (now_date, file_id))
projectB.query("COMMIT WORK");
# Check for any binaries which are marked for eventual deletion
projectB.query("COMMIT WORK");
def check_sources():
- global delete_date;
+ global delete_date, now_date;
print "Checking for orphaned source packages..."
- # Get the list of source packages not in a suite and not linked to
- # by any binary packages.
+ # Get the list of source packages not in a suite.
q = projectB.query("""
SELECT s.id, s.file FROM source s
WHERE NOT EXISTS
(SELECT sa.suite FROM src_associations sa WHERE sa.source = s.id)
AND NOT EXISTS (SELECT b.id FROM binaries b WHERE b.source = s.id)""");
+
+ #### XXX: this should ignore cases where the files for the binary b
+ #### have been marked for deletion (so the delay between bins go
+ #### byebye and sources go byebye is 0 instead of StayOfExecution)
+
ql = q.getresult();
-
+
projectB.query("BEGIN WORK");
for i in ql:
source_id = i[0];
dsc_file_id = i[1];
# Mark the .dsc file for deletion
- projectB.query("UPDATE files SET last_used = '%s' WHERE id = %s" % (delete_date, dsc_file_id))
+ projectB.query("UPDATE files SET last_used = '%s' WHERE id = %s AND last_used IS NULL" % (now_date, dsc_file_id))
# Mark all other files references by .dsc too if they're not used by anyone else
x = projectB.query("SELECT f.id FROM files f, dsc_files d WHERE d.source = %s AND d.file = f.id" % (source_id));
for j in x.getresult():
file_id = j[0];
y = projectB.query("SELECT id FROM dsc_files d WHERE d.file = %s" % (file_id));
if len(y.getresult()) == 1:
- projectB.query("UPDATE files SET last_used = '%s' WHERE id = %s" % (delete_date, file_id));
+ projectB.query("UPDATE files SET last_used = '%s' WHERE id = %s AND last_used IS NULL" % (now_date, file_id));
projectB.query("COMMIT WORK");
# Check for any sources which are marked for deletion but which
WHERE f.last_used IS NOT NULL AND s.id = df.source AND df.file = f.id
AND ((EXISTS (SELECT sa.suite FROM src_associations sa WHERE sa.source = s.id))
OR (EXISTS (SELECT b.id FROM binaries b WHERE b.source = s.id)))""");
+
+ #### XXX: this should also handle deleted binaries specially (ie, not
+ #### reinstate sources because of them
+
ql = q.getresult();
# Could be done in SQL; but left this way for hysterical raisins
# [and freedom to innovate don'cha know?]
projectB.query("COMMIT WORK");
def check_files():
- global delete_date;
+ global delete_date, now_date;
# FIXME: this is evil; nothing should ever be in this state. if
# they are, it's a bug and the files should not be auto-deleted.
projectB.query("BEGIN WORK");
for i in q.getresult():
file_id = i[0];
- projectB.query("UPDATE files SET last_used = '%s' WHERE id = %s" % (delete_date, file_id));
+ projectB.query("UPDATE files SET last_used = '%s' WHERE id = %s" % (now_date, file_id));
projectB.query("COMMIT WORK");
-
+
def clean_binaries():
- global delete_date;
+ global delete_date, now_date;
# We do this here so that the binaries we remove will have their
# source also removed (if possible).
+ # XXX: why doesn't this remove the files here as well? I don't think it
+ # buys anything keeping this separate
print "Cleaning binaries from the DB..."
- if not Cnf["Rhona::Options::No-Action"]:
+ if not Options["No-Action"]:
before = time.time();
sys.stdout.write("[Deleting from binaries table... ");
projectB.query("DELETE FROM binaries WHERE EXISTS (SELECT id FROM files WHERE binaries.file = files.id AND files.last_used <= '%s')" % (delete_date));
sys.stdout.write("done. (%d seconds)]\n" % (int(time.time()-before)));
def clean():
- global delete_date;
+ global delete_date, now_date;
count = 0;
size = 0;
print "Cleaning out packages..."
- # Ensure destination directory exists
- dest = Cnf["Dir::Morgue"] + '/' + Cnf["Rhona::MorgueSubDir"];
+ date = time.strftime("%Y-%m-%d", time.localtime(time.time()));
+ dest = Cnf["Dir::Morgue"] + '/' + Cnf["Rhona::MorgueSubDir"] + '/' + date;
if not os.path.exists(dest):
os.mkdir(dest);
-
+
# Delete from source
- if not Cnf["Rhona::Options::No-Action"]:
+ if not Options["No-Action"]:
before = time.time();
sys.stdout.write("[Deleting from source table... ");
projectB.query("DELETE FROM dsc_files WHERE EXISTS (SELECT df.id FROM source s, files f, dsc_files df WHERE f.last_used <= '%s' AND s.file = f.id AND s.id = df.source AND df.id = dsc_files.id)" % (delete_date));
projectB.query("DELETE FROM source WHERE EXISTS (SELECT id FROM files WHERE source.file = files.id AND files.last_used <= '%s')" % (delete_date));
sys.stdout.write("done. (%d seconds)]\n" % (int(time.time()-before)));
-
+
# Delete files from the pool
q = projectB.query("SELECT l.path, f.filename FROM location l, files f WHERE f.last_used <= '%s' AND l.id = f.location" % (delete_date));
for i in q.getresult():
filename = i[0] + i[1];
if not os.path.exists(filename):
- sys.stderr.write("E: can not find %s.\n" % (filename));
+ utils.warn("can not find '%s'." % (filename));
continue;
if os.path.isfile(filename):
if os.path.islink(filename):
count = count + 1;
- if Cnf["Rhona::Options::No-Action"]:
+ if Options["No-Action"]:
print "Removing symlink %s..." % (filename);
else:
os.unlink(filename);
else:
size = size + os.stat(filename)[stat.ST_SIZE];
count = count + 1;
- if Cnf["Rhona::Options::No-Action"]:
- print "Cleaning %s to %s..." % (filename, dest);
+
+ dest_filename = dest + '/' + os.path.basename(filename);
+ # If the destination file exists; try to find another filename to use
+ if os.path.exists(dest_filename):
+ dest_filename = utils.find_next_free(dest_filename);
+
+ if Options["No-Action"]:
+ print "Cleaning %s -> %s ..." % (filename, dest_filename);
else:
- utils.move(filename, dest);
+ utils.move(filename, dest_filename);
else:
- sys.stderr.write("%s is neither symlink nor file?!\n" % (filename));
- sys.exit(1);
- # delete from files
- if not Cnf["Rhona::Options::No-Action"]:
+ utils.fubar("%s is neither symlink nor file?!" % (filename));
+
+ # Delete from the 'files' table
+ if not Options["No-Action"]:
before = time.time();
sys.stdout.write("[Deleting from files table... ");
projectB.query("DELETE FROM files WHERE last_used <= '%s'" % (delete_date));
def clean_maintainers():
print "Cleaning out unused Maintainer entries..."
-
+
q = projectB.query("""
SELECT m.id FROM maintainer m
WHERE NOT EXISTS (SELECT id FROM binaries b WHERE b.maintainer = m.id)
projectB.query("BEGIN WORK");
for i in ql:
maintainer_id = i[0];
- if not Cnf["Rhona::Options::No-Action"]:
+ if not Options["No-Action"]:
projectB.query("DELETE FROM maintainer WHERE id = %s" % (maintainer_id));
count = count + 1;
projectB.query("COMMIT WORK");
if count > 0:
sys.stderr.write("Cleared out %d maintainer entries.\n" % (count));
+################################################################################
+
def main():
- global Cnf, projectB, delete_date;
-
- apt_pkg.init();
-
- Cnf = apt_pkg.newConfiguration();
- apt_pkg.ReadConfigFileISC(Cnf,utils.which_conf_file());
+ global Cnf, Options, projectB, delete_date, now_date;
+
+ Cnf = utils.get_conf()
+ for i in ["Help", "No-Action" ]:
+ if not Cnf.has_key("Rhona::Options::%s" % (i)):
+ Cnf["Rhona::Options::%s" % (i)] = "";
projectB = pg.connect(Cnf["DB::Name"], Cnf["DB::Host"], int(Cnf["DB::Port"]));
- Arguments = [('D',"debug","Rhona::Options::Debug", "IntVal"),
- ('h',"help","Rhona::Options::Help"),
- ('n',"no-action","Rhona::Options::No-Action"),
- ('V',"version","Rhona::Options::Version")];
-
+ Arguments = [('h',"help","Rhona::Options::Help"),
+ ('n',"no-action","Rhona::Options::No-Action")];
+
apt_pkg.ParseCommandLine(Cnf,Arguments,sys.argv);
Options = Cnf.SubTree("Rhona::Options")
if Options["Help"]:
- usage(0);
-
- if Options["Version"]:
- print "rhona version 0.0000000000";
- usage(0);
-
- override_filename = Cnf["Dir::OverrideDir"] + Cnf["Rhona::OverrideFilename"];
- if not os.access(override_filename, os.R_OK):
- sys.stderr.write("W: Could not find source-only override file '%s'.\n" % (override_filename));
+ usage();
+ now_date = time.strftime("%Y-%m-%d %H:%M", time.localtime(time.time()));
delete_date = time.strftime("%Y-%m-%d %H:%M", time.localtime(time.time()-int(Cnf["Rhona::StayOfExecution"])));
-
+
check_binaries();
clean_binaries();
check_sources();
clean();
clean_maintainers();
+################################################################################
+
if __name__ == '__main__':
main()