| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119 |
- # SPDX-License-Identifier: GPL-2.0-or-later
- #
- # GigaDevice GD32VF103 target
- #
- # https://www.gigadevice.com/products/microcontrollers/gd32/risc-v/
- #
- source [find mem_helper.tcl]
- transport select jtag
- if { [info exists CHIPNAME] } {
- set _CHIPNAME $CHIPNAME
- } else {
- set _CHIPNAME gd32vf103
- }
- # The smallest RAM size 6kB (GD32VF103C4/T4/R4)
- if { [info exists WORKAREASIZE] } {
- set _WORKAREASIZE $WORKAREASIZE
- } else {
- set _WORKAREASIZE 0x1800
- }
- jtag newtap $_CHIPNAME cpu -irlen 5 -expected-id 0x1000563d
- set _TARGETNAME $_CHIPNAME.cpu
- target create $_TARGETNAME riscv -chain-position $_TARGETNAME
- proc default_mem_access {} {
- riscv set_mem_access progbuf
- }
- default_mem_access
- $_TARGETNAME configure -work-area-phys 0x20000000 -work-area-size $_WORKAREASIZE -work-area-backup 0
- set _FLASHNAME $_CHIPNAME.flash
- flash bank $_FLASHNAME stm32f1x 0x08000000 0 0 0 $_TARGETNAME
- # DBGMCU_CR register cannot be set in examine-end event as the running RISC-V CPU
- # does not allow the debugger to access memory.
- # Stop watchdogs at least before flash programming.
- $_TARGETNAME configure -event reset-init {
- # DBGMCU_CR |= DBG_WWDG_STOP | DBG_IWDG_STOP
- mmw 0xE0042004 0x00000300 0
- }
- # On this chip, ndmreset (the debug module bit that triggers a software reset)
- # doesn't work. So for JTAG connections without an SRST, we need to trigger a
- # reset manually. This is an undocumented reset sequence that's used by the
- # JTAG flashing script in the vendor-supplied GD32VF103 PlatformIO plugin:
- #
- # https://github.com/sipeed/platform-gd32v/commit/f9cbb44819bc05dd2010cc815c32be0486800cc2
- #
- $_TARGETNAME configure -event reset-assert {
- set dmcontrol 0x10
- set dmcontrol_dmactive [expr {1 << 0}]
- set dmcontrol_ackhavereset [expr {1 << 28}]
- set dmcontrol_haltreq [expr {1 << 31}]
- global _RESETMODE
- # If hardware NRST signal is connected and configured (reset_config srst_only)
- # the device has been recently reset in 'jtag arp_init-reset', therefore
- # DM_DMSTATUS_ANYHAVERESET reads 1.
- # The following 'halt' command checks this status bit
- # and shows 'Hart 0 unexpectedly reset!' if set.
- # Prevent this message by sending an acknowledge first.
- set val [expr {$dmcontrol_dmactive | $dmcontrol_ackhavereset}]
- riscv dmi_write $dmcontrol $val
- # Halt the core so that we can write to memory. We do this first so
- # that it doesn't clobber our dmcontrol configuration.
- halt
- # Set haltreq appropriately for the type of reset we're doing. This
- # replicates what the generic RISC-V reset_assert() function would
- # do if we weren't overriding it. The $_RESETMODE hack sucks, but
- # it's the least invasive way to determine whether we need to halt.
- #
- # If we didn't override the generic handler, we'd actually still have
- # to do this: the default handler sets ndmreset, which prevents memory
- # access even though it doesn't actually trigger a reset on this chip.
- # So we'd need to unset it here, which involves a write to dmcontrol,
- # Since haltreq is write-only and there's no way to leave it unchanged,
- # we'd have to figure out its proper value anyway.
- set val $dmcontrol_dmactive
- if {$_RESETMODE ne "run"} {
- set val [expr {$val | $dmcontrol_haltreq}]
- }
- riscv dmi_write $dmcontrol $val
- # Unlock 0xe0042008 so that the next write triggers a reset
- mww 0xe004200c 0x4b5a6978
- # We need to trigger the reset using abstract memory access, since
- # progbuf access tries to read a status code out of a core register
- # after the write happens, which fails when the core is in reset.
- riscv set_mem_access abstract
- # Go!
- mww 0xe0042008 0x1
- # Put the memory access mode back to what it was.
- default_mem_access
- }
- # Capture the mode of a given reset so that we can use it later in the
- # reset-assert handler.
- proc init_reset { mode } {
- global _RESETMODE
- set _RESETMODE $mode
- if {[using_jtag]} {
- jtag arp_init-reset
- }
- }
|