jtag axi脚本

斐非韭

于 2024-07-03 14:09:48 发布

阅读量120

点赞数 1

分类专栏： FPGA 文章标签： fpga开发

本文链接：https://blog.csdn.net/weixin_39060517/article/details/140150768

版权

FPGA 专栏收录该内容

117 篇文章 3 订阅

订阅专栏

jtag axi脚本

#适用axi-lite
#**************W/R CONTROL**************
set data_list ""
set num 1

proc ReadReg { address } {
global data_list
global num
create_hw_axi_txn read_txn [get_hw_axis hw_axi_1] -address $address -type read
run_hw_axi  read_txn
set read_value [lindex [report_hw_axi_txn  read_txn] 1];
append data_list [format %3i $num] 
append data_list [format %3s r]
append data_list [format %10s $address]
append data_list [format "%10s\n" $read_value]
delete_hw_axi_txn read_txn
incr num
set tmp 0x
append tmp $read_value
return $tmp
}

proc WriteReg { address data } {
global data_list
global num
create_hw_axi_txn write_txn [get_hw_axis hw_axi_1] -address $address -data $data -type write
run_hw_axi  write_txn
set write_value [lindex [report_hw_axi_txn  write_txn] 1];
append data_list [format %3i $num] 
append data_list [format %3s w]
append data_list [format %10s $address]
append data_list [format "%10s\n" $write_value]
delete_hw_axi_txn write_txn
incr num
}


#**************USER**************
WriteReg 00000000 12345678
if {[ReadReg 00000000] == 0x00005678} {
  puts "**************\n\
  write success!\n\
  **************\n"
} else {
  puts "**************\n\
  write success!\n\
  **************\n"
}


ReadReg 00000000 
ReadReg 00000004 
ReadReg 00000008 
ReadReg 0000000c 
ReadReg 00000010 
ReadReg 00000014 
ReadReg 00000018
ReadReg 0000001c
ReadReg 00000020 
ReadReg 00001020 
ReadReg 00002020
WriteReg 00002020 55aa55aa
ReadReg 00002020
ReadReg 0000201c
WriteReg 0000201c 55aa66bb
ReadReg 0000201c
ReadReg 00008020  

ReadReg 00022414

#**************IO CONTROL**************
set currentTime [clock seconds]
set ctime "The time is: \
[clock format $currentTime -format %D] \
[clock format $currentTime -format  %H:%M:%S] \n"
#需编辑自定义文件路径
set file_name "./data.txt" 
set fp [open $file_name a+] 
puts $fp $ctime
puts $fp $data_list
close $fp
set fp [open $file_name r]
set file_data [read $fp]
puts $file_data
close $fp