xref: /qemu/target/sh4/gdbstub.c (revision 9d4c9946ee1dd5887e6663e4ead1abce770b6ba6)
12f937732SAndreas Färber /*
22f937732SAndreas Färber  * SuperH gdb server stub
32f937732SAndreas Färber  *
42f937732SAndreas Färber  * Copyright (c) 2003-2005 Fabrice Bellard
52f937732SAndreas Färber  * Copyright (c) 2013 SUSE LINUX Products GmbH
62f937732SAndreas Färber  *
72f937732SAndreas Färber  * This library is free software; you can redistribute it and/or
82f937732SAndreas Färber  * modify it under the terms of the GNU Lesser General Public
92f937732SAndreas Färber  * License as published by the Free Software Foundation; either
102f937732SAndreas Färber  * version 2 of the License, or (at your option) any later version.
112f937732SAndreas Färber  *
122f937732SAndreas Färber  * This library is distributed in the hope that it will be useful,
132f937732SAndreas Färber  * but WITHOUT ANY WARRANTY; without even the implied warranty of
142f937732SAndreas Färber  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
152f937732SAndreas Färber  * Lesser General Public License for more details.
162f937732SAndreas Färber  *
172f937732SAndreas Färber  * You should have received a copy of the GNU Lesser General Public
182f937732SAndreas Färber  * License along with this library; if not, see <http://www.gnu.org/licenses/>.
192f937732SAndreas Färber  */
209d4c9946SPeter Maydell #include "qemu/osdep.h"
215b50e790SAndreas Färber #include "qemu-common.h"
225b50e790SAndreas Färber #include "exec/gdbstub.h"
232f937732SAndreas Färber 
242f937732SAndreas Färber /* Hint: Use "set architecture sh4" in GDB to see fpu registers */
252f937732SAndreas Färber /* FIXME: We should use XML for this.  */
262f937732SAndreas Färber 
275b50e790SAndreas Färber int superh_cpu_gdb_read_register(CPUState *cs, uint8_t *mem_buf, int n)
282f937732SAndreas Färber {
295b50e790SAndreas Färber     SuperHCPU *cpu = SUPERH_CPU(cs);
305b50e790SAndreas Färber     CPUSH4State *env = &cpu->env;
315b50e790SAndreas Färber 
322f937732SAndreas Färber     switch (n) {
332f937732SAndreas Färber     case 0 ... 7:
345ed9a259SAurelien Jarno         if ((env->sr & (1u << SR_MD)) && (env->sr & (1u << SR_RB))) {
35986a2998SAndreas Färber             return gdb_get_regl(mem_buf, env->gregs[n + 16]);
362f937732SAndreas Färber         } else {
37986a2998SAndreas Färber             return gdb_get_regl(mem_buf, env->gregs[n]);
382f937732SAndreas Färber         }
392f937732SAndreas Färber     case 8 ... 15:
40986a2998SAndreas Färber         return gdb_get_regl(mem_buf, env->gregs[n]);
412f937732SAndreas Färber     case 16:
42986a2998SAndreas Färber         return gdb_get_regl(mem_buf, env->pc);
432f937732SAndreas Färber     case 17:
44986a2998SAndreas Färber         return gdb_get_regl(mem_buf, env->pr);
452f937732SAndreas Färber     case 18:
46986a2998SAndreas Färber         return gdb_get_regl(mem_buf, env->gbr);
472f937732SAndreas Färber     case 19:
48986a2998SAndreas Färber         return gdb_get_regl(mem_buf, env->vbr);
492f937732SAndreas Färber     case 20:
50986a2998SAndreas Färber         return gdb_get_regl(mem_buf, env->mach);
512f937732SAndreas Färber     case 21:
52986a2998SAndreas Färber         return gdb_get_regl(mem_buf, env->macl);
532f937732SAndreas Färber     case 22:
5434086945SAurelien Jarno         return gdb_get_regl(mem_buf, cpu_read_sr(env));
552f937732SAndreas Färber     case 23:
56986a2998SAndreas Färber         return gdb_get_regl(mem_buf, env->fpul);
572f937732SAndreas Färber     case 24:
58986a2998SAndreas Färber         return gdb_get_regl(mem_buf, env->fpscr);
592f937732SAndreas Färber     case 25 ... 40:
602f937732SAndreas Färber         if (env->fpscr & FPSCR_FR) {
612f937732SAndreas Färber             stfl_p(mem_buf, env->fregs[n - 9]);
622f937732SAndreas Färber         } else {
632f937732SAndreas Färber             stfl_p(mem_buf, env->fregs[n - 25]);
642f937732SAndreas Färber         }
652f937732SAndreas Färber         return 4;
662f937732SAndreas Färber     case 41:
67986a2998SAndreas Färber         return gdb_get_regl(mem_buf, env->ssr);
682f937732SAndreas Färber     case 42:
69986a2998SAndreas Färber         return gdb_get_regl(mem_buf, env->spc);
702f937732SAndreas Färber     case 43 ... 50:
71986a2998SAndreas Färber         return gdb_get_regl(mem_buf, env->gregs[n - 43]);
722f937732SAndreas Färber     case 51 ... 58:
73986a2998SAndreas Färber         return gdb_get_regl(mem_buf, env->gregs[n - (51 - 16)]);
742f937732SAndreas Färber     }
752f937732SAndreas Färber 
762f937732SAndreas Färber     return 0;
772f937732SAndreas Färber }
782f937732SAndreas Färber 
795b50e790SAndreas Färber int superh_cpu_gdb_write_register(CPUState *cs, uint8_t *mem_buf, int n)
802f937732SAndreas Färber {
815b50e790SAndreas Färber     SuperHCPU *cpu = SUPERH_CPU(cs);
825b50e790SAndreas Färber     CPUSH4State *env = &cpu->env;
835b50e790SAndreas Färber 
842f937732SAndreas Färber     switch (n) {
852f937732SAndreas Färber     case 0 ... 7:
865ed9a259SAurelien Jarno         if ((env->sr & (1u << SR_MD)) && (env->sr & (1u << SR_RB))) {
872f937732SAndreas Färber             env->gregs[n + 16] = ldl_p(mem_buf);
882f937732SAndreas Färber         } else {
892f937732SAndreas Färber             env->gregs[n] = ldl_p(mem_buf);
902f937732SAndreas Färber         }
912f937732SAndreas Färber         break;
922f937732SAndreas Färber     case 8 ... 15:
932f937732SAndreas Färber         env->gregs[n] = ldl_p(mem_buf);
942f937732SAndreas Färber         break;
952f937732SAndreas Färber     case 16:
962f937732SAndreas Färber         env->pc = ldl_p(mem_buf);
972f937732SAndreas Färber         break;
982f937732SAndreas Färber     case 17:
992f937732SAndreas Färber         env->pr = ldl_p(mem_buf);
1002f937732SAndreas Färber         break;
1012f937732SAndreas Färber     case 18:
1022f937732SAndreas Färber         env->gbr = ldl_p(mem_buf);
1032f937732SAndreas Färber         break;
1042f937732SAndreas Färber     case 19:
1052f937732SAndreas Färber         env->vbr = ldl_p(mem_buf);
1062f937732SAndreas Färber         break;
1072f937732SAndreas Färber     case 20:
1082f937732SAndreas Färber         env->mach = ldl_p(mem_buf);
1092f937732SAndreas Färber         break;
1102f937732SAndreas Färber     case 21:
1112f937732SAndreas Färber         env->macl = ldl_p(mem_buf);
1122f937732SAndreas Färber         break;
1132f937732SAndreas Färber     case 22:
11434086945SAurelien Jarno         cpu_write_sr(env, ldl_p(mem_buf));
1152f937732SAndreas Färber         break;
1162f937732SAndreas Färber     case 23:
1172f937732SAndreas Färber         env->fpul = ldl_p(mem_buf);
1182f937732SAndreas Färber         break;
1192f937732SAndreas Färber     case 24:
1202f937732SAndreas Färber         env->fpscr = ldl_p(mem_buf);
1212f937732SAndreas Färber         break;
1222f937732SAndreas Färber     case 25 ... 40:
1232f937732SAndreas Färber         if (env->fpscr & FPSCR_FR) {
1242f937732SAndreas Färber             env->fregs[n - 9] = ldfl_p(mem_buf);
1252f937732SAndreas Färber         } else {
1262f937732SAndreas Färber             env->fregs[n - 25] = ldfl_p(mem_buf);
1272f937732SAndreas Färber         }
1282f937732SAndreas Färber         break;
1292f937732SAndreas Färber     case 41:
1302f937732SAndreas Färber         env->ssr = ldl_p(mem_buf);
1312f937732SAndreas Färber         break;
1322f937732SAndreas Färber     case 42:
1332f937732SAndreas Färber         env->spc = ldl_p(mem_buf);
1342f937732SAndreas Färber         break;
1352f937732SAndreas Färber     case 43 ... 50:
1362f937732SAndreas Färber         env->gregs[n - 43] = ldl_p(mem_buf);
1372f937732SAndreas Färber         break;
1382f937732SAndreas Färber     case 51 ... 58:
1392f937732SAndreas Färber         env->gregs[n - (51 - 16)] = ldl_p(mem_buf);
1402f937732SAndreas Färber         break;
1412f937732SAndreas Färber     default:
1422f937732SAndreas Färber         return 0;
1432f937732SAndreas Färber     }
1442f937732SAndreas Färber 
1452f937732SAndreas Färber     return 4;
1462f937732SAndreas Färber }
147