180814287SRaphael Isemann //===-- OptionGroupValueObjectDisplay.cpp ---------------------------------===//
284c39663SGreg Clayton //
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
684c39663SGreg Clayton //
784c39663SGreg Clayton //===----------------------------------------------------------------------===//
884c39663SGreg Clayton 
94bee32e5SJohnny Chen #include "lldb/Interpreter/OptionGroupValueObjectDisplay.h"
1084c39663SGreg Clayton 
114d93b8cdSEnrico Granata #include "lldb/DataFormatters/ValueObjectPrinter.h"
123eb2b44dSZachary Turner #include "lldb/Host/OptionParser.h"
132837b766SJim Ingham #include "lldb/Interpreter/CommandInterpreter.h"
1447cbf4a0SPavel Labath #include "lldb/Interpreter/OptionArgParser.h"
15b9c1b51eSKate Stone #include "lldb/Target/Target.h"
1684c39663SGreg Clayton 
171f0f5b5bSZachary Turner #include "llvm/ADT/ArrayRef.h"
181f0f5b5bSZachary Turner 
1984c39663SGreg Clayton using namespace lldb;
2084c39663SGreg Clayton using namespace lldb_private;
2184c39663SGreg Clayton 
228fe53c49STatyana Krasnukha static const OptionDefinition g_option_table[] = {
23b9c1b51eSKate Stone     {LLDB_OPT_SET_1, false, "dynamic-type", 'd',
248fe53c49STatyana Krasnukha      OptionParser::eRequiredArgument, nullptr, GetDynamicValueTypes(), 0,
25b9c1b51eSKate Stone      eArgTypeNone, "Show the object as its full dynamic type, not its static "
26b9c1b51eSKate Stone                    "type, if available."},
27b9c1b51eSKate Stone     {LLDB_OPT_SET_1, false, "synthetic-type", 'S',
288fe53c49STatyana Krasnukha      OptionParser::eRequiredArgument, nullptr, {}, 0, eArgTypeBoolean,
29b9c1b51eSKate Stone      "Show the object obeying its synthetic provider, if available."},
30b9c1b51eSKate Stone     {LLDB_OPT_SET_1, false, "depth", 'D', OptionParser::eRequiredArgument,
318fe53c49STatyana Krasnukha      nullptr, {}, 0, eArgTypeCount, "Set the max recurse depth when dumping "
328fe53c49STatyana Krasnukha                                     "aggregate types (default is infinity)."},
33b9c1b51eSKate Stone     {LLDB_OPT_SET_1, false, "flat", 'F', OptionParser::eNoArgument, nullptr,
348fe53c49STatyana Krasnukha      {}, 0, eArgTypeNone, "Display results in a flat format that uses "
35b9c1b51eSKate Stone                           "expression paths for each variable or member."},
36b9c1b51eSKate Stone     {LLDB_OPT_SET_1, false, "location", 'L', OptionParser::eNoArgument, nullptr,
378fe53c49STatyana Krasnukha      {}, 0, eArgTypeNone, "Show variable location information."},
38b9c1b51eSKate Stone     {LLDB_OPT_SET_1, false, "object-description", 'O',
398fe53c49STatyana Krasnukha      OptionParser::eNoArgument, nullptr, {}, 0, eArgTypeNone,
40d46c6559SDavide Italiano      "Display using a language-specific description API, if possible."},
41b9c1b51eSKate Stone     {LLDB_OPT_SET_1, false, "ptr-depth", 'P', OptionParser::eRequiredArgument,
428fe53c49STatyana Krasnukha      nullptr, {}, 0, eArgTypeCount, "The number of pointers to be traversed "
438fe53c49STatyana Krasnukha                                     "when dumping values (default is zero)."},
44b9c1b51eSKate Stone     {LLDB_OPT_SET_1, false, "show-types", 'T', OptionParser::eNoArgument,
458fe53c49STatyana Krasnukha      nullptr, {}, 0, eArgTypeNone,
46b9c1b51eSKate Stone      "Show variable types when dumping values."},
47b9c1b51eSKate Stone     {LLDB_OPT_SET_1, false, "no-summary-depth", 'Y',
488fe53c49STatyana Krasnukha      OptionParser::eOptionalArgument, nullptr, {}, 0, eArgTypeCount,
49b9c1b51eSKate Stone      "Set the depth at which omitting summary information stops (default is "
50b9c1b51eSKate Stone      "1)."},
51b9c1b51eSKate Stone     {LLDB_OPT_SET_1, false, "raw-output", 'R', OptionParser::eNoArgument,
528fe53c49STatyana Krasnukha      nullptr, {}, 0, eArgTypeNone, "Don't use formatting options."},
53b9c1b51eSKate Stone     {LLDB_OPT_SET_1, false, "show-all-children", 'A', OptionParser::eNoArgument,
548fe53c49STatyana Krasnukha      nullptr, {}, 0, eArgTypeNone,
55b9c1b51eSKate Stone      "Ignore the upper bound on the number of children to show."},
56b9c1b51eSKate Stone     {LLDB_OPT_SET_1, false, "validate", 'V', OptionParser::eRequiredArgument,
578fe53c49STatyana Krasnukha      nullptr, {}, 0, eArgTypeBoolean, "Show results of type validators."},
58b9c1b51eSKate Stone     {LLDB_OPT_SET_1, false, "element-count", 'Z',
598fe53c49STatyana Krasnukha      OptionParser::eRequiredArgument, nullptr, {}, 0, eArgTypeCount,
60b9c1b51eSKate Stone      "Treat the result of the expression as if its type is an array of this "
611f0f5b5bSZachary Turner      "many values."}};
6284c39663SGreg Clayton 
631f0f5b5bSZachary Turner llvm::ArrayRef<OptionDefinition>
GetDefinitions()641f0f5b5bSZachary Turner OptionGroupValueObjectDisplay::GetDefinitions() {
6570602439SZachary Turner   return llvm::makeArrayRef(g_option_table);
6684c39663SGreg Clayton }
6784c39663SGreg Clayton 
SetOptionValue(uint32_t option_idx,llvm::StringRef option_arg,ExecutionContext * execution_context)6897206d57SZachary Turner Status OptionGroupValueObjectDisplay::SetOptionValue(
698cef4b0bSZachary Turner     uint32_t option_idx, llvm::StringRef option_arg,
70b9c1b51eSKate Stone     ExecutionContext *execution_context) {
7197206d57SZachary Turner   Status error;
723bcdfc0eSGreg Clayton   const int short_option = g_option_table[option_idx].short_option;
7384c39663SGreg Clayton   bool success = false;
7484c39663SGreg Clayton 
75b9c1b51eSKate Stone   switch (short_option) {
76b9c1b51eSKate Stone   case 'd': {
772837b766SJim Ingham     int32_t result;
788fe53c49STatyana Krasnukha     result = OptionArgParser::ToOptionEnum(option_arg, GetDynamicValueTypes(),
798fe53c49STatyana Krasnukha                                            2, error);
80cf0e4f0dSGreg Clayton     if (error.Success())
812837b766SJim Ingham       use_dynamic = (lldb::DynamicValueType)result;
82b9c1b51eSKate Stone   } break;
83b9c1b51eSKate Stone   case 'T':
84b9c1b51eSKate Stone     show_types = true;
852837b766SJim Ingham     break;
86b9c1b51eSKate Stone   case 'L':
87b9c1b51eSKate Stone     show_location = true;
88b9c1b51eSKate Stone     break;
89b9c1b51eSKate Stone   case 'F':
90b9c1b51eSKate Stone     flat_output = true;
91b9c1b51eSKate Stone     break;
92b9c1b51eSKate Stone   case 'O':
93b9c1b51eSKate Stone     use_objc = true;
94b9c1b51eSKate Stone     break;
95b9c1b51eSKate Stone   case 'R':
96b9c1b51eSKate Stone     be_raw = true;
97b9c1b51eSKate Stone     break;
98b9c1b51eSKate Stone   case 'A':
99b9c1b51eSKate Stone     ignore_cap = true;
100b9c1b51eSKate Stone     break;
101ce68b02cSEnrico Granata 
10268ebae61SGreg Clayton   case 'D':
1038cef4b0bSZachary Turner     if (option_arg.getAsInteger(0, max_depth)) {
1048cef4b0bSZachary Turner       max_depth = UINT32_MAX;
1058cef4b0bSZachary Turner       error.SetErrorStringWithFormat("invalid max depth '%s'",
1068cef4b0bSZachary Turner                                      option_arg.str().c_str());
107*2f9fc576SDave Lee     } else {
108*2f9fc576SDave Lee       max_depth_is_default = false;
1098cef4b0bSZachary Turner     }
11084c39663SGreg Clayton     break;
11184c39663SGreg Clayton 
112520a422bSEnrico Granata   case 'Z':
1138cef4b0bSZachary Turner     if (option_arg.getAsInteger(0, elem_count)) {
1148cef4b0bSZachary Turner       elem_count = UINT32_MAX;
1158cef4b0bSZachary Turner       error.SetErrorStringWithFormat("invalid element count '%s'",
1168cef4b0bSZachary Turner                                      option_arg.str().c_str());
1178cef4b0bSZachary Turner     }
118520a422bSEnrico Granata     break;
119520a422bSEnrico Granata 
12068ebae61SGreg Clayton   case 'P':
1218cef4b0bSZachary Turner     if (option_arg.getAsInteger(0, ptr_depth)) {
1228cef4b0bSZachary Turner       ptr_depth = 0;
1238cef4b0bSZachary Turner       error.SetErrorStringWithFormat("invalid pointer depth '%s'",
1248cef4b0bSZachary Turner                                      option_arg.str().c_str());
1258cef4b0bSZachary Turner     }
12684c39663SGreg Clayton     break;
12784c39663SGreg Clayton 
1280c5ef693SEnrico Granata   case 'Y':
1292f13958cSZachary Turner     if (option_arg.empty())
1302f13958cSZachary Turner       no_summary_depth = 1;
1312f13958cSZachary Turner     else if (option_arg.getAsInteger(0, no_summary_depth)) {
13216b39131SZachary Turner       no_summary_depth = 0;
1338cef4b0bSZachary Turner       error.SetErrorStringWithFormat("invalid pointer depth '%s'",
1348cef4b0bSZachary Turner                                      option_arg.str().c_str());
1358cef4b0bSZachary Turner     }
1360c5ef693SEnrico Granata     break;
1370c5ef693SEnrico Granata 
138d55546b2SEnrico Granata   case 'S':
13947cbf4a0SPavel Labath     use_synth = OptionArgParser::ToBoolean(option_arg, true, &success);
140d55546b2SEnrico Granata     if (!success)
1418cef4b0bSZachary Turner       error.SetErrorStringWithFormat("invalid synthetic-type '%s'",
1428cef4b0bSZachary Turner                                      option_arg.str().c_str());
143d55546b2SEnrico Granata     break;
1440f883ffbSEnrico Granata 
1450f883ffbSEnrico Granata   case 'V':
14647cbf4a0SPavel Labath     run_validator = OptionArgParser::ToBoolean(option_arg, true, &success);
1470f883ffbSEnrico Granata     if (!success)
1488cef4b0bSZachary Turner       error.SetErrorStringWithFormat("invalid validate '%s'",
1498cef4b0bSZachary Turner                                      option_arg.str().c_str());
1500f883ffbSEnrico Granata     break;
1510f883ffbSEnrico Granata 
15284c39663SGreg Clayton   default:
15336162014SRaphael Isemann     llvm_unreachable("Unimplemented option");
15484c39663SGreg Clayton   }
15584c39663SGreg Clayton 
15684c39663SGreg Clayton   return error;
15784c39663SGreg Clayton }
15884c39663SGreg Clayton 
OptionParsingStarting(ExecutionContext * execution_context)159b9c1b51eSKate Stone void OptionGroupValueObjectDisplay::OptionParsingStarting(
160b9c1b51eSKate Stone     ExecutionContext *execution_context) {
16182f4cf46SGreg Clayton   // If these defaults change, be sure to modify AnyOptionWasSet().
16284c39663SGreg Clayton   show_types = false;
1630c5ef693SEnrico Granata   no_summary_depth = 0;
16484c39663SGreg Clayton   show_location = false;
16584c39663SGreg Clayton   flat_output = false;
16684c39663SGreg Clayton   use_objc = false;
16784c39663SGreg Clayton   max_depth = UINT32_MAX;
168*2f9fc576SDave Lee   max_depth_is_default = true;
16984c39663SGreg Clayton   ptr_depth = 0;
170520a422bSEnrico Granata   elem_count = 0;
171d55546b2SEnrico Granata   use_synth = true;
172ce68b02cSEnrico Granata   be_raw = false;
17322c55d18SEnrico Granata   ignore_cap = false;
1740f883ffbSEnrico Granata   run_validator = false;
17584c39663SGreg Clayton 
176e1cfbc79STodd Fiala   TargetSP target_sp =
177e1cfbc79STodd Fiala       execution_context ? execution_context->GetTargetSP() : TargetSP();
178*2f9fc576SDave Lee   if (target_sp) {
179e1cfbc79STodd Fiala     use_dynamic = target_sp->GetPreferDynamicValue();
180*2f9fc576SDave Lee     auto max_depth_config = target_sp->GetMaximumDepthOfChildrenToDisplay();
181*2f9fc576SDave Lee     max_depth = std::get<uint32_t>(max_depth_config);
182*2f9fc576SDave Lee     max_depth_is_default = std::get<bool>(max_depth_config);
183*2f9fc576SDave Lee   } else {
1842837b766SJim Ingham     // If we don't have any targets, then dynamic values won't do us much good.
1852837b766SJim Ingham     use_dynamic = lldb::eNoDynamicValues;
1862837b766SJim Ingham   }
1872837b766SJim Ingham }
1889fb5ab55SEnrico Granata 
GetAsDumpOptions(LanguageRuntimeDescriptionDisplayVerbosity lang_descr_verbosity,lldb::Format format,lldb::TypeSummaryImplSP summary_sp)189b9c1b51eSKate Stone DumpValueObjectOptions OptionGroupValueObjectDisplay::GetAsDumpOptions(
190b9c1b51eSKate Stone     LanguageRuntimeDescriptionDisplayVerbosity lang_descr_verbosity,
191b9c1b51eSKate Stone     lldb::Format format, lldb::TypeSummaryImplSP summary_sp) {
1924d93b8cdSEnrico Granata   DumpValueObjectOptions options;
193b9c1b51eSKate Stone   options.SetMaximumPointerDepth(
194b9c1b51eSKate Stone       {DumpValueObjectOptions::PointerDepth::Mode::Always, ptr_depth});
1959fb5ab55SEnrico Granata   if (use_objc)
1969fb5ab55SEnrico Granata     options.SetShowSummary(false);
1979fb5ab55SEnrico Granata   else
1989fb5ab55SEnrico Granata     options.SetOmitSummaryDepth(no_summary_depth);
199*2f9fc576SDave Lee   options.SetMaximumDepth(max_depth, max_depth_is_default)
2009fb5ab55SEnrico Granata       .SetShowTypes(show_types)
2019fb5ab55SEnrico Granata       .SetShowLocation(show_location)
2029fb5ab55SEnrico Granata       .SetUseObjectiveC(use_objc)
2039fb5ab55SEnrico Granata       .SetUseDynamicType(use_dynamic)
2049fb5ab55SEnrico Granata       .SetUseSyntheticValue(use_synth)
2059fb5ab55SEnrico Granata       .SetFlatOutput(flat_output)
2069fb5ab55SEnrico Granata       .SetIgnoreCap(ignore_cap)
2079fb5ab55SEnrico Granata       .SetFormat(format)
2089fb5ab55SEnrico Granata       .SetSummary(summary_sp);
2099fb5ab55SEnrico Granata 
210b9c1b51eSKate Stone   if (lang_descr_verbosity ==
211b9c1b51eSKate Stone       eLanguageRuntimeDescriptionDisplayVerbosityCompact)
212b9c1b51eSKate Stone     options.SetHideRootType(use_objc).SetHideName(use_objc).SetHideValue(
213b9c1b51eSKate Stone         use_objc);
2149fb5ab55SEnrico Granata 
2159fb5ab55SEnrico Granata   if (be_raw)
216a126e462SEnrico Granata     options.SetRawDisplay();
2179fb5ab55SEnrico Granata 
2180f883ffbSEnrico Granata   options.SetRunValidator(run_validator);
2190f883ffbSEnrico Granata 
220520a422bSEnrico Granata   options.SetElementCount(elem_count);
221520a422bSEnrico Granata 
2229fb5ab55SEnrico Granata   return options;
2239fb5ab55SEnrico Granata }
224