1 //===-- UserSettingsController.cpp ----------------------------------------===//
2 //
3 // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
4 // See https://llvm.org/LICENSE.txt for license information.
5 // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
6 //
7 //===----------------------------------------------------------------------===//
8
9 #include "lldb/Core/UserSettingsController.h"
10
11 #include "lldb/Interpreter/OptionValueProperties.h"
12 #include "lldb/Utility/Status.h"
13 #include "lldb/Utility/Stream.h"
14
15 #include <memory>
16
17 namespace lldb_private {
18 class CommandInterpreter;
19 }
20 namespace lldb_private {
21 class ConstString;
22 }
23 namespace lldb_private {
24 class ExecutionContext;
25 }
26 namespace lldb_private {
27 class Property;
28 }
29
30 using namespace lldb;
31 using namespace lldb_private;
32
33 lldb::OptionValueSP
GetPropertyValue(const ExecutionContext * exe_ctx,llvm::StringRef path,bool will_modify,Status & error) const34 Properties::GetPropertyValue(const ExecutionContext *exe_ctx,
35 llvm::StringRef path, bool will_modify,
36 Status &error) const {
37 OptionValuePropertiesSP properties_sp(GetValueProperties());
38 if (properties_sp)
39 return properties_sp->GetSubValue(exe_ctx, path, will_modify, error);
40 return lldb::OptionValueSP();
41 }
42
SetPropertyValue(const ExecutionContext * exe_ctx,VarSetOperationType op,llvm::StringRef path,llvm::StringRef value)43 Status Properties::SetPropertyValue(const ExecutionContext *exe_ctx,
44 VarSetOperationType op,
45 llvm::StringRef path,
46 llvm::StringRef value) {
47 OptionValuePropertiesSP properties_sp(GetValueProperties());
48 if (properties_sp)
49 return properties_sp->SetSubValue(exe_ctx, op, path, value);
50 Status error;
51 error.SetErrorString("no properties");
52 return error;
53 }
54
DumpAllPropertyValues(const ExecutionContext * exe_ctx,Stream & strm,uint32_t dump_mask)55 void Properties::DumpAllPropertyValues(const ExecutionContext *exe_ctx,
56 Stream &strm, uint32_t dump_mask) {
57 OptionValuePropertiesSP properties_sp(GetValueProperties());
58 if (properties_sp)
59 return properties_sp->DumpValue(exe_ctx, strm, dump_mask);
60 }
61
DumpAllDescriptions(CommandInterpreter & interpreter,Stream & strm) const62 void Properties::DumpAllDescriptions(CommandInterpreter &interpreter,
63 Stream &strm) const {
64 strm.PutCString("Top level variables:\n\n");
65
66 OptionValuePropertiesSP properties_sp(GetValueProperties());
67 if (properties_sp)
68 return properties_sp->DumpAllDescriptions(interpreter, strm);
69 }
70
DumpPropertyValue(const ExecutionContext * exe_ctx,Stream & strm,llvm::StringRef property_path,uint32_t dump_mask)71 Status Properties::DumpPropertyValue(const ExecutionContext *exe_ctx,
72 Stream &strm,
73 llvm::StringRef property_path,
74 uint32_t dump_mask) {
75 OptionValuePropertiesSP properties_sp(GetValueProperties());
76 if (properties_sp) {
77 return properties_sp->DumpPropertyValue(exe_ctx, strm, property_path,
78 dump_mask);
79 }
80 Status error;
81 error.SetErrorString("empty property list");
82 return error;
83 }
84
85 size_t
Apropos(llvm::StringRef keyword,std::vector<const Property * > & matching_properties) const86 Properties::Apropos(llvm::StringRef keyword,
87 std::vector<const Property *> &matching_properties) const {
88 OptionValuePropertiesSP properties_sp(GetValueProperties());
89 if (properties_sp) {
90 properties_sp->Apropos(keyword, matching_properties);
91 }
92 return matching_properties.size();
93 }
94
95 lldb::OptionValuePropertiesSP
GetSubProperty(const ExecutionContext * exe_ctx,ConstString name)96 Properties::GetSubProperty(const ExecutionContext *exe_ctx,
97 ConstString name) {
98 OptionValuePropertiesSP properties_sp(GetValueProperties());
99 if (properties_sp)
100 return properties_sp->GetSubProperty(exe_ctx, name);
101 return lldb::OptionValuePropertiesSP();
102 }
103
GetExperimentalSettingsName()104 const char *Properties::GetExperimentalSettingsName() { return "experimental"; }
105
IsSettingExperimental(llvm::StringRef setting)106 bool Properties::IsSettingExperimental(llvm::StringRef setting) {
107 if (setting.empty())
108 return false;
109
110 llvm::StringRef experimental = GetExperimentalSettingsName();
111 size_t dot_pos = setting.find_first_of('.');
112 return setting.take_front(dot_pos) == experimental;
113 }
114