]>
Commit | Line | Data |
---|---|---|
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 | } |