X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=blobdiff_plain;f=tests%2Flib-gdr;h=9d9fcb461a09025a173f8dc8d23af0b5ee2a8fc5;hb=a79b9f2941ebacde9cdc067d042cfea1a68a6844;hp=849e3f642d5e6ae3385efab70c71421122f513c6;hpb=91c2126e5ab7bea38708933c9281c12c814bb200;p=dgit.git

diff --git a/tests/lib-gdr b/tests/lib-gdr
index 849e3f64..9d9fcb46 100644
--- a/tests/lib-gdr
+++ b/tests/lib-gdr
@@ -23,8 +23,6 @@ t-gdr-good () {
 
 	git diff --quiet ${beforetag-t.before} -- ':.' ':!debian/patches'
 
-	local etypes bwtip
-
 	LC_MESSAGES=C t-git-debrebase status >../status.check
 	case $state in
 	laundered)
@@ -37,6 +35,15 @@ t-gdr-good () {
 		;;
 	esac
 
+	t-gdr-good-analyse HEAD $state
+}
+
+t-gdr-good-analyse () {
+	local head=$1
+	local state=$2
+	local wsfx=$3
+	local etypes bwtip
+
 	# etypes is either a type,
 	# or   PseudoMerge-<more etypes>
 	# or   AddPatches-<more etypes>
@@ -49,11 +56,13 @@ t-gdr-good () {
 	stitched)	etypes=Pseudomerge-Upstream ;;
 	pushed)		etypes=AddPatches-Pseudomerge-Upstream ;;
 	pushed-interop)	etypes=Pseudomerge-AddPatchesInterop-Upstream ;;
+	breakwater)	etypes=Packaging ;;
 	esac
 
-	t-git-debrebase analyse >../anal.check
-	expect=`git rev-parse HEAD`
-	exec <../anal.check
+	anal=../anal$wsfx
+	t-git-debrebase analyse $head >$anal.check
+	expect=`git rev-parse $head`
+	exec <$anal.check
 	local cid ctype info nparents
 	while read cid ctype info; do
 		: ===== $cid $ctype $info =====
@@ -69,6 +78,8 @@ t-gdr-good () {
 		Pseudomerge/SAME)			;;
 		Packaging/SAME)				;;
 		Packaging/Upstream)			;;
+		MergedBreakwaters/Packaging)		;;
+		MergedBreakwaters/Upstream)		;;
 		AddPatches/SAME)			;;
 		AddPatches/AddPatchesInterop)		;;
 		Changelog/Packaging)			;;
@@ -108,9 +119,9 @@ t-gdr-good () {
 			: 'reject pointless pseudomerges'
 			local overwritten=${parents/$expect/}
 			overwritten=${overwritten// /}
-			t-git-debrebase analyse $overwritten >../anal.overwr
+			t-git-debrebase analyse $overwritten >$anal.overwr
 			local ocid otype oinfo
-			read <../anal.overwr ocid otype oinfo
+			read <$anal.overwr ocid otype oinfo
 			case "$otype" in
 			Pseudomerge) test "x$info" != "x$oinfo" ;;
 			esac
@@ -133,6 +144,9 @@ t-gdr-good () {
 		Upstream/SAME)
 			git diff --quiet $expect..$cid -- ':debian'
 			;;
+		MergedBreakwaters)
+			enparents=2
+			;;
 		Anchor)
 			break
 			;;
@@ -151,6 +165,19 @@ t-gdr-good () {
 		*)		fail 'unexpected parent' ;;
 		esac
 
+		case "$ctype" in
+		MergedBreakwaters)
+			local f
+			local parent_ix=0
+			for f in $parents; do
+				t-gdr-good-analyse $f breakwater \
+					$wsfx-mp$parent_ix
+				parent_ix=$(( $parent_ix + 1 ))
+			done
+			return
+			;;
+		esac		
+
 	done
 }