[SystemZ] Extend test-under-mask support to high GR32s
[oota-llvm.git] / lib / Target / SystemZ / SystemZPatterns.td
1 //===-- SystemZPatterns.td - SystemZ-specific pattern rules ---*- tblgen-*-===//
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 // Record that INSN performs a 64-bit version of unary operator OPERATOR
11 // in which the operand is sign-extended from 32 to 64 bits.
12 multiclass SXU<SDPatternOperator operator, Instruction insn> {
13   def : Pat<(operator (sext (i32 GR32:$src))),
14             (insn GR32:$src)>;
15   def : Pat<(operator (sext_inreg GR64:$src, i32)),
16             (insn (EXTRACT_SUBREG GR64:$src, subreg_l32))>;
17 }
18
19 // Record that INSN performs a 64-bit version of binary operator OPERATOR
20 // in which the first operand has class CLS and which the second operand
21 // is sign-extended from a 32-bit register.
22 multiclass SXB<SDPatternOperator operator, RegisterOperand cls,
23                Instruction insn> {
24   def : Pat<(operator cls:$src1, (sext GR32:$src2)),
25             (insn cls:$src1, GR32:$src2)>;
26   def : Pat<(operator cls:$src1, (sext_inreg GR64:$src2, i32)),
27             (insn cls:$src1, (EXTRACT_SUBREG GR64:$src2, subreg_l32))>;
28 }
29
30 // Like SXB, but for zero extension.
31 multiclass ZXB<SDPatternOperator operator, RegisterOperand cls,
32                Instruction insn> {
33   def : Pat<(operator cls:$src1, (zext GR32:$src2)),
34             (insn cls:$src1, GR32:$src2)>;
35   def : Pat<(operator cls:$src1, (and GR64:$src2, 0xffffffff)),
36             (insn cls:$src1, (EXTRACT_SUBREG GR64:$src2, subreg_l32))>;
37 }
38
39 // Record that INSN performs a binary read-modify-write operation,
40 // with LOAD, OPERATOR and STORE being the read, modify and write
41 // respectively.  MODE is the addressing mode and IMM is the type
42 // of the second operand.
43 class RMWI<SDPatternOperator load, SDPatternOperator operator,
44            SDPatternOperator store, AddressingMode mode,
45            PatFrag imm, Instruction insn>
46   : Pat<(store (operator (load mode:$addr), imm:$src), mode:$addr),
47         (insn mode:$addr, (UIMM8 imm:$src))>;
48
49 // Record that INSN performs binary operation OPERATION on a byte
50 // memory location.  IMM is the type of the second operand.
51 multiclass RMWIByte<SDPatternOperator operator, AddressingMode mode,
52                     Instruction insn> {
53   def : RMWI<anyextloadi8, operator, truncstorei8, mode, imm32, insn>;
54   def : RMWI<anyextloadi8, operator, truncstorei8, mode, imm64, insn>;
55 }
56
57 // Record that INSN performs insertion TYPE into a register of class CLS.
58 // The inserted operand is loaded using LOAD from an address of mode MODE.
59 multiclass InsertMem<string type, Instruction insn, RegisterOperand cls,
60                      SDPatternOperator load, AddressingMode mode> {
61   def : Pat<(!cast<SDPatternOperator>("or_as_"##type)
62               cls:$src1, (load mode:$src2)),
63             (insn cls:$src1, mode:$src2)>;
64   def : Pat<(!cast<SDPatternOperator>("or_as_rev"##type)
65               (load mode:$src2), cls:$src1),
66             (insn cls:$src1, mode:$src2)>;
67 }
68
69 // INSN stores the low 32 bits of a GPR to a memory with addressing mode MODE.
70 // Record that it is equivalent to using OPERATOR to store a GR64.
71 class StoreGR64<Instruction insn, SDPatternOperator operator,
72                 AddressingMode mode>
73   : Pat<(operator GR64:$R1, mode:$XBD2),
74         (insn (EXTRACT_SUBREG GR64:$R1, subreg_l32), mode:$XBD2)>;
75
76 // INSN and INSNY are an RX/RXY pair of instructions that store the low
77 // 32 bits of a GPR to memory.  Record that they are equivalent to using
78 // OPERATOR to store a GR64.
79 multiclass StoreGR64Pair<Instruction insn, Instruction insny,
80                          SDPatternOperator operator> {
81   def : StoreGR64<insn, operator, bdxaddr12pair>;
82   def : StoreGR64<insny, operator, bdxaddr20pair>;
83 }
84
85 // INSN stores the low 32 bits of a GPR using PC-relative addressing.
86 // Record that it is equivalent to using OPERATOR to store a GR64.
87 class StoreGR64PC<Instruction insn, SDPatternOperator operator>
88   : Pat<(operator GR64:$R1, pcrel32:$XBD2),
89         (insn (EXTRACT_SUBREG GR64:$R1, subreg_l32), pcrel32:$XBD2)> {
90   // We want PC-relative addresses to be tried ahead of BD and BDX addresses.
91   // However, BDXs have two extra operands and are therefore 6 units more
92   // complex.
93   let AddedComplexity = 7;
94 }
95
96 // INSN and INSNINV conditionally store the low 32 bits of a GPR to memory,
97 // with INSN storing when the condition is true and INSNINV storing when the
98 // condition is false.  Record that they are equivalent to a LOAD/select/STORE
99 // sequence for GR64s.
100 multiclass CondStores64<Instruction insn, Instruction insninv,
101                         SDPatternOperator store, SDPatternOperator load,
102                         AddressingMode mode> {
103   def : Pat<(store (z_select_ccmask GR64:$new, (load mode:$addr),
104                                     uimm8zx4:$valid, uimm8zx4:$cc),
105                    mode:$addr),
106             (insn (EXTRACT_SUBREG GR64:$new, subreg_l32), mode:$addr,
107                   uimm8zx4:$valid, uimm8zx4:$cc)>;
108   def : Pat<(store (z_select_ccmask (load mode:$addr), GR64:$new,
109                                     uimm8zx4:$valid, uimm8zx4:$cc),
110                    mode:$addr),
111             (insninv (EXTRACT_SUBREG GR64:$new, subreg_l32), mode:$addr,
112                      uimm8zx4:$valid, uimm8zx4:$cc)>;
113 }
114
115 // INSN performs a comparison between a 32-bit register and a constant.
116 // Record that it is equivalent to comparing subreg SUBREG of a GR64 with IMM.
117 class CompareGR64RI<Instruction insn, SDPatternOperator compare,
118                     Immediate imm, SubRegIndex subreg>
119   : Pat<(compare GR64:$R1, imm:$I2),
120         (insn (EXTRACT_SUBREG GR64:$R1, subreg),
121               (imm.OperandTransform imm:$I2))>;
122
123 // Try to use MVC instruction INSN for a load of type LOAD followed by a store
124 // of the same size.  VT is the type of the intermediate (legalized) value and
125 // LENGTH is the number of bytes loaded by LOAD.
126 multiclass MVCLoadStore<SDPatternOperator load, ValueType vt, Instruction insn,
127                         bits<5> length> {
128   def : Pat<(mvc_store (vt (load bdaddr12only:$src)), bdaddr12only:$dest),
129             (insn bdaddr12only:$dest, bdaddr12only:$src, length)>;
130 }
131
132 // Use NC-like instruction INSN for block_op operation OPERATOR.
133 // The other operand is a load of type LOAD, which accesses LENGTH bytes.
134 // VT is the intermediate legalized type in which the binary operation
135 // is actually done.
136 multiclass BinaryLoadStore<SDPatternOperator operator, SDPatternOperator load,
137                            ValueType vt, Instruction insn, bits<5> length> {
138   def : Pat<(operator (vt (load bdaddr12only:$src)), bdaddr12only:$dest),
139             (insn bdaddr12only:$dest, bdaddr12only:$src, length)>;
140 }
141
142 // A convenient way of generating all block peepholes for a particular
143 // LOAD/VT/LENGTH combination.
144 multiclass BlockLoadStore<SDPatternOperator load, ValueType vt,
145                           Instruction mvc, Instruction nc, Instruction oc,
146                           Instruction xc, bits<5> length> {
147   defm : MVCLoadStore<load, vt, mvc, length>;
148   defm : BinaryLoadStore<block_and1, load, vt, nc, length>;
149   defm : BinaryLoadStore<block_and2, load, vt, nc, length>;
150   defm : BinaryLoadStore<block_or1,  load, vt, oc, length>;
151   defm : BinaryLoadStore<block_or2,  load, vt, oc, length>;
152   defm : BinaryLoadStore<block_xor1, load, vt, xc, length>;
153   defm : BinaryLoadStore<block_xor2, load, vt, xc, length>;
154 }
155
156 // Record that INSN is a LOAD AND TEST that can be used to compare
157 // registers in CLS against zero.  The instruction has separate R1 and R2
158 // operands, but they must be the same when the instruction is used like this.
159 class CompareZeroFP<Instruction insn, RegisterOperand cls>
160   : Pat<(z_fcmp cls:$reg, (fpimm0)), (insn cls:$reg, cls:$reg)>;