SystemZInstrInfo.td revision 81d533c76a61ac6dac595acb8b01a63c335ecda4
1//===- SystemZInstrInfo.td - SystemZ Instruction defs ---------*- 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// This file describes the SystemZ instructions in TableGen format.
11//
12//===----------------------------------------------------------------------===//
13
14//===----------------------------------------------------------------------===//
15// SystemZ Instruction Predicate Definitions.
16def IsZ10 : Predicate<"Subtarget.isZ10()">;
17
18include "SystemZInstrFormats.td"
19
20//===----------------------------------------------------------------------===//
21// Type Constraints.
22//===----------------------------------------------------------------------===//
23class SDTCisI8<int OpNum> : SDTCisVT<OpNum, i8>;
24class SDTCisI16<int OpNum> : SDTCisVT<OpNum, i16>;
25class SDTCisI32<int OpNum> : SDTCisVT<OpNum, i32>;
26class SDTCisI64<int OpNum> : SDTCisVT<OpNum, i64>;
27
28//===----------------------------------------------------------------------===//
29// Type Profiles.
30//===----------------------------------------------------------------------===//
31def SDT_SystemZCall         : SDTypeProfile<0, -1, [SDTCisPtrTy<0>]>;
32def SDT_SystemZCallSeqStart : SDCallSeqStart<[SDTCisI64<0>]>;
33def SDT_SystemZCallSeqEnd   : SDCallSeqEnd<[SDTCisI64<0>, SDTCisI64<1>]>;
34def SDT_CmpTest             : SDTypeProfile<0, 2, [SDTCisSameAs<0, 1>]>;
35def SDT_BrCond              : SDTypeProfile<0, 2,
36                                           [SDTCisVT<0, OtherVT>,
37                                            SDTCisI8<1>]>;
38def SDT_SelectCC            : SDTypeProfile<1, 3,
39                                           [SDTCisSameAs<0, 1>, SDTCisSameAs<1, 2>,
40                                            SDTCisI8<3>]>;
41def SDT_Address             : SDTypeProfile<1, 1,
42                                            [SDTCisSameAs<0, 1>, SDTCisPtrTy<0>]>;
43
44//===----------------------------------------------------------------------===//
45// SystemZ Specific Node Definitions.
46//===----------------------------------------------------------------------===//
47def SystemZretflag : SDNode<"SystemZISD::RET_FLAG", SDTNone,
48                     [SDNPHasChain, SDNPOptInFlag]>;
49def SystemZcall    : SDNode<"SystemZISD::CALL", SDT_SystemZCall,
50                     [SDNPHasChain, SDNPOutFlag, SDNPOptInFlag]>;
51def SystemZcallseq_start :
52                 SDNode<"ISD::CALLSEQ_START", SDT_SystemZCallSeqStart,
53                        [SDNPHasChain, SDNPOutFlag]>;
54def SystemZcallseq_end :
55                 SDNode<"ISD::CALLSEQ_END",   SDT_SystemZCallSeqEnd,
56                        [SDNPHasChain, SDNPOptInFlag, SDNPOutFlag]>;
57def SystemZcmp     : SDNode<"SystemZISD::CMP", SDT_CmpTest, [SDNPOutFlag]>;
58def SystemZucmp    : SDNode<"SystemZISD::UCMP", SDT_CmpTest, [SDNPOutFlag]>;
59def SystemZbrcond  : SDNode<"SystemZISD::BRCOND", SDT_BrCond,
60                            [SDNPHasChain, SDNPInFlag]>;
61def SystemZselect  : SDNode<"SystemZISD::SELECT", SDT_SelectCC, [SDNPInFlag]>;
62def SystemZpcrelwrapper : SDNode<"SystemZISD::PCRelativeWrapper", SDT_Address, []>;
63
64
65include "SystemZOperands.td"
66
67//===----------------------------------------------------------------------===//
68// Instruction list..
69
70def ADJCALLSTACKDOWN : Pseudo<(outs), (ins i64imm:$amt),
71                              "#ADJCALLSTACKDOWN",
72                              [(SystemZcallseq_start timm:$amt)]>;
73def ADJCALLSTACKUP   : Pseudo<(outs), (ins i64imm:$amt1, i64imm:$amt2),
74                              "#ADJCALLSTACKUP",
75                              [(SystemZcallseq_end timm:$amt1, timm:$amt2)]>;
76
77let usesCustomDAGSchedInserter = 1 in {
78  def Select32 : Pseudo<(outs GR32:$dst), (ins GR32:$src1, GR32:$src2, i8imm:$cc),
79                        "# Select32 PSEUDO",
80                        [(set GR32:$dst,
81                              (SystemZselect GR32:$src1, GR32:$src2, imm:$cc))]>;
82  def Select64 : Pseudo<(outs GR64:$dst), (ins GR64:$src1, GR64:$src2, i8imm:$cc),
83                        "# Select64 PSEUDO",
84                        [(set GR64:$dst,
85                              (SystemZselect GR64:$src1, GR64:$src2, imm:$cc))]>;
86}
87
88
89//===----------------------------------------------------------------------===//
90//  Control Flow Instructions...
91//
92
93// FIXME: Provide proper encoding!
94let isReturn = 1, isTerminator = 1, isBarrier = 1, hasCtrlDep = 1 in {
95  def RET : Pseudo<(outs), (ins), "br\t%r14", [(SystemZretflag)]>;
96}
97
98let isBranch = 1, isTerminator = 1 in {
99  let isBarrier = 1 in {
100    def JMP  : Pseudo<(outs), (ins brtarget:$dst), "j\t{$dst}", [(br bb:$dst)]>;
101
102    let isIndirectBranch = 1 in
103      def JMPr   : Pseudo<(outs), (ins GR64:$dst), "br\t{$dst}", [(brind GR64:$dst)]>;
104  }
105
106  let Uses = [PSW] in {
107    def JE  : Pseudo<(outs), (ins brtarget:$dst),
108                     "je\t$dst",
109                     [(SystemZbrcond bb:$dst, SYSTEMZ_COND_E)]>;
110    def JNE : Pseudo<(outs), (ins brtarget:$dst),
111                     "jne\t$dst",
112                     [(SystemZbrcond bb:$dst, SYSTEMZ_COND_NE)]>;
113    def JH  : Pseudo<(outs), (ins brtarget:$dst),
114                     "jh\t$dst",
115                     [(SystemZbrcond bb:$dst, SYSTEMZ_COND_H)]>;
116    def JL  : Pseudo<(outs), (ins brtarget:$dst),
117                     "jl\t$dst",
118                     [(SystemZbrcond bb:$dst, SYSTEMZ_COND_L)]>;
119    def JHE : Pseudo<(outs), (ins brtarget:$dst),
120                     "jhe\t$dst",
121                     [(SystemZbrcond bb:$dst, SYSTEMZ_COND_HE)]>;
122    def JLE : Pseudo<(outs), (ins brtarget:$dst),
123                     "jle\t$dst",
124                     [(SystemZbrcond bb:$dst, SYSTEMZ_COND_LE)]>;
125
126  } // Uses = [PSW]
127} // isBranch = 1
128
129//===----------------------------------------------------------------------===//
130//  Call Instructions...
131//
132
133let isCall = 1 in
134  // All calls clobber the non-callee saved registers. Uses for argument
135  // registers are added manually.
136  let Defs = [R0D, R1D, R2D, R3D, R4D, R5D, R14D] in {
137    def CALLi     : Pseudo<(outs), (ins imm_pcrel:$dst, variable_ops),
138                           "brasl\t%r14, $dst", [(SystemZcall imm:$dst)]>;
139    def CALLr     : Pseudo<(outs), (ins ADDR64:$dst, variable_ops),
140                           "basr\t%r14, $dst", [(SystemZcall ADDR64:$dst)]>;
141  }
142
143//===----------------------------------------------------------------------===//
144//  Miscellaneous Instructions.
145//
146
147let isReMaterializable = 1 in
148// FIXME: Provide imm12 variant
149// FIXME: Address should be halfword aligned...
150def LA64r  : Pseudo<(outs GR64:$dst), (ins laaddr:$src),
151                    "lay\t{$dst, $src}",
152                    [(set GR64:$dst, laaddr:$src)]>;
153def LA64rm : Pseudo<(outs GR64:$dst), (ins i64imm:$src),
154                    "larl\t{$dst, $src}",
155                    [(set GR64:$dst,
156                          (SystemZpcrelwrapper tglobaladdr:$src))]>;
157
158let neverHasSideEffects = 1 in
159def NOP : Pseudo<(outs), (ins), "# no-op", []>;
160
161//===----------------------------------------------------------------------===//
162// Move Instructions
163
164// FIXME: Provide proper encoding!
165let neverHasSideEffects = 1 in {
166def MOV32rr : Pseudo<(outs GR32:$dst), (ins GR32:$src),
167                     "lr\t{$dst, $src}",
168                     []>;
169def MOV64rr : Pseudo<(outs GR64:$dst), (ins GR64:$src),
170                     "lgr\t{$dst, $src}",
171                     []>;
172def MOV128rr : Pseudo<(outs GR128:$dst), (ins GR128:$src),
173                     "# MOV128 PSEUDO!\n"
174                     "\tlgr\t${dst:subreg_odd}, ${src:subreg_odd}\n"
175                     "\tlgr\t${dst:subreg_even}, ${src:subreg_even}",
176                     []>;
177def MOV64rrP : Pseudo<(outs GR64P:$dst), (ins GR64P:$src),
178                     "# MOV64P PSEUDO!\n"
179                     "\tlr\t${dst:subreg_odd}, ${src:subreg_odd}\n"
180                     "\tlr\t${dst:subreg_even}, ${src:subreg_even}",
181                     []>;
182}
183
184def MOVSX64rr32 : Pseudo<(outs GR64:$dst), (ins GR32:$src),
185                         "lgfr\t{$dst, $src}",
186                         [(set GR64:$dst, (sext GR32:$src))]>;
187def MOVZX64rr32 : Pseudo<(outs GR64:$dst), (ins GR32:$src),
188                         "llgfr\t{$dst, $src}",
189                         [(set GR64:$dst, (zext GR32:$src))]>;
190
191// FIXME: Provide proper encoding!
192let isReMaterializable = 1, isAsCheapAsAMove = 1 in {
193def MOV32ri16 : Pseudo<(outs GR32:$dst), (ins s16imm:$src),
194                       "lhi\t{$dst, $src}",
195                       [(set GR32:$dst, immSExt16:$src)]>;
196def MOV64ri16 : Pseudo<(outs GR64:$dst), (ins s16imm64:$src),
197                       "lghi\t{$dst, $src}",
198                       [(set GR64:$dst, immSExt16:$src)]>;
199
200def MOV64rill16 : Pseudo<(outs GR64:$dst), (ins i64imm:$src),
201                         "llill\t{$dst, $src}",
202                         [(set GR64:$dst, i64ll16:$src)]>;
203def MOV64rilh16 : Pseudo<(outs GR64:$dst), (ins i64imm:$src),
204                         "llilh\t{$dst, $src}",
205                         [(set GR64:$dst, i64lh16:$src)]>;
206def MOV64rihl16 : Pseudo<(outs GR64:$dst), (ins i64imm:$src),
207                         "llihl\t{$dst, $src}",
208                         [(set GR64:$dst, i64hl16:$src)]>;
209def MOV64rihh16 : Pseudo<(outs GR64:$dst), (ins i64imm:$src),
210                         "llihh\t{$dst, $src}",
211                         [(set GR64:$dst, i64hh16:$src)]>;
212
213def MOV64ri32 : Pseudo<(outs GR64:$dst), (ins s32imm64:$src),
214                       "lgfi\t{$dst, $src}",
215                       [(set GR64:$dst, immSExt32:$src)]>;
216def MOV64rilo32 : Pseudo<(outs GR64:$dst), (ins i64imm:$src),
217                         "llilf\t{$dst, $src}",
218                         [(set GR64:$dst, i64lo32:$src)]>;
219def MOV64rihi32 : Pseudo<(outs GR64:$dst), (ins i64imm:$src),
220                         "llihf\t{$dst, $src}",
221                         [(set GR64:$dst, i64hi32:$src)]>;
222}
223
224let canFoldAsLoad = 1, isReMaterializable = 1, mayHaveSideEffects = 1 in {
225def MOV32rm  : Pseudo<(outs GR32:$dst), (ins rriaddr12:$src),
226                      "l\t{$dst, $src}",
227                      [(set GR32:$dst, (load rriaddr12:$src))]>;
228def MOV32rmy : Pseudo<(outs GR32:$dst), (ins rriaddr:$src),
229                      "ly\t{$dst, $src}",
230                      [(set GR32:$dst, (load rriaddr:$src))]>;
231def MOV64rm  : Pseudo<(outs GR64:$dst), (ins rriaddr:$src),
232                      "lg\t{$dst, $src}",
233                      [(set GR64:$dst, (load rriaddr:$src))]>;
234
235}
236
237def MOV32mr  : Pseudo<(outs), (ins rriaddr12:$dst, GR32:$src),
238                      "st\t{$src, $dst}",
239                      [(store GR32:$src, rriaddr12:$dst)]>;
240def MOV32mry : Pseudo<(outs), (ins rriaddr:$dst, GR32:$src),
241                      "sty\t{$src, $dst}",
242                      [(store GR32:$src, rriaddr:$dst)]>;
243def MOV64mr  : Pseudo<(outs), (ins rriaddr:$dst, GR64:$src),
244                      "stg\t{$src, $dst}",
245                      [(store GR64:$src, rriaddr:$dst)]>;
246
247def MOV8mi    : Pseudo<(outs), (ins riaddr12:$dst, i32i8imm:$src),
248                       "mvi\t{$dst, $src}",
249                       [(truncstorei8 (i32 i32immSExt8:$src), riaddr12:$dst)]>;
250def MOV8miy   : Pseudo<(outs), (ins riaddr:$dst, i32i8imm:$src),
251                       "mviy\t{$dst, $src}",
252                       [(truncstorei8 (i32 i32immSExt8:$src), riaddr:$dst)]>;
253
254def MOV16mi   : Pseudo<(outs), (ins riaddr12:$dst, s16imm:$src),
255                       "mvhhi\t{$dst, $src}",
256                       [(truncstorei16 (i32 i32immSExt16:$src), riaddr12:$dst)]>,
257                       Requires<[IsZ10]>;
258def MOV32mi16 : Pseudo<(outs), (ins riaddr12:$dst, s32imm:$src),
259                       "mvhi\t{$dst, $src}",
260                       [(store (i32 immSExt16:$src), riaddr12:$dst)]>,
261                       Requires<[IsZ10]>;
262def MOV64mi16 : Pseudo<(outs), (ins riaddr12:$dst, s32imm64:$src),
263                       "mvghi\t{$dst, $src}",
264                       [(store (i64 immSExt16:$src), riaddr12:$dst)]>,
265                       Requires<[IsZ10]>;
266
267// sexts
268def MOVSX32rr8  : Pseudo<(outs GR32:$dst), (ins GR32:$src),
269                         "lbr\t{$dst, $src}",
270                         [(set GR32:$dst, (sext_inreg GR32:$src, i8))]>;
271def MOVSX64rr8  : Pseudo<(outs GR64:$dst), (ins GR64:$src),
272                         "lgbr\t{$dst, $src}",
273                         [(set GR64:$dst, (sext_inreg GR64:$src, i8))]>;
274def MOVSX32rr16 : Pseudo<(outs GR32:$dst), (ins GR32:$src),
275                         "lhr\t{$dst, $src}",
276                         [(set GR32:$dst, (sext_inreg GR32:$src, i16))]>;
277def MOVSX64rr16 : Pseudo<(outs GR64:$dst), (ins GR64:$src),
278                         "lghr\t{$dst, $src}",
279                         [(set GR64:$dst, (sext_inreg GR64:$src, i16))]>;
280
281// extloads
282def MOVSX32rm8   : Pseudo<(outs GR32:$dst), (ins rriaddr:$src),
283                          "lb\t{$dst, $src}",
284                          [(set GR32:$dst, (sextloadi32i8 rriaddr:$src))]>;
285def MOVSX32rm16  : Pseudo<(outs GR32:$dst), (ins rriaddr12:$src),
286                          "lh\t{$dst, $src}",
287                          [(set GR32:$dst, (sextloadi32i16 rriaddr12:$src))]>;
288def MOVSX32rm16y : Pseudo<(outs GR32:$dst), (ins rriaddr:$src),
289                         "lhy\t{$dst, $src}",
290                         [(set GR32:$dst, (sextloadi32i16 rriaddr:$src))]>;
291def MOVSX64rm8   : Pseudo<(outs GR64:$dst), (ins rriaddr:$src),
292                          "lgb\t{$dst, $src}",
293                          [(set GR64:$dst, (sextloadi64i8 rriaddr:$src))]>;
294def MOVSX64rm16  : Pseudo<(outs GR64:$dst), (ins rriaddr:$src),
295                          "lgh\t{$dst, $src}",
296                          [(set GR64:$dst, (sextloadi64i16 rriaddr:$src))]>;
297def MOVSX64rm32  : Pseudo<(outs GR64:$dst), (ins rriaddr:$src),
298                          "lgf\t{$dst, $src}",
299                          [(set GR64:$dst, (sextloadi64i32 rriaddr:$src))]>;
300
301def MOVZX32rm8  : Pseudo<(outs GR32:$dst), (ins rriaddr:$src),
302                         "llc\t{$dst, $src}",
303                         [(set GR32:$dst, (zextloadi32i8 rriaddr:$src))]>;
304def MOVZX32rm16 : Pseudo<(outs GR32:$dst), (ins rriaddr:$src),
305                         "llh\t{$dst, $src}",
306                         [(set GR32:$dst, (zextloadi32i16 rriaddr:$src))]>;
307def MOVZX64rm8  : Pseudo<(outs GR64:$dst), (ins rriaddr:$src),
308                         "llgc\t{$dst, $src}",
309                         [(set GR64:$dst, (zextloadi64i8 rriaddr:$src))]>;
310def MOVZX64rm16 : Pseudo<(outs GR64:$dst), (ins rriaddr:$src),
311                         "llgh\t{$dst, $src}",
312                         [(set GR64:$dst, (zextloadi64i16 rriaddr:$src))]>;
313def MOVZX64rm32 : Pseudo<(outs GR64:$dst), (ins rriaddr:$src),
314                         "llgf\t{$dst, $src}",
315                         [(set GR64:$dst, (zextloadi64i32 rriaddr:$src))]>;
316
317// truncstores
318def MOV32m8r   : Pseudo<(outs), (ins rriaddr12:$dst, GR32:$src),
319                        "stc\t{$src, $dst}",
320                        [(truncstorei8 GR32:$src, rriaddr12:$dst)]>;
321
322def MOV32m8ry  : Pseudo<(outs), (ins rriaddr:$dst, GR32:$src),
323                        "stcy\t{$src, $dst}",
324                        [(truncstorei8 GR32:$src, rriaddr:$dst)]>;
325
326def MOV32m16r  : Pseudo<(outs), (ins rriaddr12:$dst, GR32:$src),
327                        "sth\t{$src, $dst}",
328                        [(truncstorei16 GR32:$src, rriaddr12:$dst)]>;
329
330def MOV32m16ry : Pseudo<(outs), (ins rriaddr:$dst, GR32:$src),
331                        "sthy\t{$src, $dst}",
332                        [(truncstorei16 GR32:$src, rriaddr:$dst)]>;
333
334def MOV64m8r   : Pseudo<(outs), (ins rriaddr12:$dst, GR64:$src),
335                        "stc\t{$src, $dst}",
336                        [(truncstorei8 GR64:$src, rriaddr12:$dst)]>;
337
338def MOV64m8ry  : Pseudo<(outs), (ins rriaddr:$dst, GR64:$src),
339                        "stcy\t{$src, $dst}",
340                        [(truncstorei8 GR64:$src, rriaddr:$dst)]>;
341
342def MOV64m16r  : Pseudo<(outs), (ins rriaddr12:$dst, GR64:$src),
343                        "sth\t{$src, $dst}",
344                        [(truncstorei16 GR64:$src, rriaddr12:$dst)]>;
345
346def MOV64m16ry : Pseudo<(outs), (ins rriaddr:$dst, GR64:$src),
347                        "sthy\t{$src, $dst}",
348                        [(truncstorei16 GR64:$src, rriaddr:$dst)]>;
349
350def MOV64m32r  : Pseudo<(outs), (ins rriaddr12:$dst, GR64:$src),
351                        "st\t{$src, $dst}",
352                        [(truncstorei32 GR64:$src, rriaddr12:$dst)]>;
353
354def MOV64m32ry : Pseudo<(outs), (ins rriaddr:$dst, GR64:$src),
355                        "sty\t{$src, $dst}",
356                        [(truncstorei32 GR64:$src, rriaddr:$dst)]>;
357
358// multiple regs moves
359// FIXME: should we use multiple arg nodes?
360def MOV32mrm  : Pseudo<(outs), (ins riaddr:$dst, GR32:$from, GR32:$to),
361                       "stmy\t{$from, $to, $dst}",
362                       []>;
363def MOV64mrm  : Pseudo<(outs), (ins riaddr:$dst, GR64:$from, GR64:$to),
364                       "stmg\t{$from, $to, $dst}",
365                       []>;
366def MOV32rmm  : Pseudo<(outs GR32:$from, GR32:$to), (ins riaddr:$dst),
367                       "lmy\t{$from, $to, $dst}",
368                       []>;
369def MOV64rmm  : Pseudo<(outs GR64:$from, GR64:$to), (ins riaddr:$dst),
370                       "lmg\t{$from, $to, $dst}",
371                       []>;
372
373let isReMaterializable = 1, isAsCheapAsAMove = 1, isTwoAddress = 1 in {
374def MOV64Pr0_even : Pseudo<(outs GR64P:$dst), (ins GR64P:$src),
375                           "lhi\t${dst:subreg_even}, 0",
376                           []>;
377def MOV128r0_even : Pseudo<(outs GR128:$dst), (ins GR128:$src),
378                           "lghi\t${dst:subreg_even}, 0",
379                           []>;
380}
381
382//===----------------------------------------------------------------------===//
383// Arithmetic Instructions
384
385let Defs = [PSW] in {
386def NEG32rr : Pseudo<(outs GR32:$dst), (ins GR32:$src),
387                     "lcr\t{$dst, $src}",
388                     [(set GR32:$dst, (ineg GR32:$src)),
389                      (implicit PSW)]>;
390def NEG64rr : Pseudo<(outs GR64:$dst), (ins GR64:$src),
391                     "lcgr\t{$dst, $src}",
392                     [(set GR64:$dst, (ineg GR64:$src)),
393                      (implicit PSW)]>;
394def NEG64rr32 : Pseudo<(outs GR64:$dst), (ins GR32:$src),
395                       "lcgfr\t{$dst, $src}",
396                       [(set GR64:$dst, (ineg (sext GR32:$src))),
397                        (implicit PSW)]>;
398}
399
400let isTwoAddress = 1 in {
401
402let Defs = [PSW] in {
403
404let isCommutable = 1 in { // X = ADD Y, Z  == X = ADD Z, Y
405// FIXME: Provide proper encoding!
406def ADD32rr : Pseudo<(outs GR32:$dst), (ins GR32:$src1, GR32:$src2),
407                     "ar\t{$dst, $src2}",
408                     [(set GR32:$dst, (add GR32:$src1, GR32:$src2)),
409                      (implicit PSW)]>;
410def ADD64rr : Pseudo<(outs GR64:$dst), (ins GR64:$src1, GR64:$src2),
411                     "agr\t{$dst, $src2}",
412                     [(set GR64:$dst, (add GR64:$src1, GR64:$src2)),
413                      (implicit PSW)]>;
414}
415
416// FIXME: Provide proper encoding!
417def ADD32ri16 : Pseudo<(outs GR32:$dst), (ins GR32:$src1, s16imm:$src2),
418                       "ahi\t{$dst, $src2}",
419                       [(set GR32:$dst, (add GR32:$src1, immSExt16:$src2)),
420                        (implicit PSW)]>;
421def ADD32ri   : Pseudo<(outs GR32:$dst), (ins GR32:$src1, s32imm:$src2),
422                       "afi\t{$dst, $src2}",
423                       [(set GR32:$dst, (add GR32:$src1, imm:$src2)),
424                        (implicit PSW)]>;
425def ADD64ri16 : Pseudo<(outs GR64:$dst), (ins GR64:$src1, s16imm64:$src2),
426                       "aghi\t{$dst, $src2}",
427                       [(set GR64:$dst, (add GR64:$src1, immSExt16:$src2)),
428                        (implicit PSW)]>;
429def ADD64ri32 : Pseudo<(outs GR64:$dst), (ins GR64:$src1, s32imm64:$src2),
430                       "agfi\t{$dst, $src2}",
431                       [(set GR64:$dst, (add GR64:$src1, immSExt32:$src2)),
432                        (implicit PSW)]>;
433
434let isCommutable = 1 in { // X = AND Y, Z  == X = AND Z, Y
435// FIXME: Provide proper encoding!
436def AND32rr : Pseudo<(outs GR32:$dst), (ins GR32:$src1, GR32:$src2),
437                     "nr\t{$dst, $src2}",
438                     [(set GR32:$dst, (and GR32:$src1, GR32:$src2))]>;
439def AND64rr : Pseudo<(outs GR64:$dst), (ins GR64:$src1, GR64:$src2),
440                     "ngr\t{$dst, $src2}",
441                     [(set GR64:$dst, (and GR64:$src1, GR64:$src2))]>;
442}
443
444// FIXME: Provide proper encoding!
445// FIXME: Compute masked bits properly!
446def AND32rill16 : Pseudo<(outs GR32:$dst), (ins GR32:$src1, i32imm:$src2),
447                         "nill\t{$dst, $src2}",
448                        [(set GR32:$dst, (and GR32:$src1, i32ll16c:$src2))]>;
449def AND64rill16 : Pseudo<(outs GR64:$dst), (ins GR64:$src1, i64imm:$src2),
450                         "nill\t{$dst, $src2}",
451                         [(set GR64:$dst, (and GR64:$src1, i64ll16c:$src2))]>;
452
453def AND32rilh16 : Pseudo<(outs GR32:$dst), (ins GR32:$src1, i32imm:$src2),
454                         "nilh\t{$dst, $src2}",
455                         [(set GR32:$dst, (and GR32:$src1, i32lh16c:$src2))]>;
456def AND64rilh16 : Pseudo<(outs GR64:$dst), (ins GR64:$src1, i64imm:$src2),
457                         "nilh\t{$dst, $src2}",
458                         [(set GR64:$dst, (and GR64:$src1, i64lh16c:$src2))]>;
459
460def AND64rihl16 : Pseudo<(outs GR64:$dst), (ins GR64:$src1, i64imm:$src2),
461                         "nihl\t{$dst, $src2}",
462                         [(set GR64:$dst, (and GR64:$src1, i64hl16c:$src2))]>;
463def AND64rihh16 : Pseudo<(outs GR64:$dst), (ins GR64:$src1, i64imm:$src2),
464                         "nihh\t{$dst, $src2}",
465                         [(set GR64:$dst, (and GR64:$src1, i64hh16c:$src2))]>;
466
467def AND32ri     : Pseudo<(outs GR32:$dst), (ins GR32:$src1, i32imm:$src2),
468                         "nilf\t{$dst, $src2}",
469                         [(set GR32:$dst, (and GR32:$src1, imm:$src2))]>;
470def AND64rilo32 : Pseudo<(outs GR64:$dst), (ins GR64:$src1, i64imm:$src2),
471                         "nilf\t{$dst, $src2}",
472                         [(set GR64:$dst, (and GR64:$src1, i64lo32c:$src2))]>;
473def AND64rihi32 : Pseudo<(outs GR64:$dst), (ins GR64:$src1, i64imm:$src2),
474                         "nihf\t{$dst, $src2}",
475                         [(set GR64:$dst, (and GR64:$src1, i64hi32c:$src2))]>;
476
477let isCommutable = 1 in { // X = OR Y, Z  == X = OR Z, Y
478// FIXME: Provide proper encoding!
479def OR32rr : Pseudo<(outs GR32:$dst), (ins GR32:$src1, GR32:$src2),
480                    "or\t{$dst, $src2}",
481                    [(set GR32:$dst, (or GR32:$src1, GR32:$src2))]>;
482def OR64rr : Pseudo<(outs GR64:$dst), (ins GR64:$src1, GR64:$src2),
483                    "ogr\t{$dst, $src2}",
484                    [(set GR64:$dst, (or GR64:$src1, GR64:$src2))]>;
485}
486
487def OR32ri16  : Pseudo<(outs GR32:$dst), (ins GR32:$src1, i32imm:$src2),
488                      "oill\t{$dst, $src2}",
489                      [(set GR32:$dst, (or GR32:$src1, i32ll16:$src2))]>;
490def OR32ri16h : Pseudo<(outs GR32:$dst), (ins GR32:$src1, i32imm:$src2),
491                      "oilh\t{$dst, $src2}",
492                      [(set GR32:$dst, (or GR32:$src1, i32lh16:$src2))]>;
493def OR32ri : Pseudo<(outs GR32:$dst), (ins GR32:$src1, i32imm:$src2),
494                    "oilf\t{$dst, $src2}",
495                    [(set GR32:$dst, (or GR32:$src1, imm:$src2))]>;
496
497def OR64rill16 : Pseudo<(outs GR64:$dst), (ins GR64:$src1, i64imm:$src2),
498                        "oill\t{$dst, $src2}",
499                        [(set GR64:$dst, (or GR64:$src1, i64ll16:$src2))]>;
500def OR64rilh16 : Pseudo<(outs GR64:$dst), (ins GR64:$src1, i64imm:$src2),
501                        "oilh\t{$dst, $src2}",
502                        [(set GR64:$dst, (or GR64:$src1, i64lh16:$src2))]>;
503def OR64rihl16 : Pseudo<(outs GR64:$dst), (ins GR64:$src1, i64imm:$src2),
504                        "oihl\t{$dst, $src2}",
505                        [(set GR64:$dst, (or GR64:$src1, i64hl16:$src2))]>;
506def OR64rihh16 : Pseudo<(outs GR64:$dst), (ins GR64:$src1, i64imm:$src2),
507                        "oihh\t{$dst, $src2}",
508                        [(set GR64:$dst, (or GR64:$src1, i64hh16:$src2))]>;
509
510def OR64rilo32 : Pseudo<(outs GR64:$dst), (ins GR64:$src1, i64imm:$src2),
511                        "oilf\t{$dst, $src2}",
512                        [(set GR64:$dst, (or GR64:$src1, i64lo32:$src2))]>;
513def OR64rihi32 : Pseudo<(outs GR64:$dst), (ins GR64:$src1, i64imm:$src2),
514                        "oihf\t{$dst, $src2}",
515                        [(set GR64:$dst, (or GR64:$src1, i64hi32:$src2))]>;
516
517// FIXME: Provide proper encoding!
518def SUB32rr : Pseudo<(outs GR32:$dst), (ins GR32:$src1, GR32:$src2),
519                     "sr\t{$dst, $src2}",
520                     [(set GR32:$dst, (sub GR32:$src1, GR32:$src2))]>;
521def SUB64rr : Pseudo<(outs GR64:$dst), (ins GR64:$src1, GR64:$src2),
522                     "sgr\t{$dst, $src2}",
523                     [(set GR64:$dst, (sub GR64:$src1, GR64:$src2))]>;
524
525
526let isCommutable = 1 in { // X = XOR Y, Z  == X = XOR Z, Y
527// FIXME: Provide proper encoding!
528def XOR32rr : Pseudo<(outs GR32:$dst), (ins GR32:$src1, GR32:$src2),
529                     "xr\t{$dst, $src2}",
530                     [(set GR32:$dst, (xor GR32:$src1, GR32:$src2))]>;
531def XOR64rr : Pseudo<(outs GR64:$dst), (ins GR64:$src1, GR64:$src2),
532                     "xgr\t{$dst, $src2}",
533                     [(set GR64:$dst, (xor GR64:$src1, GR64:$src2))]>;
534}
535
536def XOR32ri : Pseudo<(outs GR32:$dst), (ins GR32:$src1, i32imm:$src2),
537                     "xilf\t{$dst, $src2}",
538                     [(set GR32:$dst, (xor GR32:$src1, imm:$src2))]>;
539
540} // Defs = [PSW]
541
542let isCommutable = 1 in { // X = MUL Y, Z == X = MUL Z, Y
543def MUL32rr : Pseudo<(outs GR32:$dst), (ins GR32:$src1, GR32:$src2),
544                     "msr\t{$dst, $src2}",
545                     [(set GR32:$dst, (mul GR32:$src1, GR32:$src2))]>;
546def MUL64rr : Pseudo<(outs GR64:$dst), (ins GR64:$src1, GR64:$src2),
547                     "msgr\t{$dst, $src2}",
548                     [(set GR64:$dst, (mul GR64:$src1, GR64:$src2))]>;
549}
550
551def MUL64rrP   : Pseudo<(outs GR64P:$dst), (ins GR64P:$src1, GR32:$src2),
552                        "mr\t{$dst, $src2}",
553                        []>;
554def UMUL64rrP  : Pseudo<(outs GR64P:$dst), (ins GR64P:$src1, GR32:$src2),
555                         "mlr\t{$dst, $src2}",
556                         []>;
557def UMUL128rrP : Pseudo<(outs GR128:$dst), (ins GR128:$src1, GR64:$src2),
558                        "mlgr\t{$dst, $src2}",
559                        []>;
560
561def MUL32ri16   : Pseudo<(outs GR32:$dst), (ins GR32:$src1, s16imm:$src2),
562                         "mhi\t{$dst, $src2}",
563                         [(set GR32:$dst, (mul GR32:$src1, i32immSExt16:$src2))]>;
564def MUL64ri16   : Pseudo<(outs GR64:$dst), (ins GR64:$src1, s16imm64:$src2),
565                         "mghi\t{$dst, $src2}",
566                         [(set GR64:$dst, (mul GR64:$src1, immSExt16:$src2))]>;
567
568def MUL32ri     : Pseudo<(outs GR32:$dst), (ins GR32:$src1, s32imm:$src2),
569                         "msfi\t{$dst, $src2}",
570                         [(set GR32:$dst, (mul GR32:$src1, imm:$src2))]>,
571                         Requires<[IsZ10]>;
572def MUL64ri32   : Pseudo<(outs GR64:$dst), (ins GR64:$src1, s32imm64:$src2),
573                         "msgfi\t{$dst, $src2}",
574                         [(set GR64:$dst, (mul GR64:$src1, i64immSExt32:$src2))]>,
575                         Requires<[IsZ10]>;
576
577def MUL32rm : Pseudo<(outs GR32:$dst), (ins GR32:$src1, rriaddr12:$src2),
578                     "ms\t{$dst, $src2}",
579                     [(set GR32:$dst, (mul GR32:$src1, (load rriaddr12:$src2)))]>;
580def MUL32rmy : Pseudo<(outs GR32:$dst), (ins GR32:$src1, rriaddr:$src2),
581                      "msy\t{$dst, $src2}",
582                      [(set GR32:$dst, (mul GR32:$src1, (load rriaddr:$src2)))]>;
583def MUL64rm  : Pseudo<(outs GR64:$dst), (ins GR64:$src1, rriaddr:$src2),
584                      "msg\t{$dst, $src2}",
585                      [(set GR64:$dst, (mul GR64:$src1, (load rriaddr:$src2)))]>;
586
587def MULSX64rr32 : Pseudo<(outs GR64:$dst), (ins GR64:$src1, GR32:$src2),
588                         "msgfr\t{$dst, $src2}",
589                         [(set GR64:$dst, (mul GR64:$src1, (sext GR32:$src2)))]>;
590
591def SDIVREM32r : Pseudo<(outs GR128:$dst), (ins GR128:$src1, GR32:$src2),
592                        "dsgfr\t{$dst, $src2}",
593                        []>;
594def SDIVREM64r : Pseudo<(outs GR128:$dst), (ins GR128:$src1, GR64:$src2),
595                        "dsgr\t{$dst, $src2}",
596                        []>;
597
598def UDIVREM32r : Pseudo<(outs GR64P:$dst), (ins GR64P:$src1, GR32:$src2),
599                        "dlr\t{$dst, $src2}",
600                        []>;
601def UDIVREM64r : Pseudo<(outs GR128:$dst), (ins GR128:$src1, GR64:$src2),
602                        "dlgr\t{$dst, $src2}",
603                        []>;
604let mayLoad = 1 in {
605def SDIVREM32m : Pseudo<(outs GR128:$dst), (ins GR128:$src1, rriaddr:$src2),
606                        "dsgf\t{$dst, $src2}",
607                        []>;
608def SDIVREM64m : Pseudo<(outs GR128:$dst), (ins GR128:$src1, rriaddr:$src2),
609                        "dsg\t{$dst, $src2}",
610                        []>;
611
612def UDIVREM32m : Pseudo<(outs GR64P:$dst), (ins GR64P:$src1, rriaddr:$src2),
613                        "dl\t{$dst, $src2}",
614                        []>;
615def UDIVREM64m : Pseudo<(outs GR128:$dst), (ins GR128:$src1, rriaddr:$src2),
616                        "dlg\t{$dst, $src2}",
617                        []>;
618} // mayLoad
619} // isTwoAddress = 1
620
621//===----------------------------------------------------------------------===//
622// Shifts
623
624let isTwoAddress = 1 in
625def SRL32rri : Pseudo<(outs GR32:$dst), (ins GR32:$src, riaddr32:$amt),
626                      "srl\t{$src, $amt}",
627                      [(set GR32:$dst, (srl GR32:$src, riaddr32:$amt))]>;
628def SRL64rri : Pseudo<(outs GR64:$dst), (ins GR64:$src, riaddr:$amt),
629                      "srlg\t{$dst, $src, $amt}",
630                      [(set GR64:$dst, (srl GR64:$src, riaddr:$amt))]>;
631
632let isTwoAddress = 1 in
633def SHL32rri : Pseudo<(outs GR32:$dst), (ins GR32:$src, riaddr32:$amt),
634                      "sll\t{$src, $amt}",
635                      [(set GR32:$dst, (shl GR32:$src, riaddr32:$amt))]>;
636def SHL64rri : Pseudo<(outs GR64:$dst), (ins GR64:$src, riaddr:$amt),
637                      "sllg\t{$dst, $src, $amt}",
638                      [(set GR64:$dst, (shl GR64:$src, riaddr:$amt))]>;
639
640let Defs = [PSW] in {
641let isTwoAddress = 1 in
642def SRA32rri : Pseudo<(outs GR32:$dst), (ins GR32:$src, riaddr32:$amt),
643                      "sra\t{$src, $amt}",
644                      [(set GR32:$dst, (sra GR32:$src, riaddr32:$amt)),
645                       (implicit PSW)]>;
646
647def SRA64rri : Pseudo<(outs GR64:$dst), (ins GR64:$src, riaddr:$amt),
648                      "srag\t{$dst, $src, $amt}",
649                      [(set GR64:$dst, (sra GR64:$src, riaddr:$amt)),
650                       (implicit PSW)]>;
651} // Defs = [PSW]
652
653def ROTL32rri : Pseudo<(outs GR32:$dst), (ins GR32:$src, riaddr32:$amt),
654                       "rll\t{$dst, $src, $amt}",
655                       [(set GR32:$dst, (rotl GR32:$src, riaddr32:$amt))]>;
656def ROTL64rri : Pseudo<(outs GR64:$dst), (ins GR64:$src, riaddr:$amt),
657                       "rllg\t{$dst, $src, $amt}",
658                       [(set GR64:$dst, (rotl GR64:$src, riaddr:$amt))]>;
659
660//===----------------------------------------------------------------------===//
661// Test instructions (like AND but do not produce any result)
662
663// Integer comparisons
664let Defs = [PSW] in {
665def CMP32rr : Pseudo<(outs), (ins GR32:$src1, GR32:$src2),
666                     "cr\t$src1, $src2",
667                     [(SystemZcmp GR32:$src1, GR32:$src2), (implicit PSW)]>;
668def CMP64rr : Pseudo<(outs), (ins GR64:$src1, GR64:$src2),
669                     "cgr\t$src1, $src2",
670                     [(SystemZcmp GR64:$src1, GR64:$src2), (implicit PSW)]>;
671
672def CMP32ri   : Pseudo<(outs), (ins GR32:$src1, s32imm:$src2),
673                       "cfi\t$src1, $src2",
674                       [(SystemZcmp GR32:$src1, imm:$src2), (implicit PSW)]>;
675def CMP64ri32 : Pseudo<(outs), (ins GR64:$src1, s32imm64:$src2),
676                       "cgfi\t$src1, $src2",
677                       [(SystemZcmp GR64:$src1, i64immSExt32:$src2),
678                        (implicit PSW)]>;
679
680def CMP32rm : Pseudo<(outs), (ins GR32:$src1, rriaddr12:$src2),
681                     "c\t$src1, $src2",
682                     [(SystemZcmp GR32:$src1, (load rriaddr12:$src2)),
683                      (implicit PSW)]>;
684def CMP32rmy : Pseudo<(outs), (ins GR32:$src1, rriaddr:$src2),
685                      "cy\t$src1, $src2",
686                      [(SystemZcmp GR32:$src1, (load rriaddr:$src2)),
687                       (implicit PSW)]>;
688def CMP64rm  : Pseudo<(outs), (ins GR64:$src1, rriaddr:$src2),
689                      "cg\t$src1, $src2",
690                      [(SystemZcmp GR64:$src1, (load rriaddr:$src2)),
691                       (implicit PSW)]>;
692
693def UCMP32rr : Pseudo<(outs), (ins GR32:$src1, GR32:$src2),
694                      "clr\t$src1, $src2",
695                      [(SystemZucmp GR32:$src1, GR32:$src2), (implicit PSW)]>;
696def UCMP64rr : Pseudo<(outs), (ins GR64:$src1, GR64:$src2),
697                      "clgr\t$src1, $src2",
698                      [(SystemZucmp GR64:$src1, GR64:$src2), (implicit PSW)]>;
699
700def UCMP32ri   : Pseudo<(outs), (ins GR32:$src1, i32imm:$src2),
701                        "clfi\t$src1, $src2",
702                        [(SystemZucmp GR32:$src1, imm:$src2), (implicit PSW)]>;
703def UCMP64ri32 : Pseudo<(outs), (ins GR64:$src1, i64i32imm:$src2),
704                        "clgfi\t$src1, $src2",
705                        [(SystemZucmp GR64:$src1, i64immZExt32:$src2),
706                         (implicit PSW)]>;
707
708def UCMP32rm  : Pseudo<(outs), (ins GR32:$src1, rriaddr12:$src2),
709                       "cl\t$src1, $src2",
710                       [(SystemZucmp GR32:$src1, (load rriaddr12:$src2)),
711                        (implicit PSW)]>;
712def UCMP32rmy : Pseudo<(outs), (ins GR32:$src1, rriaddr:$src2),
713                       "cly\t$src1, $src2",
714                       [(SystemZucmp GR32:$src1, (load rriaddr:$src2)),
715                        (implicit PSW)]>;
716def UCMP64rm  : Pseudo<(outs), (ins GR64:$src1, rriaddr:$src2),
717                       "clg\t$src1, $src2",
718                       [(SystemZucmp GR64:$src1, (load rriaddr:$src2)),
719                        (implicit PSW)]>;
720
721def CMPSX64rr32  : Pseudo<(outs), (ins GR64:$src1, GR32:$src2),
722                          "cgfr\t$src1, $src2",
723                          [(SystemZucmp GR64:$src1, (sext GR32:$src2)),
724                           (implicit PSW)]>;
725def UCMPZX64rr32 : Pseudo<(outs), (ins GR64:$src1, GR32:$src2),
726                          "clgfr\t$src1, $src2",
727                          [(SystemZucmp GR64:$src1, (zext GR32:$src2)),
728                           (implicit PSW)]>;
729
730def CMPSX64rm32   : Pseudo<(outs), (ins GR64:$src1, rriaddr:$src2),
731                           "cgf\t$src1, $src2",
732                           [(SystemZucmp GR64:$src1, (sextloadi64i32 rriaddr:$src2)),
733                            (implicit PSW)]>;
734def UCMPZX64rm32  : Pseudo<(outs), (ins GR64:$src1, rriaddr:$src2),
735                           "clgf\t$src1, $src2",
736                           [(SystemZucmp GR64:$src1, (zextloadi64i32 rriaddr:$src2)),
737                            (implicit PSW)]>;
738
739// FIXME: Add other crazy ucmp forms
740
741} // Defs = [PSW]
742
743//===----------------------------------------------------------------------===//
744// Non-Instruction Patterns.
745//===----------------------------------------------------------------------===//
746
747// JumpTable
748def : Pat<(SystemZpcrelwrapper tjumptable:$src), (LA64rm tjumptable:$src)>;
749
750// anyext
751def : Pat<(i64 (anyext GR32:$src)),
752          (INSERT_SUBREG (i64 (IMPLICIT_DEF)), GR32:$src, subreg_32bit)>;
753
754// calls
755def : Pat<(SystemZcall (i64 tglobaladdr:$dst)), (CALLi tglobaladdr:$dst)>;
756def : Pat<(SystemZcall (i64 texternalsym:$dst)), (CALLi texternalsym:$dst)>;
757
758//===----------------------------------------------------------------------===//
759// Peepholes.
760//===----------------------------------------------------------------------===//
761
762// FIXME: use add/sub tricks with 32678/-32768
763
764// Arbitrary immediate support.  Implement in terms of LLIHF/OILF.
765def : Pat<(i64 imm:$imm),
766          (OR64rilo32 (MOV64rihi32 (HI32 imm:$imm)), (LO32 imm:$imm))>;
767
768// trunc patterns
769def : Pat<(i32 (trunc GR64:$src)),
770          (EXTRACT_SUBREG GR64:$src, subreg_32bit)>;
771
772// sext_inreg patterns
773def : Pat<(sext_inreg GR64:$src, i32),
774          (MOVSX64rr32 (EXTRACT_SUBREG GR64:$src, subreg_32bit))>;
775
776// extload patterns
777def : Pat<(extloadi32i8  rriaddr:$src), (MOVZX32rm8  rriaddr:$src)>;
778def : Pat<(extloadi32i16 rriaddr:$src), (MOVZX32rm16 rriaddr:$src)>;
779def : Pat<(extloadi64i8  rriaddr:$src), (MOVZX64rm8  rriaddr:$src)>;
780def : Pat<(extloadi64i16 rriaddr:$src), (MOVZX64rm16 rriaddr:$src)>;
781def : Pat<(extloadi64i32 rriaddr:$src), (MOVZX64rm32 rriaddr:$src)>;
782
783// muls
784def : Pat<(mulhs GR32:$src1, GR32:$src2),
785          (EXTRACT_SUBREG (MUL64rrP (INSERT_SUBREG (i64 (IMPLICIT_DEF)),
786                                                   GR32:$src1, subreg_odd32),
787                                    GR32:$src2),
788                          subreg_even32)>;
789
790def : Pat<(mulhu GR32:$src1, GR32:$src2),
791          (EXTRACT_SUBREG (UMUL64rrP (INSERT_SUBREG (i64 (IMPLICIT_DEF)),
792                                                    GR32:$src1, subreg_odd32),
793                                     GR32:$src2),
794                          subreg_even32)>;
795def : Pat<(mulhu GR64:$src1, GR64:$src2),
796          (EXTRACT_SUBREG (UMUL128rrP (INSERT_SUBREG (i128 (IMPLICIT_DEF)),
797                                                     GR64:$src1, subreg_odd),
798                                      GR64:$src2),
799                          subreg_even)>;
800
801def : Pat<(i32 imm:$src),
802          (EXTRACT_SUBREG (MOV64ri32 (i64 imm:$src)), subreg_32bit)>;
803