2011-03-24 12:28:38 +08:00
//===-- PlatformDarwin.cpp --------------------------------------*- C++ -*-===//
//
// The LLVM Compiler Infrastructure
//
// This file is distributed under the University of Illinois Open Source
// License. See LICENSE.TXT for details.
//
//===----------------------------------------------------------------------===//
2012-12-05 08:20:57 +08:00
# include "lldb/lldb-python.h"
2011-03-24 12:28:38 +08:00
# include "PlatformDarwin.h"
// C Includes
// C++ Includes
// Other libraries and framework includes
// Project includes
# include "lldb/Breakpoint/BreakpointLocation.h"
2011-04-12 13:54:46 +08:00
# include "lldb/Core/Debugger.h"
2011-03-24 12:28:38 +08:00
# include "lldb/Core/Error.h"
2013-08-27 07:57:52 +08:00
# include "lldb/Core/Log.h"
<rdar://problem/11757916>
Make breakpoint setting by file and line much more efficient by only looking for inlined breakpoint locations if we are setting a breakpoint in anything but a source implementation file. Implementing this complex for a many reasons. Turns out that parsing compile units lazily had some issues with respect to how we need to do things with DWARF in .o files. So the fixes in the checkin for this makes these changes:
- Add a new setting called "target.inline-breakpoint-strategy" which can be set to "never", "always", or "headers". "never" will never try and set any inlined breakpoints (fastest). "always" always looks for inlined breakpoint locations (slowest, but most accurate). "headers", which is the default setting, will only look for inlined breakpoint locations if the breakpoint is set in what are consudered to be header files, which is realy defined as "not in an implementation source file".
- modify the breakpoint setting by file and line to check the current "target.inline-breakpoint-strategy" setting and act accordingly
- Modify compile units to be able to get their language and other info lazily. This allows us to create compile units from the debug map and not have to fill all of the details in, and then lazily discover this information as we go on debuggging. This is needed to avoid parsing all .o files when setting breakpoints in implementation only files (no inlines). Otherwise we would need to parse the .o file, the object file (mach-o in our case) and the symbol file (DWARF in the object file) just to see what the compile unit was.
- modify the "SymbolFileDWARFDebugMap" to subclass lldb_private::Module so that the virtual "GetObjectFile()" and "GetSymbolVendor()" functions can be intercepted when the .o file contenst are later lazilly needed. Prior to this fix, when we first instantiated the "SymbolFileDWARFDebugMap" class, we would also make modules, object files and symbol files for every .o file in the debug map because we needed to fix up the sections in the .o files with information that is in the executable debug map. Now we lazily do this in the DebugMapModule::GetObjectFile()
Cleaned up header includes a bit as well.
llvm-svn: 162860
2012-08-30 05:13:06 +08:00
# include "lldb/Core/Module.h"
# include "lldb/Core/ModuleSpec.h"
2012-11-08 10:22:02 +08:00
# include "lldb/Core/Timer.h"
2011-03-24 12:28:38 +08:00
# include "lldb/Host/Host.h"
2012-09-12 10:03:59 +08:00
# include "lldb/Host/Symbols.h"
<rdar://problem/11757916>
Make breakpoint setting by file and line much more efficient by only looking for inlined breakpoint locations if we are setting a breakpoint in anything but a source implementation file. Implementing this complex for a many reasons. Turns out that parsing compile units lazily had some issues with respect to how we need to do things with DWARF in .o files. So the fixes in the checkin for this makes these changes:
- Add a new setting called "target.inline-breakpoint-strategy" which can be set to "never", "always", or "headers". "never" will never try and set any inlined breakpoints (fastest). "always" always looks for inlined breakpoint locations (slowest, but most accurate). "headers", which is the default setting, will only look for inlined breakpoint locations if the breakpoint is set in what are consudered to be header files, which is realy defined as "not in an implementation source file".
- modify the breakpoint setting by file and line to check the current "target.inline-breakpoint-strategy" setting and act accordingly
- Modify compile units to be able to get their language and other info lazily. This allows us to create compile units from the debug map and not have to fill all of the details in, and then lazily discover this information as we go on debuggging. This is needed to avoid parsing all .o files when setting breakpoints in implementation only files (no inlines). Otherwise we would need to parse the .o file, the object file (mach-o in our case) and the symbol file (DWARF in the object file) just to see what the compile unit was.
- modify the "SymbolFileDWARFDebugMap" to subclass lldb_private::Module so that the virtual "GetObjectFile()" and "GetSymbolVendor()" functions can be intercepted when the .o file contenst are later lazilly needed. Prior to this fix, when we first instantiated the "SymbolFileDWARFDebugMap" class, we would also make modules, object files and symbol files for every .o file in the debug map because we needed to fix up the sections in the .o files with information that is in the executable debug map. Now we lazily do this in the DebugMapModule::GetObjectFile()
Cleaned up header includes a bit as well.
llvm-svn: 162860
2012-08-30 05:13:06 +08:00
# include "lldb/Symbol/ObjectFile.h"
2013-01-12 07:44:27 +08:00
# include "lldb/Symbol/SymbolFile.h"
# include "lldb/Symbol/SymbolVendor.h"
2011-03-24 12:28:38 +08:00
# include "lldb/Target/Target.h"
using namespace lldb ;
using namespace lldb_private ;
//------------------------------------------------------------------
/// Default Constructor
//------------------------------------------------------------------
PlatformDarwin : : PlatformDarwin ( bool is_host ) :
2013-08-27 07:57:52 +08:00
PlatformPOSIX ( is_host ) , // This is the local host platform
2012-02-25 14:56:35 +08:00
m_developer_directory ( )
2011-03-24 12:28:38 +08:00
{
}
//------------------------------------------------------------------
/// Destructor.
///
/// The destructor is virtual since this class is designed to be
/// inherited from by the plug-in instance.
//------------------------------------------------------------------
PlatformDarwin : : ~ PlatformDarwin ( )
{
}
2013-01-12 07:44:27 +08:00
FileSpecList
PlatformDarwin : : LocateExecutableScriptingResources ( Target * target ,
Module & module )
2012-11-08 10:22:02 +08:00
{
2013-01-12 07:44:27 +08:00
FileSpecList file_list ;
if ( target & & target - > GetDebugger ( ) . GetScriptLanguage ( ) = = eScriptLanguagePython )
2012-11-08 10:22:02 +08:00
{
2013-01-12 07:44:27 +08:00
// NB some extensions might be meaningful and should not be stripped - "this.binary.file"
// should not lose ".file" but GetFileNameStrippingExtension() will do precisely that.
// Ideally, we should have a per-platform list of extensions (".exe", ".app", ".dSYM", ".framework")
// which should be stripped while leaving "this.binary.file" as-is.
2013-01-12 09:36:05 +08:00
FileSpec module_spec = module . GetFileSpec ( ) ;
2013-01-12 07:44:27 +08:00
2013-01-12 09:36:05 +08:00
if ( module_spec )
{
2013-01-12 07:44:27 +08:00
SymbolVendor * symbols = module . GetSymbolVendor ( ) ;
if ( symbols )
{
SymbolFile * symfile = symbols - > GetSymbolFile ( ) ;
if ( symfile )
{
ObjectFile * objfile = symfile - > GetObjectFile ( ) ;
if ( objfile )
{
FileSpec symfile_spec ( objfile - > GetFileSpec ( ) ) ;
if ( symfile_spec & & symfile_spec . Exists ( ) )
{
2013-01-12 09:36:05 +08:00
while ( module_spec . GetFilename ( ) )
{
std : : string module_basename ( module_spec . GetFilename ( ) . GetCString ( ) ) ;
// FIXME: for Python, we cannot allow certain characters in module
// filenames we import. Theoretically, different scripting languages may
// have different sets of forbidden tokens in filenames, and that should
// be dealt with by each ScriptInterpreter. For now, we just replace dots
// with underscores, but if we ever support anything other than Python
// we will need to rework this
std : : replace ( module_basename . begin ( ) , module_basename . end ( ) , ' . ' , ' _ ' ) ;
std : : replace ( module_basename . begin ( ) , module_basename . end ( ) , ' ' , ' _ ' ) ;
std : : replace ( module_basename . begin ( ) , module_basename . end ( ) , ' - ' , ' _ ' ) ;
StreamString path_string ;
// for OSX we are going to be in .dSYM/Contents/Resources/DWARF/<basename>
// let us go to .dSYM/Contents/Resources/Python/<basename>.py and see if the file exists
path_string . Printf ( " %s/../Python/%s.py " , symfile_spec . GetDirectory ( ) . GetCString ( ) , module_basename . c_str ( ) ) ;
FileSpec script_fspec ( path_string . GetData ( ) , true ) ;
if ( script_fspec . Exists ( ) )
{
file_list . Append ( script_fspec ) ;
break ;
}
// If we didn't find the python file, then keep
// stripping the extensions and try again
ConstString filename_no_extension ( module_spec . GetFileNameStrippingExtension ( ) ) ;
if ( module_spec . GetFilename ( ) = = filename_no_extension )
break ;
module_spec . GetFilename ( ) = filename_no_extension ;
}
2013-01-12 07:44:27 +08:00
}
}
}
}
2012-11-08 10:44:10 +08:00
}
}
2013-01-12 07:44:27 +08:00
return file_list ;
2012-11-08 10:22:02 +08:00
}
2011-03-24 12:28:38 +08:00
Error
PlatformDarwin : : ResolveExecutable ( const FileSpec & exe_file ,
const ArchSpec & exe_arch ,
2012-02-14 07:10:39 +08:00
lldb : : ModuleSP & exe_module_sp ,
const FileSpecList * module_search_paths_ptr )
2011-03-24 12:28:38 +08:00
{
Error error ;
// Nothing special to do here, just use the actual file and architecture
2011-04-12 13:54:46 +08:00
char exe_path [ PATH_MAX ] ;
2011-03-24 12:28:38 +08:00
FileSpec resolved_exe_file ( exe_file ) ;
2011-04-12 13:54:46 +08:00
if ( IsHost ( ) )
{
// If we have "ls" as the exe_file, resolve the executable loation based on
// the current path variables
if ( ! resolved_exe_file . Exists ( ) )
{
exe_file . GetPath ( exe_path , sizeof ( exe_path ) ) ;
resolved_exe_file . SetFile ( exe_path , true ) ;
}
2011-03-24 12:28:38 +08:00
2011-04-12 13:54:46 +08:00
if ( ! resolved_exe_file . Exists ( ) )
resolved_exe_file . ResolveExecutableLocation ( ) ;
2011-03-24 12:28:38 +08:00
2011-04-12 13:54:46 +08:00
// Resolve any executable within a bundle on MacOSX
Host : : ResolveExecutableInBundle ( resolved_exe_file ) ;
if ( resolved_exe_file . Exists ( ) )
error . Clear ( ) ;
else
{
2013-04-04 08:07:32 +08:00
exe_file . GetPath ( exe_path , sizeof ( exe_path ) ) ;
error . SetErrorStringWithFormat ( " unable to find executable for '%s' " , exe_path ) ;
2011-04-12 13:54:46 +08:00
}
}
else
{
if ( m_remote_platform_sp )
{
error = m_remote_platform_sp - > ResolveExecutable ( exe_file ,
exe_arch ,
2012-02-14 07:10:39 +08:00
exe_module_sp ,
module_search_paths_ptr ) ;
2011-04-12 13:54:46 +08:00
}
else
2011-09-09 08:20:12 +08:00
{
// We may connect to a process and use the provided executable (Don't use local $PATH).
// Resolve any executable within a bundle on MacOSX
Host : : ResolveExecutableInBundle ( resolved_exe_file ) ;
if ( resolved_exe_file . Exists ( ) )
error . Clear ( ) ;
else
2011-09-20 08:26:08 +08:00
error . SetErrorStringWithFormat ( " the platform is not currently connected, and '%s' doesn't exist in the system root. " , resolved_exe_file . GetFilename ( ) . AsCString ( " " ) ) ;
2011-09-09 08:20:12 +08:00
}
2011-04-12 13:54:46 +08:00
}
if ( error . Success ( ) )
2011-03-24 12:28:38 +08:00
{
2012-02-26 13:51:37 +08:00
ModuleSpec module_spec ( resolved_exe_file , exe_arch ) ;
if ( module_spec . GetArchitecture ( ) . IsValid ( ) )
2011-03-24 12:28:38 +08:00
{
2012-02-26 13:51:37 +08:00
error = ModuleList : : GetSharedModule ( module_spec ,
2011-03-24 12:28:38 +08:00
exe_module_sp ,
2012-02-14 07:10:39 +08:00
module_search_paths_ptr ,
2011-03-24 12:28:38 +08:00
NULL ,
NULL ) ;
2012-02-21 13:25:28 +08:00
if ( error . Fail ( ) | | exe_module_sp . get ( ) = = NULL | | exe_module_sp - > GetObjectFile ( ) = = NULL )
2011-03-24 12:28:38 +08:00
{
exe_module_sp . reset ( ) ;
2013-04-30 01:25:54 +08:00
error . SetErrorStringWithFormat ( " '%s' doesn't contain the architecture %s " ,
exe_file . GetPath ( ) . c_str ( ) ,
2011-03-24 12:28:38 +08:00
exe_arch . GetArchitectureName ( ) ) ;
}
}
else
{
// No valid architecture was specified, ask the platform for
// the architectures that we should be using (in the correct order)
// and see if we can find a match that way
StreamString arch_names ;
2012-02-26 13:51:37 +08:00
for ( uint32_t idx = 0 ; GetSupportedArchitectureAtIndex ( idx , module_spec . GetArchitecture ( ) ) ; + + idx )
2011-03-24 12:28:38 +08:00
{
2013-08-27 07:57:52 +08:00
error = GetSharedModule ( module_spec ,
exe_module_sp ,
module_search_paths_ptr ,
NULL ,
NULL ) ;
2011-03-24 12:28:38 +08:00
// Did we find an executable using one of the
if ( error . Success ( ) )
{
if ( exe_module_sp & & exe_module_sp - > GetObjectFile ( ) )
break ;
else
error . SetErrorToGenericError ( ) ;
}
if ( idx > 0 )
arch_names . PutCString ( " , " ) ;
2012-02-26 13:51:37 +08:00
arch_names . PutCString ( module_spec . GetArchitecture ( ) . GetArchitectureName ( ) ) ;
2011-03-24 12:28:38 +08:00
}
if ( error . Fail ( ) | | ! exe_module_sp )
{
2013-04-30 01:25:54 +08:00
error . SetErrorStringWithFormat ( " '%s' doesn't contain any '%s' platform architectures: %s " ,
exe_file . GetPath ( ) . c_str ( ) ,
2013-05-11 05:47:16 +08:00
GetPluginName ( ) . GetCString ( ) ,
2011-03-24 12:28:38 +08:00
arch_names . GetString ( ) . c_str ( ) ) ;
}
}
}
return error ;
}
2012-09-12 10:03:59 +08:00
Error
PlatformDarwin : : ResolveSymbolFile ( Target & target ,
const ModuleSpec & sym_spec ,
FileSpec & sym_file )
{
Error error ;
sym_file = sym_spec . GetSymbolFileSpec ( ) ;
if ( sym_file . Exists ( ) )
{
if ( sym_file . GetFileType ( ) = = FileSpec : : eFileTypeDirectory )
{
sym_file = Symbols : : FindSymbolFileInBundle ( sym_file ,
sym_spec . GetUUIDPtr ( ) ,
sym_spec . GetArchitecturePtr ( ) ) ;
}
}
else
{
if ( sym_spec . GetUUID ( ) . IsValid ( ) )
{
}
}
return error ;
}
2013-08-27 07:57:52 +08:00
static lldb_private : : Error
MakeCacheFolderForFile ( const FileSpec & module_cache_spec )
{
FileSpec module_cache_folder = module_cache_spec . CopyByRemovingLastPathComponent ( ) ;
StreamString mkdir_folder_cmd ;
mkdir_folder_cmd . Printf ( " mkdir -p %s/%s " , module_cache_folder . GetDirectory ( ) . AsCString ( ) , module_cache_folder . GetFilename ( ) . AsCString ( ) ) ;
return Host : : RunShellCommand ( mkdir_folder_cmd . GetData ( ) ,
NULL ,
NULL ,
NULL ,
NULL ,
60 ) ;
}
static lldb_private : : Error
BringInRemoteFile ( Platform * platform ,
const lldb_private : : ModuleSpec & module_spec ,
const FileSpec & module_cache_spec )
{
MakeCacheFolderForFile ( module_cache_spec ) ;
Error err = platform - > GetFile ( module_spec . GetFileSpec ( ) , module_cache_spec ) ;
return err ;
}
lldb_private : : Error
PlatformDarwin : : GetSharedModuleWithLocalCache ( const lldb_private : : ModuleSpec & module_spec ,
lldb : : ModuleSP & module_sp ,
const lldb_private : : FileSpecList * module_search_paths_ptr ,
lldb : : ModuleSP * old_module_sp_ptr ,
bool * did_create_ptr )
{
Log * log ( GetLogIfAnyCategoriesSet ( LIBLLDB_LOG_PLATFORM ) ) ;
if ( log )
log - > Printf ( " [%s] Trying to find module %s/%s - platform path %s/%s symbol path %s/%s \n " ,
( IsHost ( ) ? " host " : " remote " ) ,
module_spec . GetFileSpec ( ) . GetDirectory ( ) . AsCString ( ) ,
module_spec . GetFileSpec ( ) . GetFilename ( ) . AsCString ( ) ,
module_spec . GetPlatformFileSpec ( ) . GetDirectory ( ) . AsCString ( ) ,
module_spec . GetPlatformFileSpec ( ) . GetFilename ( ) . AsCString ( ) ,
module_spec . GetSymbolFileSpec ( ) . GetDirectory ( ) . AsCString ( ) ,
module_spec . GetSymbolFileSpec ( ) . GetFilename ( ) . AsCString ( ) ) ;
std : : string cache_path ( GetLocalCacheDirectory ( ) ) ;
std : : string module_path ( module_spec . GetFileSpec ( ) . GetPath ( ) ) ;
cache_path . append ( module_path ) ;
FileSpec module_cache_spec ( cache_path . c_str ( ) , false ) ;
// if rsync is supported, always bring in the file - rsync will be very efficient
// when files are the same on the local and remote end of the connection
if ( this - > GetSupportsRSync ( ) )
{
Error err = BringInRemoteFile ( this , module_spec , module_cache_spec ) ;
if ( err . Fail ( ) )
return err ;
if ( module_cache_spec . Exists ( ) )
{
Log * log ( GetLogIfAnyCategoriesSet ( LIBLLDB_LOG_PLATFORM ) ) ;
if ( log )
log - > Printf ( " [%s] module %s/%s was rsynced and is now there \n " ,
( IsHost ( ) ? " host " : " remote " ) ,
module_spec . GetFileSpec ( ) . GetDirectory ( ) . AsCString ( ) ,
module_spec . GetFileSpec ( ) . GetFilename ( ) . AsCString ( ) ) ;
ModuleSpec local_spec ( module_cache_spec , module_spec . GetArchitecture ( ) ) ;
module_sp . reset ( new Module ( local_spec ) ) ;
module_sp - > SetPlatformFileSpec ( module_spec . GetFileSpec ( ) ) ;
return Error ( ) ;
}
}
2011-03-24 12:28:38 +08:00
2013-08-27 07:57:52 +08:00
if ( module_spec . GetFileSpec ( ) . Exists ( ) & & ! module_sp )
{
module_sp . reset ( new Module ( module_spec ) ) ;
return Error ( ) ;
}
// try to find the module in the cache
if ( module_cache_spec . Exists ( ) )
{
// get the local and remote MD5 and compare
{
// when going over the *slow* GDB remote transfer mechanism we first check
// the hashes of the files - and only do the actual transfer if they differ
uint64_t high_local , high_remote , low_local , low_remote ;
Host : : CalculateMD5 ( module_cache_spec , low_local , high_local ) ;
m_remote_platform_sp - > CalculateMD5 ( module_spec . GetFileSpec ( ) , low_remote , high_remote ) ;
if ( low_local ! = low_remote | | high_local ! = high_remote )
{
// bring in the remote file
Log * log ( GetLogIfAnyCategoriesSet ( LIBLLDB_LOG_PLATFORM ) ) ;
if ( log )
log - > Printf ( " [%s] module %s/%s needs to be replaced from remote copy \n " ,
( IsHost ( ) ? " host " : " remote " ) ,
module_spec . GetFileSpec ( ) . GetDirectory ( ) . AsCString ( ) ,
module_spec . GetFileSpec ( ) . GetFilename ( ) . AsCString ( ) ) ;
Error err = BringInRemoteFile ( this , module_spec , module_cache_spec ) ;
if ( err . Fail ( ) )
return err ;
}
}
ModuleSpec local_spec ( module_cache_spec , module_spec . GetArchitecture ( ) ) ;
module_sp . reset ( new Module ( local_spec ) ) ;
module_sp - > SetPlatformFileSpec ( module_spec . GetFileSpec ( ) ) ;
Log * log ( GetLogIfAnyCategoriesSet ( LIBLLDB_LOG_PLATFORM ) ) ;
if ( log )
log - > Printf ( " [%s] module %s/%s was found in the cache \n " ,
( IsHost ( ) ? " host " : " remote " ) ,
module_spec . GetFileSpec ( ) . GetDirectory ( ) . AsCString ( ) ,
module_spec . GetFileSpec ( ) . GetFilename ( ) . AsCString ( ) ) ;
return Error ( ) ;
}
// bring in the remote module file
if ( log )
log - > Printf ( " [%s] module %s/%s needs to come in remotely \n " ,
( IsHost ( ) ? " host " : " remote " ) ,
module_spec . GetFileSpec ( ) . GetDirectory ( ) . AsCString ( ) ,
module_spec . GetFileSpec ( ) . GetFilename ( ) . AsCString ( ) ) ;
Error err = BringInRemoteFile ( this , module_spec , module_cache_spec ) ;
if ( err . Fail ( ) )
return err ;
if ( module_cache_spec . Exists ( ) )
{
Log * log ( GetLogIfAnyCategoriesSet ( LIBLLDB_LOG_PLATFORM ) ) ;
if ( log )
log - > Printf ( " [%s] module %s/%s is now cached and fine \n " ,
( IsHost ( ) ? " host " : " remote " ) ,
module_spec . GetFileSpec ( ) . GetDirectory ( ) . AsCString ( ) ,
module_spec . GetFileSpec ( ) . GetFilename ( ) . AsCString ( ) ) ;
ModuleSpec local_spec ( module_cache_spec , module_spec . GetArchitecture ( ) ) ;
module_sp . reset ( new Module ( local_spec ) ) ;
module_sp - > SetPlatformFileSpec ( module_spec . GetFileSpec ( ) ) ;
return Error ( ) ;
}
else
return Error ( " unable to obtain valid module file " ) ;
}
2012-02-14 07:10:39 +08:00
Error
2012-02-26 13:51:37 +08:00
PlatformDarwin : : GetSharedModule ( const ModuleSpec & module_spec ,
2012-02-14 07:10:39 +08:00
ModuleSP & module_sp ,
const FileSpecList * module_search_paths_ptr ,
ModuleSP * old_module_sp_ptr ,
bool * did_create_ptr )
{
Error error ;
module_sp . reset ( ) ;
if ( IsRemote ( ) )
{
// If we have a remote platform always, let it try and locate
// the shared module first.
if ( m_remote_platform_sp )
{
2012-02-26 13:51:37 +08:00
error = m_remote_platform_sp - > GetSharedModule ( module_spec ,
2012-02-14 07:10:39 +08:00
module_sp ,
module_search_paths_ptr ,
old_module_sp_ptr ,
did_create_ptr ) ;
}
}
if ( ! module_sp )
{
// Fall back to the local platform and find the file locally
2012-02-26 13:51:37 +08:00
error = Platform : : GetSharedModule ( module_spec ,
2012-02-14 07:10:39 +08:00
module_sp ,
module_search_paths_ptr ,
old_module_sp_ptr ,
did_create_ptr ) ;
2012-02-26 13:51:37 +08:00
const FileSpec & platform_file = module_spec . GetFileSpec ( ) ;
2012-02-14 07:10:39 +08:00
if ( ! module_sp & & module_search_paths_ptr & & platform_file )
{
// We can try to pull off part of the file path up to the bundle
// directory level and try any module search paths...
FileSpec bundle_directory ;
if ( Host : : GetBundleDirectory ( platform_file , bundle_directory ) )
{
2013-02-15 05:09:56 +08:00
if ( platform_file = = bundle_directory )
2012-02-14 07:10:39 +08:00
{
2013-02-15 05:09:56 +08:00
ModuleSpec new_module_spec ( module_spec ) ;
new_module_spec . GetFileSpec ( ) = bundle_directory ;
if ( Host : : ResolveExecutableInBundle ( new_module_spec . GetFileSpec ( ) ) )
2012-02-14 07:10:39 +08:00
{
2013-02-15 05:09:56 +08:00
Error new_error ( Platform : : GetSharedModule ( new_module_spec ,
module_sp ,
NULL ,
old_module_sp_ptr ,
did_create_ptr ) ) ;
if ( module_sp )
return new_error ;
}
}
else
{
char platform_path [ PATH_MAX ] ;
char bundle_dir [ PATH_MAX ] ;
platform_file . GetPath ( platform_path , sizeof ( platform_path ) ) ;
const size_t bundle_directory_len = bundle_directory . GetPath ( bundle_dir , sizeof ( bundle_dir ) ) ;
char new_path [ PATH_MAX ] ;
size_t num_module_search_paths = module_search_paths_ptr - > GetSize ( ) ;
for ( size_t i = 0 ; i < num_module_search_paths ; + + i )
{
const size_t search_path_len = module_search_paths_ptr - > GetFileSpecAtIndex ( i ) . GetPath ( new_path , sizeof ( new_path ) ) ;
if ( search_path_len < sizeof ( new_path ) )
2012-02-14 07:10:39 +08:00
{
2013-02-15 05:09:56 +08:00
snprintf ( new_path + search_path_len , sizeof ( new_path ) - search_path_len , " /%s " , platform_path + bundle_directory_len ) ;
FileSpec new_file_spec ( new_path , false ) ;
if ( new_file_spec . Exists ( ) )
2012-02-14 07:10:39 +08:00
{
2013-02-15 05:09:56 +08:00
ModuleSpec new_module_spec ( module_spec ) ;
new_module_spec . GetFileSpec ( ) = new_file_spec ;
Error new_error ( Platform : : GetSharedModule ( new_module_spec ,
module_sp ,
NULL ,
old_module_sp_ptr ,
did_create_ptr ) ) ;
if ( module_sp )
{
module_sp - > SetPlatformFileSpec ( new_file_spec ) ;
return new_error ;
}
2012-02-14 07:10:39 +08:00
}
}
}
}
}
}
}
if ( module_sp )
2012-02-26 13:51:37 +08:00
module_sp - > SetPlatformFileSpec ( module_spec . GetFileSpec ( ) ) ;
2012-02-14 07:10:39 +08:00
return error ;
}
2011-03-24 12:28:38 +08:00
size_t
PlatformDarwin : : GetSoftwareBreakpointTrapOpcode ( Target & target , BreakpointSite * bp_site )
{
const uint8_t * trap_opcode = NULL ;
uint32_t trap_opcode_size = 0 ;
2011-04-08 06:46:35 +08:00
bool bp_is_thumb = false ;
2011-03-24 12:28:38 +08:00
llvm : : Triple : : ArchType machine = target . GetArchitecture ( ) . GetMachine ( ) ;
switch ( machine )
{
case llvm : : Triple : : x86 :
case llvm : : Triple : : x86_64 :
{
static const uint8_t g_i386_breakpoint_opcode [ ] = { 0xCC } ;
trap_opcode = g_i386_breakpoint_opcode ;
trap_opcode_size = sizeof ( g_i386_breakpoint_opcode ) ;
}
break ;
2011-04-08 06:46:35 +08:00
case llvm : : Triple : : thumb :
bp_is_thumb = true ; // Fall through...
2011-03-24 12:28:38 +08:00
case llvm : : Triple : : arm :
{
static const uint8_t g_arm_breakpoint_opcode [ ] = { 0xFE , 0xDE , 0xFF , 0xE7 } ;
static const uint8_t g_thumb_breakpooint_opcode [ ] = { 0xFE , 0xDE } ;
2011-04-08 06:46:35 +08:00
// Auto detect arm/thumb if it wasn't explicitly specified
if ( ! bp_is_thumb )
2011-03-24 12:28:38 +08:00
{
2011-04-08 06:46:35 +08:00
lldb : : BreakpointLocationSP bp_loc_sp ( bp_site - > GetOwnerAtIndex ( 0 ) ) ;
if ( bp_loc_sp )
bp_is_thumb = bp_loc_sp - > GetAddress ( ) . GetAddressClass ( ) = = eAddressClassCodeAlternateISA ;
}
if ( bp_is_thumb )
{
trap_opcode = g_thumb_breakpooint_opcode ;
trap_opcode_size = sizeof ( g_thumb_breakpooint_opcode ) ;
break ;
2011-03-24 12:28:38 +08:00
}
trap_opcode = g_arm_breakpoint_opcode ;
trap_opcode_size = sizeof ( g_arm_breakpoint_opcode ) ;
}
break ;
case llvm : : Triple : : ppc :
case llvm : : Triple : : ppc64 :
{
static const uint8_t g_ppc_breakpoint_opcode [ ] = { 0x7F , 0xC0 , 0x00 , 0x08 } ;
trap_opcode = g_ppc_breakpoint_opcode ;
trap_opcode_size = sizeof ( g_ppc_breakpoint_opcode ) ;
}
break ;
default :
2011-04-08 06:46:35 +08:00
assert ( ! " Unhandled architecture in PlatformDarwin::GetSoftwareBreakpointTrapOpcode() " ) ;
2011-03-24 12:28:38 +08:00
break ;
}
if ( trap_opcode & & trap_opcode_size )
{
if ( bp_site - > SetTrapOpcode ( trap_opcode , trap_opcode_size ) )
return trap_opcode_size ;
}
return 0 ;
}
bool
PlatformDarwin : : GetRemoteOSVersion ( )
{
if ( m_remote_platform_sp )
return m_remote_platform_sp - > GetOSVersion ( m_major_os_version ,
m_minor_os_version ,
m_update_os_version ) ;
return false ;
}
bool
PlatformDarwin : : GetRemoteOSBuildString ( std : : string & s )
{
if ( m_remote_platform_sp )
return m_remote_platform_sp - > GetRemoteOSBuildString ( s ) ;
s . clear ( ) ;
return false ;
}
bool
PlatformDarwin : : GetRemoteOSKernelDescription ( std : : string & s )
{
if ( m_remote_platform_sp )
return m_remote_platform_sp - > GetRemoteOSKernelDescription ( s ) ;
s . clear ( ) ;
return false ;
}
// Remote Platform subclasses need to override this function
ArchSpec
PlatformDarwin : : GetRemoteSystemArchitecture ( )
{
if ( m_remote_platform_sp )
return m_remote_platform_sp - > GetRemoteSystemArchitecture ( ) ;
return ArchSpec ( ) ;
}
const char *
Many improvements to the Platform base class and subclasses. The base Platform
class now implements the Host functionality for a lot of things that make
sense by default so that subclasses can check:
int
PlatformSubclass::Foo ()
{
if (IsHost())
return Platform::Foo (); // Let the platform base class do the host specific stuff
// Platform subclass specific code...
int result = ...
return result;
}
Added new functions to the platform:
virtual const char *Platform::GetUserName (uint32_t uid);
virtual const char *Platform::GetGroupName (uint32_t gid);
The user and group names are cached locally so that remote platforms can avoid
sending packets multiple times to resolve this information.
Added the parent process ID to the ProcessInfo class.
Added a new ProcessInfoMatch class which helps us to match processes up
and changed the Host layer over to using this new class. The new class allows
us to search for processs:
1 - by name (equal to, starts with, ends with, contains, and regex)
2 - by pid
3 - And further check for parent pid == value, uid == value, gid == value,
euid == value, egid == value, arch == value, parent == value.
This is all hookup up to the "platform process list" command which required
adding dumping routines to dump process information. If the Host class
implements the process lookup routines, you can now lists processes on
your local machine:
machine1.foo.com % lldb
(lldb) platform process list
PID PARENT USER GROUP EFF USER EFF GROUP TRIPLE NAME
====== ====== ========== ========== ========== ========== ======================== ============================
99538 1 username usergroup username usergroup x86_64-apple-darwin FileMerge
94943 1 username usergroup username usergroup x86_64-apple-darwin mdworker
94852 244 username usergroup username usergroup x86_64-apple-darwin Safari
94727 244 username usergroup username usergroup x86_64-apple-darwin Xcode
92742 92710 username usergroup username usergroup i386-apple-darwin debugserver
This of course also works remotely with the lldb-platform:
machine1.foo.com % lldb-platform --listen 1234
machine2.foo.com % lldb
(lldb) platform create remote-macosx
Platform: remote-macosx
Connected: no
(lldb) platform connect connect://localhost:1444
Platform: remote-macosx
Triple: x86_64-apple-darwin
OS Version: 10.6.7 (10J869)
Kernel: Darwin Kernel Version 10.7.0: Sat Jan 29 15:17:16 PST 2011; root:xnu-1504.9.37~1/RELEASE_I386
Hostname: machine1.foo.com
Connected: yes
(lldb) platform process list
PID PARENT USER GROUP EFF USER EFF GROUP TRIPLE NAME
====== ====== ========== ========== ========== ========== ======================== ============================
99556 244 username usergroup username usergroup x86_64-apple-darwin trustevaluation
99548 65539 username usergroup username usergroup x86_64-apple-darwin lldb
99538 1 username usergroup username usergroup x86_64-apple-darwin FileMerge
94943 1 username usergroup username usergroup x86_64-apple-darwin mdworker
94852 244 username usergroup username usergroup x86_64-apple-darwin Safari
The lldb-platform implements everything with the Host:: layer, so this should
"just work" for linux. I will probably be adding more stuff to the Host layer
for launching processes and attaching to processes so that this support should
eventually just work as well.
Modified the target to be able to be created with an architecture that differs
from the main executable. This is needed for iOS debugging since we can have
an "armv6" binary which can run on an "armv7" machine, so we want to be able
to do:
% lldb
(lldb) platform create remote-ios
(lldb) file --arch armv7 a.out
Where "a.out" is an armv6 executable. The platform then can correctly decide
to open all "armv7" images for all dependent shared libraries.
Modified the disassembly to show the current PC value. Example output:
(lldb) disassemble --frame
a.out`main:
0x1eb7: pushl %ebp
0x1eb8: movl %esp, %ebp
0x1eba: pushl %ebx
0x1ebb: subl $20, %esp
0x1ebe: calll 0x1ec3 ; main + 12 at test.c:18
0x1ec3: popl %ebx
-> 0x1ec4: calll 0x1f12 ; getpid
0x1ec9: movl %eax, 4(%esp)
0x1ecd: leal 199(%ebx), %eax
0x1ed3: movl %eax, (%esp)
0x1ed6: calll 0x1f18 ; printf
0x1edb: leal 213(%ebx), %eax
0x1ee1: movl %eax, (%esp)
0x1ee4: calll 0x1f1e ; puts
0x1ee9: calll 0x1f0c ; getchar
0x1eee: movl $20, (%esp)
0x1ef5: calll 0x1e6a ; sleep_loop at test.c:6
0x1efa: movl $12, %eax
0x1eff: addl $20, %esp
0x1f02: popl %ebx
0x1f03: leave
0x1f04: ret
This can be handy when dealing with the new --line options that was recently
added:
(lldb) disassemble --line
a.out`main + 13 at test.c:19
18 {
-> 19 printf("Process: %i\n\n", getpid());
20 puts("Press any key to continue..."); getchar();
-> 0x1ec4: calll 0x1f12 ; getpid
0x1ec9: movl %eax, 4(%esp)
0x1ecd: leal 199(%ebx), %eax
0x1ed3: movl %eax, (%esp)
0x1ed6: calll 0x1f18 ; printf
Modified the ModuleList to have a lookup based solely on a UUID. Since the
UUID is typically the MD5 checksum of a binary image, there is no need
to give the path and architecture when searching for a pre-existing
image in an image list.
Now that we support remote debugging a bit better, our lldb_private::Module
needs to be able to track what the original path for file was as the platform
knows it, as well as where the file is locally. The module has the two
following functions to retrieve both paths:
const FileSpec &Module::GetFileSpec () const;
const FileSpec &Module::GetPlatformFileSpec () const;
llvm-svn: 128563
2011-03-31 02:16:51 +08:00
PlatformDarwin : : GetHostname ( )
2011-03-24 12:28:38 +08:00
{
Many improvements to the Platform base class and subclasses. The base Platform
class now implements the Host functionality for a lot of things that make
sense by default so that subclasses can check:
int
PlatformSubclass::Foo ()
{
if (IsHost())
return Platform::Foo (); // Let the platform base class do the host specific stuff
// Platform subclass specific code...
int result = ...
return result;
}
Added new functions to the platform:
virtual const char *Platform::GetUserName (uint32_t uid);
virtual const char *Platform::GetGroupName (uint32_t gid);
The user and group names are cached locally so that remote platforms can avoid
sending packets multiple times to resolve this information.
Added the parent process ID to the ProcessInfo class.
Added a new ProcessInfoMatch class which helps us to match processes up
and changed the Host layer over to using this new class. The new class allows
us to search for processs:
1 - by name (equal to, starts with, ends with, contains, and regex)
2 - by pid
3 - And further check for parent pid == value, uid == value, gid == value,
euid == value, egid == value, arch == value, parent == value.
This is all hookup up to the "platform process list" command which required
adding dumping routines to dump process information. If the Host class
implements the process lookup routines, you can now lists processes on
your local machine:
machine1.foo.com % lldb
(lldb) platform process list
PID PARENT USER GROUP EFF USER EFF GROUP TRIPLE NAME
====== ====== ========== ========== ========== ========== ======================== ============================
99538 1 username usergroup username usergroup x86_64-apple-darwin FileMerge
94943 1 username usergroup username usergroup x86_64-apple-darwin mdworker
94852 244 username usergroup username usergroup x86_64-apple-darwin Safari
94727 244 username usergroup username usergroup x86_64-apple-darwin Xcode
92742 92710 username usergroup username usergroup i386-apple-darwin debugserver
This of course also works remotely with the lldb-platform:
machine1.foo.com % lldb-platform --listen 1234
machine2.foo.com % lldb
(lldb) platform create remote-macosx
Platform: remote-macosx
Connected: no
(lldb) platform connect connect://localhost:1444
Platform: remote-macosx
Triple: x86_64-apple-darwin
OS Version: 10.6.7 (10J869)
Kernel: Darwin Kernel Version 10.7.0: Sat Jan 29 15:17:16 PST 2011; root:xnu-1504.9.37~1/RELEASE_I386
Hostname: machine1.foo.com
Connected: yes
(lldb) platform process list
PID PARENT USER GROUP EFF USER EFF GROUP TRIPLE NAME
====== ====== ========== ========== ========== ========== ======================== ============================
99556 244 username usergroup username usergroup x86_64-apple-darwin trustevaluation
99548 65539 username usergroup username usergroup x86_64-apple-darwin lldb
99538 1 username usergroup username usergroup x86_64-apple-darwin FileMerge
94943 1 username usergroup username usergroup x86_64-apple-darwin mdworker
94852 244 username usergroup username usergroup x86_64-apple-darwin Safari
The lldb-platform implements everything with the Host:: layer, so this should
"just work" for linux. I will probably be adding more stuff to the Host layer
for launching processes and attaching to processes so that this support should
eventually just work as well.
Modified the target to be able to be created with an architecture that differs
from the main executable. This is needed for iOS debugging since we can have
an "armv6" binary which can run on an "armv7" machine, so we want to be able
to do:
% lldb
(lldb) platform create remote-ios
(lldb) file --arch armv7 a.out
Where "a.out" is an armv6 executable. The platform then can correctly decide
to open all "armv7" images for all dependent shared libraries.
Modified the disassembly to show the current PC value. Example output:
(lldb) disassemble --frame
a.out`main:
0x1eb7: pushl %ebp
0x1eb8: movl %esp, %ebp
0x1eba: pushl %ebx
0x1ebb: subl $20, %esp
0x1ebe: calll 0x1ec3 ; main + 12 at test.c:18
0x1ec3: popl %ebx
-> 0x1ec4: calll 0x1f12 ; getpid
0x1ec9: movl %eax, 4(%esp)
0x1ecd: leal 199(%ebx), %eax
0x1ed3: movl %eax, (%esp)
0x1ed6: calll 0x1f18 ; printf
0x1edb: leal 213(%ebx), %eax
0x1ee1: movl %eax, (%esp)
0x1ee4: calll 0x1f1e ; puts
0x1ee9: calll 0x1f0c ; getchar
0x1eee: movl $20, (%esp)
0x1ef5: calll 0x1e6a ; sleep_loop at test.c:6
0x1efa: movl $12, %eax
0x1eff: addl $20, %esp
0x1f02: popl %ebx
0x1f03: leave
0x1f04: ret
This can be handy when dealing with the new --line options that was recently
added:
(lldb) disassemble --line
a.out`main + 13 at test.c:19
18 {
-> 19 printf("Process: %i\n\n", getpid());
20 puts("Press any key to continue..."); getchar();
-> 0x1ec4: calll 0x1f12 ; getpid
0x1ec9: movl %eax, 4(%esp)
0x1ecd: leal 199(%ebx), %eax
0x1ed3: movl %eax, (%esp)
0x1ed6: calll 0x1f18 ; printf
Modified the ModuleList to have a lookup based solely on a UUID. Since the
UUID is typically the MD5 checksum of a binary image, there is no need
to give the path and architecture when searching for a pre-existing
image in an image list.
Now that we support remote debugging a bit better, our lldb_private::Module
needs to be able to track what the original path for file was as the platform
knows it, as well as where the file is locally. The module has the two
following functions to retrieve both paths:
const FileSpec &Module::GetFileSpec () const;
const FileSpec &Module::GetPlatformFileSpec () const;
llvm-svn: 128563
2011-03-31 02:16:51 +08:00
if ( IsHost ( ) )
return Platform : : GetHostname ( ) ;
2011-03-24 12:28:38 +08:00
if ( m_remote_platform_sp )
return m_remote_platform_sp - > GetHostname ( ) ;
return NULL ;
}
bool
PlatformDarwin : : IsConnected ( ) const
{
if ( IsHost ( ) )
return true ;
else if ( m_remote_platform_sp )
return m_remote_platform_sp - > IsConnected ( ) ;
return false ;
}
Error
PlatformDarwin : : ConnectRemote ( Args & args )
{
Error error ;
if ( IsHost ( ) )
{
2013-05-11 05:47:16 +08:00
error . SetErrorStringWithFormat ( " can't connect to the host platform '%s', always connected " , GetPluginName ( ) . GetCString ( ) ) ;
2011-03-24 12:28:38 +08:00
}
else
{
if ( ! m_remote_platform_sp )
m_remote_platform_sp = Platform : : Create ( " remote-gdb-server " , error ) ;
2013-08-27 07:57:52 +08:00
if ( m_remote_platform_sp & & error . Success ( ) )
error = m_remote_platform_sp - > ConnectRemote ( args ) ;
2011-03-24 12:28:38 +08:00
else
error . SetErrorString ( " failed to create a 'remote-gdb-server' platform " ) ;
if ( error . Fail ( ) )
m_remote_platform_sp . reset ( ) ;
}
2013-08-27 07:57:52 +08:00
if ( error . Success ( ) & & m_remote_platform_sp )
{
if ( m_options . get ( ) )
{
OptionGroupOptions * options = m_options . get ( ) ;
OptionGroupPlatformRSync * m_rsync_options = ( OptionGroupPlatformRSync * ) options - > GetGroupWithOption ( ' r ' ) ;
OptionGroupPlatformSSH * m_ssh_options = ( OptionGroupPlatformSSH * ) options - > GetGroupWithOption ( ' s ' ) ;
OptionGroupPlatformCaching * m_cache_options = ( OptionGroupPlatformCaching * ) options - > GetGroupWithOption ( ' c ' ) ;
if ( m_rsync_options - > m_rsync )
{
SetSupportsRSync ( true ) ;
SetRSyncOpts ( m_rsync_options - > m_rsync_opts . c_str ( ) ) ;
SetRSyncPrefix ( m_rsync_options - > m_rsync_prefix . c_str ( ) ) ;
SetIgnoresRemoteHostname ( m_rsync_options - > m_ignores_remote_hostname ) ;
}
if ( m_ssh_options - > m_ssh )
{
SetSupportsSSH ( true ) ;
SetSSHOpts ( m_ssh_options - > m_ssh_opts . c_str ( ) ) ;
}
SetLocalCacheDirectory ( m_cache_options - > m_cache_dir . c_str ( ) ) ;
}
}
2011-03-24 12:28:38 +08:00
return error ;
}
Error
PlatformDarwin : : DisconnectRemote ( )
{
Error error ;
if ( IsHost ( ) )
{
2013-05-11 05:47:16 +08:00
error . SetErrorStringWithFormat ( " can't disconnect from the host platform '%s', always connected " , GetPluginName ( ) . GetCString ( ) ) ;
2011-03-24 12:28:38 +08:00
}
else
{
if ( m_remote_platform_sp )
error = m_remote_platform_sp - > DisconnectRemote ( ) ;
else
error . SetErrorString ( " the platform is not currently connected " ) ;
}
return error ;
}
Many improvements to the Platform base class and subclasses. The base Platform
class now implements the Host functionality for a lot of things that make
sense by default so that subclasses can check:
int
PlatformSubclass::Foo ()
{
if (IsHost())
return Platform::Foo (); // Let the platform base class do the host specific stuff
// Platform subclass specific code...
int result = ...
return result;
}
Added new functions to the platform:
virtual const char *Platform::GetUserName (uint32_t uid);
virtual const char *Platform::GetGroupName (uint32_t gid);
The user and group names are cached locally so that remote platforms can avoid
sending packets multiple times to resolve this information.
Added the parent process ID to the ProcessInfo class.
Added a new ProcessInfoMatch class which helps us to match processes up
and changed the Host layer over to using this new class. The new class allows
us to search for processs:
1 - by name (equal to, starts with, ends with, contains, and regex)
2 - by pid
3 - And further check for parent pid == value, uid == value, gid == value,
euid == value, egid == value, arch == value, parent == value.
This is all hookup up to the "platform process list" command which required
adding dumping routines to dump process information. If the Host class
implements the process lookup routines, you can now lists processes on
your local machine:
machine1.foo.com % lldb
(lldb) platform process list
PID PARENT USER GROUP EFF USER EFF GROUP TRIPLE NAME
====== ====== ========== ========== ========== ========== ======================== ============================
99538 1 username usergroup username usergroup x86_64-apple-darwin FileMerge
94943 1 username usergroup username usergroup x86_64-apple-darwin mdworker
94852 244 username usergroup username usergroup x86_64-apple-darwin Safari
94727 244 username usergroup username usergroup x86_64-apple-darwin Xcode
92742 92710 username usergroup username usergroup i386-apple-darwin debugserver
This of course also works remotely with the lldb-platform:
machine1.foo.com % lldb-platform --listen 1234
machine2.foo.com % lldb
(lldb) platform create remote-macosx
Platform: remote-macosx
Connected: no
(lldb) platform connect connect://localhost:1444
Platform: remote-macosx
Triple: x86_64-apple-darwin
OS Version: 10.6.7 (10J869)
Kernel: Darwin Kernel Version 10.7.0: Sat Jan 29 15:17:16 PST 2011; root:xnu-1504.9.37~1/RELEASE_I386
Hostname: machine1.foo.com
Connected: yes
(lldb) platform process list
PID PARENT USER GROUP EFF USER EFF GROUP TRIPLE NAME
====== ====== ========== ========== ========== ========== ======================== ============================
99556 244 username usergroup username usergroup x86_64-apple-darwin trustevaluation
99548 65539 username usergroup username usergroup x86_64-apple-darwin lldb
99538 1 username usergroup username usergroup x86_64-apple-darwin FileMerge
94943 1 username usergroup username usergroup x86_64-apple-darwin mdworker
94852 244 username usergroup username usergroup x86_64-apple-darwin Safari
The lldb-platform implements everything with the Host:: layer, so this should
"just work" for linux. I will probably be adding more stuff to the Host layer
for launching processes and attaching to processes so that this support should
eventually just work as well.
Modified the target to be able to be created with an architecture that differs
from the main executable. This is needed for iOS debugging since we can have
an "armv6" binary which can run on an "armv7" machine, so we want to be able
to do:
% lldb
(lldb) platform create remote-ios
(lldb) file --arch armv7 a.out
Where "a.out" is an armv6 executable. The platform then can correctly decide
to open all "armv7" images for all dependent shared libraries.
Modified the disassembly to show the current PC value. Example output:
(lldb) disassemble --frame
a.out`main:
0x1eb7: pushl %ebp
0x1eb8: movl %esp, %ebp
0x1eba: pushl %ebx
0x1ebb: subl $20, %esp
0x1ebe: calll 0x1ec3 ; main + 12 at test.c:18
0x1ec3: popl %ebx
-> 0x1ec4: calll 0x1f12 ; getpid
0x1ec9: movl %eax, 4(%esp)
0x1ecd: leal 199(%ebx), %eax
0x1ed3: movl %eax, (%esp)
0x1ed6: calll 0x1f18 ; printf
0x1edb: leal 213(%ebx), %eax
0x1ee1: movl %eax, (%esp)
0x1ee4: calll 0x1f1e ; puts
0x1ee9: calll 0x1f0c ; getchar
0x1eee: movl $20, (%esp)
0x1ef5: calll 0x1e6a ; sleep_loop at test.c:6
0x1efa: movl $12, %eax
0x1eff: addl $20, %esp
0x1f02: popl %ebx
0x1f03: leave
0x1f04: ret
This can be handy when dealing with the new --line options that was recently
added:
(lldb) disassemble --line
a.out`main + 13 at test.c:19
18 {
-> 19 printf("Process: %i\n\n", getpid());
20 puts("Press any key to continue..."); getchar();
-> 0x1ec4: calll 0x1f12 ; getpid
0x1ec9: movl %eax, 4(%esp)
0x1ecd: leal 199(%ebx), %eax
0x1ed3: movl %eax, (%esp)
0x1ed6: calll 0x1f18 ; printf
Modified the ModuleList to have a lookup based solely on a UUID. Since the
UUID is typically the MD5 checksum of a binary image, there is no need
to give the path and architecture when searching for a pre-existing
image in an image list.
Now that we support remote debugging a bit better, our lldb_private::Module
needs to be able to track what the original path for file was as the platform
knows it, as well as where the file is locally. The module has the two
following functions to retrieve both paths:
const FileSpec &Module::GetFileSpec () const;
const FileSpec &Module::GetPlatformFileSpec () const;
llvm-svn: 128563
2011-03-31 02:16:51 +08:00
bool
2011-04-12 13:54:46 +08:00
PlatformDarwin : : GetProcessInfo ( lldb : : pid_t pid , ProcessInstanceInfo & process_info )
Many improvements to the Platform base class and subclasses. The base Platform
class now implements the Host functionality for a lot of things that make
sense by default so that subclasses can check:
int
PlatformSubclass::Foo ()
{
if (IsHost())
return Platform::Foo (); // Let the platform base class do the host specific stuff
// Platform subclass specific code...
int result = ...
return result;
}
Added new functions to the platform:
virtual const char *Platform::GetUserName (uint32_t uid);
virtual const char *Platform::GetGroupName (uint32_t gid);
The user and group names are cached locally so that remote platforms can avoid
sending packets multiple times to resolve this information.
Added the parent process ID to the ProcessInfo class.
Added a new ProcessInfoMatch class which helps us to match processes up
and changed the Host layer over to using this new class. The new class allows
us to search for processs:
1 - by name (equal to, starts with, ends with, contains, and regex)
2 - by pid
3 - And further check for parent pid == value, uid == value, gid == value,
euid == value, egid == value, arch == value, parent == value.
This is all hookup up to the "platform process list" command which required
adding dumping routines to dump process information. If the Host class
implements the process lookup routines, you can now lists processes on
your local machine:
machine1.foo.com % lldb
(lldb) platform process list
PID PARENT USER GROUP EFF USER EFF GROUP TRIPLE NAME
====== ====== ========== ========== ========== ========== ======================== ============================
99538 1 username usergroup username usergroup x86_64-apple-darwin FileMerge
94943 1 username usergroup username usergroup x86_64-apple-darwin mdworker
94852 244 username usergroup username usergroup x86_64-apple-darwin Safari
94727 244 username usergroup username usergroup x86_64-apple-darwin Xcode
92742 92710 username usergroup username usergroup i386-apple-darwin debugserver
This of course also works remotely with the lldb-platform:
machine1.foo.com % lldb-platform --listen 1234
machine2.foo.com % lldb
(lldb) platform create remote-macosx
Platform: remote-macosx
Connected: no
(lldb) platform connect connect://localhost:1444
Platform: remote-macosx
Triple: x86_64-apple-darwin
OS Version: 10.6.7 (10J869)
Kernel: Darwin Kernel Version 10.7.0: Sat Jan 29 15:17:16 PST 2011; root:xnu-1504.9.37~1/RELEASE_I386
Hostname: machine1.foo.com
Connected: yes
(lldb) platform process list
PID PARENT USER GROUP EFF USER EFF GROUP TRIPLE NAME
====== ====== ========== ========== ========== ========== ======================== ============================
99556 244 username usergroup username usergroup x86_64-apple-darwin trustevaluation
99548 65539 username usergroup username usergroup x86_64-apple-darwin lldb
99538 1 username usergroup username usergroup x86_64-apple-darwin FileMerge
94943 1 username usergroup username usergroup x86_64-apple-darwin mdworker
94852 244 username usergroup username usergroup x86_64-apple-darwin Safari
The lldb-platform implements everything with the Host:: layer, so this should
"just work" for linux. I will probably be adding more stuff to the Host layer
for launching processes and attaching to processes so that this support should
eventually just work as well.
Modified the target to be able to be created with an architecture that differs
from the main executable. This is needed for iOS debugging since we can have
an "armv6" binary which can run on an "armv7" machine, so we want to be able
to do:
% lldb
(lldb) platform create remote-ios
(lldb) file --arch armv7 a.out
Where "a.out" is an armv6 executable. The platform then can correctly decide
to open all "armv7" images for all dependent shared libraries.
Modified the disassembly to show the current PC value. Example output:
(lldb) disassemble --frame
a.out`main:
0x1eb7: pushl %ebp
0x1eb8: movl %esp, %ebp
0x1eba: pushl %ebx
0x1ebb: subl $20, %esp
0x1ebe: calll 0x1ec3 ; main + 12 at test.c:18
0x1ec3: popl %ebx
-> 0x1ec4: calll 0x1f12 ; getpid
0x1ec9: movl %eax, 4(%esp)
0x1ecd: leal 199(%ebx), %eax
0x1ed3: movl %eax, (%esp)
0x1ed6: calll 0x1f18 ; printf
0x1edb: leal 213(%ebx), %eax
0x1ee1: movl %eax, (%esp)
0x1ee4: calll 0x1f1e ; puts
0x1ee9: calll 0x1f0c ; getchar
0x1eee: movl $20, (%esp)
0x1ef5: calll 0x1e6a ; sleep_loop at test.c:6
0x1efa: movl $12, %eax
0x1eff: addl $20, %esp
0x1f02: popl %ebx
0x1f03: leave
0x1f04: ret
This can be handy when dealing with the new --line options that was recently
added:
(lldb) disassemble --line
a.out`main + 13 at test.c:19
18 {
-> 19 printf("Process: %i\n\n", getpid());
20 puts("Press any key to continue..."); getchar();
-> 0x1ec4: calll 0x1f12 ; getpid
0x1ec9: movl %eax, 4(%esp)
0x1ecd: leal 199(%ebx), %eax
0x1ed3: movl %eax, (%esp)
0x1ed6: calll 0x1f18 ; printf
Modified the ModuleList to have a lookup based solely on a UUID. Since the
UUID is typically the MD5 checksum of a binary image, there is no need
to give the path and architecture when searching for a pre-existing
image in an image list.
Now that we support remote debugging a bit better, our lldb_private::Module
needs to be able to track what the original path for file was as the platform
knows it, as well as where the file is locally. The module has the two
following functions to retrieve both paths:
const FileSpec &Module::GetFileSpec () const;
const FileSpec &Module::GetPlatformFileSpec () const;
llvm-svn: 128563
2011-03-31 02:16:51 +08:00
{
bool sucess = false ;
if ( IsHost ( ) )
{
sucess = Platform : : GetProcessInfo ( pid , process_info ) ;
}
else
{
if ( m_remote_platform_sp )
sucess = m_remote_platform_sp - > GetProcessInfo ( pid , process_info ) ;
}
return sucess ;
}
uint32_t
2011-04-12 13:54:46 +08:00
PlatformDarwin : : FindProcesses ( const ProcessInstanceInfoMatch & match_info ,
ProcessInstanceInfoList & process_infos )
Many improvements to the Platform base class and subclasses. The base Platform
class now implements the Host functionality for a lot of things that make
sense by default so that subclasses can check:
int
PlatformSubclass::Foo ()
{
if (IsHost())
return Platform::Foo (); // Let the platform base class do the host specific stuff
// Platform subclass specific code...
int result = ...
return result;
}
Added new functions to the platform:
virtual const char *Platform::GetUserName (uint32_t uid);
virtual const char *Platform::GetGroupName (uint32_t gid);
The user and group names are cached locally so that remote platforms can avoid
sending packets multiple times to resolve this information.
Added the parent process ID to the ProcessInfo class.
Added a new ProcessInfoMatch class which helps us to match processes up
and changed the Host layer over to using this new class. The new class allows
us to search for processs:
1 - by name (equal to, starts with, ends with, contains, and regex)
2 - by pid
3 - And further check for parent pid == value, uid == value, gid == value,
euid == value, egid == value, arch == value, parent == value.
This is all hookup up to the "platform process list" command which required
adding dumping routines to dump process information. If the Host class
implements the process lookup routines, you can now lists processes on
your local machine:
machine1.foo.com % lldb
(lldb) platform process list
PID PARENT USER GROUP EFF USER EFF GROUP TRIPLE NAME
====== ====== ========== ========== ========== ========== ======================== ============================
99538 1 username usergroup username usergroup x86_64-apple-darwin FileMerge
94943 1 username usergroup username usergroup x86_64-apple-darwin mdworker
94852 244 username usergroup username usergroup x86_64-apple-darwin Safari
94727 244 username usergroup username usergroup x86_64-apple-darwin Xcode
92742 92710 username usergroup username usergroup i386-apple-darwin debugserver
This of course also works remotely with the lldb-platform:
machine1.foo.com % lldb-platform --listen 1234
machine2.foo.com % lldb
(lldb) platform create remote-macosx
Platform: remote-macosx
Connected: no
(lldb) platform connect connect://localhost:1444
Platform: remote-macosx
Triple: x86_64-apple-darwin
OS Version: 10.6.7 (10J869)
Kernel: Darwin Kernel Version 10.7.0: Sat Jan 29 15:17:16 PST 2011; root:xnu-1504.9.37~1/RELEASE_I386
Hostname: machine1.foo.com
Connected: yes
(lldb) platform process list
PID PARENT USER GROUP EFF USER EFF GROUP TRIPLE NAME
====== ====== ========== ========== ========== ========== ======================== ============================
99556 244 username usergroup username usergroup x86_64-apple-darwin trustevaluation
99548 65539 username usergroup username usergroup x86_64-apple-darwin lldb
99538 1 username usergroup username usergroup x86_64-apple-darwin FileMerge
94943 1 username usergroup username usergroup x86_64-apple-darwin mdworker
94852 244 username usergroup username usergroup x86_64-apple-darwin Safari
The lldb-platform implements everything with the Host:: layer, so this should
"just work" for linux. I will probably be adding more stuff to the Host layer
for launching processes and attaching to processes so that this support should
eventually just work as well.
Modified the target to be able to be created with an architecture that differs
from the main executable. This is needed for iOS debugging since we can have
an "armv6" binary which can run on an "armv7" machine, so we want to be able
to do:
% lldb
(lldb) platform create remote-ios
(lldb) file --arch armv7 a.out
Where "a.out" is an armv6 executable. The platform then can correctly decide
to open all "armv7" images for all dependent shared libraries.
Modified the disassembly to show the current PC value. Example output:
(lldb) disassemble --frame
a.out`main:
0x1eb7: pushl %ebp
0x1eb8: movl %esp, %ebp
0x1eba: pushl %ebx
0x1ebb: subl $20, %esp
0x1ebe: calll 0x1ec3 ; main + 12 at test.c:18
0x1ec3: popl %ebx
-> 0x1ec4: calll 0x1f12 ; getpid
0x1ec9: movl %eax, 4(%esp)
0x1ecd: leal 199(%ebx), %eax
0x1ed3: movl %eax, (%esp)
0x1ed6: calll 0x1f18 ; printf
0x1edb: leal 213(%ebx), %eax
0x1ee1: movl %eax, (%esp)
0x1ee4: calll 0x1f1e ; puts
0x1ee9: calll 0x1f0c ; getchar
0x1eee: movl $20, (%esp)
0x1ef5: calll 0x1e6a ; sleep_loop at test.c:6
0x1efa: movl $12, %eax
0x1eff: addl $20, %esp
0x1f02: popl %ebx
0x1f03: leave
0x1f04: ret
This can be handy when dealing with the new --line options that was recently
added:
(lldb) disassemble --line
a.out`main + 13 at test.c:19
18 {
-> 19 printf("Process: %i\n\n", getpid());
20 puts("Press any key to continue..."); getchar();
-> 0x1ec4: calll 0x1f12 ; getpid
0x1ec9: movl %eax, 4(%esp)
0x1ecd: leal 199(%ebx), %eax
0x1ed3: movl %eax, (%esp)
0x1ed6: calll 0x1f18 ; printf
Modified the ModuleList to have a lookup based solely on a UUID. Since the
UUID is typically the MD5 checksum of a binary image, there is no need
to give the path and architecture when searching for a pre-existing
image in an image list.
Now that we support remote debugging a bit better, our lldb_private::Module
needs to be able to track what the original path for file was as the platform
knows it, as well as where the file is locally. The module has the two
following functions to retrieve both paths:
const FileSpec &Module::GetFileSpec () const;
const FileSpec &Module::GetPlatformFileSpec () const;
llvm-svn: 128563
2011-03-31 02:16:51 +08:00
{
uint32_t match_count = 0 ;
if ( IsHost ( ) )
{
// Let the base class figure out the host details
match_count = Platform : : FindProcesses ( match_info , process_infos ) ;
}
else
{
// If we are remote, we can only return results if we are connected
if ( m_remote_platform_sp )
match_count = m_remote_platform_sp - > FindProcesses ( match_info , process_infos ) ;
}
return match_count ;
}
2011-04-12 13:54:46 +08:00
Error
PlatformDarwin : : LaunchProcess ( ProcessLaunchInfo & launch_info )
{
Error error ;
2011-11-15 11:53:30 +08:00
2011-04-12 13:54:46 +08:00
if ( IsHost ( ) )
{
error = Platform : : LaunchProcess ( launch_info ) ;
}
else
{
if ( m_remote_platform_sp )
error = m_remote_platform_sp - > LaunchProcess ( launch_info ) ;
else
error . SetErrorString ( " the platform is not currently connected " ) ;
}
return error ;
}
lldb : : ProcessSP
2011-11-15 11:53:30 +08:00
PlatformDarwin : : Attach ( ProcessAttachInfo & attach_info ,
2011-04-12 13:54:46 +08:00
Debugger & debugger ,
Target * target ,
Listener & listener ,
Error & error )
{
lldb : : ProcessSP process_sp ;
2011-11-15 11:53:30 +08:00
2011-04-12 13:54:46 +08:00
if ( IsHost ( ) )
{
if ( target = = NULL )
{
TargetSP new_target_sp ;
error = debugger . GetTargetList ( ) . CreateTarget ( debugger ,
2012-10-19 00:33:33 +08:00
NULL ,
2011-09-24 08:52:29 +08:00
NULL ,
2011-04-12 13:54:46 +08:00
false ,
2011-09-24 08:52:29 +08:00
NULL ,
2011-04-12 13:54:46 +08:00
new_target_sp ) ;
target = new_target_sp . get ( ) ;
}
else
error . Clear ( ) ;
if ( target & & error . Success ( ) )
{
debugger . GetTargetList ( ) . SetSelectedTarget ( target ) ;
2011-11-15 11:53:30 +08:00
2012-02-09 14:16:32 +08:00
process_sp = target - > CreateProcess ( listener , attach_info . GetProcessPluginName ( ) , NULL ) ;
2011-04-12 13:54:46 +08:00
if ( process_sp )
2011-11-15 11:53:30 +08:00
error = process_sp - > Attach ( attach_info ) ;
2011-04-12 13:54:46 +08:00
}
}
else
{
if ( m_remote_platform_sp )
2011-11-15 11:53:30 +08:00
process_sp = m_remote_platform_sp - > Attach ( attach_info , debugger , target , listener , error ) ;
2011-04-12 13:54:46 +08:00
else
error . SetErrorString ( " the platform is not currently connected " ) ;
}
return process_sp ;
}
Many improvements to the Platform base class and subclasses. The base Platform
class now implements the Host functionality for a lot of things that make
sense by default so that subclasses can check:
int
PlatformSubclass::Foo ()
{
if (IsHost())
return Platform::Foo (); // Let the platform base class do the host specific stuff
// Platform subclass specific code...
int result = ...
return result;
}
Added new functions to the platform:
virtual const char *Platform::GetUserName (uint32_t uid);
virtual const char *Platform::GetGroupName (uint32_t gid);
The user and group names are cached locally so that remote platforms can avoid
sending packets multiple times to resolve this information.
Added the parent process ID to the ProcessInfo class.
Added a new ProcessInfoMatch class which helps us to match processes up
and changed the Host layer over to using this new class. The new class allows
us to search for processs:
1 - by name (equal to, starts with, ends with, contains, and regex)
2 - by pid
3 - And further check for parent pid == value, uid == value, gid == value,
euid == value, egid == value, arch == value, parent == value.
This is all hookup up to the "platform process list" command which required
adding dumping routines to dump process information. If the Host class
implements the process lookup routines, you can now lists processes on
your local machine:
machine1.foo.com % lldb
(lldb) platform process list
PID PARENT USER GROUP EFF USER EFF GROUP TRIPLE NAME
====== ====== ========== ========== ========== ========== ======================== ============================
99538 1 username usergroup username usergroup x86_64-apple-darwin FileMerge
94943 1 username usergroup username usergroup x86_64-apple-darwin mdworker
94852 244 username usergroup username usergroup x86_64-apple-darwin Safari
94727 244 username usergroup username usergroup x86_64-apple-darwin Xcode
92742 92710 username usergroup username usergroup i386-apple-darwin debugserver
This of course also works remotely with the lldb-platform:
machine1.foo.com % lldb-platform --listen 1234
machine2.foo.com % lldb
(lldb) platform create remote-macosx
Platform: remote-macosx
Connected: no
(lldb) platform connect connect://localhost:1444
Platform: remote-macosx
Triple: x86_64-apple-darwin
OS Version: 10.6.7 (10J869)
Kernel: Darwin Kernel Version 10.7.0: Sat Jan 29 15:17:16 PST 2011; root:xnu-1504.9.37~1/RELEASE_I386
Hostname: machine1.foo.com
Connected: yes
(lldb) platform process list
PID PARENT USER GROUP EFF USER EFF GROUP TRIPLE NAME
====== ====== ========== ========== ========== ========== ======================== ============================
99556 244 username usergroup username usergroup x86_64-apple-darwin trustevaluation
99548 65539 username usergroup username usergroup x86_64-apple-darwin lldb
99538 1 username usergroup username usergroup x86_64-apple-darwin FileMerge
94943 1 username usergroup username usergroup x86_64-apple-darwin mdworker
94852 244 username usergroup username usergroup x86_64-apple-darwin Safari
The lldb-platform implements everything with the Host:: layer, so this should
"just work" for linux. I will probably be adding more stuff to the Host layer
for launching processes and attaching to processes so that this support should
eventually just work as well.
Modified the target to be able to be created with an architecture that differs
from the main executable. This is needed for iOS debugging since we can have
an "armv6" binary which can run on an "armv7" machine, so we want to be able
to do:
% lldb
(lldb) platform create remote-ios
(lldb) file --arch armv7 a.out
Where "a.out" is an armv6 executable. The platform then can correctly decide
to open all "armv7" images for all dependent shared libraries.
Modified the disassembly to show the current PC value. Example output:
(lldb) disassemble --frame
a.out`main:
0x1eb7: pushl %ebp
0x1eb8: movl %esp, %ebp
0x1eba: pushl %ebx
0x1ebb: subl $20, %esp
0x1ebe: calll 0x1ec3 ; main + 12 at test.c:18
0x1ec3: popl %ebx
-> 0x1ec4: calll 0x1f12 ; getpid
0x1ec9: movl %eax, 4(%esp)
0x1ecd: leal 199(%ebx), %eax
0x1ed3: movl %eax, (%esp)
0x1ed6: calll 0x1f18 ; printf
0x1edb: leal 213(%ebx), %eax
0x1ee1: movl %eax, (%esp)
0x1ee4: calll 0x1f1e ; puts
0x1ee9: calll 0x1f0c ; getchar
0x1eee: movl $20, (%esp)
0x1ef5: calll 0x1e6a ; sleep_loop at test.c:6
0x1efa: movl $12, %eax
0x1eff: addl $20, %esp
0x1f02: popl %ebx
0x1f03: leave
0x1f04: ret
This can be handy when dealing with the new --line options that was recently
added:
(lldb) disassemble --line
a.out`main + 13 at test.c:19
18 {
-> 19 printf("Process: %i\n\n", getpid());
20 puts("Press any key to continue..."); getchar();
-> 0x1ec4: calll 0x1f12 ; getpid
0x1ec9: movl %eax, 4(%esp)
0x1ecd: leal 199(%ebx), %eax
0x1ed3: movl %eax, (%esp)
0x1ed6: calll 0x1f18 ; printf
Modified the ModuleList to have a lookup based solely on a UUID. Since the
UUID is typically the MD5 checksum of a binary image, there is no need
to give the path and architecture when searching for a pre-existing
image in an image list.
Now that we support remote debugging a bit better, our lldb_private::Module
needs to be able to track what the original path for file was as the platform
knows it, as well as where the file is locally. The module has the two
following functions to retrieve both paths:
const FileSpec &Module::GetFileSpec () const;
const FileSpec &Module::GetPlatformFileSpec () const;
llvm-svn: 128563
2011-03-31 02:16:51 +08:00
const char *
PlatformDarwin : : GetUserName ( uint32_t uid )
{
// Check the cache in Platform in case we have already looked this uid up
const char * user_name = Platform : : GetUserName ( uid ) ;
if ( user_name )
return user_name ;
if ( IsRemote ( ) & & m_remote_platform_sp )
return m_remote_platform_sp - > GetUserName ( uid ) ;
return NULL ;
}
const char *
PlatformDarwin : : GetGroupName ( uint32_t gid )
{
const char * group_name = Platform : : GetGroupName ( gid ) ;
if ( group_name )
return group_name ;
if ( IsRemote ( ) & & m_remote_platform_sp )
return m_remote_platform_sp - > GetGroupName ( gid ) ;
return NULL ;
}
2011-10-29 07:14:11 +08:00
bool
PlatformDarwin : : ModuleIsExcludedForNonModuleSpecificSearches ( lldb_private : : Target & target , const lldb : : ModuleSP & module_sp )
{
2012-05-30 07:48:51 +08:00
if ( ! module_sp )
return false ;
2011-10-29 07:14:11 +08:00
ObjectFile * obj_file = module_sp - > GetObjectFile ( ) ;
if ( ! obj_file )
return false ;
ObjectFile : : Type obj_type = obj_file - > GetType ( ) ;
if ( obj_type = = ObjectFile : : eTypeDynamicLinker )
return true ;
else
return false ;
}
2011-12-09 15:50:50 +08:00
2012-02-25 14:56:35 +08:00
bool
PlatformDarwin : : x86GetSupportedArchitectureAtIndex ( uint32_t idx , ArchSpec & arch )
{
if ( idx = = 0 )
{
arch = Host : : GetArchitecture ( Host : : eSystemDefaultArchitecture ) ;
return arch . IsValid ( ) ;
}
else if ( idx = = 1 )
{
ArchSpec platform_arch ( Host : : GetArchitecture ( Host : : eSystemDefaultArchitecture ) ) ;
ArchSpec platform_arch64 ( Host : : GetArchitecture ( Host : : eSystemDefaultArchitecture64 ) ) ;
2012-12-14 06:07:14 +08:00
if ( platform_arch . IsExactMatch ( platform_arch64 ) )
2012-02-25 14:56:35 +08:00
{
// This macosx platform supports both 32 and 64 bit. Since we already
// returned the 64 bit arch for idx == 0, return the 32 bit arch
// for idx == 1
arch = Host : : GetArchitecture ( Host : : eSystemDefaultArchitecture32 ) ;
return arch . IsValid ( ) ;
}
}
return false ;
}
2011-12-09 15:50:50 +08:00
// The architecture selection rules for arm processors
// These cpu subtypes have distinct names (e.g. armv7f) but armv7 binaries run fine on an armv7f processor.
bool
PlatformDarwin : : ARMGetSupportedArchitectureAtIndex ( uint32_t idx , ArchSpec & arch )
{
ArchSpec system_arch ( GetSystemArchitecture ( ) ) ;
const ArchSpec : : Core system_core = system_arch . GetCore ( ) ;
switch ( system_core )
{
default :
switch ( idx )
{
2012-05-08 09:45:38 +08:00
case 0 : arch . SetTriple ( " armv7-apple-ios " ) ; return true ;
case 1 : arch . SetTriple ( " armv7f-apple-ios " ) ; return true ;
case 2 : arch . SetTriple ( " armv7k-apple-ios " ) ; return true ;
case 3 : arch . SetTriple ( " armv7s-apple-ios " ) ; return true ;
2013-03-08 12:33:44 +08:00
case 4 : arch . SetTriple ( " armv7m-apple-ios " ) ; return true ;
case 5 : arch . SetTriple ( " armv7em-apple-ios " ) ; return true ;
case 6 : arch . SetTriple ( " armv6-apple-ios " ) ; return true ;
case 7 : arch . SetTriple ( " armv5-apple-ios " ) ; return true ;
case 8 : arch . SetTriple ( " armv4-apple-ios " ) ; return true ;
case 9 : arch . SetTriple ( " arm-apple-ios " ) ; return true ;
case 10 : arch . SetTriple ( " thumbv7-apple-ios " ) ; return true ;
case 11 : arch . SetTriple ( " thumbv7f-apple-ios " ) ; return true ;
case 12 : arch . SetTriple ( " thumbv7k-apple-ios " ) ; return true ;
case 13 : arch . SetTriple ( " thumbv7s-apple-ios " ) ; return true ;
case 14 : arch . SetTriple ( " thumbv7m-apple-ios " ) ; return true ;
case 15 : arch . SetTriple ( " thumbv7em-apple-ios " ) ; return true ;
case 16 : arch . SetTriple ( " thumbv6-apple-ios " ) ; return true ;
case 17 : arch . SetTriple ( " thumbv5-apple-ios " ) ; return true ;
case 18 : arch . SetTriple ( " thumbv4t-apple-ios " ) ; return true ;
case 19 : arch . SetTriple ( " thumb-apple-ios " ) ; return true ;
2011-12-09 15:50:50 +08:00
default : break ;
}
break ;
case ArchSpec : : eCore_arm_armv7f :
switch ( idx )
{
2012-05-08 09:45:38 +08:00
case 0 : arch . SetTriple ( " armv7f-apple-ios " ) ; return true ;
case 1 : arch . SetTriple ( " armv7-apple-ios " ) ; return true ;
case 2 : arch . SetTriple ( " armv6-apple-ios " ) ; return true ;
case 3 : arch . SetTriple ( " armv5-apple-ios " ) ; return true ;
case 4 : arch . SetTriple ( " armv4-apple-ios " ) ; return true ;
case 5 : arch . SetTriple ( " arm-apple-ios " ) ; return true ;
case 6 : arch . SetTriple ( " thumbv7f-apple-ios " ) ; return true ;
case 7 : arch . SetTriple ( " thumbv7-apple-ios " ) ; return true ;
case 8 : arch . SetTriple ( " thumbv6-apple-ios " ) ; return true ;
case 9 : arch . SetTriple ( " thumbv5-apple-ios " ) ; return true ;
case 10 : arch . SetTriple ( " thumbv4t-apple-ios " ) ; return true ;
case 11 : arch . SetTriple ( " thumb-apple-ios " ) ; return true ;
default : break ;
2011-12-09 15:50:50 +08:00
}
break ;
case ArchSpec : : eCore_arm_armv7k :
switch ( idx )
{
2012-05-08 09:45:38 +08:00
case 0 : arch . SetTriple ( " armv7k-apple-ios " ) ; return true ;
case 1 : arch . SetTriple ( " armv7-apple-ios " ) ; return true ;
case 2 : arch . SetTriple ( " armv6-apple-ios " ) ; return true ;
case 3 : arch . SetTriple ( " armv5-apple-ios " ) ; return true ;
case 4 : arch . SetTriple ( " armv4-apple-ios " ) ; return true ;
case 5 : arch . SetTriple ( " arm-apple-ios " ) ; return true ;
case 6 : arch . SetTriple ( " thumbv7k-apple-ios " ) ; return true ;
case 7 : arch . SetTriple ( " thumbv7-apple-ios " ) ; return true ;
case 8 : arch . SetTriple ( " thumbv6-apple-ios " ) ; return true ;
case 9 : arch . SetTriple ( " thumbv5-apple-ios " ) ; return true ;
case 10 : arch . SetTriple ( " thumbv4t-apple-ios " ) ; return true ;
case 11 : arch . SetTriple ( " thumb-apple-ios " ) ; return true ;
default : break ;
2011-12-09 15:50:50 +08:00
}
break ;
case ArchSpec : : eCore_arm_armv7s :
switch ( idx )
{
2012-05-08 09:45:38 +08:00
case 0 : arch . SetTriple ( " armv7s-apple-ios " ) ; return true ;
case 1 : arch . SetTriple ( " armv7-apple-ios " ) ; return true ;
case 2 : arch . SetTriple ( " armv6-apple-ios " ) ; return true ;
case 3 : arch . SetTriple ( " armv5-apple-ios " ) ; return true ;
case 4 : arch . SetTriple ( " armv4-apple-ios " ) ; return true ;
case 5 : arch . SetTriple ( " arm-apple-ios " ) ; return true ;
case 6 : arch . SetTriple ( " thumbv7s-apple-ios " ) ; return true ;
case 7 : arch . SetTriple ( " thumbv7-apple-ios " ) ; return true ;
case 8 : arch . SetTriple ( " thumbv6-apple-ios " ) ; return true ;
2013-03-08 12:33:44 +08:00
case 9 : arch . SetTriple ( " thumbv5-apple-ios " ) ; return true ;
case 10 : arch . SetTriple ( " thumbv4t-apple-ios " ) ; return true ;
case 11 : arch . SetTriple ( " thumb-apple-ios " ) ; return true ;
default : break ;
}
break ;
case ArchSpec : : eCore_arm_armv7m :
switch ( idx )
{
case 0 : arch . SetTriple ( " armv7m-apple-ios " ) ; return true ;
case 1 : arch . SetTriple ( " armv7-apple-ios " ) ; return true ;
case 2 : arch . SetTriple ( " armv6-apple-ios " ) ; return true ;
case 3 : arch . SetTriple ( " armv5-apple-ios " ) ; return true ;
case 4 : arch . SetTriple ( " armv4-apple-ios " ) ; return true ;
case 5 : arch . SetTriple ( " arm-apple-ios " ) ; return true ;
case 6 : arch . SetTriple ( " thumbv7m-apple-ios " ) ; return true ;
case 7 : arch . SetTriple ( " thumbv7-apple-ios " ) ; return true ;
case 8 : arch . SetTriple ( " thumbv6-apple-ios " ) ; return true ;
case 9 : arch . SetTriple ( " thumbv5-apple-ios " ) ; return true ;
case 10 : arch . SetTriple ( " thumbv4t-apple-ios " ) ; return true ;
case 11 : arch . SetTriple ( " thumb-apple-ios " ) ; return true ;
default : break ;
}
break ;
case ArchSpec : : eCore_arm_armv7em :
switch ( idx )
{
case 0 : arch . SetTriple ( " armv7em-apple-ios " ) ; return true ;
case 1 : arch . SetTriple ( " armv7-apple-ios " ) ; return true ;
case 2 : arch . SetTriple ( " armv6-apple-ios " ) ; return true ;
case 3 : arch . SetTriple ( " armv5-apple-ios " ) ; return true ;
case 4 : arch . SetTriple ( " armv4-apple-ios " ) ; return true ;
case 5 : arch . SetTriple ( " arm-apple-ios " ) ; return true ;
case 6 : arch . SetTriple ( " thumbv7em-apple-ios " ) ; return true ;
case 7 : arch . SetTriple ( " thumbv7-apple-ios " ) ; return true ;
case 8 : arch . SetTriple ( " thumbv6-apple-ios " ) ; return true ;
2012-05-08 09:45:38 +08:00
case 9 : arch . SetTriple ( " thumbv5-apple-ios " ) ; return true ;
case 10 : arch . SetTriple ( " thumbv4t-apple-ios " ) ; return true ;
case 11 : arch . SetTriple ( " thumb-apple-ios " ) ; return true ;
default : break ;
2011-12-09 15:50:50 +08:00
}
break ;
case ArchSpec : : eCore_arm_armv7 :
switch ( idx )
{
2012-05-08 09:45:38 +08:00
case 0 : arch . SetTriple ( " armv7-apple-ios " ) ; return true ;
case 1 : arch . SetTriple ( " armv6-apple-ios " ) ; return true ;
case 2 : arch . SetTriple ( " armv5-apple-ios " ) ; return true ;
case 3 : arch . SetTriple ( " armv4-apple-ios " ) ; return true ;
case 4 : arch . SetTriple ( " arm-apple-ios " ) ; return true ;
case 5 : arch . SetTriple ( " thumbv7-apple-ios " ) ; return true ;
case 6 : arch . SetTriple ( " thumbv6-apple-ios " ) ; return true ;
case 7 : arch . SetTriple ( " thumbv5-apple-ios " ) ; return true ;
case 8 : arch . SetTriple ( " thumbv4t-apple-ios " ) ; return true ;
case 9 : arch . SetTriple ( " thumb-apple-ios " ) ; return true ;
default : break ;
2011-12-09 15:50:50 +08:00
}
break ;
case ArchSpec : : eCore_arm_armv6 :
switch ( idx )
{
2012-05-08 09:45:38 +08:00
case 0 : arch . SetTriple ( " armv6-apple-ios " ) ; return true ;
case 1 : arch . SetTriple ( " armv5-apple-ios " ) ; return true ;
case 2 : arch . SetTriple ( " armv4-apple-ios " ) ; return true ;
case 3 : arch . SetTriple ( " arm-apple-ios " ) ; return true ;
case 4 : arch . SetTriple ( " thumbv6-apple-ios " ) ; return true ;
case 5 : arch . SetTriple ( " thumbv5-apple-ios " ) ; return true ;
case 6 : arch . SetTriple ( " thumbv4t-apple-ios " ) ; return true ;
case 7 : arch . SetTriple ( " thumb-apple-ios " ) ; return true ;
default : break ;
2011-12-09 15:50:50 +08:00
}
break ;
case ArchSpec : : eCore_arm_armv5 :
switch ( idx )
{
2012-05-08 09:45:38 +08:00
case 0 : arch . SetTriple ( " armv5-apple-ios " ) ; return true ;
case 1 : arch . SetTriple ( " armv4-apple-ios " ) ; return true ;
case 2 : arch . SetTriple ( " arm-apple-ios " ) ; return true ;
case 3 : arch . SetTriple ( " thumbv5-apple-ios " ) ; return true ;
case 4 : arch . SetTriple ( " thumbv4t-apple-ios " ) ; return true ;
case 5 : arch . SetTriple ( " thumb-apple-ios " ) ; return true ;
default : break ;
2011-12-09 15:50:50 +08:00
}
break ;
case ArchSpec : : eCore_arm_armv4 :
switch ( idx )
{
2012-05-08 09:45:38 +08:00
case 0 : arch . SetTriple ( " armv4-apple-ios " ) ; return true ;
case 1 : arch . SetTriple ( " arm-apple-ios " ) ; return true ;
case 2 : arch . SetTriple ( " thumbv4t-apple-ios " ) ; return true ;
case 3 : arch . SetTriple ( " thumb-apple-ios " ) ; return true ;
default : break ;
2011-12-09 15:50:50 +08:00
}
break ;
}
arch . Clear ( ) ;
return false ;
}
2012-02-25 14:56:35 +08:00
const char *
PlatformDarwin : : GetDeveloperDirectory ( )
{
if ( m_developer_directory . empty ( ) )
{
bool developer_dir_path_valid = false ;
char developer_dir_path [ PATH_MAX ] ;
FileSpec temp_file_spec ;
if ( Host : : GetLLDBPath ( ePathTypeLLDBShlibDir , temp_file_spec ) )
{
if ( temp_file_spec . GetPath ( developer_dir_path , sizeof ( developer_dir_path ) ) )
{
char * shared_frameworks = strstr ( developer_dir_path , " /SharedFrameworks/LLDB.framework " ) ;
if ( shared_frameworks )
{
: : snprintf ( shared_frameworks ,
sizeof ( developer_dir_path ) - ( shared_frameworks - developer_dir_path ) ,
" /Developer " ) ;
developer_dir_path_valid = true ;
}
else
{
char * lib_priv_frameworks = strstr ( developer_dir_path , " /Library/PrivateFrameworks/LLDB.framework " ) ;
if ( lib_priv_frameworks )
{
* lib_priv_frameworks = ' \0 ' ;
developer_dir_path_valid = true ;
}
}
}
}
if ( ! developer_dir_path_valid )
{
std : : string xcode_dir_path ;
const char * xcode_select_prefix_dir = getenv ( " XCODE_SELECT_PREFIX_DIR " ) ;
if ( xcode_select_prefix_dir )
xcode_dir_path . append ( xcode_select_prefix_dir ) ;
xcode_dir_path . append ( " /usr/share/xcode-select/xcode_dir_path " ) ;
temp_file_spec . SetFile ( xcode_dir_path . c_str ( ) , false ) ;
size_t bytes_read = temp_file_spec . ReadFileContents ( 0 , developer_dir_path , sizeof ( developer_dir_path ) , NULL ) ;
if ( bytes_read > 0 )
{
developer_dir_path [ bytes_read ] = ' \0 ' ;
while ( developer_dir_path [ bytes_read - 1 ] = = ' \r ' | |
developer_dir_path [ bytes_read - 1 ] = = ' \n ' )
developer_dir_path [ - - bytes_read ] = ' \0 ' ;
developer_dir_path_valid = true ;
}
}
2013-04-29 17:48:26 +08:00
if ( ! developer_dir_path_valid )
{
FileSpec xcode_select_cmd ( " /usr/bin/xcode-select " , false ) ;
if ( xcode_select_cmd . Exists ( ) )
{
int exit_status = - 1 ;
int signo = - 1 ;
std : : string command_output ;
Error error = Host : : RunShellCommand ( " /usr/bin/xcode-select --print-path " ,
NULL , // current working directory
& exit_status ,
& signo ,
& command_output ,
2 , // short timeout
NULL ) ; // don't run in a shell
if ( error . Success ( ) & & exit_status = = 0 & & ! command_output . empty ( ) )
{
const char * cmd_output_ptr = command_output . c_str ( ) ;
developer_dir_path [ sizeof ( developer_dir_path ) - 1 ] = ' \0 ' ;
2013-06-20 03:04:53 +08:00
size_t i ;
2013-04-29 17:48:26 +08:00
for ( i = 0 ; i < sizeof ( developer_dir_path ) - 1 ; i + + )
{
if ( cmd_output_ptr [ i ] = = ' \r ' | | cmd_output_ptr [ i ] = = ' \n ' | | cmd_output_ptr [ i ] = = ' \0 ' )
break ;
developer_dir_path [ i ] = cmd_output_ptr [ i ] ;
}
developer_dir_path [ i ] = ' \0 ' ;
FileSpec devel_dir ( developer_dir_path , false ) ;
if ( devel_dir . Exists ( ) & & devel_dir . IsDirectory ( ) )
{
developer_dir_path_valid = true ;
}
}
}
}
2012-02-25 14:56:35 +08:00
if ( developer_dir_path_valid )
{
temp_file_spec . SetFile ( developer_dir_path , false ) ;
if ( temp_file_spec . Exists ( ) )
{
m_developer_directory . assign ( developer_dir_path ) ;
return m_developer_directory . c_str ( ) ;
}
}
// Assign a single NULL character so we know we tried to find the device
// support directory and we don't keep trying to find it over and over.
m_developer_directory . assign ( 1 , ' \0 ' ) ;
}
// We should have put a single NULL character into m_developer_directory
// or it should have a valid path if the code gets here
assert ( m_developer_directory . empty ( ) = = false ) ;
if ( m_developer_directory [ 0 ] )
return m_developer_directory . c_str ( ) ;
return NULL ;
}
2012-05-15 10:33:01 +08:00
BreakpointSP
PlatformDarwin : : SetThreadCreationBreakpoint ( Target & target )
{
BreakpointSP bp_sp ;
static const char * g_bp_names [ ] =
{
" start_wqthread " ,
" _pthread_wqthread " ,
" _pthread_start " ,
} ;
static const char * g_bp_modules [ ] =
{
" libsystem_c.dylib " ,
" libSystem.B.dylib "
} ;
FileSpecList bp_modules ;
2013-06-20 03:04:53 +08:00
for ( size_t i = 0 ; i < sizeof ( g_bp_modules ) / sizeof ( const char * ) ; i + + )
2012-05-15 10:33:01 +08:00
{
const char * bp_module = g_bp_modules [ i ] ;
bp_modules . Append ( FileSpec ( bp_module , false ) ) ;
}
2012-05-22 08:12:20 +08:00
bool internal = true ;
LazyBool skip_prologue = eLazyBoolNo ;
2012-05-15 10:33:01 +08:00
bp_sp = target . CreateBreakpoint ( & bp_modules ,
NULL ,
g_bp_names ,
sizeof ( g_bp_names ) / sizeof ( const char * ) ,
eFunctionNameTypeFull ,
2012-05-22 08:12:20 +08:00
skip_prologue ,
internal ) ;
2013-01-26 10:19:28 +08:00
bp_sp - > SetBreakpointKind ( " thread-creation " ) ;
2012-05-15 10:33:01 +08:00
return bp_sp ;
}
2012-08-23 01:17:09 +08:00
size_t
PlatformDarwin : : GetEnvironment ( StringList & env )
{
if ( IsRemote ( ) )
{
if ( m_remote_platform_sp )
return m_remote_platform_sp - > GetEnvironment ( env ) ;
return 0 ;
}
return Host : : GetEnvironment ( env ) ;
}