contrib/fix.7

   1 #!/bin/sh
   2
   3 # "I tried to understand you.. I tried to love you right"
   4
   5 dists=/org/ftp.debian.org/ftp/dists/
   6 dir=$dists/woody/
   7
   8 for i in main contrib non-free; do # main contrib non-free
   9   for j in arm; do # hurd-i386 hppa mips mipsel sh
  10     echo "Processing $j ($i)..."
  11     for k in $(find $dir/$i/binary-$j/ -type l); do
  12       dest=$(readlink $k)
  13       echo $dest | grep -q /binary-all/
  14       if [ $? -eq 0 ]; then
  15         file=$(basename $k)
  16         woody=$(find $dists/woody/$i/binary-all/ -name $file)
  17         if [ -z "$woody" ]; then
  18           echo "Killing link to $file";
  19           rm $k
  20         fi
  21       fi
  22     done
  23   done
  24 done