[thirdparty/git.git] / t / lib-git-daemon.sh

# Shell library to run git-daemon in tests.  Ends the test early if
# GIT_TEST_GIT_DAEMON is not set.
#
# Usage:
#
#	. ./test-lib.sh
#	. "$TEST_DIRECTORY"/lib-git-daemon.sh
#	start_git_daemon
#
#	test_expect_success '...' '
#		...
#	'
#
#	test_expect_success ...
#
#	stop_git_daemon
#	test_done

test_tristate GIT_TEST_GIT_DAEMON
if test "$GIT_TEST_GIT_DAEMON" = false
then
	skip_all="git-daemon testing disabled (unset GIT_TEST_GIT_DAEMON to enable)"
	test_done
fi

if test_have_prereq !PIPE
then
	test_skip_or_die $GIT_TEST_GIT_DAEMON "file system does not support FIFOs"
fi

LIB_GIT_DAEMON_PORT=${LIB_GIT_DAEMON_PORT-${this_test#t}}

GIT_DAEMON_PID=
GIT_DAEMON_DOCUMENT_ROOT_PATH="$PWD"/repo
GIT_DAEMON_HOST_PORT=127.0.0.1:$LIB_GIT_DAEMON_PORT
GIT_DAEMON_URL=git://$GIT_DAEMON_HOST_PORT

start_git_daemon() {
	if test -n "$GIT_DAEMON_PID"
	then
		error "start_git_daemon already called"
	fi

	mkdir -p "$GIT_DAEMON_DOCUMENT_ROOT_PATH"

	trap 'code=$?; stop_git_daemon; (exit $code); die' EXIT

	say >&3 "Starting git daemon ..."
	mkfifo git_daemon_output
	${LIB_GIT_DAEMON_COMMAND:-git daemon} \
		--listen=127.0.0.1 --port="$LIB_GIT_DAEMON_PORT" \
		--reuseaddr --verbose \
		--base-path="$GIT_DAEMON_DOCUMENT_ROOT_PATH" \
		"$@" "$GIT_DAEMON_DOCUMENT_ROOT_PATH" \
		>&3 2>git_daemon_output &
	GIT_DAEMON_PID=$!
	>daemon.log
	{
		read -r line <&7
		printf "%s\n" "$line"
		printf >&4 "%s\n" "$line"
		(
			while read -r line <&7
			do
				printf "%s\n" "$line"
				printf >&4 "%s\n" "$line"
			done
		) &
	} 7<git_daemon_output >>"$TRASH_DIRECTORY/daemon.log" &&

	# Check expected output
	if test x"$(expr "$line" : "\[[0-9]*\] \(.*\)")" != x"Ready to rumble"
	then
		kill "$GIT_DAEMON_PID"
		wait "$GIT_DAEMON_PID"
		trap 'die' EXIT
		test_skip_or_die $GIT_TEST_GIT_DAEMON \
			"git daemon failed to start"
	fi
}

stop_git_daemon() {
	if test -z "$GIT_DAEMON_PID"
	then
		return
	fi

	trap 'die' EXIT

	# kill git-daemon child of git
	say >&3 "Stopping git daemon ..."
	kill "$GIT_DAEMON_PID"
	wait "$GIT_DAEMON_PID" >&3 2>&4
	ret=$?
	if test_match_signal 15 $?
	then
		error "git daemon exited with status: $ret"
	fi
	GIT_DAEMON_PID=
	rm -f git_daemon_output
}

# A stripped-down version of a netcat client, that connects to a "host:port"
# given in $1, sends its stdin followed by EOF, then dumps the response (until
# EOF) to stdout.
fake_nc() {
	if ! test_declared_prereq FAKENC
	then
		echo >&4 "fake_nc: need to declare FAKENC prerequisite"
		return 127
	fi
	perl -Mstrict -MIO::Socket::INET -e '
		my $s = IO::Socket::INET->new(shift)
			or die "unable to open socket: $!";
		print $s <STDIN>;
		$s->shutdown(1);
		print <$s>;
	' "$@"
}

test_lazy_prereq FAKENC '
	perl -MIO::Socket::INET -e "exit 0"
'
Commit	Line	Data
c74c7203 JN	1	# Shell library to run git-daemon in tests. Ends the test early if
	2	# GIT_TEST_GIT_DAEMON is not set.
	3	#
	4	# Usage:
	5	#
	6	# . ./test-lib.sh
	7	# . "$TEST_DIRECTORY"/lib-git-daemon.sh
	8	# start_git_daemon
	9	#
	10	# test_expect_success '...' '
	11	# ...
	12	# '
	13	#
	14	# test_expect_success ...
	15	#
	16	# stop_git_daemon
	17	# test_done
71039fb9	18
83d842dc JK	19	test_tristate GIT_TEST_GIT_DAEMON
83d842dc JK	20	if test "$GIT_TEST_GIT_DAEMON" = false
71039fb9	21	then
83d842dc	22	skip_all="git-daemon testing disabled (unset GIT_TEST_GIT_DAEMON to enable)"
71039fb9 CB	23	test_done
	24	fi
	25
a390d7e8 JS	26	if test_have_prereq !PIPE
	27	then
	28	test_skip_or_die $GIT_TEST_GIT_DAEMON "file system does not support FIFOs"
	29	fi
	30
c44132fc	31	LIB_GIT_DAEMON_PORT=${LIB_GIT_DAEMON_PORT-${this_test#t}}
71039fb9 CB	32
	33	GIT_DAEMON_PID=
	34	GIT_DAEMON_DOCUMENT_ROOT_PATH="$PWD"/repo
4414a150 JK	35	GIT_DAEMON_HOST_PORT=127.0.0.1:$LIB_GIT_DAEMON_PORT
4414a150 JK	36	GIT_DAEMON_URL=git://$GIT_DAEMON_HOST_PORT
71039fb9 CB	37
	38	start_git_daemon() {
	39	if test -n "$GIT_DAEMON_PID"
	40	then
	41	error "start_git_daemon already called"
	42	fi
	43
	44	mkdir -p "$GIT_DAEMON_DOCUMENT_ROOT_PATH"
	45
	46	trap 'code=$?; stop_git_daemon; (exit $code); die' EXIT
	47
	48	say >&3 "Starting git daemon ..."
561b133c	49	mkfifo git_daemon_output
bd4d9d99 JK	50	${LIB_GIT_DAEMON_COMMAND:-git daemon} \
bd4d9d99 JK	51	--listen=127.0.0.1 --port="$LIB_GIT_DAEMON_PORT" \
71039fb9 CB	52	--reuseaddr --verbose \
	53	--base-path="$GIT_DAEMON_DOCUMENT_ROOT_PATH" \
	54	"$@" "$GIT_DAEMON_DOCUMENT_ROOT_PATH" \
561b133c	55	>&3 2>git_daemon_output &
71039fb9	56	GIT_DAEMON_PID=$!
314a73d6	57	>daemon.log
561b133c	58	{
314a73d6 JK	59	read -r line <&7
	60	printf "%s\n" "$line"
	61	printf >&4 "%s\n" "$line"
	62	(
	63	while read -r line <&7
	64	do
	65	printf "%s\n" "$line"
	66	printf >&4 "%s\n" "$line"
	67	done
	68	) &
	69	} 7<git_daemon_output >>"$TRASH_DIRECTORY/daemon.log" &&
561b133c	70
46e35815 JS	71	# Check expected output
	72	if test x"$(expr "$line" : "\[[0-9]\] \(.\)")" != x"Ready to rumble"
	73	then
	74	kill "$GIT_DAEMON_PID"
	75	wait "$GIT_DAEMON_PID"
	76	trap 'die' EXIT
83d842dc JK	77	test_skip_or_die $GIT_TEST_GIT_DAEMON \
83d842dc JK	78	"git daemon failed to start"
46e35815	79	fi
71039fb9 CB	80	}
	81
	82	stop_git_daemon() {
	83	if test -z "$GIT_DAEMON_PID"
	84	then
	85	return
	86	fi
	87
	88	trap 'die' EXIT
	89
	90	# kill git-daemon child of git
	91	say >&3 "Stopping git daemon ..."
	92	kill "$GIT_DAEMON_PID"
	93	wait "$GIT_DAEMON_PID" >&3 2>&4
	94	ret=$?
03c39b34	95	if test_match_signal 15 $?
71039fb9 CB	96	then
	97	error "git daemon exited with status: $ret"
	98	fi
	99	GIT_DAEMON_PID=
561b133c	100	rm -f git_daemon_output
71039fb9	101	}
4414a150 JK	102
	103	# A stripped-down version of a netcat client, that connects to a "host:port"
	104	# given in $1, sends its stdin followed by EOF, then dumps the response (until
	105	# EOF) to stdout.
	106	fake_nc() {
	107	if ! test_declared_prereq FAKENC
	108	then
	109	echo >&4 "fake_nc: need to declare FAKENC prerequisite"
	110	return 127
	111	fi
	112	perl -Mstrict -MIO::Socket::INET -e '
	113	my $s = IO::Socket::INET->new(shift)
	114	or die "unable to open socket: $!";
	115	print $s <STDIN>;
	116	$s->shutdown(1);
	117	print <$s>;
	118	' "$@"
	119	}
	120
	121	test_lazy_prereq FAKENC '
	122	perl -MIO::Socket::INET -e "exit 0"
	123	'