mirror of
https://sourceware.org/git/binutils-gdb.git
synced 2024-11-27 03:51:15 +08:00
import gdb-1999-07-26 snapshot
This commit is contained in:
Jason Molenda
parent
7fd9c19135
commit
5a2468f5c5
@ -1,3 +1,28 @@
|
||||
Mon Jul 26 17:13:39 1999 Andrew Cagney <cagney@b1.cygnus.com>
|
||||
|
||||
* remote.c (enum packet_support, enum packet_detect, struct
|
||||
packet_config): Define.
|
||||
(set_packet_config_cmd, show_packet_config_cmd,
|
||||
add_packet_config_cmd, init_packet_config): New functions.
|
||||
Generic support for optional packets.
|
||||
(remote_protocol_P): Replace stub_supports_P.
|
||||
(set_remote_protocol_P_packet_cmd, show_remote_protocol_P_packet_cmd):
|
||||
New functions.
|
||||
(_initialize_remote): Add ``set remote-protocol-P-packet'' command.
|
||||
(remote_open_1, remote_async_open_1, remote_cisco_open):
|
||||
Initialize ``remote_protocol_P''.
|
||||
(remote_store_registers): Re-write ``P'' probe logic.
|
||||
(store_register_using_P): New function.
|
||||
|
||||
From Ian Lance Taylor <ian@airs.com>:
|
||||
(remote_prepare_to_store): Only read registers when ``P'' packet
|
||||
is in state unsupported or support-unknown.
|
||||
|
||||
1999-07-24 Fred Fish <fnf@cygnus.com>
|
||||
|
||||
* symfile.c (default_symfile_offsets): Clear section_offsets
|
||||
before filling it in.
|
||||
|
||||
1999-07-16 Keith Seitz <keiths@cygnus.com>
|
||||
|
||||
* remote.c (_initialize_remote): "remotebreak" should be a var_boolean.
|
||||
|
||||
@ -224,7 +224,7 @@ CDEPS = $(XM_CDEPS) $(TM_CDEPS) $(NAT_CDEPS) $(SIM) $(BFD) $(READLINE) \
|
||||
ADD_FILES = $(REGEX) $(XM_ADD_FILES) $(TM_ADD_FILES) $(NAT_ADD_FILES)
|
||||
ADD_DEPS = $(REGEX1) $(XM_ADD_FILES) $(TM_ADD_FILES) $(NAT_ADD_FILES)
|
||||
|
||||
VERSION = 19990719
|
||||
VERSION = 19990726
|
||||
DIST=gdb
|
||||
|
||||
LINT=/usr/5bin/lint
|
||||
|
||||
319
gdb/remote.c
319
gdb/remote.c
@ -375,6 +375,35 @@ void remote_console_output PARAMS ((char *));
|
||||
|
||||
static void check_binary_download PARAMS ((CORE_ADDR addr));
|
||||
|
||||
#if __STDC__
|
||||
struct packet_config;
|
||||
#endif
|
||||
|
||||
static void show_packet_config_cmd PARAMS ((struct packet_config * config));
|
||||
|
||||
static void set_packet_config_cmd PARAMS ((struct packet_config * config,
|
||||
struct cmd_list_element * c));
|
||||
|
||||
static void add_packet_config_cmd PARAMS ((struct packet_config * config,
|
||||
char *name,
|
||||
char *title,
|
||||
void (*set_func) (char *args, int from_tty, struct cmd_list_element * c),
|
||||
void (*show_func) (char *name, int from_tty),
|
||||
struct cmd_list_element **setlist,
|
||||
struct cmd_list_element **showlist));
|
||||
|
||||
static void init_packet_config PARAMS ((struct packet_config * config));
|
||||
|
||||
static void set_remote_protocol_P_packet_cmd PARAMS ((char *args,
|
||||
int from_tty,
|
||||
struct cmd_list_element * c));
|
||||
|
||||
static void show_remote_protocol_P_packet_cmd PARAMS ((char *args,
|
||||
int from_tty));
|
||||
|
||||
|
||||
|
||||
|
||||
/* Define the target subroutine names */
|
||||
|
||||
void open_remote_target PARAMS ((char *, int, struct target_ops *, int));
|
||||
@ -471,9 +500,163 @@ static int remote_address_size;
|
||||
|
||||
static int remote_register_buf_size = 0;
|
||||
|
||||
/* Should we try the 'P' request? If this is set to one when the stub
|
||||
doesn't support 'P', the only consequence is some unnecessary traffic. */
|
||||
static int stub_supports_P = 1;
|
||||
/* Generic configuration support for packets the stub optionally
|
||||
supports. Allows the user to specify the use of the packet as well
|
||||
as allowing GDB to auto-detect support in the remote stub. */
|
||||
|
||||
enum packet_support
|
||||
{
|
||||
PACKET_SUPPORT_UNKNOWN = 0,
|
||||
PACKET_ENABLE,
|
||||
PACKET_DISABLE
|
||||
};
|
||||
|
||||
enum packet_detect
|
||||
{
|
||||
PACKET_AUTO_DETECT = 0,
|
||||
PACKET_MANUAL_DETECT
|
||||
};
|
||||
|
||||
struct packet_config
|
||||
{
|
||||
char *state;
|
||||
char *name;
|
||||
char *title;
|
||||
enum packet_detect detect;
|
||||
enum packet_support support;
|
||||
};
|
||||
|
||||
static char packet_support_auto[] = "auto";
|
||||
static char packet_enable[] = "enable";
|
||||
static char packet_disable[] = "disable";
|
||||
static char *packet_support_enums[] =
|
||||
{
|
||||
packet_support_auto,
|
||||
packet_enable,
|
||||
packet_disable,
|
||||
0,
|
||||
};
|
||||
|
||||
static void
|
||||
set_packet_config_cmd (config, c)
|
||||
struct packet_config *config;
|
||||
struct cmd_list_element *c;
|
||||
{
|
||||
if (config->state == packet_enable)
|
||||
{
|
||||
config->detect = PACKET_MANUAL_DETECT;
|
||||
config->support = PACKET_ENABLE;
|
||||
}
|
||||
else if (config->state == packet_disable)
|
||||
{
|
||||
config->detect = PACKET_MANUAL_DETECT;
|
||||
config->support = PACKET_DISABLE;
|
||||
}
|
||||
else if (config->state == packet_support_auto)
|
||||
{
|
||||
config->detect = PACKET_AUTO_DETECT;
|
||||
config->support = PACKET_SUPPORT_UNKNOWN;
|
||||
}
|
||||
else
|
||||
fatal ("Bad enum value");
|
||||
}
|
||||
|
||||
static void
|
||||
show_packet_config_cmd (config)
|
||||
struct packet_config *config;
|
||||
{
|
||||
char *support = "internal-error";
|
||||
switch (config->support)
|
||||
{
|
||||
case PACKET_ENABLE:
|
||||
support = "enabled";
|
||||
break;
|
||||
case PACKET_DISABLE:
|
||||
support = "disabled";
|
||||
break;
|
||||
case PACKET_SUPPORT_UNKNOWN:
|
||||
support = "unknown";
|
||||
break;
|
||||
}
|
||||
switch (config->detect)
|
||||
{
|
||||
case PACKET_AUTO_DETECT:
|
||||
printf_filtered ("Support for remote protocol `%s' (%s) packet is auto-detected, currently %s.\n",
|
||||
config->name, config->title, support);
|
||||
break;
|
||||
case PACKET_MANUAL_DETECT:
|
||||
printf_filtered ("Support for remote protocol `%s' (%s) is currently %s.\n",
|
||||
config->name, config->title, support);
|
||||
}
|
||||
}
|
||||
|
||||
static void
|
||||
add_packet_config_cmd (config, name, title, set_func, show_func,
|
||||
setlist, showlist)
|
||||
struct packet_config *config;
|
||||
char *name;
|
||||
char *title;
|
||||
void (*set_func) PARAMS ((char *args, int from_tty,
|
||||
struct cmd_list_element * c));
|
||||
void (*show_func) PARAMS ((char *name, int from_tty));
|
||||
struct cmd_list_element **setlist;
|
||||
struct cmd_list_element **showlist;
|
||||
{
|
||||
struct cmd_list_element *c;
|
||||
char *set_doc;
|
||||
char *show_doc;
|
||||
char *full_name;
|
||||
config->name = name;
|
||||
config->title = title;
|
||||
asprintf (&set_doc, "Set use of remote protocol `%s' (%s) packet",
|
||||
name, title);
|
||||
asprintf (&show_doc, "Show current use of remote protocol `%s' (%s) packet",
|
||||
name, title);
|
||||
asprintf (&full_name, "%s-packet", name);
|
||||
c = add_set_enum_cmd (full_name,
|
||||
class_obscure, packet_support_enums,
|
||||
(char *) &config->state,
|
||||
set_doc, setlist);
|
||||
c->function.sfunc = set_func;
|
||||
add_cmd (full_name, class_obscure, show_func, show_doc, showlist);
|
||||
}
|
||||
|
||||
static void
|
||||
init_packet_config (config)
|
||||
struct packet_config *config;
|
||||
{
|
||||
switch (config->detect)
|
||||
{
|
||||
case PACKET_AUTO_DETECT:
|
||||
config->support = PACKET_SUPPORT_UNKNOWN;
|
||||
break;
|
||||
case PACKET_MANUAL_DETECT:
|
||||
/* let the user beware */
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
/* Should we try the 'P' (set register) request? */
|
||||
|
||||
static struct packet_config remote_protocol_P;
|
||||
|
||||
static void
|
||||
set_remote_protocol_P_packet_cmd (args, from_tty, c)
|
||||
char *args;
|
||||
int from_tty;
|
||||
struct cmd_list_element *c;
|
||||
{
|
||||
set_packet_config_cmd (&remote_protocol_P, c);
|
||||
}
|
||||
|
||||
static void
|
||||
show_remote_protocol_P_packet_cmd (args, from_tty)
|
||||
char *args;
|
||||
int from_tty;
|
||||
{
|
||||
show_packet_config_cmd (&remote_protocol_P);
|
||||
}
|
||||
|
||||
|
||||
/* Tokens for use by the asynchronous signal handlers for SIGINT */
|
||||
PTR sigint_remote_twice_token;
|
||||
@ -1718,11 +1901,7 @@ serial device is attached to the remote system (e.g. /dev/ttya).");
|
||||
}
|
||||
push_target (target); /* Switch to using remote target now */
|
||||
|
||||
/* Start out by trying the 'P' request to set registers. We set
|
||||
this each time that we open a new target so that if the user
|
||||
switches from one stub to another, we can (if the target is
|
||||
closed and reopened) cope. */
|
||||
stub_supports_P = 1;
|
||||
init_packet_config (&remote_protocol_P);
|
||||
|
||||
general_thread = -2;
|
||||
continue_thread = -2;
|
||||
@ -1812,11 +1991,7 @@ serial device is attached to the remote system (e.g. /dev/ttya).");
|
||||
|
||||
push_target (target); /* Switch to using remote target now */
|
||||
|
||||
/* Start out by trying the 'P' request to set registers. We set
|
||||
this each time that we open a new target so that if the user
|
||||
switches from one stub to another, we can (if the target is
|
||||
closed and reopened) cope. */
|
||||
stub_supports_P = 1;
|
||||
init_packet_config (&remote_protocol_P);
|
||||
|
||||
general_thread = -2;
|
||||
continue_thread = -2;
|
||||
@ -2735,9 +2910,45 @@ static void
|
||||
remote_prepare_to_store ()
|
||||
{
|
||||
/* Make sure the entire registers array is valid. */
|
||||
read_register_bytes (0, (char *) NULL, REGISTER_BYTES);
|
||||
switch (remote_protocol_P.support)
|
||||
{
|
||||
case PACKET_DISABLE:
|
||||
case PACKET_SUPPORT_UNKNOWN:
|
||||
read_register_bytes (0, (char *) NULL, REGISTER_BYTES);
|
||||
break;
|
||||
case PACKET_ENABLE:
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
/* Helper: Attempt to store REGNO using the P packet. Return fail IFF
|
||||
packet was not recognized. */
|
||||
|
||||
static int
|
||||
store_register_using_P (regno)
|
||||
int regno;
|
||||
{
|
||||
/* Try storing a single register. */
|
||||
char *buf = alloca (PBUFSIZ);
|
||||
char *regp;
|
||||
char *p;
|
||||
int i;
|
||||
|
||||
sprintf (buf, "P%x=", regno);
|
||||
p = buf + strlen (buf);
|
||||
regp = ®isters[REGISTER_BYTE (regno)];
|
||||
for (i = 0; i < REGISTER_RAW_SIZE (regno); ++i)
|
||||
{
|
||||
*p++ = tohex ((regp[i] >> 4) & 0xf);
|
||||
*p++ = tohex (regp[i] & 0xf);
|
||||
}
|
||||
*p = '\0';
|
||||
remote_send (buf);
|
||||
|
||||
return buf[0] != '\0';
|
||||
}
|
||||
|
||||
|
||||
/* Store register REGNO, or all registers if REGNO == -1, from the contents
|
||||
of REGISTERS. FIXME: ignores errors. */
|
||||
|
||||
@ -2751,31 +2962,33 @@ remote_store_registers (regno)
|
||||
|
||||
set_thread (inferior_pid, 1);
|
||||
|
||||
if (regno >= 0 && stub_supports_P)
|
||||
if (regno >= 0)
|
||||
{
|
||||
/* Try storing a single register. */
|
||||
char *regp;
|
||||
|
||||
sprintf (buf, "P%x=", regno);
|
||||
p = buf + strlen (buf);
|
||||
regp = ®isters[REGISTER_BYTE (regno)];
|
||||
for (i = 0; i < REGISTER_RAW_SIZE (regno); ++i)
|
||||
switch (remote_protocol_P.support)
|
||||
{
|
||||
*p++ = tohex ((regp[i] >> 4) & 0xf);
|
||||
*p++ = tohex (regp[i] & 0xf);
|
||||
case PACKET_DISABLE:
|
||||
break;
|
||||
case PACKET_ENABLE:
|
||||
if (store_register_using_P (regno))
|
||||
return;
|
||||
else
|
||||
error ("Protocol error: P packet not recognized by stub");
|
||||
case PACKET_SUPPORT_UNKNOWN:
|
||||
if (store_register_using_P (regno))
|
||||
{
|
||||
/* The stub recognized the 'P' packet. Remember this. */
|
||||
remote_protocol_P.support = PACKET_ENABLE;
|
||||
return;
|
||||
}
|
||||
else
|
||||
{
|
||||
/* The stub does not support the 'P' packet. Use 'G'
|
||||
instead, and don't try using 'P' in the future (it
|
||||
will just waste our time). */
|
||||
remote_protocol_P.support = PACKET_DISABLE;
|
||||
break;
|
||||
}
|
||||
}
|
||||
*p = '\0';
|
||||
remote_send (buf);
|
||||
if (buf[0] != '\0')
|
||||
{
|
||||
/* The stub understands the 'P' request. We are done. */
|
||||
return;
|
||||
}
|
||||
|
||||
/* The stub does not support the 'P' request. Use 'G' instead,
|
||||
and don't try using 'P' in the future (it will just waste our
|
||||
time). */
|
||||
stub_supports_P = 0;
|
||||
}
|
||||
|
||||
buf[0] = 'G';
|
||||
@ -4409,10 +4622,7 @@ device is attached to the remote system (e.g. host:port).");
|
||||
|
||||
push_target (&remote_cisco_ops); /* Switch to using cisco target now */
|
||||
|
||||
/* Start out by trying the 'P' request to set registers. We set this each
|
||||
time that we open a new target so that if the user switches from one
|
||||
stub to another, we can (if the target is closed and reopened) cope. */
|
||||
stub_supports_P = 1;
|
||||
init_packet_config (&remote_protocol_P);
|
||||
|
||||
general_thread = -2;
|
||||
continue_thread = -2;
|
||||
@ -4772,6 +4982,15 @@ Specify the serial device it is connected to (e.g. /dev/ttya).",
|
||||
extended_async_remote_ops.to_mourn_inferior = extended_remote_mourn;
|
||||
}
|
||||
|
||||
static void
|
||||
set_remote_cmd (args, from_tty)
|
||||
char *args;
|
||||
int from_tty;
|
||||
{
|
||||
|
||||
}
|
||||
|
||||
|
||||
static void
|
||||
build_remote_gdbarch_data ()
|
||||
{
|
||||
@ -4781,6 +5000,9 @@ build_remote_gdbarch_data ()
|
||||
void
|
||||
_initialize_remote ()
|
||||
{
|
||||
static struct cmd_list_element *remote_set_cmdlist;
|
||||
static struct cmd_list_element *remote_show_cmdlist;
|
||||
|
||||
/* architecture specific data */
|
||||
build_remote_gdbarch_data ();
|
||||
register_gdbarch_swap (&tty_input, sizeof (&tty_input), NULL);
|
||||
@ -4809,6 +5031,19 @@ _initialize_remote ()
|
||||
init_remote_threadtests ();
|
||||
#endif
|
||||
|
||||
add_prefix_cmd ("remote", class_maintenance, set_remote_cmd, "\
|
||||
Remote protocol specific variables\n\
|
||||
Configure various remote-protocol specific variables such as\n\
|
||||
the packets being used",
|
||||
&remote_set_cmdlist, "remote ",
|
||||
0/*allow-unknown*/, &setlist);
|
||||
add_prefix_cmd ("remote", class_maintenance, set_remote_cmd, "\
|
||||
Remote protocol specific variables\n\
|
||||
Configure various remote-protocol specific variables such as\n\
|
||||
the packets being used",
|
||||
&remote_show_cmdlist, "remote ",
|
||||
0/*allow-unknown*/, &showlist);
|
||||
|
||||
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).",
|
||||
@ -4862,4 +5097,8 @@ in a memory packet.\n",
|
||||
add_info ("remote-process", remote_info_process,
|
||||
"Query the remote system for process info.");
|
||||
|
||||
add_packet_config_cmd (&remote_protocol_P, "P", "set-register",
|
||||
set_remote_protocol_P_packet_cmd,
|
||||
show_remote_protocol_P_packet_cmd,
|
||||
&remote_set_cmdlist, &remote_show_cmdlist);
|
||||
}
|
||||
|
||||
@ -471,6 +471,7 @@ default_symfile_offsets (objfile, addr)
|
||||
objfile->num_sections = SECT_OFF_MAX;
|
||||
section_offsets = (struct section_offsets *)
|
||||
obstack_alloc (&objfile->psymbol_obstack, SIZEOF_SECTION_OFFSETS);
|
||||
memset (section_offsets, 0, SIZEOF_SECTION_OFFSETS);
|
||||
|
||||
for (i = 0; i < SECT_OFF_MAX; i++)
|
||||
ANOFFSET (section_offsets, i) = addr;
|
||||
|
||||
@ -1,3 +1,8 @@
|
||||
1999-07-19 Stan Shebs <shebs@andros.cygnus.com>
|
||||
|
||||
* gdb.base/foll-exec.exp, gdb.base/foll-fork.exp,
|
||||
gdb.base/foll-vfork.exp: Don't run for crosses.
|
||||
|
||||
Tue Jul 13 23:37:18 1999 Andrew Cagney <cagney@b1.cygnus.com>
|
||||
|
||||
* gdb.base/configure.in: Check for gdbvars.exp instead of
|
||||
|
||||
@ -21,6 +21,10 @@ if $tracelevel then {
|
||||
strace $tracelevel
|
||||
}
|
||||
|
||||
if { ![isnative] } then {
|
||||
continue
|
||||
}
|
||||
|
||||
set prms_id 0
|
||||
set bug_id 0
|
||||
|
||||
|
||||
@ -21,6 +21,10 @@ if $tracelevel then {
|
||||
strace $tracelevel
|
||||
}
|
||||
|
||||
if { ![isnative] } then {
|
||||
continue
|
||||
}
|
||||
|
||||
set prms_id 0
|
||||
set bug_id 0
|
||||
|
||||
|
||||
@ -21,14 +21,18 @@ if $tracelevel then {
|
||||
strace $tracelevel
|
||||
}
|
||||
|
||||
if [istarget "hppa2.0w-hp-hpux*"] {
|
||||
warning "Don't run gdb.base/foll-vfork.exp until JAGaa43495 kernel problem is fixed."
|
||||
return 0
|
||||
if { ![isnative] } then {
|
||||
continue
|
||||
}
|
||||
|
||||
set prms_id 0
|
||||
set bug_id 0
|
||||
|
||||
if [istarget "hppa2.0w-hp-hpux*"] {
|
||||
warning "Don't run gdb.base/foll-vfork.exp until JAGaa43495 kernel problem is fixed."
|
||||
return 0
|
||||
}
|
||||
|
||||
set testfile "foll-vfork"
|
||||
set testfile2 "vforked-prog"
|
||||
set srcfile ${testfile}.c
|
||||
|
||||
Loading…
Reference in New Issue
Block a user