Obsolete w65-*-* target.

This commit is contained in:
Andrew Cagney 2001-04-03 21:56:01 +00:00
parent 52071915c8
commit 76f4ea5303
7 changed files with 517 additions and 508 deletions

View File

@ -1,3 +1,13 @@
2001-04-03 Andrew Cagney <ac131313@redhat.com>
Obsolete w65-*-* target.
* configure.tgt (w65-*-*): Obsolete.
* config/w65/w65.mt: Obsolete.
* config/w65/tm-w65.h: Obsolete.
* w65-tdep.c: Obsolete.
* NEWS: Update. Fix TiC80 description.
* TODO: Update.
2001-04-03 Andrew Cagney <ac131313@redhat.com> 2001-04-03 Andrew Cagney <ac131313@redhat.com>
Obsolete tic80-*-* target. Obsolete tic80-*-* target.

View File

@ -18,7 +18,8 @@ x86 FreeBSD before 2.2 i[3456]86*-freebsd{1,2.[01]}*,
Harris/CXUX m88k m88*-harris-cxux* Harris/CXUX m88k m88*-harris-cxux*
Most ns32k hosts and targets ns32k-*-mach3* ns32k-umax-* Most ns32k hosts and targets ns32k-*-mach3* ns32k-umax-*
ns32k-utek-sysv* ns32k-utek-* ns32k-utek-sysv* ns32k-utek-*
TiC80 32 Bit DSP target tic80-*-* TI TMS320C80 tic80-*-*
WDC 65816 w65-*-*
stuff.c (Program to stuff files into a specially prepared space in kdb) stuff.c (Program to stuff files into a specially prepared space in kdb)
kdb-start.c (Main loop for the standalone kernel debugger) kdb-start.c (Main loop for the standalone kernel debugger)

View File

@ -198,7 +198,7 @@ Steps:
powerpcle-*-solaris* powerpc solaris solaris powerpcle-*-solaris* powerpc solaris solaris
powerpcle-*-cygwin* powerpc cygwin cygwin powerpcle-*-cygwin* powerpc cygwin cygwin
powerpc-*-netware* powerpc - ppc-nw powerpc-*-netware* powerpc - ppc-nw
w65-*-* w65 - w65 w65-*-* w65 - w65 yes
i[3456]86-*-sunos* i386 sun386 sun386 i[3456]86-*-sunos* i386 sun386 sun386
(DONE) (DONE)

View File

@ -1,214 +1,214 @@
/* Parameters for execution on a WDC 65816 machine. /* OBSOLETE /* Parameters for execution on a WDC 65816 machine. */
Copyright 1995, 1998, 1999, 2000 Free Software Foundation, Inc. /* OBSOLETE Copyright 1995, 1998, 1999, 2000 Free Software Foundation, Inc. */
/* OBSOLETE */
This file is part of GDB. /* OBSOLETE This file is part of GDB. */
/* OBSOLETE */
This program is free software; you can redistribute it and/or modify /* OBSOLETE 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 /* OBSOLETE it under the terms of the GNU General Public License as published by */
the Free Software Foundation; either version 2 of the License, or /* OBSOLETE the Free Software Foundation; either version 2 of the License, or */
(at your option) any later version. /* OBSOLETE (at your option) any later version. */
/* OBSOLETE */
This program is distributed in the hope that it will be useful, /* OBSOLETE This program is distributed in the hope that it will be useful, */
but WITHOUT ANY WARRANTY; without even the implied warranty of /* OBSOLETE but WITHOUT ANY WARRANTY; without even the implied warranty of */
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the /* OBSOLETE MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the */
GNU General Public License for more details. /* OBSOLETE GNU General Public License for more details. */
/* OBSOLETE */
You should have received a copy of the GNU General Public License /* OBSOLETE You should have received a copy of the GNU General Public License */
along with this program; if not, write to the Free Software /* OBSOLETE along with this program; if not, write to the Free Software */
Foundation, Inc., 59 Temple Place - Suite 330, /* OBSOLETE Foundation, Inc., 59 Temple Place - Suite 330, */
Boston, MA 02111-1307, USA. */ /* OBSOLETE Boston, MA 02111-1307, USA. */ */
/* OBSOLETE */
#include "regcache.h" /* OBSOLETE #include "regcache.h" */
/* OBSOLETE */
/* Contributed by Steve Chamberlain sac@cygnus.com */ /* OBSOLETE /* Contributed by Steve Chamberlain sac@cygnus.com */ */
/* OBSOLETE */
#define GDB_TARGET_IS_W65 /* OBSOLETE #define GDB_TARGET_IS_W65 */
/* OBSOLETE */
#define IEEE_FLOAT (1) /* OBSOLETE #define IEEE_FLOAT (1) */
/* OBSOLETE */
/* Define the bit, byte, and word ordering of the machine. */ /* OBSOLETE /* Define the bit, byte, and word ordering of the machine. */ */
/* OBSOLETE */
#define TARGET_BYTE_ORDER LITTLE_ENDIAN /* OBSOLETE #define TARGET_BYTE_ORDER LITTLE_ENDIAN */
/* OBSOLETE */
/* OBSOLETE */
/* Offset from address of function to start of its code. /* OBSOLETE /* Offset from address of function to start of its code. */
Zero on most machines. */ /* OBSOLETE Zero on most machines. */ */
/* OBSOLETE */
#define FUNCTION_START_OFFSET 0 /* OBSOLETE #define FUNCTION_START_OFFSET 0 */
/* OBSOLETE */
/* Advance PC across any function entry prologue instructions /* OBSOLETE /* Advance PC across any function entry prologue instructions */
to reach some "real" code. */ /* OBSOLETE to reach some "real" code. */ */
/* OBSOLETE */
extern CORE_ADDR w65_skip_prologue (); /* OBSOLETE extern CORE_ADDR w65_skip_prologue (); */
/* OBSOLETE */
#define SKIP_PROLOGUE(ip) \ /* OBSOLETE #define SKIP_PROLOGUE(ip) \ */
{(ip) = w65_skip_prologue(ip);} /* OBSOLETE {(ip) = w65_skip_prologue(ip);} */
/* OBSOLETE */
/* OBSOLETE */
/* Immediately after a function call, return the saved pc. /* OBSOLETE /* Immediately after a function call, return the saved pc. */
Can't always go through the frames for this because on some machines /* OBSOLETE 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 /* OBSOLETE the new frame is not set up until the new function executes */
some instructions. /* OBSOLETE some instructions. */
/* OBSOLETE */
The return address is the value saved in the PR register + 4 */ /* OBSOLETE The return address is the value saved in the PR register + 4 */ */
/* OBSOLETE */
#define SAVED_PC_AFTER_CALL(frame) \ /* OBSOLETE #define SAVED_PC_AFTER_CALL(frame) \ */
saved_pc_after_call(frame) /* OBSOLETE saved_pc_after_call(frame) */
/* OBSOLETE */
/* OBSOLETE */
/* Stack grows downward. */ /* OBSOLETE /* Stack grows downward. */ */
/* OBSOLETE */
#define INNER_THAN(lhs,rhs) ((lhs) < (rhs)) /* OBSOLETE #define INNER_THAN(lhs,rhs) ((lhs) < (rhs)) */
/* OBSOLETE */
/* Illegal instruction - used by the simulator for breakpoint /* OBSOLETE /* Illegal instruction - used by the simulator for breakpoint */
detection */ /* OBSOLETE detection */ */
/* OBSOLETE */
#define BREAKPOINT {0xcb} /* WAI */ /* OBSOLETE #define BREAKPOINT {0xcb} /* WAI */ */
/* OBSOLETE */
/* If your kernel resets the pc after the trap happens you may need to /* OBSOLETE /* If your kernel resets the pc after the trap happens you may need to */
define this before including this file. */ /* OBSOLETE define this before including this file. */ */
#define DECR_PC_AFTER_BREAK 0 /* OBSOLETE #define DECR_PC_AFTER_BREAK 0 */
/* OBSOLETE */
/* Return 1 if P points to an invalid floating point value. */ /* OBSOLETE /* Return 1 if P points to an invalid floating point value. */ */
/* OBSOLETE */
#define INVALID_FLOAT(p, len) 0 /* Just a first guess; not checked */ /* OBSOLETE #define INVALID_FLOAT(p, len) 0 /* Just a first guess; not checked */ */
/* OBSOLETE */
/* Say how long registers are. */ /* OBSOLETE /* Say how long registers are. */ */
/*#define REGISTER_TYPE int */ /* OBSOLETE /*#define REGISTER_TYPE int */ */
/* OBSOLETE */
/* Say how much memory is needed to store a copy of the register set */ /* OBSOLETE /* Say how much memory is needed to store a copy of the register set */ */
#define REGISTER_BYTES (NUM_REGS*4) /* OBSOLETE #define REGISTER_BYTES (NUM_REGS*4) */
/* OBSOLETE */
/* Index within `registers' of the first byte of the space for /* OBSOLETE /* Index within `registers' of the first byte of the space for */
register N. */ /* OBSOLETE register N. */ */
/* OBSOLETE */
#define REGISTER_BYTE(N) ((N)*4) /* OBSOLETE #define REGISTER_BYTE(N) ((N)*4) */
/* OBSOLETE */
/* Number of bytes of storage in the actual machine representation /* OBSOLETE /* Number of bytes of storage in the actual machine representation */
for register N. */ /* OBSOLETE for register N. */ */
/* OBSOLETE */
#define REGISTER_RAW_SIZE(N) (((N) < 16) ? 2 : 4) /* OBSOLETE #define REGISTER_RAW_SIZE(N) (((N) < 16) ? 2 : 4) */
/* OBSOLETE */
#define REGISTER_VIRTUAL_SIZE(N) REGISTER_RAW_SIZE(N) /* OBSOLETE #define REGISTER_VIRTUAL_SIZE(N) REGISTER_RAW_SIZE(N) */
/* OBSOLETE */
/* Largest value REGISTER_RAW_SIZE can have. */ /* OBSOLETE /* Largest value REGISTER_RAW_SIZE can have. */ */
/* OBSOLETE */
#define MAX_REGISTER_RAW_SIZE 4 /* OBSOLETE #define MAX_REGISTER_RAW_SIZE 4 */
/* OBSOLETE */
/* Largest value REGISTER_VIRTUAL_SIZE can have. */ /* OBSOLETE /* Largest value REGISTER_VIRTUAL_SIZE can have. */ */
/* OBSOLETE */
#define MAX_REGISTER_VIRTUAL_SIZE 4 /* OBSOLETE #define MAX_REGISTER_VIRTUAL_SIZE 4 */
/* OBSOLETE */
/* Return the GDB type object for the "standard" data type /* OBSOLETE /* Return the GDB type object for the "standard" data type */
of data in register N. */ /* OBSOLETE of data in register N. */ */
/* OBSOLETE */
#define REGISTER_VIRTUAL_TYPE(N) \ /* OBSOLETE #define REGISTER_VIRTUAL_TYPE(N) \ */
(REGISTER_VIRTUAL_SIZE(N) == 2 ? builtin_type_unsigned_short : builtin_type_unsigned_long) /* OBSOLETE (REGISTER_VIRTUAL_SIZE(N) == 2 ? builtin_type_unsigned_short : builtin_type_unsigned_long) */
/* OBSOLETE */
/* Initializer for an array of names of registers. /* OBSOLETE /* Initializer for an array of names of registers. */
Entries beyond the first NUM_REGS are ignored. */ /* OBSOLETE Entries beyond the first NUM_REGS are ignored. */ */
/* OBSOLETE */
#define REGISTER_NAMES \ /* OBSOLETE #define REGISTER_NAMES \ */
{"r0","r1","r2", "r3", "r4", "r5", "r6", "r7", \ /* OBSOLETE {"r0","r1","r2", "r3", "r4", "r5", "r6", "r7", \ */
"r8","r9","r10","r11","r12","r13","r14","r15", \ /* OBSOLETE "r8","r9","r10","r11","r12","r13","r14","r15", \ */
"pc","a", "x", "y", "dbr","d", "s", "p", \ /* OBSOLETE "pc","a", "x", "y", "dbr","d", "s", "p", \ */
"ticks","cycles","insts"} /* OBSOLETE "ticks","cycles","insts"} */
/* OBSOLETE */
/* Register numbers of various important registers. /* OBSOLETE /* Register numbers of various important registers. */
Note that some of these values are "real" register numbers, /* OBSOLETE Note that some of these values are "real" register numbers, */
and correspond to the general registers of the machine, /* OBSOLETE and correspond to the general registers of the machine, */
and some are "phony" register numbers which are too large /* OBSOLETE and some are "phony" register numbers which are too large */
to be actual register numbers as far as the user is concerned /* OBSOLETE 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. */ /* OBSOLETE but do serve to get the desired values when passed to read_register. */ */
/* OBSOLETE */
#define SP_REGNUM 22 /* OBSOLETE #define SP_REGNUM 22 */
#define FP_REGNUM 15 /* OBSOLETE #define FP_REGNUM 15 */
#define NUM_REGS 27 /* OBSOLETE #define NUM_REGS 27 */
#define PC_REGNUM 16 /* OBSOLETE #define PC_REGNUM 16 */
#define P_REGNUM 23 /* OBSOLETE #define P_REGNUM 23 */
/* OBSOLETE */
/* Store the address of the place in which to copy the structure the /* OBSOLETE /* Store the address of the place in which to copy the structure the */
subroutine will return. This is called from call_function. /* OBSOLETE subroutine will return. This is called from call_function. */
/* OBSOLETE */
We store structs through a pointer passed in R4 */ /* OBSOLETE We store structs through a pointer passed in R4 */ */
/* OBSOLETE */
#define STORE_STRUCT_RETURN(ADDR, SP) \ /* OBSOLETE #define STORE_STRUCT_RETURN(ADDR, SP) \ */
{ write_register (4, (ADDR)); } /* OBSOLETE { write_register (4, (ADDR)); } */
/* OBSOLETE */
/* Extract from an array REGBUF containing the (raw) register state /* OBSOLETE /* Extract from an array REGBUF containing the (raw) register state */
a function return value of type TYPE, and copy that, in virtual format, /* OBSOLETE a function return value of type TYPE, and copy that, in virtual format, */
into VALBUF. */ /* OBSOLETE into VALBUF. */ */
/* OBSOLETE */
#define EXTRACT_RETURN_VALUE(TYPE,REGBUF,VALBUF) \ /* OBSOLETE #define EXTRACT_RETURN_VALUE(TYPE,REGBUF,VALBUF) \ */
memcpy (VALBUF, (char *)(REGBUF), TYPE_LENGTH(TYPE)) /* OBSOLETE memcpy (VALBUF, (char *)(REGBUF), TYPE_LENGTH(TYPE)) */
/* OBSOLETE */
/* OBSOLETE */
/* Write into appropriate registers a function return value /* OBSOLETE /* Write into appropriate registers a function return value */
of type TYPE, given in virtual format. /* OBSOLETE of type TYPE, given in virtual format. */
/* OBSOLETE */
Things always get returned in R4/R5 */ /* OBSOLETE Things always get returned in R4/R5 */ */
/* OBSOLETE */
#define STORE_RETURN_VALUE(TYPE,VALBUF) \ /* OBSOLETE #define STORE_RETURN_VALUE(TYPE,VALBUF) \ */
write_register_bytes (REGISTER_BYTE(4), VALBUF, TYPE_LENGTH (TYPE)) /* OBSOLETE write_register_bytes (REGISTER_BYTE(4), VALBUF, TYPE_LENGTH (TYPE)) */
/* OBSOLETE */
/* OBSOLETE */
/* Extract from an array REGBUF containing the (raw) register state /* OBSOLETE /* Extract from an array REGBUF containing the (raw) register state */
the address in which a function should return its structure value, /* OBSOLETE the address in which a function should return its structure value, */
as a CORE_ADDR (or an expression that can be used as one). */ /* OBSOLETE as a CORE_ADDR (or an expression that can be used as one). */ */
/* OBSOLETE */
#define EXTRACT_STRUCT_VALUE_ADDRESS(REGBUF) (*(CORE_ADDR *)(REGBUF)) /* OBSOLETE #define EXTRACT_STRUCT_VALUE_ADDRESS(REGBUF) (*(CORE_ADDR *)(REGBUF)) */
/* OBSOLETE */
/* A macro that tells us whether the function invocation represented /* OBSOLETE /* 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 /* OBSOLETE by FI does not have a frame on the stack associated with it. If it */
does not, FRAMELESS is set to 1, else 0. */ /* OBSOLETE does not, FRAMELESS is set to 1, else 0. */ */
/* OBSOLETE */
#define FRAMELESS_FUNCTION_INVOCATION(FI) \ /* OBSOLETE #define FRAMELESS_FUNCTION_INVOCATION(FI) \ */
(frameless_look_for_prologue (FI)) /* OBSOLETE (frameless_look_for_prologue (FI)) */
/* OBSOLETE */
#define FRAME_CHAIN(FRAME) w65_frame_chain(FRAME) /* OBSOLETE #define FRAME_CHAIN(FRAME) w65_frame_chain(FRAME) */
#define FRAME_SAVED_PC(FRAME) (w65_frame_saved_pc(FRAME)) /* OBSOLETE #define FRAME_SAVED_PC(FRAME) (w65_frame_saved_pc(FRAME)) */
#define FRAME_ARGS_ADDRESS(fi) (fi)->frame /* OBSOLETE #define FRAME_ARGS_ADDRESS(fi) (fi)->frame */
#define FRAME_LOCALS_ADDRESS(fi) (fi)->frame /* OBSOLETE #define FRAME_LOCALS_ADDRESS(fi) (fi)->frame */
/* OBSOLETE */
/* Set VAL to the number of args passed to frame described by FI. /* OBSOLETE /* Set VAL to the number of args passed to frame described by FI. */
Can set VAL to -1, meaning no way to tell. */ /* OBSOLETE Can set VAL to -1, meaning no way to tell. */ */
/* OBSOLETE */
/* We can't tell how many args there are */ /* OBSOLETE /* We can't tell how many args there are */ */
/* OBSOLETE */
#define FRAME_NUM_ARGS(fi) (-1) /* OBSOLETE #define FRAME_NUM_ARGS(fi) (-1) */
/* OBSOLETE */
/* Return number of bytes at start of arglist that are not really args. */ /* OBSOLETE /* Return number of bytes at start of arglist that are not really args. */ */
/* OBSOLETE */
#define FRAME_ARGS_SKIP 0 /* OBSOLETE #define FRAME_ARGS_SKIP 0 */
/* OBSOLETE */
/* Put here the code to store, into a struct frame_saved_regs, /* OBSOLETE /* Put here the code to store, into a struct frame_saved_regs, */
the addresses of the saved registers of frame described by FRAME_INFO. /* OBSOLETE the addresses of the saved registers of frame described by FRAME_INFO. */
This includes special registers such as pc and fp saved in special /* OBSOLETE This includes special registers such as pc and fp saved in special */
ways in the stack frame. sp is even more special: /* OBSOLETE ways in the stack frame. sp is even more special: */
the address we return for it IS the sp for the next frame. */ /* OBSOLETE the address we return for it IS the sp for the next frame. */ */
/* OBSOLETE */
#define FRAME_FIND_SAVED_REGS(frame_info, frame_saved_regs) \ /* OBSOLETE #define FRAME_FIND_SAVED_REGS(frame_info, frame_saved_regs) \ */
frame_find_saved_regs(frame_info, &(frame_saved_regs)) /* OBSOLETE frame_find_saved_regs(frame_info, &(frame_saved_regs)) */
/* OBSOLETE */
typedef unsigned short INSN_WORD; /* OBSOLETE typedef unsigned short INSN_WORD; */
/* OBSOLETE */
extern CORE_ADDR w65_addr_bits_remove (CORE_ADDR); /* OBSOLETE extern CORE_ADDR w65_addr_bits_remove (CORE_ADDR); */
#define ADDR_BITS_REMOVE(addr) w65_addr_bits_remove (addr) /* OBSOLETE #define ADDR_BITS_REMOVE(addr) w65_addr_bits_remove (addr) */
/* OBSOLETE */
#define CALL_DUMMY_LENGTH 10 /* OBSOLETE #define CALL_DUMMY_LENGTH 10 */
/* OBSOLETE */
/* Discard from the stack the innermost frame, /* OBSOLETE /* Discard from the stack the innermost frame, */
restoring all saved registers. */ /* OBSOLETE restoring all saved registers. */ */
/* OBSOLETE */
#define POP_FRAME pop_frame(); /* OBSOLETE #define POP_FRAME pop_frame(); */
/* OBSOLETE */
/* OBSOLETE */
#define NOP {0xea} /* OBSOLETE #define NOP {0xea} */
/* OBSOLETE */
#define REGISTER_SIZE 4 /* OBSOLETE #define REGISTER_SIZE 4 */
/* OBSOLETE */
#define PRINT_REGISTER_HOOK(regno) print_register_hook(regno) /* OBSOLETE #define PRINT_REGISTER_HOOK(regno) print_register_hook(regno) */
/* OBSOLETE */
#define TARGET_INT_BIT 16 /* OBSOLETE #define TARGET_INT_BIT 16 */
#define TARGET_LONG_BIT 32 /* OBSOLETE #define TARGET_LONG_BIT 32 */
#define TARGET_PTR_BIT 32 /* OBSOLETE #define TARGET_PTR_BIT 32 */

View File

@ -1,8 +1,6 @@
# Target: WDC 65816 with simulator # OBSOLETE # Target: WDC 65816 with simulator
TDEPFILES= w65-tdep.o # OBSOLETE TDEPFILES= w65-tdep.o
TM_FILE= tm-w65.h # OBSOLETE TM_FILE= tm-w65.h
# OBSOLETE
SIM_OBS = remote-sim.o # OBSOLETE SIM_OBS = remote-sim.o
SIM = ../sim/w65/libsim.a # OBSOLETE SIM = ../sim/w65/libsim.a

View File

@ -303,7 +303,7 @@ v850*-*-*) gdb_target=v850
esac esac
;; ;;
w65-*-*) gdb_target=w65 ;; # OBSOLETE w65-*-*) gdb_target=w65 ;;
z8k-*-coff*) gdb_target=z8k ;; z8k-*-coff*) gdb_target=z8k ;;

View File

@ -1,283 +1,283 @@
/* Target-machine dependent code for WDC-65816, for GDB. /* OBSOLETE /* Target-machine dependent code for WDC-65816, for GDB. */
Copyright 1995, 1996, 2000, 2001 Free Software Foundation, Inc. /* OBSOLETE Copyright 1995, 1996, 2000, 2001 Free Software Foundation, Inc. */
/* OBSOLETE */
This file is part of GDB. /* OBSOLETE This file is part of GDB. */
/* OBSOLETE */
This program is free software; you can redistribute it and/or modify /* OBSOLETE 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 /* OBSOLETE it under the terms of the GNU General Public License as published by */
the Free Software Foundation; either version 2 of the License, or /* OBSOLETE the Free Software Foundation; either version 2 of the License, or */
(at your option) any later version. /* OBSOLETE (at your option) any later version. */
/* OBSOLETE */
This program is distributed in the hope that it will be useful, /* OBSOLETE This program is distributed in the hope that it will be useful, */
but WITHOUT ANY WARRANTY; without even the implied warranty of /* OBSOLETE but WITHOUT ANY WARRANTY; without even the implied warranty of */
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the /* OBSOLETE MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the */
GNU General Public License for more details. /* OBSOLETE GNU General Public License for more details. */
/* OBSOLETE */
You should have received a copy of the GNU General Public License /* OBSOLETE You should have received a copy of the GNU General Public License */
along with this program; if not, write to the Free Software /* OBSOLETE along with this program; if not, write to the Free Software */
Foundation, Inc., 59 Temple Place - Suite 330, /* OBSOLETE Foundation, Inc., 59 Temple Place - Suite 330, */
Boston, MA 02111-1307, USA. */ /* OBSOLETE Boston, MA 02111-1307, USA. */ */
/* OBSOLETE */
/* /* OBSOLETE /* */
Contributed by Steve Chamberlain /* OBSOLETE Contributed by Steve Chamberlain */
sac@cygnus.com /* OBSOLETE sac@cygnus.com */
*/ /* OBSOLETE */ */
/* OBSOLETE */
#include "defs.h" /* OBSOLETE #include "defs.h" */
#include "frame.h" /* OBSOLETE #include "frame.h" */
#include "obstack.h" /* OBSOLETE #include "obstack.h" */
#include "symtab.h" /* OBSOLETE #include "symtab.h" */
#include "gdbcmd.h" /* OBSOLETE #include "gdbcmd.h" */
#include "gdbtypes.h" /* OBSOLETE #include "gdbtypes.h" */
#include "dis-asm.h" /* OBSOLETE #include "dis-asm.h" */
#include "gdbcore.h" /* OBSOLETE #include "gdbcore.h" */
#include "regcache.h" /* OBSOLETE #include "regcache.h" */
/* OBSOLETE */
/* Return the saved PC from this frame. */ /* OBSOLETE /* Return the saved PC from this frame. */ */
/* OBSOLETE */
/* OBSOLETE */
CORE_ADDR /* OBSOLETE CORE_ADDR */
w65_frame_saved_pc (struct frame_info *frame) /* OBSOLETE w65_frame_saved_pc (struct frame_info *frame) */
{ /* OBSOLETE { */
return (read_memory_integer (frame->frame + 2, 4) & 0xffffff); /* OBSOLETE return (read_memory_integer (frame->frame + 2, 4) & 0xffffff); */
} /* OBSOLETE } */
/* OBSOLETE */
CORE_ADDR /* OBSOLETE CORE_ADDR */
w65_addr_bits_remove (CORE_ADDR addr) /* OBSOLETE w65_addr_bits_remove (CORE_ADDR addr) */
{ /* OBSOLETE { */
return ((addr) & 0xffffff); /* OBSOLETE return ((addr) & 0xffffff); */
} /* OBSOLETE } */
/* OBSOLETE */
read_memory_pointer (CORE_ADDR x) /* OBSOLETE read_memory_pointer (CORE_ADDR x) */
{ /* OBSOLETE { */
return read_memory_integer (ADDR_BITS_REMOVE (x), 4); /* OBSOLETE return read_memory_integer (ADDR_BITS_REMOVE (x), 4); */
} /* OBSOLETE } */
/* OBSOLETE */
init_frame_pc (void) /* OBSOLETE init_frame_pc (void) */
{ /* OBSOLETE { */
internal_error (__FILE__, __LINE__, "failed internal consistency check"); /* OBSOLETE internal_error (__FILE__, __LINE__, "failed internal consistency check"); */
} /* OBSOLETE } */
/* OBSOLETE */
void /* OBSOLETE void */
w65_push_dummy_frame (void) /* OBSOLETE w65_push_dummy_frame (void) */
{ /* OBSOLETE { */
internal_error (__FILE__, __LINE__, "failed internal consistency check"); /* OBSOLETE internal_error (__FILE__, __LINE__, "failed internal consistency check"); */
} /* OBSOLETE } */
/* OBSOLETE */
/* Put here the code to store, into a struct frame_saved_regs, /* OBSOLETE /* Put here the code to store, into a struct frame_saved_regs, */
the addresses of the saved registers of frame described by FRAME_INFO. /* OBSOLETE the addresses of the saved registers of frame described by FRAME_INFO. */
This includes special registers such as pc and fp saved in special /* OBSOLETE This includes special registers such as pc and fp saved in special */
ways in the stack frame. sp is even more special: /* OBSOLETE ways in the stack frame. sp is even more special: */
the address we return for it IS the sp for the next frame. /* OBSOLETE the address we return for it IS the sp for the next frame. */
/* OBSOLETE */
We cache the result of doing this in the frame_cache_obstack, since /* OBSOLETE We cache the result of doing this in the frame_cache_obstack, since */
it is fairly expensive. */ /* OBSOLETE it is fairly expensive. */ */
/* OBSOLETE */
void /* OBSOLETE void */
frame_find_saved_regs (struct frame_info *fip, struct frame_saved_regs *fsrp) /* OBSOLETE frame_find_saved_regs (struct frame_info *fip, struct frame_saved_regs *fsrp) */
{ /* OBSOLETE { */
int locals; /* OBSOLETE int locals; */
CORE_ADDR pc; /* OBSOLETE CORE_ADDR pc; */
CORE_ADDR adr; /* OBSOLETE CORE_ADDR adr; */
int i; /* OBSOLETE int i; */
/* OBSOLETE */
memset (fsrp, 0, sizeof *fsrp); /* OBSOLETE memset (fsrp, 0, sizeof *fsrp); */
} /* OBSOLETE } */
/* OBSOLETE */
int /* OBSOLETE int */
saved_pc_after_call (void) /* OBSOLETE saved_pc_after_call (void) */
{ /* OBSOLETE { */
int sp = read_register (SP_REGNUM); /* OBSOLETE int sp = read_register (SP_REGNUM); */
int val = read_memory_integer (sp + 1, 4); /* OBSOLETE int val = read_memory_integer (sp + 1, 4); */
return ADDR_BITS_REMOVE (val); /* OBSOLETE return ADDR_BITS_REMOVE (val); */
} /* OBSOLETE } */
/* OBSOLETE */
/* OBSOLETE */
extract_return_value (struct type *type, char *regbuf, char *valbuf) /* OBSOLETE extract_return_value (struct type *type, char *regbuf, char *valbuf) */
{ /* OBSOLETE { */
int b; /* OBSOLETE int b; */
int len = TYPE_LENGTH (type); /* OBSOLETE int len = TYPE_LENGTH (type); */
/* OBSOLETE */
for (b = 0; b < len; b += 2) /* OBSOLETE for (b = 0; b < len; b += 2) */
{ /* OBSOLETE { */
int todo = len - b; /* OBSOLETE int todo = len - b; */
if (todo > 2) /* OBSOLETE if (todo > 2) */
todo = 2; /* OBSOLETE todo = 2; */
memcpy (valbuf + b, regbuf + b, todo); /* OBSOLETE memcpy (valbuf + b, regbuf + b, todo); */
} /* OBSOLETE } */
} /* OBSOLETE } */
/* OBSOLETE */
void /* OBSOLETE void */
write_return_value (struct type *type, char *valbuf) /* OBSOLETE write_return_value (struct type *type, char *valbuf) */
{ /* OBSOLETE { */
int reg; /* OBSOLETE int reg; */
int len; /* OBSOLETE int len; */
for (len = 0; len < TYPE_LENGTH (type); len += 2) /* OBSOLETE for (len = 0; len < TYPE_LENGTH (type); len += 2) */
{ /* OBSOLETE { */
write_register_bytes (REGISTER_BYTE (len / 2 + 2), valbuf + len, 2); /* OBSOLETE write_register_bytes (REGISTER_BYTE (len / 2 + 2), valbuf + len, 2); */
} /* OBSOLETE } */
} /* OBSOLETE } */
/* OBSOLETE */
void /* OBSOLETE void */
store_struct_return (CORE_ADDR addr, CORE_ADDR sp) /* OBSOLETE store_struct_return (CORE_ADDR addr, CORE_ADDR sp) */
{ /* OBSOLETE { */
write_register (2, addr); /* OBSOLETE write_register (2, addr); */
} /* OBSOLETE } */
/* OBSOLETE */
void /* OBSOLETE void */
w65_pop_frame (void) /* OBSOLETE w65_pop_frame (void) */
{ /* OBSOLETE { */
} /* OBSOLETE } */
/* OBSOLETE */
init_extra_frame_info (void) /* OBSOLETE init_extra_frame_info (void) */
{ /* OBSOLETE { */
} /* OBSOLETE } */
/* OBSOLETE */
pop_frame (void) /* OBSOLETE pop_frame (void) */
{ /* OBSOLETE { */
} /* OBSOLETE } */
/* OBSOLETE */
w65_frame_chain (struct frame_info *thisframe) /* OBSOLETE w65_frame_chain (struct frame_info *thisframe) */
{ /* OBSOLETE { */
return 0xffff & read_memory_integer ((thisframe)->frame, 2); /* OBSOLETE return 0xffff & read_memory_integer ((thisframe)->frame, 2); */
} /* OBSOLETE } */
/* OBSOLETE */
static int /* OBSOLETE static int */
gb (int x) /* OBSOLETE gb (int x) */
{ /* OBSOLETE { */
return read_memory_integer (x, 1) & 0xff; /* OBSOLETE return read_memory_integer (x, 1) & 0xff; */
} /* OBSOLETE } */
/* OBSOLETE */
extern CORE_ADDR /* OBSOLETE extern CORE_ADDR */
w65_skip_prologue (CORE_ADDR pc) /* OBSOLETE w65_skip_prologue (CORE_ADDR pc) */
{ /* OBSOLETE { */
CORE_ADDR too_far = pc + 20; /* OBSOLETE CORE_ADDR too_far = pc + 20; */
/* OBSOLETE */
/* looking for bits of the prologue, we can expect to /* OBSOLETE /* looking for bits of the prologue, we can expect to */
see this in a frameful function: /* OBSOLETE see this in a frameful function: */
/* OBSOLETE */
stack adjust: /* OBSOLETE stack adjust: */
/* OBSOLETE */
3B tsc /* OBSOLETE 3B tsc */
1A inc a /* OBSOLETE 1A inc a */
18 clc /* OBSOLETE 18 clc */
69E2FF adc #0xffe2 /* OBSOLETE 69E2FF adc #0xffe2 */
3A dec a /* OBSOLETE 3A dec a */
1B tcs /* OBSOLETE 1B tcs */
1A inc a /* OBSOLETE 1A inc a */
/* OBSOLETE */
link: /* OBSOLETE link: */
/* OBSOLETE */
A500 lda <r15 /* OBSOLETE A500 lda <r15 */
48 pha /* OBSOLETE 48 pha */
3B tsc /* OBSOLETE 3B tsc */
1a inc a /* OBSOLETE 1a inc a */
8500 sta <r15 /* OBSOLETE 8500 sta <r15 */
/* OBSOLETE */
*/ /* OBSOLETE */ */
/* OBSOLETE */
#define TSC 0x3b /* OBSOLETE #define TSC 0x3b */
#define TCS 0x1b /* OBSOLETE #define TCS 0x1b */
#define INCA 0x1a /* OBSOLETE #define INCA 0x1a */
#define PHA 0x48 /* OBSOLETE #define PHA 0x48 */
#define LDADIR 0xa5 /* OBSOLETE #define LDADIR 0xa5 */
#define STADIR 0x85 /* OBSOLETE #define STADIR 0x85 */
/* OBSOLETE */
/* Skip a stack adjust - any area between a tsc and tcs */ /* OBSOLETE /* Skip a stack adjust - any area between a tsc and tcs */ */
if (gb (pc) == TSC) /* OBSOLETE if (gb (pc) == TSC) */
{ /* OBSOLETE { */
while (pc < too_far && gb (pc) != TCS) /* OBSOLETE while (pc < too_far && gb (pc) != TCS) */
{ /* OBSOLETE { */
pc++; /* OBSOLETE pc++; */
} /* OBSOLETE } */
pc++; /* OBSOLETE pc++; */
/* Skip a stupid inc a */ /* OBSOLETE /* Skip a stupid inc a */ */
if (gb (pc) == INCA) /* OBSOLETE if (gb (pc) == INCA) */
pc++; /* OBSOLETE pc++; */
/* OBSOLETE */
} /* OBSOLETE } */
/* Stack adjust can also be done with n pha's */ /* OBSOLETE /* Stack adjust can also be done with n pha's */ */
while (gb (pc) == PHA) /* OBSOLETE while (gb (pc) == PHA) */
pc++; /* OBSOLETE pc++; */
/* OBSOLETE */
/* Skip a link - that's a ld/ph/tsc/inc/sta */ /* OBSOLETE /* Skip a link - that's a ld/ph/tsc/inc/sta */ */
/* OBSOLETE */
if (gb (pc) == LDADIR /* OBSOLETE if (gb (pc) == LDADIR */
&& gb (pc + 5) == STADIR /* OBSOLETE && gb (pc + 5) == STADIR */
&& gb (pc + 1) == gb (pc + 6) /* OBSOLETE && gb (pc + 1) == gb (pc + 6) */
&& gb (pc + 2) == PHA /* OBSOLETE && gb (pc + 2) == PHA */
&& gb (pc + 3) == TSC /* OBSOLETE && gb (pc + 3) == TSC */
&& gb (pc + 4) == INCA) /* OBSOLETE && gb (pc + 4) == INCA) */
{ /* OBSOLETE { */
pc += 7; /* OBSOLETE pc += 7; */
} /* OBSOLETE } */
/* OBSOLETE */
return pc; /* OBSOLETE return pc; */
} /* OBSOLETE } */
/* OBSOLETE */
/* OBSOLETE */
register_raw_size (int n) /* OBSOLETE register_raw_size (int n) */
{ /* OBSOLETE { */
return sim_reg_size (n); /* OBSOLETE return sim_reg_size (n); */
} /* OBSOLETE } */
/* OBSOLETE */
/* OBSOLETE */
void /* OBSOLETE void */
print_register_hook (int regno) /* OBSOLETE print_register_hook (int regno) */
{ /* OBSOLETE { */
if (regno == P_REGNUM) /* OBSOLETE if (regno == P_REGNUM) */
{ /* OBSOLETE { */
/* CCR register */ /* OBSOLETE /* CCR register */ */
/* OBSOLETE */
int C, Z, N, V, I, D, X, M; /* OBSOLETE int C, Z, N, V, I, D, X, M; */
unsigned char b[1]; /* OBSOLETE unsigned char b[1]; */
unsigned char l; /* OBSOLETE unsigned char l; */
/* OBSOLETE */
read_relative_register_raw_bytes (regno, b); /* OBSOLETE read_relative_register_raw_bytes (regno, b); */
l = b[0]; /* OBSOLETE l = b[0]; */
printf_unfiltered ("\t"); /* OBSOLETE printf_unfiltered ("\t"); */
C = (l & 0x1) != 0; /* OBSOLETE C = (l & 0x1) != 0; */
Z = (l & 0x2) != 0; /* OBSOLETE Z = (l & 0x2) != 0; */
I = (l & 0x4) != 0; /* OBSOLETE I = (l & 0x4) != 0; */
D = (l & 0x8) != 0; /* OBSOLETE D = (l & 0x8) != 0; */
X = (l & 0x10) != 0; /* OBSOLETE X = (l & 0x10) != 0; */
M = (l & 0x20) != 0; /* OBSOLETE M = (l & 0x20) != 0; */
V = (l & 0x40) != 0; /* OBSOLETE V = (l & 0x40) != 0; */
N = (l & 0x80) != 0; /* OBSOLETE N = (l & 0x80) != 0; */
/* OBSOLETE */
printf_unfiltered ("N-%d ", N); /* OBSOLETE printf_unfiltered ("N-%d ", N); */
printf_unfiltered ("V-%d ", V); /* OBSOLETE printf_unfiltered ("V-%d ", V); */
printf_unfiltered ("M-%d ", M); /* OBSOLETE printf_unfiltered ("M-%d ", M); */
printf_unfiltered ("X-%d ", X); /* OBSOLETE printf_unfiltered ("X-%d ", X); */
printf_unfiltered ("D-%d ", D); /* OBSOLETE printf_unfiltered ("D-%d ", D); */
printf_unfiltered ("I-%d ", I); /* OBSOLETE printf_unfiltered ("I-%d ", I); */
printf_unfiltered ("Z-%d ", Z); /* OBSOLETE printf_unfiltered ("Z-%d ", Z); */
printf_unfiltered ("C-%d ", C); /* OBSOLETE printf_unfiltered ("C-%d ", C); */
if ((C | Z) == 0) /* OBSOLETE if ((C | Z) == 0) */
printf_unfiltered ("u> "); /* OBSOLETE printf_unfiltered ("u> "); */
if ((C | Z) == 1) /* OBSOLETE if ((C | Z) == 1) */
printf_unfiltered ("u<= "); /* OBSOLETE printf_unfiltered ("u<= "); */
if ((C == 0)) /* OBSOLETE if ((C == 0)) */
printf_unfiltered ("u>= "); /* OBSOLETE printf_unfiltered ("u>= "); */
if (C == 1) /* OBSOLETE if (C == 1) */
printf_unfiltered ("u< "); /* OBSOLETE printf_unfiltered ("u< "); */
if (Z == 0) /* OBSOLETE if (Z == 0) */
printf_unfiltered ("!= "); /* OBSOLETE printf_unfiltered ("!= "); */
if (Z == 1) /* OBSOLETE if (Z == 1) */
printf_unfiltered ("== "); /* OBSOLETE printf_unfiltered ("== "); */
if ((N ^ V) == 0) /* OBSOLETE if ((N ^ V) == 0) */
printf_unfiltered (">= "); /* OBSOLETE printf_unfiltered (">= "); */
if ((N ^ V) == 1) /* OBSOLETE if ((N ^ V) == 1) */
printf_unfiltered ("< "); /* OBSOLETE printf_unfiltered ("< "); */
if ((Z | (N ^ V)) == 0) /* OBSOLETE if ((Z | (N ^ V)) == 0) */
printf_unfiltered ("> "); /* OBSOLETE printf_unfiltered ("> "); */
if ((Z | (N ^ V)) == 1) /* OBSOLETE if ((Z | (N ^ V)) == 1) */
printf_unfiltered ("<= "); /* OBSOLETE printf_unfiltered ("<= "); */
} /* OBSOLETE } */
} /* OBSOLETE } */
/* OBSOLETE */
void /* OBSOLETE void */
_initialize_w65_tdep (void) /* OBSOLETE _initialize_w65_tdep (void) */
{ /* OBSOLETE { */
tm_print_insn = print_insn_w65; /* OBSOLETE tm_print_insn = print_insn_w65; */
} /* OBSOLETE } */