Re: delete deprecated refs to release disk space
- From
Peter Vereshagin <peter@vereshagin.org>
- Date
- Nov 16, 2011, 23:44 UTC
- Message-ID
- <20111116234422.GA5131@external.screwed.box>
- In-Reply-To
- <20111114142525.GB8641@external.screwed.box>
Hello.
2011/11/14 18:25:25 +0400 Peter Vereshagin <peter@vereshagin.org> => To ??var Arnfj??r?? Bjarmason : PV> N commits ago is a fine setting for me as it's a cron job backup. Thanks?
* = Thanks!
Here is the PoC QnD code that releases disk space for me by far:
git rev-list --all --timestamp |\
perl -Mstrict -MTime::ParseDate -wE \
'my $match = 0; my $expire = parsedate( "3 days ago" ); while (<>)
{ chomp; my ( $tstamp => $graft_id ) = split /\s+/;
if ( not( $match ) and $tstamp < $expire )
{ say $graft_id; $match = 1; } }
' > .git/info/grafts && \
git filter-branch -ffor case a one shall seek for it.
-- Peter Vereshagin <peter@vereshagin.org> (http://vereshagin.org) pgp: A0E26627