Chris Lattner | 0095054 | 2001-06-06 20:29:01 +0000 | [diff] [blame] | 1 | //===-- Verifier.cpp - Implement the Module Verifier -------------*- C++ -*-==// |
John Criswell | b576c94 | 2003-10-20 19:43:21 +0000 | [diff] [blame] | 2 | // |
| 3 | // The LLVM Compiler Infrastructure |
| 4 | // |
| 5 | // This file was developed by the LLVM research group and is distributed under |
| 6 | // the University of Illinois Open Source License. See LICENSE.TXT for details. |
| 7 | // |
| 8 | //===----------------------------------------------------------------------===// |
Chris Lattner | 0095054 | 2001-06-06 20:29:01 +0000 | [diff] [blame] | 9 | // |
Chris Lattner | a5c3dec | 2002-03-29 19:06:18 +0000 | [diff] [blame] | 10 | // This file defines the function verifier interface, that can be used for some |
Chris Lattner | 0095054 | 2001-06-06 20:29:01 +0000 | [diff] [blame] | 11 | // sanity checking of input to the system. |
| 12 | // |
Misha Brukman | 5b63631 | 2004-06-24 21:47:35 +0000 | [diff] [blame] | 13 | // Note that this does not provide full `Java style' security and verifications, |
| 14 | // instead it just tries to ensure that code is well-formed. |
Chris Lattner | 0095054 | 2001-06-06 20:29:01 +0000 | [diff] [blame] | 15 | // |
Misha Brukman | 5b63631 | 2004-06-24 21:47:35 +0000 | [diff] [blame] | 16 | // * Both of a binary operator's parameters are of the same type |
Chris Lattner | a00409e | 2002-04-24 19:12:21 +0000 | [diff] [blame] | 17 | // * Verify that the indices of mem access instructions match other operands |
Misha Brukman | 5b63631 | 2004-06-24 21:47:35 +0000 | [diff] [blame] | 18 | // * Verify that arithmetic and other things are only performed on first-class |
Chris Lattner | 9ce231f | 2002-08-02 17:37:08 +0000 | [diff] [blame] | 19 | // types. Verify that shifts & logicals only happen on integrals f.e. |
Misha Brukman | 5b63631 | 2004-06-24 21:47:35 +0000 | [diff] [blame] | 20 | // * All of the constants in a switch statement are of the correct type |
Chris Lattner | 9ce231f | 2002-08-02 17:37:08 +0000 | [diff] [blame] | 21 | // * The code is in valid SSA form |
Misha Brukman | 5b63631 | 2004-06-24 21:47:35 +0000 | [diff] [blame] | 22 | // * It should be illegal to put a label into any other type (like a structure) |
Chris Lattner | 0095054 | 2001-06-06 20:29:01 +0000 | [diff] [blame] | 23 | // or to return one. [except constant arrays!] |
Chris Lattner | fdec246 | 2002-03-14 16:53:48 +0000 | [diff] [blame] | 24 | // * Only phi nodes can be self referential: 'add int %0, %0 ; <int>:0' is bad |
Chris Lattner | 44d5bd9 | 2002-02-20 17:55:43 +0000 | [diff] [blame] | 25 | // * PHI nodes must have an entry for each predecessor, with no extras. |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 26 | // * PHI nodes must be the first thing in a basic block, all grouped together |
Chris Lattner | f6ffcb6 | 2002-10-06 21:00:31 +0000 | [diff] [blame] | 27 | // * PHI nodes must have at least one entry |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 28 | // * All basic blocks should only end with terminator insts, not contain them |
Chris Lattner | a5c3dec | 2002-03-29 19:06:18 +0000 | [diff] [blame] | 29 | // * The entry node to a function must not have predecessors |
Misha Brukman | 6b63452 | 2003-10-10 17:54:14 +0000 | [diff] [blame] | 30 | // * All Instructions must be embedded into a basic block |
Misha Brukman | 5b63631 | 2004-06-24 21:47:35 +0000 | [diff] [blame] | 31 | // * Functions cannot take a void-typed parameter |
Chris Lattner | ea24924 | 2002-04-13 22:48:46 +0000 | [diff] [blame] | 32 | // * Verify that a function's argument list agrees with it's declared type. |
Chris Lattner | acd3cae | 2002-03-15 20:25:09 +0000 | [diff] [blame] | 33 | // * It is illegal to specify a name for a void value. |
Misha Brukman | 6b63452 | 2003-10-10 17:54:14 +0000 | [diff] [blame] | 34 | // * It is illegal to have a internal global value with no initializer |
Chris Lattner | 23f0ce6 | 2002-04-12 18:20:49 +0000 | [diff] [blame] | 35 | // * It is illegal to have a ret instruction that returns a value that does not |
| 36 | // agree with the function return value type. |
Chris Lattner | 56732fb | 2002-05-08 19:49:50 +0000 | [diff] [blame] | 37 | // * Function call argument types match the function prototype |
Chris Lattner | a00409e | 2002-04-24 19:12:21 +0000 | [diff] [blame] | 38 | // * All other things that are tested by asserts spread about the code... |
Chris Lattner | 0095054 | 2001-06-06 20:29:01 +0000 | [diff] [blame] | 39 | // |
| 40 | //===----------------------------------------------------------------------===// |
| 41 | |
| 42 | #include "llvm/Analysis/Verifier.h" |
Brian Gaeke | 9cebe2d | 2003-11-16 23:07:42 +0000 | [diff] [blame] | 43 | #include "llvm/Assembly/Writer.h" |
Chris Lattner | cf89908 | 2004-02-14 02:47:17 +0000 | [diff] [blame] | 44 | #include "llvm/Constants.h" |
Chris Lattner | 44d5bd9 | 2002-02-20 17:55:43 +0000 | [diff] [blame] | 45 | #include "llvm/Pass.h" |
Chris Lattner | 0095054 | 2001-06-06 20:29:01 +0000 | [diff] [blame] | 46 | #include "llvm/Module.h" |
Chris Lattner | 2eff859 | 2004-03-14 03:16:15 +0000 | [diff] [blame] | 47 | #include "llvm/ModuleProvider.h" |
Chris Lattner | ea24924 | 2002-04-13 22:48:46 +0000 | [diff] [blame] | 48 | #include "llvm/DerivedTypes.h" |
Chris Lattner | cf89908 | 2004-02-14 02:47:17 +0000 | [diff] [blame] | 49 | #include "llvm/Instructions.h" |
Chris Lattner | dd035d1 | 2003-05-08 03:47:33 +0000 | [diff] [blame] | 50 | #include "llvm/Intrinsics.h" |
Chris Lattner | cf89908 | 2004-02-14 02:47:17 +0000 | [diff] [blame] | 51 | #include "llvm/PassManager.h" |
| 52 | #include "llvm/SymbolTable.h" |
Chris Lattner | 9ce231f | 2002-08-02 17:37:08 +0000 | [diff] [blame] | 53 | #include "llvm/Analysis/Dominators.h" |
Chris Lattner | 44d5bd9 | 2002-02-20 17:55:43 +0000 | [diff] [blame] | 54 | #include "llvm/Support/CFG.h" |
Chris Lattner | d231fc3 | 2002-04-18 20:37:37 +0000 | [diff] [blame] | 55 | #include "llvm/Support/InstVisitor.h" |
Reid Spencer | 551ccae | 2004-09-01 22:55:40 +0000 | [diff] [blame] | 56 | #include "llvm/ADT/STLExtras.h" |
Chris Lattner | 44d5bd9 | 2002-02-20 17:55:43 +0000 | [diff] [blame] | 57 | #include <algorithm> |
Reid Spencer | e2fac77 | 2004-07-04 11:55:37 +0000 | [diff] [blame] | 58 | #include <iostream> |
Chris Lattner | fdc38c4 | 2004-04-02 15:45:08 +0000 | [diff] [blame] | 59 | #include <sstream> |
Chris Lattner | 31f8499 | 2003-11-21 20:23:48 +0000 | [diff] [blame] | 60 | using namespace llvm; |
Brian Gaeke | d0fde30 | 2003-11-11 22:41:34 +0000 | [diff] [blame] | 61 | |
Chris Lattner | d231fc3 | 2002-04-18 20:37:37 +0000 | [diff] [blame] | 62 | namespace { // Anonymous namespace for class |
Chris Lattner | 0095054 | 2001-06-06 20:29:01 +0000 | [diff] [blame] | 63 | |
Chris Lattner | f57b845 | 2002-04-27 06:56:12 +0000 | [diff] [blame] | 64 | struct Verifier : public FunctionPass, InstVisitor<Verifier> { |
Chris Lattner | 9ce231f | 2002-08-02 17:37:08 +0000 | [diff] [blame] | 65 | bool Broken; // Is this module found to be broken? |
| 66 | bool RealPass; // Are we not being run by a PassManager? |
Chris Lattner | fdc38c4 | 2004-04-02 15:45:08 +0000 | [diff] [blame] | 67 | VerifierFailureAction action; |
Reid Spencer | af90b0d | 2004-05-25 08:53:29 +0000 | [diff] [blame] | 68 | // What to do if verification fails. |
Misha Brukman | ab5c600 | 2004-03-02 00:22:19 +0000 | [diff] [blame] | 69 | Module *Mod; // Module we are verifying right now |
| 70 | DominatorSet *DS; // Dominator set, caution can be null! |
Chris Lattner | fdc38c4 | 2004-04-02 15:45:08 +0000 | [diff] [blame] | 71 | std::stringstream msgs; // A stringstream to collect messages |
Chris Lattner | 0095054 | 2001-06-06 20:29:01 +0000 | [diff] [blame] | 72 | |
Chris Lattner | a7b1c7e | 2004-09-29 20:07:45 +0000 | [diff] [blame] | 73 | /// InstInThisBlock - when verifying a basic block, keep track of all of the |
| 74 | /// instructions we have seen so far. This allows us to do efficient |
| 75 | /// dominance checks for the case when an instruction has an operand that is |
| 76 | /// an instruction in the same block. |
| 77 | std::set<Instruction*> InstsInThisBlock; |
| 78 | |
Chris Lattner | fdc38c4 | 2004-04-02 15:45:08 +0000 | [diff] [blame] | 79 | Verifier() |
Reid Spencer | af90b0d | 2004-05-25 08:53:29 +0000 | [diff] [blame] | 80 | : Broken(false), RealPass(true), action(AbortProcessAction), |
Jeff Cohen | 5fb6ed4 | 2005-01-22 17:36:17 +0000 | [diff] [blame] | 81 | DS(0), msgs( std::ios::app | std::ios::out ) {} |
Chris Lattner | fdc38c4 | 2004-04-02 15:45:08 +0000 | [diff] [blame] | 82 | Verifier( VerifierFailureAction ctn ) |
Reid Spencer | af90b0d | 2004-05-25 08:53:29 +0000 | [diff] [blame] | 83 | : Broken(false), RealPass(true), action(ctn), DS(0), |
Jeff Cohen | 5fb6ed4 | 2005-01-22 17:36:17 +0000 | [diff] [blame] | 84 | msgs( std::ios::app | std::ios::out ) {} |
Chris Lattner | fdc38c4 | 2004-04-02 15:45:08 +0000 | [diff] [blame] | 85 | Verifier(bool AB ) |
Reid Spencer | af90b0d | 2004-05-25 08:53:29 +0000 | [diff] [blame] | 86 | : Broken(false), RealPass(true), |
Chris Lattner | fdc38c4 | 2004-04-02 15:45:08 +0000 | [diff] [blame] | 87 | action( AB ? AbortProcessAction : PrintMessageAction), DS(0), |
Jeff Cohen | 5fb6ed4 | 2005-01-22 17:36:17 +0000 | [diff] [blame] | 88 | msgs( std::ios::app | std::ios::out ) {} |
Chris Lattner | 9ce231f | 2002-08-02 17:37:08 +0000 | [diff] [blame] | 89 | Verifier(DominatorSet &ds) |
Chris Lattner | fdc38c4 | 2004-04-02 15:45:08 +0000 | [diff] [blame] | 90 | : Broken(false), RealPass(false), action(PrintMessageAction), |
Jeff Cohen | 5fb6ed4 | 2005-01-22 17:36:17 +0000 | [diff] [blame] | 91 | DS(&ds), msgs( std::ios::app | std::ios::out ) {} |
Chris Lattner | 9ce231f | 2002-08-02 17:37:08 +0000 | [diff] [blame] | 92 | |
Chris Lattner | 0095054 | 2001-06-06 20:29:01 +0000 | [diff] [blame] | 93 | |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 94 | bool doInitialization(Module &M) { |
Brian Gaeke | 9cebe2d | 2003-11-16 23:07:42 +0000 | [diff] [blame] | 95 | Mod = &M; |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 96 | verifySymbolTable(M.getSymbolTable()); |
Chris Lattner | 3e1f144 | 2002-09-19 16:12:19 +0000 | [diff] [blame] | 97 | |
| 98 | // If this is a real pass, in a pass manager, we must abort before |
| 99 | // returning back to the pass manager, or else the pass manager may try to |
| 100 | // run other passes on the broken module. |
Chris Lattner | 3e1f144 | 2002-09-19 16:12:19 +0000 | [diff] [blame] | 101 | if (RealPass) |
| 102 | abortIfBroken(); |
Chris Lattner | d231fc3 | 2002-04-18 20:37:37 +0000 | [diff] [blame] | 103 | return false; |
| 104 | } |
| 105 | |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 106 | bool runOnFunction(Function &F) { |
Chris Lattner | 9ce231f | 2002-08-02 17:37:08 +0000 | [diff] [blame] | 107 | // Get dominator information if we are being run by PassManager |
| 108 | if (RealPass) DS = &getAnalysis<DominatorSet>(); |
Chris Lattner | d231fc3 | 2002-04-18 20:37:37 +0000 | [diff] [blame] | 109 | visit(F); |
Chris Lattner | a7b1c7e | 2004-09-29 20:07:45 +0000 | [diff] [blame] | 110 | InstsInThisBlock.clear(); |
Chris Lattner | 3e1f144 | 2002-09-19 16:12:19 +0000 | [diff] [blame] | 111 | |
| 112 | // If this is a real pass, in a pass manager, we must abort before |
| 113 | // returning back to the pass manager, or else the pass manager may try to |
| 114 | // run other passes on the broken module. |
Chris Lattner | 3e1f144 | 2002-09-19 16:12:19 +0000 | [diff] [blame] | 115 | if (RealPass) |
| 116 | abortIfBroken(); |
| 117 | |
Chris Lattner | d231fc3 | 2002-04-18 20:37:37 +0000 | [diff] [blame] | 118 | return false; |
| 119 | } |
| 120 | |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 121 | bool doFinalization(Module &M) { |
Chris Lattner | 794caa1 | 2002-04-28 16:04:26 +0000 | [diff] [blame] | 122 | // Scan through, checking all of the external function's linkage now... |
Chris Lattner | 7c277b3 | 2004-06-03 06:38:43 +0000 | [diff] [blame] | 123 | for (Module::iterator I = M.begin(), E = M.end(); I != E; ++I) { |
Chris Lattner | 5399741 | 2003-04-16 20:42:40 +0000 | [diff] [blame] | 124 | visitGlobalValue(*I); |
Chris Lattner | 794caa1 | 2002-04-28 16:04:26 +0000 | [diff] [blame] | 125 | |
Chris Lattner | 7c277b3 | 2004-06-03 06:38:43 +0000 | [diff] [blame] | 126 | // Check to make sure function prototypes are okay. |
| 127 | if (I->isExternal()) visitFunction(*I); |
| 128 | } |
| 129 | |
Chris Lattner | e4d5c44 | 2005-03-15 04:54:21 +0000 | [diff] [blame^] | 130 | for (Module::global_iterator I = M.global_begin(), E = M.global_end(); I != E; ++I) |
Chris Lattner | 56998b2 | 2004-12-15 20:23:49 +0000 | [diff] [blame] | 131 | visitGlobalVariable(*I); |
Chris Lattner | 61b91bc | 2002-10-06 22:47:32 +0000 | [diff] [blame] | 132 | |
Chris Lattner | 3e1f144 | 2002-09-19 16:12:19 +0000 | [diff] [blame] | 133 | // If the module is broken, abort at this time. |
| 134 | abortIfBroken(); |
Chris Lattner | a00409e | 2002-04-24 19:12:21 +0000 | [diff] [blame] | 135 | return false; |
| 136 | } |
| 137 | |
Chris Lattner | 97e52e4 | 2002-04-28 21:27:06 +0000 | [diff] [blame] | 138 | virtual void getAnalysisUsage(AnalysisUsage &AU) const { |
| 139 | AU.setPreservesAll(); |
Chris Lattner | 9ce231f | 2002-08-02 17:37:08 +0000 | [diff] [blame] | 140 | if (RealPass) |
Chris Lattner | dd5b495 | 2002-08-08 19:01:28 +0000 | [diff] [blame] | 141 | AU.addRequired<DominatorSet>(); |
Chris Lattner | 97e52e4 | 2002-04-28 21:27:06 +0000 | [diff] [blame] | 142 | } |
| 143 | |
Misha Brukman | ab5c600 | 2004-03-02 00:22:19 +0000 | [diff] [blame] | 144 | /// abortIfBroken - If the module is broken and we are supposed to abort on |
| 145 | /// this condition, do so. |
| 146 | /// |
Chris Lattner | fdc38c4 | 2004-04-02 15:45:08 +0000 | [diff] [blame] | 147 | void abortIfBroken() { |
| 148 | if (Broken) |
| 149 | { |
| 150 | msgs << "Broken module found, "; |
John Criswell | 4a9c904 | 2004-05-04 21:46:05 +0000 | [diff] [blame] | 151 | switch (action) |
| 152 | { |
| 153 | case AbortProcessAction: |
| 154 | msgs << "compilation aborted!\n"; |
| 155 | std::cerr << msgs.str(); |
| 156 | abort(); |
| 157 | case ThrowExceptionAction: |
| 158 | msgs << "verification terminated.\n"; |
| 159 | throw msgs.str(); |
| 160 | case PrintMessageAction: |
| 161 | msgs << "verification continues.\n"; |
| 162 | std::cerr << msgs.str(); |
| 163 | break; |
| 164 | case ReturnStatusAction: |
| 165 | break; |
| 166 | } |
Chris Lattner | 3e1f144 | 2002-09-19 16:12:19 +0000 | [diff] [blame] | 167 | } |
| 168 | } |
| 169 | |
Chris Lattner | 5399741 | 2003-04-16 20:42:40 +0000 | [diff] [blame] | 170 | |
Chris Lattner | d231fc3 | 2002-04-18 20:37:37 +0000 | [diff] [blame] | 171 | // Verification methods... |
Chris Lattner | 6e6026b | 2002-11-20 18:36:02 +0000 | [diff] [blame] | 172 | void verifySymbolTable(SymbolTable &ST); |
Chris Lattner | 5399741 | 2003-04-16 20:42:40 +0000 | [diff] [blame] | 173 | void visitGlobalValue(GlobalValue &GV); |
Chris Lattner | 56998b2 | 2004-12-15 20:23:49 +0000 | [diff] [blame] | 174 | void visitGlobalVariable(GlobalVariable &GV); |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 175 | void visitFunction(Function &F); |
| 176 | void visitBasicBlock(BasicBlock &BB); |
| 177 | void visitPHINode(PHINode &PN); |
| 178 | void visitBinaryOperator(BinaryOperator &B); |
Chris Lattner | 1a143ae | 2002-09-09 20:26:04 +0000 | [diff] [blame] | 179 | void visitShiftInst(ShiftInst &SI); |
Chris Lattner | 4d45bd0 | 2003-10-18 05:57:43 +0000 | [diff] [blame] | 180 | void visitVANextInst(VANextInst &VAN) { visitInstruction(VAN); } |
| 181 | void visitVAArgInst(VAArgInst &VAA) { visitInstruction(VAA); } |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 182 | void visitCallInst(CallInst &CI); |
| 183 | void visitGetElementPtrInst(GetElementPtrInst &GEP); |
| 184 | void visitLoadInst(LoadInst &LI); |
| 185 | void visitStoreInst(StoreInst &SI); |
| 186 | void visitInstruction(Instruction &I); |
| 187 | void visitTerminatorInst(TerminatorInst &I); |
| 188 | void visitReturnInst(ReturnInst &RI); |
Chris Lattner | 0f9e9d0 | 2004-05-21 16:47:21 +0000 | [diff] [blame] | 189 | void visitSwitchInst(SwitchInst &SI); |
Chris Lattner | 230c1a7 | 2004-03-12 05:54:31 +0000 | [diff] [blame] | 190 | void visitSelectInst(SelectInst &SI); |
Chris Lattner | 627079d | 2002-11-21 16:54:22 +0000 | [diff] [blame] | 191 | void visitUserOp1(Instruction &I); |
| 192 | void visitUserOp2(Instruction &I) { visitUserOp1(I); } |
Brian Gaeke | d0fde30 | 2003-11-11 22:41:34 +0000 | [diff] [blame] | 193 | void visitIntrinsicFunctionCall(Intrinsic::ID ID, CallInst &CI); |
Chris Lattner | d231fc3 | 2002-04-18 20:37:37 +0000 | [diff] [blame] | 194 | |
Chris Lattner | 15e8752 | 2003-11-21 17:35:51 +0000 | [diff] [blame] | 195 | |
| 196 | void WriteValue(const Value *V) { |
| 197 | if (!V) return; |
Chris Lattner | 31f8499 | 2003-11-21 20:23:48 +0000 | [diff] [blame] | 198 | if (isa<Instruction>(V)) { |
Chris Lattner | fdc38c4 | 2004-04-02 15:45:08 +0000 | [diff] [blame] | 199 | msgs << *V; |
Chris Lattner | 31f8499 | 2003-11-21 20:23:48 +0000 | [diff] [blame] | 200 | } else { |
Chris Lattner | fdc38c4 | 2004-04-02 15:45:08 +0000 | [diff] [blame] | 201 | WriteAsOperand (msgs, V, true, true, Mod); |
| 202 | msgs << "\n"; |
Chris Lattner | 15e8752 | 2003-11-21 17:35:51 +0000 | [diff] [blame] | 203 | } |
| 204 | } |
| 205 | |
Reid Spencer | af90b0d | 2004-05-25 08:53:29 +0000 | [diff] [blame] | 206 | void WriteType(const Type* T ) { |
| 207 | if ( !T ) return; |
| 208 | WriteTypeSymbolic(msgs, T, Mod ); |
| 209 | } |
| 210 | |
Chris Lattner | 15e8752 | 2003-11-21 17:35:51 +0000 | [diff] [blame] | 211 | |
Chris Lattner | d231fc3 | 2002-04-18 20:37:37 +0000 | [diff] [blame] | 212 | // CheckFailed - A check failed, so print out the condition and the message |
| 213 | // that failed. This provides a nice place to put a breakpoint if you want |
| 214 | // to see why something is not correct. |
Chris Lattner | 15e8752 | 2003-11-21 17:35:51 +0000 | [diff] [blame] | 215 | void CheckFailed(const std::string &Message, |
| 216 | const Value *V1 = 0, const Value *V2 = 0, |
| 217 | const Value *V3 = 0, const Value *V4 = 0) { |
Chris Lattner | fdc38c4 | 2004-04-02 15:45:08 +0000 | [diff] [blame] | 218 | msgs << Message << "\n"; |
Chris Lattner | 15e8752 | 2003-11-21 17:35:51 +0000 | [diff] [blame] | 219 | WriteValue(V1); |
| 220 | WriteValue(V2); |
| 221 | WriteValue(V3); |
| 222 | WriteValue(V4); |
Chris Lattner | d231fc3 | 2002-04-18 20:37:37 +0000 | [diff] [blame] | 223 | Broken = true; |
| 224 | } |
Reid Spencer | af90b0d | 2004-05-25 08:53:29 +0000 | [diff] [blame] | 225 | |
| 226 | void CheckFailed( const std::string& Message, const Value* V1, |
| 227 | const Type* T2, const Value* V3 = 0 ) { |
| 228 | msgs << Message << "\n"; |
| 229 | WriteValue(V1); |
| 230 | WriteType(T2); |
| 231 | WriteValue(V3); |
Reid Spencer | 5dff158 | 2004-05-27 21:58:13 +0000 | [diff] [blame] | 232 | Broken = true; |
Reid Spencer | af90b0d | 2004-05-25 08:53:29 +0000 | [diff] [blame] | 233 | } |
Chris Lattner | d231fc3 | 2002-04-18 20:37:37 +0000 | [diff] [blame] | 234 | }; |
Chris Lattner | e20a5dd | 2002-07-23 18:08:17 +0000 | [diff] [blame] | 235 | |
Chris Lattner | 5158aaf | 2003-11-13 19:47:29 +0000 | [diff] [blame] | 236 | RegisterOpt<Verifier> X("verify", "Module Verifier"); |
Chris Lattner | 31f8499 | 2003-11-21 20:23:48 +0000 | [diff] [blame] | 237 | } // End anonymous namespace |
| 238 | |
Chris Lattner | 0095054 | 2001-06-06 20:29:01 +0000 | [diff] [blame] | 239 | |
Chris Lattner | 44d5bd9 | 2002-02-20 17:55:43 +0000 | [diff] [blame] | 240 | // Assert - We know that cond should be true, if not print an error message. |
| 241 | #define Assert(C, M) \ |
Chris Lattner | 39dd024 | 2002-04-28 16:06:24 +0000 | [diff] [blame] | 242 | do { if (!(C)) { CheckFailed(M); return; } } while (0) |
Chris Lattner | 44d5bd9 | 2002-02-20 17:55:43 +0000 | [diff] [blame] | 243 | #define Assert1(C, M, V1) \ |
Chris Lattner | 39dd024 | 2002-04-28 16:06:24 +0000 | [diff] [blame] | 244 | do { if (!(C)) { CheckFailed(M, V1); return; } } while (0) |
Chris Lattner | 44d5bd9 | 2002-02-20 17:55:43 +0000 | [diff] [blame] | 245 | #define Assert2(C, M, V1, V2) \ |
Chris Lattner | 39dd024 | 2002-04-28 16:06:24 +0000 | [diff] [blame] | 246 | do { if (!(C)) { CheckFailed(M, V1, V2); return; } } while (0) |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 247 | #define Assert3(C, M, V1, V2, V3) \ |
| 248 | do { if (!(C)) { CheckFailed(M, V1, V2, V3); return; } } while (0) |
| 249 | #define Assert4(C, M, V1, V2, V3, V4) \ |
| 250 | do { if (!(C)) { CheckFailed(M, V1, V2, V3, V4); return; } } while (0) |
Chris Lattner | 0095054 | 2001-06-06 20:29:01 +0000 | [diff] [blame] | 251 | |
Chris Lattner | 44d5bd9 | 2002-02-20 17:55:43 +0000 | [diff] [blame] | 252 | |
Chris Lattner | 5399741 | 2003-04-16 20:42:40 +0000 | [diff] [blame] | 253 | void Verifier::visitGlobalValue(GlobalValue &GV) { |
| 254 | Assert1(!GV.isExternal() || GV.hasExternalLinkage(), |
Chris Lattner | afd0b4b | 2003-11-21 20:33:27 +0000 | [diff] [blame] | 255 | "Global is external, but doesn't have external linkage!", &GV); |
Chris Lattner | 5399741 | 2003-04-16 20:42:40 +0000 | [diff] [blame] | 256 | Assert1(!GV.hasAppendingLinkage() || isa<GlobalVariable>(GV), |
| 257 | "Only global variables can have appending linkage!", &GV); |
| 258 | |
| 259 | if (GV.hasAppendingLinkage()) { |
| 260 | GlobalVariable &GVar = cast<GlobalVariable>(GV); |
| 261 | Assert1(isa<ArrayType>(GVar.getType()->getElementType()), |
| 262 | "Only global arrays can have appending linkage!", &GV); |
| 263 | } |
| 264 | } |
| 265 | |
Chris Lattner | 56998b2 | 2004-12-15 20:23:49 +0000 | [diff] [blame] | 266 | void Verifier::visitGlobalVariable(GlobalVariable &GV) { |
| 267 | if (GV.hasInitializer()) |
| 268 | Assert1(GV.getInitializer()->getType() == GV.getType()->getElementType(), |
| 269 | "Global variable initializer type does not match global " |
| 270 | "variable type!", &GV); |
| 271 | |
| 272 | visitGlobalValue(GV); |
| 273 | } |
| 274 | |
| 275 | |
Chris Lattner | ea24924 | 2002-04-13 22:48:46 +0000 | [diff] [blame] | 276 | // verifySymbolTable - Verify that a function or module symbol table is ok |
Chris Lattner | acd3cae | 2002-03-15 20:25:09 +0000 | [diff] [blame] | 277 | // |
Chris Lattner | 6e6026b | 2002-11-20 18:36:02 +0000 | [diff] [blame] | 278 | void Verifier::verifySymbolTable(SymbolTable &ST) { |
Chris Lattner | acd3cae | 2002-03-15 20:25:09 +0000 | [diff] [blame] | 279 | |
Reid Spencer | af90b0d | 2004-05-25 08:53:29 +0000 | [diff] [blame] | 280 | // Loop over all of the values in all type planes in the symbol table. |
| 281 | for (SymbolTable::plane_const_iterator PI = ST.plane_begin(), |
| 282 | PE = ST.plane_end(); PI != PE; ++PI) |
| 283 | for (SymbolTable::value_const_iterator VI = PI->second.begin(), |
| 284 | VE = PI->second.end(); VI != VE; ++VI) { |
| 285 | Value *V = VI->second; |
Chris Lattner | acd3cae | 2002-03-15 20:25:09 +0000 | [diff] [blame] | 286 | // Check that there are no void typed values in the symbol table. Values |
| 287 | // with a void type cannot be put into symbol tables because they cannot |
| 288 | // have names! |
| 289 | Assert1(V->getType() != Type::VoidTy, |
Reid Spencer | af90b0d | 2004-05-25 08:53:29 +0000 | [diff] [blame] | 290 | "Values with void type are not allowed to have names!", V); |
Chris Lattner | acd3cae | 2002-03-15 20:25:09 +0000 | [diff] [blame] | 291 | } |
Chris Lattner | acd3cae | 2002-03-15 20:25:09 +0000 | [diff] [blame] | 292 | } |
| 293 | |
Chris Lattner | d231fc3 | 2002-04-18 20:37:37 +0000 | [diff] [blame] | 294 | // visitFunction - Verify that a function is ok. |
Chris Lattner | 44d5bd9 | 2002-02-20 17:55:43 +0000 | [diff] [blame] | 295 | // |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 296 | void Verifier::visitFunction(Function &F) { |
Chris Lattner | ea24924 | 2002-04-13 22:48:46 +0000 | [diff] [blame] | 297 | // Check function arguments... |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 298 | const FunctionType *FT = F.getFunctionType(); |
| 299 | unsigned NumArgs = F.getArgumentList().size(); |
Chris Lattner | ea24924 | 2002-04-13 22:48:46 +0000 | [diff] [blame] | 300 | |
Chris Lattner | 69da5cf | 2002-10-13 20:57:00 +0000 | [diff] [blame] | 301 | Assert2(FT->getNumParams() == NumArgs, |
Chris Lattner | ea24924 | 2002-04-13 22:48:46 +0000 | [diff] [blame] | 302 | "# formal arguments must match # of arguments for function type!", |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 303 | &F, FT); |
Chris Lattner | c282f5a | 2003-11-21 22:32:23 +0000 | [diff] [blame] | 304 | Assert1(F.getReturnType()->isFirstClassType() || |
| 305 | F.getReturnType() == Type::VoidTy, |
| 306 | "Functions cannot return aggregate values!", &F); |
Chris Lattner | ea24924 | 2002-04-13 22:48:46 +0000 | [diff] [blame] | 307 | |
| 308 | // Check that the argument values match the function type for this function... |
Chris Lattner | 69da5cf | 2002-10-13 20:57:00 +0000 | [diff] [blame] | 309 | unsigned i = 0; |
Chris Lattner | e4d5c44 | 2005-03-15 04:54:21 +0000 | [diff] [blame^] | 310 | for (Function::arg_iterator I = F.arg_begin(), E = F.arg_end(); I != E; ++I, ++i) { |
Chris Lattner | 69da5cf | 2002-10-13 20:57:00 +0000 | [diff] [blame] | 311 | Assert2(I->getType() == FT->getParamType(i), |
| 312 | "Argument value does not match function argument type!", |
| 313 | I, FT->getParamType(i)); |
Chris Lattner | 7c277b3 | 2004-06-03 06:38:43 +0000 | [diff] [blame] | 314 | // Make sure no aggregates are passed by value. |
| 315 | Assert1(I->getType()->isFirstClassType(), |
| 316 | "Functions cannot take aggregates as arguments by value!", I); |
| 317 | } |
Chris Lattner | ea24924 | 2002-04-13 22:48:46 +0000 | [diff] [blame] | 318 | |
Chris Lattner | 69da5cf | 2002-10-13 20:57:00 +0000 | [diff] [blame] | 319 | if (!F.isExternal()) { |
| 320 | verifySymbolTable(F.getSymbolTable()); |
| 321 | |
| 322 | // Check the entry node |
Chris Lattner | 02a3be0 | 2003-09-20 14:39:18 +0000 | [diff] [blame] | 323 | BasicBlock *Entry = &F.getEntryBlock(); |
Chris Lattner | 69da5cf | 2002-10-13 20:57:00 +0000 | [diff] [blame] | 324 | Assert1(pred_begin(Entry) == pred_end(Entry), |
| 325 | "Entry block to function must not have predecessors!", Entry); |
| 326 | } |
Chris Lattner | 44d5bd9 | 2002-02-20 17:55:43 +0000 | [diff] [blame] | 327 | } |
| 328 | |
| 329 | |
Chris Lattner | d231fc3 | 2002-04-18 20:37:37 +0000 | [diff] [blame] | 330 | // verifyBasicBlock - Verify that a basic block is well formed... |
| 331 | // |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 332 | void Verifier::visitBasicBlock(BasicBlock &BB) { |
Chris Lattner | a7b1c7e | 2004-09-29 20:07:45 +0000 | [diff] [blame] | 333 | InstsInThisBlock.clear(); |
| 334 | |
Alkis Evlogimenos | 4f4cf99 | 2004-12-04 02:30:42 +0000 | [diff] [blame] | 335 | // Ensure that basic blocks have terminators! |
| 336 | Assert1(BB.getTerminator(), "Basic Block does not have terminator!", &BB); |
| 337 | |
Chris Lattner | bede31f | 2003-10-05 17:44:18 +0000 | [diff] [blame] | 338 | // Check constraints that this basic block imposes on all of the PHI nodes in |
| 339 | // it. |
| 340 | if (isa<PHINode>(BB.front())) { |
| 341 | std::vector<BasicBlock*> Preds(pred_begin(&BB), pred_end(&BB)); |
| 342 | std::sort(Preds.begin(), Preds.end()); |
Chris Lattner | ed965e9 | 2004-06-05 00:22:04 +0000 | [diff] [blame] | 343 | PHINode *PN; |
Chris Lattner | c70a509 | 2004-06-05 17:44:48 +0000 | [diff] [blame] | 344 | for (BasicBlock::iterator I = BB.begin(); (PN = dyn_cast<PHINode>(I));++I) { |
Chris Lattner | bede31f | 2003-10-05 17:44:18 +0000 | [diff] [blame] | 345 | |
| 346 | // Ensure that PHI nodes have at least one entry! |
| 347 | Assert1(PN->getNumIncomingValues() != 0, |
| 348 | "PHI nodes must have at least one entry. If the block is dead, " |
| 349 | "the PHI should be removed!", PN); |
Brian Gaeke | 2fea9ad | 2004-05-17 21:15:18 +0000 | [diff] [blame] | 350 | Assert1(PN->getNumIncomingValues() == Preds.size(), |
| 351 | "PHINode should have one entry for each predecessor of its " |
| 352 | "parent basic block!", PN); |
Chris Lattner | bede31f | 2003-10-05 17:44:18 +0000 | [diff] [blame] | 353 | |
| 354 | // Get and sort all incoming values in the PHI node... |
| 355 | std::vector<std::pair<BasicBlock*, Value*> > Values; |
| 356 | Values.reserve(PN->getNumIncomingValues()); |
| 357 | for (unsigned i = 0, e = PN->getNumIncomingValues(); i != e; ++i) |
| 358 | Values.push_back(std::make_pair(PN->getIncomingBlock(i), |
| 359 | PN->getIncomingValue(i))); |
| 360 | std::sort(Values.begin(), Values.end()); |
| 361 | |
| 362 | for (unsigned i = 0, e = Values.size(); i != e; ++i) { |
| 363 | // Check to make sure that if there is more than one entry for a |
| 364 | // particular basic block in this PHI node, that the incoming values are |
| 365 | // all identical. |
| 366 | // |
| 367 | Assert4(i == 0 || Values[i].first != Values[i-1].first || |
| 368 | Values[i].second == Values[i-1].second, |
| 369 | "PHI node has multiple entries for the same basic block with " |
| 370 | "different incoming values!", PN, Values[i].first, |
| 371 | Values[i].second, Values[i-1].second); |
| 372 | |
| 373 | // Check to make sure that the predecessors and PHI node entries are |
| 374 | // matched up. |
| 375 | Assert3(Values[i].first == Preds[i], |
| 376 | "PHI node entries do not match predecessors!", PN, |
| 377 | Values[i].first, Preds[i]); |
| 378 | } |
| 379 | } |
| 380 | } |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 381 | } |
Chris Lattner | acd3cae | 2002-03-15 20:25:09 +0000 | [diff] [blame] | 382 | |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 383 | void Verifier::visitTerminatorInst(TerminatorInst &I) { |
| 384 | // Ensure that terminators only exist at the end of the basic block. |
| 385 | Assert1(&I == I.getParent()->getTerminator(), |
| 386 | "Terminator found in the middle of a basic block!", I.getParent()); |
Chris Lattner | 3535c9b | 2002-07-18 00:13:42 +0000 | [diff] [blame] | 387 | visitInstruction(I); |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 388 | } |
| 389 | |
| 390 | void Verifier::visitReturnInst(ReturnInst &RI) { |
| 391 | Function *F = RI.getParent()->getParent(); |
| 392 | if (RI.getNumOperands() == 0) |
Alkis Evlogimenos | 8b42b43 | 2004-12-04 01:25:06 +0000 | [diff] [blame] | 393 | Assert2(F->getReturnType() == Type::VoidTy, |
| 394 | "Found return instr that returns void in Function of non-void " |
| 395 | "return type!", &RI, F->getReturnType()); |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 396 | else |
| 397 | Assert2(F->getReturnType() == RI.getOperand(0)->getType(), |
| 398 | "Function return type does not match operand " |
| 399 | "type of return inst!", &RI, F->getReturnType()); |
| 400 | |
Misha Brukman | 5560c9d | 2003-08-18 14:43:39 +0000 | [diff] [blame] | 401 | // Check to make sure that the return value has necessary properties for |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 402 | // terminators... |
| 403 | visitTerminatorInst(RI); |
Chris Lattner | 44d5bd9 | 2002-02-20 17:55:43 +0000 | [diff] [blame] | 404 | } |
| 405 | |
Chris Lattner | 0f9e9d0 | 2004-05-21 16:47:21 +0000 | [diff] [blame] | 406 | void Verifier::visitSwitchInst(SwitchInst &SI) { |
| 407 | // Check to make sure that all of the constants in the switch instruction |
| 408 | // have the same type as the switched-on value. |
| 409 | const Type *SwitchTy = SI.getCondition()->getType(); |
| 410 | for (unsigned i = 1, e = SI.getNumCases(); i != e; ++i) |
| 411 | Assert1(SI.getCaseValue(i)->getType() == SwitchTy, |
| 412 | "Switch constants must all be same type as switch value!", &SI); |
| 413 | |
| 414 | visitTerminatorInst(SI); |
| 415 | } |
| 416 | |
Chris Lattner | 230c1a7 | 2004-03-12 05:54:31 +0000 | [diff] [blame] | 417 | void Verifier::visitSelectInst(SelectInst &SI) { |
| 418 | Assert1(SI.getCondition()->getType() == Type::BoolTy, |
| 419 | "Select condition type must be bool!", &SI); |
| 420 | Assert1(SI.getTrueValue()->getType() == SI.getFalseValue()->getType(), |
| 421 | "Select values must have identical types!", &SI); |
| 422 | Assert1(SI.getTrueValue()->getType() == SI.getType(), |
| 423 | "Select values must have same type as select instruction!", &SI); |
Chris Lattner | 0030e6c | 2004-09-29 21:19:28 +0000 | [diff] [blame] | 424 | visitInstruction(SI); |
Chris Lattner | 230c1a7 | 2004-03-12 05:54:31 +0000 | [diff] [blame] | 425 | } |
| 426 | |
| 427 | |
Misha Brukman | ab5c600 | 2004-03-02 00:22:19 +0000 | [diff] [blame] | 428 | /// visitUserOp1 - User defined operators shouldn't live beyond the lifetime of |
| 429 | /// a pass, if any exist, it's an error. |
| 430 | /// |
Chris Lattner | 627079d | 2002-11-21 16:54:22 +0000 | [diff] [blame] | 431 | void Verifier::visitUserOp1(Instruction &I) { |
| 432 | Assert1(0, "User-defined operators should not live outside of a pass!", |
| 433 | &I); |
| 434 | } |
Chris Lattner | d231fc3 | 2002-04-18 20:37:37 +0000 | [diff] [blame] | 435 | |
Misha Brukman | ab5c600 | 2004-03-02 00:22:19 +0000 | [diff] [blame] | 436 | /// visitPHINode - Ensure that a PHI node is well formed. |
| 437 | /// |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 438 | void Verifier::visitPHINode(PHINode &PN) { |
| 439 | // Ensure that the PHI nodes are all grouped together at the top of the block. |
| 440 | // This can be tested by checking whether the instruction before this is |
Misha Brukman | 6b63452 | 2003-10-10 17:54:14 +0000 | [diff] [blame] | 441 | // either nonexistent (because this is begin()) or is a PHI node. If not, |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 442 | // then there is some other instruction before a PHI. |
Chris Lattner | bede31f | 2003-10-05 17:44:18 +0000 | [diff] [blame] | 443 | Assert2(&PN.getParent()->front() == &PN || isa<PHINode>(PN.getPrev()), |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 444 | "PHI nodes not grouped at top of basic block!", |
| 445 | &PN, PN.getParent()); |
| 446 | |
Chris Lattner | 579de71 | 2003-11-12 07:13:37 +0000 | [diff] [blame] | 447 | // Check that all of the operands of the PHI node have the same type as the |
| 448 | // result. |
| 449 | for (unsigned i = 0, e = PN.getNumIncomingValues(); i != e; ++i) |
| 450 | Assert1(PN.getType() == PN.getIncomingValue(i)->getType(), |
| 451 | "PHI node operands are not the same type as the result!", &PN); |
| 452 | |
Chris Lattner | bede31f | 2003-10-05 17:44:18 +0000 | [diff] [blame] | 453 | // All other PHI node constraints are checked in the visitBasicBlock method. |
Chris Lattner | d231fc3 | 2002-04-18 20:37:37 +0000 | [diff] [blame] | 454 | |
| 455 | visitInstruction(PN); |
| 456 | } |
| 457 | |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 458 | void Verifier::visitCallInst(CallInst &CI) { |
| 459 | Assert1(isa<PointerType>(CI.getOperand(0)->getType()), |
| 460 | "Called function must be a pointer!", &CI); |
| 461 | const PointerType *FPTy = cast<PointerType>(CI.getOperand(0)->getType()); |
Chris Lattner | efdd0a2 | 2002-04-18 22:11:52 +0000 | [diff] [blame] | 462 | Assert1(isa<FunctionType>(FPTy->getElementType()), |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 463 | "Called function is not pointer to function type!", &CI); |
Chris Lattner | 56732fb | 2002-05-08 19:49:50 +0000 | [diff] [blame] | 464 | |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 465 | const FunctionType *FTy = cast<FunctionType>(FPTy->getElementType()); |
Chris Lattner | 56732fb | 2002-05-08 19:49:50 +0000 | [diff] [blame] | 466 | |
| 467 | // Verify that the correct number of arguments are being passed |
| 468 | if (FTy->isVarArg()) |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 469 | Assert1(CI.getNumOperands()-1 >= FTy->getNumParams(), |
| 470 | "Called function requires more parameters than were provided!",&CI); |
Chris Lattner | 56732fb | 2002-05-08 19:49:50 +0000 | [diff] [blame] | 471 | else |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 472 | Assert1(CI.getNumOperands()-1 == FTy->getNumParams(), |
| 473 | "Incorrect number of arguments passed to called function!", &CI); |
Chris Lattner | 56732fb | 2002-05-08 19:49:50 +0000 | [diff] [blame] | 474 | |
| 475 | // Verify that all arguments to the call match the function type... |
| 476 | for (unsigned i = 0, e = FTy->getNumParams(); i != e; ++i) |
Chris Lattner | 2a11653 | 2004-02-24 22:06:07 +0000 | [diff] [blame] | 477 | Assert3(CI.getOperand(i+1)->getType() == FTy->getParamType(i), |
Chris Lattner | 56732fb | 2002-05-08 19:49:50 +0000 | [diff] [blame] | 478 | "Call parameter type does not match function signature!", |
Chris Lattner | 2a11653 | 2004-02-24 22:06:07 +0000 | [diff] [blame] | 479 | CI.getOperand(i+1), FTy->getParamType(i), &CI); |
Chris Lattner | 3535c9b | 2002-07-18 00:13:42 +0000 | [diff] [blame] | 480 | |
Chris Lattner | dd035d1 | 2003-05-08 03:47:33 +0000 | [diff] [blame] | 481 | if (Function *F = CI.getCalledFunction()) |
Brian Gaeke | d0fde30 | 2003-11-11 22:41:34 +0000 | [diff] [blame] | 482 | if (Intrinsic::ID ID = (Intrinsic::ID)F->getIntrinsicID()) |
Chris Lattner | dd035d1 | 2003-05-08 03:47:33 +0000 | [diff] [blame] | 483 | visitIntrinsicFunctionCall(ID, CI); |
| 484 | |
Chris Lattner | 3535c9b | 2002-07-18 00:13:42 +0000 | [diff] [blame] | 485 | visitInstruction(CI); |
Chris Lattner | efdd0a2 | 2002-04-18 22:11:52 +0000 | [diff] [blame] | 486 | } |
Chris Lattner | d231fc3 | 2002-04-18 20:37:37 +0000 | [diff] [blame] | 487 | |
Misha Brukman | ab5c600 | 2004-03-02 00:22:19 +0000 | [diff] [blame] | 488 | /// visitBinaryOperator - Check that both arguments to the binary operator are |
| 489 | /// of the same type! |
| 490 | /// |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 491 | void Verifier::visitBinaryOperator(BinaryOperator &B) { |
Chris Lattner | 1a143ae | 2002-09-09 20:26:04 +0000 | [diff] [blame] | 492 | Assert1(B.getOperand(0)->getType() == B.getOperand(1)->getType(), |
| 493 | "Both operands to a binary operator are not of the same type!", &B); |
Chris Lattner | d231fc3 | 2002-04-18 20:37:37 +0000 | [diff] [blame] | 494 | |
Chris Lattner | 1a143ae | 2002-09-09 20:26:04 +0000 | [diff] [blame] | 495 | // Check that logical operators are only used with integral operands. |
| 496 | if (B.getOpcode() == Instruction::And || B.getOpcode() == Instruction::Or || |
| 497 | B.getOpcode() == Instruction::Xor) { |
| 498 | Assert1(B.getType()->isIntegral(), |
| 499 | "Logical operators only work with integral types!", &B); |
| 500 | Assert1(B.getType() == B.getOperand(0)->getType(), |
| 501 | "Logical operators must have same type for operands and result!", |
| 502 | &B); |
| 503 | } else if (isa<SetCondInst>(B)) { |
| 504 | // Check that setcc instructions return bool |
| 505 | Assert1(B.getType() == Type::BoolTy, |
| 506 | "setcc instructions must return boolean values!", &B); |
| 507 | } else { |
| 508 | // Arithmetic operators only work on integer or fp values |
| 509 | Assert1(B.getType() == B.getOperand(0)->getType(), |
| 510 | "Arithmetic operators must have same type for operands and result!", |
| 511 | &B); |
Brian Gaeke | 715c90b | 2004-08-20 06:00:58 +0000 | [diff] [blame] | 512 | Assert1(B.getType()->isInteger() || B.getType()->isFloatingPoint() || |
| 513 | isa<PackedType>(B.getType()), |
| 514 | "Arithmetic operators must have integer, fp, or packed type!", &B); |
Chris Lattner | 1a143ae | 2002-09-09 20:26:04 +0000 | [diff] [blame] | 515 | } |
| 516 | |
Chris Lattner | d231fc3 | 2002-04-18 20:37:37 +0000 | [diff] [blame] | 517 | visitInstruction(B); |
| 518 | } |
| 519 | |
Chris Lattner | 1a143ae | 2002-09-09 20:26:04 +0000 | [diff] [blame] | 520 | void Verifier::visitShiftInst(ShiftInst &SI) { |
| 521 | Assert1(SI.getType()->isInteger(), |
| 522 | "Shift must return an integer result!", &SI); |
| 523 | Assert1(SI.getType() == SI.getOperand(0)->getType(), |
| 524 | "Shift return type must be same as first operand!", &SI); |
| 525 | Assert1(SI.getOperand(1)->getType() == Type::UByteTy, |
| 526 | "Second operand to shift must be ubyte type!", &SI); |
| 527 | visitInstruction(SI); |
| 528 | } |
| 529 | |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 530 | void Verifier::visitGetElementPtrInst(GetElementPtrInst &GEP) { |
Chris Lattner | cc63f1c | 2002-08-22 23:37:20 +0000 | [diff] [blame] | 531 | const Type *ElTy = |
| 532 | GetElementPtrInst::getIndexedType(GEP.getOperand(0)->getType(), |
| 533 | std::vector<Value*>(GEP.idx_begin(), GEP.idx_end()), true); |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 534 | Assert1(ElTy, "Invalid indices for GEP pointer type!", &GEP); |
| 535 | Assert2(PointerType::get(ElTy) == GEP.getType(), |
| 536 | "GEP is not of right type for indices!", &GEP, ElTy); |
Chris Lattner | a00409e | 2002-04-24 19:12:21 +0000 | [diff] [blame] | 537 | visitInstruction(GEP); |
| 538 | } |
| 539 | |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 540 | void Verifier::visitLoadInst(LoadInst &LI) { |
Chris Lattner | 24ea74e | 2002-08-22 22:49:05 +0000 | [diff] [blame] | 541 | const Type *ElTy = |
| 542 | cast<PointerType>(LI.getOperand(0)->getType())->getElementType(); |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 543 | Assert2(ElTy == LI.getType(), |
Chris Lattner | 7334f2e | 2003-11-21 17:06:29 +0000 | [diff] [blame] | 544 | "Load result type does not match pointer operand type!", &LI, ElTy); |
Chris Lattner | a00409e | 2002-04-24 19:12:21 +0000 | [diff] [blame] | 545 | visitInstruction(LI); |
| 546 | } |
| 547 | |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 548 | void Verifier::visitStoreInst(StoreInst &SI) { |
Chris Lattner | 24ea74e | 2002-08-22 22:49:05 +0000 | [diff] [blame] | 549 | const Type *ElTy = |
| 550 | cast<PointerType>(SI.getOperand(1)->getType())->getElementType(); |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 551 | Assert2(ElTy == SI.getOperand(0)->getType(), |
Chris Lattner | 7334f2e | 2003-11-21 17:06:29 +0000 | [diff] [blame] | 552 | "Stored value type does not match pointer operand type!", &SI, ElTy); |
Chris Lattner | a00409e | 2002-04-24 19:12:21 +0000 | [diff] [blame] | 553 | visitInstruction(SI); |
| 554 | } |
| 555 | |
Chris Lattner | d231fc3 | 2002-04-18 20:37:37 +0000 | [diff] [blame] | 556 | |
Misha Brukman | ab5c600 | 2004-03-02 00:22:19 +0000 | [diff] [blame] | 557 | /// verifyInstruction - Verify that an instruction is well formed. |
| 558 | /// |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 559 | void Verifier::visitInstruction(Instruction &I) { |
Chris Lattner | 1a143ae | 2002-09-09 20:26:04 +0000 | [diff] [blame] | 560 | BasicBlock *BB = I.getParent(); |
| 561 | Assert1(BB, "Instruction not embedded in basic block!", &I); |
Chris Lattner | d231fc3 | 2002-04-18 20:37:37 +0000 | [diff] [blame] | 562 | |
Chris Lattner | bede31f | 2003-10-05 17:44:18 +0000 | [diff] [blame] | 563 | if (!isa<PHINode>(I)) { // Check that non-phi nodes are not self referential |
| 564 | for (Value::use_iterator UI = I.use_begin(), UE = I.use_end(); |
| 565 | UI != UE; ++UI) |
Chris Lattner | 0809253 | 2004-02-27 17:28:25 +0000 | [diff] [blame] | 566 | Assert1(*UI != (User*)&I || |
| 567 | !DS->dominates(&BB->getParent()->getEntryBlock(), BB), |
Chris Lattner | bede31f | 2003-10-05 17:44:18 +0000 | [diff] [blame] | 568 | "Only PHI nodes may reference their own value!", &I); |
| 569 | } |
| 570 | |
| 571 | // Check that void typed values don't have names |
| 572 | Assert1(I.getType() != Type::VoidTy || !I.hasName(), |
| 573 | "Instruction has a name, but provides a void value!", &I); |
| 574 | |
Chris Lattner | 944cfaf | 2004-03-29 00:29:36 +0000 | [diff] [blame] | 575 | // Check that the return value of the instruction is either void or a legal |
| 576 | // value type. |
| 577 | Assert1(I.getType() == Type::VoidTy || I.getType()->isFirstClassType(), |
| 578 | "Instruction returns a non-scalar type!", &I); |
| 579 | |
Chris Lattner | d231fc3 | 2002-04-18 20:37:37 +0000 | [diff] [blame] | 580 | // Check that all uses of the instruction, if they are instructions |
| 581 | // themselves, actually have parent basic blocks. If the use is not an |
| 582 | // instruction, it is an error! |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 583 | for (User::use_iterator UI = I.use_begin(), UE = I.use_end(); |
Chris Lattner | d231fc3 | 2002-04-18 20:37:37 +0000 | [diff] [blame] | 584 | UI != UE; ++UI) { |
| 585 | Assert1(isa<Instruction>(*UI), "Use of instruction is not an instruction!", |
| 586 | *UI); |
Chris Lattner | efdd0a2 | 2002-04-18 22:11:52 +0000 | [diff] [blame] | 587 | Instruction *Used = cast<Instruction>(*UI); |
| 588 | Assert2(Used->getParent() != 0, "Instruction referencing instruction not" |
Chris Lattner | 24e845f | 2002-06-25 15:56:27 +0000 | [diff] [blame] | 589 | " embeded in a basic block!", &I, Used); |
Chris Lattner | d231fc3 | 2002-04-18 20:37:37 +0000 | [diff] [blame] | 590 | } |
| 591 | |
Chris Lattner | bede31f | 2003-10-05 17:44:18 +0000 | [diff] [blame] | 592 | for (unsigned i = 0, e = I.getNumOperands(); i != e; ++i) { |
| 593 | // Check to make sure that the "address of" an intrinsic function is never |
| 594 | // taken. |
Chris Lattner | aab1820 | 2005-02-24 16:58:29 +0000 | [diff] [blame] | 595 | Assert1(I.getOperand(i) != 0, "Instruction has null operand!", &I); |
Chris Lattner | 59c3569 | 2004-03-14 03:23:54 +0000 | [diff] [blame] | 596 | if (Function *F = dyn_cast<Function>(I.getOperand(i))) { |
Chris Lattner | dd035d1 | 2003-05-08 03:47:33 +0000 | [diff] [blame] | 597 | Assert1(!F->isIntrinsic() || (i == 0 && isa<CallInst>(I)), |
| 598 | "Cannot take the address of an intrinsic!", &I); |
Chris Lattner | 59c3569 | 2004-03-14 03:23:54 +0000 | [diff] [blame] | 599 | } else if (BasicBlock *OpBB = dyn_cast<BasicBlock>(I.getOperand(i))) { |
| 600 | Assert1(OpBB->getParent() == BB->getParent(), |
| 601 | "Referring to a basic block in another function!", &I); |
| 602 | } else if (Argument *OpArg = dyn_cast<Argument>(I.getOperand(i))) { |
| 603 | Assert1(OpArg->getParent() == BB->getParent(), |
| 604 | "Referring to an argument in another function!", &I); |
| 605 | } else if (Instruction *Op = dyn_cast<Instruction>(I.getOperand(i))) { |
Chris Lattner | 30768ac | 2004-01-14 04:25:59 +0000 | [diff] [blame] | 606 | BasicBlock *OpBlock = Op->getParent(); |
Chris Lattner | 30768ac | 2004-01-14 04:25:59 +0000 | [diff] [blame] | 607 | |
Chris Lattner | bede31f | 2003-10-05 17:44:18 +0000 | [diff] [blame] | 608 | // Check that a definition dominates all of its uses. |
Chris Lattner | bede31f | 2003-10-05 17:44:18 +0000 | [diff] [blame] | 609 | if (!isa<PHINode>(I)) { |
Chris Lattner | c9b0702 | 2004-01-14 05:42:52 +0000 | [diff] [blame] | 610 | // Invoke results are only usable in the normal destination, not in the |
| 611 | // exceptional destination. |
| 612 | if (InvokeInst *II = dyn_cast<InvokeInst>(Op)) |
| 613 | OpBlock = II->getNormalDest(); |
Chris Lattner | e1f0cf1 | 2004-04-16 05:51:47 +0000 | [diff] [blame] | 614 | else if (OpBlock == BB) { |
| 615 | // If they are in the same basic block, make sure that the definition |
| 616 | // comes before the use. |
Chris Lattner | a7b1c7e | 2004-09-29 20:07:45 +0000 | [diff] [blame] | 617 | Assert2(InstsInThisBlock.count(Op) || |
Chris Lattner | 40416e4 | 2004-06-07 23:07:33 +0000 | [diff] [blame] | 618 | !DS->dominates(&BB->getParent()->getEntryBlock(), BB), |
Chris Lattner | e1f0cf1 | 2004-04-16 05:51:47 +0000 | [diff] [blame] | 619 | "Instruction does not dominate all uses!", Op, &I); |
| 620 | } |
Chris Lattner | c9b0702 | 2004-01-14 05:42:52 +0000 | [diff] [blame] | 621 | |
Chris Lattner | bede31f | 2003-10-05 17:44:18 +0000 | [diff] [blame] | 622 | // Definition must dominate use unless use is unreachable! |
Chris Lattner | 30768ac | 2004-01-14 04:25:59 +0000 | [diff] [blame] | 623 | Assert2(DS->dominates(OpBlock, BB) || |
Chris Lattner | bede31f | 2003-10-05 17:44:18 +0000 | [diff] [blame] | 624 | !DS->dominates(&BB->getParent()->getEntryBlock(), BB), |
| 625 | "Instruction does not dominate all uses!", Op, &I); |
| 626 | } else { |
| 627 | // PHI nodes are more difficult than other nodes because they actually |
| 628 | // "use" the value in the predecessor basic blocks they correspond to. |
| 629 | BasicBlock *PredBB = cast<BasicBlock>(I.getOperand(i+1)); |
Chris Lattner | 30768ac | 2004-01-14 04:25:59 +0000 | [diff] [blame] | 630 | Assert2(DS->dominates(OpBlock, PredBB) || |
Chris Lattner | bede31f | 2003-10-05 17:44:18 +0000 | [diff] [blame] | 631 | !DS->dominates(&BB->getParent()->getEntryBlock(), PredBB), |
| 632 | "Instruction does not dominate all uses!", Op, &I); |
| 633 | } |
| 634 | } |
| 635 | } |
Chris Lattner | a7b1c7e | 2004-09-29 20:07:45 +0000 | [diff] [blame] | 636 | InstsInThisBlock.insert(&I); |
Chris Lattner | dd035d1 | 2003-05-08 03:47:33 +0000 | [diff] [blame] | 637 | } |
| 638 | |
| 639 | /// visitIntrinsicFunction - Allow intrinsics to be verified in different ways. |
Misha Brukman | ab5c600 | 2004-03-02 00:22:19 +0000 | [diff] [blame] | 640 | /// |
Brian Gaeke | d0fde30 | 2003-11-11 22:41:34 +0000 | [diff] [blame] | 641 | void Verifier::visitIntrinsicFunctionCall(Intrinsic::ID ID, CallInst &CI) { |
Chris Lattner | dd035d1 | 2003-05-08 03:47:33 +0000 | [diff] [blame] | 642 | Function *IF = CI.getCalledFunction(); |
| 643 | const FunctionType *FT = IF->getFunctionType(); |
| 644 | Assert1(IF->isExternal(), "Intrinsic functions should never be defined!", IF); |
Chris Lattner | 9783301 | 2003-06-05 21:01:26 +0000 | [diff] [blame] | 645 | unsigned NumArgs = 0; |
Chris Lattner | dd035d1 | 2003-05-08 03:47:33 +0000 | [diff] [blame] | 646 | |
Chris Lattner | 9dd7d1c | 2003-08-24 05:30:29 +0000 | [diff] [blame] | 647 | // FIXME: this should check the return type of each intrinsic as well, also |
| 648 | // arguments! |
Chris Lattner | dd035d1 | 2003-05-08 03:47:33 +0000 | [diff] [blame] | 649 | switch (ID) { |
Chris Lattner | 317201d | 2004-03-13 00:24:00 +0000 | [diff] [blame] | 650 | case Intrinsic::vastart: |
Chris Lattner | 27aa094 | 2003-05-08 15:55:31 +0000 | [diff] [blame] | 651 | Assert1(CI.getParent()->getParent()->getFunctionType()->isVarArg(), |
| 652 | "llvm.va_start intrinsic may only occur in function with variable" |
| 653 | " args!", &CI); |
Chris Lattner | 4d45bd0 | 2003-10-18 05:57:43 +0000 | [diff] [blame] | 654 | NumArgs = 0; |
Chris Lattner | dd035d1 | 2003-05-08 03:47:33 +0000 | [diff] [blame] | 655 | break; |
Chris Lattner | 317201d | 2004-03-13 00:24:00 +0000 | [diff] [blame] | 656 | case Intrinsic::vaend: NumArgs = 1; break; |
| 657 | case Intrinsic::vacopy: NumArgs = 1; break; |
Chris Lattner | 9dd7d1c | 2003-08-24 05:30:29 +0000 | [diff] [blame] | 658 | |
Chris Lattner | cf89908 | 2004-02-14 02:47:17 +0000 | [diff] [blame] | 659 | case Intrinsic::returnaddress: |
| 660 | case Intrinsic::frameaddress: |
| 661 | Assert1(isa<PointerType>(FT->getReturnType()), |
| 662 | "llvm.(frame|return)address must return pointers", IF); |
| 663 | Assert1(FT->getNumParams() == 1 && isa<ConstantInt>(CI.getOperand(1)), |
| 664 | "llvm.(frame|return)address require a single constant integer argument", |
| 665 | &CI); |
| 666 | NumArgs = 1; |
| 667 | break; |
| 668 | |
John Criswell | 9570301 | 2004-04-08 20:27:38 +0000 | [diff] [blame] | 669 | // Verify that read and write port have integral parameters of the correct |
| 670 | // signed-ness. |
| 671 | case Intrinsic::writeport: |
| 672 | Assert1(FT->getNumParams() == 2, |
| 673 | "Illegal # arguments for intrinsic function!", IF); |
John Criswell | 6d804f4 | 2004-04-09 19:09:14 +0000 | [diff] [blame] | 674 | Assert1(FT->getParamType(0)->isIntegral(), |
John Criswell | 9570301 | 2004-04-08 20:27:38 +0000 | [diff] [blame] | 675 | "First argument not unsigned int!", IF); |
John Criswell | 6d804f4 | 2004-04-09 19:09:14 +0000 | [diff] [blame] | 676 | Assert1(FT->getParamType(1)->isUnsigned(), |
John Criswell | 9570301 | 2004-04-08 20:27:38 +0000 | [diff] [blame] | 677 | "First argument not unsigned int!", IF); |
| 678 | NumArgs = 2; |
| 679 | break; |
| 680 | |
John Criswell | 994a765 | 2004-04-14 13:46:52 +0000 | [diff] [blame] | 681 | case Intrinsic::writeio: |
| 682 | Assert1(FT->getNumParams() == 2, |
| 683 | "Illegal # arguments for intrinsic function!", IF); |
| 684 | Assert1(FT->getParamType(0)->isFirstClassType(), |
| 685 | "First argument not a first class type!", IF); |
Chris Lattner | c261662 | 2004-06-17 17:56:54 +0000 | [diff] [blame] | 686 | Assert1(isa<PointerType>(FT->getParamType(1)), |
John Criswell | 994a765 | 2004-04-14 13:46:52 +0000 | [diff] [blame] | 687 | "Second argument not a pointer!", IF); |
| 688 | NumArgs = 2; |
| 689 | break; |
| 690 | |
John Criswell | 9570301 | 2004-04-08 20:27:38 +0000 | [diff] [blame] | 691 | case Intrinsic::readport: |
| 692 | Assert1(FT->getNumParams() == 1, |
| 693 | "Illegal # arguments for intrinsic function!", IF); |
John Criswell | 994a765 | 2004-04-14 13:46:52 +0000 | [diff] [blame] | 694 | Assert1(FT->getReturnType()->isFirstClassType(), |
| 695 | "Return type is not a first class type!", IF); |
John Criswell | 9570301 | 2004-04-08 20:27:38 +0000 | [diff] [blame] | 696 | Assert1(FT->getParamType(0)->isUnsigned(), |
| 697 | "First argument not unsigned int!", IF); |
| 698 | NumArgs = 1; |
| 699 | break; |
| 700 | |
Chris Lattner | e899705 | 2004-05-23 21:16:51 +0000 | [diff] [blame] | 701 | case Intrinsic::readio: { |
| 702 | const PointerType *ParamType = dyn_cast<PointerType>(FT->getParamType(0)); |
| 703 | const Type *ReturnType = FT->getReturnType(); |
John Criswell | 17f6425 | 2004-04-14 14:49:36 +0000 | [diff] [blame] | 704 | |
John Criswell | 994a765 | 2004-04-14 13:46:52 +0000 | [diff] [blame] | 705 | Assert1(FT->getNumParams() == 1, |
| 706 | "Illegal # arguments for intrinsic function!", IF); |
Chris Lattner | e899705 | 2004-05-23 21:16:51 +0000 | [diff] [blame] | 707 | Assert1(ParamType, "First argument not a pointer!", IF); |
| 708 | Assert1(ParamType->getElementType() == ReturnType, |
John Criswell | 71c887d | 2004-04-14 15:06:48 +0000 | [diff] [blame] | 709 | "Pointer type doesn't match return type!", IF); |
John Criswell | 994a765 | 2004-04-14 13:46:52 +0000 | [diff] [blame] | 710 | NumArgs = 1; |
| 711 | break; |
John Criswell | 17f6425 | 2004-04-14 14:49:36 +0000 | [diff] [blame] | 712 | } |
John Criswell | 994a765 | 2004-04-14 13:46:52 +0000 | [diff] [blame] | 713 | |
Alkis Evlogimenos | 9685372 | 2004-06-12 19:19:14 +0000 | [diff] [blame] | 714 | case Intrinsic::isunordered: |
Alkis Evlogimenos | ac700ca | 2004-06-13 00:55:26 +0000 | [diff] [blame] | 715 | Assert1(FT->getNumParams() == 2, |
| 716 | "Illegal # arguments for intrinsic function!", IF); |
Alkis Evlogimenos | 9685372 | 2004-06-12 19:19:14 +0000 | [diff] [blame] | 717 | Assert1(FT->getReturnType() == Type::BoolTy, |
Alkis Evlogimenos | ac700ca | 2004-06-13 00:55:26 +0000 | [diff] [blame] | 718 | "Return type is not bool!", IF); |
| 719 | Assert1(FT->getParamType(0) == FT->getParamType(1), |
| 720 | "Arguments must be of the same type!", IF); |
| 721 | Assert1(FT->getParamType(0)->isFloatingPoint(), |
| 722 | "Argument is not a floating point type!", IF); |
Alkis Evlogimenos | 9685372 | 2004-06-12 19:19:14 +0000 | [diff] [blame] | 723 | NumArgs = 2; |
| 724 | break; |
| 725 | |
Brian Gaeke | d0fde30 | 2003-11-11 22:41:34 +0000 | [diff] [blame] | 726 | case Intrinsic::setjmp: NumArgs = 1; break; |
| 727 | case Intrinsic::longjmp: NumArgs = 2; break; |
| 728 | case Intrinsic::sigsetjmp: NumArgs = 2; break; |
| 729 | case Intrinsic::siglongjmp: NumArgs = 2; break; |
Chris Lattner | 77b1330 | 2004-01-05 05:36:30 +0000 | [diff] [blame] | 730 | |
Chris Lattner | e899705 | 2004-05-23 21:16:51 +0000 | [diff] [blame] | 731 | case Intrinsic::gcroot: |
| 732 | Assert1(FT->getNumParams() == 2, |
| 733 | "Illegal # arguments for intrinsic function!", IF); |
Reid Spencer | 38696d2 | 2004-07-18 00:02:41 +0000 | [diff] [blame] | 734 | Assert1(isa<Constant>(CI.getOperand(2)), |
Chris Lattner | e899705 | 2004-05-23 21:16:51 +0000 | [diff] [blame] | 735 | "Second argument to llvm.gcroot must be a constant!", &CI); |
| 736 | NumArgs = 2; |
| 737 | break; |
Chris Lattner | 9545a17 | 2004-07-22 05:50:01 +0000 | [diff] [blame] | 738 | case Intrinsic::gcread: NumArgs = 2; break; |
| 739 | case Intrinsic::gcwrite: NumArgs = 3; break; |
Chris Lattner | e899705 | 2004-05-23 21:16:51 +0000 | [diff] [blame] | 740 | |
Chris Lattner | 77b1330 | 2004-01-05 05:36:30 +0000 | [diff] [blame] | 741 | case Intrinsic::dbg_stoppoint: NumArgs = 4; break; |
| 742 | case Intrinsic::dbg_region_start:NumArgs = 1; break; |
| 743 | case Intrinsic::dbg_region_end: NumArgs = 1; break; |
| 744 | case Intrinsic::dbg_func_start: NumArgs = 1; break; |
Chris Lattner | 90ab32f | 2004-01-06 05:33:02 +0000 | [diff] [blame] | 745 | case Intrinsic::dbg_declare: NumArgs = 1; break; |
Chris Lattner | 5fe51cc | 2004-02-12 17:01:09 +0000 | [diff] [blame] | 746 | |
| 747 | case Intrinsic::memcpy: NumArgs = 4; break; |
Chris Lattner | 2751e76 | 2004-02-12 18:11:20 +0000 | [diff] [blame] | 748 | case Intrinsic::memmove: NumArgs = 4; break; |
Chris Lattner | cf89908 | 2004-02-14 02:47:17 +0000 | [diff] [blame] | 749 | case Intrinsic::memset: NumArgs = 4; break; |
Chris Lattner | 6f72282 | 2005-02-28 19:27:42 +0000 | [diff] [blame] | 750 | |
| 751 | case Intrinsic::prefetch: NumArgs = 3; break; |
Chris Lattner | 2418b11 | 2003-07-28 21:20:57 +0000 | [diff] [blame] | 752 | |
Brian Gaeke | d0fde30 | 2003-11-11 22:41:34 +0000 | [diff] [blame] | 753 | case Intrinsic::not_intrinsic: |
Chris Lattner | dd035d1 | 2003-05-08 03:47:33 +0000 | [diff] [blame] | 754 | assert(0 && "Invalid intrinsic!"); NumArgs = 0; break; |
| 755 | } |
| 756 | |
| 757 | Assert1(FT->getNumParams() == NumArgs || (FT->getNumParams() < NumArgs && |
| 758 | FT->isVarArg()), |
| 759 | "Illegal # arguments for intrinsic function!", IF); |
Chris Lattner | d231fc3 | 2002-04-18 20:37:37 +0000 | [diff] [blame] | 760 | } |
| 761 | |
| 762 | |
| 763 | //===----------------------------------------------------------------------===// |
| 764 | // Implement the public interfaces to this file... |
| 765 | //===----------------------------------------------------------------------===// |
| 766 | |
Chris Lattner | fdc38c4 | 2004-04-02 15:45:08 +0000 | [diff] [blame] | 767 | FunctionPass *llvm::createVerifierPass(VerifierFailureAction action) { |
| 768 | return new Verifier(action); |
Chris Lattner | d231fc3 | 2002-04-18 20:37:37 +0000 | [diff] [blame] | 769 | } |
| 770 | |
Chris Lattner | 9ce231f | 2002-08-02 17:37:08 +0000 | [diff] [blame] | 771 | |
| 772 | // verifyFunction - Create |
Chris Lattner | fdc38c4 | 2004-04-02 15:45:08 +0000 | [diff] [blame] | 773 | bool llvm::verifyFunction(const Function &f, VerifierFailureAction action) { |
Chris Lattner | 2eff859 | 2004-03-14 03:16:15 +0000 | [diff] [blame] | 774 | Function &F = const_cast<Function&>(f); |
Chris Lattner | 9ce231f | 2002-08-02 17:37:08 +0000 | [diff] [blame] | 775 | assert(!F.isExternal() && "Cannot verify external functions"); |
Chris Lattner | 2eff859 | 2004-03-14 03:16:15 +0000 | [diff] [blame] | 776 | |
| 777 | FunctionPassManager FPM(new ExistingModuleProvider(F.getParent())); |
Chris Lattner | fdc38c4 | 2004-04-02 15:45:08 +0000 | [diff] [blame] | 778 | Verifier *V = new Verifier(action); |
Chris Lattner | 2eff859 | 2004-03-14 03:16:15 +0000 | [diff] [blame] | 779 | FPM.add(V); |
| 780 | FPM.run(F); |
| 781 | return V->Broken; |
Chris Lattner | 44d5bd9 | 2002-02-20 17:55:43 +0000 | [diff] [blame] | 782 | } |
| 783 | |
Misha Brukman | ab5c600 | 2004-03-02 00:22:19 +0000 | [diff] [blame] | 784 | /// verifyModule - Check a module for errors, printing messages on stderr. |
| 785 | /// Return true if the module is corrupt. |
| 786 | /// |
Chris Lattner | fdc38c4 | 2004-04-02 15:45:08 +0000 | [diff] [blame] | 787 | bool llvm::verifyModule(const Module &M, VerifierFailureAction action) { |
Chris Lattner | 9ce231f | 2002-08-02 17:37:08 +0000 | [diff] [blame] | 788 | PassManager PM; |
Chris Lattner | fdc38c4 | 2004-04-02 15:45:08 +0000 | [diff] [blame] | 789 | Verifier *V = new Verifier(action); |
Chris Lattner | 9ce231f | 2002-08-02 17:37:08 +0000 | [diff] [blame] | 790 | PM.add(V); |
| 791 | PM.run((Module&)M); |
| 792 | return V->Broken; |
Chris Lattner | 0095054 | 2001-06-06 20:29:01 +0000 | [diff] [blame] | 793 | } |
Reid Spencer | af90b0d | 2004-05-25 08:53:29 +0000 | [diff] [blame] | 794 | |
| 795 | // vim: sw=2 |