X-Git-Url: https://git.libre-soc.org/?a=blobdiff_plain;f=gdb%2Fz8k-tdep.c;h=622cbc007776aeb439bf356b98847bbcad50a96a;hb=fefd0a378f5aff09fb63003bc2a6bb2e2d66ffee;hp=de7c6a9d39a7d79a1974996bbf75ca43f76685bd;hpb=18b46e7c5378bb16c32827413376fa5982a4d8eb;p=binutils-gdb.git diff --git a/gdb/z8k-tdep.c b/gdb/z8k-tdep.c index de7c6a9d39a..622cbc00777 100644 --- a/gdb/z8k-tdep.c +++ b/gdb/z8k-tdep.c @@ -1,25 +1,27 @@ /* Target-machine dependent code for Zilog Z8000, for GDB. - Copyright (C) 1992, 1993, 1994 Free Software Foundation, Inc. + Copyright 1992, 1993, 1994, 1995, 1996, 1998, 1999, 2000, 2001 + Free Software Foundation, Inc. -This file is part of GDB. + 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 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. + This program is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. -You should have received a copy of the GNU General Public License -along with this program; if not, write to the Free Software -Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ + 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. */ /* - Contributed by Steve Chamberlain - sac@cygnus.com + Contributed by Steve Chamberlain + sac@cygnus.com */ #include "defs.h" @@ -29,6 +31,13 @@ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ #include "gdbcmd.h" #include "gdbtypes.h" #include "dis-asm.h" +#include "gdbcore.h" +#include "regcache.h" + +#include "value.h" /* For read_register() */ + + +static int read_memory_pointer (CORE_ADDR x); /* Return the saved PC from this frame. @@ -36,8 +45,7 @@ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ just use the register SRP_REGNUM itself. */ CORE_ADDR -frame_saved_pc (frame) - struct frame_info *frame; +z8k_frame_saved_pc (struct frame_info *frame) { return read_memory_pointer (frame->frame + (BIG ? 4 : 2)); } @@ -55,9 +63,7 @@ frame_saved_pc (frame) return the pc pointing to the first push */ static CORE_ADDR -skip_adjust (pc, size) - CORE_ADDR pc; - int *size; +skip_adjust (CORE_ADDR pc, int *size) { *size = 0; @@ -78,31 +84,29 @@ skip_adjust (pc, size) return pc; } -int -examine_frame (pc, regs, sp) - CORE_ADDR pc; - struct frame_saved_regs *regs; - CORE_ADDR sp; +static CORE_ADDR examine_frame (CORE_ADDR, CORE_ADDR * regs, CORE_ADDR); +static CORE_ADDR +examine_frame (CORE_ADDR pc, CORE_ADDR *regs, CORE_ADDR sp) { int w = read_memory_short (pc); int offset = 0; int regno; for (regno = 0; regno < NUM_REGS; regno++) - regs->regs[regno] = 0; + regs[regno] = 0; while (IS_PUSHW (w) || IS_PUSHL (w)) { /* work out which register is being pushed to where */ if (IS_PUSHL (w)) { - regs->regs[w & 0xf] = offset; - regs->regs[(w & 0xf) + 1] = offset + 2; + regs[w & 0xf] = offset; + regs[(w & 0xf) + 1] = offset + 2; offset += 4; } else { - regs->regs[w & 0xf] = offset; + regs[w & 0xf] = offset; offset += 2; } pc += 2; @@ -117,47 +121,43 @@ examine_frame (pc, regs, sp) else if (IS_SUB_SP (w)) { /* Subtracting a value from the sp, so were in a function - which needs stack space for locals, but has no fp. We fake up - the values as if we had an fp */ - regs->regs[FP_REGNUM] = sp; + which needs stack space for locals, but has no fp. We fake up + the values as if we had an fp */ + regs[FP_REGNUM] = sp; } else { /* This one didn't have an fp, we'll fake it up */ - regs->regs[SP_REGNUM] = sp; + regs[SP_REGNUM] = sp; } /* stack pointer contains address of next frame */ - /* regs->regs[fp_regnum()] = fp;*/ - regs->regs[SP_REGNUM] = sp; + /* regs[fp_regnum()] = fp; */ + regs[SP_REGNUM] = sp; return pc; } CORE_ADDR -z8k_skip_prologue (start_pc) - CORE_ADDR start_pc; +z8k_skip_prologue (CORE_ADDR start_pc) { - struct frame_saved_regs dummy; + CORE_ADDR dummy[NUM_REGS]; - return examine_frame (start_pc, &dummy, 0); + return examine_frame (start_pc, dummy, 0); } CORE_ADDR -addr_bits_remove (x) - CORE_ADDR x; +z8k_addr_bits_remove (CORE_ADDR addr) { - return x & PTR_MASK; + return (addr & PTR_MASK); } -int -read_memory_pointer (x) - CORE_ADDR x; +static int +read_memory_pointer (CORE_ADDR x) { return read_memory_integer (ADDR_BITS_REMOVE (x), BIG ? 4 : 2); } CORE_ADDR -frame_chain (thisframe) - struct frame_info *thisframe; +z8k_frame_chain (struct frame_info *thisframe) { if (thisframe->prev == 0) { @@ -170,9 +170,10 @@ frame_chain (thisframe) return 0; } -init_frame_pc () +void +init_frame_pc (void) { - abort (); + internal_error (__FILE__, __LINE__, "failed internal consistency check"); } /* Put here the code to store, into a struct frame_saved_regs, @@ -182,32 +183,27 @@ init_frame_pc () the address we return for it IS the sp for the next frame. */ void -get_frame_saved_regs (frame_info, frame_saved_regs) - struct frame_info *frame_info; - struct frame_saved_regs *frame_saved_regs; - +z8k_frame_init_saved_regs (struct frame_info *frame_info) { CORE_ADDR pc; int w; - memset (frame_saved_regs, '\0', sizeof (*frame_saved_regs)); + frame_saved_regs_zalloc (frame_info); pc = get_pc_function_start (frame_info->pc); -/* wander down the instruction stream */ - examine_frame (pc, frame_saved_regs, frame_info->frame); + /* wander down the instruction stream */ + examine_frame (pc, frame_info->saved_regs, frame_info->frame); } void -z8k_push_dummy_frame () +z8k_push_dummy_frame (void) { - abort (); + internal_error (__FILE__, __LINE__, "failed internal consistency check"); } int -gdb_print_insn_z8k (memaddr, info) - bfd_vma memaddr; - disassemble_info *info; +gdb_print_insn_z8k (bfd_vma memaddr, disassemble_info *info) { if (BIG) return print_insn_z8001 (memaddr, info); @@ -218,13 +214,10 @@ gdb_print_insn_z8k (memaddr, info) /* Fetch the instruction at ADDR, returning 0 if ADDR is beyond LIM or is not the address of a valid instruction, the address of the next instruction beyond ADDR otherwise. *PWORD1 receives the first word - of the instruction.*/ + of the instruction. */ CORE_ADDR -NEXT_PROLOGUE_INSN (addr, lim, pword1) - CORE_ADDR addr; - CORE_ADDR lim; - short *pword1; +NEXT_PROLOGUE_INSN (CORE_ADDR addr, CORE_ADDR lim, short *pword1) { char buf[2]; if (addr < lim + 8) @@ -237,6 +230,7 @@ NEXT_PROLOGUE_INSN (addr, lim, pword1) return 0; } +#if 0 /* Put here the code to store, into a struct frame_saved_regs, the addresses of the saved registers of frame described by FRAME_INFO. This includes special registers such as pc and fp saved in special @@ -247,9 +241,7 @@ NEXT_PROLOGUE_INSN (addr, lim, pword1) it is fairly expensive. */ void -frame_find_saved_regs (fip, fsrp) - struct frame_info *fip; - struct frame_saved_regs *fsrp; +frame_find_saved_regs (struct frame_info *fip, struct frame_saved_regs *fsrp) { int locals; CORE_ADDR pc; @@ -288,19 +280,18 @@ frame_find_saved_regs (fip, fsrp) fsrp->regs[FP_REGNUM] = fip->frame; } +#endif int -saved_pc_after_call () +z8k_saved_pc_after_call (struct frame_info *frame) { - return addr_bits_remove + return ADDR_BITS_REMOVE (read_memory_integer (read_register (SP_REGNUM), PTR_SIZE)); } -extract_return_value (type, regbuf, valbuf) - struct type *type; - char *regbuf; - char *valbuf; +void +extract_return_value (struct type *type, char *regbuf, char *valbuf) { int b; int len = TYPE_LENGTH (type); @@ -316,29 +307,24 @@ extract_return_value (type, regbuf, valbuf) } void -write_return_value (type, valbuf) - struct type *type; - char *valbuf; +write_return_value (struct type *type, char *valbuf) { int reg; int len; for (len = 0; len < TYPE_LENGTH (type); len += 2) - write_register_bytes (REGISTER_BYTE (len / 2 + 2), valbuf + len, 2); + write_register_bytes (REGISTER_BYTE (len / 2 + 2), valbuf + len, 2); } void -store_struct_return (addr, sp) - CORE_ADDR addr; - CORE_ADDR sp; +store_struct_return (CORE_ADDR addr, CORE_ADDR sp) { write_register (2, addr); } void -print_register_hook (regno) - int regno; +z8k_print_register_hook (int regno) { if ((regno & 1) == 0 && regno < 16) { @@ -372,22 +358,22 @@ print_register_hook (regno) printf_unfiltered ("\n"); for (i = 0; i < 10; i += 2) { - printf_unfiltered ("(sp+%d=%04x)", i, read_memory_short (rval + i)); + printf_unfiltered ("(sp+%d=%04x)", i, + (unsigned int)read_memory_short (rval + i)); } } } void -z8k_pop_frame () +z8k_pop_frame (void) { } struct cmd_list_element *setmemorylist; void -z8k_set_pointer_size (newsize) - int newsize; +z8k_set_pointer_size (int newsize) { static int oldsize = 0; @@ -403,37 +389,36 @@ z8k_set_pointer_size (newsize) { BIG = 0; } + /* FIXME: This code should be using the GDBARCH framework to + handle changed type sizes. If this problem is ever fixed + (the direct reference to _initialize_gdbtypes() below + eliminated) then Makefile.in should be updated so that + z8k-tdep.c is again compiled with -Werror. */ _initialize_gdbtypes (); } } static void -segmented_command (args, from_tty) - char *args; - int from_tty; +segmented_command (char *args, int from_tty) { z8k_set_pointer_size (32); } static void -unsegmented_command (args, from_tty) - char *args; - int from_tty; +unsegmented_command (char *args, int from_tty) { z8k_set_pointer_size (16); } static void -set_memory (args, from_tty) - char *args; - int from_tty; +set_memory (char *args, int from_tty) { printf_unfiltered ("\"set memory\" must be followed by the name of a memory subcommand.\n"); help_list (setmemorylist, "set memory ", -1, gdb_stdout); } void -_initialize_z8ktdep () +_initialize_z8ktdep (void) { tm_print_insn = gdb_print_insn_z8k;