1 //===-- ABI.cpp -------------------------------------------------*- C++ -*-===//
3 // The LLVM Compiler Infrastructure
5 // This file is distributed under the University of Illinois Open Source
6 // License. See LICENSE.TXT for details.
8 //===----------------------------------------------------------------------===//
10 #include "lldb/Target/ABI.h"
11 #include "lldb/Core/PluginManager.h"
12 #include "lldb/Core/Value.h"
13 #include "lldb/Core/ValueObjectConstResult.h"
14 #include "lldb/Symbol/ClangASTType.h"
15 #include "lldb/Target/Target.h"
16 #include "lldb/Target/Thread.h"
19 using namespace lldb_private;
22 ABI::FindPlugin (const ArchSpec &arch)
25 ABICreateInstance create_callback;
27 for (uint32_t idx = 0;
28 (create_callback = PluginManager::GetABICreateCallbackAtIndex(idx)) != NULL;
31 abi_sp = create_callback(arch);
40 //----------------------------------------------------------------------
42 //----------------------------------------------------------------------
47 //----------------------------------------------------------------------
49 //----------------------------------------------------------------------
56 ABI::GetRegisterInfoByName (const ConstString &name, RegisterInfo &info)
59 const RegisterInfo *register_info_array = GetRegisterInfoArray (count);
60 if (register_info_array)
62 const char *unique_name_cstr = name.GetCString();
64 for (i=0; i<count; ++i)
66 if (register_info_array[i].name == unique_name_cstr)
68 info = register_info_array[i];
72 for (i=0; i<count; ++i)
74 if (register_info_array[i].alt_name == unique_name_cstr)
76 info = register_info_array[i];
85 ABI::GetRegisterInfoByKind (RegisterKind reg_kind, uint32_t reg_num, RegisterInfo &info)
87 if (reg_kind < eRegisterKindGCC || reg_kind >= kNumRegisterKinds)
91 const RegisterInfo *register_info_array = GetRegisterInfoArray (count);
92 if (register_info_array)
94 for (uint32_t i=0; i<count; ++i)
96 if (register_info_array[i].kinds[reg_kind] == reg_num)
98 info = register_info_array[i];
107 ABI::GetReturnValueObject (Thread &thread,
108 ClangASTType &ast_type,
109 bool persistent) const
111 if (!ast_type.IsValid())
112 return ValueObjectSP();
114 ValueObjectSP return_valobj_sp;
116 return_valobj_sp = GetReturnValueObjectImpl(thread, ast_type);
117 if (!return_valobj_sp)
118 return return_valobj_sp;
120 // Now turn this into a persistent variable.
121 // FIXME: This code is duplicated from Target::EvaluateExpression, and it is used in similar form in a couple
122 // of other places. Figure out the correct Create function to do all this work.
126 ClangPersistentVariables& persistent_variables = thread.CalculateTarget()->GetPersistentVariables();
127 ConstString persistent_variable_name (persistent_variables.GetNextPersistentVariableName());
129 lldb::ValueObjectSP const_valobj_sp;
131 // Check in case our value is already a constant value
132 if (return_valobj_sp->GetIsConstant())
134 const_valobj_sp = return_valobj_sp;
135 const_valobj_sp->SetName (persistent_variable_name);
138 const_valobj_sp = return_valobj_sp->CreateConstantValue (persistent_variable_name);
140 lldb::ValueObjectSP live_valobj_sp = return_valobj_sp;
142 return_valobj_sp = const_valobj_sp;
144 ClangExpressionVariableSP clang_expr_variable_sp(persistent_variables.CreatePersistentVariable(return_valobj_sp));
146 assert (clang_expr_variable_sp.get());
148 // Set flags and live data as appropriate
150 const Value &result_value = live_valobj_sp->GetValue();
152 switch (result_value.GetValueType())
154 case Value::eValueTypeHostAddress:
155 case Value::eValueTypeFileAddress:
156 // we don't do anything with these for now
158 case Value::eValueTypeScalar:
159 case Value::eValueTypeVector:
160 clang_expr_variable_sp->m_flags |= ClangExpressionVariable::EVIsFreezeDried;
161 clang_expr_variable_sp->m_flags |= ClangExpressionVariable::EVIsLLDBAllocated;
162 clang_expr_variable_sp->m_flags |= ClangExpressionVariable::EVNeedsAllocation;
164 case Value::eValueTypeLoadAddress:
165 clang_expr_variable_sp->m_live_sp = live_valobj_sp;
166 clang_expr_variable_sp->m_flags |= ClangExpressionVariable::EVIsProgramReference;
170 return_valobj_sp = clang_expr_variable_sp->GetValueObject();
172 return return_valobj_sp;