import gdb-1999-06-14 snapshot
[deliverable/binutils-gdb.git] / gdb / thread.c
index 23202dbcf5f40ac4f3d0d18804b891b0dd8909c1..516bca3beb8f16902d5f2deb6da2af4aa0f8cdbe 100644 (file)
@@ -53,37 +53,45 @@ struct thread_info
   int trap_expected;
   int handling_longjmp;
   int another_trap;
-};
 
-static struct thread_info *thread_list = NULL;
-static int highest_thread_num;
+  /* This is set TRUE when a catchpoint of a shared library event
+     triggers.  Since we don't wish to leave the inferior in the
+     solib hook when we report the event, we step the inferior
+     back to user code before stopping and reporting the event.
+     */
+  int  stepping_through_solib_after_catch;
 
-static void
-thread_command PARAMS ((char * tidstr, int from_tty));
+  /* When stepping_through_solib_after_catch is TRUE, this is a
+     list of the catchpoints that should be reported as triggering
+     when we finally do stop stepping.
+     */
+  bpstat  stepping_through_solib_catchpoints;
 
-static void
-prune_threads PARAMS ((void));
+  /* This is set to TRUE when this thread is in a signal handler
+     trampoline and we're single-stepping through it */
+  int stepping_through_sigtramp;
 
-static void
-switch_to_thread PARAMS ((int pid));
+};
 
-static struct thread_info *
-find_thread_id PARAMS ((int num));
+/* Prototypes for exported functions. */
 
-static void
-info_threads_command PARAMS ((char *, int));
+void _initialize_thread PARAMS ((void));
 
-static void
-restore_current_thread PARAMS ((int));
+/* Prototypes for local functions. */
 
-static void
-thread_apply_all_command PARAMS ((char *, int));
+static struct thread_info *thread_list = NULL;
+static int highest_thread_num;
 
-static void
-thread_apply_command PARAMS ((char *, int));
+static struct thread_info * find_thread_id PARAMS ((int num));
 
-static int
-thread_alive PARAMS ((struct thread_info *));
+static void thread_command PARAMS ((char * tidstr, int from_tty));
+static void thread_apply_all_command PARAMS ((char *, int));
+static int  thread_alive PARAMS ((struct thread_info *));
+static void info_threads_command PARAMS ((char *, int));
+static void thread_apply_command PARAMS ((char *, int));
+static void restore_current_thread PARAMS ((int));
+static void switch_to_thread PARAMS ((int pid));
+static void prune_threads PARAMS ((void));
 
 void
 init_thread_list ()
@@ -124,6 +132,9 @@ add_thread (pid)
   tp->handling_longjmp = 0;
   tp->trap_expected = 0;
   tp->another_trap = 0;
+  tp->stepping_through_solib_after_catch = 0;
+  tp->stepping_through_solib_catchpoints = NULL;
+  tp->stepping_through_sigtramp = 0;
   tp->next = thread_list;
   thread_list = tp;
 }
@@ -222,7 +233,10 @@ void load_infrun_state (pid, prev_pc, prev_func_start, prev_func_name,
                        trap_expected, step_resume_breakpoint,
                        through_sigtramp_breakpoint, step_range_start,
                        step_range_end, step_frame_address,
-                       handling_longjmp, another_trap)
+                       handling_longjmp, another_trap,
+                       stepping_through_solib_after_catch,
+                       stepping_through_solib_catchpoints,
+                       stepping_through_sigtramp)
      int pid;
      CORE_ADDR *prev_pc;
      CORE_ADDR *prev_func_start;
@@ -235,6 +249,9 @@ void load_infrun_state (pid, prev_pc, prev_func_start, prev_func_name,
      CORE_ADDR *step_frame_address;
      int *handling_longjmp;
      int *another_trap;
+     int *  stepping_through_solib_after_catch;
+     bpstat *  stepping_through_solib_catchpoints;
+     int *  stepping_through_sigtramp;
 {
   struct thread_info *tp;
 
@@ -255,6 +272,9 @@ void load_infrun_state (pid, prev_pc, prev_func_start, prev_func_name,
   *handling_longjmp = tp->handling_longjmp;
   *trap_expected = tp->trap_expected;
   *another_trap = tp->another_trap;
+  *stepping_through_solib_after_catch = tp->stepping_through_solib_after_catch;
+  *stepping_through_solib_catchpoints = tp->stepping_through_solib_catchpoints;
+  *stepping_through_sigtramp = tp->stepping_through_sigtramp;
 }
 
 /* Save infrun state for the thread PID.  */
@@ -263,7 +283,10 @@ void save_infrun_state (pid, prev_pc, prev_func_start, prev_func_name,
                        trap_expected, step_resume_breakpoint,
                        through_sigtramp_breakpoint, step_range_start,
                        step_range_end, step_frame_address,
-                       handling_longjmp, another_trap)
+                       handling_longjmp, another_trap,
+                       stepping_through_solib_after_catch,
+                       stepping_through_solib_catchpoints,
+                       stepping_through_sigtramp)
      int pid;
      CORE_ADDR prev_pc;
      CORE_ADDR prev_func_start;
@@ -276,6 +299,9 @@ void save_infrun_state (pid, prev_pc, prev_func_start, prev_func_name,
      CORE_ADDR step_frame_address;
      int handling_longjmp;
      int another_trap;
+     int  stepping_through_solib_after_catch;
+     bpstat  stepping_through_solib_catchpoints;
+     int  stepping_through_sigtramp;
 {
   struct thread_info *tp;
 
@@ -296,6 +322,9 @@ void save_infrun_state (pid, prev_pc, prev_func_start, prev_func_name,
   tp->handling_longjmp = handling_longjmp;
   tp->trap_expected = trap_expected;
   tp->another_trap = another_trap;
+  tp->stepping_through_solib_after_catch = stepping_through_solib_after_catch;
+  tp->stepping_through_solib_catchpoints = stepping_through_solib_catchpoints;
+  tp->stepping_through_sigtramp = stepping_through_sigtramp;
 }
 
 /* Return true if TP is an active thread. */
@@ -335,7 +364,12 @@ prune_threads ()
     }
 }
 
-/* Print information about currently known threads */
+/* Print information about currently known threads 
+ *
+ * Note: this has the drawback that it _really_ switches
+ *       threads, which frees the frame cache.  A no-side
+ *       effects info-threads command would be nicer.
+ */
 
 static void
 info_threads_command (arg, from_tty)
@@ -343,17 +377,18 @@ info_threads_command (arg, from_tty)
      int from_tty;
 {
   struct thread_info *tp;
-  int current_pid = inferior_pid;
+  int                current_pid;
+  struct frame_info  *cur_frame;
+  int                saved_frame_level = selected_frame_level;
+  int                counter;
 
   /* Avoid coredumps which would happen if we tried to access a NULL
      selected_frame.  */
   if (!target_has_stack) error ("No stack.");
 
   prune_threads ();
-#if defined(FIND_NEW_THREADS)
-  FIND_NEW_THREADS ();
-#endif
-
+  target_find_new_threads ();
+  current_pid = inferior_pid;
   for (tp = thread_list; tp; tp = tp->next)
     {
       if (tp->pid == current_pid)
@@ -361,16 +396,41 @@ info_threads_command (arg, from_tty)
       else
        printf_filtered ("  ");
 
+#ifdef HPUXHPPA
+      printf_filtered ("%d %s  ", tp->num, target_tid_to_str (tp->pid));
+#else
       printf_filtered ("%d %s  ", tp->num, target_pid_to_str (tp->pid));
-
+#endif
       switch_to_thread (tp->pid);
       if (selected_frame)
-       print_stack_frame (selected_frame, -1, 0);
+       print_only_stack_frame (selected_frame, -1, 0);
       else
        printf_filtered ("[No stack.]\n");
     }
 
   switch_to_thread (current_pid);
+
+  /* Code below copied from "up_silently_base" in "stack.c".
+   * It restores the frame set by the user before the "info threads"
+   * command.  We have finished the info-threads display by switching
+   * back to the current thread.  That switch has put us at the top
+   * of the stack (leaf frame).
+   */
+  counter   = saved_frame_level;
+  cur_frame = find_relative_frame(selected_frame, &counter);
+  if (counter != 0)
+    {
+      /* Ooops, can't restore, tell user where we are. */
+      warning ("Couldn't restore frame in current thread, at frame 0");
+      print_stack_frame (selected_frame, -1, 0);
+    }
+  else
+    {
+      select_frame(cur_frame, saved_frame_level);
+    }
+
+  /* re-show current frame. */
+  show_stack_frame(cur_frame);
 }
 
 /* Switch from one thread to another. */
@@ -393,8 +453,11 @@ static void
 restore_current_thread (pid)
      int pid;
 {
-  if (pid != inferior_pid)
-    switch_to_thread (pid);
+  if (pid != inferior_pid) 
+    {
+      switch_to_thread (pid);
+      print_stack_frame( get_current_frame(), 0, -1);
+    }
 }
 
 /* Apply a GDB command to a list of threads.  List syntax is a whitespace
@@ -418,14 +481,20 @@ thread_apply_all_command (cmd, from_tty)
     error ("Please specify a command following the thread ID list");
 
   old_chain = make_cleanup ((make_cleanup_func) restore_current_thread, 
-                            (void *) inferior_pid);
+                           (void *) inferior_pid);
 
   for (tp = thread_list; tp; tp = tp->next)
     if (thread_alive (tp))
       {
        switch_to_thread (tp->pid);
+#ifdef HPUXHPPA
+       printf_filtered ("\nThread %d (%s):\n",
+                        tp->num,
+                        target_tid_to_str (inferior_pid));
+#else
        printf_filtered ("\nThread %d (%s):\n", tp->num,
                         target_pid_to_str (inferior_pid));
+#endif
        execute_command (cmd, from_tty);
       }
 }
@@ -448,7 +517,7 @@ thread_apply_command (tidlist, from_tty)
     error ("Please specify a command following the thread ID list");
 
   old_chain = make_cleanup ((make_cleanup_func) restore_current_thread, 
-                            (void *) inferior_pid);
+                           (void *) inferior_pid);
 
   while (tidlist < cmd)
     {
@@ -488,8 +557,13 @@ thread_apply_command (tidlist, from_tty)
          else
            {
              switch_to_thread (tp->pid);
+#ifdef HPUXHPPA
+             printf_filtered ("\nThread %d (%s):\n", tp->num,
+                              target_tid_to_str (inferior_pid));
+#else
              printf_filtered ("\nThread %d (%s):\n", tp->num,
                               target_pid_to_str (inferior_pid));
+#endif
              execute_command (cmd, from_tty);
            }
        }
@@ -508,9 +582,21 @@ thread_command (tidstr, from_tty)
   struct thread_info *tp;
 
   if (!tidstr)
-    error ("Please specify a thread ID.  Use the \"info threads\" command to\n\
-see the IDs of currently known threads.");
-
+    {
+      /* Don't generate an error, just say which thread is current. */
+      if (target_has_stack)
+       printf_filtered ("[Current thread is %d (%s)]\n",
+                        pid_to_thread_id(inferior_pid),
+#if defined(HPUXHPPA)
+                        target_tid_to_str(inferior_pid)
+#else
+                        target_pid_to_str(inferior_pid)
+#endif
+                        );
+      else
+       error ("No stack.");
+      return;
+    }
   num = atoi (tidstr);
 
   tp = find_thread_id (num);
@@ -523,9 +609,18 @@ see the IDs of currently known threads.", num);
     error ("Thread ID %d has terminated.\n", num);
 
   switch_to_thread (tp->pid);
+
   if (context_hook)
     context_hook (num);
-  printf_filtered ("[Switching to %s]\n", target_pid_to_str (inferior_pid));
+
+  printf_filtered ("[Switching to thread %d (%s)]\n",
+                  pid_to_thread_id (inferior_pid),
+#if defined(HPUXHPPA)
+                  target_tid_to_str (inferior_pid)
+#else
+                  target_pid_to_str (inferior_pid)
+#endif
+                  );
   print_stack_frame (selected_frame, selected_frame_level, 1);
 }
 
@@ -536,7 +631,6 @@ void
 _initialize_thread ()
 {
   static struct cmd_list_element *thread_apply_list = NULL;
-  extern struct cmd_list_element *cmdlist;
 
   add_info ("threads", info_threads_command,
            "IDs of currently known threads.");
@@ -554,5 +648,6 @@ The new thread ID must be currently known.", &thread_cmd_list, "thread ", 1,
           "Apply a command to all threads.",
           &thread_apply_list);
 
-  add_com_alias ("t", "thread", class_run, 1);
+  if (!xdb_commands)
+    add_com_alias ("t", "thread", class_run, 1);
 }
This page took 0.029647 seconds and 4 git commands to generate.