2741
ctx->base.is_jmp = DISAS_EXIT_UPDATE;
2742
}
2743
2744
-static void gen_fetch_inc_conditional(DisasContext *ctx, MemOp memop,
2745
- TCGv EA, TCGCond cond, int addend)
2746
-{
2747
- TCGv t = tcg_temp_new();
2748
- TCGv t2 = tcg_temp_new();
2749
- TCGv u = tcg_temp_new();
2750
-
2751
- tcg_gen_qemu_ld_tl(t, EA, ctx->mem_idx, memop);
2752
- tcg_gen_addi_tl(t2, EA, memop_size(memop));
2753
- tcg_gen_qemu_ld_tl(t2, t2, ctx->mem_idx, memop);
2754
- tcg_gen_addi_tl(u, t, addend);
2755
-
2756
- /* E.g. for fetch and increment bounded... */
2757
- /* mem(EA,s) = (t != t2 ? u = t + 1 : t) */
2758
- tcg_gen_movcond_tl(cond, u, t, t2, u, t);
2759
- tcg_gen_qemu_st_tl(u, EA, ctx->mem_idx, memop);
2760
-
2761
- /* RT = (t != t2 ? t : u = 1<<(s*8-1)) */
2762
- tcg_gen_movcond_tl(cond, cpu_gpr[rD(ctx->opcode)], t, t2, t,
2763
- tcg_constant_tl(1 << (memop_size(memop) * 8 - 1)));
2764
-}
2765
-
2766
-static void gen_ld_atomic(DisasContext *ctx, MemOp memop)
2767
-{
2768
- uint32_t gpr_FC = FC(ctx->opcode);
2769
- TCGv EA = tcg_temp_new();
2770
- int rt = rD(ctx->opcode);
2771
- bool need_serial;
2772
- TCGv src, dst;
2773
-
2774
- gen_addr_register(ctx, EA);
2775
- dst = cpu_gpr[rt];
2776
- src = cpu_gpr[(rt + 1) & 31];
2777
-
2778
- need_serial = false;
2779
- memop |= MO_ALIGN;
2780
- switch (gpr_FC) {
2781
- case 0: /* Fetch and add */
2782
- tcg_gen_atomic_fetch_add_tl(dst, EA, src, ctx->mem_idx, memop);
2783
- break;
2784
- case 1: /* Fetch and xor */
2785
- tcg_gen_atomic_fetch_xor_tl(dst, EA, src, ctx->mem_idx, memop);
2786
- break;
2787
- case 2: /* Fetch and or */
2788
- tcg_gen_atomic_fetch_or_tl(dst, EA, src, ctx->mem_idx, memop);
2789
- break;
2790
- case 3: /* Fetch and 'and' */
2791
- tcg_gen_atomic_fetch_and_tl(dst, EA, src, ctx->mem_idx, memop);
2792
- break;
2793
- case 4: /* Fetch and max unsigned */
2794
- tcg_gen_atomic_fetch_umax_tl(dst, EA, src, ctx->mem_idx, memop);
2795
- break;
2796
- case 5: /* Fetch and max signed */
2797
- tcg_gen_atomic_fetch_smax_tl(dst, EA, src, ctx->mem_idx, memop);
2798
- break;
2799
- case 6: /* Fetch and min unsigned */
2800
- tcg_gen_atomic_fetch_umin_tl(dst, EA, src, ctx->mem_idx, memop);
2801
- break;
2802
- case 7: /* Fetch and min signed */
2803
- tcg_gen_atomic_fetch_smin_tl(dst, EA, src, ctx->mem_idx, memop);
2804
- break;
2805
- case 8: /* Swap */
2806
- tcg_gen_atomic_xchg_tl(dst, EA, src, ctx->mem_idx, memop);
2807
- break;
2808
-
2809
- case 16: /* Compare and swap not equal */
2810
- if (tb_cflags(ctx->base.tb) & CF_PARALLEL) {
2811
- need_serial = true;
2812
- } else {
2813
- TCGv t0 = tcg_temp_new();
2814
- TCGv t1 = tcg_temp_new();
2815
-
2816
- tcg_gen_qemu_ld_tl(t0, EA, ctx->mem_idx, memop);
2817
- if ((memop & MO_SIZE) == MO_64 || TARGET_LONG_BITS == 32) {
2818
- tcg_gen_mov_tl(t1, src);
2819
- } else {
2820
- tcg_gen_ext32u_tl(t1, src);
2821
- }
2822
- tcg_gen_movcond_tl(TCG_COND_NE, t1, t0, t1,
2823
- cpu_gpr[(rt + 2) & 31], t0);
2824
- tcg_gen_qemu_st_tl(t1, EA, ctx->mem_idx, memop);
2825
- tcg_gen_mov_tl(dst, t0);
2826
- }
2827
- break;
2828
-
2829
- case 24: /* Fetch and increment bounded */
2830
- if (tb_cflags(ctx->base.tb) & CF_PARALLEL) {
2831
- need_serial = true;
2832
- } else {
2833
- gen_fetch_inc_conditional(ctx, memop, EA, TCG_COND_NE, 1);
2834
- }
2835
- break;
2836
- case 25: /* Fetch and increment equal */
2837
- if (tb_cflags(ctx->base.tb) & CF_PARALLEL) {
2838
- need_serial = true;
2839
- } else {
2840
- gen_fetch_inc_conditional(ctx, memop, EA, TCG_COND_EQ, 1);
2841
- }
2842
- break;
2843
- case 28: /* Fetch and decrement bounded */
2844
- if (tb_cflags(ctx->base.tb) & CF_PARALLEL) {
2845
- need_serial = true;
2846
- } else {
2847
- gen_fetch_inc_conditional(ctx, memop, EA, TCG_COND_NE, -1);
2848
- }
2849
- break;
2850
-
2851
- default:
2852
- /* invoke data storage error handler */
2853
- gen_exception_err(ctx, POWERPC_EXCP_DSI, POWERPC_EXCP_INVAL);
2854
- }
2855
-
2856
- if (need_serial) {
2857
- /* Restart with exclusive lock. */
2858
- gen_helper_exit_atomic(tcg_env);
2859
- ctx->base.is_jmp = DISAS_NORETURN;
2860
- }
2861
-}
2862
-
2863
-static void gen_lwat(DisasContext *ctx)
2864
-{
2865
- gen_ld_atomic(ctx, DEF_MEMOP(MO_UL));
2866
-}
2867
-
2868
-#ifdef TARGET_PPC64
2869
-static void gen_ldat(DisasContext *ctx)
2870
-{
2871
- gen_ld_atomic(ctx, DEF_MEMOP(MO_UQ));
2872
-}
2873
-#endif
2874
-
2875
-static void gen_st_atomic(DisasContext *ctx, MemOp memop)
2876
-{
2877
- uint32_t gpr_FC = FC(ctx->opcode);
2878
- TCGv EA = tcg_temp_new();
2879
- TCGv src, discard;
2880
-
2881
- gen_addr_register(ctx, EA);
2882
- src = cpu_gpr[rD(ctx->opcode)];
2883
- discard = tcg_temp_new();
2884
-
2885
- memop |= MO_ALIGN;
2886
- switch (gpr_FC) {
2887
- case 0: /* add and Store */
2888
- tcg_gen_atomic_add_fetch_tl(discard, EA, src, ctx->mem_idx, memop);
2889
- break;
2890
- case 1: /* xor and Store */
2891
- tcg_gen_atomic_xor_fetch_tl(discard, EA, src, ctx->mem_idx, memop);
2892
- break;
2893
- case 2: /* Or and Store */
2894
- tcg_gen_atomic_or_fetch_tl(discard, EA, src, ctx->mem_idx, memop);
2895
- break;
2896
- case 3: /* 'and' and Store */
2897
- tcg_gen_atomic_and_fetch_tl(discard, EA, src, ctx->mem_idx, memop);
2898
- break;
2899
- case 4: /* Store max unsigned */
2900
- tcg_gen_atomic_umax_fetch_tl(discard, EA, src, ctx->mem_idx, memop);
2901
- break;
2902
- case 5: /* Store max signed */
2903
- tcg_gen_atomic_smax_fetch_tl(discard, EA, src, ctx->mem_idx, memop);
2904
- break;
2905
- case 6: /* Store min unsigned */
2906
- tcg_gen_atomic_umin_fetch_tl(discard, EA, src, ctx->mem_idx, memop);
2907
- break;
2908
- case 7: /* Store min signed */
2909
- tcg_gen_atomic_smin_fetch_tl(discard, EA, src, ctx->mem_idx, memop);
2910
- break;
2911
- case 24: /* Store twin */
2912
- if (tb_cflags(ctx->base.tb) & CF_PARALLEL) {
2913
- /* Restart with exclusive lock. */
2914
- gen_helper_exit_atomic(tcg_env);
2915
- ctx->base.is_jmp = DISAS_NORETURN;
2916
- } else {
2917
- TCGv t = tcg_temp_new();
2918
- TCGv t2 = tcg_temp_new();
2919
- TCGv s = tcg_temp_new();
2920
- TCGv s2 = tcg_temp_new();
2921
- TCGv ea_plus_s = tcg_temp_new();
2922
-
2923
- tcg_gen_qemu_ld_tl(t, EA, ctx->mem_idx, memop);
2924
- tcg_gen_addi_tl(ea_plus_s, EA, memop_size(memop));
2925
- tcg_gen_qemu_ld_tl(t2, ea_plus_s, ctx->mem_idx, memop);
2926
- tcg_gen_movcond_tl(TCG_COND_EQ, s, t, t2, src, t);
2927
- tcg_gen_movcond_tl(TCG_COND_EQ, s2, t, t2, src, t2);
2928
- tcg_gen_qemu_st_tl(s, EA, ctx->mem_idx, memop);
2929
- tcg_gen_qemu_st_tl(s2, ea_plus_s, ctx->mem_idx, memop);
2930
- }
2931
- break;
2932
- default:
2933
- /* invoke data storage error handler */
2934
- gen_exception_err(ctx, POWERPC_EXCP_DSI, POWERPC_EXCP_INVAL);
2935
- }
2936
-}
2937
-
2938
-static void gen_stwat(DisasContext *ctx)
2939
-{
2940
- gen_st_atomic(ctx, DEF_MEMOP(MO_UL));
2941
-}
2942
-
2943
-#ifdef TARGET_PPC64
2944
-static void gen_stdat(DisasContext *ctx)
2945
-{
2946
- gen_st_atomic(ctx, DEF_MEMOP(MO_UQ));
2947
-}
2948
-#endif
2949
-
2744
/* wait */
2745
static void gen_wait(DisasContext *ctx)
2746
{
5365
GEN_HANDLER(stswi, 0x1F, 0x15, 0x16, 0x00000001, PPC_STRING),
5366
GEN_HANDLER(stswx, 0x1F, 0x15, 0x14, 0x00000001, PPC_STRING),
5367
GEN_HANDLER(isync, 0x13, 0x16, 0x04, 0x03FFF801, PPC_MEM),
5574
-GEN_HANDLER_E(lwat, 0x1F, 0x06, 0x12, 0x00000001, PPC_NONE, PPC2_ISA300),
5575
-GEN_HANDLER_E(stwat, 0x1F, 0x06, 0x16, 0x00000001, PPC_NONE, PPC2_ISA300),
5576
-#if defined(TARGET_PPC64)
5577
-GEN_HANDLER_E(ldat, 0x1F, 0x06, 0x13, 0x00000001, PPC_NONE, PPC2_ISA300),
5578
-GEN_HANDLER_E(stdat, 0x1F, 0x06, 0x17, 0x00000001, PPC_NONE, PPC2_ISA300),
5579
-#endif
5368
/* ISA v3.0 changed the extended opcode from 62 to 30 */
5369
GEN_HANDLER(wait, 0x1F, 0x1E, 0x01, 0x039FF801, PPC_WAIT),
5370
GEN_HANDLER_E(wait, 0x1F, 0x1E, 0x00, 0x039CF801, PPC_NONE, PPC2_ISA300),