* libaout.h (enum machine_type): Change M_SPARCLET from 142 to 131.
[deliverable/binutils-gdb.git] / gdb / infrun.c
index 623e1da8b9ac859f374a1719fae3b7c94d1d4e79..4cc423c6f5c1dabd13f8f6009a53fd9b00429e92 100644 (file)
@@ -29,7 +29,7 @@ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
 #include "gdbcore.h"
 #include "gdbcmd.h"
 #include "target.h"
-#include "thread.h"
+#include "gdbthread.h"
 #include "annotate.h"
 
 #include <signal.h>
@@ -55,6 +55,8 @@ static void resume_cleanups PARAMS ((int));
 
 static int hook_stop_stub PARAMS ((char *));
 
+static void delete_breakpoint_current_contents PARAMS ((PTR));
+
 /* GET_LONGJMP_TARGET returns the PC at which longjmp() will resume the
    program.  It needs to examine the jmp_buf argument and extract the PC
    from it.  The return value is non-zero on success, zero otherwise. */
@@ -151,9 +153,11 @@ static struct symbol *step_start_function;
 
 static int trap_expected;
 
+#ifdef SOLIB_ADD
 /* Nonzero if we want to give control to the user when we're notified
    of shared library events by the dynamic linker.  */
 static int stop_on_solib_events;
+#endif
 
 #ifdef HP_OS_BUG
 /* Nonzero if the next time we try to continue the inferior, it will
@@ -195,11 +199,6 @@ static int breakpoints_failed;
 
 static int stop_print_frame;
 
-#ifdef NO_SINGLE_STEP
-extern int one_stepped;                /* From machine dependent code */
-extern void single_step ();    /* Same. */
-#endif /* NO_SINGLE_STEP */
-
 \f
 /* Things to clean up if we QUIT out of resume ().  */
 /* ARGSUSED */
@@ -453,11 +452,14 @@ wait_for_inferior ()
   struct cleanup *old_cleanups;
   struct target_waitstatus w;
   int another_trap;
-  int random_signal;
+  int random_signal = 0;
   CORE_ADDR stop_func_start;
   CORE_ADDR stop_func_end;
   char *stop_func_name;
-  CORE_ADDR prologue_pc = 0, tmp;
+#if 0
+  CORE_ADDR prologue_pc = 0;
+#endif
+  CORE_ADDR tmp;
   struct symtab_and_line sal;
   int remove_breakpoints_on_following_step = 0;
   int current_line;
@@ -498,9 +500,12 @@ wait_for_inferior ()
       else
        pid = target_wait (-1, &w);
 
-#ifdef HAVE_NONSTEPPABLE_WATCHPOINT
+    /* Gross.
+
+       We goto this label from elsewhere in wait_for_inferior when we want
+       to continue the main loop without calling "wait" and trashing the
+       waitstatus contained in W.  */
     have_waited:
-#endif
 
       flush_cached_frames ();
 
@@ -606,31 +611,38 @@ wait_for_inferior ()
         another thread.  If so, then step that thread past the breakpoint,
         and continue it.  */
 
-      if (stop_signal == TARGET_SIGNAL_TRAP
-         && breakpoints_inserted
-         && breakpoint_here_p (stop_pc - DECR_PC_AFTER_BREAK))
+      if (stop_signal == TARGET_SIGNAL_TRAP)
        {
-         random_signal = 0;
-         if (!breakpoint_thread_match (stop_pc - DECR_PC_AFTER_BREAK, pid))
-           {
-             /* Saw a breakpoint, but it was hit by the wrong thread.  Just continue. */
-             write_pc_pid (stop_pc - DECR_PC_AFTER_BREAK, pid);
+#ifdef NO_SINGLE_STEP
+         if (one_stepped)
+           random_signal = 0;
+         else
+#endif
+           if (breakpoints_inserted
+               && breakpoint_here_p (stop_pc - DECR_PC_AFTER_BREAK))
+             {
+               random_signal = 0;
+               if (!breakpoint_thread_match (stop_pc - DECR_PC_AFTER_BREAK, pid))
+                 {
+                   /* Saw a breakpoint, but it was hit by the wrong thread.  Just continue. */
+                   write_pc_pid (stop_pc - DECR_PC_AFTER_BREAK, pid);
 
-             remove_breakpoints ();
-             target_resume (pid, 1, TARGET_SIGNAL_0); /* Single step */
-             /* FIXME: What if a signal arrives instead of the single-step
-                happening?  */
+                   remove_breakpoints ();
+                   target_resume (pid, 1, TARGET_SIGNAL_0); /* Single step */
+                   /* FIXME: What if a signal arrives instead of the single-step
+                      happening?  */
 
-             if (target_wait_hook)
-               target_wait_hook (pid, &w);
-             else
-               target_wait (pid, &w);
-             insert_breakpoints ();
+                   if (target_wait_hook)
+                     target_wait_hook (pid, &w);
+                   else
+                     target_wait (pid, &w);
+                   insert_breakpoints ();
 
-             /* We need to restart all the threads now.  */
-             target_resume (-1, 0, TARGET_SIGNAL_0);
-             continue;
-           }
+                   /* We need to restart all the threads now.  */
+                   target_resume (-1, 0, TARGET_SIGNAL_0);
+                   continue;
+                 }
+             }
        }
       else
        random_signal = 1;
@@ -712,8 +724,22 @@ wait_for_inferior ()
 
       if (INSTRUCTION_NULLIFIED)
        {
-         resume (1, 0);
-         continue;
+         struct target_waitstatus tmpstatus;
+
+         registers_changed ();
+         target_resume (pid, 1, TARGET_SIGNAL_0);
+
+         /* We may have received a signal that we want to pass to
+            the inferior; therefore, we must not clobber the waitstatus
+            in W.  So we call wait ourselves, then continue the loop
+            at the "have_waited" label.  */
+         if (target_wait_hook)
+           target_wait_hook (pid, &tmpstatus);
+         else
+           target_wait (pid, &tmpstatus);
+
+
+         goto have_waited;
        }
 
 #ifdef HAVE_STEPPABLE_WATCHPOINT
@@ -1034,25 +1060,27 @@ wait_for_inferior ()
              another_trap = 1;
            break;
 
-#ifdef SOLIB_ADD
          case BPSTAT_WHAT_CHECK_SHLIBS:
+#ifdef SOLIB_ADD
            {
              extern int auto_solib_add;
 
+             /* Remove breakpoints, we eventually want to step over the
+                shlib event breakpoint, and SOLIB_ADD might adjust
+                breakpoint addresses via breakpoint_re_set.  */
+             if (breakpoints_inserted)
+               remove_breakpoints ();
+             breakpoints_inserted = 0;
+
              /* Check for any newly added shared libraries if we're
                 supposed to be adding them automatically.  */
              if (auto_solib_add)
                {
-                 /* Remove breakpoints, SOLIB_ADD might adjust breakpoint
-                    addresses via breakpoint_re_set.  */
-                 if (breakpoints_inserted)
-                   remove_breakpoints ();
-                 breakpoints_inserted = 0;
-
                  /* Switch terminal for any messages produced by
                     breakpoint_re_set.  */
                  target_terminal_ours_for_output ();
                  SOLIB_ADD (NULL, 0, NULL);
+                 re_enable_breakpoints_in_shlibs ();
                  target_terminal_inferior ();
                }
 
@@ -1069,11 +1097,11 @@ wait_for_inferior ()
                {
                  /* We want to step over this breakpoint, then keep going.  */
                  another_trap = 1;
-                 remove_breakpoints_on_following_step = 1;
                  break;
                }
            }
 #endif
+         break;
 
          case BPSTAT_WHAT_LAST:
            /* Not a real code, but listed here to shut up gcc -Wall.  */
@@ -1157,7 +1185,8 @@ wait_for_inferior ()
 
       /* Did we just take a signal?  */
       if (IN_SIGTRAMP (stop_pc, stop_func_name)
-         && !IN_SIGTRAMP (prev_pc, prev_func_name))
+         && !IN_SIGTRAMP (prev_pc, prev_func_name)
+         && read_sp () INNER_THAN step_sp)
        {
          /* We've just taken a signal; go until we are back to
             the point where we took it and one more.  */
@@ -1221,16 +1250,17 @@ wait_for_inferior ()
            SKIP_PROLOGUE (prologue_pc);
        }
 
-      if ((/* Might be a non-recursive call.  If the symbols are missing
-             enough that stop_func_start == prev_func_start even though
-             they are really two functions, we will treat some calls as
-             jumps.  */
-          stop_func_start != prev_func_start
-
-          /* Might be a recursive call if either we have a prologue
-             or the call instruction itself saves the PC on the stack.  */
-          || prologue_pc != stop_func_start
-          || read_sp () != step_sp)
+      if (!(step_sp INNER_THAN read_sp ())     /* don't mistake (sig)return as a call */
+         && (/* Might be a non-recursive call.  If the symbols are missing
+                enough that stop_func_start == prev_func_start even though
+                they are really two functions, we will treat some calls as
+                jumps.  */
+             stop_func_start != prev_func_start
+
+             /* Might be a recursive call if either we have a prologue
+                or the call instruction itself saves the PC on the stack.  */
+             || prologue_pc != stop_func_start
+             || read_sp () != step_sp)
          && (/* PC is completely out of bounds of any known objfiles.  Treat
                 like a subroutine call. */
              ! stop_func_start
@@ -1489,12 +1519,14 @@ step_into_function:
        }
       step_range_start = sal.pc;
       step_range_end = sal.end;
+      step_frame_address = FRAME_FP (get_current_frame ());
       goto keep_going;
 
     check_sigtramp2:
       if (trap_expected
          && IN_SIGTRAMP (stop_pc, stop_func_name)
-         && !IN_SIGTRAMP (prev_pc, prev_func_name))
+         && !IN_SIGTRAMP (prev_pc, prev_func_name)
+         && read_sp () INNER_THAN step_sp)
        {
          /* What has happened here is that we have just stepped the inferior
             with a signal (because it is a signal which shouldn't make
This page took 0.031937 seconds and 4 git commands to generate.