1 //===- ProvenanceAnalysisEvaluator.cpp - ObjC ARC Optimization ------------===//
3 // The LLVM Compiler Infrastructure
5 // This file is distributed under the University of Illinois Open Source
6 // License. See LICENSE.TXT for details.
8 //===----------------------------------------------------------------------===//
10 #include "ProvenanceAnalysis.h"
11 #include "llvm/Pass.h"
12 #include "llvm/ADT/SetVector.h"
13 #include "llvm/Analysis/AliasAnalysis.h"
14 #include "llvm/Analysis/Passes.h"
15 #include "llvm/IR/InstIterator.h"
16 #include "llvm/IR/Function.h"
17 #include "llvm/Support/raw_ostream.h"
20 using namespace llvm::objcarc;
23 class PAEval : public FunctionPass {
28 void getAnalysisUsage(AnalysisUsage &AU) const override;
29 bool runOnFunction(Function &F) override;
34 PAEval::PAEval() : FunctionPass(ID) {}
36 void PAEval::getAnalysisUsage(AnalysisUsage &AU) const {
37 AU.addRequired<AliasAnalysis>();
40 static StringRef getName(Value *V) {
41 StringRef Name = V->getName();
42 if (Name.startswith("\1"))
43 return Name.substr(1);
47 static void insertIfNamed(SetVector<Value *> &Values, Value *V) {
53 bool PAEval::runOnFunction(Function &F) {
54 SetVector<Value *> Values;
56 for (auto &Arg : F.args())
57 insertIfNamed(Values, &Arg);
59 for (auto I = inst_begin(F), E = inst_end(F); I != E; ++I) {
60 insertIfNamed(Values, &*I);
62 for (auto &Op : I->operands())
63 insertIfNamed(Values, Op);
66 ProvenanceAnalysis PA;
67 PA.setAA(&getAnalysis<AliasAnalysis>());
69 for (Value *V1 : Values) {
70 StringRef NameV1 = getName(V1);
71 for (Value *V2 : Values) {
72 StringRef NameV2 = getName(V2);
75 errs() << NameV1 << " and " << NameV2;
76 if (PA.related(V1, V2))
77 errs() << " are related.\n";
79 errs() << " are not related.\n";
86 FunctionPass *llvm::createPAEvalPass() { return new PAEval(); }
88 INITIALIZE_PASS_BEGIN(PAEval, "pa-eval",
89 "Evaluate ProvenanceAnalysis on all pairs", false, true)
90 INITIALIZE_AG_DEPENDENCY(AliasAnalysis)
91 INITIALIZE_PASS_END(PAEval, "pa-eval",
92 "Evaluate ProvenanceAnalysis on all pairs", false, true)