Modify trapframe decoding to properly analyze trapframe. Provide method for fixup_pc. It happens, that in some kernel functions, the GDB stack frame decoder cannot determine both func name and frame size. This is because these functions either contain invalid instruction, or their format does not match standard schema. Detect that scenarios and move PC accordingly to jump into known function schema, which GDB is able to parse. Obtained from: Semihalf Sponsored by: Juniper Networks Reviewed by: kib, zbb Differential Revision: https://reviews.freebsd.org/D5976
287 lines
7.7 KiB
C
287 lines
7.7 KiB
C
/*
|
|
* Copyright (c) 2004 Marcel Moolenaar
|
|
* All rights reserved.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
*
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS OR
|
|
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
|
|
* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
|
|
* IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY DIRECT, INDIRECT,
|
|
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
|
|
* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
|
|
* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
|
|
* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
|
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
|
|
* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
|
*/
|
|
|
|
#include <sys/cdefs.h>
|
|
__FBSDID("$FreeBSD$");
|
|
|
|
#include <sys/types.h>
|
|
#ifndef CROSS_DEBUGGER
|
|
#include <machine/pcb.h>
|
|
#include <machine/frame.h>
|
|
#include <machine/armreg.h>
|
|
#endif
|
|
#include <err.h>
|
|
#include <kvm.h>
|
|
#include <string.h>
|
|
|
|
#include <defs.h>
|
|
#include <target.h>
|
|
#include <gdbthread.h>
|
|
#include <inferior.h>
|
|
#include <regcache.h>
|
|
#include <frame-unwind.h>
|
|
#include <arm-tdep.h>
|
|
|
|
#include "kgdb.h"
|
|
|
|
CORE_ADDR
|
|
kgdb_trgt_core_pcb(u_int cpuid)
|
|
{
|
|
#ifndef CROSS_DEBUGGER
|
|
return (kgdb_trgt_stop_pcb(cpuid, sizeof(struct pcb)));
|
|
#else
|
|
return -1;
|
|
#endif
|
|
}
|
|
|
|
void
|
|
kgdb_trgt_fetch_registers(int regno __unused)
|
|
{
|
|
#ifndef CROSS_DEBUGGER
|
|
struct kthr *kt;
|
|
struct pcb pcb;
|
|
int i;
|
|
|
|
kt = kgdb_thr_lookup_tid(ptid_get_pid(inferior_ptid));
|
|
if (kt == NULL)
|
|
return;
|
|
if (kvm_read(kvm, kt->pcb, &pcb, sizeof(pcb)) != sizeof(pcb)) {
|
|
warnx("kvm_read: %s", kvm_geterr(kvm));
|
|
memset(&pcb, 0, sizeof(pcb));
|
|
}
|
|
for (i = ARM_A1_REGNUM + 4; i <= ARM_SP_REGNUM; i++) {
|
|
supply_register(i, (char *)&pcb.pcb_regs.sf_r4 +
|
|
(i - (ARM_A1_REGNUM + 4 )) * 4);
|
|
}
|
|
supply_register(ARM_PC_REGNUM, (char *)&pcb.pcb_regs.sf_pc);
|
|
supply_register(ARM_LR_REGNUM, (char *)&pcb.pcb_regs.sf_lr);
|
|
#endif
|
|
}
|
|
|
|
void
|
|
kgdb_trgt_store_registers(int regno __unused)
|
|
{
|
|
fprintf_unfiltered(gdb_stderr, "XXX: %s\n", __func__);
|
|
}
|
|
|
|
void
|
|
kgdb_trgt_new_objfile(struct objfile *objfile)
|
|
{
|
|
}
|
|
|
|
#ifndef CROSS_DEBUGGER
|
|
struct kgdb_frame_cache {
|
|
CORE_ADDR fp;
|
|
CORE_ADDR sp;
|
|
CORE_ADDR pc;
|
|
};
|
|
|
|
static int kgdb_trgt_frame_offset[26] = {
|
|
offsetof(struct trapframe, tf_r0),
|
|
offsetof(struct trapframe, tf_r1),
|
|
offsetof(struct trapframe, tf_r2),
|
|
offsetof(struct trapframe, tf_r3),
|
|
offsetof(struct trapframe, tf_r4),
|
|
offsetof(struct trapframe, tf_r5),
|
|
offsetof(struct trapframe, tf_r6),
|
|
offsetof(struct trapframe, tf_r7),
|
|
offsetof(struct trapframe, tf_r8),
|
|
offsetof(struct trapframe, tf_r9),
|
|
offsetof(struct trapframe, tf_r10),
|
|
offsetof(struct trapframe, tf_r11),
|
|
offsetof(struct trapframe, tf_r12),
|
|
offsetof(struct trapframe, tf_svc_sp),
|
|
offsetof(struct trapframe, tf_svc_lr),
|
|
offsetof(struct trapframe, tf_pc),
|
|
-1, -1, -1, -1, -1, -1, -1, -1, -1,
|
|
offsetof(struct trapframe, tf_spsr)
|
|
};
|
|
|
|
static struct kgdb_frame_cache *
|
|
kgdb_trgt_frame_cache(struct frame_info *next_frame, void **this_cache)
|
|
{
|
|
char buf[MAX_REGISTER_SIZE];
|
|
struct kgdb_frame_cache *cache;
|
|
|
|
cache = *this_cache;
|
|
if (cache == NULL) {
|
|
cache = FRAME_OBSTACK_ZALLOC(struct kgdb_frame_cache);
|
|
*this_cache = cache;
|
|
frame_unwind_register(next_frame, ARM_SP_REGNUM, buf);
|
|
cache->sp = extract_unsigned_integer(buf,
|
|
register_size(current_gdbarch, ARM_SP_REGNUM));
|
|
frame_unwind_register(next_frame, ARM_FP_REGNUM, buf);
|
|
cache->fp = extract_unsigned_integer(buf,
|
|
register_size(current_gdbarch, ARM_FP_REGNUM));
|
|
cache->pc = frame_func_unwind(next_frame);
|
|
}
|
|
return (cache);
|
|
}
|
|
|
|
static int is_undef;
|
|
|
|
static void
|
|
kgdb_trgt_trapframe_this_id(struct frame_info *next_frame, void **this_cache,
|
|
struct frame_id *this_id)
|
|
{
|
|
struct kgdb_frame_cache *cache;
|
|
|
|
cache = kgdb_trgt_frame_cache(next_frame, this_cache);
|
|
*this_id = frame_id_build(cache->sp, cache->pc);
|
|
}
|
|
|
|
static void
|
|
kgdb_trgt_trapframe_prev_register(struct frame_info *next_frame,
|
|
void **this_cache, int regnum, int *optimizedp, enum lval_type *lvalp,
|
|
CORE_ADDR *addrp, int *realnump, void *valuep)
|
|
{
|
|
char dummy_valuep[MAX_REGISTER_SIZE];
|
|
struct kgdb_frame_cache *cache;
|
|
int ofs, regsz;
|
|
CORE_ADDR sp;
|
|
|
|
regsz = register_size(current_gdbarch, regnum);
|
|
|
|
if (valuep == NULL)
|
|
valuep = dummy_valuep;
|
|
memset(valuep, 0, regsz);
|
|
*optimizedp = 0;
|
|
*addrp = 0;
|
|
*lvalp = not_lval;
|
|
*realnump = -1;
|
|
|
|
ofs = (regnum >= 0 && regnum <= ARM_PS_REGNUM)
|
|
? kgdb_trgt_frame_offset[regnum] : -1;
|
|
if (ofs == -1)
|
|
return;
|
|
|
|
cache = kgdb_trgt_frame_cache(next_frame, this_cache);
|
|
sp = cache->sp;
|
|
|
|
ofs = kgdb_trgt_frame_offset[regnum];
|
|
*addrp = sp + ofs;
|
|
*lvalp = lval_memory;
|
|
target_read_memory(*addrp, valuep, regsz);
|
|
}
|
|
|
|
static const struct frame_unwind kgdb_trgt_trapframe_unwind = {
|
|
UNKNOWN_FRAME,
|
|
&kgdb_trgt_trapframe_this_id,
|
|
&kgdb_trgt_trapframe_prev_register
|
|
};
|
|
#endif
|
|
|
|
const struct frame_unwind *
|
|
kgdb_trgt_trapframe_sniffer(struct frame_info *next_frame)
|
|
{
|
|
#ifndef CROSS_DEBUGGER
|
|
char *pname;
|
|
CORE_ADDR pc;
|
|
|
|
pc = frame_pc_unwind(next_frame);
|
|
pname = NULL;
|
|
find_pc_partial_function(pc, &pname, NULL, NULL);
|
|
if (pname == NULL) {
|
|
is_undef = 0;
|
|
return (NULL);
|
|
}
|
|
if (!strcmp(pname, "undefinedinstruction"))
|
|
is_undef = 1;
|
|
if (strcmp(pname, "Laddress_exception_entry") == 0 ||
|
|
strcmp(pname, "undefined_entry") == 0 ||
|
|
strcmp(pname, "exception_exit") == 0 ||
|
|
strcmp(pname, "Laddress_exception_msg") == 0 ||
|
|
strcmp(pname, "irq_entry") == 0)
|
|
return (&kgdb_trgt_trapframe_unwind);
|
|
if (!strcmp(pname, "undefinedinstruction"))
|
|
is_undef = 1;
|
|
else
|
|
is_undef = 0;
|
|
#endif
|
|
return (NULL);
|
|
}
|
|
|
|
/*
|
|
* This function ensures, that the PC is inside the
|
|
* function section which is understood by GDB.
|
|
*
|
|
* Return 0 when fixup is necessary, -1 otherwise.
|
|
*/
|
|
int
|
|
kgdb_trgt_pc_fixup(CORE_ADDR *pc)
|
|
{
|
|
#ifndef CROSS_DEBUGGER
|
|
struct minimal_symbol *msymbol;
|
|
int valpc;
|
|
|
|
/*
|
|
* exception_exit and swi_exit are special. These functions
|
|
* are artificially injected into the stack to be executed
|
|
* as the last entry in calling chain when all functions exit.
|
|
* Treat them differently.
|
|
*/
|
|
msymbol = lookup_minimal_symbol_by_pc(*pc);
|
|
if (msymbol != NULL) {
|
|
if (strcmp(DEPRECATED_SYMBOL_NAME(msymbol), "exception_exit") == 0)
|
|
return (0);
|
|
if (strcmp(DEPRECATED_SYMBOL_NAME(msymbol), "swi_exit") == 0)
|
|
return (0);
|
|
}
|
|
|
|
/*
|
|
* kdb_enter contains an invalid instruction which is supposed
|
|
* to generate a trap. BFD does not understand it and treats
|
|
* this part of function as a separate function. Move PC
|
|
* two instruction earlier to be inside kdb_enter section.
|
|
*/
|
|
target_read_memory(*pc - 4, (char*)&valpc, 4);
|
|
if (valpc == 0xe7ffffff) {
|
|
*pc = *pc - 8;
|
|
return (0);
|
|
}
|
|
|
|
/*
|
|
* When the panic/vpanic is the last (noreturn) function,
|
|
* the bottom of the calling function looks as below.
|
|
* mov lr, pc
|
|
* b panic
|
|
* Normally, GDB is not able to detect function boundaries,
|
|
* so move the PC two instruction earlier where it can deal
|
|
* with it.
|
|
* Match this pair of instructions: mov lr, pc followed with
|
|
* non-linked branch.
|
|
*/
|
|
if ((valpc & 0xff000000) == 0xea000000) {
|
|
target_read_memory(*pc - 8, (char*)&valpc, 4);
|
|
if (valpc == 0xe1a0e00f) {
|
|
*pc -= 8;
|
|
return (0);
|
|
}
|
|
}
|
|
#endif
|
|
return (-1);
|
|
}
|