be0d68eb66
Replace deprecated commands 'mem2array' and 'array2mem' with new Tcl commands 'read_memory' and 'write_memory'. Change-Id: I116d995995396133ca782b14cce02bd1ab917a4e Signed-off-by: Marc Schink <dev@zapb.de> Reviewed-on: https://review.openocd.org/c/openocd/+/6859 Tested-by: jenkins Reviewed-by: Antonio Borneo <borneo.antonio@gmail.com>
46 lines
1.1 KiB
INI
46 lines
1.1 KiB
INI
#Hilscher netX 500 CPU
|
|
|
|
if { [info exists CHIPNAME] } {
|
|
set _CHIPNAME $CHIPNAME
|
|
} else {
|
|
set _CHIPNAME netx500
|
|
}
|
|
|
|
if { [info exists ENDIAN] } {
|
|
set _ENDIAN $ENDIAN
|
|
} else {
|
|
set _ENDIAN little
|
|
}
|
|
|
|
if { [info exists CPUTAPID] } {
|
|
set _CPUTAPID $CPUTAPID
|
|
} else {
|
|
set _CPUTAPID 0x07926021
|
|
}
|
|
|
|
# jtag scan chain
|
|
jtag newtap $_CHIPNAME cpu -irlen 4 -ircapture 0x1 -irmask 0xf -expected-id $_CPUTAPID
|
|
|
|
# that TAP is associated with a target
|
|
set _TARGETNAME $_CHIPNAME.cpu
|
|
target create $_TARGETNAME arm926ejs -endian $_ENDIAN -chain-position $_TARGETNAME
|
|
|
|
proc mread32 {addr} {
|
|
return [read_memory $addr 32 1]
|
|
}
|
|
|
|
# This function must be called on netX100/500 right after halt
|
|
# If it is called later the needed register cannot be written anymore
|
|
proc sdram_fix { } {
|
|
|
|
set accesskey [mread32 0x00100070]
|
|
mww 0x00100070 $accesskey
|
|
mww 0x0010002c 0x00000001
|
|
|
|
if {[expr {[mread32 0x0010002c] & 0x07}] == 0x07} {
|
|
puts "SDRAM Fix was not executed. Probably your CPU halted too late and the register is already locked!"
|
|
} else {
|
|
puts "SDRAM Fix succeeded!"
|
|
}
|
|
}
|