2000-03-21 J.T. Conklin <jtc@redback.com>
[platform/upstream/binutils.git] / gdb / remote-hms.c
1 /* Remote debugging interface for Hitachi HMS Monitor Version 1.0
2    Copyright 1995,1999 Free Software Foundation, Inc.
3    Contributed by Cygnus Support.  Written by Steve Chamberlain
4    (sac@cygnus.com).
5
6    This file is part of GDB.
7
8    This program is free software; you can redistribute it and/or modify
9    it under the terms of the GNU General Public License as published by
10    the Free Software Foundation; either version 2 of the License, or
11    (at your option) any later version.
12
13    This program is distributed in the hope that it will be useful,
14    but WITHOUT ANY WARRANTY; without even the implied warranty of
15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16    GNU General Public License for more details.
17
18    You should have received a copy of the GNU General Public License
19    along with this program; if not, write to the Free Software
20    Foundation, Inc., 59 Temple Place - Suite 330,
21    Boston, MA 02111-1307, USA.  */
22
23 #include "defs.h"
24 #include "gdbcore.h"
25 #include "target.h"
26 #include "monitor.h"
27 #include "serial.h"
28
29 static void hms_open PARAMS ((char *args, int from_tty));
30 static void
31 hms_supply_register (regname, regnamelen, val, vallen)
32      char *regname;
33      int regnamelen;
34      char *val;
35      int vallen;
36 {
37   int regno;
38
39   if (regnamelen != 2)
40     return;
41   if (regname[0] != 'P')
42     return;
43   /* We scan off all the registers in one go */
44
45   val = monitor_supply_register (PC_REGNUM, val);
46   /* Skip the ccr string */
47   while (*val != '=' && *val)
48     val++;
49
50   val = monitor_supply_register (CCR_REGNUM, val + 1);
51
52   /* Skip up to rest of regs */
53   while (*val != '=' && *val)
54     val++;
55
56   for (regno = 0; regno < 7; regno++)
57     {
58       val = monitor_supply_register (regno, val + 1);
59     }
60 }
61
62 /*
63  * This array of registers needs to match the indexes used by GDB. The
64  * whole reason this exists is because the various ROM monitors use
65  * different names than GDB does, and don't support all the
66  * registers either. So, typing "info reg sp" becomes a "r30".
67  */
68
69 static char *hms_regnames[NUM_REGS] =
70 {
71   "R0", "R1", "R2", "R3", "R4", "R5", "R6", "R7", "CCR", "PC"
72 };
73
74 /*
75  * Define the monitor command strings. Since these are passed directly
76  * through to a printf style function, we need can include formatting
77  * strings. We also need a CR or LF on the end.
78  */
79
80 static struct target_ops hms_ops;
81
82 static char *hms_inits[] =
83 {"\003",                        /* Resets the prompt, and clears repeated cmds */
84  NULL};
85
86 static struct monitor_ops hms_cmds;
87
88 static void
89 init_hms_cmds (void)
90 {
91   hms_cmds.flags = MO_CLR_BREAK_USES_ADDR | MO_FILL_USES_ADDR | MO_GETMEM_NEEDS_RANGE;
92   hms_cmds.init = hms_inits;    /* Init strings */
93   hms_cmds.cont = "g\r";        /* continue command */
94   hms_cmds.step = "s\r";        /* single step */
95   hms_cmds.stop = "\003";       /* ^C interrupts the program */
96   hms_cmds.set_break = "b %x\r";        /* set a breakpoint */
97   hms_cmds.clr_break = "b - %x\r";      /* clear a breakpoint */
98   hms_cmds.clr_all_break = "b -\r";     /* clear all breakpoints */
99   hms_cmds.fill = "f %x %x %x\r";       /* fill (start end val) */
100   hms_cmds.setmem.cmdb = "m.b %x=%x\r";         /* setmem.cmdb (addr, value) */
101   hms_cmds.setmem.cmdw = "m.w %x=%x\r";         /* setmem.cmdw (addr, value) */
102   hms_cmds.setmem.cmdl = NULL;  /* setmem.cmdl (addr, value) */
103   hms_cmds.setmem.cmdll = NULL; /* setmem.cmdll (addr, value) */
104   hms_cmds.setmem.resp_delim = NULL;    /* setreg.resp_delim */
105   hms_cmds.setmem.term = NULL;  /* setreg.term */
106   hms_cmds.setmem.term_cmd = NULL;      /* setreg.term_cmd */
107   hms_cmds.getmem.cmdb = "m.b %x %x\r";         /* getmem.cmdb (addr, addr) */
108   hms_cmds.getmem.cmdw = "m.w %x %x\r";         /* getmem.cmdw (addr, addr) */
109   hms_cmds.getmem.cmdl = NULL;  /* getmem.cmdl (addr, addr) */
110   hms_cmds.getmem.cmdll = NULL; /* getmem.cmdll (addr, addr) */
111   hms_cmds.getmem.resp_delim = ": ";    /* getmem.resp_delim */
112   hms_cmds.getmem.term = ">";   /* getmem.term */
113   hms_cmds.getmem.term_cmd = "\003";    /* getmem.term_cmd */
114   hms_cmds.setreg.cmd = "r %s=%x\r";    /* setreg.cmd (name, value) */
115   hms_cmds.setreg.resp_delim = NULL;    /* setreg.resp_delim */
116   hms_cmds.setreg.term = NULL;  /* setreg.term */
117   hms_cmds.setreg.term_cmd = NULL;      /* setreg.term_cmd */
118   hms_cmds.getreg.cmd = "r %s\r";       /* getreg.cmd (name) */
119   hms_cmds.getreg.resp_delim = " (";    /* getreg.resp_delim */
120   hms_cmds.getreg.term = ":";   /* getreg.term */
121   hms_cmds.getreg.term_cmd = "\003";    /* getreg.term_cmd */
122   hms_cmds.dump_registers = "r\r";      /* dump_registers */
123   hms_cmds.register_pattern = "\\(\\w+\\)=\\([0-9a-fA-F]+\\)";  /* register_pattern */
124   hms_cmds.supply_register = hms_supply_register;       /* supply_register */
125   hms_cmds.load_routine = NULL; /* load_routine (defaults to SRECs) */
126   hms_cmds.load = "tl\r";       /* download command */
127   hms_cmds.loadresp = NULL;     /* load response */
128   hms_cmds.prompt = ">";        /* monitor command prompt */
129   hms_cmds.line_term = "\r";    /* end-of-command delimitor */
130   hms_cmds.cmd_end = NULL;      /* optional command terminator */
131   hms_cmds.target = &hms_ops;   /* target operations */
132   hms_cmds.stopbits = SERIAL_1_STOPBITS;        /* number of stop bits */
133   hms_cmds.regnames = hms_regnames;     /* registers names */
134   hms_cmds.magic = MONITOR_OPS_MAGIC;   /* magic */
135 }                               /* init_hms-cmds */
136
137 static void
138 hms_open (args, from_tty)
139      char *args;
140      int from_tty;
141 {
142   monitor_open (args, &hms_cmds, from_tty);
143 }
144
145 int write_dos_tick_delay;
146
147 void
148 _initialize_remote_hms ()
149 {
150   init_hms_cmds ();
151   init_monitor_ops (&hms_ops);
152
153   hms_ops.to_shortname = "hms";
154   hms_ops.to_longname = "Hitachi Microsystems H8/300 debug monitor";
155   hms_ops.to_doc = "Debug via the HMS monitor.\n\
156 Specify the serial device it is connected to (e.g. /dev/ttya).";
157   hms_ops.to_open = hms_open;
158   /* By trial and error I've found that this delay doesn't break things */
159   write_dos_tick_delay = 1;
160   add_target (&hms_ops);
161 }