]> git.proxmox.com Git - mirror_qemu.git/blame - tcg/tcg-op-gvec.c
projects / mirror_qemu.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
tcg: Remove expansion to shift by vector from do_shifts
[mirror_qemu.git] / tcg / tcg-op-gvec.c
CommitLineData
db432672
RH		 1/*
2 * Generic vector operation expansion
3 *
4 * Copyright (c) 2018 Linaro
5 *
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
fb0343d5 9 * version 2.1 of the License, or (at your option) any later version.
db432672
RH		 10 *
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
15 *
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, see <http://www.gnu.org/licenses/>.
18 */
19
20#include "qemu/osdep.h"
dcb32f1d
PMD		 21#include "tcg/tcg.h"
22#include "tcg/tcg-op.h"
23#include "tcg/tcg-op-gvec.h"
db725815 24#include "qemu/main-loop.h"
dcb32f1d 25#include "tcg/tcg-gvec-desc.h"
db432672
RH		 26
27#define MAX_UNROLL 4
28
53229a77
RH		 29#ifdef CONFIG_DEBUG_TCG
30static const TCGOpcode vecop_list_empty[1] = { 0 };
31#else
32#define vecop_list_empty NULL
33#endif
34
35
db432672
RH		 36/* Verify vector size and alignment rules. OFS should be the OR of all
37 of the operand offsets so that we can check them all at once. */
38static void check_size_align(uint32_t oprsz, uint32_t maxsz, uint32_t ofs)
39{
40 uint32_t opr_align = oprsz >= 16 ? 15 : 7;
41 uint32_t max_align = maxsz >= 16 || oprsz >= 16 ? 15 : 7;
42 tcg_debug_assert(oprsz > 0);
43 tcg_debug_assert(oprsz <= maxsz);
44 tcg_debug_assert((oprsz & opr_align) == 0);
45 tcg_debug_assert((maxsz & max_align) == 0);
46 tcg_debug_assert((ofs & max_align) == 0);
47}
48
49/* Verify vector overlap rules for two operands. */
50static void check_overlap_2(uint32_t d, uint32_t a, uint32_t s)
51{
52 tcg_debug_assert(d == a || d + s <= a || a + s <= d);
53}
54
55/* Verify vector overlap rules for three operands. */
56static void check_overlap_3(uint32_t d, uint32_t a, uint32_t b, uint32_t s)
57{
58 check_overlap_2(d, a, s);
59 check_overlap_2(d, b, s);
60 check_overlap_2(a, b, s);
61}
62
63/* Verify vector overlap rules for four operands. */
64static void check_overlap_4(uint32_t d, uint32_t a, uint32_t b,
65 uint32_t c, uint32_t s)
66{
67 check_overlap_2(d, a, s);
68 check_overlap_2(d, b, s);
69 check_overlap_2(d, c, s);
70 check_overlap_2(a, b, s);
71 check_overlap_2(a, c, s);
72 check_overlap_2(b, c, s);
73}
74
75/* Create a descriptor from components. */
76uint32_t simd_desc(uint32_t oprsz, uint32_t maxsz, int32_t data)
77{
78 uint32_t desc = 0;
79
80 assert(oprsz % 8 == 0 && oprsz <= (8 << SIMD_OPRSZ_BITS));
81 assert(maxsz % 8 == 0 && maxsz <= (8 << SIMD_MAXSZ_BITS));
82 assert(data == sextract32(data, 0, SIMD_DATA_BITS));
83
84 oprsz = (oprsz / 8) - 1;
85 maxsz = (maxsz / 8) - 1;
86 desc = deposit32(desc, SIMD_OPRSZ_SHIFT, SIMD_OPRSZ_BITS, oprsz);
87 desc = deposit32(desc, SIMD_MAXSZ_SHIFT, SIMD_MAXSZ_BITS, maxsz);
88 desc = deposit32(desc, SIMD_DATA_SHIFT, SIMD_DATA_BITS, data);
89
90 return desc;
91}
92
93/* Generate a call to a gvec-style helper with two vector operands. */
94void tcg_gen_gvec_2_ool(uint32_t dofs, uint32_t aofs,
95 uint32_t oprsz, uint32_t maxsz, int32_t data,
96 gen_helper_gvec_2 *fn)
97{
98 TCGv_ptr a0, a1;
99 TCGv_i32 desc = tcg_const_i32(simd_desc(oprsz, maxsz, data));
100
101 a0 = tcg_temp_new_ptr();
102 a1 = tcg_temp_new_ptr();
103
104 tcg_gen_addi_ptr(a0, cpu_env, dofs);
105 tcg_gen_addi_ptr(a1, cpu_env, aofs);
106
107 fn(a0, a1, desc);
108
109 tcg_temp_free_ptr(a0);
110 tcg_temp_free_ptr(a1);
111 tcg_temp_free_i32(desc);
112}
113
22fc3527
RH		 114/* Generate a call to a gvec-style helper with two vector operands
115 and one scalar operand. */
116void tcg_gen_gvec_2i_ool(uint32_t dofs, uint32_t aofs, TCGv_i64 c,
117 uint32_t oprsz, uint32_t maxsz, int32_t data,
118 gen_helper_gvec_2i *fn)
119{
120 TCGv_ptr a0, a1;
121 TCGv_i32 desc = tcg_const_i32(simd_desc(oprsz, maxsz, data));
122
123 a0 = tcg_temp_new_ptr();
124 a1 = tcg_temp_new_ptr();
125
126 tcg_gen_addi_ptr(a0, cpu_env, dofs);
127 tcg_gen_addi_ptr(a1, cpu_env, aofs);
128
129 fn(a0, a1, c, desc);
130
131 tcg_temp_free_ptr(a0);
132 tcg_temp_free_ptr(a1);
133 tcg_temp_free_i32(desc);
134}
135
db432672
RH		 136/* Generate a call to a gvec-style helper with three vector operands. */
137void tcg_gen_gvec_3_ool(uint32_t dofs, uint32_t aofs, uint32_t bofs,
138 uint32_t oprsz, uint32_t maxsz, int32_t data,
139 gen_helper_gvec_3 *fn)
140{
141 TCGv_ptr a0, a1, a2;
142 TCGv_i32 desc = tcg_const_i32(simd_desc(oprsz, maxsz, data));
143
144 a0 = tcg_temp_new_ptr();
145 a1 = tcg_temp_new_ptr();
146 a2 = tcg_temp_new_ptr();
147
148 tcg_gen_addi_ptr(a0, cpu_env, dofs);
149 tcg_gen_addi_ptr(a1, cpu_env, aofs);
150 tcg_gen_addi_ptr(a2, cpu_env, bofs);
151
152 fn(a0, a1, a2, desc);
153
154 tcg_temp_free_ptr(a0);
155 tcg_temp_free_ptr(a1);
156 tcg_temp_free_ptr(a2);
157 tcg_temp_free_i32(desc);
158}
159
160/* Generate a call to a gvec-style helper with four vector operands. */
161void tcg_gen_gvec_4_ool(uint32_t dofs, uint32_t aofs, uint32_t bofs,
162 uint32_t cofs, uint32_t oprsz, uint32_t maxsz,
163 int32_t data, gen_helper_gvec_4 *fn)
164{
165 TCGv_ptr a0, a1, a2, a3;
166 TCGv_i32 desc = tcg_const_i32(simd_desc(oprsz, maxsz, data));
167
168 a0 = tcg_temp_new_ptr();
169 a1 = tcg_temp_new_ptr();
170 a2 = tcg_temp_new_ptr();
171 a3 = tcg_temp_new_ptr();
172
173 tcg_gen_addi_ptr(a0, cpu_env, dofs);
174 tcg_gen_addi_ptr(a1, cpu_env, aofs);
175 tcg_gen_addi_ptr(a2, cpu_env, bofs);
176 tcg_gen_addi_ptr(a3, cpu_env, cofs);
177
178 fn(a0, a1, a2, a3, desc);
179
180 tcg_temp_free_ptr(a0);
181 tcg_temp_free_ptr(a1);
182 tcg_temp_free_ptr(a2);
183 tcg_temp_free_ptr(a3);
184 tcg_temp_free_i32(desc);
185}
186
187/* Generate a call to a gvec-style helper with five vector operands. */
188void tcg_gen_gvec_5_ool(uint32_t dofs, uint32_t aofs, uint32_t bofs,
189 uint32_t cofs, uint32_t xofs, uint32_t oprsz,
190 uint32_t maxsz, int32_t data, gen_helper_gvec_5 *fn)
191{
192 TCGv_ptr a0, a1, a2, a3, a4;
193 TCGv_i32 desc = tcg_const_i32(simd_desc(oprsz, maxsz, data));
194
195 a0 = tcg_temp_new_ptr();
196 a1 = tcg_temp_new_ptr();
197 a2 = tcg_temp_new_ptr();
198 a3 = tcg_temp_new_ptr();
199 a4 = tcg_temp_new_ptr();
200
201 tcg_gen_addi_ptr(a0, cpu_env, dofs);
202 tcg_gen_addi_ptr(a1, cpu_env, aofs);
203 tcg_gen_addi_ptr(a2, cpu_env, bofs);
204 tcg_gen_addi_ptr(a3, cpu_env, cofs);
205 tcg_gen_addi_ptr(a4, cpu_env, xofs);
206
207 fn(a0, a1, a2, a3, a4, desc);
208
209 tcg_temp_free_ptr(a0);
210 tcg_temp_free_ptr(a1);
211 tcg_temp_free_ptr(a2);
212 tcg_temp_free_ptr(a3);
213 tcg_temp_free_ptr(a4);
214 tcg_temp_free_i32(desc);
215}
216
217/* Generate a call to a gvec-style helper with three vector operands
218 and an extra pointer operand. */
219void tcg_gen_gvec_2_ptr(uint32_t dofs, uint32_t aofs,
220 TCGv_ptr ptr, uint32_t oprsz, uint32_t maxsz,
221 int32_t data, gen_helper_gvec_2_ptr *fn)
222{
223 TCGv_ptr a0, a1;
224 TCGv_i32 desc = tcg_const_i32(simd_desc(oprsz, maxsz, data));
225
226 a0 = tcg_temp_new_ptr();
227 a1 = tcg_temp_new_ptr();
228
229 tcg_gen_addi_ptr(a0, cpu_env, dofs);
230 tcg_gen_addi_ptr(a1, cpu_env, aofs);
231
232 fn(a0, a1, ptr, desc);
233
234 tcg_temp_free_ptr(a0);
235 tcg_temp_free_ptr(a1);
236 tcg_temp_free_i32(desc);
237}
238
239/* Generate a call to a gvec-style helper with three vector operands
240 and an extra pointer operand. */
241void tcg_gen_gvec_3_ptr(uint32_t dofs, uint32_t aofs, uint32_t bofs,
242 TCGv_ptr ptr, uint32_t oprsz, uint32_t maxsz,
243 int32_t data, gen_helper_gvec_3_ptr *fn)
244{
245 TCGv_ptr a0, a1, a2;
246 TCGv_i32 desc = tcg_const_i32(simd_desc(oprsz, maxsz, data));
247
248 a0 = tcg_temp_new_ptr();
249 a1 = tcg_temp_new_ptr();
250 a2 = tcg_temp_new_ptr();
251
252 tcg_gen_addi_ptr(a0, cpu_env, dofs);
253 tcg_gen_addi_ptr(a1, cpu_env, aofs);
254 tcg_gen_addi_ptr(a2, cpu_env, bofs);
255
256 fn(a0, a1, a2, ptr, desc);
257
258 tcg_temp_free_ptr(a0);
259 tcg_temp_free_ptr(a1);
260 tcg_temp_free_ptr(a2);
261 tcg_temp_free_i32(desc);
262}
263
264/* Generate a call to a gvec-style helper with four vector operands
265 and an extra pointer operand. */
266void tcg_gen_gvec_4_ptr(uint32_t dofs, uint32_t aofs, uint32_t bofs,
267 uint32_t cofs, TCGv_ptr ptr, uint32_t oprsz,
268 uint32_t maxsz, int32_t data,
269 gen_helper_gvec_4_ptr *fn)
270{
271 TCGv_ptr a0, a1, a2, a3;
272 TCGv_i32 desc = tcg_const_i32(simd_desc(oprsz, maxsz, data));
273
274 a0 = tcg_temp_new_ptr();
275 a1 = tcg_temp_new_ptr();
276 a2 = tcg_temp_new_ptr();
277 a3 = tcg_temp_new_ptr();
278
279 tcg_gen_addi_ptr(a0, cpu_env, dofs);
280 tcg_gen_addi_ptr(a1, cpu_env, aofs);
281 tcg_gen_addi_ptr(a2, cpu_env, bofs);
282 tcg_gen_addi_ptr(a3, cpu_env, cofs);
283
284 fn(a0, a1, a2, a3, ptr, desc);
285
286 tcg_temp_free_ptr(a0);
287 tcg_temp_free_ptr(a1);
288 tcg_temp_free_ptr(a2);
289 tcg_temp_free_ptr(a3);
290 tcg_temp_free_i32(desc);
291}
292
24459716
RH		 293/* Generate a call to a gvec-style helper with five vector operands
294 and an extra pointer operand. */
295void tcg_gen_gvec_5_ptr(uint32_t dofs, uint32_t aofs, uint32_t bofs,
296 uint32_t cofs, uint32_t eofs, TCGv_ptr ptr,
297 uint32_t oprsz, uint32_t maxsz, int32_t data,
298 gen_helper_gvec_5_ptr *fn)
299{
300 TCGv_ptr a0, a1, a2, a3, a4;
301 TCGv_i32 desc = tcg_const_i32(simd_desc(oprsz, maxsz, data));
302
303 a0 = tcg_temp_new_ptr();
304 a1 = tcg_temp_new_ptr();
305 a2 = tcg_temp_new_ptr();
306 a3 = tcg_temp_new_ptr();
307 a4 = tcg_temp_new_ptr();
308
309 tcg_gen_addi_ptr(a0, cpu_env, dofs);
310 tcg_gen_addi_ptr(a1, cpu_env, aofs);
311 tcg_gen_addi_ptr(a2, cpu_env, bofs);
312 tcg_gen_addi_ptr(a3, cpu_env, cofs);
313 tcg_gen_addi_ptr(a4, cpu_env, eofs);
314
315 fn(a0, a1, a2, a3, a4, ptr, desc);
316
317 tcg_temp_free_ptr(a0);
318 tcg_temp_free_ptr(a1);
319 tcg_temp_free_ptr(a2);
320 tcg_temp_free_ptr(a3);
321 tcg_temp_free_ptr(a4);
322 tcg_temp_free_i32(desc);
323}
324
db432672
RH		 325/* Return true if we want to implement something of OPRSZ bytes
326 in units of LNSZ. This limits the expansion of inline code. */
327static inline bool check_size_impl(uint32_t oprsz, uint32_t lnsz)
328{
f47db80c
RH		 329 uint32_t q, r;
330
331 if (oprsz < lnsz) {
332 return false;
333 }
334
335 q = oprsz / lnsz;
336 r = oprsz % lnsz;
337 tcg_debug_assert((r & 7) == 0);
338
339 if (lnsz < 16) {
340 /* For sizes below 16, accept no remainder. */
341 if (r != 0) {
342 return false;
343 }
344 } else {
345 /*
346 * Recall that ARM SVE allows vector sizes that are not a
347 * power of 2, but always a multiple of 16. The intent is
348 * that e.g. size == 80 would be expanded with 2x32 + 1x16.
349 * In addition, expand_clr needs to handle a multiple of 8.
350 * Thus we can handle the tail with one more operation per
351 * diminishing power of 2.
352 */
353 q += ctpop32(r);
499748d7 354 }
f47db80c
RH		 355
356 return q <= MAX_UNROLL;
db432672
RH		 357}
358
359static void expand_clr(uint32_t dofs, uint32_t maxsz);
360
361/* Duplicate C as per VECE. */
362uint64_t (dup_const)(unsigned vece, uint64_t c)
363{
364 switch (vece) {
365 case MO_8:
366 return 0x0101010101010101ull * (uint8_t)c;
367 case MO_16:
368 return 0x0001000100010001ull * (uint16_t)c;
369 case MO_32:
370 return 0x0000000100000001ull * (uint32_t)c;
371 case MO_64:
372 return c;
373 default:
374 g_assert_not_reached();
375 }
376}
377
378/* Duplicate IN into OUT as per VECE. */
379static void gen_dup_i32(unsigned vece, TCGv_i32 out, TCGv_i32 in)
380{
381 switch (vece) {
382 case MO_8:
383 tcg_gen_ext8u_i32(out, in);
384 tcg_gen_muli_i32(out, out, 0x01010101);
385 break;
386 case MO_16:
387 tcg_gen_deposit_i32(out, in, in, 16, 16);
388 break;
389 case MO_32:
390 tcg_gen_mov_i32(out, in);
391 break;
392 default:
393 g_assert_not_reached();
394 }
395}
396
397static void gen_dup_i64(unsigned vece, TCGv_i64 out, TCGv_i64 in)
398{
399 switch (vece) {
400 case MO_8:
401 tcg_gen_ext8u_i64(out, in);
402 tcg_gen_muli_i64(out, out, 0x0101010101010101ull);
403 break;
404 case MO_16:
405 tcg_gen_ext16u_i64(out, in);
406 tcg_gen_muli_i64(out, out, 0x0001000100010001ull);
407 break;
408 case MO_32:
409 tcg_gen_deposit_i64(out, in, in, 32, 32);
410 break;
411 case MO_64:
412 tcg_gen_mov_i64(out, in);
413 break;
414 default:
415 g_assert_not_reached();
416 }
417}
418
adb196cb
RH		 419/* Select a supported vector type for implementing an operation on SIZE
420 * bytes. If OP is 0, assume that the real operation to be performed is
421 * required by all backends. Otherwise, make sure than OP can be performed
422 * on elements of size VECE in the selected type. Do not select V64 if
423 * PREFER_I64 is true. Return 0 if no vector type is selected.
424 */
53229a77
RH		 425static TCGType choose_vector_type(const TCGOpcode *list, unsigned vece,
426 uint32_t size, bool prefer_i64)
adb196cb 427{
f47db80c
RH		 428 /*
429 * Recall that ARM SVE allows vector sizes that are not a
430 * power of 2, but always a multiple of 16. The intent is
431 * that e.g. size == 80 would be expanded with 2x32 + 1x16.
432 * It is hard to imagine a case in which v256 is supported
433 * but v128 is not, but check anyway.
434 * In addition, expand_clr needs to handle a multiple of 8.
435 */
436 if (TCG_TARGET_HAS_v256 &&
437 check_size_impl(size, 32) &&
438 tcg_can_emit_vecop_list(list, TCG_TYPE_V256, vece) &&
439 (!(size & 16) ||
440 (TCG_TARGET_HAS_v128 &&
441 tcg_can_emit_vecop_list(list, TCG_TYPE_V128, vece))) &&
442 (!(size & 8) ||
443 (TCG_TARGET_HAS_v64 &&
444 tcg_can_emit_vecop_list(list, TCG_TYPE_V64, vece)))) {
445 return TCG_TYPE_V256;
adb196cb 446 }
f47db80c
RH		 447 if (TCG_TARGET_HAS_v128 &&
448 check_size_impl(size, 16) &&
449 tcg_can_emit_vecop_list(list, TCG_TYPE_V128, vece) &&
450 (!(size & 8) ||
451 (TCG_TARGET_HAS_v64 &&
452 tcg_can_emit_vecop_list(list, TCG_TYPE_V64, vece)))) {
adb196cb
RH		 453 return TCG_TYPE_V128;
454 }
455 if (TCG_TARGET_HAS_v64 && !prefer_i64 && check_size_impl(size, 8)
53229a77 456 && tcg_can_emit_vecop_list(list, TCG_TYPE_V64, vece)) {
adb196cb
RH		 457 return TCG_TYPE_V64;
458 }
459 return 0;
460}
461
37ee55a0
RH		 462static void do_dup_store(TCGType type, uint32_t dofs, uint32_t oprsz,
463 uint32_t maxsz, TCGv_vec t_vec)
464{
465 uint32_t i = 0;
466
f47db80c
RH		 467 tcg_debug_assert(oprsz >= 8);
468
469 /*
470 * This may be expand_clr for the tail of an operation, e.g.
471 * oprsz == 8 && maxsz == 64. The first 8 bytes of this store
472 * are misaligned wrt the maximum vector size, so do that first.
473 */
474 if (dofs & 8) {
475 tcg_gen_stl_vec(t_vec, cpu_env, dofs + i, TCG_TYPE_V64);
476 i += 8;
477 }
478
37ee55a0
RH		 479 switch (type) {
480 case TCG_TYPE_V256:
481 /*
482 * Recall that ARM SVE allows vector sizes that are not a
483 * power of 2, but always a multiple of 16. The intent is
484 * that e.g. size == 80 would be expanded with 2x32 + 1x16.
485 */
486 for (; i + 32 <= oprsz; i += 32) {
487 tcg_gen_stl_vec(t_vec, cpu_env, dofs + i, TCG_TYPE_V256);
488 }
489 /* fallthru */
490 case TCG_TYPE_V128:
491 for (; i + 16 <= oprsz; i += 16) {
492 tcg_gen_stl_vec(t_vec, cpu_env, dofs + i, TCG_TYPE_V128);
493 }
494 break;
495 case TCG_TYPE_V64:
496 for (; i < oprsz; i += 8) {
497 tcg_gen_stl_vec(t_vec, cpu_env, dofs + i, TCG_TYPE_V64);
498 }
499 break;
500 default:
501 g_assert_not_reached();
502 }
503
504 if (oprsz < maxsz) {
505 expand_clr(dofs + oprsz, maxsz - oprsz);
506 }
507}
508
db432672
RH		 509/* Set OPRSZ bytes at DOFS to replications of IN_32, IN_64 or IN_C.
510 * Only one of IN_32 or IN_64 may be set;
511 * IN_C is used if IN_32 and IN_64 are unset.
512 */
513static void do_dup(unsigned vece, uint32_t dofs, uint32_t oprsz,
514 uint32_t maxsz, TCGv_i32 in_32, TCGv_i64 in_64,
515 uint64_t in_c)
516{
517 TCGType type;
518 TCGv_i64 t_64;
519 TCGv_i32 t_32, t_desc;
520 TCGv_ptr t_ptr;
521 uint32_t i;
522
523 assert(vece <= (in_32 ? MO_32 : MO_64));
524 assert(in_32 == NULL || in_64 == NULL);
525
526 /* If we're storing 0, expand oprsz to maxsz. */
527 if (in_32 == NULL && in_64 == NULL) {
528 in_c = dup_const(vece, in_c);
529 if (in_c == 0) {
530 oprsz = maxsz;
531 }
532 }
533
adb196cb
RH		 534 /* Implement inline with a vector type, if possible.
535 * Prefer integer when 64-bit host and no variable dup.
536 */
53229a77 537 type = choose_vector_type(NULL, vece, oprsz,
adb196cb
RH		 538 (TCG_TARGET_REG_BITS == 64 && in_32 == NULL
539 && (in_64 == NULL || vece == MO_64)));
db432672
RH		 540 if (type != 0) {
541 TCGv_vec t_vec = tcg_temp_new_vec(type);
542
543 if (in_32) {
544 tcg_gen_dup_i32_vec(vece, t_vec, in_32);
545 } else if (in_64) {
546 tcg_gen_dup_i64_vec(vece, t_vec, in_64);
547 } else {
37ee55a0 548 tcg_gen_dupi_vec(vece, t_vec, in_c);
db432672 549 }
37ee55a0 550 do_dup_store(type, dofs, oprsz, maxsz, t_vec);
db432672 551 tcg_temp_free_vec(t_vec);
37ee55a0 552 return;
db432672
RH		 553 }
554
555 /* Otherwise, inline with an integer type, unless "large". */
556 if (check_size_impl(oprsz, TCG_TARGET_REG_BITS / 8)) {
557 t_64 = NULL;
558 t_32 = NULL;
559
560 if (in_32) {
561 /* We are given a 32-bit variable input. For a 64-bit host,
562 use a 64-bit operation unless the 32-bit operation would
563 be simple enough. */
564 if (TCG_TARGET_REG_BITS == 64
565 && (vece != MO_32 || !check_size_impl(oprsz, 4))) {
566 t_64 = tcg_temp_new_i64();
567 tcg_gen_extu_i32_i64(t_64, in_32);
568 gen_dup_i64(vece, t_64, t_64);
569 } else {
570 t_32 = tcg_temp_new_i32();
571 gen_dup_i32(vece, t_32, in_32);
572 }
573 } else if (in_64) {
574 /* We are given a 64-bit variable input. */
575 t_64 = tcg_temp_new_i64();
576 gen_dup_i64(vece, t_64, in_64);
577 } else {
578 /* We are given a constant input. */
579 /* For 64-bit hosts, use 64-bit constants for "simple" constants
580 or when we'd need too many 32-bit stores, or when a 64-bit
581 constant is really required. */
582 if (vece == MO_64
583 || (TCG_TARGET_REG_BITS == 64
584 && (in_c == 0 || in_c == -1
585 || !check_size_impl(oprsz, 4)))) {
586 t_64 = tcg_const_i64(in_c);
587 } else {
588 t_32 = tcg_const_i32(in_c);
589 }
590 }
591
592 /* Implement inline if we picked an implementation size above. */
593 if (t_32) {
594 for (i = 0; i < oprsz; i += 4) {
595 tcg_gen_st_i32(t_32, cpu_env, dofs + i);
596 }
597 tcg_temp_free_i32(t_32);
598 goto done;
599 }
600 if (t_64) {
601 for (i = 0; i < oprsz; i += 8) {
602 tcg_gen_st_i64(t_64, cpu_env, dofs + i);
603 }
604 tcg_temp_free_i64(t_64);
605 goto done;
adb196cb 606 }
db432672
RH		 607 }
608
609 /* Otherwise implement out of line. */
610 t_ptr = tcg_temp_new_ptr();
611 tcg_gen_addi_ptr(t_ptr, cpu_env, dofs);
612 t_desc = tcg_const_i32(simd_desc(oprsz, maxsz, 0));
613
614 if (vece == MO_64) {
615 if (in_64) {
616 gen_helper_gvec_dup64(t_ptr, t_desc, in_64);
617 } else {
618 t_64 = tcg_const_i64(in_c);
619 gen_helper_gvec_dup64(t_ptr, t_desc, t_64);
620 tcg_temp_free_i64(t_64);
621 }
622 } else {
623 typedef void dup_fn(TCGv_ptr, TCGv_i32, TCGv_i32);
624 static dup_fn * const fns[3] = {
625 gen_helper_gvec_dup8,
626 gen_helper_gvec_dup16,
627 gen_helper_gvec_dup32
628 };
629
630 if (in_32) {
631 fns[vece](t_ptr, t_desc, in_32);
632 } else {
633 t_32 = tcg_temp_new_i32();
634 if (in_64) {
635 tcg_gen_extrl_i64_i32(t_32, in_64);
636 } else if (vece == MO_8) {
637 tcg_gen_movi_i32(t_32, in_c & 0xff);
638 } else if (vece == MO_16) {
639 tcg_gen_movi_i32(t_32, in_c & 0xffff);
640 } else {
641 tcg_gen_movi_i32(t_32, in_c);
642 }
643 fns[vece](t_ptr, t_desc, t_32);
644 tcg_temp_free_i32(t_32);
645 }
646 }
647
648 tcg_temp_free_ptr(t_ptr);
649 tcg_temp_free_i32(t_desc);
650 return;
651
652 done:
653 if (oprsz < maxsz) {
654 expand_clr(dofs + oprsz, maxsz - oprsz);
655 }
656}
657
658/* Likewise, but with zero. */
659static void expand_clr(uint32_t dofs, uint32_t maxsz)
660{
661 do_dup(MO_8, dofs, maxsz, maxsz, NULL, NULL, 0);
662}
663
664/* Expand OPSZ bytes worth of two-operand operations using i32 elements. */
665static void expand_2_i32(uint32_t dofs, uint32_t aofs, uint32_t oprsz,
ac09ae62 666 bool load_dest, void (*fni)(TCGv_i32, TCGv_i32))
db432672
RH		 667{
668 TCGv_i32 t0 = tcg_temp_new_i32();
ac09ae62 669 TCGv_i32 t1 = tcg_temp_new_i32();
db432672
RH		 670 uint32_t i;
671
672 for (i = 0; i < oprsz; i += 4) {
673 tcg_gen_ld_i32(t0, cpu_env, aofs + i);
ac09ae62
RH		 674 if (load_dest) {
675 tcg_gen_ld_i32(t1, cpu_env, dofs + i);
676 }
677 fni(t1, t0);
678 tcg_gen_st_i32(t1, cpu_env, dofs + i);
db432672
RH		 679 }
680 tcg_temp_free_i32(t0);
ac09ae62 681 tcg_temp_free_i32(t1);
db432672
RH		 682}
683
d0ec9796
RH		 684static void expand_2i_i32(uint32_t dofs, uint32_t aofs, uint32_t oprsz,
685 int32_t c, bool load_dest,
686 void (*fni)(TCGv_i32, TCGv_i32, int32_t))
687{
688 TCGv_i32 t0 = tcg_temp_new_i32();
689 TCGv_i32 t1 = tcg_temp_new_i32();
690 uint32_t i;
691
692 for (i = 0; i < oprsz; i += 4) {
693 tcg_gen_ld_i32(t0, cpu_env, aofs + i);
694 if (load_dest) {
695 tcg_gen_ld_i32(t1, cpu_env, dofs + i);
696 }
697 fni(t1, t0, c);
698 tcg_gen_st_i32(t1, cpu_env, dofs + i);
699 }
700 tcg_temp_free_i32(t0);
701 tcg_temp_free_i32(t1);
702}
703
22fc3527
RH		 704static void expand_2s_i32(uint32_t dofs, uint32_t aofs, uint32_t oprsz,
705 TCGv_i32 c, bool scalar_first,
706 void (*fni)(TCGv_i32, TCGv_i32, TCGv_i32))
707{
708 TCGv_i32 t0 = tcg_temp_new_i32();
709 TCGv_i32 t1 = tcg_temp_new_i32();
710 uint32_t i;
711
712 for (i = 0; i < oprsz; i += 4) {
713 tcg_gen_ld_i32(t0, cpu_env, aofs + i);
714 if (scalar_first) {
715 fni(t1, c, t0);
716 } else {
717 fni(t1, t0, c);
718 }
719 tcg_gen_st_i32(t1, cpu_env, dofs + i);
720 }
721 tcg_temp_free_i32(t0);
722 tcg_temp_free_i32(t1);
723}
724
db432672
RH		 725/* Expand OPSZ bytes worth of three-operand operations using i32 elements. */
726static void expand_3_i32(uint32_t dofs, uint32_t aofs,
727 uint32_t bofs, uint32_t oprsz, bool load_dest,
728 void (*fni)(TCGv_i32, TCGv_i32, TCGv_i32))
729{
730 TCGv_i32 t0 = tcg_temp_new_i32();
731 TCGv_i32 t1 = tcg_temp_new_i32();
732 TCGv_i32 t2 = tcg_temp_new_i32();
733 uint32_t i;
734
735 for (i = 0; i < oprsz; i += 4) {
736 tcg_gen_ld_i32(t0, cpu_env, aofs + i);
737 tcg_gen_ld_i32(t1, cpu_env, bofs + i);
738 if (load_dest) {
739 tcg_gen_ld_i32(t2, cpu_env, dofs + i);
740 }
741 fni(t2, t0, t1);
742 tcg_gen_st_i32(t2, cpu_env, dofs + i);
743 }
744 tcg_temp_free_i32(t2);
745 tcg_temp_free_i32(t1);
746 tcg_temp_free_i32(t0);
747}
748
e1227bb6
DH		 749static void expand_3i_i32(uint32_t dofs, uint32_t aofs, uint32_t bofs,
750 uint32_t oprsz, int32_t c, bool load_dest,
751 void (*fni)(TCGv_i32, TCGv_i32, TCGv_i32, int32_t))
752{
753 TCGv_i32 t0 = tcg_temp_new_i32();
754 TCGv_i32 t1 = tcg_temp_new_i32();
755 TCGv_i32 t2 = tcg_temp_new_i32();
756 uint32_t i;
757
758 for (i = 0; i < oprsz; i += 4) {
759 tcg_gen_ld_i32(t0, cpu_env, aofs + i);
760 tcg_gen_ld_i32(t1, cpu_env, bofs + i);
761 if (load_dest) {
762 tcg_gen_ld_i32(t2, cpu_env, dofs + i);
763 }
764 fni(t2, t0, t1, c);
765 tcg_gen_st_i32(t2, cpu_env, dofs + i);
766 }
767 tcg_temp_free_i32(t0);
768 tcg_temp_free_i32(t1);
769 tcg_temp_free_i32(t2);
770}
771
db432672
RH		 772/* Expand OPSZ bytes worth of three-operand operations using i32 elements. */
773static void expand_4_i32(uint32_t dofs, uint32_t aofs, uint32_t bofs,
5d6acdd4 774 uint32_t cofs, uint32_t oprsz, bool write_aofs,
db432672
RH		 775 void (*fni)(TCGv_i32, TCGv_i32, TCGv_i32, TCGv_i32))
776{
777 TCGv_i32 t0 = tcg_temp_new_i32();
778 TCGv_i32 t1 = tcg_temp_new_i32();
779 TCGv_i32 t2 = tcg_temp_new_i32();
780 TCGv_i32 t3 = tcg_temp_new_i32();
781 uint32_t i;
782
783 for (i = 0; i < oprsz; i += 4) {
784 tcg_gen_ld_i32(t1, cpu_env, aofs + i);
785 tcg_gen_ld_i32(t2, cpu_env, bofs + i);
786 tcg_gen_ld_i32(t3, cpu_env, cofs + i);
787 fni(t0, t1, t2, t3);
788 tcg_gen_st_i32(t0, cpu_env, dofs + i);
5d6acdd4
RH		 789 if (write_aofs) {
790 tcg_gen_st_i32(t1, cpu_env, aofs + i);
791 }
db432672
RH		 792 }
793 tcg_temp_free_i32(t3);
794 tcg_temp_free_i32(t2);
795 tcg_temp_free_i32(t1);
796 tcg_temp_free_i32(t0);
797}
798
799/* Expand OPSZ bytes worth of two-operand operations using i64 elements. */
800static void expand_2_i64(uint32_t dofs, uint32_t aofs, uint32_t oprsz,
ac09ae62 801 bool load_dest, void (*fni)(TCGv_i64, TCGv_i64))
db432672
RH		 802{
803 TCGv_i64 t0 = tcg_temp_new_i64();
ac09ae62 804 TCGv_i64 t1 = tcg_temp_new_i64();
db432672
RH		 805 uint32_t i;
806
807 for (i = 0; i < oprsz; i += 8) {
808 tcg_gen_ld_i64(t0, cpu_env, aofs + i);
ac09ae62
RH		 809 if (load_dest) {
810 tcg_gen_ld_i64(t1, cpu_env, dofs + i);
811 }
812 fni(t1, t0);
813 tcg_gen_st_i64(t1, cpu_env, dofs + i);
db432672
RH		 814 }
815 tcg_temp_free_i64(t0);
ac09ae62 816 tcg_temp_free_i64(t1);
db432672
RH		 817}
818
d0ec9796
RH		 819static void expand_2i_i64(uint32_t dofs, uint32_t aofs, uint32_t oprsz,
820 int64_t c, bool load_dest,
821 void (*fni)(TCGv_i64, TCGv_i64, int64_t))
822{
823 TCGv_i64 t0 = tcg_temp_new_i64();
824 TCGv_i64 t1 = tcg_temp_new_i64();
825 uint32_t i;
826
827 for (i = 0; i < oprsz; i += 8) {
828 tcg_gen_ld_i64(t0, cpu_env, aofs + i);
829 if (load_dest) {
830 tcg_gen_ld_i64(t1, cpu_env, dofs + i);
831 }
832 fni(t1, t0, c);
833 tcg_gen_st_i64(t1, cpu_env, dofs + i);
834 }
835 tcg_temp_free_i64(t0);
836 tcg_temp_free_i64(t1);
837}
838
22fc3527
RH		 839static void expand_2s_i64(uint32_t dofs, uint32_t aofs, uint32_t oprsz,
840 TCGv_i64 c, bool scalar_first,
841 void (*fni)(TCGv_i64, TCGv_i64, TCGv_i64))
842{
843 TCGv_i64 t0 = tcg_temp_new_i64();
844 TCGv_i64 t1 = tcg_temp_new_i64();
845 uint32_t i;
846
847 for (i = 0; i < oprsz; i += 8) {
848 tcg_gen_ld_i64(t0, cpu_env, aofs + i);
849 if (scalar_first) {
850 fni(t1, c, t0);
851 } else {
852 fni(t1, t0, c);
853 }
854 tcg_gen_st_i64(t1, cpu_env, dofs + i);
855 }
856 tcg_temp_free_i64(t0);
857 tcg_temp_free_i64(t1);
858}
859
db432672
RH		 860/* Expand OPSZ bytes worth of three-operand operations using i64 elements. */
861static void expand_3_i64(uint32_t dofs, uint32_t aofs,
862 uint32_t bofs, uint32_t oprsz, bool load_dest,
863 void (*fni)(TCGv_i64, TCGv_i64, TCGv_i64))
864{
865 TCGv_i64 t0 = tcg_temp_new_i64();
866 TCGv_i64 t1 = tcg_temp_new_i64();
867 TCGv_i64 t2 = tcg_temp_new_i64();
868 uint32_t i;
869
870 for (i = 0; i < oprsz; i += 8) {
871 tcg_gen_ld_i64(t0, cpu_env, aofs + i);
872 tcg_gen_ld_i64(t1, cpu_env, bofs + i);
873 if (load_dest) {
874 tcg_gen_ld_i64(t2, cpu_env, dofs + i);
875 }
876 fni(t2, t0, t1);
877 tcg_gen_st_i64(t2, cpu_env, dofs + i);
878 }
879 tcg_temp_free_i64(t2);
880 tcg_temp_free_i64(t1);
881 tcg_temp_free_i64(t0);
882}
883
e1227bb6
DH		 884static void expand_3i_i64(uint32_t dofs, uint32_t aofs, uint32_t bofs,
885 uint32_t oprsz, int64_t c, bool load_dest,
886 void (*fni)(TCGv_i64, TCGv_i64, TCGv_i64, int64_t))
887{
888 TCGv_i64 t0 = tcg_temp_new_i64();
889 TCGv_i64 t1 = tcg_temp_new_i64();
890 TCGv_i64 t2 = tcg_temp_new_i64();
891 uint32_t i;
892
893 for (i = 0; i < oprsz; i += 8) {
894 tcg_gen_ld_i64(t0, cpu_env, aofs + i);
895 tcg_gen_ld_i64(t1, cpu_env, bofs + i);
896 if (load_dest) {
897 tcg_gen_ld_i64(t2, cpu_env, dofs + i);
898 }
899 fni(t2, t0, t1, c);
900 tcg_gen_st_i64(t2, cpu_env, dofs + i);
901 }
902 tcg_temp_free_i64(t0);
903 tcg_temp_free_i64(t1);
904 tcg_temp_free_i64(t2);
905}
906
db432672
RH		 907/* Expand OPSZ bytes worth of three-operand operations using i64 elements. */
908static void expand_4_i64(uint32_t dofs, uint32_t aofs, uint32_t bofs,
5d6acdd4 909 uint32_t cofs, uint32_t oprsz, bool write_aofs,
db432672
RH		 910 void (*fni)(TCGv_i64, TCGv_i64, TCGv_i64, TCGv_i64))
911{
912 TCGv_i64 t0 = tcg_temp_new_i64();
913 TCGv_i64 t1 = tcg_temp_new_i64();
914 TCGv_i64 t2 = tcg_temp_new_i64();
915 TCGv_i64 t3 = tcg_temp_new_i64();
916 uint32_t i;
917
918 for (i = 0; i < oprsz; i += 8) {
919 tcg_gen_ld_i64(t1, cpu_env, aofs + i);
920 tcg_gen_ld_i64(t2, cpu_env, bofs + i);
921 tcg_gen_ld_i64(t3, cpu_env, cofs + i);
922 fni(t0, t1, t2, t3);
923 tcg_gen_st_i64(t0, cpu_env, dofs + i);
5d6acdd4
RH		 924 if (write_aofs) {
925 tcg_gen_st_i64(t1, cpu_env, aofs + i);
926 }
db432672
RH		 927 }
928 tcg_temp_free_i64(t3);
929 tcg_temp_free_i64(t2);
930 tcg_temp_free_i64(t1);
931 tcg_temp_free_i64(t0);
932}
933
934/* Expand OPSZ bytes worth of two-operand operations using host vectors. */
935static void expand_2_vec(unsigned vece, uint32_t dofs, uint32_t aofs,
936 uint32_t oprsz, uint32_t tysz, TCGType type,
ac09ae62 937 bool load_dest,
db432672
RH		 938 void (*fni)(unsigned, TCGv_vec, TCGv_vec))
939{
940 TCGv_vec t0 = tcg_temp_new_vec(type);
ac09ae62 941 TCGv_vec t1 = tcg_temp_new_vec(type);
db432672
RH		 942 uint32_t i;
943
944 for (i = 0; i < oprsz; i += tysz) {
945 tcg_gen_ld_vec(t0, cpu_env, aofs + i);
ac09ae62
RH		 946 if (load_dest) {
947 tcg_gen_ld_vec(t1, cpu_env, dofs + i);
948 }
949 fni(vece, t1, t0);
950 tcg_gen_st_vec(t1, cpu_env, dofs + i);
db432672
RH		 951 }
952 tcg_temp_free_vec(t0);
ac09ae62 953 tcg_temp_free_vec(t1);
db432672
RH		 954}
955
d0ec9796
RH		 956/* Expand OPSZ bytes worth of two-vector operands and an immediate operand
957 using host vectors. */
958static void expand_2i_vec(unsigned vece, uint32_t dofs, uint32_t aofs,
959 uint32_t oprsz, uint32_t tysz, TCGType type,
960 int64_t c, bool load_dest,
961 void (*fni)(unsigned, TCGv_vec, TCGv_vec, int64_t))
962{
963 TCGv_vec t0 = tcg_temp_new_vec(type);
964 TCGv_vec t1 = tcg_temp_new_vec(type);
965 uint32_t i;
966
967 for (i = 0; i < oprsz; i += tysz) {
968 tcg_gen_ld_vec(t0, cpu_env, aofs + i);
969 if (load_dest) {
970 tcg_gen_ld_vec(t1, cpu_env, dofs + i);
971 }
972 fni(vece, t1, t0, c);
973 tcg_gen_st_vec(t1, cpu_env, dofs + i);
974 }
975 tcg_temp_free_vec(t0);
976 tcg_temp_free_vec(t1);
977}
978
22fc3527
RH		 979static void expand_2s_vec(unsigned vece, uint32_t dofs, uint32_t aofs,
980 uint32_t oprsz, uint32_t tysz, TCGType type,
981 TCGv_vec c, bool scalar_first,
982 void (*fni)(unsigned, TCGv_vec, TCGv_vec, TCGv_vec))
983{
984 TCGv_vec t0 = tcg_temp_new_vec(type);
985 TCGv_vec t1 = tcg_temp_new_vec(type);
986 uint32_t i;
987
988 for (i = 0; i < oprsz; i += tysz) {
989 tcg_gen_ld_vec(t0, cpu_env, aofs + i);
990 if (scalar_first) {
991 fni(vece, t1, c, t0);
992 } else {
993 fni(vece, t1, t0, c);
994 }
995 tcg_gen_st_vec(t1, cpu_env, dofs + i);
996 }
997 tcg_temp_free_vec(t0);
998 tcg_temp_free_vec(t1);
999}
1000
db432672
RH		 1001/* Expand OPSZ bytes worth of three-operand operations using host vectors. */
1002static void expand_3_vec(unsigned vece, uint32_t dofs, uint32_t aofs,
1003 uint32_t bofs, uint32_t oprsz,
1004 uint32_t tysz, TCGType type, bool load_dest,
1005 void (*fni)(unsigned, TCGv_vec, TCGv_vec, TCGv_vec))
1006{
1007 TCGv_vec t0 = tcg_temp_new_vec(type);
1008 TCGv_vec t1 = tcg_temp_new_vec(type);
1009 TCGv_vec t2 = tcg_temp_new_vec(type);
1010 uint32_t i;
1011
1012 for (i = 0; i < oprsz; i += tysz) {
1013 tcg_gen_ld_vec(t0, cpu_env, aofs + i);
1014 tcg_gen_ld_vec(t1, cpu_env, bofs + i);
1015 if (load_dest) {
1016 tcg_gen_ld_vec(t2, cpu_env, dofs + i);
1017 }
1018 fni(vece, t2, t0, t1);
1019 tcg_gen_st_vec(t2, cpu_env, dofs + i);
1020 }
1021 tcg_temp_free_vec(t2);
1022 tcg_temp_free_vec(t1);
1023 tcg_temp_free_vec(t0);
1024}
1025
e1227bb6
DH		 1026/*
1027 * Expand OPSZ bytes worth of three-vector operands and an immediate operand
1028 * using host vectors.
1029 */
1030static void expand_3i_vec(unsigned vece, uint32_t dofs, uint32_t aofs,
1031 uint32_t bofs, uint32_t oprsz, uint32_t tysz,
1032 TCGType type, int64_t c, bool load_dest,
1033 void (*fni)(unsigned, TCGv_vec, TCGv_vec, TCGv_vec,
1034 int64_t))
1035{
1036 TCGv_vec t0 = tcg_temp_new_vec(type);
1037 TCGv_vec t1 = tcg_temp_new_vec(type);
1038 TCGv_vec t2 = tcg_temp_new_vec(type);
1039 uint32_t i;
1040
1041 for (i = 0; i < oprsz; i += tysz) {
1042 tcg_gen_ld_vec(t0, cpu_env, aofs + i);
1043 tcg_gen_ld_vec(t1, cpu_env, bofs + i);
1044 if (load_dest) {
1045 tcg_gen_ld_vec(t2, cpu_env, dofs + i);
1046 }
1047 fni(vece, t2, t0, t1, c);
1048 tcg_gen_st_vec(t2, cpu_env, dofs + i);
1049 }
1050 tcg_temp_free_vec(t0);
1051 tcg_temp_free_vec(t1);
1052 tcg_temp_free_vec(t2);
1053}
1054
db432672
RH		 1055/* Expand OPSZ bytes worth of four-operand operations using host vectors. */
1056static void expand_4_vec(unsigned vece, uint32_t dofs, uint32_t aofs,
1057 uint32_t bofs, uint32_t cofs, uint32_t oprsz,
5d6acdd4 1058 uint32_t tysz, TCGType type, bool write_aofs,
db432672
RH		 1059 void (*fni)(unsigned, TCGv_vec, TCGv_vec,
1060 TCGv_vec, TCGv_vec))
1061{
1062 TCGv_vec t0 = tcg_temp_new_vec(type);
1063 TCGv_vec t1 = tcg_temp_new_vec(type);
1064 TCGv_vec t2 = tcg_temp_new_vec(type);
1065 TCGv_vec t3 = tcg_temp_new_vec(type);
1066 uint32_t i;
1067
1068 for (i = 0; i < oprsz; i += tysz) {
1069 tcg_gen_ld_vec(t1, cpu_env, aofs + i);
1070 tcg_gen_ld_vec(t2, cpu_env, bofs + i);
1071 tcg_gen_ld_vec(t3, cpu_env, cofs + i);
1072 fni(vece, t0, t1, t2, t3);
1073 tcg_gen_st_vec(t0, cpu_env, dofs + i);
5d6acdd4
RH		 1074 if (write_aofs) {
1075 tcg_gen_st_vec(t1, cpu_env, aofs + i);
1076 }
db432672
RH		 1077 }
1078 tcg_temp_free_vec(t3);
1079 tcg_temp_free_vec(t2);
1080 tcg_temp_free_vec(t1);
1081 tcg_temp_free_vec(t0);
1082}
1083
1084/* Expand a vector two-operand operation. */
1085void tcg_gen_gvec_2(uint32_t dofs, uint32_t aofs,
1086 uint32_t oprsz, uint32_t maxsz, const GVecGen2 *g)
1087{
53229a77
RH		 1088 const TCGOpcode *this_list = g->opt_opc ? : vecop_list_empty;
1089 const TCGOpcode *hold_list = tcg_swap_vecop_list(this_list);
adb196cb
RH		 1090 TCGType type;
1091 uint32_t some;
1092
db432672
RH		 1093 check_size_align(oprsz, maxsz, dofs | aofs);
1094 check_overlap_2(dofs, aofs, maxsz);
1095
adb196cb
RH		 1096 type = 0;
1097 if (g->fniv) {
53229a77 1098 type = choose_vector_type(g->opt_opc, g->vece, oprsz, g->prefer_i64);
adb196cb
RH		 1099 }
1100 switch (type) {
1101 case TCG_TYPE_V256:
1102 /* Recall that ARM SVE allows vector sizes that are not a
1103 * power of 2, but always a multiple of 16. The intent is
1104 * that e.g. size == 80 would be expanded with 2x32 + 1x16.
1105 */
1106 some = QEMU_ALIGN_DOWN(oprsz, 32);
ac09ae62
RH		 1107 expand_2_vec(g->vece, dofs, aofs, some, 32, TCG_TYPE_V256,
1108 g->load_dest, g->fniv);
db432672 1109 if (some == oprsz) {
adb196cb 1110 break;
db432672
RH		 1111 }
1112 dofs += some;
1113 aofs += some;
1114 oprsz -= some;
1115 maxsz -= some;
adb196cb
RH		 1116 /* fallthru */
1117 case TCG_TYPE_V128:
ac09ae62
RH		 1118 expand_2_vec(g->vece, dofs, aofs, oprsz, 16, TCG_TYPE_V128,
1119 g->load_dest, g->fniv);
adb196cb
RH		 1120 break;
1121 case TCG_TYPE_V64:
ac09ae62
RH		 1122 expand_2_vec(g->vece, dofs, aofs, oprsz, 8, TCG_TYPE_V64,
1123 g->load_dest, g->fniv);
adb196cb
RH		 1124 break;
1125
1126 case 0:
1127 if (g->fni8 && check_size_impl(oprsz, 8)) {
ac09ae62 1128 expand_2_i64(dofs, aofs, oprsz, g->load_dest, g->fni8);
adb196cb 1129 } else if (g->fni4 && check_size_impl(oprsz, 4)) {
ac09ae62 1130 expand_2_i32(dofs, aofs, oprsz, g->load_dest, g->fni4);
adb196cb
RH		 1131 } else {
1132 assert(g->fno != NULL);
1133 tcg_gen_gvec_2_ool(dofs, aofs, oprsz, maxsz, g->data, g->fno);
53229a77 1134 oprsz = maxsz;
adb196cb
RH		 1135 }
1136 break;
1137
1138 default:
1139 g_assert_not_reached();
db432672 1140 }
53229a77 1141 tcg_swap_vecop_list(hold_list);
db432672 1142
db432672
RH		 1143 if (oprsz < maxsz) {
1144 expand_clr(dofs + oprsz, maxsz - oprsz);
1145 }
1146}
1147
22fc3527 1148/* Expand a vector operation with two vectors and an immediate. */
d0ec9796
RH		 1149void tcg_gen_gvec_2i(uint32_t dofs, uint32_t aofs, uint32_t oprsz,
1150 uint32_t maxsz, int64_t c, const GVecGen2i *g)
1151{
53229a77
RH		 1152 const TCGOpcode *this_list = g->opt_opc ? : vecop_list_empty;
1153 const TCGOpcode *hold_list = tcg_swap_vecop_list(this_list);
adb196cb
RH		 1154 TCGType type;
1155 uint32_t some;
1156
d0ec9796
RH		 1157 check_size_align(oprsz, maxsz, dofs | aofs);
1158 check_overlap_2(dofs, aofs, maxsz);
1159
adb196cb
RH		 1160 type = 0;
1161 if (g->fniv) {
53229a77 1162 type = choose_vector_type(g->opt_opc, g->vece, oprsz, g->prefer_i64);
adb196cb
RH		 1163 }
1164 switch (type) {
1165 case TCG_TYPE_V256:
1166 /* Recall that ARM SVE allows vector sizes that are not a
1167 * power of 2, but always a multiple of 16. The intent is
1168 * that e.g. size == 80 would be expanded with 2x32 + 1x16.
1169 */
1170 some = QEMU_ALIGN_DOWN(oprsz, 32);
d0ec9796
RH		 1171 expand_2i_vec(g->vece, dofs, aofs, some, 32, TCG_TYPE_V256,
1172 c, g->load_dest, g->fniv);
1173 if (some == oprsz) {
adb196cb 1174 break;
d0ec9796
RH		 1175 }
1176 dofs += some;
1177 aofs += some;
1178 oprsz -= some;
1179 maxsz -= some;
adb196cb
RH		 1180 /* fallthru */
1181 case TCG_TYPE_V128:
d0ec9796
RH		 1182 expand_2i_vec(g->vece, dofs, aofs, oprsz, 16, TCG_TYPE_V128,
1183 c, g->load_dest, g->fniv);
adb196cb
RH		 1184 break;
1185 case TCG_TYPE_V64:
d0ec9796
RH		 1186 expand_2i_vec(g->vece, dofs, aofs, oprsz, 8, TCG_TYPE_V64,
1187 c, g->load_dest, g->fniv);
adb196cb
RH		 1188 break;
1189
1190 case 0:
1191 if (g->fni8 && check_size_impl(oprsz, 8)) {
1192 expand_2i_i64(dofs, aofs, oprsz, c, g->load_dest, g->fni8);
1193 } else if (g->fni4 && check_size_impl(oprsz, 4)) {
1194 expand_2i_i32(dofs, aofs, oprsz, c, g->load_dest, g->fni4);
22fc3527 1195 } else {
adb196cb
RH		 1196 if (g->fno) {
1197 tcg_gen_gvec_2_ool(dofs, aofs, oprsz, maxsz, c, g->fno);
1198 } else {
1199 TCGv_i64 tcg_c = tcg_const_i64(c);
1200 tcg_gen_gvec_2i_ool(dofs, aofs, tcg_c, oprsz,
1201 maxsz, c, g->fnoi);
1202 tcg_temp_free_i64(tcg_c);
1203 }
53229a77 1204 oprsz = maxsz;
22fc3527 1205 }
adb196cb
RH		 1206 break;
1207
1208 default:
1209 g_assert_not_reached();
d0ec9796 1210 }
53229a77 1211 tcg_swap_vecop_list(hold_list);
d0ec9796 1212
d0ec9796
RH		 1213 if (oprsz < maxsz) {
1214 expand_clr(dofs + oprsz, maxsz - oprsz);
1215 }
1216}
1217
22fc3527
RH		 1218/* Expand a vector operation with two vectors and a scalar. */
1219void tcg_gen_gvec_2s(uint32_t dofs, uint32_t aofs, uint32_t oprsz,
1220 uint32_t maxsz, TCGv_i64 c, const GVecGen2s *g)
1221{
1222 TCGType type;
1223
1224 check_size_align(oprsz, maxsz, dofs | aofs);
1225 check_overlap_2(dofs, aofs, maxsz);
1226
1227 type = 0;
1228 if (g->fniv) {
53229a77 1229 type = choose_vector_type(g->opt_opc, g->vece, oprsz, g->prefer_i64);
22fc3527
RH		 1230 }
1231 if (type != 0) {
53229a77
RH		 1232 const TCGOpcode *this_list = g->opt_opc ? : vecop_list_empty;
1233 const TCGOpcode *hold_list = tcg_swap_vecop_list(this_list);
22fc3527 1234 TCGv_vec t_vec = tcg_temp_new_vec(type);
adb196cb 1235 uint32_t some;
22fc3527
RH		 1236
1237 tcg_gen_dup_i64_vec(g->vece, t_vec, c);
1238
22fc3527
RH		 1239 switch (type) {
1240 case TCG_TYPE_V256:
adb196cb
RH		 1241 /* Recall that ARM SVE allows vector sizes that are not a
1242 * power of 2, but always a multiple of 16. The intent is
1243 * that e.g. size == 80 would be expanded with 2x32 + 1x16.
1244 */
1245 some = QEMU_ALIGN_DOWN(oprsz, 32);
1246 expand_2s_vec(g->vece, dofs, aofs, some, 32, TCG_TYPE_V256,
1247 t_vec, g->scalar_first, g->fniv);
1248 if (some == oprsz) {
1249 break;
22fc3527 1250 }
adb196cb
RH		 1251 dofs += some;
1252 aofs += some;
1253 oprsz -= some;
1254 maxsz -= some;
22fc3527
RH		 1255 /* fallthru */
1256
1257 case TCG_TYPE_V128:
1258 expand_2s_vec(g->vece, dofs, aofs, oprsz, 16, TCG_TYPE_V128,
1259 t_vec, g->scalar_first, g->fniv);
1260 break;
1261
1262 case TCG_TYPE_V64:
1263 expand_2s_vec(g->vece, dofs, aofs, oprsz, 8, TCG_TYPE_V64,
1264 t_vec, g->scalar_first, g->fniv);
1265 break;
1266
1267 default:
1268 g_assert_not_reached();
1269 }
1270 tcg_temp_free_vec(t_vec);
53229a77 1271 tcg_swap_vecop_list(hold_list);
22fc3527
RH		 1272 } else if (g->fni8 && check_size_impl(oprsz, 8)) {
1273 TCGv_i64 t64 = tcg_temp_new_i64();
1274
1275 gen_dup_i64(g->vece, t64, c);
1276 expand_2s_i64(dofs, aofs, oprsz, t64, g->scalar_first, g->fni8);
1277 tcg_temp_free_i64(t64);
1278 } else if (g->fni4 && check_size_impl(oprsz, 4)) {
1279 TCGv_i32 t32 = tcg_temp_new_i32();
1280
1281 tcg_gen_extrl_i64_i32(t32, c);
1282 gen_dup_i32(g->vece, t32, t32);
1283 expand_2s_i32(dofs, aofs, oprsz, t32, g->scalar_first, g->fni4);
1284 tcg_temp_free_i32(t32);
1285 } else {
1286 tcg_gen_gvec_2i_ool(dofs, aofs, c, oprsz, maxsz, 0, g->fno);
1287 return;
1288 }
1289
1290 if (oprsz < maxsz) {
1291 expand_clr(dofs + oprsz, maxsz - oprsz);
1292 }
1293}
1294
db432672
RH		 1295/* Expand a vector three-operand operation. */
1296void tcg_gen_gvec_3(uint32_t dofs, uint32_t aofs, uint32_t bofs,
1297 uint32_t oprsz, uint32_t maxsz, const GVecGen3 *g)
1298{
53229a77
RH		 1299 const TCGOpcode *this_list = g->opt_opc ? : vecop_list_empty;
1300 const TCGOpcode *hold_list = tcg_swap_vecop_list(this_list);
adb196cb
RH		 1301 TCGType type;
1302 uint32_t some;
1303
db432672
RH		 1304 check_size_align(oprsz, maxsz, dofs | aofs | bofs);
1305 check_overlap_3(dofs, aofs, bofs, maxsz);
1306
adb196cb
RH		 1307 type = 0;
1308 if (g->fniv) {
53229a77 1309 type = choose_vector_type(g->opt_opc, g->vece, oprsz, g->prefer_i64);
adb196cb
RH		 1310 }
1311 switch (type) {
1312 case TCG_TYPE_V256:
1313 /* Recall that ARM SVE allows vector sizes that are not a
1314 * power of 2, but always a multiple of 16. The intent is
1315 * that e.g. size == 80 would be expanded with 2x32 + 1x16.
1316 */
1317 some = QEMU_ALIGN_DOWN(oprsz, 32);
db432672
RH		 1318 expand_3_vec(g->vece, dofs, aofs, bofs, some, 32, TCG_TYPE_V256,
1319 g->load_dest, g->fniv);
1320 if (some == oprsz) {
adb196cb 1321 break;
db432672
RH		 1322 }
1323 dofs += some;
1324 aofs += some;
1325 bofs += some;
1326 oprsz -= some;
1327 maxsz -= some;
adb196cb
RH		 1328 /* fallthru */
1329 case TCG_TYPE_V128:
db432672
RH		 1330 expand_3_vec(g->vece, dofs, aofs, bofs, oprsz, 16, TCG_TYPE_V128,
1331 g->load_dest, g->fniv);
adb196cb
RH		 1332 break;
1333 case TCG_TYPE_V64:
db432672
RH		 1334 expand_3_vec(g->vece, dofs, aofs, bofs, oprsz, 8, TCG_TYPE_V64,
1335 g->load_dest, g->fniv);
adb196cb
RH		 1336 break;
1337
1338 case 0:
1339 if (g->fni8 && check_size_impl(oprsz, 8)) {
1340 expand_3_i64(dofs, aofs, bofs, oprsz, g->load_dest, g->fni8);
1341 } else if (g->fni4 && check_size_impl(oprsz, 4)) {
1342 expand_3_i32(dofs, aofs, bofs, oprsz, g->load_dest, g->fni4);
1343 } else {
1344 assert(g->fno != NULL);
1345 tcg_gen_gvec_3_ool(dofs, aofs, bofs, oprsz,
1346 maxsz, g->data, g->fno);
53229a77 1347 oprsz = maxsz;
adb196cb
RH		 1348 }
1349 break;
1350
1351 default:
1352 g_assert_not_reached();
db432672 1353 }
53229a77 1354 tcg_swap_vecop_list(hold_list);
db432672 1355
db432672
RH		 1356 if (oprsz < maxsz) {
1357 expand_clr(dofs + oprsz, maxsz - oprsz);
1358 }
1359}
1360
e1227bb6
DH		 1361/* Expand a vector operation with three vectors and an immediate. */
1362void tcg_gen_gvec_3i(uint32_t dofs, uint32_t aofs, uint32_t bofs,
1363 uint32_t oprsz, uint32_t maxsz, int64_t c,
1364 const GVecGen3i *g)
1365{
53229a77
RH		 1366 const TCGOpcode *this_list = g->opt_opc ? : vecop_list_empty;
1367 const TCGOpcode *hold_list = tcg_swap_vecop_list(this_list);
e1227bb6
DH		 1368 TCGType type;
1369 uint32_t some;
1370
1371 check_size_align(oprsz, maxsz, dofs | aofs | bofs);
1372 check_overlap_3(dofs, aofs, bofs, maxsz);
1373
1374 type = 0;
1375 if (g->fniv) {
53229a77 1376 type = choose_vector_type(g->opt_opc, g->vece, oprsz, g->prefer_i64);
e1227bb6
DH		 1377 }
1378 switch (type) {
1379 case TCG_TYPE_V256:
1380 /*
1381 * Recall that ARM SVE allows vector sizes that are not a
1382 * power of 2, but always a multiple of 16. The intent is
1383 * that e.g. size == 80 would be expanded with 2x32 + 1x16.
1384 */
1385 some = QEMU_ALIGN_DOWN(oprsz, 32);
1386 expand_3i_vec(g->vece, dofs, aofs, bofs, some, 32, TCG_TYPE_V256,
1387 c, g->load_dest, g->fniv);
1388 if (some == oprsz) {
1389 break;
1390 }
1391 dofs += some;
1392 aofs += some;
1393 bofs += some;
1394 oprsz -= some;
1395 maxsz -= some;
1396 /* fallthru */
1397 case TCG_TYPE_V128:
1398 expand_3i_vec(g->vece, dofs, aofs, bofs, oprsz, 16, TCG_TYPE_V128,
1399 c, g->load_dest, g->fniv);
1400 break;
1401 case TCG_TYPE_V64:
1402 expand_3i_vec(g->vece, dofs, aofs, bofs, oprsz, 8, TCG_TYPE_V64,
1403 c, g->load_dest, g->fniv);
1404 break;
1405
1406 case 0:
1407 if (g->fni8 && check_size_impl(oprsz, 8)) {
1408 expand_3i_i64(dofs, aofs, bofs, oprsz, c, g->load_dest, g->fni8);
1409 } else if (g->fni4 && check_size_impl(oprsz, 4)) {
1410 expand_3i_i32(dofs, aofs, bofs, oprsz, c, g->load_dest, g->fni4);
1411 } else {
1412 assert(g->fno != NULL);
1413 tcg_gen_gvec_3_ool(dofs, aofs, bofs, oprsz, maxsz, c, g->fno);
53229a77 1414 oprsz = maxsz;
e1227bb6
DH		 1415 }
1416 break;
1417
1418 default:
1419 g_assert_not_reached();
1420 }
53229a77 1421 tcg_swap_vecop_list(hold_list);
e1227bb6
DH		 1422
1423 if (oprsz < maxsz) {
1424 expand_clr(dofs + oprsz, maxsz - oprsz);
1425 }
1426}
1427
db432672
RH		 1428/* Expand a vector four-operand operation. */
1429void tcg_gen_gvec_4(uint32_t dofs, uint32_t aofs, uint32_t bofs, uint32_t cofs,
1430 uint32_t oprsz, uint32_t maxsz, const GVecGen4 *g)
1431{
53229a77
RH		 1432 const TCGOpcode *this_list = g->opt_opc ? : vecop_list_empty;
1433 const TCGOpcode *hold_list = tcg_swap_vecop_list(this_list);
adb196cb
RH		 1434 TCGType type;
1435 uint32_t some;
1436
db432672
RH		 1437 check_size_align(oprsz, maxsz, dofs | aofs | bofs | cofs);
1438 check_overlap_4(dofs, aofs, bofs, cofs, maxsz);
1439
adb196cb
RH		 1440 type = 0;
1441 if (g->fniv) {
53229a77 1442 type = choose_vector_type(g->opt_opc, g->vece, oprsz, g->prefer_i64);
adb196cb
RH		 1443 }
1444 switch (type) {
1445 case TCG_TYPE_V256:
1446 /* Recall that ARM SVE allows vector sizes that are not a
1447 * power of 2, but always a multiple of 16. The intent is
1448 * that e.g. size == 80 would be expanded with 2x32 + 1x16.
1449 */
1450 some = QEMU_ALIGN_DOWN(oprsz, 32);
db432672 1451 expand_4_vec(g->vece, dofs, aofs, bofs, cofs, some,
5d6acdd4 1452 32, TCG_TYPE_V256, g->write_aofs, g->fniv);
db432672 1453 if (some == oprsz) {
adb196cb 1454 break;
db432672
RH		 1455 }
1456 dofs += some;
1457 aofs += some;
1458 bofs += some;
1459 cofs += some;
1460 oprsz -= some;
1461 maxsz -= some;
adb196cb
RH		 1462 /* fallthru */
1463 case TCG_TYPE_V128:
db432672 1464 expand_4_vec(g->vece, dofs, aofs, bofs, cofs, oprsz,
5d6acdd4 1465 16, TCG_TYPE_V128, g->write_aofs, g->fniv);
adb196cb
RH		 1466 break;
1467 case TCG_TYPE_V64:
db432672 1468 expand_4_vec(g->vece, dofs, aofs, bofs, cofs, oprsz,
5d6acdd4 1469 8, TCG_TYPE_V64, g->write_aofs, g->fniv);
adb196cb
RH		 1470 break;
1471
1472 case 0:
1473 if (g->fni8 && check_size_impl(oprsz, 8)) {
5d6acdd4
RH		 1474 expand_4_i64(dofs, aofs, bofs, cofs, oprsz,
1475 g->write_aofs, g->fni8);
adb196cb 1476 } else if (g->fni4 && check_size_impl(oprsz, 4)) {
5d6acdd4
RH		 1477 expand_4_i32(dofs, aofs, bofs, cofs, oprsz,
1478 g->write_aofs, g->fni4);
adb196cb
RH		 1479 } else {
1480 assert(g->fno != NULL);
1481 tcg_gen_gvec_4_ool(dofs, aofs, bofs, cofs,
1482 oprsz, maxsz, g->data, g->fno);
53229a77 1483 oprsz = maxsz;
adb196cb
RH		 1484 }
1485 break;
1486
1487 default:
1488 g_assert_not_reached();
db432672 1489 }
53229a77 1490 tcg_swap_vecop_list(hold_list);
db432672 1491
db432672
RH		 1492 if (oprsz < maxsz) {
1493 expand_clr(dofs + oprsz, maxsz - oprsz);
1494 }
1495}
1496
1497/*
1498 * Expand specific vector operations.
1499 */
1500
1501static void vec_mov2(unsigned vece, TCGv_vec a, TCGv_vec b)
1502{
1503 tcg_gen_mov_vec(a, b);
1504}
1505
1506void tcg_gen_gvec_mov(unsigned vece, uint32_t dofs, uint32_t aofs,
1507 uint32_t oprsz, uint32_t maxsz)
1508{
1509 static const GVecGen2 g = {
1510 .fni8 = tcg_gen_mov_i64,
1511 .fniv = vec_mov2,
1512 .fno = gen_helper_gvec_mov,
1513 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
1514 };
1515 if (dofs != aofs) {
1516 tcg_gen_gvec_2(dofs, aofs, oprsz, maxsz, &g);
1517 } else {
1518 check_size_align(oprsz, maxsz, dofs);
1519 if (oprsz < maxsz) {
1520 expand_clr(dofs + oprsz, maxsz - oprsz);
1521 }
1522 }
1523}
1524
1525void tcg_gen_gvec_dup_i32(unsigned vece, uint32_t dofs, uint32_t oprsz,
1526 uint32_t maxsz, TCGv_i32 in)
1527{
1528 check_size_align(oprsz, maxsz, dofs);
1529 tcg_debug_assert(vece <= MO_32);
1530 do_dup(vece, dofs, oprsz, maxsz, in, NULL, 0);
1531}
1532
1533void tcg_gen_gvec_dup_i64(unsigned vece, uint32_t dofs, uint32_t oprsz,
1534 uint32_t maxsz, TCGv_i64 in)
1535{
1536 check_size_align(oprsz, maxsz, dofs);
1537 tcg_debug_assert(vece <= MO_64);
1538 do_dup(vece, dofs, oprsz, maxsz, NULL, in, 0);
1539}
1540
1541void tcg_gen_gvec_dup_mem(unsigned vece, uint32_t dofs, uint32_t aofs,
1542 uint32_t oprsz, uint32_t maxsz)
1543{
532ba368 1544 check_size_align(oprsz, maxsz, dofs);
37ee55a0 1545 if (vece <= MO_64) {
532ba368 1546 TCGType type = choose_vector_type(NULL, vece, oprsz, 0);
37ee55a0
RH		 1547 if (type != 0) {
1548 TCGv_vec t_vec = tcg_temp_new_vec(type);
1549 tcg_gen_dup_mem_vec(vece, t_vec, cpu_env, aofs);
1550 do_dup_store(type, dofs, oprsz, maxsz, t_vec);
1551 tcg_temp_free_vec(t_vec);
532ba368
RH		 1552 } else if (vece <= MO_32) {
1553 TCGv_i32 in = tcg_temp_new_i32();
1554 switch (vece) {
1555 case MO_8:
1556 tcg_gen_ld8u_i32(in, cpu_env, aofs);
1557 break;
1558 case MO_16:
1559 tcg_gen_ld16u_i32(in, cpu_env, aofs);
1560 break;
1561 default:
1562 tcg_gen_ld_i32(in, cpu_env, aofs);
1563 break;
1564 }
1565 do_dup(vece, dofs, oprsz, maxsz, in, NULL, 0);
1566 tcg_temp_free_i32(in);
1567 } else {
1568 TCGv_i64 in = tcg_temp_new_i64();
1569 tcg_gen_ld_i64(in, cpu_env, aofs);
1570 do_dup(vece, dofs, oprsz, maxsz, NULL, in, 0);
1571 tcg_temp_free_i64(in);
db432672 1572 }
db432672
RH		 1573 } else {
1574 /* 128-bit duplicate. */
1575 /* ??? Dup to 256-bit vector. */
1576 int i;
1577
1578 tcg_debug_assert(vece == 4);
1579 tcg_debug_assert(oprsz >= 16);
1580 if (TCG_TARGET_HAS_v128) {
1581 TCGv_vec in = tcg_temp_new_vec(TCG_TYPE_V128);
1582
1583 tcg_gen_ld_vec(in, cpu_env, aofs);
1584 for (i = 0; i < oprsz; i += 16) {
1585 tcg_gen_st_vec(in, cpu_env, dofs + i);
1586 }
1587 tcg_temp_free_vec(in);
1588 } else {
1589 TCGv_i64 in0 = tcg_temp_new_i64();
1590 TCGv_i64 in1 = tcg_temp_new_i64();
1591
1592 tcg_gen_ld_i64(in0, cpu_env, aofs);
1593 tcg_gen_ld_i64(in1, cpu_env, aofs + 8);
1594 for (i = 0; i < oprsz; i += 16) {
1595 tcg_gen_st_i64(in0, cpu_env, dofs + i);
1596 tcg_gen_st_i64(in1, cpu_env, dofs + i + 8);
1597 }
1598 tcg_temp_free_i64(in0);
1599 tcg_temp_free_i64(in1);
1600 }
532ba368
RH		 1601 if (oprsz < maxsz) {
1602 expand_clr(dofs + oprsz, maxsz - oprsz);
1603 }
db432672
RH		 1604 }
1605}
1606
44c94677
RH		 1607void tcg_gen_gvec_dup_imm(unsigned vece, uint32_t dofs, uint32_t oprsz,
1608 uint32_t maxsz, uint64_t x)
1609{
1610 check_size_align(oprsz, maxsz, dofs);
1611 do_dup(vece, dofs, oprsz, maxsz, NULL, NULL, x);
1612}
1613
db432672
RH		 1614void tcg_gen_gvec_not(unsigned vece, uint32_t dofs, uint32_t aofs,
1615 uint32_t oprsz, uint32_t maxsz)
1616{
1617 static const GVecGen2 g = {
1618 .fni8 = tcg_gen_not_i64,
1619 .fniv = tcg_gen_not_vec,
1620 .fno = gen_helper_gvec_not,
1621 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
1622 };
1623 tcg_gen_gvec_2(dofs, aofs, oprsz, maxsz, &g);
1624}
1625
1626/* Perform a vector addition using normal addition and a mask. The mask
1627 should be the sign bit of each lane. This 6-operation form is more
1628 efficient than separate additions when there are 4 or more lanes in
1629 the 64-bit operation. */
1630static void gen_addv_mask(TCGv_i64 d, TCGv_i64 a, TCGv_i64 b, TCGv_i64 m)
1631{
1632 TCGv_i64 t1 = tcg_temp_new_i64();
1633 TCGv_i64 t2 = tcg_temp_new_i64();
1634 TCGv_i64 t3 = tcg_temp_new_i64();
1635
1636 tcg_gen_andc_i64(t1, a, m);
1637 tcg_gen_andc_i64(t2, b, m);
1638 tcg_gen_xor_i64(t3, a, b);
1639 tcg_gen_add_i64(d, t1, t2);
1640 tcg_gen_and_i64(t3, t3, m);
1641 tcg_gen_xor_i64(d, d, t3);
1642
1643 tcg_temp_free_i64(t1);
1644 tcg_temp_free_i64(t2);
1645 tcg_temp_free_i64(t3);
1646}
1647
1648void tcg_gen_vec_add8_i64(TCGv_i64 d, TCGv_i64 a, TCGv_i64 b)
1649{
1650 TCGv_i64 m = tcg_const_i64(dup_const(MO_8, 0x80));
1651 gen_addv_mask(d, a, b, m);
1652 tcg_temp_free_i64(m);
1653}
1654
1655void tcg_gen_vec_add16_i64(TCGv_i64 d, TCGv_i64 a, TCGv_i64 b)
1656{
1657 TCGv_i64 m = tcg_const_i64(dup_const(MO_16, 0x8000));
1658 gen_addv_mask(d, a, b, m);
1659 tcg_temp_free_i64(m);
1660}
1661
1662void tcg_gen_vec_add32_i64(TCGv_i64 d, TCGv_i64 a, TCGv_i64 b)
1663{
1664 TCGv_i64 t1 = tcg_temp_new_i64();
1665 TCGv_i64 t2 = tcg_temp_new_i64();
1666
1667 tcg_gen_andi_i64(t1, a, ~0xffffffffull);
1668 tcg_gen_add_i64(t2, a, b);
1669 tcg_gen_add_i64(t1, t1, b);
1670 tcg_gen_deposit_i64(d, t1, t2, 0, 32);
1671
1672 tcg_temp_free_i64(t1);
1673 tcg_temp_free_i64(t2);
1674}
1675
53229a77
RH		 1676static const TCGOpcode vecop_list_add[] = { INDEX_op_add_vec, 0 };
1677
db432672
RH		 1678void tcg_gen_gvec_add(unsigned vece, uint32_t dofs, uint32_t aofs,
1679 uint32_t bofs, uint32_t oprsz, uint32_t maxsz)
1680{
1681 static const GVecGen3 g[4] = {
1682 { .fni8 = tcg_gen_vec_add8_i64,
1683 .fniv = tcg_gen_add_vec,
1684 .fno = gen_helper_gvec_add8,
53229a77 1685 .opt_opc = vecop_list_add,
db432672
RH		 1686 .vece = MO_8 },
1687 { .fni8 = tcg_gen_vec_add16_i64,
1688 .fniv = tcg_gen_add_vec,
1689 .fno = gen_helper_gvec_add16,
53229a77 1690 .opt_opc = vecop_list_add,
db432672
RH		 1691 .vece = MO_16 },
1692 { .fni4 = tcg_gen_add_i32,
1693 .fniv = tcg_gen_add_vec,
1694 .fno = gen_helper_gvec_add32,
53229a77 1695 .opt_opc = vecop_list_add,
db432672
RH		 1696 .vece = MO_32 },
1697 { .fni8 = tcg_gen_add_i64,
1698 .fniv = tcg_gen_add_vec,
1699 .fno = gen_helper_gvec_add64,
53229a77 1700 .opt_opc = vecop_list_add,
db432672
RH		 1701 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
1702 .vece = MO_64 },
1703 };
1704
1705 tcg_debug_assert(vece <= MO_64);
1706 tcg_gen_gvec_3(dofs, aofs, bofs, oprsz, maxsz, &g[vece]);
1707}
1708
22fc3527
RH		 1709void tcg_gen_gvec_adds(unsigned vece, uint32_t dofs, uint32_t aofs,
1710 TCGv_i64 c, uint32_t oprsz, uint32_t maxsz)
1711{
1712 static const GVecGen2s g[4] = {
1713 { .fni8 = tcg_gen_vec_add8_i64,
1714 .fniv = tcg_gen_add_vec,
1715 .fno = gen_helper_gvec_adds8,
53229a77 1716 .opt_opc = vecop_list_add,
22fc3527
RH		 1717 .vece = MO_8 },
1718 { .fni8 = tcg_gen_vec_add16_i64,
1719 .fniv = tcg_gen_add_vec,
1720 .fno = gen_helper_gvec_adds16,
53229a77 1721 .opt_opc = vecop_list_add,
22fc3527
RH		 1722 .vece = MO_16 },
1723 { .fni4 = tcg_gen_add_i32,
1724 .fniv = tcg_gen_add_vec,
1725 .fno = gen_helper_gvec_adds32,
53229a77 1726 .opt_opc = vecop_list_add,
22fc3527
RH		 1727 .vece = MO_32 },
1728 { .fni8 = tcg_gen_add_i64,
1729 .fniv = tcg_gen_add_vec,
1730 .fno = gen_helper_gvec_adds64,
53229a77 1731 .opt_opc = vecop_list_add,
22fc3527
RH		 1732 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
1733 .vece = MO_64 },
1734 };
1735
1736 tcg_debug_assert(vece <= MO_64);
1737 tcg_gen_gvec_2s(dofs, aofs, oprsz, maxsz, c, &g[vece]);
1738}
1739
1740void tcg_gen_gvec_addi(unsigned vece, uint32_t dofs, uint32_t aofs,
1741 int64_t c, uint32_t oprsz, uint32_t maxsz)
1742{
1743 TCGv_i64 tmp = tcg_const_i64(c);
1744 tcg_gen_gvec_adds(vece, dofs, aofs, tmp, oprsz, maxsz);
1745 tcg_temp_free_i64(tmp);
1746}
1747
53229a77
RH		 1748static const TCGOpcode vecop_list_sub[] = { INDEX_op_sub_vec, 0 };
1749
22fc3527
RH		 1750void tcg_gen_gvec_subs(unsigned vece, uint32_t dofs, uint32_t aofs,
1751 TCGv_i64 c, uint32_t oprsz, uint32_t maxsz)
1752{
1753 static const GVecGen2s g[4] = {
1754 { .fni8 = tcg_gen_vec_sub8_i64,
1755 .fniv = tcg_gen_sub_vec,
1756 .fno = gen_helper_gvec_subs8,
53229a77 1757 .opt_opc = vecop_list_sub,
22fc3527
RH		 1758 .vece = MO_8 },
1759 { .fni8 = tcg_gen_vec_sub16_i64,
1760 .fniv = tcg_gen_sub_vec,
1761 .fno = gen_helper_gvec_subs16,
53229a77 1762 .opt_opc = vecop_list_sub,
22fc3527
RH		 1763 .vece = MO_16 },
1764 { .fni4 = tcg_gen_sub_i32,
1765 .fniv = tcg_gen_sub_vec,
1766 .fno = gen_helper_gvec_subs32,
53229a77 1767 .opt_opc = vecop_list_sub,
22fc3527
RH		 1768 .vece = MO_32 },
1769 { .fni8 = tcg_gen_sub_i64,
1770 .fniv = tcg_gen_sub_vec,
1771 .fno = gen_helper_gvec_subs64,
53229a77 1772 .opt_opc = vecop_list_sub,
22fc3527
RH		 1773 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
1774 .vece = MO_64 },
1775 };
1776
1777 tcg_debug_assert(vece <= MO_64);
1778 tcg_gen_gvec_2s(dofs, aofs, oprsz, maxsz, c, &g[vece]);
1779}
1780
db432672
RH		 1781/* Perform a vector subtraction using normal subtraction and a mask.
1782 Compare gen_addv_mask above. */
1783static void gen_subv_mask(TCGv_i64 d, TCGv_i64 a, TCGv_i64 b, TCGv_i64 m)
1784{
1785 TCGv_i64 t1 = tcg_temp_new_i64();
1786 TCGv_i64 t2 = tcg_temp_new_i64();
1787 TCGv_i64 t3 = tcg_temp_new_i64();
1788
1789 tcg_gen_or_i64(t1, a, m);
1790 tcg_gen_andc_i64(t2, b, m);
1791 tcg_gen_eqv_i64(t3, a, b);
1792 tcg_gen_sub_i64(d, t1, t2);
1793 tcg_gen_and_i64(t3, t3, m);
1794 tcg_gen_xor_i64(d, d, t3);
1795
1796 tcg_temp_free_i64(t1);
1797 tcg_temp_free_i64(t2);
1798 tcg_temp_free_i64(t3);
1799}
1800
1801void tcg_gen_vec_sub8_i64(TCGv_i64 d, TCGv_i64 a, TCGv_i64 b)
1802{
1803 TCGv_i64 m = tcg_const_i64(dup_const(MO_8, 0x80));
1804 gen_subv_mask(d, a, b, m);
1805 tcg_temp_free_i64(m);
1806}
1807
1808void tcg_gen_vec_sub16_i64(TCGv_i64 d, TCGv_i64 a, TCGv_i64 b)
1809{
1810 TCGv_i64 m = tcg_const_i64(dup_const(MO_16, 0x8000));
1811 gen_subv_mask(d, a, b, m);
1812 tcg_temp_free_i64(m);
1813}
1814
1815void tcg_gen_vec_sub32_i64(TCGv_i64 d, TCGv_i64 a, TCGv_i64 b)
1816{
1817 TCGv_i64 t1 = tcg_temp_new_i64();
1818 TCGv_i64 t2 = tcg_temp_new_i64();
1819
1820 tcg_gen_andi_i64(t1, b, ~0xffffffffull);
1821 tcg_gen_sub_i64(t2, a, b);
1822 tcg_gen_sub_i64(t1, a, t1);
1823 tcg_gen_deposit_i64(d, t1, t2, 0, 32);
1824
1825 tcg_temp_free_i64(t1);
1826 tcg_temp_free_i64(t2);
1827}
1828
1829void tcg_gen_gvec_sub(unsigned vece, uint32_t dofs, uint32_t aofs,
1830 uint32_t bofs, uint32_t oprsz, uint32_t maxsz)
1831{
1832 static const GVecGen3 g[4] = {
1833 { .fni8 = tcg_gen_vec_sub8_i64,
1834 .fniv = tcg_gen_sub_vec,
1835 .fno = gen_helper_gvec_sub8,
53229a77 1836 .opt_opc = vecop_list_sub,
db432672
RH		 1837 .vece = MO_8 },
1838 { .fni8 = tcg_gen_vec_sub16_i64,
1839 .fniv = tcg_gen_sub_vec,
1840 .fno = gen_helper_gvec_sub16,
53229a77 1841 .opt_opc = vecop_list_sub,
db432672
RH		 1842 .vece = MO_16 },
1843 { .fni4 = tcg_gen_sub_i32,
1844 .fniv = tcg_gen_sub_vec,
1845 .fno = gen_helper_gvec_sub32,
53229a77 1846 .opt_opc = vecop_list_sub,
db432672
RH		 1847 .vece = MO_32 },
1848 { .fni8 = tcg_gen_sub_i64,
1849 .fniv = tcg_gen_sub_vec,
1850 .fno = gen_helper_gvec_sub64,
53229a77 1851 .opt_opc = vecop_list_sub,
db432672
RH		 1852 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
1853 .vece = MO_64 },
1854 };
1855
1856 tcg_debug_assert(vece <= MO_64);
1857 tcg_gen_gvec_3(dofs, aofs, bofs, oprsz, maxsz, &g[vece]);
1858}
1859
53229a77
RH		 1860static const TCGOpcode vecop_list_mul[] = { INDEX_op_mul_vec, 0 };
1861
3774030a
RH		 1862void tcg_gen_gvec_mul(unsigned vece, uint32_t dofs, uint32_t aofs,
1863 uint32_t bofs, uint32_t oprsz, uint32_t maxsz)
1864{
1865 static const GVecGen3 g[4] = {
1866 { .fniv = tcg_gen_mul_vec,
1867 .fno = gen_helper_gvec_mul8,
53229a77 1868 .opt_opc = vecop_list_mul,
3774030a
RH		 1869 .vece = MO_8 },
1870 { .fniv = tcg_gen_mul_vec,
1871 .fno = gen_helper_gvec_mul16,
53229a77 1872 .opt_opc = vecop_list_mul,
3774030a
RH		 1873 .vece = MO_16 },
1874 { .fni4 = tcg_gen_mul_i32,
1875 .fniv = tcg_gen_mul_vec,
1876 .fno = gen_helper_gvec_mul32,
53229a77 1877 .opt_opc = vecop_list_mul,
3774030a
RH		 1878 .vece = MO_32 },
1879 { .fni8 = tcg_gen_mul_i64,
1880 .fniv = tcg_gen_mul_vec,
1881 .fno = gen_helper_gvec_mul64,
53229a77 1882 .opt_opc = vecop_list_mul,
3774030a
RH		 1883 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
1884 .vece = MO_64 },
1885 };
1886
1887 tcg_debug_assert(vece <= MO_64);
1888 tcg_gen_gvec_3(dofs, aofs, bofs, oprsz, maxsz, &g[vece]);
1889}
1890
22fc3527
RH		 1891void tcg_gen_gvec_muls(unsigned vece, uint32_t dofs, uint32_t aofs,
1892 TCGv_i64 c, uint32_t oprsz, uint32_t maxsz)
1893{
1894 static const GVecGen2s g[4] = {
1895 { .fniv = tcg_gen_mul_vec,
1896 .fno = gen_helper_gvec_muls8,
53229a77 1897 .opt_opc = vecop_list_mul,
22fc3527
RH		 1898 .vece = MO_8 },
1899 { .fniv = tcg_gen_mul_vec,
1900 .fno = gen_helper_gvec_muls16,
53229a77 1901 .opt_opc = vecop_list_mul,
22fc3527
RH		 1902 .vece = MO_16 },
1903 { .fni4 = tcg_gen_mul_i32,
1904 .fniv = tcg_gen_mul_vec,
1905 .fno = gen_helper_gvec_muls32,
53229a77 1906 .opt_opc = vecop_list_mul,
22fc3527
RH		 1907 .vece = MO_32 },
1908 { .fni8 = tcg_gen_mul_i64,
1909 .fniv = tcg_gen_mul_vec,
1910 .fno = gen_helper_gvec_muls64,
53229a77 1911 .opt_opc = vecop_list_mul,
22fc3527
RH		 1912 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
1913 .vece = MO_64 },
1914 };
1915
1916 tcg_debug_assert(vece <= MO_64);
1917 tcg_gen_gvec_2s(dofs, aofs, oprsz, maxsz, c, &g[vece]);
1918}
1919
1920void tcg_gen_gvec_muli(unsigned vece, uint32_t dofs, uint32_t aofs,
1921 int64_t c, uint32_t oprsz, uint32_t maxsz)
1922{
1923 TCGv_i64 tmp = tcg_const_i64(c);
1924 tcg_gen_gvec_muls(vece, dofs, aofs, tmp, oprsz, maxsz);
1925 tcg_temp_free_i64(tmp);
1926}
1927
f49b12c6
RH		 1928void tcg_gen_gvec_ssadd(unsigned vece, uint32_t dofs, uint32_t aofs,
1929 uint32_t bofs, uint32_t oprsz, uint32_t maxsz)
1930{
53229a77 1931 static const TCGOpcode vecop_list[] = { INDEX_op_ssadd_vec, 0 };
f49b12c6 1932 static const GVecGen3 g[4] = {
8afaf050
RH		 1933 { .fniv = tcg_gen_ssadd_vec,
1934 .fno = gen_helper_gvec_ssadd8,
53229a77 1935 .opt_opc = vecop_list,
8afaf050
RH		 1936 .vece = MO_8 },
1937 { .fniv = tcg_gen_ssadd_vec,
1938 .fno = gen_helper_gvec_ssadd16,
53229a77 1939 .opt_opc = vecop_list,
8afaf050
RH		 1940 .vece = MO_16 },
1941 { .fniv = tcg_gen_ssadd_vec,
1942 .fno = gen_helper_gvec_ssadd32,
53229a77 1943 .opt_opc = vecop_list,
8afaf050
RH		 1944 .vece = MO_32 },
1945 { .fniv = tcg_gen_ssadd_vec,
1946 .fno = gen_helper_gvec_ssadd64,
53229a77 1947 .opt_opc = vecop_list,
8afaf050 1948 .vece = MO_64 },
f49b12c6
RH		 1949 };
1950 tcg_debug_assert(vece <= MO_64);
1951 tcg_gen_gvec_3(dofs, aofs, bofs, oprsz, maxsz, &g[vece]);
1952}
1953
1954void tcg_gen_gvec_sssub(unsigned vece, uint32_t dofs, uint32_t aofs,
1955 uint32_t bofs, uint32_t oprsz, uint32_t maxsz)
1956{
53229a77 1957 static const TCGOpcode vecop_list[] = { INDEX_op_sssub_vec, 0 };
f49b12c6 1958 static const GVecGen3 g[4] = {
8afaf050
RH		 1959 { .fniv = tcg_gen_sssub_vec,
1960 .fno = gen_helper_gvec_sssub8,
53229a77 1961 .opt_opc = vecop_list,
8afaf050
RH		 1962 .vece = MO_8 },
1963 { .fniv = tcg_gen_sssub_vec,
1964 .fno = gen_helper_gvec_sssub16,
53229a77 1965 .opt_opc = vecop_list,
8afaf050
RH		 1966 .vece = MO_16 },
1967 { .fniv = tcg_gen_sssub_vec,
1968 .fno = gen_helper_gvec_sssub32,
53229a77 1969 .opt_opc = vecop_list,
8afaf050
RH		 1970 .vece = MO_32 },
1971 { .fniv = tcg_gen_sssub_vec,
1972 .fno = gen_helper_gvec_sssub64,
53229a77 1973 .opt_opc = vecop_list,
8afaf050 1974 .vece = MO_64 },
f49b12c6
RH		 1975 };
1976 tcg_debug_assert(vece <= MO_64);
1977 tcg_gen_gvec_3(dofs, aofs, bofs, oprsz, maxsz, &g[vece]);
1978}
1979
8afaf050 1980static void tcg_gen_usadd_i32(TCGv_i32 d, TCGv_i32 a, TCGv_i32 b)
f49b12c6
RH		 1981{
1982 TCGv_i32 max = tcg_const_i32(-1);
1983 tcg_gen_add_i32(d, a, b);
1984 tcg_gen_movcond_i32(TCG_COND_LTU, d, d, a, max, d);
1985 tcg_temp_free_i32(max);
1986}
1987
8afaf050 1988static void tcg_gen_usadd_i64(TCGv_i64 d, TCGv_i64 a, TCGv_i64 b)
f49b12c6
RH		 1989{
1990 TCGv_i64 max = tcg_const_i64(-1);
1991 tcg_gen_add_i64(d, a, b);
1992 tcg_gen_movcond_i64(TCG_COND_LTU, d, d, a, max, d);
1993 tcg_temp_free_i64(max);
1994}
1995
1996void tcg_gen_gvec_usadd(unsigned vece, uint32_t dofs, uint32_t aofs,
1997 uint32_t bofs, uint32_t oprsz, uint32_t maxsz)
1998{
53229a77 1999 static const TCGOpcode vecop_list[] = { INDEX_op_usadd_vec, 0 };
f49b12c6 2000 static const GVecGen3 g[4] = {
8afaf050
RH		 2001 { .fniv = tcg_gen_usadd_vec,
2002 .fno = gen_helper_gvec_usadd8,
53229a77 2003 .opt_opc = vecop_list,
8afaf050
RH		 2004 .vece = MO_8 },
2005 { .fniv = tcg_gen_usadd_vec,
2006 .fno = gen_helper_gvec_usadd16,
53229a77 2007 .opt_opc = vecop_list,
8afaf050
RH		 2008 .vece = MO_16 },
2009 { .fni4 = tcg_gen_usadd_i32,
2010 .fniv = tcg_gen_usadd_vec,
f49b12c6 2011 .fno = gen_helper_gvec_usadd32,
53229a77 2012 .opt_opc = vecop_list,
f49b12c6 2013 .vece = MO_32 },
8afaf050
RH		 2014 { .fni8 = tcg_gen_usadd_i64,
2015 .fniv = tcg_gen_usadd_vec,
f49b12c6 2016 .fno = gen_helper_gvec_usadd64,
53229a77 2017 .opt_opc = vecop_list,
f49b12c6
RH		 2018 .vece = MO_64 }
2019 };
2020 tcg_debug_assert(vece <= MO_64);
2021 tcg_gen_gvec_3(dofs, aofs, bofs, oprsz, maxsz, &g[vece]);
2022}
2023
8afaf050 2024static void tcg_gen_ussub_i32(TCGv_i32 d, TCGv_i32 a, TCGv_i32 b)
f49b12c6
RH		 2025{
2026 TCGv_i32 min = tcg_const_i32(0);
2027 tcg_gen_sub_i32(d, a, b);
2028 tcg_gen_movcond_i32(TCG_COND_LTU, d, a, b, min, d);
2029 tcg_temp_free_i32(min);
2030}
2031
8afaf050 2032static void tcg_gen_ussub_i64(TCGv_i64 d, TCGv_i64 a, TCGv_i64 b)
f49b12c6
RH		 2033{
2034 TCGv_i64 min = tcg_const_i64(0);
2035 tcg_gen_sub_i64(d, a, b);
2036 tcg_gen_movcond_i64(TCG_COND_LTU, d, a, b, min, d);
2037 tcg_temp_free_i64(min);
2038}
2039
2040void tcg_gen_gvec_ussub(unsigned vece, uint32_t dofs, uint32_t aofs,
2041 uint32_t bofs, uint32_t oprsz, uint32_t maxsz)
2042{
53229a77 2043 static const TCGOpcode vecop_list[] = { INDEX_op_ussub_vec, 0 };
f49b12c6 2044 static const GVecGen3 g[4] = {
8afaf050
RH		 2045 { .fniv = tcg_gen_ussub_vec,
2046 .fno = gen_helper_gvec_ussub8,
53229a77 2047 .opt_opc = vecop_list,
8afaf050
RH		 2048 .vece = MO_8 },
2049 { .fniv = tcg_gen_ussub_vec,
2050 .fno = gen_helper_gvec_ussub16,
53229a77 2051 .opt_opc = vecop_list,
8afaf050
RH		 2052 .vece = MO_16 },
2053 { .fni4 = tcg_gen_ussub_i32,
2054 .fniv = tcg_gen_ussub_vec,
f49b12c6 2055 .fno = gen_helper_gvec_ussub32,
53229a77 2056 .opt_opc = vecop_list,
f49b12c6 2057 .vece = MO_32 },
8afaf050
RH		 2058 { .fni8 = tcg_gen_ussub_i64,
2059 .fniv = tcg_gen_ussub_vec,
f49b12c6 2060 .fno = gen_helper_gvec_ussub64,
53229a77 2061 .opt_opc = vecop_list,
f49b12c6
RH		 2062 .vece = MO_64 }
2063 };
2064 tcg_debug_assert(vece <= MO_64);
2065 tcg_gen_gvec_3(dofs, aofs, bofs, oprsz, maxsz, &g[vece]);
dd0a0fcd
RH		 2066}
2067
2068void tcg_gen_gvec_smin(unsigned vece, uint32_t dofs, uint32_t aofs,
2069 uint32_t bofs, uint32_t oprsz, uint32_t maxsz)
2070{
53229a77 2071 static const TCGOpcode vecop_list[] = { INDEX_op_smin_vec, 0 };
dd0a0fcd
RH		 2072 static const GVecGen3 g[4] = {
2073 { .fniv = tcg_gen_smin_vec,
2074 .fno = gen_helper_gvec_smin8,
53229a77 2075 .opt_opc = vecop_list,
dd0a0fcd
RH		 2076 .vece = MO_8 },
2077 { .fniv = tcg_gen_smin_vec,
2078 .fno = gen_helper_gvec_smin16,
53229a77 2079 .opt_opc = vecop_list,
dd0a0fcd
RH		 2080 .vece = MO_16 },
2081 { .fni4 = tcg_gen_smin_i32,
2082 .fniv = tcg_gen_smin_vec,
2083 .fno = gen_helper_gvec_smin32,
53229a77 2084 .opt_opc = vecop_list,
dd0a0fcd
RH		 2085 .vece = MO_32 },
2086 { .fni8 = tcg_gen_smin_i64,
2087 .fniv = tcg_gen_smin_vec,
2088 .fno = gen_helper_gvec_smin64,
53229a77 2089 .opt_opc = vecop_list,
dd0a0fcd
RH		 2090 .vece = MO_64 }
2091 };
2092 tcg_debug_assert(vece <= MO_64);
2093 tcg_gen_gvec_3(dofs, aofs, bofs, oprsz, maxsz, &g[vece]);
2094}
2095
2096void tcg_gen_gvec_umin(unsigned vece, uint32_t dofs, uint32_t aofs,
2097 uint32_t bofs, uint32_t oprsz, uint32_t maxsz)
2098{
53229a77 2099 static const TCGOpcode vecop_list[] = { INDEX_op_umin_vec, 0 };
dd0a0fcd
RH		 2100 static const GVecGen3 g[4] = {
2101 { .fniv = tcg_gen_umin_vec,
2102 .fno = gen_helper_gvec_umin8,
53229a77 2103 .opt_opc = vecop_list,
dd0a0fcd
RH		 2104 .vece = MO_8 },
2105 { .fniv = tcg_gen_umin_vec,
2106 .fno = gen_helper_gvec_umin16,
53229a77 2107 .opt_opc = vecop_list,
dd0a0fcd
RH		 2108 .vece = MO_16 },
2109 { .fni4 = tcg_gen_umin_i32,
2110 .fniv = tcg_gen_umin_vec,
2111 .fno = gen_helper_gvec_umin32,
53229a77 2112 .opt_opc = vecop_list,
dd0a0fcd
RH		 2113 .vece = MO_32 },
2114 { .fni8 = tcg_gen_umin_i64,
2115 .fniv = tcg_gen_umin_vec,
2116 .fno = gen_helper_gvec_umin64,
53229a77 2117 .opt_opc = vecop_list,
dd0a0fcd
RH		 2118 .vece = MO_64 }
2119 };
2120 tcg_debug_assert(vece <= MO_64);
2121 tcg_gen_gvec_3(dofs, aofs, bofs, oprsz, maxsz, &g[vece]);
2122}
2123
2124void tcg_gen_gvec_smax(unsigned vece, uint32_t dofs, uint32_t aofs,
2125 uint32_t bofs, uint32_t oprsz, uint32_t maxsz)
2126{
53229a77 2127 static const TCGOpcode vecop_list[] = { INDEX_op_smax_vec, 0 };
dd0a0fcd
RH		 2128 static const GVecGen3 g[4] = {
2129 { .fniv = tcg_gen_smax_vec,
2130 .fno = gen_helper_gvec_smax8,
53229a77 2131 .opt_opc = vecop_list,
dd0a0fcd
RH		 2132 .vece = MO_8 },
2133 { .fniv = tcg_gen_smax_vec,
2134 .fno = gen_helper_gvec_smax16,
53229a77 2135 .opt_opc = vecop_list,
dd0a0fcd
RH		 2136 .vece = MO_16 },
2137 { .fni4 = tcg_gen_smax_i32,
2138 .fniv = tcg_gen_smax_vec,
2139 .fno = gen_helper_gvec_smax32,
53229a77 2140 .opt_opc = vecop_list,
dd0a0fcd
RH		 2141 .vece = MO_32 },
2142 { .fni8 = tcg_gen_smax_i64,
2143 .fniv = tcg_gen_smax_vec,
2144 .fno = gen_helper_gvec_smax64,
53229a77 2145 .opt_opc = vecop_list,
dd0a0fcd
RH		 2146 .vece = MO_64 }
2147 };
2148 tcg_debug_assert(vece <= MO_64);
2149 tcg_gen_gvec_3(dofs, aofs, bofs, oprsz, maxsz, &g[vece]);
2150}
2151
2152void tcg_gen_gvec_umax(unsigned vece, uint32_t dofs, uint32_t aofs,
2153 uint32_t bofs, uint32_t oprsz, uint32_t maxsz)
2154{
53229a77 2155 static const TCGOpcode vecop_list[] = { INDEX_op_umax_vec, 0 };
dd0a0fcd
RH		 2156 static const GVecGen3 g[4] = {
2157 { .fniv = tcg_gen_umax_vec,
2158 .fno = gen_helper_gvec_umax8,
53229a77 2159 .opt_opc = vecop_list,
dd0a0fcd
RH		 2160 .vece = MO_8 },
2161 { .fniv = tcg_gen_umax_vec,
2162 .fno = gen_helper_gvec_umax16,
53229a77 2163 .opt_opc = vecop_list,
dd0a0fcd
RH		 2164 .vece = MO_16 },
2165 { .fni4 = tcg_gen_umax_i32,
2166 .fniv = tcg_gen_umax_vec,
2167 .fno = gen_helper_gvec_umax32,
53229a77 2168 .opt_opc = vecop_list,
dd0a0fcd
RH		 2169 .vece = MO_32 },
2170 { .fni8 = tcg_gen_umax_i64,
2171 .fniv = tcg_gen_umax_vec,
2172 .fno = gen_helper_gvec_umax64,
53229a77 2173 .opt_opc = vecop_list,
dd0a0fcd
RH		 2174 .vece = MO_64 }
2175 };
2176 tcg_debug_assert(vece <= MO_64);
2177 tcg_gen_gvec_3(dofs, aofs, bofs, oprsz, maxsz, &g[vece]);
f49b12c6
RH		 2178}
2179
db432672
RH		 2180/* Perform a vector negation using normal negation and a mask.
2181 Compare gen_subv_mask above. */
2182static void gen_negv_mask(TCGv_i64 d, TCGv_i64 b, TCGv_i64 m)
2183{
2184 TCGv_i64 t2 = tcg_temp_new_i64();
2185 TCGv_i64 t3 = tcg_temp_new_i64();
2186
2187 tcg_gen_andc_i64(t3, m, b);
2188 tcg_gen_andc_i64(t2, b, m);
2189 tcg_gen_sub_i64(d, m, t2);
2190 tcg_gen_xor_i64(d, d, t3);
2191
2192 tcg_temp_free_i64(t2);
2193 tcg_temp_free_i64(t3);
2194}
2195
2196void tcg_gen_vec_neg8_i64(TCGv_i64 d, TCGv_i64 b)
2197{
2198 TCGv_i64 m = tcg_const_i64(dup_const(MO_8, 0x80));
2199 gen_negv_mask(d, b, m);
2200 tcg_temp_free_i64(m);
2201}
2202
2203void tcg_gen_vec_neg16_i64(TCGv_i64 d, TCGv_i64 b)
2204{
2205 TCGv_i64 m = tcg_const_i64(dup_const(MO_16, 0x8000));
2206 gen_negv_mask(d, b, m);
2207 tcg_temp_free_i64(m);
2208}
2209
2210void tcg_gen_vec_neg32_i64(TCGv_i64 d, TCGv_i64 b)
2211{
2212 TCGv_i64 t1 = tcg_temp_new_i64();
2213 TCGv_i64 t2 = tcg_temp_new_i64();
2214
2215 tcg_gen_andi_i64(t1, b, ~0xffffffffull);
2216 tcg_gen_neg_i64(t2, b);
2217 tcg_gen_neg_i64(t1, t1);
2218 tcg_gen_deposit_i64(d, t1, t2, 0, 32);
2219
2220 tcg_temp_free_i64(t1);
2221 tcg_temp_free_i64(t2);
2222}
2223
2224void tcg_gen_gvec_neg(unsigned vece, uint32_t dofs, uint32_t aofs,
2225 uint32_t oprsz, uint32_t maxsz)
2226{
53229a77 2227 static const TCGOpcode vecop_list[] = { INDEX_op_neg_vec, 0 };
db432672
RH		 2228 static const GVecGen2 g[4] = {
2229 { .fni8 = tcg_gen_vec_neg8_i64,
2230 .fniv = tcg_gen_neg_vec,
2231 .fno = gen_helper_gvec_neg8,
53229a77 2232 .opt_opc = vecop_list,
db432672
RH		 2233 .vece = MO_8 },
2234 { .fni8 = tcg_gen_vec_neg16_i64,
2235 .fniv = tcg_gen_neg_vec,
2236 .fno = gen_helper_gvec_neg16,
53229a77 2237 .opt_opc = vecop_list,
db432672
RH		 2238 .vece = MO_16 },
2239 { .fni4 = tcg_gen_neg_i32,
2240 .fniv = tcg_gen_neg_vec,
2241 .fno = gen_helper_gvec_neg32,
53229a77 2242 .opt_opc = vecop_list,
db432672
RH		 2243 .vece = MO_32 },
2244 { .fni8 = tcg_gen_neg_i64,
2245 .fniv = tcg_gen_neg_vec,
2246 .fno = gen_helper_gvec_neg64,
53229a77 2247 .opt_opc = vecop_list,
db432672
RH		 2248 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
2249 .vece = MO_64 },
2250 };
2251
2252 tcg_debug_assert(vece <= MO_64);
2253 tcg_gen_gvec_2(dofs, aofs, oprsz, maxsz, &g[vece]);
2254}
2255
bcefc902
RH		 2256static void gen_absv_mask(TCGv_i64 d, TCGv_i64 b, unsigned vece)
2257{
2258 TCGv_i64 t = tcg_temp_new_i64();
2259 int nbit = 8 << vece;
2260
2261 /* Create -1 for each negative element. */
2262 tcg_gen_shri_i64(t, b, nbit - 1);
2263 tcg_gen_andi_i64(t, t, dup_const(vece, 1));
2264 tcg_gen_muli_i64(t, t, (1 << nbit) - 1);
2265
2266 /*
2267 * Invert (via xor -1) and add one (via sub -1).
2268 * Because of the ordering the msb is cleared,
2269 * so we never have carry into the next element.
2270 */
2271 tcg_gen_xor_i64(d, b, t);
2272 tcg_gen_sub_i64(d, d, t);
2273
2274 tcg_temp_free_i64(t);
2275}
2276
2277static void tcg_gen_vec_abs8_i64(TCGv_i64 d, TCGv_i64 b)
2278{
2279 gen_absv_mask(d, b, MO_8);
2280}
2281
2282static void tcg_gen_vec_abs16_i64(TCGv_i64 d, TCGv_i64 b)
2283{
2284 gen_absv_mask(d, b, MO_16);
2285}
2286
2287void tcg_gen_gvec_abs(unsigned vece, uint32_t dofs, uint32_t aofs,
2288 uint32_t oprsz, uint32_t maxsz)
2289{
2290 static const TCGOpcode vecop_list[] = { INDEX_op_abs_vec, 0 };
2291 static const GVecGen2 g[4] = {
2292 { .fni8 = tcg_gen_vec_abs8_i64,
2293 .fniv = tcg_gen_abs_vec,
2294 .fno = gen_helper_gvec_abs8,
2295 .opt_opc = vecop_list,
2296 .vece = MO_8 },
2297 { .fni8 = tcg_gen_vec_abs16_i64,
2298 .fniv = tcg_gen_abs_vec,
2299 .fno = gen_helper_gvec_abs16,
2300 .opt_opc = vecop_list,
2301 .vece = MO_16 },
2302 { .fni4 = tcg_gen_abs_i32,
2303 .fniv = tcg_gen_abs_vec,
2304 .fno = gen_helper_gvec_abs32,
2305 .opt_opc = vecop_list,
2306 .vece = MO_32 },
2307 { .fni8 = tcg_gen_abs_i64,
2308 .fniv = tcg_gen_abs_vec,
2309 .fno = gen_helper_gvec_abs64,
2310 .opt_opc = vecop_list,
2311 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
2312 .vece = MO_64 },
2313 };
2314
2315 tcg_debug_assert(vece <= MO_64);
2316 tcg_gen_gvec_2(dofs, aofs, oprsz, maxsz, &g[vece]);
2317}
2318
db432672
RH		 2319void tcg_gen_gvec_and(unsigned vece, uint32_t dofs, uint32_t aofs,
2320 uint32_t bofs, uint32_t oprsz, uint32_t maxsz)
2321{
2322 static const GVecGen3 g = {
2323 .fni8 = tcg_gen_and_i64,
2324 .fniv = tcg_gen_and_vec,
2325 .fno = gen_helper_gvec_and,
db432672
RH		 2326 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
2327 };
9a9eda78
RH		 2328
2329 if (aofs == bofs) {
2330 tcg_gen_gvec_mov(vece, dofs, aofs, oprsz, maxsz);
2331 } else {
2332 tcg_gen_gvec_3(dofs, aofs, bofs, oprsz, maxsz, &g);
2333 }
db432672
RH		 2334}
2335
2336void tcg_gen_gvec_or(unsigned vece, uint32_t dofs, uint32_t aofs,
2337 uint32_t bofs, uint32_t oprsz, uint32_t maxsz)
2338{
2339 static const GVecGen3 g = {
2340 .fni8 = tcg_gen_or_i64,
2341 .fniv = tcg_gen_or_vec,
2342 .fno = gen_helper_gvec_or,
db432672
RH		 2343 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
2344 };
9a9eda78
RH		 2345
2346 if (aofs == bofs) {
2347 tcg_gen_gvec_mov(vece, dofs, aofs, oprsz, maxsz);
2348 } else {
2349 tcg_gen_gvec_3(dofs, aofs, bofs, oprsz, maxsz, &g);
2350 }
db432672
RH		 2351}
2352
2353void tcg_gen_gvec_xor(unsigned vece, uint32_t dofs, uint32_t aofs,
2354 uint32_t bofs, uint32_t oprsz, uint32_t maxsz)
2355{
2356 static const GVecGen3 g = {
2357 .fni8 = tcg_gen_xor_i64,
2358 .fniv = tcg_gen_xor_vec,
2359 .fno = gen_helper_gvec_xor,
db432672
RH		 2360 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
2361 };
9a9eda78
RH		 2362
2363 if (aofs == bofs) {
03ddb6f3 2364 tcg_gen_gvec_dup_imm(MO_64, dofs, oprsz, maxsz, 0);
9a9eda78
RH		 2365 } else {
2366 tcg_gen_gvec_3(dofs, aofs, bofs, oprsz, maxsz, &g);
2367 }
db432672
RH		 2368}
2369
2370void tcg_gen_gvec_andc(unsigned vece, uint32_t dofs, uint32_t aofs,
2371 uint32_t bofs, uint32_t oprsz, uint32_t maxsz)
2372{
2373 static const GVecGen3 g = {
2374 .fni8 = tcg_gen_andc_i64,
2375 .fniv = tcg_gen_andc_vec,
2376 .fno = gen_helper_gvec_andc,
db432672
RH		 2377 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
2378 };
9a9eda78
RH		 2379
2380 if (aofs == bofs) {
03ddb6f3 2381 tcg_gen_gvec_dup_imm(MO_64, dofs, oprsz, maxsz, 0);
9a9eda78
RH		 2382 } else {
2383 tcg_gen_gvec_3(dofs, aofs, bofs, oprsz, maxsz, &g);
2384 }
db432672
RH		 2385}
2386
2387void tcg_gen_gvec_orc(unsigned vece, uint32_t dofs, uint32_t aofs,
2388 uint32_t bofs, uint32_t oprsz, uint32_t maxsz)
2389{
2390 static const GVecGen3 g = {
2391 .fni8 = tcg_gen_orc_i64,
2392 .fniv = tcg_gen_orc_vec,
2393 .fno = gen_helper_gvec_orc,
db432672
RH		 2394 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
2395 };
9a9eda78
RH		 2396
2397 if (aofs == bofs) {
03ddb6f3 2398 tcg_gen_gvec_dup_imm(MO_64, dofs, oprsz, maxsz, -1);
9a9eda78 2399 } else {
f550805d
RH		 2400 tcg_gen_gvec_3(dofs, aofs, bofs, oprsz, maxsz, &g);
2401 }
2402}
2403
2404void tcg_gen_gvec_nand(unsigned vece, uint32_t dofs, uint32_t aofs,
2405 uint32_t bofs, uint32_t oprsz, uint32_t maxsz)
2406{
2407 static const GVecGen3 g = {
2408 .fni8 = tcg_gen_nand_i64,
2409 .fniv = tcg_gen_nand_vec,
2410 .fno = gen_helper_gvec_nand,
2411 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
2412 };
2413
2414 if (aofs == bofs) {
2415 tcg_gen_gvec_not(vece, dofs, aofs, oprsz, maxsz);
2416 } else {
2417 tcg_gen_gvec_3(dofs, aofs, bofs, oprsz, maxsz, &g);
2418 }
2419}
2420
2421void tcg_gen_gvec_nor(unsigned vece, uint32_t dofs, uint32_t aofs,
2422 uint32_t bofs, uint32_t oprsz, uint32_t maxsz)
2423{
2424 static const GVecGen3 g = {
2425 .fni8 = tcg_gen_nor_i64,
2426 .fniv = tcg_gen_nor_vec,
2427 .fno = gen_helper_gvec_nor,
2428 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
2429 };
2430
2431 if (aofs == bofs) {
2432 tcg_gen_gvec_not(vece, dofs, aofs, oprsz, maxsz);
2433 } else {
2434 tcg_gen_gvec_3(dofs, aofs, bofs, oprsz, maxsz, &g);
2435 }
2436}
2437
2438void tcg_gen_gvec_eqv(unsigned vece, uint32_t dofs, uint32_t aofs,
2439 uint32_t bofs, uint32_t oprsz, uint32_t maxsz)
2440{
2441 static const GVecGen3 g = {
2442 .fni8 = tcg_gen_eqv_i64,
2443 .fniv = tcg_gen_eqv_vec,
2444 .fno = gen_helper_gvec_eqv,
2445 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
2446 };
2447
2448 if (aofs == bofs) {
03ddb6f3 2449 tcg_gen_gvec_dup_imm(MO_64, dofs, oprsz, maxsz, -1);
f550805d 2450 } else {
9a9eda78
RH		 2451 tcg_gen_gvec_3(dofs, aofs, bofs, oprsz, maxsz, &g);
2452 }
db432672 2453}
d0ec9796 2454
22fc3527
RH		 2455static const GVecGen2s gop_ands = {
2456 .fni8 = tcg_gen_and_i64,
2457 .fniv = tcg_gen_and_vec,
2458 .fno = gen_helper_gvec_ands,
22fc3527
RH		 2459 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
2460 .vece = MO_64
2461};
2462
2463void tcg_gen_gvec_ands(unsigned vece, uint32_t dofs, uint32_t aofs,
2464 TCGv_i64 c, uint32_t oprsz, uint32_t maxsz)
2465{
2466 TCGv_i64 tmp = tcg_temp_new_i64();
2467 gen_dup_i64(vece, tmp, c);
2468 tcg_gen_gvec_2s(dofs, aofs, oprsz, maxsz, tmp, &gop_ands);
2469 tcg_temp_free_i64(tmp);
2470}
2471
2472void tcg_gen_gvec_andi(unsigned vece, uint32_t dofs, uint32_t aofs,
2473 int64_t c, uint32_t oprsz, uint32_t maxsz)
2474{
2475 TCGv_i64 tmp = tcg_const_i64(dup_const(vece, c));
2476 tcg_gen_gvec_2s(dofs, aofs, oprsz, maxsz, tmp, &gop_ands);
2477 tcg_temp_free_i64(tmp);
2478}
2479
2480static const GVecGen2s gop_xors = {
2481 .fni8 = tcg_gen_xor_i64,
2482 .fniv = tcg_gen_xor_vec,
2483 .fno = gen_helper_gvec_xors,
22fc3527
RH		 2484 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
2485 .vece = MO_64
2486};
2487
2488void tcg_gen_gvec_xors(unsigned vece, uint32_t dofs, uint32_t aofs,
2489 TCGv_i64 c, uint32_t oprsz, uint32_t maxsz)
2490{
2491 TCGv_i64 tmp = tcg_temp_new_i64();
2492 gen_dup_i64(vece, tmp, c);
2493 tcg_gen_gvec_2s(dofs, aofs, oprsz, maxsz, tmp, &gop_xors);
2494 tcg_temp_free_i64(tmp);
2495}
2496
2497void tcg_gen_gvec_xori(unsigned vece, uint32_t dofs, uint32_t aofs,
2498 int64_t c, uint32_t oprsz, uint32_t maxsz)
2499{
2500 TCGv_i64 tmp = tcg_const_i64(dup_const(vece, c));
2501 tcg_gen_gvec_2s(dofs, aofs, oprsz, maxsz, tmp, &gop_xors);
2502 tcg_temp_free_i64(tmp);
2503}
2504
2505static const GVecGen2s gop_ors = {
2506 .fni8 = tcg_gen_or_i64,
2507 .fniv = tcg_gen_or_vec,
2508 .fno = gen_helper_gvec_ors,
22fc3527
RH		 2509 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
2510 .vece = MO_64
2511};
2512
2513void tcg_gen_gvec_ors(unsigned vece, uint32_t dofs, uint32_t aofs,
2514 TCGv_i64 c, uint32_t oprsz, uint32_t maxsz)
2515{
2516 TCGv_i64 tmp = tcg_temp_new_i64();
2517 gen_dup_i64(vece, tmp, c);
2518 tcg_gen_gvec_2s(dofs, aofs, oprsz, maxsz, tmp, &gop_ors);
2519 tcg_temp_free_i64(tmp);
2520}
2521
2522void tcg_gen_gvec_ori(unsigned vece, uint32_t dofs, uint32_t aofs,
2523 int64_t c, uint32_t oprsz, uint32_t maxsz)
2524{
2525 TCGv_i64 tmp = tcg_const_i64(dup_const(vece, c));
2526 tcg_gen_gvec_2s(dofs, aofs, oprsz, maxsz, tmp, &gop_ors);
2527 tcg_temp_free_i64(tmp);
2528}
2529
d0ec9796
RH		 2530void tcg_gen_vec_shl8i_i64(TCGv_i64 d, TCGv_i64 a, int64_t c)
2531{
2532 uint64_t mask = dup_const(MO_8, 0xff << c);
2533 tcg_gen_shli_i64(d, a, c);
2534 tcg_gen_andi_i64(d, d, mask);
2535}
2536
2537void tcg_gen_vec_shl16i_i64(TCGv_i64 d, TCGv_i64 a, int64_t c)
2538{
2539 uint64_t mask = dup_const(MO_16, 0xffff << c);
2540 tcg_gen_shli_i64(d, a, c);
2541 tcg_gen_andi_i64(d, d, mask);
2542}
2543
2544void tcg_gen_gvec_shli(unsigned vece, uint32_t dofs, uint32_t aofs,
2545 int64_t shift, uint32_t oprsz, uint32_t maxsz)
2546{
53229a77 2547 static const TCGOpcode vecop_list[] = { INDEX_op_shli_vec, 0 };
d0ec9796
RH		 2548 static const GVecGen2i g[4] = {
2549 { .fni8 = tcg_gen_vec_shl8i_i64,
2550 .fniv = tcg_gen_shli_vec,
2551 .fno = gen_helper_gvec_shl8i,
53229a77 2552 .opt_opc = vecop_list,
d0ec9796
RH		 2553 .vece = MO_8 },
2554 { .fni8 = tcg_gen_vec_shl16i_i64,
2555 .fniv = tcg_gen_shli_vec,
2556 .fno = gen_helper_gvec_shl16i,
53229a77 2557 .opt_opc = vecop_list,
d0ec9796
RH		 2558 .vece = MO_16 },
2559 { .fni4 = tcg_gen_shli_i32,
2560 .fniv = tcg_gen_shli_vec,
2561 .fno = gen_helper_gvec_shl32i,
53229a77 2562 .opt_opc = vecop_list,
d0ec9796
RH		 2563 .vece = MO_32 },
2564 { .fni8 = tcg_gen_shli_i64,
2565 .fniv = tcg_gen_shli_vec,
2566 .fno = gen_helper_gvec_shl64i,
53229a77 2567 .opt_opc = vecop_list,
d0ec9796
RH		 2568 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
2569 .vece = MO_64 },
2570 };
2571
2572 tcg_debug_assert(vece <= MO_64);
2573 tcg_debug_assert(shift >= 0 && shift < (8 << vece));
2574 if (shift == 0) {
2575 tcg_gen_gvec_mov(vece, dofs, aofs, oprsz, maxsz);
2576 } else {
2577 tcg_gen_gvec_2i(dofs, aofs, oprsz, maxsz, shift, &g[vece]);
2578 }
2579}
2580
2581void tcg_gen_vec_shr8i_i64(TCGv_i64 d, TCGv_i64 a, int64_t c)
2582{
2583 uint64_t mask = dup_const(MO_8, 0xff >> c);
2584 tcg_gen_shri_i64(d, a, c);
2585 tcg_gen_andi_i64(d, d, mask);
2586}
2587
2588void tcg_gen_vec_shr16i_i64(TCGv_i64 d, TCGv_i64 a, int64_t c)
2589{
2590 uint64_t mask = dup_const(MO_16, 0xffff >> c);
2591 tcg_gen_shri_i64(d, a, c);
2592 tcg_gen_andi_i64(d, d, mask);
2593}
2594
2595void tcg_gen_gvec_shri(unsigned vece, uint32_t dofs, uint32_t aofs,
2596 int64_t shift, uint32_t oprsz, uint32_t maxsz)
2597{
53229a77 2598 static const TCGOpcode vecop_list[] = { INDEX_op_shri_vec, 0 };
d0ec9796
RH		 2599 static const GVecGen2i g[4] = {
2600 { .fni8 = tcg_gen_vec_shr8i_i64,
2601 .fniv = tcg_gen_shri_vec,
2602 .fno = gen_helper_gvec_shr8i,
53229a77 2603 .opt_opc = vecop_list,
d0ec9796
RH		 2604 .vece = MO_8 },
2605 { .fni8 = tcg_gen_vec_shr16i_i64,
2606 .fniv = tcg_gen_shri_vec,
2607 .fno = gen_helper_gvec_shr16i,
53229a77 2608 .opt_opc = vecop_list,
d0ec9796
RH		 2609 .vece = MO_16 },
2610 { .fni4 = tcg_gen_shri_i32,
2611 .fniv = tcg_gen_shri_vec,
2612 .fno = gen_helper_gvec_shr32i,
53229a77 2613 .opt_opc = vecop_list,
d0ec9796
RH		 2614 .vece = MO_32 },
2615 { .fni8 = tcg_gen_shri_i64,
2616 .fniv = tcg_gen_shri_vec,
2617 .fno = gen_helper_gvec_shr64i,
53229a77 2618 .opt_opc = vecop_list,
d0ec9796
RH		 2619 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
2620 .vece = MO_64 },
2621 };
2622
2623 tcg_debug_assert(vece <= MO_64);
2624 tcg_debug_assert(shift >= 0 && shift < (8 << vece));
2625 if (shift == 0) {
2626 tcg_gen_gvec_mov(vece, dofs, aofs, oprsz, maxsz);
2627 } else {
2628 tcg_gen_gvec_2i(dofs, aofs, oprsz, maxsz, shift, &g[vece]);
2629 }
2630}
2631
2632void tcg_gen_vec_sar8i_i64(TCGv_i64 d, TCGv_i64 a, int64_t c)
2633{
2634 uint64_t s_mask = dup_const(MO_8, 0x80 >> c);
2635 uint64_t c_mask = dup_const(MO_8, 0xff >> c);
2636 TCGv_i64 s = tcg_temp_new_i64();
2637
2638 tcg_gen_shri_i64(d, a, c);
2639 tcg_gen_andi_i64(s, d, s_mask); /* isolate (shifted) sign bit */
2640 tcg_gen_muli_i64(s, s, (2 << c) - 2); /* replicate isolated signs */
2641 tcg_gen_andi_i64(d, d, c_mask); /* clear out bits above sign */
2642 tcg_gen_or_i64(d, d, s); /* include sign extension */
2643 tcg_temp_free_i64(s);
2644}
2645
2646void tcg_gen_vec_sar16i_i64(TCGv_i64 d, TCGv_i64 a, int64_t c)
2647{
2648 uint64_t s_mask = dup_const(MO_16, 0x8000 >> c);
2649 uint64_t c_mask = dup_const(MO_16, 0xffff >> c);
2650 TCGv_i64 s = tcg_temp_new_i64();
2651
2652 tcg_gen_shri_i64(d, a, c);
2653 tcg_gen_andi_i64(s, d, s_mask); /* isolate (shifted) sign bit */
2654 tcg_gen_andi_i64(d, d, c_mask); /* clear out bits above sign */
2655 tcg_gen_muli_i64(s, s, (2 << c) - 2); /* replicate isolated signs */
2656 tcg_gen_or_i64(d, d, s); /* include sign extension */
2657 tcg_temp_free_i64(s);
2658}
2659
2660void tcg_gen_gvec_sari(unsigned vece, uint32_t dofs, uint32_t aofs,
2661 int64_t shift, uint32_t oprsz, uint32_t maxsz)
2662{
53229a77 2663 static const TCGOpcode vecop_list[] = { INDEX_op_sari_vec, 0 };
d0ec9796
RH		 2664 static const GVecGen2i g[4] = {
2665 { .fni8 = tcg_gen_vec_sar8i_i64,
2666 .fniv = tcg_gen_sari_vec,
2667 .fno = gen_helper_gvec_sar8i,
53229a77 2668 .opt_opc = vecop_list,
d0ec9796
RH		 2669 .vece = MO_8 },
2670 { .fni8 = tcg_gen_vec_sar16i_i64,
2671 .fniv = tcg_gen_sari_vec,
2672 .fno = gen_helper_gvec_sar16i,
53229a77 2673 .opt_opc = vecop_list,
d0ec9796
RH		 2674 .vece = MO_16 },
2675 { .fni4 = tcg_gen_sari_i32,
2676 .fniv = tcg_gen_sari_vec,
2677 .fno = gen_helper_gvec_sar32i,
53229a77 2678 .opt_opc = vecop_list,
d0ec9796
RH		 2679 .vece = MO_32 },
2680 { .fni8 = tcg_gen_sari_i64,
2681 .fniv = tcg_gen_sari_vec,
2682 .fno = gen_helper_gvec_sar64i,
53229a77 2683 .opt_opc = vecop_list,
d0ec9796
RH		 2684 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
2685 .vece = MO_64 },
2686 };
2687
2688 tcg_debug_assert(vece <= MO_64);
2689 tcg_debug_assert(shift >= 0 && shift < (8 << vece));
2690 if (shift == 0) {
2691 tcg_gen_gvec_mov(vece, dofs, aofs, oprsz, maxsz);
2692 } else {
2693 tcg_gen_gvec_2i(dofs, aofs, oprsz, maxsz, shift, &g[vece]);
2694 }
2695}
212be173 2696
b0f7e744
RH		 2697void tcg_gen_vec_rotl8i_i64(TCGv_i64 d, TCGv_i64 a, int64_t c)
2698{
2699 uint64_t mask = dup_const(MO_8, 0xff << c);
2700
2701 tcg_gen_shli_i64(d, a, c);
2702 tcg_gen_shri_i64(a, a, 8 - c);
2703 tcg_gen_andi_i64(d, d, mask);
2704 tcg_gen_andi_i64(a, a, ~mask);
2705 tcg_gen_or_i64(d, d, a);
2706}
2707
2708void tcg_gen_vec_rotl16i_i64(TCGv_i64 d, TCGv_i64 a, int64_t c)
2709{
2710 uint64_t mask = dup_const(MO_16, 0xffff << c);
2711
2712 tcg_gen_shli_i64(d, a, c);
2713 tcg_gen_shri_i64(a, a, 16 - c);
2714 tcg_gen_andi_i64(d, d, mask);
2715 tcg_gen_andi_i64(a, a, ~mask);
2716 tcg_gen_or_i64(d, d, a);
2717}
2718
2719void tcg_gen_gvec_rotli(unsigned vece, uint32_t dofs, uint32_t aofs,
2720 int64_t shift, uint32_t oprsz, uint32_t maxsz)
2721{
2722 static const TCGOpcode vecop_list[] = { INDEX_op_rotli_vec, 0 };
2723 static const GVecGen2i g[4] = {
2724 { .fni8 = tcg_gen_vec_rotl8i_i64,
2725 .fniv = tcg_gen_rotli_vec,
2726 .fno = gen_helper_gvec_rotl8i,
2727 .opt_opc = vecop_list,
2728 .vece = MO_8 },
2729 { .fni8 = tcg_gen_vec_rotl16i_i64,
2730 .fniv = tcg_gen_rotli_vec,
2731 .fno = gen_helper_gvec_rotl16i,
2732 .opt_opc = vecop_list,
2733 .vece = MO_16 },
2734 { .fni4 = tcg_gen_rotli_i32,
2735 .fniv = tcg_gen_rotli_vec,
2736 .fno = gen_helper_gvec_rotl32i,
2737 .opt_opc = vecop_list,
2738 .vece = MO_32 },
2739 { .fni8 = tcg_gen_rotli_i64,
2740 .fniv = tcg_gen_rotli_vec,
2741 .fno = gen_helper_gvec_rotl64i,
2742 .opt_opc = vecop_list,
2743 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
2744 .vece = MO_64 },
2745 };
2746
2747 tcg_debug_assert(vece <= MO_64);
2748 tcg_debug_assert(shift >= 0 && shift < (8 << vece));
2749 if (shift == 0) {
2750 tcg_gen_gvec_mov(vece, dofs, aofs, oprsz, maxsz);
2751 } else {
2752 tcg_gen_gvec_2i(dofs, aofs, oprsz, maxsz, shift, &g[vece]);
2753 }
2754}
2755
2756void tcg_gen_gvec_rotri(unsigned vece, uint32_t dofs, uint32_t aofs,
2757 int64_t shift, uint32_t oprsz, uint32_t maxsz)
2758{
2759 tcg_debug_assert(vece <= MO_64);
2760 tcg_debug_assert(shift >= 0 && shift < (8 << vece));
2761 tcg_gen_gvec_rotli(vece, dofs, aofs, -shift & ((8 << vece) - 1),
2762 oprsz, maxsz);
2763}
2764
b4578cd9
RH		 2765/*
2766 * Specialized generation vector shifts by a non-constant scalar.
2767 */
2768
2769typedef struct {
2770 void (*fni4)(TCGv_i32, TCGv_i32, TCGv_i32);
2771 void (*fni8)(TCGv_i64, TCGv_i64, TCGv_i64);
2772 void (*fniv_s)(unsigned, TCGv_vec, TCGv_vec, TCGv_i32);
2773 void (*fniv_v)(unsigned, TCGv_vec, TCGv_vec, TCGv_vec);
2774 gen_helper_gvec_2 *fno[4];
2775 TCGOpcode s_list[2];
2776 TCGOpcode v_list[2];
2777} GVecGen2sh;
2778
2779static void expand_2sh_vec(unsigned vece, uint32_t dofs, uint32_t aofs,
2780 uint32_t oprsz, uint32_t tysz, TCGType type,
2781 TCGv_i32 shift,
2782 void (*fni)(unsigned, TCGv_vec, TCGv_vec, TCGv_i32))
2783{
2784 TCGv_vec t0 = tcg_temp_new_vec(type);
2785 uint32_t i;
2786
2787 for (i = 0; i < oprsz; i += tysz) {
2788 tcg_gen_ld_vec(t0, cpu_env, aofs + i);
2789 fni(vece, t0, t0, shift);
2790 tcg_gen_st_vec(t0, cpu_env, dofs + i);
2791 }
2792 tcg_temp_free_vec(t0);
2793}
2794
2795static void
2796do_gvec_shifts(unsigned vece, uint32_t dofs, uint32_t aofs, TCGv_i32 shift,
2797 uint32_t oprsz, uint32_t maxsz, const GVecGen2sh *g)
2798{
2799 TCGType type;
2800 uint32_t some;
2801
2802 check_size_align(oprsz, maxsz, dofs | aofs);
2803 check_overlap_2(dofs, aofs, maxsz);
2804
2805 /* If the backend has a scalar expansion, great. */
2806 type = choose_vector_type(g->s_list, vece, oprsz, vece == MO_64);
2807 if (type) {
2808 const TCGOpcode *hold_list = tcg_swap_vecop_list(NULL);
2809 switch (type) {
2810 case TCG_TYPE_V256:
2811 some = QEMU_ALIGN_DOWN(oprsz, 32);
2812 expand_2sh_vec(vece, dofs, aofs, some, 32,
2813 TCG_TYPE_V256, shift, g->fniv_s);
2814 if (some == oprsz) {
2815 break;
2816 }
2817 dofs += some;
2818 aofs += some;
2819 oprsz -= some;
2820 maxsz -= some;
2821 /* fallthru */
2822 case TCG_TYPE_V128:
2823 expand_2sh_vec(vece, dofs, aofs, oprsz, 16,
2824 TCG_TYPE_V128, shift, g->fniv_s);
2825 break;
2826 case TCG_TYPE_V64:
2827 expand_2sh_vec(vece, dofs, aofs, oprsz, 8,
2828 TCG_TYPE_V64, shift, g->fniv_s);
2829 break;
2830 default:
2831 g_assert_not_reached();
2832 }
2833 tcg_swap_vecop_list(hold_list);
2834 goto clear_tail;
2835 }
2836
2837 /* If the backend supports variable vector shifts, also cool. */
2838 type = choose_vector_type(g->v_list, vece, oprsz, vece == MO_64);
2839 if (type) {
2840 const TCGOpcode *hold_list = tcg_swap_vecop_list(NULL);
2841 TCGv_vec v_shift = tcg_temp_new_vec(type);
2842
2843 if (vece == MO_64) {
2844 TCGv_i64 sh64 = tcg_temp_new_i64();
2845 tcg_gen_extu_i32_i64(sh64, shift);
2846 tcg_gen_dup_i64_vec(MO_64, v_shift, sh64);
2847 tcg_temp_free_i64(sh64);
2848 } else {
2849 tcg_gen_dup_i32_vec(vece, v_shift, shift);
2850 }
2851
2852 switch (type) {
2853 case TCG_TYPE_V256:
2854 some = QEMU_ALIGN_DOWN(oprsz, 32);
2855 expand_2s_vec(vece, dofs, aofs, some, 32, TCG_TYPE_V256,
2856 v_shift, false, g->fniv_v);
2857 if (some == oprsz) {
2858 break;
2859 }
2860 dofs += some;
2861 aofs += some;
2862 oprsz -= some;
2863 maxsz -= some;
2864 /* fallthru */
2865 case TCG_TYPE_V128:
2866 expand_2s_vec(vece, dofs, aofs, oprsz, 16, TCG_TYPE_V128,
2867 v_shift, false, g->fniv_v);
2868 break;
2869 case TCG_TYPE_V64:
2870 expand_2s_vec(vece, dofs, aofs, oprsz, 8, TCG_TYPE_V64,
2871 v_shift, false, g->fniv_v);
2872 break;
2873 default:
2874 g_assert_not_reached();
2875 }
2876 tcg_temp_free_vec(v_shift);
2877 tcg_swap_vecop_list(hold_list);
2878 goto clear_tail;
2879 }
2880
2881 /* Otherwise fall back to integral... */
2882 if (vece == MO_32 && check_size_impl(oprsz, 4)) {
2883 expand_2s_i32(dofs, aofs, oprsz, shift, false, g->fni4);
2884 } else if (vece == MO_64 && check_size_impl(oprsz, 8)) {
2885 TCGv_i64 sh64 = tcg_temp_new_i64();
2886 tcg_gen_extu_i32_i64(sh64, shift);
2887 expand_2s_i64(dofs, aofs, oprsz, sh64, false, g->fni8);
2888 tcg_temp_free_i64(sh64);
2889 } else {
2890 TCGv_ptr a0 = tcg_temp_new_ptr();
2891 TCGv_ptr a1 = tcg_temp_new_ptr();
2892 TCGv_i32 desc = tcg_temp_new_i32();
2893
2894 tcg_gen_shli_i32(desc, shift, SIMD_DATA_SHIFT);
2895 tcg_gen_ori_i32(desc, desc, simd_desc(oprsz, maxsz, 0));
2896 tcg_gen_addi_ptr(a0, cpu_env, dofs);
2897 tcg_gen_addi_ptr(a1, cpu_env, aofs);
2898
2899 g->fno[vece](a0, a1, desc);
2900
2901 tcg_temp_free_ptr(a0);
2902 tcg_temp_free_ptr(a1);
2903 tcg_temp_free_i32(desc);
2904 return;
2905 }
2906
2907 clear_tail:
2908 if (oprsz < maxsz) {
2909 expand_clr(dofs + oprsz, maxsz - oprsz);
2910 }
2911}
2912
2913void tcg_gen_gvec_shls(unsigned vece, uint32_t dofs, uint32_t aofs,
2914 TCGv_i32 shift, uint32_t oprsz, uint32_t maxsz)
2915{
2916 static const GVecGen2sh g = {
2917 .fni4 = tcg_gen_shl_i32,
2918 .fni8 = tcg_gen_shl_i64,
2919 .fniv_s = tcg_gen_shls_vec,
2920 .fniv_v = tcg_gen_shlv_vec,
2921 .fno = {
2922 gen_helper_gvec_shl8i,
2923 gen_helper_gvec_shl16i,
2924 gen_helper_gvec_shl32i,
2925 gen_helper_gvec_shl64i,
2926 },
2927 .s_list = { INDEX_op_shls_vec, 0 },
2928 .v_list = { INDEX_op_shlv_vec, 0 },
2929 };
2930
2931 tcg_debug_assert(vece <= MO_64);
2932 do_gvec_shifts(vece, dofs, aofs, shift, oprsz, maxsz, &g);
2933}
2934
2935void tcg_gen_gvec_shrs(unsigned vece, uint32_t dofs, uint32_t aofs,
2936 TCGv_i32 shift, uint32_t oprsz, uint32_t maxsz)
2937{
2938 static const GVecGen2sh g = {
2939 .fni4 = tcg_gen_shr_i32,
2940 .fni8 = tcg_gen_shr_i64,
2941 .fniv_s = tcg_gen_shrs_vec,
2942 .fniv_v = tcg_gen_shrv_vec,
2943 .fno = {
2944 gen_helper_gvec_shr8i,
2945 gen_helper_gvec_shr16i,
2946 gen_helper_gvec_shr32i,
2947 gen_helper_gvec_shr64i,
2948 },
2949 .s_list = { INDEX_op_shrs_vec, 0 },
2950 .v_list = { INDEX_op_shrv_vec, 0 },
2951 };
2952
2953 tcg_debug_assert(vece <= MO_64);
2954 do_gvec_shifts(vece, dofs, aofs, shift, oprsz, maxsz, &g);
2955}
2956
2957void tcg_gen_gvec_sars(unsigned vece, uint32_t dofs, uint32_t aofs,
2958 TCGv_i32 shift, uint32_t oprsz, uint32_t maxsz)
2959{
2960 static const GVecGen2sh g = {
2961 .fni4 = tcg_gen_sar_i32,
2962 .fni8 = tcg_gen_sar_i64,
2963 .fniv_s = tcg_gen_sars_vec,
2964 .fniv_v = tcg_gen_sarv_vec,
2965 .fno = {
2966 gen_helper_gvec_sar8i,
2967 gen_helper_gvec_sar16i,
2968 gen_helper_gvec_sar32i,
2969 gen_helper_gvec_sar64i,
2970 },
2971 .s_list = { INDEX_op_sars_vec, 0 },
2972 .v_list = { INDEX_op_sarv_vec, 0 },
2973 };
2974
2975 tcg_debug_assert(vece <= MO_64);
2976 do_gvec_shifts(vece, dofs, aofs, shift, oprsz, maxsz, &g);
2977}
2978
5ee5c14c
RH		 2979/*
2980 * Expand D = A << (B % element bits)
2981 *
2982 * Unlike scalar shifts, where it is easy for the target front end
2983 * to include the modulo as part of the expansion. If the target
2984 * naturally includes the modulo as part of the operation, great!
2985 * If the target has some other behaviour from out-of-range shifts,
2986 * then it could not use this function anyway, and would need to
2987 * do it's own expansion with custom functions.
2988 */
2989static void tcg_gen_shlv_mod_vec(unsigned vece, TCGv_vec d,
2990 TCGv_vec a, TCGv_vec b)
2991{
2992 TCGv_vec t = tcg_temp_new_vec_matching(d);
2993
2994 tcg_gen_dupi_vec(vece, t, (8 << vece) - 1);
2995 tcg_gen_and_vec(vece, t, t, b);
2996 tcg_gen_shlv_vec(vece, d, a, t);
2997 tcg_temp_free_vec(t);
2998}
2999
3000static void tcg_gen_shl_mod_i32(TCGv_i32 d, TCGv_i32 a, TCGv_i32 b)
3001{
3002 TCGv_i32 t = tcg_temp_new_i32();
3003
3004 tcg_gen_andi_i32(t, b, 31);
3005 tcg_gen_shl_i32(d, a, t);
3006 tcg_temp_free_i32(t);
3007}
3008
3009static void tcg_gen_shl_mod_i64(TCGv_i64 d, TCGv_i64 a, TCGv_i64 b)
3010{
3011 TCGv_i64 t = tcg_temp_new_i64();
3012
3013 tcg_gen_andi_i64(t, b, 63);
3014 tcg_gen_shl_i64(d, a, t);
3015 tcg_temp_free_i64(t);
3016}
3017
3018void tcg_gen_gvec_shlv(unsigned vece, uint32_t dofs, uint32_t aofs,
3019 uint32_t bofs, uint32_t oprsz, uint32_t maxsz)
3020{
3021 static const TCGOpcode vecop_list[] = { INDEX_op_shlv_vec, 0 };
3022 static const GVecGen3 g[4] = {
3023 { .fniv = tcg_gen_shlv_mod_vec,
3024 .fno = gen_helper_gvec_shl8v,
3025 .opt_opc = vecop_list,
3026 .vece = MO_8 },
3027 { .fniv = tcg_gen_shlv_mod_vec,
3028 .fno = gen_helper_gvec_shl16v,
3029 .opt_opc = vecop_list,
3030 .vece = MO_16 },
3031 { .fni4 = tcg_gen_shl_mod_i32,
3032 .fniv = tcg_gen_shlv_mod_vec,
3033 .fno = gen_helper_gvec_shl32v,
3034 .opt_opc = vecop_list,
3035 .vece = MO_32 },
3036 { .fni8 = tcg_gen_shl_mod_i64,
3037 .fniv = tcg_gen_shlv_mod_vec,
3038 .fno = gen_helper_gvec_shl64v,
3039 .opt_opc = vecop_list,
3040 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
3041 .vece = MO_64 },
3042 };
3043
3044 tcg_debug_assert(vece <= MO_64);
3045 tcg_gen_gvec_3(dofs, aofs, bofs, oprsz, maxsz, &g[vece]);
3046}
3047
3048/*
3049 * Similarly for logical right shifts.
3050 */
3051
3052static void tcg_gen_shrv_mod_vec(unsigned vece, TCGv_vec d,
3053 TCGv_vec a, TCGv_vec b)
3054{
3055 TCGv_vec t = tcg_temp_new_vec_matching(d);
3056
3057 tcg_gen_dupi_vec(vece, t, (8 << vece) - 1);
3058 tcg_gen_and_vec(vece, t, t, b);
3059 tcg_gen_shrv_vec(vece, d, a, t);
3060 tcg_temp_free_vec(t);
3061}
3062
3063static void tcg_gen_shr_mod_i32(TCGv_i32 d, TCGv_i32 a, TCGv_i32 b)
3064{
3065 TCGv_i32 t = tcg_temp_new_i32();
3066
3067 tcg_gen_andi_i32(t, b, 31);
3068 tcg_gen_shr_i32(d, a, t);
3069 tcg_temp_free_i32(t);
3070}
3071
3072static void tcg_gen_shr_mod_i64(TCGv_i64 d, TCGv_i64 a, TCGv_i64 b)
3073{
3074 TCGv_i64 t = tcg_temp_new_i64();
3075
3076 tcg_gen_andi_i64(t, b, 63);
3077 tcg_gen_shr_i64(d, a, t);
3078 tcg_temp_free_i64(t);
3079}
3080
3081void tcg_gen_gvec_shrv(unsigned vece, uint32_t dofs, uint32_t aofs,
3082 uint32_t bofs, uint32_t oprsz, uint32_t maxsz)
3083{
3084 static const TCGOpcode vecop_list[] = { INDEX_op_shrv_vec, 0 };
3085 static const GVecGen3 g[4] = {
3086 { .fniv = tcg_gen_shrv_mod_vec,
3087 .fno = gen_helper_gvec_shr8v,
3088 .opt_opc = vecop_list,
3089 .vece = MO_8 },
3090 { .fniv = tcg_gen_shrv_mod_vec,
3091 .fno = gen_helper_gvec_shr16v,
3092 .opt_opc = vecop_list,
3093 .vece = MO_16 },
3094 { .fni4 = tcg_gen_shr_mod_i32,
3095 .fniv = tcg_gen_shrv_mod_vec,
3096 .fno = gen_helper_gvec_shr32v,
3097 .opt_opc = vecop_list,
3098 .vece = MO_32 },
3099 { .fni8 = tcg_gen_shr_mod_i64,
3100 .fniv = tcg_gen_shrv_mod_vec,
3101 .fno = gen_helper_gvec_shr64v,
3102 .opt_opc = vecop_list,
3103 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
3104 .vece = MO_64 },
3105 };
3106
3107 tcg_debug_assert(vece <= MO_64);
3108 tcg_gen_gvec_3(dofs, aofs, bofs, oprsz, maxsz, &g[vece]);
3109}
3110
3111/*
3112 * Similarly for arithmetic right shifts.
3113 */
3114
3115static void tcg_gen_sarv_mod_vec(unsigned vece, TCGv_vec d,
3116 TCGv_vec a, TCGv_vec b)
3117{
3118 TCGv_vec t = tcg_temp_new_vec_matching(d);
3119
3120 tcg_gen_dupi_vec(vece, t, (8 << vece) - 1);
3121 tcg_gen_and_vec(vece, t, t, b);
3122 tcg_gen_sarv_vec(vece, d, a, t);
3123 tcg_temp_free_vec(t);
3124}
3125
3126static void tcg_gen_sar_mod_i32(TCGv_i32 d, TCGv_i32 a, TCGv_i32 b)
3127{
3128 TCGv_i32 t = tcg_temp_new_i32();
3129
3130 tcg_gen_andi_i32(t, b, 31);
3131 tcg_gen_sar_i32(d, a, t);
3132 tcg_temp_free_i32(t);
3133}
3134
3135static void tcg_gen_sar_mod_i64(TCGv_i64 d, TCGv_i64 a, TCGv_i64 b)
3136{
3137 TCGv_i64 t = tcg_temp_new_i64();
3138
3139 tcg_gen_andi_i64(t, b, 63);
3140 tcg_gen_sar_i64(d, a, t);
3141 tcg_temp_free_i64(t);
3142}
3143
3144void tcg_gen_gvec_sarv(unsigned vece, uint32_t dofs, uint32_t aofs,
3145 uint32_t bofs, uint32_t oprsz, uint32_t maxsz)
3146{
3147 static const TCGOpcode vecop_list[] = { INDEX_op_sarv_vec, 0 };
3148 static const GVecGen3 g[4] = {
3149 { .fniv = tcg_gen_sarv_mod_vec,
3150 .fno = gen_helper_gvec_sar8v,
3151 .opt_opc = vecop_list,
3152 .vece = MO_8 },
3153 { .fniv = tcg_gen_sarv_mod_vec,
3154 .fno = gen_helper_gvec_sar16v,
3155 .opt_opc = vecop_list,
3156 .vece = MO_16 },
3157 { .fni4 = tcg_gen_sar_mod_i32,
3158 .fniv = tcg_gen_sarv_mod_vec,
3159 .fno = gen_helper_gvec_sar32v,
3160 .opt_opc = vecop_list,
3161 .vece = MO_32 },
3162 { .fni8 = tcg_gen_sar_mod_i64,
3163 .fniv = tcg_gen_sarv_mod_vec,
3164 .fno = gen_helper_gvec_sar64v,
3165 .opt_opc = vecop_list,
3166 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
3167 .vece = MO_64 },
3168 };
3169
3170 tcg_debug_assert(vece <= MO_64);
3171 tcg_gen_gvec_3(dofs, aofs, bofs, oprsz, maxsz, &g[vece]);
3172}
3173
5d0ceda9
RH		 3174/*
3175 * Similarly for rotates.
3176 */
3177
3178static void tcg_gen_rotlv_mod_vec(unsigned vece, TCGv_vec d,
3179 TCGv_vec a, TCGv_vec b)
3180{
3181 TCGv_vec t = tcg_temp_new_vec_matching(d);
3182
3183 tcg_gen_dupi_vec(vece, t, (8 << vece) - 1);
3184 tcg_gen_and_vec(vece, t, t, b);
3185 tcg_gen_rotlv_vec(vece, d, a, t);
3186 tcg_temp_free_vec(t);
3187}
3188
3189static void tcg_gen_rotl_mod_i32(TCGv_i32 d, TCGv_i32 a, TCGv_i32 b)
3190{
3191 TCGv_i32 t = tcg_temp_new_i32();
3192
3193 tcg_gen_andi_i32(t, b, 31);
3194 tcg_gen_rotl_i32(d, a, t);
3195 tcg_temp_free_i32(t);
3196}
3197
3198static void tcg_gen_rotl_mod_i64(TCGv_i64 d, TCGv_i64 a, TCGv_i64 b)
3199{
3200 TCGv_i64 t = tcg_temp_new_i64();
3201
3202 tcg_gen_andi_i64(t, b, 63);
3203 tcg_gen_rotl_i64(d, a, t);
3204 tcg_temp_free_i64(t);
3205}
3206
3207void tcg_gen_gvec_rotlv(unsigned vece, uint32_t dofs, uint32_t aofs,
3208 uint32_t bofs, uint32_t oprsz, uint32_t maxsz)
3209{
3210 static const TCGOpcode vecop_list[] = { INDEX_op_rotlv_vec, 0 };
3211 static const GVecGen3 g[4] = {
3212 { .fniv = tcg_gen_rotlv_mod_vec,
3213 .fno = gen_helper_gvec_rotl8v,
3214 .opt_opc = vecop_list,
3215 .vece = MO_8 },
3216 { .fniv = tcg_gen_rotlv_mod_vec,
3217 .fno = gen_helper_gvec_rotl16v,
3218 .opt_opc = vecop_list,
3219 .vece = MO_16 },
3220 { .fni4 = tcg_gen_rotl_mod_i32,
3221 .fniv = tcg_gen_rotlv_mod_vec,
3222 .fno = gen_helper_gvec_rotl32v,
3223 .opt_opc = vecop_list,
3224 .vece = MO_32 },
3225 { .fni8 = tcg_gen_rotl_mod_i64,
3226 .fniv = tcg_gen_rotlv_mod_vec,
3227 .fno = gen_helper_gvec_rotl64v,
3228 .opt_opc = vecop_list,
3229 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
3230 .vece = MO_64 },
3231 };
3232
3233 tcg_debug_assert(vece <= MO_64);
3234 tcg_gen_gvec_3(dofs, aofs, bofs, oprsz, maxsz, &g[vece]);
3235}
3236
3237static void tcg_gen_rotrv_mod_vec(unsigned vece, TCGv_vec d,
3238 TCGv_vec a, TCGv_vec b)
3239{
3240 TCGv_vec t = tcg_temp_new_vec_matching(d);
3241
3242 tcg_gen_dupi_vec(vece, t, (8 << vece) - 1);
3243 tcg_gen_and_vec(vece, t, t, b);
3244 tcg_gen_rotrv_vec(vece, d, a, t);
3245 tcg_temp_free_vec(t);
3246}
3247
3248static void tcg_gen_rotr_mod_i32(TCGv_i32 d, TCGv_i32 a, TCGv_i32 b)
3249{
3250 TCGv_i32 t = tcg_temp_new_i32();
3251
3252 tcg_gen_andi_i32(t, b, 31);
3253 tcg_gen_rotr_i32(d, a, t);
3254 tcg_temp_free_i32(t);
3255}
3256
3257static void tcg_gen_rotr_mod_i64(TCGv_i64 d, TCGv_i64 a, TCGv_i64 b)
3258{
3259 TCGv_i64 t = tcg_temp_new_i64();
3260
3261 tcg_gen_andi_i64(t, b, 63);
3262 tcg_gen_rotr_i64(d, a, t);
3263 tcg_temp_free_i64(t);
3264}
3265
3266void tcg_gen_gvec_rotrv(unsigned vece, uint32_t dofs, uint32_t aofs,
3267 uint32_t bofs, uint32_t oprsz, uint32_t maxsz)
3268{
3269 static const TCGOpcode vecop_list[] = { INDEX_op_rotrv_vec, 0 };
3270 static const GVecGen3 g[4] = {
3271 { .fniv = tcg_gen_rotrv_mod_vec,
3272 .fno = gen_helper_gvec_rotr8v,
3273 .opt_opc = vecop_list,
3274 .vece = MO_8 },
3275 { .fniv = tcg_gen_rotrv_mod_vec,
3276 .fno = gen_helper_gvec_rotr16v,
3277 .opt_opc = vecop_list,
3278 .vece = MO_16 },
3279 { .fni4 = tcg_gen_rotr_mod_i32,
3280 .fniv = tcg_gen_rotrv_mod_vec,
3281 .fno = gen_helper_gvec_rotr32v,
3282 .opt_opc = vecop_list,
3283 .vece = MO_32 },
3284 { .fni8 = tcg_gen_rotr_mod_i64,
3285 .fniv = tcg_gen_rotrv_mod_vec,
3286 .fno = gen_helper_gvec_rotr64v,
3287 .opt_opc = vecop_list,
3288 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
3289 .vece = MO_64 },
3290 };
3291
3292 tcg_debug_assert(vece <= MO_64);
3293 tcg_gen_gvec_3(dofs, aofs, bofs, oprsz, maxsz, &g[vece]);
3294}
3295
212be173
RH		 3296/* Expand OPSZ bytes worth of three-operand operations using i32 elements. */
3297static void expand_cmp_i32(uint32_t dofs, uint32_t aofs, uint32_t bofs,
3298 uint32_t oprsz, TCGCond cond)
3299{
3300 TCGv_i32 t0 = tcg_temp_new_i32();
3301 TCGv_i32 t1 = tcg_temp_new_i32();
3302 uint32_t i;
3303
3304 for (i = 0; i < oprsz; i += 4) {
3305 tcg_gen_ld_i32(t0, cpu_env, aofs + i);
3306 tcg_gen_ld_i32(t1, cpu_env, bofs + i);
3307 tcg_gen_setcond_i32(cond, t0, t0, t1);
3308 tcg_gen_neg_i32(t0, t0);
3309 tcg_gen_st_i32(t0, cpu_env, dofs + i);
3310 }
3311 tcg_temp_free_i32(t1);
3312 tcg_temp_free_i32(t0);
3313}
3314
3315static void expand_cmp_i64(uint32_t dofs, uint32_t aofs, uint32_t bofs,
3316 uint32_t oprsz, TCGCond cond)
3317{
3318 TCGv_i64 t0 = tcg_temp_new_i64();
3319 TCGv_i64 t1 = tcg_temp_new_i64();
3320 uint32_t i;
3321
3322 for (i = 0; i < oprsz; i += 8) {
3323 tcg_gen_ld_i64(t0, cpu_env, aofs + i);
3324 tcg_gen_ld_i64(t1, cpu_env, bofs + i);
3325 tcg_gen_setcond_i64(cond, t0, t0, t1);
3326 tcg_gen_neg_i64(t0, t0);
3327 tcg_gen_st_i64(t0, cpu_env, dofs + i);
3328 }
3329 tcg_temp_free_i64(t1);
3330 tcg_temp_free_i64(t0);
3331}
3332
3333static void expand_cmp_vec(unsigned vece, uint32_t dofs, uint32_t aofs,
3334 uint32_t bofs, uint32_t oprsz, uint32_t tysz,
3335 TCGType type, TCGCond cond)
3336{
3337 TCGv_vec t0 = tcg_temp_new_vec(type);
3338 TCGv_vec t1 = tcg_temp_new_vec(type);
3339 uint32_t i;
3340
3341 for (i = 0; i < oprsz; i += tysz) {
3342 tcg_gen_ld_vec(t0, cpu_env, aofs + i);
3343 tcg_gen_ld_vec(t1, cpu_env, bofs + i);
3344 tcg_gen_cmp_vec(cond, vece, t0, t0, t1);
3345 tcg_gen_st_vec(t0, cpu_env, dofs + i);
3346 }
3347 tcg_temp_free_vec(t1);
3348 tcg_temp_free_vec(t0);
3349}
3350
3351void tcg_gen_gvec_cmp(TCGCond cond, unsigned vece, uint32_t dofs,
3352 uint32_t aofs, uint32_t bofs,
3353 uint32_t oprsz, uint32_t maxsz)
3354{
53229a77 3355 static const TCGOpcode cmp_list[] = { INDEX_op_cmp_vec, 0 };
212be173
RH		 3356 static gen_helper_gvec_3 * const eq_fn[4] = {
3357 gen_helper_gvec_eq8, gen_helper_gvec_eq16,
3358 gen_helper_gvec_eq32, gen_helper_gvec_eq64
3359 };
3360 static gen_helper_gvec_3 * const ne_fn[4] = {
3361 gen_helper_gvec_ne8, gen_helper_gvec_ne16,
3362 gen_helper_gvec_ne32, gen_helper_gvec_ne64
3363 };
3364 static gen_helper_gvec_3 * const lt_fn[4] = {
3365 gen_helper_gvec_lt8, gen_helper_gvec_lt16,
3366 gen_helper_gvec_lt32, gen_helper_gvec_lt64
3367 };
3368 static gen_helper_gvec_3 * const le_fn[4] = {
3369 gen_helper_gvec_le8, gen_helper_gvec_le16,
3370 gen_helper_gvec_le32, gen_helper_gvec_le64
3371 };
3372 static gen_helper_gvec_3 * const ltu_fn[4] = {
3373 gen_helper_gvec_ltu8, gen_helper_gvec_ltu16,
3374 gen_helper_gvec_ltu32, gen_helper_gvec_ltu64
3375 };
3376 static gen_helper_gvec_3 * const leu_fn[4] = {
3377 gen_helper_gvec_leu8, gen_helper_gvec_leu16,
3378 gen_helper_gvec_leu32, gen_helper_gvec_leu64
3379 };
3380 static gen_helper_gvec_3 * const * const fns[16] = {
3381 [TCG_COND_EQ] = eq_fn,
3382 [TCG_COND_NE] = ne_fn,
3383 [TCG_COND_LT] = lt_fn,
3384 [TCG_COND_LE] = le_fn,
3385 [TCG_COND_LTU] = ltu_fn,
3386 [TCG_COND_LEU] = leu_fn,
3387 };
53229a77
RH		 3388
3389 const TCGOpcode *hold_list;
adb196cb
RH		 3390 TCGType type;
3391 uint32_t some;
212be173
RH		 3392
3393 check_size_align(oprsz, maxsz, dofs | aofs | bofs);
3394 check_overlap_3(dofs, aofs, bofs, maxsz);
3395
3396 if (cond == TCG_COND_NEVER || cond == TCG_COND_ALWAYS) {
3397 do_dup(MO_8, dofs, oprsz, maxsz,
3398 NULL, NULL, -(cond == TCG_COND_ALWAYS));
3399 return;
3400 }
3401
53229a77
RH		 3402 /*
3403 * Implement inline with a vector type, if possible.
adb196cb
RH		 3404 * Prefer integer when 64-bit host and 64-bit comparison.
3405 */
53229a77
RH		 3406 hold_list = tcg_swap_vecop_list(cmp_list);
3407 type = choose_vector_type(cmp_list, vece, oprsz,
adb196cb
RH		 3408 TCG_TARGET_REG_BITS == 64 && vece == MO_64);
3409 switch (type) {
3410 case TCG_TYPE_V256:
3411 /* Recall that ARM SVE allows vector sizes that are not a
3412 * power of 2, but always a multiple of 16. The intent is
3413 * that e.g. size == 80 would be expanded with 2x32 + 1x16.
3414 */
3415 some = QEMU_ALIGN_DOWN(oprsz, 32);
212be173
RH		 3416 expand_cmp_vec(vece, dofs, aofs, bofs, some, 32, TCG_TYPE_V256, cond);
3417 if (some == oprsz) {
adb196cb 3418 break;
212be173
RH		 3419 }
3420 dofs += some;
3421 aofs += some;
3422 bofs += some;
3423 oprsz -= some;
3424 maxsz -= some;
adb196cb
RH		 3425 /* fallthru */
3426 case TCG_TYPE_V128:
212be173 3427 expand_cmp_vec(vece, dofs, aofs, bofs, oprsz, 16, TCG_TYPE_V128, cond);
adb196cb
RH		 3428 break;
3429 case TCG_TYPE_V64:
212be173 3430 expand_cmp_vec(vece, dofs, aofs, bofs, oprsz, 8, TCG_TYPE_V64, cond);
adb196cb
RH		 3431 break;
3432
3433 case 0:
3434 if (vece == MO_64 && check_size_impl(oprsz, 8)) {
3435 expand_cmp_i64(dofs, aofs, bofs, oprsz, cond);
3436 } else if (vece == MO_32 && check_size_impl(oprsz, 4)) {
3437 expand_cmp_i32(dofs, aofs, bofs, oprsz, cond);
3438 } else {
3439 gen_helper_gvec_3 * const *fn = fns[cond];
3440
3441 if (fn == NULL) {
3442 uint32_t tmp;
3443 tmp = aofs, aofs = bofs, bofs = tmp;
3444 cond = tcg_swap_cond(cond);
3445 fn = fns[cond];
3446 assert(fn != NULL);
3447 }
3448 tcg_gen_gvec_3_ool(dofs, aofs, bofs, oprsz, maxsz, 0, fn[vece]);
53229a77 3449 oprsz = maxsz;
212be173 3450 }
adb196cb
RH		 3451 break;
3452
3453 default:
3454 g_assert_not_reached();
212be173 3455 }
53229a77 3456 tcg_swap_vecop_list(hold_list);
212be173 3457
212be173
RH		 3458 if (oprsz < maxsz) {
3459 expand_clr(dofs + oprsz, maxsz - oprsz);
3460 }
3461}
38dc1294
RH		 3462
3463static void tcg_gen_bitsel_i64(TCGv_i64 d, TCGv_i64 a, TCGv_i64 b, TCGv_i64 c)
3464{
3465 TCGv_i64 t = tcg_temp_new_i64();
3466
3467 tcg_gen_and_i64(t, b, a);
3468 tcg_gen_andc_i64(d, c, a);
3469 tcg_gen_or_i64(d, d, t);
3470 tcg_temp_free_i64(t);
3471}
3472
3473void tcg_gen_gvec_bitsel(unsigned vece, uint32_t dofs, uint32_t aofs,
3474 uint32_t bofs, uint32_t cofs,
3475 uint32_t oprsz, uint32_t maxsz)
3476{
3477 static const GVecGen4 g = {
3478 .fni8 = tcg_gen_bitsel_i64,
3479 .fniv = tcg_gen_bitsel_vec,
3480 .fno = gen_helper_gvec_bitsel,
3481 };
3482
3483 tcg_gen_gvec_4(dofs, aofs, bofs, cofs, oprsz, maxsz, &g);
3484}
QEMU mirror