contrib/llvm/lib/Target/X86/X86TargetObjectFile.cpp

   1 //===-- X86TargetObjectFile.cpp - X86 Object Info -------------------------===//
   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 "X86TargetObjectFile.h"
  11 #include "llvm/ADT/StringExtras.h"
  12 #include "llvm/BinaryFormat/COFF.h"
  13 #include "llvm/BinaryFormat/Dwarf.h"
  14 #include "llvm/CodeGen/TargetLowering.h"
  15 #include "llvm/IR/Mangler.h"
  16 #include "llvm/IR/Operator.h"
  17 #include "llvm/MC/MCContext.h"
  18 #include "llvm/MC/MCExpr.h"
  19 #include "llvm/MC/MCSectionCOFF.h"
  20 #include "llvm/MC/MCSectionELF.h"
  21 #include "llvm/MC/MCValue.h"
  22
  23 using namespace llvm;
  24 using namespace dwarf;
  25
  26 const MCExpr *X86_64MachoTargetObjectFile::getTTypeGlobalReference(
  27     const GlobalValue *GV, unsigned Encoding, const TargetMachine &TM,
  28     MachineModuleInfo *MMI, MCStreamer &Streamer) const {
  29
  30   // On Darwin/X86-64, we can reference dwarf symbols with foo@GOTPCREL+4, which
  31   // is an indirect pc-relative reference.
  32   if ((Encoding & DW_EH_PE_indirect) && (Encoding & DW_EH_PE_pcrel)) {
  33     const MCSymbol *Sym = TM.getSymbol(GV);
  34     const MCExpr *Res =
  35       MCSymbolRefExpr::create(Sym, MCSymbolRefExpr::VK_GOTPCREL, getContext());
  36     const MCExpr *Four = MCConstantExpr::create(4, getContext());
  37     return MCBinaryExpr::createAdd(Res, Four, getContext());
  38   }
  39
  40   return TargetLoweringObjectFileMachO::getTTypeGlobalReference(
  41       GV, Encoding, TM, MMI, Streamer);
  42 }
  43
  44 MCSymbol *X86_64MachoTargetObjectFile::getCFIPersonalitySymbol(
  45     const GlobalValue *GV, const TargetMachine &TM,
  46     MachineModuleInfo *MMI) const {
  47   return TM.getSymbol(GV);
  48 }
  49
  50 const MCExpr *X86_64MachoTargetObjectFile::getIndirectSymViaGOTPCRel(
  51     const MCSymbol *Sym, const MCValue &MV, int64_t Offset,
  52     MachineModuleInfo *MMI, MCStreamer &Streamer) const {
  53   // On Darwin/X86-64, we need to use foo@GOTPCREL+4 to access the got entry
  54   // from a data section. In case there's an additional offset, then use
  55   // foo@GOTPCREL+4+<offset>.
  56   unsigned FinalOff = Offset+MV.getConstant()+4;
  57   const MCExpr *Res =
  58     MCSymbolRefExpr::create(Sym, MCSymbolRefExpr::VK_GOTPCREL, getContext());
  59   const MCExpr *Off = MCConstantExpr::create(FinalOff, getContext());
  60   return MCBinaryExpr::createAdd(Res, Off, getContext());
  61 }
  62
  63 const MCExpr *X86ELFTargetObjectFile::getDebugThreadLocalSymbol(
  64     const MCSymbol *Sym) const {
  65   return MCSymbolRefExpr::create(Sym, MCSymbolRefExpr::VK_DTPOFF, getContext());
  66 }
  67
  68 void
  69 X86FreeBSDTargetObjectFile::Initialize(MCContext &Ctx,
  70                                        const TargetMachine &TM) {
  71   TargetLoweringObjectFileELF::Initialize(Ctx, TM);
  72   InitializeELF(TM.Options.UseInitArray);
  73 }
  74
  75 void
  76 X86FuchsiaTargetObjectFile::Initialize(MCContext &Ctx,
  77                                        const TargetMachine &TM) {
  78   TargetLoweringObjectFileELF::Initialize(Ctx, TM);
  79   InitializeELF(TM.Options.UseInitArray);
  80 }
  81
  82 void
  83 X86LinuxNaClTargetObjectFile::Initialize(MCContext &Ctx,
  84                                          const TargetMachine &TM) {
  85   TargetLoweringObjectFileELF::Initialize(Ctx, TM);
  86   InitializeELF(TM.Options.UseInitArray);
  87 }
  88
  89 void X86SolarisTargetObjectFile::Initialize(MCContext &Ctx,
  90                                             const TargetMachine &TM) {
  91   TargetLoweringObjectFileELF::Initialize(Ctx, TM);
  92   InitializeELF(TM.Options.UseInitArray);
  93 }
  94
  95 const MCExpr *X86WindowsTargetObjectFile::lowerRelativeReference(
  96     const GlobalValue *LHS, const GlobalValue *RHS,
  97     const TargetMachine &TM) const {
  98   // Our symbols should exist in address space zero, cowardly no-op if
  99   // otherwise.
 100   if (LHS->getType()->getPointerAddressSpace() != 0 ||
 101       RHS->getType()->getPointerAddressSpace() != 0)
 102     return nullptr;
 103
 104   // Both ptrtoint instructions must wrap global objects:
 105   // - Only global variables are eligible for image relative relocations.
 106   // - The subtrahend refers to the special symbol __ImageBase, a GlobalVariable.
 107   // We expect __ImageBase to be a global variable without a section, externally
 108   // defined.
 109   //
 110   // It should look something like this: @__ImageBase = external constant i8
 111   if (!isa<GlobalObject>(LHS) || !isa<GlobalVariable>(RHS) ||
 112       LHS->isThreadLocal() || RHS->isThreadLocal() ||
 113       RHS->getName() != "__ImageBase" || !RHS->hasExternalLinkage() ||
 114       cast<GlobalVariable>(RHS)->hasInitializer() || RHS->hasSection())
 115     return nullptr;
 116
 117   return MCSymbolRefExpr::create(TM.getSymbol(LHS),
 118                                  MCSymbolRefExpr::VK_COFF_IMGREL32,
 119                                  getContext());
 120 }
 121
 122 static std::string APIntToHexString(const APInt &AI) {
 123   unsigned Width = (AI.getBitWidth() / 8) * 2;
 124   std::string HexString = utohexstr(AI.getLimitedValue(), /*LowerCase=*/true);
 125   unsigned Size = HexString.size();
 126   assert(Width >= Size && "hex string is too large!");
 127   HexString.insert(HexString.begin(), Width - Size, '0');
 128
 129   return HexString;
 130 }
 131
 132 static std::string scalarConstantToHexString(const Constant *C) {
 133   Type *Ty = C->getType();
 134   if (isa<UndefValue>(C)) {
 135     return APIntToHexString(APInt::getNullValue(Ty->getPrimitiveSizeInBits()));
 136   } else if (const auto *CFP = dyn_cast<ConstantFP>(C)) {
 137     return APIntToHexString(CFP->getValueAPF().bitcastToAPInt());
 138   } else if (const auto *CI = dyn_cast<ConstantInt>(C)) {
 139     return APIntToHexString(CI->getValue());
 140   } else {
 141     unsigned NumElements;
 142     if (isa<VectorType>(Ty))
 143       NumElements = Ty->getVectorNumElements();
 144     else
 145       NumElements = Ty->getArrayNumElements();
 146     std::string HexString;
 147     for (int I = NumElements - 1, E = -1; I != E; --I)
 148       HexString += scalarConstantToHexString(C->getAggregateElement(I));
 149     return HexString;
 150   }
 151 }
 152
 153 MCSection *X86WindowsTargetObjectFile::getSectionForConstant(
 154     const DataLayout &DL, SectionKind Kind, const Constant *C,
 155     unsigned &Align) const {
 156   if (Kind.isMergeableConst() && C) {
 157     const unsigned Characteristics = COFF::IMAGE_SCN_CNT_INITIALIZED_DATA |
 158                                      COFF::IMAGE_SCN_MEM_READ |
 159                                      COFF::IMAGE_SCN_LNK_COMDAT;
 160     std::string COMDATSymName;
 161     if (Kind.isMergeableConst4()) {
 162       if (Align <= 4) {
 163         COMDATSymName = "__real@" + scalarConstantToHexString(C);
 164         Align = 4;
 165       }
 166     } else if (Kind.isMergeableConst8()) {
 167       if (Align <= 8) {
 168         COMDATSymName = "__real@" + scalarConstantToHexString(C);
 169         Align = 8;
 170       }
 171     } else if (Kind.isMergeableConst16()) {
 172       if (Align <= 16) {
 173         COMDATSymName = "__xmm@" + scalarConstantToHexString(C);
 174         Align = 16;
 175       }
 176     } else if (Kind.isMergeableConst32()) {
 177       if (Align <= 32) {
 178         COMDATSymName = "__ymm@" + scalarConstantToHexString(C);
 179         Align = 32;
 180       }
 181     }
 182
 183     if (!COMDATSymName.empty())
 184       return getContext().getCOFFSection(".rdata", Characteristics, Kind,
 185                                          COMDATSymName,
 186                                          COFF::IMAGE_COMDAT_SELECT_ANY);
 187   }
 188
 189   return TargetLoweringObjectFile::getSectionForConstant(DL, Kind, C, Align);
 190 }