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

# Shell library to run an HTTP server for use in tests.
# Ends the test early if httpd tests should not be run,
# for example because the user has not enabled them.
#
# Usage:
#
#	. ./test-lib.sh
#	. "$TEST_DIRECTORY"/lib-httpd.sh
#	start_httpd
#
#	test_expect_success '...' '
#		...
#	'
#
#	test_expect_success ...
#
#	stop_httpd
#	test_done
#
# Can be configured using the following variables.
#
#    GIT_TEST_HTTPD              enable HTTPD tests
#    LIB_HTTPD_PATH              web server path
#    LIB_HTTPD_MODULE_PATH       web server modules path
#    LIB_HTTPD_PORT              listening port
#    LIB_HTTPD_DAV               enable DAV
#    LIB_HTTPD_SVN               enable SVN at given location (e.g. "svn")
#    LIB_HTTPD_SSL               enable SSL
#
# Copyright (c) 2008 Clemens Buchacher <drizzd@aon.at>
#

if test -n "$NO_CURL"
then
	skip_all='skipping test, git built without http support'
	test_done
fi

if test -n "$NO_EXPAT" && test -n "$LIB_HTTPD_DAV"
then
	skip_all='skipping test, git built without expat support'
	test_done
fi

test_tristate GIT_TEST_HTTPD
if test "$GIT_TEST_HTTPD" = false
then
	skip_all="Network testing disabled (unset GIT_TEST_HTTPD to enable)"
	test_done
fi

if ! test_have_prereq NOT_ROOT; then
	test_skip_or_die $GIT_TEST_HTTPD \
		"Cannot run httpd tests as root"
fi

HTTPD_PARA=""

for DEFAULT_HTTPD_PATH in '/usr/sbin/httpd' '/usr/sbin/apache2'
do
	if test -x "$DEFAULT_HTTPD_PATH"
	then
		break
	fi
done

for DEFAULT_HTTPD_MODULE_PATH in '/usr/libexec/apache2' \
				 '/usr/lib/apache2/modules' \
				 '/usr/lib64/httpd/modules' \
				 '/usr/lib/httpd/modules'
do
	if test -d "$DEFAULT_HTTPD_MODULE_PATH"
	then
		break
	fi
done

case $(uname) in
	Darwin)
		HTTPD_PARA="$HTTPD_PARA -DDarwin"
	;;
esac

LIB_HTTPD_PATH=${LIB_HTTPD_PATH-"$DEFAULT_HTTPD_PATH"}
test_set_port LIB_HTTPD_PORT

TEST_PATH="$TEST_DIRECTORY"/lib-httpd
HTTPD_ROOT_PATH="$PWD"/httpd
HTTPD_DOCUMENT_ROOT_PATH=$HTTPD_ROOT_PATH/www

# hack to suppress apache PassEnv warnings
GIT_VALGRIND=$GIT_VALGRIND; export GIT_VALGRIND
GIT_VALGRIND_OPTIONS=$GIT_VALGRIND_OPTIONS; export GIT_VALGRIND_OPTIONS
GIT_TRACE=$GIT_TRACE; export GIT_TRACE

if ! test -x "$LIB_HTTPD_PATH"
then
	test_skip_or_die $GIT_TEST_HTTPD "no web server found at '$LIB_HTTPD_PATH'"
fi

HTTPD_VERSION=$($LIB_HTTPD_PATH -v | \
	sed -n 's/^Server version: Apache\/\([0-9]*\)\..*$/\1/p; q')

if test -n "$HTTPD_VERSION"
then
	if test -z "$LIB_HTTPD_MODULE_PATH"
	then
		if ! test $HTTPD_VERSION -ge 2
		then
			test_skip_or_die $GIT_TEST_HTTPD \
				"at least Apache version 2 is required"
		fi
		if ! test -d "$DEFAULT_HTTPD_MODULE_PATH"
		then
			test_skip_or_die $GIT_TEST_HTTPD \
				"Apache module directory not found"
		fi

		LIB_HTTPD_MODULE_PATH="$DEFAULT_HTTPD_MODULE_PATH"
	fi
else
	test_skip_or_die $GIT_TEST_HTTPD \
		"Could not identify web server at '$LIB_HTTPD_PATH'"
fi

install_script () {
	write_script "$HTTPD_ROOT_PATH/$1" <"$TEST_PATH/$1"
}

prepare_httpd() {
	mkdir -p "$HTTPD_DOCUMENT_ROOT_PATH"
	cp "$TEST_PATH"/passwd "$HTTPD_ROOT_PATH"
	install_script broken-smart-http.sh
	install_script error.sh
	install_script apply-one-time-sed.sh

	ln -s "$LIB_HTTPD_MODULE_PATH" "$HTTPD_ROOT_PATH/modules"

	if test -n "$LIB_HTTPD_SSL"
	then
		HTTPD_PROTO=https

		RANDFILE_PATH="$HTTPD_ROOT_PATH"/.rnd openssl req \
			-config "$TEST_PATH/ssl.cnf" \
			-new -x509 -nodes \
			-out "$HTTPD_ROOT_PATH/httpd.pem" \
			-keyout "$HTTPD_ROOT_PATH/httpd.pem"
		GIT_SSL_NO_VERIFY=t
		export GIT_SSL_NO_VERIFY
		HTTPD_PARA="$HTTPD_PARA -DSSL"
	else
		HTTPD_PROTO=http
	fi
	HTTPD_DEST=127.0.0.1:$LIB_HTTPD_PORT
	HTTPD_URL=$HTTPD_PROTO://$HTTPD_DEST
	HTTPD_URL_USER=$HTTPD_PROTO://user%40host@$HTTPD_DEST
	HTTPD_URL_USER_PASS=$HTTPD_PROTO://user%40host:pass%40host@$HTTPD_DEST

	if test -n "$LIB_HTTPD_DAV" || test -n "$LIB_HTTPD_SVN"
	then
		HTTPD_PARA="$HTTPD_PARA -DDAV"

		if test -n "$LIB_HTTPD_SVN"
		then
			HTTPD_PARA="$HTTPD_PARA -DSVN"
			LIB_HTTPD_SVNPATH="$rawsvnrepo"
			svnrepo="http://127.0.0.1:$LIB_HTTPD_PORT/"
			svnrepo="$svnrepo$LIB_HTTPD_SVN"
			export LIB_HTTPD_SVN LIB_HTTPD_SVNPATH
		fi
	fi
}

start_httpd() {
	prepare_httpd >&3 2>&4

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

	"$LIB_HTTPD_PATH" -d "$HTTPD_ROOT_PATH" \
		-f "$TEST_PATH/apache.conf" $HTTPD_PARA \
		-c "Listen 127.0.0.1:$LIB_HTTPD_PORT" -k start \
		>&3 2>&4
	if test $? -ne 0
	then
		trap 'die' EXIT
		cat "$HTTPD_ROOT_PATH"/error.log >&4 2>/dev/null
		test_skip_or_die $GIT_TEST_HTTPD "web server setup failed"
	fi
}

stop_httpd() {
	trap 'die' EXIT

	"$LIB_HTTPD_PATH" -d "$HTTPD_ROOT_PATH" \
		-f "$TEST_PATH/apache.conf" $HTTPD_PARA -k stop
}

test_http_push_nonff () {
	REMOTE_REPO=$1
	LOCAL_REPO=$2
	BRANCH=$3
	EXPECT_CAS_RESULT=${4-failure}

	test_expect_success 'non-fast-forward push fails' '
		cd "$REMOTE_REPO" &&
		HEAD=$(git rev-parse --verify HEAD) &&

		cd "$LOCAL_REPO" &&
		git checkout $BRANCH &&
		echo "changed" > path2 &&
		git commit -a -m path2 --amend &&

		test_must_fail git push -v origin >output 2>&1 &&
		(cd "$REMOTE_REPO" &&
		 test $HEAD = $(git rev-parse --verify HEAD))
	'

	test_expect_success 'non-fast-forward push show ref status' '
		grep "^ ! \[rejected\][ ]*$BRANCH -> $BRANCH (non-fast-forward)$" output
	'

	test_expect_success 'non-fast-forward push shows help message' '
		test_i18ngrep "Updates were rejected because" output
	'

	test_expect_${EXPECT_CAS_RESULT} 'force with lease aka cas' '
		HEAD=$(	cd "$REMOTE_REPO" && git rev-parse --verify HEAD ) &&
		test_when_finished '\''
			(cd "$REMOTE_REPO" && git update-ref HEAD "$HEAD")
		'\'' &&
		(
			cd "$LOCAL_REPO" &&
			git push -v --force-with-lease=$BRANCH:$HEAD origin
		) &&
		git rev-parse --verify "$BRANCH" >expect &&
		(
			cd "$REMOTE_REPO" && git rev-parse --verify HEAD
		) >actual &&
		test_cmp expect actual
	'
}

setup_askpass_helper() {
	test_expect_success 'setup askpass helper' '
		write_script "$TRASH_DIRECTORY/askpass" <<-\EOF &&
		echo >>"$TRASH_DIRECTORY/askpass-query" "askpass: $*" &&
		case "$*" in
		*Username*)
			what=user
			;;
		*Password*)
			what=pass
			;;
		esac &&
		cat "$TRASH_DIRECTORY/askpass-$what"
		EOF
		GIT_ASKPASS="$TRASH_DIRECTORY/askpass" &&
		export GIT_ASKPASS &&
		export TRASH_DIRECTORY
	'
}

set_askpass() {
	>"$TRASH_DIRECTORY/askpass-query" &&
	echo "$1" >"$TRASH_DIRECTORY/askpass-user" &&
	echo "$2" >"$TRASH_DIRECTORY/askpass-pass"
}

expect_askpass() {
	dest=$HTTPD_DEST${3+/$3}

	{
		case "$1" in
		none)
			;;
		pass)
			echo "askpass: Password for 'http://$2@$dest': "
			;;
		both)
			echo "askpass: Username for 'http://$dest': "
			echo "askpass: Password for 'http://$2@$dest': "
			;;
		*)
			false
			;;
		esac
	} >"$TRASH_DIRECTORY/askpass-expect" &&
	test_cmp "$TRASH_DIRECTORY/askpass-expect" \
		 "$TRASH_DIRECTORY/askpass-query"
}

strip_access_log() {
	sed -e "
		s/^.* \"//
		s/\"//
		s/ [1-9][0-9]*\$//
		s/^GET /GET  /
	" "$HTTPD_ROOT_PATH"/access.log
}

# Requires one argument: the name of a file containing the expected stripped
# access log entries.
check_access_log() {
	sort "$1" >"$1".sorted &&
	strip_access_log >access.log.stripped &&
	sort access.log.stripped >access.log.sorted &&
	if ! test_cmp "$1".sorted access.log.sorted
	then
		test_cmp "$1" access.log.stripped
	fi
}
Commit	Line	Data
c74c7203 JN	1	# Shell library to run an HTTP server for use in tests.
	2	# Ends the test early if httpd tests should not be run,
	3	# for example because the user has not enabled them.
	4	#
	5	# Usage:
	6	#
	7	# . ./test-lib.sh
	8	# . "$TEST_DIRECTORY"/lib-httpd.sh
	9	# start_httpd
	10	#
	11	# test_expect_success '...' '
	12	# ...
	13	# '
	14	#
	15	# test_expect_success ...
	16	#
	17	# stop_httpd
	18	# test_done
	19	#
	20	# Can be configured using the following variables.
	21	#
	22	# GIT_TEST_HTTPD enable HTTPD tests
	23	# LIB_HTTPD_PATH web server path
	24	# LIB_HTTPD_MODULE_PATH web server modules path
	25	# LIB_HTTPD_PORT listening port
	26	# LIB_HTTPD_DAV enable DAV
a8a5d251	27	# LIB_HTTPD_SVN enable SVN at given location (e.g. "svn")
c74c7203	28	# LIB_HTTPD_SSL enable SSL
faa4bc35 CB	29	#
	30	# Copyright (c) 2008 Clemens Buchacher <drizzd@aon.at>
	31	#
	32
c9d441a8 JK	33	if test -n "$NO_CURL"
	34	then
	35	skip_all='skipping test, git built without http support'
	36	test_done
	37	fi
	38
309a9e33 JH	39	if test -n "$NO_EXPAT" && test -n "$LIB_HTTPD_DAV"
	40	then
	41	skip_all='skipping test, git built without expat support'
	42	test_done
	43	fi
	44
83d842dc JK	45	test_tristate GIT_TEST_HTTPD
83d842dc JK	46	if test "$GIT_TEST_HTTPD" = false
faa4bc35	47	then
83d842dc	48	skip_all="Network testing disabled (unset GIT_TEST_HTTPD to enable)"
faa4bc35	49	test_done
faa4bc35 CB	50	fi
faa4bc35 CB	51
1767c517	52	if ! test_have_prereq NOT_ROOT; then
a1a30111 JK	53	test_skip_or_die $GIT_TEST_HTTPD \
	54	"Cannot run httpd tests as root"
	55	fi
	56
69707d61 JS	57	HTTPD_PARA=""
69707d61 JS	58
0d344738 TC	59	for DEFAULT_HTTPD_PATH in '/usr/sbin/httpd' '/usr/sbin/apache2'
	60	do
	61	if test -x "$DEFAULT_HTTPD_PATH"
	62	then
	63	break
	64	fi
	65	done
	66
	67	for DEFAULT_HTTPD_MODULE_PATH in '/usr/libexec/apache2' \
	68	'/usr/lib/apache2/modules' \
	69	'/usr/lib64/httpd/modules' \
	70	'/usr/lib/httpd/modules'
	71	do
	72	if test -d "$DEFAULT_HTTPD_MODULE_PATH"
	73	then
	74	break
	75	fi
	76	done
	77
69707d61 JS	78	case $(uname) in
69707d61 JS	79	Darwin)
69707d61 JS	80	HTTPD_PARA="$HTTPD_PARA -DDarwin"
69707d61 JS	81	;;
69707d61 JS	82	esac
	83
	84	LIB_HTTPD_PATH=${LIB_HTTPD_PATH-"$DEFAULT_HTTPD_PATH"}
fa840581	85	test_set_port LIB_HTTPD_PORT
faa4bc35	86
bfdbee98	87	TEST_PATH="$TEST_DIRECTORY"/lib-httpd
faa4bc35 CB	88	HTTPD_ROOT_PATH="$PWD"/httpd
	89	HTTPD_DOCUMENT_ROOT_PATH=$HTTPD_ROOT_PATH/www
	90
f6288254 JK	91	# hack to suppress apache PassEnv warnings
	92	GIT_VALGRIND=$GIT_VALGRIND; export GIT_VALGRIND
	93	GIT_VALGRIND_OPTIONS=$GIT_VALGRIND_OPTIONS; export GIT_VALGRIND_OPTIONS
89c57ab3	94	GIT_TRACE=$GIT_TRACE; export GIT_TRACE
f6288254	95
faa4bc35 CB	96	if ! test -x "$LIB_HTTPD_PATH"
faa4bc35 CB	97	then
83d842dc	98	test_skip_or_die $GIT_TEST_HTTPD "no web server found at '$LIB_HTTPD_PATH'"
faa4bc35 CB	99	fi
faa4bc35 CB	100
e429dfd5 EP	101	HTTPD_VERSION=$($LIB_HTTPD_PATH -v \| \
e429dfd5 EP	102	sed -n 's/^Server version: Apache\/\([0-9]\)\..$/\1/p; q')
faa4bc35 CB	103
	104	if test -n "$HTTPD_VERSION"
	105	then
	106	if test -z "$LIB_HTTPD_MODULE_PATH"
	107	then
	108	if ! test $HTTPD_VERSION -ge 2
	109	then
83d842dc JK	110	test_skip_or_die $GIT_TEST_HTTPD \
83d842dc JK	111	"at least Apache version 2 is required"
faa4bc35	112	fi
0d344738 TC	113	if ! test -d "$DEFAULT_HTTPD_MODULE_PATH"
0d344738 TC	114	then
83d842dc JK	115	test_skip_or_die $GIT_TEST_HTTPD \
83d842dc JK	116	"Apache module directory not found"
0d344738	117	fi
faa4bc35	118
69707d61	119	LIB_HTTPD_MODULE_PATH="$DEFAULT_HTTPD_MODULE_PATH"
faa4bc35 CB	120	fi
faa4bc35 CB	121	else
83d842dc JK	122	test_skip_or_die $GIT_TEST_HTTPD \
83d842dc JK	123	"Could not identify web server at '$LIB_HTTPD_PATH'"
faa4bc35 CB	124	fi
faa4bc35 CB	125
c7db2d16 JK	126	install_script () {
	127	write_script "$HTTPD_ROOT_PATH/$1" <"$TEST_PATH/$1"
	128	}
	129
faa4bc35	130	prepare_httpd() {
13b5481e	131	mkdir -p "$HTTPD_DOCUMENT_ROOT_PATH"
3cf8fe1d	132	cp "$TEST_PATH"/passwd "$HTTPD_ROOT_PATH"
c7db2d16	133	install_script broken-smart-http.sh
dbcf2bd3	134	install_script error.sh
3374292e	135	install_script apply-one-time-sed.sh
faa4bc35	136
13b5481e	137	ln -s "$LIB_HTTPD_MODULE_PATH" "$HTTPD_ROOT_PATH/modules"
faa4bc35 CB	138
	139	if test -n "$LIB_HTTPD_SSL"
	140	then
5232586c	141	HTTPD_PROTO=https
faa4bc35 CB	142
faa4bc35 CB	143	RANDFILE_PATH="$HTTPD_ROOT_PATH"/.rnd openssl req \
13b5481e	144	-config "$TEST_PATH/ssl.cnf" \
faa4bc35	145	-new -x509 -nodes \
13b5481e MH	146	-out "$HTTPD_ROOT_PATH/httpd.pem" \
13b5481e MH	147	-keyout "$HTTPD_ROOT_PATH/httpd.pem"
0e46e704 BD	148	GIT_SSL_NO_VERIFY=t
0e46e704 BD	149	export GIT_SSL_NO_VERIFY
faa4bc35 CB	150	HTTPD_PARA="$HTTPD_PARA -DSSL"
faa4bc35 CB	151	else
5232586c	152	HTTPD_PROTO=http
faa4bc35	153	fi
5232586c JK	154	HTTPD_DEST=127.0.0.1:$LIB_HTTPD_PORT
	155	HTTPD_URL=$HTTPD_PROTO://$HTTPD_DEST
	156	HTTPD_URL_USER=$HTTPD_PROTO://user%40host@$HTTPD_DEST
afbf5ca5	157	HTTPD_URL_USER_PASS=$HTTPD_PROTO://user%40host:pass%40host@$HTTPD_DEST
faa4bc35	158
ce5dadb6	159	if test -n "$LIB_HTTPD_DAV" \|\| test -n "$LIB_HTTPD_SVN"
faa4bc35 CB	160	then
	161	HTTPD_PARA="$HTTPD_PARA -DDAV"
	162
	163	if test -n "$LIB_HTTPD_SVN"
	164	then
	165	HTTPD_PARA="$HTTPD_PARA -DSVN"
a8a5d251 EW	166	LIB_HTTPD_SVNPATH="$rawsvnrepo"
	167	svnrepo="http://127.0.0.1:$LIB_HTTPD_PORT/"
	168	svnrepo="$svnrepo$LIB_HTTPD_SVN"
	169	export LIB_HTTPD_SVN LIB_HTTPD_SVNPATH
faa4bc35 CB	170	fi
	171	fi
	172	}
	173
	174	start_httpd() {
75318a3b	175	prepare_httpd >&3 2>&4
faa4bc35	176
a5adcbe3	177	trap 'code=$?; stop_httpd; (exit $code); die' EXIT
faa4bc35	178
13b5481e MH	179	"$LIB_HTTPD_PATH" -d "$HTTPD_ROOT_PATH" \
13b5481e MH	180	-f "$TEST_PATH/apache.conf" $HTTPD_PARA \
75318a3b JK	181	-c "Listen 127.0.0.1:$LIB_HTTPD_PORT" -k start \
75318a3b JK	182	>&3 2>&4
a5adcbe3 CB	183	if test $? -ne 0
a5adcbe3 CB	184	then
a5adcbe3	185	trap 'die' EXIT
44f243d3	186	cat "$HTTPD_ROOT_PATH"/error.log >&4 2>/dev/null
83d842dc	187	test_skip_or_die $GIT_TEST_HTTPD "web server setup failed"
75318a3b	188	fi
faa4bc35 CB	189	}
	190
	191	stop_httpd() {
35641310	192	trap 'die' EXIT
faa4bc35	193
13b5481e	194	"$LIB_HTTPD_PATH" -d "$HTTPD_ROOT_PATH" \
69707d61	195	-f "$TEST_PATH/apache.conf" $HTTPD_PARA -k stop
faa4bc35	196	}
6cbd6e92	197
05c1eb10	198	test_http_push_nonff () {
6cbd6e92 TRC	199	REMOTE_REPO=$1
	200	LOCAL_REPO=$2
	201	BRANCH=$3
05c1eb10	202	EXPECT_CAS_RESULT=${4-failure}
6cbd6e92 TRC	203
	204	test_expect_success 'non-fast-forward push fails' '
	205	cd "$REMOTE_REPO" &&
	206	HEAD=$(git rev-parse --verify HEAD) &&
	207
	208	cd "$LOCAL_REPO" &&
	209	git checkout $BRANCH &&
	210	echo "changed" > path2 &&
	211	git commit -a -m path2 --amend &&
	212
77b5be2a	213	test_must_fail git push -v origin >output 2>&1 &&
6cbd6e92 TRC	214	(cd "$REMOTE_REPO" &&
	215	test $HEAD = $(git rev-parse --verify HEAD))
	216	'
	217
	218	test_expect_success 'non-fast-forward push show ref status' '
	219	grep "^ ! \[rejected\][ ]*$BRANCH -> $BRANCH (non-fast-forward)$" output
	220	'
	221
d3bd0425	222	test_expect_success 'non-fast-forward push shows help message' '
0aff719f	223	test_i18ngrep "Updates were rejected because" output
6cbd6e92	224	'
e69fa70f	225
42aa29ee	226	test_expect_${EXPECT_CAS_RESULT} 'force with lease aka cas' '
e69fa70f JH	227	HEAD=$( cd "$REMOTE_REPO" && git rev-parse --verify HEAD ) &&
	228	test_when_finished '\''
	229	(cd "$REMOTE_REPO" && git update-ref HEAD "$HEAD")
	230	'\'' &&
	231	(
	232	cd "$LOCAL_REPO" &&
	233	git push -v --force-with-lease=$BRANCH:$HEAD origin
	234	) &&
	235	git rev-parse --verify "$BRANCH" >expect &&
	236	(
	237	cd "$REMOTE_REPO" && git rev-parse --verify HEAD
	238	) >actual &&
	239	test_cmp expect actual
	240	'
6cbd6e92	241	}
e837936c JK	242
	243	setup_askpass_helper() {
	244	test_expect_success 'setup askpass helper' '
	245	write_script "$TRASH_DIRECTORY/askpass" <<-\EOF &&
	246	echo >>"$TRASH_DIRECTORY/askpass-query" "askpass: $*" &&
afbf5ca5 JK	247	case "$*" in
	248	Username)
	249	what=user
	250	;;
	251	Password)
	252	what=pass
	253	;;
	254	esac &&
	255	cat "$TRASH_DIRECTORY/askpass-$what"
e837936c JK	256	EOF
	257	GIT_ASKPASS="$TRASH_DIRECTORY/askpass" &&
	258	export GIT_ASKPASS &&
	259	export TRASH_DIRECTORY
	260	'
	261	}
	262
	263	set_askpass() {
	264	>"$TRASH_DIRECTORY/askpass-query" &&
afbf5ca5 JK	265	echo "$1" >"$TRASH_DIRECTORY/askpass-user" &&
afbf5ca5 JK	266	echo "$2" >"$TRASH_DIRECTORY/askpass-pass"
e837936c JK	267	}
	268
	269	expect_askpass() {
050ef365 JK	270	dest=$HTTPD_DEST${3+/$3}
050ef365 JK	271
e837936c JK	272	{
	273	case "$1" in
	274	none)
	275	;;
	276	pass)
	277	echo "askpass: Password for 'http://$2@$dest': "
	278	;;
	279	both)
	280	echo "askpass: Username for 'http://$dest': "
	281	echo "askpass: Password for 'http://$2@$dest': "
	282	;;
	283	*)
	284	false
	285	;;
	286	esac
	287	} >"$TRASH_DIRECTORY/askpass-expect" &&
	288	test_cmp "$TRASH_DIRECTORY/askpass-expect" \
	289	"$TRASH_DIRECTORY/askpass-query"
	290	}
6940a060 SG	291
	292	strip_access_log() {
	293	sed -e "
	294	s/^.* \"//
	295	s/\"//
	296	s/ [1-9][0-9]*\$//
	297	s/^GET /GET /
	298	" "$HTTPD_ROOT_PATH"/access.log
	299	}
e8b3b2e2 SG	300
	301	# Requires one argument: the name of a file containing the expected stripped
	302	# access log entries.
	303	check_access_log() {
	304	sort "$1" >"$1".sorted &&
	305	strip_access_log >access.log.stripped &&
	306	sort access.log.stripped >access.log.sorted &&
	307	if ! test_cmp "$1".sorted access.log.sorted
	308	then
	309	test_cmp "$1" access.log.stripped
	310	fi
	311	}