1 //===-- lldb-log.cpp --------------------------------------------*- C++ -*-===//
3 // The LLVM Compiler Infrastructure
5 // This file is distributed under the University of Illinois Open Source
6 // License. See LICENSE.TXT for details.
8 //===----------------------------------------------------------------------===//
10 #include "lldb/Core/Logging.h"
15 // Other libraries and framework includes
17 #include "lldb/Interpreter/Args.h"
18 #include "lldb/Core/Log.h"
19 #include "lldb/Core/StreamFile.h"
23 using namespace lldb_private;
26 // We want to avoid global constructors where code needs to be run so here we
27 // control access to our static g_log_sp by hiding it in a singleton function
28 // that will construct the static g_lob_sp the first time this function is
31 static std::atomic<bool> g_log_enabled {false};
32 static Log * g_log = NULL;
42 lldb_private::GetLogMask ()
46 return log->GetMask().Get();
51 lldb_private::IsLogVerbose ()
53 uint32_t mask = GetLogMask();
54 return (mask & LIBLLDB_LOG_VERBOSE);
58 lldb_private::GetLogIfAllCategoriesSet (uint32_t mask)
63 uint32_t log_mask = log->GetMask().Get();
64 if ((log_mask & mask) != mask)
71 lldb_private::LogIfAllCategoriesSet (uint32_t mask, const char *format, ...)
73 Log *log(GetLogIfAllCategoriesSet (mask));
77 va_start (args, format);
78 log->VAPrintf (format, args);
84 lldb_private::LogIfAnyCategoriesSet (uint32_t mask, const char *format, ...)
86 Log *log(GetLogIfAnyCategoriesSet (mask));
90 va_start (args, format);
91 log->VAPrintf (format, args);
97 lldb_private::GetLogIfAnyCategoriesSet (uint32_t mask)
100 if (log && mask && (mask & log->GetMask().Get()))
106 lldb_private::DisableLog (const char **categories, Stream *feedback_strm)
112 uint32_t flag_bits = 0;
113 if (categories[0] != NULL)
115 flag_bits = log->GetMask().Get();
116 for (size_t i = 0; categories[i] != NULL; ++i)
118 const char *arg = categories[i];
120 if (0 == ::strcasecmp(arg, "all")) flag_bits &= ~LIBLLDB_LOG_ALL;
121 else if (0 == ::strcasecmp(arg, "api")) flag_bits &= ~LIBLLDB_LOG_API;
122 else if (0 == ::strncasecmp(arg, "break", 5)) flag_bits &= ~LIBLLDB_LOG_BREAKPOINTS;
123 else if (0 == ::strcasecmp(arg, "commands")) flag_bits &= ~LIBLLDB_LOG_COMMANDS;
124 else if (0 == ::strcasecmp(arg, "default")) flag_bits &= ~LIBLLDB_LOG_DEFAULT;
125 else if (0 == ::strcasecmp(arg, "dyld")) flag_bits &= ~LIBLLDB_LOG_DYNAMIC_LOADER;
126 else if (0 == ::strncasecmp(arg, "event", 5)) flag_bits &= ~LIBLLDB_LOG_EVENTS;
127 else if (0 == ::strncasecmp(arg, "expr", 4)) flag_bits &= ~LIBLLDB_LOG_EXPRESSIONS;
128 else if (0 == ::strncasecmp(arg, "object", 6)) flag_bits &= ~LIBLLDB_LOG_OBJECT;
129 else if (0 == ::strcasecmp(arg, "process")) flag_bits &= ~LIBLLDB_LOG_PROCESS;
130 else if (0 == ::strcasecmp(arg, "platform")) flag_bits &= ~LIBLLDB_LOG_PLATFORM;
131 else if (0 == ::strcasecmp(arg, "script")) flag_bits &= ~LIBLLDB_LOG_SCRIPT;
132 else if (0 == ::strcasecmp(arg, "state")) flag_bits &= ~LIBLLDB_LOG_STATE;
133 else if (0 == ::strcasecmp(arg, "step")) flag_bits &= ~LIBLLDB_LOG_STEP;
134 else if (0 == ::strcasecmp(arg, "thread")) flag_bits &= ~LIBLLDB_LOG_THREAD;
135 else if (0 == ::strcasecmp(arg, "target")) flag_bits &= ~LIBLLDB_LOG_TARGET;
136 else if (0 == ::strcasecmp(arg, "verbose")) flag_bits &= ~LIBLLDB_LOG_VERBOSE;
137 else if (0 == ::strncasecmp(arg, "watch", 5)) flag_bits &= ~LIBLLDB_LOG_WATCHPOINTS;
138 else if (0 == ::strncasecmp(arg, "temp", 4)) flag_bits &= ~LIBLLDB_LOG_TEMPORARY;
139 else if (0 == ::strncasecmp(arg, "comm", 4)) flag_bits &= ~LIBLLDB_LOG_COMMUNICATION;
140 else if (0 == ::strncasecmp(arg, "conn", 4)) flag_bits &= ~LIBLLDB_LOG_CONNECTION;
141 else if (0 == ::strncasecmp(arg, "host", 4)) flag_bits &= ~LIBLLDB_LOG_HOST;
142 else if (0 == ::strncasecmp(arg, "unwind", 6)) flag_bits &= ~LIBLLDB_LOG_UNWIND;
143 else if (0 == ::strncasecmp(arg, "types", 5)) flag_bits &= ~LIBLLDB_LOG_TYPES;
144 else if (0 == ::strncasecmp(arg, "symbol", 6)) flag_bits &= ~LIBLLDB_LOG_SYMBOLS;
145 else if (0 == ::strcasecmp(arg, "system-runtime")) flag_bits &= ~LIBLLDB_LOG_SYSTEM_RUNTIME;
146 else if (0 == ::strncasecmp(arg, "module", 6)) flag_bits &= ~LIBLLDB_LOG_MODULES;
147 else if (0 == ::strncasecmp(arg, "mmap", 4)) flag_bits &= ~LIBLLDB_LOG_MMAP;
148 else if (0 == ::strcasecmp(arg, "os")) flag_bits &= ~LIBLLDB_LOG_OS;
149 else if (0 == ::strcasecmp(arg, "jit")) flag_bits &= ~LIBLLDB_LOG_JIT_LOADER;
150 else if (0 == ::strcasecmp(arg, "language")) flag_bits &= ~LIBLLDB_LOG_LANGUAGE;
153 feedback_strm->Printf ("error: unrecognized log category '%s'\n", arg);
154 ListLogCategories (feedback_strm);
159 log->GetMask().Reset (flag_bits);
162 log->SetStream(lldb::StreamSP());
163 g_log_enabled = false;
171 lldb_private::EnableLog (StreamSP &log_stream_sp, uint32_t log_options, const char **categories, Stream *feedback_strm)
173 // Try see if there already is a log - that way we can reuse its settings.
174 // We could reuse the log in toto, but we don't know that the stream is the same.
177 flag_bits = g_log->GetMask().Get();
181 // Now make a new log with this stream if one was provided
185 g_log->SetStream(log_stream_sp);
187 g_log = new Log(log_stream_sp);
192 for (size_t i=0; categories[i] != NULL; ++i)
194 const char *arg = categories[i];
196 if (0 == ::strcasecmp(arg, "all")) flag_bits |= LIBLLDB_LOG_ALL;
197 else if (0 == ::strcasecmp(arg, "api")) flag_bits |= LIBLLDB_LOG_API;
198 else if (0 == ::strncasecmp(arg, "break", 5)) flag_bits |= LIBLLDB_LOG_BREAKPOINTS;
199 else if (0 == ::strcasecmp(arg, "commands")) flag_bits |= LIBLLDB_LOG_COMMANDS;
200 else if (0 == ::strncasecmp(arg, "commu", 5)) flag_bits |= LIBLLDB_LOG_COMMUNICATION;
201 else if (0 == ::strncasecmp(arg, "conn", 4)) flag_bits |= LIBLLDB_LOG_CONNECTION;
202 else if (0 == ::strcasecmp(arg, "default")) flag_bits |= LIBLLDB_LOG_DEFAULT;
203 else if (0 == ::strcasecmp(arg, "dyld")) flag_bits |= LIBLLDB_LOG_DYNAMIC_LOADER;
204 else if (0 == ::strncasecmp(arg, "event", 5)) flag_bits |= LIBLLDB_LOG_EVENTS;
205 else if (0 == ::strncasecmp(arg, "expr", 4)) flag_bits |= LIBLLDB_LOG_EXPRESSIONS;
206 else if (0 == ::strncasecmp(arg, "host", 4)) flag_bits |= LIBLLDB_LOG_HOST;
207 else if (0 == ::strncasecmp(arg, "mmap", 4)) flag_bits |= LIBLLDB_LOG_MMAP;
208 else if (0 == ::strncasecmp(arg, "module", 6)) flag_bits |= LIBLLDB_LOG_MODULES;
209 else if (0 == ::strncasecmp(arg, "object", 6)) flag_bits |= LIBLLDB_LOG_OBJECT;
210 else if (0 == ::strcasecmp(arg, "os")) flag_bits |= LIBLLDB_LOG_OS;
211 else if (0 == ::strcasecmp(arg, "platform")) flag_bits |= LIBLLDB_LOG_PLATFORM;
212 else if (0 == ::strcasecmp(arg, "process")) flag_bits |= LIBLLDB_LOG_PROCESS;
213 else if (0 == ::strcasecmp(arg, "script")) flag_bits |= LIBLLDB_LOG_SCRIPT;
214 else if (0 == ::strcasecmp(arg, "state")) flag_bits |= LIBLLDB_LOG_STATE;
215 else if (0 == ::strcasecmp(arg, "step")) flag_bits |= LIBLLDB_LOG_STEP;
216 else if (0 == ::strncasecmp(arg, "symbol", 6)) flag_bits |= LIBLLDB_LOG_SYMBOLS;
217 else if (0 == ::strcasecmp(arg, "system-runtime")) flag_bits |= LIBLLDB_LOG_SYSTEM_RUNTIME;
218 else if (0 == ::strcasecmp(arg, "target")) flag_bits |= LIBLLDB_LOG_TARGET;
219 else if (0 == ::strncasecmp(arg, "temp", 4)) flag_bits |= LIBLLDB_LOG_TEMPORARY;
220 else if (0 == ::strcasecmp(arg, "thread")) flag_bits |= LIBLLDB_LOG_THREAD;
221 else if (0 == ::strncasecmp(arg, "types", 5)) flag_bits |= LIBLLDB_LOG_TYPES;
222 else if (0 == ::strncasecmp(arg, "unwind", 6)) flag_bits |= LIBLLDB_LOG_UNWIND;
223 else if (0 == ::strcasecmp(arg, "verbose")) flag_bits |= LIBLLDB_LOG_VERBOSE;
224 else if (0 == ::strncasecmp(arg, "watch", 5)) flag_bits |= LIBLLDB_LOG_WATCHPOINTS;
225 else if (0 == ::strcasecmp(arg, "jit")) flag_bits |= LIBLLDB_LOG_JIT_LOADER;
226 else if (0 == ::strcasecmp(arg, "language")) flag_bits |= LIBLLDB_LOG_LANGUAGE;
229 feedback_strm->Printf("error: unrecognized log category '%s'\n", arg);
230 ListLogCategories (feedback_strm);
235 g_log->GetMask().Reset(flag_bits);
236 g_log->GetOptions().Reset(log_options);
238 g_log_enabled = true;
244 lldb_private::ListLogCategories (Stream *strm)
246 strm->Printf("Logging categories for 'lldb':\n"
247 " all - turn on all available logging categories\n"
248 " api - enable logging of API calls and return values\n"
249 " break - log breakpoints\n"
250 " commands - log command argument parsing\n"
251 " communication - log communication activities\n"
252 " connection - log connection details\n"
253 " default - enable the default set of logging categories for liblldb\n"
254 " dyld - log shared library related activities\n"
255 " events - log broadcaster, listener and event queue activities\n"
256 " expr - log expressions\n"
257 " host - log host activities\n"
258 " jit - log JIT events in the target\n"
259 " language - log language runtime events\n"
260 " mmap - log mmap related activities\n"
261 " module - log module activities such as when modules are created, destroyed, replaced, and more\n"
262 " object - log object construction/destruction for important objects\n"
263 " os - log OperatingSystem plugin related activities\n"
264 " platform - log platform events and activities\n"
265 " process - log process events and activities\n"
266 " script - log events about the script interpreter\n"
267 " state - log private and public process state changes\n"
268 " step - log step related activities\n"
269 " symbol - log symbol related issues and warnings\n"
270 " system-runtime - log system runtime events\n"
271 " target - log target events and activities\n"
272 " thread - log thread events and activities\n"
273 " types - log type system related activities\n"
274 " unwind - log stack unwind activities\n"
275 " verbose - enable verbose logging\n"
276 " watch - log watchpoint related activities\n");