intpips: generate print current tile number

Signed-off-by: John McMaster <johndmcmaster@gmail.com>
This commit is contained in:
John McMaster 2018-12-11 17:56:02 -08:00
parent 3d50e89dcd
commit 73da6c30ec
1 changed files with 7 additions and 2 deletions

View File

@ -32,8 +32,13 @@ proc write_txtdata {filename} {
puts "Writing $filename."
set fp [open $filename w]
set all_pips [lsort -unique [get_pips -of_objects [get_nets -hierarchical]]]
foreach tile [get_tiles [regsub -all {CLBL[LM]} [get_tiles -of_objects [get_sites -of_objects [get_pblocks roi]]] INT]] {
puts "Dumping pips from tile $tile"
# FIXME: getting IOB. Don't think this works correctly
set tiles [get_tiles [regsub -all {CLBL[LM]} [get_tiles -of_objects [get_sites -of_objects [get_pblocks roi]]] INT]]
set ntiles [llength $tiles]
set tilei 0
foreach tile $tiles {
incr tilei
puts "Dumping pips from tile $tile ($tilei / $ntiles)"
foreach pip [filter $all_pips "TILE == $tile"] {
set src_wire [get_wires -uphill -of_objects $pip]
set dst_wire [get_wires -downhill -of_objects $pip]