1 //===-- TargetMachine.cpp - General Target Information ---------------------==//
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 // This file describes the general parts of a Target machine.
10 //
11 //===----------------------------------------------------------------------===//
12 
13 #include "llvm/Target/TargetMachine.h"
14 #include "llvm/Analysis/TargetTransformInfo.h"
15 #include "llvm/IR/Function.h"
16 #include "llvm/IR/GlobalAlias.h"
17 #include "llvm/IR/GlobalValue.h"
18 #include "llvm/IR/GlobalVariable.h"
19 #include "llvm/IR/LegacyPassManager.h"
20 #include "llvm/IR/Mangler.h"
21 #include "llvm/MC/MCAsmInfo.h"
22 #include "llvm/MC/MCContext.h"
23 #include "llvm/MC/MCInstrInfo.h"
24 #include "llvm/MC/MCSectionMachO.h"
25 #include "llvm/MC/MCTargetOptions.h"
26 #include "llvm/MC/SectionKind.h"
27 #include "llvm/Target/TargetLoweringObjectFile.h"
28 using namespace llvm;
29 
30 //---------------------------------------------------------------------------
31 // TargetMachine Class
32 //
33 
34 TargetMachine::TargetMachine(const Target &T, StringRef DataLayoutString,
35                              const Triple &TT, StringRef CPU, StringRef FS,
36                              const TargetOptions &Options)
37     : TheTarget(T), DL(DataLayoutString), TargetTriple(TT), TargetCPU(CPU),
38       TargetFS(FS), AsmInfo(nullptr), MRI(nullptr), MII(nullptr), STI(nullptr),
39       RequireStructuredCFG(false), DefaultOptions(Options), Options(Options) {
40 }
41 
42 TargetMachine::~TargetMachine() = default;
43 
44 bool TargetMachine::isPositionIndependent() const {
45   return getRelocationModel() == Reloc::PIC_;
46 }
47 
48 /// Reset the target options based on the function's attributes.
49 // FIXME: This function needs to go away for a number of reasons:
50 // a) global state on the TargetMachine is terrible in general,
51 // b) these target options should be passed only on the function
52 //    and not on the TargetMachine (via TargetOptions) at all.
53 void TargetMachine::resetTargetOptions(const Function &F) const {
54 #define RESET_OPTION(X, Y)                                                     \
55   do {                                                                         \
56     if (F.hasFnAttribute(Y))                                                   \
57       Options.X = (F.getFnAttribute(Y).getValueAsString() == "true");          \
58     else                                                                       \
59       Options.X = DefaultOptions.X;                                            \
60   } while (0)
61 
62   RESET_OPTION(UnsafeFPMath, "unsafe-fp-math");
63   RESET_OPTION(NoInfsFPMath, "no-infs-fp-math");
64   RESET_OPTION(NoNaNsFPMath, "no-nans-fp-math");
65   RESET_OPTION(NoSignedZerosFPMath, "no-signed-zeros-fp-math");
66   RESET_OPTION(NoTrappingFPMath, "no-trapping-math");
67 
68   StringRef Denormal =
69     F.getFnAttribute("denormal-fp-math").getValueAsString();
70   if (Denormal == "ieee")
71     Options.FPDenormalMode = FPDenormal::IEEE;
72   else if (Denormal == "preserve-sign")
73     Options.FPDenormalMode = FPDenormal::PreserveSign;
74   else if (Denormal == "positive-zero")
75     Options.FPDenormalMode = FPDenormal::PositiveZero;
76   else
77     Options.FPDenormalMode = DefaultOptions.FPDenormalMode;
78 }
79 
80 /// Returns the code generation relocation model. The choices are static, PIC,
81 /// and dynamic-no-pic.
82 Reloc::Model TargetMachine::getRelocationModel() const { return RM; }
83 
84 /// Returns the code model. The choices are small, kernel, medium, large, and
85 /// target default.
86 CodeModel::Model TargetMachine::getCodeModel() const { return CMModel; }
87 
88 /// Get the IR-specified TLS model for Var.
89 static TLSModel::Model getSelectedTLSModel(const GlobalValue *GV) {
90   switch (GV->getThreadLocalMode()) {
91   case GlobalVariable::NotThreadLocal:
92     llvm_unreachable("getSelectedTLSModel for non-TLS variable");
93     break;
94   case GlobalVariable::GeneralDynamicTLSModel:
95     return TLSModel::GeneralDynamic;
96   case GlobalVariable::LocalDynamicTLSModel:
97     return TLSModel::LocalDynamic;
98   case GlobalVariable::InitialExecTLSModel:
99     return TLSModel::InitialExec;
100   case GlobalVariable::LocalExecTLSModel:
101     return TLSModel::LocalExec;
102   }
103   llvm_unreachable("invalid TLS model");
104 }
105 
106 bool TargetMachine::shouldAssumeDSOLocal(const Module &M,
107                                          const GlobalValue *GV) const {
108   // If the IR producer requested that this GV be treated as dso local, obey.
109   if (GV && GV->isDSOLocal())
110     return true;
111 
112   // If we are not supossed to use a PLT, we cannot assume that intrinsics are
113   // local since the linker can convert some direct access to access via plt.
114   if (M.getRtLibUseGOT() && !GV)
115     return false;
116 
117   // According to the llvm language reference, we should be able to
118   // just return false in here if we have a GV, as we know it is
119   // dso_preemptable.  At this point in time, the various IR producers
120   // have not been transitioned to always produce a dso_local when it
121   // is possible to do so.
122   // In the case of intrinsics, GV is null and there is nowhere to put
123   // dso_local. Returning false for those will produce worse code in some
124   // architectures. For example, on x86 the caller has to set ebx before calling
125   // a plt.
126   // As a result we still have some logic in here to improve the quality of the
127   // generated code.
128   // FIXME: Add a module level metadata for whether intrinsics should be assumed
129   // local.
130 
131   Reloc::Model RM = getRelocationModel();
132   const Triple &TT = getTargetTriple();
133 
134   // DLLImport explicitly marks the GV as external.
135   if (GV && GV->hasDLLImportStorageClass())
136     return false;
137 
138   // On MinGW, variables that haven't been declared with DLLImport may still
139   // end up automatically imported by the linker. To make this feasible,
140   // don't assume the variables to be DSO local unless we actually know
141   // that for sure. This only has to be done for variables; for functions
142   // the linker can insert thunks for calling functions from another DLL.
143   if (TT.isWindowsGNUEnvironment() && GV && GV->isDeclarationForLinker() &&
144       isa<GlobalVariable>(GV))
145     return false;
146 
147   // Every other GV is local on COFF.
148   // Make an exception for windows OS in the triple: Some firmware builds use
149   // *-win32-macho triples. This (accidentally?) produced windows relocations
150   // without GOT tables in older clang versions; Keep this behaviour.
151   if (TT.isOSBinFormatCOFF() || (TT.isOSWindows() && TT.isOSBinFormatMachO()))
152     return true;
153 
154   // Most PIC code sequences that assume that a symbol is local cannot
155   // produce a 0 if it turns out the symbol is undefined. While this
156   // is ABI and relocation depended, it seems worth it to handle it
157   // here.
158   if (GV && isPositionIndependent() && GV->hasExternalWeakLinkage())
159     return false;
160 
161   if (GV && !GV->hasDefaultVisibility())
162     return true;
163 
164   if (TT.isOSBinFormatMachO()) {
165     if (RM == Reloc::Static)
166       return true;
167     return GV && GV->isStrongDefinitionForLinker();
168   }
169 
170   assert(TT.isOSBinFormatELF());
171   assert(RM != Reloc::DynamicNoPIC);
172 
173   bool IsExecutable =
174       RM == Reloc::Static || M.getPIELevel() != PIELevel::Default;
175   if (IsExecutable) {
176     // If the symbol is defined, it cannot be preempted.
177     if (GV && !GV->isDeclarationForLinker())
178       return true;
179 
180     // A symbol marked nonlazybind should not be accessed with a plt. If the
181     // symbol turns out to be external, the linker will convert a direct
182     // access to an access via the plt, so don't assume it is local.
183     const Function *F = dyn_cast_or_null<Function>(GV);
184     if (F && F->hasFnAttribute(Attribute::NonLazyBind))
185       return false;
186 
187     bool IsTLS = GV && GV->isThreadLocal();
188     bool IsAccessViaCopyRelocs =
189         GV && Options.MCOptions.MCPIECopyRelocations && isa<GlobalVariable>(GV);
190     Triple::ArchType Arch = TT.getArch();
191     bool IsPPC =
192         Arch == Triple::ppc || Arch == Triple::ppc64 || Arch == Triple::ppc64le;
193     // Check if we can use copy relocations. PowerPC has no copy relocations.
194     if (!IsTLS && !IsPPC && (RM == Reloc::Static || IsAccessViaCopyRelocs))
195       return true;
196   }
197 
198   // ELF supports preemption of other symbols.
199   return false;
200 }
201 
202 bool TargetMachine::useEmulatedTLS() const {
203   // Returns Options.EmulatedTLS if the -emulated-tls or -no-emulated-tls
204   // was specified explicitly; otherwise uses target triple to decide default.
205   if (Options.ExplicitEmulatedTLS)
206     return Options.EmulatedTLS;
207   return getTargetTriple().hasDefaultEmulatedTLS();
208 }
209 
210 TLSModel::Model TargetMachine::getTLSModel(const GlobalValue *GV) const {
211   bool IsPIE = GV->getParent()->getPIELevel() != PIELevel::Default;
212   Reloc::Model RM = getRelocationModel();
213   bool IsSharedLibrary = RM == Reloc::PIC_ && !IsPIE;
214   bool IsLocal = shouldAssumeDSOLocal(*GV->getParent(), GV);
215 
216   TLSModel::Model Model;
217   if (IsSharedLibrary) {
218     if (IsLocal)
219       Model = TLSModel::LocalDynamic;
220     else
221       Model = TLSModel::GeneralDynamic;
222   } else {
223     if (IsLocal)
224       Model = TLSModel::LocalExec;
225     else
226       Model = TLSModel::InitialExec;
227   }
228 
229   // If the user specified a more specific model, use that.
230   TLSModel::Model SelectedModel = getSelectedTLSModel(GV);
231   if (SelectedModel > Model)
232     return SelectedModel;
233 
234   return Model;
235 }
236 
237 /// Returns the optimization level: None, Less, Default, or Aggressive.
238 CodeGenOpt::Level TargetMachine::getOptLevel() const { return OptLevel; }
239 
240 void TargetMachine::setOptLevel(CodeGenOpt::Level Level) { OptLevel = Level; }
241 
242 TargetTransformInfo TargetMachine::getTargetTransformInfo(const Function &F) {
243   return TargetTransformInfo(F.getParent()->getDataLayout());
244 }
245 
246 void TargetMachine::getNameWithPrefix(SmallVectorImpl<char> &Name,
247                                       const GlobalValue *GV, Mangler &Mang,
248                                       bool MayAlwaysUsePrivate) const {
249   if (MayAlwaysUsePrivate || !GV->hasPrivateLinkage()) {
250     // Simple case: If GV is not private, it is not important to find out if
251     // private labels are legal in this case or not.
252     Mang.getNameWithPrefix(Name, GV, false);
253     return;
254   }
255   const TargetLoweringObjectFile *TLOF = getObjFileLowering();
256   TLOF->getNameWithPrefix(Name, GV, *this);
257 }
258 
259 MCSymbol *TargetMachine::getSymbol(const GlobalValue *GV) const {
260   const TargetLoweringObjectFile *TLOF = getObjFileLowering();
261   SmallString<128> NameStr;
262   getNameWithPrefix(NameStr, GV, TLOF->getMangler());
263   return TLOF->getContext().getOrCreateSymbol(NameStr);
264 }
265 
266 TargetIRAnalysis TargetMachine::getTargetIRAnalysis() {
267   // Since Analysis can't depend on Target, use a std::function to invert the
268   // dependency.
269   return TargetIRAnalysis(
270       [this](const Function &F) { return this->getTargetTransformInfo(F); });
271 }
272