1 /*
2 * AArch64 SVE translation
3 *
4 * Copyright (c) 2018 Linaro, Ltd
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
9 * version 2.1 of the License, or (at your option) any later version.
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"
21 #include "translate.h"
22 #include "translate-a64.h"
23 #include "fpu/softfloat.h"
24
25
26 typedef void GVecGen2sFn(unsigned, uint32_t, uint32_t,
27 TCGv_i64, uint32_t, uint32_t);
28
29 typedef void gen_helper_gvec_flags_3(TCGv_i32, TCGv_ptr, TCGv_ptr,
30 TCGv_ptr, TCGv_i32);
31 typedef void gen_helper_gvec_flags_4(TCGv_i32, TCGv_ptr, TCGv_ptr,
32 TCGv_ptr, TCGv_ptr, TCGv_i32);
33
34 typedef void gen_helper_gvec_mem(TCGv_env, TCGv_ptr, TCGv_i64, TCGv_i32);
35 typedef void gen_helper_gvec_mem_scatter(TCGv_env, TCGv_ptr, TCGv_ptr,
36 TCGv_ptr, TCGv_i64, TCGv_i32);
37
38 /*
39 * Helpers for extracting complex instruction fields.
40 */
41
42 /* See e.g. ASR (immediate, predicated).
43 * Returns -1 for unallocated encoding; diagnose later.
44 */
tszimm_esz(DisasContext * s,int x)45 static int tszimm_esz(DisasContext *s, int x)
46 {
47 x >>= 3; /* discard imm3 */
48 return 31 - clz32(x);
49 }
50
tszimm_shr(DisasContext * s,int x)51 static int tszimm_shr(DisasContext *s, int x)
52 {
53 /*
54 * We won't use the tszimm_shr() value if tszimm_esz() returns -1 (the
55 * trans function will check for esz < 0), so we can return any
56 * value we like from here in that case as long as we avoid UB.
57 */
58 int esz = tszimm_esz(s, x);
59 if (esz < 0) {
60 return esz;
61 }
62 return (16 << esz) - x;
63 }
64
65 /* See e.g. LSL (immediate, predicated). */
tszimm_shl(DisasContext * s,int x)66 static int tszimm_shl(DisasContext *s, int x)
67 {
68 /* As with tszimm_shr(), value will be unused if esz < 0 */
69 int esz = tszimm_esz(s, x);
70 if (esz < 0) {
71 return esz;
72 }
73 return x - (8 << esz);
74 }
75
76 /* The SH bit is in bit 8. Extract the low 8 and shift. */
expand_imm_sh8s(DisasContext * s,int x)77 static inline int expand_imm_sh8s(DisasContext *s, int x)
78 {
79 return (int8_t)x << (x & 0x100 ? 8 : 0);
80 }
81
expand_imm_sh8u(DisasContext * s,int x)82 static inline int expand_imm_sh8u(DisasContext *s, int x)
83 {
84 return (uint8_t)x << (x & 0x100 ? 8 : 0);
85 }
86
87 /* Convert a 2-bit memory size (msz) to a 4-bit data type (dtype)
88 * with unsigned data. C.f. SVE Memory Contiguous Load Group.
89 */
msz_dtype(DisasContext * s,int msz)90 static inline int msz_dtype(DisasContext *s, int msz)
91 {
92 static const uint8_t dtype[4] = { 0, 5, 10, 15 };
93 return dtype[msz];
94 }
95
96 /*
97 * Include the generated decoder.
98 */
99
100 #include "decode-sve.c.inc"
101
102 /*
103 * Implement all of the translator functions referenced by the decoder.
104 */
105
106 /* Invoke an out-of-line helper on 2 Zregs. */
gen_gvec_ool_zz(DisasContext * s,gen_helper_gvec_2 * fn,int rd,int rn,int data)107 static bool gen_gvec_ool_zz(DisasContext *s, gen_helper_gvec_2 *fn,
108 int rd, int rn, int data)
109 {
110 if (fn == NULL) {
111 return false;
112 }
113 if (sve_access_check(s)) {
114 unsigned vsz = vec_full_reg_size(s);
115 tcg_gen_gvec_2_ool(vec_full_reg_offset(s, rd),
116 vec_full_reg_offset(s, rn),
117 vsz, vsz, data, fn);
118 }
119 return true;
120 }
121
gen_gvec_fpst_zz(DisasContext * s,gen_helper_gvec_2_ptr * fn,int rd,int rn,int data,ARMFPStatusFlavour flavour)122 static bool gen_gvec_fpst_zz(DisasContext *s, gen_helper_gvec_2_ptr *fn,
123 int rd, int rn, int data,
124 ARMFPStatusFlavour flavour)
125 {
126 if (fn == NULL) {
127 return false;
128 }
129 if (sve_access_check(s)) {
130 unsigned vsz = vec_full_reg_size(s);
131 TCGv_ptr status = fpstatus_ptr(flavour);
132
133 tcg_gen_gvec_2_ptr(vec_full_reg_offset(s, rd),
134 vec_full_reg_offset(s, rn),
135 status, vsz, vsz, data, fn);
136 }
137 return true;
138 }
139
gen_gvec_fpst_ah_arg_zz(DisasContext * s,gen_helper_gvec_2_ptr * fn,arg_rr_esz * a,int data)140 static bool gen_gvec_fpst_ah_arg_zz(DisasContext *s, gen_helper_gvec_2_ptr *fn,
141 arg_rr_esz *a, int data)
142 {
143 return gen_gvec_fpst_zz(s, fn, a->rd, a->rn, data,
144 select_ah_fpst(s, a->esz));
145 }
146
147 /* Invoke an out-of-line helper on 3 Zregs. */
gen_gvec_ool_zzz(DisasContext * s,gen_helper_gvec_3 * fn,int rd,int rn,int rm,int data)148 static bool gen_gvec_ool_zzz(DisasContext *s, gen_helper_gvec_3 *fn,
149 int rd, int rn, int rm, int data)
150 {
151 if (fn == NULL) {
152 return false;
153 }
154 if (sve_access_check(s)) {
155 unsigned vsz = vec_full_reg_size(s);
156 tcg_gen_gvec_3_ool(vec_full_reg_offset(s, rd),
157 vec_full_reg_offset(s, rn),
158 vec_full_reg_offset(s, rm),
159 vsz, vsz, data, fn);
160 }
161 return true;
162 }
163
gen_gvec_ool_arg_zzz(DisasContext * s,gen_helper_gvec_3 * fn,arg_rrr_esz * a,int data)164 static bool gen_gvec_ool_arg_zzz(DisasContext *s, gen_helper_gvec_3 *fn,
165 arg_rrr_esz *a, int data)
166 {
167 return gen_gvec_ool_zzz(s, fn, a->rd, a->rn, a->rm, data);
168 }
169
170 /* Invoke an out-of-line helper on 3 Zregs, plus float_status. */
gen_gvec_fpst_zzz(DisasContext * s,gen_helper_gvec_3_ptr * fn,int rd,int rn,int rm,int data,ARMFPStatusFlavour flavour)171 static bool gen_gvec_fpst_zzz(DisasContext *s, gen_helper_gvec_3_ptr *fn,
172 int rd, int rn, int rm,
173 int data, ARMFPStatusFlavour flavour)
174 {
175 if (fn == NULL) {
176 return false;
177 }
178 if (sve_access_check(s)) {
179 unsigned vsz = vec_full_reg_size(s);
180 TCGv_ptr status = fpstatus_ptr(flavour);
181
182 tcg_gen_gvec_3_ptr(vec_full_reg_offset(s, rd),
183 vec_full_reg_offset(s, rn),
184 vec_full_reg_offset(s, rm),
185 status, vsz, vsz, data, fn);
186 }
187 return true;
188 }
189
gen_gvec_fpst_arg_zzz(DisasContext * s,gen_helper_gvec_3_ptr * fn,arg_rrr_esz * a,int data)190 static bool gen_gvec_fpst_arg_zzz(DisasContext *s, gen_helper_gvec_3_ptr *fn,
191 arg_rrr_esz *a, int data)
192 {
193 return gen_gvec_fpst_zzz(s, fn, a->rd, a->rn, a->rm, data,
194 a->esz == MO_16 ? FPST_A64_F16 : FPST_A64);
195 }
196
gen_gvec_fpst_ah_arg_zzz(DisasContext * s,gen_helper_gvec_3_ptr * fn,arg_rrr_esz * a,int data)197 static bool gen_gvec_fpst_ah_arg_zzz(DisasContext *s, gen_helper_gvec_3_ptr *fn,
198 arg_rrr_esz *a, int data)
199 {
200 return gen_gvec_fpst_zzz(s, fn, a->rd, a->rn, a->rm, data,
201 select_ah_fpst(s, a->esz));
202 }
203
204 /* Invoke an out-of-line helper on 4 Zregs. */
gen_gvec_ool_zzzz(DisasContext * s,gen_helper_gvec_4 * fn,int rd,int rn,int rm,int ra,int data)205 static bool gen_gvec_ool_zzzz(DisasContext *s, gen_helper_gvec_4 *fn,
206 int rd, int rn, int rm, int ra, int data)
207 {
208 if (fn == NULL) {
209 return false;
210 }
211 if (sve_access_check(s)) {
212 unsigned vsz = vec_full_reg_size(s);
213 tcg_gen_gvec_4_ool(vec_full_reg_offset(s, rd),
214 vec_full_reg_offset(s, rn),
215 vec_full_reg_offset(s, rm),
216 vec_full_reg_offset(s, ra),
217 vsz, vsz, data, fn);
218 }
219 return true;
220 }
221
gen_gvec_ool_arg_zzzz(DisasContext * s,gen_helper_gvec_4 * fn,arg_rrrr_esz * a,int data)222 static bool gen_gvec_ool_arg_zzzz(DisasContext *s, gen_helper_gvec_4 *fn,
223 arg_rrrr_esz *a, int data)
224 {
225 return gen_gvec_ool_zzzz(s, fn, a->rd, a->rn, a->rm, a->ra, data);
226 }
227
gen_gvec_ool_arg_zzxz(DisasContext * s,gen_helper_gvec_4 * fn,arg_rrxr_esz * a)228 static bool gen_gvec_ool_arg_zzxz(DisasContext *s, gen_helper_gvec_4 *fn,
229 arg_rrxr_esz *a)
230 {
231 return gen_gvec_ool_zzzz(s, fn, a->rd, a->rn, a->rm, a->ra, a->index);
232 }
233
234 /* Invoke an out-of-line helper on 4 Zregs, plus a pointer. */
gen_gvec_ptr_zzzz(DisasContext * s,gen_helper_gvec_4_ptr * fn,int rd,int rn,int rm,int ra,int data,TCGv_ptr ptr)235 static bool gen_gvec_ptr_zzzz(DisasContext *s, gen_helper_gvec_4_ptr *fn,
236 int rd, int rn, int rm, int ra,
237 int data, TCGv_ptr ptr)
238 {
239 if (fn == NULL) {
240 return false;
241 }
242 if (sve_access_check(s)) {
243 unsigned vsz = vec_full_reg_size(s);
244 tcg_gen_gvec_4_ptr(vec_full_reg_offset(s, rd),
245 vec_full_reg_offset(s, rn),
246 vec_full_reg_offset(s, rm),
247 vec_full_reg_offset(s, ra),
248 ptr, vsz, vsz, data, fn);
249 }
250 return true;
251 }
252
gen_gvec_fpst_zzzz(DisasContext * s,gen_helper_gvec_4_ptr * fn,int rd,int rn,int rm,int ra,int data,ARMFPStatusFlavour flavour)253 static bool gen_gvec_fpst_zzzz(DisasContext *s, gen_helper_gvec_4_ptr *fn,
254 int rd, int rn, int rm, int ra,
255 int data, ARMFPStatusFlavour flavour)
256 {
257 TCGv_ptr status = fpstatus_ptr(flavour);
258 bool ret = gen_gvec_ptr_zzzz(s, fn, rd, rn, rm, ra, data, status);
259 return ret;
260 }
261
gen_gvec_env_zzzz(DisasContext * s,gen_helper_gvec_4_ptr * fn,int rd,int rn,int rm,int ra,int data)262 static bool gen_gvec_env_zzzz(DisasContext *s, gen_helper_gvec_4_ptr *fn,
263 int rd, int rn, int rm, int ra,
264 int data)
265 {
266 return gen_gvec_ptr_zzzz(s, fn, rd, rn, rm, ra, data, tcg_env);
267 }
268
gen_gvec_env_arg_zzzz(DisasContext * s,gen_helper_gvec_4_ptr * fn,arg_rrrr_esz * a,int data)269 static bool gen_gvec_env_arg_zzzz(DisasContext *s, gen_helper_gvec_4_ptr *fn,
270 arg_rrrr_esz *a, int data)
271 {
272 return gen_gvec_env_zzzz(s, fn, a->rd, a->rn, a->rm, a->ra, data);
273 }
274
gen_gvec_env_arg_zzxz(DisasContext * s,gen_helper_gvec_4_ptr * fn,arg_rrxr_esz * a)275 static bool gen_gvec_env_arg_zzxz(DisasContext *s, gen_helper_gvec_4_ptr *fn,
276 arg_rrxr_esz *a)
277 {
278 return gen_gvec_env_zzzz(s, fn, a->rd, a->rn, a->rm, a->ra, a->index);
279 }
280
281 /* Invoke an out-of-line helper on 4 Zregs, 1 Preg, plus fpst. */
gen_gvec_fpst_zzzzp(DisasContext * s,gen_helper_gvec_5_ptr * fn,int rd,int rn,int rm,int ra,int pg,int data,ARMFPStatusFlavour flavour)282 static bool gen_gvec_fpst_zzzzp(DisasContext *s, gen_helper_gvec_5_ptr *fn,
283 int rd, int rn, int rm, int ra, int pg,
284 int data, ARMFPStatusFlavour flavour)
285 {
286 if (fn == NULL) {
287 return false;
288 }
289 if (sve_access_check(s)) {
290 unsigned vsz = vec_full_reg_size(s);
291 TCGv_ptr status = fpstatus_ptr(flavour);
292
293 tcg_gen_gvec_5_ptr(vec_full_reg_offset(s, rd),
294 vec_full_reg_offset(s, rn),
295 vec_full_reg_offset(s, rm),
296 vec_full_reg_offset(s, ra),
297 pred_full_reg_offset(s, pg),
298 status, vsz, vsz, data, fn);
299 }
300 return true;
301 }
302
303 /* Invoke an out-of-line helper on 2 Zregs and a predicate. */
gen_gvec_ool_zzp(DisasContext * s,gen_helper_gvec_3 * fn,int rd,int rn,int pg,int data)304 static bool gen_gvec_ool_zzp(DisasContext *s, gen_helper_gvec_3 *fn,
305 int rd, int rn, int pg, int data)
306 {
307 if (fn == NULL) {
308 return false;
309 }
310 if (sve_access_check(s)) {
311 unsigned vsz = vec_full_reg_size(s);
312 tcg_gen_gvec_3_ool(vec_full_reg_offset(s, rd),
313 vec_full_reg_offset(s, rn),
314 pred_full_reg_offset(s, pg),
315 vsz, vsz, data, fn);
316 }
317 return true;
318 }
319
gen_gvec_ool_arg_zpz(DisasContext * s,gen_helper_gvec_3 * fn,arg_rpr_esz * a,int data)320 static bool gen_gvec_ool_arg_zpz(DisasContext *s, gen_helper_gvec_3 *fn,
321 arg_rpr_esz *a, int data)
322 {
323 return gen_gvec_ool_zzp(s, fn, a->rd, a->rn, a->pg, data);
324 }
325
gen_gvec_ool_arg_zpzi(DisasContext * s,gen_helper_gvec_3 * fn,arg_rpri_esz * a)326 static bool gen_gvec_ool_arg_zpzi(DisasContext *s, gen_helper_gvec_3 *fn,
327 arg_rpri_esz *a)
328 {
329 return gen_gvec_ool_zzp(s, fn, a->rd, a->rn, a->pg, a->imm);
330 }
331
gen_gvec_fpst_zzp(DisasContext * s,gen_helper_gvec_3_ptr * fn,int rd,int rn,int pg,int data,ARMFPStatusFlavour flavour)332 static bool gen_gvec_fpst_zzp(DisasContext *s, gen_helper_gvec_3_ptr *fn,
333 int rd, int rn, int pg, int data,
334 ARMFPStatusFlavour flavour)
335 {
336 if (fn == NULL) {
337 return false;
338 }
339 if (sve_access_check(s)) {
340 unsigned vsz = vec_full_reg_size(s);
341 TCGv_ptr status = fpstatus_ptr(flavour);
342
343 tcg_gen_gvec_3_ptr(vec_full_reg_offset(s, rd),
344 vec_full_reg_offset(s, rn),
345 pred_full_reg_offset(s, pg),
346 status, vsz, vsz, data, fn);
347 }
348 return true;
349 }
350
gen_gvec_fpst_arg_zpz(DisasContext * s,gen_helper_gvec_3_ptr * fn,arg_rpr_esz * a,int data,ARMFPStatusFlavour flavour)351 static bool gen_gvec_fpst_arg_zpz(DisasContext *s, gen_helper_gvec_3_ptr *fn,
352 arg_rpr_esz *a, int data,
353 ARMFPStatusFlavour flavour)
354 {
355 return gen_gvec_fpst_zzp(s, fn, a->rd, a->rn, a->pg, data, flavour);
356 }
357
358 /* Invoke an out-of-line helper on 3 Zregs and a predicate. */
gen_gvec_ool_zzzp(DisasContext * s,gen_helper_gvec_4 * fn,int rd,int rn,int rm,int pg,int data)359 static bool gen_gvec_ool_zzzp(DisasContext *s, gen_helper_gvec_4 *fn,
360 int rd, int rn, int rm, int pg, int data)
361 {
362 if (fn == NULL) {
363 return false;
364 }
365 if (sve_access_check(s)) {
366 unsigned vsz = vec_full_reg_size(s);
367 tcg_gen_gvec_4_ool(vec_full_reg_offset(s, rd),
368 vec_full_reg_offset(s, rn),
369 vec_full_reg_offset(s, rm),
370 pred_full_reg_offset(s, pg),
371 vsz, vsz, data, fn);
372 }
373 return true;
374 }
375
gen_gvec_ool_arg_zpzz(DisasContext * s,gen_helper_gvec_4 * fn,arg_rprr_esz * a,int data)376 static bool gen_gvec_ool_arg_zpzz(DisasContext *s, gen_helper_gvec_4 *fn,
377 arg_rprr_esz *a, int data)
378 {
379 return gen_gvec_ool_zzzp(s, fn, a->rd, a->rn, a->rm, a->pg, data);
380 }
381
382 /* Invoke an out-of-line helper on 3 Zregs and a predicate. */
gen_gvec_fpst_zzzp(DisasContext * s,gen_helper_gvec_4_ptr * fn,int rd,int rn,int rm,int pg,int data,ARMFPStatusFlavour flavour)383 static bool gen_gvec_fpst_zzzp(DisasContext *s, gen_helper_gvec_4_ptr *fn,
384 int rd, int rn, int rm, int pg, int data,
385 ARMFPStatusFlavour flavour)
386 {
387 if (fn == NULL) {
388 return false;
389 }
390 if (sve_access_check(s)) {
391 unsigned vsz = vec_full_reg_size(s);
392 TCGv_ptr status = fpstatus_ptr(flavour);
393
394 tcg_gen_gvec_4_ptr(vec_full_reg_offset(s, rd),
395 vec_full_reg_offset(s, rn),
396 vec_full_reg_offset(s, rm),
397 pred_full_reg_offset(s, pg),
398 status, vsz, vsz, data, fn);
399 }
400 return true;
401 }
402
gen_gvec_fpst_arg_zpzz(DisasContext * s,gen_helper_gvec_4_ptr * fn,arg_rprr_esz * a)403 static bool gen_gvec_fpst_arg_zpzz(DisasContext *s, gen_helper_gvec_4_ptr *fn,
404 arg_rprr_esz *a)
405 {
406 return gen_gvec_fpst_zzzp(s, fn, a->rd, a->rn, a->rm, a->pg, 0,
407 a->esz == MO_16 ? FPST_A64_F16 : FPST_A64);
408 }
409
410 /* Invoke a vector expander on two Zregs and an immediate. */
gen_gvec_fn_zzi(DisasContext * s,GVecGen2iFn * gvec_fn,int esz,int rd,int rn,uint64_t imm)411 static bool gen_gvec_fn_zzi(DisasContext *s, GVecGen2iFn *gvec_fn,
412 int esz, int rd, int rn, uint64_t imm)
413 {
414 if (gvec_fn == NULL) {
415 return false;
416 }
417 if (sve_access_check(s)) {
418 unsigned vsz = vec_full_reg_size(s);
419 gvec_fn(esz, vec_full_reg_offset(s, rd),
420 vec_full_reg_offset(s, rn), imm, vsz, vsz);
421 }
422 return true;
423 }
424
gen_gvec_fn_arg_zzi(DisasContext * s,GVecGen2iFn * gvec_fn,arg_rri_esz * a)425 static bool gen_gvec_fn_arg_zzi(DisasContext *s, GVecGen2iFn *gvec_fn,
426 arg_rri_esz *a)
427 {
428 if (a->esz < 0) {
429 /* Invalid tsz encoding -- see tszimm_esz. */
430 return false;
431 }
432 return gen_gvec_fn_zzi(s, gvec_fn, a->esz, a->rd, a->rn, a->imm);
433 }
434
435 /* Invoke a vector expander on three Zregs. */
gen_gvec_fn_zzz(DisasContext * s,GVecGen3Fn * gvec_fn,int esz,int rd,int rn,int rm)436 static bool gen_gvec_fn_zzz(DisasContext *s, GVecGen3Fn *gvec_fn,
437 int esz, int rd, int rn, int rm)
438 {
439 if (gvec_fn == NULL) {
440 return false;
441 }
442 if (sve_access_check(s)) {
443 unsigned vsz = vec_full_reg_size(s);
444 gvec_fn(esz, vec_full_reg_offset(s, rd),
445 vec_full_reg_offset(s, rn),
446 vec_full_reg_offset(s, rm), vsz, vsz);
447 }
448 return true;
449 }
450
gen_gvec_fn_arg_zzz(DisasContext * s,GVecGen3Fn * fn,arg_rrr_esz * a)451 static bool gen_gvec_fn_arg_zzz(DisasContext *s, GVecGen3Fn *fn,
452 arg_rrr_esz *a)
453 {
454 return gen_gvec_fn_zzz(s, fn, a->esz, a->rd, a->rn, a->rm);
455 }
456
457 /* Invoke a vector expander on four Zregs. */
gen_gvec_fn_arg_zzzz(DisasContext * s,GVecGen4Fn * gvec_fn,arg_rrrr_esz * a)458 static bool gen_gvec_fn_arg_zzzz(DisasContext *s, GVecGen4Fn *gvec_fn,
459 arg_rrrr_esz *a)
460 {
461 if (gvec_fn == NULL) {
462 return false;
463 }
464 if (sve_access_check(s)) {
465 unsigned vsz = vec_full_reg_size(s);
466 gvec_fn(a->esz, vec_full_reg_offset(s, a->rd),
467 vec_full_reg_offset(s, a->rn),
468 vec_full_reg_offset(s, a->rm),
469 vec_full_reg_offset(s, a->ra), vsz, vsz);
470 }
471 return true;
472 }
473
474 /* Invoke a vector move on two Zregs. */
do_mov_z(DisasContext * s,int rd,int rn)475 static bool do_mov_z(DisasContext *s, int rd, int rn)
476 {
477 if (sve_access_check(s)) {
478 unsigned vsz = vec_full_reg_size(s);
479 tcg_gen_gvec_mov(MO_8, vec_full_reg_offset(s, rd),
480 vec_full_reg_offset(s, rn), vsz, vsz);
481 }
482 return true;
483 }
484
485 /* Initialize a Zreg with replications of a 64-bit immediate. */
do_dupi_z(DisasContext * s,int rd,uint64_t word)486 static void do_dupi_z(DisasContext *s, int rd, uint64_t word)
487 {
488 unsigned vsz = vec_full_reg_size(s);
489 tcg_gen_gvec_dup_imm(MO_64, vec_full_reg_offset(s, rd), vsz, vsz, word);
490 }
491
492 /* Invoke a vector expander on three Pregs. */
gen_gvec_fn_ppp(DisasContext * s,GVecGen3Fn * gvec_fn,int rd,int rn,int rm)493 static bool gen_gvec_fn_ppp(DisasContext *s, GVecGen3Fn *gvec_fn,
494 int rd, int rn, int rm)
495 {
496 if (sve_access_check(s)) {
497 unsigned psz = pred_gvec_reg_size(s);
498 gvec_fn(MO_64, pred_full_reg_offset(s, rd),
499 pred_full_reg_offset(s, rn),
500 pred_full_reg_offset(s, rm), psz, psz);
501 }
502 return true;
503 }
504
505 /* Invoke a vector move on two Pregs. */
do_mov_p(DisasContext * s,int rd,int rn)506 static bool do_mov_p(DisasContext *s, int rd, int rn)
507 {
508 if (sve_access_check(s)) {
509 unsigned psz = pred_gvec_reg_size(s);
510 tcg_gen_gvec_mov(MO_8, pred_full_reg_offset(s, rd),
511 pred_full_reg_offset(s, rn), psz, psz);
512 }
513 return true;
514 }
515
516 /* Set the cpu flags as per a return from an SVE helper. */
do_pred_flags(TCGv_i32 t)517 static void do_pred_flags(TCGv_i32 t)
518 {
519 tcg_gen_mov_i32(cpu_NF, t);
520 tcg_gen_andi_i32(cpu_ZF, t, 2);
521 tcg_gen_andi_i32(cpu_CF, t, 1);
522 tcg_gen_movi_i32(cpu_VF, 0);
523 }
524
525 /* Subroutines computing the ARM PredTest psuedofunction. */
do_predtest1(TCGv_i64 d,TCGv_i64 g)526 static void do_predtest1(TCGv_i64 d, TCGv_i64 g)
527 {
528 TCGv_i32 t = tcg_temp_new_i32();
529
530 gen_helper_sve_predtest1(t, d, g);
531 do_pred_flags(t);
532 }
533
do_predtest(DisasContext * s,int dofs,int gofs,int words)534 static void do_predtest(DisasContext *s, int dofs, int gofs, int words)
535 {
536 TCGv_ptr dptr = tcg_temp_new_ptr();
537 TCGv_ptr gptr = tcg_temp_new_ptr();
538 TCGv_i32 t = tcg_temp_new_i32();
539
540 tcg_gen_addi_ptr(dptr, tcg_env, dofs);
541 tcg_gen_addi_ptr(gptr, tcg_env, gofs);
542
543 gen_helper_sve_predtest(t, dptr, gptr, tcg_constant_i32(words));
544
545 do_pred_flags(t);
546 }
547
548 /* For each element size, the bits within a predicate word that are active. */
549 const uint64_t pred_esz_masks[5] = {
550 0xffffffffffffffffull, 0x5555555555555555ull,
551 0x1111111111111111ull, 0x0101010101010101ull,
552 0x0001000100010001ull,
553 };
554
trans_INVALID(DisasContext * s,arg_INVALID * a)555 static bool trans_INVALID(DisasContext *s, arg_INVALID *a)
556 {
557 unallocated_encoding(s);
558 return true;
559 }
560
561 /*
562 *** SVE Logical - Unpredicated Group
563 */
564
TRANS_FEAT(AND_zzz,aa64_sve,gen_gvec_fn_arg_zzz,tcg_gen_gvec_and,a)565 TRANS_FEAT(AND_zzz, aa64_sve, gen_gvec_fn_arg_zzz, tcg_gen_gvec_and, a)
566 TRANS_FEAT(ORR_zzz, aa64_sve, gen_gvec_fn_arg_zzz, tcg_gen_gvec_or, a)
567 TRANS_FEAT(EOR_zzz, aa64_sve, gen_gvec_fn_arg_zzz, tcg_gen_gvec_xor, a)
568 TRANS_FEAT(BIC_zzz, aa64_sve, gen_gvec_fn_arg_zzz, tcg_gen_gvec_andc, a)
569
570 static bool trans_XAR(DisasContext *s, arg_rrri_esz *a)
571 {
572 if (a->esz < 0 || !dc_isar_feature(aa64_sve2, s)) {
573 return false;
574 }
575 if (sve_access_check(s)) {
576 unsigned vsz = vec_full_reg_size(s);
577 gen_gvec_xar(a->esz, vec_full_reg_offset(s, a->rd),
578 vec_full_reg_offset(s, a->rn),
579 vec_full_reg_offset(s, a->rm), a->imm, vsz, vsz);
580 }
581 return true;
582 }
583
TRANS_FEAT(EOR3,aa64_sve2,gen_gvec_fn_arg_zzzz,gen_gvec_eor3,a)584 TRANS_FEAT(EOR3, aa64_sve2, gen_gvec_fn_arg_zzzz, gen_gvec_eor3, a)
585 TRANS_FEAT(BCAX, aa64_sve2, gen_gvec_fn_arg_zzzz, gen_gvec_bcax, a)
586
587 static void gen_bsl(unsigned vece, uint32_t d, uint32_t n, uint32_t m,
588 uint32_t a, uint32_t oprsz, uint32_t maxsz)
589 {
590 /* BSL differs from the generic bitsel in argument ordering. */
591 tcg_gen_gvec_bitsel(vece, d, a, n, m, oprsz, maxsz);
592 }
593
TRANS_FEAT(BSL,aa64_sve2,gen_gvec_fn_arg_zzzz,gen_bsl,a)594 TRANS_FEAT(BSL, aa64_sve2, gen_gvec_fn_arg_zzzz, gen_bsl, a)
595
596 static void gen_bsl1n_i64(TCGv_i64 d, TCGv_i64 n, TCGv_i64 m, TCGv_i64 k)
597 {
598 tcg_gen_andc_i64(n, k, n);
599 tcg_gen_andc_i64(m, m, k);
600 tcg_gen_or_i64(d, n, m);
601 }
602
gen_bsl1n_vec(unsigned vece,TCGv_vec d,TCGv_vec n,TCGv_vec m,TCGv_vec k)603 static void gen_bsl1n_vec(unsigned vece, TCGv_vec d, TCGv_vec n,
604 TCGv_vec m, TCGv_vec k)
605 {
606 tcg_gen_not_vec(vece, n, n);
607 tcg_gen_bitsel_vec(vece, d, k, n, m);
608 }
609
gen_bsl1n(unsigned vece,uint32_t d,uint32_t n,uint32_t m,uint32_t a,uint32_t oprsz,uint32_t maxsz)610 static void gen_bsl1n(unsigned vece, uint32_t d, uint32_t n, uint32_t m,
611 uint32_t a, uint32_t oprsz, uint32_t maxsz)
612 {
613 static const GVecGen4 op = {
614 .fni8 = gen_bsl1n_i64,
615 .fniv = gen_bsl1n_vec,
616 .fno = gen_helper_sve2_bsl1n,
617 .vece = MO_64,
618 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
619 };
620 tcg_gen_gvec_4(d, n, m, a, oprsz, maxsz, &op);
621 }
622
TRANS_FEAT(BSL1N,aa64_sve2,gen_gvec_fn_arg_zzzz,gen_bsl1n,a)623 TRANS_FEAT(BSL1N, aa64_sve2, gen_gvec_fn_arg_zzzz, gen_bsl1n, a)
624
625 static void gen_bsl2n_i64(TCGv_i64 d, TCGv_i64 n, TCGv_i64 m, TCGv_i64 k)
626 {
627 /*
628 * Z[dn] = (n & k) | (~m & ~k)
629 * = | ~(m | k)
630 */
631 tcg_gen_and_i64(n, n, k);
632 if (tcg_op_supported(INDEX_op_orc_i64, TCG_TYPE_I64, 0)) {
633 tcg_gen_or_i64(m, m, k);
634 tcg_gen_orc_i64(d, n, m);
635 } else {
636 tcg_gen_nor_i64(m, m, k);
637 tcg_gen_or_i64(d, n, m);
638 }
639 }
640
gen_bsl2n_vec(unsigned vece,TCGv_vec d,TCGv_vec n,TCGv_vec m,TCGv_vec k)641 static void gen_bsl2n_vec(unsigned vece, TCGv_vec d, TCGv_vec n,
642 TCGv_vec m, TCGv_vec k)
643 {
644 tcg_gen_not_vec(vece, m, m);
645 tcg_gen_bitsel_vec(vece, d, k, n, m);
646 }
647
gen_bsl2n(unsigned vece,uint32_t d,uint32_t n,uint32_t m,uint32_t a,uint32_t oprsz,uint32_t maxsz)648 static void gen_bsl2n(unsigned vece, uint32_t d, uint32_t n, uint32_t m,
649 uint32_t a, uint32_t oprsz, uint32_t maxsz)
650 {
651 static const GVecGen4 op = {
652 .fni8 = gen_bsl2n_i64,
653 .fniv = gen_bsl2n_vec,
654 .fno = gen_helper_sve2_bsl2n,
655 .vece = MO_64,
656 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
657 };
658 tcg_gen_gvec_4(d, n, m, a, oprsz, maxsz, &op);
659 }
660
TRANS_FEAT(BSL2N,aa64_sve2,gen_gvec_fn_arg_zzzz,gen_bsl2n,a)661 TRANS_FEAT(BSL2N, aa64_sve2, gen_gvec_fn_arg_zzzz, gen_bsl2n, a)
662
663 static void gen_nbsl_i64(TCGv_i64 d, TCGv_i64 n, TCGv_i64 m, TCGv_i64 k)
664 {
665 tcg_gen_and_i64(n, n, k);
666 tcg_gen_andc_i64(m, m, k);
667 tcg_gen_nor_i64(d, n, m);
668 }
669
gen_nbsl_vec(unsigned vece,TCGv_vec d,TCGv_vec n,TCGv_vec m,TCGv_vec k)670 static void gen_nbsl_vec(unsigned vece, TCGv_vec d, TCGv_vec n,
671 TCGv_vec m, TCGv_vec k)
672 {
673 tcg_gen_bitsel_vec(vece, d, k, n, m);
674 tcg_gen_not_vec(vece, d, d);
675 }
676
gen_nbsl(unsigned vece,uint32_t d,uint32_t n,uint32_t m,uint32_t a,uint32_t oprsz,uint32_t maxsz)677 static void gen_nbsl(unsigned vece, uint32_t d, uint32_t n, uint32_t m,
678 uint32_t a, uint32_t oprsz, uint32_t maxsz)
679 {
680 static const GVecGen4 op = {
681 .fni8 = gen_nbsl_i64,
682 .fniv = gen_nbsl_vec,
683 .fno = gen_helper_sve2_nbsl,
684 .vece = MO_64,
685 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
686 };
687 tcg_gen_gvec_4(d, n, m, a, oprsz, maxsz, &op);
688 }
689
TRANS_FEAT(NBSL,aa64_sve2,gen_gvec_fn_arg_zzzz,gen_nbsl,a)690 TRANS_FEAT(NBSL, aa64_sve2, gen_gvec_fn_arg_zzzz, gen_nbsl, a)
691
692 /*
693 *** SVE Integer Arithmetic - Unpredicated Group
694 */
695
696 TRANS_FEAT(ADD_zzz, aa64_sve, gen_gvec_fn_arg_zzz, tcg_gen_gvec_add, a)
697 TRANS_FEAT(SUB_zzz, aa64_sve, gen_gvec_fn_arg_zzz, tcg_gen_gvec_sub, a)
698 TRANS_FEAT(SQADD_zzz, aa64_sve, gen_gvec_fn_arg_zzz, tcg_gen_gvec_ssadd, a)
699 TRANS_FEAT(SQSUB_zzz, aa64_sve, gen_gvec_fn_arg_zzz, tcg_gen_gvec_sssub, a)
700 TRANS_FEAT(UQADD_zzz, aa64_sve, gen_gvec_fn_arg_zzz, tcg_gen_gvec_usadd, a)
701 TRANS_FEAT(UQSUB_zzz, aa64_sve, gen_gvec_fn_arg_zzz, tcg_gen_gvec_ussub, a)
702
703 /*
704 *** SVE Integer Arithmetic - Binary Predicated Group
705 */
706
707 /* Select active elememnts from Zn and inactive elements from Zm,
708 * storing the result in Zd.
709 */
710 static bool do_sel_z(DisasContext *s, int rd, int rn, int rm, int pg, int esz)
711 {
712 static gen_helper_gvec_4 * const fns[4] = {
713 gen_helper_sve_sel_zpzz_b, gen_helper_sve_sel_zpzz_h,
714 gen_helper_sve_sel_zpzz_s, gen_helper_sve_sel_zpzz_d
715 };
716 return gen_gvec_ool_zzzp(s, fns[esz], rd, rn, rm, pg, 0);
717 }
718
719 #define DO_ZPZZ(NAME, FEAT, name) \
720 static gen_helper_gvec_4 * const name##_zpzz_fns[4] = { \
721 gen_helper_##name##_zpzz_b, gen_helper_##name##_zpzz_h, \
722 gen_helper_##name##_zpzz_s, gen_helper_##name##_zpzz_d, \
723 }; \
724 TRANS_FEAT(NAME, FEAT, gen_gvec_ool_arg_zpzz, \
725 name##_zpzz_fns[a->esz], a, 0)
726
727 DO_ZPZZ(AND_zpzz, aa64_sve, sve_and)
728 DO_ZPZZ(EOR_zpzz, aa64_sve, sve_eor)
729 DO_ZPZZ(ORR_zpzz, aa64_sve, sve_orr)
730 DO_ZPZZ(BIC_zpzz, aa64_sve, sve_bic)
731
732 DO_ZPZZ(ADD_zpzz, aa64_sve, sve_add)
733 DO_ZPZZ(SUB_zpzz, aa64_sve, sve_sub)
734
735 DO_ZPZZ(SMAX_zpzz, aa64_sve, sve_smax)
736 DO_ZPZZ(UMAX_zpzz, aa64_sve, sve_umax)
737 DO_ZPZZ(SMIN_zpzz, aa64_sve, sve_smin)
738 DO_ZPZZ(UMIN_zpzz, aa64_sve, sve_umin)
739 DO_ZPZZ(SABD_zpzz, aa64_sve, sve_sabd)
740 DO_ZPZZ(UABD_zpzz, aa64_sve, sve_uabd)
741
742 DO_ZPZZ(MUL_zpzz, aa64_sve, sve_mul)
743 DO_ZPZZ(SMULH_zpzz, aa64_sve, sve_smulh)
744 DO_ZPZZ(UMULH_zpzz, aa64_sve, sve_umulh)
745
746 DO_ZPZZ(ASR_zpzz, aa64_sve, sve_asr)
747 DO_ZPZZ(LSR_zpzz, aa64_sve, sve_lsr)
748 DO_ZPZZ(LSL_zpzz, aa64_sve, sve_lsl)
749
750 static gen_helper_gvec_4 * const sdiv_fns[4] = {
751 NULL, NULL, gen_helper_sve_sdiv_zpzz_s, gen_helper_sve_sdiv_zpzz_d
752 };
753 TRANS_FEAT(SDIV_zpzz, aa64_sve, gen_gvec_ool_arg_zpzz, sdiv_fns[a->esz], a, 0)
754
755 static gen_helper_gvec_4 * const udiv_fns[4] = {
756 NULL, NULL, gen_helper_sve_udiv_zpzz_s, gen_helper_sve_udiv_zpzz_d
757 };
758 TRANS_FEAT(UDIV_zpzz, aa64_sve, gen_gvec_ool_arg_zpzz, udiv_fns[a->esz], a, 0)
759
760 TRANS_FEAT(SEL_zpzz, aa64_sve, do_sel_z, a->rd, a->rn, a->rm, a->pg, a->esz)
761
762 /*
763 *** SVE Integer Arithmetic - Unary Predicated Group
764 */
765
766 #define DO_ZPZ(NAME, FEAT, name) \
767 static gen_helper_gvec_3 * const name##_fns[4] = { \
768 gen_helper_##name##_b, gen_helper_##name##_h, \
769 gen_helper_##name##_s, gen_helper_##name##_d, \
770 }; \
771 TRANS_FEAT(NAME, FEAT, gen_gvec_ool_arg_zpz, name##_fns[a->esz], a, 0)
772
773 DO_ZPZ(CLS, aa64_sve, sve_cls)
774 DO_ZPZ(CLZ, aa64_sve, sve_clz)
775 DO_ZPZ(CNT_zpz, aa64_sve, sve_cnt_zpz)
776 DO_ZPZ(CNOT, aa64_sve, sve_cnot)
777 DO_ZPZ(NOT_zpz, aa64_sve, sve_not_zpz)
778 DO_ZPZ(ABS, aa64_sve, sve_abs)
779 DO_ZPZ(NEG, aa64_sve, sve_neg)
780 DO_ZPZ(RBIT, aa64_sve, sve_rbit)
781
782 static gen_helper_gvec_3 * const fabs_fns[4] = {
783 NULL, gen_helper_sve_fabs_h,
784 gen_helper_sve_fabs_s, gen_helper_sve_fabs_d,
785 };
786 static gen_helper_gvec_3 * const fabs_ah_fns[4] = {
787 NULL, gen_helper_sve_ah_fabs_h,
788 gen_helper_sve_ah_fabs_s, gen_helper_sve_ah_fabs_d,
789 };
790 TRANS_FEAT(FABS, aa64_sve, gen_gvec_ool_arg_zpz,
791 s->fpcr_ah ? fabs_ah_fns[a->esz] : fabs_fns[a->esz], a, 0)
792
793 static gen_helper_gvec_3 * const fneg_fns[4] = {
794 NULL, gen_helper_sve_fneg_h,
795 gen_helper_sve_fneg_s, gen_helper_sve_fneg_d,
796 };
797 static gen_helper_gvec_3 * const fneg_ah_fns[4] = {
798 NULL, gen_helper_sve_ah_fneg_h,
799 gen_helper_sve_ah_fneg_s, gen_helper_sve_ah_fneg_d,
800 };
801 TRANS_FEAT(FNEG, aa64_sve, gen_gvec_ool_arg_zpz,
802 s->fpcr_ah ? fneg_ah_fns[a->esz] : fneg_fns[a->esz], a, 0)
803
804 static gen_helper_gvec_3 * const sxtb_fns[4] = {
805 NULL, gen_helper_sve_sxtb_h,
806 gen_helper_sve_sxtb_s, gen_helper_sve_sxtb_d,
807 };
808 TRANS_FEAT(SXTB, aa64_sve, gen_gvec_ool_arg_zpz, sxtb_fns[a->esz], a, 0)
809
810 static gen_helper_gvec_3 * const uxtb_fns[4] = {
811 NULL, gen_helper_sve_uxtb_h,
812 gen_helper_sve_uxtb_s, gen_helper_sve_uxtb_d,
813 };
814 TRANS_FEAT(UXTB, aa64_sve, gen_gvec_ool_arg_zpz, uxtb_fns[a->esz], a, 0)
815
816 static gen_helper_gvec_3 * const sxth_fns[4] = {
817 NULL, NULL, gen_helper_sve_sxth_s, gen_helper_sve_sxth_d
818 };
819 TRANS_FEAT(SXTH, aa64_sve, gen_gvec_ool_arg_zpz, sxth_fns[a->esz], a, 0)
820
821 static gen_helper_gvec_3 * const uxth_fns[4] = {
822 NULL, NULL, gen_helper_sve_uxth_s, gen_helper_sve_uxth_d
823 };
824 TRANS_FEAT(UXTH, aa64_sve, gen_gvec_ool_arg_zpz, uxth_fns[a->esz], a, 0)
825
826 TRANS_FEAT(SXTW, aa64_sve, gen_gvec_ool_arg_zpz,
827 a->esz == 3 ? gen_helper_sve_sxtw_d : NULL, a, 0)
828 TRANS_FEAT(UXTW, aa64_sve, gen_gvec_ool_arg_zpz,
829 a->esz == 3 ? gen_helper_sve_uxtw_d : NULL, a, 0)
830
831 /*
832 *** SVE Integer Reduction Group
833 */
834
835 typedef void gen_helper_gvec_reduc(TCGv_i64, TCGv_ptr, TCGv_ptr, TCGv_i32);
do_vpz_ool(DisasContext * s,arg_rpr_esz * a,gen_helper_gvec_reduc * fn)836 static bool do_vpz_ool(DisasContext *s, arg_rpr_esz *a,
837 gen_helper_gvec_reduc *fn)
838 {
839 unsigned vsz = vec_full_reg_size(s);
840 TCGv_ptr t_zn, t_pg;
841 TCGv_i32 desc;
842 TCGv_i64 temp;
843
844 if (fn == NULL) {
845 return false;
846 }
847 if (!sve_access_check(s)) {
848 return true;
849 }
850
851 desc = tcg_constant_i32(simd_desc(vsz, vsz, 0));
852 temp = tcg_temp_new_i64();
853 t_zn = tcg_temp_new_ptr();
854 t_pg = tcg_temp_new_ptr();
855
856 tcg_gen_addi_ptr(t_zn, tcg_env, vec_full_reg_offset(s, a->rn));
857 tcg_gen_addi_ptr(t_pg, tcg_env, pred_full_reg_offset(s, a->pg));
858 fn(temp, t_zn, t_pg, desc);
859
860 write_fp_dreg(s, a->rd, temp);
861 return true;
862 }
863
864 #define DO_VPZ(NAME, name) \
865 static gen_helper_gvec_reduc * const name##_fns[4] = { \
866 gen_helper_sve_##name##_b, gen_helper_sve_##name##_h, \
867 gen_helper_sve_##name##_s, gen_helper_sve_##name##_d, \
868 }; \
869 TRANS_FEAT(NAME, aa64_sve, do_vpz_ool, a, name##_fns[a->esz])
870
871 DO_VPZ(ORV, orv)
872 DO_VPZ(ANDV, andv)
873 DO_VPZ(EORV, eorv)
874
875 DO_VPZ(UADDV, uaddv)
876 DO_VPZ(SMAXV, smaxv)
877 DO_VPZ(UMAXV, umaxv)
878 DO_VPZ(SMINV, sminv)
879 DO_VPZ(UMINV, uminv)
880
881 static gen_helper_gvec_reduc * const saddv_fns[4] = {
882 gen_helper_sve_saddv_b, gen_helper_sve_saddv_h,
883 gen_helper_sve_saddv_s, NULL
884 };
TRANS_FEAT(SADDV,aa64_sve,do_vpz_ool,a,saddv_fns[a->esz])885 TRANS_FEAT(SADDV, aa64_sve, do_vpz_ool, a, saddv_fns[a->esz])
886
887 #undef DO_VPZ
888
889 /*
890 *** SVE Shift by Immediate - Predicated Group
891 */
892
893 /*
894 * Copy Zn into Zd, storing zeros into inactive elements.
895 * If invert, store zeros into the active elements.
896 */
897 static bool do_movz_zpz(DisasContext *s, int rd, int rn, int pg,
898 int esz, bool invert)
899 {
900 static gen_helper_gvec_3 * const fns[4] = {
901 gen_helper_sve_movz_b, gen_helper_sve_movz_h,
902 gen_helper_sve_movz_s, gen_helper_sve_movz_d,
903 };
904 return gen_gvec_ool_zzp(s, fns[esz], rd, rn, pg, invert);
905 }
906
do_shift_zpzi(DisasContext * s,arg_rpri_esz * a,bool asr,gen_helper_gvec_3 * const fns[4])907 static bool do_shift_zpzi(DisasContext *s, arg_rpri_esz *a, bool asr,
908 gen_helper_gvec_3 * const fns[4])
909 {
910 int max;
911
912 if (a->esz < 0) {
913 /* Invalid tsz encoding -- see tszimm_esz. */
914 return false;
915 }
916
917 /*
918 * Shift by element size is architecturally valid.
919 * For arithmetic right-shift, it's the same as by one less.
920 * For logical shifts and ASRD, it is a zeroing operation.
921 */
922 max = 8 << a->esz;
923 if (a->imm >= max) {
924 if (asr) {
925 a->imm = max - 1;
926 } else {
927 return do_movz_zpz(s, a->rd, a->rd, a->pg, a->esz, true);
928 }
929 }
930 return gen_gvec_ool_arg_zpzi(s, fns[a->esz], a);
931 }
932
933 static gen_helper_gvec_3 * const asr_zpzi_fns[4] = {
934 gen_helper_sve_asr_zpzi_b, gen_helper_sve_asr_zpzi_h,
935 gen_helper_sve_asr_zpzi_s, gen_helper_sve_asr_zpzi_d,
936 };
937 TRANS_FEAT(ASR_zpzi, aa64_sve, do_shift_zpzi, a, true, asr_zpzi_fns)
938
939 static gen_helper_gvec_3 * const lsr_zpzi_fns[4] = {
940 gen_helper_sve_lsr_zpzi_b, gen_helper_sve_lsr_zpzi_h,
941 gen_helper_sve_lsr_zpzi_s, gen_helper_sve_lsr_zpzi_d,
942 };
943 TRANS_FEAT(LSR_zpzi, aa64_sve, do_shift_zpzi, a, false, lsr_zpzi_fns)
944
945 static gen_helper_gvec_3 * const lsl_zpzi_fns[4] = {
946 gen_helper_sve_lsl_zpzi_b, gen_helper_sve_lsl_zpzi_h,
947 gen_helper_sve_lsl_zpzi_s, gen_helper_sve_lsl_zpzi_d,
948 };
949 TRANS_FEAT(LSL_zpzi, aa64_sve, do_shift_zpzi, a, false, lsl_zpzi_fns)
950
951 static gen_helper_gvec_3 * const asrd_fns[4] = {
952 gen_helper_sve_asrd_b, gen_helper_sve_asrd_h,
953 gen_helper_sve_asrd_s, gen_helper_sve_asrd_d,
954 };
955 TRANS_FEAT(ASRD, aa64_sve, do_shift_zpzi, a, false, asrd_fns)
956
957 static gen_helper_gvec_3 * const sqshl_zpzi_fns[4] = {
958 gen_helper_sve2_sqshl_zpzi_b, gen_helper_sve2_sqshl_zpzi_h,
959 gen_helper_sve2_sqshl_zpzi_s, gen_helper_sve2_sqshl_zpzi_d,
960 };
961 TRANS_FEAT(SQSHL_zpzi, aa64_sve2, gen_gvec_ool_arg_zpzi,
962 a->esz < 0 ? NULL : sqshl_zpzi_fns[a->esz], a)
963
964 static gen_helper_gvec_3 * const uqshl_zpzi_fns[4] = {
965 gen_helper_sve2_uqshl_zpzi_b, gen_helper_sve2_uqshl_zpzi_h,
966 gen_helper_sve2_uqshl_zpzi_s, gen_helper_sve2_uqshl_zpzi_d,
967 };
968 TRANS_FEAT(UQSHL_zpzi, aa64_sve2, gen_gvec_ool_arg_zpzi,
969 a->esz < 0 ? NULL : uqshl_zpzi_fns[a->esz], a)
970
971 static gen_helper_gvec_3 * const srshr_fns[4] = {
972 gen_helper_sve2_srshr_b, gen_helper_sve2_srshr_h,
973 gen_helper_sve2_srshr_s, gen_helper_sve2_srshr_d,
974 };
975 TRANS_FEAT(SRSHR, aa64_sve2, gen_gvec_ool_arg_zpzi,
976 a->esz < 0 ? NULL : srshr_fns[a->esz], a)
977
978 static gen_helper_gvec_3 * const urshr_fns[4] = {
979 gen_helper_sve2_urshr_b, gen_helper_sve2_urshr_h,
980 gen_helper_sve2_urshr_s, gen_helper_sve2_urshr_d,
981 };
982 TRANS_FEAT(URSHR, aa64_sve2, gen_gvec_ool_arg_zpzi,
983 a->esz < 0 ? NULL : urshr_fns[a->esz], a)
984
985 static gen_helper_gvec_3 * const sqshlu_fns[4] = {
986 gen_helper_sve2_sqshlu_b, gen_helper_sve2_sqshlu_h,
987 gen_helper_sve2_sqshlu_s, gen_helper_sve2_sqshlu_d,
988 };
989 TRANS_FEAT(SQSHLU, aa64_sve2, gen_gvec_ool_arg_zpzi,
990 a->esz < 0 ? NULL : sqshlu_fns[a->esz], a)
991
992 /*
993 *** SVE Bitwise Shift - Predicated Group
994 */
995
996 #define DO_ZPZW(NAME, name) \
997 static gen_helper_gvec_4 * const name##_zpzw_fns[4] = { \
998 gen_helper_sve_##name##_zpzw_b, gen_helper_sve_##name##_zpzw_h, \
999 gen_helper_sve_##name##_zpzw_s, NULL \
1000 }; \
1001 TRANS_FEAT(NAME##_zpzw, aa64_sve, gen_gvec_ool_arg_zpzz, \
1002 a->esz < 0 ? NULL : name##_zpzw_fns[a->esz], a, 0)
1003
DO_ZPZW(ASR,asr)1004 DO_ZPZW(ASR, asr)
1005 DO_ZPZW(LSR, lsr)
1006 DO_ZPZW(LSL, lsl)
1007
1008 #undef DO_ZPZW
1009
1010 /*
1011 *** SVE Bitwise Shift - Unpredicated Group
1012 */
1013
1014 static bool do_shift_imm(DisasContext *s, arg_rri_esz *a, bool asr,
1015 void (*gvec_fn)(unsigned, uint32_t, uint32_t,
1016 int64_t, uint32_t, uint32_t))
1017 {
1018 if (a->esz < 0) {
1019 /* Invalid tsz encoding -- see tszimm_esz. */
1020 return false;
1021 }
1022 if (sve_access_check(s)) {
1023 unsigned vsz = vec_full_reg_size(s);
1024 /* Shift by element size is architecturally valid. For
1025 arithmetic right-shift, it's the same as by one less.
1026 Otherwise it is a zeroing operation. */
1027 if (a->imm >= 8 << a->esz) {
1028 if (asr) {
1029 a->imm = (8 << a->esz) - 1;
1030 } else {
1031 do_dupi_z(s, a->rd, 0);
1032 return true;
1033 }
1034 }
1035 gvec_fn(a->esz, vec_full_reg_offset(s, a->rd),
1036 vec_full_reg_offset(s, a->rn), a->imm, vsz, vsz);
1037 }
1038 return true;
1039 }
1040
TRANS_FEAT(ASR_zzi,aa64_sve,do_shift_imm,a,true,tcg_gen_gvec_sari)1041 TRANS_FEAT(ASR_zzi, aa64_sve, do_shift_imm, a, true, tcg_gen_gvec_sari)
1042 TRANS_FEAT(LSR_zzi, aa64_sve, do_shift_imm, a, false, tcg_gen_gvec_shri)
1043 TRANS_FEAT(LSL_zzi, aa64_sve, do_shift_imm, a, false, tcg_gen_gvec_shli)
1044
1045 #define DO_ZZW(NAME, name) \
1046 static gen_helper_gvec_3 * const name##_zzw_fns[4] = { \
1047 gen_helper_sve_##name##_zzw_b, gen_helper_sve_##name##_zzw_h, \
1048 gen_helper_sve_##name##_zzw_s, NULL \
1049 }; \
1050 TRANS_FEAT(NAME, aa64_sve, gen_gvec_ool_arg_zzz, \
1051 name##_zzw_fns[a->esz], a, 0)
1052
1053 DO_ZZW(ASR_zzw, asr)
1054 DO_ZZW(LSR_zzw, lsr)
1055 DO_ZZW(LSL_zzw, lsl)
1056
1057 #undef DO_ZZW
1058
1059 /*
1060 *** SVE Integer Multiply-Add Group
1061 */
1062
1063 static bool do_zpzzz_ool(DisasContext *s, arg_rprrr_esz *a,
1064 gen_helper_gvec_5 *fn)
1065 {
1066 if (sve_access_check(s)) {
1067 unsigned vsz = vec_full_reg_size(s);
1068 tcg_gen_gvec_5_ool(vec_full_reg_offset(s, a->rd),
1069 vec_full_reg_offset(s, a->ra),
1070 vec_full_reg_offset(s, a->rn),
1071 vec_full_reg_offset(s, a->rm),
1072 pred_full_reg_offset(s, a->pg),
1073 vsz, vsz, 0, fn);
1074 }
1075 return true;
1076 }
1077
1078 static gen_helper_gvec_5 * const mla_fns[4] = {
1079 gen_helper_sve_mla_b, gen_helper_sve_mla_h,
1080 gen_helper_sve_mla_s, gen_helper_sve_mla_d,
1081 };
1082 TRANS_FEAT(MLA, aa64_sve, do_zpzzz_ool, a, mla_fns[a->esz])
1083
1084 static gen_helper_gvec_5 * const mls_fns[4] = {
1085 gen_helper_sve_mls_b, gen_helper_sve_mls_h,
1086 gen_helper_sve_mls_s, gen_helper_sve_mls_d,
1087 };
TRANS_FEAT(MLS,aa64_sve,do_zpzzz_ool,a,mls_fns[a->esz])1088 TRANS_FEAT(MLS, aa64_sve, do_zpzzz_ool, a, mls_fns[a->esz])
1089
1090 /*
1091 *** SVE Index Generation Group
1092 */
1093
1094 static bool do_index(DisasContext *s, int esz, int rd,
1095 TCGv_i64 start, TCGv_i64 incr)
1096 {
1097 unsigned vsz;
1098 TCGv_i32 desc;
1099 TCGv_ptr t_zd;
1100
1101 if (!sve_access_check(s)) {
1102 return true;
1103 }
1104
1105 vsz = vec_full_reg_size(s);
1106 desc = tcg_constant_i32(simd_desc(vsz, vsz, 0));
1107 t_zd = tcg_temp_new_ptr();
1108
1109 tcg_gen_addi_ptr(t_zd, tcg_env, vec_full_reg_offset(s, rd));
1110 if (esz == 3) {
1111 gen_helper_sve_index_d(t_zd, start, incr, desc);
1112 } else {
1113 typedef void index_fn(TCGv_ptr, TCGv_i32, TCGv_i32, TCGv_i32);
1114 static index_fn * const fns[3] = {
1115 gen_helper_sve_index_b,
1116 gen_helper_sve_index_h,
1117 gen_helper_sve_index_s,
1118 };
1119 TCGv_i32 s32 = tcg_temp_new_i32();
1120 TCGv_i32 i32 = tcg_temp_new_i32();
1121
1122 tcg_gen_extrl_i64_i32(s32, start);
1123 tcg_gen_extrl_i64_i32(i32, incr);
1124 fns[esz](t_zd, s32, i32, desc);
1125 }
1126 return true;
1127 }
1128
1129 TRANS_FEAT(INDEX_ii, aa64_sve, do_index, a->esz, a->rd,
1130 tcg_constant_i64(a->imm1), tcg_constant_i64(a->imm2))
1131 TRANS_FEAT(INDEX_ir, aa64_sve, do_index, a->esz, a->rd,
1132 tcg_constant_i64(a->imm), cpu_reg(s, a->rm))
1133 TRANS_FEAT(INDEX_ri, aa64_sve, do_index, a->esz, a->rd,
1134 cpu_reg(s, a->rn), tcg_constant_i64(a->imm))
1135 TRANS_FEAT(INDEX_rr, aa64_sve, do_index, a->esz, a->rd,
1136 cpu_reg(s, a->rn), cpu_reg(s, a->rm))
1137
1138 /*
1139 *** SVE Stack Allocation Group
1140 */
1141
trans_ADDVL(DisasContext * s,arg_ADDVL * a)1142 static bool trans_ADDVL(DisasContext *s, arg_ADDVL *a)
1143 {
1144 if (!dc_isar_feature(aa64_sve, s)) {
1145 return false;
1146 }
1147 if (sve_access_check(s)) {
1148 TCGv_i64 rd = cpu_reg_sp(s, a->rd);
1149 TCGv_i64 rn = cpu_reg_sp(s, a->rn);
1150 tcg_gen_addi_i64(rd, rn, a->imm * vec_full_reg_size(s));
1151 }
1152 return true;
1153 }
1154
trans_ADDSVL(DisasContext * s,arg_ADDSVL * a)1155 static bool trans_ADDSVL(DisasContext *s, arg_ADDSVL *a)
1156 {
1157 if (!dc_isar_feature(aa64_sme, s)) {
1158 return false;
1159 }
1160 if (sme_enabled_check(s)) {
1161 TCGv_i64 rd = cpu_reg_sp(s, a->rd);
1162 TCGv_i64 rn = cpu_reg_sp(s, a->rn);
1163 tcg_gen_addi_i64(rd, rn, a->imm * streaming_vec_reg_size(s));
1164 }
1165 return true;
1166 }
1167
trans_ADDPL(DisasContext * s,arg_ADDPL * a)1168 static bool trans_ADDPL(DisasContext *s, arg_ADDPL *a)
1169 {
1170 if (!dc_isar_feature(aa64_sve, s)) {
1171 return false;
1172 }
1173 if (sve_access_check(s)) {
1174 TCGv_i64 rd = cpu_reg_sp(s, a->rd);
1175 TCGv_i64 rn = cpu_reg_sp(s, a->rn);
1176 tcg_gen_addi_i64(rd, rn, a->imm * pred_full_reg_size(s));
1177 }
1178 return true;
1179 }
1180
trans_ADDSPL(DisasContext * s,arg_ADDSPL * a)1181 static bool trans_ADDSPL(DisasContext *s, arg_ADDSPL *a)
1182 {
1183 if (!dc_isar_feature(aa64_sme, s)) {
1184 return false;
1185 }
1186 if (sme_enabled_check(s)) {
1187 TCGv_i64 rd = cpu_reg_sp(s, a->rd);
1188 TCGv_i64 rn = cpu_reg_sp(s, a->rn);
1189 tcg_gen_addi_i64(rd, rn, a->imm * streaming_pred_reg_size(s));
1190 }
1191 return true;
1192 }
1193
trans_RDVL(DisasContext * s,arg_RDVL * a)1194 static bool trans_RDVL(DisasContext *s, arg_RDVL *a)
1195 {
1196 if (!dc_isar_feature(aa64_sve, s)) {
1197 return false;
1198 }
1199 if (sve_access_check(s)) {
1200 TCGv_i64 reg = cpu_reg(s, a->rd);
1201 tcg_gen_movi_i64(reg, a->imm * vec_full_reg_size(s));
1202 }
1203 return true;
1204 }
1205
trans_RDSVL(DisasContext * s,arg_RDSVL * a)1206 static bool trans_RDSVL(DisasContext *s, arg_RDSVL *a)
1207 {
1208 if (!dc_isar_feature(aa64_sme, s)) {
1209 return false;
1210 }
1211 if (sme_enabled_check(s)) {
1212 TCGv_i64 reg = cpu_reg(s, a->rd);
1213 tcg_gen_movi_i64(reg, a->imm * streaming_vec_reg_size(s));
1214 }
1215 return true;
1216 }
1217
1218 /*
1219 *** SVE Compute Vector Address Group
1220 */
1221
do_adr(DisasContext * s,arg_rrri * a,gen_helper_gvec_3 * fn)1222 static bool do_adr(DisasContext *s, arg_rrri *a, gen_helper_gvec_3 *fn)
1223 {
1224 return gen_gvec_ool_zzz(s, fn, a->rd, a->rn, a->rm, a->imm);
1225 }
1226
1227 TRANS_FEAT_NONSTREAMING(ADR_p32, aa64_sve, do_adr, a, gen_helper_sve_adr_p32)
1228 TRANS_FEAT_NONSTREAMING(ADR_p64, aa64_sve, do_adr, a, gen_helper_sve_adr_p64)
1229 TRANS_FEAT_NONSTREAMING(ADR_s32, aa64_sve, do_adr, a, gen_helper_sve_adr_s32)
1230 TRANS_FEAT_NONSTREAMING(ADR_u32, aa64_sve, do_adr, a, gen_helper_sve_adr_u32)
1231
1232 /*
1233 *** SVE Integer Misc - Unpredicated Group
1234 */
1235
1236 static gen_helper_gvec_2 * const fexpa_fns[4] = {
1237 NULL, gen_helper_sve_fexpa_h,
1238 gen_helper_sve_fexpa_s, gen_helper_sve_fexpa_d,
1239 };
1240 TRANS_FEAT_NONSTREAMING(FEXPA, aa64_sve, gen_gvec_ool_zz,
1241 fexpa_fns[a->esz], a->rd, a->rn, s->fpcr_ah)
1242
1243 static gen_helper_gvec_3 * const ftssel_fns[4] = {
1244 NULL, gen_helper_sve_ftssel_h,
1245 gen_helper_sve_ftssel_s, gen_helper_sve_ftssel_d,
1246 };
1247 TRANS_FEAT_NONSTREAMING(FTSSEL, aa64_sve, gen_gvec_ool_arg_zzz,
1248 ftssel_fns[a->esz], a, s->fpcr_ah)
1249
1250 /*
1251 *** SVE Predicate Logical Operations Group
1252 */
1253
do_pppp_flags(DisasContext * s,arg_rprr_s * a,const GVecGen4 * gvec_op)1254 static bool do_pppp_flags(DisasContext *s, arg_rprr_s *a,
1255 const GVecGen4 *gvec_op)
1256 {
1257 if (!sve_access_check(s)) {
1258 return true;
1259 }
1260
1261 unsigned psz = pred_gvec_reg_size(s);
1262 int dofs = pred_full_reg_offset(s, a->rd);
1263 int nofs = pred_full_reg_offset(s, a->rn);
1264 int mofs = pred_full_reg_offset(s, a->rm);
1265 int gofs = pred_full_reg_offset(s, a->pg);
1266
1267 if (!a->s) {
1268 tcg_gen_gvec_4(dofs, nofs, mofs, gofs, psz, psz, gvec_op);
1269 return true;
1270 }
1271
1272 if (psz == 8) {
1273 /* Do the operation and the flags generation in temps. */
1274 TCGv_i64 pd = tcg_temp_new_i64();
1275 TCGv_i64 pn = tcg_temp_new_i64();
1276 TCGv_i64 pm = tcg_temp_new_i64();
1277 TCGv_i64 pg = tcg_temp_new_i64();
1278
1279 tcg_gen_ld_i64(pn, tcg_env, nofs);
1280 tcg_gen_ld_i64(pm, tcg_env, mofs);
1281 tcg_gen_ld_i64(pg, tcg_env, gofs);
1282
1283 gvec_op->fni8(pd, pn, pm, pg);
1284 tcg_gen_st_i64(pd, tcg_env, dofs);
1285
1286 do_predtest1(pd, pg);
1287 } else {
1288 /* The operation and flags generation is large. The computation
1289 * of the flags depends on the original contents of the guarding
1290 * predicate. If the destination overwrites the guarding predicate,
1291 * then the easiest way to get this right is to save a copy.
1292 */
1293 int tofs = gofs;
1294 if (a->rd == a->pg) {
1295 tofs = offsetof(CPUARMState, vfp.preg_tmp);
1296 tcg_gen_gvec_mov(0, tofs, gofs, psz, psz);
1297 }
1298
1299 tcg_gen_gvec_4(dofs, nofs, mofs, gofs, psz, psz, gvec_op);
1300 do_predtest(s, dofs, tofs, psz / 8);
1301 }
1302 return true;
1303 }
1304
gen_and_pg_i64(TCGv_i64 pd,TCGv_i64 pn,TCGv_i64 pm,TCGv_i64 pg)1305 static void gen_and_pg_i64(TCGv_i64 pd, TCGv_i64 pn, TCGv_i64 pm, TCGv_i64 pg)
1306 {
1307 tcg_gen_and_i64(pd, pn, pm);
1308 tcg_gen_and_i64(pd, pd, pg);
1309 }
1310
gen_and_pg_vec(unsigned vece,TCGv_vec pd,TCGv_vec pn,TCGv_vec pm,TCGv_vec pg)1311 static void gen_and_pg_vec(unsigned vece, TCGv_vec pd, TCGv_vec pn,
1312 TCGv_vec pm, TCGv_vec pg)
1313 {
1314 tcg_gen_and_vec(vece, pd, pn, pm);
1315 tcg_gen_and_vec(vece, pd, pd, pg);
1316 }
1317
trans_AND_pppp(DisasContext * s,arg_rprr_s * a)1318 static bool trans_AND_pppp(DisasContext *s, arg_rprr_s *a)
1319 {
1320 static const GVecGen4 op = {
1321 .fni8 = gen_and_pg_i64,
1322 .fniv = gen_and_pg_vec,
1323 .fno = gen_helper_sve_and_pppp,
1324 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
1325 };
1326
1327 if (!dc_isar_feature(aa64_sve, s)) {
1328 return false;
1329 }
1330 if (!a->s) {
1331 if (a->rn == a->rm) {
1332 if (a->pg == a->rn) {
1333 return do_mov_p(s, a->rd, a->rn);
1334 }
1335 return gen_gvec_fn_ppp(s, tcg_gen_gvec_and, a->rd, a->rn, a->pg);
1336 } else if (a->pg == a->rn || a->pg == a->rm) {
1337 return gen_gvec_fn_ppp(s, tcg_gen_gvec_and, a->rd, a->rn, a->rm);
1338 }
1339 }
1340 return do_pppp_flags(s, a, &op);
1341 }
1342
gen_bic_pg_i64(TCGv_i64 pd,TCGv_i64 pn,TCGv_i64 pm,TCGv_i64 pg)1343 static void gen_bic_pg_i64(TCGv_i64 pd, TCGv_i64 pn, TCGv_i64 pm, TCGv_i64 pg)
1344 {
1345 tcg_gen_andc_i64(pd, pn, pm);
1346 tcg_gen_and_i64(pd, pd, pg);
1347 }
1348
gen_bic_pg_vec(unsigned vece,TCGv_vec pd,TCGv_vec pn,TCGv_vec pm,TCGv_vec pg)1349 static void gen_bic_pg_vec(unsigned vece, TCGv_vec pd, TCGv_vec pn,
1350 TCGv_vec pm, TCGv_vec pg)
1351 {
1352 tcg_gen_andc_vec(vece, pd, pn, pm);
1353 tcg_gen_and_vec(vece, pd, pd, pg);
1354 }
1355
trans_BIC_pppp(DisasContext * s,arg_rprr_s * a)1356 static bool trans_BIC_pppp(DisasContext *s, arg_rprr_s *a)
1357 {
1358 static const GVecGen4 op = {
1359 .fni8 = gen_bic_pg_i64,
1360 .fniv = gen_bic_pg_vec,
1361 .fno = gen_helper_sve_bic_pppp,
1362 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
1363 };
1364
1365 if (!dc_isar_feature(aa64_sve, s)) {
1366 return false;
1367 }
1368 if (!a->s && a->pg == a->rn) {
1369 return gen_gvec_fn_ppp(s, tcg_gen_gvec_andc, a->rd, a->rn, a->rm);
1370 }
1371 return do_pppp_flags(s, a, &op);
1372 }
1373
gen_eor_pg_i64(TCGv_i64 pd,TCGv_i64 pn,TCGv_i64 pm,TCGv_i64 pg)1374 static void gen_eor_pg_i64(TCGv_i64 pd, TCGv_i64 pn, TCGv_i64 pm, TCGv_i64 pg)
1375 {
1376 tcg_gen_xor_i64(pd, pn, pm);
1377 tcg_gen_and_i64(pd, pd, pg);
1378 }
1379
gen_eor_pg_vec(unsigned vece,TCGv_vec pd,TCGv_vec pn,TCGv_vec pm,TCGv_vec pg)1380 static void gen_eor_pg_vec(unsigned vece, TCGv_vec pd, TCGv_vec pn,
1381 TCGv_vec pm, TCGv_vec pg)
1382 {
1383 tcg_gen_xor_vec(vece, pd, pn, pm);
1384 tcg_gen_and_vec(vece, pd, pd, pg);
1385 }
1386
trans_EOR_pppp(DisasContext * s,arg_rprr_s * a)1387 static bool trans_EOR_pppp(DisasContext *s, arg_rprr_s *a)
1388 {
1389 static const GVecGen4 op = {
1390 .fni8 = gen_eor_pg_i64,
1391 .fniv = gen_eor_pg_vec,
1392 .fno = gen_helper_sve_eor_pppp,
1393 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
1394 };
1395
1396 if (!dc_isar_feature(aa64_sve, s)) {
1397 return false;
1398 }
1399 /* Alias NOT (predicate) is EOR Pd.B, Pg/Z, Pn.B, Pg.B */
1400 if (!a->s && a->pg == a->rm) {
1401 return gen_gvec_fn_ppp(s, tcg_gen_gvec_andc, a->rd, a->pg, a->rn);
1402 }
1403 return do_pppp_flags(s, a, &op);
1404 }
1405
trans_SEL_pppp(DisasContext * s,arg_rprr_s * a)1406 static bool trans_SEL_pppp(DisasContext *s, arg_rprr_s *a)
1407 {
1408 if (a->s || !dc_isar_feature(aa64_sve, s)) {
1409 return false;
1410 }
1411 if (sve_access_check(s)) {
1412 unsigned psz = pred_gvec_reg_size(s);
1413 tcg_gen_gvec_bitsel(MO_8, pred_full_reg_offset(s, a->rd),
1414 pred_full_reg_offset(s, a->pg),
1415 pred_full_reg_offset(s, a->rn),
1416 pred_full_reg_offset(s, a->rm), psz, psz);
1417 }
1418 return true;
1419 }
1420
gen_orr_pg_i64(TCGv_i64 pd,TCGv_i64 pn,TCGv_i64 pm,TCGv_i64 pg)1421 static void gen_orr_pg_i64(TCGv_i64 pd, TCGv_i64 pn, TCGv_i64 pm, TCGv_i64 pg)
1422 {
1423 tcg_gen_or_i64(pd, pn, pm);
1424 tcg_gen_and_i64(pd, pd, pg);
1425 }
1426
gen_orr_pg_vec(unsigned vece,TCGv_vec pd,TCGv_vec pn,TCGv_vec pm,TCGv_vec pg)1427 static void gen_orr_pg_vec(unsigned vece, TCGv_vec pd, TCGv_vec pn,
1428 TCGv_vec pm, TCGv_vec pg)
1429 {
1430 tcg_gen_or_vec(vece, pd, pn, pm);
1431 tcg_gen_and_vec(vece, pd, pd, pg);
1432 }
1433
trans_ORR_pppp(DisasContext * s,arg_rprr_s * a)1434 static bool trans_ORR_pppp(DisasContext *s, arg_rprr_s *a)
1435 {
1436 static const GVecGen4 op = {
1437 .fni8 = gen_orr_pg_i64,
1438 .fniv = gen_orr_pg_vec,
1439 .fno = gen_helper_sve_orr_pppp,
1440 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
1441 };
1442
1443 if (!dc_isar_feature(aa64_sve, s)) {
1444 return false;
1445 }
1446 if (!a->s && a->pg == a->rn && a->rn == a->rm) {
1447 return do_mov_p(s, a->rd, a->rn);
1448 }
1449 return do_pppp_flags(s, a, &op);
1450 }
1451
gen_orn_pg_i64(TCGv_i64 pd,TCGv_i64 pn,TCGv_i64 pm,TCGv_i64 pg)1452 static void gen_orn_pg_i64(TCGv_i64 pd, TCGv_i64 pn, TCGv_i64 pm, TCGv_i64 pg)
1453 {
1454 tcg_gen_orc_i64(pd, pn, pm);
1455 tcg_gen_and_i64(pd, pd, pg);
1456 }
1457
gen_orn_pg_vec(unsigned vece,TCGv_vec pd,TCGv_vec pn,TCGv_vec pm,TCGv_vec pg)1458 static void gen_orn_pg_vec(unsigned vece, TCGv_vec pd, TCGv_vec pn,
1459 TCGv_vec pm, TCGv_vec pg)
1460 {
1461 tcg_gen_orc_vec(vece, pd, pn, pm);
1462 tcg_gen_and_vec(vece, pd, pd, pg);
1463 }
1464
trans_ORN_pppp(DisasContext * s,arg_rprr_s * a)1465 static bool trans_ORN_pppp(DisasContext *s, arg_rprr_s *a)
1466 {
1467 static const GVecGen4 op = {
1468 .fni8 = gen_orn_pg_i64,
1469 .fniv = gen_orn_pg_vec,
1470 .fno = gen_helper_sve_orn_pppp,
1471 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
1472 };
1473
1474 if (!dc_isar_feature(aa64_sve, s)) {
1475 return false;
1476 }
1477 return do_pppp_flags(s, a, &op);
1478 }
1479
gen_nor_pg_i64(TCGv_i64 pd,TCGv_i64 pn,TCGv_i64 pm,TCGv_i64 pg)1480 static void gen_nor_pg_i64(TCGv_i64 pd, TCGv_i64 pn, TCGv_i64 pm, TCGv_i64 pg)
1481 {
1482 tcg_gen_or_i64(pd, pn, pm);
1483 tcg_gen_andc_i64(pd, pg, pd);
1484 }
1485
gen_nor_pg_vec(unsigned vece,TCGv_vec pd,TCGv_vec pn,TCGv_vec pm,TCGv_vec pg)1486 static void gen_nor_pg_vec(unsigned vece, TCGv_vec pd, TCGv_vec pn,
1487 TCGv_vec pm, TCGv_vec pg)
1488 {
1489 tcg_gen_or_vec(vece, pd, pn, pm);
1490 tcg_gen_andc_vec(vece, pd, pg, pd);
1491 }
1492
trans_NOR_pppp(DisasContext * s,arg_rprr_s * a)1493 static bool trans_NOR_pppp(DisasContext *s, arg_rprr_s *a)
1494 {
1495 static const GVecGen4 op = {
1496 .fni8 = gen_nor_pg_i64,
1497 .fniv = gen_nor_pg_vec,
1498 .fno = gen_helper_sve_nor_pppp,
1499 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
1500 };
1501
1502 if (!dc_isar_feature(aa64_sve, s)) {
1503 return false;
1504 }
1505 return do_pppp_flags(s, a, &op);
1506 }
1507
gen_nand_pg_i64(TCGv_i64 pd,TCGv_i64 pn,TCGv_i64 pm,TCGv_i64 pg)1508 static void gen_nand_pg_i64(TCGv_i64 pd, TCGv_i64 pn, TCGv_i64 pm, TCGv_i64 pg)
1509 {
1510 tcg_gen_and_i64(pd, pn, pm);
1511 tcg_gen_andc_i64(pd, pg, pd);
1512 }
1513
gen_nand_pg_vec(unsigned vece,TCGv_vec pd,TCGv_vec pn,TCGv_vec pm,TCGv_vec pg)1514 static void gen_nand_pg_vec(unsigned vece, TCGv_vec pd, TCGv_vec pn,
1515 TCGv_vec pm, TCGv_vec pg)
1516 {
1517 tcg_gen_and_vec(vece, pd, pn, pm);
1518 tcg_gen_andc_vec(vece, pd, pg, pd);
1519 }
1520
trans_NAND_pppp(DisasContext * s,arg_rprr_s * a)1521 static bool trans_NAND_pppp(DisasContext *s, arg_rprr_s *a)
1522 {
1523 static const GVecGen4 op = {
1524 .fni8 = gen_nand_pg_i64,
1525 .fniv = gen_nand_pg_vec,
1526 .fno = gen_helper_sve_nand_pppp,
1527 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
1528 };
1529
1530 if (!dc_isar_feature(aa64_sve, s)) {
1531 return false;
1532 }
1533 return do_pppp_flags(s, a, &op);
1534 }
1535
1536 /*
1537 *** SVE Predicate Misc Group
1538 */
1539
trans_PTEST(DisasContext * s,arg_PTEST * a)1540 static bool trans_PTEST(DisasContext *s, arg_PTEST *a)
1541 {
1542 if (!dc_isar_feature(aa64_sve, s)) {
1543 return false;
1544 }
1545 if (sve_access_check(s)) {
1546 int nofs = pred_full_reg_offset(s, a->rn);
1547 int gofs = pred_full_reg_offset(s, a->pg);
1548 int words = DIV_ROUND_UP(pred_full_reg_size(s), 8);
1549
1550 if (words == 1) {
1551 TCGv_i64 pn = tcg_temp_new_i64();
1552 TCGv_i64 pg = tcg_temp_new_i64();
1553
1554 tcg_gen_ld_i64(pn, tcg_env, nofs);
1555 tcg_gen_ld_i64(pg, tcg_env, gofs);
1556 do_predtest1(pn, pg);
1557 } else {
1558 do_predtest(s, nofs, gofs, words);
1559 }
1560 }
1561 return true;
1562 }
1563
1564 /* See the ARM pseudocode DecodePredCount. */
decode_pred_count(unsigned fullsz,int pattern,int esz)1565 static unsigned decode_pred_count(unsigned fullsz, int pattern, int esz)
1566 {
1567 unsigned elements = fullsz >> esz;
1568 unsigned bound;
1569
1570 switch (pattern) {
1571 case 0x0: /* POW2 */
1572 return pow2floor(elements);
1573 case 0x1: /* VL1 */
1574 case 0x2: /* VL2 */
1575 case 0x3: /* VL3 */
1576 case 0x4: /* VL4 */
1577 case 0x5: /* VL5 */
1578 case 0x6: /* VL6 */
1579 case 0x7: /* VL7 */
1580 case 0x8: /* VL8 */
1581 bound = pattern;
1582 break;
1583 case 0x9: /* VL16 */
1584 case 0xa: /* VL32 */
1585 case 0xb: /* VL64 */
1586 case 0xc: /* VL128 */
1587 case 0xd: /* VL256 */
1588 bound = 16 << (pattern - 9);
1589 break;
1590 case 0x1d: /* MUL4 */
1591 return elements - elements % 4;
1592 case 0x1e: /* MUL3 */
1593 return elements - elements % 3;
1594 case 0x1f: /* ALL */
1595 return elements;
1596 default: /* #uimm5 */
1597 return 0;
1598 }
1599 return elements >= bound ? bound : 0;
1600 }
1601
1602 /* This handles all of the predicate initialization instructions,
1603 * PTRUE, PFALSE, SETFFR. For PFALSE, we will have set PAT == 32
1604 * so that decode_pred_count returns 0. For SETFFR, we will have
1605 * set RD == 16 == FFR.
1606 */
do_predset(DisasContext * s,int esz,int rd,int pat,bool setflag)1607 static bool do_predset(DisasContext *s, int esz, int rd, int pat, bool setflag)
1608 {
1609 if (!sve_access_check(s)) {
1610 return true;
1611 }
1612
1613 unsigned fullsz = vec_full_reg_size(s);
1614 unsigned ofs = pred_full_reg_offset(s, rd);
1615 unsigned numelem, setsz, i;
1616 uint64_t word, lastword;
1617 TCGv_i64 t;
1618
1619 numelem = decode_pred_count(fullsz, pat, esz);
1620
1621 /* Determine what we must store into each bit, and how many. */
1622 if (numelem == 0) {
1623 lastword = word = 0;
1624 setsz = fullsz;
1625 } else {
1626 setsz = numelem << esz;
1627 lastword = word = pred_esz_masks[esz];
1628 if (setsz % 64) {
1629 lastword &= MAKE_64BIT_MASK(0, setsz % 64);
1630 }
1631 }
1632
1633 t = tcg_temp_new_i64();
1634 if (fullsz <= 64) {
1635 tcg_gen_movi_i64(t, lastword);
1636 tcg_gen_st_i64(t, tcg_env, ofs);
1637 goto done;
1638 }
1639
1640 if (word == lastword) {
1641 unsigned maxsz = size_for_gvec(fullsz / 8);
1642 unsigned oprsz = size_for_gvec(setsz / 8);
1643
1644 if (oprsz * 8 == setsz) {
1645 tcg_gen_gvec_dup_imm(MO_64, ofs, oprsz, maxsz, word);
1646 goto done;
1647 }
1648 }
1649
1650 setsz /= 8;
1651 fullsz /= 8;
1652
1653 tcg_gen_movi_i64(t, word);
1654 for (i = 0; i < QEMU_ALIGN_DOWN(setsz, 8); i += 8) {
1655 tcg_gen_st_i64(t, tcg_env, ofs + i);
1656 }
1657 if (lastword != word) {
1658 tcg_gen_movi_i64(t, lastword);
1659 tcg_gen_st_i64(t, tcg_env, ofs + i);
1660 i += 8;
1661 }
1662 if (i < fullsz) {
1663 tcg_gen_movi_i64(t, 0);
1664 for (; i < fullsz; i += 8) {
1665 tcg_gen_st_i64(t, tcg_env, ofs + i);
1666 }
1667 }
1668
1669 done:
1670 /* PTRUES */
1671 if (setflag) {
1672 tcg_gen_movi_i32(cpu_NF, -(word != 0));
1673 tcg_gen_movi_i32(cpu_CF, word == 0);
1674 tcg_gen_movi_i32(cpu_VF, 0);
1675 tcg_gen_mov_i32(cpu_ZF, cpu_NF);
1676 }
1677 return true;
1678 }
1679
1680 TRANS_FEAT(PTRUE, aa64_sve, do_predset, a->esz, a->rd, a->pat, a->s)
1681
1682 /* Note pat == 31 is #all, to set all elements. */
1683 TRANS_FEAT_NONSTREAMING(SETFFR, aa64_sve,
1684 do_predset, 0, FFR_PRED_NUM, 31, false)
1685
1686 /* Note pat == 32 is #unimp, to set no elements. */
1687 TRANS_FEAT(PFALSE, aa64_sve, do_predset, 0, a->rd, 32, false)
1688
trans_RDFFR_p(DisasContext * s,arg_RDFFR_p * a)1689 static bool trans_RDFFR_p(DisasContext *s, arg_RDFFR_p *a)
1690 {
1691 /* The path through do_pppp_flags is complicated enough to want to avoid
1692 * duplication. Frob the arguments into the form of a predicated AND.
1693 */
1694 arg_rprr_s alt_a = {
1695 .rd = a->rd, .pg = a->pg, .s = a->s,
1696 .rn = FFR_PRED_NUM, .rm = FFR_PRED_NUM,
1697 };
1698
1699 s->is_nonstreaming = true;
1700 return trans_AND_pppp(s, &alt_a);
1701 }
1702
1703 TRANS_FEAT_NONSTREAMING(RDFFR, aa64_sve, do_mov_p, a->rd, FFR_PRED_NUM)
1704 TRANS_FEAT_NONSTREAMING(WRFFR, aa64_sve, do_mov_p, FFR_PRED_NUM, a->rn)
1705
do_pfirst_pnext(DisasContext * s,arg_rr_esz * a,void (* gen_fn)(TCGv_i32,TCGv_ptr,TCGv_ptr,TCGv_i32))1706 static bool do_pfirst_pnext(DisasContext *s, arg_rr_esz *a,
1707 void (*gen_fn)(TCGv_i32, TCGv_ptr,
1708 TCGv_ptr, TCGv_i32))
1709 {
1710 if (!sve_access_check(s)) {
1711 return true;
1712 }
1713
1714 TCGv_ptr t_pd = tcg_temp_new_ptr();
1715 TCGv_ptr t_pg = tcg_temp_new_ptr();
1716 TCGv_i32 t;
1717 unsigned desc = 0;
1718
1719 desc = FIELD_DP32(desc, PREDDESC, OPRSZ, pred_full_reg_size(s));
1720 desc = FIELD_DP32(desc, PREDDESC, ESZ, a->esz);
1721
1722 tcg_gen_addi_ptr(t_pd, tcg_env, pred_full_reg_offset(s, a->rd));
1723 tcg_gen_addi_ptr(t_pg, tcg_env, pred_full_reg_offset(s, a->rn));
1724 t = tcg_temp_new_i32();
1725
1726 gen_fn(t, t_pd, t_pg, tcg_constant_i32(desc));
1727
1728 do_pred_flags(t);
1729 return true;
1730 }
1731
TRANS_FEAT(PFIRST,aa64_sve,do_pfirst_pnext,a,gen_helper_sve_pfirst)1732 TRANS_FEAT(PFIRST, aa64_sve, do_pfirst_pnext, a, gen_helper_sve_pfirst)
1733 TRANS_FEAT(PNEXT, aa64_sve, do_pfirst_pnext, a, gen_helper_sve_pnext)
1734
1735 /*
1736 *** SVE Element Count Group
1737 */
1738
1739 /* Perform an inline saturating addition of a 32-bit value within
1740 * a 64-bit register. The second operand is known to be positive,
1741 * which halves the comparisons we must perform to bound the result.
1742 */
1743 static void do_sat_addsub_32(TCGv_i64 reg, TCGv_i64 val, bool u, bool d)
1744 {
1745 int64_t ibound;
1746
1747 /* Use normal 64-bit arithmetic to detect 32-bit overflow. */
1748 if (u) {
1749 tcg_gen_ext32u_i64(reg, reg);
1750 } else {
1751 tcg_gen_ext32s_i64(reg, reg);
1752 }
1753 if (d) {
1754 tcg_gen_sub_i64(reg, reg, val);
1755 ibound = (u ? 0 : INT32_MIN);
1756 tcg_gen_smax_i64(reg, reg, tcg_constant_i64(ibound));
1757 } else {
1758 tcg_gen_add_i64(reg, reg, val);
1759 ibound = (u ? UINT32_MAX : INT32_MAX);
1760 tcg_gen_smin_i64(reg, reg, tcg_constant_i64(ibound));
1761 }
1762 }
1763
1764 /* Similarly with 64-bit values. */
do_sat_addsub_64(TCGv_i64 reg,TCGv_i64 val,bool u,bool d)1765 static void do_sat_addsub_64(TCGv_i64 reg, TCGv_i64 val, bool u, bool d)
1766 {
1767 TCGv_i64 t0 = tcg_temp_new_i64();
1768 TCGv_i64 t2;
1769
1770 if (u) {
1771 if (d) {
1772 tcg_gen_sub_i64(t0, reg, val);
1773 t2 = tcg_constant_i64(0);
1774 tcg_gen_movcond_i64(TCG_COND_LTU, reg, reg, val, t2, t0);
1775 } else {
1776 tcg_gen_add_i64(t0, reg, val);
1777 t2 = tcg_constant_i64(-1);
1778 tcg_gen_movcond_i64(TCG_COND_LTU, reg, t0, reg, t2, t0);
1779 }
1780 } else {
1781 TCGv_i64 t1 = tcg_temp_new_i64();
1782 if (d) {
1783 /* Detect signed overflow for subtraction. */
1784 tcg_gen_xor_i64(t0, reg, val);
1785 tcg_gen_sub_i64(t1, reg, val);
1786 tcg_gen_xor_i64(reg, reg, t1);
1787 tcg_gen_and_i64(t0, t0, reg);
1788
1789 /* Bound the result. */
1790 tcg_gen_movi_i64(reg, INT64_MIN);
1791 t2 = tcg_constant_i64(0);
1792 tcg_gen_movcond_i64(TCG_COND_LT, reg, t0, t2, reg, t1);
1793 } else {
1794 /* Detect signed overflow for addition. */
1795 tcg_gen_xor_i64(t0, reg, val);
1796 tcg_gen_add_i64(reg, reg, val);
1797 tcg_gen_xor_i64(t1, reg, val);
1798 tcg_gen_andc_i64(t0, t1, t0);
1799
1800 /* Bound the result. */
1801 tcg_gen_movi_i64(t1, INT64_MAX);
1802 t2 = tcg_constant_i64(0);
1803 tcg_gen_movcond_i64(TCG_COND_LT, reg, t0, t2, t1, reg);
1804 }
1805 }
1806 }
1807
1808 /* Similarly with a vector and a scalar operand. */
do_sat_addsub_vec(DisasContext * s,int esz,int rd,int rn,TCGv_i64 val,bool u,bool d)1809 static void do_sat_addsub_vec(DisasContext *s, int esz, int rd, int rn,
1810 TCGv_i64 val, bool u, bool d)
1811 {
1812 unsigned vsz = vec_full_reg_size(s);
1813 TCGv_ptr dptr, nptr;
1814 TCGv_i32 t32, desc;
1815 TCGv_i64 t64;
1816
1817 dptr = tcg_temp_new_ptr();
1818 nptr = tcg_temp_new_ptr();
1819 tcg_gen_addi_ptr(dptr, tcg_env, vec_full_reg_offset(s, rd));
1820 tcg_gen_addi_ptr(nptr, tcg_env, vec_full_reg_offset(s, rn));
1821 desc = tcg_constant_i32(simd_desc(vsz, vsz, 0));
1822
1823 switch (esz) {
1824 case MO_8:
1825 t32 = tcg_temp_new_i32();
1826 tcg_gen_extrl_i64_i32(t32, val);
1827 if (d) {
1828 tcg_gen_neg_i32(t32, t32);
1829 }
1830 if (u) {
1831 gen_helper_sve_uqaddi_b(dptr, nptr, t32, desc);
1832 } else {
1833 gen_helper_sve_sqaddi_b(dptr, nptr, t32, desc);
1834 }
1835 break;
1836
1837 case MO_16:
1838 t32 = tcg_temp_new_i32();
1839 tcg_gen_extrl_i64_i32(t32, val);
1840 if (d) {
1841 tcg_gen_neg_i32(t32, t32);
1842 }
1843 if (u) {
1844 gen_helper_sve_uqaddi_h(dptr, nptr, t32, desc);
1845 } else {
1846 gen_helper_sve_sqaddi_h(dptr, nptr, t32, desc);
1847 }
1848 break;
1849
1850 case MO_32:
1851 t64 = tcg_temp_new_i64();
1852 if (d) {
1853 tcg_gen_neg_i64(t64, val);
1854 } else {
1855 tcg_gen_mov_i64(t64, val);
1856 }
1857 if (u) {
1858 gen_helper_sve_uqaddi_s(dptr, nptr, t64, desc);
1859 } else {
1860 gen_helper_sve_sqaddi_s(dptr, nptr, t64, desc);
1861 }
1862 break;
1863
1864 case MO_64:
1865 if (u) {
1866 if (d) {
1867 gen_helper_sve_uqsubi_d(dptr, nptr, val, desc);
1868 } else {
1869 gen_helper_sve_uqaddi_d(dptr, nptr, val, desc);
1870 }
1871 } else if (d) {
1872 t64 = tcg_temp_new_i64();
1873 tcg_gen_neg_i64(t64, val);
1874 gen_helper_sve_sqaddi_d(dptr, nptr, t64, desc);
1875 } else {
1876 gen_helper_sve_sqaddi_d(dptr, nptr, val, desc);
1877 }
1878 break;
1879
1880 default:
1881 g_assert_not_reached();
1882 }
1883 }
1884
trans_CNT_r(DisasContext * s,arg_CNT_r * a)1885 static bool trans_CNT_r(DisasContext *s, arg_CNT_r *a)
1886 {
1887 if (!dc_isar_feature(aa64_sve, s)) {
1888 return false;
1889 }
1890 if (sve_access_check(s)) {
1891 unsigned fullsz = vec_full_reg_size(s);
1892 unsigned numelem = decode_pred_count(fullsz, a->pat, a->esz);
1893 tcg_gen_movi_i64(cpu_reg(s, a->rd), numelem * a->imm);
1894 }
1895 return true;
1896 }
1897
trans_INCDEC_r(DisasContext * s,arg_incdec_cnt * a)1898 static bool trans_INCDEC_r(DisasContext *s, arg_incdec_cnt *a)
1899 {
1900 if (!dc_isar_feature(aa64_sve, s)) {
1901 return false;
1902 }
1903 if (sve_access_check(s)) {
1904 unsigned fullsz = vec_full_reg_size(s);
1905 unsigned numelem = decode_pred_count(fullsz, a->pat, a->esz);
1906 int inc = numelem * a->imm * (a->d ? -1 : 1);
1907 TCGv_i64 reg = cpu_reg(s, a->rd);
1908
1909 tcg_gen_addi_i64(reg, reg, inc);
1910 }
1911 return true;
1912 }
1913
trans_SINCDEC_r_32(DisasContext * s,arg_incdec_cnt * a)1914 static bool trans_SINCDEC_r_32(DisasContext *s, arg_incdec_cnt *a)
1915 {
1916 if (!dc_isar_feature(aa64_sve, s)) {
1917 return false;
1918 }
1919 if (!sve_access_check(s)) {
1920 return true;
1921 }
1922
1923 unsigned fullsz = vec_full_reg_size(s);
1924 unsigned numelem = decode_pred_count(fullsz, a->pat, a->esz);
1925 int inc = numelem * a->imm;
1926 TCGv_i64 reg = cpu_reg(s, a->rd);
1927
1928 /* Use normal 64-bit arithmetic to detect 32-bit overflow. */
1929 if (inc == 0) {
1930 if (a->u) {
1931 tcg_gen_ext32u_i64(reg, reg);
1932 } else {
1933 tcg_gen_ext32s_i64(reg, reg);
1934 }
1935 } else {
1936 do_sat_addsub_32(reg, tcg_constant_i64(inc), a->u, a->d);
1937 }
1938 return true;
1939 }
1940
trans_SINCDEC_r_64(DisasContext * s,arg_incdec_cnt * a)1941 static bool trans_SINCDEC_r_64(DisasContext *s, arg_incdec_cnt *a)
1942 {
1943 if (!dc_isar_feature(aa64_sve, s)) {
1944 return false;
1945 }
1946 if (!sve_access_check(s)) {
1947 return true;
1948 }
1949
1950 unsigned fullsz = vec_full_reg_size(s);
1951 unsigned numelem = decode_pred_count(fullsz, a->pat, a->esz);
1952 int inc = numelem * a->imm;
1953 TCGv_i64 reg = cpu_reg(s, a->rd);
1954
1955 if (inc != 0) {
1956 do_sat_addsub_64(reg, tcg_constant_i64(inc), a->u, a->d);
1957 }
1958 return true;
1959 }
1960
trans_INCDEC_v(DisasContext * s,arg_incdec2_cnt * a)1961 static bool trans_INCDEC_v(DisasContext *s, arg_incdec2_cnt *a)
1962 {
1963 if (a->esz == 0 || !dc_isar_feature(aa64_sve, s)) {
1964 return false;
1965 }
1966
1967 unsigned fullsz = vec_full_reg_size(s);
1968 unsigned numelem = decode_pred_count(fullsz, a->pat, a->esz);
1969 int inc = numelem * a->imm;
1970
1971 if (inc != 0) {
1972 if (sve_access_check(s)) {
1973 tcg_gen_gvec_adds(a->esz, vec_full_reg_offset(s, a->rd),
1974 vec_full_reg_offset(s, a->rn),
1975 tcg_constant_i64(a->d ? -inc : inc),
1976 fullsz, fullsz);
1977 }
1978 } else {
1979 do_mov_z(s, a->rd, a->rn);
1980 }
1981 return true;
1982 }
1983
trans_SINCDEC_v(DisasContext * s,arg_incdec2_cnt * a)1984 static bool trans_SINCDEC_v(DisasContext *s, arg_incdec2_cnt *a)
1985 {
1986 if (a->esz == 0 || !dc_isar_feature(aa64_sve, s)) {
1987 return false;
1988 }
1989
1990 unsigned fullsz = vec_full_reg_size(s);
1991 unsigned numelem = decode_pred_count(fullsz, a->pat, a->esz);
1992 int inc = numelem * a->imm;
1993
1994 if (inc != 0) {
1995 if (sve_access_check(s)) {
1996 do_sat_addsub_vec(s, a->esz, a->rd, a->rn,
1997 tcg_constant_i64(inc), a->u, a->d);
1998 }
1999 } else {
2000 do_mov_z(s, a->rd, a->rn);
2001 }
2002 return true;
2003 }
2004
2005 /*
2006 *** SVE Bitwise Immediate Group
2007 */
2008
do_zz_dbm(DisasContext * s,arg_rr_dbm * a,GVecGen2iFn * gvec_fn)2009 static bool do_zz_dbm(DisasContext *s, arg_rr_dbm *a, GVecGen2iFn *gvec_fn)
2010 {
2011 uint64_t imm;
2012 if (!logic_imm_decode_wmask(&imm, extract32(a->dbm, 12, 1),
2013 extract32(a->dbm, 0, 6),
2014 extract32(a->dbm, 6, 6))) {
2015 return false;
2016 }
2017 return gen_gvec_fn_zzi(s, gvec_fn, MO_64, a->rd, a->rn, imm);
2018 }
2019
TRANS_FEAT(AND_zzi,aa64_sve,do_zz_dbm,a,tcg_gen_gvec_andi)2020 TRANS_FEAT(AND_zzi, aa64_sve, do_zz_dbm, a, tcg_gen_gvec_andi)
2021 TRANS_FEAT(ORR_zzi, aa64_sve, do_zz_dbm, a, tcg_gen_gvec_ori)
2022 TRANS_FEAT(EOR_zzi, aa64_sve, do_zz_dbm, a, tcg_gen_gvec_xori)
2023
2024 static bool trans_DUPM(DisasContext *s, arg_DUPM *a)
2025 {
2026 uint64_t imm;
2027
2028 if (!dc_isar_feature(aa64_sve, s)) {
2029 return false;
2030 }
2031 if (!logic_imm_decode_wmask(&imm, extract32(a->dbm, 12, 1),
2032 extract32(a->dbm, 0, 6),
2033 extract32(a->dbm, 6, 6))) {
2034 return false;
2035 }
2036 if (sve_access_check(s)) {
2037 do_dupi_z(s, a->rd, imm);
2038 }
2039 return true;
2040 }
2041
2042 /*
2043 *** SVE Integer Wide Immediate - Predicated Group
2044 */
2045
2046 /* Implement all merging copies. This is used for CPY (immediate),
2047 * FCPY, CPY (scalar), CPY (SIMD&FP scalar).
2048 */
do_cpy_m(DisasContext * s,int esz,int rd,int rn,int pg,TCGv_i64 val)2049 static void do_cpy_m(DisasContext *s, int esz, int rd, int rn, int pg,
2050 TCGv_i64 val)
2051 {
2052 typedef void gen_cpy(TCGv_ptr, TCGv_ptr, TCGv_ptr, TCGv_i64, TCGv_i32);
2053 static gen_cpy * const fns[4] = {
2054 gen_helper_sve_cpy_m_b, gen_helper_sve_cpy_m_h,
2055 gen_helper_sve_cpy_m_s, gen_helper_sve_cpy_m_d,
2056 };
2057 unsigned vsz = vec_full_reg_size(s);
2058 TCGv_i32 desc = tcg_constant_i32(simd_desc(vsz, vsz, 0));
2059 TCGv_ptr t_zd = tcg_temp_new_ptr();
2060 TCGv_ptr t_zn = tcg_temp_new_ptr();
2061 TCGv_ptr t_pg = tcg_temp_new_ptr();
2062
2063 tcg_gen_addi_ptr(t_zd, tcg_env, vec_full_reg_offset(s, rd));
2064 tcg_gen_addi_ptr(t_zn, tcg_env, vec_full_reg_offset(s, rn));
2065 tcg_gen_addi_ptr(t_pg, tcg_env, pred_full_reg_offset(s, pg));
2066
2067 fns[esz](t_zd, t_zn, t_pg, val, desc);
2068 }
2069
trans_FCPY(DisasContext * s,arg_FCPY * a)2070 static bool trans_FCPY(DisasContext *s, arg_FCPY *a)
2071 {
2072 if (a->esz == 0 || !dc_isar_feature(aa64_sve, s)) {
2073 return false;
2074 }
2075 if (sve_access_check(s)) {
2076 /* Decode the VFP immediate. */
2077 uint64_t imm = vfp_expand_imm(a->esz, a->imm);
2078 do_cpy_m(s, a->esz, a->rd, a->rn, a->pg, tcg_constant_i64(imm));
2079 }
2080 return true;
2081 }
2082
trans_CPY_m_i(DisasContext * s,arg_rpri_esz * a)2083 static bool trans_CPY_m_i(DisasContext *s, arg_rpri_esz *a)
2084 {
2085 if (!dc_isar_feature(aa64_sve, s)) {
2086 return false;
2087 }
2088 if (sve_access_check(s)) {
2089 do_cpy_m(s, a->esz, a->rd, a->rn, a->pg, tcg_constant_i64(a->imm));
2090 }
2091 return true;
2092 }
2093
trans_CPY_z_i(DisasContext * s,arg_CPY_z_i * a)2094 static bool trans_CPY_z_i(DisasContext *s, arg_CPY_z_i *a)
2095 {
2096 static gen_helper_gvec_2i * const fns[4] = {
2097 gen_helper_sve_cpy_z_b, gen_helper_sve_cpy_z_h,
2098 gen_helper_sve_cpy_z_s, gen_helper_sve_cpy_z_d,
2099 };
2100
2101 if (!dc_isar_feature(aa64_sve, s)) {
2102 return false;
2103 }
2104 if (sve_access_check(s)) {
2105 unsigned vsz = vec_full_reg_size(s);
2106 tcg_gen_gvec_2i_ool(vec_full_reg_offset(s, a->rd),
2107 pred_full_reg_offset(s, a->pg),
2108 tcg_constant_i64(a->imm),
2109 vsz, vsz, 0, fns[a->esz]);
2110 }
2111 return true;
2112 }
2113
2114 /*
2115 *** SVE Permute Extract Group
2116 */
2117
do_EXT(DisasContext * s,int rd,int rn,int rm,int imm)2118 static bool do_EXT(DisasContext *s, int rd, int rn, int rm, int imm)
2119 {
2120 if (!sve_access_check(s)) {
2121 return true;
2122 }
2123
2124 unsigned vsz = vec_full_reg_size(s);
2125 unsigned n_ofs = imm >= vsz ? 0 : imm;
2126 unsigned n_siz = vsz - n_ofs;
2127 unsigned d = vec_full_reg_offset(s, rd);
2128 unsigned n = vec_full_reg_offset(s, rn);
2129 unsigned m = vec_full_reg_offset(s, rm);
2130
2131 /* Use host vector move insns if we have appropriate sizes
2132 * and no unfortunate overlap.
2133 */
2134 if (m != d
2135 && n_ofs == size_for_gvec(n_ofs)
2136 && n_siz == size_for_gvec(n_siz)
2137 && (d != n || n_siz <= n_ofs)) {
2138 tcg_gen_gvec_mov(0, d, n + n_ofs, n_siz, n_siz);
2139 if (n_ofs != 0) {
2140 tcg_gen_gvec_mov(0, d + n_siz, m, n_ofs, n_ofs);
2141 }
2142 } else {
2143 tcg_gen_gvec_3_ool(d, n, m, vsz, vsz, n_ofs, gen_helper_sve_ext);
2144 }
2145 return true;
2146 }
2147
2148 TRANS_FEAT(EXT, aa64_sve, do_EXT, a->rd, a->rn, a->rm, a->imm)
2149 TRANS_FEAT(EXT_sve2, aa64_sve2, do_EXT, a->rd, a->rn, (a->rn + 1) % 32, a->imm)
2150
2151 /*
2152 *** SVE Permute - Unpredicated Group
2153 */
2154
trans_DUP_s(DisasContext * s,arg_DUP_s * a)2155 static bool trans_DUP_s(DisasContext *s, arg_DUP_s *a)
2156 {
2157 if (!dc_isar_feature(aa64_sve, s)) {
2158 return false;
2159 }
2160 if (sve_access_check(s)) {
2161 unsigned vsz = vec_full_reg_size(s);
2162 tcg_gen_gvec_dup_i64(a->esz, vec_full_reg_offset(s, a->rd),
2163 vsz, vsz, cpu_reg_sp(s, a->rn));
2164 }
2165 return true;
2166 }
2167
trans_DUP_x(DisasContext * s,arg_DUP_x * a)2168 static bool trans_DUP_x(DisasContext *s, arg_DUP_x *a)
2169 {
2170 if (!dc_isar_feature(aa64_sve, s)) {
2171 return false;
2172 }
2173 if ((a->imm & 0x1f) == 0) {
2174 return false;
2175 }
2176 if (sve_access_check(s)) {
2177 unsigned vsz = vec_full_reg_size(s);
2178 unsigned dofs = vec_full_reg_offset(s, a->rd);
2179 unsigned esz, index;
2180
2181 esz = ctz32(a->imm);
2182 index = a->imm >> (esz + 1);
2183
2184 if ((index << esz) < vsz) {
2185 unsigned nofs = vec_reg_offset(s, a->rn, index, esz);
2186 tcg_gen_gvec_dup_mem(esz, dofs, nofs, vsz, vsz);
2187 } else {
2188 /*
2189 * While dup_mem handles 128-bit elements, dup_imm does not.
2190 * Thankfully element size doesn't matter for splatting zero.
2191 */
2192 tcg_gen_gvec_dup_imm(MO_64, dofs, vsz, vsz, 0);
2193 }
2194 }
2195 return true;
2196 }
2197
do_insr_i64(DisasContext * s,arg_rrr_esz * a,TCGv_i64 val)2198 static void do_insr_i64(DisasContext *s, arg_rrr_esz *a, TCGv_i64 val)
2199 {
2200 typedef void gen_insr(TCGv_ptr, TCGv_ptr, TCGv_i64, TCGv_i32);
2201 static gen_insr * const fns[4] = {
2202 gen_helper_sve_insr_b, gen_helper_sve_insr_h,
2203 gen_helper_sve_insr_s, gen_helper_sve_insr_d,
2204 };
2205 unsigned vsz = vec_full_reg_size(s);
2206 TCGv_i32 desc = tcg_constant_i32(simd_desc(vsz, vsz, 0));
2207 TCGv_ptr t_zd = tcg_temp_new_ptr();
2208 TCGv_ptr t_zn = tcg_temp_new_ptr();
2209
2210 tcg_gen_addi_ptr(t_zd, tcg_env, vec_full_reg_offset(s, a->rd));
2211 tcg_gen_addi_ptr(t_zn, tcg_env, vec_full_reg_offset(s, a->rn));
2212
2213 fns[a->esz](t_zd, t_zn, val, desc);
2214 }
2215
trans_INSR_f(DisasContext * s,arg_rrr_esz * a)2216 static bool trans_INSR_f(DisasContext *s, arg_rrr_esz *a)
2217 {
2218 if (!dc_isar_feature(aa64_sve, s)) {
2219 return false;
2220 }
2221 if (sve_access_check(s)) {
2222 TCGv_i64 t = tcg_temp_new_i64();
2223 tcg_gen_ld_i64(t, tcg_env, vec_reg_offset(s, a->rm, 0, MO_64));
2224 do_insr_i64(s, a, t);
2225 }
2226 return true;
2227 }
2228
trans_INSR_r(DisasContext * s,arg_rrr_esz * a)2229 static bool trans_INSR_r(DisasContext *s, arg_rrr_esz *a)
2230 {
2231 if (!dc_isar_feature(aa64_sve, s)) {
2232 return false;
2233 }
2234 if (sve_access_check(s)) {
2235 do_insr_i64(s, a, cpu_reg(s, a->rm));
2236 }
2237 return true;
2238 }
2239
2240 static gen_helper_gvec_2 * const rev_fns[4] = {
2241 gen_helper_sve_rev_b, gen_helper_sve_rev_h,
2242 gen_helper_sve_rev_s, gen_helper_sve_rev_d
2243 };
2244 TRANS_FEAT(REV_v, aa64_sve, gen_gvec_ool_zz, rev_fns[a->esz], a->rd, a->rn, 0)
2245
2246 static gen_helper_gvec_3 * const sve_tbl_fns[4] = {
2247 gen_helper_sve_tbl_b, gen_helper_sve_tbl_h,
2248 gen_helper_sve_tbl_s, gen_helper_sve_tbl_d
2249 };
2250 TRANS_FEAT(TBL, aa64_sve, gen_gvec_ool_arg_zzz, sve_tbl_fns[a->esz], a, 0)
2251
2252 static gen_helper_gvec_4 * const sve2_tbl_fns[4] = {
2253 gen_helper_sve2_tbl_b, gen_helper_sve2_tbl_h,
2254 gen_helper_sve2_tbl_s, gen_helper_sve2_tbl_d
2255 };
2256 TRANS_FEAT(TBL_sve2, aa64_sve2, gen_gvec_ool_zzzz, sve2_tbl_fns[a->esz],
2257 a->rd, a->rn, (a->rn + 1) % 32, a->rm, 0)
2258
2259 static gen_helper_gvec_3 * const tbx_fns[4] = {
2260 gen_helper_sve2_tbx_b, gen_helper_sve2_tbx_h,
2261 gen_helper_sve2_tbx_s, gen_helper_sve2_tbx_d
2262 };
2263 TRANS_FEAT(TBX, aa64_sve2, gen_gvec_ool_arg_zzz, tbx_fns[a->esz], a, 0)
2264
trans_UNPK(DisasContext * s,arg_UNPK * a)2265 static bool trans_UNPK(DisasContext *s, arg_UNPK *a)
2266 {
2267 static gen_helper_gvec_2 * const fns[4][2] = {
2268 { NULL, NULL },
2269 { gen_helper_sve_sunpk_h, gen_helper_sve_uunpk_h },
2270 { gen_helper_sve_sunpk_s, gen_helper_sve_uunpk_s },
2271 { gen_helper_sve_sunpk_d, gen_helper_sve_uunpk_d },
2272 };
2273
2274 if (a->esz == 0 || !dc_isar_feature(aa64_sve, s)) {
2275 return false;
2276 }
2277 if (sve_access_check(s)) {
2278 unsigned vsz = vec_full_reg_size(s);
2279 tcg_gen_gvec_2_ool(vec_full_reg_offset(s, a->rd),
2280 vec_full_reg_offset(s, a->rn)
2281 + (a->h ? vsz / 2 : 0),
2282 vsz, vsz, 0, fns[a->esz][a->u]);
2283 }
2284 return true;
2285 }
2286
2287 /*
2288 *** SVE Permute - Predicates Group
2289 */
2290
do_perm_pred3(DisasContext * s,arg_rrr_esz * a,bool high_odd,gen_helper_gvec_3 * fn)2291 static bool do_perm_pred3(DisasContext *s, arg_rrr_esz *a, bool high_odd,
2292 gen_helper_gvec_3 *fn)
2293 {
2294 if (!sve_access_check(s)) {
2295 return true;
2296 }
2297
2298 unsigned vsz = pred_full_reg_size(s);
2299
2300 TCGv_ptr t_d = tcg_temp_new_ptr();
2301 TCGv_ptr t_n = tcg_temp_new_ptr();
2302 TCGv_ptr t_m = tcg_temp_new_ptr();
2303 uint32_t desc = 0;
2304
2305 desc = FIELD_DP32(desc, PREDDESC, OPRSZ, vsz);
2306 desc = FIELD_DP32(desc, PREDDESC, ESZ, a->esz);
2307 desc = FIELD_DP32(desc, PREDDESC, DATA, high_odd);
2308
2309 tcg_gen_addi_ptr(t_d, tcg_env, pred_full_reg_offset(s, a->rd));
2310 tcg_gen_addi_ptr(t_n, tcg_env, pred_full_reg_offset(s, a->rn));
2311 tcg_gen_addi_ptr(t_m, tcg_env, pred_full_reg_offset(s, a->rm));
2312
2313 fn(t_d, t_n, t_m, tcg_constant_i32(desc));
2314 return true;
2315 }
2316
do_perm_pred2(DisasContext * s,arg_rr_esz * a,bool high_odd,gen_helper_gvec_2 * fn)2317 static bool do_perm_pred2(DisasContext *s, arg_rr_esz *a, bool high_odd,
2318 gen_helper_gvec_2 *fn)
2319 {
2320 if (!sve_access_check(s)) {
2321 return true;
2322 }
2323
2324 unsigned vsz = pred_full_reg_size(s);
2325 TCGv_ptr t_d = tcg_temp_new_ptr();
2326 TCGv_ptr t_n = tcg_temp_new_ptr();
2327 uint32_t desc = 0;
2328
2329 tcg_gen_addi_ptr(t_d, tcg_env, pred_full_reg_offset(s, a->rd));
2330 tcg_gen_addi_ptr(t_n, tcg_env, pred_full_reg_offset(s, a->rn));
2331
2332 desc = FIELD_DP32(desc, PREDDESC, OPRSZ, vsz);
2333 desc = FIELD_DP32(desc, PREDDESC, ESZ, a->esz);
2334 desc = FIELD_DP32(desc, PREDDESC, DATA, high_odd);
2335
2336 fn(t_d, t_n, tcg_constant_i32(desc));
2337 return true;
2338 }
2339
2340 TRANS_FEAT(ZIP1_p, aa64_sve, do_perm_pred3, a, 0, gen_helper_sve_zip_p)
2341 TRANS_FEAT(ZIP2_p, aa64_sve, do_perm_pred3, a, 1, gen_helper_sve_zip_p)
2342 TRANS_FEAT(UZP1_p, aa64_sve, do_perm_pred3, a, 0, gen_helper_sve_uzp_p)
2343 TRANS_FEAT(UZP2_p, aa64_sve, do_perm_pred3, a, 1, gen_helper_sve_uzp_p)
2344 TRANS_FEAT(TRN1_p, aa64_sve, do_perm_pred3, a, 0, gen_helper_sve_trn_p)
2345 TRANS_FEAT(TRN2_p, aa64_sve, do_perm_pred3, a, 1, gen_helper_sve_trn_p)
2346
2347 TRANS_FEAT(REV_p, aa64_sve, do_perm_pred2, a, 0, gen_helper_sve_rev_p)
2348 TRANS_FEAT(PUNPKLO, aa64_sve, do_perm_pred2, a, 0, gen_helper_sve_punpk_p)
2349 TRANS_FEAT(PUNPKHI, aa64_sve, do_perm_pred2, a, 1, gen_helper_sve_punpk_p)
2350
2351 /*
2352 *** SVE Permute - Interleaving Group
2353 */
2354
do_interleave_q(DisasContext * s,gen_helper_gvec_3 * fn,arg_rrr_esz * a,int data)2355 static bool do_interleave_q(DisasContext *s, gen_helper_gvec_3 *fn,
2356 arg_rrr_esz *a, int data)
2357 {
2358 if (sve_access_check(s)) {
2359 unsigned vsz = vec_full_reg_size(s);
2360 if (vsz < 32) {
2361 unallocated_encoding(s);
2362 } else {
2363 tcg_gen_gvec_3_ool(vec_full_reg_offset(s, a->rd),
2364 vec_full_reg_offset(s, a->rn),
2365 vec_full_reg_offset(s, a->rm),
2366 vsz, vsz, data, fn);
2367 }
2368 }
2369 return true;
2370 }
2371
2372 static gen_helper_gvec_3 * const zip_fns[4] = {
2373 gen_helper_sve_zip_b, gen_helper_sve_zip_h,
2374 gen_helper_sve_zip_s, gen_helper_sve_zip_d,
2375 };
2376 TRANS_FEAT(ZIP1_z, aa64_sve, gen_gvec_ool_arg_zzz,
2377 zip_fns[a->esz], a, 0)
2378 TRANS_FEAT(ZIP2_z, aa64_sve, gen_gvec_ool_arg_zzz,
2379 zip_fns[a->esz], a, vec_full_reg_size(s) / 2)
2380
2381 TRANS_FEAT_NONSTREAMING(ZIP1_q, aa64_sve_f64mm, do_interleave_q,
2382 gen_helper_sve2_zip_q, a, 0)
2383 TRANS_FEAT_NONSTREAMING(ZIP2_q, aa64_sve_f64mm, do_interleave_q,
2384 gen_helper_sve2_zip_q, a,
2385 QEMU_ALIGN_DOWN(vec_full_reg_size(s), 32) / 2)
2386
2387 static gen_helper_gvec_3 * const uzp_fns[4] = {
2388 gen_helper_sve_uzp_b, gen_helper_sve_uzp_h,
2389 gen_helper_sve_uzp_s, gen_helper_sve_uzp_d,
2390 };
2391
2392 TRANS_FEAT(UZP1_z, aa64_sve, gen_gvec_ool_arg_zzz,
2393 uzp_fns[a->esz], a, 0)
2394 TRANS_FEAT(UZP2_z, aa64_sve, gen_gvec_ool_arg_zzz,
2395 uzp_fns[a->esz], a, 1 << a->esz)
2396
2397 TRANS_FEAT_NONSTREAMING(UZP1_q, aa64_sve_f64mm, do_interleave_q,
2398 gen_helper_sve2_uzp_q, a, 0)
2399 TRANS_FEAT_NONSTREAMING(UZP2_q, aa64_sve_f64mm, do_interleave_q,
2400 gen_helper_sve2_uzp_q, a, 16)
2401
2402 static gen_helper_gvec_3 * const trn_fns[4] = {
2403 gen_helper_sve_trn_b, gen_helper_sve_trn_h,
2404 gen_helper_sve_trn_s, gen_helper_sve_trn_d,
2405 };
2406
2407 TRANS_FEAT(TRN1_z, aa64_sve, gen_gvec_ool_arg_zzz,
2408 trn_fns[a->esz], a, 0)
2409 TRANS_FEAT(TRN2_z, aa64_sve, gen_gvec_ool_arg_zzz,
2410 trn_fns[a->esz], a, 1 << a->esz)
2411
2412 TRANS_FEAT_NONSTREAMING(TRN1_q, aa64_sve_f64mm, do_interleave_q,
2413 gen_helper_sve2_trn_q, a, 0)
2414 TRANS_FEAT_NONSTREAMING(TRN2_q, aa64_sve_f64mm, do_interleave_q,
2415 gen_helper_sve2_trn_q, a, 16)
2416
2417 /*
2418 *** SVE Permute Vector - Predicated Group
2419 */
2420
2421 static gen_helper_gvec_3 * const compact_fns[4] = {
2422 NULL, NULL, gen_helper_sve_compact_s, gen_helper_sve_compact_d
2423 };
2424 TRANS_FEAT_NONSTREAMING(COMPACT, aa64_sve, gen_gvec_ool_arg_zpz,
2425 compact_fns[a->esz], a, 0)
2426
2427 /* Call the helper that computes the ARM LastActiveElement pseudocode
2428 * function, scaled by the element size. This includes the not found
2429 * indication; e.g. not found for esz=3 is -8.
2430 */
find_last_active(DisasContext * s,TCGv_i32 ret,int esz,int pg)2431 static void find_last_active(DisasContext *s, TCGv_i32 ret, int esz, int pg)
2432 {
2433 /* Predicate sizes may be smaller and cannot use simd_desc. We cannot
2434 * round up, as we do elsewhere, because we need the exact size.
2435 */
2436 TCGv_ptr t_p = tcg_temp_new_ptr();
2437 unsigned desc = 0;
2438
2439 desc = FIELD_DP32(desc, PREDDESC, OPRSZ, pred_full_reg_size(s));
2440 desc = FIELD_DP32(desc, PREDDESC, ESZ, esz);
2441
2442 tcg_gen_addi_ptr(t_p, tcg_env, pred_full_reg_offset(s, pg));
2443
2444 gen_helper_sve_last_active_element(ret, t_p, tcg_constant_i32(desc));
2445 }
2446
2447 /* Increment LAST to the offset of the next element in the vector,
2448 * wrapping around to 0.
2449 */
incr_last_active(DisasContext * s,TCGv_i32 last,int esz)2450 static void incr_last_active(DisasContext *s, TCGv_i32 last, int esz)
2451 {
2452 unsigned vsz = vec_full_reg_size(s);
2453
2454 tcg_gen_addi_i32(last, last, 1 << esz);
2455 if (is_power_of_2(vsz)) {
2456 tcg_gen_andi_i32(last, last, vsz - 1);
2457 } else {
2458 TCGv_i32 max = tcg_constant_i32(vsz);
2459 TCGv_i32 zero = tcg_constant_i32(0);
2460 tcg_gen_movcond_i32(TCG_COND_GEU, last, last, max, zero, last);
2461 }
2462 }
2463
2464 /* If LAST < 0, set LAST to the offset of the last element in the vector. */
wrap_last_active(DisasContext * s,TCGv_i32 last,int esz)2465 static void wrap_last_active(DisasContext *s, TCGv_i32 last, int esz)
2466 {
2467 unsigned vsz = vec_full_reg_size(s);
2468
2469 if (is_power_of_2(vsz)) {
2470 tcg_gen_andi_i32(last, last, vsz - 1);
2471 } else {
2472 TCGv_i32 max = tcg_constant_i32(vsz - (1 << esz));
2473 TCGv_i32 zero = tcg_constant_i32(0);
2474 tcg_gen_movcond_i32(TCG_COND_LT, last, last, zero, max, last);
2475 }
2476 }
2477
2478 /* Load an unsigned element of ESZ from BASE+OFS. */
load_esz(TCGv_ptr base,int ofs,int esz)2479 static TCGv_i64 load_esz(TCGv_ptr base, int ofs, int esz)
2480 {
2481 TCGv_i64 r = tcg_temp_new_i64();
2482
2483 switch (esz) {
2484 case 0:
2485 tcg_gen_ld8u_i64(r, base, ofs);
2486 break;
2487 case 1:
2488 tcg_gen_ld16u_i64(r, base, ofs);
2489 break;
2490 case 2:
2491 tcg_gen_ld32u_i64(r, base, ofs);
2492 break;
2493 case 3:
2494 tcg_gen_ld_i64(r, base, ofs);
2495 break;
2496 default:
2497 g_assert_not_reached();
2498 }
2499 return r;
2500 }
2501
2502 /* Load an unsigned element of ESZ from RM[LAST]. */
load_last_active(DisasContext * s,TCGv_i32 last,int rm,int esz)2503 static TCGv_i64 load_last_active(DisasContext *s, TCGv_i32 last,
2504 int rm, int esz)
2505 {
2506 TCGv_ptr p = tcg_temp_new_ptr();
2507
2508 /* Convert offset into vector into offset into ENV.
2509 * The final adjustment for the vector register base
2510 * is added via constant offset to the load.
2511 */
2512 #if HOST_BIG_ENDIAN
2513 /* Adjust for element ordering. See vec_reg_offset. */
2514 if (esz < 3) {
2515 tcg_gen_xori_i32(last, last, 8 - (1 << esz));
2516 }
2517 #endif
2518 tcg_gen_ext_i32_ptr(p, last);
2519 tcg_gen_add_ptr(p, p, tcg_env);
2520
2521 return load_esz(p, vec_full_reg_offset(s, rm), esz);
2522 }
2523
2524 /* Compute CLAST for a Zreg. */
do_clast_vector(DisasContext * s,arg_rprr_esz * a,bool before)2525 static bool do_clast_vector(DisasContext *s, arg_rprr_esz *a, bool before)
2526 {
2527 TCGv_i32 last;
2528 TCGLabel *over;
2529 TCGv_i64 ele;
2530 unsigned vsz, esz = a->esz;
2531
2532 if (!sve_access_check(s)) {
2533 return true;
2534 }
2535
2536 last = tcg_temp_new_i32();
2537 over = gen_new_label();
2538
2539 find_last_active(s, last, esz, a->pg);
2540
2541 /* There is of course no movcond for a 2048-bit vector,
2542 * so we must branch over the actual store.
2543 */
2544 tcg_gen_brcondi_i32(TCG_COND_LT, last, 0, over);
2545
2546 if (!before) {
2547 incr_last_active(s, last, esz);
2548 }
2549
2550 ele = load_last_active(s, last, a->rm, esz);
2551
2552 vsz = vec_full_reg_size(s);
2553 tcg_gen_gvec_dup_i64(esz, vec_full_reg_offset(s, a->rd), vsz, vsz, ele);
2554
2555 /* If this insn used MOVPRFX, we may need a second move. */
2556 if (a->rd != a->rn) {
2557 TCGLabel *done = gen_new_label();
2558 tcg_gen_br(done);
2559
2560 gen_set_label(over);
2561 do_mov_z(s, a->rd, a->rn);
2562
2563 gen_set_label(done);
2564 } else {
2565 gen_set_label(over);
2566 }
2567 return true;
2568 }
2569
TRANS_FEAT(CLASTA_z,aa64_sve,do_clast_vector,a,false)2570 TRANS_FEAT(CLASTA_z, aa64_sve, do_clast_vector, a, false)
2571 TRANS_FEAT(CLASTB_z, aa64_sve, do_clast_vector, a, true)
2572
2573 /* Compute CLAST for a scalar. */
2574 static void do_clast_scalar(DisasContext *s, int esz, int pg, int rm,
2575 bool before, TCGv_i64 reg_val)
2576 {
2577 TCGv_i32 last = tcg_temp_new_i32();
2578 TCGv_i64 ele, cmp;
2579
2580 find_last_active(s, last, esz, pg);
2581
2582 /* Extend the original value of last prior to incrementing. */
2583 cmp = tcg_temp_new_i64();
2584 tcg_gen_ext_i32_i64(cmp, last);
2585
2586 if (!before) {
2587 incr_last_active(s, last, esz);
2588 }
2589
2590 /* The conceit here is that while last < 0 indicates not found, after
2591 * adjusting for tcg_env->vfp.zregs[rm], it is still a valid address
2592 * from which we can load garbage. We then discard the garbage with
2593 * a conditional move.
2594 */
2595 ele = load_last_active(s, last, rm, esz);
2596
2597 tcg_gen_movcond_i64(TCG_COND_GE, reg_val, cmp, tcg_constant_i64(0),
2598 ele, reg_val);
2599 }
2600
2601 /* Compute CLAST for a Vreg. */
do_clast_fp(DisasContext * s,arg_rpr_esz * a,bool before)2602 static bool do_clast_fp(DisasContext *s, arg_rpr_esz *a, bool before)
2603 {
2604 if (sve_access_check(s)) {
2605 int esz = a->esz;
2606 int ofs = vec_reg_offset(s, a->rd, 0, esz);
2607 TCGv_i64 reg = load_esz(tcg_env, ofs, esz);
2608
2609 do_clast_scalar(s, esz, a->pg, a->rn, before, reg);
2610 write_fp_dreg(s, a->rd, reg);
2611 }
2612 return true;
2613 }
2614
TRANS_FEAT(CLASTA_v,aa64_sve,do_clast_fp,a,false)2615 TRANS_FEAT(CLASTA_v, aa64_sve, do_clast_fp, a, false)
2616 TRANS_FEAT(CLASTB_v, aa64_sve, do_clast_fp, a, true)
2617
2618 /* Compute CLAST for a Xreg. */
2619 static bool do_clast_general(DisasContext *s, arg_rpr_esz *a, bool before)
2620 {
2621 TCGv_i64 reg;
2622
2623 if (!sve_access_check(s)) {
2624 return true;
2625 }
2626
2627 reg = cpu_reg(s, a->rd);
2628 switch (a->esz) {
2629 case 0:
2630 tcg_gen_ext8u_i64(reg, reg);
2631 break;
2632 case 1:
2633 tcg_gen_ext16u_i64(reg, reg);
2634 break;
2635 case 2:
2636 tcg_gen_ext32u_i64(reg, reg);
2637 break;
2638 case 3:
2639 break;
2640 default:
2641 g_assert_not_reached();
2642 }
2643
2644 do_clast_scalar(s, a->esz, a->pg, a->rn, before, reg);
2645 return true;
2646 }
2647
TRANS_FEAT(CLASTA_r,aa64_sve,do_clast_general,a,false)2648 TRANS_FEAT(CLASTA_r, aa64_sve, do_clast_general, a, false)
2649 TRANS_FEAT(CLASTB_r, aa64_sve, do_clast_general, a, true)
2650
2651 /* Compute LAST for a scalar. */
2652 static TCGv_i64 do_last_scalar(DisasContext *s, int esz,
2653 int pg, int rm, bool before)
2654 {
2655 TCGv_i32 last = tcg_temp_new_i32();
2656
2657 find_last_active(s, last, esz, pg);
2658 if (before) {
2659 wrap_last_active(s, last, esz);
2660 } else {
2661 incr_last_active(s, last, esz);
2662 }
2663
2664 return load_last_active(s, last, rm, esz);
2665 }
2666
2667 /* Compute LAST for a Vreg. */
do_last_fp(DisasContext * s,arg_rpr_esz * a,bool before)2668 static bool do_last_fp(DisasContext *s, arg_rpr_esz *a, bool before)
2669 {
2670 if (sve_access_check(s)) {
2671 TCGv_i64 val = do_last_scalar(s, a->esz, a->pg, a->rn, before);
2672 write_fp_dreg(s, a->rd, val);
2673 }
2674 return true;
2675 }
2676
TRANS_FEAT(LASTA_v,aa64_sve,do_last_fp,a,false)2677 TRANS_FEAT(LASTA_v, aa64_sve, do_last_fp, a, false)
2678 TRANS_FEAT(LASTB_v, aa64_sve, do_last_fp, a, true)
2679
2680 /* Compute LAST for a Xreg. */
2681 static bool do_last_general(DisasContext *s, arg_rpr_esz *a, bool before)
2682 {
2683 if (sve_access_check(s)) {
2684 TCGv_i64 val = do_last_scalar(s, a->esz, a->pg, a->rn, before);
2685 tcg_gen_mov_i64(cpu_reg(s, a->rd), val);
2686 }
2687 return true;
2688 }
2689
TRANS_FEAT(LASTA_r,aa64_sve,do_last_general,a,false)2690 TRANS_FEAT(LASTA_r, aa64_sve, do_last_general, a, false)
2691 TRANS_FEAT(LASTB_r, aa64_sve, do_last_general, a, true)
2692
2693 static bool trans_CPY_m_r(DisasContext *s, arg_rpr_esz *a)
2694 {
2695 if (!dc_isar_feature(aa64_sve, s)) {
2696 return false;
2697 }
2698 if (sve_access_check(s)) {
2699 do_cpy_m(s, a->esz, a->rd, a->rd, a->pg, cpu_reg_sp(s, a->rn));
2700 }
2701 return true;
2702 }
2703
trans_CPY_m_v(DisasContext * s,arg_rpr_esz * a)2704 static bool trans_CPY_m_v(DisasContext *s, arg_rpr_esz *a)
2705 {
2706 if (!dc_isar_feature(aa64_sve, s)) {
2707 return false;
2708 }
2709 if (sve_access_check(s)) {
2710 int ofs = vec_reg_offset(s, a->rn, 0, a->esz);
2711 TCGv_i64 t = load_esz(tcg_env, ofs, a->esz);
2712 do_cpy_m(s, a->esz, a->rd, a->rd, a->pg, t);
2713 }
2714 return true;
2715 }
2716
2717 static gen_helper_gvec_3 * const revb_fns[4] = {
2718 NULL, gen_helper_sve_revb_h,
2719 gen_helper_sve_revb_s, gen_helper_sve_revb_d,
2720 };
2721 TRANS_FEAT(REVB, aa64_sve, gen_gvec_ool_arg_zpz, revb_fns[a->esz], a, 0)
2722
2723 static gen_helper_gvec_3 * const revh_fns[4] = {
2724 NULL, NULL, gen_helper_sve_revh_s, gen_helper_sve_revh_d,
2725 };
2726 TRANS_FEAT(REVH, aa64_sve, gen_gvec_ool_arg_zpz, revh_fns[a->esz], a, 0)
2727
2728 TRANS_FEAT(REVW, aa64_sve, gen_gvec_ool_arg_zpz,
2729 a->esz == 3 ? gen_helper_sve_revw_d : NULL, a, 0)
2730
2731 TRANS_FEAT(REVD, aa64_sme, gen_gvec_ool_arg_zpz, gen_helper_sme_revd_q, a, 0)
2732
2733 TRANS_FEAT(SPLICE, aa64_sve, gen_gvec_ool_arg_zpzz,
2734 gen_helper_sve_splice, a, a->esz)
2735
2736 TRANS_FEAT(SPLICE_sve2, aa64_sve2, gen_gvec_ool_zzzp, gen_helper_sve_splice,
2737 a->rd, a->rn, (a->rn + 1) % 32, a->pg, a->esz)
2738
2739 /*
2740 *** SVE Integer Compare - Vectors Group
2741 */
2742
do_ppzz_flags(DisasContext * s,arg_rprr_esz * a,gen_helper_gvec_flags_4 * gen_fn)2743 static bool do_ppzz_flags(DisasContext *s, arg_rprr_esz *a,
2744 gen_helper_gvec_flags_4 *gen_fn)
2745 {
2746 TCGv_ptr pd, zn, zm, pg;
2747 unsigned vsz;
2748 TCGv_i32 t;
2749
2750 if (gen_fn == NULL) {
2751 return false;
2752 }
2753 if (!sve_access_check(s)) {
2754 return true;
2755 }
2756
2757 vsz = vec_full_reg_size(s);
2758 t = tcg_temp_new_i32();
2759 pd = tcg_temp_new_ptr();
2760 zn = tcg_temp_new_ptr();
2761 zm = tcg_temp_new_ptr();
2762 pg = tcg_temp_new_ptr();
2763
2764 tcg_gen_addi_ptr(pd, tcg_env, pred_full_reg_offset(s, a->rd));
2765 tcg_gen_addi_ptr(zn, tcg_env, vec_full_reg_offset(s, a->rn));
2766 tcg_gen_addi_ptr(zm, tcg_env, vec_full_reg_offset(s, a->rm));
2767 tcg_gen_addi_ptr(pg, tcg_env, pred_full_reg_offset(s, a->pg));
2768
2769 gen_fn(t, pd, zn, zm, pg, tcg_constant_i32(simd_desc(vsz, vsz, 0)));
2770
2771 do_pred_flags(t);
2772 return true;
2773 }
2774
2775 #define DO_PPZZ(NAME, name) \
2776 static gen_helper_gvec_flags_4 * const name##_ppzz_fns[4] = { \
2777 gen_helper_sve_##name##_ppzz_b, gen_helper_sve_##name##_ppzz_h, \
2778 gen_helper_sve_##name##_ppzz_s, gen_helper_sve_##name##_ppzz_d, \
2779 }; \
2780 TRANS_FEAT(NAME##_ppzz, aa64_sve, do_ppzz_flags, \
2781 a, name##_ppzz_fns[a->esz])
2782
DO_PPZZ(CMPEQ,cmpeq)2783 DO_PPZZ(CMPEQ, cmpeq)
2784 DO_PPZZ(CMPNE, cmpne)
2785 DO_PPZZ(CMPGT, cmpgt)
2786 DO_PPZZ(CMPGE, cmpge)
2787 DO_PPZZ(CMPHI, cmphi)
2788 DO_PPZZ(CMPHS, cmphs)
2789
2790 #undef DO_PPZZ
2791
2792 #define DO_PPZW(NAME, name) \
2793 static gen_helper_gvec_flags_4 * const name##_ppzw_fns[4] = { \
2794 gen_helper_sve_##name##_ppzw_b, gen_helper_sve_##name##_ppzw_h, \
2795 gen_helper_sve_##name##_ppzw_s, NULL \
2796 }; \
2797 TRANS_FEAT(NAME##_ppzw, aa64_sve, do_ppzz_flags, \
2798 a, name##_ppzw_fns[a->esz])
2799
2800 DO_PPZW(CMPEQ, cmpeq)
2801 DO_PPZW(CMPNE, cmpne)
2802 DO_PPZW(CMPGT, cmpgt)
2803 DO_PPZW(CMPGE, cmpge)
2804 DO_PPZW(CMPHI, cmphi)
2805 DO_PPZW(CMPHS, cmphs)
2806 DO_PPZW(CMPLT, cmplt)
2807 DO_PPZW(CMPLE, cmple)
2808 DO_PPZW(CMPLO, cmplo)
2809 DO_PPZW(CMPLS, cmpls)
2810
2811 #undef DO_PPZW
2812
2813 /*
2814 *** SVE Integer Compare - Immediate Groups
2815 */
2816
2817 static bool do_ppzi_flags(DisasContext *s, arg_rpri_esz *a,
2818 gen_helper_gvec_flags_3 *gen_fn)
2819 {
2820 TCGv_ptr pd, zn, pg;
2821 unsigned vsz;
2822 TCGv_i32 t;
2823
2824 if (gen_fn == NULL) {
2825 return false;
2826 }
2827 if (!sve_access_check(s)) {
2828 return true;
2829 }
2830
2831 vsz = vec_full_reg_size(s);
2832 t = tcg_temp_new_i32();
2833 pd = tcg_temp_new_ptr();
2834 zn = tcg_temp_new_ptr();
2835 pg = tcg_temp_new_ptr();
2836
2837 tcg_gen_addi_ptr(pd, tcg_env, pred_full_reg_offset(s, a->rd));
2838 tcg_gen_addi_ptr(zn, tcg_env, vec_full_reg_offset(s, a->rn));
2839 tcg_gen_addi_ptr(pg, tcg_env, pred_full_reg_offset(s, a->pg));
2840
2841 gen_fn(t, pd, zn, pg, tcg_constant_i32(simd_desc(vsz, vsz, a->imm)));
2842
2843 do_pred_flags(t);
2844 return true;
2845 }
2846
2847 #define DO_PPZI(NAME, name) \
2848 static gen_helper_gvec_flags_3 * const name##_ppzi_fns[4] = { \
2849 gen_helper_sve_##name##_ppzi_b, gen_helper_sve_##name##_ppzi_h, \
2850 gen_helper_sve_##name##_ppzi_s, gen_helper_sve_##name##_ppzi_d, \
2851 }; \
2852 TRANS_FEAT(NAME##_ppzi, aa64_sve, do_ppzi_flags, a, \
2853 name##_ppzi_fns[a->esz])
2854
DO_PPZI(CMPEQ,cmpeq)2855 DO_PPZI(CMPEQ, cmpeq)
2856 DO_PPZI(CMPNE, cmpne)
2857 DO_PPZI(CMPGT, cmpgt)
2858 DO_PPZI(CMPGE, cmpge)
2859 DO_PPZI(CMPHI, cmphi)
2860 DO_PPZI(CMPHS, cmphs)
2861 DO_PPZI(CMPLT, cmplt)
2862 DO_PPZI(CMPLE, cmple)
2863 DO_PPZI(CMPLO, cmplo)
2864 DO_PPZI(CMPLS, cmpls)
2865
2866 #undef DO_PPZI
2867
2868 /*
2869 *** SVE Partition Break Group
2870 */
2871
2872 static bool do_brk3(DisasContext *s, arg_rprr_s *a,
2873 gen_helper_gvec_4 *fn, gen_helper_gvec_flags_4 *fn_s)
2874 {
2875 if (!sve_access_check(s)) {
2876 return true;
2877 }
2878
2879 unsigned vsz = pred_full_reg_size(s);
2880
2881 /* Predicate sizes may be smaller and cannot use simd_desc. */
2882 TCGv_ptr d = tcg_temp_new_ptr();
2883 TCGv_ptr n = tcg_temp_new_ptr();
2884 TCGv_ptr m = tcg_temp_new_ptr();
2885 TCGv_ptr g = tcg_temp_new_ptr();
2886 TCGv_i32 desc = tcg_constant_i32(FIELD_DP32(0, PREDDESC, OPRSZ, vsz));
2887
2888 tcg_gen_addi_ptr(d, tcg_env, pred_full_reg_offset(s, a->rd));
2889 tcg_gen_addi_ptr(n, tcg_env, pred_full_reg_offset(s, a->rn));
2890 tcg_gen_addi_ptr(m, tcg_env, pred_full_reg_offset(s, a->rm));
2891 tcg_gen_addi_ptr(g, tcg_env, pred_full_reg_offset(s, a->pg));
2892
2893 if (a->s) {
2894 TCGv_i32 t = tcg_temp_new_i32();
2895 fn_s(t, d, n, m, g, desc);
2896 do_pred_flags(t);
2897 } else {
2898 fn(d, n, m, g, desc);
2899 }
2900 return true;
2901 }
2902
do_brk2(DisasContext * s,arg_rpr_s * a,gen_helper_gvec_3 * fn,gen_helper_gvec_flags_3 * fn_s)2903 static bool do_brk2(DisasContext *s, arg_rpr_s *a,
2904 gen_helper_gvec_3 *fn, gen_helper_gvec_flags_3 *fn_s)
2905 {
2906 if (!sve_access_check(s)) {
2907 return true;
2908 }
2909
2910 unsigned vsz = pred_full_reg_size(s);
2911
2912 /* Predicate sizes may be smaller and cannot use simd_desc. */
2913 TCGv_ptr d = tcg_temp_new_ptr();
2914 TCGv_ptr n = tcg_temp_new_ptr();
2915 TCGv_ptr g = tcg_temp_new_ptr();
2916 TCGv_i32 desc = tcg_constant_i32(FIELD_DP32(0, PREDDESC, OPRSZ, vsz));
2917
2918 tcg_gen_addi_ptr(d, tcg_env, pred_full_reg_offset(s, a->rd));
2919 tcg_gen_addi_ptr(n, tcg_env, pred_full_reg_offset(s, a->rn));
2920 tcg_gen_addi_ptr(g, tcg_env, pred_full_reg_offset(s, a->pg));
2921
2922 if (a->s) {
2923 TCGv_i32 t = tcg_temp_new_i32();
2924 fn_s(t, d, n, g, desc);
2925 do_pred_flags(t);
2926 } else {
2927 fn(d, n, g, desc);
2928 }
2929 return true;
2930 }
2931
TRANS_FEAT(BRKPA,aa64_sve,do_brk3,a,gen_helper_sve_brkpa,gen_helper_sve_brkpas)2932 TRANS_FEAT(BRKPA, aa64_sve, do_brk3, a,
2933 gen_helper_sve_brkpa, gen_helper_sve_brkpas)
2934 TRANS_FEAT(BRKPB, aa64_sve, do_brk3, a,
2935 gen_helper_sve_brkpb, gen_helper_sve_brkpbs)
2936
2937 TRANS_FEAT(BRKA_m, aa64_sve, do_brk2, a,
2938 gen_helper_sve_brka_m, gen_helper_sve_brkas_m)
2939 TRANS_FEAT(BRKB_m, aa64_sve, do_brk2, a,
2940 gen_helper_sve_brkb_m, gen_helper_sve_brkbs_m)
2941
2942 TRANS_FEAT(BRKA_z, aa64_sve, do_brk2, a,
2943 gen_helper_sve_brka_z, gen_helper_sve_brkas_z)
2944 TRANS_FEAT(BRKB_z, aa64_sve, do_brk2, a,
2945 gen_helper_sve_brkb_z, gen_helper_sve_brkbs_z)
2946
2947 TRANS_FEAT(BRKN, aa64_sve, do_brk2, a,
2948 gen_helper_sve_brkn, gen_helper_sve_brkns)
2949
2950 /*
2951 *** SVE Predicate Count Group
2952 */
2953
2954 static void do_cntp(DisasContext *s, TCGv_i64 val, int esz, int pn, int pg)
2955 {
2956 unsigned psz = pred_full_reg_size(s);
2957
2958 if (psz <= 8) {
2959 uint64_t psz_mask;
2960
2961 tcg_gen_ld_i64(val, tcg_env, pred_full_reg_offset(s, pn));
2962 if (pn != pg) {
2963 TCGv_i64 g = tcg_temp_new_i64();
2964 tcg_gen_ld_i64(g, tcg_env, pred_full_reg_offset(s, pg));
2965 tcg_gen_and_i64(val, val, g);
2966 }
2967
2968 /* Reduce the pred_esz_masks value simply to reduce the
2969 * size of the code generated here.
2970 */
2971 psz_mask = MAKE_64BIT_MASK(0, psz * 8);
2972 tcg_gen_andi_i64(val, val, pred_esz_masks[esz] & psz_mask);
2973
2974 tcg_gen_ctpop_i64(val, val);
2975 } else {
2976 TCGv_ptr t_pn = tcg_temp_new_ptr();
2977 TCGv_ptr t_pg = tcg_temp_new_ptr();
2978 unsigned desc = 0;
2979
2980 desc = FIELD_DP32(desc, PREDDESC, OPRSZ, psz);
2981 desc = FIELD_DP32(desc, PREDDESC, ESZ, esz);
2982
2983 tcg_gen_addi_ptr(t_pn, tcg_env, pred_full_reg_offset(s, pn));
2984 tcg_gen_addi_ptr(t_pg, tcg_env, pred_full_reg_offset(s, pg));
2985
2986 gen_helper_sve_cntp(val, t_pn, t_pg, tcg_constant_i32(desc));
2987 }
2988 }
2989
trans_CNTP(DisasContext * s,arg_CNTP * a)2990 static bool trans_CNTP(DisasContext *s, arg_CNTP *a)
2991 {
2992 if (!dc_isar_feature(aa64_sve, s)) {
2993 return false;
2994 }
2995 if (sve_access_check(s)) {
2996 do_cntp(s, cpu_reg(s, a->rd), a->esz, a->rn, a->pg);
2997 }
2998 return true;
2999 }
3000
trans_INCDECP_r(DisasContext * s,arg_incdec_pred * a)3001 static bool trans_INCDECP_r(DisasContext *s, arg_incdec_pred *a)
3002 {
3003 if (!dc_isar_feature(aa64_sve, s)) {
3004 return false;
3005 }
3006 if (sve_access_check(s)) {
3007 TCGv_i64 reg = cpu_reg(s, a->rd);
3008 TCGv_i64 val = tcg_temp_new_i64();
3009
3010 do_cntp(s, val, a->esz, a->pg, a->pg);
3011 if (a->d) {
3012 tcg_gen_sub_i64(reg, reg, val);
3013 } else {
3014 tcg_gen_add_i64(reg, reg, val);
3015 }
3016 }
3017 return true;
3018 }
3019
trans_INCDECP_z(DisasContext * s,arg_incdec2_pred * a)3020 static bool trans_INCDECP_z(DisasContext *s, arg_incdec2_pred *a)
3021 {
3022 if (a->esz == 0 || !dc_isar_feature(aa64_sve, s)) {
3023 return false;
3024 }
3025 if (sve_access_check(s)) {
3026 unsigned vsz = vec_full_reg_size(s);
3027 TCGv_i64 val = tcg_temp_new_i64();
3028 GVecGen2sFn *gvec_fn = a->d ? tcg_gen_gvec_subs : tcg_gen_gvec_adds;
3029
3030 do_cntp(s, val, a->esz, a->pg, a->pg);
3031 gvec_fn(a->esz, vec_full_reg_offset(s, a->rd),
3032 vec_full_reg_offset(s, a->rn), val, vsz, vsz);
3033 }
3034 return true;
3035 }
3036
trans_SINCDECP_r_32(DisasContext * s,arg_incdec_pred * a)3037 static bool trans_SINCDECP_r_32(DisasContext *s, arg_incdec_pred *a)
3038 {
3039 if (!dc_isar_feature(aa64_sve, s)) {
3040 return false;
3041 }
3042 if (sve_access_check(s)) {
3043 TCGv_i64 reg = cpu_reg(s, a->rd);
3044 TCGv_i64 val = tcg_temp_new_i64();
3045
3046 do_cntp(s, val, a->esz, a->pg, a->pg);
3047 do_sat_addsub_32(reg, val, a->u, a->d);
3048 }
3049 return true;
3050 }
3051
trans_SINCDECP_r_64(DisasContext * s,arg_incdec_pred * a)3052 static bool trans_SINCDECP_r_64(DisasContext *s, arg_incdec_pred *a)
3053 {
3054 if (!dc_isar_feature(aa64_sve, s)) {
3055 return false;
3056 }
3057 if (sve_access_check(s)) {
3058 TCGv_i64 reg = cpu_reg(s, a->rd);
3059 TCGv_i64 val = tcg_temp_new_i64();
3060
3061 do_cntp(s, val, a->esz, a->pg, a->pg);
3062 do_sat_addsub_64(reg, val, a->u, a->d);
3063 }
3064 return true;
3065 }
3066
trans_SINCDECP_z(DisasContext * s,arg_incdec2_pred * a)3067 static bool trans_SINCDECP_z(DisasContext *s, arg_incdec2_pred *a)
3068 {
3069 if (a->esz == 0 || !dc_isar_feature(aa64_sve, s)) {
3070 return false;
3071 }
3072 if (sve_access_check(s)) {
3073 TCGv_i64 val = tcg_temp_new_i64();
3074 do_cntp(s, val, a->esz, a->pg, a->pg);
3075 do_sat_addsub_vec(s, a->esz, a->rd, a->rn, val, a->u, a->d);
3076 }
3077 return true;
3078 }
3079
3080 /*
3081 *** SVE Integer Compare Scalars Group
3082 */
3083
trans_CTERM(DisasContext * s,arg_CTERM * a)3084 static bool trans_CTERM(DisasContext *s, arg_CTERM *a)
3085 {
3086 if (!dc_isar_feature(aa64_sve, s)) {
3087 return false;
3088 }
3089 if (!sve_access_check(s)) {
3090 return true;
3091 }
3092
3093 TCGCond cond = (a->ne ? TCG_COND_NE : TCG_COND_EQ);
3094 TCGv_i64 rn = read_cpu_reg(s, a->rn, a->sf);
3095 TCGv_i64 rm = read_cpu_reg(s, a->rm, a->sf);
3096 TCGv_i64 cmp = tcg_temp_new_i64();
3097
3098 tcg_gen_setcond_i64(cond, cmp, rn, rm);
3099 tcg_gen_extrl_i64_i32(cpu_NF, cmp);
3100
3101 /* VF = !NF & !CF. */
3102 tcg_gen_xori_i32(cpu_VF, cpu_NF, 1);
3103 tcg_gen_andc_i32(cpu_VF, cpu_VF, cpu_CF);
3104
3105 /* Both NF and VF actually look at bit 31. */
3106 tcg_gen_neg_i32(cpu_NF, cpu_NF);
3107 tcg_gen_neg_i32(cpu_VF, cpu_VF);
3108 return true;
3109 }
3110
trans_WHILE(DisasContext * s,arg_WHILE * a)3111 static bool trans_WHILE(DisasContext *s, arg_WHILE *a)
3112 {
3113 TCGv_i64 op0, op1, t0, t1, tmax;
3114 TCGv_i32 t2;
3115 TCGv_ptr ptr;
3116 unsigned vsz = vec_full_reg_size(s);
3117 unsigned desc = 0;
3118 TCGCond cond;
3119 uint64_t maxval;
3120 /* Note that GE/HS has a->eq == 0 and GT/HI has a->eq == 1. */
3121 bool eq = a->eq == a->lt;
3122
3123 /* The greater-than conditions are all SVE2. */
3124 if (a->lt
3125 ? !dc_isar_feature(aa64_sve, s)
3126 : !dc_isar_feature(aa64_sve2, s)) {
3127 return false;
3128 }
3129 if (!sve_access_check(s)) {
3130 return true;
3131 }
3132
3133 op0 = read_cpu_reg(s, a->rn, 1);
3134 op1 = read_cpu_reg(s, a->rm, 1);
3135
3136 if (!a->sf) {
3137 if (a->u) {
3138 tcg_gen_ext32u_i64(op0, op0);
3139 tcg_gen_ext32u_i64(op1, op1);
3140 } else {
3141 tcg_gen_ext32s_i64(op0, op0);
3142 tcg_gen_ext32s_i64(op1, op1);
3143 }
3144 }
3145
3146 /* For the helper, compress the different conditions into a computation
3147 * of how many iterations for which the condition is true.
3148 */
3149 t0 = tcg_temp_new_i64();
3150 t1 = tcg_temp_new_i64();
3151
3152 if (a->lt) {
3153 tcg_gen_sub_i64(t0, op1, op0);
3154 if (a->u) {
3155 maxval = a->sf ? UINT64_MAX : UINT32_MAX;
3156 cond = eq ? TCG_COND_LEU : TCG_COND_LTU;
3157 } else {
3158 maxval = a->sf ? INT64_MAX : INT32_MAX;
3159 cond = eq ? TCG_COND_LE : TCG_COND_LT;
3160 }
3161 } else {
3162 tcg_gen_sub_i64(t0, op0, op1);
3163 if (a->u) {
3164 maxval = 0;
3165 cond = eq ? TCG_COND_GEU : TCG_COND_GTU;
3166 } else {
3167 maxval = a->sf ? INT64_MIN : INT32_MIN;
3168 cond = eq ? TCG_COND_GE : TCG_COND_GT;
3169 }
3170 }
3171
3172 tmax = tcg_constant_i64(vsz >> a->esz);
3173 if (eq) {
3174 /* Equality means one more iteration. */
3175 tcg_gen_addi_i64(t0, t0, 1);
3176
3177 /*
3178 * For the less-than while, if op1 is maxval (and the only time
3179 * the addition above could overflow), then we produce an all-true
3180 * predicate by setting the count to the vector length. This is
3181 * because the pseudocode is described as an increment + compare
3182 * loop, and the maximum integer would always compare true.
3183 * Similarly, the greater-than while has the same issue with the
3184 * minimum integer due to the decrement + compare loop.
3185 */
3186 tcg_gen_movi_i64(t1, maxval);
3187 tcg_gen_movcond_i64(TCG_COND_EQ, t0, op1, t1, tmax, t0);
3188 }
3189
3190 /* Bound to the maximum. */
3191 tcg_gen_umin_i64(t0, t0, tmax);
3192
3193 /* Set the count to zero if the condition is false. */
3194 tcg_gen_movi_i64(t1, 0);
3195 tcg_gen_movcond_i64(cond, t0, op0, op1, t0, t1);
3196
3197 /* Since we're bounded, pass as a 32-bit type. */
3198 t2 = tcg_temp_new_i32();
3199 tcg_gen_extrl_i64_i32(t2, t0);
3200
3201 /* Scale elements to bits. */
3202 tcg_gen_shli_i32(t2, t2, a->esz);
3203
3204 desc = FIELD_DP32(desc, PREDDESC, OPRSZ, vsz / 8);
3205 desc = FIELD_DP32(desc, PREDDESC, ESZ, a->esz);
3206
3207 ptr = tcg_temp_new_ptr();
3208 tcg_gen_addi_ptr(ptr, tcg_env, pred_full_reg_offset(s, a->rd));
3209
3210 if (a->lt) {
3211 gen_helper_sve_whilel(t2, ptr, t2, tcg_constant_i32(desc));
3212 } else {
3213 gen_helper_sve_whileg(t2, ptr, t2, tcg_constant_i32(desc));
3214 }
3215 do_pred_flags(t2);
3216 return true;
3217 }
3218
trans_WHILE_ptr(DisasContext * s,arg_WHILE_ptr * a)3219 static bool trans_WHILE_ptr(DisasContext *s, arg_WHILE_ptr *a)
3220 {
3221 TCGv_i64 op0, op1, diff, t1, tmax;
3222 TCGv_i32 t2;
3223 TCGv_ptr ptr;
3224 unsigned vsz = vec_full_reg_size(s);
3225 unsigned desc = 0;
3226
3227 if (!dc_isar_feature(aa64_sve2, s)) {
3228 return false;
3229 }
3230 if (!sve_access_check(s)) {
3231 return true;
3232 }
3233
3234 op0 = read_cpu_reg(s, a->rn, 1);
3235 op1 = read_cpu_reg(s, a->rm, 1);
3236
3237 tmax = tcg_constant_i64(vsz);
3238 diff = tcg_temp_new_i64();
3239
3240 if (a->rw) {
3241 /* WHILERW */
3242 /* diff = abs(op1 - op0), noting that op0/1 are unsigned. */
3243 t1 = tcg_temp_new_i64();
3244 tcg_gen_sub_i64(diff, op0, op1);
3245 tcg_gen_sub_i64(t1, op1, op0);
3246 tcg_gen_movcond_i64(TCG_COND_GEU, diff, op0, op1, diff, t1);
3247 /* Round down to a multiple of ESIZE. */
3248 tcg_gen_andi_i64(diff, diff, -1 << a->esz);
3249 /* If op1 == op0, diff == 0, and the condition is always true. */
3250 tcg_gen_movcond_i64(TCG_COND_EQ, diff, op0, op1, tmax, diff);
3251 } else {
3252 /* WHILEWR */
3253 tcg_gen_sub_i64(diff, op1, op0);
3254 /* Round down to a multiple of ESIZE. */
3255 tcg_gen_andi_i64(diff, diff, -1 << a->esz);
3256 /* If op0 >= op1, diff <= 0, the condition is always true. */
3257 tcg_gen_movcond_i64(TCG_COND_GEU, diff, op0, op1, tmax, diff);
3258 }
3259
3260 /* Bound to the maximum. */
3261 tcg_gen_umin_i64(diff, diff, tmax);
3262
3263 /* Since we're bounded, pass as a 32-bit type. */
3264 t2 = tcg_temp_new_i32();
3265 tcg_gen_extrl_i64_i32(t2, diff);
3266
3267 desc = FIELD_DP32(desc, PREDDESC, OPRSZ, vsz / 8);
3268 desc = FIELD_DP32(desc, PREDDESC, ESZ, a->esz);
3269
3270 ptr = tcg_temp_new_ptr();
3271 tcg_gen_addi_ptr(ptr, tcg_env, pred_full_reg_offset(s, a->rd));
3272
3273 gen_helper_sve_whilel(t2, ptr, t2, tcg_constant_i32(desc));
3274 do_pred_flags(t2);
3275 return true;
3276 }
3277
3278 /*
3279 *** SVE Integer Wide Immediate - Unpredicated Group
3280 */
3281
trans_FDUP(DisasContext * s,arg_FDUP * a)3282 static bool trans_FDUP(DisasContext *s, arg_FDUP *a)
3283 {
3284 if (a->esz == 0 || !dc_isar_feature(aa64_sve, s)) {
3285 return false;
3286 }
3287 if (sve_access_check(s)) {
3288 unsigned vsz = vec_full_reg_size(s);
3289 int dofs = vec_full_reg_offset(s, a->rd);
3290 uint64_t imm;
3291
3292 /* Decode the VFP immediate. */
3293 imm = vfp_expand_imm(a->esz, a->imm);
3294 tcg_gen_gvec_dup_imm(a->esz, dofs, vsz, vsz, imm);
3295 }
3296 return true;
3297 }
3298
trans_DUP_i(DisasContext * s,arg_DUP_i * a)3299 static bool trans_DUP_i(DisasContext *s, arg_DUP_i *a)
3300 {
3301 if (!dc_isar_feature(aa64_sve, s)) {
3302 return false;
3303 }
3304 if (sve_access_check(s)) {
3305 unsigned vsz = vec_full_reg_size(s);
3306 int dofs = vec_full_reg_offset(s, a->rd);
3307 tcg_gen_gvec_dup_imm(a->esz, dofs, vsz, vsz, a->imm);
3308 }
3309 return true;
3310 }
3311
TRANS_FEAT(ADD_zzi,aa64_sve,gen_gvec_fn_arg_zzi,tcg_gen_gvec_addi,a)3312 TRANS_FEAT(ADD_zzi, aa64_sve, gen_gvec_fn_arg_zzi, tcg_gen_gvec_addi, a)
3313
3314 static bool trans_SUB_zzi(DisasContext *s, arg_rri_esz *a)
3315 {
3316 a->imm = -a->imm;
3317 return trans_ADD_zzi(s, a);
3318 }
3319
trans_SUBR_zzi(DisasContext * s,arg_rri_esz * a)3320 static bool trans_SUBR_zzi(DisasContext *s, arg_rri_esz *a)
3321 {
3322 static const TCGOpcode vecop_list[] = { INDEX_op_sub_vec, 0 };
3323 static const GVecGen2s op[4] = {
3324 { .fni8 = tcg_gen_vec_sub8_i64,
3325 .fniv = tcg_gen_sub_vec,
3326 .fno = gen_helper_sve_subri_b,
3327 .opt_opc = vecop_list,
3328 .vece = MO_8,
3329 .scalar_first = true },
3330 { .fni8 = tcg_gen_vec_sub16_i64,
3331 .fniv = tcg_gen_sub_vec,
3332 .fno = gen_helper_sve_subri_h,
3333 .opt_opc = vecop_list,
3334 .vece = MO_16,
3335 .scalar_first = true },
3336 { .fni4 = tcg_gen_sub_i32,
3337 .fniv = tcg_gen_sub_vec,
3338 .fno = gen_helper_sve_subri_s,
3339 .opt_opc = vecop_list,
3340 .vece = MO_32,
3341 .scalar_first = true },
3342 { .fni8 = tcg_gen_sub_i64,
3343 .fniv = tcg_gen_sub_vec,
3344 .fno = gen_helper_sve_subri_d,
3345 .opt_opc = vecop_list,
3346 .prefer_i64 = TCG_TARGET_REG_BITS == 64,
3347 .vece = MO_64,
3348 .scalar_first = true }
3349 };
3350
3351 if (!dc_isar_feature(aa64_sve, s)) {
3352 return false;
3353 }
3354 if (sve_access_check(s)) {
3355 unsigned vsz = vec_full_reg_size(s);
3356 tcg_gen_gvec_2s(vec_full_reg_offset(s, a->rd),
3357 vec_full_reg_offset(s, a->rn),
3358 vsz, vsz, tcg_constant_i64(a->imm), &op[a->esz]);
3359 }
3360 return true;
3361 }
3362
TRANS_FEAT(MUL_zzi,aa64_sve,gen_gvec_fn_arg_zzi,tcg_gen_gvec_muli,a)3363 TRANS_FEAT(MUL_zzi, aa64_sve, gen_gvec_fn_arg_zzi, tcg_gen_gvec_muli, a)
3364
3365 static bool do_zzi_sat(DisasContext *s, arg_rri_esz *a, bool u, bool d)
3366 {
3367 if (sve_access_check(s)) {
3368 do_sat_addsub_vec(s, a->esz, a->rd, a->rn,
3369 tcg_constant_i64(a->imm), u, d);
3370 }
3371 return true;
3372 }
3373
TRANS_FEAT(SQADD_zzi,aa64_sve,do_zzi_sat,a,false,false)3374 TRANS_FEAT(SQADD_zzi, aa64_sve, do_zzi_sat, a, false, false)
3375 TRANS_FEAT(UQADD_zzi, aa64_sve, do_zzi_sat, a, true, false)
3376 TRANS_FEAT(SQSUB_zzi, aa64_sve, do_zzi_sat, a, false, true)
3377 TRANS_FEAT(UQSUB_zzi, aa64_sve, do_zzi_sat, a, true, true)
3378
3379 static bool do_zzi_ool(DisasContext *s, arg_rri_esz *a, gen_helper_gvec_2i *fn)
3380 {
3381 if (sve_access_check(s)) {
3382 unsigned vsz = vec_full_reg_size(s);
3383 tcg_gen_gvec_2i_ool(vec_full_reg_offset(s, a->rd),
3384 vec_full_reg_offset(s, a->rn),
3385 tcg_constant_i64(a->imm), vsz, vsz, 0, fn);
3386 }
3387 return true;
3388 }
3389
3390 #define DO_ZZI(NAME, name) \
3391 static gen_helper_gvec_2i * const name##i_fns[4] = { \
3392 gen_helper_sve_##name##i_b, gen_helper_sve_##name##i_h, \
3393 gen_helper_sve_##name##i_s, gen_helper_sve_##name##i_d, \
3394 }; \
3395 TRANS_FEAT(NAME##_zzi, aa64_sve, do_zzi_ool, a, name##i_fns[a->esz])
3396
3397 DO_ZZI(SMAX, smax)
3398 DO_ZZI(UMAX, umax)
3399 DO_ZZI(SMIN, smin)
3400 DO_ZZI(UMIN, umin)
3401
3402 #undef DO_ZZI
3403
3404 static gen_helper_gvec_4 * const dot_fns[2][2] = {
3405 { gen_helper_gvec_sdot_b, gen_helper_gvec_sdot_h },
3406 { gen_helper_gvec_udot_b, gen_helper_gvec_udot_h }
3407 };
3408 TRANS_FEAT(DOT_zzzz, aa64_sve, gen_gvec_ool_zzzz,
3409 dot_fns[a->u][a->sz], a->rd, a->rn, a->rm, a->ra, 0)
3410
3411 /*
3412 * SVE Multiply - Indexed
3413 */
3414
3415 TRANS_FEAT(SDOT_zzxw_s, aa64_sve, gen_gvec_ool_arg_zzxz,
3416 gen_helper_gvec_sdot_idx_b, a)
3417 TRANS_FEAT(SDOT_zzxw_d, aa64_sve, gen_gvec_ool_arg_zzxz,
3418 gen_helper_gvec_sdot_idx_h, a)
3419 TRANS_FEAT(UDOT_zzxw_s, aa64_sve, gen_gvec_ool_arg_zzxz,
3420 gen_helper_gvec_udot_idx_b, a)
3421 TRANS_FEAT(UDOT_zzxw_d, aa64_sve, gen_gvec_ool_arg_zzxz,
3422 gen_helper_gvec_udot_idx_h, a)
3423
3424 TRANS_FEAT(SUDOT_zzxw_s, aa64_sve_i8mm, gen_gvec_ool_arg_zzxz,
3425 gen_helper_gvec_sudot_idx_b, a)
3426 TRANS_FEAT(USDOT_zzxw_s, aa64_sve_i8mm, gen_gvec_ool_arg_zzxz,
3427 gen_helper_gvec_usdot_idx_b, a)
3428
3429 #define DO_SVE2_RRX(NAME, FUNC) \
3430 TRANS_FEAT(NAME, aa64_sve, gen_gvec_ool_zzz, FUNC, \
3431 a->rd, a->rn, a->rm, a->index)
3432
3433 DO_SVE2_RRX(MUL_zzx_h, gen_helper_gvec_mul_idx_h)
3434 DO_SVE2_RRX(MUL_zzx_s, gen_helper_gvec_mul_idx_s)
3435 DO_SVE2_RRX(MUL_zzx_d, gen_helper_gvec_mul_idx_d)
3436
3437 DO_SVE2_RRX(SQDMULH_zzx_h, gen_helper_sve2_sqdmulh_idx_h)
3438 DO_SVE2_RRX(SQDMULH_zzx_s, gen_helper_sve2_sqdmulh_idx_s)
3439 DO_SVE2_RRX(SQDMULH_zzx_d, gen_helper_sve2_sqdmulh_idx_d)
3440
3441 DO_SVE2_RRX(SQRDMULH_zzx_h, gen_helper_sve2_sqrdmulh_idx_h)
3442 DO_SVE2_RRX(SQRDMULH_zzx_s, gen_helper_sve2_sqrdmulh_idx_s)
3443 DO_SVE2_RRX(SQRDMULH_zzx_d, gen_helper_sve2_sqrdmulh_idx_d)
3444
3445 #undef DO_SVE2_RRX
3446
3447 #define DO_SVE2_RRX_TB(NAME, FUNC, TOP) \
3448 TRANS_FEAT(NAME, aa64_sve, gen_gvec_ool_zzz, FUNC, \
3449 a->rd, a->rn, a->rm, (a->index << 1) | TOP)
3450
3451 DO_SVE2_RRX_TB(SQDMULLB_zzx_s, gen_helper_sve2_sqdmull_idx_s, false)
3452 DO_SVE2_RRX_TB(SQDMULLB_zzx_d, gen_helper_sve2_sqdmull_idx_d, false)
3453 DO_SVE2_RRX_TB(SQDMULLT_zzx_s, gen_helper_sve2_sqdmull_idx_s, true)
3454 DO_SVE2_RRX_TB(SQDMULLT_zzx_d, gen_helper_sve2_sqdmull_idx_d, true)
3455
3456 DO_SVE2_RRX_TB(SMULLB_zzx_s, gen_helper_sve2_smull_idx_s, false)
3457 DO_SVE2_RRX_TB(SMULLB_zzx_d, gen_helper_sve2_smull_idx_d, false)
3458 DO_SVE2_RRX_TB(SMULLT_zzx_s, gen_helper_sve2_smull_idx_s, true)
3459 DO_SVE2_RRX_TB(SMULLT_zzx_d, gen_helper_sve2_smull_idx_d, true)
3460
3461 DO_SVE2_RRX_TB(UMULLB_zzx_s, gen_helper_sve2_umull_idx_s, false)
3462 DO_SVE2_RRX_TB(UMULLB_zzx_d, gen_helper_sve2_umull_idx_d, false)
3463 DO_SVE2_RRX_TB(UMULLT_zzx_s, gen_helper_sve2_umull_idx_s, true)
3464 DO_SVE2_RRX_TB(UMULLT_zzx_d, gen_helper_sve2_umull_idx_d, true)
3465
3466 #undef DO_SVE2_RRX_TB
3467
3468 #define DO_SVE2_RRXR(NAME, FUNC) \
3469 TRANS_FEAT(NAME, aa64_sve2, gen_gvec_ool_arg_zzxz, FUNC, a)
3470
3471 DO_SVE2_RRXR(MLA_zzxz_h, gen_helper_gvec_mla_idx_h)
3472 DO_SVE2_RRXR(MLA_zzxz_s, gen_helper_gvec_mla_idx_s)
3473 DO_SVE2_RRXR(MLA_zzxz_d, gen_helper_gvec_mla_idx_d)
3474
3475 DO_SVE2_RRXR(MLS_zzxz_h, gen_helper_gvec_mls_idx_h)
3476 DO_SVE2_RRXR(MLS_zzxz_s, gen_helper_gvec_mls_idx_s)
3477 DO_SVE2_RRXR(MLS_zzxz_d, gen_helper_gvec_mls_idx_d)
3478
3479 DO_SVE2_RRXR(SQRDMLAH_zzxz_h, gen_helper_sve2_sqrdmlah_idx_h)
3480 DO_SVE2_RRXR(SQRDMLAH_zzxz_s, gen_helper_sve2_sqrdmlah_idx_s)
3481 DO_SVE2_RRXR(SQRDMLAH_zzxz_d, gen_helper_sve2_sqrdmlah_idx_d)
3482
3483 DO_SVE2_RRXR(SQRDMLSH_zzxz_h, gen_helper_sve2_sqrdmlsh_idx_h)
3484 DO_SVE2_RRXR(SQRDMLSH_zzxz_s, gen_helper_sve2_sqrdmlsh_idx_s)
3485 DO_SVE2_RRXR(SQRDMLSH_zzxz_d, gen_helper_sve2_sqrdmlsh_idx_d)
3486
3487 #undef DO_SVE2_RRXR
3488
3489 #define DO_SVE2_RRXR_TB(NAME, FUNC, TOP) \
3490 TRANS_FEAT(NAME, aa64_sve2, gen_gvec_ool_zzzz, FUNC, \
3491 a->rd, a->rn, a->rm, a->ra, (a->index << 1) | TOP)
3492
3493 DO_SVE2_RRXR_TB(SQDMLALB_zzxw_s, gen_helper_sve2_sqdmlal_idx_s, false)
3494 DO_SVE2_RRXR_TB(SQDMLALB_zzxw_d, gen_helper_sve2_sqdmlal_idx_d, false)
3495 DO_SVE2_RRXR_TB(SQDMLALT_zzxw_s, gen_helper_sve2_sqdmlal_idx_s, true)
3496 DO_SVE2_RRXR_TB(SQDMLALT_zzxw_d, gen_helper_sve2_sqdmlal_idx_d, true)
3497
3498 DO_SVE2_RRXR_TB(SQDMLSLB_zzxw_s, gen_helper_sve2_sqdmlsl_idx_s, false)
3499 DO_SVE2_RRXR_TB(SQDMLSLB_zzxw_d, gen_helper_sve2_sqdmlsl_idx_d, false)
3500 DO_SVE2_RRXR_TB(SQDMLSLT_zzxw_s, gen_helper_sve2_sqdmlsl_idx_s, true)
3501 DO_SVE2_RRXR_TB(SQDMLSLT_zzxw_d, gen_helper_sve2_sqdmlsl_idx_d, true)
3502
3503 DO_SVE2_RRXR_TB(SMLALB_zzxw_s, gen_helper_sve2_smlal_idx_s, false)
3504 DO_SVE2_RRXR_TB(SMLALB_zzxw_d, gen_helper_sve2_smlal_idx_d, false)
3505 DO_SVE2_RRXR_TB(SMLALT_zzxw_s, gen_helper_sve2_smlal_idx_s, true)
3506 DO_SVE2_RRXR_TB(SMLALT_zzxw_d, gen_helper_sve2_smlal_idx_d, true)
3507
3508 DO_SVE2_RRXR_TB(UMLALB_zzxw_s, gen_helper_sve2_umlal_idx_s, false)
3509 DO_SVE2_RRXR_TB(UMLALB_zzxw_d, gen_helper_sve2_umlal_idx_d, false)
3510 DO_SVE2_RRXR_TB(UMLALT_zzxw_s, gen_helper_sve2_umlal_idx_s, true)
3511 DO_SVE2_RRXR_TB(UMLALT_zzxw_d, gen_helper_sve2_umlal_idx_d, true)
3512
3513 DO_SVE2_RRXR_TB(SMLSLB_zzxw_s, gen_helper_sve2_smlsl_idx_s, false)
3514 DO_SVE2_RRXR_TB(SMLSLB_zzxw_d, gen_helper_sve2_smlsl_idx_d, false)
3515 DO_SVE2_RRXR_TB(SMLSLT_zzxw_s, gen_helper_sve2_smlsl_idx_s, true)
3516 DO_SVE2_RRXR_TB(SMLSLT_zzxw_d, gen_helper_sve2_smlsl_idx_d, true)
3517
3518 DO_SVE2_RRXR_TB(UMLSLB_zzxw_s, gen_helper_sve2_umlsl_idx_s, false)
3519 DO_SVE2_RRXR_TB(UMLSLB_zzxw_d, gen_helper_sve2_umlsl_idx_d, false)
3520 DO_SVE2_RRXR_TB(UMLSLT_zzxw_s, gen_helper_sve2_umlsl_idx_s, true)
3521 DO_SVE2_RRXR_TB(UMLSLT_zzxw_d, gen_helper_sve2_umlsl_idx_d, true)
3522
3523 #undef DO_SVE2_RRXR_TB
3524
3525 #define DO_SVE2_RRXR_ROT(NAME, FUNC) \
3526 TRANS_FEAT(NAME, aa64_sve2, gen_gvec_ool_zzzz, FUNC, \
3527 a->rd, a->rn, a->rm, a->ra, (a->index << 2) | a->rot)
3528
3529 DO_SVE2_RRXR_ROT(CMLA_zzxz_h, gen_helper_sve2_cmla_idx_h)
3530 DO_SVE2_RRXR_ROT(CMLA_zzxz_s, gen_helper_sve2_cmla_idx_s)
3531
3532 DO_SVE2_RRXR_ROT(SQRDCMLAH_zzxz_h, gen_helper_sve2_sqrdcmlah_idx_h)
3533 DO_SVE2_RRXR_ROT(SQRDCMLAH_zzxz_s, gen_helper_sve2_sqrdcmlah_idx_s)
3534
3535 DO_SVE2_RRXR_ROT(CDOT_zzxw_s, gen_helper_sve2_cdot_idx_s)
3536 DO_SVE2_RRXR_ROT(CDOT_zzxw_d, gen_helper_sve2_cdot_idx_d)
3537
3538 #undef DO_SVE2_RRXR_ROT
3539
3540 /*
3541 *** SVE Floating Point Multiply-Add Indexed Group
3542 */
3543
3544 static gen_helper_gvec_4_ptr * const fmla_idx_fns[4] = {
3545 NULL, gen_helper_gvec_fmla_idx_h,
3546 gen_helper_gvec_fmla_idx_s, gen_helper_gvec_fmla_idx_d
3547 };
3548 TRANS_FEAT(FMLA_zzxz, aa64_sve, gen_gvec_fpst_zzzz,
3549 fmla_idx_fns[a->esz], a->rd, a->rn, a->rm, a->ra, a->index,
3550 a->esz == MO_16 ? FPST_A64_F16 : FPST_A64)
3551
3552 static gen_helper_gvec_4_ptr * const fmls_idx_fns[4][2] = {
3553 { NULL, NULL },
3554 { gen_helper_gvec_fmls_idx_h, gen_helper_gvec_ah_fmls_idx_h },
3555 { gen_helper_gvec_fmls_idx_s, gen_helper_gvec_ah_fmls_idx_s },
3556 { gen_helper_gvec_fmls_idx_d, gen_helper_gvec_ah_fmls_idx_d },
3557 };
3558 TRANS_FEAT(FMLS_zzxz, aa64_sve, gen_gvec_fpst_zzzz,
3559 fmls_idx_fns[a->esz][s->fpcr_ah],
3560 a->rd, a->rn, a->rm, a->ra, a->index,
3561 a->esz == MO_16 ? FPST_A64_F16 : FPST_A64)
3562
3563 /*
3564 *** SVE Floating Point Multiply Indexed Group
3565 */
3566
3567 static gen_helper_gvec_3_ptr * const fmul_idx_fns[4] = {
3568 NULL, gen_helper_gvec_fmul_idx_h,
3569 gen_helper_gvec_fmul_idx_s, gen_helper_gvec_fmul_idx_d,
3570 };
3571 TRANS_FEAT(FMUL_zzx, aa64_sve, gen_gvec_fpst_zzz,
3572 fmul_idx_fns[a->esz], a->rd, a->rn, a->rm, a->index,
3573 a->esz == MO_16 ? FPST_A64_F16 : FPST_A64)
3574
3575 /*
3576 *** SVE Floating Point Fast Reduction Group
3577 */
3578
3579 typedef void gen_helper_fp_reduce(TCGv_i64, TCGv_ptr, TCGv_ptr,
3580 TCGv_ptr, TCGv_i32);
3581
do_reduce(DisasContext * s,arg_rpr_esz * a,gen_helper_fp_reduce * fn)3582 static bool do_reduce(DisasContext *s, arg_rpr_esz *a,
3583 gen_helper_fp_reduce *fn)
3584 {
3585 unsigned vsz, p2vsz;
3586 TCGv_i32 t_desc;
3587 TCGv_ptr t_zn, t_pg, status;
3588 TCGv_i64 temp;
3589
3590 if (fn == NULL) {
3591 return false;
3592 }
3593 if (!sve_access_check(s)) {
3594 return true;
3595 }
3596
3597 vsz = vec_full_reg_size(s);
3598 p2vsz = pow2ceil(vsz);
3599 t_desc = tcg_constant_i32(simd_desc(vsz, vsz, p2vsz));
3600 temp = tcg_temp_new_i64();
3601 t_zn = tcg_temp_new_ptr();
3602 t_pg = tcg_temp_new_ptr();
3603
3604 tcg_gen_addi_ptr(t_zn, tcg_env, vec_full_reg_offset(s, a->rn));
3605 tcg_gen_addi_ptr(t_pg, tcg_env, pred_full_reg_offset(s, a->pg));
3606 status = fpstatus_ptr(a->esz == MO_16 ? FPST_A64_F16 : FPST_A64);
3607
3608 fn(temp, t_zn, t_pg, status, t_desc);
3609
3610 write_fp_dreg(s, a->rd, temp);
3611 return true;
3612 }
3613
3614 #define DO_VPZ(NAME, name) \
3615 static gen_helper_fp_reduce * const name##_fns[4] = { \
3616 NULL, gen_helper_sve_##name##_h, \
3617 gen_helper_sve_##name##_s, gen_helper_sve_##name##_d, \
3618 }; \
3619 TRANS_FEAT(NAME, aa64_sve, do_reduce, a, name##_fns[a->esz])
3620
3621 #define DO_VPZ_AH(NAME, name) \
3622 static gen_helper_fp_reduce * const name##_fns[4] = { \
3623 NULL, gen_helper_sve_##name##_h, \
3624 gen_helper_sve_##name##_s, gen_helper_sve_##name##_d, \
3625 }; \
3626 static gen_helper_fp_reduce * const name##_ah_fns[4] = { \
3627 NULL, gen_helper_sve_ah_##name##_h, \
3628 gen_helper_sve_ah_##name##_s, gen_helper_sve_ah_##name##_d, \
3629 }; \
3630 TRANS_FEAT(NAME, aa64_sve, do_reduce, a, \
3631 s->fpcr_ah ? name##_ah_fns[a->esz] : name##_fns[a->esz])
3632
3633 DO_VPZ(FADDV, faddv)
3634 DO_VPZ(FMINNMV, fminnmv)
3635 DO_VPZ(FMAXNMV, fmaxnmv)
3636 DO_VPZ_AH(FMINV, fminv)
3637 DO_VPZ_AH(FMAXV, fmaxv)
3638
3639 #undef DO_VPZ
3640
3641 /*
3642 *** SVE Floating Point Unary Operations - Unpredicated Group
3643 */
3644
3645 static gen_helper_gvec_2_ptr * const frecpe_fns[] = {
3646 NULL, gen_helper_gvec_frecpe_h,
3647 gen_helper_gvec_frecpe_s, gen_helper_gvec_frecpe_d,
3648 };
3649 static gen_helper_gvec_2_ptr * const frecpe_rpres_fns[] = {
3650 NULL, gen_helper_gvec_frecpe_h,
3651 gen_helper_gvec_frecpe_rpres_s, gen_helper_gvec_frecpe_d,
3652 };
3653 TRANS_FEAT(FRECPE, aa64_sve, gen_gvec_fpst_ah_arg_zz,
3654 s->fpcr_ah && dc_isar_feature(aa64_rpres, s) ?
3655 frecpe_rpres_fns[a->esz] : frecpe_fns[a->esz], a, 0)
3656
3657 static gen_helper_gvec_2_ptr * const frsqrte_fns[] = {
3658 NULL, gen_helper_gvec_frsqrte_h,
3659 gen_helper_gvec_frsqrte_s, gen_helper_gvec_frsqrte_d,
3660 };
3661 static gen_helper_gvec_2_ptr * const frsqrte_rpres_fns[] = {
3662 NULL, gen_helper_gvec_frsqrte_h,
3663 gen_helper_gvec_frsqrte_rpres_s, gen_helper_gvec_frsqrte_d,
3664 };
3665 TRANS_FEAT(FRSQRTE, aa64_sve, gen_gvec_fpst_ah_arg_zz,
3666 s->fpcr_ah && dc_isar_feature(aa64_rpres, s) ?
3667 frsqrte_rpres_fns[a->esz] : frsqrte_fns[a->esz], a, 0)
3668
3669 /*
3670 *** SVE Floating Point Compare with Zero Group
3671 */
3672
do_ppz_fp(DisasContext * s,arg_rpr_esz * a,gen_helper_gvec_3_ptr * fn)3673 static bool do_ppz_fp(DisasContext *s, arg_rpr_esz *a,
3674 gen_helper_gvec_3_ptr *fn)
3675 {
3676 if (fn == NULL) {
3677 return false;
3678 }
3679 if (sve_access_check(s)) {
3680 unsigned vsz = vec_full_reg_size(s);
3681 TCGv_ptr status =
3682 fpstatus_ptr(a->esz == MO_16 ? FPST_A64_F16 : FPST_A64);
3683
3684 tcg_gen_gvec_3_ptr(pred_full_reg_offset(s, a->rd),
3685 vec_full_reg_offset(s, a->rn),
3686 pred_full_reg_offset(s, a->pg),
3687 status, vsz, vsz, 0, fn);
3688 }
3689 return true;
3690 }
3691
3692 #define DO_PPZ(NAME, name) \
3693 static gen_helper_gvec_3_ptr * const name##_fns[] = { \
3694 NULL, gen_helper_sve_##name##_h, \
3695 gen_helper_sve_##name##_s, gen_helper_sve_##name##_d, \
3696 }; \
3697 TRANS_FEAT(NAME, aa64_sve, do_ppz_fp, a, name##_fns[a->esz])
3698
3699 DO_PPZ(FCMGE_ppz0, fcmge0)
3700 DO_PPZ(FCMGT_ppz0, fcmgt0)
3701 DO_PPZ(FCMLE_ppz0, fcmle0)
3702 DO_PPZ(FCMLT_ppz0, fcmlt0)
3703 DO_PPZ(FCMEQ_ppz0, fcmeq0)
3704 DO_PPZ(FCMNE_ppz0, fcmne0)
3705
3706 #undef DO_PPZ
3707
3708 /*
3709 *** SVE floating-point trig multiply-add coefficient
3710 */
3711
3712 static gen_helper_gvec_3_ptr * const ftmad_fns[4] = {
3713 NULL, gen_helper_sve_ftmad_h,
3714 gen_helper_sve_ftmad_s, gen_helper_sve_ftmad_d,
3715 };
3716 TRANS_FEAT_NONSTREAMING(FTMAD, aa64_sve, gen_gvec_fpst_zzz,
3717 ftmad_fns[a->esz], a->rd, a->rn, a->rm,
3718 a->imm | (s->fpcr_ah << 3),
3719 a->esz == MO_16 ? FPST_A64_F16 : FPST_A64)
3720
3721 /*
3722 *** SVE Floating Point Accumulating Reduction Group
3723 */
3724
trans_FADDA(DisasContext * s,arg_rprr_esz * a)3725 static bool trans_FADDA(DisasContext *s, arg_rprr_esz *a)
3726 {
3727 typedef void fadda_fn(TCGv_i64, TCGv_i64, TCGv_ptr,
3728 TCGv_ptr, TCGv_ptr, TCGv_i32);
3729 static fadda_fn * const fns[3] = {
3730 gen_helper_sve_fadda_h,
3731 gen_helper_sve_fadda_s,
3732 gen_helper_sve_fadda_d,
3733 };
3734 unsigned vsz = vec_full_reg_size(s);
3735 TCGv_ptr t_rm, t_pg, t_fpst;
3736 TCGv_i64 t_val;
3737 TCGv_i32 t_desc;
3738
3739 if (a->esz == 0 || !dc_isar_feature(aa64_sve, s)) {
3740 return false;
3741 }
3742 s->is_nonstreaming = true;
3743 if (!sve_access_check(s)) {
3744 return true;
3745 }
3746
3747 t_val = load_esz(tcg_env, vec_reg_offset(s, a->rn, 0, a->esz), a->esz);
3748 t_rm = tcg_temp_new_ptr();
3749 t_pg = tcg_temp_new_ptr();
3750 tcg_gen_addi_ptr(t_rm, tcg_env, vec_full_reg_offset(s, a->rm));
3751 tcg_gen_addi_ptr(t_pg, tcg_env, pred_full_reg_offset(s, a->pg));
3752 t_fpst = fpstatus_ptr(a->esz == MO_16 ? FPST_A64_F16 : FPST_A64);
3753 t_desc = tcg_constant_i32(simd_desc(vsz, vsz, 0));
3754
3755 fns[a->esz - 1](t_val, t_val, t_rm, t_pg, t_fpst, t_desc);
3756
3757 write_fp_dreg(s, a->rd, t_val);
3758 return true;
3759 }
3760
3761 /*
3762 *** SVE Floating Point Arithmetic - Unpredicated Group
3763 */
3764
3765 #define DO_FP3(NAME, name) \
3766 static gen_helper_gvec_3_ptr * const name##_fns[4] = { \
3767 NULL, gen_helper_gvec_##name##_h, \
3768 gen_helper_gvec_##name##_s, gen_helper_gvec_##name##_d \
3769 }; \
3770 TRANS_FEAT(NAME, aa64_sve, gen_gvec_fpst_arg_zzz, name##_fns[a->esz], a, 0)
3771
3772 #define DO_FP3_AH(NAME, name) \
3773 static gen_helper_gvec_3_ptr * const name##_fns[4] = { \
3774 NULL, gen_helper_gvec_##name##_h, \
3775 gen_helper_gvec_##name##_s, gen_helper_gvec_##name##_d \
3776 }; \
3777 static gen_helper_gvec_3_ptr * const name##_ah_fns[4] = { \
3778 NULL, gen_helper_gvec_ah_##name##_h, \
3779 gen_helper_gvec_ah_##name##_s, gen_helper_gvec_ah_##name##_d \
3780 }; \
3781 TRANS_FEAT(NAME, aa64_sve, gen_gvec_fpst_ah_arg_zzz, \
3782 s->fpcr_ah ? name##_ah_fns[a->esz] : name##_fns[a->esz], a, 0)
3783
3784 DO_FP3(FADD_zzz, fadd)
3785 DO_FP3(FSUB_zzz, fsub)
3786 DO_FP3(FMUL_zzz, fmul)
3787 DO_FP3_AH(FRECPS, recps)
3788 DO_FP3_AH(FRSQRTS, rsqrts)
3789
3790 #undef DO_FP3
3791
3792 static gen_helper_gvec_3_ptr * const ftsmul_fns[4] = {
3793 NULL, gen_helper_gvec_ftsmul_h,
3794 gen_helper_gvec_ftsmul_s, gen_helper_gvec_ftsmul_d
3795 };
3796 TRANS_FEAT_NONSTREAMING(FTSMUL, aa64_sve, gen_gvec_fpst_arg_zzz,
3797 ftsmul_fns[a->esz], a, 0)
3798
3799 /*
3800 *** SVE Floating Point Arithmetic - Predicated Group
3801 */
3802
3803 #define DO_ZPZZ_FP(NAME, FEAT, name) \
3804 static gen_helper_gvec_4_ptr * const name##_zpzz_fns[4] = { \
3805 NULL, gen_helper_##name##_h, \
3806 gen_helper_##name##_s, gen_helper_##name##_d \
3807 }; \
3808 TRANS_FEAT(NAME, FEAT, gen_gvec_fpst_arg_zpzz, name##_zpzz_fns[a->esz], a)
3809
3810 #define DO_ZPZZ_AH_FP(NAME, FEAT, name, ah_name) \
3811 static gen_helper_gvec_4_ptr * const name##_zpzz_fns[4] = { \
3812 NULL, gen_helper_##name##_h, \
3813 gen_helper_##name##_s, gen_helper_##name##_d \
3814 }; \
3815 static gen_helper_gvec_4_ptr * const name##_ah_zpzz_fns[4] = { \
3816 NULL, gen_helper_##ah_name##_h, \
3817 gen_helper_##ah_name##_s, gen_helper_##ah_name##_d \
3818 }; \
3819 TRANS_FEAT(NAME, FEAT, gen_gvec_fpst_arg_zpzz, \
3820 s->fpcr_ah ? name##_ah_zpzz_fns[a->esz] : \
3821 name##_zpzz_fns[a->esz], a)
3822
3823 DO_ZPZZ_FP(FADD_zpzz, aa64_sve, sve_fadd)
3824 DO_ZPZZ_FP(FSUB_zpzz, aa64_sve, sve_fsub)
3825 DO_ZPZZ_FP(FMUL_zpzz, aa64_sve, sve_fmul)
3826 DO_ZPZZ_AH_FP(FMIN_zpzz, aa64_sve, sve_fmin, sve_ah_fmin)
3827 DO_ZPZZ_AH_FP(FMAX_zpzz, aa64_sve, sve_fmax, sve_ah_fmax)
3828 DO_ZPZZ_FP(FMINNM_zpzz, aa64_sve, sve_fminnum)
3829 DO_ZPZZ_FP(FMAXNM_zpzz, aa64_sve, sve_fmaxnum)
3830 DO_ZPZZ_AH_FP(FABD, aa64_sve, sve_fabd, sve_ah_fabd)
3831 DO_ZPZZ_FP(FSCALE, aa64_sve, sve_fscalbn)
3832 DO_ZPZZ_FP(FDIV, aa64_sve, sve_fdiv)
3833 DO_ZPZZ_FP(FMULX, aa64_sve, sve_fmulx)
3834
3835 typedef void gen_helper_sve_fp2scalar(TCGv_ptr, TCGv_ptr, TCGv_ptr,
3836 TCGv_i64, TCGv_ptr, TCGv_i32);
3837
do_fp_scalar(DisasContext * s,int zd,int zn,int pg,bool is_fp16,TCGv_i64 scalar,gen_helper_sve_fp2scalar * fn)3838 static void do_fp_scalar(DisasContext *s, int zd, int zn, int pg, bool is_fp16,
3839 TCGv_i64 scalar, gen_helper_sve_fp2scalar *fn)
3840 {
3841 unsigned vsz = vec_full_reg_size(s);
3842 TCGv_ptr t_zd, t_zn, t_pg, status;
3843 TCGv_i32 desc;
3844
3845 t_zd = tcg_temp_new_ptr();
3846 t_zn = tcg_temp_new_ptr();
3847 t_pg = tcg_temp_new_ptr();
3848 tcg_gen_addi_ptr(t_zd, tcg_env, vec_full_reg_offset(s, zd));
3849 tcg_gen_addi_ptr(t_zn, tcg_env, vec_full_reg_offset(s, zn));
3850 tcg_gen_addi_ptr(t_pg, tcg_env, pred_full_reg_offset(s, pg));
3851
3852 status = fpstatus_ptr(is_fp16 ? FPST_A64_F16 : FPST_A64);
3853 desc = tcg_constant_i32(simd_desc(vsz, vsz, 0));
3854 fn(t_zd, t_zn, t_pg, scalar, status, desc);
3855 }
3856
do_fp_imm(DisasContext * s,arg_rpri_esz * a,uint64_t imm,gen_helper_sve_fp2scalar * fn)3857 static bool do_fp_imm(DisasContext *s, arg_rpri_esz *a, uint64_t imm,
3858 gen_helper_sve_fp2scalar *fn)
3859 {
3860 if (fn == NULL) {
3861 return false;
3862 }
3863 if (sve_access_check(s)) {
3864 do_fp_scalar(s, a->rd, a->rn, a->pg, a->esz == MO_16,
3865 tcg_constant_i64(imm), fn);
3866 }
3867 return true;
3868 }
3869
3870 #define DO_FP_IMM(NAME, name, const0, const1) \
3871 static gen_helper_sve_fp2scalar * const name##_fns[4] = { \
3872 NULL, gen_helper_sve_##name##_h, \
3873 gen_helper_sve_##name##_s, \
3874 gen_helper_sve_##name##_d \
3875 }; \
3876 static uint64_t const name##_const[4][2] = { \
3877 { -1, -1 }, \
3878 { float16_##const0, float16_##const1 }, \
3879 { float32_##const0, float32_##const1 }, \
3880 { float64_##const0, float64_##const1 }, \
3881 }; \
3882 TRANS_FEAT(NAME##_zpzi, aa64_sve, do_fp_imm, a, \
3883 name##_const[a->esz][a->imm], name##_fns[a->esz])
3884
3885 #define DO_FP_AH_IMM(NAME, name, const0, const1) \
3886 static gen_helper_sve_fp2scalar * const name##_fns[4] = { \
3887 NULL, gen_helper_sve_##name##_h, \
3888 gen_helper_sve_##name##_s, \
3889 gen_helper_sve_##name##_d \
3890 }; \
3891 static gen_helper_sve_fp2scalar * const name##_ah_fns[4] = { \
3892 NULL, gen_helper_sve_ah_##name##_h, \
3893 gen_helper_sve_ah_##name##_s, \
3894 gen_helper_sve_ah_##name##_d \
3895 }; \
3896 static uint64_t const name##_const[4][2] = { \
3897 { -1, -1 }, \
3898 { float16_##const0, float16_##const1 }, \
3899 { float32_##const0, float32_##const1 }, \
3900 { float64_##const0, float64_##const1 }, \
3901 }; \
3902 TRANS_FEAT(NAME##_zpzi, aa64_sve, do_fp_imm, a, \
3903 name##_const[a->esz][a->imm], \
3904 s->fpcr_ah ? name##_ah_fns[a->esz] : name##_fns[a->esz])
3905
DO_FP_IMM(FADD,fadds,half,one)3906 DO_FP_IMM(FADD, fadds, half, one)
3907 DO_FP_IMM(FSUB, fsubs, half, one)
3908 DO_FP_IMM(FMUL, fmuls, half, two)
3909 DO_FP_IMM(FSUBR, fsubrs, half, one)
3910 DO_FP_IMM(FMAXNM, fmaxnms, zero, one)
3911 DO_FP_IMM(FMINNM, fminnms, zero, one)
3912 DO_FP_AH_IMM(FMAX, fmaxs, zero, one)
3913 DO_FP_AH_IMM(FMIN, fmins, zero, one)
3914
3915 #undef DO_FP_IMM
3916
3917 static bool do_fp_cmp(DisasContext *s, arg_rprr_esz *a,
3918 gen_helper_gvec_4_ptr *fn)
3919 {
3920 if (fn == NULL) {
3921 return false;
3922 }
3923 if (sve_access_check(s)) {
3924 unsigned vsz = vec_full_reg_size(s);
3925 TCGv_ptr status = fpstatus_ptr(a->esz == MO_16 ? FPST_A64_F16 : FPST_A64);
3926 tcg_gen_gvec_4_ptr(pred_full_reg_offset(s, a->rd),
3927 vec_full_reg_offset(s, a->rn),
3928 vec_full_reg_offset(s, a->rm),
3929 pred_full_reg_offset(s, a->pg),
3930 status, vsz, vsz, 0, fn);
3931 }
3932 return true;
3933 }
3934
3935 #define DO_FPCMP(NAME, name) \
3936 static gen_helper_gvec_4_ptr * const name##_fns[4] = { \
3937 NULL, gen_helper_sve_##name##_h, \
3938 gen_helper_sve_##name##_s, gen_helper_sve_##name##_d \
3939 }; \
3940 TRANS_FEAT(NAME##_ppzz, aa64_sve, do_fp_cmp, a, name##_fns[a->esz])
3941
3942 DO_FPCMP(FCMGE, fcmge)
3943 DO_FPCMP(FCMGT, fcmgt)
3944 DO_FPCMP(FCMEQ, fcmeq)
3945 DO_FPCMP(FCMNE, fcmne)
3946 DO_FPCMP(FCMUO, fcmuo)
3947 DO_FPCMP(FACGE, facge)
3948 DO_FPCMP(FACGT, facgt)
3949
3950 #undef DO_FPCMP
3951
3952 static gen_helper_gvec_4_ptr * const fcadd_fns[] = {
3953 NULL, gen_helper_sve_fcadd_h,
3954 gen_helper_sve_fcadd_s, gen_helper_sve_fcadd_d,
3955 };
3956 TRANS_FEAT(FCADD, aa64_sve, gen_gvec_fpst_zzzp, fcadd_fns[a->esz],
3957 a->rd, a->rn, a->rm, a->pg, a->rot | (s->fpcr_ah << 1),
3958 a->esz == MO_16 ? FPST_A64_F16 : FPST_A64)
3959
3960 #define DO_FMLA(NAME, name, ah_name) \
3961 static gen_helper_gvec_5_ptr * const name##_fns[4] = { \
3962 NULL, gen_helper_sve_##name##_h, \
3963 gen_helper_sve_##name##_s, gen_helper_sve_##name##_d \
3964 }; \
3965 static gen_helper_gvec_5_ptr * const name##_ah_fns[4] = { \
3966 NULL, gen_helper_sve_##ah_name##_h, \
3967 gen_helper_sve_##ah_name##_s, gen_helper_sve_##ah_name##_d \
3968 }; \
3969 TRANS_FEAT(NAME, aa64_sve, gen_gvec_fpst_zzzzp, \
3970 s->fpcr_ah ? name##_ah_fns[a->esz] : name##_fns[a->esz], \
3971 a->rd, a->rn, a->rm, a->ra, a->pg, 0, \
3972 a->esz == MO_16 ? FPST_A64_F16 : FPST_A64)
3973
3974 /* We don't need an ah_fmla_zpzzz because fmla doesn't negate anything */
3975 DO_FMLA(FMLA_zpzzz, fmla_zpzzz, fmla_zpzzz)
3976 DO_FMLA(FMLS_zpzzz, fmls_zpzzz, ah_fmls_zpzzz)
3977 DO_FMLA(FNMLA_zpzzz, fnmla_zpzzz, ah_fnmla_zpzzz)
3978 DO_FMLA(FNMLS_zpzzz, fnmls_zpzzz, ah_fnmls_zpzzz)
3979
3980 #undef DO_FMLA
3981
3982 static gen_helper_gvec_5_ptr * const fcmla_fns[4] = {
3983 NULL, gen_helper_sve_fcmla_zpzzz_h,
3984 gen_helper_sve_fcmla_zpzzz_s, gen_helper_sve_fcmla_zpzzz_d,
3985 };
3986 TRANS_FEAT(FCMLA_zpzzz, aa64_sve, gen_gvec_fpst_zzzzp, fcmla_fns[a->esz],
3987 a->rd, a->rn, a->rm, a->ra, a->pg, a->rot | (s->fpcr_ah << 2),
3988 a->esz == MO_16 ? FPST_A64_F16 : FPST_A64)
3989
3990 static gen_helper_gvec_4_ptr * const fcmla_idx_fns[4] = {
3991 NULL, gen_helper_gvec_fcmlah_idx, gen_helper_gvec_fcmlas_idx, NULL
3992 };
3993 TRANS_FEAT(FCMLA_zzxz, aa64_sve, gen_gvec_fpst_zzzz, fcmla_idx_fns[a->esz],
3994 a->rd, a->rn, a->rm, a->ra, a->index * 4 + a->rot,
3995 a->esz == MO_16 ? FPST_A64_F16 : FPST_A64)
3996
3997 /*
3998 *** SVE Floating Point Unary Operations Predicated Group
3999 */
4000
4001 TRANS_FEAT(FCVT_sh, aa64_sve, gen_gvec_fpst_arg_zpz,
4002 gen_helper_sve_fcvt_sh, a, 0, FPST_A64)
4003 TRANS_FEAT(FCVT_hs, aa64_sve, gen_gvec_fpst_arg_zpz,
4004 gen_helper_sve_fcvt_hs, a, 0, FPST_A64_F16)
4005
4006 TRANS_FEAT(BFCVT, aa64_sve_bf16, gen_gvec_fpst_arg_zpz,
4007 gen_helper_sve_bfcvt, a, 0,
4008 s->fpcr_ah ? FPST_AH : FPST_A64)
4009
4010 TRANS_FEAT(FCVT_dh, aa64_sve, gen_gvec_fpst_arg_zpz,
4011 gen_helper_sve_fcvt_dh, a, 0, FPST_A64)
4012 TRANS_FEAT(FCVT_hd, aa64_sve, gen_gvec_fpst_arg_zpz,
4013 gen_helper_sve_fcvt_hd, a, 0, FPST_A64_F16)
4014 TRANS_FEAT(FCVT_ds, aa64_sve, gen_gvec_fpst_arg_zpz,
4015 gen_helper_sve_fcvt_ds, a, 0, FPST_A64)
4016 TRANS_FEAT(FCVT_sd, aa64_sve, gen_gvec_fpst_arg_zpz,
4017 gen_helper_sve_fcvt_sd, a, 0, FPST_A64)
4018
4019 TRANS_FEAT(FCVTZS_hh, aa64_sve, gen_gvec_fpst_arg_zpz,
4020 gen_helper_sve_fcvtzs_hh, a, 0, FPST_A64_F16)
4021 TRANS_FEAT(FCVTZU_hh, aa64_sve, gen_gvec_fpst_arg_zpz,
4022 gen_helper_sve_fcvtzu_hh, a, 0, FPST_A64_F16)
4023 TRANS_FEAT(FCVTZS_hs, aa64_sve, gen_gvec_fpst_arg_zpz,
4024 gen_helper_sve_fcvtzs_hs, a, 0, FPST_A64_F16)
4025 TRANS_FEAT(FCVTZU_hs, aa64_sve, gen_gvec_fpst_arg_zpz,
4026 gen_helper_sve_fcvtzu_hs, a, 0, FPST_A64_F16)
4027 TRANS_FEAT(FCVTZS_hd, aa64_sve, gen_gvec_fpst_arg_zpz,
4028 gen_helper_sve_fcvtzs_hd, a, 0, FPST_A64_F16)
4029 TRANS_FEAT(FCVTZU_hd, aa64_sve, gen_gvec_fpst_arg_zpz,
4030 gen_helper_sve_fcvtzu_hd, a, 0, FPST_A64_F16)
4031
4032 TRANS_FEAT(FCVTZS_ss, aa64_sve, gen_gvec_fpst_arg_zpz,
4033 gen_helper_sve_fcvtzs_ss, a, 0, FPST_A64)
4034 TRANS_FEAT(FCVTZU_ss, aa64_sve, gen_gvec_fpst_arg_zpz,
4035 gen_helper_sve_fcvtzu_ss, a, 0, FPST_A64)
4036 TRANS_FEAT(FCVTZS_sd, aa64_sve, gen_gvec_fpst_arg_zpz,
4037 gen_helper_sve_fcvtzs_sd, a, 0, FPST_A64)
4038 TRANS_FEAT(FCVTZU_sd, aa64_sve, gen_gvec_fpst_arg_zpz,
4039 gen_helper_sve_fcvtzu_sd, a, 0, FPST_A64)
4040 TRANS_FEAT(FCVTZS_ds, aa64_sve, gen_gvec_fpst_arg_zpz,
4041 gen_helper_sve_fcvtzs_ds, a, 0, FPST_A64)
4042 TRANS_FEAT(FCVTZU_ds, aa64_sve, gen_gvec_fpst_arg_zpz,
4043 gen_helper_sve_fcvtzu_ds, a, 0, FPST_A64)
4044
4045 TRANS_FEAT(FCVTZS_dd, aa64_sve, gen_gvec_fpst_arg_zpz,
4046 gen_helper_sve_fcvtzs_dd, a, 0, FPST_A64)
4047 TRANS_FEAT(FCVTZU_dd, aa64_sve, gen_gvec_fpst_arg_zpz,
4048 gen_helper_sve_fcvtzu_dd, a, 0, FPST_A64)
4049
4050 static gen_helper_gvec_3_ptr * const frint_fns[] = {
4051 NULL,
4052 gen_helper_sve_frint_h,
4053 gen_helper_sve_frint_s,
4054 gen_helper_sve_frint_d
4055 };
4056 TRANS_FEAT(FRINTI, aa64_sve, gen_gvec_fpst_arg_zpz, frint_fns[a->esz],
4057 a, 0, a->esz == MO_16 ? FPST_A64_F16 : FPST_A64)
4058
4059 static gen_helper_gvec_3_ptr * const frintx_fns[] = {
4060 NULL,
4061 gen_helper_sve_frintx_h,
4062 gen_helper_sve_frintx_s,
4063 gen_helper_sve_frintx_d
4064 };
4065 TRANS_FEAT(FRINTX, aa64_sve, gen_gvec_fpst_arg_zpz, frintx_fns[a->esz],
4066 a, 0, a->esz == MO_16 ? FPST_A64_F16 : FPST_A64);
4067
do_frint_mode(DisasContext * s,arg_rpr_esz * a,ARMFPRounding mode,gen_helper_gvec_3_ptr * fn)4068 static bool do_frint_mode(DisasContext *s, arg_rpr_esz *a,
4069 ARMFPRounding mode, gen_helper_gvec_3_ptr *fn)
4070 {
4071 unsigned vsz;
4072 TCGv_i32 tmode;
4073 TCGv_ptr status;
4074
4075 if (fn == NULL) {
4076 return false;
4077 }
4078 if (!sve_access_check(s)) {
4079 return true;
4080 }
4081
4082 vsz = vec_full_reg_size(s);
4083 status = fpstatus_ptr(a->esz == MO_16 ? FPST_A64_F16 : FPST_A64);
4084 tmode = gen_set_rmode(mode, status);
4085
4086 tcg_gen_gvec_3_ptr(vec_full_reg_offset(s, a->rd),
4087 vec_full_reg_offset(s, a->rn),
4088 pred_full_reg_offset(s, a->pg),
4089 status, vsz, vsz, 0, fn);
4090
4091 gen_restore_rmode(tmode, status);
4092 return true;
4093 }
4094
4095 TRANS_FEAT(FRINTN, aa64_sve, do_frint_mode, a,
4096 FPROUNDING_TIEEVEN, frint_fns[a->esz])
4097 TRANS_FEAT(FRINTP, aa64_sve, do_frint_mode, a,
4098 FPROUNDING_POSINF, frint_fns[a->esz])
4099 TRANS_FEAT(FRINTM, aa64_sve, do_frint_mode, a,
4100 FPROUNDING_NEGINF, frint_fns[a->esz])
4101 TRANS_FEAT(FRINTZ, aa64_sve, do_frint_mode, a,
4102 FPROUNDING_ZERO, frint_fns[a->esz])
4103 TRANS_FEAT(FRINTA, aa64_sve, do_frint_mode, a,
4104 FPROUNDING_TIEAWAY, frint_fns[a->esz])
4105
4106 static gen_helper_gvec_3_ptr * const frecpx_fns[] = {
4107 NULL, gen_helper_sve_frecpx_h,
4108 gen_helper_sve_frecpx_s, gen_helper_sve_frecpx_d,
4109 };
4110 TRANS_FEAT(FRECPX, aa64_sve, gen_gvec_fpst_arg_zpz, frecpx_fns[a->esz],
4111 a, 0, select_ah_fpst(s, a->esz))
4112
4113 static gen_helper_gvec_3_ptr * const fsqrt_fns[] = {
4114 NULL, gen_helper_sve_fsqrt_h,
4115 gen_helper_sve_fsqrt_s, gen_helper_sve_fsqrt_d,
4116 };
4117 TRANS_FEAT(FSQRT, aa64_sve, gen_gvec_fpst_arg_zpz, fsqrt_fns[a->esz],
4118 a, 0, a->esz == MO_16 ? FPST_A64_F16 : FPST_A64)
4119
4120 TRANS_FEAT(SCVTF_hh, aa64_sve, gen_gvec_fpst_arg_zpz,
4121 gen_helper_sve_scvt_hh, a, 0, FPST_A64_F16)
4122 TRANS_FEAT(SCVTF_sh, aa64_sve, gen_gvec_fpst_arg_zpz,
4123 gen_helper_sve_scvt_sh, a, 0, FPST_A64_F16)
4124 TRANS_FEAT(SCVTF_dh, aa64_sve, gen_gvec_fpst_arg_zpz,
4125 gen_helper_sve_scvt_dh, a, 0, FPST_A64_F16)
4126
4127 TRANS_FEAT(SCVTF_ss, aa64_sve, gen_gvec_fpst_arg_zpz,
4128 gen_helper_sve_scvt_ss, a, 0, FPST_A64)
4129 TRANS_FEAT(SCVTF_ds, aa64_sve, gen_gvec_fpst_arg_zpz,
4130 gen_helper_sve_scvt_ds, a, 0, FPST_A64)
4131
4132 TRANS_FEAT(SCVTF_sd, aa64_sve, gen_gvec_fpst_arg_zpz,
4133 gen_helper_sve_scvt_sd, a, 0, FPST_A64)
4134 TRANS_FEAT(SCVTF_dd, aa64_sve, gen_gvec_fpst_arg_zpz,
4135 gen_helper_sve_scvt_dd, a, 0, FPST_A64)
4136
4137 TRANS_FEAT(UCVTF_hh, aa64_sve, gen_gvec_fpst_arg_zpz,
4138 gen_helper_sve_ucvt_hh, a, 0, FPST_A64_F16)
4139 TRANS_FEAT(UCVTF_sh, aa64_sve, gen_gvec_fpst_arg_zpz,
4140 gen_helper_sve_ucvt_sh, a, 0, FPST_A64_F16)
4141 TRANS_FEAT(UCVTF_dh, aa64_sve, gen_gvec_fpst_arg_zpz,
4142 gen_helper_sve_ucvt_dh, a, 0, FPST_A64_F16)
4143
4144 TRANS_FEAT(UCVTF_ss, aa64_sve, gen_gvec_fpst_arg_zpz,
4145 gen_helper_sve_ucvt_ss, a, 0, FPST_A64)
4146 TRANS_FEAT(UCVTF_ds, aa64_sve, gen_gvec_fpst_arg_zpz,
4147 gen_helper_sve_ucvt_ds, a, 0, FPST_A64)
4148 TRANS_FEAT(UCVTF_sd, aa64_sve, gen_gvec_fpst_arg_zpz,
4149 gen_helper_sve_ucvt_sd, a, 0, FPST_A64)
4150
4151 TRANS_FEAT(UCVTF_dd, aa64_sve, gen_gvec_fpst_arg_zpz,
4152 gen_helper_sve_ucvt_dd, a, 0, FPST_A64)
4153
4154 /*
4155 *** SVE Memory - 32-bit Gather and Unsized Contiguous Group
4156 */
4157
4158 /* Subroutine loading a vector register at VOFS of LEN bytes.
4159 * The load should begin at the address Rn + IMM.
4160 */
4161
gen_sve_ldr(DisasContext * s,TCGv_ptr base,int vofs,int len,int rn,int imm)4162 void gen_sve_ldr(DisasContext *s, TCGv_ptr base, int vofs,
4163 int len, int rn, int imm)
4164 {
4165 int len_align = QEMU_ALIGN_DOWN(len, 16);
4166 int len_remain = len % 16;
4167 int nparts = len / 16 + ctpop8(len_remain);
4168 int midx = get_mem_index(s);
4169 TCGv_i64 dirty_addr, clean_addr, t0, t1;
4170 TCGv_i128 t16;
4171
4172 dirty_addr = tcg_temp_new_i64();
4173 tcg_gen_addi_i64(dirty_addr, cpu_reg_sp(s, rn), imm);
4174 clean_addr = gen_mte_checkN(s, dirty_addr, false, rn != 31, len, MO_8);
4175
4176 /*
4177 * Note that unpredicated load/store of vector/predicate registers
4178 * are defined as a stream of bytes, which equates to little-endian
4179 * operations on larger quantities.
4180 * Attempt to keep code expansion to a minimum by limiting the
4181 * amount of unrolling done.
4182 */
4183 if (nparts <= 4) {
4184 int i;
4185
4186 t0 = tcg_temp_new_i64();
4187 t1 = tcg_temp_new_i64();
4188 t16 = tcg_temp_new_i128();
4189
4190 for (i = 0; i < len_align; i += 16) {
4191 tcg_gen_qemu_ld_i128(t16, clean_addr, midx,
4192 MO_LE | MO_128 | MO_ATOM_NONE);
4193 tcg_gen_extr_i128_i64(t0, t1, t16);
4194 tcg_gen_st_i64(t0, base, vofs + i);
4195 tcg_gen_st_i64(t1, base, vofs + i + 8);
4196 tcg_gen_addi_i64(clean_addr, clean_addr, 16);
4197 }
4198 } else {
4199 TCGLabel *loop = gen_new_label();
4200 TCGv_ptr tp, i = tcg_temp_new_ptr();
4201
4202 tcg_gen_movi_ptr(i, 0);
4203 gen_set_label(loop);
4204
4205 t16 = tcg_temp_new_i128();
4206 tcg_gen_qemu_ld_i128(t16, clean_addr, midx,
4207 MO_LE | MO_128 | MO_ATOM_NONE);
4208 tcg_gen_addi_i64(clean_addr, clean_addr, 16);
4209
4210 tp = tcg_temp_new_ptr();
4211 tcg_gen_add_ptr(tp, base, i);
4212 tcg_gen_addi_ptr(i, i, 16);
4213
4214 t0 = tcg_temp_new_i64();
4215 t1 = tcg_temp_new_i64();
4216 tcg_gen_extr_i128_i64(t0, t1, t16);
4217
4218 tcg_gen_st_i64(t0, tp, vofs);
4219 tcg_gen_st_i64(t1, tp, vofs + 8);
4220
4221 tcg_gen_brcondi_ptr(TCG_COND_LTU, i, len_align, loop);
4222 }
4223
4224 /*
4225 * Predicate register loads can be any multiple of 2.
4226 * Note that we still store the entire 64-bit unit into tcg_env.
4227 */
4228 if (len_remain >= 8) {
4229 t0 = tcg_temp_new_i64();
4230 tcg_gen_qemu_ld_i64(t0, clean_addr, midx, MO_LEUQ | MO_ATOM_NONE);
4231 tcg_gen_st_i64(t0, base, vofs + len_align);
4232 len_remain -= 8;
4233 len_align += 8;
4234 if (len_remain) {
4235 tcg_gen_addi_i64(clean_addr, clean_addr, 8);
4236 }
4237 }
4238 if (len_remain) {
4239 t0 = tcg_temp_new_i64();
4240 switch (len_remain) {
4241 case 2:
4242 case 4:
4243 case 8:
4244 tcg_gen_qemu_ld_i64(t0, clean_addr, midx,
4245 MO_LE | ctz32(len_remain) | MO_ATOM_NONE);
4246 break;
4247
4248 case 6:
4249 t1 = tcg_temp_new_i64();
4250 tcg_gen_qemu_ld_i64(t0, clean_addr, midx, MO_LEUL | MO_ATOM_NONE);
4251 tcg_gen_addi_i64(clean_addr, clean_addr, 4);
4252 tcg_gen_qemu_ld_i64(t1, clean_addr, midx, MO_LEUW | MO_ATOM_NONE);
4253 tcg_gen_deposit_i64(t0, t0, t1, 32, 32);
4254 break;
4255
4256 default:
4257 g_assert_not_reached();
4258 }
4259 tcg_gen_st_i64(t0, base, vofs + len_align);
4260 }
4261 }
4262
4263 /* Similarly for stores. */
gen_sve_str(DisasContext * s,TCGv_ptr base,int vofs,int len,int rn,int imm)4264 void gen_sve_str(DisasContext *s, TCGv_ptr base, int vofs,
4265 int len, int rn, int imm)
4266 {
4267 int len_align = QEMU_ALIGN_DOWN(len, 16);
4268 int len_remain = len % 16;
4269 int nparts = len / 16 + ctpop8(len_remain);
4270 int midx = get_mem_index(s);
4271 TCGv_i64 dirty_addr, clean_addr, t0, t1;
4272 TCGv_i128 t16;
4273
4274 dirty_addr = tcg_temp_new_i64();
4275 tcg_gen_addi_i64(dirty_addr, cpu_reg_sp(s, rn), imm);
4276 clean_addr = gen_mte_checkN(s, dirty_addr, false, rn != 31, len, MO_8);
4277
4278 /* Note that unpredicated load/store of vector/predicate registers
4279 * are defined as a stream of bytes, which equates to little-endian
4280 * operations on larger quantities. There is no nice way to force
4281 * a little-endian store for aarch64_be-linux-user out of line.
4282 *
4283 * Attempt to keep code expansion to a minimum by limiting the
4284 * amount of unrolling done.
4285 */
4286 if (nparts <= 4) {
4287 int i;
4288
4289 t0 = tcg_temp_new_i64();
4290 t1 = tcg_temp_new_i64();
4291 t16 = tcg_temp_new_i128();
4292 for (i = 0; i < len_align; i += 16) {
4293 tcg_gen_ld_i64(t0, base, vofs + i);
4294 tcg_gen_ld_i64(t1, base, vofs + i + 8);
4295 tcg_gen_concat_i64_i128(t16, t0, t1);
4296 tcg_gen_qemu_st_i128(t16, clean_addr, midx,
4297 MO_LE | MO_128 | MO_ATOM_NONE);
4298 tcg_gen_addi_i64(clean_addr, clean_addr, 16);
4299 }
4300 } else {
4301 TCGLabel *loop = gen_new_label();
4302 TCGv_ptr tp, i = tcg_temp_new_ptr();
4303
4304 tcg_gen_movi_ptr(i, 0);
4305 gen_set_label(loop);
4306
4307 t0 = tcg_temp_new_i64();
4308 t1 = tcg_temp_new_i64();
4309 tp = tcg_temp_new_ptr();
4310 tcg_gen_add_ptr(tp, base, i);
4311 tcg_gen_ld_i64(t0, tp, vofs);
4312 tcg_gen_ld_i64(t1, tp, vofs + 8);
4313 tcg_gen_addi_ptr(i, i, 16);
4314
4315 t16 = tcg_temp_new_i128();
4316 tcg_gen_concat_i64_i128(t16, t0, t1);
4317
4318 tcg_gen_qemu_st_i128(t16, clean_addr, midx,
4319 MO_LE | MO_128 | MO_ATOM_NONE);
4320 tcg_gen_addi_i64(clean_addr, clean_addr, 16);
4321
4322 tcg_gen_brcondi_ptr(TCG_COND_LTU, i, len_align, loop);
4323 }
4324
4325 /* Predicate register stores can be any multiple of 2. */
4326 if (len_remain >= 8) {
4327 t0 = tcg_temp_new_i64();
4328 tcg_gen_ld_i64(t0, base, vofs + len_align);
4329 tcg_gen_qemu_st_i64(t0, clean_addr, midx, MO_LEUQ | MO_ATOM_NONE);
4330 len_remain -= 8;
4331 len_align += 8;
4332 if (len_remain) {
4333 tcg_gen_addi_i64(clean_addr, clean_addr, 8);
4334 }
4335 }
4336 if (len_remain) {
4337 t0 = tcg_temp_new_i64();
4338 tcg_gen_ld_i64(t0, base, vofs + len_align);
4339
4340 switch (len_remain) {
4341 case 2:
4342 case 4:
4343 case 8:
4344 tcg_gen_qemu_st_i64(t0, clean_addr, midx,
4345 MO_LE | ctz32(len_remain) | MO_ATOM_NONE);
4346 break;
4347
4348 case 6:
4349 tcg_gen_qemu_st_i64(t0, clean_addr, midx, MO_LEUL | MO_ATOM_NONE);
4350 tcg_gen_addi_i64(clean_addr, clean_addr, 4);
4351 tcg_gen_shri_i64(t0, t0, 32);
4352 tcg_gen_qemu_st_i64(t0, clean_addr, midx, MO_LEUW | MO_ATOM_NONE);
4353 break;
4354
4355 default:
4356 g_assert_not_reached();
4357 }
4358 }
4359 }
4360
trans_LDR_zri(DisasContext * s,arg_rri * a)4361 static bool trans_LDR_zri(DisasContext *s, arg_rri *a)
4362 {
4363 if (!dc_isar_feature(aa64_sve, s)) {
4364 return false;
4365 }
4366 if (sve_access_check(s)) {
4367 int size = vec_full_reg_size(s);
4368 int off = vec_full_reg_offset(s, a->rd);
4369 gen_sve_ldr(s, tcg_env, off, size, a->rn, a->imm * size);
4370 }
4371 return true;
4372 }
4373
trans_LDR_pri(DisasContext * s,arg_rri * a)4374 static bool trans_LDR_pri(DisasContext *s, arg_rri *a)
4375 {
4376 if (!dc_isar_feature(aa64_sve, s)) {
4377 return false;
4378 }
4379 if (sve_access_check(s)) {
4380 int size = pred_full_reg_size(s);
4381 int off = pred_full_reg_offset(s, a->rd);
4382 gen_sve_ldr(s, tcg_env, off, size, a->rn, a->imm * size);
4383 }
4384 return true;
4385 }
4386
trans_STR_zri(DisasContext * s,arg_rri * a)4387 static bool trans_STR_zri(DisasContext *s, arg_rri *a)
4388 {
4389 if (!dc_isar_feature(aa64_sve, s)) {
4390 return false;
4391 }
4392 if (sve_access_check(s)) {
4393 int size = vec_full_reg_size(s);
4394 int off = vec_full_reg_offset(s, a->rd);
4395 gen_sve_str(s, tcg_env, off, size, a->rn, a->imm * size);
4396 }
4397 return true;
4398 }
4399
trans_STR_pri(DisasContext * s,arg_rri * a)4400 static bool trans_STR_pri(DisasContext *s, arg_rri *a)
4401 {
4402 if (!dc_isar_feature(aa64_sve, s)) {
4403 return false;
4404 }
4405 if (sve_access_check(s)) {
4406 int size = pred_full_reg_size(s);
4407 int off = pred_full_reg_offset(s, a->rd);
4408 gen_sve_str(s, tcg_env, off, size, a->rn, a->imm * size);
4409 }
4410 return true;
4411 }
4412
4413 /*
4414 *** SVE Memory - Contiguous Load Group
4415 */
4416
4417 /* The memory mode of the dtype. */
4418 static const MemOp dtype_mop[16] = {
4419 MO_UB, MO_UB, MO_UB, MO_UB,
4420 MO_SL, MO_UW, MO_UW, MO_UW,
4421 MO_SW, MO_SW, MO_UL, MO_UL,
4422 MO_SB, MO_SB, MO_SB, MO_UQ
4423 };
4424
4425 #define dtype_msz(x) (dtype_mop[x] & MO_SIZE)
4426
4427 /* The vector element size of dtype. */
4428 static const uint8_t dtype_esz[16] = {
4429 0, 1, 2, 3,
4430 3, 1, 2, 3,
4431 3, 2, 2, 3,
4432 3, 2, 1, 3
4433 };
4434
make_svemte_desc(DisasContext * s,unsigned vsz,uint32_t nregs,uint32_t msz,bool is_write,uint32_t data)4435 uint32_t make_svemte_desc(DisasContext *s, unsigned vsz, uint32_t nregs,
4436 uint32_t msz, bool is_write, uint32_t data)
4437 {
4438 uint32_t sizem1;
4439 uint32_t desc = 0;
4440
4441 /* Assert all of the data fits, with or without MTE enabled. */
4442 assert(nregs >= 1 && nregs <= 4);
4443 sizem1 = (nregs << msz) - 1;
4444 assert(sizem1 <= R_MTEDESC_SIZEM1_MASK >> R_MTEDESC_SIZEM1_SHIFT);
4445 assert(data < 1u << SVE_MTEDESC_SHIFT);
4446
4447 if (s->mte_active[0]) {
4448 desc = FIELD_DP32(desc, MTEDESC, MIDX, get_mem_index(s));
4449 desc = FIELD_DP32(desc, MTEDESC, TBI, s->tbid);
4450 desc = FIELD_DP32(desc, MTEDESC, TCMA, s->tcma);
4451 desc = FIELD_DP32(desc, MTEDESC, WRITE, is_write);
4452 desc = FIELD_DP32(desc, MTEDESC, SIZEM1, sizem1);
4453 desc <<= SVE_MTEDESC_SHIFT;
4454 }
4455 return simd_desc(vsz, vsz, desc | data);
4456 }
4457
do_mem_zpa(DisasContext * s,int zt,int pg,TCGv_i64 addr,int dtype,uint32_t nregs,bool is_write,gen_helper_gvec_mem * fn)4458 static void do_mem_zpa(DisasContext *s, int zt, int pg, TCGv_i64 addr,
4459 int dtype, uint32_t nregs, bool is_write,
4460 gen_helper_gvec_mem *fn)
4461 {
4462 TCGv_ptr t_pg;
4463 uint32_t desc;
4464
4465 if (!s->mte_active[0]) {
4466 addr = clean_data_tbi(s, addr);
4467 }
4468
4469 /*
4470 * For e.g. LD4, there are not enough arguments to pass all 4
4471 * registers as pointers, so encode the regno into the data field.
4472 * For consistency, do this even for LD1.
4473 */
4474 desc = make_svemte_desc(s, vec_full_reg_size(s), nregs,
4475 dtype_msz(dtype), is_write, zt);
4476 t_pg = tcg_temp_new_ptr();
4477
4478 tcg_gen_addi_ptr(t_pg, tcg_env, pred_full_reg_offset(s, pg));
4479 fn(tcg_env, t_pg, addr, tcg_constant_i32(desc));
4480 }
4481
4482 /* Indexed by [mte][be][dtype][nreg] */
4483 static gen_helper_gvec_mem * const ldr_fns[2][2][16][4] = {
4484 { /* mte inactive, little-endian */
4485 { { gen_helper_sve_ld1bb_r, gen_helper_sve_ld2bb_r,
4486 gen_helper_sve_ld3bb_r, gen_helper_sve_ld4bb_r },
4487 { gen_helper_sve_ld1bhu_r, NULL, NULL, NULL },
4488 { gen_helper_sve_ld1bsu_r, NULL, NULL, NULL },
4489 { gen_helper_sve_ld1bdu_r, NULL, NULL, NULL },
4490
4491 { gen_helper_sve_ld1sds_le_r, NULL, NULL, NULL },
4492 { gen_helper_sve_ld1hh_le_r, gen_helper_sve_ld2hh_le_r,
4493 gen_helper_sve_ld3hh_le_r, gen_helper_sve_ld4hh_le_r },
4494 { gen_helper_sve_ld1hsu_le_r, NULL, NULL, NULL },
4495 { gen_helper_sve_ld1hdu_le_r, NULL, NULL, NULL },
4496
4497 { gen_helper_sve_ld1hds_le_r, NULL, NULL, NULL },
4498 { gen_helper_sve_ld1hss_le_r, NULL, NULL, NULL },
4499 { gen_helper_sve_ld1ss_le_r, gen_helper_sve_ld2ss_le_r,
4500 gen_helper_sve_ld3ss_le_r, gen_helper_sve_ld4ss_le_r },
4501 { gen_helper_sve_ld1sdu_le_r, NULL, NULL, NULL },
4502
4503 { gen_helper_sve_ld1bds_r, NULL, NULL, NULL },
4504 { gen_helper_sve_ld1bss_r, NULL, NULL, NULL },
4505 { gen_helper_sve_ld1bhs_r, NULL, NULL, NULL },
4506 { gen_helper_sve_ld1dd_le_r, gen_helper_sve_ld2dd_le_r,
4507 gen_helper_sve_ld3dd_le_r, gen_helper_sve_ld4dd_le_r } },
4508
4509 /* mte inactive, big-endian */
4510 { { gen_helper_sve_ld1bb_r, gen_helper_sve_ld2bb_r,
4511 gen_helper_sve_ld3bb_r, gen_helper_sve_ld4bb_r },
4512 { gen_helper_sve_ld1bhu_r, NULL, NULL, NULL },
4513 { gen_helper_sve_ld1bsu_r, NULL, NULL, NULL },
4514 { gen_helper_sve_ld1bdu_r, NULL, NULL, NULL },
4515
4516 { gen_helper_sve_ld1sds_be_r, NULL, NULL, NULL },
4517 { gen_helper_sve_ld1hh_be_r, gen_helper_sve_ld2hh_be_r,
4518 gen_helper_sve_ld3hh_be_r, gen_helper_sve_ld4hh_be_r },
4519 { gen_helper_sve_ld1hsu_be_r, NULL, NULL, NULL },
4520 { gen_helper_sve_ld1hdu_be_r, NULL, NULL, NULL },
4521
4522 { gen_helper_sve_ld1hds_be_r, NULL, NULL, NULL },
4523 { gen_helper_sve_ld1hss_be_r, NULL, NULL, NULL },
4524 { gen_helper_sve_ld1ss_be_r, gen_helper_sve_ld2ss_be_r,
4525 gen_helper_sve_ld3ss_be_r, gen_helper_sve_ld4ss_be_r },
4526 { gen_helper_sve_ld1sdu_be_r, NULL, NULL, NULL },
4527
4528 { gen_helper_sve_ld1bds_r, NULL, NULL, NULL },
4529 { gen_helper_sve_ld1bss_r, NULL, NULL, NULL },
4530 { gen_helper_sve_ld1bhs_r, NULL, NULL, NULL },
4531 { gen_helper_sve_ld1dd_be_r, gen_helper_sve_ld2dd_be_r,
4532 gen_helper_sve_ld3dd_be_r, gen_helper_sve_ld4dd_be_r } } },
4533
4534 { /* mte active, little-endian */
4535 { { gen_helper_sve_ld1bb_r_mte,
4536 gen_helper_sve_ld2bb_r_mte,
4537 gen_helper_sve_ld3bb_r_mte,
4538 gen_helper_sve_ld4bb_r_mte },
4539 { gen_helper_sve_ld1bhu_r_mte, NULL, NULL, NULL },
4540 { gen_helper_sve_ld1bsu_r_mte, NULL, NULL, NULL },
4541 { gen_helper_sve_ld1bdu_r_mte, NULL, NULL, NULL },
4542
4543 { gen_helper_sve_ld1sds_le_r_mte, NULL, NULL, NULL },
4544 { gen_helper_sve_ld1hh_le_r_mte,
4545 gen_helper_sve_ld2hh_le_r_mte,
4546 gen_helper_sve_ld3hh_le_r_mte,
4547 gen_helper_sve_ld4hh_le_r_mte },
4548 { gen_helper_sve_ld1hsu_le_r_mte, NULL, NULL, NULL },
4549 { gen_helper_sve_ld1hdu_le_r_mte, NULL, NULL, NULL },
4550
4551 { gen_helper_sve_ld1hds_le_r_mte, NULL, NULL, NULL },
4552 { gen_helper_sve_ld1hss_le_r_mte, NULL, NULL, NULL },
4553 { gen_helper_sve_ld1ss_le_r_mte,
4554 gen_helper_sve_ld2ss_le_r_mte,
4555 gen_helper_sve_ld3ss_le_r_mte,
4556 gen_helper_sve_ld4ss_le_r_mte },
4557 { gen_helper_sve_ld1sdu_le_r_mte, NULL, NULL, NULL },
4558
4559 { gen_helper_sve_ld1bds_r_mte, NULL, NULL, NULL },
4560 { gen_helper_sve_ld1bss_r_mte, NULL, NULL, NULL },
4561 { gen_helper_sve_ld1bhs_r_mte, NULL, NULL, NULL },
4562 { gen_helper_sve_ld1dd_le_r_mte,
4563 gen_helper_sve_ld2dd_le_r_mte,
4564 gen_helper_sve_ld3dd_le_r_mte,
4565 gen_helper_sve_ld4dd_le_r_mte } },
4566
4567 /* mte active, big-endian */
4568 { { gen_helper_sve_ld1bb_r_mte,
4569 gen_helper_sve_ld2bb_r_mte,
4570 gen_helper_sve_ld3bb_r_mte,
4571 gen_helper_sve_ld4bb_r_mte },
4572 { gen_helper_sve_ld1bhu_r_mte, NULL, NULL, NULL },
4573 { gen_helper_sve_ld1bsu_r_mte, NULL, NULL, NULL },
4574 { gen_helper_sve_ld1bdu_r_mte, NULL, NULL, NULL },
4575
4576 { gen_helper_sve_ld1sds_be_r_mte, NULL, NULL, NULL },
4577 { gen_helper_sve_ld1hh_be_r_mte,
4578 gen_helper_sve_ld2hh_be_r_mte,
4579 gen_helper_sve_ld3hh_be_r_mte,
4580 gen_helper_sve_ld4hh_be_r_mte },
4581 { gen_helper_sve_ld1hsu_be_r_mte, NULL, NULL, NULL },
4582 { gen_helper_sve_ld1hdu_be_r_mte, NULL, NULL, NULL },
4583
4584 { gen_helper_sve_ld1hds_be_r_mte, NULL, NULL, NULL },
4585 { gen_helper_sve_ld1hss_be_r_mte, NULL, NULL, NULL },
4586 { gen_helper_sve_ld1ss_be_r_mte,
4587 gen_helper_sve_ld2ss_be_r_mte,
4588 gen_helper_sve_ld3ss_be_r_mte,
4589 gen_helper_sve_ld4ss_be_r_mte },
4590 { gen_helper_sve_ld1sdu_be_r_mte, NULL, NULL, NULL },
4591
4592 { gen_helper_sve_ld1bds_r_mte, NULL, NULL, NULL },
4593 { gen_helper_sve_ld1bss_r_mte, NULL, NULL, NULL },
4594 { gen_helper_sve_ld1bhs_r_mte, NULL, NULL, NULL },
4595 { gen_helper_sve_ld1dd_be_r_mte,
4596 gen_helper_sve_ld2dd_be_r_mte,
4597 gen_helper_sve_ld3dd_be_r_mte,
4598 gen_helper_sve_ld4dd_be_r_mte } } },
4599 };
4600
do_ld_zpa(DisasContext * s,int zt,int pg,TCGv_i64 addr,int dtype,int nreg)4601 static void do_ld_zpa(DisasContext *s, int zt, int pg,
4602 TCGv_i64 addr, int dtype, int nreg)
4603 {
4604 gen_helper_gvec_mem *fn
4605 = ldr_fns[s->mte_active[0]][s->be_data == MO_BE][dtype][nreg];
4606
4607 /*
4608 * While there are holes in the table, they are not
4609 * accessible via the instruction encoding.
4610 */
4611 assert(fn != NULL);
4612 do_mem_zpa(s, zt, pg, addr, dtype, nreg + 1, false, fn);
4613 }
4614
trans_LD_zprr(DisasContext * s,arg_rprr_load * a)4615 static bool trans_LD_zprr(DisasContext *s, arg_rprr_load *a)
4616 {
4617 if (a->rm == 31 || !dc_isar_feature(aa64_sve, s)) {
4618 return false;
4619 }
4620 if (sve_access_check(s)) {
4621 TCGv_i64 addr = tcg_temp_new_i64();
4622 tcg_gen_shli_i64(addr, cpu_reg(s, a->rm), dtype_msz(a->dtype));
4623 tcg_gen_add_i64(addr, addr, cpu_reg_sp(s, a->rn));
4624 do_ld_zpa(s, a->rd, a->pg, addr, a->dtype, a->nreg);
4625 }
4626 return true;
4627 }
4628
trans_LD_zpri(DisasContext * s,arg_rpri_load * a)4629 static bool trans_LD_zpri(DisasContext *s, arg_rpri_load *a)
4630 {
4631 if (!dc_isar_feature(aa64_sve, s)) {
4632 return false;
4633 }
4634 if (sve_access_check(s)) {
4635 int vsz = vec_full_reg_size(s);
4636 int elements = vsz >> dtype_esz[a->dtype];
4637 TCGv_i64 addr = tcg_temp_new_i64();
4638
4639 tcg_gen_addi_i64(addr, cpu_reg_sp(s, a->rn),
4640 (a->imm * elements * (a->nreg + 1))
4641 << dtype_msz(a->dtype));
4642 do_ld_zpa(s, a->rd, a->pg, addr, a->dtype, a->nreg);
4643 }
4644 return true;
4645 }
4646
trans_LDFF1_zprr(DisasContext * s,arg_rprr_load * a)4647 static bool trans_LDFF1_zprr(DisasContext *s, arg_rprr_load *a)
4648 {
4649 static gen_helper_gvec_mem * const fns[2][2][16] = {
4650 { /* mte inactive, little-endian */
4651 { gen_helper_sve_ldff1bb_r,
4652 gen_helper_sve_ldff1bhu_r,
4653 gen_helper_sve_ldff1bsu_r,
4654 gen_helper_sve_ldff1bdu_r,
4655
4656 gen_helper_sve_ldff1sds_le_r,
4657 gen_helper_sve_ldff1hh_le_r,
4658 gen_helper_sve_ldff1hsu_le_r,
4659 gen_helper_sve_ldff1hdu_le_r,
4660
4661 gen_helper_sve_ldff1hds_le_r,
4662 gen_helper_sve_ldff1hss_le_r,
4663 gen_helper_sve_ldff1ss_le_r,
4664 gen_helper_sve_ldff1sdu_le_r,
4665
4666 gen_helper_sve_ldff1bds_r,
4667 gen_helper_sve_ldff1bss_r,
4668 gen_helper_sve_ldff1bhs_r,
4669 gen_helper_sve_ldff1dd_le_r },
4670
4671 /* mte inactive, big-endian */
4672 { gen_helper_sve_ldff1bb_r,
4673 gen_helper_sve_ldff1bhu_r,
4674 gen_helper_sve_ldff1bsu_r,
4675 gen_helper_sve_ldff1bdu_r,
4676
4677 gen_helper_sve_ldff1sds_be_r,
4678 gen_helper_sve_ldff1hh_be_r,
4679 gen_helper_sve_ldff1hsu_be_r,
4680 gen_helper_sve_ldff1hdu_be_r,
4681
4682 gen_helper_sve_ldff1hds_be_r,
4683 gen_helper_sve_ldff1hss_be_r,
4684 gen_helper_sve_ldff1ss_be_r,
4685 gen_helper_sve_ldff1sdu_be_r,
4686
4687 gen_helper_sve_ldff1bds_r,
4688 gen_helper_sve_ldff1bss_r,
4689 gen_helper_sve_ldff1bhs_r,
4690 gen_helper_sve_ldff1dd_be_r } },
4691
4692 { /* mte active, little-endian */
4693 { gen_helper_sve_ldff1bb_r_mte,
4694 gen_helper_sve_ldff1bhu_r_mte,
4695 gen_helper_sve_ldff1bsu_r_mte,
4696 gen_helper_sve_ldff1bdu_r_mte,
4697
4698 gen_helper_sve_ldff1sds_le_r_mte,
4699 gen_helper_sve_ldff1hh_le_r_mte,
4700 gen_helper_sve_ldff1hsu_le_r_mte,
4701 gen_helper_sve_ldff1hdu_le_r_mte,
4702
4703 gen_helper_sve_ldff1hds_le_r_mte,
4704 gen_helper_sve_ldff1hss_le_r_mte,
4705 gen_helper_sve_ldff1ss_le_r_mte,
4706 gen_helper_sve_ldff1sdu_le_r_mte,
4707
4708 gen_helper_sve_ldff1bds_r_mte,
4709 gen_helper_sve_ldff1bss_r_mte,
4710 gen_helper_sve_ldff1bhs_r_mte,
4711 gen_helper_sve_ldff1dd_le_r_mte },
4712
4713 /* mte active, big-endian */
4714 { gen_helper_sve_ldff1bb_r_mte,
4715 gen_helper_sve_ldff1bhu_r_mte,
4716 gen_helper_sve_ldff1bsu_r_mte,
4717 gen_helper_sve_ldff1bdu_r_mte,
4718
4719 gen_helper_sve_ldff1sds_be_r_mte,
4720 gen_helper_sve_ldff1hh_be_r_mte,
4721 gen_helper_sve_ldff1hsu_be_r_mte,
4722 gen_helper_sve_ldff1hdu_be_r_mte,
4723
4724 gen_helper_sve_ldff1hds_be_r_mte,
4725 gen_helper_sve_ldff1hss_be_r_mte,
4726 gen_helper_sve_ldff1ss_be_r_mte,
4727 gen_helper_sve_ldff1sdu_be_r_mte,
4728
4729 gen_helper_sve_ldff1bds_r_mte,
4730 gen_helper_sve_ldff1bss_r_mte,
4731 gen_helper_sve_ldff1bhs_r_mte,
4732 gen_helper_sve_ldff1dd_be_r_mte } },
4733 };
4734
4735 if (!dc_isar_feature(aa64_sve, s)) {
4736 return false;
4737 }
4738 s->is_nonstreaming = true;
4739 if (sve_access_check(s)) {
4740 TCGv_i64 addr = tcg_temp_new_i64();
4741 tcg_gen_shli_i64(addr, cpu_reg(s, a->rm), dtype_msz(a->dtype));
4742 tcg_gen_add_i64(addr, addr, cpu_reg_sp(s, a->rn));
4743 do_mem_zpa(s, a->rd, a->pg, addr, a->dtype, 1, false,
4744 fns[s->mte_active[0]][s->be_data == MO_BE][a->dtype]);
4745 }
4746 return true;
4747 }
4748
trans_LDNF1_zpri(DisasContext * s,arg_rpri_load * a)4749 static bool trans_LDNF1_zpri(DisasContext *s, arg_rpri_load *a)
4750 {
4751 static gen_helper_gvec_mem * const fns[2][2][16] = {
4752 { /* mte inactive, little-endian */
4753 { gen_helper_sve_ldnf1bb_r,
4754 gen_helper_sve_ldnf1bhu_r,
4755 gen_helper_sve_ldnf1bsu_r,
4756 gen_helper_sve_ldnf1bdu_r,
4757
4758 gen_helper_sve_ldnf1sds_le_r,
4759 gen_helper_sve_ldnf1hh_le_r,
4760 gen_helper_sve_ldnf1hsu_le_r,
4761 gen_helper_sve_ldnf1hdu_le_r,
4762
4763 gen_helper_sve_ldnf1hds_le_r,
4764 gen_helper_sve_ldnf1hss_le_r,
4765 gen_helper_sve_ldnf1ss_le_r,
4766 gen_helper_sve_ldnf1sdu_le_r,
4767
4768 gen_helper_sve_ldnf1bds_r,
4769 gen_helper_sve_ldnf1bss_r,
4770 gen_helper_sve_ldnf1bhs_r,
4771 gen_helper_sve_ldnf1dd_le_r },
4772
4773 /* mte inactive, big-endian */
4774 { gen_helper_sve_ldnf1bb_r,
4775 gen_helper_sve_ldnf1bhu_r,
4776 gen_helper_sve_ldnf1bsu_r,
4777 gen_helper_sve_ldnf1bdu_r,
4778
4779 gen_helper_sve_ldnf1sds_be_r,
4780 gen_helper_sve_ldnf1hh_be_r,
4781 gen_helper_sve_ldnf1hsu_be_r,
4782 gen_helper_sve_ldnf1hdu_be_r,
4783
4784 gen_helper_sve_ldnf1hds_be_r,
4785 gen_helper_sve_ldnf1hss_be_r,
4786 gen_helper_sve_ldnf1ss_be_r,
4787 gen_helper_sve_ldnf1sdu_be_r,
4788
4789 gen_helper_sve_ldnf1bds_r,
4790 gen_helper_sve_ldnf1bss_r,
4791 gen_helper_sve_ldnf1bhs_r,
4792 gen_helper_sve_ldnf1dd_be_r } },
4793
4794 { /* mte inactive, little-endian */
4795 { gen_helper_sve_ldnf1bb_r_mte,
4796 gen_helper_sve_ldnf1bhu_r_mte,
4797 gen_helper_sve_ldnf1bsu_r_mte,
4798 gen_helper_sve_ldnf1bdu_r_mte,
4799
4800 gen_helper_sve_ldnf1sds_le_r_mte,
4801 gen_helper_sve_ldnf1hh_le_r_mte,
4802 gen_helper_sve_ldnf1hsu_le_r_mte,
4803 gen_helper_sve_ldnf1hdu_le_r_mte,
4804
4805 gen_helper_sve_ldnf1hds_le_r_mte,
4806 gen_helper_sve_ldnf1hss_le_r_mte,
4807 gen_helper_sve_ldnf1ss_le_r_mte,
4808 gen_helper_sve_ldnf1sdu_le_r_mte,
4809
4810 gen_helper_sve_ldnf1bds_r_mte,
4811 gen_helper_sve_ldnf1bss_r_mte,
4812 gen_helper_sve_ldnf1bhs_r_mte,
4813 gen_helper_sve_ldnf1dd_le_r_mte },
4814
4815 /* mte inactive, big-endian */
4816 { gen_helper_sve_ldnf1bb_r_mte,
4817 gen_helper_sve_ldnf1bhu_r_mte,
4818 gen_helper_sve_ldnf1bsu_r_mte,
4819 gen_helper_sve_ldnf1bdu_r_mte,
4820
4821 gen_helper_sve_ldnf1sds_be_r_mte,
4822 gen_helper_sve_ldnf1hh_be_r_mte,
4823 gen_helper_sve_ldnf1hsu_be_r_mte,
4824 gen_helper_sve_ldnf1hdu_be_r_mte,
4825
4826 gen_helper_sve_ldnf1hds_be_r_mte,
4827 gen_helper_sve_ldnf1hss_be_r_mte,
4828 gen_helper_sve_ldnf1ss_be_r_mte,
4829 gen_helper_sve_ldnf1sdu_be_r_mte,
4830
4831 gen_helper_sve_ldnf1bds_r_mte,
4832 gen_helper_sve_ldnf1bss_r_mte,
4833 gen_helper_sve_ldnf1bhs_r_mte,
4834 gen_helper_sve_ldnf1dd_be_r_mte } },
4835 };
4836
4837 if (!dc_isar_feature(aa64_sve, s)) {
4838 return false;
4839 }
4840 s->is_nonstreaming = true;
4841 if (sve_access_check(s)) {
4842 int vsz = vec_full_reg_size(s);
4843 int elements = vsz >> dtype_esz[a->dtype];
4844 int off = (a->imm * elements) << dtype_msz(a->dtype);
4845 TCGv_i64 addr = tcg_temp_new_i64();
4846
4847 tcg_gen_addi_i64(addr, cpu_reg_sp(s, a->rn), off);
4848 do_mem_zpa(s, a->rd, a->pg, addr, a->dtype, 1, false,
4849 fns[s->mte_active[0]][s->be_data == MO_BE][a->dtype]);
4850 }
4851 return true;
4852 }
4853
do_ldrq(DisasContext * s,int zt,int pg,TCGv_i64 addr,int dtype)4854 static void do_ldrq(DisasContext *s, int zt, int pg, TCGv_i64 addr, int dtype)
4855 {
4856 unsigned vsz = vec_full_reg_size(s);
4857 TCGv_ptr t_pg;
4858 int poff;
4859 uint32_t desc;
4860
4861 /* Load the first quadword using the normal predicated load helpers. */
4862 if (!s->mte_active[0]) {
4863 addr = clean_data_tbi(s, addr);
4864 }
4865
4866 poff = pred_full_reg_offset(s, pg);
4867 if (vsz > 16) {
4868 /*
4869 * Zero-extend the first 16 bits of the predicate into a temporary.
4870 * This avoids triggering an assert making sure we don't have bits
4871 * set within a predicate beyond VQ, but we have lowered VQ to 1
4872 * for this load operation.
4873 */
4874 TCGv_i64 tmp = tcg_temp_new_i64();
4875 #if HOST_BIG_ENDIAN
4876 poff += 6;
4877 #endif
4878 tcg_gen_ld16u_i64(tmp, tcg_env, poff);
4879
4880 poff = offsetof(CPUARMState, vfp.preg_tmp);
4881 tcg_gen_st_i64(tmp, tcg_env, poff);
4882 }
4883
4884 t_pg = tcg_temp_new_ptr();
4885 tcg_gen_addi_ptr(t_pg, tcg_env, poff);
4886
4887 gen_helper_gvec_mem *fn
4888 = ldr_fns[s->mte_active[0]][s->be_data == MO_BE][dtype][0];
4889 desc = make_svemte_desc(s, 16, 1, dtype_msz(dtype), false, zt);
4890 fn(tcg_env, t_pg, addr, tcg_constant_i32(desc));
4891
4892 /* Replicate that first quadword. */
4893 if (vsz > 16) {
4894 int doff = vec_full_reg_offset(s, zt);
4895 tcg_gen_gvec_dup_mem(4, doff + 16, doff, vsz - 16, vsz - 16);
4896 }
4897 }
4898
trans_LD1RQ_zprr(DisasContext * s,arg_rprr_load * a)4899 static bool trans_LD1RQ_zprr(DisasContext *s, arg_rprr_load *a)
4900 {
4901 if (a->rm == 31 || !dc_isar_feature(aa64_sve, s)) {
4902 return false;
4903 }
4904 if (sve_access_check(s)) {
4905 int msz = dtype_msz(a->dtype);
4906 TCGv_i64 addr = tcg_temp_new_i64();
4907 tcg_gen_shli_i64(addr, cpu_reg(s, a->rm), msz);
4908 tcg_gen_add_i64(addr, addr, cpu_reg_sp(s, a->rn));
4909 do_ldrq(s, a->rd, a->pg, addr, a->dtype);
4910 }
4911 return true;
4912 }
4913
trans_LD1RQ_zpri(DisasContext * s,arg_rpri_load * a)4914 static bool trans_LD1RQ_zpri(DisasContext *s, arg_rpri_load *a)
4915 {
4916 if (!dc_isar_feature(aa64_sve, s)) {
4917 return false;
4918 }
4919 if (sve_access_check(s)) {
4920 TCGv_i64 addr = tcg_temp_new_i64();
4921 tcg_gen_addi_i64(addr, cpu_reg_sp(s, a->rn), a->imm * 16);
4922 do_ldrq(s, a->rd, a->pg, addr, a->dtype);
4923 }
4924 return true;
4925 }
4926
do_ldro(DisasContext * s,int zt,int pg,TCGv_i64 addr,int dtype)4927 static void do_ldro(DisasContext *s, int zt, int pg, TCGv_i64 addr, int dtype)
4928 {
4929 unsigned vsz = vec_full_reg_size(s);
4930 unsigned vsz_r32;
4931 TCGv_ptr t_pg;
4932 int poff, doff;
4933 uint32_t desc;
4934
4935 if (vsz < 32) {
4936 /*
4937 * Note that this UNDEFINED check comes after CheckSVEEnabled()
4938 * in the ARM pseudocode, which is the sve_access_check() done
4939 * in our caller. We should not now return false from the caller.
4940 */
4941 unallocated_encoding(s);
4942 return;
4943 }
4944
4945 /* Load the first octaword using the normal predicated load helpers. */
4946 if (!s->mte_active[0]) {
4947 addr = clean_data_tbi(s, addr);
4948 }
4949
4950 poff = pred_full_reg_offset(s, pg);
4951 if (vsz > 32) {
4952 /*
4953 * Zero-extend the first 32 bits of the predicate into a temporary.
4954 * This avoids triggering an assert making sure we don't have bits
4955 * set within a predicate beyond VQ, but we have lowered VQ to 2
4956 * for this load operation.
4957 */
4958 TCGv_i64 tmp = tcg_temp_new_i64();
4959 #if HOST_BIG_ENDIAN
4960 poff += 4;
4961 #endif
4962 tcg_gen_ld32u_i64(tmp, tcg_env, poff);
4963
4964 poff = offsetof(CPUARMState, vfp.preg_tmp);
4965 tcg_gen_st_i64(tmp, tcg_env, poff);
4966 }
4967
4968 t_pg = tcg_temp_new_ptr();
4969 tcg_gen_addi_ptr(t_pg, tcg_env, poff);
4970
4971 gen_helper_gvec_mem *fn
4972 = ldr_fns[s->mte_active[0]][s->be_data == MO_BE][dtype][0];
4973 desc = make_svemte_desc(s, 32, 1, dtype_msz(dtype), false, zt);
4974 fn(tcg_env, t_pg, addr, tcg_constant_i32(desc));
4975
4976 /*
4977 * Replicate that first octaword.
4978 * The replication happens in units of 32; if the full vector size
4979 * is not a multiple of 32, the final bits are zeroed.
4980 */
4981 doff = vec_full_reg_offset(s, zt);
4982 vsz_r32 = QEMU_ALIGN_DOWN(vsz, 32);
4983 if (vsz >= 64) {
4984 tcg_gen_gvec_dup_mem(5, doff + 32, doff, vsz_r32 - 32, vsz_r32 - 32);
4985 }
4986 vsz -= vsz_r32;
4987 if (vsz) {
4988 tcg_gen_gvec_dup_imm(MO_64, doff + vsz_r32, vsz, vsz, 0);
4989 }
4990 }
4991
trans_LD1RO_zprr(DisasContext * s,arg_rprr_load * a)4992 static bool trans_LD1RO_zprr(DisasContext *s, arg_rprr_load *a)
4993 {
4994 if (!dc_isar_feature(aa64_sve_f64mm, s)) {
4995 return false;
4996 }
4997 if (a->rm == 31) {
4998 return false;
4999 }
5000 s->is_nonstreaming = true;
5001 if (sve_access_check(s)) {
5002 TCGv_i64 addr = tcg_temp_new_i64();
5003 tcg_gen_shli_i64(addr, cpu_reg(s, a->rm), dtype_msz(a->dtype));
5004 tcg_gen_add_i64(addr, addr, cpu_reg_sp(s, a->rn));
5005 do_ldro(s, a->rd, a->pg, addr, a->dtype);
5006 }
5007 return true;
5008 }
5009
trans_LD1RO_zpri(DisasContext * s,arg_rpri_load * a)5010 static bool trans_LD1RO_zpri(DisasContext *s, arg_rpri_load *a)
5011 {
5012 if (!dc_isar_feature(aa64_sve_f64mm, s)) {
5013 return false;
5014 }
5015 s->is_nonstreaming = true;
5016 if (sve_access_check(s)) {
5017 TCGv_i64 addr = tcg_temp_new_i64();
5018 tcg_gen_addi_i64(addr, cpu_reg_sp(s, a->rn), a->imm * 32);
5019 do_ldro(s, a->rd, a->pg, addr, a->dtype);
5020 }
5021 return true;
5022 }
5023
5024 /* Load and broadcast element. */
trans_LD1R_zpri(DisasContext * s,arg_rpri_load * a)5025 static bool trans_LD1R_zpri(DisasContext *s, arg_rpri_load *a)
5026 {
5027 unsigned vsz = vec_full_reg_size(s);
5028 unsigned psz = pred_full_reg_size(s);
5029 unsigned esz = dtype_esz[a->dtype];
5030 unsigned msz = dtype_msz(a->dtype);
5031 TCGLabel *over;
5032 TCGv_i64 temp, clean_addr;
5033 MemOp memop;
5034
5035 if (!dc_isar_feature(aa64_sve, s)) {
5036 return false;
5037 }
5038 if (!sve_access_check(s)) {
5039 return true;
5040 }
5041
5042 over = gen_new_label();
5043
5044 /* If the guarding predicate has no bits set, no load occurs. */
5045 if (psz <= 8) {
5046 /* Reduce the pred_esz_masks value simply to reduce the
5047 * size of the code generated here.
5048 */
5049 uint64_t psz_mask = MAKE_64BIT_MASK(0, psz * 8);
5050 temp = tcg_temp_new_i64();
5051 tcg_gen_ld_i64(temp, tcg_env, pred_full_reg_offset(s, a->pg));
5052 tcg_gen_andi_i64(temp, temp, pred_esz_masks[esz] & psz_mask);
5053 tcg_gen_brcondi_i64(TCG_COND_EQ, temp, 0, over);
5054 } else {
5055 TCGv_i32 t32 = tcg_temp_new_i32();
5056 find_last_active(s, t32, esz, a->pg);
5057 tcg_gen_brcondi_i32(TCG_COND_LT, t32, 0, over);
5058 }
5059
5060 /* Load the data. */
5061 temp = tcg_temp_new_i64();
5062 tcg_gen_addi_i64(temp, cpu_reg_sp(s, a->rn), a->imm << msz);
5063
5064 memop = finalize_memop(s, dtype_mop[a->dtype]);
5065 clean_addr = gen_mte_check1(s, temp, false, true, memop);
5066 tcg_gen_qemu_ld_i64(temp, clean_addr, get_mem_index(s), memop);
5067
5068 /* Broadcast to *all* elements. */
5069 tcg_gen_gvec_dup_i64(esz, vec_full_reg_offset(s, a->rd),
5070 vsz, vsz, temp);
5071
5072 /* Zero the inactive elements. */
5073 gen_set_label(over);
5074 return do_movz_zpz(s, a->rd, a->rd, a->pg, esz, false);
5075 }
5076
do_st_zpa(DisasContext * s,int zt,int pg,TCGv_i64 addr,int msz,int esz,int nreg)5077 static void do_st_zpa(DisasContext *s, int zt, int pg, TCGv_i64 addr,
5078 int msz, int esz, int nreg)
5079 {
5080 static gen_helper_gvec_mem * const fn_single[2][2][4][4] = {
5081 { { { gen_helper_sve_st1bb_r,
5082 gen_helper_sve_st1bh_r,
5083 gen_helper_sve_st1bs_r,
5084 gen_helper_sve_st1bd_r },
5085 { NULL,
5086 gen_helper_sve_st1hh_le_r,
5087 gen_helper_sve_st1hs_le_r,
5088 gen_helper_sve_st1hd_le_r },
5089 { NULL, NULL,
5090 gen_helper_sve_st1ss_le_r,
5091 gen_helper_sve_st1sd_le_r },
5092 { NULL, NULL, NULL,
5093 gen_helper_sve_st1dd_le_r } },
5094 { { gen_helper_sve_st1bb_r,
5095 gen_helper_sve_st1bh_r,
5096 gen_helper_sve_st1bs_r,
5097 gen_helper_sve_st1bd_r },
5098 { NULL,
5099 gen_helper_sve_st1hh_be_r,
5100 gen_helper_sve_st1hs_be_r,
5101 gen_helper_sve_st1hd_be_r },
5102 { NULL, NULL,
5103 gen_helper_sve_st1ss_be_r,
5104 gen_helper_sve_st1sd_be_r },
5105 { NULL, NULL, NULL,
5106 gen_helper_sve_st1dd_be_r } } },
5107
5108 { { { gen_helper_sve_st1bb_r_mte,
5109 gen_helper_sve_st1bh_r_mte,
5110 gen_helper_sve_st1bs_r_mte,
5111 gen_helper_sve_st1bd_r_mte },
5112 { NULL,
5113 gen_helper_sve_st1hh_le_r_mte,
5114 gen_helper_sve_st1hs_le_r_mte,
5115 gen_helper_sve_st1hd_le_r_mte },
5116 { NULL, NULL,
5117 gen_helper_sve_st1ss_le_r_mte,
5118 gen_helper_sve_st1sd_le_r_mte },
5119 { NULL, NULL, NULL,
5120 gen_helper_sve_st1dd_le_r_mte } },
5121 { { gen_helper_sve_st1bb_r_mte,
5122 gen_helper_sve_st1bh_r_mte,
5123 gen_helper_sve_st1bs_r_mte,
5124 gen_helper_sve_st1bd_r_mte },
5125 { NULL,
5126 gen_helper_sve_st1hh_be_r_mte,
5127 gen_helper_sve_st1hs_be_r_mte,
5128 gen_helper_sve_st1hd_be_r_mte },
5129 { NULL, NULL,
5130 gen_helper_sve_st1ss_be_r_mte,
5131 gen_helper_sve_st1sd_be_r_mte },
5132 { NULL, NULL, NULL,
5133 gen_helper_sve_st1dd_be_r_mte } } },
5134 };
5135 static gen_helper_gvec_mem * const fn_multiple[2][2][3][4] = {
5136 { { { gen_helper_sve_st2bb_r,
5137 gen_helper_sve_st2hh_le_r,
5138 gen_helper_sve_st2ss_le_r,
5139 gen_helper_sve_st2dd_le_r },
5140 { gen_helper_sve_st3bb_r,
5141 gen_helper_sve_st3hh_le_r,
5142 gen_helper_sve_st3ss_le_r,
5143 gen_helper_sve_st3dd_le_r },
5144 { gen_helper_sve_st4bb_r,
5145 gen_helper_sve_st4hh_le_r,
5146 gen_helper_sve_st4ss_le_r,
5147 gen_helper_sve_st4dd_le_r } },
5148 { { gen_helper_sve_st2bb_r,
5149 gen_helper_sve_st2hh_be_r,
5150 gen_helper_sve_st2ss_be_r,
5151 gen_helper_sve_st2dd_be_r },
5152 { gen_helper_sve_st3bb_r,
5153 gen_helper_sve_st3hh_be_r,
5154 gen_helper_sve_st3ss_be_r,
5155 gen_helper_sve_st3dd_be_r },
5156 { gen_helper_sve_st4bb_r,
5157 gen_helper_sve_st4hh_be_r,
5158 gen_helper_sve_st4ss_be_r,
5159 gen_helper_sve_st4dd_be_r } } },
5160 { { { gen_helper_sve_st2bb_r_mte,
5161 gen_helper_sve_st2hh_le_r_mte,
5162 gen_helper_sve_st2ss_le_r_mte,
5163 gen_helper_sve_st2dd_le_r_mte },
5164 { gen_helper_sve_st3bb_r_mte,
5165 gen_helper_sve_st3hh_le_r_mte,
5166 gen_helper_sve_st3ss_le_r_mte,
5167 gen_helper_sve_st3dd_le_r_mte },
5168 { gen_helper_sve_st4bb_r_mte,
5169 gen_helper_sve_st4hh_le_r_mte,
5170 gen_helper_sve_st4ss_le_r_mte,
5171 gen_helper_sve_st4dd_le_r_mte } },
5172 { { gen_helper_sve_st2bb_r_mte,
5173 gen_helper_sve_st2hh_be_r_mte,
5174 gen_helper_sve_st2ss_be_r_mte,
5175 gen_helper_sve_st2dd_be_r_mte },
5176 { gen_helper_sve_st3bb_r_mte,
5177 gen_helper_sve_st3hh_be_r_mte,
5178 gen_helper_sve_st3ss_be_r_mte,
5179 gen_helper_sve_st3dd_be_r_mte },
5180 { gen_helper_sve_st4bb_r_mte,
5181 gen_helper_sve_st4hh_be_r_mte,
5182 gen_helper_sve_st4ss_be_r_mte,
5183 gen_helper_sve_st4dd_be_r_mte } } },
5184 };
5185 gen_helper_gvec_mem *fn;
5186 int be = s->be_data == MO_BE;
5187
5188 if (nreg == 0) {
5189 /* ST1 */
5190 fn = fn_single[s->mte_active[0]][be][msz][esz];
5191 } else {
5192 /* ST2, ST3, ST4 -- msz == esz, enforced by encoding */
5193 assert(msz == esz);
5194 fn = fn_multiple[s->mte_active[0]][be][nreg - 1][msz];
5195 }
5196 assert(fn != NULL);
5197 do_mem_zpa(s, zt, pg, addr, msz_dtype(s, msz), nreg + 1, true, fn);
5198 }
5199
trans_ST_zprr(DisasContext * s,arg_rprr_store * a)5200 static bool trans_ST_zprr(DisasContext *s, arg_rprr_store *a)
5201 {
5202 if (!dc_isar_feature(aa64_sve, s)) {
5203 return false;
5204 }
5205 if (a->rm == 31 || a->msz > a->esz) {
5206 return false;
5207 }
5208 if (sve_access_check(s)) {
5209 TCGv_i64 addr = tcg_temp_new_i64();
5210 tcg_gen_shli_i64(addr, cpu_reg(s, a->rm), a->msz);
5211 tcg_gen_add_i64(addr, addr, cpu_reg_sp(s, a->rn));
5212 do_st_zpa(s, a->rd, a->pg, addr, a->msz, a->esz, a->nreg);
5213 }
5214 return true;
5215 }
5216
trans_ST_zpri(DisasContext * s,arg_rpri_store * a)5217 static bool trans_ST_zpri(DisasContext *s, arg_rpri_store *a)
5218 {
5219 if (!dc_isar_feature(aa64_sve, s)) {
5220 return false;
5221 }
5222 if (a->msz > a->esz) {
5223 return false;
5224 }
5225 if (sve_access_check(s)) {
5226 int vsz = vec_full_reg_size(s);
5227 int elements = vsz >> a->esz;
5228 TCGv_i64 addr = tcg_temp_new_i64();
5229
5230 tcg_gen_addi_i64(addr, cpu_reg_sp(s, a->rn),
5231 (a->imm * elements * (a->nreg + 1)) << a->msz);
5232 do_st_zpa(s, a->rd, a->pg, addr, a->msz, a->esz, a->nreg);
5233 }
5234 return true;
5235 }
5236
5237 /*
5238 *** SVE gather loads / scatter stores
5239 */
5240
do_mem_zpz(DisasContext * s,int zt,int pg,int zm,int scale,TCGv_i64 scalar,int msz,bool is_write,gen_helper_gvec_mem_scatter * fn)5241 static void do_mem_zpz(DisasContext *s, int zt, int pg, int zm,
5242 int scale, TCGv_i64 scalar, int msz, bool is_write,
5243 gen_helper_gvec_mem_scatter *fn)
5244 {
5245 TCGv_ptr t_zm = tcg_temp_new_ptr();
5246 TCGv_ptr t_pg = tcg_temp_new_ptr();
5247 TCGv_ptr t_zt = tcg_temp_new_ptr();
5248 uint32_t desc;
5249
5250 tcg_gen_addi_ptr(t_pg, tcg_env, pred_full_reg_offset(s, pg));
5251 tcg_gen_addi_ptr(t_zm, tcg_env, vec_full_reg_offset(s, zm));
5252 tcg_gen_addi_ptr(t_zt, tcg_env, vec_full_reg_offset(s, zt));
5253
5254 desc = make_svemte_desc(s, vec_full_reg_size(s), 1, msz, is_write, scale);
5255 fn(tcg_env, t_zt, t_pg, t_zm, scalar, tcg_constant_i32(desc));
5256 }
5257
5258 /* Indexed by [mte][be][ff][xs][u][msz]. */
5259 static gen_helper_gvec_mem_scatter * const
5260 gather_load_fn32[2][2][2][2][2][3] = {
5261 { /* MTE Inactive */
5262 { /* Little-endian */
5263 { { { gen_helper_sve_ldbss_zsu,
5264 gen_helper_sve_ldhss_le_zsu,
5265 NULL, },
5266 { gen_helper_sve_ldbsu_zsu,
5267 gen_helper_sve_ldhsu_le_zsu,
5268 gen_helper_sve_ldss_le_zsu, } },
5269 { { gen_helper_sve_ldbss_zss,
5270 gen_helper_sve_ldhss_le_zss,
5271 NULL, },
5272 { gen_helper_sve_ldbsu_zss,
5273 gen_helper_sve_ldhsu_le_zss,
5274 gen_helper_sve_ldss_le_zss, } } },
5275
5276 /* First-fault */
5277 { { { gen_helper_sve_ldffbss_zsu,
5278 gen_helper_sve_ldffhss_le_zsu,
5279 NULL, },
5280 { gen_helper_sve_ldffbsu_zsu,
5281 gen_helper_sve_ldffhsu_le_zsu,
5282 gen_helper_sve_ldffss_le_zsu, } },
5283 { { gen_helper_sve_ldffbss_zss,
5284 gen_helper_sve_ldffhss_le_zss,
5285 NULL, },
5286 { gen_helper_sve_ldffbsu_zss,
5287 gen_helper_sve_ldffhsu_le_zss,
5288 gen_helper_sve_ldffss_le_zss, } } } },
5289
5290 { /* Big-endian */
5291 { { { gen_helper_sve_ldbss_zsu,
5292 gen_helper_sve_ldhss_be_zsu,
5293 NULL, },
5294 { gen_helper_sve_ldbsu_zsu,
5295 gen_helper_sve_ldhsu_be_zsu,
5296 gen_helper_sve_ldss_be_zsu, } },
5297 { { gen_helper_sve_ldbss_zss,
5298 gen_helper_sve_ldhss_be_zss,
5299 NULL, },
5300 { gen_helper_sve_ldbsu_zss,
5301 gen_helper_sve_ldhsu_be_zss,
5302 gen_helper_sve_ldss_be_zss, } } },
5303
5304 /* First-fault */
5305 { { { gen_helper_sve_ldffbss_zsu,
5306 gen_helper_sve_ldffhss_be_zsu,
5307 NULL, },
5308 { gen_helper_sve_ldffbsu_zsu,
5309 gen_helper_sve_ldffhsu_be_zsu,
5310 gen_helper_sve_ldffss_be_zsu, } },
5311 { { gen_helper_sve_ldffbss_zss,
5312 gen_helper_sve_ldffhss_be_zss,
5313 NULL, },
5314 { gen_helper_sve_ldffbsu_zss,
5315 gen_helper_sve_ldffhsu_be_zss,
5316 gen_helper_sve_ldffss_be_zss, } } } } },
5317 { /* MTE Active */
5318 { /* Little-endian */
5319 { { { gen_helper_sve_ldbss_zsu_mte,
5320 gen_helper_sve_ldhss_le_zsu_mte,
5321 NULL, },
5322 { gen_helper_sve_ldbsu_zsu_mte,
5323 gen_helper_sve_ldhsu_le_zsu_mte,
5324 gen_helper_sve_ldss_le_zsu_mte, } },
5325 { { gen_helper_sve_ldbss_zss_mte,
5326 gen_helper_sve_ldhss_le_zss_mte,
5327 NULL, },
5328 { gen_helper_sve_ldbsu_zss_mte,
5329 gen_helper_sve_ldhsu_le_zss_mte,
5330 gen_helper_sve_ldss_le_zss_mte, } } },
5331
5332 /* First-fault */
5333 { { { gen_helper_sve_ldffbss_zsu_mte,
5334 gen_helper_sve_ldffhss_le_zsu_mte,
5335 NULL, },
5336 { gen_helper_sve_ldffbsu_zsu_mte,
5337 gen_helper_sve_ldffhsu_le_zsu_mte,
5338 gen_helper_sve_ldffss_le_zsu_mte, } },
5339 { { gen_helper_sve_ldffbss_zss_mte,
5340 gen_helper_sve_ldffhss_le_zss_mte,
5341 NULL, },
5342 { gen_helper_sve_ldffbsu_zss_mte,
5343 gen_helper_sve_ldffhsu_le_zss_mte,
5344 gen_helper_sve_ldffss_le_zss_mte, } } } },
5345
5346 { /* Big-endian */
5347 { { { gen_helper_sve_ldbss_zsu_mte,
5348 gen_helper_sve_ldhss_be_zsu_mte,
5349 NULL, },
5350 { gen_helper_sve_ldbsu_zsu_mte,
5351 gen_helper_sve_ldhsu_be_zsu_mte,
5352 gen_helper_sve_ldss_be_zsu_mte, } },
5353 { { gen_helper_sve_ldbss_zss_mte,
5354 gen_helper_sve_ldhss_be_zss_mte,
5355 NULL, },
5356 { gen_helper_sve_ldbsu_zss_mte,
5357 gen_helper_sve_ldhsu_be_zss_mte,
5358 gen_helper_sve_ldss_be_zss_mte, } } },
5359
5360 /* First-fault */
5361 { { { gen_helper_sve_ldffbss_zsu_mte,
5362 gen_helper_sve_ldffhss_be_zsu_mte,
5363 NULL, },
5364 { gen_helper_sve_ldffbsu_zsu_mte,
5365 gen_helper_sve_ldffhsu_be_zsu_mte,
5366 gen_helper_sve_ldffss_be_zsu_mte, } },
5367 { { gen_helper_sve_ldffbss_zss_mte,
5368 gen_helper_sve_ldffhss_be_zss_mte,
5369 NULL, },
5370 { gen_helper_sve_ldffbsu_zss_mte,
5371 gen_helper_sve_ldffhsu_be_zss_mte,
5372 gen_helper_sve_ldffss_be_zss_mte, } } } } },
5373 };
5374
5375 /* Note that we overload xs=2 to indicate 64-bit offset. */
5376 static gen_helper_gvec_mem_scatter * const
5377 gather_load_fn64[2][2][2][3][2][4] = {
5378 { /* MTE Inactive */
5379 { /* Little-endian */
5380 { { { gen_helper_sve_ldbds_zsu,
5381 gen_helper_sve_ldhds_le_zsu,
5382 gen_helper_sve_ldsds_le_zsu,
5383 NULL, },
5384 { gen_helper_sve_ldbdu_zsu,
5385 gen_helper_sve_ldhdu_le_zsu,
5386 gen_helper_sve_ldsdu_le_zsu,
5387 gen_helper_sve_lddd_le_zsu, } },
5388 { { gen_helper_sve_ldbds_zss,
5389 gen_helper_sve_ldhds_le_zss,
5390 gen_helper_sve_ldsds_le_zss,
5391 NULL, },
5392 { gen_helper_sve_ldbdu_zss,
5393 gen_helper_sve_ldhdu_le_zss,
5394 gen_helper_sve_ldsdu_le_zss,
5395 gen_helper_sve_lddd_le_zss, } },
5396 { { gen_helper_sve_ldbds_zd,
5397 gen_helper_sve_ldhds_le_zd,
5398 gen_helper_sve_ldsds_le_zd,
5399 NULL, },
5400 { gen_helper_sve_ldbdu_zd,
5401 gen_helper_sve_ldhdu_le_zd,
5402 gen_helper_sve_ldsdu_le_zd,
5403 gen_helper_sve_lddd_le_zd, } } },
5404
5405 /* First-fault */
5406 { { { gen_helper_sve_ldffbds_zsu,
5407 gen_helper_sve_ldffhds_le_zsu,
5408 gen_helper_sve_ldffsds_le_zsu,
5409 NULL, },
5410 { gen_helper_sve_ldffbdu_zsu,
5411 gen_helper_sve_ldffhdu_le_zsu,
5412 gen_helper_sve_ldffsdu_le_zsu,
5413 gen_helper_sve_ldffdd_le_zsu, } },
5414 { { gen_helper_sve_ldffbds_zss,
5415 gen_helper_sve_ldffhds_le_zss,
5416 gen_helper_sve_ldffsds_le_zss,
5417 NULL, },
5418 { gen_helper_sve_ldffbdu_zss,
5419 gen_helper_sve_ldffhdu_le_zss,
5420 gen_helper_sve_ldffsdu_le_zss,
5421 gen_helper_sve_ldffdd_le_zss, } },
5422 { { gen_helper_sve_ldffbds_zd,
5423 gen_helper_sve_ldffhds_le_zd,
5424 gen_helper_sve_ldffsds_le_zd,
5425 NULL, },
5426 { gen_helper_sve_ldffbdu_zd,
5427 gen_helper_sve_ldffhdu_le_zd,
5428 gen_helper_sve_ldffsdu_le_zd,
5429 gen_helper_sve_ldffdd_le_zd, } } } },
5430 { /* Big-endian */
5431 { { { gen_helper_sve_ldbds_zsu,
5432 gen_helper_sve_ldhds_be_zsu,
5433 gen_helper_sve_ldsds_be_zsu,
5434 NULL, },
5435 { gen_helper_sve_ldbdu_zsu,
5436 gen_helper_sve_ldhdu_be_zsu,
5437 gen_helper_sve_ldsdu_be_zsu,
5438 gen_helper_sve_lddd_be_zsu, } },
5439 { { gen_helper_sve_ldbds_zss,
5440 gen_helper_sve_ldhds_be_zss,
5441 gen_helper_sve_ldsds_be_zss,
5442 NULL, },
5443 { gen_helper_sve_ldbdu_zss,
5444 gen_helper_sve_ldhdu_be_zss,
5445 gen_helper_sve_ldsdu_be_zss,
5446 gen_helper_sve_lddd_be_zss, } },
5447 { { gen_helper_sve_ldbds_zd,
5448 gen_helper_sve_ldhds_be_zd,
5449 gen_helper_sve_ldsds_be_zd,
5450 NULL, },
5451 { gen_helper_sve_ldbdu_zd,
5452 gen_helper_sve_ldhdu_be_zd,
5453 gen_helper_sve_ldsdu_be_zd,
5454 gen_helper_sve_lddd_be_zd, } } },
5455
5456 /* First-fault */
5457 { { { gen_helper_sve_ldffbds_zsu,
5458 gen_helper_sve_ldffhds_be_zsu,
5459 gen_helper_sve_ldffsds_be_zsu,
5460 NULL, },
5461 { gen_helper_sve_ldffbdu_zsu,
5462 gen_helper_sve_ldffhdu_be_zsu,
5463 gen_helper_sve_ldffsdu_be_zsu,
5464 gen_helper_sve_ldffdd_be_zsu, } },
5465 { { gen_helper_sve_ldffbds_zss,
5466 gen_helper_sve_ldffhds_be_zss,
5467 gen_helper_sve_ldffsds_be_zss,
5468 NULL, },
5469 { gen_helper_sve_ldffbdu_zss,
5470 gen_helper_sve_ldffhdu_be_zss,
5471 gen_helper_sve_ldffsdu_be_zss,
5472 gen_helper_sve_ldffdd_be_zss, } },
5473 { { gen_helper_sve_ldffbds_zd,
5474 gen_helper_sve_ldffhds_be_zd,
5475 gen_helper_sve_ldffsds_be_zd,
5476 NULL, },
5477 { gen_helper_sve_ldffbdu_zd,
5478 gen_helper_sve_ldffhdu_be_zd,
5479 gen_helper_sve_ldffsdu_be_zd,
5480 gen_helper_sve_ldffdd_be_zd, } } } } },
5481 { /* MTE Active */
5482 { /* Little-endian */
5483 { { { gen_helper_sve_ldbds_zsu_mte,
5484 gen_helper_sve_ldhds_le_zsu_mte,
5485 gen_helper_sve_ldsds_le_zsu_mte,
5486 NULL, },
5487 { gen_helper_sve_ldbdu_zsu_mte,
5488 gen_helper_sve_ldhdu_le_zsu_mte,
5489 gen_helper_sve_ldsdu_le_zsu_mte,
5490 gen_helper_sve_lddd_le_zsu_mte, } },
5491 { { gen_helper_sve_ldbds_zss_mte,
5492 gen_helper_sve_ldhds_le_zss_mte,
5493 gen_helper_sve_ldsds_le_zss_mte,
5494 NULL, },
5495 { gen_helper_sve_ldbdu_zss_mte,
5496 gen_helper_sve_ldhdu_le_zss_mte,
5497 gen_helper_sve_ldsdu_le_zss_mte,
5498 gen_helper_sve_lddd_le_zss_mte, } },
5499 { { gen_helper_sve_ldbds_zd_mte,
5500 gen_helper_sve_ldhds_le_zd_mte,
5501 gen_helper_sve_ldsds_le_zd_mte,
5502 NULL, },
5503 { gen_helper_sve_ldbdu_zd_mte,
5504 gen_helper_sve_ldhdu_le_zd_mte,
5505 gen_helper_sve_ldsdu_le_zd_mte,
5506 gen_helper_sve_lddd_le_zd_mte, } } },
5507
5508 /* First-fault */
5509 { { { gen_helper_sve_ldffbds_zsu_mte,
5510 gen_helper_sve_ldffhds_le_zsu_mte,
5511 gen_helper_sve_ldffsds_le_zsu_mte,
5512 NULL, },
5513 { gen_helper_sve_ldffbdu_zsu_mte,
5514 gen_helper_sve_ldffhdu_le_zsu_mte,
5515 gen_helper_sve_ldffsdu_le_zsu_mte,
5516 gen_helper_sve_ldffdd_le_zsu_mte, } },
5517 { { gen_helper_sve_ldffbds_zss_mte,
5518 gen_helper_sve_ldffhds_le_zss_mte,
5519 gen_helper_sve_ldffsds_le_zss_mte,
5520 NULL, },
5521 { gen_helper_sve_ldffbdu_zss_mte,
5522 gen_helper_sve_ldffhdu_le_zss_mte,
5523 gen_helper_sve_ldffsdu_le_zss_mte,
5524 gen_helper_sve_ldffdd_le_zss_mte, } },
5525 { { gen_helper_sve_ldffbds_zd_mte,
5526 gen_helper_sve_ldffhds_le_zd_mte,
5527 gen_helper_sve_ldffsds_le_zd_mte,
5528 NULL, },
5529 { gen_helper_sve_ldffbdu_zd_mte,
5530 gen_helper_sve_ldffhdu_le_zd_mte,
5531 gen_helper_sve_ldffsdu_le_zd_mte,
5532 gen_helper_sve_ldffdd_le_zd_mte, } } } },
5533 { /* Big-endian */
5534 { { { gen_helper_sve_ldbds_zsu_mte,
5535 gen_helper_sve_ldhds_be_zsu_mte,
5536 gen_helper_sve_ldsds_be_zsu_mte,
5537 NULL, },
5538 { gen_helper_sve_ldbdu_zsu_mte,
5539 gen_helper_sve_ldhdu_be_zsu_mte,
5540 gen_helper_sve_ldsdu_be_zsu_mte,
5541 gen_helper_sve_lddd_be_zsu_mte, } },
5542 { { gen_helper_sve_ldbds_zss_mte,
5543 gen_helper_sve_ldhds_be_zss_mte,
5544 gen_helper_sve_ldsds_be_zss_mte,
5545 NULL, },
5546 { gen_helper_sve_ldbdu_zss_mte,
5547 gen_helper_sve_ldhdu_be_zss_mte,
5548 gen_helper_sve_ldsdu_be_zss_mte,
5549 gen_helper_sve_lddd_be_zss_mte, } },
5550 { { gen_helper_sve_ldbds_zd_mte,
5551 gen_helper_sve_ldhds_be_zd_mte,
5552 gen_helper_sve_ldsds_be_zd_mte,
5553 NULL, },
5554 { gen_helper_sve_ldbdu_zd_mte,
5555 gen_helper_sve_ldhdu_be_zd_mte,
5556 gen_helper_sve_ldsdu_be_zd_mte,
5557 gen_helper_sve_lddd_be_zd_mte, } } },
5558
5559 /* First-fault */
5560 { { { gen_helper_sve_ldffbds_zsu_mte,
5561 gen_helper_sve_ldffhds_be_zsu_mte,
5562 gen_helper_sve_ldffsds_be_zsu_mte,
5563 NULL, },
5564 { gen_helper_sve_ldffbdu_zsu_mte,
5565 gen_helper_sve_ldffhdu_be_zsu_mte,
5566 gen_helper_sve_ldffsdu_be_zsu_mte,
5567 gen_helper_sve_ldffdd_be_zsu_mte, } },
5568 { { gen_helper_sve_ldffbds_zss_mte,
5569 gen_helper_sve_ldffhds_be_zss_mte,
5570 gen_helper_sve_ldffsds_be_zss_mte,
5571 NULL, },
5572 { gen_helper_sve_ldffbdu_zss_mte,
5573 gen_helper_sve_ldffhdu_be_zss_mte,
5574 gen_helper_sve_ldffsdu_be_zss_mte,
5575 gen_helper_sve_ldffdd_be_zss_mte, } },
5576 { { gen_helper_sve_ldffbds_zd_mte,
5577 gen_helper_sve_ldffhds_be_zd_mte,
5578 gen_helper_sve_ldffsds_be_zd_mte,
5579 NULL, },
5580 { gen_helper_sve_ldffbdu_zd_mte,
5581 gen_helper_sve_ldffhdu_be_zd_mte,
5582 gen_helper_sve_ldffsdu_be_zd_mte,
5583 gen_helper_sve_ldffdd_be_zd_mte, } } } } },
5584 };
5585
trans_LD1_zprz(DisasContext * s,arg_LD1_zprz * a)5586 static bool trans_LD1_zprz(DisasContext *s, arg_LD1_zprz *a)
5587 {
5588 gen_helper_gvec_mem_scatter *fn = NULL;
5589 bool be = s->be_data == MO_BE;
5590 bool mte = s->mte_active[0];
5591
5592 if (!dc_isar_feature(aa64_sve, s)) {
5593 return false;
5594 }
5595 s->is_nonstreaming = true;
5596 if (!sve_access_check(s)) {
5597 return true;
5598 }
5599
5600 switch (a->esz) {
5601 case MO_32:
5602 fn = gather_load_fn32[mte][be][a->ff][a->xs][a->u][a->msz];
5603 break;
5604 case MO_64:
5605 fn = gather_load_fn64[mte][be][a->ff][a->xs][a->u][a->msz];
5606 break;
5607 }
5608 assert(fn != NULL);
5609
5610 do_mem_zpz(s, a->rd, a->pg, a->rm, a->scale * a->msz,
5611 cpu_reg_sp(s, a->rn), a->msz, false, fn);
5612 return true;
5613 }
5614
trans_LD1_zpiz(DisasContext * s,arg_LD1_zpiz * a)5615 static bool trans_LD1_zpiz(DisasContext *s, arg_LD1_zpiz *a)
5616 {
5617 gen_helper_gvec_mem_scatter *fn = NULL;
5618 bool be = s->be_data == MO_BE;
5619 bool mte = s->mte_active[0];
5620
5621 if (a->esz < a->msz || (a->esz == a->msz && !a->u)) {
5622 return false;
5623 }
5624 if (!dc_isar_feature(aa64_sve, s)) {
5625 return false;
5626 }
5627 s->is_nonstreaming = true;
5628 if (!sve_access_check(s)) {
5629 return true;
5630 }
5631
5632 switch (a->esz) {
5633 case MO_32:
5634 fn = gather_load_fn32[mte][be][a->ff][0][a->u][a->msz];
5635 break;
5636 case MO_64:
5637 fn = gather_load_fn64[mte][be][a->ff][2][a->u][a->msz];
5638 break;
5639 }
5640 assert(fn != NULL);
5641
5642 /* Treat LD1_zpiz (zn[x] + imm) the same way as LD1_zprz (rn + zm[x])
5643 * by loading the immediate into the scalar parameter.
5644 */
5645 do_mem_zpz(s, a->rd, a->pg, a->rn, 0,
5646 tcg_constant_i64(a->imm << a->msz), a->msz, false, fn);
5647 return true;
5648 }
5649
trans_LDNT1_zprz(DisasContext * s,arg_LD1_zprz * a)5650 static bool trans_LDNT1_zprz(DisasContext *s, arg_LD1_zprz *a)
5651 {
5652 gen_helper_gvec_mem_scatter *fn = NULL;
5653 bool be = s->be_data == MO_BE;
5654 bool mte = s->mte_active[0];
5655
5656 if (a->esz < a->msz + !a->u) {
5657 return false;
5658 }
5659 if (!dc_isar_feature(aa64_sve2, s)) {
5660 return false;
5661 }
5662 s->is_nonstreaming = true;
5663 if (!sve_access_check(s)) {
5664 return true;
5665 }
5666
5667 switch (a->esz) {
5668 case MO_32:
5669 fn = gather_load_fn32[mte][be][0][0][a->u][a->msz];
5670 break;
5671 case MO_64:
5672 fn = gather_load_fn64[mte][be][0][2][a->u][a->msz];
5673 break;
5674 }
5675 assert(fn != NULL);
5676
5677 do_mem_zpz(s, a->rd, a->pg, a->rn, 0,
5678 cpu_reg(s, a->rm), a->msz, false, fn);
5679 return true;
5680 }
5681
5682 /* Indexed by [mte][be][xs][msz]. */
5683 static gen_helper_gvec_mem_scatter * const scatter_store_fn32[2][2][2][3] = {
5684 { /* MTE Inactive */
5685 { /* Little-endian */
5686 { gen_helper_sve_stbs_zsu,
5687 gen_helper_sve_sths_le_zsu,
5688 gen_helper_sve_stss_le_zsu, },
5689 { gen_helper_sve_stbs_zss,
5690 gen_helper_sve_sths_le_zss,
5691 gen_helper_sve_stss_le_zss, } },
5692 { /* Big-endian */
5693 { gen_helper_sve_stbs_zsu,
5694 gen_helper_sve_sths_be_zsu,
5695 gen_helper_sve_stss_be_zsu, },
5696 { gen_helper_sve_stbs_zss,
5697 gen_helper_sve_sths_be_zss,
5698 gen_helper_sve_stss_be_zss, } } },
5699 { /* MTE Active */
5700 { /* Little-endian */
5701 { gen_helper_sve_stbs_zsu_mte,
5702 gen_helper_sve_sths_le_zsu_mte,
5703 gen_helper_sve_stss_le_zsu_mte, },
5704 { gen_helper_sve_stbs_zss_mte,
5705 gen_helper_sve_sths_le_zss_mte,
5706 gen_helper_sve_stss_le_zss_mte, } },
5707 { /* Big-endian */
5708 { gen_helper_sve_stbs_zsu_mte,
5709 gen_helper_sve_sths_be_zsu_mte,
5710 gen_helper_sve_stss_be_zsu_mte, },
5711 { gen_helper_sve_stbs_zss_mte,
5712 gen_helper_sve_sths_be_zss_mte,
5713 gen_helper_sve_stss_be_zss_mte, } } },
5714 };
5715
5716 /* Note that we overload xs=2 to indicate 64-bit offset. */
5717 static gen_helper_gvec_mem_scatter * const scatter_store_fn64[2][2][3][4] = {
5718 { /* MTE Inactive */
5719 { /* Little-endian */
5720 { gen_helper_sve_stbd_zsu,
5721 gen_helper_sve_sthd_le_zsu,
5722 gen_helper_sve_stsd_le_zsu,
5723 gen_helper_sve_stdd_le_zsu, },
5724 { gen_helper_sve_stbd_zss,
5725 gen_helper_sve_sthd_le_zss,
5726 gen_helper_sve_stsd_le_zss,
5727 gen_helper_sve_stdd_le_zss, },
5728 { gen_helper_sve_stbd_zd,
5729 gen_helper_sve_sthd_le_zd,
5730 gen_helper_sve_stsd_le_zd,
5731 gen_helper_sve_stdd_le_zd, } },
5732 { /* Big-endian */
5733 { gen_helper_sve_stbd_zsu,
5734 gen_helper_sve_sthd_be_zsu,
5735 gen_helper_sve_stsd_be_zsu,
5736 gen_helper_sve_stdd_be_zsu, },
5737 { gen_helper_sve_stbd_zss,
5738 gen_helper_sve_sthd_be_zss,
5739 gen_helper_sve_stsd_be_zss,
5740 gen_helper_sve_stdd_be_zss, },
5741 { gen_helper_sve_stbd_zd,
5742 gen_helper_sve_sthd_be_zd,
5743 gen_helper_sve_stsd_be_zd,
5744 gen_helper_sve_stdd_be_zd, } } },
5745 { /* MTE Inactive */
5746 { /* Little-endian */
5747 { gen_helper_sve_stbd_zsu_mte,
5748 gen_helper_sve_sthd_le_zsu_mte,
5749 gen_helper_sve_stsd_le_zsu_mte,
5750 gen_helper_sve_stdd_le_zsu_mte, },
5751 { gen_helper_sve_stbd_zss_mte,
5752 gen_helper_sve_sthd_le_zss_mte,
5753 gen_helper_sve_stsd_le_zss_mte,
5754 gen_helper_sve_stdd_le_zss_mte, },
5755 { gen_helper_sve_stbd_zd_mte,
5756 gen_helper_sve_sthd_le_zd_mte,
5757 gen_helper_sve_stsd_le_zd_mte,
5758 gen_helper_sve_stdd_le_zd_mte, } },
5759 { /* Big-endian */
5760 { gen_helper_sve_stbd_zsu_mte,
5761 gen_helper_sve_sthd_be_zsu_mte,
5762 gen_helper_sve_stsd_be_zsu_mte,
5763 gen_helper_sve_stdd_be_zsu_mte, },
5764 { gen_helper_sve_stbd_zss_mte,
5765 gen_helper_sve_sthd_be_zss_mte,
5766 gen_helper_sve_stsd_be_zss_mte,
5767 gen_helper_sve_stdd_be_zss_mte, },
5768 { gen_helper_sve_stbd_zd_mte,
5769 gen_helper_sve_sthd_be_zd_mte,
5770 gen_helper_sve_stsd_be_zd_mte,
5771 gen_helper_sve_stdd_be_zd_mte, } } },
5772 };
5773
trans_ST1_zprz(DisasContext * s,arg_ST1_zprz * a)5774 static bool trans_ST1_zprz(DisasContext *s, arg_ST1_zprz *a)
5775 {
5776 gen_helper_gvec_mem_scatter *fn;
5777 bool be = s->be_data == MO_BE;
5778 bool mte = s->mte_active[0];
5779
5780 if (a->esz < a->msz || (a->msz == 0 && a->scale)) {
5781 return false;
5782 }
5783 if (!dc_isar_feature(aa64_sve, s)) {
5784 return false;
5785 }
5786 s->is_nonstreaming = true;
5787 if (!sve_access_check(s)) {
5788 return true;
5789 }
5790 switch (a->esz) {
5791 case MO_32:
5792 fn = scatter_store_fn32[mte][be][a->xs][a->msz];
5793 break;
5794 case MO_64:
5795 fn = scatter_store_fn64[mte][be][a->xs][a->msz];
5796 break;
5797 default:
5798 g_assert_not_reached();
5799 }
5800 do_mem_zpz(s, a->rd, a->pg, a->rm, a->scale * a->msz,
5801 cpu_reg_sp(s, a->rn), a->msz, true, fn);
5802 return true;
5803 }
5804
trans_ST1_zpiz(DisasContext * s,arg_ST1_zpiz * a)5805 static bool trans_ST1_zpiz(DisasContext *s, arg_ST1_zpiz *a)
5806 {
5807 gen_helper_gvec_mem_scatter *fn = NULL;
5808 bool be = s->be_data == MO_BE;
5809 bool mte = s->mte_active[0];
5810
5811 if (a->esz < a->msz) {
5812 return false;
5813 }
5814 if (!dc_isar_feature(aa64_sve, s)) {
5815 return false;
5816 }
5817 s->is_nonstreaming = true;
5818 if (!sve_access_check(s)) {
5819 return true;
5820 }
5821
5822 switch (a->esz) {
5823 case MO_32:
5824 fn = scatter_store_fn32[mte][be][0][a->msz];
5825 break;
5826 case MO_64:
5827 fn = scatter_store_fn64[mte][be][2][a->msz];
5828 break;
5829 }
5830 assert(fn != NULL);
5831
5832 /* Treat ST1_zpiz (zn[x] + imm) the same way as ST1_zprz (rn + zm[x])
5833 * by loading the immediate into the scalar parameter.
5834 */
5835 do_mem_zpz(s, a->rd, a->pg, a->rn, 0,
5836 tcg_constant_i64(a->imm << a->msz), a->msz, true, fn);
5837 return true;
5838 }
5839
trans_STNT1_zprz(DisasContext * s,arg_ST1_zprz * a)5840 static bool trans_STNT1_zprz(DisasContext *s, arg_ST1_zprz *a)
5841 {
5842 gen_helper_gvec_mem_scatter *fn;
5843 bool be = s->be_data == MO_BE;
5844 bool mte = s->mte_active[0];
5845
5846 if (a->esz < a->msz) {
5847 return false;
5848 }
5849 if (!dc_isar_feature(aa64_sve2, s)) {
5850 return false;
5851 }
5852 s->is_nonstreaming = true;
5853 if (!sve_access_check(s)) {
5854 return true;
5855 }
5856
5857 switch (a->esz) {
5858 case MO_32:
5859 fn = scatter_store_fn32[mte][be][0][a->msz];
5860 break;
5861 case MO_64:
5862 fn = scatter_store_fn64[mte][be][2][a->msz];
5863 break;
5864 default:
5865 g_assert_not_reached();
5866 }
5867
5868 do_mem_zpz(s, a->rd, a->pg, a->rn, 0,
5869 cpu_reg(s, a->rm), a->msz, true, fn);
5870 return true;
5871 }
5872
5873 /*
5874 * Prefetches
5875 */
5876
trans_PRF(DisasContext * s,arg_PRF * a)5877 static bool trans_PRF(DisasContext *s, arg_PRF *a)
5878 {
5879 if (!dc_isar_feature(aa64_sve, s)) {
5880 return false;
5881 }
5882 /* Prefetch is a nop within QEMU. */
5883 (void)sve_access_check(s);
5884 return true;
5885 }
5886
trans_PRF_rr(DisasContext * s,arg_PRF_rr * a)5887 static bool trans_PRF_rr(DisasContext *s, arg_PRF_rr *a)
5888 {
5889 if (a->rm == 31 || !dc_isar_feature(aa64_sve, s)) {
5890 return false;
5891 }
5892 /* Prefetch is a nop within QEMU. */
5893 (void)sve_access_check(s);
5894 return true;
5895 }
5896
trans_PRF_ns(DisasContext * s,arg_PRF_ns * a)5897 static bool trans_PRF_ns(DisasContext *s, arg_PRF_ns *a)
5898 {
5899 if (!dc_isar_feature(aa64_sve, s)) {
5900 return false;
5901 }
5902 /* Prefetch is a nop within QEMU. */
5903 s->is_nonstreaming = true;
5904 (void)sve_access_check(s);
5905 return true;
5906 }
5907
5908 /*
5909 * Move Prefix
5910 *
5911 * TODO: The implementation so far could handle predicated merging movprfx.
5912 * The helper functions as written take an extra source register to
5913 * use in the operation, but the result is only written when predication
5914 * succeeds. For unpredicated movprfx, we need to rearrange the helpers
5915 * to allow the final write back to the destination to be unconditional.
5916 * For predicated zeroing movprfx, we need to rearrange the helpers to
5917 * allow the final write back to zero inactives.
5918 *
5919 * In the meantime, just emit the moves.
5920 */
5921
5922 TRANS_FEAT(MOVPRFX, aa64_sve, do_mov_z, a->rd, a->rn)
5923 TRANS_FEAT(MOVPRFX_m, aa64_sve, do_sel_z, a->rd, a->rn, a->rd, a->pg, a->esz)
5924 TRANS_FEAT(MOVPRFX_z, aa64_sve, do_movz_zpz, a->rd, a->rn, a->pg, a->esz, false)
5925
5926 /*
5927 * SVE2 Integer Multiply - Unpredicated
5928 */
5929
5930 TRANS_FEAT(MUL_zzz, aa64_sve2, gen_gvec_fn_arg_zzz, tcg_gen_gvec_mul, a)
5931
5932 static gen_helper_gvec_3 * const smulh_zzz_fns[4] = {
5933 gen_helper_gvec_smulh_b, gen_helper_gvec_smulh_h,
5934 gen_helper_gvec_smulh_s, gen_helper_gvec_smulh_d,
5935 };
5936 TRANS_FEAT(SMULH_zzz, aa64_sve2, gen_gvec_ool_arg_zzz,
5937 smulh_zzz_fns[a->esz], a, 0)
5938
5939 static gen_helper_gvec_3 * const umulh_zzz_fns[4] = {
5940 gen_helper_gvec_umulh_b, gen_helper_gvec_umulh_h,
5941 gen_helper_gvec_umulh_s, gen_helper_gvec_umulh_d,
5942 };
5943 TRANS_FEAT(UMULH_zzz, aa64_sve2, gen_gvec_ool_arg_zzz,
5944 umulh_zzz_fns[a->esz], a, 0)
5945
5946 TRANS_FEAT(PMUL_zzz, aa64_sve2, gen_gvec_ool_arg_zzz,
5947 gen_helper_gvec_pmul_b, a, 0)
5948
5949 static gen_helper_gvec_3 * const sqdmulh_zzz_fns[4] = {
5950 gen_helper_sve2_sqdmulh_b, gen_helper_sve2_sqdmulh_h,
5951 gen_helper_sve2_sqdmulh_s, gen_helper_sve2_sqdmulh_d,
5952 };
5953 TRANS_FEAT(SQDMULH_zzz, aa64_sve2, gen_gvec_ool_arg_zzz,
5954 sqdmulh_zzz_fns[a->esz], a, 0)
5955
5956 static gen_helper_gvec_3 * const sqrdmulh_zzz_fns[4] = {
5957 gen_helper_sve2_sqrdmulh_b, gen_helper_sve2_sqrdmulh_h,
5958 gen_helper_sve2_sqrdmulh_s, gen_helper_sve2_sqrdmulh_d,
5959 };
5960 TRANS_FEAT(SQRDMULH_zzz, aa64_sve2, gen_gvec_ool_arg_zzz,
5961 sqrdmulh_zzz_fns[a->esz], a, 0)
5962
5963 /*
5964 * SVE2 Integer - Predicated
5965 */
5966
5967 static gen_helper_gvec_4 * const sadlp_fns[4] = {
5968 NULL, gen_helper_sve2_sadalp_zpzz_h,
5969 gen_helper_sve2_sadalp_zpzz_s, gen_helper_sve2_sadalp_zpzz_d,
5970 };
5971 TRANS_FEAT(SADALP_zpzz, aa64_sve2, gen_gvec_ool_arg_zpzz,
5972 sadlp_fns[a->esz], a, 0)
5973
5974 static gen_helper_gvec_4 * const uadlp_fns[4] = {
5975 NULL, gen_helper_sve2_uadalp_zpzz_h,
5976 gen_helper_sve2_uadalp_zpzz_s, gen_helper_sve2_uadalp_zpzz_d,
5977 };
5978 TRANS_FEAT(UADALP_zpzz, aa64_sve2, gen_gvec_ool_arg_zpzz,
5979 uadlp_fns[a->esz], a, 0)
5980
5981 /*
5982 * SVE2 integer unary operations (predicated)
5983 */
5984
5985 TRANS_FEAT(URECPE, aa64_sve2, gen_gvec_ool_arg_zpz,
5986 a->esz == 2 ? gen_helper_sve2_urecpe_s : NULL, a, 0)
5987
5988 TRANS_FEAT(URSQRTE, aa64_sve2, gen_gvec_ool_arg_zpz,
5989 a->esz == 2 ? gen_helper_sve2_ursqrte_s : NULL, a, 0)
5990
5991 static gen_helper_gvec_3 * const sqabs_fns[4] = {
5992 gen_helper_sve2_sqabs_b, gen_helper_sve2_sqabs_h,
5993 gen_helper_sve2_sqabs_s, gen_helper_sve2_sqabs_d,
5994 };
5995 TRANS_FEAT(SQABS, aa64_sve2, gen_gvec_ool_arg_zpz, sqabs_fns[a->esz], a, 0)
5996
5997 static gen_helper_gvec_3 * const sqneg_fns[4] = {
5998 gen_helper_sve2_sqneg_b, gen_helper_sve2_sqneg_h,
5999 gen_helper_sve2_sqneg_s, gen_helper_sve2_sqneg_d,
6000 };
6001 TRANS_FEAT(SQNEG, aa64_sve2, gen_gvec_ool_arg_zpz, sqneg_fns[a->esz], a, 0)
6002
6003 DO_ZPZZ(SQSHL, aa64_sve2, sve2_sqshl)
6004 DO_ZPZZ(SQRSHL, aa64_sve2, sve2_sqrshl)
6005 DO_ZPZZ(SRSHL, aa64_sve2, sve2_srshl)
6006
6007 DO_ZPZZ(UQSHL, aa64_sve2, sve2_uqshl)
6008 DO_ZPZZ(UQRSHL, aa64_sve2, sve2_uqrshl)
6009 DO_ZPZZ(URSHL, aa64_sve2, sve2_urshl)
6010
6011 DO_ZPZZ(SHADD, aa64_sve2, sve2_shadd)
6012 DO_ZPZZ(SRHADD, aa64_sve2, sve2_srhadd)
6013 DO_ZPZZ(SHSUB, aa64_sve2, sve2_shsub)
6014
6015 DO_ZPZZ(UHADD, aa64_sve2, sve2_uhadd)
6016 DO_ZPZZ(URHADD, aa64_sve2, sve2_urhadd)
6017 DO_ZPZZ(UHSUB, aa64_sve2, sve2_uhsub)
6018
6019 DO_ZPZZ(ADDP, aa64_sve2, sve2_addp)
6020 DO_ZPZZ(SMAXP, aa64_sve2, sve2_smaxp)
6021 DO_ZPZZ(UMAXP, aa64_sve2, sve2_umaxp)
6022 DO_ZPZZ(SMINP, aa64_sve2, sve2_sminp)
6023 DO_ZPZZ(UMINP, aa64_sve2, sve2_uminp)
6024
6025 DO_ZPZZ(SQADD_zpzz, aa64_sve2, sve2_sqadd)
6026 DO_ZPZZ(UQADD_zpzz, aa64_sve2, sve2_uqadd)
6027 DO_ZPZZ(SQSUB_zpzz, aa64_sve2, sve2_sqsub)
6028 DO_ZPZZ(UQSUB_zpzz, aa64_sve2, sve2_uqsub)
6029 DO_ZPZZ(SUQADD, aa64_sve2, sve2_suqadd)
6030 DO_ZPZZ(USQADD, aa64_sve2, sve2_usqadd)
6031
6032 /*
6033 * SVE2 Widening Integer Arithmetic
6034 */
6035
6036 static gen_helper_gvec_3 * const saddl_fns[4] = {
6037 NULL, gen_helper_sve2_saddl_h,
6038 gen_helper_sve2_saddl_s, gen_helper_sve2_saddl_d,
6039 };
6040 TRANS_FEAT(SADDLB, aa64_sve2, gen_gvec_ool_arg_zzz,
6041 saddl_fns[a->esz], a, 0)
6042 TRANS_FEAT(SADDLT, aa64_sve2, gen_gvec_ool_arg_zzz,
6043 saddl_fns[a->esz], a, 3)
6044 TRANS_FEAT(SADDLBT, aa64_sve2, gen_gvec_ool_arg_zzz,
6045 saddl_fns[a->esz], a, 2)
6046
6047 static gen_helper_gvec_3 * const ssubl_fns[4] = {
6048 NULL, gen_helper_sve2_ssubl_h,
6049 gen_helper_sve2_ssubl_s, gen_helper_sve2_ssubl_d,
6050 };
6051 TRANS_FEAT(SSUBLB, aa64_sve2, gen_gvec_ool_arg_zzz,
6052 ssubl_fns[a->esz], a, 0)
6053 TRANS_FEAT(SSUBLT, aa64_sve2, gen_gvec_ool_arg_zzz,
6054 ssubl_fns[a->esz], a, 3)
6055 TRANS_FEAT(SSUBLBT, aa64_sve2, gen_gvec_ool_arg_zzz,
6056 ssubl_fns[a->esz], a, 2)
6057 TRANS_FEAT(SSUBLTB, aa64_sve2, gen_gvec_ool_arg_zzz,
6058 ssubl_fns[a->esz], a, 1)
6059
6060 static gen_helper_gvec_3 * const sabdl_fns[4] = {
6061 NULL, gen_helper_sve2_sabdl_h,
6062 gen_helper_sve2_sabdl_s, gen_helper_sve2_sabdl_d,
6063 };
6064 TRANS_FEAT(SABDLB, aa64_sve2, gen_gvec_ool_arg_zzz,
6065 sabdl_fns[a->esz], a, 0)
6066 TRANS_FEAT(SABDLT, aa64_sve2, gen_gvec_ool_arg_zzz,
6067 sabdl_fns[a->esz], a, 3)
6068
6069 static gen_helper_gvec_3 * const uaddl_fns[4] = {
6070 NULL, gen_helper_sve2_uaddl_h,
6071 gen_helper_sve2_uaddl_s, gen_helper_sve2_uaddl_d,
6072 };
6073 TRANS_FEAT(UADDLB, aa64_sve2, gen_gvec_ool_arg_zzz,
6074 uaddl_fns[a->esz], a, 0)
6075 TRANS_FEAT(UADDLT, aa64_sve2, gen_gvec_ool_arg_zzz,
6076 uaddl_fns[a->esz], a, 3)
6077
6078 static gen_helper_gvec_3 * const usubl_fns[4] = {
6079 NULL, gen_helper_sve2_usubl_h,
6080 gen_helper_sve2_usubl_s, gen_helper_sve2_usubl_d,
6081 };
6082 TRANS_FEAT(USUBLB, aa64_sve2, gen_gvec_ool_arg_zzz,
6083 usubl_fns[a->esz], a, 0)
6084 TRANS_FEAT(USUBLT, aa64_sve2, gen_gvec_ool_arg_zzz,
6085 usubl_fns[a->esz], a, 3)
6086
6087 static gen_helper_gvec_3 * const uabdl_fns[4] = {
6088 NULL, gen_helper_sve2_uabdl_h,
6089 gen_helper_sve2_uabdl_s, gen_helper_sve2_uabdl_d,
6090 };
6091 TRANS_FEAT(UABDLB, aa64_sve2, gen_gvec_ool_arg_zzz,
6092 uabdl_fns[a->esz], a, 0)
6093 TRANS_FEAT(UABDLT, aa64_sve2, gen_gvec_ool_arg_zzz,
6094 uabdl_fns[a->esz], a, 3)
6095
6096 static gen_helper_gvec_3 * const sqdmull_fns[4] = {
6097 NULL, gen_helper_sve2_sqdmull_zzz_h,
6098 gen_helper_sve2_sqdmull_zzz_s, gen_helper_sve2_sqdmull_zzz_d,
6099 };
6100 TRANS_FEAT(SQDMULLB_zzz, aa64_sve2, gen_gvec_ool_arg_zzz,
6101 sqdmull_fns[a->esz], a, 0)
6102 TRANS_FEAT(SQDMULLT_zzz, aa64_sve2, gen_gvec_ool_arg_zzz,
6103 sqdmull_fns[a->esz], a, 3)
6104
6105 static gen_helper_gvec_3 * const smull_fns[4] = {
6106 NULL, gen_helper_sve2_smull_zzz_h,
6107 gen_helper_sve2_smull_zzz_s, gen_helper_sve2_smull_zzz_d,
6108 };
6109 TRANS_FEAT(SMULLB_zzz, aa64_sve2, gen_gvec_ool_arg_zzz,
6110 smull_fns[a->esz], a, 0)
6111 TRANS_FEAT(SMULLT_zzz, aa64_sve2, gen_gvec_ool_arg_zzz,
6112 smull_fns[a->esz], a, 3)
6113
6114 static gen_helper_gvec_3 * const umull_fns[4] = {
6115 NULL, gen_helper_sve2_umull_zzz_h,
6116 gen_helper_sve2_umull_zzz_s, gen_helper_sve2_umull_zzz_d,
6117 };
6118 TRANS_FEAT(UMULLB_zzz, aa64_sve2, gen_gvec_ool_arg_zzz,
6119 umull_fns[a->esz], a, 0)
6120 TRANS_FEAT(UMULLT_zzz, aa64_sve2, gen_gvec_ool_arg_zzz,
6121 umull_fns[a->esz], a, 3)
6122
6123 static gen_helper_gvec_3 * const eoril_fns[4] = {
6124 gen_helper_sve2_eoril_b, gen_helper_sve2_eoril_h,
6125 gen_helper_sve2_eoril_s, gen_helper_sve2_eoril_d,
6126 };
6127 TRANS_FEAT(EORBT, aa64_sve2, gen_gvec_ool_arg_zzz, eoril_fns[a->esz], a, 2)
6128 TRANS_FEAT(EORTB, aa64_sve2, gen_gvec_ool_arg_zzz, eoril_fns[a->esz], a, 1)
6129
do_trans_pmull(DisasContext * s,arg_rrr_esz * a,bool sel)6130 static bool do_trans_pmull(DisasContext *s, arg_rrr_esz *a, bool sel)
6131 {
6132 static gen_helper_gvec_3 * const fns[4] = {
6133 gen_helper_gvec_pmull_q, gen_helper_sve2_pmull_h,
6134 NULL, gen_helper_sve2_pmull_d,
6135 };
6136
6137 if (a->esz == 0) {
6138 if (!dc_isar_feature(aa64_sve2_pmull128, s)) {
6139 return false;
6140 }
6141 s->is_nonstreaming = true;
6142 } else if (!dc_isar_feature(aa64_sve, s)) {
6143 return false;
6144 }
6145 return gen_gvec_ool_arg_zzz(s, fns[a->esz], a, sel);
6146 }
6147
6148 TRANS_FEAT(PMULLB, aa64_sve2, do_trans_pmull, a, false)
6149 TRANS_FEAT(PMULLT, aa64_sve2, do_trans_pmull, a, true)
6150
6151 static gen_helper_gvec_3 * const saddw_fns[4] = {
6152 NULL, gen_helper_sve2_saddw_h,
6153 gen_helper_sve2_saddw_s, gen_helper_sve2_saddw_d,
6154 };
6155 TRANS_FEAT(SADDWB, aa64_sve2, gen_gvec_ool_arg_zzz, saddw_fns[a->esz], a, 0)
6156 TRANS_FEAT(SADDWT, aa64_sve2, gen_gvec_ool_arg_zzz, saddw_fns[a->esz], a, 1)
6157
6158 static gen_helper_gvec_3 * const ssubw_fns[4] = {
6159 NULL, gen_helper_sve2_ssubw_h,
6160 gen_helper_sve2_ssubw_s, gen_helper_sve2_ssubw_d,
6161 };
6162 TRANS_FEAT(SSUBWB, aa64_sve2, gen_gvec_ool_arg_zzz, ssubw_fns[a->esz], a, 0)
6163 TRANS_FEAT(SSUBWT, aa64_sve2, gen_gvec_ool_arg_zzz, ssubw_fns[a->esz], a, 1)
6164
6165 static gen_helper_gvec_3 * const uaddw_fns[4] = {
6166 NULL, gen_helper_sve2_uaddw_h,
6167 gen_helper_sve2_uaddw_s, gen_helper_sve2_uaddw_d,
6168 };
6169 TRANS_FEAT(UADDWB, aa64_sve2, gen_gvec_ool_arg_zzz, uaddw_fns[a->esz], a, 0)
6170 TRANS_FEAT(UADDWT, aa64_sve2, gen_gvec_ool_arg_zzz, uaddw_fns[a->esz], a, 1)
6171
6172 static gen_helper_gvec_3 * const usubw_fns[4] = {
6173 NULL, gen_helper_sve2_usubw_h,
6174 gen_helper_sve2_usubw_s, gen_helper_sve2_usubw_d,
6175 };
6176 TRANS_FEAT(USUBWB, aa64_sve2, gen_gvec_ool_arg_zzz, usubw_fns[a->esz], a, 0)
6177 TRANS_FEAT(USUBWT, aa64_sve2, gen_gvec_ool_arg_zzz, usubw_fns[a->esz], a, 1)
6178
gen_sshll_vec(unsigned vece,TCGv_vec d,TCGv_vec n,int64_t imm)6179 static void gen_sshll_vec(unsigned vece, TCGv_vec d, TCGv_vec n, int64_t imm)
6180 {
6181 int top = imm & 1;
6182 int shl = imm >> 1;
6183 int halfbits = 4 << vece;
6184
6185 if (top) {
6186 if (shl == halfbits) {
6187 tcg_gen_and_vec(vece, d, n,
6188 tcg_constant_vec_matching(d, vece,
6189 MAKE_64BIT_MASK(halfbits, halfbits)));
6190 } else {
6191 tcg_gen_sari_vec(vece, d, n, halfbits);
6192 tcg_gen_shli_vec(vece, d, d, shl);
6193 }
6194 } else {
6195 tcg_gen_shli_vec(vece, d, n, halfbits);
6196 tcg_gen_sari_vec(vece, d, d, halfbits - shl);
6197 }
6198 }
6199
gen_ushll_i64(unsigned vece,TCGv_i64 d,TCGv_i64 n,int imm)6200 static void gen_ushll_i64(unsigned vece, TCGv_i64 d, TCGv_i64 n, int imm)
6201 {
6202 int halfbits = 4 << vece;
6203 int top = imm & 1;
6204 int shl = (imm >> 1);
6205 int shift;
6206 uint64_t mask;
6207
6208 mask = MAKE_64BIT_MASK(0, halfbits);
6209 mask <<= shl;
6210 mask = dup_const(vece, mask);
6211
6212 shift = shl - top * halfbits;
6213 if (shift < 0) {
6214 tcg_gen_shri_i64(d, n, -shift);
6215 } else {
6216 tcg_gen_shli_i64(d, n, shift);
6217 }
6218 tcg_gen_andi_i64(d, d, mask);
6219 }
6220
gen_ushll16_i64(TCGv_i64 d,TCGv_i64 n,int64_t imm)6221 static void gen_ushll16_i64(TCGv_i64 d, TCGv_i64 n, int64_t imm)
6222 {
6223 gen_ushll_i64(MO_16, d, n, imm);
6224 }
6225
gen_ushll32_i64(TCGv_i64 d,TCGv_i64 n,int64_t imm)6226 static void gen_ushll32_i64(TCGv_i64 d, TCGv_i64 n, int64_t imm)
6227 {
6228 gen_ushll_i64(MO_32, d, n, imm);
6229 }
6230
gen_ushll64_i64(TCGv_i64 d,TCGv_i64 n,int64_t imm)6231 static void gen_ushll64_i64(TCGv_i64 d, TCGv_i64 n, int64_t imm)
6232 {
6233 gen_ushll_i64(MO_64, d, n, imm);
6234 }
6235
gen_ushll_vec(unsigned vece,TCGv_vec d,TCGv_vec n,int64_t imm)6236 static void gen_ushll_vec(unsigned vece, TCGv_vec d, TCGv_vec n, int64_t imm)
6237 {
6238 int halfbits = 4 << vece;
6239 int top = imm & 1;
6240 int shl = imm >> 1;
6241
6242 if (top) {
6243 if (shl == halfbits) {
6244 tcg_gen_and_vec(vece, d, n,
6245 tcg_constant_vec_matching(d, vece,
6246 MAKE_64BIT_MASK(halfbits, halfbits)));
6247 } else {
6248 tcg_gen_shri_vec(vece, d, n, halfbits);
6249 tcg_gen_shli_vec(vece, d, d, shl);
6250 }
6251 } else {
6252 if (shl == 0) {
6253 tcg_gen_and_vec(vece, d, n,
6254 tcg_constant_vec_matching(d, vece,
6255 MAKE_64BIT_MASK(0, halfbits)));
6256 } else {
6257 tcg_gen_shli_vec(vece, d, n, halfbits);
6258 tcg_gen_shri_vec(vece, d, d, halfbits - shl);
6259 }
6260 }
6261 }
6262
do_shll_tb(DisasContext * s,arg_rri_esz * a,const GVecGen2i ops[3],bool sel)6263 static bool do_shll_tb(DisasContext *s, arg_rri_esz *a,
6264 const GVecGen2i ops[3], bool sel)
6265 {
6266
6267 if (a->esz < 0 || a->esz > 2) {
6268 return false;
6269 }
6270 if (sve_access_check(s)) {
6271 unsigned vsz = vec_full_reg_size(s);
6272 tcg_gen_gvec_2i(vec_full_reg_offset(s, a->rd),
6273 vec_full_reg_offset(s, a->rn),
6274 vsz, vsz, (a->imm << 1) | sel,
6275 &ops[a->esz]);
6276 }
6277 return true;
6278 }
6279
6280 static const TCGOpcode sshll_list[] = {
6281 INDEX_op_shli_vec, INDEX_op_sari_vec, 0
6282 };
6283 static const GVecGen2i sshll_ops[3] = {
6284 { .fniv = gen_sshll_vec,
6285 .opt_opc = sshll_list,
6286 .fno = gen_helper_sve2_sshll_h,
6287 .vece = MO_16 },
6288 { .fniv = gen_sshll_vec,
6289 .opt_opc = sshll_list,
6290 .fno = gen_helper_sve2_sshll_s,
6291 .vece = MO_32 },
6292 { .fniv = gen_sshll_vec,
6293 .opt_opc = sshll_list,
6294 .fno = gen_helper_sve2_sshll_d,
6295 .vece = MO_64 }
6296 };
6297 TRANS_FEAT(SSHLLB, aa64_sve2, do_shll_tb, a, sshll_ops, false)
6298 TRANS_FEAT(SSHLLT, aa64_sve2, do_shll_tb, a, sshll_ops, true)
6299
6300 static const TCGOpcode ushll_list[] = {
6301 INDEX_op_shli_vec, INDEX_op_shri_vec, 0
6302 };
6303 static const GVecGen2i ushll_ops[3] = {
6304 { .fni8 = gen_ushll16_i64,
6305 .fniv = gen_ushll_vec,
6306 .opt_opc = ushll_list,
6307 .fno = gen_helper_sve2_ushll_h,
6308 .vece = MO_16 },
6309 { .fni8 = gen_ushll32_i64,
6310 .fniv = gen_ushll_vec,
6311 .opt_opc = ushll_list,
6312 .fno = gen_helper_sve2_ushll_s,
6313 .vece = MO_32 },
6314 { .fni8 = gen_ushll64_i64,
6315 .fniv = gen_ushll_vec,
6316 .opt_opc = ushll_list,
6317 .fno = gen_helper_sve2_ushll_d,
6318 .vece = MO_64 },
6319 };
6320 TRANS_FEAT(USHLLB, aa64_sve2, do_shll_tb, a, ushll_ops, false)
6321 TRANS_FEAT(USHLLT, aa64_sve2, do_shll_tb, a, ushll_ops, true)
6322
6323 static gen_helper_gvec_3 * const bext_fns[4] = {
6324 gen_helper_sve2_bext_b, gen_helper_sve2_bext_h,
6325 gen_helper_sve2_bext_s, gen_helper_sve2_bext_d,
6326 };
6327 TRANS_FEAT_NONSTREAMING(BEXT, aa64_sve2_bitperm, gen_gvec_ool_arg_zzz,
6328 bext_fns[a->esz], a, 0)
6329
6330 static gen_helper_gvec_3 * const bdep_fns[4] = {
6331 gen_helper_sve2_bdep_b, gen_helper_sve2_bdep_h,
6332 gen_helper_sve2_bdep_s, gen_helper_sve2_bdep_d,
6333 };
6334 TRANS_FEAT_NONSTREAMING(BDEP, aa64_sve2_bitperm, gen_gvec_ool_arg_zzz,
6335 bdep_fns[a->esz], a, 0)
6336
6337 static gen_helper_gvec_3 * const bgrp_fns[4] = {
6338 gen_helper_sve2_bgrp_b, gen_helper_sve2_bgrp_h,
6339 gen_helper_sve2_bgrp_s, gen_helper_sve2_bgrp_d,
6340 };
6341 TRANS_FEAT_NONSTREAMING(BGRP, aa64_sve2_bitperm, gen_gvec_ool_arg_zzz,
6342 bgrp_fns[a->esz], a, 0)
6343
6344 static gen_helper_gvec_3 * const cadd_fns[4] = {
6345 gen_helper_sve2_cadd_b, gen_helper_sve2_cadd_h,
6346 gen_helper_sve2_cadd_s, gen_helper_sve2_cadd_d,
6347 };
6348 TRANS_FEAT(CADD_rot90, aa64_sve2, gen_gvec_ool_arg_zzz,
6349 cadd_fns[a->esz], a, 0)
6350 TRANS_FEAT(CADD_rot270, aa64_sve2, gen_gvec_ool_arg_zzz,
6351 cadd_fns[a->esz], a, 1)
6352
6353 static gen_helper_gvec_3 * const sqcadd_fns[4] = {
6354 gen_helper_sve2_sqcadd_b, gen_helper_sve2_sqcadd_h,
6355 gen_helper_sve2_sqcadd_s, gen_helper_sve2_sqcadd_d,
6356 };
6357 TRANS_FEAT(SQCADD_rot90, aa64_sve2, gen_gvec_ool_arg_zzz,
6358 sqcadd_fns[a->esz], a, 0)
6359 TRANS_FEAT(SQCADD_rot270, aa64_sve2, gen_gvec_ool_arg_zzz,
6360 sqcadd_fns[a->esz], a, 1)
6361
6362 static gen_helper_gvec_4 * const sabal_fns[4] = {
6363 NULL, gen_helper_sve2_sabal_h,
6364 gen_helper_sve2_sabal_s, gen_helper_sve2_sabal_d,
6365 };
6366 TRANS_FEAT(SABALB, aa64_sve2, gen_gvec_ool_arg_zzzz, sabal_fns[a->esz], a, 0)
6367 TRANS_FEAT(SABALT, aa64_sve2, gen_gvec_ool_arg_zzzz, sabal_fns[a->esz], a, 1)
6368
6369 static gen_helper_gvec_4 * const uabal_fns[4] = {
6370 NULL, gen_helper_sve2_uabal_h,
6371 gen_helper_sve2_uabal_s, gen_helper_sve2_uabal_d,
6372 };
6373 TRANS_FEAT(UABALB, aa64_sve2, gen_gvec_ool_arg_zzzz, uabal_fns[a->esz], a, 0)
6374 TRANS_FEAT(UABALT, aa64_sve2, gen_gvec_ool_arg_zzzz, uabal_fns[a->esz], a, 1)
6375
do_adcl(DisasContext * s,arg_rrrr_esz * a,bool sel)6376 static bool do_adcl(DisasContext *s, arg_rrrr_esz *a, bool sel)
6377 {
6378 static gen_helper_gvec_4 * const fns[2] = {
6379 gen_helper_sve2_adcl_s,
6380 gen_helper_sve2_adcl_d,
6381 };
6382 /*
6383 * Note that in this case the ESZ field encodes both size and sign.
6384 * Split out 'subtract' into bit 1 of the data field for the helper.
6385 */
6386 return gen_gvec_ool_arg_zzzz(s, fns[a->esz & 1], a, (a->esz & 2) | sel);
6387 }
6388
TRANS_FEAT(ADCLB,aa64_sve2,do_adcl,a,false)6389 TRANS_FEAT(ADCLB, aa64_sve2, do_adcl, a, false)
6390 TRANS_FEAT(ADCLT, aa64_sve2, do_adcl, a, true)
6391
6392 TRANS_FEAT(SSRA, aa64_sve2, gen_gvec_fn_arg_zzi, gen_gvec_ssra, a)
6393 TRANS_FEAT(USRA, aa64_sve2, gen_gvec_fn_arg_zzi, gen_gvec_usra, a)
6394 TRANS_FEAT(SRSRA, aa64_sve2, gen_gvec_fn_arg_zzi, gen_gvec_srsra, a)
6395 TRANS_FEAT(URSRA, aa64_sve2, gen_gvec_fn_arg_zzi, gen_gvec_ursra, a)
6396 TRANS_FEAT(SRI, aa64_sve2, gen_gvec_fn_arg_zzi, gen_gvec_sri, a)
6397 TRANS_FEAT(SLI, aa64_sve2, gen_gvec_fn_arg_zzi, gen_gvec_sli, a)
6398
6399 TRANS_FEAT(SABA, aa64_sve2, gen_gvec_fn_arg_zzz, gen_gvec_saba, a)
6400 TRANS_FEAT(UABA, aa64_sve2, gen_gvec_fn_arg_zzz, gen_gvec_uaba, a)
6401
6402 static bool do_narrow_extract(DisasContext *s, arg_rri_esz *a,
6403 const GVecGen2 ops[3])
6404 {
6405 if (a->esz < 0 || a->esz > MO_32 || a->imm != 0) {
6406 return false;
6407 }
6408 if (sve_access_check(s)) {
6409 unsigned vsz = vec_full_reg_size(s);
6410 tcg_gen_gvec_2(vec_full_reg_offset(s, a->rd),
6411 vec_full_reg_offset(s, a->rn),
6412 vsz, vsz, &ops[a->esz]);
6413 }
6414 return true;
6415 }
6416
6417 static const TCGOpcode sqxtn_list[] = {
6418 INDEX_op_shli_vec, INDEX_op_smin_vec, INDEX_op_smax_vec, 0
6419 };
6420
gen_sqxtnb_vec(unsigned vece,TCGv_vec d,TCGv_vec n)6421 static void gen_sqxtnb_vec(unsigned vece, TCGv_vec d, TCGv_vec n)
6422 {
6423 int halfbits = 4 << vece;
6424 int64_t mask = (1ull << halfbits) - 1;
6425 int64_t min = -1ull << (halfbits - 1);
6426 int64_t max = -min - 1;
6427
6428 tcg_gen_smax_vec(vece, d, n, tcg_constant_vec_matching(d, vece, min));
6429 tcg_gen_smin_vec(vece, d, d, tcg_constant_vec_matching(d, vece, max));
6430 tcg_gen_and_vec(vece, d, d, tcg_constant_vec_matching(d, vece, mask));
6431 }
6432
6433 static const GVecGen2 sqxtnb_ops[3] = {
6434 { .fniv = gen_sqxtnb_vec,
6435 .opt_opc = sqxtn_list,
6436 .fno = gen_helper_sve2_sqxtnb_h,
6437 .vece = MO_16 },
6438 { .fniv = gen_sqxtnb_vec,
6439 .opt_opc = sqxtn_list,
6440 .fno = gen_helper_sve2_sqxtnb_s,
6441 .vece = MO_32 },
6442 { .fniv = gen_sqxtnb_vec,
6443 .opt_opc = sqxtn_list,
6444 .fno = gen_helper_sve2_sqxtnb_d,
6445 .vece = MO_64 },
6446 };
TRANS_FEAT(SQXTNB,aa64_sve2,do_narrow_extract,a,sqxtnb_ops)6447 TRANS_FEAT(SQXTNB, aa64_sve2, do_narrow_extract, a, sqxtnb_ops)
6448
6449 static void gen_sqxtnt_vec(unsigned vece, TCGv_vec d, TCGv_vec n)
6450 {
6451 int halfbits = 4 << vece;
6452 int64_t mask = (1ull << halfbits) - 1;
6453 int64_t min = -1ull << (halfbits - 1);
6454 int64_t max = -min - 1;
6455
6456 tcg_gen_smax_vec(vece, n, n, tcg_constant_vec_matching(d, vece, min));
6457 tcg_gen_smin_vec(vece, n, n, tcg_constant_vec_matching(d, vece, max));
6458 tcg_gen_shli_vec(vece, n, n, halfbits);
6459 tcg_gen_bitsel_vec(vece, d, tcg_constant_vec_matching(d, vece, mask), d, n);
6460 }
6461
6462 static const GVecGen2 sqxtnt_ops[3] = {
6463 { .fniv = gen_sqxtnt_vec,
6464 .opt_opc = sqxtn_list,
6465 .load_dest = true,
6466 .fno = gen_helper_sve2_sqxtnt_h,
6467 .vece = MO_16 },
6468 { .fniv = gen_sqxtnt_vec,
6469 .opt_opc = sqxtn_list,
6470 .load_dest = true,
6471 .fno = gen_helper_sve2_sqxtnt_s,
6472 .vece = MO_32 },
6473 { .fniv = gen_sqxtnt_vec,
6474 .opt_opc = sqxtn_list,
6475 .load_dest = true,
6476 .fno = gen_helper_sve2_sqxtnt_d,
6477 .vece = MO_64 },
6478 };
6479 TRANS_FEAT(SQXTNT, aa64_sve2, do_narrow_extract, a, sqxtnt_ops)
6480
6481 static const TCGOpcode uqxtn_list[] = {
6482 INDEX_op_shli_vec, INDEX_op_umin_vec, 0
6483 };
6484
gen_uqxtnb_vec(unsigned vece,TCGv_vec d,TCGv_vec n)6485 static void gen_uqxtnb_vec(unsigned vece, TCGv_vec d, TCGv_vec n)
6486 {
6487 int halfbits = 4 << vece;
6488 int64_t max = (1ull << halfbits) - 1;
6489
6490 tcg_gen_umin_vec(vece, d, n, tcg_constant_vec_matching(d, vece, max));
6491 }
6492
6493 static const GVecGen2 uqxtnb_ops[3] = {
6494 { .fniv = gen_uqxtnb_vec,
6495 .opt_opc = uqxtn_list,
6496 .fno = gen_helper_sve2_uqxtnb_h,
6497 .vece = MO_16 },
6498 { .fniv = gen_uqxtnb_vec,
6499 .opt_opc = uqxtn_list,
6500 .fno = gen_helper_sve2_uqxtnb_s,
6501 .vece = MO_32 },
6502 { .fniv = gen_uqxtnb_vec,
6503 .opt_opc = uqxtn_list,
6504 .fno = gen_helper_sve2_uqxtnb_d,
6505 .vece = MO_64 },
6506 };
TRANS_FEAT(UQXTNB,aa64_sve2,do_narrow_extract,a,uqxtnb_ops)6507 TRANS_FEAT(UQXTNB, aa64_sve2, do_narrow_extract, a, uqxtnb_ops)
6508
6509 static void gen_uqxtnt_vec(unsigned vece, TCGv_vec d, TCGv_vec n)
6510 {
6511 int halfbits = 4 << vece;
6512 int64_t max = (1ull << halfbits) - 1;
6513 TCGv_vec maxv = tcg_constant_vec_matching(d, vece, max);
6514
6515 tcg_gen_umin_vec(vece, n, n, maxv);
6516 tcg_gen_shli_vec(vece, n, n, halfbits);
6517 tcg_gen_bitsel_vec(vece, d, maxv, d, n);
6518 }
6519
6520 static const GVecGen2 uqxtnt_ops[3] = {
6521 { .fniv = gen_uqxtnt_vec,
6522 .opt_opc = uqxtn_list,
6523 .load_dest = true,
6524 .fno = gen_helper_sve2_uqxtnt_h,
6525 .vece = MO_16 },
6526 { .fniv = gen_uqxtnt_vec,
6527 .opt_opc = uqxtn_list,
6528 .load_dest = true,
6529 .fno = gen_helper_sve2_uqxtnt_s,
6530 .vece = MO_32 },
6531 { .fniv = gen_uqxtnt_vec,
6532 .opt_opc = uqxtn_list,
6533 .load_dest = true,
6534 .fno = gen_helper_sve2_uqxtnt_d,
6535 .vece = MO_64 },
6536 };
6537 TRANS_FEAT(UQXTNT, aa64_sve2, do_narrow_extract, a, uqxtnt_ops)
6538
6539 static const TCGOpcode sqxtun_list[] = {
6540 INDEX_op_shli_vec, INDEX_op_umin_vec, INDEX_op_smax_vec, 0
6541 };
6542
gen_sqxtunb_vec(unsigned vece,TCGv_vec d,TCGv_vec n)6543 static void gen_sqxtunb_vec(unsigned vece, TCGv_vec d, TCGv_vec n)
6544 {
6545 int halfbits = 4 << vece;
6546 int64_t max = (1ull << halfbits) - 1;
6547
6548 tcg_gen_smax_vec(vece, d, n, tcg_constant_vec_matching(d, vece, 0));
6549 tcg_gen_umin_vec(vece, d, d, tcg_constant_vec_matching(d, vece, max));
6550 }
6551
6552 static const GVecGen2 sqxtunb_ops[3] = {
6553 { .fniv = gen_sqxtunb_vec,
6554 .opt_opc = sqxtun_list,
6555 .fno = gen_helper_sve2_sqxtunb_h,
6556 .vece = MO_16 },
6557 { .fniv = gen_sqxtunb_vec,
6558 .opt_opc = sqxtun_list,
6559 .fno = gen_helper_sve2_sqxtunb_s,
6560 .vece = MO_32 },
6561 { .fniv = gen_sqxtunb_vec,
6562 .opt_opc = sqxtun_list,
6563 .fno = gen_helper_sve2_sqxtunb_d,
6564 .vece = MO_64 },
6565 };
TRANS_FEAT(SQXTUNB,aa64_sve2,do_narrow_extract,a,sqxtunb_ops)6566 TRANS_FEAT(SQXTUNB, aa64_sve2, do_narrow_extract, a, sqxtunb_ops)
6567
6568 static void gen_sqxtunt_vec(unsigned vece, TCGv_vec d, TCGv_vec n)
6569 {
6570 int halfbits = 4 << vece;
6571 int64_t max = (1ull << halfbits) - 1;
6572 TCGv_vec maxv = tcg_constant_vec_matching(d, vece, max);
6573
6574 tcg_gen_smax_vec(vece, n, n, tcg_constant_vec_matching(d, vece, 0));
6575 tcg_gen_umin_vec(vece, n, n, maxv);
6576 tcg_gen_shli_vec(vece, n, n, halfbits);
6577 tcg_gen_bitsel_vec(vece, d, maxv, d, n);
6578 }
6579
6580 static const GVecGen2 sqxtunt_ops[3] = {
6581 { .fniv = gen_sqxtunt_vec,
6582 .opt_opc = sqxtun_list,
6583 .load_dest = true,
6584 .fno = gen_helper_sve2_sqxtunt_h,
6585 .vece = MO_16 },
6586 { .fniv = gen_sqxtunt_vec,
6587 .opt_opc = sqxtun_list,
6588 .load_dest = true,
6589 .fno = gen_helper_sve2_sqxtunt_s,
6590 .vece = MO_32 },
6591 { .fniv = gen_sqxtunt_vec,
6592 .opt_opc = sqxtun_list,
6593 .load_dest = true,
6594 .fno = gen_helper_sve2_sqxtunt_d,
6595 .vece = MO_64 },
6596 };
TRANS_FEAT(SQXTUNT,aa64_sve2,do_narrow_extract,a,sqxtunt_ops)6597 TRANS_FEAT(SQXTUNT, aa64_sve2, do_narrow_extract, a, sqxtunt_ops)
6598
6599 static bool do_shr_narrow(DisasContext *s, arg_rri_esz *a,
6600 const GVecGen2i ops[3])
6601 {
6602 if (a->esz < 0 || a->esz > MO_32) {
6603 return false;
6604 }
6605 assert(a->imm > 0 && a->imm <= (8 << a->esz));
6606 if (sve_access_check(s)) {
6607 unsigned vsz = vec_full_reg_size(s);
6608 tcg_gen_gvec_2i(vec_full_reg_offset(s, a->rd),
6609 vec_full_reg_offset(s, a->rn),
6610 vsz, vsz, a->imm, &ops[a->esz]);
6611 }
6612 return true;
6613 }
6614
gen_shrnb_i64(unsigned vece,TCGv_i64 d,TCGv_i64 n,int shr)6615 static void gen_shrnb_i64(unsigned vece, TCGv_i64 d, TCGv_i64 n, int shr)
6616 {
6617 int halfbits = 4 << vece;
6618 uint64_t mask = dup_const(vece, MAKE_64BIT_MASK(0, halfbits));
6619
6620 tcg_gen_shri_i64(d, n, shr);
6621 tcg_gen_andi_i64(d, d, mask);
6622 }
6623
gen_shrnb16_i64(TCGv_i64 d,TCGv_i64 n,int64_t shr)6624 static void gen_shrnb16_i64(TCGv_i64 d, TCGv_i64 n, int64_t shr)
6625 {
6626 gen_shrnb_i64(MO_16, d, n, shr);
6627 }
6628
gen_shrnb32_i64(TCGv_i64 d,TCGv_i64 n,int64_t shr)6629 static void gen_shrnb32_i64(TCGv_i64 d, TCGv_i64 n, int64_t shr)
6630 {
6631 gen_shrnb_i64(MO_32, d, n, shr);
6632 }
6633
gen_shrnb64_i64(TCGv_i64 d,TCGv_i64 n,int64_t shr)6634 static void gen_shrnb64_i64(TCGv_i64 d, TCGv_i64 n, int64_t shr)
6635 {
6636 gen_shrnb_i64(MO_64, d, n, shr);
6637 }
6638
gen_shrnb_vec(unsigned vece,TCGv_vec d,TCGv_vec n,int64_t shr)6639 static void gen_shrnb_vec(unsigned vece, TCGv_vec d, TCGv_vec n, int64_t shr)
6640 {
6641 int halfbits = 4 << vece;
6642 uint64_t mask = MAKE_64BIT_MASK(0, halfbits);
6643
6644 tcg_gen_shri_vec(vece, n, n, shr);
6645 tcg_gen_and_vec(vece, d, n, tcg_constant_vec_matching(d, vece, mask));
6646 }
6647
6648 static const TCGOpcode shrnb_vec_list[] = { INDEX_op_shri_vec, 0 };
6649 static const GVecGen2i shrnb_ops[3] = {
6650 { .fni8 = gen_shrnb16_i64,
6651 .fniv = gen_shrnb_vec,
6652 .opt_opc = shrnb_vec_list,
6653 .fno = gen_helper_sve2_shrnb_h,
6654 .vece = MO_16 },
6655 { .fni8 = gen_shrnb32_i64,
6656 .fniv = gen_shrnb_vec,
6657 .opt_opc = shrnb_vec_list,
6658 .fno = gen_helper_sve2_shrnb_s,
6659 .vece = MO_32 },
6660 { .fni8 = gen_shrnb64_i64,
6661 .fniv = gen_shrnb_vec,
6662 .opt_opc = shrnb_vec_list,
6663 .fno = gen_helper_sve2_shrnb_d,
6664 .vece = MO_64 },
6665 };
TRANS_FEAT(SHRNB,aa64_sve2,do_shr_narrow,a,shrnb_ops)6666 TRANS_FEAT(SHRNB, aa64_sve2, do_shr_narrow, a, shrnb_ops)
6667
6668 static void gen_shrnt_i64(unsigned vece, TCGv_i64 d, TCGv_i64 n, int shr)
6669 {
6670 int halfbits = 4 << vece;
6671 uint64_t mask = dup_const(vece, MAKE_64BIT_MASK(0, halfbits));
6672
6673 tcg_gen_shli_i64(n, n, halfbits - shr);
6674 tcg_gen_andi_i64(n, n, ~mask);
6675 tcg_gen_andi_i64(d, d, mask);
6676 tcg_gen_or_i64(d, d, n);
6677 }
6678
gen_shrnt16_i64(TCGv_i64 d,TCGv_i64 n,int64_t shr)6679 static void gen_shrnt16_i64(TCGv_i64 d, TCGv_i64 n, int64_t shr)
6680 {
6681 gen_shrnt_i64(MO_16, d, n, shr);
6682 }
6683
gen_shrnt32_i64(TCGv_i64 d,TCGv_i64 n,int64_t shr)6684 static void gen_shrnt32_i64(TCGv_i64 d, TCGv_i64 n, int64_t shr)
6685 {
6686 gen_shrnt_i64(MO_32, d, n, shr);
6687 }
6688
gen_shrnt64_i64(TCGv_i64 d,TCGv_i64 n,int64_t shr)6689 static void gen_shrnt64_i64(TCGv_i64 d, TCGv_i64 n, int64_t shr)
6690 {
6691 tcg_gen_shri_i64(n, n, shr);
6692 tcg_gen_deposit_i64(d, d, n, 32, 32);
6693 }
6694
gen_shrnt_vec(unsigned vece,TCGv_vec d,TCGv_vec n,int64_t shr)6695 static void gen_shrnt_vec(unsigned vece, TCGv_vec d, TCGv_vec n, int64_t shr)
6696 {
6697 int halfbits = 4 << vece;
6698 uint64_t mask = MAKE_64BIT_MASK(0, halfbits);
6699
6700 tcg_gen_shli_vec(vece, n, n, halfbits - shr);
6701 tcg_gen_bitsel_vec(vece, d, tcg_constant_vec_matching(d, vece, mask), d, n);
6702 }
6703
6704 static const TCGOpcode shrnt_vec_list[] = { INDEX_op_shli_vec, 0 };
6705 static const GVecGen2i shrnt_ops[3] = {
6706 { .fni8 = gen_shrnt16_i64,
6707 .fniv = gen_shrnt_vec,
6708 .opt_opc = shrnt_vec_list,
6709 .load_dest = true,
6710 .fno = gen_helper_sve2_shrnt_h,
6711 .vece = MO_16 },
6712 { .fni8 = gen_shrnt32_i64,
6713 .fniv = gen_shrnt_vec,
6714 .opt_opc = shrnt_vec_list,
6715 .load_dest = true,
6716 .fno = gen_helper_sve2_shrnt_s,
6717 .vece = MO_32 },
6718 { .fni8 = gen_shrnt64_i64,
6719 .fniv = gen_shrnt_vec,
6720 .opt_opc = shrnt_vec_list,
6721 .load_dest = true,
6722 .fno = gen_helper_sve2_shrnt_d,
6723 .vece = MO_64 },
6724 };
6725 TRANS_FEAT(SHRNT, aa64_sve2, do_shr_narrow, a, shrnt_ops)
6726
6727 static const GVecGen2i rshrnb_ops[3] = {
6728 { .fno = gen_helper_sve2_rshrnb_h },
6729 { .fno = gen_helper_sve2_rshrnb_s },
6730 { .fno = gen_helper_sve2_rshrnb_d },
6731 };
6732 TRANS_FEAT(RSHRNB, aa64_sve2, do_shr_narrow, a, rshrnb_ops)
6733
6734 static const GVecGen2i rshrnt_ops[3] = {
6735 { .fno = gen_helper_sve2_rshrnt_h },
6736 { .fno = gen_helper_sve2_rshrnt_s },
6737 { .fno = gen_helper_sve2_rshrnt_d },
6738 };
TRANS_FEAT(RSHRNT,aa64_sve2,do_shr_narrow,a,rshrnt_ops)6739 TRANS_FEAT(RSHRNT, aa64_sve2, do_shr_narrow, a, rshrnt_ops)
6740
6741 static void gen_sqshrunb_vec(unsigned vece, TCGv_vec d,
6742 TCGv_vec n, int64_t shr)
6743 {
6744 int halfbits = 4 << vece;
6745 uint64_t max = MAKE_64BIT_MASK(0, halfbits);
6746
6747 tcg_gen_sari_vec(vece, n, n, shr);
6748 tcg_gen_smax_vec(vece, n, n, tcg_constant_vec_matching(d, vece, 0));
6749 tcg_gen_umin_vec(vece, d, n, tcg_constant_vec_matching(d, vece, max));
6750 }
6751
6752 static const TCGOpcode sqshrunb_vec_list[] = {
6753 INDEX_op_sari_vec, INDEX_op_smax_vec, INDEX_op_umin_vec, 0
6754 };
6755 static const GVecGen2i sqshrunb_ops[3] = {
6756 { .fniv = gen_sqshrunb_vec,
6757 .opt_opc = sqshrunb_vec_list,
6758 .fno = gen_helper_sve2_sqshrunb_h,
6759 .vece = MO_16 },
6760 { .fniv = gen_sqshrunb_vec,
6761 .opt_opc = sqshrunb_vec_list,
6762 .fno = gen_helper_sve2_sqshrunb_s,
6763 .vece = MO_32 },
6764 { .fniv = gen_sqshrunb_vec,
6765 .opt_opc = sqshrunb_vec_list,
6766 .fno = gen_helper_sve2_sqshrunb_d,
6767 .vece = MO_64 },
6768 };
TRANS_FEAT(SQSHRUNB,aa64_sve2,do_shr_narrow,a,sqshrunb_ops)6769 TRANS_FEAT(SQSHRUNB, aa64_sve2, do_shr_narrow, a, sqshrunb_ops)
6770
6771 static void gen_sqshrunt_vec(unsigned vece, TCGv_vec d,
6772 TCGv_vec n, int64_t shr)
6773 {
6774 int halfbits = 4 << vece;
6775 uint64_t max = MAKE_64BIT_MASK(0, halfbits);
6776 TCGv_vec maxv = tcg_constant_vec_matching(d, vece, max);
6777
6778 tcg_gen_sari_vec(vece, n, n, shr);
6779 tcg_gen_smax_vec(vece, n, n, tcg_constant_vec_matching(d, vece, 0));
6780 tcg_gen_umin_vec(vece, n, n, maxv);
6781 tcg_gen_shli_vec(vece, n, n, halfbits);
6782 tcg_gen_bitsel_vec(vece, d, maxv, d, n);
6783 }
6784
6785 static const TCGOpcode sqshrunt_vec_list[] = {
6786 INDEX_op_shli_vec, INDEX_op_sari_vec,
6787 INDEX_op_smax_vec, INDEX_op_umin_vec, 0
6788 };
6789 static const GVecGen2i sqshrunt_ops[3] = {
6790 { .fniv = gen_sqshrunt_vec,
6791 .opt_opc = sqshrunt_vec_list,
6792 .load_dest = true,
6793 .fno = gen_helper_sve2_sqshrunt_h,
6794 .vece = MO_16 },
6795 { .fniv = gen_sqshrunt_vec,
6796 .opt_opc = sqshrunt_vec_list,
6797 .load_dest = true,
6798 .fno = gen_helper_sve2_sqshrunt_s,
6799 .vece = MO_32 },
6800 { .fniv = gen_sqshrunt_vec,
6801 .opt_opc = sqshrunt_vec_list,
6802 .load_dest = true,
6803 .fno = gen_helper_sve2_sqshrunt_d,
6804 .vece = MO_64 },
6805 };
6806 TRANS_FEAT(SQSHRUNT, aa64_sve2, do_shr_narrow, a, sqshrunt_ops)
6807
6808 static const GVecGen2i sqrshrunb_ops[3] = {
6809 { .fno = gen_helper_sve2_sqrshrunb_h },
6810 { .fno = gen_helper_sve2_sqrshrunb_s },
6811 { .fno = gen_helper_sve2_sqrshrunb_d },
6812 };
6813 TRANS_FEAT(SQRSHRUNB, aa64_sve2, do_shr_narrow, a, sqrshrunb_ops)
6814
6815 static const GVecGen2i sqrshrunt_ops[3] = {
6816 { .fno = gen_helper_sve2_sqrshrunt_h },
6817 { .fno = gen_helper_sve2_sqrshrunt_s },
6818 { .fno = gen_helper_sve2_sqrshrunt_d },
6819 };
TRANS_FEAT(SQRSHRUNT,aa64_sve2,do_shr_narrow,a,sqrshrunt_ops)6820 TRANS_FEAT(SQRSHRUNT, aa64_sve2, do_shr_narrow, a, sqrshrunt_ops)
6821
6822 static void gen_sqshrnb_vec(unsigned vece, TCGv_vec d,
6823 TCGv_vec n, int64_t shr)
6824 {
6825 int halfbits = 4 << vece;
6826 int64_t max = MAKE_64BIT_MASK(0, halfbits - 1);
6827 int64_t min = -max - 1;
6828 int64_t mask = MAKE_64BIT_MASK(0, halfbits);
6829
6830 tcg_gen_sari_vec(vece, n, n, shr);
6831 tcg_gen_smax_vec(vece, n, n, tcg_constant_vec_matching(d, vece, min));
6832 tcg_gen_smin_vec(vece, n, n, tcg_constant_vec_matching(d, vece, max));
6833 tcg_gen_and_vec(vece, d, n, tcg_constant_vec_matching(d, vece, mask));
6834 }
6835
6836 static const TCGOpcode sqshrnb_vec_list[] = {
6837 INDEX_op_sari_vec, INDEX_op_smax_vec, INDEX_op_smin_vec, 0
6838 };
6839 static const GVecGen2i sqshrnb_ops[3] = {
6840 { .fniv = gen_sqshrnb_vec,
6841 .opt_opc = sqshrnb_vec_list,
6842 .fno = gen_helper_sve2_sqshrnb_h,
6843 .vece = MO_16 },
6844 { .fniv = gen_sqshrnb_vec,
6845 .opt_opc = sqshrnb_vec_list,
6846 .fno = gen_helper_sve2_sqshrnb_s,
6847 .vece = MO_32 },
6848 { .fniv = gen_sqshrnb_vec,
6849 .opt_opc = sqshrnb_vec_list,
6850 .fno = gen_helper_sve2_sqshrnb_d,
6851 .vece = MO_64 },
6852 };
TRANS_FEAT(SQSHRNB,aa64_sve2,do_shr_narrow,a,sqshrnb_ops)6853 TRANS_FEAT(SQSHRNB, aa64_sve2, do_shr_narrow, a, sqshrnb_ops)
6854
6855 static void gen_sqshrnt_vec(unsigned vece, TCGv_vec d,
6856 TCGv_vec n, int64_t shr)
6857 {
6858 int halfbits = 4 << vece;
6859 int64_t max = MAKE_64BIT_MASK(0, halfbits - 1);
6860 int64_t min = -max - 1;
6861 int64_t mask = MAKE_64BIT_MASK(0, halfbits);
6862
6863 tcg_gen_sari_vec(vece, n, n, shr);
6864 tcg_gen_smax_vec(vece, n, n, tcg_constant_vec_matching(d, vece, min));
6865 tcg_gen_smin_vec(vece, n, n, tcg_constant_vec_matching(d, vece, max));
6866 tcg_gen_shli_vec(vece, n, n, halfbits);
6867 tcg_gen_bitsel_vec(vece, d, tcg_constant_vec_matching(d, vece, mask), d, n);
6868 }
6869
6870 static const TCGOpcode sqshrnt_vec_list[] = {
6871 INDEX_op_shli_vec, INDEX_op_sari_vec,
6872 INDEX_op_smax_vec, INDEX_op_smin_vec, 0
6873 };
6874 static const GVecGen2i sqshrnt_ops[3] = {
6875 { .fniv = gen_sqshrnt_vec,
6876 .opt_opc = sqshrnt_vec_list,
6877 .load_dest = true,
6878 .fno = gen_helper_sve2_sqshrnt_h,
6879 .vece = MO_16 },
6880 { .fniv = gen_sqshrnt_vec,
6881 .opt_opc = sqshrnt_vec_list,
6882 .load_dest = true,
6883 .fno = gen_helper_sve2_sqshrnt_s,
6884 .vece = MO_32 },
6885 { .fniv = gen_sqshrnt_vec,
6886 .opt_opc = sqshrnt_vec_list,
6887 .load_dest = true,
6888 .fno = gen_helper_sve2_sqshrnt_d,
6889 .vece = MO_64 },
6890 };
6891 TRANS_FEAT(SQSHRNT, aa64_sve2, do_shr_narrow, a, sqshrnt_ops)
6892
6893 static const GVecGen2i sqrshrnb_ops[3] = {
6894 { .fno = gen_helper_sve2_sqrshrnb_h },
6895 { .fno = gen_helper_sve2_sqrshrnb_s },
6896 { .fno = gen_helper_sve2_sqrshrnb_d },
6897 };
6898 TRANS_FEAT(SQRSHRNB, aa64_sve2, do_shr_narrow, a, sqrshrnb_ops)
6899
6900 static const GVecGen2i sqrshrnt_ops[3] = {
6901 { .fno = gen_helper_sve2_sqrshrnt_h },
6902 { .fno = gen_helper_sve2_sqrshrnt_s },
6903 { .fno = gen_helper_sve2_sqrshrnt_d },
6904 };
TRANS_FEAT(SQRSHRNT,aa64_sve2,do_shr_narrow,a,sqrshrnt_ops)6905 TRANS_FEAT(SQRSHRNT, aa64_sve2, do_shr_narrow, a, sqrshrnt_ops)
6906
6907 static void gen_uqshrnb_vec(unsigned vece, TCGv_vec d,
6908 TCGv_vec n, int64_t shr)
6909 {
6910 int halfbits = 4 << vece;
6911 int64_t max = MAKE_64BIT_MASK(0, halfbits);
6912
6913 tcg_gen_shri_vec(vece, n, n, shr);
6914 tcg_gen_umin_vec(vece, d, n, tcg_constant_vec_matching(d, vece, max));
6915 }
6916
6917 static const TCGOpcode uqshrnb_vec_list[] = {
6918 INDEX_op_shri_vec, INDEX_op_umin_vec, 0
6919 };
6920 static const GVecGen2i uqshrnb_ops[3] = {
6921 { .fniv = gen_uqshrnb_vec,
6922 .opt_opc = uqshrnb_vec_list,
6923 .fno = gen_helper_sve2_uqshrnb_h,
6924 .vece = MO_16 },
6925 { .fniv = gen_uqshrnb_vec,
6926 .opt_opc = uqshrnb_vec_list,
6927 .fno = gen_helper_sve2_uqshrnb_s,
6928 .vece = MO_32 },
6929 { .fniv = gen_uqshrnb_vec,
6930 .opt_opc = uqshrnb_vec_list,
6931 .fno = gen_helper_sve2_uqshrnb_d,
6932 .vece = MO_64 },
6933 };
TRANS_FEAT(UQSHRNB,aa64_sve2,do_shr_narrow,a,uqshrnb_ops)6934 TRANS_FEAT(UQSHRNB, aa64_sve2, do_shr_narrow, a, uqshrnb_ops)
6935
6936 static void gen_uqshrnt_vec(unsigned vece, TCGv_vec d,
6937 TCGv_vec n, int64_t shr)
6938 {
6939 int halfbits = 4 << vece;
6940 int64_t max = MAKE_64BIT_MASK(0, halfbits);
6941 TCGv_vec maxv = tcg_constant_vec_matching(d, vece, max);
6942
6943 tcg_gen_shri_vec(vece, n, n, shr);
6944 tcg_gen_umin_vec(vece, n, n, maxv);
6945 tcg_gen_shli_vec(vece, n, n, halfbits);
6946 tcg_gen_bitsel_vec(vece, d, maxv, d, n);
6947 }
6948
6949 static const TCGOpcode uqshrnt_vec_list[] = {
6950 INDEX_op_shli_vec, INDEX_op_shri_vec, INDEX_op_umin_vec, 0
6951 };
6952 static const GVecGen2i uqshrnt_ops[3] = {
6953 { .fniv = gen_uqshrnt_vec,
6954 .opt_opc = uqshrnt_vec_list,
6955 .load_dest = true,
6956 .fno = gen_helper_sve2_uqshrnt_h,
6957 .vece = MO_16 },
6958 { .fniv = gen_uqshrnt_vec,
6959 .opt_opc = uqshrnt_vec_list,
6960 .load_dest = true,
6961 .fno = gen_helper_sve2_uqshrnt_s,
6962 .vece = MO_32 },
6963 { .fniv = gen_uqshrnt_vec,
6964 .opt_opc = uqshrnt_vec_list,
6965 .load_dest = true,
6966 .fno = gen_helper_sve2_uqshrnt_d,
6967 .vece = MO_64 },
6968 };
6969 TRANS_FEAT(UQSHRNT, aa64_sve2, do_shr_narrow, a, uqshrnt_ops)
6970
6971 static const GVecGen2i uqrshrnb_ops[3] = {
6972 { .fno = gen_helper_sve2_uqrshrnb_h },
6973 { .fno = gen_helper_sve2_uqrshrnb_s },
6974 { .fno = gen_helper_sve2_uqrshrnb_d },
6975 };
6976 TRANS_FEAT(UQRSHRNB, aa64_sve2, do_shr_narrow, a, uqrshrnb_ops)
6977
6978 static const GVecGen2i uqrshrnt_ops[3] = {
6979 { .fno = gen_helper_sve2_uqrshrnt_h },
6980 { .fno = gen_helper_sve2_uqrshrnt_s },
6981 { .fno = gen_helper_sve2_uqrshrnt_d },
6982 };
6983 TRANS_FEAT(UQRSHRNT, aa64_sve2, do_shr_narrow, a, uqrshrnt_ops)
6984
6985 #define DO_SVE2_ZZZ_NARROW(NAME, name) \
6986 static gen_helper_gvec_3 * const name##_fns[4] = { \
6987 NULL, gen_helper_sve2_##name##_h, \
6988 gen_helper_sve2_##name##_s, gen_helper_sve2_##name##_d, \
6989 }; \
6990 TRANS_FEAT(NAME, aa64_sve2, gen_gvec_ool_arg_zzz, \
6991 name##_fns[a->esz], a, 0)
6992
6993 DO_SVE2_ZZZ_NARROW(ADDHNB, addhnb)
6994 DO_SVE2_ZZZ_NARROW(ADDHNT, addhnt)
6995 DO_SVE2_ZZZ_NARROW(RADDHNB, raddhnb)
6996 DO_SVE2_ZZZ_NARROW(RADDHNT, raddhnt)
6997
6998 DO_SVE2_ZZZ_NARROW(SUBHNB, subhnb)
6999 DO_SVE2_ZZZ_NARROW(SUBHNT, subhnt)
7000 DO_SVE2_ZZZ_NARROW(RSUBHNB, rsubhnb)
7001 DO_SVE2_ZZZ_NARROW(RSUBHNT, rsubhnt)
7002
7003 static gen_helper_gvec_flags_4 * const match_fns[4] = {
7004 gen_helper_sve2_match_ppzz_b, gen_helper_sve2_match_ppzz_h, NULL, NULL
7005 };
7006 TRANS_FEAT_NONSTREAMING(MATCH, aa64_sve2, do_ppzz_flags, a, match_fns[a->esz])
7007
7008 static gen_helper_gvec_flags_4 * const nmatch_fns[4] = {
7009 gen_helper_sve2_nmatch_ppzz_b, gen_helper_sve2_nmatch_ppzz_h, NULL, NULL
7010 };
7011 TRANS_FEAT_NONSTREAMING(NMATCH, aa64_sve2, do_ppzz_flags, a, nmatch_fns[a->esz])
7012
7013 static gen_helper_gvec_4 * const histcnt_fns[4] = {
7014 NULL, NULL, gen_helper_sve2_histcnt_s, gen_helper_sve2_histcnt_d
7015 };
7016 TRANS_FEAT_NONSTREAMING(HISTCNT, aa64_sve2, gen_gvec_ool_arg_zpzz,
7017 histcnt_fns[a->esz], a, 0)
7018
7019 TRANS_FEAT_NONSTREAMING(HISTSEG, aa64_sve2, gen_gvec_ool_arg_zzz,
7020 a->esz == 0 ? gen_helper_sve2_histseg : NULL, a, 0)
7021
7022 DO_ZPZZ_FP(FADDP, aa64_sve2, sve2_faddp_zpzz)
7023 DO_ZPZZ_FP(FMAXNMP, aa64_sve2, sve2_fmaxnmp_zpzz)
7024 DO_ZPZZ_FP(FMINNMP, aa64_sve2, sve2_fminnmp_zpzz)
7025 DO_ZPZZ_FP(FMAXP, aa64_sve2, sve2_fmaxp_zpzz)
7026 DO_ZPZZ_FP(FMINP, aa64_sve2, sve2_fminp_zpzz)
7027
7028 /*
7029 * SVE Integer Multiply-Add (unpredicated)
7030 */
7031
7032 TRANS_FEAT_NONSTREAMING(FMMLA_s, aa64_sve_f32mm, gen_gvec_fpst_zzzz,
7033 gen_helper_fmmla_s, a->rd, a->rn, a->rm, a->ra,
7034 0, FPST_A64)
7035 TRANS_FEAT_NONSTREAMING(FMMLA_d, aa64_sve_f64mm, gen_gvec_fpst_zzzz,
7036 gen_helper_fmmla_d, a->rd, a->rn, a->rm, a->ra,
7037 0, FPST_A64)
7038
7039 static gen_helper_gvec_4 * const sqdmlal_zzzw_fns[] = {
7040 NULL, gen_helper_sve2_sqdmlal_zzzw_h,
7041 gen_helper_sve2_sqdmlal_zzzw_s, gen_helper_sve2_sqdmlal_zzzw_d,
7042 };
7043 TRANS_FEAT(SQDMLALB_zzzw, aa64_sve2, gen_gvec_ool_arg_zzzz,
7044 sqdmlal_zzzw_fns[a->esz], a, 0)
7045 TRANS_FEAT(SQDMLALT_zzzw, aa64_sve2, gen_gvec_ool_arg_zzzz,
7046 sqdmlal_zzzw_fns[a->esz], a, 3)
7047 TRANS_FEAT(SQDMLALBT, aa64_sve2, gen_gvec_ool_arg_zzzz,
7048 sqdmlal_zzzw_fns[a->esz], a, 2)
7049
7050 static gen_helper_gvec_4 * const sqdmlsl_zzzw_fns[] = {
7051 NULL, gen_helper_sve2_sqdmlsl_zzzw_h,
7052 gen_helper_sve2_sqdmlsl_zzzw_s, gen_helper_sve2_sqdmlsl_zzzw_d,
7053 };
7054 TRANS_FEAT(SQDMLSLB_zzzw, aa64_sve2, gen_gvec_ool_arg_zzzz,
7055 sqdmlsl_zzzw_fns[a->esz], a, 0)
7056 TRANS_FEAT(SQDMLSLT_zzzw, aa64_sve2, gen_gvec_ool_arg_zzzz,
7057 sqdmlsl_zzzw_fns[a->esz], a, 3)
7058 TRANS_FEAT(SQDMLSLBT, aa64_sve2, gen_gvec_ool_arg_zzzz,
7059 sqdmlsl_zzzw_fns[a->esz], a, 2)
7060
7061 static gen_helper_gvec_4 * const sqrdmlah_fns[] = {
7062 gen_helper_sve2_sqrdmlah_b, gen_helper_sve2_sqrdmlah_h,
7063 gen_helper_sve2_sqrdmlah_s, gen_helper_sve2_sqrdmlah_d,
7064 };
7065 TRANS_FEAT(SQRDMLAH_zzzz, aa64_sve2, gen_gvec_ool_arg_zzzz,
7066 sqrdmlah_fns[a->esz], a, 0)
7067
7068 static gen_helper_gvec_4 * const sqrdmlsh_fns[] = {
7069 gen_helper_sve2_sqrdmlsh_b, gen_helper_sve2_sqrdmlsh_h,
7070 gen_helper_sve2_sqrdmlsh_s, gen_helper_sve2_sqrdmlsh_d,
7071 };
7072 TRANS_FEAT(SQRDMLSH_zzzz, aa64_sve2, gen_gvec_ool_arg_zzzz,
7073 sqrdmlsh_fns[a->esz], a, 0)
7074
7075 static gen_helper_gvec_4 * const smlal_zzzw_fns[] = {
7076 NULL, gen_helper_sve2_smlal_zzzw_h,
7077 gen_helper_sve2_smlal_zzzw_s, gen_helper_sve2_smlal_zzzw_d,
7078 };
7079 TRANS_FEAT(SMLALB_zzzw, aa64_sve2, gen_gvec_ool_arg_zzzz,
7080 smlal_zzzw_fns[a->esz], a, 0)
7081 TRANS_FEAT(SMLALT_zzzw, aa64_sve2, gen_gvec_ool_arg_zzzz,
7082 smlal_zzzw_fns[a->esz], a, 1)
7083
7084 static gen_helper_gvec_4 * const umlal_zzzw_fns[] = {
7085 NULL, gen_helper_sve2_umlal_zzzw_h,
7086 gen_helper_sve2_umlal_zzzw_s, gen_helper_sve2_umlal_zzzw_d,
7087 };
7088 TRANS_FEAT(UMLALB_zzzw, aa64_sve2, gen_gvec_ool_arg_zzzz,
7089 umlal_zzzw_fns[a->esz], a, 0)
7090 TRANS_FEAT(UMLALT_zzzw, aa64_sve2, gen_gvec_ool_arg_zzzz,
7091 umlal_zzzw_fns[a->esz], a, 1)
7092
7093 static gen_helper_gvec_4 * const smlsl_zzzw_fns[] = {
7094 NULL, gen_helper_sve2_smlsl_zzzw_h,
7095 gen_helper_sve2_smlsl_zzzw_s, gen_helper_sve2_smlsl_zzzw_d,
7096 };
7097 TRANS_FEAT(SMLSLB_zzzw, aa64_sve2, gen_gvec_ool_arg_zzzz,
7098 smlsl_zzzw_fns[a->esz], a, 0)
7099 TRANS_FEAT(SMLSLT_zzzw, aa64_sve2, gen_gvec_ool_arg_zzzz,
7100 smlsl_zzzw_fns[a->esz], a, 1)
7101
7102 static gen_helper_gvec_4 * const umlsl_zzzw_fns[] = {
7103 NULL, gen_helper_sve2_umlsl_zzzw_h,
7104 gen_helper_sve2_umlsl_zzzw_s, gen_helper_sve2_umlsl_zzzw_d,
7105 };
7106 TRANS_FEAT(UMLSLB_zzzw, aa64_sve2, gen_gvec_ool_arg_zzzz,
7107 umlsl_zzzw_fns[a->esz], a, 0)
7108 TRANS_FEAT(UMLSLT_zzzw, aa64_sve2, gen_gvec_ool_arg_zzzz,
7109 umlsl_zzzw_fns[a->esz], a, 1)
7110
7111 static gen_helper_gvec_4 * const cmla_fns[] = {
7112 gen_helper_sve2_cmla_zzzz_b, gen_helper_sve2_cmla_zzzz_h,
7113 gen_helper_sve2_cmla_zzzz_s, gen_helper_sve2_cmla_zzzz_d,
7114 };
7115 TRANS_FEAT(CMLA_zzzz, aa64_sve2, gen_gvec_ool_zzzz,
7116 cmla_fns[a->esz], a->rd, a->rn, a->rm, a->ra, a->rot)
7117
7118 static gen_helper_gvec_4 * const cdot_fns[] = {
7119 NULL, NULL, gen_helper_sve2_cdot_zzzz_s, gen_helper_sve2_cdot_zzzz_d
7120 };
7121 TRANS_FEAT(CDOT_zzzz, aa64_sve2, gen_gvec_ool_zzzz,
7122 cdot_fns[a->esz], a->rd, a->rn, a->rm, a->ra, a->rot)
7123
7124 static gen_helper_gvec_4 * const sqrdcmlah_fns[] = {
7125 gen_helper_sve2_sqrdcmlah_zzzz_b, gen_helper_sve2_sqrdcmlah_zzzz_h,
7126 gen_helper_sve2_sqrdcmlah_zzzz_s, gen_helper_sve2_sqrdcmlah_zzzz_d,
7127 };
7128 TRANS_FEAT(SQRDCMLAH_zzzz, aa64_sve2, gen_gvec_ool_zzzz,
7129 sqrdcmlah_fns[a->esz], a->rd, a->rn, a->rm, a->ra, a->rot)
7130
7131 TRANS_FEAT(USDOT_zzzz, aa64_sve_i8mm, gen_gvec_ool_arg_zzzz,
7132 a->esz == 2 ? gen_helper_gvec_usdot_b : NULL, a, 0)
7133
7134 TRANS_FEAT_NONSTREAMING(AESMC, aa64_sve2_aes, gen_gvec_ool_zz,
7135 gen_helper_crypto_aesmc, a->rd, a->rd, 0)
7136 TRANS_FEAT_NONSTREAMING(AESIMC, aa64_sve2_aes, gen_gvec_ool_zz,
7137 gen_helper_crypto_aesimc, a->rd, a->rd, 0)
7138
7139 TRANS_FEAT_NONSTREAMING(AESE, aa64_sve2_aes, gen_gvec_ool_arg_zzz,
7140 gen_helper_crypto_aese, a, 0)
7141 TRANS_FEAT_NONSTREAMING(AESD, aa64_sve2_aes, gen_gvec_ool_arg_zzz,
7142 gen_helper_crypto_aesd, a, 0)
7143
7144 TRANS_FEAT_NONSTREAMING(SM4E, aa64_sve2_sm4, gen_gvec_ool_arg_zzz,
7145 gen_helper_crypto_sm4e, a, 0)
7146 TRANS_FEAT_NONSTREAMING(SM4EKEY, aa64_sve2_sm4, gen_gvec_ool_arg_zzz,
7147 gen_helper_crypto_sm4ekey, a, 0)
7148
7149 TRANS_FEAT_NONSTREAMING(RAX1, aa64_sve2_sha3, gen_gvec_fn_arg_zzz,
7150 gen_gvec_rax1, a)
7151
7152 TRANS_FEAT(FCVTNT_sh, aa64_sve2, gen_gvec_fpst_arg_zpz,
7153 gen_helper_sve2_fcvtnt_sh, a, 0, FPST_A64)
7154 TRANS_FEAT(FCVTNT_ds, aa64_sve2, gen_gvec_fpst_arg_zpz,
7155 gen_helper_sve2_fcvtnt_ds, a, 0, FPST_A64)
7156
7157 TRANS_FEAT(BFCVTNT, aa64_sve_bf16, gen_gvec_fpst_arg_zpz,
7158 gen_helper_sve_bfcvtnt, a, 0,
7159 s->fpcr_ah ? FPST_AH : FPST_A64)
7160
7161 TRANS_FEAT(FCVTLT_hs, aa64_sve2, gen_gvec_fpst_arg_zpz,
7162 gen_helper_sve2_fcvtlt_hs, a, 0, FPST_A64)
7163 TRANS_FEAT(FCVTLT_sd, aa64_sve2, gen_gvec_fpst_arg_zpz,
7164 gen_helper_sve2_fcvtlt_sd, a, 0, FPST_A64)
7165
7166 TRANS_FEAT(FCVTX_ds, aa64_sve2, do_frint_mode, a,
7167 FPROUNDING_ODD, gen_helper_sve_fcvt_ds)
7168 TRANS_FEAT(FCVTXNT_ds, aa64_sve2, do_frint_mode, a,
7169 FPROUNDING_ODD, gen_helper_sve2_fcvtnt_ds)
7170
7171 static gen_helper_gvec_3_ptr * const flogb_fns[] = {
7172 NULL, gen_helper_flogb_h,
7173 gen_helper_flogb_s, gen_helper_flogb_d
7174 };
7175 TRANS_FEAT(FLOGB, aa64_sve2, gen_gvec_fpst_arg_zpz, flogb_fns[a->esz],
7176 a, 0, a->esz == MO_16 ? FPST_A64_F16 : FPST_A64)
7177
do_FMLAL_zzzw(DisasContext * s,arg_rrrr_esz * a,bool sub,bool sel)7178 static bool do_FMLAL_zzzw(DisasContext *s, arg_rrrr_esz *a, bool sub, bool sel)
7179 {
7180 return gen_gvec_ptr_zzzz(s, gen_helper_sve2_fmlal_zzzw_s,
7181 a->rd, a->rn, a->rm, a->ra,
7182 (sel << 1) | sub, tcg_env);
7183 }
7184
TRANS_FEAT(FMLALB_zzzw,aa64_sve2,do_FMLAL_zzzw,a,false,false)7185 TRANS_FEAT(FMLALB_zzzw, aa64_sve2, do_FMLAL_zzzw, a, false, false)
7186 TRANS_FEAT(FMLALT_zzzw, aa64_sve2, do_FMLAL_zzzw, a, false, true)
7187 TRANS_FEAT(FMLSLB_zzzw, aa64_sve2, do_FMLAL_zzzw, a, true, false)
7188 TRANS_FEAT(FMLSLT_zzzw, aa64_sve2, do_FMLAL_zzzw, a, true, true)
7189
7190 static bool do_FMLAL_zzxw(DisasContext *s, arg_rrxr_esz *a, bool sub, bool sel)
7191 {
7192 return gen_gvec_ptr_zzzz(s, gen_helper_sve2_fmlal_zzxw_s,
7193 a->rd, a->rn, a->rm, a->ra,
7194 (a->index << 2) | (sel << 1) | sub, tcg_env);
7195 }
7196
TRANS_FEAT(FMLALB_zzxw,aa64_sve2,do_FMLAL_zzxw,a,false,false)7197 TRANS_FEAT(FMLALB_zzxw, aa64_sve2, do_FMLAL_zzxw, a, false, false)
7198 TRANS_FEAT(FMLALT_zzxw, aa64_sve2, do_FMLAL_zzxw, a, false, true)
7199 TRANS_FEAT(FMLSLB_zzxw, aa64_sve2, do_FMLAL_zzxw, a, true, false)
7200 TRANS_FEAT(FMLSLT_zzxw, aa64_sve2, do_FMLAL_zzxw, a, true, true)
7201
7202 TRANS_FEAT_NONSTREAMING(SMMLA, aa64_sve_i8mm, gen_gvec_ool_arg_zzzz,
7203 gen_helper_gvec_smmla_b, a, 0)
7204 TRANS_FEAT_NONSTREAMING(USMMLA, aa64_sve_i8mm, gen_gvec_ool_arg_zzzz,
7205 gen_helper_gvec_usmmla_b, a, 0)
7206 TRANS_FEAT_NONSTREAMING(UMMLA, aa64_sve_i8mm, gen_gvec_ool_arg_zzzz,
7207 gen_helper_gvec_ummla_b, a, 0)
7208
7209 TRANS_FEAT(BFDOT_zzzz, aa64_sve_bf16, gen_gvec_env_arg_zzzz,
7210 gen_helper_gvec_bfdot, a, 0)
7211 TRANS_FEAT(BFDOT_zzxz, aa64_sve_bf16, gen_gvec_env_arg_zzxz,
7212 gen_helper_gvec_bfdot_idx, a)
7213
7214 TRANS_FEAT_NONSTREAMING(BFMMLA, aa64_sve_bf16, gen_gvec_env_arg_zzzz,
7215 gen_helper_gvec_bfmmla, a, 0)
7216
7217 static bool do_BFMLAL_zzzw(DisasContext *s, arg_rrrr_esz *a, bool sel)
7218 {
7219 return gen_gvec_fpst_zzzz(s, gen_helper_gvec_bfmlal,
7220 a->rd, a->rn, a->rm, a->ra, sel,
7221 s->fpcr_ah ? FPST_AH : FPST_A64);
7222 }
7223
TRANS_FEAT(BFMLALB_zzzw,aa64_sve_bf16,do_BFMLAL_zzzw,a,false)7224 TRANS_FEAT(BFMLALB_zzzw, aa64_sve_bf16, do_BFMLAL_zzzw, a, false)
7225 TRANS_FEAT(BFMLALT_zzzw, aa64_sve_bf16, do_BFMLAL_zzzw, a, true)
7226
7227 static bool do_BFMLAL_zzxw(DisasContext *s, arg_rrxr_esz *a, bool sel)
7228 {
7229 return gen_gvec_fpst_zzzz(s, gen_helper_gvec_bfmlal_idx,
7230 a->rd, a->rn, a->rm, a->ra,
7231 (a->index << 1) | sel,
7232 s->fpcr_ah ? FPST_AH : FPST_A64);
7233 }
7234
TRANS_FEAT(BFMLALB_zzxw,aa64_sve_bf16,do_BFMLAL_zzxw,a,false)7235 TRANS_FEAT(BFMLALB_zzxw, aa64_sve_bf16, do_BFMLAL_zzxw, a, false)
7236 TRANS_FEAT(BFMLALT_zzxw, aa64_sve_bf16, do_BFMLAL_zzxw, a, true)
7237
7238 static bool trans_PSEL(DisasContext *s, arg_psel *a)
7239 {
7240 int vl = vec_full_reg_size(s);
7241 int pl = pred_gvec_reg_size(s);
7242 int elements = vl >> a->esz;
7243 TCGv_i64 tmp, didx, dbit;
7244 TCGv_ptr ptr;
7245
7246 if (!dc_isar_feature(aa64_sme, s)) {
7247 return false;
7248 }
7249 if (!sve_access_check(s)) {
7250 return true;
7251 }
7252
7253 tmp = tcg_temp_new_i64();
7254 dbit = tcg_temp_new_i64();
7255 didx = tcg_temp_new_i64();
7256 ptr = tcg_temp_new_ptr();
7257
7258 /* Compute the predicate element. */
7259 tcg_gen_addi_i64(tmp, cpu_reg(s, a->rv), a->imm);
7260 if (is_power_of_2(elements)) {
7261 tcg_gen_andi_i64(tmp, tmp, elements - 1);
7262 } else {
7263 tcg_gen_remu_i64(tmp, tmp, tcg_constant_i64(elements));
7264 }
7265
7266 /* Extract the predicate byte and bit indices. */
7267 tcg_gen_shli_i64(tmp, tmp, a->esz);
7268 tcg_gen_andi_i64(dbit, tmp, 7);
7269 tcg_gen_shri_i64(didx, tmp, 3);
7270 if (HOST_BIG_ENDIAN) {
7271 tcg_gen_xori_i64(didx, didx, 7);
7272 }
7273
7274 /* Load the predicate word. */
7275 tcg_gen_trunc_i64_ptr(ptr, didx);
7276 tcg_gen_add_ptr(ptr, ptr, tcg_env);
7277 tcg_gen_ld8u_i64(tmp, ptr, pred_full_reg_offset(s, a->pm));
7278
7279 /* Extract the predicate bit and replicate to MO_64. */
7280 tcg_gen_shr_i64(tmp, tmp, dbit);
7281 tcg_gen_andi_i64(tmp, tmp, 1);
7282 tcg_gen_neg_i64(tmp, tmp);
7283
7284 /* Apply to either copy the source, or write zeros. */
7285 pl = size_for_gvec(pl);
7286 tcg_gen_gvec_ands(MO_64, pred_full_reg_offset(s, a->pd),
7287 pred_full_reg_offset(s, a->pn), tmp, pl, pl);
7288 return true;
7289 }
7290
gen_sclamp_i32(TCGv_i32 d,TCGv_i32 n,TCGv_i32 m,TCGv_i32 a)7291 static void gen_sclamp_i32(TCGv_i32 d, TCGv_i32 n, TCGv_i32 m, TCGv_i32 a)
7292 {
7293 tcg_gen_smax_i32(d, a, n);
7294 tcg_gen_smin_i32(d, d, m);
7295 }
7296
gen_sclamp_i64(TCGv_i64 d,TCGv_i64 n,TCGv_i64 m,TCGv_i64 a)7297 static void gen_sclamp_i64(TCGv_i64 d, TCGv_i64 n, TCGv_i64 m, TCGv_i64 a)
7298 {
7299 tcg_gen_smax_i64(d, a, n);
7300 tcg_gen_smin_i64(d, d, m);
7301 }
7302
gen_sclamp_vec(unsigned vece,TCGv_vec d,TCGv_vec n,TCGv_vec m,TCGv_vec a)7303 static void gen_sclamp_vec(unsigned vece, TCGv_vec d, TCGv_vec n,
7304 TCGv_vec m, TCGv_vec a)
7305 {
7306 tcg_gen_smax_vec(vece, d, a, n);
7307 tcg_gen_smin_vec(vece, d, d, m);
7308 }
7309
gen_sclamp(unsigned vece,uint32_t d,uint32_t n,uint32_t m,uint32_t a,uint32_t oprsz,uint32_t maxsz)7310 static void gen_sclamp(unsigned vece, uint32_t d, uint32_t n, uint32_t m,
7311 uint32_t a, uint32_t oprsz, uint32_t maxsz)
7312 {
7313 static const TCGOpcode vecop[] = {
7314 INDEX_op_smin_vec, INDEX_op_smax_vec, 0
7315 };
7316 static const GVecGen4 ops[4] = {
7317 { .fniv = gen_sclamp_vec,
7318 .fno = gen_helper_gvec_sclamp_b,
7319 .opt_opc = vecop,
7320 .vece = MO_8 },
7321 { .fniv = gen_sclamp_vec,
7322 .fno = gen_helper_gvec_sclamp_h,
7323 .opt_opc = vecop,
7324 .vece = MO_16 },
7325 { .fni4 = gen_sclamp_i32,
7326 .fniv = gen_sclamp_vec,
7327 .fno = gen_helper_gvec_sclamp_s,
7328 .opt_opc = vecop,
7329 .vece = MO_32 },
7330 { .fni8 = gen_sclamp_i64,
7331 .fniv = gen_sclamp_vec,
7332 .fno = gen_helper_gvec_sclamp_d,
7333 .opt_opc = vecop,
7334 .vece = MO_64,
7335 .prefer_i64 = TCG_TARGET_REG_BITS == 64 }
7336 };
7337 tcg_gen_gvec_4(d, n, m, a, oprsz, maxsz, &ops[vece]);
7338 }
7339
TRANS_FEAT(SCLAMP,aa64_sme,gen_gvec_fn_arg_zzzz,gen_sclamp,a)7340 TRANS_FEAT(SCLAMP, aa64_sme, gen_gvec_fn_arg_zzzz, gen_sclamp, a)
7341
7342 static void gen_uclamp_i32(TCGv_i32 d, TCGv_i32 n, TCGv_i32 m, TCGv_i32 a)
7343 {
7344 tcg_gen_umax_i32(d, a, n);
7345 tcg_gen_umin_i32(d, d, m);
7346 }
7347
gen_uclamp_i64(TCGv_i64 d,TCGv_i64 n,TCGv_i64 m,TCGv_i64 a)7348 static void gen_uclamp_i64(TCGv_i64 d, TCGv_i64 n, TCGv_i64 m, TCGv_i64 a)
7349 {
7350 tcg_gen_umax_i64(d, a, n);
7351 tcg_gen_umin_i64(d, d, m);
7352 }
7353
gen_uclamp_vec(unsigned vece,TCGv_vec d,TCGv_vec n,TCGv_vec m,TCGv_vec a)7354 static void gen_uclamp_vec(unsigned vece, TCGv_vec d, TCGv_vec n,
7355 TCGv_vec m, TCGv_vec a)
7356 {
7357 tcg_gen_umax_vec(vece, d, a, n);
7358 tcg_gen_umin_vec(vece, d, d, m);
7359 }
7360
gen_uclamp(unsigned vece,uint32_t d,uint32_t n,uint32_t m,uint32_t a,uint32_t oprsz,uint32_t maxsz)7361 static void gen_uclamp(unsigned vece, uint32_t d, uint32_t n, uint32_t m,
7362 uint32_t a, uint32_t oprsz, uint32_t maxsz)
7363 {
7364 static const TCGOpcode vecop[] = {
7365 INDEX_op_umin_vec, INDEX_op_umax_vec, 0
7366 };
7367 static const GVecGen4 ops[4] = {
7368 { .fniv = gen_uclamp_vec,
7369 .fno = gen_helper_gvec_uclamp_b,
7370 .opt_opc = vecop,
7371 .vece = MO_8 },
7372 { .fniv = gen_uclamp_vec,
7373 .fno = gen_helper_gvec_uclamp_h,
7374 .opt_opc = vecop,
7375 .vece = MO_16 },
7376 { .fni4 = gen_uclamp_i32,
7377 .fniv = gen_uclamp_vec,
7378 .fno = gen_helper_gvec_uclamp_s,
7379 .opt_opc = vecop,
7380 .vece = MO_32 },
7381 { .fni8 = gen_uclamp_i64,
7382 .fniv = gen_uclamp_vec,
7383 .fno = gen_helper_gvec_uclamp_d,
7384 .opt_opc = vecop,
7385 .vece = MO_64,
7386 .prefer_i64 = TCG_TARGET_REG_BITS == 64 }
7387 };
7388 tcg_gen_gvec_4(d, n, m, a, oprsz, maxsz, &ops[vece]);
7389 }
7390
7391 TRANS_FEAT(UCLAMP, aa64_sme, gen_gvec_fn_arg_zzzz, gen_uclamp, a)
7392