| //===- DebugInfo.cpp - Debug Information Helper Classes -------------------===// |
| // |
| // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions. |
| // See https://llvm.org/LICENSE.txt for license information. |
| // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception |
| // |
| //===----------------------------------------------------------------------===// |
| // |
| // This file implements the helper classes used to build and interpret debug |
| // information in LLVM IR form. |
| // |
| //===----------------------------------------------------------------------===// |
| |
| #include "llvm-c/DebugInfo.h" |
| #include "llvm/ADT/DenseMap.h" |
| #include "llvm/ADT/DenseSet.h" |
| #include "llvm/ADT/None.h" |
| #include "llvm/ADT/STLExtras.h" |
| #include "llvm/ADT/SmallPtrSet.h" |
| #include "llvm/ADT/SmallVector.h" |
| #include "llvm/ADT/StringRef.h" |
| #include "llvm/IR/BasicBlock.h" |
| #include "llvm/IR/Constants.h" |
| #include "llvm/IR/DebugInfoMetadata.h" |
| #include "llvm/IR/DebugLoc.h" |
| #include "llvm/IR/DebugInfo.h" |
| #include "llvm/IR/DIBuilder.h" |
| #include "llvm/IR/Function.h" |
| #include "llvm/IR/GVMaterializer.h" |
| #include "llvm/IR/Instruction.h" |
| #include "llvm/IR/IntrinsicInst.h" |
| #include "llvm/IR/LLVMContext.h" |
| #include "llvm/IR/Metadata.h" |
| #include "llvm/IR/Module.h" |
| #include "llvm/Support/Casting.h" |
| #include <algorithm> |
| #include <cassert> |
| #include <utility> |
| |
| using namespace llvm; |
| using namespace llvm::dwarf; |
| |
| DISubprogram *llvm::getDISubprogram(const MDNode *Scope) { |
| if (auto *LocalScope = dyn_cast_or_null<DILocalScope>(Scope)) |
| return LocalScope->getSubprogram(); |
| return nullptr; |
| } |
| |
| //===----------------------------------------------------------------------===// |
| // DebugInfoFinder implementations. |
| //===----------------------------------------------------------------------===// |
| |
| void DebugInfoFinder::reset() { |
| CUs.clear(); |
| SPs.clear(); |
| GVs.clear(); |
| TYs.clear(); |
| Scopes.clear(); |
| NodesSeen.clear(); |
| } |
| |
| void DebugInfoFinder::processModule(const Module &M) { |
| for (auto *CU : M.debug_compile_units()) |
| processCompileUnit(CU); |
| for (auto &F : M.functions()) { |
| if (auto *SP = cast_or_null<DISubprogram>(F.getSubprogram())) |
| processSubprogram(SP); |
| // There could be subprograms from inlined functions referenced from |
| // instructions only. Walk the function to find them. |
| for (const BasicBlock &BB : F) |
| for (const Instruction &I : BB) |
| processInstruction(M, I); |
| } |
| } |
| |
| void DebugInfoFinder::processCompileUnit(DICompileUnit *CU) { |
| if (!addCompileUnit(CU)) |
| return; |
| for (auto DIG : CU->getGlobalVariables()) { |
| if (!addGlobalVariable(DIG)) |
| continue; |
| auto *GV = DIG->getVariable(); |
| processScope(GV->getScope()); |
| processType(GV->getType()); |
| } |
| for (auto *ET : CU->getEnumTypes()) |
| processType(ET); |
| for (auto *RT : CU->getRetainedTypes()) |
| if (auto *T = dyn_cast<DIType>(RT)) |
| processType(T); |
| else |
| processSubprogram(cast<DISubprogram>(RT)); |
| for (auto *Import : CU->getImportedEntities()) { |
| auto *Entity = Import->getEntity(); |
| if (auto *T = dyn_cast<DIType>(Entity)) |
| processType(T); |
| else if (auto *SP = dyn_cast<DISubprogram>(Entity)) |
| processSubprogram(SP); |
| else if (auto *NS = dyn_cast<DINamespace>(Entity)) |
| processScope(NS->getScope()); |
| else if (auto *M = dyn_cast<DIModule>(Entity)) |
| processScope(M->getScope()); |
| } |
| } |
| |
| void DebugInfoFinder::processInstruction(const Module &M, |
| const Instruction &I) { |
| if (auto *DDI = dyn_cast<DbgDeclareInst>(&I)) |
| processDeclare(M, DDI); |
| else if (auto *DVI = dyn_cast<DbgValueInst>(&I)) |
| processValue(M, DVI); |
| |
| if (auto DbgLoc = I.getDebugLoc()) |
| processLocation(M, DbgLoc.get()); |
| } |
| |
| void DebugInfoFinder::processLocation(const Module &M, const DILocation *Loc) { |
| if (!Loc) |
| return; |
| processScope(Loc->getScope()); |
| processLocation(M, Loc->getInlinedAt()); |
| } |
| |
| void DebugInfoFinder::processType(DIType *DT) { |
| if (!addType(DT)) |
| return; |
| processScope(DT->getScope()); |
| if (auto *ST = dyn_cast<DISubroutineType>(DT)) { |
| for (DIType *Ref : ST->getTypeArray()) |
| processType(Ref); |
| return; |
| } |
| if (auto *DCT = dyn_cast<DICompositeType>(DT)) { |
| processType(DCT->getBaseType()); |
| for (Metadata *D : DCT->getElements()) { |
| if (auto *T = dyn_cast<DIType>(D)) |
| processType(T); |
| else if (auto *SP = dyn_cast<DISubprogram>(D)) |
| processSubprogram(SP); |
| } |
| return; |
| } |
| if (auto *DDT = dyn_cast<DIDerivedType>(DT)) { |
| processType(DDT->getBaseType()); |
| } |
| } |
| |
| void DebugInfoFinder::processScope(DIScope *Scope) { |
| if (!Scope) |
| return; |
| if (auto *Ty = dyn_cast<DIType>(Scope)) { |
| processType(Ty); |
| return; |
| } |
| if (auto *CU = dyn_cast<DICompileUnit>(Scope)) { |
| addCompileUnit(CU); |
| return; |
| } |
| if (auto *SP = dyn_cast<DISubprogram>(Scope)) { |
| processSubprogram(SP); |
| return; |
| } |
| if (!addScope(Scope)) |
| return; |
| if (auto *LB = dyn_cast<DILexicalBlockBase>(Scope)) { |
| processScope(LB->getScope()); |
| } else if (auto *NS = dyn_cast<DINamespace>(Scope)) { |
| processScope(NS->getScope()); |
| } else if (auto *M = dyn_cast<DIModule>(Scope)) { |
| processScope(M->getScope()); |
| } |
| } |
| |
| void DebugInfoFinder::processSubprogram(DISubprogram *SP) { |
| if (!addSubprogram(SP)) |
| return; |
| processScope(SP->getScope()); |
| // Some of the users, e.g. CloneFunctionInto / CloneModule, need to set up a |
| // ValueMap containing identity mappings for all of the DICompileUnit's, not |
| // just DISubprogram's, referenced from anywhere within the Function being |
| // cloned prior to calling MapMetadata / RemapInstruction to avoid their |
| // duplication later as DICompileUnit's are also directly referenced by |
| // llvm.dbg.cu list. Thefore we need to collect DICompileUnit's here as well. |
| // Also, DICompileUnit's may reference DISubprogram's too and therefore need |
| // to be at least looked through. |
| processCompileUnit(SP->getUnit()); |
| processType(SP->getType()); |
| for (auto *Element : SP->getTemplateParams()) { |
| if (auto *TType = dyn_cast<DITemplateTypeParameter>(Element)) { |
| processType(TType->getType()); |
| } else if (auto *TVal = dyn_cast<DITemplateValueParameter>(Element)) { |
| processType(TVal->getType()); |
| } |
| } |
| } |
| |
| void DebugInfoFinder::processDeclare(const Module &M, |
| const DbgDeclareInst *DDI) { |
| auto *N = dyn_cast<MDNode>(DDI->getVariable()); |
| if (!N) |
| return; |
| |
| auto *DV = dyn_cast<DILocalVariable>(N); |
| if (!DV) |
| return; |
| |
| if (!NodesSeen.insert(DV).second) |
| return; |
| processScope(DV->getScope()); |
| processType(DV->getType()); |
| } |
| |
| void DebugInfoFinder::processValue(const Module &M, const DbgValueInst *DVI) { |
| auto *N = dyn_cast<MDNode>(DVI->getVariable()); |
| if (!N) |
| return; |
| |
| auto *DV = dyn_cast<DILocalVariable>(N); |
| if (!DV) |
| return; |
| |
| if (!NodesSeen.insert(DV).second) |
| return; |
| processScope(DV->getScope()); |
| processType(DV->getType()); |
| } |
| |
| bool DebugInfoFinder::addType(DIType *DT) { |
| if (!DT) |
| return false; |
| |
| if (!NodesSeen.insert(DT).second) |
| return false; |
| |
| TYs.push_back(const_cast<DIType *>(DT)); |
| return true; |
| } |
| |
| bool DebugInfoFinder::addCompileUnit(DICompileUnit *CU) { |
| if (!CU) |
| return false; |
| if (!NodesSeen.insert(CU).second) |
| return false; |
| |
| CUs.push_back(CU); |
| return true; |
| } |
| |
| bool DebugInfoFinder::addGlobalVariable(DIGlobalVariableExpression *DIG) { |
| if (!NodesSeen.insert(DIG).second) |
| return false; |
| |
| GVs.push_back(DIG); |
| return true; |
| } |
| |
| bool DebugInfoFinder::addSubprogram(DISubprogram *SP) { |
| if (!SP) |
| return false; |
| |
| if (!NodesSeen.insert(SP).second) |
| return false; |
| |
| SPs.push_back(SP); |
| return true; |
| } |
| |
| bool DebugInfoFinder::addScope(DIScope *Scope) { |
| if (!Scope) |
| return false; |
| // FIXME: Ocaml binding generates a scope with no content, we treat it |
| // as null for now. |
| if (Scope->getNumOperands() == 0) |
| return false; |
| if (!NodesSeen.insert(Scope).second) |
| return false; |
| Scopes.push_back(Scope); |
| return true; |
| } |
| |
| static MDNode *stripDebugLocFromLoopID(MDNode *N) { |
| assert(!N->operands().empty() && "Missing self reference?"); |
| |
| // if there is no debug location, we do not have to rewrite this MDNode. |
| if (std::none_of(N->op_begin() + 1, N->op_end(), [](const MDOperand &Op) { |
| return isa<DILocation>(Op.get()); |
| })) |
| return N; |
| |
| // If there is only the debug location without any actual loop metadata, we |
| // can remove the metadata. |
| if (std::none_of(N->op_begin() + 1, N->op_end(), [](const MDOperand &Op) { |
| return !isa<DILocation>(Op.get()); |
| })) |
| return nullptr; |
| |
| SmallVector<Metadata *, 4> Args; |
| // Reserve operand 0 for loop id self reference. |
| auto TempNode = MDNode::getTemporary(N->getContext(), None); |
| Args.push_back(TempNode.get()); |
| // Add all non-debug location operands back. |
| for (auto Op = N->op_begin() + 1; Op != N->op_end(); Op++) { |
| if (!isa<DILocation>(*Op)) |
| Args.push_back(*Op); |
| } |
| |
| // Set the first operand to itself. |
| MDNode *LoopID = MDNode::get(N->getContext(), Args); |
| LoopID->replaceOperandWith(0, LoopID); |
| return LoopID; |
| } |
| |
| bool llvm::stripDebugInfo(Function &F) { |
| bool Changed = false; |
| if (F.hasMetadata(LLVMContext::MD_dbg)) { |
| Changed = true; |
| F.setSubprogram(nullptr); |
| } |
| |
| DenseMap<MDNode*, MDNode*> LoopIDsMap; |
| for (BasicBlock &BB : F) { |
| for (auto II = BB.begin(), End = BB.end(); II != End;) { |
| Instruction &I = *II++; // We may delete the instruction, increment now. |
| if (isa<DbgInfoIntrinsic>(&I)) { |
| I.eraseFromParent(); |
| Changed = true; |
| continue; |
| } |
| if (I.getDebugLoc()) { |
| Changed = true; |
| I.setDebugLoc(DebugLoc()); |
| } |
| } |
| |
| auto *TermInst = BB.getTerminator(); |
| if (!TermInst) |
| // This is invalid IR, but we may not have run the verifier yet |
| continue; |
| if (auto *LoopID = TermInst->getMetadata(LLVMContext::MD_loop)) { |
| auto *NewLoopID = LoopIDsMap.lookup(LoopID); |
| if (!NewLoopID) |
| NewLoopID = LoopIDsMap[LoopID] = stripDebugLocFromLoopID(LoopID); |
| if (NewLoopID != LoopID) |
| TermInst->setMetadata(LLVMContext::MD_loop, NewLoopID); |
| } |
| } |
| return Changed; |
| } |
| |
| bool llvm::StripDebugInfo(Module &M) { |
| bool Changed = false; |
| |
| for (Module::named_metadata_iterator NMI = M.named_metadata_begin(), |
| NME = M.named_metadata_end(); NMI != NME;) { |
| NamedMDNode *NMD = &*NMI; |
| ++NMI; |
| |
| // We're stripping debug info, and without them, coverage information |
| // doesn't quite make sense. |
| if (NMD->getName().startswith("llvm.dbg.") || |
| NMD->getName() == "llvm.gcov") { |
| NMD->eraseFromParent(); |
| Changed = true; |
| } |
| } |
| |
| for (Function &F : M) |
| Changed |= stripDebugInfo(F); |
| |
| for (auto &GV : M.globals()) { |
| Changed |= GV.eraseMetadata(LLVMContext::MD_dbg); |
| } |
| |
| if (GVMaterializer *Materializer = M.getMaterializer()) |
| Materializer->setStripDebugInfo(); |
| |
| return Changed; |
| } |
| |
| namespace { |
| |
| /// Helper class to downgrade -g metadata to -gline-tables-only metadata. |
| class DebugTypeInfoRemoval { |
| DenseMap<Metadata *, Metadata *> Replacements; |
| |
| public: |
| /// The (void)() type. |
| MDNode *EmptySubroutineType; |
| |
| private: |
| /// Remember what linkage name we originally had before stripping. If we end |
| /// up making two subprograms identical who originally had different linkage |
| /// names, then we need to make one of them distinct, to avoid them getting |
| /// uniqued. Maps the new node to the old linkage name. |
| DenseMap<DISubprogram *, StringRef> NewToLinkageName; |
| |
| // TODO: Remember the distinct subprogram we created for a given linkage name, |
| // so that we can continue to unique whenever possible. Map <newly created |
| // node, old linkage name> to the first (possibly distinct) mdsubprogram |
| // created for that combination. This is not strictly needed for correctness, |
| // but can cut down on the number of MDNodes and let us diff cleanly with the |
| // output of -gline-tables-only. |
| |
| public: |
| DebugTypeInfoRemoval(LLVMContext &C) |
| : EmptySubroutineType(DISubroutineType::get(C, DINode::FlagZero, 0, |
| MDNode::get(C, {}))) {} |
| |
| Metadata *map(Metadata *M) { |
| if (!M) |
| return nullptr; |
| auto Replacement = Replacements.find(M); |
| if (Replacement != Replacements.end()) |
| return Replacement->second; |
| |
| return M; |
| } |
| MDNode *mapNode(Metadata *N) { return dyn_cast_or_null<MDNode>(map(N)); } |
| |
| /// Recursively remap N and all its referenced children. Does a DF post-order |
| /// traversal, so as to remap bottoms up. |
| void traverseAndRemap(MDNode *N) { traverse(N); } |
| |
| private: |
| // Create a new DISubprogram, to replace the one given. |
| DISubprogram *getReplacementSubprogram(DISubprogram *MDS) { |
| auto *FileAndScope = cast_or_null<DIFile>(map(MDS->getFile())); |
| StringRef LinkageName = MDS->getName().empty() ? MDS->getLinkageName() : ""; |
| DISubprogram *Declaration = nullptr; |
| auto *Type = cast_or_null<DISubroutineType>(map(MDS->getType())); |
| DIType *ContainingType = |
| cast_or_null<DIType>(map(MDS->getContainingType())); |
| auto *Unit = cast_or_null<DICompileUnit>(map(MDS->getUnit())); |
| auto Variables = nullptr; |
| auto TemplateParams = nullptr; |
| |
| // Make a distinct DISubprogram, for situations that warrent it. |
| auto distinctMDSubprogram = [&]() { |
| return DISubprogram::getDistinct( |
| MDS->getContext(), FileAndScope, MDS->getName(), LinkageName, |
| FileAndScope, MDS->getLine(), Type, MDS->getScopeLine(), |
| ContainingType, MDS->getVirtualIndex(), MDS->getThisAdjustment(), |
| MDS->getFlags(), MDS->getSPFlags(), Unit, TemplateParams, Declaration, |
| Variables); |
| }; |
| |
| if (MDS->isDistinct()) |
| return distinctMDSubprogram(); |
| |
| auto *NewMDS = DISubprogram::get( |
| MDS->getContext(), FileAndScope, MDS->getName(), LinkageName, |
| FileAndScope, MDS->getLine(), Type, MDS->getScopeLine(), ContainingType, |
| MDS->getVirtualIndex(), MDS->getThisAdjustment(), MDS->getFlags(), |
| MDS->getSPFlags(), Unit, TemplateParams, Declaration, Variables); |
| |
| StringRef OldLinkageName = MDS->getLinkageName(); |
| |
| // See if we need to make a distinct one. |
| auto OrigLinkage = NewToLinkageName.find(NewMDS); |
| if (OrigLinkage != NewToLinkageName.end()) { |
| if (OrigLinkage->second == OldLinkageName) |
| // We're good. |
| return NewMDS; |
| |
| // Otherwise, need to make a distinct one. |
| // TODO: Query the map to see if we already have one. |
| return distinctMDSubprogram(); |
| } |
| |
| NewToLinkageName.insert({NewMDS, MDS->getLinkageName()}); |
| return NewMDS; |
| } |
| |
| /// Create a new compile unit, to replace the one given |
| DICompileUnit *getReplacementCU(DICompileUnit *CU) { |
| // Drop skeleton CUs. |
| if (CU->getDWOId()) |
| return nullptr; |
| |
| auto *File = cast_or_null<DIFile>(map(CU->getFile())); |
| MDTuple *EnumTypes = nullptr; |
| MDTuple *RetainedTypes = nullptr; |
| MDTuple *GlobalVariables = nullptr; |
| MDTuple *ImportedEntities = nullptr; |
| return DICompileUnit::getDistinct( |
| CU->getContext(), CU->getSourceLanguage(), File, CU->getProducer(), |
| CU->isOptimized(), CU->getFlags(), CU->getRuntimeVersion(), |
| CU->getSplitDebugFilename(), DICompileUnit::LineTablesOnly, EnumTypes, |
| RetainedTypes, GlobalVariables, ImportedEntities, CU->getMacros(), |
| CU->getDWOId(), CU->getSplitDebugInlining(), |
| CU->getDebugInfoForProfiling(), CU->getNameTableKind(), |
| CU->getRangesBaseAddress()); |
| } |
| |
| DILocation *getReplacementMDLocation(DILocation *MLD) { |
| auto *Scope = map(MLD->getScope()); |
| auto *InlinedAt = map(MLD->getInlinedAt()); |
| if (MLD->isDistinct()) |
| return DILocation::getDistinct(MLD->getContext(), MLD->getLine(), |
| MLD->getColumn(), Scope, InlinedAt); |
| return DILocation::get(MLD->getContext(), MLD->getLine(), MLD->getColumn(), |
| Scope, InlinedAt); |
| } |
| |
| /// Create a new generic MDNode, to replace the one given |
| MDNode *getReplacementMDNode(MDNode *N) { |
| SmallVector<Metadata *, 8> Ops; |
| Ops.reserve(N->getNumOperands()); |
| for (auto &I : N->operands()) |
| if (I) |
| Ops.push_back(map(I)); |
| auto *Ret = MDNode::get(N->getContext(), Ops); |
| return Ret; |
| } |
| |
| /// Attempt to re-map N to a newly created node. |
| void remap(MDNode *N) { |
| if (Replacements.count(N)) |
| return; |
| |
| auto doRemap = [&](MDNode *N) -> MDNode * { |
| if (!N) |
| return nullptr; |
| if (auto *MDSub = dyn_cast<DISubprogram>(N)) { |
| remap(MDSub->getUnit()); |
| return getReplacementSubprogram(MDSub); |
| } |
| if (isa<DISubroutineType>(N)) |
| return EmptySubroutineType; |
| if (auto *CU = dyn_cast<DICompileUnit>(N)) |
| return getReplacementCU(CU); |
| if (isa<DIFile>(N)) |
| return N; |
| if (auto *MDLB = dyn_cast<DILexicalBlockBase>(N)) |
| // Remap to our referenced scope (recursively). |
| return mapNode(MDLB->getScope()); |
| if (auto *MLD = dyn_cast<DILocation>(N)) |
| return getReplacementMDLocation(MLD); |
| |
| // Otherwise, if we see these, just drop them now. Not strictly necessary, |
| // but this speeds things up a little. |
| if (isa<DINode>(N)) |
| return nullptr; |
| |
| return getReplacementMDNode(N); |
| }; |
| Replacements[N] = doRemap(N); |
| } |
| |
| /// Do the remapping traversal. |
| void traverse(MDNode *); |
| }; |
| |
| } // end anonymous namespace |
| |
| void DebugTypeInfoRemoval::traverse(MDNode *N) { |
| if (!N || Replacements.count(N)) |
| return; |
| |
| // To avoid cycles, as well as for efficiency sake, we will sometimes prune |
| // parts of the graph. |
| auto prune = [](MDNode *Parent, MDNode *Child) { |
| if (auto *MDS = dyn_cast<DISubprogram>(Parent)) |
| return Child == MDS->getRetainedNodes().get(); |
| return false; |
| }; |
| |
| SmallVector<MDNode *, 16> ToVisit; |
| DenseSet<MDNode *> Opened; |
| |
| // Visit each node starting at N in post order, and map them. |
| ToVisit.push_back(N); |
| while (!ToVisit.empty()) { |
| auto *N = ToVisit.back(); |
| if (!Opened.insert(N).second) { |
| // Close it. |
| remap(N); |
| ToVisit.pop_back(); |
| continue; |
| } |
| for (auto &I : N->operands()) |
| if (auto *MDN = dyn_cast_or_null<MDNode>(I)) |
| if (!Opened.count(MDN) && !Replacements.count(MDN) && !prune(N, MDN) && |
| !isa<DICompileUnit>(MDN)) |
| ToVisit.push_back(MDN); |
| } |
| } |
| |
| bool llvm::stripNonLineTableDebugInfo(Module &M) { |
| bool Changed = false; |
| |
| // First off, delete the debug intrinsics. |
| auto RemoveUses = [&](StringRef Name) { |
| if (auto *DbgVal = M.getFunction(Name)) { |
| while (!DbgVal->use_empty()) |
| cast<Instruction>(DbgVal->user_back())->eraseFromParent(); |
| DbgVal->eraseFromParent(); |
| Changed = true; |
| } |
| }; |
| RemoveUses("llvm.dbg.declare"); |
| RemoveUses("llvm.dbg.value"); |
| |
| // Delete non-CU debug info named metadata nodes. |
| for (auto NMI = M.named_metadata_begin(), NME = M.named_metadata_end(); |
| NMI != NME;) { |
| NamedMDNode *NMD = &*NMI; |
| ++NMI; |
| // Specifically keep dbg.cu around. |
| if (NMD->getName() == "llvm.dbg.cu") |
| continue; |
| } |
| |
| // Drop all dbg attachments from global variables. |
| for (auto &GV : M.globals()) |
| GV.eraseMetadata(LLVMContext::MD_dbg); |
| |
| DebugTypeInfoRemoval Mapper(M.getContext()); |
| auto remap = [&](MDNode *Node) -> MDNode * { |
| if (!Node) |
| return nullptr; |
| Mapper.traverseAndRemap(Node); |
| auto *NewNode = Mapper.mapNode(Node); |
| Changed |= Node != NewNode; |
| Node = NewNode; |
| return NewNode; |
| }; |
| |
| // Rewrite the DebugLocs to be equivalent to what |
| // -gline-tables-only would have created. |
| for (auto &F : M) { |
| if (auto *SP = F.getSubprogram()) { |
| Mapper.traverseAndRemap(SP); |
| auto *NewSP = cast<DISubprogram>(Mapper.mapNode(SP)); |
| Changed |= SP != NewSP; |
| F.setSubprogram(NewSP); |
| } |
| for (auto &BB : F) { |
| for (auto &I : BB) { |
| auto remapDebugLoc = [&](DebugLoc DL) -> DebugLoc { |
| auto *Scope = DL.getScope(); |
| MDNode *InlinedAt = DL.getInlinedAt(); |
| Scope = remap(Scope); |
| InlinedAt = remap(InlinedAt); |
| return DebugLoc::get(DL.getLine(), DL.getCol(), Scope, InlinedAt); |
| }; |
| |
| if (I.getDebugLoc() != DebugLoc()) |
| I.setDebugLoc(remapDebugLoc(I.getDebugLoc())); |
| |
| // Remap DILocations in untyped MDNodes (e.g., llvm.loop). |
| SmallVector<std::pair<unsigned, MDNode *>, 2> MDs; |
| I.getAllMetadata(MDs); |
| for (auto Attachment : MDs) |
| if (auto *T = dyn_cast_or_null<MDTuple>(Attachment.second)) |
| for (unsigned N = 0; N < T->getNumOperands(); ++N) |
| if (auto *Loc = dyn_cast_or_null<DILocation>(T->getOperand(N))) |
| if (Loc != DebugLoc()) |
| T->replaceOperandWith(N, remapDebugLoc(Loc)); |
| } |
| } |
| } |
| |
| // Create a new llvm.dbg.cu, which is equivalent to the one |
| // -gline-tables-only would have created. |
| for (auto &NMD : M.getNamedMDList()) { |
| SmallVector<MDNode *, 8> Ops; |
| for (MDNode *Op : NMD.operands()) |
| Ops.push_back(remap(Op)); |
| |
| if (!Changed) |
| continue; |
| |
| NMD.clearOperands(); |
| for (auto *Op : Ops) |
| if (Op) |
| NMD.addOperand(Op); |
| } |
| return Changed; |
| } |
| |
| unsigned llvm::getDebugMetadataVersionFromModule(const Module &M) { |
| if (auto *Val = mdconst::dyn_extract_or_null<ConstantInt>( |
| M.getModuleFlag("Debug Info Version"))) |
| return Val->getZExtValue(); |
| return 0; |
| } |
| |
| void Instruction::applyMergedLocation(const DILocation *LocA, |
| const DILocation *LocB) { |
| setDebugLoc(DILocation::getMergedLocation(LocA, LocB)); |
| } |
| |
| //===----------------------------------------------------------------------===// |
| // LLVM C API implementations. |
| //===----------------------------------------------------------------------===// |
| |
| static unsigned map_from_llvmDWARFsourcelanguage(LLVMDWARFSourceLanguage lang) { |
| switch (lang) { |
| #define HANDLE_DW_LANG(ID, NAME, LOWER_BOUND, VERSION, VENDOR) \ |
| case LLVMDWARFSourceLanguage##NAME: \ |
| return ID; |
| #include "llvm/BinaryFormat/Dwarf.def" |
| #undef HANDLE_DW_LANG |
| } |
| llvm_unreachable("Unhandled Tag"); |
| } |
| |
| template <typename DIT> DIT *unwrapDI(LLVMMetadataRef Ref) { |
| return (DIT *)(Ref ? unwrap<MDNode>(Ref) : nullptr); |
| } |
| |
| static DINode::DIFlags map_from_llvmDIFlags(LLVMDIFlags Flags) { |
| return static_cast<DINode::DIFlags>(Flags); |
| } |
| |
| static LLVMDIFlags map_to_llvmDIFlags(DINode::DIFlags Flags) { |
| return static_cast<LLVMDIFlags>(Flags); |
| } |
| |
| static DISubprogram::DISPFlags |
| pack_into_DISPFlags(bool IsLocalToUnit, bool IsDefinition, bool IsOptimized) { |
| return DISubprogram::toSPFlags(IsLocalToUnit, IsDefinition, IsOptimized); |
| } |
| |
| unsigned LLVMDebugMetadataVersion() { |
| return DEBUG_METADATA_VERSION; |
| } |
| |
| LLVMDIBuilderRef LLVMCreateDIBuilderDisallowUnresolved(LLVMModuleRef M) { |
| return wrap(new DIBuilder(*unwrap(M), false)); |
| } |
| |
| LLVMDIBuilderRef LLVMCreateDIBuilder(LLVMModuleRef M) { |
| return wrap(new DIBuilder(*unwrap(M))); |
| } |
| |
| unsigned LLVMGetModuleDebugMetadataVersion(LLVMModuleRef M) { |
| return getDebugMetadataVersionFromModule(*unwrap(M)); |
| } |
| |
| LLVMBool LLVMStripModuleDebugInfo(LLVMModuleRef M) { |
| return StripDebugInfo(*unwrap(M)); |
| } |
| |
| void LLVMDisposeDIBuilder(LLVMDIBuilderRef Builder) { |
| delete unwrap(Builder); |
| } |
| |
| void LLVMDIBuilderFinalize(LLVMDIBuilderRef Builder) { |
| unwrap(Builder)->finalize(); |
| } |
| |
| LLVMMetadataRef LLVMDIBuilderCreateCompileUnit( |
| LLVMDIBuilderRef Builder, LLVMDWARFSourceLanguage Lang, |
| LLVMMetadataRef FileRef, const char *Producer, size_t ProducerLen, |
| LLVMBool isOptimized, const char *Flags, size_t FlagsLen, |
| unsigned RuntimeVer, const char *SplitName, size_t SplitNameLen, |
| LLVMDWARFEmissionKind Kind, unsigned DWOId, LLVMBool SplitDebugInlining, |
| LLVMBool DebugInfoForProfiling) { |
| auto File = unwrapDI<DIFile>(FileRef); |
| |
| return wrap(unwrap(Builder)->createCompileUnit( |
| map_from_llvmDWARFsourcelanguage(Lang), File, |
| StringRef(Producer, ProducerLen), isOptimized, |
| StringRef(Flags, FlagsLen), RuntimeVer, |
| StringRef(SplitName, SplitNameLen), |
| static_cast<DICompileUnit::DebugEmissionKind>(Kind), DWOId, |
| SplitDebugInlining, DebugInfoForProfiling)); |
| } |
| |
| LLVMMetadataRef |
| LLVMDIBuilderCreateFile(LLVMDIBuilderRef Builder, const char *Filename, |
| size_t FilenameLen, const char *Directory, |
| size_t DirectoryLen) { |
| return wrap(unwrap(Builder)->createFile(StringRef(Filename, FilenameLen), |
| StringRef(Directory, DirectoryLen))); |
| } |
| |
| LLVMMetadataRef |
| LLVMDIBuilderCreateModule(LLVMDIBuilderRef Builder, LLVMMetadataRef ParentScope, |
| const char *Name, size_t NameLen, |
| const char *ConfigMacros, size_t ConfigMacrosLen, |
| const char *IncludePath, size_t IncludePathLen, |
| const char *ISysRoot, size_t ISysRootLen) { |
| return wrap(unwrap(Builder)->createModule( |
| unwrapDI<DIScope>(ParentScope), StringRef(Name, NameLen), |
| StringRef(ConfigMacros, ConfigMacrosLen), |
| StringRef(IncludePath, IncludePathLen), |
| StringRef(ISysRoot, ISysRootLen))); |
| } |
| |
| LLVMMetadataRef LLVMDIBuilderCreateNameSpace(LLVMDIBuilderRef Builder, |
| LLVMMetadataRef ParentScope, |
| const char *Name, size_t NameLen, |
| LLVMBool ExportSymbols) { |
| return wrap(unwrap(Builder)->createNameSpace( |
| unwrapDI<DIScope>(ParentScope), StringRef(Name, NameLen), ExportSymbols)); |
| } |
| |
| LLVMMetadataRef LLVMDIBuilderCreateFunction( |
| LLVMDIBuilderRef Builder, LLVMMetadataRef Scope, const char *Name, |
| size_t NameLen, const char *LinkageName, size_t LinkageNameLen, |
| LLVMMetadataRef File, unsigned LineNo, LLVMMetadataRef Ty, |
| LLVMBool IsLocalToUnit, LLVMBool IsDefinition, |
| unsigned ScopeLine, LLVMDIFlags Flags, LLVMBool IsOptimized) { |
| return wrap(unwrap(Builder)->createFunction( |
| unwrapDI<DIScope>(Scope), {Name, NameLen}, {LinkageName, LinkageNameLen}, |
| unwrapDI<DIFile>(File), LineNo, unwrapDI<DISubroutineType>(Ty), ScopeLine, |
| map_from_llvmDIFlags(Flags), |
| pack_into_DISPFlags(IsLocalToUnit, IsDefinition, IsOptimized), nullptr, |
| nullptr, nullptr)); |
| } |
| |
| |
| LLVMMetadataRef LLVMDIBuilderCreateLexicalBlock( |
| LLVMDIBuilderRef Builder, LLVMMetadataRef Scope, |
| LLVMMetadataRef File, unsigned Line, unsigned Col) { |
| return wrap(unwrap(Builder)->createLexicalBlock(unwrapDI<DIScope>(Scope), |
| unwrapDI<DIFile>(File), |
| Line, Col)); |
| } |
| |
| LLVMMetadataRef |
| LLVMDIBuilderCreateLexicalBlockFile(LLVMDIBuilderRef Builder, |
| LLVMMetadataRef Scope, |
| LLVMMetadataRef File, |
| unsigned Discriminator) { |
| return wrap(unwrap(Builder)->createLexicalBlockFile(unwrapDI<DIScope>(Scope), |
| unwrapDI<DIFile>(File), |
| Discriminator)); |
| } |
| |
| LLVMMetadataRef |
| LLVMDIBuilderCreateImportedModuleFromNamespace(LLVMDIBuilderRef Builder, |
| LLVMMetadataRef Scope, |
| LLVMMetadataRef NS, |
| LLVMMetadataRef File, |
| unsigned Line) { |
| return wrap(unwrap(Builder)->createImportedModule(unwrapDI<DIScope>(Scope), |
| unwrapDI<DINamespace>(NS), |
| unwrapDI<DIFile>(File), |
| Line)); |
| } |
| |
| LLVMMetadataRef |
| LLVMDIBuilderCreateImportedModuleFromAlias(LLVMDIBuilderRef Builder, |
| LLVMMetadataRef Scope, |
| LLVMMetadataRef ImportedEntity, |
| LLVMMetadataRef File, |
| unsigned Line) { |
| return wrap(unwrap(Builder)->createImportedModule( |
| unwrapDI<DIScope>(Scope), |
| unwrapDI<DIImportedEntity>(ImportedEntity), |
| unwrapDI<DIFile>(File), Line)); |
| } |
| |
| LLVMMetadataRef |
| LLVMDIBuilderCreateImportedModuleFromModule(LLVMDIBuilderRef Builder, |
| LLVMMetadataRef Scope, |
| LLVMMetadataRef M, |
| LLVMMetadataRef File, |
| unsigned Line) { |
| return wrap(unwrap(Builder)->createImportedModule(unwrapDI<DIScope>(Scope), |
| unwrapDI<DIModule>(M), |
| unwrapDI<DIFile>(File), |
| Line)); |
| } |
| |
| LLVMMetadataRef |
| LLVMDIBuilderCreateImportedDeclaration(LLVMDIBuilderRef Builder, |
| LLVMMetadataRef Scope, |
| LLVMMetadataRef Decl, |
| LLVMMetadataRef File, |
| unsigned Line, |
| const char *Name, size_t NameLen) { |
| return wrap(unwrap(Builder)->createImportedDeclaration( |
| unwrapDI<DIScope>(Scope), |
| unwrapDI<DINode>(Decl), |
| unwrapDI<DIFile>(File), Line, {Name, NameLen})); |
| } |
| |
| LLVMMetadataRef |
| LLVMDIBuilderCreateDebugLocation(LLVMContextRef Ctx, unsigned Line, |
| unsigned Column, LLVMMetadataRef Scope, |
| LLVMMetadataRef InlinedAt) { |
| return wrap(DILocation::get(*unwrap(Ctx), Line, Column, unwrap(Scope), |
| unwrap(InlinedAt))); |
| } |
| |
| unsigned LLVMDILocationGetLine(LLVMMetadataRef Location) { |
| return unwrapDI<DILocation>(Location)->getLine(); |
| } |
| |
| unsigned LLVMDILocationGetColumn(LLVMMetadataRef Location) { |
| return unwrapDI<DILocation>(Location)->getColumn(); |
| } |
| |
| LLVMMetadataRef LLVMDILocationGetScope(LLVMMetadataRef Location) { |
| return wrap(unwrapDI<DILocation>(Location)->getScope()); |
| } |
| |
| LLVMMetadataRef LLVMDILocationGetInlinedAt(LLVMMetadataRef Location) { |
| return wrap(unwrapDI<DILocation>(Location)->getInlinedAt()); |
| } |
| |
| LLVMMetadataRef LLVMDIScopeGetFile(LLVMMetadataRef Scope) { |
| return wrap(unwrapDI<DIScope>(Scope)->getFile()); |
| } |
| |
| const char *LLVMDIFileGetDirectory(LLVMMetadataRef File, unsigned *Len) { |
| auto Dir = unwrapDI<DIFile>(File)->getDirectory(); |
| *Len = Dir.size(); |
| return Dir.data(); |
| } |
| |
| const char *LLVMDIFileGetFilename(LLVMMetadataRef File, unsigned *Len) { |
| auto Name = unwrapDI<DIFile>(File)->getFilename(); |
| *Len = Name.size(); |
| return Name.data(); |
| } |
| |
| const char *LLVMDIFileGetSource(LLVMMetadataRef File, unsigned *Len) { |
| if (auto Src = unwrapDI<DIFile>(File)->getSource()) { |
| *Len = Src->size(); |
| return Src->data(); |
| } |
| *Len = 0; |
| return ""; |
| } |
| |
| LLVMMetadataRef LLVMDIBuilderCreateMacro(LLVMDIBuilderRef Builder, |
| LLVMMetadataRef ParentMacroFile, |
| unsigned Line, |
| LLVMDWARFMacinfoRecordType RecordType, |
| const char *Name, size_t NameLen, |
| const char *Value, size_t ValueLen) { |
| return wrap( |
| unwrap(Builder)->createMacro(unwrapDI<DIMacroFile>(ParentMacroFile), Line, |
| static_cast<MacinfoRecordType>(RecordType), |
| {Name, NameLen}, {Value, ValueLen})); |
| } |
| |
| LLVMMetadataRef |
| LLVMDIBuilderCreateTempMacroFile(LLVMDIBuilderRef Builder, |
| LLVMMetadataRef ParentMacroFile, unsigned Line, |
| LLVMMetadataRef File) { |
| return wrap(unwrap(Builder)->createTempMacroFile( |
| unwrapDI<DIMacroFile>(ParentMacroFile), Line, unwrapDI<DIFile>(File))); |
| } |
| |
| LLVMMetadataRef LLVMDIBuilderCreateEnumerator(LLVMDIBuilderRef Builder, |
| const char *Name, size_t NameLen, |
| int64_t Value, |
| LLVMBool IsUnsigned) { |
| return wrap(unwrap(Builder)->createEnumerator({Name, NameLen}, Value, |
| IsUnsigned != 0)); |
| } |
| |
| LLVMMetadataRef LLVMDIBuilderCreateEnumerationType( |
| LLVMDIBuilderRef Builder, LLVMMetadataRef Scope, const char *Name, |
| size_t NameLen, LLVMMetadataRef File, unsigned LineNumber, |
| uint64_t SizeInBits, uint32_t AlignInBits, LLVMMetadataRef *Elements, |
| unsigned NumElements, LLVMMetadataRef ClassTy) { |
| auto Elts = unwrap(Builder)->getOrCreateArray({unwrap(Elements), |
| NumElements}); |
| return wrap(unwrap(Builder)->createEnumerationType( |
| unwrapDI<DIScope>(Scope), {Name, NameLen}, unwrapDI<DIFile>(File), |
| LineNumber, SizeInBits, AlignInBits, Elts, unwrapDI<DIType>(ClassTy))); |
| } |
| |
| LLVMMetadataRef LLVMDIBuilderCreateUnionType( |
| LLVMDIBuilderRef Builder, LLVMMetadataRef Scope, const char *Name, |
| size_t NameLen, LLVMMetadataRef File, unsigned LineNumber, |
| uint64_t SizeInBits, uint32_t AlignInBits, LLVMDIFlags Flags, |
| LLVMMetadataRef *Elements, unsigned NumElements, unsigned RunTimeLang, |
| const char *UniqueId, size_t UniqueIdLen) { |
| auto Elts = unwrap(Builder)->getOrCreateArray({unwrap(Elements), |
| NumElements}); |
| return wrap(unwrap(Builder)->createUnionType( |
| unwrapDI<DIScope>(Scope), {Name, NameLen}, unwrapDI<DIFile>(File), |
| LineNumber, SizeInBits, AlignInBits, map_from_llvmDIFlags(Flags), |
| Elts, RunTimeLang, {UniqueId, UniqueIdLen})); |
| } |
| |
| |
| LLVMMetadataRef |
| LLVMDIBuilderCreateArrayType(LLVMDIBuilderRef Builder, uint64_t Size, |
| uint32_t AlignInBits, LLVMMetadataRef Ty, |
| LLVMMetadataRef *Subscripts, |
| unsigned NumSubscripts) { |
| auto Subs = unwrap(Builder)->getOrCreateArray({unwrap(Subscripts), |
| NumSubscripts}); |
| return wrap(unwrap(Builder)->createArrayType(Size, AlignInBits, |
| unwrapDI<DIType>(Ty), Subs)); |
| } |
| |
| LLVMMetadataRef |
| LLVMDIBuilderCreateVectorType(LLVMDIBuilderRef Builder, uint64_t Size, |
| uint32_t AlignInBits, LLVMMetadataRef Ty, |
| LLVMMetadataRef *Subscripts, |
| unsigned NumSubscripts) { |
| auto Subs = unwrap(Builder)->getOrCreateArray({unwrap(Subscripts), |
| NumSubscripts}); |
| return wrap(unwrap(Builder)->createVectorType(Size, AlignInBits, |
| unwrapDI<DIType>(Ty), Subs)); |
| } |
| |
| LLVMMetadataRef |
| LLVMDIBuilderCreateBasicType(LLVMDIBuilderRef Builder, const char *Name, |
| size_t NameLen, uint64_t SizeInBits, |
| LLVMDWARFTypeEncoding Encoding, |
| LLVMDIFlags Flags) { |
| return wrap(unwrap(Builder)->createBasicType({Name, NameLen}, |
| SizeInBits, Encoding, |
| map_from_llvmDIFlags(Flags))); |
| } |
| |
| LLVMMetadataRef LLVMDIBuilderCreatePointerType( |
| LLVMDIBuilderRef Builder, LLVMMetadataRef PointeeTy, |
| uint64_t SizeInBits, uint32_t AlignInBits, unsigned AddressSpace, |
| const char *Name, size_t NameLen) { |
| return wrap(unwrap(Builder)->createPointerType(unwrapDI<DIType>(PointeeTy), |
| SizeInBits, AlignInBits, |
| AddressSpace, {Name, NameLen})); |
| } |
| |
| LLVMMetadataRef LLVMDIBuilderCreateStructType( |
| LLVMDIBuilderRef Builder, LLVMMetadataRef Scope, const char *Name, |
| size_t NameLen, LLVMMetadataRef File, unsigned LineNumber, |
| uint64_t SizeInBits, uint32_t AlignInBits, LLVMDIFlags Flags, |
| LLVMMetadataRef DerivedFrom, LLVMMetadataRef *Elements, |
| unsigned NumElements, unsigned RunTimeLang, LLVMMetadataRef VTableHolder, |
| const char *UniqueId, size_t UniqueIdLen) { |
| auto Elts = unwrap(Builder)->getOrCreateArray({unwrap(Elements), |
| NumElements}); |
| return wrap(unwrap(Builder)->createStructType( |
| unwrapDI<DIScope>(Scope), {Name, NameLen}, unwrapDI<DIFile>(File), |
| LineNumber, SizeInBits, AlignInBits, map_from_llvmDIFlags(Flags), |
| unwrapDI<DIType>(DerivedFrom), Elts, RunTimeLang, |
| unwrapDI<DIType>(VTableHolder), {UniqueId, UniqueIdLen})); |
| } |
| |
| LLVMMetadataRef LLVMDIBuilderCreateMemberType( |
| LLVMDIBuilderRef Builder, LLVMMetadataRef Scope, const char *Name, |
| size_t NameLen, LLVMMetadataRef File, unsigned LineNo, uint64_t SizeInBits, |
| uint32_t AlignInBits, uint64_t OffsetInBits, LLVMDIFlags Flags, |
| LLVMMetadataRef Ty) { |
| return wrap(unwrap(Builder)->createMemberType(unwrapDI<DIScope>(Scope), |
| {Name, NameLen}, unwrapDI<DIFile>(File), LineNo, SizeInBits, AlignInBits, |
| OffsetInBits, map_from_llvmDIFlags(Flags), unwrapDI<DIType>(Ty))); |
| } |
| |
| LLVMMetadataRef |
| LLVMDIBuilderCreateUnspecifiedType(LLVMDIBuilderRef Builder, const char *Name, |
| size_t NameLen) { |
| return wrap(unwrap(Builder)->createUnspecifiedType({Name, NameLen})); |
| } |
| |
| LLVMMetadataRef |
| LLVMDIBuilderCreateStaticMemberType( |
| LLVMDIBuilderRef Builder, LLVMMetadataRef Scope, const char *Name, |
| size_t NameLen, LLVMMetadataRef File, unsigned LineNumber, |
| LLVMMetadataRef Type, LLVMDIFlags Flags, LLVMValueRef ConstantVal, |
| uint32_t AlignInBits) { |
| return wrap(unwrap(Builder)->createStaticMemberType( |
| unwrapDI<DIScope>(Scope), {Name, NameLen}, |
| unwrapDI<DIFile>(File), LineNumber, unwrapDI<DIType>(Type), |
| map_from_llvmDIFlags(Flags), unwrap<Constant>(ConstantVal), |
| AlignInBits)); |
| } |
| |
| LLVMMetadataRef |
| LLVMDIBuilderCreateObjCIVar(LLVMDIBuilderRef Builder, |
| const char *Name, size_t NameLen, |
| LLVMMetadataRef File, unsigned LineNo, |
| uint64_t SizeInBits, uint32_t AlignInBits, |
| uint64_t OffsetInBits, LLVMDIFlags Flags, |
| LLVMMetadataRef Ty, LLVMMetadataRef PropertyNode) { |
| return wrap(unwrap(Builder)->createObjCIVar( |
| {Name, NameLen}, unwrapDI<DIFile>(File), LineNo, |
| SizeInBits, AlignInBits, OffsetInBits, |
| map_from_llvmDIFlags(Flags), unwrapDI<DIType>(Ty), |
| unwrapDI<MDNode>(PropertyNode))); |
| } |
| |
| LLVMMetadataRef |
| LLVMDIBuilderCreateObjCProperty(LLVMDIBuilderRef Builder, |
| const char *Name, size_t NameLen, |
| LLVMMetadataRef File, unsigned LineNo, |
| const char *GetterName, size_t GetterNameLen, |
| const char *SetterName, size_t SetterNameLen, |
| unsigned PropertyAttributes, |
| LLVMMetadataRef Ty) { |
| return wrap(unwrap(Builder)->createObjCProperty( |
| {Name, NameLen}, unwrapDI<DIFile>(File), LineNo, |
| {GetterName, GetterNameLen}, {SetterName, SetterNameLen}, |
| PropertyAttributes, unwrapDI<DIType>(Ty))); |
| } |
| |
| LLVMMetadataRef |
| LLVMDIBuilderCreateObjectPointerType(LLVMDIBuilderRef Builder, |
| LLVMMetadataRef Type) { |
| return wrap(unwrap(Builder)->createObjectPointerType(unwrapDI<DIType>(Type))); |
| } |
| |
| LLVMMetadataRef |
| LLVMDIBuilderCreateTypedef(LLVMDIBuilderRef Builder, LLVMMetadataRef Type, |
| const char *Name, size_t NameLen, |
| LLVMMetadataRef File, unsigned LineNo, |
| LLVMMetadataRef Scope) { |
| return wrap(unwrap(Builder)->createTypedef( |
| unwrapDI<DIType>(Type), {Name, NameLen}, |
| unwrapDI<DIFile>(File), LineNo, |
| unwrapDI<DIScope>(Scope))); |
| } |
| |
| LLVMMetadataRef |
| LLVMDIBuilderCreateInheritance(LLVMDIBuilderRef Builder, |
| LLVMMetadataRef Ty, LLVMMetadataRef BaseTy, |
| uint64_t BaseOffset, uint32_t VBPtrOffset, |
| LLVMDIFlags Flags) { |
| return wrap(unwrap(Builder)->createInheritance( |
| unwrapDI<DIType>(Ty), unwrapDI<DIType>(BaseTy), |
| BaseOffset, VBPtrOffset, map_from_llvmDIFlags(Flags))); |
| } |
| |
| LLVMMetadataRef |
| LLVMDIBuilderCreateForwardDecl( |
| LLVMDIBuilderRef Builder, unsigned Tag, const char *Name, |
| size_t NameLen, LLVMMetadataRef Scope, LLVMMetadataRef File, unsigned Line, |
| unsigned RuntimeLang, uint64_t SizeInBits, uint32_t AlignInBits, |
| const char *UniqueIdentifier, size_t UniqueIdentifierLen) { |
| return wrap(unwrap(Builder)->createForwardDecl( |
| Tag, {Name, NameLen}, unwrapDI<DIScope>(Scope), |
| unwrapDI<DIFile>(File), Line, RuntimeLang, SizeInBits, |
| AlignInBits, {UniqueIdentifier, UniqueIdentifierLen})); |
| } |
| |
| LLVMMetadataRef |
| LLVMDIBuilderCreateReplaceableCompositeType( |
| LLVMDIBuilderRef Builder, unsigned Tag, const char *Name, |
| size_t NameLen, LLVMMetadataRef Scope, LLVMMetadataRef File, unsigned Line, |
| unsigned RuntimeLang, uint64_t SizeInBits, uint32_t AlignInBits, |
| LLVMDIFlags Flags, const char *UniqueIdentifier, |
| size_t UniqueIdentifierLen) { |
| return wrap(unwrap(Builder)->createReplaceableCompositeType( |
| Tag, {Name, NameLen}, unwrapDI<DIScope>(Scope), |
| unwrapDI<DIFile>(File), Line, RuntimeLang, SizeInBits, |
| AlignInBits, map_from_llvmDIFlags(Flags), |
| {UniqueIdentifier, UniqueIdentifierLen})); |
| } |
| |
| LLVMMetadataRef |
| LLVMDIBuilderCreateQualifiedType(LLVMDIBuilderRef Builder, unsigned Tag, |
| LLVMMetadataRef Type) { |
| return wrap(unwrap(Builder)->createQualifiedType(Tag, |
| unwrapDI<DIType>(Type))); |
| } |
| |
| LLVMMetadataRef |
| LLVMDIBuilderCreateReferenceType(LLVMDIBuilderRef Builder, unsigned Tag, |
| LLVMMetadataRef Type) { |
| return wrap(unwrap(Builder)->createReferenceType(Tag, |
| unwrapDI<DIType>(Type))); |
| } |
| |
| LLVMMetadataRef |
| LLVMDIBuilderCreateNullPtrType(LLVMDIBuilderRef Builder) { |
| return wrap(unwrap(Builder)->createNullPtrType()); |
| } |
| |
| LLVMMetadataRef |
| LLVMDIBuilderCreateMemberPointerType(LLVMDIBuilderRef Builder, |
| LLVMMetadataRef PointeeType, |
| LLVMMetadataRef ClassType, |
| uint64_t SizeInBits, |
| uint32_t AlignInBits, |
| LLVMDIFlags Flags) { |
| return wrap(unwrap(Builder)->createMemberPointerType( |
| unwrapDI<DIType>(PointeeType), |
| unwrapDI<DIType>(ClassType), AlignInBits, SizeInBits, |
| map_from_llvmDIFlags(Flags))); |
| } |
| |
| LLVMMetadataRef |
| LLVMDIBuilderCreateBitFieldMemberType(LLVMDIBuilderRef Builder, |
| LLVMMetadataRef Scope, |
| const char *Name, size_t NameLen, |
| LLVMMetadataRef File, unsigned LineNumber, |
| uint64_t SizeInBits, |
| uint64_t OffsetInBits, |
| uint64_t StorageOffsetInBits, |
| LLVMDIFlags Flags, LLVMMetadataRef Type) { |
| return wrap(unwrap(Builder)->createBitFieldMemberType( |
| unwrapDI<DIScope>(Scope), {Name, NameLen}, |
| unwrapDI<DIFile>(File), LineNumber, |
| SizeInBits, OffsetInBits, StorageOffsetInBits, |
| map_from_llvmDIFlags(Flags), unwrapDI<DIType>(Type))); |
| } |
| |
| LLVMMetadataRef LLVMDIBuilderCreateClassType(LLVMDIBuilderRef Builder, |
| LLVMMetadataRef Scope, const char *Name, size_t NameLen, |
| LLVMMetadataRef File, unsigned LineNumber, uint64_t SizeInBits, |
| uint32_t AlignInBits, uint64_t OffsetInBits, LLVMDIFlags Flags, |
| LLVMMetadataRef DerivedFrom, |
| LLVMMetadataRef *Elements, unsigned NumElements, |
| LLVMMetadataRef VTableHolder, LLVMMetadataRef TemplateParamsNode, |
| const char *UniqueIdentifier, size_t UniqueIdentifierLen) { |
| auto Elts = unwrap(Builder)->getOrCreateArray({unwrap(Elements), |
| NumElements}); |
| return wrap(unwrap(Builder)->createClassType( |
| unwrapDI<DIScope>(Scope), {Name, NameLen}, |
| unwrapDI<DIFile>(File), LineNumber, |
| SizeInBits, AlignInBits, OffsetInBits, |
| map_from_llvmDIFlags(Flags), unwrapDI<DIType>(DerivedFrom), |
| Elts, unwrapDI<DIType>(VTableHolder), |
| unwrapDI<MDNode>(TemplateParamsNode), |
| {UniqueIdentifier, UniqueIdentifierLen})); |
| } |
| |
| LLVMMetadataRef |
| LLVMDIBuilderCreateArtificialType(LLVMDIBuilderRef Builder, |
| LLVMMetadataRef Type) { |
| return wrap(unwrap(Builder)->createArtificialType(unwrapDI<DIType>(Type))); |
| } |
| |
| const char *LLVMDITypeGetName(LLVMMetadataRef DType, size_t *Length) { |
| StringRef Str = unwrap<DIType>(DType)->getName(); |
| *Length = Str.size(); |
| return Str.data(); |
| } |
| |
| uint64_t LLVMDITypeGetSizeInBits(LLVMMetadataRef DType) { |
| return unwrapDI<DIType>(DType)->getSizeInBits(); |
| } |
| |
| uint64_t LLVMDITypeGetOffsetInBits(LLVMMetadataRef DType) { |
| return unwrapDI<DIType>(DType)->getOffsetInBits(); |
| } |
| |
| uint32_t LLVMDITypeGetAlignInBits(LLVMMetadataRef DType) { |
| return unwrapDI<DIType>(DType)->getAlignInBits(); |
| } |
| |
| unsigned LLVMDITypeGetLine(LLVMMetadataRef DType) { |
| return unwrapDI<DIType>(DType)->getLine(); |
| } |
| |
| LLVMDIFlags LLVMDITypeGetFlags(LLVMMetadataRef DType) { |
| return map_to_llvmDIFlags(unwrapDI<DIType>(DType)->getFlags()); |
| } |
| |
| LLVMMetadataRef LLVMDIBuilderGetOrCreateTypeArray(LLVMDIBuilderRef Builder, |
| LLVMMetadataRef *Types, |
| size_t Length) { |
| return wrap( |
| unwrap(Builder)->getOrCreateTypeArray({unwrap(Types), Length}).get()); |
| } |
| |
| LLVMMetadataRef |
| LLVMDIBuilderCreateSubroutineType(LLVMDIBuilderRef Builder, |
| LLVMMetadataRef File, |
| LLVMMetadataRef *ParameterTypes, |
| unsigned NumParameterTypes, |
| LLVMDIFlags Flags) { |
| auto Elts = unwrap(Builder)->getOrCreateTypeArray({unwrap(ParameterTypes), |
| NumParameterTypes}); |
| return wrap(unwrap(Builder)->createSubroutineType( |
| Elts, map_from_llvmDIFlags(Flags))); |
| } |
| |
| LLVMMetadataRef LLVMDIBuilderCreateExpression(LLVMDIBuilderRef Builder, |
| int64_t *Addr, size_t Length) { |
| return wrap(unwrap(Builder)->createExpression(ArrayRef<int64_t>(Addr, |
| Length))); |
| } |
| |
| LLVMMetadataRef |
| LLVMDIBuilderCreateConstantValueExpression(LLVMDIBuilderRef Builder, |
| int64_t Value) { |
| return wrap(unwrap(Builder)->createConstantValueExpression(Value)); |
| } |
| |
| LLVMMetadataRef LLVMDIBuilderCreateGlobalVariableExpression( |
| LLVMDIBuilderRef Builder, LLVMMetadataRef Scope, const char *Name, |
| size_t NameLen, const char *Linkage, size_t LinkLen, LLVMMetadataRef File, |
| unsigned LineNo, LLVMMetadataRef Ty, LLVMBool LocalToUnit, |
| LLVMMetadataRef Expr, LLVMMetadataRef Decl, uint32_t AlignInBits) { |
| return wrap(unwrap(Builder)->createGlobalVariableExpression( |
| unwrapDI<DIScope>(Scope), {Name, NameLen}, {Linkage, LinkLen}, |
| unwrapDI<DIFile>(File), LineNo, unwrapDI<DIType>(Ty), LocalToUnit, |
| unwrap<DIExpression>(Expr), unwrapDI<MDNode>(Decl), |
| nullptr, AlignInBits)); |
| } |
| |
| LLVMMetadataRef LLVMDIGlobalVariableExpressionGetVariable(LLVMMetadataRef GVE) { |
| return wrap(unwrapDI<DIGlobalVariableExpression>(GVE)->getVariable()); |
| } |
| |
| LLVMMetadataRef LLVMDIGlobalVariableExpressionGetExpression( |
| LLVMMetadataRef GVE) { |
| return wrap(unwrapDI<DIGlobalVariableExpression>(GVE)->getExpression()); |
| } |
| |
| LLVMMetadataRef LLVMDIVariableGetFile(LLVMMetadataRef Var) { |
| return wrap(unwrapDI<DIVariable>(Var)->getFile()); |
| } |
| |
| LLVMMetadataRef LLVMDIVariableGetScope(LLVMMetadataRef Var) { |
| return wrap(unwrapDI<DIVariable>(Var)->getScope()); |
| } |
| |
| unsigned LLVMDIVariableGetLine(LLVMMetadataRef Var) { |
| return unwrapDI<DIVariable>(Var)->getLine(); |
| } |
| |
| LLVMMetadataRef LLVMTemporaryMDNode(LLVMContextRef Ctx, LLVMMetadataRef *Data, |
| size_t Count) { |
| return wrap( |
| MDTuple::getTemporary(*unwrap(Ctx), {unwrap(Data), Count}).release()); |
| } |
| |
| void LLVMDisposeTemporaryMDNode(LLVMMetadataRef TempNode) { |
| MDNode::deleteTemporary(unwrapDI<MDNode>(TempNode)); |
| } |
| |
| void LLVMMetadataReplaceAllUsesWith(LLVMMetadataRef TargetMetadata, |
| LLVMMetadataRef Replacement) { |
| auto *Node = unwrapDI<MDNode>(TargetMetadata); |
| Node->replaceAllUsesWith(unwrap<Metadata>(Replacement)); |
| MDNode::deleteTemporary(Node); |
| } |
| |
| LLVMMetadataRef LLVMDIBuilderCreateTempGlobalVariableFwdDecl( |
| LLVMDIBuilderRef Builder, LLVMMetadataRef Scope, const char *Name, |
| size_t NameLen, const char *Linkage, size_t LnkLen, LLVMMetadataRef File, |
| unsigned LineNo, LLVMMetadataRef Ty, LLVMBool LocalToUnit, |
| LLVMMetadataRef Decl, uint32_t AlignInBits) { |
| return wrap(unwrap(Builder)->createTempGlobalVariableFwdDecl( |
| unwrapDI<DIScope>(Scope), {Name, NameLen}, {Linkage, LnkLen}, |
| unwrapDI<DIFile>(File), LineNo, unwrapDI<DIType>(Ty), LocalToUnit, |
| unwrapDI<MDNode>(Decl), nullptr, AlignInBits)); |
| } |
| |
| LLVMValueRef |
| LLVMDIBuilderInsertDeclareBefore(LLVMDIBuilderRef Builder, LLVMValueRef Storage, |
| LLVMMetadataRef VarInfo, LLVMMetadataRef Expr, |
| LLVMMetadataRef DL, LLVMValueRef Instr) { |
| return wrap(unwrap(Builder)->insertDeclare( |
| unwrap(Storage), unwrap<DILocalVariable>(VarInfo), |
| unwrap<DIExpression>(Expr), unwrap<DILocation>(DL), |
| unwrap<Instruction>(Instr))); |
| } |
| |
| LLVMValueRef LLVMDIBuilderInsertDeclareAtEnd( |
| LLVMDIBuilderRef Builder, LLVMValueRef Storage, LLVMMetadataRef VarInfo, |
| LLVMMetadataRef Expr, LLVMMetadataRef DL, LLVMBasicBlockRef Block) { |
| return wrap(unwrap(Builder)->insertDeclare( |
| unwrap(Storage), unwrap<DILocalVariable>(VarInfo), |
| unwrap<DIExpression>(Expr), unwrap<DILocation>(DL), |
| unwrap(Block))); |
| } |
| |
| LLVMValueRef LLVMDIBuilderInsertDbgValueBefore(LLVMDIBuilderRef Builder, |
| LLVMValueRef Val, |
| LLVMMetadataRef VarInfo, |
| LLVMMetadataRef Expr, |
| LLVMMetadataRef DebugLoc, |
| LLVMValueRef Instr) { |
| return wrap(unwrap(Builder)->insertDbgValueIntrinsic( |
| unwrap(Val), unwrap<DILocalVariable>(VarInfo), |
| unwrap<DIExpression>(Expr), unwrap<DILocation>(DebugLoc), |
| unwrap<Instruction>(Instr))); |
| } |
| |
| LLVMValueRef LLVMDIBuilderInsertDbgValueAtEnd(LLVMDIBuilderRef Builder, |
| LLVMValueRef Val, |
| LLVMMetadataRef VarInfo, |
| LLVMMetadataRef Expr, |
| LLVMMetadataRef DebugLoc, |
| LLVMBasicBlockRef Block) { |
| return wrap(unwrap(Builder)->insertDbgValueIntrinsic( |
| unwrap(Val), unwrap<DILocalVariable>(VarInfo), |
| unwrap<DIExpression>(Expr), unwrap<DILocation>(DebugLoc), |
| unwrap(Block))); |
| } |
| |
| LLVMMetadataRef LLVMDIBuilderCreateAutoVariable( |
| LLVMDIBuilderRef Builder, LLVMMetadataRef Scope, const char *Name, |
| size_t NameLen, LLVMMetadataRef File, unsigned LineNo, LLVMMetadataRef Ty, |
| LLVMBool AlwaysPreserve, LLVMDIFlags Flags, uint32_t AlignInBits) { |
| return wrap(unwrap(Builder)->createAutoVariable( |
| unwrap<DIScope>(Scope), {Name, NameLen}, unwrap<DIFile>(File), |
| LineNo, unwrap<DIType>(Ty), AlwaysPreserve, |
| map_from_llvmDIFlags(Flags), AlignInBits)); |
| } |
| |
| LLVMMetadataRef LLVMDIBuilderCreateParameterVariable( |
| LLVMDIBuilderRef Builder, LLVMMetadataRef Scope, const char *Name, |
| size_t NameLen, unsigned ArgNo, LLVMMetadataRef File, unsigned LineNo, |
| LLVMMetadataRef Ty, LLVMBool AlwaysPreserve, LLVMDIFlags Flags) { |
| return wrap(unwrap(Builder)->createParameterVariable( |
| unwrap<DIScope>(Scope), {Name, NameLen}, ArgNo, unwrap<DIFile>(File), |
| LineNo, unwrap<DIType>(Ty), AlwaysPreserve, |
| map_from_llvmDIFlags(Flags))); |
| } |
| |
| LLVMMetadataRef LLVMDIBuilderGetOrCreateSubrange(LLVMDIBuilderRef Builder, |
| int64_t Lo, int64_t Count) { |
| return wrap(unwrap(Builder)->getOrCreateSubrange(Lo, Count)); |
| } |
| |
| LLVMMetadataRef LLVMDIBuilderGetOrCreateArray(LLVMDIBuilderRef Builder, |
| LLVMMetadataRef *Data, |
| size_t Length) { |
| Metadata **DataValue = unwrap(Data); |
| return wrap(unwrap(Builder)->getOrCreateArray({DataValue, Length}).get()); |
| } |
| |
| LLVMMetadataRef LLVMGetSubprogram(LLVMValueRef Func) { |
| return wrap(unwrap<Function>(Func)->getSubprogram()); |
| } |
| |
| void LLVMSetSubprogram(LLVMValueRef Func, LLVMMetadataRef SP) { |
| unwrap<Function>(Func)->setSubprogram(unwrap<DISubprogram>(SP)); |
| } |
| |
| unsigned LLVMDISubprogramGetLine(LLVMMetadataRef Subprogram) { |
| return unwrapDI<DISubprogram>(Subprogram)->getLine(); |
| } |
| |
| LLVMMetadataRef LLVMInstructionGetDebugLoc(LLVMValueRef Inst) { |
| return wrap(unwrap<Instruction>(Inst)->getDebugLoc().getAsMDNode()); |
| } |
| |
| void LLVMInstructionSetDebugLoc(LLVMValueRef Inst, LLVMMetadataRef Loc) { |
| if (Loc) |
| unwrap<Instruction>(Inst)->setDebugLoc(DebugLoc(unwrap<MDNode>(Loc))); |
| else |
| unwrap<Instruction>(Inst)->setDebugLoc(DebugLoc()); |
| } |
| |
| LLVMMetadataKind LLVMGetMetadataKind(LLVMMetadataRef Metadata) { |
| switch(unwrap(Metadata)->getMetadataID()) { |
| #define HANDLE_METADATA_LEAF(CLASS) \ |
| case Metadata::CLASS##Kind: \ |
| return (LLVMMetadataKind)LLVM##CLASS##MetadataKind; |
| #include "llvm/IR/Metadata.def" |
| default: |
| return (LLVMMetadataKind)LLVMGenericDINodeMetadataKind; |
| } |
| } |