zcy
/
pluto_hdl_adi
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

scripts/adi_fmc_constr_generator: Fix intel constr generation 

Signed-off-by: AndrDragomir <andrei.dragomir@analog.com>
main
AndrDragomir 2023-08-07 14:14:11 +03:00 committed by AndrDragomir
parent fa2d520bf0
commit e42877d337
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
projects/scripts/adi_fmc_constr_generator.tcl
View File

@ -260,7 +260,7 @@ proc gen_intel_fmc {fmc_index fmc_file constr_file} {
for {set k $current_index} {$k <= $i} {incr k} {
set col_e [join [lindex $line_e $k] " "]
set col_e [constrToIntel $line_e $col_e $k]
if {[string match "*[0]*" [lindex $col_e 3]] && ![string match "*(n)*" [lindex $col_e 3]]} {
if {[string match "*\[0\]*" [lindex $col_e 3]] && ![string match "*(n)*" [lindex $col_e 3]]} {
puts $constr_file "set_instance_assignment -name XCVR_VCCR_VCCT_VOLTAGE 1_0V -to [string map -nocase {[0] ""} [lindex $col_e 3]]"
}
}
@ -268,7 +268,7 @@ proc gen_intel_fmc {fmc_index fmc_file constr_file} {
for {set k $current_index} {$k <= $i} {incr k} {
set col_e [join [lindex $line_e $k] " "]
set col_e [constrToIntel $line_e $col_e $k]
if {[string match "*[0]*" [lindex $col_e 3]] && ![string match "*(n)*" [lindex $col_e 3]]} {
if {[string match "*\[0\]*" [lindex $col_e 3]] && ![string match "*(n)*" [lindex $col_e 3]]} {
set xcvrCount 0
puts $constr_file "set_instance_assignment -name IO_STANDARD \"HIGH SPEED DIFFERENTIAL I/O\" -to [string map -nocase {[0] ""} [lindex $col_e 3]]"
} else {incr xcvrCount}
@ -278,7 +278,7 @@ proc gen_intel_fmc {fmc_index fmc_file constr_file} {
for {set k $current_index} {$k <= $i} {incr k} {
set col_e [join [lindex $line_e $k] " "]
set col_e [constrToIntel $line_e $col_e $k]
if {[string match "*[0]*" [lindex $col_e 3]] && ![string match "*(n)*" [lindex $col_e 3]]} {
if {[string match "*\[0\]*" [lindex $col_e 3]] && ![string match "*(n)*" [lindex $col_e 3]]} {
if {[string match "*data_*" [lindex $col_e 3]]} {set xcvrType "xcvr_[string index [lindex $col_e 3] [expr [string last _ [lindex $col_e 3]] + 1]]_\$\{i\}"}
puts $constr_file " set_instance_assignment -name XCVR_RECONFIG_GROUP $xcvrType -to [string map -nocase {[0] \[\$\{i\}\]} [lindex $col_e 3]]"
}