URL
https://opencores.org/ocsvn/bluespec-h264/bluespec-h264/trunk
Go to most recent revision |
Only display areas with differences |
Details |
Blame |
View Log
Rev 18 |
Rev 28 |
#fill this in at some point
|
#fill this in at some point
|
|
|
#build the code.
|
#build the code.
|
|
|
`cp ../build/Makefile ./`;
|
`cp ../build/Makefile ./`;
|
$str = `ls`;
|
$str = `ls`;
|
print $str;
|
print $str;
|
# build the test executable.
|
# build the test executable.
|
`make && bsc -sim -e mkTH *.ba`;
|
`make && bsc -sim -e mkTH *.ba`;
|
|
|
# build the golden decoder
|
# build the golden decoder
|
`cd ./decoder/ldecod && make`;
|
`cd ./decoder/ldecod && make`;
|
|
|
@h264files = `ls ./h264`;
|
@h264files = `ls ./h264`;
|
|
|
foreach(@h264files)
|
foreach(@h264files)
|
{
|
{
|
chomp($_);
|
chomp($_);
|
|
|
print $_;
|
print $_;
|
|
print " ";
|
`cp ./h264/$_ input.264`;
|
`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");
|
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`;
|
`perl hexfilegen.pl input.264`;
|
system("./a.out | grep \"OUT\" | awk \'{print \$2}\' > out.hex");
|
system("./a.out | grep \"OUT\" | awk \'{print \$2}\' > out.hex");
|
`perl dehex.pl out.hex out_hw.yuv`;
|
`perl dehex.pl out.hex out_hw.yuv`;
|
`./decoder/bin/ldecod.exe -i input.264 -o out_gold.yuv`;
|
`./decoder/bin/ldecod.exe -i input.264 -o out_gold.yuv`;
|
$out=`diff -q out_gold.yuv out_hw.yuv`;
|
$out=`diff -q out_gold.yuv out_hw.yuv`;
|
print $out;
|
print $out;
|
|
print "\n";
|
}
|
}
|
|
|
|
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.