Enable first-class aggregates support.
[oota-llvm.git] / lib / VMCore / Instruction.cpp
1 //===-- Instruction.cpp - Implement the Instruction class -----------------===//
2 //
3 //                     The LLVM Compiler Infrastructure
4 //
5 // This file is distributed under the University of Illinois Open Source
6 // License. See LICENSE.TXT for details.
7 //
8 //===----------------------------------------------------------------------===//
9 //
10 // This file implements the Instruction class for the VMCore library.
11 //
12 //===----------------------------------------------------------------------===//
13
14 #include "llvm/Type.h"
15 #include "llvm/Instructions.h"
16 #include "llvm/Function.h"
17 #include "llvm/Support/CallSite.h"
18 #include "llvm/Support/LeakDetector.h"
19 using namespace llvm;
20
21 Instruction::Instruction(const Type *ty, unsigned it, Use *Ops, unsigned NumOps,
22                          Instruction *InsertBefore)
23   : User(ty, Value::InstructionVal + it, Ops, NumOps), Parent(0) {
24   // Make sure that we get added to a basicblock
25   LeakDetector::addGarbageObject(this);
26
27   // If requested, insert this instruction into a basic block...
28   if (InsertBefore) {
29     assert(InsertBefore->getParent() &&
30            "Instruction to insert before is not in a basic block!");
31     InsertBefore->getParent()->getInstList().insert(InsertBefore, this);
32   }
33 }
34
35 Instruction::Instruction(const Type *ty, unsigned it, Use *Ops, unsigned NumOps,
36                          BasicBlock *InsertAtEnd)
37   : User(ty, Value::InstructionVal + it, Ops, NumOps), Parent(0) {
38   // Make sure that we get added to a basicblock
39   LeakDetector::addGarbageObject(this);
40
41   // append this instruction into the basic block
42   assert(InsertAtEnd && "Basic block to append to may not be NULL!");
43   InsertAtEnd->getInstList().push_back(this);
44 }
45
46
47 // Out of line virtual method, so the vtable, etc has a home.
48 Instruction::~Instruction() {
49   assert(Parent == 0 && "Instruction still linked in the program!");
50 }
51
52
53 void Instruction::setParent(BasicBlock *P) {
54   if (getParent()) {
55     if (!P) LeakDetector::addGarbageObject(this);
56   } else {
57     if (P) LeakDetector::removeGarbageObject(this);
58   }
59
60   Parent = P;
61 }
62
63 void Instruction::removeFromParent() {
64   getParent()->getInstList().remove(this);
65 }
66
67 void Instruction::eraseFromParent() {
68   getParent()->getInstList().erase(this);
69 }
70
71 /// insertBefore - Insert an unlinked instructions into a basic block
72 /// immediately before the specified instruction.
73 void Instruction::insertBefore(Instruction *InsertPos) {
74   InsertPos->getParent()->getInstList().insert(InsertPos, this);
75 }
76
77 /// moveBefore - Unlink this instruction from its current basic block and
78 /// insert it into the basic block that MovePos lives in, right before
79 /// MovePos.
80 void Instruction::moveBefore(Instruction *MovePos) {
81   MovePos->getParent()->getInstList().splice(MovePos,getParent()->getInstList(),
82                                              this);
83 }
84
85
86 const char *Instruction::getOpcodeName(unsigned OpCode) {
87   switch (OpCode) {
88   // Terminators
89   case Ret:    return "ret";
90   case Br:     return "br";
91   case Switch: return "switch";
92   case Invoke: return "invoke";
93   case Unwind: return "unwind";
94   case Unreachable: return "unreachable";
95
96   // Standard binary operators...
97   case Add: return "add";
98   case Sub: return "sub";
99   case Mul: return "mul";
100   case UDiv: return "udiv";
101   case SDiv: return "sdiv";
102   case FDiv: return "fdiv";
103   case URem: return "urem";
104   case SRem: return "srem";
105   case FRem: return "frem";
106
107   // Logical operators...
108   case And: return "and";
109   case Or : return "or";
110   case Xor: return "xor";
111
112   // Memory instructions...
113   case Malloc:        return "malloc";
114   case Free:          return "free";
115   case Alloca:        return "alloca";
116   case Load:          return "load";
117   case Store:         return "store";
118   case GetElementPtr: return "getelementptr";
119
120   // Convert instructions...
121   case Trunc:     return "trunc";
122   case ZExt:      return "zext";
123   case SExt:      return "sext";
124   case FPTrunc:   return "fptrunc";
125   case FPExt:     return "fpext";
126   case FPToUI:    return "fptoui";
127   case FPToSI:    return "fptosi";
128   case UIToFP:    return "uitofp";
129   case SIToFP:    return "sitofp";
130   case IntToPtr:  return "inttoptr";
131   case PtrToInt:  return "ptrtoint";
132   case BitCast:   return "bitcast";
133
134   // Other instructions...
135   case ICmp:           return "icmp";
136   case FCmp:           return "fcmp";
137   case VICmp:          return "vicmp";
138   case VFCmp:          return "vfcmp";
139   case PHI:            return "phi";
140   case Select:         return "select";
141   case Call:           return "call";
142   case Shl:            return "shl";
143   case LShr:           return "lshr";
144   case AShr:           return "ashr";
145   case VAArg:          return "va_arg";
146   case ExtractElement: return "extractelement";
147   case InsertElement:  return "insertelement";
148   case ShuffleVector:  return "shufflevector";
149   case ExtractValue:   return "extractvalue";
150   case InsertValue:    return "insertvalue";
151
152   default: return "<Invalid operator> ";
153   }
154
155   return 0;
156 }
157
158 /// isIdenticalTo - Return true if the specified instruction is exactly
159 /// identical to the current one.  This means that all operands match and any
160 /// extra information (e.g. load is volatile) agree.
161 bool Instruction::isIdenticalTo(Instruction *I) const {
162   if (getOpcode() != I->getOpcode() ||
163       getNumOperands() != I->getNumOperands() ||
164       getType() != I->getType())
165     return false;
166
167   // We have two instructions of identical opcode and #operands.  Check to see
168   // if all operands are the same.
169   for (unsigned i = 0, e = getNumOperands(); i != e; ++i)
170     if (getOperand(i) != I->getOperand(i))
171       return false;
172
173   // Check special state that is a part of some instructions.
174   if (const LoadInst *LI = dyn_cast<LoadInst>(this))
175     return LI->isVolatile() == cast<LoadInst>(I)->isVolatile();
176   if (const StoreInst *SI = dyn_cast<StoreInst>(this))
177     return SI->isVolatile() == cast<StoreInst>(I)->isVolatile();
178   if (const CmpInst *CI = dyn_cast<CmpInst>(this))
179     return CI->getPredicate() == cast<CmpInst>(I)->getPredicate();
180   if (const CallInst *CI = dyn_cast<CallInst>(this))
181     return CI->isTailCall() == cast<CallInst>(I)->isTailCall();
182   return true;
183 }
184
185 // isSameOperationAs
186 bool Instruction::isSameOperationAs(Instruction *I) const {
187   if (getOpcode() != I->getOpcode() || getType() != I->getType() ||
188       getNumOperands() != I->getNumOperands())
189     return false;
190
191   // We have two instructions of identical opcode and #operands.  Check to see
192   // if all operands are the same type
193   for (unsigned i = 0, e = getNumOperands(); i != e; ++i)
194     if (getOperand(i)->getType() != I->getOperand(i)->getType())
195       return false;
196
197   // Check special state that is a part of some instructions.
198   if (const LoadInst *LI = dyn_cast<LoadInst>(this))
199     return LI->isVolatile() == cast<LoadInst>(I)->isVolatile();
200   if (const StoreInst *SI = dyn_cast<StoreInst>(this))
201     return SI->isVolatile() == cast<StoreInst>(I)->isVolatile();
202   if (const CmpInst *CI = dyn_cast<CmpInst>(this))
203     return CI->getPredicate() == cast<CmpInst>(I)->getPredicate();
204   if (const CallInst *CI = dyn_cast<CallInst>(this))
205     return CI->isTailCall() == cast<CallInst>(I)->isTailCall();
206
207   return true;
208 }
209
210 /// isUsedOutsideOfBlock - Return true if there are any uses of I outside of the
211 /// specified block.  Note that PHI nodes are considered to evaluate their
212 /// operands in the corresponding predecessor block.
213 bool Instruction::isUsedOutsideOfBlock(const BasicBlock *BB) const {
214   for (use_const_iterator UI = use_begin(), E = use_end(); UI != E; ++UI) {
215     // PHI nodes uses values in the corresponding predecessor block.  For other
216     // instructions, just check to see whether the parent of the use matches up.
217     const PHINode *PN = dyn_cast<PHINode>(*UI);
218     if (PN == 0) {
219       if (cast<Instruction>(*UI)->getParent() != BB)
220         return true;
221       continue;
222     }
223     
224     unsigned UseOperand = UI.getOperandNo();
225     if (PN->getIncomingBlock(UseOperand/2) != BB)
226       return true;
227   }
228   return false;    
229 }
230
231 /// mayReadFromMemory - Return true if this instruction may read memory.
232 ///
233 bool Instruction::mayReadFromMemory() const {
234   switch (getOpcode()) {
235   default: return false;
236   case Instruction::Free:
237   case Instruction::VAArg:
238   case Instruction::Load:
239     return true;
240   case Instruction::Call:
241     return !cast<CallInst>(this)->doesNotAccessMemory();
242   case Instruction::Invoke:
243     return !cast<InvokeInst>(this)->doesNotAccessMemory();
244   case Instruction::Store:
245     return cast<StoreInst>(this)->isVolatile();
246   }
247 }
248
249 /// mayWriteToMemory - Return true if this instruction may modify memory.
250 ///
251 bool Instruction::mayWriteToMemory() const {
252   switch (getOpcode()) {
253   default: return false;
254   case Instruction::Free:
255   case Instruction::Store:
256   case Instruction::VAArg:
257     return true;
258   case Instruction::Call:
259     return !cast<CallInst>(this)->onlyReadsMemory();
260   case Instruction::Invoke:
261     return !cast<InvokeInst>(this)->onlyReadsMemory();
262   case Instruction::Load:
263     return cast<LoadInst>(this)->isVolatile();
264   }
265 }
266
267 /// isAssociative - Return true if the instruction is associative:
268 ///
269 ///   Associative operators satisfy:  x op (y op z) === (x op y) op z)
270 ///
271 /// In LLVM, the Add, Mul, And, Or, and Xor operators are associative, when not
272 /// applied to floating point types.
273 ///
274 bool Instruction::isAssociative(unsigned Opcode, const Type *Ty) {
275   if (Opcode == And || Opcode == Or || Opcode == Xor)
276     return true;
277
278   // Add/Mul reassociate unless they are FP or FP vectors.
279   if (Opcode == Add || Opcode == Mul)
280     return !Ty->isFPOrFPVector();
281   return 0;
282 }
283
284 /// isCommutative - Return true if the instruction is commutative:
285 ///
286 ///   Commutative operators satisfy: (x op y) === (y op x)
287 ///
288 /// In LLVM, these are the associative operators, plus SetEQ and SetNE, when
289 /// applied to any type.
290 ///
291 bool Instruction::isCommutative(unsigned op) {
292   switch (op) {
293   case Add:
294   case Mul:
295   case And:
296   case Or:
297   case Xor:
298     return true;
299   default:
300     return false;
301   }
302 }
303
304 /// isTrappingInstruction - Return true if the instruction may trap.
305 ///
306 bool Instruction::isTrapping(unsigned op) {
307   switch(op) {
308   case UDiv:
309   case SDiv:
310   case FDiv:
311   case URem:
312   case SRem:
313   case FRem:
314   case Load:
315   case Store:
316   case Call:
317   case Invoke:
318   case VAArg:
319     return true;
320   default:
321     return false;
322   }
323 }