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:
116*36162014SRaphael 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());
14311eb9c64SZachary Turner       return false;
14411eb9c64SZachary Turner     }
14511eb9c64SZachary Turner 
14611eb9c64SZachary Turner     // Store into a std::string since we're about to shift the channel off.
14714f6b2c0SZachary Turner     const std::string channel = args[0].ref;
1485a988416SJim Ingham     args.Shift(); // Shift off the channel
149889037d7SGreg Clayton     char log_file[PATH_MAX];
150889037d7SGreg Clayton     if (m_options.log_file)
151889037d7SGreg Clayton       m_options.log_file.GetPath(log_file, sizeof(log_file));
152889037d7SGreg Clayton     else
153889037d7SGreg Clayton       log_file[0] = '\0';
154775588c0SPavel Labath 
155775588c0SPavel Labath     std::string error;
156775588c0SPavel Labath     llvm::raw_string_ostream error_stream(error);
15757179860SJonas Devlieghere     bool success =
15857179860SJonas Devlieghere         GetDebugger().EnableLog(channel, args.GetArgumentArrayRef(), log_file,
15957179860SJonas Devlieghere                                 m_options.log_options, error_stream);
160775588c0SPavel Labath     result.GetErrorStream() << error_stream.str();
161775588c0SPavel Labath 
1625a988416SJim Ingham     if (success)
1635a988416SJim Ingham       result.SetStatus(eReturnStatusSuccessFinishNoResult);
1645a988416SJim Ingham     else
1655a988416SJim Ingham       result.SetStatus(eReturnStatusFailed);
1665a988416SJim Ingham     return result.Succeeded();
1675a988416SJim Ingham   }
1685a988416SJim Ingham 
16930fdc8d8SChris Lattner   CommandOptions m_options;
17030fdc8d8SChris Lattner };
17130fdc8d8SChris Lattner 
172b9c1b51eSKate Stone class CommandObjectLogDisable : public CommandObjectParsed {
17330fdc8d8SChris Lattner public:
17430fdc8d8SChris Lattner   // Constructors and Destructors
175b9c1b51eSKate Stone   CommandObjectLogDisable(CommandInterpreter &interpreter)
176b9c1b51eSKate Stone       : CommandObjectParsed(interpreter, "log disable",
1777149fab4SCaroline Tice                             "Disable one or more log channel categories.",
178b9c1b51eSKate Stone                             nullptr) {
1797149fab4SCaroline Tice     CommandArgumentEntry arg1;
1807149fab4SCaroline Tice     CommandArgumentEntry arg2;
181405fe67fSCaroline Tice     CommandArgumentData channel_arg;
1827149fab4SCaroline Tice     CommandArgumentData category_arg;
183405fe67fSCaroline Tice 
184405fe67fSCaroline Tice     // Define the first (and only) variant of this arg.
185405fe67fSCaroline Tice     channel_arg.arg_type = eArgTypeLogChannel;
1867149fab4SCaroline Tice     channel_arg.arg_repetition = eArgRepeatPlain;
187405fe67fSCaroline Tice 
188b9c1b51eSKate Stone     // There is only one variant this argument could be; put it into the
189b9c1b51eSKate Stone     // argument entry.
1907149fab4SCaroline Tice     arg1.push_back(channel_arg);
1917149fab4SCaroline Tice 
1927149fab4SCaroline Tice     category_arg.arg_type = eArgTypeLogCategory;
1937149fab4SCaroline Tice     category_arg.arg_repetition = eArgRepeatPlus;
1947149fab4SCaroline Tice 
1957149fab4SCaroline Tice     arg2.push_back(category_arg);
196405fe67fSCaroline Tice 
197405fe67fSCaroline Tice     // Push the data for the first argument into the m_arguments vector.
1987149fab4SCaroline Tice     m_arguments.push_back(arg1);
1997149fab4SCaroline Tice     m_arguments.push_back(arg2);
20030fdc8d8SChris Lattner   }
20130fdc8d8SChris Lattner 
20226cac3afSEugene Zelenko   ~CommandObjectLogDisable() override = default;
20330fdc8d8SChris Lattner 
2045a988416SJim Ingham protected:
205b9c1b51eSKate Stone   bool DoExecute(Args &args, CommandReturnObject &result) override {
20611eb9c64SZachary Turner     if (args.empty()) {
207b9c1b51eSKate Stone       result.AppendErrorWithFormat(
208b9c1b51eSKate Stone           "%s takes a log channel and one or more log types.\n",
209b9c1b51eSKate Stone           m_cmd_name.c_str());
21011eb9c64SZachary Turner       return false;
21111eb9c64SZachary Turner     }
21211eb9c64SZachary Turner 
21314f6b2c0SZachary Turner     const std::string channel = args[0].ref;
21420ad3c40SCaroline Tice     args.Shift(); // Shift off the channel
215fb0d22d6SPavel Labath     if (channel == "all") {
216775588c0SPavel Labath       Log::DisableAllLogChannels();
2175fb8af40SPavel Labath       result.SetStatus(eReturnStatusSuccessFinishNoResult);
218fb0d22d6SPavel Labath     } else {
219775588c0SPavel Labath       std::string error;
220775588c0SPavel Labath       llvm::raw_string_ostream error_stream(error);
2215e336903SPavel Labath       if (Log::DisableLogChannel(channel, args.GetArgumentArrayRef(),
222775588c0SPavel Labath                                  error_stream))
223fb0d22d6SPavel Labath         result.SetStatus(eReturnStatusSuccessFinishNoResult);
224775588c0SPavel Labath       result.GetErrorStream() << error_stream.str();
22530fdc8d8SChris Lattner     }
22630fdc8d8SChris Lattner     return result.Succeeded();
22730fdc8d8SChris Lattner   }
22830fdc8d8SChris Lattner };
22930fdc8d8SChris Lattner 
230b9c1b51eSKate Stone class CommandObjectLogList : public CommandObjectParsed {
23130fdc8d8SChris Lattner public:
23230fdc8d8SChris Lattner   // Constructors and Destructors
233b9c1b51eSKate Stone   CommandObjectLogList(CommandInterpreter &interpreter)
234b9c1b51eSKate Stone       : CommandObjectParsed(interpreter, "log list",
235b9c1b51eSKate Stone                             "List the log categories for one or more log "
236b9c1b51eSKate Stone                             "channels.  If none specified, lists them all.",
237b9c1b51eSKate Stone                             nullptr) {
238405fe67fSCaroline Tice     CommandArgumentEntry arg;
239405fe67fSCaroline Tice     CommandArgumentData channel_arg;
240405fe67fSCaroline Tice 
241405fe67fSCaroline Tice     // Define the first (and only) variant of this arg.
242405fe67fSCaroline Tice     channel_arg.arg_type = eArgTypeLogChannel;
243405fe67fSCaroline Tice     channel_arg.arg_repetition = eArgRepeatStar;
244405fe67fSCaroline Tice 
245b9c1b51eSKate Stone     // There is only one variant this argument could be; put it into the
246b9c1b51eSKate Stone     // argument entry.
247405fe67fSCaroline Tice     arg.push_back(channel_arg);
248405fe67fSCaroline Tice 
249405fe67fSCaroline Tice     // Push the data for the first argument into the m_arguments vector.
250405fe67fSCaroline Tice     m_arguments.push_back(arg);
25130fdc8d8SChris Lattner   }
25230fdc8d8SChris Lattner 
25326cac3afSEugene Zelenko   ~CommandObjectLogList() override = default;
25430fdc8d8SChris Lattner 
2555a988416SJim Ingham protected:
256b9c1b51eSKate Stone   bool DoExecute(Args &args, CommandReturnObject &result) override {
257775588c0SPavel Labath     std::string output;
258775588c0SPavel Labath     llvm::raw_string_ostream output_stream(output);
25911eb9c64SZachary Turner     if (args.empty()) {
260775588c0SPavel Labath       Log::ListAllLogChannels(output_stream);
26130fdc8d8SChris Lattner       result.SetStatus(eReturnStatusSuccessFinishResult);
262b9c1b51eSKate Stone     } else {
263fb0d22d6SPavel Labath       bool success = true;
264fb0d22d6SPavel Labath       for (const auto &entry : args.entries())
265775588c0SPavel Labath         success =
266775588c0SPavel Labath             success && Log::ListChannelCategories(entry.ref, output_stream);
267fb0d22d6SPavel Labath       if (success)
26830fdc8d8SChris Lattner         result.SetStatus(eReturnStatusSuccessFinishResult);
26930fdc8d8SChris Lattner     }
270775588c0SPavel Labath     result.GetOutputStream() << output_stream.str();
27130fdc8d8SChris Lattner     return result.Succeeded();
27230fdc8d8SChris Lattner   }
27330fdc8d8SChris Lattner };
27430fdc8d8SChris Lattner 
275b9c1b51eSKate Stone class CommandObjectLogTimer : public CommandObjectParsed {
27630fdc8d8SChris Lattner public:
27730fdc8d8SChris Lattner   // Constructors and Destructors
278b9c1b51eSKate Stone   CommandObjectLogTimer(CommandInterpreter &interpreter)
279b9c1b51eSKate Stone       : CommandObjectParsed(interpreter, "log timers",
280b9c1b51eSKate Stone                             "Enable, disable, dump, and reset LLDB internal "
281b9c1b51eSKate Stone                             "performance timers.",
282b9c1b51eSKate Stone                             "log timers < enable <depth> | disable | dump | "
283b9c1b51eSKate Stone                             "increment <bool> | reset >") {}
28430fdc8d8SChris Lattner 
28526cac3afSEugene Zelenko   ~CommandObjectLogTimer() override = default;
28630fdc8d8SChris Lattner 
2875a988416SJim Ingham protected:
288b9c1b51eSKate Stone   bool DoExecute(Args &args, CommandReturnObject &result) override {
28930fdc8d8SChris Lattner     result.SetStatus(eReturnStatusFailed);
29030fdc8d8SChris Lattner 
29111eb9c64SZachary Turner     if (args.GetArgumentCount() == 1) {
29214f6b2c0SZachary Turner       auto sub_command = args[0].ref;
29330fdc8d8SChris Lattner 
29411eb9c64SZachary Turner       if (sub_command.equals_lower("enable")) {
29530fdc8d8SChris Lattner         Timer::SetDisplayDepth(UINT32_MAX);
29630fdc8d8SChris Lattner         result.SetStatus(eReturnStatusSuccessFinishNoResult);
29711eb9c64SZachary Turner       } else if (sub_command.equals_lower("disable")) {
29830fdc8d8SChris Lattner         Timer::DumpCategoryTimes(&result.GetOutputStream());
29930fdc8d8SChris Lattner         Timer::SetDisplayDepth(0);
30030fdc8d8SChris Lattner         result.SetStatus(eReturnStatusSuccessFinishResult);
30111eb9c64SZachary Turner       } else if (sub_command.equals_lower("dump")) {
30230fdc8d8SChris Lattner         Timer::DumpCategoryTimes(&result.GetOutputStream());
30330fdc8d8SChris Lattner         result.SetStatus(eReturnStatusSuccessFinishResult);
30411eb9c64SZachary Turner       } else if (sub_command.equals_lower("reset")) {
30530fdc8d8SChris Lattner         Timer::ResetCategoryTimes();
30630fdc8d8SChris Lattner         result.SetStatus(eReturnStatusSuccessFinishResult);
30730fdc8d8SChris Lattner       }
30811eb9c64SZachary Turner     } else if (args.GetArgumentCount() == 2) {
30914f6b2c0SZachary Turner       auto sub_command = args[0].ref;
31014f6b2c0SZachary Turner       auto param = args[1].ref;
311932725faSJim Ingham 
31211eb9c64SZachary Turner       if (sub_command.equals_lower("enable")) {
31311eb9c64SZachary Turner         uint32_t depth;
31411eb9c64SZachary Turner         if (param.consumeInteger(0, depth)) {
315b9c1b51eSKate Stone           result.AppendError(
316b9c1b51eSKate Stone               "Could not convert enable depth to an unsigned integer.");
31711eb9c64SZachary Turner         } else {
31811eb9c64SZachary Turner           Timer::SetDisplayDepth(depth);
31911eb9c64SZachary Turner           result.SetStatus(eReturnStatusSuccessFinishNoResult);
320932725faSJim Ingham         }
32111eb9c64SZachary Turner       } else if (sub_command.equals_lower("increment")) {
322f7f4f501SJim Ingham         bool success;
32347cbf4a0SPavel Labath         bool increment = OptionArgParser::ToBoolean(param, false, &success);
324b9c1b51eSKate Stone         if (success) {
325f7f4f501SJim Ingham           Timer::SetQuiet(!increment);
326f7f4f501SJim Ingham           result.SetStatus(eReturnStatusSuccessFinishNoResult);
327b9c1b51eSKate Stone         } else
328f7f4f501SJim Ingham           result.AppendError("Could not convert increment value to boolean.");
329f7f4f501SJim Ingham       }
330932725faSJim Ingham     }
331932725faSJim Ingham 
332b9c1b51eSKate Stone     if (!result.Succeeded()) {
33330fdc8d8SChris Lattner       result.AppendError("Missing subcommand");
33430fdc8d8SChris Lattner       result.AppendErrorWithFormat("Usage: %s\n", m_cmd_syntax.c_str());
33530fdc8d8SChris Lattner     }
33630fdc8d8SChris Lattner     return result.Succeeded();
33730fdc8d8SChris Lattner   }
33830fdc8d8SChris Lattner };
33930fdc8d8SChris Lattner 
3407428a18cSKate Stone CommandObjectLog::CommandObjectLog(CommandInterpreter &interpreter)
341b9c1b51eSKate Stone     : CommandObjectMultiword(interpreter, "log",
342b9c1b51eSKate Stone                              "Commands controlling LLDB internal logging.",
343b9c1b51eSKate Stone                              "log <subcommand> [<command-options>]") {
344b9c1b51eSKate Stone   LoadSubCommand("enable",
345b9c1b51eSKate Stone                  CommandObjectSP(new CommandObjectLogEnable(interpreter)));
346b9c1b51eSKate Stone   LoadSubCommand("disable",
347b9c1b51eSKate Stone                  CommandObjectSP(new CommandObjectLogDisable(interpreter)));
348b9c1b51eSKate Stone   LoadSubCommand("list",
349b9c1b51eSKate Stone                  CommandObjectSP(new CommandObjectLogList(interpreter)));
350b9c1b51eSKate Stone   LoadSubCommand("timers",
351b9c1b51eSKate Stone                  CommandObjectSP(new CommandObjectLogTimer(interpreter)));
35230fdc8d8SChris Lattner }
35330fdc8d8SChris Lattner 
35426cac3afSEugene Zelenko CommandObjectLog::~CommandObjectLog() = default;
355