1 //===-- UtilityFunction.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 <stdio.h>
11 #if HAVE_SYS_TYPES_H
12 #include <sys/types.h>
13 #endif
14
15
16 #include "lldb/Core/Module.h"
17 #include "lldb/Core/StreamFile.h"
18 #include "lldb/Expression/DiagnosticManager.h"
19 #include "lldb/Expression/ExpressionSourceCode.h"
20 #include "lldb/Expression/FunctionCaller.h"
21 #include "lldb/Expression/IRExecutionUnit.h"
22 #include "lldb/Expression/UtilityFunction.h"
23 #include "lldb/Host/Host.h"
24 #include "lldb/Target/ExecutionContext.h"
25 #include "lldb/Target/Process.h"
26 #include "lldb/Target/Target.h"
27 #include "lldb/Utility/ConstString.h"
28 #include "lldb/Utility/Log.h"
29 #include "lldb/Utility/Stream.h"
30
31 using namespace lldb_private;
32 using namespace lldb;
33
34 //------------------------------------------------------------------
35 /// Constructor
36 ///
37 /// @param[in] text
38 /// The text of the function. Must be a full translation unit.
39 ///
40 /// @param[in] name
41 /// The name of the function, as used in the text.
42 //------------------------------------------------------------------
UtilityFunction(ExecutionContextScope & exe_scope,const char * text,const char * name)43 UtilityFunction::UtilityFunction(ExecutionContextScope &exe_scope,
44 const char *text, const char *name)
45 : Expression(exe_scope), m_execution_unit_sp(), m_jit_module_wp(),
46 m_function_text(ExpressionSourceCode::g_expression_prefix),
47 m_function_name(name) {
48 if (text && text[0])
49 m_function_text.append(text);
50 }
51
~UtilityFunction()52 UtilityFunction::~UtilityFunction() {
53 lldb::ProcessSP process_sp(m_jit_process_wp.lock());
54 if (process_sp) {
55 lldb::ModuleSP jit_module_sp(m_jit_module_wp.lock());
56 if (jit_module_sp)
57 process_sp->GetTarget().GetImages().Remove(jit_module_sp);
58 }
59 }
60
61 // FIXME: We should check that every time this is called it is called with the
62 // same return type & arguments...
63
MakeFunctionCaller(const CompilerType & return_type,const ValueList & arg_value_list,lldb::ThreadSP thread_to_use_sp,Status & error)64 FunctionCaller *UtilityFunction::MakeFunctionCaller(
65 const CompilerType &return_type, const ValueList &arg_value_list,
66 lldb::ThreadSP thread_to_use_sp, Status &error) {
67 if (m_caller_up)
68 return m_caller_up.get();
69
70 ProcessSP process_sp = m_jit_process_wp.lock();
71 if (!process_sp) {
72 error.SetErrorString("Can't make a function caller without a process.");
73 return nullptr;
74 }
75
76 Address impl_code_address;
77 impl_code_address.SetOffset(StartAddress());
78 std::string name(m_function_name);
79 name.append("-caller");
80
81 m_caller_up.reset(process_sp->GetTarget().GetFunctionCallerForLanguage(
82 Language(), return_type, impl_code_address, arg_value_list, name.c_str(),
83 error));
84 if (error.Fail()) {
85
86 return nullptr;
87 }
88 if (m_caller_up) {
89 DiagnosticManager diagnostics;
90
91 unsigned num_errors =
92 m_caller_up->CompileFunction(thread_to_use_sp, diagnostics);
93 if (num_errors) {
94 error.SetErrorStringWithFormat(
95 "Error compiling %s caller function: \"%s\".",
96 m_function_name.c_str(), diagnostics.GetString().c_str());
97 m_caller_up.reset();
98 return nullptr;
99 }
100
101 diagnostics.Clear();
102 ExecutionContext exe_ctx(process_sp);
103
104 if (!m_caller_up->WriteFunctionWrapper(exe_ctx, diagnostics)) {
105 error.SetErrorStringWithFormat(
106 "Error inserting caller function for %s: \"%s\".",
107 m_function_name.c_str(), diagnostics.GetString().c_str());
108 m_caller_up.reset();
109 return nullptr;
110 }
111 }
112 return m_caller_up.get();
113 }
114