lib/Analysis/ProfileInfoLoaderPass.cpp

   1 //===- ProfileInfoLoaderPass.cpp - LLVM Pass to load profile info ---------===//
   2 //
   3 //                     The LLVM Compiler Infrastructure
   4 //
   5 // This file is distributed under the University of Illinois Open Source
   6 // License. See LICENSE.TXT for details.
   7 //
   8 //===----------------------------------------------------------------------===//
   9 //
  10 // This file implements a concrete implementation of profiling information that
  11 // loads the information from a profile dump file.
  12 //
  13 //===----------------------------------------------------------------------===//
  14 #define DEBUG_TYPE "profile-loader"
  15 #include "llvm/BasicBlock.h"
  16 #include "llvm/InstrTypes.h"
  17 #include "llvm/Module.h"
  18 #include "llvm/Pass.h"
  19 #include "llvm/Analysis/Passes.h"
  20 #include "llvm/Analysis/ProfileInfo.h"
  21 #include "llvm/Analysis/ProfileInfoLoader.h"
  22 #include "llvm/Support/CommandLine.h"
  23 #include "llvm/Support/Compiler.h"
  24 #include "llvm/Support/CFG.h"
  25 #include "llvm/Support/Debug.h"
  26 #include "llvm/Support/raw_ostream.h"
  27 #include "llvm/Support/Format.h"
  28 #include "llvm/ADT/Statistic.h"
  29 #include "llvm/ADT/SmallSet.h"
  30 #include <set>
  31 using namespace llvm;
  32
  33 STATISTIC(NumEdgesRead, "The # of edges read.");
  34
  35 static cl::opt<std::string>
  36 ProfileInfoFilename("profile-info-file", cl::init("llvmprof.out"),
  37                     cl::value_desc("filename"),
  38                     cl::desc("Profile file loaded by -profile-loader"));
  39
  40 namespace {
  41   class VISIBILITY_HIDDEN LoaderPass : public ModulePass, public ProfileInfo {
  42     std::string Filename;
  43     std::set<Edge> SpanningTree;
  44     std::set<const BasicBlock*> BBisUnvisited;
  45     unsigned ReadCount;
  46   public:
  47     static char ID; // Class identification, replacement for typeinfo
  48     explicit LoaderPass(const std::string &filename = "")
  49       : ModulePass(&ID), Filename(filename) {
  50       if (filename.empty()) Filename = ProfileInfoFilename;
  51     }
  52
  53     virtual void getAnalysisUsage(AnalysisUsage &AU) const {
  54       AU.setPreservesAll();
  55     }
  56
  57     virtual const char *getPassName() const {
  58       return "Profiling information loader";
  59     }
  60
  61     // recurseBasicBlock() - Calculates the edge weights for as much basic
  62     // blocks as possbile.
  63     virtual void recurseBasicBlock(const BasicBlock *BB);
  64     virtual void readEdgeOrRemember(Edge, Edge&, unsigned &, unsigned &);
  65     virtual void readEdge(ProfileInfo::Edge, std::vector<unsigned>&);
  66
  67     /// run - Load the profile information from the specified file.
  68     virtual bool runOnModule(Module &M);
  69   };
  70 }  // End of anonymous namespace
  71
  72 char LoaderPass::ID = 0;
  73 static RegisterPass<LoaderPass>
  74 X("profile-loader", "Load profile information from llvmprof.out", false, true);
  75
  76 static RegisterAnalysisGroup<ProfileInfo> Y(X);
  77
  78 ModulePass *llvm::createProfileLoaderPass() { return new LoaderPass(); }
  79
  80 /// createProfileLoaderPass - This function returns a Pass that loads the
  81 /// profiling information for the module from the specified filename, making it
  82 /// available to the optimizers.
  83 Pass *llvm::createProfileLoaderPass(const std::string &Filename) {
  84   return new LoaderPass(Filename);
  85 }
  86
  87 void LoaderPass::readEdgeOrRemember(Edge edge, Edge &tocalc,
  88                                     unsigned &uncalc, unsigned &count) {
  89   double w;
  90   if ((w = getEdgeWeight(edge)) == MissingValue) {
  91     tocalc = edge;
  92     uncalc++;
  93   } else {
  94     count+=w;
  95   }
  96 }
  97
  98 // recurseBasicBlock - Visits all neighbours of a block and then tries to
  99 // calculate the missing edge values.
 100 void LoaderPass::recurseBasicBlock(const BasicBlock *BB) {
 101
 102   // break recursion if already visited
 103   if (BBisUnvisited.find(BB) == BBisUnvisited.end()) return;
 104   BBisUnvisited.erase(BB);
 105   if (!BB) return;
 106
 107   for (succ_const_iterator bbi = succ_begin(BB), bbe = succ_end(BB);
 108        bbi != bbe; ++bbi) {
 109     recurseBasicBlock(*bbi);
 110   }
 111   for (pred_const_iterator bbi = pred_begin(BB), bbe = pred_end(BB);
 112        bbi != bbe; ++bbi) {
 113     recurseBasicBlock(*bbi);
 114   }
 115
 116   Edge edgetocalc;
 117   unsigned uncalculated = 0;
 118
 119   // collect weights of all incoming and outgoing edges, rememer edges that
 120   // have no value
 121   unsigned incount = 0;
 122   SmallSet<const BasicBlock*,8> pred_visited;
 123   pred_const_iterator bbi = pred_begin(BB), bbe = pred_end(BB);
 124   if (bbi==bbe) {
 125     readEdgeOrRemember(getEdge(0, BB),edgetocalc,uncalculated,incount);
 126   }
 127   for (;bbi != bbe; ++bbi) {
 128     if (pred_visited.insert(*bbi)) {
 129       readEdgeOrRemember(getEdge(*bbi, BB),edgetocalc,uncalculated,incount);
 130     }
 131   }
 132
 133   unsigned outcount = 0;
 134   SmallSet<const BasicBlock*,8> succ_visited;
 135   succ_const_iterator sbbi = succ_begin(BB), sbbe = succ_end(BB);
 136   if (sbbi==sbbe) {
 137     readEdgeOrRemember(getEdge(BB, 0),edgetocalc,uncalculated,outcount);
 138   }
 139   for (;sbbi != sbbe; ++sbbi) {
 140     if (succ_visited.insert(*sbbi)) {
 141       readEdgeOrRemember(getEdge(BB, *sbbi),edgetocalc,uncalculated,outcount);
 142     }
 143   }
 144
 145   // if exactly one edge weight was missing, calculate it and remove it from
 146   // spanning tree
 147   if (uncalculated == 1) {
 148     if (incount < outcount) {
 149       EdgeInformation[BB->getParent()][edgetocalc] = outcount-incount;
 150     } else {
 151       EdgeInformation[BB->getParent()][edgetocalc] = incount-outcount;
 152     }
 153     DEBUG(errs() << "--Calc Edge Counter for " << edgetocalc << ": "
 154                  << format("%g", getEdgeWeight(edgetocalc)) << "\n");
 155     SpanningTree.erase(edgetocalc);
 156   }
 157 }
 158
 159 void LoaderPass::readEdge(ProfileInfo::Edge e,
 160                           std::vector<unsigned> &ECs) {
 161   if (ReadCount < ECs.size()) {
 162     double weight = ECs[ReadCount++];
 163     if (weight != ~0U) {
 164       EdgeInformation[getFunction(e)][e] += weight;
 165       DEBUG(errs() << "--Read Edge Counter for " << e
 166                    << " (# "<< (ReadCount-1) << "): "
 167                    << (unsigned)getEdgeWeight(e) << "\n");
 168     } else {
 169       // This happens only if reading optimal profiling information, not when
 170       // reading regular profiling information.
 171       SpanningTree.insert(e);
 172     }
 173   }
 174 }
 175
 176 bool LoaderPass::runOnModule(Module &M) {
 177   ProfileInfoLoader PIL("profile-loader", Filename, M);
 178
 179   EdgeInformation.clear();
 180   std::vector<unsigned> Counters = PIL.getRawEdgeCounts();
 181   if (Counters.size() > 0) {
 182     ReadCount = 0;
 183     for (Module::iterator F = M.begin(), E = M.end(); F != E; ++F) {
 184       if (F->isDeclaration()) continue;
 185       DEBUG(errs()<<"Working on "<<F->getNameStr()<<"\n");
 186       readEdge(getEdge(0,&F->getEntryBlock()), Counters);
 187       for (Function::iterator BB = F->begin(), E = F->end(); BB != E; ++BB) {
 188         // Okay, we have to add a counter of each outgoing edge.  If the
 189         // outgoing edge is not critical don't split it, just insert the counter
 190         // in the source or destination of the edge.
 191         TerminatorInst *TI = BB->getTerminator();
 192         for (unsigned s = 0, e = TI->getNumSuccessors(); s != e; ++s) {
 193           readEdge(getEdge(BB,TI->getSuccessor(s)), Counters);
 194         }
 195       }
 196     }
 197     if (ReadCount != Counters.size()) {
 198       errs() << "WARNING: profile information is inconsistent with "
 199              << "the current program!\n";
 200     }
 201     NumEdgesRead = ReadCount;
 202   }
 203
 204   Counters = PIL.getRawOptimalEdgeCounts();
 205   if (Counters.size() > 0) {
 206     ReadCount = 0;
 207     for (Module::iterator F = M.begin(), E = M.end(); F != E; ++F) {
 208       if (F->isDeclaration()) continue;
 209       DEBUG(errs()<<"Working on "<<F->getNameStr()<<"\n");
 210       readEdge(getEdge(0,&F->getEntryBlock()), Counters);
 211       for (Function::iterator BB = F->begin(), E = F->end(); BB != E; ++BB) {
 212         TerminatorInst *TI = BB->getTerminator();
 213         if (TI->getNumSuccessors() == 0) {
 214           readEdge(getEdge(BB,0), Counters);
 215         }
 216         for (unsigned s = 0, e = TI->getNumSuccessors(); s != e; ++s) {
 217           readEdge(getEdge(BB,TI->getSuccessor(s)), Counters);
 218         }
 219       }
 220       while (SpanningTree.size() > 0) {
 221 #if 0
 222         unsigned size = SpanningTree.size();
 223 #endif
 224         BBisUnvisited.clear();
 225         for (std::set<Edge>::iterator ei = SpanningTree.begin(),
 226              ee = SpanningTree.end(); ei != ee; ++ei) {
 227           BBisUnvisited.insert(ei->first);
 228           BBisUnvisited.insert(ei->second);
 229         }
 230         while (BBisUnvisited.size() > 0) {
 231           recurseBasicBlock(*BBisUnvisited.begin());
 232         }
 233 #if 0
 234         if (SpanningTree.size() == size) {
 235           DEBUG(errs()<<"{");
 236           for (std::set<Edge>::iterator ei = SpanningTree.begin(),
 237                ee = SpanningTree.end(); ei != ee; ++ei) {
 238             DEBUG(errs()<<"("<<(ei->first?ei->first->getName():"0")<<","
 239                         <<(ei->second?ei->second->getName():"0")<<"),");
 240           }
 241           assert(0 && "No edge calculated!");
 242         }
 243 #endif
 244       }
 245     }
 246     if (ReadCount != Counters.size()) {
 247       errs() << "WARNING: profile information is inconsistent with "
 248              << "the current program!\n";
 249     }
 250     NumEdgesRead = ReadCount;
 251   }
 252
 253   BlockInformation.clear();
 254   Counters = PIL.getRawBlockCounts();
 255   if (Counters.size() > 0) {
 256     ReadCount = 0;
 257     for (Module::iterator F = M.begin(), E = M.end(); F != E; ++F) {
 258       if (F->isDeclaration()) continue;
 259       for (Function::iterator BB = F->begin(), E = F->end(); BB != E; ++BB)
 260         if (ReadCount < Counters.size())
 261           BlockInformation[F][BB] = Counters[ReadCount++];
 262     }
 263     if (ReadCount != Counters.size()) {
 264       errs() << "WARNING: profile information is inconsistent with "
 265              << "the current program!\n";
 266     }
 267   }
 268
 269   FunctionInformation.clear();
 270   Counters = PIL.getRawFunctionCounts();
 271   if (Counters.size() > 0) {
 272     ReadCount = 0;
 273     for (Module::iterator F = M.begin(), E = M.end(); F != E; ++F) {
 274       if (F->isDeclaration()) continue;
 275       if (ReadCount < Counters.size())
 276         FunctionInformation[F] = Counters[ReadCount++];
 277     }
 278     if (ReadCount != Counters.size()) {
 279       errs() << "WARNING: profile information is inconsistent with "
 280              << "the current program!\n";
 281     }
 282   }
 283
 284   return false;
 285 }