contrib/llvm/tools/lldb/source/Plugins/Process/Utility/RegisterContextPOSIX_ppc64le.cpp

   1 //===-- RegisterContextPOSIX_ppc64le.cpp -------------------------*- C++-*-===//
   2 //
   3 //                     The LLVM Compiler Infrastructure
   4 //
   5 // This file is distributed under the University of Illinois Open Source
   6 // License. See LICENSE.TXT for details.
   7 //
   8 //===----------------------------------------------------------------------===//
   9
  10 #include <cstring>
  11 #include <errno.h>
  12 #include <stdint.h>
  13
  14 #include "lldb/Core/RegisterValue.h"
  15 #include "lldb/Core/Scalar.h"
  16 #include "lldb/Target/Target.h"
  17 #include "lldb/Target/Thread.h"
  18 #include "lldb/Utility/DataBufferHeap.h"
  19 #include "lldb/Utility/DataExtractor.h"
  20 #include "lldb/Utility/Endian.h"
  21 #include "llvm/Support/Compiler.h"
  22
  23 #include "Plugins/Process/elf-core/ProcessElfCore.h"
  24 #include "RegisterContextPOSIX_ppc64le.h"
  25
  26 using namespace lldb_private;
  27 using namespace lldb;
  28
  29 static const uint32_t g_gpr_regnums[] = {
  30     gpr_r0_ppc64le,   gpr_r1_ppc64le,  gpr_r2_ppc64le,     gpr_r3_ppc64le,
  31     gpr_r4_ppc64le,   gpr_r5_ppc64le,  gpr_r6_ppc64le,     gpr_r7_ppc64le,
  32     gpr_r8_ppc64le,   gpr_r9_ppc64le,  gpr_r10_ppc64le,    gpr_r11_ppc64le,
  33     gpr_r12_ppc64le,  gpr_r13_ppc64le, gpr_r14_ppc64le,    gpr_r15_ppc64le,
  34     gpr_r16_ppc64le,  gpr_r17_ppc64le, gpr_r18_ppc64le,    gpr_r19_ppc64le,
  35     gpr_r20_ppc64le,  gpr_r21_ppc64le, gpr_r22_ppc64le,    gpr_r23_ppc64le,
  36     gpr_r24_ppc64le,  gpr_r25_ppc64le, gpr_r26_ppc64le,    gpr_r27_ppc64le,
  37     gpr_r28_ppc64le,  gpr_r29_ppc64le, gpr_r30_ppc64le,    gpr_r31_ppc64le,
  38     gpr_pc_ppc64le,   gpr_msr_ppc64le, gpr_origr3_ppc64le, gpr_ctr_ppc64le,
  39     gpr_lr_ppc64le,   gpr_xer_ppc64le, gpr_cr_ppc64le,     gpr_softe_ppc64le,
  40     gpr_trap_ppc64le,
  41 };
  42
  43 static const uint32_t g_fpr_regnums[] = {
  44     fpr_f0_ppc64le,    fpr_f1_ppc64le,  fpr_f2_ppc64le,  fpr_f3_ppc64le,
  45     fpr_f4_ppc64le,    fpr_f5_ppc64le,  fpr_f6_ppc64le,  fpr_f7_ppc64le,
  46     fpr_f8_ppc64le,    fpr_f9_ppc64le,  fpr_f10_ppc64le, fpr_f11_ppc64le,
  47     fpr_f12_ppc64le,   fpr_f13_ppc64le, fpr_f14_ppc64le, fpr_f15_ppc64le,
  48     fpr_f16_ppc64le,   fpr_f17_ppc64le, fpr_f18_ppc64le, fpr_f19_ppc64le,
  49     fpr_f20_ppc64le,   fpr_f21_ppc64le, fpr_f22_ppc64le, fpr_f23_ppc64le,
  50     fpr_f24_ppc64le,   fpr_f25_ppc64le, fpr_f26_ppc64le, fpr_f27_ppc64le,
  51     fpr_f28_ppc64le,   fpr_f29_ppc64le, fpr_f30_ppc64le, fpr_f31_ppc64le,
  52     fpr_fpscr_ppc64le,
  53 };
  54
  55 static const uint32_t g_vmx_regnums[] = {
  56     vmx_vr0_ppc64le,  vmx_vr1_ppc64le,    vmx_vr2_ppc64le,  vmx_vr3_ppc64le,
  57     vmx_vr4_ppc64le,  vmx_vr5_ppc64le,    vmx_vr6_ppc64le,  vmx_vr7_ppc64le,
  58     vmx_vr8_ppc64le,  vmx_vr9_ppc64le,    vmx_vr10_ppc64le, vmx_vr11_ppc64le,
  59     vmx_vr12_ppc64le, vmx_vr13_ppc64le,   vmx_vr14_ppc64le, vmx_vr15_ppc64le,
  60     vmx_vr16_ppc64le, vmx_vr17_ppc64le,   vmx_vr18_ppc64le, vmx_vr19_ppc64le,
  61     vmx_vr20_ppc64le, vmx_vr21_ppc64le,   vmx_vr22_ppc64le, vmx_vr23_ppc64le,
  62     vmx_vr24_ppc64le, vmx_vr25_ppc64le,   vmx_vr26_ppc64le, vmx_vr27_ppc64le,
  63     vmx_vr28_ppc64le, vmx_vr29_ppc64le,   vmx_vr30_ppc64le, vmx_vr31_ppc64le,
  64     vmx_vscr_ppc64le, vmx_vrsave_ppc64le,
  65 };
  66
  67 static const uint32_t g_vsx_regnums[] = {
  68     vsx_vs0_ppc64le,  vsx_vs1_ppc64le,  vsx_vs2_ppc64le,  vsx_vs3_ppc64le,
  69     vsx_vs4_ppc64le,  vsx_vs5_ppc64le,  vsx_vs6_ppc64le,  vsx_vs7_ppc64le,
  70     vsx_vs8_ppc64le,  vsx_vs9_ppc64le,  vsx_vs10_ppc64le, vsx_vs11_ppc64le,
  71     vsx_vs12_ppc64le, vsx_vs13_ppc64le, vsx_vs14_ppc64le, vsx_vs15_ppc64le,
  72     vsx_vs16_ppc64le, vsx_vs17_ppc64le, vsx_vs18_ppc64le, vsx_vs19_ppc64le,
  73     vsx_vs20_ppc64le, vsx_vs21_ppc64le, vsx_vs22_ppc64le, vsx_vs23_ppc64le,
  74     vsx_vs24_ppc64le, vsx_vs25_ppc64le, vsx_vs26_ppc64le, vsx_vs27_ppc64le,
  75     vsx_vs28_ppc64le, vsx_vs29_ppc64le, vsx_vs30_ppc64le, vsx_vs31_ppc64le,
  76     vsx_vs32_ppc64le, vsx_vs33_ppc64le, vsx_vs34_ppc64le, vsx_vs35_ppc64le,
  77     vsx_vs36_ppc64le, vsx_vs37_ppc64le, vsx_vs38_ppc64le, vsx_vs39_ppc64le,
  78     vsx_vs40_ppc64le, vsx_vs41_ppc64le, vsx_vs42_ppc64le, vsx_vs43_ppc64le,
  79     vsx_vs44_ppc64le, vsx_vs45_ppc64le, vsx_vs46_ppc64le, vsx_vs47_ppc64le,
  80     vsx_vs48_ppc64le, vsx_vs49_ppc64le, vsx_vs50_ppc64le, vsx_vs51_ppc64le,
  81     vsx_vs52_ppc64le, vsx_vs53_ppc64le, vsx_vs54_ppc64le, vsx_vs55_ppc64le,
  82     vsx_vs56_ppc64le, vsx_vs57_ppc64le, vsx_vs58_ppc64le, vsx_vs59_ppc64le,
  83     vsx_vs60_ppc64le, vsx_vs61_ppc64le, vsx_vs62_ppc64le, vsx_vs63_ppc64le,
  84 };
  85
  86 // Number of register sets provided by this context.
  87 enum { k_num_register_sets = 4 };
  88
  89 static const RegisterSet g_reg_sets_ppc64le[k_num_register_sets] = {
  90     {"General Purpose Registers", "gpr", k_num_gpr_registers_ppc64le,
  91      g_gpr_regnums},
  92     {"Floating Point Registers", "fpr", k_num_fpr_registers_ppc64le,
  93      g_fpr_regnums},
  94     {"Altivec/VMX Registers", "vmx", k_num_vmx_registers_ppc64le,
  95      g_vmx_regnums},
  96     {"VSX Registers", "vsx", k_num_vsx_registers_ppc64le, g_vsx_regnums},
  97 };
  98
  99 bool RegisterContextPOSIX_ppc64le::IsGPR(unsigned reg) {
 100   return (reg <= k_last_gpr_ppc64le); // GPR's come first.
 101 }
 102
 103 bool RegisterContextPOSIX_ppc64le::IsFPR(unsigned reg) {
 104   return (reg >= k_first_fpr_ppc64le) && (reg <= k_last_fpr_ppc64le);
 105 }
 106
 107 bool RegisterContextPOSIX_ppc64le::IsVMX(unsigned reg) {
 108   return (reg >= k_first_vmx_ppc64le) && (reg <= k_last_vmx_ppc64le);
 109 }
 110
 111 bool RegisterContextPOSIX_ppc64le::IsVSX(unsigned reg) {
 112   return (reg >= k_first_vsx_ppc64le) && (reg <= k_last_vsx_ppc64le);
 113 }
 114
 115 RegisterContextPOSIX_ppc64le::RegisterContextPOSIX_ppc64le(
 116     Thread &thread, uint32_t concrete_frame_idx,
 117     RegisterInfoInterface *register_info)
 118     : RegisterContext(thread, concrete_frame_idx) {
 119   m_register_info_ap.reset(register_info);
 120
 121   ProcessSP base = CalculateProcess();
 122   if (base.get()->GetPluginName() == ProcessElfCore::GetPluginNameStatic())
 123     return;
 124 }
 125
 126 void RegisterContextPOSIX_ppc64le::InvalidateAllRegisters() {}
 127
 128 unsigned RegisterContextPOSIX_ppc64le::GetRegisterOffset(unsigned reg) {
 129   assert(reg < k_num_registers_ppc64le && "Invalid register number.");
 130   return GetRegisterInfo()[reg].byte_offset;
 131 }
 132
 133 unsigned RegisterContextPOSIX_ppc64le::GetRegisterSize(unsigned reg) {
 134   assert(reg < k_num_registers_ppc64le && "Invalid register number.");
 135   return GetRegisterInfo()[reg].byte_size;
 136 }
 137
 138 size_t RegisterContextPOSIX_ppc64le::GetRegisterCount() {
 139   size_t num_registers = k_num_registers_ppc64le;
 140   return num_registers;
 141 }
 142
 143 size_t RegisterContextPOSIX_ppc64le::GetGPRSize() {
 144   return m_register_info_ap->GetGPRSize();
 145 }
 146
 147 const RegisterInfo *RegisterContextPOSIX_ppc64le::GetRegisterInfo() {
 148   // Commonly, this method is overridden and g_register_infos is copied and
 149   // specialized.
 150   // So, use GetRegisterInfo() rather than g_register_infos in this scope.
 151   return m_register_info_ap->GetRegisterInfo();
 152 }
 153
 154 const RegisterInfo *
 155 RegisterContextPOSIX_ppc64le::GetRegisterInfoAtIndex(size_t reg) {
 156   if (reg < k_num_registers_ppc64le)
 157     return &GetRegisterInfo()[reg];
 158   else
 159     return NULL;
 160 }
 161
 162 size_t RegisterContextPOSIX_ppc64le::GetRegisterSetCount() {
 163   size_t sets = 0;
 164   for (size_t set = 0; set < k_num_register_sets; ++set) {
 165     if (IsRegisterSetAvailable(set))
 166       ++sets;
 167   }
 168
 169   return sets;
 170 }
 171
 172 const RegisterSet *RegisterContextPOSIX_ppc64le::GetRegisterSet(size_t set) {
 173   if (IsRegisterSetAvailable(set))
 174     return &g_reg_sets_ppc64le[set];
 175   else
 176     return NULL;
 177 }
 178
 179 const char *RegisterContextPOSIX_ppc64le::GetRegisterName(unsigned reg) {
 180   assert(reg < k_num_registers_ppc64le && "Invalid register offset.");
 181   return GetRegisterInfo()[reg].name;
 182 }
 183
 184 lldb::ByteOrder RegisterContextPOSIX_ppc64le::GetByteOrder() {
 185   // Get the target process whose privileged thread was used for the register
 186   // read.
 187   lldb::ByteOrder byte_order = eByteOrderInvalid;
 188   Process *process = CalculateProcess().get();
 189
 190   if (process)
 191     byte_order = process->GetByteOrder();
 192   return byte_order;
 193 }
 194
 195 bool RegisterContextPOSIX_ppc64le::IsRegisterSetAvailable(size_t set_index) {
 196   size_t num_sets = k_num_register_sets;
 197
 198   return (set_index < num_sets);
 199 }
 200
 201 // Used when parsing DWARF and EH frame information and any other
 202 // object file sections that contain register numbers in them.
 203 uint32_t RegisterContextPOSIX_ppc64le::ConvertRegisterKindToRegisterNumber(
 204     lldb::RegisterKind kind, uint32_t num) {
 205   const uint32_t num_regs = GetRegisterCount();
 206
 207   assert(kind < kNumRegisterKinds);
 208   for (uint32_t reg_idx = 0; reg_idx < num_regs; ++reg_idx) {
 209     const RegisterInfo *reg_info = GetRegisterInfoAtIndex(reg_idx);
 210
 211     if (reg_info->kinds[kind] == num)
 212       return reg_idx;
 213   }
 214
 215   return LLDB_INVALID_REGNUM;
 216 }