123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422 |
- /* Base/prototype target for default child (native) targets.
- Copyright (C) 1988-2022 Free Software Foundation, Inc.
- This file is part of GDB.
- This program is free software; you can redistribute it and/or modify
- it under the terms of the GNU General Public License as published by
- the Free Software Foundation; either version 3 of the License, or
- (at your option) any later version.
- This program is distributed in the hope that it will be useful,
- but WITHOUT ANY WARRANTY; without even the implied warranty of
- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- GNU General Public License for more details.
- You should have received a copy of the GNU General Public License
- along with this program. If not, see <http://www.gnu.org/licenses/>. */
- /* This file provides a common base class/target that all native
- target implementations extend, by calling inf_child_target to get a
- new prototype target and then overriding target methods as
- necessary. */
- #include "defs.h"
- #include "regcache.h"
- #include "memattr.h"
- #include "symtab.h"
- #include "target.h"
- #include "inferior.h"
- #include <sys/stat.h>
- #include "inf-child.h"
- #include "gdbsupport/fileio.h"
- #include "gdbsupport/agent.h"
- #include "gdbsupport/gdb_wait.h"
- #include "gdbsupport/filestuff.h"
- #include <sys/types.h>
- #include <fcntl.h>
- #include <unistd.h>
- static const target_info inf_child_target_info = {
- "native",
- N_("Native process"),
- N_("Native process (started by the \"run\" command).")
- };
- const target_info &
- inf_child_target::info () const
- {
- return inf_child_target_info;
- }
- /* See inf-child.h. */
- target_waitstatus
- host_status_to_waitstatus (int hoststatus)
- {
- if (WIFEXITED (hoststatus))
- return target_waitstatus ().set_exited (WEXITSTATUS (hoststatus));
- else if (!WIFSTOPPED (hoststatus))
- return target_waitstatus ().set_signalled
- (gdb_signal_from_host (WTERMSIG (hoststatus)));
- else
- return target_waitstatus ().set_stopped
- (gdb_signal_from_host (WSTOPSIG (hoststatus)));
- }
- inf_child_target::~inf_child_target ()
- {}
- void
- inf_child_target::post_attach (int pid)
- {
- /* This target doesn't require a meaningful "post attach" operation
- by a debugger. */
- }
- /* Get ready to modify the registers array. On machines which store
- individual registers, this doesn't need to do anything. On
- machines which store all the registers in one fell swoop, this
- makes sure that registers contains all the registers from the
- program being debugged. */
- void
- inf_child_target::prepare_to_store (struct regcache *regcache)
- {
- }
- bool
- inf_child_target::supports_terminal_ours ()
- {
- return true;
- }
- void
- inf_child_target::terminal_init ()
- {
- child_terminal_init (this);
- }
- void
- inf_child_target::terminal_inferior ()
- {
- child_terminal_inferior (this);
- }
- void
- inf_child_target::terminal_save_inferior ()
- {
- child_terminal_save_inferior (this);
- }
- void
- inf_child_target::terminal_ours_for_output ()
- {
- child_terminal_ours_for_output (this);
- }
- void
- inf_child_target::terminal_ours ()
- {
- child_terminal_ours (this);
- }
- void
- inf_child_target::interrupt ()
- {
- child_interrupt (this);
- }
- void
- inf_child_target::pass_ctrlc ()
- {
- child_pass_ctrlc (this);
- }
- void
- inf_child_target::terminal_info (const char *args, int from_tty)
- {
- child_terminal_info (this, args, from_tty);
- }
- /* True if the user did "target native". In that case, we won't
- unpush the child target automatically when the last inferior is
- gone. */
- static int inf_child_explicitly_opened;
- /* See inf-child.h. */
- void
- inf_child_open_target (const char *arg, int from_tty)
- {
- target_ops *target = get_native_target ();
- /* There's always only ever one native target, and if we get here,
- it better be an inf-child target. */
- gdb_assert (dynamic_cast<inf_child_target *> (target) != NULL);
- target_preopen (from_tty);
- current_inferior ()->push_target (target);
- inf_child_explicitly_opened = 1;
- if (from_tty)
- gdb_printf ("Done. Use the \"run\" command to start a process.\n");
- }
- /* Implement the to_disconnect target_ops method. */
- void
- inf_child_target::disconnect (const char *args, int from_tty)
- {
- if (args != NULL)
- error (_("Argument given to \"disconnect\"."));
- /* This offers to detach/kill current inferiors, and then pops all
- targets. */
- target_preopen (from_tty);
- }
- /* Implement the to_close target_ops method. */
- void
- inf_child_target::close ()
- {
- /* In case we were forcibly closed. */
- inf_child_explicitly_opened = 0;
- }
- void
- inf_child_target::mourn_inferior ()
- {
- generic_mourn_inferior ();
- maybe_unpush_target ();
- }
- /* See inf-child.h. */
- void
- inf_child_target::maybe_unpush_target ()
- {
- if (!inf_child_explicitly_opened)
- current_inferior ()->unpush_target (this);
- }
- bool
- inf_child_target::can_run ()
- {
- return true;
- }
- bool
- inf_child_target::can_create_inferior ()
- {
- return true;
- }
- bool
- inf_child_target::can_attach ()
- {
- return true;
- }
- char *
- inf_child_target::pid_to_exec_file (int pid)
- {
- /* This target doesn't support translation of a process ID to the
- filename of the executable file. */
- return NULL;
- }
- /* Implementation of to_fileio_open. */
- int
- inf_child_target::fileio_open (struct inferior *inf, const char *filename,
- int flags, int mode, int warn_if_slow,
- int *target_errno)
- {
- int nat_flags;
- mode_t nat_mode;
- int fd;
- if (fileio_to_host_openflags (flags, &nat_flags) == -1
- || fileio_to_host_mode (mode, &nat_mode) == -1)
- {
- *target_errno = FILEIO_EINVAL;
- return -1;
- }
- fd = gdb_open_cloexec (filename, nat_flags, nat_mode).release ();
- if (fd == -1)
- *target_errno = host_to_fileio_error (errno);
- return fd;
- }
- /* Implementation of to_fileio_pwrite. */
- int
- inf_child_target::fileio_pwrite (int fd, const gdb_byte *write_buf, int len,
- ULONGEST offset, int *target_errno)
- {
- int ret;
- #ifdef HAVE_PWRITE
- ret = pwrite (fd, write_buf, len, (long) offset);
- #else
- ret = -1;
- #endif
- /* If we have no pwrite or it failed for this file, use lseek/write. */
- if (ret == -1)
- {
- ret = lseek (fd, (long) offset, SEEK_SET);
- if (ret != -1)
- ret = write (fd, write_buf, len);
- }
- if (ret == -1)
- *target_errno = host_to_fileio_error (errno);
- return ret;
- }
- /* Implementation of to_fileio_pread. */
- int
- inf_child_target::fileio_pread (int fd, gdb_byte *read_buf, int len,
- ULONGEST offset, int *target_errno)
- {
- int ret;
- #ifdef HAVE_PREAD
- ret = pread (fd, read_buf, len, (long) offset);
- #else
- ret = -1;
- #endif
- /* If we have no pread or it failed for this file, use lseek/read. */
- if (ret == -1)
- {
- ret = lseek (fd, (long) offset, SEEK_SET);
- if (ret != -1)
- ret = read (fd, read_buf, len);
- }
- if (ret == -1)
- *target_errno = host_to_fileio_error (errno);
- return ret;
- }
- /* Implementation of to_fileio_fstat. */
- int
- inf_child_target::fileio_fstat (int fd, struct stat *sb, int *target_errno)
- {
- int ret;
- ret = fstat (fd, sb);
- if (ret == -1)
- *target_errno = host_to_fileio_error (errno);
- return ret;
- }
- /* Implementation of to_fileio_close. */
- int
- inf_child_target::fileio_close (int fd, int *target_errno)
- {
- int ret;
- ret = ::close (fd);
- if (ret == -1)
- *target_errno = host_to_fileio_error (errno);
- return ret;
- }
- /* Implementation of to_fileio_unlink. */
- int
- inf_child_target::fileio_unlink (struct inferior *inf, const char *filename,
- int *target_errno)
- {
- int ret;
- ret = unlink (filename);
- if (ret == -1)
- *target_errno = host_to_fileio_error (errno);
- return ret;
- }
- /* Implementation of to_fileio_readlink. */
- gdb::optional<std::string>
- inf_child_target::fileio_readlink (struct inferior *inf, const char *filename,
- int *target_errno)
- {
- /* We support readlink only on systems that also provide a compile-time
- maximum path length (PATH_MAX), at least for now. */
- #if defined (PATH_MAX)
- char buf[PATH_MAX];
- int len;
- len = readlink (filename, buf, sizeof buf);
- if (len < 0)
- {
- *target_errno = host_to_fileio_error (errno);
- return {};
- }
- return std::string (buf, len);
- #else
- *target_errno = FILEIO_ENOSYS;
- return {};
- #endif
- }
- bool
- inf_child_target::use_agent (bool use)
- {
- if (agent_loaded_p ())
- {
- ::use_agent = use;
- return true;
- }
- else
- return false;
- }
- bool
- inf_child_target::can_use_agent ()
- {
- return agent_loaded_p ();
- }
- void
- inf_child_target::follow_exec (inferior *follow_inf, ptid_t ptid,
- const char *execd_pathname)
- {
- inferior *orig_inf = current_inferior ();
- process_stratum_target::follow_exec (follow_inf, ptid, execd_pathname);
- if (orig_inf != follow_inf)
- {
- /* If the target was implicitly push in the original inferior, unpush
- it. */
- scoped_restore_current_thread restore_thread;
- switch_to_inferior_no_thread (orig_inf);
- maybe_unpush_target ();
- }
- }
- /* See inf-child.h. */
- void
- add_inf_child_target (inf_child_target *target)
- {
- set_native_target (target);
- add_target (inf_child_target_info, inf_child_open_target);
- }
|