2 # bluenrg-1/2 devices support only SWD transports.
5 source [find target/swj-dp.tcl]
7 if { [info exists CHIPNAME] } {
8 set _CHIPNAME $CHIPNAME
10 set _CHIPNAME bluenrg-1
15 # Work-area is a space in RAM used for flash programming
16 # By default use 24kB-256bytes
17 if { [info exists WORKAREASIZE] } {
18 set _WORKAREASIZE $WORKAREASIZE
20 set _WORKAREASIZE 0x5F00
25 if { [info exists CPUTAPID] } {
26 set _CPUTAPID $CPUTAPID
28 set _CPUTAPID 0x0bb11477
31 swj_newdap $_CHIPNAME cpu -expected-id $_CPUTAPID
32 dap create $_CHIPNAME.dap -chain-position $_CHIPNAME.cpu
34 set _TARGETNAME $_CHIPNAME.cpu
38 target create $_TARGETNAME cortex_m -endian $_ENDIAN -dap $_CHIPNAME.dap
40 $_TARGETNAME configure -work-area-phys 0x20000100 -work-area-size $_WORKAREASIZE -work-area-backup 0
42 # flash size will be probed
43 set _FLASHNAME $_CHIPNAME.flash
44 flash bank $_FLASHNAME bluenrg-x 0 0 0 0 $_TARGETNAME
46 # In BlueNRG-X reset pin is actually a shutdown (power-off), so define reset as none
50 # if srst is not fitted use SYSRESETREQ to
51 # perform a soft reset
52 cortex_m reset_config sysresetreq
55 $_TARGETNAME configure -event halted {
58 # Stop watchdog during halt, if enabled
59 mem2array value 32 0x40700008 1
60 set WDOG_VALUE [expr ($value(0))]
61 if [expr ($value(0) & (1 << 1))] {
63 mww 0x40700008 [expr ($value(0) & 0xFFFFFFFD)]
66 $_TARGETNAME configure -event resumed {
69 if [expr $WDOG_VALUE_SET] {
70 # Restore watchdog enable value after resume
71 mww 0x40700008 $WDOG_VALUE