Add support to GDB for the Renesas rl78 architecture.
[external/binutils.git] / gdb / ppcbug-rom.c
1 /* Remote debugging interface for PPCbug (PowerPC) Rom monitor
2    for GDB, the GNU debugger.
3    Copyright (C) 1995, 1998-2001, 2007-2012 Free Software Foundation,
4    Inc.
5
6    Written by Stu Grossman of Cygnus Support
7
8    This file is part of GDB.
9
10    This program is free software; you can redistribute it and/or modify
11    it under the terms of the GNU General Public License as published by
12    the Free Software Foundation; either version 3 of the License, or
13    (at your option) any later version.
14
15    This program is distributed in the hope that it will be useful,
16    but WITHOUT ANY WARRANTY; without even the implied warranty of
17    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18    GNU General Public License for more details.
19
20    You should have received a copy of the GNU General Public License
21    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
22
23 #include "defs.h"
24 #include "gdbcore.h"
25 #include "target.h"
26 #include "monitor.h"
27 #include "serial.h"
28 #include "regcache.h"
29
30 static void
31 ppcbug_supply_register (struct regcache *regcache, char *regname,
32                         int regnamelen, char *val, int vallen)
33 {
34   int regno = 0;
35
36   if (regnamelen < 2 || regnamelen > 4)
37     return;
38
39   switch (regname[0])
40     {
41     case 'R':
42       if (regname[1] < '0' || regname[1] > '9')
43         return;
44       if (regnamelen == 2)
45         regno = regname[1] - '0';
46       else if (regnamelen == 3 && regname[2] >= '0' && regname[2] <= '9')
47         regno = (regname[1] - '0') * 10 + (regname[2] - '0');
48       else
49         return;
50       break;
51     case 'F':
52       if (regname[1] != 'R' || regname[2] < '0' || regname[2] > '9')
53         return;
54       if (regnamelen == 3)
55         regno = 32 + regname[2] - '0';
56       else if (regnamelen == 4 && regname[3] >= '0' && regname[3] <= '9')
57         regno = 32 + (regname[2] - '0') * 10 + (regname[3] - '0');
58       else
59         return;
60       break;
61     case 'I':
62       if (regnamelen != 2 || regname[1] != 'P')
63         return;
64       regno = 64;
65       break;
66     case 'M':
67       if (regnamelen != 3 || regname[1] != 'S' || regname[2] != 'R')
68         return;
69       regno = 65;
70       break;
71     case 'C':
72       if (regnamelen != 2 || regname[1] != 'R')
73         return;
74       regno = 66;
75       break;
76     case 'S':
77       if (regnamelen != 4 || regname[1] != 'P' || regname[2] != 'R')
78         return;
79       else if (regname[3] == '8')
80         regno = 67;
81       else if (regname[3] == '9')
82         regno = 68;
83       else if (regname[3] == '1')
84         regno = 69;
85       else if (regname[3] == '0')
86         regno = 70;
87       else
88         return;
89       break;
90     default:
91       return;
92     }
93
94   monitor_supply_register (regcache, regno, val);
95 }
96
97 /*
98  * This array of registers needs to match the indexes used by GDB.  The
99  * whole reason this exists is because the various ROM monitors use
100  * different names than GDB does, and don't support all the
101  * registers either.  So, typing "info reg sp" becomes an "A7".
102  */
103
104 static char *ppcbug_regnames[] =
105 {
106   "r0", "r1", "r2", "r3", "r4", "r5", "r6", "r7",
107   "r8", "r9", "r10", "r11", "r12", "r13", "r14", "r15",
108   "r16", "r17", "r18", "r19", "r20", "r21", "r22", "r23",
109   "r24", "r25", "r26", "r27", "r28", "r29", "r30", "r31",
110
111   "fr0", "fr1", "fr2", "fr3", "fr4", "fr5", "fr6", "fr7",
112   "fr8", "fr9", "fr10", "fr11", "fr12", "fr13", "fr14", "fr15",
113   "fr16", "fr17", "fr18", "fr19", "fr20", "fr21", "fr22", "fr23",
114   "fr24", "fr25", "fr26", "fr27", "fr28", "fr29", "fr30", "fr31",
115
116 /* pc      ps      cnd     lr      cnt     xer     mq */
117   "ip", "msr", "cr", "spr8", "spr9", "spr1", "spr0"
118 };
119
120 /*
121  * Define the monitor command strings.  Since these are passed directly
122  * through to a printf style function, we need can include formatting
123  * strings.  We also need a CR or LF on the end.
124  */
125
126 static struct target_ops ppcbug_ops0;
127 static struct target_ops ppcbug_ops1;
128
129 static char *ppcbug_inits[] =
130 {"\r", NULL};
131
132 static void
133 init_ppc_cmds (char *LOAD_CMD,
134                struct monitor_ops *OPS,
135                struct target_ops *targops)
136 {
137   OPS->flags = MO_CLR_BREAK_USES_ADDR | MO_HANDLE_NL;
138   OPS->init = ppcbug_inits;     /* Init strings */
139   OPS->cont = "g\r";            /* continue command */
140   OPS->step = "t\r";            /* single step */
141   OPS->stop = NULL;             /* interrupt command */
142   OPS->set_break = "br %x\r";   /* set a breakpoint */
143   OPS->clr_break = "nobr %x\r"; /* clear a breakpoint */
144   OPS->clr_all_break = "nobr\r";        /* clear all breakpoints */
145   OPS->fill = "bf %x:%x %x;b\r";        /* fill (start count val) */
146   OPS->setmem.cmdb = "ms %x %02x\r";    /* setmem.cmdb (addr, value) */
147   OPS->setmem.cmdw = "ms %x %04x\r";    /* setmem.cmdw (addr, value) */
148   OPS->setmem.cmdl = "ms %x %08x\r";    /* setmem.cmdl (addr, value) */
149   OPS->setmem.cmdll = NULL;     /* setmem.cmdll (addr, value) */
150   OPS->setmem.resp_delim = NULL;        /* setreg.resp_delim */
151   OPS->setmem.term = NULL;      /* setreg.term */
152   OPS->setmem.term_cmd = NULL;  /* setreg.term_cmd */
153   OPS->getmem.cmdb = "md %x:%x;b\r";    /* getmem.cmdb (addr, len) */
154   OPS->getmem.cmdw = "md %x:%x;b\r";    /* getmem.cmdw (addr, len) */
155   OPS->getmem.cmdl = "md %x:%x;b\r";    /* getmem.cmdl (addr, len) */
156   OPS->getmem.cmdll = NULL;     /* getmem.cmdll (addr, len) */
157   OPS->getmem.resp_delim = " "; /* getmem.resp_delim */
158   OPS->getmem.term = NULL;      /* getmem.term */
159   OPS->getmem.term_cmd = NULL;  /* getmem.term_cmd */
160   OPS->setreg.cmd = "rs %s %x\r";       /* setreg.cmd (name, value) */
161   OPS->setreg.resp_delim = NULL;        /* setreg.resp_delim */
162   OPS->setreg.term = NULL;      /* setreg.term */
163   OPS->setreg.term_cmd = NULL;  /* setreg.term_cmd */
164   OPS->getreg.cmd = "rs %s\r";  /* getreg.cmd (name) */
165   OPS->getreg.resp_delim = "="; /* getreg.resp_delim */
166   OPS->getreg.term = NULL;      /* getreg.term */
167   OPS->getreg.term_cmd = NULL;  /* getreg.term_cmd */
168                                 /* register_pattern */
169   OPS->register_pattern = "\\(\\w+\\) +=\\([0-9a-fA-F]+\\b\\)";
170   OPS->supply_register = ppcbug_supply_register;
171   OPS->dump_registers = "rd\r"; /* dump all registers */
172   OPS->load_routine = NULL;     /* load_routine (defaults to SRECs) */
173   OPS->load = LOAD_CMD;         /* download command */
174   OPS->loadresp = NULL;         /* load response */
175   OPS->prompt = "PPC1-Bug>";    /* monitor command prompt */
176   OPS->line_term = "\r";        /* end-of-line terminator */
177   OPS->cmd_end = NULL;          /* optional command terminator */
178   OPS->target = targops;        /* target operations */
179   OPS->stopbits = SERIAL_1_STOPBITS;    /* number of stop bits */
180   OPS->regnames = ppcbug_regnames;      /* registers names */
181   OPS->magic = MONITOR_OPS_MAGIC;       /* magic */
182 }
183
184
185 static struct monitor_ops ppcbug_cmds0;
186 static struct monitor_ops ppcbug_cmds1;
187
188 static void
189 ppcbug_open0 (char *args, int from_tty)
190 {
191   monitor_open (args, &ppcbug_cmds0, from_tty);
192 }
193
194 static void
195 ppcbug_open1 (char *args, int from_tty)
196 {
197   monitor_open (args, &ppcbug_cmds1, from_tty);
198 }
199
200 extern initialize_file_ftype _initialize_ppcbug_rom; /* -Wmissing-prototypes */
201
202 void
203 _initialize_ppcbug_rom (void)
204 {
205   init_ppc_cmds ("lo 0\r", &ppcbug_cmds0, &ppcbug_ops0);
206   init_ppc_cmds ("lo 1\r", &ppcbug_cmds1, &ppcbug_ops1);
207   init_monitor_ops (&ppcbug_ops0);
208
209   ppcbug_ops0.to_shortname = "ppcbug";
210   ppcbug_ops0.to_longname = "PowerPC PPCBug monitor on port 0";
211   ppcbug_ops0.to_doc = "Debug via the PowerPC PPCBug monitor using port 0.\n\
212 Specify the serial device it is connected to (e.g. /dev/ttya).";
213   ppcbug_ops0.to_open = ppcbug_open0;
214
215   add_target (&ppcbug_ops0);
216
217   init_monitor_ops (&ppcbug_ops1);
218
219   ppcbug_ops1.to_shortname = "ppcbug1";
220   ppcbug_ops1.to_longname = "PowerPC PPCBug monitor on port 1";
221   ppcbug_ops1.to_doc = "Debug via the PowerPC PPCBug monitor using port 1.\n\
222 Specify the serial device it is connected to (e.g. /dev/ttya).";
223   ppcbug_ops1.to_open = ppcbug_open1;
224
225   add_target (&ppcbug_ops1);
226 }