mirror of https://github.com/openXC7/prjxray.git
Add switchboxes minitests
Signed-off-by: Clifford Wolf <clifford@clifford.at> Signed-off-by: Tim 'mithro' Ansell <mithro@mithis.com>
This commit is contained in:
parent
35f2c24dd3
commit
2fc2c0274d
|
|
@ -0,0 +1,7 @@
|
|||
/.Xil/
|
||||
/vivado*
|
||||
/design/
|
||||
/design.dcp
|
||||
/design.bit
|
||||
/CLBLL_L_X12Y119.txt
|
||||
/INT_L_X12Y119.txt
|
||||
|
|
@ -0,0 +1,84 @@
|
|||
create_project -force -part $::env(XRAY_PART) design design
|
||||
|
||||
read_verilog top.v
|
||||
synth_design -top top
|
||||
|
||||
set_property -dict "PACKAGE_PIN $::env(XRAY_PIN_00) IOSTANDARD LVCMOS33" [get_ports a]
|
||||
set_property -dict "PACKAGE_PIN $::env(XRAY_PIN_01) IOSTANDARD LVCMOS33" [get_ports b]
|
||||
set_property -dict "PACKAGE_PIN $::env(XRAY_PIN_02) IOSTANDARD LVCMOS33" [get_ports c]
|
||||
set_property -dict "PACKAGE_PIN $::env(XRAY_PIN_03) IOSTANDARD LVCMOS33" [get_ports x]
|
||||
set_property -dict "PACKAGE_PIN $::env(XRAY_PIN_04) IOSTANDARD LVCMOS33" [get_ports y]
|
||||
set_property -dict "PACKAGE_PIN $::env(XRAY_PIN_05) IOSTANDARD LVCMOS33" [get_ports z]
|
||||
|
||||
set_property CFGBVS VCCO [current_design]
|
||||
set_property CONFIG_VOLTAGE 3.3 [current_design]
|
||||
set_property BITSTREAM.GENERAL.PERFRAMECRC YES [current_design]
|
||||
|
||||
place_design
|
||||
route_design
|
||||
|
||||
write_checkpoint -force design.dcp
|
||||
# write_bitstream -force design.bit
|
||||
|
||||
proc tile_pip_report {fd tile_name} {
|
||||
set tile [get_tile $tile_name]
|
||||
set pips [get_pips -of_object $tile]
|
||||
set dsts [lsort -unique [get_wires -filter "TILE_NAME == $tile" -downhill -of_objects $pips]]
|
||||
|
||||
puts $fd ""
|
||||
puts $fd "PIP Report for tile $tile"
|
||||
puts $fd "==================================="
|
||||
|
||||
puts $fd ""
|
||||
puts $fd "PIPs that implement 1:1 connections"
|
||||
puts $fd "-----------------------------------"
|
||||
|
||||
foreach dst $dsts {
|
||||
set dst_node [get_node -of_objects $dst]
|
||||
set dst_span [llength [get_tiles -of_objects $dst_node]]
|
||||
set pips [get_pips -filter "TILE == $tile" -uphill -of_objects $dst_node]
|
||||
if {[llength $pips] == 1} {
|
||||
puts $fd ""
|
||||
puts $fd "Destination Wire (Node, Span): $dst ($dst_node, $dst_span)"
|
||||
foreach pip $pips {
|
||||
set src [get_wires -uphill -of_objects $pip]
|
||||
set src_node [get_node -of_objects $src]
|
||||
set src_span [llength [get_tiles -of_objects $src_node]]
|
||||
puts $fd " Source Wire (Node, Span): $src ($src_node, $src_span) via $pip"
|
||||
}
|
||||
foreach pip [get_pips -filter "TILE != $tile" -uphill -of_objects $dst_node] {
|
||||
puts $fd " Outside Source PIP: $pip"
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
puts $fd ""
|
||||
puts $fd "PIPs that implement N:1 connections"
|
||||
puts $fd "-----------------------------------"
|
||||
|
||||
foreach dst $dsts {
|
||||
set dst_node [get_node -of_objects $dst]
|
||||
set dst_span [llength [get_tiles -of_objects $dst_node]]
|
||||
set pips [get_pips -filter "TILE == $tile" -uphill -of_objects $dst_node]
|
||||
if {[llength $pips] != 1} {
|
||||
puts $fd ""
|
||||
puts $fd "Destination Wire (Node, Span): $dst ($dst_node, $dst_span)"
|
||||
foreach pip $pips {
|
||||
set src [get_wires -uphill -of_objects $pip]
|
||||
set src_node [get_node -of_objects $src]
|
||||
set src_span [llength [get_tiles -of_objects $src_node]]
|
||||
puts $fd " Source Wire (Node, Span): $src ($src_node, $src_span) via $pip"
|
||||
}
|
||||
foreach pip [get_pips -filter "TILE != $tile" -uphill -of_objects $dst_node] {
|
||||
puts $fd " Outside Source PIP: $pip"
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
puts $fd ""
|
||||
puts $fd ""
|
||||
}
|
||||
|
||||
tile_pip_report [open "CLBLL_L_X12Y119.txt" w] CLBLL_L_X12Y119
|
||||
tile_pip_report [open "INT_L_X12Y119.txt" w] INT_L_X12Y119
|
||||
|
||||
|
|
@ -0,0 +1,3 @@
|
|||
module top (input a, b, c, output x, y, z);
|
||||
assign x = a, y = b, z = c;
|
||||
endmodule
|
||||
Loading…
Reference in New Issue