1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
|
//===--- UseDefaultNoneCheck.cpp - clang-tidy -----------------------------===//
//
// Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
// See https://llvm.org/LICENSE.txt for license information.
// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
//
//===----------------------------------------------------------------------===//
#include "UseDefaultNoneCheck.h"
#include "clang/AST/ASTContext.h"
#include "clang/AST/OpenMPClause.h"
#include "clang/AST/Stmt.h"
#include "clang/AST/StmtOpenMP.h"
#include "clang/ASTMatchers/ASTMatchFinder.h"
#include "clang/ASTMatchers/ASTMatchers.h"
#include "clang/ASTMatchers/ASTMatchersMacros.h"
using namespace clang::ast_matchers;
namespace clang {
namespace tidy {
namespace openmp {
void UseDefaultNoneCheck::registerMatchers(MatchFinder *Finder) {
// Don't register the check if OpenMP is not enabled; the OpenMP pragmas are
// completely ignored then, so no OpenMP entires will be present in the AST.
if (!getLangOpts().OpenMP)
return;
Finder->addMatcher(
ompExecutableDirective(
allOf(isAllowedToContainClauseKind(OMPC_default),
anyOf(unless(hasAnyClause(ompDefaultClause())),
hasAnyClause(ompDefaultClause(unless(isNoneKind()))
.bind("clause")))))
.bind("directive"),
this);
}
void UseDefaultNoneCheck::check(const MatchFinder::MatchResult &Result) {
const auto *Directive =
Result.Nodes.getNodeAs<OMPExecutableDirective>("directive");
assert(Directive != nullptr && "Expected to match some directive.");
if (const auto *Clause = Result.Nodes.getNodeAs<OMPDefaultClause>("clause")) {
diag(Directive->getBeginLoc(),
"OpenMP directive '%0' specifies 'default(%1)' clause, consider using "
"'default(none)' clause instead")
<< getOpenMPDirectiveName(Directive->getDirectiveKind())
<< getOpenMPSimpleClauseTypeName(Clause->getClauseKind(),
Clause->getDefaultKind());
diag(Clause->getBeginLoc(), "existing 'default' clause specified here",
DiagnosticIDs::Note);
return;
}
diag(Directive->getBeginLoc(),
"OpenMP directive '%0' does not specify 'default' clause, consider "
"specifying 'default(none)' clause")
<< getOpenMPDirectiveName(Directive->getDirectiveKind());
}
} // namespace openmp
} // namespace tidy
} // namespace clang
|
