OpenCores
URL https://opencores.org/ocsvn/bluespec-h264/bluespec-h264/trunk

Subversion Repositories bluespec-h264

[/] [bluespec-h264/] [trunk/] [test/] [test.pl] - Diff between revs 14 and 18

Go to most recent revision | Show entire file | Details | Blame | View Log

Rev 14 Rev 18
Line 1... Line 1...
#fill this in at some point
#fill this in at some point
 
 
 No newline at end of file
 No newline at end of file
 
#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;
 
}
 
 
 
 
 No newline at end of file
 No newline at end of file

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.