2003-02-18 Elena Zannoni <ezannoni@redhat.com>
[deliverable/binutils-gdb.git] / gdb / rom68k-rom.c
index 57398fd65a65dd1a7307b1159ebb7f338d02d6b5..57c0a182327c7fd58391b52940a0df87395db10d 100644 (file)
-/* Remote target glue for the rom68k ROM monitor. This was running on a
-Motorola IDP board.
+/* Remote target glue for the ROM68K ROM monitor.
+   Copyright 1988, 1991, 1992, 1993, 1994, 1995, 1998, 1999, 2000, 2001
+   Free Software Foundation, Inc.
 
-   Copyright 1988, 1991, 1992, 1993, 1994 Free Software Foundation, Inc.
+   This file is part of GDB.
 
-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 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.
 
-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.  */
+   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 "gdbcore.h"
 #include "target.h"
 #include "monitor.h"
+#include "serial.h"
+#include "regcache.h"
+#include "value.h"
 
-extern int baud_rate;
-
-void rom68k_open();
-void monitor_open();
-
-/*
- * this array of registers need to match the indexes used by GDB. The
- * whole reason this exists is cause the various ROM monitors use
- * different strings than GDB does, and doesn't support all the
- * registers either. So, typing "info reg sp" becomes a "r30".
- */
-static char *rom68k_regnames[] = {
-  "d0", "d1", "d2", "d3", "d4", "d5", "d6", "d7", "a0", "a1",
-  "a2", "a3", "a4", "a5", "a6", "usp", "ssp","pc",   "",   "",
-  "",   "",   "",   "",   "",   "",   "",   "",   "",   "",
-  "",   "",   "",   "",   "",   "",    "",
-  "",   "",   "",   "",   "",   "",    "",    "",  "",  "",
-  "",   "",   "",   "",   "",   "",    "",    "",  "",  "",
-  "",   "",   "",   "",   "",   "",    "",
-  "",   "",   "",   "",   "",   "",    "",    "",
-  "",   "",   "",   "",   "",   "",    "",    "",
-  "",   "",   "",   "",   "",   "",    "",    "",
-  "",   "",   "",   "",   "",   "",    "",    "",
-  "",   "",   "",   "",   "",   "",    "",    "",
-  "",   "",   "",   "",   "",   "",    "",    "",
-  "",   "",   "",   "",   "",   "",    "",    "",
-  "",   "",   "",   "",   "",   "",    "",    ""
-};
-
-/*
- * Define the monitor command strings. Since these are passed directly
- * through to a printf style function, we need can include formatting
- * strings. We also need a CR or LF on the end.
- */
-
-struct target_ops rom68k_ops = {
-  "rom68k",
-  "WinBond's debug monitor for the Rom68k Eval board",
-  "Debug on a Motorola IDP eval board running the ROM68K monitor.\n\
-Specify the serial device it is connected to (e.g. /dev/ttya).",
-  rom68k_open,
-  monitor_close, 
-  monitor_attach,
-  monitor_detach,
-  monitor_resume,
-  monitor_wait,
-  monitor_fetch_register,
-  monitor_store_register,
-  monitor_prepare_to_store,
-  monitor_xfer_inferior_memory,
-  monitor_files_info,
-  monitor_insert_breakpoint,
-  monitor_remove_breakpoint,   /* Breakpoints */
-  0,
-  0,
-  0,
-  0,
-  0,                           /* Terminal handling */
-  monitor_kill,
-  monitor_load,                        /* load */
-  0,                           /* lookup_symbol */
-  monitor_create_inferior,
-  monitor_mourn_inferior,
-  0,                           /* can_run */
-  0,                           /* notice_signals */
-  0,                            /* to_stop */
-  process_stratum,
-  0,                           /* next */
-  1,
-  1,
-  1,
-  1,
-  1,                           /* all mem, mem, stack, regs, exec */
-  0,
-  0,                           /* Section pointers */
-  OPS_MAGIC                    /* Always the last thing */
-};
-
-struct monitor_ops rom68k_cmds = {
-  1,                                   /* 1 for ASCII, 0 for binary */
-  "\n",                                        /* monitor init string */
-  "go \n",                             /* execute or usually GO command */
-  "go \n",                             /* continue command */
-  "st \n",                             /* single step */
-  "db %x\n",                           /* set a breakpoint */
-  "cb %x\r",                           /* clear a breakpoint */
-  0,                                   /* 0 for number, 1 for address */
-  {
-    "pm %x %x\r",                      /* set memory */
-    "=",                               /* delimiter */
-    "",                                        /* the result */
-  },
-  {
-    "dm %x 1\r",                       /* get memory */
-    "",                                        /* delimiter */
-    "",                                        /* the result */
-  },
-  {
-    "pr %s %x\r",                      /* set a register */
-    "",                                        /* delimiter between registers */
-    "",                                        /* the result */
-  },
+#include "m68k-tdep.h"
+
+static void rom68k_open (char *args, int from_tty);
+
+/* Return true if C is a hex digit.
+   We can't use isxdigit here: that is affected by the current locale;
+   ROM68K is not.  */
+static int
+is_hex_digit (int c)
+{
+  return (('0' <= c && c <= '9')
+          || ('a' <= c && c <= 'f')
+          || ('A' <= c && c <= 'F'));
+}
+
+
+/* Convert hex digit A to a number.  */
+static int
+hex_digit_value (int a)
+{
+  if (a >= '0' && a <= '9')
+    return a - '0';
+  else if (a >= 'a' && a <= 'f')
+    return a - 'a' + 10;
+  else if (a >= 'A' && a <= 'F')
+    return a - 'A' + 10;
+  else
+    error ("Invalid hex digit %d", a);
+}
+
+
+/* Return true iff C is a whitespace character.
+   We can't use isspace here: that is affected by the current locale;
+   ROM68K is not.  */
+static int
+is_whitespace (int c)
+{
+  return (c == ' '
+          || c == '\r'
+          || c == '\n'
+          || c == '\t'
+          || c == '\f');
+}
+
+
+/* Parse a string of hex digits starting at HEX, supply them as the
+   value of register REGNO, skip any whitespace, and return a pointer
+   to the next character.
+
+   There is a function in monitor.c, monitor_supply_register, which is
+   supposed to do this job.  However, there is some rather odd stuff
+   in there (whitespace characters don't terminate numbers, for
+   example) that is incorrect for ROM68k.  It's basically impossible
+   to safely tweak monitor_supply_register --- it's used by a zillion
+   other monitors; who knows what behaviors they're depending on.  So
+   instead, we'll just use our own function, which can behave exactly
+   the way we want it to.  */
+static char *
+rom68k_supply_one_register (int regno, unsigned char *hex)
+{
+  ULONGEST value;
+  unsigned char *regbuf = alloca (max_register_size (current_gdbarch));
+
+  value = 0;
+  while (*hex != '\0')
+    if (is_hex_digit (*hex))
+      value = (value * 16) + hex_digit_value (*hex++);
+    else
+      break;
+
+  /* Skip any whitespace.  */
+  while (is_whitespace (*hex))
+    hex++;
+
+  store_unsigned_integer (regbuf, REGISTER_RAW_SIZE (regno), value);
+  supply_register (regno, regbuf);
+
+  return hex;
+}
+
+
+static void
+rom68k_supply_register (char *regname, int regnamelen, char *val, int vallen)
+{
+  int numregs;
+  int regno;
+
+  numregs = 1;
+  regno = -1;
+
+  if (regnamelen == 2)
+    switch (regname[0])
+      {
+      case 'S':
+       if (regname[1] == 'R')
+         regno = PS_REGNUM;
+       break;
+      case 'P':
+       if (regname[1] == 'C')
+         regno = PC_REGNUM;
+       break;
+      case 'D':
+       if (regname[1] != 'R')
+         break;
+       regno = M68K_D0_REGNUM;
+       numregs = 8;
+       break;
+      case 'A':
+       if (regname[1] != 'R')
+         break;
+       regno = M68K_A0_REGNUM;
+       numregs = 7;
+       break;
+      }
+  else if (regnamelen == 3)
+    switch (regname[0])
+      {
+      case 'I':
+       if (regname[1] == 'S' && regname[2] == 'P')
+         regno = SP_REGNUM;
+      }
+
+  if (regno >= 0)
+    while (numregs-- > 0)
+      val = rom68k_supply_one_register (regno++, val);
+}
+
+/* This array of registers need to match the indexes used by GDB.
+   This exists because the various ROM monitors use different strings
+   than does GDB, and don't necessarily support all the registers
+   either. So, typing "info reg sp" becomes a "r30".  */
+
+static const char *
+rom68k_regname (int index) 
+{
+
+  static char *regnames[] =
   {
-    "pr %s\n",                         /* get a register */
-    ":",                               /* delimiter between registers */
-    "",                                        /* the result */
-  },
-  "dc\n",                              /* download command */
-  "ROM68K :->",                                /* monitor command prompt */
-  "=",                                 /* end-of-command delimitor */
-  ".\n",                               /* optional command terminator */
-  &rom68k_ops,                         /* target operations */
-  "none,srec,default",                 /* load types */
-  "none",                              /* load protocols */
-  rom68k_regnames                      /* registers names */
-};
+    "D0", "D1", "D2", "D3", "D4", "D5", "D6", "D7",
+    "A0", "A1", "A2", "A3", "A4", "A5", "A6", "ISP",
+    "SR", "PC"
+  };
+  
+  if ((index >= (sizeof (regnames) / sizeof(regnames[0]))) 
+       || (index < 0) || (index >= NUM_REGS))
+    return NULL;
+  else
+    return regnames[index];
 
-void
-rom68k_open(args, from_tty)
-     char *args;
-     int from_tty;
+}
+
+/* Define the monitor command strings. Since these are passed directly
+   through to a printf style function, we may include formatting
+   strings. We also need a CR or LF on the end.  */
+
+static struct target_ops rom68k_ops;
+
+static char *rom68k_inits[] =
+{".\r\r", NULL};               /* Exits pm/pr & download cmds */
+
+static struct monitor_ops rom68k_cmds;
+
+static void
+init_rom68k_cmds (void)
+{
+  rom68k_cmds.flags = MO_PRINT_PROGRAM_OUTPUT;
+  rom68k_cmds.init = rom68k_inits;     /* monitor init string */
+  rom68k_cmds.cont = "go\r";
+  rom68k_cmds.step = "st\r";
+  rom68k_cmds.stop = NULL;
+  rom68k_cmds.set_break = "db %x\r";
+  rom68k_cmds.clr_break = "cb %x\r";
+  rom68k_cmds.clr_all_break = "cb *\r";
+  rom68k_cmds.fill = "fm %x %x %x\r";
+  rom68k_cmds.setmem.cmdb = "pm %x %x\r";
+  rom68k_cmds.setmem.cmdw = "pm.w %x %x\r";
+  rom68k_cmds.setmem.cmdl = "pm.l %x %x\r";
+  rom68k_cmds.setmem.cmdll = NULL;
+  rom68k_cmds.setmem.resp_delim = NULL;
+  rom68k_cmds.setmem.term = NULL;
+  rom68k_cmds.setmem.term_cmd = NULL;
+  rom68k_cmds.getmem.cmdb = "dm %x %x\r";
+  rom68k_cmds.getmem.cmdw = "dm.w %x %x\r";
+  rom68k_cmds.getmem.cmdl = "dm.l %x %x\r";
+  rom68k_cmds.getmem.cmdll = NULL;
+  rom68k_cmds.getmem.resp_delim = "  ";
+  rom68k_cmds.getmem.term = NULL;
+  rom68k_cmds.getmem.term_cmd = NULL;
+  rom68k_cmds.setreg.cmd = "pr %s %x\r";
+  rom68k_cmds.setreg.resp_delim = NULL;
+  rom68k_cmds.setreg.term = NULL;
+  rom68k_cmds.setreg.term_cmd = NULL;
+  rom68k_cmds.getreg.cmd = "pr %s\r";
+  rom68k_cmds.getreg.resp_delim = ":  ";
+  rom68k_cmds.getreg.term = "= ";
+  rom68k_cmds.getreg.term_cmd = ".\r";
+  rom68k_cmds.dump_registers = "dr\r";
+  rom68k_cmds.register_pattern =
+    "\\(\\w+\\)=\\([0-9a-fA-F]+\\( +[0-9a-fA-F]+\\b\\)*\\)";
+  rom68k_cmds.supply_register = rom68k_supply_register;
+  rom68k_cmds.load_routine = NULL;
+  rom68k_cmds.load = "dc\r";
+  rom68k_cmds.loadresp = "Waiting for S-records from host... ";
+  rom68k_cmds.prompt = "ROM68K :-> ";
+  rom68k_cmds.line_term = "\r";
+  rom68k_cmds.cmd_end = ".\r";
+  rom68k_cmds.target = &rom68k_ops;
+  rom68k_cmds.stopbits = SERIAL_1_STOPBITS;
+  rom68k_cmds.regnames = NULL;
+  rom68k_cmds.regname = rom68k_regname;
+  rom68k_cmds.magic = MONITOR_OPS_MAGIC;
+}                              /* init_rom68k_cmds */
+
+static void
+rom68k_open (char *args, int from_tty)
 {
-  target_preopen(from_tty);
-  push_target  (&rom68k_ops);
-  push_monitor (&rom68k_cmds);
-  monitor_open (args, "rom68k", from_tty);
+  monitor_open (args, &rom68k_cmds, from_tty);
 }
 
 void
-_initialize_rom68k ()
+_initialize_rom68k (void)
 {
-  add_target (&rom68k_ops);
+  init_rom68k_cmds ();
+  init_monitor_ops (&rom68k_ops);
+
+  rom68k_ops.to_shortname = "rom68k";
+  rom68k_ops.to_longname = "Rom68k debug monitor for the IDP Eval board";
+  rom68k_ops.to_doc = "Debug on a Motorola IDP eval board running the ROM68K monitor.\n\
+Specify the serial device it is connected to (e.g. /dev/ttya).";
+  rom68k_ops.to_open = rom68k_open;
 
-  /* this is the default, since it's the only baud rate supported by the hardware */
-  baud_rate = 9600;
+  add_target (&rom68k_ops);
 }
This page took 0.049401 seconds and 4 git commands to generate.