diff options
Diffstat (limited to 'gdb/remote-bug.c')
| -rw-r--r-- | gdb/remote-bug.c | 2054 |
1 files changed, 1027 insertions, 1027 deletions
diff --git a/gdb/remote-bug.c b/gdb/remote-bug.c index f74ce97..a6ffb8e 100644 --- a/gdb/remote-bug.c +++ b/gdb/remote-bug.c @@ -1,1027 +1,1027 @@ -/* Remote debugging interface for Motorola's MVME187BUG monitor, an embedded - monitor for the m88k. - - Copyright 1992, 1993, 1994, 1995, 1996, 1998, 1999, 2000, 2001, - 2002 Free Software Foundation, Inc. - - Contributed by Cygnus Support. Written by K. Richard Pixley. - - 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 2 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, write to the Free Software - Foundation, Inc., 59 Temple Place - Suite 330, - Boston, MA 02111-1307, USA. */ - -#include "defs.h" -#include "inferior.h" -#include "gdb_string.h" -#include "regcache.h" -#include <ctype.h> -#include <fcntl.h> -#include <setjmp.h> -#include <errno.h> - -#include "terminal.h" -#include "gdbcore.h" -#include "gdbcmd.h" - -#include "serial.h" -#include "remote-utils.h" - -/* External data declarations */ -extern int stop_soon_quietly; /* for wait_for_inferior */ - -/* Forward data declarations */ -extern struct target_ops bug_ops; /* Forward declaration */ - -/* Forward function declarations */ -static int bug_clear_breakpoints (void); - -static int bug_read_memory (CORE_ADDR memaddr, - unsigned char *myaddr, int len); - -static int bug_write_memory (CORE_ADDR memaddr, - unsigned char *myaddr, int len); - -/* This variable is somewhat arbitrary. It's here so that it can be - set from within a running gdb. */ - -static int srec_max_retries = 3; - -/* Each S-record download to the target consists of an S0 header - record, some number of S3 data records, and one S7 termination - record. I call this download a "frame". Srec_frame says how many - bytes will be represented in each frame. */ - -#define SREC_SIZE 160 -static int srec_frame = SREC_SIZE; - -/* This variable determines how many bytes will be represented in each - S3 s-record. */ - -static int srec_bytes = 40; - -/* At one point it appeared to me as though the bug monitor could not - really be expected to receive two sequential characters at 9600 - baud reliably. Echo-pacing is an attempt to force data across the - line even in this condition. Specifically, in echo-pace mode, each - character is sent one at a time and we look for the echo before - sending the next. This is excruciatingly slow. */ - -static int srec_echo_pace = 0; - -/* How long to wait after an srec for a possible error message. - Similar to the above, I tried sleeping after sending each S3 record - in hopes that I might actually see error messages from the bug - monitor. This might actually work if we were to use sleep - intervals smaller than 1 second. */ - -static int srec_sleep = 0; - -/* Every srec_noise records, flub the checksum. This is a debugging - feature. Set the variable to something other than 1 in order to - inject *deliberate* checksum errors. One might do this if one - wanted to test error handling and recovery. */ - -static int srec_noise = 0; - -/* Called when SIGALRM signal sent due to alarm() timeout. */ - -/* Number of SIGTRAPs we need to simulate. That is, the next - NEED_ARTIFICIAL_TRAP calls to bug_wait should just return - SIGTRAP without actually waiting for anything. */ - -static int need_artificial_trap = 0; - -/* - * Download a file specified in 'args', to the bug. - */ - -static void -bug_load (char *args, int fromtty) -{ - bfd *abfd; - asection *s; - char buffer[1024]; - - sr_check_open (); - - inferior_ptid = null_ptid; - abfd = bfd_openr (args, 0); - if (!abfd) - { - printf_filtered ("Unable to open file %s\n", args); - return; - } - - if (bfd_check_format (abfd, bfd_object) == 0) - { - printf_filtered ("File is not an object file\n"); - return; - } - - s = abfd->sections; - while (s != (asection *) NULL) - { - srec_frame = SREC_SIZE; - if (s->flags & SEC_LOAD) - { - int i; - - char *buffer = xmalloc (srec_frame); - - printf_filtered ("%s\t: 0x%4lx .. 0x%4lx ", s->name, s->vma, s->vma + s->_raw_size); - gdb_flush (gdb_stdout); - for (i = 0; i < s->_raw_size; i += srec_frame) - { - if (srec_frame > s->_raw_size - i) - srec_frame = s->_raw_size - i; - - bfd_get_section_contents (abfd, s, buffer, i, srec_frame); - bug_write_memory (s->vma + i, buffer, srec_frame); - printf_filtered ("*"); - gdb_flush (gdb_stdout); - } - printf_filtered ("\n"); - xfree (buffer); - } - s = s->next; - } - sprintf (buffer, "rs ip %lx", (unsigned long) abfd->start_address); - sr_write_cr (buffer); - gr_expect_prompt (); -} - -#if 0 -static char * -get_word (char **p) -{ - char *s = *p; - char *word; - char *copy; - size_t len; - - while (isspace (*s)) - s++; - - word = s; - - len = 0; - - while (*s && !isspace (*s)) - { - s++; - len++; - - } - copy = xmalloc (len + 1); - memcpy (copy, word, len); - copy[len] = 0; - *p = s; - return copy; -} -#endif - -static struct gr_settings bug_settings = -{ - "Bug>", /* prompt */ - &bug_ops, /* ops */ - bug_clear_breakpoints, /* clear_all_breakpoints */ - gr_generic_checkin, /* checkin */ -}; - -static char *cpu_check_strings[] = -{ - "=", - "Invalid Register", -}; - -static void -bug_open (char *args, int from_tty) -{ - if (args == NULL) - args = ""; - - gr_open (args, from_tty, &bug_settings); - /* decide *now* whether we are on an 88100 or an 88110 */ - sr_write_cr ("rs cr06"); - sr_expect ("rs cr06"); - - switch (gr_multi_scan (cpu_check_strings, 0)) - { - case 0: /* this is an m88100 */ - target_is_m88110 = 0; - break; - case 1: /* this is an m88110 */ - target_is_m88110 = 1; - break; - default: - internal_error (__FILE__, __LINE__, "failed internal consistency check"); - } -} - -/* Tell the remote machine to resume. */ - -void -bug_resume (ptid_t ptid, int step, enum target_signal sig) -{ - if (step) - { - sr_write_cr ("t"); - - /* Force the next bug_wait to return a trap. Not doing anything - about I/O from the target means that the user has to type - "continue" to see any. FIXME, this should be fixed. */ - need_artificial_trap = 1; - } - else - sr_write_cr ("g"); - - return; -} - -/* Wait until the remote machine stops, then return, - storing status in STATUS just as `wait' would. */ - -static char *wait_strings[] = -{ - "At Breakpoint", - "Exception: Data Access Fault (Local Bus Timeout)", - "\r8??\?-Bug>", /* The '\?' avoids creating a trigraph */ - "\r197-Bug>", - NULL, -}; - -ptid_t -bug_wait (ptid_t ptid, struct target_waitstatus *status) -{ - int old_timeout = sr_get_timeout (); - int old_immediate_quit = immediate_quit; - - status->kind = TARGET_WAITKIND_EXITED; - status->value.integer = 0; - - /* read off leftovers from resume so that the rest can be passed - back out as stdout. */ - if (need_artificial_trap == 0) - { - sr_expect ("Effective address: "); - (void) sr_get_hex_word (); - sr_expect ("\r\n"); - } - - sr_set_timeout (-1); /* Don't time out -- user program is running. */ - immediate_quit = 1; /* Helps ability to QUIT */ - - switch (gr_multi_scan (wait_strings, need_artificial_trap == 0)) - { - case 0: /* breakpoint case */ - status->kind = TARGET_WAITKIND_STOPPED; - status->value.sig = TARGET_SIGNAL_TRAP; - /* user output from the target can be discarded here. (?) */ - gr_expect_prompt (); - break; - - case 1: /* bus error */ - status->kind = TARGET_WAITKIND_STOPPED; - status->value.sig = TARGET_SIGNAL_BUS; - /* user output from the target can be discarded here. (?) */ - gr_expect_prompt (); - break; - - case 2: /* normal case */ - case 3: - if (need_artificial_trap != 0) - { - /* stepping */ - status->kind = TARGET_WAITKIND_STOPPED; - status->value.sig = TARGET_SIGNAL_TRAP; - need_artificial_trap--; - break; - } - else - { - /* exit case */ - status->kind = TARGET_WAITKIND_EXITED; - status->value.integer = 0; - break; - } - - case -1: /* trouble */ - default: - fprintf_filtered (gdb_stderr, - "Trouble reading target during wait\n"); - break; - } - - sr_set_timeout (old_timeout); - immediate_quit = old_immediate_quit; - return inferior_ptid; -} - -/* Return the name of register number REGNO - in the form input and output by bug. - - Returns a pointer to a static buffer containing the answer. */ -static char * -get_reg_name (int regno) -{ - static char *rn[] = - { - "r00", "r01", "r02", "r03", "r04", "r05", "r06", "r07", - "r08", "r09", "r10", "r11", "r12", "r13", "r14", "r15", - "r16", "r17", "r18", "r19", "r20", "r21", "r22", "r23", - "r24", "r25", "r26", "r27", "r28", "r29", "r30", "r31", - - /* these get confusing because we omit a few and switch some ordering around. */ - - "cr01", /* 32 = psr */ - "fcr62", /* 33 = fpsr */ - "fcr63", /* 34 = fpcr */ - "ip", /* this is something of a cheat. */ - /* 35 = sxip */ - "cr05", /* 36 = snip */ - "cr06", /* 37 = sfip */ - - "x00", "x01", "x02", "x03", "x04", "x05", "x06", "x07", - "x08", "x09", "x10", "x11", "x12", "x13", "x14", "x15", - "x16", "x17", "x18", "x19", "x20", "x21", "x22", "x23", - "x24", "x25", "x26", "x27", "x28", "x29", "x30", "x31", - }; - - return rn[regno]; -} - -#if 0 /* not currently used */ -/* Read from remote while the input matches STRING. Return zero on - success, -1 on failure. */ - -static int -bug_scan (char *s) -{ - int c; - - while (*s) - { - c = sr_readchar (); - if (c != *s++) - { - fflush (stdout); - printf ("\nNext character is '%c' - %d and s is \"%s\".\n", c, c, --s); - return (-1); - } - } - - return (0); -} -#endif /* never */ - -static int -bug_srec_write_cr (char *s) -{ - char *p = s; - - if (srec_echo_pace) - for (p = s; *p; ++p) - { - if (sr_get_debug () > 0) - printf ("%c", *p); - - do - serial_write (sr_get_desc (), p, 1); - while (sr_pollchar () != *p); - } - else - { - sr_write_cr (s); -/* return(bug_scan (s) || bug_scan ("\n")); */ - } - - return (0); -} - -/* Store register REGNO, or all if REGNO == -1. */ - -static void -bug_fetch_register (int regno) -{ - sr_check_open (); - - if (regno == -1) - { - int i; - - for (i = 0; i < NUM_REGS; ++i) - bug_fetch_register (i); - } - else if (target_is_m88110 && regno == SFIP_REGNUM) - { - /* m88110 has no sfip. */ - long l = 0; - supply_register (regno, (char *) &l); - } - else if (regno < XFP_REGNUM) - { - char buffer[MAX_REGISTER_RAW_SIZE]; - - sr_write ("rs ", 3); - sr_write_cr (get_reg_name (regno)); - sr_expect ("="); - store_unsigned_integer (buffer, REGISTER_RAW_SIZE (regno), - sr_get_hex_word ()); - gr_expect_prompt (); - supply_register (regno, buffer); - } - else - { - /* Float register so we need to parse a strange data format. */ - long p; - unsigned char fpreg_buf[10]; - - sr_write ("rs ", 3); - sr_write (get_reg_name (regno), strlen (get_reg_name (regno))); - sr_write_cr (";d"); - sr_expect ("rs"); - sr_expect (get_reg_name (regno)); - sr_expect (";d"); - sr_expect ("="); - - /* sign */ - p = sr_get_hex_digit (1); - fpreg_buf[0] = p << 7; - - /* exponent */ - sr_expect ("_"); - p = sr_get_hex_digit (1); - fpreg_buf[0] += (p << 4); - fpreg_buf[0] += sr_get_hex_digit (1); - - fpreg_buf[1] = sr_get_hex_digit (1) << 4; - - /* fraction */ - sr_expect ("_"); - fpreg_buf[1] += sr_get_hex_digit (1); - - fpreg_buf[2] = (sr_get_hex_digit (1) << 4) + sr_get_hex_digit (1); - fpreg_buf[3] = (sr_get_hex_digit (1) << 4) + sr_get_hex_digit (1); - fpreg_buf[4] = (sr_get_hex_digit (1) << 4) + sr_get_hex_digit (1); - fpreg_buf[5] = (sr_get_hex_digit (1) << 4) + sr_get_hex_digit (1); - fpreg_buf[6] = (sr_get_hex_digit (1) << 4) + sr_get_hex_digit (1); - fpreg_buf[7] = (sr_get_hex_digit (1) << 4) + sr_get_hex_digit (1); - fpreg_buf[8] = 0; - fpreg_buf[9] = 0; - - gr_expect_prompt (); - supply_register (regno, fpreg_buf); - } - - return; -} - -/* Store register REGNO, or all if REGNO == -1. */ - -static void -bug_store_register (int regno) -{ - char buffer[1024]; - sr_check_open (); - - if (regno == -1) - { - int i; - - for (i = 0; i < NUM_REGS; ++i) - bug_store_register (i); - } - else - { - char *regname; - - regname = get_reg_name (regno); - - if (target_is_m88110 && regno == SFIP_REGNUM) - return; - else if (regno < XFP_REGNUM) - sprintf (buffer, "rs %s %08lx", - regname, - (long) read_register (regno)); - else - { - unsigned char *fpreg_buf = - (unsigned char *) ®isters[REGISTER_BYTE (regno)]; - - sprintf (buffer, "rs %s %1x_%02x%1x_%1x%02x%02x%02x%02x%02x%02x;d", - regname, - /* sign */ - (fpreg_buf[0] >> 7) & 0xf, - /* exponent */ - fpreg_buf[0] & 0x7f, - (fpreg_buf[1] >> 8) & 0xf, - /* fraction */ - fpreg_buf[1] & 0xf, - fpreg_buf[2], - fpreg_buf[3], - fpreg_buf[4], - fpreg_buf[5], - fpreg_buf[6], - fpreg_buf[7]); - } - - sr_write_cr (buffer); - gr_expect_prompt (); - } - - return; -} - -/* Transfer LEN bytes between GDB address MYADDR and target address - MEMADDR. If WRITE is non-zero, transfer them to the target, - otherwise transfer them from the target. TARGET is unused. - - Returns the number of bytes transferred. */ - -int -bug_xfer_memory (CORE_ADDR memaddr, char *myaddr, int len, int write, - struct mem_attrib *attrib, struct target_ops *target) -{ - int res; - - if (len <= 0) - return 0; - - if (write) - res = bug_write_memory (memaddr, myaddr, len); - else - res = bug_read_memory (memaddr, myaddr, len); - - return res; -} - -static void -start_load (void) -{ - char *command; - - command = (srec_echo_pace ? "lo 0 ;x" : "lo 0"); - - sr_write_cr (command); - sr_expect (command); - sr_expect ("\r\n"); - bug_srec_write_cr ("S0030000FC"); - return; -} - -/* This is an extremely vulnerable and fragile function. I've made - considerable attempts to make this deterministic, but I've - certainly forgotten something. The trouble is that S-records are - only a partial file format, not a protocol. Worse, apparently the - m88k bug monitor does not run in real time while receiving - S-records. Hence, we must pay excruciating attention to when and - where error messages are returned, and what has actually been sent. - - Each call represents a chunk of memory to be sent to the target. - We break that chunk into an S0 header record, some number of S3 - data records each containing srec_bytes, and an S7 termination - record. */ - -static char *srecord_strings[] = -{ - "S-RECORD", - "-Bug>", - NULL, -}; - -static int -bug_write_memory (CORE_ADDR memaddr, unsigned char *myaddr, int len) -{ - int done; - int checksum; - int x; - int retries; - char *buffer = alloca ((srec_bytes + 8) << 1); - - retries = 0; - - do - { - done = 0; - - if (retries > srec_max_retries) - return (-1); - - if (retries > 0) - { - if (sr_get_debug () > 0) - printf ("\n<retrying...>\n"); - - /* This gr_expect_prompt call is extremely important. Without - it, we will tend to resend our packet so fast that it - will arrive before the bug monitor is ready to receive - it. This would lead to a very ugly resend loop. */ - - gr_expect_prompt (); - } - - start_load (); - - while (done < len) - { - int thisgo; - int idx; - char *buf = buffer; - CORE_ADDR address; - - checksum = 0; - thisgo = len - done; - if (thisgo > srec_bytes) - thisgo = srec_bytes; - - address = memaddr + done; - sprintf (buf, "S3%02X%08lX", thisgo + 4 + 1, (long) address); - buf += 12; - - checksum += (thisgo + 4 + 1 - + (address & 0xff) - + ((address >> 8) & 0xff) - + ((address >> 16) & 0xff) - + ((address >> 24) & 0xff)); - - for (idx = 0; idx < thisgo; idx++) - { - sprintf (buf, "%02X", myaddr[idx + done]); - checksum += myaddr[idx + done]; - buf += 2; - } - - if (srec_noise > 0) - { - /* FIXME-NOW: insert a deliberate error every now and then. - This is intended for testing/debugging the error handling - stuff. */ - static int counter = 0; - if (++counter > srec_noise) - { - counter = 0; - ++checksum; - } - } - - sprintf (buf, "%02X", ~checksum & 0xff); - bug_srec_write_cr (buffer); - - if (srec_sleep != 0) - sleep (srec_sleep); - - /* This pollchar is probably redundant to the gr_multi_scan - below. Trouble is, we can't be sure when or where an - error message will appear. Apparently, when running at - full speed from a typical sun4, error messages tend to - appear to arrive only *after* the s7 record. */ - - if ((x = sr_pollchar ()) != 0) - { - if (sr_get_debug () > 0) - printf ("\n<retrying...>\n"); - - ++retries; - - /* flush any remaining input and verify that we are back - at the prompt level. */ - gr_expect_prompt (); - /* start all over again. */ - start_load (); - done = 0; - continue; - } - - done += thisgo; - } - - bug_srec_write_cr ("S7060000000000F9"); - ++retries; - - /* Having finished the load, we need to figure out whether we - had any errors. */ - } - while (gr_multi_scan (srecord_strings, 0) == 0);; - - return (0); -} - -/* Copy LEN bytes of data from debugger memory at MYADDR - to inferior's memory at MEMADDR. Returns errno value. - * sb/sh instructions don't work on unaligned addresses, when TU=1. - */ - -/* Read LEN bytes from inferior memory at MEMADDR. Put the result - at debugger address MYADDR. Returns errno value. */ -static int -bug_read_memory (CORE_ADDR memaddr, unsigned char *myaddr, int len) -{ - char request[100]; - char *buffer; - char *p; - char type; - char size; - unsigned char c; - unsigned int inaddr; - unsigned int checksum; - - sprintf (request, "du 0 %lx:&%d", (long) memaddr, len); - sr_write_cr (request); - - p = buffer = alloca (len); - - /* scan up through the header */ - sr_expect ("S0030000FC"); - - while (p < buffer + len) - { - /* scan off any white space. */ - while (sr_readchar () != 'S');; - - /* what kind of s-rec? */ - type = sr_readchar (); - - /* scan record size */ - sr_get_hex_byte (&size); - checksum = size; - --size; - inaddr = 0; - - switch (type) - { - case '7': - case '8': - case '9': - goto done; - - case '3': - sr_get_hex_byte (&c); - inaddr = (inaddr << 8) + c; - checksum += c; - --size; - /* intentional fall through */ - case '2': - sr_get_hex_byte (&c); - inaddr = (inaddr << 8) + c; - checksum += c; - --size; - /* intentional fall through */ - case '1': - sr_get_hex_byte (&c); - inaddr = (inaddr << 8) + c; - checksum += c; - --size; - sr_get_hex_byte (&c); - inaddr = (inaddr << 8) + c; - checksum += c; - --size; - break; - - default: - /* bonk */ - error ("reading s-records."); - } - - if (inaddr < memaddr - || (memaddr + len) < (inaddr + size)) - error ("srec out of memory range."); - - if (p != buffer + inaddr - memaddr) - error ("srec out of sequence."); - - for (; size; --size, ++p) - { - sr_get_hex_byte (p); - checksum += *p; - } - - sr_get_hex_byte (&c); - if (c != (~checksum & 0xff)) - error ("bad s-rec checksum"); - } - -done: - gr_expect_prompt (); - if (p != buffer + len) - return (1); - - memcpy (myaddr, buffer, len); - return (0); -} - -#define MAX_BREAKS 16 -static int num_brkpts = 0; - -/* Insert a breakpoint at ADDR. SAVE is normally the address of the - pattern buffer where the instruction that the breakpoint overwrites - is saved. It is unused here since the bug is responsible for - saving/restoring the original instruction. */ - -static int -bug_insert_breakpoint (CORE_ADDR addr, char *save) -{ - sr_check_open (); - - if (num_brkpts < MAX_BREAKS) - { - char buffer[100]; - - num_brkpts++; - sprintf (buffer, "br %lx", (long) addr); - sr_write_cr (buffer); - gr_expect_prompt (); - return (0); - } - else - { - fprintf_filtered (gdb_stderr, - "Too many break points, break point not installed\n"); - return (1); - } - -} - -/* Remove a breakpoint at ADDR. SAVE is normally the previously - saved pattern, but is unused here since the bug is responsible - for saving/restoring instructions. */ - -static int -bug_remove_breakpoint (CORE_ADDR addr, char *save) -{ - if (num_brkpts > 0) - { - char buffer[100]; - - num_brkpts--; - sprintf (buffer, "nobr %lx", (long) addr); - sr_write_cr (buffer); - gr_expect_prompt (); - - } - return (0); -} - -/* Clear the bugs notion of what the break points are */ -static int -bug_clear_breakpoints (void) -{ - - if (sr_is_open ()) - { - sr_write_cr ("nobr"); - sr_expect ("nobr"); - gr_expect_prompt (); - } - num_brkpts = 0; - return (0); -} - -struct target_ops bug_ops; - -static void -init_bug_ops (void) -{ - bug_ops.to_shortname = "bug"; - "Remote BUG monitor", - bug_ops.to_longname = "Use the mvme187 board running the BUG monitor connected by a serial line."; - bug_ops.to_doc = " "; - bug_ops.to_open = bug_open; - bug_ops.to_close = gr_close; - bug_ops.to_attach = 0; - bug_ops.to_post_attach = NULL; - bug_ops.to_require_attach = NULL; - bug_ops.to_detach = gr_detach; - bug_ops.to_require_detach = NULL; - bug_ops.to_resume = bug_resume; - bug_ops.to_wait = bug_wait; - bug_ops.to_post_wait = NULL; - bug_ops.to_fetch_registers = bug_fetch_register; - bug_ops.to_store_registers = bug_store_register; - bug_ops.to_prepare_to_store = gr_prepare_to_store; - bug_ops.to_xfer_memory = bug_xfer_memory; - bug_ops.to_files_info = gr_files_info; - bug_ops.to_insert_breakpoint = bug_insert_breakpoint; - bug_ops.to_remove_breakpoint = bug_remove_breakpoint; - bug_ops.to_terminal_init = 0; - bug_ops.to_terminal_inferior = 0; - bug_ops.to_terminal_ours_for_output = 0; - bug_ops.to_terminal_ours = 0; - bug_ops.to_terminal_info = 0; - bug_ops.to_kill = gr_kill; - bug_ops.to_load = bug_load; - bug_ops.to_lookup_symbol = 0; - bug_ops.to_create_inferior = gr_create_inferior; - bug_ops.to_post_startup_inferior = NULL; - bug_ops.to_acknowledge_created_inferior = NULL; - bug_ops.to_clone_and_follow_inferior = NULL; - bug_ops.to_post_follow_inferior_by_clone = NULL; - bug_ops.to_insert_fork_catchpoint = NULL; - bug_ops.to_remove_fork_catchpoint = NULL; - bug_ops.to_insert_vfork_catchpoint = NULL; - bug_ops.to_remove_vfork_catchpoint = NULL; - bug_ops.to_has_forked = NULL; - bug_ops.to_has_vforked = NULL; - bug_ops.to_can_follow_vfork_prior_to_exec = NULL; - bug_ops.to_post_follow_vfork = NULL; - bug_ops.to_insert_exec_catchpoint = NULL; - bug_ops.to_remove_exec_catchpoint = NULL; - bug_ops.to_has_execd = NULL; - bug_ops.to_reported_exec_events_per_exec_call = NULL; - bug_ops.to_has_exited = NULL; - bug_ops.to_mourn_inferior = gr_mourn; - bug_ops.to_can_run = 0; - bug_ops.to_notice_signals = 0; - bug_ops.to_thread_alive = 0; - bug_ops.to_stop = 0; - bug_ops.to_pid_to_exec_file = NULL; - bug_ops.to_stratum = process_stratum; - bug_ops.DONT_USE = 0; - bug_ops.to_has_all_memory = 1; - bug_ops.to_has_memory = 1; - bug_ops.to_has_stack = 1; - bug_ops.to_has_registers = 0; - bug_ops.to_has_execution = 0; - bug_ops.to_sections = 0; - bug_ops.to_sections_end = 0; - bug_ops.to_magic = OPS_MAGIC; /* Always the last thing */ -} /* init_bug_ops */ - -void -_initialize_remote_bug (void) -{ - init_bug_ops (); - add_target (&bug_ops); - - add_show_from_set - (add_set_cmd ("srec-bytes", class_support, var_uinteger, - (char *) &srec_bytes, - "\ -Set the number of bytes represented in each S-record.\n\ -This affects the communication protocol with the remote target.", - &setlist), - &showlist); - - add_show_from_set - (add_set_cmd ("srec-max-retries", class_support, var_uinteger, - (char *) &srec_max_retries, - "\ -Set the number of retries for shipping S-records.\n\ -This affects the communication protocol with the remote target.", - &setlist), - &showlist); - -#if 0 - /* This needs to set SREC_SIZE, not srec_frame which gets changed at the - end of a download. But do we need the option at all? */ - add_show_from_set - (add_set_cmd ("srec-frame", class_support, var_uinteger, - (char *) &srec_frame, - "\ -Set the number of bytes in an S-record frame.\n\ -This affects the communication protocol with the remote target.", - &setlist), - &showlist); -#endif /* 0 */ - - add_show_from_set - (add_set_cmd ("srec-noise", class_support, var_zinteger, - (char *) &srec_noise, - "\ -Set number of S-record to send before deliberately flubbing a checksum.\n\ -Zero means flub none at all. This affects the communication protocol\n\ -with the remote target.", - &setlist), - &showlist); - - add_show_from_set - (add_set_cmd ("srec-sleep", class_support, var_zinteger, - (char *) &srec_sleep, - "\ -Set number of seconds to sleep after an S-record for a possible error message to arrive.\n\ -This affects the communication protocol with the remote target.", - &setlist), - &showlist); - - add_show_from_set - (add_set_cmd ("srec-echo-pace", class_support, var_boolean, - (char *) &srec_echo_pace, - "\ -Set echo-verification.\n\ -When on, use verification by echo when downloading S-records. This is\n\ -much slower, but generally more reliable.", - &setlist), - &showlist); -} +// OBSOLETE /* Remote debugging interface for Motorola's MVME187BUG monitor, an embedded +// OBSOLETE monitor for the m88k. +// OBSOLETE +// OBSOLETE Copyright 1992, 1993, 1994, 1995, 1996, 1998, 1999, 2000, 2001, +// OBSOLETE 2002 Free Software Foundation, Inc. +// OBSOLETE +// OBSOLETE Contributed by Cygnus Support. Written by K. Richard Pixley. +// OBSOLETE +// OBSOLETE This file is part of GDB. +// OBSOLETE +// OBSOLETE This program is free software; you can redistribute it and/or modify +// OBSOLETE it under the terms of the GNU General Public License as published by +// OBSOLETE the Free Software Foundation; either version 2 of the License, or +// OBSOLETE (at your option) any later version. +// OBSOLETE +// OBSOLETE This program is distributed in the hope that it will be useful, +// OBSOLETE but WITHOUT ANY WARRANTY; without even the implied warranty of +// OBSOLETE MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +// OBSOLETE GNU General Public License for more details. +// OBSOLETE +// OBSOLETE You should have received a copy of the GNU General Public License +// OBSOLETE along with this program; if not, write to the Free Software +// OBSOLETE Foundation, Inc., 59 Temple Place - Suite 330, +// OBSOLETE Boston, MA 02111-1307, USA. */ +// OBSOLETE +// OBSOLETE #include "defs.h" +// OBSOLETE #include "inferior.h" +// OBSOLETE #include "gdb_string.h" +// OBSOLETE #include "regcache.h" +// OBSOLETE #include <ctype.h> +// OBSOLETE #include <fcntl.h> +// OBSOLETE #include <setjmp.h> +// OBSOLETE #include <errno.h> +// OBSOLETE +// OBSOLETE #include "terminal.h" +// OBSOLETE #include "gdbcore.h" +// OBSOLETE #include "gdbcmd.h" +// OBSOLETE +// OBSOLETE #include "serial.h" +// OBSOLETE #include "remote-utils.h" +// OBSOLETE +// OBSOLETE /* External data declarations */ +// OBSOLETE extern int stop_soon_quietly; /* for wait_for_inferior */ +// OBSOLETE +// OBSOLETE /* Forward data declarations */ +// OBSOLETE extern struct target_ops bug_ops; /* Forward declaration */ +// OBSOLETE +// OBSOLETE /* Forward function declarations */ +// OBSOLETE static int bug_clear_breakpoints (void); +// OBSOLETE +// OBSOLETE static int bug_read_memory (CORE_ADDR memaddr, +// OBSOLETE unsigned char *myaddr, int len); +// OBSOLETE +// OBSOLETE static int bug_write_memory (CORE_ADDR memaddr, +// OBSOLETE unsigned char *myaddr, int len); +// OBSOLETE +// OBSOLETE /* This variable is somewhat arbitrary. It's here so that it can be +// OBSOLETE set from within a running gdb. */ +// OBSOLETE +// OBSOLETE static int srec_max_retries = 3; +// OBSOLETE +// OBSOLETE /* Each S-record download to the target consists of an S0 header +// OBSOLETE record, some number of S3 data records, and one S7 termination +// OBSOLETE record. I call this download a "frame". Srec_frame says how many +// OBSOLETE bytes will be represented in each frame. */ +// OBSOLETE +// OBSOLETE #define SREC_SIZE 160 +// OBSOLETE static int srec_frame = SREC_SIZE; +// OBSOLETE +// OBSOLETE /* This variable determines how many bytes will be represented in each +// OBSOLETE S3 s-record. */ +// OBSOLETE +// OBSOLETE static int srec_bytes = 40; +// OBSOLETE +// OBSOLETE /* At one point it appeared to me as though the bug monitor could not +// OBSOLETE really be expected to receive two sequential characters at 9600 +// OBSOLETE baud reliably. Echo-pacing is an attempt to force data across the +// OBSOLETE line even in this condition. Specifically, in echo-pace mode, each +// OBSOLETE character is sent one at a time and we look for the echo before +// OBSOLETE sending the next. This is excruciatingly slow. */ +// OBSOLETE +// OBSOLETE static int srec_echo_pace = 0; +// OBSOLETE +// OBSOLETE /* How long to wait after an srec for a possible error message. +// OBSOLETE Similar to the above, I tried sleeping after sending each S3 record +// OBSOLETE in hopes that I might actually see error messages from the bug +// OBSOLETE monitor. This might actually work if we were to use sleep +// OBSOLETE intervals smaller than 1 second. */ +// OBSOLETE +// OBSOLETE static int srec_sleep = 0; +// OBSOLETE +// OBSOLETE /* Every srec_noise records, flub the checksum. This is a debugging +// OBSOLETE feature. Set the variable to something other than 1 in order to +// OBSOLETE inject *deliberate* checksum errors. One might do this if one +// OBSOLETE wanted to test error handling and recovery. */ +// OBSOLETE +// OBSOLETE static int srec_noise = 0; +// OBSOLETE +// OBSOLETE /* Called when SIGALRM signal sent due to alarm() timeout. */ +// OBSOLETE +// OBSOLETE /* Number of SIGTRAPs we need to simulate. That is, the next +// OBSOLETE NEED_ARTIFICIAL_TRAP calls to bug_wait should just return +// OBSOLETE SIGTRAP without actually waiting for anything. */ +// OBSOLETE +// OBSOLETE static int need_artificial_trap = 0; +// OBSOLETE +// OBSOLETE /* +// OBSOLETE * Download a file specified in 'args', to the bug. +// OBSOLETE */ +// OBSOLETE +// OBSOLETE static void +// OBSOLETE bug_load (char *args, int fromtty) +// OBSOLETE { +// OBSOLETE bfd *abfd; +// OBSOLETE asection *s; +// OBSOLETE char buffer[1024]; +// OBSOLETE +// OBSOLETE sr_check_open (); +// OBSOLETE +// OBSOLETE inferior_ptid = null_ptid; +// OBSOLETE abfd = bfd_openr (args, 0); +// OBSOLETE if (!abfd) +// OBSOLETE { +// OBSOLETE printf_filtered ("Unable to open file %s\n", args); +// OBSOLETE return; +// OBSOLETE } +// OBSOLETE +// OBSOLETE if (bfd_check_format (abfd, bfd_object) == 0) +// OBSOLETE { +// OBSOLETE printf_filtered ("File is not an object file\n"); +// OBSOLETE return; +// OBSOLETE } +// OBSOLETE +// OBSOLETE s = abfd->sections; +// OBSOLETE while (s != (asection *) NULL) +// OBSOLETE { +// OBSOLETE srec_frame = SREC_SIZE; +// OBSOLETE if (s->flags & SEC_LOAD) +// OBSOLETE { +// OBSOLETE int i; +// OBSOLETE +// OBSOLETE char *buffer = xmalloc (srec_frame); +// OBSOLETE +// OBSOLETE printf_filtered ("%s\t: 0x%4lx .. 0x%4lx ", s->name, s->vma, s->vma + s->_raw_size); +// OBSOLETE gdb_flush (gdb_stdout); +// OBSOLETE for (i = 0; i < s->_raw_size; i += srec_frame) +// OBSOLETE { +// OBSOLETE if (srec_frame > s->_raw_size - i) +// OBSOLETE srec_frame = s->_raw_size - i; +// OBSOLETE +// OBSOLETE bfd_get_section_contents (abfd, s, buffer, i, srec_frame); +// OBSOLETE bug_write_memory (s->vma + i, buffer, srec_frame); +// OBSOLETE printf_filtered ("*"); +// OBSOLETE gdb_flush (gdb_stdout); +// OBSOLETE } +// OBSOLETE printf_filtered ("\n"); +// OBSOLETE xfree (buffer); +// OBSOLETE } +// OBSOLETE s = s->next; +// OBSOLETE } +// OBSOLETE sprintf (buffer, "rs ip %lx", (unsigned long) abfd->start_address); +// OBSOLETE sr_write_cr (buffer); +// OBSOLETE gr_expect_prompt (); +// OBSOLETE } +// OBSOLETE +// OBSOLETE #if 0 +// OBSOLETE static char * +// OBSOLETE get_word (char **p) +// OBSOLETE { +// OBSOLETE char *s = *p; +// OBSOLETE char *word; +// OBSOLETE char *copy; +// OBSOLETE size_t len; +// OBSOLETE +// OBSOLETE while (isspace (*s)) +// OBSOLETE s++; +// OBSOLETE +// OBSOLETE word = s; +// OBSOLETE +// OBSOLETE len = 0; +// OBSOLETE +// OBSOLETE while (*s && !isspace (*s)) +// OBSOLETE { +// OBSOLETE s++; +// OBSOLETE len++; +// OBSOLETE +// OBSOLETE } +// OBSOLETE copy = xmalloc (len + 1); +// OBSOLETE memcpy (copy, word, len); +// OBSOLETE copy[len] = 0; +// OBSOLETE *p = s; +// OBSOLETE return copy; +// OBSOLETE } +// OBSOLETE #endif +// OBSOLETE +// OBSOLETE static struct gr_settings bug_settings = +// OBSOLETE { +// OBSOLETE "Bug>", /* prompt */ +// OBSOLETE &bug_ops, /* ops */ +// OBSOLETE bug_clear_breakpoints, /* clear_all_breakpoints */ +// OBSOLETE gr_generic_checkin, /* checkin */ +// OBSOLETE }; +// OBSOLETE +// OBSOLETE static char *cpu_check_strings[] = +// OBSOLETE { +// OBSOLETE "=", +// OBSOLETE "Invalid Register", +// OBSOLETE }; +// OBSOLETE +// OBSOLETE static void +// OBSOLETE bug_open (char *args, int from_tty) +// OBSOLETE { +// OBSOLETE if (args == NULL) +// OBSOLETE args = ""; +// OBSOLETE +// OBSOLETE gr_open (args, from_tty, &bug_settings); +// OBSOLETE /* decide *now* whether we are on an 88100 or an 88110 */ +// OBSOLETE sr_write_cr ("rs cr06"); +// OBSOLETE sr_expect ("rs cr06"); +// OBSOLETE +// OBSOLETE switch (gr_multi_scan (cpu_check_strings, 0)) +// OBSOLETE { +// OBSOLETE case 0: /* this is an m88100 */ +// OBSOLETE target_is_m88110 = 0; +// OBSOLETE break; +// OBSOLETE case 1: /* this is an m88110 */ +// OBSOLETE target_is_m88110 = 1; +// OBSOLETE break; +// OBSOLETE default: +// OBSOLETE internal_error (__FILE__, __LINE__, "failed internal consistency check"); +// OBSOLETE } +// OBSOLETE } +// OBSOLETE +// OBSOLETE /* Tell the remote machine to resume. */ +// OBSOLETE +// OBSOLETE void +// OBSOLETE bug_resume (ptid_t ptid, int step, enum target_signal sig) +// OBSOLETE { +// OBSOLETE if (step) +// OBSOLETE { +// OBSOLETE sr_write_cr ("t"); +// OBSOLETE +// OBSOLETE /* Force the next bug_wait to return a trap. Not doing anything +// OBSOLETE about I/O from the target means that the user has to type +// OBSOLETE "continue" to see any. FIXME, this should be fixed. */ +// OBSOLETE need_artificial_trap = 1; +// OBSOLETE } +// OBSOLETE else +// OBSOLETE sr_write_cr ("g"); +// OBSOLETE +// OBSOLETE return; +// OBSOLETE } +// OBSOLETE +// OBSOLETE /* Wait until the remote machine stops, then return, +// OBSOLETE storing status in STATUS just as `wait' would. */ +// OBSOLETE +// OBSOLETE static char *wait_strings[] = +// OBSOLETE { +// OBSOLETE "At Breakpoint", +// OBSOLETE "Exception: Data Access Fault (Local Bus Timeout)", +// OBSOLETE "\r8??\?-Bug>", /* The '\?' avoids creating a trigraph */ +// OBSOLETE "\r197-Bug>", +// OBSOLETE NULL, +// OBSOLETE }; +// OBSOLETE +// OBSOLETE ptid_t +// OBSOLETE bug_wait (ptid_t ptid, struct target_waitstatus *status) +// OBSOLETE { +// OBSOLETE int old_timeout = sr_get_timeout (); +// OBSOLETE int old_immediate_quit = immediate_quit; +// OBSOLETE +// OBSOLETE status->kind = TARGET_WAITKIND_EXITED; +// OBSOLETE status->value.integer = 0; +// OBSOLETE +// OBSOLETE /* read off leftovers from resume so that the rest can be passed +// OBSOLETE back out as stdout. */ +// OBSOLETE if (need_artificial_trap == 0) +// OBSOLETE { +// OBSOLETE sr_expect ("Effective address: "); +// OBSOLETE (void) sr_get_hex_word (); +// OBSOLETE sr_expect ("\r\n"); +// OBSOLETE } +// OBSOLETE +// OBSOLETE sr_set_timeout (-1); /* Don't time out -- user program is running. */ +// OBSOLETE immediate_quit = 1; /* Helps ability to QUIT */ +// OBSOLETE +// OBSOLETE switch (gr_multi_scan (wait_strings, need_artificial_trap == 0)) +// OBSOLETE { +// OBSOLETE case 0: /* breakpoint case */ +// OBSOLETE status->kind = TARGET_WAITKIND_STOPPED; +// OBSOLETE status->value.sig = TARGET_SIGNAL_TRAP; +// OBSOLETE /* user output from the target can be discarded here. (?) */ +// OBSOLETE gr_expect_prompt (); +// OBSOLETE break; +// OBSOLETE +// OBSOLETE case 1: /* bus error */ +// OBSOLETE status->kind = TARGET_WAITKIND_STOPPED; +// OBSOLETE status->value.sig = TARGET_SIGNAL_BUS; +// OBSOLETE /* user output from the target can be discarded here. (?) */ +// OBSOLETE gr_expect_prompt (); +// OBSOLETE break; +// OBSOLETE +// OBSOLETE case 2: /* normal case */ +// OBSOLETE case 3: +// OBSOLETE if (need_artificial_trap != 0) +// OBSOLETE { +// OBSOLETE /* stepping */ +// OBSOLETE status->kind = TARGET_WAITKIND_STOPPED; +// OBSOLETE status->value.sig = TARGET_SIGNAL_TRAP; +// OBSOLETE need_artificial_trap--; +// OBSOLETE break; +// OBSOLETE } +// OBSOLETE else +// OBSOLETE { +// OBSOLETE /* exit case */ +// OBSOLETE status->kind = TARGET_WAITKIND_EXITED; +// OBSOLETE status->value.integer = 0; +// OBSOLETE break; +// OBSOLETE } +// OBSOLETE +// OBSOLETE case -1: /* trouble */ +// OBSOLETE default: +// OBSOLETE fprintf_filtered (gdb_stderr, +// OBSOLETE "Trouble reading target during wait\n"); +// OBSOLETE break; +// OBSOLETE } +// OBSOLETE +// OBSOLETE sr_set_timeout (old_timeout); +// OBSOLETE immediate_quit = old_immediate_quit; +// OBSOLETE return inferior_ptid; +// OBSOLETE } +// OBSOLETE +// OBSOLETE /* Return the name of register number REGNO +// OBSOLETE in the form input and output by bug. +// OBSOLETE +// OBSOLETE Returns a pointer to a static buffer containing the answer. */ +// OBSOLETE static char * +// OBSOLETE get_reg_name (int regno) +// OBSOLETE { +// OBSOLETE static char *rn[] = +// OBSOLETE { +// OBSOLETE "r00", "r01", "r02", "r03", "r04", "r05", "r06", "r07", +// OBSOLETE "r08", "r09", "r10", "r11", "r12", "r13", "r14", "r15", +// OBSOLETE "r16", "r17", "r18", "r19", "r20", "r21", "r22", "r23", +// OBSOLETE "r24", "r25", "r26", "r27", "r28", "r29", "r30", "r31", +// OBSOLETE +// OBSOLETE /* these get confusing because we omit a few and switch some ordering around. */ +// OBSOLETE +// OBSOLETE "cr01", /* 32 = psr */ +// OBSOLETE "fcr62", /* 33 = fpsr */ +// OBSOLETE "fcr63", /* 34 = fpcr */ +// OBSOLETE "ip", /* this is something of a cheat. */ +// OBSOLETE /* 35 = sxip */ +// OBSOLETE "cr05", /* 36 = snip */ +// OBSOLETE "cr06", /* 37 = sfip */ +// OBSOLETE +// OBSOLETE "x00", "x01", "x02", "x03", "x04", "x05", "x06", "x07", +// OBSOLETE "x08", "x09", "x10", "x11", "x12", "x13", "x14", "x15", +// OBSOLETE "x16", "x17", "x18", "x19", "x20", "x21", "x22", "x23", +// OBSOLETE "x24", "x25", "x26", "x27", "x28", "x29", "x30", "x31", +// OBSOLETE }; +// OBSOLETE +// OBSOLETE return rn[regno]; +// OBSOLETE } +// OBSOLETE +// OBSOLETE #if 0 /* not currently used */ +// OBSOLETE /* Read from remote while the input matches STRING. Return zero on +// OBSOLETE success, -1 on failure. */ +// OBSOLETE +// OBSOLETE static int +// OBSOLETE bug_scan (char *s) +// OBSOLETE { +// OBSOLETE int c; +// OBSOLETE +// OBSOLETE while (*s) +// OBSOLETE { +// OBSOLETE c = sr_readchar (); +// OBSOLETE if (c != *s++) +// OBSOLETE { +// OBSOLETE fflush (stdout); +// OBSOLETE printf ("\nNext character is '%c' - %d and s is \"%s\".\n", c, c, --s); +// OBSOLETE return (-1); +// OBSOLETE } +// OBSOLETE } +// OBSOLETE +// OBSOLETE return (0); +// OBSOLETE } +// OBSOLETE #endif /* never */ +// OBSOLETE +// OBSOLETE static int +// OBSOLETE bug_srec_write_cr (char *s) +// OBSOLETE { +// OBSOLETE char *p = s; +// OBSOLETE +// OBSOLETE if (srec_echo_pace) +// OBSOLETE for (p = s; *p; ++p) +// OBSOLETE { +// OBSOLETE if (sr_get_debug () > 0) +// OBSOLETE printf ("%c", *p); +// OBSOLETE +// OBSOLETE do +// OBSOLETE serial_write (sr_get_desc (), p, 1); +// OBSOLETE while (sr_pollchar () != *p); +// OBSOLETE } +// OBSOLETE else +// OBSOLETE { +// OBSOLETE sr_write_cr (s); +// OBSOLETE /* return(bug_scan (s) || bug_scan ("\n")); */ +// OBSOLETE } +// OBSOLETE +// OBSOLETE return (0); +// OBSOLETE } +// OBSOLETE +// OBSOLETE /* Store register REGNO, or all if REGNO == -1. */ +// OBSOLETE +// OBSOLETE static void +// OBSOLETE bug_fetch_register (int regno) +// OBSOLETE { +// OBSOLETE sr_check_open (); +// OBSOLETE +// OBSOLETE if (regno == -1) +// OBSOLETE { +// OBSOLETE int i; +// OBSOLETE +// OBSOLETE for (i = 0; i < NUM_REGS; ++i) +// OBSOLETE bug_fetch_register (i); +// OBSOLETE } +// OBSOLETE else if (target_is_m88110 && regno == SFIP_REGNUM) +// OBSOLETE { +// OBSOLETE /* m88110 has no sfip. */ +// OBSOLETE long l = 0; +// OBSOLETE supply_register (regno, (char *) &l); +// OBSOLETE } +// OBSOLETE else if (regno < XFP_REGNUM) +// OBSOLETE { +// OBSOLETE char buffer[MAX_REGISTER_RAW_SIZE]; +// OBSOLETE +// OBSOLETE sr_write ("rs ", 3); +// OBSOLETE sr_write_cr (get_reg_name (regno)); +// OBSOLETE sr_expect ("="); +// OBSOLETE store_unsigned_integer (buffer, REGISTER_RAW_SIZE (regno), +// OBSOLETE sr_get_hex_word ()); +// OBSOLETE gr_expect_prompt (); +// OBSOLETE supply_register (regno, buffer); +// OBSOLETE } +// OBSOLETE else +// OBSOLETE { +// OBSOLETE /* Float register so we need to parse a strange data format. */ +// OBSOLETE long p; +// OBSOLETE unsigned char fpreg_buf[10]; +// OBSOLETE +// OBSOLETE sr_write ("rs ", 3); +// OBSOLETE sr_write (get_reg_name (regno), strlen (get_reg_name (regno))); +// OBSOLETE sr_write_cr (";d"); +// OBSOLETE sr_expect ("rs"); +// OBSOLETE sr_expect (get_reg_name (regno)); +// OBSOLETE sr_expect (";d"); +// OBSOLETE sr_expect ("="); +// OBSOLETE +// OBSOLETE /* sign */ +// OBSOLETE p = sr_get_hex_digit (1); +// OBSOLETE fpreg_buf[0] = p << 7; +// OBSOLETE +// OBSOLETE /* exponent */ +// OBSOLETE sr_expect ("_"); +// OBSOLETE p = sr_get_hex_digit (1); +// OBSOLETE fpreg_buf[0] += (p << 4); +// OBSOLETE fpreg_buf[0] += sr_get_hex_digit (1); +// OBSOLETE +// OBSOLETE fpreg_buf[1] = sr_get_hex_digit (1) << 4; +// OBSOLETE +// OBSOLETE /* fraction */ +// OBSOLETE sr_expect ("_"); +// OBSOLETE fpreg_buf[1] += sr_get_hex_digit (1); +// OBSOLETE +// OBSOLETE fpreg_buf[2] = (sr_get_hex_digit (1) << 4) + sr_get_hex_digit (1); +// OBSOLETE fpreg_buf[3] = (sr_get_hex_digit (1) << 4) + sr_get_hex_digit (1); +// OBSOLETE fpreg_buf[4] = (sr_get_hex_digit (1) << 4) + sr_get_hex_digit (1); +// OBSOLETE fpreg_buf[5] = (sr_get_hex_digit (1) << 4) + sr_get_hex_digit (1); +// OBSOLETE fpreg_buf[6] = (sr_get_hex_digit (1) << 4) + sr_get_hex_digit (1); +// OBSOLETE fpreg_buf[7] = (sr_get_hex_digit (1) << 4) + sr_get_hex_digit (1); +// OBSOLETE fpreg_buf[8] = 0; +// OBSOLETE fpreg_buf[9] = 0; +// OBSOLETE +// OBSOLETE gr_expect_prompt (); +// OBSOLETE supply_register (regno, fpreg_buf); +// OBSOLETE } +// OBSOLETE +// OBSOLETE return; +// OBSOLETE } +// OBSOLETE +// OBSOLETE /* Store register REGNO, or all if REGNO == -1. */ +// OBSOLETE +// OBSOLETE static void +// OBSOLETE bug_store_register (int regno) +// OBSOLETE { +// OBSOLETE char buffer[1024]; +// OBSOLETE sr_check_open (); +// OBSOLETE +// OBSOLETE if (regno == -1) +// OBSOLETE { +// OBSOLETE int i; +// OBSOLETE +// OBSOLETE for (i = 0; i < NUM_REGS; ++i) +// OBSOLETE bug_store_register (i); +// OBSOLETE } +// OBSOLETE else +// OBSOLETE { +// OBSOLETE char *regname; +// OBSOLETE +// OBSOLETE regname = get_reg_name (regno); +// OBSOLETE +// OBSOLETE if (target_is_m88110 && regno == SFIP_REGNUM) +// OBSOLETE return; +// OBSOLETE else if (regno < XFP_REGNUM) +// OBSOLETE sprintf (buffer, "rs %s %08lx", +// OBSOLETE regname, +// OBSOLETE (long) read_register (regno)); +// OBSOLETE else +// OBSOLETE { +// OBSOLETE unsigned char *fpreg_buf = +// OBSOLETE (unsigned char *) ®isters[REGISTER_BYTE (regno)]; +// OBSOLETE +// OBSOLETE sprintf (buffer, "rs %s %1x_%02x%1x_%1x%02x%02x%02x%02x%02x%02x;d", +// OBSOLETE regname, +// OBSOLETE /* sign */ +// OBSOLETE (fpreg_buf[0] >> 7) & 0xf, +// OBSOLETE /* exponent */ +// OBSOLETE fpreg_buf[0] & 0x7f, +// OBSOLETE (fpreg_buf[1] >> 8) & 0xf, +// OBSOLETE /* fraction */ +// OBSOLETE fpreg_buf[1] & 0xf, +// OBSOLETE fpreg_buf[2], +// OBSOLETE fpreg_buf[3], +// OBSOLETE fpreg_buf[4], +// OBSOLETE fpreg_buf[5], +// OBSOLETE fpreg_buf[6], +// OBSOLETE fpreg_buf[7]); +// OBSOLETE } +// OBSOLETE +// OBSOLETE sr_write_cr (buffer); +// OBSOLETE gr_expect_prompt (); +// OBSOLETE } +// OBSOLETE +// OBSOLETE return; +// OBSOLETE } +// OBSOLETE +// OBSOLETE /* Transfer LEN bytes between GDB address MYADDR and target address +// OBSOLETE MEMADDR. If WRITE is non-zero, transfer them to the target, +// OBSOLETE otherwise transfer them from the target. TARGET is unused. +// OBSOLETE +// OBSOLETE Returns the number of bytes transferred. */ +// OBSOLETE +// OBSOLETE int +// OBSOLETE bug_xfer_memory (CORE_ADDR memaddr, char *myaddr, int len, int write, +// OBSOLETE struct mem_attrib *attrib, struct target_ops *target) +// OBSOLETE { +// OBSOLETE int res; +// OBSOLETE +// OBSOLETE if (len <= 0) +// OBSOLETE return 0; +// OBSOLETE +// OBSOLETE if (write) +// OBSOLETE res = bug_write_memory (memaddr, myaddr, len); +// OBSOLETE else +// OBSOLETE res = bug_read_memory (memaddr, myaddr, len); +// OBSOLETE +// OBSOLETE return res; +// OBSOLETE } +// OBSOLETE +// OBSOLETE static void +// OBSOLETE start_load (void) +// OBSOLETE { +// OBSOLETE char *command; +// OBSOLETE +// OBSOLETE command = (srec_echo_pace ? "lo 0 ;x" : "lo 0"); +// OBSOLETE +// OBSOLETE sr_write_cr (command); +// OBSOLETE sr_expect (command); +// OBSOLETE sr_expect ("\r\n"); +// OBSOLETE bug_srec_write_cr ("S0030000FC"); +// OBSOLETE return; +// OBSOLETE } +// OBSOLETE +// OBSOLETE /* This is an extremely vulnerable and fragile function. I've made +// OBSOLETE considerable attempts to make this deterministic, but I've +// OBSOLETE certainly forgotten something. The trouble is that S-records are +// OBSOLETE only a partial file format, not a protocol. Worse, apparently the +// OBSOLETE m88k bug monitor does not run in real time while receiving +// OBSOLETE S-records. Hence, we must pay excruciating attention to when and +// OBSOLETE where error messages are returned, and what has actually been sent. +// OBSOLETE +// OBSOLETE Each call represents a chunk of memory to be sent to the target. +// OBSOLETE We break that chunk into an S0 header record, some number of S3 +// OBSOLETE data records each containing srec_bytes, and an S7 termination +// OBSOLETE record. */ +// OBSOLETE +// OBSOLETE static char *srecord_strings[] = +// OBSOLETE { +// OBSOLETE "S-RECORD", +// OBSOLETE "-Bug>", +// OBSOLETE NULL, +// OBSOLETE }; +// OBSOLETE +// OBSOLETE static int +// OBSOLETE bug_write_memory (CORE_ADDR memaddr, unsigned char *myaddr, int len) +// OBSOLETE { +// OBSOLETE int done; +// OBSOLETE int checksum; +// OBSOLETE int x; +// OBSOLETE int retries; +// OBSOLETE char *buffer = alloca ((srec_bytes + 8) << 1); +// OBSOLETE +// OBSOLETE retries = 0; +// OBSOLETE +// OBSOLETE do +// OBSOLETE { +// OBSOLETE done = 0; +// OBSOLETE +// OBSOLETE if (retries > srec_max_retries) +// OBSOLETE return (-1); +// OBSOLETE +// OBSOLETE if (retries > 0) +// OBSOLETE { +// OBSOLETE if (sr_get_debug () > 0) +// OBSOLETE printf ("\n<retrying...>\n"); +// OBSOLETE +// OBSOLETE /* This gr_expect_prompt call is extremely important. Without +// OBSOLETE it, we will tend to resend our packet so fast that it +// OBSOLETE will arrive before the bug monitor is ready to receive +// OBSOLETE it. This would lead to a very ugly resend loop. */ +// OBSOLETE +// OBSOLETE gr_expect_prompt (); +// OBSOLETE } +// OBSOLETE +// OBSOLETE start_load (); +// OBSOLETE +// OBSOLETE while (done < len) +// OBSOLETE { +// OBSOLETE int thisgo; +// OBSOLETE int idx; +// OBSOLETE char *buf = buffer; +// OBSOLETE CORE_ADDR address; +// OBSOLETE +// OBSOLETE checksum = 0; +// OBSOLETE thisgo = len - done; +// OBSOLETE if (thisgo > srec_bytes) +// OBSOLETE thisgo = srec_bytes; +// OBSOLETE +// OBSOLETE address = memaddr + done; +// OBSOLETE sprintf (buf, "S3%02X%08lX", thisgo + 4 + 1, (long) address); +// OBSOLETE buf += 12; +// OBSOLETE +// OBSOLETE checksum += (thisgo + 4 + 1 +// OBSOLETE + (address & 0xff) +// OBSOLETE + ((address >> 8) & 0xff) +// OBSOLETE + ((address >> 16) & 0xff) +// OBSOLETE + ((address >> 24) & 0xff)); +// OBSOLETE +// OBSOLETE for (idx = 0; idx < thisgo; idx++) +// OBSOLETE { +// OBSOLETE sprintf (buf, "%02X", myaddr[idx + done]); +// OBSOLETE checksum += myaddr[idx + done]; +// OBSOLETE buf += 2; +// OBSOLETE } +// OBSOLETE +// OBSOLETE if (srec_noise > 0) +// OBSOLETE { +// OBSOLETE /* FIXME-NOW: insert a deliberate error every now and then. +// OBSOLETE This is intended for testing/debugging the error handling +// OBSOLETE stuff. */ +// OBSOLETE static int counter = 0; +// OBSOLETE if (++counter > srec_noise) +// OBSOLETE { +// OBSOLETE counter = 0; +// OBSOLETE ++checksum; +// OBSOLETE } +// OBSOLETE } +// OBSOLETE +// OBSOLETE sprintf (buf, "%02X", ~checksum & 0xff); +// OBSOLETE bug_srec_write_cr (buffer); +// OBSOLETE +// OBSOLETE if (srec_sleep != 0) +// OBSOLETE sleep (srec_sleep); +// OBSOLETE +// OBSOLETE /* This pollchar is probably redundant to the gr_multi_scan +// OBSOLETE below. Trouble is, we can't be sure when or where an +// OBSOLETE error message will appear. Apparently, when running at +// OBSOLETE full speed from a typical sun4, error messages tend to +// OBSOLETE appear to arrive only *after* the s7 record. */ +// OBSOLETE +// OBSOLETE if ((x = sr_pollchar ()) != 0) +// OBSOLETE { +// OBSOLETE if (sr_get_debug () > 0) +// OBSOLETE printf ("\n<retrying...>\n"); +// OBSOLETE +// OBSOLETE ++retries; +// OBSOLETE +// OBSOLETE /* flush any remaining input and verify that we are back +// OBSOLETE at the prompt level. */ +// OBSOLETE gr_expect_prompt (); +// OBSOLETE /* start all over again. */ +// OBSOLETE start_load (); +// OBSOLETE done = 0; +// OBSOLETE continue; +// OBSOLETE } +// OBSOLETE +// OBSOLETE done += thisgo; +// OBSOLETE } +// OBSOLETE +// OBSOLETE bug_srec_write_cr ("S7060000000000F9"); +// OBSOLETE ++retries; +// OBSOLETE +// OBSOLETE /* Having finished the load, we need to figure out whether we +// OBSOLETE had any errors. */ +// OBSOLETE } +// OBSOLETE while (gr_multi_scan (srecord_strings, 0) == 0);; +// OBSOLETE +// OBSOLETE return (0); +// OBSOLETE } +// OBSOLETE +// OBSOLETE /* Copy LEN bytes of data from debugger memory at MYADDR +// OBSOLETE to inferior's memory at MEMADDR. Returns errno value. +// OBSOLETE * sb/sh instructions don't work on unaligned addresses, when TU=1. +// OBSOLETE */ +// OBSOLETE +// OBSOLETE /* Read LEN bytes from inferior memory at MEMADDR. Put the result +// OBSOLETE at debugger address MYADDR. Returns errno value. */ +// OBSOLETE static int +// OBSOLETE bug_read_memory (CORE_ADDR memaddr, unsigned char *myaddr, int len) +// OBSOLETE { +// OBSOLETE char request[100]; +// OBSOLETE char *buffer; +// OBSOLETE char *p; +// OBSOLETE char type; +// OBSOLETE char size; +// OBSOLETE unsigned char c; +// OBSOLETE unsigned int inaddr; +// OBSOLETE unsigned int checksum; +// OBSOLETE +// OBSOLETE sprintf (request, "du 0 %lx:&%d", (long) memaddr, len); +// OBSOLETE sr_write_cr (request); +// OBSOLETE +// OBSOLETE p = buffer = alloca (len); +// OBSOLETE +// OBSOLETE /* scan up through the header */ +// OBSOLETE sr_expect ("S0030000FC"); +// OBSOLETE +// OBSOLETE while (p < buffer + len) +// OBSOLETE { +// OBSOLETE /* scan off any white space. */ +// OBSOLETE while (sr_readchar () != 'S');; +// OBSOLETE +// OBSOLETE /* what kind of s-rec? */ +// OBSOLETE type = sr_readchar (); +// OBSOLETE +// OBSOLETE /* scan record size */ +// OBSOLETE sr_get_hex_byte (&size); +// OBSOLETE checksum = size; +// OBSOLETE --size; +// OBSOLETE inaddr = 0; +// OBSOLETE +// OBSOLETE switch (type) +// OBSOLETE { +// OBSOLETE case '7': +// OBSOLETE case '8': +// OBSOLETE case '9': +// OBSOLETE goto done; +// OBSOLETE +// OBSOLETE case '3': +// OBSOLETE sr_get_hex_byte (&c); +// OBSOLETE inaddr = (inaddr << 8) + c; +// OBSOLETE checksum += c; +// OBSOLETE --size; +// OBSOLETE /* intentional fall through */ +// OBSOLETE case '2': +// OBSOLETE sr_get_hex_byte (&c); +// OBSOLETE inaddr = (inaddr << 8) + c; +// OBSOLETE checksum += c; +// OBSOLETE --size; +// OBSOLETE /* intentional fall through */ +// OBSOLETE case '1': +// OBSOLETE sr_get_hex_byte (&c); +// OBSOLETE inaddr = (inaddr << 8) + c; +// OBSOLETE checksum += c; +// OBSOLETE --size; +// OBSOLETE sr_get_hex_byte (&c); +// OBSOLETE inaddr = (inaddr << 8) + c; +// OBSOLETE checksum += c; +// OBSOLETE --size; +// OBSOLETE break; +// OBSOLETE +// OBSOLETE default: +// OBSOLETE /* bonk */ +// OBSOLETE error ("reading s-records."); +// OBSOLETE } +// OBSOLETE +// OBSOLETE if (inaddr < memaddr +// OBSOLETE || (memaddr + len) < (inaddr + size)) +// OBSOLETE error ("srec out of memory range."); +// OBSOLETE +// OBSOLETE if (p != buffer + inaddr - memaddr) +// OBSOLETE error ("srec out of sequence."); +// OBSOLETE +// OBSOLETE for (; size; --size, ++p) +// OBSOLETE { +// OBSOLETE sr_get_hex_byte (p); +// OBSOLETE checksum += *p; +// OBSOLETE } +// OBSOLETE +// OBSOLETE sr_get_hex_byte (&c); +// OBSOLETE if (c != (~checksum & 0xff)) +// OBSOLETE error ("bad s-rec checksum"); +// OBSOLETE } +// OBSOLETE +// OBSOLETE done: +// OBSOLETE gr_expect_prompt (); +// OBSOLETE if (p != buffer + len) +// OBSOLETE return (1); +// OBSOLETE +// OBSOLETE memcpy (myaddr, buffer, len); +// OBSOLETE return (0); +// OBSOLETE } +// OBSOLETE +// OBSOLETE #define MAX_BREAKS 16 +// OBSOLETE static int num_brkpts = 0; +// OBSOLETE +// OBSOLETE /* Insert a breakpoint at ADDR. SAVE is normally the address of the +// OBSOLETE pattern buffer where the instruction that the breakpoint overwrites +// OBSOLETE is saved. It is unused here since the bug is responsible for +// OBSOLETE saving/restoring the original instruction. */ +// OBSOLETE +// OBSOLETE static int +// OBSOLETE bug_insert_breakpoint (CORE_ADDR addr, char *save) +// OBSOLETE { +// OBSOLETE sr_check_open (); +// OBSOLETE +// OBSOLETE if (num_brkpts < MAX_BREAKS) +// OBSOLETE { +// OBSOLETE char buffer[100]; +// OBSOLETE +// OBSOLETE num_brkpts++; +// OBSOLETE sprintf (buffer, "br %lx", (long) addr); +// OBSOLETE sr_write_cr (buffer); +// OBSOLETE gr_expect_prompt (); +// OBSOLETE return (0); +// OBSOLETE } +// OBSOLETE else +// OBSOLETE { +// OBSOLETE fprintf_filtered (gdb_stderr, +// OBSOLETE "Too many break points, break point not installed\n"); +// OBSOLETE return (1); +// OBSOLETE } +// OBSOLETE +// OBSOLETE } +// OBSOLETE +// OBSOLETE /* Remove a breakpoint at ADDR. SAVE is normally the previously +// OBSOLETE saved pattern, but is unused here since the bug is responsible +// OBSOLETE for saving/restoring instructions. */ +// OBSOLETE +// OBSOLETE static int +// OBSOLETE bug_remove_breakpoint (CORE_ADDR addr, char *save) +// OBSOLETE { +// OBSOLETE if (num_brkpts > 0) +// OBSOLETE { +// OBSOLETE char buffer[100]; +// OBSOLETE +// OBSOLETE num_brkpts--; +// OBSOLETE sprintf (buffer, "nobr %lx", (long) addr); +// OBSOLETE sr_write_cr (buffer); +// OBSOLETE gr_expect_prompt (); +// OBSOLETE +// OBSOLETE } +// OBSOLETE return (0); +// OBSOLETE } +// OBSOLETE +// OBSOLETE /* Clear the bugs notion of what the break points are */ +// OBSOLETE static int +// OBSOLETE bug_clear_breakpoints (void) +// OBSOLETE { +// OBSOLETE +// OBSOLETE if (sr_is_open ()) +// OBSOLETE { +// OBSOLETE sr_write_cr ("nobr"); +// OBSOLETE sr_expect ("nobr"); +// OBSOLETE gr_expect_prompt (); +// OBSOLETE } +// OBSOLETE num_brkpts = 0; +// OBSOLETE return (0); +// OBSOLETE } +// OBSOLETE +// OBSOLETE struct target_ops bug_ops; +// OBSOLETE +// OBSOLETE static void +// OBSOLETE init_bug_ops (void) +// OBSOLETE { +// OBSOLETE bug_ops.to_shortname = "bug"; +// OBSOLETE "Remote BUG monitor", +// OBSOLETE bug_ops.to_longname = "Use the mvme187 board running the BUG monitor connected by a serial line."; +// OBSOLETE bug_ops.to_doc = " "; +// OBSOLETE bug_ops.to_open = bug_open; +// OBSOLETE bug_ops.to_close = gr_close; +// OBSOLETE bug_ops.to_attach = 0; +// OBSOLETE bug_ops.to_post_attach = NULL; +// OBSOLETE bug_ops.to_require_attach = NULL; +// OBSOLETE bug_ops.to_detach = gr_detach; +// OBSOLETE bug_ops.to_require_detach = NULL; +// OBSOLETE bug_ops.to_resume = bug_resume; +// OBSOLETE bug_ops.to_wait = bug_wait; +// OBSOLETE bug_ops.to_post_wait = NULL; +// OBSOLETE bug_ops.to_fetch_registers = bug_fetch_register; +// OBSOLETE bug_ops.to_store_registers = bug_store_register; +// OBSOLETE bug_ops.to_prepare_to_store = gr_prepare_to_store; +// OBSOLETE bug_ops.to_xfer_memory = bug_xfer_memory; +// OBSOLETE bug_ops.to_files_info = gr_files_info; +// OBSOLETE bug_ops.to_insert_breakpoint = bug_insert_breakpoint; +// OBSOLETE bug_ops.to_remove_breakpoint = bug_remove_breakpoint; +// OBSOLETE bug_ops.to_terminal_init = 0; +// OBSOLETE bug_ops.to_terminal_inferior = 0; +// OBSOLETE bug_ops.to_terminal_ours_for_output = 0; +// OBSOLETE bug_ops.to_terminal_ours = 0; +// OBSOLETE bug_ops.to_terminal_info = 0; +// OBSOLETE bug_ops.to_kill = gr_kill; +// OBSOLETE bug_ops.to_load = bug_load; +// OBSOLETE bug_ops.to_lookup_symbol = 0; +// OBSOLETE bug_ops.to_create_inferior = gr_create_inferior; +// OBSOLETE bug_ops.to_post_startup_inferior = NULL; +// OBSOLETE bug_ops.to_acknowledge_created_inferior = NULL; +// OBSOLETE bug_ops.to_clone_and_follow_inferior = NULL; +// OBSOLETE bug_ops.to_post_follow_inferior_by_clone = NULL; +// OBSOLETE bug_ops.to_insert_fork_catchpoint = NULL; +// OBSOLETE bug_ops.to_remove_fork_catchpoint = NULL; +// OBSOLETE bug_ops.to_insert_vfork_catchpoint = NULL; +// OBSOLETE bug_ops.to_remove_vfork_catchpoint = NULL; +// OBSOLETE bug_ops.to_has_forked = NULL; +// OBSOLETE bug_ops.to_has_vforked = NULL; +// OBSOLETE bug_ops.to_can_follow_vfork_prior_to_exec = NULL; +// OBSOLETE bug_ops.to_post_follow_vfork = NULL; +// OBSOLETE bug_ops.to_insert_exec_catchpoint = NULL; +// OBSOLETE bug_ops.to_remove_exec_catchpoint = NULL; +// OBSOLETE bug_ops.to_has_execd = NULL; +// OBSOLETE bug_ops.to_reported_exec_events_per_exec_call = NULL; +// OBSOLETE bug_ops.to_has_exited = NULL; +// OBSOLETE bug_ops.to_mourn_inferior = gr_mourn; +// OBSOLETE bug_ops.to_can_run = 0; +// OBSOLETE bug_ops.to_notice_signals = 0; +// OBSOLETE bug_ops.to_thread_alive = 0; +// OBSOLETE bug_ops.to_stop = 0; +// OBSOLETE bug_ops.to_pid_to_exec_file = NULL; +// OBSOLETE bug_ops.to_stratum = process_stratum; +// OBSOLETE bug_ops.DONT_USE = 0; +// OBSOLETE bug_ops.to_has_all_memory = 1; +// OBSOLETE bug_ops.to_has_memory = 1; +// OBSOLETE bug_ops.to_has_stack = 1; +// OBSOLETE bug_ops.to_has_registers = 0; +// OBSOLETE bug_ops.to_has_execution = 0; +// OBSOLETE bug_ops.to_sections = 0; +// OBSOLETE bug_ops.to_sections_end = 0; +// OBSOLETE bug_ops.to_magic = OPS_MAGIC; /* Always the last thing */ +// OBSOLETE } /* init_bug_ops */ +// OBSOLETE +// OBSOLETE void +// OBSOLETE _initialize_remote_bug (void) +// OBSOLETE { +// OBSOLETE init_bug_ops (); +// OBSOLETE add_target (&bug_ops); +// OBSOLETE +// OBSOLETE add_show_from_set +// OBSOLETE (add_set_cmd ("srec-bytes", class_support, var_uinteger, +// OBSOLETE (char *) &srec_bytes, +// OBSOLETE "\ +// OBSOLETE Set the number of bytes represented in each S-record.\n\ +// OBSOLETE This affects the communication protocol with the remote target.", +// OBSOLETE &setlist), +// OBSOLETE &showlist); +// OBSOLETE +// OBSOLETE add_show_from_set +// OBSOLETE (add_set_cmd ("srec-max-retries", class_support, var_uinteger, +// OBSOLETE (char *) &srec_max_retries, +// OBSOLETE "\ +// OBSOLETE Set the number of retries for shipping S-records.\n\ +// OBSOLETE This affects the communication protocol with the remote target.", +// OBSOLETE &setlist), +// OBSOLETE &showlist); +// OBSOLETE +// OBSOLETE #if 0 +// OBSOLETE /* This needs to set SREC_SIZE, not srec_frame which gets changed at the +// OBSOLETE end of a download. But do we need the option at all? */ +// OBSOLETE add_show_from_set +// OBSOLETE (add_set_cmd ("srec-frame", class_support, var_uinteger, +// OBSOLETE (char *) &srec_frame, +// OBSOLETE "\ +// OBSOLETE Set the number of bytes in an S-record frame.\n\ +// OBSOLETE This affects the communication protocol with the remote target.", +// OBSOLETE &setlist), +// OBSOLETE &showlist); +// OBSOLETE #endif /* 0 */ +// OBSOLETE +// OBSOLETE add_show_from_set +// OBSOLETE (add_set_cmd ("srec-noise", class_support, var_zinteger, +// OBSOLETE (char *) &srec_noise, +// OBSOLETE "\ +// OBSOLETE Set number of S-record to send before deliberately flubbing a checksum.\n\ +// OBSOLETE Zero means flub none at all. This affects the communication protocol\n\ +// OBSOLETE with the remote target.", +// OBSOLETE &setlist), +// OBSOLETE &showlist); +// OBSOLETE +// OBSOLETE add_show_from_set +// OBSOLETE (add_set_cmd ("srec-sleep", class_support, var_zinteger, +// OBSOLETE (char *) &srec_sleep, +// OBSOLETE "\ +// OBSOLETE Set number of seconds to sleep after an S-record for a possible error message to arrive.\n\ +// OBSOLETE This affects the communication protocol with the remote target.", +// OBSOLETE &setlist), +// OBSOLETE &showlist); +// OBSOLETE +// OBSOLETE add_show_from_set +// OBSOLETE (add_set_cmd ("srec-echo-pace", class_support, var_boolean, +// OBSOLETE (char *) &srec_echo_pace, +// OBSOLETE "\ +// OBSOLETE Set echo-verification.\n\ +// OBSOLETE When on, use verification by echo when downloading S-records. This is\n\ +// OBSOLETE much slower, but generally more reliable.", +// OBSOLETE &setlist), +// OBSOLETE &showlist); +// OBSOLETE } |