xref: /openbmc/qemu/target/sh4/gdbstub.c (revision 4ea5fe997db4c5d893b69072f488880c07857a54)
1fcf5ef2aSThomas Huth /*
2fcf5ef2aSThomas Huth  * SuperH gdb server stub
3fcf5ef2aSThomas Huth  *
4fcf5ef2aSThomas Huth  * Copyright (c) 2003-2005 Fabrice Bellard
5fcf5ef2aSThomas Huth  * Copyright (c) 2013 SUSE LINUX Products GmbH
6fcf5ef2aSThomas Huth  *
7fcf5ef2aSThomas Huth  * This library is free software; you can redistribute it and/or
8fcf5ef2aSThomas Huth  * modify it under the terms of the GNU Lesser General Public
9fcf5ef2aSThomas Huth  * License as published by the Free Software Foundation; either
106faf2b6cSThomas Huth  * version 2.1 of the License, or (at your option) any later version.
11fcf5ef2aSThomas Huth  *
12fcf5ef2aSThomas Huth  * This library is distributed in the hope that it will be useful,
13fcf5ef2aSThomas Huth  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14fcf5ef2aSThomas Huth  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15fcf5ef2aSThomas Huth  * Lesser General Public License for more details.
16fcf5ef2aSThomas Huth  *
17fcf5ef2aSThomas Huth  * You should have received a copy of the GNU Lesser General Public
18fcf5ef2aSThomas Huth  * License along with this library; if not, see <http://www.gnu.org/licenses/>.
19fcf5ef2aSThomas Huth  */
20fcf5ef2aSThomas Huth #include "qemu/osdep.h"
21fcf5ef2aSThomas Huth #include "cpu.h"
22*4ea5fe99SAlex Bennée #include "gdbstub/helpers.h"
23fcf5ef2aSThomas Huth 
24fcf5ef2aSThomas Huth /* Hint: Use "set architecture sh4" in GDB to see fpu registers */
25fcf5ef2aSThomas Huth /* FIXME: We should use XML for this.  */
26fcf5ef2aSThomas Huth 
27a010bdbeSAlex Bennée int superh_cpu_gdb_read_register(CPUState *cs, GByteArray *mem_buf, int n)
28fcf5ef2aSThomas Huth {
29fcf5ef2aSThomas Huth     SuperHCPU *cpu = SUPERH_CPU(cs);
30fcf5ef2aSThomas Huth     CPUSH4State *env = &cpu->env;
31fcf5ef2aSThomas Huth 
32fcf5ef2aSThomas Huth     switch (n) {
33fcf5ef2aSThomas Huth     case 0 ... 7:
34fcf5ef2aSThomas Huth         if ((env->sr & (1u << SR_MD)) && (env->sr & (1u << SR_RB))) {
35fcf5ef2aSThomas Huth             return gdb_get_regl(mem_buf, env->gregs[n + 16]);
36fcf5ef2aSThomas Huth         } else {
37fcf5ef2aSThomas Huth             return gdb_get_regl(mem_buf, env->gregs[n]);
38fcf5ef2aSThomas Huth         }
39fcf5ef2aSThomas Huth     case 8 ... 15:
40fcf5ef2aSThomas Huth         return gdb_get_regl(mem_buf, env->gregs[n]);
41fcf5ef2aSThomas Huth     case 16:
42fcf5ef2aSThomas Huth         return gdb_get_regl(mem_buf, env->pc);
43fcf5ef2aSThomas Huth     case 17:
44fcf5ef2aSThomas Huth         return gdb_get_regl(mem_buf, env->pr);
45fcf5ef2aSThomas Huth     case 18:
46fcf5ef2aSThomas Huth         return gdb_get_regl(mem_buf, env->gbr);
47fcf5ef2aSThomas Huth     case 19:
48fcf5ef2aSThomas Huth         return gdb_get_regl(mem_buf, env->vbr);
49fcf5ef2aSThomas Huth     case 20:
50fcf5ef2aSThomas Huth         return gdb_get_regl(mem_buf, env->mach);
51fcf5ef2aSThomas Huth     case 21:
52fcf5ef2aSThomas Huth         return gdb_get_regl(mem_buf, env->macl);
53fcf5ef2aSThomas Huth     case 22:
54fcf5ef2aSThomas Huth         return gdb_get_regl(mem_buf, cpu_read_sr(env));
55fcf5ef2aSThomas Huth     case 23:
56fcf5ef2aSThomas Huth         return gdb_get_regl(mem_buf, env->fpul);
57fcf5ef2aSThomas Huth     case 24:
58fcf5ef2aSThomas Huth         return gdb_get_regl(mem_buf, env->fpscr);
59fcf5ef2aSThomas Huth     case 25 ... 40:
60fcf5ef2aSThomas Huth         if (env->fpscr & FPSCR_FR) {
61d20711bdSPeter Maydell             return gdb_get_reg32(mem_buf, env->fregs[n - 9]);
62fcf5ef2aSThomas Huth         }
63d20711bdSPeter Maydell         return gdb_get_reg32(mem_buf, env->fregs[n - 25]);
64fcf5ef2aSThomas Huth     case 41:
65fcf5ef2aSThomas Huth         return gdb_get_regl(mem_buf, env->ssr);
66fcf5ef2aSThomas Huth     case 42:
67fcf5ef2aSThomas Huth         return gdb_get_regl(mem_buf, env->spc);
68fcf5ef2aSThomas Huth     case 43 ... 50:
69fcf5ef2aSThomas Huth         return gdb_get_regl(mem_buf, env->gregs[n - 43]);
70fcf5ef2aSThomas Huth     case 51 ... 58:
71fcf5ef2aSThomas Huth         return gdb_get_regl(mem_buf, env->gregs[n - (51 - 16)]);
72fcf5ef2aSThomas Huth     }
73fcf5ef2aSThomas Huth 
74fcf5ef2aSThomas Huth     return 0;
75fcf5ef2aSThomas Huth }
76fcf5ef2aSThomas Huth 
77fcf5ef2aSThomas Huth int superh_cpu_gdb_write_register(CPUState *cs, uint8_t *mem_buf, int n)
78fcf5ef2aSThomas Huth {
79fcf5ef2aSThomas Huth     SuperHCPU *cpu = SUPERH_CPU(cs);
80fcf5ef2aSThomas Huth     CPUSH4State *env = &cpu->env;
81fcf5ef2aSThomas Huth 
82fcf5ef2aSThomas Huth     switch (n) {
83fcf5ef2aSThomas Huth     case 0 ... 7:
84fcf5ef2aSThomas Huth         if ((env->sr & (1u << SR_MD)) && (env->sr & (1u << SR_RB))) {
85fcf5ef2aSThomas Huth             env->gregs[n + 16] = ldl_p(mem_buf);
86fcf5ef2aSThomas Huth         } else {
87fcf5ef2aSThomas Huth             env->gregs[n] = ldl_p(mem_buf);
88fcf5ef2aSThomas Huth         }
89fcf5ef2aSThomas Huth         break;
90fcf5ef2aSThomas Huth     case 8 ... 15:
91fcf5ef2aSThomas Huth         env->gregs[n] = ldl_p(mem_buf);
92fcf5ef2aSThomas Huth         break;
93fcf5ef2aSThomas Huth     case 16:
94fcf5ef2aSThomas Huth         env->pc = ldl_p(mem_buf);
95fcf5ef2aSThomas Huth         break;
96fcf5ef2aSThomas Huth     case 17:
97fcf5ef2aSThomas Huth         env->pr = ldl_p(mem_buf);
98fcf5ef2aSThomas Huth         break;
99fcf5ef2aSThomas Huth     case 18:
100fcf5ef2aSThomas Huth         env->gbr = ldl_p(mem_buf);
101fcf5ef2aSThomas Huth         break;
102fcf5ef2aSThomas Huth     case 19:
103fcf5ef2aSThomas Huth         env->vbr = ldl_p(mem_buf);
104fcf5ef2aSThomas Huth         break;
105fcf5ef2aSThomas Huth     case 20:
106fcf5ef2aSThomas Huth         env->mach = ldl_p(mem_buf);
107fcf5ef2aSThomas Huth         break;
108fcf5ef2aSThomas Huth     case 21:
109fcf5ef2aSThomas Huth         env->macl = ldl_p(mem_buf);
110fcf5ef2aSThomas Huth         break;
111fcf5ef2aSThomas Huth     case 22:
112fcf5ef2aSThomas Huth         cpu_write_sr(env, ldl_p(mem_buf));
113fcf5ef2aSThomas Huth         break;
114fcf5ef2aSThomas Huth     case 23:
115fcf5ef2aSThomas Huth         env->fpul = ldl_p(mem_buf);
116fcf5ef2aSThomas Huth         break;
117fcf5ef2aSThomas Huth     case 24:
118fcf5ef2aSThomas Huth         env->fpscr = ldl_p(mem_buf);
119fcf5ef2aSThomas Huth         break;
120fcf5ef2aSThomas Huth     case 25 ... 40:
121fcf5ef2aSThomas Huth         if (env->fpscr & FPSCR_FR) {
122d20711bdSPeter Maydell             env->fregs[n - 9] = ldl_p(mem_buf);
123fcf5ef2aSThomas Huth         } else {
124d20711bdSPeter Maydell             env->fregs[n - 25] = ldl_p(mem_buf);
125fcf5ef2aSThomas Huth         }
126fcf5ef2aSThomas Huth         break;
127fcf5ef2aSThomas Huth     case 41:
128fcf5ef2aSThomas Huth         env->ssr = ldl_p(mem_buf);
129fcf5ef2aSThomas Huth         break;
130fcf5ef2aSThomas Huth     case 42:
131fcf5ef2aSThomas Huth         env->spc = ldl_p(mem_buf);
132fcf5ef2aSThomas Huth         break;
133fcf5ef2aSThomas Huth     case 43 ... 50:
134fcf5ef2aSThomas Huth         env->gregs[n - 43] = ldl_p(mem_buf);
135fcf5ef2aSThomas Huth         break;
136fcf5ef2aSThomas Huth     case 51 ... 58:
137fcf5ef2aSThomas Huth         env->gregs[n - (51 - 16)] = ldl_p(mem_buf);
138fcf5ef2aSThomas Huth         break;
139fcf5ef2aSThomas Huth     default:
140fcf5ef2aSThomas Huth         return 0;
141fcf5ef2aSThomas Huth     }
142fcf5ef2aSThomas Huth 
143fcf5ef2aSThomas Huth     return 4;
144fcf5ef2aSThomas Huth }
145