]> git.decadent.org.uk Git - dak.git/blob - contrib/fix.8
New version; handles multi-component version cleaning.
[dak.git] / contrib / fix.8
1 #!/bin/sh
2
3 total=0
4
5 for i in $(cat foo.2); do
6   if [ -f $i -a ! -L $i ]; then
7     dir=$(dirname $i)
8     file=$(basename $i)
9     size=$(du -b $i | cut -f 1)
10     arch=$(echo $i | sed -e "s#.*binary-\([a-z]*\).*#\1#")
11     pushd $dir > /dev/null
12     destdir=/home/troup/removed-from-ftp/badmd5-$arch/
13     if [ ! -d $destdir ]; then mkdir $destdir; fi
14     mv -iv $file $destdir/
15     ln -s ../../../../potato/$(echo $i | sed -e "s#.*woody/##") .
16     popd > /dev/null
17     total=$(expr $total + $size)
18   fi
19 done
20
21 echo
22 echo "Replaced $total bytes."
23