mirror of
https://github.com/ElementsProject/lightning.git
synced 2024-11-20 10:39:49 +01:00
test.sh: move core routines to scripts/helpers.sh
Signed-off-by: Rusty Russell <rusty@rustcorp.com.au>
This commit is contained in:
Rusty Russell
parent
973ef3c932
commit
9e777ae922
435
daemon/test/scripts/helpers.sh
Normal file
435
daemon/test/scripts/helpers.sh
Normal file
@ -0,0 +1,435 @@
|
|||||||
|
#! /bin/sh
|
||||||
|
# Sourced by test script.
|
||||||
|
|
||||||
|
# Takes the number of lightningd's we're going to start (2 or 3), then args
|
||||||
|
parse_cmdline()
|
||||||
|
{
|
||||||
|
NUM_LIGHTNINGD=$1
|
||||||
|
shift
|
||||||
|
|
||||||
|
DIR1=/tmp/lightning.$$.1
|
||||||
|
DIR2=/tmp/lightning.$$.2
|
||||||
|
REDIR1="$DIR1/output"
|
||||||
|
REDIR2="$DIR2/output"
|
||||||
|
REDIRERR1="$DIR1/errors"
|
||||||
|
REDIRERR2="$DIR2/errors"
|
||||||
|
|
||||||
|
if [ $NUM_LIGHTNINGD = 3 ]; then
|
||||||
|
DIR3=/tmp/lightning.$$.3
|
||||||
|
REDIR3="$DIR3/output"
|
||||||
|
REDIRERR3="$DIR3/errors"
|
||||||
|
fi
|
||||||
|
|
||||||
|
while [ $# != 0 ]; do
|
||||||
|
case x"$1" in
|
||||||
|
x"--valgrind-vgdb")
|
||||||
|
[ -n "$NO_VALGRIND" ] || PREFIX="$PREFIX --vgdb-error=1"
|
||||||
|
REDIR1="/dev/tty"
|
||||||
|
REDIRERR1="/dev/tty"
|
||||||
|
REDIR2="/dev/tty"
|
||||||
|
REDIRERR2="/dev/tty"
|
||||||
|
if [ $NUM_LIGHTNINGD = 3 ]; then
|
||||||
|
REDIR3="/dev/tty"
|
||||||
|
REDIRERR3="/dev/tty"
|
||||||
|
fi
|
||||||
|
;;
|
||||||
|
x"--gdb1")
|
||||||
|
GDB1=1
|
||||||
|
;;
|
||||||
|
x"--gdb2")
|
||||||
|
GDB2=1
|
||||||
|
;;
|
||||||
|
x"--gdb3")
|
||||||
|
GDB3=1
|
||||||
|
if [ $NUM_LIGHTNINGD -lt 3 ]; then
|
||||||
|
echo "$1" invalid with only 2 lightning daemons >&2
|
||||||
|
exit 1
|
||||||
|
fi
|
||||||
|
;;
|
||||||
|
x"--reconnect")
|
||||||
|
RECONNECT=reconnect
|
||||||
|
;;
|
||||||
|
x"--restart")
|
||||||
|
RECONNECT=restart
|
||||||
|
;;
|
||||||
|
x"--crash")
|
||||||
|
CRASH_ON_FAIL=1
|
||||||
|
;;
|
||||||
|
x"--verbose")
|
||||||
|
VERBOSE=1
|
||||||
|
;;
|
||||||
|
*)
|
||||||
|
echo Unknown arg "$1" >&2
|
||||||
|
exit 1
|
||||||
|
esac
|
||||||
|
shift
|
||||||
|
done
|
||||||
|
|
||||||
|
if [ -n "$VERBOSE" ]; then
|
||||||
|
FGREP="fgrep"
|
||||||
|
else
|
||||||
|
FGREP="fgrep -q"
|
||||||
|
# Suppress command output.
|
||||||
|
exec >/dev/null
|
||||||
|
fi
|
||||||
|
}
|
||||||
|
|
||||||
|
failed()
|
||||||
|
{
|
||||||
|
if [ -n "$CRASH_ON_FAIL" ]; then
|
||||||
|
$LCLI1 dev-crash 2>/dev/null || true
|
||||||
|
$LCLI2 dev-crash 2>/dev/null || true
|
||||||
|
echo -n Crash results in $DIR1 and $DIR2 >&2
|
||||||
|
if [ -n "$LCLI3" ]; then
|
||||||
|
$LCLI3 dev-crash 2>/dev/null || true
|
||||||
|
echo and $DIR3 >&2
|
||||||
|
else
|
||||||
|
echo >&2
|
||||||
|
fi
|
||||||
|
fi
|
||||||
|
cat $DIR1/errors $DIR2/errors $DIR3/errors 2>/dev/null || true
|
||||||
|
exit 1
|
||||||
|
}
|
||||||
|
|
||||||
|
setup_lightning()
|
||||||
|
{
|
||||||
|
NUM_LIGHTNINGD=$1
|
||||||
|
|
||||||
|
LCLI1="../lightning-cli --lightning-dir=$DIR1"
|
||||||
|
LCLI2="../lightning-cli --lightning-dir=$DIR2"
|
||||||
|
[ $NUM_LIGHTNINGD = 2 ] || LCLI3="../lightning-cli --lightning-dir=$DIR3"
|
||||||
|
|
||||||
|
trap failed EXIT
|
||||||
|
mkdir $DIR1 $DIR2
|
||||||
|
[ $NUM_LIGHTNINGD = 2 ] || mkdir $DIR3
|
||||||
|
|
||||||
|
cat > $DIR1/config <<EOF
|
||||||
|
disable-irc
|
||||||
|
log-level=debug
|
||||||
|
bitcoind-regtest
|
||||||
|
bitcoind-poll=5s
|
||||||
|
deadline-blocks=5
|
||||||
|
min-htlc-expiry=6
|
||||||
|
bitcoin-datadir=$DATADIR
|
||||||
|
locktime-blocks=6
|
||||||
|
EOF
|
||||||
|
|
||||||
|
cp $DIR1/config $DIR2/config
|
||||||
|
[ $NUM_LIGHTNINGD = 2 ] || cp $DIR1/config $DIR3/config
|
||||||
|
|
||||||
|
if [ x"$RECONNECT" = xrestart ]; then
|
||||||
|
# Make sure node2 & 3 restart on same port, by setting in config.
|
||||||
|
# Find a free TCP port.
|
||||||
|
echo port=`findport 4000 $VARIANT` >> $DIR2/config
|
||||||
|
[ $NUM_LIGHTNINGD = 2 ] || echo port=`findport 4010 $VARIANT` >> $DIR3/config
|
||||||
|
fi
|
||||||
|
}
|
||||||
|
|
||||||
|
# Use DIR REDIR REDIRERR GDBFLAG
|
||||||
|
start_one_lightningd()
|
||||||
|
{
|
||||||
|
# Need absolute path for re-exec testing.
|
||||||
|
local CMD
|
||||||
|
CMD="$(readlink -f `pwd`/../lightningd) --lightning-dir=$1"
|
||||||
|
if [ -n "$4" ]; then
|
||||||
|
echo Press return once you run: gdb --args $CMD >&2
|
||||||
|
|
||||||
|
read REPLY
|
||||||
|
else
|
||||||
|
CMD="$PREFIX $CMD"
|
||||||
|
$CMD > $2 2> $3 &
|
||||||
|
fi
|
||||||
|
echo $CMD
|
||||||
|
}
|
||||||
|
|
||||||
|
start_lightningd()
|
||||||
|
{
|
||||||
|
NUM_LIGHTNINGD=$1
|
||||||
|
|
||||||
|
# If bitcoind not already running, start it.
|
||||||
|
if ! $CLI getinfo >/dev/null 2>&1; then
|
||||||
|
scripts/setup.sh
|
||||||
|
SHUTDOWN_BITCOIN=scripts/shutdown.sh
|
||||||
|
else
|
||||||
|
SHUTDOWN_BITCOIN=/bin/true
|
||||||
|
fi
|
||||||
|
|
||||||
|
LIGHTNINGD1=`start_one_lightningd $DIR1 $REDIR1 $REDIRERR1 "$GDB1"`
|
||||||
|
LIGHTNINGD2=`start_one_lightningd $DIR2 $REDIR2 $REDIRERR2 "$GDB2"`
|
||||||
|
[ $NUM_LIGHTNINGD = 2 ] || LIGHTNINGD3=`start_one_lightningd $DIR3 $REDIR3 $REDIRERR3 "$GDB3"`
|
||||||
|
|
||||||
|
if ! check "$LCLI1 getlog 2>/dev/null | $FGREP Hello"; then
|
||||||
|
echo Failed to start daemon 1 >&2
|
||||||
|
exit 1
|
||||||
|
fi
|
||||||
|
|
||||||
|
if ! check "$LCLI2 getlog 2>/dev/null | $FGREP Hello"; then
|
||||||
|
echo Failed to start daemon 2 >&2
|
||||||
|
exit 1
|
||||||
|
fi
|
||||||
|
|
||||||
|
if [ $NUM_LIGHTNINGD = 3 ] && ! check "$LCLI3 getlog 2>/dev/null | $FGREP Hello"; then
|
||||||
|
echo Failed to start daemon 3 >&2
|
||||||
|
exit 1
|
||||||
|
fi
|
||||||
|
|
||||||
|
# Version should match binary version
|
||||||
|
GETINFO_VERSION=`$LCLI1 getinfo | sed -n 's/.*"version" : "\([^"]*\)".*/\1/p'`
|
||||||
|
LCLI_VERSION=$($LCLI1 --version | head -n1)
|
||||||
|
LDAEMON_VERSION=$($LIGHTNINGD1 --version | head -n1)
|
||||||
|
if [ $GETINFO_VERSION != $LCLI_VERSION -o $GETINFO_VERSION != $LDAEMON_VERSION ]; then
|
||||||
|
echo Wrong versions: getinfo gave $GETINFO_VERSION, cli gave $LCLI_VERSION, daemon gave $LDAEMON_VERSION >&2
|
||||||
|
exit 1
|
||||||
|
fi
|
||||||
|
|
||||||
|
ID1=`get_info_field "$LCLI1" id`
|
||||||
|
ID2=`get_info_field "$LCLI2" id`
|
||||||
|
[ $NUM_LIGHTNINGD = 2 ] || ID3=`get_info_field "$LCLI3" id`
|
||||||
|
|
||||||
|
PORT2=`get_info_field "$LCLI2" port`
|
||||||
|
[ $NUM_LIGHTNINGD = 2 ] || PORT3=`get_info_field "$LCLI3" port`
|
||||||
|
}
|
||||||
|
|
||||||
|
lcli1()
|
||||||
|
{
|
||||||
|
if [ -n "$VERBOSE" ]; then
|
||||||
|
echo $LCLI1 "$@" >&2
|
||||||
|
fi
|
||||||
|
# Make sure we output if it fails; we need to capture it otherwise.
|
||||||
|
if ! OUT=`$LCLI1 "$@"`; then
|
||||||
|
echo "$OUT"
|
||||||
|
return 1
|
||||||
|
fi
|
||||||
|
echo "$OUT"
|
||||||
|
if [ -n "$DO_RECONNECT" ]; then
|
||||||
|
case "$1" in
|
||||||
|
# Don't restart on every get* command.
|
||||||
|
get*)
|
||||||
|
;;
|
||||||
|
dev-disconnect)
|
||||||
|
;;
|
||||||
|
stop)
|
||||||
|
;;
|
||||||
|
*)
|
||||||
|
case "$RECONNECT" in
|
||||||
|
reconnect)
|
||||||
|
[ -z "$VERBOSE" ] || echo RECONNECTING >&2
|
||||||
|
$LCLI1 dev-reconnect $ID2 >/dev/null
|
||||||
|
;;
|
||||||
|
restart)
|
||||||
|
[ -z "$VERBOSE" ] || echo RESTARTING >&2
|
||||||
|
$LCLI1 -- dev-restart $LIGHTNINGD1 >/dev/null 2>&1 || true
|
||||||
|
if ! check "$LCLI1 getlog 2>/dev/null | fgrep -q Hello"; then
|
||||||
|
echo "dev-restart failed!">&2
|
||||||
|
exit 1
|
||||||
|
fi
|
||||||
|
;;
|
||||||
|
esac
|
||||||
|
# Wait for reconnect (if peer2 still there)
|
||||||
|
if [ -z "$NO_PEER2" ] && ! check "$LCLI1 getpeers | tr -s '\012\011\" ' ' ' | fgrep -q 'connected : true'"; then
|
||||||
|
echo "Failed to reconnect!">&2
|
||||||
|
exit 1
|
||||||
|
fi
|
||||||
|
|
||||||
|
if [ "$1" = "dev-newhtlc" ]; then
|
||||||
|
# It might have gotten committed, or might be forgotten.
|
||||||
|
ID=`echo "$OUT" | extract_id`
|
||||||
|
if ! htlc_exists "$LCLI1" $2 $ID; then
|
||||||
|
if [ -z "$VERBOSE" ]; then
|
||||||
|
$LCLI1 "$@" >/dev/null 2>&1 || true
|
||||||
|
else
|
||||||
|
echo "Rerunning $LCLI1 $@" >&2
|
||||||
|
$LCLI1 "$@" >&2 || true
|
||||||
|
fi
|
||||||
|
fi
|
||||||
|
# Make sure it's confirmed before we run next command,
|
||||||
|
# in case *that* restarts (unless manual commit)
|
||||||
|
[ -n "$MANUALCOMMIT" ] || check ! htlc_is_state \'"$LCLI1"\' $2 $ID SENT_ADD_HTLC
|
||||||
|
# Removals may also be forgotten.
|
||||||
|
elif [ "$1" = "fulfillhtlc" -o "$1" = "failhtlc" ]; then
|
||||||
|
ID="$3"
|
||||||
|
if htlc_is_state "$LCLI1" $2 $ID RCVD_ADD_ACK_REVOCATION; then
|
||||||
|
if [ -z "$VERBOSE" ]; then
|
||||||
|
$LCLI1 "$@" >/dev/null 2>&1 || true
|
||||||
|
else
|
||||||
|
echo "Rerunning $LCLI1 $@" >&2
|
||||||
|
$LCLI1 "$@" >&2 || true
|
||||||
|
fi
|
||||||
|
# Make sure it's confirmed before we run next command,
|
||||||
|
# in case *that* restarts.
|
||||||
|
[ -n "$MANUALCOMMIT" ] || check ! htlc_is_state \'"$LCLI1"\' $2 $ID SENT_REMOVE_HTLC
|
||||||
|
fi
|
||||||
|
fi
|
||||||
|
;;
|
||||||
|
esac
|
||||||
|
fi
|
||||||
|
}
|
||||||
|
|
||||||
|
lcli2()
|
||||||
|
{
|
||||||
|
if [ -n "$VERBOSE" ]; then
|
||||||
|
echo $LCLI2 "$@" >&2
|
||||||
|
fi
|
||||||
|
$LCLI2 "$@"
|
||||||
|
}
|
||||||
|
|
||||||
|
lcli3()
|
||||||
|
{
|
||||||
|
if [ -n "$VERBOSE" ]; then
|
||||||
|
echo $LCLI3 "$@" >&2
|
||||||
|
fi
|
||||||
|
$LCLI3 "$@"
|
||||||
|
}
|
||||||
|
|
||||||
|
all_ok()
|
||||||
|
{
|
||||||
|
# Look for valgrind errors.
|
||||||
|
if grep ^== $DIR1/errors; then exit 1; fi
|
||||||
|
if grep ^== $DIR2/errors; then exit 1; fi
|
||||||
|
[ $NUM_LIGHTNINGD = 2 ] || if grep ^== $DIR3/errors; then exit 1; fi
|
||||||
|
$SHUTDOWN_BITCOIN
|
||||||
|
|
||||||
|
trap "rm -rf $DIR1 $DIR2 $DIR3" EXIT
|
||||||
|
exit 0
|
||||||
|
}
|
||||||
|
|
||||||
|
# If result is in quotes, those are stripped. Spaces in quotes not handled
|
||||||
|
get_info_field()
|
||||||
|
{
|
||||||
|
$1 getinfo | tr -s '\012\011" ' ' ' | sed 's/.* '$2' : \([^, }]*\).*/\1/'
|
||||||
|
}
|
||||||
|
|
||||||
|
# Peer $1 -> $2's htlc $3 is in state $4
|
||||||
|
htlc_is_state()
|
||||||
|
{
|
||||||
|
if [ $# != 4 ]; then echo "htlc_is_state got $# ARGS: $@" >&2; exit 1; fi
|
||||||
|
$1 gethtlcs $2 true | tr -s '\012\011\" ' ' ' | $FGREP "id : $3, state : $4 ," >&2
|
||||||
|
}
|
||||||
|
|
||||||
|
# Peer $1 -> $2's htlc $3 exists
|
||||||
|
htlc_exists()
|
||||||
|
{
|
||||||
|
$1 gethtlcs $2 true | tr -s '\012\011\" ' ' ' | $FGREP "id : $3," >&2
|
||||||
|
}
|
||||||
|
|
||||||
|
blockheight()
|
||||||
|
{
|
||||||
|
$CLI getblockcount
|
||||||
|
}
|
||||||
|
|
||||||
|
# Usage: <cmd to test>...
|
||||||
|
check()
|
||||||
|
{
|
||||||
|
local i=0
|
||||||
|
while ! eval "$@"; do
|
||||||
|
sleep 1
|
||||||
|
i=$(($i + 1))
|
||||||
|
if [ $i = 60 ]; then
|
||||||
|
return 1
|
||||||
|
fi
|
||||||
|
done
|
||||||
|
}
|
||||||
|
|
||||||
|
check_balance_single()
|
||||||
|
{
|
||||||
|
lcli="$1"
|
||||||
|
us_pay=$2
|
||||||
|
us_fee=$3
|
||||||
|
them_pay=$4
|
||||||
|
them_fee=$5
|
||||||
|
|
||||||
|
if check "$lcli getpeers | tr -s '\012\011\" ' ' ' | $FGREP \"our_amount : $us_pay, our_fee : $us_fee, their_amount : $them_pay, their_fee : $them_fee,\""; then :; else
|
||||||
|
echo Cannot find $lcli output: "our_amount : $us_pay, our_fee : $us_fee, their_amount : $them_pay, their_fee : $them_fee," >&2
|
||||||
|
$lcli getpeers | tr -s '\012\011" ' ' ' >&2
|
||||||
|
return 1
|
||||||
|
fi
|
||||||
|
}
|
||||||
|
|
||||||
|
check_status_single()
|
||||||
|
{
|
||||||
|
lcli="$1"
|
||||||
|
us_pay=$2
|
||||||
|
us_fee=$3
|
||||||
|
us_htlcs="$4"
|
||||||
|
them_pay=$5
|
||||||
|
them_fee=$6
|
||||||
|
them_htlcs="$7"
|
||||||
|
|
||||||
|
check_balance_single "$lcli" $us_pay $us_fee $them_pay $them_fee
|
||||||
|
|
||||||
|
if check "$lcli getpeers | tr -s '\012\011\" ' ' ' | $FGREP \"our_htlcs : [ $us_htlcs], their_htlcs : [ $them_htlcs]\""; then :; else
|
||||||
|
echo Cannot find $lcli output: "our_htlcs : [ $us_htlcs], their_htlcs : [ $them_htlcs]" >&2
|
||||||
|
$lcli getpeers | tr -s '\012\011" ' ' ' >&2
|
||||||
|
return 1
|
||||||
|
fi
|
||||||
|
}
|
||||||
|
|
||||||
|
# SEND_ -> RCVD_ and RCVD_ -> SEND_
|
||||||
|
swap_status()
|
||||||
|
{
|
||||||
|
echo "$@" | sed -e 's/state : RCVD_/@@/g' -e 's/state : SENT_/state : RCVD_/g' -e 's/@@/state : SENT_/g'
|
||||||
|
}
|
||||||
|
|
||||||
|
check_status()
|
||||||
|
{
|
||||||
|
us_pay=$1
|
||||||
|
us_fee=$2
|
||||||
|
us_htlcs="$3"
|
||||||
|
them_pay=$4
|
||||||
|
them_fee=$5
|
||||||
|
them_htlcs="$6"
|
||||||
|
|
||||||
|
check_status_single lcli1 "$us_pay" "$us_fee" "$us_htlcs" "$them_pay" "$them_fee" "$them_htlcs"
|
||||||
|
check_status_single lcli2 "$them_pay" "$them_fee" "`swap_status \"$them_htlcs\"`" "$us_pay" "$us_fee" "`swap_status \"$us_htlcs\"`"
|
||||||
|
}
|
||||||
|
|
||||||
|
check_tx_spend()
|
||||||
|
{
|
||||||
|
if check "$CLI getrawmempool | $FGREP '\"'"; then :;
|
||||||
|
else
|
||||||
|
echo "No tx in mempool:" >&2
|
||||||
|
$CLI getrawmempool >&2
|
||||||
|
exit 1
|
||||||
|
fi
|
||||||
|
}
|
||||||
|
|
||||||
|
check_peerstate()
|
||||||
|
{
|
||||||
|
if check "$1 getpeers | $FGREP -w $2"; then :
|
||||||
|
else
|
||||||
|
echo "$1" not in state "$2": >&2
|
||||||
|
$1 getpeers >&2
|
||||||
|
exit 1
|
||||||
|
fi
|
||||||
|
}
|
||||||
|
|
||||||
|
check_peerconnected()
|
||||||
|
{
|
||||||
|
if check "$1 getpeers | tr -s '\012\011\" ' ' ' | $FGREP -w 'connected : '$2"; then :
|
||||||
|
else
|
||||||
|
echo "$1" not connected "$2": >&2
|
||||||
|
$1 getpeers >&2
|
||||||
|
exit 1
|
||||||
|
fi
|
||||||
|
}
|
||||||
|
|
||||||
|
check_no_peers()
|
||||||
|
{
|
||||||
|
if check "$1 getpeers | tr -s '\012\011\" ' ' ' | $FGREP 'peers : [ ]'"; then :
|
||||||
|
else
|
||||||
|
echo "$1" still has peers: >&2
|
||||||
|
$1 getpeers >&2
|
||||||
|
exit 1
|
||||||
|
fi
|
||||||
|
}
|
||||||
|
|
||||||
|
extract_id()
|
||||||
|
{
|
||||||
|
XID=`tr -s '\012\011\" ' ' ' | sed -n 's/{ id : \([0-9]*\) }/\1/p'`
|
||||||
|
case "$XID" in
|
||||||
|
[0-9]*)
|
||||||
|
echo $XID;;
|
||||||
|
*)
|
||||||
|
return 1;;
|
||||||
|
esac
|
||||||
|
}
|
||||||
@ -5,11 +5,6 @@
|
|||||||
VERSION=$(`dirname $0`/../../lightning-cli --version | head -n1)
|
VERSION=$(`dirname $0`/../../lightning-cli --version | head -n1)
|
||||||
[ $VERSION = `git describe --always --dirty` ] || (echo Wrong version $VERSION >&2; exit 1)
|
[ $VERSION = `git describe --always --dirty` ] || (echo Wrong version $VERSION >&2; exit 1)
|
||||||
|
|
||||||
if $CLI getinfo 2>/dev/null; then
|
|
||||||
echo $DAEMON already running >&2
|
|
||||||
exit 1
|
|
||||||
fi
|
|
||||||
|
|
||||||
# Start clean
|
# Start clean
|
||||||
rm -rf $DATADIR
|
rm -rf $DATADIR
|
||||||
mkdir $DATADIR
|
mkdir $DATADIR
|
||||||
|
|||||||
@ -1,5 +1,9 @@
|
|||||||
# Sourced by other scripts
|
# Sourced by other scripts
|
||||||
|
|
||||||
|
# Bash variables for in-depth debugging.
|
||||||
|
#set -vx
|
||||||
|
#export PS4='+(${BASH_SOURCE}:${LINENO}): ${FUNCNAME[0]:+${FUNCNAME[0]}(): }'
|
||||||
|
|
||||||
# Suppress sync if we can, for speedup.
|
# Suppress sync if we can, for speedup.
|
||||||
if which eatmydata >/dev/null; then EATMYDATA=eatmydata; fi
|
if which eatmydata >/dev/null; then EATMYDATA=eatmydata; fi
|
||||||
|
|
||||||
@ -14,6 +18,18 @@ PREFIX=$EATMYDATA
|
|||||||
if which valgrind >/dev/null; then :; else NO_VALGRIND=1; fi
|
if which valgrind >/dev/null; then :; else NO_VALGRIND=1; fi
|
||||||
[ -n "$NO_VALGRIND" ] || PREFIX="$EATMYDATA valgrind -q --error-exitcode=7"
|
[ -n "$NO_VALGRIND" ] || PREFIX="$EATMYDATA valgrind -q --error-exitcode=7"
|
||||||
|
|
||||||
|
# We inject 0.01 bitcoin, but then fees (estimatefee fails and we use a
|
||||||
|
# fee rate as per the default).
|
||||||
|
AMOUNT=991880000
|
||||||
|
|
||||||
|
# Default fee rate per kb.
|
||||||
|
FEE_RATE=200000
|
||||||
|
|
||||||
|
# Fee in millisatoshi if we have no htlcs (note rounding to make it even)
|
||||||
|
NO_HTLCS_FEE=$((338 * $FEE_RATE / 2000 * 2000))
|
||||||
|
ONE_HTLCS_FEE=$(( (338 + 32) * $FEE_RATE / 2000 * 2000))
|
||||||
|
EXTRA_FEE=$(($ONE_HTLCS_FEE - $NO_HTLCS_FEE))
|
||||||
|
|
||||||
findport()
|
findport()
|
||||||
{
|
{
|
||||||
PORT=$1
|
PORT=$1
|
||||||
|
|||||||
@ -4,392 +4,44 @@
|
|||||||
cd `git rev-parse --show-toplevel`/daemon/test
|
cd `git rev-parse --show-toplevel`/daemon/test
|
||||||
|
|
||||||
. scripts/vars.sh
|
. scripts/vars.sh
|
||||||
|
. scripts/helpers.sh
|
||||||
# If bitcoind not already running, start it.
|
|
||||||
if ! $CLI getinfo >/dev/null 2>&1; then
|
|
||||||
scripts/setup.sh
|
|
||||||
SHUTDOWN_BITCOIN=scripts/shutdown.sh
|
|
||||||
else
|
|
||||||
SHUTDOWN_BITCOIN=/bin/true
|
|
||||||
fi
|
|
||||||
|
|
||||||
# Bash variables for in-depth debugging.
|
# Bash variables for in-depth debugging.
|
||||||
#set -vx
|
#set -vx
|
||||||
#export PS4='+(${BASH_SOURCE}:${LINENO}): ${FUNCNAME[0]:+${FUNCNAME[0]}(): }'
|
#export PS4='+(${BASH_SOURCE}:${LINENO}): ${FUNCNAME[0]:+${FUNCNAME[0]}(): }'
|
||||||
|
|
||||||
DIR1=/tmp/lightning.$$.1
|
STYLE=${1:-normal}
|
||||||
DIR2=/tmp/lightning.$$.2
|
shift
|
||||||
DIR3=/tmp/lightning.$$.3
|
|
||||||
|
|
||||||
REDIR1="$DIR1/output"
|
parse_cmdline 3 "$@"
|
||||||
REDIR2="$DIR2/output"
|
case x"$STYLE" in
|
||||||
REDIRERR1="$DIR1/errors"
|
x"--timeout-anchor")
|
||||||
REDIRERR2="$DIR2/errors"
|
TIMEOUT_ANCHOR=1
|
||||||
FGREP="fgrep -q"
|
;;
|
||||||
|
x"--dump-onchain")
|
||||||
# We inject 0.01 bitcoin, but then fees (estimatefee fails and we use a
|
DUMP_ONCHAIN=1
|
||||||
# fee rate as per the default).
|
;;
|
||||||
AMOUNT=991880000
|
x"--steal")
|
||||||
|
STEAL=1
|
||||||
# Default fee rate per kb.
|
;;
|
||||||
FEE_RATE=200000
|
x"--manual-commit")
|
||||||
|
MANUALCOMMIT=1
|
||||||
# Fee in millisatoshi if we have no htlcs (note rounding to make it even)
|
;;
|
||||||
NO_HTLCS_FEE=$((338 * $FEE_RATE / 2000 * 2000))
|
x"--mutual-close-with-htlcs")
|
||||||
ONE_HTLCS_FEE=$(( (338 + 32) * $FEE_RATE / 2000 * 2000))
|
CLOSE_WITH_HTLCS=1
|
||||||
EXTRA_FEE=$(($ONE_HTLCS_FEE - $NO_HTLCS_FEE))
|
;;
|
||||||
|
x"--different-fee-rates")
|
||||||
while [ $# != 0 ]; do
|
DIFFERENT_FEES=1
|
||||||
case x"$1" in
|
;;
|
||||||
x"--valgrind-vgdb")
|
x"--normal")
|
||||||
[ -n "$NO_VALGRIND" ] || PREFIX="$PREFIX --vgdb-error=1"
|
;;
|
||||||
REDIR1="/dev/tty"
|
*)
|
||||||
REDIRERR1="/dev/tty"
|
echo Unknown arg "$STYLE" >&2
|
||||||
REDIR2="/dev/tty"
|
|
||||||
REDIRERR2="/dev/tty"
|
|
||||||
;;
|
|
||||||
x"--gdb1")
|
|
||||||
GDB1=1
|
|
||||||
;;
|
|
||||||
x"--gdb2")
|
|
||||||
GDB2=1
|
|
||||||
;;
|
|
||||||
x"--timeout-anchor")
|
|
||||||
TIMEOUT_ANCHOR=1
|
|
||||||
;;
|
|
||||||
x"--dump-onchain")
|
|
||||||
DUMP_ONCHAIN=1
|
|
||||||
;;
|
|
||||||
x"--steal")
|
|
||||||
STEAL=1
|
|
||||||
;;
|
|
||||||
x"--manual-commit")
|
|
||||||
MANUALCOMMIT=1
|
|
||||||
;;
|
|
||||||
x"--mutual-close-with-htlcs")
|
|
||||||
CLOSE_WITH_HTLCS=1
|
|
||||||
;;
|
|
||||||
x"--different-fee-rates")
|
|
||||||
DIFFERENT_FEES=1
|
|
||||||
;;
|
|
||||||
x"--normal")
|
|
||||||
;;
|
|
||||||
x"--reconnect")
|
|
||||||
RECONNECT=reconnect
|
|
||||||
;;
|
|
||||||
x"--restart")
|
|
||||||
RECONNECT=restart
|
|
||||||
;;
|
|
||||||
x"--crash")
|
|
||||||
CRASH_ON_FAIL=1
|
|
||||||
;;
|
|
||||||
x"--verbose")
|
|
||||||
VERBOSE=1
|
|
||||||
;;
|
|
||||||
*)
|
|
||||||
echo Unknown arg "$1" >&2
|
|
||||||
exit 1
|
|
||||||
esac
|
|
||||||
shift
|
|
||||||
done
|
|
||||||
|
|
||||||
LCLI1="../lightning-cli --lightning-dir=$DIR1"
|
|
||||||
LCLI2="../lightning-cli --lightning-dir=$DIR2"
|
|
||||||
LCLI3="../lightning-cli --lightning-dir=$DIR3"
|
|
||||||
|
|
||||||
if [ -n "$VERBOSE" ]; then
|
|
||||||
FGREP="fgrep"
|
|
||||||
SHOW="cat >&2"
|
|
||||||
else
|
|
||||||
# Suppress command output.
|
|
||||||
exec >/dev/null
|
|
||||||
SHOW="cat"
|
|
||||||
fi
|
|
||||||
|
|
||||||
# Peer $1 -> $2's htlc $3 is in state $4
|
|
||||||
htlc_is_state()
|
|
||||||
{
|
|
||||||
if [ $# != 4 ]; then echo "htlc_is_state got $# ARGS: $@" >&2; exit 1; fi
|
|
||||||
$1 gethtlcs $2 true | tr -s '\012\011\" ' ' ' | $FGREP "id : $3, state : $4 ," >&2
|
|
||||||
}
|
|
||||||
|
|
||||||
# Peer $1 -> $2's htlc $3 exists
|
|
||||||
htlc_exists()
|
|
||||||
{
|
|
||||||
$1 gethtlcs $2 true | tr -s '\012\011\" ' ' ' | $FGREP "id : $3," >&2
|
|
||||||
}
|
|
||||||
|
|
||||||
lcli1()
|
|
||||||
{
|
|
||||||
if [ -n "$VERBOSE" ]; then
|
|
||||||
echo $LCLI1 "$@" >&2
|
|
||||||
fi
|
|
||||||
# Make sure we output if it fails; we need to capture it otherwise.
|
|
||||||
if ! OUT=`$LCLI1 "$@"`; then
|
|
||||||
echo "$OUT"
|
|
||||||
return 1
|
|
||||||
fi
|
|
||||||
echo "$OUT"
|
|
||||||
if [ -n "$DO_RECONNECT" ]; then
|
|
||||||
case "$1" in
|
|
||||||
# Don't restart on every get* command.
|
|
||||||
get*)
|
|
||||||
;;
|
|
||||||
dev-disconnect)
|
|
||||||
;;
|
|
||||||
stop)
|
|
||||||
;;
|
|
||||||
*)
|
|
||||||
case "$RECONNECT" in
|
|
||||||
reconnect)
|
|
||||||
[ -z "$VERBOSE" ] || echo RECONNECTING >&2
|
|
||||||
$LCLI1 dev-reconnect $ID2 >/dev/null
|
|
||||||
;;
|
|
||||||
restart)
|
|
||||||
[ -z "$VERBOSE" ] || echo RESTARTING >&2
|
|
||||||
$LCLI1 -- dev-restart $LIGHTNINGD1 >/dev/null 2>&1 || true
|
|
||||||
if ! check "$LCLI1 getlog 2>/dev/null | fgrep -q Hello"; then
|
|
||||||
echo "dev-restart failed!">&2
|
|
||||||
exit 1
|
|
||||||
fi
|
|
||||||
;;
|
|
||||||
esac
|
|
||||||
# Wait for reconnect (if peer2 still there)
|
|
||||||
if [ -z "$NO_PEER2" ] && ! check "$LCLI1 getpeers | tr -s '\012\011\" ' ' ' | fgrep -q 'connected : true'"; then
|
|
||||||
echo "Failed to reconnect!">&2
|
|
||||||
exit 1
|
|
||||||
fi
|
|
||||||
|
|
||||||
if [ "$1" = "dev-newhtlc" ]; then
|
|
||||||
# It might have gotten committed, or might be forgotten.
|
|
||||||
ID=`echo "$OUT" | extract_id`
|
|
||||||
if ! htlc_exists "$LCLI1" $2 $ID; then
|
|
||||||
if [ -z "$VERBOSE" ]; then
|
|
||||||
$LCLI1 "$@" >/dev/null 2>&1 || true
|
|
||||||
else
|
|
||||||
echo "Rerunning $LCLI1 $@" >&2
|
|
||||||
$LCLI1 "$@" >&2 || true
|
|
||||||
fi
|
|
||||||
fi
|
|
||||||
# Make sure it's confirmed before we run next command,
|
|
||||||
# in case *that* restarts (unless manual commit)
|
|
||||||
[ -n "$MANUALCOMMIT" ] || check ! htlc_is_state \'"$LCLI1"\' $2 $ID SENT_ADD_HTLC
|
|
||||||
# Removals may also be forgotten.
|
|
||||||
elif [ "$1" = "fulfillhtlc" -o "$1" = "failhtlc" ]; then
|
|
||||||
ID="$3"
|
|
||||||
if htlc_is_state "$LCLI1" $2 $ID RCVD_ADD_ACK_REVOCATION; then
|
|
||||||
if [ -z "$VERBOSE" ]; then
|
|
||||||
$LCLI1 "$@" >/dev/null 2>&1 || true
|
|
||||||
else
|
|
||||||
echo "Rerunning $LCLI1 $@" >&2
|
|
||||||
$LCLI1 "$@" >&2 || true
|
|
||||||
fi
|
|
||||||
# Make sure it's confirmed before we run next command,
|
|
||||||
# in case *that* restarts.
|
|
||||||
[ -n "$MANUALCOMMIT" ] || check ! htlc_is_state \'"$LCLI1"\' $2 $ID SENT_REMOVE_HTLC
|
|
||||||
fi
|
|
||||||
fi
|
|
||||||
;;
|
|
||||||
esac
|
|
||||||
fi
|
|
||||||
}
|
|
||||||
|
|
||||||
lcli2()
|
|
||||||
{
|
|
||||||
if [ -n "$VERBOSE" ]; then
|
|
||||||
echo $LCLI2 "$@" >&2
|
|
||||||
fi
|
|
||||||
$LCLI2 "$@"
|
|
||||||
}
|
|
||||||
|
|
||||||
lcli3()
|
|
||||||
{
|
|
||||||
if [ -n "$VERBOSE" ]; then
|
|
||||||
echo $LCLI3 "$@" >&2
|
|
||||||
fi
|
|
||||||
$LCLI3 "$@"
|
|
||||||
}
|
|
||||||
|
|
||||||
blockheight()
|
|
||||||
{
|
|
||||||
$CLI getblockcount
|
|
||||||
}
|
|
||||||
|
|
||||||
# Usage: <cmd to test>...
|
|
||||||
check()
|
|
||||||
{
|
|
||||||
local i=0
|
|
||||||
while ! eval "$@"; do
|
|
||||||
sleep 1
|
|
||||||
i=$(($i + 1))
|
|
||||||
if [ $i = 60 ]; then
|
|
||||||
return 1
|
|
||||||
fi
|
|
||||||
done
|
|
||||||
}
|
|
||||||
|
|
||||||
check_balance_single()
|
|
||||||
{
|
|
||||||
lcli="$1"
|
|
||||||
us_pay=$2
|
|
||||||
us_fee=$3
|
|
||||||
them_pay=$4
|
|
||||||
them_fee=$5
|
|
||||||
|
|
||||||
if check "$lcli getpeers | tr -s '\012\011\" ' ' ' | $FGREP \"our_amount : $us_pay, our_fee : $us_fee, their_amount : $them_pay, their_fee : $them_fee,\""; then :; else
|
|
||||||
echo Cannot find $lcli output: "our_amount : $us_pay, our_fee : $us_fee, their_amount : $them_pay, their_fee : $them_fee," >&2
|
|
||||||
$lcli getpeers | tr -s '\012\011" ' ' ' >&2
|
|
||||||
return 1
|
|
||||||
fi
|
|
||||||
}
|
|
||||||
|
|
||||||
check_status_single()
|
|
||||||
{
|
|
||||||
lcli="$1"
|
|
||||||
us_pay=$2
|
|
||||||
us_fee=$3
|
|
||||||
us_htlcs="$4"
|
|
||||||
them_pay=$5
|
|
||||||
them_fee=$6
|
|
||||||
them_htlcs="$7"
|
|
||||||
|
|
||||||
check_balance_single "$lcli" $us_pay $us_fee $them_pay $them_fee
|
|
||||||
|
|
||||||
if check "$lcli getpeers | tr -s '\012\011\" ' ' ' | $FGREP \"our_htlcs : [ $us_htlcs], their_htlcs : [ $them_htlcs]\""; then :; else
|
|
||||||
echo Cannot find $lcli output: "our_htlcs : [ $us_htlcs], their_htlcs : [ $them_htlcs]" >&2
|
|
||||||
$lcli getpeers | tr -s '\012\011" ' ' ' >&2
|
|
||||||
return 1
|
|
||||||
fi
|
|
||||||
}
|
|
||||||
|
|
||||||
# SEND_ -> RCVD_ and RCVD_ -> SEND_
|
|
||||||
swap_status()
|
|
||||||
{
|
|
||||||
echo "$@" | sed -e 's/state : RCVD_/@@/g' -e 's/state : SENT_/state : RCVD_/g' -e 's/@@/state : SENT_/g'
|
|
||||||
}
|
|
||||||
|
|
||||||
check_status()
|
|
||||||
{
|
|
||||||
us_pay=$1
|
|
||||||
us_fee=$2
|
|
||||||
us_htlcs="$3"
|
|
||||||
them_pay=$4
|
|
||||||
them_fee=$5
|
|
||||||
them_htlcs="$6"
|
|
||||||
|
|
||||||
check_status_single lcli1 "$us_pay" "$us_fee" "$us_htlcs" "$them_pay" "$them_fee" "$them_htlcs"
|
|
||||||
check_status_single lcli2 "$them_pay" "$them_fee" "`swap_status \"$them_htlcs\"`" "$us_pay" "$us_fee" "`swap_status \"$us_htlcs\"`"
|
|
||||||
}
|
|
||||||
|
|
||||||
check_tx_spend()
|
|
||||||
{
|
|
||||||
if check "$CLI getrawmempool | $FGREP '\"'"; then :;
|
|
||||||
else
|
|
||||||
echo "No tx in mempool:" >&2
|
|
||||||
$CLI getrawmempool >&2
|
|
||||||
exit 1
|
exit 1
|
||||||
fi
|
;;
|
||||||
}
|
esac
|
||||||
|
|
||||||
check_peerstate()
|
setup_lightning 3
|
||||||
{
|
|
||||||
if check "$1 getpeers | $FGREP -w $2"; then :
|
|
||||||
else
|
|
||||||
echo "$1" not in state "$2": >&2
|
|
||||||
$1 getpeers >&2
|
|
||||||
exit 1
|
|
||||||
fi
|
|
||||||
}
|
|
||||||
|
|
||||||
check_peerconnected()
|
|
||||||
{
|
|
||||||
if check "$1 getpeers | tr -s '\012\011\" ' ' ' | $FGREP -w 'connected : '$2"; then :
|
|
||||||
else
|
|
||||||
echo "$1" not connected "$2": >&2
|
|
||||||
$1 getpeers >&2
|
|
||||||
exit 1
|
|
||||||
fi
|
|
||||||
}
|
|
||||||
|
|
||||||
check_no_peers()
|
|
||||||
{
|
|
||||||
if check "$1 getpeers | tr -s '\012\011\" ' ' ' | $FGREP 'peers : [ ]'"; then :
|
|
||||||
else
|
|
||||||
echo "$1" still has peers: >&2
|
|
||||||
$1 getpeers >&2
|
|
||||||
exit 1
|
|
||||||
fi
|
|
||||||
}
|
|
||||||
|
|
||||||
extract_id()
|
|
||||||
{
|
|
||||||
XID=`tr -s '\012\011\" ' ' ' | sed -n 's/{ id : \([0-9]*\) }/\1/p'`
|
|
||||||
case "$XID" in
|
|
||||||
[0-9]*)
|
|
||||||
echo $XID;;
|
|
||||||
*)
|
|
||||||
return 1;;
|
|
||||||
esac
|
|
||||||
}
|
|
||||||
|
|
||||||
all_ok()
|
|
||||||
{
|
|
||||||
# Look for valgrind errors.
|
|
||||||
if grep ^== $DIR1/errors; then exit 1; fi
|
|
||||||
if grep ^== $DIR2/errors; then exit 1; fi
|
|
||||||
if grep ^== $DIR3/errors; then exit 1; fi
|
|
||||||
$SHUTDOWN_BITCOIN
|
|
||||||
|
|
||||||
trap "rm -rf $DIR1 $DIR2 $DIR3" EXIT
|
|
||||||
exit 0
|
|
||||||
}
|
|
||||||
|
|
||||||
if [ -n "$CRASH_ON_FAIL" ]; then
|
|
||||||
trap "$LCLI1 dev-crash 2>/dev/null || true; $LCLI2 dev-crash 2>/dev/null || true; echo Crash results in $DIR1 and $DIR2 >&2; cat $DIR1/errors $DIR2/errors >&2" EXIT
|
|
||||||
else
|
|
||||||
trap "echo Results in $DIR1 and $DIR2 >&2; cat $DIR1/errors $DIR2/errors >&2" EXIT
|
|
||||||
fi
|
|
||||||
mkdir $DIR1 $DIR2 $DIR3
|
|
||||||
|
|
||||||
if [ -n "$MANUALCOMMIT" ]; then
|
|
||||||
# Aka. never.
|
|
||||||
COMMIT_TIME=1h
|
|
||||||
else
|
|
||||||
COMMIT_TIME=10ms
|
|
||||||
fi
|
|
||||||
|
|
||||||
cat > $DIR1/config <<EOF
|
|
||||||
disable-irc
|
|
||||||
log-level=debug
|
|
||||||
bitcoind-regtest
|
|
||||||
bitcoind-poll=5s
|
|
||||||
deadline-blocks=5
|
|
||||||
min-htlc-expiry=6
|
|
||||||
bitcoin-datadir=$DATADIR
|
|
||||||
locktime-blocks=6
|
|
||||||
commit-time=$COMMIT_TIME
|
|
||||||
EOF
|
|
||||||
|
|
||||||
cat > $DIR2/config <<EOF
|
|
||||||
disable-irc
|
|
||||||
bitcoind-regtest
|
|
||||||
log-level=debug
|
|
||||||
bitcoind-poll=5s
|
|
||||||
deadline-blocks=5
|
|
||||||
min-htlc-expiry=6
|
|
||||||
bitcoin-datadir=$DATADIR
|
|
||||||
locktime-blocks=6
|
|
||||||
commit-time=$COMMIT_TIME
|
|
||||||
EOF
|
|
||||||
|
|
||||||
cp $DIR2/config $DIR3/config
|
|
||||||
|
|
||||||
if [ x"$RECONNECT" = xrestart ]; then
|
|
||||||
# Make sure node2 & 3 restart on same port, by setting in config.
|
|
||||||
# Find a free TCP port.
|
|
||||||
echo port=`findport 4000 $VARIANT` >> $DIR2/config
|
|
||||||
echo port=`findport 4010 $VARIANT` >> $DIR3/config
|
|
||||||
fi
|
|
||||||
|
|
||||||
if [ -n "$DIFFERENT_FEES" ]; then
|
if [ -n "$DIFFERENT_FEES" ]; then
|
||||||
# Simply override default fee (estimatefee fails on regtest anyway)
|
# Simply override default fee (estimatefee fails on regtest anyway)
|
||||||
@ -399,61 +51,19 @@ if [ -n "$DIFFERENT_FEES" ]; then
|
|||||||
echo "default-fee-rate=$DEFAULT_FEE_RATE2" >> $DIR2/config
|
echo "default-fee-rate=$DEFAULT_FEE_RATE2" >> $DIR2/config
|
||||||
fi
|
fi
|
||||||
|
|
||||||
# Need absolute path for re-exec testing.
|
if [ -n "$MANUALCOMMIT" ]; then
|
||||||
LIGHTNINGD1="$(readlink -f `pwd`/../lightningd) --lightning-dir=$DIR1"
|
# Aka. never.
|
||||||
if [ -n "$GDB1" ]; then
|
echo 'commit-time=1h' >> $DIR1/config
|
||||||
echo Press return once you run: gdb --args $LIGHTNINGD1 >&2
|
echo 'commit-time=1h' >> $DIR2/config
|
||||||
|
echo 'commit-time=1h' >> $DIR3/config
|
||||||
read REPLY
|
|
||||||
else
|
|
||||||
LIGHTNINGD1="$PREFIX $LIGHTNINGD1"
|
|
||||||
$LIGHTNINGD1 > $REDIR1 2> $REDIRERR1 &
|
|
||||||
fi
|
fi
|
||||||
|
|
||||||
LIGHTNINGD2="$(readlink -f `pwd`/../lightningd) --lightning-dir=$DIR2"
|
start_lightningd 3
|
||||||
if [ -n "$GDB2" ]; then
|
|
||||||
echo Press return once you run: gdb --args $LIGHTNINGD2 >&2
|
|
||||||
read REPLY
|
|
||||||
else
|
|
||||||
LIGHTNINGD2="$PREFIX $LIGHTNINGD2"
|
|
||||||
$LIGHTNINGD2 > $REDIR2 2> $REDIRERR2 &
|
|
||||||
fi
|
|
||||||
LIGHTNINGD3="$PREFIX $(readlink -f `pwd`/../lightningd) --lightning-dir=$DIR3"
|
|
||||||
$LIGHTNINGD3 > $DIR3/output 2> $DIR3/errors &
|
|
||||||
|
|
||||||
if ! check "$LCLI1 getlog 2>/dev/null | $FGREP Hello"; then
|
# Check IDs match logs
|
||||||
echo Failed to start daemon 1 >&2
|
[ `$LCLI1 getlog | sed -n 's/.*"ID: \([0-9a-f]*\)".*/\1/p'` = $ID1 ]
|
||||||
exit 1
|
[ `$LCLI2 getlog | sed -n 's/.*"ID: \([0-9a-f]*\)".*/\1/p'` = $ID2 ]
|
||||||
fi
|
[ $NUM_LIGHTNINGD = 2 ] || [ `$LCLI3 getlog | sed -n 's/.*"ID: \([0-9a-f]*\)".*/\1/p'` = $ID3 ]
|
||||||
|
|
||||||
if ! check "$LCLI2 getlog 2>/dev/null | $FGREP Hello"; then
|
|
||||||
echo Failed to start daemon 2 >&2
|
|
||||||
exit 1
|
|
||||||
fi
|
|
||||||
|
|
||||||
if ! check "$LCLI3 getlog 2>/dev/null | $FGREP Hello"; then
|
|
||||||
echo Failed to start daemon 3 >&2
|
|
||||||
exit 1
|
|
||||||
fi
|
|
||||||
|
|
||||||
# Version should match binary version
|
|
||||||
GETINFO_VERSION=`$LCLI1 getinfo | sed -n 's/.*"version" : "\([^"]*\)".*/\1/p'`
|
|
||||||
LCLI_VERSION=$($LCLI1 --version | head -n1)
|
|
||||||
LDAEMON_VERSION=$($LIGHTNINGD1 --version | head -n1)
|
|
||||||
if [ $GETINFO_VERSION != $LCLI_VERSION -o $GETINFO_VERSION != $LDAEMON_VERSION ]; then
|
|
||||||
echo Wrong versions: getinfo gave $GETINFO_VERSION, cli gave $LCLI_VERSION, daemon gave $LDAEMON_VERSION >&2
|
|
||||||
exit 1
|
|
||||||
fi
|
|
||||||
|
|
||||||
ID1=`$LCLI1 getlog | sed -n 's/.*"ID: \([0-9a-f]*\)".*/\1/p'`
|
|
||||||
[ `$LCLI1 getinfo | sed -n 's/.*"id" : "\([0-9a-f]*\)".*/\1/p'` = $ID1 ]
|
|
||||||
ID2=`$LCLI2 getlog | sed -n 's/.*"ID: \([0-9a-f]*\)".*/\1/p'`
|
|
||||||
[ `$LCLI2 getinfo | sed -n 's/.*"id" : "\([0-9a-f]*\)".*/\1/p'` = $ID2 ]
|
|
||||||
ID3=`$LCLI3 getlog | sed -n 's/.*"ID: \([0-9a-f]*\)".*/\1/p'`
|
|
||||||
[ `$LCLI3 getinfo | sed -n 's/.*"id" : "\([0-9a-f]*\)".*/\1/p'` = $ID3 ]
|
|
||||||
|
|
||||||
PORT2=`$LCLI2 getlog | sed -n 's/.*on port \([0-9]*\).*/\1/p'`
|
|
||||||
PORT3=`$LCLI3 getlog | sed -n 's/.*on port \([0-9]*\).*/\1/p'`
|
|
||||||
|
|
||||||
# Make a payment into a P2SH for anchor.
|
# Make a payment into a P2SH for anchor.
|
||||||
P2SHADDR=`$LCLI1 newaddr | sed -n 's/{ "address" : "\(.*\)" }/\1/p'`
|
P2SHADDR=`$LCLI1 newaddr | sed -n 's/{ "address" : "\(.*\)" }/\1/p'`
|
||||||
@ -463,8 +73,8 @@ $CLI generate 1
|
|||||||
|
|
||||||
# Make sure they see it (for timeout we need to know what height they were)
|
# Make sure they see it (for timeout we need to know what height they were)
|
||||||
BLOCKHEIGHT=`$CLI getblockcount`
|
BLOCKHEIGHT=`$CLI getblockcount`
|
||||||
check "$LCLI1 getinfo | $FGREP '\"blockheight\" : $BLOCKHEIGHT'"
|
check '[ `get_info_field "$LCLI1" blockheight` = $BLOCKHEIGHT ]'
|
||||||
check "$LCLI2 getinfo | $FGREP '\"blockheight\" : $BLOCKHEIGHT'"
|
check '[ `get_info_field "$LCLI2" blockheight` = $BLOCKHEIGHT ]'
|
||||||
|
|
||||||
# Prevent anchor broadcast if we want to test timeout.
|
# Prevent anchor broadcast if we want to test timeout.
|
||||||
if [ -n "$TIMEOUT_ANCHOR" ]; then
|
if [ -n "$TIMEOUT_ANCHOR" ]; then
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user