/* Select target systems and architectures at runtime for GDB.
- Copyright 1990, 1992-1995, 1998, 1999 Free Software Foundation, Inc.
+ Copyright 1990, 1992-1995, 1998-2000 Free Software Foundation, Inc.
Contributed by Cygnus Support.
This file is part of GDB.
#include "bfd.h"
#include "symfile.h"
#include "objfiles.h"
-#include "wait.h"
+#include "gdb_wait.h"
#include <signal.h>
extern int errno;
target_command PARAMS ((char *, int));
static struct target_ops *
- find_default_run_target PARAMS ((char *));
+find_default_run_target PARAMS ((char *));
static void
update_current_target PARAMS ((void));
static void normal_target_post_startup_inferior PARAMS ((int pid));
-/* Transfer LEN bytes between target address MEMADDR and GDB address MYADDR.
- Returns 0 for success, errno code for failure (which includes partial
- transfers--if you want a more useful response to partial transfers, try
- target_read_memory_partial). */
+/* Transfer LEN bytes between target address MEMADDR and GDB address
+ MYADDR. Returns 0 for success, errno code for failure (which
+ includes partial transfers -- if you want a more useful response to
+ partial transfers, try either target_read_memory_partial or
+ target_write_memory_partial). */
static int
target_xfer_memory PARAMS ((CORE_ADDR memaddr, char *myaddr, int len,
{
}
+void
+target_load (char *arg, int from_tty)
+{
+ (*current_target.to_load) (arg, from_tty);
+}
+
/* ARGSUSED */
static int
nomemory (memaddr, myaddr, len, write, t)
{
#define de_fault(field, value) \
- if (!t->field) t->field = value
-
- /* FIELD DEFAULT VALUE */
-
- de_fault (to_open, (void (*)PARAMS ((char *, int))) tcomplain);
- de_fault (to_close, (void (*)PARAMS ((int))) target_ignore);
- de_fault (to_attach, maybe_kill_then_attach);
- de_fault (to_post_attach, (void (*)PARAMS ((int))) target_ignore);
- de_fault (to_require_attach, maybe_kill_then_attach);
- de_fault (to_detach, (void (*)PARAMS ((char *, int))) target_ignore);
- de_fault (to_require_detach, (void (*)PARAMS ((int, char *, int))) target_ignore);
- de_fault (to_resume, (void (*)PARAMS ((int, int, enum target_signal))) noprocess);
- de_fault (to_wait, (int (*)PARAMS ((int, struct target_waitstatus *))) noprocess);
- de_fault (to_post_wait, (void (*)PARAMS ((int, int))) target_ignore);
- de_fault (to_fetch_registers, (void (*)PARAMS ((int))) target_ignore);
- de_fault (to_store_registers, (void (*)PARAMS ((int))) noprocess);
- de_fault (to_prepare_to_store, (void (*)PARAMS ((void))) noprocess);
- de_fault (to_xfer_memory, (int (*)PARAMS ((CORE_ADDR, char *, int, int, struct target_ops *))) nomemory);
- de_fault (to_files_info, (void (*)PARAMS ((struct target_ops *))) target_ignore);
- de_fault (to_insert_breakpoint, memory_insert_breakpoint);
- de_fault (to_remove_breakpoint, memory_remove_breakpoint);
- de_fault (to_terminal_init, (void (*)PARAMS ((void))) target_ignore);
- de_fault (to_terminal_inferior, (void (*)PARAMS ((void))) target_ignore);
- de_fault (to_terminal_ours_for_output, (void (*)PARAMS ((void))) target_ignore);
- de_fault (to_terminal_ours, (void (*)PARAMS ((void))) target_ignore);
- de_fault (to_terminal_info, default_terminal_info);
- de_fault (to_kill, (void (*)PARAMS ((void))) noprocess);
- de_fault (to_load, (void (*)PARAMS ((char *, int))) tcomplain);
- de_fault (to_lookup_symbol, (int (*)PARAMS ((char *, CORE_ADDR *))) nosymbol);
- de_fault (to_create_inferior, maybe_kill_then_create_inferior);
- de_fault (to_post_startup_inferior, (void (*)PARAMS ((int))) target_ignore);
- de_fault (to_acknowledge_created_inferior, (void (*)PARAMS ((int))) target_ignore);
- de_fault (to_clone_and_follow_inferior, default_clone_and_follow_inferior);
- de_fault (to_post_follow_inferior_by_clone, (void (*)PARAMS ((void))) target_ignore);
- de_fault (to_insert_fork_catchpoint, (int (*)PARAMS ((int))) tcomplain);
- de_fault (to_remove_fork_catchpoint, (int (*)PARAMS ((int))) tcomplain);
- de_fault (to_insert_vfork_catchpoint, (int (*)PARAMS ((int))) tcomplain);
- de_fault (to_remove_vfork_catchpoint, (int (*)PARAMS ((int))) tcomplain);
- de_fault (to_has_forked, (int (*)PARAMS ((int, int *))) return_zero);
- de_fault (to_has_vforked, (int (*)PARAMS ((int, int *))) return_zero);
- de_fault (to_can_follow_vfork_prior_to_exec, (int (*)PARAMS ((void))) return_zero);
- de_fault (to_post_follow_vfork, (void (*)PARAMS ((int, int, int, int))) target_ignore);
- de_fault (to_insert_exec_catchpoint, (int (*)PARAMS ((int))) tcomplain);
- de_fault (to_remove_exec_catchpoint, (int (*)PARAMS ((int))) tcomplain);
- de_fault (to_has_execd, (int (*)PARAMS ((int, char **))) return_zero);
- de_fault (to_reported_exec_events_per_exec_call, (int (*)PARAMS ((void))) return_one);
- de_fault (to_has_syscall_event, (int (*)PARAMS ((int, enum target_waitkind *, int *))) return_zero);
- de_fault (to_has_exited, (int (*)PARAMS ((int, int, int *))) return_zero);
- de_fault (to_mourn_inferior, (void (*)PARAMS ((void))) noprocess);
- de_fault (to_can_run, return_zero);
- de_fault (to_notice_signals, (void (*)PARAMS ((int))) target_ignore);
- de_fault (to_thread_alive, (int (*)PARAMS ((int))) target_ignore);
- de_fault (to_stop, (void (*)PARAMS ((void))) target_ignore);
- de_fault (to_query, (int (*)PARAMS ((int /*char */ , char *, char *, int *))) target_ignore);
- de_fault (to_rcmd, (void (*) (char *, struct gdb_file *)) tcomplain);
- de_fault (to_enable_exception_callback, (struct symtab_and_line * (*)PARAMS ((enum exception_event_kind, int))) nosupport_runtime);
- de_fault (to_get_current_exception_event, (struct exception_event_record * (*)PARAMS ((void))) nosupport_runtime);
-
- de_fault (to_pid_to_exec_file, (char *(*)PARAMS ((int))) return_zero);
- de_fault (to_core_file_to_sym_file, (char *(*)PARAMS ((char *))) return_zero);
+ if (!t->field) \
+ t->field = value
+
+ de_fault (to_open,
+ (void (*) (char *, int))
+ tcomplain);
+ de_fault (to_close,
+ (void (*) (int))
+ target_ignore);
+ de_fault (to_attach,
+ maybe_kill_then_attach);
+ de_fault (to_post_attach,
+ (void (*) (int))
+ target_ignore);
+ de_fault (to_require_attach,
+ maybe_kill_then_attach);
+ de_fault (to_detach,
+ (void (*) (char *, int))
+ target_ignore);
+ de_fault (to_require_detach,
+ (void (*) (int, char *, int))
+ target_ignore);
+ de_fault (to_resume,
+ (void (*) (int, int, enum target_signal))
+ noprocess);
+ de_fault (to_wait,
+ (int (*) (int, struct target_waitstatus *))
+ noprocess);
+ de_fault (to_post_wait,
+ (void (*) (int, int))
+ target_ignore);
+ de_fault (to_fetch_registers,
+ (void (*) (int))
+ target_ignore);
+ de_fault (to_store_registers,
+ (void (*) (int))
+ noprocess);
+ de_fault (to_prepare_to_store,
+ (void (*) (void))
+ noprocess);
+ de_fault (to_xfer_memory,
+ (int (*) (CORE_ADDR, char *, int, int, struct target_ops *))
+ nomemory);
+ de_fault (to_files_info,
+ (void (*) (struct target_ops *))
+ target_ignore);
+ de_fault (to_insert_breakpoint,
+ memory_insert_breakpoint);
+ de_fault (to_remove_breakpoint,
+ memory_remove_breakpoint);
+ de_fault (to_terminal_init,
+ (void (*) (void))
+ target_ignore);
+ de_fault (to_terminal_inferior,
+ (void (*) (void))
+ target_ignore);
+ de_fault (to_terminal_ours_for_output,
+ (void (*) (void))
+ target_ignore);
+ de_fault (to_terminal_ours,
+ (void (*) (void))
+ target_ignore);
+ de_fault (to_terminal_info,
+ default_terminal_info);
+ de_fault (to_kill,
+ (void (*) (void))
+ noprocess);
+ de_fault (to_load,
+ (void (*) (char *, int))
+ tcomplain);
+ de_fault (to_lookup_symbol,
+ (int (*) (char *, CORE_ADDR *))
+ nosymbol);
+ de_fault (to_create_inferior,
+ maybe_kill_then_create_inferior);
+ de_fault (to_post_startup_inferior,
+ (void (*) (int))
+ target_ignore);
+ de_fault (to_acknowledge_created_inferior,
+ (void (*) (int))
+ target_ignore);
+ de_fault (to_clone_and_follow_inferior,
+ default_clone_and_follow_inferior);
+ de_fault (to_post_follow_inferior_by_clone,
+ (void (*) (void))
+ target_ignore);
+ de_fault (to_insert_fork_catchpoint,
+ (int (*) (int))
+ tcomplain);
+ de_fault (to_remove_fork_catchpoint,
+ (int (*) (int))
+ tcomplain);
+ de_fault (to_insert_vfork_catchpoint,
+ (int (*) (int))
+ tcomplain);
+ de_fault (to_remove_vfork_catchpoint,
+ (int (*) (int))
+ tcomplain);
+ de_fault (to_has_forked,
+ (int (*) (int, int *))
+ return_zero);
+ de_fault (to_has_vforked,
+ (int (*) (int, int *))
+ return_zero);
+ de_fault (to_can_follow_vfork_prior_to_exec,
+ (int (*) (void))
+ return_zero);
+ de_fault (to_post_follow_vfork,
+ (void (*) (int, int, int, int))
+ target_ignore);
+ de_fault (to_insert_exec_catchpoint,
+ (int (*) (int))
+ tcomplain);
+ de_fault (to_remove_exec_catchpoint,
+ (int (*) (int))
+ tcomplain);
+ de_fault (to_has_execd,
+ (int (*) (int, char **))
+ return_zero);
+ de_fault (to_reported_exec_events_per_exec_call,
+ (int (*) (void))
+ return_one);
+ de_fault (to_has_syscall_event,
+ (int (*) (int, enum target_waitkind *, int *))
+ return_zero);
+ de_fault (to_has_exited,
+ (int (*) (int, int, int *))
+ return_zero);
+ de_fault (to_mourn_inferior,
+ (void (*) (void))
+ noprocess);
+ de_fault (to_can_run,
+ return_zero);
+ de_fault (to_notice_signals,
+ (void (*) (int))
+ target_ignore);
+ de_fault (to_thread_alive,
+ (int (*) (int))
+ return_zero);
+ de_fault (to_find_new_threads,
+ (void (*) (void))
+ target_ignore);
+ de_fault (to_extra_thread_info,
+ (char *(*) (struct thread_info *))
+ return_zero);
+ de_fault (to_stop,
+ (void (*) (void))
+ target_ignore);
+ de_fault (to_query,
+ (int (*) (int, char *, char *, int *))
+ return_zero);
+ de_fault (to_rcmd,
+ (void (*) (char *, struct ui_file *))
+ tcomplain);
+ de_fault (to_enable_exception_callback,
+ (struct symtab_and_line * (*) (enum exception_event_kind, int))
+ nosupport_runtime);
+ de_fault (to_get_current_exception_event,
+ (struct exception_event_record * (*) (void))
+ nosupport_runtime);
+ de_fault (to_pid_to_exec_file,
+ (char *(*) (int))
+ return_zero);
+ de_fault (to_core_file_to_sym_file,
+ (char *(*) (char *))
+ return_zero);
+ de_fault (to_can_async_p,
+ (int (*) (void))
+ return_zero);
+ de_fault (to_is_async_p,
+ (int (*) (void))
+ return_zero);
+ de_fault (to_async,
+ (void (*) (void (*) (enum inferior_event_type, void*), void*))
+ tcomplain);
#undef de_fault
}
INHERIT (to_notice_signals, t);
INHERIT (to_thread_alive, t);
INHERIT (to_find_new_threads, t);
+ INHERIT (to_pid_to_str, t);
+ INHERIT (to_extra_thread_info, t);
INHERIT (to_stop, t);
INHERIT (to_query, t);
INHERIT (to_rcmd, t);
INHERIT (to_has_registers, t);
INHERIT (to_has_execution, t);
INHERIT (to_has_thread_control, t);
- INHERIT (to_has_async_exec, t);
INHERIT (to_sections, t);
INHERIT (to_sections_end, t);
+ INHERIT (to_can_async_p, t);
+ INHERIT (to_is_async_p, t);
+ INHERIT (to_async, t);
+ INHERIT (to_async_mask_value, t);
INHERIT (to_magic, t);
#undef INHERIT
return target_xfer_memory (memaddr, myaddr, len, 0, bfd_section);
}
-/* Read LEN bytes of target memory at address MEMADDR, placing the results
- in GDB's memory at MYADDR. Returns a count of the bytes actually read,
- and optionally an errno value in the location pointed to by ERRNOPTR
- if ERRNOPTR is non-null. */
-
-int
-target_read_memory_partial (memaddr, myaddr, len, errnoptr)
- CORE_ADDR memaddr;
- char *myaddr;
- int len;
- int *errnoptr;
-{
- int nread; /* Number of bytes actually read. */
- int errcode; /* Error from last read. */
-
- /* First try a complete read. */
- errcode = target_xfer_memory (memaddr, myaddr, len, 0, NULL);
- if (errcode == 0)
- {
- /* Got it all. */
- nread = len;
- }
- else
- {
- /* Loop, reading one byte at a time until we get as much as we can. */
- for (errcode = 0, nread = 0; len > 0 && errcode == 0; nread++, len--)
- {
- errcode = target_xfer_memory (memaddr++, myaddr++, 1, 0, NULL);
- }
- /* If an error, the last read was unsuccessful, so adjust count. */
- if (errcode != 0)
- {
- nread--;
- }
- }
- if (errnoptr != NULL)
- {
- *errnoptr = errcode;
- }
- return (nread);
-}
-
int
target_write_memory (memaddr, myaddr, len)
CORE_ADDR memaddr;
}
+/* Perform a partial memory transfer. */
+
+static int
+target_xfer_memory_partial (CORE_ADDR memaddr, char *buf, int len,
+ int write_p, int *err)
+{
+ int res;
+ int err_res;
+ int len_res;
+ struct target_ops *t;
+ struct target_stack_item *item;
+
+ /* Zero length requests are ok and require no work. */
+ if (len == 0)
+ {
+ *err = 0;
+ return 0;
+ }
+
+ /* The quick case is that the top target does it all. */
+ res = current_target.to_xfer_memory (memaddr, buf, len, write_p, ¤t_target);
+ if (res > 0)
+ {
+ *err = 0;
+ return res;
+ }
+
+ /* xfer memory doesn't always reliably set errno. */
+ errno = 0;
+
+ /* Try all levels of the target stack to see one can handle it. */
+ for (item = target_stack; item; item = item->next)
+ {
+ t = item->target_ops;
+ if (!t->to_has_memory)
+ continue;
+ res = t->to_xfer_memory (memaddr, buf, len, write_p, t);
+ if (res > 0)
+ {
+ /* Handled all or part of xfer */
+ *err = 0;
+ return res;
+ }
+ if (t->to_has_all_memory)
+ break;
+ }
+
+ /* Total failure. Return error. */
+ if (errno != 0)
+ {
+ *err = errno;
+ return -1;
+ }
+ *err = EIO;
+ return -1;
+}
+
+int
+target_read_memory_partial (CORE_ADDR memaddr, char *buf, int len, int *err)
+{
+ return target_xfer_memory_partial (memaddr, buf, len, 0, err);
+}
+
+int
+target_write_memory_partial (CORE_ADDR memaddr, char *buf, int len, int *err)
+{
+ return target_xfer_memory_partial (memaddr, buf, len, 1, err);
+}
+
/* ARGSUSED */
static void
target_info (args, from_tty)
error ("Unable to link to %s and get relocation in rombug", modname);
}
else
- *t_reloc = (CORE_ADDR) - 1;
+ *t_reloc = (CORE_ADDR) -1;
+}
+
+int
+target_async_mask (int mask)
+{
+ int saved_async_masked_status = target_async_mask_value;
+ target_async_mask_value = mask;
+ return saved_async_masked_status;
}
/* Look through the list of possible targets for a target that can
return 1;
}
+/*
+ * Resize the to_sections pointer. Also make sure that anyone that
+ * was holding on to an old value of it gets updated.
+ * Returns the old size.
+ */
+
+int
+target_resize_to_sections (struct target_ops *target, int num_added)
+{
+ struct target_ops **t;
+ struct section_table *old_value;
+ int old_count;
+
+ old_value = target->to_sections;
+
+ if (target->to_sections)
+ {
+ old_count = target->to_sections_end - target->to_sections;
+ target->to_sections = (struct section_table *)
+ xrealloc ((char *) target->to_sections,
+ (sizeof (struct section_table)) * (num_added + old_count));
+ }
+ else
+ {
+ old_count = 0;
+ target->to_sections = (struct section_table *)
+ xmalloc ((sizeof (struct section_table)) * num_added);
+ }
+ target->to_sections_end = target->to_sections + (num_added + old_count);
+
+ /* Check to see if anyone else was pointing to this structure.
+ If old_value was null, then no one was. */
+
+ if (old_value)
+ {
+ for (t = target_structs; t < target_structs + target_struct_size;
+ ++t)
+ {
+ if ((*t)->to_sections == old_value)
+ {
+ (*t)->to_sections = target->to_sections;
+ (*t)->to_sections_end = target->to_sections_end;
+ }
+ }
+ }
+
+ return old_count;
+
+}
+
/* Find a single runnable target in the stack and return it. If for
some reason there is more than one, return NULL. */
return (count == 1 ? runable : NULL);
}
+/* Find a single core_stratum target in the list of targets and return it.
+ If for some reason there is more than one, return NULL. */
+
struct target_ops *
find_core_target ()
{
return (count == 1 ? runable : NULL);
}
+
+/*
+ * Find the next target down the stack from the specified target.
+ */
+
+struct target_ops *
+find_target_beneath (t)
+ struct target_ops *t;
+{
+ struct target_stack_item *cur;
+
+ for (cur = target_stack; cur; cur = cur->next)
+ if (cur->target_ops == t)
+ break;
+
+ if (cur == NULL || cur->next == NULL)
+ return NULL;
+ else
+ return cur->next->target_ops;
+}
+
\f
/* The inferior process has died. Long live the inferior! */
return TARGET_SIGNAL_UNKNOWN;
}
-int
-target_signal_to_host (oursig)
- enum target_signal oursig;
+/* Convert a OURSIG (an enum target_signal) to the form used by the
+ target operating system (refered to as the ``host'') or zero if the
+ equivalent host signal is not available. Set/clear OURSIG_OK
+ accordingly. */
+
+static int
+do_target_signal_to_host (enum target_signal oursig,
+ int *oursig_ok)
{
+ *oursig_ok = 1;
switch (oursig)
{
case TARGET_SIGNAL_0:
return retsig;
}
#endif
+ *oursig_ok = 0;
+ return 0;
+ }
+}
+
+int
+target_signal_to_host_p (enum target_signal oursig)
+{
+ int oursig_ok;
+ do_target_signal_to_host (oursig, &oursig_ok);
+ return oursig_ok;
+}
+
+int
+target_signal_to_host (enum target_signal oursig)
+{
+ int oursig_ok;
+ int targ_signo = do_target_signal_to_host (oursig, &oursig_ok);
+ if (!oursig_ok)
+ {
/* The user might be trying to do "signal SIGSAK" where this system
doesn't have SIGSAK. */
warning ("Signal %s does not exist on this system.\n",
target_signal_to_name (oursig));
return 0;
}
+ else
+ return targ_signo;
}
/* Helper function for child_wait and the Lynx derivatives of child_wait.
dummy_target.to_require_detach = find_default_require_detach;
dummy_target.to_create_inferior = find_default_create_inferior;
dummy_target.to_clone_and_follow_inferior = find_default_clone_and_follow_inferior;
+ dummy_target.to_pid_to_str = normal_pid_to_str;
dummy_target.to_stratum = dummy_stratum;
dummy_target.to_magic = OPS_MAGIC;
}
return retval;
}
+static void
+debug_to_find_new_threads ()
+{
+ debug_target.to_find_new_threads ();
+
+ fputs_unfiltered ("target_find_new_threads ()\n", gdb_stdlog);
+}
+
static void
debug_to_stop ()
{
static void
debug_to_rcmd (char *command,
- struct gdb_file *outbuf)
+ struct ui_file *outbuf)
{
debug_target.to_rcmd (command, outbuf);
fprintf_unfiltered (gdb_stdlog, "target_rcmd (%s, ...)\n", command);
current_target.to_can_run = debug_to_can_run;
current_target.to_notice_signals = debug_to_notice_signals;
current_target.to_thread_alive = debug_to_thread_alive;
+ current_target.to_find_new_threads = debug_to_find_new_threads;
current_target.to_stop = debug_to_stop;
current_target.to_query = debug_to_query;
current_target.to_rcmd = debug_to_rcmd;