1 //===-- SparcELFObjectWriter.cpp - Sparc ELF Writer -----------------------===// 2 // 3 // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions. 4 // See https://llvm.org/LICENSE.txt for license information. 5 // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception 6 // 7 //===----------------------------------------------------------------------===// 8 9 #include "MCTargetDesc/SparcFixupKinds.h" 10 #include "MCTargetDesc/SparcMCExpr.h" 11 #include "MCTargetDesc/SparcMCTargetDesc.h" 12 #include "llvm/ADT/STLExtras.h" 13 #include "llvm/MC/MCELFObjectWriter.h" 14 #include "llvm/MC/MCExpr.h" 15 #include "llvm/MC/MCObjectWriter.h" 16 #include "llvm/MC/MCValue.h" 17 #include "llvm/Support/ErrorHandling.h" 18 19 using namespace llvm; 20 21 namespace { 22 class SparcELFObjectWriter : public MCELFObjectTargetWriter { 23 public: 24 SparcELFObjectWriter(bool Is64Bit, bool HasV9, uint8_t OSABI) 25 : MCELFObjectTargetWriter( 26 Is64Bit, OSABI, 27 Is64Bit ? ELF::EM_SPARCV9 28 : (HasV9 ? ELF::EM_SPARC32PLUS : ELF::EM_SPARC), 29 /*HasRelocationAddend*/ true) {} 30 31 ~SparcELFObjectWriter() override = default; 32 33 protected: 34 unsigned getRelocType(MCContext &Ctx, const MCValue &Target, 35 const MCFixup &Fixup, bool IsPCRel) const override; 36 37 bool needsRelocateWithSymbol(const MCValue &Val, const MCSymbol &Sym, 38 unsigned Type) const override; 39 }; 40 } 41 42 unsigned SparcELFObjectWriter::getRelocType(MCContext &Ctx, 43 const MCValue &Target, 44 const MCFixup &Fixup, 45 bool IsPCRel) const { 46 MCFixupKind Kind = Fixup.getKind(); 47 if (Kind >= FirstLiteralRelocationKind) 48 return Kind - FirstLiteralRelocationKind; 49 50 if (const SparcMCExpr *SExpr = dyn_cast<SparcMCExpr>(Fixup.getValue())) { 51 if (SExpr->getKind() == SparcMCExpr::VK_Sparc_R_DISP32) 52 return ELF::R_SPARC_DISP32; 53 } 54 55 if (IsPCRel) { 56 switch(Fixup.getTargetKind()) { 57 default: 58 llvm_unreachable("Unimplemented fixup -> relocation"); 59 case FK_Data_1: return ELF::R_SPARC_DISP8; 60 case FK_Data_2: return ELF::R_SPARC_DISP16; 61 case FK_Data_4: return ELF::R_SPARC_DISP32; 62 case FK_Data_8: return ELF::R_SPARC_DISP64; 63 case Sparc::fixup_sparc_call30: return ELF::R_SPARC_WDISP30; 64 case Sparc::fixup_sparc_br22: return ELF::R_SPARC_WDISP22; 65 case Sparc::fixup_sparc_br19: return ELF::R_SPARC_WDISP19; 66 case Sparc::fixup_sparc_br16: 67 return ELF::R_SPARC_WDISP16; 68 case Sparc::fixup_sparc_pc22: return ELF::R_SPARC_PC22; 69 case Sparc::fixup_sparc_pc10: return ELF::R_SPARC_PC10; 70 case Sparc::fixup_sparc_wplt30: return ELF::R_SPARC_WPLT30; 71 } 72 } 73 74 switch(Fixup.getTargetKind()) { 75 default: 76 llvm_unreachable("Unimplemented fixup -> relocation"); 77 case FK_NONE: return ELF::R_SPARC_NONE; 78 case FK_Data_1: return ELF::R_SPARC_8; 79 case FK_Data_2: return ((Fixup.getOffset() % 2) 80 ? ELF::R_SPARC_UA16 81 : ELF::R_SPARC_16); 82 case FK_Data_4: return ((Fixup.getOffset() % 4) 83 ? ELF::R_SPARC_UA32 84 : ELF::R_SPARC_32); 85 case FK_Data_8: return ((Fixup.getOffset() % 8) 86 ? ELF::R_SPARC_UA64 87 : ELF::R_SPARC_64); 88 case Sparc::fixup_sparc_13: return ELF::R_SPARC_13; 89 case Sparc::fixup_sparc_hi22: return ELF::R_SPARC_HI22; 90 case Sparc::fixup_sparc_lo10: return ELF::R_SPARC_LO10; 91 case Sparc::fixup_sparc_h44: return ELF::R_SPARC_H44; 92 case Sparc::fixup_sparc_m44: return ELF::R_SPARC_M44; 93 case Sparc::fixup_sparc_l44: return ELF::R_SPARC_L44; 94 case Sparc::fixup_sparc_hh: return ELF::R_SPARC_HH22; 95 case Sparc::fixup_sparc_hm: return ELF::R_SPARC_HM10; 96 case Sparc::fixup_sparc_lm: return ELF::R_SPARC_LM22; 97 case Sparc::fixup_sparc_got22: return ELF::R_SPARC_GOT22; 98 case Sparc::fixup_sparc_got10: return ELF::R_SPARC_GOT10; 99 case Sparc::fixup_sparc_got13: return ELF::R_SPARC_GOT13; 100 case Sparc::fixup_sparc_tls_gd_hi22: return ELF::R_SPARC_TLS_GD_HI22; 101 case Sparc::fixup_sparc_tls_gd_lo10: return ELF::R_SPARC_TLS_GD_LO10; 102 case Sparc::fixup_sparc_tls_gd_add: return ELF::R_SPARC_TLS_GD_ADD; 103 case Sparc::fixup_sparc_tls_gd_call: return ELF::R_SPARC_TLS_GD_CALL; 104 case Sparc::fixup_sparc_tls_ldm_hi22: return ELF::R_SPARC_TLS_LDM_HI22; 105 case Sparc::fixup_sparc_tls_ldm_lo10: return ELF::R_SPARC_TLS_LDM_LO10; 106 case Sparc::fixup_sparc_tls_ldm_add: return ELF::R_SPARC_TLS_LDM_ADD; 107 case Sparc::fixup_sparc_tls_ldm_call: return ELF::R_SPARC_TLS_LDM_CALL; 108 case Sparc::fixup_sparc_tls_ldo_hix22: return ELF::R_SPARC_TLS_LDO_HIX22; 109 case Sparc::fixup_sparc_tls_ldo_lox10: return ELF::R_SPARC_TLS_LDO_LOX10; 110 case Sparc::fixup_sparc_tls_ldo_add: return ELF::R_SPARC_TLS_LDO_ADD; 111 case Sparc::fixup_sparc_tls_ie_hi22: return ELF::R_SPARC_TLS_IE_HI22; 112 case Sparc::fixup_sparc_tls_ie_lo10: return ELF::R_SPARC_TLS_IE_LO10; 113 case Sparc::fixup_sparc_tls_ie_ld: return ELF::R_SPARC_TLS_IE_LD; 114 case Sparc::fixup_sparc_tls_ie_ldx: return ELF::R_SPARC_TLS_IE_LDX; 115 case Sparc::fixup_sparc_tls_ie_add: return ELF::R_SPARC_TLS_IE_ADD; 116 case Sparc::fixup_sparc_tls_le_hix22: return ELF::R_SPARC_TLS_LE_HIX22; 117 case Sparc::fixup_sparc_tls_le_lox10: return ELF::R_SPARC_TLS_LE_LOX10; 118 case Sparc::fixup_sparc_hix22: return ELF::R_SPARC_HIX22; 119 case Sparc::fixup_sparc_lox10: return ELF::R_SPARC_LOX10; 120 case Sparc::fixup_sparc_gotdata_hix22: return ELF::R_SPARC_GOTDATA_HIX22; 121 case Sparc::fixup_sparc_gotdata_lox10: return ELF::R_SPARC_GOTDATA_LOX10; 122 case Sparc::fixup_sparc_gotdata_op: return ELF::R_SPARC_GOTDATA_OP; 123 } 124 125 return ELF::R_SPARC_NONE; 126 } 127 128 bool SparcELFObjectWriter::needsRelocateWithSymbol(const MCValue &, 129 const MCSymbol &, 130 unsigned Type) const { 131 switch (Type) { 132 default: 133 return false; 134 135 // All relocations that use a GOT need a symbol, not an offset, as 136 // the offset of the symbol within the section is irrelevant to 137 // where the GOT entry is. Don't need to list all the TLS entries, 138 // as they're all marked as requiring a symbol anyways. 139 case ELF::R_SPARC_GOT10: 140 case ELF::R_SPARC_GOT13: 141 case ELF::R_SPARC_GOT22: 142 case ELF::R_SPARC_GOTDATA_HIX22: 143 case ELF::R_SPARC_GOTDATA_LOX10: 144 case ELF::R_SPARC_GOTDATA_OP_HIX22: 145 case ELF::R_SPARC_GOTDATA_OP_LOX10: 146 return true; 147 } 148 } 149 150 std::unique_ptr<MCObjectTargetWriter> 151 llvm::createSparcELFObjectWriter(bool Is64Bit, bool HasV9, uint8_t OSABI) { 152 return std::make_unique<SparcELFObjectWriter>(Is64Bit, HasV9, OSABI); 153 } 154