Thu May 21 13:14:25 1998 John Metzler <jmetzler@cygnus.com>
[deliverable/binutils-gdb.git] / gdb / remote-rdp.c
index d98531f56b103d46966b986c4c02cfeaf80fda4e..939df60cd07354a754c595ce8f9a4a76fed078a3 100644 (file)
 #else
 #include <varargs.h>
 #endif
-
+#include <ctype.h>
 #include <fcntl.h>
 #include "symfile.h"
 #include "remote-utils.h"
+#include "gdb_string.h"
+#ifdef HAVE_UNISTD_H
+#include <unistd.h>
+#endif
+#include "gdbcore.h"
+
 
 extern struct target_ops remote_rdp_ops;
 static serial_t io;
 static host_callback *callback = &default_callback;
 
 struct
-{
-  int step_info;
-  int break_info;
-  int model_info;
-  int target_info;
-  int can_step;
-  char command_line[10];
-  int rdi_level;
-  int rdi_stopped_status;
-} ds;
+  {
+    int step_info;
+    int break_info;
+    int model_info;
+    int target_info;
+    int can_step;
+    char command_line[10];
+    int rdi_level;
+    int rdi_stopped_status;
+  }
+ds;
 
 
 
@@ -77,6 +84,12 @@ struct
 #define RDP_OPEN                       0
 #define RDP_OPEN_TYPE_COLD             0
 #define RDP_OPEN_TYPE_WARM             1
+#define RDP_OPEN_TYPE_BAUDRATE          2
+
+#define RDP_OPEN_BAUDRATE_9600         1
+#define RDP_OPEN_BAUDRATE_19200                2
+#define RDP_OPEN_BAUDRATE_38400                3
+
 #define RDP_OPEN_TYPE_RETURN_SEX       (1<<3)
 
 #define RDP_CLOSE                      1
@@ -97,8 +110,8 @@ struct
 #define RDP_FPU_READWRITE_MASK_FPS     (1<<8)
 
 #define RDP_SET_BREAK                  0xa
-#define RDP_SET_BREAK_TYPE_PC_EQUAL     0              
-#define RDP_SET_BREAK_TYPE_GET_HANDLE   (0x10)         
+#define RDP_SET_BREAK_TYPE_PC_EQUAL     0
+#define RDP_SET_BREAK_TYPE_GET_HANDLE   (0x10)
 
 #define RDP_CLEAR_BREAK                0xb
 
@@ -126,6 +139,16 @@ struct
 #define RDP_INFO_ABOUT_BREAK_THREAD_BREAK (1<<9)
 #define RDP_INFO_ABOUT_BREAK_THREAD_WATCH (1<<10)
 #define RDP_INFO_ABOUT_BREAK_COND      (1<<11)
+#define RDP_INFO_VECTOR_CATCH          (0x180)
+#define RDP_INFO_ICEBREAKER            (7)
+#define RDP_INFO_SET_CMDLINE            (0x300)
+
+#define RDP_SELECT_CONFIG              (0x16)
+#define RDI_ConfigCPU                  0
+#define RDI_ConfigSystem               1
+#define RDI_MatchAny                   0
+#define RDI_MatchExactly               1
+#define RDI_MatchNoEarlier             2
 
 #define RDP_RESET                      0x7f
 
@@ -138,19 +161,21 @@ struct
 #define RDP_RES_VALUE_BIG_ENDIAN       241
 #define RDP_RES_RESET                  0x7f
 #define RDP_RES_AT_BREAKPOINT          143
-
+#define RDP_RES_IDUNNO                 0xe6
 #define RDP_OSOpReply                  0x13
 #define RDP_OSOpWord                   2
 #define RDP_OSOpNothing                0
 
 static int timeout = 2;
 
+static char * commandline = NULL;
+
 static int
 remote_rdp_xfer_inferior_memory PARAMS ((CORE_ADDR memaddr,
-                                    char *myaddr,
-                                    int len,
-                                    int write,
-                                    struct target_ops * target));
+                                        char *myaddr,
+                                        int len,
+                                        int write,
+                                        struct target_ops * target));
 
 
 /* Stuff for talking to the serial layer. */
@@ -160,6 +185,9 @@ get_byte ()
 {
   int c = SERIAL_READCHAR (io, timeout);
 
+  if (remote_debug)
+    printf ("[%02x]\n", c);
+
   if (c == SERIAL_TIMEOUT)
     {
       if (timeout == 0)
@@ -168,8 +196,6 @@ get_byte ()
       error ("Timeout reading from remote_system");
     }
 
-  if (remote_debug)
-    printf ("[%02x]", c);
   return c;
 }
 
@@ -193,12 +219,14 @@ static void
 put_byte (val)
      char val;
 {
+  if (remote_debug)
+    printf ("(%02x)\n", val);
   SERIAL_WRITE (io, &val, 1);
 }
 
 static void
 put_word (val)
-     long val;
+     int val;
 {
   /* We always send in little endian */
   unsigned char b[4];
@@ -207,6 +235,9 @@ put_word (val)
   b[2] = val >> 16;
   b[3] = val >> 24;
 
+  if (remote_debug)
+    printf ("(%04x)", val);
+
   SERIAL_WRITE (io, b, 4);
 }
 
@@ -214,66 +245,132 @@ put_word (val)
 
 /* Stuff for talking to the RDP layer. */
 
+/* This is a bit more fancy that need be so that it syncs even in nasty cases.
 
-/* This is a bit more fancy that need be so that it syncs even in nasty cases. */
+   I'be been unable to make it reliably sync up with the change
+   baudrate open command.  It likes to sit and say it's been reset,
+   with no more action.  So I took all that code out.  I'd rather sync
+   reliably at 9600 than wait forever for a possible 19200 connection.
 
+ */
 static void
-rdp_init ()
+rdp_init (cold, tty)
+     int cold;
+     int tty;
 {
-  int oloop;
+  int sync = 0;
+  int type = cold ? RDP_OPEN_TYPE_COLD : RDP_OPEN_TYPE_WARM;
+  int baudtry = 9600;
 
-  for (oloop = 0; oloop < 2; oloop++)
-    {
-      int longtry;
-      SERIAL_FLUSH_INPUT (io);
-      for (longtry = 0; longtry < 2; longtry++)
-       {
-         int try;
-         int flush_and_retry = 0;
+  time_t now = time (0);
+  time_t stop_time = now + 10; /* Try and sync for 10 seconds, then give up */
 
-         for (try = 0; try < 10 && !flush_and_retry; try++)
-           {
-             int restype;
 
-             put_byte (RDP_OPEN);
-             put_byte (RDP_OPEN_TYPE_COLD | RDP_OPEN_TYPE_RETURN_SEX);
-             put_word (0);
+  while (time (0) < stop_time && !sync)
+    {
+      int restype;
+      QUIT;
+
+      SERIAL_FLUSH_INPUT (io);
+      SERIAL_FLUSH_OUTPUT (io);
 
-             restype = SERIAL_READCHAR (io, 1);
+      if (tty)
+       printf_unfiltered ("Trying to connect at %d baud.\n", baudtry);
 
+      /*
+      ** It seems necessary to reset an EmbeddedICE to get it going.
+      ** This has the side benefit of displaying the startup banner.
+      */
+      if (cold)
+       {
+         put_byte (RDP_RESET);
+         while ((restype = SERIAL_READCHAR (io, 1)) > 0)
+           {
              switch (restype)
                {
                case SERIAL_TIMEOUT:
-                 flush_and_retry = 1;
                  break;
                case RDP_RESET:
-                 return;
+                 /* Sent at start of reset process: ignore */
+                 break;
                default:
-                 printf_unfiltered ("Got res return %d\n", restype);
+                 printf_unfiltered ("%c", isgraph (restype) ? restype : ' ');
                  break;
-               case RDP_RES_VALUE:
+               }
+           }
+
+         if (restype == 0)
+           {
+             /* Got end-of-banner mark */
+             printf_filtered ("\n");
+           }
+       }
+
+      put_byte (RDP_OPEN);
+
+      put_byte (type | RDP_OPEN_TYPE_RETURN_SEX );
+      put_word (0);
+
+      while (!sync && (restype = SERIAL_READCHAR (io, 1)) > 0)
+       {
+         if (remote_debug)
+           printf_unfiltered ("[%02x]\n", restype);
+
+         switch (restype)
+           {
+           case SERIAL_TIMEOUT:
+             break;
+           case RDP_RESET:
+             while ((restype = SERIAL_READCHAR (io, 1)) == RDP_RESET)
+               ;
+             while ((restype = SERIAL_READCHAR (io, 1)) > 0)
+               {
+                 printf_unfiltered ("%c", isgraph (restype) ? restype : ' ');
+               }
+             while ((restype = SERIAL_READCHAR (io, 1)) > 0)
+               ;
+             if (tty)
+               {
+                 printf_unfiltered ("\nThe board has sent notification that it was reset.\n");
+                 printf_unfiltered ("Waiting for it to settle down...\n");
+               }
+             sleep (3);
+             if (tty)
+               printf_unfiltered ("\nTrying again.\n");
+             break;
+           default:
+             break;
+           case RDP_RES_VALUE:
+             {
+               int resval = SERIAL_READCHAR (io, 1);
+
+               if (remote_debug)
+                 printf_unfiltered ("[%02x]\n", resval);
+
+               switch (resval)
                  {
-                   int resval = SERIAL_READCHAR (io, 1);
-
-                   switch (resval)
-                     {
-                     case SERIAL_TIMEOUT:
-                       break;
-                     case RDP_RES_VALUE_LITTLE_ENDIAN:
-                       target_byte_order = LITTLE_ENDIAN;
-                       return;
-                     case RDP_RES_VALUE_BIG_ENDIAN:
-                       target_byte_order = BIG_ENDIAN;
-                       return;
-                     default:
-                       printf_unfiltered ("Trying to sync, got resval %d\n", resval);
-                     }
+                 case SERIAL_TIMEOUT:
+                   break;
+                 case RDP_RES_VALUE_LITTLE_ENDIAN:
+                   target_byte_order = LITTLE_ENDIAN;
+                   sync = 1;
+                   break;
+                 case RDP_RES_VALUE_BIG_ENDIAN:
+                   target_byte_order = BIG_ENDIAN;
+                   sync = 1;
+                   break;
+                 default:
+                   break;
                  }
-               }
+             }
            }
        }
     }
-  error ("Couldn't reset the board, try pressing the reset button");
+
+  if (!sync)
+    {
+      error ("Couldn't reset the board, try pressing the reset button");
+    }
 }
 
 
@@ -334,9 +431,27 @@ send_rdp (char *template, va_alist)
            }
          break;
        case 'Z':
-         /* Check the result code, error if not zero */
-         if (get_byte ())
-           error ("Command garbled");
+         /* Check the result code */
+         switch (get_byte ())
+           {
+           case 0:
+             /* Success */
+             break;
+           case 253:
+             /* Target can't do it; never mind */
+             printf_unfiltered ("RDP: Insufficient privilege\n");
+             return;
+           case 254:
+             /* Target can't do it; never mind */
+             printf_unfiltered ("RDP: Unimplemented message\n");
+             return;
+           case 255:
+             error ("Command garbled");
+             break;
+           default:
+             error ("Corrupt reply from target");
+             break;
+           }
          break;
        case 'W':
          /* Read a word from the target */
@@ -450,7 +565,7 @@ rdp_fetch_one_fpu_register (mask, buf)
     {
       /* There are 12 bytes long 
          !! fixme about endianness 
-        */
+       */
       int dummy;               /* I've seen these come back as four words !! */
       send_rdp ("bbw-SWWWWZ", RDP_COPRO_READ, FPU_COPRO_NUMBER, mask, buf + 0, buf + 4, buf + 8, &dummy);
     }
@@ -507,8 +622,8 @@ rdp_store_one_fpu_register (mask, buf)
     }
 #endif
 }
-
 \f
+
 /* Convert between GDB requests and the RDP layer. */
 
 static void
@@ -602,6 +717,50 @@ rdp_execute_start ()
 }
 
 
+static void
+rdp_set_command_line (command, args)
+     char * command;
+     char * args;
+{
+  /*
+  ** We could use RDP_INFO_SET_CMDLINE to send this, but EmbeddedICE systems
+  ** don't implement that, and get all confused at the unexpected text.
+  ** Instead, just keep a copy, and send it when the target does a SWI_GetEnv
+  */
+
+  if (commandline != NULL)
+    free (commandline);
+
+  commandline = malloc (strlen (command) + strlen (args) + 2);
+  if (commandline != NULL)
+    {
+      strcpy (commandline, command);
+      strcat (commandline, " ");
+      strcat (commandline, args);
+    }
+}
+
+static void
+rdp_catch_vectors ()
+{
+  /*
+  ** We want the target monitor to intercept the abort vectors
+  ** i.e. stop the program if any of these are used.
+  */
+  send_rdp ("bww-SZ", RDP_INFO, RDP_INFO_VECTOR_CATCH,
+           /*
+           ** Specify a bitmask including
+           **  the reset vector
+           **  the undefined instruction vector
+           **  the prefetch abort vector
+           **  the data abort vector
+           **  the address exception vector
+           */
+           (1<<0)|(1<<1)|(1<<3)|(1<<4)|(1<<5)
+           );
+}
+  
+
 
 #define a_byte 1
 #define a_word 2
@@ -736,13 +895,29 @@ exec_swi (swi, args)
       args->n = callback->isatty (callback, args->n);
       return 1;
 
+    case SWI_GetEnv:
+      if (commandline != NULL)
+       {
+         int len = strlen (commandline);
+         if (len > 255)
+           {
+             len = 255;
+             commandline [255]='\0';
+           }
+         remote_rdp_xfer_inferior_memory (args[0].n,
+                                          commandline, len+1, 1, 0);
+       }
+      else
+       remote_rdp_xfer_inferior_memory (args[0].n, "", 1, 1, 0);
+      return 1;
+      
     default:
       return 0;
     }
 }
 
 
-static void 
+static void
 handle_swi ()
 {
   argsin args[3];
@@ -826,7 +1001,7 @@ rdp_execute_finish ()
       res = SERIAL_READCHAR (io, 1);
       while (res == SERIAL_TIMEOUT)
        {
-         QUIT ;
+         QUIT;
          printf_filtered ("Waiting for target..\n");
          res = SERIAL_READCHAR (io, 1);
        }
@@ -936,9 +1111,13 @@ remote_rdp_open (args, from_tty)
      char *args;
      int from_tty;
 {
+  int not_icebreaker;
+
   if (!args)
     error_no_arg ("serial port device name");
 
+  baud_rate = 9600;
+
   target_preopen (from_tty);
 
   io = SERIAL_OPEN (args);
@@ -948,15 +1127,43 @@ remote_rdp_open (args, from_tty)
 
   SERIAL_RAW (io);
 
-  rdp_init ();
+  rdp_init (1, from_tty);
+
 
-  rdp_info ();
   if (from_tty)
     {
-      printf_unfiltered ("Remote RDP debugging using %s\n", args);
+      printf_unfiltered ("Remote RDP debugging using %s at %d baud\n", args, baud_rate);
+    }
+
+  rdp_info ();
+
+  /* Need to set up the vector interception state */
+  rdp_catch_vectors();
+
+  /*
+  ** If it's an EmbeddedICE, we need to set the processor config.
+  ** Assume we can always have ARM7TDI...
+  */
+  send_rdp ("bw-SB", RDP_INFO, RDP_INFO_ICEBREAKER, & not_icebreaker);
+  if (!not_icebreaker)
+    {
+      const char * CPU = "ARM7TDI";
+      int ICEversion;
+      int len = strlen (CPU);
+      
+      send_rdp ("bbbbw-p-SWZ",
+               RDP_SELECT_CONFIG,
+               RDI_ConfigCPU,  /* Aspect: set the CPU */
+               len,            /* The number of bytes in the name */
+               RDI_MatchAny,   /* We'll take whatever we get */
+               0,              /* We'll take whatever version's there */
+               CPU,len,
+               & ICEversion);
     }
 
-  push_target (&remote_rdp_ops);
+  /* command line initialised on 'run'*/
+
+  push_target (& remote_rdp_ops);
 
   callback->init (callback);
   flush_cached_frames ();
@@ -976,18 +1183,11 @@ remote_rdp_close (quitting)
      int quitting;
 {
   callback->shutdown (callback);
-  SERIAL_CLOSE (io);
+  if (io)
+    SERIAL_CLOSE (io);
+  io = 0;
 }
 
-/* Terminate the open connection to the remote debugger. */
-
-static void
-remote_rdp_detach (args, from_tty)
-     char *args;
-     int from_tty;
-{
-  pop_target (); 
-}
 
 /* Resume execution of the target process.  STEP says whether to single-step
    or to run free; SIGGNAL is the signal value (e.g. SIGINT) to be given
@@ -1115,8 +1315,8 @@ static struct yn breakinfo[] =
   {"watchpoints for half-word writes supported", RDP_INFO_ABOUT_BREAK_HALFWORD_WRITE},
   {"watchpoints for word writes supported", RDP_INFO_ABOUT_BREAK_WORD_WRITE},
   {"mask break/watch-points supported", RDP_INFO_ABOUT_BREAK_MASK},
-  {"thread-specific breakpoints supported", RDP_INFO_ABOUT_BREAK_THREAD_BREAK},
-  {"thread-specific watchpoints supported", RDP_INFO_ABOUT_BREAK_THREAD_WATCH},
+{"thread-specific breakpoints supported", RDP_INFO_ABOUT_BREAK_THREAD_BREAK},
+{"thread-specific watchpoints supported", RDP_INFO_ABOUT_BREAK_THREAD_WATCH},
   {"conditional breakpoints supported", RDP_INFO_ABOUT_BREAK_COND},
   {0}
 };
@@ -1145,56 +1345,105 @@ remote_rdp_files_info (target)
 }
 
 
+static void
+remote_rdp_create_inferior (exec_file, allargs, env)
+     char *  exec_file;
+     char *  allargs;
+     char ** env;
+{
+  CORE_ADDR entry_point;
+
+  if (exec_file == 0 || exec_bfd == 0)
+   error ("No exec file specified.");
+
+  entry_point = (CORE_ADDR) bfd_get_start_address (exec_bfd);
+
+  remote_rdp_kill ();   
+  remove_breakpoints ();
+  init_wait_for_inferior ();
+
+  /* This gives us a chance to set up the command line */
+  rdp_set_command_line (exec_file, allargs);
+
+  inferior_pid = 42;
+  insert_breakpoints ();  /* Needed to get correct instruction in cache */
+
+  /*
+  ** RDP targets don't provide any facility to set the top of memory,
+  ** so we don't bother to look for MEMSIZE in the environment.
+  */
+
+  /* Let's go! */
+  proceed (entry_point, TARGET_SIGNAL_DEFAULT, 0);
+}
+
+/* Accept any stray run/attach commands */
+static int
+remote_rdp_can_run()
+{
+  return 1;
+}
+
+/* Attach doesn't need to do anything */
+static void
+remote_rdp_attach(args, from_tty)
+     char * args;
+     int from_tty;
+{
+  return;
+}
+  
 /* Define the target subroutine names */
 
-struct target_ops remote_rdp_ops =
+struct target_ops remote_rdp_ops ;
+
+static void init_remote_rdp_ops(void)
 {
-  "rdp",                       /* to_shortname */
-  /* to_longname */
-  "Remote Target using the RDProtocol",        
-  /* to_doc */
-  "Use a remote ARM system which uses the ARM Remote Debugging Protocol",
-  remote_rdp_open,             /* to_open */
-  remote_rdp_close,            /* to_close */
-  NULL,                                /* to_attach */
-  NULL,                                /* to_detach */
-  remote_rdp_resume,           /* to_resume */
-  remote_rdp_wait,             /* to_wait */
-  remote_rdp_fetch_register,   /* to_fetch_registers */
-  remote_rdp_store_register,   /* to_store_registers */
-  remote_rdp_prepare_to_store, /* to_prepare_to_store */
-  remote_rdp_xfer_inferior_memory, /* to_xfer_memory */
-  remote_rdp_files_info,       /* to_files_info */
-  remote_rdp_insert_breakpoint,        /* to_insert_breakpoint */
-  remote_rdp_remove_breakpoint,        /* 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 */
-  remote_rdp_kill,             /* to_kill */
-  generic_load,                        /* to_load */
-  NULL,                                /* to_lookup_symbol */
-  NULL,                                /* to_create_inferior */
-  generic_mourn_inferior,      /* to_mourn_inferior */
-  0,                           /* to_can_run */
-  0,                           /* to_notice_signals */
-  0,                           /* to_thread_alive */
-  0,                           /* to_stop */
-  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 */
-};
+  remote_rdp_ops.to_shortname =   "rdp";
+  remote_rdp_ops.to_longname =   "Remote Target using the RDProtocol";
+  remote_rdp_ops.to_doc =   "Use a remote ARM system which uses the ARM Remote Debugging Protocol";
+  remote_rdp_ops.to_open =   remote_rdp_open;  
+  remote_rdp_ops.to_close =   remote_rdp_close;        
+  remote_rdp_ops.to_attach =   remote_rdp_attach;
+  remote_rdp_ops.to_detach =   NULL;           
+  remote_rdp_ops.to_resume =   remote_rdp_resume;
+  remote_rdp_ops.to_wait  =   remote_rdp_wait; 
+  remote_rdp_ops.to_fetch_registers  =   remote_rdp_fetch_register;
+  remote_rdp_ops.to_store_registers  =   remote_rdp_store_register;
+  remote_rdp_ops.to_prepare_to_store =   remote_rdp_prepare_to_store;
+  remote_rdp_ops.to_xfer_memory  =   remote_rdp_xfer_inferior_memory;
+  remote_rdp_ops.to_files_info  =   remote_rdp_files_info;
+  remote_rdp_ops.to_insert_breakpoint =   remote_rdp_insert_breakpoint;
+  remote_rdp_ops.to_remove_breakpoint =   remote_rdp_remove_breakpoint;
+  remote_rdp_ops.to_terminal_init  =   NULL;           
+  remote_rdp_ops.to_terminal_inferior =   NULL;                
+  remote_rdp_ops.to_terminal_ours_for_output =   NULL;
+  remote_rdp_ops.to_terminal_ours  =   NULL;   
+  remote_rdp_ops.to_terminal_info  =   NULL;   
+  remote_rdp_ops.to_kill  =   remote_rdp_kill; 
+  remote_rdp_ops.to_load  =   generic_load;    
+  remote_rdp_ops.to_lookup_symbol =   NULL;                            
+  remote_rdp_ops.to_create_inferior =   remote_rdp_create_inferior;
+  remote_rdp_ops.to_mourn_inferior =   generic_mourn_inferior;
+  remote_rdp_ops.to_can_run  =   remote_rdp_can_run;
+  remote_rdp_ops.to_notice_signals =   0;      
+  remote_rdp_ops.to_thread_alive  =   0;       
+  remote_rdp_ops.to_stop  =   0;               
+  remote_rdp_ops.to_stratum =   process_stratum;
+  remote_rdp_ops.DONT_USE =   NULL;            
+  remote_rdp_ops.to_has_all_memory =   1;      
+  remote_rdp_ops.to_has_memory =   1;          
+  remote_rdp_ops.to_has_stack =   1;           
+  remote_rdp_ops.to_has_registers =   1;       
+  remote_rdp_ops.to_has_execution =   1;       
+  remote_rdp_ops.to_sections =   NULL;         
+  remote_rdp_ops.to_sections_end =   NULL;
+  remote_rdp_ops.to_magic =   OPS_MAGIC;
+}
 
 void
 _initialize_remote_rdp ()
 {
+  init_remote_rdp_ops() ;
   add_target (&remote_rdp_ops);
 }
This page took 0.030626 seconds and 4 git commands to generate.