* Makefile.in (m68k-tdep.o, m68klinux-tdep.o): Update
dependencies.
* m68k-tdep.c (NUM_FREGS): Delete.
(SIG_PC_FP_OFFSET): Delete.
(TARGET_M68K): Delete.
(P_MOVEAL_SP_FP, P_ADDAW_SP, P_ADDAL_SP, P_SUBQW_SP,
P_SUBQL_SP, P_LEA_SP_SP, P_LEA_PC_A5, P_FMOVEMX_SP,
P_MOVEL_SP, P_MOVEML_SP): Define.
(P_MOVL_SP_FP, P_MOVL, P_JSR, P_BSR, P_LEAL, P_MOVML, P_FMOVM,
P_TRAP): Delete.
(m68k_register_raw_size): Delete.
(m68k_register_virtual_size): Delete.
(m68k_register_type): Renamed from m68k_register_virtual_type and
add gdbarch argument.
(m68k_store_struct_return): Delete.
(m68k_deprecated_extract_return_value): Delete.
(m68k_deprecated_extract_struct_value_address): Delete.
(m68k_frame_chain): Delete.
(m68k_frame_saved_pc): Delete.
(m68k_fix_call_dummy): Delete.
(m68k_push_dummy_frame): Delete.
(m68k_pop_frame): Delete.
(m68k_extract_return_value): New function.
(m68k_store_return_value): Rewrite using regcache.
(m68k_extract_struct_value_address): Rewrite using regcache.
(m68k_push_dummy_call): New function.
(struct m68k_frame_cache): Define.
(m68k_alloc_frame_cache): New function.
(m68k_analyze_frame_setup): New function.
(m68k_analyze_register_saves): New function.
(m68k_analyze_prologue): New function.
(m68k_skip_prologue): Rewrite using above functions.
(m68k_unwind_pc): New function.
(m68k_frame_cache): New function.
(m68k_frame_this_id): New function.
(m68k_frame_prev_register): New function.
(m68k_frame_unwind): New variable.
(m68k_frame_p): New function.
(m68k_sigtramp_frame_cache): New function.
(m68k_sigtramp_frame_this_id): New function.
(m68k_sigtramp_frame_prev_register): New function.
(m68k_sigtramp_frame_unwind): New variable.
(m68k_sigtramp_frame_p): New function.
(m68k_frame_base_address): New function.
(m68k_frame_base): New function.
(m68k_unwind_dummy_id): New function.
(fill_gregset): Use regcache_collect.
(fill_fpregset): Likewise.
(m68k_saved_pc_after_call): Only define if SYSCALL_TRAP is
defined.
(m68k_gdbarch_init): Don't define call_dummy_words. Don't set
deprecated_init_frame_pc, deprecated_store_struct_return,
deprecated_extract_return_value, deprecated_store_return_value,
deprecated_frame_chain, deprecated_frame_saved_pc,
deprecated_frame_init_saved_regs, deprecated_register_raw_size,
deprecated_register_virtual_size,
deprecated_max_register_raw_size,
deprecated_max_register_virtual_size,
deprecated_register_virtual_type, deprecated_register_size,
deprecated_register_byte, deprecated_register_bytes,
deprecated_fp_regnum, deprecated_use_generic_dummy_frames,
call_dummy_location, deprecated_call_dummy_breakpoint_offset,
deprecated_pc_in_call_dummy, deprecated_call_dummy_length,
deprecated_call_dummy_start_offset, deprecated_call_dummy_words,
deprecated_sizeof_call_dummy_words, deprecated_fix_call_dummy,
deprecated_push_dummy_frame, deprecated_pop_frame,
deprecated_dummy_write_sp. Set deprecated_saved_pc_after_call
only if SYSCALL_TRAP is defined. Set extract_return_value,
store_return_value, extract_struct_value_address, register_type,
push_dummy_call, unwind_dummy_id, unwind_pc. Add two frame unwind
predicates.
* m68k-tdep.h (M68K_D1_REGNUM, M68K_NUM_REGS,
M68K_MAX_REGISTER_SIZE): Define.
(struct m68k_sigtramp_info): Define.
(struct gdbarch_tdep): Add get_sigtramp_info.
* m68klinux-nat.c (fetch_register): Use register_size instead of
REGISTER_RAW_SIZE. Don't put assignment in if.
(store_register): Likewise.
(fetch_inferior_registers): Likewise.
(store_inferior_registers): Likewise.
* m68klinux-tdep.c (m68k_linux_sigtramp_saved_pc): Delete.
(m68k_linux_frame_saved_pc): Delete.
(m68k_linux_sigcontext_reg_offset,
m68k_linux_ucontext_reg_offset): Define.
(m68k_linux_get_sigtramp_info): New function.
(m68k_linux_extract_return_value): Rewrite using regcache.
(m68k_linux_store_return_value): Likewise.
(m68k_linux_extract_struct_value_address): Likewise.
(m68k_linux_init_abi): Set get_sigtramp_info in tdep structure.
Don't set deprecated_frame_saved_pc,
deprecated_extract_return_value, deprecated_store_return_value,
deprecated_extract_struct_value_address. Set
extract_return_value, store_return_value,
extract_struct_value_address.
This commit is contained in:
Andreas Schwab
parent
2705e97210
commit
8de307e0c2
|
|
@ -1,3 +1,100 @@
|
|||
2003-07-07 Andreas Schwab <schwab@suse.de>
|
||||
|
||||
* Makefile.in (m68k-tdep.o, m68klinux-tdep.o): Update
|
||||
dependencies.
|
||||
* m68k-tdep.c (NUM_FREGS): Delete.
|
||||
(SIG_PC_FP_OFFSET): Delete.
|
||||
(TARGET_M68K): Delete.
|
||||
(P_MOVEAL_SP_FP, P_ADDAW_SP, P_ADDAL_SP, P_SUBQW_SP,
|
||||
P_SUBQL_SP, P_LEA_SP_SP, P_LEA_PC_A5, P_FMOVEMX_SP,
|
||||
P_MOVEL_SP, P_MOVEML_SP): Define.
|
||||
(P_MOVL_SP_FP, P_MOVL, P_JSR, P_BSR, P_LEAL, P_MOVML, P_FMOVM,
|
||||
P_TRAP): Delete.
|
||||
(m68k_register_raw_size): Delete.
|
||||
(m68k_register_virtual_size): Delete.
|
||||
(m68k_register_type): Renamed from m68k_register_virtual_type and
|
||||
add gdbarch argument.
|
||||
(m68k_store_struct_return): Delete.
|
||||
(m68k_deprecated_extract_return_value): Delete.
|
||||
(m68k_deprecated_extract_struct_value_address): Delete.
|
||||
(m68k_frame_chain): Delete.
|
||||
(m68k_frame_saved_pc): Delete.
|
||||
(m68k_fix_call_dummy): Delete.
|
||||
(m68k_push_dummy_frame): Delete.
|
||||
(m68k_pop_frame): Delete.
|
||||
(m68k_extract_return_value): New function.
|
||||
(m68k_store_return_value): Rewrite using regcache.
|
||||
(m68k_extract_struct_value_address): Rewrite using regcache.
|
||||
(m68k_push_dummy_call): New function.
|
||||
(struct m68k_frame_cache): Define.
|
||||
(m68k_alloc_frame_cache): New function.
|
||||
(m68k_analyze_frame_setup): New function.
|
||||
(m68k_analyze_register_saves): New function.
|
||||
(m68k_analyze_prologue): New function.
|
||||
(m68k_skip_prologue): Rewrite using above functions.
|
||||
(m68k_unwind_pc): New function.
|
||||
(m68k_frame_cache): New function.
|
||||
(m68k_frame_this_id): New function.
|
||||
(m68k_frame_prev_register): New function.
|
||||
(m68k_frame_unwind): New variable.
|
||||
(m68k_frame_p): New function.
|
||||
(m68k_sigtramp_frame_cache): New function.
|
||||
(m68k_sigtramp_frame_this_id): New function.
|
||||
(m68k_sigtramp_frame_prev_register): New function.
|
||||
(m68k_sigtramp_frame_unwind): New variable.
|
||||
(m68k_sigtramp_frame_p): New function.
|
||||
(m68k_frame_base_address): New function.
|
||||
(m68k_frame_base): New function.
|
||||
(m68k_unwind_dummy_id): New function.
|
||||
(fill_gregset): Use regcache_collect.
|
||||
(fill_fpregset): Likewise.
|
||||
(m68k_saved_pc_after_call): Only define if SYSCALL_TRAP is
|
||||
defined.
|
||||
(m68k_gdbarch_init): Don't define call_dummy_words. Don't set
|
||||
deprecated_init_frame_pc, deprecated_store_struct_return,
|
||||
deprecated_extract_return_value, deprecated_store_return_value,
|
||||
deprecated_frame_chain, deprecated_frame_saved_pc,
|
||||
deprecated_frame_init_saved_regs, deprecated_register_raw_size,
|
||||
deprecated_register_virtual_size,
|
||||
deprecated_max_register_raw_size,
|
||||
deprecated_max_register_virtual_size,
|
||||
deprecated_register_virtual_type, deprecated_register_size,
|
||||
deprecated_register_byte, deprecated_register_bytes,
|
||||
deprecated_fp_regnum, deprecated_use_generic_dummy_frames,
|
||||
call_dummy_location, deprecated_call_dummy_breakpoint_offset,
|
||||
deprecated_pc_in_call_dummy, deprecated_call_dummy_length,
|
||||
deprecated_call_dummy_start_offset, deprecated_call_dummy_words,
|
||||
deprecated_sizeof_call_dummy_words, deprecated_fix_call_dummy,
|
||||
deprecated_push_dummy_frame, deprecated_pop_frame,
|
||||
deprecated_dummy_write_sp. Set deprecated_saved_pc_after_call
|
||||
only if SYSCALL_TRAP is defined. Set extract_return_value,
|
||||
store_return_value, extract_struct_value_address, register_type,
|
||||
push_dummy_call, unwind_dummy_id, unwind_pc. Add two frame unwind
|
||||
predicates.
|
||||
* m68k-tdep.h (M68K_D1_REGNUM, M68K_NUM_REGS,
|
||||
M68K_MAX_REGISTER_SIZE): Define.
|
||||
(struct m68k_sigtramp_info): Define.
|
||||
(struct gdbarch_tdep): Add get_sigtramp_info.
|
||||
* m68klinux-nat.c (fetch_register): Use register_size instead of
|
||||
REGISTER_RAW_SIZE. Don't put assignment in if.
|
||||
(store_register): Likewise.
|
||||
(fetch_inferior_registers): Likewise.
|
||||
(store_inferior_registers): Likewise.
|
||||
* m68klinux-tdep.c (m68k_linux_sigtramp_saved_pc): Delete.
|
||||
(m68k_linux_frame_saved_pc): Delete.
|
||||
(m68k_linux_sigcontext_reg_offset,
|
||||
m68k_linux_ucontext_reg_offset): Define.
|
||||
(m68k_linux_get_sigtramp_info): New function.
|
||||
(m68k_linux_extract_return_value): Rewrite using regcache.
|
||||
(m68k_linux_store_return_value): Likewise.
|
||||
(m68k_linux_extract_struct_value_address): Likewise.
|
||||
(m68k_linux_init_abi): Set get_sigtramp_info in tdep structure.
|
||||
Don't set deprecated_frame_saved_pc,
|
||||
deprecated_extract_return_value, deprecated_store_return_value,
|
||||
deprecated_extract_struct_value_address. Set
|
||||
extract_return_value, store_return_value,
|
||||
extract_struct_value_address.
|
||||
|
||||
2003-07-07 Andrew Cagney <cagney@redhat.com>
|
||||
|
||||
* expprint.c: Include "user-regs.h" instead of "frame.h".
|
||||
|
|
|
|||
|
|
@ -1950,15 +1950,16 @@ m68hc11-tdep.o: m68hc11-tdep.c $(defs_h) $(frame_h) $(symtab_h) \
|
|||
$(arch_utils_h) $(regcache_h) $(target_h) $(opcode_m68hc11_h) \
|
||||
$(elf_m68hc11_h) $(elf_bfd_h)
|
||||
m68k-stub.o: m68k-stub.c
|
||||
m68k-tdep.o: m68k-tdep.c $(defs_h) $(frame_h) $(symtab_h) $(gdbcore_h) \
|
||||
$(value_h) $(gdb_string_h) $(inferior_h) $(regcache_h) \
|
||||
$(arch_utils_h) $(gregset_h) $(osabi_h) $(m68k_tdep_h)
|
||||
m68k-tdep.o: m68k-tdep.c $(defs_h) $(frame_h) $(frame_base_h) \
|
||||
$(frame_unwind_h) $(symtab_h) $(gdbcore_h) $(value_h) $(gdb_string_h) \
|
||||
$(gdb_assert_h) $(inferior_h) $(regcache_h) $(arch_utils_h) \
|
||||
$(gregset_h) $(osabi_h) $(m68k_tdep_h)
|
||||
m68klinux-nat.o: m68klinux-nat.c $(defs_h) $(frame_h) $(inferior_h) \
|
||||
$(language_h) $(gdbcore_h) $(gdb_string_h) $(regcache_h) \
|
||||
$(m68k_tdep_h) $(gdb_stat_h) $(floatformat_h) $(target_h)
|
||||
m68klinux-tdep.o: m68klinux-tdep.c $(defs_h) $(gdbcore_h) $(frame_h) \
|
||||
$(target_h) $(gdb_string_h) $(gdbtypes_h) $(osabi_h) $(regcache_h) \
|
||||
$(objfiles_h) $(symtab_h) $(m68k_tdep_t)
|
||||
m68klinux-tdep.o: m68klinux-tdep.c $(defs_h) $(gdbcore_h) $(doublest) \
|
||||
$(floatformat_h) $(frame_h) $(target_h) $(gdb_string_h) $(gdbtypes_h) \
|
||||
$(osabi_h) $(regcache_h) $(objfiles_h) $(symtab_h) $(m68k_tdep_t)
|
||||
m68knbsd-nat.o: m68knbsd-nat.c $(defs_h) $(inferior_h) $(gdbcore_h) \
|
||||
$(regcache_h)
|
||||
m68knbsd-tdep.o: m68knbsd-tdep.c $(defs_h) $(gdbtypes_h) $(regcache_h)
|
||||
|
|
|
|||
1131
gdb/m68k-tdep.c
1131
gdb/m68k-tdep.c
File diff suppressed because it is too large
Load Diff
|
|
@ -22,6 +22,8 @@
|
|||
#ifndef M68K_TDEP_H
|
||||
#define M68K_TDEP_H
|
||||
|
||||
struct frame_info;
|
||||
|
||||
/* Register numbers of various important registers.
|
||||
Note that some of these values are "real" register numbers,
|
||||
and correspond to the general registers of the machine,
|
||||
|
|
@ -32,6 +34,7 @@
|
|||
enum
|
||||
{
|
||||
M68K_D0_REGNUM = 0,
|
||||
M68K_D1_REGNUM = 1,
|
||||
M68K_A0_REGNUM = 8,
|
||||
M68K_A1_REGNUM = 9,
|
||||
M68K_FP_REGNUM = 14, /* Contains address of executing stack frame */
|
||||
|
|
@ -44,6 +47,20 @@ enum
|
|||
M68K_FPI_REGNUM = 28
|
||||
};
|
||||
|
||||
#define M68K_NUM_REGS (M68K_FPI_REGNUM + 1)
|
||||
|
||||
/* Size of the largest register. */
|
||||
#define M68K_MAX_REGISTER_SIZE 12
|
||||
|
||||
struct m68k_sigtramp_info
|
||||
{
|
||||
/* Address of sigcontext. */
|
||||
CORE_ADDR sigcontext_addr;
|
||||
|
||||
/* Offset of registers in `struct sigcontext'. */
|
||||
int *sc_reg_offset;
|
||||
};
|
||||
|
||||
/* Target-dependent structure in gdbarch. */
|
||||
struct gdbarch_tdep
|
||||
{
|
||||
|
|
@ -52,6 +69,9 @@ struct gdbarch_tdep
|
|||
int jb_pc;
|
||||
/* The size of each entry in the jump buffer. */
|
||||
size_t jb_elt_size;
|
||||
|
||||
/* Get info about sigtramp. */
|
||||
struct m68k_sigtramp_info (*get_sigtramp_info) (struct frame_info *);
|
||||
};
|
||||
|
||||
#endif /* M68K_TDEP_H */
|
||||
|
|
|
|||
|
|
@ -140,23 +140,25 @@ fetch_register (int regno)
|
|||
|
||||
if (CANNOT_FETCH_REGISTER (regno))
|
||||
{
|
||||
memset (buf, '\0', REGISTER_RAW_SIZE (regno)); /* Supply zeroes */
|
||||
memset (buf, '\0', register_size (current_gdbarch, regno)); /* Supply zeroes */
|
||||
supply_register (regno, buf);
|
||||
return;
|
||||
}
|
||||
|
||||
/* Overload thread id onto process id */
|
||||
if ((tid = TIDGET (inferior_ptid)) == 0)
|
||||
tid = TIDGET (inferior_ptid);
|
||||
if (tid == 0)
|
||||
tid = PIDGET (inferior_ptid); /* no thread id, just use process id */
|
||||
|
||||
offset = U_REGS_OFFSET;
|
||||
|
||||
regaddr = register_addr (regno, offset);
|
||||
for (i = 0; i < REGISTER_RAW_SIZE (regno); i += sizeof (PTRACE_XFER_TYPE))
|
||||
for (i = 0; i < register_size (current_gdbarch, regno);
|
||||
i += sizeof (PTRACE_XFER_TYPE))
|
||||
{
|
||||
errno = 0;
|
||||
*(PTRACE_XFER_TYPE *) & buf[i] = ptrace (PT_READ_U, tid,
|
||||
(PTRACE_ARG3_TYPE) regaddr, 0);
|
||||
*(PTRACE_XFER_TYPE *) &buf[i] = ptrace (PT_READ_U, tid,
|
||||
(PTRACE_ARG3_TYPE) regaddr, 0);
|
||||
regaddr += sizeof (PTRACE_XFER_TYPE);
|
||||
if (errno != 0)
|
||||
{
|
||||
|
|
@ -207,7 +209,8 @@ store_register (int regno)
|
|||
}
|
||||
|
||||
/* Overload thread id onto process id */
|
||||
if ((tid = TIDGET (inferior_ptid)) == 0)
|
||||
tid = TIDGET (inferior_ptid);
|
||||
if (tid == 0)
|
||||
tid = PIDGET (inferior_ptid); /* no thread id, just use process id */
|
||||
|
||||
offset = U_REGS_OFFSET;
|
||||
|
|
@ -218,7 +221,8 @@ store_register (int regno)
|
|||
regcache_collect (regno, buf);
|
||||
|
||||
/* Store the local buffer into the inferior a chunk at the time. */
|
||||
for (i = 0; i < REGISTER_RAW_SIZE (regno); i += sizeof (PTRACE_XFER_TYPE))
|
||||
for (i = 0; i < register_size (current_gdbarch, regno);
|
||||
i += sizeof (PTRACE_XFER_TYPE))
|
||||
{
|
||||
errno = 0;
|
||||
ptrace (PT_WRITE_U, tid, (PTRACE_ARG3_TYPE) regaddr,
|
||||
|
|
@ -293,7 +297,7 @@ fill_gregset (elf_gregset_t *gregsetp, int regno)
|
|||
int i;
|
||||
|
||||
for (i = 0; i < NUM_GREGS; i++)
|
||||
if ((regno == -1 || regno == i))
|
||||
if (regno == -1 || regno == i)
|
||||
regcache_collect (i, regp + regmap[i]);
|
||||
}
|
||||
|
||||
|
|
@ -450,7 +454,8 @@ fetch_inferior_registers (int regno)
|
|||
}
|
||||
|
||||
/* GNU/Linux LWP ID's are process ID's. */
|
||||
if ((tid = TIDGET (inferior_ptid)) == 0)
|
||||
tid = TIDGET (inferior_ptid);
|
||||
if (tid == 0)
|
||||
tid = PIDGET (inferior_ptid); /* Not a threaded program. */
|
||||
|
||||
/* Use the PTRACE_GETFPXREGS request whenever possible, since it
|
||||
|
|
@ -505,7 +510,8 @@ store_inferior_registers (int regno)
|
|||
}
|
||||
|
||||
/* GNU/Linux LWP ID's are process ID's. */
|
||||
if ((tid = TIDGET (inferior_ptid)) == 0)
|
||||
tid = TIDGET (inferior_ptid);
|
||||
if (tid == 0)
|
||||
tid = PIDGET (inferior_ptid); /* Not a threaded program. */
|
||||
|
||||
/* Use the PTRACE_SETFPREGS requests whenever possible, since it
|
||||
|
|
|
|||
|
|
@ -22,6 +22,8 @@
|
|||
|
||||
#include "defs.h"
|
||||
#include "gdbcore.h"
|
||||
#include "doublest.h"
|
||||
#include "floatformat.h"
|
||||
#include "frame.h"
|
||||
#include "target.h"
|
||||
#include "gdb_string.h"
|
||||
|
|
@ -51,9 +53,9 @@
|
|||
/* moveq #82,d0; notb d0; trap #0 */ \
|
||||
|| (insn1 == 0x70524600 && (insn2 >> 16) == 0x4e40))
|
||||
|
||||
/* Return non-zero if PC points into the signal trampoline. For the sake
|
||||
of m68k_linux_frame_saved_pc we also distinguish between non-RT and RT
|
||||
signal trampolines. */
|
||||
/* Return non-zero if PC points into the signal trampoline. For the
|
||||
sake of m68k_linux_get_sigtramp_info we also distinguish between
|
||||
non-RT and RT signal trampolines. */
|
||||
|
||||
static int
|
||||
m68k_linux_pc_in_sigtramp (CORE_ADDR pc, char *name)
|
||||
|
|
@ -87,100 +89,183 @@ m68k_linux_pc_in_sigtramp (CORE_ADDR pc, char *name)
|
|||
return 0;
|
||||
}
|
||||
|
||||
/* Offset to saved PC in sigcontext, from <asm/sigcontext.h>. */
|
||||
#define SIGCONTEXT_PC_OFFSET 26
|
||||
|
||||
/* Offset to saved PC in ucontext, from <asm/ucontext.h>. */
|
||||
#define UCONTEXT_PC_OFFSET 88
|
||||
|
||||
/* Get saved user PC for sigtramp from sigcontext or ucontext. */
|
||||
|
||||
static CORE_ADDR
|
||||
m68k_linux_sigtramp_saved_pc (struct frame_info *frame)
|
||||
/* From <asm/sigcontext.h>. */
|
||||
static int m68k_linux_sigcontext_reg_offset[M68K_NUM_REGS] =
|
||||
{
|
||||
CORE_ADDR sigcontext_addr;
|
||||
char buf[TARGET_PTR_BIT / TARGET_CHAR_BIT];
|
||||
int ptrbytes = TARGET_PTR_BIT / TARGET_CHAR_BIT;
|
||||
int sigcontext_offs = (2 * TARGET_INT_BIT) / TARGET_CHAR_BIT;
|
||||
2 * 4, /* %d0 */
|
||||
3 * 4, /* %d1 */
|
||||
-1, /* %d2 */
|
||||
-1, /* %d3 */
|
||||
-1, /* %d4 */
|
||||
-1, /* %d5 */
|
||||
-1, /* %d6 */
|
||||
-1, /* %d7 */
|
||||
4 * 4, /* %a0 */
|
||||
5 * 4, /* %a1 */
|
||||
-1, /* %a2 */
|
||||
-1, /* %a3 */
|
||||
-1, /* %a4 */
|
||||
-1, /* %a5 */
|
||||
-1, /* %fp */
|
||||
1 * 4, /* %sp */
|
||||
5 * 4 + 2, /* %sr */
|
||||
6 * 4 + 2, /* %pc */
|
||||
8 * 4, /* %fp0 */
|
||||
11 * 4, /* %fp1 */
|
||||
-1, /* %fp2 */
|
||||
-1, /* %fp3 */
|
||||
-1, /* %fp4 */
|
||||
-1, /* %fp5 */
|
||||
-1, /* %fp6 */
|
||||
-1, /* %fp7 */
|
||||
14 * 4, /* %fpcr */
|
||||
15 * 4, /* %fpsr */
|
||||
16 * 4 /* %fpiaddr */
|
||||
};
|
||||
|
||||
/* From <asm/ucontext.h>. */
|
||||
static int m68k_linux_ucontext_reg_offset[M68K_NUM_REGS] =
|
||||
{
|
||||
6 * 4, /* %d0 */
|
||||
7 * 4, /* %d1 */
|
||||
8 * 4, /* %d2 */
|
||||
9 * 4, /* %d3 */
|
||||
10 * 4, /* %d4 */
|
||||
11 * 4, /* %d5 */
|
||||
12 * 4, /* %d6 */
|
||||
13 * 4, /* %d7 */
|
||||
14 * 4, /* %a0 */
|
||||
15 * 4, /* %a1 */
|
||||
16 * 4, /* %a2 */
|
||||
17 * 4, /* %a3 */
|
||||
18 * 4, /* %a4 */
|
||||
19 * 4, /* %a5 */
|
||||
20 * 4, /* %fp */
|
||||
21 * 4, /* %sp */
|
||||
23 * 4, /* %sr */
|
||||
22 * 4, /* %pc */
|
||||
27 * 4, /* %fp0 */
|
||||
30 * 4, /* %fp1 */
|
||||
33 * 4, /* %fp2 */
|
||||
36 * 4, /* %fp3 */
|
||||
39 * 4, /* %fp4 */
|
||||
42 * 4, /* %fp5 */
|
||||
45 * 4, /* %fp6 */
|
||||
48 * 4, /* %fp7 */
|
||||
24 * 4, /* %fpcr */
|
||||
25 * 4, /* %fpsr */
|
||||
26 * 4 /* %fpiaddr */
|
||||
};
|
||||
|
||||
|
||||
/* Get info about saved registers in sigtramp. */
|
||||
|
||||
static struct m68k_sigtramp_info
|
||||
m68k_linux_get_sigtramp_info (struct frame_info *next_frame)
|
||||
{
|
||||
CORE_ADDR sp;
|
||||
char buf[4];
|
||||
struct m68k_sigtramp_info info;
|
||||
|
||||
frame_unwind_register (next_frame, M68K_SP_REGNUM, buf);
|
||||
sp = extract_unsigned_integer (buf, 4);
|
||||
|
||||
/* Get sigcontext address, it is the third parameter on the stack. */
|
||||
if (get_next_frame (frame))
|
||||
sigcontext_addr
|
||||
= read_memory_unsigned_integer (get_frame_base (get_next_frame (frame))
|
||||
+ FRAME_ARGS_SKIP
|
||||
+ sigcontext_offs,
|
||||
ptrbytes);
|
||||
else
|
||||
sigcontext_addr
|
||||
= read_memory_unsigned_integer (read_register (SP_REGNUM)
|
||||
+ sigcontext_offs,
|
||||
ptrbytes);
|
||||
info.sigcontext_addr = read_memory_unsigned_integer (sp + 8, 4);
|
||||
|
||||
/* Don't cause a memory_error when accessing sigcontext in case the
|
||||
stack layout has changed or the stack is corrupt. */
|
||||
if (m68k_linux_pc_in_sigtramp (get_frame_pc (frame), 0) == 2)
|
||||
target_read_memory (sigcontext_addr + UCONTEXT_PC_OFFSET, buf, ptrbytes);
|
||||
if (m68k_linux_pc_in_sigtramp (frame_pc_unwind (next_frame), 0) == 2)
|
||||
info.sc_reg_offset = m68k_linux_ucontext_reg_offset;
|
||||
else
|
||||
target_read_memory (sigcontext_addr + SIGCONTEXT_PC_OFFSET, buf, ptrbytes);
|
||||
return extract_unsigned_integer (buf, ptrbytes);
|
||||
info.sc_reg_offset = m68k_linux_sigcontext_reg_offset;
|
||||
return info;
|
||||
}
|
||||
|
||||
/* Return the saved program counter for FRAME. */
|
||||
|
||||
static CORE_ADDR
|
||||
m68k_linux_frame_saved_pc (struct frame_info *frame)
|
||||
{
|
||||
if (get_frame_type (frame) == SIGTRAMP_FRAME)
|
||||
return m68k_linux_sigtramp_saved_pc (frame);
|
||||
|
||||
return read_memory_unsigned_integer (get_frame_base (frame) + 4, 4);
|
||||
}
|
||||
|
||||
/* The following definitions are appropriate when using the ELF
|
||||
format, where floating point values are returned in fp0, pointer
|
||||
values in a0 and other values in d0. */
|
||||
|
||||
/* Extract from an array REGBUF containing the (raw) register state a
|
||||
function return value of type TYPE, and copy that, in virtual
|
||||
format, into VALBUF. */
|
||||
/* Extract from an array REGBUF containing the (raw) register state, a
|
||||
function return value of TYPE, and copy that, in virtual format,
|
||||
into VALBUF. */
|
||||
|
||||
static void
|
||||
m68k_linux_extract_return_value (struct type *type, char *regbuf, char *valbuf)
|
||||
m68k_linux_extract_return_value (struct type *type, struct regcache *regcache,
|
||||
void *valbuf)
|
||||
{
|
||||
int len = TYPE_LENGTH (type);
|
||||
char buf[M68K_MAX_REGISTER_SIZE];
|
||||
|
||||
if (TYPE_CODE (type) == TYPE_CODE_STRUCT
|
||||
&& TYPE_NFIELDS (type) == 1)
|
||||
{
|
||||
m68k_linux_extract_return_value (TYPE_FIELD_TYPE (type, 0), regcache,
|
||||
valbuf);
|
||||
return;
|
||||
}
|
||||
|
||||
if (TYPE_CODE (type) == TYPE_CODE_FLT)
|
||||
{
|
||||
DEPRECATED_REGISTER_CONVERT_TO_VIRTUAL (FP0_REGNUM, type,
|
||||
regbuf + REGISTER_BYTE (FP0_REGNUM),
|
||||
valbuf);
|
||||
regcache_raw_read (regcache, M68K_FP0_REGNUM, buf);
|
||||
convert_typed_floating (buf, builtin_type_m68881_ext, valbuf, type);
|
||||
}
|
||||
else if (TYPE_CODE (type) == TYPE_CODE_PTR)
|
||||
memcpy (valbuf, regbuf + REGISTER_BYTE (M68K_A0_REGNUM),
|
||||
TYPE_LENGTH (type));
|
||||
regcache_raw_read (regcache, M68K_A0_REGNUM, valbuf);
|
||||
else
|
||||
memcpy (valbuf,
|
||||
regbuf + (TYPE_LENGTH (type) >= 4 ? 0 : 4 - TYPE_LENGTH (type)),
|
||||
TYPE_LENGTH (type));
|
||||
{
|
||||
if (len <= 4)
|
||||
{
|
||||
regcache_raw_read (regcache, M68K_D0_REGNUM, buf);
|
||||
memcpy (valbuf, buf + (4 - len), len);
|
||||
}
|
||||
else if (len <= 8)
|
||||
{
|
||||
regcache_raw_read (regcache, M68K_D0_REGNUM, buf);
|
||||
memcpy (valbuf, buf + (8 - len), len - 4);
|
||||
regcache_raw_read (regcache, M68K_D1_REGNUM,
|
||||
(char *) valbuf + (len - 4));
|
||||
}
|
||||
else
|
||||
internal_error (__FILE__, __LINE__,
|
||||
"Cannot extract return value of %d bytes long.", len);
|
||||
}
|
||||
}
|
||||
|
||||
/* Write into appropriate registers a function return value of type
|
||||
TYPE, given in virtual format. */
|
||||
/* Write into the appropriate registers a function return value stored
|
||||
in VALBUF of type TYPE, given in virtual format. */
|
||||
|
||||
static void
|
||||
m68k_linux_store_return_value (struct type *type, char *valbuf)
|
||||
m68k_linux_store_return_value (struct type *type, struct regcache *regcache,
|
||||
const void *valbuf)
|
||||
{
|
||||
int len = TYPE_LENGTH (type);
|
||||
|
||||
if (TYPE_CODE (type) == TYPE_CODE_STRUCT
|
||||
&& TYPE_NFIELDS (type) == 1)
|
||||
{
|
||||
m68k_linux_store_return_value (TYPE_FIELD_TYPE (type, 0), regcache,
|
||||
valbuf);
|
||||
return;
|
||||
}
|
||||
|
||||
if (TYPE_CODE (type) == TYPE_CODE_FLT)
|
||||
{
|
||||
char raw_buffer[REGISTER_RAW_SIZE (FP0_REGNUM)];
|
||||
DEPRECATED_REGISTER_CONVERT_TO_RAW (type, FP0_REGNUM, valbuf, raw_buffer);
|
||||
deprecated_write_register_bytes (REGISTER_BYTE (FP0_REGNUM),
|
||||
raw_buffer, TYPE_LENGTH (type));
|
||||
char buf[M68K_MAX_REGISTER_SIZE];
|
||||
convert_typed_floating (valbuf, type, buf, builtin_type_m68881_ext);
|
||||
regcache_raw_write (regcache, M68K_FP0_REGNUM, buf);
|
||||
}
|
||||
else if (TYPE_CODE (type) == TYPE_CODE_PTR)
|
||||
regcache_raw_write (regcache, M68K_A0_REGNUM, valbuf);
|
||||
else
|
||||
{
|
||||
if (TYPE_CODE (type) == TYPE_CODE_PTR)
|
||||
deprecated_write_register_bytes (REGISTER_BYTE (M68K_A0_REGNUM),
|
||||
valbuf, TYPE_LENGTH (type));
|
||||
deprecated_write_register_bytes (0, valbuf, TYPE_LENGTH (type));
|
||||
if (len <= 4)
|
||||
regcache_raw_write_part (regcache, M68K_D0_REGNUM,
|
||||
4 - len, len, valbuf);
|
||||
else if (len <= 8)
|
||||
{
|
||||
regcache_raw_write_part (regcache, M68K_D1_REGNUM, 8 - len,
|
||||
len - 4, valbuf);
|
||||
regcache_raw_write (regcache, M68K_D0_REGNUM,
|
||||
(char *) valbuf + (len - 4));
|
||||
}
|
||||
else
|
||||
internal_error (__FILE__, __LINE__,
|
||||
"Cannot store return value of %d bytes long.", len);
|
||||
}
|
||||
}
|
||||
|
||||
|
|
@ -189,9 +274,12 @@ m68k_linux_store_return_value (struct type *type, char *valbuf)
|
|||
as a CORE_ADDR. */
|
||||
|
||||
static CORE_ADDR
|
||||
m68k_linux_extract_struct_value_address (char *regbuf)
|
||||
m68k_linux_extract_struct_value_address (struct regcache *regcache)
|
||||
{
|
||||
return *(CORE_ADDR *) (regbuf + REGISTER_BYTE (M68K_A0_REGNUM));
|
||||
char buf[4];
|
||||
|
||||
regcache_cooked_read (regcache, M68K_A0_REGNUM, buf);
|
||||
return extract_unsigned_integer (buf, 4);
|
||||
}
|
||||
|
||||
static void
|
||||
|
|
@ -201,15 +289,12 @@ m68k_linux_init_abi (struct gdbarch_info info, struct gdbarch *gdbarch)
|
|||
|
||||
tdep->jb_pc = M68K_LINUX_JB_PC;
|
||||
tdep->jb_elt_size = M68K_LINUX_JB_ELEMENT_SIZE;
|
||||
tdep->get_sigtramp_info = m68k_linux_get_sigtramp_info;
|
||||
|
||||
set_gdbarch_deprecated_frame_saved_pc (gdbarch,
|
||||
m68k_linux_frame_saved_pc);
|
||||
set_gdbarch_deprecated_extract_return_value (gdbarch,
|
||||
m68k_linux_extract_return_value);
|
||||
set_gdbarch_deprecated_store_return_value (gdbarch,
|
||||
m68k_linux_store_return_value);
|
||||
set_gdbarch_deprecated_extract_struct_value_address (gdbarch,
|
||||
m68k_linux_extract_struct_value_address);
|
||||
set_gdbarch_extract_return_value (gdbarch, m68k_linux_extract_return_value);
|
||||
set_gdbarch_store_return_value (gdbarch, m68k_linux_store_return_value);
|
||||
set_gdbarch_extract_struct_value_address (gdbarch,
|
||||
m68k_linux_extract_struct_value_address);
|
||||
|
||||
set_gdbarch_pc_in_sigtramp (gdbarch, m68k_linux_pc_in_sigtramp);
|
||||
|
||||
|
|
|
|||
Loading…
Reference in New Issue