173a6bdd9SChris Lattner //===- ExtractFunction.cpp - Extract a function from Program --------------===// 273a6bdd9SChris Lattner // 309344dcfSJohn Criswell // The LLVM Compiler Infrastructure 409344dcfSJohn Criswell // 509344dcfSJohn Criswell // This file was developed by the LLVM research group and is distributed under 609344dcfSJohn Criswell // the University of Illinois Open Source License. See LICENSE.TXT for details. 709344dcfSJohn Criswell // 809344dcfSJohn Criswell //===----------------------------------------------------------------------===// 909344dcfSJohn Criswell // 1073a6bdd9SChris Lattner // This file implements a method that extracts a function from program, cleans 1173a6bdd9SChris Lattner // it up, and returns it as a new module. 1273a6bdd9SChris Lattner // 1373a6bdd9SChris Lattner //===----------------------------------------------------------------------===// 1473a6bdd9SChris Lattner 1573a6bdd9SChris Lattner #include "BugDriver.h" 160c2305b1SMisha Brukman #include "llvm/Constant.h" 1773a6bdd9SChris Lattner #include "llvm/Module.h" 1873a6bdd9SChris Lattner #include "llvm/PassManager.h" 19ef432703SBrian Gaeke #include "llvm/Pass.h" 200c2305b1SMisha Brukman #include "llvm/Type.h" 210c2305b1SMisha Brukman #include "llvm/Analysis/Verifier.h" 2273a6bdd9SChris Lattner #include "llvm/Transforms/IPO.h" 230eb5ce94SChris Lattner #include "llvm/Transforms/Scalar.h" 2473a6bdd9SChris Lattner #include "llvm/Transforms/Utils/Cloning.h" 25f3e8f97dSChris Lattner #include "llvm/Target/TargetData.h" 268d8de422SChris Lattner #include "Support/CommandLine.h" 27567543f0SChris Lattner #include "Support/Debug.h" 28233b0691SChris Lattner #include "Support/FileUtilities.h" 293f1ad878SChris Lattner using namespace llvm; 30960707c3SBrian Gaeke 31960707c3SBrian Gaeke namespace llvm { 32d1e2aaefSChris Lattner bool DisableSimplifyCFG = false; 33960707c3SBrian Gaeke } // End llvm namespace 34960707c3SBrian Gaeke 358d8de422SChris Lattner namespace { 368d8de422SChris Lattner cl::opt<bool> 378d8de422SChris Lattner NoDCE ("disable-dce", 388d8de422SChris Lattner cl::desc("Do not use the -dce pass to reduce testcases")); 39d1e2aaefSChris Lattner cl::opt<bool, true> 40d1e2aaefSChris Lattner NoSCFG("disable-simplifycfg", cl::location(DisableSimplifyCFG), 418d8de422SChris Lattner cl::desc("Do not use the -simplifycfg pass to reduce testcases")); 428d8de422SChris Lattner } 4373a6bdd9SChris Lattner 440eb5ce94SChris Lattner /// deleteInstructionFromProgram - This method clones the current Program and 450eb5ce94SChris Lattner /// deletes the specified instruction from the cloned module. It then runs a 460eb5ce94SChris Lattner /// series of cleanup passes (ADCE and SimplifyCFG) to eliminate any code which 470eb5ce94SChris Lattner /// depends on the value. The modified module is then returned. 480eb5ce94SChris Lattner /// 49b943b6b0SChris Lattner Module *BugDriver::deleteInstructionFromProgram(const Instruction *I, 500eb5ce94SChris Lattner unsigned Simplification) const { 510eb5ce94SChris Lattner Module *Result = CloneModule(Program); 520eb5ce94SChris Lattner 53b943b6b0SChris Lattner const BasicBlock *PBB = I->getParent(); 54b943b6b0SChris Lattner const Function *PF = PBB->getParent(); 550eb5ce94SChris Lattner 560eb5ce94SChris Lattner Module::iterator RFI = Result->begin(); // Get iterator to corresponding fn 57b943b6b0SChris Lattner std::advance(RFI, std::distance(PF->getParent()->begin(), 58b943b6b0SChris Lattner Module::const_iterator(PF))); 590eb5ce94SChris Lattner 600eb5ce94SChris Lattner Function::iterator RBI = RFI->begin(); // Get iterator to corresponding BB 61b943b6b0SChris Lattner std::advance(RBI, std::distance(PF->begin(), Function::const_iterator(PBB))); 620eb5ce94SChris Lattner 630eb5ce94SChris Lattner BasicBlock::iterator RI = RBI->begin(); // Get iterator to corresponding inst 64b943b6b0SChris Lattner std::advance(RI, std::distance(PBB->begin(), BasicBlock::const_iterator(I))); 65b943b6b0SChris Lattner Instruction *TheInst = RI; // Got the corresponding instruction! 660eb5ce94SChris Lattner 670eb5ce94SChris Lattner // If this instruction produces a value, replace any users with null values 68b943b6b0SChris Lattner if (TheInst->getType() != Type::VoidTy) 69b943b6b0SChris Lattner TheInst->replaceAllUsesWith(Constant::getNullValue(TheInst->getType())); 700eb5ce94SChris Lattner 710eb5ce94SChris Lattner // Remove the instruction from the program. 72b943b6b0SChris Lattner TheInst->getParent()->getInstList().erase(TheInst); 730eb5ce94SChris Lattner 7410c0469bSChris Lattner // Spiff up the output a little bit. 750eb5ce94SChris Lattner PassManager Passes; 76f3e8f97dSChris Lattner // Make sure that the appropriate target data is always used... 77f3e8f97dSChris Lattner Passes.add(new TargetData("bugpoint", Result)); 78f3e8f97dSChris Lattner 798d8de422SChris Lattner if (Simplification > 1 && !NoDCE) 800eb5ce94SChris Lattner Passes.add(createDeadCodeEliminationPass()); 81d1e2aaefSChris Lattner if (Simplification && !DisableSimplifyCFG) 820eb5ce94SChris Lattner Passes.add(createCFGSimplificationPass()); // Delete dead control flow 8344ffd7c3SChris Lattner 8444ffd7c3SChris Lattner Passes.add(createVerifierPass()); 850eb5ce94SChris Lattner Passes.run(*Result); 860eb5ce94SChris Lattner return Result; 870eb5ce94SChris Lattner } 88514c02ebSChris Lattner 892920100eSChris Lattner static const PassInfo *getPI(Pass *P) { 902920100eSChris Lattner const PassInfo *PI = P->getPassInfo(); 912920100eSChris Lattner delete P; 922920100eSChris Lattner return PI; 932920100eSChris Lattner } 942920100eSChris Lattner 95514c02ebSChris Lattner /// performFinalCleanups - This method clones the current Program and performs 96514c02ebSChris Lattner /// a series of cleanups intended to get rid of extra cruft on the module 97514c02ebSChris Lattner /// before handing it to the user... 98514c02ebSChris Lattner /// 992920100eSChris Lattner Module *BugDriver::performFinalCleanups(Module *M, bool MayModifySemantics) { 1002b3ab562SChris Lattner // Make all functions external, so GlobalDCE doesn't delete them... 1012b3ab562SChris Lattner for (Module::iterator I = M->begin(), E = M->end(); I != E; ++I) 1022b3ab562SChris Lattner I->setLinkage(GlobalValue::ExternalLinkage); 1032b3ab562SChris Lattner 1042920100eSChris Lattner std::vector<const PassInfo*> CleanupPasses; 1052920100eSChris Lattner CleanupPasses.push_back(getPI(createFunctionResolvingPass())); 1062920100eSChris Lattner CleanupPasses.push_back(getPI(createGlobalDCEPass())); 1072920100eSChris Lattner CleanupPasses.push_back(getPI(createDeadTypeEliminationPass())); 1083f1ad878SChris Lattner 1093f1ad878SChris Lattner if (MayModifySemantics) 1102920100eSChris Lattner CleanupPasses.push_back(getPI(createDeadArgHackingPass())); 1113f1ad878SChris Lattner else 1123f1ad878SChris Lattner CleanupPasses.push_back(getPI(createDeadArgEliminationPass())); 1132920100eSChris Lattner 1142920100eSChris Lattner std::swap(Program, M); 1152920100eSChris Lattner std::string Filename; 1162920100eSChris Lattner bool Failed = runPasses(CleanupPasses, Filename); 1172920100eSChris Lattner std::swap(Program, M); 1182920100eSChris Lattner 1192920100eSChris Lattner if (Failed) { 1202920100eSChris Lattner std::cerr << "Final cleanups failed. Sorry. :(\n"; 1212920100eSChris Lattner } else { 1222920100eSChris Lattner delete M; 1232920100eSChris Lattner M = ParseInputFile(Filename); 1242920100eSChris Lattner if (M == 0) { 1252920100eSChris Lattner std::cerr << getToolName() << ": Error reading bytecode file '" 1262920100eSChris Lattner << Filename << "'!\n"; 1272920100eSChris Lattner exit(1); 1282920100eSChris Lattner } 129233b0691SChris Lattner removeFile(Filename); 1302920100eSChris Lattner } 1312920100eSChris Lattner return M; 132514c02ebSChris Lattner } 133567543f0SChris Lattner 134567543f0SChris Lattner 135567543f0SChris Lattner // DeleteFunctionBody - "Remove" the function by deleting all of its basic 136567543f0SChris Lattner // blocks, making it external. 137567543f0SChris Lattner // 138567543f0SChris Lattner void llvm::DeleteFunctionBody(Function *F) { 139567543f0SChris Lattner // delete the body of the function... 140567543f0SChris Lattner F->deleteBody(); 141567543f0SChris Lattner assert(F->isExternal() && "This didn't make the function external!"); 142567543f0SChris Lattner } 143567543f0SChris Lattner 144567543f0SChris Lattner /// SplitFunctionsOutOfModule - Given a module and a list of functions in the 145567543f0SChris Lattner /// module, split the functions OUT of the specified module, and place them in 146567543f0SChris Lattner /// the new module. 147*5a5e414bSChris Lattner /// 148*5a5e414bSChris Lattner /// FIXME: this could be made DRAMATICALLY more efficient for large programs if 149*5a5e414bSChris Lattner /// we just MOVED functions from one module to the other, instead of cloning the 150*5a5e414bSChris Lattner /// whole module, then proceeding to delete an entire module's worth of stuff. 151*5a5e414bSChris Lattner /// 152567543f0SChris Lattner Module *llvm::SplitFunctionsOutOfModule(Module *M, 153567543f0SChris Lattner const std::vector<Function*> &F) { 154567543f0SChris Lattner // Make sure functions & globals are all external so that linkage 155567543f0SChris Lattner // between the two modules will work. 156567543f0SChris Lattner for (Module::iterator I = M->begin(), E = M->end(); I != E; ++I) 157567543f0SChris Lattner I->setLinkage(GlobalValue::ExternalLinkage); 158567543f0SChris Lattner for (Module::giterator I = M->gbegin(), E = M->gend(); I != E; ++I) 159567543f0SChris Lattner I->setLinkage(GlobalValue::ExternalLinkage); 160567543f0SChris Lattner 161567543f0SChris Lattner Module *New = CloneModule(M); 162567543f0SChris Lattner 163567543f0SChris Lattner // Make sure global initializers exist only in the safe module (CBE->.so) 164567543f0SChris Lattner for (Module::giterator I = New->gbegin(), E = New->gend(); I != E; ++I) 165567543f0SChris Lattner I->setInitializer(0); // Delete the initializer to make it external 166567543f0SChris Lattner 167567543f0SChris Lattner // Remove the Test functions from the Safe module 168567543f0SChris Lattner for (unsigned i = 0, e = F.size(); i != e; ++i) { 169567543f0SChris Lattner Function *TNOF = M->getFunction(F[i]->getName(), F[i]->getFunctionType()); 170567543f0SChris Lattner DEBUG(std::cerr << "Removing function " << F[i]->getName() << "\n"); 171567543f0SChris Lattner assert(TNOF && "Function doesn't exist in module!"); 172567543f0SChris Lattner DeleteFunctionBody(TNOF); // Function is now external in this module! 173567543f0SChris Lattner } 174567543f0SChris Lattner 175567543f0SChris Lattner // Remove the Safe functions from the Test module 176567543f0SChris Lattner for (Module::iterator I = New->begin(), E = New->end(); I != E; ++I) { 177567543f0SChris Lattner bool funcFound = false; 178567543f0SChris Lattner for (std::vector<Function*>::const_iterator FI = F.begin(), Fe = F.end(); 179567543f0SChris Lattner FI != Fe; ++FI) 180567543f0SChris Lattner if (I->getName() == (*FI)->getName()) funcFound = true; 181567543f0SChris Lattner 182567543f0SChris Lattner if (!funcFound) 183567543f0SChris Lattner DeleteFunctionBody(I); 184567543f0SChris Lattner } 185567543f0SChris Lattner return New; 186567543f0SChris Lattner } 187