1*0b57cec5SDimitry Andric //===-- InstrProfiling.cpp - Frontend instrumentation based profiling -----===//
2*0b57cec5SDimitry Andric //
3*0b57cec5SDimitry Andric // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
4*0b57cec5SDimitry Andric // See https://llvm.org/LICENSE.txt for license information.
5*0b57cec5SDimitry Andric // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
6*0b57cec5SDimitry Andric //
7*0b57cec5SDimitry Andric //===----------------------------------------------------------------------===//
8*0b57cec5SDimitry Andric //
9*0b57cec5SDimitry Andric // This pass lowers instrprof_* intrinsics emitted by a frontend for profiling.
10*0b57cec5SDimitry Andric // It also builds the data structures and initialization code needed for
11*0b57cec5SDimitry Andric // updating execution counts and emitting the profile at runtime.
12*0b57cec5SDimitry Andric //
13*0b57cec5SDimitry Andric //===----------------------------------------------------------------------===//
14*0b57cec5SDimitry Andric 
15*0b57cec5SDimitry Andric #include "llvm/Transforms/Instrumentation/InstrProfiling.h"
16*0b57cec5SDimitry Andric #include "llvm/ADT/ArrayRef.h"
17*0b57cec5SDimitry Andric #include "llvm/ADT/SmallVector.h"
18*0b57cec5SDimitry Andric #include "llvm/ADT/StringRef.h"
19*0b57cec5SDimitry Andric #include "llvm/ADT/Triple.h"
20*0b57cec5SDimitry Andric #include "llvm/ADT/Twine.h"
21*0b57cec5SDimitry Andric #include "llvm/Analysis/BlockFrequencyInfo.h"
22*0b57cec5SDimitry Andric #include "llvm/Analysis/BranchProbabilityInfo.h"
23*0b57cec5SDimitry Andric #include "llvm/Analysis/LoopInfo.h"
24*0b57cec5SDimitry Andric #include "llvm/Analysis/TargetLibraryInfo.h"
25*0b57cec5SDimitry Andric #include "llvm/IR/Attributes.h"
26*0b57cec5SDimitry Andric #include "llvm/IR/BasicBlock.h"
27*0b57cec5SDimitry Andric #include "llvm/IR/Constant.h"
28*0b57cec5SDimitry Andric #include "llvm/IR/Constants.h"
290eae32dcSDimitry Andric #include "llvm/IR/DIBuilder.h"
30*0b57cec5SDimitry Andric #include "llvm/IR/DerivedTypes.h"
310eae32dcSDimitry Andric #include "llvm/IR/DiagnosticInfo.h"
32*0b57cec5SDimitry Andric #include "llvm/IR/Dominators.h"
33*0b57cec5SDimitry Andric #include "llvm/IR/Function.h"
34*0b57cec5SDimitry Andric #include "llvm/IR/GlobalValue.h"
35*0b57cec5SDimitry Andric #include "llvm/IR/GlobalVariable.h"
36*0b57cec5SDimitry Andric #include "llvm/IR/IRBuilder.h"
37*0b57cec5SDimitry Andric #include "llvm/IR/Instruction.h"
38*0b57cec5SDimitry Andric #include "llvm/IR/Instructions.h"
39*0b57cec5SDimitry Andric #include "llvm/IR/IntrinsicInst.h"
40*0b57cec5SDimitry Andric #include "llvm/IR/Module.h"
41*0b57cec5SDimitry Andric #include "llvm/IR/Type.h"
42480093f4SDimitry Andric #include "llvm/InitializePasses.h"
43*0b57cec5SDimitry Andric #include "llvm/Pass.h"
44*0b57cec5SDimitry Andric #include "llvm/ProfileData/InstrProf.h"
450eae32dcSDimitry Andric #include "llvm/ProfileData/InstrProfCorrelator.h"
46*0b57cec5SDimitry Andric #include "llvm/Support/Casting.h"
47*0b57cec5SDimitry Andric #include "llvm/Support/CommandLine.h"
48*0b57cec5SDimitry Andric #include "llvm/Support/Error.h"
49*0b57cec5SDimitry Andric #include "llvm/Support/ErrorHandling.h"
50*0b57cec5SDimitry Andric #include "llvm/Transforms/Utils/BasicBlockUtils.h"
51*0b57cec5SDimitry Andric #include "llvm/Transforms/Utils/ModuleUtils.h"
52*0b57cec5SDimitry Andric #include "llvm/Transforms/Utils/SSAUpdater.h"
53*0b57cec5SDimitry Andric #include <algorithm>
54*0b57cec5SDimitry Andric #include <cassert>
55*0b57cec5SDimitry Andric #include <cstddef>
56*0b57cec5SDimitry Andric #include <cstdint>
57*0b57cec5SDimitry Andric #include <string>
58*0b57cec5SDimitry Andric 
59*0b57cec5SDimitry Andric using namespace llvm;
60*0b57cec5SDimitry Andric 
61*0b57cec5SDimitry Andric #define DEBUG_TYPE "instrprof"
62*0b57cec5SDimitry Andric 
630eae32dcSDimitry Andric namespace llvm {
640eae32dcSDimitry Andric cl::opt<bool>
650eae32dcSDimitry Andric     DebugInfoCorrelate("debug-info-correlate", cl::ZeroOrMore,
660eae32dcSDimitry Andric                        cl::desc("Use debug info to correlate profiles."),
670eae32dcSDimitry Andric                        cl::init(false));
680eae32dcSDimitry Andric } // namespace llvm
690eae32dcSDimitry Andric 
70*0b57cec5SDimitry Andric namespace {
71*0b57cec5SDimitry Andric 
72*0b57cec5SDimitry Andric cl::opt<bool> DoHashBasedCounterSplit(
73*0b57cec5SDimitry Andric     "hash-based-counter-split",
74*0b57cec5SDimitry Andric     cl::desc("Rename counter variable of a comdat function based on cfg hash"),
75*0b57cec5SDimitry Andric     cl::init(true));
76*0b57cec5SDimitry Andric 
774824e7fdSDimitry Andric cl::opt<bool>
784824e7fdSDimitry Andric     RuntimeCounterRelocation("runtime-counter-relocation",
795ffd83dbSDimitry Andric                              cl::desc("Enable relocating counters at runtime."),
805ffd83dbSDimitry Andric                              cl::init(false));
815ffd83dbSDimitry Andric 
82*0b57cec5SDimitry Andric cl::opt<bool> ValueProfileStaticAlloc(
83*0b57cec5SDimitry Andric     "vp-static-alloc",
84*0b57cec5SDimitry Andric     cl::desc("Do static counter allocation for value profiler"),
85*0b57cec5SDimitry Andric     cl::init(true));
86*0b57cec5SDimitry Andric 
87*0b57cec5SDimitry Andric cl::opt<double> NumCountersPerValueSite(
88*0b57cec5SDimitry Andric     "vp-counters-per-site",
89*0b57cec5SDimitry Andric     cl::desc("The average number of profile counters allocated "
90*0b57cec5SDimitry Andric              "per value profiling site."),
91*0b57cec5SDimitry Andric     // This is set to a very small value because in real programs, only
92*0b57cec5SDimitry Andric     // a very small percentage of value sites have non-zero targets, e.g, 1/30.
93*0b57cec5SDimitry Andric     // For those sites with non-zero profile, the average number of targets
94*0b57cec5SDimitry Andric     // is usually smaller than 2.
95*0b57cec5SDimitry Andric     cl::init(1.0));
96*0b57cec5SDimitry Andric 
97*0b57cec5SDimitry Andric cl::opt<bool> AtomicCounterUpdateAll(
98*0b57cec5SDimitry Andric     "instrprof-atomic-counter-update-all", cl::ZeroOrMore,
99*0b57cec5SDimitry Andric     cl::desc("Make all profile counter updates atomic (for testing only)"),
100*0b57cec5SDimitry Andric     cl::init(false));
101*0b57cec5SDimitry Andric 
102*0b57cec5SDimitry Andric cl::opt<bool> AtomicCounterUpdatePromoted(
103*0b57cec5SDimitry Andric     "atomic-counter-update-promoted", cl::ZeroOrMore,
104*0b57cec5SDimitry Andric     cl::desc("Do counter update using atomic fetch add "
105*0b57cec5SDimitry Andric              " for promoted counters only"),
106*0b57cec5SDimitry Andric     cl::init(false));
107*0b57cec5SDimitry Andric 
1085ffd83dbSDimitry Andric cl::opt<bool> AtomicFirstCounter(
1095ffd83dbSDimitry Andric     "atomic-first-counter", cl::ZeroOrMore,
1105ffd83dbSDimitry Andric     cl::desc("Use atomic fetch add for first counter in a function (usually "
1115ffd83dbSDimitry Andric              "the entry counter)"),
1125ffd83dbSDimitry Andric     cl::init(false));
1135ffd83dbSDimitry Andric 
114*0b57cec5SDimitry Andric // If the option is not specified, the default behavior about whether
115*0b57cec5SDimitry Andric // counter promotion is done depends on how instrumentaiton lowering
116*0b57cec5SDimitry Andric // pipeline is setup, i.e., the default value of true of this option
117*0b57cec5SDimitry Andric // does not mean the promotion will be done by default. Explicitly
118*0b57cec5SDimitry Andric // setting this option can override the default behavior.
119*0b57cec5SDimitry Andric cl::opt<bool> DoCounterPromotion("do-counter-promotion", cl::ZeroOrMore,
120*0b57cec5SDimitry Andric                                  cl::desc("Do counter register promotion"),
121*0b57cec5SDimitry Andric                                  cl::init(false));
122*0b57cec5SDimitry Andric cl::opt<unsigned> MaxNumOfPromotionsPerLoop(
123*0b57cec5SDimitry Andric     cl::ZeroOrMore, "max-counter-promotions-per-loop", cl::init(20),
124*0b57cec5SDimitry Andric     cl::desc("Max number counter promotions per loop to avoid"
125*0b57cec5SDimitry Andric              " increasing register pressure too much"));
126*0b57cec5SDimitry Andric 
127*0b57cec5SDimitry Andric // A debug option
128*0b57cec5SDimitry Andric cl::opt<int>
129*0b57cec5SDimitry Andric     MaxNumOfPromotions(cl::ZeroOrMore, "max-counter-promotions", cl::init(-1),
130*0b57cec5SDimitry Andric                        cl::desc("Max number of allowed counter promotions"));
131*0b57cec5SDimitry Andric 
132*0b57cec5SDimitry Andric cl::opt<unsigned> SpeculativeCounterPromotionMaxExiting(
133*0b57cec5SDimitry Andric     cl::ZeroOrMore, "speculative-counter-promotion-max-exiting", cl::init(3),
134*0b57cec5SDimitry Andric     cl::desc("The max number of exiting blocks of a loop to allow "
135*0b57cec5SDimitry Andric              " speculative counter promotion"));
136*0b57cec5SDimitry Andric 
137*0b57cec5SDimitry Andric cl::opt<bool> SpeculativeCounterPromotionToLoop(
138*0b57cec5SDimitry Andric     cl::ZeroOrMore, "speculative-counter-promotion-to-loop", cl::init(false),
139*0b57cec5SDimitry Andric     cl::desc("When the option is false, if the target block is in a loop, "
140*0b57cec5SDimitry Andric              "the promotion will be disallowed unless the promoted counter "
141*0b57cec5SDimitry Andric              " update can be further/iteratively promoted into an acyclic "
142*0b57cec5SDimitry Andric              " region."));
143*0b57cec5SDimitry Andric 
144*0b57cec5SDimitry Andric cl::opt<bool> IterativeCounterPromotion(
145*0b57cec5SDimitry Andric     cl::ZeroOrMore, "iterative-counter-promotion", cl::init(true),
146*0b57cec5SDimitry Andric     cl::desc("Allow counter promotion across the whole loop nest."));
147*0b57cec5SDimitry Andric 
148e8d8bef9SDimitry Andric cl::opt<bool> SkipRetExitBlock(
149e8d8bef9SDimitry Andric     cl::ZeroOrMore, "skip-ret-exit-block", cl::init(true),
150e8d8bef9SDimitry Andric     cl::desc("Suppress counter promotion if exit blocks contain ret."));
151e8d8bef9SDimitry Andric 
152*0b57cec5SDimitry Andric class InstrProfilingLegacyPass : public ModulePass {
153*0b57cec5SDimitry Andric   InstrProfiling InstrProf;
154*0b57cec5SDimitry Andric 
155*0b57cec5SDimitry Andric public:
156*0b57cec5SDimitry Andric   static char ID;
157*0b57cec5SDimitry Andric 
158*0b57cec5SDimitry Andric   InstrProfilingLegacyPass() : ModulePass(ID) {}
159*0b57cec5SDimitry Andric   InstrProfilingLegacyPass(const InstrProfOptions &Options, bool IsCS = false)
1605ffd83dbSDimitry Andric       : ModulePass(ID), InstrProf(Options, IsCS) {
1615ffd83dbSDimitry Andric     initializeInstrProfilingLegacyPassPass(*PassRegistry::getPassRegistry());
1625ffd83dbSDimitry Andric   }
163*0b57cec5SDimitry Andric 
164*0b57cec5SDimitry Andric   StringRef getPassName() const override {
165*0b57cec5SDimitry Andric     return "Frontend instrumentation-based coverage lowering";
166*0b57cec5SDimitry Andric   }
167*0b57cec5SDimitry Andric 
168*0b57cec5SDimitry Andric   bool runOnModule(Module &M) override {
1698bcb0991SDimitry Andric     auto GetTLI = [this](Function &F) -> TargetLibraryInfo & {
1708bcb0991SDimitry Andric       return this->getAnalysis<TargetLibraryInfoWrapperPass>().getTLI(F);
1718bcb0991SDimitry Andric     };
1728bcb0991SDimitry Andric     return InstrProf.run(M, GetTLI);
173*0b57cec5SDimitry Andric   }
174*0b57cec5SDimitry Andric 
175*0b57cec5SDimitry Andric   void getAnalysisUsage(AnalysisUsage &AU) const override {
176*0b57cec5SDimitry Andric     AU.setPreservesCFG();
177*0b57cec5SDimitry Andric     AU.addRequired<TargetLibraryInfoWrapperPass>();
178*0b57cec5SDimitry Andric   }
179*0b57cec5SDimitry Andric };
180*0b57cec5SDimitry Andric 
181*0b57cec5SDimitry Andric ///
182*0b57cec5SDimitry Andric /// A helper class to promote one counter RMW operation in the loop
183*0b57cec5SDimitry Andric /// into register update.
184*0b57cec5SDimitry Andric ///
185*0b57cec5SDimitry Andric /// RWM update for the counter will be sinked out of the loop after
186*0b57cec5SDimitry Andric /// the transformation.
187*0b57cec5SDimitry Andric ///
188*0b57cec5SDimitry Andric class PGOCounterPromoterHelper : public LoadAndStorePromoter {
189*0b57cec5SDimitry Andric public:
190*0b57cec5SDimitry Andric   PGOCounterPromoterHelper(
191*0b57cec5SDimitry Andric       Instruction *L, Instruction *S, SSAUpdater &SSA, Value *Init,
192*0b57cec5SDimitry Andric       BasicBlock *PH, ArrayRef<BasicBlock *> ExitBlocks,
193*0b57cec5SDimitry Andric       ArrayRef<Instruction *> InsertPts,
194*0b57cec5SDimitry Andric       DenseMap<Loop *, SmallVector<LoadStorePair, 8>> &LoopToCands,
195*0b57cec5SDimitry Andric       LoopInfo &LI)
196*0b57cec5SDimitry Andric       : LoadAndStorePromoter({L, S}, SSA), Store(S), ExitBlocks(ExitBlocks),
197*0b57cec5SDimitry Andric         InsertPts(InsertPts), LoopToCandidates(LoopToCands), LI(LI) {
198*0b57cec5SDimitry Andric     assert(isa<LoadInst>(L));
199*0b57cec5SDimitry Andric     assert(isa<StoreInst>(S));
200*0b57cec5SDimitry Andric     SSA.AddAvailableValue(PH, Init);
201*0b57cec5SDimitry Andric   }
202*0b57cec5SDimitry Andric 
203*0b57cec5SDimitry Andric   void doExtraRewritesBeforeFinalDeletion() override {
204*0b57cec5SDimitry Andric     for (unsigned i = 0, e = ExitBlocks.size(); i != e; ++i) {
205*0b57cec5SDimitry Andric       BasicBlock *ExitBlock = ExitBlocks[i];
206*0b57cec5SDimitry Andric       Instruction *InsertPos = InsertPts[i];
207*0b57cec5SDimitry Andric       // Get LiveIn value into the ExitBlock. If there are multiple
208*0b57cec5SDimitry Andric       // predecessors, the value is defined by a PHI node in this
209*0b57cec5SDimitry Andric       // block.
210*0b57cec5SDimitry Andric       Value *LiveInValue = SSA.GetValueInMiddleOfBlock(ExitBlock);
211*0b57cec5SDimitry Andric       Value *Addr = cast<StoreInst>(Store)->getPointerOperand();
212*0b57cec5SDimitry Andric       Type *Ty = LiveInValue->getType();
213*0b57cec5SDimitry Andric       IRBuilder<> Builder(InsertPos);
214*0b57cec5SDimitry Andric       if (AtomicCounterUpdatePromoted)
215*0b57cec5SDimitry Andric         // automic update currently can only be promoted across the current
216*0b57cec5SDimitry Andric         // loop, not the whole loop nest.
217*0b57cec5SDimitry Andric         Builder.CreateAtomicRMW(AtomicRMWInst::Add, Addr, LiveInValue,
218fe6060f1SDimitry Andric                                 MaybeAlign(),
219*0b57cec5SDimitry Andric                                 AtomicOrdering::SequentiallyConsistent);
220*0b57cec5SDimitry Andric       else {
221*0b57cec5SDimitry Andric         LoadInst *OldVal = Builder.CreateLoad(Ty, Addr, "pgocount.promoted");
222*0b57cec5SDimitry Andric         auto *NewVal = Builder.CreateAdd(OldVal, LiveInValue);
223*0b57cec5SDimitry Andric         auto *NewStore = Builder.CreateStore(NewVal, Addr);
224*0b57cec5SDimitry Andric 
225*0b57cec5SDimitry Andric         // Now update the parent loop's candidate list:
226*0b57cec5SDimitry Andric         if (IterativeCounterPromotion) {
227*0b57cec5SDimitry Andric           auto *TargetLoop = LI.getLoopFor(ExitBlock);
228*0b57cec5SDimitry Andric           if (TargetLoop)
229*0b57cec5SDimitry Andric             LoopToCandidates[TargetLoop].emplace_back(OldVal, NewStore);
230*0b57cec5SDimitry Andric         }
231*0b57cec5SDimitry Andric       }
232*0b57cec5SDimitry Andric     }
233*0b57cec5SDimitry Andric   }
234*0b57cec5SDimitry Andric 
235*0b57cec5SDimitry Andric private:
236*0b57cec5SDimitry Andric   Instruction *Store;
237*0b57cec5SDimitry Andric   ArrayRef<BasicBlock *> ExitBlocks;
238*0b57cec5SDimitry Andric   ArrayRef<Instruction *> InsertPts;
239*0b57cec5SDimitry Andric   DenseMap<Loop *, SmallVector<LoadStorePair, 8>> &LoopToCandidates;
240*0b57cec5SDimitry Andric   LoopInfo &LI;
241*0b57cec5SDimitry Andric };
242*0b57cec5SDimitry Andric 
243*0b57cec5SDimitry Andric /// A helper class to do register promotion for all profile counter
244*0b57cec5SDimitry Andric /// updates in a loop.
245*0b57cec5SDimitry Andric ///
246*0b57cec5SDimitry Andric class PGOCounterPromoter {
247*0b57cec5SDimitry Andric public:
248*0b57cec5SDimitry Andric   PGOCounterPromoter(
249*0b57cec5SDimitry Andric       DenseMap<Loop *, SmallVector<LoadStorePair, 8>> &LoopToCands,
250*0b57cec5SDimitry Andric       Loop &CurLoop, LoopInfo &LI, BlockFrequencyInfo *BFI)
25104eeddc0SDimitry Andric       : LoopToCandidates(LoopToCands), L(CurLoop), LI(LI), BFI(BFI) {
252*0b57cec5SDimitry Andric 
2535ffd83dbSDimitry Andric     // Skip collection of ExitBlocks and InsertPts for loops that will not be
2545ffd83dbSDimitry Andric     // able to have counters promoted.
255*0b57cec5SDimitry Andric     SmallVector<BasicBlock *, 8> LoopExitBlocks;
256*0b57cec5SDimitry Andric     SmallPtrSet<BasicBlock *, 8> BlockSet;
2575ffd83dbSDimitry Andric 
258*0b57cec5SDimitry Andric     L.getExitBlocks(LoopExitBlocks);
2595ffd83dbSDimitry Andric     if (!isPromotionPossible(&L, LoopExitBlocks))
2605ffd83dbSDimitry Andric       return;
261*0b57cec5SDimitry Andric 
262*0b57cec5SDimitry Andric     for (BasicBlock *ExitBlock : LoopExitBlocks) {
263*0b57cec5SDimitry Andric       if (BlockSet.insert(ExitBlock).second) {
264*0b57cec5SDimitry Andric         ExitBlocks.push_back(ExitBlock);
265*0b57cec5SDimitry Andric         InsertPts.push_back(&*ExitBlock->getFirstInsertionPt());
266*0b57cec5SDimitry Andric       }
267*0b57cec5SDimitry Andric     }
268*0b57cec5SDimitry Andric   }
269*0b57cec5SDimitry Andric 
270*0b57cec5SDimitry Andric   bool run(int64_t *NumPromoted) {
271*0b57cec5SDimitry Andric     // Skip 'infinite' loops:
272*0b57cec5SDimitry Andric     if (ExitBlocks.size() == 0)
273*0b57cec5SDimitry Andric       return false;
274e8d8bef9SDimitry Andric 
275e8d8bef9SDimitry Andric     // Skip if any of the ExitBlocks contains a ret instruction.
276e8d8bef9SDimitry Andric     // This is to prevent dumping of incomplete profile -- if the
277e8d8bef9SDimitry Andric     // the loop is a long running loop and dump is called in the middle
278e8d8bef9SDimitry Andric     // of the loop, the result profile is incomplete.
279e8d8bef9SDimitry Andric     // FIXME: add other heuristics to detect long running loops.
280e8d8bef9SDimitry Andric     if (SkipRetExitBlock) {
281e8d8bef9SDimitry Andric       for (auto BB : ExitBlocks)
282e8d8bef9SDimitry Andric         if (isa<ReturnInst>(BB->getTerminator()))
283e8d8bef9SDimitry Andric           return false;
284e8d8bef9SDimitry Andric     }
285e8d8bef9SDimitry Andric 
286*0b57cec5SDimitry Andric     unsigned MaxProm = getMaxNumOfPromotionsInLoop(&L);
287*0b57cec5SDimitry Andric     if (MaxProm == 0)
288*0b57cec5SDimitry Andric       return false;
289*0b57cec5SDimitry Andric 
290*0b57cec5SDimitry Andric     unsigned Promoted = 0;
291*0b57cec5SDimitry Andric     for (auto &Cand : LoopToCandidates[&L]) {
292*0b57cec5SDimitry Andric 
293*0b57cec5SDimitry Andric       SmallVector<PHINode *, 4> NewPHIs;
294*0b57cec5SDimitry Andric       SSAUpdater SSA(&NewPHIs);
295*0b57cec5SDimitry Andric       Value *InitVal = ConstantInt::get(Cand.first->getType(), 0);
296*0b57cec5SDimitry Andric 
297*0b57cec5SDimitry Andric       // If BFI is set, we will use it to guide the promotions.
298*0b57cec5SDimitry Andric       if (BFI) {
299*0b57cec5SDimitry Andric         auto *BB = Cand.first->getParent();
300*0b57cec5SDimitry Andric         auto InstrCount = BFI->getBlockProfileCount(BB);
301*0b57cec5SDimitry Andric         if (!InstrCount)
302*0b57cec5SDimitry Andric           continue;
303*0b57cec5SDimitry Andric         auto PreheaderCount = BFI->getBlockProfileCount(L.getLoopPreheader());
304*0b57cec5SDimitry Andric         // If the average loop trip count is not greater than 1.5, we skip
305*0b57cec5SDimitry Andric         // promotion.
306*0b57cec5SDimitry Andric         if (PreheaderCount &&
307*0b57cec5SDimitry Andric             (PreheaderCount.getValue() * 3) >= (InstrCount.getValue() * 2))
308*0b57cec5SDimitry Andric           continue;
309*0b57cec5SDimitry Andric       }
310*0b57cec5SDimitry Andric 
311*0b57cec5SDimitry Andric       PGOCounterPromoterHelper Promoter(Cand.first, Cand.second, SSA, InitVal,
312*0b57cec5SDimitry Andric                                         L.getLoopPreheader(), ExitBlocks,
313*0b57cec5SDimitry Andric                                         InsertPts, LoopToCandidates, LI);
314*0b57cec5SDimitry Andric       Promoter.run(SmallVector<Instruction *, 2>({Cand.first, Cand.second}));
315*0b57cec5SDimitry Andric       Promoted++;
316*0b57cec5SDimitry Andric       if (Promoted >= MaxProm)
317*0b57cec5SDimitry Andric         break;
318*0b57cec5SDimitry Andric 
319*0b57cec5SDimitry Andric       (*NumPromoted)++;
320*0b57cec5SDimitry Andric       if (MaxNumOfPromotions != -1 && *NumPromoted >= MaxNumOfPromotions)
321*0b57cec5SDimitry Andric         break;
322*0b57cec5SDimitry Andric     }
323*0b57cec5SDimitry Andric 
324*0b57cec5SDimitry Andric     LLVM_DEBUG(dbgs() << Promoted << " counters promoted for loop (depth="
325*0b57cec5SDimitry Andric                       << L.getLoopDepth() << ")\n");
326*0b57cec5SDimitry Andric     return Promoted != 0;
327*0b57cec5SDimitry Andric   }
328*0b57cec5SDimitry Andric 
329*0b57cec5SDimitry Andric private:
330*0b57cec5SDimitry Andric   bool allowSpeculativeCounterPromotion(Loop *LP) {
331*0b57cec5SDimitry Andric     SmallVector<BasicBlock *, 8> ExitingBlocks;
332*0b57cec5SDimitry Andric     L.getExitingBlocks(ExitingBlocks);
333*0b57cec5SDimitry Andric     // Not considierered speculative.
334*0b57cec5SDimitry Andric     if (ExitingBlocks.size() == 1)
335*0b57cec5SDimitry Andric       return true;
336*0b57cec5SDimitry Andric     if (ExitingBlocks.size() > SpeculativeCounterPromotionMaxExiting)
337*0b57cec5SDimitry Andric       return false;
338*0b57cec5SDimitry Andric     return true;
339*0b57cec5SDimitry Andric   }
340*0b57cec5SDimitry Andric 
3415ffd83dbSDimitry Andric   // Check whether the loop satisfies the basic conditions needed to perform
3425ffd83dbSDimitry Andric   // Counter Promotions.
3434824e7fdSDimitry Andric   bool
3444824e7fdSDimitry Andric   isPromotionPossible(Loop *LP,
3455ffd83dbSDimitry Andric                       const SmallVectorImpl<BasicBlock *> &LoopExitBlocks) {
346*0b57cec5SDimitry Andric     // We can't insert into a catchswitch.
347*0b57cec5SDimitry Andric     if (llvm::any_of(LoopExitBlocks, [](BasicBlock *Exit) {
348*0b57cec5SDimitry Andric           return isa<CatchSwitchInst>(Exit->getTerminator());
349*0b57cec5SDimitry Andric         }))
3505ffd83dbSDimitry Andric       return false;
351*0b57cec5SDimitry Andric 
352*0b57cec5SDimitry Andric     if (!LP->hasDedicatedExits())
3535ffd83dbSDimitry Andric       return false;
354*0b57cec5SDimitry Andric 
355*0b57cec5SDimitry Andric     BasicBlock *PH = LP->getLoopPreheader();
356*0b57cec5SDimitry Andric     if (!PH)
3575ffd83dbSDimitry Andric       return false;
3585ffd83dbSDimitry Andric 
3595ffd83dbSDimitry Andric     return true;
3605ffd83dbSDimitry Andric   }
3615ffd83dbSDimitry Andric 
3625ffd83dbSDimitry Andric   // Returns the max number of Counter Promotions for LP.
3635ffd83dbSDimitry Andric   unsigned getMaxNumOfPromotionsInLoop(Loop *LP) {
3645ffd83dbSDimitry Andric     SmallVector<BasicBlock *, 8> LoopExitBlocks;
3655ffd83dbSDimitry Andric     LP->getExitBlocks(LoopExitBlocks);
3665ffd83dbSDimitry Andric     if (!isPromotionPossible(LP, LoopExitBlocks))
367*0b57cec5SDimitry Andric       return 0;
368*0b57cec5SDimitry Andric 
369*0b57cec5SDimitry Andric     SmallVector<BasicBlock *, 8> ExitingBlocks;
370*0b57cec5SDimitry Andric     LP->getExitingBlocks(ExitingBlocks);
371*0b57cec5SDimitry Andric 
372*0b57cec5SDimitry Andric     // If BFI is set, we do more aggressive promotions based on BFI.
373*0b57cec5SDimitry Andric     if (BFI)
374*0b57cec5SDimitry Andric       return (unsigned)-1;
375*0b57cec5SDimitry Andric 
376*0b57cec5SDimitry Andric     // Not considierered speculative.
377*0b57cec5SDimitry Andric     if (ExitingBlocks.size() == 1)
378*0b57cec5SDimitry Andric       return MaxNumOfPromotionsPerLoop;
379*0b57cec5SDimitry Andric 
380*0b57cec5SDimitry Andric     if (ExitingBlocks.size() > SpeculativeCounterPromotionMaxExiting)
381*0b57cec5SDimitry Andric       return 0;
382*0b57cec5SDimitry Andric 
383*0b57cec5SDimitry Andric     // Whether the target block is in a loop does not matter:
384*0b57cec5SDimitry Andric     if (SpeculativeCounterPromotionToLoop)
385*0b57cec5SDimitry Andric       return MaxNumOfPromotionsPerLoop;
386*0b57cec5SDimitry Andric 
387*0b57cec5SDimitry Andric     // Now check the target block:
388*0b57cec5SDimitry Andric     unsigned MaxProm = MaxNumOfPromotionsPerLoop;
389*0b57cec5SDimitry Andric     for (auto *TargetBlock : LoopExitBlocks) {
390*0b57cec5SDimitry Andric       auto *TargetLoop = LI.getLoopFor(TargetBlock);
391*0b57cec5SDimitry Andric       if (!TargetLoop)
392*0b57cec5SDimitry Andric         continue;
393*0b57cec5SDimitry Andric       unsigned MaxPromForTarget = getMaxNumOfPromotionsInLoop(TargetLoop);
394*0b57cec5SDimitry Andric       unsigned PendingCandsInTarget = LoopToCandidates[TargetLoop].size();
395*0b57cec5SDimitry Andric       MaxProm =
396*0b57cec5SDimitry Andric           std::min(MaxProm, std::max(MaxPromForTarget, PendingCandsInTarget) -
397*0b57cec5SDimitry Andric                                 PendingCandsInTarget);
398*0b57cec5SDimitry Andric     }
399*0b57cec5SDimitry Andric     return MaxProm;
400*0b57cec5SDimitry Andric   }
401*0b57cec5SDimitry Andric 
402*0b57cec5SDimitry Andric   DenseMap<Loop *, SmallVector<LoadStorePair, 8>> &LoopToCandidates;
403*0b57cec5SDimitry Andric   SmallVector<BasicBlock *, 8> ExitBlocks;
404*0b57cec5SDimitry Andric   SmallVector<Instruction *, 8> InsertPts;
405*0b57cec5SDimitry Andric   Loop &L;
406*0b57cec5SDimitry Andric   LoopInfo &LI;
407*0b57cec5SDimitry Andric   BlockFrequencyInfo *BFI;
408*0b57cec5SDimitry Andric };
409*0b57cec5SDimitry Andric 
410e8d8bef9SDimitry Andric enum class ValueProfilingCallType {
411e8d8bef9SDimitry Andric   // Individual values are tracked. Currently used for indiret call target
412e8d8bef9SDimitry Andric   // profiling.
413e8d8bef9SDimitry Andric   Default,
414e8d8bef9SDimitry Andric 
415e8d8bef9SDimitry Andric   // MemOp: the memop size value profiling.
416e8d8bef9SDimitry Andric   MemOp
417e8d8bef9SDimitry Andric };
418e8d8bef9SDimitry Andric 
419*0b57cec5SDimitry Andric } // end anonymous namespace
420*0b57cec5SDimitry Andric 
421*0b57cec5SDimitry Andric PreservedAnalyses InstrProfiling::run(Module &M, ModuleAnalysisManager &AM) {
4228bcb0991SDimitry Andric   FunctionAnalysisManager &FAM =
4238bcb0991SDimitry Andric       AM.getResult<FunctionAnalysisManagerModuleProxy>(M).getManager();
4248bcb0991SDimitry Andric   auto GetTLI = [&FAM](Function &F) -> TargetLibraryInfo & {
4258bcb0991SDimitry Andric     return FAM.getResult<TargetLibraryAnalysis>(F);
4268bcb0991SDimitry Andric   };
4278bcb0991SDimitry Andric   if (!run(M, GetTLI))
428*0b57cec5SDimitry Andric     return PreservedAnalyses::all();
429*0b57cec5SDimitry Andric 
430*0b57cec5SDimitry Andric   return PreservedAnalyses::none();
431*0b57cec5SDimitry Andric }
432*0b57cec5SDimitry Andric 
433*0b57cec5SDimitry Andric char InstrProfilingLegacyPass::ID = 0;
4344824e7fdSDimitry Andric INITIALIZE_PASS_BEGIN(InstrProfilingLegacyPass, "instrprof",
4354824e7fdSDimitry Andric                       "Frontend instrumentation-based coverage lowering.",
4364824e7fdSDimitry Andric                       false, false)
437*0b57cec5SDimitry Andric INITIALIZE_PASS_DEPENDENCY(TargetLibraryInfoWrapperPass)
4384824e7fdSDimitry Andric INITIALIZE_PASS_END(InstrProfilingLegacyPass, "instrprof",
4394824e7fdSDimitry Andric                     "Frontend instrumentation-based coverage lowering.", false,
4404824e7fdSDimitry Andric                     false)
441*0b57cec5SDimitry Andric 
442*0b57cec5SDimitry Andric ModulePass *
443*0b57cec5SDimitry Andric llvm::createInstrProfilingLegacyPass(const InstrProfOptions &Options,
444*0b57cec5SDimitry Andric                                      bool IsCS) {
445*0b57cec5SDimitry Andric   return new InstrProfilingLegacyPass(Options, IsCS);
446*0b57cec5SDimitry Andric }
447*0b57cec5SDimitry Andric 
448*0b57cec5SDimitry Andric bool InstrProfiling::lowerIntrinsics(Function *F) {
449*0b57cec5SDimitry Andric   bool MadeChange = false;
450*0b57cec5SDimitry Andric   PromotionCandidates.clear();
451*0b57cec5SDimitry Andric   for (BasicBlock &BB : *F) {
452349cc55cSDimitry Andric     for (Instruction &Instr : llvm::make_early_inc_range(BB)) {
45304eeddc0SDimitry Andric       if (auto *IPIS = dyn_cast<InstrProfIncrementInstStep>(&Instr)) {
45404eeddc0SDimitry Andric         lowerIncrement(IPIS);
455*0b57cec5SDimitry Andric         MadeChange = true;
45604eeddc0SDimitry Andric       } else if (auto *IPI = dyn_cast<InstrProfIncrementInst>(&Instr)) {
45704eeddc0SDimitry Andric         lowerIncrement(IPI);
45804eeddc0SDimitry Andric         MadeChange = true;
4591fd87a68SDimitry Andric       } else if (auto *IPC = dyn_cast<InstrProfCoverInst>(&Instr)) {
4601fd87a68SDimitry Andric         lowerCover(IPC);
4611fd87a68SDimitry Andric         MadeChange = true;
46204eeddc0SDimitry Andric       } else if (auto *IPVP = dyn_cast<InstrProfValueProfileInst>(&Instr)) {
46304eeddc0SDimitry Andric         lowerValueProfileInst(IPVP);
464*0b57cec5SDimitry Andric         MadeChange = true;
465*0b57cec5SDimitry Andric       }
466*0b57cec5SDimitry Andric     }
467*0b57cec5SDimitry Andric   }
468*0b57cec5SDimitry Andric 
469*0b57cec5SDimitry Andric   if (!MadeChange)
470*0b57cec5SDimitry Andric     return false;
471*0b57cec5SDimitry Andric 
472*0b57cec5SDimitry Andric   promoteCounterLoadStores(F);
473*0b57cec5SDimitry Andric   return true;
474*0b57cec5SDimitry Andric }
475*0b57cec5SDimitry Andric 
4765ffd83dbSDimitry Andric bool InstrProfiling::isRuntimeCounterRelocationEnabled() const {
477fe6060f1SDimitry Andric   // Mach-O don't support weak external references.
478fe6060f1SDimitry Andric   if (TT.isOSBinFormatMachO())
479fe6060f1SDimitry Andric     return false;
480fe6060f1SDimitry Andric 
4815ffd83dbSDimitry Andric   if (RuntimeCounterRelocation.getNumOccurrences() > 0)
4825ffd83dbSDimitry Andric     return RuntimeCounterRelocation;
4835ffd83dbSDimitry Andric 
484fe6060f1SDimitry Andric   // Fuchsia uses runtime counter relocation by default.
4855ffd83dbSDimitry Andric   return TT.isOSFuchsia();
4865ffd83dbSDimitry Andric }
4875ffd83dbSDimitry Andric 
488*0b57cec5SDimitry Andric bool InstrProfiling::isCounterPromotionEnabled() const {
489*0b57cec5SDimitry Andric   if (DoCounterPromotion.getNumOccurrences() > 0)
490*0b57cec5SDimitry Andric     return DoCounterPromotion;
491*0b57cec5SDimitry Andric 
492*0b57cec5SDimitry Andric   return Options.DoCounterPromotion;
493*0b57cec5SDimitry Andric }
494*0b57cec5SDimitry Andric 
495*0b57cec5SDimitry Andric void InstrProfiling::promoteCounterLoadStores(Function *F) {
496*0b57cec5SDimitry Andric   if (!isCounterPromotionEnabled())
497*0b57cec5SDimitry Andric     return;
498*0b57cec5SDimitry Andric 
499*0b57cec5SDimitry Andric   DominatorTree DT(*F);
500*0b57cec5SDimitry Andric   LoopInfo LI(DT);
501*0b57cec5SDimitry Andric   DenseMap<Loop *, SmallVector<LoadStorePair, 8>> LoopPromotionCandidates;
502*0b57cec5SDimitry Andric 
503*0b57cec5SDimitry Andric   std::unique_ptr<BlockFrequencyInfo> BFI;
504*0b57cec5SDimitry Andric   if (Options.UseBFIInPromotion) {
505*0b57cec5SDimitry Andric     std::unique_ptr<BranchProbabilityInfo> BPI;
5068bcb0991SDimitry Andric     BPI.reset(new BranchProbabilityInfo(*F, LI, &GetTLI(*F)));
507*0b57cec5SDimitry Andric     BFI.reset(new BlockFrequencyInfo(*F, *BPI, LI));
508*0b57cec5SDimitry Andric   }
509*0b57cec5SDimitry Andric 
510*0b57cec5SDimitry Andric   for (const auto &LoadStore : PromotionCandidates) {
511*0b57cec5SDimitry Andric     auto *CounterLoad = LoadStore.first;
512*0b57cec5SDimitry Andric     auto *CounterStore = LoadStore.second;
513*0b57cec5SDimitry Andric     BasicBlock *BB = CounterLoad->getParent();
514*0b57cec5SDimitry Andric     Loop *ParentLoop = LI.getLoopFor(BB);
515*0b57cec5SDimitry Andric     if (!ParentLoop)
516*0b57cec5SDimitry Andric       continue;
517*0b57cec5SDimitry Andric     LoopPromotionCandidates[ParentLoop].emplace_back(CounterLoad, CounterStore);
518*0b57cec5SDimitry Andric   }
519*0b57cec5SDimitry Andric 
520*0b57cec5SDimitry Andric   SmallVector<Loop *, 4> Loops = LI.getLoopsInPreorder();
521*0b57cec5SDimitry Andric 
522*0b57cec5SDimitry Andric   // Do a post-order traversal of the loops so that counter updates can be
523*0b57cec5SDimitry Andric   // iteratively hoisted outside the loop nest.
524*0b57cec5SDimitry Andric   for (auto *Loop : llvm::reverse(Loops)) {
525*0b57cec5SDimitry Andric     PGOCounterPromoter Promoter(LoopPromotionCandidates, *Loop, LI, BFI.get());
526*0b57cec5SDimitry Andric     Promoter.run(&TotalCountersPromoted);
527*0b57cec5SDimitry Andric   }
528*0b57cec5SDimitry Andric }
529*0b57cec5SDimitry Andric 
530349cc55cSDimitry Andric static bool needsRuntimeHookUnconditionally(const Triple &TT) {
531349cc55cSDimitry Andric   // On Fuchsia, we only need runtime hook if any counters are present.
532349cc55cSDimitry Andric   if (TT.isOSFuchsia())
533349cc55cSDimitry Andric     return false;
534349cc55cSDimitry Andric 
535349cc55cSDimitry Andric   return true;
536349cc55cSDimitry Andric }
537349cc55cSDimitry Andric 
538*0b57cec5SDimitry Andric /// Check if the module contains uses of any profiling intrinsics.
539*0b57cec5SDimitry Andric static bool containsProfilingIntrinsics(Module &M) {
54004eeddc0SDimitry Andric   auto containsIntrinsic = [&](int ID) {
54104eeddc0SDimitry Andric     if (auto *F = M.getFunction(Intrinsic::getName(ID)))
54204eeddc0SDimitry Andric       return !F->use_empty();
543*0b57cec5SDimitry Andric     return false;
54404eeddc0SDimitry Andric   };
5451fd87a68SDimitry Andric   return containsIntrinsic(llvm::Intrinsic::instrprof_cover) ||
5461fd87a68SDimitry Andric          containsIntrinsic(llvm::Intrinsic::instrprof_increment) ||
54704eeddc0SDimitry Andric          containsIntrinsic(llvm::Intrinsic::instrprof_increment_step) ||
54804eeddc0SDimitry Andric          containsIntrinsic(llvm::Intrinsic::instrprof_value_profile);
549*0b57cec5SDimitry Andric }
550*0b57cec5SDimitry Andric 
5518bcb0991SDimitry Andric bool InstrProfiling::run(
5528bcb0991SDimitry Andric     Module &M, std::function<const TargetLibraryInfo &(Function &F)> GetTLI) {
553*0b57cec5SDimitry Andric   this->M = &M;
5548bcb0991SDimitry Andric   this->GetTLI = std::move(GetTLI);
555*0b57cec5SDimitry Andric   NamesVar = nullptr;
556*0b57cec5SDimitry Andric   NamesSize = 0;
557*0b57cec5SDimitry Andric   ProfileDataMap.clear();
558fe6060f1SDimitry Andric   CompilerUsedVars.clear();
559*0b57cec5SDimitry Andric   UsedVars.clear();
560*0b57cec5SDimitry Andric   TT = Triple(M.getTargetTriple());
561*0b57cec5SDimitry Andric 
562349cc55cSDimitry Andric   bool MadeChange = false;
563349cc55cSDimitry Andric 
564*0b57cec5SDimitry Andric   // Emit the runtime hook even if no counters are present.
565349cc55cSDimitry Andric   if (needsRuntimeHookUnconditionally(TT))
566349cc55cSDimitry Andric     MadeChange = emitRuntimeHook();
567*0b57cec5SDimitry Andric 
568*0b57cec5SDimitry Andric   // Improve compile time by avoiding linear scans when there is no work.
569*0b57cec5SDimitry Andric   GlobalVariable *CoverageNamesVar =
570*0b57cec5SDimitry Andric       M.getNamedGlobal(getCoverageUnusedNamesVarName());
571*0b57cec5SDimitry Andric   if (!containsProfilingIntrinsics(M) && !CoverageNamesVar)
572*0b57cec5SDimitry Andric     return MadeChange;
573*0b57cec5SDimitry Andric 
574*0b57cec5SDimitry Andric   // We did not know how many value sites there would be inside
575*0b57cec5SDimitry Andric   // the instrumented function. This is counting the number of instrumented
576*0b57cec5SDimitry Andric   // target value sites to enter it as field in the profile data variable.
577*0b57cec5SDimitry Andric   for (Function &F : M) {
578*0b57cec5SDimitry Andric     InstrProfIncrementInst *FirstProfIncInst = nullptr;
579*0b57cec5SDimitry Andric     for (BasicBlock &BB : F)
580*0b57cec5SDimitry Andric       for (auto I = BB.begin(), E = BB.end(); I != E; I++)
581*0b57cec5SDimitry Andric         if (auto *Ind = dyn_cast<InstrProfValueProfileInst>(I))
582*0b57cec5SDimitry Andric           computeNumValueSiteCounts(Ind);
583*0b57cec5SDimitry Andric         else if (FirstProfIncInst == nullptr)
584*0b57cec5SDimitry Andric           FirstProfIncInst = dyn_cast<InstrProfIncrementInst>(I);
585*0b57cec5SDimitry Andric 
586*0b57cec5SDimitry Andric     // Value profiling intrinsic lowering requires per-function profile data
587*0b57cec5SDimitry Andric     // variable to be created first.
588*0b57cec5SDimitry Andric     if (FirstProfIncInst != nullptr)
589*0b57cec5SDimitry Andric       static_cast<void>(getOrCreateRegionCounters(FirstProfIncInst));
590*0b57cec5SDimitry Andric   }
591*0b57cec5SDimitry Andric 
592*0b57cec5SDimitry Andric   for (Function &F : M)
593*0b57cec5SDimitry Andric     MadeChange |= lowerIntrinsics(&F);
594*0b57cec5SDimitry Andric 
595*0b57cec5SDimitry Andric   if (CoverageNamesVar) {
596*0b57cec5SDimitry Andric     lowerCoverageData(CoverageNamesVar);
597*0b57cec5SDimitry Andric     MadeChange = true;
598*0b57cec5SDimitry Andric   }
599*0b57cec5SDimitry Andric 
600*0b57cec5SDimitry Andric   if (!MadeChange)
601*0b57cec5SDimitry Andric     return false;
602*0b57cec5SDimitry Andric 
603*0b57cec5SDimitry Andric   emitVNodes();
604*0b57cec5SDimitry Andric   emitNameData();
605349cc55cSDimitry Andric   emitRuntimeHook();
606*0b57cec5SDimitry Andric   emitRegistration();
607*0b57cec5SDimitry Andric   emitUses();
608*0b57cec5SDimitry Andric   emitInitialization();
609*0b57cec5SDimitry Andric   return true;
610*0b57cec5SDimitry Andric }
611*0b57cec5SDimitry Andric 
612e8d8bef9SDimitry Andric static FunctionCallee getOrInsertValueProfilingCall(
613e8d8bef9SDimitry Andric     Module &M, const TargetLibraryInfo &TLI,
614e8d8bef9SDimitry Andric     ValueProfilingCallType CallType = ValueProfilingCallType::Default) {
615*0b57cec5SDimitry Andric   LLVMContext &Ctx = M.getContext();
616*0b57cec5SDimitry Andric   auto *ReturnTy = Type::getVoidTy(M.getContext());
617*0b57cec5SDimitry Andric 
618*0b57cec5SDimitry Andric   AttributeList AL;
619*0b57cec5SDimitry Andric   if (auto AK = TLI.getExtAttrForI32Param(false))
620*0b57cec5SDimitry Andric     AL = AL.addParamAttribute(M.getContext(), 2, AK);
621*0b57cec5SDimitry Andric 
622e8d8bef9SDimitry Andric   assert((CallType == ValueProfilingCallType::Default ||
623e8d8bef9SDimitry Andric           CallType == ValueProfilingCallType::MemOp) &&
624e8d8bef9SDimitry Andric          "Must be Default or MemOp");
625*0b57cec5SDimitry Andric   Type *ParamTypes[] = {
626*0b57cec5SDimitry Andric #define VALUE_PROF_FUNC_PARAM(ParamType, ParamName, ParamLLVMType) ParamLLVMType
627*0b57cec5SDimitry Andric #include "llvm/ProfileData/InstrProfData.inc"
628*0b57cec5SDimitry Andric   };
629*0b57cec5SDimitry Andric   auto *ValueProfilingCallTy =
630*0b57cec5SDimitry Andric       FunctionType::get(ReturnTy, makeArrayRef(ParamTypes), false);
631e8d8bef9SDimitry Andric   StringRef FuncName = CallType == ValueProfilingCallType::Default
632e8d8bef9SDimitry Andric                            ? getInstrProfValueProfFuncName()
633e8d8bef9SDimitry Andric                            : getInstrProfValueProfMemOpFuncName();
634e8d8bef9SDimitry Andric   return M.getOrInsertFunction(FuncName, ValueProfilingCallTy, AL);
635*0b57cec5SDimitry Andric }
636*0b57cec5SDimitry Andric 
637*0b57cec5SDimitry Andric void InstrProfiling::computeNumValueSiteCounts(InstrProfValueProfileInst *Ind) {
638*0b57cec5SDimitry Andric   GlobalVariable *Name = Ind->getName();
639*0b57cec5SDimitry Andric   uint64_t ValueKind = Ind->getValueKind()->getZExtValue();
640*0b57cec5SDimitry Andric   uint64_t Index = Ind->getIndex()->getZExtValue();
6414824e7fdSDimitry Andric   auto &PD = ProfileDataMap[Name];
6424824e7fdSDimitry Andric   PD.NumValueSites[ValueKind] =
6434824e7fdSDimitry Andric       std::max(PD.NumValueSites[ValueKind], (uint32_t)(Index + 1));
644*0b57cec5SDimitry Andric }
645*0b57cec5SDimitry Andric 
646*0b57cec5SDimitry Andric void InstrProfiling::lowerValueProfileInst(InstrProfValueProfileInst *Ind) {
6470eae32dcSDimitry Andric   // TODO: Value profiling heavily depends on the data section which is omitted
6480eae32dcSDimitry Andric   // in lightweight mode. We need to move the value profile pointer to the
6490eae32dcSDimitry Andric   // Counter struct to get this working.
6500eae32dcSDimitry Andric   assert(
6510eae32dcSDimitry Andric       !DebugInfoCorrelate &&
6520eae32dcSDimitry Andric       "Value profiling is not yet supported with lightweight instrumentation");
653*0b57cec5SDimitry Andric   GlobalVariable *Name = Ind->getName();
654*0b57cec5SDimitry Andric   auto It = ProfileDataMap.find(Name);
655*0b57cec5SDimitry Andric   assert(It != ProfileDataMap.end() && It->second.DataVar &&
656*0b57cec5SDimitry Andric          "value profiling detected in function with no counter incerement");
657*0b57cec5SDimitry Andric 
658*0b57cec5SDimitry Andric   GlobalVariable *DataVar = It->second.DataVar;
659*0b57cec5SDimitry Andric   uint64_t ValueKind = Ind->getValueKind()->getZExtValue();
660*0b57cec5SDimitry Andric   uint64_t Index = Ind->getIndex()->getZExtValue();
661*0b57cec5SDimitry Andric   for (uint32_t Kind = IPVK_First; Kind < ValueKind; ++Kind)
662*0b57cec5SDimitry Andric     Index += It->second.NumValueSites[Kind];
663*0b57cec5SDimitry Andric 
664*0b57cec5SDimitry Andric   IRBuilder<> Builder(Ind);
665e8d8bef9SDimitry Andric   bool IsMemOpSize = (Ind->getValueKind()->getZExtValue() ==
666*0b57cec5SDimitry Andric                       llvm::InstrProfValueKind::IPVK_MemOPSize);
667*0b57cec5SDimitry Andric   CallInst *Call = nullptr;
6688bcb0991SDimitry Andric   auto *TLI = &GetTLI(*Ind->getFunction());
6695ffd83dbSDimitry Andric 
6705ffd83dbSDimitry Andric   // To support value profiling calls within Windows exception handlers, funclet
6715ffd83dbSDimitry Andric   // information contained within operand bundles needs to be copied over to
6725ffd83dbSDimitry Andric   // the library call. This is required for the IR to be processed by the
6735ffd83dbSDimitry Andric   // WinEHPrepare pass.
6745ffd83dbSDimitry Andric   SmallVector<OperandBundleDef, 1> OpBundles;
6755ffd83dbSDimitry Andric   Ind->getOperandBundlesAsDefs(OpBundles);
676e8d8bef9SDimitry Andric   if (!IsMemOpSize) {
677*0b57cec5SDimitry Andric     Value *Args[3] = {Ind->getTargetValue(),
678*0b57cec5SDimitry Andric                       Builder.CreateBitCast(DataVar, Builder.getInt8PtrTy()),
679*0b57cec5SDimitry Andric                       Builder.getInt32(Index)};
6805ffd83dbSDimitry Andric     Call = Builder.CreateCall(getOrInsertValueProfilingCall(*M, *TLI), Args,
6815ffd83dbSDimitry Andric                               OpBundles);
682*0b57cec5SDimitry Andric   } else {
683e8d8bef9SDimitry Andric     Value *Args[3] = {Ind->getTargetValue(),
684*0b57cec5SDimitry Andric                       Builder.CreateBitCast(DataVar, Builder.getInt8PtrTy()),
685e8d8bef9SDimitry Andric                       Builder.getInt32(Index)};
686e8d8bef9SDimitry Andric     Call = Builder.CreateCall(
687e8d8bef9SDimitry Andric         getOrInsertValueProfilingCall(*M, *TLI, ValueProfilingCallType::MemOp),
6885ffd83dbSDimitry Andric         Args, OpBundles);
689*0b57cec5SDimitry Andric   }
690*0b57cec5SDimitry Andric   if (auto AK = TLI->getExtAttrForI32Param(false))
691*0b57cec5SDimitry Andric     Call->addParamAttr(2, AK);
692*0b57cec5SDimitry Andric   Ind->replaceAllUsesWith(Call);
693*0b57cec5SDimitry Andric   Ind->eraseFromParent();
694*0b57cec5SDimitry Andric }
695*0b57cec5SDimitry Andric 
6961fd87a68SDimitry Andric Value *InstrProfiling::getCounterAddress(InstrProfInstBase *I) {
6971fd87a68SDimitry Andric   auto *Counters = getOrCreateRegionCounters(I);
6981fd87a68SDimitry Andric   IRBuilder<> Builder(I);
699*0b57cec5SDimitry Andric 
7001fd87a68SDimitry Andric   auto *Addr = Builder.CreateConstInBoundsGEP2_32(
7011fd87a68SDimitry Andric       Counters->getValueType(), Counters, 0, I->getIndex()->getZExtValue());
702*0b57cec5SDimitry Andric 
7031fd87a68SDimitry Andric   if (!isRuntimeCounterRelocationEnabled())
7041fd87a68SDimitry Andric     return Addr;
7051fd87a68SDimitry Andric 
7065ffd83dbSDimitry Andric   Type *Int64Ty = Type::getInt64Ty(M->getContext());
7071fd87a68SDimitry Andric   Function *Fn = I->getParent()->getParent();
7081fd87a68SDimitry Andric   Instruction &EntryI = Fn->getEntryBlock().front();
7091fd87a68SDimitry Andric   LoadInst *LI = dyn_cast<LoadInst>(&EntryI);
7105ffd83dbSDimitry Andric   if (!LI) {
7111fd87a68SDimitry Andric     IRBuilder<> EntryBuilder(&EntryI);
7121fd87a68SDimitry Andric     auto *Bias = M->getGlobalVariable(getInstrProfCounterBiasVarName());
7135ffd83dbSDimitry Andric     if (!Bias) {
714fe6060f1SDimitry Andric       // Compiler must define this variable when runtime counter relocation
715fe6060f1SDimitry Andric       // is being used. Runtime has a weak external reference that is used
716fe6060f1SDimitry Andric       // to check whether that's the case or not.
7174824e7fdSDimitry Andric       Bias = new GlobalVariable(
7184824e7fdSDimitry Andric           *M, Int64Ty, false, GlobalValue::LinkOnceODRLinkage,
7194824e7fdSDimitry Andric           Constant::getNullValue(Int64Ty), getInstrProfCounterBiasVarName());
7205ffd83dbSDimitry Andric       Bias->setVisibility(GlobalVariable::HiddenVisibility);
721fe6060f1SDimitry Andric       // A definition that's weak (linkonce_odr) without being in a COMDAT
722fe6060f1SDimitry Andric       // section wouldn't lead to link errors, but it would lead to a dead
723fe6060f1SDimitry Andric       // data word from every TU but one. Putting it in COMDAT ensures there
724fe6060f1SDimitry Andric       // will be exactly one data slot in the link.
725fe6060f1SDimitry Andric       if (TT.supportsCOMDAT())
726fe6060f1SDimitry Andric         Bias->setComdat(M->getOrInsertComdat(Bias->getName()));
7275ffd83dbSDimitry Andric     }
7281fd87a68SDimitry Andric     LI = EntryBuilder.CreateLoad(Int64Ty, Bias);
7295ffd83dbSDimitry Andric   }
7305ffd83dbSDimitry Andric   auto *Add = Builder.CreateAdd(Builder.CreatePtrToInt(Addr, Int64Ty), LI);
7311fd87a68SDimitry Andric   return Builder.CreateIntToPtr(Add, Addr->getType());
7325ffd83dbSDimitry Andric }
7335ffd83dbSDimitry Andric 
7341fd87a68SDimitry Andric void InstrProfiling::lowerCover(InstrProfCoverInst *CoverInstruction) {
7351fd87a68SDimitry Andric   auto *Addr = getCounterAddress(CoverInstruction);
7361fd87a68SDimitry Andric   IRBuilder<> Builder(CoverInstruction);
7371fd87a68SDimitry Andric   // We store zero to represent that this block is covered.
7381fd87a68SDimitry Andric   Builder.CreateStore(Builder.getInt8(0), Addr);
7391fd87a68SDimitry Andric   CoverInstruction->eraseFromParent();
7401fd87a68SDimitry Andric }
7411fd87a68SDimitry Andric 
7421fd87a68SDimitry Andric void InstrProfiling::lowerIncrement(InstrProfIncrementInst *Inc) {
7431fd87a68SDimitry Andric   auto *Addr = getCounterAddress(Inc);
7441fd87a68SDimitry Andric 
7451fd87a68SDimitry Andric   IRBuilder<> Builder(Inc);
7465ffd83dbSDimitry Andric   if (Options.Atomic || AtomicCounterUpdateAll ||
7471fd87a68SDimitry Andric       (Inc->getIndex()->isZeroValue() && AtomicFirstCounter)) {
748*0b57cec5SDimitry Andric     Builder.CreateAtomicRMW(AtomicRMWInst::Add, Addr, Inc->getStep(),
749fe6060f1SDimitry Andric                             MaybeAlign(), AtomicOrdering::Monotonic);
750*0b57cec5SDimitry Andric   } else {
751*0b57cec5SDimitry Andric     Value *IncStep = Inc->getStep();
752*0b57cec5SDimitry Andric     Value *Load = Builder.CreateLoad(IncStep->getType(), Addr, "pgocount");
753*0b57cec5SDimitry Andric     auto *Count = Builder.CreateAdd(Load, Inc->getStep());
754*0b57cec5SDimitry Andric     auto *Store = Builder.CreateStore(Count, Addr);
755*0b57cec5SDimitry Andric     if (isCounterPromotionEnabled())
756*0b57cec5SDimitry Andric       PromotionCandidates.emplace_back(cast<Instruction>(Load), Store);
757*0b57cec5SDimitry Andric   }
758*0b57cec5SDimitry Andric   Inc->eraseFromParent();
759*0b57cec5SDimitry Andric }
760*0b57cec5SDimitry Andric 
761*0b57cec5SDimitry Andric void InstrProfiling::lowerCoverageData(GlobalVariable *CoverageNamesVar) {
762*0b57cec5SDimitry Andric   ConstantArray *Names =
763*0b57cec5SDimitry Andric       cast<ConstantArray>(CoverageNamesVar->getInitializer());
764*0b57cec5SDimitry Andric   for (unsigned I = 0, E = Names->getNumOperands(); I < E; ++I) {
765*0b57cec5SDimitry Andric     Constant *NC = Names->getOperand(I);
766*0b57cec5SDimitry Andric     Value *V = NC->stripPointerCasts();
767*0b57cec5SDimitry Andric     assert(isa<GlobalVariable>(V) && "Missing reference to function name");
768*0b57cec5SDimitry Andric     GlobalVariable *Name = cast<GlobalVariable>(V);
769*0b57cec5SDimitry Andric 
770*0b57cec5SDimitry Andric     Name->setLinkage(GlobalValue::PrivateLinkage);
771*0b57cec5SDimitry Andric     ReferencedNames.push_back(Name);
772*0b57cec5SDimitry Andric     NC->dropAllReferences();
773*0b57cec5SDimitry Andric   }
774*0b57cec5SDimitry Andric   CoverageNamesVar->eraseFromParent();
775*0b57cec5SDimitry Andric }
776*0b57cec5SDimitry Andric 
777*0b57cec5SDimitry Andric /// Get the name of a profiling variable for a particular function.
77804eeddc0SDimitry Andric static std::string getVarName(InstrProfInstBase *Inc, StringRef Prefix,
779349cc55cSDimitry Andric                               bool &Renamed) {
780*0b57cec5SDimitry Andric   StringRef NamePrefix = getInstrProfNameVarPrefix();
781*0b57cec5SDimitry Andric   StringRef Name = Inc->getName()->getName().substr(NamePrefix.size());
782*0b57cec5SDimitry Andric   Function *F = Inc->getParent()->getParent();
783*0b57cec5SDimitry Andric   Module *M = F->getParent();
784*0b57cec5SDimitry Andric   if (!DoHashBasedCounterSplit || !isIRPGOFlagSet(M) ||
785349cc55cSDimitry Andric       !canRenameComdatFunc(*F)) {
786349cc55cSDimitry Andric     Renamed = false;
787*0b57cec5SDimitry Andric     return (Prefix + Name).str();
788349cc55cSDimitry Andric   }
789349cc55cSDimitry Andric   Renamed = true;
790*0b57cec5SDimitry Andric   uint64_t FuncHash = Inc->getHash()->getZExtValue();
791*0b57cec5SDimitry Andric   SmallVector<char, 24> HashPostfix;
792*0b57cec5SDimitry Andric   if (Name.endswith((Twine(".") + Twine(FuncHash)).toStringRef(HashPostfix)))
793*0b57cec5SDimitry Andric     return (Prefix + Name).str();
794*0b57cec5SDimitry Andric   return (Prefix + Name + "." + Twine(FuncHash)).str();
795*0b57cec5SDimitry Andric }
796*0b57cec5SDimitry Andric 
797fe6060f1SDimitry Andric static uint64_t getIntModuleFlagOrZero(const Module &M, StringRef Flag) {
798fe6060f1SDimitry Andric   auto *MD = dyn_cast_or_null<ConstantAsMetadata>(M.getModuleFlag(Flag));
799fe6060f1SDimitry Andric   if (!MD)
800fe6060f1SDimitry Andric     return 0;
801fe6060f1SDimitry Andric 
802fe6060f1SDimitry Andric   // If the flag is a ConstantAsMetadata, it should be an integer representable
803fe6060f1SDimitry Andric   // in 64-bits.
804fe6060f1SDimitry Andric   return cast<ConstantInt>(MD->getValue())->getZExtValue();
805fe6060f1SDimitry Andric }
806fe6060f1SDimitry Andric 
807fe6060f1SDimitry Andric static bool enablesValueProfiling(const Module &M) {
808fe6060f1SDimitry Andric   return isIRPGOFlagSet(&M) ||
809fe6060f1SDimitry Andric          getIntModuleFlagOrZero(M, "EnableValueProfiling") != 0;
810fe6060f1SDimitry Andric }
811fe6060f1SDimitry Andric 
812fe6060f1SDimitry Andric // Conservatively returns true if data variables may be referenced by code.
813fe6060f1SDimitry Andric static bool profDataReferencedByCode(const Module &M) {
814fe6060f1SDimitry Andric   return enablesValueProfiling(M);
815fe6060f1SDimitry Andric }
816fe6060f1SDimitry Andric 
817*0b57cec5SDimitry Andric static inline bool shouldRecordFunctionAddr(Function *F) {
818fe6060f1SDimitry Andric   // Only record function addresses if IR PGO is enabled or if clang value
819fe6060f1SDimitry Andric   // profiling is enabled. Recording function addresses greatly increases object
820fe6060f1SDimitry Andric   // file size, because it prevents the inliner from deleting functions that
821fe6060f1SDimitry Andric   // have been inlined everywhere.
822fe6060f1SDimitry Andric   if (!profDataReferencedByCode(*F->getParent()))
823fe6060f1SDimitry Andric     return false;
824fe6060f1SDimitry Andric 
825*0b57cec5SDimitry Andric   // Check the linkage
826*0b57cec5SDimitry Andric   bool HasAvailableExternallyLinkage = F->hasAvailableExternallyLinkage();
827*0b57cec5SDimitry Andric   if (!F->hasLinkOnceLinkage() && !F->hasLocalLinkage() &&
828*0b57cec5SDimitry Andric       !HasAvailableExternallyLinkage)
829*0b57cec5SDimitry Andric     return true;
830*0b57cec5SDimitry Andric 
831*0b57cec5SDimitry Andric   // A function marked 'alwaysinline' with available_externally linkage can't
832*0b57cec5SDimitry Andric   // have its address taken. Doing so would create an undefined external ref to
833*0b57cec5SDimitry Andric   // the function, which would fail to link.
834*0b57cec5SDimitry Andric   if (HasAvailableExternallyLinkage &&
835*0b57cec5SDimitry Andric       F->hasFnAttribute(Attribute::AlwaysInline))
836*0b57cec5SDimitry Andric     return false;
837*0b57cec5SDimitry Andric 
838*0b57cec5SDimitry Andric   // Prohibit function address recording if the function is both internal and
839*0b57cec5SDimitry Andric   // COMDAT. This avoids the profile data variable referencing internal symbols
840*0b57cec5SDimitry Andric   // in COMDAT.
841*0b57cec5SDimitry Andric   if (F->hasLocalLinkage() && F->hasComdat())
842*0b57cec5SDimitry Andric     return false;
843*0b57cec5SDimitry Andric 
844*0b57cec5SDimitry Andric   // Check uses of this function for other than direct calls or invokes to it.
845*0b57cec5SDimitry Andric   // Inline virtual functions have linkeOnceODR linkage. When a key method
846*0b57cec5SDimitry Andric   // exists, the vtable will only be emitted in the TU where the key method
847*0b57cec5SDimitry Andric   // is defined. In a TU where vtable is not available, the function won't
848*0b57cec5SDimitry Andric   // be 'addresstaken'. If its address is not recorded here, the profile data
849*0b57cec5SDimitry Andric   // with missing address may be picked by the linker leading  to missing
850*0b57cec5SDimitry Andric   // indirect call target info.
851*0b57cec5SDimitry Andric   return F->hasAddressTaken() || F->hasLinkOnceLinkage();
852*0b57cec5SDimitry Andric }
853*0b57cec5SDimitry Andric 
854*0b57cec5SDimitry Andric static bool needsRuntimeRegistrationOfSectionRange(const Triple &TT) {
855*0b57cec5SDimitry Andric   // Don't do this for Darwin.  compiler-rt uses linker magic.
856*0b57cec5SDimitry Andric   if (TT.isOSDarwin())
857*0b57cec5SDimitry Andric     return false;
858*0b57cec5SDimitry Andric   // Use linker script magic to get data/cnts/name start/end.
859*0b57cec5SDimitry Andric   if (TT.isOSLinux() || TT.isOSFreeBSD() || TT.isOSNetBSD() ||
8604824e7fdSDimitry Andric       TT.isOSSolaris() || TT.isOSFuchsia() || TT.isPS4CPU() || TT.isOSWindows())
861*0b57cec5SDimitry Andric     return false;
862*0b57cec5SDimitry Andric 
863*0b57cec5SDimitry Andric   return true;
864*0b57cec5SDimitry Andric }
865*0b57cec5SDimitry Andric 
866*0b57cec5SDimitry Andric GlobalVariable *
8671fd87a68SDimitry Andric InstrProfiling::createRegionCounters(InstrProfInstBase *Inc, StringRef Name,
8681fd87a68SDimitry Andric                                      GlobalValue::LinkageTypes Linkage) {
8691fd87a68SDimitry Andric   uint64_t NumCounters = Inc->getNumCounters()->getZExtValue();
8701fd87a68SDimitry Andric   auto &Ctx = M->getContext();
8711fd87a68SDimitry Andric   GlobalVariable *GV;
8721fd87a68SDimitry Andric   if (isa<InstrProfCoverInst>(Inc)) {
8731fd87a68SDimitry Andric     auto *CounterTy = Type::getInt8Ty(Ctx);
8741fd87a68SDimitry Andric     auto *CounterArrTy = ArrayType::get(CounterTy, NumCounters);
8751fd87a68SDimitry Andric     // TODO: `Constant::getAllOnesValue()` does not yet accept an array type.
8761fd87a68SDimitry Andric     std::vector<Constant *> InitialValues(NumCounters,
8771fd87a68SDimitry Andric                                           Constant::getAllOnesValue(CounterTy));
8781fd87a68SDimitry Andric     GV = new GlobalVariable(*M, CounterArrTy, false, Linkage,
8791fd87a68SDimitry Andric                             ConstantArray::get(CounterArrTy, InitialValues),
8801fd87a68SDimitry Andric                             Name);
8811fd87a68SDimitry Andric     GV->setAlignment(Align(1));
8821fd87a68SDimitry Andric   } else {
8831fd87a68SDimitry Andric     auto *CounterTy = ArrayType::get(Type::getInt64Ty(Ctx), NumCounters);
8841fd87a68SDimitry Andric     GV = new GlobalVariable(*M, CounterTy, false, Linkage,
8851fd87a68SDimitry Andric                             Constant::getNullValue(CounterTy), Name);
8861fd87a68SDimitry Andric     GV->setAlignment(Align(8));
8871fd87a68SDimitry Andric   }
8881fd87a68SDimitry Andric   return GV;
8891fd87a68SDimitry Andric }
8901fd87a68SDimitry Andric 
8911fd87a68SDimitry Andric GlobalVariable *
89204eeddc0SDimitry Andric InstrProfiling::getOrCreateRegionCounters(InstrProfInstBase *Inc) {
893*0b57cec5SDimitry Andric   GlobalVariable *NamePtr = Inc->getName();
8944824e7fdSDimitry Andric   auto &PD = ProfileDataMap[NamePtr];
8954824e7fdSDimitry Andric   if (PD.RegionCounters)
8964824e7fdSDimitry Andric     return PD.RegionCounters;
897*0b57cec5SDimitry Andric 
898fe6060f1SDimitry Andric   // Match the linkage and visibility of the name global.
899*0b57cec5SDimitry Andric   Function *Fn = Inc->getParent()->getParent();
900*0b57cec5SDimitry Andric   GlobalValue::LinkageTypes Linkage = NamePtr->getLinkage();
901*0b57cec5SDimitry Andric   GlobalValue::VisibilityTypes Visibility = NamePtr->getVisibility();
902*0b57cec5SDimitry Andric 
9030eae32dcSDimitry Andric   // Use internal rather than private linkage so the counter variable shows up
9040eae32dcSDimitry Andric   // in the symbol table when using debug info for correlation.
9050eae32dcSDimitry Andric   if (DebugInfoCorrelate && TT.isOSBinFormatMachO() &&
9060eae32dcSDimitry Andric       Linkage == GlobalValue::PrivateLinkage)
9070eae32dcSDimitry Andric     Linkage = GlobalValue::InternalLinkage;
9080eae32dcSDimitry Andric 
909349cc55cSDimitry Andric   // Due to the limitation of binder as of 2021/09/28, the duplicate weak
910349cc55cSDimitry Andric   // symbols in the same csect won't be discarded. When there are duplicate weak
911349cc55cSDimitry Andric   // symbols, we can NOT guarantee that the relocations get resolved to the
912349cc55cSDimitry Andric   // intended weak symbol, so we can not ensure the correctness of the relative
913349cc55cSDimitry Andric   // CounterPtr, so we have to use private linkage for counter and data symbols.
914349cc55cSDimitry Andric   if (TT.isOSBinFormatXCOFF()) {
915349cc55cSDimitry Andric     Linkage = GlobalValue::PrivateLinkage;
916349cc55cSDimitry Andric     Visibility = GlobalValue::DefaultVisibility;
917349cc55cSDimitry Andric   }
918*0b57cec5SDimitry Andric   // Move the name variable to the right section. Place them in a COMDAT group
919*0b57cec5SDimitry Andric   // if the associated function is a COMDAT. This will make sure that only one
920*0b57cec5SDimitry Andric   // copy of counters of the COMDAT function will be emitted after linking. Keep
921*0b57cec5SDimitry Andric   // in mind that this pass may run before the inliner, so we need to create a
922*0b57cec5SDimitry Andric   // new comdat group for the counters and profiling data. If we use the comdat
923*0b57cec5SDimitry Andric   // of the parent function, that will result in relocations against discarded
924*0b57cec5SDimitry Andric   // sections.
925fe6060f1SDimitry Andric   //
926fe6060f1SDimitry Andric   // If the data variable is referenced by code,  counters and data have to be
927fe6060f1SDimitry Andric   // in different comdats for COFF because the Visual C++ linker will report
928fe6060f1SDimitry Andric   // duplicate symbol errors if there are multiple external symbols with the
929fe6060f1SDimitry Andric   // same name marked IMAGE_COMDAT_SELECT_ASSOCIATIVE.
930fe6060f1SDimitry Andric   //
931fe6060f1SDimitry Andric   // For ELF, when not using COMDAT, put counters, data and values into a
932fe6060f1SDimitry Andric   // nodeduplicate COMDAT which is lowered to a zero-flag section group. This
933fe6060f1SDimitry Andric   // allows -z start-stop-gc to discard the entire group when the function is
934fe6060f1SDimitry Andric   // discarded.
935fe6060f1SDimitry Andric   bool DataReferencedByCode = profDataReferencedByCode(*M);
936c14a5a88SDimitry Andric   bool NeedComdat = needsComdatForCounter(*Fn, *M);
937349cc55cSDimitry Andric   bool Renamed;
938349cc55cSDimitry Andric   std::string CntsVarName =
939349cc55cSDimitry Andric       getVarName(Inc, getInstrProfCountersVarPrefix(), Renamed);
940349cc55cSDimitry Andric   std::string DataVarName =
941349cc55cSDimitry Andric       getVarName(Inc, getInstrProfDataVarPrefix(), Renamed);
942fe6060f1SDimitry Andric   auto MaybeSetComdat = [&](GlobalVariable *GV) {
943fe6060f1SDimitry Andric     bool UseComdat = (NeedComdat || TT.isOSBinFormatELF());
944fe6060f1SDimitry Andric     if (UseComdat) {
945fe6060f1SDimitry Andric       StringRef GroupName = TT.isOSBinFormatCOFF() && DataReferencedByCode
946fe6060f1SDimitry Andric                                 ? GV->getName()
947fe6060f1SDimitry Andric                                 : CntsVarName;
948fe6060f1SDimitry Andric       Comdat *C = M->getOrInsertComdat(GroupName);
949fe6060f1SDimitry Andric       if (!NeedComdat)
950fe6060f1SDimitry Andric         C->setSelectionKind(Comdat::NoDeduplicate);
951fe6060f1SDimitry Andric       GV->setComdat(C);
952fe6060f1SDimitry Andric     }
953c14a5a88SDimitry Andric   };
954*0b57cec5SDimitry Andric 
955*0b57cec5SDimitry Andric   uint64_t NumCounters = Inc->getNumCounters()->getZExtValue();
956*0b57cec5SDimitry Andric   LLVMContext &Ctx = M->getContext();
957*0b57cec5SDimitry Andric 
9581fd87a68SDimitry Andric   auto *CounterPtr = createRegionCounters(Inc, CntsVarName, Linkage);
959*0b57cec5SDimitry Andric   CounterPtr->setVisibility(Visibility);
960*0b57cec5SDimitry Andric   CounterPtr->setSection(
961*0b57cec5SDimitry Andric       getInstrProfSectionName(IPSK_cnts, TT.getObjectFormat()));
962c14a5a88SDimitry Andric   MaybeSetComdat(CounterPtr);
963c14a5a88SDimitry Andric   CounterPtr->setLinkage(Linkage);
9644824e7fdSDimitry Andric   PD.RegionCounters = CounterPtr;
9650eae32dcSDimitry Andric   if (DebugInfoCorrelate) {
9660eae32dcSDimitry Andric     if (auto *SP = Fn->getSubprogram()) {
9670eae32dcSDimitry Andric       DIBuilder DB(*M, true, SP->getUnit());
9680eae32dcSDimitry Andric       Metadata *FunctionNameAnnotation[] = {
9690eae32dcSDimitry Andric           MDString::get(Ctx, InstrProfCorrelator::FunctionNameAttributeName),
9700eae32dcSDimitry Andric           MDString::get(Ctx, getPGOFuncNameVarInitializer(NamePtr)),
9710eae32dcSDimitry Andric       };
9720eae32dcSDimitry Andric       Metadata *CFGHashAnnotation[] = {
9730eae32dcSDimitry Andric           MDString::get(Ctx, InstrProfCorrelator::CFGHashAttributeName),
9740eae32dcSDimitry Andric           ConstantAsMetadata::get(Inc->getHash()),
9750eae32dcSDimitry Andric       };
9760eae32dcSDimitry Andric       Metadata *NumCountersAnnotation[] = {
9770eae32dcSDimitry Andric           MDString::get(Ctx, InstrProfCorrelator::NumCountersAttributeName),
9780eae32dcSDimitry Andric           ConstantAsMetadata::get(Inc->getNumCounters()),
9790eae32dcSDimitry Andric       };
9800eae32dcSDimitry Andric       auto Annotations = DB.getOrCreateArray({
9810eae32dcSDimitry Andric           MDNode::get(Ctx, FunctionNameAnnotation),
9820eae32dcSDimitry Andric           MDNode::get(Ctx, CFGHashAnnotation),
9830eae32dcSDimitry Andric           MDNode::get(Ctx, NumCountersAnnotation),
9840eae32dcSDimitry Andric       });
9850eae32dcSDimitry Andric       auto *DICounter = DB.createGlobalVariableExpression(
9860eae32dcSDimitry Andric           SP, CounterPtr->getName(), /*LinkageName=*/StringRef(), SP->getFile(),
9870eae32dcSDimitry Andric           /*LineNo=*/0, DB.createUnspecifiedType("Profile Data Type"),
9880eae32dcSDimitry Andric           CounterPtr->hasLocalLinkage(), /*IsDefined=*/true, /*Expr=*/nullptr,
9890eae32dcSDimitry Andric           /*Decl=*/nullptr, /*TemplateParams=*/nullptr, /*AlignInBits=*/0,
9900eae32dcSDimitry Andric           Annotations);
9910eae32dcSDimitry Andric       CounterPtr->addDebugInfo(DICounter);
9920eae32dcSDimitry Andric       DB.finalize();
9930eae32dcSDimitry Andric     } else {
9940eae32dcSDimitry Andric       std::string Msg = ("Missing debug info for function " + Fn->getName() +
9950eae32dcSDimitry Andric                          "; required for profile correlation.")
9960eae32dcSDimitry Andric                             .str();
9970eae32dcSDimitry Andric       Ctx.diagnose(
9980eae32dcSDimitry Andric           DiagnosticInfoPGOProfile(M->getName().data(), Msg, DS_Warning));
9990eae32dcSDimitry Andric     }
10000eae32dcSDimitry Andric   }
1001*0b57cec5SDimitry Andric 
1002*0b57cec5SDimitry Andric   auto *Int8PtrTy = Type::getInt8PtrTy(Ctx);
1003*0b57cec5SDimitry Andric   // Allocate statically the array of pointers to value profile nodes for
1004*0b57cec5SDimitry Andric   // the current function.
1005*0b57cec5SDimitry Andric   Constant *ValuesPtrExpr = ConstantPointerNull::get(Int8PtrTy);
1006*0b57cec5SDimitry Andric   uint64_t NS = 0;
1007*0b57cec5SDimitry Andric   for (uint32_t Kind = IPVK_First; Kind <= IPVK_Last; ++Kind)
1008*0b57cec5SDimitry Andric     NS += PD.NumValueSites[Kind];
1009fe6060f1SDimitry Andric   if (NS > 0 && ValueProfileStaticAlloc &&
1010fe6060f1SDimitry Andric       !needsRuntimeRegistrationOfSectionRange(TT)) {
1011*0b57cec5SDimitry Andric     ArrayType *ValuesTy = ArrayType::get(Type::getInt64Ty(Ctx), NS);
1012fe6060f1SDimitry Andric     auto *ValuesVar = new GlobalVariable(
1013fe6060f1SDimitry Andric         *M, ValuesTy, false, Linkage, Constant::getNullValue(ValuesTy),
1014349cc55cSDimitry Andric         getVarName(Inc, getInstrProfValuesVarPrefix(), Renamed));
1015*0b57cec5SDimitry Andric     ValuesVar->setVisibility(Visibility);
1016*0b57cec5SDimitry Andric     ValuesVar->setSection(
1017*0b57cec5SDimitry Andric         getInstrProfSectionName(IPSK_vals, TT.getObjectFormat()));
10188bcb0991SDimitry Andric     ValuesVar->setAlignment(Align(8));
1019c14a5a88SDimitry Andric     MaybeSetComdat(ValuesVar);
1020*0b57cec5SDimitry Andric     ValuesPtrExpr =
1021*0b57cec5SDimitry Andric         ConstantExpr::getBitCast(ValuesVar, Type::getInt8PtrTy(Ctx));
1022*0b57cec5SDimitry Andric   }
1023*0b57cec5SDimitry Andric 
102404eeddc0SDimitry Andric   if (DebugInfoCorrelate) {
102504eeddc0SDimitry Andric     // Mark the counter variable as used so that it isn't optimized out.
102604eeddc0SDimitry Andric     CompilerUsedVars.push_back(PD.RegionCounters);
10270eae32dcSDimitry Andric     return PD.RegionCounters;
102804eeddc0SDimitry Andric   }
10290eae32dcSDimitry Andric 
1030*0b57cec5SDimitry Andric   // Create data variable.
1031349cc55cSDimitry Andric   auto *IntPtrTy = M->getDataLayout().getIntPtrType(M->getContext());
1032*0b57cec5SDimitry Andric   auto *Int16Ty = Type::getInt16Ty(Ctx);
1033*0b57cec5SDimitry Andric   auto *Int16ArrayTy = ArrayType::get(Int16Ty, IPVK_Last + 1);
1034*0b57cec5SDimitry Andric   Type *DataTypes[] = {
1035*0b57cec5SDimitry Andric #define INSTR_PROF_DATA(Type, LLVMType, Name, Init) LLVMType,
1036*0b57cec5SDimitry Andric #include "llvm/ProfileData/InstrProfData.inc"
1037*0b57cec5SDimitry Andric   };
1038*0b57cec5SDimitry Andric   auto *DataTy = StructType::get(Ctx, makeArrayRef(DataTypes));
1039*0b57cec5SDimitry Andric 
1040*0b57cec5SDimitry Andric   Constant *FunctionAddr = shouldRecordFunctionAddr(Fn)
1041*0b57cec5SDimitry Andric                                ? ConstantExpr::getBitCast(Fn, Int8PtrTy)
1042*0b57cec5SDimitry Andric                                : ConstantPointerNull::get(Int8PtrTy);
1043*0b57cec5SDimitry Andric 
1044*0b57cec5SDimitry Andric   Constant *Int16ArrayVals[IPVK_Last + 1];
1045*0b57cec5SDimitry Andric   for (uint32_t Kind = IPVK_First; Kind <= IPVK_Last; ++Kind)
1046*0b57cec5SDimitry Andric     Int16ArrayVals[Kind] = ConstantInt::get(Int16Ty, PD.NumValueSites[Kind]);
1047*0b57cec5SDimitry Andric 
1048fe6060f1SDimitry Andric   // If the data variable is not referenced by code (if we don't emit
1049fe6060f1SDimitry Andric   // @llvm.instrprof.value.profile, NS will be 0), and the counter keeps the
1050fe6060f1SDimitry Andric   // data variable live under linker GC, the data variable can be private. This
1051fe6060f1SDimitry Andric   // optimization applies to ELF.
1052fe6060f1SDimitry Andric   //
1053fe6060f1SDimitry Andric   // On COFF, a comdat leader cannot be local so we require DataReferencedByCode
1054fe6060f1SDimitry Andric   // to be false.
1055349cc55cSDimitry Andric   //
1056349cc55cSDimitry Andric   // If profd is in a deduplicate comdat, NS==0 with a hash suffix guarantees
1057349cc55cSDimitry Andric   // that other copies must have the same CFG and cannot have value profiling.
1058349cc55cSDimitry Andric   // If no hash suffix, other profd copies may be referenced by code.
1059349cc55cSDimitry Andric   if (NS == 0 && !(DataReferencedByCode && NeedComdat && !Renamed) &&
1060349cc55cSDimitry Andric       (TT.isOSBinFormatELF() ||
1061fe6060f1SDimitry Andric        (!DataReferencedByCode && TT.isOSBinFormatCOFF()))) {
1062fe6060f1SDimitry Andric     Linkage = GlobalValue::PrivateLinkage;
1063fe6060f1SDimitry Andric     Visibility = GlobalValue::DefaultVisibility;
1064fe6060f1SDimitry Andric   }
1065e8d8bef9SDimitry Andric   auto *Data =
1066349cc55cSDimitry Andric       new GlobalVariable(*M, DataTy, false, Linkage, nullptr, DataVarName);
1067349cc55cSDimitry Andric   // Reference the counter variable with a label difference (link-time
1068349cc55cSDimitry Andric   // constant).
1069349cc55cSDimitry Andric   auto *RelativeCounterPtr =
1070349cc55cSDimitry Andric       ConstantExpr::getSub(ConstantExpr::getPtrToInt(CounterPtr, IntPtrTy),
1071349cc55cSDimitry Andric                            ConstantExpr::getPtrToInt(Data, IntPtrTy));
1072349cc55cSDimitry Andric 
1073349cc55cSDimitry Andric   Constant *DataVals[] = {
1074349cc55cSDimitry Andric #define INSTR_PROF_DATA(Type, LLVMType, Name, Init) Init,
1075349cc55cSDimitry Andric #include "llvm/ProfileData/InstrProfData.inc"
1076349cc55cSDimitry Andric   };
1077349cc55cSDimitry Andric   Data->setInitializer(ConstantStruct::get(DataTy, DataVals));
1078349cc55cSDimitry Andric 
1079*0b57cec5SDimitry Andric   Data->setVisibility(Visibility);
1080*0b57cec5SDimitry Andric   Data->setSection(getInstrProfSectionName(IPSK_data, TT.getObjectFormat()));
10818bcb0991SDimitry Andric   Data->setAlignment(Align(INSTR_PROF_DATA_ALIGNMENT));
1082c14a5a88SDimitry Andric   MaybeSetComdat(Data);
1083c14a5a88SDimitry Andric   Data->setLinkage(Linkage);
1084*0b57cec5SDimitry Andric 
1085*0b57cec5SDimitry Andric   PD.DataVar = Data;
1086*0b57cec5SDimitry Andric 
1087*0b57cec5SDimitry Andric   // Mark the data variable as used so that it isn't stripped out.
1088fe6060f1SDimitry Andric   CompilerUsedVars.push_back(Data);
1089*0b57cec5SDimitry Andric   // Now that the linkage set by the FE has been passed to the data and counter
1090*0b57cec5SDimitry Andric   // variables, reset Name variable's linkage and visibility to private so that
1091*0b57cec5SDimitry Andric   // it can be removed later by the compiler.
1092*0b57cec5SDimitry Andric   NamePtr->setLinkage(GlobalValue::PrivateLinkage);
1093*0b57cec5SDimitry Andric   // Collect the referenced names to be used by emitNameData.
1094*0b57cec5SDimitry Andric   ReferencedNames.push_back(NamePtr);
1095*0b57cec5SDimitry Andric 
10964824e7fdSDimitry Andric   return PD.RegionCounters;
1097*0b57cec5SDimitry Andric }
1098*0b57cec5SDimitry Andric 
1099*0b57cec5SDimitry Andric void InstrProfiling::emitVNodes() {
1100*0b57cec5SDimitry Andric   if (!ValueProfileStaticAlloc)
1101*0b57cec5SDimitry Andric     return;
1102*0b57cec5SDimitry Andric 
1103*0b57cec5SDimitry Andric   // For now only support this on platforms that do
1104*0b57cec5SDimitry Andric   // not require runtime registration to discover
1105*0b57cec5SDimitry Andric   // named section start/end.
1106*0b57cec5SDimitry Andric   if (needsRuntimeRegistrationOfSectionRange(TT))
1107*0b57cec5SDimitry Andric     return;
1108*0b57cec5SDimitry Andric 
1109*0b57cec5SDimitry Andric   size_t TotalNS = 0;
1110*0b57cec5SDimitry Andric   for (auto &PD : ProfileDataMap) {
1111*0b57cec5SDimitry Andric     for (uint32_t Kind = IPVK_First; Kind <= IPVK_Last; ++Kind)
1112*0b57cec5SDimitry Andric       TotalNS += PD.second.NumValueSites[Kind];
1113*0b57cec5SDimitry Andric   }
1114*0b57cec5SDimitry Andric 
1115*0b57cec5SDimitry Andric   if (!TotalNS)
1116*0b57cec5SDimitry Andric     return;
1117*0b57cec5SDimitry Andric 
1118*0b57cec5SDimitry Andric   uint64_t NumCounters = TotalNS * NumCountersPerValueSite;
1119*0b57cec5SDimitry Andric // Heuristic for small programs with very few total value sites.
1120*0b57cec5SDimitry Andric // The default value of vp-counters-per-site is chosen based on
1121*0b57cec5SDimitry Andric // the observation that large apps usually have a low percentage
1122*0b57cec5SDimitry Andric // of value sites that actually have any profile data, and thus
1123*0b57cec5SDimitry Andric // the average number of counters per site is low. For small
1124*0b57cec5SDimitry Andric // apps with very few sites, this may not be true. Bump up the
1125*0b57cec5SDimitry Andric // number of counters in this case.
1126*0b57cec5SDimitry Andric #define INSTR_PROF_MIN_VAL_COUNTS 10
1127*0b57cec5SDimitry Andric   if (NumCounters < INSTR_PROF_MIN_VAL_COUNTS)
1128*0b57cec5SDimitry Andric     NumCounters = std::max(INSTR_PROF_MIN_VAL_COUNTS, (int)NumCounters * 2);
1129*0b57cec5SDimitry Andric 
1130*0b57cec5SDimitry Andric   auto &Ctx = M->getContext();
1131*0b57cec5SDimitry Andric   Type *VNodeTypes[] = {
1132*0b57cec5SDimitry Andric #define INSTR_PROF_VALUE_NODE(Type, LLVMType, Name, Init) LLVMType,
1133*0b57cec5SDimitry Andric #include "llvm/ProfileData/InstrProfData.inc"
1134*0b57cec5SDimitry Andric   };
1135*0b57cec5SDimitry Andric   auto *VNodeTy = StructType::get(Ctx, makeArrayRef(VNodeTypes));
1136*0b57cec5SDimitry Andric 
1137*0b57cec5SDimitry Andric   ArrayType *VNodesTy = ArrayType::get(VNodeTy, NumCounters);
1138*0b57cec5SDimitry Andric   auto *VNodesVar = new GlobalVariable(
1139*0b57cec5SDimitry Andric       *M, VNodesTy, false, GlobalValue::PrivateLinkage,
1140*0b57cec5SDimitry Andric       Constant::getNullValue(VNodesTy), getInstrProfVNodesVarName());
1141*0b57cec5SDimitry Andric   VNodesVar->setSection(
1142*0b57cec5SDimitry Andric       getInstrProfSectionName(IPSK_vnodes, TT.getObjectFormat()));
1143fe6060f1SDimitry Andric   // VNodesVar is used by runtime but not referenced via relocation by other
1144fe6060f1SDimitry Andric   // sections. Conservatively make it linker retained.
1145*0b57cec5SDimitry Andric   UsedVars.push_back(VNodesVar);
1146*0b57cec5SDimitry Andric }
1147*0b57cec5SDimitry Andric 
1148*0b57cec5SDimitry Andric void InstrProfiling::emitNameData() {
1149*0b57cec5SDimitry Andric   std::string UncompressedData;
1150*0b57cec5SDimitry Andric 
1151*0b57cec5SDimitry Andric   if (ReferencedNames.empty())
1152*0b57cec5SDimitry Andric     return;
1153*0b57cec5SDimitry Andric 
1154*0b57cec5SDimitry Andric   std::string CompressedNameStr;
1155*0b57cec5SDimitry Andric   if (Error E = collectPGOFuncNameStrings(ReferencedNames, CompressedNameStr,
11565ffd83dbSDimitry Andric                                           DoInstrProfNameCompression)) {
1157349cc55cSDimitry Andric     report_fatal_error(Twine(toString(std::move(E))), false);
1158*0b57cec5SDimitry Andric   }
1159*0b57cec5SDimitry Andric 
1160*0b57cec5SDimitry Andric   auto &Ctx = M->getContext();
11614824e7fdSDimitry Andric   auto *NamesVal =
11624824e7fdSDimitry Andric       ConstantDataArray::getString(Ctx, StringRef(CompressedNameStr), false);
1163*0b57cec5SDimitry Andric   NamesVar = new GlobalVariable(*M, NamesVal->getType(), true,
1164*0b57cec5SDimitry Andric                                 GlobalValue::PrivateLinkage, NamesVal,
1165*0b57cec5SDimitry Andric                                 getInstrProfNamesVarName());
1166*0b57cec5SDimitry Andric   NamesSize = CompressedNameStr.size();
1167*0b57cec5SDimitry Andric   NamesVar->setSection(
1168*0b57cec5SDimitry Andric       getInstrProfSectionName(IPSK_name, TT.getObjectFormat()));
1169*0b57cec5SDimitry Andric   // On COFF, it's important to reduce the alignment down to 1 to prevent the
1170*0b57cec5SDimitry Andric   // linker from inserting padding before the start of the names section or
1171*0b57cec5SDimitry Andric   // between names entries.
11725ffd83dbSDimitry Andric   NamesVar->setAlignment(Align(1));
1173fe6060f1SDimitry Andric   // NamesVar is used by runtime but not referenced via relocation by other
1174fe6060f1SDimitry Andric   // sections. Conservatively make it linker retained.
1175*0b57cec5SDimitry Andric   UsedVars.push_back(NamesVar);
1176*0b57cec5SDimitry Andric 
1177*0b57cec5SDimitry Andric   for (auto *NamePtr : ReferencedNames)
1178*0b57cec5SDimitry Andric     NamePtr->eraseFromParent();
1179*0b57cec5SDimitry Andric }
1180*0b57cec5SDimitry Andric 
1181*0b57cec5SDimitry Andric void InstrProfiling::emitRegistration() {
1182*0b57cec5SDimitry Andric   if (!needsRuntimeRegistrationOfSectionRange(TT))
1183*0b57cec5SDimitry Andric     return;
1184*0b57cec5SDimitry Andric 
1185*0b57cec5SDimitry Andric   // Construct the function.
1186*0b57cec5SDimitry Andric   auto *VoidTy = Type::getVoidTy(M->getContext());
1187*0b57cec5SDimitry Andric   auto *VoidPtrTy = Type::getInt8PtrTy(M->getContext());
1188*0b57cec5SDimitry Andric   auto *Int64Ty = Type::getInt64Ty(M->getContext());
1189*0b57cec5SDimitry Andric   auto *RegisterFTy = FunctionType::get(VoidTy, false);
1190*0b57cec5SDimitry Andric   auto *RegisterF = Function::Create(RegisterFTy, GlobalValue::InternalLinkage,
1191*0b57cec5SDimitry Andric                                      getInstrProfRegFuncsName(), M);
1192*0b57cec5SDimitry Andric   RegisterF->setUnnamedAddr(GlobalValue::UnnamedAddr::Global);
1193*0b57cec5SDimitry Andric   if (Options.NoRedZone)
1194*0b57cec5SDimitry Andric     RegisterF->addFnAttr(Attribute::NoRedZone);
1195*0b57cec5SDimitry Andric 
1196*0b57cec5SDimitry Andric   auto *RuntimeRegisterTy = FunctionType::get(VoidTy, VoidPtrTy, false);
1197*0b57cec5SDimitry Andric   auto *RuntimeRegisterF =
1198*0b57cec5SDimitry Andric       Function::Create(RuntimeRegisterTy, GlobalVariable::ExternalLinkage,
1199*0b57cec5SDimitry Andric                        getInstrProfRegFuncName(), M);
1200*0b57cec5SDimitry Andric 
1201*0b57cec5SDimitry Andric   IRBuilder<> IRB(BasicBlock::Create(M->getContext(), "", RegisterF));
1202fe6060f1SDimitry Andric   for (Value *Data : CompilerUsedVars)
1203fe6060f1SDimitry Andric     if (!isa<Function>(Data))
1204fe6060f1SDimitry Andric       IRB.CreateCall(RuntimeRegisterF, IRB.CreateBitCast(Data, VoidPtrTy));
1205*0b57cec5SDimitry Andric   for (Value *Data : UsedVars)
1206*0b57cec5SDimitry Andric     if (Data != NamesVar && !isa<Function>(Data))
1207*0b57cec5SDimitry Andric       IRB.CreateCall(RuntimeRegisterF, IRB.CreateBitCast(Data, VoidPtrTy));
1208*0b57cec5SDimitry Andric 
1209*0b57cec5SDimitry Andric   if (NamesVar) {
1210*0b57cec5SDimitry Andric     Type *ParamTypes[] = {VoidPtrTy, Int64Ty};
1211*0b57cec5SDimitry Andric     auto *NamesRegisterTy =
1212*0b57cec5SDimitry Andric         FunctionType::get(VoidTy, makeArrayRef(ParamTypes), false);
1213*0b57cec5SDimitry Andric     auto *NamesRegisterF =
1214*0b57cec5SDimitry Andric         Function::Create(NamesRegisterTy, GlobalVariable::ExternalLinkage,
1215*0b57cec5SDimitry Andric                          getInstrProfNamesRegFuncName(), M);
1216*0b57cec5SDimitry Andric     IRB.CreateCall(NamesRegisterF, {IRB.CreateBitCast(NamesVar, VoidPtrTy),
1217*0b57cec5SDimitry Andric                                     IRB.getInt64(NamesSize)});
1218*0b57cec5SDimitry Andric   }
1219*0b57cec5SDimitry Andric 
1220*0b57cec5SDimitry Andric   IRB.CreateRetVoid();
1221*0b57cec5SDimitry Andric }
1222*0b57cec5SDimitry Andric 
1223*0b57cec5SDimitry Andric bool InstrProfiling::emitRuntimeHook() {
1224349cc55cSDimitry Andric   // We expect the linker to be invoked with -u<hook_var> flag for Linux
1225349cc55cSDimitry Andric   // in which case there is no need to emit the external variable.
1226349cc55cSDimitry Andric   if (TT.isOSLinux())
1227*0b57cec5SDimitry Andric     return false;
1228*0b57cec5SDimitry Andric 
1229*0b57cec5SDimitry Andric   // If the module's provided its own runtime, we don't need to do anything.
1230*0b57cec5SDimitry Andric   if (M->getGlobalVariable(getInstrProfRuntimeHookVarName()))
1231*0b57cec5SDimitry Andric     return false;
1232*0b57cec5SDimitry Andric 
1233*0b57cec5SDimitry Andric   // Declare an external variable that will pull in the runtime initialization.
1234*0b57cec5SDimitry Andric   auto *Int32Ty = Type::getInt32Ty(M->getContext());
1235*0b57cec5SDimitry Andric   auto *Var =
1236*0b57cec5SDimitry Andric       new GlobalVariable(*M, Int32Ty, false, GlobalValue::ExternalLinkage,
1237*0b57cec5SDimitry Andric                          nullptr, getInstrProfRuntimeHookVarName());
1238*0b57cec5SDimitry Andric 
1239349cc55cSDimitry Andric   if (TT.isOSBinFormatELF()) {
1240349cc55cSDimitry Andric     // Mark the user variable as used so that it isn't stripped out.
1241349cc55cSDimitry Andric     CompilerUsedVars.push_back(Var);
1242349cc55cSDimitry Andric   } else {
1243*0b57cec5SDimitry Andric     // Make a function that uses it.
1244*0b57cec5SDimitry Andric     auto *User = Function::Create(FunctionType::get(Int32Ty, false),
1245*0b57cec5SDimitry Andric                                   GlobalValue::LinkOnceODRLinkage,
1246*0b57cec5SDimitry Andric                                   getInstrProfRuntimeHookVarUseFuncName(), M);
1247*0b57cec5SDimitry Andric     User->addFnAttr(Attribute::NoInline);
1248*0b57cec5SDimitry Andric     if (Options.NoRedZone)
1249*0b57cec5SDimitry Andric       User->addFnAttr(Attribute::NoRedZone);
1250*0b57cec5SDimitry Andric     User->setVisibility(GlobalValue::HiddenVisibility);
1251*0b57cec5SDimitry Andric     if (TT.supportsCOMDAT())
1252*0b57cec5SDimitry Andric       User->setComdat(M->getOrInsertComdat(User->getName()));
1253*0b57cec5SDimitry Andric 
1254*0b57cec5SDimitry Andric     IRBuilder<> IRB(BasicBlock::Create(M->getContext(), "", User));
1255*0b57cec5SDimitry Andric     auto *Load = IRB.CreateLoad(Int32Ty, Var);
1256*0b57cec5SDimitry Andric     IRB.CreateRet(Load);
1257*0b57cec5SDimitry Andric 
1258349cc55cSDimitry Andric     // Mark the function as used so that it isn't stripped out.
1259fe6060f1SDimitry Andric     CompilerUsedVars.push_back(User);
1260349cc55cSDimitry Andric   }
1261*0b57cec5SDimitry Andric   return true;
1262*0b57cec5SDimitry Andric }
1263*0b57cec5SDimitry Andric 
1264*0b57cec5SDimitry Andric void InstrProfiling::emitUses() {
1265fe6060f1SDimitry Andric   // The metadata sections are parallel arrays. Optimizers (e.g.
1266fe6060f1SDimitry Andric   // GlobalOpt/ConstantMerge) may not discard associated sections as a unit, so
1267fe6060f1SDimitry Andric   // we conservatively retain all unconditionally in the compiler.
1268fe6060f1SDimitry Andric   //
1269349cc55cSDimitry Andric   // On ELF and Mach-O, the linker can guarantee the associated sections will be
1270349cc55cSDimitry Andric   // retained or discarded as a unit, so llvm.compiler.used is sufficient.
1271349cc55cSDimitry Andric   // Similarly on COFF, if prof data is not referenced by code we use one comdat
1272349cc55cSDimitry Andric   // and ensure this GC property as well. Otherwise, we have to conservatively
1273349cc55cSDimitry Andric   // make all of the sections retained by the linker.
1274349cc55cSDimitry Andric   if (TT.isOSBinFormatELF() || TT.isOSBinFormatMachO() ||
1275fe6060f1SDimitry Andric       (TT.isOSBinFormatCOFF() && !profDataReferencedByCode(*M)))
1276fe6060f1SDimitry Andric     appendToCompilerUsed(*M, CompilerUsedVars);
1277fe6060f1SDimitry Andric   else
1278fe6060f1SDimitry Andric     appendToUsed(*M, CompilerUsedVars);
1279fe6060f1SDimitry Andric 
1280fe6060f1SDimitry Andric   // We do not add proper references from used metadata sections to NamesVar and
1281fe6060f1SDimitry Andric   // VNodesVar, so we have to be conservative and place them in llvm.used
1282fe6060f1SDimitry Andric   // regardless of the target,
1283*0b57cec5SDimitry Andric   appendToUsed(*M, UsedVars);
1284*0b57cec5SDimitry Andric }
1285*0b57cec5SDimitry Andric 
1286*0b57cec5SDimitry Andric void InstrProfiling::emitInitialization() {
1287*0b57cec5SDimitry Andric   // Create ProfileFileName variable. Don't don't this for the
1288*0b57cec5SDimitry Andric   // context-sensitive instrumentation lowering: This lowering is after
1289*0b57cec5SDimitry Andric   // LTO/ThinLTO linking. Pass PGOInstrumentationGenCreateVar should
1290*0b57cec5SDimitry Andric   // have already create the variable before LTO/ThinLTO linking.
1291*0b57cec5SDimitry Andric   if (!IsCS)
1292*0b57cec5SDimitry Andric     createProfileFileNameVar(*M, Options.InstrProfileOutput);
1293*0b57cec5SDimitry Andric   Function *RegisterF = M->getFunction(getInstrProfRegFuncsName());
1294*0b57cec5SDimitry Andric   if (!RegisterF)
1295*0b57cec5SDimitry Andric     return;
1296*0b57cec5SDimitry Andric 
1297*0b57cec5SDimitry Andric   // Create the initialization function.
1298*0b57cec5SDimitry Andric   auto *VoidTy = Type::getVoidTy(M->getContext());
1299*0b57cec5SDimitry Andric   auto *F = Function::Create(FunctionType::get(VoidTy, false),
1300*0b57cec5SDimitry Andric                              GlobalValue::InternalLinkage,
1301*0b57cec5SDimitry Andric                              getInstrProfInitFuncName(), M);
1302*0b57cec5SDimitry Andric   F->setUnnamedAddr(GlobalValue::UnnamedAddr::Global);
1303*0b57cec5SDimitry Andric   F->addFnAttr(Attribute::NoInline);
1304*0b57cec5SDimitry Andric   if (Options.NoRedZone)
1305*0b57cec5SDimitry Andric     F->addFnAttr(Attribute::NoRedZone);
1306*0b57cec5SDimitry Andric 
1307*0b57cec5SDimitry Andric   // Add the basic block and the necessary calls.
1308*0b57cec5SDimitry Andric   IRBuilder<> IRB(BasicBlock::Create(M->getContext(), "", F));
1309*0b57cec5SDimitry Andric   IRB.CreateCall(RegisterF, {});
1310*0b57cec5SDimitry Andric   IRB.CreateRetVoid();
1311*0b57cec5SDimitry Andric 
1312*0b57cec5SDimitry Andric   appendToGlobalCtors(*M, F, 0);
1313*0b57cec5SDimitry Andric }
1314