add MEM_FNS_DECLARED
[deliverable/binutils-gdb.git] / gdb / remote.c
index 27a73222baaf9d057c7c11d5b3b301096eaa3bfb..e7f249968ba9a5d52bad1ad893e3bd5b69475e4a 100644 (file)
@@ -1,22 +1,21 @@
-/* Memory-access and commands for inferior process, for GDB.
-   Copyright (C)  1988 Free Software Foundation, Inc.
-
-GDB is distributed in the hope that it will be useful, but WITHOUT ANY
-WARRANTY.  No author or distributor accepts responsibility to anyone
-for the consequences of using it or for whether it serves any
-particular purpose or works at all, unless he says so in writing.
-Refer to the GDB General Public License for full details.
-
-Everyone is granted permission to copy, modify and redistribute GDB,
-but only under the conditions described in the GDB General Public
-License.  A copy of this license is supposed to have been given to you
-along with GDB so you can know your rights and responsibilities.  It
-should be in a file named COPYING.  Among other things, the copyright
-notice and this notice must be preserved on all copies.
-
-In other words, go ahead and share GDB, but don't try to stop
-anyone else from sharing it farther.  Help stamp out software hoarding!
-*/
+/* Remote target communications for serial-line targets in custom GDB protocol
+   Copyright 1988, 1991, 1992 Free Software Foundation, Inc.
+
+This file is part of GDB.
+
+This program is free software; you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation; either version 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., 675 Mass Ave, Cambridge, MA 02139, USA.  */
 
 /* Remote communication protocol.
    All values are encoded in ascii hex digits.
@@ -55,85 +54,291 @@ anyone else from sharing it farther.  Help stamp out software hoarding!
                                        If AA..AA is omitted,
                                        resume at same address.
 
+       last signal     ?               Reply the current reason for stopping.
+                                        This is the same reply as is generated
+                                       for step or cont : SAA where AA is the
+                                       signal number.
+
        There is no immediate reply to step or cont.
        The reply comes when the machine stops.
        It is           SAA             AA is the "signal number"
 
+       or...           TAAPPPPPPPPFFFFFFFF
+                                       where AA is the signal number,
+                                       PPPPPPPP is the PC (PC_REGNUM), and
+                                       FFFFFFFF is the frame ptr (FP_REGNUM).
+
        kill req        k
 */
 
-#include <stdio.h>
-#include <signal.h>
-
 #include "defs.h"
-#include "initialize.h"
-#include "param.h"
+#include <string.h>
+#include <fcntl.h>
 #include "frame.h"
 #include "inferior.h"
-
+#include "target.h"
 #include "wait.h"
-#include <sys/ioctl.h>
-#include <a.out.h>
-#include <sys/file.h>
+#include "terminal.h"
+#include "gdbcmd.h"
 
-#ifdef HAVE_TERMIO
-#include <termio.h>
-#undef TIOCGETP
-#define TIOCGETP TCGETA
-#undef TIOCSETN
-#define TIOCSETN TCSETA
-#undef TIOCSETP
-#define TIOCSETP TCSETAF
-#define TERMINAL struct termio
-#else
-#include <sgtty.h>
-#define TERMINAL struct sgttyb
+#if !defined(DONT_USE_REMOTE)
+#ifdef USG
+#include <sys/types.h>
 #endif
 
-int kiodebug;
+#include <signal.h>
+
+/* Prototypes for local functions */
+
+static void
+remote_write_bytes PARAMS ((CORE_ADDR, char *, int));
+
+static void
+remote_read_bytes PARAMS ((CORE_ADDR, char *, int));
+
+static void
+remote_files_info PARAMS ((struct target_ops *));
+
+static int
+remote_xfer_memory PARAMS ((CORE_ADDR, char *, int, int, struct target_ops *));
+
+static void 
+remote_prepare_to_store PARAMS ((void));
+
+static void
+remote_fetch_registers PARAMS ((int));
+
+static void
+remote_resume PARAMS ((int, int));
+
+static void
+remote_open PARAMS ((char *, int));
+
+static void
+remote_close PARAMS ((int));
+
+static void
+remote_store_registers PARAMS ((int));
+
+static void
+getpkt PARAMS ((char *));
+
+static void
+putpkt PARAMS ((char *));
+
+static void
+remote_send PARAMS ((char *));
+
+static int
+readchar PARAMS ((void));
+
+static int
+remote_wait PARAMS ((WAITTYPE *));
+
+static int
+tohex PARAMS ((int));
+
+static int
+fromhex PARAMS ((int));
+
+static void
+remote_detach PARAMS ((char *, int));
+
+
+extern struct target_ops remote_ops;   /* Forward decl */
 
+static int kiodebug = 0;
+static int timeout = 5;
+
+#if 0
 int icache;
+#endif
 
-/* Descriptor for I/O to remote machine.  */
-int remote_desc;
+/* Descriptor for I/O to remote machine.  Initialize it to -1 so that
+   remote_open knows that we don't have a file open when the program
+   starts.  */
+int remote_desc = -1;
 
-#define        PBUFSIZ 300
+#define        PBUFSIZ 1024
 
-static void remote_send ();
-static void putpkt ();
-static void getpkt ();
-static void dcache_flush ();
+/* Maximum number of bytes to read/write at once.  The value here
+   is chosen to fill up a packet (the headers account for the 32).  */
+#define MAXBUFBYTES ((PBUFSIZ-32)/2)
 
-START_FILE
+/* Round up PBUFSIZ to hold all the registers, at least.  */
+#if REGISTER_BYTES > MAXBUFBYTES
+#undef PBUFSIZ
+#define        PBUFSIZ (REGISTER_BYTES * 2 + 32)
+#endif
 \f
+/* Called when SIGALRM signal sent due to alarm() timeout.  */
+#ifndef HAVE_TERMIO
+void
+remote_timer (signo)
+     int signo;
+{
+  if (kiodebug)
+    printf ("remote_timer called\n");
+
+  alarm (timeout);
+}
+#endif
+
+/* Clean up connection to a remote debugger.  */
+
+/* ARGSUSED */
+static void
+remote_close (quitting)
+     int quitting;
+{
+  if (remote_desc >= 0)
+    close (remote_desc);
+  remote_desc = -1;
+}
+
+/* Translate baud rates from integers to damn B_codes.  Unix should
+   have outgrown this crap years ago, but even POSIX wouldn't buck it.  */
+
+#ifndef B19200
+#define B19200 EXTA
+#endif
+#ifndef B38400
+#define B38400 EXTB
+#endif
+
+
+
+static struct {int rate, damn_b;} baudtab[] = {
+       {0, B0},
+       {50, B50},
+       {75, B75},
+       {110, B110},
+       {134, B134},
+       {150, B150},
+       {200, B200},
+       {300, B300},
+       {600, B600},
+       {1200, B1200},
+       {1800, B1800},
+       {2400, B2400},
+       {4800, B4800},
+       {9600, B9600},
+       {19200, B19200},
+       {38400, B38400},
+       {-1, -1},
+};
+
+static int
+damn_b (rate)
+     int rate;
+{
+  int i;
+
+  for (i = 0; baudtab[i].rate != -1; i++)
+    if (rate == baudtab[i].rate) return baudtab[i].damn_b;
+  return B38400;       /* Random */
+}
+
 /* Open a connection to a remote debugger.
    NAME is the filename used for communication.  */
 
-void
+static void
 remote_open (name, from_tty)
      char *name;
      int from_tty;
 {
   TERMINAL sg;
+  int a_rate, b_rate = 0;
+  int baudrate_set = 0;
+
+  if (name == 0)
+    error (
+"To open a remote debug connection, you need to specify what serial\n\
+device is attached to the remote system (e.g. /dev/ttya).");
 
-  remote_debugging = 0;
+  target_preopen (from_tty);
+
+  remote_close (0);
+
+#if 0
   dcache_init ();
+#endif
 
   remote_desc = open (name, O_RDWR);
   if (remote_desc < 0)
     perror_with_name (name);
 
+  if (baud_rate)
+    {
+      if (sscanf (baud_rate, "%d", &a_rate) == 1)
+       {
+         b_rate = damn_b (a_rate);
+         baudrate_set = 1;
+       }
+    }
+
   ioctl (remote_desc, TIOCGETP, &sg);
 #ifdef HAVE_TERMIO
-  sg.c_lflag &= ~ICANON;
+  sg.c_cc[VMIN] = 0;           /* read with timeout.  */
+  sg.c_cc[VTIME] = timeout * 10;
+  sg.c_lflag &= ~(ICANON | ECHO);
+  sg.c_cflag &= ~PARENB;       /* No parity */
+  sg.c_cflag |= CS8;           /* 8-bit path */
+  if (baudrate_set)
+    sg.c_cflag = (sg.c_cflag & ~CBAUD) | b_rate;
 #else
-  sg.sg_flags = RAW;
+  sg.sg_flags |= RAW | ANYP;
+  sg.sg_flags &= ~ECHO;
+  if (baudrate_set)
+    {
+      sg.sg_ispeed = b_rate;
+      sg.sg_ospeed = b_rate;
+    }
 #endif
   ioctl (remote_desc, TIOCSETP, &sg);
 
   if (from_tty)
     printf ("Remote debugging using %s\n", name);
-  remote_debugging = 1;
+  push_target (&remote_ops);   /* Switch to using remote target now */
+
+#ifndef HAVE_TERMIO
+#ifndef NO_SIGINTERRUPT
+  /* Cause SIGALRM's to make reads fail.  */
+  if (siginterrupt (SIGALRM, 1) != 0)
+    perror ("remote_open: error in siginterrupt");
+#endif
+
+  /* Set up read timeout timer.  */
+  if ((void (*)()) signal (SIGALRM, remote_timer) == (void (*)()) -1)
+    perror ("remote_open: error in signal");
+#endif
+
+  /* Ack any packet which the remote side has already sent.  */
+  write (remote_desc, "+\r", 2);
+  putpkt ("?");                        /* initiate a query from remote machine */
+
+  start_remote ();             /* Initialize gdb process mechanisms */
+}
+
+/* remote_detach()
+   takes a program previously attached to and detaches it.
+   We better not have left any breakpoints
+   in the program or it'll die when it hits one.
+   Close the open connection to the remote debugger.
+   Use this when you want to detach and do something else
+   with your gdb.  */
+
+static void
+remote_detach (args, from_tty)
+     char *args;
+     int from_tty;
+{
+  if (args)
+    error ("Argument given to \"detach\" when remotely debugging.");
+  
+  pop_target ();
+  if (from_tty)
+    printf ("Ending remote debugging.\n");
 }
 
 /* Convert hex digit A to a number.  */
@@ -148,6 +353,7 @@ fromhex (a)
     return a - 'a' + 10;
   else
     error ("Reply contains invalid hex digit");
+  return -1;
 }
 
 /* Convert number NIB to a hex digit.  */
@@ -164,52 +370,122 @@ tohex (nib)
 \f
 /* Tell the remote machine to resume.  */
 
-int
-remote_resume (step, signal)
-     int step, signal;
+static void
+remote_resume (step, siggnal)
+     int step, siggnal;
 {
   char buf[PBUFSIZ];
 
+  if (siggnal)
+    error ("Can't send signals to a remote system.  Try `handle %d ignore'.",
+          siggnal);
+
+#if 0
   dcache_flush ();
+#endif
 
   strcpy (buf, step ? "s": "c");
 
   putpkt (buf);
 }
 
+/* Send ^C to target to halt it.  Target will respond, and send us a
+   packet.  */
+
+void remote_interrupt(signo)
+     int signo;
+{
+  
+  if (kiodebug)
+    printf ("remote_interrupt called\n");
+
+  write (remote_desc, "\003", 1);      /* Send a ^C */
+}
+
+
 /* Wait until the remote machine stops, then return,
-   storing status in STATUS just as `wait' would.  */
+   storing status in STATUS just as `wait' would.
+   Returns "pid" (though it's not clear what, if anything, that
+   means in the case of this target).  */
 
-int
+static int
 remote_wait (status)
      WAITTYPE *status;
 {
-  char buf[PBUFSIZ];
+  unsigned char buf[PBUFSIZ];
+  void (*ofunc)();
+  unsigned char *p;
+  int i;
+  long regno;
+  char regs[MAX_REGISTER_RAW_SIZE];
 
   WSETEXIT ((*status), 0);
-  getpkt (buf);
+
+  ofunc = (void (*)()) signal (SIGINT, remote_interrupt);
+  getpkt ((char *) buf);
+  signal (SIGINT, ofunc);
+
   if (buf[0] == 'E')
     error ("Remote failure reply: %s", buf);
-  if (buf[0] != 'S')
+  if (buf[0] == 'T')
+    {
+      /* Expedited reply, containing Signal, {regno, reg} repeat */
+      /*  format is:  'Tssn...:r...;n...:r...;n...:r...;#cc', where
+         ss = signal number
+         n... = register number
+         r... = register contents
+         */
+
+      p = &buf[3];             /* after Txx */
+
+      while (*p)
+       {
+         regno = strtol (p, &p, 16); /* Read the register number */
+
+         if (*p++ != ':'
+             || regno >= NUM_REGS)
+           error ("Remote sent bad register number %s", buf);
+
+         for (i = 0; i < REGISTER_RAW_SIZE (regno); i++)
+           {
+             if (p[0] == 0 || p[1] == 0)
+               error ("Remote reply is too short: %s", buf);
+             regs[i] = fromhex (p[0]) * 16 + fromhex (p[1]);
+             p += 2;
+           }
+
+         if (*p++ != ';')
+           error("Remote register badly formatted: %s", buf);
+
+         supply_register (regno, regs);
+       }
+    }
+  else if (buf[0] != 'S')
     error ("Invalid remote reply: %s", buf);
+
   WSETSTOP ((*status), (((fromhex (buf[1])) << 4) + (fromhex (buf[2]))));
+
+  return 0;
 }
 
 /* Read the remote registers into the block REGS.  */
-
-void
-remote_fetch_registers (regs)
-     char *regs;
+/* Currently we just read all the registers, so we don't use regno.  */
+/* ARGSUSED */
+static void
+remote_fetch_registers (regno)
+     int regno;
 {
   char buf[PBUFSIZ];
   int i;
   char *p;
+  char regs[REGISTER_BYTES];
 
   sprintf (buf, "g");
   remote_send (buf);
 
-  /* Reply describes registers byte by byte,
-     each byte encoded as two hex characters.  */
+  /* Reply describes registers byte by byte, each byte encoded as two
+     hex characters.  Suck them all up, then supply them to the
+     register cacheing/storage mechanism.  */
 
   p = buf;
   for (i = 0; i < REGISTER_BYTES; i++)
@@ -219,13 +495,27 @@ remote_fetch_registers (regs)
       regs[i] = fromhex (p[0]) * 16 + fromhex (p[1]);
       p += 2;
     }
+  for (i = 0; i < NUM_REGS; i++)
+    supply_register (i, &regs[REGISTER_BYTE(i)]);
 }
 
-/* Store the remote registers from the contents of the block REGS.  */
+/* Prepare to store registers.  Since we send them all, we have to
+   read out the ones we don't want to change first.  */
 
-void
-remote_store_registers (regs)
-     char *regs;
+static void 
+remote_prepare_to_store ()
+{
+  /* Make sure the entire registers array is valid.  */
+  read_register_bytes (0, (char *)NULL, REGISTER_BYTES);
+}
+
+/* Store the remote registers from the contents of the block REGISTERS. 
+   FIXME, eventually just store one register if that's all that is needed.  */
+
+/* ARGSUSED */
+static void
+remote_store_registers (regno)
+     int regno;
 {
   char buf[PBUFSIZ];
   int i;
@@ -239,13 +529,15 @@ remote_store_registers (regs)
   p = buf + 1;
   for (i = 0; i < REGISTER_BYTES; i++)
     {
-      *p++ = (regs[i] > 4) & 0xf;
-      *p++ = regs[i] & 0xf;
+      *p++ = tohex ((registers[i] >> 4) & 0xf);
+      *p++ = tohex (registers[i] & 0xf);
     }
+  *p = '\0';
 
   remote_send (buf);
 }
 
+#if 0
 /* Read a word from remote address ADDR and return it.
    This goes through the data cache.  */
 
@@ -277,6 +569,7 @@ remote_store_word (addr, word)
 {
   dcache_poke (addr, word);
 }
+#endif /* 0 */
 \f
 /* Write memory data directly to the remote machine.
    This does not inform the data cache; the data cache uses this.
@@ -284,7 +577,7 @@ remote_store_word (addr, word)
    MYADDR is the address of the buffer in our space.
    LEN is the number of bytes.  */
 
-void
+static void
 remote_write_bytes (memaddr, myaddr, len)
      CORE_ADDR memaddr;
      char *myaddr;
@@ -299,15 +592,16 @@ remote_write_bytes (memaddr, myaddr, len)
 
   sprintf (buf, "M%x,%x:", memaddr, len);
 
-  /* Command describes registers byte by byte,
+  /* We send target system values byte by byte, in increasing byte addresses,
      each byte encoded as two hex characters.  */
 
   p = buf + strlen (buf);
   for (i = 0; i < len; i++)
     {
-      *p++ = (myaddr[i] > 4) & 0xf;
-      *p++ = myaddr[i] & 0xf;
+      *p++ = tohex ((myaddr[i] >> 4) & 0xf);
+      *p++ = tohex (myaddr[i] & 0xf);
     }
+  *p = '\0';
 
   remote_send (buf);
 }
@@ -318,7 +612,7 @@ remote_write_bytes (memaddr, myaddr, len)
    MYADDR is the address of the buffer in our space.
    LEN is the number of bytes.  */
 
-void
+static void
 remote_read_bytes (memaddr, myaddr, len)
      CORE_ADDR memaddr;
      char *myaddr;
@@ -334,11 +628,11 @@ remote_read_bytes (memaddr, myaddr, len)
   sprintf (buf, "m%x,%x", memaddr, len);
   remote_send (buf);
 
-  /* Reply describes registers byte by byte,
+  /* Reply describes memory byte by byte,
      each byte encoded as two hex characters.  */
 
   p = buf;
-  for (i = 0; i < REGISTER_BYTES; i++)
+  for (i = 0; i < len; i++)
     {
       if (p[0] == 0 || p[1] == 0)
        error ("Remote reply is too short: %s", buf);
@@ -347,6 +641,46 @@ remote_read_bytes (memaddr, myaddr, len)
     }
 }
 \f
+/* Read or write LEN bytes from inferior memory at MEMADDR, transferring
+   to or from debugger address MYADDR.  Write to inferior if SHOULD_WRITE is
+   nonzero.  Returns length of data written or read; 0 for error.  */
+
+/* ARGSUSED */
+static int
+remote_xfer_memory(memaddr, myaddr, len, should_write, target)
+     CORE_ADDR memaddr;
+     char *myaddr;
+     int len;
+     int should_write;
+     struct target_ops *target;                        /* ignored */
+{
+  int origlen = len;
+  int xfersize;
+  while (len > 0)
+    {
+      if (len > MAXBUFBYTES)
+       xfersize = MAXBUFBYTES;
+      else
+       xfersize = len;
+
+      if (should_write)
+        remote_write_bytes(memaddr, myaddr, xfersize);
+      else
+       remote_read_bytes (memaddr, myaddr, xfersize);
+      memaddr += xfersize;
+      myaddr  += xfersize;
+      len     -= xfersize;
+    }
+  return origlen; /* no error possible */
+}
+
+static void
+remote_files_info (ignore)
+struct target_ops *ignore;
+{
+  printf ("Debugging a target over a serial line.\n");
+}
+\f
 /*
 
 A debug packet whose contents are <data>
@@ -368,6 +702,36 @@ Receiver responds with:
 
 */
 
+/* Read a single character from the remote end.
+   (If supported, we actually read many characters and buffer them up.)  */
+
+static int
+readchar ()
+{
+  static int inbuf_index, inbuf_count;
+#define        INBUFSIZE       PBUFSIZ
+  static char inbuf[INBUFSIZE];
+
+  if (inbuf_index >= inbuf_count)
+    {
+      /* Time to do another read... */
+      inbuf_index = 0;
+      inbuf_count = 0;
+      inbuf[0] = 0;            /* Just in case */
+#ifdef HAVE_TERMIO
+      /* termio does the timeout for us.  */
+      inbuf_count = read (remote_desc, inbuf, INBUFSIZE);
+#else
+      alarm (timeout);
+      inbuf_count = read (remote_desc, inbuf, INBUFSIZE);
+      alarm (0);
+#endif
+    }
+
+  /* Just return the next character from the buffer.  */
+  return inbuf[inbuf_index++] & 0x7f;
+}
+
 /* Send the command in BUF to the remote machine,
    and read the reply into BUF.
    Report an error if we get an error reply.  */
@@ -376,7 +740,7 @@ static void
 remote_send (buf)
      char *buf;
 {
-  int i;
+
   putpkt (buf);
   getpkt (buf);
 
@@ -392,18 +756,18 @@ putpkt (buf)
      char *buf;
 {
   int i;
-  char csum = 0;
-  char buf2[500];
-  char buf3[1];
+  unsigned char csum = 0;
+  char buf2[PBUFSIZ];
   int cnt = strlen (buf);
+  char ch;
   char *p;
 
-  if (kiodebug)
-    fprintf (stderr, "Sending packet: %s\n", buf);
-
   /* Copy the packet into buffer BUF2, encapsulating it
      and giving it a checksum.  */
 
+  if (cnt > sizeof(buf2) - 5)          /* Prosanity check */
+    abort();
+
   p = buf2;
   *p++ = '$';
 
@@ -419,33 +783,60 @@ putpkt (buf)
   /* Send it over and over until we get a positive ack.  */
 
   do {
+    if (kiodebug)
+      {
+       *p = '\0';
+       printf ("Sending packet: %s...", buf2);  fflush(stdout);
+      }
     write (remote_desc, buf2, p - buf2);
-    read (remote_desc, buf3, 1);
-  } while (buf3[0] != '+');
-}
 
-static int
-readchar ()
-{
-  char buf[1];
-  while (read (remote_desc, buf, 1) != 1) ;
-  return buf[0] & 0x7f;
+    /* read until either a timeout occurs (\0) or '+' is read */
+    do {
+      ch = readchar ();
+      if (kiodebug) {
+       if (ch == '+')
+         printf("Ack\n");
+       else
+         printf ("%02X%c ", ch&0xFF, ch);
+      }
+    } while ((ch != '+') && (ch != '\0'));
+  } while (ch != '+');
 }
 
 /* Read a packet from the remote machine, with error checking,
-   and store it in BUF.  */
+   and store it in BUF.  BUF is expected to be of size PBUFSIZ.  */
 
 static void
 getpkt (buf)
      char *buf;
 {
   char *bp;
-  char csum = 0;
-  int c, c1, c2;
-  extern kiodebug;
+  unsigned char csum;
+  int c;
+  unsigned char c1, c2;
+  int retries = 0;
+#define MAX_RETRIES    10
+
+#if 0
+  /* Sorry, this will cause all hell to break loose, i.e. we'll end
+     up in the command loop with an inferior, but (at least if this
+     happens in remote_wait or some such place) without a current_frame,
+     having set up prev_* in wait_for_inferior, etc.
+
+     If it is necessary to have such an "emergency exit", seems like
+     the only plausible thing to do is to say the inferior died, and
+     make the user reattach if they want to.  Perhaps with a prompt
+     asking for confirmation.  */
+
+  /* allow immediate quit while reading from device, it could be hung */
+  immediate_quit++;
+#endif /* 0 */
 
   while (1)
     {
+      /* Force csum to be zero here because of possible error retry.  */
+      csum = 0;
+      
       while ((c = readchar()) != '$');
 
       bp = buf;
@@ -454,6 +845,12 @@ getpkt (buf)
          c = readchar ();
          if (c == '#')
            break;
+         if (bp >= buf+PBUFSIZ-1)
+         {
+           *bp = '\0';
+           printf_filtered ("Remote packet too long: %s\n", buf);
+           goto whole;
+         }
          *bp++ = c;
          csum += c;
        }
@@ -461,19 +858,44 @@ getpkt (buf)
 
       c1 = fromhex (readchar ());
       c2 = fromhex (readchar ());
-      if (csum == (c1 << 4) + c2)
+      if ((csum & 0xff) == (c1 << 4) + c2)
        break;
-      printf ("Bad checksum, sentsum=0x%x, csum=0x%x, buf=%s\n",
-             (c1 << 4) + c2, csum, buf);
-      write (remote_desc, "-", 1);
+      printf_filtered ("Bad checksum, sentsum=0x%x, csum=0x%x, buf=%s\n",
+             (c1 << 4) + c2, csum & 0xff, buf);
+
+      /* Try the whole thing again.  */
+whole:
+      if (++retries < MAX_RETRIES)
+       {
+         write (remote_desc, "-", 1);
+       }
+      else
+       {
+         printf ("Ignoring packet error, continuing...\n");
+         break;
+       }
     }
 
+#if 0
+  immediate_quit--;
+#endif
+
   write (remote_desc, "+", 1);
 
   if (kiodebug)
-    fprintf (stderr,"Packet received :%s\n", buf);
+    fprintf (stderr,"Packet received%s\n", buf);
 }
 \f
+/* The data cache leads to incorrect results because it doesn't know about
+   volatile variables, thus making it impossible to debug functions which
+   use hardware registers.  Therefore it is #if 0'd out.  Effect on
+   performance is some, for backtraces of functions with a few
+   arguments each.  For functions with many arguments, the stack
+   frames don't fit in the cache blocks, which makes the cache less
+   helpful.  Disabling the cache is a big performance win for fetching
+   large structures, because the cache code fetched data in 16-byte
+   chunks.  */
+#if 0
 /* The data cache records all the data read from the remote machine
    since the last time it stopped.
 
@@ -615,9 +1037,62 @@ dcache_init ()
   for (i=0;i<DCACHE_SIZE;i++,db++)
     insque (db, &dcache_free);
 }
+#endif /* 0 */
+
+/* Define the target subroutine names */
+
+struct target_ops remote_ops = {
+  "remote",                    /* to_shortname */
+  "Remote serial target in gdb-specific protocol",     /* to_longname */
+  "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).",  /* to_doc */
+  remote_open,                 /* to_open */
+  remote_close,                        /* to_close */
+  NULL,                                /* to_attach */
+  remote_detach,               /* to_detach */
+  remote_resume,               /* to_resume */
+  remote_wait,                 /* to_wait */
+  remote_fetch_registers,      /* to_fetch_registers */
+  remote_store_registers,      /* to_store_registers */
+  remote_prepare_to_store,     /* to_prepare_to_store */
+  remote_xfer_memory,          /* to_xfer_memory */
+  remote_files_info,           /* to_files_info */
+  NULL,                                /* to_insert_breakpoint */
+  NULL,                                /* to_remove_breakpoint */
+  NULL,                                /* to_terminal_init */
+  NULL,                                /* to_terminal_inferior */
+  NULL,                                /* to_terminal_ours_for_output */
+  NULL,                                /* to_terminal_ours */
+  NULL,                                /* to_terminal_info */
+  NULL,                                /* to_kill */
+  NULL,                                /* to_load */
+  NULL,                                /* to_lookup_symbol */
+  NULL,                                /* to_create_inferior */
+  NULL,                                /* to_mourn_inferior */
+  0,                           /* to_can_run */
+  process_stratum,             /* to_stratum */
+  NULL,                                /* to_next */
+  1,                           /* to_has_all_memory */
+  1,                           /* to_has_memory */
+  1,                           /* to_has_stack */
+  1,                           /* to_has_registers */
+  1,                           /* to_has_execution */
+  NULL,                                /* sections */
+  NULL,                                /* sections_end */
+  OPS_MAGIC                    /* to_magic */
+};
 
-static initialize ()
+void
+_initialize_remote ()
 {
+  add_target (&remote_ops);
+
+  add_show_from_set (
+    add_set_cmd ("remotedebug", no_class, var_boolean, (char *)&kiodebug,
+                  "Set debugging of remote serial I/O.\n\
+When enabled, each packet sent or received with the remote target\n\
+is displayed.", &setlist),
+       &showlist);
 }
 
-END_FILE
+#endif
This page took 0.033858 seconds and 4 git commands to generate.