173a6bdd9SChris Lattner //===- ExtractFunction.cpp - Extract a function from Program --------------===// 273a6bdd9SChris Lattner // 373a6bdd9SChris Lattner // This file implements a method that extracts a function from program, cleans 473a6bdd9SChris Lattner // it up, and returns it as a new module. 573a6bdd9SChris Lattner // 673a6bdd9SChris Lattner //===----------------------------------------------------------------------===// 773a6bdd9SChris Lattner 873a6bdd9SChris Lattner #include "BugDriver.h" 973a6bdd9SChris Lattner #include "llvm/Module.h" 1073a6bdd9SChris Lattner #include "llvm/PassManager.h" 1173a6bdd9SChris Lattner #include "llvm/Transforms/IPO.h" 120eb5ce94SChris Lattner #include "llvm/Transforms/Scalar.h" 1373a6bdd9SChris Lattner #include "llvm/Transforms/Utils/Cloning.h" 1444ffd7c3SChris Lattner #include "llvm/Analysis/Verifier.h" 150eb5ce94SChris Lattner #include "llvm/Type.h" 160eb5ce94SChris Lattner #include "llvm/Constant.h" 178d8de422SChris Lattner #include "Support/CommandLine.h" 188d8de422SChris Lattner 19*d1e2aaefSChris Lattner bool DisableSimplifyCFG = false; 20*d1e2aaefSChris Lattner 218d8de422SChris Lattner namespace { 228d8de422SChris Lattner cl::opt<bool> 238d8de422SChris Lattner NoADCE("disable-adce", 248d8de422SChris Lattner cl::desc("Do not use the -adce pass to reduce testcases")); 258d8de422SChris Lattner cl::opt<bool> 268d8de422SChris Lattner NoDCE ("disable-dce", 278d8de422SChris Lattner cl::desc("Do not use the -dce pass to reduce testcases")); 28*d1e2aaefSChris Lattner cl::opt<bool, true> 29*d1e2aaefSChris Lattner NoSCFG("disable-simplifycfg", cl::location(DisableSimplifyCFG), 308d8de422SChris Lattner cl::desc("Do not use the -simplifycfg pass to reduce testcases")); 31d9b15958SChris Lattner cl::opt<bool> 32d9b15958SChris Lattner NoFinalCleanup("disable-final-cleanup", 33d9b15958SChris Lattner cl::desc("Disable the final cleanup phase of narrowing")); 348d8de422SChris Lattner } 3573a6bdd9SChris Lattner 360eb5ce94SChris Lattner /// deleteInstructionFromProgram - This method clones the current Program and 370eb5ce94SChris Lattner /// deletes the specified instruction from the cloned module. It then runs a 380eb5ce94SChris Lattner /// series of cleanup passes (ADCE and SimplifyCFG) to eliminate any code which 390eb5ce94SChris Lattner /// depends on the value. The modified module is then returned. 400eb5ce94SChris Lattner /// 410eb5ce94SChris Lattner Module *BugDriver::deleteInstructionFromProgram(Instruction *I, 420eb5ce94SChris Lattner unsigned Simplification) const { 430eb5ce94SChris Lattner Module *Result = CloneModule(Program); 440eb5ce94SChris Lattner 450eb5ce94SChris Lattner BasicBlock *PBB = I->getParent(); 460eb5ce94SChris Lattner Function *PF = PBB->getParent(); 470eb5ce94SChris Lattner 480eb5ce94SChris Lattner Module::iterator RFI = Result->begin(); // Get iterator to corresponding fn 490eb5ce94SChris Lattner std::advance(RFI, std::distance(Program->begin(), Module::iterator(PF))); 500eb5ce94SChris Lattner 510eb5ce94SChris Lattner Function::iterator RBI = RFI->begin(); // Get iterator to corresponding BB 520eb5ce94SChris Lattner std::advance(RBI, std::distance(PF->begin(), Function::iterator(PBB))); 530eb5ce94SChris Lattner 540eb5ce94SChris Lattner BasicBlock::iterator RI = RBI->begin(); // Get iterator to corresponding inst 550eb5ce94SChris Lattner std::advance(RI, std::distance(PBB->begin(), BasicBlock::iterator(I))); 560eb5ce94SChris Lattner I = RI; // Got the corresponding instruction! 570eb5ce94SChris Lattner 580eb5ce94SChris Lattner // If this instruction produces a value, replace any users with null values 590eb5ce94SChris Lattner if (I->getType() != Type::VoidTy) 600eb5ce94SChris Lattner I->replaceAllUsesWith(Constant::getNullValue(I->getType())); 610eb5ce94SChris Lattner 620eb5ce94SChris Lattner // Remove the instruction from the program. 630eb5ce94SChris Lattner I->getParent()->getInstList().erase(I); 640eb5ce94SChris Lattner 6510c0469bSChris Lattner // Spiff up the output a little bit. 660eb5ce94SChris Lattner PassManager Passes; 678d8de422SChris Lattner if (Simplification > 2 && !NoADCE) 680eb5ce94SChris Lattner Passes.add(createAggressiveDCEPass()); // Remove dead code... 690eb5ce94SChris Lattner //Passes.add(createInstructionCombiningPass()); 708d8de422SChris Lattner if (Simplification > 1 && !NoDCE) 710eb5ce94SChris Lattner Passes.add(createDeadCodeEliminationPass()); 72*d1e2aaefSChris Lattner if (Simplification && !DisableSimplifyCFG) 730eb5ce94SChris Lattner Passes.add(createCFGSimplificationPass()); // Delete dead control flow 7444ffd7c3SChris Lattner 7544ffd7c3SChris Lattner Passes.add(createVerifierPass()); 760eb5ce94SChris Lattner Passes.run(*Result); 770eb5ce94SChris Lattner return Result; 780eb5ce94SChris Lattner } 79514c02ebSChris Lattner 80514c02ebSChris Lattner /// performFinalCleanups - This method clones the current Program and performs 81514c02ebSChris Lattner /// a series of cleanups intended to get rid of extra cruft on the module 82514c02ebSChris Lattner /// before handing it to the user... 83514c02ebSChris Lattner /// 84f7e12540SChris Lattner Module *BugDriver::performFinalCleanups(Module *InM) const { 85f7e12540SChris Lattner Module *M = InM ? InM : CloneModule(Program); 862b3ab562SChris Lattner 87d9b15958SChris Lattner // Allow disabling these passes if they crash bugpoint. 88d9b15958SChris Lattner // 89d9b15958SChris Lattner // FIXME: This should eventually run these passes in a pass list to prevent 90d9b15958SChris Lattner // them from being able to crash bugpoint at all! 91d9b15958SChris Lattner // 92d9b15958SChris Lattner if (NoFinalCleanup) return M; 93d9b15958SChris Lattner 942b3ab562SChris Lattner // Make all functions external, so GlobalDCE doesn't delete them... 952b3ab562SChris Lattner for (Module::iterator I = M->begin(), E = M->end(); I != E; ++I) 962b3ab562SChris Lattner I->setLinkage(GlobalValue::ExternalLinkage); 972b3ab562SChris Lattner 98514c02ebSChris Lattner PassManager CleanupPasses; 99514c02ebSChris Lattner CleanupPasses.add(createFunctionResolvingPass()); 100514c02ebSChris Lattner CleanupPasses.add(createGlobalDCEPass()); 101b0143880SChris Lattner CleanupPasses.add(createDeadTypeEliminationPass()); 102f7e12540SChris Lattner CleanupPasses.add(createDeadArgEliminationPass(InM == 0)); 10344ffd7c3SChris Lattner CleanupPasses.add(createVerifierPass()); 104514c02ebSChris Lattner CleanupPasses.run(*M); 105514c02ebSChris Lattner return M; 106514c02ebSChris Lattner } 107