1 //===-- InstrProfiling.cpp - Frontend instrumentation based profiling -----===//
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 pass lowers instrprof_* intrinsics emitted by a frontend for profiling.
10 // It also builds the data structures and initialization code needed for
11 // updating execution counts and emitting the profile at runtime.
12 //
13 //===----------------------------------------------------------------------===//
14 
15 #include "llvm/Transforms/Instrumentation/InstrProfiling.h"
16 #include "llvm/ADT/ArrayRef.h"
17 #include "llvm/ADT/SmallVector.h"
18 #include "llvm/ADT/StringRef.h"
19 #include "llvm/ADT/Triple.h"
20 #include "llvm/ADT/Twine.h"
21 #include "llvm/Analysis/BlockFrequencyInfo.h"
22 #include "llvm/Analysis/BranchProbabilityInfo.h"
23 #include "llvm/Analysis/LoopInfo.h"
24 #include "llvm/Analysis/TargetLibraryInfo.h"
25 #include "llvm/IR/Attributes.h"
26 #include "llvm/IR/BasicBlock.h"
27 #include "llvm/IR/Constant.h"
28 #include "llvm/IR/Constants.h"
29 #include "llvm/IR/DerivedTypes.h"
30 #include "llvm/IR/Dominators.h"
31 #include "llvm/IR/Function.h"
32 #include "llvm/IR/GlobalValue.h"
33 #include "llvm/IR/GlobalVariable.h"
34 #include "llvm/IR/IRBuilder.h"
35 #include "llvm/IR/Instruction.h"
36 #include "llvm/IR/Instructions.h"
37 #include "llvm/IR/IntrinsicInst.h"
38 #include "llvm/IR/Module.h"
39 #include "llvm/IR/Type.h"
40 #include "llvm/InitializePasses.h"
41 #include "llvm/Pass.h"
42 #include "llvm/ProfileData/InstrProf.h"
43 #include "llvm/Support/Casting.h"
44 #include "llvm/Support/CommandLine.h"
45 #include "llvm/Support/Error.h"
46 #include "llvm/Support/ErrorHandling.h"
47 #include "llvm/Transforms/Utils/BasicBlockUtils.h"
48 #include "llvm/Transforms/Utils/ModuleUtils.h"
49 #include "llvm/Transforms/Utils/SSAUpdater.h"
50 #include <algorithm>
51 #include <cassert>
52 #include <cstddef>
53 #include <cstdint>
54 #include <string>
55 
56 using namespace llvm;
57 
58 #define DEBUG_TYPE "instrprof"
59 
60 namespace {
61 
62 cl::opt<bool> DoHashBasedCounterSplit(
63     "hash-based-counter-split",
64     cl::desc("Rename counter variable of a comdat function based on cfg hash"),
65     cl::init(true));
66 
67 cl::opt<bool> RuntimeCounterRelocation(
68     "runtime-counter-relocation",
69     cl::desc("Enable relocating counters at runtime."),
70     cl::init(false));
71 
72 cl::opt<bool> ValueProfileStaticAlloc(
73     "vp-static-alloc",
74     cl::desc("Do static counter allocation for value profiler"),
75     cl::init(true));
76 
77 cl::opt<double> NumCountersPerValueSite(
78     "vp-counters-per-site",
79     cl::desc("The average number of profile counters allocated "
80              "per value profiling site."),
81     // This is set to a very small value because in real programs, only
82     // a very small percentage of value sites have non-zero targets, e.g, 1/30.
83     // For those sites with non-zero profile, the average number of targets
84     // is usually smaller than 2.
85     cl::init(1.0));
86 
87 cl::opt<bool> AtomicCounterUpdateAll(
88     "instrprof-atomic-counter-update-all", cl::ZeroOrMore,
89     cl::desc("Make all profile counter updates atomic (for testing only)"),
90     cl::init(false));
91 
92 cl::opt<bool> AtomicCounterUpdatePromoted(
93     "atomic-counter-update-promoted", cl::ZeroOrMore,
94     cl::desc("Do counter update using atomic fetch add "
95              " for promoted counters only"),
96     cl::init(false));
97 
98 cl::opt<bool> AtomicFirstCounter(
99     "atomic-first-counter", cl::ZeroOrMore,
100     cl::desc("Use atomic fetch add for first counter in a function (usually "
101              "the entry counter)"),
102     cl::init(false));
103 
104 // If the option is not specified, the default behavior about whether
105 // counter promotion is done depends on how instrumentaiton lowering
106 // pipeline is setup, i.e., the default value of true of this option
107 // does not mean the promotion will be done by default. Explicitly
108 // setting this option can override the default behavior.
109 cl::opt<bool> DoCounterPromotion("do-counter-promotion", cl::ZeroOrMore,
110                                  cl::desc("Do counter register promotion"),
111                                  cl::init(false));
112 cl::opt<unsigned> MaxNumOfPromotionsPerLoop(
113     cl::ZeroOrMore, "max-counter-promotions-per-loop", cl::init(20),
114     cl::desc("Max number counter promotions per loop to avoid"
115              " increasing register pressure too much"));
116 
117 // A debug option
118 cl::opt<int>
119     MaxNumOfPromotions(cl::ZeroOrMore, "max-counter-promotions", cl::init(-1),
120                        cl::desc("Max number of allowed counter promotions"));
121 
122 cl::opt<unsigned> SpeculativeCounterPromotionMaxExiting(
123     cl::ZeroOrMore, "speculative-counter-promotion-max-exiting", cl::init(3),
124     cl::desc("The max number of exiting blocks of a loop to allow "
125              " speculative counter promotion"));
126 
127 cl::opt<bool> SpeculativeCounterPromotionToLoop(
128     cl::ZeroOrMore, "speculative-counter-promotion-to-loop", cl::init(false),
129     cl::desc("When the option is false, if the target block is in a loop, "
130              "the promotion will be disallowed unless the promoted counter "
131              " update can be further/iteratively promoted into an acyclic "
132              " region."));
133 
134 cl::opt<bool> IterativeCounterPromotion(
135     cl::ZeroOrMore, "iterative-counter-promotion", cl::init(true),
136     cl::desc("Allow counter promotion across the whole loop nest."));
137 
138 cl::opt<bool> SkipRetExitBlock(
139     cl::ZeroOrMore, "skip-ret-exit-block", cl::init(true),
140     cl::desc("Suppress counter promotion if exit blocks contain ret."));
141 
142 class InstrProfilingLegacyPass : public ModulePass {
143   InstrProfiling InstrProf;
144 
145 public:
146   static char ID;
147 
148   InstrProfilingLegacyPass() : ModulePass(ID) {}
149   InstrProfilingLegacyPass(const InstrProfOptions &Options, bool IsCS = false)
150       : ModulePass(ID), InstrProf(Options, IsCS) {
151     initializeInstrProfilingLegacyPassPass(*PassRegistry::getPassRegistry());
152   }
153 
154   StringRef getPassName() const override {
155     return "Frontend instrumentation-based coverage lowering";
156   }
157 
158   bool runOnModule(Module &M) override {
159     auto GetTLI = [this](Function &F) -> TargetLibraryInfo & {
160       return this->getAnalysis<TargetLibraryInfoWrapperPass>().getTLI(F);
161     };
162     return InstrProf.run(M, GetTLI);
163   }
164 
165   void getAnalysisUsage(AnalysisUsage &AU) const override {
166     AU.setPreservesCFG();
167     AU.addRequired<TargetLibraryInfoWrapperPass>();
168   }
169 };
170 
171 ///
172 /// A helper class to promote one counter RMW operation in the loop
173 /// into register update.
174 ///
175 /// RWM update for the counter will be sinked out of the loop after
176 /// the transformation.
177 ///
178 class PGOCounterPromoterHelper : public LoadAndStorePromoter {
179 public:
180   PGOCounterPromoterHelper(
181       Instruction *L, Instruction *S, SSAUpdater &SSA, Value *Init,
182       BasicBlock *PH, ArrayRef<BasicBlock *> ExitBlocks,
183       ArrayRef<Instruction *> InsertPts,
184       DenseMap<Loop *, SmallVector<LoadStorePair, 8>> &LoopToCands,
185       LoopInfo &LI)
186       : LoadAndStorePromoter({L, S}, SSA), Store(S), ExitBlocks(ExitBlocks),
187         InsertPts(InsertPts), LoopToCandidates(LoopToCands), LI(LI) {
188     assert(isa<LoadInst>(L));
189     assert(isa<StoreInst>(S));
190     SSA.AddAvailableValue(PH, Init);
191   }
192 
193   void doExtraRewritesBeforeFinalDeletion() override {
194     for (unsigned i = 0, e = ExitBlocks.size(); i != e; ++i) {
195       BasicBlock *ExitBlock = ExitBlocks[i];
196       Instruction *InsertPos = InsertPts[i];
197       // Get LiveIn value into the ExitBlock. If there are multiple
198       // predecessors, the value is defined by a PHI node in this
199       // block.
200       Value *LiveInValue = SSA.GetValueInMiddleOfBlock(ExitBlock);
201       Value *Addr = cast<StoreInst>(Store)->getPointerOperand();
202       Type *Ty = LiveInValue->getType();
203       IRBuilder<> Builder(InsertPos);
204       if (AtomicCounterUpdatePromoted)
205         // automic update currently can only be promoted across the current
206         // loop, not the whole loop nest.
207         Builder.CreateAtomicRMW(AtomicRMWInst::Add, Addr, LiveInValue,
208                                 MaybeAlign(),
209                                 AtomicOrdering::SequentiallyConsistent);
210       else {
211         LoadInst *OldVal = Builder.CreateLoad(Ty, Addr, "pgocount.promoted");
212         auto *NewVal = Builder.CreateAdd(OldVal, LiveInValue);
213         auto *NewStore = Builder.CreateStore(NewVal, Addr);
214 
215         // Now update the parent loop's candidate list:
216         if (IterativeCounterPromotion) {
217           auto *TargetLoop = LI.getLoopFor(ExitBlock);
218           if (TargetLoop)
219             LoopToCandidates[TargetLoop].emplace_back(OldVal, NewStore);
220         }
221       }
222     }
223   }
224 
225 private:
226   Instruction *Store;
227   ArrayRef<BasicBlock *> ExitBlocks;
228   ArrayRef<Instruction *> InsertPts;
229   DenseMap<Loop *, SmallVector<LoadStorePair, 8>> &LoopToCandidates;
230   LoopInfo &LI;
231 };
232 
233 /// A helper class to do register promotion for all profile counter
234 /// updates in a loop.
235 ///
236 class PGOCounterPromoter {
237 public:
238   PGOCounterPromoter(
239       DenseMap<Loop *, SmallVector<LoadStorePair, 8>> &LoopToCands,
240       Loop &CurLoop, LoopInfo &LI, BlockFrequencyInfo *BFI)
241       : LoopToCandidates(LoopToCands), ExitBlocks(), InsertPts(), L(CurLoop),
242         LI(LI), BFI(BFI) {
243 
244     // Skip collection of ExitBlocks and InsertPts for loops that will not be
245     // able to have counters promoted.
246     SmallVector<BasicBlock *, 8> LoopExitBlocks;
247     SmallPtrSet<BasicBlock *, 8> BlockSet;
248 
249     L.getExitBlocks(LoopExitBlocks);
250     if (!isPromotionPossible(&L, LoopExitBlocks))
251       return;
252 
253     for (BasicBlock *ExitBlock : LoopExitBlocks) {
254       if (BlockSet.insert(ExitBlock).second) {
255         ExitBlocks.push_back(ExitBlock);
256         InsertPts.push_back(&*ExitBlock->getFirstInsertionPt());
257       }
258     }
259   }
260 
261   bool run(int64_t *NumPromoted) {
262     // Skip 'infinite' loops:
263     if (ExitBlocks.size() == 0)
264       return false;
265 
266     // Skip if any of the ExitBlocks contains a ret instruction.
267     // This is to prevent dumping of incomplete profile -- if the
268     // the loop is a long running loop and dump is called in the middle
269     // of the loop, the result profile is incomplete.
270     // FIXME: add other heuristics to detect long running loops.
271     if (SkipRetExitBlock) {
272       for (auto BB : ExitBlocks)
273         if (isa<ReturnInst>(BB->getTerminator()))
274           return false;
275     }
276 
277     unsigned MaxProm = getMaxNumOfPromotionsInLoop(&L);
278     if (MaxProm == 0)
279       return false;
280 
281     unsigned Promoted = 0;
282     for (auto &Cand : LoopToCandidates[&L]) {
283 
284       SmallVector<PHINode *, 4> NewPHIs;
285       SSAUpdater SSA(&NewPHIs);
286       Value *InitVal = ConstantInt::get(Cand.first->getType(), 0);
287 
288       // If BFI is set, we will use it to guide the promotions.
289       if (BFI) {
290         auto *BB = Cand.first->getParent();
291         auto InstrCount = BFI->getBlockProfileCount(BB);
292         if (!InstrCount)
293           continue;
294         auto PreheaderCount = BFI->getBlockProfileCount(L.getLoopPreheader());
295         // If the average loop trip count is not greater than 1.5, we skip
296         // promotion.
297         if (PreheaderCount &&
298             (PreheaderCount.getValue() * 3) >= (InstrCount.getValue() * 2))
299           continue;
300       }
301 
302       PGOCounterPromoterHelper Promoter(Cand.first, Cand.second, SSA, InitVal,
303                                         L.getLoopPreheader(), ExitBlocks,
304                                         InsertPts, LoopToCandidates, LI);
305       Promoter.run(SmallVector<Instruction *, 2>({Cand.first, Cand.second}));
306       Promoted++;
307       if (Promoted >= MaxProm)
308         break;
309 
310       (*NumPromoted)++;
311       if (MaxNumOfPromotions != -1 && *NumPromoted >= MaxNumOfPromotions)
312         break;
313     }
314 
315     LLVM_DEBUG(dbgs() << Promoted << " counters promoted for loop (depth="
316                       << L.getLoopDepth() << ")\n");
317     return Promoted != 0;
318   }
319 
320 private:
321   bool allowSpeculativeCounterPromotion(Loop *LP) {
322     SmallVector<BasicBlock *, 8> ExitingBlocks;
323     L.getExitingBlocks(ExitingBlocks);
324     // Not considierered speculative.
325     if (ExitingBlocks.size() == 1)
326       return true;
327     if (ExitingBlocks.size() > SpeculativeCounterPromotionMaxExiting)
328       return false;
329     return true;
330   }
331 
332   // Check whether the loop satisfies the basic conditions needed to perform
333   // Counter Promotions.
334   bool isPromotionPossible(Loop *LP,
335                            const SmallVectorImpl<BasicBlock *> &LoopExitBlocks) {
336     // We can't insert into a catchswitch.
337     if (llvm::any_of(LoopExitBlocks, [](BasicBlock *Exit) {
338           return isa<CatchSwitchInst>(Exit->getTerminator());
339         }))
340       return false;
341 
342     if (!LP->hasDedicatedExits())
343       return false;
344 
345     BasicBlock *PH = LP->getLoopPreheader();
346     if (!PH)
347       return false;
348 
349     return true;
350   }
351 
352   // Returns the max number of Counter Promotions for LP.
353   unsigned getMaxNumOfPromotionsInLoop(Loop *LP) {
354     SmallVector<BasicBlock *, 8> LoopExitBlocks;
355     LP->getExitBlocks(LoopExitBlocks);
356     if (!isPromotionPossible(LP, LoopExitBlocks))
357       return 0;
358 
359     SmallVector<BasicBlock *, 8> ExitingBlocks;
360     LP->getExitingBlocks(ExitingBlocks);
361 
362     // If BFI is set, we do more aggressive promotions based on BFI.
363     if (BFI)
364       return (unsigned)-1;
365 
366     // Not considierered speculative.
367     if (ExitingBlocks.size() == 1)
368       return MaxNumOfPromotionsPerLoop;
369 
370     if (ExitingBlocks.size() > SpeculativeCounterPromotionMaxExiting)
371       return 0;
372 
373     // Whether the target block is in a loop does not matter:
374     if (SpeculativeCounterPromotionToLoop)
375       return MaxNumOfPromotionsPerLoop;
376 
377     // Now check the target block:
378     unsigned MaxProm = MaxNumOfPromotionsPerLoop;
379     for (auto *TargetBlock : LoopExitBlocks) {
380       auto *TargetLoop = LI.getLoopFor(TargetBlock);
381       if (!TargetLoop)
382         continue;
383       unsigned MaxPromForTarget = getMaxNumOfPromotionsInLoop(TargetLoop);
384       unsigned PendingCandsInTarget = LoopToCandidates[TargetLoop].size();
385       MaxProm =
386           std::min(MaxProm, std::max(MaxPromForTarget, PendingCandsInTarget) -
387                                 PendingCandsInTarget);
388     }
389     return MaxProm;
390   }
391 
392   DenseMap<Loop *, SmallVector<LoadStorePair, 8>> &LoopToCandidates;
393   SmallVector<BasicBlock *, 8> ExitBlocks;
394   SmallVector<Instruction *, 8> InsertPts;
395   Loop &L;
396   LoopInfo &LI;
397   BlockFrequencyInfo *BFI;
398 };
399 
400 enum class ValueProfilingCallType {
401   // Individual values are tracked. Currently used for indiret call target
402   // profiling.
403   Default,
404 
405   // MemOp: the memop size value profiling.
406   MemOp
407 };
408 
409 } // end anonymous namespace
410 
411 PreservedAnalyses InstrProfiling::run(Module &M, ModuleAnalysisManager &AM) {
412   FunctionAnalysisManager &FAM =
413       AM.getResult<FunctionAnalysisManagerModuleProxy>(M).getManager();
414   auto GetTLI = [&FAM](Function &F) -> TargetLibraryInfo & {
415     return FAM.getResult<TargetLibraryAnalysis>(F);
416   };
417   if (!run(M, GetTLI))
418     return PreservedAnalyses::all();
419 
420   return PreservedAnalyses::none();
421 }
422 
423 char InstrProfilingLegacyPass::ID = 0;
424 INITIALIZE_PASS_BEGIN(
425     InstrProfilingLegacyPass, "instrprof",
426     "Frontend instrumentation-based coverage lowering.", false, false)
427 INITIALIZE_PASS_DEPENDENCY(TargetLibraryInfoWrapperPass)
428 INITIALIZE_PASS_END(
429     InstrProfilingLegacyPass, "instrprof",
430     "Frontend instrumentation-based coverage lowering.", false, false)
431 
432 ModulePass *
433 llvm::createInstrProfilingLegacyPass(const InstrProfOptions &Options,
434                                      bool IsCS) {
435   return new InstrProfilingLegacyPass(Options, IsCS);
436 }
437 
438 static InstrProfIncrementInst *castToIncrementInst(Instruction *Instr) {
439   InstrProfIncrementInst *Inc = dyn_cast<InstrProfIncrementInstStep>(Instr);
440   if (Inc)
441     return Inc;
442   return dyn_cast<InstrProfIncrementInst>(Instr);
443 }
444 
445 bool InstrProfiling::lowerIntrinsics(Function *F) {
446   bool MadeChange = false;
447   PromotionCandidates.clear();
448   for (BasicBlock &BB : *F) {
449     for (auto I = BB.begin(), E = BB.end(); I != E;) {
450       auto Instr = I++;
451       InstrProfIncrementInst *Inc = castToIncrementInst(&*Instr);
452       if (Inc) {
453         lowerIncrement(Inc);
454         MadeChange = true;
455       } else if (auto *Ind = dyn_cast<InstrProfValueProfileInst>(Instr)) {
456         lowerValueProfileInst(Ind);
457         MadeChange = true;
458       }
459     }
460   }
461 
462   if (!MadeChange)
463     return false;
464 
465   promoteCounterLoadStores(F);
466   return true;
467 }
468 
469 bool InstrProfiling::isRuntimeCounterRelocationEnabled() const {
470   // Mach-O don't support weak external references.
471   if (TT.isOSBinFormatMachO())
472     return false;
473 
474   if (RuntimeCounterRelocation.getNumOccurrences() > 0)
475     return RuntimeCounterRelocation;
476 
477   // Fuchsia uses runtime counter relocation by default.
478   return TT.isOSFuchsia();
479 }
480 
481 bool InstrProfiling::isCounterPromotionEnabled() const {
482   if (DoCounterPromotion.getNumOccurrences() > 0)
483     return DoCounterPromotion;
484 
485   return Options.DoCounterPromotion;
486 }
487 
488 void InstrProfiling::promoteCounterLoadStores(Function *F) {
489   if (!isCounterPromotionEnabled())
490     return;
491 
492   DominatorTree DT(*F);
493   LoopInfo LI(DT);
494   DenseMap<Loop *, SmallVector<LoadStorePair, 8>> LoopPromotionCandidates;
495 
496   std::unique_ptr<BlockFrequencyInfo> BFI;
497   if (Options.UseBFIInPromotion) {
498     std::unique_ptr<BranchProbabilityInfo> BPI;
499     BPI.reset(new BranchProbabilityInfo(*F, LI, &GetTLI(*F)));
500     BFI.reset(new BlockFrequencyInfo(*F, *BPI, LI));
501   }
502 
503   for (const auto &LoadStore : PromotionCandidates) {
504     auto *CounterLoad = LoadStore.first;
505     auto *CounterStore = LoadStore.second;
506     BasicBlock *BB = CounterLoad->getParent();
507     Loop *ParentLoop = LI.getLoopFor(BB);
508     if (!ParentLoop)
509       continue;
510     LoopPromotionCandidates[ParentLoop].emplace_back(CounterLoad, CounterStore);
511   }
512 
513   SmallVector<Loop *, 4> Loops = LI.getLoopsInPreorder();
514 
515   // Do a post-order traversal of the loops so that counter updates can be
516   // iteratively hoisted outside the loop nest.
517   for (auto *Loop : llvm::reverse(Loops)) {
518     PGOCounterPromoter Promoter(LoopPromotionCandidates, *Loop, LI, BFI.get());
519     Promoter.run(&TotalCountersPromoted);
520   }
521 }
522 
523 /// Check if the module contains uses of any profiling intrinsics.
524 static bool containsProfilingIntrinsics(Module &M) {
525   if (auto *F = M.getFunction(
526           Intrinsic::getName(llvm::Intrinsic::instrprof_increment)))
527     if (!F->use_empty())
528       return true;
529   if (auto *F = M.getFunction(
530           Intrinsic::getName(llvm::Intrinsic::instrprof_increment_step)))
531     if (!F->use_empty())
532       return true;
533   if (auto *F = M.getFunction(
534           Intrinsic::getName(llvm::Intrinsic::instrprof_value_profile)))
535     if (!F->use_empty())
536       return true;
537   return false;
538 }
539 
540 bool InstrProfiling::run(
541     Module &M, std::function<const TargetLibraryInfo &(Function &F)> GetTLI) {
542   this->M = &M;
543   this->GetTLI = std::move(GetTLI);
544   NamesVar = nullptr;
545   NamesSize = 0;
546   ProfileDataMap.clear();
547   CompilerUsedVars.clear();
548   UsedVars.clear();
549   TT = Triple(M.getTargetTriple());
550 
551   // Emit the runtime hook even if no counters are present.
552   bool MadeChange = emitRuntimeHook();
553 
554   // Emit the bias variable in each module when counter relocation is enabled.
555   if (isRuntimeCounterRelocationEnabled())
556     MadeChange |= emitBiasVar();
557 
558   // Improve compile time by avoiding linear scans when there is no work.
559   GlobalVariable *CoverageNamesVar =
560       M.getNamedGlobal(getCoverageUnusedNamesVarName());
561   if (!containsProfilingIntrinsics(M) && !CoverageNamesVar)
562     return MadeChange;
563 
564   // We did not know how many value sites there would be inside
565   // the instrumented function. This is counting the number of instrumented
566   // target value sites to enter it as field in the profile data variable.
567   for (Function &F : M) {
568     InstrProfIncrementInst *FirstProfIncInst = nullptr;
569     for (BasicBlock &BB : F)
570       for (auto I = BB.begin(), E = BB.end(); I != E; I++)
571         if (auto *Ind = dyn_cast<InstrProfValueProfileInst>(I))
572           computeNumValueSiteCounts(Ind);
573         else if (FirstProfIncInst == nullptr)
574           FirstProfIncInst = dyn_cast<InstrProfIncrementInst>(I);
575 
576     // Value profiling intrinsic lowering requires per-function profile data
577     // variable to be created first.
578     if (FirstProfIncInst != nullptr)
579       static_cast<void>(getOrCreateRegionCounters(FirstProfIncInst));
580   }
581 
582   for (Function &F : M)
583     MadeChange |= lowerIntrinsics(&F);
584 
585   if (CoverageNamesVar) {
586     lowerCoverageData(CoverageNamesVar);
587     MadeChange = true;
588   }
589 
590   if (!MadeChange)
591     return false;
592 
593   emitVNodes();
594   emitNameData();
595   emitRegistration();
596   emitUses();
597   emitInitialization();
598   return true;
599 }
600 
601 static FunctionCallee getOrInsertValueProfilingCall(
602     Module &M, const TargetLibraryInfo &TLI,
603     ValueProfilingCallType CallType = ValueProfilingCallType::Default) {
604   LLVMContext &Ctx = M.getContext();
605   auto *ReturnTy = Type::getVoidTy(M.getContext());
606 
607   AttributeList AL;
608   if (auto AK = TLI.getExtAttrForI32Param(false))
609     AL = AL.addParamAttribute(M.getContext(), 2, AK);
610 
611   assert((CallType == ValueProfilingCallType::Default ||
612           CallType == ValueProfilingCallType::MemOp) &&
613          "Must be Default or MemOp");
614   Type *ParamTypes[] = {
615 #define VALUE_PROF_FUNC_PARAM(ParamType, ParamName, ParamLLVMType) ParamLLVMType
616 #include "llvm/ProfileData/InstrProfData.inc"
617   };
618   auto *ValueProfilingCallTy =
619       FunctionType::get(ReturnTy, makeArrayRef(ParamTypes), false);
620   StringRef FuncName = CallType == ValueProfilingCallType::Default
621                            ? getInstrProfValueProfFuncName()
622                            : getInstrProfValueProfMemOpFuncName();
623   return M.getOrInsertFunction(FuncName, ValueProfilingCallTy, AL);
624 }
625 
626 void InstrProfiling::computeNumValueSiteCounts(InstrProfValueProfileInst *Ind) {
627   GlobalVariable *Name = Ind->getName();
628   uint64_t ValueKind = Ind->getValueKind()->getZExtValue();
629   uint64_t Index = Ind->getIndex()->getZExtValue();
630   auto It = ProfileDataMap.find(Name);
631   if (It == ProfileDataMap.end()) {
632     PerFunctionProfileData PD;
633     PD.NumValueSites[ValueKind] = Index + 1;
634     ProfileDataMap[Name] = PD;
635   } else if (It->second.NumValueSites[ValueKind] <= Index)
636     It->second.NumValueSites[ValueKind] = Index + 1;
637 }
638 
639 void InstrProfiling::lowerValueProfileInst(InstrProfValueProfileInst *Ind) {
640   GlobalVariable *Name = Ind->getName();
641   auto It = ProfileDataMap.find(Name);
642   assert(It != ProfileDataMap.end() && It->second.DataVar &&
643          "value profiling detected in function with no counter incerement");
644 
645   GlobalVariable *DataVar = It->second.DataVar;
646   uint64_t ValueKind = Ind->getValueKind()->getZExtValue();
647   uint64_t Index = Ind->getIndex()->getZExtValue();
648   for (uint32_t Kind = IPVK_First; Kind < ValueKind; ++Kind)
649     Index += It->second.NumValueSites[Kind];
650 
651   IRBuilder<> Builder(Ind);
652   bool IsMemOpSize = (Ind->getValueKind()->getZExtValue() ==
653                       llvm::InstrProfValueKind::IPVK_MemOPSize);
654   CallInst *Call = nullptr;
655   auto *TLI = &GetTLI(*Ind->getFunction());
656 
657   // To support value profiling calls within Windows exception handlers, funclet
658   // information contained within operand bundles needs to be copied over to
659   // the library call. This is required for the IR to be processed by the
660   // WinEHPrepare pass.
661   SmallVector<OperandBundleDef, 1> OpBundles;
662   Ind->getOperandBundlesAsDefs(OpBundles);
663   if (!IsMemOpSize) {
664     Value *Args[3] = {Ind->getTargetValue(),
665                       Builder.CreateBitCast(DataVar, Builder.getInt8PtrTy()),
666                       Builder.getInt32(Index)};
667     Call = Builder.CreateCall(getOrInsertValueProfilingCall(*M, *TLI), Args,
668                               OpBundles);
669   } else {
670     Value *Args[3] = {Ind->getTargetValue(),
671                       Builder.CreateBitCast(DataVar, Builder.getInt8PtrTy()),
672                       Builder.getInt32(Index)};
673     Call = Builder.CreateCall(
674         getOrInsertValueProfilingCall(*M, *TLI, ValueProfilingCallType::MemOp),
675         Args, OpBundles);
676   }
677   if (auto AK = TLI->getExtAttrForI32Param(false))
678     Call->addParamAttr(2, AK);
679   Ind->replaceAllUsesWith(Call);
680   Ind->eraseFromParent();
681 }
682 
683 void InstrProfiling::lowerIncrement(InstrProfIncrementInst *Inc) {
684   GlobalVariable *Counters = getOrCreateRegionCounters(Inc);
685 
686   IRBuilder<> Builder(Inc);
687   uint64_t Index = Inc->getIndex()->getZExtValue();
688   Value *Addr = Builder.CreateConstInBoundsGEP2_64(Counters->getValueType(),
689                                                    Counters, 0, Index);
690 
691   if (isRuntimeCounterRelocationEnabled()) {
692     Type *Int64Ty = Type::getInt64Ty(M->getContext());
693     Type *Int64PtrTy = Type::getInt64PtrTy(M->getContext());
694     Function *Fn = Inc->getParent()->getParent();
695     Instruction &I = Fn->getEntryBlock().front();
696     LoadInst *LI = dyn_cast<LoadInst>(&I);
697     if (!LI) {
698       IRBuilder<> Builder(&I);
699       GlobalVariable *Bias = M->getGlobalVariable(getInstrProfCounterBiasVarName());
700       LI = Builder.CreateLoad(Int64Ty, Bias);
701     }
702     auto *Add = Builder.CreateAdd(Builder.CreatePtrToInt(Addr, Int64Ty), LI);
703     Addr = Builder.CreateIntToPtr(Add, Int64PtrTy);
704   }
705 
706   if (Options.Atomic || AtomicCounterUpdateAll ||
707       (Index == 0 && AtomicFirstCounter)) {
708     Builder.CreateAtomicRMW(AtomicRMWInst::Add, Addr, Inc->getStep(),
709                             MaybeAlign(), AtomicOrdering::Monotonic);
710   } else {
711     Value *IncStep = Inc->getStep();
712     Value *Load = Builder.CreateLoad(IncStep->getType(), Addr, "pgocount");
713     auto *Count = Builder.CreateAdd(Load, Inc->getStep());
714     auto *Store = Builder.CreateStore(Count, Addr);
715     if (isCounterPromotionEnabled())
716       PromotionCandidates.emplace_back(cast<Instruction>(Load), Store);
717   }
718   Inc->eraseFromParent();
719 }
720 
721 void InstrProfiling::lowerCoverageData(GlobalVariable *CoverageNamesVar) {
722   ConstantArray *Names =
723       cast<ConstantArray>(CoverageNamesVar->getInitializer());
724   for (unsigned I = 0, E = Names->getNumOperands(); I < E; ++I) {
725     Constant *NC = Names->getOperand(I);
726     Value *V = NC->stripPointerCasts();
727     assert(isa<GlobalVariable>(V) && "Missing reference to function name");
728     GlobalVariable *Name = cast<GlobalVariable>(V);
729 
730     Name->setLinkage(GlobalValue::PrivateLinkage);
731     ReferencedNames.push_back(Name);
732     NC->dropAllReferences();
733   }
734   CoverageNamesVar->eraseFromParent();
735 }
736 
737 /// Get the name of a profiling variable for a particular function.
738 static std::string getVarName(InstrProfIncrementInst *Inc, StringRef Prefix) {
739   StringRef NamePrefix = getInstrProfNameVarPrefix();
740   StringRef Name = Inc->getName()->getName().substr(NamePrefix.size());
741   Function *F = Inc->getParent()->getParent();
742   Module *M = F->getParent();
743   if (!DoHashBasedCounterSplit || !isIRPGOFlagSet(M) ||
744       !canRenameComdatFunc(*F))
745     return (Prefix + Name).str();
746   uint64_t FuncHash = Inc->getHash()->getZExtValue();
747   SmallVector<char, 24> HashPostfix;
748   if (Name.endswith((Twine(".") + Twine(FuncHash)).toStringRef(HashPostfix)))
749     return (Prefix + Name).str();
750   return (Prefix + Name + "." + Twine(FuncHash)).str();
751 }
752 
753 static uint64_t getIntModuleFlagOrZero(const Module &M, StringRef Flag) {
754   auto *MD = dyn_cast_or_null<ConstantAsMetadata>(M.getModuleFlag(Flag));
755   if (!MD)
756     return 0;
757 
758   // If the flag is a ConstantAsMetadata, it should be an integer representable
759   // in 64-bits.
760   return cast<ConstantInt>(MD->getValue())->getZExtValue();
761 }
762 
763 static bool enablesValueProfiling(const Module &M) {
764   return isIRPGOFlagSet(&M) ||
765          getIntModuleFlagOrZero(M, "EnableValueProfiling") != 0;
766 }
767 
768 // Conservatively returns true if data variables may be referenced by code.
769 static bool profDataReferencedByCode(const Module &M) {
770   return enablesValueProfiling(M);
771 }
772 
773 static inline bool shouldRecordFunctionAddr(Function *F) {
774   // Only record function addresses if IR PGO is enabled or if clang value
775   // profiling is enabled. Recording function addresses greatly increases object
776   // file size, because it prevents the inliner from deleting functions that
777   // have been inlined everywhere.
778   if (!profDataReferencedByCode(*F->getParent()))
779     return false;
780 
781   // Check the linkage
782   bool HasAvailableExternallyLinkage = F->hasAvailableExternallyLinkage();
783   if (!F->hasLinkOnceLinkage() && !F->hasLocalLinkage() &&
784       !HasAvailableExternallyLinkage)
785     return true;
786 
787   // A function marked 'alwaysinline' with available_externally linkage can't
788   // have its address taken. Doing so would create an undefined external ref to
789   // the function, which would fail to link.
790   if (HasAvailableExternallyLinkage &&
791       F->hasFnAttribute(Attribute::AlwaysInline))
792     return false;
793 
794   // Prohibit function address recording if the function is both internal and
795   // COMDAT. This avoids the profile data variable referencing internal symbols
796   // in COMDAT.
797   if (F->hasLocalLinkage() && F->hasComdat())
798     return false;
799 
800   // Check uses of this function for other than direct calls or invokes to it.
801   // Inline virtual functions have linkeOnceODR linkage. When a key method
802   // exists, the vtable will only be emitted in the TU where the key method
803   // is defined. In a TU where vtable is not available, the function won't
804   // be 'addresstaken'. If its address is not recorded here, the profile data
805   // with missing address may be picked by the linker leading  to missing
806   // indirect call target info.
807   return F->hasAddressTaken() || F->hasLinkOnceLinkage();
808 }
809 
810 static bool needsRuntimeRegistrationOfSectionRange(const Triple &TT) {
811   // Don't do this for Darwin.  compiler-rt uses linker magic.
812   if (TT.isOSDarwin())
813     return false;
814   // Use linker script magic to get data/cnts/name start/end.
815   if (TT.isOSLinux() || TT.isOSFreeBSD() || TT.isOSNetBSD() ||
816       TT.isOSSolaris() || TT.isOSFuchsia() || TT.isPS4CPU() ||
817       TT.isOSWindows())
818     return false;
819 
820   return true;
821 }
822 
823 GlobalVariable *
824 InstrProfiling::getOrCreateRegionCounters(InstrProfIncrementInst *Inc) {
825   GlobalVariable *NamePtr = Inc->getName();
826   auto It = ProfileDataMap.find(NamePtr);
827   PerFunctionProfileData PD;
828   if (It != ProfileDataMap.end()) {
829     if (It->second.RegionCounters)
830       return It->second.RegionCounters;
831     PD = It->second;
832   }
833 
834   // Match the linkage and visibility of the name global.
835   Function *Fn = Inc->getParent()->getParent();
836   GlobalValue::LinkageTypes Linkage = NamePtr->getLinkage();
837   GlobalValue::VisibilityTypes Visibility = NamePtr->getVisibility();
838 
839   // Move the name variable to the right section. Place them in a COMDAT group
840   // if the associated function is a COMDAT. This will make sure that only one
841   // copy of counters of the COMDAT function will be emitted after linking. Keep
842   // in mind that this pass may run before the inliner, so we need to create a
843   // new comdat group for the counters and profiling data. If we use the comdat
844   // of the parent function, that will result in relocations against discarded
845   // sections.
846   //
847   // If the data variable is referenced by code,  counters and data have to be
848   // in different comdats for COFF because the Visual C++ linker will report
849   // duplicate symbol errors if there are multiple external symbols with the
850   // same name marked IMAGE_COMDAT_SELECT_ASSOCIATIVE.
851   //
852   // For ELF, when not using COMDAT, put counters, data and values into a
853   // nodeduplicate COMDAT which is lowered to a zero-flag section group. This
854   // allows -z start-stop-gc to discard the entire group when the function is
855   // discarded.
856   bool DataReferencedByCode = profDataReferencedByCode(*M);
857   bool NeedComdat = needsComdatForCounter(*Fn, *M);
858   std::string CntsVarName = getVarName(Inc, getInstrProfCountersVarPrefix());
859   std::string DataVarName = getVarName(Inc, getInstrProfDataVarPrefix());
860   auto MaybeSetComdat = [&](GlobalVariable *GV) {
861     bool UseComdat = (NeedComdat || TT.isOSBinFormatELF());
862     if (UseComdat) {
863       StringRef GroupName = TT.isOSBinFormatCOFF() && DataReferencedByCode
864                                 ? GV->getName()
865                                 : CntsVarName;
866       Comdat *C = M->getOrInsertComdat(GroupName);
867       if (!NeedComdat)
868         C->setSelectionKind(Comdat::NoDeduplicate);
869       GV->setComdat(C);
870     }
871   };
872 
873   uint64_t NumCounters = Inc->getNumCounters()->getZExtValue();
874   LLVMContext &Ctx = M->getContext();
875   ArrayType *CounterTy = ArrayType::get(Type::getInt64Ty(Ctx), NumCounters);
876 
877   // Create the counters variable.
878   auto *CounterPtr =
879       new GlobalVariable(*M, CounterTy, false, Linkage,
880                          Constant::getNullValue(CounterTy), CntsVarName);
881   CounterPtr->setVisibility(Visibility);
882   CounterPtr->setSection(
883       getInstrProfSectionName(IPSK_cnts, TT.getObjectFormat()));
884   CounterPtr->setAlignment(Align(8));
885   MaybeSetComdat(CounterPtr);
886   CounterPtr->setLinkage(Linkage);
887 
888   auto *Int8PtrTy = Type::getInt8PtrTy(Ctx);
889   // Allocate statically the array of pointers to value profile nodes for
890   // the current function.
891   Constant *ValuesPtrExpr = ConstantPointerNull::get(Int8PtrTy);
892   uint64_t NS = 0;
893   for (uint32_t Kind = IPVK_First; Kind <= IPVK_Last; ++Kind)
894     NS += PD.NumValueSites[Kind];
895   if (NS > 0 && ValueProfileStaticAlloc &&
896       !needsRuntimeRegistrationOfSectionRange(TT)) {
897     ArrayType *ValuesTy = ArrayType::get(Type::getInt64Ty(Ctx), NS);
898     auto *ValuesVar = new GlobalVariable(
899         *M, ValuesTy, false, Linkage, Constant::getNullValue(ValuesTy),
900         getVarName(Inc, getInstrProfValuesVarPrefix()));
901     ValuesVar->setVisibility(Visibility);
902     ValuesVar->setSection(
903         getInstrProfSectionName(IPSK_vals, TT.getObjectFormat()));
904     ValuesVar->setAlignment(Align(8));
905     MaybeSetComdat(ValuesVar);
906     ValuesPtrExpr =
907         ConstantExpr::getBitCast(ValuesVar, Type::getInt8PtrTy(Ctx));
908   }
909 
910   // Create data variable.
911   auto *IntPtrTy = M->getDataLayout().getIntPtrType(M->getContext());
912   auto *Int16Ty = Type::getInt16Ty(Ctx);
913   auto *Int16ArrayTy = ArrayType::get(Int16Ty, IPVK_Last + 1);
914   Type *DataTypes[] = {
915 #define INSTR_PROF_DATA(Type, LLVMType, Name, Init) LLVMType,
916 #include "llvm/ProfileData/InstrProfData.inc"
917   };
918   auto *DataTy = StructType::get(Ctx, makeArrayRef(DataTypes));
919 
920   Constant *FunctionAddr = shouldRecordFunctionAddr(Fn)
921                                ? ConstantExpr::getBitCast(Fn, Int8PtrTy)
922                                : ConstantPointerNull::get(Int8PtrTy);
923 
924   Constant *Int16ArrayVals[IPVK_Last + 1];
925   for (uint32_t Kind = IPVK_First; Kind <= IPVK_Last; ++Kind)
926     Int16ArrayVals[Kind] = ConstantInt::get(Int16Ty, PD.NumValueSites[Kind]);
927 
928   // If the data variable is not referenced by code (if we don't emit
929   // @llvm.instrprof.value.profile, NS will be 0), and the counter keeps the
930   // data variable live under linker GC, the data variable can be private. This
931   // optimization applies to ELF.
932   //
933   // On COFF, a comdat leader cannot be local so we require DataReferencedByCode
934   // to be false.
935   if (NS == 0 && (TT.isOSBinFormatELF() ||
936                   (!DataReferencedByCode && TT.isOSBinFormatCOFF()))) {
937     Linkage = GlobalValue::PrivateLinkage;
938     Visibility = GlobalValue::DefaultVisibility;
939   }
940   auto *Data =
941       new GlobalVariable(*M, DataTy, false, Linkage, nullptr, DataVarName);
942   // Reference the counter variable with a label difference (link-time
943   // constant).
944   auto *RelativeCounterPtr =
945       ConstantExpr::getSub(ConstantExpr::getPtrToInt(CounterPtr, IntPtrTy),
946                            ConstantExpr::getPtrToInt(Data, IntPtrTy));
947 
948   Constant *DataVals[] = {
949 #define INSTR_PROF_DATA(Type, LLVMType, Name, Init) Init,
950 #include "llvm/ProfileData/InstrProfData.inc"
951   };
952   Data->setInitializer(ConstantStruct::get(DataTy, DataVals));
953 
954   Data->setVisibility(Visibility);
955   Data->setSection(getInstrProfSectionName(IPSK_data, TT.getObjectFormat()));
956   Data->setAlignment(Align(INSTR_PROF_DATA_ALIGNMENT));
957   MaybeSetComdat(Data);
958   Data->setLinkage(Linkage);
959 
960   PD.RegionCounters = CounterPtr;
961   PD.DataVar = Data;
962   ProfileDataMap[NamePtr] = PD;
963 
964   // Mark the data variable as used so that it isn't stripped out.
965   CompilerUsedVars.push_back(Data);
966   // Now that the linkage set by the FE has been passed to the data and counter
967   // variables, reset Name variable's linkage and visibility to private so that
968   // it can be removed later by the compiler.
969   NamePtr->setLinkage(GlobalValue::PrivateLinkage);
970   // Collect the referenced names to be used by emitNameData.
971   ReferencedNames.push_back(NamePtr);
972 
973   return CounterPtr;
974 }
975 
976 void InstrProfiling::emitVNodes() {
977   if (!ValueProfileStaticAlloc)
978     return;
979 
980   // For now only support this on platforms that do
981   // not require runtime registration to discover
982   // named section start/end.
983   if (needsRuntimeRegistrationOfSectionRange(TT))
984     return;
985 
986   size_t TotalNS = 0;
987   for (auto &PD : ProfileDataMap) {
988     for (uint32_t Kind = IPVK_First; Kind <= IPVK_Last; ++Kind)
989       TotalNS += PD.second.NumValueSites[Kind];
990   }
991 
992   if (!TotalNS)
993     return;
994 
995   uint64_t NumCounters = TotalNS * NumCountersPerValueSite;
996 // Heuristic for small programs with very few total value sites.
997 // The default value of vp-counters-per-site is chosen based on
998 // the observation that large apps usually have a low percentage
999 // of value sites that actually have any profile data, and thus
1000 // the average number of counters per site is low. For small
1001 // apps with very few sites, this may not be true. Bump up the
1002 // number of counters in this case.
1003 #define INSTR_PROF_MIN_VAL_COUNTS 10
1004   if (NumCounters < INSTR_PROF_MIN_VAL_COUNTS)
1005     NumCounters = std::max(INSTR_PROF_MIN_VAL_COUNTS, (int)NumCounters * 2);
1006 
1007   auto &Ctx = M->getContext();
1008   Type *VNodeTypes[] = {
1009 #define INSTR_PROF_VALUE_NODE(Type, LLVMType, Name, Init) LLVMType,
1010 #include "llvm/ProfileData/InstrProfData.inc"
1011   };
1012   auto *VNodeTy = StructType::get(Ctx, makeArrayRef(VNodeTypes));
1013 
1014   ArrayType *VNodesTy = ArrayType::get(VNodeTy, NumCounters);
1015   auto *VNodesVar = new GlobalVariable(
1016       *M, VNodesTy, false, GlobalValue::PrivateLinkage,
1017       Constant::getNullValue(VNodesTy), getInstrProfVNodesVarName());
1018   VNodesVar->setSection(
1019       getInstrProfSectionName(IPSK_vnodes, TT.getObjectFormat()));
1020   // VNodesVar is used by runtime but not referenced via relocation by other
1021   // sections. Conservatively make it linker retained.
1022   UsedVars.push_back(VNodesVar);
1023 }
1024 
1025 void InstrProfiling::emitNameData() {
1026   std::string UncompressedData;
1027 
1028   if (ReferencedNames.empty())
1029     return;
1030 
1031   std::string CompressedNameStr;
1032   if (Error E = collectPGOFuncNameStrings(ReferencedNames, CompressedNameStr,
1033                                           DoInstrProfNameCompression)) {
1034     report_fatal_error(toString(std::move(E)), false);
1035   }
1036 
1037   auto &Ctx = M->getContext();
1038   auto *NamesVal = ConstantDataArray::getString(
1039       Ctx, StringRef(CompressedNameStr), false);
1040   NamesVar = new GlobalVariable(*M, NamesVal->getType(), true,
1041                                 GlobalValue::PrivateLinkage, NamesVal,
1042                                 getInstrProfNamesVarName());
1043   NamesSize = CompressedNameStr.size();
1044   NamesVar->setSection(
1045       getInstrProfSectionName(IPSK_name, TT.getObjectFormat()));
1046   // On COFF, it's important to reduce the alignment down to 1 to prevent the
1047   // linker from inserting padding before the start of the names section or
1048   // between names entries.
1049   NamesVar->setAlignment(Align(1));
1050   // NamesVar is used by runtime but not referenced via relocation by other
1051   // sections. Conservatively make it linker retained.
1052   UsedVars.push_back(NamesVar);
1053 
1054   for (auto *NamePtr : ReferencedNames)
1055     NamePtr->eraseFromParent();
1056 }
1057 
1058 void InstrProfiling::emitRegistration() {
1059   if (!needsRuntimeRegistrationOfSectionRange(TT))
1060     return;
1061 
1062   // Construct the function.
1063   auto *VoidTy = Type::getVoidTy(M->getContext());
1064   auto *VoidPtrTy = Type::getInt8PtrTy(M->getContext());
1065   auto *Int64Ty = Type::getInt64Ty(M->getContext());
1066   auto *RegisterFTy = FunctionType::get(VoidTy, false);
1067   auto *RegisterF = Function::Create(RegisterFTy, GlobalValue::InternalLinkage,
1068                                      getInstrProfRegFuncsName(), M);
1069   RegisterF->setUnnamedAddr(GlobalValue::UnnamedAddr::Global);
1070   if (Options.NoRedZone)
1071     RegisterF->addFnAttr(Attribute::NoRedZone);
1072 
1073   auto *RuntimeRegisterTy = FunctionType::get(VoidTy, VoidPtrTy, false);
1074   auto *RuntimeRegisterF =
1075       Function::Create(RuntimeRegisterTy, GlobalVariable::ExternalLinkage,
1076                        getInstrProfRegFuncName(), M);
1077 
1078   IRBuilder<> IRB(BasicBlock::Create(M->getContext(), "", RegisterF));
1079   for (Value *Data : CompilerUsedVars)
1080     if (!isa<Function>(Data))
1081       IRB.CreateCall(RuntimeRegisterF, IRB.CreateBitCast(Data, VoidPtrTy));
1082   for (Value *Data : UsedVars)
1083     if (Data != NamesVar && !isa<Function>(Data))
1084       IRB.CreateCall(RuntimeRegisterF, IRB.CreateBitCast(Data, VoidPtrTy));
1085 
1086   if (NamesVar) {
1087     Type *ParamTypes[] = {VoidPtrTy, Int64Ty};
1088     auto *NamesRegisterTy =
1089         FunctionType::get(VoidTy, makeArrayRef(ParamTypes), false);
1090     auto *NamesRegisterF =
1091         Function::Create(NamesRegisterTy, GlobalVariable::ExternalLinkage,
1092                          getInstrProfNamesRegFuncName(), M);
1093     IRB.CreateCall(NamesRegisterF, {IRB.CreateBitCast(NamesVar, VoidPtrTy),
1094                                     IRB.getInt64(NamesSize)});
1095   }
1096 
1097   IRB.CreateRetVoid();
1098 }
1099 
1100 bool InstrProfiling::emitRuntimeHook() {
1101   // We expect the linker to be invoked with -u<hook_var> flag for Linux or
1102   // Fuchsia, in which case there is no need to emit the user function.
1103   if (TT.isOSLinux() || TT.isOSFuchsia())
1104     return false;
1105 
1106   // If the module's provided its own runtime, we don't need to do anything.
1107   if (M->getGlobalVariable(getInstrProfRuntimeHookVarName()))
1108     return false;
1109 
1110   // Declare an external variable that will pull in the runtime initialization.
1111   auto *Int32Ty = Type::getInt32Ty(M->getContext());
1112   auto *Var =
1113       new GlobalVariable(*M, Int32Ty, false, GlobalValue::ExternalLinkage,
1114                          nullptr, getInstrProfRuntimeHookVarName());
1115 
1116   // Make a function that uses it.
1117   auto *User = Function::Create(FunctionType::get(Int32Ty, false),
1118                                 GlobalValue::LinkOnceODRLinkage,
1119                                 getInstrProfRuntimeHookVarUseFuncName(), M);
1120   User->addFnAttr(Attribute::NoInline);
1121   if (Options.NoRedZone)
1122     User->addFnAttr(Attribute::NoRedZone);
1123   User->setVisibility(GlobalValue::HiddenVisibility);
1124   if (TT.supportsCOMDAT())
1125     User->setComdat(M->getOrInsertComdat(User->getName()));
1126 
1127   IRBuilder<> IRB(BasicBlock::Create(M->getContext(), "", User));
1128   auto *Load = IRB.CreateLoad(Int32Ty, Var);
1129   IRB.CreateRet(Load);
1130 
1131   // Mark the user variable as used so that it isn't stripped out.
1132   CompilerUsedVars.push_back(User);
1133   return true;
1134 }
1135 
1136 void InstrProfiling::emitUses() {
1137   // The metadata sections are parallel arrays. Optimizers (e.g.
1138   // GlobalOpt/ConstantMerge) may not discard associated sections as a unit, so
1139   // we conservatively retain all unconditionally in the compiler.
1140   //
1141   // On ELF, the linker can guarantee the associated sections will be retained
1142   // or discarded as a unit, so llvm.compiler.used is sufficient. Similarly on
1143   // COFF, if prof data is not referenced by code we use one comdat and ensure
1144   // this GC property as well. Otherwise, we have to conservatively make all of
1145   // the sections retained by the linker.
1146   if (TT.isOSBinFormatELF() ||
1147       (TT.isOSBinFormatCOFF() && !profDataReferencedByCode(*M)))
1148     appendToCompilerUsed(*M, CompilerUsedVars);
1149   else
1150     appendToUsed(*M, CompilerUsedVars);
1151 
1152   // We do not add proper references from used metadata sections to NamesVar and
1153   // VNodesVar, so we have to be conservative and place them in llvm.used
1154   // regardless of the target,
1155   appendToUsed(*M, UsedVars);
1156 }
1157 
1158 void InstrProfiling::emitInitialization() {
1159   // Create ProfileFileName variable. Don't don't this for the
1160   // context-sensitive instrumentation lowering: This lowering is after
1161   // LTO/ThinLTO linking. Pass PGOInstrumentationGenCreateVar should
1162   // have already create the variable before LTO/ThinLTO linking.
1163   if (!IsCS)
1164     createProfileFileNameVar(*M, Options.InstrProfileOutput);
1165   Function *RegisterF = M->getFunction(getInstrProfRegFuncsName());
1166   if (!RegisterF)
1167     return;
1168 
1169   // Create the initialization function.
1170   auto *VoidTy = Type::getVoidTy(M->getContext());
1171   auto *F = Function::Create(FunctionType::get(VoidTy, false),
1172                              GlobalValue::InternalLinkage,
1173                              getInstrProfInitFuncName(), M);
1174   F->setUnnamedAddr(GlobalValue::UnnamedAddr::Global);
1175   F->addFnAttr(Attribute::NoInline);
1176   if (Options.NoRedZone)
1177     F->addFnAttr(Attribute::NoRedZone);
1178 
1179   // Add the basic block and the necessary calls.
1180   IRBuilder<> IRB(BasicBlock::Create(M->getContext(), "", F));
1181   IRB.CreateCall(RegisterF, {});
1182   IRB.CreateRetVoid();
1183 
1184   appendToGlobalCtors(*M, F, 0);
1185 }
1186 
1187 bool InstrProfiling::emitBiasVar() {
1188   // Module already provided its own variable, nothin to do.
1189   if (M->getGlobalVariable(getInstrProfCounterBiasVarName()))
1190     return false;
1191 
1192   // Compiler must define this variable when runtime counter relocation
1193   // is being used. Runtime has a weak external reference that is used
1194   // to check whether that's the case or not.
1195   Type *Int64Ty = Type::getInt64Ty(M->getContext());
1196   auto *Bias = new GlobalVariable(*M, Int64Ty, false, GlobalValue::LinkOnceODRLinkage,
1197                             Constant::getNullValue(Int64Ty),
1198                             getInstrProfCounterBiasVarName());
1199   Bias->setVisibility(GlobalVariable::HiddenVisibility);
1200   // A definition that's weak (linkonce_odr) without being in a COMDAT
1201   // section wouldn't lead to link errors, but it would lead to a dead
1202   // data word from every TU but one. Putting it in COMDAT ensures there
1203   // will be exactly one data slot in the link.
1204   if (TT.supportsCOMDAT())
1205     Bias->setComdat(M->getOrInsertComdat(Bias->getName()));
1206 
1207   return true;
1208 }
1209