Anton Korobeynikov | d4022c3 | 2009-05-29 23:41:08 +0000 | [diff] [blame] | 1 | //===- ARMInstrThumb2.td - Thumb2 support for ARM -------------------------===// |
| 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 Thumb2 instruction set. |
| 11 | // |
| 12 | //===----------------------------------------------------------------------===// |
Anton Korobeynikov | 5223711 | 2009-06-17 18:13:58 +0000 | [diff] [blame] | 13 | |
| 14 | // Shifted operands. No register controlled shifts for Thumb2. |
| 15 | // Note: We do not support rrx shifted operands yet. |
| 16 | def t2_so_reg : Operand<i32>, // reg imm |
Evan Cheng | e499f97 | 2009-06-23 18:14:38 +0000 | [diff] [blame] | 17 | ComplexPattern<i32, 2, "SelectThumb2ShifterOperandReg", |
Anton Korobeynikov | 5223711 | 2009-06-17 18:13:58 +0000 | [diff] [blame] | 18 | [shl,srl,sra,rotr]> { |
| 19 | let PrintMethod = "printSOOperand"; |
| 20 | let MIOperandInfo = (ops GPR, i32imm); |
| 21 | } |
| 22 | |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 23 | // t2_so_imm_XFORM - Return a t2_so_imm value packed into the format |
| 24 | // described for t2_so_imm def below. |
| 25 | def t2_so_imm_XFORM : SDNodeXForm<imm, [{ |
| 26 | return CurDAG->getTargetConstant( |
| 27 | ARM_AM::getT2SOImmVal(N->getZExtValue()), MVT::i32); |
Anton Korobeynikov | 5223711 | 2009-06-17 18:13:58 +0000 | [diff] [blame] | 28 | }]>; |
| 29 | |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 30 | // t2_so_imm_not_XFORM - Return the complement of a t2_so_imm value |
| 31 | def t2_so_imm_not_XFORM : SDNodeXForm<imm, [{ |
| 32 | return CurDAG->getTargetConstant( |
| 33 | ARM_AM::getT2SOImmVal(~((uint32_t)N->getZExtValue())), MVT::i32); |
Anton Korobeynikov | 5223711 | 2009-06-17 18:13:58 +0000 | [diff] [blame] | 34 | }]>; |
| 35 | |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 36 | // t2_so_imm_neg_XFORM - Return the negation of a t2_so_imm value |
| 37 | def t2_so_imm_neg_XFORM : SDNodeXForm<imm, [{ |
| 38 | return CurDAG->getTargetConstant( |
| 39 | ARM_AM::getT2SOImmVal(-((int)N->getZExtValue())), MVT::i32); |
| 40 | }]>; |
Anton Korobeynikov | 5223711 | 2009-06-17 18:13:58 +0000 | [diff] [blame] | 41 | |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 42 | // t2_so_imm - Match a 32-bit immediate operand, which is an |
| 43 | // 8-bit immediate rotated by an arbitrary number of bits, or an 8-bit |
| 44 | // immediate splatted into multiple bytes of the word. t2_so_imm values are |
| 45 | // represented in the imm field in the same 12-bit form that they are encoded |
| 46 | // into t2_so_imm instructions: the 8-bit immediate is the least significant bits |
| 47 | // [bits 0-7], the 4-bit shift/splat amount is the next 4 bits [bits 8-11]. |
| 48 | def t2_so_imm : Operand<i32>, |
| 49 | PatLeaf<(imm), [{ |
| 50 | return ARM_AM::getT2SOImmVal((uint32_t)N->getZExtValue()) != -1; |
| 51 | }], t2_so_imm_XFORM> { |
| 52 | let PrintMethod = "printT2SOImmOperand"; |
| 53 | } |
Anton Korobeynikov | 5223711 | 2009-06-17 18:13:58 +0000 | [diff] [blame] | 54 | |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 55 | // t2_so_imm_not - Match an immediate that is a complement |
| 56 | // of a t2_so_imm. |
| 57 | def t2_so_imm_not : Operand<i32>, |
| 58 | PatLeaf<(imm), [{ |
| 59 | return ARM_AM::getT2SOImmVal(~((uint32_t)N->getZExtValue())) != -1; |
| 60 | }], t2_so_imm_not_XFORM> { |
| 61 | let PrintMethod = "printT2SOImmOperand"; |
| 62 | } |
| 63 | |
| 64 | // t2_so_imm_neg - Match an immediate that is a negation of a t2_so_imm. |
| 65 | def t2_so_imm_neg : Operand<i32>, |
| 66 | PatLeaf<(imm), [{ |
| 67 | return ARM_AM::getT2SOImmVal(-((int)N->getZExtValue())) != -1; |
| 68 | }], t2_so_imm_neg_XFORM> { |
| 69 | let PrintMethod = "printT2SOImmOperand"; |
| 70 | } |
| 71 | |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 72 | /// imm1_31 predicate - True if the 32-bit immediate is in the range [1,31]. |
| 73 | def imm1_31 : PatLeaf<(i32 imm), [{ |
| 74 | return (int32_t)N->getZExtValue() >= 1 && (int32_t)N->getZExtValue() < 32; |
| 75 | }]>; |
| 76 | |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 77 | /// imm0_4095 predicate - True if the 32-bit immediate is in the range [0.4095]. |
| 78 | def imm0_4095 : PatLeaf<(i32 imm), [{ |
| 79 | return (uint32_t)N->getZExtValue() < 4096; |
| 80 | }]>; |
Anton Korobeynikov | 5223711 | 2009-06-17 18:13:58 +0000 | [diff] [blame] | 81 | |
| 82 | def imm0_4095_neg : PatLeaf<(i32 imm), [{ |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 83 | return (uint32_t)(-N->getZExtValue()) < 4096; |
Anton Korobeynikov | 5223711 | 2009-06-17 18:13:58 +0000 | [diff] [blame] | 84 | }], imm_neg_XFORM>; |
| 85 | |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 86 | /// imm0_65535 predicate - True if the 32-bit immediate is in the range |
| 87 | /// [0.65535]. |
| 88 | def imm0_65535 : PatLeaf<(i32 imm), [{ |
| 89 | return (uint32_t)N->getZExtValue() < 65536; |
Anton Korobeynikov | 5223711 | 2009-06-17 18:13:58 +0000 | [diff] [blame] | 90 | }]>; |
| 91 | |
| 92 | |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 93 | /// bf_inv_mask_imm predicate - An AND mask to clear an arbitrary width bitfield |
| 94 | /// e.g., 0xf000ffff |
| 95 | def bf_inv_mask_imm : Operand<i32>, |
| 96 | PatLeaf<(imm), [{ |
| 97 | uint32_t v = (uint32_t)N->getZExtValue(); |
| 98 | if (v == 0xffffffff) |
| 99 | return 0; |
| 100 | // naive checker. should do better, but simple is best for now since it's |
| 101 | // more likely to be correct. |
| 102 | while (v & 1) v >>= 1; // shift off the leading 1's |
| 103 | if (v) |
| 104 | { |
| 105 | while (!(v & 1)) v >>=1; // shift off the mask |
| 106 | while (v & 1) v >>= 1; // shift off the trailing 1's |
| 107 | } |
| 108 | // if this is a mask for clearing a bitfield, what's left should be zero. |
| 109 | return (v == 0); |
| 110 | }] > { |
| 111 | let PrintMethod = "printBitfieldInvMaskImmOperand"; |
| 112 | } |
| 113 | |
| 114 | /// Split a 32-bit immediate into two 16 bit parts. |
| 115 | def t2_lo16 : SDNodeXForm<imm, [{ |
| 116 | return CurDAG->getTargetConstant((uint32_t)N->getZExtValue() & 0xffff, |
| 117 | MVT::i32); |
| 118 | }]>; |
| 119 | |
| 120 | def t2_hi16 : SDNodeXForm<imm, [{ |
| 121 | return CurDAG->getTargetConstant((uint32_t)N->getZExtValue() >> 16, MVT::i32); |
| 122 | }]>; |
| 123 | |
| 124 | def t2_lo16AllZero : PatLeaf<(i32 imm), [{ |
| 125 | // Returns true if all low 16-bits are 0. |
| 126 | return (((uint32_t)N->getZExtValue()) & 0xFFFFUL) == 0; |
| 127 | }], t2_hi16>; |
| 128 | |
Anton Korobeynikov | 5223711 | 2009-06-17 18:13:58 +0000 | [diff] [blame] | 129 | //===----------------------------------------------------------------------===// |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 130 | // Thumb2 to cover the functionality of the ARM instruction set. |
Anton Korobeynikov | 5223711 | 2009-06-17 18:13:58 +0000 | [diff] [blame] | 131 | // |
| 132 | |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 133 | /// T2I_un_irs - Defines a set of (op reg, {so_imm|r|so_reg}) patterns for a |
| 134 | // unary operation that produces a value. |
| 135 | multiclass T2I_un_irs<string opc, PatFrag opnode, bit Cheap = 0, bit ReMat = 0>{ |
| 136 | // shifted imm |
| 137 | def i : T2I<(outs GPR:$dst), (ins t2_so_imm:$src), |
| 138 | !strconcat(opc, " $dst, $src"), |
| 139 | [(set GPR:$dst, (opnode t2_so_imm:$src))]> { |
| 140 | let isAsCheapAsAMove = Cheap; |
| 141 | let isReMaterializable = ReMat; |
| 142 | } |
| 143 | // register |
| 144 | def r : T2I<(outs GPR:$dst), (ins GPR:$src), |
| 145 | !strconcat(opc, " $dst, $src"), |
| 146 | [(set GPR:$dst, (opnode GPR:$src))]>; |
| 147 | // shifted register |
| 148 | def s : T2I<(outs GPR:$dst), (ins t2_so_reg:$src), |
| 149 | !strconcat(opc, " $dst, $src"), |
| 150 | [(set GPR:$dst, (opnode t2_so_reg:$src))]>; |
| 151 | } |
| 152 | |
| 153 | /// T2I_bin_irs - Defines a set of (op reg, {so_imm|r|so_reg}) patterns for a |
Anton Korobeynikov | 5223711 | 2009-06-17 18:13:58 +0000 | [diff] [blame] | 154 | // binary operation that produces a value. |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 155 | multiclass T2I_bin_irs<string opc, PatFrag opnode> { |
Anton Korobeynikov | 5223711 | 2009-06-17 18:13:58 +0000 | [diff] [blame] | 156 | // shifted imm |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 157 | def ri : T2I<(outs GPR:$dst), (ins GPR:$lhs, t2_so_imm:$rhs), |
| 158 | !strconcat(opc, " $dst, $lhs, $rhs"), |
| 159 | [(set GPR:$dst, (opnode GPR:$lhs, t2_so_imm:$rhs))]>; |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 160 | // register |
| 161 | def rr : T2I<(outs GPR:$dst), (ins GPR:$lhs, GPR:$rhs), |
| 162 | !strconcat(opc, " $dst, $lhs, $rhs"), |
| 163 | [(set GPR:$dst, (opnode GPR:$lhs, GPR:$rhs))]>; |
Anton Korobeynikov | 5223711 | 2009-06-17 18:13:58 +0000 | [diff] [blame] | 164 | // shifted register |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 165 | def rs : T2I<(outs GPR:$dst), (ins GPR:$lhs, t2_so_reg:$rhs), |
| 166 | !strconcat(opc, " $dst, $lhs, $rhs"), |
| 167 | [(set GPR:$dst, (opnode GPR:$lhs, t2_so_reg:$rhs))]>; |
Anton Korobeynikov | 5223711 | 2009-06-17 18:13:58 +0000 | [diff] [blame] | 168 | } |
| 169 | |
Evan Cheng | b8f7706 | 2009-06-23 19:56:37 +0000 | [diff] [blame^] | 170 | /// T2I_rbin_is - Same as T2I_bin_irs except the order of operands are reversed. |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 171 | multiclass T2I_rbin_irs<string opc, PatFrag opnode> { |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 172 | // shifted imm |
| 173 | def ri : T2I<(outs GPR:$dst), (ins GPR:$rhs, t2_so_imm:$lhs), |
Evan Cheng | b8f7706 | 2009-06-23 19:56:37 +0000 | [diff] [blame^] | 174 | !strconcat(opc, " $dst, $rhs, $lhs"), |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 175 | [(set GPR:$dst, (opnode t2_so_imm:$lhs, GPR:$rhs))]>; |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 176 | // register |
| 177 | def rr : T2I<(outs GPR:$dst), (ins GPR:$rhs, GPR:$lhs), |
Evan Cheng | b8f7706 | 2009-06-23 19:56:37 +0000 | [diff] [blame^] | 178 | !strconcat(opc, " $dst, $rhs, $lhs"), |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 179 | [(set GPR:$dst, (opnode GPR:$lhs, GPR:$rhs))]>; |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 180 | // shifted register |
| 181 | def rs : T2I<(outs GPR:$dst), (ins GPR:$rhs, t2_so_reg:$lhs), |
Evan Cheng | b8f7706 | 2009-06-23 19:56:37 +0000 | [diff] [blame^] | 182 | !strconcat(opc, " $dst, $rhs, $lhs"), |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 183 | [(set GPR:$dst, (opnode t2_so_reg:$lhs, GPR:$rhs))]>; |
| 184 | } |
| 185 | |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 186 | /// T2I_bin_s_irs - Similar to T2I_bin_irs except it sets the 's' bit so the |
Anton Korobeynikov | 5223711 | 2009-06-17 18:13:58 +0000 | [diff] [blame] | 187 | /// instruction modifies the CPSR register. |
| 188 | let Defs = [CPSR] in { |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 189 | multiclass T2I_bin_s_irs<string opc, PatFrag opnode> { |
Anton Korobeynikov | 5223711 | 2009-06-17 18:13:58 +0000 | [diff] [blame] | 190 | // shifted imm |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 191 | def ri : T2I<(outs GPR:$dst), (ins GPR:$lhs, t2_so_imm:$rhs), |
| 192 | !strconcat(opc, "s $dst, $lhs, $rhs"), |
| 193 | [(set GPR:$dst, (opnode GPR:$lhs, t2_so_imm:$rhs))]>; |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 194 | // register |
| 195 | def rr : T2I<(outs GPR:$dst), (ins GPR:$lhs, GPR:$rhs), |
| 196 | !strconcat(opc, " $dst, $lhs, $rhs"), |
| 197 | [(set GPR:$dst, (opnode GPR:$lhs, GPR:$rhs))]>; |
Anton Korobeynikov | 5223711 | 2009-06-17 18:13:58 +0000 | [diff] [blame] | 198 | // shifted register |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 199 | def rs : T2I<(outs GPR:$dst), (ins GPR:$lhs, t2_so_reg:$rhs), |
| 200 | !strconcat(opc, "s $dst, $lhs, $rhs"), |
| 201 | [(set GPR:$dst, (opnode GPR:$lhs, t2_so_reg:$rhs))]>; |
Anton Korobeynikov | 5223711 | 2009-06-17 18:13:58 +0000 | [diff] [blame] | 202 | } |
| 203 | } |
| 204 | |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 205 | /// T2I_rbin_s_irs - Same as T2I_bin_s_irs except the order of operands are |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 206 | /// reversed. |
| 207 | let Defs = [CPSR] in { |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 208 | multiclass T2I_rbin_s_irs<string opc, PatFrag opnode> { |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 209 | // shifted imm |
| 210 | def ri : T2I<(outs GPR:$dst), (ins GPR:$rhs, t2_so_imm:$lhs), |
Evan Cheng | b8f7706 | 2009-06-23 19:56:37 +0000 | [diff] [blame^] | 211 | !strconcat(opc, "s $dst, $rhs, $lhs"), |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 212 | [(set GPR:$dst, (opnode t2_so_imm:$lhs, GPR:$rhs))]>; |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 213 | // register |
| 214 | def rr : T2I<(outs GPR:$dst), (ins GPR:$rhs, GPR:$lhs), |
Evan Cheng | b8f7706 | 2009-06-23 19:56:37 +0000 | [diff] [blame^] | 215 | !strconcat(opc, " $dst, $rhs, $lhs"), |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 216 | [(set GPR:$dst, (opnode GPR:$lhs, GPR:$rhs))]>; |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 217 | // shifted register |
| 218 | def rs : T2I<(outs GPR:$dst), (ins GPR:$rhs, t2_so_reg:$lhs), |
Evan Cheng | b8f7706 | 2009-06-23 19:56:37 +0000 | [diff] [blame^] | 219 | !strconcat(opc, "s $dst, $rhs, $lhs"), |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 220 | [(set GPR:$dst, (opnode t2_so_reg:$lhs, GPR:$rhs))]>; |
| 221 | } |
| 222 | } |
| 223 | |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 224 | /// T2I_bin_ii12rs - Defines a set of (op reg, {so_imm|imm0_4095|r|so_reg}) |
| 225 | /// patterns for a binary operation that produces a value. |
| 226 | multiclass T2I_bin_ii12rs<string opc, PatFrag opnode> { |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 227 | // shifted imm |
| 228 | def ri : T2I<(outs GPR:$dst), (ins GPR:$lhs, t2_so_imm:$rhs), |
| 229 | !strconcat(opc, " $dst, $lhs, $rhs"), |
| 230 | [(set GPR:$dst, (opnode GPR:$lhs, t2_so_imm:$rhs))]>; |
| 231 | // 12-bit imm |
| 232 | def ri12 : T2I<(outs GPR:$dst), (ins GPR:$lhs, i32imm:$rhs), |
| 233 | !strconcat(opc, "w $dst, $lhs, $rhs"), |
| 234 | [(set GPR:$dst, (opnode GPR:$lhs, imm0_4095:$rhs))]>; |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 235 | // register |
| 236 | def rr : T2I<(outs GPR:$dst), (ins GPR:$lhs, GPR:$rhs), |
| 237 | !strconcat(opc, " $dst, $lhs, $rhs"), |
| 238 | [(set GPR:$dst, (opnode GPR:$lhs, GPR:$rhs))]>; |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 239 | // shifted register |
| 240 | def rs : T2I<(outs GPR:$dst), (ins GPR:$lhs, t2_so_reg:$rhs), |
| 241 | !strconcat(opc, " $dst, $lhs, $rhs"), |
| 242 | [(set GPR:$dst, (opnode GPR:$lhs, t2_so_reg:$rhs))]>; |
| 243 | } |
| 244 | |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 245 | /// T2I_bin_c_irs - Defines a set of (op reg, {so_imm|r|so_reg}) patterns for a |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 246 | // binary operation that produces a value and set the carry bit. It can also |
| 247 | /// optionally set CPSR. |
Anton Korobeynikov | 5223711 | 2009-06-17 18:13:58 +0000 | [diff] [blame] | 248 | let Uses = [CPSR] in { |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 249 | multiclass T2I_bin_c_irs<string opc, PatFrag opnode> { |
Anton Korobeynikov | 5223711 | 2009-06-17 18:13:58 +0000 | [diff] [blame] | 250 | // shifted imm |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 251 | def ri : T2I<(outs GPR:$dst), (ins GPR:$lhs, t2_so_imm:$rhs, cc_out:$s), |
| 252 | !strconcat(opc, "${s} $dst, $lhs, $rhs"), |
| 253 | [(set GPR:$dst, (opnode GPR:$lhs, t2_so_imm:$rhs))]>; |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 254 | // register |
| 255 | def rr : T2I<(outs GPR:$dst), (ins GPR:$lhs, GPR:$rhs, cc_out:$s), |
| 256 | !strconcat(opc, "${s} $dst, $lhs, $rhs"), |
| 257 | [(set GPR:$dst, (opnode GPR:$lhs, GPR:$rhs))]>; |
Anton Korobeynikov | 5223711 | 2009-06-17 18:13:58 +0000 | [diff] [blame] | 258 | // shifted register |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 259 | def rs : T2I<(outs GPR:$dst), (ins GPR:$lhs, t2_so_reg:$rhs, cc_out:$s), |
| 260 | !strconcat(opc, "${s} $dst, $lhs, $rhs"), |
| 261 | [(set GPR:$dst, (opnode GPR:$lhs, t2_so_reg:$rhs))]>; |
| 262 | } |
| 263 | } |
| 264 | |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 265 | /// T2I_rbin_c_irs - Same as T2I_bin_c_irs except the order of operands are |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 266 | /// reversed. |
| 267 | let Uses = [CPSR] in { |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 268 | multiclass T2I_rbin_c_irs<string opc, PatFrag opnode> { |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 269 | // shifted imm |
| 270 | def ri : T2I<(outs GPR:$dst), (ins GPR:$rhs, t2_so_imm:$lhs, cc_out:$s), |
Evan Cheng | b8f7706 | 2009-06-23 19:56:37 +0000 | [diff] [blame^] | 271 | !strconcat(opc, "${s} $dst, $rhs, $lhs"), |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 272 | [(set GPR:$dst, (opnode t2_so_imm:$lhs, GPR:$rhs))]>; |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 273 | // register |
| 274 | def rr : T2I<(outs GPR:$dst), (ins GPR:$rhs, GPR:$lhs, cc_out:$s), |
Evan Cheng | b8f7706 | 2009-06-23 19:56:37 +0000 | [diff] [blame^] | 275 | !strconcat(opc, "${s} $dst, $rhs, $lhs"), |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 276 | [(set GPR:$dst, (opnode GPR:$lhs, GPR:$rhs))]>; |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 277 | // shifted register |
| 278 | def rs : T2I<(outs GPR:$dst), (ins GPR:$rhs, t2_so_reg:$lhs, cc_out:$s), |
Evan Cheng | b8f7706 | 2009-06-23 19:56:37 +0000 | [diff] [blame^] | 279 | !strconcat(opc, "${s} $dst, $rhs, $lhs"), |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 280 | [(set GPR:$dst, (opnode t2_so_reg:$lhs, GPR:$rhs))]>; |
| 281 | } |
| 282 | } |
| 283 | |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 284 | /// T2I_sh_ir - Defines a set of (op reg, {so_imm|r}) patterns for a shift / |
| 285 | // rotate operation that produces a value. |
| 286 | multiclass T2I_sh_ir<string opc, PatFrag opnode> { |
| 287 | // 5-bit imm |
| 288 | def ri : T2I<(outs GPR:$dst), (ins GPR:$lhs, i32imm:$rhs), |
| 289 | !strconcat(opc, " $dst, $lhs, $rhs"), |
| 290 | [(set GPR:$dst, (opnode GPR:$lhs, imm1_31:$rhs))]>; |
| 291 | // register |
| 292 | def rr : T2I<(outs GPR:$dst), (ins GPR:$lhs, GPR:$rhs), |
| 293 | !strconcat(opc, " $dst, $lhs, $rhs"), |
| 294 | [(set GPR:$dst, (opnode GPR:$lhs, GPR:$rhs))]>; |
| 295 | } |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 296 | |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 297 | /// T21_cmp_irs - Defines a set of (op r, {so_imm|r|so_reg}) cmp / test |
| 298 | /// patterns. Similar to T2I_bin_irs except the instruction does not produce |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 299 | /// a explicit result, only implicitly set CPSR. |
| 300 | let Uses = [CPSR] in { |
| 301 | multiclass T2I_cmp_is<string opc, PatFrag opnode> { |
| 302 | // shifted imm |
| 303 | def ri : T2I<(outs), (ins GPR:$lhs, t2_so_imm:$rhs), |
| 304 | !strconcat(opc, " $lhs, $rhs"), |
| 305 | [(opnode GPR:$lhs, t2_so_imm:$rhs)]>; |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 306 | // register |
| 307 | def rr : T2I<(outs), (ins GPR:$lhs, GPR:$rhs), |
| 308 | !strconcat(opc, " $lhs, $rhs"), |
| 309 | [(opnode GPR:$lhs, GPR:$rhs)]>; |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 310 | // shifted register |
| 311 | def rs : T2I<(outs), (ins GPR:$lhs, t2_so_reg:$rhs), |
| 312 | !strconcat(opc, " $lhs, $rhs"), |
| 313 | [(opnode GPR:$lhs, t2_so_reg:$rhs)]>; |
Anton Korobeynikov | 5223711 | 2009-06-17 18:13:58 +0000 | [diff] [blame] | 314 | } |
| 315 | } |
| 316 | |
| 317 | //===----------------------------------------------------------------------===// |
| 318 | // Arithmetic Instructions. |
| 319 | // |
| 320 | |
| 321 | //===----------------------------------------------------------------------===// |
| 322 | // Move Instructions. |
| 323 | // |
Anton Korobeynikov | 5223711 | 2009-06-17 18:13:58 +0000 | [diff] [blame] | 324 | |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 325 | let neverHasSideEffects = 1 in |
| 326 | def t2MOVr : T2I<(outs GPR:$dst), (ins GPR:$src), |
| 327 | "mov $dst, $src", []>; |
| 328 | |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 329 | let isReMaterializable = 1, isAsCheapAsAMove = 1 in |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 330 | def t2MOVi16 : T2I<(outs GPR:$dst), (ins i32imm:$src), |
| 331 | "movw $dst, $src", |
| 332 | [(set GPR:$dst, imm0_65535:$src)]>; |
| 333 | |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 334 | // FIXME: Also available in ARM mode. |
Evan Cheng | 3850a6a | 2009-06-23 05:23:49 +0000 | [diff] [blame] | 335 | let Constraints = "$src = $dst" in |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 336 | def t2MOVTi16 : T2I<(outs GPR:$dst), (ins GPR:$src, i32imm:$imm), |
| 337 | "movt $dst, $imm", |
| 338 | [(set GPR:$dst, |
| 339 | (or (and GPR:$src, 0xffff), t2_lo16AllZero:$imm))]>; |
Anton Korobeynikov | 5223711 | 2009-06-17 18:13:58 +0000 | [diff] [blame] | 340 | |
| 341 | //===----------------------------------------------------------------------===// |
| 342 | // Arithmetic Instructions. |
| 343 | // |
Anton Korobeynikov | 5223711 | 2009-06-17 18:13:58 +0000 | [diff] [blame] | 344 | |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 345 | defm t2ADD : T2I_bin_ii12rs<"add", BinOpFrag<(add node:$LHS, node:$RHS)>>; |
| 346 | defm t2SUB : T2I_bin_ii12rs<"sub", BinOpFrag<(sub node:$LHS, node:$RHS)>>; |
Anton Korobeynikov | 5223711 | 2009-06-17 18:13:58 +0000 | [diff] [blame] | 347 | |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 348 | // ADD and SUB with 's' bit set. No 12-bit immediate (T4) variants. |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 349 | defm t2ADDS : T2I_bin_s_irs<"add", BinOpFrag<(addc node:$LHS, node:$RHS)>>; |
| 350 | defm t2SUBS : T2I_bin_s_irs<"sub", BinOpFrag<(subc node:$LHS, node:$RHS)>>; |
Anton Korobeynikov | 5223711 | 2009-06-17 18:13:58 +0000 | [diff] [blame] | 351 | |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 352 | // FIXME: predication support |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 353 | defm t2ADC : T2I_bin_c_irs<"adc", BinOpFrag<(adde node:$LHS, node:$RHS)>>; |
| 354 | defm t2SBC : T2I_bin_c_irs<"sbc", BinOpFrag<(sube node:$LHS, node:$RHS)>>; |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 355 | |
| 356 | // RSB, RSC |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 357 | defm t2RSB : T2I_rbin_irs <"rsb", BinOpFrag<(sub node:$LHS, node:$RHS)>>; |
| 358 | defm t2RSBS : T2I_rbin_c_irs<"rsb", BinOpFrag<(subc node:$LHS, node:$RHS)>>; |
| 359 | defm t2RSC : T2I_rbin_s_irs<"rsc", BinOpFrag<(sube node:$LHS, node:$RHS)>>; |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 360 | |
| 361 | // (sub X, imm) gets canonicalized to (add X, -imm). Match this form. |
| 362 | def : Thumb2Pat<(add GPR:$src, t2_so_imm_neg:$imm), |
| 363 | (t2SUBri GPR:$src, t2_so_imm_neg:$imm)>; |
| 364 | def : Thumb2Pat<(add GPR:$src, imm0_4095_neg:$imm), |
| 365 | (t2SUBri12 GPR:$src, imm0_4095_neg:$imm)>; |
Anton Korobeynikov | 5223711 | 2009-06-17 18:13:58 +0000 | [diff] [blame] | 366 | |
| 367 | |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 368 | //===----------------------------------------------------------------------===// |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 369 | // Shift and rotate Instructions. |
| 370 | // |
| 371 | |
| 372 | defm t2LSL : T2I_sh_ir<"lsl", BinOpFrag<(shl node:$LHS, node:$RHS)>>; |
| 373 | defm t2LSR : T2I_sh_ir<"lsr", BinOpFrag<(srl node:$LHS, node:$RHS)>>; |
| 374 | defm t2ASR : T2I_sh_ir<"asr", BinOpFrag<(sra node:$LHS, node:$RHS)>>; |
| 375 | defm t2ROR : T2I_sh_ir<"ror", BinOpFrag<(rotr node:$LHS, node:$RHS)>>; |
| 376 | |
| 377 | def t2MOVrx : T2I<(outs GPR:$dst), (ins GPR:$src), |
| 378 | "mov $dst, $src, rrx", |
| 379 | [(set GPR:$dst, (ARMrrx GPR:$src))]>; |
| 380 | |
| 381 | //===----------------------------------------------------------------------===// |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 382 | // Bitwise Instructions. |
| 383 | // |
Anton Korobeynikov | 5223711 | 2009-06-17 18:13:58 +0000 | [diff] [blame] | 384 | |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 385 | defm t2AND : T2I_bin_irs<"and", BinOpFrag<(and node:$LHS, node:$RHS)>>; |
| 386 | defm t2ORR : T2I_bin_irs<"orr", BinOpFrag<(or node:$LHS, node:$RHS)>>; |
| 387 | defm t2EOR : T2I_bin_irs<"eor", BinOpFrag<(xor node:$LHS, node:$RHS)>>; |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 388 | |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 389 | defm t2BIC : T2I_bin_irs<"bic", BinOpFrag<(and node:$LHS, (not node:$RHS))>>; |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 390 | |
| 391 | def : Thumb2Pat<(and GPR:$src, t2_so_imm_not:$imm), |
| 392 | (t2BICri GPR:$src, t2_so_imm_not:$imm)>; |
| 393 | |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 394 | defm t2ORN : T2I_bin_irs<"orn", BinOpFrag<(or node:$LHS, (not node:$RHS))>>; |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 395 | |
| 396 | def : Thumb2Pat<(or GPR:$src, t2_so_imm_not:$imm), |
| 397 | (t2ORNri GPR:$src, t2_so_imm_not:$imm)>; |
| 398 | |
Evan Cheng | a67efd1 | 2009-06-23 19:39:13 +0000 | [diff] [blame] | 399 | defm t2MVN : T2I_un_irs <"mvn", UnOpFrag<(not node:$Src)>, 1, 1>; |
Evan Cheng | f49810c | 2009-06-23 17:48:47 +0000 | [diff] [blame] | 400 | |
| 401 | // A8.6.17 BFC - Bitfield clear |
| 402 | // FIXME: Also available in ARM mode. |
| 403 | let Constraints = "$src = $dst" in |
| 404 | def t2BFC : T2I<(outs GPR:$dst), (ins GPR:$src, bf_inv_mask_imm:$imm), |
| 405 | "bfc $dst, $imm", |
| 406 | [(set GPR:$dst, (and GPR:$src, bf_inv_mask_imm:$imm))]>; |
| 407 | |
| 408 | // FIXME: A8.6.18 BFI - Bitfield insert (Encoding T1) |
| 409 | |
| 410 | //===----------------------------------------------------------------------===// |
| 411 | // Multiply Instructions. |
| 412 | // |
| 413 | def t2MUL: T2I<(outs GPR:$dst), (ins GPR:$a, GPR:$b), |
| 414 | "mul $dst, $a, $b", |
| 415 | [(set GPR:$dst, (mul GPR:$a, GPR:$b))]>; |
| 416 | |
| 417 | def t2MLA: T2I<(outs GPR:$dst), (ins GPR:$a, GPR:$b, GPR:$c), |
| 418 | "mla $dst, $a, $b, $c", |
| 419 | [(set GPR:$dst, (add (mul GPR:$a, GPR:$b), GPR:$c))]>; |
| 420 | |
| 421 | def t2MLS: T2I<(outs GPR:$dst), (ins GPR:$a, GPR:$b, GPR:$c), |
| 422 | "mls $dst, $a, $b, $c", |
| 423 | [(set GPR:$dst, (sub GPR:$c, (mul GPR:$a, GPR:$b)))]>; |
| 424 | |
| 425 | // FIXME: SMULL, etc. |
| 426 | |
| 427 | //===----------------------------------------------------------------------===// |
| 428 | // Misc. Arithmetic Instructions. |
| 429 | // |
| 430 | |
| 431 | ///// |
| 432 | /// A8.6.31 CLZ |
| 433 | ///// |
| 434 | // FIXME not firing? but ARM version does... |
| 435 | def t2CLZ : T2I<(outs GPR:$dst), (ins GPR:$src), |
| 436 | "clz $dst, $src", |
| 437 | [(set GPR:$dst, (ctlz GPR:$src))]>; |
| 438 | |
| 439 | def t2REV : T2I<(outs GPR:$dst), (ins GPR:$src), |
| 440 | "rev $dst, $src", |
| 441 | [(set GPR:$dst, (bswap GPR:$src))]>; |
| 442 | |
| 443 | def t2REV16 : T2I<(outs GPR:$dst), (ins GPR:$src), |
| 444 | "rev16 $dst, $src", |
| 445 | [(set GPR:$dst, |
| 446 | (or (and (srl GPR:$src, (i32 8)), 0xFF), |
| 447 | (or (and (shl GPR:$src, (i32 8)), 0xFF00), |
| 448 | (or (and (srl GPR:$src, (i32 8)), 0xFF0000), |
| 449 | (and (shl GPR:$src, (i32 8)), 0xFF000000)))))]>; |
| 450 | |
| 451 | ///// |
| 452 | /// A8.6.137 REVSH |
| 453 | ///// |
| 454 | def t2REVSH : T2I<(outs GPR:$dst), (ins GPR:$src), |
| 455 | "revsh $dst, $src", |
| 456 | [(set GPR:$dst, |
| 457 | (sext_inreg |
| 458 | (or (srl (and GPR:$src, 0xFFFF), (i32 8)), |
| 459 | (shl GPR:$src, (i32 8))), i16))]>; |
| 460 | |
| 461 | // FIXME: PKHxx etc. |
| 462 | |
| 463 | //===----------------------------------------------------------------------===// |
| 464 | // Comparison Instructions... |
| 465 | // |
| 466 | |
| 467 | defm t2CMP : T2I_cmp_is<"cmp", |
| 468 | BinOpFrag<(ARMcmp node:$LHS, node:$RHS)>>; |
| 469 | defm t2CMPnz : T2I_cmp_is<"cmp", |
| 470 | BinOpFrag<(ARMcmpNZ node:$LHS, node:$RHS)>>; |
| 471 | |
| 472 | defm t2CMN : T2I_cmp_is<"cmn", |
| 473 | BinOpFrag<(ARMcmp node:$LHS,(ineg node:$RHS))>>; |
| 474 | defm t2CMNnz : T2I_cmp_is<"cmn", |
| 475 | BinOpFrag<(ARMcmpNZ node:$LHS,(ineg node:$RHS))>>; |
| 476 | |
| 477 | def : Thumb2Pat<(ARMcmp GPR:$src, t2_so_imm_neg:$imm), |
| 478 | (t2CMNri GPR:$src, t2_so_imm_neg:$imm)>; |
| 479 | |
| 480 | def : Thumb2Pat<(ARMcmpNZ GPR:$src, t2_so_imm_neg:$imm), |
| 481 | (t2CMNri GPR:$src, t2_so_imm_neg:$imm)>; |
| 482 | |
| 483 | // FIXME: TST, TEQ, etc. |
| 484 | |
| 485 | // A8.6.27 CBNZ, CBZ - Compare and branch on (non)zero. |
| 486 | // Short range conditional branch. Looks awesome for loops. Need to figure |
| 487 | // out how to use this one. |
| 488 | |
| 489 | // FIXME: Conditional moves |
| 490 | |
| 491 | |
| 492 | //===----------------------------------------------------------------------===// |
| 493 | // Non-Instruction Patterns |
| 494 | // |
| 495 | |
| 496 | // Large immediate handling. |
| 497 | |
| 498 | def : Thumb2Pat<(i32 imm:$src), |
| 499 | (t2MOVTi16 (t2MOVi16 (t2_lo16 imm:$src)), |
| 500 | (t2_hi16 imm:$src))>; |