Initial checkin of lldb code from internal Apple repo.


git-svn-id: https://llvm.org/svn/llvm-project/llvdb/trunk@105619 91177308-0d34-0410-b5e6-96231b3b80d8
diff --git a/source/API/SBThread.cpp b/source/API/SBThread.cpp
new file mode 100644
index 0000000..4ae9ba1
--- /dev/null
+++ b/source/API/SBThread.cpp
@@ -0,0 +1,551 @@
+//===-- SBThread.cpp --------------------------------------------*- C++ -*-===//
+//
+//                     The LLVM Compiler Infrastructure
+//
+// This file is distributed under the University of Illinois Open Source
+// License. See LICENSE.TXT for details.
+//
+//===----------------------------------------------------------------------===//
+
+#include "SBThread.h"
+
+#include "lldb/API/SBSymbolContext.h"
+#include "lldb/API/SBFileSpec.h"
+#include "lldb/Core/Stream.h"
+#include "lldb/Core/StreamFile.h"
+#include "lldb/Target/Thread.h"
+#include "lldb/Target/Process.h"
+#include "lldb/Symbol/SymbolContext.h"
+#include "lldb/Symbol/CompileUnit.h"
+#include "lldb/Target/Target.h"
+#include "lldb/Target/ThreadPlan.h"
+#include "lldb/Target/ThreadPlanContinue.h"
+#include "lldb/Target/ThreadPlanStepInstruction.h"
+#include "lldb/Target/ThreadPlanStepOut.h"
+#include "lldb/Target/ThreadPlanStepRange.h"
+#include "lldb/Target/ThreadPlanStepInRange.h"
+
+
+#include "SBAddress.h"
+#include "SBFrame.h"
+#include "SBSourceManager.h"
+#include "SBDebugger.h"
+#include "SBProcess.h"
+
+using namespace lldb;
+using namespace lldb_private;
+
+SBThread::SBThread () :
+    m_lldb_object_sp ()
+{
+}
+
+//----------------------------------------------------------------------
+// Thread constructor
+//----------------------------------------------------------------------
+SBThread::SBThread (const ThreadSP& lldb_object_sp) :
+    m_lldb_object_sp (lldb_object_sp)
+{
+}
+
+SBThread::SBThread (const SBThread &rhs)
+{
+    m_lldb_object_sp = rhs.m_lldb_object_sp;
+}
+
+//----------------------------------------------------------------------
+// Destructor
+//----------------------------------------------------------------------
+SBThread::~SBThread()
+{
+}
+
+bool
+SBThread::IsValid() const
+{
+    return m_lldb_object_sp != NULL;
+}
+
+StopReason
+SBThread::GetStopReason()
+{
+    if (m_lldb_object_sp)
+    {
+        lldb_private::Thread::StopInfo thread_stop_info;
+        if (m_lldb_object_sp->GetStopInfo(&thread_stop_info))
+            return thread_stop_info.GetStopReason();
+    }
+    return eStopReasonInvalid;
+}
+
+size_t
+SBThread::GetStopDescription (char *dst, size_t dst_len)
+{
+    if (m_lldb_object_sp)
+    {
+        lldb_private::Thread::StopInfo thread_stop_info;
+        if (m_lldb_object_sp->GetStopInfo(&thread_stop_info))
+        {
+            const char *stop_desc = thread_stop_info.GetStopDescription();
+            if (stop_desc)
+            {
+                if (dst)
+                    return ::snprintf (dst, dst_len, "%s", stop_desc);
+                else
+                {
+                    // NULL dst passed in, return the length needed to contain the description
+                    return ::strlen (stop_desc) + 1; // Include the NULL byte for size
+                }
+            }
+            else
+            {
+                const char *stop_desc = NULL;
+                size_t stop_desc_len = 0;
+                switch (thread_stop_info.GetStopReason())
+                {
+                case eStopReasonTrace:
+                case eStopReasonPlanComplete:
+                    {
+                        static char trace_desc[] = "step";
+                        stop_desc = trace_desc;
+                        stop_desc_len = sizeof(trace_desc); // Include the NULL byte for size
+                    }
+                    break;
+
+                case eStopReasonBreakpoint:
+                    {
+                        static char bp_desc[] = "breakpoint hit";
+                        stop_desc = bp_desc;
+                        stop_desc_len = sizeof(bp_desc); // Include the NULL byte for size
+                    }
+                    break;
+
+                case eStopReasonWatchpoint:
+                    {
+                        static char wp_desc[] = "watchpoint hit";
+                        stop_desc = wp_desc;
+                        stop_desc_len = sizeof(wp_desc); // Include the NULL byte for size
+                    }
+                    break;
+
+                case eStopReasonSignal:
+                    {
+                        stop_desc = m_lldb_object_sp->GetProcess().GetUnixSignals ().GetSignalAsCString (thread_stop_info.GetSignal());
+                        if (stop_desc == NULL || stop_desc[0] == '\0')
+                        {
+                            static char signal_desc[] = "signal";
+                            stop_desc = signal_desc;
+                            stop_desc_len = sizeof(signal_desc); // Include the NULL byte for size
+                        }
+                    }
+                    break;
+
+                case eStopReasonException:
+                    {
+                        char exc_desc[] = "exception";
+                        stop_desc = exc_desc;
+                        stop_desc_len = sizeof(exc_desc); // Include the NULL byte for size
+                    }
+                    break;                        
+                }
+                
+                if (stop_desc && stop_desc[0])
+                {
+                    if (dst)
+                        return ::snprintf (dst, dst_len, "%s", stop_desc) + 1; // Include the NULL byte
+
+                    if (stop_desc_len == 0)
+                        stop_desc_len = ::strlen (stop_desc) + 1; // Include the NULL byte
+                        
+                    return stop_desc_len;
+                }
+            }
+        }
+    }
+    if (dst)
+        *dst = 0;
+    return 0;
+}
+
+void
+SBThread::SetThread (const ThreadSP& lldb_object_sp)
+{
+    m_lldb_object_sp = lldb_object_sp;
+}
+
+
+lldb::tid_t
+SBThread::GetThreadID () const
+{
+    if (m_lldb_object_sp)
+        return m_lldb_object_sp->GetID();
+    else
+        return LLDB_INVALID_THREAD_ID;
+}
+
+uint32_t
+SBThread::GetIndexID () const
+{
+    if (m_lldb_object_sp)
+        return m_lldb_object_sp->GetIndexID();
+    return LLDB_INVALID_INDEX32;
+}
+const char *
+SBThread::GetName () const
+{
+    if (m_lldb_object_sp)
+        return m_lldb_object_sp->GetName();
+    return NULL;
+}
+
+const char *
+SBThread::GetQueueName () const
+{
+    if (m_lldb_object_sp)
+        return m_lldb_object_sp->GetQueueName();
+    return NULL;
+}
+
+
+void
+SBThread::DisplayFramesForCurrentContext (FILE *out,
+                                          FILE *err,
+                                          uint32_t first_frame,
+                                          uint32_t num_frames,
+                                          bool show_frame_info,
+                                          uint32_t num_frames_with_source,
+                                          uint32_t source_lines_before,
+                                          uint32_t source_lines_after)
+{
+    if ((out == NULL) || (err == NULL))
+        return;
+
+    if (m_lldb_object_sp)
+    {
+        uint32_t num_stack_frames = m_lldb_object_sp->GetStackFrameCount ();
+        StackFrameSP frame_sp;
+        int frame_idx = 0;
+
+        for (frame_idx = first_frame; frame_idx < first_frame + num_frames; ++frame_idx)
+        {
+            if (frame_idx >= num_stack_frames)
+                break;
+
+            frame_sp = m_lldb_object_sp->GetStackFrameAtIndex (frame_idx);
+            if (!frame_sp)
+                break;
+
+            SBFrame sb_frame (frame_sp);
+            if (DisplaySingleFrameForCurrentContext (out,
+                                                     err,
+                                                     sb_frame,
+                                                     show_frame_info,
+                                                     num_frames_with_source > first_frame - frame_idx,
+                                                     source_lines_before,
+                                                     source_lines_after) == false)
+                break;
+        }
+    }
+}
+
+bool
+SBThread::DisplaySingleFrameForCurrentContext (FILE *out,
+                                               FILE *err,
+                                               SBFrame &frame,
+                                               bool show_frame_info,
+                                               bool show_source,
+                                               uint32_t source_lines_after,
+                                               uint32_t source_lines_before)
+{
+    bool success = false;
+
+     if ((out == NULL) || (err == NULL))
+        return false;
+
+   if (m_lldb_object_sp && frame.IsValid())
+    {
+
+        StreamFile str (out);
+
+        SBSymbolContext sc(frame.GetSymbolContext(eSymbolContextEverything));
+
+        if (show_frame_info && sc.IsValid())
+        {
+            user_id_t frame_idx = (user_id_t) frame.GetFrameID();
+            lldb::addr_t pc = frame.GetPC();
+            ::fprintf (out,
+                       "     frame #%u: tid = 0x%4.4x, pc = 0x%llx ",
+                       frame_idx,
+                       GetThreadID(),
+                       pc);
+            sc->DumpStopContext (&str, &m_lldb_object_sp->GetProcess(), *frame.GetPCAddress());
+            fprintf (out, "\n");
+            success = true;
+        }
+
+        SBCompileUnit comp_unit(sc.GetCompileUnit());
+        if (show_source && comp_unit.IsValid())
+        {
+          success = false;
+            SBLineEntry line_entry;
+            if (line_entry.IsValid())
+            {
+                SBSourceManager& source_manager = SBDebugger::GetSourceManager();
+                SBFileSpec line_entry_file_spec = line_entry.GetFileSpec();
+
+                if (line_entry_file_spec.IsValid())
+                {
+                    source_manager.DisplaySourceLinesWithLineNumbers (line_entry_file_spec,
+                                                                      line_entry.GetLine(),
+                                                                      source_lines_after,
+                                                                      source_lines_before, "->",
+                                                                      out);
+                    success = true;
+                }
+            }
+        }
+    }
+    return success;
+}
+
+void
+SBThread::StepOver (lldb::RunMode stop_other_threads)
+{
+    if (m_lldb_object_sp)
+    {
+        bool abort_other_plans = true;
+        StackFrameSP frame_sp(m_lldb_object_sp->GetStackFrameAtIndex (0));
+
+        if (frame_sp)
+        {
+            if (frame_sp->HasDebugInformation ())
+            {
+                SymbolContext sc(frame_sp->GetSymbolContext(eSymbolContextEverything));
+                m_lldb_object_sp->QueueThreadPlanForStepRange (abort_other_plans, 
+                                                               eStepTypeOver,
+                                                               sc.line_entry.range, 
+                                                               sc,
+                                                               stop_other_threads);
+                
+            }
+            else
+            {
+                m_lldb_object_sp->QueueThreadPlanForStepSingleInstruction (true, 
+                                                                           abort_other_plans, 
+                                                                           stop_other_threads);
+            }
+        }
+
+        Process &process = m_lldb_object_sp->GetProcess();
+        // Why do we need to set the current thread by ID here???
+        process.GetThreadList().SetCurrentThreadByID (m_lldb_object_sp->GetID());
+        process.Resume();
+    }
+}
+
+void
+SBThread::StepInto (lldb::RunMode stop_other_threads)
+{
+    if (m_lldb_object_sp)
+    {
+        bool abort_other_plans = true;
+
+        StackFrameSP frame_sp(m_lldb_object_sp->GetStackFrameAtIndex (0));
+
+        if (frame_sp && frame_sp->HasDebugInformation ())
+        {
+            SymbolContext sc(frame_sp->GetSymbolContext(eSymbolContextEverything));
+            ThreadPlan *new_plan = m_lldb_object_sp->QueueThreadPlanForStepRange (abort_other_plans, 
+                                                                                  eStepTypeInto, 
+                                                                                  sc.line_entry.range, 
+                                                                                  sc, 
+                                                                                  stop_other_threads);
+            if (new_plan)
+            {
+                ThreadPlanStepInRange *real_plan = dynamic_cast<ThreadPlanStepInRange *> (new_plan);
+                if (real_plan)
+                {
+                    bool avoid_no_debug = true;
+                    if (avoid_no_debug)
+                        real_plan->GetFlags().Set (ThreadPlanShouldStopHere::eAvoidNoDebug);
+                    else
+                        real_plan->GetFlags().Clear (ThreadPlanShouldStopHere::eAvoidNoDebug);
+                }
+            }
+        }
+        else
+        {
+            m_lldb_object_sp->QueueThreadPlanForStepSingleInstruction (false, 
+                                                                       abort_other_plans, 
+                                                                       stop_other_threads);
+        }
+
+        Process &process = m_lldb_object_sp->GetProcess();
+        // Why do we need to set the current thread by ID here???
+        process.GetThreadList().SetCurrentThreadByID (m_lldb_object_sp->GetID());
+        process.Resume();
+
+    }
+}
+
+void
+SBThread::StepOut ()
+{
+    if (m_lldb_object_sp)
+    {
+        bool abort_other_plans = true;
+        bool stop_other_threads = true;
+
+        m_lldb_object_sp->QueueThreadPlanForStepOut (abort_other_plans, NULL, false, stop_other_threads, eVoteYes, eVoteNoOpinion);
+
+        Process &process = m_lldb_object_sp->GetProcess();
+        process.GetThreadList().SetCurrentThreadByID (m_lldb_object_sp->GetID());
+        process.Resume();
+    }
+}
+
+void
+SBThread::StepInstruction (bool step_over)
+{
+    if (m_lldb_object_sp)
+    {
+        m_lldb_object_sp->QueueThreadPlanForStepSingleInstruction (step_over, true, true);
+        Process &process = m_lldb_object_sp->GetProcess();
+        process.GetThreadList().SetCurrentThreadByID (m_lldb_object_sp->GetID());
+        process.Resume();
+    }
+}
+
+void
+SBThread::RunToAddress (lldb::addr_t addr)
+{
+    if (m_lldb_object_sp)
+    {
+        bool abort_other_plans = true;
+        bool stop_other_threads = true;
+
+        Address target_addr (NULL, addr);
+
+        m_lldb_object_sp->QueueThreadPlanForRunToAddress (abort_other_plans, target_addr, stop_other_threads);
+        Process &process = m_lldb_object_sp->GetProcess();
+        process.GetThreadList().SetCurrentThreadByID (m_lldb_object_sp->GetID());
+        process.Resume();
+    }
+
+}
+
+void
+SBThread::Backtrace (uint32_t num_frames)
+{
+    bool all_frames = false;
+    if (num_frames < 1)
+        all_frames = true;
+
+    FILE *out = SBDebugger::GetOutputFileHandle();
+    FILE *err = SBDebugger::GetErrorFileHandle();
+    
+    if ((out == NULL) || (err == NULL))
+        return;
+
+    if (m_lldb_object_sp)
+    {
+        if (out && err)
+        {
+            int max_num_frames = m_lldb_object_sp->GetStackFrameCount();
+            int last_frame = max_num_frames;
+
+            if (!all_frames && (num_frames < last_frame))
+                last_frame = num_frames;
+
+            StackFrameSP frame_sp;
+            for (int i = 0; i < last_frame; ++i)
+            {
+                frame_sp = m_lldb_object_sp->GetStackFrameAtIndex (i);
+                if (!frame_sp)
+                    break;
+
+                SBFrame sb_frame (frame_sp);
+                if (DisplaySingleFrameForCurrentContext ((FILE *) out, (FILE *) err, sb_frame, true, false, 0, 0) == false)
+                    break;
+            }
+        }
+    }
+}
+
+SBProcess
+SBThread::GetProcess ()
+{
+    SBProcess process;
+    if (m_lldb_object_sp)
+    {
+        // Have to go up to the target so we can get a shared pointer to our process...
+        process.SetProcess(m_lldb_object_sp->GetProcess().GetTarget().GetProcessSP());
+    }
+    return process;
+}
+
+uint32_t
+SBThread::GetNumFrames ()
+{
+    if (m_lldb_object_sp)
+        return m_lldb_object_sp->GetStackFrameCount();
+    return 0;
+}
+
+SBFrame
+SBThread::GetFrameAtIndex (uint32_t idx)
+{
+    SBFrame sb_frame;
+    if (m_lldb_object_sp)
+        sb_frame.SetFrame (m_lldb_object_sp->GetStackFrameAtIndex (idx));
+    return sb_frame;
+}
+
+const lldb::SBThread &
+SBThread::operator = (const lldb::SBThread &rhs)
+{
+    m_lldb_object_sp = rhs.m_lldb_object_sp;
+    return *this;
+}
+
+bool
+SBThread::operator == (const SBThread &rhs) const
+{
+    return m_lldb_object_sp.get() == rhs.m_lldb_object_sp.get();
+}
+
+bool
+SBThread::operator != (const SBThread &rhs) const
+{
+    return m_lldb_object_sp.get() != rhs.m_lldb_object_sp.get();
+}
+
+lldb_private::Thread *
+SBThread::GetLLDBObjectPtr ()
+{
+    return m_lldb_object_sp.get();
+}
+
+const lldb_private::Thread *
+SBThread::operator->() const
+{
+    return m_lldb_object_sp.get();
+}
+
+const lldb_private::Thread &
+SBThread::operator*() const
+{
+    return *m_lldb_object_sp;
+}
+
+lldb_private::Thread *
+SBThread::operator->()
+{
+    return m_lldb_object_sp.get();
+}
+
+lldb_private::Thread &
+SBThread::operator*()
+{
+    return *m_lldb_object_sp;
+}