2003-01-07 Andrew Cagney <cagney@redhat.com>
[deliverable/binutils-gdb.git] / gdb / mn10200-tdep.c
index 630037306179f50683a0666f8c058dff64cb08ec..1e6827bb9c5541b1afe76e081fe2a5c1f0e63245 100644 (file)
@@ -1,33 +1,42 @@
 /* Target-dependent code for the Matsushita MN10200 for GDB, the GNU debugger.
-   Copyright 1997 Free Software Foundation, Inc.
+   Copyright 1997, 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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, 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.  */
 
 #include "defs.h"
 #include "frame.h"
 #include "inferior.h"
-#include "obstack.h"
 #include "target.h"
 #include "value.h"
 #include "bfd.h"
 #include "gdb_string.h"
 #include "gdbcore.h"
 #include "symfile.h"
+#include "regcache.h"
 
+
+/* Should call_function allocate stack space for a struct return?  */
+int
+mn10200_use_struct_convention (int gcc_p, struct type *type)
+{
+  return (TYPE_NFIELDS (type) > 1 || TYPE_LENGTH (type) > 8);
+}
+/* *INDENT-OFF* */
 /* The main purpose of this file is dealing with prologues to extract
    information about stack frames and saved registers.
 
@@ -90,19 +99,21 @@ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
       NO_MORE_FRAMES: Set this if the current frame is "start" or
       if the first instruction looks like mov <imm>,sp.  This tells
       frame chain to not bother trying to unwind past this frame.  */
+/* *INDENT-ON* */
+
+
+
 
 #define MY_FRAME_IN_SP 0x1
 #define MY_FRAME_IN_FP 0x2
 #define CALLER_A2_IN_A0 0x4
 #define NO_MORE_FRAMES 0x8
+
 static CORE_ADDR
-mn10200_analyze_prologue (fi, pc)
-    struct frame_info *fi;
-    CORE_ADDR pc;
+mn10200_analyze_prologue (struct frame_info *fi, CORE_ADDR pc)
 {
   CORE_ADDR func_addr, func_end, addr, stop;
-  CORE_ADDR stack_size;
+  CORE_ADDR stack_size = 0;
   unsigned char buf[4];
   int status;
   char *name;
@@ -110,7 +121,7 @@ mn10200_analyze_prologue (fi, pc)
 
   /* Use the PC in the frame if it's provided to look up the
      start of this function.  */
-  pc = (fi ? fi->pc : pc);
+  pc = (fi ? get_frame_pc (fi) : pc);
 
   /* Find the start of this function.  */
   status = find_pc_partial_function (pc, &name, &func_addr, &func_end);
@@ -123,7 +134,8 @@ mn10200_analyze_prologue (fi, pc)
   /* If we're in start, then give up.  */
   if (strcmp (name, "start") == 0)
     {
-      fi->status = NO_MORE_FRAMES;
+      if (fi)
+       fi->status = NO_MORE_FRAMES;
       return pc;
     }
 
@@ -135,35 +147,35 @@ mn10200_analyze_prologue (fi, pc)
      been deallocated.
 
      fi->frame is bogus, we need to fix it.  */
-  if (fi && fi->pc + 1 == func_end)
+  if (fi && get_frame_pc (fi) + 1 == func_end)
     {
-      status = target_read_memory (fi->pc, buf, 1);
+      status = target_read_memory (get_frame_pc (fi), buf, 1);
       if (status != 0)
        {
          if (fi->next == NULL)
-           fi->frame = read_sp ();
-         return fi->pc;
+           deprecated_update_frame_base_hack (fi, read_sp ());
+         return get_frame_pc (fi);
        }
 
       if (buf[0] == 0xfe)
        {
          if (fi->next == NULL)
-           fi->frame = read_sp ();
-         return fi->pc;
+           deprecated_update_frame_base_hack (fi, read_sp ());
+         return get_frame_pc (fi);
        }
     }
 
   /* Similarly if we're stopped on the first insn of a prologue as our
      frame hasn't been allocated yet.  */
-  if (fi && fi->pc == func_addr)
+  if (fi && get_frame_pc (fi) == func_addr)
     {
       if (fi->next == NULL)
-       fi->frame = read_sp ();
-      return fi->pc;
+       deprecated_update_frame_base_hack (fi, read_sp ());
+      return get_frame_pc (fi);
     }
 
   /* Figure out where to stop scanning.  */
-  stop = fi ? fi->pc : func_end;
+  stop = fi ? get_frame_pc (fi) : func_end;
 
   /* Don't walk off the end of the function.  */
   stop = stop > func_end ? func_end : stop;
@@ -175,7 +187,7 @@ mn10200_analyze_prologue (fi, pc)
   if (status != 0)
     {
       if (fi && fi->next == NULL && fi->status & MY_FRAME_IN_SP)
-       fi->frame = read_sp ();
+       deprecated_update_frame_base_hack (fi, read_sp ());
       return addr;
     }
 
@@ -190,14 +202,14 @@ mn10200_analyze_prologue (fi, pc)
     }
 
   /* Now see if we have a frame pointer.
-       
+
      Search for mov a2,a0 (0xf278)
-        then   mov a3,a2 (0xf27e).  */
+     then       mov a3,a2 (0xf27e).  */
 
   if (buf[0] == 0xf2 && buf[1] == 0x78)
     {
       /* Our caller's $a2 will be found in $a0 now.  Note it for
-        our callers.  */
+         our callers.  */
       if (fi)
        fi->status |= CALLER_A2_IN_A0;
       addr += 2;
@@ -206,7 +218,7 @@ mn10200_analyze_prologue (fi, pc)
          /* We still haven't allocated our local stack.  Handle this
             as if we stopped on the first or last insn of a function.   */
          if (fi && fi->next == NULL)
-           fi->frame = read_sp ();
+           deprecated_update_frame_base_hack (fi, read_sp ());
          return addr;
        }
 
@@ -214,7 +226,7 @@ mn10200_analyze_prologue (fi, pc)
       if (status != 0)
        {
          if (fi && fi->next == NULL)
-           fi->frame = read_sp ();
+           deprecated_update_frame_base_hack (fi, read_sp ());
          return addr;
        }
       if (buf[0] == 0xf2 && buf[1] == 0x7e)
@@ -233,17 +245,17 @@ mn10200_analyze_prologue (fi, pc)
       else
        {
          if (fi && fi->next == NULL)
-           fi->frame = read_sp ();
+           deprecated_update_frame_base_hack (fi, read_sp ());
          return addr;
        }
     }
 
   /* Next we should allocate the local frame.
-       
+
      Search for add imm8,a3 (0xd3XX)
-        or     add imm16,a3 (0xf70bXXXX)
-        or     add imm24,a3 (0xf467XXXXXX).
-       
+     or add imm16,a3 (0xf70bXXXX)
+     or add imm24,a3 (0xf467XXXXXX).
+
      If none of the above was found, then this prologue has
      no stack, and therefore can't have any register saves,
      so quit now.  */
@@ -251,7 +263,7 @@ mn10200_analyze_prologue (fi, pc)
   if (status != 0)
     {
       if (fi && fi->next == NULL && (fi->status & MY_FRAME_IN_SP))
-       fi->frame = read_sp ();
+       deprecated_update_frame_base_hack (fi, read_sp ());
       return addr;
     }
   if (buf[0] == 0xd3)
@@ -263,7 +275,7 @@ mn10200_analyze_prologue (fi, pc)
       if (addr >= stop)
        {
          if (fi && fi->next == NULL && (fi->status & MY_FRAME_IN_SP))
-           fi->frame = read_sp () - stack_size;
+           deprecated_update_frame_base_hack (fi, read_sp () - stack_size);
          return addr;
        }
     }
@@ -273,7 +285,7 @@ mn10200_analyze_prologue (fi, pc)
       if (status != 0)
        {
          if (fi && fi->next == NULL && (fi->status & MY_FRAME_IN_SP))
-           fi->frame = read_sp ();
+           deprecated_update_frame_base_hack (fi, read_sp ());
          return addr;
        }
       stack_size = extract_signed_integer (buf, 2);
@@ -283,7 +295,7 @@ mn10200_analyze_prologue (fi, pc)
       if (addr >= stop)
        {
          if (fi && fi->next == NULL && (fi->status & MY_FRAME_IN_SP))
-           fi->frame = read_sp () - stack_size;
+           deprecated_update_frame_base_hack (fi, read_sp () - stack_size);
          return addr;
        }
     }
@@ -293,7 +305,7 @@ mn10200_analyze_prologue (fi, pc)
       if (status != 0)
        {
          if (fi && fi->next == NULL && (fi->status & MY_FRAME_IN_SP))
-           fi->frame = read_sp ();
+           deprecated_update_frame_base_hack (fi, read_sp ());
          return addr;
        }
       stack_size = extract_signed_integer (buf, 3);
@@ -303,7 +315,7 @@ mn10200_analyze_prologue (fi, pc)
       if (addr >= stop)
        {
          if (fi && fi->next == NULL && (fi->status & MY_FRAME_IN_SP))
-           fi->frame = read_sp () - stack_size;
+           deprecated_update_frame_base_hack (fi, read_sp () - stack_size);
          return addr;
        }
     }
@@ -321,20 +333,20 @@ mn10200_analyze_prologue (fi, pc)
       status = target_read_memory (addr + 1, buf, 2);
       if (status != 0)
        {
-         if (fi && fi->next == NULL && (fi->status & MY_FRAME_IN_SP))
-           fi->frame = read_sp ();
+         if (fi && fi->next == NULL && (fi->status & MY_FRAME_IN_SP))
+           deprecated_update_frame_base_hack (fi, read_sp ());
          return addr;
        }
-      
+
       /* Get the PC this instruction will branch to.  */
-      temp = (extract_signed_integer (buf, 2) + addr) & 0xffffff;
+      temp = (extract_signed_integer (buf, 2) + addr + 3) & 0xffffff;
 
       /* Get the name of the function at the target address.  */
       status = find_pc_partial_function (temp, &name, NULL, NULL);
       if (status == 0)
        {
-         if (fi && fi->next == NULL && (fi->status & MY_FRAME_IN_SP))
-           fi->frame = read_sp ();
+         if (fi && fi->next == NULL && (fi->status & MY_FRAME_IN_SP))
+           deprecated_update_frame_base_hack (fi, read_sp ());
          return addr;
        }
 
@@ -350,7 +362,7 @@ mn10200_analyze_prologue (fi, pc)
          if (fi && fi->next == NULL)
            {
              fi->stack_size -= 16;
-             fi->frame = read_sp () - fi->stack_size;
+             deprecated_update_frame_base_hack (fi, read_sp () - fi->stack_size);
            }
          return addr;
        }
@@ -362,20 +374,20 @@ mn10200_analyze_prologue (fi, pc)
       status = target_read_memory (addr + 2, buf, 3);
       if (status != 0)
        {
-         if (fi && fi->next == NULL && (fi->status & MY_FRAME_IN_SP))
-           fi->frame = read_sp ();
+         if (fi && fi->next == NULL && (fi->status & MY_FRAME_IN_SP))
+           deprecated_update_frame_base_hack (fi, read_sp ());
          return addr;
        }
-      
+
       /* Get the PC this instruction will branch to.  */
-      temp = (extract_signed_integer (buf, 3) + addr) & 0xffffff;
+      temp = (extract_signed_integer (buf, 3) + addr + 5) & 0xffffff;
 
       /* Get the name of the function at the target address.  */
       status = find_pc_partial_function (temp, &name, NULL, NULL);
       if (status == 0)
        {
-         if (fi && fi->next == NULL && (fi->status & MY_FRAME_IN_SP))
-           fi->frame = read_sp ();
+         if (fi && fi->next == NULL && (fi->status & MY_FRAME_IN_SP))
+           deprecated_update_frame_base_hack (fi, read_sp ());
          return addr;
        }
 
@@ -391,7 +403,7 @@ mn10200_analyze_prologue (fi, pc)
          if (fi && fi->next == NULL && (fi->status & MY_FRAME_IN_SP))
            {
              fi->stack_size -= 16;
-             fi->frame = read_sp () - fi->stack_size;
+             deprecated_update_frame_base_hack (fi, read_sp () - fi->stack_size);
            }
          return addr;
        }
@@ -403,30 +415,30 @@ mn10200_analyze_prologue (fi, pc)
       int outgoing_args_size = 0;
 
       /* First adjust the stack size for this function.  The out of
-        line prologue saves 4 registers (16bytes of data).  */
+         line prologue saves 4 registers (16bytes of data).  */
       if (fi)
        fi->stack_size -= 16;
 
       /* Update fi->frame if necessary.  */
       if (fi && fi->next == NULL)
-       fi->frame = read_sp () - fi->stack_size;
+       deprecated_update_frame_base_hack (fi, read_sp () - fi->stack_size);
 
       /* After the out of line prologue, there may be another
-        stack adjustment for the outgoing arguments.
+         stack adjustment for the outgoing arguments.
+
+         Search for add imm8,a3 (0xd3XX)
+         or     add imm16,a3 (0xf70bXXXX)
+         or     add imm24,a3 (0xf467XXXXXX).  */
 
-        Search for add imm8,a3 (0xd3XX)
-           or  add imm16,a3 (0xf70bXXXX)
-           or  add imm24,a3 (0xf467XXXXXX).  */
-       
       status = target_read_memory (addr, buf, 2);
       if (status != 0)
        {
          if (fi)
            {
-             fi->fsr.regs[2] = fi->frame + fi->stack_size + 4;
-             fi->fsr.regs[3] = fi->frame + fi->stack_size + 8;
-             fi->fsr.regs[5] = fi->frame + fi->stack_size + 12;
-             fi->fsr.regs[6] = fi->frame + fi->stack_size + 16;
+             fi->fsr.regs[2] = get_frame_base (fi) + fi->stack_size + 4;
+             fi->fsr.regs[3] = get_frame_base (fi) + fi->stack_size + 8;
+             fi->fsr.regs[5] = get_frame_base (fi) + fi->stack_size + 12;
+             fi->fsr.regs[6] = get_frame_base (fi) + fi->stack_size + 16;
            }
          return addr;
        }
@@ -443,10 +455,10 @@ mn10200_analyze_prologue (fi, pc)
            {
              if (fi)
                {
-                 fi->fsr.regs[2] = fi->frame + fi->stack_size + 4;
-                 fi->fsr.regs[3] = fi->frame + fi->stack_size + 8;
-                 fi->fsr.regs[5] = fi->frame + fi->stack_size + 12;
-                 fi->fsr.regs[6] = fi->frame + fi->stack_size + 16;
+                 fi->fsr.regs[2] = get_frame_base (fi) + fi->stack_size + 4;
+                 fi->fsr.regs[3] = get_frame_base (fi) + fi->stack_size + 8;
+                 fi->fsr.regs[5] = get_frame_base (fi) + fi->stack_size + 12;
+                 fi->fsr.regs[6] = get_frame_base (fi) + fi->stack_size + 16;
                }
              return addr;
            }
@@ -460,10 +472,10 @@ mn10200_analyze_prologue (fi, pc)
            {
              if (fi && fi->next == NULL)
                {
-                 fi->fsr.regs[2] = fi->frame + fi->stack_size + 4;
-                 fi->fsr.regs[3] = fi->frame + fi->stack_size + 8;
-                 fi->fsr.regs[5] = fi->frame + fi->stack_size + 12;
-                 fi->fsr.regs[6] = fi->frame + fi->stack_size + 16;
+                 fi->fsr.regs[2] = get_frame_base (fi) + fi->stack_size + 4;
+                 fi->fsr.regs[3] = get_frame_base (fi) + fi->stack_size + 8;
+                 fi->fsr.regs[5] = get_frame_base (fi) + fi->stack_size + 12;
+                 fi->fsr.regs[6] = get_frame_base (fi) + fi->stack_size + 16;
                }
              return addr;
            }
@@ -474,18 +486,18 @@ mn10200_analyze_prologue (fi, pc)
        outgoing_args_size = 0;
 
       /* Now that we know the size of the outgoing arguments, fix
-        fi->frame again if this is the innermost frame.  */
+         fi->frame again if this is the innermost frame.  */
       if (fi && fi->next == NULL)
-       fi->frame -= outgoing_args_size;
+       deprecated_update_frame_base_hack (fi, get_frame_base (fi) - outgoing_args_size);
 
       /* Note the register save information and update the stack
-        size for this frame too.  */
+         size for this frame too.  */
       if (fi)
        {
-         fi->fsr.regs[2] = fi->frame + fi->stack_size + 4;
-         fi->fsr.regs[3] = fi->frame + fi->stack_size + 8;
-         fi->fsr.regs[5] = fi->frame + fi->stack_size + 12;
-         fi->fsr.regs[6] = fi->frame + fi->stack_size + 16;
+         fi->fsr.regs[2] = get_frame_base (fi) + fi->stack_size + 4;
+         fi->fsr.regs[3] = get_frame_base (fi) + fi->stack_size + 8;
+         fi->fsr.regs[5] = get_frame_base (fi) + fi->stack_size + 12;
+         fi->fsr.regs[6] = get_frame_base (fi) + fi->stack_size + 16;
          fi->stack_size += outgoing_args_size;
        }
       /* There can be no more prologue insns, so return now.  */
@@ -498,19 +510,19 @@ mn10200_analyze_prologue (fi, pc)
      need to fix fi->frame so that backtracing, find_frame_saved_regs,
      etc work correctly.  */
   if (fi && fi->next == NULL && (fi->status & MY_FRAME_IN_SP) != 0)
-    fi->frame = read_sp () - fi->stack_size;
+    deprecated_update_frame_base_hack (fi, read_sp () - fi->stack_size);
 
   /* And last we have the register saves.  These are relatively
      simple because they're physically done off the stack pointer,
      and thus the number of different instructions we need to
      check is greatly reduced because we know the displacements
      will be small.
-       
+
      Search for movx d2,(X,a3) (0xf55eXX)
-        then   movx d3,(X,a3) (0xf55fXX)
-        then   mov  a1,(X,a3) (0x5dXX)    No frame pointer case
-        then   mov  a2,(X,a3) (0x5eXX)    No frame pointer case
-        or  mov  a0,(X,a3) (0x5cXX)       Frame pointer case.  */
+     then       movx d3,(X,a3) (0xf55fXX)
+     then       mov  a1,(X,a3) (0x5dXX)    No frame pointer case
+     then       mov  a2,(X,a3) (0x5eXX)    No frame pointer case
+     or  mov  a0,(X,a3) (0x5cXX)           Frame pointer case.  */
 
   status = target_read_memory (addr, buf, 2);
   if (status != 0)
@@ -522,7 +534,7 @@ mn10200_analyze_prologue (fi, pc)
          status = target_read_memory (addr + 2, buf, 1);
          if (status != 0)
            return addr;
-         fi->fsr.regs[2] = (fi->frame + stack_size
+         fi->fsr.regs[2] = (get_frame_base (fi) + stack_size
                             + extract_signed_integer (buf, 1));
        }
       addr += 3;
@@ -539,7 +551,7 @@ mn10200_analyze_prologue (fi, pc)
          status = target_read_memory (addr + 2, buf, 1);
          if (status != 0)
            return addr;
-         fi->fsr.regs[3] = (fi->frame + stack_size
+         fi->fsr.regs[3] = (get_frame_base (fi) + stack_size
                             + extract_signed_integer (buf, 1));
        }
       addr += 3;
@@ -556,7 +568,7 @@ mn10200_analyze_prologue (fi, pc)
          status = target_read_memory (addr + 1, buf, 1);
          if (status != 0)
            return addr;
-         fi->fsr.regs[5] = (fi->frame + stack_size
+         fi->fsr.regs[5] = (get_frame_base (fi) + stack_size
                             + extract_signed_integer (buf, 1));
        }
       addr += 2;
@@ -573,7 +585,7 @@ mn10200_analyze_prologue (fi, pc)
          status = target_read_memory (addr + 1, buf, 1);
          if (status != 0)
            return addr;
-         fi->fsr.regs[6] = (fi->frame + stack_size
+         fi->fsr.regs[6] = (get_frame_base (fi) + stack_size
                             + extract_signed_integer (buf, 1));
          fi->status &= ~CALLER_A2_IN_A0;
        }
@@ -584,7 +596,7 @@ mn10200_analyze_prologue (fi, pc)
     }
   return addr;
 }
-  
+
 /* Function: frame_chain
    Figure out and return the caller's frame pointer given current
    frame_info struct.
@@ -593,15 +605,16 @@ mn10200_analyze_prologue (fi, pc)
    stack pointer that was in use at the time the function call was made?  */
 
 CORE_ADDR
-mn10200_frame_chain (fi)
-     struct frame_info *fi;
+mn10200_frame_chain (struct frame_info *fi)
 {
-  struct frame_info dummy_frame;
+  struct frame_info *dummy_frame = deprecated_frame_xmalloc ();
+  struct cleanup *old_chain = make_cleanup (xfree, dummy_frame);
+  CORE_ADDR ret;
 
   /* Walk through the prologue to determine the stack size,
      location of saved registers, end of the prologue, etc.  */
   if (fi->status == 0)
-    mn10200_analyze_prologue (fi, (CORE_ADDR)0);
+    mn10200_analyze_prologue (fi, (CORE_ADDR) 0);
 
   /* Quit now if mn10200_analyze_prologue set NO_MORE_FRAMES.  */
   if (fi->status & NO_MORE_FRAMES)
@@ -610,56 +623,57 @@ mn10200_frame_chain (fi)
   /* Now that we've analyzed our prologue, determine the frame
      pointer for our caller.
 
-       If our caller has a frame pointer, then we need to
-       find the entry value of $a2 to our function.
+     If our caller has a frame pointer, then we need to
+     find the entry value of $a2 to our function.
+
+     If CALLER_A2_IN_A0, then the chain is in $a0.
 
-        If CALLER_A2_IN_A0, then the chain is in $a0.
+     If fsr.regs[6] is nonzero, then it's at the memory
+     location pointed to by fsr.regs[6].
 
-        If fsr.regs[6] is nonzero, then it's at the memory
-        location pointed to by fsr.regs[6].
+     Else it's still in $a2.
 
-        Else it's still in $a2.
+     If our caller does not have a frame pointer, then his
+     frame base is fi->frame + -caller's stack size + 4.  */
 
-       If our caller does not have a frame pointer, then his
-       frame base is fi->frame + -caller's stack size + 4.  */
-       
   /* The easiest way to get that info is to analyze our caller's frame.
 
      So we set up a dummy frame and call mn10200_analyze_prologue to
      find stuff for us.  */
-  dummy_frame.pc = FRAME_SAVED_PC (fi);
-  dummy_frame.frame = fi->frame;
-  memset (dummy_frame.fsr.regs, '\000', sizeof dummy_frame.fsr.regs);
-  dummy_frame.status = 0;
-  dummy_frame.stack_size = 0;
-  mn10200_analyze_prologue (&dummy_frame);
-
-  if (dummy_frame.status & MY_FRAME_IN_FP)
+  deprecated_update_frame_pc_hack (dummy_frame, FRAME_SAVED_PC (fi));
+  deprecated_update_frame_base_hack (dummy_frame, get_frame_base (fi));
+  memset (dummy_frame->fsr.regs, '\000', sizeof dummy_frame->fsr.regs);
+  dummy_frame->status = 0;
+  dummy_frame->stack_size = 0;
+  mn10200_analyze_prologue (dummy_frame, 0);
+
+  if (dummy_frame->status & MY_FRAME_IN_FP)
     {
       /* Our caller has a frame pointer.  So find the frame in $a2, $a0,
-        or in the stack.  */
+         or in the stack.  */
       if (fi->fsr.regs[6])
-       return (read_memory_integer (fi->fsr.regs[FP_REGNUM], REGISTER_SIZE)
-               & 0xffffff);
+       ret = (read_memory_integer (fi->fsr.regs[FP_REGNUM], REGISTER_SIZE)
+              & 0xffffff);
       else if (fi->status & CALLER_A2_IN_A0)
-       return read_register (4);
+       ret = read_register (4);
       else
-       return read_register (FP_REGNUM);
+       ret = read_register (FP_REGNUM);
     }
   else
     {
       /* Our caller does not have a frame pointer.  So his frame starts
-        at the base of our frame (fi->frame) + <his size> + 4 (saved pc).  */
-      return fi->frame + -dummy_frame.stack_size + 4;
+         at the base of our frame (fi->frame) + <his size> + 4 (saved pc).  */
+      ret = get_frame_base (fi) + -dummy_frame->stack_size + 4;
     }
+  do_cleanups (old_chain);
+  return ret;
 }
 
 /* Function: skip_prologue
    Return the address of the first inst past the prologue of the function.  */
 
 CORE_ADDR
-mn10200_skip_prologue (pc)
-     CORE_ADDR pc;
+mn10200_skip_prologue (CORE_ADDR pc)
 {
   /* We used to check the debug symbols, but that can lose if
      we have a null prologue.  */
@@ -671,12 +685,13 @@ mn10200_skip_prologue (pc)
    command, or the call dummy breakpoint gets hit.  */
 
 void
-mn10200_pop_frame (frame)
-     struct frame_info *frame;
+mn10200_pop_frame (struct frame_info *frame)
 {
   int regnum;
 
-  if (PC_IN_CALL_DUMMY(frame->pc, frame->frame, frame->frame))
+  if (DEPRECATED_PC_IN_CALL_DUMMY (get_frame_pc (frame),
+                                  get_frame_base (frame),
+                                  get_frame_base (frame)))
     generic_pop_dummy_frame ();
   else
     {
@@ -689,12 +704,12 @@ mn10200_pop_frame (frame)
            ULONGEST value;
 
            value = read_memory_unsigned_integer (frame->fsr.regs[regnum],
-                                                 REGISTER_RAW_SIZE (regnum));
+                                               REGISTER_RAW_SIZE (regnum));
            write_register (regnum, value);
          }
 
       /* Actually cut back the stack.  */
-      write_register (SP_REGNUM, FRAME_FP (frame));
+      write_register (SP_REGNUM, get_frame_base (frame));
 
       /* Don't we need to set the PC?!?  XXX FIXME.  */
     }
@@ -708,12 +723,8 @@ mn10200_pop_frame (frame)
    order on the stack.  */
 
 CORE_ADDR
-mn10200_push_arguments (nargs, args, sp, struct_return, struct_addr)
-     int nargs;
-     value_ptr *args;
-     CORE_ADDR sp;
-     unsigned char struct_return;
-     CORE_ADDR struct_addr;
+mn10200_push_arguments (int nargs, struct value **args, CORE_ADDR sp,
+                       unsigned char struct_return, CORE_ADDR struct_addr)
 {
   int argnum = 0;
   int len = 0;
@@ -733,16 +744,16 @@ mn10200_push_arguments (nargs, args, sp, struct_return, struct_addr)
       int arg_length = (TYPE_LENGTH (VALUE_TYPE (args[argnum])) + 1) & ~1;
 
       /* If we've used all argument registers, then this argument is
-        pushed.  */
+         pushed.  */
       if (regsused >= 2 || arg_length > 4)
        {
          regsused = 2;
          len += arg_length;
        }
       /* We know we've got some arg register space left.  If this argument
-        will fit entirely in regs, then put it there.  */
+         will fit entirely in regs, then put it there.  */
       else if (arg_length <= 2
-              || TYPE_CODE (VALUE_TYPE (args[argnum])) == TYPE_CODE_PTR) 
+              || TYPE_CODE (VALUE_TYPE (args[argnum])) == TYPE_CODE_PTR)
        {
          regsused++;
        }
@@ -772,13 +783,13 @@ mn10200_push_arguments (nargs, args, sp, struct_return, struct_addr)
          && TYPE_LENGTH (VALUE_TYPE (*args)) > 8)
        {
          /* XXX Wrong, we want a pointer to this argument.  */
-          len = TYPE_LENGTH (VALUE_TYPE (*args));
-          val = (char *)VALUE_CONTENTS (*args);
+         len = TYPE_LENGTH (VALUE_TYPE (*args));
+         val = (char *) VALUE_CONTENTS (*args);
        }
       else
        {
          len = TYPE_LENGTH (VALUE_TYPE (*args));
-         val = (char *)VALUE_CONTENTS (*args);
+         val = (char *) VALUE_CONTENTS (*args);
        }
 
       if (regsused < 2
@@ -815,11 +826,9 @@ mn10200_push_arguments (nargs, args, sp, struct_return, struct_addr)
 /* Function: push_return_address (pc)
    Set up the return address for the inferior function call.
    Needed for targets where we don't actually execute a JSR/BSR instruction */
+
 CORE_ADDR
-mn10200_push_return_address (pc, sp)
-     CORE_ADDR pc;
-     CORE_ADDR sp;
+mn10200_push_return_address (CORE_ADDR pc, CORE_ADDR sp)
 {
   unsigned char buf[4];
 
@@ -831,17 +840,15 @@ mn10200_push_return_address (pc, sp)
 /* Function: store_struct_return (addr,sp)
    Store the structure value return address for an inferior function
    call.  */
+
 CORE_ADDR
-mn10200_store_struct_return (addr, sp)
-     CORE_ADDR addr;
-     CORE_ADDR sp;
+mn10200_store_struct_return (CORE_ADDR addr, CORE_ADDR sp)
 {
   /* The structure return address is passed as the first argument.  */
   write_register (0, addr);
   return sp;
 }
+
 /* Function: frame_saved_pc 
    Find the caller of this frame.  We do this by seeing if RP_REGNUM
    is saved in the stack anywhere, otherwise we get it from the
@@ -850,24 +857,10 @@ mn10200_store_struct_return (addr, sp)
    will be found.  */
 
 CORE_ADDR
-mn10200_frame_saved_pc (fi)
-     struct frame_info *fi;
+mn10200_frame_saved_pc (struct frame_info *fi)
 {
   /* The saved PC will always be at the base of the current frame.  */
-  return (read_memory_integer (fi->frame, REGISTER_SIZE) & 0xffffff);
-}
-
-void
-get_saved_register (raw_buffer, optimized, addrp, frame, regnum, lval)
-     char *raw_buffer;
-     int *optimized;
-     CORE_ADDR *addrp;
-     struct frame_info *frame;
-     int regnum;
-     enum lval_type *lval;
-{
-  generic_get_saved_register (raw_buffer, optimized, addrp, 
-                             frame, regnum, lval);
+  return (read_memory_integer (get_frame_base (fi), REGISTER_SIZE) & 0xffffff);
 }
 
 /* Function: init_extra_frame_info
@@ -875,7 +868,7 @@ get_saved_register (raw_buffer, optimized, addrp, frame, regnum, lval)
    registers.  Most of the work is done in mn10200_analyze_prologue().
 
    Note that when we are called for the last frame (currently active frame),
-   that fi->pc and fi->frame will already be setup.  However, fi->frame will
+   that get_frame_pc (fi) and fi->frame will already be setup.  However, fi->frame will
    be valid only if this routine uses FP.  For previous frames, fi-frame will
    always be correct.  mn10200_analyze_prologue will fix fi->frame if
    it's not valid.
@@ -885,11 +878,10 @@ get_saved_register (raw_buffer, optimized, addrp, frame, regnum, lval)
    pointer just prior to calling the target function (see run_stack_dummy).  */
 
 void
-mn10200_init_extra_frame_info (fi)
-     struct frame_info *fi;
+mn10200_init_extra_frame_info (struct frame_info *fi)
 {
   if (fi->next)
-    fi->pc = FRAME_SAVED_PC (fi->next);
+    deprecated_update_frame_pc_hack (fi, FRAME_SAVED_PC (fi->next));
 
   memset (fi->fsr.regs, '\000', sizeof fi->fsr.regs);
   fi->status = 0;
@@ -899,8 +891,7 @@ mn10200_init_extra_frame_info (fi)
 }
 
 void
-_initialize_mn10200_tdep ()
+_initialize_mn10200_tdep (void)
 {
   tm_print_insn = print_insn_mn10200;
 }
-
This page took 0.036156 seconds and 4 git commands to generate.