#!/bin/bash
set -o pipefail

cleanup() {
	rm -Rf /var/tmp/perl-dev
	make distclean >/dev/null 2>&1
	git clean -f -d
	git reset --hard

	exit $1
}

current=`git rev-parse HEAD`
thetag=`git describe --long`
log="../perl-log/$thetag"

mkdir /var/tmp/perl-dev

if ! git cherry-pick -n e0ef413b27cae926f967c54bbb9e7d40cc2adb2f |& tee "$log-cherry"; then
	echo WARNING: Giving up on multiarch patch, assuming already present
	git reset --hard
fi

if ! ./Configure -Dprefix=/var/tmp/perl-dev -Dusedevel -d -e |& tee "$log-config" ; then
	cleanup 125
fi

if ! make -j6 |& tee "$log-make"; then
	cleanup 125;
fi

if ! make install |& tee "$log-install"; then
	cleanup 125;
fi

/var/tmp/perl-dev/bin/perl5* -T /home/anthony/src/die-test.pl |& tee "$log-run"
case $? in
	10)
		cleanup 1
		;;
	11)
		cleanup 0
		;;
	*)
		cleanup 125
esac