xref: /openbmc/qemu/target/arm/tcg/translate-sme.c (revision c017386f28c03a03b8f14444f8671d3d8f7180fe)
1 /*
2  * AArch64 SME translation
3  *
4  * Copyright (c) 2022 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 
24 /*
25  * Include the generated decoder.
26  */
27 
28 #include "decode-sme.c.inc"
29 
sme2_zt0_enabled_check(DisasContext * s)30 static bool sme2_zt0_enabled_check(DisasContext *s)
31 {
32     if (!sme_za_enabled_check(s)) {
33         return false;
34     }
35     if (s->zt0_excp_el) {
36         gen_exception_insn_el(s, 0, EXCP_UDEF,
37                               syn_smetrap(SME_ET_InaccessibleZT0, false),
38                               s->zt0_excp_el);
39         return false;
40     }
41     return true;
42 }
43 
44 /* Resolve tile.size[rs+imm] to a host pointer. */
get_tile_rowcol(DisasContext * s,int esz,int rs,int tile,int imm,int div_len,int vec_mod,bool vertical)45 static TCGv_ptr get_tile_rowcol(DisasContext *s, int esz, int rs,
46                                 int tile, int imm, int div_len,
47                                 int vec_mod, bool vertical)
48 {
49     int pos, len, offset;
50     TCGv_i32 tmp;
51     TCGv_ptr addr;
52 
53     /* Compute the final index, which is Rs+imm. */
54     tmp = tcg_temp_new_i32();
55     tcg_gen_trunc_tl_i32(tmp, cpu_reg(s, rs));
56     /*
57      * Round the vector index down to a multiple of vec_mod if necessary.
58      * We do this before adding the offset, to handle cases like
59      * MOVA (tile to vector, 2 registers) where we want to call this
60      * several times in a loop with an increasing offset. We rely on
61      * the instruction encodings always forcing the initial offset in
62      * [rs + offset] to be a multiple of vec_mod. The pseudocode usually
63      * does the round-down after adding the offset rather than before,
64      * but MOVA is an exception.
65      */
66     if (vec_mod > 1) {
67         tcg_gen_andc_i32(tmp, tmp, tcg_constant_i32(vec_mod - 1));
68     }
69     tcg_gen_addi_i32(tmp, tmp, imm);
70 
71     /* Prepare a power-of-two modulo via extraction of @len bits. */
72     len = ctz32(streaming_vec_reg_size(s) / div_len) - esz;
73 
74     if (!len) {
75         /*
76          * SVL is 128 and the element size is 128. There is exactly
77          * one 128x128 tile in the ZA storage, and so we calculate
78          * (Rs + imm) MOD 1, which is always 0. We need to special case
79          * this because TCG doesn't allow deposit ops with len 0.
80          */
81         tcg_gen_movi_i32(tmp, 0);
82     } else if (vertical) {
83         /*
84          * Compute the byte offset of the index within the tile:
85          *     (index % (svl / size)) * size
86          *   = (index % (svl >> esz)) << esz
87          * Perform the power-of-two modulo via extraction of the low @len bits.
88          * Perform the multiply by shifting left by @pos bits.
89          * Perform these operations simultaneously via deposit into zero.
90          */
91         pos = esz;
92         tcg_gen_deposit_z_i32(tmp, tmp, pos, len);
93 
94         /*
95          * For big-endian, adjust the indexed column byte offset within
96          * the uint64_t host words that make up env->zarray[].
97          */
98         if (HOST_BIG_ENDIAN && esz < MO_64) {
99             tcg_gen_xori_i32(tmp, tmp, 8 - (1 << esz));
100         }
101     } else {
102         /*
103          * Compute the byte offset of the index within the tile:
104          *     (index % (svl / size)) * (size * sizeof(row))
105          *   = (index % (svl >> esz)) << (esz + log2(sizeof(row)))
106          */
107         pos = esz + ctz32(sizeof(ARMVectorReg));
108         tcg_gen_deposit_z_i32(tmp, tmp, pos, len);
109 
110         /* Row slices are always aligned and need no endian adjustment. */
111     }
112 
113     /* The tile byte offset within env->zarray is the row. */
114     offset = tile * sizeof(ARMVectorReg);
115 
116     /* Include the byte offset of zarray to make this relative to env. */
117     offset += offsetof(CPUARMState, za_state.za);
118     tcg_gen_addi_i32(tmp, tmp, offset);
119 
120     /* Add the byte offset to env to produce the final pointer. */
121     addr = tcg_temp_new_ptr();
122     tcg_gen_ext_i32_ptr(addr, tmp);
123     tcg_gen_add_ptr(addr, addr, tcg_env);
124 
125     return addr;
126 }
127 
128 /* Resolve ZArray[rs+imm] to a host pointer. */
get_zarray(DisasContext * s,int rs,int imm,int div_len,int vec_mod)129 static TCGv_ptr get_zarray(DisasContext *s, int rs, int imm,
130                            int div_len, int vec_mod)
131 {
132     /* ZA[n] equates to ZA0H.B[n]. */
133     return get_tile_rowcol(s, MO_8, rs, 0, imm, div_len, vec_mod, false);
134 }
135 
136 /*
137  * Resolve tile.size[0] to a host pointer.
138  * Used by e.g. outer product insns where we require the entire tile.
139  */
get_tile(DisasContext * s,int esz,int tile)140 static TCGv_ptr get_tile(DisasContext *s, int esz, int tile)
141 {
142     TCGv_ptr addr = tcg_temp_new_ptr();
143     int offset;
144 
145     offset = tile * sizeof(ARMVectorReg) + offsetof(CPUARMState, za_state.za);
146 
147     tcg_gen_addi_ptr(addr, tcg_env, offset);
148     return addr;
149 }
150 
trans_ZERO(DisasContext * s,arg_ZERO * a)151 static bool trans_ZERO(DisasContext *s, arg_ZERO *a)
152 {
153     if (!dc_isar_feature(aa64_sme, s)) {
154         return false;
155     }
156     if (sme_za_enabled_check(s)) {
157         gen_helper_sme_zero(tcg_env, tcg_constant_i32(a->imm),
158                             tcg_constant_i32(streaming_vec_reg_size(s)));
159     }
160     return true;
161 }
162 
trans_ZERO_zt0(DisasContext * s,arg_ZERO_zt0 * a)163 static bool trans_ZERO_zt0(DisasContext *s, arg_ZERO_zt0 *a)
164 {
165     if (!dc_isar_feature(aa64_sme2, s)) {
166         return false;
167     }
168     if (sme_enabled_check(s) && sme2_zt0_enabled_check(s)) {
169         tcg_gen_gvec_dup_imm(MO_64, offsetof(CPUARMState, za_state.zt0),
170                              sizeof_field(CPUARMState, za_state.zt0),
171                              sizeof_field(CPUARMState, za_state.zt0), 0);
172     }
173     return true;
174 }
175 
trans_ZERO_za(DisasContext * s,arg_ZERO_za * a)176 static bool trans_ZERO_za(DisasContext *s, arg_ZERO_za *a)
177 {
178     if (!dc_isar_feature(aa64_sme2p1, s)) {
179         return false;
180     }
181     if (sme_smza_enabled_check(s)) {
182         int svl = streaming_vec_reg_size(s);
183         int vstride = svl / a->ngrp;
184         TCGv_ptr t_za = get_zarray(s, a->rv, a->off, a->ngrp, a->nvec);
185 
186         for (int r = 0; r < a->ngrp; ++r) {
187             for (int i = 0; i < a->nvec; ++i) {
188                 int o_za = (r * vstride + i) * sizeof(ARMVectorReg);
189                 tcg_gen_gvec_dup_imm_var(MO_64, t_za, o_za, svl, svl, 0);
190             }
191         }
192     }
193     return true;
194 }
195 
do_mova_tile(DisasContext * s,arg_mova_p * a,bool to_vec)196 static bool do_mova_tile(DisasContext *s, arg_mova_p *a, bool to_vec)
197 {
198     static gen_helper_gvec_4 * const h_fns[5] = {
199         gen_helper_sve_sel_zpzz_b, gen_helper_sve_sel_zpzz_h,
200         gen_helper_sve_sel_zpzz_s, gen_helper_sve_sel_zpzz_d,
201         gen_helper_sve_sel_zpzz_q
202     };
203     static gen_helper_gvec_3 * const cz_fns[5] = {
204         gen_helper_sme_mova_cz_b, gen_helper_sme_mova_cz_h,
205         gen_helper_sme_mova_cz_s, gen_helper_sme_mova_cz_d,
206         gen_helper_sme_mova_cz_q,
207     };
208     static gen_helper_gvec_3 * const zc_fns[5] = {
209         gen_helper_sme_mova_zc_b, gen_helper_sme_mova_zc_h,
210         gen_helper_sme_mova_zc_s, gen_helper_sme_mova_zc_d,
211         gen_helper_sme_mova_zc_q,
212     };
213 
214     TCGv_ptr t_za, t_zr, t_pg;
215     TCGv_i32 t_desc;
216     int svl;
217 
218     if (!sme_smza_enabled_check(s)) {
219         return true;
220     }
221 
222     t_za = get_tile_rowcol(s, a->esz, a->rs, a->za, a->off, 1, 0, a->v);
223     t_zr = vec_full_reg_ptr(s, a->zr);
224     t_pg = pred_full_reg_ptr(s, a->pg);
225 
226     svl = streaming_vec_reg_size(s);
227     t_desc = tcg_constant_i32(simd_desc(svl, svl, 0));
228 
229     if (a->v) {
230         /* Vertical slice -- use sme mova helpers. */
231         if (to_vec) {
232             zc_fns[a->esz](t_zr, t_za, t_pg, t_desc);
233         } else {
234             cz_fns[a->esz](t_za, t_zr, t_pg, t_desc);
235         }
236     } else {
237         /* Horizontal slice -- reuse sve sel helpers. */
238         if (to_vec) {
239             h_fns[a->esz](t_zr, t_za, t_zr, t_pg, t_desc);
240         } else {
241             h_fns[a->esz](t_za, t_zr, t_za, t_pg, t_desc);
242         }
243     }
244     return true;
245 }
246 
TRANS_FEAT(MOVA_tz,aa64_sme,do_mova_tile,a,false)247 TRANS_FEAT(MOVA_tz, aa64_sme, do_mova_tile, a, false)
248 TRANS_FEAT(MOVA_zt, aa64_sme, do_mova_tile, a, true)
249 
250 static bool do_mova_tile_n(DisasContext *s, arg_mova_t *a, int n,
251                            bool to_vec, bool zero)
252 {
253     static gen_helper_gvec_2 * const cz_fns[] = {
254         gen_helper_sme2_mova_cz_b, gen_helper_sme2_mova_cz_h,
255         gen_helper_sme2_mova_cz_s, gen_helper_sme2_mova_cz_d,
256     };
257     static gen_helper_gvec_2 * const zc_fns[] = {
258         gen_helper_sme2_mova_zc_b, gen_helper_sme2_mova_zc_h,
259         gen_helper_sme2_mova_zc_s, gen_helper_sme2_mova_zc_d,
260     };
261     static gen_helper_gvec_2 * const zc_z_fns[] = {
262         gen_helper_sme2p1_movaz_zc_b, gen_helper_sme2p1_movaz_zc_h,
263         gen_helper_sme2p1_movaz_zc_s, gen_helper_sme2p1_movaz_zc_d,
264         gen_helper_sme2p1_movaz_zc_q,
265     };
266     TCGv_ptr t_za;
267     int svl, bytes_per_op = n << a->esz;
268 
269     /*
270      * The MaxImplementedSVL check happens in the decode pseudocode,
271      * before the SM+ZA enabled check in the operation pseudocode.
272      * This will (currently) only fail for NREG=4, ESZ=MO_64.
273      */
274     if (s->max_svl < bytes_per_op) {
275         unallocated_encoding(s);
276         return true;
277     }
278 
279     assert(a->esz <= MO_64 + zero);
280 
281     if (!sme_smza_enabled_check(s)) {
282         return true;
283     }
284 
285     svl = streaming_vec_reg_size(s);
286 
287     /*
288      * The CurrentVL check happens in the operation pseudocode,
289      * after the SM+ZA enabled check.
290      */
291     if (svl < bytes_per_op) {
292         unallocated_encoding(s);
293         return true;
294     }
295 
296     if (a->v) {
297         TCGv_i32 t_desc = tcg_constant_i32(simd_desc(svl, svl, 0));
298 
299         for (int i = 0; i < n; ++i) {
300             TCGv_ptr t_zr = vec_full_reg_ptr(s, a->zr * n + i);
301             t_za = get_tile_rowcol(s, a->esz, a->rs, a->za,
302                                    a->off * n + i, 1, n, a->v);
303             if (zero) {
304                 zc_z_fns[a->esz](t_zr, t_za, t_desc);
305             } else if (to_vec) {
306                 zc_fns[a->esz](t_zr, t_za, t_desc);
307             } else {
308                 cz_fns[a->esz](t_za, t_zr, t_desc);
309             }
310         }
311     } else {
312         for (int i = 0; i < n; ++i) {
313             int o_zr = vec_full_reg_offset(s, a->zr * n + i);
314             t_za = get_tile_rowcol(s, a->esz, a->rs, a->za,
315                                    a->off * n + i, 1, n, a->v);
316             if (to_vec) {
317                 tcg_gen_gvec_mov_var(MO_8, tcg_env, o_zr, t_za, 0, svl, svl);
318                 if (zero) {
319                     tcg_gen_gvec_dup_imm_var(MO_8, t_za, 0, svl, svl, 0);
320                 }
321             } else {
322                 tcg_gen_gvec_mov_var(MO_8, t_za, 0, tcg_env, o_zr, svl, svl);
323             }
324         }
325     }
326     return true;
327 }
328 
329 TRANS_FEAT(MOVA_tz2, aa64_sme2, do_mova_tile_n, a, 2, false, false)
330 TRANS_FEAT(MOVA_tz4, aa64_sme2, do_mova_tile_n, a, 4, false, false)
331 TRANS_FEAT(MOVA_zt2, aa64_sme2, do_mova_tile_n, a, 2, true, false)
332 TRANS_FEAT(MOVA_zt4, aa64_sme2, do_mova_tile_n, a, 4, true, false)
333 
334 TRANS_FEAT(MOVAZ_zt, aa64_sme2p1, do_mova_tile_n, a, 1, true, true)
335 TRANS_FEAT(MOVAZ_zt2, aa64_sme2p1, do_mova_tile_n, a, 2, true, true)
336 TRANS_FEAT(MOVAZ_zt4, aa64_sme2p1, do_mova_tile_n, a, 4, true, true)
337 
do_mova_array_n(DisasContext * s,arg_mova_a * a,int n,bool to_vec,bool zero)338 static bool do_mova_array_n(DisasContext *s, arg_mova_a *a, int n,
339                             bool to_vec, bool zero)
340 {
341     TCGv_ptr t_za;
342     int svl;
343 
344     if (!sme_smza_enabled_check(s)) {
345         return true;
346     }
347 
348     svl = streaming_vec_reg_size(s);
349     t_za = get_zarray(s, a->rv, a->off, n, 0);
350 
351     for (int i = 0; i < n; ++i) {
352         int o_za = (svl / n * sizeof(ARMVectorReg)) * i;
353         int o_zr = vec_full_reg_offset(s, a->zr * n + i);
354 
355         if (to_vec) {
356             tcg_gen_gvec_mov_var(MO_8, tcg_env, o_zr, t_za, o_za, svl, svl);
357             if (zero) {
358                 tcg_gen_gvec_dup_imm_var(MO_8, t_za, o_za, svl, svl, 0);
359             }
360         } else {
361             tcg_gen_gvec_mov_var(MO_8, t_za, o_za, tcg_env, o_zr, svl, svl);
362         }
363     }
364     return true;
365 }
366 
367 TRANS_FEAT(MOVA_az2, aa64_sme2, do_mova_array_n, a, 2, false, false)
368 TRANS_FEAT(MOVA_az4, aa64_sme2, do_mova_array_n, a, 4, false, false)
369 TRANS_FEAT(MOVA_za2, aa64_sme2, do_mova_array_n, a, 2, true, false)
370 TRANS_FEAT(MOVA_za4, aa64_sme2, do_mova_array_n, a, 4, true, false)
371 
372 TRANS_FEAT(MOVAZ_za2, aa64_sme2p1, do_mova_array_n, a, 2, true, true)
373 TRANS_FEAT(MOVAZ_za4, aa64_sme2p1, do_mova_array_n, a, 4, true, true)
374 
do_movt(DisasContext * s,arg_MOVT_rzt * a,void (* func)(TCGv_i64,TCGv_ptr,tcg_target_long))375 static bool do_movt(DisasContext *s, arg_MOVT_rzt *a,
376                     void (*func)(TCGv_i64, TCGv_ptr, tcg_target_long))
377 {
378     if (sme2_zt0_enabled_check(s)) {
379         func(cpu_reg(s, a->rt), tcg_env,
380              offsetof(CPUARMState, za_state.zt0) + a->off * 8);
381     }
382     return true;
383 }
384 
TRANS_FEAT(MOVT_rzt,aa64_sme2,do_movt,a,tcg_gen_ld_i64)385 TRANS_FEAT(MOVT_rzt, aa64_sme2, do_movt, a, tcg_gen_ld_i64)
386 TRANS_FEAT(MOVT_ztr, aa64_sme2, do_movt, a, tcg_gen_st_i64)
387 
388 static bool trans_LDST1(DisasContext *s, arg_LDST1 *a)
389 {
390     typedef void GenLdSt1(TCGv_env, TCGv_ptr, TCGv_ptr, TCGv, TCGv_i64);
391 
392     /*
393      * Indexed by [esz][be][v][mte][st], which is (except for load/store)
394      * also the order in which the elements appear in the function names,
395      * and so how we must concatenate the pieces.
396      */
397 
398 #define FN_LS(F)     { gen_helper_sme_ld1##F, gen_helper_sme_st1##F }
399 #define FN_MTE(F)    { FN_LS(F), FN_LS(F##_mte) }
400 #define FN_HV(F)     { FN_MTE(F##_h), FN_MTE(F##_v) }
401 #define FN_END(L, B) { FN_HV(L), FN_HV(B) }
402 
403     static GenLdSt1 * const fns[5][2][2][2][2] = {
404         FN_END(b, b),
405         FN_END(h_le, h_be),
406         FN_END(s_le, s_be),
407         FN_END(d_le, d_be),
408         FN_END(q_le, q_be),
409     };
410 
411 #undef FN_LS
412 #undef FN_MTE
413 #undef FN_HV
414 #undef FN_END
415 
416     TCGv_ptr t_za, t_pg;
417     TCGv_i64 addr;
418     uint64_t desc;
419     bool be = s->be_data == MO_BE;
420     bool mte = s->mte_active[0];
421 
422     if (!dc_isar_feature(aa64_sme, s)) {
423         return false;
424     }
425     if (!sme_smza_enabled_check(s)) {
426         return true;
427     }
428 
429     t_za = get_tile_rowcol(s, a->esz, a->rs, a->za, a->off, 1, 0, a->v);
430     t_pg = pred_full_reg_ptr(s, a->pg);
431     addr = tcg_temp_new_i64();
432 
433     tcg_gen_shli_i64(addr, cpu_reg(s, a->rm), a->esz);
434     tcg_gen_add_i64(addr, addr, cpu_reg_sp(s, a->rn));
435 
436     if (!mte) {
437         addr = clean_data_tbi(s, addr);
438     }
439 
440     desc = make_svemte_desc(s, streaming_vec_reg_size(s), 1, a->esz, a->st, 0);
441 
442     fns[a->esz][be][a->v][mte][a->st](tcg_env, t_za, t_pg, addr,
443                                       tcg_constant_i64(desc));
444     return true;
445 }
446 
447 typedef void GenLdStR(DisasContext *, TCGv_ptr, int, int, int, int, MemOp);
448 
do_ldst_r(DisasContext * s,arg_ldstr * a,GenLdStR * fn)449 static bool do_ldst_r(DisasContext *s, arg_ldstr *a, GenLdStR *fn)
450 {
451     if (sme_za_enabled_check(s)) {
452         int svl = streaming_vec_reg_size(s);
453         int imm = a->imm;
454         TCGv_ptr base = get_zarray(s, a->rv, imm, 1, 0);
455 
456         fn(s, base, 0, svl, a->rn, imm * svl,
457            s->align_mem ? MO_ALIGN_16 : MO_UNALN);
458     }
459     return true;
460 }
461 
TRANS_FEAT(LDR,aa64_sme,do_ldst_r,a,gen_sve_ldr)462 TRANS_FEAT(LDR, aa64_sme, do_ldst_r, a, gen_sve_ldr)
463 TRANS_FEAT(STR, aa64_sme, do_ldst_r, a, gen_sve_str)
464 
465 static bool do_ldst_zt0(DisasContext *s, arg_ldstzt0 *a, GenLdStR *fn)
466 {
467     if (sme2_zt0_enabled_check(s)) {
468         fn(s, tcg_env, offsetof(CPUARMState, za_state.zt0),
469            sizeof_field(CPUARMState, za_state.zt0), a->rn, 0,
470            s->align_mem ? MO_ALIGN_16 : MO_UNALN);
471     }
472     return true;
473 }
474 
TRANS_FEAT(LDR_zt0,aa64_sme2,do_ldst_zt0,a,gen_sve_ldr)475 TRANS_FEAT(LDR_zt0, aa64_sme2, do_ldst_zt0, a, gen_sve_ldr)
476 TRANS_FEAT(STR_zt0, aa64_sme2, do_ldst_zt0, a, gen_sve_str)
477 
478 static bool do_adda(DisasContext *s, arg_adda *a, MemOp esz,
479                     gen_helper_gvec_4 *fn)
480 {
481     int svl = streaming_vec_reg_size(s);
482     uint32_t desc = simd_desc(svl, svl, 0);
483     TCGv_ptr za, zn, pn, pm;
484 
485     if (!sme_smza_enabled_check(s)) {
486         return true;
487     }
488 
489     za = get_tile(s, esz, a->zad);
490     zn = vec_full_reg_ptr(s, a->zn);
491     pn = pred_full_reg_ptr(s, a->pn);
492     pm = pred_full_reg_ptr(s, a->pm);
493 
494     fn(za, zn, pn, pm, tcg_constant_i32(desc));
495     return true;
496 }
497 
TRANS_FEAT(ADDHA_s,aa64_sme,do_adda,a,MO_32,gen_helper_sme_addha_s)498 TRANS_FEAT(ADDHA_s, aa64_sme, do_adda, a, MO_32, gen_helper_sme_addha_s)
499 TRANS_FEAT(ADDVA_s, aa64_sme, do_adda, a, MO_32, gen_helper_sme_addva_s)
500 TRANS_FEAT(ADDHA_d, aa64_sme_i16i64, do_adda, a, MO_64, gen_helper_sme_addha_d)
501 TRANS_FEAT(ADDVA_d, aa64_sme_i16i64, do_adda, a, MO_64, gen_helper_sme_addva_d)
502 
503 static bool do_outprod(DisasContext *s, arg_op *a, MemOp esz,
504                        gen_helper_gvec_5 *fn)
505 {
506     int svl = streaming_vec_reg_size(s);
507     uint32_t desc = simd_desc(svl, svl, a->sub);
508     TCGv_ptr za, zn, zm, pn, pm;
509 
510     if (!sme_smza_enabled_check(s)) {
511         return true;
512     }
513 
514     za = get_tile(s, esz, a->zad);
515     zn = vec_full_reg_ptr(s, a->zn);
516     zm = vec_full_reg_ptr(s, a->zm);
517     pn = pred_full_reg_ptr(s, a->pn);
518     pm = pred_full_reg_ptr(s, a->pm);
519 
520     fn(za, zn, zm, pn, pm, tcg_constant_i32(desc));
521     return true;
522 }
523 
do_outprod_fpst(DisasContext * s,arg_op * a,MemOp esz,ARMFPStatusFlavour e_fpst,gen_helper_gvec_5_ptr * fn)524 static bool do_outprod_fpst(DisasContext *s, arg_op *a, MemOp esz,
525                             ARMFPStatusFlavour e_fpst,
526                             gen_helper_gvec_5_ptr *fn)
527 {
528     int svl = streaming_vec_reg_size(s);
529     uint32_t desc = simd_desc(svl, svl, 0);
530     TCGv_ptr za, zn, zm, pn, pm, fpst;
531 
532     if (!sme_smza_enabled_check(s)) {
533         return true;
534     }
535 
536     za = get_tile(s, esz, a->zad);
537     zn = vec_full_reg_ptr(s, a->zn);
538     zm = vec_full_reg_ptr(s, a->zm);
539     pn = pred_full_reg_ptr(s, a->pn);
540     pm = pred_full_reg_ptr(s, a->pm);
541     fpst = fpstatus_ptr(e_fpst);
542 
543     fn(za, zn, zm, pn, pm, fpst, tcg_constant_i32(desc));
544     return true;
545 }
546 
do_outprod_env(DisasContext * s,arg_op * a,MemOp esz,gen_helper_gvec_5_ptr * fn)547 static bool do_outprod_env(DisasContext *s, arg_op *a, MemOp esz,
548                            gen_helper_gvec_5_ptr *fn)
549 {
550     int svl = streaming_vec_reg_size(s);
551     uint32_t desc = simd_desc(svl, svl, 0);
552     TCGv_ptr za, zn, zm, pn, pm;
553 
554     if (!sme_smza_enabled_check(s)) {
555         return true;
556     }
557 
558     za = get_tile(s, esz, a->zad);
559     zn = vec_full_reg_ptr(s, a->zn);
560     zm = vec_full_reg_ptr(s, a->zm);
561     pn = pred_full_reg_ptr(s, a->pn);
562     pm = pred_full_reg_ptr(s, a->pm);
563 
564     fn(za, zn, zm, pn, pm, tcg_env, tcg_constant_i32(desc));
565     return true;
566 }
567 
568 TRANS_FEAT(FMOPA_w_h, aa64_sme, do_outprod_env, a, MO_32,
569            !a->sub ? gen_helper_sme_fmopa_w_h
570            : !s->fpcr_ah ? gen_helper_sme_fmops_w_h
571            : gen_helper_sme_ah_fmops_w_h)
572 TRANS_FEAT(FMOPA_h, aa64_sme_f16f16, do_outprod_fpst, a, MO_16, FPST_ZA_F16,
573            !a->sub ? gen_helper_sme_fmopa_h
574            : !s->fpcr_ah ? gen_helper_sme_fmops_h
575            : gen_helper_sme_ah_fmops_h)
576 TRANS_FEAT(FMOPA_s, aa64_sme, do_outprod_fpst, a, MO_32, FPST_ZA,
577            !a->sub ? gen_helper_sme_fmopa_s
578            : !s->fpcr_ah ? gen_helper_sme_fmops_s
579            : gen_helper_sme_ah_fmops_s)
580 TRANS_FEAT(FMOPA_d, aa64_sme_f64f64, do_outprod_fpst, a, MO_64, FPST_ZA,
581            !a->sub ? gen_helper_sme_fmopa_d
582            : !s->fpcr_ah ? gen_helper_sme_fmops_d
583            : gen_helper_sme_ah_fmops_d)
584 
585 TRANS_FEAT(BFMOPA, aa64_sme_b16b16, do_outprod_fpst, a, MO_16, FPST_ZA,
586            !a->sub ? gen_helper_sme_bfmopa
587            : !s->fpcr_ah ? gen_helper_sme_bfmops
588            : gen_helper_sme_ah_bfmops)
589 
590 TRANS_FEAT(BFMOPA_w, aa64_sme, do_outprod_env, a, MO_32,
591            !a->sub ? gen_helper_sme_bfmopa_w
592            : !s->fpcr_ah ? gen_helper_sme_bfmops_w
593            : gen_helper_sme_ah_bfmops_w)
594 
TRANS_FEAT(SMOPA_s,aa64_sme,do_outprod,a,MO_32,gen_helper_sme_smopa_s)595 TRANS_FEAT(SMOPA_s, aa64_sme, do_outprod, a, MO_32, gen_helper_sme_smopa_s)
596 TRANS_FEAT(UMOPA_s, aa64_sme, do_outprod, a, MO_32, gen_helper_sme_umopa_s)
597 TRANS_FEAT(SUMOPA_s, aa64_sme, do_outprod, a, MO_32, gen_helper_sme_sumopa_s)
598 TRANS_FEAT(USMOPA_s, aa64_sme, do_outprod, a, MO_32, gen_helper_sme_usmopa_s)
599 
600 TRANS_FEAT(SMOPA_d, aa64_sme_i16i64, do_outprod, a, MO_64, gen_helper_sme_smopa_d)
601 TRANS_FEAT(UMOPA_d, aa64_sme_i16i64, do_outprod, a, MO_64, gen_helper_sme_umopa_d)
602 TRANS_FEAT(SUMOPA_d, aa64_sme_i16i64, do_outprod, a, MO_64, gen_helper_sme_sumopa_d)
603 TRANS_FEAT(USMOPA_d, aa64_sme_i16i64, do_outprod, a, MO_64, gen_helper_sme_usmopa_d)
604 
605 TRANS_FEAT(BMOPA, aa64_sme2, do_outprod, a, MO_32, gen_helper_sme2_bmopa_s)
606 TRANS_FEAT(SMOPA2_s, aa64_sme2, do_outprod, a, MO_32, gen_helper_sme2_smopa2_s)
607 TRANS_FEAT(UMOPA2_s, aa64_sme2, do_outprod, a, MO_32, gen_helper_sme2_umopa2_s)
608 
609 static bool do_z2z_n1(DisasContext *s, arg_z2z_en *a, GVecGen3Fn *fn)
610 {
611     int esz, dn, vsz, mofs, n;
612     bool overlap = false;
613 
614     if (!sme_sm_enabled_check(s)) {
615         return true;
616     }
617 
618     esz = a->esz;
619     n = a->n;
620     dn = a->zdn;
621     mofs = vec_full_reg_offset(s, a->zm);
622     vsz = streaming_vec_reg_size(s);
623 
624     for (int i = 0; i < n; i++) {
625         int dofs = vec_full_reg_offset(s, dn + i);
626         if (dofs == mofs) {
627             overlap = true;
628         } else {
629             fn(esz, dofs, dofs, mofs, vsz, vsz);
630         }
631     }
632     if (overlap) {
633         fn(esz, mofs, mofs, mofs, vsz, vsz);
634     }
635     return true;
636 }
637 
gen_sme2_srshl(unsigned vece,uint32_t rd_ofs,uint32_t rn_ofs,uint32_t rm_ofs,uint32_t opr_sz,uint32_t max_sz)638 static void gen_sme2_srshl(unsigned vece, uint32_t rd_ofs, uint32_t rn_ofs,
639                            uint32_t rm_ofs, uint32_t opr_sz, uint32_t max_sz)
640 {
641     static gen_helper_gvec_3 * const fns[] = {
642         gen_helper_gvec_srshl_b, gen_helper_sme2_srshl_h,
643         gen_helper_sme2_srshl_s, gen_helper_sme2_srshl_d,
644     };
645     tcg_debug_assert(vece <= MO_64);
646     tcg_gen_gvec_3_ool(rd_ofs, rn_ofs, rm_ofs, opr_sz, max_sz, 0, fns[vece]);
647 }
648 
gen_sme2_urshl(unsigned vece,uint32_t rd_ofs,uint32_t rn_ofs,uint32_t rm_ofs,uint32_t opr_sz,uint32_t max_sz)649 static void gen_sme2_urshl(unsigned vece, uint32_t rd_ofs, uint32_t rn_ofs,
650                            uint32_t rm_ofs, uint32_t opr_sz, uint32_t max_sz)
651 {
652     static gen_helper_gvec_3 * const fns[] = {
653         gen_helper_gvec_urshl_b, gen_helper_sme2_urshl_h,
654         gen_helper_sme2_urshl_s, gen_helper_sme2_urshl_d,
655     };
656     tcg_debug_assert(vece <= MO_64);
657     tcg_gen_gvec_3_ool(rd_ofs, rn_ofs, rm_ofs, opr_sz, max_sz, 0, fns[vece]);
658 }
659 
TRANS_FEAT(ADD_n1,aa64_sme2,do_z2z_n1,a,tcg_gen_gvec_add)660 TRANS_FEAT(ADD_n1, aa64_sme2, do_z2z_n1, a, tcg_gen_gvec_add)
661 TRANS_FEAT(SMAX_n1, aa64_sme2, do_z2z_n1, a, tcg_gen_gvec_smax)
662 TRANS_FEAT(SMIN_n1, aa64_sme2, do_z2z_n1, a, tcg_gen_gvec_smin)
663 TRANS_FEAT(UMAX_n1, aa64_sme2, do_z2z_n1, a, tcg_gen_gvec_umax)
664 TRANS_FEAT(UMIN_n1, aa64_sme2, do_z2z_n1, a, tcg_gen_gvec_umin)
665 TRANS_FEAT(SRSHL_n1, aa64_sme2, do_z2z_n1, a, gen_sme2_srshl)
666 TRANS_FEAT(URSHL_n1, aa64_sme2, do_z2z_n1, a, gen_sme2_urshl)
667 TRANS_FEAT(SQDMULH_n1, aa64_sme2, do_z2z_n1, a, gen_gvec_sve2_sqdmulh)
668 
669 static bool do_z2z_nn(DisasContext *s, arg_z2z_en *a, GVecGen3Fn *fn)
670 {
671     int esz, dn, dm, vsz, n;
672 
673     if (!sme_sm_enabled_check(s)) {
674         return true;
675     }
676 
677     esz = a->esz;
678     n = a->n;
679     dn = a->zdn;
680     dm = a->zm;
681     vsz = streaming_vec_reg_size(s);
682 
683     for (int i = 0; i < n; i++) {
684         int dofs = vec_full_reg_offset(s, dn + i);
685         int mofs = vec_full_reg_offset(s, dm + i);
686 
687         fn(esz, dofs, dofs, mofs, vsz, vsz);
688     }
689     return true;
690 }
691 
TRANS_FEAT(SMAX_nn,aa64_sme2,do_z2z_nn,a,tcg_gen_gvec_smax)692 TRANS_FEAT(SMAX_nn, aa64_sme2, do_z2z_nn, a, tcg_gen_gvec_smax)
693 TRANS_FEAT(SMIN_nn, aa64_sme2, do_z2z_nn, a, tcg_gen_gvec_smin)
694 TRANS_FEAT(UMAX_nn, aa64_sme2, do_z2z_nn, a, tcg_gen_gvec_umax)
695 TRANS_FEAT(UMIN_nn, aa64_sme2, do_z2z_nn, a, tcg_gen_gvec_umin)
696 TRANS_FEAT(SRSHL_nn, aa64_sme2, do_z2z_nn, a, gen_sme2_srshl)
697 TRANS_FEAT(URSHL_nn, aa64_sme2, do_z2z_nn, a, gen_sme2_urshl)
698 TRANS_FEAT(SQDMULH_nn, aa64_sme2, do_z2z_nn, a, gen_gvec_sve2_sqdmulh)
699 
700 static bool do_z2z_n1_fpst(DisasContext *s, arg_z2z_en *a,
701                            gen_helper_gvec_3_ptr * const fns[4])
702 {
703     int esz = a->esz, n, dn, vsz, mofs;
704     bool overlap = false;
705     gen_helper_gvec_3_ptr *fn;
706     TCGv_ptr fpst;
707 
708     /* These insns use MO_8 to encode BFloat16. */
709     if (esz == MO_8 && !dc_isar_feature(aa64_sme_b16b16, s)) {
710         return false;
711     }
712     if (!sme_sm_enabled_check(s)) {
713         return true;
714     }
715 
716     fpst = fpstatus_ptr(esz == MO_16 ? FPST_A64_F16 : FPST_A64);
717     fn = fns[esz];
718     n = a->n;
719     dn = a->zdn;
720     mofs = vec_full_reg_offset(s, a->zm);
721     vsz = streaming_vec_reg_size(s);
722 
723     for (int i = 0; i < n; i++) {
724         int dofs = vec_full_reg_offset(s, dn + i);
725         if (dofs == mofs) {
726             overlap = true;
727         } else {
728             tcg_gen_gvec_3_ptr(dofs, dofs, mofs, fpst, vsz, vsz, 0, fn);
729         }
730     }
731     if (overlap) {
732         tcg_gen_gvec_3_ptr(mofs, mofs, mofs, fpst, vsz, vsz, 0, fn);
733     }
734     return true;
735 }
736 
do_z2z_nn_fpst(DisasContext * s,arg_z2z_en * a,gen_helper_gvec_3_ptr * const fns[4])737 static bool do_z2z_nn_fpst(DisasContext *s, arg_z2z_en *a,
738                            gen_helper_gvec_3_ptr * const fns[4])
739 {
740     int esz = a->esz, n, dn, dm, vsz;
741     gen_helper_gvec_3_ptr *fn;
742     TCGv_ptr fpst;
743 
744     if (esz == MO_8 && !dc_isar_feature(aa64_sme_b16b16, s)) {
745         return false;
746     }
747     if (!sme_sm_enabled_check(s)) {
748         return true;
749     }
750 
751     fpst = fpstatus_ptr(esz == MO_16 ? FPST_A64_F16 : FPST_A64);
752     fn = fns[esz];
753     n = a->n;
754     dn = a->zdn;
755     dm = a->zm;
756     vsz = streaming_vec_reg_size(s);
757 
758     for (int i = 0; i < n; i++) {
759         int dofs = vec_full_reg_offset(s, dn + i);
760         int mofs = vec_full_reg_offset(s, dm + i);
761 
762         tcg_gen_gvec_3_ptr(dofs, dofs, mofs, fpst, vsz, vsz, 0, fn);
763     }
764     return true;
765 }
766 
767 static gen_helper_gvec_3_ptr * const f_vector_fmax[2][4] = {
768     { gen_helper_gvec_fmax_b16,
769       gen_helper_gvec_fmax_h,
770       gen_helper_gvec_fmax_s,
771       gen_helper_gvec_fmax_d },
772     { gen_helper_gvec_ah_fmax_b16,
773       gen_helper_gvec_ah_fmax_h,
774       gen_helper_gvec_ah_fmax_s,
775       gen_helper_gvec_ah_fmax_d },
776 };
777 TRANS_FEAT(FMAX_n1, aa64_sme2, do_z2z_n1_fpst, a, f_vector_fmax[s->fpcr_ah])
778 TRANS_FEAT(FMAX_nn, aa64_sme2, do_z2z_nn_fpst, a, f_vector_fmax[s->fpcr_ah])
779 
780 static gen_helper_gvec_3_ptr * const f_vector_fmin[2][4] = {
781     { gen_helper_gvec_fmin_b16,
782       gen_helper_gvec_fmin_h,
783       gen_helper_gvec_fmin_s,
784       gen_helper_gvec_fmin_d },
785     { gen_helper_gvec_ah_fmin_b16,
786       gen_helper_gvec_ah_fmin_h,
787       gen_helper_gvec_ah_fmin_s,
788       gen_helper_gvec_ah_fmin_d },
789 };
790 TRANS_FEAT(FMIN_n1, aa64_sme2, do_z2z_n1_fpst, a, f_vector_fmin[s->fpcr_ah])
791 TRANS_FEAT(FMIN_nn, aa64_sme2, do_z2z_nn_fpst, a, f_vector_fmin[s->fpcr_ah])
792 
793 static gen_helper_gvec_3_ptr * const f_vector_fmaxnm[4] = {
794     gen_helper_gvec_fmaxnum_b16,
795     gen_helper_gvec_fmaxnum_h,
796     gen_helper_gvec_fmaxnum_s,
797     gen_helper_gvec_fmaxnum_d,
798 };
799 TRANS_FEAT(FMAXNM_n1, aa64_sme2, do_z2z_n1_fpst, a, f_vector_fmaxnm)
800 TRANS_FEAT(FMAXNM_nn, aa64_sme2, do_z2z_nn_fpst, a, f_vector_fmaxnm)
801 
802 static gen_helper_gvec_3_ptr * const f_vector_fminnm[4] = {
803     gen_helper_gvec_fminnum_b16,
804     gen_helper_gvec_fminnum_h,
805     gen_helper_gvec_fminnum_s,
806     gen_helper_gvec_fminnum_d,
807 };
TRANS_FEAT(FMINNM_n1,aa64_sme2,do_z2z_n1_fpst,a,f_vector_fminnm)808 TRANS_FEAT(FMINNM_n1, aa64_sme2, do_z2z_n1_fpst, a, f_vector_fminnm)
809 TRANS_FEAT(FMINNM_nn, aa64_sme2, do_z2z_nn_fpst, a, f_vector_fminnm)
810 
811 /* Add/Sub vector Z[m] to each Z[n*N] with result in ZA[d*N]. */
812 static bool do_azz_n1(DisasContext *s, arg_azz_n *a, int esz,
813                       GVecGen3FnVar *fn)
814 {
815     TCGv_ptr t_za;
816     int svl, n, o_zm;
817 
818     if (!sme_smza_enabled_check(s)) {
819         return true;
820     }
821 
822     n = a->n;
823     t_za = get_zarray(s, a->rv, a->off, n, 0);
824     o_zm = vec_full_reg_offset(s, a->zm);
825     svl = streaming_vec_reg_size(s);
826 
827     for (int i = 0; i < n; ++i) {
828         int o_za = (svl / n * sizeof(ARMVectorReg)) * i;
829         int o_zn = vec_full_reg_offset(s, (a->zn + i) % 32);
830 
831         fn(esz, t_za, o_za, tcg_env, o_zn, tcg_env, o_zm, svl, svl);
832     }
833     return true;
834 }
835 
TRANS_FEAT(ADD_azz_n1_s,aa64_sme2,do_azz_n1,a,MO_32,tcg_gen_gvec_add_var)836 TRANS_FEAT(ADD_azz_n1_s, aa64_sme2, do_azz_n1, a, MO_32, tcg_gen_gvec_add_var)
837 TRANS_FEAT(SUB_azz_n1_s, aa64_sme2, do_azz_n1, a, MO_32, tcg_gen_gvec_sub_var)
838 TRANS_FEAT(ADD_azz_n1_d, aa64_sme2_i16i64, do_azz_n1, a, MO_64, tcg_gen_gvec_add_var)
839 TRANS_FEAT(SUB_azz_n1_d, aa64_sme2_i16i64, do_azz_n1, a, MO_64, tcg_gen_gvec_sub_var)
840 
841 /* Add/Sub each vector Z[m*N] to each Z[n*N] with result in ZA[d*N]. */
842 static bool do_azz_nn(DisasContext *s, arg_azz_n *a, int esz,
843                       GVecGen3FnVar *fn)
844 {
845     TCGv_ptr t_za;
846     int svl, n;
847 
848     if (!sme_smza_enabled_check(s)) {
849         return true;
850     }
851 
852     n = a->n;
853     t_za = get_zarray(s, a->rv, a->off, n, 1);
854     svl = streaming_vec_reg_size(s);
855 
856     for (int i = 0; i < n; ++i) {
857         int o_za = (svl / n * sizeof(ARMVectorReg)) * i;
858         int o_zn = vec_full_reg_offset(s, a->zn + i);
859         int o_zm = vec_full_reg_offset(s, a->zm + i);
860 
861         fn(esz, t_za, o_za, tcg_env, o_zn, tcg_env, o_zm, svl, svl);
862     }
863     return true;
864 }
865 
TRANS_FEAT(ADD_azz_nn_s,aa64_sme2,do_azz_nn,a,MO_32,tcg_gen_gvec_add_var)866 TRANS_FEAT(ADD_azz_nn_s, aa64_sme2, do_azz_nn, a, MO_32, tcg_gen_gvec_add_var)
867 TRANS_FEAT(SUB_azz_nn_s, aa64_sme2, do_azz_nn, a, MO_32, tcg_gen_gvec_sub_var)
868 TRANS_FEAT(ADD_azz_nn_d, aa64_sme2_i16i64, do_azz_nn, a, MO_64, tcg_gen_gvec_add_var)
869 TRANS_FEAT(SUB_azz_nn_d, aa64_sme2_i16i64, do_azz_nn, a, MO_64, tcg_gen_gvec_sub_var)
870 
871 /* Add/Sub each ZA[d*N] += Z[m*N] */
872 static bool do_aaz(DisasContext *s, arg_az_n *a, int esz, GVecGen3FnVar *fn)
873 {
874     TCGv_ptr t_za;
875     int svl, n;
876 
877     if (!sme_smza_enabled_check(s)) {
878         return true;
879     }
880 
881     n = a->n;
882     t_za = get_zarray(s, a->rv, a->off, n, 0);
883     svl = streaming_vec_reg_size(s);
884 
885     for (int i = 0; i < n; ++i) {
886         int o_za = (svl / n * sizeof(ARMVectorReg)) * i;
887         int o_zm = vec_full_reg_offset(s, a->zm + i);
888 
889         fn(esz, t_za, o_za, t_za, o_za, tcg_env, o_zm, svl, svl);
890     }
891     return true;
892 }
893 
TRANS_FEAT(ADD_aaz_s,aa64_sme2,do_aaz,a,MO_32,tcg_gen_gvec_add_var)894 TRANS_FEAT(ADD_aaz_s, aa64_sme2, do_aaz, a, MO_32, tcg_gen_gvec_add_var)
895 TRANS_FEAT(SUB_aaz_s, aa64_sme2, do_aaz, a, MO_32, tcg_gen_gvec_sub_var)
896 TRANS_FEAT(ADD_aaz_d, aa64_sme2_i16i64, do_aaz, a, MO_64, tcg_gen_gvec_add_var)
897 TRANS_FEAT(SUB_aaz_d, aa64_sme2_i16i64, do_aaz, a, MO_64, tcg_gen_gvec_sub_var)
898 
899 /*
900  * Expand array multi-vector single (n1), array multi-vector (nn),
901  * and array multi-vector indexed (nx), for floating-point accumulate.
902  *   multi: true for nn, false for n1.
903  *   fpst: >= 0 to set ptr argument for FPST_*, < 0 for ENV.
904  *   data: stuff for simd_data, including any index.
905  */
906 #define FPST_ENV  -1
907 
908 static bool do_azz_fp(DisasContext *s, int nreg, int nsel,
909                       int rv, int off, int zn, int zm,
910                       int data, int shsel, bool multi, int fpst,
911                       gen_helper_gvec_3_ptr *fn)
912 {
913     if (sme_smza_enabled_check(s)) {
914         int svl = streaming_vec_reg_size(s);
915         int vstride = svl / nreg;
916         TCGv_ptr t_za = get_zarray(s, rv, off, nreg, nsel);
917         TCGv_ptr t, ptr;
918 
919         if (fpst >= 0) {
920             ptr = fpstatus_ptr(fpst);
921         } else {
922             ptr = tcg_env;
923         }
924         t = tcg_temp_new_ptr();
925 
926         for (int r = 0; r < nreg; ++r) {
927             TCGv_ptr t_zn = vec_full_reg_ptr(s, zn);
928             TCGv_ptr t_zm = vec_full_reg_ptr(s, zm);
929 
930             for (int i = 0; i < nsel; ++i) {
931                 int o_za = (r * vstride + i) * sizeof(ARMVectorReg);
932                 int desc = simd_desc(svl, svl, data | (i << shsel));
933 
934                 tcg_gen_addi_ptr(t, t_za, o_za);
935                 fn(t, t_zn, t_zm, ptr, tcg_constant_i32(desc));
936             }
937 
938             /*
939              * For multiple-and-single vectors, Zn may wrap.
940              * For multiple vectors, both Zn and Zm are aligned.
941              */
942             zn = (zn + 1) % 32;
943             zm += multi;
944         }
945     }
946     return true;
947 }
948 
do_azz_acc_fp(DisasContext * s,int nreg,int nsel,int rv,int off,int zn,int zm,int data,int shsel,bool multi,int fpst,gen_helper_gvec_4_ptr * fn)949 static bool do_azz_acc_fp(DisasContext *s, int nreg, int nsel,
950                           int rv, int off, int zn, int zm,
951                           int data, int shsel, bool multi, int fpst,
952                           gen_helper_gvec_4_ptr *fn)
953 {
954     if (sme_smza_enabled_check(s)) {
955         int svl = streaming_vec_reg_size(s);
956         int vstride = svl / nreg;
957         TCGv_ptr t_za = get_zarray(s, rv, off, nreg, nsel);
958         TCGv_ptr t, ptr;
959 
960         if (fpst >= 0) {
961             ptr = fpstatus_ptr(fpst);
962         } else {
963             ptr = tcg_env;
964         }
965         t = tcg_temp_new_ptr();
966 
967         for (int r = 0; r < nreg; ++r) {
968             TCGv_ptr t_zn = vec_full_reg_ptr(s, zn);
969             TCGv_ptr t_zm = vec_full_reg_ptr(s, zm);
970 
971             for (int i = 0; i < nsel; ++i) {
972                 int o_za = (r * vstride + i) * sizeof(ARMVectorReg);
973                 int desc = simd_desc(svl, svl, data | (i << shsel));
974 
975                 tcg_gen_addi_ptr(t, t_za, o_za);
976                 fn(t, t_zn, t_zm, t, ptr, tcg_constant_i32(desc));
977             }
978 
979             /*
980              * For multiple-and-single vectors, Zn may wrap.
981              * For multiple vectors, both Zn and Zm are aligned.
982              */
983             zn = (zn + 1) % 32;
984             zm += multi;
985         }
986     }
987     return true;
988 }
989 
do_fmlal(DisasContext * s,arg_azz_n * a,bool sub,bool multi)990 static bool do_fmlal(DisasContext *s, arg_azz_n *a, bool sub, bool multi)
991 {
992     return do_azz_acc_fp(s, a->n, 2, a->rv, a->off, a->zn, a->zm,
993                          (1 << 2) | sub, 1,
994                          multi, FPST_ENV, gen_helper_sve2_fmlal_zzzw_s);
995 }
996 
TRANS_FEAT(FMLAL_n1,aa64_sme2,do_fmlal,a,false,false)997 TRANS_FEAT(FMLAL_n1, aa64_sme2, do_fmlal, a, false, false)
998 TRANS_FEAT(FMLSL_n1, aa64_sme2, do_fmlal, a, true, false)
999 TRANS_FEAT(FMLAL_nn, aa64_sme2, do_fmlal, a, false, true)
1000 TRANS_FEAT(FMLSL_nn, aa64_sme2, do_fmlal, a, true, true)
1001 
1002 static bool do_fmlal_nx(DisasContext *s, arg_azx_n *a, bool sub)
1003 {
1004     return do_azz_acc_fp(s, a->n, 2, a->rv, a->off, a->zn, a->zm,
1005                          (a->idx << 3) | (1 << 2) | sub, 1,
1006                          false, FPST_ENV, gen_helper_sve2_fmlal_zzxw_s);
1007 }
1008 
TRANS_FEAT(FMLAL_nx,aa64_sme2,do_fmlal_nx,a,false)1009 TRANS_FEAT(FMLAL_nx, aa64_sme2, do_fmlal_nx, a, false)
1010 TRANS_FEAT(FMLSL_nx, aa64_sme2, do_fmlal_nx, a, true)
1011 
1012 static bool do_bfmlal(DisasContext *s, arg_azz_n *a, bool sub, bool multi)
1013 {
1014     return do_azz_acc_fp(s, a->n, 2, a->rv, a->off, a->zn, a->zm,
1015                          0, 0, multi, FPST_ZA,
1016                          (!sub ? gen_helper_gvec_bfmlal
1017                           : s->fpcr_ah ? gen_helper_gvec_ah_bfmlsl
1018                           : gen_helper_gvec_bfmlsl));
1019 }
1020 
TRANS_FEAT(BFMLAL_n1,aa64_sme2,do_bfmlal,a,false,false)1021 TRANS_FEAT(BFMLAL_n1, aa64_sme2, do_bfmlal, a, false, false)
1022 TRANS_FEAT(BFMLSL_n1, aa64_sme2, do_bfmlal, a, true, false)
1023 TRANS_FEAT(BFMLAL_nn, aa64_sme2, do_bfmlal, a, false, true)
1024 TRANS_FEAT(BFMLSL_nn, aa64_sme2, do_bfmlal, a, true, true)
1025 
1026 static bool do_bfmlal_nx(DisasContext *s, arg_azx_n *a, bool sub)
1027 {
1028     return do_azz_acc_fp(s, a->n, 2, a->rv, a->off, a->zn, a->zm,
1029                          a->idx << 1, 0, false, FPST_ZA,
1030                          !sub ? gen_helper_gvec_bfmlal_idx
1031                          : s->fpcr_ah ? gen_helper_gvec_ah_bfmlsl_idx
1032                          : gen_helper_gvec_bfmlsl_idx);
1033 }
1034 
TRANS_FEAT(BFMLAL_nx,aa64_sme2,do_bfmlal_nx,a,false)1035 TRANS_FEAT(BFMLAL_nx, aa64_sme2, do_bfmlal_nx, a, false)
1036 TRANS_FEAT(BFMLSL_nx, aa64_sme2, do_bfmlal_nx, a, true)
1037 
1038 static bool do_fdot(DisasContext *s, arg_azz_n *a, bool multi)
1039 {
1040     return do_azz_acc_fp(s, a->n, 1, a->rv, a->off, a->zn, a->zm, 1, 0,
1041                          multi, FPST_ENV, gen_helper_sme2_fdot_h);
1042 }
1043 
TRANS_FEAT(FDOT_n1,aa64_sme2,do_fdot,a,false)1044 TRANS_FEAT(FDOT_n1, aa64_sme2, do_fdot, a, false)
1045 TRANS_FEAT(FDOT_nn, aa64_sme2, do_fdot, a, true)
1046 
1047 static bool do_fdot_nx(DisasContext *s, arg_azx_n *a)
1048 {
1049     return do_azz_acc_fp(s, a->n, 1, a->rv, a->off, a->zn, a->zm,
1050                          a->idx | (1 << 2), 0, false, FPST_ENV,
1051                          gen_helper_sme2_fdot_idx_h);
1052 }
1053 
TRANS_FEAT(FDOT_nx,aa64_sme2,do_fdot_nx,a)1054 TRANS_FEAT(FDOT_nx, aa64_sme2, do_fdot_nx, a)
1055 
1056 static bool do_bfdot(DisasContext *s, arg_azz_n *a, bool multi)
1057 {
1058     return do_azz_acc_fp(s, a->n, 1, a->rv, a->off, a->zn, a->zm, 0, 0,
1059                          multi, FPST_ENV, gen_helper_gvec_bfdot);
1060 }
1061 
TRANS_FEAT(BFDOT_n1,aa64_sme2,do_bfdot,a,false)1062 TRANS_FEAT(BFDOT_n1, aa64_sme2, do_bfdot, a, false)
1063 TRANS_FEAT(BFDOT_nn, aa64_sme2, do_bfdot, a, true)
1064 
1065 static bool do_bfdot_nx(DisasContext *s, arg_azx_n *a)
1066 {
1067     return do_azz_acc_fp(s, a->n, 1, a->rv, a->off, a->zn, a->zm, a->idx, 0,
1068                          false, FPST_ENV, gen_helper_gvec_bfdot_idx);
1069 }
1070 
TRANS_FEAT(BFDOT_nx,aa64_sme2,do_bfdot_nx,a)1071 TRANS_FEAT(BFDOT_nx, aa64_sme2, do_bfdot_nx, a)
1072 
1073 static bool do_vdot(DisasContext *s, arg_azx_n *a, gen_helper_gvec_4_ptr *fn)
1074 {
1075     if (sme_smza_enabled_check(s)) {
1076         int svl = streaming_vec_reg_size(s);
1077         int vstride = svl / 2;
1078         TCGv_ptr t_za = get_zarray(s, a->rv, a->off, 2, 1);
1079         TCGv_ptr t_zn = vec_full_reg_ptr(s, a->zn);
1080         TCGv_ptr t_zm = vec_full_reg_ptr(s, a->zm);
1081         TCGv_ptr t = tcg_temp_new_ptr();
1082 
1083         for (int i = 0; i < 2; ++i) {
1084             int o_za = i * vstride * sizeof(ARMVectorReg);
1085             int desc = simd_desc(svl, svl, a->idx | (i << 2));
1086 
1087             tcg_gen_addi_ptr(t, t_za, o_za);
1088             fn(t, t_zn, t_zm, t, tcg_env, tcg_constant_i32(desc));
1089         }
1090     }
1091     return true;
1092 }
1093 
TRANS_FEAT(FVDOT,aa64_sme,do_vdot,a,gen_helper_sme2_fvdot_idx_h)1094 TRANS_FEAT(FVDOT, aa64_sme, do_vdot, a, gen_helper_sme2_fvdot_idx_h)
1095 TRANS_FEAT(BFVDOT, aa64_sme, do_vdot, a, gen_helper_sme2_bfvdot_idx)
1096 
1097 static bool do_fmla(DisasContext *s, arg_azz_n *a, bool multi,
1098                     ARMFPStatusFlavour fpst, gen_helper_gvec_3_ptr *fn)
1099 {
1100     return do_azz_fp(s, a->n, 1, a->rv, a->off, a->zn, a->zm,
1101                      0, 0, multi, fpst, fn);
1102 }
1103 
TRANS_FEAT(FMLA_n1_h,aa64_sme_f16f16,do_fmla,a,false,FPST_ZA_F16,gen_helper_gvec_vfma_h)1104 TRANS_FEAT(FMLA_n1_h, aa64_sme_f16f16, do_fmla, a, false, FPST_ZA_F16,
1105            gen_helper_gvec_vfma_h)
1106 TRANS_FEAT(FMLS_n1_h, aa64_sme_f16f16, do_fmla, a, false, FPST_ZA_F16,
1107            s->fpcr_ah ? gen_helper_gvec_ah_vfms_h : gen_helper_gvec_vfms_h)
1108 TRANS_FEAT(FMLA_nn_h, aa64_sme_f16f16, do_fmla, a, true, FPST_ZA_F16,
1109            gen_helper_gvec_vfma_h)
1110 TRANS_FEAT(FMLS_nn_h, aa64_sme_f16f16, do_fmla, a, true, FPST_ZA_F16,
1111            s->fpcr_ah ? gen_helper_gvec_ah_vfms_h : gen_helper_gvec_vfms_h)
1112 
1113 TRANS_FEAT(FMLA_n1_s, aa64_sme2, do_fmla, a, false, FPST_ZA,
1114            gen_helper_gvec_vfma_s)
1115 TRANS_FEAT(FMLS_n1_s, aa64_sme2, do_fmla, a, false, FPST_ZA,
1116            s->fpcr_ah ? gen_helper_gvec_ah_vfms_s : gen_helper_gvec_vfms_s)
1117 TRANS_FEAT(FMLA_nn_s, aa64_sme2, do_fmla, a, true, FPST_ZA,
1118            gen_helper_gvec_vfma_s)
1119 TRANS_FEAT(FMLS_nn_s, aa64_sme2, do_fmla, a, true, FPST_ZA,
1120            s->fpcr_ah ? gen_helper_gvec_ah_vfms_s : gen_helper_gvec_vfms_s)
1121 
1122 TRANS_FEAT(FMLA_n1_d, aa64_sme2_f64f64, do_fmla, a, false, FPST_ZA,
1123            gen_helper_gvec_vfma_d)
1124 TRANS_FEAT(FMLS_n1_d, aa64_sme2_f64f64, do_fmla, a, false, FPST_ZA,
1125            s->fpcr_ah ? gen_helper_gvec_ah_vfms_d : gen_helper_gvec_vfms_d)
1126 TRANS_FEAT(FMLA_nn_d, aa64_sme2_f64f64, do_fmla, a, true, FPST_ZA,
1127            gen_helper_gvec_vfma_d)
1128 TRANS_FEAT(FMLS_nn_d, aa64_sme2_f64f64, do_fmla, a, true, FPST_ZA,
1129            s->fpcr_ah ? gen_helper_gvec_ah_vfms_d : gen_helper_gvec_vfms_d)
1130 
1131 TRANS_FEAT(BFMLA_n1, aa64_sme_b16b16, do_fmla, a, false, FPST_ZA,
1132            gen_helper_gvec_bfmla)
1133 TRANS_FEAT(BFMLS_n1, aa64_sme_b16b16, do_fmla, a, false, FPST_ZA,
1134            s->fpcr_ah ? gen_helper_gvec_ah_bfmls : gen_helper_gvec_bfmls)
1135 TRANS_FEAT(BFMLA_nn, aa64_sme_b16b16, do_fmla, a, true, FPST_ZA,
1136            gen_helper_gvec_bfmla)
1137 TRANS_FEAT(BFMLS_nn, aa64_sme_b16b16, do_fmla, a, true, FPST_ZA,
1138            s->fpcr_ah ? gen_helper_gvec_ah_bfmls : gen_helper_gvec_bfmls)
1139 
1140 static bool do_fmla_nx(DisasContext *s, arg_azx_n *a,
1141                        ARMFPStatusFlavour fpst, gen_helper_gvec_4_ptr *fn)
1142 {
1143     return do_azz_acc_fp(s, a->n, 1, a->rv, a->off, a->zn, a->zm,
1144                          a->idx, 0, false, fpst, fn);
1145 }
1146 
TRANS_FEAT(FMLA_nx_h,aa64_sme_f16f16,do_fmla_nx,a,FPST_ZA_F16,gen_helper_gvec_fmla_idx_h)1147 TRANS_FEAT(FMLA_nx_h, aa64_sme_f16f16, do_fmla_nx, a, FPST_ZA_F16,
1148            gen_helper_gvec_fmla_idx_h)
1149 TRANS_FEAT(FMLS_nx_h, aa64_sme_f16f16, do_fmla_nx, a, FPST_ZA_F16,
1150            s->fpcr_ah ? gen_helper_gvec_ah_fmls_idx_h : gen_helper_gvec_fmls_idx_h)
1151 TRANS_FEAT(FMLA_nx_s, aa64_sme2, do_fmla_nx, a, FPST_ZA,
1152            gen_helper_gvec_fmla_idx_s)
1153 TRANS_FEAT(FMLS_nx_s, aa64_sme2, do_fmla_nx, a, FPST_ZA,
1154            s->fpcr_ah ? gen_helper_gvec_ah_fmls_idx_s : gen_helper_gvec_fmls_idx_s)
1155 TRANS_FEAT(FMLA_nx_d, aa64_sme2_f64f64, do_fmla_nx, a, FPST_ZA,
1156            gen_helper_gvec_fmla_idx_d)
1157 TRANS_FEAT(FMLS_nx_d, aa64_sme2_f64f64, do_fmla_nx, a, FPST_ZA,
1158            s->fpcr_ah ? gen_helper_gvec_ah_fmls_idx_d : gen_helper_gvec_fmls_idx_d)
1159 
1160 TRANS_FEAT(BFMLA_nx, aa64_sme_b16b16, do_fmla_nx, a, FPST_ZA,
1161            gen_helper_gvec_bfmla_idx)
1162 TRANS_FEAT(BFMLS_nx, aa64_sme_b16b16, do_fmla_nx, a, FPST_ZA,
1163            s->fpcr_ah ? gen_helper_gvec_ah_bfmls_idx : gen_helper_gvec_bfmls_idx)
1164 
1165 static bool do_faddsub(DisasContext *s, arg_az_n *a, ARMFPStatusFlavour fpst,
1166                        gen_helper_gvec_3_ptr *fn)
1167 {
1168     if (sme_smza_enabled_check(s)) {
1169         int svl = streaming_vec_reg_size(s);
1170         int n = a->n;
1171         int zm = a->zm;
1172         int vstride = svl / n;
1173         TCGv_ptr t_za = get_zarray(s, a->rv, a->off, n, 0);
1174         TCGv_ptr ptr = fpstatus_ptr(fpst);
1175         TCGv_ptr t = tcg_temp_new_ptr();
1176 
1177         for (int r = 0; r < n; ++r) {
1178             TCGv_ptr t_zm = vec_full_reg_ptr(s, zm + r);
1179             int o_za = r * vstride * sizeof(ARMVectorReg);
1180             int desc = simd_desc(svl, svl, 0);
1181 
1182             tcg_gen_addi_ptr(t, t_za, o_za);
1183             fn(t, t, t_zm, ptr, tcg_constant_i32(desc));
1184         }
1185     }
1186     return true;
1187 }
1188 
TRANS_FEAT(FADD_nn_h,aa64_sme_f16f16,do_faddsub,a,FPST_ZA_F16,gen_helper_gvec_fadd_h)1189 TRANS_FEAT(FADD_nn_h, aa64_sme_f16f16, do_faddsub, a,
1190            FPST_ZA_F16, gen_helper_gvec_fadd_h)
1191 TRANS_FEAT(FSUB_nn_h, aa64_sme_f16f16, do_faddsub, a,
1192            FPST_ZA_F16, gen_helper_gvec_fsub_h)
1193 
1194 TRANS_FEAT(FADD_nn_s, aa64_sme2, do_faddsub, a,
1195            FPST_ZA, gen_helper_gvec_fadd_s)
1196 TRANS_FEAT(FSUB_nn_s, aa64_sme2, do_faddsub, a,
1197            FPST_ZA, gen_helper_gvec_fsub_s)
1198 
1199 TRANS_FEAT(FADD_nn_d, aa64_sme2_f64f64, do_faddsub, a,
1200            FPST_ZA, gen_helper_gvec_fadd_d)
1201 TRANS_FEAT(FSUB_nn_d, aa64_sme2_f64f64, do_faddsub, a,
1202            FPST_ZA, gen_helper_gvec_fsub_d)
1203 
1204 TRANS_FEAT(BFADD_nn, aa64_sme_b16b16, do_faddsub, a,
1205            FPST_ZA, gen_helper_gvec_bfadd)
1206 TRANS_FEAT(BFSUB_nn, aa64_sme_b16b16, do_faddsub, a,
1207            FPST_ZA, gen_helper_gvec_bfsub)
1208 
1209 /*
1210  * Expand array multi-vector single (n1), array multi-vector (nn),
1211  * and array multi-vector indexed (nx), for integer accumulate.
1212  *   multi: true for nn, false for n1.
1213  *   data: stuff for simd_data, including any index.
1214  */
1215 static bool do_azz_acc(DisasContext *s, int nreg, int nsel,
1216                        int rv, int off, int zn, int zm,
1217                        int data, int shsel, bool multi,
1218                        gen_helper_gvec_4 *fn)
1219 {
1220     if (sme_smza_enabled_check(s)) {
1221         int svl = streaming_vec_reg_size(s);
1222         int vstride = svl / nreg;
1223         TCGv_ptr t_za = get_zarray(s, rv, off, nreg, nsel);
1224         TCGv_ptr t = tcg_temp_new_ptr();
1225 
1226         for (int r = 0; r < nreg; ++r) {
1227             TCGv_ptr t_zn = vec_full_reg_ptr(s, zn);
1228             TCGv_ptr t_zm = vec_full_reg_ptr(s, zm);
1229 
1230             for (int i = 0; i < nsel; ++i) {
1231                 int o_za = (r * vstride + i) * sizeof(ARMVectorReg);
1232                 int desc = simd_desc(svl, svl, data | (i << shsel));
1233 
1234                 tcg_gen_addi_ptr(t, t_za, o_za);
1235                 fn(t, t_zn, t_zm, t, tcg_constant_i32(desc));
1236             }
1237 
1238             /*
1239              * For multiple-and-single vectors, Zn may wrap.
1240              * For multiple vectors, both Zn and Zm are aligned.
1241              */
1242             zn = (zn + 1) % 32;
1243             zm += multi;
1244         }
1245     }
1246     return true;
1247 }
1248 
do_dot(DisasContext * s,arg_azz_n * a,bool multi,gen_helper_gvec_4 * fn)1249 static bool do_dot(DisasContext *s, arg_azz_n *a, bool multi,
1250                    gen_helper_gvec_4 *fn)
1251 {
1252     return do_azz_acc(s, a->n, 1, a->rv, a->off, a->zn, a->zm,
1253                       0, 0, multi, fn);
1254 }
1255 
gen_helper_gvec_sudot_4b(TCGv_ptr d,TCGv_ptr n,TCGv_ptr m,TCGv_ptr a,TCGv_i32 desc)1256 static void gen_helper_gvec_sudot_4b(TCGv_ptr d, TCGv_ptr n, TCGv_ptr m,
1257                                      TCGv_ptr a, TCGv_i32 desc)
1258 {
1259     gen_helper_gvec_usdot_4b(d, m, n, a, desc);
1260 }
1261 
TRANS_FEAT(USDOT_n1,aa64_sme2,do_dot,a,false,gen_helper_gvec_usdot_4b)1262 TRANS_FEAT(USDOT_n1, aa64_sme2, do_dot, a, false, gen_helper_gvec_usdot_4b)
1263 TRANS_FEAT(SUDOT_n1, aa64_sme2, do_dot, a, false, gen_helper_gvec_sudot_4b)
1264 TRANS_FEAT(SDOT_n1_2h, aa64_sme2, do_dot, a, false, gen_helper_gvec_sdot_2h)
1265 TRANS_FEAT(UDOT_n1_2h, aa64_sme2, do_dot, a, false, gen_helper_gvec_udot_2h)
1266 TRANS_FEAT(SDOT_n1_4b, aa64_sme2, do_dot, a, false, gen_helper_gvec_sdot_4b)
1267 TRANS_FEAT(UDOT_n1_4b, aa64_sme2, do_dot, a, false, gen_helper_gvec_udot_4b)
1268 TRANS_FEAT(SDOT_n1_4h, aa64_sme2_i16i64, do_dot, a, false, gen_helper_gvec_sdot_4h)
1269 TRANS_FEAT(UDOT_n1_4h, aa64_sme2_i16i64, do_dot, a, false, gen_helper_gvec_udot_4h)
1270 
1271 TRANS_FEAT(USDOT_nn, aa64_sme2, do_dot, a, true, gen_helper_gvec_usdot_4b)
1272 TRANS_FEAT(SDOT_nn_2h, aa64_sme2, do_dot, a, true, gen_helper_gvec_sdot_2h)
1273 TRANS_FEAT(UDOT_nn_2h, aa64_sme2, do_dot, a, true, gen_helper_gvec_udot_2h)
1274 TRANS_FEAT(SDOT_nn_4b, aa64_sme2, do_dot, a, true, gen_helper_gvec_sdot_4b)
1275 TRANS_FEAT(UDOT_nn_4b, aa64_sme2, do_dot, a, true, gen_helper_gvec_udot_4b)
1276 TRANS_FEAT(SDOT_nn_4h, aa64_sme2_i16i64, do_dot, a, true, gen_helper_gvec_sdot_4h)
1277 TRANS_FEAT(UDOT_nn_4h, aa64_sme2_i16i64, do_dot, a, true, gen_helper_gvec_udot_4h)
1278 
1279 static bool do_dot_nx(DisasContext *s, arg_azx_n *a, gen_helper_gvec_4 *fn)
1280 {
1281     return do_azz_acc(s, a->n, 1, a->rv, a->off, a->zn, a->zm,
1282                       a->idx, 0, false, fn);
1283 }
1284 
TRANS_FEAT(USDOT_nx,aa64_sme2,do_dot_nx,a,gen_helper_gvec_usdot_idx_4b)1285 TRANS_FEAT(USDOT_nx, aa64_sme2, do_dot_nx, a, gen_helper_gvec_usdot_idx_4b)
1286 TRANS_FEAT(SUDOT_nx, aa64_sme2, do_dot_nx, a, gen_helper_gvec_sudot_idx_4b)
1287 TRANS_FEAT(SDOT_nx_2h, aa64_sme2, do_dot_nx, a, gen_helper_gvec_sdot_idx_2h)
1288 TRANS_FEAT(UDOT_nx_2h, aa64_sme2, do_dot_nx, a, gen_helper_gvec_udot_idx_2h)
1289 TRANS_FEAT(SDOT_nx_4b, aa64_sme2, do_dot_nx, a, gen_helper_gvec_sdot_idx_4b)
1290 TRANS_FEAT(UDOT_nx_4b, aa64_sme2, do_dot_nx, a, gen_helper_gvec_udot_idx_4b)
1291 TRANS_FEAT(SDOT_nx_4h, aa64_sme2_i16i64, do_dot_nx, a, gen_helper_gvec_sdot_idx_4h)
1292 TRANS_FEAT(UDOT_nx_4h, aa64_sme2_i16i64, do_dot_nx, a, gen_helper_gvec_udot_idx_4h)
1293 
1294 static bool do_vdot_nx(DisasContext *s, arg_azx_n *a, gen_helper_gvec_3 *fn)
1295 {
1296     if (sme_smza_enabled_check(s)) {
1297         int svl = streaming_vec_reg_size(s);
1298         fn(get_zarray(s, a->rv, a->off, a->n, 0),
1299            vec_full_reg_ptr(s, a->zn),
1300            vec_full_reg_ptr(s, a->zm),
1301            tcg_constant_i32(simd_desc(svl, svl, a->idx)));
1302     }
1303     return true;
1304 }
1305 
TRANS_FEAT(SVDOT_nx_2h,aa64_sme2,do_vdot_nx,a,gen_helper_sme2_svdot_idx_2h)1306 TRANS_FEAT(SVDOT_nx_2h, aa64_sme2, do_vdot_nx, a, gen_helper_sme2_svdot_idx_2h)
1307 TRANS_FEAT(SVDOT_nx_4b, aa64_sme2, do_vdot_nx, a, gen_helper_sme2_svdot_idx_4b)
1308 TRANS_FEAT(SVDOT_nx_4h, aa64_sme2, do_vdot_nx, a, gen_helper_sme2_svdot_idx_4h)
1309 
1310 TRANS_FEAT(UVDOT_nx_2h, aa64_sme2, do_vdot_nx, a, gen_helper_sme2_uvdot_idx_2h)
1311 TRANS_FEAT(UVDOT_nx_4b, aa64_sme2, do_vdot_nx, a, gen_helper_sme2_uvdot_idx_4b)
1312 TRANS_FEAT(UVDOT_nx_4h, aa64_sme2, do_vdot_nx, a, gen_helper_sme2_uvdot_idx_4h)
1313 
1314 TRANS_FEAT(SUVDOT_nx_4b, aa64_sme2, do_vdot_nx, a, gen_helper_sme2_suvdot_idx_4b)
1315 TRANS_FEAT(USVDOT_nx_4b, aa64_sme2, do_vdot_nx, a, gen_helper_sme2_usvdot_idx_4b)
1316 
1317 static bool do_smlal(DisasContext *s, arg_azz_n *a, bool multi,
1318                      gen_helper_gvec_4 *fn)
1319 {
1320     return do_azz_acc(s, a->n, 2, a->rv, a->off, a->zn, a->zm,
1321                       0, 0, multi, fn);
1322 }
1323 
TRANS_FEAT(SMLAL_n1,aa64_sme2,do_smlal,a,false,gen_helper_sve2_smlal_zzzw_s)1324 TRANS_FEAT(SMLAL_n1, aa64_sme2, do_smlal, a, false, gen_helper_sve2_smlal_zzzw_s)
1325 TRANS_FEAT(SMLSL_n1, aa64_sme2, do_smlal, a, false, gen_helper_sve2_smlsl_zzzw_s)
1326 TRANS_FEAT(UMLAL_n1, aa64_sme2, do_smlal, a, false, gen_helper_sve2_umlal_zzzw_s)
1327 TRANS_FEAT(UMLSL_n1, aa64_sme2, do_smlal, a, false, gen_helper_sve2_umlsl_zzzw_s)
1328 
1329 TRANS_FEAT(SMLAL_nn, aa64_sme2, do_smlal, a, true, gen_helper_sve2_smlal_zzzw_s)
1330 TRANS_FEAT(SMLSL_nn, aa64_sme2, do_smlal, a, true, gen_helper_sve2_smlsl_zzzw_s)
1331 TRANS_FEAT(UMLAL_nn, aa64_sme2, do_smlal, a, true, gen_helper_sve2_umlal_zzzw_s)
1332 TRANS_FEAT(UMLSL_nn, aa64_sme2, do_smlal, a, true, gen_helper_sve2_umlsl_zzzw_s)
1333 
1334 static bool do_smlal_nx(DisasContext *s, arg_azx_n *a,
1335                          gen_helper_gvec_4 *fn)
1336 {
1337     return do_azz_acc(s, a->n, 2, a->rv, a->off, a->zn, a->zm,
1338                       a->idx << 1, 0, false, fn);
1339 }
1340 
TRANS_FEAT(SMLAL_nx,aa64_sme2,do_smlal_nx,a,gen_helper_sve2_smlal_idx_s)1341 TRANS_FEAT(SMLAL_nx, aa64_sme2, do_smlal_nx, a, gen_helper_sve2_smlal_idx_s)
1342 TRANS_FEAT(SMLSL_nx, aa64_sme2, do_smlal_nx, a, gen_helper_sve2_smlsl_idx_s)
1343 TRANS_FEAT(UMLAL_nx, aa64_sme2, do_smlal_nx, a, gen_helper_sve2_umlal_idx_s)
1344 TRANS_FEAT(UMLSL_nx, aa64_sme2, do_smlal_nx, a, gen_helper_sve2_umlsl_idx_s)
1345 
1346 static bool do_smlall(DisasContext *s, arg_azz_n *a, bool multi,
1347                      gen_helper_gvec_4 *fn)
1348 {
1349     return do_azz_acc(s, a->n, 4, a->rv, a->off, a->zn, a->zm,
1350                       0, 0, multi, fn);
1351 }
1352 
gen_helper_sme2_sumlall_s(TCGv_ptr d,TCGv_ptr n,TCGv_ptr m,TCGv_ptr a,TCGv_i32 desc)1353 static void gen_helper_sme2_sumlall_s(TCGv_ptr d, TCGv_ptr n, TCGv_ptr m,
1354                                       TCGv_ptr a, TCGv_i32 desc)
1355 {
1356     gen_helper_sme2_usmlall_s(d, m, n, a, desc);
1357 }
1358 
TRANS_FEAT(SMLALL_n1_s,aa64_sme2,do_smlall,a,false,gen_helper_sme2_smlall_s)1359 TRANS_FEAT(SMLALL_n1_s, aa64_sme2, do_smlall, a, false, gen_helper_sme2_smlall_s)
1360 TRANS_FEAT(SMLSLL_n1_s, aa64_sme2, do_smlall, a, false, gen_helper_sme2_smlsll_s)
1361 TRANS_FEAT(UMLALL_n1_s, aa64_sme2, do_smlall, a, false, gen_helper_sme2_umlall_s)
1362 TRANS_FEAT(UMLSLL_n1_s, aa64_sme2, do_smlall, a, false, gen_helper_sme2_umlsll_s)
1363 TRANS_FEAT(USMLALL_n1_s, aa64_sme2, do_smlall, a, false, gen_helper_sme2_usmlall_s)
1364 TRANS_FEAT(SUMLALL_n1_s, aa64_sme2, do_smlall, a, false, gen_helper_sme2_sumlall_s)
1365 
1366 TRANS_FEAT(SMLALL_n1_d, aa64_sme2_i16i64, do_smlall, a, false, gen_helper_sme2_smlall_d)
1367 TRANS_FEAT(SMLSLL_n1_d, aa64_sme2_i16i64, do_smlall, a, false, gen_helper_sme2_smlsll_d)
1368 TRANS_FEAT(UMLALL_n1_d, aa64_sme2_i16i64, do_smlall, a, false, gen_helper_sme2_umlall_d)
1369 TRANS_FEAT(UMLSLL_n1_d, aa64_sme2_i16i64, do_smlall, a, false, gen_helper_sme2_umlsll_d)
1370 
1371 TRANS_FEAT(SMLALL_nn_s, aa64_sme2, do_smlall, a, true, gen_helper_sme2_smlall_s)
1372 TRANS_FEAT(SMLSLL_nn_s, aa64_sme2, do_smlall, a, true, gen_helper_sme2_smlsll_s)
1373 TRANS_FEAT(UMLALL_nn_s, aa64_sme2, do_smlall, a, true, gen_helper_sme2_umlall_s)
1374 TRANS_FEAT(UMLSLL_nn_s, aa64_sme2, do_smlall, a, true, gen_helper_sme2_umlsll_s)
1375 TRANS_FEAT(USMLALL_nn_s, aa64_sme2, do_smlall, a, true, gen_helper_sme2_usmlall_s)
1376 
1377 TRANS_FEAT(SMLALL_nn_d, aa64_sme2_i16i64, do_smlall, a, true, gen_helper_sme2_smlall_d)
1378 TRANS_FEAT(SMLSLL_nn_d, aa64_sme2_i16i64, do_smlall, a, true, gen_helper_sme2_smlsll_d)
1379 TRANS_FEAT(UMLALL_nn_d, aa64_sme2_i16i64, do_smlall, a, true, gen_helper_sme2_umlall_d)
1380 TRANS_FEAT(UMLSLL_nn_d, aa64_sme2_i16i64, do_smlall, a, true, gen_helper_sme2_umlsll_d)
1381 
1382 static bool do_smlall_nx(DisasContext *s, arg_azx_n *a,
1383                         gen_helper_gvec_4 *fn)
1384 {
1385     return do_azz_acc(s, a->n, 4, a->rv, a->off, a->zn, a->zm,
1386                       a->idx << 2, 0, false, fn);
1387 }
1388 
TRANS_FEAT(SMLALL_nx_s,aa64_sme2,do_smlall_nx,a,gen_helper_sme2_smlall_idx_s)1389 TRANS_FEAT(SMLALL_nx_s, aa64_sme2, do_smlall_nx, a, gen_helper_sme2_smlall_idx_s)
1390 TRANS_FEAT(SMLSLL_nx_s, aa64_sme2, do_smlall_nx, a, gen_helper_sme2_smlsll_idx_s)
1391 TRANS_FEAT(UMLALL_nx_s, aa64_sme2, do_smlall_nx, a, gen_helper_sme2_umlall_idx_s)
1392 TRANS_FEAT(UMLSLL_nx_s, aa64_sme2, do_smlall_nx, a, gen_helper_sme2_umlsll_idx_s)
1393 TRANS_FEAT(USMLALL_nx_s, aa64_sme2, do_smlall_nx, a, gen_helper_sme2_usmlall_idx_s)
1394 TRANS_FEAT(SUMLALL_nx_s, aa64_sme2, do_smlall_nx, a, gen_helper_sme2_sumlall_idx_s)
1395 
1396 TRANS_FEAT(SMLALL_nx_d, aa64_sme2_i16i64, do_smlall_nx, a, gen_helper_sme2_smlall_idx_d)
1397 TRANS_FEAT(SMLSLL_nx_d, aa64_sme2_i16i64, do_smlall_nx, a, gen_helper_sme2_smlsll_idx_d)
1398 TRANS_FEAT(UMLALL_nx_d, aa64_sme2_i16i64, do_smlall_nx, a, gen_helper_sme2_umlall_idx_d)
1399 TRANS_FEAT(UMLSLL_nx_d, aa64_sme2_i16i64, do_smlall_nx, a, gen_helper_sme2_umlsll_idx_d)
1400 
1401 static bool do_zz_fpst(DisasContext *s, arg_zz_n *a, int data,
1402                        ARMFPStatusFlavour type, gen_helper_gvec_2_ptr *fn)
1403 {
1404     if (sme_sm_enabled_check(s)) {
1405         int svl = streaming_vec_reg_size(s);
1406         TCGv_ptr fpst = fpstatus_ptr(type);
1407 
1408         for (int i = 0, n = a->n; i < n; ++i) {
1409             tcg_gen_gvec_2_ptr(vec_full_reg_offset(s, a->zd + i),
1410                                vec_full_reg_offset(s, a->zn + i),
1411                                fpst, svl, svl, data, fn);
1412         }
1413     }
1414     return true;
1415 }
1416 
1417 TRANS_FEAT(BFCVT, aa64_sme2, do_zz_fpst, a, 0,
1418            FPST_A64, gen_helper_sme2_bfcvt)
1419 TRANS_FEAT(BFCVTN, aa64_sme2, do_zz_fpst, a, 0,
1420            FPST_A64, gen_helper_sme2_bfcvtn)
1421 TRANS_FEAT(FCVT_n, aa64_sme2, do_zz_fpst, a, 0,
1422            FPST_A64, gen_helper_sme2_fcvt_n)
1423 TRANS_FEAT(FCVTN, aa64_sme2, do_zz_fpst, a, 0,
1424            FPST_A64, gen_helper_sme2_fcvtn)
1425 
1426 TRANS_FEAT(FCVT_w, aa64_sme_f16f16, do_zz_fpst, a, 0,
1427            FPST_A64_F16, gen_helper_sme2_fcvt_w)
1428 TRANS_FEAT(FCVTL, aa64_sme_f16f16, do_zz_fpst, a, 0,
1429            FPST_A64_F16, gen_helper_sme2_fcvtl)
1430 
1431 TRANS_FEAT(FCVTZS, aa64_sme2, do_zz_fpst, a, 0,
1432            FPST_A64, gen_helper_gvec_vcvt_rz_fs)
1433 TRANS_FEAT(FCVTZU, aa64_sme2, do_zz_fpst, a, 0,
1434            FPST_A64, gen_helper_gvec_vcvt_rz_fu)
1435 
1436 TRANS_FEAT(SCVTF, aa64_sme2, do_zz_fpst, a, 0,
1437            FPST_A64, gen_helper_sme2_scvtf)
1438 TRANS_FEAT(UCVTF, aa64_sme2, do_zz_fpst, a, 0,
1439            FPST_A64, gen_helper_sme2_ucvtf)
1440 
TRANS_FEAT(FRINTN,aa64_sme2,do_zz_fpst,a,float_round_nearest_even,FPST_A64,gen_helper_gvec_vrint_rm_s)1441 TRANS_FEAT(FRINTN, aa64_sme2, do_zz_fpst, a, float_round_nearest_even,
1442            FPST_A64, gen_helper_gvec_vrint_rm_s)
1443 TRANS_FEAT(FRINTP, aa64_sme2, do_zz_fpst, a, float_round_up,
1444            FPST_A64, gen_helper_gvec_vrint_rm_s)
1445 TRANS_FEAT(FRINTM, aa64_sme2, do_zz_fpst, a, float_round_down,
1446            FPST_A64, gen_helper_gvec_vrint_rm_s)
1447 TRANS_FEAT(FRINTA, aa64_sme2, do_zz_fpst, a, float_round_ties_away,
1448            FPST_A64, gen_helper_gvec_vrint_rm_s)
1449 
1450 static bool do_zz(DisasContext *s, arg_zz_n *a, int data,
1451                   gen_helper_gvec_2 *fn)
1452 {
1453     if (sme_sm_enabled_check(s)) {
1454         int svl = streaming_vec_reg_size(s);
1455 
1456         for (int i = 0, n = a->n; i < n; ++i) {
1457             tcg_gen_gvec_2_ool(vec_full_reg_offset(s, a->zd + i),
1458                                vec_full_reg_offset(s, a->zn + i),
1459                                svl, svl, data, fn);
1460         }
1461     }
1462     return true;
1463 }
1464 
1465 TRANS_FEAT(SQCVT_sh, aa64_sme2, do_zz, a, 0, gen_helper_sme2_sqcvt_sh)
1466 TRANS_FEAT(UQCVT_sh, aa64_sme2, do_zz, a, 0, gen_helper_sme2_uqcvt_sh)
1467 TRANS_FEAT(SQCVTU_sh, aa64_sme2, do_zz, a, 0, gen_helper_sme2_sqcvtu_sh)
1468 
1469 TRANS_FEAT(SQCVT_sb, aa64_sme2, do_zz, a, 0, gen_helper_sme2_sqcvt_sb)
1470 TRANS_FEAT(UQCVT_sb, aa64_sme2, do_zz, a, 0, gen_helper_sme2_uqcvt_sb)
1471 TRANS_FEAT(SQCVTU_sb, aa64_sme2, do_zz, a, 0, gen_helper_sme2_sqcvtu_sb)
1472 
1473 TRANS_FEAT(SQCVT_dh, aa64_sme2, do_zz, a, 0, gen_helper_sme2_sqcvt_dh)
1474 TRANS_FEAT(UQCVT_dh, aa64_sme2, do_zz, a, 0, gen_helper_sme2_uqcvt_dh)
1475 TRANS_FEAT(SQCVTU_dh, aa64_sme2, do_zz, a, 0, gen_helper_sme2_sqcvtu_dh)
1476 
1477 TRANS_FEAT(SQCVTN_sb, aa64_sme2, do_zz, a, 0, gen_helper_sme2_sqcvtn_sb)
1478 TRANS_FEAT(UQCVTN_sb, aa64_sme2, do_zz, a, 0, gen_helper_sme2_uqcvtn_sb)
1479 TRANS_FEAT(SQCVTUN_sb, aa64_sme2, do_zz, a, 0, gen_helper_sme2_sqcvtun_sb)
1480 
1481 TRANS_FEAT(SQCVTN_dh, aa64_sme2, do_zz, a, 0, gen_helper_sme2_sqcvtn_dh)
1482 TRANS_FEAT(UQCVTN_dh, aa64_sme2, do_zz, a, 0, gen_helper_sme2_uqcvtn_dh)
1483 TRANS_FEAT(SQCVTUN_dh, aa64_sme2, do_zz, a, 0, gen_helper_sme2_sqcvtun_dh)
1484 
1485 TRANS_FEAT(SUNPK_2bh, aa64_sme2, do_zz, a, 0, gen_helper_sme2_sunpk2_bh)
1486 TRANS_FEAT(SUNPK_2hs, aa64_sme2, do_zz, a, 0, gen_helper_sme2_sunpk2_hs)
1487 TRANS_FEAT(SUNPK_2sd, aa64_sme2, do_zz, a, 0, gen_helper_sme2_sunpk2_sd)
1488 
1489 TRANS_FEAT(SUNPK_4bh, aa64_sme2, do_zz, a, 0, gen_helper_sme2_sunpk4_bh)
1490 TRANS_FEAT(SUNPK_4hs, aa64_sme2, do_zz, a, 0, gen_helper_sme2_sunpk4_hs)
1491 TRANS_FEAT(SUNPK_4sd, aa64_sme2, do_zz, a, 0, gen_helper_sme2_sunpk4_sd)
1492 
1493 TRANS_FEAT(UUNPK_2bh, aa64_sme2, do_zz, a, 0, gen_helper_sme2_uunpk2_bh)
1494 TRANS_FEAT(UUNPK_2hs, aa64_sme2, do_zz, a, 0, gen_helper_sme2_uunpk2_hs)
1495 TRANS_FEAT(UUNPK_2sd, aa64_sme2, do_zz, a, 0, gen_helper_sme2_uunpk2_sd)
1496 
1497 TRANS_FEAT(UUNPK_4bh, aa64_sme2, do_zz, a, 0, gen_helper_sme2_uunpk4_bh)
1498 TRANS_FEAT(UUNPK_4hs, aa64_sme2, do_zz, a, 0, gen_helper_sme2_uunpk4_hs)
1499 TRANS_FEAT(UUNPK_4sd, aa64_sme2, do_zz, a, 0, gen_helper_sme2_uunpk4_sd)
1500 
do_zipuzp_4(DisasContext * s,arg_zz_e * a,gen_helper_gvec_2 * const fn[5])1501 static bool do_zipuzp_4(DisasContext *s, arg_zz_e *a,
1502                         gen_helper_gvec_2 * const fn[5])
1503 {
1504     int bytes_per_op = 4 << a->esz;
1505 
1506     /* Both MO_64 and MO_128 can fail the size test. */
1507     if (s->max_svl < bytes_per_op) {
1508         unallocated_encoding(s);
1509     } else if (sme_sm_enabled_check(s)) {
1510         int svl = streaming_vec_reg_size(s);
1511         if (svl < bytes_per_op) {
1512             unallocated_encoding(s);
1513         } else {
1514             tcg_gen_gvec_2_ool(vec_full_reg_offset(s, a->zd),
1515                                vec_full_reg_offset(s, a->zn),
1516                                svl, svl, 0, fn[a->esz]);
1517         }
1518     }
1519     return true;
1520 }
1521 
1522 static gen_helper_gvec_2 * const zip4_fns[] = {
1523     gen_helper_sme2_zip4_b,
1524     gen_helper_sme2_zip4_h,
1525     gen_helper_sme2_zip4_s,
1526     gen_helper_sme2_zip4_d,
1527     gen_helper_sme2_zip4_q,
1528 };
1529 TRANS_FEAT(ZIP_4, aa64_sme2, do_zipuzp_4, a, zip4_fns)
1530 
1531 static gen_helper_gvec_2 * const uzp4_fns[] = {
1532     gen_helper_sme2_uzp4_b,
1533     gen_helper_sme2_uzp4_h,
1534     gen_helper_sme2_uzp4_s,
1535     gen_helper_sme2_uzp4_d,
1536     gen_helper_sme2_uzp4_q,
1537 };
TRANS_FEAT(UZP_4,aa64_sme2,do_zipuzp_4,a,uzp4_fns)1538 TRANS_FEAT(UZP_4, aa64_sme2, do_zipuzp_4, a, uzp4_fns)
1539 
1540 static bool do_zz_rshr(DisasContext *s, arg_rshr *a, gen_helper_gvec_2 *fn)
1541 {
1542     if (sve_access_check(s)) {
1543         int vl = vec_full_reg_size(s);
1544         tcg_gen_gvec_2_ool(vec_full_reg_offset(s, a->zd),
1545                            vec_full_reg_offset(s, a->zn),
1546                            vl, vl, a->shift, fn);
1547     }
1548     return true;
1549 }
1550 
TRANS_FEAT(SQRSHR_sh,aa64_sme2,do_zz_rshr,a,gen_helper_sme2_sqrshr_sh)1551 TRANS_FEAT(SQRSHR_sh, aa64_sme2, do_zz_rshr, a, gen_helper_sme2_sqrshr_sh)
1552 TRANS_FEAT(UQRSHR_sh, aa64_sme2, do_zz_rshr, a, gen_helper_sme2_uqrshr_sh)
1553 TRANS_FEAT(SQRSHRU_sh, aa64_sme2, do_zz_rshr, a, gen_helper_sme2_sqrshru_sh)
1554 
1555 TRANS_FEAT(SQRSHR_sb, aa64_sme2, do_zz_rshr, a, gen_helper_sme2_sqrshr_sb)
1556 TRANS_FEAT(SQRSHR_dh, aa64_sme2, do_zz_rshr, a, gen_helper_sme2_sqrshr_dh)
1557 TRANS_FEAT(UQRSHR_sb, aa64_sme2, do_zz_rshr, a, gen_helper_sme2_uqrshr_sb)
1558 TRANS_FEAT(UQRSHR_dh, aa64_sme2, do_zz_rshr, a, gen_helper_sme2_uqrshr_dh)
1559 TRANS_FEAT(SQRSHRU_sb, aa64_sme2, do_zz_rshr, a, gen_helper_sme2_sqrshru_sb)
1560 TRANS_FEAT(SQRSHRU_dh, aa64_sme2, do_zz_rshr, a, gen_helper_sme2_sqrshru_dh)
1561 
1562 TRANS_FEAT(SQRSHRN_sh, aa64_sme2_or_sve2p1, do_zz_rshr, a, gen_helper_sme2_sqrshrn_sh)
1563 TRANS_FEAT(UQRSHRN_sh, aa64_sme2_or_sve2p1, do_zz_rshr, a, gen_helper_sme2_uqrshrn_sh)
1564 TRANS_FEAT(SQRSHRUN_sh, aa64_sme2_or_sve2p1, do_zz_rshr, a, gen_helper_sme2_sqrshrun_sh)
1565 
1566 TRANS_FEAT(SQRSHRN_sb, aa64_sme2, do_zz_rshr, a, gen_helper_sme2_sqrshrn_sb)
1567 TRANS_FEAT(SQRSHRN_dh, aa64_sme2, do_zz_rshr, a, gen_helper_sme2_sqrshrn_dh)
1568 TRANS_FEAT(UQRSHRN_sb, aa64_sme2, do_zz_rshr, a, gen_helper_sme2_uqrshrn_sb)
1569 TRANS_FEAT(UQRSHRN_dh, aa64_sme2, do_zz_rshr, a, gen_helper_sme2_uqrshrn_dh)
1570 TRANS_FEAT(SQRSHRUN_sb, aa64_sme2, do_zz_rshr, a, gen_helper_sme2_sqrshrun_sb)
1571 TRANS_FEAT(SQRSHRUN_dh, aa64_sme2, do_zz_rshr, a, gen_helper_sme2_sqrshrun_dh)
1572 
1573 static bool do_zipuzp_2(DisasContext *s, arg_zzz_e *a,
1574                         gen_helper_gvec_3 * const fn[5])
1575 {
1576     int bytes_per_op = 2 << a->esz;
1577 
1578     /* MO_128 can fail the size test. */
1579     if (s->max_svl < bytes_per_op) {
1580         unallocated_encoding(s);
1581     } else if (sme_sm_enabled_check(s)) {
1582         int svl = streaming_vec_reg_size(s);
1583         if (svl < bytes_per_op) {
1584             unallocated_encoding(s);
1585         } else {
1586             tcg_gen_gvec_3_ool(vec_full_reg_offset(s, a->zd),
1587                                vec_full_reg_offset(s, a->zn),
1588                                vec_full_reg_offset(s, a->zm),
1589                                svl, svl, 0, fn[a->esz]);
1590         }
1591     }
1592     return true;
1593 }
1594 
1595 static gen_helper_gvec_3 * const zip2_fns[] = {
1596     gen_helper_sme2_zip2_b,
1597     gen_helper_sme2_zip2_h,
1598     gen_helper_sme2_zip2_s,
1599     gen_helper_sme2_zip2_d,
1600     gen_helper_sme2_zip2_q,
1601 };
1602 TRANS_FEAT(ZIP_2, aa64_sme2, do_zipuzp_2, a, zip2_fns)
1603 
1604 static gen_helper_gvec_3 * const uzp2_fns[] = {
1605     gen_helper_sme2_uzp2_b,
1606     gen_helper_sme2_uzp2_h,
1607     gen_helper_sme2_uzp2_s,
1608     gen_helper_sme2_uzp2_d,
1609     gen_helper_sme2_uzp2_q,
1610 };
TRANS_FEAT(UZP_2,aa64_sme2,do_zipuzp_2,a,uzp2_fns)1611 TRANS_FEAT(UZP_2, aa64_sme2, do_zipuzp_2, a, uzp2_fns)
1612 
1613 static bool trans_FCLAMP(DisasContext *s, arg_zzz_en *a)
1614 {
1615     static gen_helper_gvec_3_ptr * const fn[] = {
1616         gen_helper_sme2_bfclamp,
1617         gen_helper_sme2_fclamp_h,
1618         gen_helper_sme2_fclamp_s,
1619         gen_helper_sme2_fclamp_d,
1620     };
1621     TCGv_ptr fpst;
1622     int vl;
1623 
1624     if (!dc_isar_feature(aa64_sme2, s)) {
1625         return false;
1626     }
1627     /* This insn uses MO_8 to encode BFloat16. */
1628     if (a->esz == MO_8 && !dc_isar_feature(aa64_sme_b16b16, s)) {
1629         return false;
1630     }
1631     if (!sme_sm_enabled_check(s)) {
1632         return true;
1633     }
1634 
1635     fpst = fpstatus_ptr(a->esz == MO_16 ? FPST_A64_F16 : FPST_A64);
1636     vl = vec_full_reg_size(s);
1637 
1638     tcg_gen_gvec_3_ptr(vec_full_reg_offset(s, a->zd),
1639                        vec_full_reg_offset(s, a->zn),
1640                        vec_full_reg_offset(s, a->zm),
1641                        fpst, vl, vl, a->n, fn[a->esz]);
1642     return true;
1643 }
1644 
do_clamp(DisasContext * s,arg_zzz_en * a,gen_helper_gvec_3 * const fn[4])1645 static bool do_clamp(DisasContext *s, arg_zzz_en *a,
1646                      gen_helper_gvec_3 * const fn[4])
1647 {
1648     int vl;
1649 
1650     if (!dc_isar_feature(aa64_sme2, s)) {
1651         return false;
1652     }
1653     if (!sme_sm_enabled_check(s)) {
1654         return true;
1655     }
1656 
1657     /*
1658      * Clamp is just a min+max, easily supported by most host
1659      * vector operations -- we already have such an expansion in
1660      * translate-sve.c for a single output.
1661      * TODO: Add support in gvec for multiple simultaneous output,
1662      * and/or copy to temporary upon overlap.
1663      */
1664     vl = vec_full_reg_size(s);
1665     tcg_gen_gvec_3_ool(vec_full_reg_offset(s, a->zd),
1666                        vec_full_reg_offset(s, a->zn),
1667                        vec_full_reg_offset(s, a->zm),
1668                        vl, vl, a->n, fn[a->esz]);
1669     return true;
1670 }
1671 
1672 static gen_helper_gvec_3 * const sclamp_fns[] = {
1673     gen_helper_sme2_sclamp_b,
1674     gen_helper_sme2_sclamp_h,
1675     gen_helper_sme2_sclamp_s,
1676     gen_helper_sme2_sclamp_d,
1677 };
1678 TRANS(SCLAMP, do_clamp, a, sclamp_fns)
1679 
1680 static gen_helper_gvec_3 * const uclamp_fns[] = {
1681     gen_helper_sme2_uclamp_b,
1682     gen_helper_sme2_uclamp_h,
1683     gen_helper_sme2_uclamp_s,
1684     gen_helper_sme2_uclamp_d,
1685 };
TRANS(UCLAMP,do_clamp,a,uclamp_fns)1686 TRANS(UCLAMP, do_clamp, a, uclamp_fns)
1687 
1688 static bool trans_SEL(DisasContext *s, arg_SEL *a)
1689 {
1690     typedef void sme_sel_fn(TCGv_ptr, TCGv_ptr, TCGv_ptr, TCGv_i32, TCGv_i32);
1691     static sme_sel_fn * const fns[4] = {
1692         gen_helper_sme2_sel_b, gen_helper_sme2_sel_h,
1693         gen_helper_sme2_sel_s, gen_helper_sme2_sel_d
1694     };
1695 
1696     if (!dc_isar_feature(aa64_sme2, s)) {
1697         return false;
1698     }
1699     if (sme_sm_enabled_check(s)) {
1700         int svl = streaming_vec_reg_size(s);
1701         uint32_t desc = simd_desc(svl, svl, a->n);
1702         TCGv_ptr t_d = tcg_temp_new_ptr();
1703         TCGv_ptr t_n = tcg_temp_new_ptr();
1704         TCGv_ptr t_m = tcg_temp_new_ptr();
1705         TCGv_i32 png = tcg_temp_new_i32();
1706 
1707         tcg_gen_addi_ptr(t_d, tcg_env, vec_full_reg_offset(s, a->zd));
1708         tcg_gen_addi_ptr(t_n, tcg_env, vec_full_reg_offset(s, a->zn));
1709         tcg_gen_addi_ptr(t_m, tcg_env, vec_full_reg_offset(s, a->zm));
1710 
1711         tcg_gen_ld16u_i32(png, tcg_env, pred_full_reg_offset(s, a->pg)
1712                           ^ (HOST_BIG_ENDIAN ? 6 : 0));
1713 
1714         fns[a->esz](t_d, t_n, t_m, png, tcg_constant_i32(desc));
1715     }
1716     return true;
1717 }
1718 
do_lut(DisasContext * s,arg_lut * a,gen_helper_gvec_2_ptr * fn,bool strided)1719 static bool do_lut(DisasContext *s, arg_lut *a,
1720                    gen_helper_gvec_2_ptr *fn, bool strided)
1721 {
1722     if (sme_sm_enabled_check(s) && sme2_zt0_enabled_check(s)) {
1723         int svl = streaming_vec_reg_size(s);
1724         tcg_gen_gvec_2_ptr(vec_full_reg_offset(s, a->zd),
1725                            vec_full_reg_offset(s, a->zn),
1726                            tcg_env, svl, svl, strided | (a->idx << 1), fn);
1727     }
1728     return true;
1729 }
1730 
TRANS_FEAT(LUTI2_c_1b,aa64_sme2,do_lut,a,gen_helper_sme2_luti2_1b,false)1731 TRANS_FEAT(LUTI2_c_1b, aa64_sme2, do_lut, a, gen_helper_sme2_luti2_1b, false)
1732 TRANS_FEAT(LUTI2_c_1h, aa64_sme2, do_lut, a, gen_helper_sme2_luti2_1h, false)
1733 TRANS_FEAT(LUTI2_c_1s, aa64_sme2, do_lut, a, gen_helper_sme2_luti2_1s, false)
1734 
1735 TRANS_FEAT(LUTI2_c_2b, aa64_sme2, do_lut, a, gen_helper_sme2_luti2_2b, false)
1736 TRANS_FEAT(LUTI2_c_2h, aa64_sme2, do_lut, a, gen_helper_sme2_luti2_2h, false)
1737 TRANS_FEAT(LUTI2_c_2s, aa64_sme2, do_lut, a, gen_helper_sme2_luti2_2s, false)
1738 
1739 TRANS_FEAT(LUTI2_c_4b, aa64_sme2, do_lut, a, gen_helper_sme2_luti2_4b, false)
1740 TRANS_FEAT(LUTI2_c_4h, aa64_sme2, do_lut, a, gen_helper_sme2_luti2_4h, false)
1741 TRANS_FEAT(LUTI2_c_4s, aa64_sme2, do_lut, a, gen_helper_sme2_luti2_4s, false)
1742 
1743 TRANS_FEAT(LUTI4_c_1b, aa64_sme2, do_lut, a, gen_helper_sme2_luti4_1b, false)
1744 TRANS_FEAT(LUTI4_c_1h, aa64_sme2, do_lut, a, gen_helper_sme2_luti4_1h, false)
1745 TRANS_FEAT(LUTI4_c_1s, aa64_sme2, do_lut, a, gen_helper_sme2_luti4_1s, false)
1746 
1747 TRANS_FEAT(LUTI4_c_2b, aa64_sme2, do_lut, a, gen_helper_sme2_luti4_2b, false)
1748 TRANS_FEAT(LUTI4_c_2h, aa64_sme2, do_lut, a, gen_helper_sme2_luti4_2h, false)
1749 TRANS_FEAT(LUTI4_c_2s, aa64_sme2, do_lut, a, gen_helper_sme2_luti4_2s, false)
1750 
1751 TRANS_FEAT(LUTI4_c_4h, aa64_sme2, do_lut, a, gen_helper_sme2_luti4_4h, false)
1752 TRANS_FEAT(LUTI4_c_4s, aa64_sme2, do_lut, a, gen_helper_sme2_luti4_4s, false)
1753 
1754 static bool do_lut_s4(DisasContext *s, arg_lut *a, gen_helper_gvec_2_ptr *fn)
1755 {
1756     return !(a->zd & 0b01100) && do_lut(s, a, fn, true);
1757 }
1758 
do_lut_s8(DisasContext * s,arg_lut * a,gen_helper_gvec_2_ptr * fn)1759 static bool do_lut_s8(DisasContext *s, arg_lut *a, gen_helper_gvec_2_ptr *fn)
1760 {
1761     return !(a->zd & 0b01000) && do_lut(s, a, fn, true);
1762 }
1763 
1764 TRANS_FEAT(LUTI2_s_2b, aa64_sme2p1, do_lut_s8, a, gen_helper_sme2_luti2_2b)
1765 TRANS_FEAT(LUTI2_s_2h, aa64_sme2p1, do_lut_s8, a, gen_helper_sme2_luti2_2h)
1766 
1767 TRANS_FEAT(LUTI2_s_4b, aa64_sme2p1, do_lut_s4, a, gen_helper_sme2_luti2_4b)
1768 TRANS_FEAT(LUTI2_s_4h, aa64_sme2p1, do_lut_s4, a, gen_helper_sme2_luti2_4h)
1769 
1770 TRANS_FEAT(LUTI4_s_2b, aa64_sme2p1, do_lut_s8, a, gen_helper_sme2_luti4_2b)
1771 TRANS_FEAT(LUTI4_s_2h, aa64_sme2p1, do_lut_s8, a, gen_helper_sme2_luti4_2h)
1772 
1773 TRANS_FEAT(LUTI4_s_4h, aa64_sme2p1, do_lut_s4, a, gen_helper_sme2_luti4_4h)
1774