1 //===-- SBFunction.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/SBFunction.h"
11 #include "lldb/API/SBProcess.h"
12 #include "lldb/API/SBStream.h"
13 #include "lldb/Core/Disassembler.h"
14 #include "lldb/Core/Log.h"
15 #include "lldb/Core/Module.h"
16 #include "lldb/Symbol/CompileUnit.h"
17 #include "lldb/Symbol/Function.h"
18 #include "lldb/Symbol/Type.h"
19 #include "lldb/Target/ExecutionContext.h"
20 #include "lldb/Target/Target.h"
21 
22 using namespace lldb;
23 using namespace lldb_private;
24 
25 SBFunction::SBFunction () :
26     m_opaque_ptr (NULL)
27 {
28 }
29 
30 SBFunction::SBFunction (lldb_private::Function *lldb_object_ptr) :
31     m_opaque_ptr (lldb_object_ptr)
32 {
33 }
34 
35 SBFunction::SBFunction (const lldb::SBFunction &rhs) :
36     m_opaque_ptr (rhs.m_opaque_ptr)
37 {
38 }
39 
40 const SBFunction &
41 SBFunction::operator = (const SBFunction &rhs)
42 {
43     m_opaque_ptr = rhs.m_opaque_ptr;
44     return *this;
45 }
46 
47 SBFunction::~SBFunction ()
48 {
49     m_opaque_ptr = NULL;
50 }
51 
52 bool
53 SBFunction::IsValid () const
54 {
55     return m_opaque_ptr != NULL;
56 }
57 
58 const char *
59 SBFunction::GetName() const
60 {
61     const char *cstr = NULL;
62     if (m_opaque_ptr)
63         cstr = m_opaque_ptr->GetMangled().GetName().AsCString();
64 
65     Log *log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_API));
66     if (log)
67     {
68         if (cstr)
69             log->Printf ("SBFunction(%p)::GetName () => \"%s\"",
70                          static_cast<void*>(m_opaque_ptr), cstr);
71         else
72             log->Printf ("SBFunction(%p)::GetName () => NULL",
73                          static_cast<void*>(m_opaque_ptr));
74     }
75     return cstr;
76 }
77 
78 const char *
79 SBFunction::GetMangledName () const
80 {
81     const char *cstr = NULL;
82     if (m_opaque_ptr)
83         cstr = m_opaque_ptr->GetMangled().GetMangledName().AsCString();
84     Log *log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_API));
85     if (log)
86     {
87         if (cstr)
88             log->Printf ("SBFunction(%p)::GetMangledName () => \"%s\"",
89                          static_cast<void*>(m_opaque_ptr), cstr);
90         else
91             log->Printf ("SBFunction(%p)::GetMangledName () => NULL",
92                          static_cast<void*>(m_opaque_ptr));
93     }
94     return cstr;
95 }
96 
97 bool
98 SBFunction::operator == (const SBFunction &rhs) const
99 {
100     return m_opaque_ptr == rhs.m_opaque_ptr;
101 }
102 
103 bool
104 SBFunction::operator != (const SBFunction &rhs) const
105 {
106     return m_opaque_ptr != rhs.m_opaque_ptr;
107 }
108 
109 bool
110 SBFunction::GetDescription (SBStream &s)
111 {
112     if (m_opaque_ptr)
113     {
114         s.Printf ("SBFunction: id = 0x%8.8" PRIx64 ", name = %s",
115                   m_opaque_ptr->GetID(),
116                   m_opaque_ptr->GetName().AsCString());
117         Type *func_type = m_opaque_ptr->GetType();
118         if (func_type)
119             s.Printf(", type = %s", func_type->GetName().AsCString());
120         return true;
121     }
122     s.Printf ("No value");
123     return false;
124 }
125 
126 SBInstructionList
127 SBFunction::GetInstructions (SBTarget target)
128 {
129     return GetInstructions (target, NULL);
130 }
131 
132 SBInstructionList
133 SBFunction::GetInstructions (SBTarget target, const char *flavor)
134 {
135     SBInstructionList sb_instructions;
136     if (m_opaque_ptr)
137     {
138         Mutex::Locker api_locker;
139         ExecutionContext exe_ctx;
140         TargetSP target_sp (target.GetSP());
141         if (target_sp)
142         {
143             api_locker.Lock (target_sp->GetAPIMutex());
144             target_sp->CalculateExecutionContext (exe_ctx);
145             exe_ctx.SetProcessSP(target_sp->GetProcessSP());
146         }
147         ModuleSP module_sp (m_opaque_ptr->GetAddressRange().GetBaseAddress().GetModule());
148         if (module_sp)
149         {
150             const bool prefer_file_cache = false;
151             sb_instructions.SetDisassembler (Disassembler::DisassembleRange (module_sp->GetArchitecture(),
152                                                                              NULL,
153                                                                              flavor,
154                                                                              exe_ctx,
155                                                                              m_opaque_ptr->GetAddressRange(),
156                                                                              prefer_file_cache));
157         }
158     }
159     return sb_instructions;
160 }
161 
162 lldb_private::Function *
163 SBFunction::get ()
164 {
165     return m_opaque_ptr;
166 }
167 
168 void
169 SBFunction::reset (lldb_private::Function *lldb_object_ptr)
170 {
171     m_opaque_ptr = lldb_object_ptr;
172 }
173 
174 SBAddress
175 SBFunction::GetStartAddress ()
176 {
177     SBAddress addr;
178     if (m_opaque_ptr)
179         addr.SetAddress (&m_opaque_ptr->GetAddressRange().GetBaseAddress());
180     return addr;
181 }
182 
183 SBAddress
184 SBFunction::GetEndAddress ()
185 {
186     SBAddress addr;
187     if (m_opaque_ptr)
188     {
189         addr_t byte_size = m_opaque_ptr->GetAddressRange().GetByteSize();
190         if (byte_size > 0)
191         {
192             addr.SetAddress (&m_opaque_ptr->GetAddressRange().GetBaseAddress());
193             addr->Slide (byte_size);
194         }
195     }
196     return addr;
197 }
198 
199 
200 uint32_t
201 SBFunction::GetPrologueByteSize ()
202 {
203     if (m_opaque_ptr)
204         return m_opaque_ptr->GetPrologueByteSize();
205     return 0;
206 }
207 
208 SBType
209 SBFunction::GetType ()
210 {
211     SBType sb_type;
212     if (m_opaque_ptr)
213     {
214         Type *function_type = m_opaque_ptr->GetType();
215         if (function_type)
216             sb_type.ref().SetType (function_type->shared_from_this());
217     }
218     return sb_type;
219 }
220 
221 SBBlock
222 SBFunction::GetBlock ()
223 {
224     SBBlock sb_block;
225     if (m_opaque_ptr)
226         sb_block.SetPtr (&m_opaque_ptr->GetBlock (true));
227     return sb_block;
228 }
229 
230 
231 
232