3 #perl -e 'chomp($wd = `pwd`); print map { s!tests/data/!!; "<Stream $_>\nFile $wd/tests/data/$_\n</Stream>\n\n" } @ARGV' tests/data/a* >> tests/data/ffserver.conf
4 #perl -e 'chomp($wd = `pwd`); print map { s!tests/data/!!; "<Stream $_.asf>\nFile $wd/tests/data/$_\n</Stream>\n\n" } @ARGV' tests/data/a* >> tests/data/ffserver.conf
6 FILES
=`sed -n 's/^[^#]*<Stream \(.*\)>.*/\1/p' $2 | grep -v html`
9 .
/ffserver
-d -f "$2" 2> /dev
/null
&
11 echo "Waiting for feeds to startup..."
14 cd tests
/data ||
exit $?
16 WGET_OPTIONS
="--user-agent=NSPlayer -q --proxy=off -e verbose=off -e server_response=off"
17 for file in $FILES; do
18 if [ `expr $file : "a-*"` != 0 ]; then
19 wget
$WGET_OPTIONS -O - http
://localhost
:9999/$file > ff-
$file
21 wget
$WGET_OPTIONS -O - http
://localhost
:9999/$file?
date=19700101T000000Z |
dd bs
=1 count
=20000 > ff-
$file 2>/dev
/null
23 MDFILES
="$MDFILES ff-$file"
26 # the status page is always different
27 md5sum $MDFILES > ffserver.regression
32 if diff -u tests
/data
/ffserver.regression
"$1" ; then
34 echo Server regression
test succeeded.
38 echo Server regression
test: Error.