* Rename remote-es1800.c to remote-es.c
[deliverable/binutils-gdb.git] / gdb / remote-mips.c
index 6c559f1752f2460cd0ee4979c314532dbec290e6..2dc6dd22317eab0b9adf751216132ae7cf4fb422 100644 (file)
@@ -21,6 +21,7 @@ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
 
 #include "defs.h"
 #include "inferior.h"
+#include "symfile.h"
 #include "bfd.h"
 #include "wait.h"
 #include "gdbcmd.h"
@@ -48,7 +49,7 @@ static int mips_cksum PARAMS ((const unsigned char *hdr,
                               int len));
 
 static void
-mips_send_packet PARAMS ((const char *s));
+mips_send_packet PARAMS ((const char *s, int get_ack));
 
 static int
 mips_receive_packet PARAMS ((char *buff));
@@ -57,6 +58,9 @@ static int
 mips_request PARAMS ((char cmd, unsigned int addr, unsigned int data,
                      int *perr));
 
+static void
+mips_initialize PARAMS ((void));
+
 static void
 mips_open PARAMS ((char *name, int from_tty));
 
@@ -246,6 +250,9 @@ extern struct target_ops mips_ops;
 /* Set to 1 if the target is open.  */
 static int mips_is_open;
 
+/* Set to 1 while the connection is being initialized.  */
+static int mips_initializing;
+
 /* The next sequence number to send.  */
 static int mips_send_seq;
 
@@ -263,7 +270,7 @@ static int mips_send_retries = 10;
 static int mips_syn_garbage = 1050;
 
 /* The time to wait for a packet, in seconds.  */
-static int mips_receive_wait = 30;
+static int mips_receive_wait = 5;
 
 /* Set if we have sent a packet to the board but have not yet received
    a reply.  */
@@ -272,27 +279,71 @@ static int mips_need_reply = 0;
 /* This can be set to get debugging with ``set remotedebug''.  */
 static int mips_debug = 0;
 
-/* Read a character from the remote, aborting on error.  Returns -2 on
-   timeout (since that's what serial_readchar returns).  */
+/* Handle used to access serial I/O stream.  */
+static serial_t mips_desc;
+
+/* Read a character from the remote, aborting on error.  Returns
+   SERIAL_TIMEOUT on timeout (since that's what SERIAL_READCHAR
+   returns).  FIXME: If we see the string "<IDT>" from the board, then
+   we are debugging on the main console port, and we have somehow
+   dropped out of remote debugging mode.  In this case, we
+   automatically go back in to remote debugging mode.  This is a hack,
+   put in because I can't find any way for a program running on the
+   remote board to terminate without also ending remote debugging
+   mode.  I assume users won't have any trouble with this; for one
+   thing, the IDT documentation generally assumes that the remote
+   debugging port is not the console port.  This is, however, very
+   convenient for DejaGnu when you only have one connected serial
+   port.  */
 
 static int
 mips_readchar (timeout)
      int timeout;
 {
   int ch;
+  static int state = 0;
+  static char nextstate[5] = { '<', 'I', 'D', 'T', '>' };
 
-  ch = serial_readchar (timeout);
-  if (ch == EOF)
+  ch = SERIAL_READCHAR (mips_desc, timeout);
+  if (ch == SERIAL_EOF)
     error ("End of file from remote");
-  if (ch == -3)
+  if (ch == SERIAL_ERROR)
     error ("Error reading from remote: %s", safe_strerror (errno));
   if (mips_debug > 1)
     {
-      if (ch != -2)
+      if (ch != SERIAL_TIMEOUT)
        printf_filtered ("Read '%c' %d 0x%x\n", ch, ch, ch);
       else
        printf_filtered ("Timed out in read\n");
     }
+
+  /* If we have seen <IDT> and we either time out, or we see a @
+     (which was echoed from a packet we sent), reset the board as
+     described above.  The first character in a packet after the SYN
+     (which is not echoed) is always an @ unless the packet is more
+     than 64 characters long, which ours never are.  */
+  if ((ch == SERIAL_TIMEOUT || ch == '@')
+      && state == 5
+      && ! mips_initializing)
+    {
+      if (mips_debug > 0)
+       printf_filtered ("Reinitializing MIPS debugging mode\n");
+      SERIAL_WRITE (mips_desc, "\rdb tty0\r", sizeof "\rdb tty0\r" - 1);
+      sleep (1);
+
+      mips_need_reply = 0;
+      mips_initialize ();
+
+      state = 0;
+
+      error ("Remote board reset");
+    }
+
+  if (ch == nextstate[state])
+    ++state;
+  else
+    state = 0;
+
   return ch;
 }
 
@@ -319,7 +370,7 @@ mips_receive_header (hdr, pgarbage, ch, timeout)
       while (ch != SYN)
        {
          ch = mips_readchar (timeout);
-         if (ch == -2)
+         if (ch == SERIAL_TIMEOUT)
            return -1;
          if (ch != SYN)
            {
@@ -327,7 +378,11 @@ mips_receive_header (hdr, pgarbage, ch, timeout)
                 what the program is outputting, if the debugging is
                 being done on the console port.  FIXME: Perhaps this
                 should be filtered?  */
-             putchar (ch);
+             if (! mips_initializing || mips_debug > 0)
+               {
+                 putchar (ch);
+                 fflush (stdout);
+               }
 
              ++*pgarbage;
              if (*pgarbage > mips_syn_garbage)
@@ -339,7 +394,7 @@ mips_receive_header (hdr, pgarbage, ch, timeout)
       for (i = 1; i < HDR_LENGTH; i++)
        {
          ch = mips_readchar (timeout);
-         if (ch == -2)
+         if (ch == SERIAL_TIMEOUT)
            return -1;
 
          /* Make sure this is a header byte.  */
@@ -375,7 +430,7 @@ mips_receive_trailer (trlr, pgarbage, pch, timeout)
     {
       ch = mips_readchar (timeout);
       *pch = ch;
-      if (ch == -2)
+      if (ch == SERIAL_TIMEOUT)
        return -1;
       if (! TRLR_CHECK (ch))
        return -2;
@@ -416,8 +471,9 @@ mips_cksum (hdr, data, len)
 /* Send a packet containing the given ASCII string.  */
 
 static void
-mips_send_packet (s)
+mips_send_packet (s, get_ack)
      const char *s;
+     int get_ack;
 {
   unsigned int len;
   unsigned char *packet;
@@ -446,6 +502,9 @@ mips_send_packet (s)
      the sequence number we expect in the acknowledgement.  */
   mips_send_seq = (mips_send_seq + 1) % SEQ_MODULOS;
 
+  if (! get_ack)
+    return;
+
   /* We can only have one outstanding data packet, so we just wait for
      the acknowledgement here.  Keep retransmitting the packet until
      we get one, or until we've tried too many times.  */
@@ -460,7 +519,8 @@ mips_send_packet (s)
          printf_filtered ("Writing \"%s\"\n", packet + 1);
        }
 
-      if (serial_write (packet, HDR_LENGTH + len + TRLR_LENGTH) == 0)
+      if (SERIAL_WRITE (mips_desc, packet,
+                       HDR_LENGTH + len + TRLR_LENGTH) != 0)
        error ("write to target failed: %s", safe_strerror (errno));
 
       garbage = 0;
@@ -596,7 +656,7 @@ mips_receive_packet (buff)
              ch = SYN;
              break;
            }
-         if (rch == -2)
+         if (rch == SERIAL_TIMEOUT)
            error ("Timed out waiting for remote packet");
          buff[i] = rch;
        }
@@ -647,7 +707,7 @@ mips_receive_packet (buff)
                           ack + 1);
        }
 
-      if (serial_write (ack, HDR_LENGTH + TRLR_LENGTH) == 0)
+      if (SERIAL_WRITE (mips_desc, ack, HDR_LENGTH + TRLR_LENGTH) != 0)
        error ("write to target failed: %s", safe_strerror (errno));
     }
 
@@ -678,7 +738,7 @@ mips_receive_packet (buff)
                       ack + 1);
     }
 
-  if (serial_write (ack, HDR_LENGTH + TRLR_LENGTH) == 0)
+  if (SERIAL_WRITE (mips_desc, ack, HDR_LENGTH + TRLR_LENGTH) != 0)
     error ("write to target failed: %s", safe_strerror (errno));
 
   return len;
@@ -728,7 +788,7 @@ mips_request (cmd, addr, data, perr)
       if (mips_need_reply)
        fatal ("mips_request: Trying to send command before reply");
       sprintf (buff, "0x0 %c 0x%x 0x%x", cmd, addr, data);
-      mips_send_packet (buff);
+      mips_send_packet (buff, 1);
       mips_need_reply = 1;
     }
 
@@ -766,6 +826,64 @@ mips_request (cmd, addr, data, perr)
   return rresponse;
 }
 
+/* Initialize a new connection to the MIPS board, and make sure we are
+   really connected.  */
+
+static void
+mips_initialize ()
+{
+  char cr;
+  int hold_wait;
+  int tries;
+  char buff[DATA_MAXLEN + 1];
+  int err;
+
+  if (mips_initializing)
+    return;
+
+  mips_initializing = 1;
+
+  mips_send_seq = 0;
+  mips_receive_seq = 0;
+
+  /* The board seems to want to send us a packet.  I don't know what
+     it means.  The packet seems to be triggered by a carriage return
+     character, although perhaps any character would do.  */
+  cr = '\r';
+  SERIAL_WRITE (mips_desc, &cr, 1);
+
+  hold_wait = mips_receive_wait;
+  mips_receive_wait = 3;
+
+  tries = 0;
+  while (catch_errors (mips_receive_packet, buff, (char *) NULL) == 0)
+    {
+      char cc;
+
+      if (tries > 0)
+       error ("Could not connect to target");
+      ++tries;
+
+      /* We did not receive the packet we expected; try resetting the
+        board and trying again.  */
+      printf_filtered ("Failed to initialize; trying to reset board\n");
+      cc = '\003';
+      SERIAL_WRITE (mips_desc, &cc, 1);
+      sleep (2);
+      SERIAL_WRITE (mips_desc, "\rdb tty0\r", sizeof "\rdb tty0\r" - 1);
+      sleep (1);
+      cr = '\r';
+      SERIAL_WRITE (mips_desc, &cr, 1);
+    }
+
+  mips_receive_wait = hold_wait;
+  mips_initializing = 0;
+
+  /* If this doesn't call error, we have connected; we don't care if
+     the request itself succeeds or fails.  */
+  mips_request ('r', (unsigned int) 0, (unsigned int) 0, &err);
+}
+
 /* Open a connection to the remote board.  */
 
 static void
@@ -773,10 +891,6 @@ mips_open (name, from_tty)
      char *name;
      int from_tty;
 {
-  int err;
-  char cr;
-  char buff[DATA_MAXLEN + 1];
-
   if (name == 0)
     error (
 "To open a MIPS remote debugging connection, you need to specify what serial\n\
@@ -785,28 +899,23 @@ device is attached to the target board (e.g., /dev/ttya).");
   target_preopen (from_tty);
 
   if (mips_is_open)
-    mips_close (0);
+    unpush_target (&mips_ops);
 
-  if (serial_open (name) == 0)
+  mips_desc = SERIAL_OPEN (name);
+  if (mips_desc == (serial_t) NULL)
     perror_with_name (name);
 
+  SERIAL_RAW (mips_desc);
+
   mips_is_open = 1;
 
-  /* The board seems to want to send us a packet.  I don't know what
-     it means.  */
-  cr = '\r';
-  serial_write (&cr, 1);
-  mips_receive_packet (buff);
-
-  /* If this doesn't call error, we have connected; we don't care if
-     the request itself succeeds or fails.  */
-  mips_request ('r', (unsigned int) 0, (unsigned int) 0, &err);
+  mips_initialize ();
 
   if (from_tty)
     printf ("Remote MIPS debugging using %s\n", name);
   push_target (&mips_ops);     /* Switch to using remote target now */
 
-  start_remote ();             /* Initialize gdb process mechanisms */
+  /* FIXME: Should we call start_remote here?  */
 }
 
 /* Close a connection to the remote board.  */
@@ -817,11 +926,14 @@ mips_close (quitting)
 {
   if (mips_is_open)
     {
-      /* Get the board out of remote debugging mode.  */
-      mips_request ('x', (unsigned int) 0, (unsigned int) 0,
-                   (int *) NULL);
-      serial_close ();
+      int err;
+
       mips_is_open = 0;
+
+      /* Get the board out of remote debugging mode.  */
+      mips_request ('x', (unsigned int) 0, (unsigned int) 0, &err);
+
+      SERIAL_CLOSE (mips_desc);
     }
 }
 
@@ -852,7 +964,7 @@ mips_resume (step, siggnal)
           siggnal);
 
   mips_request (step ? 's' : 'c',
-               (unsigned int) read_register (PC_REGNUM),
+               (unsigned int) 1,
                (unsigned int) 0,
                (int *) NULL);
 }
@@ -1099,60 +1211,26 @@ mips_files_info (ignore)
   printf ("Debugging a MIPS board over a serial line.\n");
 }
 
-/* Load an executable onto the board.  */
+/* Kill the process running on the board.  This will actually only
+   work if we are doing remote debugging over the console input.  I
+   think that if IDT/sim had the remote debug interrupt enabled on the
+   right port, we could interrupt the process with a break signal.  */
 
 static void
-mips_load (args, from_tty)
-     char *args;
-     int from_tty;
+mips_kill ()
 {
-  bfd *abfd;
-  asection *s;
-  int err;
-
-  abfd = bfd_openr (args, 0);
-  if (abfd == (bfd *) NULL)
-    error ("Unable to open file %s", args);
-
-  if (bfd_check_format (abfd, bfd_object) == 0)
-    error ("%s: Not an object file", args);
-
-  for (s = abfd->sections; s != (asection *) NULL; s = s->next)
+#if 0
+  if (mips_is_open)
     {
-      if ((s->flags & SEC_LOAD) != 0)
-       {
-         bfd_size_type size;
-
-         size = bfd_get_section_size_before_reloc (s);
-         if (size > 0)
-           {
-             char *buffer;
-             struct cleanup *old_chain;
-             bfd_vma vma;
-
-             buffer = xmalloc (size);
-             old_chain = make_cleanup (free, buffer);
+      char cc;
 
-             vma = bfd_get_section_vma (abfd, s);
-             printf_filtered ("Loading section %s, size 0x%x vma 0x%x\n",
-                              bfd_get_section_name (abfd, s), size, vma);
-             bfd_get_section_contents (abfd, s, buffer, 0, size);
-             mips_xfer_memory (vma, buffer, size, 1, &mips_ops);
-
-             do_cleanups (old_chain);
-           }
-       }
+      /* Send a ^C.  */
+      cc = '\003';
+      SERIAL_WRITE (mips_desc, &cc, 1);
+      sleep (1);
+      target_mourn_inferior ();
     }
-
-  mips_request ('R', (unsigned int) mips_map_regno (PC_REGNUM),
-               (unsigned int) abfd->start_address,
-               &err);
-  if (err)
-    error ("Can't write PC register: %s", safe_strerror (errno));
-
-  bfd_close (abfd);
-
-  /* FIXME: Should we call symbol_file_add here?  */
+#endif
 }
 
 /* Start running on the target board.  */
@@ -1165,7 +1243,6 @@ mips_create_inferior (execfile, args, env)
 {
   CORE_ADDR entry_pt;
 
-  /* FIXME: Actually, we probably could pass arguments.  */
   if (args && *args)
     error ("Can't pass arguments to remote MIPS board.");
 
@@ -1176,6 +1253,8 @@ mips_create_inferior (execfile, args, env)
 
   init_wait_for_inferior ();
 
+  /* FIXME: Should we set inferior_pid here?  */
+
   proceed (entry_pt, -1, 0);
 }
 
@@ -1184,6 +1263,7 @@ mips_create_inferior (execfile, args, env)
 static void
 mips_mourn_inferior ()
 {
+  unpush_target (&mips_ops);
   generic_mourn_inferior ();
 }
 \f
@@ -1213,8 +1293,8 @@ Specify the serial device it is connected to (e.g., /dev/ttya).",  /* to_doc */
   NULL,                                /* to_terminal_ours_for_output */
   NULL,                                /* to_terminal_ours */
   NULL,                                /* to_terminal_info */
-  NULL,                                /* to_kill */
-  mips_load,                   /* to_load */
+  mips_kill,                   /* to_kill */
+  generic_load,                        /* to_load */
   NULL,                                /* to_lookup_symbol */
   mips_create_inferior,                /* to_create_inferior */
   mips_mourn_inferior,         /* to_mourn_inferior */
This page took 0.034645 seconds and 4 git commands to generate.