X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=blobdiff_plain;f=tests%2Flib;h=1179fb093f8ed48535c60a5eaaf52fc7ae9de481;hb=196d61f51d2191bf44d5bfe0ccb4456a59f0446a;hp=fbe04b7d8d91a9c63728411a4f1431dfccf70261;hpb=076a8ac565082e73b3bae409df4492701654d74a;p=dgit.git

diff --git a/tests/lib b/tests/lib
index fbe04b7d..1179fb09 100644
--- a/tests/lib
+++ b/tests/lib
@@ -47,6 +47,24 @@ END
 t-expect-fail () {
 	local mpat="$1"; shift
 
+	set +o pipefail
+	LC_MESSAGES=C "$@" 2>&1 | tee $tmp/t.output
+	local ps="${PIPESTATUS[*]}"
+	set -o pipefail
+
+	case $ps in
+	"0 0")	fail "command unexpectedly succeeded (instead of: $mpat)" ;;
+	*" 0")	;;
+	*)	fail "tee failed"  ;;
+	esac
+
+	t-grep-mpat "$mpat" $tmp/t.output
+}
+
+t-grep-mpat () {
+	local mpat="$1"
+	local file="$2"
+
 	local grepper=fgrep
 	case "$mpat" in
 	[A-Z]:*)
@@ -59,19 +77,8 @@ t-expect-fail () {
 		;;
 	esac
 
-	set +o pipefail
-	LC_MESSAGES=C "$@" 2>&1 | tee $tmp/t.output
-	local ps="${PIPESTATUS[*]}"
-	set -o pipefail
-
-	case $ps in
-	"0 0")	fail "command unexpectedly succeeded (instead of: $mpat)" ;;
-	*" 0")	;;
-	*)	fail "tee failed"  ;;
-	esac
-
-	$grepper -e "$mpat" $tmp/t.output ||
-		fail "error message not found"
+	$grepper -e "$mpat" "$file" ||
+		fail "message not found"
 }
 
 t-expect-push-fail () {
@@ -92,7 +99,7 @@ t-expect-push-fail () {
 t-git-objects-not-present () {
 	# t-git-objects-not-present GITDIR|'' OBJID [...]
 	# specifying '' means the repo for package $p
-	local gitdir="${1-$tmp/git/$p.git}"
+	local gitdir="${1-$dgitrepo}"
 	local obj
 	if ! [ -e "$gitdir" ]; then return; fi
 	for obj in "$@"; do
@@ -104,11 +111,12 @@ t-git-objects-not-present () {
 
 t-reporefs () {
 	local whichoutput=$1; shift
+	local whichrepo=${1-$dgitrepo}
 	local outputfile="$tmp/show-refs.$whichoutput"
 	(set -e
 	 exec >"$outputfile"
-	 if test -d $tmp/git/$p.git; then
-		cd $tmp/git/$p.git
+	 if test -d $whichrepo; then
+		cd $whichrepo
 		git show-ref |sort
 	fi)
 }
@@ -128,8 +136,13 @@ t-worktree () {
 	t-untar $troot/worktrees/${p}_$1
 }
 
-t-git () {
+t-select-package () {
 	p=$1
+	dgitrepo=$tmp/git/$p.git
+}
+
+t-git () {
+	t-select-package $1
 	v=$2
 	mkdir -p $tmp/git
 	local gs=$troot/git-srcs/${p}_$v.git
@@ -155,7 +168,7 @@ t-has-ancestor () {
 }
 
 t-prep-newpackage () {
-	p=$1
+	t-select-package $1
 	v=$2
 	t-archive-none $p
 	t-git-none
@@ -169,7 +182,7 @@ t-prep-newpackage () {
 }
 
 t-archive-none () {
-	p=$1
+	t-select-package $1
 	mkdir -p $tmp/aq $tmp/mirror/pool/main
 
 	local suite=sid
@@ -247,11 +260,11 @@ t-archive () {
 }
 
 t-git-dir-time-passes () {
-	touch -d 'last year' $tmp/git/$p.git
+	touch -d 'last year' $dgitrepo
 }
 
 t-git-dir-check () {
-	local gitdir=$tmp/git/$p.git
+	local gitdir=$dgitrepo
 	case "$1" in
 	enoent)
 		if test -e "$gitdir"; then fail "$gitdir exists"; fi
@@ -288,6 +301,15 @@ t-diff-nogit () {
 	diff --exclude=.git --exclude=.pc -ruN $*
 }
 
+t-files-notexist () {
+	local f
+	for f in "$@"; do
+		if [ -e $f ]; then
+			fail "$f exists!"
+		fi
+	done
+}
+
 t-cloned-fetched-good () {
 	t-diff-nogit ../extract/$p-${v%-*} .
 	t-clean-on-branch dgit/sid
@@ -403,7 +425,7 @@ t-pushed-good () {
 	t-refs-notexist \
 		refs/heads/dgit/unstable \
 		refs/remotes/dgit/dgit/unstable
-	(set -e; cd $tmp/git/$p.git
+	(set -e; cd $dgitrepo
 	 t-refs-same \
 		refs/dgit/sid \
 		`t-v-tag`
@@ -414,6 +436,16 @@ t-pushed-good () {
 	git verify-tag `t-v-tag`
 }
 
+t-commit-build-push-expect-log () {
+	local msg=$1
+	local mpat=$2
+	t-commit "$msg"
+	t-dgit build
+	LC_MESSAGES=C \
+	t-dgit push --new 2>&1 |tee $tmp/push.log
+	t-grep-mpat "$mpat" $tmp/push.log
+}
+
 t-822-field () {
 	local file=$1
 	local field=$2