1 //===-- ABIMacOSX_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 #include "ABIMacOSX_arm.h"
14 #include "llvm/ADT/STLExtras.h"
15 #include "llvm/ADT/Triple.h"
17 #include "lldb/Core/Module.h"
18 #include "lldb/Core/PluginManager.h"
19 #include "lldb/Core/Value.h"
20 #include "lldb/Core/ValueObjectConstResult.h"
21 #include "lldb/Symbol/UnwindPlan.h"
22 #include "lldb/Target/Process.h"
23 #include "lldb/Target/RegisterContext.h"
24 #include "lldb/Target/Target.h"
25 #include "lldb/Target/Thread.h"
26 #include "lldb/Utility/ConstString.h"
27 #include "lldb/Utility/RegisterValue.h"
28 #include "lldb/Utility/Scalar.h"
29 #include "lldb/Utility/Status.h"
31 #include "Plugins/Process/Utility/ARMDefines.h"
32 #include "Utility/ARM_DWARF_Registers.h"
33 #include "Utility/ARM_ehframe_Registers.h"
36 using namespace lldb_private;
38 static RegisterInfo g_register_infos[] = {
39 // NAME ALT SZ OFF ENCODING FORMAT EH_FRAME
40 // DWARF GENERIC PROCESS PLUGIN
42 // ========== ======= == === ============= ============
43 // ======================= =================== ===========================
44 // ======================= ======================
51 {ehframe_r0, dwarf_r0, LLDB_REGNUM_GENERIC_ARG1, LLDB_INVALID_REGNUM,
63 {ehframe_r1, dwarf_r1, LLDB_REGNUM_GENERIC_ARG2, LLDB_INVALID_REGNUM,
75 {ehframe_r2, dwarf_r2, LLDB_REGNUM_GENERIC_ARG3, LLDB_INVALID_REGNUM,
87 {ehframe_r3, dwarf_r3, LLDB_REGNUM_GENERIC_ARG4, LLDB_INVALID_REGNUM,
99 {ehframe_r4, dwarf_r4, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
100 LLDB_INVALID_REGNUM},
111 {ehframe_r5, dwarf_r5, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
112 LLDB_INVALID_REGNUM},
123 {ehframe_r6, dwarf_r6, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
124 LLDB_INVALID_REGNUM},
135 {ehframe_r7, dwarf_r7, LLDB_REGNUM_GENERIC_FP, LLDB_INVALID_REGNUM,
136 LLDB_INVALID_REGNUM},
147 {ehframe_r8, dwarf_r8, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
148 LLDB_INVALID_REGNUM},
159 {ehframe_r9, dwarf_r9, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
160 LLDB_INVALID_REGNUM},
171 {ehframe_r10, dwarf_r10, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
172 LLDB_INVALID_REGNUM},
183 {ehframe_r11, dwarf_r11, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
184 LLDB_INVALID_REGNUM},
195 {ehframe_r12, dwarf_r12, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
196 LLDB_INVALID_REGNUM},
207 {ehframe_sp, dwarf_sp, LLDB_REGNUM_GENERIC_SP, LLDB_INVALID_REGNUM,
208 LLDB_INVALID_REGNUM},
219 {ehframe_lr, dwarf_lr, LLDB_REGNUM_GENERIC_RA, LLDB_INVALID_REGNUM,
220 LLDB_INVALID_REGNUM},
231 {ehframe_pc, dwarf_pc, LLDB_REGNUM_GENERIC_PC, LLDB_INVALID_REGNUM,
232 LLDB_INVALID_REGNUM},
243 {ehframe_cpsr, dwarf_cpsr, LLDB_REGNUM_GENERIC_FLAGS, LLDB_INVALID_REGNUM,
244 LLDB_INVALID_REGNUM},
255 {LLDB_INVALID_REGNUM, dwarf_s0, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
256 LLDB_INVALID_REGNUM},
267 {LLDB_INVALID_REGNUM, dwarf_s1, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
268 LLDB_INVALID_REGNUM},
279 {LLDB_INVALID_REGNUM, dwarf_s2, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
280 LLDB_INVALID_REGNUM},
291 {LLDB_INVALID_REGNUM, dwarf_s3, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
292 LLDB_INVALID_REGNUM},
303 {LLDB_INVALID_REGNUM, dwarf_s4, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
304 LLDB_INVALID_REGNUM},
315 {LLDB_INVALID_REGNUM, dwarf_s5, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
316 LLDB_INVALID_REGNUM},
327 {LLDB_INVALID_REGNUM, dwarf_s6, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
328 LLDB_INVALID_REGNUM},
339 {LLDB_INVALID_REGNUM, dwarf_s7, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
340 LLDB_INVALID_REGNUM},
351 {LLDB_INVALID_REGNUM, dwarf_s8, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
352 LLDB_INVALID_REGNUM},
363 {LLDB_INVALID_REGNUM, dwarf_s9, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
364 LLDB_INVALID_REGNUM},
375 {LLDB_INVALID_REGNUM, dwarf_s10, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
376 LLDB_INVALID_REGNUM},
387 {LLDB_INVALID_REGNUM, dwarf_s11, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
388 LLDB_INVALID_REGNUM},
399 {LLDB_INVALID_REGNUM, dwarf_s12, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
400 LLDB_INVALID_REGNUM},
411 {LLDB_INVALID_REGNUM, dwarf_s13, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
412 LLDB_INVALID_REGNUM},
423 {LLDB_INVALID_REGNUM, dwarf_s14, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
424 LLDB_INVALID_REGNUM},
435 {LLDB_INVALID_REGNUM, dwarf_s15, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
436 LLDB_INVALID_REGNUM},
447 {LLDB_INVALID_REGNUM, dwarf_s16, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
448 LLDB_INVALID_REGNUM},
459 {LLDB_INVALID_REGNUM, dwarf_s17, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
460 LLDB_INVALID_REGNUM},
471 {LLDB_INVALID_REGNUM, dwarf_s18, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
472 LLDB_INVALID_REGNUM},
483 {LLDB_INVALID_REGNUM, dwarf_s19, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
484 LLDB_INVALID_REGNUM},
495 {LLDB_INVALID_REGNUM, dwarf_s20, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
496 LLDB_INVALID_REGNUM},
507 {LLDB_INVALID_REGNUM, dwarf_s21, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
508 LLDB_INVALID_REGNUM},
519 {LLDB_INVALID_REGNUM, dwarf_s22, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
520 LLDB_INVALID_REGNUM},
531 {LLDB_INVALID_REGNUM, dwarf_s23, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
532 LLDB_INVALID_REGNUM},
543 {LLDB_INVALID_REGNUM, dwarf_s24, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
544 LLDB_INVALID_REGNUM},
555 {LLDB_INVALID_REGNUM, dwarf_s25, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
556 LLDB_INVALID_REGNUM},
567 {LLDB_INVALID_REGNUM, dwarf_s26, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
568 LLDB_INVALID_REGNUM},
579 {LLDB_INVALID_REGNUM, dwarf_s27, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
580 LLDB_INVALID_REGNUM},
591 {LLDB_INVALID_REGNUM, dwarf_s28, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
592 LLDB_INVALID_REGNUM},
603 {LLDB_INVALID_REGNUM, dwarf_s29, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
604 LLDB_INVALID_REGNUM},
615 {LLDB_INVALID_REGNUM, dwarf_s30, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
616 LLDB_INVALID_REGNUM},
627 {LLDB_INVALID_REGNUM, dwarf_s31, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
628 LLDB_INVALID_REGNUM},
639 {LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
640 LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM},
651 {LLDB_INVALID_REGNUM, dwarf_d0, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
652 LLDB_INVALID_REGNUM},
663 {LLDB_INVALID_REGNUM, dwarf_d1, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
664 LLDB_INVALID_REGNUM},
675 {LLDB_INVALID_REGNUM, dwarf_d2, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
676 LLDB_INVALID_REGNUM},
687 {LLDB_INVALID_REGNUM, dwarf_d3, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
688 LLDB_INVALID_REGNUM},
699 {LLDB_INVALID_REGNUM, dwarf_d4, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
700 LLDB_INVALID_REGNUM},
711 {LLDB_INVALID_REGNUM, dwarf_d5, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
712 LLDB_INVALID_REGNUM},
723 {LLDB_INVALID_REGNUM, dwarf_d6, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
724 LLDB_INVALID_REGNUM},
735 {LLDB_INVALID_REGNUM, dwarf_d7, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
736 LLDB_INVALID_REGNUM},
747 {LLDB_INVALID_REGNUM, dwarf_d8, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
748 LLDB_INVALID_REGNUM},
759 {LLDB_INVALID_REGNUM, dwarf_d9, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
760 LLDB_INVALID_REGNUM},
771 {LLDB_INVALID_REGNUM, dwarf_d10, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
772 LLDB_INVALID_REGNUM},
783 {LLDB_INVALID_REGNUM, dwarf_d11, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
784 LLDB_INVALID_REGNUM},
795 {LLDB_INVALID_REGNUM, dwarf_d12, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
796 LLDB_INVALID_REGNUM},
807 {LLDB_INVALID_REGNUM, dwarf_d13, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
808 LLDB_INVALID_REGNUM},
819 {LLDB_INVALID_REGNUM, dwarf_d14, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
820 LLDB_INVALID_REGNUM},
831 {LLDB_INVALID_REGNUM, dwarf_d15, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
832 LLDB_INVALID_REGNUM},
843 {LLDB_INVALID_REGNUM, dwarf_d16, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
844 LLDB_INVALID_REGNUM},
855 {LLDB_INVALID_REGNUM, dwarf_d17, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
856 LLDB_INVALID_REGNUM},
867 {LLDB_INVALID_REGNUM, dwarf_d18, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
868 LLDB_INVALID_REGNUM},
879 {LLDB_INVALID_REGNUM, dwarf_d19, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
880 LLDB_INVALID_REGNUM},
891 {LLDB_INVALID_REGNUM, dwarf_d20, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
892 LLDB_INVALID_REGNUM},
903 {LLDB_INVALID_REGNUM, dwarf_d21, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
904 LLDB_INVALID_REGNUM},
915 {LLDB_INVALID_REGNUM, dwarf_d22, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
916 LLDB_INVALID_REGNUM},
927 {LLDB_INVALID_REGNUM, dwarf_d23, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
928 LLDB_INVALID_REGNUM},
939 {LLDB_INVALID_REGNUM, dwarf_d24, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
940 LLDB_INVALID_REGNUM},
951 {LLDB_INVALID_REGNUM, dwarf_d25, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
952 LLDB_INVALID_REGNUM},
963 {LLDB_INVALID_REGNUM, dwarf_d26, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
964 LLDB_INVALID_REGNUM},
975 {LLDB_INVALID_REGNUM, dwarf_d27, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
976 LLDB_INVALID_REGNUM},
987 {LLDB_INVALID_REGNUM, dwarf_d28, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
988 LLDB_INVALID_REGNUM},
999 {LLDB_INVALID_REGNUM, dwarf_d29, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
1000 LLDB_INVALID_REGNUM},
1011 {LLDB_INVALID_REGNUM, dwarf_d30, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
1012 LLDB_INVALID_REGNUM},
1023 {LLDB_INVALID_REGNUM, dwarf_d31, LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM,
1024 LLDB_INVALID_REGNUM},
1035 {LLDB_INVALID_REGNUM, dwarf_r8_usr, LLDB_INVALID_REGNUM,
1036 LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM},
1047 {LLDB_INVALID_REGNUM, dwarf_r9_usr, LLDB_INVALID_REGNUM,
1048 LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM},
1059 {LLDB_INVALID_REGNUM, dwarf_r10_usr, LLDB_INVALID_REGNUM,
1060 LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM},
1071 {LLDB_INVALID_REGNUM, dwarf_r11_usr, LLDB_INVALID_REGNUM,
1072 LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM},
1083 {LLDB_INVALID_REGNUM, dwarf_r12_usr, LLDB_INVALID_REGNUM,
1084 LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM},
1095 {LLDB_INVALID_REGNUM, dwarf_r13_usr, LLDB_INVALID_REGNUM,
1096 LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM},
1107 {LLDB_INVALID_REGNUM, dwarf_r14_usr, LLDB_INVALID_REGNUM,
1108 LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM},
1119 {LLDB_INVALID_REGNUM, dwarf_r8_fiq, LLDB_INVALID_REGNUM,
1120 LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM},
1131 {LLDB_INVALID_REGNUM, dwarf_r9_fiq, LLDB_INVALID_REGNUM,
1132 LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM},
1143 {LLDB_INVALID_REGNUM, dwarf_r10_fiq, LLDB_INVALID_REGNUM,
1144 LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM},
1155 {LLDB_INVALID_REGNUM, dwarf_r11_fiq, LLDB_INVALID_REGNUM,
1156 LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM},
1167 {LLDB_INVALID_REGNUM, dwarf_r12_fiq, LLDB_INVALID_REGNUM,
1168 LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM},
1179 {LLDB_INVALID_REGNUM, dwarf_r13_fiq, LLDB_INVALID_REGNUM,
1180 LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM},
1191 {LLDB_INVALID_REGNUM, dwarf_r14_fiq, LLDB_INVALID_REGNUM,
1192 LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM},
1203 {LLDB_INVALID_REGNUM, dwarf_r13_irq, LLDB_INVALID_REGNUM,
1204 LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM},
1215 {LLDB_INVALID_REGNUM, dwarf_r14_irq, LLDB_INVALID_REGNUM,
1216 LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM},
1227 {LLDB_INVALID_REGNUM, dwarf_r13_abt, LLDB_INVALID_REGNUM,
1228 LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM},
1239 {LLDB_INVALID_REGNUM, dwarf_r14_abt, LLDB_INVALID_REGNUM,
1240 LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM},
1251 {LLDB_INVALID_REGNUM, dwarf_r13_und, LLDB_INVALID_REGNUM,
1252 LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM},
1263 {LLDB_INVALID_REGNUM, dwarf_r14_und, LLDB_INVALID_REGNUM,
1264 LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM},
1275 {LLDB_INVALID_REGNUM, dwarf_r13_svc, LLDB_INVALID_REGNUM,
1276 LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM},
1287 {LLDB_INVALID_REGNUM, dwarf_r14_svc, LLDB_INVALID_REGNUM,
1288 LLDB_INVALID_REGNUM, LLDB_INVALID_REGNUM},
1294 static const uint32_t k_num_register_infos =
1295 llvm::array_lengthof(g_register_infos);
1296 static bool g_register_info_names_constified = false;
1298 const lldb_private::RegisterInfo *
1299 ABIMacOSX_arm::GetRegisterInfoArray(uint32_t &count) {
1300 // Make the C-string names and alt_names for the register infos into const
1301 // C-string values by having the ConstString unique the names in the global
1302 // constant C-string pool.
1303 if (!g_register_info_names_constified) {
1304 g_register_info_names_constified = true;
1305 for (uint32_t i = 0; i < k_num_register_infos; ++i) {
1306 if (g_register_infos[i].name)
1307 g_register_infos[i].name =
1308 ConstString(g_register_infos[i].name).GetCString();
1309 if (g_register_infos[i].alt_name)
1310 g_register_infos[i].alt_name =
1311 ConstString(g_register_infos[i].alt_name).GetCString();
1314 count = k_num_register_infos;
1315 return g_register_infos;
1318 size_t ABIMacOSX_arm::GetRedZoneSize() const { return 0; }
1320 //------------------------------------------------------------------
1322 //------------------------------------------------------------------
1325 ABIMacOSX_arm::CreateInstance(ProcessSP process_sp, const ArchSpec &arch) {
1326 const llvm::Triple::ArchType arch_type = arch.GetTriple().getArch();
1327 const llvm::Triple::VendorType vendor_type = arch.GetTriple().getVendor();
1329 if (vendor_type == llvm::Triple::Apple) {
1330 if ((arch_type == llvm::Triple::arm) ||
1331 (arch_type == llvm::Triple::thumb)) {
1332 return ABISP(new ABIMacOSX_arm(process_sp));
1339 bool ABIMacOSX_arm::PrepareTrivialCall(Thread &thread, addr_t sp,
1340 addr_t function_addr, addr_t return_addr,
1341 llvm::ArrayRef<addr_t> args) const {
1342 RegisterContext *reg_ctx = thread.GetRegisterContext().get();
1346 const uint32_t pc_reg_num = reg_ctx->ConvertRegisterKindToRegisterNumber(
1347 eRegisterKindGeneric, LLDB_REGNUM_GENERIC_PC);
1348 const uint32_t sp_reg_num = reg_ctx->ConvertRegisterKindToRegisterNumber(
1349 eRegisterKindGeneric, LLDB_REGNUM_GENERIC_SP);
1350 const uint32_t ra_reg_num = reg_ctx->ConvertRegisterKindToRegisterNumber(
1351 eRegisterKindGeneric, LLDB_REGNUM_GENERIC_RA);
1353 RegisterValue reg_value;
1355 const char *reg_names[] = {"r0", "r1", "r2", "r3"};
1357 llvm::ArrayRef<addr_t>::iterator ai = args.begin(), ae = args.end();
1359 for (size_t i = 0; i < llvm::array_lengthof(reg_names); ++i) {
1363 reg_value.SetUInt32(*ai);
1364 if (!reg_ctx->WriteRegister(reg_ctx->GetRegisterInfoByName(reg_names[i]),
1372 // Spill onto the stack
1373 size_t num_stack_regs = ae - ai;
1375 sp -= (num_stack_regs * 4);
1376 // Keep the stack 16 byte aligned
1377 sp &= ~(16ull - 1ull);
1379 // just using arg1 to get the right size
1380 const RegisterInfo *reg_info = reg_ctx->GetRegisterInfo(
1381 eRegisterKindGeneric, LLDB_REGNUM_GENERIC_ARG1);
1383 addr_t arg_pos = sp;
1385 for (; ai != ae; ++ai) {
1386 reg_value.SetUInt32(*ai);
1388 ->WriteRegisterValueToMemory(reg_info, arg_pos,
1389 reg_info->byte_size, reg_value)
1392 arg_pos += reg_info->byte_size;
1396 TargetSP target_sp(thread.CalculateTarget());
1399 // Figure out if our return address is ARM or Thumb by using the
1400 // Address::GetCallableLoadAddress(Target*) which will figure out the ARM
1401 // thumb-ness and set the correct address bits for us.
1402 so_addr.SetLoadAddress(return_addr, target_sp.get());
1403 return_addr = so_addr.GetCallableLoadAddress(target_sp.get());
1405 // Set "lr" to the return address
1406 if (!reg_ctx->WriteRegisterFromUnsigned(ra_reg_num, return_addr))
1409 // If bit zero or 1 is set, this must be a thumb function, no need to figure
1410 // this out from the symbols.
1411 so_addr.SetLoadAddress(function_addr, target_sp.get());
1412 function_addr = so_addr.GetCallableLoadAddress(target_sp.get());
1414 const RegisterInfo *cpsr_reg_info = reg_ctx->GetRegisterInfoByName("cpsr");
1415 const uint32_t curr_cpsr = reg_ctx->ReadRegisterAsUnsigned(cpsr_reg_info, 0);
1417 // Make a new CPSR and mask out any Thumb IT (if/then) bits
1418 uint32_t new_cpsr = curr_cpsr & ~MASK_CPSR_IT_MASK;
1419 // If bit zero or 1 is set, this must be thumb...
1420 if (function_addr & 1ull)
1421 new_cpsr |= MASK_CPSR_T; // Set T bit in CPSR
1423 new_cpsr &= ~MASK_CPSR_T; // Clear T bit in CPSR
1425 if (new_cpsr != curr_cpsr) {
1426 if (!reg_ctx->WriteRegisterFromUnsigned(cpsr_reg_info, new_cpsr))
1431 ~1ull; // clear bit zero since the CPSR will take care of the mode for us
1433 // Update the sp - stack pointer - to be aligned to 16-bytes
1435 if (!reg_ctx->WriteRegisterFromUnsigned(sp_reg_num, sp))
1438 // Set "pc" to the address requested
1439 if (!reg_ctx->WriteRegisterFromUnsigned(pc_reg_num, function_addr))
1445 bool ABIMacOSX_arm::GetArgumentValues(Thread &thread, ValueList &values) const {
1446 uint32_t num_values = values.GetSize();
1448 ExecutionContext exe_ctx(thread.shared_from_this());
1449 // For now, assume that the types in the AST values come from the Target's
1452 // Extract the register context so we can read arguments from registers
1454 RegisterContext *reg_ctx = thread.GetRegisterContext().get();
1461 for (uint32_t value_idx = 0; value_idx < num_values; ++value_idx) {
1462 // We currently only support extracting values with Clang QualTypes. Do we
1463 // care about others?
1464 Value *value = values.GetValueAtIndex(value_idx);
1469 CompilerType compiler_type = value->GetCompilerType();
1470 if (compiler_type) {
1471 bool is_signed = false;
1472 size_t bit_width = 0;
1473 llvm::Optional<uint64_t> bit_size = compiler_type.GetBitSize(&thread);
1476 if (compiler_type.IsIntegerOrEnumerationType(is_signed))
1477 bit_width = *bit_size;
1478 else if (compiler_type.IsPointerOrReferenceType())
1479 bit_width = *bit_size;
1481 // We only handle integer, pointer and reference types currently...
1484 if (bit_width <= (exe_ctx.GetProcessRef().GetAddressByteSize() * 8)) {
1485 if (value_idx < 4) {
1486 // Arguments 1-4 are in r0-r3...
1487 const RegisterInfo *arg_reg_info = nullptr;
1488 // Search by generic ID first, then fall back to by name
1489 uint32_t arg_reg_num = reg_ctx->ConvertRegisterKindToRegisterNumber(
1490 eRegisterKindGeneric, LLDB_REGNUM_GENERIC_ARG1 + value_idx);
1491 if (arg_reg_num != LLDB_INVALID_REGNUM) {
1492 arg_reg_info = reg_ctx->GetRegisterInfoAtIndex(arg_reg_num);
1494 switch (value_idx) {
1496 arg_reg_info = reg_ctx->GetRegisterInfoByName("r0");
1499 arg_reg_info = reg_ctx->GetRegisterInfoByName("r1");
1502 arg_reg_info = reg_ctx->GetRegisterInfoByName("r2");
1505 arg_reg_info = reg_ctx->GetRegisterInfoByName("r3");
1511 RegisterValue reg_value;
1513 if (reg_ctx->ReadRegister(arg_reg_info, reg_value)) {
1515 reg_value.SignExtend(bit_width);
1516 if (!reg_value.GetScalarValue(value->GetScalar()))
1524 // Read the stack pointer if it already hasn't been read
1525 sp = reg_ctx->GetSP(0);
1530 // Arguments 5 on up are on the stack
1531 const uint32_t arg_byte_size = (bit_width + (8 - 1)) / 8;
1533 if (!exe_ctx.GetProcessRef().ReadScalarIntegerFromMemory(
1534 sp, arg_byte_size, is_signed, value->GetScalar(), error))
1537 sp += arg_byte_size;
1545 bool ABIMacOSX_arm::IsArmv7kProcess() const {
1546 bool is_armv7k = false;
1547 ProcessSP process_sp(GetProcessSP());
1549 const ArchSpec &arch(process_sp->GetTarget().GetArchitecture());
1550 const ArchSpec::Core system_core = arch.GetCore();
1551 if (system_core == ArchSpec::eCore_arm_armv7k) {
1558 ValueObjectSP ABIMacOSX_arm::GetReturnValueObjectImpl(
1559 Thread &thread, lldb_private::CompilerType &compiler_type) const {
1561 ValueObjectSP return_valobj_sp;
1564 return return_valobj_sp;
1566 value.SetCompilerType(compiler_type);
1568 RegisterContext *reg_ctx = thread.GetRegisterContext().get();
1570 return return_valobj_sp;
1574 // Get the pointer to the first stack argument so we have a place to start
1575 // when reading data
1577 const RegisterInfo *r0_reg_info = reg_ctx->GetRegisterInfoByName("r0", 0);
1578 if (compiler_type.IsIntegerOrEnumerationType(is_signed)) {
1579 llvm::Optional<uint64_t> bit_width = compiler_type.GetBitSize(&thread);
1581 return return_valobj_sp;
1583 switch (*bit_width) {
1585 return return_valobj_sp;
1587 if (IsArmv7kProcess()) {
1588 // "A composite type not larger than 16 bytes is returned in r0-r3. The
1589 // format is as if the result had been stored in memory at a word-
1590 // aligned address and then loaded into r0-r3 with an ldm instruction"
1592 const RegisterInfo *r1_reg_info =
1593 reg_ctx->GetRegisterInfoByName("r1", 0);
1594 const RegisterInfo *r2_reg_info =
1595 reg_ctx->GetRegisterInfoByName("r2", 0);
1596 const RegisterInfo *r3_reg_info =
1597 reg_ctx->GetRegisterInfoByName("r3", 0);
1598 if (r1_reg_info && r2_reg_info && r3_reg_info) {
1599 llvm::Optional<uint64_t> byte_size =
1600 compiler_type.GetByteSize(&thread);
1602 return return_valobj_sp;
1603 ProcessSP process_sp(thread.GetProcess());
1604 if (*byte_size <= r0_reg_info->byte_size + r1_reg_info->byte_size +
1605 r2_reg_info->byte_size +
1606 r3_reg_info->byte_size &&
1608 std::unique_ptr<DataBufferHeap> heap_data_ap(
1609 new DataBufferHeap(*byte_size, 0));
1610 const ByteOrder byte_order = process_sp->GetByteOrder();
1611 RegisterValue r0_reg_value;
1612 RegisterValue r1_reg_value;
1613 RegisterValue r2_reg_value;
1614 RegisterValue r3_reg_value;
1615 if (reg_ctx->ReadRegister(r0_reg_info, r0_reg_value) &&
1616 reg_ctx->ReadRegister(r1_reg_info, r1_reg_value) &&
1617 reg_ctx->ReadRegister(r2_reg_info, r2_reg_value) &&
1618 reg_ctx->ReadRegister(r3_reg_info, r3_reg_value)) {
1620 if (r0_reg_value.GetAsMemoryData(r0_reg_info,
1621 heap_data_ap->GetBytes() + 0,
1622 4, byte_order, error) &&
1623 r1_reg_value.GetAsMemoryData(r1_reg_info,
1624 heap_data_ap->GetBytes() + 4,
1625 4, byte_order, error) &&
1626 r2_reg_value.GetAsMemoryData(r2_reg_info,
1627 heap_data_ap->GetBytes() + 8,
1628 4, byte_order, error) &&
1629 r3_reg_value.GetAsMemoryData(r3_reg_info,
1630 heap_data_ap->GetBytes() + 12,
1631 4, byte_order, error)) {
1632 DataExtractor data(DataBufferSP(heap_data_ap.release()),
1634 process_sp->GetAddressByteSize());
1636 return_valobj_sp = ValueObjectConstResult::Create(
1637 &thread, compiler_type, ConstString(""), data);
1638 return return_valobj_sp;
1645 return return_valobj_sp;
1649 const RegisterInfo *r1_reg_info = reg_ctx->GetRegisterInfoByName("r1", 0);
1651 raw_value = reg_ctx->ReadRegisterAsUnsigned(r0_reg_info, 0) & UINT32_MAX;
1652 raw_value |= ((uint64_t)(reg_ctx->ReadRegisterAsUnsigned(r1_reg_info, 0) &
1656 value.GetScalar() = (int64_t)raw_value;
1658 value.GetScalar() = (uint64_t)raw_value;
1662 value.GetScalar() = (int32_t)(
1663 reg_ctx->ReadRegisterAsUnsigned(r0_reg_info, 0) & UINT32_MAX);
1665 value.GetScalar() = (uint32_t)(
1666 reg_ctx->ReadRegisterAsUnsigned(r0_reg_info, 0) & UINT32_MAX);
1670 value.GetScalar() = (int16_t)(
1671 reg_ctx->ReadRegisterAsUnsigned(r0_reg_info, 0) & UINT16_MAX);
1673 value.GetScalar() = (uint16_t)(
1674 reg_ctx->ReadRegisterAsUnsigned(r0_reg_info, 0) & UINT16_MAX);
1678 value.GetScalar() = (int8_t)(
1679 reg_ctx->ReadRegisterAsUnsigned(r0_reg_info, 0) & UINT8_MAX);
1681 value.GetScalar() = (uint8_t)(
1682 reg_ctx->ReadRegisterAsUnsigned(r0_reg_info, 0) & UINT8_MAX);
1685 } else if (compiler_type.IsPointerType()) {
1687 thread.GetRegisterContext()->ReadRegisterAsUnsigned(r0_reg_info, 0) &
1689 value.GetScalar() = ptr;
1692 return return_valobj_sp;
1695 // If we get here, we have a valid Value, so make our ValueObject out of it:
1697 return_valobj_sp = ValueObjectConstResult::Create(
1698 thread.GetStackFrameAtIndex(0).get(), value, ConstString(""));
1699 return return_valobj_sp;
1702 Status ABIMacOSX_arm::SetReturnValueObject(lldb::StackFrameSP &frame_sp,
1703 lldb::ValueObjectSP &new_value_sp) {
1705 if (!new_value_sp) {
1706 error.SetErrorString("Empty value object for return value.");
1710 CompilerType compiler_type = new_value_sp->GetCompilerType();
1711 if (!compiler_type) {
1712 error.SetErrorString("Null clang type for return value.");
1716 Thread *thread = frame_sp->GetThread().get();
1722 RegisterContext *reg_ctx = thread->GetRegisterContext().get();
1724 bool set_it_simple = false;
1725 if (compiler_type.IsIntegerOrEnumerationType(is_signed) ||
1726 compiler_type.IsPointerType()) {
1729 size_t num_bytes = new_value_sp->GetData(data, data_error);
1730 if (data_error.Fail()) {
1731 error.SetErrorStringWithFormat(
1732 "Couldn't convert return value to raw data: %s",
1733 data_error.AsCString());
1736 lldb::offset_t offset = 0;
1737 if (num_bytes <= 8) {
1738 const RegisterInfo *r0_info = reg_ctx->GetRegisterInfoByName("r0", 0);
1739 if (num_bytes <= 4) {
1740 uint32_t raw_value = data.GetMaxU32(&offset, num_bytes);
1742 if (reg_ctx->WriteRegisterFromUnsigned(r0_info, raw_value))
1743 set_it_simple = true;
1745 uint32_t raw_value = data.GetMaxU32(&offset, 4);
1747 if (reg_ctx->WriteRegisterFromUnsigned(r0_info, raw_value)) {
1748 const RegisterInfo *r1_info = reg_ctx->GetRegisterInfoByName("r1", 0);
1749 uint32_t raw_value = data.GetMaxU32(&offset, num_bytes - offset);
1751 if (reg_ctx->WriteRegisterFromUnsigned(r1_info, raw_value))
1752 set_it_simple = true;
1755 } else if (num_bytes <= 16 && IsArmv7kProcess()) {
1756 // "A composite type not larger than 16 bytes is returned in r0-r3. The
1757 // format is as if the result had been stored in memory at a word-aligned
1758 // address and then loaded into r0-r3 with an ldm instruction"
1760 const RegisterInfo *r0_info = reg_ctx->GetRegisterInfoByName("r0", 0);
1761 const RegisterInfo *r1_info = reg_ctx->GetRegisterInfoByName("r1", 0);
1762 const RegisterInfo *r2_info = reg_ctx->GetRegisterInfoByName("r2", 0);
1763 const RegisterInfo *r3_info = reg_ctx->GetRegisterInfoByName("r3", 0);
1764 lldb::offset_t offset = 0;
1765 uint32_t bytes_written = 4;
1766 uint32_t raw_value = data.GetMaxU64(&offset, 4);
1767 if (reg_ctx->WriteRegisterFromUnsigned(r0_info, raw_value) &&
1768 bytes_written <= num_bytes) {
1770 raw_value = data.GetMaxU64(&offset, 4);
1771 if (bytes_written <= num_bytes &&
1772 reg_ctx->WriteRegisterFromUnsigned(r1_info, raw_value)) {
1774 raw_value = data.GetMaxU64(&offset, 4);
1775 if (bytes_written <= num_bytes &&
1776 reg_ctx->WriteRegisterFromUnsigned(r2_info, raw_value)) {
1778 raw_value = data.GetMaxU64(&offset, 4);
1779 if (bytes_written <= num_bytes &&
1780 reg_ctx->WriteRegisterFromUnsigned(r3_info, raw_value)) {
1781 set_it_simple = true;
1787 error.SetErrorString("We don't support returning longer than 64 bit "
1788 "integer values at present.");
1790 } else if (compiler_type.IsFloatingPointType(count, is_complex)) {
1792 error.SetErrorString(
1793 "We don't support returning complex values at present");
1795 error.SetErrorString(
1796 "We don't support returning float values at present");
1800 error.SetErrorString(
1801 "We only support setting simple integer return types at present.");
1806 bool ABIMacOSX_arm::CreateFunctionEntryUnwindPlan(UnwindPlan &unwind_plan) {
1807 unwind_plan.Clear();
1808 unwind_plan.SetRegisterKind(eRegisterKindDWARF);
1810 uint32_t lr_reg_num = dwarf_lr;
1811 uint32_t sp_reg_num = dwarf_sp;
1812 uint32_t pc_reg_num = dwarf_pc;
1814 UnwindPlan::RowSP row(new UnwindPlan::Row);
1816 // Our Call Frame Address is the stack pointer value
1817 row->GetCFAValue().SetIsRegisterPlusOffset(sp_reg_num, 0);
1819 // The previous PC is in the LR
1820 row->SetRegisterLocationToRegister(pc_reg_num, lr_reg_num, true);
1821 unwind_plan.AppendRow(row);
1823 // All other registers are the same.
1825 unwind_plan.SetSourceName("arm at-func-entry default");
1826 unwind_plan.SetSourcedFromCompiler(eLazyBoolNo);
1831 bool ABIMacOSX_arm::CreateDefaultUnwindPlan(UnwindPlan &unwind_plan) {
1832 unwind_plan.Clear();
1833 unwind_plan.SetRegisterKind(eRegisterKindDWARF);
1835 uint32_t fp_reg_num =
1836 dwarf_r7; // apple uses r7 for all frames. Normal arm uses r11
1837 uint32_t pc_reg_num = dwarf_pc;
1839 UnwindPlan::RowSP row(new UnwindPlan::Row);
1840 const int32_t ptr_size = 4;
1842 row->GetCFAValue().SetIsRegisterPlusOffset(fp_reg_num, 2 * ptr_size);
1845 row->SetRegisterLocationToAtCFAPlusOffset(fp_reg_num, ptr_size * -2, true);
1846 row->SetRegisterLocationToAtCFAPlusOffset(pc_reg_num, ptr_size * -1, true);
1848 unwind_plan.AppendRow(row);
1849 unwind_plan.SetSourceName("arm-apple-ios default unwind plan");
1850 unwind_plan.SetSourcedFromCompiler(eLazyBoolNo);
1851 unwind_plan.SetUnwindPlanValidAtAllInstructions(eLazyBoolNo);
1856 // cf. "ARMv6 Function Calling Conventions"
1857 // https://developer.apple.com/library/ios/documentation/Xcode/Conceptual/iPhoneOSABIReference/Articles/ARMv6FunctionCallingConventions.html
1858 // and "ARMv7 Function Calling Conventions"
1859 // https://developer.apple.com/library/ios/documentation/Xcode/Conceptual/iPhoneOSABIReference/Articles/ARMv7FunctionCallingConventions.html
1861 // ARMv7 on iOS general purpose reg rules:
1862 // r0-r3 not preserved (used for argument passing)
1864 // r7 preserved (frame pointer)
1866 // r9 not preserved (usable as volatile scratch register with iOS 3.x and
1868 // r10-r11 preserved
1870 // r13 preserved (stack pointer)
1871 // r14 not preserved (link register)
1872 // r15 preserved (pc)
1873 // cpsr not preserved (different rules for different bits)
1875 // ARMv7 on iOS floating point rules:
1876 // d0-d7 not preserved (aka s0-s15, q0-q3)
1877 // d8-d15 preserved (aka s16-s31, q4-q7)
1878 // d16-d31 not preserved (aka q8-q15)
1880 bool ABIMacOSX_arm::RegisterIsVolatile(const RegisterInfo *reg_info) {
1882 // Volatile registers are: r0, r1, r2, r3, r9, r12, r13 (aka sp)
1883 const char *name = reg_info->name;
1884 if (name[0] == 'r') {
1887 return name[2] == '\0'; // r0
1894 return name[3] == '\0'; // r12, r13 (sp)
1901 return name[2] == '\0'; // r2
1903 return name[2] == '\0'; // r3
1905 return name[2] == '\0'; // r9 (apple-ios only...)
1909 } else if (name[0] == 'd') {
1912 return name[2] == '\0'; // d0 is volatile
1917 return true; // d1 is volatile
1922 return name[3] == '\0'; // d16 - d19 are volatile
1931 return true; // d2 is volatile
1942 return name[3] == '\0'; // d20 - d29 are volatile
1951 return true; // d3 is volatile
1954 return name[3] == '\0'; // d30 - d31 are volatile
1963 return name[2] == '\0'; // d4 - d7 are volatile
1968 } else if (name[0] == 's') {
1971 return name[2] == '\0'; // s0 is volatile
1976 return true; // s1 is volatile
1983 return name[3] == '\0'; // s10 - s15 are volatile
1997 return name[2] == '\0'; // s2 - s9 are volatile
2002 } else if (name[0] == 'q') {
2007 return true; // q1 is volatile
2014 return true; // q10-q15 are volatile
2022 return name[2] == '\0'; // q0-q3 are volatile
2025 return name[2] == '\0'; // q8-q9 are volatile
2029 } else if (name[0] == 's' && name[1] == 'p' && name[2] == '\0')
2035 void ABIMacOSX_arm::Initialize() {
2036 PluginManager::RegisterPlugin(GetPluginNameStatic(),
2037 "Mac OS X ABI for arm targets", CreateInstance);
2040 void ABIMacOSX_arm::Terminate() {
2041 PluginManager::UnregisterPlugin(CreateInstance);
2044 lldb_private::ConstString ABIMacOSX_arm::GetPluginNameStatic() {
2045 static ConstString g_name("macosx-arm");
2049 //------------------------------------------------------------------
2050 // PluginInterface protocol
2051 //------------------------------------------------------------------
2053 lldb_private::ConstString ABIMacOSX_arm::GetPluginName() {
2054 return GetPluginNameStatic();
2057 uint32_t ABIMacOSX_arm::GetPluginVersion() { return 1; }