blob: 307df902c27fb73e98160e1c81f8a8a21497e88e (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
|
# SPDX-License-Identifier: GPL-2.0-or-later
#
# Nordic nRF53 series: dual ARM Cortex-M33, multidrop SWD
#
source [find target/swj-dp.tcl]
source [find mem_helper.tcl]
if { [info exists CHIPNAME] } {
set _CHIPNAME $CHIPNAME
} else {
set _CHIPNAME nrf53
}
# Work-area is a space in RAM used for flash programming
# By default use 16kB
if { [info exists WORKAREASIZE] } {
set _WORKAREASIZE $WORKAREASIZE
} else {
set _WORKAREASIZE 0x4000
}
if { [info exists CPUTAPID] } {
set _CPUTAPID $CPUTAPID
} else {
set _CPUTAPID 0x6ba02477
}
# Configurable instance ID resides in application UICR TINSTANCE
if { [info exists SWD_INSTANCE_ID] } {
set _SWD_INSTANCE_ID $SWD_INSTANCE_ID
} else {
set _SWD_INSTANCE_ID 0
}
swj_newdap $_CHIPNAME cpu -expected-id $_CPUTAPID
if { [info exists SWD_MULTIDROP] } {
dap create $_CHIPNAME.dap -chain-position $_CHIPNAME.cpu -dp-id 0x0070289 -instance-id $_SWD_INSTANCE_ID
} else {
dap create $_CHIPNAME.dap -chain-position $_CHIPNAME.cpu
}
set _TARGETNAME_APP $_CHIPNAME.cpuapp
target create $_TARGETNAME_APP cortex_m -dap $_CHIPNAME.dap
$_TARGETNAME_APP configure -work-area-phys 0x20000000 -work-area-size $_WORKAREASIZE -work-area-backup 0
# The network core is not accessible over HLA
if { ![using_hla] } {
set _TARGETNAME_NET $_CHIPNAME.cpunet
target create $_TARGETNAME_NET cortex_m -dap $_CHIPNAME.dap -ap-num 1 -defer-examine
targets $_TARGETNAME_APP
$_TARGETNAME_NET configure -work-area-phys 0x21000000 -work-area-size $_WORKAREASIZE -work-area-backup 0
}
# Keep adapter speed less or equal 2000 kHz or flash programming fails!
adapter speed 1000
source [find target/nrf_common.cfg]
flash bank $_CHIPNAME.app.flash nrf5 0x00000000 0 0 0 $_TARGETNAME_APP
flash bank $_CHIPNAME.app.uicr nrf5 0x00FF8000 0 0 0 $_TARGETNAME_APP
if { ![using_hla] } {
flash bank $_CHIPNAME.net.flash nrf5 0x01000000 0 0 0 $_TARGETNAME_NET
flash bank $_CHIPNAME.net.uicr nrf5 0x01FF8000 0 0 0 $_TARGETNAME_NET
# System reset sets NETWORK.FORCEOFF which keeps the network core in reset
# Don't touch network core during reset
$_TARGETNAME_NET configure -event reset-assert {}
# and start it after application core reset is finished to make all flash accessible
$_TARGETNAME_APP configure -event reset-init "nrf53_cpunet_release $_CHIPNAME"
$_TARGETNAME_APP cortex_m reset_config sysresetreq
$_TARGETNAME_NET cortex_m reset_config sysresetreq
$_TARGETNAME_APP configure -event examine-fail { _nrf_check_ap_lock 2 3 }
$_TARGETNAME_NET configure -event examine-fail { _nrf_check_ap_lock 3 3 }
$_TARGETNAME_NET configure -event gdb-attach "_nrf53_cpunet_gdb_attach $_CHIPNAME"
proc _nrf53_cpunet_gdb_attach { _CHIPNAME } {
set _TARGETNAME_APP $_CHIPNAME.cpuapp
set _TARGETNAME_NET $_CHIPNAME.cpunet
set RESET_NETWORK_FORCEOFF 0x50005614
set is_off [$_TARGETNAME_APP read_memory $RESET_NETWORK_FORCEOFF 32 1]
if { $is_off } {
nrf53_cpunet_release $_CHIPNAME
$_TARGETNAME_NET arp_poll
$_TARGETNAME_NET arp_waitstate halted 100
} else {
if { ![$_TARGETNAME_NET was_examined] } {
$_TARGETNAME_NET arp_examine
$_TARGETNAME_NET arp_poll
}
set s [$_TARGETNAME_NET curstate]
if { ![string compare $s "halted"] } {
halt
}
}
}
lappend _telnet_autocomplete_skip _nrf53_cpunet_gdb_attach
# Release the network core
proc nrf53_cpunet_release { {_CHIPNAME nrf53} } {
set _TARGETNAME_APP $_CHIPNAME.cpuapp
set _TARGETNAME_NET $_CHIPNAME.cpunet
set RESET_NETWORK_FORCEOFF 0x50005614
set RESET_NETWORK_WORKAROUND 0x50005618
set CORTEX_M_DCB_DEMCR 0xE000EDFC
$_TARGETNAME_APP mww $RESET_NETWORK_WORKAROUND 1
$_TARGETNAME_APP mww $RESET_NETWORK_FORCEOFF 0
$_TARGETNAME_APP mww $RESET_NETWORK_FORCEOFF 1
set err [catch {$_TARGETNAME_NET arp_examine}]
if { $err } {
if { ![_nrf_check_ap_lock 3 3] } {
echo "Error: \[$_TARGETNAME_NET\] examination failed"
}
return
}
# set TRCENA | VC_HARDERR | VC_BUSERR | VC_CORERESET
$_TARGETNAME_NET mww $CORTEX_M_DCB_DEMCR 0x01000501
# Write DEMCR directly intead of permanetly setting by cortex_m vector_catch reset
# following cortex_m_endreset_event() restores the original DEMCR value
$_TARGETNAME_APP mww $RESET_NETWORK_FORCEOFF 0
$_TARGETNAME_APP mww $RESET_NETWORK_WORKAROUND 0
}
# Mass erase and unlock the device using proprietary nRF CTRL-AP (AP #2 or #3)
proc nrf53_cpuapp_recover {} {
_nrf_ctrl_ap_recover 2
}
add_help_text nrf53_cpuapp_recover "Mass erase flash and unlock nRF53 application CPU"
proc nrf53_recover {} {
_nrf_ctrl_ap_recover 3 1
}
add_help_text nrf53_recover "Mass erase all device flash and unlock nRF53"
}
|
