Andrew Cagney
25 years ago
22 changed files with 27 additions and 1458 deletions
@ -1,16 +0,0 @@ |
|||
# OBSOLETE # Host: Merlin running utek 2.1 |
|||
# OBSOLETE XDEPFILES= infptrace.o inftarg.o fork-child.o corelow.o core-aout.o |
|||
# OBSOLETE XM_FILE= xm-merlin.h |
|||
# OBSOLETE |
|||
# OBSOLETE # FIXME: M_INSTALL is gone from the gdb makefile. If anyone cares |
|||
# OBSOLETE # about the Merlin anymore, and the bug which inspired |
|||
# OBSOLETE # SHELL_FILE/gdb-sh is still there, will need to reinstate it. Also, |
|||
# OBSOLETE # this should be done for native only. |
|||
# OBSOLETE |
|||
# OBSOLETE # See SHELL_FILE in xm-merlin.h for a explanation of this. |
|||
# OBSOLETE |
|||
# OBSOLETE # FIXME: This should use $prefix, but only if SHELL_FILE does too. |
|||
# OBSOLETE |
|||
# OBSOLETE M_INSTALL=cp /bin/sh /usr/local/lib/gdb-sh; \ |
|||
# OBSOLETE chmod ogu+rw /usr/local/lib/gdb-sh |
|||
# OBSOLETE M_UNINSTALL = rm -f /usr/local/lib/gdb-sh |
|||
@ -1,3 +0,0 @@ |
|||
# OBSOLETE # Target: Merlin running utek 2.1 |
|||
# OBSOLETE TDEPFILES= ns32k-tdep.o |
|||
# OBSOLETE TM_FILE= tm-merlin.h |
|||
@ -1,55 +0,0 @@ |
|||
/* OBSOLETE /* Definitions to make GDB run on an encore under umax 4.2 */ |
|||
/* OBSOLETE Copyright 1987, 1989, 1992, 2001 Free Software Foundation, Inc. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE This file is part of GDB. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE This program is free software; you can redistribute it and/or modify */ |
|||
/* OBSOLETE it under the terms of the GNU General Public License as published by */ |
|||
/* OBSOLETE the Free Software Foundation; either version 2 of the License, or */ |
|||
/* OBSOLETE (at your option) any later version. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE This program is distributed in the hope that it will be useful, */ |
|||
/* OBSOLETE but WITHOUT ANY WARRANTY; without even the implied warranty of */ |
|||
/* OBSOLETE MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the */ |
|||
/* OBSOLETE GNU General Public License for more details. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE You should have received a copy of the GNU General Public License */ |
|||
/* OBSOLETE along with this program; if not, write to the Free Software */ |
|||
/* OBSOLETE Foundation, Inc., 59 Temple Place - Suite 330, */ |
|||
/* OBSOLETE Boston, MA 02111-1307, USA. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Do implement the attach and detach commands... */ */ |
|||
/* OBSOLETE #define ATTACH_DETACH */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Offset of registers within u area. */ */ |
|||
/* OBSOLETE #define U_REGS_OFFSET 0 */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* called from register_addr() -- blockend not used for now */ */ |
|||
/* OBSOLETE #define REGISTER_U_ADDR(addr, blockend, regno) \ */ |
|||
/* OBSOLETE { \ */ |
|||
/* OBSOLETE switch (regno) { \ */ |
|||
/* OBSOLETE case 0: case 1: case 2: case 3: case 4: case 5: case 6: case 7: \ */ |
|||
/* OBSOLETE addr = PU_R0 - (regno * sizeof (int)); break; \ */ |
|||
/* OBSOLETE case SP_REGNUM: \ */ |
|||
/* OBSOLETE addr = PU_SP; break; \ */ |
|||
/* OBSOLETE case PC_REGNUM: \ */ |
|||
/* OBSOLETE addr = PU_PC; break; \ */ |
|||
/* OBSOLETE case FP_REGNUM: \ */ |
|||
/* OBSOLETE addr = PU_FP; break; \ */ |
|||
/* OBSOLETE case PS_REGNUM: \ */ |
|||
/* OBSOLETE addr = PU_PSL; break; \ */ |
|||
/* OBSOLETE case FPS_REGNUM: \ */ |
|||
/* OBSOLETE addr = PU_FSR; break; \ */ |
|||
/* OBSOLETE case FP0_REGNUM + 0: case FP0_REGNUM + 1: \ */ |
|||
/* OBSOLETE case FP0_REGNUM + 2: case FP0_REGNUM + 3: \ */ |
|||
/* OBSOLETE case FP0_REGNUM + 4: case FP0_REGNUM + 5: \ */ |
|||
/* OBSOLETE case FP0_REGNUM + 6: case FP0_REGNUM + 7: \ */ |
|||
/* OBSOLETE addr = PU_F0 + (regno - FP0_REGNUM) * sizeof (float); break; \ */ |
|||
/* OBSOLETE case LP0_REGNUM + 0: case LP0_REGNUM + 1: \ */ |
|||
/* OBSOLETE case LP0_REGNUM + 2: case LP0_REGNUM + 3: \ */ |
|||
/* OBSOLETE addr = PU_F0 + (regno - LP0_REGNUM) * sizeof (double); break; \ */ |
|||
/* OBSOLETE default: \ */ |
|||
/* OBSOLETE printf ("bad argument to REGISTER_U_ADDR %d\n", regno); \ */ |
|||
/* OBSOLETE internal_error (__FILE__, __LINE__, "failed internal consistency check"); \ */ |
|||
/* OBSOLETE } \ */ |
|||
/* OBSOLETE } */ |
|||
@ -1,7 +0,0 @@ |
|||
# OBSOLETE # Host: ns32k running Mach3 |
|||
# OBSOLETE |
|||
# OBSOLETE XDEPFILES= |
|||
# OBSOLETE NATDEPFILES= m3-nat.o ns32km3-nat.o fork-child.o corelow.o core-aout.o |
|||
# OBSOLETE NAT_CLIBS= -L/usr/mach/lib -lnetname -lmachid -lmach |
|||
# OBSOLETE XM_FILE= xm-ns32km3.h |
|||
# OBSOLETE NAT_FILE= nm-m3.h |
|||
@ -1,3 +0,0 @@ |
|||
# OBSOLETE # Target: ns32k with a.out on Mach 3 |
|||
# OBSOLETE TDEPFILES= ns32k-tdep.o |
|||
# OBSOLETE TM_FILE= tm-ns32km3.h |
|||
@ -1,289 +0,0 @@ |
|||
/* OBSOLETE /* Definitions to target GDB to a merlin under utek 2.1 */ |
|||
/* OBSOLETE Copyright 1986, 1987, 1989, 1991, 1993, 1994, 1998, 1999, 2000 */ |
|||
/* OBSOLETE Free Software Foundation, Inc. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE This file is part of GDB. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE This program is free software; you can redistribute it and/or modify */ |
|||
/* OBSOLETE it under the terms of the GNU General Public License as published by */ |
|||
/* OBSOLETE the Free Software Foundation; either version 2 of the License, or */ |
|||
/* OBSOLETE (at your option) any later version. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE This program is distributed in the hope that it will be useful, */ |
|||
/* OBSOLETE but WITHOUT ANY WARRANTY; without even the implied warranty of */ |
|||
/* OBSOLETE MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the */ |
|||
/* OBSOLETE GNU General Public License for more details. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE You should have received a copy of the GNU General Public License */ |
|||
/* OBSOLETE along with this program; if not, write to the Free Software */ |
|||
/* OBSOLETE Foundation, Inc., 59 Temple Place - Suite 330, */ |
|||
/* OBSOLETE Boston, MA 02111-1307, USA. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #include "regcache.h" */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define TARGET_BYTE_ORDER LITTLE_ENDIAN */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Offset from address of function to start of its code. */ |
|||
/* OBSOLETE Zero on most machines. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define FUNCTION_START_OFFSET 0 */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Advance PC across any function entry prologue instructions */ |
|||
/* OBSOLETE to reach some "real" code. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE extern CORE_ADDR merlin_skip_prologue (CORE_ADDR); */ |
|||
/* OBSOLETE #define SKIP_PROLOGUE(pc) (merlin_skip_prologue (pc)) */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Immediately after a function call, return the saved pc. */ |
|||
/* OBSOLETE Can't always go through the frames for this because on some machines */ |
|||
/* OBSOLETE the new frame is not set up until the new function executes */ |
|||
/* OBSOLETE some instructions. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define SAVED_PC_AFTER_CALL(frame) \ */ |
|||
/* OBSOLETE read_memory_integer (read_register (SP_REGNUM), 4) */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Address of end of stack space. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define STACK_END_ADDR (0x800000) */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Stack grows downward. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define INNER_THAN(lhs,rhs) ((lhs) < (rhs)) */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Sequence of bytes for breakpoint instruction. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define BREAKPOINT {0xf2} */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Amount PC must be decremented by after a breakpoint. */ |
|||
/* OBSOLETE This is often the number of bytes in BREAKPOINT */ |
|||
/* OBSOLETE but not always. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define DECR_PC_AFTER_BREAK 0 */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Define this to say that the "svc" insn is followed by */ |
|||
/* OBSOLETE codes in memory saying which kind of system call it is. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define NS32K_SVC_IMMED_OPERANDS */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Say how long (ordinary) registers are. This is a piece of bogosity */ |
|||
/* OBSOLETE used in push_word and a few other places; REGISTER_RAW_SIZE is the */ |
|||
/* OBSOLETE real way to know how big a register is. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define REGISTER_SIZE 4 */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Number of machine registers */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define NUM_REGS 25 */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define NUM_GENERAL_REGS 8 */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Initializer for an array of names of registers. */ |
|||
/* OBSOLETE There should be NUM_REGS strings in this initializer. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define REGISTER_NAMES {"r0", "r1", "r2", "r3", "r4", "r5", "r6", "r7", \ */ |
|||
/* OBSOLETE "pc", "sp", "fp", "ps", \ */ |
|||
/* OBSOLETE "fsr", \ */ |
|||
/* OBSOLETE "f0", "f1", "f2", "f3", "f4", "f5", "f6", "f7", \ */ |
|||
/* OBSOLETE "l0", "l1", "l2", "l3", "l4", \ */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Register numbers of various important registers. */ |
|||
/* OBSOLETE Note that some of these values are "real" register numbers, */ |
|||
/* OBSOLETE and correspond to the general registers of the machine, */ |
|||
/* OBSOLETE and some are "phony" register numbers which are too large */ |
|||
/* OBSOLETE to be actual register numbers as far as the user is concerned */ |
|||
/* OBSOLETE but do serve to get the desired values when passed to read_register. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define AP_REGNUM FP_REGNUM */ |
|||
/* OBSOLETE #define FP_REGNUM 10 /* Contains address of executing stack frame */ */ |
|||
/* OBSOLETE #define SP_REGNUM 9 /* Contains address of top of stack */ */ |
|||
/* OBSOLETE #define PC_REGNUM 8 /* Contains program counter */ */ |
|||
/* OBSOLETE #define PS_REGNUM 11 /* Contains processor status */ */ |
|||
/* OBSOLETE #define FPS_REGNUM 12 /* Floating point status register */ */ |
|||
/* OBSOLETE #define FP0_REGNUM 13 /* Floating point register 0 */ */ |
|||
/* OBSOLETE #define LP0_REGNUM 21 /* Double register 0 (same as FP0) */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Total amount of space needed to store our copies of the machine's */ |
|||
/* OBSOLETE register state, the array `registers'. */ */ |
|||
/* OBSOLETE #define REGISTER_BYTES ((NUM_REGS - 4) * sizeof (int) + 4 * sizeof (double)) */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Index within `registers' of the first byte of the space for */ |
|||
/* OBSOLETE register N. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define REGISTER_BYTE(N) ((N) >= LP0_REGNUM ? \ */ |
|||
/* OBSOLETE LP0_REGNUM * 4 + ((N) - LP0_REGNUM) * 8 : (N) * 4) */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Number of bytes of storage in the actual machine representation */ |
|||
/* OBSOLETE for register N. On the 32000, all regs are 4 bytes */ |
|||
/* OBSOLETE except for the doubled floating registers. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define REGISTER_RAW_SIZE(N) ((N) >= LP0_REGNUM ? 8 : 4) */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Number of bytes of storage in the program's representation */ |
|||
/* OBSOLETE for register N. On the 32000, all regs are 4 bytes */ |
|||
/* OBSOLETE except for the doubled floating registers. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define REGISTER_VIRTUAL_SIZE(N) ((N) >= LP0_REGNUM ? 8 : 4) */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Largest value REGISTER_RAW_SIZE can have. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define MAX_REGISTER_RAW_SIZE 8 */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Largest value REGISTER_VIRTUAL_SIZE can have. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define MAX_REGISTER_VIRTUAL_SIZE 8 */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Return the GDB type object for the "standard" data type */ |
|||
/* OBSOLETE of data in register N. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define REGISTER_VIRTUAL_TYPE(N) \ */ |
|||
/* OBSOLETE ((N) >= FP0_REGNUM ? \ */ |
|||
/* OBSOLETE ((N) >= LP0_REGNUM ? \ */ |
|||
/* OBSOLETE builtin_type_double \ */ |
|||
/* OBSOLETE : builtin_type_float) \ */ |
|||
/* OBSOLETE : builtin_type_int) */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Store the address of the place in which to copy the structure the */ |
|||
/* OBSOLETE subroutine will return. This is called from call_function. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE On this machine this is a no-op, as gcc doesn't run on it yet. */ |
|||
/* OBSOLETE This calling convention is not used. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define STORE_STRUCT_RETURN(ADDR, SP) */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Extract from an array REGBUF containing the (raw) register state */ |
|||
/* OBSOLETE a function return value of type TYPE, and copy that, in virtual format, */ |
|||
/* OBSOLETE into VALBUF. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define EXTRACT_RETURN_VALUE(TYPE,REGBUF,VALBUF) \ */ |
|||
/* OBSOLETE memcpy (VALBUF, REGBUF, TYPE_LENGTH (TYPE)) */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Write into appropriate registers a function return value */ |
|||
/* OBSOLETE of type TYPE, given in virtual format. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define STORE_RETURN_VALUE(TYPE,VALBUF) \ */ |
|||
/* OBSOLETE write_register_bytes (0, VALBUF, TYPE_LENGTH (TYPE)) */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Extract from an array REGBUF containing the (raw) register state */ |
|||
/* OBSOLETE the address in which a function should return its structure value, */ |
|||
/* OBSOLETE as a CORE_ADDR (or an expression that can be used as one). */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define EXTRACT_STRUCT_VALUE_ADDRESS(REGBUF) (*(int *)(REGBUF)) */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Describe the pointer in each stack frame to the previous stack frame */ |
|||
/* OBSOLETE (its caller). */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* FRAME_CHAIN takes a frame's nominal address */ |
|||
/* OBSOLETE and produces the frame's chain-pointer. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* In the case of the Merlin, the frame's nominal address is the FP value, */ |
|||
/* OBSOLETE and at that address is saved previous FP value as a 4-byte word. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define FRAME_CHAIN(thisframe) \ */ |
|||
/* OBSOLETE (!inside_entry_file ((thisframe)->pc) ? \ */ |
|||
/* OBSOLETE read_memory_integer ((thisframe)->frame, 4) :\ */ |
|||
/* OBSOLETE 0) */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Define other aspects of the stack frame. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define FRAME_SAVED_PC(FRAME) (read_memory_integer ((FRAME)->frame + 4, 4)) */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* compute base of arguments */ */ |
|||
/* OBSOLETE #define FRAME_ARGS_ADDRESS(fi) ((fi)->frame) */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define FRAME_LOCALS_ADDRESS(fi) ((fi)->frame) */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Return number of args passed to a frame. */ |
|||
/* OBSOLETE Can return -1, meaning no way to tell. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE extern int merlin_frame_num_args (struct frame_info *fi); */ |
|||
/* OBSOLETE #define FRAME_NUM_ARGS(fi) (merlin_frame_num_args ((fi))) */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Return number of bytes at start of arglist that are not really args. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define FRAME_ARGS_SKIP 8 */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Put here the code to store, into a struct frame_saved_regs, */ |
|||
/* OBSOLETE the addresses of the saved registers of frame described by FRAME_INFO. */ |
|||
/* OBSOLETE This includes special registers such as pc and fp saved in special */ |
|||
/* OBSOLETE ways in the stack frame. sp is even more special: */ |
|||
/* OBSOLETE the address we return for it IS the sp for the next frame. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define FRAME_FIND_SAVED_REGS(frame_info, frame_saved_regs) \ */ |
|||
/* OBSOLETE { int regmask,regnum; \ */ |
|||
/* OBSOLETE int localcount; \ */ |
|||
/* OBSOLETE CORE_ADDR enter_addr; \ */ |
|||
/* OBSOLETE CORE_ADDR next_addr; \ */ |
|||
/* OBSOLETE \ */ |
|||
/* OBSOLETE enter_addr = get_pc_function_start ((frame_info)->pc); \ */ |
|||
/* OBSOLETE regmask = read_memory_integer (enter_addr+1, 1); \ */ |
|||
/* OBSOLETE localcount = ns32k_localcount (enter_addr); \ */ |
|||
/* OBSOLETE next_addr = (frame_info)->frame + localcount; \ */ |
|||
/* OBSOLETE for (regnum = 0; regnum < 8; regnum++, regmask >>= 1) \ */ |
|||
/* OBSOLETE (frame_saved_regs).regs[regnum] \ */ |
|||
/* OBSOLETE = (regmask & 1) ? (next_addr -= 4) : 0; \ */ |
|||
/* OBSOLETE (frame_saved_regs).regs[SP_REGNUM] = (frame_info)->frame + 4; \ */ |
|||
/* OBSOLETE (frame_saved_regs).regs[PC_REGNUM] = (frame_info)->frame + 4; \ */ |
|||
/* OBSOLETE (frame_saved_regs).regs[FP_REGNUM] \ */ |
|||
/* OBSOLETE = read_memory_integer ((frame_info)->frame, 4); } */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Things needed for making the inferior call functions. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Push an empty stack frame, to record the current PC, etc. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define PUSH_DUMMY_FRAME \ */ |
|||
/* OBSOLETE { register CORE_ADDR sp = read_register (SP_REGNUM); \ */ |
|||
/* OBSOLETE register int regnum; \ */ |
|||
/* OBSOLETE sp = push_word (sp, read_register (PC_REGNUM)); \ */ |
|||
/* OBSOLETE sp = push_word (sp, read_register (FP_REGNUM)); \ */ |
|||
/* OBSOLETE write_register (FP_REGNUM, sp); \ */ |
|||
/* OBSOLETE for (regnum = 0; regnum < 8; regnum++) \ */ |
|||
/* OBSOLETE sp = push_word (sp, read_register (regnum)); \ */ |
|||
/* OBSOLETE write_register (SP_REGNUM, sp); \ */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Discard from the stack the innermost frame, restoring all registers. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define POP_FRAME \ */ |
|||
/* OBSOLETE { register struct frame_info *frame = get_current_frame (); \ */ |
|||
/* OBSOLETE register CORE_ADDR fp; \ */ |
|||
/* OBSOLETE register int regnum; \ */ |
|||
/* OBSOLETE struct frame_saved_regs fsr; \ */ |
|||
/* OBSOLETE struct frame_info *fi; \ */ |
|||
/* OBSOLETE fp = frame->frame; \ */ |
|||
/* OBSOLETE get_frame_saved_regs (frame, &fsr); \ */ |
|||
/* OBSOLETE for (regnum = 0; regnum < 8; regnum++) \ */ |
|||
/* OBSOLETE if (fsr.regs[regnum]) \ */ |
|||
/* OBSOLETE write_register (regnum, read_memory_integer (fsr.regs[regnum], 4)); \ */ |
|||
/* OBSOLETE write_register (FP_REGNUM, read_memory_integer (fp, 4)); \ */ |
|||
/* OBSOLETE write_register (PC_REGNUM, read_memory_integer (fp + 4, 4)); \ */ |
|||
/* OBSOLETE write_register (SP_REGNUM, fp + 8); \ */ |
|||
/* OBSOLETE flush_cached_frames (); \ */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* This sequence of words is the instructions */ |
|||
/* OBSOLETE enter 0xff,0 82 ff 00 */ |
|||
/* OBSOLETE jsr @0x00010203 7f ae c0 01 02 03 */ |
|||
/* OBSOLETE adjspd 0x69696969 7f a5 01 02 03 04 */ |
|||
/* OBSOLETE bpt f2 */ |
|||
/* OBSOLETE Note this is 16 bytes. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define CALL_DUMMY { 0x7f00ff82, 0x0201c0ae, 0x01a57f03, 0xf2040302 } */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define CALL_DUMMY_START_OFFSET 3 */ |
|||
/* OBSOLETE #define CALL_DUMMY_LENGTH 16 */ |
|||
/* OBSOLETE #define CALL_DUMMY_ADDR 5 */ |
|||
/* OBSOLETE #define CALL_DUMMY_NARGS 11 */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Insert the specified number of args and function address */ |
|||
/* OBSOLETE into a call sequence of the above form stored at DUMMYNAME. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define FIX_CALL_DUMMY(dummyname, pc, fun, nargs, args, type, gcc_p) \ */ |
|||
/* OBSOLETE { int flipped = fun | 0xc0000000; \ */ |
|||
/* OBSOLETE flip_bytes (&flipped, 4); \ */ |
|||
/* OBSOLETE *((int *) (((char *) dummyname)+CALL_DUMMY_ADDR)) = flipped; \ */ |
|||
/* OBSOLETE flipped = - nargs * 4; \ */ |
|||
/* OBSOLETE flip_bytes (&flipped, 4); \ */ |
|||
/* OBSOLETE *((int *) (((char *) dummyname)+CALL_DUMMY_NARGS)) = flipped; \ */ |
|||
/* OBSOLETE } */ |
|||
@ -1,74 +0,0 @@ |
|||
/* OBSOLETE /* Macro definitions for ns532, Mach 3.0 */ |
|||
/* OBSOLETE Copyright 1992, 1993, 1994 Free Software Foundation, Inc. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE This file is part of GDB. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE This program is free software; you can redistribute it and/or modify */ |
|||
/* OBSOLETE it under the terms of the GNU General Public License as published by */ |
|||
/* OBSOLETE the Free Software Foundation; either version 2 of the License, or */ |
|||
/* OBSOLETE (at your option) any later version. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE This program is distributed in the hope that it will be useful, */ |
|||
/* OBSOLETE but WITHOUT ANY WARRANTY; without even the implied warranty of */ |
|||
/* OBSOLETE MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the */ |
|||
/* OBSOLETE GNU General Public License for more details. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE You should have received a copy of the GNU General Public License */ |
|||
/* OBSOLETE along with this program; if not, write to the Free Software */ |
|||
/* OBSOLETE Foundation, Inc., 59 Temple Place - Suite 330, */ |
|||
/* OBSOLETE Boston, MA 02111-1307, USA. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Include common definitions for Mach3 systems */ */ |
|||
/* OBSOLETE #include "nm-m3.h" */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Define offsets to access CPROC stack when it does not have */ |
|||
/* OBSOLETE * a kernel thread. */ |
|||
/* OBSOLETE */ */ |
|||
/* OBSOLETE #define MACHINE_CPROC_SP_OFFSET 20 */ |
|||
/* OBSOLETE #define MACHINE_CPROC_PC_OFFSET 16 */ |
|||
/* OBSOLETE #define MACHINE_CPROC_FP_OFFSET 12 */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #include <ns532/psl.h> */ |
|||
/* OBSOLETE #include <ns532/vmparam.h> */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Thread flavors used in re-setting the T bit. */ |
|||
/* OBSOLETE * @@ this is also bad for cross debugging. */ |
|||
/* OBSOLETE */ */ |
|||
/* OBSOLETE #define TRACE_FLAVOR NS532_THREAD_STATE */ |
|||
/* OBSOLETE #define TRACE_FLAVOR_SIZE NS532_THREAD_STATE_COUNT */ |
|||
/* OBSOLETE #define TRACE_SET(x,state) \ */ |
|||
/* OBSOLETE ((struct ns532_thread_state *)state)->psr |= PSR_T */ |
|||
/* OBSOLETE #define TRACE_CLEAR(x,state) \ */ |
|||
/* OBSOLETE ((((struct ns532_thread_state *)state)->psr &= ~PSR_T), 1) */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* we can do it */ */ |
|||
/* OBSOLETE #define ATTACH_DETACH 1 */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Address of end of stack space. */ |
|||
/* OBSOLETE * for MACH, see <ns532/vmparam.h> */ |
|||
/* OBSOLETE */ */ |
|||
/* OBSOLETE #define STACK_END_ADDR USRSTACK */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #include "ns32k/tm-umax.h" */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* tm-umax.h assumes a 32082 fpu. We have a 32382 fpu. */ */ |
|||
/* OBSOLETE #undef REGISTER_NAMES */ |
|||
/* OBSOLETE #undef NUM_REGS */ |
|||
/* OBSOLETE #undef REGISTER_BYTES */ |
|||
/* OBSOLETE /* Initializer for an array of names of registers. */ |
|||
/* OBSOLETE There should be NUM_REGS strings in this initializer. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define REGISTER_NAMES {"r0", "r1", "r2", "r3", "r4", "r5", "r6", "r7", \ */ |
|||
/* OBSOLETE "f0", "f1", "f2", "f3", "f4", "f5", "f6", "f7", \ */ |
|||
/* OBSOLETE "sp", "fp", "pc", "ps", \ */ |
|||
/* OBSOLETE "fsr", \ */ |
|||
/* OBSOLETE "l0", "l1", "l2", "l3", "l4", "l5", "l6", "l7", "xx", \ */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define NUM_REGS 29 */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Total amount of space needed to store our copies of the machine's */ |
|||
/* OBSOLETE register state, the array `registers'. */ */ |
|||
/* OBSOLETE #define REGISTER_BYTES \ */ |
|||
/* OBSOLETE ((NUM_REGS - 4) * REGISTER_RAW_SIZE(R0_REGNUM) \ */ |
|||
/* OBSOLETE + 8 * REGISTER_RAW_SIZE(LP0_REGNUM)) */ |
|||
@ -1,5 +0,0 @@ |
|||
# OBSOLETE # Host: Encore running umax 4.2 |
|||
# OBSOLETE XDEPFILES= umax-xdep.o |
|||
# OBSOLETE XM_FILE= xm-umax.h |
|||
# OBSOLETE NAT_FILE= nm-umax.h |
|||
# OBSOLETE NATDEPFILES= infptrace.o inftarg.o fork-child.o |
|||
@ -1,3 +0,0 @@ |
|||
# OBSOLETE # Target: Encore running umax 4.2 |
|||
# OBSOLETE TDEPFILES= ns32k-tdep.o |
|||
# OBSOLETE TM_FILE= tm-umax.h |
|||
@ -1,67 +0,0 @@ |
|||
/* OBSOLETE /* Definitions to make GDB run on a merlin under utek 2.1 */ |
|||
/* OBSOLETE Copyright 1986, 1987, 1989, 1991, 1992, 1993, 2001 */ |
|||
/* OBSOLETE Free Software Foundation, Inc. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE This file is part of GDB. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE This program is free software; you can redistribute it and/or modify */ |
|||
/* OBSOLETE it under the terms of the GNU General Public License as published by */ |
|||
/* OBSOLETE the Free Software Foundation; either version 2 of the License, or */ |
|||
/* OBSOLETE (at your option) any later version. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE This program is distributed in the hope that it will be useful, */ |
|||
/* OBSOLETE but WITHOUT ANY WARRANTY; without even the implied warranty of */ |
|||
/* OBSOLETE MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the */ |
|||
/* OBSOLETE GNU General Public License for more details. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE You should have received a copy of the GNU General Public License */ |
|||
/* OBSOLETE along with this program; if not, write to the Free Software */ |
|||
/* OBSOLETE Foundation, Inc., 59 Temple Place - Suite 330, */ |
|||
/* OBSOLETE Boston, MA 02111-1307, USA. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #include <machine/reg.h> */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* This machine doesn't have the siginterrupt call. */ */ |
|||
/* OBSOLETE #define NO_SIGINTERRUPT */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Under Utek, a ptrace'd process can be the only active process for */ |
|||
/* OBSOLETE an executable. Therefore instead of /bin/sh use gdb-sh (which should */ |
|||
/* OBSOLETE just be a copy of /bin/sh which is world readable and writeable). */ */ |
|||
/* OBSOLETE /* FIXME: name should be passed in from Makefile so it can use prefix. */ */ |
|||
/* OBSOLETE #define SHELL_FILE "/usr/local/lib/gdb-sh" */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define HOST_BYTE_ORDER LITTLE_ENDIAN */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* This is the amount to subtract from u.u_ar0 */ |
|||
/* OBSOLETE to get the offset in the core file of the register values. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define KERNEL_U_ADDR (0xfef000) */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define REGISTER_U_ADDR(addr, blockend, regno) \ */ |
|||
/* OBSOLETE { \ */ |
|||
/* OBSOLETE switch (regno) { \ */ |
|||
/* OBSOLETE case 0: case 1: case 2: case 3: case 4: case 5: case 6: case 7: \ */ |
|||
/* OBSOLETE addr = blockend + (R0 - regno) * sizeof (int); break; \ */ |
|||
/* OBSOLETE case PC_REGNUM: \ */ |
|||
/* OBSOLETE addr = blockend + PC * sizeof (int); break; \ */ |
|||
/* OBSOLETE case SP_REGNUM: \ */ |
|||
/* OBSOLETE addr = blockend + SP * sizeof (int); break; \ */ |
|||
/* OBSOLETE case FP_REGNUM: \ */ |
|||
/* OBSOLETE addr = blockend + FP * sizeof (int); break; \ */ |
|||
/* OBSOLETE case PS_REGNUM: \ */ |
|||
/* OBSOLETE addr = blockend + 12 * sizeof (int); break; \ */ |
|||
/* OBSOLETE case FPS_REGNUM: \ */ |
|||
/* OBSOLETE addr = 108; break; \ */ |
|||
/* OBSOLETE case FP0_REGNUM + 0: case FP0_REGNUM + 1: \ */ |
|||
/* OBSOLETE case FP0_REGNUM + 2: case FP0_REGNUM + 3: \ */ |
|||
/* OBSOLETE case FP0_REGNUM + 4: case FP0_REGNUM + 5: \ */ |
|||
/* OBSOLETE case FP0_REGNUM + 6: case FP0_REGNUM + 7: \ */ |
|||
/* OBSOLETE addr = 76 + (regno - FP0_REGNUM) * sizeof (float); break; \ */ |
|||
/* OBSOLETE case LP0_REGNUM + 0: case LP0_REGNUM + 1: \ */ |
|||
/* OBSOLETE case LP0_REGNUM + 2: case LP0_REGNUM + 3: \ */ |
|||
/* OBSOLETE addr = 76 + (regno - LP0_REGNUM) * sizeof (double); break; \ */ |
|||
/* OBSOLETE default: \ */ |
|||
/* OBSOLETE printf ("bad argument to REGISTER_U_ADDR %d\n", regno); \ */ |
|||
/* OBSOLETE internal_error (__FILE__, __LINE__, "failed internal consistency check"); \ */ |
|||
/* OBSOLETE } \ */ |
|||
/* OBSOLETE } */ |
|||
@ -1,25 +0,0 @@ |
|||
/* OBSOLETE /* Definitions to make GDB run on Mach 3 on an National ns32k */ |
|||
/* OBSOLETE Copyright 1986, 1987, 1989, 1991, 1993, 1994, 1995, 1996 */ |
|||
/* OBSOLETE Free Software Foundation, Inc. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE This file is part of GDB. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE This program is free software; you can redistribute it and/or modify */ |
|||
/* OBSOLETE it under the terms of the GNU General Public License as published by */ |
|||
/* OBSOLETE the Free Software Foundation; either version 2 of the License, or */ |
|||
/* OBSOLETE (at your option) any later version. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE This program is distributed in the hope that it will be useful, */ |
|||
/* OBSOLETE but WITHOUT ANY WARRANTY; without even the implied warranty of */ |
|||
/* OBSOLETE MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the */ |
|||
/* OBSOLETE GNU General Public License for more details. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE You should have received a copy of the GNU General Public License */ |
|||
/* OBSOLETE along with this program; if not, write to the Free Software */ |
|||
/* OBSOLETE Foundation, Inc., 59 Temple Place - Suite 330, */ |
|||
/* OBSOLETE Boston, MA 02111-1307, USA. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define HOST_BYTE_ORDER LITTLE_ENDIAN */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Do implement the attach and detach commands. */ */ |
|||
/* OBSOLETE #define ATTACH_DETACH 1 */ |
|||
@ -1,26 +0,0 @@ |
|||
/* OBSOLETE /* Definitions to make GDB run on an encore under umax 4.2 */ |
|||
/* OBSOLETE Copyright 1987, 1989, 1992 Free Software Foundation, Inc. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE This file is part of GDB. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE This program is free software; you can redistribute it and/or modify */ |
|||
/* OBSOLETE it under the terms of the GNU General Public License as published by */ |
|||
/* OBSOLETE the Free Software Foundation; either version 2 of the License, or */ |
|||
/* OBSOLETE (at your option) any later version. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE This program is distributed in the hope that it will be useful, */ |
|||
/* OBSOLETE but WITHOUT ANY WARRANTY; without even the implied warranty of */ |
|||
/* OBSOLETE MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the */ |
|||
/* OBSOLETE GNU General Public License for more details. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE You should have received a copy of the GNU General Public License */ |
|||
/* OBSOLETE along with this program; if not, write to the Free Software */ |
|||
/* OBSOLETE Foundation, Inc., 59 Temple Place - Suite 330, */ |
|||
/* OBSOLETE Boston, MA 02111-1307, USA. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define HOST_BYTE_ORDER LITTLE_ENDIAN */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define HAVE_WAIT_STRUCT */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Doesn't have siginterupt. */ */ |
|||
/* OBSOLETE #define NO_SIGINTERRUPT */ |
|||
@ -1,183 +0,0 @@ |
|||
/* OBSOLETE /* Low level interface to ns532 running mach 3.0. */ |
|||
/* OBSOLETE Copyright 1992, 1993, 1998, 2000, 2001 Free Software Foundation, Inc. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE This file is part of GDB. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE This program is free software; you can redistribute it and/or modify */ |
|||
/* OBSOLETE it under the terms of the GNU General Public License as published by */ |
|||
/* OBSOLETE the Free Software Foundation; either version 2 of the License, or */ |
|||
/* OBSOLETE (at your option) any later version. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE This program is distributed in the hope that it will be useful, */ |
|||
/* OBSOLETE but WITHOUT ANY WARRANTY; without even the implied warranty of */ |
|||
/* OBSOLETE MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the */ |
|||
/* OBSOLETE GNU General Public License for more details. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE You should have received a copy of the GNU General Public License */ |
|||
/* OBSOLETE along with this program; if not, write to the Free Software */ |
|||
/* OBSOLETE Foundation, Inc., 59 Temple Place - Suite 330, */ |
|||
/* OBSOLETE Boston, MA 02111-1307, USA. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE#include "defs.h" */ |
|||
/* OBSOLETE#include "inferior.h" */ |
|||
/* OBSOLETE#include "regcache.h" */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE#include <stdio.h> */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE#include <mach.h> */ |
|||
/* OBSOLETE#include <mach/message.h> */ |
|||
/* OBSOLETE#include <mach/exception.h> */ |
|||
/* OBSOLETE#include <mach_error.h> */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE#define private static */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE/* Find offsets to thread states at compile time. */ |
|||
/* OBSOLETE * If your compiler does not grok this, calculate offsets */ |
|||
/* OBSOLETE * offsets yourself and use them (or get a compatible compiler :-) */ |
|||
/* OBSOLETE */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE#define REG_N_OFFSET(reg) (int)(&((struct ns532_combined_state *)0)->ts.reg) */ |
|||
/* OBSOLETE#define REG_F_OFFSET(reg) (int)(&((struct ns532_combined_state *)0)->fs.reg) */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE/* at reg_offset[i] is the offset to the ns532_combined_state */ |
|||
/* OBSOLETE * location where the gdb registers[i] is stored. */ |
|||
/* OBSOLETE */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETEstatic int reg_offset[] = */ |
|||
/* OBSOLETE{ */ |
|||
/* OBSOLETE REG_N_OFFSET (r0), REG_N_OFFSET (r1), REG_N_OFFSET (r2), REG_N_OFFSET (r3), */ |
|||
/* OBSOLETE REG_N_OFFSET (r4), REG_N_OFFSET (r5), REG_N_OFFSET (r6), REG_N_OFFSET (r7), */ |
|||
/* OBSOLETE REG_F_OFFSET (l0a), REG_F_OFFSET (l0b), REG_F_OFFSET (l2a), REG_F_OFFSET (l2b), */ |
|||
/* OBSOLETE REG_F_OFFSET (l4a), REG_F_OFFSET (l4b), REG_F_OFFSET (l6a), REG_F_OFFSET (l6b), */ |
|||
/* OBSOLETEREG_N_OFFSET (sp), REG_N_OFFSET (fp), REG_N_OFFSET (pc), REG_N_OFFSET (psr), */ |
|||
/* OBSOLETE REG_F_OFFSET (fsr), */ |
|||
/* OBSOLETE REG_F_OFFSET (l0a), REG_F_OFFSET (l1a), REG_F_OFFSET (l2a), REG_F_OFFSET (l3a), */ |
|||
/* OBSOLETE REG_F_OFFSET (l4a), REG_F_OFFSET (l5a), REG_F_OFFSET (l6a), REG_F_OFFSET (l7a), */ |
|||
/* OBSOLETE}; */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE#define REG_ADDRESS(state,regnum) ((char *)(state)+reg_offset[regnum]) */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE/* Fetch COUNT contiguous registers from thread STATE starting from REGNUM */ |
|||
/* OBSOLETE * Caller knows that the regs handled in one transaction are of same size. */ |
|||
/* OBSOLETE */ */ |
|||
/* OBSOLETE#define FETCH_REGS(state, regnum, count) \ */ |
|||
/* OBSOLETE memcpy (®isters[REGISTER_BYTE (regnum)], \ */ |
|||
/* OBSOLETE (char *)state+reg_offset[ regnum ], \ */ |
|||
/* OBSOLETE count*REGISTER_SIZE) */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE/* Store COUNT contiguous registers to thread STATE starting from REGNUM */ */ |
|||
/* OBSOLETE#define STORE_REGS(state, regnum, count) \ */ |
|||
/* OBSOLETE memcpy ((char *)state+reg_offset[ regnum ], \ */ |
|||
/* OBSOLETE ®isters[REGISTER_BYTE (regnum)], \ */ |
|||
/* OBSOLETE count*REGISTER_SIZE) */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE/* */ |
|||
/* OBSOLETE * Fetch inferiors registers for gdb. */ |
|||
/* OBSOLETE * REGNO specifies which (as gdb views it) register, -1 for all. */ |
|||
/* OBSOLETE */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETEvoid */ |
|||
/* OBSOLETEfetch_inferior_registers (int regno) */ |
|||
/* OBSOLETE{ */ |
|||
/* OBSOLETE kern_return_t ret; */ |
|||
/* OBSOLETE thread_state_data_t state; */ |
|||
/* OBSOLETE unsigned int stateCnt = NS532_COMBINED_STATE_COUNT; */ |
|||
/* OBSOLETE int index; */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE if (!MACH_PORT_VALID (current_thread)) */ |
|||
/* OBSOLETE error ("fetch inferior registers: Invalid thread"); */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE if (must_suspend_thread) */ |
|||
/* OBSOLETE setup_thread (current_thread, 1); */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE ret = thread_get_state (current_thread, */ |
|||
/* OBSOLETE NS532_COMBINED_STATE, */ |
|||
/* OBSOLETE state, */ |
|||
/* OBSOLETE &stateCnt); */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE if (ret != KERN_SUCCESS) */ |
|||
/* OBSOLETE warning ("fetch_inferior_registers: %s ", */ |
|||
/* OBSOLETE mach_error_string (ret)); */ |
|||
/* OBSOLETE#if 0 */ |
|||
/* OBSOLETE /* It may be more effective to store validate all of them, */ |
|||
/* OBSOLETE * since we fetched them all anyway */ |
|||
/* OBSOLETE */ */ |
|||
/* OBSOLETE else if (regno != -1) */ |
|||
/* OBSOLETE supply_register (regno, (char *) state + reg_offset[regno]); */ |
|||
/* OBSOLETE#endif */ |
|||
/* OBSOLETE else */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE for (index = 0; index < NUM_REGS; index++) */ |
|||
/* OBSOLETE supply_register (index, (char *) state + reg_offset[index]); */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE if (must_suspend_thread) */ |
|||
/* OBSOLETE setup_thread (current_thread, 0); */ |
|||
/* OBSOLETE} */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE/* Store our register values back into the inferior. */ |
|||
/* OBSOLETE * If REGNO is -1, do this for all registers. */ |
|||
/* OBSOLETE * Otherwise, REGNO specifies which register */ |
|||
/* OBSOLETE * */ |
|||
/* OBSOLETE * On mach3 all registers are always saved in one call. */ |
|||
/* OBSOLETE */ */ |
|||
/* OBSOLETEvoid */ |
|||
/* OBSOLETEstore_inferior_registers (int regno) */ |
|||
/* OBSOLETE{ */ |
|||
/* OBSOLETE kern_return_t ret; */ |
|||
/* OBSOLETE thread_state_data_t state; */ |
|||
/* OBSOLETE unsigned int stateCnt = NS532_COMBINED_STATE_COUNT; */ |
|||
/* OBSOLETE register int index; */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE if (!MACH_PORT_VALID (current_thread)) */ |
|||
/* OBSOLETE error ("store inferior registers: Invalid thread"); */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE if (must_suspend_thread) */ |
|||
/* OBSOLETE setup_thread (current_thread, 1); */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Fetch the state of the current thread */ */ |
|||
/* OBSOLETE ret = thread_get_state (current_thread, */ |
|||
/* OBSOLETE NS532_COMBINED_STATE, */ |
|||
/* OBSOLETE state, */ |
|||
/* OBSOLETE &stateCnt); */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE if (ret != KERN_SUCCESS) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE warning ("store_inferior_registers (get): %s", */ |
|||
/* OBSOLETE mach_error_string (ret)); */ |
|||
/* OBSOLETE if (must_suspend_thread) */ |
|||
/* OBSOLETE setup_thread (current_thread, 0); */ |
|||
/* OBSOLETE return; */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* move gdb's registers to thread's state */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE * Since we save all registers anyway, save the ones */ |
|||
/* OBSOLETE * that gdb thinks are valid (e.g. ignore the regno */ |
|||
/* OBSOLETE * parameter) */ |
|||
/* OBSOLETE */ */ |
|||
/* OBSOLETE#if 0 */ |
|||
/* OBSOLETE if (regno != -1) */ |
|||
/* OBSOLETE STORE_REGS (state, regno, 1); */ |
|||
/* OBSOLETE else */ |
|||
/* OBSOLETE#endif */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE for (index = 0; index < NUM_REGS; index++) */ |
|||
/* OBSOLETE STORE_REGS (state, index, 1); */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Write gdb's current view of register to the thread */ |
|||
/* OBSOLETE */ */ |
|||
/* OBSOLETE ret = thread_set_state (current_thread, */ |
|||
/* OBSOLETE NS532_COMBINED_STATE, */ |
|||
/* OBSOLETE state, */ |
|||
/* OBSOLETE NS532_COMBINED_STATE_COUNT); */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE if (ret != KERN_SUCCESS) */ |
|||
/* OBSOLETE warning ("store_inferior_registers (set): %s", */ |
|||
/* OBSOLETE mach_error_string (ret)); */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE if (must_suspend_thread) */ |
|||
/* OBSOLETE setup_thread (current_thread, 0); */ |
|||
/* OBSOLETE} */ |
|||
@ -1,363 +0,0 @@ |
|||
/* OBSOLETE /* Native-dependent code for GDB, for NYU Ultra3 running Sym1 OS. */ |
|||
/* OBSOLETE Copyright 1988, 1989, 1991, 1992, 1995, 1996, 1999, 2000, 2001 */ |
|||
/* OBSOLETE Free Software Foundation, Inc. */ |
|||
/* OBSOLETE Contributed by David Wood (wood@nyu.edu) at New York University. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE This file is part of GDB. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE This program is free software; you can redistribute it and/or modify */ |
|||
/* OBSOLETE it under the terms of the GNU General Public License as published by */ |
|||
/* OBSOLETE the Free Software Foundation; either version 2 of the License, or */ |
|||
/* OBSOLETE (at your option) any later version. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE This program is distributed in the hope that it will be useful, */ |
|||
/* OBSOLETE but WITHOUT ANY WARRANTY; without even the implied warranty of */ |
|||
/* OBSOLETE MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the */ |
|||
/* OBSOLETE GNU General Public License for more details. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE You should have received a copy of the GNU General Public License */ |
|||
/* OBSOLETE along with this program; if not, write to the Free Software */ |
|||
/* OBSOLETE Foundation, Inc., 59 Temple Place - Suite 330, */ |
|||
/* OBSOLETE Boston, MA 02111-1307, USA. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define DEBUG */ |
|||
/* OBSOLETE #include "defs.h" */ |
|||
/* OBSOLETE #include "frame.h" */ |
|||
/* OBSOLETE #include "inferior.h" */ |
|||
/* OBSOLETE #include "symtab.h" */ |
|||
/* OBSOLETE #include "value.h" */ |
|||
/* OBSOLETE #include "regcache.h" */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #include <sys/types.h> */ |
|||
/* OBSOLETE #include <sys/param.h> */ |
|||
/* OBSOLETE #include <signal.h> */ |
|||
/* OBSOLETE #include <sys/ioctl.h> */ |
|||
/* OBSOLETE #include <fcntl.h> */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #include "gdbcore.h" */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #include <sys/file.h> */ |
|||
/* OBSOLETE #include "gdb_stat.h" */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE static void fetch_core_registers (char *, unsigned, int, CORE_ADDR); */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Assumes support for AMD's Binary Compatibility Standard */ |
|||
/* OBSOLETE for ptrace(). If you define ULTRA3, the ultra3 extensions to */ |
|||
/* OBSOLETE ptrace() are used allowing the reading of more than one register */ |
|||
/* OBSOLETE at a time. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE This file assumes KERNEL_DEBUGGING is turned off. This means */ |
|||
/* OBSOLETE that if the user/gdb tries to read gr64-gr95 or any of the */ |
|||
/* OBSOLETE protected special registers we silently return -1 (see the */ |
|||
/* OBSOLETE CANNOT_STORE/FETCH_REGISTER macros). */ */ |
|||
/* OBSOLETE #define ULTRA3 */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #if !defined (offsetof) */ |
|||
/* OBSOLETE #define offsetof(TYPE, MEMBER) ((unsigned long) &((TYPE *)0)->MEMBER) */ |
|||
/* OBSOLETE #endif */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE extern int errno; */ |
|||
/* OBSOLETE struct ptrace_user pt_struct; */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Get all available registers from the inferior. Registers that are */ |
|||
/* OBSOLETE * defined in REGISTER_NAMES, but not available to the user/gdb are */ |
|||
/* OBSOLETE * supplied as -1. This may include gr64-gr95 and the protected special */ |
|||
/* OBSOLETE * purpose registers. */ |
|||
/* OBSOLETE */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE void */ |
|||
/* OBSOLETE fetch_inferior_registers (int regno) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE register int i, j, ret_val = 0; */ |
|||
/* OBSOLETE char buf[128]; */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE if (regno != -1) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE fetch_register (regno); */ |
|||
/* OBSOLETE return; */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Global Registers */ */ |
|||
/* OBSOLETE #ifdef ULTRA3 */ |
|||
/* OBSOLETE errno = 0; */ |
|||
/* OBSOLETE ptrace (PT_READ_STRUCT, PIDGET (inferior_ptid), */ |
|||
/* OBSOLETE (PTRACE_ARG3_TYPE) register_addr (GR96_REGNUM, 0), */ |
|||
/* OBSOLETE (int) &pt_struct.pt_gr[0], 32 * 4); */ |
|||
/* OBSOLETE if (errno != 0) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE perror_with_name ("reading global registers"); */ |
|||
/* OBSOLETE ret_val = -1; */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE else */ |
|||
/* OBSOLETE for (regno = GR96_REGNUM, j = 0; j < 32; regno++, j++) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE supply_register (regno, &pt_struct.pt_gr[j]); */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE #else */ |
|||
/* OBSOLETE for (regno = GR96_REGNUM; !ret_val && regno < GR96_REGNUM + 32; regno++) */ |
|||
/* OBSOLETE fetch_register (regno); */ |
|||
/* OBSOLETE #endif */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Local Registers */ */ |
|||
/* OBSOLETE #ifdef ULTRA3 */ |
|||
/* OBSOLETE errno = 0; */ |
|||
/* OBSOLETE ptrace (PT_READ_STRUCT, PIDGET (inferior_ptid), */ |
|||
/* OBSOLETE (PTRACE_ARG3_TYPE) register_addr (LR0_REGNUM, 0), */ |
|||
/* OBSOLETE (int) &pt_struct.pt_lr[0], 128 * 4); */ |
|||
/* OBSOLETE if (errno != 0) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE perror_with_name ("reading local registers"); */ |
|||
/* OBSOLETE ret_val = -1; */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE else */ |
|||
/* OBSOLETE for (regno = LR0_REGNUM, j = 0; j < 128; regno++, j++) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE supply_register (regno, &pt_struct.pt_lr[j]); */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE #else */ |
|||
/* OBSOLETE for (regno = LR0_REGNUM; !ret_val && regno < LR0_REGNUM + 128; regno++) */ |
|||
/* OBSOLETE fetch_register (regno); */ |
|||
/* OBSOLETE #endif */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Special Registers */ */ |
|||
/* OBSOLETE fetch_register (GR1_REGNUM); */ |
|||
/* OBSOLETE fetch_register (CPS_REGNUM); */ |
|||
/* OBSOLETE fetch_register (PC_REGNUM); */ |
|||
/* OBSOLETE fetch_register (NPC_REGNUM); */ |
|||
/* OBSOLETE fetch_register (PC2_REGNUM); */ |
|||
/* OBSOLETE fetch_register (IPC_REGNUM); */ |
|||
/* OBSOLETE fetch_register (IPA_REGNUM); */ |
|||
/* OBSOLETE fetch_register (IPB_REGNUM); */ |
|||
/* OBSOLETE fetch_register (Q_REGNUM); */ |
|||
/* OBSOLETE fetch_register (BP_REGNUM); */ |
|||
/* OBSOLETE fetch_register (FC_REGNUM); */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Fake any registers that are in REGISTER_NAMES, but not available to gdb */ */ |
|||
/* OBSOLETE registers_fetched (); */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Store our register values back into the inferior. */ |
|||
/* OBSOLETE * If REGNO is -1, do this for all registers. */ |
|||
/* OBSOLETE * Otherwise, REGNO specifies which register (so we can save time). */ |
|||
/* OBSOLETE * NOTE: Assumes AMD's binary compatibility standard. */ |
|||
/* OBSOLETE */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE void */ |
|||
/* OBSOLETE store_inferior_registers (int regno) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE register unsigned int regaddr; */ |
|||
/* OBSOLETE char buf[80]; */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE if (regno >= 0) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE if (CANNOT_STORE_REGISTER (regno)) */ |
|||
/* OBSOLETE return; */ |
|||
/* OBSOLETE regaddr = register_addr (regno, 0); */ |
|||
/* OBSOLETE errno = 0; */ |
|||
/* OBSOLETE ptrace (PT_WRITE_U, PIDGET (inferior_ptid), */ |
|||
/* OBSOLETE (PTRACE_ARG3_TYPE) regaddr, read_register (regno)); */ |
|||
/* OBSOLETE if (errno != 0) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE sprintf (buf, "writing register %s (#%d)", REGISTER_NAME (regno), regno); */ |
|||
/* OBSOLETE perror_with_name (buf); */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE else */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE #ifdef ULTRA3 */ |
|||
/* OBSOLETE pt_struct.pt_gr1 = read_register (GR1_REGNUM); */ |
|||
/* OBSOLETE for (regno = GR96_REGNUM; regno < GR96_REGNUM + 32; regno++) */ |
|||
/* OBSOLETE pt_struct.pt_gr[regno] = read_register (regno); */ |
|||
/* OBSOLETE for (regno = LR0_REGNUM; regno < LR0_REGNUM + 128; regno++) */ |
|||
/* OBSOLETE pt_struct.pt_gr[regno] = read_register (regno); */ |
|||
/* OBSOLETE errno = 0; */ |
|||
/* OBSOLETE ptrace (PT_WRITE_STRUCT, PIDGET (inferior_ptid), */ |
|||
/* OBSOLETE (PTRACE_ARG3_TYPE) register_addr (GR1_REGNUM, 0), */ |
|||
/* OBSOLETE (int) &pt_struct.pt_gr1, (1 * 32 * 128) * 4); */ |
|||
/* OBSOLETE if (errno != 0) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE sprintf (buf, "writing all local/global registers"); */ |
|||
/* OBSOLETE perror_with_name (buf); */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE pt_struct.pt_psr = read_register (CPS_REGNUM); */ |
|||
/* OBSOLETE pt_struct.pt_pc0 = read_register (NPC_REGNUM); */ |
|||
/* OBSOLETE pt_struct.pt_pc1 = read_register (PC_REGNUM); */ |
|||
/* OBSOLETE pt_struct.pt_pc2 = read_register (PC2_REGNUM); */ |
|||
/* OBSOLETE pt_struct.pt_ipc = read_register (IPC_REGNUM); */ |
|||
/* OBSOLETE pt_struct.pt_ipa = read_register (IPA_REGNUM); */ |
|||
/* OBSOLETE pt_struct.pt_ipb = read_register (IPB_REGNUM); */ |
|||
/* OBSOLETE pt_struct.pt_q = read_register (Q_REGNUM); */ |
|||
/* OBSOLETE pt_struct.pt_bp = read_register (BP_REGNUM); */ |
|||
/* OBSOLETE pt_struct.pt_fc = read_register (FC_REGNUM); */ |
|||
/* OBSOLETE errno = 0; */ |
|||
/* OBSOLETE ptrace (PT_WRITE_STRUCT, PIDGET (inferior_ptid), */ |
|||
/* OBSOLETE (PTRACE_ARG3_TYPE) register_addr (CPS_REGNUM, 0), */ |
|||
/* OBSOLETE (int) &pt_struct.pt_psr, (10) * 4); */ |
|||
/* OBSOLETE if (errno != 0) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE sprintf (buf, "writing all special registers"); */ |
|||
/* OBSOLETE perror_with_name (buf); */ |
|||
/* OBSOLETE return; */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE #else */ |
|||
/* OBSOLETE store_inferior_registers (GR1_REGNUM); */ |
|||
/* OBSOLETE for (regno = GR96_REGNUM; regno < GR96_REGNUM + 32; regno++) */ |
|||
/* OBSOLETE store_inferior_registers (regno); */ |
|||
/* OBSOLETE for (regno = LR0_REGNUM; regno < LR0_REGNUM + 128; regno++) */ |
|||
/* OBSOLETE store_inferior_registers (regno); */ |
|||
/* OBSOLETE store_inferior_registers (CPS_REGNUM); */ |
|||
/* OBSOLETE store_inferior_registers (PC_REGNUM); */ |
|||
/* OBSOLETE store_inferior_registers (NPC_REGNUM); */ |
|||
/* OBSOLETE store_inferior_registers (PC2_REGNUM); */ |
|||
/* OBSOLETE store_inferior_registers (IPC_REGNUM); */ |
|||
/* OBSOLETE store_inferior_registers (IPA_REGNUM); */ |
|||
/* OBSOLETE store_inferior_registers (IPB_REGNUM); */ |
|||
/* OBSOLETE store_inferior_registers (Q_REGNUM); */ |
|||
/* OBSOLETE store_inferior_registers (BP_REGNUM); */ |
|||
/* OBSOLETE store_inferior_registers (FC_REGNUM); */ |
|||
/* OBSOLETE #endif /* ULTRA3 */ */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* */ |
|||
/* OBSOLETE * Fetch an individual register (and supply it). */ |
|||
/* OBSOLETE * return 0 on success, -1 on failure. */ |
|||
/* OBSOLETE * NOTE: Assumes AMD's Binary Compatibility Standard for ptrace(). */ |
|||
/* OBSOLETE */ */ |
|||
/* OBSOLETE static void */ |
|||
/* OBSOLETE fetch_register (int regno) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE char buf[128]; */ |
|||
/* OBSOLETE int val; */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE if (CANNOT_FETCH_REGISTER (regno)) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE val = -1; */ |
|||
/* OBSOLETE supply_register (regno, &val); */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE else */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE errno = 0; */ |
|||
/* OBSOLETE val = ptrace (PT_READ_U, PIDGET (inferior_ptid), */ |
|||
/* OBSOLETE (PTRACE_ARG3_TYPE) register_addr (regno, 0), 0); */ |
|||
/* OBSOLETE if (errno != 0) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE sprintf (buf, "reading register %s (#%d)", REGISTER_NAME (regno), regno); */ |
|||
/* OBSOLETE perror_with_name (buf); */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE else */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE supply_register (regno, &val); */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* */ |
|||
/* OBSOLETE * Read AMD's Binary Compatibilty Standard conforming core file. */ |
|||
/* OBSOLETE * struct ptrace_user is the first thing in the core file */ |
|||
/* OBSOLETE * */ |
|||
/* OBSOLETE * CORE_REG_SECT, CORE_REG_SIZE, WHICH, and REG_ADDR are all ignored. */ |
|||
/* OBSOLETE */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE static void */ |
|||
/* OBSOLETE fetch_core_registers (char *core_reg_sect, unsigned core_reg_size, */ |
|||
/* OBSOLETE int which, CORE_ADDR reg_addr) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE register int regno; */ |
|||
/* OBSOLETE int val; */ |
|||
/* OBSOLETE char buf[4]; */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE for (regno = 0; regno < NUM_REGS; regno++) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE if (!CANNOT_FETCH_REGISTER (regno)) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE val = bfd_seek (core_bfd, (file_ptr) register_addr (regno, 0), SEEK_SET); */ |
|||
/* OBSOLETE if (val != 0 || (val = bfd_bread (buf, sizeof buf, core_bfd)) != sizeof buf) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE char *buffer = (char *) alloca (strlen (REGISTER_NAME (regno)) + 35); */ |
|||
/* OBSOLETE strcpy (buffer, "Reading core register "); */ |
|||
/* OBSOLETE strcat (buffer, REGISTER_NAME (regno)); */ |
|||
/* OBSOLETE perror_with_name (buffer); */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE supply_register (regno, buf); */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Fake any registers that are in REGISTER_NAMES, but not available to gdb */ */ |
|||
/* OBSOLETE registers_fetched (); */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* */ |
|||
/* OBSOLETE * Takes a register number as defined in tm.h via REGISTER_NAMES, and maps */ |
|||
/* OBSOLETE * it to an offset in a struct ptrace_user defined by AMD's BCS. */ |
|||
/* OBSOLETE * That is, it defines the mapping between gdb register numbers and items in */ |
|||
/* OBSOLETE * a struct ptrace_user. */ |
|||
/* OBSOLETE * A register protection scheme is set up here. If a register not */ |
|||
/* OBSOLETE * available to the user is specified in 'regno', then an address that */ |
|||
/* OBSOLETE * will cause ptrace() to fail is returned. */ |
|||
/* OBSOLETE */ */ |
|||
/* OBSOLETE CORE_ADDR */ |
|||
/* OBSOLETE register_addr (int regno, CORE_ADDR blockend) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE if ((regno >= LR0_REGNUM) && (regno < LR0_REGNUM + 128)) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE return (offsetof (struct ptrace_user, pt_lr[regno - LR0_REGNUM])); */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE else if ((regno >= GR96_REGNUM) && (regno < GR96_REGNUM + 32)) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE return (offsetof (struct ptrace_user, pt_gr[regno - GR96_REGNUM])); */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE else */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE switch (regno) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE case GR1_REGNUM: */ |
|||
/* OBSOLETE return (offsetof (struct ptrace_user, pt_gr1)); */ |
|||
/* OBSOLETE case CPS_REGNUM: */ |
|||
/* OBSOLETE return (offsetof (struct ptrace_user, pt_psr)); */ |
|||
/* OBSOLETE case NPC_REGNUM: */ |
|||
/* OBSOLETE return (offsetof (struct ptrace_user, pt_pc0)); */ |
|||
/* OBSOLETE case PC_REGNUM: */ |
|||
/* OBSOLETE return (offsetof (struct ptrace_user, pt_pc1)); */ |
|||
/* OBSOLETE case PC2_REGNUM: */ |
|||
/* OBSOLETE return (offsetof (struct ptrace_user, pt_pc2)); */ |
|||
/* OBSOLETE case IPC_REGNUM: */ |
|||
/* OBSOLETE return (offsetof (struct ptrace_user, pt_ipc)); */ |
|||
/* OBSOLETE case IPA_REGNUM: */ |
|||
/* OBSOLETE return (offsetof (struct ptrace_user, pt_ipa)); */ |
|||
/* OBSOLETE case IPB_REGNUM: */ |
|||
/* OBSOLETE return (offsetof (struct ptrace_user, pt_ipb)); */ |
|||
/* OBSOLETE case Q_REGNUM: */ |
|||
/* OBSOLETE return (offsetof (struct ptrace_user, pt_q)); */ |
|||
/* OBSOLETE case BP_REGNUM: */ |
|||
/* OBSOLETE return (offsetof (struct ptrace_user, pt_bp)); */ |
|||
/* OBSOLETE case FC_REGNUM: */ |
|||
/* OBSOLETE return (offsetof (struct ptrace_user, pt_fc)); */ |
|||
/* OBSOLETE default: */ |
|||
/* OBSOLETE fprintf_filtered (gdb_stderr, "register_addr():Bad register %s (%d)\n", */ |
|||
/* OBSOLETE REGISTER_NAME (regno), regno); */ |
|||
/* OBSOLETE return (0xffffffff); /* Should make ptrace() fail */ */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Register that we are able to handle ultra3 core file formats. */ |
|||
/* OBSOLETE FIXME: is this really bfd_target_unknown_flavour? */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE static struct core_fns ultra3_core_fns = */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE bfd_target_unknown_flavour, /* core_flavour */ */ |
|||
/* OBSOLETE default_check_format, /* check_format */ */ |
|||
/* OBSOLETE default_core_sniffer, /* core_sniffer */ */ |
|||
/* OBSOLETE fetch_core_registers, /* core_read_registers */ */ |
|||
/* OBSOLETE NULL /* next */ */ |
|||
/* OBSOLETE }; */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE void */ |
|||
/* OBSOLETE _initialize_core_ultra3 (void) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE add_core_fns (&ultra3_core_fns); */ |
|||
/* OBSOLETE } */ |
|||
@ -1,138 +0,0 @@ |
|||
/* OBSOLETE /* Host-dependent code for GDB, for NYU Ultra3 running Sym1 OS. */ |
|||
/* OBSOLETE Copyright 1988, 1989, 1991, 1992, 1993, 1995, 2000 */ |
|||
/* OBSOLETE Free Software Foundation, Inc. */ |
|||
/* OBSOLETE Contributed by David Wood (wood@nyu.edu) at New York University. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE This file is part of GDB. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE This program is free software; you can redistribute it and/or modify */ |
|||
/* OBSOLETE it under the terms of the GNU General Public License as published by */ |
|||
/* OBSOLETE the Free Software Foundation; either version 2 of the License, or */ |
|||
/* OBSOLETE (at your option) any later version. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE This program is distributed in the hope that it will be useful, */ |
|||
/* OBSOLETE but WITHOUT ANY WARRANTY; without even the implied warranty of */ |
|||
/* OBSOLETE MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the */ |
|||
/* OBSOLETE GNU General Public License for more details. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE You should have received a copy of the GNU General Public License */ |
|||
/* OBSOLETE along with this program; if not, write to the Free Software */ |
|||
/* OBSOLETE Foundation, Inc., 59 Temple Place - Suite 330, */ |
|||
/* OBSOLETE Boston, MA 02111-1307, USA. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #define DEBUG */ |
|||
/* OBSOLETE #include "defs.h" */ |
|||
/* OBSOLETE #include "frame.h" */ |
|||
/* OBSOLETE #include "inferior.h" */ |
|||
/* OBSOLETE #include "symtab.h" */ |
|||
/* OBSOLETE #include "value.h" */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #include <sys/types.h> */ |
|||
/* OBSOLETE #include <sys/param.h> */ |
|||
/* OBSOLETE #include <signal.h> */ |
|||
/* OBSOLETE #include <sys/ioctl.h> */ |
|||
/* OBSOLETE #include <fcntl.h> */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #include "gdbcore.h" */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #include <sys/file.h> */ |
|||
/* OBSOLETE #include "gdb_stat.h" */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Assorted operating system circumventions */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #ifdef SYM1 */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* FIXME: Kludge this for now. It really should be system call. */ */ |
|||
/* OBSOLETE int */ |
|||
/* OBSOLETE getpagesize (void) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE return (8192); */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* FIXME: Fake out the fcntl() call, which we don't have. */ */ |
|||
/* OBSOLETE fcntl (int fd, int cmd, int arg) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE switch (cmd) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE case F_GETFL: */ |
|||
/* OBSOLETE return (O_RDONLY); */ |
|||
/* OBSOLETE break; */ |
|||
/* OBSOLETE default: */ |
|||
/* OBSOLETE printf_unfiltered ("Ultra3's fcntl() failing, cmd = %d.\n", cmd); */ |
|||
/* OBSOLETE return (-1); */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* */ |
|||
/* OBSOLETE * 4.2 Signal support, requires linking with libjobs. */ |
|||
/* OBSOLETE */ */ |
|||
/* OBSOLETE static int _SigMask; */ |
|||
/* OBSOLETE #define sigbit(s) (1L << ((s)-1)) */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE init_SigMask (void) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE /* Taken from the sym1 kernel in machdep.c:startup() */ */ |
|||
/* OBSOLETE _SigMask = sigbit (SIGTSTP) | sigbit (SIGTTOU) | sigbit (SIGTTIN) | */ |
|||
/* OBSOLETE sigbit (SIGCHLD) | sigbit (SIGTINT); */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE sigmask (int signo) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE return (1 << (signo - 1)); */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE sigsetmask (unsigned int sigmask) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE int i, mask = 1; */ |
|||
/* OBSOLETE int lastmask = _SigMask; */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE for (i = 0; i < NSIG; i++) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE if (sigmask & mask) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE if (!(_SigMask & mask)) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE sighold (i + 1); */ |
|||
/* OBSOLETE _SigMask |= mask; */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE else if (_SigMask & mask) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE sigrelse (i + 1); */ |
|||
/* OBSOLETE _SigMask &= ~mask; */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE mask <<= 1; */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE return (lastmask); */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE sigblock (unsigned int sigmask) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE int i, mask = 1; */ |
|||
/* OBSOLETE int lastmask = _SigMask; */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE for (i = 0; i < NSIG; i++) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE if ((sigmask & mask) && !(_SigMask & mask)) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE sighold (i + 1); */ |
|||
/* OBSOLETE _SigMask |= mask; */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE mask <<= 1; */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE return (lastmask); */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE #endif /* SYM1 */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Initialization code for this module. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE void */ |
|||
/* OBSOLETE _initialize_ultra3 (void) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE #ifdef SYM1 */ |
|||
/* OBSOLETE init_SigMask (); */ |
|||
/* OBSOLETE #endif */ |
|||
/* OBSOLETE } */ |
|||
@ -1,133 +0,0 @@ |
|||
/* OBSOLETE /* umax host stuff. */ |
|||
/* OBSOLETE Copyright 1986, 1987, 1989, 1991, 1992, 1993, 1995, 1999, 2000, 2001 */ |
|||
/* OBSOLETE Free Software Foundation, Inc. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE This file is part of GDB. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE This program is free software; you can redistribute it and/or modify */ |
|||
/* OBSOLETE it under the terms of the GNU General Public License as published by */ |
|||
/* OBSOLETE the Free Software Foundation; either version 2 of the License, or */ |
|||
/* OBSOLETE (at your option) any later version. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE This program is distributed in the hope that it will be useful, */ |
|||
/* OBSOLETE but WITHOUT ANY WARRANTY; without even the implied warranty of */ |
|||
/* OBSOLETE MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the */ |
|||
/* OBSOLETE GNU General Public License for more details. */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE You should have received a copy of the GNU General Public License */ |
|||
/* OBSOLETE along with this program; if not, write to the Free Software */ |
|||
/* OBSOLETE Foundation, Inc., 59 Temple Place - Suite 330, */ |
|||
/* OBSOLETE Boston, MA 02111-1307, USA. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #include "defs.h" */ |
|||
/* OBSOLETE #include "frame.h" */ |
|||
/* OBSOLETE #include "inferior.h" */ |
|||
/* OBSOLETE #include "regcache.h" */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #include <sys/param.h> */ |
|||
/* OBSOLETE #include <sys/dir.h> */ |
|||
/* OBSOLETE #include <signal.h> */ |
|||
/* OBSOLETE #include <sys/ioctl.h> */ |
|||
/* OBSOLETE #include <fcntl.h> */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #include "gdbcore.h" */ |
|||
/* OBSOLETE #include <sys/ptrace.h> */ |
|||
/* OBSOLETE #define PTRACE_ATTACH PT_ATTACH */ |
|||
/* OBSOLETE #define PTRACE_DETACH PT_FREEPROC */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE #include <sys/file.h> */ |
|||
/* OBSOLETE #include "gdb_stat.h" */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Work with core dump and executable files, for GDB. */ |
|||
/* OBSOLETE This code would be in corefile.c if it weren't machine-dependent. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE void */ |
|||
/* OBSOLETE core_file_command (char *filename, int from_tty) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE int val; */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Discard all vestiges of any previous core file */ |
|||
/* OBSOLETE and mark data and stack spaces as empty. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE if (corefile) */ |
|||
/* OBSOLETE xfree (corefile); */ |
|||
/* OBSOLETE corefile = 0; */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE if (corechan >= 0) */ |
|||
/* OBSOLETE close (corechan); */ |
|||
/* OBSOLETE corechan = -1; */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE data_start = 0; */ |
|||
/* OBSOLETE data_end = 0; */ |
|||
/* OBSOLETE stack_start = STACK_END_ADDR; */ |
|||
/* OBSOLETE stack_end = STACK_END_ADDR; */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Now, if a new core file was specified, open it and digest it. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE if (filename) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE filename = tilde_expand (filename); */ |
|||
/* OBSOLETE make_cleanup (xfree, filename); */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE if (have_inferior_p ()) */ |
|||
/* OBSOLETE error ("To look at a core file, you must kill the program with \"kill\"."); */ |
|||
/* OBSOLETE corechan = open (filename, O_RDONLY, 0); */ |
|||
/* OBSOLETE if (corechan < 0) */ |
|||
/* OBSOLETE perror_with_name (filename); */ |
|||
/* OBSOLETE /* 4.2-style (and perhaps also sysV-style) core dump file. */ */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE struct ptrace_user u; */ |
|||
/* OBSOLETE int reg_offset; */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE val = myread (corechan, &u, sizeof u); */ |
|||
/* OBSOLETE if (val < 0) */ |
|||
/* OBSOLETE perror_with_name (filename); */ |
|||
/* OBSOLETE data_start = exec_data_start; */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE data_end = data_start + u.pt_dsize; */ |
|||
/* OBSOLETE stack_start = stack_end - u.pt_ssize; */ |
|||
/* OBSOLETE data_offset = sizeof u; */ |
|||
/* OBSOLETE stack_offset = data_offset + u.pt_dsize; */ |
|||
/* OBSOLETE reg_offset = 0; */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE memcpy (&core_aouthdr, &u.pt_aouthdr, sizeof (AOUTHDR)); */ |
|||
/* OBSOLETE printf_unfiltered ("Core file is from \"%s\".\n", u.pt_comm); */ |
|||
/* OBSOLETE if (u.pt_signal > 0) */ |
|||
/* OBSOLETE printf_unfiltered ("Program terminated with signal %d, %s.\n", */ |
|||
/* OBSOLETE u.pt_signal, safe_strsignal (u.pt_signal)); */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE /* Read the register values out of the core file and store */ |
|||
/* OBSOLETE them where `read_register' will find them. */ */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE register int regno; */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE for (regno = 0; regno < NUM_REGS; regno++) */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE char buf[MAX_REGISTER_RAW_SIZE]; */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE val = lseek (corechan, register_addr (regno, reg_offset), 0); */ |
|||
/* OBSOLETE if (val < 0) */ |
|||
/* OBSOLETE perror_with_name (filename); */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE val = myread (corechan, buf, sizeof buf); */ |
|||
/* OBSOLETE if (val < 0) */ |
|||
/* OBSOLETE perror_with_name (filename); */ |
|||
/* OBSOLETE supply_register (regno, buf); */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE if (filename[0] == '/') */ |
|||
/* OBSOLETE corefile = savestring (filename, strlen (filename)); */ |
|||
/* OBSOLETE else */ |
|||
/* OBSOLETE { */ |
|||
/* OBSOLETE corefile = concat (current_directory, "/", filename, NULL); */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE */ |
|||
/* OBSOLETE flush_cached_frames (); */ |
|||
/* OBSOLETE select_frame (get_current_frame (), 0); */ |
|||
/* OBSOLETE validate_files (); */ |
|||
/* OBSOLETE } */ |
|||
/* OBSOLETE else if (from_tty) */ |
|||
/* OBSOLETE printf_unfiltered ("No core file now.\n"); */ |
|||
/* OBSOLETE } */ |
|||
Loading…
Reference in new issue