URL https://opencores.org/ocsvn/an-fpga-implementation-of-low-latency-noc-based-mpsoc/an-fpga-implementation-of-low-latency-noc-based-mpsoc/trunk

Subversion Repositories an-fpga-implementation-of-low-latency-noc-based-mpsoc

[/] [an-fpga-implementation-of-low-latency-noc-based-mpsoc/] [trunk/] [mpsoc/] [perl_gui/] [lib/] [perl/] [topology.pl] - Diff between revs 43 and 44

Rev 43	Rev 44
Line 185...	Line 185...
`if($topology eq '"FATTREE"' \|\| $topology eq '"TREE"') {`	`if($topology eq '"FATTREE"' \|\| $topology eq '"TREE"') {`
`return fattree_addrdecode($code, $T1, $T2);`	`return fattree_addrdecode($code, $T1, $T2);`
`}`	`}`
`else{`	`else{`
`my ($x, $y, $l) = mesh_tori_addr_sep($code,$T1, $T2,$T3);`	`my ($x, $y, $l) = mesh_tori_addr_sep($code,$T1, $T2,$T3);`
	`#print "my ($x, $y, $l) = mesh_tori_addr_sep($code,$T1, $T2,$T3);\n";`
`return (($y$T1)+$x)$T3+$l;`	`return (($y$T1)+$x)$T3+$l;`
`}`	`}`
`}`	`}`

`sub mask_gen{`	`sub mask_gen{`
Line 212...	Line 213...
`$x = $code & mask_gen($NX);`	`$x = $code & mask_gen($NX);`
`$code>>=$NXw;`	`$code>>=$NXw;`
`$y = $code & mask_gen($NY);`	`$y = $code & mask_gen($NY);`
`$code>>=$NYw;`	`$code>>=$NYw;`
`$l = $code;`	`$l = $code;`
	`return ($x, $y, $l);`
`}`	`}`

`sub mesh_tori_addrencode{`	`sub mesh_tori_addrencode{`
`my ($id,$T1, $T2,$T3)=@_;`	`my ($id,$T1, $T2,$T3)=@_;`
`my ($x,$y,$l)=mesh_tori_addrencod_sep($id,$T1,$T2,$T3);`	`my ($x,$y,$l)=mesh_tori_addrencod_sep($id,$T1,$T2,$T3);`