blob: 4cb5d4e619ee75d81eb1351883d2f21ad9a010c5 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
|
#!/bin/sh
set -ex
retry_until_ok () {
sleeptime=0
while ! "$@"; do
case $sleeptime in
??.*)
echo >&2 "$0: GPG AGENT STARTP $@ TIMED OUT"
exit 127
;;
esac
sleep $sleeptime
sleeptime=$(echo "($sleeptime + 0.001) * 2" | bc -l)
done
}
echo >&2 'GPG-WITHAGENT...'
agent_is_running () {
gpg-connect-agent --no-autostart </dev/null \
'/echo dgit-gpg-agent-ok' /bye 2>&1 \
| grep dgit-gpg-agent-ok >&2
}
$DGIT_STUNT_AGENT --daemon </dev/null >&2
retry_until_ok agent_is_running
echo >&2 'GPG-WITHAGENT... RUNNING'
set +e
$DGIT_TEST_REAL_GPG \
--agent-program=$DGIT_STUNT_AGENT "$@"
rc=$?
set -e
echo >&2 'GPG-WITHAGENT... STOPPING'
kill_agent_not_running () {
LC_MESSAGES=C gpg-connect-agent --no-autostart </dev/null \
KILLAGENT /bye 2>&1 \
| tee -a /dev/stderr \
| grep 'no gpg-agent running' >&2
}
retry_until_ok kill_agent_not_running
echo >&2 'GPG-WITHAGENT... DONE'
exit $rc
|
