exec: Make ldl_*_phys input an AddressSpace
[qemu.git] / target-ppc / gdbstub.c
1 /*
2 * PowerPC 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 /* Old gdb always expects FP registers. Newer (xml-aware) gdb only
25 * expects whatever the target description contains. Due to a
26 * historical mishap the FP registers appear in between core integer
27 * regs and PC, MSR, CR, and so forth. We hack round this by giving the
28 * FP regs zero size when talking to a newer gdb.
29 */
30
31 int ppc_cpu_gdb_read_register(CPUState *cs, uint8_t *mem_buf, int n)
32 {
33 PowerPCCPU *cpu = POWERPC_CPU(cs);
34 CPUPPCState *env = &cpu->env;
35
36 if (n < 32) {
37 /* gprs */
38 return gdb_get_regl(mem_buf, env->gpr[n]);
39 } else if (n < 64) {
40 /* fprs */
41 if (gdb_has_xml) {
42 return 0;
43 }
44 stfq_p(mem_buf, env->fpr[n-32]);
45 return 8;
46 } else {
47 switch (n) {
48 case 64:
49 return gdb_get_regl(mem_buf, env->nip);
50 case 65:
51 return gdb_get_regl(mem_buf, env->msr);
52 case 66:
53 {
54 uint32_t cr = 0;
55 int i;
56 for (i = 0; i < 8; i++) {
57 cr |= env->crf[i] << (32 - ((i + 1) * 4));
58 }
59 return gdb_get_reg32(mem_buf, cr);
60 }
61 case 67:
62 return gdb_get_regl(mem_buf, env->lr);
63 case 68:
64 return gdb_get_regl(mem_buf, env->ctr);
65 case 69:
66 return gdb_get_regl(mem_buf, env->xer);
67 case 70:
68 {
69 if (gdb_has_xml) {
70 return 0;
71 }
72 return gdb_get_reg32(mem_buf, env->fpscr);
73 }
74 }
75 }
76 return 0;
77 }
78
79 int ppc_cpu_gdb_write_register(CPUState *cs, uint8_t *mem_buf, int n)
80 {
81 PowerPCCPU *cpu = POWERPC_CPU(cs);
82 CPUPPCState *env = &cpu->env;
83
84 if (n < 32) {
85 /* gprs */
86 env->gpr[n] = ldtul_p(mem_buf);
87 return sizeof(target_ulong);
88 } else if (n < 64) {
89 /* fprs */
90 if (gdb_has_xml) {
91 return 0;
92 }
93 env->fpr[n-32] = ldfq_p(mem_buf);
94 return 8;
95 } else {
96 switch (n) {
97 case 64:
98 env->nip = ldtul_p(mem_buf);
99 return sizeof(target_ulong);
100 case 65:
101 ppc_store_msr(env, ldtul_p(mem_buf));
102 return sizeof(target_ulong);
103 case 66:
104 {
105 uint32_t cr = ldl_p(mem_buf);
106 int i;
107 for (i = 0; i < 8; i++) {
108 env->crf[i] = (cr >> (32 - ((i + 1) * 4))) & 0xF;
109 }
110 return 4;
111 }
112 case 67:
113 env->lr = ldtul_p(mem_buf);
114 return sizeof(target_ulong);
115 case 68:
116 env->ctr = ldtul_p(mem_buf);
117 return sizeof(target_ulong);
118 case 69:
119 env->xer = ldtul_p(mem_buf);
120 return sizeof(target_ulong);
121 case 70:
122 /* fpscr */
123 if (gdb_has_xml) {
124 return 0;
125 }
126 store_fpscr(env, ldtul_p(mem_buf), 0xffffffff);
127 return sizeof(target_ulong);
128 }
129 }
130 return 0;
131 }