| /* |
| * Copyright(c) 2019-2021 Qualcomm Innovation Center, Inc. All Rights Reserved. |
| * |
| * This program is free software; you can redistribute it and/or modify |
| * it under the terms of the GNU General Public License as published by |
| * the Free Software Foundation; either version 2 of the License, or |
| * (at your option) any later version. |
| * |
| * This program is distributed in the hope that it will be useful, |
| * but WITHOUT ANY WARRANTY; without even the implied warranty of |
| * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
| * GNU General Public License for more details. |
| * |
| * You should have received a copy of the GNU General Public License |
| * along with this program; if not, see <http://www.gnu.org/licenses/>. |
| */ |
| |
| #ifndef HEXAGON_GEN_TCG_H |
| #define HEXAGON_GEN_TCG_H |
| |
| /* |
| * Here is a primer to understand the tag names for load/store instructions |
| * |
| * Data types |
| * b signed byte r0 = memb(r2+#0) |
| * ub unsigned byte r0 = memub(r2+#0) |
| * h signed half word (16 bits) r0 = memh(r2+#0) |
| * uh unsigned half word r0 = memuh(r2+#0) |
| * i integer (32 bits) r0 = memw(r2+#0) |
| * d double word (64 bits) r1:0 = memd(r2+#0) |
| * |
| * Addressing modes |
| * _io indirect with offset r0 = memw(r1+#4) |
| * _ur absolute with register offset r0 = memw(r1<<#4+##variable) |
| * _rr indirect with register offset r0 = memw(r1+r4<<#2) |
| * gp global pointer relative r0 = memw(gp+#200) |
| * _sp stack pointer relative r0 = memw(r29+#12) |
| * _ap absolute set r0 = memw(r1=##variable) |
| * _pr post increment register r0 = memw(r1++m1) |
| * _pi post increment immediate r0 = memb(r1++#1) |
| */ |
| |
| /* Macros for complex addressing modes */ |
| #define GET_EA_ap \ |
| do { \ |
| fEA_IMM(UiV); \ |
| tcg_gen_movi_tl(ReV, UiV); \ |
| } while (0) |
| #define GET_EA_pr \ |
| do { \ |
| fEA_REG(RxV); \ |
| fPM_M(RxV, MuV); \ |
| } while (0) |
| #define GET_EA_pi \ |
| do { \ |
| fEA_REG(RxV); \ |
| fPM_I(RxV, siV); \ |
| } while (0) |
| |
| |
| /* Instructions with multiple definitions */ |
| #define fGEN_TCG_LOAD_AP(RES, SIZE, SIGN) \ |
| do { \ |
| fMUST_IMMEXT(UiV); \ |
| fEA_IMM(UiV); \ |
| fLOAD(1, SIZE, SIGN, EA, RES); \ |
| tcg_gen_movi_tl(ReV, UiV); \ |
| } while (0) |
| |
| #define fGEN_TCG_L4_loadrub_ap(SHORTCODE) \ |
| fGEN_TCG_LOAD_AP(RdV, 1, u) |
| #define fGEN_TCG_L4_loadrb_ap(SHORTCODE) \ |
| fGEN_TCG_LOAD_AP(RdV, 1, s) |
| #define fGEN_TCG_L4_loadruh_ap(SHORTCODE) \ |
| fGEN_TCG_LOAD_AP(RdV, 2, u) |
| #define fGEN_TCG_L4_loadrh_ap(SHORTCODE) \ |
| fGEN_TCG_LOAD_AP(RdV, 2, s) |
| #define fGEN_TCG_L4_loadri_ap(SHORTCODE) \ |
| fGEN_TCG_LOAD_AP(RdV, 4, u) |
| #define fGEN_TCG_L4_loadrd_ap(SHORTCODE) \ |
| fGEN_TCG_LOAD_AP(RddV, 8, u) |
| |
| #define fGEN_TCG_L2_loadrub_pr(SHORTCODE) SHORTCODE |
| #define fGEN_TCG_L2_loadrub_pi(SHORTCODE) SHORTCODE |
| #define fGEN_TCG_L2_loadrb_pr(SHORTCODE) SHORTCODE |
| #define fGEN_TCG_L2_loadrb_pi(SHORTCODE) SHORTCODE |
| #define fGEN_TCG_L2_loadruh_pr(SHORTCODE) SHORTCODE |
| #define fGEN_TCG_L2_loadruh_pi(SHORTCODE) SHORTCODE |
| #define fGEN_TCG_L2_loadrh_pr(SHORTCODE) SHORTCODE |
| #define fGEN_TCG_L2_loadrh_pi(SHORTCODE) SHORTCODE |
| #define fGEN_TCG_L2_loadri_pr(SHORTCODE) SHORTCODE |
| #define fGEN_TCG_L2_loadri_pi(SHORTCODE) SHORTCODE |
| #define fGEN_TCG_L2_loadrd_pr(SHORTCODE) SHORTCODE |
| #define fGEN_TCG_L2_loadrd_pi(SHORTCODE) SHORTCODE |
| |
| /* |
| * Predicated loads |
| * Here is a primer to understand the tag names |
| * |
| * Predicate used |
| * t true "old" value if (p0) r0 = memb(r2+#0) |
| * f false "old" value if (!p0) r0 = memb(r2+#0) |
| * tnew true "new" value if (p0.new) r0 = memb(r2+#0) |
| * fnew false "new" value if (!p0.new) r0 = memb(r2+#0) |
| */ |
| #define fGEN_TCG_PRED_LOAD(GET_EA, PRED, SIZE, SIGN) \ |
| do { \ |
| TCGv LSB = tcg_temp_local_new(); \ |
| TCGLabel *label = gen_new_label(); \ |
| GET_EA; \ |
| PRED; \ |
| PRED_LOAD_CANCEL(LSB, EA); \ |
| tcg_gen_movi_tl(RdV, 0); \ |
| tcg_gen_brcondi_tl(TCG_COND_EQ, LSB, 0, label); \ |
| fLOAD(1, SIZE, SIGN, EA, RdV); \ |
| gen_set_label(label); \ |
| tcg_temp_free(LSB); \ |
| } while (0) |
| |
| #define fGEN_TCG_L2_ploadrubt_pi(SHORTCODE) \ |
| fGEN_TCG_PRED_LOAD(GET_EA_pi, fLSBOLD(PtV), 1, u) |
| #define fGEN_TCG_L2_ploadrubf_pi(SHORTCODE) \ |
| fGEN_TCG_PRED_LOAD(GET_EA_pi, fLSBOLDNOT(PtV), 1, u) |
| #define fGEN_TCG_L2_ploadrubtnew_pi(SHORTCODE) \ |
| fGEN_TCG_PRED_LOAD(GET_EA_pi, fLSBNEW(PtN), 1, u) |
| #define fGEN_TCG_L2_ploadrubfnew_pi(SHORTCODE) \ |
| fGEN_TCG_PRED_LOAD(GET_EA_pi, fLSBNEWNOT(PtN), 1, u) |
| #define fGEN_TCG_L2_ploadrbt_pi(SHORTCODE) \ |
| fGEN_TCG_PRED_LOAD(GET_EA_pi, fLSBOLD(PtV), 1, s) |
| #define fGEN_TCG_L2_ploadrbf_pi(SHORTCODE) \ |
| fGEN_TCG_PRED_LOAD(GET_EA_pi, fLSBOLDNOT(PtV), 1, s) |
| #define fGEN_TCG_L2_ploadrbtnew_pi(SHORTCODE) \ |
| fGEN_TCG_PRED_LOAD(GET_EA_pi, fLSBNEW(PtN), 1, s) |
| #define fGEN_TCG_L2_ploadrbfnew_pi(SHORTCODE) \ |
| fGEN_TCG_PRED_LOAD({ fEA_REG(RxV); fPM_I(RxV, siV); }, \ |
| fLSBNEWNOT(PtN), 1, s) |
| |
| #define fGEN_TCG_L2_ploadruht_pi(SHORTCODE) \ |
| fGEN_TCG_PRED_LOAD(GET_EA_pi, fLSBOLD(PtV), 2, u) |
| #define fGEN_TCG_L2_ploadruhf_pi(SHORTCODE) \ |
| fGEN_TCG_PRED_LOAD(GET_EA_pi, fLSBOLDNOT(PtV), 2, u) |
| #define fGEN_TCG_L2_ploadruhtnew_pi(SHORTCODE) \ |
| fGEN_TCG_PRED_LOAD(GET_EA_pi, fLSBNEW(PtN), 2, u) |
| #define fGEN_TCG_L2_ploadruhfnew_pi(SHORTCODE) \ |
| fGEN_TCG_PRED_LOAD(GET_EA_pi, fLSBNEWNOT(PtN), 2, u) |
| #define fGEN_TCG_L2_ploadrht_pi(SHORTCODE) \ |
| fGEN_TCG_PRED_LOAD(GET_EA_pi, fLSBOLD(PtV), 2, s) |
| #define fGEN_TCG_L2_ploadrhf_pi(SHORTCODE) \ |
| fGEN_TCG_PRED_LOAD(GET_EA_pi, fLSBOLDNOT(PtV), 2, s) |
| #define fGEN_TCG_L2_ploadrhtnew_pi(SHORTCODE) \ |
| fGEN_TCG_PRED_LOAD(GET_EA_pi, fLSBNEW(PtN), 2, s) |
| #define fGEN_TCG_L2_ploadrhfnew_pi(SHORTCODE) \ |
| fGEN_TCG_PRED_LOAD(GET_EA_pi, fLSBNEWNOT(PtN), 2, s) |
| |
| #define fGEN_TCG_L2_ploadrit_pi(SHORTCODE) \ |
| fGEN_TCG_PRED_LOAD(GET_EA_pi, fLSBOLD(PtV), 4, u) |
| #define fGEN_TCG_L2_ploadrif_pi(SHORTCODE) \ |
| fGEN_TCG_PRED_LOAD(GET_EA_pi, fLSBOLDNOT(PtV), 4, u) |
| #define fGEN_TCG_L2_ploadritnew_pi(SHORTCODE) \ |
| fGEN_TCG_PRED_LOAD(GET_EA_pi, fLSBNEW(PtN), 4, u) |
| #define fGEN_TCG_L2_ploadrifnew_pi(SHORTCODE) \ |
| fGEN_TCG_PRED_LOAD(GET_EA_pi, fLSBNEWNOT(PtN), 4, u) |
| |
| /* Predicated loads into a register pair */ |
| #define fGEN_TCG_PRED_LOAD_PAIR(GET_EA, PRED) \ |
| do { \ |
| TCGv LSB = tcg_temp_local_new(); \ |
| TCGLabel *label = gen_new_label(); \ |
| GET_EA; \ |
| PRED; \ |
| PRED_LOAD_CANCEL(LSB, EA); \ |
| tcg_gen_movi_i64(RddV, 0); \ |
| tcg_gen_brcondi_tl(TCG_COND_EQ, LSB, 0, label); \ |
| fLOAD(1, 8, u, EA, RddV); \ |
| gen_set_label(label); \ |
| tcg_temp_free(LSB); \ |
| } while (0) |
| |
| #define fGEN_TCG_L2_ploadrdt_pi(SHORTCODE) \ |
| fGEN_TCG_PRED_LOAD_PAIR(GET_EA_pi, fLSBOLD(PtV)) |
| #define fGEN_TCG_L2_ploadrdf_pi(SHORTCODE) \ |
| fGEN_TCG_PRED_LOAD_PAIR(GET_EA_pi, fLSBOLDNOT(PtV)) |
| #define fGEN_TCG_L2_ploadrdtnew_pi(SHORTCODE) \ |
| fGEN_TCG_PRED_LOAD_PAIR(GET_EA_pi, fLSBNEW(PtN)) |
| #define fGEN_TCG_L2_ploadrdfnew_pi(SHORTCODE) \ |
| fGEN_TCG_PRED_LOAD_PAIR(GET_EA_pi, fLSBNEWNOT(PtN)) |
| |
| /* load-locked and store-locked */ |
| #define fGEN_TCG_L2_loadw_locked(SHORTCODE) \ |
| SHORTCODE |
| #define fGEN_TCG_L4_loadd_locked(SHORTCODE) \ |
| SHORTCODE |
| #define fGEN_TCG_S2_storew_locked(SHORTCODE) \ |
| do { SHORTCODE; READ_PREG(PdV, PdN); } while (0) |
| #define fGEN_TCG_S4_stored_locked(SHORTCODE) \ |
| do { SHORTCODE; READ_PREG(PdV, PdN); } while (0) |
| |
| /* |
| * Mathematical operations with more than one definition require |
| * special handling |
| */ |
| #define fGEN_TCG_A5_ACS(SHORTCODE) \ |
| do { \ |
| gen_helper_vacsh_pred(PeV, cpu_env, RxxV, RssV, RttV); \ |
| gen_helper_vacsh_val(RxxV, cpu_env, RxxV, RssV, RttV); \ |
| } while (0) |
| |
| /* |
| * Approximate reciprocal |
| * r3,p1 = sfrecipa(r0, r1) |
| * |
| * The helper packs the 2 32-bit results into a 64-bit value, |
| * so unpack them into the proper results. |
| */ |
| #define fGEN_TCG_F2_sfrecipa(SHORTCODE) \ |
| do { \ |
| TCGv_i64 tmp = tcg_temp_new_i64(); \ |
| gen_helper_sfrecipa(tmp, cpu_env, RsV, RtV); \ |
| tcg_gen_extrh_i64_i32(RdV, tmp); \ |
| tcg_gen_extrl_i64_i32(PeV, tmp); \ |
| tcg_temp_free_i64(tmp); \ |
| } while (0) |
| |
| /* |
| * Approximation of the reciprocal square root |
| * r1,p0 = sfinvsqrta(r0) |
| * |
| * The helper packs the 2 32-bit results into a 64-bit value, |
| * so unpack them into the proper results. |
| */ |
| #define fGEN_TCG_F2_sfinvsqrta(SHORTCODE) \ |
| do { \ |
| TCGv_i64 tmp = tcg_temp_new_i64(); \ |
| gen_helper_sfinvsqrta(tmp, cpu_env, RsV); \ |
| tcg_gen_extrh_i64_i32(RdV, tmp); \ |
| tcg_gen_extrl_i64_i32(PeV, tmp); \ |
| tcg_temp_free_i64(tmp); \ |
| } while (0) |
| |
| /* Floating point */ |
| #define fGEN_TCG_F2_conv_sf2df(SHORTCODE) \ |
| gen_helper_conv_sf2df(RddV, cpu_env, RsV) |
| #define fGEN_TCG_F2_conv_df2sf(SHORTCODE) \ |
| gen_helper_conv_df2sf(RdV, cpu_env, RssV) |
| #define fGEN_TCG_F2_conv_uw2sf(SHORTCODE) \ |
| gen_helper_conv_uw2sf(RdV, cpu_env, RsV) |
| #define fGEN_TCG_F2_conv_uw2df(SHORTCODE) \ |
| gen_helper_conv_uw2df(RddV, cpu_env, RsV) |
| #define fGEN_TCG_F2_conv_w2sf(SHORTCODE) \ |
| gen_helper_conv_w2sf(RdV, cpu_env, RsV) |
| #define fGEN_TCG_F2_conv_w2df(SHORTCODE) \ |
| gen_helper_conv_w2df(RddV, cpu_env, RsV) |
| #define fGEN_TCG_F2_conv_ud2sf(SHORTCODE) \ |
| gen_helper_conv_ud2sf(RdV, cpu_env, RssV) |
| #define fGEN_TCG_F2_conv_ud2df(SHORTCODE) \ |
| gen_helper_conv_ud2df(RddV, cpu_env, RssV) |
| #define fGEN_TCG_F2_conv_d2sf(SHORTCODE) \ |
| gen_helper_conv_d2sf(RdV, cpu_env, RssV) |
| #define fGEN_TCG_F2_conv_d2df(SHORTCODE) \ |
| gen_helper_conv_d2df(RddV, cpu_env, RssV) |
| #define fGEN_TCG_F2_conv_sf2uw(SHORTCODE) \ |
| gen_helper_conv_sf2uw(RdV, cpu_env, RsV) |
| #define fGEN_TCG_F2_conv_sf2w(SHORTCODE) \ |
| gen_helper_conv_sf2w(RdV, cpu_env, RsV) |
| #define fGEN_TCG_F2_conv_sf2ud(SHORTCODE) \ |
| gen_helper_conv_sf2ud(RddV, cpu_env, RsV) |
| #define fGEN_TCG_F2_conv_sf2d(SHORTCODE) \ |
| gen_helper_conv_sf2d(RddV, cpu_env, RsV) |
| #define fGEN_TCG_F2_conv_df2uw(SHORTCODE) \ |
| gen_helper_conv_df2uw(RdV, cpu_env, RssV) |
| #define fGEN_TCG_F2_conv_df2w(SHORTCODE) \ |
| gen_helper_conv_df2w(RdV, cpu_env, RssV) |
| #define fGEN_TCG_F2_conv_df2ud(SHORTCODE) \ |
| gen_helper_conv_df2ud(RddV, cpu_env, RssV) |
| #define fGEN_TCG_F2_conv_df2d(SHORTCODE) \ |
| gen_helper_conv_df2d(RddV, cpu_env, RssV) |
| #define fGEN_TCG_F2_conv_sf2uw_chop(SHORTCODE) \ |
| gen_helper_conv_sf2uw_chop(RdV, cpu_env, RsV) |
| #define fGEN_TCG_F2_conv_sf2w_chop(SHORTCODE) \ |
| gen_helper_conv_sf2w_chop(RdV, cpu_env, RsV) |
| #define fGEN_TCG_F2_conv_sf2ud_chop(SHORTCODE) \ |
| gen_helper_conv_sf2ud_chop(RddV, cpu_env, RsV) |
| #define fGEN_TCG_F2_conv_sf2d_chop(SHORTCODE) \ |
| gen_helper_conv_sf2d_chop(RddV, cpu_env, RsV) |
| #define fGEN_TCG_F2_conv_df2uw_chop(SHORTCODE) \ |
| gen_helper_conv_df2uw_chop(RdV, cpu_env, RssV) |
| #define fGEN_TCG_F2_conv_df2w_chop(SHORTCODE) \ |
| gen_helper_conv_df2w_chop(RdV, cpu_env, RssV) |
| #define fGEN_TCG_F2_conv_df2ud_chop(SHORTCODE) \ |
| gen_helper_conv_df2ud_chop(RddV, cpu_env, RssV) |
| #define fGEN_TCG_F2_conv_df2d_chop(SHORTCODE) \ |
| gen_helper_conv_df2d_chop(RddV, cpu_env, RssV) |
| #define fGEN_TCG_F2_sfadd(SHORTCODE) \ |
| gen_helper_sfadd(RdV, cpu_env, RsV, RtV) |
| #define fGEN_TCG_F2_sfsub(SHORTCODE) \ |
| gen_helper_sfsub(RdV, cpu_env, RsV, RtV) |
| #define fGEN_TCG_F2_sfcmpeq(SHORTCODE) \ |
| gen_helper_sfcmpeq(PdV, cpu_env, RsV, RtV) |
| #define fGEN_TCG_F2_sfcmpgt(SHORTCODE) \ |
| gen_helper_sfcmpgt(PdV, cpu_env, RsV, RtV) |
| #define fGEN_TCG_F2_sfcmpge(SHORTCODE) \ |
| gen_helper_sfcmpge(PdV, cpu_env, RsV, RtV) |
| #define fGEN_TCG_F2_sfcmpuo(SHORTCODE) \ |
| gen_helper_sfcmpuo(PdV, cpu_env, RsV, RtV) |
| #define fGEN_TCG_F2_sfmax(SHORTCODE) \ |
| gen_helper_sfmax(RdV, cpu_env, RsV, RtV) |
| #define fGEN_TCG_F2_sfmin(SHORTCODE) \ |
| gen_helper_sfmin(RdV, cpu_env, RsV, RtV) |
| #define fGEN_TCG_F2_sfclass(SHORTCODE) \ |
| do { \ |
| TCGv imm = tcg_const_tl(uiV); \ |
| gen_helper_sfclass(PdV, cpu_env, RsV, imm); \ |
| tcg_temp_free(imm); \ |
| } while (0) |
| #define fGEN_TCG_F2_sffixupn(SHORTCODE) \ |
| gen_helper_sffixupn(RdV, cpu_env, RsV, RtV) |
| #define fGEN_TCG_F2_sffixupd(SHORTCODE) \ |
| gen_helper_sffixupd(RdV, cpu_env, RsV, RtV) |
| #define fGEN_TCG_F2_sffixupr(SHORTCODE) \ |
| gen_helper_sffixupr(RdV, cpu_env, RsV) |
| #define fGEN_TCG_F2_dfadd(SHORTCODE) \ |
| gen_helper_dfadd(RddV, cpu_env, RssV, RttV) |
| #define fGEN_TCG_F2_dfsub(SHORTCODE) \ |
| gen_helper_dfsub(RddV, cpu_env, RssV, RttV) |
| #define fGEN_TCG_F2_dfmax(SHORTCODE) \ |
| gen_helper_dfmax(RddV, cpu_env, RssV, RttV) |
| #define fGEN_TCG_F2_dfmin(SHORTCODE) \ |
| gen_helper_dfmin(RddV, cpu_env, RssV, RttV) |
| #define fGEN_TCG_F2_dfcmpeq(SHORTCODE) \ |
| gen_helper_dfcmpeq(PdV, cpu_env, RssV, RttV) |
| #define fGEN_TCG_F2_dfcmpgt(SHORTCODE) \ |
| gen_helper_dfcmpgt(PdV, cpu_env, RssV, RttV) |
| #define fGEN_TCG_F2_dfcmpge(SHORTCODE) \ |
| gen_helper_dfcmpge(PdV, cpu_env, RssV, RttV) |
| #define fGEN_TCG_F2_dfcmpuo(SHORTCODE) \ |
| gen_helper_dfcmpuo(PdV, cpu_env, RssV, RttV) |
| #define fGEN_TCG_F2_dfclass(SHORTCODE) \ |
| do { \ |
| TCGv imm = tcg_const_tl(uiV); \ |
| gen_helper_dfclass(PdV, cpu_env, RssV, imm); \ |
| tcg_temp_free(imm); \ |
| } while (0) |
| #define fGEN_TCG_F2_sfmpy(SHORTCODE) \ |
| gen_helper_sfmpy(RdV, cpu_env, RsV, RtV) |
| #define fGEN_TCG_F2_sffma(SHORTCODE) \ |
| gen_helper_sffma(RxV, cpu_env, RxV, RsV, RtV) |
| #define fGEN_TCG_F2_sffma_sc(SHORTCODE) \ |
| gen_helper_sffma_sc(RxV, cpu_env, RxV, RsV, RtV, PuV) |
| #define fGEN_TCG_F2_sffms(SHORTCODE) \ |
| gen_helper_sffms(RxV, cpu_env, RxV, RsV, RtV) |
| #define fGEN_TCG_F2_sffma_lib(SHORTCODE) \ |
| gen_helper_sffma_lib(RxV, cpu_env, RxV, RsV, RtV) |
| #define fGEN_TCG_F2_sffms_lib(SHORTCODE) \ |
| gen_helper_sffms_lib(RxV, cpu_env, RxV, RsV, RtV) |
| |
| #define fGEN_TCG_F2_dfmpyfix(SHORTCODE) \ |
| gen_helper_dfmpyfix(RddV, cpu_env, RssV, RttV) |
| #define fGEN_TCG_F2_dfmpyhh(SHORTCODE) \ |
| gen_helper_dfmpyhh(RxxV, cpu_env, RxxV, RssV, RttV) |
| |
| #endif |
