Add command-line flags for DWARF dumping.
[oota-llvm.git] / tools / llvm-dwarfdump / llvm-dwarfdump.cpp
1 //===-- llvm-dwarfdump.cpp - Debug info dumping utility for llvm ----------===//
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 program is a utility that works like "dwarfdump".
11 //
12 //===----------------------------------------------------------------------===//
13
14 #include "llvm/ADT/OwningPtr.h"
15 #include "llvm/ADT/STLExtras.h"
16 #include "llvm/ADT/Triple.h"
17 #include "llvm/DebugInfo/DIContext.h"
18 #include "llvm/Object/ObjectFile.h"
19 #include "llvm/Object/RelocVisitor.h"
20 #include "llvm/Support/CommandLine.h"
21 #include "llvm/Support/Debug.h"
22 #include "llvm/Support/Format.h"
23 #include "llvm/Support/ManagedStatic.h"
24 #include "llvm/Support/MemoryBuffer.h"
25 #include "llvm/Support/MemoryObject.h"
26 #include "llvm/Support/PrettyStackTrace.h"
27 #include "llvm/Support/Signals.h"
28 #include "llvm/Support/raw_ostream.h"
29 #include "llvm/Support/system_error.h"
30 #include <algorithm>
31 #include <cstring>
32 #include <list>
33 #include <string>
34
35 using namespace llvm;
36 using namespace object;
37
38 static cl::list<std::string>
39 InputFilenames(cl::Positional, cl::desc("<input object files>"),
40                cl::ZeroOrMore);
41
42 static cl::opt<unsigned long long>
43 Address("address", cl::init(-1ULL),
44         cl::desc("Print line information for a given address"));
45
46 static cl::opt<bool>
47 PrintFunctions("functions", cl::init(false),
48                cl::desc("Print function names as well as line information "
49                         "for a given address"));
50
51 static cl::opt<bool>
52 PrintInlining("inlining", cl::init(false),
53               cl::desc("Print all inlined frames for a given address"));
54
55 static cl::opt<DIDumpType>
56 DumpType("debug-dump", cl::init(DIDT_All),
57   cl::desc("Dump of debug sections:"),
58   cl::values(
59         clEnumValN(DIDT_All, "all", "Dump all debug sections"),
60         clEnumValN(DIDT_Abbrev, "abbrev", ".debug_abbrev"),
61         clEnumValN(DIDT_AbbrevDwo, "abbrev.dwo", ".debug_abbrev.dwo"),
62         clEnumValN(DIDT_Aranges, "aranges", ".debug_aranges"),
63         clEnumValN(DIDT_Info, "info", ".debug_info"),
64         clEnumValN(DIDT_InfoDwo, "info.dwo", ".debug_info.dwo"),
65         clEnumValN(DIDT_Line, "line", ".debug_line"),
66         clEnumValN(DIDT_Ranges, "ranges", ".debug_ranges"),
67         clEnumValN(DIDT_Str, "str", ".debug_str"),
68         clEnumValN(DIDT_StrDwo, "str.dwo", ".debug_str.dwo"),
69         clEnumValN(DIDT_StrOffsetsDwo, "str_offsets.dwo", ".debug_str_offsets.dwo"),
70         clEnumValEnd));
71
72 static void PrintDILineInfo(DILineInfo dli) {
73   if (PrintFunctions)
74     outs() << (dli.getFunctionName() ? dli.getFunctionName() : "<unknown>")
75            << "\n";
76   outs() << (dli.getFileName() ? dli.getFileName() : "<unknown>") << ':'
77          << dli.getLine() << ':' << dli.getColumn() << '\n';
78 }
79
80 static void DumpInput(const StringRef &Filename) {
81   OwningPtr<MemoryBuffer> Buff;
82
83   if (error_code ec = MemoryBuffer::getFileOrSTDIN(Filename, Buff)) {
84     errs() << Filename << ": " << ec.message() << "\n";
85     return;
86   }
87
88   OwningPtr<ObjectFile> Obj(ObjectFile::createObjectFile(Buff.take()));
89   OwningPtr<DIContext> DICtx(DIContext::getDWARFContext(Obj.get()));
90
91   if (Address == -1ULL) {
92     outs() << Filename
93            << ":\tfile format " << Obj->getFileFormatName() << "\n\n";
94     // Dump the complete DWARF structure.
95     DICtx->dump(outs(), DumpType);
96   } else {
97     // Print line info for the specified address.
98     int SpecFlags = DILineInfoSpecifier::FileLineInfo |
99                     DILineInfoSpecifier::AbsoluteFilePath;
100     if (PrintFunctions)
101       SpecFlags |= DILineInfoSpecifier::FunctionName;
102     if (PrintInlining) {
103       DIInliningInfo InliningInfo =
104         DICtx->getInliningInfoForAddress(Address, SpecFlags);
105       uint32_t n = InliningInfo.getNumberOfFrames();
106       if (n == 0) {
107         // Print one empty debug line info in any case.
108         PrintDILineInfo(DILineInfo());
109       } else {
110         for (uint32_t i = 0; i < n; i++) {
111           DILineInfo dli = InliningInfo.getFrame(i);
112           PrintDILineInfo(dli);
113         }
114       }
115     } else {
116       DILineInfo dli = DICtx->getLineInfoForAddress(Address, SpecFlags);
117       PrintDILineInfo(dli);
118     }
119   }
120 }
121
122 int main(int argc, char **argv) {
123   // Print a stack trace if we signal out.
124   sys::PrintStackTraceOnErrorSignal();
125   PrettyStackTraceProgram X(argc, argv);
126   llvm_shutdown_obj Y;  // Call llvm_shutdown() on exit.
127
128   cl::ParseCommandLineOptions(argc, argv, "llvm dwarf dumper\n");
129
130   // Defaults to a.out if no filenames specified.
131   if (InputFilenames.size() == 0)
132     InputFilenames.push_back("a.out");
133
134   std::for_each(InputFilenames.begin(), InputFilenames.end(), DumpInput);
135
136   return 0;
137 }