OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [config/] [xtensa/] [xtensa.md] - Blame information for rev 713

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 709 jeremybenn
;; GCC machine description for Tensilica's Xtensa architecture.
2
;; Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010
3
;; Free Software Foundation, Inc.
4
;; Contributed by Bob Wilson (bwilson@tensilica.com) at Tensilica.
5
 
6
;; This file is part of GCC.
7
 
8
;; GCC is free software; you can redistribute it and/or modify it
9
;; under the terms of the GNU General Public License as published by
10
;; the Free Software Foundation; either version 3, or (at your option)
11
;; any later version.
12
 
13
;; GCC is distributed in the hope that it will be useful, but WITHOUT
14
;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
15
;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
16
;; License for more details.
17
 
18
;; You should have received a copy of the GNU General Public License
19
;; along with GCC; see the file COPYING3.  If not see
20
;; .
21
 
22
 
23
(define_constants [
24
  (A0_REG               0)
25
  (A1_REG               1)
26
  (A7_REG               7)
27
  (A8_REG               8)
28
 
29
  (UNSPEC_NOP           2)
30
  (UNSPEC_PLT           3)
31
  (UNSPEC_RET_ADDR      4)
32
  (UNSPEC_TPOFF         5)
33
  (UNSPEC_DTPOFF        6)
34
  (UNSPEC_TLS_FUNC      7)
35
  (UNSPEC_TLS_ARG       8)
36
  (UNSPEC_TLS_CALL      9)
37
  (UNSPEC_TP            10)
38
  (UNSPEC_MEMW          11)
39
 
40
  (UNSPECV_SET_FP       1)
41
  (UNSPECV_ENTRY        2)
42
  (UNSPECV_S32RI        4)
43
  (UNSPECV_S32C1I       5)
44
  (UNSPECV_EH_RETURN    6)
45
  (UNSPECV_SET_TP       7)
46
])
47
 
48
;; This code iterator allows signed and unsigned widening multiplications
49
;; to use the same template.
50
(define_code_iterator any_extend [sign_extend zero_extend])
51
 
52
;;  expands to an empty string when doing a signed operation and
53
;; "u" when doing an unsigned operation.
54
(define_code_attr u [(sign_extend "") (zero_extend "u")])
55
 
56
;;  is like , but the signed form expands to "s" rather than "".
57
(define_code_attr su [(sign_extend "s") (zero_extend "u")])
58
 
59
;; This code iterator allows four integer min/max operations to be
60
;; generated from one template.
61
(define_code_iterator any_minmax [smin umin smax umax])
62
 
63
;;  expands to the opcode name for any_minmax operations.
64
(define_code_attr minmax [(smin "min") (umin "minu")
65
                          (smax "max") (umax "maxu")])
66
 
67
;; This code iterator is for floating-point comparisons.
68
(define_code_iterator any_scc_sf [eq lt le uneq unlt unle unordered])
69
(define_code_attr scc_sf [(eq "oeq") (lt "olt") (le "ole")
70
                          (uneq "ueq") (unlt "ult") (unle "ule")
71
                          (unordered "un")])
72
 
73
;; This iterator and attribute allow to combine most atomic operations.
74
(define_code_iterator ATOMIC [and ior xor plus minus mult])
75
(define_code_attr atomic [(and "and") (ior "ior") (xor "xor")
76
                          (plus "add") (minus "sub") (mult "nand")])
77
 
78
;; This mode iterator allows the HI and QI patterns to be defined from
79
;; the same template.
80
(define_mode_iterator HQI [HI QI])
81
 
82
 
83
;; Attributes.
84
 
85
(define_attr "type"
86
  "unknown,jump,call,load,store,move,arith,multi,nop,farith,fmadd,fdiv,fsqrt,fconv,fload,fstore,mul16,mul32,div32,mac16,rsr,wsr,entry"
87
  (const_string "unknown"))
88
 
89
(define_attr "mode"
90
  "unknown,none,QI,HI,SI,DI,SF,DF,BL"
91
  (const_string "unknown"))
92
 
93
(define_attr "length" "" (const_int 1))
94
 
95
;; Describe a user's asm statement.
96
(define_asm_attributes
97
  [(set_attr "type" "multi")])
98
 
99
 
100
;; Pipeline model.
101
 
102
;; The Xtensa basically has simple 5-stage RISC pipeline.
103
;; Most instructions complete in 1 cycle, and it is OK to assume that
104
;; everything is fully pipelined.  The exceptions have special insn
105
;; reservations in the pipeline description below.  The Xtensa can
106
;; issue one instruction per cycle, so defining CPU units is unnecessary.
107
 
108
(define_insn_reservation "xtensa_any_insn" 1
109
                         (eq_attr "type" "!load,fload,rsr,mul16,mul32,fmadd,fconv")
110
                         "nothing")
111
 
112
(define_insn_reservation "xtensa_memory" 2
113
                         (eq_attr "type" "load,fload")
114
                         "nothing")
115
 
116
(define_insn_reservation "xtensa_sreg" 2
117
                         (eq_attr "type" "rsr")
118
                         "nothing")
119
 
120
(define_insn_reservation "xtensa_mul16" 2
121
                         (eq_attr "type" "mul16")
122
                         "nothing")
123
 
124
(define_insn_reservation "xtensa_mul32" 2
125
                         (eq_attr "type" "mul32")
126
                         "nothing")
127
 
128
(define_insn_reservation "xtensa_fmadd" 4
129
                         (eq_attr "type" "fmadd")
130
                         "nothing")
131
 
132
(define_insn_reservation "xtensa_fconv" 2
133
                         (eq_attr "type" "fconv")
134
                         "nothing")
135
 
136
;; Include predicates and constraints.
137
 
138
(include "predicates.md")
139
(include "constraints.md")
140
 
141
 
142
;; Addition.
143
 
144
(define_insn "addsi3"
145
  [(set (match_operand:SI 0 "register_operand" "=D,D,a,a,a")
146
        (plus:SI (match_operand:SI 1 "register_operand" "%d,d,r,r,r")
147
                 (match_operand:SI 2 "add_operand" "d,O,r,J,N")))]
148
  ""
149
  "@
150
   add.n\t%0, %1, %2
151
   addi.n\t%0, %1, %d2
152
   add\t%0, %1, %2
153
   addi\t%0, %1, %d2
154
   addmi\t%0, %1, %x2"
155
  [(set_attr "type"     "arith,arith,arith,arith,arith")
156
   (set_attr "mode"     "SI")
157
   (set_attr "length"   "2,2,3,3,3")])
158
 
159
(define_insn "*addx"
160
  [(set (match_operand:SI 0 "register_operand" "=a")
161
        (plus:SI (mult:SI (match_operand:SI 1 "register_operand" "r")
162
                          (match_operand:SI 3 "addsubx_operand" "i"))
163
                 (match_operand:SI 2 "register_operand" "r")))]
164
  "TARGET_ADDX"
165
  "addx%3\t%0, %1, %2"
166
  [(set_attr "type"     "arith")
167
   (set_attr "mode"     "SI")
168
   (set_attr "length"   "3")])
169
 
170
(define_insn "addsf3"
171
  [(set (match_operand:SF 0 "register_operand" "=f")
172
        (plus:SF (match_operand:SF 1 "register_operand" "%f")
173
                 (match_operand:SF 2 "register_operand" "f")))]
174
  "TARGET_HARD_FLOAT"
175
  "add.s\t%0, %1, %2"
176
  [(set_attr "type"     "fmadd")
177
   (set_attr "mode"     "SF")
178
   (set_attr "length"   "3")])
179
 
180
 
181
;; Subtraction.
182
 
183
(define_insn "subsi3"
184
  [(set (match_operand:SI 0 "register_operand" "=a")
185
        (minus:SI (match_operand:SI 1 "register_operand" "r")
186
                  (match_operand:SI 2 "register_operand" "r")))]
187
  ""
188
  "sub\t%0, %1, %2"
189
  [(set_attr "type"     "arith")
190
   (set_attr "mode"     "SI")
191
   (set_attr "length"   "3")])
192
 
193
(define_insn "*subx"
194
  [(set (match_operand:SI 0 "register_operand" "=a")
195
        (minus:SI (mult:SI (match_operand:SI 1 "register_operand" "r")
196
                           (match_operand:SI 3 "addsubx_operand" "i"))
197
                  (match_operand:SI 2 "register_operand" "r")))]
198
  "TARGET_ADDX"
199
  "subx%3\t%0, %1, %2"
200
  [(set_attr "type"     "arith")
201
   (set_attr "mode"     "SI")
202
   (set_attr "length"   "3")])
203
 
204
(define_insn "subsf3"
205
  [(set (match_operand:SF 0 "register_operand" "=f")
206
        (minus:SF (match_operand:SF 1 "register_operand" "f")
207
                  (match_operand:SF 2 "register_operand" "f")))]
208
  "TARGET_HARD_FLOAT"
209
  "sub.s\t%0, %1, %2"
210
  [(set_attr "type"     "fmadd")
211
   (set_attr "mode"     "SF")
212
   (set_attr "length"   "3")])
213
 
214
 
215
;; Multiplication.
216
 
217
(define_expand "mulsidi3"
218
  [(set (match_operand:DI 0 "register_operand")
219
        (mult:DI (any_extend:DI (match_operand:SI 1 "register_operand"))
220
                 (any_extend:DI (match_operand:SI 2 "register_operand"))))]
221
  "TARGET_MUL32_HIGH"
222
{
223
  rtx temp = gen_reg_rtx (SImode);
224
  emit_insn (gen_mulsi3 (temp, operands[1], operands[2]));
225
  emit_insn (gen_mulsi3_highpart (gen_highpart (SImode, operands[0]),
226
                                     operands[1], operands[2]));
227
  emit_insn (gen_movsi (gen_lowpart (SImode, operands[0]), temp));
228
  DONE;
229
})
230
 
231
(define_insn "mulsi3_highpart"
232
  [(set (match_operand:SI 0 "register_operand" "=a")
233
        (truncate:SI
234
         (lshiftrt:DI
235
          (mult:DI (any_extend:DI (match_operand:SI 1 "register_operand" "%r"))
236
                   (any_extend:DI (match_operand:SI 2 "register_operand" "r")))
237
          (const_int 32))))]
238
  "TARGET_MUL32_HIGH"
239
  "mulh\t%0, %1, %2"
240
  [(set_attr "type"     "mul32")
241
   (set_attr "mode"     "SI")
242
   (set_attr "length"   "3")])
243
 
244
(define_insn "mulsi3"
245
  [(set (match_operand:SI 0 "register_operand" "=a")
246
        (mult:SI (match_operand:SI 1 "register_operand" "%r")
247
                 (match_operand:SI 2 "register_operand" "r")))]
248
  "TARGET_MUL32"
249
  "mull\t%0, %1, %2"
250
  [(set_attr "type"     "mul32")
251
   (set_attr "mode"     "SI")
252
   (set_attr "length"   "3")])
253
 
254
(define_insn "mulhisi3"
255
  [(set (match_operand:SI 0 "register_operand" "=C,A")
256
        (mult:SI (sign_extend:SI
257
                  (match_operand:HI 1 "register_operand" "%r,r"))
258
                 (sign_extend:SI
259
                  (match_operand:HI 2 "register_operand" "r,r"))))]
260
  "TARGET_MUL16 || TARGET_MAC16"
261
  "@
262
   mul16s\t%0, %1, %2
263
   mul.aa.ll\t%1, %2"
264
  [(set_attr "type"     "mul16,mac16")
265
   (set_attr "mode"     "SI")
266
   (set_attr "length"   "3,3")])
267
 
268
(define_insn "umulhisi3"
269
  [(set (match_operand:SI 0 "register_operand" "=C,A")
270
        (mult:SI (zero_extend:SI
271
                  (match_operand:HI 1 "register_operand" "%r,r"))
272
                 (zero_extend:SI
273
                  (match_operand:HI 2 "register_operand" "r,r"))))]
274
  "TARGET_MUL16 || TARGET_MAC16"
275
  "@
276
   mul16u\t%0, %1, %2
277
   umul.aa.ll\t%1, %2"
278
  [(set_attr "type"     "mul16,mac16")
279
   (set_attr "mode"     "SI")
280
   (set_attr "length"   "3,3")])
281
 
282
(define_insn "muladdhisi"
283
  [(set (match_operand:SI 0 "register_operand" "=A")
284
        (plus:SI (mult:SI (sign_extend:SI
285
                           (match_operand:HI 1 "register_operand" "%r"))
286
                          (sign_extend:SI
287
                           (match_operand:HI 2 "register_operand" "r")))
288
                 (match_operand:SI 3 "register_operand" "0")))]
289
  "TARGET_MAC16"
290
  "mula.aa.ll\t%1, %2"
291
  [(set_attr "type"     "mac16")
292
   (set_attr "mode"     "SI")
293
   (set_attr "length"   "3")])
294
 
295
(define_insn "mulsubhisi"
296
  [(set (match_operand:SI 0 "register_operand" "=A")
297
        (minus:SI (match_operand:SI 1 "register_operand" "0")
298
                  (mult:SI (sign_extend:SI
299
                            (match_operand:HI 2 "register_operand" "%r"))
300
                           (sign_extend:SI
301
                            (match_operand:HI 3 "register_operand" "r")))))]
302
  "TARGET_MAC16"
303
  "muls.aa.ll\t%2, %3"
304
  [(set_attr "type"     "mac16")
305
   (set_attr "mode"     "SI")
306
   (set_attr "length"   "3")])
307
 
308
(define_insn "mulsf3"
309
  [(set (match_operand:SF 0 "register_operand" "=f")
310
        (mult:SF (match_operand:SF 1 "register_operand" "%f")
311
                 (match_operand:SF 2 "register_operand" "f")))]
312
  "TARGET_HARD_FLOAT"
313
  "mul.s\t%0, %1, %2"
314
  [(set_attr "type"     "fmadd")
315
   (set_attr "mode"     "SF")
316
   (set_attr "length"   "3")])
317
 
318
(define_insn "fmasf4"
319
  [(set (match_operand:SF 0 "register_operand" "=f")
320
        (fma:SF (match_operand:SF 1 "register_operand" "f")
321
                (match_operand:SF 2 "register_operand" "f")
322
                (match_operand:SF 3 "register_operand" "0")))]
323
  "TARGET_HARD_FLOAT"
324
  "madd.s\t%0, %1, %2"
325
  [(set_attr "type"     "fmadd")
326
   (set_attr "mode"     "SF")
327
   (set_attr "length"   "3")])
328
 
329
;; Note that (C - A*B) = (-A*B + C)
330
(define_insn "fnmasf4"
331
  [(set (match_operand:SF 0 "register_operand" "=f")
332
        (fma:SF (neg:SF (match_operand:SF 1 "register_operand" "f"))
333
                (match_operand:SF 2 "register_operand" "f")
334
                (match_operand:SF 3 "register_operand" "0")))]
335
  "TARGET_HARD_FLOAT"
336
  "msub.s\t%0, %1, %2"
337
  [(set_attr "type"     "fmadd")
338
   (set_attr "mode"     "SF")
339
   (set_attr "length"   "3")])
340
 
341
 
342
;; Division.
343
 
344
(define_insn "divsi3"
345
  [(set (match_operand:SI 0 "register_operand" "=a")
346
        (div:SI (match_operand:SI 1 "register_operand" "r")
347
                (match_operand:SI 2 "register_operand" "r")))]
348
  "TARGET_DIV32"
349
  "quos\t%0, %1, %2"
350
  [(set_attr "type"     "div32")
351
   (set_attr "mode"     "SI")
352
   (set_attr "length"   "3")])
353
 
354
(define_insn "udivsi3"
355
  [(set (match_operand:SI 0 "register_operand" "=a")
356
        (udiv:SI (match_operand:SI 1 "register_operand" "r")
357
                 (match_operand:SI 2 "register_operand" "r")))]
358
  "TARGET_DIV32"
359
  "quou\t%0, %1, %2"
360
  [(set_attr "type"     "div32")
361
   (set_attr "mode"     "SI")
362
   (set_attr "length"   "3")])
363
 
364
(define_insn "divsf3"
365
  [(set (match_operand:SF 0 "register_operand" "=f")
366
        (div:SF (match_operand:SF 1 "register_operand" "f")
367
                (match_operand:SF 2 "register_operand" "f")))]
368
  "TARGET_HARD_FLOAT_DIV"
369
  "div.s\t%0, %1, %2"
370
  [(set_attr "type"     "fdiv")
371
   (set_attr "mode"     "SF")
372
   (set_attr "length"   "3")])
373
 
374
(define_insn "*recipsf2"
375
  [(set (match_operand:SF 0 "register_operand" "=f")
376
        (div:SF (match_operand:SF 1 "const_float_1_operand" "")
377
                (match_operand:SF 2 "register_operand" "f")))]
378
  "TARGET_HARD_FLOAT_RECIP && flag_unsafe_math_optimizations"
379
  "recip.s\t%0, %2"
380
  [(set_attr "type"     "fdiv")
381
   (set_attr "mode"     "SF")
382
   (set_attr "length"   "3")])
383
 
384
 
385
;; Remainders.
386
 
387
(define_insn "modsi3"
388
  [(set (match_operand:SI 0 "register_operand" "=a")
389
        (mod:SI (match_operand:SI 1 "register_operand" "r")
390
                (match_operand:SI 2 "register_operand" "r")))]
391
  "TARGET_DIV32"
392
  "rems\t%0, %1, %2"
393
  [(set_attr "type"     "div32")
394
   (set_attr "mode"     "SI")
395
   (set_attr "length"   "3")])
396
 
397
(define_insn "umodsi3"
398
  [(set (match_operand:SI 0 "register_operand" "=a")
399
        (umod:SI (match_operand:SI 1 "register_operand" "r")
400
                 (match_operand:SI 2 "register_operand" "r")))]
401
  "TARGET_DIV32"
402
  "remu\t%0, %1, %2"
403
  [(set_attr "type"     "div32")
404
   (set_attr "mode"     "SI")
405
   (set_attr "length"   "3")])
406
 
407
 
408
;; Square roots.
409
 
410
(define_insn "sqrtsf2"
411
  [(set (match_operand:SF 0 "register_operand" "=f")
412
        (sqrt:SF (match_operand:SF 1 "register_operand" "f")))]
413
  "TARGET_HARD_FLOAT_SQRT"
414
  "sqrt.s\t%0, %1"
415
  [(set_attr "type"     "fsqrt")
416
   (set_attr "mode"     "SF")
417
   (set_attr "length"   "3")])
418
 
419
(define_insn "*rsqrtsf2"
420
  [(set (match_operand:SF 0 "register_operand" "=f")
421
        (div:SF (match_operand:SF 1 "const_float_1_operand" "")
422
                (sqrt:SF (match_operand:SF 2 "register_operand" "f"))))]
423
  "TARGET_HARD_FLOAT_RSQRT && flag_unsafe_math_optimizations"
424
  "rsqrt.s\t%0, %2"
425
  [(set_attr "type"     "fsqrt")
426
   (set_attr "mode"     "SF")
427
   (set_attr "length"   "3")])
428
 
429
 
430
;; Absolute value.
431
 
432
(define_insn "abssi2"
433
  [(set (match_operand:SI 0 "register_operand" "=a")
434
        (abs:SI (match_operand:SI 1 "register_operand" "r")))]
435
  "TARGET_ABS"
436
  "abs\t%0, %1"
437
  [(set_attr "type"     "arith")
438
   (set_attr "mode"     "SI")
439
   (set_attr "length"   "3")])
440
 
441
(define_insn "abssf2"
442
  [(set (match_operand:SF 0 "register_operand" "=f")
443
        (abs:SF (match_operand:SF 1 "register_operand" "f")))]
444
  "TARGET_HARD_FLOAT"
445
  "abs.s\t%0, %1"
446
  [(set_attr "type"     "farith")
447
   (set_attr "mode"     "SF")
448
   (set_attr "length"   "3")])
449
 
450
 
451
;; Min and max.
452
 
453
(define_insn "si3"
454
  [(set (match_operand:SI 0 "register_operand" "=a")
455
        (any_minmax:SI (match_operand:SI 1 "register_operand" "%r")
456
                       (match_operand:SI 2 "register_operand" "r")))]
457
  "TARGET_MINMAX"
458
  "\t%0, %1, %2"
459
  [(set_attr "type"     "arith")
460
   (set_attr "mode"     "SI")
461
   (set_attr "length"   "3")])
462
 
463
 
464
;; Count leading/trailing zeros and find first bit.
465
 
466
(define_insn "clzsi2"
467
  [(set (match_operand:SI 0 "register_operand" "=a")
468
        (clz:SI (match_operand:SI 1 "register_operand" "r")))]
469
  "TARGET_NSA"
470
  "nsau\t%0, %1"
471
  [(set_attr "type"     "arith")
472
   (set_attr "mode"     "SI")
473
   (set_attr "length"   "3")])
474
 
475
(define_expand "ctzsi2"
476
  [(set (match_operand:SI 0 "register_operand" "")
477
        (ctz:SI (match_operand:SI 1 "register_operand" "")))]
478
  "TARGET_NSA"
479
{
480
  rtx temp = gen_reg_rtx (SImode);
481
  emit_insn (gen_negsi2 (temp, operands[1]));
482
  emit_insn (gen_andsi3 (temp, temp, operands[1]));
483
  emit_insn (gen_clzsi2 (temp, temp));
484
  emit_insn (gen_negsi2 (temp, temp));
485
  emit_insn (gen_addsi3 (operands[0], temp, GEN_INT (31)));
486
  DONE;
487
})
488
 
489
(define_expand "ffssi2"
490
  [(set (match_operand:SI 0 "register_operand" "")
491
        (ffs:SI (match_operand:SI 1 "register_operand" "")))]
492
  "TARGET_NSA"
493
{
494
  rtx temp = gen_reg_rtx (SImode);
495
  emit_insn (gen_negsi2 (temp, operands[1]));
496
  emit_insn (gen_andsi3 (temp, temp, operands[1]));
497
  emit_insn (gen_clzsi2 (temp, temp));
498
  emit_insn (gen_negsi2 (temp, temp));
499
  emit_insn (gen_addsi3 (operands[0], temp, GEN_INT (32)));
500
  DONE;
501
})
502
 
503
 
504
;; Negation and one's complement.
505
 
506
(define_insn "negsi2"
507
  [(set (match_operand:SI 0 "register_operand" "=a")
508
        (neg:SI (match_operand:SI 1 "register_operand" "r")))]
509
  ""
510
  "neg\t%0, %1"
511
  [(set_attr "type"     "arith")
512
   (set_attr "mode"     "SI")
513
   (set_attr "length"   "3")])
514
 
515
(define_expand "one_cmplsi2"
516
  [(set (match_operand:SI 0 "register_operand" "")
517
        (not:SI (match_operand:SI 1 "register_operand" "")))]
518
  ""
519
{
520
  rtx temp = gen_reg_rtx (SImode);
521
  emit_insn (gen_movsi (temp, constm1_rtx));
522
  emit_insn (gen_xorsi3 (operands[0], temp, operands[1]));
523
  DONE;
524
})
525
 
526
(define_insn "negsf2"
527
  [(set (match_operand:SF 0 "register_operand" "=f")
528
        (neg:SF (match_operand:SF 1 "register_operand" "f")))]
529
  "TARGET_HARD_FLOAT"
530
  "neg.s\t%0, %1"
531
  [(set_attr "type"     "farith")
532
   (set_attr "mode"     "SF")
533
   (set_attr "length"   "3")])
534
 
535
 
536
;; Logical instructions.
537
 
538
(define_insn "andsi3"
539
  [(set (match_operand:SI 0 "register_operand" "=a,a")
540
        (and:SI (match_operand:SI 1 "register_operand" "%r,r")
541
                (match_operand:SI 2 "mask_operand" "P,r")))]
542
  ""
543
  "@
544
   extui\t%0, %1, 0, %K2
545
   and\t%0, %1, %2"
546
  [(set_attr "type"     "arith,arith")
547
   (set_attr "mode"     "SI")
548
   (set_attr "length"   "3,3")])
549
 
550
(define_insn "iorsi3"
551
  [(set (match_operand:SI 0 "register_operand" "=a")
552
        (ior:SI (match_operand:SI 1 "register_operand" "%r")
553
                (match_operand:SI 2 "register_operand" "r")))]
554
  ""
555
  "or\t%0, %1, %2"
556
  [(set_attr "type"     "arith")
557
   (set_attr "mode"     "SI")
558
   (set_attr "length"   "3")])
559
 
560
(define_insn "xorsi3"
561
  [(set (match_operand:SI 0 "register_operand" "=a")
562
        (xor:SI (match_operand:SI 1 "register_operand" "%r")
563
                (match_operand:SI 2 "register_operand" "r")))]
564
  ""
565
  "xor\t%0, %1, %2"
566
  [(set_attr "type"     "arith")
567
   (set_attr "mode"     "SI")
568
   (set_attr "length"   "3")])
569
 
570
 
571
;; Zero-extend instructions.
572
 
573
(define_insn "zero_extendhisi2"
574
  [(set (match_operand:SI 0 "register_operand" "=a,a")
575
        (zero_extend:SI (match_operand:HI 1 "nonimmed_operand" "r,U")))]
576
  ""
577
  "@
578
   extui\t%0, %1, 0, 16
579
   l16ui\t%0, %1"
580
  [(set_attr "type"     "arith,load")
581
   (set_attr "mode"     "SI")
582
   (set_attr "length"   "3,3")])
583
 
584
(define_insn "zero_extendqisi2"
585
  [(set (match_operand:SI 0 "register_operand" "=a,a")
586
        (zero_extend:SI (match_operand:QI 1 "nonimmed_operand" "r,U")))]
587
  ""
588
  "@
589
   extui\t%0, %1, 0, 8
590
   l8ui\t%0, %1"
591
  [(set_attr "type"     "arith,load")
592
   (set_attr "mode"     "SI")
593
   (set_attr "length"   "3,3")])
594
 
595
 
596
;; Sign-extend instructions.
597
 
598
(define_expand "extendhisi2"
599
  [(set (match_operand:SI 0 "register_operand" "")
600
        (sign_extend:SI (match_operand:HI 1 "register_operand" "")))]
601
  ""
602
{
603
  if (sext_operand (operands[1], HImode))
604
    emit_insn (gen_extendhisi2_internal (operands[0], operands[1]));
605
  else
606
    xtensa_extend_reg (operands[0], operands[1]);
607
  DONE;
608
})
609
 
610
(define_insn "extendhisi2_internal"
611
  [(set (match_operand:SI 0 "register_operand" "=B,a")
612
        (sign_extend:SI (match_operand:HI 1 "sext_operand" "r,U")))]
613
  ""
614
  "@
615
   sext\t%0, %1, 15
616
   l16si\t%0, %1"
617
  [(set_attr "type"     "arith,load")
618
   (set_attr "mode"     "SI")
619
   (set_attr "length"   "3,3")])
620
 
621
(define_expand "extendqisi2"
622
  [(set (match_operand:SI 0 "register_operand" "")
623
        (sign_extend:SI (match_operand:QI 1 "register_operand" "")))]
624
  ""
625
{
626
  if (TARGET_SEXT)
627
    emit_insn (gen_extendqisi2_internal (operands[0], operands[1]));
628
  else
629
    xtensa_extend_reg (operands[0], operands[1]);
630
  DONE;
631
})
632
 
633
(define_insn "extendqisi2_internal"
634
  [(set (match_operand:SI 0 "register_operand" "=B")
635
        (sign_extend:SI (match_operand:QI 1 "register_operand" "r")))]
636
  "TARGET_SEXT"
637
  "sext\t%0, %1, 7"
638
  [(set_attr "type"     "arith")
639
   (set_attr "mode"     "SI")
640
   (set_attr "length"   "3")])
641
 
642
 
643
;; Field extract instructions.
644
 
645
(define_expand "extv"
646
  [(set (match_operand:SI 0 "register_operand" "")
647
        (sign_extract:SI (match_operand:SI 1 "register_operand" "")
648
                         (match_operand:SI 2 "const_int_operand" "")
649
                         (match_operand:SI 3 "const_int_operand" "")))]
650
  "TARGET_SEXT"
651
{
652
  if (!sext_fldsz_operand (operands[2], SImode))
653
    FAIL;
654
 
655
  /* We could expand to a right shift followed by SEXT but that's
656
     no better than the standard left and right shift sequence.  */
657
  if (!lsbitnum_operand (operands[3], SImode))
658
    FAIL;
659
 
660
  emit_insn (gen_extv_internal (operands[0], operands[1],
661
                                operands[2], operands[3]));
662
  DONE;
663
})
664
 
665
(define_insn "extv_internal"
666
  [(set (match_operand:SI 0 "register_operand" "=a")
667
        (sign_extract:SI (match_operand:SI 1 "register_operand" "r")
668
                         (match_operand:SI 2 "sext_fldsz_operand" "i")
669
                         (match_operand:SI 3 "lsbitnum_operand" "i")))]
670
  "TARGET_SEXT"
671
{
672
  int fldsz = INTVAL (operands[2]);
673
  operands[2] = GEN_INT (fldsz - 1);
674
  return "sext\t%0, %1, %2";
675
}
676
  [(set_attr "type"     "arith")
677
   (set_attr "mode"     "SI")
678
   (set_attr "length"   "3")])
679
 
680
(define_expand "extzv"
681
  [(set (match_operand:SI 0 "register_operand" "")
682
        (zero_extract:SI (match_operand:SI 1 "register_operand" "")
683
                         (match_operand:SI 2 "const_int_operand" "")
684
                         (match_operand:SI 3 "const_int_operand" "")))]
685
  ""
686
{
687
  if (!extui_fldsz_operand (operands[2], SImode))
688
    FAIL;
689
  emit_insn (gen_extzv_internal (operands[0], operands[1],
690
                                 operands[2], operands[3]));
691
  DONE;
692
})
693
 
694
(define_insn "extzv_internal"
695
  [(set (match_operand:SI 0 "register_operand" "=a")
696
        (zero_extract:SI (match_operand:SI 1 "register_operand" "r")
697
                         (match_operand:SI 2 "extui_fldsz_operand" "i")
698
                         (match_operand:SI 3 "const_int_operand" "i")))]
699
  ""
700
{
701
  int shift;
702
  if (BITS_BIG_ENDIAN)
703
    shift = (32 - (INTVAL (operands[2]) + INTVAL (operands[3]))) & 0x1f;
704
  else
705
    shift = INTVAL (operands[3]) & 0x1f;
706
  operands[3] = GEN_INT (shift);
707
  return "extui\t%0, %1, %3, %2";
708
}
709
  [(set_attr "type"     "arith")
710
   (set_attr "mode"     "SI")
711
   (set_attr "length"   "3")])
712
 
713
 
714
;; Conversions.
715
 
716
(define_insn "fix_truncsfsi2"
717
  [(set (match_operand:SI 0 "register_operand" "=a")
718
        (fix:SI (match_operand:SF 1 "register_operand" "f")))]
719
  "TARGET_HARD_FLOAT"
720
  "trunc.s\t%0, %1, 0"
721
  [(set_attr "type"     "fconv")
722
   (set_attr "mode"     "SF")
723
   (set_attr "length"   "3")])
724
 
725
(define_insn "fixuns_truncsfsi2"
726
  [(set (match_operand:SI 0 "register_operand" "=a")
727
        (unsigned_fix:SI (match_operand:SF 1 "register_operand" "f")))]
728
  "TARGET_HARD_FLOAT"
729
  "utrunc.s\t%0, %1, 0"
730
  [(set_attr "type"     "fconv")
731
   (set_attr "mode"     "SF")
732
   (set_attr "length"   "3")])
733
 
734
(define_insn "floatsisf2"
735
  [(set (match_operand:SF 0 "register_operand" "=f")
736
        (float:SF (match_operand:SI 1 "register_operand" "a")))]
737
  "TARGET_HARD_FLOAT"
738
  "float.s\t%0, %1, 0"
739
  [(set_attr "type"     "fconv")
740
   (set_attr "mode"     "SF")
741
   (set_attr "length"   "3")])
742
 
743
(define_insn "floatunssisf2"
744
  [(set (match_operand:SF 0 "register_operand" "=f")
745
        (unsigned_float:SF (match_operand:SI 1 "register_operand" "a")))]
746
  "TARGET_HARD_FLOAT"
747
  "ufloat.s\t%0, %1, 0"
748
  [(set_attr "type"     "fconv")
749
   (set_attr "mode"     "SF")
750
   (set_attr "length"   "3")])
751
 
752
 
753
;; Data movement instructions.
754
 
755
;; 64-bit Integer moves
756
 
757
(define_expand "movdi"
758
  [(set (match_operand:DI 0 "nonimmed_operand" "")
759
        (match_operand:DI 1 "general_operand" ""))]
760
  ""
761
{
762
  if (CONSTANT_P (operands[1]) && !TARGET_CONST16)
763
    operands[1] = force_const_mem (DImode, operands[1]);
764
 
765
  if (!register_operand (operands[0], DImode)
766
      && !register_operand (operands[1], DImode))
767
    operands[1] = force_reg (DImode, operands[1]);
768
 
769
  operands[1] = xtensa_copy_incoming_a7 (operands[1]);
770
})
771
 
772
(define_insn_and_split "movdi_internal"
773
  [(set (match_operand:DI 0 "nonimmed_operand" "=a,W,a,a,U")
774
        (match_operand:DI 1 "move_operand" "r,i,T,U,r"))]
775
  "register_operand (operands[0], DImode)
776
   || register_operand (operands[1], DImode)"
777
  "#"
778
  "reload_completed"
779
  [(set (match_dup 0) (match_dup 2))
780
   (set (match_dup 1) (match_dup 3))]
781
{
782
  xtensa_split_operand_pair (operands, SImode);
783
  if (reg_overlap_mentioned_p (operands[0], operands[3]))
784
    {
785
      rtx tmp;
786
      tmp = operands[0], operands[0] = operands[1], operands[1] = tmp;
787
      tmp = operands[2], operands[2] = operands[3], operands[3] = tmp;
788
    }
789
})
790
 
791
;; 32-bit Integer moves
792
 
793
(define_expand "movsi"
794
  [(set (match_operand:SI 0 "nonimmed_operand" "")
795
        (match_operand:SI 1 "general_operand" ""))]
796
  ""
797
{
798
  if (xtensa_emit_move_sequence (operands, SImode))
799
    DONE;
800
})
801
 
802
(define_insn "movsi_internal"
803
  [(set (match_operand:SI 0 "nonimmed_operand" "=D,D,D,D,R,R,a,q,a,W,a,a,U,*a,*A")
804
        (match_operand:SI 1 "move_operand" "M,D,d,R,D,d,r,r,I,i,T,U,r,*A,*r"))]
805
  "xtensa_valid_move (SImode, operands)"
806
  "@
807
   movi.n\t%0, %x1
808
   mov.n\t%0, %1
809
   mov.n\t%0, %1
810
   %v1l32i.n\t%0, %1
811
   %v0s32i.n\t%1, %0
812
   %v0s32i.n\t%1, %0
813
   mov\t%0, %1
814
   movsp\t%0, %1
815
   movi\t%0, %x1
816
   const16\t%0, %t1\;const16\t%0, %b1
817
   %v1l32r\t%0, %1
818
   %v1l32i\t%0, %1
819
   %v0s32i\t%1, %0
820
   rsr\t%0, ACCLO
821
   wsr\t%1, ACCLO"
822
  [(set_attr "type" "move,move,move,load,store,store,move,move,move,move,load,load,store,rsr,wsr")
823
   (set_attr "mode"     "SI")
824
   (set_attr "length"   "2,2,2,2,2,2,3,3,3,6,3,3,3,3,3")])
825
 
826
;; 16-bit Integer moves
827
 
828
(define_expand "movhi"
829
  [(set (match_operand:HI 0 "nonimmed_operand" "")
830
        (match_operand:HI 1 "general_operand" ""))]
831
  ""
832
{
833
  if (xtensa_emit_move_sequence (operands, HImode))
834
    DONE;
835
})
836
 
837
(define_insn "movhi_internal"
838
  [(set (match_operand:HI 0 "nonimmed_operand" "=D,D,a,a,a,U,*a,*A")
839
        (match_operand:HI 1 "move_operand" "M,d,r,I,U,r,*A,*r"))]
840
  "xtensa_valid_move (HImode, operands)"
841
  "@
842
   movi.n\t%0, %x1
843
   mov.n\t%0, %1
844
   mov\t%0, %1
845
   movi\t%0, %x1
846
   %v1l16ui\t%0, %1
847
   %v0s16i\t%1, %0
848
   rsr\t%0, ACCLO
849
   wsr\t%1, ACCLO"
850
  [(set_attr "type"     "move,move,move,move,load,store,rsr,wsr")
851
   (set_attr "mode"     "HI")
852
   (set_attr "length"   "2,2,3,3,3,3,3,3")])
853
 
854
;; 8-bit Integer moves
855
 
856
(define_expand "movqi"
857
  [(set (match_operand:QI 0 "nonimmed_operand" "")
858
        (match_operand:QI 1 "general_operand" ""))]
859
  ""
860
{
861
  if (xtensa_emit_move_sequence (operands, QImode))
862
    DONE;
863
})
864
 
865
(define_insn "movqi_internal"
866
  [(set (match_operand:QI 0 "nonimmed_operand" "=D,D,a,a,a,U,*a,*A")
867
        (match_operand:QI 1 "move_operand" "M,d,r,I,U,r,*A,*r"))]
868
  "xtensa_valid_move (QImode, operands)"
869
  "@
870
   movi.n\t%0, %x1
871
   mov.n\t%0, %1
872
   mov\t%0, %1
873
   movi\t%0, %x1
874
   %v1l8ui\t%0, %1
875
   %v0s8i\t%1, %0
876
   rsr\t%0, ACCLO
877
   wsr\t%1, ACCLO"
878
  [(set_attr "type"     "move,move,move,move,load,store,rsr,wsr")
879
   (set_attr "mode"     "QI")
880
   (set_attr "length"   "2,2,3,3,3,3,3,3")])
881
 
882
;; Sub-word reloads from the constant pool.
883
 
884
(define_expand "reload_literal"
885
  [(parallel [(match_operand:HQI 0 "register_operand" "=r")
886
              (match_operand:HQI 1 "constantpool_operand" "")
887
              (match_operand:SI 2 "register_operand" "=&r")])]
888
  ""
889
{
890
  rtx lit, scratch;
891
  unsigned word_off, byte_off;
892
 
893
  if (MEM_P (operands[1]))
894
    {
895
      lit = operands[1];
896
      word_off = 0;
897
      byte_off = 0;
898
    }
899
  else
900
    {
901
      gcc_assert (GET_CODE (operands[1]) == SUBREG);
902
      lit = SUBREG_REG (operands[1]);
903
      word_off = SUBREG_BYTE (operands[1]) & ~(UNITS_PER_WORD - 1);
904
      byte_off = SUBREG_BYTE (operands[1]) - word_off;
905
    }
906
 
907
  lit = adjust_address (lit, SImode, word_off);
908
  scratch = operands[2];
909
  emit_insn (gen_movsi (scratch, lit));
910
  emit_insn (gen_mov (operands[0],
911
                            gen_rtx_SUBREG (mode, scratch, byte_off)));
912
 
913
  DONE;
914
})
915
 
916
;; 32-bit floating point moves
917
 
918
(define_expand "movsf"
919
  [(set (match_operand:SF 0 "nonimmed_operand" "")
920
        (match_operand:SF 1 "general_operand" ""))]
921
  ""
922
{
923
  if (!TARGET_CONST16 && CONSTANT_P (operands[1]))
924
    operands[1] = force_const_mem (SFmode, operands[1]);
925
 
926
  if ((!register_operand (operands[0], SFmode)
927
       && !register_operand (operands[1], SFmode))
928
      || (FP_REG_P (xt_true_regnum (operands[0]))
929
          && !(reload_in_progress | reload_completed)
930
          && (constantpool_mem_p (operands[1])
931
              || CONSTANT_P (operands[1]))))
932
    operands[1] = force_reg (SFmode, operands[1]);
933
 
934
  operands[1] = xtensa_copy_incoming_a7 (operands[1]);
935
})
936
 
937
(define_insn "movsf_internal"
938
  [(set (match_operand:SF 0 "nonimmed_operand" "=f,f,U,D,D,R,a,f,a,W,a,a,U")
939
        (match_operand:SF 1 "move_operand" "f,U,f,d,R,d,r,r,f,iF,T,U,r"))]
940
  "((register_operand (operands[0], SFmode)
941
     || register_operand (operands[1], SFmode))
942
    && !(FP_REG_P (xt_true_regnum (operands[0]))
943
         && (constantpool_mem_p (operands[1]) || CONSTANT_P (operands[1]))))"
944
  "@
945
   mov.s\t%0, %1
946
   %v1lsi\t%0, %1
947
   %v0ssi\t%1, %0
948
   mov.n\t%0, %1
949
   %v1l32i.n\t%0, %1
950
   %v0s32i.n\t%1, %0
951
   mov\t%0, %1
952
   wfr\t%0, %1
953
   rfr\t%0, %1
954
   const16\t%0, %t1\;const16\t%0, %b1
955
   %v1l32r\t%0, %1
956
   %v1l32i\t%0, %1
957
   %v0s32i\t%1, %0"
958
  [(set_attr "type"     "farith,fload,fstore,move,load,store,move,farith,farith,move,load,load,store")
959
   (set_attr "mode"     "SF")
960
   (set_attr "length"   "3,3,3,2,2,2,3,3,3,6,3,3,3")])
961
 
962
(define_insn "*lsiu"
963
  [(set (match_operand:SF 0 "register_operand" "=f")
964
        (mem:SF (plus:SI (match_operand:SI 1 "register_operand" "+a")
965
                         (match_operand:SI 2 "fpmem_offset_operand" "i"))))
966
   (set (match_dup 1)
967
        (plus:SI (match_dup 1) (match_dup 2)))]
968
  "TARGET_HARD_FLOAT"
969
{
970
  if (TARGET_SERIALIZE_VOLATILE && volatile_refs_p (PATTERN (insn)))
971
    output_asm_insn ("memw", operands);
972
  return "lsiu\t%0, %1, %2";
973
}
974
  [(set_attr "type"     "fload")
975
   (set_attr "mode"     "SF")
976
   (set_attr "length"   "3")])
977
 
978
(define_insn "*ssiu"
979
  [(set (mem:SF (plus:SI (match_operand:SI 0 "register_operand" "+a")
980
                         (match_operand:SI 1 "fpmem_offset_operand" "i")))
981
        (match_operand:SF 2 "register_operand" "f"))
982
   (set (match_dup 0)
983
        (plus:SI (match_dup 0) (match_dup 1)))]
984
  "TARGET_HARD_FLOAT"
985
{
986
  if (TARGET_SERIALIZE_VOLATILE && volatile_refs_p (PATTERN (insn)))
987
    output_asm_insn ("memw", operands);
988
  return "ssiu\t%2, %0, %1";
989
}
990
  [(set_attr "type"     "fstore")
991
   (set_attr "mode"     "SF")
992
   (set_attr "length"   "3")])
993
 
994
;; 64-bit floating point moves
995
 
996
(define_expand "movdf"
997
  [(set (match_operand:DF 0 "nonimmed_operand" "")
998
        (match_operand:DF 1 "general_operand" ""))]
999
  ""
1000
{
1001
  if (CONSTANT_P (operands[1]) && !TARGET_CONST16)
1002
    operands[1] = force_const_mem (DFmode, operands[1]);
1003
 
1004
  if (!register_operand (operands[0], DFmode)
1005
      && !register_operand (operands[1], DFmode))
1006
    operands[1] = force_reg (DFmode, operands[1]);
1007
 
1008
  operands[1] = xtensa_copy_incoming_a7 (operands[1]);
1009
})
1010
 
1011
(define_insn_and_split "movdf_internal"
1012
  [(set (match_operand:DF 0 "nonimmed_operand" "=a,W,a,a,U")
1013
        (match_operand:DF 1 "move_operand" "r,iF,T,U,r"))]
1014
  "register_operand (operands[0], DFmode)
1015
   || register_operand (operands[1], DFmode)"
1016
  "#"
1017
  "reload_completed"
1018
  [(set (match_dup 0) (match_dup 2))
1019
   (set (match_dup 1) (match_dup 3))]
1020
{
1021
  xtensa_split_operand_pair (operands, SFmode);
1022
  if (reg_overlap_mentioned_p (operands[0], operands[3]))
1023
    {
1024
      rtx tmp;
1025
      tmp = operands[0], operands[0] = operands[1], operands[1] = tmp;
1026
      tmp = operands[2], operands[2] = operands[3], operands[3] = tmp;
1027
    }
1028
})
1029
 
1030
;; Block moves
1031
 
1032
(define_expand "movmemsi"
1033
  [(parallel [(set (match_operand:BLK 0 "" "")
1034
                   (match_operand:BLK 1 "" ""))
1035
              (use (match_operand:SI 2 "arith_operand" ""))
1036
              (use (match_operand:SI 3 "const_int_operand" ""))])]
1037
  ""
1038
{
1039
  if (!xtensa_expand_block_move (operands))
1040
    FAIL;
1041
  DONE;
1042
})
1043
 
1044
 
1045
;; Shift instructions.
1046
 
1047
(define_expand "ashlsi3"
1048
  [(set (match_operand:SI 0 "register_operand" "")
1049
        (ashift:SI (match_operand:SI 1 "register_operand" "")
1050
                   (match_operand:SI 2 "arith_operand" "")))]
1051
  ""
1052
{
1053
  operands[1] = xtensa_copy_incoming_a7 (operands[1]);
1054
})
1055
 
1056
(define_insn "ashlsi3_internal"
1057
  [(set (match_operand:SI 0 "register_operand" "=a,a")
1058
        (ashift:SI (match_operand:SI 1 "register_operand" "r,r")
1059
                   (match_operand:SI 2 "arith_operand" "J,r")))]
1060
  ""
1061
  "@
1062
   slli\t%0, %1, %R2
1063
   ssl\t%2\;sll\t%0, %1"
1064
  [(set_attr "type"     "arith,arith")
1065
   (set_attr "mode"     "SI")
1066
   (set_attr "length"   "3,6")])
1067
 
1068
(define_insn "ashrsi3"
1069
  [(set (match_operand:SI 0 "register_operand" "=a,a")
1070
        (ashiftrt:SI (match_operand:SI 1 "register_operand" "r,r")
1071
                     (match_operand:SI 2 "arith_operand" "J,r")))]
1072
  ""
1073
  "@
1074
   srai\t%0, %1, %R2
1075
   ssr\t%2\;sra\t%0, %1"
1076
  [(set_attr "type"     "arith,arith")
1077
   (set_attr "mode"     "SI")
1078
   (set_attr "length"   "3,6")])
1079
 
1080
(define_insn "lshrsi3"
1081
  [(set (match_operand:SI 0 "register_operand" "=a,a")
1082
        (lshiftrt:SI (match_operand:SI 1 "register_operand" "r,r")
1083
                     (match_operand:SI 2 "arith_operand" "J,r")))]
1084
  ""
1085
{
1086
  if (which_alternative == 0)
1087
    {
1088
      if ((INTVAL (operands[2]) & 0x1f) < 16)
1089
        return "srli\t%0, %1, %R2";
1090
      else
1091
        return "extui\t%0, %1, %R2, %L2";
1092
    }
1093
  return "ssr\t%2\;srl\t%0, %1";
1094
}
1095
  [(set_attr "type"     "arith,arith")
1096
   (set_attr "mode"     "SI")
1097
   (set_attr "length"   "3,6")])
1098
 
1099
(define_insn "rotlsi3"
1100
  [(set (match_operand:SI 0 "register_operand" "=a,a")
1101
        (rotate:SI (match_operand:SI 1 "register_operand" "r,r")
1102
                     (match_operand:SI 2 "arith_operand" "J,r")))]
1103
  ""
1104
  "@
1105
   ssai\t%L2\;src\t%0, %1, %1
1106
   ssl\t%2\;src\t%0, %1, %1"
1107
  [(set_attr "type"     "multi,multi")
1108
   (set_attr "mode"     "SI")
1109
   (set_attr "length"   "6,6")])
1110
 
1111
(define_insn "rotrsi3"
1112
  [(set (match_operand:SI 0 "register_operand" "=a,a")
1113
        (rotatert:SI (match_operand:SI 1 "register_operand" "r,r")
1114
                     (match_operand:SI 2 "arith_operand" "J,r")))]
1115
  ""
1116
  "@
1117
   ssai\t%R2\;src\t%0, %1, %1
1118
   ssr\t%2\;src\t%0, %1, %1"
1119
  [(set_attr "type"     "multi,multi")
1120
   (set_attr "mode"     "SI")
1121
   (set_attr "length"   "6,6")])
1122
 
1123
 
1124
;; Comparisons.
1125
 
1126
;; Conditional branches.
1127
 
1128
(define_expand "cbranchsi4"
1129
  [(match_operator 0 "comparison_operator"
1130
    [(match_operand:SI 1 "register_operand")
1131
     (match_operand:SI 2 "nonmemory_operand")])
1132
   (match_operand 3 "")]
1133
  ""
1134
{
1135
  xtensa_expand_conditional_branch (operands, SImode);
1136
  DONE;
1137
})
1138
 
1139
(define_expand "cbranchsf4"
1140
  [(match_operator 0 "comparison_operator"
1141
    [(match_operand:SF 1 "register_operand")
1142
     (match_operand:SF 2 "register_operand")])
1143
   (match_operand 3 "")]
1144
  "TARGET_HARD_FLOAT"
1145
{
1146
  xtensa_expand_conditional_branch (operands, SFmode);
1147
  DONE;
1148
})
1149
 
1150
;; Branch patterns for standard integer comparisons
1151
 
1152
(define_insn "*btrue"
1153
  [(set (pc)
1154
        (if_then_else (match_operator 3 "branch_operator"
1155
                       [(match_operand:SI 0 "register_operand" "r,r")
1156
                        (match_operand:SI 1 "branch_operand" "K,r")])
1157
                      (label_ref (match_operand 2 "" ""))
1158
                      (pc)))]
1159
  ""
1160
{
1161
  return xtensa_emit_branch (false, which_alternative == 0, operands);
1162
}
1163
  [(set_attr "type"     "jump,jump")
1164
   (set_attr "mode"     "none")
1165
   (set_attr "length"   "3,3")])
1166
 
1167
(define_insn "*bfalse"
1168
  [(set (pc)
1169
        (if_then_else (match_operator 3 "branch_operator"
1170
                       [(match_operand:SI 0 "register_operand" "r,r")
1171
                        (match_operand:SI 1 "branch_operand" "K,r")])
1172
                      (pc)
1173
                      (label_ref (match_operand 2 "" ""))))]
1174
  ""
1175
{
1176
  return xtensa_emit_branch (true, which_alternative == 0, operands);
1177
}
1178
  [(set_attr "type"     "jump,jump")
1179
   (set_attr "mode"     "none")
1180
   (set_attr "length"   "3,3")])
1181
 
1182
(define_insn "*ubtrue"
1183
  [(set (pc)
1184
        (if_then_else (match_operator 3 "ubranch_operator"
1185
                       [(match_operand:SI 0 "register_operand" "r,r")
1186
                        (match_operand:SI 1 "ubranch_operand" "L,r")])
1187
                      (label_ref (match_operand 2 "" ""))
1188
                      (pc)))]
1189
  ""
1190
{
1191
  return xtensa_emit_branch (false, which_alternative == 0, operands);
1192
}
1193
  [(set_attr "type"     "jump,jump")
1194
   (set_attr "mode"     "none")
1195
   (set_attr "length"   "3,3")])
1196
 
1197
(define_insn "*ubfalse"
1198
  [(set (pc)
1199
        (if_then_else (match_operator 3 "ubranch_operator"
1200
                         [(match_operand:SI 0 "register_operand" "r,r")
1201
                          (match_operand:SI 1 "ubranch_operand" "L,r")])
1202
                      (pc)
1203
                      (label_ref (match_operand 2 "" ""))))]
1204
  ""
1205
{
1206
  return xtensa_emit_branch (true, which_alternative == 0, operands);
1207
}
1208
  [(set_attr "type"     "jump,jump")
1209
   (set_attr "mode"     "none")
1210
   (set_attr "length"   "3,3")])
1211
 
1212
;; Branch patterns for bit testing
1213
 
1214
(define_insn "*bittrue"
1215
  [(set (pc)
1216
        (if_then_else (match_operator 3 "boolean_operator"
1217
                        [(zero_extract:SI
1218
                            (match_operand:SI 0 "register_operand" "r,r")
1219
                            (const_int 1)
1220
                            (match_operand:SI 1 "arith_operand" "J,r"))
1221
                         (const_int 0)])
1222
                      (label_ref (match_operand 2 "" ""))
1223
                      (pc)))]
1224
  ""
1225
{
1226
  return xtensa_emit_bit_branch (false, which_alternative == 0, operands);
1227
}
1228
  [(set_attr "type"     "jump")
1229
   (set_attr "mode"     "none")
1230
   (set_attr "length"   "3")])
1231
 
1232
(define_insn "*bitfalse"
1233
  [(set (pc)
1234
        (if_then_else (match_operator 3 "boolean_operator"
1235
                        [(zero_extract:SI
1236
                            (match_operand:SI 0 "register_operand" "r,r")
1237
                            (const_int 1)
1238
                            (match_operand:SI 1 "arith_operand" "J,r"))
1239
                         (const_int 0)])
1240
                      (pc)
1241
                      (label_ref (match_operand 2 "" ""))))]
1242
  ""
1243
{
1244
  return xtensa_emit_bit_branch (true, which_alternative == 0, operands);
1245
}
1246
  [(set_attr "type"     "jump")
1247
   (set_attr "mode"     "none")
1248
   (set_attr "length"   "3")])
1249
 
1250
(define_insn "*masktrue"
1251
  [(set (pc)
1252
        (if_then_else (match_operator 3 "boolean_operator"
1253
                 [(and:SI (match_operand:SI 0 "register_operand" "r")
1254
                          (match_operand:SI 1 "register_operand" "r"))
1255
                  (const_int 0)])
1256
                      (label_ref (match_operand 2 "" ""))
1257
                      (pc)))]
1258
  ""
1259
{
1260
  switch (GET_CODE (operands[3]))
1261
    {
1262
    case EQ:            return "bnone\t%0, %1, %2";
1263
    case NE:            return "bany\t%0, %1, %2";
1264
    default:            gcc_unreachable ();
1265
    }
1266
}
1267
  [(set_attr "type"     "jump")
1268
   (set_attr "mode"     "none")
1269
   (set_attr "length"   "3")])
1270
 
1271
(define_insn "*maskfalse"
1272
  [(set (pc)
1273
        (if_then_else (match_operator 3 "boolean_operator"
1274
                 [(and:SI (match_operand:SI 0 "register_operand" "r")
1275
                          (match_operand:SI 1 "register_operand" "r"))
1276
                  (const_int 0)])
1277
                      (pc)
1278
                      (label_ref (match_operand 2 "" ""))))]
1279
  ""
1280
{
1281
  switch (GET_CODE (operands[3]))
1282
    {
1283
    case EQ:            return "bany\t%0, %1, %2";
1284
    case NE:            return "bnone\t%0, %1, %2";
1285
    default:            gcc_unreachable ();
1286
    }
1287
}
1288
  [(set_attr "type"     "jump")
1289
   (set_attr "mode"     "none")
1290
   (set_attr "length"   "3")])
1291
 
1292
 
1293
;; Define the loop insns used by bct optimization to represent the
1294
;; start and end of a zero-overhead loop (in loop.c).  This start
1295
;; template generates the loop insn; the end template doesn't generate
1296
;; any instructions since loop end is handled in hardware.
1297
 
1298
(define_insn "zero_cost_loop_start"
1299
  [(set (pc)
1300
        (if_then_else (eq (match_operand:SI 0 "register_operand" "a")
1301
                          (const_int 0))
1302
                      (label_ref (match_operand 1 "" ""))
1303
                      (pc)))
1304
   (set (reg:SI 19)
1305
        (plus:SI (match_dup 0) (const_int -1)))]
1306
  ""
1307
  "loopnez\t%0, %l1"
1308
  [(set_attr "type"     "jump")
1309
   (set_attr "mode"     "none")
1310
   (set_attr "length"   "3")])
1311
 
1312
(define_insn "zero_cost_loop_end"
1313
  [(set (pc)
1314
        (if_then_else (ne (reg:SI 19) (const_int 0))
1315
                      (label_ref (match_operand 0 "" ""))
1316
                      (pc)))
1317
   (set (reg:SI 19)
1318
        (plus:SI (reg:SI 19) (const_int -1)))]
1319
  ""
1320
{
1321
    xtensa_emit_loop_end (insn, operands);
1322
    return "";
1323
}
1324
  [(set_attr "type"     "jump")
1325
   (set_attr "mode"     "none")
1326
   (set_attr "length"   "0")])
1327
 
1328
 
1329
;; Setting a register from a comparison.
1330
 
1331
(define_expand "cstoresi4"
1332
  [(match_operand:SI 0 "register_operand")
1333
   (match_operator 1 "xtensa_cstoresi_operator"
1334
    [(match_operand:SI 2 "register_operand")
1335
     (match_operand:SI 3 "nonmemory_operand")])]
1336
  ""
1337
{
1338
  if (!xtensa_expand_scc (operands, SImode))
1339
    FAIL;
1340
  DONE;
1341
})
1342
 
1343
(define_expand "cstoresf4"
1344
  [(match_operand:SI 0 "register_operand")
1345
   (match_operator:SI 1 "comparison_operator"
1346
    [(match_operand:SF 2 "register_operand")
1347
     (match_operand:SF 3 "register_operand")])]
1348
  "TARGET_HARD_FLOAT"
1349
{
1350
  if (!xtensa_expand_scc (operands, SFmode))
1351
    FAIL;
1352
  DONE;
1353
})
1354
 
1355
 
1356
 
1357
;; Conditional moves.
1358
 
1359
(define_expand "movsicc"
1360
  [(set (match_operand:SI 0 "register_operand" "")
1361
        (if_then_else:SI (match_operand 1 "comparison_operator" "")
1362
                         (match_operand:SI 2 "register_operand" "")
1363
                         (match_operand:SI 3 "register_operand" "")))]
1364
  ""
1365
{
1366
  if (!xtensa_expand_conditional_move (operands, 0))
1367
    FAIL;
1368
  DONE;
1369
})
1370
 
1371
(define_expand "movsfcc"
1372
  [(set (match_operand:SF 0 "register_operand" "")
1373
        (if_then_else:SF (match_operand 1 "comparison_operator" "")
1374
                         (match_operand:SF 2 "register_operand" "")
1375
                         (match_operand:SF 3 "register_operand" "")))]
1376
  ""
1377
{
1378
  if (!xtensa_expand_conditional_move (operands, 1))
1379
    FAIL;
1380
  DONE;
1381
})
1382
 
1383
(define_insn "movsicc_internal0"
1384
  [(set (match_operand:SI 0 "register_operand" "=a,a")
1385
        (if_then_else:SI (match_operator 4 "branch_operator"
1386
                           [(match_operand:SI 1 "register_operand" "r,r")
1387
                            (const_int 0)])
1388
                         (match_operand:SI 2 "register_operand" "r,0")
1389
                         (match_operand:SI 3 "register_operand" "0,r")))]
1390
  ""
1391
{
1392
  return xtensa_emit_movcc (which_alternative == 1, false, false, operands);
1393
}
1394
  [(set_attr "type"     "move,move")
1395
   (set_attr "mode"     "SI")
1396
   (set_attr "length"   "3,3")])
1397
 
1398
(define_insn "movsicc_internal1"
1399
  [(set (match_operand:SI 0 "register_operand" "=a,a")
1400
        (if_then_else:SI (match_operator 4 "boolean_operator"
1401
                           [(match_operand:CC 1 "register_operand" "b,b")
1402
                            (const_int 0)])
1403
                         (match_operand:SI 2 "register_operand" "r,0")
1404
                         (match_operand:SI 3 "register_operand" "0,r")))]
1405
  "TARGET_BOOLEANS"
1406
{
1407
  return xtensa_emit_movcc (which_alternative == 1, false, true, operands);
1408
}
1409
  [(set_attr "type"     "move,move")
1410
   (set_attr "mode"     "SI")
1411
   (set_attr "length"   "3,3")])
1412
 
1413
(define_insn "movsfcc_internal0"
1414
  [(set (match_operand:SF 0 "register_operand" "=a,a,f,f")
1415
        (if_then_else:SF (match_operator 4 "branch_operator"
1416
                           [(match_operand:SI 1 "register_operand" "r,r,r,r")
1417
                            (const_int 0)])
1418
                         (match_operand:SF 2 "register_operand" "r,0,f,0")
1419
                         (match_operand:SF 3 "register_operand" "0,r,0,f")))]
1420
  ""
1421
{
1422
  return xtensa_emit_movcc ((which_alternative & 1) == 1,
1423
                            which_alternative >= 2, false, operands);
1424
}
1425
  [(set_attr "type"     "move,move,move,move")
1426
   (set_attr "mode"     "SF")
1427
   (set_attr "length"   "3,3,3,3")])
1428
 
1429
(define_insn "movsfcc_internal1"
1430
  [(set (match_operand:SF 0 "register_operand" "=a,a,f,f")
1431
        (if_then_else:SF (match_operator 4 "boolean_operator"
1432
                           [(match_operand:CC 1 "register_operand" "b,b,b,b")
1433
                            (const_int 0)])
1434
                         (match_operand:SF 2 "register_operand" "r,0,f,0")
1435
                         (match_operand:SF 3 "register_operand" "0,r,0,f")))]
1436
  "TARGET_BOOLEANS"
1437
{
1438
  return xtensa_emit_movcc ((which_alternative & 1) == 1,
1439
                            which_alternative >= 2, true, operands);
1440
}
1441
  [(set_attr "type"     "move,move,move,move")
1442
   (set_attr "mode"     "SF")
1443
   (set_attr "length"   "3,3,3,3")])
1444
 
1445
 
1446
;; Floating-point comparisons.
1447
 
1448
(define_insn "s_sf"
1449
  [(set (match_operand:CC 0 "register_operand" "=b")
1450
        (any_scc_sf:CC (match_operand:SF 1 "register_operand" "f")
1451
                       (match_operand:SF 2 "register_operand" "f")))]
1452
  "TARGET_HARD_FLOAT"
1453
  ".s\t%0, %1, %2"
1454
  [(set_attr "type"     "farith")
1455
   (set_attr "mode"     "BL")
1456
   (set_attr "length"   "3")])
1457
 
1458
 
1459
;; Unconditional branches.
1460
 
1461
(define_insn "jump"
1462
  [(set (pc)
1463
        (label_ref (match_operand 0 "" "")))]
1464
  ""
1465
  "j\t%l0"
1466
  [(set_attr "type"     "jump")
1467
   (set_attr "mode"     "none")
1468
   (set_attr "length"   "3")])
1469
 
1470
(define_expand "indirect_jump"
1471
  [(set (pc)
1472
        (match_operand 0 "register_operand" ""))]
1473
  ""
1474
{
1475
  rtx dest = operands[0];
1476
  if (GET_CODE (dest) != REG || GET_MODE (dest) != Pmode)
1477
    operands[0] = copy_to_mode_reg (Pmode, dest);
1478
 
1479
  emit_jump_insn (gen_indirect_jump_internal (dest));
1480
  DONE;
1481
})
1482
 
1483
(define_insn "indirect_jump_internal"
1484
  [(set (pc) (match_operand:SI 0 "register_operand" "r"))]
1485
  ""
1486
  "jx\t%0"
1487
  [(set_attr "type"     "jump")
1488
   (set_attr "mode"     "none")
1489
   (set_attr "length"   "3")])
1490
 
1491
 
1492
(define_expand "tablejump"
1493
  [(use (match_operand:SI 0 "register_operand" ""))
1494
   (use (label_ref (match_operand 1 "" "")))]
1495
   ""
1496
{
1497
  rtx target = operands[0];
1498
  if (flag_pic)
1499
    {
1500
      /* For PIC, the table entry is relative to the start of the table.  */
1501
      rtx label = gen_reg_rtx (SImode);
1502
      target = gen_reg_rtx (SImode);
1503
      emit_move_insn (label, gen_rtx_LABEL_REF (SImode, operands[1]));
1504
      emit_insn (gen_addsi3 (target, operands[0], label));
1505
    }
1506
  emit_jump_insn (gen_tablejump_internal (target, operands[1]));
1507
  DONE;
1508
})
1509
 
1510
(define_insn "tablejump_internal"
1511
  [(set (pc)
1512
        (match_operand:SI 0 "register_operand" "r"))
1513
   (use (label_ref (match_operand 1 "" "")))]
1514
  ""
1515
  "jx\t%0"
1516
  [(set_attr "type"     "jump")
1517
   (set_attr "mode"     "none")
1518
   (set_attr "length"   "3")])
1519
 
1520
 
1521
;; Function calls.
1522
 
1523
(define_expand "sym_PLT"
1524
  [(const (unspec [(match_operand:SI 0 "" "")] UNSPEC_PLT))]
1525
  ""
1526
  "")
1527
 
1528
(define_expand "call"
1529
  [(call (match_operand 0 "memory_operand" "")
1530
         (match_operand 1 "" ""))]
1531
  ""
1532
{
1533
  rtx addr = XEXP (operands[0], 0);
1534
  if (flag_pic && GET_CODE (addr) == SYMBOL_REF
1535
      && (!SYMBOL_REF_LOCAL_P (addr) || SYMBOL_REF_EXTERNAL_P (addr)))
1536
    addr = gen_sym_PLT (addr);
1537
  if (!call_insn_operand (addr, VOIDmode))
1538
    XEXP (operands[0], 0) = copy_to_mode_reg (Pmode, addr);
1539
})
1540
 
1541
(define_insn "call_internal"
1542
  [(call (mem (match_operand:SI 0 "call_insn_operand" "nir"))
1543
         (match_operand 1 "" "i"))]
1544
  ""
1545
{
1546
  return xtensa_emit_call (0, operands);
1547
}
1548
  [(set_attr "type"     "call")
1549
   (set_attr "mode"     "none")
1550
   (set_attr "length"   "3")])
1551
 
1552
(define_expand "call_value"
1553
  [(set (match_operand 0 "register_operand" "")
1554
        (call (match_operand 1 "memory_operand" "")
1555
              (match_operand 2 "" "")))]
1556
  ""
1557
{
1558
  rtx addr = XEXP (operands[1], 0);
1559
  if (flag_pic && GET_CODE (addr) == SYMBOL_REF
1560
      && (!SYMBOL_REF_LOCAL_P (addr) || SYMBOL_REF_EXTERNAL_P (addr)))
1561
    addr = gen_sym_PLT (addr);
1562
  if (!call_insn_operand (addr, VOIDmode))
1563
    XEXP (operands[1], 0) = copy_to_mode_reg (Pmode, addr);
1564
})
1565
 
1566
(define_insn "call_value_internal"
1567
  [(set (match_operand 0 "register_operand" "=a")
1568
        (call (mem (match_operand:SI 1 "call_insn_operand" "nir"))
1569
              (match_operand 2 "" "i")))]
1570
  ""
1571
{
1572
  return xtensa_emit_call (1, operands);
1573
}
1574
  [(set_attr "type"     "call")
1575
   (set_attr "mode"     "none")
1576
   (set_attr "length"   "3")])
1577
 
1578
(define_insn "entry"
1579
  [(set (reg:SI A1_REG)
1580
        (unspec_volatile:SI [(match_operand:SI 0 "const_int_operand" "i")]
1581
                            UNSPECV_ENTRY))]
1582
  ""
1583
  "entry\tsp, %0"
1584
  [(set_attr "type"     "entry")
1585
   (set_attr "mode"     "SI")
1586
   (set_attr "length"   "3")])
1587
 
1588
(define_insn "return"
1589
  [(return)
1590
   (use (reg:SI A0_REG))]
1591
  "reload_completed"
1592
{
1593
  return (TARGET_DENSITY ? "retw.n" : "retw");
1594
}
1595
  [(set_attr "type"     "jump")
1596
   (set_attr "mode"     "none")
1597
   (set_attr "length"   "2")])
1598
 
1599
 
1600
;; Miscellaneous instructions.
1601
 
1602
(define_expand "prologue"
1603
  [(const_int 0)]
1604
  ""
1605
{
1606
  xtensa_expand_prologue ();
1607
  DONE;
1608
})
1609
 
1610
(define_expand "epilogue"
1611
  [(return)]
1612
  ""
1613
{
1614
  emit_jump_insn (gen_return ());
1615
  DONE;
1616
})
1617
 
1618
(define_insn "nop"
1619
  [(const_int 0)]
1620
  ""
1621
{
1622
  return (TARGET_DENSITY ? "nop.n" : "nop");
1623
}
1624
  [(set_attr "type"     "nop")
1625
   (set_attr "mode"     "none")
1626
   (set_attr "length"   "3")])
1627
 
1628
(define_expand "nonlocal_goto"
1629
  [(match_operand:SI 0 "general_operand" "")
1630
   (match_operand:SI 1 "general_operand" "")
1631
   (match_operand:SI 2 "general_operand" "")
1632
   (match_operand:SI 3 "" "")]
1633
  ""
1634
{
1635
  xtensa_expand_nonlocal_goto (operands);
1636
  DONE;
1637
})
1638
 
1639
;; Stuff an address into the return address register along with the window
1640
;; size in the high bits.  Because we don't have the window size of the
1641
;; previous frame, assume the function called out with a CALL8 since that
1642
;; is what compilers always use.  Note: __builtin_frob_return_addr has
1643
;; already been applied to the handler, but the generic version doesn't
1644
;; allow us to frob it quite enough, so we just frob here.
1645
 
1646
(define_insn_and_split "eh_return"
1647
  [(set (reg:SI A0_REG)
1648
        (unspec_volatile:SI [(match_operand:SI 0 "register_operand" "r")]
1649
                            UNSPECV_EH_RETURN))
1650
   (clobber (match_scratch:SI 1 "=r"))]
1651
  ""
1652
  "#"
1653
  "reload_completed"
1654
  [(set (match_dup 1) (ashift:SI (match_dup 0) (const_int 2)))
1655
   (set (match_dup 1) (plus:SI (match_dup 1) (const_int 2)))
1656
   (set (reg:SI A0_REG) (rotatert:SI (match_dup 1) (const_int 2)))]
1657
  "")
1658
 
1659
;; Setting up a frame pointer is tricky for Xtensa because GCC doesn't
1660
;; know if a frame pointer is required until the reload pass, and
1661
;; because there may be an incoming argument value in the hard frame
1662
;; pointer register (a7).  If there is an incoming argument in that
1663
;; register, the "set_frame_ptr" insn gets inserted immediately after
1664
;; the insn that copies the incoming argument to a pseudo or to the
1665
;; stack.  This serves several purposes here: (1) it keeps the
1666
;; optimizer from copy-propagating or scheduling the use of a7 as an
1667
;; incoming argument away from the beginning of the function; (2) we
1668
;; can use a post-reload splitter to expand away the insn if a frame
1669
;; pointer is not required, so that the post-reload scheduler can do
1670
;; the right thing; and (3) it makes it easy for the prologue expander
1671
;; to search for this insn to determine whether it should add a new insn
1672
;; to set up the frame pointer.
1673
 
1674
(define_insn "set_frame_ptr"
1675
  [(set (reg:SI A7_REG) (unspec_volatile:SI [(const_int 0)] UNSPECV_SET_FP))]
1676
  ""
1677
{
1678
  if (frame_pointer_needed)
1679
    return "mov\ta7, sp";
1680
  return "";
1681
}
1682
  [(set_attr "type"     "move")
1683
   (set_attr "mode"     "SI")
1684
   (set_attr "length"   "3")])
1685
 
1686
;; Post-reload splitter to remove fp assignment when it's not needed.
1687
(define_split
1688
  [(set (reg:SI A7_REG) (unspec_volatile:SI [(const_int 0)] UNSPECV_SET_FP))]
1689
  "reload_completed && !frame_pointer_needed"
1690
  [(unspec [(const_int 0)] UNSPEC_NOP)]
1691
  "")
1692
 
1693
;; The preceding splitter needs something to split the insn into;
1694
;; things start breaking if the result is just a "use" so instead we
1695
;; generate the following insn.
1696
(define_insn "*unspec_nop"
1697
  [(unspec [(const_int 0)] UNSPEC_NOP)]
1698
  ""
1699
  ""
1700
  [(set_attr "type"     "nop")
1701
   (set_attr "mode"     "none")
1702
   (set_attr "length"   "0")])
1703
 
1704
 
1705
;; TLS support
1706
 
1707
(define_expand "sym_TPOFF"
1708
  [(const (unspec [(match_operand:SI 0 "" "")] UNSPEC_TPOFF))]
1709
  ""
1710
  "")
1711
 
1712
(define_expand "sym_DTPOFF"
1713
  [(const (unspec [(match_operand:SI 0 "" "")] UNSPEC_DTPOFF))]
1714
  ""
1715
  "")
1716
 
1717
(define_insn "load_tp"
1718
  [(set (match_operand:SI 0 "register_operand" "=a")
1719
        (unspec:SI [(const_int 0)] UNSPEC_TP))]
1720
  "TARGET_THREADPTR"
1721
  "rur\t%0, THREADPTR"
1722
  [(set_attr "type"     "rsr")
1723
   (set_attr "mode"     "SI")
1724
   (set_attr "length"   "3")])
1725
 
1726
(define_insn "set_tp"
1727
  [(unspec_volatile [(match_operand:SI 0 "register_operand" "r")]
1728
                    UNSPECV_SET_TP)]
1729
  "TARGET_THREADPTR"
1730
  "wur\t%0, THREADPTR"
1731
  [(set_attr "type"     "wsr")
1732
   (set_attr "mode"     "SI")
1733
   (set_attr "length"   "3")])
1734
 
1735
(define_insn "tls_func"
1736
  [(set (match_operand:SI 0 "register_operand" "=a")
1737
        (unspec:SI [(match_operand:SI 1 "tls_symbol_operand" "")]
1738
                   UNSPEC_TLS_FUNC))]
1739
  "TARGET_THREADPTR && HAVE_AS_TLS"
1740
  "movi\t%0, %1@TLSFUNC"
1741
  [(set_attr "type"     "load")
1742
   (set_attr "mode"     "SI")
1743
   (set_attr "length"   "3")])
1744
 
1745
(define_insn "tls_arg"
1746
  [(set (match_operand:SI 0 "register_operand" "=a")
1747
        (unspec:SI [(match_operand:SI 1 "tls_symbol_operand" "")]
1748
                   UNSPEC_TLS_ARG))]
1749
  "TARGET_THREADPTR && HAVE_AS_TLS"
1750
  "movi\t%0, %1@TLSARG"
1751
  [(set_attr "type"     "load")
1752
   (set_attr "mode"     "SI")
1753
   (set_attr "length"   "3")])
1754
 
1755
(define_insn "tls_call"
1756
  [(set (match_operand:SI 0 "register_operand" "=a")
1757
        (call (mem:SI (unspec:SI [(match_operand:SI 1 "register_operand" "r")
1758
                                  (match_operand:SI 2 "tls_symbol_operand" "")]
1759
                                  UNSPEC_TLS_CALL))
1760
              (match_operand 3 "" "i")))]
1761
  "TARGET_THREADPTR && HAVE_AS_TLS"
1762
  "callx8.tls %1, %2@TLSCALL"
1763
  [(set_attr "type"     "call")
1764
   (set_attr "mode"     "none")
1765
   (set_attr "length"   "3")])
1766
 
1767
 
1768
;; Instructions for the Xtensa "boolean" option.
1769
 
1770
(define_insn "*booltrue"
1771
  [(set (pc)
1772
        (if_then_else (match_operator 2 "boolean_operator"
1773
                         [(match_operand:CC 0 "register_operand" "b")
1774
                          (const_int 0)])
1775
                      (label_ref (match_operand 1 "" ""))
1776
                      (pc)))]
1777
  "TARGET_BOOLEANS"
1778
{
1779
  if (GET_CODE (operands[2]) == EQ)
1780
    return "bf\t%0, %1";
1781
  else
1782
    return "bt\t%0, %1";
1783
}
1784
  [(set_attr "type"     "jump")
1785
   (set_attr "mode"     "none")
1786
   (set_attr "length"   "3")])
1787
 
1788
(define_insn "*boolfalse"
1789
  [(set (pc)
1790
        (if_then_else (match_operator 2 "boolean_operator"
1791
                         [(match_operand:CC 0 "register_operand" "b")
1792
                          (const_int 0)])
1793
                      (pc)
1794
                      (label_ref (match_operand 1 "" ""))))]
1795
  "TARGET_BOOLEANS"
1796
{
1797
  if (GET_CODE (operands[2]) == EQ)
1798
    return "bt\t%0, %1";
1799
  else
1800
    return "bf\t%0, %1";
1801
}
1802
  [(set_attr "type"     "jump")
1803
   (set_attr "mode"     "none")
1804
   (set_attr "length"   "3")])
1805
 
1806
 
1807
;; Atomic operations
1808
 
1809
(define_expand "memory_barrier"
1810
  [(set (match_dup 0)
1811
        (unspec:BLK [(match_dup 0)] UNSPEC_MEMW))]
1812
  ""
1813
{
1814
  operands[0] = gen_rtx_MEM (BLKmode, gen_rtx_SCRATCH (Pmode));
1815
  MEM_VOLATILE_P (operands[0]) = 1;
1816
})
1817
 
1818
(define_insn "*memory_barrier"
1819
  [(set (match_operand:BLK 0 "" "")
1820
        (unspec:BLK [(match_dup 0)] UNSPEC_MEMW))]
1821
  ""
1822
  "memw"
1823
  [(set_attr "type"     "unknown")
1824
   (set_attr "mode"     "none")
1825
   (set_attr "length"   "3")])
1826
 
1827
;; sync_lock_release is only implemented for SImode.
1828
;; For other modes, just use the default of a store with a memory_barrier.
1829
(define_insn "sync_lock_releasesi"
1830
  [(set (match_operand:SI 0 "mem_operand" "=U")
1831
        (unspec_volatile:SI
1832
          [(match_operand:SI 1 "register_operand" "r")]
1833
          UNSPECV_S32RI))]
1834
  "TARGET_RELEASE_SYNC"
1835
  "s32ri\t%1, %0"
1836
  [(set_attr "type"     "store")
1837
   (set_attr "mode"     "SI")
1838
   (set_attr "length"   "3")])
1839
 
1840
(define_insn "sync_compare_and_swapsi"
1841
  [(parallel
1842
    [(set (match_operand:SI 0 "register_operand" "=a")
1843
          (match_operand:SI 1 "mem_operand" "+U"))
1844
     (set (match_dup 1)
1845
          (unspec_volatile:SI
1846
            [(match_dup 1)
1847
             (match_operand:SI 2 "register_operand" "r")
1848
             (match_operand:SI 3 "register_operand" "0")]
1849
            UNSPECV_S32C1I))])]
1850
  "TARGET_S32C1I"
1851
  "wsr\t%2, SCOMPARE1\;s32c1i\t%3, %1"
1852
  [(set_attr "type"     "multi")
1853
   (set_attr "mode"     "SI")
1854
   (set_attr "length"   "6")])
1855
 
1856
(define_expand "sync_compare_and_swap"
1857
  [(parallel
1858
    [(set (match_operand:HQI 0 "register_operand" "")
1859
          (match_operand:HQI 1 "mem_operand" ""))
1860
     (set (match_dup 1)
1861
          (unspec_volatile:HQI
1862
            [(match_dup 1)
1863
             (match_operand:HQI 2 "register_operand" "")
1864
             (match_operand:HQI 3 "register_operand" "")]
1865
            UNSPECV_S32C1I))])]
1866
  "TARGET_S32C1I"
1867
{
1868
  xtensa_expand_compare_and_swap (operands[0], operands[1],
1869
                                  operands[2], operands[3]);
1870
  DONE;
1871
})
1872
 
1873
(define_expand "sync_lock_test_and_set"
1874
  [(match_operand:HQI 0 "register_operand")
1875
   (match_operand:HQI 1 "memory_operand")
1876
   (match_operand:HQI 2 "register_operand")]
1877
  "TARGET_S32C1I"
1878
{
1879
  xtensa_expand_atomic (SET, operands[0], operands[1], operands[2], false);
1880
  DONE;
1881
})
1882
 
1883
(define_expand "sync_"
1884
  [(set (match_operand:HQI 0 "memory_operand")
1885
        (ATOMIC:HQI (match_dup 0)
1886
                    (match_operand:HQI 1 "register_operand")))]
1887
  "TARGET_S32C1I"
1888
{
1889
  xtensa_expand_atomic (, NULL_RTX, operands[0], operands[1], false);
1890
  DONE;
1891
})
1892
 
1893
(define_expand "sync_old_"
1894
  [(set (match_operand:HQI 0 "register_operand")
1895
        (match_operand:HQI 1 "memory_operand"))
1896
   (set (match_dup 1)
1897
        (ATOMIC:HQI (match_dup 1)
1898
                    (match_operand:HQI 2 "register_operand")))]
1899
  "TARGET_S32C1I"
1900
{
1901
  xtensa_expand_atomic (, operands[0], operands[1], operands[2], false);
1902
  DONE;
1903
})
1904
 
1905
(define_expand "sync_new_"
1906
  [(set (match_operand:HQI 0 "register_operand")
1907
        (ATOMIC:HQI (match_operand:HQI 1 "memory_operand")
1908
                    (match_operand:HQI 2 "register_operand")))
1909
   (set (match_dup 1) (ATOMIC:HQI (match_dup 1) (match_dup 2)))]
1910
  "TARGET_S32C1I"
1911
{
1912
  xtensa_expand_atomic (, operands[0], operands[1], operands[2], true);
1913
  DONE;
1914
})

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.