mirror of
https://github.com/Gericom/teak-llvm.git
synced 2025-06-27 23:38:59 -04:00
57abc5d6a6
<rdar://problem/13594769> Main changes in this patch include: - cleanup plug-in interface and use ConstStrings for plug-in names - Modfiied the BSD Archive plug-in to be able to pick out the correct .o file when .a files contain multiple .o files with the same name by using the timestamp - Modified SymbolFileDWARFDebugMap to properly verify the timestamp on .o files it loads to ensure we don't load updated .o files and cause problems when debugging The plug-in interface changes: Modified the lldb_private::PluginInterface class that all plug-ins inherit from: Changed: virtual const char * GetPluginName() = 0; To: virtual ConstString GetPluginName() = 0; Removed: virtual const char * GetShortPluginName() = 0; - Fixed up all plug-in to adhere to the new interface and to return lldb_private::ConstString values for the plug-in names. - Fixed all plug-ins to return simple names with no prefixes. Some plug-ins had prefixes and most ones didn't, so now they all don't have prefixed names, just simple names like "linux", "gdb-remote", etc. llvm-svn: 181631
197 lines
7.4 KiB
C++
197 lines
7.4 KiB
C++
//===-- ProcessGDBRemoteLog.cpp ---------------------------------*- C++ -*-===//
|
|
//
|
|
// The LLVM Compiler Infrastructure
|
|
//
|
|
// This file is distributed under the University of Illinois Open Source
|
|
// License. See LICENSE.TXT for details.
|
|
//
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
#include "ProcessGDBRemoteLog.h"
|
|
|
|
#include "lldb/Interpreter/Args.h"
|
|
#include "lldb/Core/StreamFile.h"
|
|
|
|
#include "ProcessGDBRemote.h"
|
|
|
|
using namespace lldb;
|
|
using namespace lldb_private;
|
|
|
|
|
|
// We want to avoid global constructors where code needs to be run so here we
|
|
// control access to our static g_log_sp by hiding it in a singleton function
|
|
// that will construct the static g_lob_sp the first time this function is
|
|
// called.
|
|
static bool g_log_enabled = false;
|
|
static Log * g_log = NULL;
|
|
static Log *
|
|
GetLog ()
|
|
{
|
|
if (!g_log_enabled)
|
|
return NULL;
|
|
return g_log;
|
|
}
|
|
|
|
|
|
Log *
|
|
ProcessGDBRemoteLog::GetLogIfAllCategoriesSet (uint32_t mask)
|
|
{
|
|
Log *log(GetLog ());
|
|
if (log && mask)
|
|
{
|
|
uint32_t log_mask = log->GetMask().Get();
|
|
if ((log_mask & mask) != mask)
|
|
return NULL;
|
|
}
|
|
return log;
|
|
}
|
|
|
|
Log *
|
|
ProcessGDBRemoteLog::GetLogIfAnyCategoryIsSet (uint32_t mask)
|
|
{
|
|
Log *log(GetLog ());
|
|
if (log && log->GetMask().Get() & mask)
|
|
return log;
|
|
return NULL;
|
|
}
|
|
|
|
void
|
|
ProcessGDBRemoteLog::DisableLog (const char **categories, Stream *feedback_strm)
|
|
{
|
|
Log *log (GetLog ());
|
|
if (log)
|
|
{
|
|
uint32_t flag_bits = 0;
|
|
|
|
if (categories[0] != NULL)
|
|
{
|
|
flag_bits = log->GetMask().Get();
|
|
for (size_t i = 0; categories[i] != NULL; ++i)
|
|
{
|
|
const char *arg = categories[i];
|
|
|
|
|
|
if (::strcasecmp (arg, "all") == 0 ) flag_bits &= ~GDBR_LOG_ALL;
|
|
else if (::strcasecmp (arg, "async") == 0 ) flag_bits &= ~GDBR_LOG_ASYNC;
|
|
else if (::strncasecmp (arg, "break", 5) == 0 ) flag_bits &= ~GDBR_LOG_BREAKPOINTS;
|
|
else if (::strncasecmp (arg, "comm", 4) == 0 ) flag_bits &= ~GDBR_LOG_COMM;
|
|
else if (::strcasecmp (arg, "default") == 0 ) flag_bits &= ~GDBR_LOG_DEFAULT;
|
|
else if (::strcasecmp (arg, "packets") == 0 ) flag_bits &= ~GDBR_LOG_PACKETS;
|
|
else if (::strcasecmp (arg, "memory") == 0 ) flag_bits &= ~GDBR_LOG_MEMORY;
|
|
else if (::strcasecmp (arg, "data-short") == 0 ) flag_bits &= ~GDBR_LOG_MEMORY_DATA_SHORT;
|
|
else if (::strcasecmp (arg, "data-long") == 0 ) flag_bits &= ~GDBR_LOG_MEMORY_DATA_LONG;
|
|
else if (::strcasecmp (arg, "process") == 0 ) flag_bits &= ~GDBR_LOG_PROCESS;
|
|
else if (::strcasecmp (arg, "step") == 0 ) flag_bits &= ~GDBR_LOG_STEP;
|
|
else if (::strcasecmp (arg, "thread") == 0 ) flag_bits &= ~GDBR_LOG_THREAD;
|
|
else if (::strcasecmp (arg, "verbose") == 0 ) flag_bits &= ~GDBR_LOG_VERBOSE;
|
|
else if (::strncasecmp (arg, "watch", 5) == 0 ) flag_bits &= ~GDBR_LOG_WATCHPOINTS;
|
|
else
|
|
{
|
|
feedback_strm->Printf("error: unrecognized log category '%s'\n", arg);
|
|
ListLogCategories (feedback_strm);
|
|
}
|
|
|
|
}
|
|
}
|
|
|
|
if (flag_bits == 0)
|
|
g_log_enabled = false;
|
|
else
|
|
log->GetMask().Reset (flag_bits);
|
|
}
|
|
|
|
return;
|
|
}
|
|
|
|
Log *
|
|
ProcessGDBRemoteLog::EnableLog (StreamSP &log_stream_sp, uint32_t log_options, const char **categories, Stream *feedback_strm)
|
|
{
|
|
// Try see if there already is a log - that way we can reuse its settings.
|
|
// We could reuse the log in toto, but we don't know that the stream is the same.
|
|
uint32_t flag_bits = 0;
|
|
if (g_log)
|
|
flag_bits = g_log->GetMask().Get();
|
|
|
|
// Now make a new log with this stream if one was provided
|
|
if (log_stream_sp)
|
|
{
|
|
if (g_log)
|
|
g_log->SetStream(log_stream_sp);
|
|
else
|
|
g_log = new Log(log_stream_sp);
|
|
}
|
|
|
|
if (g_log)
|
|
{
|
|
bool got_unknown_category = false;
|
|
for (size_t i=0; categories[i] != NULL; ++i)
|
|
{
|
|
const char *arg = categories[i];
|
|
|
|
if (::strcasecmp (arg, "all") == 0 ) flag_bits |= GDBR_LOG_ALL;
|
|
else if (::strcasecmp (arg, "async") == 0 ) flag_bits |= GDBR_LOG_ASYNC;
|
|
else if (::strncasecmp (arg, "break", 5) == 0 ) flag_bits |= GDBR_LOG_BREAKPOINTS;
|
|
else if (::strncasecmp (arg, "comm", 4) == 0 ) flag_bits |= GDBR_LOG_COMM;
|
|
else if (::strcasecmp (arg, "default") == 0 ) flag_bits |= GDBR_LOG_DEFAULT;
|
|
else if (::strcasecmp (arg, "packets") == 0 ) flag_bits |= GDBR_LOG_PACKETS;
|
|
else if (::strcasecmp (arg, "memory") == 0 ) flag_bits |= GDBR_LOG_MEMORY;
|
|
else if (::strcasecmp (arg, "data-short") == 0 ) flag_bits |= GDBR_LOG_MEMORY_DATA_SHORT;
|
|
else if (::strcasecmp (arg, "data-long") == 0 ) flag_bits |= GDBR_LOG_MEMORY_DATA_LONG;
|
|
else if (::strcasecmp (arg, "process") == 0 ) flag_bits |= GDBR_LOG_PROCESS;
|
|
else if (::strcasecmp (arg, "step") == 0 ) flag_bits |= GDBR_LOG_STEP;
|
|
else if (::strcasecmp (arg, "thread") == 0 ) flag_bits |= GDBR_LOG_THREAD;
|
|
else if (::strcasecmp (arg, "verbose") == 0 ) flag_bits |= GDBR_LOG_VERBOSE;
|
|
else if (::strncasecmp (arg, "watch", 5) == 0 ) flag_bits |= GDBR_LOG_WATCHPOINTS;
|
|
else
|
|
{
|
|
feedback_strm->Printf("error: unrecognized log category '%s'\n", arg);
|
|
if (got_unknown_category == false)
|
|
{
|
|
got_unknown_category = true;
|
|
ListLogCategories (feedback_strm);
|
|
}
|
|
}
|
|
}
|
|
if (flag_bits == 0)
|
|
flag_bits = GDBR_LOG_DEFAULT;
|
|
g_log->GetMask().Reset(flag_bits);
|
|
g_log->GetOptions().Reset(log_options);
|
|
}
|
|
g_log_enabled = true;
|
|
return g_log;
|
|
}
|
|
|
|
void
|
|
ProcessGDBRemoteLog::ListLogCategories (Stream *strm)
|
|
{
|
|
strm->Printf ("Logging categories for '%s':\n"
|
|
" all - turn on all available logging categories\n"
|
|
" async - log asynchronous activity\n"
|
|
" break - log breakpoints\n"
|
|
" communication - log communication activity\n"
|
|
" default - enable the default set of logging categories for liblldb\n"
|
|
" packets - log gdb remote packets\n"
|
|
" memory - log memory reads and writes\n"
|
|
" data-short - log memory bytes for memory reads and writes for short transactions only\n"
|
|
" data-long - log memory bytes for memory reads and writes for all transactions\n"
|
|
" process - log process events and activities\n"
|
|
" thread - log thread events and activities\n"
|
|
" step - log step related activities\n"
|
|
" verbose - enable verbose logging\n"
|
|
" watch - log watchpoint related activities\n", ProcessGDBRemote::GetPluginNameStatic().GetCString());
|
|
}
|
|
|
|
|
|
void
|
|
ProcessGDBRemoteLog::LogIf (uint32_t mask, const char *format, ...)
|
|
{
|
|
Log *log (ProcessGDBRemoteLog::GetLogIfAllCategoriesSet (mask));
|
|
if (log)
|
|
{
|
|
va_list args;
|
|
va_start (args, format);
|
|
log->VAPrintf (format, args);
|
|
va_end (args);
|
|
}
|
|
}
|