0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1 //===- TestPasses.cpp - "buggy" passes used to test bugpoint --------------===//
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
2 //
|
147
|
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
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
6 //
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
7 //===----------------------------------------------------------------------===//
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
8 //
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
9 // This file contains "buggy" passes that are used to test bugpoint, to check
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
10 // that it is narrowing down testcases correctly.
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
11 //
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
12 //===----------------------------------------------------------------------===//
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
13
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
14 #include "llvm/IR/BasicBlock.h"
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
15 #include "llvm/IR/Constant.h"
|
77
|
16 #include "llvm/IR/InstVisitor.h"
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
17 #include "llvm/IR/Instructions.h"
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
18 #include "llvm/IR/Type.h"
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
19 #include "llvm/Pass.h"
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
20
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
21 using namespace llvm;
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
22
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
23 namespace {
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
24 /// CrashOnCalls - This pass is used to test bugpoint. It intentionally
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
25 /// crashes on any call instructions.
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
26 class CrashOnCalls : public BasicBlockPass {
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
27 public:
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
28 static char ID; // Pass ID, replacement for typeid
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
29 CrashOnCalls() : BasicBlockPass(ID) {}
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
30 private:
|
77
|
31 void getAnalysisUsage(AnalysisUsage &AU) const override {
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
32 AU.setPreservesAll();
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
33 }
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
34
|
77
|
35 bool runOnBasicBlock(BasicBlock &BB) override {
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
36 for (BasicBlock::iterator I = BB.begin(), E = BB.end(); I != E; ++I)
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
37 if (isa<CallInst>(*I))
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
38 abort();
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
39
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
40 return false;
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
41 }
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
42 };
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
43 }
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
44
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
45 char CrashOnCalls::ID = 0;
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
46 static RegisterPass<CrashOnCalls>
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
47 X("bugpoint-crashcalls",
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
48 "BugPoint Test Pass - Intentionally crash on CallInsts");
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
49
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
50 namespace {
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
51 /// DeleteCalls - This pass is used to test bugpoint. It intentionally
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
52 /// deletes some call instructions, "misoptimizing" the program.
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
53 class DeleteCalls : public BasicBlockPass {
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
54 public:
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
55 static char ID; // Pass ID, replacement for typeid
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
56 DeleteCalls() : BasicBlockPass(ID) {}
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
57 private:
|
77
|
58 bool runOnBasicBlock(BasicBlock &BB) override {
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
59 for (BasicBlock::iterator I = BB.begin(), E = BB.end(); I != E; ++I)
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
60 if (CallInst *CI = dyn_cast<CallInst>(I)) {
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
61 if (!CI->use_empty())
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
62 CI->replaceAllUsesWith(Constant::getNullValue(CI->getType()));
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
63 CI->getParent()->getInstList().erase(CI);
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
64 break;
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
65 }
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
66 return false;
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
67 }
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
68 };
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
69 }
|
95
|
70
|
0
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
71 char DeleteCalls::ID = 0;
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
72 static RegisterPass<DeleteCalls>
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
73 Y("bugpoint-deletecalls",
|
Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
74 "BugPoint Test Pass - Intentionally 'misoptimize' CallInsts");
|
95
|
75
|
|
76 namespace {
|
|
77 /// CrashOnDeclFunc - This pass is used to test bugpoint. It intentionally
|
100
|
78 /// crashes if the module has an undefined function (ie a function that is
|
|
79 /// defined in an external module).
|
|
80 class CrashOnDeclFunc : public ModulePass {
|
|
81 public:
|
|
82 static char ID; // Pass ID, replacement for typeid
|
|
83 CrashOnDeclFunc() : ModulePass(ID) {}
|
|
84
|
|
85 private:
|
|
86 bool runOnModule(Module &M) override {
|
|
87 for (auto &F : M.functions()) {
|
|
88 if (F.isDeclaration())
|
|
89 abort();
|
95
|
90 }
|
100
|
91 return false;
|
|
92 }
|
95
|
93 };
|
|
94 }
|
|
95
|
|
96 char CrashOnDeclFunc::ID = 0;
|
|
97 static RegisterPass<CrashOnDeclFunc>
|
|
98 Z("bugpoint-crash-decl-funcs",
|
|
99 "BugPoint Test Pass - Intentionally crash on declared functions");
|
100
|
100
|
|
101 namespace {
|
|
102 /// CrashOnOneCU - This pass is used to test bugpoint. It intentionally
|
|
103 /// crashes if the Module has two or more compile units
|
|
104 class CrashOnTooManyCUs : public ModulePass {
|
|
105 public:
|
|
106 static char ID;
|
|
107 CrashOnTooManyCUs() : ModulePass(ID) {}
|
|
108
|
|
109 private:
|
|
110 bool runOnModule(Module &M) override {
|
|
111 NamedMDNode *CU_Nodes = M.getNamedMetadata("llvm.dbg.cu");
|
|
112 if (!CU_Nodes)
|
|
113 return false;
|
|
114 if (CU_Nodes->getNumOperands() >= 2)
|
|
115 abort();
|
|
116 return false;
|
|
117 }
|
|
118 };
|
|
119 }
|
|
120
|
|
121 char CrashOnTooManyCUs::ID = 0;
|
|
122 static RegisterPass<CrashOnTooManyCUs>
|
|
123 A("bugpoint-crash-too-many-cus",
|
|
124 "BugPoint Test Pass - Intentionally crash on too many CUs");
|
147
|
125
|
|
126 namespace {
|
|
127 class CrashOnFunctionAttribute : public FunctionPass {
|
|
128 public:
|
|
129 static char ID; // Pass ID, replacement for typeid
|
|
130 CrashOnFunctionAttribute() : FunctionPass(ID) {}
|
|
131
|
|
132 private:
|
|
133 void getAnalysisUsage(AnalysisUsage &AU) const override {
|
|
134 AU.setPreservesAll();
|
|
135 }
|
|
136
|
|
137 bool runOnFunction(Function &F) override {
|
|
138 AttributeSet A = F.getAttributes().getFnAttributes();
|
|
139 if (A.hasAttribute("bugpoint-crash"))
|
|
140 abort();
|
|
141 return false;
|
|
142 }
|
|
143 };
|
|
144 } // namespace
|
|
145
|
|
146 char CrashOnFunctionAttribute::ID = 0;
|
|
147 static RegisterPass<CrashOnFunctionAttribute>
|
|
148 B("bugpoint-crashfuncattr", "BugPoint Test Pass - Intentionally crash on "
|
|
149 "function attribute 'bugpoint-crash'");
|