| Line 106... |
Line 106... |
$slave[$slaves]{"baseadr3"}="00000000";
|
$slave[$slaves]{"baseadr3"}="00000000";
|
$slave[$slaves]{"size3"}="ffffffff";
|
$slave[$slaves]{"size3"}="ffffffff";
|
};
|
};
|
|
|
sub read_defines {
|
sub read_defines {
|
|
$priority=0;
|
open(FILE,"<$_[0]") or die "could not read from $file";
|
open(FILE,"<$_[0]") or die "could not read from $file";
|
while($a = <FILE>)
|
while($a = <FILE>)
|
{
|
{
|
if ($a =~ /^(syscon|intercon|filename)( *)(=)( *)([a-zA-Z0-9_\/\.]+)(;?)$/) {
|
if ($a =~ /^(syscon|intercon|filename)( *)(=)( *)([a-zA-Z0-9_\/\.]+)(;?)$/) {
|
if($1 eq "syscon") { $syscon = $5; }
|
if($1 eq "syscon") { $syscon = $5; }
|
| Line 173... |
Line 174... |
if (($2 eq "tgc_o") && ($7 eq 1)) {
|
if (($2 eq "tgc_o") && ($7 eq 1)) {
|
$tgc_o++; };
|
$tgc_o++; };
|
if (($2 eq "tga_o") && ($7 eq 1)) {
|
if (($2 eq "tga_o") && ($7 eq 1)) {
|
$tga_o++; };
|
$tga_o++; };
|
# priority for shared bus system
|
# priority for shared bus system
|
# if ($2 eq "priority") {
|
if ($2 eq "priority") {
|
# $priority += $7; };
|
$priority += $7; };
|
}; #end if
|
}; #end if
|
if ($a =~ /^( *)(type)( *)(=)( *)(ro|wo|rw)(;?)($*)/) {
|
if ($a =~ /^( *)(type)( *)(=)( *)(ro|wo|rw)(;?)($*)/) {
|
$master[$masters]{"$2"}=$6; };
|
$master[$masters]{"$2"}=$6; };
|
# priority for crossbarswitch
|
# priority for crossbarswitch
|
if ($a =~ /^( *)(priority)(_)([0-9a-zA-Z_]*)( *)(=)( *)([0-9]*)(;?)($*)/) {
|
if ($a =~ /^( *)(priority)(_)([0-9a-zA-Z_]*)( *)(=)( *)([0-9]*)(;?)($*)/) {
|
| Line 210... |
Line 211... |
$a = <FILE>;
|
$a = <FILE>;
|
};
|
};
|
};
|
};
|
}; #end while
|
}; #end while
|
close($_[0]);
|
close($_[0]);
|
$priority = 0;
|
#$priority = 0;
|
if ($interconnect eq "sharedbus") {
|
#if ($interconnect eq "sharedbus") {
|
for ($i=1; $i le $masters; $i++) {
|
# for ($i=1; $i le $masters; $i++) {
|
$priority += $master[$i]{"priority"};
|
# $priority = $priority + $master[$i]{"priority"};
|
};
|
# };
|
};
|
#};
|
}; #end sub
|
}; #end sub
|
|
|
################################################################################
|
################################################################################
|
# GUI
|
# GUI
|
|
|
| Line 2003... |
Line 2004... |
$infile=$tmp;
|
$infile=$tmp;
|
read_defines($infile);
|
read_defines($infile);
|
};
|
};
|
gui_fsm;
|
gui_fsm;
|
generate_defines($infile);
|
generate_defines($infile);
|
|
read_defines($infile);
|
};
|
};
|
|
|
# main
|
# main
|
open(OUTFILE,">$outfile$ext") or die "could not write to $outfile$ext";
|
open(OUTFILE,">$outfile$ext") or die "could not write to $outfile$ext";
|
gen_header;
|
gen_header;
|
