1 //===---------- DebugUtils.cpp - Utilities for debugging ORC JITs ---------===// 2 // 3 // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions. 4 // See https://llvm.org/LICENSE.txt for license information. 5 // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception 6 // 7 //===----------------------------------------------------------------------===// 8 9 #include "llvm/ExecutionEngine/Orc/DebugUtils.h" 10 11 #include "llvm/ExecutionEngine/Orc/Core.h" 12 #include "llvm/Support/CommandLine.h" 13 #include "llvm/Support/Debug.h" 14 #include "llvm/Support/FileSystem.h" 15 #include "llvm/Support/Format.h" 16 #include "llvm/Support/MemoryBuffer.h" 17 #include "llvm/Support/Path.h" 18 #include "llvm/Support/raw_ostream.h" 19 20 #define DEBUG_TYPE "orc" 21 22 using namespace llvm; 23 24 namespace { 25 26 #ifndef NDEBUG 27 28 cl::opt<bool> PrintHidden("debug-orc-print-hidden", cl::init(true), 29 cl::desc("debug print hidden symbols defined by " 30 "materialization units"), 31 cl::Hidden); 32 33 cl::opt<bool> PrintCallable("debug-orc-print-callable", cl::init(true), 34 cl::desc("debug print callable symbols defined by " 35 "materialization units"), 36 cl::Hidden); 37 38 cl::opt<bool> PrintData("debug-orc-print-data", cl::init(true), 39 cl::desc("debug print data symbols defined by " 40 "materialization units"), 41 cl::Hidden); 42 43 #endif // NDEBUG 44 45 // SetPrinter predicate that prints every element. 46 template <typename T> struct PrintAll { 47 bool operator()(const T &E) { return true; } 48 }; 49 50 bool anyPrintSymbolOptionSet() { 51 #ifndef NDEBUG 52 return PrintHidden || PrintCallable || PrintData; 53 #else 54 return false; 55 #endif // NDEBUG 56 } 57 58 bool flagsMatchCLOpts(const JITSymbolFlags &Flags) { 59 #ifndef NDEBUG 60 // Bail out early if this is a hidden symbol and we're not printing hiddens. 61 if (!PrintHidden && !Flags.isExported()) 62 return false; 63 64 // Return true if this is callable and we're printing callables. 65 if (PrintCallable && Flags.isCallable()) 66 return true; 67 68 // Return true if this is data and we're printing data. 69 if (PrintData && !Flags.isCallable()) 70 return true; 71 72 // otherwise return false. 73 return false; 74 #else 75 return false; 76 #endif // NDEBUG 77 } 78 79 // Prints a sequence of items, filtered by an user-supplied predicate. 80 template <typename Sequence, 81 typename Pred = PrintAll<typename Sequence::value_type>> 82 class SequencePrinter { 83 public: 84 SequencePrinter(const Sequence &S, char OpenSeq, char CloseSeq, 85 Pred ShouldPrint = Pred()) 86 : S(S), OpenSeq(OpenSeq), CloseSeq(CloseSeq), 87 ShouldPrint(std::move(ShouldPrint)) {} 88 89 void printTo(llvm::raw_ostream &OS) const { 90 bool PrintComma = false; 91 OS << OpenSeq; 92 for (auto &E : S) { 93 if (ShouldPrint(E)) { 94 if (PrintComma) 95 OS << ','; 96 OS << ' ' << E; 97 PrintComma = true; 98 } 99 } 100 OS << ' ' << CloseSeq; 101 } 102 103 private: 104 const Sequence &S; 105 char OpenSeq; 106 char CloseSeq; 107 mutable Pred ShouldPrint; 108 }; 109 110 template <typename Sequence, typename Pred> 111 SequencePrinter<Sequence, Pred> printSequence(const Sequence &S, char OpenSeq, 112 char CloseSeq, Pred P = Pred()) { 113 return SequencePrinter<Sequence, Pred>(S, OpenSeq, CloseSeq, std::move(P)); 114 } 115 116 // Render a SequencePrinter by delegating to its printTo method. 117 template <typename Sequence, typename Pred> 118 llvm::raw_ostream &operator<<(llvm::raw_ostream &OS, 119 const SequencePrinter<Sequence, Pred> &Printer) { 120 Printer.printTo(OS); 121 return OS; 122 } 123 124 struct PrintSymbolFlagsMapElemsMatchingCLOpts { 125 bool operator()(const orc::SymbolFlagsMap::value_type &KV) { 126 return flagsMatchCLOpts(KV.second); 127 } 128 }; 129 130 struct PrintSymbolMapElemsMatchingCLOpts { 131 bool operator()(const orc::SymbolMap::value_type &KV) { 132 return flagsMatchCLOpts(KV.second.getFlags()); 133 } 134 }; 135 136 } // end anonymous namespace 137 138 namespace llvm { 139 namespace orc { 140 141 raw_ostream &operator<<(raw_ostream &OS, const SymbolStringPtr &Sym) { 142 return OS << *Sym; 143 } 144 145 raw_ostream &operator<<(raw_ostream &OS, const SymbolNameSet &Symbols) { 146 return OS << printSequence(Symbols, '{', '}', PrintAll<SymbolStringPtr>()); 147 } 148 149 raw_ostream &operator<<(raw_ostream &OS, const SymbolNameVector &Symbols) { 150 return OS << printSequence(Symbols, '[', ']', PrintAll<SymbolStringPtr>()); 151 } 152 153 raw_ostream &operator<<(raw_ostream &OS, ArrayRef<SymbolStringPtr> Symbols) { 154 return OS << printSequence(Symbols, '[', ']', PrintAll<SymbolStringPtr>()); 155 } 156 157 raw_ostream &operator<<(raw_ostream &OS, const JITSymbolFlags &Flags) { 158 if (Flags.hasError()) 159 OS << "[*ERROR*]"; 160 if (Flags.isCallable()) 161 OS << "[Callable]"; 162 else 163 OS << "[Data]"; 164 if (Flags.isWeak()) 165 OS << "[Weak]"; 166 else if (Flags.isCommon()) 167 OS << "[Common]"; 168 169 if (!Flags.isExported()) 170 OS << "[Hidden]"; 171 172 return OS; 173 } 174 175 raw_ostream &operator<<(raw_ostream &OS, const ExecutorSymbolDef &Sym) { 176 return OS << Sym.getAddress() << " " << Sym.getFlags(); 177 } 178 179 raw_ostream &operator<<(raw_ostream &OS, const SymbolFlagsMap::value_type &KV) { 180 return OS << "(\"" << KV.first << "\", " << KV.second << ")"; 181 } 182 183 raw_ostream &operator<<(raw_ostream &OS, const SymbolMap::value_type &KV) { 184 return OS << "(\"" << KV.first << "\": " << KV.second << ")"; 185 } 186 187 raw_ostream &operator<<(raw_ostream &OS, const SymbolFlagsMap &SymbolFlags) { 188 return OS << printSequence(SymbolFlags, '{', '}', 189 PrintSymbolFlagsMapElemsMatchingCLOpts()); 190 } 191 192 raw_ostream &operator<<(raw_ostream &OS, const SymbolMap &Symbols) { 193 return OS << printSequence(Symbols, '{', '}', 194 PrintSymbolMapElemsMatchingCLOpts()); 195 } 196 197 raw_ostream &operator<<(raw_ostream &OS, 198 const SymbolDependenceMap::value_type &KV) { 199 return OS << "(" << KV.first->getName() << ", " << KV.second << ")"; 200 } 201 202 raw_ostream &operator<<(raw_ostream &OS, const SymbolDependenceMap &Deps) { 203 return OS << printSequence(Deps, '{', '}', 204 PrintAll<SymbolDependenceMap::value_type>()); 205 } 206 207 raw_ostream &operator<<(raw_ostream &OS, const MaterializationUnit &MU) { 208 OS << "MU@" << &MU << " (\"" << MU.getName() << "\""; 209 if (anyPrintSymbolOptionSet()) 210 OS << ", " << MU.getSymbols(); 211 return OS << ")"; 212 } 213 214 raw_ostream &operator<<(raw_ostream &OS, const LookupKind &K) { 215 switch (K) { 216 case LookupKind::Static: 217 return OS << "Static"; 218 case LookupKind::DLSym: 219 return OS << "DLSym"; 220 } 221 llvm_unreachable("Invalid lookup kind"); 222 } 223 224 raw_ostream &operator<<(raw_ostream &OS, 225 const JITDylibLookupFlags &JDLookupFlags) { 226 switch (JDLookupFlags) { 227 case JITDylibLookupFlags::MatchExportedSymbolsOnly: 228 return OS << "MatchExportedSymbolsOnly"; 229 case JITDylibLookupFlags::MatchAllSymbols: 230 return OS << "MatchAllSymbols"; 231 } 232 llvm_unreachable("Invalid JITDylib lookup flags"); 233 } 234 235 raw_ostream &operator<<(raw_ostream &OS, const SymbolLookupFlags &LookupFlags) { 236 switch (LookupFlags) { 237 case SymbolLookupFlags::RequiredSymbol: 238 return OS << "RequiredSymbol"; 239 case SymbolLookupFlags::WeaklyReferencedSymbol: 240 return OS << "WeaklyReferencedSymbol"; 241 } 242 llvm_unreachable("Invalid symbol lookup flags"); 243 } 244 245 raw_ostream &operator<<(raw_ostream &OS, 246 const SymbolLookupSet::value_type &KV) { 247 return OS << "(" << KV.first << ", " << KV.second << ")"; 248 } 249 250 raw_ostream &operator<<(raw_ostream &OS, const SymbolLookupSet &LookupSet) { 251 return OS << printSequence(LookupSet, '{', '}', 252 PrintAll<SymbolLookupSet::value_type>()); 253 } 254 255 raw_ostream &operator<<(raw_ostream &OS, 256 const JITDylibSearchOrder &SearchOrder) { 257 OS << "["; 258 if (!SearchOrder.empty()) { 259 assert(SearchOrder.front().first && 260 "JITDylibList entries must not be null"); 261 OS << " (\"" << SearchOrder.front().first->getName() << "\", " 262 << SearchOrder.begin()->second << ")"; 263 for (auto &KV : llvm::drop_begin(SearchOrder)) { 264 assert(KV.first && "JITDylibList entries must not be null"); 265 OS << ", (\"" << KV.first->getName() << "\", " << KV.second << ")"; 266 } 267 } 268 OS << " ]"; 269 return OS; 270 } 271 272 raw_ostream &operator<<(raw_ostream &OS, const SymbolAliasMap &Aliases) { 273 OS << "{"; 274 for (auto &KV : Aliases) 275 OS << " " << *KV.first << ": " << KV.second.Aliasee << " " 276 << KV.second.AliasFlags; 277 OS << " }"; 278 return OS; 279 } 280 281 raw_ostream &operator<<(raw_ostream &OS, const SymbolState &S) { 282 switch (S) { 283 case SymbolState::Invalid: 284 return OS << "Invalid"; 285 case SymbolState::NeverSearched: 286 return OS << "Never-Searched"; 287 case SymbolState::Materializing: 288 return OS << "Materializing"; 289 case SymbolState::Resolved: 290 return OS << "Resolved"; 291 case SymbolState::Emitted: 292 return OS << "Emitted"; 293 case SymbolState::Ready: 294 return OS << "Ready"; 295 } 296 llvm_unreachable("Invalid state"); 297 } 298 299 raw_ostream &operator<<(raw_ostream &OS, const SymbolStringPool &SSP) { 300 std::lock_guard<std::mutex> Lock(SSP.PoolMutex); 301 SmallVector<std::pair<StringRef, int>, 0> Vec; 302 for (auto &KV : SSP.Pool) 303 Vec.emplace_back(KV.first(), KV.second); 304 llvm::sort(Vec, less_first()); 305 for (auto &[K, V] : Vec) 306 OS << K << ": " << V << "\n"; 307 return OS; 308 } 309 310 DumpObjects::DumpObjects(std::string DumpDir, std::string IdentifierOverride) 311 : DumpDir(std::move(DumpDir)), 312 IdentifierOverride(std::move(IdentifierOverride)) { 313 314 /// Discard any trailing separators. 315 while (!this->DumpDir.empty() && 316 sys::path::is_separator(this->DumpDir.back())) 317 this->DumpDir.pop_back(); 318 } 319 320 Expected<std::unique_ptr<MemoryBuffer>> 321 DumpObjects::operator()(std::unique_ptr<MemoryBuffer> Obj) { 322 size_t Idx = 1; 323 324 std::string DumpPathStem; 325 raw_string_ostream(DumpPathStem) 326 << DumpDir << (DumpDir.empty() ? "" : "/") << getBufferIdentifier(*Obj); 327 328 std::string DumpPath = DumpPathStem + ".o"; 329 while (sys::fs::exists(DumpPath)) { 330 DumpPath.clear(); 331 raw_string_ostream(DumpPath) << DumpPathStem << "." << (++Idx) << ".o"; 332 } 333 334 LLVM_DEBUG({ 335 dbgs() << "Dumping object buffer [ " << (const void *)Obj->getBufferStart() 336 << " -- " << (const void *)(Obj->getBufferEnd() - 1) << " ] to " 337 << DumpPath << "\n"; 338 }); 339 340 std::error_code EC; 341 raw_fd_ostream DumpStream(DumpPath, EC); 342 if (EC) 343 return errorCodeToError(EC); 344 DumpStream.write(Obj->getBufferStart(), Obj->getBufferSize()); 345 346 return std::move(Obj); 347 } 348 349 StringRef DumpObjects::getBufferIdentifier(MemoryBuffer &B) { 350 if (!IdentifierOverride.empty()) 351 return IdentifierOverride; 352 StringRef Identifier = B.getBufferIdentifier(); 353 Identifier.consume_back(".o"); 354 return Identifier; 355 } 356 357 } // End namespace orc. 358 } // End namespace llvm. 359