openocd/tcl/cpu/arc/common.tcl

40 lines
1.3 KiB
Tcl

# Copyright (C) 2015, 2020 Synopsys, Inc.
# Anton Kolesov <anton.kolesov@synopsys.com>
# Didin Evgeniy <didin@synopsys.com>
#
# SPDX-License-Identifier: GPL-2.0-or-later
# Things common to all ARCs
# It is assumed that target is already halted.
proc arc_common_reset { {target ""} } {
if { $target != "" } {
targets $target
}
halt
# 1. Interrupts are disabled (STATUS32.IE)
# 2. The status register flags are cleared.
# All fields, except the H bit, are set to 0 when the processor is Reset.
arc jtag set-aux-reg 0xA 0x1
# 3. The loop count, loop start, and loop end registers are cleared.
arc jtag set-core-reg 60 0
arc jtag set-aux-reg 0x2 0
arc jtag set-aux-reg 0x3 0
# Program execution begins at the address referenced by the four byte reset
# vector located at the interrupt vector base address, which is the first
# entry (offset 0x00) in the vector table.
set int_vector_base [arc jtag get-aux-reg 0x25]
set start_pc [read_memory $int_vector_base 32 1]
arc jtag set-aux-reg 0x6 $start_pc
# It is OK to do uncached writes - register cache will be invalidated by
# the reset_assert() function.
}
# vim:expandtab: