Chris@700: #!/bin/bash
Chris@700: 
Chris@700: dir=$1
Chris@700: 
Chris@700: [ -d "$dir" ] || exit 1
Chris@700: 
Chris@700: set -eu
Chris@700: 
Chris@700: strip "$dir"/usr/bin/*
Chris@700: 
Chris@700: sz=`du -sx --exclude DEBIAN "$dir" | awk '{ print $1; }'`
Chris@700: perl -i -p -e "s/Installed-Size: .*/Installed-Size: $sz/" "$dir"/DEBIAN/control
Chris@700: 
Chris@700: find "$dir" -name \*~ -exec rm \{\} \;
Chris@700: 
Chris@700: chown -R root.root "$dir"/*
Chris@700: 
Chris@700: chmod -R g-w "$dir"/*