]>
Commit | Line | Data |
---|---|---|
58850dad AF |
1 | /* |
2 | * ARM 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 | */ | |
5b50e790 AF |
20 | #include "config.h" |
21 | #include "qemu-common.h" | |
22 | #include "exec/gdbstub.h" | |
58850dad AF |
23 | |
24 | /* Old gdb always expect FPA registers. Newer (xml-aware) gdb only expect | |
25 | whatever the target description contains. Due to a historical mishap | |
26 | the FPA registers appear in between core integer regs and the CPSR. | |
27 | We hack round this by giving the FPA regs zero size when talking to a | |
28 | newer gdb. */ | |
29 | ||
5b50e790 | 30 | int arm_cpu_gdb_read_register(CPUState *cs, uint8_t *mem_buf, int n) |
58850dad | 31 | { |
5b50e790 AF |
32 | ARMCPU *cpu = ARM_CPU(cs); |
33 | CPUARMState *env = &cpu->env; | |
34 | ||
58850dad AF |
35 | if (n < 16) { |
36 | /* Core integer register. */ | |
986a2998 | 37 | return gdb_get_reg32(mem_buf, env->regs[n]); |
58850dad AF |
38 | } |
39 | if (n < 24) { | |
40 | /* FPA registers. */ | |
41 | if (gdb_has_xml) { | |
42 | return 0; | |
43 | } | |
44 | memset(mem_buf, 0, 12); | |
45 | return 12; | |
46 | } | |
47 | switch (n) { | |
48 | case 24: | |
49 | /* FPA status register. */ | |
50 | if (gdb_has_xml) { | |
51 | return 0; | |
52 | } | |
986a2998 | 53 | return gdb_get_reg32(mem_buf, 0); |
58850dad AF |
54 | case 25: |
55 | /* CPSR */ | |
986a2998 | 56 | return gdb_get_reg32(mem_buf, cpsr_read(env)); |
58850dad AF |
57 | } |
58 | /* Unknown register. */ | |
59 | return 0; | |
60 | } | |
61 | ||
5b50e790 | 62 | int arm_cpu_gdb_write_register(CPUState *cs, uint8_t *mem_buf, int n) |
58850dad | 63 | { |
5b50e790 AF |
64 | ARMCPU *cpu = ARM_CPU(cs); |
65 | CPUARMState *env = &cpu->env; | |
58850dad AF |
66 | uint32_t tmp; |
67 | ||
68 | tmp = ldl_p(mem_buf); | |
69 | ||
70 | /* Mask out low bit of PC to workaround gdb bugs. This will probably | |
71 | cause problems if we ever implement the Jazelle DBX extensions. */ | |
72 | if (n == 15) { | |
73 | tmp &= ~1; | |
74 | } | |
75 | ||
76 | if (n < 16) { | |
77 | /* Core integer register. */ | |
78 | env->regs[n] = tmp; | |
79 | return 4; | |
80 | } | |
81 | if (n < 24) { /* 16-23 */ | |
82 | /* FPA registers (ignored). */ | |
83 | if (gdb_has_xml) { | |
84 | return 0; | |
85 | } | |
86 | return 12; | |
87 | } | |
88 | switch (n) { | |
89 | case 24: | |
90 | /* FPA status register (ignored). */ | |
91 | if (gdb_has_xml) { | |
92 | return 0; | |
93 | } | |
94 | return 4; | |
95 | case 25: | |
96 | /* CPSR */ | |
97 | cpsr_write(env, tmp, 0xffffffff); | |
98 | return 4; | |
99 | } | |
100 | /* Unknown register. */ | |
101 | return 0; | |
102 | } |