319 lines
7.0 KiB
C
319 lines
7.0 KiB
C
// SPDX-License-Identifier: GPL-2.0+
|
|
/*
|
|
* (C) Copyright 2003
|
|
* Texas Instruments <www.ti.com>
|
|
*
|
|
* (C) Copyright 2002
|
|
* Sysgo Real-Time Solutions, GmbH <www.elinos.com>
|
|
* Marius Groeger <[email protected]>
|
|
*
|
|
* (C) Copyright 2002
|
|
* Sysgo Real-Time Solutions, GmbH <www.elinos.com>
|
|
* Alex Zuepke <[email protected]>
|
|
*
|
|
* (C) Copyright 2002-2004
|
|
* Gary Jennejohn, DENX Software Engineering, <[email protected]>
|
|
*
|
|
* (C) Copyright 2004
|
|
* Philippe Robin, ARM Ltd. <[email protected]>
|
|
*/
|
|
|
|
#include <cpu_func.h>
|
|
#include <efi_loader.h>
|
|
#include <irq_func.h>
|
|
#include <semihosting.h>
|
|
#include <asm/global_data.h>
|
|
#include <asm/proc-armv/ptrace.h>
|
|
#include <asm/ptrace.h>
|
|
#include <asm/u-boot-arm.h>
|
|
|
|
DECLARE_GLOBAL_DATA_PTR;
|
|
|
|
void print_symbol(unsigned long addr, unsigned long offset)
|
|
{
|
|
const char *sym;
|
|
unsigned long base;
|
|
unsigned long end;
|
|
unsigned long size;
|
|
unsigned long faddr = addr - offset;
|
|
|
|
extern const char *symbol_lookup(unsigned long addr, unsigned long *caddr,
|
|
unsigned long *naddr);
|
|
sym = symbol_lookup(faddr, &base, &end);
|
|
if (sym) {
|
|
size = end - base;
|
|
printf("[<%016lx>] %s+0x%lx/0x%lx\n", addr, sym,
|
|
addr - (base + offset), size);
|
|
} else {
|
|
printf("[<%016lx>] %s\n", addr, "N/A");
|
|
}
|
|
}
|
|
|
|
int interrupt_init(void)
|
|
{
|
|
/*
|
|
* setup up stacks if necessary
|
|
*/
|
|
IRQ_STACK_START_IN = gd->irq_sp + 8;
|
|
|
|
enable_interrupts();
|
|
|
|
return 0;
|
|
}
|
|
|
|
void enable_interrupts(void)
|
|
{
|
|
return;
|
|
}
|
|
int disable_interrupts(void)
|
|
{
|
|
return 0;
|
|
}
|
|
|
|
void bad_mode (void)
|
|
{
|
|
panic ("Resetting CPU ...\n");
|
|
reset_cpu();
|
|
}
|
|
|
|
static void show_efi_loaded_images(struct pt_regs *regs)
|
|
{
|
|
efi_print_image_infos((void *)instruction_pointer(regs));
|
|
}
|
|
|
|
static void dump_instr(struct pt_regs *regs)
|
|
{
|
|
unsigned long addr = instruction_pointer(regs);
|
|
const int thumb = thumb_mode(regs);
|
|
const int width = thumb ? 4 : 8;
|
|
int i;
|
|
|
|
if (thumb)
|
|
addr &= ~1L;
|
|
else
|
|
addr &= ~3L;
|
|
printf("Code: ");
|
|
for (i = -4; i < 1 + !!thumb; i++) {
|
|
unsigned int val;
|
|
|
|
if (thumb)
|
|
val = ((u16 *)addr)[i];
|
|
else
|
|
val = ((u32 *)addr)[i];
|
|
printf(i == 0 ? "(%0*x) " : "%0*x ", width, val);
|
|
}
|
|
printf("\n");
|
|
}
|
|
|
|
|
|
static void dump_backtrace(unsigned long fp)
|
|
{
|
|
struct stack_frame {
|
|
unsigned long fp;
|
|
unsigned long lr;
|
|
};
|
|
struct stack_frame *frame;
|
|
unsigned long offset;
|
|
|
|
offset = gd->reloc_off;
|
|
printf("ARM 32-bit Backtrace: \n");
|
|
|
|
if (fp & 0x3) {
|
|
printf(" fp fp pointer (not 4-byte aligned)\n");
|
|
return;
|
|
}
|
|
|
|
frame = (struct stack_frame *)(fp - 4);
|
|
int level = 0;
|
|
|
|
while (1) {
|
|
if ((long)frame < (long)CONFIG_SYS_SDRAM_BASE ||
|
|
(long)frame > (long)(CONFIG_SYS_SDRAM_BASE + gd->ram_size)) {
|
|
printf(" [Stack out of SDRAM range]\n");
|
|
break;
|
|
}
|
|
|
|
unsigned long where = frame->lr;
|
|
|
|
debug(" #%d: LR = 0x%08lx ", level++, frame->lr);
|
|
print_symbol(where, offset);
|
|
|
|
if (frame->fp == (ulong)frame) {
|
|
break;
|
|
}
|
|
|
|
frame = (struct stack_frame *)(frame->fp - 4);
|
|
|
|
if (level > 32) {
|
|
printf(" [Max backtrace level reached]\n");
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
void show_regs (struct pt_regs *regs)
|
|
{
|
|
unsigned long __maybe_unused flags;
|
|
const char __maybe_unused *processor_modes[] = {
|
|
"USER_26", "FIQ_26", "IRQ_26", "SVC_26",
|
|
"UK4_26", "UK5_26", "UK6_26", "UK7_26",
|
|
"UK8_26", "UK9_26", "UK10_26", "UK11_26",
|
|
"UK12_26", "UK13_26", "UK14_26", "UK15_26",
|
|
"USER_32", "FIQ_32", "IRQ_32", "SVC_32",
|
|
"UK4_32", "UK5_32", "UK6_32", "ABT_32",
|
|
"UK8_32", "UK9_32", "HYP_32", "UND_32",
|
|
"UK12_32", "UK13_32", "UK14_32", "SYS_32",
|
|
};
|
|
|
|
flags = condition_codes (regs);
|
|
|
|
printf("pc : [<%08lx>] lr : [<%08lx>]\n",
|
|
instruction_pointer(regs), regs->ARM_lr);
|
|
if (gd->flags & GD_FLG_RELOC) {
|
|
printf("reloc pc : [<%08lx>] lr : [<%08lx>]\n",
|
|
instruction_pointer(regs) - gd->reloc_off,
|
|
regs->ARM_lr - gd->reloc_off);
|
|
}
|
|
printf("sp : %08lx ip : %08lx fp : %08lx\n",
|
|
regs->ARM_sp, regs->ARM_ip, regs->ARM_fp);
|
|
printf ("r10: %08lx r9 : %08lx r8 : %08lx\n",
|
|
regs->ARM_r10, regs->ARM_r9, regs->ARM_r8);
|
|
printf ("r7 : %08lx r6 : %08lx r5 : %08lx r4 : %08lx\n",
|
|
regs->ARM_r7, regs->ARM_r6, regs->ARM_r5, regs->ARM_r4);
|
|
printf ("r3 : %08lx r2 : %08lx r1 : %08lx r0 : %08lx\n",
|
|
regs->ARM_r3, regs->ARM_r2, regs->ARM_r1, regs->ARM_r0);
|
|
printf ("Flags: %c%c%c%c",
|
|
flags & CC_N_BIT ? 'N' : 'n',
|
|
flags & CC_Z_BIT ? 'Z' : 'z',
|
|
flags & CC_C_BIT ? 'C' : 'c', flags & CC_V_BIT ? 'V' : 'v');
|
|
printf (" IRQs %s FIQs %s Mode %s%s\n",
|
|
interrupts_enabled (regs) ? "on" : "off",
|
|
fast_interrupts_enabled (regs) ? "on" : "off",
|
|
processor_modes[processor_mode (regs)],
|
|
thumb_mode (regs) ? " (T)" : "");
|
|
#if (IS_ENABLED(CONFIG_KALLSYMS))
|
|
dump_backtrace(regs->ARM_fp);
|
|
#else
|
|
printf("\n\n !!! enable CONFIG_KALLSYMS to show call trace !!!\n");
|
|
#endif
|
|
dump_instr(regs);
|
|
}
|
|
|
|
void stack_dump(void)
|
|
{
|
|
#define GET_CURRENT_FP() ({ \
|
|
unsigned long __fp; \
|
|
__asm__ __volatile__("mov %0, fp" : "=r"(__fp)); \
|
|
__fp; \
|
|
})
|
|
unsigned long fp = GET_CURRENT_FP();
|
|
dump_backtrace(fp);
|
|
}
|
|
|
|
/* fixup PC to point to the instruction leading to the exception */
|
|
static inline void fixup_pc(struct pt_regs *regs, int offset)
|
|
{
|
|
uint32_t pc = instruction_pointer(regs) + offset;
|
|
regs->ARM_pc = pc | (regs->ARM_pc & PCMASK);
|
|
}
|
|
|
|
/*
|
|
* Try to "emulate" a semihosting call in the event that we don't have a
|
|
* debugger attached.
|
|
*/
|
|
static bool smh_emulate_trap(struct pt_regs *regs)
|
|
{
|
|
if (regs->ARM_cpsr & T_BIT) {
|
|
u16 *insn = (u16 *)(regs->ARM_pc - 2);
|
|
|
|
if (*insn != SMH_T32_SVC)
|
|
return false;
|
|
} else {
|
|
u32 *insn = (u32 *)(regs->ARM_pc - 4);
|
|
|
|
if (*insn != SMH_A32_SVC)
|
|
return false;
|
|
}
|
|
|
|
/* Avoid future semihosting calls */
|
|
disable_semihosting();
|
|
|
|
/* Just pretend the call failed */
|
|
regs->ARM_r0 = -1;
|
|
return true;
|
|
}
|
|
|
|
void do_undefined_instruction (struct pt_regs *pt_regs)
|
|
{
|
|
efi_restore_gd();
|
|
printf ("undefined instruction\n");
|
|
fixup_pc(pt_regs, -4);
|
|
show_regs (pt_regs);
|
|
show_efi_loaded_images(pt_regs);
|
|
bad_mode ();
|
|
}
|
|
|
|
void do_software_interrupt (struct pt_regs *pt_regs)
|
|
{
|
|
if (CONFIG_IS_ENABLED(SEMIHOSTING_FALLBACK) &&
|
|
smh_emulate_trap(pt_regs))
|
|
return;
|
|
|
|
efi_restore_gd();
|
|
printf ("software interrupt\n");
|
|
fixup_pc(pt_regs, -4);
|
|
show_regs (pt_regs);
|
|
show_efi_loaded_images(pt_regs);
|
|
bad_mode ();
|
|
}
|
|
|
|
void do_prefetch_abort (struct pt_regs *pt_regs)
|
|
{
|
|
efi_restore_gd();
|
|
printf ("prefetch abort\n");
|
|
fixup_pc(pt_regs, -8);
|
|
show_regs (pt_regs);
|
|
show_efi_loaded_images(pt_regs);
|
|
bad_mode ();
|
|
}
|
|
|
|
void do_data_abort (struct pt_regs *pt_regs)
|
|
{
|
|
efi_restore_gd();
|
|
printf ("data abort\n");
|
|
fixup_pc(pt_regs, -8);
|
|
show_regs (pt_regs);
|
|
show_efi_loaded_images(pt_regs);
|
|
bad_mode ();
|
|
}
|
|
|
|
void do_not_used (struct pt_regs *pt_regs)
|
|
{
|
|
efi_restore_gd();
|
|
printf ("not used\n");
|
|
fixup_pc(pt_regs, -8);
|
|
show_regs (pt_regs);
|
|
show_efi_loaded_images(pt_regs);
|
|
bad_mode ();
|
|
}
|
|
|
|
void do_fiq (struct pt_regs *pt_regs)
|
|
{
|
|
efi_restore_gd();
|
|
printf ("fast interrupt request\n");
|
|
fixup_pc(pt_regs, -8);
|
|
show_regs (pt_regs);
|
|
show_efi_loaded_images(pt_regs);
|
|
bad_mode ();
|
|
}
|
|
|
|
void do_irq (struct pt_regs *pt_regs)
|
|
{
|
|
efi_restore_gd();
|
|
printf ("interrupt request\n");
|
|
fixup_pc(pt_regs, -8);
|
|
show_regs (pt_regs);
|
|
show_efi_loaded_images(pt_regs);
|
|
bad_mode ();
|
|
}
|