12 #include "clang/ASTMatchers/Dynamic/Parser.h"
13 #include "clang/Basic/CharInfo.h"
14 #include "llvm/ADT/StringRef.h"
15 #include "llvm/ADT/StringSwitch.h"
19 using namespace clang::ast_matchers::dynamic;
28 StringRef QueryParser::lexWord() {
31 return StringRef(
" \t\v\f\r").contains(c);
41 if (
Line.front() ==
'#')
44 Word =
Line.take_until(isWhitespace);
65 :
Word(P->lexWord()), Switch(
Word), P(P),
66 WordCompletionPos(StringRef::npos) {
68 if (P->CompletionPos && P->CompletionPos <=
Word.data() +
Word.size()) {
69 if (P->CompletionPos <
Word.data())
70 WordCompletionPos = 0;
72 WordCompletionPos = P->CompletionPos -
Word.data();
77 bool IsCompletion =
true) {
79 if (WordCompletionPos == StringRef::npos)
80 Switch.
Case(CaseStr, Value);
81 else if (CaseStr.size() != 0 && IsCompletion && WordCompletionPos <= CaseStr.size() &&
82 CaseStr.substr(0, WordCompletionPos) ==
83 Word.substr(0, WordCompletionPos))
84 P->Completions.push_back(LineEditor::Completion(
85 (CaseStr.substr(WordCompletionPos) +
" ").str(),
86 std::string(CaseStr)));
90 T
Default(T Value) {
return Switch.Default(Value); }
95 unsigned Value = LexOrCompleteWord<unsigned>(
this, ValStr)
100 return new InvalidQuery(
"expected 'true' or 'false', got '" + ValStr +
"'");
102 return new SetQuery<bool>(Var, Value);
105 template <
typename QueryType>
QueryRef QueryParser::parseSetOutputKind() {
107 unsigned OutKind = LexOrCompleteWord<unsigned>(
this, ValStr)
113 if (OutKind == ~0u) {
114 return new InvalidQuery(
115 "expected 'diag', 'print', 'detailed-ast' or 'dump', got '" + ValStr +
121 return new QueryType(&QuerySession::DetailedASTOutput);
123 return new QueryType(&QuerySession::DiagOutput);
125 return new QueryType(&QuerySession::PrintOutput);
128 llvm_unreachable(
"Invalid output kind");
131 QueryRef QueryParser::parseSetTraversalKind(
132 ast_type_traits::TraversalKind QuerySession::*Var) {
135 LexOrCompleteWord<unsigned>(
this, ValStr)
136 .Case(
"AsIs", ast_type_traits::TK_AsIs)
137 .Case(
"IgnoreImplicitCastsAndParentheses",
138 ast_type_traits::TK_IgnoreImplicitCastsAndParentheses)
139 .Case(
"IgnoreUnlessSpelledInSource",
140 ast_type_traits::TK_IgnoreUnlessSpelledInSource)
143 return new InvalidQuery(
"expected traversal kind, got '" + ValStr +
"'");
145 return new SetQuery<ast_type_traits::TraversalKind>(
146 Var, static_cast<ast_type_traits::TraversalKind>(Value));
150 StringRef Extra =
Line;
151 StringRef ExtraTrimmed = Extra.drop_while(
152 [](
char c) {
return StringRef(
" \t\v\f\r").contains(c); });
154 if ((!ExtraTrimmed.empty() && ExtraTrimmed[0] ==
'\n') ||
155 (ExtraTrimmed.size() >= 2 && ExtraTrimmed[0] ==
'\r' &&
156 ExtraTrimmed[1] ==
'\n'))
157 Q->RemainingContent = Extra;
159 StringRef TrailingWord = lexWord();
160 if (!TrailingWord.empty() && TrailingWord.front() ==
'#') {
161 Line =
Line.drop_until([](
char c) {
return c ==
'\n'; });
162 Line =
Line.drop_while([](
char c) {
return c ==
'\n'; });
165 if (!TrailingWord.empty()) {
166 return new InvalidQuery(
"unexpected extra input: '" + Extra +
"'");
196 QueryRef makeInvalidQueryFromDiagnostics(
const Diagnostics &Diag) {
198 llvm::raw_string_ostream
OS(ErrStr);
199 Diag.printToStreamFull(
OS);
205 QueryRef QueryParser::completeMatcherExpression() {
206 std::vector<MatcherCompletion> Comps = Parser::completeExpression(
207 Line, CompletionPos -
Line.begin(),
nullptr, &QS.NamedValues);
208 for (
auto I = Comps.begin(),
E = Comps.end(); I !=
E; ++I) {
209 Completions.push_back(LineEditor::Completion(I->TypedText, I->MatcherDecl));
215 StringRef CommandStr;
216 ParsedQueryKind QKind = LexOrCompleteWord<ParsedQueryKind>(
this, CommandStr)
218 .Case(
"#", PQK_Comment,
false)
219 .Case(
"help", PQK_Help)
220 .Case(
"l", PQK_Let,
false)
221 .Case(
"let", PQK_Let)
222 .Case(
"m", PQK_Match,
false)
223 .Case(
"match", PQK_Match)
224 .Case(
"q", PQK_Quit,
false)
225 .Case(
"quit", PQK_Quit)
226 .Case(
"set", PQK_Set)
227 .Case(
"enable", PQK_Enable)
228 .Case(
"disable", PQK_Disable)
229 .Case(
"unlet", PQK_Unlet)
230 .Default(PQK_Invalid);
235 Line =
Line.drop_until([](
char c) {
return c ==
'\n'; });
236 Line =
Line.drop_while([](
char c) {
return c ==
'\n'; });
238 return new NoOpQuery;
242 return endQuery(
new HelpQuery);
245 return endQuery(
new QuitQuery);
248 StringRef
Name = lexWord();
251 return new InvalidQuery(
"expected variable name");
254 return completeMatcherExpression();
257 ast_matchers::dynamic::VariantValue Value;
258 if (!Parser::parseExpression(
Line,
nullptr, &QS.NamedValues, &Value,
260 return makeInvalidQueryFromDiagnostics(Diag);
263 auto *Q =
new LetQuery(
Name, Value);
264 Q->RemainingContent =
Line;
270 return completeMatcherExpression();
273 auto MatcherSource =
Line.ltrim();
274 auto OrigMatcherSource = MatcherSource;
275 Optional<DynTypedMatcher> Matcher = Parser::parseMatcherExpression(
276 MatcherSource,
nullptr, &QS.NamedValues, &Diag);
278 return makeInvalidQueryFromDiagnostics(Diag);
280 auto ActualSource = OrigMatcherSource.slice(0, OrigMatcherSource.size() -
281 MatcherSource.size());
282 auto *Q =
new MatchQuery(ActualSource, *Matcher);
283 Q->RemainingContent = MatcherSource;
290 LexOrCompleteWord<ParsedQueryVariable>(
this, VarStr)
291 .Case(
"output", PQV_Output)
292 .Case(
"bind-root", PQV_BindRoot)
293 .Case(
"print-matcher", PQV_PrintMatcher)
294 .Case(
"traversal", PQV_Traversal)
295 .Default(PQV_Invalid);
297 return new InvalidQuery(
"expected variable name");
298 if (Var == PQV_Invalid)
299 return new InvalidQuery(
"unknown variable: '" + VarStr +
"'");
304 Q = parseSetOutputKind<SetExclusiveOutputQuery>();
307 Q = parseSetBool(&QuerySession::BindRoot);
309 case PQV_PrintMatcher:
310 Q = parseSetBool(&QuerySession::PrintMatcher);
313 Q = parseSetTraversalKind(&QuerySession::TK);
316 llvm_unreachable(
"Invalid query kind");
325 LexOrCompleteWord<ParsedQueryVariable>(
this, VarStr)
326 .Case(
"output", PQV_Output)
327 .Default(PQV_Invalid);
329 return new InvalidQuery(
"expected variable name");
330 if (Var == PQV_Invalid)
331 return new InvalidQuery(
"unknown variable: '" + VarStr +
"'");
335 if (QKind == PQK_Enable)
336 Q = parseSetOutputKind<EnableOutputQuery>();
337 else if (QKind == PQK_Disable)
338 Q = parseSetOutputKind<DisableOutputQuery>();
340 llvm_unreachable(
"Invalid query kind");
345 StringRef
Name = lexWord();
348 return new InvalidQuery(
"expected variable name");
350 return endQuery(
new LetQuery(
Name, VariantValue()));
354 return new InvalidQuery(
"unknown command: " + CommandStr);
357 llvm_unreachable(
"Invalid query kind");
364 std::vector<LineEditor::Completion>
367 P.CompletionPos =
Line.data() +
Pos;
370 return P.Completions;