/* Remote target communications for serial-line targets in custom GDB protocol
- Copyright 1988, 1991, 1992, 1993, 1994, 1995, 1996, 1997 Free Software Foundation, Inc.
+ Copyright 1988, 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998 Free Software Foundation, Inc.
This file is part of GDB.
static int hexnumlen PARAMS ((ULONGEST num));
+static void init_remote_ops PARAMS ((void));
+
+static void init_extended_remote_ops PARAMS ((void));
+
/* exported functions */
extern int fromhex PARAMS ((int a));
extern void getpkt PARAMS ((char *buf, int forever));
extern int putpkt PARAMS ((char *buf));
-/* Define the target subroutine names */
-
static struct target_ops remote_ops ;
-static void init_remote_ops(void)
-{
- remote_ops.to_shortname = "remote";
- remote_ops.to_longname = "Remote serial target in gdb-specific protocol";
- remote_ops.to_doc = "Use a remote computer via a serial line; using a gdb-specific protocol.\n\
-Specify the serial device it is connected to (e.g. /dev/ttya)." ;
- remote_ops.to_open = remote_open;
- remote_ops.to_close = remote_close;
- remote_ops.to_attach = NULL;
- remote_ops.to_detach = remote_detach;
- remote_ops.to_resume = remote_resume;
- remote_ops.to_wait = remote_wait;
- remote_ops.to_fetch_registers = remote_fetch_registers;
- remote_ops.to_store_registers = remote_store_registers;
- remote_ops.to_prepare_to_store = remote_prepare_to_store;
- remote_ops.to_xfer_memory = remote_xfer_memory;
- remote_ops.to_files_info = remote_files_info;
- remote_ops.to_insert_breakpoint = remote_insert_breakpoint;
- remote_ops.to_remove_breakpoint = remote_remove_breakpoint;
- remote_ops.to_terminal_init = NULL;
- remote_ops.to_terminal_inferior = NULL;
- remote_ops.to_terminal_ours_for_output = NULL;
- remote_ops.to_terminal_ours = NULL;
- remote_ops.to_terminal_info = NULL;
- remote_ops.to_kill = remote_kill;
- remote_ops.to_load = generic_load;
- remote_ops.to_lookup_symbol = NULL;
- remote_ops.to_create_inferior = NULL;
- remote_ops.to_mourn_inferior = remote_mourn;
- remote_ops.to_can_run = 0;
- remote_ops.to_notice_signals = 0;
- remote_ops.to_thread_alive = remote_thread_alive;
- remote_ops.to_stop = 0;
- remote_ops.to_stratum = process_stratum;
- remote_ops.DONT_USE = NULL;
- remote_ops.to_has_all_memory = 1;
- remote_ops.to_has_memory = 1;
- remote_ops.to_has_stack = 1;
- remote_ops.to_has_registers = 1;
- remote_ops.to_has_execution = 1;
- remote_ops.to_sections = NULL;
- remote_ops.to_sections_end = NULL;
- remote_ops.to_magic = OPS_MAGIC ;
-} /* init_remote_ops */
-
static struct target_ops extended_remote_ops ;
-static void init_extended_remote_ops(void)
-{
- extended_remote_ops.to_shortname = "extended-remote";
- extended_remote_ops.to_longname = "Extended remote serial target in gdb-specific protocol";
- extended_remote_ops.to_doc = "Use a remote computer via a serial line; using a gdb-specific protocol.\n\
-Specify the serial device it is connected to (e.g. /dev/ttya).",
- extended_remote_ops.to_open = extended_remote_open;
- extended_remote_ops.to_close = remote_close;
- extended_remote_ops.to_attach = NULL;
- extended_remote_ops.to_detach = remote_detach;
- extended_remote_ops.to_resume = remote_resume;
- extended_remote_ops.to_wait = remote_wait;
- extended_remote_ops.to_fetch_registers = remote_fetch_registers;
- extended_remote_ops.to_store_registers = remote_store_registers;
- extended_remote_ops.to_prepare_to_store = remote_prepare_to_store;
- extended_remote_ops.to_xfer_memory = remote_xfer_memory;
- extended_remote_ops.to_files_info = remote_files_info;
- extended_remote_ops.to_insert_breakpoint = remote_insert_breakpoint;
- extended_remote_ops.to_remove_breakpoint = remote_remove_breakpoint;
- extended_remote_ops.to_terminal_init = NULL;
- extended_remote_ops.to_terminal_inferior = NULL;
- extended_remote_ops.to_terminal_ours_for_output = NULL;
- extended_remote_ops.to_terminal_ours = NULL;
- extended_remote_ops.to_terminal_info = NULL;
- extended_remote_ops.to_kill = remote_kill;
- extended_remote_ops.to_load = generic_load;
- extended_remote_ops.to_lookup_symbol = NULL;
- extended_remote_ops.to_create_inferior = extended_remote_create_inferior;
- extended_remote_ops.to_mourn_inferior = extended_remote_mourn;
- extended_remote_ops.to_can_run = 0;
- extended_remote_ops.to_notice_signals = 0;
- extended_remote_ops.to_thread_alive = remote_thread_alive;
- extended_remote_ops.to_stop = 0;
- extended_remote_ops.to_stratum = process_stratum;
- extended_remote_ops.DONT_USE = NULL;
- extended_remote_ops.to_has_all_memory = 1;
- extended_remote_ops.to_has_memory = 1;
- extended_remote_ops.to_has_stack = 1;
- extended_remote_ops.to_has_registers = 1;
- extended_remote_ops.to_has_execution = 1;
- extended_remote_ops.to_sections = NULL;
- extended_remote_ops.to_sections_end = NULL;
- extended_remote_ops.to_magic = OPS_MAGIC ;
-}
-
-
/* This was 5 seconds, which is a long time to sit and wait.
Unless this is going though some terminal server or multiplexer or
other form of hairy serial connection, I would think 2 seconds would
error ("Remote failure reply: %s", buf);
}
+/* Display a null-terminated packet on stdout, for debugging, using C
+ string notation. */
+static void
+print_packet (char *buf)
+{
+ puts_filtered ("\"");
+ while (*buf)
+ gdb_printchar (*buf++, gdb_stdout, '"');
+ puts_filtered ("\"");
+}
+
+
/* Send a packet to the remote machine, with error checking.
The data of the packet is in BUF. */
return crc;
}
-/* compare-sections command
-
- With no arguments, compares each loadable section in the exec bfd
- with the same memory range on the target, and reports mismatches.
- Useful for verifying the image on the target against the exec file.
- Depends on the target understanding the new "qCRC:" request. */
-
static void
-remote_compare_command (args, from_tty)
+compare_sections_command (args, from_tty)
char *args;
int from_tty;
{
bfd_size_type size;
bfd_vma lma;
int matched = 0;
+ int mismatched = 0;
if (!exec_bfd)
error ("command cannot be used without an exec file");
if (host_crc == target_crc)
printf_filtered ("matched.\n");
else
+ {
printf_filtered ("MIS-MATCHED!\n");
+ mismatched++;
+ }
do_cleanups (old_chain);
}
+ if (mismatched > 0)
+ warning ("One or more sections of the remote executable does not match\nthe loaded file\n");
if (args && !matched)
printf_filtered ("No loaded section named '%s'.\n", args);
}
+static void
+packet_command (args, from_tty)
+ char *args;
+ int from_tty;
+
+
+{
+ char buf[PBUFSIZ];
+
+ if (!current_target.to_shortname ||
+ strcmp (current_target.to_shortname, "remote") != 0)
+ error ("command can only be used with remote target");
+
+ if (! args)
+ error ("remote-packet command requires packet text as argument");
+
+ puts_filtered ("sending: ");
+ print_packet (args);
+ puts_filtered ("\n");
+ putpkt (args);
+
+ getpkt (buf, 0);
+ puts_filtered ("received: ");
+ print_packet (buf);
+ puts_filtered ("\n");
+}
+
+static void
+init_remote_ops ()
+{
+ remote_ops.to_shortname = "remote";
+ remote_ops.to_longname = "Remote serial target in gdb-specific protocol";
+ remote_ops.to_doc = "Use a remote computer via a serial line; using a gdb-specific protocol.\n\
+Specify the serial device it is connected to (e.g. /dev/ttya).";
+ remote_ops.to_open = remote_open;
+ remote_ops.to_close = remote_close;
+ remote_ops.to_detach = remote_detach;
+ remote_ops.to_resume = remote_resume;
+ remote_ops.to_wait = remote_wait;
+ remote_ops.to_fetch_registers = remote_fetch_registers;
+ remote_ops.to_store_registers = remote_store_registers;
+ remote_ops.to_prepare_to_store = remote_prepare_to_store;
+ remote_ops.to_xfer_memory = remote_xfer_memory;
+ remote_ops.to_files_info = remote_files_info;
+ remote_ops.to_insert_breakpoint = remote_insert_breakpoint;
+ remote_ops.to_remove_breakpoint = remote_remove_breakpoint;
+ remote_ops.to_kill = remote_kill;
+ remote_ops.to_load = generic_load;
+ remote_ops.to_mourn_inferior = remote_mourn;
+ remote_ops.to_thread_alive = remote_thread_alive;
+ remote_ops.to_stratum = process_stratum;
+ remote_ops.to_has_all_memory = 1;
+ remote_ops.to_has_memory = 1;
+ remote_ops.to_has_stack = 1;
+ remote_ops.to_has_registers = 1;
+ remote_ops.to_has_execution = 1;
+ remote_ops.to_magic = OPS_MAGIC;
+}
+
+static void
+init_extended_remote_ops ()
+{
+ extended_remote_ops = remote_ops;
+
+ extended_remote_ops.to_shortname = "extended-remote";
+ extended_remote_ops.to_longname = "Extended remote serial target in gdb-specific protocol";
+ extended_remote_ops.to_doc = "Use a remote computer via a serial line; using a gdb-specific protocol.\n\
+Specify the serial device it is connected to (e.g. /dev/ttya).",
+ extended_remote_ops.to_open = extended_remote_open;
+ extended_remote_ops.to_create_inferior = extended_remote_create_inferior;
+ extended_remote_ops.to_mourn_inferior = extended_remote_mourn;
+}
+
void
_initialize_remote ()
{
- init_remote_ops() ;
- init_extended_remote_ops() ;
+ init_remote_ops ();
add_target (&remote_ops);
+
+ init_extended_remote_ops ();
add_target (&extended_remote_ops);
- add_cmd ("compare-sections", class_obscure, remote_compare_command,
- "Compare section data on remote target to the exec file.\n\
-Optional argument is a single section name (default: all loadable sections).",
+ add_cmd ("compare-sections", class_obscure, compare_sections_command,
+ "Compare section data on target to the exec file.\n\
+Argument is a single section name (default: all loaded sections).",
&cmdlist);
+ add_cmd ("packet", class_maintenance, packet_command,
+ "Send an arbitrary packet to a remote target.\n\
+ maintenance packet TEXT\n\
+If GDB is talking to an inferior via the GDB serial protocol, then\n\
+this command sends the string TEXT to the inferior, and displays the\n\
+response packet. GDB supplies the initial `$' character, and the\n\
+terminating `#' character and checksum. This command was originally\n\
+provided for use by the gdb.emc test suite.",
+ &maintenancelist);
+
add_show_from_set (add_set_cmd ("remotetimeout", no_class,
var_integer, (char *)&remote_timeout,
"Set timeout value for remote read.\n", &setlist),
"Set the maximum number of bytes in each memory write packet.\n", &setlist),
&showlist);
}
+
+
+
+
+
+
+
+
+
+
+
+
+
projects / deliverable / binutils-gdb.git / blobdiff