gdb/sh3-rom.c

   1 /* Remote target glue for the Hitachi SH-3 ROM monitor.
   2    Copyright 1995, 1996, 2000, 2001 Free Software Foundation, Inc.
   3
   4    This file is part of GDB.
   5
   6    This program is free software; you can redistribute it and/or modify
   7    it under the terms of the GNU General Public License as published by
   8    the Free Software Foundation; either version 2 of the License, or
   9    (at your option) any later version.
  10
  11    This program is distributed in the hope that it will be useful,
  12    but WITHOUT ANY WARRANTY; without even the implied warranty of
  13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14    GNU General Public License for more details.
  15
  16    You should have received a copy of the GNU General Public License
  17    along with this program; if not, write to the Free Software
  18    Foundation, Inc., 59 Temple Place - Suite 330,
  19    Boston, MA 02111-1307, USA.  */
  20
  21 #include "defs.h"
  22 #include "gdbcore.h"
  23 #include "target.h"
  24 #include "monitor.h"
  25 #include "serial.h"
  26 #include "srec.h"
  27 #include "arch-utils.h"
  28
  29 static serial_t parallel;
  30 static int parallel_in_use;
  31
  32 static void sh3_open (char *args, int from_tty);
  33
  34 static void
  35 sh3_supply_register (char *regname, int regnamelen, char *val, int vallen)
  36 {
  37   int numregs;
  38   int regno;
  39
  40   numregs = 1;
  41   regno = -1;
  42
  43   if (regnamelen == 2)
  44     {
  45       switch (regname[0])
  46         {
  47         case 'S':
  48           if (regname[1] == 'R')
  49             regno = SR_REGNUM;
  50           break;
  51         case 'P':
  52           if (regname[1] == 'C')
  53             regno = PC_REGNUM;
  54           else if (regname[1] == 'R')
  55             regno = PR_REGNUM;
  56           break;
  57         }
  58     }
  59   else if (regnamelen == 3)
  60     {
  61       switch (regname[0])
  62         {
  63         case 'G':
  64         case 'V':
  65           if (regname[1] == 'B' && regname[2] == 'R')
  66             {
  67               if (regname[0] == 'G')
  68                 regno = VBR_REGNUM;
  69               else
  70                 regno = GBR_REGNUM;
  71             }
  72           break;
  73         case 'S':
  74           if (regname[1] == 'S' && regname[2] == 'R')
  75             regno = gdbarch_tdep (current_gdbarch)->SSR_REGNUM;
  76           else if (regname[1] == 'P' && regname[2] == 'C')
  77             regno = gdbarch_tdep (current_gdbarch)->SPC_REGNUM;
  78           break;
  79         }
  80     }
  81   else if (regnamelen == 4)
  82     {
  83       switch (regname[0])
  84         {
  85         case 'M':
  86           if (regname[1] == 'A' && regname[2] == 'C')
  87             {
  88               if (regname[3] == 'H')
  89                 regno = MACH_REGNUM;
  90               else if (regname[3] == 'L')
  91                 regno = MACL_REGNUM;
  92             }
  93           break;
  94         case 'R':
  95           if (regname[1] == '0' && regname[2] == '-' && regname[3] == '7')
  96             {
  97               regno = R0_REGNUM;
  98               numregs = 8;
  99             }
 100         }
 101     }
 102   else if (regnamelen == 5)
 103     {
 104       if (regname[1] == '8' && regname[2] == '-' && regname[3] == '1'
 105           && regname[4] == '5')
 106         {
 107           regno = R0_REGNUM + 8;
 108           numregs = 8;
 109         }
 110     }
 111   else if (regnamelen == 17)
 112     {
 113     }
 114
 115   if (regno >= 0)
 116     while (numregs-- > 0)
 117       val = monitor_supply_register (regno++, val);
 118 }
 119
 120 static void
 121 sh3_load (serial_t desc, char *file, int hashmark)
 122 {
 123   if (parallel_in_use)
 124     {
 125       monitor_printf ("pl;s\r");
 126       load_srec (parallel, file, 0, 80, SREC_ALL, hashmark, NULL);
 127       monitor_expect_prompt (NULL, 0);
 128     }
 129   else
 130     {
 131       monitor_printf ("il;s:x\r");
 132       monitor_expect ("\005", NULL, 0);         /* Look for ENQ */
 133       SERIAL_WRITE (desc, "\006", 1);   /* Send ACK */
 134       monitor_expect ("LO x\r", NULL, 0);       /* Look for filename */
 135
 136       load_srec (desc, file, 0, 80, SREC_ALL, hashmark, NULL);
 137
 138       monitor_expect ("\005", NULL, 0);         /* Look for ENQ */
 139       SERIAL_WRITE (desc, "\006", 1);   /* Send ACK */
 140       monitor_expect_prompt (NULL, 0);
 141     }
 142 }
 143
 144 /* This array of registers need to match the indexes used by GDB.
 145    This exists because the various ROM monitors use different strings
 146    than does GDB, and don't necessarily support all the registers
 147    either. So, typing "info reg sp" becomes a "r30".  */
 148
 149 static char *sh3_regnames[] =
 150 {
 151   "R0", "R1", "R2", "R3", "R4", "R5", "R6", "R7",
 152   "R8", "R9", "R10", "R11", "R12", "R13", "R14", "R15",
 153   "PC", "PR", "GBR", "VBR", "MACH", "MACL", "SR",
 154   NULL, NULL,
 155   NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
 156   NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
 157   "SSR", "SPC",
 158   "R0_BANK0", "R1_BANK0", "R2_BANK0", "R3_BANK0",
 159   "R4_BANK0", "R5_BANK0", "R6_BANK0", "R7_BANK0",
 160   "R0_BANK1", "R1_BANK1", "R2_BANK1", "R3_BANK1",
 161   "R4_BANK1", "R5_BANK1", "R6_BANK1", "R7_BANK1"
 162 };
 163
 164 static char *sh3e_regnames[] =
 165 {
 166   "R0", "R1", "R2", "R3", "R4", "R5", "R6", "R7",
 167   "R8", "R9", "R10", "R11", "R12", "R13", "R14", "R15",
 168   "PC", "PR", "GBR", "VBR", "MACH", "MACL", "SR",
 169   "FPUL", "FPSCR",
 170   "FR0", "FR1", "FR2", "FR3", "FR4", "FR5", "FR6", "FR7",
 171   "FR8", "FR9", "FR10", "FR11", "FR12", "FR13", "FR14", "FR15",
 172   "SSR", "SPC",
 173   "R0_BANK0", "R1_BANK0", "R2_BANK0", "R3_BANK0",
 174   "R4_BANK0", "R5_BANK0", "R6_BANK0", "R7_BANK0",
 175   "R0_BANK1", "R1_BANK1", "R2_BANK1", "R3_BANK1",
 176   "R4_BANK1", "R5_BANK1", "R6_BANK1", "R7_BANK1"
 177 };
 178
 179 /* Define the monitor command strings. Since these are passed directly
 180    through to a printf style function, we may include formatting
 181    strings. We also need a CR or LF on the end.  */
 182
 183 static struct target_ops sh3_ops, sh3e_ops;
 184
 185 static char *sh3_inits[] =
 186 {"\003", NULL};                 /* Exits sub-command mode & download cmds */
 187
 188 static struct monitor_ops sh3_cmds;
 189
 190 static void
 191 init_sh3_cmds (void)
 192 {
 193   sh3_cmds.flags = MO_CLR_BREAK_USES_ADDR | MO_GETMEM_READ_SINGLE;      /* flags */
 194   sh3_cmds.init = sh3_inits;    /* monitor init string */
 195   sh3_cmds.cont = "g\r";        /* continue command */
 196   sh3_cmds.step = "s\r";        /* single step */
 197   sh3_cmds.stop = "\003";       /* Interrupt program */
 198   sh3_cmds.set_break = "b %x\r";        /* set a breakpoint */
 199   sh3_cmds.clr_break = "b -%x\r";       /* clear a breakpoint */
 200   sh3_cmds.clr_all_break = "b -\r";     /* clear all breakpoints */
 201   sh3_cmds.fill = "f %x @%x %x\r";      /* fill (start len val) */
 202   sh3_cmds.setmem.cmdb = "m %x %x\r";   /* setmem.cmdb (addr, value) */
 203   sh3_cmds.setmem.cmdw = "m %x %x;w\r";         /* setmem.cmdw (addr, value) */
 204   sh3_cmds.setmem.cmdl = "m %x %x;l\r";         /* setmem.cmdl (addr, value) */
 205   sh3_cmds.setmem.cmdll = NULL; /* setmem.cmdll (addr, value) */
 206   sh3_cmds.setmem.resp_delim = NULL;    /* setreg.resp_delim */
 207   sh3_cmds.setmem.term = NULL;  /* setreg.term */
 208   sh3_cmds.setmem.term_cmd = NULL;      /* setreg.term_cmd */
 209   sh3_cmds.getmem.cmdb = "m %x\r";      /* getmem.cmdb (addr, len) */
 210   sh3_cmds.getmem.cmdw = "m %x;w\r";    /* getmem.cmdw (addr, len) */
 211   sh3_cmds.getmem.cmdl = "m %x;l\r";    /* getmem.cmdl (addr, len) */
 212   sh3_cmds.getmem.cmdll = NULL; /* getmem.cmdll (addr, len) */
 213   sh3_cmds.getmem.resp_delim = "^ [0-9A-F]+ ";  /* getmem.resp_delim */
 214   sh3_cmds.getmem.term = "? ";  /* getmem.term */
 215   sh3_cmds.getmem.term_cmd = ".\r";     /* getmem.term_cmd */
 216   sh3_cmds.setreg.cmd = ".%s %x\r";     /* setreg.cmd (name, value) */
 217   sh3_cmds.setreg.resp_delim = NULL;    /* setreg.resp_delim */
 218   sh3_cmds.setreg.term = NULL;  /* setreg.term */
 219   sh3_cmds.setreg.term_cmd = NULL;      /* setreg.term_cmd */
 220   sh3_cmds.getreg.cmd = ".%s\r";        /* getreg.cmd (name) */
 221   sh3_cmds.getreg.resp_delim = "=";     /* getreg.resp_delim */
 222   sh3_cmds.getreg.term = "? ";  /* getreg.term */
 223   sh3_cmds.getreg.term_cmd = ".\r";     /* getreg.term_cmd */
 224   sh3_cmds.dump_registers = "r\r";      /* dump_registers */
 225   sh3_cmds.register_pattern = "\\(\\w+\\)=\\([0-9a-fA-F]+\\( +[0-9a-fA-F]+\\b\\)*\\)";
 226   sh3_cmds.supply_register = sh3_supply_register;       /* supply_register */
 227   sh3_cmds.load_routine = sh3_load;     /* load_routine */
 228   sh3_cmds.load = NULL;         /* download command */
 229   sh3_cmds.loadresp = NULL;     /* Load response */
 230   sh3_cmds.prompt = "\n:";      /* monitor command prompt */
 231   sh3_cmds.line_term = "\r";    /* end-of-line terminator */
 232   sh3_cmds.cmd_end = ".\r";     /* optional command terminator */
 233   sh3_cmds.target = &sh3_ops;   /* target operations */
 234   sh3_cmds.stopbits = SERIAL_1_STOPBITS;        /* number of stop bits */
 235   sh3_cmds.regnames = sh3_regnames;     /* registers names */
 236   sh3_cmds.magic = MONITOR_OPS_MAGIC;   /* magic */
 237 }                               /* init_sh3_cmds */
 238
 239 /* This monitor structure is identical except for a couple slots, so
 240    we will fill it in from the base structure when needed.  */
 241
 242 static struct monitor_ops sh3e_cmds;
 243
 244 static void
 245 sh3_open (char *args, int from_tty)
 246 {
 247   char *serial_port_name = args;
 248   char *parallel_port_name = 0;
 249
 250   if (args)
 251     {
 252       char *cursor = serial_port_name = xstrdup (args);
 253
 254       while (*cursor && *cursor != ' ')
 255         cursor++;
 256
 257       if (*cursor)
 258         *cursor++ = 0;
 259
 260       while (*cursor == ' ')
 261         cursor++;
 262
 263       if (*cursor)
 264         parallel_port_name = cursor;
 265     }
 266
 267   monitor_open (serial_port_name, &sh3_cmds, from_tty);
 268
 269   if (parallel_port_name)
 270     {
 271       parallel = SERIAL_OPEN (parallel_port_name);
 272
 273       if (!parallel)
 274         perror_with_name ("Unable to open parallel port.");
 275
 276       parallel_in_use = 1;
 277     }
 278
 279   /* If we connected successfully, we know the processor is an SH3.  */
 280   set_architecture_from_arch_mach (bfd_arch_sh, bfd_mach_sh3);
 281 }
 282
 283
 284 static void
 285 sh3e_open (char *args, int from_tty)
 286 {
 287   char *serial_port_name = args;
 288   char *parallel_port_name = 0;
 289
 290   if (args)
 291     {
 292       char *cursor = serial_port_name = xstrdup (args);
 293
 294       while (*cursor && *cursor != ' ')
 295         cursor++;
 296
 297       if (*cursor)
 298         *cursor++ = 0;
 299
 300       while (*cursor == ' ')
 301         cursor++;
 302
 303       if (*cursor)
 304         parallel_port_name = cursor;
 305     }
 306
 307   /* Set up the SH-3E monitor commands structure.  */
 308
 309   memcpy (&sh3e_cmds, &sh3_cmds, sizeof (struct monitor_ops));
 310
 311   sh3e_cmds.target = &sh3e_ops;
 312   sh3e_cmds.regnames = sh3e_regnames;
 313
 314   monitor_open (serial_port_name, &sh3e_cmds, from_tty);
 315
 316   if (parallel_port_name)
 317     {
 318       parallel = SERIAL_OPEN (parallel_port_name);
 319
 320       if (!parallel)
 321         perror_with_name ("Unable to open parallel port.");
 322
 323       parallel_in_use = 1;
 324     }
 325
 326   /* If we connected successfully, we know the processor is an SH3E.  */
 327   set_architecture_from_arch_mach (bfd_arch_sh, bfd_mach_sh3);
 328 }
 329
 330 static void
 331 sh3_close (int quitting)
 332 {
 333   monitor_close (quitting);
 334   if (parallel_in_use)
 335     {
 336       SERIAL_CLOSE (parallel);
 337       parallel_in_use = 0;
 338     }
 339 }
 340
 341 void
 342 _initialize_sh3_rom (void)
 343 {
 344   init_sh3_cmds ();
 345   init_monitor_ops (&sh3_ops);
 346
 347   sh3_ops.to_shortname = "sh3";
 348   sh3_ops.to_longname = "Hitachi SH-3 rom monitor";
 349
 350   sh3_ops.to_doc =
 351 #ifdef _WINDOWS
 352   /* On windows we can talk through the parallel port too. */
 353     "Debug on a Hitachi eval board running the SH-3 rom monitor.\n"
 354     "Specify the serial device it is connected to (e.g. com2).\n"
 355     "If you want to use the parallel port to download to it, specify that\n"
 356     "as the second argument. (e.g. lpt1)";
 357 #else
 358     "Debug on a Hitachi eval board running the SH-3 rom monitor.\n\
 359 Specify the serial device it is connected to (e.g. /dev/ttya).";
 360 #endif
 361
 362   sh3_ops.to_open = sh3_open;
 363   sh3_ops.to_close = sh3_close;
 364
 365   add_target (&sh3_ops);
 366
 367   /* Setup the SH3e, which has float registers.  */
 368
 369   init_monitor_ops (&sh3e_ops);
 370
 371   sh3e_ops.to_shortname = "sh3e";
 372   sh3e_ops.to_longname = "Hitachi SH-3E rom monitor";
 373
 374   sh3e_ops.to_doc =
 375 #ifdef _WINDOWS
 376   /* On windows we can talk through the parallel port too. */
 377     "Debug on a Hitachi eval board running the SH-3E rom monitor.\n"
 378     "Specify the serial device it is connected to (e.g. com2).\n"
 379     "If you want to use the parallel port to download to it, specify that\n"
 380     "as the second argument. (e.g. lpt1)";
 381 #else
 382     "Debug on a Hitachi eval board running the SH-3E rom monitor.\n\
 383 Specify the serial device it is connected to (e.g. /dev/ttya).";
 384 #endif
 385
 386   sh3e_ops.to_open = sh3e_open;
 387   sh3e_ops.to_close = sh3_close;
 388
 389   add_target (&sh3e_ops);
 390 }