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"
27*233b0691SChris Lattner #include "Support/FileUtilities.h"
283f1ad878SChris Lattner using namespace llvm;
29960707c3SBrian Gaeke 
30960707c3SBrian Gaeke namespace llvm {
31d1e2aaefSChris Lattner   bool DisableSimplifyCFG = false;
32960707c3SBrian Gaeke } // End llvm namespace
33960707c3SBrian Gaeke 
348d8de422SChris Lattner namespace {
358d8de422SChris Lattner   cl::opt<bool>
368d8de422SChris Lattner   NoADCE("disable-adce",
378d8de422SChris Lattner          cl::desc("Do not use the -adce pass to reduce testcases"));
388d8de422SChris Lattner   cl::opt<bool>
398d8de422SChris Lattner   NoDCE ("disable-dce",
408d8de422SChris Lattner          cl::desc("Do not use the -dce pass to reduce testcases"));
41d1e2aaefSChris Lattner   cl::opt<bool, true>
42d1e2aaefSChris Lattner   NoSCFG("disable-simplifycfg", cl::location(DisableSimplifyCFG),
438d8de422SChris Lattner          cl::desc("Do not use the -simplifycfg pass to reduce testcases"));
448d8de422SChris Lattner }
4573a6bdd9SChris Lattner 
460eb5ce94SChris Lattner /// deleteInstructionFromProgram - This method clones the current Program and
470eb5ce94SChris Lattner /// deletes the specified instruction from the cloned module.  It then runs a
480eb5ce94SChris Lattner /// series of cleanup passes (ADCE and SimplifyCFG) to eliminate any code which
490eb5ce94SChris Lattner /// depends on the value.  The modified module is then returned.
500eb5ce94SChris Lattner ///
510eb5ce94SChris Lattner Module *BugDriver::deleteInstructionFromProgram(Instruction *I,
520eb5ce94SChris Lattner                                                 unsigned Simplification) const {
530eb5ce94SChris Lattner   Module *Result = CloneModule(Program);
540eb5ce94SChris Lattner 
550eb5ce94SChris Lattner   BasicBlock *PBB = I->getParent();
560eb5ce94SChris Lattner   Function *PF = PBB->getParent();
570eb5ce94SChris Lattner 
580eb5ce94SChris Lattner   Module::iterator RFI = Result->begin(); // Get iterator to corresponding fn
590eb5ce94SChris Lattner   std::advance(RFI, std::distance(Program->begin(), Module::iterator(PF)));
600eb5ce94SChris Lattner 
610eb5ce94SChris Lattner   Function::iterator RBI = RFI->begin();  // Get iterator to corresponding BB
620eb5ce94SChris Lattner   std::advance(RBI, std::distance(PF->begin(), Function::iterator(PBB)));
630eb5ce94SChris Lattner 
640eb5ce94SChris Lattner   BasicBlock::iterator RI = RBI->begin(); // Get iterator to corresponding inst
650eb5ce94SChris Lattner   std::advance(RI, std::distance(PBB->begin(), BasicBlock::iterator(I)));
660eb5ce94SChris Lattner   I = RI;                                 // Got the corresponding instruction!
670eb5ce94SChris Lattner 
680eb5ce94SChris Lattner   // If this instruction produces a value, replace any users with null values
690eb5ce94SChris Lattner   if (I->getType() != Type::VoidTy)
700eb5ce94SChris Lattner     I->replaceAllUsesWith(Constant::getNullValue(I->getType()));
710eb5ce94SChris Lattner 
720eb5ce94SChris Lattner   // Remove the instruction from the program.
730eb5ce94SChris Lattner   I->getParent()->getInstList().erase(I);
740eb5ce94SChris Lattner 
7510c0469bSChris Lattner   // Spiff up the output a little bit.
760eb5ce94SChris Lattner   PassManager Passes;
77f3e8f97dSChris Lattner   // Make sure that the appropriate target data is always used...
78f3e8f97dSChris Lattner   Passes.add(new TargetData("bugpoint", Result));
79f3e8f97dSChris Lattner 
808d8de422SChris Lattner   if (Simplification > 2 && !NoADCE)
810eb5ce94SChris Lattner     Passes.add(createAggressiveDCEPass());          // Remove dead code...
820eb5ce94SChris Lattner   //Passes.add(createInstructionCombiningPass());
838d8de422SChris Lattner   if (Simplification > 1 && !NoDCE)
840eb5ce94SChris Lattner     Passes.add(createDeadCodeEliminationPass());
85d1e2aaefSChris Lattner   if (Simplification && !DisableSimplifyCFG)
860eb5ce94SChris Lattner     Passes.add(createCFGSimplificationPass());      // Delete dead control flow
8744ffd7c3SChris Lattner 
8844ffd7c3SChris Lattner   Passes.add(createVerifierPass());
890eb5ce94SChris Lattner   Passes.run(*Result);
900eb5ce94SChris Lattner   return Result;
910eb5ce94SChris Lattner }
92514c02ebSChris Lattner 
932920100eSChris Lattner static const PassInfo *getPI(Pass *P) {
942920100eSChris Lattner   const PassInfo *PI = P->getPassInfo();
952920100eSChris Lattner   delete P;
962920100eSChris Lattner   return PI;
972920100eSChris Lattner }
982920100eSChris Lattner 
99514c02ebSChris Lattner /// performFinalCleanups - This method clones the current Program and performs
100514c02ebSChris Lattner /// a series of cleanups intended to get rid of extra cruft on the module
101514c02ebSChris Lattner /// before handing it to the user...
102514c02ebSChris Lattner ///
1032920100eSChris Lattner Module *BugDriver::performFinalCleanups(Module *M, bool MayModifySemantics) {
1042b3ab562SChris Lattner   // Make all functions external, so GlobalDCE doesn't delete them...
1052b3ab562SChris Lattner   for (Module::iterator I = M->begin(), E = M->end(); I != E; ++I)
1062b3ab562SChris Lattner     I->setLinkage(GlobalValue::ExternalLinkage);
1072b3ab562SChris Lattner 
1082920100eSChris Lattner   std::vector<const PassInfo*> CleanupPasses;
1092920100eSChris Lattner   CleanupPasses.push_back(getPI(createFunctionResolvingPass()));
1102920100eSChris Lattner   CleanupPasses.push_back(getPI(createGlobalDCEPass()));
1112920100eSChris Lattner   CleanupPasses.push_back(getPI(createDeadTypeEliminationPass()));
1123f1ad878SChris Lattner 
1133f1ad878SChris Lattner   if (MayModifySemantics)
1142920100eSChris Lattner     CleanupPasses.push_back(getPI(createDeadArgHackingPass()));
1153f1ad878SChris Lattner   else
1163f1ad878SChris Lattner     CleanupPasses.push_back(getPI(createDeadArgEliminationPass()));
1172920100eSChris Lattner 
1182920100eSChris Lattner   std::swap(Program, M);
1192920100eSChris Lattner   std::string Filename;
1202920100eSChris Lattner   bool Failed = runPasses(CleanupPasses, Filename);
1212920100eSChris Lattner   std::swap(Program, M);
1222920100eSChris Lattner 
1232920100eSChris Lattner   if (Failed) {
1242920100eSChris Lattner     std::cerr << "Final cleanups failed.  Sorry.  :(\n";
1252920100eSChris Lattner   } else {
1262920100eSChris Lattner     delete M;
1272920100eSChris Lattner     M = ParseInputFile(Filename);
1282920100eSChris Lattner     if (M == 0) {
1292920100eSChris Lattner       std::cerr << getToolName() << ": Error reading bytecode file '"
1302920100eSChris Lattner                 << Filename << "'!\n";
1312920100eSChris Lattner       exit(1);
1322920100eSChris Lattner     }
133*233b0691SChris Lattner     removeFile(Filename);
1342920100eSChris Lattner   }
1352920100eSChris Lattner   return M;
136514c02ebSChris Lattner }
137