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
8 FILES
=$
(sed -n 's/^[^#]*<Stream \(.*\)>.*/\1/p' $2 |
grep -v html
)
11 .
/ffserver
-d -f "$2" 2> /dev
/null
&
13 echo "Waiting for feeds to startup..."
16 cd tests
/data ||
exit $?
17 rm -f ff-
* ffserver.regression
18 WGET_OPTIONS
="--user-agent=NSPlayer -q --proxy=off -e verbose=off -e server_response=off"
19 for file in $FILES; do
20 if [ $
(expr $file : "a-*") != 0 ]; then
21 wget
$WGET_OPTIONS -O - http
://localhost
:9999/$file > ff-
$file
23 wget
$WGET_OPTIONS -O - http
://localhost
:9999/$file?
date=19700101T000000Z |
dd bs
=1 count
=20000 > ff-
$file 2>/dev
/null
25 do_md5sum ff-
$file >>ffserver.regression
31 if diff -u "$1" tests
/data
/ffserver.regression
; then
33 echo Server regression
test succeeded.
37 echo Server regression
test: Error.