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
->pt
->supports_thread_stopped ()
70 && target_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
->pt
->supports_multi_process ();
267 set_target_ops (process_stratum_target
*target
)
269 the_target
= XNEW (process_stratum_target
);
270 memcpy (the_target
, target
, sizeof (*the_target
));
273 /* Convert pid to printable format. */
276 target_pid_to_str (ptid_t ptid
)
280 if (ptid
== minus_one_ptid
)
281 xsnprintf (buf
, sizeof (buf
), "<all threads>");
282 else if (ptid
== null_ptid
)
283 xsnprintf (buf
, sizeof (buf
), "<null thread>");
284 else if (ptid
.tid () != 0)
285 xsnprintf (buf
, sizeof (buf
), "Thread %d.0x%lx",
286 ptid
.pid (), ptid
.tid ());
287 else if (ptid
.lwp () != 0)
288 xsnprintf (buf
, sizeof (buf
), "LWP %d.%ld",
289 ptid
.pid (), ptid
.lwp ());
291 xsnprintf (buf
, sizeof (buf
), "Process %d",
298 kill_inferior (process_info
*proc
)
300 gdb_agent_about_to_close (proc
->pid
);
302 return the_target
->pt
->kill (proc
);
305 /* Default implementation for breakpoint_kind_for_pc.
307 The default behavior for targets that don't implement breakpoint_kind_for_pc
308 is to use the size of a breakpoint as the kind. */
311 default_breakpoint_kind_from_pc (CORE_ADDR
*pcptr
)
315 gdb_assert (the_target
->sw_breakpoint_from_kind
!= NULL
);
317 (*the_target
->sw_breakpoint_from_kind
) (0, &size
);
323 target_terminal_state
target_terminal::m_terminal_state
324 = target_terminal_state::is_ours
;
326 /* See target/target.h. */
329 target_terminal::init ()
331 /* Placeholder needed because of fork_inferior. Not necessary on
335 /* See target/target.h. */
338 target_terminal::inferior ()
340 /* Placeholder needed because of fork_inferior. Not necessary on
344 /* See target/target.h. */
347 target_terminal::ours ()
349 /* Placeholder needed because of fork_inferior. Not necessary on
353 /* See target/target.h. */
356 target_terminal::ours_for_output (void)
361 /* See target/target.h. */
364 target_terminal::info (const char *arg
, int from_tty
)
369 /* Default implementations of target ops.
370 See target.h for definitions. */
373 process_target::post_create_inferior ()
379 process_target::prepare_to_access_memory ()
385 process_target::done_accessing_memory ()
391 process_target::look_up_symbols ()
397 process_target::supports_read_auxv ()
403 process_target::read_auxv (CORE_ADDR offset
, unsigned char *myaddr
,
406 gdb_assert_not_reached ("target op read_auxv not supported");
410 process_target::supports_z_point_type (char z_type
)
416 process_target::insert_point (enum raw_bkpt_type type
, CORE_ADDR addr
,
417 int size
, raw_breakpoint
*bp
)
423 process_target::remove_point (enum raw_bkpt_type type
, CORE_ADDR addr
,
424 int size
, raw_breakpoint
*bp
)
430 process_target::stopped_by_sw_breakpoint ()
436 process_target::supports_stopped_by_sw_breakpoint ()
442 process_target::stopped_by_hw_breakpoint ()
448 process_target::supports_stopped_by_hw_breakpoint ()
454 process_target::supports_hardware_single_step ()
460 process_target::stopped_by_watchpoint ()
466 process_target::stopped_data_address ()
472 process_target::supports_read_offsets ()
478 process_target::read_offsets (CORE_ADDR
*text
, CORE_ADDR
*data
)
480 gdb_assert_not_reached ("target op read_offsets not supported");
484 process_target::supports_get_tls_address ()
490 process_target::get_tls_address (thread_info
*thread
, CORE_ADDR offset
,
491 CORE_ADDR load_module
, CORE_ADDR
*address
)
493 gdb_assert_not_reached ("target op get_tls_address not supported");
497 process_target::hostio_last_error (char *buf
)
499 hostio_last_error_from_errno (buf
);
503 process_target::supports_qxfer_osdata ()
509 process_target::qxfer_osdata (const char *annex
, unsigned char *readbuf
,
510 unsigned const char *writebuf
,
511 CORE_ADDR offset
, int len
)
513 gdb_assert_not_reached ("target op qxfer_osdata not supported");
517 process_target::supports_qxfer_siginfo ()
523 process_target::qxfer_siginfo (const char *annex
, unsigned char *readbuf
,
524 unsigned const char *writebuf
,
525 CORE_ADDR offset
, int len
)
527 gdb_assert_not_reached ("target op qxfer_siginfo not supported");
531 process_target::supports_non_stop ()
537 process_target::async (bool enable
)
543 process_target::start_non_stop (bool enable
)
552 process_target::supports_multi_process ()
558 process_target::supports_fork_events ()
564 process_target::supports_vfork_events ()
570 process_target::supports_exec_events ()
576 process_target::handle_new_gdb_connection ()
582 process_target::handle_monitor_command (char *mon
)
588 process_target::core_of_thread (ptid_t ptid
)
594 process_target::supports_read_loadmap ()
600 process_target::read_loadmap (const char *annex
, CORE_ADDR offset
,
601 unsigned char *myaddr
, unsigned int len
)
603 gdb_assert_not_reached ("target op read_loadmap not supported");
607 process_target::process_qsupported (char **features
, int count
)
613 process_target::supports_tracepoints ()
619 process_target::read_pc (regcache
*regcache
)
621 gdb_assert_not_reached ("process_target::read_pc: Unable to find PC");
625 process_target::write_pc (regcache
*regcache
, CORE_ADDR pc
)
627 gdb_assert_not_reached ("process_target::write_pc: Unable to update PC");
631 process_target::supports_thread_stopped ()
637 process_target::thread_stopped (thread_info
*thread
)
639 gdb_assert_not_reached ("target op thread_stopped not supported");
643 process_target::supports_get_tib_address ()
649 process_target::get_tib_address (ptid_t ptid
, CORE_ADDR
*address
)
651 gdb_assert_not_reached ("target op get_tib_address not supported");
655 process_target::pause_all (bool freeze
)
661 process_target::unpause_all (bool unfreeze
)
667 process_target::stabilize_threads ()
673 process_target::supports_fast_tracepoints ()
679 process_target::install_fast_tracepoint_jump_pad
680 (CORE_ADDR tpoint
, CORE_ADDR tpaddr
, CORE_ADDR collector
,
681 CORE_ADDR lockaddr
, ULONGEST orig_size
, CORE_ADDR
*jump_entry
,
682 CORE_ADDR
*trampoline
, ULONGEST
*trampoline_size
,
683 unsigned char *jjump_pad_insn
, ULONGEST
*jjump_pad_insn_size
,
684 CORE_ADDR
*adjusted_insn_addr
, CORE_ADDR
*adjusted_insn_addr_end
,
687 gdb_assert_not_reached ("target op install_fast_tracepoint_jump_pad "
692 process_target::get_min_fast_tracepoint_insn_len ()
698 process_target::emit_ops ()
704 process_target::supports_disable_randomization ()
710 process_target::supports_qxfer_libraries_svr4 ()
716 process_target::qxfer_libraries_svr4 (const char *annex
,
717 unsigned char *readbuf
,
718 unsigned const char *writebuf
,
719 CORE_ADDR offset
, int len
)
721 gdb_assert_not_reached ("target op qxfer_libraries_svr4 not supported");