2010-06-09 00:52:24 +08:00
//===-- Debugger.cpp --------------------------------------------*- C++ -*-===//
//
// The LLVM Compiler Infrastructure
//
// This file is distributed under the University of Illinois Open Source
// License. See LICENSE.TXT for details.
//
//===----------------------------------------------------------------------===//
2011-06-24 01:59:56 +08:00
# include "lldb/Core/Debugger.h"
# include <map>
2011-06-30 06:27:15 +08:00
# include "clang/AST/DeclCXX.h"
# include "clang/AST/Type.h"
2010-06-09 00:52:24 +08:00
# include "lldb/lldb-private.h"
# include "lldb/Core/ConnectionFileDescriptor.h"
2011-06-24 01:59:56 +08:00
# include "lldb/Core/FormatManager.h"
2010-06-09 00:52:24 +08:00
# include "lldb/Core/InputReader.h"
2011-05-10 04:18:18 +08:00
# include "lldb/Core/RegisterValue.h"
2010-06-09 00:52:24 +08:00
# include "lldb/Core/State.h"
2011-06-03 07:58:26 +08:00
# include "lldb/Core/StreamAsynchronousIO.h"
2010-09-19 10:33:57 +08:00
# include "lldb/Core/StreamString.h"
2010-06-09 00:52:24 +08:00
# include "lldb/Core/Timer.h"
2011-06-30 06:27:15 +08:00
# include "lldb/Core/ValueObject.h"
2011-02-08 07:24:47 +08:00
# include "lldb/Host/Terminal.h"
2010-06-23 09:19:29 +08:00
# include "lldb/Interpreter/CommandInterpreter.h"
2010-06-09 00:52:24 +08:00
# include "lldb/Target/TargetList.h"
# include "lldb/Target/Process.h"
2010-09-19 10:33:57 +08:00
# include "lldb/Target/RegisterContext.h"
# include "lldb/Target/StopInfo.h"
2010-06-09 00:52:24 +08:00
# include "lldb/Target/Thread.h"
using namespace lldb ;
using namespace lldb_private ;
2010-09-19 10:33:57 +08:00
static uint32_t g_shared_debugger_refcount = 0 ;
2010-07-01 00:22:25 +08:00
static lldb : : user_id_t g_unique_id = 1 ;
2010-09-19 10:33:57 +08:00
# pragma mark Static Functions
static Mutex &
GetDebuggerListMutex ( )
{
static Mutex g_mutex ( Mutex : : eMutexTypeRecursive ) ;
return g_mutex ;
}
typedef std : : vector < DebuggerSP > DebuggerList ;
static DebuggerList &
GetDebuggerList ( )
{
// hide the static debugger list inside a singleton accessor to avoid
// global init contructors
static DebuggerList g_list ;
return g_list ;
}
# pragma mark Debugger
2010-11-19 07:32:35 +08:00
UserSettingsControllerSP &
Debugger : : GetSettingsController ( )
{
static UserSettingsControllerSP g_settings_controller ;
return g_settings_controller ;
}
2011-01-14 08:29:16 +08:00
int
Debugger : : TestDebuggerRefCount ( )
{
return g_shared_debugger_refcount ;
}
2010-06-09 00:52:24 +08:00
void
Debugger : : Initialize ( )
{
2010-06-23 09:19:29 +08:00
if ( g_shared_debugger_refcount = = 0 )
2010-11-19 07:32:35 +08:00
{
2010-11-19 11:46:01 +08:00
lldb_private : : Initialize ( ) ;
2010-11-19 07:32:35 +08:00
}
2010-06-23 09:19:29 +08:00
g_shared_debugger_refcount + + ;
2010-11-19 07:32:35 +08:00
2010-06-09 00:52:24 +08:00
}
void
Debugger : : Terminate ( )
{
2010-06-23 09:19:29 +08:00
if ( g_shared_debugger_refcount > 0 )
2010-06-09 00:52:24 +08:00
{
2010-06-23 09:19:29 +08:00
g_shared_debugger_refcount - - ;
if ( g_shared_debugger_refcount = = 0 )
2010-06-09 00:52:24 +08:00
{
2010-11-19 11:46:01 +08:00
lldb_private : : WillTerminate ( ) ;
lldb_private : : Terminate ( ) ;
2011-01-18 05:55:19 +08:00
// Clear our master list of debugger objects
Mutex : : Locker locker ( GetDebuggerListMutex ( ) ) ;
GetDebuggerList ( ) . clear ( ) ;
2010-06-09 00:52:24 +08:00
}
}
}
2011-03-11 06:14:10 +08:00
void
Debugger : : SettingsInitialize ( )
{
static bool g_initialized = false ;
if ( ! g_initialized )
{
g_initialized = true ;
UserSettingsControllerSP & usc = GetSettingsController ( ) ;
usc . reset ( new SettingsController ) ;
UserSettingsController : : InitializeSettingsController ( usc ,
SettingsController : : global_settings_table ,
SettingsController : : instance_settings_table ) ;
// Now call SettingsInitialize for each settings 'child' of Debugger
Target : : SettingsInitialize ( ) ;
}
}
void
Debugger : : SettingsTerminate ( )
{
// Must call SettingsTerminate() for each settings 'child' of Debugger, before terminating the Debugger's
// Settings.
Target : : SettingsTerminate ( ) ;
// Now terminate the Debugger Settings.
UserSettingsControllerSP & usc = GetSettingsController ( ) ;
UserSettingsController : : FinalizeSettingsController ( usc ) ;
usc . reset ( ) ;
}
2010-06-23 09:19:29 +08:00
DebuggerSP
Debugger : : CreateInstance ( )
{
DebuggerSP debugger_sp ( new Debugger ) ;
// Scope for locker
{
Mutex : : Locker locker ( GetDebuggerListMutex ( ) ) ;
GetDebuggerList ( ) . push_back ( debugger_sp ) ;
}
return debugger_sp ;
}
2011-01-22 09:02:07 +08:00
void
Debugger : : Destroy ( lldb : : DebuggerSP & debugger_sp )
{
if ( debugger_sp . get ( ) = = NULL )
return ;
Mutex : : Locker locker ( GetDebuggerListMutex ( ) ) ;
DebuggerList & debugger_list = GetDebuggerList ( ) ;
DebuggerList : : iterator pos , end = debugger_list . end ( ) ;
for ( pos = debugger_list . begin ( ) ; pos ! = end ; + + pos )
{
if ( ( * pos ) . get ( ) = = debugger_sp . get ( ) )
{
debugger_list . erase ( pos ) ;
return ;
}
}
}
2010-06-23 09:19:29 +08:00
lldb : : DebuggerSP
Debugger : : GetSP ( )
2010-06-09 00:52:24 +08:00
{
2010-06-23 09:19:29 +08:00
lldb : : DebuggerSP debugger_sp ;
2010-06-09 00:52:24 +08:00
2010-06-23 09:19:29 +08:00
Mutex : : Locker locker ( GetDebuggerListMutex ( ) ) ;
DebuggerList & debugger_list = GetDebuggerList ( ) ;
DebuggerList : : iterator pos , end = debugger_list . end ( ) ;
for ( pos = debugger_list . begin ( ) ; pos ! = end ; + + pos )
{
if ( ( * pos ) . get ( ) = = this )
{
debugger_sp = * pos ;
break ;
}
}
return debugger_sp ;
2010-06-09 00:52:24 +08:00
}
2010-09-04 08:03:46 +08:00
lldb : : DebuggerSP
Debugger : : FindDebuggerWithInstanceName ( const ConstString & instance_name )
{
lldb : : DebuggerSP debugger_sp ;
Mutex : : Locker locker ( GetDebuggerListMutex ( ) ) ;
DebuggerList & debugger_list = GetDebuggerList ( ) ;
DebuggerList : : iterator pos , end = debugger_list . end ( ) ;
for ( pos = debugger_list . begin ( ) ; pos ! = end ; + + pos )
{
if ( ( * pos ) . get ( ) - > m_instance_name = = instance_name )
{
debugger_sp = * pos ;
break ;
}
}
return debugger_sp ;
}
2010-06-23 09:19:29 +08:00
TargetSP
Debugger : : FindTargetWithProcessID ( lldb : : pid_t pid )
{
lldb : : TargetSP target_sp ;
Mutex : : Locker locker ( GetDebuggerListMutex ( ) ) ;
DebuggerList & debugger_list = GetDebuggerList ( ) ;
DebuggerList : : iterator pos , end = debugger_list . end ( ) ;
for ( pos = debugger_list . begin ( ) ; pos ! = end ; + + pos )
{
target_sp = ( * pos ) - > GetTargetList ( ) . FindTargetWithProcessID ( pid ) ;
if ( target_sp )
break ;
}
return target_sp ;
}
2010-06-09 00:52:24 +08:00
Debugger : : Debugger ( ) :
2010-07-01 00:22:25 +08:00
UserID ( g_unique_id + + ) ,
2010-11-19 11:46:01 +08:00
DebuggerInstanceSettings ( * GetSettingsController ( ) ) ,
2010-12-04 10:39:47 +08:00
m_input_comm ( " debugger.input " ) ,
2010-06-09 00:52:24 +08:00
m_input_file ( ) ,
m_output_file ( ) ,
m_error_file ( ) ,
m_target_list ( ) ,
2011-03-19 09:12:21 +08:00
m_platform_list ( ) ,
2010-06-09 00:52:24 +08:00
m_listener ( " lldb.Debugger " ) ,
m_source_manager ( ) ,
2010-06-23 09:19:29 +08:00
m_command_interpreter_ap ( new CommandInterpreter ( * this , eScriptLanguageDefault , false ) ) ,
2011-06-03 03:18:55 +08:00
m_input_reader_stack ( ) ,
2010-10-01 05:49:03 +08:00
m_input_reader_data ( )
2010-06-09 00:52:24 +08:00
{
2010-06-23 09:19:29 +08:00
m_command_interpreter_ap - > Initialize ( ) ;
2011-03-19 09:12:21 +08:00
// Always add our default platform to the platform list
PlatformSP default_platform_sp ( Platform : : GetDefaultPlatform ( ) ) ;
assert ( default_platform_sp . get ( ) ) ;
m_platform_list . Append ( default_platform_sp , true ) ;
2010-06-09 00:52:24 +08:00
}
Debugger : : ~ Debugger ( )
{
2010-12-21 02:35:50 +08:00
CleanUpInputReaders ( ) ;
2010-06-23 09:19:29 +08:00
int num_targets = m_target_list . GetNumTargets ( ) ;
for ( int i = 0 ; i < num_targets ; i + + )
{
ProcessSP process_sp ( m_target_list . GetTargetAtIndex ( i ) - > GetProcessSP ( ) ) ;
if ( process_sp )
process_sp - > Destroy ( ) ;
}
DisconnectInput ( ) ;
2010-06-09 00:52:24 +08:00
}
2011-05-29 12:06:55 +08:00
bool
Debugger : : GetCloseInputOnEOF ( ) const
{
return m_input_comm . GetCloseOnEOF ( ) ;
}
void
Debugger : : SetCloseInputOnEOF ( bool b )
{
m_input_comm . SetCloseOnEOF ( b ) ;
}
2010-06-09 00:52:24 +08:00
bool
Debugger : : GetAsyncExecution ( )
{
2010-06-23 09:19:29 +08:00
return ! m_command_interpreter_ap - > GetSynchronous ( ) ;
2010-06-09 00:52:24 +08:00
}
void
Debugger : : SetAsyncExecution ( bool async_execution )
{
2010-06-23 09:19:29 +08:00
m_command_interpreter_ap - > SetSynchronous ( ! async_execution ) ;
2010-06-09 00:52:24 +08:00
}
void
Debugger : : SetInputFileHandle ( FILE * fh , bool tranfer_ownership )
{
2011-02-09 09:08:52 +08:00
File & in_file = GetInputFile ( ) ;
in_file . SetStream ( fh , tranfer_ownership ) ;
if ( in_file . IsValid ( ) = = false )
in_file . SetStream ( stdin , true ) ;
2010-06-09 00:52:24 +08:00
// Disconnect from any old connection if we had one
m_input_comm . Disconnect ( ) ;
2011-02-09 09:08:52 +08:00
m_input_comm . SetConnection ( new ConnectionFileDescriptor ( in_file . GetDescriptor ( ) , true ) ) ;
2010-06-09 00:52:24 +08:00
m_input_comm . SetReadThreadBytesReceivedCallback ( Debugger : : DispatchInputCallback , this ) ;
Error error ;
if ( m_input_comm . StartReadThread ( & error ) = = false )
{
2011-02-09 09:08:52 +08:00
File & err_file = GetErrorFile ( ) ;
2010-06-09 00:52:24 +08:00
2011-02-09 09:08:52 +08:00
err_file . Printf ( " error: failed to main input read thread: %s " , error . AsCString ( ) ? error . AsCString ( ) : " unkown error " ) ;
exit ( 1 ) ;
}
2010-06-09 00:52:24 +08:00
}
void
Debugger : : SetOutputFileHandle ( FILE * fh , bool tranfer_ownership )
{
2011-02-09 09:08:52 +08:00
File & out_file = GetOutputFile ( ) ;
out_file . SetStream ( fh , tranfer_ownership ) ;
if ( out_file . IsValid ( ) = = false )
out_file . SetStream ( stdout , false ) ;
2011-01-14 08:29:16 +08:00
GetCommandInterpreter ( ) . GetScriptInterpreter ( ) - > ResetOutputFileHandle ( fh ) ;
2010-06-09 00:52:24 +08:00
}
void
Debugger : : SetErrorFileHandle ( FILE * fh , bool tranfer_ownership )
{
2011-02-09 09:08:52 +08:00
File & err_file = GetErrorFile ( ) ;
err_file . SetStream ( fh , tranfer_ownership ) ;
if ( err_file . IsValid ( ) = = false )
err_file . SetStream ( stderr , false ) ;
2010-06-09 00:52:24 +08:00
}
ExecutionContext
2010-08-27 05:32:51 +08:00
Debugger : : GetSelectedExecutionContext ( )
2010-06-09 00:52:24 +08:00
{
ExecutionContext exe_ctx ;
exe_ctx . Clear ( ) ;
2010-08-27 05:32:51 +08:00
lldb : : TargetSP target_sp = GetSelectedTarget ( ) ;
2010-06-09 00:52:24 +08:00
exe_ctx . target = target_sp . get ( ) ;
if ( target_sp )
{
exe_ctx . process = target_sp - > GetProcessSP ( ) . get ( ) ;
if ( exe_ctx . process & & exe_ctx . process - > IsRunning ( ) = = false )
{
2010-08-27 05:32:51 +08:00
exe_ctx . thread = exe_ctx . process - > GetThreadList ( ) . GetSelectedThread ( ) . get ( ) ;
2010-06-09 00:52:24 +08:00
if ( exe_ctx . thread = = NULL )
exe_ctx . thread = exe_ctx . process - > GetThreadList ( ) . GetThreadAtIndex ( 0 ) . get ( ) ;
if ( exe_ctx . thread )
{
2010-08-27 05:32:51 +08:00
exe_ctx . frame = exe_ctx . thread - > GetSelectedFrame ( ) . get ( ) ;
2010-06-09 00:52:24 +08:00
if ( exe_ctx . frame = = NULL )
exe_ctx . frame = exe_ctx . thread - > GetStackFrameAtIndex ( 0 ) . get ( ) ;
}
}
}
return exe_ctx ;
}
2011-02-10 09:15:13 +08:00
InputReaderSP
Debugger : : GetCurrentInputReader ( )
{
InputReaderSP reader_sp ;
2011-06-03 03:18:55 +08:00
if ( ! m_input_reader_stack . IsEmpty ( ) )
2011-02-10 09:15:13 +08:00
{
// Clear any finished readers from the stack
while ( CheckIfTopInputReaderIsDone ( ) ) ;
2011-06-03 03:18:55 +08:00
if ( ! m_input_reader_stack . IsEmpty ( ) )
reader_sp = m_input_reader_stack . Top ( ) ;
2011-02-10 09:15:13 +08:00
}
return reader_sp ;
}
2010-06-09 00:52:24 +08:00
void
Debugger : : DispatchInputCallback ( void * baton , const void * bytes , size_t bytes_len )
{
2010-11-20 04:47:54 +08:00
if ( bytes_len > 0 )
( ( Debugger * ) baton ) - > DispatchInput ( ( char * ) bytes , bytes_len ) ;
else
( ( Debugger * ) baton ) - > DispatchInputEndOfFile ( ) ;
}
2010-06-09 00:52:24 +08:00
void
Debugger : : DispatchInput ( const char * bytes , size_t bytes_len )
{
2010-11-20 04:47:54 +08:00
if ( bytes = = NULL | | bytes_len = = 0 )
return ;
2010-06-09 00:52:24 +08:00
WriteToDefaultReader ( bytes , bytes_len ) ;
}
2010-11-20 04:47:54 +08:00
void
Debugger : : DispatchInputInterrupt ( )
{
m_input_reader_data . clear ( ) ;
2011-02-10 09:15:13 +08:00
InputReaderSP reader_sp ( GetCurrentInputReader ( ) ) ;
if ( reader_sp )
2010-11-20 04:47:54 +08:00
{
2011-02-10 09:15:13 +08:00
reader_sp - > Notify ( eInputReaderInterrupt ) ;
2010-11-20 04:47:54 +08:00
2011-02-10 09:15:13 +08:00
// If notifying the reader of the interrupt finished the reader, we should pop it off the stack.
2010-11-20 04:47:54 +08:00
while ( CheckIfTopInputReaderIsDone ( ) ) ;
}
}
void
Debugger : : DispatchInputEndOfFile ( )
{
m_input_reader_data . clear ( ) ;
2011-02-10 09:15:13 +08:00
InputReaderSP reader_sp ( GetCurrentInputReader ( ) ) ;
if ( reader_sp )
2010-11-20 04:47:54 +08:00
{
2011-02-10 09:15:13 +08:00
reader_sp - > Notify ( eInputReaderEndOfFile ) ;
2010-11-20 04:47:54 +08:00
2011-02-10 09:15:13 +08:00
// If notifying the reader of the end-of-file finished the reader, we should pop it off the stack.
2010-11-20 04:47:54 +08:00
while ( CheckIfTopInputReaderIsDone ( ) ) ;
}
}
2010-12-21 02:35:50 +08:00
void
Debugger : : CleanUpInputReaders ( )
{
m_input_reader_data . clear ( ) ;
2011-02-10 09:15:13 +08:00
// The bottom input reader should be the main debugger input reader. We do not want to close that one here.
2011-06-03 03:18:55 +08:00
while ( m_input_reader_stack . GetSize ( ) > 1 )
2010-12-21 02:35:50 +08:00
{
2011-02-10 09:15:13 +08:00
InputReaderSP reader_sp ( GetCurrentInputReader ( ) ) ;
2010-12-21 02:35:50 +08:00
if ( reader_sp )
{
reader_sp - > Notify ( eInputReaderEndOfFile ) ;
reader_sp - > SetIsDone ( true ) ;
}
}
}
This patch captures and serializes all output being written by the
command line driver, including the lldb prompt being output by
editline, the asynchronous process output & error messages, and
asynchronous messages written by target stop-hooks.
As part of this it introduces a new Stream class,
StreamAsynchronousIO. A StreamAsynchronousIO object is created with a
broadcaster, who will eventually broadcast the stream's data for a
listener to handle, and an event type indicating what type of event
the broadcaster will broadcast. When the Write method is called on a
StreamAsynchronousIO object, the data is appended to an internal
string. When the Flush method is called on a StreamAsynchronousIO
object, it broadcasts it's data string and clears the string.
Anything in lldb-core that needs to generate asynchronous output for
the end-user should use the StreamAsynchronousIO objects.
I have also added a new notification type for InputReaders, to let
them know that a asynchronous output has been written. This is to
allow the input readers to, for example, refresh their prompts and
lines, if desired. I added the case statements to all the input
readers to catch this notification, but I haven't added any code for
handling them yet (except to the IOChannel input reader).
llvm-svn: 130721
2011-05-03 04:41:46 +08:00
void
Debugger : : NotifyTopInputReader ( InputReaderAction notification )
{
InputReaderSP reader_sp ( GetCurrentInputReader ( ) ) ;
if ( reader_sp )
{
reader_sp - > Notify ( notification ) ;
// Flush out any input readers that are done.
while ( CheckIfTopInputReaderIsDone ( ) )
/* Do nothing. */ ;
}
}
2011-05-10 07:06:58 +08:00
bool
Debugger : : InputReaderIsTopReader ( const lldb : : InputReaderSP & reader_sp )
{
2011-06-17 00:27:19 +08:00
InputReaderSP top_reader_sp ( GetCurrentInputReader ( ) ) ;
2011-05-10 07:06:58 +08:00
2011-06-17 00:27:19 +08:00
return ( reader_sp . get ( ) = = top_reader_sp . get ( ) ) ;
2011-05-10 07:06:58 +08:00
}
2010-06-09 00:52:24 +08:00
void
Debugger : : WriteToDefaultReader ( const char * bytes , size_t bytes_len )
{
if ( bytes & & bytes_len )
m_input_reader_data . append ( bytes , bytes_len ) ;
if ( m_input_reader_data . empty ( ) )
return ;
2011-06-03 03:18:55 +08:00
while ( ! m_input_reader_stack . IsEmpty ( ) & & ! m_input_reader_data . empty ( ) )
2010-06-09 00:52:24 +08:00
{
// Get the input reader from the top of the stack
2011-02-10 09:15:13 +08:00
InputReaderSP reader_sp ( GetCurrentInputReader ( ) ) ;
2010-06-09 00:52:24 +08:00
if ( ! reader_sp )
break ;
2010-07-21 06:52:08 +08:00
size_t bytes_handled = reader_sp - > HandleRawBytes ( m_input_reader_data . c_str ( ) ,
2010-06-09 00:52:24 +08:00
m_input_reader_data . size ( ) ) ;
if ( bytes_handled )
{
m_input_reader_data . erase ( 0 , bytes_handled ) ;
}
else
{
// No bytes were handled, we might not have reached our
// granularity, just return and wait for more data
break ;
}
}
2011-02-10 09:15:13 +08:00
// Flush out any input readers that are done.
2010-06-09 00:52:24 +08:00
while ( CheckIfTopInputReaderIsDone ( ) )
/* Do nothing. */ ;
}
void
Debugger : : PushInputReader ( const InputReaderSP & reader_sp )
{
if ( ! reader_sp )
return ;
2011-02-10 09:15:13 +08:00
// Deactivate the old top reader
InputReaderSP top_reader_sp ( GetCurrentInputReader ( ) ) ;
if ( top_reader_sp )
top_reader_sp - > Notify ( eInputReaderDeactivate ) ;
2011-06-03 03:18:55 +08:00
m_input_reader_stack . Push ( reader_sp ) ;
2010-06-09 00:52:24 +08:00
reader_sp - > Notify ( eInputReaderActivate ) ;
ActivateInputReader ( reader_sp ) ;
}
bool
Debugger : : PopInputReader ( const lldb : : InputReaderSP & pop_reader_sp )
{
bool result = false ;
// The reader on the stop of the stack is done, so let the next
// read on the stack referesh its prompt and if there is one...
2011-06-03 03:18:55 +08:00
if ( ! m_input_reader_stack . IsEmpty ( ) )
2010-06-09 00:52:24 +08:00
{
2011-02-10 09:15:13 +08:00
// Cannot call GetCurrentInputReader here, as that would cause an infinite loop.
2011-06-03 03:18:55 +08:00
InputReaderSP reader_sp ( m_input_reader_stack . Top ( ) ) ;
2010-06-09 00:52:24 +08:00
if ( ! pop_reader_sp | | pop_reader_sp . get ( ) = = reader_sp . get ( ) )
{
2011-06-03 03:18:55 +08:00
m_input_reader_stack . Pop ( ) ;
2010-06-09 00:52:24 +08:00
reader_sp - > Notify ( eInputReaderDeactivate ) ;
reader_sp - > Notify ( eInputReaderDone ) ;
result = true ;
2011-06-03 03:18:55 +08:00
if ( ! m_input_reader_stack . IsEmpty ( ) )
2010-06-09 00:52:24 +08:00
{
2011-06-03 03:18:55 +08:00
reader_sp = m_input_reader_stack . Top ( ) ;
2010-06-09 00:52:24 +08:00
if ( reader_sp )
{
ActivateInputReader ( reader_sp ) ;
reader_sp - > Notify ( eInputReaderReactivate ) ;
}
}
}
}
return result ;
}
bool
Debugger : : CheckIfTopInputReaderIsDone ( )
{
bool result = false ;
2011-06-03 03:18:55 +08:00
if ( ! m_input_reader_stack . IsEmpty ( ) )
2010-06-09 00:52:24 +08:00
{
2011-02-10 09:15:13 +08:00
// Cannot call GetCurrentInputReader here, as that would cause an infinite loop.
2011-06-03 03:18:55 +08:00
InputReaderSP reader_sp ( m_input_reader_stack . Top ( ) ) ;
2010-06-09 00:52:24 +08:00
if ( reader_sp & & reader_sp - > IsDone ( ) )
{
result = true ;
PopInputReader ( reader_sp ) ;
}
}
return result ;
}
void
Debugger : : ActivateInputReader ( const InputReaderSP & reader_sp )
{
2011-02-09 09:08:52 +08:00
int input_fd = m_input_file . GetFile ( ) . GetDescriptor ( ) ;
2010-06-09 00:52:24 +08:00
2011-02-09 09:08:52 +08:00
if ( input_fd > = 0 )
2010-06-09 00:52:24 +08:00
{
2011-02-09 09:08:52 +08:00
Terminal tty ( input_fd ) ;
2011-02-08 07:24:47 +08:00
tty . SetEcho ( reader_sp - > GetEcho ( ) ) ;
2010-06-09 00:52:24 +08:00
2011-02-08 07:24:47 +08:00
switch ( reader_sp - > GetGranularity ( ) )
{
case eInputReaderGranularityByte :
case eInputReaderGranularityWord :
tty . SetCanonical ( false ) ;
break ;
case eInputReaderGranularityLine :
case eInputReaderGranularityAll :
tty . SetCanonical ( true ) ;
break ;
default :
break ;
2010-06-09 00:52:24 +08:00
}
}
}
2010-06-23 09:19:29 +08:00
2011-06-03 07:58:26 +08:00
StreamSP
Debugger : : GetAsyncOutputStream ( )
{
return StreamSP ( new StreamAsynchronousIO ( GetCommandInterpreter ( ) ,
CommandInterpreter : : eBroadcastBitAsynchronousOutputData ) ) ;
}
StreamSP
Debugger : : GetAsyncErrorStream ( )
{
return StreamSP ( new StreamAsynchronousIO ( GetCommandInterpreter ( ) ,
CommandInterpreter : : eBroadcastBitAsynchronousErrorData ) ) ;
}
2010-07-01 00:22:25 +08:00
DebuggerSP
Debugger : : FindDebuggerWithID ( lldb : : user_id_t id )
{
lldb : : DebuggerSP debugger_sp ;
Mutex : : Locker locker ( GetDebuggerListMutex ( ) ) ;
DebuggerList & debugger_list = GetDebuggerList ( ) ;
DebuggerList : : iterator pos , end = debugger_list . end ( ) ;
for ( pos = debugger_list . begin ( ) ; pos ! = end ; + + pos )
{
if ( ( * pos ) . get ( ) - > GetID ( ) = = id )
{
debugger_sp = * pos ;
break ;
}
}
return debugger_sp ;
}
2010-09-04 08:03:46 +08:00
2010-09-19 10:33:57 +08:00
static void
TestPromptFormats ( StackFrame * frame )
{
if ( frame = = NULL )
return ;
StreamString s ;
const char * prompt_format =
" {addr = '${addr}' \n } "
" {process.id = '${process.id}' \n } "
" {process.name = '${process.name}' \n } "
" {process.file.basename = '${process.file.basename}' \n } "
" {process.file.fullpath = '${process.file.fullpath}' \n } "
" {thread.id = '${thread.id}' \n } "
" {thread.index = '${thread.index}' \n } "
" {thread.name = '${thread.name}' \n } "
" {thread.queue = '${thread.queue}' \n } "
" {thread.stop-reason = '${thread.stop-reason}' \n } "
" {target.arch = '${target.arch}' \n } "
" {module.file.basename = '${module.file.basename}' \n } "
" {module.file.fullpath = '${module.file.fullpath}' \n } "
" {file.basename = '${file.basename}' \n } "
" {file.fullpath = '${file.fullpath}' \n } "
" {frame.index = '${frame.index}' \n } "
" {frame.pc = '${frame.pc}' \n } "
" {frame.sp = '${frame.sp}' \n } "
" {frame.fp = '${frame.fp}' \n } "
" {frame.flags = '${frame.flags}' \n } "
" {frame.reg.rdi = '${frame.reg.rdi}' \n } "
" {frame.reg.rip = '${frame.reg.rip}' \n } "
" {frame.reg.rsp = '${frame.reg.rsp}' \n } "
" {frame.reg.rbp = '${frame.reg.rbp}' \n } "
" {frame.reg.rflags = '${frame.reg.rflags}' \n } "
" {frame.reg.xmm0 = '${frame.reg.xmm0}' \n } "
" {frame.reg.carp = '${frame.reg.carp}' \n } "
" {function.id = '${function.id}' \n } "
" {function.name = '${function.name}' \n } "
" {function.addr-offset = '${function.addr-offset}' \n } "
" {function.line-offset = '${function.line-offset}' \n } "
" {function.pc-offset = '${function.pc-offset}' \n } "
" {line.file.basename = '${line.file.basename}' \n } "
" {line.file.fullpath = '${line.file.fullpath}' \n } "
" {line.number = '${line.number}' \n } "
" {line.start-addr = '${line.start-addr}' \n } "
" {line.end-addr = '${line.end-addr}' \n } "
;
SymbolContext sc ( frame - > GetSymbolContext ( eSymbolContextEverything ) ) ;
ExecutionContext exe_ctx ;
2010-10-04 09:05:56 +08:00
frame - > CalculateExecutionContext ( exe_ctx ) ;
2010-09-19 10:33:57 +08:00
const char * end = NULL ;
if ( Debugger : : FormatPrompt ( prompt_format , & sc , & exe_ctx , & sc . line_entry . range . GetBaseAddress ( ) , s , & end ) )
{
printf ( " %s \n " , s . GetData ( ) ) ;
}
else
{
printf ( " error: at '%s' \n " , end ) ;
printf ( " what we got: %s \n " , s . GetData ( ) ) ;
}
}
2011-07-08 10:51:01 +08:00
//#define VERBOSE_FORMATPROMPT_OUTPUT
2011-07-06 10:13:41 +08:00
# ifdef VERBOSE_FORMATPROMPT_OUTPUT
# define IFERROR_PRINT_IT if (error.Fail()) \
{ \
printf ( " ERROR: %s \n " , error . AsCString ( " unknown " ) ) ; \
break ; \
}
# else // IFERROR_PRINT_IT
# define IFERROR_PRINT_IT if (error.Fail()) \
break ;
# endif // IFERROR_PRINT_IT
static bool
ScanFormatDescriptor ( const char * var_name_begin ,
const char * var_name_end ,
const char * * var_name_final ,
const char * * percent_position ,
lldb : : Format * custom_format ,
ValueObject : : ValueObjectRepresentationStyle * val_obj_display )
{
* percent_position = : : strchr ( var_name_begin , ' % ' ) ;
2011-07-06 12:07:21 +08:00
if ( ! * percent_position | | * percent_position > var_name_end )
2011-07-06 10:13:41 +08:00
* var_name_final = var_name_end ;
else
{
* var_name_final = * percent_position ;
char * format_name = new char [ var_name_end - * var_name_final ] ; format_name [ var_name_end - * var_name_final - 1 ] = ' \0 ' ;
memcpy ( format_name , * var_name_final + 1 , var_name_end - * var_name_final - 1 ) ;
if ( ! FormatManager : : GetFormatFromCString ( format_name ,
true ,
* custom_format ) )
{
// if this is an @ sign, print ObjC description
2011-07-06 12:07:21 +08:00
if ( * format_name = = ' @ ' )
2011-07-06 10:13:41 +08:00
* val_obj_display = ValueObject : : eDisplayLanguageSpecific ;
// if this is a V, print the value using the default format
2011-07-06 12:07:21 +08:00
if ( * format_name = = ' V ' )
2011-07-06 10:13:41 +08:00
* val_obj_display = ValueObject : : eDisplayValue ;
}
// a good custom format tells us to print the value using it
else
* val_obj_display = ValueObject : : eDisplayValue ;
delete format_name ;
}
return true ;
}
static bool
ScanBracketedRange ( const char * var_name_begin ,
const char * var_name_end ,
const char * var_name_final ,
const char * * open_bracket_position ,
const char * * separator_position ,
const char * * close_bracket_position ,
const char * * var_name_final_if_array_range ,
int64_t * index_lower ,
int64_t * index_higher )
{
* open_bracket_position = : : strchr ( var_name_begin , ' [ ' ) ;
2011-07-06 12:07:21 +08:00
if ( * open_bracket_position & & * open_bracket_position < var_name_final )
2011-07-06 10:13:41 +08:00
{
* separator_position = : : strchr ( * open_bracket_position , ' - ' ) ; // might be NULL if this is a simple var[N] bitfield
* close_bracket_position = : : strchr ( * open_bracket_position , ' ] ' ) ;
// as usual, we assume that [] will come before %
//printf("trying to expand a []\n");
* var_name_final_if_array_range = * open_bracket_position ;
2011-07-06 12:07:21 +08:00
if ( * close_bracket_position - * open_bracket_position = = 1 )
2011-07-06 10:13:41 +08:00
{
* index_lower = 0 ;
}
else if ( * separator_position = = NULL | | * separator_position > var_name_end )
{
char * end = NULL ;
* index_lower = : : strtoul ( * open_bracket_position + 1 , & end , 0 ) ;
* index_higher = * index_lower ;
//printf("got to read low=%d high same\n",bitfield_lower);
}
2011-07-06 12:07:21 +08:00
else if ( * close_bracket_position & & * close_bracket_position < var_name_end )
2011-07-06 10:13:41 +08:00
{
char * end = NULL ;
* index_lower = : : strtoul ( * open_bracket_position + 1 , & end , 0 ) ;
* index_higher = : : strtoul ( * separator_position + 1 , & end , 0 ) ;
//printf("got to read low=%d high=%d\n",bitfield_lower,bitfield_higher);
}
else
return false ;
if ( * index_lower > * index_higher & & * index_higher > 0 )
{
int temp = * index_lower ;
* index_lower = * index_higher ;
* index_higher = temp ;
}
}
return true ;
}
static ValueObjectSP
ExpandExpressionPath ( ValueObject * vobj ,
StackFrame * frame ,
bool * do_deref_pointer ,
const char * var_name_begin ,
const char * var_name_final ,
Error & error )
{
StreamString sstring ;
VariableSP var_sp ;
2011-07-06 12:07:21 +08:00
if ( * do_deref_pointer )
2011-07-06 10:13:41 +08:00
sstring . PutChar ( ' * ' ) ;
2011-07-06 12:07:21 +08:00
else if ( vobj - > IsDereferenceOfParent ( ) & & ClangASTContext : : IsPointerType ( vobj - > GetParent ( ) - > GetClangType ( ) ) & & ! vobj - > IsArrayItemForPointer ( ) )
2011-07-06 10:13:41 +08:00
{
sstring . PutChar ( ' * ' ) ;
* do_deref_pointer = true ;
}
vobj - > GetExpressionPath ( sstring , true , ValueObject : : eHonorPointers ) ;
# ifdef VERBOSE_FORMATPROMPT_OUTPUT
printf ( " name to expand in phase 0: %s \n " , sstring . GetData ( ) ) ;
# endif //VERBOSE_FORMATPROMPT_OUTPUT
sstring . PutRawBytes ( var_name_begin + 3 , var_name_final - var_name_begin - 3 ) ;
# ifdef VERBOSE_FORMATPROMPT_OUTPUT
printf ( " name to expand in phase 1: %s \n " , sstring . GetData ( ) ) ;
# endif //VERBOSE_FORMATPROMPT_OUTPUT
std : : string name = std : : string ( sstring . GetData ( ) ) ;
ValueObjectSP target = frame - > GetValueForVariableExpressionPath ( name . c_str ( ) ,
eNoDynamicValues ,
0 ,
var_sp ,
error ) ;
return target ;
}
static ValueObjectSP
ExpandIndexedExpression ( ValueObject * vobj ,
uint32_t index ,
StackFrame * frame ,
2011-07-08 10:51:01 +08:00
bool deref_pointer )
2011-07-06 10:13:41 +08:00
{
2011-07-08 10:51:01 +08:00
const char * ptr_deref_format = " [%d] " ;
std : : auto_ptr < char > ptr_deref_buffer ( new char [ 10 ] ) ;
: : sprintf ( ptr_deref_buffer . get ( ) , ptr_deref_format , index ) ;
2011-07-06 10:13:41 +08:00
# ifdef VERBOSE_FORMATPROMPT_OUTPUT
2011-07-08 10:51:01 +08:00
printf ( " name to deref: %s \n " , ptr_deref_buffer . get ( ) ) ;
2011-07-06 10:13:41 +08:00
# endif //VERBOSE_FORMATPROMPT_OUTPUT
2011-07-08 10:51:01 +08:00
const char * first_unparsed ;
ValueObject : : GetValueForExpressionPathOptions options ;
ValueObject : : ExpressionPathEndResultType final_value_type ;
ValueObject : : ExpressionPathScanEndReason reason_to_stop ;
ValueObject : : ExpressionPathAftermath what_next = ( deref_pointer ? ValueObject : : eDereference : ValueObject : : eNothing ) ;
ValueObjectSP item = vobj - > GetValueForExpressionPath ( ptr_deref_buffer . get ( ) ,
& first_unparsed ,
& reason_to_stop ,
& final_value_type ,
options ,
& what_next ) ;
if ( ! item )
{
# ifdef VERBOSE_FORMATPROMPT_OUTPUT
printf ( " ERROR: unparsed portion = %s, why stopping = %d, "
" final_value_type %d \n " ,
first_unparsed , reason_to_stop , final_value_type ) ;
2011-07-06 10:13:41 +08:00
# endif //VERBOSE_FORMATPROMPT_OUTPUT
}
2011-07-08 10:51:01 +08:00
# ifdef VERBOSE_FORMATPROMPT_OUTPUT
else
{
printf ( " ALL RIGHT: unparsed portion = %s, why stopping = %d, "
" final_value_type %d \n " ,
first_unparsed , reason_to_stop , final_value_type ) ;
}
# endif //VERBOSE_FORMATPROMPT_OUTPUT
2011-07-06 10:13:41 +08:00
return item ;
}
2010-09-19 10:33:57 +08:00
bool
Debugger : : FormatPrompt
(
const char * format ,
const SymbolContext * sc ,
const ExecutionContext * exe_ctx ,
const Address * addr ,
Stream & s ,
2011-06-30 06:27:15 +08:00
const char * * end ,
ValueObject * vobj
2010-09-19 10:33:57 +08:00
)
{
2011-06-30 06:27:15 +08:00
ValueObject * realvobj = NULL ; // makes it super-easy to parse pointers
2010-09-19 10:33:57 +08:00
bool success = true ;
const char * p ;
for ( p = format ; * p ! = ' \0 ' ; + + p )
{
2011-07-06 12:07:21 +08:00
if ( realvobj )
2011-06-30 06:27:15 +08:00
{
vobj = realvobj ;
realvobj = NULL ;
}
2010-09-19 10:33:57 +08:00
size_t non_special_chars = : : strcspn ( p , " ${} \\ " ) ;
if ( non_special_chars > 0 )
{
if ( success )
s . Write ( p , non_special_chars ) ;
p + = non_special_chars ;
}
if ( * p = = ' \0 ' )
{
break ;
}
else if ( * p = = ' { ' )
{
// Start a new scope that must have everything it needs if it is to
// to make it into the final output stream "s". If you want to make
// a format that only prints out the function or symbol name if there
// is one in the symbol context you can use:
// "{function =${function.name}}"
// The first '{' starts a new scope that end with the matching '}' at
// the end of the string. The contents "function =${function.name}"
// will then be evaluated and only be output if there is a function
// or symbol with a valid name.
StreamString sub_strm ;
+ + p ; // Skip the '{'
2011-06-30 06:27:15 +08:00
if ( FormatPrompt ( p , sc , exe_ctx , addr , sub_strm , & p , vobj ) )
2010-09-19 10:33:57 +08:00
{
// The stream had all it needed
s . Write ( sub_strm . GetData ( ) , sub_strm . GetSize ( ) ) ;
}
if ( * p ! = ' } ' )
{
success = false ;
break ;
}
}
else if ( * p = = ' } ' )
{
// End of a enclosing scope
break ;
}
else if ( * p = = ' $ ' )
{
// We have a prompt variable to print
+ + p ;
if ( * p = = ' { ' )
{
+ + p ;
const char * var_name_begin = p ;
const char * var_name_end = : : strchr ( p , ' } ' ) ;
if ( var_name_end & & var_name_begin < var_name_end )
{
// if we have already failed to parse, skip this variable
if ( success )
{
const char * cstr = NULL ;
Address format_addr ;
bool calculate_format_addr_function_offset = false ;
// Set reg_kind and reg_num to invalid values
RegisterKind reg_kind = kNumRegisterKinds ;
uint32_t reg_num = LLDB_INVALID_REGNUM ;
FileSpec format_file_spec ;
2011-03-25 05:19:54 +08:00
const RegisterInfo * reg_info = NULL ;
2010-09-19 10:33:57 +08:00
RegisterContext * reg_ctx = NULL ;
2011-07-06 10:13:41 +08:00
bool do_deref_pointer = false ;
2011-07-08 10:51:01 +08:00
ValueObject : : ExpressionPathScanEndReason reason_to_stop ;
ValueObject : : ExpressionPathEndResultType final_value_type ;
2010-09-19 10:33:57 +08:00
// Each variable must set success to true below...
bool var_success = false ;
switch ( var_name_begin [ 0 ] )
{
2011-06-30 06:27:15 +08:00
case ' * ' :
{
2011-07-06 12:07:21 +08:00
if ( ! vobj )
break ;
2011-07-06 10:13:41 +08:00
do_deref_pointer = true ;
var_name_begin + + ;
2011-06-30 06:27:15 +08:00
}
2011-07-06 12:07:21 +08:00
// Fall through...
2011-06-30 06:27:15 +08:00
case ' v ' :
{
2011-07-08 10:51:01 +08:00
ValueObject : : ExpressionPathAftermath what_next = ( do_deref_pointer ?
ValueObject : : eDereference : ValueObject : : eNothing ) ;
ValueObject : : GetValueForExpressionPathOptions options ;
options . DontCheckDotVsArrowSyntax ( ) . DoAllowBitfieldSyntax ( ) . DoAllowFragileIVar ( ) ;
2011-07-06 12:07:21 +08:00
ValueObject : : ValueObjectRepresentationStyle val_obj_display = ValueObject : : eDisplaySummary ;
ValueObject * target = NULL ;
lldb : : Format custom_format = eFormatInvalid ;
const char * var_name_final = NULL ;
const char * var_name_final_if_array_range = NULL ;
const char * close_bracket_position = NULL ;
int64_t index_lower = - 1 ;
int64_t index_higher = - 1 ;
bool is_array_range = false ;
2011-07-08 10:51:01 +08:00
const char * first_unparsed ;
2011-07-06 12:07:21 +08:00
if ( ! vobj ) break ;
// simplest case ${var}, just print vobj's value
if ( : : strncmp ( var_name_begin , " var} " , strlen ( " var} " ) ) = = 0 )
{
target = vobj ;
val_obj_display = ValueObject : : eDisplayValue ;
}
else if ( : : strncmp ( var_name_begin , " var% " , strlen ( " var% " ) ) = = 0 )
{
// this is a variable with some custom format applied to it
const char * percent_position ;
target = vobj ;
val_obj_display = ValueObject : : eDisplayValue ;
ScanFormatDescriptor ( var_name_begin ,
var_name_end ,
& var_name_final ,
& percent_position ,
& custom_format ,
& val_obj_display ) ;
}
// this is ${var.something} or multiple .something nested
else if ( : : strncmp ( var_name_begin , " var " , strlen ( " var " ) ) = = 0 )
2011-06-30 06:27:15 +08:00
{
2011-07-06 12:07:21 +08:00
const char * percent_position ;
ScanFormatDescriptor ( var_name_begin ,
var_name_end ,
& var_name_final ,
& percent_position ,
& custom_format ,
& val_obj_display ) ;
const char * open_bracket_position ;
const char * separator_position ;
ScanBracketedRange ( var_name_begin ,
var_name_end ,
var_name_final ,
& open_bracket_position ,
& separator_position ,
& close_bracket_position ,
& var_name_final_if_array_range ,
& index_lower ,
& index_higher ) ;
Error error ;
2011-07-08 10:51:01 +08:00
std : : auto_ptr < char > expr_path ( new char [ var_name_final - var_name_begin - 1 ] ) ;
: : memset ( expr_path . get ( ) , 0 , var_name_final - var_name_begin - 1 ) ;
memcpy ( expr_path . get ( ) , var_name_begin + 3 , var_name_final - var_name_begin - 3 ) ;
# ifdef VERBOSE_FORMATPROMPT_OUTPUT
printf ( " symbol to expand: %s \n " , expr_path . get ( ) ) ;
# endif //VERBOSE_FORMATPROMPT_OUTPUT
target = vobj - > GetValueForExpressionPath ( expr_path . get ( ) ,
& first_unparsed ,
& reason_to_stop ,
& final_value_type ,
options ,
& what_next ) . get ( ) ;
if ( ! target )
2011-07-06 12:07:21 +08:00
{
2011-07-02 08:25:22 +08:00
# ifdef VERBOSE_FORMATPROMPT_OUTPUT
2011-07-08 10:51:01 +08:00
printf ( " ERROR: unparsed portion = %s, why stopping = %d, "
" final_value_type %d \n " ,
first_unparsed , reason_to_stop , final_value_type ) ;
2011-07-02 08:25:22 +08:00
# endif //VERBOSE_FORMATPROMPT_OUTPUT
2011-07-08 10:51:01 +08:00
break ;
2011-07-06 10:13:41 +08:00
}
2011-07-08 10:51:01 +08:00
# ifdef VERBOSE_FORMATPROMPT_OUTPUT
else
{
printf ( " ALL RIGHT: unparsed portion = %s, why stopping = %d, "
" final_value_type %d \n " ,
first_unparsed , reason_to_stop , final_value_type ) ;
}
# endif //VERBOSE_FORMATPROMPT_OUTPUT
2011-07-06 12:07:21 +08:00
}
else
2011-07-06 10:13:41 +08:00
break ;
2011-07-08 10:51:01 +08:00
is_array_range = ( final_value_type = = ValueObject : : eBoundedRange | |
final_value_type = = ValueObject : : eUnboundedRange ) ;
do_deref_pointer = ( what_next = = ValueObject : : eDereference ) ;
2011-07-06 12:07:21 +08:00
2011-07-07 03:27:11 +08:00
if ( do_deref_pointer & & ! is_array_range )
2011-07-06 10:13:41 +08:00
{
2011-07-06 12:07:21 +08:00
// I have not deref-ed yet, let's do it
// this happens when we are not going through GetValueForVariableExpressionPath
// to get to the target ValueObject
Error error ;
target = target - > Dereference ( error ) . get ( ) ;
IFERROR_PRINT_IT
do_deref_pointer = false ;
2011-07-06 10:13:41 +08:00
}
2011-07-06 12:07:21 +08:00
if ( ! is_array_range )
var_success = target - > DumpPrintableRepresentation ( s , val_obj_display , custom_format ) ;
else
2011-07-06 10:13:41 +08:00
{
2011-07-08 10:51:01 +08:00
bool is_array = ClangASTContext : : IsArrayType ( target - > GetClangType ( ) ) ;
bool is_pointer = ClangASTContext : : IsPointerType ( target - > GetClangType ( ) ) ;
2011-07-06 10:13:41 +08:00
2011-07-06 12:07:21 +08:00
if ( ! is_array & & ! is_pointer )
break ;
2011-07-08 10:51:01 +08:00
const char * special_directions = NULL ;
StreamString special_directions_writer ;
2011-07-06 12:07:21 +08:00
if ( close_bracket_position & & ( var_name_end - close_bracket_position > 1 ) )
{
2011-07-08 10:51:01 +08:00
ConstString additional_data ;
additional_data . SetCStringWithLength ( close_bracket_position + 1 , var_name_end - close_bracket_position - 1 ) ;
special_directions_writer . Printf ( " ${%svar%s} " ,
do_deref_pointer ? " * " : " " ,
additional_data . GetCString ( ) ) ;
special_directions = special_directions_writer . GetData ( ) ;
2011-07-06 12:07:21 +08:00
}
2011-07-06 10:13:41 +08:00
2011-07-06 12:07:21 +08:00
// let us display items index_lower thru index_higher of this array
s . PutChar ( ' [ ' ) ;
var_success = true ;
if ( index_higher < 0 )
index_higher = vobj - > GetNumChildren ( ) - 1 ;
for ( ; index_lower < = index_higher ; index_lower + + )
{
2011-07-08 10:51:01 +08:00
ValueObject * item = ExpandIndexedExpression ( target ,
2011-07-06 12:07:21 +08:00
index_lower ,
exe_ctx - > frame ,
2011-07-08 10:51:01 +08:00
false ) . get ( ) ;
2011-07-06 12:07:21 +08:00
2011-07-08 10:51:01 +08:00
if ( ! item )
{
# ifdef VERBOSE_FORMATPROMPT_OUTPUT
printf ( " ERROR \n " ) ;
# endif //VERBOSE_FORMATPROMPT_OUTPUT
}
# ifdef VERBOSE_FORMATPROMPT_OUTPUT
else
{
printf ( " special_directions: %s \n " , special_directions ) ;
}
# endif //VERBOSE_FORMATPROMPT_OUTPUT
2011-07-06 12:07:21 +08:00
if ( ! special_directions )
var_success & = item - > DumpPrintableRepresentation ( s , val_obj_display , custom_format ) ;
else
var_success & = FormatPrompt ( special_directions , sc , exe_ctx , addr , s , NULL , item ) ;
if ( index_lower < index_higher )
s . PutChar ( ' , ' ) ;
}
s . PutChar ( ' ] ' ) ;
2011-07-06 10:13:41 +08:00
}
2011-06-30 06:27:15 +08:00
}
2011-07-06 10:13:41 +08:00
break ;
2010-09-19 10:33:57 +08:00
case ' a ' :
if ( : : strncmp ( var_name_begin , " addr} " , strlen ( " addr} " ) ) = = 0 )
{
if ( addr & & addr - > IsValid ( ) )
{
var_success = true ;
format_addr = * addr ;
}
}
break ;
case ' p ' :
if ( : : strncmp ( var_name_begin , " process. " , strlen ( " process. " ) ) = = 0 )
{
if ( exe_ctx & & exe_ctx - > process ! = NULL )
{
var_name_begin + = : : strlen ( " process. " ) ;
if ( : : strncmp ( var_name_begin , " id} " , strlen ( " id} " ) ) = = 0 )
{
s . Printf ( " %i " , exe_ctx - > process - > GetID ( ) ) ;
var_success = true ;
}
else if ( ( : : strncmp ( var_name_begin , " name} " , strlen ( " name} " ) ) = = 0 ) | |
( : : strncmp ( var_name_begin , " file.basename} " , strlen ( " file.basename} " ) ) = = 0 ) | |
( : : strncmp ( var_name_begin , " file.fullpath} " , strlen ( " file.fullpath} " ) ) = = 0 ) )
{
ModuleSP exe_module_sp ( exe_ctx - > process - > GetTarget ( ) . GetExecutableModule ( ) ) ;
if ( exe_module_sp )
{
if ( var_name_begin [ 0 ] = = ' n ' | | var_name_begin [ 5 ] = = ' f ' )
{
format_file_spec . GetFilename ( ) = exe_module_sp - > GetFileSpec ( ) . GetFilename ( ) ;
var_success = format_file_spec ;
}
else
{
format_file_spec = exe_module_sp - > GetFileSpec ( ) ;
var_success = format_file_spec ;
}
}
}
}
}
break ;
case ' t ' :
if ( : : strncmp ( var_name_begin , " thread. " , strlen ( " thread. " ) ) = = 0 )
{
if ( exe_ctx & & exe_ctx - > thread )
{
var_name_begin + = : : strlen ( " thread. " ) ;
if ( : : strncmp ( var_name_begin , " id} " , strlen ( " id} " ) ) = = 0 )
{
s . Printf ( " 0x%4.4x " , exe_ctx - > thread - > GetID ( ) ) ;
var_success = true ;
}
else if ( : : strncmp ( var_name_begin , " index} " , strlen ( " index} " ) ) = = 0 )
{
s . Printf ( " %u " , exe_ctx - > thread - > GetIndexID ( ) ) ;
var_success = true ;
}
else if ( : : strncmp ( var_name_begin , " name} " , strlen ( " name} " ) ) = = 0 )
{
cstr = exe_ctx - > thread - > GetName ( ) ;
var_success = cstr & & cstr [ 0 ] ;
if ( var_success )
s . PutCString ( cstr ) ;
}
else if ( : : strncmp ( var_name_begin , " queue} " , strlen ( " queue} " ) ) = = 0 )
{
cstr = exe_ctx - > thread - > GetQueueName ( ) ;
var_success = cstr & & cstr [ 0 ] ;
if ( var_success )
s . PutCString ( cstr ) ;
}
else if ( : : strncmp ( var_name_begin , " stop-reason} " , strlen ( " stop-reason} " ) ) = = 0 )
{
2010-10-20 08:39:53 +08:00
StopInfoSP stop_info_sp = exe_ctx - > thread - > GetStopInfo ( ) ;
if ( stop_info_sp )
2010-09-19 10:33:57 +08:00
{
2010-10-20 08:39:53 +08:00
cstr = stop_info_sp - > GetDescription ( ) ;
2010-09-19 10:33:57 +08:00
if ( cstr & & cstr [ 0 ] )
{
s . PutCString ( cstr ) ;
var_success = true ;
}
}
}
}
}
else if ( : : strncmp ( var_name_begin , " target. " , strlen ( " target. " ) ) = = 0 )
{
2010-10-04 09:05:56 +08:00
Target * target = Target : : GetTargetFromContexts ( exe_ctx , sc ) ;
if ( target )
2010-09-19 10:33:57 +08:00
{
var_name_begin + = : : strlen ( " target. " ) ;
if ( : : strncmp ( var_name_begin , " arch} " , strlen ( " arch} " ) ) = = 0 )
{
ArchSpec arch ( target - > GetArchitecture ( ) ) ;
if ( arch . IsValid ( ) )
{
2011-02-23 08:35:02 +08:00
s . PutCString ( arch . GetArchitectureName ( ) ) ;
2010-09-19 10:33:57 +08:00
var_success = true ;
}
}
}
}
break ;
case ' m ' :
if ( : : strncmp ( var_name_begin , " module. " , strlen ( " module. " ) ) = = 0 )
{
2010-10-04 09:05:56 +08:00
if ( sc & & sc - > module_sp . get ( ) )
2010-09-19 10:33:57 +08:00
{
2010-10-04 09:05:56 +08:00
Module * module = sc - > module_sp . get ( ) ;
2010-09-19 10:33:57 +08:00
var_name_begin + = : : strlen ( " module. " ) ;
if ( : : strncmp ( var_name_begin , " file. " , strlen ( " file. " ) ) = = 0 )
{
if ( module - > GetFileSpec ( ) )
{
var_name_begin + = : : strlen ( " file. " ) ;
if ( : : strncmp ( var_name_begin , " basename} " , strlen ( " basename} " ) ) = = 0 )
{
format_file_spec . GetFilename ( ) = module - > GetFileSpec ( ) . GetFilename ( ) ;
var_success = format_file_spec ;
}
else if ( : : strncmp ( var_name_begin , " fullpath} " , strlen ( " fullpath} " ) ) = = 0 )
{
format_file_spec = module - > GetFileSpec ( ) ;
var_success = format_file_spec ;
}
}
}
}
}
break ;
case ' f ' :
if ( : : strncmp ( var_name_begin , " file. " , strlen ( " file. " ) ) = = 0 )
{
if ( sc & & sc - > comp_unit ! = NULL )
{
var_name_begin + = : : strlen ( " file. " ) ;
if ( : : strncmp ( var_name_begin , " basename} " , strlen ( " basename} " ) ) = = 0 )
{
format_file_spec . GetFilename ( ) = sc - > comp_unit - > GetFilename ( ) ;
var_success = format_file_spec ;
}
else if ( : : strncmp ( var_name_begin , " fullpath} " , strlen ( " fullpath} " ) ) = = 0 )
{
format_file_spec = * sc - > comp_unit ;
var_success = format_file_spec ;
}
}
}
else if ( : : strncmp ( var_name_begin , " frame. " , strlen ( " frame. " ) ) = = 0 )
{
if ( exe_ctx & & exe_ctx - > frame )
{
var_name_begin + = : : strlen ( " frame. " ) ;
if ( : : strncmp ( var_name_begin , " index} " , strlen ( " index} " ) ) = = 0 )
{
s . Printf ( " %u " , exe_ctx - > frame - > GetFrameIndex ( ) ) ;
var_success = true ;
}
else if ( : : strncmp ( var_name_begin , " pc} " , strlen ( " pc} " ) ) = = 0 )
{
reg_kind = eRegisterKindGeneric ;
reg_num = LLDB_REGNUM_GENERIC_PC ;
var_success = true ;
}
else if ( : : strncmp ( var_name_begin , " sp} " , strlen ( " sp} " ) ) = = 0 )
{
reg_kind = eRegisterKindGeneric ;
reg_num = LLDB_REGNUM_GENERIC_SP ;
var_success = true ;
}
else if ( : : strncmp ( var_name_begin , " fp} " , strlen ( " fp} " ) ) = = 0 )
{
reg_kind = eRegisterKindGeneric ;
reg_num = LLDB_REGNUM_GENERIC_FP ;
var_success = true ;
}
else if ( : : strncmp ( var_name_begin , " flags} " , strlen ( " flags} " ) ) = = 0 )
{
reg_kind = eRegisterKindGeneric ;
reg_num = LLDB_REGNUM_GENERIC_FLAGS ;
var_success = true ;
}
else if ( : : strncmp ( var_name_begin , " reg. " , strlen ( " reg. " ) ) = = 0 )
{
2011-01-07 06:15:06 +08:00
reg_ctx = exe_ctx - > frame - > GetRegisterContext ( ) . get ( ) ;
2010-09-19 10:33:57 +08:00
if ( reg_ctx )
{
var_name_begin + = : : strlen ( " reg. " ) ;
if ( var_name_begin < var_name_end )
{
std : : string reg_name ( var_name_begin , var_name_end ) ;
reg_info = reg_ctx - > GetRegisterInfoByName ( reg_name . c_str ( ) ) ;
if ( reg_info )
var_success = true ;
}
}
}
}
}
else if ( : : strncmp ( var_name_begin , " function. " , strlen ( " function. " ) ) = = 0 )
{
if ( sc & & ( sc - > function ! = NULL | | sc - > symbol ! = NULL ) )
{
var_name_begin + = : : strlen ( " function. " ) ;
if ( : : strncmp ( var_name_begin , " id} " , strlen ( " id} " ) ) = = 0 )
{
if ( sc - > function )
s . Printf ( " function{0x%8.8x} " , sc - > function - > GetID ( ) ) ;
else
s . Printf ( " symbol[%u] " , sc - > symbol - > GetID ( ) ) ;
var_success = true ;
}
else if ( : : strncmp ( var_name_begin , " name} " , strlen ( " name} " ) ) = = 0 )
{
if ( sc - > function )
cstr = sc - > function - > GetName ( ) . AsCString ( NULL ) ;
else if ( sc - > symbol )
cstr = sc - > symbol - > GetName ( ) . AsCString ( NULL ) ;
if ( cstr )
{
s . PutCString ( cstr ) ;
2010-10-05 01:26:49 +08:00
if ( sc - > block )
{
Block * inline_block = sc - > block - > GetContainingInlinedBlock ( ) ;
if ( inline_block )
{
const InlineFunctionInfo * inline_info = sc - > block - > GetInlinedFunctionInfo ( ) ;
if ( inline_info )
{
s . PutCString ( " [inlined] " ) ;
inline_info - > GetName ( ) . Dump ( & s ) ;
}
}
}
2010-09-19 10:33:57 +08:00
var_success = true ;
}
}
else if ( : : strncmp ( var_name_begin , " addr-offset} " , strlen ( " addr-offset} " ) ) = = 0 )
{
var_success = addr ! = NULL ;
if ( var_success )
{
format_addr = * addr ;
calculate_format_addr_function_offset = true ;
}
}
else if ( : : strncmp ( var_name_begin , " line-offset} " , strlen ( " line-offset} " ) ) = = 0 )
{
var_success = sc - > line_entry . range . GetBaseAddress ( ) . IsValid ( ) ;
if ( var_success )
{
format_addr = sc - > line_entry . range . GetBaseAddress ( ) ;
calculate_format_addr_function_offset = true ;
}
}
else if ( : : strncmp ( var_name_begin , " pc-offset} " , strlen ( " pc-offset} " ) ) = = 0 )
{
var_success = exe_ctx - > frame ;
if ( var_success )
{
format_addr = exe_ctx - > frame - > GetFrameCodeAddress ( ) ;
calculate_format_addr_function_offset = true ;
}
}
}
}
break ;
case ' l ' :
if ( : : strncmp ( var_name_begin , " line. " , strlen ( " line. " ) ) = = 0 )
{
if ( sc & & sc - > line_entry . IsValid ( ) )
{
var_name_begin + = : : strlen ( " line. " ) ;
if ( : : strncmp ( var_name_begin , " file. " , strlen ( " file. " ) ) = = 0 )
{
var_name_begin + = : : strlen ( " file. " ) ;
if ( : : strncmp ( var_name_begin , " basename} " , strlen ( " basename} " ) ) = = 0 )
{
format_file_spec . GetFilename ( ) = sc - > line_entry . file . GetFilename ( ) ;
var_success = format_file_spec ;
}
else if ( : : strncmp ( var_name_begin , " fullpath} " , strlen ( " fullpath} " ) ) = = 0 )
{
format_file_spec = sc - > line_entry . file ;
var_success = format_file_spec ;
}
}
else if ( : : strncmp ( var_name_begin , " number} " , strlen ( " number} " ) ) = = 0 )
{
var_success = true ;
s . Printf ( " %u " , sc - > line_entry . line ) ;
}
else if ( ( : : strncmp ( var_name_begin , " start-addr} " , strlen ( " start-addr} " ) ) = = 0 ) | |
( : : strncmp ( var_name_begin , " end-addr} " , strlen ( " end-addr} " ) ) = = 0 ) )
{
var_success = sc & & sc - > line_entry . range . GetBaseAddress ( ) . IsValid ( ) ;
if ( var_success )
{
format_addr = sc - > line_entry . range . GetBaseAddress ( ) ;
if ( var_name_begin [ 0 ] = = ' e ' )
format_addr . Slide ( sc - > line_entry . range . GetByteSize ( ) ) ;
}
}
}
}
break ;
}
if ( var_success )
{
// If format addr is valid, then we need to print an address
if ( reg_num ! = LLDB_INVALID_REGNUM )
{
// We have a register value to display...
if ( reg_num = = LLDB_REGNUM_GENERIC_PC & & reg_kind = = eRegisterKindGeneric )
{
format_addr = exe_ctx - > frame - > GetFrameCodeAddress ( ) ;
}
else
{
if ( reg_ctx = = NULL )
2011-01-07 06:15:06 +08:00
reg_ctx = exe_ctx - > frame - > GetRegisterContext ( ) . get ( ) ;
2010-09-19 10:33:57 +08:00
if ( reg_ctx )
{
if ( reg_kind ! = kNumRegisterKinds )
reg_num = reg_ctx - > ConvertRegisterKindToRegisterNumber ( reg_kind , reg_num ) ;
reg_info = reg_ctx - > GetRegisterInfoAtIndex ( reg_num ) ;
var_success = reg_info ! = NULL ;
}
}
}
if ( reg_info ! = NULL )
{
2011-05-10 04:18:18 +08:00
RegisterValue reg_value ;
var_success = reg_ctx - > ReadRegister ( reg_info , reg_value ) ;
if ( var_success )
2010-09-19 10:33:57 +08:00
{
2011-05-15 12:12:07 +08:00
reg_value . Dump ( & s , reg_info , false , false , eFormatDefault ) ;
2010-09-19 10:33:57 +08:00
}
}
if ( format_file_spec )
{
s < < format_file_spec ;
}
// If format addr is valid, then we need to print an address
if ( format_addr . IsValid ( ) )
{
2010-10-04 09:05:56 +08:00
var_success = false ;
2010-09-19 10:33:57 +08:00
if ( calculate_format_addr_function_offset )
{
Address func_addr ;
2010-10-04 09:05:56 +08:00
if ( sc )
{
if ( sc - > function )
2010-10-05 01:26:49 +08:00
{
2010-10-04 09:05:56 +08:00
func_addr = sc - > function - > GetAddressRange ( ) . GetBaseAddress ( ) ;
2010-10-05 01:26:49 +08:00
if ( sc - > block )
{
// Check to make sure we aren't in an inline
// function. If we are, use the inline block
// range that contains "format_addr" since
// blocks can be discontiguous.
Block * inline_block = sc - > block - > GetContainingInlinedBlock ( ) ;
AddressRange inline_range ;
if ( inline_block & & inline_block - > GetRangeContainingAddress ( format_addr , inline_range ) )
func_addr = inline_range . GetBaseAddress ( ) ;
}
}
2010-10-04 09:05:56 +08:00
else if ( sc - > symbol & & sc - > symbol - > GetAddressRangePtr ( ) )
func_addr = sc - > symbol - > GetAddressRangePtr ( ) - > GetBaseAddress ( ) ;
}
if ( func_addr . IsValid ( ) )
2010-09-19 10:33:57 +08:00
{
if ( func_addr . GetSection ( ) = = format_addr . GetSection ( ) )
{
addr_t func_file_addr = func_addr . GetFileAddress ( ) ;
addr_t addr_file_addr = format_addr . GetFileAddress ( ) ;
if ( addr_file_addr > func_file_addr )
s . Printf ( " + %llu " , addr_file_addr - func_file_addr ) ;
else if ( addr_file_addr < func_file_addr )
s . Printf ( " - %llu " , func_file_addr - addr_file_addr ) ;
2010-10-04 09:05:56 +08:00
var_success = true ;
2010-09-19 10:33:57 +08:00
}
else
2010-10-04 09:05:56 +08:00
{
Target * target = Target : : GetTargetFromContexts ( exe_ctx , sc ) ;
if ( target )
{
addr_t func_load_addr = func_addr . GetLoadAddress ( target ) ;
addr_t addr_load_addr = format_addr . GetLoadAddress ( target ) ;
if ( addr_load_addr > func_load_addr )
s . Printf ( " + %llu " , addr_load_addr - func_load_addr ) ;
else if ( addr_load_addr < func_load_addr )
s . Printf ( " - %llu " , func_load_addr - addr_load_addr ) ;
var_success = true ;
}
}
2010-09-19 10:33:57 +08:00
}
}
else
{
2010-10-04 09:05:56 +08:00
Target * target = Target : : GetTargetFromContexts ( exe_ctx , sc ) ;
2010-09-19 10:33:57 +08:00
addr_t vaddr = LLDB_INVALID_ADDRESS ;
2010-10-04 09:05:56 +08:00
if ( exe_ctx & & ! target - > GetSectionLoadList ( ) . IsEmpty ( ) )
vaddr = format_addr . GetLoadAddress ( target ) ;
2010-09-19 10:33:57 +08:00
if ( vaddr = = LLDB_INVALID_ADDRESS )
vaddr = format_addr . GetFileAddress ( ) ;
if ( vaddr ! = LLDB_INVALID_ADDRESS )
2010-10-04 09:05:56 +08:00
{
2011-02-16 05:59:32 +08:00
int addr_width = target - > GetArchitecture ( ) . GetAddressByteSize ( ) * 2 ;
2010-11-19 12:16:11 +08:00
if ( addr_width = = 0 )
addr_width = 16 ;
s . Printf ( " 0x%*.*llx " , addr_width , addr_width , vaddr ) ;
2010-10-04 09:05:56 +08:00
var_success = true ;
}
2010-09-19 10:33:57 +08:00
}
}
}
if ( var_success = = false )
success = false ;
}
p = var_name_end ;
}
else
break ;
}
else
{
// We got a dollar sign with no '{' after it, it must just be a dollar sign
s . PutChar ( * p ) ;
}
}
else if ( * p = = ' \\ ' )
{
+ + p ; // skip the slash
switch ( * p )
{
case ' a ' : s . PutChar ( ' \a ' ) ; break ;
case ' b ' : s . PutChar ( ' \b ' ) ; break ;
case ' f ' : s . PutChar ( ' \f ' ) ; break ;
case ' n ' : s . PutChar ( ' \n ' ) ; break ;
case ' r ' : s . PutChar ( ' \r ' ) ; break ;
case ' t ' : s . PutChar ( ' \t ' ) ; break ;
case ' v ' : s . PutChar ( ' \v ' ) ; break ;
case ' \' ' : s . PutChar ( ' \' ' ) ; break ;
case ' \\ ' : s . PutChar ( ' \\ ' ) ; break ;
case ' 0 ' :
// 1 to 3 octal chars
{
2010-10-04 09:05:56 +08:00
// Make a string that can hold onto the initial zero char,
// up to 3 octal digits, and a terminating NULL.
char oct_str [ 5 ] = { 0 , 0 , 0 , 0 , 0 } ;
int i ;
for ( i = 0 ; ( p [ i ] > = ' 0 ' & & p [ i ] < = ' 7 ' ) & & i < 4 ; + + i )
oct_str [ i ] = p [ i ] ;
// We don't want to consume the last octal character since
// the main for loop will do this for us, so we advance p by
// one less than i (even if i is zero)
p + = i - 1 ;
unsigned long octal_value = : : strtoul ( oct_str , NULL , 8 ) ;
if ( octal_value < = UINT8_MAX )
2010-09-19 10:33:57 +08:00
{
2010-10-04 09:05:56 +08:00
char octal_char = octal_value ;
s . Write ( & octal_char , 1 ) ;
2010-09-19 10:33:57 +08:00
}
}
break ;
case ' x ' :
// hex number in the format
2010-10-04 09:05:56 +08:00
if ( isxdigit ( p [ 1 ] ) )
2010-09-19 10:33:57 +08:00
{
2010-10-04 09:05:56 +08:00
+ + p ; // Skip the 'x'
2010-09-19 10:33:57 +08:00
2010-10-04 09:05:56 +08:00
// Make a string that can hold onto two hex chars plus a
// NULL terminator
char hex_str [ 3 ] = { 0 , 0 , 0 } ;
hex_str [ 0 ] = * p ;
if ( isxdigit ( p [ 1 ] ) )
2010-09-19 10:33:57 +08:00
{
2010-10-04 09:05:56 +08:00
+ + p ; // Skip the first of the two hex chars
hex_str [ 1 ] = * p ;
2010-09-19 10:33:57 +08:00
}
2010-10-04 09:05:56 +08:00
unsigned long hex_value = strtoul ( hex_str , NULL , 16 ) ;
if ( hex_value < = UINT8_MAX )
s . PutChar ( hex_value ) ;
}
else
{
s . PutChar ( ' x ' ) ;
2010-09-19 10:33:57 +08:00
}
break ;
default :
2010-10-04 09:05:56 +08:00
// Just desensitize any other character by just printing what
// came after the '\'
s < < * p ;
2010-09-19 10:33:57 +08:00
break ;
}
}
}
if ( end )
* end = p ;
return success ;
}
2011-06-24 01:59:56 +08:00
static FormatManager &
GetFormatManager ( ) {
static FormatManager g_format_manager ;
return g_format_manager ;
}
bool
2011-06-30 06:27:15 +08:00
Debugger : : ValueFormats : : Get ( ValueObject & vobj , ValueFormat : : SharedPointer & entry )
{
return GetFormatManager ( ) . Value ( ) . Get ( vobj , entry ) ;
}
void
Debugger : : ValueFormats : : Add ( const ConstString & type , const ValueFormat : : SharedPointer & entry )
{
GetFormatManager ( ) . Value ( ) . Add ( type . AsCString ( ) , entry ) ;
}
bool
Debugger : : ValueFormats : : Delete ( const ConstString & type )
{
return GetFormatManager ( ) . Value ( ) . Delete ( type . AsCString ( ) ) ;
}
void
Debugger : : ValueFormats : : Clear ( )
{
GetFormatManager ( ) . Value ( ) . Clear ( ) ;
}
void
2011-07-02 08:25:22 +08:00
Debugger : : ValueFormats : : LoopThrough ( ValueFormat : : ValueCallback callback , void * callback_baton )
2011-06-30 06:27:15 +08:00
{
GetFormatManager ( ) . Value ( ) . LoopThrough ( callback , callback_baton ) ;
}
uint32_t
Debugger : : ValueFormats : : GetCurrentRevision ( )
{
return GetFormatManager ( ) . GetCurrentRevision ( ) ;
}
2011-07-02 08:25:22 +08:00
uint32_t
Debugger : : ValueFormats : : GetCount ( )
{
return GetFormatManager ( ) . Value ( ) . GetCount ( ) ;
}
2011-06-30 06:27:15 +08:00
bool
Debugger : : SummaryFormats : : Get ( ValueObject & vobj , SummaryFormat : : SharedPointer & entry )
2011-06-24 01:59:56 +08:00
{
2011-06-30 06:27:15 +08:00
return GetFormatManager ( ) . Summary ( ) . Get ( vobj , entry ) ;
2011-06-24 01:59:56 +08:00
}
void
2011-06-30 06:27:15 +08:00
Debugger : : SummaryFormats : : Add ( const ConstString & type , const SummaryFormat : : SharedPointer & entry )
2011-06-24 01:59:56 +08:00
{
2011-06-30 06:27:15 +08:00
GetFormatManager ( ) . Summary ( ) . Add ( type . AsCString ( ) , entry ) ;
2011-06-24 01:59:56 +08:00
}
bool
2011-06-30 06:27:15 +08:00
Debugger : : SummaryFormats : : Delete ( const ConstString & type )
{
return GetFormatManager ( ) . Summary ( ) . Delete ( type . AsCString ( ) ) ;
}
void
Debugger : : SummaryFormats : : Clear ( )
2011-06-24 01:59:56 +08:00
{
2011-06-30 06:27:15 +08:00
GetFormatManager ( ) . Summary ( ) . Clear ( ) ;
2011-06-24 01:59:56 +08:00
}
void
2011-07-02 08:25:22 +08:00
Debugger : : SummaryFormats : : LoopThrough ( SummaryFormat : : SummaryCallback callback , void * callback_baton )
2011-06-30 06:27:15 +08:00
{
GetFormatManager ( ) . Summary ( ) . LoopThrough ( callback , callback_baton ) ;
}
uint32_t
Debugger : : SummaryFormats : : GetCurrentRevision ( )
2011-06-24 01:59:56 +08:00
{
2011-06-30 06:27:15 +08:00
return GetFormatManager ( ) . GetCurrentRevision ( ) ;
2011-06-24 01:59:56 +08:00
}
2011-07-02 08:25:22 +08:00
uint32_t
Debugger : : SummaryFormats : : GetCount ( )
{
return GetFormatManager ( ) . Summary ( ) . GetCount ( ) ;
}
bool
Debugger : : RegexSummaryFormats : : Get ( ValueObject & vobj , SummaryFormat : : SharedPointer & entry )
{
return GetFormatManager ( ) . RegexSummary ( ) . Get ( vobj , entry ) ;
}
void
Debugger : : RegexSummaryFormats : : Add ( const lldb : : RegularExpressionSP & type , const SummaryFormat : : SharedPointer & entry )
{
GetFormatManager ( ) . RegexSummary ( ) . Add ( type , entry ) ;
}
bool
Debugger : : RegexSummaryFormats : : Delete ( const ConstString & type )
{
return GetFormatManager ( ) . RegexSummary ( ) . Delete ( type . AsCString ( ) ) ;
}
void
Debugger : : RegexSummaryFormats : : Clear ( )
{
GetFormatManager ( ) . RegexSummary ( ) . Clear ( ) ;
}
void
Debugger : : RegexSummaryFormats : : LoopThrough ( SummaryFormat : : RegexSummaryCallback callback , void * callback_baton )
{
GetFormatManager ( ) . RegexSummary ( ) . LoopThrough ( callback , callback_baton ) ;
}
uint32_t
Debugger : : RegexSummaryFormats : : GetCurrentRevision ( )
{
return GetFormatManager ( ) . GetCurrentRevision ( ) ;
}
uint32_t
Debugger : : RegexSummaryFormats : : GetCount ( )
{
return GetFormatManager ( ) . RegexSummary ( ) . GetCount ( ) ;
}
2010-09-19 10:33:57 +08:00
# pragma mark Debugger::SettingsController
2010-09-04 08:03:46 +08:00
//--------------------------------------------------
2010-09-19 10:33:57 +08:00
// class Debugger::SettingsController
2010-09-04 08:03:46 +08:00
//--------------------------------------------------
2010-09-19 10:33:57 +08:00
Debugger : : SettingsController : : SettingsController ( ) :
2010-09-09 14:25:08 +08:00
UserSettingsController ( " " , lldb : : UserSettingsControllerSP ( ) )
2010-09-04 08:03:46 +08:00
{
2010-09-09 01:48:55 +08:00
m_default_settings . reset ( new DebuggerInstanceSettings ( * this , false ,
InstanceSettings : : GetDefaultName ( ) . AsCString ( ) ) ) ;
2010-09-04 08:03:46 +08:00
}
2010-09-19 10:33:57 +08:00
Debugger : : SettingsController : : ~ SettingsController ( )
2010-09-04 08:03:46 +08:00
{
}
lldb : : InstanceSettingsSP
2010-09-19 10:33:57 +08:00
Debugger : : SettingsController : : CreateInstanceSettings ( const char * instance_name )
2010-09-04 08:03:46 +08:00
{
2010-11-19 11:46:01 +08:00
DebuggerInstanceSettings * new_settings = new DebuggerInstanceSettings ( * GetSettingsController ( ) ,
2010-09-09 01:48:55 +08:00
false , instance_name ) ;
2010-09-04 08:03:46 +08:00
lldb : : InstanceSettingsSP new_settings_sp ( new_settings ) ;
return new_settings_sp ;
}
2010-09-19 10:33:57 +08:00
# pragma mark DebuggerInstanceSettings
2010-09-04 08:03:46 +08:00
//--------------------------------------------------
// class DebuggerInstanceSettings
//--------------------------------------------------
2010-09-18 09:14:36 +08:00
DebuggerInstanceSettings : : DebuggerInstanceSettings
(
UserSettingsController & owner ,
bool live_instance ,
const char * name
) :
2010-12-04 08:10:17 +08:00
InstanceSettings ( owner , name ? name : InstanceSettings : : InvalidName ( ) . AsCString ( ) , live_instance ) ,
2010-09-18 09:14:36 +08:00
m_term_width ( 80 ) ,
2010-09-04 08:03:46 +08:00
m_prompt ( ) ,
2010-10-04 09:05:56 +08:00
m_frame_format ( ) ,
m_thread_format ( ) ,
2010-09-21 04:44:43 +08:00
m_script_lang ( ) ,
2010-10-05 06:44:14 +08:00
m_use_external_editor ( false ) ,
m_auto_confirm_on ( false )
2010-09-04 08:03:46 +08:00
{
2010-09-10 02:26:37 +08:00
// CopyInstanceSettings is a pure virtual function in InstanceSettings; it therefore cannot be called
// until the vtables for DebuggerInstanceSettings are properly set up, i.e. AFTER all the initializers.
// For this reason it has to be called here, rather than in the initializer or in the parent constructor.
2010-09-17 03:05:55 +08:00
// The same is true of CreateInstanceName().
if ( GetInstanceName ( ) = = InstanceSettings : : InvalidName ( ) )
{
ChangeInstanceName ( std : : string ( CreateInstanceName ( ) . AsCString ( ) ) ) ;
m_owner . RegisterInstanceSettings ( this ) ;
}
2010-09-10 02:26:37 +08:00
if ( live_instance )
2010-09-04 08:03:46 +08:00
{
const lldb : : InstanceSettingsSP & pending_settings = m_owner . FindPendingSettings ( m_instance_name ) ;
CopyInstanceSettings ( pending_settings , false ) ;
}
}
DebuggerInstanceSettings : : DebuggerInstanceSettings ( const DebuggerInstanceSettings & rhs ) :
2010-11-19 07:32:35 +08:00
InstanceSettings ( * Debugger : : GetSettingsController ( ) , CreateInstanceName ( ) . AsCString ( ) ) ,
2010-09-04 08:03:46 +08:00
m_prompt ( rhs . m_prompt ) ,
2010-10-04 09:05:56 +08:00
m_frame_format ( rhs . m_frame_format ) ,
m_thread_format ( rhs . m_thread_format ) ,
2010-09-21 04:44:43 +08:00
m_script_lang ( rhs . m_script_lang ) ,
2010-10-05 06:44:14 +08:00
m_use_external_editor ( rhs . m_use_external_editor ) ,
m_auto_confirm_on ( rhs . m_auto_confirm_on )
2010-09-04 08:03:46 +08:00
{
const lldb : : InstanceSettingsSP & pending_settings = m_owner . FindPendingSettings ( m_instance_name ) ;
CopyInstanceSettings ( pending_settings , false ) ;
m_owner . RemovePendingSettings ( m_instance_name ) ;
}
DebuggerInstanceSettings : : ~ DebuggerInstanceSettings ( )
{
}
DebuggerInstanceSettings &
DebuggerInstanceSettings : : operator = ( const DebuggerInstanceSettings & rhs )
{
if ( this ! = & rhs )
{
2010-09-19 10:33:57 +08:00
m_term_width = rhs . m_term_width ;
2010-09-04 08:03:46 +08:00
m_prompt = rhs . m_prompt ;
2010-10-04 09:05:56 +08:00
m_frame_format = rhs . m_frame_format ;
m_thread_format = rhs . m_thread_format ;
2010-09-04 08:03:46 +08:00
m_script_lang = rhs . m_script_lang ;
2010-09-21 04:44:43 +08:00
m_use_external_editor = rhs . m_use_external_editor ;
2010-10-05 06:44:14 +08:00
m_auto_confirm_on = rhs . m_auto_confirm_on ;
2010-09-04 08:03:46 +08:00
}
return * this ;
}
2010-09-19 10:33:57 +08:00
bool
DebuggerInstanceSettings : : ValidTermWidthValue ( const char * value , Error err )
{
bool valid = false ;
// Verify we have a value string.
if ( value = = NULL | | value [ 0 ] = = ' \0 ' )
{
err . SetErrorString ( " Missing value. Can't set terminal width without a value. \n " ) ;
}
else
{
char * end = NULL ;
const uint32_t width = : : strtoul ( value , & end , 0 ) ;
2010-09-21 00:36:43 +08:00
if ( end & & end [ 0 ] = = ' \0 ' )
2010-09-19 10:33:57 +08:00
{
2010-09-21 01:04:41 +08:00
if ( width > = 10 & & width < = 1024 )
2010-09-19 10:33:57 +08:00
valid = true ;
else
err . SetErrorString ( " Invalid term-width value; value must be between 10 and 1024. \n " ) ;
}
else
err . SetErrorStringWithFormat ( " '%s' is not a valid unsigned integer string. \n " , value ) ;
}
return valid ;
}
2010-09-04 08:03:46 +08:00
void
DebuggerInstanceSettings : : UpdateInstanceSettingsVariable ( const ConstString & var_name ,
const char * index_value ,
const char * value ,
const ConstString & instance_name ,
const SettingEntry & entry ,
2011-03-25 05:19:54 +08:00
VarSetOperationType op ,
2010-09-04 08:03:46 +08:00
Error & err ,
bool pending )
{
2010-10-04 09:05:56 +08:00
if ( var_name = = TermWidthVarName ( ) )
{
if ( ValidTermWidthValue ( value , err ) )
{
m_term_width = : : strtoul ( value , NULL , 0 ) ;
}
}
else if ( var_name = = PromptVarName ( ) )
2010-09-04 08:03:46 +08:00
{
2010-09-09 14:25:08 +08:00
UserSettingsController : : UpdateStringVariable ( op , m_prompt , value , err ) ;
2010-09-04 08:03:46 +08:00
if ( ! pending )
{
2010-09-08 02:35:40 +08:00
// 'instance_name' is actually (probably) in the form '[<instance_name>]'; if so, we need to
// strip off the brackets before passing it to BroadcastPromptChange.
std : : string tmp_instance_name ( instance_name . AsCString ( ) ) ;
if ( ( tmp_instance_name [ 0 ] = = ' [ ' )
& & ( tmp_instance_name [ instance_name . GetLength ( ) - 1 ] = = ' ] ' ) )
tmp_instance_name = tmp_instance_name . substr ( 1 , instance_name . GetLength ( ) - 2 ) ;
ConstString new_name ( tmp_instance_name . c_str ( ) ) ;
BroadcastPromptChange ( new_name , m_prompt . c_str ( ) ) ;
2010-09-04 08:03:46 +08:00
}
}
2010-10-04 09:05:56 +08:00
else if ( var_name = = GetFrameFormatName ( ) )
{
UserSettingsController : : UpdateStringVariable ( op , m_frame_format , value , err ) ;
}
else if ( var_name = = GetThreadFormatName ( ) )
{
UserSettingsController : : UpdateStringVariable ( op , m_thread_format , value , err ) ;
}
2010-09-04 08:03:46 +08:00
else if ( var_name = = ScriptLangVarName ( ) )
{
bool success ;
m_script_lang = Args : : StringToScriptLanguage ( value , eScriptLanguageDefault ,
& success ) ;
}
2010-09-21 04:44:43 +08:00
else if ( var_name = = UseExternalEditorVarName ( ) )
{
2011-04-22 11:55:06 +08:00
UserSettingsController : : UpdateBooleanVariable ( op , m_use_external_editor , value , false , err ) ;
2010-09-21 04:44:43 +08:00
}
2010-10-05 06:44:14 +08:00
else if ( var_name = = AutoConfirmName ( ) )
{
2011-04-22 11:55:06 +08:00
UserSettingsController : : UpdateBooleanVariable ( op , m_auto_confirm_on , value , false , err ) ;
2010-10-05 06:44:14 +08:00
}
2010-09-04 08:03:46 +08:00
}
2010-09-21 05:37:42 +08:00
bool
2010-09-04 08:03:46 +08:00
DebuggerInstanceSettings : : GetInstanceSettingsValue ( const SettingEntry & entry ,
const ConstString & var_name ,
2010-09-21 04:44:43 +08:00
StringList & value ,
2010-09-21 05:37:42 +08:00
Error * err )
2010-09-04 08:03:46 +08:00
{
if ( var_name = = PromptVarName ( ) )
{
2010-10-04 09:05:56 +08:00
value . AppendString ( m_prompt . c_str ( ) , m_prompt . size ( ) ) ;
2010-09-04 08:03:46 +08:00
}
else if ( var_name = = ScriptLangVarName ( ) )
{
value . AppendString ( ScriptInterpreter : : LanguageToString ( m_script_lang ) . c_str ( ) ) ;
}
2010-09-09 14:25:08 +08:00
else if ( var_name = = TermWidthVarName ( ) )
{
StreamString width_str ;
width_str . Printf ( " %d " , m_term_width ) ;
value . AppendString ( width_str . GetData ( ) ) ;
}
2010-10-04 09:05:56 +08:00
else if ( var_name = = GetFrameFormatName ( ) )
{
value . AppendString ( m_frame_format . c_str ( ) , m_frame_format . size ( ) ) ;
}
else if ( var_name = = GetThreadFormatName ( ) )
{
value . AppendString ( m_thread_format . c_str ( ) , m_thread_format . size ( ) ) ;
}
2010-09-21 04:44:43 +08:00
else if ( var_name = = UseExternalEditorVarName ( ) )
{
if ( m_use_external_editor )
value . AppendString ( " true " ) ;
else
value . AppendString ( " false " ) ;
}
2010-10-05 06:44:14 +08:00
else if ( var_name = = AutoConfirmName ( ) )
{
if ( m_auto_confirm_on )
value . AppendString ( " true " ) ;
else
value . AppendString ( " false " ) ;
}
2010-09-21 04:44:43 +08:00
else
2010-09-21 05:37:42 +08:00
{
if ( err )
err - > SetErrorStringWithFormat ( " unrecognized variable name '%s' " , var_name . AsCString ( ) ) ;
return false ;
}
return true ;
2010-09-04 08:03:46 +08:00
}
void
DebuggerInstanceSettings : : CopyInstanceSettings ( const lldb : : InstanceSettingsSP & new_settings ,
bool pending )
{
if ( new_settings . get ( ) = = NULL )
return ;
DebuggerInstanceSettings * new_debugger_settings = ( DebuggerInstanceSettings * ) new_settings . get ( ) ;
m_prompt = new_debugger_settings - > m_prompt ;
if ( ! pending )
2010-09-08 02:35:40 +08:00
{
// 'instance_name' is actually (probably) in the form '[<instance_name>]'; if so, we need to
// strip off the brackets before passing it to BroadcastPromptChange.
std : : string tmp_instance_name ( m_instance_name . AsCString ( ) ) ;
if ( ( tmp_instance_name [ 0 ] = = ' [ ' )
& & ( tmp_instance_name [ m_instance_name . GetLength ( ) - 1 ] = = ' ] ' ) )
tmp_instance_name = tmp_instance_name . substr ( 1 , m_instance_name . GetLength ( ) - 2 ) ;
ConstString new_name ( tmp_instance_name . c_str ( ) ) ;
BroadcastPromptChange ( new_name , m_prompt . c_str ( ) ) ;
}
2010-10-04 09:05:56 +08:00
m_frame_format = new_debugger_settings - > m_frame_format ;
m_thread_format = new_debugger_settings - > m_thread_format ;
2010-09-21 04:44:43 +08:00
m_term_width = new_debugger_settings - > m_term_width ;
2010-09-04 08:03:46 +08:00
m_script_lang = new_debugger_settings - > m_script_lang ;
2010-09-21 04:44:43 +08:00
m_use_external_editor = new_debugger_settings - > m_use_external_editor ;
2010-10-05 06:44:14 +08:00
m_auto_confirm_on = new_debugger_settings - > m_auto_confirm_on ;
2010-09-04 08:03:46 +08:00
}
bool
DebuggerInstanceSettings : : BroadcastPromptChange ( const ConstString & instance_name , const char * new_prompt )
{
std : : string tmp_prompt ;
if ( new_prompt ! = NULL )
{
tmp_prompt = new_prompt ;
int len = tmp_prompt . size ( ) ;
if ( len > 1
& & ( tmp_prompt [ 0 ] = = ' \' ' | | tmp_prompt [ 0 ] = = ' " ' )
& & ( tmp_prompt [ len - 1 ] = = tmp_prompt [ 0 ] ) )
{
tmp_prompt = tmp_prompt . substr ( 1 , len - 2 ) ;
}
len = tmp_prompt . size ( ) ;
if ( tmp_prompt [ len - 1 ] ! = ' ' )
tmp_prompt . append ( " " ) ;
}
EventSP new_event_sp ;
new_event_sp . reset ( new Event ( CommandInterpreter : : eBroadcastBitResetPrompt ,
new EventDataBytes ( tmp_prompt . c_str ( ) ) ) ) ;
if ( instance_name . GetLength ( ) ! = 0 )
{
// Set prompt for a particular instance.
Debugger * dbg = Debugger : : FindDebuggerWithInstanceName ( instance_name ) . get ( ) ;
if ( dbg ! = NULL )
{
dbg - > GetCommandInterpreter ( ) . BroadcastEvent ( new_event_sp ) ;
}
}
return true ;
}
const ConstString
DebuggerInstanceSettings : : CreateInstanceName ( )
{
static int instance_count = 1 ;
StreamString sstr ;
sstr . Printf ( " debugger_%d " , instance_count ) ;
+ + instance_count ;
const ConstString ret_val ( sstr . GetData ( ) ) ;
return ret_val ;
}
const ConstString &
DebuggerInstanceSettings : : PromptVarName ( )
{
static ConstString prompt_var_name ( " prompt " ) ;
return prompt_var_name ;
}
2010-10-04 09:05:56 +08:00
const ConstString &
DebuggerInstanceSettings : : GetFrameFormatName ( )
{
static ConstString prompt_var_name ( " frame-format " ) ;
return prompt_var_name ;
}
const ConstString &
DebuggerInstanceSettings : : GetThreadFormatName ( )
{
static ConstString prompt_var_name ( " thread-format " ) ;
return prompt_var_name ;
}
2010-09-04 08:03:46 +08:00
const ConstString &
DebuggerInstanceSettings : : ScriptLangVarName ( )
{
static ConstString script_lang_var_name ( " script-lang " ) ;
return script_lang_var_name ;
}
2010-09-09 14:25:08 +08:00
const ConstString &
DebuggerInstanceSettings : : TermWidthVarName ( )
{
static ConstString term_width_var_name ( " term-width " ) ;
return term_width_var_name ;
}
2010-09-21 04:44:43 +08:00
const ConstString &
DebuggerInstanceSettings : : UseExternalEditorVarName ( )
{
static ConstString use_external_editor_var_name ( " use-external-editor " ) ;
return use_external_editor_var_name ;
}
2010-10-05 06:44:14 +08:00
const ConstString &
DebuggerInstanceSettings : : AutoConfirmName ( )
{
static ConstString use_external_editor_var_name ( " auto-confirm " ) ;
return use_external_editor_var_name ;
}
2010-09-04 08:03:46 +08:00
//--------------------------------------------------
2010-09-19 10:33:57 +08:00
// SettingsController Variable Tables
2010-09-04 08:03:46 +08:00
//--------------------------------------------------
SettingEntry
2010-09-19 10:33:57 +08:00
Debugger : : SettingsController : : global_settings_table [ ] =
2010-09-04 08:03:46 +08:00
{
//{ "var-name", var-type, "default", enum-table, init'd, hidden, "help-text"},
2010-09-09 14:25:08 +08:00
// The Debugger level global table should always be empty; all Debugger settable variables should be instance
// variables.
2010-09-04 08:03:46 +08:00
{ NULL , eSetVarTypeNone , NULL , NULL , 0 , 0 , NULL }
} ;
2010-10-04 10:44:26 +08:00
# define MODULE_WITH_FUNC "{ ${module.file.basename}{`${function.name}${function.pc-offset}}}"
2010-10-04 09:05:56 +08:00
# define FILE_AND_LINE "{ at ${line.file.basename}:${line.number}}"
2010-09-04 08:03:46 +08:00
2010-10-04 09:05:56 +08:00
# define DEFAULT_THREAD_FORMAT "thread #${thread.index}: tid = ${thread.id}"\
" {, ${frame.pc}} " \
MODULE_WITH_FUNC \
2010-10-05 01:04:23 +08:00
FILE_AND_LINE \
2010-10-04 09:05:56 +08:00
" {, stop reason = ${thread.stop-reason}} " \
" \\ n "
2010-11-02 09:53:21 +08:00
/ / # define DEFAULT_THREAD_FORMAT " thread #${thread.index}: tid = ${thread.id} " \
/ / " {, ${frame.pc}} " \
/ / MODULE_WITH_FUNC \
/ / FILE_AND_LINE \
/ / " {, stop reason = ${thread.stop-reason}} " \
/ / " {, name = ${thread.name}} " \
/ / " {, queue = ${thread.queue}} " \
// "\\n"
2010-10-04 09:05:56 +08:00
# define DEFAULT_FRAME_FORMAT "frame #${frame.index}: ${frame.pc}"\
MODULE_WITH_FUNC \
FILE_AND_LINE \
" \\ n "
2010-09-04 08:03:46 +08:00
SettingEntry
2010-09-19 10:33:57 +08:00
Debugger : : SettingsController : : instance_settings_table [ ] =
2010-09-04 08:03:46 +08:00
{
2010-10-04 09:05:56 +08:00
// NAME Setting variable type Default Enum Init'd Hidden Help
// ======================= ======================= ====================== ==== ====== ====== ======================
{ " frame-format " , eSetVarTypeString , DEFAULT_FRAME_FORMAT , NULL , false , false , " The default frame format string to use when displaying thread information. " } ,
2010-10-23 05:15:00 +08:00
{ " prompt " , eSetVarTypeString , " (lldb) " , NULL , false , false , " The debugger command line prompt displayed for the user. " } ,
2010-10-05 06:44:14 +08:00
{ " script-lang " , eSetVarTypeString , " python " , NULL , false , false , " The script language to be used for evaluating user-written scripts. " } ,
{ " term-width " , eSetVarTypeInt , " 80 " , NULL , false , false , " The maximum number of columns to use for displaying text. " } ,
2010-10-04 09:05:56 +08:00
{ " thread-format " , eSetVarTypeString , DEFAULT_THREAD_FORMAT , NULL , false , false , " The default thread format string to use when displaying thread information. " } ,
2010-11-12 03:26:09 +08:00
{ " use-external-editor " , eSetVarTypeBoolean , " false " , NULL , false , false , " Whether to use an external editor or not. " } ,
{ " auto-confirm " , eSetVarTypeBoolean , " false " , NULL , false , false , " If true all confirmation prompts will receive their default reply. " } ,
2010-10-04 09:05:56 +08:00
{ NULL , eSetVarTypeNone , NULL , NULL , false , false , NULL }
2010-09-04 08:03:46 +08:00
} ;