mirror of
https://github.com/darlinghq/darling-gdb.git
synced 2024-12-11 22:24:42 +00:00
a1df8e780c
* core-svr4.c: Renamed to core-regset.c * Makefile.in (ALLDEPFILES): Account for renamings. * corelow.c (core_file_fns): Add, points to chain of structs. (add_core_fns): New function to build chain of structs. (get_core_registers): Modify to search core functions chain and call appropriate fetch_core_registers function based on core file flavour. * gdbcore.h (fetch_core_registers): Remove declaration. (struct core_fns): Define struct for core function info. * i386m3-nat.c: Update comment for filename change (coredep->core-aout) * a68v-nat.c (fetch_core_registers): Remove stub, not needed now. * alpha-nat.c (fetch_core_registers): Make static. (alpha_core_fns, _initialize_core_alpha): New struct and func. * core-aout.c (fetch_core_registers): Make static (aout_core_fns, _initialize_core_aout): New struct and func. * core-regset.c (fetch_core_registers): Make static. (regset_core_fns, _initialize_core_regset): New struct and func. * core-sol2.c (fetch_core_registers): Make static. (solaris_core_fns, _initialize_core_solaris): New struct and func. * hp300ux-nat.c (fetch_core_registers): Make static. (hp300ux_core_fns, _initialize_core_hp300ux): New struct and func. * i386aix-nat.c (fetch_core_registers): Make static. (i386aix_core_fns, _initialize_core_i386aix): New struct and func. * i386mach-nat.c (fetch_core_registers: Make static. (i386mach_core_fns, _initialize_core_i386mach): New struct and func. * irix4-nat.c (fetch_core_registers): Make static. (irix4_core_fns, _initialize_core_irix4): New struct and func. * irix5-nat.c (fetch_core_registers): (irix5_core_fns, _initialize_core_irix5): New struct and func. * lynx-nat.c (fetch_core_registers): Make static. (lynx_core_fns, _initialize_core_lynx): New struct and func. * mips-nat.c (fetch_core_registers): Make static. (mips_core_fns, _initialize_core_mips): New struct and func. * ns32km3-nat.c (fetch_core_registers): Remove stub. * rs6000-nat.c (fetch_core_registers): Make static. (rs6000_core_fns, _initialize_core_rs6000): New struct and func. * sparc-nat.c (fetch_core_registers): Make static. (sparc_core_fns, _initialize_core_sparc): New struct and func. * sun3-nat.c (fetch_core_registers): (sun3_core_fns, _initialize_core_sun3): New struct and func. * sun386-nat.c (fetch_core_registers): Remove stub. * ultra3-nat.c (fetch_core_registers): Make static. (ultra3_core_fns, _initialize_core_ultra3): New struct and func. * config/gould/pn.mh (XDEPFILES), config/i386/fbsd.mh (NATDEPFILES), config/i386/i386bsd.mh (NATDEPFILES), config/i386/i386m3.mh (XDEPFILES), config/i386/i386sco.mh (NATDEPFILES), config/i386/i386sco4.mh (NATDEPFILES), config/i386/i386v.mh (NATDEPFILES), config/i386/i386v32.mh (NATDEPFILES), config/i386/nbsd.mh (NATDEPFILES), config/i386/ptx.mh (XDEPFILES), config/i386/ptx4.mh (XDEPFILES), config/i386/symmetry.mh (NATDEPFILES), config/m68k/3b1.mh (XDEPFILES), config/m68k/cisco.mt (TDEPFILES), config/m68k/delta68.mh (NATDEPFILES), config/m68k/dpx2.mh (NATDEPFILES), config/m68k/hp300bsd.mh (NATDEPFILES), config/m68k/hp300hpux.mh (NATDEPFILES), config/m68k/isi.mh (XDEPFILES), config/m68k/news.mh (NATDEPFILES), config/m68k/news1000.mh (XDEPFILES), config/m88k/cxux.mh (NATDEPFILES), config/m88k/delta88.mh (NATDEPFILES), config/mips/littlemips.mh (XDEPFILES), config/mips/mipsm3.mh (XDEPFILES), config/ns32k/merlin.mh (XDEPFILES), config/ns32k/nbsd.mh (NATDEPFILES), config/ns32k/ns32km3.mh (NATDEPFILES), config/pa/hppabsd.mh (NATDEPFILES), config/pa/hppahpux.mh (NATDEPFILES), config/romp/rtbsd.mh (XDEPFILES), config/tahoe/tahoe.mh (XDEPFILES), config/vax/vaxbsd.mh (XDEPFILES), config/vax/vaxult.mh (NATDEPFILES), config/vax/vaxult2.mh (NATDEPFILES), Account for coredep.o to core-aout.o name change. * config/i386/i386dgux (NATDEPFILES), config/i386/i386sol2.mh (NATDEPFILES), config/i386/i386v4.mh (NATDEPFILES), config/i386/linux.mh (NATDEPFILES), config/i386/ncr3000.mh (NATDEPFILES), config/m68k/m68kv4.mh (NATDEPFILES), config/m88k/delta88v4.mh (NATDEPFILES), config/mips/mipsv4.mh (NATDEPFILES), Account for core-svr4.o to core-regset.o name change.
182 lines
5.1 KiB
C
182 lines
5.1 KiB
C
/* Low level interface to ns532 running mach 3.0.
|
||
Copyright (C) 1992 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 2 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, write to the Free Software
|
||
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
|
||
|
||
#include "defs.h"
|
||
#include "inferior.h"
|
||
|
||
#include <stdio.h>
|
||
|
||
#include <mach.h>
|
||
#include <mach/message.h>
|
||
#include <mach/exception.h>
|
||
#include <mach_error.h>
|
||
|
||
#define private static
|
||
|
||
|
||
/* Find offsets to thread states at compile time.
|
||
* If your compiler does not grok this, calculate offsets
|
||
* offsets yourself and use them (or get a compatible compiler :-)
|
||
*/
|
||
|
||
#define REG_N_OFFSET(reg) (int)(&((struct ns532_combined_state *)0)->ts.reg)
|
||
#define REG_F_OFFSET(reg) (int)(&((struct ns532_combined_state *)0)->fs.reg)
|
||
|
||
/* at reg_offset[i] is the offset to the ns532_combined_state
|
||
* location where the gdb registers[i] is stored.
|
||
*/
|
||
|
||
static int reg_offset[] =
|
||
{
|
||
REG_N_OFFSET(r0), REG_N_OFFSET(r1), REG_N_OFFSET(r2), REG_N_OFFSET(r3),
|
||
REG_N_OFFSET(r4), REG_N_OFFSET(r5), REG_N_OFFSET(r6), REG_N_OFFSET(r7),
|
||
REG_F_OFFSET(l0a), REG_F_OFFSET(l1a),REG_F_OFFSET(l2a),REG_F_OFFSET(l3a),
|
||
REG_F_OFFSET(l4a), REG_F_OFFSET(l5a),REG_F_OFFSET(l6a),REG_F_OFFSET(l7a),
|
||
REG_N_OFFSET(sp), REG_N_OFFSET(fp), REG_N_OFFSET(pc), REG_N_OFFSET(psr),
|
||
REG_F_OFFSET(fsr),
|
||
REG_F_OFFSET(l0a), REG_F_OFFSET(l2a),REG_F_OFFSET(l4a),REG_F_OFFSET(l6a)
|
||
/* @@@ 532 has more double length floating point regs, not accessed currently */
|
||
};
|
||
|
||
/* Fetch COUNT contiguous registers from thread STATE starting from REGNUM
|
||
* Caller knows that the regs handled in one transaction are of same size.
|
||
*/
|
||
#define FETCH_REGS(state, regnum, count) \
|
||
memcpy (®isters[REGISTER_BYTE (regnum)], \
|
||
(char *)state+reg_offset[ regnum ], \
|
||
count*REGISTER_SIZE)
|
||
|
||
/* Store COUNT contiguous registers to thread STATE starting from REGNUM */
|
||
#define STORE_REGS(state, regnum, count) \
|
||
memcpy ((char *)state+reg_offset[ regnum ], \
|
||
®isters[REGISTER_BYTE (regnum)], \
|
||
count*REGISTER_SIZE)
|
||
|
||
/*
|
||
* Fetch inferiors registers for gdb.
|
||
* REGNO specifies which (as gdb views it) register, -1 for all.
|
||
*/
|
||
|
||
void
|
||
fetch_inferior_registers (regno)
|
||
int regno;
|
||
{
|
||
kern_return_t ret;
|
||
thread_state_data_t state;
|
||
unsigned int stateCnt = NS532_COMBINED_STATE_COUNT;
|
||
int index;
|
||
|
||
if (! MACH_PORT_VALID (current_thread))
|
||
error ("fetch inferior registers: Invalid thread");
|
||
|
||
if (must_suspend_thread)
|
||
setup_thread (current_thread, 1);
|
||
|
||
ret = thread_get_state (current_thread,
|
||
NS532_COMBINED_STATE,
|
||
state,
|
||
&stateCnt);
|
||
|
||
if (ret != KERN_SUCCESS)
|
||
message ("fetch_inferior_registers: %s ",
|
||
mach_error_string (ret));
|
||
#if 0
|
||
/* It may be more effective to store validate all of them,
|
||
* since we fetched them all anyway
|
||
*/
|
||
else if (regno != -1)
|
||
supply_register (regno, (char *)state+reg_offset[regno]);
|
||
#endif
|
||
else
|
||
{
|
||
for (index = 0; index < NUM_REGS; index++)
|
||
supply_register (index, (char *)state+reg_offset[index]);
|
||
}
|
||
|
||
if (must_suspend_thread)
|
||
setup_thread (current_thread, 0);
|
||
}
|
||
|
||
/* Store our register values back into the inferior.
|
||
* If REGNO is -1, do this for all registers.
|
||
* Otherwise, REGNO specifies which register
|
||
*
|
||
* On mach3 all registers are always saved in one call.
|
||
*/
|
||
void
|
||
store_inferior_registers (regno)
|
||
int regno;
|
||
{
|
||
kern_return_t ret;
|
||
thread_state_data_t state;
|
||
unsigned int stateCnt = NS532_COMBINED_STATE_COUNT;
|
||
register int index;
|
||
|
||
if (! MACH_PORT_VALID (current_thread))
|
||
error ("store inferior registers: Invalid thread");
|
||
|
||
if (must_suspend_thread)
|
||
setup_thread (current_thread, 1);
|
||
|
||
/* Fetch the state of the current thread */
|
||
ret = thread_get_state (current_thread,
|
||
NS532_COMBINED_STATE,
|
||
state,
|
||
&stateCnt);
|
||
|
||
if (ret != KERN_SUCCESS)
|
||
{
|
||
message ("store_inferior_registers (get): %s",
|
||
mach_error_string (ret));
|
||
if (must_suspend_thread)
|
||
setup_thread (current_thread, 0);
|
||
return;
|
||
}
|
||
|
||
/* move gdb's registers to thread's state
|
||
*
|
||
* Since we save all registers anyway, save the ones
|
||
* that gdb thinks are valid (e.g. ignore the regno
|
||
* parameter)
|
||
*/
|
||
#if 0
|
||
if (regno != -1)
|
||
STORE_REGS (state, regno, 1);
|
||
else
|
||
#endif
|
||
{
|
||
for (index = 0; index < NUM_REGS; index++)
|
||
STORE_REGS (state, index, 1);
|
||
}
|
||
|
||
/* Write gdb's current view of register to the thread
|
||
*/
|
||
ret = thread_set_state (current_thread,
|
||
NS532_COMBINED_STATE,
|
||
state,
|
||
NS532_COMBINED_STATE_COUNT);
|
||
|
||
if (ret != KERN_SUCCESS)
|
||
message ("store_inferior_registers (set): %s",
|
||
mach_error_string (ret));
|
||
|
||
if (must_suspend_thread)
|
||
setup_thread (current_thread, 0);
|
||
}
|