1 //===-- GCMetadata.cpp - Garbage collector metadata -----------------------===// 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 the GCFunctionInfo class and GCModuleInfo pass. 11 // 12 //===----------------------------------------------------------------------===// 13 14 #include "llvm/ADT/STLExtras.h" 15 #include "llvm/CodeGen/GCMetadata.h" 16 #include "llvm/CodeGen/GCStrategy.h" 17 #include "llvm/CodeGen/Passes.h" 18 #include "llvm/IR/Function.h" 19 #include "llvm/MC/MCSymbol.h" 20 #include "llvm/Pass.h" 21 #include "llvm/Support/ErrorHandling.h" 22 #include "llvm/Support/raw_ostream.h" 23 #include <algorithm> 24 #include <cassert> 25 #include <memory> 26 #include <string> 27 28 using namespace llvm; 29 30 namespace { 31 32 class Printer : public FunctionPass { 33 static char ID; 34 35 raw_ostream &OS; 36 37 public: 38 explicit Printer(raw_ostream &OS) : FunctionPass(ID), OS(OS) {} 39 40 StringRef getPassName() const override; 41 void getAnalysisUsage(AnalysisUsage &AU) const override; 42 43 bool runOnFunction(Function &F) override; 44 bool doFinalization(Module &M) override; 45 }; 46 47 } // end anonymous namespace 48 49 INITIALIZE_PASS(GCModuleInfo, "collector-metadata", 50 "Create Garbage Collector Module Metadata", false, false) 51 52 // ----------------------------------------------------------------------------- 53 54 GCFunctionInfo::GCFunctionInfo(const Function &F, GCStrategy &S) 55 : F(F), S(S), FrameSize(~0LL) {} 56 57 GCFunctionInfo::~GCFunctionInfo() = default; 58 59 // ----------------------------------------------------------------------------- 60 61 char GCModuleInfo::ID = 0; 62 63 GCModuleInfo::GCModuleInfo() : ImmutablePass(ID) { 64 initializeGCModuleInfoPass(*PassRegistry::getPassRegistry()); 65 } 66 67 GCFunctionInfo &GCModuleInfo::getFunctionInfo(const Function &F) { 68 assert(!F.isDeclaration() && "Can only get GCFunctionInfo for a definition!"); 69 assert(F.hasGC()); 70 71 finfo_map_type::iterator I = FInfoMap.find(&F); 72 if (I != FInfoMap.end()) 73 return *I->second; 74 75 GCStrategy *S = getGCStrategy(F.getGC()); 76 Functions.push_back(llvm::make_unique<GCFunctionInfo>(F, *S)); 77 GCFunctionInfo *GFI = Functions.back().get(); 78 FInfoMap[&F] = GFI; 79 return *GFI; 80 } 81 82 void GCModuleInfo::clear() { 83 Functions.clear(); 84 FInfoMap.clear(); 85 GCStrategyList.clear(); 86 } 87 88 // ----------------------------------------------------------------------------- 89 90 char Printer::ID = 0; 91 92 FunctionPass *llvm::createGCInfoPrinter(raw_ostream &OS) { 93 return new Printer(OS); 94 } 95 96 StringRef Printer::getPassName() const { 97 return "Print Garbage Collector Information"; 98 } 99 100 void Printer::getAnalysisUsage(AnalysisUsage &AU) const { 101 FunctionPass::getAnalysisUsage(AU); 102 AU.setPreservesAll(); 103 AU.addRequired<GCModuleInfo>(); 104 } 105 106 static const char *DescKind(GC::PointKind Kind) { 107 switch (Kind) { 108 case GC::PostCall: 109 return "post-call"; 110 } 111 llvm_unreachable("Invalid point kind"); 112 } 113 114 bool Printer::runOnFunction(Function &F) { 115 if (F.hasGC()) 116 return false; 117 118 GCFunctionInfo *FD = &getAnalysis<GCModuleInfo>().getFunctionInfo(F); 119 120 OS << "GC roots for " << FD->getFunction().getName() << ":\n"; 121 for (GCFunctionInfo::roots_iterator RI = FD->roots_begin(), 122 RE = FD->roots_end(); 123 RI != RE; ++RI) 124 OS << "\t" << RI->Num << "\t" << RI->StackOffset << "[sp]\n"; 125 126 OS << "GC safe points for " << FD->getFunction().getName() << ":\n"; 127 for (GCFunctionInfo::iterator PI = FD->begin(), PE = FD->end(); PI != PE; 128 ++PI) { 129 130 OS << "\t" << PI->Label->getName() << ": " << DescKind(PI->Kind) 131 << ", live = {"; 132 133 for (GCFunctionInfo::live_iterator RI = FD->live_begin(PI), 134 RE = FD->live_end(PI); 135 ;) { 136 OS << " " << RI->Num; 137 if (++RI == RE) 138 break; 139 OS << ","; 140 } 141 142 OS << " }\n"; 143 } 144 145 return false; 146 } 147 148 bool Printer::doFinalization(Module &M) { 149 GCModuleInfo *GMI = getAnalysisIfAvailable<GCModuleInfo>(); 150 assert(GMI && "Printer didn't require GCModuleInfo?!"); 151 GMI->clear(); 152 return false; 153 } 154 155 GCStrategy *GCModuleInfo::getGCStrategy(const StringRef Name) { 156 // TODO: Arguably, just doing a linear search would be faster for small N 157 auto NMI = GCStrategyMap.find(Name); 158 if (NMI != GCStrategyMap.end()) 159 return NMI->getValue(); 160 161 for (auto& Entry : GCRegistry::entries()) { 162 if (Name == Entry.getName()) { 163 std::unique_ptr<GCStrategy> S = Entry.instantiate(); 164 S->Name = Name; 165 GCStrategyMap[Name] = S.get(); 166 GCStrategyList.push_back(std::move(S)); 167 return GCStrategyList.back().get(); 168 } 169 } 170 171 if (GCRegistry::begin() == GCRegistry::end()) { 172 // In normal operation, the registry should not be empty. There should 173 // be the builtin GCs if nothing else. The most likely scenario here is 174 // that we got here without running the initializers used by the Registry 175 // itself and it's registration mechanism. 176 const std::string error = ("unsupported GC: " + Name).str() + 177 " (did you remember to link and initialize the CodeGen library?)"; 178 report_fatal_error(error); 179 } else 180 report_fatal_error(std::string("unsupported GC: ") + Name); 181 } 182