uartns550 : added namespace for all HSI TCL commands.
Signed-off-by: Nava kishore Manne <navam@xilinx.com>
This commit is contained in:
parent
014d152c52
commit
e5049bd0a0
1 changed files with 26 additions and 27 deletions
|
@ -82,10 +82,10 @@ proc gen_include_files {swproj mhsinst} {
|
|||
return "xuartns550_l.h"
|
||||
}
|
||||
if {$swproj == 1} {
|
||||
set stdout [get_property CONFIG.STDOUT [get_os]]
|
||||
set stdout [get_property CONFIG.STDOUT [hsi::get_os]]
|
||||
set isStdout [string match $stdout $mhsinst]
|
||||
if {${isStdout} == 0} {
|
||||
set ifuartns550intr [::hsm::utils::is_ip_interrupting_current_proc $mhsinst]
|
||||
set ifuartns550intr [::hsi::utils::is_ip_interrupting_current_proc $mhsinst]
|
||||
if {$ifuartns550intr == 1} {
|
||||
set inc_file_lines {xuartns550_l.h uartns550_header.h xuartns550.h uartns550_intr_header.h}
|
||||
} else {
|
||||
|
@ -104,10 +104,10 @@ proc gen_src_files {swproj mhsinst} {
|
|||
return ""
|
||||
}
|
||||
if {$swproj == 1} {
|
||||
set stdout [get_property CONFIG.STDOUT [get_os]]
|
||||
set stdout [get_property CONFIG.STDOUT [hsi::get_os]]
|
||||
set isStdout [string match $stdout $mhsinst]
|
||||
if {${isStdout} == 0} {
|
||||
set ifuartns550intr [::hsm::utils::is_ip_interrupting_current_proc $mhsinst]
|
||||
set ifuartns550intr [::hsi::utils::is_ip_interrupting_current_proc $mhsinst]
|
||||
if {$ifuartns550intr == 1} {
|
||||
set inc_file_lines {examples/xuartns550_selftest_example.c examples/xuartns550_intr_example.c data/uartns550_header.h data/uartns550_intr_header.h}
|
||||
} else {
|
||||
|
@ -125,12 +125,12 @@ proc gen_testfunc_def {swproj mhsinst} {
|
|||
|
||||
proc gen_init_code {swproj mhsinst} {
|
||||
|
||||
set stdout [get_property CONFIG.STDOUT [get_os]]
|
||||
set stdout [get_property CONFIG.STDOUT [hsi::get_os]]
|
||||
set isStdout [string match $stdout $mhsinst]
|
||||
if {${isStdout} == 0} {
|
||||
if {$swproj == 1} {
|
||||
set ipname [get_property NAME $mhsinst]
|
||||
set ifuartns550intr [::hsm::utils::is_ip_interrupting_current_proc $mhsinst]
|
||||
set ifuartns550intr [::hsi::utils::is_ip_interrupting_current_proc $mhsinst]
|
||||
if {$ifuartns550intr == 1} {
|
||||
set decl " static XUartNs550 ${ipname}_UartNs550;"
|
||||
set inc_file_lines $decl
|
||||
|
@ -142,8 +142,8 @@ proc gen_init_code {swproj mhsinst} {
|
|||
return ""
|
||||
}
|
||||
|
||||
set clockhz [::hsm::utils::get_driver_param_name "XUartNs550" "CLOCK_HZ"]
|
||||
set baseaddr [::hsm::utils::get_ip_param_name $mhsinst "BASEADDR"]
|
||||
set clockhz [::hsi::utils::get_driver_param_name "XUartNs550" "CLOCK_HZ"]
|
||||
set baseaddr [::hsi::utils::get_ip_param_name $mhsinst "BASEADDR"]
|
||||
set ipname [get_property NAME $mhsinst]
|
||||
|
||||
append testfunc_call "
|
||||
|
@ -157,14 +157,14 @@ proc gen_init_code {swproj mhsinst} {
|
|||
proc gen_testfunc_call {swproj mhsinst} {
|
||||
|
||||
set ipname [get_property NAME $mhsinst]
|
||||
set ifuartns550intr [::hsm::utils::is_ip_interrupting_current_proc $mhsinst]
|
||||
set ifuartns550intr [::hsi::utils::is_ip_interrupting_current_proc $mhsinst]
|
||||
set testfunc_call ""
|
||||
|
||||
if {$swproj == 0} {
|
||||
return $testfunc_call
|
||||
}
|
||||
|
||||
set stdout [get_property CONFIG.STDOUT [get_os]]
|
||||
set stdout [get_property CONFIG.STDOUT [hsi::get_os]]
|
||||
set isStdout [string match $stdout $mhsinst]
|
||||
if {${isStdout} == 1} {
|
||||
append testfunc_call "
|
||||
|
@ -176,18 +176,18 @@ proc gen_testfunc_call {swproj mhsinst} {
|
|||
return $testfunc_call
|
||||
}
|
||||
|
||||
set deviceid [::hsm::utils::get_ip_param_name $mhsinst "DEVICE_ID"]
|
||||
set stdout [get_property CONFIG.STDOUT [get_os]]
|
||||
set deviceid [::hsi::utils::get_ip_param_name $mhsinst "DEVICE_ID"]
|
||||
set stdout [get_property CONFIG.STDOUT [hsi::get_os]]
|
||||
if { $stdout == "" || $stdout == "none" } {
|
||||
set hasStdout 0
|
||||
} else {
|
||||
set hasStdout 1
|
||||
}
|
||||
if {$ifuartns550intr == 1} {
|
||||
set intr_pin_name [get_pins -of_objects [get_cells $ipname] -filter "TYPE==INTERRUPT"]
|
||||
set intcname [::hsm::utils::get_connected_intr_cntrl $ipname $intr_pin_name]
|
||||
set intr_pin_name [hsi::get_pins -of_objects [hsi::get_cells $ipname] -filter "TYPE==INTERRUPT"]
|
||||
set intcname [::hsi::utils::get_connected_intr_cntrl $ipname $intr_pin_name]
|
||||
set intcvar intc
|
||||
set proc [get_property IP_NAME [get_cells [get_sw_processor]]]
|
||||
set proc [get_property IP_NAME [hsi::get_cells [hsi::get_sw_processor]]]
|
||||
}
|
||||
|
||||
if {${hasStdout} == 0} {
|
||||
|
@ -269,4 +269,3 @@ proc gen_testfunc_call {swproj mhsinst} {
|
|||
}
|
||||
return $testfunc_call
|
||||
}
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue