annotate clang/lib/ARCMigrate/TransGCCalls.cpp @ 176:de4ac79aef9d

...
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Mon, 25 May 2020 17:13:11 +0900
parents 1d019706d866
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
150
anatofuz
parents:
diff changeset
1 //===--- TransGCCalls.cpp - Transformations to ARC mode -------------------===//
anatofuz
parents:
diff changeset
2 //
anatofuz
parents:
diff changeset
3 // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
anatofuz
parents:
diff changeset
4 // See https://llvm.org/LICENSE.txt for license information.
anatofuz
parents:
diff changeset
5 // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
anatofuz
parents:
diff changeset
6 //
anatofuz
parents:
diff changeset
7 //===----------------------------------------------------------------------===//
anatofuz
parents:
diff changeset
8
anatofuz
parents:
diff changeset
9 #include "Transforms.h"
anatofuz
parents:
diff changeset
10 #include "Internals.h"
anatofuz
parents:
diff changeset
11 #include "clang/AST/ASTContext.h"
anatofuz
parents:
diff changeset
12 #include "clang/Sema/SemaDiagnostic.h"
anatofuz
parents:
diff changeset
13
anatofuz
parents:
diff changeset
14 using namespace clang;
anatofuz
parents:
diff changeset
15 using namespace arcmt;
anatofuz
parents:
diff changeset
16 using namespace trans;
anatofuz
parents:
diff changeset
17
anatofuz
parents:
diff changeset
18 namespace {
anatofuz
parents:
diff changeset
19
anatofuz
parents:
diff changeset
20 class GCCollectableCallsChecker :
anatofuz
parents:
diff changeset
21 public RecursiveASTVisitor<GCCollectableCallsChecker> {
anatofuz
parents:
diff changeset
22 MigrationContext &MigrateCtx;
anatofuz
parents:
diff changeset
23 IdentifierInfo *NSMakeCollectableII;
anatofuz
parents:
diff changeset
24 IdentifierInfo *CFMakeCollectableII;
anatofuz
parents:
diff changeset
25
anatofuz
parents:
diff changeset
26 public:
anatofuz
parents:
diff changeset
27 GCCollectableCallsChecker(MigrationContext &ctx)
anatofuz
parents:
diff changeset
28 : MigrateCtx(ctx) {
anatofuz
parents:
diff changeset
29 IdentifierTable &Ids = MigrateCtx.Pass.Ctx.Idents;
anatofuz
parents:
diff changeset
30 NSMakeCollectableII = &Ids.get("NSMakeCollectable");
anatofuz
parents:
diff changeset
31 CFMakeCollectableII = &Ids.get("CFMakeCollectable");
anatofuz
parents:
diff changeset
32 }
anatofuz
parents:
diff changeset
33
anatofuz
parents:
diff changeset
34 bool shouldWalkTypesOfTypeLocs() const { return false; }
anatofuz
parents:
diff changeset
35
anatofuz
parents:
diff changeset
36 bool VisitCallExpr(CallExpr *E) {
anatofuz
parents:
diff changeset
37 TransformActions &TA = MigrateCtx.Pass.TA;
anatofuz
parents:
diff changeset
38
anatofuz
parents:
diff changeset
39 if (MigrateCtx.isGCOwnedNonObjC(E->getType())) {
anatofuz
parents:
diff changeset
40 TA.report(E->getBeginLoc(), diag::warn_arcmt_nsalloc_realloc,
anatofuz
parents:
diff changeset
41 E->getSourceRange());
anatofuz
parents:
diff changeset
42 return true;
anatofuz
parents:
diff changeset
43 }
anatofuz
parents:
diff changeset
44
anatofuz
parents:
diff changeset
45 Expr *CEE = E->getCallee()->IgnoreParenImpCasts();
anatofuz
parents:
diff changeset
46 if (DeclRefExpr *DRE = dyn_cast<DeclRefExpr>(CEE)) {
anatofuz
parents:
diff changeset
47 if (FunctionDecl *FD = dyn_cast_or_null<FunctionDecl>(DRE->getDecl())) {
anatofuz
parents:
diff changeset
48 if (!FD->getDeclContext()->getRedeclContext()->isFileContext())
anatofuz
parents:
diff changeset
49 return true;
anatofuz
parents:
diff changeset
50
anatofuz
parents:
diff changeset
51 if (FD->getIdentifier() == NSMakeCollectableII) {
anatofuz
parents:
diff changeset
52 Transaction Trans(TA);
anatofuz
parents:
diff changeset
53 TA.clearDiagnostic(diag::err_unavailable,
anatofuz
parents:
diff changeset
54 diag::err_unavailable_message,
anatofuz
parents:
diff changeset
55 diag::err_ovl_deleted_call, // ObjC++
anatofuz
parents:
diff changeset
56 DRE->getSourceRange());
anatofuz
parents:
diff changeset
57 TA.replace(DRE->getSourceRange(), "CFBridgingRelease");
anatofuz
parents:
diff changeset
58
anatofuz
parents:
diff changeset
59 } else if (FD->getIdentifier() == CFMakeCollectableII) {
anatofuz
parents:
diff changeset
60 TA.reportError("CFMakeCollectable will leak the object that it "
anatofuz
parents:
diff changeset
61 "receives in ARC", DRE->getLocation(),
anatofuz
parents:
diff changeset
62 DRE->getSourceRange());
anatofuz
parents:
diff changeset
63 }
anatofuz
parents:
diff changeset
64 }
anatofuz
parents:
diff changeset
65 }
anatofuz
parents:
diff changeset
66
anatofuz
parents:
diff changeset
67 return true;
anatofuz
parents:
diff changeset
68 }
anatofuz
parents:
diff changeset
69 };
anatofuz
parents:
diff changeset
70
anatofuz
parents:
diff changeset
71 } // anonymous namespace
anatofuz
parents:
diff changeset
72
anatofuz
parents:
diff changeset
73 void GCCollectableCallsTraverser::traverseBody(BodyContext &BodyCtx) {
anatofuz
parents:
diff changeset
74 GCCollectableCallsChecker(BodyCtx.getMigrationContext())
anatofuz
parents:
diff changeset
75 .TraverseStmt(BodyCtx.getTopStmt());
anatofuz
parents:
diff changeset
76 }