#include "lldb/lldb-python.h"
#include "lldb/lldb-public.h"
#include "lldb/lldb-enumerations.h"
#include "lldb/Core/Debugger.h"
#include "lldb/Core/FormatClasses.h"
#include "lldb/Core/StreamString.h"
#include "lldb/Core/Timer.h"
#include "lldb/Interpreter/CommandInterpreter.h"
#include "lldb/Symbol/ClangASTType.h"
#include "lldb/Target/StackFrame.h"
#include "lldb/Target/Target.h"
using namespace lldb;
using namespace lldb_private;
TypeFormatImpl::TypeFormatImpl (lldb::Format f,
const Flags& flags) :
m_flags(flags),
m_format (f)
{
}
std::string
TypeFormatImpl::GetDescription()
{
StreamString sstr;
sstr.Printf ("%s%s%s%s\n",
FormatManager::GetFormatAsCString (GetFormat()),
Cascades() ? "" : " (not cascading)",
SkipsPointers() ? " (skip pointers)" : "",
SkipsReferences() ? " (skip references)" : "");
return sstr.GetString();
}
TypeSummaryImpl::TypeSummaryImpl(const TypeSummaryImpl::Flags& flags) :
m_flags(flags)
{
}
StringSummaryFormat::StringSummaryFormat(const TypeSummaryImpl::Flags& flags,
const char *format_cstr) :
TypeSummaryImpl(flags),
m_format()
{
if (format_cstr)
m_format.assign(format_cstr);
}
bool
StringSummaryFormat::FormatObject(ValueObject *valobj,
std::string& retval)
{
if (!valobj)
{
retval.assign("NULL ValueObject");
return false;
}
StreamString s;
ExecutionContext exe_ctx (valobj->GetExecutionContextRef());
SymbolContext sc;
StackFrame *frame = exe_ctx.GetFramePtr();
if (frame)
sc = frame->GetSymbolContext(lldb::eSymbolContextEverything);
if (IsOneliner())
{
ValueObject* object;
ValueObjectSP synth_valobj = valobj->GetSyntheticValue();
if (synth_valobj)
object = synth_valobj.get();
else
object = valobj;
const uint32_t num_children = object->GetNumChildren();
if (num_children)
{
s.PutChar('(');
for (uint32_t idx=0; idx<num_children; ++idx)
{
lldb::ValueObjectSP child_sp(object->GetChildAtIndex(idx, true));
if (child_sp.get())
{
if (idx)
s.PutCString(", ");
if (!HideNames())
{
s.PutCString(child_sp.get()->GetName().AsCString());
s.PutCString(" = ");
}
child_sp.get()->DumpPrintableRepresentation(s,
ValueObject::eValueObjectRepresentationStyleSummary,
lldb::eFormatInvalid,
ValueObject::ePrintableRepresentationSpecialCasesDisable);
}
}
s.PutChar(')');
retval.assign(s.GetString());
return true;
}
else
{
retval.assign("error: oneliner for no children");
return false;
}
}
else
{
if (Debugger::FormatPrompt(m_format.c_str(), &sc, &exe_ctx, &sc.line_entry.range.GetBaseAddress(), s, NULL, valobj))
{
retval.assign(s.GetString());
return true;
}
else
{
retval.assign("error: summary string parsing error");
return false;
}
}
}
std::string
StringSummaryFormat::GetDescription()
{
StreamString sstr;
sstr.Printf ("`%s`%s%s%s%s%s%s%s", m_format.c_str(),
Cascades() ? "" : " (not cascading)",
!DoesPrintChildren() ? "" : " (show children)",
!DoesPrintValue() ? " (hide value)" : "",
IsOneliner() ? " (one-line printout)" : "",
SkipsPointers() ? " (skip pointers)" : "",
SkipsReferences() ? " (skip references)" : "",
HideNames() ? " (hide member names)" : "");
return sstr.GetString();
}
CXXFunctionSummaryFormat::CXXFunctionSummaryFormat (const TypeSummaryImpl::Flags& flags,
Callback impl,
const char* description) :
TypeSummaryImpl(flags),
m_impl(impl),
m_description(description ? description : "")
{
}
bool
CXXFunctionSummaryFormat::FormatObject(ValueObject *valobj,
std::string& dest)
{
dest.clear();
StreamString stream;
if (!m_impl || m_impl(*valobj,stream) == false)
return false;
dest.assign(stream.GetData());
return true;
}
std::string
CXXFunctionSummaryFormat::GetDescription()
{
StreamString sstr;
sstr.Printf ("`%s (%p) `%s%s%s%s%s%s%s", m_description.c_str(),m_impl,
Cascades() ? "" : " (not cascading)",
!DoesPrintChildren() ? "" : " (show children)",
!DoesPrintValue() ? " (hide value)" : "",
IsOneliner() ? " (one-line printout)" : "",
SkipsPointers() ? " (skip pointers)" : "",
SkipsReferences() ? " (skip references)" : "",
HideNames() ? " (hide member names)" : "");
return sstr.GetString();
}
#ifndef LLDB_DISABLE_PYTHON
ScriptSummaryFormat::ScriptSummaryFormat(const TypeSummaryImpl::Flags& flags,
const char * function_name,
const char * python_script) :
TypeSummaryImpl(flags),
m_function_name(),
m_python_script(),
m_script_function_sp()
{
if (function_name)
m_function_name.assign(function_name);
if (python_script)
m_python_script.assign(python_script);
}
bool
ScriptSummaryFormat::FormatObject(ValueObject *valobj,
std::string& retval)
{
Timer scoped_timer (__PRETTY_FUNCTION__, __PRETTY_FUNCTION__);
TargetSP target_sp(valobj->GetTargetSP());
if (!target_sp)
{
retval.assign("error: no target");
return false;
}
ScriptInterpreter *script_interpreter = target_sp->GetDebugger().GetCommandInterpreter().GetScriptInterpreter();
if (!script_interpreter)
{
retval.assign("error: no ScriptInterpreter");
return false;
}
return script_interpreter->GetScriptedSummary(m_function_name.c_str(),
valobj->GetSP(),
m_script_function_sp,
retval);
}
std::string
ScriptSummaryFormat::GetDescription()
{
StreamString sstr;
sstr.Printf ("%s%s%s%s%s%s%s\n%s", Cascades() ? "" : " (not cascading)",
!DoesPrintChildren() ? "" : " (show children)",
!DoesPrintValue() ? " (hide value)" : "",
IsOneliner() ? " (one-line printout)" : "",
SkipsPointers() ? " (skip pointers)" : "",
SkipsReferences() ? " (skip references)" : "",
HideNames() ? " (hide member names)" : "",
m_python_script.c_str());
return sstr.GetString();
}
#endif // #ifndef LLDB_DISABLE_PYTHON
std::string
TypeFilterImpl::GetDescription()
{
StreamString sstr;
sstr.Printf("%s%s%s {\n",
Cascades() ? "" : " (not cascading)",
SkipsPointers() ? " (skip pointers)" : "",
SkipsReferences() ? " (skip references)" : "");
for (int i = 0; i < GetCount(); i++)
{
sstr.Printf(" %s\n",
GetExpressionPathAtIndex(i));
}
sstr.Printf("}");
return sstr.GetString();
}
std::string
CXXSyntheticChildren::GetDescription()
{
StreamString sstr;
sstr.Printf("%s%s%s Generator at %p - %s\n",
Cascades() ? "" : " (not cascading)",
SkipsPointers() ? " (skip pointers)" : "",
SkipsReferences() ? " (skip references)" : "",
m_create_callback,
m_description.c_str());
return sstr.GetString();
}
std::string
SyntheticArrayView::GetDescription()
{
StreamString sstr;
sstr.Printf("%s%s%s {\n",
Cascades() ? "" : " (not cascading)",
SkipsPointers() ? " (skip pointers)" : "",
SkipsReferences() ? " (skip references)" : "");
SyntheticArrayRange* ptr = &m_head;
while (ptr && ptr != m_tail)
{
if (ptr->GetLow() == ptr->GetHigh())
sstr.Printf(" [%d]\n",
ptr->GetLow());
else
sstr.Printf(" [%d-%d]\n",
ptr->GetLow(),
ptr->GetHigh());
ptr = ptr->GetNext();
}
sstr.Printf("}");
return sstr.GetString();
}
#ifndef LLDB_DISABLE_PYTHON
TypeSyntheticImpl::FrontEnd::FrontEnd(std::string pclass, ValueObject &backend) :
SyntheticChildrenFrontEnd(backend),
m_python_class(pclass),
m_wrapper_sp(),
m_interpreter(NULL)
{
if (backend == LLDB_INVALID_UID)
return;
TargetSP target_sp = backend.GetTargetSP();
if (!target_sp)
return;
m_interpreter = target_sp->GetDebugger().GetCommandInterpreter().GetScriptInterpreter();
if (m_interpreter != NULL)
m_wrapper_sp = m_interpreter->CreateSyntheticScriptedProvider(m_python_class, backend.GetSP());
}
TypeSyntheticImpl::FrontEnd::~FrontEnd()
{
}
lldb::ValueObjectSP
TypeSyntheticImpl::FrontEnd::GetChildAtIndex (uint32_t idx)
{
if (!m_wrapper_sp || !m_interpreter)
return lldb::ValueObjectSP();
return m_interpreter->GetChildAtIndex(m_wrapper_sp, idx);
}
std::string
TypeSyntheticImpl::GetDescription()
{
StreamString sstr;
sstr.Printf("%s%s%s Python class %s",
Cascades() ? "" : " (not cascading)",
SkipsPointers() ? " (skip pointers)" : "",
SkipsReferences() ? " (skip references)" : "",
m_python_class.c_str());
return sstr.GetString();
}
#endif // #ifndef LLDB_DISABLE_PYTHON
int
SyntheticArrayView::GetRealIndexForIndex(int i)
{
if (i >= GetCount())
return -1;
SyntheticArrayRange* ptr = &m_head;
int residual = i;
while(ptr && ptr != m_tail)
{
if (residual >= ptr->GetSelfCount())
{
residual -= ptr->GetSelfCount();
ptr = ptr->GetNext();
}
return ptr->GetLow() + residual;
}
return -1;
}
uint32_t
SyntheticArrayView::FrontEnd::GetIndexOfChildWithName (const ConstString &name_cs)
{
const char* name_cstr = name_cs.GetCString();
if (*name_cstr != '[')
return UINT32_MAX;
std::string name(name_cstr+1);
if (name[name.size()-1] != ']')
return UINT32_MAX;
name = name.erase(name.size()-1,1);
int index = Args::StringToSInt32 (name.c_str(), -1);
if (index < 0)
return UINT32_MAX;
return index;
}