1 //===-- RegisterContextDarwin_arm.cpp ---------------------------*- C++ -*-===//
3 // The LLVM Compiler Infrastructure
5 // This file is distributed under the University of Illinois Open Source
6 // License. See LICENSE.TXT for details.
8 //===----------------------------------------------------------------------===//
10 #if defined(__APPLE__)
12 #include "RegisterContextDarwin_arm.h"
15 #include <mach/mach_types.h>
16 #include <mach/thread_act.h>
19 // Other libraries and framework includes
20 #include "lldb/Core/DataBufferHeap.h"
21 #include "lldb/Core/DataExtractor.h"
22 #include "lldb/Core/Log.h"
23 #include "lldb/Core/RegisterValue.h"
24 #include "lldb/Core/Scalar.h"
25 #include "lldb/Host/Endian.h"
26 #include "llvm/Support/Compiler.h"
28 #include "Plugins/Process/Utility/InstructionUtils.h"
30 // Support building against older versions of LLVM, this macro was added
32 #ifndef LLVM_EXTENSION
33 #define LLVM_EXTENSION
37 #include "ARM_GCC_Registers.h"
38 #include "ARM_DWARF_Registers.h"
41 using namespace lldb_private;
58 gpr_r13, gpr_sp = gpr_r13,
59 gpr_r14, gpr_lr = gpr_r14,
60 gpr_r15, gpr_pc = gpr_r15,
173 RegisterContextDarwin_arm::RegisterContextDarwin_arm(Thread &thread, uint32_t concrete_frame_idx) :
174 RegisterContext(thread, concrete_frame_idx),
180 for (i=0; i<kNumErrors; i++)
188 RegisterContextDarwin_arm::~RegisterContextDarwin_arm()
193 #define GPR_OFFSET(idx) ((idx) * 4)
194 #define FPU_OFFSET(idx) ((idx) * 4 + sizeof (RegisterContextDarwin_arm::GPR))
195 #define EXC_OFFSET(idx) ((idx) * 4 + sizeof (RegisterContextDarwin_arm::GPR) + sizeof (RegisterContextDarwin_arm::FPU))
196 #define DBG_OFFSET(reg) ((LLVM_EXTENSION offsetof (RegisterContextDarwin_arm::DBG, reg) + sizeof (RegisterContextDarwin_arm::GPR) + sizeof (RegisterContextDarwin_arm::FPU) + sizeof (RegisterContextDarwin_arm::EXC)))
198 #define DEFINE_DBG(reg, i) #reg, NULL, sizeof(((RegisterContextDarwin_arm::DBG *)NULL)->reg[i]), DBG_OFFSET(reg[i]), eEncodingUint, eFormatHex, { LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM, dbg_##reg##i }, NULL, NULL
199 #define REG_CONTEXT_SIZE (sizeof (RegisterContextDarwin_arm::GPR) + sizeof (RegisterContextDarwin_arm::FPU) + sizeof (RegisterContextDarwin_arm::EXC))
201 static RegisterInfo g_register_infos[] = {
202 // General purpose registers
203 // NAME ALT SZ OFFSET ENCODING FORMAT COMPILER DWARF GENERIC GDB LLDB NATIVE VALUE REGS INVALIDATE REGS
204 // ====== ======= == ============= ============= ============ =============== =============== ========================= ===================== ============= ========== ===============
205 { "r0", NULL, 4, GPR_OFFSET(0), eEncodingUint, eFormatHex, { gcc_r0, dwarf_r0, LLDB_INVALID_REGNUM, gdb_arm_r0, gpr_r0 }, NULL, NULL},
206 { "r1", NULL, 4, GPR_OFFSET(1), eEncodingUint, eFormatHex, { gcc_r1, dwarf_r1, LLDB_INVALID_REGNUM, gdb_arm_r1, gpr_r1 }, NULL, NULL},
207 { "r2", NULL, 4, GPR_OFFSET(2), eEncodingUint, eFormatHex, { gcc_r2, dwarf_r2, LLDB_INVALID_REGNUM, gdb_arm_r2, gpr_r2 }, NULL, NULL},
208 { "r3", NULL, 4, GPR_OFFSET(3), eEncodingUint, eFormatHex, { gcc_r3, dwarf_r3, LLDB_INVALID_REGNUM, gdb_arm_r3, gpr_r3 }, NULL, NULL},
209 { "r4", NULL, 4, GPR_OFFSET(4), eEncodingUint, eFormatHex, { gcc_r4, dwarf_r4, LLDB_INVALID_REGNUM, gdb_arm_r4, gpr_r4 }, NULL, NULL},
210 { "r5", NULL, 4, GPR_OFFSET(5), eEncodingUint, eFormatHex, { gcc_r5, dwarf_r5, LLDB_INVALID_REGNUM, gdb_arm_r5, gpr_r5 }, NULL, NULL},
211 { "r6", NULL, 4, GPR_OFFSET(6), eEncodingUint, eFormatHex, { gcc_r6, dwarf_r6, LLDB_INVALID_REGNUM, gdb_arm_r6, gpr_r6 }, NULL, NULL},
212 { "r7", NULL, 4, GPR_OFFSET(7), eEncodingUint, eFormatHex, { gcc_r7, dwarf_r7, LLDB_REGNUM_GENERIC_FP, gdb_arm_r7, gpr_r7 }, NULL, NULL},
213 { "r8", NULL, 4, GPR_OFFSET(8), eEncodingUint, eFormatHex, { gcc_r8, dwarf_r8, LLDB_INVALID_REGNUM, gdb_arm_r8, gpr_r8 }, NULL, NULL},
214 { "r9", NULL, 4, GPR_OFFSET(9), eEncodingUint, eFormatHex, { gcc_r9, dwarf_r9, LLDB_INVALID_REGNUM, gdb_arm_r9, gpr_r9 }, NULL, NULL},
215 { "r10", NULL, 4, GPR_OFFSET(10), eEncodingUint, eFormatHex, { gcc_r10, dwarf_r10, LLDB_INVALID_REGNUM, gdb_arm_r10, gpr_r10 }, NULL, NULL},
216 { "r11", NULL, 4, GPR_OFFSET(11), eEncodingUint, eFormatHex, { gcc_r11, dwarf_r11, LLDB_INVALID_REGNUM, gdb_arm_r11, gpr_r11 }, NULL, NULL},
217 { "r12", NULL, 4, GPR_OFFSET(12), eEncodingUint, eFormatHex, { gcc_r12, dwarf_r12, LLDB_INVALID_REGNUM, gdb_arm_r12, gpr_r12 }, NULL, NULL},
218 { "sp", "r13", 4, GPR_OFFSET(13), eEncodingUint, eFormatHex, { gcc_sp, dwarf_sp, LLDB_REGNUM_GENERIC_SP, gdb_arm_sp, gpr_sp }, NULL, NULL},
219 { "lr", "r14", 4, GPR_OFFSET(14), eEncodingUint, eFormatHex, { gcc_lr, dwarf_lr, LLDB_REGNUM_GENERIC_RA, gdb_arm_lr, gpr_lr }, NULL, NULL},
220 { "pc", "r15", 4, GPR_OFFSET(15), eEncodingUint, eFormatHex, { gcc_pc, dwarf_pc, LLDB_REGNUM_GENERIC_PC, gdb_arm_pc, gpr_pc }, NULL, NULL},
221 { "cpsr", "psr", 4, GPR_OFFSET(16), eEncodingUint, eFormatHex, { gcc_cpsr, dwarf_cpsr, LLDB_REGNUM_GENERIC_FLAGS, gdb_arm_cpsr, gpr_cpsr }, NULL, NULL},
223 { "s0", NULL, 4, FPU_OFFSET(0), eEncodingIEEE754,eFormatFloat, { LLDB_INVALID_REGNUM, dwarf_s0, LLDB_INVALID_REGNUM, gdb_arm_s0, fpu_s0 }, NULL, NULL},
224 { "s1", NULL, 4, FPU_OFFSET(1), eEncodingIEEE754,eFormatFloat, { LLDB_INVALID_REGNUM, dwarf_s1, LLDB_INVALID_REGNUM, gdb_arm_s1, fpu_s1 }, NULL, NULL},
225 { "s2", NULL, 4, FPU_OFFSET(2), eEncodingIEEE754,eFormatFloat, { LLDB_INVALID_REGNUM, dwarf_s2, LLDB_INVALID_REGNUM, gdb_arm_s2, fpu_s2 }, NULL, NULL},
226 { "s3", NULL, 4, FPU_OFFSET(3), eEncodingIEEE754,eFormatFloat, { LLDB_INVALID_REGNUM, dwarf_s3, LLDB_INVALID_REGNUM, gdb_arm_s3, fpu_s3 }, NULL, NULL},
227 { "s4", NULL, 4, FPU_OFFSET(4), eEncodingIEEE754,eFormatFloat, { LLDB_INVALID_REGNUM, dwarf_s4, LLDB_INVALID_REGNUM, gdb_arm_s4, fpu_s4 }, NULL, NULL},
228 { "s5", NULL, 4, FPU_OFFSET(5), eEncodingIEEE754,eFormatFloat, { LLDB_INVALID_REGNUM, dwarf_s5, LLDB_INVALID_REGNUM, gdb_arm_s5, fpu_s5 }, NULL, NULL},
229 { "s6", NULL, 4, FPU_OFFSET(6), eEncodingIEEE754,eFormatFloat, { LLDB_INVALID_REGNUM, dwarf_s6, LLDB_INVALID_REGNUM, gdb_arm_s6, fpu_s6 }, NULL, NULL},
230 { "s7", NULL, 4, FPU_OFFSET(7), eEncodingIEEE754,eFormatFloat, { LLDB_INVALID_REGNUM, dwarf_s7, LLDB_INVALID_REGNUM, gdb_arm_s7, fpu_s7 }, NULL, NULL},
231 { "s8", NULL, 4, FPU_OFFSET(8), eEncodingIEEE754,eFormatFloat, { LLDB_INVALID_REGNUM, dwarf_s8, LLDB_INVALID_REGNUM, gdb_arm_s8, fpu_s8 }, NULL, NULL},
232 { "s9", NULL, 4, FPU_OFFSET(9), eEncodingIEEE754,eFormatFloat, { LLDB_INVALID_REGNUM, dwarf_s9, LLDB_INVALID_REGNUM, gdb_arm_s9, fpu_s9 }, NULL, NULL},
233 { "s10", NULL, 4, FPU_OFFSET(10), eEncodingIEEE754,eFormatFloat, { LLDB_INVALID_REGNUM, dwarf_s10, LLDB_INVALID_REGNUM, gdb_arm_s10, fpu_s10 }, NULL, NULL},
234 { "s11", NULL, 4, FPU_OFFSET(11), eEncodingIEEE754,eFormatFloat, { LLDB_INVALID_REGNUM, dwarf_s11, LLDB_INVALID_REGNUM, gdb_arm_s11, fpu_s11 }, NULL, NULL},
235 { "s12", NULL, 4, FPU_OFFSET(12), eEncodingIEEE754,eFormatFloat, { LLDB_INVALID_REGNUM, dwarf_s12, LLDB_INVALID_REGNUM, gdb_arm_s12, fpu_s12 }, NULL, NULL},
236 { "s13", NULL, 4, FPU_OFFSET(13), eEncodingIEEE754,eFormatFloat, { LLDB_INVALID_REGNUM, dwarf_s13, LLDB_INVALID_REGNUM, gdb_arm_s13, fpu_s13 }, NULL, NULL},
237 { "s14", NULL, 4, FPU_OFFSET(14), eEncodingIEEE754,eFormatFloat, { LLDB_INVALID_REGNUM, dwarf_s14, LLDB_INVALID_REGNUM, gdb_arm_s14, fpu_s14 }, NULL, NULL},
238 { "s15", NULL, 4, FPU_OFFSET(15), eEncodingIEEE754,eFormatFloat, { LLDB_INVALID_REGNUM, dwarf_s15, LLDB_INVALID_REGNUM, gdb_arm_s15, fpu_s15 }, NULL, NULL},
239 { "s16", NULL, 4, FPU_OFFSET(16), eEncodingIEEE754,eFormatFloat, { LLDB_INVALID_REGNUM, dwarf_s16, LLDB_INVALID_REGNUM, gdb_arm_s16, fpu_s16 }, NULL, NULL},
240 { "s17", NULL, 4, FPU_OFFSET(17), eEncodingIEEE754,eFormatFloat, { LLDB_INVALID_REGNUM, dwarf_s17, LLDB_INVALID_REGNUM, gdb_arm_s17, fpu_s17 }, NULL, NULL},
241 { "s18", NULL, 4, FPU_OFFSET(18), eEncodingIEEE754,eFormatFloat, { LLDB_INVALID_REGNUM, dwarf_s18, LLDB_INVALID_REGNUM, gdb_arm_s18, fpu_s18 }, NULL, NULL},
242 { "s19", NULL, 4, FPU_OFFSET(19), eEncodingIEEE754,eFormatFloat, { LLDB_INVALID_REGNUM, dwarf_s19, LLDB_INVALID_REGNUM, gdb_arm_s19, fpu_s19 }, NULL, NULL},
243 { "s20", NULL, 4, FPU_OFFSET(20), eEncodingIEEE754,eFormatFloat, { LLDB_INVALID_REGNUM, dwarf_s20, LLDB_INVALID_REGNUM, gdb_arm_s20, fpu_s20 }, NULL, NULL},
244 { "s21", NULL, 4, FPU_OFFSET(21), eEncodingIEEE754,eFormatFloat, { LLDB_INVALID_REGNUM, dwarf_s21, LLDB_INVALID_REGNUM, gdb_arm_s21, fpu_s21 }, NULL, NULL},
245 { "s22", NULL, 4, FPU_OFFSET(22), eEncodingIEEE754,eFormatFloat, { LLDB_INVALID_REGNUM, dwarf_s22, LLDB_INVALID_REGNUM, gdb_arm_s22, fpu_s22 }, NULL, NULL},
246 { "s23", NULL, 4, FPU_OFFSET(23), eEncodingIEEE754,eFormatFloat, { LLDB_INVALID_REGNUM, dwarf_s23, LLDB_INVALID_REGNUM, gdb_arm_s23, fpu_s23 }, NULL, NULL},
247 { "s24", NULL, 4, FPU_OFFSET(24), eEncodingIEEE754,eFormatFloat, { LLDB_INVALID_REGNUM, dwarf_s24, LLDB_INVALID_REGNUM, gdb_arm_s24, fpu_s24 }, NULL, NULL},
248 { "s25", NULL, 4, FPU_OFFSET(25), eEncodingIEEE754,eFormatFloat, { LLDB_INVALID_REGNUM, dwarf_s25, LLDB_INVALID_REGNUM, gdb_arm_s25, fpu_s25 }, NULL, NULL},
249 { "s26", NULL, 4, FPU_OFFSET(26), eEncodingIEEE754,eFormatFloat, { LLDB_INVALID_REGNUM, dwarf_s26, LLDB_INVALID_REGNUM, gdb_arm_s26, fpu_s26 }, NULL, NULL},
250 { "s27", NULL, 4, FPU_OFFSET(27), eEncodingIEEE754,eFormatFloat, { LLDB_INVALID_REGNUM, dwarf_s27, LLDB_INVALID_REGNUM, gdb_arm_s27, fpu_s27 }, NULL, NULL},
251 { "s28", NULL, 4, FPU_OFFSET(28), eEncodingIEEE754,eFormatFloat, { LLDB_INVALID_REGNUM, dwarf_s28, LLDB_INVALID_REGNUM, gdb_arm_s28, fpu_s28 }, NULL, NULL},
252 { "s29", NULL, 4, FPU_OFFSET(29), eEncodingIEEE754,eFormatFloat, { LLDB_INVALID_REGNUM, dwarf_s29, LLDB_INVALID_REGNUM, gdb_arm_s29, fpu_s29 }, NULL, NULL},
253 { "s30", NULL, 4, FPU_OFFSET(30), eEncodingIEEE754,eFormatFloat, { LLDB_INVALID_REGNUM, dwarf_s30, LLDB_INVALID_REGNUM, gdb_arm_s30, fpu_s30 }, NULL, NULL},
254 { "s31", NULL, 4, FPU_OFFSET(31), eEncodingIEEE754,eFormatFloat, { LLDB_INVALID_REGNUM, dwarf_s31, LLDB_INVALID_REGNUM, gdb_arm_s31, fpu_s31 }, NULL, NULL},
255 { "fpscr", NULL, 4, FPU_OFFSET(32), eEncodingUint, eFormatHex, { LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,LLDB_INVALID_REGNUM, gdb_arm_fpscr, fpu_fpscr }, NULL, NULL},
257 { "exception",NULL, 4, EXC_OFFSET(0), eEncodingUint, eFormatHex, { LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM, exc_exception }, NULL, NULL},
258 { "fsr", NULL, 4, EXC_OFFSET(1), eEncodingUint, eFormatHex, { LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM, exc_fsr }, NULL, NULL},
259 { "far", NULL, 4, EXC_OFFSET(2), eEncodingUint, eFormatHex, { LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM, exc_far }, NULL, NULL},
261 { DEFINE_DBG (bvr, 0) },
262 { DEFINE_DBG (bvr, 1) },
263 { DEFINE_DBG (bvr, 2) },
264 { DEFINE_DBG (bvr, 3) },
265 { DEFINE_DBG (bvr, 4) },
266 { DEFINE_DBG (bvr, 5) },
267 { DEFINE_DBG (bvr, 6) },
268 { DEFINE_DBG (bvr, 7) },
269 { DEFINE_DBG (bvr, 8) },
270 { DEFINE_DBG (bvr, 9) },
271 { DEFINE_DBG (bvr, 10) },
272 { DEFINE_DBG (bvr, 11) },
273 { DEFINE_DBG (bvr, 12) },
274 { DEFINE_DBG (bvr, 13) },
275 { DEFINE_DBG (bvr, 14) },
276 { DEFINE_DBG (bvr, 15) },
278 { DEFINE_DBG (bcr, 0) },
279 { DEFINE_DBG (bcr, 1) },
280 { DEFINE_DBG (bcr, 2) },
281 { DEFINE_DBG (bcr, 3) },
282 { DEFINE_DBG (bcr, 4) },
283 { DEFINE_DBG (bcr, 5) },
284 { DEFINE_DBG (bcr, 6) },
285 { DEFINE_DBG (bcr, 7) },
286 { DEFINE_DBG (bcr, 8) },
287 { DEFINE_DBG (bcr, 9) },
288 { DEFINE_DBG (bcr, 10) },
289 { DEFINE_DBG (bcr, 11) },
290 { DEFINE_DBG (bcr, 12) },
291 { DEFINE_DBG (bcr, 13) },
292 { DEFINE_DBG (bcr, 14) },
293 { DEFINE_DBG (bcr, 15) },
295 { DEFINE_DBG (wvr, 0) },
296 { DEFINE_DBG (wvr, 1) },
297 { DEFINE_DBG (wvr, 2) },
298 { DEFINE_DBG (wvr, 3) },
299 { DEFINE_DBG (wvr, 4) },
300 { DEFINE_DBG (wvr, 5) },
301 { DEFINE_DBG (wvr, 6) },
302 { DEFINE_DBG (wvr, 7) },
303 { DEFINE_DBG (wvr, 8) },
304 { DEFINE_DBG (wvr, 9) },
305 { DEFINE_DBG (wvr, 10) },
306 { DEFINE_DBG (wvr, 11) },
307 { DEFINE_DBG (wvr, 12) },
308 { DEFINE_DBG (wvr, 13) },
309 { DEFINE_DBG (wvr, 14) },
310 { DEFINE_DBG (wvr, 15) },
312 { DEFINE_DBG (wcr, 0) },
313 { DEFINE_DBG (wcr, 1) },
314 { DEFINE_DBG (wcr, 2) },
315 { DEFINE_DBG (wcr, 3) },
316 { DEFINE_DBG (wcr, 4) },
317 { DEFINE_DBG (wcr, 5) },
318 { DEFINE_DBG (wcr, 6) },
319 { DEFINE_DBG (wcr, 7) },
320 { DEFINE_DBG (wcr, 8) },
321 { DEFINE_DBG (wcr, 9) },
322 { DEFINE_DBG (wcr, 10) },
323 { DEFINE_DBG (wcr, 11) },
324 { DEFINE_DBG (wcr, 12) },
325 { DEFINE_DBG (wcr, 13) },
326 { DEFINE_DBG (wcr, 14) },
327 { DEFINE_DBG (wcr, 15) }
330 // General purpose registers
353 // Floating point registers
392 // Exception registers
402 static size_t k_num_register_infos = (sizeof(g_register_infos)/sizeof(RegisterInfo));
405 RegisterContextDarwin_arm::InvalidateAllRegisters ()
407 InvalidateAllRegisterStates();
412 RegisterContextDarwin_arm::GetRegisterCount ()
414 assert(k_num_register_infos == k_num_registers);
415 return k_num_registers;
419 RegisterContextDarwin_arm::GetRegisterInfoAtIndex (size_t reg)
421 assert(k_num_register_infos == k_num_registers);
422 if (reg < k_num_registers)
423 return &g_register_infos[reg];
428 RegisterContextDarwin_arm::GetRegisterInfosCount ()
430 return k_num_register_infos;
434 RegisterContextDarwin_arm::GetRegisterInfos ()
436 return g_register_infos;
440 // Number of registers in each register set
441 const size_t k_num_gpr_registers = sizeof(g_gpr_regnums) / sizeof(uint32_t);
442 const size_t k_num_fpu_registers = sizeof(g_fpu_regnums) / sizeof(uint32_t);
443 const size_t k_num_exc_registers = sizeof(g_exc_regnums) / sizeof(uint32_t);
445 //----------------------------------------------------------------------
446 // Register set definitions. The first definitions at register set index
447 // of zero is for all registers, followed by other registers sets. The
448 // register information for the all register set need not be filled in.
449 //----------------------------------------------------------------------
450 static const RegisterSet g_reg_sets[] =
452 { "General Purpose Registers", "gpr", k_num_gpr_registers, g_gpr_regnums, },
453 { "Floating Point Registers", "fpu", k_num_fpu_registers, g_fpu_regnums },
454 { "Exception State Registers", "exc", k_num_exc_registers, g_exc_regnums }
457 const size_t k_num_regsets = sizeof(g_reg_sets) / sizeof(RegisterSet);
461 RegisterContextDarwin_arm::GetRegisterSetCount ()
463 return k_num_regsets;
467 RegisterContextDarwin_arm::GetRegisterSet (size_t reg_set)
469 if (reg_set < k_num_regsets)
470 return &g_reg_sets[reg_set];
475 //----------------------------------------------------------------------
476 // Register information defintions for 32 bit i386.
477 //----------------------------------------------------------------------
479 RegisterContextDarwin_arm::GetSetForNativeRegNum (int reg)
483 else if (reg < exc_exception)
485 else if (reg < k_num_registers)
491 RegisterContextDarwin_arm::ReadGPR (bool force)
494 if (force || !RegisterSetIsCached(set))
496 SetError(set, Read, DoReadGPR(GetThreadID(), set, gpr));
498 return GetError(GPRRegSet, Read);
502 RegisterContextDarwin_arm::ReadFPU (bool force)
505 if (force || !RegisterSetIsCached(set))
507 SetError(set, Read, DoReadFPU(GetThreadID(), set, fpu));
509 return GetError(FPURegSet, Read);
513 RegisterContextDarwin_arm::ReadEXC (bool force)
516 if (force || !RegisterSetIsCached(set))
518 SetError(set, Read, DoReadEXC(GetThreadID(), set, exc));
520 return GetError(EXCRegSet, Read);
524 RegisterContextDarwin_arm::ReadDBG (bool force)
527 if (force || !RegisterSetIsCached(set))
529 SetError(set, Read, DoReadDBG(GetThreadID(), set, dbg));
531 return GetError(DBGRegSet, Read);
535 RegisterContextDarwin_arm::WriteGPR ()
538 if (!RegisterSetIsCached(set))
540 SetError (set, Write, -1);
541 return KERN_INVALID_ARGUMENT;
543 SetError (set, Write, DoWriteGPR(GetThreadID(), set, gpr));
544 SetError (set, Read, -1);
545 return GetError(GPRRegSet, Write);
549 RegisterContextDarwin_arm::WriteFPU ()
552 if (!RegisterSetIsCached(set))
554 SetError (set, Write, -1);
555 return KERN_INVALID_ARGUMENT;
557 SetError (set, Write, DoWriteFPU(GetThreadID(), set, fpu));
558 SetError (set, Read, -1);
559 return GetError(FPURegSet, Write);
563 RegisterContextDarwin_arm::WriteEXC ()
566 if (!RegisterSetIsCached(set))
568 SetError (set, Write, -1);
569 return KERN_INVALID_ARGUMENT;
571 SetError (set, Write, DoWriteEXC(GetThreadID(), set, exc));
572 SetError (set, Read, -1);
573 return GetError(EXCRegSet, Write);
577 RegisterContextDarwin_arm::WriteDBG ()
580 if (!RegisterSetIsCached(set))
582 SetError (set, Write, -1);
583 return KERN_INVALID_ARGUMENT;
585 SetError (set, Write, DoWriteDBG(GetThreadID(), set, dbg));
586 SetError (set, Read, -1);
587 return GetError(DBGRegSet, Write);
592 RegisterContextDarwin_arm::ReadRegisterSet (uint32_t set, bool force)
596 case GPRRegSet: return ReadGPR(force);
597 case FPURegSet: return ReadFPU(force);
598 case EXCRegSet: return ReadEXC(force);
599 case DBGRegSet: return ReadDBG(force);
602 return KERN_INVALID_ARGUMENT;
606 RegisterContextDarwin_arm::WriteRegisterSet (uint32_t set)
608 // Make sure we have a valid context to set.
609 if (RegisterSetIsCached(set))
613 case GPRRegSet: return WriteGPR();
614 case FPURegSet: return WriteFPU();
615 case EXCRegSet: return WriteEXC();
616 case DBGRegSet: return WriteDBG();
620 return KERN_INVALID_ARGUMENT;
624 RegisterContextDarwin_arm::LogDBGRegisters (Log *log, const DBG& dbg)
628 for (uint32_t i=0; i<16; i++)
629 log->Printf("BVR%-2u/BCR%-2u = { 0x%8.8x, 0x%8.8x } WVR%-2u/WCR%-2u = { 0x%8.8x, 0x%8.8x }",
630 i, i, dbg.bvr[i], dbg.bcr[i],
631 i, i, dbg.wvr[i], dbg.wcr[i]);
637 RegisterContextDarwin_arm::ReadRegister (const RegisterInfo *reg_info, RegisterValue &value)
639 const uint32_t reg = reg_info->kinds[eRegisterKindLLDB];
640 int set = RegisterContextDarwin_arm::GetSetForNativeRegNum (reg);
645 if (ReadRegisterSet(set, false) != KERN_SUCCESS)
667 value.SetUInt32 (gpr.r[reg - gpr_r0]);
702 value.SetUInt32 (fpu.floats.s[reg], RegisterValue::eTypeFloat);
706 value.SetUInt32 (fpu.fpscr);
710 value.SetUInt32 (exc.exception);
713 value.SetUInt32 (exc.fsr);
716 value.SetUInt32 (exc.far);
720 value.SetValueToInvalid();
729 RegisterContextDarwin_arm::WriteRegister (const RegisterInfo *reg_info,
730 const RegisterValue &value)
732 const uint32_t reg = reg_info->kinds[eRegisterKindLLDB];
733 int set = GetSetForNativeRegNum (reg);
738 if (ReadRegisterSet(set, false) != KERN_SUCCESS)
760 gpr.r[reg - gpr_r0] = value.GetAsUInt32();
795 fpu.floats.s[reg] = value.GetAsUInt32();
799 fpu.fpscr = value.GetAsUInt32();
803 exc.exception = value.GetAsUInt32();
806 exc.fsr = value.GetAsUInt32();
809 exc.far = value.GetAsUInt32();
816 return WriteRegisterSet(set) == KERN_SUCCESS;
820 RegisterContextDarwin_arm::ReadAllRegisterValues (lldb::DataBufferSP &data_sp)
822 data_sp.reset (new DataBufferHeap (REG_CONTEXT_SIZE, 0));
824 ReadGPR (false) == KERN_SUCCESS &&
825 ReadFPU (false) == KERN_SUCCESS &&
826 ReadEXC (false) == KERN_SUCCESS)
828 uint8_t *dst = data_sp->GetBytes();
829 ::memcpy (dst, &gpr, sizeof(gpr));
832 ::memcpy (dst, &fpu, sizeof(fpu));
835 ::memcpy (dst, &exc, sizeof(exc));
842 RegisterContextDarwin_arm::WriteAllRegisterValues (const lldb::DataBufferSP &data_sp)
844 if (data_sp && data_sp->GetByteSize() == REG_CONTEXT_SIZE)
846 const uint8_t *src = data_sp->GetBytes();
847 ::memcpy (&gpr, src, sizeof(gpr));
850 ::memcpy (&fpu, src, sizeof(fpu));
853 ::memcpy (&exc, src, sizeof(exc));
854 uint32_t success_count = 0;
855 if (WriteGPR() == KERN_SUCCESS)
857 if (WriteFPU() == KERN_SUCCESS)
859 if (WriteEXC() == KERN_SUCCESS)
861 return success_count == 3;
867 RegisterContextDarwin_arm::ConvertRegisterKindToRegisterNumber (uint32_t kind, uint32_t reg)
869 if (kind == eRegisterKindGeneric)
873 case LLDB_REGNUM_GENERIC_PC: return gpr_pc;
874 case LLDB_REGNUM_GENERIC_SP: return gpr_sp;
875 case LLDB_REGNUM_GENERIC_FP: return gpr_r7;
876 case LLDB_REGNUM_GENERIC_RA: return gpr_lr;
877 case LLDB_REGNUM_GENERIC_FLAGS: return gpr_cpsr;
882 else if (kind == eRegisterKindDWARF)
886 case dwarf_r0: return gpr_r0;
887 case dwarf_r1: return gpr_r1;
888 case dwarf_r2: return gpr_r2;
889 case dwarf_r3: return gpr_r3;
890 case dwarf_r4: return gpr_r4;
891 case dwarf_r5: return gpr_r5;
892 case dwarf_r6: return gpr_r6;
893 case dwarf_r7: return gpr_r7;
894 case dwarf_r8: return gpr_r8;
895 case dwarf_r9: return gpr_r9;
896 case dwarf_r10: return gpr_r10;
897 case dwarf_r11: return gpr_r11;
898 case dwarf_r12: return gpr_r12;
899 case dwarf_sp: return gpr_sp;
900 case dwarf_lr: return gpr_lr;
901 case dwarf_pc: return gpr_pc;
902 case dwarf_spsr: return gpr_cpsr;
904 case dwarf_s0: return fpu_s0;
905 case dwarf_s1: return fpu_s1;
906 case dwarf_s2: return fpu_s2;
907 case dwarf_s3: return fpu_s3;
908 case dwarf_s4: return fpu_s4;
909 case dwarf_s5: return fpu_s5;
910 case dwarf_s6: return fpu_s6;
911 case dwarf_s7: return fpu_s7;
912 case dwarf_s8: return fpu_s8;
913 case dwarf_s9: return fpu_s9;
914 case dwarf_s10: return fpu_s10;
915 case dwarf_s11: return fpu_s11;
916 case dwarf_s12: return fpu_s12;
917 case dwarf_s13: return fpu_s13;
918 case dwarf_s14: return fpu_s14;
919 case dwarf_s15: return fpu_s15;
920 case dwarf_s16: return fpu_s16;
921 case dwarf_s17: return fpu_s17;
922 case dwarf_s18: return fpu_s18;
923 case dwarf_s19: return fpu_s19;
924 case dwarf_s20: return fpu_s20;
925 case dwarf_s21: return fpu_s21;
926 case dwarf_s22: return fpu_s22;
927 case dwarf_s23: return fpu_s23;
928 case dwarf_s24: return fpu_s24;
929 case dwarf_s25: return fpu_s25;
930 case dwarf_s26: return fpu_s26;
931 case dwarf_s27: return fpu_s27;
932 case dwarf_s28: return fpu_s28;
933 case dwarf_s29: return fpu_s29;
934 case dwarf_s30: return fpu_s30;
935 case dwarf_s31: return fpu_s31;
941 else if (kind == eRegisterKindGCC)
945 case gcc_r0: return gpr_r0;
946 case gcc_r1: return gpr_r1;
947 case gcc_r2: return gpr_r2;
948 case gcc_r3: return gpr_r3;
949 case gcc_r4: return gpr_r4;
950 case gcc_r5: return gpr_r5;
951 case gcc_r6: return gpr_r6;
952 case gcc_r7: return gpr_r7;
953 case gcc_r8: return gpr_r8;
954 case gcc_r9: return gpr_r9;
955 case gcc_r10: return gpr_r10;
956 case gcc_r11: return gpr_r11;
957 case gcc_r12: return gpr_r12;
958 case gcc_sp: return gpr_sp;
959 case gcc_lr: return gpr_lr;
960 case gcc_pc: return gpr_pc;
961 case gcc_cpsr: return gpr_cpsr;
964 else if (kind == eRegisterKindLLDB)
968 return LLDB_INVALID_REGNUM;
973 RegisterContextDarwin_arm::NumSupportedHardwareBreakpoints ()
975 #if defined (__arm__)
976 // Set the init value to something that will let us know that we need to
977 // autodetect how many breakpoints are supported dynamically...
978 static uint32_t g_num_supported_hw_breakpoints = UINT32_MAX;
979 if (g_num_supported_hw_breakpoints == UINT32_MAX)
981 // Set this to zero in case we can't tell if there are any HW breakpoints
982 g_num_supported_hw_breakpoints = 0;
984 uint32_t register_DBGDIDR;
986 asm("mrc p14, 0, %0, c0, c0, 0" : "=r" (register_DBGDIDR));
987 g_num_supported_hw_breakpoints = Bits32 (register_DBGDIDR, 27, 24);
988 // Zero is reserved for the BRP count, so don't increment it if it is zero
989 if (g_num_supported_hw_breakpoints > 0)
990 g_num_supported_hw_breakpoints++;
991 // if (log) log->Printf ("DBGDIDR=0x%8.8x (number BRP pairs = %u)", register_DBGDIDR, g_num_supported_hw_breakpoints);
994 return g_num_supported_hw_breakpoints;
996 // TODO: figure out remote case here!
1002 RegisterContextDarwin_arm::SetHardwareBreakpoint (lldb::addr_t addr, size_t size)
1004 // Make sure our address isn't bogus
1006 return LLDB_INVALID_INDEX32;
1008 int kret = ReadDBG (false);
1010 if (kret == KERN_SUCCESS)
1012 const uint32_t num_hw_breakpoints = NumSupportedHardwareBreakpoints();
1014 for (i=0; i<num_hw_breakpoints; ++i)
1016 if ((dbg.bcr[i] & BCR_ENABLE) == 0)
1017 break; // We found an available hw breakpoint slot (in i)
1020 // See if we found an available hw breakpoint slot above
1021 if (i < num_hw_breakpoints)
1023 // Make sure bits 1:0 are clear in our address
1024 dbg.bvr[i] = addr & ~((lldb::addr_t)3);
1026 if (size == 2 || addr & 2)
1028 uint32_t byte_addr_select = (addr & 2) ? BAS_IMVA_2_3 : BAS_IMVA_0_1;
1030 // We have a thumb breakpoint
1031 // We have an ARM breakpoint
1032 dbg.bcr[i] = BCR_M_IMVA_MATCH | // Stop on address mismatch
1033 byte_addr_select | // Set the correct byte address select so we only trigger on the correct opcode
1034 S_USER | // Which modes should this breakpoint stop in?
1035 BCR_ENABLE; // Enable this hardware breakpoint
1036 // if (log) log->Printf ("RegisterContextDarwin_arm::EnableHardwareBreakpoint( addr = %8.8p, size = %u ) - BVR%u/BCR%u = 0x%8.8x / 0x%8.8x (Thumb)",
1046 // We have an ARM breakpoint
1047 dbg.bcr[i] = BCR_M_IMVA_MATCH | // Stop on address mismatch
1048 BAS_IMVA_ALL | // Stop on any of the four bytes following the IMVA
1049 S_USER | // Which modes should this breakpoint stop in?
1050 BCR_ENABLE; // Enable this hardware breakpoint
1051 // if (log) log->Printf ("RegisterContextDarwin_arm::EnableHardwareBreakpoint( addr = %8.8p, size = %u ) - BVR%u/BCR%u = 0x%8.8x / 0x%8.8x (ARM)",
1061 // if (log) log->Printf ("RegisterContextDarwin_arm::EnableHardwareBreakpoint() WriteDBG() => 0x%8.8x.", kret);
1063 if (kret == KERN_SUCCESS)
1068 // if (log) log->Printf ("RegisterContextDarwin_arm::EnableHardwareBreakpoint(addr = %8.8p, size = %u) => all hardware breakpoint resources are being used.", addr, size);
1072 return LLDB_INVALID_INDEX32;
1076 RegisterContextDarwin_arm::ClearHardwareBreakpoint (uint32_t hw_index)
1078 int kret = ReadDBG (false);
1080 const uint32_t num_hw_points = NumSupportedHardwareBreakpoints();
1081 if (kret == KERN_SUCCESS)
1083 if (hw_index < num_hw_points)
1085 dbg.bcr[hw_index] = 0;
1086 // if (log) log->Printf ("RegisterContextDarwin_arm::SetHardwareBreakpoint( %u ) - BVR%u = 0x%8.8x BCR%u = 0x%8.8x",
1089 // dbg.bvr[hw_index],
1091 // dbg.bcr[hw_index]);
1095 if (kret == KERN_SUCCESS)
1103 RegisterContextDarwin_arm::NumSupportedHardwareWatchpoints ()
1105 #if defined (__arm__)
1106 // Set the init value to something that will let us know that we need to
1107 // autodetect how many watchpoints are supported dynamically...
1108 static uint32_t g_num_supported_hw_watchpoints = UINT32_MAX;
1109 if (g_num_supported_hw_watchpoints == UINT32_MAX)
1111 // Set this to zero in case we can't tell if there are any HW breakpoints
1112 g_num_supported_hw_watchpoints = 0;
1114 uint32_t register_DBGDIDR;
1115 asm("mrc p14, 0, %0, c0, c0, 0" : "=r" (register_DBGDIDR));
1116 g_num_supported_hw_watchpoints = Bits32 (register_DBGDIDR, 31, 28) + 1;
1117 // if (log) log->Printf ("DBGDIDR=0x%8.8x (number WRP pairs = %u)", register_DBGDIDR, g_num_supported_hw_watchpoints);
1119 return g_num_supported_hw_watchpoints;
1121 // TODO: figure out remote case here!
1128 RegisterContextDarwin_arm::SetHardwareWatchpoint (lldb::addr_t addr, size_t size, bool read, bool write)
1130 // if (log) log->Printf ("RegisterContextDarwin_arm::EnableHardwareWatchpoint(addr = %8.8p, size = %u, read = %u, write = %u)", addr, size, read, write);
1132 const uint32_t num_hw_watchpoints = NumSupportedHardwareWatchpoints();
1134 // Can't watch zero bytes
1136 return LLDB_INVALID_INDEX32;
1138 // We must watch for either read or write
1139 if (read == false && write == false)
1140 return LLDB_INVALID_INDEX32;
1142 // Can't watch more than 4 bytes per WVR/WCR pair
1144 return LLDB_INVALID_INDEX32;
1146 // We can only watch up to four bytes that follow a 4 byte aligned address
1147 // per watchpoint register pair. Since we have at most so we can only watch
1148 // until the next 4 byte boundary and we need to make sure we can properly
1150 uint32_t addr_word_offset = addr % 4;
1151 // if (log) log->Printf ("RegisterContextDarwin_arm::EnableHardwareWatchpoint() - addr_word_offset = 0x%8.8x", addr_word_offset);
1153 uint32_t byte_mask = ((1u << size) - 1u) << addr_word_offset;
1154 // if (log) log->Printf ("RegisterContextDarwin_arm::EnableHardwareWatchpoint() - byte_mask = 0x%8.8x", byte_mask);
1155 if (byte_mask > 0xfu)
1156 return LLDB_INVALID_INDEX32;
1158 // Read the debug state
1159 int kret = ReadDBG (false);
1161 if (kret == KERN_SUCCESS)
1163 // Check to make sure we have the needed hardware support
1166 for (i=0; i<num_hw_watchpoints; ++i)
1168 if ((dbg.wcr[i] & WCR_ENABLE) == 0)
1169 break; // We found an available hw breakpoint slot (in i)
1172 // See if we found an available hw breakpoint slot above
1173 if (i < num_hw_watchpoints)
1175 // Make the byte_mask into a valid Byte Address Select mask
1176 uint32_t byte_address_select = byte_mask << 5;
1177 // Make sure bits 1:0 are clear in our address
1178 dbg.wvr[i] = addr & ~((lldb::addr_t)3);
1179 dbg.wcr[i] = byte_address_select | // Which bytes that follow the IMVA that we will watch
1180 S_USER | // Stop only in user mode
1181 (read ? WCR_LOAD : 0) | // Stop on read access?
1182 (write ? WCR_STORE : 0) | // Stop on write access?
1183 WCR_ENABLE; // Enable this watchpoint;
1186 // if (log) log->Printf ("RegisterContextDarwin_arm::EnableHardwareWatchpoint() WriteDBG() => 0x%8.8x.", kret);
1188 if (kret == KERN_SUCCESS)
1193 // if (log) log->Printf ("RegisterContextDarwin_arm::EnableHardwareWatchpoint(): All hardware resources (%u) are in use.", num_hw_watchpoints);
1196 return LLDB_INVALID_INDEX32;
1200 RegisterContextDarwin_arm::ClearHardwareWatchpoint (uint32_t hw_index)
1202 int kret = ReadDBG (false);
1204 const uint32_t num_hw_points = NumSupportedHardwareWatchpoints();
1205 if (kret == KERN_SUCCESS)
1207 if (hw_index < num_hw_points)
1209 dbg.wcr[hw_index] = 0;
1210 // if (log) log->Printf ("RegisterContextDarwin_arm::ClearHardwareWatchpoint( %u ) - WVR%u = 0x%8.8x WCR%u = 0x%8.8x",
1213 // dbg.wvr[hw_index],
1215 // dbg.wcr[hw_index]);
1219 if (kret == KERN_SUCCESS)