aboutsummaryrefslogtreecommitdiff
path: root/gdb/ns32k-tdep.c
diff options
context:
space:
mode:
authorAndrew Cagney <cagney@redhat.com>2004-11-14 00:10:55 +0000
committerAndrew Cagney <cagney@redhat.com>2004-11-14 00:10:55 +0000
commit9445aa303f19ea3f4bfad8843eca987c8f3eaf03 (patch)
treef59c0349f6b328663b1e3afb50dad3dc6afd9ca9 /gdb/ns32k-tdep.c
parente3ab7234772b0f36b259f8efb0a78e1d750a95bc (diff)
downloadgdb-9445aa303f19ea3f4bfad8843eca987c8f3eaf03.zip
gdb-9445aa303f19ea3f4bfad8843eca987c8f3eaf03.tar.gz
gdb-9445aa303f19ea3f4bfad8843eca987c8f3eaf03.tar.bz2
2004-11-13 Andrew Cagney <cagney@gnu.org>
* NEWS: List h8300*-*-*, mcore-*-*, mn10300-*-*, ns32k-*-*, and v850-*-* under removed. * configure.host: Delete ns32k-*-netbsd*. * configure.tgt: Delete h8300-*-*, mcore*-*-*, mn10300-*-*, ns32k-*-netbsd*, and v850*-*-*. * MAINTAINERS: Mark h8300, mcore, mn10300, ns32k, v850 as "Deleted" * config/h8300/tm-h8300.h, config/h8300/h8300.mt: Delete. * h8300-tdep.c, config/mcore/mcore.mt, mcore-rom.c: Delete. * mcore-tdep.c, config/mn10300/mn10300.mt: Delete. * mn10300-tdep.c, config/ns32k/nbsdaout.mh: Delete. * config/ns32k/nbsdaout.mt, config/ns32k/nm-nbsd.h: Delete. * config/ns32k/nm-nbsdaout.h, config/ns32k/tm-ns32k.h: Delete. * ns32knbsd-nat.c, ns32knbsd-tdep.c, ns32k-tdep.c: Delete. * ns32k-tdep.h, config/v850/v850.mt, v850ice.c: Delete. * v850-tdep.c: Delete.
Diffstat (limited to 'gdb/ns32k-tdep.c')
-rw-r--r--gdb/ns32k-tdep.c573
1 files changed, 0 insertions, 573 deletions
diff --git a/gdb/ns32k-tdep.c b/gdb/ns32k-tdep.c
deleted file mode 100644
index 8813cb2..0000000
--- a/gdb/ns32k-tdep.c
+++ /dev/null
@@ -1,573 +0,0 @@
-/* Target dependent code for the NS32000, for GDB.
-
- Copyright 1986, 1988, 1991, 1992, 1994, 1995, 1998, 1999, 2000,
- 2001, 2002, 2003, 2004 Free Software Foundation, Inc.
-
- This file is part of GDB.
-
- This program is free software; you can redistribute it and/or modify
- it under the terms of the GNU General Public License as published by
- the Free Software Foundation; either version 2 of the License, or
- (at your option) any later version.
-
- This program is distributed in the hope that it will be useful,
- but WITHOUT ANY WARRANTY; without even the implied warranty of
- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- GNU General Public License for more details.
-
- You should have received a copy of the GNU General Public License
- along with this program; if not, write to the Free Software
- Foundation, Inc., 59 Temple Place - Suite 330,
- Boston, MA 02111-1307, USA. */
-
-#include "defs.h"
-#include "frame.h"
-#include "gdbtypes.h"
-#include "gdbcore.h"
-#include "inferior.h"
-#include "regcache.h"
-#include "target.h"
-#include "arch-utils.h"
-#include "osabi.h"
-#include "dis-asm.h"
-
-#include "ns32k-tdep.h"
-#include "gdb_string.h"
-
-static int sign_extend (int value, int bits);
-static CORE_ADDR ns32k_get_enter_addr (CORE_ADDR);
-static int ns32k_localcount (CORE_ADDR enter_pc);
-static void flip_bytes (void *, int);
-
-static const char *
-ns32k_register_name_32082 (int regno)
-{
- static char *register_names[] =
- {
- "r0", "r1", "r2", "r3", "r4", "r5", "r6", "r7",
- "f0", "f1", "f2", "f3", "f4", "f5", "f6", "f7",
- "sp", "fp", "pc", "ps",
- "l0", "l1", "l2", "l3", "xx",
- };
-
- if (regno < 0)
- return NULL;
- if (regno >= sizeof (register_names) / sizeof (*register_names))
- return NULL;
-
- return (register_names[regno]);
-}
-
-static const char *
-ns32k_register_name_32382 (int regno)
-{
- static char *register_names[] =
- {
- "r0", "r1", "r2", "r3", "r4", "r5", "r6", "r7",
- "f0", "f1", "f2", "f3", "f4", "f5", "f6", "f7",
- "sp", "fp", "pc", "ps",
- "fsr",
- "l0", "l1", "l2", "l3", "l4", "l5", "l6", "l7", "xx",
- };
-
- if (regno < 0)
- return NULL;
- if (regno >= sizeof (register_names) / sizeof (*register_names))
- return NULL;
-
- return (register_names[regno]);
-}
-
-static int
-ns32k_register_byte_32082 (int regno)
-{
- if (regno >= NS32K_LP0_REGNUM)
- return (NS32K_LP0_REGNUM * 4) + ((regno - NS32K_LP0_REGNUM) * 8);
-
- return (regno * 4);
-}
-
-static int
-ns32k_register_byte_32382 (int regno)
-{
- /* This is a bit yuk. The even numbered double precision floating
- point long registers occupy the same space as the even:odd numbered
- single precision floating point registers, but the extra 32381 FPU
- registers are at the end. Doing it this way is compatible for both
- 32081 and 32381 equipped machines. */
-
- return ((regno < NS32K_LP0_REGNUM ? regno
- : (regno - NS32K_LP0_REGNUM) & 1 ? regno - 1
- : (regno - NS32K_LP0_REGNUM + FP0_REGNUM)) * 4);
-}
-
-static int
-ns32k_register_raw_size (int regno)
-{
- /* All registers are 4 bytes, except for the doubled floating
- registers. */
-
- return ((regno >= NS32K_LP0_REGNUM) ? 8 : 4);
-}
-
-static int
-ns32k_register_virtual_size (int regno)
-{
- return ((regno >= NS32K_LP0_REGNUM) ? 8 : 4);
-}
-
-static struct type *
-ns32k_register_virtual_type (int regno)
-{
- if (regno < FP0_REGNUM)
- return (builtin_type_int);
-
- if (regno < FP0_REGNUM + 8)
- return (builtin_type_float);
-
- if (regno < NS32K_LP0_REGNUM)
- return (builtin_type_int);
-
- return (builtin_type_double);
-}
-
-/* Immediately after a function call, return the saved PC. Can't
- always go through the frames for this because on some systems,
- the new frame is not set up until the new function executes some
- instructions. */
-
-static CORE_ADDR
-ns32k_saved_pc_after_call (struct frame_info *frame)
-{
- return (read_memory_integer (read_register (SP_REGNUM), 4));
-}
-
-/* Advance PC across any function entry prologue instructions
- to reach some "real" code. */
-
-static CORE_ADDR
-umax_skip_prologue (CORE_ADDR pc)
-{
- unsigned char op = read_memory_integer (pc, 1);
- if (op == 0x82)
- {
- op = read_memory_integer (pc + 2, 1);
- if ((op & 0x80) == 0)
- pc += 3;
- else if ((op & 0xc0) == 0x80)
- pc += 4;
- else
- pc += 6;
- }
- return pc;
-}
-
-static const unsigned char *
-ns32k_breakpoint_from_pc (CORE_ADDR *pcp, int *lenp)
-{
- static const unsigned char breakpoint_insn[] = { 0xf2 };
-
- *lenp = sizeof (breakpoint_insn);
- return breakpoint_insn;
-}
-
-/* Return number of args passed to a frame.
- Can return -1, meaning no way to tell.
- Encore's C compiler often reuses same area on stack for args,
- so this will often not work properly. If the arg names
- are known, it's likely most of them will be printed. */
-
-static int
-umax_frame_num_args (struct frame_info *fi)
-{
- int numargs;
- CORE_ADDR pc;
- CORE_ADDR enter_addr;
- unsigned int insn;
- unsigned int addr_mode;
- int width;
-
- numargs = -1;
- enter_addr = ns32k_get_enter_addr (get_frame_pc (fi));
- if (enter_addr > 0)
- {
- pc = ((enter_addr == 1)
- ? DEPRECATED_SAVED_PC_AFTER_CALL (fi)
- : DEPRECATED_FRAME_SAVED_PC (fi));
- insn = read_memory_integer (pc, 2);
- addr_mode = (insn >> 11) & 0x1f;
- insn = insn & 0x7ff;
- if ((insn & 0x7fc) == 0x57c
- && addr_mode == 0x14) /* immediate */
- {
- if (insn == 0x57c) /* adjspb */
- width = 1;
- else if (insn == 0x57d) /* adjspw */
- width = 2;
- else if (insn == 0x57f) /* adjspd */
- width = 4;
- else
- internal_error (__FILE__, __LINE__, "bad else");
- numargs = read_memory_integer (pc + 2, width);
- if (width > 1)
- flip_bytes (&numargs, width);
- numargs = -sign_extend (numargs, width * 8) / 4;
- }
- }
- return numargs;
-}
-
-static int
-sign_extend (int value, int bits)
-{
- value = value & ((1 << bits) - 1);
- return (value & (1 << (bits - 1))
- ? value | (~((1 << bits) - 1))
- : value);
-}
-
-static void
-flip_bytes (void *p, int count)
-{
- char tmp;
- char *ptr = 0;
-
- while (count > 0)
- {
- tmp = *ptr;
- ptr[0] = ptr[count - 1];
- ptr[count - 1] = tmp;
- ptr++;
- count -= 2;
- }
-}
-
-/* Return the number of locals in the current frame given a
- pc pointing to the enter instruction. This is used by
- ns32k_frame_init_saved_regs. */
-
-static int
-ns32k_localcount (CORE_ADDR enter_pc)
-{
- unsigned char localtype;
- int localcount;
-
- localtype = read_memory_integer (enter_pc + 2, 1);
- if ((localtype & 0x80) == 0)
- localcount = localtype;
- else if ((localtype & 0xc0) == 0x80)
- localcount = (((localtype & 0x3f) << 8)
- | (read_memory_integer (enter_pc + 3, 1) & 0xff));
- else
- localcount = (((localtype & 0x3f) << 24)
- | ((read_memory_integer (enter_pc + 3, 1) & 0xff) << 16)
- | ((read_memory_integer (enter_pc + 4, 1) & 0xff) << 8)
- | (read_memory_integer (enter_pc + 5, 1) & 0xff));
- return localcount;
-}
-
-
-/* Nonzero if instruction at PC is a return instruction. */
-
-static int
-ns32k_about_to_return (CORE_ADDR pc)
-{
- return (read_memory_integer (pc, 1) == 0x12);
-}
-
-/* Get the address of the enter opcode for this function, if it is active.
- Returns positive address > 1 if pc is between enter/exit,
- 1 if pc before enter or after exit, 0 otherwise. */
-static CORE_ADDR
-ns32k_get_enter_addr (CORE_ADDR pc)
-{
- CORE_ADDR enter_addr;
- unsigned char op;
-
- if (pc == 0)
- return 0;
-
- if (ns32k_about_to_return (pc))
- return 1; /* after exit */
-
- enter_addr = get_pc_function_start (pc);
-
- if (pc == enter_addr)
- return 1; /* before enter */
-
- op = read_memory_integer (enter_addr, 1);
-
- if (op != 0x82)
- return 0; /* function has no enter/exit */
-
- return enter_addr; /* pc is between enter and exit */
-}
-
-static CORE_ADDR
-ns32k_frame_chain (struct frame_info *frame)
-{
- /* In the case of the NS32000 series, the frame's nominal address is the
- FP value, and that address is saved at the previous FP value as a
- 4-byte word. */
- return (read_memory_integer (get_frame_base (frame), 4));
-}
-
-
-static CORE_ADDR
-ns32k_sigtramp_saved_pc (struct frame_info *frame)
-{
- CORE_ADDR sigcontext_addr;
- char *buf;
- int ptrbytes = TYPE_LENGTH (builtin_type_void_func_ptr);
- int sigcontext_offs = (2 * TARGET_INT_BIT) / TARGET_CHAR_BIT;
-
- buf = alloca (ptrbytes);
- /* Get sigcontext address, it is the third parameter on the stack. */
- if (get_next_frame (frame))
- sigcontext_addr = read_memory_typed_address
- (DEPRECATED_FRAME_ARGS_ADDRESS (get_next_frame (frame)) + FRAME_ARGS_SKIP + sigcontext_offs,
- builtin_type_void_data_ptr);
- else
- sigcontext_addr = read_memory_typed_address
- (read_register (SP_REGNUM) + sigcontext_offs, builtin_type_void_data_ptr);
-
- /* Offset to saved PC in sigcontext, from <machine/signal.h>. Don't
- cause a memory_error when accessing sigcontext in case the stack
- layout has changed or the stack is corrupt. */
- target_read_memory (sigcontext_addr + 20, buf, ptrbytes);
- return extract_typed_address (buf, builtin_type_void_func_ptr);
-}
-
-static CORE_ADDR
-ns32k_frame_saved_pc (struct frame_info *frame)
-{
- if ((get_frame_type (frame) == SIGTRAMP_FRAME))
- return (ns32k_sigtramp_saved_pc (frame)); /* XXXJRT */
-
- return (read_memory_integer (get_frame_base (frame) + 4, 4));
-}
-
-static CORE_ADDR
-ns32k_frame_args_address (struct frame_info *frame)
-{
- if (ns32k_get_enter_addr (get_frame_pc (frame)) > 1)
- return (get_frame_base (frame));
-
- return (read_register (SP_REGNUM) - 4);
-}
-
-/* Code to initialize the addresses of the saved registers of frame described
- by FRAME_INFO. This includes special registers such as pc and fp saved in
- special ways in the stack frame. sp is even more special: the address we
- return for it IS the sp for the next frame. */
-
-static void
-ns32k_frame_init_saved_regs (struct frame_info *frame)
-{
- int regmask, regnum;
- int localcount;
- CORE_ADDR enter_addr, next_addr;
-
- if (deprecated_get_frame_saved_regs (frame))
- return;
-
- frame_saved_regs_zalloc (frame);
-
- enter_addr = ns32k_get_enter_addr (get_frame_pc (frame));
- if (enter_addr > 1)
- {
- regmask = read_memory_integer (enter_addr + 1, 1) & 0xff;
- localcount = ns32k_localcount (enter_addr);
- next_addr = get_frame_base (frame) + localcount;
-
- for (regnum = 0; regnum < 8; regnum++)
- {
- if (regmask & (1 << regnum))
- deprecated_get_frame_saved_regs (frame)[regnum] = next_addr -= 4;
- }
-
- deprecated_get_frame_saved_regs (frame)[SP_REGNUM] = get_frame_base (frame) + 4;
- deprecated_get_frame_saved_regs (frame)[PC_REGNUM] = get_frame_base (frame) + 4;
- deprecated_get_frame_saved_regs (frame)[DEPRECATED_FP_REGNUM] = read_memory_integer (get_frame_base (frame), 4);
- }
- else if (enter_addr == 1)
- {
- CORE_ADDR sp = read_register (SP_REGNUM);
- deprecated_get_frame_saved_regs (frame)[PC_REGNUM] = sp;
- deprecated_get_frame_saved_regs (frame)[SP_REGNUM] = sp + 4;
- }
-}
-
-static void
-ns32k_pop_frame (void)
-{
- struct frame_info *frame = get_current_frame ();
- CORE_ADDR fp;
- int regnum;
-
- fp = get_frame_base (frame);
- DEPRECATED_FRAME_INIT_SAVED_REGS (frame);
-
- for (regnum = 0; regnum < 8; regnum++)
- if (deprecated_get_frame_saved_regs (frame)[regnum])
- write_register (regnum,
- read_memory_integer (deprecated_get_frame_saved_regs (frame)[regnum], 4));
-
- write_register (DEPRECATED_FP_REGNUM, read_memory_integer (fp, 4));
- write_register (PC_REGNUM, read_memory_integer (fp + 4, 4));
- write_register (SP_REGNUM, fp + 8);
- flush_cached_frames ();
-}
-
-static CORE_ADDR
-ns32k_push_arguments (int nargs, struct value **args, CORE_ADDR sp,
- int struct_return, CORE_ADDR struct_addr)
-{
- /* ASSERT ( !struct_return); */
- int i;
- for (i = nargs - 1; i >= 0; i--)
- {
- struct value *arg = args[i];
- int len = TYPE_LENGTH (VALUE_ENCLOSING_TYPE (arg));
- int container_len = len;
- int offset;
-
- /* Are we going to put it at the high or low end of the
- container? */
- if (TARGET_BYTE_ORDER == BFD_ENDIAN_BIG)
- offset = container_len - len;
- else
- offset = 0;
-
- /* Stack grows downward. */
- sp -= container_len;
- write_memory (sp + offset, VALUE_CONTENTS_ALL (arg), len);
- }
- return sp;
-}
-
-
-static void
-ns32k_store_struct_return (CORE_ADDR addr, CORE_ADDR sp)
-{
- /* On this machine, this is a no-op (Encore Umax didn't use GCC). */
-}
-
-static void
-ns32k_extract_return_value (struct type *valtype, char *regbuf, char *valbuf)
-{
- memcpy (valbuf,
- regbuf + DEPRECATED_REGISTER_BYTE (TYPE_CODE (valtype) == TYPE_CODE_FLT ?
- FP0_REGNUM : 0), TYPE_LENGTH (valtype));
-}
-
-static void
-ns32k_store_return_value (struct type *valtype, char *valbuf)
-{
- deprecated_write_register_bytes (TYPE_CODE (valtype) == TYPE_CODE_FLT
- ? FP0_REGNUM : 0, valbuf,
- TYPE_LENGTH (valtype));
-}
-
-void
-ns32k_gdbarch_init_32082 (struct gdbarch *gdbarch)
-{
- set_gdbarch_num_regs (gdbarch, NS32K_NUM_REGS_32082);
-
- set_gdbarch_register_name (gdbarch, ns32k_register_name_32082);
- set_gdbarch_deprecated_register_byte (gdbarch, ns32k_register_byte_32082);
-}
-
-void
-ns32k_gdbarch_init_32382 (struct gdbarch *gdbarch)
-{
- set_gdbarch_num_regs (gdbarch, NS32K_NUM_REGS_32382);
-
- set_gdbarch_register_name (gdbarch, ns32k_register_name_32382);
- set_gdbarch_deprecated_register_byte (gdbarch, ns32k_register_byte_32382);
-}
-
-/* Initialize the current architecture based on INFO. If possible, re-use an
- architecture from ARCHES, which is a list of architectures already created
- during this debugging session.
-
- Called e.g. at program startup, when reading a core file, and when reading
- a binary file. */
-
-static struct gdbarch *
-ns32k_gdbarch_init (struct gdbarch_info info, struct gdbarch_list *arches)
-{
- struct gdbarch *gdbarch;
-
- /* If there is already a candidate, use it. */
- arches = gdbarch_list_lookup_by_info (arches, &info);
- if (arches != NULL)
- return arches->gdbarch;
-
- gdbarch = gdbarch_alloc (&info, NULL);
-
- /* NOTE: cagney/2002-12-06: This can be deleted when this arch is
- ready to unwind the PC first (see frame.c:get_prev_frame()). */
- set_gdbarch_deprecated_init_frame_pc (gdbarch, deprecated_init_frame_pc_default);
-
- /* Register info */
- ns32k_gdbarch_init_32082 (gdbarch);
- set_gdbarch_num_regs (gdbarch, NS32K_SP_REGNUM);
- set_gdbarch_num_regs (gdbarch, NS32K_FP_REGNUM);
- set_gdbarch_num_regs (gdbarch, NS32K_PC_REGNUM);
- set_gdbarch_num_regs (gdbarch, NS32K_PS_REGNUM);
-
- set_gdbarch_deprecated_register_size (gdbarch, NS32K_REGISTER_SIZE);
- set_gdbarch_deprecated_register_raw_size (gdbarch, ns32k_register_raw_size);
- set_gdbarch_deprecated_register_virtual_size (gdbarch, ns32k_register_virtual_size);
- set_gdbarch_deprecated_register_virtual_type (gdbarch, ns32k_register_virtual_type);
-
- /* Frame and stack info */
- set_gdbarch_skip_prologue (gdbarch, umax_skip_prologue);
- set_gdbarch_deprecated_saved_pc_after_call (gdbarch, ns32k_saved_pc_after_call);
-
- set_gdbarch_frame_num_args (gdbarch, umax_frame_num_args);
-
- set_gdbarch_deprecated_frame_chain (gdbarch, ns32k_frame_chain);
- set_gdbarch_deprecated_frame_saved_pc (gdbarch, ns32k_frame_saved_pc);
-
- set_gdbarch_deprecated_frame_args_address (gdbarch, ns32k_frame_args_address);
-
- set_gdbarch_deprecated_frame_init_saved_regs (gdbarch, ns32k_frame_init_saved_regs);
-
- set_gdbarch_frame_args_skip (gdbarch, 8);
-
- set_gdbarch_inner_than (gdbarch, core_addr_lessthan);
-
- /* Return value info */
- set_gdbarch_deprecated_store_struct_return (gdbarch, ns32k_store_struct_return);
- set_gdbarch_deprecated_extract_return_value (gdbarch, ns32k_extract_return_value);
- set_gdbarch_deprecated_store_return_value (gdbarch, ns32k_store_return_value);
-
- /* Call dummy info */
- set_gdbarch_deprecated_pop_frame (gdbarch, ns32k_pop_frame);
- set_gdbarch_call_dummy_location (gdbarch, ON_STACK);
- set_gdbarch_deprecated_push_arguments (gdbarch, ns32k_push_arguments);
-
- /* Breakpoint info */
- set_gdbarch_breakpoint_from_pc (gdbarch, ns32k_breakpoint_from_pc);
-
- /* Should be using push_dummy_call. */
- set_gdbarch_deprecated_dummy_write_sp (gdbarch, deprecated_write_sp);
-
- set_gdbarch_print_insn (gdbarch, print_insn_ns32k);
-
- /* Hook in OS ABI-specific overrides, if they have been registered. */
- gdbarch_init_osabi (info, gdbarch);
-
- return (gdbarch);
-}
-
-extern initialize_file_ftype _initialize_ns32k_tdep; /* -Wmissing-prototypes */
-
-void
-_initialize_ns32k_tdep (void)
-{
- gdbarch_register (bfd_arch_ns32k, ns32k_gdbarch_init, NULL);
-
-}