X-Git-Url: https://git.decadent.org.uk/gitweb/?a=blobdiff_plain;f=rhona;h=c7ee05bc92909685ee9b15125bb4314d293549e2;hb=2640ce213afbd93f01d6cab41d903db852b7f5bf;hp=c05db3129836a4bdc39320bcf59e4d85ea83caf0;hpb=6ada259d555e36a1546789c280edc3f944b7de7f;p=dak.git diff --git a/rhona b/rhona index c05db312..c7ee05bc 100755 --- a/rhona +++ b/rhona @@ -2,7 +2,7 @@ # rhona, cleans up unassociated binary and source packages # Copyright (C) 2000, 2001 James Troup -# $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 @@ -40,8 +40,6 @@ Cnf = None 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): @@ -53,20 +51,7 @@ 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; @@ -233,7 +218,7 @@ def clean(): 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);