ncVerilog 脚本 pl

blueeagle · 发表于 2012-1-16 11:31:37

还算实用

Andrei_Q · 发表于 2012-1-19 23:13:40

多谢楼主分享~~~~~

heyong · 发表于 2012-1-21 13:13:55

谢谢～～～～～～～～～～～～～～～～～～～～～～～～～～～

cc871004 · 发表于 2012-2-1 18:03:57

多谢分享

moremore50 · 发表于 2012-2-1 18:26:25

thanks

小小子 · 发表于 2012-3-9 22:35:25

怎么使用，请教！

ringcoolh · 发表于 2012-3-28 14:12:07

看看写的怎么样

bbcallpzx · 发表于 2012-4-10 16:33:26

#!/usr/local/bin/perl -w

use strict;
use Getopt:

ong;
#use vars qw ($para);
#use File::Copy;

#get options
my %options;
GetOptions(\%options, "help|h|?", "deb") || print_usage();
if(exists $options{help}){
  print_usage();
}

#tools paths
my $ncvlog = "/tools/cds/IUS/tools/bin/ncvlog";
my $ncelab = "/tools/cds/IUS/tools/bin/ncelab";
my $ncsim = "/tools/cds/IUS/tools/bin/ncsim";
#my $verdi = "/home/cf/eda/verdi2009/bin/verdi";
#my $novas = "/home/cf/eda/verdi2009/share/PLI/nc61/LINUX/nc_loadpli1/debpli.so";

#tools paths
#set ncvlog  /tools/cds/IUS/tools/bin/ncvlog
#set ncelab  /tools/cds/IUS/tools/bin/ncelab
#set ncsim /tools/cds/IUS/tools/bin/ncsim
#set $verdi = "/home/cf/eda/verdi2009/bin/verdi";
#set $novas = "/home/cf/eda/verdi2009/share/PLI/nc61/LINUX/nc_loadpli1/debpli.so";

#source files
my $srcfile = "";
$srcfile = "/home/dzx/dizhixiong/adder4.v";
$srcfile .= " /home/dzx/dizhixiong/adder4_tb.v";

#compile
system("$ncvlog -messages $srcfile");

#elab
system("$ncelab -messages -access +wrc -loadpli1 $novas:deb_PLIPtr  worklib.counter_tb:module");

#simulation
system("$ncsim -messages worklib.counter_tb:module");

#the following is sub functions
sub print_usage{
  print "Run scripts: $0\n";
  print "$0 [-help|h|?] [-deb]\n";
  die;
}

steven_1xbm · 发表于 2012-5-8 23:18:14

多谢分享！！！

steven_1xbm · 发表于 2012-5-15 23:23:21

多谢!

[资料] ncVerilog 脚本 pl

站长推荐 /1