SBCompileUnit.cpp revision 952e9dc874944fcdbbb224f3ec4fc2c859376f64 
1//===-- SBCompileUnit.cpp ---------------------------------------*- C++ -*-===//
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#include "lldb/API/SBCompileUnit.h"
11#include "lldb/API/SBLineEntry.h"
12#include "lldb/API/SBStream.h"
13#include "lldb/Symbol/CompileUnit.h"
14#include "lldb/Symbol/LineEntry.h"
15#include "lldb/Symbol/LineTable.h"
16#include "lldb/Core/Log.h"
17
18using namespace lldb;
19using namespace lldb_private;
20
21
22SBCompileUnit::SBCompileUnit () :
23    m_opaque_ptr (NULL)
24{
25}
26
27SBCompileUnit::SBCompileUnit (lldb_private::CompileUnit *lldb_object_ptr) :
28    m_opaque_ptr (lldb_object_ptr)
29{
30}
31
32SBCompileUnit::SBCompileUnit(const SBCompileUnit &rhs) :
33    m_opaque_ptr (rhs.m_opaque_ptr)
34{
35}
36
37const SBCompileUnit &
38SBCompileUnit::operator = (const SBCompileUnit &rhs)
39{
40    m_opaque_ptr = rhs.m_opaque_ptr;
41    return *this;
42}
43
44
45SBCompileUnit::~SBCompileUnit ()
46{
47    m_opaque_ptr = NULL;
48}
49
50SBFileSpec
51SBCompileUnit::GetFileSpec () const
52{
53    SBFileSpec file_spec;
54    if (m_opaque_ptr)
55        file_spec.SetFileSpec(*m_opaque_ptr);
56    return file_spec;
57}
58
59uint32_t
60SBCompileUnit::GetNumLineEntries () const
61{
62    if (m_opaque_ptr)
63    {
64        LineTable *line_table = m_opaque_ptr->GetLineTable ();
65        if (line_table)
66            return line_table->GetSize();
67    }
68    return 0;
69}
70
71SBLineEntry
72SBCompileUnit::GetLineEntryAtIndex (uint32_t idx) const
73{
74    Log *log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_API));
75
76    SBLineEntry sb_line_entry;
77    if (m_opaque_ptr)
78    {
79        LineTable *line_table = m_opaque_ptr->GetLineTable ();
80        if (line_table)
81        {
82            LineEntry line_entry;
83            if (line_table->GetLineEntryAtIndex(idx, line_entry))
84                sb_line_entry.SetLineEntry(line_entry);
85        }
86    }
87
88    if (log)
89    {
90        SBStream sstr;
91        sb_line_entry.GetDescription (sstr);
92        log->Printf ("SBCompileUnit(%p)::GetLineEntryAtIndex (idx=%u) => SBLineEntry(%p): '%s'",
93                     m_opaque_ptr, idx, sb_line_entry.get(), sstr.GetData());
94    }
95
96    return sb_line_entry;
97}
98
99uint32_t
100SBCompileUnit::FindLineEntryIndex (uint32_t start_idx, uint32_t line, SBFileSpec *inline_file_spec) const
101{
102    const bool exact = true;
103    return FindLineEntryIndex (start_idx, line, inline_file_spec, exact);
104}
105
106uint32_t
107SBCompileUnit::FindLineEntryIndex (uint32_t start_idx, uint32_t line, SBFileSpec *inline_file_spec, bool exact) const
108{
109    Log *log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_API));
110
111    uint32_t index = UINT32_MAX;
112    if (m_opaque_ptr)
113    {
114        FileSpec file_spec;
115        if (inline_file_spec && inline_file_spec->IsValid())
116            file_spec = inline_file_spec->ref();
117        else
118            file_spec = *m_opaque_ptr;
119
120
121        index = m_opaque_ptr->FindLineEntry (start_idx,
122                                             line,
123                                             inline_file_spec ? inline_file_spec->get() : NULL,
124                                             exact,
125                                             NULL);
126    }
127
128    if (log)
129    {
130        SBStream sstr;
131        if (index == UINT32_MAX)
132        {
133            log->Printf ("SBCompileUnit(%p)::FindLineEntryIndex (start_idx=%u, line=%u, SBFileSpec(%p)) => NOT FOUND",
134                         m_opaque_ptr, start_idx, line, inline_file_spec ? inline_file_spec->get() : NULL);
135        }
136        else
137        {
138            log->Printf ("SBCompileUnit(%p)::FindLineEntryIndex (start_idx=%u, line=%u, SBFileSpec(%p)) => %u",
139                         m_opaque_ptr, start_idx, line, inline_file_spec ? inline_file_spec->get() : NULL, index);
140        }
141    }
142
143    return index;
144}
145
146uint32_t
147SBCompileUnit::GetNumSupportFiles () const
148{
149    if (m_opaque_ptr)
150    {
151	FileSpecList& support_files = m_opaque_ptr->GetSupportFiles ();
152	return support_files.GetSize();
153    }
154    return 0;
155}
156
157SBFileSpec
158SBCompileUnit::GetSupportFileAtIndex (uint32_t idx) const
159{
160    Log *log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_API));
161
162    SBFileSpec sb_file_spec;
163    if (m_opaque_ptr)
164    {
165	FileSpecList &support_files = m_opaque_ptr->GetSupportFiles ();
166	FileSpec file_spec = support_files.GetFileSpecAtIndex(idx);
167	sb_file_spec.SetFileSpec(file_spec);
168    }
169
170    if (log)
171    {
172        SBStream sstr;
173        sb_file_spec.GetDescription (sstr);
174        log->Printf ("SBCompileUnit(%p)::GetGetFileSpecAtIndex (idx=%u) => SBFileSpec(%p): '%s'",
175                     m_opaque_ptr, idx, sb_file_spec.get(), sstr.GetData());
176    }
177
178    return sb_file_spec;
179}
180
181uint32_t
182SBCompileUnit::FindSupportFileIndex (uint32_t start_idx, const SBFileSpec &sb_file, bool full)
183{
184    if (m_opaque_ptr)
185    {
186	FileSpecList &support_files = m_opaque_ptr->GetSupportFiles ();
187	return support_files.FindFileIndex(start_idx, sb_file.ref(), full);
188    }
189    return 0;
190}
191
192bool
193SBCompileUnit::IsValid () const
194{
195    return m_opaque_ptr != NULL;
196}
197
198bool
199SBCompileUnit::operator == (const SBCompileUnit &rhs) const
200{
201    return m_opaque_ptr == rhs.m_opaque_ptr;
202}
203
204bool
205SBCompileUnit::operator != (const SBCompileUnit &rhs) const
206{
207    return m_opaque_ptr != rhs.m_opaque_ptr;
208}
209
210const lldb_private::CompileUnit *
211SBCompileUnit::operator->() const
212{
213    return m_opaque_ptr;
214}
215
216const lldb_private::CompileUnit &
217SBCompileUnit::operator*() const
218{
219    return *m_opaque_ptr;
220}
221
222lldb_private::CompileUnit *
223SBCompileUnit::get ()
224{
225    return m_opaque_ptr;
226}
227
228void
229SBCompileUnit::reset (lldb_private::CompileUnit *lldb_object_ptr)
230{
231    m_opaque_ptr = lldb_object_ptr;
232}
233
234
235bool
236SBCompileUnit::GetDescription (SBStream &description)
237{
238    Stream &strm = description.ref();
239
240    if (m_opaque_ptr)
241    {
242        m_opaque_ptr->Dump (&strm, false);
243    }
244    else
245        strm.PutCString ("No value");
246
247    return true;
248}
249