Date: Thu, 29 Apr 1999 16:46:50 +0300 From: Maxim Sobolev <sobomax@altavista.net> To: Neil Blakey-Milner <nbm@mithrandr.moria.org> Cc: ports@FreeBSD.ORG Subject: Re: Usefull script to clean /usr/ports/distfiles. Testers neded Message-ID: <372862CA.B089EED3@altavista.net> References: <37241D4B.C9DC6FD2@altavista.net> <19990426105508.A30028@rucus.ru.ac.za> <37242D15.77938D17@altavista.net> <19990429120329.A82884@rucus.ru.ac.za>
next in thread | previous in thread | raw e-mail | index | archive | help
Neil Blakey-Milner wrote: > On Mon 1999-04-26 (12:08), Maxim Sobolev wrote: > > It would be great, because I'm not very proof in perl programming ;(.š Maybe > > after some fining we should make some sort of port like mergemaster! > > http://rucus.ru.ac.za/~nbm/distclean.pl > > It has three major options: > š -n doesn't do any md5 checks, which take ages. > ššššššš -o only looks for md5 differences. > ššššššš -d doesn't actually delete anything. > > It takes two optional arguments - the first the ports directory, which > defaults to /usr/ports, and the second the distfiles directory, which > defaults to $portsdir/distfiles. > > It does only one traversal if $portsdir/distfiles is actually physically > under $portsdir (ie, not a symlink).š It also takes care of symlinks for > /usr/ports and /usr/ports/distfiles, which was a problem I discovered > with your version (I think). > > It doesn't use any temporary files, or call any other programs except > "md5".š It uses the Cwd module, which comes with the standard perl > install, and find.pl, which does too. Thank you for a good work, however needs provision for "multi-md5" distfiles: su-2.03# ./distclean.pl -d Distfiles clean utility, inspired by Maxim Sobolev <sobomax@altavista.net> Deleting /usr/ports/distfiles/uudeview-0.5.13.tar.gz ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^-this distfile is Ok, why it should be deleted? Deleting /usr/ports/distfiles/speak_freely-6.1e.tar.gz Deleting /usr/ports/distfiles/navigator-v45-export.x86-unknown-linux2.0.tar.gz Deleting /usr/ports/distfiles/mico-2.2.4.tar.gz su-2.03# md5 /usr/ports/distfiles/uudeview-0.5.13.tar.gz MD5 (/usr/ports/distfiles/uudeview-0.5.13.tar.gz) = fda32e2de4a6b92eb56f1e286ae3815a su-2.03# cat /usr/ports/converters/uudeview/files/md5 MD5 (uudeview-0.5.13.tar.gz) = fda32e2de4a6b92eb56f1e286ae3815a MD5 (uudeview-0.5.13.tar.gz) = dddf4c01973307c7d203f55c5e0c7fc3 š To Unsubscribe: send mail to majordomo@FreeBSD.org with "unsubscribe freebsd-ports" in the body of the message
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?372862CA.B089EED3>