mirror of
https://sourceware.org/git/binutils-gdb.git
synced 2024-11-26 03:24:41 +08:00
* findvar.c (read_register, write_register): Make these capable
of reading/writing registers that are shorter than REGISTER_TYPE. * (value_from_register): Install H8500 specific code to return proper value when register is being used as a pointer. * h8500-tdep.c: Remove extra defines of NUM_REGS. (h8500_skip_prologue): Use correct lengths for LINK instructions. (FRAME_CHAIN): Change name to h8500_frame_chain. Rewrite code to chain frames properly by combining frame pointer with T reg. (init_extra_frame_info): Delete. It's now a macro. (frame_args_address): Don't add PTR_SIZE. Stack args are already offset by the correct amount off of the frame pointer. (register_byte): Delete. It's now a macro. (register_raw_size, register_virtual_size): Delete. Replaced by common routine h8500_register_size, cuz there's no difference between the raw & virtual sizes on this machine. (register_convert_to_raw, register_convert_to_virtual): Delete, cuz there's no difference between the raw & virtual forms. Replaced by memcpy in tm file. (register_virtual_type): Rename to h8500_register_virtual_type. Get rid of pointer pseudo-regs, use _REGNUM with all reg names. (_initialize_h8500_tdep): Get rid of crock to ensure that GDB & emulator have same reg offsets. This is all handled in the simulator code now. (h8500_trapped_internalvar): New routine to detect references to convenience vars acting as pointer pseudo-regs. (h8500_value_trapped_internalvar): Conjure up value of pointer pseudo-regs. (h8500_set_trapped_internalvar): Convert set value in real register references. infcmd.c (read_pc, write_pc): Add h8500 specific code to handle code segment register. infrun.c (proceed): Simplify. Call write_pc instead of doing it by hand. (wait_for_inferior): Add h8500 specific code to add stack segment when reading SP register. remote-sim.c (fetch_register): Spacing. tm-h8500.h: #define GDB_TARGET_IS_H8500 to make it easier to detect cruft. Redo all register manipulation stuff. Get rid of pointer pseudo-regs. (INIT_EXTRA_FRAME_INFO): Adds stack segment to frame pointer. (IS_TRAPPED_INTERNALVAL, VALUE_OF_TRAPPED_INTERNALVAR, SET_TRAPPED_INTERNALVAR): Use these to create internal vars for pointer pseudo-regs.
This commit is contained in:
parent
61001d969d
commit
ccf1e898d7
@ -1,3 +1,48 @@
|
||||
Thu Mar 25 12:26:50 1993 Stu Grossman (grossman@cygnus.com)
|
||||
|
||||
* findvar.c (read_register, write_register): Make these capable
|
||||
of reading/writing registers that are shorter than REGISTER_TYPE.
|
||||
* (value_from_register): Install H8500 specific code to return
|
||||
proper value when register is being used as a pointer.
|
||||
* h8500-tdep.c: Remove extra defines of NUM_REGS.
|
||||
(h8500_skip_prologue): Use correct lengths for LINK instructions.
|
||||
(FRAME_CHAIN): Change name to h8500_frame_chain. Rewrite code to
|
||||
chain frames properly by combining frame pointer with T reg.
|
||||
(init_extra_frame_info): Delete. It's now a macro.
|
||||
(frame_args_address): Don't add PTR_SIZE. Stack args are already
|
||||
offset by the correct amount off of the frame pointer.
|
||||
(register_byte): Delete. It's now a macro.
|
||||
(register_raw_size, register_virtual_size): Delete. Replaced by
|
||||
common routine h8500_register_size, cuz there's no difference
|
||||
between the raw & virtual sizes on this machine.
|
||||
(register_convert_to_raw, register_convert_to_virtual): Delete,
|
||||
cuz there's no difference between the raw & virtual forms.
|
||||
Replaced by memcpy in tm file.
|
||||
(register_virtual_type): Rename to h8500_register_virtual_type.
|
||||
Get rid of pointer pseudo-regs, use _REGNUM with all reg names.
|
||||
(_initialize_h8500_tdep): Get rid of crock to ensure that GDB &
|
||||
emulator have same reg offsets. This is all handled in the
|
||||
simulator code now.
|
||||
(h8500_trapped_internalvar): New routine to detect references to
|
||||
convenience vars acting as pointer pseudo-regs.
|
||||
(h8500_value_trapped_internalvar): Conjure up value of pointer
|
||||
pseudo-regs.
|
||||
(h8500_set_trapped_internalvar): Convert set value in real
|
||||
register references.
|
||||
infcmd.c (read_pc, write_pc): Add h8500 specific code to handle
|
||||
code segment register.
|
||||
infrun.c (proceed): Simplify. Call write_pc instead of doing it
|
||||
by hand.
|
||||
(wait_for_inferior): Add h8500 specific code to add stack segment
|
||||
when reading SP register.
|
||||
remote-sim.c (fetch_register): Spacing.
|
||||
tm-h8500.h: #define GDB_TARGET_IS_H8500 to make it easier to
|
||||
detect cruft. Redo all register manipulation stuff. Get rid of
|
||||
pointer pseudo-regs. (INIT_EXTRA_FRAME_INFO): Adds stack segment
|
||||
to frame pointer. (IS_TRAPPED_INTERNALVAL,
|
||||
VALUE_OF_TRAPPED_INTERNALVAR, SET_TRAPPED_INTERNALVAR): Use these
|
||||
to create internal vars for pointer pseudo-regs.
|
||||
|
||||
Thu Mar 25 10:10:28 1993 Fred Fish (fnf@cygnus.com)
|
||||
|
||||
* Makefile.in: Numerous small changes to macro definitions
|
||||
|
335
gdb/h8500-tdep.c
335
gdb/h8500-tdep.c
@ -28,15 +28,13 @@ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
|
||||
#include "symtab.h"
|
||||
#include "gdbtypes.h"
|
||||
#include "gdbcmd.h"
|
||||
#include "value.h"
|
||||
#include "dis-asm.h"
|
||||
#include "../opcodes/h8500-opc.h"
|
||||
;
|
||||
#undef NUM_REGS
|
||||
#define NUM_REGS 11
|
||||
|
||||
#define UNSIGNED_SHORT(X) ((X) & 0xffff)
|
||||
|
||||
|
||||
/* Shape of an H8/500 frame :
|
||||
|
||||
|
||||
@ -79,6 +77,11 @@ int minimum_mode = 1;
|
||||
CORE_ADDR examine_prologue ();
|
||||
|
||||
void frame_find_saved_regs ();
|
||||
|
||||
int regoff[NUM_REGS] = {0, 2, 4, 6, 8, 10, 12, 14, /* r0->r7 */
|
||||
16, 18, /* ccr, pc */
|
||||
20, 21, 22, 23}; /* cp, dp, ep, tp */
|
||||
|
||||
CORE_ADDR
|
||||
h8500_skip_prologue (start_pc)
|
||||
CORE_ADDR start_pc;
|
||||
@ -86,47 +89,20 @@ h8500_skip_prologue (start_pc)
|
||||
{
|
||||
short int w;
|
||||
|
||||
|
||||
w = read_memory_integer (start_pc, 1);
|
||||
if (w == LINK_8)
|
||||
{
|
||||
start_pc ++;
|
||||
start_pc += 2;
|
||||
w = read_memory_integer (start_pc,1);
|
||||
}
|
||||
|
||||
if (w == LINK_16)
|
||||
{
|
||||
start_pc +=2;
|
||||
start_pc += 3;
|
||||
w = read_memory_integer (start_pc,2);
|
||||
}
|
||||
|
||||
/* Skip past a move to FP */
|
||||
if (IS_MOVE_FP (w))
|
||||
{
|
||||
start_pc += 2;
|
||||
w = read_memory_short (start_pc);
|
||||
}
|
||||
|
||||
/* Skip the stack adjust */
|
||||
|
||||
if (IS_MOVK_R5 (w))
|
||||
{
|
||||
start_pc += 2;
|
||||
w = read_memory_short (start_pc);
|
||||
}
|
||||
if (IS_SUB_R5SP (w))
|
||||
{
|
||||
start_pc += 2;
|
||||
w = read_memory_short (start_pc);
|
||||
}
|
||||
while (IS_SUB2_SP (w))
|
||||
{
|
||||
start_pc += 2;
|
||||
w = read_memory_short (start_pc);
|
||||
}
|
||||
|
||||
return start_pc;
|
||||
|
||||
}
|
||||
|
||||
int
|
||||
@ -150,22 +126,15 @@ print_insn (memaddr, stream)
|
||||
the function prologue to determine the caller's sp value, and return it. */
|
||||
|
||||
FRAME_ADDR
|
||||
FRAME_CHAIN (thisframe)
|
||||
h8500_frame_chain (thisframe)
|
||||
FRAME thisframe;
|
||||
{
|
||||
static int loopcount;
|
||||
static int prevr;
|
||||
if (!inside_entry_file ((thisframe)->pc))
|
||||
{
|
||||
int v = read_memory_integer ((thisframe)->frame, PTR_SIZE) ;
|
||||
|
||||
/* Detect loops in the stack */
|
||||
if (v == prevr) loopcount++;
|
||||
else loopcount = 0;
|
||||
v = prevr;
|
||||
if (loopcount > 5) return 0;
|
||||
}
|
||||
return 0;
|
||||
if (!inside_entry_file (thisframe->pc))
|
||||
return read_memory_integer(thisframe->frame, 2)
|
||||
| (read_register(SEG_T_REGNUM) << 16);
|
||||
else
|
||||
return 0;
|
||||
}
|
||||
|
||||
/* Put here the code to store, into a struct frame_saved_regs,
|
||||
@ -361,19 +330,6 @@ examine_prologue (ip, limit, after_prolog_fp, fsr, fi)
|
||||
return (ip);
|
||||
}
|
||||
#endif
|
||||
#if 0
|
||||
void
|
||||
init_extra_frame_info (fromleaf, fi)
|
||||
int fromleaf;
|
||||
struct frame_info *fi;
|
||||
{
|
||||
fi->fsr = 0; /* Not yet allocated */
|
||||
fi->args_pointer = 0; /* Unknown */
|
||||
fi->locals_pointer = 0; /* Unknown */
|
||||
fi->from_pc = 0;
|
||||
|
||||
}
|
||||
#endif
|
||||
|
||||
/* Return the saved PC from this frame. */
|
||||
|
||||
@ -381,7 +337,7 @@ CORE_ADDR
|
||||
frame_saved_pc (frame)
|
||||
FRAME frame;
|
||||
{
|
||||
return read_memory_integer ((frame)->frame + 2, PTR_SIZE);
|
||||
return read_memory_integer ((frame)->frame + 2, PTR_SIZE);
|
||||
}
|
||||
|
||||
CORE_ADDR
|
||||
@ -398,7 +354,7 @@ CORE_ADDR
|
||||
frame_args_address (fi)
|
||||
struct frame_info *fi;
|
||||
{
|
||||
return fi->frame + PTR_SIZE; /* Skip the PC */
|
||||
return fi->frame;
|
||||
}
|
||||
|
||||
void
|
||||
@ -474,127 +430,43 @@ print_register_hook (regno)
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
|
||||
#if 0
|
||||
register_byte (N)
|
||||
int
|
||||
h8500_register_size (regno)
|
||||
int regno;
|
||||
{
|
||||
return reginfo[N].offset;
|
||||
}
|
||||
#endif
|
||||
register_raw_size (N)
|
||||
{
|
||||
if (N <= R7) return 2;
|
||||
return 4;
|
||||
}
|
||||
|
||||
register_virtual_size (N)
|
||||
{
|
||||
if (N <= R7) return 2;
|
||||
return 4;
|
||||
}
|
||||
|
||||
|
||||
|
||||
register_convert_to_raw (regnum, from, to)
|
||||
int regnum;
|
||||
char *from;
|
||||
char *to;
|
||||
{
|
||||
switch (regnum)
|
||||
{
|
||||
case PR0:
|
||||
case PR1:
|
||||
case PR2:
|
||||
case PR3:
|
||||
case PR4:
|
||||
case PR5:
|
||||
case PR6:
|
||||
case PR7:
|
||||
case PC_REGNUM:
|
||||
to[0] = 0;
|
||||
to[1] = from[1];
|
||||
to[2] = from[2];
|
||||
to[3] = from[3];
|
||||
break;
|
||||
default:
|
||||
to[0] = from[0];
|
||||
to[1] = from[1];
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
register_convert_to_virtual (regnum, from, to)
|
||||
int regnum;
|
||||
char *from;
|
||||
char *to;
|
||||
{
|
||||
switch (regnum)
|
||||
{
|
||||
case PR0:
|
||||
case PR1:
|
||||
case PR2:
|
||||
case PR3:
|
||||
case PR4:
|
||||
case PR5:
|
||||
case PR6:
|
||||
case PR7:
|
||||
case PC_REGNUM:
|
||||
to[0] = 0;
|
||||
to[1] = from[1];
|
||||
to[2] = from[2];
|
||||
to[3] = from[3];
|
||||
break;
|
||||
default:
|
||||
to[0] = from[0];
|
||||
to[1] = from[1];
|
||||
break;
|
||||
}
|
||||
if (regno <= PC_REGNUM)
|
||||
return 2;
|
||||
else
|
||||
return 1;
|
||||
}
|
||||
|
||||
struct type *
|
||||
register_virtual_type (N)
|
||||
h8500_register_virtual_type (regno)
|
||||
int regno;
|
||||
{
|
||||
switch (N)
|
||||
switch (regno)
|
||||
{
|
||||
/* Although these are actually word size registers, we treat them
|
||||
like longs so that we can deal with any implicit segmentation */
|
||||
case PR0:
|
||||
case PR1:
|
||||
case PR2:
|
||||
case PR3:
|
||||
case PR4:
|
||||
case PR5:
|
||||
case PR6:
|
||||
case PR7:
|
||||
case PC_REGNUM:
|
||||
return builtin_type_unsigned_long;
|
||||
case SEG_C:
|
||||
case SEG_E:
|
||||
case SEG_D:
|
||||
case SEG_T:
|
||||
case SEG_C_REGNUM:
|
||||
case SEG_E_REGNUM:
|
||||
case SEG_D_REGNUM:
|
||||
case SEG_T_REGNUM:
|
||||
return builtin_type_unsigned_char;
|
||||
case R0:
|
||||
case R1:
|
||||
case R2:
|
||||
case R3:
|
||||
case R4:
|
||||
case R5:
|
||||
case R6:
|
||||
case R7:
|
||||
case R0_REGNUM:
|
||||
case R1_REGNUM:
|
||||
case R2_REGNUM:
|
||||
case R3_REGNUM:
|
||||
case R4_REGNUM:
|
||||
case R5_REGNUM:
|
||||
case R6_REGNUM:
|
||||
case R7_REGNUM:
|
||||
case PC_REGNUM:
|
||||
case CCR_REGNUM:
|
||||
return builtin_type_unsigned_short;
|
||||
|
||||
|
||||
default:
|
||||
abort();
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
|
||||
|
||||
/* Put here the code to store, into a struct frame_saved_regs,
|
||||
the addresses of the saved registers of frame described by FRAME_INFO.
|
||||
This includes special registers such as pc and fp saved in special
|
||||
@ -769,28 +641,119 @@ set_memory (args, from_tty)
|
||||
help_list (setmemorylist, "set memory ", -1, stdout);
|
||||
}
|
||||
|
||||
/* See if variable name is ppc or pr[0-7] */
|
||||
|
||||
int
|
||||
h8500_is_trapped_internalvar (name)
|
||||
char *name;
|
||||
{
|
||||
if (name[0] != 'p')
|
||||
return 0;
|
||||
|
||||
if (strcmp(name+1, "pc") == 0)
|
||||
return 1;
|
||||
|
||||
if (name[1] == 'r'
|
||||
&& name[2] >= '0'
|
||||
&& name[2] <= '7'
|
||||
&& name[3] == '\000')
|
||||
return 1;
|
||||
else
|
||||
return 0;
|
||||
}
|
||||
|
||||
PTR
|
||||
h8500_value_of_trapped_internalvar (var)
|
||||
struct internalvar *var;
|
||||
{
|
||||
LONGEST regval;
|
||||
unsigned char regbuf[4];
|
||||
int page_regnum, regnum;
|
||||
|
||||
regnum = var->name[2] == 'c' ? PC_REGNUM : var->name[2] - '0';
|
||||
|
||||
switch (var->name[2])
|
||||
{
|
||||
case 'c':
|
||||
page_regnum = SEG_C_REGNUM;
|
||||
break;
|
||||
case '0': case '1': case '2': case '3':
|
||||
page_regnum = SEG_D_REGNUM;
|
||||
break;
|
||||
case '4': case '5':
|
||||
page_regnum = SEG_E_REGNUM;
|
||||
break;
|
||||
case '6': case '7':
|
||||
page_regnum = SEG_T_REGNUM;
|
||||
break;
|
||||
}
|
||||
|
||||
get_saved_register (regbuf, NULL, NULL, selected_frame, page_regnum, NULL);
|
||||
regval = regbuf[0] << 16;
|
||||
|
||||
get_saved_register (regbuf, NULL, NULL, selected_frame, regnum, NULL);
|
||||
regval |= regbuf[0] << 8 | regbuf[1]; /* XXX host/target byte order */
|
||||
|
||||
free (var->value); /* Free up old value */
|
||||
|
||||
var->value = value_from_longest (builtin_type_unsigned_long, regval);
|
||||
release_value (var->value); /* Unchain new value */
|
||||
|
||||
VALUE_LVAL (var->value) = lval_internalvar;
|
||||
VALUE_INTERNALVAR (var->value) = var;
|
||||
return var->value;
|
||||
}
|
||||
|
||||
void
|
||||
h8500_set_trapped_internalvar (var, newval, bitpos, bitsize, offset)
|
||||
struct internalvar *var;
|
||||
int offset, bitpos, bitsize;
|
||||
value newval;
|
||||
{
|
||||
char *page_regnum, *regnum;
|
||||
char expression[100];
|
||||
unsigned new_regval;
|
||||
struct type *type;
|
||||
enum type_code newval_type_code;
|
||||
|
||||
type = VALUE_TYPE (newval);
|
||||
newval_type_code = TYPE_CODE (type);
|
||||
|
||||
if ((newval_type_code != TYPE_CODE_INT
|
||||
&& newval_type_code != TYPE_CODE_PTR)
|
||||
|| TYPE_LENGTH (type) != sizeof(new_regval))
|
||||
error("Illegal type (%s) for assignment to $%s\n",
|
||||
TYPE_NAME (type), var->name);
|
||||
|
||||
new_regval = *(long *)VALUE_CONTENTS_RAW(newval);
|
||||
|
||||
regnum = var->name + 1;
|
||||
|
||||
switch (var->name[2])
|
||||
{
|
||||
case 'c':
|
||||
page_regnum = "cp";
|
||||
break;
|
||||
case '0': case '1': case '2': case '3':
|
||||
page_regnum = "dp";
|
||||
break;
|
||||
case '4': case '5':
|
||||
page_regnum = "ep";
|
||||
break;
|
||||
case '6': case '7':
|
||||
page_regnum = "tp";
|
||||
break;
|
||||
}
|
||||
|
||||
sprintf (expression, "$%s=%d", page_regnum, new_regval >> 16);
|
||||
parse_and_eval(expression);
|
||||
|
||||
sprintf (expression, "$%s=%d", regnum, new_regval & 0xffff);
|
||||
parse_and_eval(expression);
|
||||
}
|
||||
|
||||
_initialize_h8500_tdep ()
|
||||
{
|
||||
/* Sanitity check a few things */
|
||||
if (FP_REGNUM != GPR6
|
||||
|| SP_REGNUM != GPR7
|
||||
|| CCR_REGNUM != GCCR
|
||||
|| PC_REGNUM != GPC
|
||||
|| SEG_C != GSEGC
|
||||
|| SEG_D != GSEGD
|
||||
|| SEG_E != GSEGE
|
||||
|| SEG_T != GSEGT
|
||||
|| PR0 != GPR0
|
||||
|| PR1 != GPR1
|
||||
|| PR2 != GPR2
|
||||
|| PR3 != GPR3
|
||||
|| PR4 != GPR4
|
||||
|| PR5 != GPR5
|
||||
|| PR6 != GPR6
|
||||
|| PR7 != GPR7)
|
||||
abort ();
|
||||
|
||||
add_prefix_cmd ("memory", no_class, set_memory,
|
||||
"set the memory model", &setmemorylist, "set memory ", 0,
|
||||
&setlist);
|
||||
|
@ -191,23 +191,22 @@ sim_wait (status)
|
||||
return 0;
|
||||
}
|
||||
|
||||
|
||||
|
||||
static void
|
||||
fetch_register(regno)
|
||||
int regno;
|
||||
int regno;
|
||||
{
|
||||
if (regno == -1)
|
||||
{
|
||||
for (regno = 0; regno < NUM_REGS; regno++)
|
||||
fetch_register(regno);
|
||||
}
|
||||
{
|
||||
for (regno = 0; regno < NUM_REGS; regno++)
|
||||
fetch_register(regno);
|
||||
}
|
||||
else
|
||||
{
|
||||
char buf[MAX_REGISTER_RAW_SIZE];
|
||||
sim_fetch_register(regno, buf);
|
||||
supply_register(regno, buf);
|
||||
}
|
||||
{
|
||||
char buf[MAX_REGISTER_RAW_SIZE];
|
||||
|
||||
sim_fetch_register(regno, buf);
|
||||
supply_register(regno, buf);
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
|
302
gdb/tm-h8500.h
Normal file
302
gdb/tm-h8500.h
Normal file
@ -0,0 +1,302 @@
|
||||
/* Parameters for execution on a H8/500 series machine.
|
||||
Copyright (C) 1993 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., 675 Mass Ave, Cambridge, MA 02139, USA. */
|
||||
|
||||
/* Contributed by Steve Chamberlain sac@cygnus.com */
|
||||
|
||||
#define GDB_TARGET_IS_H8500
|
||||
|
||||
#define IEEE_FLOAT 1
|
||||
|
||||
/* Define the bit, byte, and word ordering of the machine. */
|
||||
|
||||
#define TARGET_BYTE_ORDER BIG_ENDIAN
|
||||
|
||||
#undef TARGET_INT_BIT
|
||||
#define TARGET_INT_BIT 16
|
||||
|
||||
#undef TARGET_PTR_BIT
|
||||
#define TARGET_PTR_BIT (minimum_mode ? 16 : 32)
|
||||
|
||||
|
||||
/* Offset from address of function to start of its code.
|
||||
Zero on most machines. */
|
||||
|
||||
#define FUNCTION_START_OFFSET 0
|
||||
|
||||
/* Advance PC across any function entry prologue instructions
|
||||
to reach some "real" code. */
|
||||
|
||||
#define SKIP_PROLOGUE(ip) {(ip) = h8500_skip_prologue(ip);}
|
||||
extern CORE_ADDR h8500_skip_prologue ();
|
||||
|
||||
|
||||
/* Immediately after a function call, return the saved pc.
|
||||
Can't always go through the frames for this because on some machines
|
||||
the new frame is not set up until the new function executes
|
||||
some instructions. */
|
||||
|
||||
#define SAVED_PC_AFTER_CALL(frame) saved_pc_after_call(frame)
|
||||
|
||||
|
||||
/* Stack grows downward. */
|
||||
|
||||
#define INNER_THAN <
|
||||
|
||||
/* Illegal instruction - used by the simulator for breakpoint
|
||||
detection */
|
||||
#define BREAKPOINT {0x0b}
|
||||
|
||||
|
||||
/* If your kernel resets the pc after the trap happens you may need to
|
||||
define this before including this file. */
|
||||
|
||||
#define DECR_PC_AFTER_BREAK 0
|
||||
|
||||
|
||||
/* Nonzero if instruction at PC is a return instruction. */
|
||||
|
||||
#define ABOUT_TO_RETURN(pc) about_to_return(pc)
|
||||
|
||||
/* Return 1 if P points to an invalid floating point value. */
|
||||
|
||||
#define INVALID_FLOAT(p, len) 0 /* Just a first guess; not checked */
|
||||
|
||||
/* Say how long registers are. */
|
||||
|
||||
#define REGISTER_TYPE unsigned long
|
||||
|
||||
/* Say how much memory is needed to store a copy of the register set */
|
||||
|
||||
#define REGISTER_BYTES (24)
|
||||
|
||||
/* Index within `registers' of the first byte of the space for
|
||||
register N. */
|
||||
|
||||
int regoff[];
|
||||
#define REGISTER_BYTE(N) (regoff[N])
|
||||
|
||||
/* Number of bytes of storage in the actual machine representation
|
||||
for register N. */
|
||||
|
||||
#define REGISTER_RAW_SIZE(N) h8500_register_size(N)
|
||||
int h8500_register_size PARAMS ((int regno));
|
||||
|
||||
#define REGISTER_VIRTUAL_SIZE(N) h8500_register_size(N)
|
||||
|
||||
/* Largest value REGISTER_RAW_SIZE can have. */
|
||||
|
||||
#define MAX_REGISTER_RAW_SIZE 4
|
||||
|
||||
/* Largest value REGISTER_VIRTUAL_SIZE can have. */
|
||||
|
||||
#define MAX_REGISTER_VIRTUAL_SIZE 4
|
||||
|
||||
/* Nonzero if register N requires conversion
|
||||
from raw format to virtual format. */
|
||||
|
||||
#define REGISTER_CONVERTIBLE(N) (0)
|
||||
|
||||
/* Convert data from raw format for register REGNUM
|
||||
to virtual format for register REGNUM. */
|
||||
|
||||
#define REGISTER_CONVERT_TO_VIRTUAL(REGNUM,FROM,TO) \
|
||||
{ memcpy ((TO), (FROM), 4); }
|
||||
|
||||
/* Convert data from virtual format for register REGNUM
|
||||
to raw format for register REGNUM. */
|
||||
|
||||
#define REGISTER_CONVERT_TO_RAW(REGNUM,FROM,TO) \
|
||||
{ memcpy ((TO), (FROM), 4); }
|
||||
|
||||
/* Return the GDB type object for the "standard" data type
|
||||
of data in register N. */
|
||||
|
||||
#define REGISTER_VIRTUAL_TYPE(N) h8500_register_virtual_type(N)
|
||||
struct type *h8500_register_virtual_type PARAMS ((int regno));
|
||||
|
||||
/* Initializer for an array of names of registers.
|
||||
Entries beyond the first NUM_REGS are ignored. */
|
||||
|
||||
#define REGISTER_NAMES \
|
||||
{"r0", "r1", "r2", "r3", "r4", "r5", "r6", "r7", \
|
||||
"ccr","pc", \
|
||||
"cp","dp","ep","tp" }
|
||||
|
||||
/* 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,
|
||||
and some are "phony" register numbers which are too large
|
||||
to be actual register numbers as far as the user is concerned
|
||||
but do serve to get the desired values when passed to read_register. */
|
||||
|
||||
|
||||
#define R0_REGNUM 0
|
||||
#define R1_REGNUM 1
|
||||
#define R2_REGNUM 2
|
||||
#define R3_REGNUM 3
|
||||
#define R4_REGNUM 4
|
||||
#define R5_REGNUM 5
|
||||
#define R6_REGNUM 6
|
||||
#define R7_REGNUM 7
|
||||
|
||||
#define SP_REGNUM R7_REGNUM /* Contains address of top of stack */
|
||||
#define FP_REGNUM R6_REGNUM /* Contains address of executing stack frame */
|
||||
|
||||
#define CCR_REGNUM 8 /* Contains processor status */
|
||||
#define PC_REGNUM 9 /* Contains program counter */
|
||||
|
||||
#define SEG_C_REGNUM 10 /* Segment registers */
|
||||
#define SEG_D_REGNUM 11
|
||||
#define SEG_E_REGNUM 12
|
||||
#define SEG_T_REGNUM 13
|
||||
|
||||
#define NUM_REGS 14
|
||||
|
||||
#define PTR_SIZE (minimum_mode ? 2: 4)
|
||||
#define PTR_MASK (minimum_mode ? 0x0000ffff : 0x00ffffff)
|
||||
|
||||
/* Store the address of the place in which to copy the structure the
|
||||
subroutine will return. This is called from call_function. */
|
||||
|
||||
/*#define STORE_STRUCT_RETURN(ADDR, SP) \
|
||||
{ write_register (0, (ADDR)); abort(); }*/
|
||||
|
||||
/* 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. */
|
||||
|
||||
#define EXTRACT_RETURN_VALUE(TYPE,REGBUF,VALBUF) \
|
||||
bcopy ((char *)(REGBUF), VALBUF, TYPE_LENGTH(TYPE))
|
||||
|
||||
|
||||
/* Write into appropriate registers a function return value
|
||||
of type TYPE, given in virtual format. Assumes floats are passed
|
||||
in d0/d1. */
|
||||
|
||||
|
||||
#define STORE_RETURN_VALUE(TYPE,VALBUF) \
|
||||
write_register_bytes (0, VALBUF, TYPE_LENGTH (TYPE))
|
||||
|
||||
|
||||
/* Extract from an array REGBUF containing the (raw) register state
|
||||
the address in which a function should return its structure value,
|
||||
as a CORE_ADDR (or an expression that can be used as one). */
|
||||
|
||||
#define EXTRACT_STRUCT_VALUE_ADDRESS(REGBUF) (*(CORE_ADDR *)(REGBUF))
|
||||
|
||||
|
||||
/* Define other aspects of the stack frame. */
|
||||
|
||||
/* A macro that tells us whether the function invocation represented
|
||||
by FI does not have a frame on the stack associated with it. If it
|
||||
does not, FRAMELESS is set to 1, else 0. */
|
||||
#define FRAMELESS_FUNCTION_INVOCATION(FI, FRAMELESS) \
|
||||
(FRAMELESS) = frameless_look_for_prologue(FI)
|
||||
|
||||
/* Any function with a frame looks like this
|
||||
SECOND ARG
|
||||
FIRST ARG
|
||||
RET PC
|
||||
SAVED R2
|
||||
SAVED R3
|
||||
SAVED FP <-FP POINTS HERE
|
||||
LOCALS0
|
||||
LOCALS1 <-SP POINTS HERE
|
||||
|
||||
*/
|
||||
|
||||
CORE_ADDR h8500_frame_chain PARAMS ((FRAME thisframe));
|
||||
|
||||
#define INIT_EXTRA_FRAME_INFO(fromleaf, fci) \
|
||||
(fci)->frame |= read_register(SEG_T_REGNUM) << 16;
|
||||
|
||||
#define FRAME_CHAIN(FRAME) h8500_frame_chain(FRAME)
|
||||
|
||||
#define FRAME_SAVED_PC(FRAME) frame_saved_pc(FRAME)
|
||||
|
||||
#define FRAME_ARGS_ADDRESS(fi) frame_args_address(fi)
|
||||
|
||||
#define FRAME_LOCALS_ADDRESS(fi) frame_locals_address(fi);
|
||||
|
||||
/* Set VAL to the number of args passed to frame described by FI.
|
||||
Can set VAL to -1, meaning no way to tell. */
|
||||
|
||||
/* We can't tell how many args there are
|
||||
now that the C compiler delays popping them. */
|
||||
|
||||
#define FRAME_NUM_ARGS(val,fi) (val = -1)
|
||||
|
||||
/* Return number of bytes at start of arglist that are not really args. */
|
||||
|
||||
#define FRAME_ARGS_SKIP 0
|
||||
|
||||
/* Put here the code to store, into a struct frame_saved_regs,
|
||||
the addresses of the saved registers of frame described by FRAME_INFO.
|
||||
This includes special registers such as pc and fp saved in special
|
||||
ways in the stack frame. sp is even more special:
|
||||
the address we return for it IS the sp for the next frame. */
|
||||
|
||||
#define FRAME_FIND_SAVED_REGS(frame_info, frame_saved_regs) \
|
||||
frame_find_saved_regs(frame_info, &(frame_saved_regs))
|
||||
|
||||
|
||||
/* Push an empty stack frame, to record the current PC, etc. */
|
||||
|
||||
/*#define PUSH_DUMMY_FRAME { h8300_push_dummy_frame (); }*/
|
||||
|
||||
/* Discard from the stack the innermost frame, restoring all registers. */
|
||||
|
||||
#define POP_FRAME { h8300_pop_frame (); }
|
||||
|
||||
#define SHORT_INT_MAX 32767
|
||||
#define SHORT_INT_MIN -32768
|
||||
|
||||
|
||||
|
||||
#define BEFORE_MAIN_LOOP_HOOK \
|
||||
hms_before_main_loop();
|
||||
|
||||
|
||||
#define NAMES_HAVE_UNDERSCORE
|
||||
|
||||
typedef unsigned short INSN_WORD;
|
||||
|
||||
#define ADDR_BITS_REMOVE(addr) ((addr) & 0xffffff)
|
||||
#define ADDR_BITS_SET(addr) (((addr)))
|
||||
|
||||
#define read_memory_short(x) (read_memory_integer(x,2) & 0xffff)
|
||||
#define DONT_USE_REMOTE
|
||||
|
||||
|
||||
#define PRINT_REGISTER_HOOK(regno) print_register_hook(regno)
|
||||
|
||||
int minimum_mode;
|
||||
|
||||
#define CALL_DUMMY_LENGTH 10
|
||||
|
||||
/* Fake variables to make it easy to use 24 bit register pointers */
|
||||
|
||||
int h8500_is_trapped_internalvar PARAMS ((char *name));
|
||||
#define IS_TRAPPED_INTERNALVAR h8500_is_trapped_internalvar
|
||||
|
||||
PTR h8500_value_of_trapped_internalvar PARAMS ((struct internalvar *var));
|
||||
#define VALUE_OF_TRAPPED_INTERNALVAR h8500_value_of_trapped_internalvar
|
||||
|
||||
void h8500_set_trapped_internalvar PARAMS ((struct internalvar *var, value newval, int bitpos, int bitsize, int offset));
|
||||
#define SET_TRAPPED_INTERNALVAR h8500_set_trapped_internalvar
|
Loading…
Reference in New Issue
Block a user