2 * Debugger Power PC specific functions
4 * Copyright 2000-2003 Marcus Meissner
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.1 of the License, or (at your option) any later version.
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.
17 * You should have received a copy of the GNU Lesser General Public
18 * License along with this library; if not, write to the Free Software
19 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
24 #if defined(__powerpc__)
26 static BOOL
be_ppc_get_addr(HANDLE hThread
, const dbg_ctx_t
*ctx
,
27 enum be_cpu_addr bca
, ADDRESS64
* addr
)
32 return be_cpu_build_addr(hThread
, ctx
, addr
, 0, ctx
->ctx
.Iar
);
34 case be_cpu_addr_stack
:
35 case be_cpu_addr_frame
:
36 dbg_printf("not done\n");
41 static BOOL
be_ppc_get_register_info(int regno
, enum be_cpu_addr
* kind
)
43 dbg_printf("not done\n");
47 static void be_ppc_single_step(dbg_ctx_t
*ctx
, BOOL enable
)
50 # define MSR_SE (1<<10)
52 if (enable
) ctx
->ctx
.Msr
|= MSR_SE
;
53 else ctx
->ctx
.Msr
&= ~MSR_SE
;
56 static void be_ppc_print_context(HANDLE hThread
, const dbg_ctx_t
*ctx
, int all_regs
)
58 dbg_printf("Context printing for PPC not done yet\n");
61 static void be_ppc_print_segment_info(HANDLE hThread
, const dbg_ctx_t
*ctx
)
65 static struct dbg_internal_var be_ppc_ctx
[] =
67 {0, NULL
, 0, dbg_itype_none
}
70 static BOOL
be_ppc_is_step_over_insn(const void* insn
)
72 dbg_printf("not done\n");
76 static BOOL
be_ppc_is_function_return(const void* insn
)
78 dbg_printf("not done\n");
82 static BOOL
be_ppc_is_break_insn(const void* insn
)
84 dbg_printf("not done\n");
88 static BOOL
be_ppc_is_func_call(const void* insn
, ADDRESS64
* callee
)
93 static BOOL
be_ppc_is_jump(const void* insn
, ADDRESS64
* jumpee
)
98 static void be_ppc_disasm_one_insn(ADDRESS64
* addr
, int display
)
101 dbg_printf("Disasm NIY\n");
104 static BOOL
be_ppc_insert_Xpoint(HANDLE hProcess
, const struct be_process_io
* pio
,
105 dbg_ctx_t
*ctx
, enum be_xpoint_type type
,
106 void* addr
, unsigned long* val
, unsigned size
)
113 case be_xpoint_break
:
114 if (!size
) return FALSE
;
115 if (!pio
->read(hProcess
, addr
, val
, 4, &sz
) || sz
!= 4) return FALSE
;
116 xbp
= 0x7d821008; /* 7d 82 10 08 ... in big endian */
117 if (!pio
->write(hProcess
, addr
, &xbp
, 4, &sz
) || sz
!= 4) return FALSE
;
120 dbg_printf("Unknown/unsupported bp type %c\n", type
);
126 static BOOL
be_ppc_remove_Xpoint(HANDLE hProcess
, const struct be_process_io
* pio
,
127 dbg_ctx_t
*ctx
, enum be_xpoint_type type
,
128 void* addr
, unsigned long val
, unsigned size
)
134 case be_xpoint_break
:
135 if (!size
) return FALSE
;
136 if (!pio
->write(hProcess
, addr
, &val
, 4, &sz
) || sz
== 4) return FALSE
;
139 dbg_printf("Unknown/unsupported bp type %c\n", type
);
145 static BOOL
be_ppc_is_watchpoint_set(const dbg_ctx_t
*ctx
, unsigned idx
)
147 dbg_printf("not done\n");
151 static void be_ppc_clear_watchpoint(dbg_ctx_t
*ctx
, unsigned idx
)
153 dbg_printf("not done\n");
156 static int be_ppc_adjust_pc_for_break(dbg_ctx_t
*ctx
, BOOL way
)
158 dbg_printf("not done\n");
162 static BOOL
be_ppc_fetch_integer(const struct dbg_lvalue
* lvalue
, unsigned size
,
163 BOOL is_signed
, LONGLONG
* ret
)
165 dbg_printf("not done\n");
169 static BOOL
be_ppc_fetch_float(const struct dbg_lvalue
* lvalue
, unsigned size
,
172 dbg_printf("not done\n");
176 static BOOL
be_ppc_store_integer(const struct dbg_lvalue
* lvalue
, unsigned size
,
177 BOOL is_signed
, LONGLONG val
)
179 dbg_printf("be_ppc_store_integer: not done\n");
183 static BOOL
be_ppc_get_context(HANDLE thread
, dbg_ctx_t
*ctx
)
185 ctx
->ctx
.ContextFlags
= CONTEXT_ALL
;
186 return GetThreadContext(thread
, &ctx
->ctx
);
189 static BOOL
be_ppc_set_context(HANDLE thread
, const dbg_ctx_t
*ctx
)
191 return SetThreadContext(thread
, &ctx
->ctx
);
194 #define REG(r,gs,m) {FIELD_OFFSET(CONTEXT, r), sizeof(((CONTEXT*)NULL)->r), gs, m}
196 static struct gdb_register be_ppc_gdb_register_map
[] = {
268 /* FIXME: MQ is missing? FIELD_OFFSET(CONTEXT, Mq), */
269 /* see gdb/nlm/ppc.c */
272 struct backend_cpu be_ppc
=
274 IMAGE_FILE_MACHINE_POWERPC
,
279 be_ppc_get_register_info
,
281 be_ppc_print_context
,
282 be_ppc_print_segment_info
,
284 be_ppc_is_step_over_insn
,
285 be_ppc_is_function_return
,
286 be_ppc_is_break_insn
,
289 be_ppc_disasm_one_insn
,
290 be_ppc_insert_Xpoint
,
291 be_ppc_remove_Xpoint
,
292 be_ppc_is_watchpoint_set
,
293 be_ppc_clear_watchpoint
,
294 be_ppc_adjust_pc_for_break
,
295 be_ppc_fetch_integer
,
297 be_ppc_store_integer
,
300 be_ppc_gdb_register_map
,
301 ARRAY_SIZE(be_ppc_gdb_register_map
),