From b41c0ab7f4a34da89964ce85ffeccae6dce52191 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 19 Jul 2015 18:52:30 +0100
Subject: [PATCH] Test suite: mirror: Synchronise properly with drs background
 mirror

---
 tests/tests/mirror | 16 +++++++++++-----
 1 file changed, 11 insertions(+), 5 deletions(-)

diff --git a/tests/tests/mirror b/tests/tests/mirror
index 6f6300e2..0889b181 100755
--- a/tests/tests/mirror
+++ b/tests/tests/mirror
@@ -30,8 +30,6 @@ set -ex
 cat >&2 $sentinel
 shift # eat HOST
 sh -c "\$*"
-: ${sentinel}2
-date >${sentinel}2
 END
 chmod +x $tmp/stunt-ssh
 
@@ -53,8 +51,8 @@ t-check-mirrored
 
 : ----- "stall timeout test" -----
 
-rm -f $sentinel ${sentinel}2
-mkfifo $sentinel ${sentinel}2
+rm -f $sentinel
+mkfifo $sentinel
 
 t-mirror-set hooktimeout=5
 
@@ -65,7 +63,15 @@ t-check-not-mirrored
 
 exec 3<>$sentinel
 exec 3>&-
-cat ${sentinel}2
+
+attempts=100
+while [ -f $queuedir/$p.lock ]; do
+	if [ $attempts = 0 ]; then \
+		fail "timed out waiting for lock to go away"
+	fi
+	attempts=$(( $attempts - 1 ))
+	sleep 0.1
+done
 
 t-check-mirrored
 
-- 
2.30.2