# rhona, cleans up unassociated binary and source packages
# Copyright (C) 2000, 2001 James Troup <james@nocrew.org>
-# $Id: rhona,v 1.15 2001-06-22 22:53:14 troup Exp $
+# $Id: rhona,v 1.16 2001-06-22 23:30:21 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
now_date = None; # mark newly "deleted" things as deleted "now"
delete_date = None; # delete things marked "deleted" earler than this
-tried_too_hard_exc = "Tried too hard to find a free filename for %s; something's gone Pete Tong";
-
###################################################################################################
def usage (exit_code):
sys.exit(exit_code)
###################################################################################################
-
-def find_next_free (dest):
- extra = 0;
- orig_dest = dest;
- too_much = 100;
- while os.path.exists(dest) and extra < too_much:
- dest = orig_dest + '.' + repr(extra);
- extra = extra + 1;
- if extra >= too_much:
- raise tried_too_hard_exc;
- return dest;
-# FIXME: why can't we make (sane speed) UPDATEs out of these SELECTs?
-
def check_binaries():
global delete_date, now_date;
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 = find_next_free(dest_filename);
+ dest_filename = utils.find_next_free(dest_filename);
if Cnf["Rhona::Options::No-Action"]:
print "Cleaning %s -> %s ..." % (filename, dest_filename);