mirror of
https://sourceware.org/git/binutils-gdb.git
synced 2024-12-03 04:12:10 +08:00
6d3d12ebef
This commit includes string.h in common-defs.h and removes all other inclusions. gdb/ 2014-08-07 Gary Benson <gbenson@redhat.com> * common/common-defs.h: Include string.h. * aarch64-tdep.c: Do not include string.h. * ada-exp.y: Likewise. * ada-lang.c: Likewise. * ada-lex.l: Likewise. * ada-typeprint.c: Likewise. * ada-valprint.c: Likewise. * aix-thread.c: Likewise. * alpha-linux-tdep.c: Likewise. * alpha-mdebug-tdep.c: Likewise. * alpha-nat.c: Likewise. * alpha-osf1-tdep.c: Likewise. * alpha-tdep.c: Likewise. * alphanbsd-tdep.c: Likewise. * amd64-dicos-tdep.c: Likewise. * amd64-linux-tdep.c: Likewise. * amd64-nat.c: Likewise. * amd64-sol2-tdep.c: Likewise. * amd64fbsd-tdep.c: Likewise. * amd64obsd-tdep.c: Likewise. * arch-utils.c: Likewise. * arm-linux-nat.c: Likewise. * arm-linux-tdep.c: Likewise. * arm-tdep.c: Likewise. * arm-wince-tdep.c: Likewise. * armbsd-tdep.c: Likewise. * armnbsd-nat.c: Likewise. * armnbsd-tdep.c: Likewise. * armobsd-tdep.c: Likewise. * avr-tdep.c: Likewise. * ax-gdb.c: Likewise. * ax-general.c: Likewise. * bcache.c: Likewise. * bfin-tdep.c: Likewise. * breakpoint.c: Likewise. * build-id.c: Likewise. * buildsym.c: Likewise. * c-exp.y: Likewise. * c-lang.c: Likewise. * c-typeprint.c: Likewise. * c-valprint.c: Likewise. * charset.c: Likewise. * cli-out.c: Likewise. * cli/cli-cmds.c: Likewise. * cli/cli-decode.c: Likewise. * cli/cli-dump.c: Likewise. * cli/cli-interp.c: Likewise. * cli/cli-logging.c: Likewise. * cli/cli-script.c: Likewise. * cli/cli-setshow.c: Likewise. * cli/cli-utils.c: Likewise. * coffread.c: Likewise. * common/agent.c: Likewise. * common/buffer.c: Likewise. * common/buffer.h: Likewise. * common/common-utils.c: Likewise. * common/filestuff.c: Likewise. * common/filestuff.c: Likewise. * common/format.c: Likewise. * common/print-utils.c: Likewise. * common/rsp-low.c: Likewise. * common/signals.c: Likewise. * common/vec.h: Likewise. * common/xml-utils.c: Likewise. * core-regset.c: Likewise. * corefile.c: Likewise. * corelow.c: Likewise. * cp-abi.c: Likewise. * cp-name-parser.y: Likewise. * cp-support.c: Likewise. * cp-valprint.c: Likewise. * cris-tdep.c: Likewise. * d-exp.y: Likewise. * darwin-nat.c: Likewise. * dbxread.c: Likewise. * dcache.c: Likewise. * demangle.c: Likewise. * dicos-tdep.c: Likewise. * disasm.c: Likewise. * doublest.c: Likewise. * dsrec.c: Likewise. * dummy-frame.c: Likewise. * dwarf2-frame.c: Likewise. * dwarf2loc.c: Likewise. * dwarf2read.c: Likewise. * elfread.c: Likewise. * environ.c: Likewise. * eval.c: Likewise. * event-loop.c: Likewise. * exceptions.c: Likewise. * exec.c: Likewise. * expprint.c: Likewise. * f-exp.y: Likewise. * f-lang.c: Likewise. * f-typeprint.c: Likewise. * f-valprint.c: Likewise. * fbsd-nat.c: Likewise. * findcmd.c: Likewise. * findvar.c: Likewise. * fork-child.c: Likewise. * frame.c: Likewise. * frv-linux-tdep.c: Likewise. * frv-tdep.c: Likewise. * gdb.c: Likewise. * gdb_bfd.c: Likewise. * gdbarch.c: Likewise. * gdbarch.sh: Likewise. * gdbtypes.c: Likewise. * gnu-nat.c: Likewise. * gnu-v2-abi.c: Likewise. * gnu-v3-abi.c: Likewise. * go-exp.y: Likewise. * go-lang.c: Likewise. * go32-nat.c: Likewise. * guile/guile.c: Likewise. * guile/scm-auto-load.c: Likewise. * hppa-hpux-tdep.c: Likewise. * hppa-linux-nat.c: Likewise. * hppanbsd-tdep.c: Likewise. * hppaobsd-tdep.c: Likewise. * i386-cygwin-tdep.c: Likewise. * i386-dicos-tdep.c: Likewise. * i386-linux-tdep.c: Likewise. * i386-nto-tdep.c: Likewise. * i386-sol2-tdep.c: Likewise. * i386-tdep.c: Likewise. * i386bsd-tdep.c: Likewise. * i386gnu-nat.c: Likewise. * i386nbsd-tdep.c: Likewise. * i386obsd-tdep.c: Likewise. * i387-tdep.c: Likewise. * ia64-libunwind-tdep.c: Likewise. * ia64-linux-nat.c: Likewise. * inf-child.c: Likewise. * inf-ptrace.c: Likewise. * inf-ttrace.c: Likewise. * infcall.c: Likewise. * infcmd.c: Likewise. * inflow.c: Likewise. * infrun.c: Likewise. * interps.c: Likewise. * iq2000-tdep.c: Likewise. * irix5-nat.c: Likewise. * jv-exp.y: Likewise. * jv-lang.c: Likewise. * jv-typeprint.c: Likewise. * jv-valprint.c: Likewise. * language.c: Likewise. * linux-fork.c: Likewise. * linux-nat.c: Likewise. * lm32-tdep.c: Likewise. * m2-exp.y: Likewise. * m2-typeprint.c: Likewise. * m32c-tdep.c: Likewise. * m32r-linux-nat.c: Likewise. * m32r-linux-tdep.c: Likewise. * m32r-rom.c: Likewise. * m32r-tdep.c: Likewise. * m68hc11-tdep.c: Likewise. * m68k-tdep.c: Likewise. * m68kbsd-tdep.c: Likewise. * m68klinux-nat.c: Likewise. * m68klinux-tdep.c: Likewise. * m88k-tdep.c: Likewise. * machoread.c: Likewise. * macrocmd.c: Likewise. * main.c: Likewise. * mdebugread.c: Likewise. * mem-break.c: Likewise. * memattr.c: Likewise. * memory-map.c: Likewise. * mep-tdep.c: Likewise. * mi/mi-cmd-break.c: Likewise. * mi/mi-cmd-disas.c: Likewise. * mi/mi-cmd-env.c: Likewise. * mi/mi-cmd-stack.c: Likewise. * mi/mi-cmd-var.c: Likewise. * mi/mi-cmds.c: Likewise. * mi/mi-console.c: Likewise. * mi/mi-getopt.c: Likewise. * mi/mi-interp.c: Likewise. * mi/mi-main.c: Likewise. * mi/mi-parse.c: Likewise. * microblaze-rom.c: Likewise. * microblaze-tdep.c: Likewise. * mingw-hdep.c: Likewise. * minidebug.c: Likewise. * minsyms.c: Likewise. * mips-irix-tdep.c: Likewise. * mips-linux-tdep.c: Likewise. * mips-tdep.c: Likewise. * mips64obsd-tdep.c: Likewise. * mipsnbsd-tdep.c: Likewise. * mipsread.c: Likewise. * mn10300-linux-tdep.c: Likewise. * mn10300-tdep.c: Likewise. * monitor.c: Likewise. * moxie-tdep.c: Likewise. * mt-tdep.c: Likewise. * nat/linux-btrace.c: Likewise. * nat/linux-osdata.c: Likewise. * nat/linux-procfs.c: Likewise. * nat/linux-ptrace.c: Likewise. * nat/linux-waitpid.c: Likewise. * nbsd-tdep.c: Likewise. * nios2-linux-tdep.c: Likewise. * nto-procfs.c: Likewise. * nto-tdep.c: Likewise. * objc-lang.c: Likewise. * objfiles.c: Likewise. * opencl-lang.c: Likewise. * osabi.c: Likewise. * osdata.c: Likewise. * p-exp.y: Likewise. * p-lang.c: Likewise. * p-typeprint.c: Likewise. * parse.c: Likewise. * posix-hdep.c: Likewise. * ppc-linux-nat.c: Likewise. * ppc-sysv-tdep.c: Likewise. * ppcfbsd-tdep.c: Likewise. * ppcnbsd-tdep.c: Likewise. * ppcobsd-tdep.c: Likewise. * printcmd.c: Likewise. * procfs.c: Likewise. * prologue-value.c: Likewise. * python/py-auto-load.c: Likewise. * python/py-gdb-readline.c: Likewise. * ravenscar-thread.c: Likewise. * regcache.c: Likewise. * registry.c: Likewise. * remote-fileio.c: Likewise. * remote-m32r-sdi.c: Likewise. * remote-mips.c: Likewise. * remote-notif.c: Likewise. * remote-sim.c: Likewise. * remote.c: Likewise. * reverse.c: Likewise. * rs6000-aix-tdep.c: Likewise. * ser-base.c: Likewise. * ser-go32.c: Likewise. * ser-mingw.c: Likewise. * ser-pipe.c: Likewise. * ser-tcp.c: Likewise. * ser-unix.c: Likewise. * serial.c: Likewise. * sh-tdep.c: Likewise. * sh64-tdep.c: Likewise. * shnbsd-tdep.c: Likewise. * skip.c: Likewise. * sol-thread.c: Likewise. * solib-dsbt.c: Likewise. * solib-frv.c: Likewise. * solib-osf.c: Likewise. * solib-som.c: Likewise. * solib-spu.c: Likewise. * solib-target.c: Likewise. * solib.c: Likewise. * somread.c: Likewise. * source.c: Likewise. * sparc-nat.c: Likewise. * sparc-sol2-tdep.c: Likewise. * sparc-tdep.c: Likewise. * sparc64-tdep.c: Likewise. * sparc64fbsd-tdep.c: Likewise. * sparc64nbsd-tdep.c: Likewise. * sparcnbsd-tdep.c: Likewise. * spu-linux-nat.c: Likewise. * spu-multiarch.c: Likewise. * spu-tdep.c: Likewise. * stabsread.c: Likewise. * stack.c: Likewise. * std-regs.c: Likewise. * symfile.c: Likewise. * symmisc.c: Likewise. * symtab.c: Likewise. * target.c: Likewise. * thread.c: Likewise. * tilegx-linux-nat.c: Likewise. * tilegx-tdep.c: Likewise. * top.c: Likewise. * tracepoint.c: Likewise. * tui/tui-command.c: Likewise. * tui/tui-data.c: Likewise. * tui/tui-disasm.c: Likewise. * tui/tui-file.c: Likewise. * tui/tui-layout.c: Likewise. * tui/tui-out.c: Likewise. * tui/tui-regs.c: Likewise. * tui/tui-source.c: Likewise. * tui/tui-stack.c: Likewise. * tui/tui-win.c: Likewise. * tui/tui-windata.c: Likewise. * tui/tui-winsource.c: Likewise. * typeprint.c: Likewise. * ui-file.c: Likewise. * ui-out.c: Likewise. * user-regs.c: Likewise. * utils.c: Likewise. * v850-tdep.c: Likewise. * valarith.c: Likewise. * valops.c: Likewise. * valprint.c: Likewise. * value.c: Likewise. * varobj.c: Likewise. * vax-tdep.c: Likewise. * vaxnbsd-tdep.c: Likewise. * vaxobsd-tdep.c: Likewise. * windows-nat.c: Likewise. * xcoffread.c: Likewise. * xml-support.c: Likewise. * xstormy16-tdep.c: Likewise. * xtensa-linux-nat.c: Likewise. gdb/gdbserver/ 2014-08-07 Gary Benson <gbenson@redhat.com> * server.h: Do not include string.h. * event-loop.c: Likewise. * linux-low.c: Likewise. * regcache.c: Likewise. * remote-utils.c: Likewise. * spu-low.c: Likewise. * utils.c: Likewise.
409 lines
12 KiB
C
409 lines
12 KiB
C
/* Target-dependent mdebug code for the ALPHA architecture.
|
||
Copyright (C) 1993-2014 Free Software Foundation, Inc.
|
||
|
||
This file is part of GDB.
|
||
|
||
This program is free software; you can redistribute it and/or modify
|
||
it under the terms of the GNU General Public License as published by
|
||
the Free Software Foundation; either version 3 of the License, or
|
||
(at your option) any later version.
|
||
|
||
This program is distributed in the hope that it will be useful,
|
||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||
GNU General Public License for more details.
|
||
|
||
You should have received a copy of the GNU General Public License
|
||
along with this program. If not, see <http://www.gnu.org/licenses/>. */
|
||
|
||
#include "defs.h"
|
||
#include "frame.h"
|
||
#include "frame-unwind.h"
|
||
#include "frame-base.h"
|
||
#include "symtab.h"
|
||
#include "gdbcore.h"
|
||
#include "block.h"
|
||
#include "trad-frame.h"
|
||
|
||
#include "alpha-tdep.h"
|
||
#include "mdebugread.h"
|
||
|
||
/* FIXME: Some of this code should perhaps be merged with mips. */
|
||
|
||
/* *INDENT-OFF* */
|
||
/* Layout of a stack frame on the alpha:
|
||
|
||
| |
|
||
pdr members: | 7th ... nth arg, |
|
||
| `pushed' by caller. |
|
||
| |
|
||
----------------|-------------------------------|<-- old_sp == vfp
|
||
^ ^ ^ ^ | |
|
||
| | | | | |
|
||
| |localoff | Copies of 1st .. 6th |
|
||
| | | | | argument if necessary. |
|
||
| | | v | |
|
||
| | | --- |-------------------------------|<-- LOCALS_ADDRESS
|
||
| | | | |
|
||
| | | | Locals and temporaries. |
|
||
| | | | |
|
||
| | | |-------------------------------|
|
||
| | | | |
|
||
|-fregoffset | Saved float registers. |
|
||
| | | | F9 |
|
||
| | | | . |
|
||
| | | | . |
|
||
| | | | F2 |
|
||
| | v | |
|
||
| | -------|-------------------------------|
|
||
| | | |
|
||
| | | Saved registers. |
|
||
| | | S6 |
|
||
|-regoffset | . |
|
||
| | | . |
|
||
| | | S0 |
|
||
| | | pdr.pcreg |
|
||
| v | |
|
||
| ----------|-------------------------------|
|
||
| | |
|
||
frameoffset | Argument build area, gets |
|
||
| | 7th ... nth arg for any |
|
||
| | called procedure. |
|
||
v | |
|
||
-------------|-------------------------------|<-- sp
|
||
| |
|
||
*/
|
||
/* *INDENT-ON* */
|
||
|
||
#define PROC_LOW_ADDR(proc) ((proc)->pdr.adr)
|
||
#define PROC_FRAME_OFFSET(proc) ((proc)->pdr.frameoffset)
|
||
#define PROC_FRAME_REG(proc) ((proc)->pdr.framereg)
|
||
#define PROC_REG_MASK(proc) ((proc)->pdr.regmask)
|
||
#define PROC_FREG_MASK(proc) ((proc)->pdr.fregmask)
|
||
#define PROC_REG_OFFSET(proc) ((proc)->pdr.regoffset)
|
||
#define PROC_FREG_OFFSET(proc) ((proc)->pdr.fregoffset)
|
||
#define PROC_PC_REG(proc) ((proc)->pdr.pcreg)
|
||
#define PROC_LOCALOFF(proc) ((proc)->pdr.localoff)
|
||
|
||
/* Locate the mdebug PDR for the given PC. Return null if one can't
|
||
be found; you'll have to fall back to other methods in that case. */
|
||
|
||
static struct mdebug_extra_func_info *
|
||
find_proc_desc (CORE_ADDR pc)
|
||
{
|
||
const struct block *b = block_for_pc (pc);
|
||
struct mdebug_extra_func_info *proc_desc = NULL;
|
||
struct symbol *sym = NULL;
|
||
const char *sh_name = NULL;
|
||
|
||
if (b)
|
||
{
|
||
CORE_ADDR startaddr;
|
||
find_pc_partial_function (pc, &sh_name, &startaddr, NULL);
|
||
|
||
if (startaddr > BLOCK_START (b))
|
||
/* This is the "pathological" case referred to in a comment in
|
||
print_frame_info. It might be better to move this check into
|
||
symbol reading. */
|
||
sym = NULL;
|
||
else
|
||
sym = lookup_symbol (MDEBUG_EFI_SYMBOL_NAME, b, LABEL_DOMAIN, 0);
|
||
}
|
||
|
||
if (sym)
|
||
{
|
||
proc_desc = (struct mdebug_extra_func_info *) SYMBOL_VALUE_BYTES (sym);
|
||
|
||
/* Correct incorrect setjmp procedure descriptor from the library
|
||
to make backtrace through setjmp work. */
|
||
if (proc_desc->pdr.pcreg == 0
|
||
&& strcmp (sh_name, "setjmp") == 0)
|
||
{
|
||
proc_desc->pdr.pcreg = ALPHA_RA_REGNUM;
|
||
proc_desc->pdr.regmask = 0x80000000;
|
||
proc_desc->pdr.regoffset = -4;
|
||
}
|
||
|
||
/* If we never found a PDR for this function in symbol reading,
|
||
then examine prologues to find the information. */
|
||
if (proc_desc->pdr.framereg == -1)
|
||
proc_desc = NULL;
|
||
}
|
||
|
||
return proc_desc;
|
||
}
|
||
|
||
/* Return a non-zero result if the function is frameless; zero otherwise. */
|
||
|
||
static int
|
||
alpha_mdebug_frameless (struct mdebug_extra_func_info *proc_desc)
|
||
{
|
||
return (PROC_FRAME_REG (proc_desc) == ALPHA_SP_REGNUM
|
||
&& PROC_FRAME_OFFSET (proc_desc) == 0);
|
||
}
|
||
|
||
/* This returns the PC of the first inst after the prologue. If we can't
|
||
find the prologue, then return 0. */
|
||
|
||
static CORE_ADDR
|
||
alpha_mdebug_after_prologue (CORE_ADDR pc,
|
||
struct mdebug_extra_func_info *proc_desc)
|
||
{
|
||
if (proc_desc)
|
||
{
|
||
/* If function is frameless, then we need to do it the hard way. I
|
||
strongly suspect that frameless always means prologueless... */
|
||
if (alpha_mdebug_frameless (proc_desc))
|
||
return 0;
|
||
}
|
||
|
||
return alpha_after_prologue (pc);
|
||
}
|
||
|
||
/* Return non-zero if we *might* be in a function prologue. Return zero
|
||
if we are definitively *not* in a function prologue. */
|
||
|
||
static int
|
||
alpha_mdebug_in_prologue (CORE_ADDR pc,
|
||
struct mdebug_extra_func_info *proc_desc)
|
||
{
|
||
CORE_ADDR after_prologue_pc = alpha_mdebug_after_prologue (pc, proc_desc);
|
||
return (after_prologue_pc == 0 || pc < after_prologue_pc);
|
||
}
|
||
|
||
|
||
/* Frame unwinder that reads mdebug PDRs. */
|
||
|
||
struct alpha_mdebug_unwind_cache
|
||
{
|
||
struct mdebug_extra_func_info *proc_desc;
|
||
CORE_ADDR vfp;
|
||
struct trad_frame_saved_reg *saved_regs;
|
||
};
|
||
|
||
/* Extract all of the information about the frame from PROC_DESC
|
||
and store the resulting register save locations in the structure. */
|
||
|
||
static struct alpha_mdebug_unwind_cache *
|
||
alpha_mdebug_frame_unwind_cache (struct frame_info *this_frame,
|
||
void **this_prologue_cache)
|
||
{
|
||
struct alpha_mdebug_unwind_cache *info;
|
||
struct mdebug_extra_func_info *proc_desc;
|
||
ULONGEST vfp;
|
||
CORE_ADDR pc, reg_position;
|
||
unsigned long mask;
|
||
int ireg, returnreg;
|
||
|
||
if (*this_prologue_cache)
|
||
return *this_prologue_cache;
|
||
|
||
info = FRAME_OBSTACK_ZALLOC (struct alpha_mdebug_unwind_cache);
|
||
*this_prologue_cache = info;
|
||
pc = get_frame_address_in_block (this_frame);
|
||
|
||
/* ??? We don't seem to be able to cache the lookup of the PDR
|
||
from alpha_mdebug_frame_p. It'd be nice if we could change
|
||
the arguments to that function. Oh well. */
|
||
proc_desc = find_proc_desc (pc);
|
||
info->proc_desc = proc_desc;
|
||
gdb_assert (proc_desc != NULL);
|
||
|
||
info->saved_regs = trad_frame_alloc_saved_regs (this_frame);
|
||
|
||
/* The VFP of the frame is at FRAME_REG+FRAME_OFFSET. */
|
||
vfp = get_frame_register_unsigned (this_frame, PROC_FRAME_REG (proc_desc));
|
||
vfp += PROC_FRAME_OFFSET (info->proc_desc);
|
||
info->vfp = vfp;
|
||
|
||
/* Fill in the offsets for the registers which gen_mask says were saved. */
|
||
|
||
reg_position = vfp + PROC_REG_OFFSET (proc_desc);
|
||
mask = PROC_REG_MASK (proc_desc);
|
||
returnreg = PROC_PC_REG (proc_desc);
|
||
|
||
/* Note that RA is always saved first, regardless of its actual
|
||
register number. */
|
||
if (mask & (1 << returnreg))
|
||
{
|
||
/* Clear bit for RA so we don't save it again later. */
|
||
mask &= ~(1 << returnreg);
|
||
|
||
info->saved_regs[returnreg].addr = reg_position;
|
||
reg_position += 8;
|
||
}
|
||
|
||
for (ireg = 0; ireg <= 31; ++ireg)
|
||
if (mask & (1 << ireg))
|
||
{
|
||
info->saved_regs[ireg].addr = reg_position;
|
||
reg_position += 8;
|
||
}
|
||
|
||
reg_position = vfp + PROC_FREG_OFFSET (proc_desc);
|
||
mask = PROC_FREG_MASK (proc_desc);
|
||
|
||
for (ireg = 0; ireg <= 31; ++ireg)
|
||
if (mask & (1 << ireg))
|
||
{
|
||
info->saved_regs[ALPHA_FP0_REGNUM + ireg].addr = reg_position;
|
||
reg_position += 8;
|
||
}
|
||
|
||
/* The stack pointer of the previous frame is computed by popping
|
||
the current stack frame. */
|
||
if (!trad_frame_addr_p (info->saved_regs, ALPHA_SP_REGNUM))
|
||
trad_frame_set_value (info->saved_regs, ALPHA_SP_REGNUM, vfp);
|
||
|
||
return info;
|
||
}
|
||
|
||
/* Given a GDB frame, determine the address of the calling function's
|
||
frame. This will be used to create a new GDB frame struct. */
|
||
|
||
static void
|
||
alpha_mdebug_frame_this_id (struct frame_info *this_frame,
|
||
void **this_prologue_cache,
|
||
struct frame_id *this_id)
|
||
{
|
||
struct alpha_mdebug_unwind_cache *info
|
||
= alpha_mdebug_frame_unwind_cache (this_frame, this_prologue_cache);
|
||
|
||
*this_id = frame_id_build (info->vfp, get_frame_func (this_frame));
|
||
}
|
||
|
||
/* Retrieve the value of REGNUM in FRAME. Don't give up! */
|
||
|
||
static struct value *
|
||
alpha_mdebug_frame_prev_register (struct frame_info *this_frame,
|
||
void **this_prologue_cache, int regnum)
|
||
{
|
||
struct alpha_mdebug_unwind_cache *info
|
||
= alpha_mdebug_frame_unwind_cache (this_frame, this_prologue_cache);
|
||
|
||
/* The PC of the previous frame is stored in the link register of
|
||
the current frame. Frob regnum so that we pull the value from
|
||
the correct place. */
|
||
if (regnum == ALPHA_PC_REGNUM)
|
||
regnum = PROC_PC_REG (info->proc_desc);
|
||
|
||
return trad_frame_get_prev_register (this_frame, info->saved_regs, regnum);
|
||
}
|
||
|
||
/* Return a non-zero result if the size of the stack frame exceeds the
|
||
maximum debuggable frame size (512 Kbytes); zero otherwise. */
|
||
|
||
static int
|
||
alpha_mdebug_max_frame_size_exceeded (struct mdebug_extra_func_info *proc_desc)
|
||
{
|
||
/* If frame offset is null, we can be in two cases: either the
|
||
function is frameless (the stack frame is null) or its
|
||
frame exceeds the maximum debuggable frame size (512 Kbytes). */
|
||
|
||
return (PROC_FRAME_OFFSET (proc_desc) == 0
|
||
&& !alpha_mdebug_frameless (proc_desc));
|
||
}
|
||
|
||
static int
|
||
alpha_mdebug_frame_sniffer (const struct frame_unwind *self,
|
||
struct frame_info *this_frame,
|
||
void **this_cache)
|
||
{
|
||
CORE_ADDR pc = get_frame_address_in_block (this_frame);
|
||
struct mdebug_extra_func_info *proc_desc;
|
||
|
||
/* If this PC does not map to a PDR, then clearly this isn't an
|
||
mdebug frame. */
|
||
proc_desc = find_proc_desc (pc);
|
||
if (proc_desc == NULL)
|
||
return 0;
|
||
|
||
/* If we're in the prologue, the PDR for this frame is not yet valid.
|
||
Say no here and we'll fall back on the heuristic unwinder. */
|
||
if (alpha_mdebug_in_prologue (pc, proc_desc))
|
||
return 0;
|
||
|
||
/* If the maximum debuggable frame size has been exceeded, the
|
||
proc desc is bogus. Fall back on the heuristic unwinder. */
|
||
if (alpha_mdebug_max_frame_size_exceeded (proc_desc))
|
||
return 0;
|
||
|
||
return 1;
|
||
}
|
||
|
||
static const struct frame_unwind alpha_mdebug_frame_unwind = {
|
||
NORMAL_FRAME,
|
||
default_frame_unwind_stop_reason,
|
||
alpha_mdebug_frame_this_id,
|
||
alpha_mdebug_frame_prev_register,
|
||
NULL,
|
||
alpha_mdebug_frame_sniffer
|
||
};
|
||
|
||
static CORE_ADDR
|
||
alpha_mdebug_frame_base_address (struct frame_info *this_frame,
|
||
void **this_prologue_cache)
|
||
{
|
||
struct alpha_mdebug_unwind_cache *info
|
||
= alpha_mdebug_frame_unwind_cache (this_frame, this_prologue_cache);
|
||
|
||
return info->vfp;
|
||
}
|
||
|
||
static CORE_ADDR
|
||
alpha_mdebug_frame_locals_address (struct frame_info *this_frame,
|
||
void **this_prologue_cache)
|
||
{
|
||
struct alpha_mdebug_unwind_cache *info
|
||
= alpha_mdebug_frame_unwind_cache (this_frame, this_prologue_cache);
|
||
|
||
return info->vfp - PROC_LOCALOFF (info->proc_desc);
|
||
}
|
||
|
||
static CORE_ADDR
|
||
alpha_mdebug_frame_args_address (struct frame_info *this_frame,
|
||
void **this_prologue_cache)
|
||
{
|
||
struct alpha_mdebug_unwind_cache *info
|
||
= alpha_mdebug_frame_unwind_cache (this_frame, this_prologue_cache);
|
||
|
||
return info->vfp - ALPHA_NUM_ARG_REGS * 8;
|
||
}
|
||
|
||
static const struct frame_base alpha_mdebug_frame_base = {
|
||
&alpha_mdebug_frame_unwind,
|
||
alpha_mdebug_frame_base_address,
|
||
alpha_mdebug_frame_locals_address,
|
||
alpha_mdebug_frame_args_address
|
||
};
|
||
|
||
static const struct frame_base *
|
||
alpha_mdebug_frame_base_sniffer (struct frame_info *this_frame)
|
||
{
|
||
CORE_ADDR pc = get_frame_address_in_block (this_frame);
|
||
struct mdebug_extra_func_info *proc_desc;
|
||
|
||
/* If this PC does not map to a PDR, then clearly this isn't an
|
||
mdebug frame. */
|
||
proc_desc = find_proc_desc (pc);
|
||
if (proc_desc == NULL)
|
||
return NULL;
|
||
|
||
/* If the maximum debuggable frame size has been exceeded, the
|
||
proc desc is bogus. Fall back on the heuristic unwinder. */
|
||
if (alpha_mdebug_max_frame_size_exceeded (proc_desc))
|
||
return 0;
|
||
|
||
return &alpha_mdebug_frame_base;
|
||
}
|
||
|
||
|
||
void
|
||
alpha_mdebug_init_abi (struct gdbarch_info info, struct gdbarch *gdbarch)
|
||
{
|
||
struct gdbarch_tdep *tdep = gdbarch_tdep (gdbarch);
|
||
|
||
frame_unwind_append_unwinder (gdbarch, &alpha_mdebug_frame_unwind);
|
||
frame_base_append_sniffer (gdbarch, alpha_mdebug_frame_base_sniffer);
|
||
}
|