Range checking for CDP[2] immediates.
[oota-llvm.git] / lib / Target / ARM / ARMInstrThumb.td
1 //===- ARMInstrThumb.td - Thumb support for ARM ------------*- 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 Thumb instruction set.
11 //
12 //===----------------------------------------------------------------------===//
13
14 //===----------------------------------------------------------------------===//
15 // Thumb specific DAG Nodes.
16 //
17
18 def ARMtcall : SDNode<"ARMISD::tCALL", SDT_ARMcall,
19                       [SDNPHasChain, SDNPOptInGlue, SDNPOutGlue,
20                        SDNPVariadic]>;
21
22 def imm_neg_XFORM : SDNodeXForm<imm, [{
23   return CurDAG->getTargetConstant(-(int)N->getZExtValue(), MVT::i32);
24 }]>;
25 def imm_comp_XFORM : SDNodeXForm<imm, [{
26   return CurDAG->getTargetConstant(~((uint32_t)N->getZExtValue()), MVT::i32);
27 }]>;
28
29 def imm0_7_neg : PatLeaf<(i32 imm), [{
30   return (uint32_t)-N->getZExtValue() < 8;
31 }], imm_neg_XFORM>;
32
33 def imm0_255_asmoperand : AsmOperandClass { let Name = "Imm0_255"; }
34 def imm0_255 : Operand<i32>, ImmLeaf<i32, [{ return Imm >= 0 && Imm < 256; }]> {
35   let ParserMatchClass = imm0_255_asmoperand;
36 }
37 def imm0_255_comp : PatLeaf<(i32 imm), [{
38   return ~((uint32_t)N->getZExtValue()) < 256;
39 }]>;
40
41 def imm8_255 : ImmLeaf<i32, [{
42   return Imm >= 8 && Imm < 256;
43 }]>;
44 def imm8_255_neg : PatLeaf<(i32 imm), [{
45   unsigned Val = -N->getZExtValue();
46   return Val >= 8 && Val < 256;
47 }], imm_neg_XFORM>;
48
49 // Break imm's up into two pieces: an immediate + a left shift. This uses
50 // thumb_immshifted to match and thumb_immshifted_val and thumb_immshifted_shamt
51 // to get the val/shift pieces.
52 def thumb_immshifted : PatLeaf<(imm), [{
53   return ARM_AM::isThumbImmShiftedVal((unsigned)N->getZExtValue());
54 }]>;
55
56 def thumb_immshifted_val : SDNodeXForm<imm, [{
57   unsigned V = ARM_AM::getThumbImmNonShiftedVal((unsigned)N->getZExtValue());
58   return CurDAG->getTargetConstant(V, MVT::i32);
59 }]>;
60
61 def thumb_immshifted_shamt : SDNodeXForm<imm, [{
62   unsigned V = ARM_AM::getThumbImmValShift((unsigned)N->getZExtValue());
63   return CurDAG->getTargetConstant(V, MVT::i32);
64 }]>;
65
66 // ADR instruction labels.
67 def t_adrlabel : Operand<i32> {
68   let EncoderMethod = "getThumbAdrLabelOpValue";
69 }
70
71 // Scaled 4 immediate.
72 def t_imm_s4 : Operand<i32> {
73   let PrintMethod = "printThumbS4ImmOperand";
74 }
75
76 // Define Thumb specific addressing modes.
77
78 def t_brtarget : Operand<OtherVT> {
79   let EncoderMethod = "getThumbBRTargetOpValue";
80 }
81
82 def t_bcctarget : Operand<i32> {
83   let EncoderMethod = "getThumbBCCTargetOpValue";
84 }
85
86 def t_cbtarget : Operand<i32> {
87   let EncoderMethod = "getThumbCBTargetOpValue";
88 }
89
90 def t_bltarget : Operand<i32> {
91   let EncoderMethod = "getThumbBLTargetOpValue";
92 }
93
94 def t_blxtarget : Operand<i32> {
95   let EncoderMethod = "getThumbBLXTargetOpValue";
96 }
97
98 def MemModeRegThumbAsmOperand : AsmOperandClass {
99   let Name = "MemModeRegThumb";
100   let SuperClasses = [];
101 }
102
103 def MemModeImmThumbAsmOperand : AsmOperandClass {
104   let Name = "MemModeImmThumb";
105   let SuperClasses = [];
106 }
107
108 // t_addrmode_rr := reg + reg
109 //
110 def t_addrmode_rr : Operand<i32>,
111                     ComplexPattern<i32, 2, "SelectThumbAddrModeRR", []> {
112   let EncoderMethod = "getThumbAddrModeRegRegOpValue";
113   let PrintMethod = "printThumbAddrModeRROperand";
114   let MIOperandInfo = (ops tGPR:$base, tGPR:$offsreg);
115 }
116
117 // t_addrmode_rrs := reg + reg
118 //
119 def t_addrmode_rrs1 : Operand<i32>,
120                       ComplexPattern<i32, 2, "SelectThumbAddrModeRI5S1", []> {
121   let EncoderMethod = "getThumbAddrModeRegRegOpValue";
122   let PrintMethod = "printThumbAddrModeRROperand";
123   let MIOperandInfo = (ops tGPR:$base, tGPR:$offsreg);
124   let ParserMatchClass = MemModeRegThumbAsmOperand;
125 }
126 def t_addrmode_rrs2 : Operand<i32>,
127                       ComplexPattern<i32, 2, "SelectThumbAddrModeRI5S2", []> {
128   let EncoderMethod = "getThumbAddrModeRegRegOpValue";
129   let PrintMethod = "printThumbAddrModeRROperand";
130   let MIOperandInfo = (ops tGPR:$base, tGPR:$offsreg);
131   let ParserMatchClass = MemModeRegThumbAsmOperand;
132 }
133 def t_addrmode_rrs4 : Operand<i32>,
134                       ComplexPattern<i32, 2, "SelectThumbAddrModeRI5S4", []> {
135   let EncoderMethod = "getThumbAddrModeRegRegOpValue";
136   let PrintMethod = "printThumbAddrModeRROperand";
137   let MIOperandInfo = (ops tGPR:$base, tGPR:$offsreg);
138   let ParserMatchClass = MemModeRegThumbAsmOperand;
139 }
140
141 // t_addrmode_is4 := reg + imm5 * 4
142 //
143 def t_addrmode_is4 : Operand<i32>,
144                      ComplexPattern<i32, 2, "SelectThumbAddrModeImm5S4", []> {
145   let EncoderMethod = "getAddrModeISOpValue";
146   let PrintMethod = "printThumbAddrModeImm5S4Operand";
147   let MIOperandInfo = (ops tGPR:$base, i32imm:$offsimm);
148   let ParserMatchClass = MemModeImmThumbAsmOperand;
149 }
150
151 // t_addrmode_is2 := reg + imm5 * 2
152 //
153 def t_addrmode_is2 : Operand<i32>,
154                      ComplexPattern<i32, 2, "SelectThumbAddrModeImm5S2", []> {
155   let EncoderMethod = "getAddrModeISOpValue";
156   let PrintMethod = "printThumbAddrModeImm5S2Operand";
157   let MIOperandInfo = (ops tGPR:$base, i32imm:$offsimm);
158   let ParserMatchClass = MemModeImmThumbAsmOperand;
159 }
160
161 // t_addrmode_is1 := reg + imm5
162 //
163 def t_addrmode_is1 : Operand<i32>,
164                      ComplexPattern<i32, 2, "SelectThumbAddrModeImm5S1", []> {
165   let EncoderMethod = "getAddrModeISOpValue";
166   let PrintMethod = "printThumbAddrModeImm5S1Operand";
167   let MIOperandInfo = (ops tGPR:$base, i32imm:$offsimm);
168   let ParserMatchClass = MemModeImmThumbAsmOperand;
169 }
170
171 // t_addrmode_sp := sp + imm8 * 4
172 //
173 def t_addrmode_sp : Operand<i32>,
174                     ComplexPattern<i32, 2, "SelectThumbAddrModeSP", []> {
175   let EncoderMethod = "getAddrModeThumbSPOpValue";
176   let PrintMethod = "printThumbAddrModeSPOperand";
177   let MIOperandInfo = (ops GPR:$base, i32imm:$offsimm);
178   let ParserMatchClass = MemModeImmThumbAsmOperand;
179 }
180
181 // t_addrmode_pc := <label> => pc + imm8 * 4
182 //
183 def t_addrmode_pc : Operand<i32> {
184   let EncoderMethod = "getAddrModePCOpValue";
185   let ParserMatchClass = MemModeImmThumbAsmOperand;
186 }
187
188 //===----------------------------------------------------------------------===//
189 //  Miscellaneous Instructions.
190 //
191
192 // FIXME: Marking these as hasSideEffects is necessary to prevent machine DCE
193 // from removing one half of the matched pairs. That breaks PEI, which assumes
194 // these will always be in pairs, and asserts if it finds otherwise. Better way?
195 let Defs = [SP], Uses = [SP], hasSideEffects = 1 in {
196 def tADJCALLSTACKUP :
197   PseudoInst<(outs), (ins i32imm:$amt1, i32imm:$amt2), NoItinerary,
198              [(ARMcallseq_end imm:$amt1, imm:$amt2)]>,
199             Requires<[IsThumb, IsThumb1Only]>;
200
201 def tADJCALLSTACKDOWN :
202   PseudoInst<(outs), (ins i32imm:$amt), NoItinerary,
203              [(ARMcallseq_start imm:$amt)]>,
204             Requires<[IsThumb, IsThumb1Only]>;
205 }
206
207 // T1Disassembly - A simple class to make encoding some disassembly patterns
208 // easier and less verbose.
209 class T1Disassembly<bits<2> op1, bits<8> op2>
210   : T1Encoding<0b101111> {
211   let Inst{9-8} = op1;
212   let Inst{7-0} = op2;
213 }
214
215 def tNOP : T1pI<(outs), (ins), NoItinerary, "nop", "",
216                 [/* For disassembly only; pattern left blank */]>,
217            T1Disassembly<0b11, 0x00>; // A8.6.110
218
219 def tYIELD : T1pI<(outs), (ins), NoItinerary, "yield", "",
220                   [/* For disassembly only; pattern left blank */]>,
221            T1Disassembly<0b11, 0x10>; // A8.6.410
222
223 def tWFE : T1pI<(outs), (ins), NoItinerary, "wfe", "",
224                 [/* For disassembly only; pattern left blank */]>,
225            T1Disassembly<0b11, 0x20>; // A8.6.408
226
227 def tWFI : T1pI<(outs), (ins), NoItinerary, "wfi", "",
228                 [/* For disassembly only; pattern left blank */]>,
229            T1Disassembly<0b11, 0x30>; // A8.6.409
230
231 def tSEV : T1pI<(outs), (ins), NoItinerary, "sev", "",
232                 [/* For disassembly only; pattern left blank */]>,
233            T1Disassembly<0b11, 0x40>; // A8.6.157
234
235 // The i32imm operand $val can be used by a debugger to store more information
236 // about the breakpoint.
237 def tBKPT : T1I<(outs), (ins i32imm:$val), NoItinerary, "bkpt\t$val",
238                 [/* For disassembly only; pattern left blank */]>,
239            T1Disassembly<0b10, {?,?,?,?,?,?,?,?}> {
240   // A8.6.22
241   bits<8> val;
242   let Inst{7-0} = val;
243 }
244
245 def tSETENDBE : T1I<(outs), (ins), NoItinerary, "setend\tbe",
246                     [/* For disassembly only; pattern left blank */]>,
247                 T1Encoding<0b101101> {
248   // A8.6.156
249   let Inst{9-5} = 0b10010;
250   let Inst{4}   = 1;
251   let Inst{3}   = 1;            // Big-Endian
252   let Inst{2-0} = 0b000;
253 }
254
255 def tSETENDLE : T1I<(outs), (ins), NoItinerary, "setend\tle",
256                     [/* For disassembly only; pattern left blank */]>,
257                 T1Encoding<0b101101> {
258   // A8.6.156
259   let Inst{9-5} = 0b10010;
260   let Inst{4}   = 1;
261   let Inst{3}   = 0;            // Little-Endian
262   let Inst{2-0} = 0b000;
263 }
264
265 // Change Processor State is a system instruction -- for disassembly only.
266 def tCPS : T1I<(outs), (ins imod_op:$imod, iflags_op:$iflags),
267                 NoItinerary, "cps$imod $iflags",
268                 [/* For disassembly only; pattern left blank */]>,
269            T1Misc<0b0110011> {
270   // A8.6.38 & B6.1.1
271   bit imod;
272   bits<3> iflags;
273
274   let Inst{4}   = imod;
275   let Inst{3}   = 0;
276   let Inst{2-0} = iflags;
277 }
278
279 // For both thumb1 and thumb2.
280 let isNotDuplicable = 1, isCodeGenOnly = 1 in
281 def tPICADD : TIt<(outs GPR:$dst), (ins GPR:$lhs, pclabel:$cp), IIC_iALUr, "",
282                   [(set GPR:$dst, (ARMpic_add GPR:$lhs, imm:$cp))]>,
283               T1Special<{0,0,?,?}> {
284   // A8.6.6
285   bits<3> dst;
286   let Inst{6-3} = 0b1111; // Rm = pc
287   let Inst{2-0} = dst;
288 }
289
290 // PC relative add (ADR).
291 def tADDrPCi : T1I<(outs tGPR:$dst), (ins t_imm_s4:$rhs), IIC_iALUi,
292                    "add\t$dst, pc, $rhs", []>,
293                T1Encoding<{1,0,1,0,0,?}> {
294   // A6.2 & A8.6.10
295   bits<3> dst;
296   bits<8> rhs;
297   let Inst{10-8} = dst;
298   let Inst{7-0}  = rhs;
299 }
300
301 // ADD <Rd>, sp, #<imm8>
302 // This is rematerializable, which is particularly useful for taking the
303 // address of locals.
304 let isReMaterializable = 1 in
305 def tADDrSPi : T1I<(outs tGPR:$dst), (ins GPR:$sp, t_imm_s4:$rhs), IIC_iALUi,
306                    "add\t$dst, $sp, $rhs", []>,
307                T1Encoding<{1,0,1,0,1,?}> {
308   // A6.2 & A8.6.8
309   bits<3> dst;
310   bits<8> rhs;
311   let Inst{10-8} = dst;
312   let Inst{7-0}  = rhs;
313 }
314
315 // ADD sp, sp, #<imm7>
316 def tADDspi : TIt<(outs GPR:$dst), (ins GPR:$lhs, t_imm_s4:$rhs), IIC_iALUi,
317                   "add\t$dst, $rhs", []>,
318               T1Misc<{0,0,0,0,0,?,?}> {
319   // A6.2.5 & A8.6.8
320   bits<7> rhs;
321   let Inst{6-0} = rhs;
322 }
323
324 // SUB sp, sp, #<imm7>
325 // FIXME: The encoding and the ASM string don't match up.
326 def tSUBspi : TIt<(outs GPR:$dst), (ins GPR:$lhs, t_imm_s4:$rhs), IIC_iALUi,
327                   "sub\t$dst, $rhs", []>,
328               T1Misc<{0,0,0,0,1,?,?}> {
329   // A6.2.5 & A8.6.214
330   bits<7> rhs;
331   let Inst{6-0} = rhs;
332 }
333
334 // ADD <Rm>, sp
335 def tADDrSP : TIt<(outs GPR:$dst), (ins GPR:$lhs, GPR:$rhs), IIC_iALUr,
336                   "add\t$dst, $rhs", []>,
337               T1Special<{0,0,?,?}> {
338   // A8.6.9 Encoding T1
339   bits<4> dst;
340   let Inst{7}   = dst{3};
341   let Inst{6-3} = 0b1101;
342   let Inst{2-0} = dst{2-0};
343 }
344
345 // ADD sp, <Rm>
346 def tADDspr : TIt<(outs GPR:$dst), (ins GPR:$lhs, GPR:$rhs), IIC_iALUr,
347                   "add\t$dst, $rhs", []>,
348               T1Special<{0,0,?,?}> {
349   // A8.6.9 Encoding T2
350   bits<4> dst;
351   let Inst{7} = 1;
352   let Inst{6-3} = dst;
353   let Inst{2-0} = 0b101;
354 }
355
356 //===----------------------------------------------------------------------===//
357 //  Control Flow Instructions.
358 //
359
360 // Indirect branches
361 let isBranch = 1, isTerminator = 1, isBarrier = 1, isIndirectBranch = 1 in {
362   def tBX : TI<(outs), (ins GPR:$Rm, pred:$p), IIC_Br, "bx${p}\t$Rm", []>,
363             T1Special<{1,1,0,?}> {
364     // A6.2.3 & A8.6.25
365     bits<4> Rm;
366     let Inst{6-3} = Rm;
367     let Inst{2-0} = 0b000;
368   }
369 }
370
371 let isReturn = 1, isTerminator = 1, isBarrier = 1 in {
372   def tBX_RET : tPseudoExpand<(outs), (ins pred:$p), Size2Bytes, IIC_Br,
373                    [(ARMretflag)], (tBX LR, pred:$p)>;
374
375   // Alternative return instruction used by vararg functions.
376   def tBX_RET_vararg : tPseudoExpand<(outs), (ins tGPR:$Rm, pred:$p),
377                    Size2Bytes, IIC_Br, [],
378                    (tBX GPR:$Rm, pred:$p)>;
379 }
380
381 // All calls clobber the non-callee saved registers. SP is marked as a use to
382 // prevent stack-pointer assignments that appear immediately before calls from
383 // potentially appearing dead.
384 let isCall = 1,
385   // On non-Darwin platforms R9 is callee-saved.
386   Defs = [R0,  R1,  R2,  R3,  R12, LR, QQQQ0, QQQQ2, QQQQ3, CPSR, FPSCR],
387   Uses = [SP] in {
388   // Also used for Thumb2
389   def tBL  : TIx2<0b11110, 0b11, 1,
390                   (outs), (ins t_bltarget:$func, variable_ops), IIC_Br,
391                   "bl\t$func",
392                   [(ARMtcall tglobaladdr:$func)]>,
393              Requires<[IsThumb, IsNotDarwin]> {
394     bits<21> func;
395     let Inst{25-16} = func{20-11};
396     let Inst{13} = 1;
397     let Inst{11} = 1;
398     let Inst{10-0} = func{10-0};
399   }
400
401   // ARMv5T and above, also used for Thumb2
402   def tBLXi : TIx2<0b11110, 0b11, 0,
403                    (outs), (ins t_blxtarget:$func, variable_ops), IIC_Br,
404                    "blx\t$func",
405                    [(ARMcall tglobaladdr:$func)]>,
406               Requires<[IsThumb, HasV5T, IsNotDarwin]> {
407     bits<21> func;
408     let Inst{25-16} = func{20-11};
409     let Inst{13} = 1;
410     let Inst{11} = 1;
411     let Inst{10-1} = func{10-1};
412     let Inst{0} = 0; // func{0} is assumed zero
413   }
414
415   // Also used for Thumb2
416   def tBLXr : TI<(outs), (ins GPR:$func, variable_ops), IIC_Br,
417                   "blx\t$func",
418                   [(ARMtcall GPR:$func)]>,
419               Requires<[IsThumb, HasV5T, IsNotDarwin]>,
420               T1Special<{1,1,1,?}> { // A6.2.3 & A8.6.24;
421     bits<4> func;
422     let Inst{6-3} = func;
423     let Inst{2-0} = 0b000;
424   }
425
426   // ARMv4T
427   def tBX_CALL : tPseudoInst<(outs), (ins tGPR:$func, variable_ops),
428                   Size4Bytes, IIC_Br,
429                   [(ARMcall_nolink tGPR:$func)]>,
430             Requires<[IsThumb, IsThumb1Only, IsNotDarwin]>;
431 }
432
433 let isCall = 1,
434   // On Darwin R9 is call-clobbered.
435   // R7 is marked as a use to prevent frame-pointer assignments from being
436   // moved above / below calls.
437   Defs = [R0,  R1,  R2,  R3,  R9,  R12, LR, QQQQ0, QQQQ2, QQQQ3, CPSR, FPSCR],
438   Uses = [R7, SP] in {
439   // Also used for Thumb2
440   def tBLr9 : TIx2<0b11110, 0b11, 1,
441                    (outs), (ins pred:$p, t_bltarget:$func, variable_ops),
442                    IIC_Br, "bl${p}\t$func",
443                    [(ARMtcall tglobaladdr:$func)]>,
444               Requires<[IsThumb, IsDarwin]> {
445     bits<21> func;
446     let Inst{25-16} = func{20-11};
447     let Inst{13} = 1;
448     let Inst{11} = 1;
449     let Inst{10-0} = func{10-0};
450   }
451
452   // ARMv5T and above, also used for Thumb2
453   def tBLXi_r9 : TIx2<0b11110, 0b11, 0,
454                       (outs), (ins pred:$p, t_blxtarget:$func, variable_ops),
455                       IIC_Br, "blx${p}\t$func",
456                       [(ARMcall tglobaladdr:$func)]>,
457                  Requires<[IsThumb, HasV5T, IsDarwin]> {
458     bits<21> func;
459     let Inst{25-16} = func{20-11};
460     let Inst{13} = 1;
461     let Inst{11} = 1;
462     let Inst{10-1} = func{10-1};
463     let Inst{0} = 0; // func{0} is assumed zero
464   }
465
466   // Also used for Thumb2
467   def tBLXr_r9 : TI<(outs), (ins pred:$p, GPR:$func, variable_ops), IIC_Br,
468                     "blx${p}\t$func",
469                     [(ARMtcall GPR:$func)]>,
470                  Requires<[IsThumb, HasV5T, IsDarwin]>,
471                  T1Special<{1,1,1,?}> {
472     // A6.2.3 & A8.6.24
473     bits<4> func;
474     let Inst{6-3} = func;
475     let Inst{2-0} = 0b000;
476   }
477
478   // ARMv4T
479   def tBXr9_CALL : tPseudoInst<(outs), (ins tGPR:$func, variable_ops),
480                    Size4Bytes, IIC_Br,
481                    [(ARMcall_nolink tGPR:$func)]>,
482               Requires<[IsThumb, IsThumb1Only, IsDarwin]>;
483 }
484
485 let isBranch = 1, isTerminator = 1, isBarrier = 1 in {
486   let isPredicable = 1 in
487   def tB   : T1I<(outs), (ins t_brtarget:$target), IIC_Br,
488                  "b\t$target", [(br bb:$target)]>,
489              T1Encoding<{1,1,1,0,0,?}> {
490     bits<11> target;
491     let Inst{10-0} = target;
492   }
493
494   // Far jump
495   // Just a pseudo for a tBL instruction. Needed to let regalloc know about
496   // the clobber of LR.
497   let Defs = [LR] in
498   def tBfar : tPseudoExpand<(outs), (ins t_bltarget:$target),
499                           Size4Bytes, IIC_Br, [], (tBL t_bltarget:$target)>;
500
501   def tBR_JTr : tPseudoInst<(outs),
502                       (ins tGPR:$target, i32imm:$jt, i32imm:$id),
503                       SizeSpecial, IIC_Br,
504                       [(ARMbrjt tGPR:$target, tjumptable:$jt, imm:$id)]> {
505     list<Predicate> Predicates = [IsThumb, IsThumb1Only];
506   }
507 }
508
509 // FIXME: should be able to write a pattern for ARMBrcond, but can't use
510 // a two-value operand where a dag node expects two operands. :(
511 let isBranch = 1, isTerminator = 1 in
512   def tBcc : T1I<(outs), (ins t_bcctarget:$target, pred:$p), IIC_Br,
513                  "b${p}\t$target",
514                  [/*(ARMbrcond bb:$target, imm:$cc)*/]>,
515              T1BranchCond<{1,1,0,1}> {
516   bits<4> p;
517   bits<8> target;
518   let Inst{11-8} = p;
519   let Inst{7-0} = target;
520 }
521
522 // Compare and branch on zero / non-zero
523 let isBranch = 1, isTerminator = 1 in {
524   def tCBZ  : T1I<(outs), (ins tGPR:$Rn, t_cbtarget:$target), IIC_Br,
525                   "cbz\t$Rn, $target", []>,
526               T1Misc<{0,0,?,1,?,?,?}> {
527     // A8.6.27
528     bits<6> target;
529     bits<3> Rn;
530     let Inst{9}   = target{5};
531     let Inst{7-3} = target{4-0};
532     let Inst{2-0} = Rn;
533   }
534
535   def tCBNZ : T1I<(outs), (ins tGPR:$cmp, t_cbtarget:$target), IIC_Br,
536                   "cbnz\t$cmp, $target", []>,
537               T1Misc<{1,0,?,1,?,?,?}> {
538     // A8.6.27
539     bits<6> target;
540     bits<3> Rn;
541     let Inst{9}   = target{5};
542     let Inst{7-3} = target{4-0};
543     let Inst{2-0} = Rn;
544   }
545 }
546
547 // Tail calls
548 let isCall = 1, isTerminator = 1, isReturn = 1, isBarrier = 1 in {
549   // Darwin versions.
550   let Defs = [R0, R1, R2, R3, R9, R12, QQQQ0, QQQQ2, QQQQ3, PC],
551       Uses = [SP] in {
552     // tTAILJMPd: Darwin version uses a Thumb2 branch (no Thumb1 tail calls
553     // on Darwin), so it's in ARMInstrThumb2.td.
554     def tTAILJMPr : tPseudoExpand<(outs), (ins tcGPR:$dst, variable_ops),
555                      Size4Bytes, IIC_Br, [],
556                      (tBX GPR:$dst, (ops 14, zero_reg))>,
557                      Requires<[IsThumb, IsDarwin]>;
558   }
559   // Non-Darwin versions (the difference is R9).
560   let Defs = [R0, R1, R2, R3, R12, QQQQ0, QQQQ2, QQQQ3, PC],
561       Uses = [SP] in {
562     def tTAILJMPdND : tPseudoExpand<(outs), (ins t_brtarget:$dst, variable_ops),
563                    Size4Bytes, IIC_Br, [],
564                    (tB t_brtarget:$dst)>,
565                  Requires<[IsThumb, IsNotDarwin]>;
566     def tTAILJMPrND : tPseudoExpand<(outs), (ins tcGPR:$dst, variable_ops),
567                      Size4Bytes, IIC_Br, [],
568                      (tBX GPR:$dst, (ops 14, zero_reg))>,
569                      Requires<[IsThumb, IsNotDarwin]>;
570   }
571 }
572
573
574 // A8.6.218 Supervisor Call (Software Interrupt) -- for disassembly only
575 // A8.6.16 B: Encoding T1
576 // If Inst{11-8} == 0b1111 then SEE SVC
577 let isCall = 1, Uses = [SP] in
578 def tSVC : T1pI<(outs), (ins i32imm:$imm), IIC_Br,
579                 "svc", "\t$imm", []>, Encoding16 {
580   bits<8> imm;
581   let Inst{15-12} = 0b1101;
582   let Inst{11-8}  = 0b1111;
583   let Inst{7-0}   = imm;
584 }
585
586 // The assembler uses 0xDEFE for a trap instruction.
587 let isBarrier = 1, isTerminator = 1 in
588 def tTRAP : TI<(outs), (ins), IIC_Br,
589                "trap", [(trap)]>, Encoding16 {
590   let Inst = 0xdefe;
591 }
592
593 //===----------------------------------------------------------------------===//
594 //  Load Store Instructions.
595 //
596
597 // Loads: reg/reg and reg/imm5
598 let canFoldAsLoad = 1, isReMaterializable = 1 in
599 multiclass thumb_ld_rr_ri_enc<bits<3> reg_opc, bits<4> imm_opc,
600                               Operand AddrMode_r, Operand AddrMode_i,
601                               AddrMode am, InstrItinClass itin_r,
602                               InstrItinClass itin_i, string asm,
603                               PatFrag opnode> {
604   def r : // reg/reg
605     T1pILdStEncode<reg_opc,
606                    (outs tGPR:$Rt), (ins AddrMode_r:$addr),
607                    am, itin_r, asm, "\t$Rt, $addr",
608                    [(set tGPR:$Rt, (opnode AddrMode_r:$addr))]>;
609   def i : // reg/imm5
610     T1pILdStEncodeImm<imm_opc, 1 /* Load */,
611                       (outs tGPR:$Rt), (ins AddrMode_i:$addr),
612                       am, itin_i, asm, "\t$Rt, $addr",
613                       [(set tGPR:$Rt, (opnode AddrMode_i:$addr))]>;
614 }
615 // Stores: reg/reg and reg/imm5
616 multiclass thumb_st_rr_ri_enc<bits<3> reg_opc, bits<4> imm_opc,
617                               Operand AddrMode_r, Operand AddrMode_i,
618                               AddrMode am, InstrItinClass itin_r,
619                               InstrItinClass itin_i, string asm,
620                               PatFrag opnode> {
621   def r : // reg/reg
622     T1pILdStEncode<reg_opc,
623                    (outs), (ins tGPR:$Rt, AddrMode_r:$addr),
624                    am, itin_r, asm, "\t$Rt, $addr",
625                    [(opnode tGPR:$Rt, AddrMode_r:$addr)]>;
626   def i : // reg/imm5
627     T1pILdStEncodeImm<imm_opc, 0 /* Store */,
628                       (outs), (ins tGPR:$Rt, AddrMode_i:$addr),
629                       am, itin_i, asm, "\t$Rt, $addr",
630                       [(opnode tGPR:$Rt, AddrMode_i:$addr)]>;
631 }
632
633 // A8.6.57 & A8.6.60
634 defm tLDR  : thumb_ld_rr_ri_enc<0b100, 0b0110, t_addrmode_rrs4,
635                                 t_addrmode_is4, AddrModeT1_4,
636                                 IIC_iLoad_r, IIC_iLoad_i, "ldr",
637                                 UnOpFrag<(load node:$Src)>>;
638
639 // A8.6.64 & A8.6.61
640 defm tLDRB : thumb_ld_rr_ri_enc<0b110, 0b0111, t_addrmode_rrs1,
641                                 t_addrmode_is1, AddrModeT1_1,
642                                 IIC_iLoad_bh_r, IIC_iLoad_bh_i, "ldrb",
643                                 UnOpFrag<(zextloadi8 node:$Src)>>;
644
645 // A8.6.76 & A8.6.73
646 defm tLDRH : thumb_ld_rr_ri_enc<0b101, 0b1000, t_addrmode_rrs2,
647                                 t_addrmode_is2, AddrModeT1_2,
648                                 IIC_iLoad_bh_r, IIC_iLoad_bh_i, "ldrh",
649                                 UnOpFrag<(zextloadi16 node:$Src)>>;
650
651 let AddedComplexity = 10 in
652 def tLDRSB :                    // A8.6.80
653   T1pILdStEncode<0b011, (outs tGPR:$dst), (ins t_addrmode_rr:$addr),
654                  AddrModeT1_1, IIC_iLoad_bh_r,
655                  "ldrsb", "\t$dst, $addr",
656                  [(set tGPR:$dst, (sextloadi8 t_addrmode_rr:$addr))]>;
657
658 let AddedComplexity = 10 in
659 def tLDRSH :                    // A8.6.84
660   T1pILdStEncode<0b111, (outs tGPR:$dst), (ins t_addrmode_rr:$addr),
661                  AddrModeT1_2, IIC_iLoad_bh_r,
662                  "ldrsh", "\t$dst, $addr",
663                  [(set tGPR:$dst, (sextloadi16 t_addrmode_rr:$addr))]>;
664
665 let canFoldAsLoad = 1 in
666 def tLDRspi : T1pIs<(outs tGPR:$Rt), (ins t_addrmode_sp:$addr), IIC_iLoad_i,
667                     "ldr", "\t$Rt, $addr",
668                     [(set tGPR:$Rt, (load t_addrmode_sp:$addr))]>,
669               T1LdStSP<{1,?,?}> {
670   bits<3> Rt;
671   bits<8> addr;
672   let Inst{10-8} = Rt;
673   let Inst{7-0} = addr;
674 }
675
676 // Load tconstpool
677 // FIXME: Use ldr.n to work around a Darwin assembler bug.
678 let canFoldAsLoad = 1, isReMaterializable = 1 in
679 def tLDRpci : T1pIs<(outs tGPR:$Rt), (ins t_addrmode_pc:$addr), IIC_iLoad_i,
680                   "ldr", ".n\t$Rt, $addr",
681                   [(set tGPR:$Rt, (load (ARMWrapper tconstpool:$addr)))]>,
682               T1Encoding<{0,1,0,0,1,?}> {
683   // A6.2 & A8.6.59
684   bits<3> Rt;
685   bits<8> addr;
686   let Inst{10-8} = Rt;
687   let Inst{7-0}  = addr;
688 }
689
690 // FIXME: Remove this entry when the above ldr.n workaround is fixed.
691 // For disassembly use only.
692 def tLDRpciDIS : T1pIs<(outs tGPR:$Rt), (ins t_addrmode_pc:$addr), IIC_iLoad_i,
693                        "ldr", "\t$Rt, $addr",
694                        [/* disassembly only */]>,
695                  T1Encoding<{0,1,0,0,1,?}> {
696   // A6.2 & A8.6.59
697   bits<3> Rt;
698   bits<8> addr;
699   let Inst{10-8} = Rt;
700   let Inst{7-0}  = addr;
701 }
702
703 // A8.6.194 & A8.6.192
704 defm tSTR  : thumb_st_rr_ri_enc<0b000, 0b0110, t_addrmode_rrs4,
705                                 t_addrmode_is4, AddrModeT1_4,
706                                 IIC_iStore_r, IIC_iStore_i, "str",
707                                 BinOpFrag<(store node:$LHS, node:$RHS)>>;
708
709 // A8.6.197 & A8.6.195
710 defm tSTRB : thumb_st_rr_ri_enc<0b010, 0b0111, t_addrmode_rrs1,
711                                 t_addrmode_is1, AddrModeT1_1,
712                                 IIC_iStore_bh_r, IIC_iStore_bh_i, "strb",
713                                 BinOpFrag<(truncstorei8 node:$LHS, node:$RHS)>>;
714
715 // A8.6.207 & A8.6.205
716 defm tSTRH : thumb_st_rr_ri_enc<0b001, 0b1000, t_addrmode_rrs2,
717                                t_addrmode_is2, AddrModeT1_2,
718                                IIC_iStore_bh_r, IIC_iStore_bh_i, "strh",
719                                BinOpFrag<(truncstorei16 node:$LHS, node:$RHS)>>;
720
721
722 def tSTRspi : T1pIs<(outs), (ins tGPR:$Rt, t_addrmode_sp:$addr), IIC_iStore_i,
723                     "str", "\t$Rt, $addr",
724                     [(store tGPR:$Rt, t_addrmode_sp:$addr)]>,
725               T1LdStSP<{0,?,?}> {
726   bits<3> Rt;
727   bits<8> addr;
728   let Inst{10-8} = Rt;
729   let Inst{7-0} = addr;
730 }
731
732 //===----------------------------------------------------------------------===//
733 //  Load / store multiple Instructions.
734 //
735
736 multiclass thumb_ldst_mult<string asm, InstrItinClass itin,
737                            InstrItinClass itin_upd, bits<6> T1Enc,
738                            bit L_bit> {
739   def IA :
740     T1I<(outs), (ins GPR:$Rn, pred:$p, reglist:$regs, variable_ops),
741         itin, !strconcat(asm, "ia${p}\t$Rn, $regs"), []>,
742        T1Encoding<T1Enc> {
743     bits<3> Rn;
744     bits<8> regs;
745     let Inst{10-8} = Rn;
746     let Inst{7-0}  = regs;
747   }
748   def IA_UPD :
749     T1It<(outs GPR:$wb), (ins GPR:$Rn, pred:$p, reglist:$regs, variable_ops),
750          itin_upd, !strconcat(asm, "ia${p}\t$Rn!, $regs"), "$Rn = $wb", []>,
751         T1Encoding<T1Enc> {
752     bits<3> Rn;
753     bits<8> regs;
754     let Inst{10-8} = Rn;
755     let Inst{7-0}  = regs;
756   }
757 }
758
759 // These require base address to be written back or one of the loaded regs.
760 let neverHasSideEffects = 1 in {
761
762 let mayLoad = 1, hasExtraDefRegAllocReq = 1 in
763 defm tLDM : thumb_ldst_mult<"ldm", IIC_iLoad_m, IIC_iLoad_mu,
764                             {1,1,0,0,1,?}, 1>;
765
766 let mayStore = 1, hasExtraSrcRegAllocReq = 1 in
767 defm tSTM : thumb_ldst_mult<"stm", IIC_iStore_m, IIC_iStore_mu,
768                             {1,1,0,0,0,?}, 0>;
769
770 } // neverHasSideEffects
771
772 let mayLoad = 1, Uses = [SP], Defs = [SP], hasExtraDefRegAllocReq = 1 in
773 def tPOP : T1I<(outs), (ins pred:$p, reglist:$regs, variable_ops),
774                IIC_iPop,
775                "pop${p}\t$regs", []>,
776            T1Misc<{1,1,0,?,?,?,?}> {
777   bits<16> regs;
778   let Inst{8}   = regs{15};
779   let Inst{7-0} = regs{7-0};
780 }
781
782 let mayStore = 1, Uses = [SP], Defs = [SP], hasExtraSrcRegAllocReq = 1 in
783 def tPUSH : T1I<(outs), (ins pred:$p, reglist:$regs, variable_ops),
784                 IIC_iStore_m,
785                 "push${p}\t$regs", []>,
786             T1Misc<{0,1,0,?,?,?,?}> {
787   bits<16> regs;
788   let Inst{8}   = regs{14};
789   let Inst{7-0} = regs{7-0};
790 }
791
792 //===----------------------------------------------------------------------===//
793 //  Arithmetic Instructions.
794 //
795
796 // Helper classes for encoding T1pI patterns:
797 class T1pIDPEncode<bits<4> opA, dag oops, dag iops, InstrItinClass itin,
798                    string opc, string asm, list<dag> pattern>
799     : T1pI<oops, iops, itin, opc, asm, pattern>,
800       T1DataProcessing<opA> {
801   bits<3> Rm;
802   bits<3> Rn;
803   let Inst{5-3} = Rm;
804   let Inst{2-0} = Rn;
805 }
806 class T1pIMiscEncode<bits<7> opA, dag oops, dag iops, InstrItinClass itin,
807                      string opc, string asm, list<dag> pattern>
808     : T1pI<oops, iops, itin, opc, asm, pattern>,
809       T1Misc<opA> {
810   bits<3> Rm;
811   bits<3> Rd;
812   let Inst{5-3} = Rm;
813   let Inst{2-0} = Rd;
814 }
815
816 // Helper classes for encoding T1sI patterns:
817 class T1sIDPEncode<bits<4> opA, dag oops, dag iops, InstrItinClass itin,
818                    string opc, string asm, list<dag> pattern>
819     : T1sI<oops, iops, itin, opc, asm, pattern>,
820       T1DataProcessing<opA> {
821   bits<3> Rd;
822   bits<3> Rn;
823   let Inst{5-3} = Rn;
824   let Inst{2-0} = Rd;
825 }
826 class T1sIGenEncode<bits<5> opA, dag oops, dag iops, InstrItinClass itin,
827                     string opc, string asm, list<dag> pattern>
828     : T1sI<oops, iops, itin, opc, asm, pattern>,
829       T1General<opA> {
830   bits<3> Rm;
831   bits<3> Rn;
832   bits<3> Rd;
833   let Inst{8-6} = Rm;
834   let Inst{5-3} = Rn;
835   let Inst{2-0} = Rd;
836 }
837 class T1sIGenEncodeImm<bits<5> opA, dag oops, dag iops, InstrItinClass itin,
838                        string opc, string asm, list<dag> pattern>
839     : T1sI<oops, iops, itin, opc, asm, pattern>,
840       T1General<opA> {
841   bits<3> Rd;
842   bits<3> Rm;
843   let Inst{5-3} = Rm;
844   let Inst{2-0} = Rd;
845 }
846
847 // Helper classes for encoding T1sIt patterns:
848 class T1sItDPEncode<bits<4> opA, dag oops, dag iops, InstrItinClass itin,
849                     string opc, string asm, list<dag> pattern>
850     : T1sIt<oops, iops, itin, opc, asm, pattern>,
851       T1DataProcessing<opA> {
852   bits<3> Rdn;
853   bits<3> Rm;
854   let Inst{5-3} = Rm;
855   let Inst{2-0} = Rdn;
856 }
857 class T1sItGenEncodeImm<bits<5> opA, dag oops, dag iops, InstrItinClass itin,
858                         string opc, string asm, list<dag> pattern>
859     : T1sIt<oops, iops, itin, opc, asm, pattern>,
860       T1General<opA> {
861   bits<3> Rdn;
862   bits<8> imm8;
863   let Inst{10-8} = Rdn;
864   let Inst{7-0}  = imm8;
865 }
866
867 // Add with carry register
868 let isCommutable = 1, Uses = [CPSR] in
869 def tADC :                      // A8.6.2
870   T1sItDPEncode<0b0101, (outs tGPR:$Rdn), (ins tGPR:$Rn, tGPR:$Rm), IIC_iALUr,
871                 "adc", "\t$Rdn, $Rm",
872                 [(set tGPR:$Rdn, (adde tGPR:$Rn, tGPR:$Rm))]>;
873
874 // Add immediate
875 def tADDi3 :                    // A8.6.4 T1
876   T1sIGenEncodeImm<0b01110, (outs tGPR:$Rd), (ins tGPR:$Rm, i32imm:$imm3),
877                    IIC_iALUi,
878                    "add", "\t$Rd, $Rm, $imm3",
879                    [(set tGPR:$Rd, (add tGPR:$Rm, imm0_7:$imm3))]> {
880   bits<3> imm3;
881   let Inst{8-6} = imm3;
882 }
883
884 def tADDi8 :                    // A8.6.4 T2
885   T1sItGenEncodeImm<{1,1,0,?,?}, (outs tGPR:$Rdn), (ins tGPR:$Rn, i32imm:$imm8),
886                     IIC_iALUi,
887                     "add", "\t$Rdn, $imm8",
888                     [(set tGPR:$Rdn, (add tGPR:$Rn, imm8_255:$imm8))]>;
889
890 // Add register
891 let isCommutable = 1 in
892 def tADDrr :                    // A8.6.6 T1
893   T1sIGenEncode<0b01100, (outs tGPR:$Rd), (ins tGPR:$Rn, tGPR:$Rm),
894                 IIC_iALUr,
895                 "add", "\t$Rd, $Rn, $Rm",
896                 [(set tGPR:$Rd, (add tGPR:$Rn, tGPR:$Rm))]>;
897
898 let neverHasSideEffects = 1 in
899 def tADDhirr : T1pIt<(outs GPR:$Rdn), (ins GPR:$Rn, GPR:$Rm), IIC_iALUr,
900                      "add", "\t$Rdn, $Rm", []>,
901                T1Special<{0,0,?,?}> {
902   // A8.6.6 T2
903   bits<4> Rdn;
904   bits<4> Rm;
905   let Inst{7}   = Rdn{3};
906   let Inst{6-3} = Rm;
907   let Inst{2-0} = Rdn{2-0};
908 }
909
910 // AND register
911 let isCommutable = 1 in
912 def tAND :                      // A8.6.12
913   T1sItDPEncode<0b0000, (outs tGPR:$Rdn), (ins tGPR:$Rn, tGPR:$Rm),
914                 IIC_iBITr,
915                 "and", "\t$Rdn, $Rm",
916                 [(set tGPR:$Rdn, (and tGPR:$Rn, tGPR:$Rm))]>;
917
918 // ASR immediate
919 def tASRri :                    // A8.6.14
920   T1sIGenEncodeImm<{0,1,0,?,?}, (outs tGPR:$Rd), (ins tGPR:$Rm, i32imm:$imm5),
921                    IIC_iMOVsi,
922                    "asr", "\t$Rd, $Rm, $imm5",
923                    [(set tGPR:$Rd, (sra tGPR:$Rm, (i32 imm:$imm5)))]> {
924   bits<5> imm5;
925   let Inst{10-6} = imm5;
926 }
927
928 // ASR register
929 def tASRrr :                    // A8.6.15
930   T1sItDPEncode<0b0100, (outs tGPR:$Rdn), (ins tGPR:$Rn, tGPR:$Rm),
931                 IIC_iMOVsr,
932                 "asr", "\t$Rdn, $Rm",
933                 [(set tGPR:$Rdn, (sra tGPR:$Rn, tGPR:$Rm))]>;
934
935 // BIC register
936 def tBIC :                      // A8.6.20
937   T1sItDPEncode<0b1110, (outs tGPR:$Rdn), (ins tGPR:$Rn, tGPR:$Rm),
938                 IIC_iBITr,
939                 "bic", "\t$Rdn, $Rm",
940                 [(set tGPR:$Rdn, (and tGPR:$Rn, (not tGPR:$Rm)))]>;
941
942 // CMN register
943 let isCompare = 1, Defs = [CPSR] in {
944 //FIXME: Disable CMN, as CCodes are backwards from compare expectations
945 //       Compare-to-zero still works out, just not the relationals
946 //def tCMN :                     // A8.6.33
947 //  T1pIDPEncode<0b1011, (outs), (ins tGPR:$lhs, tGPR:$rhs),
948 //               IIC_iCMPr,
949 //               "cmn", "\t$lhs, $rhs",
950 //               [(ARMcmp tGPR:$lhs, (ineg tGPR:$rhs))]>;
951
952 def tCMNz :                     // A8.6.33
953   T1pIDPEncode<0b1011, (outs), (ins tGPR:$Rn, tGPR:$Rm),
954                IIC_iCMPr,
955                "cmn", "\t$Rn, $Rm",
956                [(ARMcmpZ tGPR:$Rn, (ineg tGPR:$Rm))]>;
957
958 } // isCompare = 1, Defs = [CPSR]
959
960 // CMP immediate
961 let isCompare = 1, Defs = [CPSR] in {
962 def tCMPi8 : T1pI<(outs), (ins tGPR:$Rn, i32imm:$imm8), IIC_iCMPi,
963                   "cmp", "\t$Rn, $imm8",
964                   [(ARMcmp tGPR:$Rn, imm0_255:$imm8)]>,
965              T1General<{1,0,1,?,?}> {
966   // A8.6.35
967   bits<3> Rn;
968   bits<8> imm8;
969   let Inst{10-8} = Rn;
970   let Inst{7-0}  = imm8;
971 }
972
973 // CMP register
974 def tCMPr :                     // A8.6.36 T1
975   T1pIDPEncode<0b1010, (outs), (ins tGPR:$Rn, tGPR:$Rm),
976                IIC_iCMPr,
977                "cmp", "\t$Rn, $Rm",
978                [(ARMcmp tGPR:$Rn, tGPR:$Rm)]>;
979
980 def tCMPhir : T1pI<(outs), (ins GPR:$Rn, GPR:$Rm), IIC_iCMPr,
981                    "cmp", "\t$Rn, $Rm", []>,
982               T1Special<{0,1,?,?}> {
983   // A8.6.36 T2
984   bits<4> Rm;
985   bits<4> Rn;
986   let Inst{7}   = Rn{3};
987   let Inst{6-3} = Rm;
988   let Inst{2-0} = Rn{2-0};
989 }
990 } // isCompare = 1, Defs = [CPSR]
991
992
993 // XOR register
994 let isCommutable = 1 in
995 def tEOR :                      // A8.6.45
996   T1sItDPEncode<0b0001, (outs tGPR:$Rdn), (ins tGPR:$Rn, tGPR:$Rm),
997                 IIC_iBITr,
998                 "eor", "\t$Rdn, $Rm",
999                 [(set tGPR:$Rdn, (xor tGPR:$Rn, tGPR:$Rm))]>;
1000
1001 // LSL immediate
1002 def tLSLri :                    // A8.6.88
1003   T1sIGenEncodeImm<{0,0,0,?,?}, (outs tGPR:$Rd), (ins tGPR:$Rm, i32imm:$imm5),
1004                    IIC_iMOVsi,
1005                    "lsl", "\t$Rd, $Rm, $imm5",
1006                    [(set tGPR:$Rd, (shl tGPR:$Rm, (i32 imm:$imm5)))]> {
1007   bits<5> imm5;
1008   let Inst{10-6} = imm5;
1009 }
1010
1011 // LSL register
1012 def tLSLrr :                    // A8.6.89
1013   T1sItDPEncode<0b0010, (outs tGPR:$Rdn), (ins tGPR:$Rn, tGPR:$Rm),
1014                 IIC_iMOVsr,
1015                 "lsl", "\t$Rdn, $Rm",
1016                 [(set tGPR:$Rdn, (shl tGPR:$Rn, tGPR:$Rm))]>;
1017
1018 // LSR immediate
1019 def tLSRri :                    // A8.6.90
1020   T1sIGenEncodeImm<{0,0,1,?,?}, (outs tGPR:$Rd), (ins tGPR:$Rm, i32imm:$imm5),
1021                    IIC_iMOVsi,
1022                    "lsr", "\t$Rd, $Rm, $imm5",
1023                    [(set tGPR:$Rd, (srl tGPR:$Rm, (i32 imm:$imm5)))]> {
1024   bits<5> imm5;
1025   let Inst{10-6} = imm5;
1026 }
1027
1028 // LSR register
1029 def tLSRrr :                    // A8.6.91
1030   T1sItDPEncode<0b0011, (outs tGPR:$Rdn), (ins tGPR:$Rn, tGPR:$Rm),
1031                 IIC_iMOVsr,
1032                 "lsr", "\t$Rdn, $Rm",
1033                 [(set tGPR:$Rdn, (srl tGPR:$Rn, tGPR:$Rm))]>;
1034
1035 // Move register
1036 let isMoveImm = 1 in
1037 def tMOVi8 : T1sI<(outs tGPR:$Rd), (ins imm0_255:$imm8), IIC_iMOVi,
1038                   "mov", "\t$Rd, $imm8",
1039                   [(set tGPR:$Rd, imm0_255:$imm8)]>,
1040              T1General<{1,0,0,?,?}> {
1041   // A8.6.96
1042   bits<3> Rd;
1043   bits<8> imm8;
1044   let Inst{10-8} = Rd;
1045   let Inst{7-0}  = imm8;
1046 }
1047
1048 // A7-73: MOV(2) - mov setting flag.
1049
1050 let neverHasSideEffects = 1 in {
1051 def tMOVr : Thumb1pI<(outs GPR:$Rd), (ins GPR:$Rm), AddrModeNone,
1052                       Size2Bytes, IIC_iMOVr,
1053                       "mov", "\t$Rd, $Rm", "", []>,
1054                   T1Special<{1,0,?,?}> {
1055   // A8.6.97
1056   bits<4> Rd;
1057   bits<4> Rm;
1058   let Inst{7}   = Rd{3};
1059   let Inst{6-3} = Rm;
1060   let Inst{2-0} = Rd{2-0};
1061 }
1062 let Defs = [CPSR] in
1063 def tMOVSr      : T1I<(outs tGPR:$Rd), (ins tGPR:$Rm), IIC_iMOVr,
1064                       "movs\t$Rd, $Rm", []>, Encoding16 {
1065   // A8.6.97
1066   bits<3> Rd;
1067   bits<3> Rm;
1068   let Inst{15-6} = 0b0000000000;
1069   let Inst{5-3}  = Rm;
1070   let Inst{2-0}  = Rd;
1071 }
1072 } // neverHasSideEffects
1073
1074 // Multiply register
1075 let isCommutable = 1 in
1076 def tMUL :                      // A8.6.105 T1
1077   T1sItDPEncode<0b1101, (outs tGPR:$Rdn), (ins tGPR:$Rn, tGPR:$Rm),
1078                 IIC_iMUL32,
1079                 "mul", "\t$Rdn, $Rm, $Rdn",
1080                 [(set tGPR:$Rdn, (mul tGPR:$Rn, tGPR:$Rm))]>;
1081
1082 // Move inverse register
1083 def tMVN :                      // A8.6.107
1084   T1sIDPEncode<0b1111, (outs tGPR:$Rd), (ins tGPR:$Rn), IIC_iMVNr,
1085                "mvn", "\t$Rd, $Rn",
1086                [(set tGPR:$Rd, (not tGPR:$Rn))]>;
1087
1088 // Bitwise or register
1089 let isCommutable = 1 in
1090 def tORR :                      // A8.6.114
1091   T1sItDPEncode<0b1100, (outs tGPR:$Rdn), (ins tGPR:$Rn, tGPR:$Rm),
1092                 IIC_iBITr,
1093                 "orr", "\t$Rdn, $Rm",
1094                 [(set tGPR:$Rdn, (or tGPR:$Rn, tGPR:$Rm))]>;
1095
1096 // Swaps
1097 def tREV :                      // A8.6.134
1098   T1pIMiscEncode<{1,0,1,0,0,0,?}, (outs tGPR:$Rd), (ins tGPR:$Rm),
1099                  IIC_iUNAr,
1100                  "rev", "\t$Rd, $Rm",
1101                  [(set tGPR:$Rd, (bswap tGPR:$Rm))]>,
1102                  Requires<[IsThumb, IsThumb1Only, HasV6]>;
1103
1104 def tREV16 :                    // A8.6.135
1105   T1pIMiscEncode<{1,0,1,0,0,1,?}, (outs tGPR:$Rd), (ins tGPR:$Rm),
1106                  IIC_iUNAr,
1107                  "rev16", "\t$Rd, $Rm",
1108              [(set tGPR:$Rd, (rotr (bswap tGPR:$Rm), (i32 16)))]>,
1109                 Requires<[IsThumb, IsThumb1Only, HasV6]>;
1110
1111 def tREVSH :                    // A8.6.136
1112   T1pIMiscEncode<{1,0,1,0,1,1,?}, (outs tGPR:$Rd), (ins tGPR:$Rm),
1113                  IIC_iUNAr,
1114                  "revsh", "\t$Rd, $Rm",
1115                  [(set tGPR:$Rd, (sra (bswap tGPR:$Rm), (i32 16)))]>,
1116                  Requires<[IsThumb, IsThumb1Only, HasV6]>;
1117
1118 // Rotate right register
1119 def tROR :                      // A8.6.139
1120   T1sItDPEncode<0b0111, (outs tGPR:$Rdn), (ins tGPR:$Rn, tGPR:$Rm),
1121                 IIC_iMOVsr,
1122                 "ror", "\t$Rdn, $Rm",
1123                 [(set tGPR:$Rdn, (rotr tGPR:$Rn, tGPR:$Rm))]>;
1124
1125 // Negate register
1126 def tRSB :                      // A8.6.141
1127   T1sIDPEncode<0b1001, (outs tGPR:$Rd), (ins tGPR:$Rn),
1128                IIC_iALUi,
1129                "rsb", "\t$Rd, $Rn, #0",
1130                [(set tGPR:$Rd, (ineg tGPR:$Rn))]>;
1131
1132 // Subtract with carry register
1133 let Uses = [CPSR] in
1134 def tSBC :                      // A8.6.151
1135   T1sItDPEncode<0b0110, (outs tGPR:$Rdn), (ins tGPR:$Rn, tGPR:$Rm),
1136                 IIC_iALUr,
1137                 "sbc", "\t$Rdn, $Rm",
1138                 [(set tGPR:$Rdn, (sube tGPR:$Rn, tGPR:$Rm))]>;
1139
1140 // Subtract immediate
1141 def tSUBi3 :                    // A8.6.210 T1
1142   T1sIGenEncodeImm<0b01111, (outs tGPR:$Rd), (ins tGPR:$Rm, i32imm:$imm3),
1143                    IIC_iALUi,
1144                    "sub", "\t$Rd, $Rm, $imm3",
1145                    [(set tGPR:$Rd, (add tGPR:$Rm, imm0_7_neg:$imm3))]> {
1146   bits<3> imm3;
1147   let Inst{8-6} = imm3;
1148 }
1149
1150 def tSUBi8 :                    // A8.6.210 T2
1151   T1sItGenEncodeImm<{1,1,1,?,?}, (outs tGPR:$Rdn), (ins tGPR:$Rn, i32imm:$imm8),
1152                     IIC_iALUi,
1153                     "sub", "\t$Rdn, $imm8",
1154                     [(set tGPR:$Rdn, (add tGPR:$Rn, imm8_255_neg:$imm8))]>;
1155
1156 // Subtract register
1157 def tSUBrr :                    // A8.6.212
1158   T1sIGenEncode<0b01101, (outs tGPR:$Rd), (ins tGPR:$Rn, tGPR:$Rm),
1159                 IIC_iALUr,
1160                 "sub", "\t$Rd, $Rn, $Rm",
1161                 [(set tGPR:$Rd, (sub tGPR:$Rn, tGPR:$Rm))]>;
1162
1163 // TODO: A7-96: STMIA - store multiple.
1164
1165 // Sign-extend byte
1166 def tSXTB :                     // A8.6.222
1167   T1pIMiscEncode<{0,0,1,0,0,1,?}, (outs tGPR:$Rd), (ins tGPR:$Rm),
1168                  IIC_iUNAr,
1169                  "sxtb", "\t$Rd, $Rm",
1170                  [(set tGPR:$Rd, (sext_inreg tGPR:$Rm, i8))]>,
1171                  Requires<[IsThumb, IsThumb1Only, HasV6]>;
1172
1173 // Sign-extend short
1174 def tSXTH :                     // A8.6.224
1175   T1pIMiscEncode<{0,0,1,0,0,0,?}, (outs tGPR:$Rd), (ins tGPR:$Rm),
1176                  IIC_iUNAr,
1177                  "sxth", "\t$Rd, $Rm",
1178                  [(set tGPR:$Rd, (sext_inreg tGPR:$Rm, i16))]>,
1179                  Requires<[IsThumb, IsThumb1Only, HasV6]>;
1180
1181 // Test
1182 let isCompare = 1, isCommutable = 1, Defs = [CPSR] in
1183 def tTST :                      // A8.6.230
1184   T1pIDPEncode<0b1000, (outs), (ins tGPR:$Rn, tGPR:$Rm), IIC_iTSTr,
1185                "tst", "\t$Rn, $Rm",
1186                [(ARMcmpZ (and_su tGPR:$Rn, tGPR:$Rm), 0)]>;
1187
1188 // Zero-extend byte
1189 def tUXTB :                     // A8.6.262
1190   T1pIMiscEncode<{0,0,1,0,1,1,?}, (outs tGPR:$Rd), (ins tGPR:$Rm),
1191                  IIC_iUNAr,
1192                  "uxtb", "\t$Rd, $Rm",
1193                  [(set tGPR:$Rd, (and tGPR:$Rm, 0xFF))]>,
1194                  Requires<[IsThumb, IsThumb1Only, HasV6]>;
1195
1196 // Zero-extend short
1197 def tUXTH :                     // A8.6.264
1198   T1pIMiscEncode<{0,0,1,0,1,0,?}, (outs tGPR:$Rd), (ins tGPR:$Rm),
1199                  IIC_iUNAr,
1200                  "uxth", "\t$Rd, $Rm",
1201                  [(set tGPR:$Rd, (and tGPR:$Rm, 0xFFFF))]>,
1202                  Requires<[IsThumb, IsThumb1Only, HasV6]>;
1203
1204 // Conditional move tMOVCCr - Used to implement the Thumb SELECT_CC operation.
1205 // Expanded after instruction selection into a branch sequence.
1206 let usesCustomInserter = 1 in  // Expanded after instruction selection.
1207   def tMOVCCr_pseudo :
1208   PseudoInst<(outs tGPR:$dst), (ins tGPR:$false, tGPR:$true, pred:$cc),
1209               NoItinerary,
1210              [/*(set tGPR:$dst, (ARMcmov tGPR:$false, tGPR:$true, imm:$cc))*/]>;
1211
1212 // tLEApcrel - Load a pc-relative address into a register without offending the
1213 // assembler.
1214
1215 def tADR : T1I<(outs tGPR:$Rd), (ins t_adrlabel:$addr, pred:$p),
1216                IIC_iALUi, "adr{$p}\t$Rd, #$addr", []>,
1217                T1Encoding<{1,0,1,0,0,?}> {
1218   bits<3> Rd;
1219   bits<8> addr;
1220   let Inst{10-8} = Rd;
1221   let Inst{7-0} = addr;
1222 }
1223
1224 let neverHasSideEffects = 1, isReMaterializable = 1 in
1225 def tLEApcrel   : tPseudoInst<(outs tGPR:$Rd), (ins i32imm:$label, pred:$p),
1226                               Size2Bytes, IIC_iALUi, []>;
1227
1228 def tLEApcrelJT : tPseudoInst<(outs tGPR:$Rd),
1229                               (ins i32imm:$label, nohash_imm:$id, pred:$p),
1230                               Size2Bytes, IIC_iALUi, []>;
1231
1232 //===----------------------------------------------------------------------===//
1233 // TLS Instructions
1234 //
1235
1236 // __aeabi_read_tp preserves the registers r1-r3.
1237 // This is a pseudo inst so that we can get the encoding right,
1238 // complete with fixup for the aeabi_read_tp function.
1239 let isCall = 1, Defs = [R0, R12, LR, CPSR], Uses = [SP] in
1240 def tTPsoft : tPseudoInst<(outs), (ins), Size4Bytes, IIC_Br,
1241                           [(set R0, ARMthread_pointer)]>;
1242
1243 //===----------------------------------------------------------------------===//
1244 // SJLJ Exception handling intrinsics
1245 //
1246
1247 // eh_sjlj_setjmp() is an instruction sequence to store the return address and
1248 // save #0 in R0 for the non-longjmp case.  Since by its nature we may be coming
1249 // from some other function to get here, and we're using the stack frame for the
1250 // containing function to save/restore registers, we can't keep anything live in
1251 // regs across the eh_sjlj_setjmp(), else it will almost certainly have been
1252 // tromped upon when we get here from a longjmp(). We force everything out of
1253 // registers except for our own input by listing the relevant registers in
1254 // Defs. By doing so, we also cause the prologue/epilogue code to actively
1255 // preserve all of the callee-saved resgisters, which is exactly what we want.
1256 // $val is a scratch register for our use.
1257 let Defs = [ R0,  R1,  R2,  R3,  R4,  R5,  R6,  R7, R12, CPSR ],
1258     hasSideEffects = 1, isBarrier = 1, isCodeGenOnly = 1 in
1259 def tInt_eh_sjlj_setjmp : ThumbXI<(outs),(ins tGPR:$src, tGPR:$val),
1260                                   AddrModeNone, SizeSpecial, NoItinerary, "","",
1261                           [(set R0, (ARMeh_sjlj_setjmp tGPR:$src, tGPR:$val))]>;
1262
1263 // FIXME: Non-Darwin version(s)
1264 let isBarrier = 1, hasSideEffects = 1, isTerminator = 1, isCodeGenOnly = 1,
1265     Defs = [ R7, LR, SP ] in
1266 def tInt_eh_sjlj_longjmp : XI<(outs), (ins GPR:$src, GPR:$scratch),
1267                               AddrModeNone, SizeSpecial, IndexModeNone,
1268                               Pseudo, NoItinerary, "", "",
1269                               [(ARMeh_sjlj_longjmp GPR:$src, GPR:$scratch)]>,
1270                              Requires<[IsThumb, IsDarwin]>;
1271
1272 //===----------------------------------------------------------------------===//
1273 // Non-Instruction Patterns
1274 //
1275
1276 // Comparisons
1277 def : T1Pat<(ARMcmpZ tGPR:$Rn, imm0_255:$imm8),
1278             (tCMPi8  tGPR:$Rn, imm0_255:$imm8)>;
1279 def : T1Pat<(ARMcmpZ tGPR:$Rn, tGPR:$Rm),
1280             (tCMPr   tGPR:$Rn, tGPR:$Rm)>;
1281
1282 // Add with carry
1283 def : T1Pat<(addc   tGPR:$lhs, imm0_7:$rhs),
1284             (tADDi3 tGPR:$lhs, imm0_7:$rhs)>;
1285 def : T1Pat<(addc   tGPR:$lhs, imm8_255:$rhs),
1286             (tADDi8 tGPR:$lhs, imm8_255:$rhs)>;
1287 def : T1Pat<(addc   tGPR:$lhs, tGPR:$rhs),
1288             (tADDrr tGPR:$lhs, tGPR:$rhs)>;
1289
1290 // Subtract with carry
1291 def : T1Pat<(addc   tGPR:$lhs, imm0_7_neg:$rhs),
1292             (tSUBi3 tGPR:$lhs, imm0_7_neg:$rhs)>;
1293 def : T1Pat<(addc   tGPR:$lhs, imm8_255_neg:$rhs),
1294             (tSUBi8 tGPR:$lhs, imm8_255_neg:$rhs)>;
1295 def : T1Pat<(subc   tGPR:$lhs, tGPR:$rhs),
1296             (tSUBrr tGPR:$lhs, tGPR:$rhs)>;
1297
1298 // ConstantPool, GlobalAddress
1299 def : T1Pat<(ARMWrapper  tglobaladdr :$dst), (tLEApcrel tglobaladdr :$dst)>;
1300 def : T1Pat<(ARMWrapper  tconstpool  :$dst), (tLEApcrel tconstpool  :$dst)>;
1301
1302 // JumpTable
1303 def : T1Pat<(ARMWrapperJT tjumptable:$dst, imm:$id),
1304             (tLEApcrelJT tjumptable:$dst, imm:$id)>;
1305
1306 // Direct calls
1307 def : T1Pat<(ARMtcall texternalsym:$func), (tBL texternalsym:$func)>,
1308       Requires<[IsThumb, IsNotDarwin]>;
1309 def : T1Pat<(ARMtcall texternalsym:$func), (tBLr9 texternalsym:$func)>,
1310       Requires<[IsThumb, IsDarwin]>;
1311
1312 def : Tv5Pat<(ARMcall texternalsym:$func), (tBLXi texternalsym:$func)>,
1313       Requires<[IsThumb, HasV5T, IsNotDarwin]>;
1314 def : Tv5Pat<(ARMcall texternalsym:$func), (tBLXi_r9 texternalsym:$func)>,
1315       Requires<[IsThumb, HasV5T, IsDarwin]>;
1316
1317 // Indirect calls to ARM routines
1318 def : Tv5Pat<(ARMcall GPR:$dst), (tBLXr GPR:$dst)>,
1319       Requires<[IsThumb, HasV5T, IsNotDarwin]>;
1320 def : Tv5Pat<(ARMcall GPR:$dst), (tBLXr_r9 GPR:$dst)>,
1321       Requires<[IsThumb, HasV5T, IsDarwin]>;
1322
1323 // zextload i1 -> zextload i8
1324 def : T1Pat<(zextloadi1 t_addrmode_rrs1:$addr),
1325             (tLDRBr t_addrmode_rrs1:$addr)>;
1326 def : T1Pat<(zextloadi1 t_addrmode_is1:$addr),
1327             (tLDRBi t_addrmode_is1:$addr)>;
1328
1329 // extload -> zextload
1330 def : T1Pat<(extloadi1  t_addrmode_rrs1:$addr), (tLDRBr t_addrmode_rrs1:$addr)>;
1331 def : T1Pat<(extloadi1  t_addrmode_is1:$addr),  (tLDRBi t_addrmode_is1:$addr)>;
1332 def : T1Pat<(extloadi8  t_addrmode_rrs1:$addr), (tLDRBr t_addrmode_rrs1:$addr)>;
1333 def : T1Pat<(extloadi8  t_addrmode_is1:$addr),  (tLDRBi t_addrmode_is1:$addr)>;
1334 def : T1Pat<(extloadi16 t_addrmode_rrs2:$addr), (tLDRHr t_addrmode_rrs2:$addr)>;
1335 def : T1Pat<(extloadi16 t_addrmode_is2:$addr),  (tLDRHi t_addrmode_is2:$addr)>;
1336
1337 // If it's impossible to use [r,r] address mode for sextload, select to
1338 // ldr{b|h} + sxt{b|h} instead.
1339 def : T1Pat<(sextloadi8 t_addrmode_is1:$addr),
1340             (tSXTB (tLDRBi t_addrmode_is1:$addr))>,
1341       Requires<[IsThumb, IsThumb1Only, HasV6]>;
1342 def : T1Pat<(sextloadi8 t_addrmode_rrs1:$addr),
1343             (tSXTB (tLDRBr t_addrmode_rrs1:$addr))>,
1344       Requires<[IsThumb, IsThumb1Only, HasV6]>;
1345 def : T1Pat<(sextloadi16 t_addrmode_is2:$addr),
1346             (tSXTH (tLDRHi t_addrmode_is2:$addr))>,
1347       Requires<[IsThumb, IsThumb1Only, HasV6]>;
1348 def : T1Pat<(sextloadi16 t_addrmode_rrs2:$addr),
1349             (tSXTH (tLDRHr t_addrmode_rrs2:$addr))>,
1350       Requires<[IsThumb, IsThumb1Only, HasV6]>;
1351
1352 def : T1Pat<(sextloadi8 t_addrmode_rrs1:$addr),
1353             (tASRri (tLSLri (tLDRBr t_addrmode_rrs1:$addr), 24), 24)>;
1354 def : T1Pat<(sextloadi8 t_addrmode_is1:$addr),
1355             (tASRri (tLSLri (tLDRBi t_addrmode_is1:$addr), 24), 24)>;
1356 def : T1Pat<(sextloadi16 t_addrmode_rrs2:$addr),
1357             (tASRri (tLSLri (tLDRHr t_addrmode_rrs2:$addr), 16), 16)>;
1358 def : T1Pat<(sextloadi16 t_addrmode_is2:$addr),
1359             (tASRri (tLSLri (tLDRHi t_addrmode_is2:$addr), 16), 16)>;
1360
1361 // Large immediate handling.
1362
1363 // Two piece imms.
1364 def : T1Pat<(i32 thumb_immshifted:$src),
1365             (tLSLri (tMOVi8 (thumb_immshifted_val imm:$src)),
1366                     (thumb_immshifted_shamt imm:$src))>;
1367
1368 def : T1Pat<(i32 imm0_255_comp:$src),
1369             (tMVN (tMOVi8 (imm_comp_XFORM imm:$src)))>;
1370
1371 // Pseudo instruction that combines ldr from constpool and add pc. This should
1372 // be expanded into two instructions late to allow if-conversion and
1373 // scheduling.
1374 let isReMaterializable = 1 in
1375 def tLDRpci_pic : PseudoInst<(outs GPR:$dst), (ins i32imm:$addr, pclabel:$cp),
1376                              NoItinerary,
1377                [(set GPR:$dst, (ARMpic_add (load (ARMWrapper tconstpool:$addr)),
1378                                            imm:$cp))]>,
1379                Requires<[IsThumb, IsThumb1Only]>;
1380
1381 // Pseudo-instruction for merged POP and return.
1382 // FIXME: remove when we have a way to marking a MI with these properties.
1383 let isReturn = 1, isTerminator = 1, isBarrier = 1, mayLoad = 1,
1384     hasExtraDefRegAllocReq = 1 in
1385 def tPOP_RET : tPseudoExpand<(outs), (ins pred:$p, reglist:$regs, variable_ops),
1386                            Size2Bytes, IIC_iPop_Br, [],
1387                            (tPOP pred:$p, reglist:$regs)>;
1388
1389 // Indirect branch using "mov pc, $Rm"
1390 let isBranch = 1, isTerminator = 1, isBarrier = 1, isIndirectBranch = 1 in {
1391   def tBRIND : tPseudoExpand<(outs), (ins GPR:$Rm, pred:$p),
1392                   Size2Bytes, IIC_Br, [(brind GPR:$Rm)],
1393                   (tMOVr PC, GPR:$Rm, pred:$p)>;
1394 }