X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=dgit.git;a=blobdiff_plain;f=tests%2Flib;h=6028133a21b38bd6518e0bc7bad1471581ca25be;hp=1ddfcea0fed19b3cdfc88fc63a057a3c1ae1d951;hb=e7f59af8133f6e80a4a18b171664af8517555360;hpb=0992cbebeb1bcf1dbda34a03917e25ba75fad046

diff --git a/tests/lib b/tests/lib
index 1ddfcea0..6028133a 100644
--- a/tests/lib
+++ b/tests/lib
@@ -40,6 +40,7 @@ root=`pwd`
 troot=$root/tests
 testname="${DGIT_TEST_TESTNAME-${0##*/}}"
 export DGIT_TEST_TROOT=$troot
+bpd=..
 
 tmp=$ADTTMP
 if [ x"$tmp" = x ]; then
@@ -64,6 +65,7 @@ env -0 >$tmp/.save-env
 ln -f $troot/ssh ssh
 
 export DEBCHANGE_VENDOR=dpkg
+unset VISUAL
 
 mkdir -p $tmp/incoming
 cat <<END >$tmp/dput.cf
@@ -73,6 +75,9 @@ incoming		= $tmp/incoming
 run_dinstall		= 0
 END
 
+schroot=${DGIT_SCHROOT_CHROOT:-build}
+# Pretty much any Debian sid snapshot schroot will do.
+
 : ${t_archive_method:=aq}
 : ${tagpfx:=archive/test-dummy}
 : ${suitespecs:=sid:unstable}
@@ -419,21 +424,8 @@ t-save-artifacts () {
 	artifacts="$AUTOPKGTEST_ARTIFACTS"
 	if [ x"$artifacts" = x ]; then return; fi
 	if [ x"tmp" = x ]; then return; fi
-	: '(((((((((( t-save-artifacts ))))))))))'
-	cp -dR --preserve=links,timestamps "$tmp"/. "$artifacts"/.
-	cd "$artifacts"/.
-	find . \( -name \*.tar -o -name \*.sample \) -print0 | \
-		xargs -0r rm -v
-	find . \( -name .git \
-		-o -path ./salsa/\* \
-		-o -path ./git/\*.git \
-		\) -type d \
-		\! -path '*/.git/*/.git' -exec sh -xec '
-			cd "$1"
-			"$2"/playtree-save-refs
-			git gc --prune=all
-		' x '{}' "$troot" \;
-	: ')))))))))) t-save-artifacts ))))))))))'
+	GZIP=-1v tar -C "$tmp" -zc -f "$artifacts/${0##*/}.tar.gz" \
+		--exclude=\*.tar .
 }
 
 t-rm-dput-dropping () {
@@ -683,6 +675,12 @@ t-push-was-source-only () {
         done
 }
 
+t-push-included () {
+    for f in $@; do
+        stat $tmp/incoming/$f
+    done
+}
+
 t-pushed-good () {
 	local branch=$1
 	local suite=${2:-sid}
@@ -710,6 +708,12 @@ t-pushed-good-core () {
 	git verify-tag `t-v-tag`
 }
 
+t-pushed-good-check-changes () {
+	changes_filename="$tmp/incoming/${p}_${v}_*.changes"
+        grep -E "^Distribution: $suite" $changes_filename
+        grep -E "^Version: $v" $changes_filename
+}
+
 t-splitbrain-pushed-good--unpack () {
 	cd $tmp
 	rm -rf t-unpack
@@ -1142,6 +1146,16 @@ t-policy-periodic () {
 	: '))))))))))))))))))))))))))))))))))))))))'
 }
 
+t-buildproductsdir-config () {
+	bpd=$tmp/bpd
+	t-git-config dgit.default.build-products-dir $bpd
+	mkdir -p $bpd
+	cat <<END >>$tmp/.gbp.conf
+[buildpackage]
+export-dir = $bpd
+END
+}
+
 t-restrict () {
 	local restriction=$1
 	(cd $root; t-restriction-$restriction >&2)