10b57cec5SDimitry Andric //===-- RegisterContextPOSIX_ppc64le.cpp ----------------------------------===//
20b57cec5SDimitry Andric //
30b57cec5SDimitry Andric // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
40b57cec5SDimitry Andric // See https://llvm.org/LICENSE.txt for license information.
50b57cec5SDimitry Andric // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
60b57cec5SDimitry Andric //
70b57cec5SDimitry Andric //===----------------------------------------------------------------------===//
80b57cec5SDimitry Andric 
90b57cec5SDimitry Andric #include <cerrno>
100b57cec5SDimitry Andric #include <cstdint>
110b57cec5SDimitry Andric #include <cstring>
120b57cec5SDimitry Andric 
130b57cec5SDimitry Andric #include "lldb/Target/Process.h"
140b57cec5SDimitry Andric #include "lldb/Target/Target.h"
150b57cec5SDimitry Andric #include "lldb/Target/Thread.h"
160b57cec5SDimitry Andric #include "lldb/Utility/DataBufferHeap.h"
170b57cec5SDimitry Andric #include "lldb/Utility/DataExtractor.h"
180b57cec5SDimitry Andric #include "lldb/Utility/Endian.h"
190b57cec5SDimitry Andric #include "lldb/Utility/RegisterValue.h"
200b57cec5SDimitry Andric #include "lldb/Utility/Scalar.h"
210b57cec5SDimitry Andric #include "llvm/Support/Compiler.h"
220b57cec5SDimitry Andric 
230b57cec5SDimitry Andric #include "RegisterContextPOSIX_ppc64le.h"
240b57cec5SDimitry Andric 
250b57cec5SDimitry Andric using namespace lldb_private;
260b57cec5SDimitry Andric using namespace lldb;
270b57cec5SDimitry Andric 
280b57cec5SDimitry Andric static const uint32_t g_gpr_regnums[] = {
290b57cec5SDimitry Andric     gpr_r0_ppc64le,   gpr_r1_ppc64le,  gpr_r2_ppc64le,     gpr_r3_ppc64le,
300b57cec5SDimitry Andric     gpr_r4_ppc64le,   gpr_r5_ppc64le,  gpr_r6_ppc64le,     gpr_r7_ppc64le,
310b57cec5SDimitry Andric     gpr_r8_ppc64le,   gpr_r9_ppc64le,  gpr_r10_ppc64le,    gpr_r11_ppc64le,
320b57cec5SDimitry Andric     gpr_r12_ppc64le,  gpr_r13_ppc64le, gpr_r14_ppc64le,    gpr_r15_ppc64le,
330b57cec5SDimitry Andric     gpr_r16_ppc64le,  gpr_r17_ppc64le, gpr_r18_ppc64le,    gpr_r19_ppc64le,
340b57cec5SDimitry Andric     gpr_r20_ppc64le,  gpr_r21_ppc64le, gpr_r22_ppc64le,    gpr_r23_ppc64le,
350b57cec5SDimitry Andric     gpr_r24_ppc64le,  gpr_r25_ppc64le, gpr_r26_ppc64le,    gpr_r27_ppc64le,
360b57cec5SDimitry Andric     gpr_r28_ppc64le,  gpr_r29_ppc64le, gpr_r30_ppc64le,    gpr_r31_ppc64le,
370b57cec5SDimitry Andric     gpr_pc_ppc64le,   gpr_msr_ppc64le, gpr_origr3_ppc64le, gpr_ctr_ppc64le,
380b57cec5SDimitry Andric     gpr_lr_ppc64le,   gpr_xer_ppc64le, gpr_cr_ppc64le,     gpr_softe_ppc64le,
390b57cec5SDimitry Andric     gpr_trap_ppc64le,
400b57cec5SDimitry Andric };
410b57cec5SDimitry Andric 
420b57cec5SDimitry Andric static const uint32_t g_fpr_regnums[] = {
430b57cec5SDimitry Andric     fpr_f0_ppc64le,    fpr_f1_ppc64le,  fpr_f2_ppc64le,  fpr_f3_ppc64le,
440b57cec5SDimitry Andric     fpr_f4_ppc64le,    fpr_f5_ppc64le,  fpr_f6_ppc64le,  fpr_f7_ppc64le,
450b57cec5SDimitry Andric     fpr_f8_ppc64le,    fpr_f9_ppc64le,  fpr_f10_ppc64le, fpr_f11_ppc64le,
460b57cec5SDimitry Andric     fpr_f12_ppc64le,   fpr_f13_ppc64le, fpr_f14_ppc64le, fpr_f15_ppc64le,
470b57cec5SDimitry Andric     fpr_f16_ppc64le,   fpr_f17_ppc64le, fpr_f18_ppc64le, fpr_f19_ppc64le,
480b57cec5SDimitry Andric     fpr_f20_ppc64le,   fpr_f21_ppc64le, fpr_f22_ppc64le, fpr_f23_ppc64le,
490b57cec5SDimitry Andric     fpr_f24_ppc64le,   fpr_f25_ppc64le, fpr_f26_ppc64le, fpr_f27_ppc64le,
500b57cec5SDimitry Andric     fpr_f28_ppc64le,   fpr_f29_ppc64le, fpr_f30_ppc64le, fpr_f31_ppc64le,
510b57cec5SDimitry Andric     fpr_fpscr_ppc64le,
520b57cec5SDimitry Andric };
530b57cec5SDimitry Andric 
540b57cec5SDimitry Andric static const uint32_t g_vmx_regnums[] = {
550b57cec5SDimitry Andric     vmx_vr0_ppc64le,  vmx_vr1_ppc64le,    vmx_vr2_ppc64le,  vmx_vr3_ppc64le,
560b57cec5SDimitry Andric     vmx_vr4_ppc64le,  vmx_vr5_ppc64le,    vmx_vr6_ppc64le,  vmx_vr7_ppc64le,
570b57cec5SDimitry Andric     vmx_vr8_ppc64le,  vmx_vr9_ppc64le,    vmx_vr10_ppc64le, vmx_vr11_ppc64le,
580b57cec5SDimitry Andric     vmx_vr12_ppc64le, vmx_vr13_ppc64le,   vmx_vr14_ppc64le, vmx_vr15_ppc64le,
590b57cec5SDimitry Andric     vmx_vr16_ppc64le, vmx_vr17_ppc64le,   vmx_vr18_ppc64le, vmx_vr19_ppc64le,
600b57cec5SDimitry Andric     vmx_vr20_ppc64le, vmx_vr21_ppc64le,   vmx_vr22_ppc64le, vmx_vr23_ppc64le,
610b57cec5SDimitry Andric     vmx_vr24_ppc64le, vmx_vr25_ppc64le,   vmx_vr26_ppc64le, vmx_vr27_ppc64le,
620b57cec5SDimitry Andric     vmx_vr28_ppc64le, vmx_vr29_ppc64le,   vmx_vr30_ppc64le, vmx_vr31_ppc64le,
630b57cec5SDimitry Andric     vmx_vscr_ppc64le, vmx_vrsave_ppc64le,
640b57cec5SDimitry Andric };
650b57cec5SDimitry Andric 
660b57cec5SDimitry Andric static const uint32_t g_vsx_regnums[] = {
670b57cec5SDimitry Andric     vsx_vs0_ppc64le,  vsx_vs1_ppc64le,  vsx_vs2_ppc64le,  vsx_vs3_ppc64le,
680b57cec5SDimitry Andric     vsx_vs4_ppc64le,  vsx_vs5_ppc64le,  vsx_vs6_ppc64le,  vsx_vs7_ppc64le,
690b57cec5SDimitry Andric     vsx_vs8_ppc64le,  vsx_vs9_ppc64le,  vsx_vs10_ppc64le, vsx_vs11_ppc64le,
700b57cec5SDimitry Andric     vsx_vs12_ppc64le, vsx_vs13_ppc64le, vsx_vs14_ppc64le, vsx_vs15_ppc64le,
710b57cec5SDimitry Andric     vsx_vs16_ppc64le, vsx_vs17_ppc64le, vsx_vs18_ppc64le, vsx_vs19_ppc64le,
720b57cec5SDimitry Andric     vsx_vs20_ppc64le, vsx_vs21_ppc64le, vsx_vs22_ppc64le, vsx_vs23_ppc64le,
730b57cec5SDimitry Andric     vsx_vs24_ppc64le, vsx_vs25_ppc64le, vsx_vs26_ppc64le, vsx_vs27_ppc64le,
740b57cec5SDimitry Andric     vsx_vs28_ppc64le, vsx_vs29_ppc64le, vsx_vs30_ppc64le, vsx_vs31_ppc64le,
750b57cec5SDimitry Andric     vsx_vs32_ppc64le, vsx_vs33_ppc64le, vsx_vs34_ppc64le, vsx_vs35_ppc64le,
760b57cec5SDimitry Andric     vsx_vs36_ppc64le, vsx_vs37_ppc64le, vsx_vs38_ppc64le, vsx_vs39_ppc64le,
770b57cec5SDimitry Andric     vsx_vs40_ppc64le, vsx_vs41_ppc64le, vsx_vs42_ppc64le, vsx_vs43_ppc64le,
780b57cec5SDimitry Andric     vsx_vs44_ppc64le, vsx_vs45_ppc64le, vsx_vs46_ppc64le, vsx_vs47_ppc64le,
790b57cec5SDimitry Andric     vsx_vs48_ppc64le, vsx_vs49_ppc64le, vsx_vs50_ppc64le, vsx_vs51_ppc64le,
800b57cec5SDimitry Andric     vsx_vs52_ppc64le, vsx_vs53_ppc64le, vsx_vs54_ppc64le, vsx_vs55_ppc64le,
810b57cec5SDimitry Andric     vsx_vs56_ppc64le, vsx_vs57_ppc64le, vsx_vs58_ppc64le, vsx_vs59_ppc64le,
820b57cec5SDimitry Andric     vsx_vs60_ppc64le, vsx_vs61_ppc64le, vsx_vs62_ppc64le, vsx_vs63_ppc64le,
830b57cec5SDimitry Andric };
840b57cec5SDimitry Andric 
850b57cec5SDimitry Andric // Number of register sets provided by this context.
860b57cec5SDimitry Andric enum { k_num_register_sets = 4 };
870b57cec5SDimitry Andric 
880b57cec5SDimitry Andric static const RegisterSet g_reg_sets_ppc64le[k_num_register_sets] = {
890b57cec5SDimitry Andric     {"General Purpose Registers", "gpr", k_num_gpr_registers_ppc64le,
900b57cec5SDimitry Andric      g_gpr_regnums},
910b57cec5SDimitry Andric     {"Floating Point Registers", "fpr", k_num_fpr_registers_ppc64le,
920b57cec5SDimitry Andric      g_fpr_regnums},
930b57cec5SDimitry Andric     {"Altivec/VMX Registers", "vmx", k_num_vmx_registers_ppc64le,
940b57cec5SDimitry Andric      g_vmx_regnums},
950b57cec5SDimitry Andric     {"VSX Registers", "vsx", k_num_vsx_registers_ppc64le, g_vsx_regnums},
960b57cec5SDimitry Andric };
970b57cec5SDimitry Andric 
IsGPR(unsigned reg)980b57cec5SDimitry Andric bool RegisterContextPOSIX_ppc64le::IsGPR(unsigned reg) {
990b57cec5SDimitry Andric   return (reg <= k_last_gpr_ppc64le); // GPR's come first.
1000b57cec5SDimitry Andric }
1010b57cec5SDimitry Andric 
IsFPR(unsigned reg)1020b57cec5SDimitry Andric bool RegisterContextPOSIX_ppc64le::IsFPR(unsigned reg) {
1030b57cec5SDimitry Andric   return (reg >= k_first_fpr_ppc64le) && (reg <= k_last_fpr_ppc64le);
1040b57cec5SDimitry Andric }
1050b57cec5SDimitry Andric 
IsVMX(unsigned reg)1060b57cec5SDimitry Andric bool RegisterContextPOSIX_ppc64le::IsVMX(unsigned reg) {
1070b57cec5SDimitry Andric   return (reg >= k_first_vmx_ppc64le) && (reg <= k_last_vmx_ppc64le);
1080b57cec5SDimitry Andric }
1090b57cec5SDimitry Andric 
IsVSX(unsigned reg)1100b57cec5SDimitry Andric bool RegisterContextPOSIX_ppc64le::IsVSX(unsigned reg) {
1110b57cec5SDimitry Andric   return (reg >= k_first_vsx_ppc64le) && (reg <= k_last_vsx_ppc64le);
1120b57cec5SDimitry Andric }
1130b57cec5SDimitry Andric 
RegisterContextPOSIX_ppc64le(Thread & thread,uint32_t concrete_frame_idx,RegisterInfoInterface * register_info)1140b57cec5SDimitry Andric RegisterContextPOSIX_ppc64le::RegisterContextPOSIX_ppc64le(
1150b57cec5SDimitry Andric     Thread &thread, uint32_t concrete_frame_idx,
1160b57cec5SDimitry Andric     RegisterInfoInterface *register_info)
1170b57cec5SDimitry Andric     : RegisterContext(thread, concrete_frame_idx) {
1180b57cec5SDimitry Andric   m_register_info_up.reset(register_info);
1190b57cec5SDimitry Andric }
1200b57cec5SDimitry Andric 
InvalidateAllRegisters()1210b57cec5SDimitry Andric void RegisterContextPOSIX_ppc64le::InvalidateAllRegisters() {}
1220b57cec5SDimitry Andric 
GetRegisterOffset(unsigned reg)1230b57cec5SDimitry Andric unsigned RegisterContextPOSIX_ppc64le::GetRegisterOffset(unsigned reg) {
1240b57cec5SDimitry Andric   assert(reg < k_num_registers_ppc64le && "Invalid register number.");
1250b57cec5SDimitry Andric   return GetRegisterInfo()[reg].byte_offset;
1260b57cec5SDimitry Andric }
1270b57cec5SDimitry Andric 
GetRegisterSize(unsigned reg)1280b57cec5SDimitry Andric unsigned RegisterContextPOSIX_ppc64le::GetRegisterSize(unsigned reg) {
1290b57cec5SDimitry Andric   assert(reg < k_num_registers_ppc64le && "Invalid register number.");
1300b57cec5SDimitry Andric   return GetRegisterInfo()[reg].byte_size;
1310b57cec5SDimitry Andric }
1320b57cec5SDimitry Andric 
GetRegisterCount()1330b57cec5SDimitry Andric size_t RegisterContextPOSIX_ppc64le::GetRegisterCount() {
1340b57cec5SDimitry Andric   size_t num_registers = k_num_registers_ppc64le;
1350b57cec5SDimitry Andric   return num_registers;
1360b57cec5SDimitry Andric }
1370b57cec5SDimitry Andric 
GetGPRSize()1380b57cec5SDimitry Andric size_t RegisterContextPOSIX_ppc64le::GetGPRSize() {
1390b57cec5SDimitry Andric   return m_register_info_up->GetGPRSize();
1400b57cec5SDimitry Andric }
1410b57cec5SDimitry Andric 
GetRegisterInfo()1420b57cec5SDimitry Andric const RegisterInfo *RegisterContextPOSIX_ppc64le::GetRegisterInfo() {
1430b57cec5SDimitry Andric   // Commonly, this method is overridden and g_register_infos is copied and
1440b57cec5SDimitry Andric   // specialized. So, use GetRegisterInfo() rather than g_register_infos in
1450b57cec5SDimitry Andric   // this scope.
1460b57cec5SDimitry Andric   return m_register_info_up->GetRegisterInfo();
1470b57cec5SDimitry Andric }
1480b57cec5SDimitry Andric 
1490b57cec5SDimitry Andric const RegisterInfo *
GetRegisterInfoAtIndex(size_t reg)1500b57cec5SDimitry Andric RegisterContextPOSIX_ppc64le::GetRegisterInfoAtIndex(size_t reg) {
1510b57cec5SDimitry Andric   if (reg < k_num_registers_ppc64le)
1520b57cec5SDimitry Andric     return &GetRegisterInfo()[reg];
1530b57cec5SDimitry Andric   else
1540b57cec5SDimitry Andric     return nullptr;
1550b57cec5SDimitry Andric }
1560b57cec5SDimitry Andric 
GetRegisterSetCount()1570b57cec5SDimitry Andric size_t RegisterContextPOSIX_ppc64le::GetRegisterSetCount() {
1580b57cec5SDimitry Andric   size_t sets = 0;
1590b57cec5SDimitry Andric   for (size_t set = 0; set < k_num_register_sets; ++set) {
1600b57cec5SDimitry Andric     if (IsRegisterSetAvailable(set))
1610b57cec5SDimitry Andric       ++sets;
1620b57cec5SDimitry Andric   }
1630b57cec5SDimitry Andric 
1640b57cec5SDimitry Andric   return sets;
1650b57cec5SDimitry Andric }
1660b57cec5SDimitry Andric 
GetRegisterSet(size_t set)1670b57cec5SDimitry Andric const RegisterSet *RegisterContextPOSIX_ppc64le::GetRegisterSet(size_t set) {
1680b57cec5SDimitry Andric   if (IsRegisterSetAvailable(set))
1690b57cec5SDimitry Andric     return &g_reg_sets_ppc64le[set];
1700b57cec5SDimitry Andric   else
1710b57cec5SDimitry Andric     return nullptr;
1720b57cec5SDimitry Andric }
1730b57cec5SDimitry Andric 
GetRegisterName(unsigned reg)1740b57cec5SDimitry Andric const char *RegisterContextPOSIX_ppc64le::GetRegisterName(unsigned reg) {
1750b57cec5SDimitry Andric   assert(reg < k_num_registers_ppc64le && "Invalid register offset.");
1760b57cec5SDimitry Andric   return GetRegisterInfo()[reg].name;
1770b57cec5SDimitry Andric }
1780b57cec5SDimitry Andric 
IsRegisterSetAvailable(size_t set_index)1790b57cec5SDimitry Andric bool RegisterContextPOSIX_ppc64le::IsRegisterSetAvailable(size_t set_index) {
1800b57cec5SDimitry Andric   size_t num_sets = k_num_register_sets;
1810b57cec5SDimitry Andric 
1820b57cec5SDimitry Andric   return (set_index < num_sets);
1830b57cec5SDimitry Andric }
1840b57cec5SDimitry Andric