1 /* Target operations for the remote server for GDB.
2 Copyright (C) 2002-2020 Free Software Foundation, Inc.
4 Contributed by MontaVista Software.
6 This file is part of GDB.
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.
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.
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/>. */
22 #include "tracepoint.h"
23 #include "gdbsupport/byte-vector.h"
26 process_stratum_target
*the_target
;
31 client_state
&cs
= get_client_state ();
32 thread_info
*found
= find_thread_ptid (cs
.general_thread
);
34 current_thread
= found
;
35 return (current_thread
!= NULL
);
38 /* The thread that was current before prepare_to_access_memory was
39 called. done_accessing_memory uses this to restore the previous
41 static ptid_t prev_general_thread
;
46 prepare_to_access_memory (void)
48 client_state
&cs
= get_client_state ();
50 /* The first thread found. */
51 struct thread_info
*first
= NULL
;
52 /* The first stopped thread found. */
53 struct thread_info
*stopped
= NULL
;
54 /* The current general thread, if found. */
55 struct thread_info
*current
= NULL
;
57 /* Save the general thread value, since prepare_to_access_memory could change
59 prev_general_thread
= cs
.general_thread
;
61 int res
= the_target
->pt
->prepare_to_access_memory ();
65 for_each_thread (prev_general_thread
.pid (), [&] (thread_info
*thread
)
67 if (mythread_alive (thread
->id
))
69 if (stopped
== NULL
&& the_target
->thread_stopped
!= NULL
70 && thread_stopped (thread
))
76 if (current
== NULL
&& prev_general_thread
== thread
->id
)
81 /* The thread we end up choosing. */
82 struct thread_info
*thread
;
84 /* Prefer a stopped thread. If none is found, try the current
85 thread. Otherwise, take the first thread in the process. If
86 none is found, undo the effects of
87 target->prepare_to_access_memory() and return error. */
90 else if (current
!= NULL
)
92 else if (first
!= NULL
)
96 done_accessing_memory ();
100 current_thread
= thread
;
101 cs
.general_thread
= ptid_of (thread
);
109 done_accessing_memory (void)
111 client_state
&cs
= get_client_state ();
113 the_target
->pt
->done_accessing_memory ();
115 /* Restore the previous selected thread. */
116 cs
.general_thread
= prev_general_thread
;
117 switch_to_thread (the_target
, cs
.general_thread
);
121 read_inferior_memory (CORE_ADDR memaddr
, unsigned char *myaddr
, int len
)
124 res
= the_target
->pt
->read_memory (memaddr
, myaddr
, len
);
125 check_mem_read (memaddr
, myaddr
, len
);
129 /* See target/target.h. */
132 target_read_memory (CORE_ADDR memaddr
, gdb_byte
*myaddr
, ssize_t len
)
134 return read_inferior_memory (memaddr
, myaddr
, len
);
137 /* See target/target.h. */
140 target_read_uint32 (CORE_ADDR memaddr
, uint32_t *result
)
142 return read_inferior_memory (memaddr
, (gdb_byte
*) result
, sizeof (*result
));
145 /* See target/target.h. */
148 target_write_memory (CORE_ADDR memaddr
, const unsigned char *myaddr
,
151 /* Make a copy of the data because check_mem_write may need to
153 gdb::byte_vector
buffer (myaddr
, myaddr
+ len
);
154 check_mem_write (memaddr
, buffer
.data (), myaddr
, len
);
155 return the_target
->pt
->write_memory (memaddr
, buffer
.data (), len
);
159 mywait (ptid_t ptid
, struct target_waitstatus
*ourstatus
, int options
,
167 ret
= target_wait (ptid
, ourstatus
, options
);
169 /* We don't expose _LOADED events to gdbserver core. See the
170 `dlls_changed' global. */
171 if (ourstatus
->kind
== TARGET_WAITKIND_LOADED
)
172 ourstatus
->kind
= TARGET_WAITKIND_STOPPED
;
174 /* If GDB is connected through TCP/serial, then GDBserver will most
175 probably be running on its own terminal/console, so it's nice to
176 print there why is GDBserver exiting. If however, GDB is
177 connected through stdio, then there's no need to spam the GDB
178 console with this -- the user will already see the exit through
179 regular GDB output, in that same terminal. */
180 if (!remote_connection_is_stdio ())
182 if (ourstatus
->kind
== TARGET_WAITKIND_EXITED
)
184 "\nChild exited with status %d\n", ourstatus
->value
.integer
);
185 else if (ourstatus
->kind
== TARGET_WAITKIND_SIGNALLED
)
186 fprintf (stderr
, "\nChild terminated with signal = 0x%x (%s)\n",
187 gdb_signal_to_host (ourstatus
->value
.sig
),
188 gdb_signal_to_name (ourstatus
->value
.sig
));
197 /* See target/target.h. */
200 target_stop_and_wait (ptid_t ptid
)
202 struct target_waitstatus status
;
203 bool was_non_stop
= non_stop
;
204 struct thread_resume resume_info
;
206 resume_info
.thread
= ptid
;
207 resume_info
.kind
= resume_stop
;
208 resume_info
.sig
= GDB_SIGNAL_0
;
209 the_target
->pt
->resume (&resume_info
, 1);
212 mywait (ptid
, &status
, 0, 0);
213 non_stop
= was_non_stop
;
216 /* See target/target.h. */
219 target_wait (ptid_t ptid
, struct target_waitstatus
*status
, int options
)
221 return the_target
->pt
->wait (ptid
, status
, options
);
224 /* See target/target.h. */
227 target_mourn_inferior (ptid_t ptid
)
229 the_target
->pt
->mourn (find_process_pid (ptid
.pid ()));
232 /* See target/target.h. */
235 target_continue_no_signal (ptid_t ptid
)
237 struct thread_resume resume_info
;
239 resume_info
.thread
= ptid
;
240 resume_info
.kind
= resume_continue
;
241 resume_info
.sig
= GDB_SIGNAL_0
;
242 the_target
->pt
->resume (&resume_info
, 1);
245 /* See target/target.h. */
248 target_continue (ptid_t ptid
, enum gdb_signal signal
)
250 struct thread_resume resume_info
;
252 resume_info
.thread
= ptid
;
253 resume_info
.kind
= resume_continue
;
254 resume_info
.sig
= gdb_signal_to_host (signal
);
255 the_target
->pt
->resume (&resume_info
, 1);
258 /* See target/target.h. */
261 target_supports_multi_process (void)
263 return (the_target
->supports_multi_process
!= NULL
?
264 (*the_target
->supports_multi_process
) () : 0);
268 start_non_stop (int nonstop
)
270 if (the_target
->start_non_stop
== NULL
)
278 return (*the_target
->start_non_stop
) (nonstop
);
282 set_target_ops (process_stratum_target
*target
)
284 the_target
= XNEW (process_stratum_target
);
285 memcpy (the_target
, target
, sizeof (*the_target
));
288 /* Convert pid to printable format. */
291 target_pid_to_str (ptid_t ptid
)
295 if (ptid
== minus_one_ptid
)
296 xsnprintf (buf
, sizeof (buf
), "<all threads>");
297 else if (ptid
== null_ptid
)
298 xsnprintf (buf
, sizeof (buf
), "<null thread>");
299 else if (ptid
.tid () != 0)
300 xsnprintf (buf
, sizeof (buf
), "Thread %d.0x%lx",
301 ptid
.pid (), ptid
.tid ());
302 else if (ptid
.lwp () != 0)
303 xsnprintf (buf
, sizeof (buf
), "LWP %d.%ld",
304 ptid
.pid (), ptid
.lwp ());
306 xsnprintf (buf
, sizeof (buf
), "Process %d",
313 kill_inferior (process_info
*proc
)
315 gdb_agent_about_to_close (proc
->pid
);
317 return the_target
->pt
->kill (proc
);
320 /* Default implementation for breakpoint_kind_for_pc.
322 The default behavior for targets that don't implement breakpoint_kind_for_pc
323 is to use the size of a breakpoint as the kind. */
326 default_breakpoint_kind_from_pc (CORE_ADDR
*pcptr
)
330 gdb_assert (the_target
->sw_breakpoint_from_kind
!= NULL
);
332 (*the_target
->sw_breakpoint_from_kind
) (0, &size
);
338 target_terminal_state
target_terminal::m_terminal_state
339 = target_terminal_state::is_ours
;
341 /* See target/target.h. */
344 target_terminal::init ()
346 /* Placeholder needed because of fork_inferior. Not necessary on
350 /* See target/target.h. */
353 target_terminal::inferior ()
355 /* Placeholder needed because of fork_inferior. Not necessary on
359 /* See target/target.h. */
362 target_terminal::ours ()
364 /* Placeholder needed because of fork_inferior. Not necessary on
368 /* See target/target.h. */
371 target_terminal::ours_for_output (void)
376 /* See target/target.h. */
379 target_terminal::info (const char *arg
, int from_tty
)
384 /* Default implementations of target ops.
385 See target.h for definitions. */
388 process_target::post_create_inferior ()
394 process_target::prepare_to_access_memory ()
400 process_target::done_accessing_memory ()
406 process_target::look_up_symbols ()
412 process_target::supports_read_auxv ()
418 process_target::read_auxv (CORE_ADDR offset
, unsigned char *myaddr
,
421 gdb_assert_not_reached ("target op read_auxv not supported");
425 process_target::supports_z_point_type (char z_type
)
431 process_target::insert_point (enum raw_bkpt_type type
, CORE_ADDR addr
,
432 int size
, raw_breakpoint
*bp
)
438 process_target::remove_point (enum raw_bkpt_type type
, CORE_ADDR addr
,
439 int size
, raw_breakpoint
*bp
)
445 process_target::stopped_by_sw_breakpoint ()
451 process_target::supports_stopped_by_sw_breakpoint ()
457 process_target::stopped_by_hw_breakpoint ()
463 process_target::supports_stopped_by_hw_breakpoint ()
469 process_target::supports_hardware_single_step ()
475 process_target::stopped_by_watchpoint ()
481 process_target::stopped_data_address ()
487 process_target::supports_read_offsets ()
493 process_target::read_offsets (CORE_ADDR
*text
, CORE_ADDR
*data
)
495 gdb_assert_not_reached ("target op read_offsets not supported");
499 process_target::supports_get_tls_address ()
505 process_target::get_tls_address (thread_info
*thread
, CORE_ADDR offset
,
506 CORE_ADDR load_module
, CORE_ADDR
*address
)
508 gdb_assert_not_reached ("target op get_tls_address not supported");
512 process_target::hostio_last_error (char *buf
)
514 hostio_last_error_from_errno (buf
);
518 process_target::supports_qxfer_osdata ()
524 process_target::qxfer_osdata (const char *annex
, unsigned char *readbuf
,
525 unsigned const char *writebuf
,
526 CORE_ADDR offset
, int len
)
528 gdb_assert_not_reached ("target op qxfer_osdata not supported");