gdb/gdbserver/inferiors.c

   1 /* Inferior process information for the remote server for GDB.
   2    Copyright (C) 2002-2020 Free Software Foundation, Inc.
   3
   4    Contributed by MontaVista Software.
   5
   6    This file is part of GDB.
   7
   8    This program is free software; you can redistribute it and/or modify
   9    it under the terms of the GNU General Public License as published by
  10    the Free Software Foundation; either version 3 of the License, or
  11    (at your option) any later version.
  12
  13    This program is distributed in the hope that it will be useful,
  14    but WITHOUT ANY WARRANTY; without even the implied warranty of
  15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16    GNU General Public License for more details.
  17
  18    You should have received a copy of the GNU General Public License
  19    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
  20
  21 #include "server.h"
  22 #include "gdbthread.h"
  23 #include "dll.h"
  24
  25 std::list<process_info *> all_processes;
  26 std::list<thread_info *> all_threads;
  27
  28 struct thread_info *current_thread;
  29
  30 /* The current working directory used to start the inferior.  */
  31 static const char *current_inferior_cwd = NULL;
  32
  33 struct thread_info *
  34 add_thread (ptid_t thread_id, void *target_data)
  35 {
  36   struct thread_info *new_thread = XCNEW (struct thread_info);
  37
  38   new_thread->id = thread_id;
  39   new_thread->last_resume_kind = resume_continue;
  40   new_thread->last_status.kind = TARGET_WAITKIND_IGNORE;
  41
  42   all_threads.push_back (new_thread);
  43
  44   if (current_thread == NULL)
  45     current_thread = new_thread;
  46
  47   new_thread->target_data = target_data;
  48
  49   return new_thread;
  50 }
  51
  52 /* See gdbthread.h.  */
  53
  54 struct thread_info *
  55 get_first_thread (void)
  56 {
  57   if (!all_threads.empty ())
  58     return all_threads.front ();
  59   else
  60     return NULL;
  61 }
  62
  63 struct thread_info *
  64 find_thread_ptid (ptid_t ptid)
  65 {
  66   return find_thread ([&] (thread_info *thread) {
  67     return thread->id == ptid;
  68   });
  69 }
  70
  71 /* Find a thread associated with the given PROCESS, or NULL if no
  72    such thread exists.  */
  73
  74 static struct thread_info *
  75 find_thread_process (const struct process_info *const process)
  76 {
  77   return find_any_thread_of_pid (process->pid);
  78 }
  79
  80 /* See gdbthread.h.  */
  81
  82 struct thread_info *
  83 find_any_thread_of_pid (int pid)
  84 {
  85   return find_thread (pid, [] (thread_info *thread) {
  86     return true;
  87   });
  88 }
  89
  90 static void
  91 free_one_thread (thread_info *thread)
  92 {
  93   free_register_cache (thread_regcache_data (thread));
  94   free (thread);
  95 }
  96
  97 void
  98 remove_thread (struct thread_info *thread)
  99 {
 100   if (thread->btrace != NULL)
 101     target_disable_btrace (thread->btrace);
 102
 103   discard_queued_stop_replies (ptid_of (thread));
 104   all_threads.remove (thread);
 105   free_one_thread (thread);
 106   if (current_thread == thread)
 107     current_thread = NULL;
 108 }
 109
 110 void *
 111 thread_target_data (struct thread_info *thread)
 112 {
 113   return thread->target_data;
 114 }
 115
 116 struct regcache *
 117 thread_regcache_data (struct thread_info *thread)
 118 {
 119   return thread->regcache_data;
 120 }
 121
 122 void
 123 set_thread_regcache_data (struct thread_info *thread, struct regcache *data)
 124 {
 125   thread->regcache_data = data;
 126 }
 127
 128 void
 129 clear_inferiors (void)
 130 {
 131   for_each_thread (free_one_thread);
 132   all_threads.clear ();
 133
 134   clear_dlls ();
 135
 136   current_thread = NULL;
 137 }
 138
 139 struct process_info *
 140 add_process (int pid, int attached)
 141 {
 142   process_info *process = new process_info (pid, attached);
 143
 144   all_processes.push_back (process);
 145
 146   return process;
 147 }
 148
 149 /* Remove a process from the common process list and free the memory
 150    allocated for it.
 151    The caller is responsible for freeing private data first.  */
 152
 153 void
 154 remove_process (struct process_info *process)
 155 {
 156   clear_symbol_cache (&process->symbol_cache);
 157   free_all_breakpoints (process);
 158   gdb_assert (find_thread_process (process) == NULL);
 159   all_processes.remove (process);
 160   delete process;
 161 }
 162
 163 process_info *
 164 find_process_pid (int pid)
 165 {
 166   return find_process ([&] (process_info *process) {
 167     return process->pid == pid;
 168   });
 169 }
 170
 171 /* Get the first process in the process list, or NULL if the list is empty.  */
 172
 173 process_info *
 174 get_first_process (void)
 175 {
 176   if (!all_processes.empty ())
 177     return all_processes.front ();
 178   else
 179     return NULL;
 180 }
 181
 182 /* Return non-zero if there are any inferiors that we have created
 183    (as opposed to attached-to).  */
 184
 185 int
 186 have_started_inferiors_p (void)
 187 {
 188   return find_process ([] (process_info *process) {
 189     return !process->attached;
 190   }) != NULL;
 191 }
 192
 193 /* Return non-zero if there are any inferiors that we have attached to.  */
 194
 195 int
 196 have_attached_inferiors_p (void)
 197 {
 198   return find_process ([] (process_info *process) {
 199     return process->attached;
 200   }) != NULL;
 201 }
 202
 203 struct process_info *
 204 get_thread_process (const struct thread_info *thread)
 205 {
 206   return find_process_pid (thread->id.pid ());
 207 }
 208
 209 struct process_info *
 210 current_process (void)
 211 {
 212   gdb_assert (current_thread != NULL);
 213   return get_thread_process (current_thread);
 214 }
 215
 216 /* See gdbsupport/common-gdbthread.h.  */
 217
 218 void
 219 switch_to_thread (process_stratum_target *ops, ptid_t ptid)
 220 {
 221   gdb_assert (ptid != minus_one_ptid);
 222   current_thread = find_thread_ptid (ptid);
 223 }
 224
 225 /* See gdbsupport/common-inferior.h.  */
 226
 227 const char *
 228 get_inferior_cwd ()
 229 {
 230   return current_inferior_cwd;
 231 }
 232
 233 /* See gdbsupport/common-inferior.h.  */
 234
 235 void
 236 set_inferior_cwd (const char *cwd)
 237 {
 238   xfree ((void *) current_inferior_cwd);
 239   if (cwd != NULL)
 240     current_inferior_cwd = xstrdup (cwd);
 241   else
 242     current_inferior_cwd = NULL;
 243 }