1 //===- ARMConstantIslandPass.cpp - ARM constant islands -------------------===//
2 //
3 // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
4 // See https://llvm.org/LICENSE.txt for license information.
5 // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
6 //
7 //===----------------------------------------------------------------------===//
8 //
9 // This file contains a pass that splits the constant pool up into 'islands'
10 // which are scattered through-out the function.  This is required due to the
11 // limited pc-relative displacements that ARM has.
12 //
13 //===----------------------------------------------------------------------===//
14 
15 #include "ARM.h"
16 #include "ARMBaseInstrInfo.h"
17 #include "ARMBasicBlockInfo.h"
18 #include "ARMMachineFunctionInfo.h"
19 #include "ARMSubtarget.h"
20 #include "MCTargetDesc/ARMBaseInfo.h"
21 #include "Thumb2InstrInfo.h"
22 #include "Utils/ARMBaseInfo.h"
23 #include "llvm/ADT/DenseMap.h"
24 #include "llvm/ADT/STLExtras.h"
25 #include "llvm/ADT/SmallSet.h"
26 #include "llvm/ADT/SmallVector.h"
27 #include "llvm/ADT/Statistic.h"
28 #include "llvm/ADT/StringRef.h"
29 #include "llvm/CodeGen/MachineBasicBlock.h"
30 #include "llvm/CodeGen/MachineConstantPool.h"
31 #include "llvm/CodeGen/MachineFunction.h"
32 #include "llvm/CodeGen/MachineFunctionPass.h"
33 #include "llvm/CodeGen/MachineInstr.h"
34 #include "llvm/CodeGen/MachineJumpTableInfo.h"
35 #include "llvm/CodeGen/MachineOperand.h"
36 #include "llvm/CodeGen/MachineRegisterInfo.h"
37 #include "llvm/Config/llvm-config.h"
38 #include "llvm/IR/DataLayout.h"
39 #include "llvm/IR/DebugLoc.h"
40 #include "llvm/MC/MCInstrDesc.h"
41 #include "llvm/Pass.h"
42 #include "llvm/Support/CommandLine.h"
43 #include "llvm/Support/Compiler.h"
44 #include "llvm/Support/Debug.h"
45 #include "llvm/Support/ErrorHandling.h"
46 #include "llvm/Support/Format.h"
47 #include "llvm/Support/MathExtras.h"
48 #include "llvm/Support/raw_ostream.h"
49 #include <algorithm>
50 #include <cassert>
51 #include <cstdint>
52 #include <iterator>
53 #include <utility>
54 #include <vector>
55 
56 using namespace llvm;
57 
58 #define DEBUG_TYPE "arm-cp-islands"
59 
60 #define ARM_CP_ISLANDS_OPT_NAME \
61   "ARM constant island placement and branch shortening pass"
62 STATISTIC(NumCPEs,       "Number of constpool entries");
63 STATISTIC(NumSplit,      "Number of uncond branches inserted");
64 STATISTIC(NumCBrFixed,   "Number of cond branches fixed");
65 STATISTIC(NumUBrFixed,   "Number of uncond branches fixed");
66 STATISTIC(NumTBs,        "Number of table branches generated");
67 STATISTIC(NumT2CPShrunk, "Number of Thumb2 constantpool instructions shrunk");
68 STATISTIC(NumT2BrShrunk, "Number of Thumb2 immediate branches shrunk");
69 STATISTIC(NumCBZ,        "Number of CBZ / CBNZ formed");
70 STATISTIC(NumJTMoved,    "Number of jump table destination blocks moved");
71 STATISTIC(NumJTInserted, "Number of jump table intermediate blocks inserted");
72 
73 static cl::opt<bool>
74 AdjustJumpTableBlocks("arm-adjust-jump-tables", cl::Hidden, cl::init(true),
75           cl::desc("Adjust basic block layout to better use TB[BH]"));
76 
77 static cl::opt<unsigned>
78 CPMaxIteration("arm-constant-island-max-iteration", cl::Hidden, cl::init(30),
79           cl::desc("The max number of iteration for converge"));
80 
81 static cl::opt<bool> SynthesizeThumb1TBB(
82     "arm-synthesize-thumb-1-tbb", cl::Hidden, cl::init(true),
83     cl::desc("Use compressed jump tables in Thumb-1 by synthesizing an "
84              "equivalent to the TBB/TBH instructions"));
85 
86 namespace {
87 
88   /// ARMConstantIslands - Due to limited PC-relative displacements, ARM
89   /// requires constant pool entries to be scattered among the instructions
90   /// inside a function.  To do this, it completely ignores the normal LLVM
91   /// constant pool; instead, it places constants wherever it feels like with
92   /// special instructions.
93   ///
94   /// The terminology used in this pass includes:
95   ///   Islands - Clumps of constants placed in the function.
96   ///   Water   - Potential places where an island could be formed.
97   ///   CPE     - A constant pool entry that has been placed somewhere, which
98   ///             tracks a list of users.
99   class ARMConstantIslands : public MachineFunctionPass {
100     std::vector<BasicBlockInfo> BBInfo;
101 
102     /// WaterList - A sorted list of basic blocks where islands could be placed
103     /// (i.e. blocks that don't fall through to the following block, due
104     /// to a return, unreachable, or unconditional branch).
105     std::vector<MachineBasicBlock*> WaterList;
106 
107     /// NewWaterList - The subset of WaterList that was created since the
108     /// previous iteration by inserting unconditional branches.
109     SmallSet<MachineBasicBlock*, 4> NewWaterList;
110 
111     using water_iterator = std::vector<MachineBasicBlock *>::iterator;
112 
113     /// CPUser - One user of a constant pool, keeping the machine instruction
114     /// pointer, the constant pool being referenced, and the max displacement
115     /// allowed from the instruction to the CP.  The HighWaterMark records the
116     /// highest basic block where a new CPEntry can be placed.  To ensure this
117     /// pass terminates, the CP entries are initially placed at the end of the
118     /// function and then move monotonically to lower addresses.  The
119     /// exception to this rule is when the current CP entry for a particular
120     /// CPUser is out of range, but there is another CP entry for the same
121     /// constant value in range.  We want to use the existing in-range CP
122     /// entry, but if it later moves out of range, the search for new water
123     /// should resume where it left off.  The HighWaterMark is used to record
124     /// that point.
125     struct CPUser {
126       MachineInstr *MI;
127       MachineInstr *CPEMI;
128       MachineBasicBlock *HighWaterMark;
129       unsigned MaxDisp;
130       bool NegOk;
131       bool IsSoImm;
132       bool KnownAlignment = false;
133 
134       CPUser(MachineInstr *mi, MachineInstr *cpemi, unsigned maxdisp,
135              bool neg, bool soimm)
136         : MI(mi), CPEMI(cpemi), MaxDisp(maxdisp), NegOk(neg), IsSoImm(soimm) {
137         HighWaterMark = CPEMI->getParent();
138       }
139 
140       /// getMaxDisp - Returns the maximum displacement supported by MI.
141       /// Correct for unknown alignment.
142       /// Conservatively subtract 2 bytes to handle weird alignment effects.
143       unsigned getMaxDisp() const {
144         return (KnownAlignment ? MaxDisp : MaxDisp - 2) - 2;
145       }
146     };
147 
148     /// CPUsers - Keep track of all of the machine instructions that use various
149     /// constant pools and their max displacement.
150     std::vector<CPUser> CPUsers;
151 
152     /// CPEntry - One per constant pool entry, keeping the machine instruction
153     /// pointer, the constpool index, and the number of CPUser's which
154     /// reference this entry.
155     struct CPEntry {
156       MachineInstr *CPEMI;
157       unsigned CPI;
158       unsigned RefCount;
159 
160       CPEntry(MachineInstr *cpemi, unsigned cpi, unsigned rc = 0)
161         : CPEMI(cpemi), CPI(cpi), RefCount(rc) {}
162     };
163 
164     /// CPEntries - Keep track of all of the constant pool entry machine
165     /// instructions. For each original constpool index (i.e. those that existed
166     /// upon entry to this pass), it keeps a vector of entries.  Original
167     /// elements are cloned as we go along; the clones are put in the vector of
168     /// the original element, but have distinct CPIs.
169     ///
170     /// The first half of CPEntries contains generic constants, the second half
171     /// contains jump tables. Use getCombinedIndex on a generic CPEMI to look up
172     /// which vector it will be in here.
173     std::vector<std::vector<CPEntry>> CPEntries;
174 
175     /// Maps a JT index to the offset in CPEntries containing copies of that
176     /// table. The equivalent map for a CONSTPOOL_ENTRY is the identity.
177     DenseMap<int, int> JumpTableEntryIndices;
178 
179     /// Maps a JT index to the LEA that actually uses the index to calculate its
180     /// base address.
181     DenseMap<int, int> JumpTableUserIndices;
182 
183     /// ImmBranch - One per immediate branch, keeping the machine instruction
184     /// pointer, conditional or unconditional, the max displacement,
185     /// and (if isCond is true) the corresponding unconditional branch
186     /// opcode.
187     struct ImmBranch {
188       MachineInstr *MI;
189       unsigned MaxDisp : 31;
190       bool isCond : 1;
191       unsigned UncondBr;
192 
193       ImmBranch(MachineInstr *mi, unsigned maxdisp, bool cond, unsigned ubr)
194         : MI(mi), MaxDisp(maxdisp), isCond(cond), UncondBr(ubr) {}
195     };
196 
197     /// ImmBranches - Keep track of all the immediate branch instructions.
198     std::vector<ImmBranch> ImmBranches;
199 
200     /// PushPopMIs - Keep track of all the Thumb push / pop instructions.
201     SmallVector<MachineInstr*, 4> PushPopMIs;
202 
203     /// T2JumpTables - Keep track of all the Thumb2 jumptable instructions.
204     SmallVector<MachineInstr*, 4> T2JumpTables;
205 
206     /// HasFarJump - True if any far jump instruction has been emitted during
207     /// the branch fix up pass.
208     bool HasFarJump;
209 
210     MachineFunction *MF;
211     MachineConstantPool *MCP;
212     const ARMBaseInstrInfo *TII;
213     const ARMSubtarget *STI;
214     ARMFunctionInfo *AFI;
215     bool isThumb;
216     bool isThumb1;
217     bool isThumb2;
218     bool isPositionIndependentOrROPI;
219 
220   public:
221     static char ID;
222 
223     ARMConstantIslands() : MachineFunctionPass(ID) {}
224 
225     bool runOnMachineFunction(MachineFunction &MF) override;
226 
227     MachineFunctionProperties getRequiredProperties() const override {
228       return MachineFunctionProperties().set(
229           MachineFunctionProperties::Property::NoVRegs);
230     }
231 
232     StringRef getPassName() const override {
233       return ARM_CP_ISLANDS_OPT_NAME;
234     }
235 
236   private:
237     void doInitialConstPlacement(std::vector<MachineInstr *> &CPEMIs);
238     void doInitialJumpTablePlacement(std::vector<MachineInstr *> &CPEMIs);
239     bool BBHasFallthrough(MachineBasicBlock *MBB);
240     CPEntry *findConstPoolEntry(unsigned CPI, const MachineInstr *CPEMI);
241     unsigned getCPELogAlign(const MachineInstr *CPEMI);
242     void scanFunctionJumpTables();
243     void initializeFunctionInfo(const std::vector<MachineInstr*> &CPEMIs);
244     MachineBasicBlock *splitBlockBeforeInstr(MachineInstr *MI);
245     void updateForInsertedWaterBlock(MachineBasicBlock *NewBB);
246     void adjustBBOffsetsAfter(MachineBasicBlock *BB);
247     bool decrementCPEReferenceCount(unsigned CPI, MachineInstr* CPEMI);
248     unsigned getCombinedIndex(const MachineInstr *CPEMI);
249     int findInRangeCPEntry(CPUser& U, unsigned UserOffset);
250     bool findAvailableWater(CPUser&U, unsigned UserOffset,
251                             water_iterator &WaterIter, bool CloserWater);
252     void createNewWater(unsigned CPUserIndex, unsigned UserOffset,
253                         MachineBasicBlock *&NewMBB);
254     bool handleConstantPoolUser(unsigned CPUserIndex, bool CloserWater);
255     void removeDeadCPEMI(MachineInstr *CPEMI);
256     bool removeUnusedCPEntries();
257     bool isCPEntryInRange(MachineInstr *MI, unsigned UserOffset,
258                           MachineInstr *CPEMI, unsigned Disp, bool NegOk,
259                           bool DoDump = false);
260     bool isWaterInRange(unsigned UserOffset, MachineBasicBlock *Water,
261                         CPUser &U, unsigned &Growth);
262     bool isBBInRange(MachineInstr *MI, MachineBasicBlock *BB, unsigned Disp);
263     bool fixupImmediateBr(ImmBranch &Br);
264     bool fixupConditionalBr(ImmBranch &Br);
265     bool fixupUnconditionalBr(ImmBranch &Br);
266     bool undoLRSpillRestore();
267     bool optimizeThumb2Instructions();
268     bool optimizeThumb2Branches();
269     bool reorderThumb2JumpTables();
270     bool preserveBaseRegister(MachineInstr *JumpMI, MachineInstr *LEAMI,
271                               unsigned &DeadSize, bool &CanDeleteLEA,
272                               bool &BaseRegKill);
273     bool optimizeThumb2JumpTables();
274     MachineBasicBlock *adjustJTTargetBlockForward(MachineBasicBlock *BB,
275                                                   MachineBasicBlock *JTBB);
276 
277     unsigned getOffsetOf(MachineInstr *MI) const;
278     unsigned getUserOffset(CPUser&) const;
279     void dumpBBs();
280     void verify();
281 
282     bool isOffsetInRange(unsigned UserOffset, unsigned TrialOffset,
283                          unsigned Disp, bool NegativeOK, bool IsSoImm = false);
284     bool isOffsetInRange(unsigned UserOffset, unsigned TrialOffset,
285                          const CPUser &U) {
286       return isOffsetInRange(UserOffset, TrialOffset,
287                              U.getMaxDisp(), U.NegOk, U.IsSoImm);
288     }
289   };
290 
291 } // end anonymous namespace
292 
293 char ARMConstantIslands::ID = 0;
294 
295 /// verify - check BBOffsets, BBSizes, alignment of islands
296 void ARMConstantIslands::verify() {
297 #ifndef NDEBUG
298   assert(std::is_sorted(MF->begin(), MF->end(),
299                         [this](const MachineBasicBlock &LHS,
300                                const MachineBasicBlock &RHS) {
301                           return BBInfo[LHS.getNumber()].postOffset() <
302                                  BBInfo[RHS.getNumber()].postOffset();
303                         }));
304   LLVM_DEBUG(dbgs() << "Verifying " << CPUsers.size() << " CP users.\n");
305   for (unsigned i = 0, e = CPUsers.size(); i != e; ++i) {
306     CPUser &U = CPUsers[i];
307     unsigned UserOffset = getUserOffset(U);
308     // Verify offset using the real max displacement without the safety
309     // adjustment.
310     if (isCPEntryInRange(U.MI, UserOffset, U.CPEMI, U.getMaxDisp()+2, U.NegOk,
311                          /* DoDump = */ true)) {
312       LLVM_DEBUG(dbgs() << "OK\n");
313       continue;
314     }
315     LLVM_DEBUG(dbgs() << "Out of range.\n");
316     dumpBBs();
317     LLVM_DEBUG(MF->dump());
318     llvm_unreachable("Constant pool entry out of range!");
319   }
320 #endif
321 }
322 
323 #if !defined(NDEBUG) || defined(LLVM_ENABLE_DUMP)
324 /// print block size and offset information - debugging
325 LLVM_DUMP_METHOD void ARMConstantIslands::dumpBBs() {
326   LLVM_DEBUG({
327     for (unsigned J = 0, E = BBInfo.size(); J !=E; ++J) {
328       const BasicBlockInfo &BBI = BBInfo[J];
329       dbgs() << format("%08x %bb.%u\t", BBI.Offset, J)
330              << " kb=" << unsigned(BBI.KnownBits)
331              << " ua=" << unsigned(BBI.Unalign)
332              << " pa=" << unsigned(BBI.PostAlign)
333              << format(" size=%#x\n", BBInfo[J].Size);
334     }
335   });
336 }
337 #endif
338 
339 bool ARMConstantIslands::runOnMachineFunction(MachineFunction &mf) {
340   MF = &mf;
341   MCP = mf.getConstantPool();
342 
343   LLVM_DEBUG(dbgs() << "***** ARMConstantIslands: "
344                     << MCP->getConstants().size() << " CP entries, aligned to "
345                     << MCP->getConstantPoolAlignment() << " bytes *****\n");
346 
347   STI = &static_cast<const ARMSubtarget &>(MF->getSubtarget());
348   TII = STI->getInstrInfo();
349   isPositionIndependentOrROPI =
350       STI->getTargetLowering()->isPositionIndependent() || STI->isROPI();
351   AFI = MF->getInfo<ARMFunctionInfo>();
352 
353   isThumb = AFI->isThumbFunction();
354   isThumb1 = AFI->isThumb1OnlyFunction();
355   isThumb2 = AFI->isThumb2Function();
356 
357   HasFarJump = false;
358   bool GenerateTBB = isThumb2 || (isThumb1 && SynthesizeThumb1TBB);
359 
360   // This pass invalidates liveness information when it splits basic blocks.
361   MF->getRegInfo().invalidateLiveness();
362 
363   // Renumber all of the machine basic blocks in the function, guaranteeing that
364   // the numbers agree with the position of the block in the function.
365   MF->RenumberBlocks();
366 
367   // Try to reorder and otherwise adjust the block layout to make good use
368   // of the TB[BH] instructions.
369   bool MadeChange = false;
370   if (GenerateTBB && AdjustJumpTableBlocks) {
371     scanFunctionJumpTables();
372     MadeChange |= reorderThumb2JumpTables();
373     // Data is out of date, so clear it. It'll be re-computed later.
374     T2JumpTables.clear();
375     // Blocks may have shifted around. Keep the numbering up to date.
376     MF->RenumberBlocks();
377   }
378 
379   // Perform the initial placement of the constant pool entries.  To start with,
380   // we put them all at the end of the function.
381   std::vector<MachineInstr*> CPEMIs;
382   if (!MCP->isEmpty())
383     doInitialConstPlacement(CPEMIs);
384 
385   if (MF->getJumpTableInfo())
386     doInitialJumpTablePlacement(CPEMIs);
387 
388   /// The next UID to take is the first unused one.
389   AFI->initPICLabelUId(CPEMIs.size());
390 
391   // Do the initial scan of the function, building up information about the
392   // sizes of each block, the location of all the water, and finding all of the
393   // constant pool users.
394   initializeFunctionInfo(CPEMIs);
395   CPEMIs.clear();
396   LLVM_DEBUG(dumpBBs());
397 
398   // Functions with jump tables need an alignment of 4 because they use the ADR
399   // instruction, which aligns the PC to 4 bytes before adding an offset.
400   if (!T2JumpTables.empty())
401     MF->ensureAlignment(2);
402 
403   /// Remove dead constant pool entries.
404   MadeChange |= removeUnusedCPEntries();
405 
406   // Iteratively place constant pool entries and fix up branches until there
407   // is no change.
408   unsigned NoCPIters = 0, NoBRIters = 0;
409   while (true) {
410     LLVM_DEBUG(dbgs() << "Beginning CP iteration #" << NoCPIters << '\n');
411     bool CPChange = false;
412     for (unsigned i = 0, e = CPUsers.size(); i != e; ++i)
413       // For most inputs, it converges in no more than 5 iterations.
414       // If it doesn't end in 10, the input may have huge BB or many CPEs.
415       // In this case, we will try different heuristics.
416       CPChange |= handleConstantPoolUser(i, NoCPIters >= CPMaxIteration / 2);
417     if (CPChange && ++NoCPIters > CPMaxIteration)
418       report_fatal_error("Constant Island pass failed to converge!");
419     LLVM_DEBUG(dumpBBs());
420 
421     // Clear NewWaterList now.  If we split a block for branches, it should
422     // appear as "new water" for the next iteration of constant pool placement.
423     NewWaterList.clear();
424 
425     LLVM_DEBUG(dbgs() << "Beginning BR iteration #" << NoBRIters << '\n');
426     bool BRChange = false;
427     for (unsigned i = 0, e = ImmBranches.size(); i != e; ++i)
428       BRChange |= fixupImmediateBr(ImmBranches[i]);
429     if (BRChange && ++NoBRIters > 30)
430       report_fatal_error("Branch Fix Up pass failed to converge!");
431     LLVM_DEBUG(dumpBBs());
432 
433     if (!CPChange && !BRChange)
434       break;
435     MadeChange = true;
436   }
437 
438   // Shrink 32-bit Thumb2 load and store instructions.
439   if (isThumb2 && !STI->prefers32BitThumb())
440     MadeChange |= optimizeThumb2Instructions();
441 
442   // Shrink 32-bit branch instructions.
443   if (isThumb && STI->hasV8MBaselineOps())
444     MadeChange |= optimizeThumb2Branches();
445 
446   // Optimize jump tables using TBB / TBH.
447   if (GenerateTBB && !STI->genExecuteOnly())
448     MadeChange |= optimizeThumb2JumpTables();
449 
450   // After a while, this might be made debug-only, but it is not expensive.
451   verify();
452 
453   // If LR has been forced spilled and no far jump (i.e. BL) has been issued,
454   // undo the spill / restore of LR if possible.
455   if (isThumb && !HasFarJump && AFI->isLRSpilledForFarJump())
456     MadeChange |= undoLRSpillRestore();
457 
458   // Save the mapping between original and cloned constpool entries.
459   for (unsigned i = 0, e = CPEntries.size(); i != e; ++i) {
460     for (unsigned j = 0, je = CPEntries[i].size(); j != je; ++j) {
461       const CPEntry & CPE = CPEntries[i][j];
462       if (CPE.CPEMI && CPE.CPEMI->getOperand(1).isCPI())
463         AFI->recordCPEClone(i, CPE.CPI);
464     }
465   }
466 
467   LLVM_DEBUG(dbgs() << '\n'; dumpBBs());
468 
469   BBInfo.clear();
470   WaterList.clear();
471   CPUsers.clear();
472   CPEntries.clear();
473   JumpTableEntryIndices.clear();
474   JumpTableUserIndices.clear();
475   ImmBranches.clear();
476   PushPopMIs.clear();
477   T2JumpTables.clear();
478 
479   return MadeChange;
480 }
481 
482 /// Perform the initial placement of the regular constant pool entries.
483 /// To start with, we put them all at the end of the function.
484 void
485 ARMConstantIslands::doInitialConstPlacement(std::vector<MachineInstr*> &CPEMIs) {
486   // Create the basic block to hold the CPE's.
487   MachineBasicBlock *BB = MF->CreateMachineBasicBlock();
488   MF->push_back(BB);
489 
490   // MachineConstantPool measures alignment in bytes. We measure in log2(bytes).
491   unsigned MaxAlign = Log2_32(MCP->getConstantPoolAlignment());
492 
493   // Mark the basic block as required by the const-pool.
494   BB->setAlignment(MaxAlign);
495 
496   // The function needs to be as aligned as the basic blocks. The linker may
497   // move functions around based on their alignment.
498   MF->ensureAlignment(BB->getAlignment());
499 
500   // Order the entries in BB by descending alignment.  That ensures correct
501   // alignment of all entries as long as BB is sufficiently aligned.  Keep
502   // track of the insertion point for each alignment.  We are going to bucket
503   // sort the entries as they are created.
504   SmallVector<MachineBasicBlock::iterator, 8> InsPoint(MaxAlign + 1, BB->end());
505 
506   // Add all of the constants from the constant pool to the end block, use an
507   // identity mapping of CPI's to CPE's.
508   const std::vector<MachineConstantPoolEntry> &CPs = MCP->getConstants();
509 
510   const DataLayout &TD = MF->getDataLayout();
511   for (unsigned i = 0, e = CPs.size(); i != e; ++i) {
512     unsigned Size = TD.getTypeAllocSize(CPs[i].getType());
513     unsigned Align = CPs[i].getAlignment();
514     assert(isPowerOf2_32(Align) && "Invalid alignment");
515     // Verify that all constant pool entries are a multiple of their alignment.
516     // If not, we would have to pad them out so that instructions stay aligned.
517     assert((Size % Align) == 0 && "CP Entry not multiple of 4 bytes!");
518 
519     // Insert CONSTPOOL_ENTRY before entries with a smaller alignment.
520     unsigned LogAlign = Log2_32(Align);
521     MachineBasicBlock::iterator InsAt = InsPoint[LogAlign];
522     MachineInstr *CPEMI =
523       BuildMI(*BB, InsAt, DebugLoc(), TII->get(ARM::CONSTPOOL_ENTRY))
524         .addImm(i).addConstantPoolIndex(i).addImm(Size);
525     CPEMIs.push_back(CPEMI);
526 
527     // Ensure that future entries with higher alignment get inserted before
528     // CPEMI. This is bucket sort with iterators.
529     for (unsigned a = LogAlign + 1; a <= MaxAlign; ++a)
530       if (InsPoint[a] == InsAt)
531         InsPoint[a] = CPEMI;
532 
533     // Add a new CPEntry, but no corresponding CPUser yet.
534     CPEntries.emplace_back(1, CPEntry(CPEMI, i));
535     ++NumCPEs;
536     LLVM_DEBUG(dbgs() << "Moved CPI#" << i << " to end of function, size = "
537                       << Size << ", align = " << Align << '\n');
538   }
539   LLVM_DEBUG(BB->dump());
540 }
541 
542 /// Do initial placement of the jump tables. Because Thumb2's TBB and TBH
543 /// instructions can be made more efficient if the jump table immediately
544 /// follows the instruction, it's best to place them immediately next to their
545 /// jumps to begin with. In almost all cases they'll never be moved from that
546 /// position.
547 void ARMConstantIslands::doInitialJumpTablePlacement(
548     std::vector<MachineInstr *> &CPEMIs) {
549   unsigned i = CPEntries.size();
550   auto MJTI = MF->getJumpTableInfo();
551   const std::vector<MachineJumpTableEntry> &JT = MJTI->getJumpTables();
552 
553   MachineBasicBlock *LastCorrectlyNumberedBB = nullptr;
554   for (MachineBasicBlock &MBB : *MF) {
555     auto MI = MBB.getLastNonDebugInstr();
556     if (MI == MBB.end())
557       continue;
558 
559     unsigned JTOpcode;
560     switch (MI->getOpcode()) {
561     default:
562       continue;
563     case ARM::BR_JTadd:
564     case ARM::BR_JTr:
565     case ARM::tBR_JTr:
566     case ARM::BR_JTm_i12:
567     case ARM::BR_JTm_rs:
568       JTOpcode = ARM::JUMPTABLE_ADDRS;
569       break;
570     case ARM::t2BR_JT:
571       JTOpcode = ARM::JUMPTABLE_INSTS;
572       break;
573     case ARM::tTBB_JT:
574     case ARM::t2TBB_JT:
575       JTOpcode = ARM::JUMPTABLE_TBB;
576       break;
577     case ARM::tTBH_JT:
578     case ARM::t2TBH_JT:
579       JTOpcode = ARM::JUMPTABLE_TBH;
580       break;
581     }
582 
583     unsigned NumOps = MI->getDesc().getNumOperands();
584     MachineOperand JTOp =
585       MI->getOperand(NumOps - (MI->isPredicable() ? 2 : 1));
586     unsigned JTI = JTOp.getIndex();
587     unsigned Size = JT[JTI].MBBs.size() * sizeof(uint32_t);
588     MachineBasicBlock *JumpTableBB = MF->CreateMachineBasicBlock();
589     MF->insert(std::next(MachineFunction::iterator(MBB)), JumpTableBB);
590     MachineInstr *CPEMI = BuildMI(*JumpTableBB, JumpTableBB->begin(),
591                                   DebugLoc(), TII->get(JTOpcode))
592                               .addImm(i++)
593                               .addJumpTableIndex(JTI)
594                               .addImm(Size);
595     CPEMIs.push_back(CPEMI);
596     CPEntries.emplace_back(1, CPEntry(CPEMI, JTI));
597     JumpTableEntryIndices.insert(std::make_pair(JTI, CPEntries.size() - 1));
598     if (!LastCorrectlyNumberedBB)
599       LastCorrectlyNumberedBB = &MBB;
600   }
601 
602   // If we did anything then we need to renumber the subsequent blocks.
603   if (LastCorrectlyNumberedBB)
604     MF->RenumberBlocks(LastCorrectlyNumberedBB);
605 }
606 
607 /// BBHasFallthrough - Return true if the specified basic block can fallthrough
608 /// into the block immediately after it.
609 bool ARMConstantIslands::BBHasFallthrough(MachineBasicBlock *MBB) {
610   // Get the next machine basic block in the function.
611   MachineFunction::iterator MBBI = MBB->getIterator();
612   // Can't fall off end of function.
613   if (std::next(MBBI) == MBB->getParent()->end())
614     return false;
615 
616   MachineBasicBlock *NextBB = &*std::next(MBBI);
617   if (!MBB->isSuccessor(NextBB))
618     return false;
619 
620   // Try to analyze the end of the block. A potential fallthrough may already
621   // have an unconditional branch for whatever reason.
622   MachineBasicBlock *TBB, *FBB;
623   SmallVector<MachineOperand, 4> Cond;
624   bool TooDifficult = TII->analyzeBranch(*MBB, TBB, FBB, Cond);
625   return TooDifficult || FBB == nullptr;
626 }
627 
628 /// findConstPoolEntry - Given the constpool index and CONSTPOOL_ENTRY MI,
629 /// look up the corresponding CPEntry.
630 ARMConstantIslands::CPEntry *
631 ARMConstantIslands::findConstPoolEntry(unsigned CPI,
632                                        const MachineInstr *CPEMI) {
633   std::vector<CPEntry> &CPEs = CPEntries[CPI];
634   // Number of entries per constpool index should be small, just do a
635   // linear search.
636   for (unsigned i = 0, e = CPEs.size(); i != e; ++i) {
637     if (CPEs[i].CPEMI == CPEMI)
638       return &CPEs[i];
639   }
640   return nullptr;
641 }
642 
643 /// getCPELogAlign - Returns the required alignment of the constant pool entry
644 /// represented by CPEMI.  Alignment is measured in log2(bytes) units.
645 unsigned ARMConstantIslands::getCPELogAlign(const MachineInstr *CPEMI) {
646   switch (CPEMI->getOpcode()) {
647   case ARM::CONSTPOOL_ENTRY:
648     break;
649   case ARM::JUMPTABLE_TBB:
650     return isThumb1 ? 2 : 0;
651   case ARM::JUMPTABLE_TBH:
652     return isThumb1 ? 2 : 1;
653   case ARM::JUMPTABLE_INSTS:
654     return 1;
655   case ARM::JUMPTABLE_ADDRS:
656     return 2;
657   default:
658     llvm_unreachable("unknown constpool entry kind");
659   }
660 
661   unsigned CPI = getCombinedIndex(CPEMI);
662   assert(CPI < MCP->getConstants().size() && "Invalid constant pool index.");
663   unsigned Align = MCP->getConstants()[CPI].getAlignment();
664   assert(isPowerOf2_32(Align) && "Invalid CPE alignment");
665   return Log2_32(Align);
666 }
667 
668 /// scanFunctionJumpTables - Do a scan of the function, building up
669 /// information about the sizes of each block and the locations of all
670 /// the jump tables.
671 void ARMConstantIslands::scanFunctionJumpTables() {
672   for (MachineBasicBlock &MBB : *MF) {
673     for (MachineInstr &I : MBB)
674       if (I.isBranch() &&
675           (I.getOpcode() == ARM::t2BR_JT || I.getOpcode() == ARM::tBR_JTr))
676         T2JumpTables.push_back(&I);
677   }
678 }
679 
680 /// initializeFunctionInfo - Do the initial scan of the function, building up
681 /// information about the sizes of each block, the location of all the water,
682 /// and finding all of the constant pool users.
683 void ARMConstantIslands::
684 initializeFunctionInfo(const std::vector<MachineInstr*> &CPEMIs) {
685 
686   BBInfo = computeAllBlockSizes(MF);
687 
688   // The known bits of the entry block offset are determined by the function
689   // alignment.
690   BBInfo.front().KnownBits = MF->getAlignment();
691 
692   // Compute block offsets and known bits.
693   adjustBBOffsetsAfter(&MF->front());
694 
695   // Now go back through the instructions and build up our data structures.
696   for (MachineBasicBlock &MBB : *MF) {
697     // If this block doesn't fall through into the next MBB, then this is
698     // 'water' that a constant pool island could be placed.
699     if (!BBHasFallthrough(&MBB))
700       WaterList.push_back(&MBB);
701 
702     for (MachineInstr &I : MBB) {
703       if (I.isDebugInstr())
704         continue;
705 
706       unsigned Opc = I.getOpcode();
707       if (I.isBranch()) {
708         bool isCond = false;
709         unsigned Bits = 0;
710         unsigned Scale = 1;
711         int UOpc = Opc;
712         switch (Opc) {
713         default:
714           continue;  // Ignore other JT branches
715         case ARM::t2BR_JT:
716         case ARM::tBR_JTr:
717           T2JumpTables.push_back(&I);
718           continue;   // Does not get an entry in ImmBranches
719         case ARM::Bcc:
720           isCond = true;
721           UOpc = ARM::B;
722           LLVM_FALLTHROUGH;
723         case ARM::B:
724           Bits = 24;
725           Scale = 4;
726           break;
727         case ARM::tBcc:
728           isCond = true;
729           UOpc = ARM::tB;
730           Bits = 8;
731           Scale = 2;
732           break;
733         case ARM::tB:
734           Bits = 11;
735           Scale = 2;
736           break;
737         case ARM::t2Bcc:
738           isCond = true;
739           UOpc = ARM::t2B;
740           Bits = 20;
741           Scale = 2;
742           break;
743         case ARM::t2B:
744           Bits = 24;
745           Scale = 2;
746           break;
747         }
748 
749         // Record this immediate branch.
750         unsigned MaxOffs = ((1 << (Bits-1))-1) * Scale;
751         ImmBranches.push_back(ImmBranch(&I, MaxOffs, isCond, UOpc));
752       }
753 
754       if (Opc == ARM::tPUSH || Opc == ARM::tPOP_RET)
755         PushPopMIs.push_back(&I);
756 
757       if (Opc == ARM::CONSTPOOL_ENTRY || Opc == ARM::JUMPTABLE_ADDRS ||
758           Opc == ARM::JUMPTABLE_INSTS || Opc == ARM::JUMPTABLE_TBB ||
759           Opc == ARM::JUMPTABLE_TBH)
760         continue;
761 
762       // Scan the instructions for constant pool operands.
763       for (unsigned op = 0, e = I.getNumOperands(); op != e; ++op)
764         if (I.getOperand(op).isCPI() || I.getOperand(op).isJTI()) {
765           // We found one.  The addressing mode tells us the max displacement
766           // from the PC that this instruction permits.
767 
768           // Basic size info comes from the TSFlags field.
769           unsigned Bits = 0;
770           unsigned Scale = 1;
771           bool NegOk = false;
772           bool IsSoImm = false;
773 
774           switch (Opc) {
775           default:
776             llvm_unreachable("Unknown addressing mode for CP reference!");
777 
778           // Taking the address of a CP entry.
779           case ARM::LEApcrel:
780           case ARM::LEApcrelJT:
781             // This takes a SoImm, which is 8 bit immediate rotated. We'll
782             // pretend the maximum offset is 255 * 4. Since each instruction
783             // 4 byte wide, this is always correct. We'll check for other
784             // displacements that fits in a SoImm as well.
785             Bits = 8;
786             Scale = 4;
787             NegOk = true;
788             IsSoImm = true;
789             break;
790           case ARM::t2LEApcrel:
791           case ARM::t2LEApcrelJT:
792             Bits = 12;
793             NegOk = true;
794             break;
795           case ARM::tLEApcrel:
796           case ARM::tLEApcrelJT:
797             Bits = 8;
798             Scale = 4;
799             break;
800 
801           case ARM::LDRBi12:
802           case ARM::LDRi12:
803           case ARM::LDRcp:
804           case ARM::t2LDRpci:
805           case ARM::t2LDRHpci:
806           case ARM::t2LDRBpci:
807             Bits = 12;  // +-offset_12
808             NegOk = true;
809             break;
810 
811           case ARM::tLDRpci:
812             Bits = 8;
813             Scale = 4;  // +(offset_8*4)
814             break;
815 
816           case ARM::VLDRD:
817           case ARM::VLDRS:
818             Bits = 8;
819             Scale = 4;  // +-(offset_8*4)
820             NegOk = true;
821             break;
822           case ARM::VLDRH:
823             Bits = 8;
824             Scale = 2;  // +-(offset_8*2)
825             NegOk = true;
826             break;
827 
828           case ARM::tLDRHi:
829             Bits = 5;
830             Scale = 2; // +(offset_5*2)
831             break;
832           }
833 
834           // Remember that this is a user of a CP entry.
835           unsigned CPI = I.getOperand(op).getIndex();
836           if (I.getOperand(op).isJTI()) {
837             JumpTableUserIndices.insert(std::make_pair(CPI, CPUsers.size()));
838             CPI = JumpTableEntryIndices[CPI];
839           }
840 
841           MachineInstr *CPEMI = CPEMIs[CPI];
842           unsigned MaxOffs = ((1 << Bits)-1) * Scale;
843           CPUsers.push_back(CPUser(&I, CPEMI, MaxOffs, NegOk, IsSoImm));
844 
845           // Increment corresponding CPEntry reference count.
846           CPEntry *CPE = findConstPoolEntry(CPI, CPEMI);
847           assert(CPE && "Cannot find a corresponding CPEntry!");
848           CPE->RefCount++;
849 
850           // Instructions can only use one CP entry, don't bother scanning the
851           // rest of the operands.
852           break;
853         }
854     }
855   }
856 }
857 
858 /// getOffsetOf - Return the current offset of the specified machine instruction
859 /// from the start of the function.  This offset changes as stuff is moved
860 /// around inside the function.
861 unsigned ARMConstantIslands::getOffsetOf(MachineInstr *MI) const {
862   MachineBasicBlock *MBB = MI->getParent();
863 
864   // The offset is composed of two things: the sum of the sizes of all MBB's
865   // before this instruction's block, and the offset from the start of the block
866   // it is in.
867   unsigned Offset = BBInfo[MBB->getNumber()].Offset;
868 
869   // Sum instructions before MI in MBB.
870   for (MachineBasicBlock::iterator I = MBB->begin(); &*I != MI; ++I) {
871     assert(I != MBB->end() && "Didn't find MI in its own basic block?");
872     Offset += TII->getInstSizeInBytes(*I);
873   }
874   return Offset;
875 }
876 
877 /// CompareMBBNumbers - Little predicate function to sort the WaterList by MBB
878 /// ID.
879 static bool CompareMBBNumbers(const MachineBasicBlock *LHS,
880                               const MachineBasicBlock *RHS) {
881   return LHS->getNumber() < RHS->getNumber();
882 }
883 
884 /// updateForInsertedWaterBlock - When a block is newly inserted into the
885 /// machine function, it upsets all of the block numbers.  Renumber the blocks
886 /// and update the arrays that parallel this numbering.
887 void ARMConstantIslands::updateForInsertedWaterBlock(MachineBasicBlock *NewBB) {
888   // Renumber the MBB's to keep them consecutive.
889   NewBB->getParent()->RenumberBlocks(NewBB);
890 
891   // Insert an entry into BBInfo to align it properly with the (newly
892   // renumbered) block numbers.
893   BBInfo.insert(BBInfo.begin() + NewBB->getNumber(), BasicBlockInfo());
894 
895   // Next, update WaterList.  Specifically, we need to add NewMBB as having
896   // available water after it.
897   water_iterator IP =
898     std::lower_bound(WaterList.begin(), WaterList.end(), NewBB,
899                      CompareMBBNumbers);
900   WaterList.insert(IP, NewBB);
901 }
902 
903 /// Split the basic block containing MI into two blocks, which are joined by
904 /// an unconditional branch.  Update data structures and renumber blocks to
905 /// account for this change and returns the newly created block.
906 MachineBasicBlock *ARMConstantIslands::splitBlockBeforeInstr(MachineInstr *MI) {
907   MachineBasicBlock *OrigBB = MI->getParent();
908 
909   // Create a new MBB for the code after the OrigBB.
910   MachineBasicBlock *NewBB =
911     MF->CreateMachineBasicBlock(OrigBB->getBasicBlock());
912   MachineFunction::iterator MBBI = ++OrigBB->getIterator();
913   MF->insert(MBBI, NewBB);
914 
915   // Splice the instructions starting with MI over to NewBB.
916   NewBB->splice(NewBB->end(), OrigBB, MI, OrigBB->end());
917 
918   // Add an unconditional branch from OrigBB to NewBB.
919   // Note the new unconditional branch is not being recorded.
920   // There doesn't seem to be meaningful DebugInfo available; this doesn't
921   // correspond to anything in the source.
922   unsigned Opc = isThumb ? (isThumb2 ? ARM::t2B : ARM::tB) : ARM::B;
923   if (!isThumb)
924     BuildMI(OrigBB, DebugLoc(), TII->get(Opc)).addMBB(NewBB);
925   else
926     BuildMI(OrigBB, DebugLoc(), TII->get(Opc))
927         .addMBB(NewBB)
928         .add(predOps(ARMCC::AL));
929   ++NumSplit;
930 
931   // Update the CFG.  All succs of OrigBB are now succs of NewBB.
932   NewBB->transferSuccessors(OrigBB);
933 
934   // OrigBB branches to NewBB.
935   OrigBB->addSuccessor(NewBB);
936 
937   // Update internal data structures to account for the newly inserted MBB.
938   // This is almost the same as updateForInsertedWaterBlock, except that
939   // the Water goes after OrigBB, not NewBB.
940   MF->RenumberBlocks(NewBB);
941 
942   // Insert an entry into BBInfo to align it properly with the (newly
943   // renumbered) block numbers.
944   BBInfo.insert(BBInfo.begin() + NewBB->getNumber(), BasicBlockInfo());
945 
946   // Next, update WaterList.  Specifically, we need to add OrigMBB as having
947   // available water after it (but not if it's already there, which happens
948   // when splitting before a conditional branch that is followed by an
949   // unconditional branch - in that case we want to insert NewBB).
950   water_iterator IP =
951     std::lower_bound(WaterList.begin(), WaterList.end(), OrigBB,
952                      CompareMBBNumbers);
953   MachineBasicBlock* WaterBB = *IP;
954   if (WaterBB == OrigBB)
955     WaterList.insert(std::next(IP), NewBB);
956   else
957     WaterList.insert(IP, OrigBB);
958   NewWaterList.insert(OrigBB);
959 
960   // Figure out how large the OrigBB is.  As the first half of the original
961   // block, it cannot contain a tablejump.  The size includes
962   // the new jump we added.  (It should be possible to do this without
963   // recounting everything, but it's very confusing, and this is rarely
964   // executed.)
965   computeBlockSize(MF, OrigBB, BBInfo[OrigBB->getNumber()]);
966 
967   // Figure out how large the NewMBB is.  As the second half of the original
968   // block, it may contain a tablejump.
969   computeBlockSize(MF, NewBB, BBInfo[NewBB->getNumber()]);
970 
971   // All BBOffsets following these blocks must be modified.
972   adjustBBOffsetsAfter(OrigBB);
973 
974   return NewBB;
975 }
976 
977 /// getUserOffset - Compute the offset of U.MI as seen by the hardware
978 /// displacement computation.  Update U.KnownAlignment to match its current
979 /// basic block location.
980 unsigned ARMConstantIslands::getUserOffset(CPUser &U) const {
981   unsigned UserOffset = getOffsetOf(U.MI);
982   const BasicBlockInfo &BBI = BBInfo[U.MI->getParent()->getNumber()];
983   unsigned KnownBits = BBI.internalKnownBits();
984 
985   // The value read from PC is offset from the actual instruction address.
986   UserOffset += (isThumb ? 4 : 8);
987 
988   // Because of inline assembly, we may not know the alignment (mod 4) of U.MI.
989   // Make sure U.getMaxDisp() returns a constrained range.
990   U.KnownAlignment = (KnownBits >= 2);
991 
992   // On Thumb, offsets==2 mod 4 are rounded down by the hardware for
993   // purposes of the displacement computation; compensate for that here.
994   // For unknown alignments, getMaxDisp() constrains the range instead.
995   if (isThumb && U.KnownAlignment)
996     UserOffset &= ~3u;
997 
998   return UserOffset;
999 }
1000 
1001 /// isOffsetInRange - Checks whether UserOffset (the location of a constant pool
1002 /// reference) is within MaxDisp of TrialOffset (a proposed location of a
1003 /// constant pool entry).
1004 /// UserOffset is computed by getUserOffset above to include PC adjustments. If
1005 /// the mod 4 alignment of UserOffset is not known, the uncertainty must be
1006 /// subtracted from MaxDisp instead. CPUser::getMaxDisp() does that.
1007 bool ARMConstantIslands::isOffsetInRange(unsigned UserOffset,
1008                                          unsigned TrialOffset, unsigned MaxDisp,
1009                                          bool NegativeOK, bool IsSoImm) {
1010   if (UserOffset <= TrialOffset) {
1011     // User before the Trial.
1012     if (TrialOffset - UserOffset <= MaxDisp)
1013       return true;
1014     // FIXME: Make use full range of soimm values.
1015   } else if (NegativeOK) {
1016     if (UserOffset - TrialOffset <= MaxDisp)
1017       return true;
1018     // FIXME: Make use full range of soimm values.
1019   }
1020   return false;
1021 }
1022 
1023 /// isWaterInRange - Returns true if a CPE placed after the specified
1024 /// Water (a basic block) will be in range for the specific MI.
1025 ///
1026 /// Compute how much the function will grow by inserting a CPE after Water.
1027 bool ARMConstantIslands::isWaterInRange(unsigned UserOffset,
1028                                         MachineBasicBlock* Water, CPUser &U,
1029                                         unsigned &Growth) {
1030   unsigned CPELogAlign = getCPELogAlign(U.CPEMI);
1031   unsigned CPEOffset = BBInfo[Water->getNumber()].postOffset(CPELogAlign);
1032   unsigned NextBlockOffset, NextBlockAlignment;
1033   MachineFunction::const_iterator NextBlock = Water->getIterator();
1034   if (++NextBlock == MF->end()) {
1035     NextBlockOffset = BBInfo[Water->getNumber()].postOffset();
1036     NextBlockAlignment = 0;
1037   } else {
1038     NextBlockOffset = BBInfo[NextBlock->getNumber()].Offset;
1039     NextBlockAlignment = NextBlock->getAlignment();
1040   }
1041   unsigned Size = U.CPEMI->getOperand(2).getImm();
1042   unsigned CPEEnd = CPEOffset + Size;
1043 
1044   // The CPE may be able to hide in the alignment padding before the next
1045   // block. It may also cause more padding to be required if it is more aligned
1046   // that the next block.
1047   if (CPEEnd > NextBlockOffset) {
1048     Growth = CPEEnd - NextBlockOffset;
1049     // Compute the padding that would go at the end of the CPE to align the next
1050     // block.
1051     Growth += OffsetToAlignment(CPEEnd, 1ULL << NextBlockAlignment);
1052 
1053     // If the CPE is to be inserted before the instruction, that will raise
1054     // the offset of the instruction. Also account for unknown alignment padding
1055     // in blocks between CPE and the user.
1056     if (CPEOffset < UserOffset)
1057       UserOffset += Growth + UnknownPadding(MF->getAlignment(), CPELogAlign);
1058   } else
1059     // CPE fits in existing padding.
1060     Growth = 0;
1061 
1062   return isOffsetInRange(UserOffset, CPEOffset, U);
1063 }
1064 
1065 /// isCPEntryInRange - Returns true if the distance between specific MI and
1066 /// specific ConstPool entry instruction can fit in MI's displacement field.
1067 bool ARMConstantIslands::isCPEntryInRange(MachineInstr *MI, unsigned UserOffset,
1068                                       MachineInstr *CPEMI, unsigned MaxDisp,
1069                                       bool NegOk, bool DoDump) {
1070   unsigned CPEOffset  = getOffsetOf(CPEMI);
1071 
1072   if (DoDump) {
1073     LLVM_DEBUG({
1074       unsigned Block = MI->getParent()->getNumber();
1075       const BasicBlockInfo &BBI = BBInfo[Block];
1076       dbgs() << "User of CPE#" << CPEMI->getOperand(0).getImm()
1077              << " max delta=" << MaxDisp
1078              << format(" insn address=%#x", UserOffset) << " in "
1079              << printMBBReference(*MI->getParent()) << ": "
1080              << format("%#x-%x\t", BBI.Offset, BBI.postOffset()) << *MI
1081              << format("CPE address=%#x offset=%+d: ", CPEOffset,
1082                        int(CPEOffset - UserOffset));
1083     });
1084   }
1085 
1086   return isOffsetInRange(UserOffset, CPEOffset, MaxDisp, NegOk);
1087 }
1088 
1089 #ifndef NDEBUG
1090 /// BBIsJumpedOver - Return true of the specified basic block's only predecessor
1091 /// unconditionally branches to its only successor.
1092 static bool BBIsJumpedOver(MachineBasicBlock *MBB) {
1093   if (MBB->pred_size() != 1 || MBB->succ_size() != 1)
1094     return false;
1095 
1096   MachineBasicBlock *Succ = *MBB->succ_begin();
1097   MachineBasicBlock *Pred = *MBB->pred_begin();
1098   MachineInstr *PredMI = &Pred->back();
1099   if (PredMI->getOpcode() == ARM::B || PredMI->getOpcode() == ARM::tB
1100       || PredMI->getOpcode() == ARM::t2B)
1101     return PredMI->getOperand(0).getMBB() == Succ;
1102   return false;
1103 }
1104 #endif // NDEBUG
1105 
1106 void ARMConstantIslands::adjustBBOffsetsAfter(MachineBasicBlock *BB) {
1107   unsigned BBNum = BB->getNumber();
1108   for(unsigned i = BBNum + 1, e = MF->getNumBlockIDs(); i < e; ++i) {
1109     // Get the offset and known bits at the end of the layout predecessor.
1110     // Include the alignment of the current block.
1111     unsigned LogAlign = MF->getBlockNumbered(i)->getAlignment();
1112     unsigned Offset = BBInfo[i - 1].postOffset(LogAlign);
1113     unsigned KnownBits = BBInfo[i - 1].postKnownBits(LogAlign);
1114 
1115     // This is where block i begins.  Stop if the offset is already correct,
1116     // and we have updated 2 blocks.  This is the maximum number of blocks
1117     // changed before calling this function.
1118     if (i > BBNum + 2 &&
1119         BBInfo[i].Offset == Offset &&
1120         BBInfo[i].KnownBits == KnownBits)
1121       break;
1122 
1123     BBInfo[i].Offset = Offset;
1124     BBInfo[i].KnownBits = KnownBits;
1125   }
1126 }
1127 
1128 /// decrementCPEReferenceCount - find the constant pool entry with index CPI
1129 /// and instruction CPEMI, and decrement its refcount.  If the refcount
1130 /// becomes 0 remove the entry and instruction.  Returns true if we removed
1131 /// the entry, false if we didn't.
1132 bool ARMConstantIslands::decrementCPEReferenceCount(unsigned CPI,
1133                                                     MachineInstr *CPEMI) {
1134   // Find the old entry. Eliminate it if it is no longer used.
1135   CPEntry *CPE = findConstPoolEntry(CPI, CPEMI);
1136   assert(CPE && "Unexpected!");
1137   if (--CPE->RefCount == 0) {
1138     removeDeadCPEMI(CPEMI);
1139     CPE->CPEMI = nullptr;
1140     --NumCPEs;
1141     return true;
1142   }
1143   return false;
1144 }
1145 
1146 unsigned ARMConstantIslands::getCombinedIndex(const MachineInstr *CPEMI) {
1147   if (CPEMI->getOperand(1).isCPI())
1148     return CPEMI->getOperand(1).getIndex();
1149 
1150   return JumpTableEntryIndices[CPEMI->getOperand(1).getIndex()];
1151 }
1152 
1153 /// LookForCPEntryInRange - see if the currently referenced CPE is in range;
1154 /// if not, see if an in-range clone of the CPE is in range, and if so,
1155 /// change the data structures so the user references the clone.  Returns:
1156 /// 0 = no existing entry found
1157 /// 1 = entry found, and there were no code insertions or deletions
1158 /// 2 = entry found, and there were code insertions or deletions
1159 int ARMConstantIslands::findInRangeCPEntry(CPUser& U, unsigned UserOffset) {
1160   MachineInstr *UserMI = U.MI;
1161   MachineInstr *CPEMI  = U.CPEMI;
1162 
1163   // Check to see if the CPE is already in-range.
1164   if (isCPEntryInRange(UserMI, UserOffset, CPEMI, U.getMaxDisp(), U.NegOk,
1165                        true)) {
1166     LLVM_DEBUG(dbgs() << "In range\n");
1167     return 1;
1168   }
1169 
1170   // No.  Look for previously created clones of the CPE that are in range.
1171   unsigned CPI = getCombinedIndex(CPEMI);
1172   std::vector<CPEntry> &CPEs = CPEntries[CPI];
1173   for (unsigned i = 0, e = CPEs.size(); i != e; ++i) {
1174     // We already tried this one
1175     if (CPEs[i].CPEMI == CPEMI)
1176       continue;
1177     // Removing CPEs can leave empty entries, skip
1178     if (CPEs[i].CPEMI == nullptr)
1179       continue;
1180     if (isCPEntryInRange(UserMI, UserOffset, CPEs[i].CPEMI, U.getMaxDisp(),
1181                      U.NegOk)) {
1182       LLVM_DEBUG(dbgs() << "Replacing CPE#" << CPI << " with CPE#"
1183                         << CPEs[i].CPI << "\n");
1184       // Point the CPUser node to the replacement
1185       U.CPEMI = CPEs[i].CPEMI;
1186       // Change the CPI in the instruction operand to refer to the clone.
1187       for (unsigned j = 0, e = UserMI->getNumOperands(); j != e; ++j)
1188         if (UserMI->getOperand(j).isCPI()) {
1189           UserMI->getOperand(j).setIndex(CPEs[i].CPI);
1190           break;
1191         }
1192       // Adjust the refcount of the clone...
1193       CPEs[i].RefCount++;
1194       // ...and the original.  If we didn't remove the old entry, none of the
1195       // addresses changed, so we don't need another pass.
1196       return decrementCPEReferenceCount(CPI, CPEMI) ? 2 : 1;
1197     }
1198   }
1199   return 0;
1200 }
1201 
1202 /// getUnconditionalBrDisp - Returns the maximum displacement that can fit in
1203 /// the specific unconditional branch instruction.
1204 static inline unsigned getUnconditionalBrDisp(int Opc) {
1205   switch (Opc) {
1206   case ARM::tB:
1207     return ((1<<10)-1)*2;
1208   case ARM::t2B:
1209     return ((1<<23)-1)*2;
1210   default:
1211     break;
1212   }
1213 
1214   return ((1<<23)-1)*4;
1215 }
1216 
1217 /// findAvailableWater - Look for an existing entry in the WaterList in which
1218 /// we can place the CPE referenced from U so it's within range of U's MI.
1219 /// Returns true if found, false if not.  If it returns true, WaterIter
1220 /// is set to the WaterList entry.  For Thumb, prefer water that will not
1221 /// introduce padding to water that will.  To ensure that this pass
1222 /// terminates, the CPE location for a particular CPUser is only allowed to
1223 /// move to a lower address, so search backward from the end of the list and
1224 /// prefer the first water that is in range.
1225 bool ARMConstantIslands::findAvailableWater(CPUser &U, unsigned UserOffset,
1226                                             water_iterator &WaterIter,
1227                                             bool CloserWater) {
1228   if (WaterList.empty())
1229     return false;
1230 
1231   unsigned BestGrowth = ~0u;
1232   // The nearest water without splitting the UserBB is right after it.
1233   // If the distance is still large (we have a big BB), then we need to split it
1234   // if we don't converge after certain iterations. This helps the following
1235   // situation to converge:
1236   //   BB0:
1237   //      Big BB
1238   //   BB1:
1239   //      Constant Pool
1240   // When a CP access is out of range, BB0 may be used as water. However,
1241   // inserting islands between BB0 and BB1 makes other accesses out of range.
1242   MachineBasicBlock *UserBB = U.MI->getParent();
1243   unsigned MinNoSplitDisp =
1244       BBInfo[UserBB->getNumber()].postOffset(getCPELogAlign(U.CPEMI));
1245   if (CloserWater && MinNoSplitDisp > U.getMaxDisp() / 2)
1246     return false;
1247   for (water_iterator IP = std::prev(WaterList.end()), B = WaterList.begin();;
1248        --IP) {
1249     MachineBasicBlock* WaterBB = *IP;
1250     // Check if water is in range and is either at a lower address than the
1251     // current "high water mark" or a new water block that was created since
1252     // the previous iteration by inserting an unconditional branch.  In the
1253     // latter case, we want to allow resetting the high water mark back to
1254     // this new water since we haven't seen it before.  Inserting branches
1255     // should be relatively uncommon and when it does happen, we want to be
1256     // sure to take advantage of it for all the CPEs near that block, so that
1257     // we don't insert more branches than necessary.
1258     // When CloserWater is true, we try to find the lowest address after (or
1259     // equal to) user MI's BB no matter of padding growth.
1260     unsigned Growth;
1261     if (isWaterInRange(UserOffset, WaterBB, U, Growth) &&
1262         (WaterBB->getNumber() < U.HighWaterMark->getNumber() ||
1263          NewWaterList.count(WaterBB) || WaterBB == U.MI->getParent()) &&
1264         Growth < BestGrowth) {
1265       // This is the least amount of required padding seen so far.
1266       BestGrowth = Growth;
1267       WaterIter = IP;
1268       LLVM_DEBUG(dbgs() << "Found water after " << printMBBReference(*WaterBB)
1269                         << " Growth=" << Growth << '\n');
1270 
1271       if (CloserWater && WaterBB == U.MI->getParent())
1272         return true;
1273       // Keep looking unless it is perfect and we're not looking for the lowest
1274       // possible address.
1275       if (!CloserWater && BestGrowth == 0)
1276         return true;
1277     }
1278     if (IP == B)
1279       break;
1280   }
1281   return BestGrowth != ~0u;
1282 }
1283 
1284 /// createNewWater - No existing WaterList entry will work for
1285 /// CPUsers[CPUserIndex], so create a place to put the CPE.  The end of the
1286 /// block is used if in range, and the conditional branch munged so control
1287 /// flow is correct.  Otherwise the block is split to create a hole with an
1288 /// unconditional branch around it.  In either case NewMBB is set to a
1289 /// block following which the new island can be inserted (the WaterList
1290 /// is not adjusted).
1291 void ARMConstantIslands::createNewWater(unsigned CPUserIndex,
1292                                         unsigned UserOffset,
1293                                         MachineBasicBlock *&NewMBB) {
1294   CPUser &U = CPUsers[CPUserIndex];
1295   MachineInstr *UserMI = U.MI;
1296   MachineInstr *CPEMI  = U.CPEMI;
1297   unsigned CPELogAlign = getCPELogAlign(CPEMI);
1298   MachineBasicBlock *UserMBB = UserMI->getParent();
1299   const BasicBlockInfo &UserBBI = BBInfo[UserMBB->getNumber()];
1300 
1301   // If the block does not end in an unconditional branch already, and if the
1302   // end of the block is within range, make new water there.  (The addition
1303   // below is for the unconditional branch we will be adding: 4 bytes on ARM +
1304   // Thumb2, 2 on Thumb1.
1305   if (BBHasFallthrough(UserMBB)) {
1306     // Size of branch to insert.
1307     unsigned Delta = isThumb1 ? 2 : 4;
1308     // Compute the offset where the CPE will begin.
1309     unsigned CPEOffset = UserBBI.postOffset(CPELogAlign) + Delta;
1310 
1311     if (isOffsetInRange(UserOffset, CPEOffset, U)) {
1312       LLVM_DEBUG(dbgs() << "Split at end of " << printMBBReference(*UserMBB)
1313                         << format(", expected CPE offset %#x\n", CPEOffset));
1314       NewMBB = &*++UserMBB->getIterator();
1315       // Add an unconditional branch from UserMBB to fallthrough block.  Record
1316       // it for branch lengthening; this new branch will not get out of range,
1317       // but if the preceding conditional branch is out of range, the targets
1318       // will be exchanged, and the altered branch may be out of range, so the
1319       // machinery has to know about it.
1320       int UncondBr = isThumb ? ((isThumb2) ? ARM::t2B : ARM::tB) : ARM::B;
1321       if (!isThumb)
1322         BuildMI(UserMBB, DebugLoc(), TII->get(UncondBr)).addMBB(NewMBB);
1323       else
1324         BuildMI(UserMBB, DebugLoc(), TII->get(UncondBr))
1325             .addMBB(NewMBB)
1326             .add(predOps(ARMCC::AL));
1327       unsigned MaxDisp = getUnconditionalBrDisp(UncondBr);
1328       ImmBranches.push_back(ImmBranch(&UserMBB->back(),
1329                                       MaxDisp, false, UncondBr));
1330       computeBlockSize(MF, UserMBB, BBInfo[UserMBB->getNumber()]);
1331       adjustBBOffsetsAfter(UserMBB);
1332       return;
1333     }
1334   }
1335 
1336   // What a big block.  Find a place within the block to split it.  This is a
1337   // little tricky on Thumb1 since instructions are 2 bytes and constant pool
1338   // entries are 4 bytes: if instruction I references island CPE, and
1339   // instruction I+1 references CPE', it will not work well to put CPE as far
1340   // forward as possible, since then CPE' cannot immediately follow it (that
1341   // location is 2 bytes farther away from I+1 than CPE was from I) and we'd
1342   // need to create a new island.  So, we make a first guess, then walk through
1343   // the instructions between the one currently being looked at and the
1344   // possible insertion point, and make sure any other instructions that
1345   // reference CPEs will be able to use the same island area; if not, we back
1346   // up the insertion point.
1347 
1348   // Try to split the block so it's fully aligned.  Compute the latest split
1349   // point where we can add a 4-byte branch instruction, and then align to
1350   // LogAlign which is the largest possible alignment in the function.
1351   unsigned LogAlign = MF->getAlignment();
1352   assert(LogAlign >= CPELogAlign && "Over-aligned constant pool entry");
1353   unsigned KnownBits = UserBBI.internalKnownBits();
1354   unsigned UPad = UnknownPadding(LogAlign, KnownBits);
1355   unsigned BaseInsertOffset = UserOffset + U.getMaxDisp() - UPad;
1356   LLVM_DEBUG(dbgs() << format("Split in middle of big block before %#x",
1357                               BaseInsertOffset));
1358 
1359   // The 4 in the following is for the unconditional branch we'll be inserting
1360   // (allows for long branch on Thumb1).  Alignment of the island is handled
1361   // inside isOffsetInRange.
1362   BaseInsertOffset -= 4;
1363 
1364   LLVM_DEBUG(dbgs() << format(", adjusted to %#x", BaseInsertOffset)
1365                     << " la=" << LogAlign << " kb=" << KnownBits
1366                     << " up=" << UPad << '\n');
1367 
1368   // This could point off the end of the block if we've already got constant
1369   // pool entries following this block; only the last one is in the water list.
1370   // Back past any possible branches (allow for a conditional and a maximally
1371   // long unconditional).
1372   if (BaseInsertOffset + 8 >= UserBBI.postOffset()) {
1373     // Ensure BaseInsertOffset is larger than the offset of the instruction
1374     // following UserMI so that the loop which searches for the split point
1375     // iterates at least once.
1376     BaseInsertOffset =
1377         std::max(UserBBI.postOffset() - UPad - 8,
1378                  UserOffset + TII->getInstSizeInBytes(*UserMI) + 1);
1379     LLVM_DEBUG(dbgs() << format("Move inside block: %#x\n", BaseInsertOffset));
1380   }
1381   unsigned EndInsertOffset = BaseInsertOffset + 4 + UPad +
1382     CPEMI->getOperand(2).getImm();
1383   MachineBasicBlock::iterator MI = UserMI;
1384   ++MI;
1385   unsigned CPUIndex = CPUserIndex+1;
1386   unsigned NumCPUsers = CPUsers.size();
1387   MachineInstr *LastIT = nullptr;
1388   for (unsigned Offset = UserOffset + TII->getInstSizeInBytes(*UserMI);
1389        Offset < BaseInsertOffset;
1390        Offset += TII->getInstSizeInBytes(*MI), MI = std::next(MI)) {
1391     assert(MI != UserMBB->end() && "Fell off end of block");
1392     if (CPUIndex < NumCPUsers && CPUsers[CPUIndex].MI == &*MI) {
1393       CPUser &U = CPUsers[CPUIndex];
1394       if (!isOffsetInRange(Offset, EndInsertOffset, U)) {
1395         // Shift intertion point by one unit of alignment so it is within reach.
1396         BaseInsertOffset -= 1u << LogAlign;
1397         EndInsertOffset  -= 1u << LogAlign;
1398       }
1399       // This is overly conservative, as we don't account for CPEMIs being
1400       // reused within the block, but it doesn't matter much.  Also assume CPEs
1401       // are added in order with alignment padding.  We may eventually be able
1402       // to pack the aligned CPEs better.
1403       EndInsertOffset += U.CPEMI->getOperand(2).getImm();
1404       CPUIndex++;
1405     }
1406 
1407     // Remember the last IT instruction.
1408     if (MI->getOpcode() == ARM::t2IT)
1409       LastIT = &*MI;
1410   }
1411 
1412   --MI;
1413 
1414   // Avoid splitting an IT block.
1415   if (LastIT) {
1416     unsigned PredReg = 0;
1417     ARMCC::CondCodes CC = getITInstrPredicate(*MI, PredReg);
1418     if (CC != ARMCC::AL)
1419       MI = LastIT;
1420   }
1421 
1422   // Avoid splitting a MOVW+MOVT pair with a relocation on Windows.
1423   // On Windows, this instruction pair is covered by one single
1424   // IMAGE_REL_ARM_MOV32T relocation which covers both instructions. If a
1425   // constant island is injected inbetween them, the relocation will clobber
1426   // the instruction and fail to update the MOVT instruction.
1427   // (These instructions are bundled up until right before the ConstantIslands
1428   // pass.)
1429   if (STI->isTargetWindows() && isThumb && MI->getOpcode() == ARM::t2MOVTi16 &&
1430       (MI->getOperand(2).getTargetFlags() & ARMII::MO_OPTION_MASK) ==
1431           ARMII::MO_HI16) {
1432     --MI;
1433     assert(MI->getOpcode() == ARM::t2MOVi16 &&
1434            (MI->getOperand(1).getTargetFlags() & ARMII::MO_OPTION_MASK) ==
1435                ARMII::MO_LO16);
1436   }
1437 
1438   // We really must not split an IT block.
1439   LLVM_DEBUG(unsigned PredReg; assert(
1440                  !isThumb || getITInstrPredicate(*MI, PredReg) == ARMCC::AL));
1441 
1442   NewMBB = splitBlockBeforeInstr(&*MI);
1443 }
1444 
1445 /// handleConstantPoolUser - Analyze the specified user, checking to see if it
1446 /// is out-of-range.  If so, pick up the constant pool value and move it some
1447 /// place in-range.  Return true if we changed any addresses (thus must run
1448 /// another pass of branch lengthening), false otherwise.
1449 bool ARMConstantIslands::handleConstantPoolUser(unsigned CPUserIndex,
1450                                                 bool CloserWater) {
1451   CPUser &U = CPUsers[CPUserIndex];
1452   MachineInstr *UserMI = U.MI;
1453   MachineInstr *CPEMI  = U.CPEMI;
1454   unsigned CPI = getCombinedIndex(CPEMI);
1455   unsigned Size = CPEMI->getOperand(2).getImm();
1456   // Compute this only once, it's expensive.
1457   unsigned UserOffset = getUserOffset(U);
1458 
1459   // See if the current entry is within range, or there is a clone of it
1460   // in range.
1461   int result = findInRangeCPEntry(U, UserOffset);
1462   if (result==1) return false;
1463   else if (result==2) return true;
1464 
1465   // No existing clone of this CPE is within range.
1466   // We will be generating a new clone.  Get a UID for it.
1467   unsigned ID = AFI->createPICLabelUId();
1468 
1469   // Look for water where we can place this CPE.
1470   MachineBasicBlock *NewIsland = MF->CreateMachineBasicBlock();
1471   MachineBasicBlock *NewMBB;
1472   water_iterator IP;
1473   if (findAvailableWater(U, UserOffset, IP, CloserWater)) {
1474     LLVM_DEBUG(dbgs() << "Found water in range\n");
1475     MachineBasicBlock *WaterBB = *IP;
1476 
1477     // If the original WaterList entry was "new water" on this iteration,
1478     // propagate that to the new island.  This is just keeping NewWaterList
1479     // updated to match the WaterList, which will be updated below.
1480     if (NewWaterList.erase(WaterBB))
1481       NewWaterList.insert(NewIsland);
1482 
1483     // The new CPE goes before the following block (NewMBB).
1484     NewMBB = &*++WaterBB->getIterator();
1485   } else {
1486     // No water found.
1487     LLVM_DEBUG(dbgs() << "No water found\n");
1488     createNewWater(CPUserIndex, UserOffset, NewMBB);
1489 
1490     // splitBlockBeforeInstr adds to WaterList, which is important when it is
1491     // called while handling branches so that the water will be seen on the
1492     // next iteration for constant pools, but in this context, we don't want
1493     // it.  Check for this so it will be removed from the WaterList.
1494     // Also remove any entry from NewWaterList.
1495     MachineBasicBlock *WaterBB = &*--NewMBB->getIterator();
1496     IP = find(WaterList, WaterBB);
1497     if (IP != WaterList.end())
1498       NewWaterList.erase(WaterBB);
1499 
1500     // We are adding new water.  Update NewWaterList.
1501     NewWaterList.insert(NewIsland);
1502   }
1503   // Always align the new block because CP entries can be smaller than 4
1504   // bytes. Be careful not to decrease the existing alignment, e.g. NewMBB may
1505   // be an already aligned constant pool block.
1506   const unsigned Align = isThumb ? 1 : 2;
1507   if (NewMBB->getAlignment() < Align)
1508     NewMBB->setAlignment(Align);
1509 
1510   // Remove the original WaterList entry; we want subsequent insertions in
1511   // this vicinity to go after the one we're about to insert.  This
1512   // considerably reduces the number of times we have to move the same CPE
1513   // more than once and is also important to ensure the algorithm terminates.
1514   if (IP != WaterList.end())
1515     WaterList.erase(IP);
1516 
1517   // Okay, we know we can put an island before NewMBB now, do it!
1518   MF->insert(NewMBB->getIterator(), NewIsland);
1519 
1520   // Update internal data structures to account for the newly inserted MBB.
1521   updateForInsertedWaterBlock(NewIsland);
1522 
1523   // Now that we have an island to add the CPE to, clone the original CPE and
1524   // add it to the island.
1525   U.HighWaterMark = NewIsland;
1526   U.CPEMI = BuildMI(NewIsland, DebugLoc(), CPEMI->getDesc())
1527                 .addImm(ID)
1528                 .add(CPEMI->getOperand(1))
1529                 .addImm(Size);
1530   CPEntries[CPI].push_back(CPEntry(U.CPEMI, ID, 1));
1531   ++NumCPEs;
1532 
1533   // Decrement the old entry, and remove it if refcount becomes 0.
1534   decrementCPEReferenceCount(CPI, CPEMI);
1535 
1536   // Mark the basic block as aligned as required by the const-pool entry.
1537   NewIsland->setAlignment(getCPELogAlign(U.CPEMI));
1538 
1539   // Increase the size of the island block to account for the new entry.
1540   BBInfo[NewIsland->getNumber()].Size += Size;
1541   adjustBBOffsetsAfter(&*--NewIsland->getIterator());
1542 
1543   // Finally, change the CPI in the instruction operand to be ID.
1544   for (unsigned i = 0, e = UserMI->getNumOperands(); i != e; ++i)
1545     if (UserMI->getOperand(i).isCPI()) {
1546       UserMI->getOperand(i).setIndex(ID);
1547       break;
1548     }
1549 
1550   LLVM_DEBUG(
1551       dbgs() << "  Moved CPE to #" << ID << " CPI=" << CPI
1552              << format(" offset=%#x\n", BBInfo[NewIsland->getNumber()].Offset));
1553 
1554   return true;
1555 }
1556 
1557 /// removeDeadCPEMI - Remove a dead constant pool entry instruction. Update
1558 /// sizes and offsets of impacted basic blocks.
1559 void ARMConstantIslands::removeDeadCPEMI(MachineInstr *CPEMI) {
1560   MachineBasicBlock *CPEBB = CPEMI->getParent();
1561   unsigned Size = CPEMI->getOperand(2).getImm();
1562   CPEMI->eraseFromParent();
1563   BBInfo[CPEBB->getNumber()].Size -= Size;
1564   // All succeeding offsets have the current size value added in, fix this.
1565   if (CPEBB->empty()) {
1566     BBInfo[CPEBB->getNumber()].Size = 0;
1567 
1568     // This block no longer needs to be aligned.
1569     CPEBB->setAlignment(0);
1570   } else
1571     // Entries are sorted by descending alignment, so realign from the front.
1572     CPEBB->setAlignment(getCPELogAlign(&*CPEBB->begin()));
1573 
1574   adjustBBOffsetsAfter(CPEBB);
1575   // An island has only one predecessor BB and one successor BB. Check if
1576   // this BB's predecessor jumps directly to this BB's successor. This
1577   // shouldn't happen currently.
1578   assert(!BBIsJumpedOver(CPEBB) && "How did this happen?");
1579   // FIXME: remove the empty blocks after all the work is done?
1580 }
1581 
1582 /// removeUnusedCPEntries - Remove constant pool entries whose refcounts
1583 /// are zero.
1584 bool ARMConstantIslands::removeUnusedCPEntries() {
1585   unsigned MadeChange = false;
1586   for (unsigned i = 0, e = CPEntries.size(); i != e; ++i) {
1587       std::vector<CPEntry> &CPEs = CPEntries[i];
1588       for (unsigned j = 0, ee = CPEs.size(); j != ee; ++j) {
1589         if (CPEs[j].RefCount == 0 && CPEs[j].CPEMI) {
1590           removeDeadCPEMI(CPEs[j].CPEMI);
1591           CPEs[j].CPEMI = nullptr;
1592           MadeChange = true;
1593         }
1594       }
1595   }
1596   return MadeChange;
1597 }
1598 
1599 /// isBBInRange - Returns true if the distance between specific MI and
1600 /// specific BB can fit in MI's displacement field.
1601 bool ARMConstantIslands::isBBInRange(MachineInstr *MI,MachineBasicBlock *DestBB,
1602                                      unsigned MaxDisp) {
1603   unsigned PCAdj      = isThumb ? 4 : 8;
1604   unsigned BrOffset   = getOffsetOf(MI) + PCAdj;
1605   unsigned DestOffset = BBInfo[DestBB->getNumber()].Offset;
1606 
1607   LLVM_DEBUG(dbgs() << "Branch of destination " << printMBBReference(*DestBB)
1608                     << " from " << printMBBReference(*MI->getParent())
1609                     << " max delta=" << MaxDisp << " from " << getOffsetOf(MI)
1610                     << " to " << DestOffset << " offset "
1611                     << int(DestOffset - BrOffset) << "\t" << *MI);
1612 
1613   if (BrOffset <= DestOffset) {
1614     // Branch before the Dest.
1615     if (DestOffset-BrOffset <= MaxDisp)
1616       return true;
1617   } else {
1618     if (BrOffset-DestOffset <= MaxDisp)
1619       return true;
1620   }
1621   return false;
1622 }
1623 
1624 /// fixupImmediateBr - Fix up an immediate branch whose destination is too far
1625 /// away to fit in its displacement field.
1626 bool ARMConstantIslands::fixupImmediateBr(ImmBranch &Br) {
1627   MachineInstr *MI = Br.MI;
1628   MachineBasicBlock *DestBB = MI->getOperand(0).getMBB();
1629 
1630   // Check to see if the DestBB is already in-range.
1631   if (isBBInRange(MI, DestBB, Br.MaxDisp))
1632     return false;
1633 
1634   if (!Br.isCond)
1635     return fixupUnconditionalBr(Br);
1636   return fixupConditionalBr(Br);
1637 }
1638 
1639 /// fixupUnconditionalBr - Fix up an unconditional branch whose destination is
1640 /// too far away to fit in its displacement field. If the LR register has been
1641 /// spilled in the epilogue, then we can use BL to implement a far jump.
1642 /// Otherwise, add an intermediate branch instruction to a branch.
1643 bool
1644 ARMConstantIslands::fixupUnconditionalBr(ImmBranch &Br) {
1645   MachineInstr *MI = Br.MI;
1646   MachineBasicBlock *MBB = MI->getParent();
1647   if (!isThumb1)
1648     llvm_unreachable("fixupUnconditionalBr is Thumb1 only!");
1649 
1650   // Use BL to implement far jump.
1651   Br.MaxDisp = (1 << 21) * 2;
1652   MI->setDesc(TII->get(ARM::tBfar));
1653   BBInfo[MBB->getNumber()].Size += 2;
1654   adjustBBOffsetsAfter(MBB);
1655   HasFarJump = true;
1656   ++NumUBrFixed;
1657 
1658   LLVM_DEBUG(dbgs() << "  Changed B to long jump " << *MI);
1659 
1660   return true;
1661 }
1662 
1663 /// fixupConditionalBr - Fix up a conditional branch whose destination is too
1664 /// far away to fit in its displacement field. It is converted to an inverse
1665 /// conditional branch + an unconditional branch to the destination.
1666 bool
1667 ARMConstantIslands::fixupConditionalBr(ImmBranch &Br) {
1668   MachineInstr *MI = Br.MI;
1669   MachineBasicBlock *DestBB = MI->getOperand(0).getMBB();
1670 
1671   // Add an unconditional branch to the destination and invert the branch
1672   // condition to jump over it:
1673   // blt L1
1674   // =>
1675   // bge L2
1676   // b   L1
1677   // L2:
1678   ARMCC::CondCodes CC = (ARMCC::CondCodes)MI->getOperand(1).getImm();
1679   CC = ARMCC::getOppositeCondition(CC);
1680   unsigned CCReg = MI->getOperand(2).getReg();
1681 
1682   // If the branch is at the end of its MBB and that has a fall-through block,
1683   // direct the updated conditional branch to the fall-through block. Otherwise,
1684   // split the MBB before the next instruction.
1685   MachineBasicBlock *MBB = MI->getParent();
1686   MachineInstr *BMI = &MBB->back();
1687   bool NeedSplit = (BMI != MI) || !BBHasFallthrough(MBB);
1688 
1689   ++NumCBrFixed;
1690   if (BMI != MI) {
1691     if (std::next(MachineBasicBlock::iterator(MI)) == std::prev(MBB->end()) &&
1692         BMI->getOpcode() == Br.UncondBr) {
1693       // Last MI in the BB is an unconditional branch. Can we simply invert the
1694       // condition and swap destinations:
1695       // beq L1
1696       // b   L2
1697       // =>
1698       // bne L2
1699       // b   L1
1700       MachineBasicBlock *NewDest = BMI->getOperand(0).getMBB();
1701       if (isBBInRange(MI, NewDest, Br.MaxDisp)) {
1702         LLVM_DEBUG(
1703             dbgs() << "  Invert Bcc condition and swap its destination with "
1704                    << *BMI);
1705         BMI->getOperand(0).setMBB(DestBB);
1706         MI->getOperand(0).setMBB(NewDest);
1707         MI->getOperand(1).setImm(CC);
1708         return true;
1709       }
1710     }
1711   }
1712 
1713   if (NeedSplit) {
1714     splitBlockBeforeInstr(MI);
1715     // No need for the branch to the next block. We're adding an unconditional
1716     // branch to the destination.
1717     int delta = TII->getInstSizeInBytes(MBB->back());
1718     BBInfo[MBB->getNumber()].Size -= delta;
1719     MBB->back().eraseFromParent();
1720 
1721     // The conditional successor will be swapped between the BBs after this, so
1722     // update CFG.
1723     MBB->addSuccessor(DestBB);
1724     std::next(MBB->getIterator())->removeSuccessor(DestBB);
1725 
1726     // BBInfo[SplitBB].Offset is wrong temporarily, fixed below
1727   }
1728   MachineBasicBlock *NextBB = &*++MBB->getIterator();
1729 
1730   LLVM_DEBUG(dbgs() << "  Insert B to " << printMBBReference(*DestBB)
1731                     << " also invert condition and change dest. to "
1732                     << printMBBReference(*NextBB) << "\n");
1733 
1734   // Insert a new conditional branch and a new unconditional branch.
1735   // Also update the ImmBranch as well as adding a new entry for the new branch.
1736   BuildMI(MBB, DebugLoc(), TII->get(MI->getOpcode()))
1737     .addMBB(NextBB).addImm(CC).addReg(CCReg);
1738   Br.MI = &MBB->back();
1739   BBInfo[MBB->getNumber()].Size += TII->getInstSizeInBytes(MBB->back());
1740   if (isThumb)
1741     BuildMI(MBB, DebugLoc(), TII->get(Br.UncondBr))
1742         .addMBB(DestBB)
1743         .add(predOps(ARMCC::AL));
1744   else
1745     BuildMI(MBB, DebugLoc(), TII->get(Br.UncondBr)).addMBB(DestBB);
1746   BBInfo[MBB->getNumber()].Size += TII->getInstSizeInBytes(MBB->back());
1747   unsigned MaxDisp = getUnconditionalBrDisp(Br.UncondBr);
1748   ImmBranches.push_back(ImmBranch(&MBB->back(), MaxDisp, false, Br.UncondBr));
1749 
1750   // Remove the old conditional branch.  It may or may not still be in MBB.
1751   BBInfo[MI->getParent()->getNumber()].Size -= TII->getInstSizeInBytes(*MI);
1752   MI->eraseFromParent();
1753   adjustBBOffsetsAfter(MBB);
1754   return true;
1755 }
1756 
1757 /// undoLRSpillRestore - Remove Thumb push / pop instructions that only spills
1758 /// LR / restores LR to pc. FIXME: This is done here because it's only possible
1759 /// to do this if tBfar is not used.
1760 bool ARMConstantIslands::undoLRSpillRestore() {
1761   bool MadeChange = false;
1762   for (unsigned i = 0, e = PushPopMIs.size(); i != e; ++i) {
1763     MachineInstr *MI = PushPopMIs[i];
1764     // First two operands are predicates.
1765     if (MI->getOpcode() == ARM::tPOP_RET &&
1766         MI->getOperand(2).getReg() == ARM::PC &&
1767         MI->getNumExplicitOperands() == 3) {
1768       // Create the new insn and copy the predicate from the old.
1769       BuildMI(MI->getParent(), MI->getDebugLoc(), TII->get(ARM::tBX_RET))
1770           .add(MI->getOperand(0))
1771           .add(MI->getOperand(1));
1772       MI->eraseFromParent();
1773       MadeChange = true;
1774     } else if (MI->getOpcode() == ARM::tPUSH &&
1775                MI->getOperand(2).getReg() == ARM::LR &&
1776                MI->getNumExplicitOperands() == 3) {
1777       // Just remove the push.
1778       MI->eraseFromParent();
1779       MadeChange = true;
1780     }
1781   }
1782   return MadeChange;
1783 }
1784 
1785 bool ARMConstantIslands::optimizeThumb2Instructions() {
1786   bool MadeChange = false;
1787 
1788   // Shrink ADR and LDR from constantpool.
1789   for (unsigned i = 0, e = CPUsers.size(); i != e; ++i) {
1790     CPUser &U = CPUsers[i];
1791     unsigned Opcode = U.MI->getOpcode();
1792     unsigned NewOpc = 0;
1793     unsigned Scale = 1;
1794     unsigned Bits = 0;
1795     switch (Opcode) {
1796     default: break;
1797     case ARM::t2LEApcrel:
1798       if (isARMLowRegister(U.MI->getOperand(0).getReg())) {
1799         NewOpc = ARM::tLEApcrel;
1800         Bits = 8;
1801         Scale = 4;
1802       }
1803       break;
1804     case ARM::t2LDRpci:
1805       if (isARMLowRegister(U.MI->getOperand(0).getReg())) {
1806         NewOpc = ARM::tLDRpci;
1807         Bits = 8;
1808         Scale = 4;
1809       }
1810       break;
1811     }
1812 
1813     if (!NewOpc)
1814       continue;
1815 
1816     unsigned UserOffset = getUserOffset(U);
1817     unsigned MaxOffs = ((1 << Bits) - 1) * Scale;
1818 
1819     // Be conservative with inline asm.
1820     if (!U.KnownAlignment)
1821       MaxOffs -= 2;
1822 
1823     // FIXME: Check if offset is multiple of scale if scale is not 4.
1824     if (isCPEntryInRange(U.MI, UserOffset, U.CPEMI, MaxOffs, false, true)) {
1825       LLVM_DEBUG(dbgs() << "Shrink: " << *U.MI);
1826       U.MI->setDesc(TII->get(NewOpc));
1827       MachineBasicBlock *MBB = U.MI->getParent();
1828       BBInfo[MBB->getNumber()].Size -= 2;
1829       adjustBBOffsetsAfter(MBB);
1830       ++NumT2CPShrunk;
1831       MadeChange = true;
1832     }
1833   }
1834 
1835   return MadeChange;
1836 }
1837 
1838 bool ARMConstantIslands::optimizeThumb2Branches() {
1839   bool MadeChange = false;
1840 
1841   // The order in which branches appear in ImmBranches is approximately their
1842   // order within the function body. By visiting later branches first, we reduce
1843   // the distance between earlier forward branches and their targets, making it
1844   // more likely that the cbn?z optimization, which can only apply to forward
1845   // branches, will succeed.
1846   for (unsigned i = ImmBranches.size(); i != 0; --i) {
1847     ImmBranch &Br = ImmBranches[i-1];
1848     unsigned Opcode = Br.MI->getOpcode();
1849     unsigned NewOpc = 0;
1850     unsigned Scale = 1;
1851     unsigned Bits = 0;
1852     switch (Opcode) {
1853     default: break;
1854     case ARM::t2B:
1855       NewOpc = ARM::tB;
1856       Bits = 11;
1857       Scale = 2;
1858       break;
1859     case ARM::t2Bcc:
1860       NewOpc = ARM::tBcc;
1861       Bits = 8;
1862       Scale = 2;
1863       break;
1864     }
1865     if (NewOpc) {
1866       unsigned MaxOffs = ((1 << (Bits-1))-1) * Scale;
1867       MachineBasicBlock *DestBB = Br.MI->getOperand(0).getMBB();
1868       if (isBBInRange(Br.MI, DestBB, MaxOffs)) {
1869         LLVM_DEBUG(dbgs() << "Shrink branch: " << *Br.MI);
1870         Br.MI->setDesc(TII->get(NewOpc));
1871         MachineBasicBlock *MBB = Br.MI->getParent();
1872         BBInfo[MBB->getNumber()].Size -= 2;
1873         adjustBBOffsetsAfter(MBB);
1874         ++NumT2BrShrunk;
1875         MadeChange = true;
1876       }
1877     }
1878 
1879     Opcode = Br.MI->getOpcode();
1880     if (Opcode != ARM::tBcc)
1881       continue;
1882 
1883     // If the conditional branch doesn't kill CPSR, then CPSR can be liveout
1884     // so this transformation is not safe.
1885     if (!Br.MI->killsRegister(ARM::CPSR))
1886       continue;
1887 
1888     NewOpc = 0;
1889     unsigned PredReg = 0;
1890     ARMCC::CondCodes Pred = getInstrPredicate(*Br.MI, PredReg);
1891     if (Pred == ARMCC::EQ)
1892       NewOpc = ARM::tCBZ;
1893     else if (Pred == ARMCC::NE)
1894       NewOpc = ARM::tCBNZ;
1895     if (!NewOpc)
1896       continue;
1897     MachineBasicBlock *DestBB = Br.MI->getOperand(0).getMBB();
1898     // Check if the distance is within 126. Subtract starting offset by 2
1899     // because the cmp will be eliminated.
1900     unsigned BrOffset = getOffsetOf(Br.MI) + 4 - 2;
1901     unsigned DestOffset = BBInfo[DestBB->getNumber()].Offset;
1902     if (BrOffset < DestOffset && (DestOffset - BrOffset) <= 126) {
1903       MachineBasicBlock::iterator CmpMI = Br.MI;
1904       if (CmpMI != Br.MI->getParent()->begin()) {
1905         --CmpMI;
1906         if (CmpMI->getOpcode() == ARM::tCMPi8) {
1907           unsigned Reg = CmpMI->getOperand(0).getReg();
1908           Pred = getInstrPredicate(*CmpMI, PredReg);
1909           if (Pred == ARMCC::AL &&
1910               CmpMI->getOperand(1).getImm() == 0 &&
1911               isARMLowRegister(Reg)) {
1912             MachineBasicBlock *MBB = Br.MI->getParent();
1913             LLVM_DEBUG(dbgs() << "Fold: " << *CmpMI << " and: " << *Br.MI);
1914             MachineInstr *NewBR =
1915               BuildMI(*MBB, CmpMI, Br.MI->getDebugLoc(), TII->get(NewOpc))
1916               .addReg(Reg).addMBB(DestBB,Br.MI->getOperand(0).getTargetFlags());
1917             CmpMI->eraseFromParent();
1918             Br.MI->eraseFromParent();
1919             Br.MI = NewBR;
1920             BBInfo[MBB->getNumber()].Size -= 2;
1921             adjustBBOffsetsAfter(MBB);
1922             ++NumCBZ;
1923             MadeChange = true;
1924           }
1925         }
1926       }
1927     }
1928   }
1929 
1930   return MadeChange;
1931 }
1932 
1933 static bool isSimpleIndexCalc(MachineInstr &I, unsigned EntryReg,
1934                               unsigned BaseReg) {
1935   if (I.getOpcode() != ARM::t2ADDrs)
1936     return false;
1937 
1938   if (I.getOperand(0).getReg() != EntryReg)
1939     return false;
1940 
1941   if (I.getOperand(1).getReg() != BaseReg)
1942     return false;
1943 
1944   // FIXME: what about CC and IdxReg?
1945   return true;
1946 }
1947 
1948 /// While trying to form a TBB/TBH instruction, we may (if the table
1949 /// doesn't immediately follow the BR_JT) need access to the start of the
1950 /// jump-table. We know one instruction that produces such a register; this
1951 /// function works out whether that definition can be preserved to the BR_JT,
1952 /// possibly by removing an intervening addition (which is usually needed to
1953 /// calculate the actual entry to jump to).
1954 bool ARMConstantIslands::preserveBaseRegister(MachineInstr *JumpMI,
1955                                               MachineInstr *LEAMI,
1956                                               unsigned &DeadSize,
1957                                               bool &CanDeleteLEA,
1958                                               bool &BaseRegKill) {
1959   if (JumpMI->getParent() != LEAMI->getParent())
1960     return false;
1961 
1962   // Now we hope that we have at least these instructions in the basic block:
1963   //     BaseReg = t2LEA ...
1964   //     [...]
1965   //     EntryReg = t2ADDrs BaseReg, ...
1966   //     [...]
1967   //     t2BR_JT EntryReg
1968   //
1969   // We have to be very conservative about what we recognise here though. The
1970   // main perturbing factors to watch out for are:
1971   //    + Spills at any point in the chain: not direct problems but we would
1972   //      expect a blocking Def of the spilled register so in practice what we
1973   //      can do is limited.
1974   //    + EntryReg == BaseReg: this is the one situation we should allow a Def
1975   //      of BaseReg, but only if the t2ADDrs can be removed.
1976   //    + Some instruction other than t2ADDrs computing the entry. Not seen in
1977   //      the wild, but we should be careful.
1978   unsigned EntryReg = JumpMI->getOperand(0).getReg();
1979   unsigned BaseReg = LEAMI->getOperand(0).getReg();
1980 
1981   CanDeleteLEA = true;
1982   BaseRegKill = false;
1983   MachineInstr *RemovableAdd = nullptr;
1984   MachineBasicBlock::iterator I(LEAMI);
1985   for (++I; &*I != JumpMI; ++I) {
1986     if (isSimpleIndexCalc(*I, EntryReg, BaseReg)) {
1987       RemovableAdd = &*I;
1988       break;
1989     }
1990 
1991     for (unsigned K = 0, E = I->getNumOperands(); K != E; ++K) {
1992       const MachineOperand &MO = I->getOperand(K);
1993       if (!MO.isReg() || !MO.getReg())
1994         continue;
1995       if (MO.isDef() && MO.getReg() == BaseReg)
1996         return false;
1997       if (MO.isUse() && MO.getReg() == BaseReg) {
1998         BaseRegKill = BaseRegKill || MO.isKill();
1999         CanDeleteLEA = false;
2000       }
2001     }
2002   }
2003 
2004   if (!RemovableAdd)
2005     return true;
2006 
2007   // Check the add really is removable, and that nothing else in the block
2008   // clobbers BaseReg.
2009   for (++I; &*I != JumpMI; ++I) {
2010     for (unsigned K = 0, E = I->getNumOperands(); K != E; ++K) {
2011       const MachineOperand &MO = I->getOperand(K);
2012       if (!MO.isReg() || !MO.getReg())
2013         continue;
2014       if (MO.isDef() && MO.getReg() == BaseReg)
2015         return false;
2016       if (MO.isUse() && MO.getReg() == EntryReg)
2017         RemovableAdd = nullptr;
2018     }
2019   }
2020 
2021   if (RemovableAdd) {
2022     RemovableAdd->eraseFromParent();
2023     DeadSize += isThumb2 ? 4 : 2;
2024   } else if (BaseReg == EntryReg) {
2025     // The add wasn't removable, but clobbered the base for the TBB. So we can't
2026     // preserve it.
2027     return false;
2028   }
2029 
2030   // We reached the end of the block without seeing another definition of
2031   // BaseReg (except, possibly the t2ADDrs, which was removed). BaseReg can be
2032   // used in the TBB/TBH if necessary.
2033   return true;
2034 }
2035 
2036 /// Returns whether CPEMI is the first instruction in the block
2037 /// immediately following JTMI (assumed to be a TBB or TBH terminator). If so,
2038 /// we can switch the first register to PC and usually remove the address
2039 /// calculation that preceded it.
2040 static bool jumpTableFollowsTB(MachineInstr *JTMI, MachineInstr *CPEMI) {
2041   MachineFunction::iterator MBB = JTMI->getParent()->getIterator();
2042   MachineFunction *MF = MBB->getParent();
2043   ++MBB;
2044 
2045   return MBB != MF->end() && MBB->begin() != MBB->end() &&
2046          &*MBB->begin() == CPEMI;
2047 }
2048 
2049 static void RemoveDeadAddBetweenLEAAndJT(MachineInstr *LEAMI,
2050                                          MachineInstr *JumpMI,
2051                                          unsigned &DeadSize) {
2052   // Remove a dead add between the LEA and JT, which used to compute EntryReg,
2053   // but the JT now uses PC. Finds the last ADD (if any) that def's EntryReg
2054   // and is not clobbered / used.
2055   MachineInstr *RemovableAdd = nullptr;
2056   unsigned EntryReg = JumpMI->getOperand(0).getReg();
2057 
2058   // Find the last ADD to set EntryReg
2059   MachineBasicBlock::iterator I(LEAMI);
2060   for (++I; &*I != JumpMI; ++I) {
2061     if (I->getOpcode() == ARM::t2ADDrs && I->getOperand(0).getReg() == EntryReg)
2062       RemovableAdd = &*I;
2063   }
2064 
2065   if (!RemovableAdd)
2066     return;
2067 
2068   // Ensure EntryReg is not clobbered or used.
2069   MachineBasicBlock::iterator J(RemovableAdd);
2070   for (++J; &*J != JumpMI; ++J) {
2071     for (unsigned K = 0, E = J->getNumOperands(); K != E; ++K) {
2072       const MachineOperand &MO = J->getOperand(K);
2073       if (!MO.isReg() || !MO.getReg())
2074         continue;
2075       if (MO.isDef() && MO.getReg() == EntryReg)
2076         return;
2077       if (MO.isUse() && MO.getReg() == EntryReg)
2078         return;
2079     }
2080   }
2081 
2082   LLVM_DEBUG(dbgs() << "Removing Dead Add: " << *RemovableAdd);
2083   RemovableAdd->eraseFromParent();
2084   DeadSize += 4;
2085 }
2086 
2087 static bool registerDefinedBetween(unsigned Reg,
2088                                    MachineBasicBlock::iterator From,
2089                                    MachineBasicBlock::iterator To,
2090                                    const TargetRegisterInfo *TRI) {
2091   for (auto I = From; I != To; ++I)
2092     if (I->modifiesRegister(Reg, TRI))
2093       return true;
2094   return false;
2095 }
2096 
2097 /// optimizeThumb2JumpTables - Use tbb / tbh instructions to generate smaller
2098 /// jumptables when it's possible.
2099 bool ARMConstantIslands::optimizeThumb2JumpTables() {
2100   bool MadeChange = false;
2101 
2102   // FIXME: After the tables are shrunk, can we get rid some of the
2103   // constantpool tables?
2104   MachineJumpTableInfo *MJTI = MF->getJumpTableInfo();
2105   if (!MJTI) return false;
2106 
2107   const std::vector<MachineJumpTableEntry> &JT = MJTI->getJumpTables();
2108   for (unsigned i = 0, e = T2JumpTables.size(); i != e; ++i) {
2109     MachineInstr *MI = T2JumpTables[i];
2110     const MCInstrDesc &MCID = MI->getDesc();
2111     unsigned NumOps = MCID.getNumOperands();
2112     unsigned JTOpIdx = NumOps - (MI->isPredicable() ? 2 : 1);
2113     MachineOperand JTOP = MI->getOperand(JTOpIdx);
2114     unsigned JTI = JTOP.getIndex();
2115     assert(JTI < JT.size());
2116 
2117     bool ByteOk = true;
2118     bool HalfWordOk = true;
2119     unsigned JTOffset = getOffsetOf(MI) + 4;
2120     const std::vector<MachineBasicBlock*> &JTBBs = JT[JTI].MBBs;
2121     for (unsigned j = 0, ee = JTBBs.size(); j != ee; ++j) {
2122       MachineBasicBlock *MBB = JTBBs[j];
2123       unsigned DstOffset = BBInfo[MBB->getNumber()].Offset;
2124       // Negative offset is not ok. FIXME: We should change BB layout to make
2125       // sure all the branches are forward.
2126       if (ByteOk && (DstOffset - JTOffset) > ((1<<8)-1)*2)
2127         ByteOk = false;
2128       unsigned TBHLimit = ((1<<16)-1)*2;
2129       if (HalfWordOk && (DstOffset - JTOffset) > TBHLimit)
2130         HalfWordOk = false;
2131       if (!ByteOk && !HalfWordOk)
2132         break;
2133     }
2134 
2135     if (!ByteOk && !HalfWordOk)
2136       continue;
2137 
2138     CPUser &User = CPUsers[JumpTableUserIndices[JTI]];
2139     MachineBasicBlock *MBB = MI->getParent();
2140     if (!MI->getOperand(0).isKill()) // FIXME: needed now?
2141       continue;
2142 
2143     unsigned DeadSize = 0;
2144     bool CanDeleteLEA = false;
2145     bool BaseRegKill = false;
2146 
2147     unsigned IdxReg = ~0U;
2148     bool IdxRegKill = true;
2149     if (isThumb2) {
2150       IdxReg = MI->getOperand(1).getReg();
2151       IdxRegKill = MI->getOperand(1).isKill();
2152 
2153       bool PreservedBaseReg =
2154         preserveBaseRegister(MI, User.MI, DeadSize, CanDeleteLEA, BaseRegKill);
2155       if (!jumpTableFollowsTB(MI, User.CPEMI) && !PreservedBaseReg)
2156         continue;
2157     } else {
2158       // We're in thumb-1 mode, so we must have something like:
2159       //   %idx = tLSLri %idx, 2
2160       //   %base = tLEApcrelJT
2161       //   %t = tLDRr %base, %idx
2162       unsigned BaseReg = User.MI->getOperand(0).getReg();
2163 
2164       if (User.MI->getIterator() == User.MI->getParent()->begin())
2165         continue;
2166       MachineInstr *Shift = User.MI->getPrevNode();
2167       if (Shift->getOpcode() != ARM::tLSLri ||
2168           Shift->getOperand(3).getImm() != 2 ||
2169           !Shift->getOperand(2).isKill())
2170         continue;
2171       IdxReg = Shift->getOperand(2).getReg();
2172       unsigned ShiftedIdxReg = Shift->getOperand(0).getReg();
2173 
2174       // It's important that IdxReg is live until the actual TBB/TBH. Most of
2175       // the range is checked later, but the LEA might still clobber it and not
2176       // actually get removed.
2177       if (BaseReg == IdxReg && !jumpTableFollowsTB(MI, User.CPEMI))
2178         continue;
2179 
2180       MachineInstr *Load = User.MI->getNextNode();
2181       if (Load->getOpcode() != ARM::tLDRr)
2182         continue;
2183       if (Load->getOperand(1).getReg() != BaseReg ||
2184           Load->getOperand(2).getReg() != ShiftedIdxReg ||
2185           !Load->getOperand(2).isKill())
2186         continue;
2187 
2188       // If we're in PIC mode, there should be another ADD following.
2189       auto *TRI = STI->getRegisterInfo();
2190 
2191       // %base cannot be redefined after the load as it will appear before
2192       // TBB/TBH like:
2193       //      %base =
2194       //      %base =
2195       //      tBB %base, %idx
2196       if (registerDefinedBetween(BaseReg, Load->getNextNode(), MBB->end(), TRI))
2197         continue;
2198 
2199       if (isPositionIndependentOrROPI) {
2200         MachineInstr *Add = Load->getNextNode();
2201         if (Add->getOpcode() != ARM::tADDrr ||
2202             Add->getOperand(2).getReg() != BaseReg ||
2203             Add->getOperand(3).getReg() != Load->getOperand(0).getReg() ||
2204             !Add->getOperand(3).isKill())
2205           continue;
2206         if (Add->getOperand(0).getReg() != MI->getOperand(0).getReg())
2207           continue;
2208         if (registerDefinedBetween(IdxReg, Add->getNextNode(), MI, TRI))
2209           // IdxReg gets redefined in the middle of the sequence.
2210           continue;
2211         Add->eraseFromParent();
2212         DeadSize += 2;
2213       } else {
2214         if (Load->getOperand(0).getReg() != MI->getOperand(0).getReg())
2215           continue;
2216         if (registerDefinedBetween(IdxReg, Load->getNextNode(), MI, TRI))
2217           // IdxReg gets redefined in the middle of the sequence.
2218           continue;
2219       }
2220 
2221       // Now safe to delete the load and lsl. The LEA will be removed later.
2222       CanDeleteLEA = true;
2223       Shift->eraseFromParent();
2224       Load->eraseFromParent();
2225       DeadSize += 4;
2226     }
2227 
2228     LLVM_DEBUG(dbgs() << "Shrink JT: " << *MI);
2229     MachineInstr *CPEMI = User.CPEMI;
2230     unsigned Opc = ByteOk ? ARM::t2TBB_JT : ARM::t2TBH_JT;
2231     if (!isThumb2)
2232       Opc = ByteOk ? ARM::tTBB_JT : ARM::tTBH_JT;
2233 
2234     MachineBasicBlock::iterator MI_JT = MI;
2235     MachineInstr *NewJTMI =
2236         BuildMI(*MBB, MI_JT, MI->getDebugLoc(), TII->get(Opc))
2237             .addReg(User.MI->getOperand(0).getReg(),
2238                     getKillRegState(BaseRegKill))
2239             .addReg(IdxReg, getKillRegState(IdxRegKill))
2240             .addJumpTableIndex(JTI, JTOP.getTargetFlags())
2241             .addImm(CPEMI->getOperand(0).getImm());
2242     LLVM_DEBUG(dbgs() << printMBBReference(*MBB) << ": " << *NewJTMI);
2243 
2244     unsigned JTOpc = ByteOk ? ARM::JUMPTABLE_TBB : ARM::JUMPTABLE_TBH;
2245     CPEMI->setDesc(TII->get(JTOpc));
2246 
2247     if (jumpTableFollowsTB(MI, User.CPEMI)) {
2248       NewJTMI->getOperand(0).setReg(ARM::PC);
2249       NewJTMI->getOperand(0).setIsKill(false);
2250 
2251       if (CanDeleteLEA) {
2252         if (isThumb2)
2253           RemoveDeadAddBetweenLEAAndJT(User.MI, MI, DeadSize);
2254 
2255         User.MI->eraseFromParent();
2256         DeadSize += isThumb2 ? 4 : 2;
2257 
2258         // The LEA was eliminated, the TBB instruction becomes the only new user
2259         // of the jump table.
2260         User.MI = NewJTMI;
2261         User.MaxDisp = 4;
2262         User.NegOk = false;
2263         User.IsSoImm = false;
2264         User.KnownAlignment = false;
2265       } else {
2266         // The LEA couldn't be eliminated, so we must add another CPUser to
2267         // record the TBB or TBH use.
2268         int CPEntryIdx = JumpTableEntryIndices[JTI];
2269         auto &CPEs = CPEntries[CPEntryIdx];
2270         auto Entry =
2271             find_if(CPEs, [&](CPEntry &E) { return E.CPEMI == User.CPEMI; });
2272         ++Entry->RefCount;
2273         CPUsers.emplace_back(CPUser(NewJTMI, User.CPEMI, 4, false, false));
2274       }
2275     }
2276 
2277     unsigned NewSize = TII->getInstSizeInBytes(*NewJTMI);
2278     unsigned OrigSize = TII->getInstSizeInBytes(*MI);
2279     MI->eraseFromParent();
2280 
2281     int Delta = OrigSize - NewSize + DeadSize;
2282     BBInfo[MBB->getNumber()].Size -= Delta;
2283     adjustBBOffsetsAfter(MBB);
2284 
2285     ++NumTBs;
2286     MadeChange = true;
2287   }
2288 
2289   return MadeChange;
2290 }
2291 
2292 /// reorderThumb2JumpTables - Adjust the function's block layout to ensure that
2293 /// jump tables always branch forwards, since that's what tbb and tbh need.
2294 bool ARMConstantIslands::reorderThumb2JumpTables() {
2295   bool MadeChange = false;
2296 
2297   MachineJumpTableInfo *MJTI = MF->getJumpTableInfo();
2298   if (!MJTI) return false;
2299 
2300   const std::vector<MachineJumpTableEntry> &JT = MJTI->getJumpTables();
2301   for (unsigned i = 0, e = T2JumpTables.size(); i != e; ++i) {
2302     MachineInstr *MI = T2JumpTables[i];
2303     const MCInstrDesc &MCID = MI->getDesc();
2304     unsigned NumOps = MCID.getNumOperands();
2305     unsigned JTOpIdx = NumOps - (MI->isPredicable() ? 2 : 1);
2306     MachineOperand JTOP = MI->getOperand(JTOpIdx);
2307     unsigned JTI = JTOP.getIndex();
2308     assert(JTI < JT.size());
2309 
2310     // We prefer if target blocks for the jump table come after the jump
2311     // instruction so we can use TB[BH]. Loop through the target blocks
2312     // and try to adjust them such that that's true.
2313     int JTNumber = MI->getParent()->getNumber();
2314     const std::vector<MachineBasicBlock*> &JTBBs = JT[JTI].MBBs;
2315     for (unsigned j = 0, ee = JTBBs.size(); j != ee; ++j) {
2316       MachineBasicBlock *MBB = JTBBs[j];
2317       int DTNumber = MBB->getNumber();
2318 
2319       if (DTNumber < JTNumber) {
2320         // The destination precedes the switch. Try to move the block forward
2321         // so we have a positive offset.
2322         MachineBasicBlock *NewBB =
2323           adjustJTTargetBlockForward(MBB, MI->getParent());
2324         if (NewBB)
2325           MJTI->ReplaceMBBInJumpTable(JTI, JTBBs[j], NewBB);
2326         MadeChange = true;
2327       }
2328     }
2329   }
2330 
2331   return MadeChange;
2332 }
2333 
2334 MachineBasicBlock *ARMConstantIslands::
2335 adjustJTTargetBlockForward(MachineBasicBlock *BB, MachineBasicBlock *JTBB) {
2336   // If the destination block is terminated by an unconditional branch,
2337   // try to move it; otherwise, create a new block following the jump
2338   // table that branches back to the actual target. This is a very simple
2339   // heuristic. FIXME: We can definitely improve it.
2340   MachineBasicBlock *TBB = nullptr, *FBB = nullptr;
2341   SmallVector<MachineOperand, 4> Cond;
2342   SmallVector<MachineOperand, 4> CondPrior;
2343   MachineFunction::iterator BBi = BB->getIterator();
2344   MachineFunction::iterator OldPrior = std::prev(BBi);
2345 
2346   // If the block terminator isn't analyzable, don't try to move the block
2347   bool B = TII->analyzeBranch(*BB, TBB, FBB, Cond);
2348 
2349   // If the block ends in an unconditional branch, move it. The prior block
2350   // has to have an analyzable terminator for us to move this one. Be paranoid
2351   // and make sure we're not trying to move the entry block of the function.
2352   if (!B && Cond.empty() && BB != &MF->front() &&
2353       !TII->analyzeBranch(*OldPrior, TBB, FBB, CondPrior)) {
2354     BB->moveAfter(JTBB);
2355     OldPrior->updateTerminator();
2356     BB->updateTerminator();
2357     // Update numbering to account for the block being moved.
2358     MF->RenumberBlocks();
2359     ++NumJTMoved;
2360     return nullptr;
2361   }
2362 
2363   // Create a new MBB for the code after the jump BB.
2364   MachineBasicBlock *NewBB =
2365     MF->CreateMachineBasicBlock(JTBB->getBasicBlock());
2366   MachineFunction::iterator MBBI = ++JTBB->getIterator();
2367   MF->insert(MBBI, NewBB);
2368 
2369   // Add an unconditional branch from NewBB to BB.
2370   // There doesn't seem to be meaningful DebugInfo available; this doesn't
2371   // correspond directly to anything in the source.
2372   if (isThumb2)
2373     BuildMI(NewBB, DebugLoc(), TII->get(ARM::t2B))
2374         .addMBB(BB)
2375         .add(predOps(ARMCC::AL));
2376   else
2377     BuildMI(NewBB, DebugLoc(), TII->get(ARM::tB))
2378         .addMBB(BB)
2379         .add(predOps(ARMCC::AL));
2380 
2381   // Update internal data structures to account for the newly inserted MBB.
2382   MF->RenumberBlocks(NewBB);
2383 
2384   // Update the CFG.
2385   NewBB->addSuccessor(BB);
2386   JTBB->replaceSuccessor(BB, NewBB);
2387 
2388   ++NumJTInserted;
2389   return NewBB;
2390 }
2391 
2392 /// createARMConstantIslandPass - returns an instance of the constpool
2393 /// island pass.
2394 FunctionPass *llvm::createARMConstantIslandPass() {
2395   return new ARMConstantIslands();
2396 }
2397 
2398 INITIALIZE_PASS(ARMConstantIslands, "arm-cp-islands", ARM_CP_ISLANDS_OPT_NAME,
2399                 false, false)
2400