ARMInstrInfo.td revision 198113
1//===- ARMInstrInfo.td - Target Description for ARM Target -*- tablegen -*-===//
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 describes the ARM instructions in TableGen format.
11//
12//===----------------------------------------------------------------------===//
13
14//===----------------------------------------------------------------------===//
15// ARM specific DAG Nodes.
16//
17
18// Type profiles.
19def SDT_ARMCallSeqStart : SDCallSeqStart<[ SDTCisVT<0, i32> ]>;
20def SDT_ARMCallSeqEnd   : SDCallSeqEnd<[ SDTCisVT<0, i32>, SDTCisVT<1, i32> ]>;
21
22def SDT_ARMSaveCallPC : SDTypeProfile<0, 1, []>;
23
24def SDT_ARMcall    : SDTypeProfile<0, -1, [SDTCisInt<0>]>;
25
26def SDT_ARMCMov    : SDTypeProfile<1, 3,
27                                   [SDTCisSameAs<0, 1>, SDTCisSameAs<0, 2>,
28                                    SDTCisVT<3, i32>]>;
29
30def SDT_ARMBrcond  : SDTypeProfile<0, 2,
31                                   [SDTCisVT<0, OtherVT>, SDTCisVT<1, i32>]>;
32
33def SDT_ARMBrJT    : SDTypeProfile<0, 3,
34                                  [SDTCisPtrTy<0>, SDTCisVT<1, i32>,
35                                   SDTCisVT<2, i32>]>;
36
37def SDT_ARMBr2JT   : SDTypeProfile<0, 4,
38                                  [SDTCisPtrTy<0>, SDTCisVT<1, i32>,
39                                   SDTCisVT<2, i32>, SDTCisVT<3, i32>]>;
40
41def SDT_ARMCmp     : SDTypeProfile<0, 2, [SDTCisSameAs<0, 1>]>;
42
43def SDT_ARMPICAdd  : SDTypeProfile<1, 2, [SDTCisSameAs<0, 1>,
44                                          SDTCisPtrTy<1>, SDTCisVT<2, i32>]>;
45
46def SDT_ARMThreadPointer : SDTypeProfile<1, 0, [SDTCisPtrTy<0>]>;
47def SDT_ARMEH_SJLJ_Setjmp : SDTypeProfile<1, 1, [SDTCisInt<0>, SDTCisPtrTy<1>]>;
48
49// Node definitions.
50def ARMWrapper       : SDNode<"ARMISD::Wrapper",     SDTIntUnaryOp>;
51def ARMWrapperJT     : SDNode<"ARMISD::WrapperJT",   SDTIntBinOp>;
52
53def ARMcallseq_start : SDNode<"ISD::CALLSEQ_START", SDT_ARMCallSeqStart,
54                              [SDNPHasChain, SDNPOutFlag]>;
55def ARMcallseq_end   : SDNode<"ISD::CALLSEQ_END",   SDT_ARMCallSeqEnd,
56                              [SDNPHasChain, SDNPOptInFlag, SDNPOutFlag]>;
57
58def ARMcall          : SDNode<"ARMISD::CALL", SDT_ARMcall,
59                              [SDNPHasChain, SDNPOptInFlag, SDNPOutFlag]>;
60def ARMcall_pred    : SDNode<"ARMISD::CALL_PRED", SDT_ARMcall,
61                              [SDNPHasChain, SDNPOptInFlag, SDNPOutFlag]>;
62def ARMcall_nolink   : SDNode<"ARMISD::CALL_NOLINK", SDT_ARMcall,
63                              [SDNPHasChain, SDNPOptInFlag, SDNPOutFlag]>;
64
65def ARMretflag       : SDNode<"ARMISD::RET_FLAG", SDTNone,
66                              [SDNPHasChain, SDNPOptInFlag]>;
67
68def ARMcmov          : SDNode<"ARMISD::CMOV", SDT_ARMCMov,
69                              [SDNPInFlag]>;
70def ARMcneg          : SDNode<"ARMISD::CNEG", SDT_ARMCMov,
71                              [SDNPInFlag]>;
72
73def ARMbrcond        : SDNode<"ARMISD::BRCOND", SDT_ARMBrcond,
74                              [SDNPHasChain, SDNPInFlag, SDNPOutFlag]>;
75
76def ARMbrjt          : SDNode<"ARMISD::BR_JT", SDT_ARMBrJT,
77                              [SDNPHasChain]>;
78def ARMbr2jt         : SDNode<"ARMISD::BR2_JT", SDT_ARMBr2JT,
79                              [SDNPHasChain]>;
80
81def ARMcmp           : SDNode<"ARMISD::CMP", SDT_ARMCmp,
82                              [SDNPOutFlag]>;
83
84def ARMcmpZ          : SDNode<"ARMISD::CMPZ", SDT_ARMCmp,
85                              [SDNPOutFlag,SDNPCommutative]>;
86
87def ARMpic_add       : SDNode<"ARMISD::PIC_ADD", SDT_ARMPICAdd>;
88
89def ARMsrl_flag      : SDNode<"ARMISD::SRL_FLAG", SDTIntUnaryOp, [SDNPOutFlag]>;
90def ARMsra_flag      : SDNode<"ARMISD::SRA_FLAG", SDTIntUnaryOp, [SDNPOutFlag]>;
91def ARMrrx           : SDNode<"ARMISD::RRX"     , SDTIntUnaryOp, [SDNPInFlag ]>;
92
93def ARMthread_pointer: SDNode<"ARMISD::THREAD_POINTER", SDT_ARMThreadPointer>;
94def ARMeh_sjlj_setjmp: SDNode<"ARMISD::EH_SJLJ_SETJMP", SDT_ARMEH_SJLJ_Setjmp>;
95
96//===----------------------------------------------------------------------===//
97// ARM Instruction Predicate Definitions.
98//
99def HasV5T    : Predicate<"Subtarget->hasV5TOps()">;
100def HasV5TE   : Predicate<"Subtarget->hasV5TEOps()">;
101def HasV6     : Predicate<"Subtarget->hasV6Ops()">;
102def HasV6T2   : Predicate<"Subtarget->hasV6T2Ops()">;
103def NoV6T2    : Predicate<"!Subtarget->hasV6T2Ops()">;
104def HasV7     : Predicate<"Subtarget->hasV7Ops()">;
105def HasVFP2   : Predicate<"Subtarget->hasVFP2()">;
106def HasVFP3   : Predicate<"Subtarget->hasVFP3()">;
107def HasNEON   : Predicate<"Subtarget->hasNEON()">;
108def UseNEONForFP : Predicate<"Subtarget->useNEONForSinglePrecisionFP()">;
109def DontUseNEONForFP : Predicate<"!Subtarget->useNEONForSinglePrecisionFP()">;
110def IsThumb   : Predicate<"Subtarget->isThumb()">;
111def IsThumb1Only : Predicate<"Subtarget->isThumb1Only()">;
112def IsThumb2  : Predicate<"Subtarget->isThumb2()">;
113def IsARM     : Predicate<"!Subtarget->isThumb()">;
114def IsDarwin    : Predicate<"Subtarget->isTargetDarwin()">;
115def IsNotDarwin : Predicate<"!Subtarget->isTargetDarwin()">;
116def CarryDefIsUnused : Predicate<"!N.getNode()->hasAnyUseOfValue(1)">;
117def CarryDefIsUsed   : Predicate<"N.getNode()->hasAnyUseOfValue(1)">;
118
119//===----------------------------------------------------------------------===//
120// ARM Flag Definitions.
121
122class RegConstraint<string C> {
123  string Constraints = C;
124}
125
126//===----------------------------------------------------------------------===//
127//  ARM specific transformation functions and pattern fragments.
128//
129
130// so_imm_neg_XFORM - Return a so_imm value packed into the format described for
131// so_imm_neg def below.
132def so_imm_neg_XFORM : SDNodeXForm<imm, [{
133  return CurDAG->getTargetConstant(-(int)N->getZExtValue(), MVT::i32);
134}]>;
135
136// so_imm_not_XFORM - Return a so_imm value packed into the format described for
137// so_imm_not def below.
138def so_imm_not_XFORM : SDNodeXForm<imm, [{
139  return CurDAG->getTargetConstant(~(int)N->getZExtValue(), MVT::i32);
140}]>;
141
142// rot_imm predicate - True if the 32-bit immediate is equal to 8, 16, or 24.
143def rot_imm : PatLeaf<(i32 imm), [{
144  int32_t v = (int32_t)N->getZExtValue();
145  return v == 8 || v == 16 || v == 24;
146}]>;
147
148/// imm1_15 predicate - True if the 32-bit immediate is in the range [1,15].
149def imm1_15 : PatLeaf<(i32 imm), [{
150  return (int32_t)N->getZExtValue() >= 1 && (int32_t)N->getZExtValue() < 16;
151}]>;
152
153/// imm16_31 predicate - True if the 32-bit immediate is in the range [16,31].
154def imm16_31 : PatLeaf<(i32 imm), [{
155  return (int32_t)N->getZExtValue() >= 16 && (int32_t)N->getZExtValue() < 32;
156}]>;
157
158def so_imm_neg : 
159  PatLeaf<(imm), [{
160    return ARM_AM::getSOImmVal(-(int)N->getZExtValue()) != -1;
161  }], so_imm_neg_XFORM>;
162
163def so_imm_not :
164  PatLeaf<(imm), [{
165    return ARM_AM::getSOImmVal(~(int)N->getZExtValue()) != -1;
166  }], so_imm_not_XFORM>;
167
168// sext_16_node predicate - True if the SDNode is sign-extended 16 or more bits.
169def sext_16_node : PatLeaf<(i32 GPR:$a), [{
170  return CurDAG->ComputeNumSignBits(SDValue(N,0)) >= 17;
171}]>;
172
173/// bf_inv_mask_imm predicate - An AND mask to clear an arbitrary width bitfield
174/// e.g., 0xf000ffff
175def bf_inv_mask_imm : Operand<i32>,
176                      PatLeaf<(imm), [{ 
177  uint32_t v = (uint32_t)N->getZExtValue();
178  if (v == 0xffffffff)
179    return 0;
180  // there can be 1's on either or both "outsides", all the "inside"
181  // bits must be 0's
182  unsigned int lsb = 0, msb = 31;
183  while (v & (1 << msb)) --msb;
184  while (v & (1 << lsb)) ++lsb;
185  for (unsigned int i = lsb; i <= msb; ++i) {
186    if (v & (1 << i))
187      return 0;
188  }
189  return 1;
190}] > {
191  let PrintMethod = "printBitfieldInvMaskImmOperand";
192}
193
194/// Split a 32-bit immediate into two 16 bit parts.
195def lo16 : SDNodeXForm<imm, [{
196  return CurDAG->getTargetConstant((uint32_t)N->getZExtValue() & 0xffff,
197                                   MVT::i32);
198}]>;
199
200def hi16 : SDNodeXForm<imm, [{
201  return CurDAG->getTargetConstant((uint32_t)N->getZExtValue() >> 16, MVT::i32);
202}]>;
203
204def lo16AllZero : PatLeaf<(i32 imm), [{
205  // Returns true if all low 16-bits are 0.
206  return (((uint32_t)N->getZExtValue()) & 0xFFFFUL) == 0;
207  }], hi16>;
208
209/// imm0_65535 predicate - True if the 32-bit immediate is in the range 
210/// [0.65535].
211def imm0_65535 : PatLeaf<(i32 imm), [{
212  return (uint32_t)N->getZExtValue() < 65536;
213}]>;
214
215class BinOpFrag<dag res> : PatFrag<(ops node:$LHS, node:$RHS), res>;
216class UnOpFrag <dag res> : PatFrag<(ops node:$Src), res>;
217
218//===----------------------------------------------------------------------===//
219// Operand Definitions.
220//
221
222// Branch target.
223def brtarget : Operand<OtherVT>;
224
225// A list of registers separated by comma. Used by load/store multiple.
226def reglist : Operand<i32> {
227  let PrintMethod = "printRegisterList";
228}
229
230// An operand for the CONSTPOOL_ENTRY pseudo-instruction.
231def cpinst_operand : Operand<i32> {
232  let PrintMethod = "printCPInstOperand";
233}
234
235def jtblock_operand : Operand<i32> {
236  let PrintMethod = "printJTBlockOperand";
237}
238def jt2block_operand : Operand<i32> {
239  let PrintMethod = "printJT2BlockOperand";
240}
241
242// Local PC labels.
243def pclabel : Operand<i32> {
244  let PrintMethod = "printPCLabel";
245}
246
247// shifter_operand operands: so_reg and so_imm.
248def so_reg : Operand<i32>,    // reg reg imm
249            ComplexPattern<i32, 3, "SelectShifterOperandReg",
250                            [shl,srl,sra,rotr]> {
251  let PrintMethod = "printSORegOperand";
252  let MIOperandInfo = (ops GPR, GPR, i32imm);
253}
254
255// so_imm - Match a 32-bit shifter_operand immediate operand, which is an
256// 8-bit immediate rotated by an arbitrary number of bits.  so_imm values are
257// represented in the imm field in the same 12-bit form that they are encoded
258// into so_imm instructions: the 8-bit immediate is the least significant bits
259// [bits 0-7], the 4-bit shift amount is the next 4 bits [bits 8-11].
260def so_imm : Operand<i32>,
261             PatLeaf<(imm), [{
262      return ARM_AM::getSOImmVal(N->getZExtValue()) != -1;
263    }]> {
264  let PrintMethod = "printSOImmOperand";
265}
266
267// Break so_imm's up into two pieces.  This handles immediates with up to 16
268// bits set in them.  This uses so_imm2part to match and so_imm2part_[12] to
269// get the first/second pieces.
270def so_imm2part : Operand<i32>,
271                  PatLeaf<(imm), [{
272      return ARM_AM::isSOImmTwoPartVal((unsigned)N->getZExtValue());
273    }]> {
274  let PrintMethod = "printSOImm2PartOperand";
275}
276
277def so_imm2part_1 : SDNodeXForm<imm, [{
278  unsigned V = ARM_AM::getSOImmTwoPartFirst((unsigned)N->getZExtValue());
279  return CurDAG->getTargetConstant(V, MVT::i32);
280}]>;
281
282def so_imm2part_2 : SDNodeXForm<imm, [{
283  unsigned V = ARM_AM::getSOImmTwoPartSecond((unsigned)N->getZExtValue());
284  return CurDAG->getTargetConstant(V, MVT::i32);
285}]>;
286
287/// imm0_31 predicate - True if the 32-bit immediate is in the range [0,31].
288def imm0_31 : Operand<i32>, PatLeaf<(imm), [{
289  return (int32_t)N->getZExtValue() < 32;
290}]>;
291
292// Define ARM specific addressing modes.
293
294// addrmode2 := reg +/- reg shop imm
295// addrmode2 := reg +/- imm12
296//
297def addrmode2 : Operand<i32>,
298                ComplexPattern<i32, 3, "SelectAddrMode2", []> {
299  let PrintMethod = "printAddrMode2Operand";
300  let MIOperandInfo = (ops GPR:$base, GPR:$offsreg, i32imm:$offsimm);
301}
302
303def am2offset : Operand<i32>,
304                ComplexPattern<i32, 2, "SelectAddrMode2Offset", []> {
305  let PrintMethod = "printAddrMode2OffsetOperand";
306  let MIOperandInfo = (ops GPR, i32imm);
307}
308
309// addrmode3 := reg +/- reg
310// addrmode3 := reg +/- imm8
311//
312def addrmode3 : Operand<i32>,
313                ComplexPattern<i32, 3, "SelectAddrMode3", []> {
314  let PrintMethod = "printAddrMode3Operand";
315  let MIOperandInfo = (ops GPR:$base, GPR:$offsreg, i32imm:$offsimm);
316}
317
318def am3offset : Operand<i32>,
319                ComplexPattern<i32, 2, "SelectAddrMode3Offset", []> {
320  let PrintMethod = "printAddrMode3OffsetOperand";
321  let MIOperandInfo = (ops GPR, i32imm);
322}
323
324// addrmode4 := reg, <mode|W>
325//
326def addrmode4 : Operand<i32>,
327                ComplexPattern<i32, 2, "SelectAddrMode4", []> {
328  let PrintMethod = "printAddrMode4Operand";
329  let MIOperandInfo = (ops GPR, i32imm);
330}
331
332// addrmode5 := reg +/- imm8*4
333//
334def addrmode5 : Operand<i32>,
335                ComplexPattern<i32, 2, "SelectAddrMode5", []> {
336  let PrintMethod = "printAddrMode5Operand";
337  let MIOperandInfo = (ops GPR, i32imm);
338}
339
340// addrmode6 := reg with optional writeback
341//
342def addrmode6 : Operand<i32>,
343                ComplexPattern<i32, 3, "SelectAddrMode6", []> {
344  let PrintMethod = "printAddrMode6Operand";
345  let MIOperandInfo = (ops GPR:$addr, GPR:$upd, i32imm);
346}
347
348// addrmodepc := pc + reg
349//
350def addrmodepc : Operand<i32>,
351                 ComplexPattern<i32, 2, "SelectAddrModePC", []> {
352  let PrintMethod = "printAddrModePCOperand";
353  let MIOperandInfo = (ops GPR, i32imm);
354}
355
356def nohash_imm : Operand<i32> {
357  let PrintMethod = "printNoHashImmediate";
358}
359
360//===----------------------------------------------------------------------===//
361
362include "ARMInstrFormats.td"
363
364//===----------------------------------------------------------------------===//
365// Multiclass helpers...
366//
367
368/// AsI1_bin_irs - Defines a set of (op r, {so_imm|r|so_reg}) patterns for a
369/// binop that produces a value.
370multiclass AsI1_bin_irs<bits<4> opcod, string opc, PatFrag opnode,
371                        bit Commutable = 0> {
372  def ri : AsI1<opcod, (outs GPR:$dst), (ins GPR:$a, so_imm:$b), DPFrm,
373               IIC_iALUi, opc, " $dst, $a, $b",
374               [(set GPR:$dst, (opnode GPR:$a, so_imm:$b))]> {
375    let Inst{25} = 1;
376  }
377  def rr : AsI1<opcod, (outs GPR:$dst), (ins GPR:$a, GPR:$b), DPFrm,
378               IIC_iALUr, opc, " $dst, $a, $b",
379               [(set GPR:$dst, (opnode GPR:$a, GPR:$b))]> {
380    let Inst{4} = 0;
381    let Inst{25} = 0;
382    let isCommutable = Commutable;
383  }
384  def rs : AsI1<opcod, (outs GPR:$dst), (ins GPR:$a, so_reg:$b), DPSoRegFrm,
385               IIC_iALUsr, opc, " $dst, $a, $b",
386               [(set GPR:$dst, (opnode GPR:$a, so_reg:$b))]> {
387    let Inst{4} = 1;
388    let Inst{7} = 0;
389    let Inst{25} = 0;
390  }
391}
392
393/// AI1_bin_s_irs - Similar to AsI1_bin_irs except it sets the 's' bit so the
394/// instruction modifies the CPSR register.
395let Defs = [CPSR] in {
396multiclass AI1_bin_s_irs<bits<4> opcod, string opc, PatFrag opnode,
397                         bit Commutable = 0> {
398  def ri : AI1<opcod, (outs GPR:$dst), (ins GPR:$a, so_imm:$b), DPFrm,
399               IIC_iALUi, opc, "s $dst, $a, $b",
400               [(set GPR:$dst, (opnode GPR:$a, so_imm:$b))]> {
401    let Inst{25} = 1;
402  }
403  def rr : AI1<opcod, (outs GPR:$dst), (ins GPR:$a, GPR:$b), DPFrm,
404               IIC_iALUr, opc, "s $dst, $a, $b",
405               [(set GPR:$dst, (opnode GPR:$a, GPR:$b))]> {
406    let isCommutable = Commutable;
407    let Inst{4} = 0;
408    let Inst{25} = 0;
409  }
410  def rs : AI1<opcod, (outs GPR:$dst), (ins GPR:$a, so_reg:$b), DPSoRegFrm,
411               IIC_iALUsr, opc, "s $dst, $a, $b",
412               [(set GPR:$dst, (opnode GPR:$a, so_reg:$b))]> {
413    let Inst{4} = 1;
414    let Inst{7} = 0;
415    let Inst{25} = 0;
416  }
417}
418}
419
420/// AI1_cmp_irs - Defines a set of (op r, {so_imm|r|so_reg}) cmp / test
421/// patterns. Similar to AsI1_bin_irs except the instruction does not produce
422/// a explicit result, only implicitly set CPSR.
423let Defs = [CPSR] in {
424multiclass AI1_cmp_irs<bits<4> opcod, string opc, PatFrag opnode,
425                       bit Commutable = 0> {
426  def ri : AI1<opcod, (outs), (ins GPR:$a, so_imm:$b), DPFrm, IIC_iCMPi,
427               opc, " $a, $b",
428               [(opnode GPR:$a, so_imm:$b)]> {
429    let Inst{20} = 1;
430    let Inst{25} = 1;
431  }
432  def rr : AI1<opcod, (outs), (ins GPR:$a, GPR:$b), DPFrm, IIC_iCMPr,
433               opc, " $a, $b",
434               [(opnode GPR:$a, GPR:$b)]> {
435    let Inst{4} = 0;
436    let Inst{20} = 1;
437    let Inst{25} = 0;
438    let isCommutable = Commutable;
439  }
440  def rs : AI1<opcod, (outs), (ins GPR:$a, so_reg:$b), DPSoRegFrm, IIC_iCMPsr,
441               opc, " $a, $b",
442               [(opnode GPR:$a, so_reg:$b)]> {
443    let Inst{4} = 1;
444    let Inst{7} = 0;
445    let Inst{20} = 1;
446    let Inst{25} = 0;
447  }
448}
449}
450
451/// AI_unary_rrot - A unary operation with two forms: one whose operand is a
452/// register and one whose operand is a register rotated by 8/16/24.
453/// FIXME: Remove the 'r' variant. Its rot_imm is zero.
454multiclass AI_unary_rrot<bits<8> opcod, string opc, PatFrag opnode> {
455  def r     : AExtI<opcod, (outs GPR:$dst), (ins GPR:$src),
456                 IIC_iUNAr, opc, " $dst, $src",
457                 [(set GPR:$dst, (opnode GPR:$src))]>,
458              Requires<[IsARM, HasV6]> {
459                let Inst{19-16} = 0b1111;
460              }
461  def r_rot : AExtI<opcod, (outs GPR:$dst), (ins GPR:$src, i32imm:$rot),
462                 IIC_iUNAsi, opc, " $dst, $src, ror $rot",
463                 [(set GPR:$dst, (opnode (rotr GPR:$src, rot_imm:$rot)))]>,
464              Requires<[IsARM, HasV6]> {
465                let Inst{19-16} = 0b1111;
466              }
467}
468
469/// AI_bin_rrot - A binary operation with two forms: one whose operand is a
470/// register and one whose operand is a register rotated by 8/16/24.
471multiclass AI_bin_rrot<bits<8> opcod, string opc, PatFrag opnode> {
472  def rr     : AExtI<opcod, (outs GPR:$dst), (ins GPR:$LHS, GPR:$RHS),
473                  IIC_iALUr, opc, " $dst, $LHS, $RHS",
474                  [(set GPR:$dst, (opnode GPR:$LHS, GPR:$RHS))]>,
475                  Requires<[IsARM, HasV6]>;
476  def rr_rot : AExtI<opcod, (outs GPR:$dst), (ins GPR:$LHS, GPR:$RHS, i32imm:$rot),
477                  IIC_iALUsi, opc, " $dst, $LHS, $RHS, ror $rot",
478                  [(set GPR:$dst, (opnode GPR:$LHS,
479                                          (rotr GPR:$RHS, rot_imm:$rot)))]>,
480                  Requires<[IsARM, HasV6]>;
481}
482
483/// AI1_adde_sube_irs - Define instructions and patterns for adde and sube.
484let Uses = [CPSR] in {
485multiclass AI1_adde_sube_irs<bits<4> opcod, string opc, PatFrag opnode,
486                             bit Commutable = 0> {
487  def ri : AsI1<opcod, (outs GPR:$dst), (ins GPR:$a, so_imm:$b),
488                DPFrm, IIC_iALUi, opc, " $dst, $a, $b",
489               [(set GPR:$dst, (opnode GPR:$a, so_imm:$b))]>,
490               Requires<[IsARM, CarryDefIsUnused]> {
491    let Inst{25} = 1;
492  }
493  def rr : AsI1<opcod, (outs GPR:$dst), (ins GPR:$a, GPR:$b),
494                DPFrm, IIC_iALUr, opc, " $dst, $a, $b",
495               [(set GPR:$dst, (opnode GPR:$a, GPR:$b))]>,
496               Requires<[IsARM, CarryDefIsUnused]> {
497    let isCommutable = Commutable;
498    let Inst{4} = 0;
499    let Inst{25} = 0;
500  }
501  def rs : AsI1<opcod, (outs GPR:$dst), (ins GPR:$a, so_reg:$b),
502                DPSoRegFrm, IIC_iALUsr, opc, " $dst, $a, $b",
503               [(set GPR:$dst, (opnode GPR:$a, so_reg:$b))]>,
504               Requires<[IsARM, CarryDefIsUnused]> {
505    let Inst{4} = 1;
506    let Inst{7} = 0;
507    let Inst{25} = 0;
508  }
509  // Carry setting variants
510  def Sri : AXI1<opcod, (outs GPR:$dst), (ins GPR:$a, so_imm:$b),
511                DPFrm, IIC_iALUi, !strconcat(opc, "s $dst, $a, $b"),
512               [(set GPR:$dst, (opnode GPR:$a, so_imm:$b))]>,
513               Requires<[IsARM, CarryDefIsUsed]> {
514    let Defs = [CPSR];
515    let Inst{25} = 1;
516  }
517  def Srr : AXI1<opcod, (outs GPR:$dst), (ins GPR:$a, GPR:$b),
518                DPFrm, IIC_iALUr, !strconcat(opc, "s $dst, $a, $b"),
519               [(set GPR:$dst, (opnode GPR:$a, GPR:$b))]>,
520               Requires<[IsARM, CarryDefIsUsed]> {
521    let Defs = [CPSR];
522    let Inst{4} = 0;
523    let Inst{25} = 0;
524  }
525  def Srs : AXI1<opcod, (outs GPR:$dst), (ins GPR:$a, so_reg:$b),
526                DPSoRegFrm, IIC_iALUsr, !strconcat(opc, "s $dst, $a, $b"),
527               [(set GPR:$dst, (opnode GPR:$a, so_reg:$b))]>,
528               Requires<[IsARM, CarryDefIsUsed]> {
529    let Defs = [CPSR];
530    let Inst{4} = 1;
531    let Inst{7} = 0;
532    let Inst{25} = 0;
533  }
534}
535}
536
537//===----------------------------------------------------------------------===//
538// Instructions
539//===----------------------------------------------------------------------===//
540
541//===----------------------------------------------------------------------===//
542//  Miscellaneous Instructions.
543//
544
545/// CONSTPOOL_ENTRY - This instruction represents a floating constant pool in
546/// the function.  The first operand is the ID# for this instruction, the second
547/// is the index into the MachineConstantPool that this is, the third is the
548/// size in bytes of this constant pool entry.
549let neverHasSideEffects = 1, isNotDuplicable = 1 in
550def CONSTPOOL_ENTRY :
551PseudoInst<(outs), (ins cpinst_operand:$instid, cpinst_operand:$cpidx,
552                    i32imm:$size), NoItinerary,
553           "${instid:label} ${cpidx:cpentry}", []>;
554
555let Defs = [SP], Uses = [SP] in {
556def ADJCALLSTACKUP :
557PseudoInst<(outs), (ins i32imm:$amt1, i32imm:$amt2, pred:$p), NoItinerary,
558           "@ ADJCALLSTACKUP $amt1",
559           [(ARMcallseq_end timm:$amt1, timm:$amt2)]>;
560
561def ADJCALLSTACKDOWN : 
562PseudoInst<(outs), (ins i32imm:$amt, pred:$p), NoItinerary,
563           "@ ADJCALLSTACKDOWN $amt",
564           [(ARMcallseq_start timm:$amt)]>;
565}
566
567def DWARF_LOC :
568PseudoInst<(outs), (ins i32imm:$line, i32imm:$col, i32imm:$file), NoItinerary,
569           ".loc $file, $line, $col",
570           [(dwarf_loc (i32 imm:$line), (i32 imm:$col), (i32 imm:$file))]>;
571
572
573// Address computation and loads and stores in PIC mode.
574let isNotDuplicable = 1 in {
575def PICADD : AXI1<0b0100, (outs GPR:$dst), (ins GPR:$a, pclabel:$cp, pred:$p),
576                  Pseudo, IIC_iALUr, "\n$cp:\n\tadd$p $dst, pc, $a",
577                   [(set GPR:$dst, (ARMpic_add GPR:$a, imm:$cp))]>;
578
579let AddedComplexity = 10 in {
580let canFoldAsLoad = 1 in
581def PICLDR  : AXI2ldw<(outs GPR:$dst), (ins addrmodepc:$addr, pred:$p),
582                  Pseudo, IIC_iLoadr, "\n${addr:label}:\n\tldr$p $dst, $addr",
583                  [(set GPR:$dst, (load addrmodepc:$addr))]>;
584
585def PICLDRH : AXI3ldh<(outs GPR:$dst), (ins addrmodepc:$addr, pred:$p),
586                 Pseudo, IIC_iLoadr, "\n${addr:label}:\n\tldr${p}h $dst, $addr",
587                  [(set GPR:$dst, (zextloadi16 addrmodepc:$addr))]>;
588
589def PICLDRB : AXI2ldb<(outs GPR:$dst), (ins addrmodepc:$addr, pred:$p),
590                 Pseudo, IIC_iLoadr, "\n${addr:label}:\n\tldr${p}b $dst, $addr",
591                  [(set GPR:$dst, (zextloadi8 addrmodepc:$addr))]>;
592
593def PICLDRSH : AXI3ldsh<(outs GPR:$dst), (ins addrmodepc:$addr, pred:$p),
594                Pseudo, IIC_iLoadr, "\n${addr:label}:\n\tldr${p}sh $dst, $addr",
595                  [(set GPR:$dst, (sextloadi16 addrmodepc:$addr))]>;
596
597def PICLDRSB : AXI3ldsb<(outs GPR:$dst), (ins addrmodepc:$addr, pred:$p),
598                Pseudo, IIC_iLoadr, "\n${addr:label}:\n\tldr${p}sb $dst, $addr",
599                  [(set GPR:$dst, (sextloadi8 addrmodepc:$addr))]>;
600}
601let AddedComplexity = 10 in {
602def PICSTR  : AXI2stw<(outs), (ins GPR:$src, addrmodepc:$addr, pred:$p),
603               Pseudo, IIC_iStorer, "\n${addr:label}:\n\tstr$p $src, $addr",
604               [(store GPR:$src, addrmodepc:$addr)]>;
605
606def PICSTRH : AXI3sth<(outs), (ins GPR:$src, addrmodepc:$addr, pred:$p),
607               Pseudo, IIC_iStorer, "\n${addr:label}:\n\tstr${p}h $src, $addr",
608               [(truncstorei16 GPR:$src, addrmodepc:$addr)]>;
609
610def PICSTRB : AXI2stb<(outs), (ins GPR:$src, addrmodepc:$addr, pred:$p),
611               Pseudo, IIC_iStorer, "\n${addr:label}:\n\tstr${p}b $src, $addr",
612               [(truncstorei8 GPR:$src, addrmodepc:$addr)]>;
613}
614} // isNotDuplicable = 1
615
616
617// LEApcrel - Load a pc-relative address into a register without offending the
618// assembler.
619def LEApcrel : AXI1<0x0, (outs GPR:$dst), (ins i32imm:$label, pred:$p),
620                    Pseudo, IIC_iALUi,
621            !strconcat(!strconcat(".set ${:private}PCRELV${:uid}, ($label-(",
622                                  "${:private}PCRELL${:uid}+8))\n"),
623                       !strconcat("${:private}PCRELL${:uid}:\n\t",
624                                  "add$p $dst, pc, #${:private}PCRELV${:uid}")),
625                   []>;
626
627def LEApcrelJT : AXI1<0x0, (outs GPR:$dst),
628                           (ins i32imm:$label, nohash_imm:$id, pred:$p),
629          Pseudo, IIC_iALUi,
630   !strconcat(!strconcat(".set ${:private}PCRELV${:uid}, "
631                         "(${label}_${id}-(",
632                                  "${:private}PCRELL${:uid}+8))\n"),
633                       !strconcat("${:private}PCRELL${:uid}:\n\t",
634                                  "add$p $dst, pc, #${:private}PCRELV${:uid}")),
635                   []> {
636    let Inst{25} = 1;
637}
638
639//===----------------------------------------------------------------------===//
640//  Control Flow Instructions.
641//
642
643let isReturn = 1, isTerminator = 1, isBarrier = 1 in
644  def BX_RET : AI<(outs), (ins), BrMiscFrm, IIC_Br, 
645                  "bx", " lr", [(ARMretflag)]> {
646  let Inst{7-4}   = 0b0001;
647  let Inst{19-8}  = 0b111111111111;
648  let Inst{27-20} = 0b00010010;
649}
650
651// FIXME: remove when we have a way to marking a MI with these properties.
652// FIXME: Should pc be an implicit operand like PICADD, etc?
653let isReturn = 1, isTerminator = 1, isBarrier = 1, mayLoad = 1,
654    hasExtraDefRegAllocReq = 1 in
655  def LDM_RET : AXI4ld<(outs),
656                    (ins addrmode4:$addr, pred:$p, reglist:$wb, variable_ops),
657                    LdStMulFrm, IIC_Br, "ldm${p}${addr:submode} $addr, $wb",
658                    []>;
659
660// On non-Darwin platforms R9 is callee-saved.
661let isCall = 1,
662  Defs = [R0,  R1,  R2,  R3,  R12, LR,
663          D0,  D1,  D2,  D3,  D4,  D5,  D6,  D7,
664          D16, D17, D18, D19, D20, D21, D22, D23,
665          D24, D25, D26, D27, D28, D29, D30, D31, CPSR, FPSCR] in {
666  def BL  : ABXI<0b1011, (outs), (ins i32imm:$func, variable_ops),
667                IIC_Br, "bl ${func:call}",
668                [(ARMcall tglobaladdr:$func)]>,
669            Requires<[IsARM, IsNotDarwin]>;
670
671  def BL_pred : ABI<0b1011, (outs), (ins i32imm:$func, variable_ops),
672                   IIC_Br, "bl", " ${func:call}",
673                   [(ARMcall_pred tglobaladdr:$func)]>,
674                Requires<[IsARM, IsNotDarwin]>;
675
676  // ARMv5T and above
677  def BLX : AXI<(outs), (ins GPR:$func, variable_ops), BrMiscFrm,
678                IIC_Br, "blx $func",
679                [(ARMcall GPR:$func)]>,
680            Requires<[IsARM, HasV5T, IsNotDarwin]> {
681    let Inst{7-4}   = 0b0011;
682    let Inst{19-8}  = 0b111111111111;
683    let Inst{27-20} = 0b00010010;
684  }
685
686  // ARMv4T
687  def BX : ABXIx2<(outs), (ins GPR:$func, variable_ops),
688                  IIC_Br, "mov lr, pc\n\tbx $func",
689                  [(ARMcall_nolink GPR:$func)]>,
690           Requires<[IsARM, IsNotDarwin]> {
691    let Inst{7-4}   = 0b0001;
692    let Inst{19-8}  = 0b111111111111;
693    let Inst{27-20} = 0b00010010;
694  }
695}
696
697// On Darwin R9 is call-clobbered.
698let isCall = 1,
699  Defs = [R0,  R1,  R2,  R3,  R9,  R12, LR,
700          D0,  D1,  D2,  D3,  D4,  D5,  D6,  D7,
701          D16, D17, D18, D19, D20, D21, D22, D23,
702          D24, D25, D26, D27, D28, D29, D30, D31, CPSR, FPSCR] in {
703  def BLr9  : ABXI<0b1011, (outs), (ins i32imm:$func, variable_ops),
704                IIC_Br, "bl ${func:call}",
705                [(ARMcall tglobaladdr:$func)]>, Requires<[IsARM, IsDarwin]>;
706
707  def BLr9_pred : ABI<0b1011, (outs), (ins i32imm:$func, variable_ops),
708                   IIC_Br, "bl", " ${func:call}",
709                   [(ARMcall_pred tglobaladdr:$func)]>,
710                  Requires<[IsARM, IsDarwin]>;
711
712  // ARMv5T and above
713  def BLXr9 : AXI<(outs), (ins GPR:$func, variable_ops), BrMiscFrm,
714                IIC_Br, "blx $func",
715                [(ARMcall GPR:$func)]>, Requires<[IsARM, HasV5T, IsDarwin]> {
716    let Inst{7-4}   = 0b0011;
717    let Inst{19-8}  = 0b111111111111;
718    let Inst{27-20} = 0b00010010;
719  }
720
721  // ARMv4T
722  def BXr9 : ABXIx2<(outs), (ins GPR:$func, variable_ops),
723                  IIC_Br, "mov lr, pc\n\tbx $func",
724                  [(ARMcall_nolink GPR:$func)]>, Requires<[IsARM, IsDarwin]> {
725    let Inst{7-4}   = 0b0001;
726    let Inst{19-8}  = 0b111111111111;
727    let Inst{27-20} = 0b00010010;
728  }
729}
730
731let isBranch = 1, isTerminator = 1 in {
732  // B is "predicable" since it can be xformed into a Bcc.
733  let isBarrier = 1 in {
734    let isPredicable = 1 in
735    def B : ABXI<0b1010, (outs), (ins brtarget:$target), IIC_Br,
736                "b $target", [(br bb:$target)]>;
737
738  let isNotDuplicable = 1, isIndirectBranch = 1 in {
739  def BR_JTr : JTI<(outs), (ins GPR:$target, jtblock_operand:$jt, i32imm:$id),
740                    IIC_Br, "mov pc, $target \n$jt",
741                    [(ARMbrjt GPR:$target, tjumptable:$jt, imm:$id)]> {
742    let Inst{20}    = 0; // S Bit
743    let Inst{24-21} = 0b1101;
744    let Inst{27-25} = 0b000;
745  }
746  def BR_JTm : JTI<(outs),
747                   (ins addrmode2:$target, jtblock_operand:$jt, i32imm:$id),
748                   IIC_Br, "ldr pc, $target \n$jt",
749                   [(ARMbrjt (i32 (load addrmode2:$target)), tjumptable:$jt,
750                     imm:$id)]> {
751    let Inst{20}    = 1; // L bit
752    let Inst{21}    = 0; // W bit
753    let Inst{22}    = 0; // B bit
754    let Inst{24}    = 1; // P bit
755    let Inst{27-25} = 0b011;
756  }
757  def BR_JTadd : JTI<(outs),
758                   (ins GPR:$target, GPR:$idx, jtblock_operand:$jt, i32imm:$id),
759                    IIC_Br, "add pc, $target, $idx \n$jt",
760                    [(ARMbrjt (add GPR:$target, GPR:$idx), tjumptable:$jt,
761                      imm:$id)]> {
762    let Inst{20}    = 0; // S bit
763    let Inst{24-21} = 0b0100;
764    let Inst{27-25} = 0b000;
765  }
766  } // isNotDuplicable = 1, isIndirectBranch = 1
767  } // isBarrier = 1
768
769  // FIXME: should be able to write a pattern for ARMBrcond, but can't use
770  // a two-value operand where a dag node expects two operands. :( 
771  def Bcc : ABI<0b1010, (outs), (ins brtarget:$target),
772               IIC_Br, "b", " $target",
773               [/*(ARMbrcond bb:$target, imm:$cc, CCR:$ccr)*/]>;
774}
775
776//===----------------------------------------------------------------------===//
777//  Load / store Instructions.
778//
779
780// Load
781let canFoldAsLoad = 1, isReMaterializable = 1 in 
782def LDR  : AI2ldw<(outs GPR:$dst), (ins addrmode2:$addr), LdFrm, IIC_iLoadr,
783               "ldr", " $dst, $addr",
784               [(set GPR:$dst, (load addrmode2:$addr))]>;
785
786// Special LDR for loads from non-pc-relative constpools.
787let canFoldAsLoad = 1, mayLoad = 1, isReMaterializable = 1 in
788def LDRcp : AI2ldw<(outs GPR:$dst), (ins addrmode2:$addr), LdFrm, IIC_iLoadr,
789                 "ldr", " $dst, $addr", []>;
790
791// Loads with zero extension
792def LDRH  : AI3ldh<(outs GPR:$dst), (ins addrmode3:$addr), LdMiscFrm,
793                  IIC_iLoadr, "ldr", "h $dst, $addr",
794                  [(set GPR:$dst, (zextloadi16 addrmode3:$addr))]>;
795
796def LDRB  : AI2ldb<(outs GPR:$dst), (ins addrmode2:$addr), LdFrm, 
797                  IIC_iLoadr, "ldr", "b $dst, $addr",
798                  [(set GPR:$dst, (zextloadi8 addrmode2:$addr))]>;
799
800// Loads with sign extension
801def LDRSH : AI3ldsh<(outs GPR:$dst), (ins addrmode3:$addr), LdMiscFrm,
802                   IIC_iLoadr, "ldr", "sh $dst, $addr",
803                   [(set GPR:$dst, (sextloadi16 addrmode3:$addr))]>;
804
805def LDRSB : AI3ldsb<(outs GPR:$dst), (ins addrmode3:$addr), LdMiscFrm,
806                   IIC_iLoadr, "ldr", "sb $dst, $addr",
807                   [(set GPR:$dst, (sextloadi8 addrmode3:$addr))]>;
808
809let mayLoad = 1, hasExtraDefRegAllocReq = 1 in {
810// Load doubleword
811def LDRD : AI3ldd<(outs GPR:$dst1, GPR:$dst2), (ins addrmode3:$addr), LdMiscFrm,
812                 IIC_iLoadr, "ldr", "d $dst1, $addr",
813                 []>, Requires<[IsARM, HasV5TE]>;
814
815// Indexed loads
816def LDR_PRE  : AI2ldwpr<(outs GPR:$dst, GPR:$base_wb),
817                     (ins addrmode2:$addr), LdFrm, IIC_iLoadru,
818                     "ldr", " $dst, $addr!", "$addr.base = $base_wb", []>;
819
820def LDR_POST : AI2ldwpo<(outs GPR:$dst, GPR:$base_wb),
821                     (ins GPR:$base, am2offset:$offset), LdFrm, IIC_iLoadru,
822                     "ldr", " $dst, [$base], $offset", "$base = $base_wb", []>;
823
824def LDRH_PRE  : AI3ldhpr<(outs GPR:$dst, GPR:$base_wb),
825                     (ins addrmode3:$addr), LdMiscFrm, IIC_iLoadru,
826                     "ldr", "h $dst, $addr!", "$addr.base = $base_wb", []>;
827
828def LDRH_POST : AI3ldhpo<(outs GPR:$dst, GPR:$base_wb),
829                     (ins GPR:$base,am3offset:$offset), LdMiscFrm, IIC_iLoadru,
830                     "ldr", "h $dst, [$base], $offset", "$base = $base_wb", []>;
831
832def LDRB_PRE  : AI2ldbpr<(outs GPR:$dst, GPR:$base_wb),
833                     (ins addrmode2:$addr), LdFrm, IIC_iLoadru,
834                     "ldr", "b $dst, $addr!", "$addr.base = $base_wb", []>;
835
836def LDRB_POST : AI2ldbpo<(outs GPR:$dst, GPR:$base_wb),
837                     (ins GPR:$base,am2offset:$offset), LdFrm, IIC_iLoadru,
838                     "ldr", "b $dst, [$base], $offset", "$base = $base_wb", []>;
839
840def LDRSH_PRE : AI3ldshpr<(outs GPR:$dst, GPR:$base_wb),
841                      (ins addrmode3:$addr), LdMiscFrm, IIC_iLoadru,
842                      "ldr", "sh $dst, $addr!", "$addr.base = $base_wb", []>;
843
844def LDRSH_POST: AI3ldshpo<(outs GPR:$dst, GPR:$base_wb),
845                      (ins GPR:$base,am3offset:$offset), LdMiscFrm, IIC_iLoadru,
846                    "ldr", "sh $dst, [$base], $offset", "$base = $base_wb", []>;
847
848def LDRSB_PRE : AI3ldsbpr<(outs GPR:$dst, GPR:$base_wb),
849                      (ins addrmode3:$addr), LdMiscFrm, IIC_iLoadru,
850                      "ldr", "sb $dst, $addr!", "$addr.base = $base_wb", []>;
851
852def LDRSB_POST: AI3ldsbpo<(outs GPR:$dst, GPR:$base_wb),
853                      (ins GPR:$base,am3offset:$offset), LdMiscFrm, IIC_iLoadru,
854                    "ldr", "sb $dst, [$base], $offset", "$base = $base_wb", []>;
855}
856
857// Store
858def STR  : AI2stw<(outs), (ins GPR:$src, addrmode2:$addr), StFrm, IIC_iStorer,
859               "str", " $src, $addr",
860               [(store GPR:$src, addrmode2:$addr)]>;
861
862// Stores with truncate
863def STRH : AI3sth<(outs), (ins GPR:$src, addrmode3:$addr), StMiscFrm, IIC_iStorer,
864               "str", "h $src, $addr",
865               [(truncstorei16 GPR:$src, addrmode3:$addr)]>;
866
867def STRB : AI2stb<(outs), (ins GPR:$src, addrmode2:$addr), StFrm, IIC_iStorer,
868               "str", "b $src, $addr",
869               [(truncstorei8 GPR:$src, addrmode2:$addr)]>;
870
871// Store doubleword
872let mayStore = 1, hasExtraSrcRegAllocReq = 1 in
873def STRD : AI3std<(outs), (ins GPR:$src1, GPR:$src2, addrmode3:$addr),
874               StMiscFrm, IIC_iStorer,
875               "str", "d $src1, $addr", []>, Requires<[IsARM, HasV5TE]>;
876
877// Indexed stores
878def STR_PRE  : AI2stwpr<(outs GPR:$base_wb),
879                     (ins GPR:$src, GPR:$base, am2offset:$offset), 
880                     StFrm, IIC_iStoreru,
881                    "str", " $src, [$base, $offset]!", "$base = $base_wb",
882                    [(set GPR:$base_wb,
883                      (pre_store GPR:$src, GPR:$base, am2offset:$offset))]>;
884
885def STR_POST : AI2stwpo<(outs GPR:$base_wb),
886                     (ins GPR:$src, GPR:$base,am2offset:$offset), 
887                     StFrm, IIC_iStoreru,
888                    "str", " $src, [$base], $offset", "$base = $base_wb",
889                    [(set GPR:$base_wb,
890                      (post_store GPR:$src, GPR:$base, am2offset:$offset))]>;
891
892def STRH_PRE : AI3sthpr<(outs GPR:$base_wb),
893                     (ins GPR:$src, GPR:$base,am3offset:$offset), 
894                     StMiscFrm, IIC_iStoreru,
895                     "str", "h $src, [$base, $offset]!", "$base = $base_wb",
896                    [(set GPR:$base_wb,
897                      (pre_truncsti16 GPR:$src, GPR:$base,am3offset:$offset))]>;
898
899def STRH_POST: AI3sthpo<(outs GPR:$base_wb),
900                     (ins GPR:$src, GPR:$base,am3offset:$offset), 
901                     StMiscFrm, IIC_iStoreru,
902                     "str", "h $src, [$base], $offset", "$base = $base_wb",
903                    [(set GPR:$base_wb, (post_truncsti16 GPR:$src,
904                                         GPR:$base, am3offset:$offset))]>;
905
906def STRB_PRE : AI2stbpr<(outs GPR:$base_wb),
907                     (ins GPR:$src, GPR:$base,am2offset:$offset), 
908                     StFrm, IIC_iStoreru,
909                     "str", "b $src, [$base, $offset]!", "$base = $base_wb",
910                    [(set GPR:$base_wb, (pre_truncsti8 GPR:$src,
911                                         GPR:$base, am2offset:$offset))]>;
912
913def STRB_POST: AI2stbpo<(outs GPR:$base_wb),
914                     (ins GPR:$src, GPR:$base,am2offset:$offset), 
915                     StFrm, IIC_iStoreru,
916                     "str", "b $src, [$base], $offset", "$base = $base_wb",
917                    [(set GPR:$base_wb, (post_truncsti8 GPR:$src,
918                                         GPR:$base, am2offset:$offset))]>;
919
920//===----------------------------------------------------------------------===//
921//  Load / store multiple Instructions.
922//
923
924let mayLoad = 1, hasExtraDefRegAllocReq = 1 in
925def LDM : AXI4ld<(outs),
926               (ins addrmode4:$addr, pred:$p, reglist:$wb, variable_ops),
927               LdStMulFrm, IIC_iLoadm, "ldm${p}${addr:submode} $addr, $wb",
928               []>;
929
930let mayStore = 1, hasExtraSrcRegAllocReq = 1 in
931def STM : AXI4st<(outs),
932               (ins addrmode4:$addr, pred:$p, reglist:$wb, variable_ops),
933               LdStMulFrm, IIC_iStorem, "stm${p}${addr:submode} $addr, $wb",
934               []>;
935
936//===----------------------------------------------------------------------===//
937//  Move Instructions.
938//
939
940let neverHasSideEffects = 1 in
941def MOVr : AsI1<0b1101, (outs GPR:$dst), (ins GPR:$src), DPFrm, IIC_iMOVr,
942                "mov", " $dst, $src", []>, UnaryDP {
943  let Inst{4} = 0;
944  let Inst{25} = 0;
945}
946
947def MOVs : AsI1<0b1101, (outs GPR:$dst), (ins so_reg:$src), 
948                DPSoRegFrm, IIC_iMOVsr,
949                "mov", " $dst, $src", [(set GPR:$dst, so_reg:$src)]>, UnaryDP {
950  let Inst{4} = 1;
951  let Inst{7} = 0;
952  let Inst{25} = 0;
953}
954
955let isReMaterializable = 1, isAsCheapAsAMove = 1 in
956def MOVi : AsI1<0b1101, (outs GPR:$dst), (ins so_imm:$src), DPFrm, IIC_iMOVi,
957                "mov", " $dst, $src", [(set GPR:$dst, so_imm:$src)]>, UnaryDP {
958  let Inst{25} = 1;
959}
960
961let isReMaterializable = 1, isAsCheapAsAMove = 1 in
962def MOVi16 : AI1<0b1000, (outs GPR:$dst), (ins i32imm:$src), 
963                 DPFrm, IIC_iMOVi,
964                 "movw", " $dst, $src",
965                 [(set GPR:$dst, imm0_65535:$src)]>,
966                 Requires<[IsARM, HasV6T2]> {
967  let Inst{20} = 0;
968  let Inst{25} = 1;
969}
970
971let Constraints = "$src = $dst" in
972def MOVTi16 : AI1<0b1010, (outs GPR:$dst), (ins GPR:$src, i32imm:$imm),
973                  DPFrm, IIC_iMOVi,
974                  "movt", " $dst, $imm", 
975                  [(set GPR:$dst,
976                        (or (and GPR:$src, 0xffff), 
977                            lo16AllZero:$imm))]>, UnaryDP,
978                  Requires<[IsARM, HasV6T2]> {
979  let Inst{20} = 0;
980  let Inst{25} = 1;
981}
982
983let Uses = [CPSR] in
984def MOVrx : AsI1<0b1101, (outs GPR:$dst), (ins GPR:$src), Pseudo, IIC_iMOVsi,
985                 "mov", " $dst, $src, rrx",
986                 [(set GPR:$dst, (ARMrrx GPR:$src))]>, UnaryDP;
987
988// These aren't really mov instructions, but we have to define them this way
989// due to flag operands.
990
991let Defs = [CPSR] in {
992def MOVsrl_flag : AI1<0b1101, (outs GPR:$dst), (ins GPR:$src), Pseudo, 
993                      IIC_iMOVsi, "mov", "s $dst, $src, lsr #1",
994                      [(set GPR:$dst, (ARMsrl_flag GPR:$src))]>, UnaryDP;
995def MOVsra_flag : AI1<0b1101, (outs GPR:$dst), (ins GPR:$src), Pseudo,
996                      IIC_iMOVsi, "mov", "s $dst, $src, asr #1",
997                      [(set GPR:$dst, (ARMsra_flag GPR:$src))]>, UnaryDP;
998}
999
1000//===----------------------------------------------------------------------===//
1001//  Extend Instructions.
1002//
1003
1004// Sign extenders
1005
1006defm SXTB  : AI_unary_rrot<0b01101010,
1007                           "sxtb", UnOpFrag<(sext_inreg node:$Src, i8)>>;
1008defm SXTH  : AI_unary_rrot<0b01101011,
1009                           "sxth", UnOpFrag<(sext_inreg node:$Src, i16)>>;
1010
1011defm SXTAB : AI_bin_rrot<0b01101010,
1012               "sxtab", BinOpFrag<(add node:$LHS, (sext_inreg node:$RHS, i8))>>;
1013defm SXTAH : AI_bin_rrot<0b01101011,
1014               "sxtah", BinOpFrag<(add node:$LHS, (sext_inreg node:$RHS,i16))>>;
1015
1016// TODO: SXT(A){B|H}16
1017
1018// Zero extenders
1019
1020let AddedComplexity = 16 in {
1021defm UXTB   : AI_unary_rrot<0b01101110,
1022                            "uxtb"  , UnOpFrag<(and node:$Src, 0x000000FF)>>;
1023defm UXTH   : AI_unary_rrot<0b01101111,
1024                            "uxth"  , UnOpFrag<(and node:$Src, 0x0000FFFF)>>;
1025defm UXTB16 : AI_unary_rrot<0b01101100,
1026                            "uxtb16", UnOpFrag<(and node:$Src, 0x00FF00FF)>>;
1027
1028def : ARMV6Pat<(and (shl GPR:$Src, (i32 8)), 0xFF00FF),
1029               (UXTB16r_rot GPR:$Src, 24)>;
1030def : ARMV6Pat<(and (srl GPR:$Src, (i32 8)), 0xFF00FF),
1031               (UXTB16r_rot GPR:$Src, 8)>;
1032
1033defm UXTAB : AI_bin_rrot<0b01101110, "uxtab",
1034                        BinOpFrag<(add node:$LHS, (and node:$RHS, 0x00FF))>>;
1035defm UXTAH : AI_bin_rrot<0b01101111, "uxtah",
1036                        BinOpFrag<(add node:$LHS, (and node:$RHS, 0xFFFF))>>;
1037}
1038
1039// This isn't safe in general, the add is two 16-bit units, not a 32-bit add.
1040//defm UXTAB16 : xxx<"uxtab16", 0xff00ff>;
1041
1042// TODO: UXT(A){B|H}16
1043
1044def SBFX  : I<(outs GPR:$dst),
1045              (ins GPR:$src, imm0_31:$lsb, imm0_31:$width),
1046               AddrMode1, Size4Bytes, IndexModeNone, DPFrm, IIC_iALUi,
1047               "sbfx", " $dst, $src, $lsb, $width", "", []>,
1048               Requires<[IsARM, HasV6T2]> {
1049  let Inst{27-21} = 0b0111101;
1050  let Inst{6-4}   = 0b101;
1051}
1052
1053def UBFX  : I<(outs GPR:$dst),
1054              (ins GPR:$src, imm0_31:$lsb, imm0_31:$width),
1055               AddrMode1, Size4Bytes, IndexModeNone, DPFrm, IIC_iALUi,
1056               "ubfx", " $dst, $src, $lsb, $width", "", []>,
1057               Requires<[IsARM, HasV6T2]> {
1058  let Inst{27-21} = 0b0111111;
1059  let Inst{6-4}   = 0b101;
1060}
1061
1062//===----------------------------------------------------------------------===//
1063//  Arithmetic Instructions.
1064//
1065
1066defm ADD  : AsI1_bin_irs<0b0100, "add",
1067                         BinOpFrag<(add  node:$LHS, node:$RHS)>, 1>;
1068defm SUB  : AsI1_bin_irs<0b0010, "sub",
1069                         BinOpFrag<(sub  node:$LHS, node:$RHS)>>;
1070
1071// ADD and SUB with 's' bit set.
1072defm ADDS : AI1_bin_s_irs<0b0100, "add",
1073                          BinOpFrag<(addc node:$LHS, node:$RHS)>>;
1074defm SUBS : AI1_bin_s_irs<0b0010, "sub",
1075                          BinOpFrag<(subc node:$LHS, node:$RHS)>>;
1076
1077defm ADC : AI1_adde_sube_irs<0b0101, "adc",
1078                             BinOpFrag<(adde node:$LHS, node:$RHS)>, 1>;
1079defm SBC : AI1_adde_sube_irs<0b0110, "sbc",
1080                             BinOpFrag<(sube node:$LHS, node:$RHS)>>;
1081
1082// These don't define reg/reg forms, because they are handled above.
1083def RSBri : AsI1<0b0011, (outs GPR:$dst), (ins GPR:$a, so_imm:$b), DPFrm,
1084                  IIC_iALUi, "rsb", " $dst, $a, $b",
1085                  [(set GPR:$dst, (sub so_imm:$b, GPR:$a))]> {
1086    let Inst{25} = 1;
1087}
1088
1089def RSBrs : AsI1<0b0011, (outs GPR:$dst), (ins GPR:$a, so_reg:$b), DPSoRegFrm,
1090                  IIC_iALUsr, "rsb", " $dst, $a, $b",
1091                  [(set GPR:$dst, (sub so_reg:$b, GPR:$a))]>;
1092
1093// RSB with 's' bit set.
1094let Defs = [CPSR] in {
1095def RSBSri : AI1<0b0011, (outs GPR:$dst), (ins GPR:$a, so_imm:$b), DPFrm,
1096                 IIC_iALUi, "rsb", "s $dst, $a, $b",
1097                 [(set GPR:$dst, (subc so_imm:$b, GPR:$a))]> {
1098    let Inst{25} = 1;
1099}
1100def RSBSrs : AI1<0b0011, (outs GPR:$dst), (ins GPR:$a, so_reg:$b), DPSoRegFrm,
1101                 IIC_iALUsr, "rsb", "s $dst, $a, $b",
1102                 [(set GPR:$dst, (subc so_reg:$b, GPR:$a))]>;
1103}
1104
1105let Uses = [CPSR] in {
1106def RSCri : AsI1<0b0111, (outs GPR:$dst), (ins GPR:$a, so_imm:$b),
1107                 DPFrm, IIC_iALUi, "rsc", " $dst, $a, $b",
1108                 [(set GPR:$dst, (sube so_imm:$b, GPR:$a))]>,
1109                 Requires<[IsARM, CarryDefIsUnused]> {
1110    let Inst{25} = 1;
1111}
1112def RSCrs : AsI1<0b0111, (outs GPR:$dst), (ins GPR:$a, so_reg:$b),
1113                 DPSoRegFrm, IIC_iALUsr, "rsc", " $dst, $a, $b",
1114                 [(set GPR:$dst, (sube so_reg:$b, GPR:$a))]>,
1115                 Requires<[IsARM, CarryDefIsUnused]>;
1116}
1117
1118// FIXME: Allow these to be predicated.
1119let Defs = [CPSR], Uses = [CPSR] in {
1120def RSCSri : AXI1<0b0111, (outs GPR:$dst), (ins GPR:$a, so_imm:$b),
1121                  DPFrm, IIC_iALUi, "rscs $dst, $a, $b",
1122                  [(set GPR:$dst, (sube so_imm:$b, GPR:$a))]>,
1123                  Requires<[IsARM, CarryDefIsUnused]> {
1124    let Inst{25} = 1;
1125}
1126def RSCSrs : AXI1<0b0111, (outs GPR:$dst), (ins GPR:$a, so_reg:$b),
1127                  DPSoRegFrm, IIC_iALUsr, "rscs $dst, $a, $b",
1128                  [(set GPR:$dst, (sube so_reg:$b, GPR:$a))]>,
1129                  Requires<[IsARM, CarryDefIsUnused]>;
1130}
1131
1132// (sub X, imm) gets canonicalized to (add X, -imm).  Match this form.
1133def : ARMPat<(add    GPR:$src, so_imm_neg:$imm),
1134             (SUBri  GPR:$src, so_imm_neg:$imm)>;
1135
1136//def : ARMPat<(addc   GPR:$src, so_imm_neg:$imm),
1137//             (SUBSri GPR:$src, so_imm_neg:$imm)>;
1138//def : ARMPat<(adde   GPR:$src, so_imm_neg:$imm),
1139//             (SBCri  GPR:$src, so_imm_neg:$imm)>;
1140
1141// Note: These are implemented in C++ code, because they have to generate
1142// ADD/SUBrs instructions, which use a complex pattern that a xform function
1143// cannot produce.
1144// (mul X, 2^n+1) -> (add (X << n), X)
1145// (mul X, 2^n-1) -> (rsb X, (X << n))
1146
1147
1148//===----------------------------------------------------------------------===//
1149//  Bitwise Instructions.
1150//
1151
1152defm AND   : AsI1_bin_irs<0b0000, "and",
1153                          BinOpFrag<(and node:$LHS, node:$RHS)>, 1>;
1154defm ORR   : AsI1_bin_irs<0b1100, "orr",
1155                          BinOpFrag<(or  node:$LHS, node:$RHS)>, 1>;
1156defm EOR   : AsI1_bin_irs<0b0001, "eor",
1157                          BinOpFrag<(xor node:$LHS, node:$RHS)>, 1>;
1158defm BIC   : AsI1_bin_irs<0b1110, "bic",
1159                          BinOpFrag<(and node:$LHS, (not node:$RHS))>>;
1160
1161def BFC    : I<(outs GPR:$dst), (ins GPR:$src, bf_inv_mask_imm:$imm),
1162               AddrMode1, Size4Bytes, IndexModeNone, DPFrm, IIC_iALUi,
1163               "bfc", " $dst, $imm", "$src = $dst",
1164               [(set GPR:$dst, (and GPR:$src, bf_inv_mask_imm:$imm))]>,
1165               Requires<[IsARM, HasV6T2]> {
1166  let Inst{27-21} = 0b0111110;
1167  let Inst{6-0}   = 0b0011111;
1168}
1169
1170def  MVNr  : AsI1<0b1111, (outs GPR:$dst), (ins GPR:$src), DPFrm, IIC_iMOVr,
1171                  "mvn", " $dst, $src",
1172                  [(set GPR:$dst, (not GPR:$src))]>, UnaryDP {
1173  let Inst{4} = 0;
1174}
1175def  MVNs  : AsI1<0b1111, (outs GPR:$dst), (ins so_reg:$src), DPSoRegFrm,
1176                  IIC_iMOVsr, "mvn", " $dst, $src",
1177                  [(set GPR:$dst, (not so_reg:$src))]>, UnaryDP {
1178  let Inst{4} = 1;
1179  let Inst{7} = 0;
1180}
1181let isReMaterializable = 1, isAsCheapAsAMove = 1 in
1182def  MVNi  : AsI1<0b1111, (outs GPR:$dst), (ins so_imm:$imm), DPFrm, 
1183                  IIC_iMOVi, "mvn", " $dst, $imm",
1184                  [(set GPR:$dst, so_imm_not:$imm)]>,UnaryDP {
1185    let Inst{25} = 1;
1186}
1187
1188def : ARMPat<(and   GPR:$src, so_imm_not:$imm),
1189             (BICri GPR:$src, so_imm_not:$imm)>;
1190
1191//===----------------------------------------------------------------------===//
1192//  Multiply Instructions.
1193//
1194
1195let isCommutable = 1 in
1196def MUL   : AsMul1I<0b0000000, (outs GPR:$dst), (ins GPR:$a, GPR:$b),
1197                   IIC_iMUL32, "mul", " $dst, $a, $b",
1198                   [(set GPR:$dst, (mul GPR:$a, GPR:$b))]>;
1199
1200def MLA   : AsMul1I<0b0000001, (outs GPR:$dst), (ins GPR:$a, GPR:$b, GPR:$c),
1201                    IIC_iMAC32, "mla", " $dst, $a, $b, $c",
1202                   [(set GPR:$dst, (add (mul GPR:$a, GPR:$b), GPR:$c))]>;
1203
1204def MLS   : AMul1I<0b0000011, (outs GPR:$dst), (ins GPR:$a, GPR:$b, GPR:$c),
1205                   IIC_iMAC32, "mls", " $dst, $a, $b, $c",
1206                   [(set GPR:$dst, (sub GPR:$c, (mul GPR:$a, GPR:$b)))]>,
1207                   Requires<[IsARM, HasV6T2]>;
1208
1209// Extra precision multiplies with low / high results
1210let neverHasSideEffects = 1 in {
1211let isCommutable = 1 in {
1212def SMULL : AsMul1I<0b0000110, (outs GPR:$ldst, GPR:$hdst),
1213                               (ins GPR:$a, GPR:$b), IIC_iMUL64,
1214                    "smull", " $ldst, $hdst, $a, $b", []>;
1215
1216def UMULL : AsMul1I<0b0000100, (outs GPR:$ldst, GPR:$hdst),
1217                               (ins GPR:$a, GPR:$b), IIC_iMUL64,
1218                    "umull", " $ldst, $hdst, $a, $b", []>;
1219}
1220
1221// Multiply + accumulate
1222def SMLAL : AsMul1I<0b0000111, (outs GPR:$ldst, GPR:$hdst),
1223                               (ins GPR:$a, GPR:$b), IIC_iMAC64,
1224                    "smlal", " $ldst, $hdst, $a, $b", []>;
1225
1226def UMLAL : AsMul1I<0b0000101, (outs GPR:$ldst, GPR:$hdst),
1227                               (ins GPR:$a, GPR:$b), IIC_iMAC64,
1228                    "umlal", " $ldst, $hdst, $a, $b", []>;
1229
1230def UMAAL : AMul1I <0b0000010, (outs GPR:$ldst, GPR:$hdst),
1231                               (ins GPR:$a, GPR:$b), IIC_iMAC64,
1232                    "umaal", " $ldst, $hdst, $a, $b", []>,
1233                    Requires<[IsARM, HasV6]>;
1234} // neverHasSideEffects
1235
1236// Most significant word multiply
1237def SMMUL : AMul2I <0b0111010, (outs GPR:$dst), (ins GPR:$a, GPR:$b),
1238               IIC_iMUL32, "smmul", " $dst, $a, $b",
1239               [(set GPR:$dst, (mulhs GPR:$a, GPR:$b))]>,
1240            Requires<[IsARM, HasV6]> {
1241  let Inst{7-4}   = 0b0001;
1242  let Inst{15-12} = 0b1111;
1243}
1244
1245def SMMLA : AMul2I <0b0111010, (outs GPR:$dst), (ins GPR:$a, GPR:$b, GPR:$c),
1246               IIC_iMAC32, "smmla", " $dst, $a, $b, $c",
1247               [(set GPR:$dst, (add (mulhs GPR:$a, GPR:$b), GPR:$c))]>,
1248            Requires<[IsARM, HasV6]> {
1249  let Inst{7-4}   = 0b0001;
1250}
1251
1252
1253def SMMLS : AMul2I <0b0111010, (outs GPR:$dst), (ins GPR:$a, GPR:$b, GPR:$c),
1254               IIC_iMAC32, "smmls", " $dst, $a, $b, $c",
1255               [(set GPR:$dst, (sub GPR:$c, (mulhs GPR:$a, GPR:$b)))]>,
1256            Requires<[IsARM, HasV6]> {
1257  let Inst{7-4}   = 0b1101;
1258}
1259
1260multiclass AI_smul<string opc, PatFrag opnode> {
1261  def BB : AMulxyI<0b0001011, (outs GPR:$dst), (ins GPR:$a, GPR:$b),
1262              IIC_iMUL32, !strconcat(opc, "bb"), " $dst, $a, $b",
1263              [(set GPR:$dst, (opnode (sext_inreg GPR:$a, i16),
1264                                      (sext_inreg GPR:$b, i16)))]>,
1265           Requires<[IsARM, HasV5TE]> {
1266             let Inst{5} = 0;
1267             let Inst{6} = 0;
1268           }
1269
1270  def BT : AMulxyI<0b0001011, (outs GPR:$dst), (ins GPR:$a, GPR:$b),
1271              IIC_iMUL32, !strconcat(opc, "bt"), " $dst, $a, $b",
1272              [(set GPR:$dst, (opnode (sext_inreg GPR:$a, i16),
1273                                      (sra GPR:$b, (i32 16))))]>,
1274           Requires<[IsARM, HasV5TE]> {
1275             let Inst{5} = 0;
1276             let Inst{6} = 1;
1277           }
1278
1279  def TB : AMulxyI<0b0001011, (outs GPR:$dst), (ins GPR:$a, GPR:$b),
1280              IIC_iMUL32, !strconcat(opc, "tb"), " $dst, $a, $b",
1281              [(set GPR:$dst, (opnode (sra GPR:$a, (i32 16)),
1282                                      (sext_inreg GPR:$b, i16)))]>,
1283           Requires<[IsARM, HasV5TE]> {
1284             let Inst{5} = 1;
1285             let Inst{6} = 0;
1286           }
1287
1288  def TT : AMulxyI<0b0001011, (outs GPR:$dst), (ins GPR:$a, GPR:$b),
1289              IIC_iMUL32, !strconcat(opc, "tt"), " $dst, $a, $b",
1290              [(set GPR:$dst, (opnode (sra GPR:$a, (i32 16)),
1291                                      (sra GPR:$b, (i32 16))))]>,
1292            Requires<[IsARM, HasV5TE]> {
1293             let Inst{5} = 1;
1294             let Inst{6} = 1;
1295           }
1296
1297  def WB : AMulxyI<0b0001001, (outs GPR:$dst), (ins GPR:$a, GPR:$b),
1298              IIC_iMUL16, !strconcat(opc, "wb"), " $dst, $a, $b",
1299              [(set GPR:$dst, (sra (opnode GPR:$a,
1300                                    (sext_inreg GPR:$b, i16)), (i32 16)))]>,
1301           Requires<[IsARM, HasV5TE]> {
1302             let Inst{5} = 1;
1303             let Inst{6} = 0;
1304           }
1305
1306  def WT : AMulxyI<0b0001001, (outs GPR:$dst), (ins GPR:$a, GPR:$b),
1307              IIC_iMUL16, !strconcat(opc, "wt"), " $dst, $a, $b",
1308              [(set GPR:$dst, (sra (opnode GPR:$a,
1309                                    (sra GPR:$b, (i32 16))), (i32 16)))]>,
1310            Requires<[IsARM, HasV5TE]> {
1311             let Inst{5} = 1;
1312             let Inst{6} = 1;
1313           }
1314}
1315
1316
1317multiclass AI_smla<string opc, PatFrag opnode> {
1318  def BB : AMulxyI<0b0001000, (outs GPR:$dst), (ins GPR:$a, GPR:$b, GPR:$acc),
1319              IIC_iMAC16, !strconcat(opc, "bb"), " $dst, $a, $b, $acc",
1320              [(set GPR:$dst, (add GPR:$acc,
1321                               (opnode (sext_inreg GPR:$a, i16),
1322                                       (sext_inreg GPR:$b, i16))))]>,
1323           Requires<[IsARM, HasV5TE]> {
1324             let Inst{5} = 0;
1325             let Inst{6} = 0;
1326           }
1327
1328  def BT : AMulxyI<0b0001000, (outs GPR:$dst), (ins GPR:$a, GPR:$b, GPR:$acc),
1329              IIC_iMAC16, !strconcat(opc, "bt"), " $dst, $a, $b, $acc",
1330              [(set GPR:$dst, (add GPR:$acc, (opnode (sext_inreg GPR:$a, i16),
1331                                                     (sra GPR:$b, (i32 16)))))]>,
1332           Requires<[IsARM, HasV5TE]> {
1333             let Inst{5} = 0;
1334             let Inst{6} = 1;
1335           }
1336
1337  def TB : AMulxyI<0b0001000, (outs GPR:$dst), (ins GPR:$a, GPR:$b, GPR:$acc),
1338              IIC_iMAC16, !strconcat(opc, "tb"), " $dst, $a, $b, $acc",
1339              [(set GPR:$dst, (add GPR:$acc, (opnode (sra GPR:$a, (i32 16)),
1340                                                 (sext_inreg GPR:$b, i16))))]>,
1341           Requires<[IsARM, HasV5TE]> {
1342             let Inst{5} = 1;
1343             let Inst{6} = 0;
1344           }
1345
1346  def TT : AMulxyI<0b0001000, (outs GPR:$dst), (ins GPR:$a, GPR:$b, GPR:$acc),
1347              IIC_iMAC16, !strconcat(opc, "tt"), " $dst, $a, $b, $acc",
1348              [(set GPR:$dst, (add GPR:$acc, (opnode (sra GPR:$a, (i32 16)),
1349                                                     (sra GPR:$b, (i32 16)))))]>,
1350            Requires<[IsARM, HasV5TE]> {
1351             let Inst{5} = 1;
1352             let Inst{6} = 1;
1353           }
1354
1355  def WB : AMulxyI<0b0001001, (outs GPR:$dst), (ins GPR:$a, GPR:$b, GPR:$acc),
1356              IIC_iMAC16, !strconcat(opc, "wb"), " $dst, $a, $b, $acc",
1357              [(set GPR:$dst, (add GPR:$acc, (sra (opnode GPR:$a,
1358                                       (sext_inreg GPR:$b, i16)), (i32 16))))]>,
1359           Requires<[IsARM, HasV5TE]> {
1360             let Inst{5} = 0;
1361             let Inst{6} = 0;
1362           }
1363
1364  def WT : AMulxyI<0b0001001, (outs GPR:$dst), (ins GPR:$a, GPR:$b, GPR:$acc),
1365              IIC_iMAC16, !strconcat(opc, "wt"), " $dst, $a, $b, $acc",
1366              [(set GPR:$dst, (add GPR:$acc, (sra (opnode GPR:$a,
1367                                         (sra GPR:$b, (i32 16))), (i32 16))))]>,
1368            Requires<[IsARM, HasV5TE]> {
1369             let Inst{5} = 0;
1370             let Inst{6} = 1;
1371           }
1372}
1373
1374defm SMUL : AI_smul<"smul", BinOpFrag<(mul node:$LHS, node:$RHS)>>;
1375defm SMLA : AI_smla<"smla", BinOpFrag<(mul node:$LHS, node:$RHS)>>;
1376
1377// TODO: Halfword multiple accumulate long: SMLAL<x><y>
1378// TODO: Dual halfword multiple: SMUAD, SMUSD, SMLAD, SMLSD, SMLALD, SMLSLD
1379
1380//===----------------------------------------------------------------------===//
1381//  Misc. Arithmetic Instructions.
1382//
1383
1384def CLZ  : AMiscA1I<0b000010110, (outs GPR:$dst), (ins GPR:$src), IIC_iUNAr,
1385              "clz", " $dst, $src",
1386              [(set GPR:$dst, (ctlz GPR:$src))]>, Requires<[IsARM, HasV5T]> {
1387  let Inst{7-4}   = 0b0001;
1388  let Inst{11-8}  = 0b1111;
1389  let Inst{19-16} = 0b1111;
1390}
1391
1392def REV  : AMiscA1I<0b01101011, (outs GPR:$dst), (ins GPR:$src), IIC_iUNAr,
1393              "rev", " $dst, $src",
1394              [(set GPR:$dst, (bswap GPR:$src))]>, Requires<[IsARM, HasV6]> {
1395  let Inst{7-4}   = 0b0011;
1396  let Inst{11-8}  = 0b1111;
1397  let Inst{19-16} = 0b1111;
1398}
1399
1400def REV16 : AMiscA1I<0b01101011, (outs GPR:$dst), (ins GPR:$src), IIC_iUNAr,
1401               "rev16", " $dst, $src",
1402               [(set GPR:$dst,
1403                   (or (and (srl GPR:$src, (i32 8)), 0xFF),
1404                       (or (and (shl GPR:$src, (i32 8)), 0xFF00),
1405                           (or (and (srl GPR:$src, (i32 8)), 0xFF0000),
1406                               (and (shl GPR:$src, (i32 8)), 0xFF000000)))))]>,
1407               Requires<[IsARM, HasV6]> {
1408  let Inst{7-4}   = 0b1011;
1409  let Inst{11-8}  = 0b1111;
1410  let Inst{19-16} = 0b1111;
1411}
1412
1413def REVSH : AMiscA1I<0b01101111, (outs GPR:$dst), (ins GPR:$src), IIC_iUNAr,
1414               "revsh", " $dst, $src",
1415               [(set GPR:$dst,
1416                  (sext_inreg
1417                    (or (srl (and GPR:$src, 0xFF00), (i32 8)),
1418                        (shl GPR:$src, (i32 8))), i16))]>,
1419               Requires<[IsARM, HasV6]> {
1420  let Inst{7-4}   = 0b1011;
1421  let Inst{11-8}  = 0b1111;
1422  let Inst{19-16} = 0b1111;
1423}
1424
1425def PKHBT : AMiscA1I<0b01101000, (outs GPR:$dst),
1426                                 (ins GPR:$src1, GPR:$src2, i32imm:$shamt),
1427               IIC_iALUsi, "pkhbt", " $dst, $src1, $src2, LSL $shamt",
1428               [(set GPR:$dst, (or (and GPR:$src1, 0xFFFF),
1429                                   (and (shl GPR:$src2, (i32 imm:$shamt)),
1430                                        0xFFFF0000)))]>,
1431               Requires<[IsARM, HasV6]> {
1432  let Inst{6-4} = 0b001;
1433}
1434
1435// Alternate cases for PKHBT where identities eliminate some nodes.
1436def : ARMV6Pat<(or (and GPR:$src1, 0xFFFF), (and GPR:$src2, 0xFFFF0000)),
1437               (PKHBT GPR:$src1, GPR:$src2, 0)>;
1438def : ARMV6Pat<(or (and GPR:$src1, 0xFFFF), (shl GPR:$src2, imm16_31:$shamt)),
1439               (PKHBT GPR:$src1, GPR:$src2, imm16_31:$shamt)>;
1440
1441
1442def PKHTB : AMiscA1I<0b01101000, (outs GPR:$dst),
1443                                 (ins GPR:$src1, GPR:$src2, i32imm:$shamt),
1444               IIC_iALUsi, "pkhtb", " $dst, $src1, $src2, ASR $shamt",
1445               [(set GPR:$dst, (or (and GPR:$src1, 0xFFFF0000),
1446                                   (and (sra GPR:$src2, imm16_31:$shamt),
1447                                        0xFFFF)))]>, Requires<[IsARM, HasV6]> {
1448  let Inst{6-4} = 0b101;
1449}
1450
1451// Alternate cases for PKHTB where identities eliminate some nodes.  Note that
1452// a shift amount of 0 is *not legal* here, it is PKHBT instead.
1453def : ARMV6Pat<(or (and GPR:$src1, 0xFFFF0000), (srl GPR:$src2, (i32 16))),
1454               (PKHTB GPR:$src1, GPR:$src2, 16)>;
1455def : ARMV6Pat<(or (and GPR:$src1, 0xFFFF0000),
1456                   (and (srl GPR:$src2, imm1_15:$shamt), 0xFFFF)),
1457               (PKHTB GPR:$src1, GPR:$src2, imm1_15:$shamt)>;
1458
1459//===----------------------------------------------------------------------===//
1460//  Comparison Instructions...
1461//
1462
1463defm CMP  : AI1_cmp_irs<0b1010, "cmp",
1464                        BinOpFrag<(ARMcmp node:$LHS, node:$RHS)>>;
1465defm CMN  : AI1_cmp_irs<0b1011, "cmn",
1466                        BinOpFrag<(ARMcmp node:$LHS,(ineg node:$RHS))>>;
1467
1468// Note that TST/TEQ don't set all the same flags that CMP does!
1469defm TST  : AI1_cmp_irs<0b1000, "tst",
1470                        BinOpFrag<(ARMcmpZ (and node:$LHS, node:$RHS), 0)>, 1>;
1471defm TEQ  : AI1_cmp_irs<0b1001, "teq",
1472                        BinOpFrag<(ARMcmpZ (xor node:$LHS, node:$RHS), 0)>, 1>;
1473
1474defm CMPz  : AI1_cmp_irs<0b1010, "cmp",
1475                         BinOpFrag<(ARMcmpZ node:$LHS, node:$RHS)>>;
1476defm CMNz  : AI1_cmp_irs<0b1011, "cmn",
1477                         BinOpFrag<(ARMcmpZ node:$LHS,(ineg node:$RHS))>>;
1478
1479def : ARMPat<(ARMcmp GPR:$src, so_imm_neg:$imm),
1480             (CMNri  GPR:$src, so_imm_neg:$imm)>;
1481
1482def : ARMPat<(ARMcmpZ GPR:$src, so_imm_neg:$imm),
1483             (CMNri  GPR:$src, so_imm_neg:$imm)>;
1484
1485
1486// Conditional moves
1487// FIXME: should be able to write a pattern for ARMcmov, but can't use
1488// a two-value operand where a dag node expects two operands. :( 
1489def MOVCCr : AI1<0b1101, (outs GPR:$dst), (ins GPR:$false, GPR:$true), DPFrm,
1490                IIC_iCMOVr, "mov", " $dst, $true",
1491      [/*(set GPR:$dst, (ARMcmov GPR:$false, GPR:$true, imm:$cc, CCR:$ccr))*/]>,
1492                RegConstraint<"$false = $dst">, UnaryDP {
1493  let Inst{4} = 0;
1494  let Inst{25} = 0;
1495}
1496
1497def MOVCCs : AI1<0b1101, (outs GPR:$dst),
1498                        (ins GPR:$false, so_reg:$true), DPSoRegFrm, IIC_iCMOVsr,
1499                "mov", " $dst, $true",
1500   [/*(set GPR:$dst, (ARMcmov GPR:$false, so_reg:$true, imm:$cc, CCR:$ccr))*/]>,
1501                RegConstraint<"$false = $dst">, UnaryDP {
1502  let Inst{4} = 1;
1503  let Inst{7} = 0;
1504  let Inst{25} = 0;
1505}
1506
1507def MOVCCi : AI1<0b1101, (outs GPR:$dst),
1508                        (ins GPR:$false, so_imm:$true), DPFrm, IIC_iCMOVi,
1509                "mov", " $dst, $true",
1510   [/*(set GPR:$dst, (ARMcmov GPR:$false, so_imm:$true, imm:$cc, CCR:$ccr))*/]>,
1511                RegConstraint<"$false = $dst">, UnaryDP {
1512  let Inst{25} = 1;
1513}
1514
1515
1516//===----------------------------------------------------------------------===//
1517// TLS Instructions
1518//
1519
1520// __aeabi_read_tp preserves the registers r1-r3.
1521let isCall = 1,
1522  Defs = [R0, R12, LR, CPSR] in {
1523  def TPsoft : ABXI<0b1011, (outs), (ins), IIC_Br,
1524               "bl __aeabi_read_tp",
1525               [(set R0, ARMthread_pointer)]>;
1526}
1527
1528//===----------------------------------------------------------------------===//
1529// SJLJ Exception handling intrinsics
1530//   eh_sjlj_setjmp() is an instruction sequence to store the return
1531//   address and save #0 in R0 for the non-longjmp case.
1532//   Since by its nature we may be coming from some other function to get
1533//   here, and we're using the stack frame for the containing function to
1534//   save/restore registers, we can't keep anything live in regs across
1535//   the eh_sjlj_setjmp(), else it will almost certainly have been tromped upon
1536//   when we get here from a longjmp(). We force everthing out of registers
1537//   except for our own input by listing the relevant registers in Defs. By
1538//   doing so, we also cause the prologue/epilogue code to actively preserve
1539//   all of the callee-saved resgisters, which is exactly what we want.
1540let Defs = 
1541  [ R0,  R1,  R2,  R3,  R4,  R5,  R6,  R7,  R8,  R9,  R10, R11, R12, LR,  D0,
1542    D1,  D2,  D3,  D4,  D5,  D6,  D7,  D8,  D9,  D10, D11, D12, D13, D14, D15,
1543    D16, D17, D18, D19, D20, D21, D22, D23, D24, D25, D26, D27, D28, D29, D30,
1544    D31 ] in {
1545  def Int_eh_sjlj_setjmp : XI<(outs), (ins GPR:$src),
1546                               AddrModeNone, SizeSpecial, IndexModeNone,
1547                               Pseudo, NoItinerary,
1548                               "str sp, [$src, #+8] @ eh_setjmp begin\n\t"
1549                               "add r12, pc, #8\n\t"
1550                               "str r12, [$src, #+4]\n\t"
1551                               "mov r0, #0\n\t"
1552                               "add pc, pc, #0\n\t"
1553                               "mov r0, #1 @ eh_setjmp end", "",
1554                               [(set R0, (ARMeh_sjlj_setjmp GPR:$src))]>;
1555}
1556
1557//===----------------------------------------------------------------------===//
1558// Non-Instruction Patterns
1559//
1560
1561// ConstantPool, GlobalAddress, and JumpTable
1562def : ARMPat<(ARMWrapper  tglobaladdr :$dst), (LEApcrel tglobaladdr :$dst)>;
1563def : ARMPat<(ARMWrapper  tconstpool  :$dst), (LEApcrel tconstpool  :$dst)>;
1564def : ARMPat<(ARMWrapperJT tjumptable:$dst, imm:$id),
1565             (LEApcrelJT tjumptable:$dst, imm:$id)>;
1566
1567// Large immediate handling.
1568
1569// Two piece so_imms.
1570let isReMaterializable = 1 in
1571def MOVi2pieces : AI1x2<(outs GPR:$dst), (ins so_imm2part:$src), 
1572                         Pseudo, IIC_iMOVi,
1573                         "mov", " $dst, $src",
1574                         [(set GPR:$dst, so_imm2part:$src)]>,
1575                  Requires<[IsARM, NoV6T2]>;
1576
1577def : ARMPat<(or GPR:$LHS, so_imm2part:$RHS),
1578             (ORRri (ORRri GPR:$LHS, (so_imm2part_1 imm:$RHS)),
1579                    (so_imm2part_2 imm:$RHS))>;
1580def : ARMPat<(xor GPR:$LHS, so_imm2part:$RHS),
1581             (EORri (EORri GPR:$LHS, (so_imm2part_1 imm:$RHS)),
1582                    (so_imm2part_2 imm:$RHS))>;
1583
1584// 32-bit immediate using movw + movt.
1585// This is a single pseudo instruction to make it re-materializable. Remove
1586// when we can do generalized remat.
1587let isReMaterializable = 1 in
1588def MOVi32imm : AI1x2<(outs GPR:$dst), (ins i32imm:$src), Pseudo, IIC_iMOVi,
1589                     "movw", " $dst, ${src:lo16}\n\tmovt${p} $dst, ${src:hi16}",
1590                     [(set GPR:$dst, (i32 imm:$src))]>,
1591               Requires<[IsARM, HasV6T2]>;
1592
1593// TODO: add,sub,and, 3-instr forms?
1594
1595
1596// Direct calls
1597def : ARMPat<(ARMcall texternalsym:$func), (BL texternalsym:$func)>,
1598      Requires<[IsARM, IsNotDarwin]>;
1599def : ARMPat<(ARMcall texternalsym:$func), (BLr9 texternalsym:$func)>,
1600      Requires<[IsARM, IsDarwin]>;
1601
1602// zextload i1 -> zextload i8
1603def : ARMPat<(zextloadi1 addrmode2:$addr),  (LDRB addrmode2:$addr)>;
1604
1605// extload -> zextload
1606def : ARMPat<(extloadi1  addrmode2:$addr),  (LDRB addrmode2:$addr)>;
1607def : ARMPat<(extloadi8  addrmode2:$addr),  (LDRB addrmode2:$addr)>;
1608def : ARMPat<(extloadi16 addrmode3:$addr),  (LDRH addrmode3:$addr)>;
1609
1610def : ARMPat<(extloadi8  addrmodepc:$addr), (PICLDRB addrmodepc:$addr)>;
1611def : ARMPat<(extloadi16 addrmodepc:$addr), (PICLDRH addrmodepc:$addr)>;
1612
1613// smul* and smla*
1614def : ARMV5TEPat<(mul (sra (shl GPR:$a, (i32 16)), (i32 16)),
1615                      (sra (shl GPR:$b, (i32 16)), (i32 16))),
1616                 (SMULBB GPR:$a, GPR:$b)>;
1617def : ARMV5TEPat<(mul sext_16_node:$a, sext_16_node:$b),
1618                 (SMULBB GPR:$a, GPR:$b)>;
1619def : ARMV5TEPat<(mul (sra (shl GPR:$a, (i32 16)), (i32 16)),
1620                      (sra GPR:$b, (i32 16))),
1621                 (SMULBT GPR:$a, GPR:$b)>;
1622def : ARMV5TEPat<(mul sext_16_node:$a, (sra GPR:$b, (i32 16))),
1623                 (SMULBT GPR:$a, GPR:$b)>;
1624def : ARMV5TEPat<(mul (sra GPR:$a, (i32 16)),
1625                      (sra (shl GPR:$b, (i32 16)), (i32 16))),
1626                 (SMULTB GPR:$a, GPR:$b)>;
1627def : ARMV5TEPat<(mul (sra GPR:$a, (i32 16)), sext_16_node:$b),
1628                (SMULTB GPR:$a, GPR:$b)>;
1629def : ARMV5TEPat<(sra (mul GPR:$a, (sra (shl GPR:$b, (i32 16)), (i32 16))),
1630                      (i32 16)),
1631                 (SMULWB GPR:$a, GPR:$b)>;
1632def : ARMV5TEPat<(sra (mul GPR:$a, sext_16_node:$b), (i32 16)),
1633                 (SMULWB GPR:$a, GPR:$b)>;
1634
1635def : ARMV5TEPat<(add GPR:$acc,
1636                      (mul (sra (shl GPR:$a, (i32 16)), (i32 16)),
1637                           (sra (shl GPR:$b, (i32 16)), (i32 16)))),
1638                 (SMLABB GPR:$a, GPR:$b, GPR:$acc)>;
1639def : ARMV5TEPat<(add GPR:$acc,
1640                      (mul sext_16_node:$a, sext_16_node:$b)),
1641                 (SMLABB GPR:$a, GPR:$b, GPR:$acc)>;
1642def : ARMV5TEPat<(add GPR:$acc,
1643                      (mul (sra (shl GPR:$a, (i32 16)), (i32 16)),
1644                           (sra GPR:$b, (i32 16)))),
1645                 (SMLABT GPR:$a, GPR:$b, GPR:$acc)>;
1646def : ARMV5TEPat<(add GPR:$acc,
1647                      (mul sext_16_node:$a, (sra GPR:$b, (i32 16)))),
1648                 (SMLABT GPR:$a, GPR:$b, GPR:$acc)>;
1649def : ARMV5TEPat<(add GPR:$acc,
1650                      (mul (sra GPR:$a, (i32 16)),
1651                           (sra (shl GPR:$b, (i32 16)), (i32 16)))),
1652                 (SMLATB GPR:$a, GPR:$b, GPR:$acc)>;
1653def : ARMV5TEPat<(add GPR:$acc,
1654                      (mul (sra GPR:$a, (i32 16)), sext_16_node:$b)),
1655                 (SMLATB GPR:$a, GPR:$b, GPR:$acc)>;
1656def : ARMV5TEPat<(add GPR:$acc,
1657                      (sra (mul GPR:$a, (sra (shl GPR:$b, (i32 16)), (i32 16))),
1658                           (i32 16))),
1659                 (SMLAWB GPR:$a, GPR:$b, GPR:$acc)>;
1660def : ARMV5TEPat<(add GPR:$acc,
1661                      (sra (mul GPR:$a, sext_16_node:$b), (i32 16))),
1662                 (SMLAWB GPR:$a, GPR:$b, GPR:$acc)>;
1663
1664//===----------------------------------------------------------------------===//
1665// Thumb Support
1666//
1667
1668include "ARMInstrThumb.td"
1669
1670//===----------------------------------------------------------------------===//
1671// Thumb2 Support
1672//
1673
1674include "ARMInstrThumb2.td"
1675
1676//===----------------------------------------------------------------------===//
1677// Floating Point Support
1678//
1679
1680include "ARMInstrVFP.td"
1681
1682//===----------------------------------------------------------------------===//
1683// Advanced SIMD (NEON) Support
1684//
1685
1686include "ARMInstrNEON.td"
1687