130fdc8d8SChris Lattner //===-- CommandObjectLog.cpp ------------------------------------*- C++ -*-===//
230fdc8d8SChris Lattner //
32946cd70SChandler Carruth // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
42946cd70SChandler Carruth // See https://llvm.org/LICENSE.txt for license information.
52946cd70SChandler Carruth // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
630fdc8d8SChris Lattner //
730fdc8d8SChris Lattner //===----------------------------------------------------------------------===//
830fdc8d8SChris Lattner 
926cac3afSEugene Zelenko #include "CommandObjectLog.h"
1030fdc8d8SChris Lattner #include "lldb/Core/Debugger.h"
1130fdc8d8SChris Lattner #include "lldb/Core/Module.h"
1230fdc8d8SChris Lattner #include "lldb/Core/StreamFile.h"
133eb2b44dSZachary Turner #include "lldb/Host/OptionParser.h"
144be3990fSSean Callanan #include "lldb/Interpreter/CommandInterpreter.h"
1530fdc8d8SChris Lattner #include "lldb/Interpreter/CommandReturnObject.h"
1647cbf4a0SPavel Labath #include "lldb/Interpreter/OptionArgParser.h"
17b9c1b51eSKate Stone #include "lldb/Interpreter/Options.h"
1830fdc8d8SChris Lattner #include "lldb/Symbol/LineTable.h"
1930fdc8d8SChris Lattner #include "lldb/Symbol/ObjectFile.h"
2030fdc8d8SChris Lattner #include "lldb/Symbol/SymbolFile.h"
2130fdc8d8SChris Lattner #include "lldb/Symbol/SymbolVendor.h"
2230fdc8d8SChris Lattner #include "lldb/Target/Process.h"
2330fdc8d8SChris Lattner #include "lldb/Target/Target.h"
24145d95c9SPavel Labath #include "lldb/Utility/Args.h"
255713a05bSZachary Turner #include "lldb/Utility/FileSpec.h"
266f9e6901SZachary Turner #include "lldb/Utility/Log.h"
27bf9a7730SZachary Turner #include "lldb/Utility/RegularExpression.h"
28bf9a7730SZachary Turner #include "lldb/Utility/Stream.h"
2938d0632eSPavel Labath #include "lldb/Utility/Timer.h"
3030fdc8d8SChris Lattner 
3130fdc8d8SChris Lattner using namespace lldb;
3230fdc8d8SChris Lattner using namespace lldb_private;
3330fdc8d8SChris Lattner 
34ec67e734SRaphael Isemann #define LLDB_OPTIONS_log
35ec67e734SRaphael Isemann #include "CommandOptions.inc"
361f0f5b5bSZachary Turner 
37b9c1b51eSKate Stone class CommandObjectLogEnable : public CommandObjectParsed {
3830fdc8d8SChris Lattner public:
3930fdc8d8SChris Lattner   // Constructors and Destructors
40b9c1b51eSKate Stone   CommandObjectLogEnable(CommandInterpreter &interpreter)
41b9c1b51eSKate Stone       : CommandObjectParsed(interpreter, "log enable",
4230fdc8d8SChris Lattner                             "Enable logging for a single log channel.",
4326cac3afSEugene Zelenko                             nullptr),
44b9c1b51eSKate Stone         m_options() {
45ceb6b139SCaroline Tice     CommandArgumentEntry arg1;
46ceb6b139SCaroline Tice     CommandArgumentEntry arg2;
47405fe67fSCaroline Tice     CommandArgumentData channel_arg;
48ceb6b139SCaroline Tice     CommandArgumentData category_arg;
49405fe67fSCaroline Tice 
50405fe67fSCaroline Tice     // Define the first (and only) variant of this arg.
51405fe67fSCaroline Tice     channel_arg.arg_type = eArgTypeLogChannel;
52405fe67fSCaroline Tice     channel_arg.arg_repetition = eArgRepeatPlain;
53405fe67fSCaroline Tice 
54b9c1b51eSKate Stone     // There is only one variant this argument could be; put it into the
55b9c1b51eSKate Stone     // argument entry.
56ceb6b139SCaroline Tice     arg1.push_back(channel_arg);
57ceb6b139SCaroline Tice 
58ceb6b139SCaroline Tice     category_arg.arg_type = eArgTypeLogCategory;
59ceb6b139SCaroline Tice     category_arg.arg_repetition = eArgRepeatPlus;
60ceb6b139SCaroline Tice 
61ceb6b139SCaroline Tice     arg2.push_back(category_arg);
62405fe67fSCaroline Tice 
63405fe67fSCaroline Tice     // Push the data for the first argument into the m_arguments vector.
64ceb6b139SCaroline Tice     m_arguments.push_back(arg1);
65ceb6b139SCaroline Tice     m_arguments.push_back(arg2);
6630fdc8d8SChris Lattner   }
6730fdc8d8SChris Lattner 
6826cac3afSEugene Zelenko   ~CommandObjectLogEnable() override = default;
6930fdc8d8SChris Lattner 
70b9c1b51eSKate Stone   Options *GetOptions() override { return &m_options; }
7130fdc8d8SChris Lattner 
72b9c1b51eSKate Stone   class CommandOptions : public Options {
7330fdc8d8SChris Lattner   public:
74b9c1b51eSKate Stone     CommandOptions() : Options(), log_file(), log_options(0) {}
7530fdc8d8SChris Lattner 
7626cac3afSEugene Zelenko     ~CommandOptions() override = default;
7730fdc8d8SChris Lattner 
7897206d57SZachary Turner     Status SetOptionValue(uint32_t option_idx, llvm::StringRef option_arg,
79b9c1b51eSKate Stone                           ExecutionContext *execution_context) override {
8097206d57SZachary Turner       Status error;
813bcdfc0eSGreg Clayton       const int short_option = m_getopt_table[option_idx].val;
8230fdc8d8SChris Lattner 
83b9c1b51eSKate Stone       switch (short_option) {
84b9c1b51eSKate Stone       case 'f':
858f3be7a3SJonas Devlieghere         log_file.SetFile(option_arg, FileSpec::Style::native);
868f3be7a3SJonas Devlieghere         FileSystem::Instance().Resolve(log_file);
87b9c1b51eSKate Stone         break;
88b9c1b51eSKate Stone       case 't':
89b9c1b51eSKate Stone         log_options |= LLDB_LOG_OPTION_THREADSAFE;
90b9c1b51eSKate Stone         break;
91b9c1b51eSKate Stone       case 'v':
92b9c1b51eSKate Stone         log_options |= LLDB_LOG_OPTION_VERBOSE;
93b9c1b51eSKate Stone         break;
94b9c1b51eSKate Stone       case 's':
95b9c1b51eSKate Stone         log_options |= LLDB_LOG_OPTION_PREPEND_SEQUENCE;
96b9c1b51eSKate Stone         break;
97b9c1b51eSKate Stone       case 'T':
98b9c1b51eSKate Stone         log_options |= LLDB_LOG_OPTION_PREPEND_TIMESTAMP;
99b9c1b51eSKate Stone         break;
100b9c1b51eSKate Stone       case 'p':
101b9c1b51eSKate Stone         log_options |= LLDB_LOG_OPTION_PREPEND_PROC_AND_THREAD;
102b9c1b51eSKate Stone         break;
103b9c1b51eSKate Stone       case 'n':
104b9c1b51eSKate Stone         log_options |= LLDB_LOG_OPTION_PREPEND_THREAD_NAME;
105b9c1b51eSKate Stone         break;
106b9c1b51eSKate Stone       case 'S':
107b9c1b51eSKate Stone         log_options |= LLDB_LOG_OPTION_BACKTRACE;
108b9c1b51eSKate Stone         break;
109b9c1b51eSKate Stone       case 'a':
110b9c1b51eSKate Stone         log_options |= LLDB_LOG_OPTION_APPEND;
111b9c1b51eSKate Stone         break;
112107d9bbdSPavel Labath       case 'F':
113107d9bbdSPavel Labath         log_options |= LLDB_LOG_OPTION_PREPEND_FILE_FUNCTION;
11490505a0aSPavel Labath         break;
11530fdc8d8SChris Lattner       default:
11636162014SRaphael Isemann         llvm_unreachable("Unimplemented option");
11730fdc8d8SChris Lattner       }
11830fdc8d8SChris Lattner 
11930fdc8d8SChris Lattner       return error;
12030fdc8d8SChris Lattner     }
12130fdc8d8SChris Lattner 
122b9c1b51eSKate Stone     void OptionParsingStarting(ExecutionContext *execution_context) override {
123889037d7SGreg Clayton       log_file.Clear();
12430fdc8d8SChris Lattner       log_options = 0;
12530fdc8d8SChris Lattner     }
12630fdc8d8SChris Lattner 
1271f0f5b5bSZachary Turner     llvm::ArrayRef<OptionDefinition> GetDefinitions() override {
12870602439SZachary Turner       return llvm::makeArrayRef(g_log_options);
1291f0f5b5bSZachary Turner     }
13030fdc8d8SChris Lattner 
13130fdc8d8SChris Lattner     // Instance variables to hold the values for command options.
13230fdc8d8SChris Lattner 
133889037d7SGreg Clayton     FileSpec log_file;
13430fdc8d8SChris Lattner     uint32_t log_options;
13530fdc8d8SChris Lattner   };
13630fdc8d8SChris Lattner 
13730fdc8d8SChris Lattner protected:
138b9c1b51eSKate Stone   bool DoExecute(Args &args, CommandReturnObject &result) override {
139b9c1b51eSKate Stone     if (args.GetArgumentCount() < 2) {
140b9c1b51eSKate Stone       result.AppendErrorWithFormat(
141b9c1b51eSKate Stone           "%s takes a log channel and one or more log types.\n",
142b9c1b51eSKate Stone           m_cmd_name.c_str());
143434b81d0SRaphael Isemann       result.SetStatus(eReturnStatusFailed);
14411eb9c64SZachary Turner       return false;
14511eb9c64SZachary Turner     }
14611eb9c64SZachary Turner 
14711eb9c64SZachary Turner     // Store into a std::string since we're about to shift the channel off.
148*0d9a201eSRaphael Isemann     const std::string channel = args[0].ref();
1495a988416SJim Ingham     args.Shift(); // Shift off the channel
150889037d7SGreg Clayton     char log_file[PATH_MAX];
151889037d7SGreg Clayton     if (m_options.log_file)
152889037d7SGreg Clayton       m_options.log_file.GetPath(log_file, sizeof(log_file));
153889037d7SGreg Clayton     else
154889037d7SGreg Clayton       log_file[0] = '\0';
155775588c0SPavel Labath 
156775588c0SPavel Labath     std::string error;
157775588c0SPavel Labath     llvm::raw_string_ostream error_stream(error);
15857179860SJonas Devlieghere     bool success =
15957179860SJonas Devlieghere         GetDebugger().EnableLog(channel, args.GetArgumentArrayRef(), log_file,
16057179860SJonas Devlieghere                                 m_options.log_options, error_stream);
161775588c0SPavel Labath     result.GetErrorStream() << error_stream.str();
162775588c0SPavel Labath 
1635a988416SJim Ingham     if (success)
1645a988416SJim Ingham       result.SetStatus(eReturnStatusSuccessFinishNoResult);
1655a988416SJim Ingham     else
1665a988416SJim Ingham       result.SetStatus(eReturnStatusFailed);
1675a988416SJim Ingham     return result.Succeeded();
1685a988416SJim Ingham   }
1695a988416SJim Ingham 
17030fdc8d8SChris Lattner   CommandOptions m_options;
17130fdc8d8SChris Lattner };
17230fdc8d8SChris Lattner 
173b9c1b51eSKate Stone class CommandObjectLogDisable : public CommandObjectParsed {
17430fdc8d8SChris Lattner public:
17530fdc8d8SChris Lattner   // Constructors and Destructors
176b9c1b51eSKate Stone   CommandObjectLogDisable(CommandInterpreter &interpreter)
177b9c1b51eSKate Stone       : CommandObjectParsed(interpreter, "log disable",
1787149fab4SCaroline Tice                             "Disable one or more log channel categories.",
179b9c1b51eSKate Stone                             nullptr) {
1807149fab4SCaroline Tice     CommandArgumentEntry arg1;
1817149fab4SCaroline Tice     CommandArgumentEntry arg2;
182405fe67fSCaroline Tice     CommandArgumentData channel_arg;
1837149fab4SCaroline Tice     CommandArgumentData category_arg;
184405fe67fSCaroline Tice 
185405fe67fSCaroline Tice     // Define the first (and only) variant of this arg.
186405fe67fSCaroline Tice     channel_arg.arg_type = eArgTypeLogChannel;
1877149fab4SCaroline Tice     channel_arg.arg_repetition = eArgRepeatPlain;
188405fe67fSCaroline Tice 
189b9c1b51eSKate Stone     // There is only one variant this argument could be; put it into the
190b9c1b51eSKate Stone     // argument entry.
1917149fab4SCaroline Tice     arg1.push_back(channel_arg);
1927149fab4SCaroline Tice 
1937149fab4SCaroline Tice     category_arg.arg_type = eArgTypeLogCategory;
1947149fab4SCaroline Tice     category_arg.arg_repetition = eArgRepeatPlus;
1957149fab4SCaroline Tice 
1967149fab4SCaroline Tice     arg2.push_back(category_arg);
197405fe67fSCaroline Tice 
198405fe67fSCaroline Tice     // Push the data for the first argument into the m_arguments vector.
1997149fab4SCaroline Tice     m_arguments.push_back(arg1);
2007149fab4SCaroline Tice     m_arguments.push_back(arg2);
20130fdc8d8SChris Lattner   }
20230fdc8d8SChris Lattner 
20326cac3afSEugene Zelenko   ~CommandObjectLogDisable() override = default;
20430fdc8d8SChris Lattner 
2055a988416SJim Ingham protected:
206b9c1b51eSKate Stone   bool DoExecute(Args &args, CommandReturnObject &result) override {
20711eb9c64SZachary Turner     if (args.empty()) {
208b9c1b51eSKate Stone       result.AppendErrorWithFormat(
209b9c1b51eSKate Stone           "%s takes a log channel and one or more log types.\n",
210b9c1b51eSKate Stone           m_cmd_name.c_str());
211434b81d0SRaphael Isemann       result.SetStatus(eReturnStatusFailed);
21211eb9c64SZachary Turner       return false;
21311eb9c64SZachary Turner     }
21411eb9c64SZachary Turner 
215*0d9a201eSRaphael Isemann     const std::string channel = args[0].ref();
21620ad3c40SCaroline Tice     args.Shift(); // Shift off the channel
217fb0d22d6SPavel Labath     if (channel == "all") {
218775588c0SPavel Labath       Log::DisableAllLogChannels();
2195fb8af40SPavel Labath       result.SetStatus(eReturnStatusSuccessFinishNoResult);
220fb0d22d6SPavel Labath     } else {
221775588c0SPavel Labath       std::string error;
222775588c0SPavel Labath       llvm::raw_string_ostream error_stream(error);
2235e336903SPavel Labath       if (Log::DisableLogChannel(channel, args.GetArgumentArrayRef(),
224775588c0SPavel Labath                                  error_stream))
225fb0d22d6SPavel Labath         result.SetStatus(eReturnStatusSuccessFinishNoResult);
226775588c0SPavel Labath       result.GetErrorStream() << error_stream.str();
22730fdc8d8SChris Lattner     }
22830fdc8d8SChris Lattner     return result.Succeeded();
22930fdc8d8SChris Lattner   }
23030fdc8d8SChris Lattner };
23130fdc8d8SChris Lattner 
232b9c1b51eSKate Stone class CommandObjectLogList : public CommandObjectParsed {
23330fdc8d8SChris Lattner public:
23430fdc8d8SChris Lattner   // Constructors and Destructors
235b9c1b51eSKate Stone   CommandObjectLogList(CommandInterpreter &interpreter)
236b9c1b51eSKate Stone       : CommandObjectParsed(interpreter, "log list",
237b9c1b51eSKate Stone                             "List the log categories for one or more log "
238b9c1b51eSKate Stone                             "channels.  If none specified, lists them all.",
239b9c1b51eSKate Stone                             nullptr) {
240405fe67fSCaroline Tice     CommandArgumentEntry arg;
241405fe67fSCaroline Tice     CommandArgumentData channel_arg;
242405fe67fSCaroline Tice 
243405fe67fSCaroline Tice     // Define the first (and only) variant of this arg.
244405fe67fSCaroline Tice     channel_arg.arg_type = eArgTypeLogChannel;
245405fe67fSCaroline Tice     channel_arg.arg_repetition = eArgRepeatStar;
246405fe67fSCaroline Tice 
247b9c1b51eSKate Stone     // There is only one variant this argument could be; put it into the
248b9c1b51eSKate Stone     // argument entry.
249405fe67fSCaroline Tice     arg.push_back(channel_arg);
250405fe67fSCaroline Tice 
251405fe67fSCaroline Tice     // Push the data for the first argument into the m_arguments vector.
252405fe67fSCaroline Tice     m_arguments.push_back(arg);
25330fdc8d8SChris Lattner   }
25430fdc8d8SChris Lattner 
25526cac3afSEugene Zelenko   ~CommandObjectLogList() override = default;
25630fdc8d8SChris Lattner 
2575a988416SJim Ingham protected:
258b9c1b51eSKate Stone   bool DoExecute(Args &args, CommandReturnObject &result) override {
259775588c0SPavel Labath     std::string output;
260775588c0SPavel Labath     llvm::raw_string_ostream output_stream(output);
26111eb9c64SZachary Turner     if (args.empty()) {
262775588c0SPavel Labath       Log::ListAllLogChannels(output_stream);
26330fdc8d8SChris Lattner       result.SetStatus(eReturnStatusSuccessFinishResult);
264b9c1b51eSKate Stone     } else {
265fb0d22d6SPavel Labath       bool success = true;
266fb0d22d6SPavel Labath       for (const auto &entry : args.entries())
267775588c0SPavel Labath         success =
268*0d9a201eSRaphael Isemann             success && Log::ListChannelCategories(entry.ref(), output_stream);
269fb0d22d6SPavel Labath       if (success)
27030fdc8d8SChris Lattner         result.SetStatus(eReturnStatusSuccessFinishResult);
27130fdc8d8SChris Lattner     }
272775588c0SPavel Labath     result.GetOutputStream() << output_stream.str();
27330fdc8d8SChris Lattner     return result.Succeeded();
27430fdc8d8SChris Lattner   }
27530fdc8d8SChris Lattner };
27630fdc8d8SChris Lattner 
277b9c1b51eSKate Stone class CommandObjectLogTimer : public CommandObjectParsed {
27830fdc8d8SChris Lattner public:
27930fdc8d8SChris Lattner   // Constructors and Destructors
280b9c1b51eSKate Stone   CommandObjectLogTimer(CommandInterpreter &interpreter)
281b9c1b51eSKate Stone       : CommandObjectParsed(interpreter, "log timers",
282b9c1b51eSKate Stone                             "Enable, disable, dump, and reset LLDB internal "
283b9c1b51eSKate Stone                             "performance timers.",
284b9c1b51eSKate Stone                             "log timers < enable <depth> | disable | dump | "
285b9c1b51eSKate Stone                             "increment <bool> | reset >") {}
28630fdc8d8SChris Lattner 
28726cac3afSEugene Zelenko   ~CommandObjectLogTimer() override = default;
28830fdc8d8SChris Lattner 
2895a988416SJim Ingham protected:
290b9c1b51eSKate Stone   bool DoExecute(Args &args, CommandReturnObject &result) override {
29130fdc8d8SChris Lattner     result.SetStatus(eReturnStatusFailed);
29230fdc8d8SChris Lattner 
29311eb9c64SZachary Turner     if (args.GetArgumentCount() == 1) {
294*0d9a201eSRaphael Isemann       auto sub_command = args[0].ref();
29530fdc8d8SChris Lattner 
29611eb9c64SZachary Turner       if (sub_command.equals_lower("enable")) {
29730fdc8d8SChris Lattner         Timer::SetDisplayDepth(UINT32_MAX);
29830fdc8d8SChris Lattner         result.SetStatus(eReturnStatusSuccessFinishNoResult);
29911eb9c64SZachary Turner       } else if (sub_command.equals_lower("disable")) {
30030fdc8d8SChris Lattner         Timer::DumpCategoryTimes(&result.GetOutputStream());
30130fdc8d8SChris Lattner         Timer::SetDisplayDepth(0);
30230fdc8d8SChris Lattner         result.SetStatus(eReturnStatusSuccessFinishResult);
30311eb9c64SZachary Turner       } else if (sub_command.equals_lower("dump")) {
30430fdc8d8SChris Lattner         Timer::DumpCategoryTimes(&result.GetOutputStream());
30530fdc8d8SChris Lattner         result.SetStatus(eReturnStatusSuccessFinishResult);
30611eb9c64SZachary Turner       } else if (sub_command.equals_lower("reset")) {
30730fdc8d8SChris Lattner         Timer::ResetCategoryTimes();
30830fdc8d8SChris Lattner         result.SetStatus(eReturnStatusSuccessFinishResult);
30930fdc8d8SChris Lattner       }
31011eb9c64SZachary Turner     } else if (args.GetArgumentCount() == 2) {
311*0d9a201eSRaphael Isemann       auto sub_command = args[0].ref();
312*0d9a201eSRaphael Isemann       auto param = args[1].ref();
313932725faSJim Ingham 
31411eb9c64SZachary Turner       if (sub_command.equals_lower("enable")) {
31511eb9c64SZachary Turner         uint32_t depth;
31611eb9c64SZachary Turner         if (param.consumeInteger(0, depth)) {
317b9c1b51eSKate Stone           result.AppendError(
318b9c1b51eSKate Stone               "Could not convert enable depth to an unsigned integer.");
31911eb9c64SZachary Turner         } else {
32011eb9c64SZachary Turner           Timer::SetDisplayDepth(depth);
32111eb9c64SZachary Turner           result.SetStatus(eReturnStatusSuccessFinishNoResult);
322932725faSJim Ingham         }
32311eb9c64SZachary Turner       } else if (sub_command.equals_lower("increment")) {
324f7f4f501SJim Ingham         bool success;
32547cbf4a0SPavel Labath         bool increment = OptionArgParser::ToBoolean(param, false, &success);
326b9c1b51eSKate Stone         if (success) {
327f7f4f501SJim Ingham           Timer::SetQuiet(!increment);
328f7f4f501SJim Ingham           result.SetStatus(eReturnStatusSuccessFinishNoResult);
329b9c1b51eSKate Stone         } else
330f7f4f501SJim Ingham           result.AppendError("Could not convert increment value to boolean.");
331f7f4f501SJim Ingham       }
332932725faSJim Ingham     }
333932725faSJim Ingham 
334b9c1b51eSKate Stone     if (!result.Succeeded()) {
33530fdc8d8SChris Lattner       result.AppendError("Missing subcommand");
33630fdc8d8SChris Lattner       result.AppendErrorWithFormat("Usage: %s\n", m_cmd_syntax.c_str());
33730fdc8d8SChris Lattner     }
33830fdc8d8SChris Lattner     return result.Succeeded();
33930fdc8d8SChris Lattner   }
34030fdc8d8SChris Lattner };
34130fdc8d8SChris Lattner 
3427428a18cSKate Stone CommandObjectLog::CommandObjectLog(CommandInterpreter &interpreter)
343b9c1b51eSKate Stone     : CommandObjectMultiword(interpreter, "log",
344b9c1b51eSKate Stone                              "Commands controlling LLDB internal logging.",
345b9c1b51eSKate Stone                              "log <subcommand> [<command-options>]") {
346b9c1b51eSKate Stone   LoadSubCommand("enable",
347b9c1b51eSKate Stone                  CommandObjectSP(new CommandObjectLogEnable(interpreter)));
348b9c1b51eSKate Stone   LoadSubCommand("disable",
349b9c1b51eSKate Stone                  CommandObjectSP(new CommandObjectLogDisable(interpreter)));
350b9c1b51eSKate Stone   LoadSubCommand("list",
351b9c1b51eSKate Stone                  CommandObjectSP(new CommandObjectLogList(interpreter)));
352b9c1b51eSKate Stone   LoadSubCommand("timers",
353b9c1b51eSKate Stone                  CommandObjectSP(new CommandObjectLogTimer(interpreter)));
35430fdc8d8SChris Lattner }
35530fdc8d8SChris Lattner 
35626cac3afSEugene Zelenko CommandObjectLog::~CommandObjectLog() = default;
357