URL
https://opencores.org/ocsvn/bluespec-h264/bluespec-h264/trunk
Subversion Repositories bluespec-h264
Compare Revisions
- This comparison shows the changes necessary to convert path
/
- from Rev 17 to Rev 18
- ↔ Reverse comparison
Rev 17 → Rev 18
/trunk/test/test.pl
1,?rev1len? → 30,?rev2len?
#fill this in at some point |
|
#build the code. |
|
`cp ../build/Makefile ./`; |
$str = `ls`; |
print $str; |
# build the test executable. |
`make && bsc -sim -e mkTH *.ba`; |
|
# build the golden decoder |
`cd ./decoder/ldecod && make`; |
|
@h264files = `ls ./h264`; |
|
foreach(@h264files) |
{ |
chomp($_); |
|
print $_; |
`cp ./h264/$_ input.264`; |
system("wc input.264 | awk \'{printf(\"%08x\\n%08x\\n%08x\\n%08x\\n\", \$3, \$3, \$3, \$3)}\' > input_size.hex"); |
`perl hexfilegen.pl input.264`; |
system("./a.out | grep \"OUT\" | awk \'{print \$2}\' > out.hex"); |
`perl dehex.pl out.hex out_hw.yuv`; |
`./decoder/bin/ldecod.exe -i input.264 -o out_gold.yuv`; |
$out=`diff -q out_gold.yuv out_hw.yuv`; |
print $out; |
} |
|