Chris Lattner | 16bfdb5 | 2002-03-29 19:03:54 +0000 | [diff] [blame] | 1 | |
Chris Lattner | 1666751 | 2002-11-19 20:59:41 +0000 | [diff] [blame] | 2 | |
| 3 | |
Chris Lattner | 16bfdb5 | 2002-03-29 19:03:54 +0000 | [diff] [blame] | 4 | // FIXME: document |
| 5 | |
Chris Lattner | 1666751 | 2002-11-19 20:59:41 +0000 | [diff] [blame] | 6 | #include "llvm/Transforms/Utils/Cloning.h" |
Chris Lattner | b112005 | 2002-11-19 21:54:07 +0000 | [diff] [blame] | 7 | #include "llvm/iTerminators.h" |
Chris Lattner | 16bfdb5 | 2002-03-29 19:03:54 +0000 | [diff] [blame] | 8 | #include "llvm/Function.h" |
Chris Lattner | 16bfdb5 | 2002-03-29 19:03:54 +0000 | [diff] [blame] | 9 | #include <map> |
| 10 | |
Chris Lattner | f998685 | 2002-04-27 07:27:19 +0000 | [diff] [blame] | 11 | // FIXME: This should be merged with FunctionInlining |
Chris Lattner | 16bfdb5 | 2002-03-29 19:03:54 +0000 | [diff] [blame] | 12 | |
| 13 | // RemapInstruction - Convert the instruction operands from referencing the |
| 14 | // current values into those specified by ValueMap. |
| 15 | // |
| 16 | static inline void RemapInstruction(Instruction *I, |
| 17 | std::map<const Value *, Value*> &ValueMap) { |
| 18 | for (unsigned op = 0, E = I->getNumOperands(); op != E; ++op) { |
| 19 | const Value *Op = I->getOperand(op); |
| 20 | Value *V = ValueMap[Op]; |
| 21 | if (!V && (isa<GlobalValue>(Op) || isa<Constant>(Op))) |
| 22 | continue; // Globals and constants don't get relocated |
| 23 | |
| 24 | #ifndef NDEBUG |
| 25 | if (!V) { |
Anand Shukla | 2ac04a0 | 2002-06-25 21:18:19 +0000 | [diff] [blame] | 26 | std::cerr << "Val = \n" << Op << "Addr = " << (void*)Op; |
| 27 | std::cerr << "\nInst = " << I; |
Chris Lattner | 16bfdb5 | 2002-03-29 19:03:54 +0000 | [diff] [blame] | 28 | } |
| 29 | #endif |
| 30 | assert(V && "Referenced value not in value map!"); |
| 31 | I->setOperand(op, V); |
| 32 | } |
| 33 | } |
| 34 | |
| 35 | // Clone OldFunc into NewFunc, transforming the old arguments into references to |
| 36 | // ArgMap values. |
| 37 | // |
| 38 | void CloneFunctionInto(Function *NewFunc, const Function *OldFunc, |
Chris Lattner | b112005 | 2002-11-19 21:54:07 +0000 | [diff] [blame] | 39 | const std::vector<Value*> &ArgMap, |
| 40 | std::vector<ReturnInst*> &Returns, |
| 41 | const char *NameSuffix) { |
| 42 | assert(NameSuffix && "NameSuffix cannot be null!"); |
Chris Lattner | fda72b1 | 2002-06-25 16:12:52 +0000 | [diff] [blame] | 43 | assert(OldFunc->asize() == ArgMap.size() && |
Chris Lattner | 16bfdb5 | 2002-03-29 19:03:54 +0000 | [diff] [blame] | 44 | "Improper number of argument values to map specified!"); |
| 45 | |
| 46 | // Keep a mapping between the original function's values and the new |
| 47 | // duplicated code's values. This includes all of: Function arguments, |
| 48 | // instruction values, constant pool entries, and basic blocks. |
| 49 | // |
| 50 | std::map<const Value *, Value*> ValueMap; |
| 51 | |
| 52 | // Add all of the function arguments to the mapping... |
Chris Lattner | fda72b1 | 2002-06-25 16:12:52 +0000 | [diff] [blame] | 53 | unsigned i = 0; |
| 54 | for (Function::const_aiterator I = OldFunc->abegin(), E = OldFunc->aend(); |
| 55 | I != E; ++I, ++i) |
| 56 | ValueMap[I] = ArgMap[i]; |
Chris Lattner | 16bfdb5 | 2002-03-29 19:03:54 +0000 | [diff] [blame] | 57 | |
| 58 | |
| 59 | // Loop over all of the basic blocks in the function, cloning them as |
Chris Lattner | b112005 | 2002-11-19 21:54:07 +0000 | [diff] [blame] | 60 | // appropriate. Note that we save BE this way in order to handle cloning of |
| 61 | // recursive functions into themselves. |
Chris Lattner | 16bfdb5 | 2002-03-29 19:03:54 +0000 | [diff] [blame] | 62 | // |
| 63 | for (Function::const_iterator BI = OldFunc->begin(), BE = OldFunc->end(); |
| 64 | BI != BE; ++BI) { |
Chris Lattner | fda72b1 | 2002-06-25 16:12:52 +0000 | [diff] [blame] | 65 | const BasicBlock &BB = *BI; |
Chris Lattner | 16bfdb5 | 2002-03-29 19:03:54 +0000 | [diff] [blame] | 66 | |
| 67 | // Create a new basic block to copy instructions into! |
Chris Lattner | b112005 | 2002-11-19 21:54:07 +0000 | [diff] [blame] | 68 | BasicBlock *CBB = new BasicBlock("", NewFunc); |
| 69 | if (BB.hasName()) CBB->setName(BB.getName()+NameSuffix); |
Chris Lattner | fda72b1 | 2002-06-25 16:12:52 +0000 | [diff] [blame] | 70 | ValueMap[&BB] = CBB; // Add basic block mapping. |
Chris Lattner | 16bfdb5 | 2002-03-29 19:03:54 +0000 | [diff] [blame] | 71 | |
| 72 | // Loop over all instructions copying them over... |
Chris Lattner | fda72b1 | 2002-06-25 16:12:52 +0000 | [diff] [blame] | 73 | for (BasicBlock::const_iterator II = BB.begin(), IE = BB.end(); |
Chris Lattner | 16bfdb5 | 2002-03-29 19:03:54 +0000 | [diff] [blame] | 74 | II != IE; ++II) { |
Chris Lattner | fda72b1 | 2002-06-25 16:12:52 +0000 | [diff] [blame] | 75 | Instruction *NewInst = II->clone(); |
Chris Lattner | b112005 | 2002-11-19 21:54:07 +0000 | [diff] [blame] | 76 | if (II->hasName()) |
| 77 | NewInst->setName(II->getName()+NameSuffix); // Name is not cloned... |
Chris Lattner | 16bfdb5 | 2002-03-29 19:03:54 +0000 | [diff] [blame] | 78 | CBB->getInstList().push_back(NewInst); |
Chris Lattner | fda72b1 | 2002-06-25 16:12:52 +0000 | [diff] [blame] | 79 | ValueMap[II] = NewInst; // Add instruction map to value. |
Chris Lattner | 16bfdb5 | 2002-03-29 19:03:54 +0000 | [diff] [blame] | 80 | } |
Chris Lattner | b112005 | 2002-11-19 21:54:07 +0000 | [diff] [blame] | 81 | |
| 82 | if (ReturnInst *RI = dyn_cast<ReturnInst>(CBB->getTerminator())) |
| 83 | Returns.push_back(RI); |
Chris Lattner | 16bfdb5 | 2002-03-29 19:03:54 +0000 | [diff] [blame] | 84 | } |
| 85 | |
| 86 | // Loop over all of the instructions in the function, fixing up operand |
| 87 | // references as we go. This uses ValueMap to do all the hard work. |
| 88 | // |
Chris Lattner | fda72b1 | 2002-06-25 16:12:52 +0000 | [diff] [blame] | 89 | for (Function::const_iterator BB = OldFunc->begin(), BE = OldFunc->end(); |
| 90 | BB != BE; ++BB) { |
Chris Lattner | 16bfdb5 | 2002-03-29 19:03:54 +0000 | [diff] [blame] | 91 | BasicBlock *NBB = cast<BasicBlock>(ValueMap[BB]); |
| 92 | |
| 93 | // Loop over all instructions, fixing each one as we find it... |
Chris Lattner | fda72b1 | 2002-06-25 16:12:52 +0000 | [diff] [blame] | 94 | for (BasicBlock::iterator II = NBB->begin(); II != NBB->end(); ++II) |
| 95 | RemapInstruction(II, ValueMap); |
Chris Lattner | 16bfdb5 | 2002-03-29 19:03:54 +0000 | [diff] [blame] | 96 | } |
| 97 | } |