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