riscv
/
OpenFPGA
mirror of https://github.com/lnis-uofu/OpenFPGA.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

update fpga_flow.pl

This commit is contained in:
tangxifan 2019-07-04 12:23:11 -06:00
parent 5a50fa84d1
commit c8ceb8f7d5
1 changed files with 11 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
fpga_flow/scripts/fpga_flow.pl
View File

@ -12,7 +12,7 @@ use Cwd;
use FileHandle; use FileHandle;
# Multi-thread support # Multi-thread support
use threads; use threads;
use threads::shared; #use threads::shared;
# Date # Date
my $mydate = gmctime(); my $mydate = gmctime();
@ -709,8 +709,6 @@ sub run_abc_fpgamap($ $ $)
# Get ABC path # Get ABC path
my ($abc_dir,$abc_name) = &split_prog_path($conf_ptr->{dir_path}->{abc_path}->{val}); my ($abc_dir,$abc_name) = &split_prog_path($conf_ptr->{dir_path}->{abc_path}->{val});
print "Entering $abc_dir\n";
chdir $abc_dir;
my ($lut_num) = $opt_ptr->{K_val}; my ($lut_num) = $opt_ptr->{K_val};
# Before we run this blif, identify it is a combinational or sequential # Before we run this blif, identify it is a combinational or sequential
my ($abc_seq_optimize) = (""); my ($abc_seq_optimize) = ("");
@ -738,6 +736,9 @@ sub run_abc_fpgamap($ $ $)
close($ABC_CMD_FH); close($ABC_CMD_FH);
# #
# Create a local copy for the commands # Create a local copy for the commands
#
print "Entering $abc_dir\n";
chdir $abc_dir;
system("./$abc_name -F $cmd_log > $log"); system("./$abc_name -F $cmd_log > $log");
@ -3211,7 +3212,13 @@ sub gen_csv_rpt_standard_flow($ $)
# Check log/stats one by one # Check log/stats one by one
foreach $tmp(@benchmark_names) { foreach $tmp(@benchmark_names) {
$tmp =~ s/\.blif$//g; $tmp =~ s/\.blif$//g;
print $CSVFH "$tmp";
if ("on" eq $opt_ptr->{matlab_rpt}) {
print $CSVFH "{'$tmp'}";
} else {
print $CSVFH "$tmp";
}
print $CSVFH ",$rpt_h{$tag}->{$tmp}->{$N_val}->{$K_val}->{LUTs}"; print $CSVFH ",$rpt_h{$tag}->{$tmp}->{$N_val}->{$K_val}->{LUTs}";
if ("on" eq $opt_ptr->{min_route_chan_width}) { if ("on" eq $opt_ptr->{min_route_chan_width}) {
print $CSVFH ",$rpt_h{$tag}->{$tmp}->{$N_val}->{$K_val}->{min_route_chan_width}"; print $CSVFH ",$rpt_h{$tag}->{$tmp}->{$N_val}->{$K_val}->{min_route_chan_width}";