* objdump.c (SFILE): Add size field.

[deliverable/binutils-gdb.git] / gdb / i960-tdep.c

diff --git a/gdb/i960-tdep.c b/gdb/i960-tdep.c
index 5baa8ac34fb38c63d162fa60d2d290bf3c51bd76..0452b95be95d7eed59764f67efe83aa1a9a25027 100644 (file)
--- a/gdb/i960-tdep.c
+++ b/gdb/i960-tdep.c
@@ -25,10 +25,33 @@ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
 #include "frame.h"
 #include "floatformat.h"
 #include "target.h"
+#include "gdbcore.h"
 
 static CORE_ADDR next_insn PARAMS ((CORE_ADDR memaddr,
-                                   unsigned long *pword1,
-                                   unsigned long *pword2));
+                                   unsigned int *pword1,
+                                   unsigned int *pword2));
+
+/* Does the specified function use the "struct returning" convention
+   or the "value returning" convention?  The "value returning" convention
+   almost invariably returns the entire value in registers.  The
+   "struct returning" convention often returns the entire value in
+   memory, and passes a pointer (out of or into the function) saying
+   where the value (is or should go).
+
+   Since this sometimes depends on whether it was compiled with GCC,
+   this is also an argument.  This is used in call_function to build a
+   stack, and in value_being_returned to print return values.
+
+   On i960, a structure is returned in registers g0-g3, if it will fit.
+   If it's more than 16 bytes long, g13 pointed to it on entry.  */
+
+int
+i960_use_struct_convention (gcc_p, type)
+     int gcc_p;
+     struct type *type;
+{
+  return (TYPE_LENGTH (type) > 16);
+}
 
 /* gdb960 is always running on a non-960 host.  Check its characteristics.
    This routine must be called as part of gdb initialization.  */
@@ -521,6 +544,7 @@ saved_pc_after_call (frame)
 /* Discard from the stack the innermost frame,
    restoring all saved registers.  */
 
+void
 pop_frame ()
 {
   register struct frame_info *current_fi, *prev_fi;
@@ -710,7 +734,7 @@ mem( memaddr, word1, word2, noprint )
 
 static CORE_ADDR
 next_insn (memaddr, pword1, pword2)
-     unsigned long *pword1, *pword2;
+     unsigned int *pword1, *pword2;
      CORE_ADDR memaddr;
 {
   int len;
@@ -760,6 +784,53 @@ next_insn (memaddr, pword1, pword2)
     return 0;
 }
 
+/* 'start_frame' is a variable in the MON960 runtime startup routine
+   that contains the frame pointer of the 'start' routine (the routine
+   that calls 'main').  By reading its contents out of remote memory,
+   we can tell where the frame chain ends:  backtraces should halt before
+   they display this frame.  */
+
+int
+mon960_frame_chain_valid (chain, curframe)
+    CORE_ADDR chain;
+    struct frame_info *curframe;
+{
+       struct symbol *sym;
+       struct minimal_symbol *msymbol;
+
+       /* crtmon960.o is an assembler module that is assumed to be linked
+        * first in an i80960 executable.  It contains the true entry point;
+        * it performs startup up initialization and then calls 'main'.
+        *
+        * 'sf' is the name of a variable in crtmon960.o that is set
+        *      during startup to the address of the first frame.
+        *
+        * 'a' is the address of that variable in 80960 memory.
+        */
+       static char sf[] = "start_frame";
+       CORE_ADDR a;
+
+
+       chain &= ~0x3f; /* Zero low 6 bits because previous frame pointers
+                          contain return status info in them.  */
+       if ( chain == 0 ){
+               return 0;
+       }
+
+       sym = lookup_symbol(sf, 0, VAR_NAMESPACE, (int *)NULL, 
+                                 (struct symtab **)NULL);
+       if ( sym != 0 ){
+               a = SYMBOL_VALUE (sym);
+       } else {
+               msymbol = lookup_minimal_symbol (sf, NULL, NULL);
+               if (msymbol == NULL)
+                       return 0;
+               a = SYMBOL_VALUE_ADDRESS (msymbol);
+       }
+
+       return ( chain != read_memory_integer(a,4) );
+}
+
 void
 _initialize_i960_tdep ()
 {