4 Copyright (C) 2003 Thomas M. Ogrisegg <tom@fnord.at>
5 Copyright (C) 2003-2005 Fabrice Bellard
7 This library is free software; you can redistribute it and/or
8 modify it under the terms of the GNU Lesser General Public
9 License as published by the Free Software Foundation; either
10 version 2 of the License, or (at your option) any later version.
12 This library is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 Lesser General Public License for more details.
17 You should have received a copy of the GNU Lesser General Public
18 License along with this library; if not, write to the Free Software
19 Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
25 Rest of V9 instructions, VIS instructions
26 NPC/PC static optimisations (use JUMP_TB when possible)
27 Optimize synthetic instructions
44 #define DYNAMIC_PC 1 /* dynamic pc value */
45 #define JUMP_PC 2 /* dynamic pc value which takes only two values
46 according to jump_pc[T2] */
48 /* global register indexes */
49 static TCGv cpu_env, cpu_T[3], cpu_regwptr;
50 /* local register indexes (only used inside old micro ops) */
53 typedef struct DisasContext {
54 target_ulong pc; /* current Program Counter: integer or DYNAMIC_PC */
55 target_ulong npc; /* next PC: integer or DYNAMIC_PC or JUMP_PC */
56 target_ulong jump_pc[2]; /* used when JUMP_PC pc value is used */
60 struct TranslationBlock *tb;
63 typedef struct sparc_def_t sparc_def_t;
66 const unsigned char *name;
67 target_ulong iu_version;
71 uint32_t mmu_ctpr_mask;
72 uint32_t mmu_cxr_mask;
73 uint32_t mmu_sfsr_mask;
74 uint32_t mmu_trcr_mask;
77 static const sparc_def_t *cpu_sparc_find_by_name(const unsigned char *name);
82 // This function uses non-native bit order
83 #define GET_FIELD(X, FROM, TO) \
84 ((X) >> (31 - (TO)) & ((1 << ((TO) - (FROM) + 1)) - 1))
86 // This function uses the order in the manuals, i.e. bit 0 is 2^0
87 #define GET_FIELD_SP(X, FROM, TO) \
88 GET_FIELD(X, 31 - (TO), 31 - (FROM))
90 #define GET_FIELDs(x,a,b) sign_extend (GET_FIELD(x,a,b), (b) - (a) + 1)
91 #define GET_FIELD_SPs(x,a,b) sign_extend (GET_FIELD_SP(x,a,b), ((b) - (a) + 1))
94 #define DFPREG(r) (((r & 1) << 5) | (r & 0x1e))
95 #define QFPREG(r) (((r & 1) << 5) | (r & 0x1c))
97 #define DFPREG(r) (r & 0x1e)
98 #define QFPREG(r) (r & 0x1c)
101 static int sign_extend(int x, int len)
104 return (x << len) >> len;
107 #define IS_IMM (insn & (1<<13))
109 static void disas_sparc_insn(DisasContext * dc);
111 #ifdef TARGET_SPARC64
112 #define GEN32(func, NAME) \
113 static GenOpFunc * const NAME ## _table [64] = { \
114 NAME ## 0, NAME ## 1, NAME ## 2, NAME ## 3, \
115 NAME ## 4, NAME ## 5, NAME ## 6, NAME ## 7, \
116 NAME ## 8, NAME ## 9, NAME ## 10, NAME ## 11, \
117 NAME ## 12, NAME ## 13, NAME ## 14, NAME ## 15, \
118 NAME ## 16, NAME ## 17, NAME ## 18, NAME ## 19, \
119 NAME ## 20, NAME ## 21, NAME ## 22, NAME ## 23, \
120 NAME ## 24, NAME ## 25, NAME ## 26, NAME ## 27, \
121 NAME ## 28, NAME ## 29, NAME ## 30, NAME ## 31, \
122 NAME ## 32, 0, NAME ## 34, 0, NAME ## 36, 0, NAME ## 38, 0, \
123 NAME ## 40, 0, NAME ## 42, 0, NAME ## 44, 0, NAME ## 46, 0, \
124 NAME ## 48, 0, NAME ## 50, 0, NAME ## 52, 0, NAME ## 54, 0, \
125 NAME ## 56, 0, NAME ## 58, 0, NAME ## 60, 0, NAME ## 62, 0, \
127 static inline void func(int n) \
129 NAME ## _table[n](); \
132 #define GEN32(func, NAME) \
133 static GenOpFunc *const NAME ## _table [32] = { \
134 NAME ## 0, NAME ## 1, NAME ## 2, NAME ## 3, \
135 NAME ## 4, NAME ## 5, NAME ## 6, NAME ## 7, \
136 NAME ## 8, NAME ## 9, NAME ## 10, NAME ## 11, \
137 NAME ## 12, NAME ## 13, NAME ## 14, NAME ## 15, \
138 NAME ## 16, NAME ## 17, NAME ## 18, NAME ## 19, \
139 NAME ## 20, NAME ## 21, NAME ## 22, NAME ## 23, \
140 NAME ## 24, NAME ## 25, NAME ## 26, NAME ## 27, \
141 NAME ## 28, NAME ## 29, NAME ## 30, NAME ## 31, \
143 static inline void func(int n) \
145 NAME ## _table[n](); \
149 /* floating point registers moves */
150 GEN32(gen_op_load_fpr_FT0, gen_op_load_fpr_FT0_fprf);
151 GEN32(gen_op_load_fpr_FT1, gen_op_load_fpr_FT1_fprf);
152 GEN32(gen_op_store_FT0_fpr, gen_op_store_FT0_fpr_fprf);
153 GEN32(gen_op_store_FT1_fpr, gen_op_store_FT1_fpr_fprf);
155 GEN32(gen_op_load_fpr_DT0, gen_op_load_fpr_DT0_fprf);
156 GEN32(gen_op_load_fpr_DT1, gen_op_load_fpr_DT1_fprf);
157 GEN32(gen_op_store_DT0_fpr, gen_op_store_DT0_fpr_fprf);
158 GEN32(gen_op_store_DT1_fpr, gen_op_store_DT1_fpr_fprf);
160 #if defined(CONFIG_USER_ONLY)
161 GEN32(gen_op_load_fpr_QT0, gen_op_load_fpr_QT0_fprf);
162 GEN32(gen_op_load_fpr_QT1, gen_op_load_fpr_QT1_fprf);
163 GEN32(gen_op_store_QT0_fpr, gen_op_store_QT0_fpr_fprf);
164 GEN32(gen_op_store_QT1_fpr, gen_op_store_QT1_fpr_fprf);
168 #ifdef CONFIG_USER_ONLY
169 #define supervisor(dc) 0
170 #ifdef TARGET_SPARC64
171 #define hypervisor(dc) 0
173 #define gen_op_ldst(name) gen_op_##name##_raw()
175 #define supervisor(dc) (dc->mem_idx >= 1)
176 #ifdef TARGET_SPARC64
177 #define hypervisor(dc) (dc->mem_idx == 2)
178 #define OP_LD_TABLE(width) \
179 static GenOpFunc * const gen_op_##width[] = { \
180 &gen_op_##width##_user, \
181 &gen_op_##width##_kernel, \
182 &gen_op_##width##_hypv, \
185 #define OP_LD_TABLE(width) \
186 static GenOpFunc * const gen_op_##width[] = { \
187 &gen_op_##width##_user, \
188 &gen_op_##width##_kernel, \
191 #define gen_op_ldst(name) (*gen_op_##name[dc->mem_idx])()
194 #ifndef CONFIG_USER_ONLY
197 #endif /* __i386__ */
205 #define ABI32_MASK(addr) tcg_gen_andi_i64(addr, addr, 0xffffffffULL);
207 #define ABI32_MASK(addr)
210 static inline void gen_movl_simm_T1(int32_t val)
212 tcg_gen_movi_tl(cpu_T[1], val);
215 static inline void gen_movl_reg_TN(int reg, TCGv tn)
218 tcg_gen_movi_tl(tn, 0);
220 tcg_gen_ld_tl(tn, cpu_env, offsetof(CPUState, gregs[reg]));
222 tcg_gen_ld_ptr(cpu_regwptr, cpu_env, offsetof(CPUState, regwptr)); // XXX
223 tcg_gen_ld_tl(tn, cpu_regwptr, (reg - 8) * sizeof(target_ulong));
227 static inline void gen_movl_reg_T0(int reg)
229 gen_movl_reg_TN(reg, cpu_T[0]);
232 static inline void gen_movl_reg_T1(int reg)
234 gen_movl_reg_TN(reg, cpu_T[1]);
238 static inline void gen_movl_reg_T2(int reg)
240 gen_movl_reg_TN(reg, cpu_T[2]);
243 #endif /* __i386__ */
244 static inline void gen_movl_TN_reg(int reg, TCGv tn)
249 tcg_gen_st_tl(tn, cpu_env, offsetof(CPUState, gregs[reg]));
251 tcg_gen_ld_ptr(cpu_regwptr, cpu_env, offsetof(CPUState, regwptr)); // XXX
252 tcg_gen_st_tl(tn, cpu_regwptr, (reg - 8) * sizeof(target_ulong));
256 static inline void gen_movl_T0_reg(int reg)
258 gen_movl_TN_reg(reg, cpu_T[0]);
261 static inline void gen_movl_T1_reg(int reg)
263 gen_movl_TN_reg(reg, cpu_T[1]);
266 static inline void gen_op_movl_T0_env(size_t offset)
268 tcg_gen_ld_i32(cpu_T[0], cpu_env, offset);
271 static inline void gen_op_movl_env_T0(size_t offset)
273 tcg_gen_st_i32(cpu_T[0], cpu_env, offset);
276 static inline void gen_op_movtl_T0_env(size_t offset)
278 tcg_gen_ld_tl(cpu_T[0], cpu_env, offset);
281 static inline void gen_op_movtl_env_T0(size_t offset)
283 tcg_gen_st_tl(cpu_T[0], cpu_env, offset);
286 static inline void gen_op_add_T1_T0(void)
288 tcg_gen_add_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
291 static inline void gen_op_or_T1_T0(void)
293 tcg_gen_or_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
296 static inline void gen_op_xor_T1_T0(void)
298 tcg_gen_xor_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
301 static inline void gen_jmp_im(target_ulong pc)
303 tcg_gen_movi_tl(cpu_tmp0, pc);
304 tcg_gen_st_tl(cpu_tmp0, cpu_env, offsetof(CPUState, pc));
307 static inline void gen_movl_npc_im(target_ulong npc)
309 tcg_gen_movi_tl(cpu_tmp0, npc);
310 tcg_gen_st_tl(cpu_tmp0, cpu_env, offsetof(CPUState, npc));
313 static inline void gen_goto_tb(DisasContext *s, int tb_num,
314 target_ulong pc, target_ulong npc)
316 TranslationBlock *tb;
319 if ((pc & TARGET_PAGE_MASK) == (tb->pc & TARGET_PAGE_MASK) &&
320 (npc & TARGET_PAGE_MASK) == (tb->pc & TARGET_PAGE_MASK)) {
321 /* jump to same page: we can use a direct jump */
322 tcg_gen_goto_tb(tb_num);
324 gen_movl_npc_im(npc);
325 tcg_gen_exit_tb((long)tb + tb_num);
327 /* jump to another page: currently not optimized */
329 gen_movl_npc_im(npc);
334 static inline void gen_branch2(DisasContext *dc, target_ulong pc1,
339 l1 = gen_new_label();
341 gen_op_jz_T2_label(l1);
343 gen_goto_tb(dc, 0, pc1, pc1 + 4);
346 gen_goto_tb(dc, 1, pc2, pc2 + 4);
349 static inline void gen_branch_a(DisasContext *dc, target_ulong pc1,
354 l1 = gen_new_label();
356 gen_op_jz_T2_label(l1);
358 gen_goto_tb(dc, 0, pc2, pc1);
361 gen_goto_tb(dc, 1, pc2 + 4, pc2 + 8);
364 static inline void gen_branch(DisasContext *dc, target_ulong pc,
367 gen_goto_tb(dc, 0, pc, npc);
370 static inline void gen_generic_branch(target_ulong npc1, target_ulong npc2)
374 l1 = gen_new_label();
375 l2 = gen_new_label();
376 gen_op_jz_T2_label(l1);
378 gen_movl_npc_im(npc1);
379 gen_op_jmp_label(l2);
382 gen_movl_npc_im(npc2);
386 /* call this function before using T2 as it may have been set for a jump */
387 static inline void flush_T2(DisasContext * dc)
389 if (dc->npc == JUMP_PC) {
390 gen_generic_branch(dc->jump_pc[0], dc->jump_pc[1]);
391 dc->npc = DYNAMIC_PC;
395 static inline void save_npc(DisasContext * dc)
397 if (dc->npc == JUMP_PC) {
398 gen_generic_branch(dc->jump_pc[0], dc->jump_pc[1]);
399 dc->npc = DYNAMIC_PC;
400 } else if (dc->npc != DYNAMIC_PC) {
401 gen_movl_npc_im(dc->npc);
405 static inline void save_state(DisasContext * dc)
411 static inline void gen_mov_pc_npc(DisasContext * dc)
413 if (dc->npc == JUMP_PC) {
414 gen_generic_branch(dc->jump_pc[0], dc->jump_pc[1]);
415 tcg_gen_ld_tl(cpu_tmp0, cpu_env, offsetof(CPUSPARCState, npc));
416 tcg_gen_st_tl(cpu_tmp0, cpu_env, offsetof(CPUSPARCState, pc));
418 } else if (dc->npc == DYNAMIC_PC) {
419 tcg_gen_ld_tl(cpu_tmp0, cpu_env, offsetof(CPUSPARCState, npc));
420 tcg_gen_st_tl(cpu_tmp0, cpu_env, offsetof(CPUSPARCState, pc));
427 static inline void gen_op_next_insn(void)
429 tcg_gen_ld_tl(cpu_tmp0, cpu_env, offsetof(CPUSPARCState, npc));
430 tcg_gen_st_tl(cpu_tmp0, cpu_env, offsetof(CPUSPARCState, pc));
431 tcg_gen_addi_tl(cpu_tmp0, cpu_tmp0, 4);
432 tcg_gen_st_tl(cpu_tmp0, cpu_env, offsetof(CPUSPARCState, npc));
435 static GenOpFunc * const gen_cond[2][16] = {
455 #ifdef TARGET_SPARC64
476 static GenOpFunc * const gen_fcond[4][16] = {
495 #ifdef TARGET_SPARC64
498 gen_op_eval_fbne_fcc1,
499 gen_op_eval_fblg_fcc1,
500 gen_op_eval_fbul_fcc1,
501 gen_op_eval_fbl_fcc1,
502 gen_op_eval_fbug_fcc1,
503 gen_op_eval_fbg_fcc1,
504 gen_op_eval_fbu_fcc1,
506 gen_op_eval_fbe_fcc1,
507 gen_op_eval_fbue_fcc1,
508 gen_op_eval_fbge_fcc1,
509 gen_op_eval_fbuge_fcc1,
510 gen_op_eval_fble_fcc1,
511 gen_op_eval_fbule_fcc1,
512 gen_op_eval_fbo_fcc1,
516 gen_op_eval_fbne_fcc2,
517 gen_op_eval_fblg_fcc2,
518 gen_op_eval_fbul_fcc2,
519 gen_op_eval_fbl_fcc2,
520 gen_op_eval_fbug_fcc2,
521 gen_op_eval_fbg_fcc2,
522 gen_op_eval_fbu_fcc2,
524 gen_op_eval_fbe_fcc2,
525 gen_op_eval_fbue_fcc2,
526 gen_op_eval_fbge_fcc2,
527 gen_op_eval_fbuge_fcc2,
528 gen_op_eval_fble_fcc2,
529 gen_op_eval_fbule_fcc2,
530 gen_op_eval_fbo_fcc2,
534 gen_op_eval_fbne_fcc3,
535 gen_op_eval_fblg_fcc3,
536 gen_op_eval_fbul_fcc3,
537 gen_op_eval_fbl_fcc3,
538 gen_op_eval_fbug_fcc3,
539 gen_op_eval_fbg_fcc3,
540 gen_op_eval_fbu_fcc3,
542 gen_op_eval_fbe_fcc3,
543 gen_op_eval_fbue_fcc3,
544 gen_op_eval_fbge_fcc3,
545 gen_op_eval_fbuge_fcc3,
546 gen_op_eval_fble_fcc3,
547 gen_op_eval_fbule_fcc3,
548 gen_op_eval_fbo_fcc3,
555 #ifdef TARGET_SPARC64
556 static void gen_cond_reg(int cond)
582 static const int gen_tcg_cond_reg[8] = {
594 /* XXX: potentially incorrect if dynamic npc */
595 static void do_branch(DisasContext * dc, int32_t offset, uint32_t insn, int cc)
597 unsigned int cond = GET_FIELD(insn, 3, 6), a = (insn & (1 << 29));
598 target_ulong target = dc->pc + offset;
601 /* unconditional not taken */
603 dc->pc = dc->npc + 4;
604 dc->npc = dc->pc + 4;
607 dc->npc = dc->pc + 4;
609 } else if (cond == 0x8) {
610 /* unconditional taken */
613 dc->npc = dc->pc + 4;
620 gen_cond[cc][cond]();
622 gen_branch_a(dc, target, dc->npc);
626 dc->jump_pc[0] = target;
627 dc->jump_pc[1] = dc->npc + 4;
633 /* XXX: potentially incorrect if dynamic npc */
634 static void do_fbranch(DisasContext * dc, int32_t offset, uint32_t insn, int cc)
636 unsigned int cond = GET_FIELD(insn, 3, 6), a = (insn & (1 << 29));
637 target_ulong target = dc->pc + offset;
640 /* unconditional not taken */
642 dc->pc = dc->npc + 4;
643 dc->npc = dc->pc + 4;
646 dc->npc = dc->pc + 4;
648 } else if (cond == 0x8) {
649 /* unconditional taken */
652 dc->npc = dc->pc + 4;
659 gen_fcond[cc][cond]();
661 gen_branch_a(dc, target, dc->npc);
665 dc->jump_pc[0] = target;
666 dc->jump_pc[1] = dc->npc + 4;
672 #ifdef TARGET_SPARC64
673 /* XXX: potentially incorrect if dynamic npc */
674 static void do_branch_reg(DisasContext * dc, int32_t offset, uint32_t insn)
676 unsigned int cond = GET_FIELD_SP(insn, 25, 27), a = (insn & (1 << 29));
677 target_ulong target = dc->pc + offset;
682 gen_branch_a(dc, target, dc->npc);
686 dc->jump_pc[0] = target;
687 dc->jump_pc[1] = dc->npc + 4;
692 static GenOpFunc * const gen_fcmps[4] = {
699 static GenOpFunc * const gen_fcmpd[4] = {
706 #if defined(CONFIG_USER_ONLY)
707 static GenOpFunc * const gen_fcmpq[4] = {
715 static GenOpFunc * const gen_fcmpes[4] = {
722 static GenOpFunc * const gen_fcmped[4] = {
729 #if defined(CONFIG_USER_ONLY)
730 static GenOpFunc * const gen_fcmpeq[4] = {
738 static inline void gen_op_fcmps(int fccno)
740 tcg_gen_helper_0_0(gen_fcmps[fccno]);
743 static inline void gen_op_fcmpd(int fccno)
745 tcg_gen_helper_0_0(gen_fcmpd[fccno]);
748 #if defined(CONFIG_USER_ONLY)
749 static inline void gen_op_fcmpq(int fccno)
751 tcg_gen_helper_0_0(gen_fcmpq[fccno]);
755 static inline void gen_op_fcmpes(int fccno)
757 tcg_gen_helper_0_0(gen_fcmpes[fccno]);
760 static inline void gen_op_fcmped(int fccno)
762 tcg_gen_helper_0_0(gen_fcmped[fccno]);
765 #if defined(CONFIG_USER_ONLY)
766 static inline void gen_op_fcmpeq(int fccno)
768 tcg_gen_helper_0_0(gen_fcmpeq[fccno]);
774 static inline void gen_op_fcmps(int fccno)
776 tcg_gen_helper_0_0(helper_fcmps);
779 static inline void gen_op_fcmpd(int fccno)
781 tcg_gen_helper_0_0(helper_fcmpd);
784 #if defined(CONFIG_USER_ONLY)
785 static inline void gen_op_fcmpq(int fccno)
787 tcg_gen_helper_0_0(helper_fcmpq);
791 static inline void gen_op_fcmpes(int fccno)
793 tcg_gen_helper_0_0(helper_fcmpes);
796 static inline void gen_op_fcmped(int fccno)
798 tcg_gen_helper_0_0(helper_fcmped);
801 #if defined(CONFIG_USER_ONLY)
802 static inline void gen_op_fcmpeq(int fccno)
804 tcg_gen_helper_0_0(helper_fcmpeq);
810 static int gen_trap_ifnofpu(DisasContext * dc)
812 #if !defined(CONFIG_USER_ONLY)
813 if (!dc->fpu_enabled) {
815 gen_op_exception(TT_NFPU_INSN);
823 static inline void gen_op_clear_ieee_excp_and_FTT(void)
825 tcg_gen_ld_tl(cpu_tmp0, cpu_env, offsetof(CPUSPARCState, fsr));
826 tcg_gen_andi_tl(cpu_tmp0, cpu_tmp0, ~(FSR_FTT_MASK | FSR_CEXC_MASK));
827 tcg_gen_st_tl(cpu_tmp0, cpu_env, offsetof(CPUSPARCState, fsr));
830 static inline void gen_clear_float_exceptions(void)
832 tcg_gen_helper_0_0(helper_clear_float_exceptions);
836 #ifdef TARGET_SPARC64
837 static inline void gen_ld_asi(int insn, int size, int sign)
842 r_size = tcg_temp_new(TCG_TYPE_I32);
843 r_sign = tcg_temp_new(TCG_TYPE_I32);
844 tcg_gen_movi_i32(r_size, size);
845 tcg_gen_movi_i32(r_sign, sign);
847 offset = GET_FIELD(insn, 25, 31);
848 tcg_gen_addi_tl(cpu_T[0], cpu_T[0], offset);
849 tcg_gen_ld_i32(cpu_T[1], cpu_env, offsetof(CPUSPARCState, asi));
851 asi = GET_FIELD(insn, 19, 26);
852 tcg_gen_movi_i32(cpu_T[1], asi);
854 tcg_gen_helper_1_4(helper_ld_asi, cpu_T[1], cpu_T[0], cpu_T[1], r_size,
858 static inline void gen_st_asi(int insn, int size)
863 r_asi = tcg_temp_new(TCG_TYPE_I32);
864 r_size = tcg_temp_new(TCG_TYPE_I32);
865 tcg_gen_movi_i32(r_size, size);
867 offset = GET_FIELD(insn, 25, 31);
868 tcg_gen_addi_tl(cpu_T[0], cpu_T[0], offset);
869 tcg_gen_ld_i32(r_asi, cpu_env, offsetof(CPUSPARCState, asi));
871 asi = GET_FIELD(insn, 19, 26);
872 tcg_gen_movi_i32(r_asi, asi);
874 tcg_gen_helper_0_4(helper_st_asi, cpu_T[0], cpu_T[1], r_asi, r_size);
877 static inline void gen_ldf_asi(int insn, int size, int rd)
880 TCGv r_asi, r_size, r_rd;
882 r_asi = tcg_temp_new(TCG_TYPE_I32);
883 r_size = tcg_temp_new(TCG_TYPE_I32);
884 r_rd = tcg_temp_new(TCG_TYPE_I32);
885 tcg_gen_movi_i32(r_size, size);
886 tcg_gen_movi_i32(r_rd, rd);
888 offset = GET_FIELD(insn, 25, 31);
889 tcg_gen_addi_tl(cpu_T[0], cpu_T[0], offset);
890 tcg_gen_ld_i32(r_asi, cpu_env, offsetof(CPUSPARCState, asi));
892 asi = GET_FIELD(insn, 19, 26);
893 tcg_gen_movi_i32(r_asi, asi);
895 tcg_gen_helper_0_4(helper_ldf_asi, cpu_T[0], r_asi, r_size, r_rd);
898 static inline void gen_stf_asi(int insn, int size, int rd)
901 TCGv r_asi, r_size, r_rd;
903 r_asi = tcg_temp_new(TCG_TYPE_I32);
904 r_size = tcg_temp_new(TCG_TYPE_I32);
905 r_rd = tcg_temp_new(TCG_TYPE_I32);
906 tcg_gen_movi_i32(r_size, size);
907 tcg_gen_movi_i32(r_rd, rd);
909 offset = GET_FIELD(insn, 25, 31);
910 tcg_gen_addi_tl(cpu_T[0], cpu_T[0], offset);
911 tcg_gen_ld_i32(r_asi, cpu_env, offsetof(CPUSPARCState, asi));
913 asi = GET_FIELD(insn, 19, 26);
914 tcg_gen_movi_i32(r_asi, asi);
916 tcg_gen_helper_0_4(helper_stf_asi, cpu_T[0], r_asi, r_size, r_rd);
919 static inline void gen_swap_asi(int insn)
922 TCGv r_size, r_sign, r_temp;
924 r_size = tcg_temp_new(TCG_TYPE_I32);
925 r_sign = tcg_temp_new(TCG_TYPE_I32);
926 r_temp = tcg_temp_new(TCG_TYPE_I32);
927 tcg_gen_movi_i32(r_size, 4);
928 tcg_gen_movi_i32(r_sign, 0);
930 offset = GET_FIELD(insn, 25, 31);
931 tcg_gen_addi_tl(cpu_T[0], cpu_T[0], offset);
932 tcg_gen_ld_i32(cpu_T[1], cpu_env, offsetof(CPUSPARCState, asi));
934 asi = GET_FIELD(insn, 19, 26);
935 tcg_gen_movi_i32(cpu_T[1], asi);
937 tcg_gen_helper_1_4(helper_ld_asi, r_temp, cpu_T[0], cpu_T[1], r_size,
939 tcg_gen_helper_0_4(helper_st_asi, cpu_T[0], cpu_T[1], r_size, r_sign);
940 tcg_gen_mov_i32(cpu_T[1], r_temp);
943 static inline void gen_ldda_asi(int insn)
946 TCGv r_size, r_sign, r_dword;
948 r_size = tcg_temp_new(TCG_TYPE_I32);
949 r_sign = tcg_temp_new(TCG_TYPE_I32);
950 r_dword = tcg_temp_new(TCG_TYPE_I64);
951 tcg_gen_movi_i32(r_size, 8);
952 tcg_gen_movi_i32(r_sign, 0);
954 offset = GET_FIELD(insn, 25, 31);
955 tcg_gen_addi_tl(cpu_T[0], cpu_T[0], offset);
956 tcg_gen_ld_i32(cpu_T[1], cpu_env, offsetof(CPUSPARCState, asi));
958 asi = GET_FIELD(insn, 19, 26);
959 tcg_gen_movi_i32(cpu_T[1], asi);
961 tcg_gen_helper_1_4(helper_ld_asi, r_dword, cpu_T[0], cpu_T[1], r_size,
963 tcg_gen_trunc_i64_i32(cpu_T[0], r_dword);
964 tcg_gen_shri_i64(r_dword, r_dword, 32);
965 tcg_gen_trunc_i64_i32(cpu_T[1], r_dword);
968 static inline void gen_cas_asi(int insn, int rd)
973 r_val1 = tcg_temp_new(TCG_TYPE_I32);
974 r_asi = tcg_temp_new(TCG_TYPE_I32);
975 gen_movl_reg_TN(rd, r_val1);
977 offset = GET_FIELD(insn, 25, 31);
978 tcg_gen_addi_tl(cpu_T[0], cpu_T[0], offset);
979 tcg_gen_ld_i32(r_asi, cpu_env, offsetof(CPUSPARCState, asi));
981 asi = GET_FIELD(insn, 19, 26);
982 tcg_gen_movi_i32(r_asi, asi);
984 tcg_gen_helper_1_4(helper_cas_asi, cpu_T[1], cpu_T[0], r_val1, cpu_T[1],
988 static inline void gen_casx_asi(int insn, int rd)
993 r_val1 = tcg_temp_new(TCG_TYPE_I64);
994 r_asi = tcg_temp_new(TCG_TYPE_I32);
995 gen_movl_reg_TN(rd, r_val1);
997 offset = GET_FIELD(insn, 25, 31);
998 tcg_gen_addi_tl(cpu_T[0], cpu_T[0], offset);
999 tcg_gen_ld_i32(r_asi, cpu_env, offsetof(CPUSPARCState, asi));
1001 asi = GET_FIELD(insn, 19, 26);
1002 tcg_gen_movi_i32(r_asi, asi);
1004 tcg_gen_helper_1_4(helper_casx_asi, cpu_T[1], cpu_T[0], r_val1, cpu_T[1],
1008 #elif !defined(CONFIG_USER_ONLY)
1010 static inline void gen_ld_asi(int insn, int size, int sign)
1013 TCGv r_size, r_sign, r_dword;
1015 r_size = tcg_temp_new(TCG_TYPE_I32);
1016 r_sign = tcg_temp_new(TCG_TYPE_I32);
1017 r_dword = tcg_temp_new(TCG_TYPE_I64);
1018 tcg_gen_movi_i32(r_size, size);
1019 tcg_gen_movi_i32(r_sign, sign);
1020 asi = GET_FIELD(insn, 19, 26);
1021 tcg_gen_movi_i32(cpu_T[1], asi);
1022 tcg_gen_helper_1_4(helper_ld_asi, r_dword, cpu_T[0], cpu_T[1], r_size,
1024 tcg_gen_trunc_i64_i32(cpu_T[1], r_dword);
1027 static inline void gen_st_asi(int insn, int size)
1030 TCGv r_dword, r_asi, r_size;
1032 r_dword = tcg_temp_new(TCG_TYPE_I64);
1033 tcg_gen_extu_i32_i64(r_dword, cpu_T[1]);
1034 r_asi = tcg_temp_new(TCG_TYPE_I32);
1035 r_size = tcg_temp_new(TCG_TYPE_I32);
1036 asi = GET_FIELD(insn, 19, 26);
1037 tcg_gen_movi_i32(r_asi, asi);
1038 tcg_gen_movi_i32(r_size, size);
1039 tcg_gen_helper_0_4(helper_st_asi, cpu_T[0], r_dword, r_asi, r_size);
1042 static inline void gen_swap_asi(int insn)
1045 TCGv r_size, r_sign, r_temp;
1047 r_size = tcg_temp_new(TCG_TYPE_I32);
1048 r_sign = tcg_temp_new(TCG_TYPE_I32);
1049 r_temp = tcg_temp_new(TCG_TYPE_I32);
1050 tcg_gen_movi_i32(r_size, 4);
1051 tcg_gen_movi_i32(r_sign, 0);
1052 asi = GET_FIELD(insn, 19, 26);
1053 tcg_gen_movi_i32(cpu_T[1], asi);
1054 tcg_gen_helper_1_4(helper_ld_asi, r_temp, cpu_T[0], cpu_T[1], r_size,
1056 tcg_gen_helper_0_4(helper_st_asi, cpu_T[0], cpu_T[1], r_size, r_sign);
1057 tcg_gen_mov_i32(cpu_T[1], r_temp);
1060 static inline void gen_ldda_asi(int insn)
1063 TCGv r_size, r_sign, r_dword;
1065 r_size = tcg_temp_new(TCG_TYPE_I32);
1066 r_sign = tcg_temp_new(TCG_TYPE_I32);
1067 r_dword = tcg_temp_new(TCG_TYPE_I64);
1068 tcg_gen_movi_i32(r_size, 8);
1069 tcg_gen_movi_i32(r_sign, 0);
1070 asi = GET_FIELD(insn, 19, 26);
1071 tcg_gen_movi_i32(cpu_T[1], asi);
1072 tcg_gen_helper_1_4(helper_ld_asi, r_dword, cpu_T[0], cpu_T[1], r_size,
1074 tcg_gen_trunc_i64_i32(cpu_T[0], r_dword);
1075 tcg_gen_shri_i64(r_dword, r_dword, 32);
1076 tcg_gen_trunc_i64_i32(cpu_T[1], r_dword);
1080 #if !defined(CONFIG_USER_ONLY) || defined(TARGET_SPARC64)
1081 static inline void gen_ldstub_asi(int insn)
1084 TCGv r_dword, r_asi, r_size;
1086 gen_ld_asi(insn, 1, 0);
1088 r_dword = tcg_temp_new(TCG_TYPE_I64);
1089 r_asi = tcg_temp_new(TCG_TYPE_I32);
1090 r_size = tcg_temp_new(TCG_TYPE_I32);
1091 asi = GET_FIELD(insn, 19, 26);
1092 tcg_gen_movi_i32(r_dword, 0xff);
1093 tcg_gen_movi_i32(r_asi, asi);
1094 tcg_gen_movi_i32(r_size, 1);
1095 tcg_gen_helper_0_4(helper_st_asi, cpu_T[0], r_dword, r_asi, r_size);
1099 static inline void gen_mov_reg_C(TCGv reg)
1101 tcg_gen_ld_i32(reg, cpu_env, offsetof(CPUSPARCState, psr));
1102 tcg_gen_shri_i32(reg, reg, 20);
1103 tcg_gen_andi_i32(reg, reg, 0x1);
1106 /* before an instruction, dc->pc must be static */
1107 static void disas_sparc_insn(DisasContext * dc)
1109 unsigned int insn, opc, rs1, rs2, rd;
1111 insn = ldl_code(dc->pc);
1112 opc = GET_FIELD(insn, 0, 1);
1114 rd = GET_FIELD(insn, 2, 6);
1116 case 0: /* branches/sethi */
1118 unsigned int xop = GET_FIELD(insn, 7, 9);
1121 #ifdef TARGET_SPARC64
1122 case 0x1: /* V9 BPcc */
1126 target = GET_FIELD_SP(insn, 0, 18);
1127 target = sign_extend(target, 18);
1129 cc = GET_FIELD_SP(insn, 20, 21);
1131 do_branch(dc, target, insn, 0);
1133 do_branch(dc, target, insn, 1);
1138 case 0x3: /* V9 BPr */
1140 target = GET_FIELD_SP(insn, 0, 13) |
1141 (GET_FIELD_SP(insn, 20, 21) << 14);
1142 target = sign_extend(target, 16);
1144 rs1 = GET_FIELD(insn, 13, 17);
1145 gen_movl_reg_T0(rs1);
1146 do_branch_reg(dc, target, insn);
1149 case 0x5: /* V9 FBPcc */
1151 int cc = GET_FIELD_SP(insn, 20, 21);
1152 if (gen_trap_ifnofpu(dc))
1154 target = GET_FIELD_SP(insn, 0, 18);
1155 target = sign_extend(target, 19);
1157 do_fbranch(dc, target, insn, cc);
1161 case 0x7: /* CBN+x */
1166 case 0x2: /* BN+x */
1168 target = GET_FIELD(insn, 10, 31);
1169 target = sign_extend(target, 22);
1171 do_branch(dc, target, insn, 0);
1174 case 0x6: /* FBN+x */
1176 if (gen_trap_ifnofpu(dc))
1178 target = GET_FIELD(insn, 10, 31);
1179 target = sign_extend(target, 22);
1181 do_fbranch(dc, target, insn, 0);
1184 case 0x4: /* SETHI */
1189 uint32_t value = GET_FIELD(insn, 10, 31);
1190 tcg_gen_movi_tl(cpu_T[0], value << 10);
1191 gen_movl_T0_reg(rd);
1196 case 0x0: /* UNIMPL */
1205 target_long target = GET_FIELDs(insn, 2, 31) << 2;
1207 tcg_gen_movi_tl(cpu_T[0], dc->pc);
1208 gen_movl_T0_reg(15);
1214 case 2: /* FPU & Logical Operations */
1216 unsigned int xop = GET_FIELD(insn, 7, 12);
1217 if (xop == 0x3a) { /* generate trap */
1220 rs1 = GET_FIELD(insn, 13, 17);
1221 gen_movl_reg_T0(rs1);
1223 rs2 = GET_FIELD(insn, 25, 31);
1224 tcg_gen_addi_tl(cpu_T[0], cpu_T[0], rs2);
1226 rs2 = GET_FIELD(insn, 27, 31);
1230 gen_movl_reg_T1(rs2);
1236 cond = GET_FIELD(insn, 3, 6);
1239 tcg_gen_helper_0_1(helper_trap, cpu_T[0]);
1240 } else if (cond != 0) {
1241 #ifdef TARGET_SPARC64
1243 int cc = GET_FIELD_SP(insn, 11, 12);
1247 gen_cond[0][cond]();
1249 gen_cond[1][cond]();
1255 gen_cond[0][cond]();
1257 tcg_gen_helper_0_2(helper_trapcc, cpu_T[0], cpu_T[2]);
1263 } else if (xop == 0x28) {
1264 rs1 = GET_FIELD(insn, 13, 17);
1267 #ifndef TARGET_SPARC64
1268 case 0x01 ... 0x0e: /* undefined in the SPARCv8
1269 manual, rdy on the microSPARC
1271 case 0x0f: /* stbar in the SPARCv8 manual,
1272 rdy on the microSPARC II */
1273 case 0x10 ... 0x1f: /* implementation-dependent in the
1274 SPARCv8 manual, rdy on the
1277 gen_op_movtl_T0_env(offsetof(CPUSPARCState, y));
1278 gen_movl_T0_reg(rd);
1280 #ifdef TARGET_SPARC64
1281 case 0x2: /* V9 rdccr */
1283 gen_movl_T0_reg(rd);
1285 case 0x3: /* V9 rdasi */
1286 gen_op_movl_T0_env(offsetof(CPUSPARCState, asi));
1287 gen_movl_T0_reg(rd);
1289 case 0x4: /* V9 rdtick */
1293 r_tickptr = tcg_temp_new(TCG_TYPE_PTR);
1294 tcg_gen_ld_ptr(r_tickptr, cpu_env,
1295 offsetof(CPUState, tick));
1296 tcg_gen_helper_1_1(helper_tick_get_count, cpu_T[0],
1298 gen_movl_T0_reg(rd);
1301 case 0x5: /* V9 rdpc */
1302 tcg_gen_movi_tl(cpu_T[0], dc->pc);
1303 gen_movl_T0_reg(rd);
1305 case 0x6: /* V9 rdfprs */
1306 gen_op_movl_T0_env(offsetof(CPUSPARCState, fprs));
1307 gen_movl_T0_reg(rd);
1309 case 0xf: /* V9 membar */
1310 break; /* no effect */
1311 case 0x13: /* Graphics Status */
1312 if (gen_trap_ifnofpu(dc))
1314 gen_op_movtl_T0_env(offsetof(CPUSPARCState, gsr));
1315 gen_movl_T0_reg(rd);
1317 case 0x17: /* Tick compare */
1318 gen_op_movtl_T0_env(offsetof(CPUSPARCState, tick_cmpr));
1319 gen_movl_T0_reg(rd);
1321 case 0x18: /* System tick */
1325 r_tickptr = tcg_temp_new(TCG_TYPE_PTR);
1326 tcg_gen_ld_ptr(r_tickptr, cpu_env,
1327 offsetof(CPUState, stick));
1328 tcg_gen_helper_1_1(helper_tick_get_count, cpu_T[0],
1330 gen_movl_T0_reg(rd);
1333 case 0x19: /* System tick compare */
1334 gen_op_movtl_T0_env(offsetof(CPUSPARCState, stick_cmpr));
1335 gen_movl_T0_reg(rd);
1337 case 0x10: /* Performance Control */
1338 case 0x11: /* Performance Instrumentation Counter */
1339 case 0x12: /* Dispatch Control */
1340 case 0x14: /* Softint set, WO */
1341 case 0x15: /* Softint clear, WO */
1342 case 0x16: /* Softint write */
1347 #if !defined(CONFIG_USER_ONLY)
1348 } else if (xop == 0x29) { /* rdpsr / UA2005 rdhpr */
1349 #ifndef TARGET_SPARC64
1350 if (!supervisor(dc))
1352 tcg_gen_helper_1_0(helper_rdpsr, cpu_T[0]);
1354 if (!hypervisor(dc))
1356 rs1 = GET_FIELD(insn, 13, 17);
1359 // gen_op_rdhpstate();
1362 // gen_op_rdhtstate();
1365 gen_op_movl_T0_env(offsetof(CPUSPARCState, hintp));
1368 gen_op_movl_T0_env(offsetof(CPUSPARCState, htba));
1371 gen_op_movl_T0_env(offsetof(CPUSPARCState, hver));
1373 case 31: // hstick_cmpr
1374 gen_op_movl_env_T0(offsetof(CPUSPARCState, hstick_cmpr));
1380 gen_movl_T0_reg(rd);
1382 } else if (xop == 0x2a) { /* rdwim / V9 rdpr */
1383 if (!supervisor(dc))
1385 #ifdef TARGET_SPARC64
1386 rs1 = GET_FIELD(insn, 13, 17);
1404 r_tickptr = tcg_temp_new(TCG_TYPE_PTR);
1405 tcg_gen_ld_ptr(r_tickptr, cpu_env,
1406 offsetof(CPUState, tick));
1407 tcg_gen_helper_1_1(helper_tick_get_count, cpu_T[0],
1409 gen_movl_T0_reg(rd);
1413 gen_op_movtl_T0_env(offsetof(CPUSPARCState, tbr));
1416 gen_op_movl_T0_env(offsetof(CPUSPARCState, pstate));
1419 gen_op_movl_T0_env(offsetof(CPUSPARCState, tl));
1422 gen_op_movl_T0_env(offsetof(CPUSPARCState, psrpil));
1428 gen_op_movl_T0_env(offsetof(CPUSPARCState, cansave));
1430 case 11: // canrestore
1431 gen_op_movl_T0_env(offsetof(CPUSPARCState, canrestore));
1433 case 12: // cleanwin
1434 gen_op_movl_T0_env(offsetof(CPUSPARCState, cleanwin));
1436 case 13: // otherwin
1437 gen_op_movl_T0_env(offsetof(CPUSPARCState, otherwin));
1440 gen_op_movl_T0_env(offsetof(CPUSPARCState, wstate));
1442 case 16: // UA2005 gl
1443 gen_op_movl_T0_env(offsetof(CPUSPARCState, gl));
1445 case 26: // UA2005 strand status
1446 if (!hypervisor(dc))
1448 gen_op_movl_T0_env(offsetof(CPUSPARCState, ssr));
1451 gen_op_movtl_T0_env(offsetof(CPUSPARCState, version));
1458 gen_op_movl_T0_env(offsetof(CPUSPARCState, wim));
1460 gen_movl_T0_reg(rd);
1462 } else if (xop == 0x2b) { /* rdtbr / V9 flushw */
1463 #ifdef TARGET_SPARC64
1466 if (!supervisor(dc))
1468 gen_op_movtl_T0_env(offsetof(CPUSPARCState, tbr));
1469 gen_movl_T0_reg(rd);
1473 } else if (xop == 0x34) { /* FPU Operations */
1474 if (gen_trap_ifnofpu(dc))
1476 gen_op_clear_ieee_excp_and_FTT();
1477 rs1 = GET_FIELD(insn, 13, 17);
1478 rs2 = GET_FIELD(insn, 27, 31);
1479 xop = GET_FIELD(insn, 18, 26);
1481 case 0x1: /* fmovs */
1482 gen_op_load_fpr_FT0(rs2);
1483 gen_op_store_FT0_fpr(rd);
1485 case 0x5: /* fnegs */
1486 gen_op_load_fpr_FT1(rs2);
1488 gen_op_store_FT0_fpr(rd);
1490 case 0x9: /* fabss */
1491 gen_op_load_fpr_FT1(rs2);
1492 tcg_gen_helper_0_0(helper_fabss);
1493 gen_op_store_FT0_fpr(rd);
1495 case 0x29: /* fsqrts */
1496 gen_op_load_fpr_FT1(rs2);
1497 gen_clear_float_exceptions();
1498 tcg_gen_helper_0_0(helper_fsqrts);
1499 tcg_gen_helper_0_0(helper_check_ieee_exceptions);
1500 gen_op_store_FT0_fpr(rd);
1502 case 0x2a: /* fsqrtd */
1503 gen_op_load_fpr_DT1(DFPREG(rs2));
1504 gen_clear_float_exceptions();
1505 tcg_gen_helper_0_0(helper_fsqrtd);
1506 tcg_gen_helper_0_0(helper_check_ieee_exceptions);
1507 gen_op_store_DT0_fpr(DFPREG(rd));
1509 case 0x2b: /* fsqrtq */
1510 #if defined(CONFIG_USER_ONLY)
1511 gen_op_load_fpr_QT1(QFPREG(rs2));
1512 gen_clear_float_exceptions();
1513 tcg_gen_helper_0_0(helper_fsqrtq);
1514 tcg_gen_helper_0_0(helper_check_ieee_exceptions);
1515 gen_op_store_QT0_fpr(QFPREG(rd));
1521 gen_op_load_fpr_FT0(rs1);
1522 gen_op_load_fpr_FT1(rs2);
1523 gen_clear_float_exceptions();
1525 tcg_gen_helper_0_0(helper_check_ieee_exceptions);
1526 gen_op_store_FT0_fpr(rd);
1529 gen_op_load_fpr_DT0(DFPREG(rs1));
1530 gen_op_load_fpr_DT1(DFPREG(rs2));
1531 gen_clear_float_exceptions();
1533 tcg_gen_helper_0_0(helper_check_ieee_exceptions);
1534 gen_op_store_DT0_fpr(DFPREG(rd));
1536 case 0x43: /* faddq */
1537 #if defined(CONFIG_USER_ONLY)
1538 gen_op_load_fpr_QT0(QFPREG(rs1));
1539 gen_op_load_fpr_QT1(QFPREG(rs2));
1540 gen_clear_float_exceptions();
1542 tcg_gen_helper_0_0(helper_check_ieee_exceptions);
1543 gen_op_store_QT0_fpr(QFPREG(rd));
1549 gen_op_load_fpr_FT0(rs1);
1550 gen_op_load_fpr_FT1(rs2);
1551 gen_clear_float_exceptions();
1553 tcg_gen_helper_0_0(helper_check_ieee_exceptions);
1554 gen_op_store_FT0_fpr(rd);
1557 gen_op_load_fpr_DT0(DFPREG(rs1));
1558 gen_op_load_fpr_DT1(DFPREG(rs2));
1559 gen_clear_float_exceptions();
1561 tcg_gen_helper_0_0(helper_check_ieee_exceptions);
1562 gen_op_store_DT0_fpr(DFPREG(rd));
1564 case 0x47: /* fsubq */
1565 #if defined(CONFIG_USER_ONLY)
1566 gen_op_load_fpr_QT0(QFPREG(rs1));
1567 gen_op_load_fpr_QT1(QFPREG(rs2));
1568 gen_clear_float_exceptions();
1570 tcg_gen_helper_0_0(helper_check_ieee_exceptions);
1571 gen_op_store_QT0_fpr(QFPREG(rd));
1577 gen_op_load_fpr_FT0(rs1);
1578 gen_op_load_fpr_FT1(rs2);
1579 gen_clear_float_exceptions();
1581 tcg_gen_helper_0_0(helper_check_ieee_exceptions);
1582 gen_op_store_FT0_fpr(rd);
1585 gen_op_load_fpr_DT0(DFPREG(rs1));
1586 gen_op_load_fpr_DT1(DFPREG(rs2));
1587 gen_clear_float_exceptions();
1589 tcg_gen_helper_0_0(helper_check_ieee_exceptions);
1590 gen_op_store_DT0_fpr(DFPREG(rd));
1592 case 0x4b: /* fmulq */
1593 #if defined(CONFIG_USER_ONLY)
1594 gen_op_load_fpr_QT0(QFPREG(rs1));
1595 gen_op_load_fpr_QT1(QFPREG(rs2));
1596 gen_clear_float_exceptions();
1598 tcg_gen_helper_0_0(helper_check_ieee_exceptions);
1599 gen_op_store_QT0_fpr(QFPREG(rd));
1605 gen_op_load_fpr_FT0(rs1);
1606 gen_op_load_fpr_FT1(rs2);
1607 gen_clear_float_exceptions();
1609 tcg_gen_helper_0_0(helper_check_ieee_exceptions);
1610 gen_op_store_FT0_fpr(rd);
1613 gen_op_load_fpr_DT0(DFPREG(rs1));
1614 gen_op_load_fpr_DT1(DFPREG(rs2));
1615 gen_clear_float_exceptions();
1617 tcg_gen_helper_0_0(helper_check_ieee_exceptions);
1618 gen_op_store_DT0_fpr(DFPREG(rd));
1620 case 0x4f: /* fdivq */
1621 #if defined(CONFIG_USER_ONLY)
1622 gen_op_load_fpr_QT0(QFPREG(rs1));
1623 gen_op_load_fpr_QT1(QFPREG(rs2));
1624 gen_clear_float_exceptions();
1626 tcg_gen_helper_0_0(helper_check_ieee_exceptions);
1627 gen_op_store_QT0_fpr(QFPREG(rd));
1633 gen_op_load_fpr_FT0(rs1);
1634 gen_op_load_fpr_FT1(rs2);
1635 gen_clear_float_exceptions();
1637 tcg_gen_helper_0_0(helper_check_ieee_exceptions);
1638 gen_op_store_DT0_fpr(DFPREG(rd));
1640 case 0x6e: /* fdmulq */
1641 #if defined(CONFIG_USER_ONLY)
1642 gen_op_load_fpr_DT0(DFPREG(rs1));
1643 gen_op_load_fpr_DT1(DFPREG(rs2));
1644 gen_clear_float_exceptions();
1646 tcg_gen_helper_0_0(helper_check_ieee_exceptions);
1647 gen_op_store_QT0_fpr(QFPREG(rd));
1653 gen_op_load_fpr_FT1(rs2);
1654 gen_clear_float_exceptions();
1656 tcg_gen_helper_0_0(helper_check_ieee_exceptions);
1657 gen_op_store_FT0_fpr(rd);
1660 gen_op_load_fpr_DT1(DFPREG(rs2));
1661 gen_clear_float_exceptions();
1663 tcg_gen_helper_0_0(helper_check_ieee_exceptions);
1664 gen_op_store_FT0_fpr(rd);
1666 case 0xc7: /* fqtos */
1667 #if defined(CONFIG_USER_ONLY)
1668 gen_op_load_fpr_QT1(QFPREG(rs2));
1669 gen_clear_float_exceptions();
1671 tcg_gen_helper_0_0(helper_check_ieee_exceptions);
1672 gen_op_store_FT0_fpr(rd);
1678 gen_op_load_fpr_FT1(rs2);
1680 gen_op_store_DT0_fpr(DFPREG(rd));
1683 gen_op_load_fpr_FT1(rs2);
1685 gen_op_store_DT0_fpr(DFPREG(rd));
1687 case 0xcb: /* fqtod */
1688 #if defined(CONFIG_USER_ONLY)
1689 gen_op_load_fpr_QT1(QFPREG(rs2));
1690 gen_clear_float_exceptions();
1692 tcg_gen_helper_0_0(helper_check_ieee_exceptions);
1693 gen_op_store_DT0_fpr(DFPREG(rd));
1698 case 0xcc: /* fitoq */
1699 #if defined(CONFIG_USER_ONLY)
1700 gen_op_load_fpr_FT1(rs2);
1702 gen_op_store_QT0_fpr(QFPREG(rd));
1707 case 0xcd: /* fstoq */
1708 #if defined(CONFIG_USER_ONLY)
1709 gen_op_load_fpr_FT1(rs2);
1711 gen_op_store_QT0_fpr(QFPREG(rd));
1716 case 0xce: /* fdtoq */
1717 #if defined(CONFIG_USER_ONLY)
1718 gen_op_load_fpr_DT1(DFPREG(rs2));
1720 gen_op_store_QT0_fpr(QFPREG(rd));
1726 gen_op_load_fpr_FT1(rs2);
1727 gen_clear_float_exceptions();
1729 tcg_gen_helper_0_0(helper_check_ieee_exceptions);
1730 gen_op_store_FT0_fpr(rd);
1733 gen_op_load_fpr_DT1(DFPREG(rs2));
1734 gen_clear_float_exceptions();
1736 tcg_gen_helper_0_0(helper_check_ieee_exceptions);
1737 gen_op_store_FT0_fpr(rd);
1739 case 0xd3: /* fqtoi */
1740 #if defined(CONFIG_USER_ONLY)
1741 gen_op_load_fpr_QT1(QFPREG(rs2));
1742 gen_clear_float_exceptions();
1744 tcg_gen_helper_0_0(helper_check_ieee_exceptions);
1745 gen_op_store_FT0_fpr(rd);
1750 #ifdef TARGET_SPARC64
1751 case 0x2: /* V9 fmovd */
1752 gen_op_load_fpr_DT0(DFPREG(rs2));
1753 gen_op_store_DT0_fpr(DFPREG(rd));
1755 case 0x3: /* V9 fmovq */
1756 #if defined(CONFIG_USER_ONLY)
1757 gen_op_load_fpr_QT0(QFPREG(rs2));
1758 gen_op_store_QT0_fpr(QFPREG(rd));
1763 case 0x6: /* V9 fnegd */
1764 gen_op_load_fpr_DT1(DFPREG(rs2));
1766 gen_op_store_DT0_fpr(DFPREG(rd));
1768 case 0x7: /* V9 fnegq */
1769 #if defined(CONFIG_USER_ONLY)
1770 gen_op_load_fpr_QT1(QFPREG(rs2));
1772 gen_op_store_QT0_fpr(QFPREG(rd));
1777 case 0xa: /* V9 fabsd */
1778 gen_op_load_fpr_DT1(DFPREG(rs2));
1779 tcg_gen_helper_0_0(helper_fabsd);
1780 gen_op_store_DT0_fpr(DFPREG(rd));
1782 case 0xb: /* V9 fabsq */
1783 #if defined(CONFIG_USER_ONLY)
1784 gen_op_load_fpr_QT1(QFPREG(rs2));
1785 tcg_gen_helper_0_0(helper_fabsq);
1786 gen_op_store_QT0_fpr(QFPREG(rd));
1791 case 0x81: /* V9 fstox */
1792 gen_op_load_fpr_FT1(rs2);
1793 gen_clear_float_exceptions();
1795 tcg_gen_helper_0_0(helper_check_ieee_exceptions);
1796 gen_op_store_DT0_fpr(DFPREG(rd));
1798 case 0x82: /* V9 fdtox */
1799 gen_op_load_fpr_DT1(DFPREG(rs2));
1800 gen_clear_float_exceptions();
1802 tcg_gen_helper_0_0(helper_check_ieee_exceptions);
1803 gen_op_store_DT0_fpr(DFPREG(rd));
1805 case 0x83: /* V9 fqtox */
1806 #if defined(CONFIG_USER_ONLY)
1807 gen_op_load_fpr_QT1(QFPREG(rs2));
1808 gen_clear_float_exceptions();
1810 tcg_gen_helper_0_0(helper_check_ieee_exceptions);
1811 gen_op_store_DT0_fpr(DFPREG(rd));
1816 case 0x84: /* V9 fxtos */
1817 gen_op_load_fpr_DT1(DFPREG(rs2));
1818 gen_clear_float_exceptions();
1820 tcg_gen_helper_0_0(helper_check_ieee_exceptions);
1821 gen_op_store_FT0_fpr(rd);
1823 case 0x88: /* V9 fxtod */
1824 gen_op_load_fpr_DT1(DFPREG(rs2));
1825 gen_clear_float_exceptions();
1827 tcg_gen_helper_0_0(helper_check_ieee_exceptions);
1828 gen_op_store_DT0_fpr(DFPREG(rd));
1830 case 0x8c: /* V9 fxtoq */
1831 #if defined(CONFIG_USER_ONLY)
1832 gen_op_load_fpr_DT1(DFPREG(rs2));
1833 gen_clear_float_exceptions();
1835 tcg_gen_helper_0_0(helper_check_ieee_exceptions);
1836 gen_op_store_QT0_fpr(QFPREG(rd));
1845 } else if (xop == 0x35) { /* FPU Operations */
1846 #ifdef TARGET_SPARC64
1849 if (gen_trap_ifnofpu(dc))
1851 gen_op_clear_ieee_excp_and_FTT();
1852 rs1 = GET_FIELD(insn, 13, 17);
1853 rs2 = GET_FIELD(insn, 27, 31);
1854 xop = GET_FIELD(insn, 18, 26);
1855 #ifdef TARGET_SPARC64
1856 if ((xop & 0x11f) == 0x005) { // V9 fmovsr
1860 l1 = gen_new_label();
1861 r_zero = tcg_temp_new(TCG_TYPE_TL);
1862 cond = GET_FIELD_SP(insn, 14, 17);
1863 rs1 = GET_FIELD(insn, 13, 17);
1864 gen_movl_reg_T0(rs1);
1865 tcg_gen_movi_tl(r_zero, 0);
1866 tcg_gen_brcond_tl(gen_tcg_cond_reg[cond], cpu_T[0], r_zero, l1);
1867 gen_op_load_fpr_FT1(rs2);
1868 gen_op_store_FT0_fpr(rd);
1871 } else if ((xop & 0x11f) == 0x006) { // V9 fmovdr
1875 l1 = gen_new_label();
1876 r_zero = tcg_temp_new(TCG_TYPE_TL);
1877 cond = GET_FIELD_SP(insn, 14, 17);
1878 rs1 = GET_FIELD(insn, 13, 17);
1879 gen_movl_reg_T0(rs1);
1880 tcg_gen_movi_tl(r_zero, 0);
1881 tcg_gen_brcond_tl(gen_tcg_cond_reg[cond], cpu_T[0], r_zero, l1);
1882 gen_op_load_fpr_DT1(DFPREG(rs2));
1883 gen_op_store_DT0_fpr(DFPREG(rd));
1886 } else if ((xop & 0x11f) == 0x007) { // V9 fmovqr
1887 #if defined(CONFIG_USER_ONLY)
1891 l1 = gen_new_label();
1892 r_zero = tcg_temp_new(TCG_TYPE_TL);
1893 cond = GET_FIELD_SP(insn, 14, 17);
1894 rs1 = GET_FIELD(insn, 13, 17);
1895 gen_movl_reg_T0(rs1);
1896 tcg_gen_movi_tl(r_zero, 0);
1897 tcg_gen_brcond_tl(gen_tcg_cond_reg[cond], cpu_T[0], r_zero, l1);
1898 gen_op_load_fpr_QT1(QFPREG(rs2));
1899 gen_op_store_QT0_fpr(QFPREG(rd));
1908 #ifdef TARGET_SPARC64
1909 case 0x001: /* V9 fmovscc %fcc0 */
1910 cond = GET_FIELD_SP(insn, 14, 17);
1911 gen_op_load_fpr_FT0(rd);
1912 gen_op_load_fpr_FT1(rs2);
1914 gen_fcond[0][cond]();
1916 gen_op_store_FT0_fpr(rd);
1918 case 0x002: /* V9 fmovdcc %fcc0 */
1919 cond = GET_FIELD_SP(insn, 14, 17);
1920 gen_op_load_fpr_DT0(DFPREG(rd));
1921 gen_op_load_fpr_DT1(DFPREG(rs2));
1923 gen_fcond[0][cond]();
1925 gen_op_store_DT0_fpr(DFPREG(rd));
1927 case 0x003: /* V9 fmovqcc %fcc0 */
1928 #if defined(CONFIG_USER_ONLY)
1929 cond = GET_FIELD_SP(insn, 14, 17);
1930 gen_op_load_fpr_QT0(QFPREG(rd));
1931 gen_op_load_fpr_QT1(QFPREG(rs2));
1933 gen_fcond[0][cond]();
1935 gen_op_store_QT0_fpr(QFPREG(rd));
1940 case 0x041: /* V9 fmovscc %fcc1 */
1941 cond = GET_FIELD_SP(insn, 14, 17);
1942 gen_op_load_fpr_FT0(rd);
1943 gen_op_load_fpr_FT1(rs2);
1945 gen_fcond[1][cond]();
1947 gen_op_store_FT0_fpr(rd);
1949 case 0x042: /* V9 fmovdcc %fcc1 */
1950 cond = GET_FIELD_SP(insn, 14, 17);
1951 gen_op_load_fpr_DT0(DFPREG(rd));
1952 gen_op_load_fpr_DT1(DFPREG(rs2));
1954 gen_fcond[1][cond]();
1956 gen_op_store_DT0_fpr(DFPREG(rd));
1958 case 0x043: /* V9 fmovqcc %fcc1 */
1959 #if defined(CONFIG_USER_ONLY)
1960 cond = GET_FIELD_SP(insn, 14, 17);
1961 gen_op_load_fpr_QT0(QFPREG(rd));
1962 gen_op_load_fpr_QT1(QFPREG(rs2));
1964 gen_fcond[1][cond]();
1966 gen_op_store_QT0_fpr(QFPREG(rd));
1971 case 0x081: /* V9 fmovscc %fcc2 */
1972 cond = GET_FIELD_SP(insn, 14, 17);
1973 gen_op_load_fpr_FT0(rd);
1974 gen_op_load_fpr_FT1(rs2);
1976 gen_fcond[2][cond]();
1978 gen_op_store_FT0_fpr(rd);
1980 case 0x082: /* V9 fmovdcc %fcc2 */
1981 cond = GET_FIELD_SP(insn, 14, 17);
1982 gen_op_load_fpr_DT0(DFPREG(rd));
1983 gen_op_load_fpr_DT1(DFPREG(rs2));
1985 gen_fcond[2][cond]();
1987 gen_op_store_DT0_fpr(DFPREG(rd));
1989 case 0x083: /* V9 fmovqcc %fcc2 */
1990 #if defined(CONFIG_USER_ONLY)
1991 cond = GET_FIELD_SP(insn, 14, 17);
1992 gen_op_load_fpr_QT0(rd);
1993 gen_op_load_fpr_QT1(rs2);
1995 gen_fcond[2][cond]();
1997 gen_op_store_QT0_fpr(rd);
2002 case 0x0c1: /* V9 fmovscc %fcc3 */
2003 cond = GET_FIELD_SP(insn, 14, 17);
2004 gen_op_load_fpr_FT0(rd);
2005 gen_op_load_fpr_FT1(rs2);
2007 gen_fcond[3][cond]();
2009 gen_op_store_FT0_fpr(rd);
2011 case 0x0c2: /* V9 fmovdcc %fcc3 */
2012 cond = GET_FIELD_SP(insn, 14, 17);
2013 gen_op_load_fpr_DT0(DFPREG(rd));
2014 gen_op_load_fpr_DT1(DFPREG(rs2));
2016 gen_fcond[3][cond]();
2018 gen_op_store_DT0_fpr(DFPREG(rd));
2020 case 0x0c3: /* V9 fmovqcc %fcc3 */
2021 #if defined(CONFIG_USER_ONLY)
2022 cond = GET_FIELD_SP(insn, 14, 17);
2023 gen_op_load_fpr_QT0(QFPREG(rd));
2024 gen_op_load_fpr_QT1(QFPREG(rs2));
2026 gen_fcond[3][cond]();
2028 gen_op_store_QT0_fpr(QFPREG(rd));
2033 case 0x101: /* V9 fmovscc %icc */
2034 cond = GET_FIELD_SP(insn, 14, 17);
2035 gen_op_load_fpr_FT0(rd);
2036 gen_op_load_fpr_FT1(rs2);
2038 gen_cond[0][cond]();
2040 gen_op_store_FT0_fpr(rd);
2042 case 0x102: /* V9 fmovdcc %icc */
2043 cond = GET_FIELD_SP(insn, 14, 17);
2044 gen_op_load_fpr_DT0(DFPREG(rd));
2045 gen_op_load_fpr_DT1(DFPREG(rs2));
2047 gen_cond[0][cond]();
2049 gen_op_store_DT0_fpr(DFPREG(rd));
2051 case 0x103: /* V9 fmovqcc %icc */
2052 #if defined(CONFIG_USER_ONLY)
2053 cond = GET_FIELD_SP(insn, 14, 17);
2054 gen_op_load_fpr_QT0(rd);
2055 gen_op_load_fpr_QT1(rs2);
2057 gen_cond[0][cond]();
2059 gen_op_store_QT0_fpr(rd);
2064 case 0x181: /* V9 fmovscc %xcc */
2065 cond = GET_FIELD_SP(insn, 14, 17);
2066 gen_op_load_fpr_FT0(rd);
2067 gen_op_load_fpr_FT1(rs2);
2069 gen_cond[1][cond]();
2071 gen_op_store_FT0_fpr(rd);
2073 case 0x182: /* V9 fmovdcc %xcc */
2074 cond = GET_FIELD_SP(insn, 14, 17);
2075 gen_op_load_fpr_DT0(DFPREG(rd));
2076 gen_op_load_fpr_DT1(DFPREG(rs2));
2078 gen_cond[1][cond]();
2080 gen_op_store_DT0_fpr(DFPREG(rd));
2082 case 0x183: /* V9 fmovqcc %xcc */
2083 #if defined(CONFIG_USER_ONLY)
2084 cond = GET_FIELD_SP(insn, 14, 17);
2085 gen_op_load_fpr_QT0(rd);
2086 gen_op_load_fpr_QT1(rs2);
2088 gen_cond[1][cond]();
2090 gen_op_store_QT0_fpr(rd);
2096 case 0x51: /* fcmps, V9 %fcc */
2097 gen_op_load_fpr_FT0(rs1);
2098 gen_op_load_fpr_FT1(rs2);
2099 gen_op_fcmps(rd & 3);
2101 case 0x52: /* fcmpd, V9 %fcc */
2102 gen_op_load_fpr_DT0(DFPREG(rs1));
2103 gen_op_load_fpr_DT1(DFPREG(rs2));
2104 gen_op_fcmpd(rd & 3);
2106 case 0x53: /* fcmpq, V9 %fcc */
2107 #if defined(CONFIG_USER_ONLY)
2108 gen_op_load_fpr_QT0(QFPREG(rs1));
2109 gen_op_load_fpr_QT1(QFPREG(rs2));
2110 gen_op_fcmpq(rd & 3);
2112 #else /* !defined(CONFIG_USER_ONLY) */
2115 case 0x55: /* fcmpes, V9 %fcc */
2116 gen_op_load_fpr_FT0(rs1);
2117 gen_op_load_fpr_FT1(rs2);
2118 gen_op_fcmpes(rd & 3);
2120 case 0x56: /* fcmped, V9 %fcc */
2121 gen_op_load_fpr_DT0(DFPREG(rs1));
2122 gen_op_load_fpr_DT1(DFPREG(rs2));
2123 gen_op_fcmped(rd & 3);
2125 case 0x57: /* fcmpeq, V9 %fcc */
2126 #if defined(CONFIG_USER_ONLY)
2127 gen_op_load_fpr_QT0(QFPREG(rs1));
2128 gen_op_load_fpr_QT1(QFPREG(rs2));
2129 gen_op_fcmpeq(rd & 3);
2131 #else/* !defined(CONFIG_USER_ONLY) */
2138 } else if (xop == 0x2) {
2141 rs1 = GET_FIELD(insn, 13, 17);
2143 // or %g0, x, y -> mov T0, x; mov y, T0
2144 if (IS_IMM) { /* immediate */
2145 rs2 = GET_FIELDs(insn, 19, 31);
2146 tcg_gen_movi_tl(cpu_T[0], (int)rs2);
2147 } else { /* register */
2148 rs2 = GET_FIELD(insn, 27, 31);
2149 gen_movl_reg_T0(rs2);
2152 gen_movl_reg_T0(rs1);
2153 if (IS_IMM) { /* immediate */
2154 rs2 = GET_FIELDs(insn, 19, 31);
2155 tcg_gen_ori_tl(cpu_T[0], cpu_T[0], (int)rs2);
2156 } else { /* register */
2157 // or x, %g0, y -> mov T1, x; mov y, T1
2158 rs2 = GET_FIELD(insn, 27, 31);
2160 gen_movl_reg_T1(rs2);
2165 gen_movl_T0_reg(rd);
2167 #ifdef TARGET_SPARC64
2168 } else if (xop == 0x25) { /* sll, V9 sllx */
2169 rs1 = GET_FIELD(insn, 13, 17);
2170 gen_movl_reg_T0(rs1);
2171 if (IS_IMM) { /* immediate */
2172 rs2 = GET_FIELDs(insn, 20, 31);
2173 if (insn & (1 << 12)) {
2174 tcg_gen_shli_i64(cpu_T[0], cpu_T[0], rs2 & 0x3f);
2176 tcg_gen_andi_i64(cpu_T[0], cpu_T[0], 0xffffffffULL);
2177 tcg_gen_shli_i64(cpu_T[0], cpu_T[0], rs2 & 0x1f);
2179 } else { /* register */
2180 rs2 = GET_FIELD(insn, 27, 31);
2181 gen_movl_reg_T1(rs2);
2182 if (insn & (1 << 12)) {
2183 tcg_gen_andi_i64(cpu_T[1], cpu_T[1], 0x3f);
2184 tcg_gen_shl_i64(cpu_T[0], cpu_T[0], cpu_T[1]);
2186 tcg_gen_andi_i64(cpu_T[1], cpu_T[1], 0x1f);
2187 tcg_gen_andi_i64(cpu_T[0], cpu_T[0], 0xffffffffULL);
2188 tcg_gen_shl_i64(cpu_T[0], cpu_T[0], cpu_T[1]);
2191 gen_movl_T0_reg(rd);
2192 } else if (xop == 0x26) { /* srl, V9 srlx */
2193 rs1 = GET_FIELD(insn, 13, 17);
2194 gen_movl_reg_T0(rs1);
2195 if (IS_IMM) { /* immediate */
2196 rs2 = GET_FIELDs(insn, 20, 31);
2197 if (insn & (1 << 12)) {
2198 tcg_gen_shri_i64(cpu_T[0], cpu_T[0], rs2 & 0x3f);
2200 tcg_gen_andi_i64(cpu_T[0], cpu_T[0], 0xffffffffULL);
2201 tcg_gen_shri_i64(cpu_T[0], cpu_T[0], rs2 & 0x1f);
2203 } else { /* register */
2204 rs2 = GET_FIELD(insn, 27, 31);
2205 gen_movl_reg_T1(rs2);
2206 if (insn & (1 << 12)) {
2207 tcg_gen_andi_i64(cpu_T[1], cpu_T[1], 0x3f);
2208 tcg_gen_shr_i64(cpu_T[0], cpu_T[0], cpu_T[1]);
2210 tcg_gen_andi_i64(cpu_T[1], cpu_T[1], 0x1f);
2211 tcg_gen_andi_i64(cpu_T[0], cpu_T[0], 0xffffffffULL);
2212 tcg_gen_shr_i64(cpu_T[0], cpu_T[0], cpu_T[1]);
2215 gen_movl_T0_reg(rd);
2216 } else if (xop == 0x27) { /* sra, V9 srax */
2217 rs1 = GET_FIELD(insn, 13, 17);
2218 gen_movl_reg_T0(rs1);
2219 if (IS_IMM) { /* immediate */
2220 rs2 = GET_FIELDs(insn, 20, 31);
2221 if (insn & (1 << 12)) {
2222 tcg_gen_sari_i64(cpu_T[0], cpu_T[0], rs2 & 0x3f);
2224 tcg_gen_andi_i64(cpu_T[0], cpu_T[0], 0xffffffffULL);
2225 tcg_gen_ext_i32_i64(cpu_T[0], cpu_T[0]);
2226 tcg_gen_sari_i64(cpu_T[0], cpu_T[0], rs2 & 0x1f);
2228 } else { /* register */
2229 rs2 = GET_FIELD(insn, 27, 31);
2230 gen_movl_reg_T1(rs2);
2231 if (insn & (1 << 12)) {
2232 tcg_gen_andi_i64(cpu_T[1], cpu_T[1], 0x3f);
2233 tcg_gen_sar_i64(cpu_T[0], cpu_T[0], cpu_T[1]);
2235 tcg_gen_andi_i64(cpu_T[1], cpu_T[1], 0x1f);
2236 tcg_gen_andi_i64(cpu_T[0], cpu_T[0], 0xffffffffULL);
2237 tcg_gen_sar_i64(cpu_T[0], cpu_T[0], cpu_T[1]);
2240 gen_movl_T0_reg(rd);
2242 } else if (xop < 0x36) {
2243 rs1 = GET_FIELD(insn, 13, 17);
2244 gen_movl_reg_T0(rs1);
2245 if (IS_IMM) { /* immediate */
2246 rs2 = GET_FIELDs(insn, 19, 31);
2247 gen_movl_simm_T1(rs2);
2248 } else { /* register */
2249 rs2 = GET_FIELD(insn, 27, 31);
2250 gen_movl_reg_T1(rs2);
2253 switch (xop & ~0x10) {
2256 gen_op_add_T1_T0_cc();
2261 tcg_gen_and_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
2263 gen_op_logic_T0_cc();
2266 tcg_gen_or_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
2268 gen_op_logic_T0_cc();
2271 tcg_gen_xor_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
2273 gen_op_logic_T0_cc();
2277 gen_op_sub_T1_T0_cc();
2279 tcg_gen_sub_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
2282 gen_op_andn_T1_T0();
2284 gen_op_logic_T0_cc();
2289 gen_op_logic_T0_cc();
2292 gen_op_xnor_T1_T0();
2294 gen_op_logic_T0_cc();
2298 gen_op_addx_T1_T0_cc();
2300 gen_mov_reg_C(cpu_tmp0);
2301 tcg_gen_add_tl(cpu_T[1], cpu_T[1], cpu_tmp0);
2302 tcg_gen_add_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
2305 #ifdef TARGET_SPARC64
2306 case 0x9: /* V9 mulx */
2307 tcg_gen_mul_i64(cpu_T[0], cpu_T[0], cpu_T[1]);
2311 gen_op_umul_T1_T0();
2313 gen_op_logic_T0_cc();
2316 gen_op_smul_T1_T0();
2318 gen_op_logic_T0_cc();
2322 gen_op_subx_T1_T0_cc();
2324 gen_mov_reg_C(cpu_tmp0);
2325 tcg_gen_add_tl(cpu_T[1], cpu_T[1], cpu_tmp0);
2326 tcg_gen_sub_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
2329 #ifdef TARGET_SPARC64
2330 case 0xd: /* V9 udivx */
2331 gen_op_udivx_T1_T0();
2335 gen_op_udiv_T1_T0();
2340 gen_op_sdiv_T1_T0();
2347 gen_movl_T0_reg(rd);
2350 case 0x20: /* taddcc */
2351 gen_op_tadd_T1_T0_cc();
2352 gen_movl_T0_reg(rd);
2354 case 0x21: /* tsubcc */
2355 gen_op_tsub_T1_T0_cc();
2356 gen_movl_T0_reg(rd);
2358 case 0x22: /* taddcctv */
2360 gen_op_tadd_T1_T0_ccTV();
2361 gen_movl_T0_reg(rd);
2363 case 0x23: /* tsubcctv */
2365 gen_op_tsub_T1_T0_ccTV();
2366 gen_movl_T0_reg(rd);
2368 case 0x24: /* mulscc */
2369 gen_op_mulscc_T1_T0();
2370 gen_movl_T0_reg(rd);
2372 #ifndef TARGET_SPARC64
2373 case 0x25: /* sll */
2374 tcg_gen_andi_i32(cpu_T[1], cpu_T[1], 0x1f);
2375 tcg_gen_shl_i32(cpu_T[0], cpu_T[0], cpu_T[1]);
2376 gen_movl_T0_reg(rd);
2378 case 0x26: /* srl */
2379 tcg_gen_andi_i32(cpu_T[1], cpu_T[1], 0x1f);
2380 tcg_gen_shr_i32(cpu_T[0], cpu_T[0], cpu_T[1]);
2381 gen_movl_T0_reg(rd);
2383 case 0x27: /* sra */
2384 tcg_gen_andi_i32(cpu_T[1], cpu_T[1], 0x1f);
2385 tcg_gen_sar_i32(cpu_T[0], cpu_T[0], cpu_T[1]);
2386 gen_movl_T0_reg(rd);
2394 gen_op_movtl_env_T0(offsetof(CPUSPARCState, y));
2396 #ifndef TARGET_SPARC64
2397 case 0x01 ... 0x0f: /* undefined in the
2401 case 0x10 ... 0x1f: /* implementation-dependent
2407 case 0x2: /* V9 wrccr */
2411 case 0x3: /* V9 wrasi */
2413 gen_op_movl_env_T0(offsetof(CPUSPARCState, asi));
2415 case 0x6: /* V9 wrfprs */
2417 gen_op_movl_env_T0(offsetof(CPUSPARCState, fprs));
2423 case 0xf: /* V9 sir, nop if user */
2424 #if !defined(CONFIG_USER_ONLY)
2429 case 0x13: /* Graphics Status */
2430 if (gen_trap_ifnofpu(dc))
2433 gen_op_movtl_env_T0(offsetof(CPUSPARCState, gsr));
2435 case 0x17: /* Tick compare */
2436 #if !defined(CONFIG_USER_ONLY)
2437 if (!supervisor(dc))
2444 gen_op_movtl_env_T0(offsetof(CPUSPARCState,
2446 r_tickptr = tcg_temp_new(TCG_TYPE_PTR);
2447 tcg_gen_ld_ptr(r_tickptr, cpu_env,
2448 offsetof(CPUState, tick));
2449 tcg_gen_helper_0_2(helper_tick_set_limit,
2450 r_tickptr, cpu_T[0]);
2453 case 0x18: /* System tick */
2454 #if !defined(CONFIG_USER_ONLY)
2455 if (!supervisor(dc))
2462 r_tickptr = tcg_temp_new(TCG_TYPE_PTR);
2463 tcg_gen_ld_ptr(r_tickptr, cpu_env,
2464 offsetof(CPUState, stick));
2465 tcg_gen_helper_0_2(helper_tick_set_count,
2466 r_tickptr, cpu_T[0]);
2469 case 0x19: /* System tick compare */
2470 #if !defined(CONFIG_USER_ONLY)
2471 if (!supervisor(dc))
2478 gen_op_movtl_env_T0(offsetof(CPUSPARCState,
2480 r_tickptr = tcg_temp_new(TCG_TYPE_PTR);
2481 tcg_gen_ld_ptr(r_tickptr, cpu_env,
2482 offsetof(CPUState, stick));
2483 tcg_gen_helper_0_2(helper_tick_set_limit,
2484 r_tickptr, cpu_T[0]);
2488 case 0x10: /* Performance Control */
2489 case 0x11: /* Performance Instrumentation Counter */
2490 case 0x12: /* Dispatch Control */
2491 case 0x14: /* Softint set */
2492 case 0x15: /* Softint clear */
2493 case 0x16: /* Softint write */
2500 #if !defined(CONFIG_USER_ONLY)
2501 case 0x31: /* wrpsr, V9 saved, restored */
2503 if (!supervisor(dc))
2505 #ifdef TARGET_SPARC64
2513 case 2: /* UA2005 allclean */
2514 case 3: /* UA2005 otherw */
2515 case 4: /* UA2005 normalw */
2516 case 5: /* UA2005 invalw */
2523 tcg_gen_helper_0_1(helper_wrpsr, cpu_T[0]);
2531 case 0x32: /* wrwim, V9 wrpr */
2533 if (!supervisor(dc))
2536 #ifdef TARGET_SPARC64
2554 r_tickptr = tcg_temp_new(TCG_TYPE_PTR);
2555 tcg_gen_ld_ptr(r_tickptr, cpu_env,
2556 offsetof(CPUState, tick));
2557 tcg_gen_helper_0_2(helper_tick_set_count,
2558 r_tickptr, cpu_T[0]);
2562 gen_op_movtl_env_T0(offsetof(CPUSPARCState, tbr));
2566 tcg_gen_helper_0_1(helper_wrpstate, cpu_T[0]);
2572 gen_op_movl_env_T0(offsetof(CPUSPARCState, tl));
2575 gen_op_movl_env_T0(offsetof(CPUSPARCState, psrpil));
2581 gen_op_movl_env_T0(offsetof(CPUSPARCState, cansave));
2583 case 11: // canrestore
2584 gen_op_movl_env_T0(offsetof(CPUSPARCState, canrestore));
2586 case 12: // cleanwin
2587 gen_op_movl_env_T0(offsetof(CPUSPARCState, cleanwin));
2589 case 13: // otherwin
2590 gen_op_movl_env_T0(offsetof(CPUSPARCState, otherwin));
2593 gen_op_movl_env_T0(offsetof(CPUSPARCState, wstate));
2595 case 16: // UA2005 gl
2596 gen_op_movl_env_T0(offsetof(CPUSPARCState, gl));
2598 case 26: // UA2005 strand status
2599 if (!hypervisor(dc))
2601 gen_op_movl_env_T0(offsetof(CPUSPARCState, ssr));
2607 tcg_gen_andi_i32(cpu_T[0], cpu_T[0], ((1 << NWINDOWS) - 1));
2608 gen_op_movl_env_T0(offsetof(CPUSPARCState, wim));
2612 case 0x33: /* wrtbr, UA2005 wrhpr */
2614 #ifndef TARGET_SPARC64
2615 if (!supervisor(dc))
2618 gen_op_movtl_env_T0(offsetof(CPUSPARCState, tbr));
2620 if (!hypervisor(dc))
2625 // XXX gen_op_wrhpstate();
2632 // XXX gen_op_wrhtstate();
2635 gen_op_movl_env_T0(offsetof(CPUSPARCState, hintp));
2638 gen_op_movl_env_T0(offsetof(CPUSPARCState, htba));
2640 case 31: // hstick_cmpr
2644 gen_op_movtl_env_T0(offsetof(CPUSPARCState,
2646 r_tickptr = tcg_temp_new(TCG_TYPE_PTR);
2647 tcg_gen_ld_ptr(r_tickptr, cpu_env,
2648 offsetof(CPUState, hstick));
2649 tcg_gen_helper_0_2(helper_tick_set_limit,
2650 r_tickptr, cpu_T[0]);
2653 case 6: // hver readonly
2661 #ifdef TARGET_SPARC64
2662 case 0x2c: /* V9 movcc */
2664 int cc = GET_FIELD_SP(insn, 11, 12);
2665 int cond = GET_FIELD_SP(insn, 14, 17);
2670 if (insn & (1 << 18)) {
2672 gen_cond[0][cond]();
2674 gen_cond[1][cond]();
2678 gen_fcond[cc][cond]();
2681 l1 = gen_new_label();
2683 r_zero = tcg_temp_new(TCG_TYPE_TL);
2684 tcg_gen_movi_tl(r_zero, 0);
2685 tcg_gen_brcond_tl(TCG_COND_EQ, cpu_T[2], r_zero, l1);
2686 if (IS_IMM) { /* immediate */
2687 rs2 = GET_FIELD_SPs(insn, 0, 10);
2688 gen_movl_simm_T1(rs2);
2690 rs2 = GET_FIELD_SP(insn, 0, 4);
2691 gen_movl_reg_T1(rs2);
2693 gen_movl_T1_reg(rd);
2697 case 0x2d: /* V9 sdivx */
2698 gen_op_sdivx_T1_T0();
2699 gen_movl_T0_reg(rd);
2701 case 0x2e: /* V9 popc */
2703 if (IS_IMM) { /* immediate */
2704 rs2 = GET_FIELD_SPs(insn, 0, 12);
2705 gen_movl_simm_T1(rs2);
2706 // XXX optimize: popc(constant)
2709 rs2 = GET_FIELD_SP(insn, 0, 4);
2710 gen_movl_reg_T1(rs2);
2712 tcg_gen_helper_1_1(helper_popc, cpu_T[0],
2714 gen_movl_T0_reg(rd);
2716 case 0x2f: /* V9 movr */
2718 int cond = GET_FIELD_SP(insn, 10, 12);
2722 rs1 = GET_FIELD(insn, 13, 17);
2723 gen_movl_reg_T0(rs1);
2725 l1 = gen_new_label();
2727 r_zero = tcg_temp_new(TCG_TYPE_TL);
2728 tcg_gen_movi_tl(r_zero, 0);
2729 tcg_gen_brcond_tl(gen_tcg_cond_reg[cond], cpu_T[0], r_zero, l1);
2730 if (IS_IMM) { /* immediate */
2731 rs2 = GET_FIELD_SPs(insn, 0, 9);
2732 gen_movl_simm_T1(rs2);
2734 rs2 = GET_FIELD_SP(insn, 0, 4);
2735 gen_movl_reg_T1(rs2);
2737 gen_movl_T1_reg(rd);
2746 } else if (xop == 0x36) { /* UltraSparc shutdown, VIS, V8 CPop1 */
2747 #ifdef TARGET_SPARC64
2748 int opf = GET_FIELD_SP(insn, 5, 13);
2749 rs1 = GET_FIELD(insn, 13, 17);
2750 rs2 = GET_FIELD(insn, 27, 31);
2751 if (gen_trap_ifnofpu(dc))
2755 case 0x000: /* VIS I edge8cc */
2756 case 0x001: /* VIS II edge8n */
2757 case 0x002: /* VIS I edge8lcc */
2758 case 0x003: /* VIS II edge8ln */
2759 case 0x004: /* VIS I edge16cc */
2760 case 0x005: /* VIS II edge16n */
2761 case 0x006: /* VIS I edge16lcc */
2762 case 0x007: /* VIS II edge16ln */
2763 case 0x008: /* VIS I edge32cc */
2764 case 0x009: /* VIS II edge32n */
2765 case 0x00a: /* VIS I edge32lcc */
2766 case 0x00b: /* VIS II edge32ln */
2769 case 0x010: /* VIS I array8 */
2770 gen_movl_reg_T0(rs1);
2771 gen_movl_reg_T1(rs2);
2773 gen_movl_T0_reg(rd);
2775 case 0x012: /* VIS I array16 */
2776 gen_movl_reg_T0(rs1);
2777 gen_movl_reg_T1(rs2);
2779 gen_movl_T0_reg(rd);
2781 case 0x014: /* VIS I array32 */
2782 gen_movl_reg_T0(rs1);
2783 gen_movl_reg_T1(rs2);
2785 gen_movl_T0_reg(rd);
2787 case 0x018: /* VIS I alignaddr */
2788 gen_movl_reg_T0(rs1);
2789 gen_movl_reg_T1(rs2);
2791 gen_movl_T0_reg(rd);
2793 case 0x019: /* VIS II bmask */
2794 case 0x01a: /* VIS I alignaddrl */
2797 case 0x020: /* VIS I fcmple16 */
2798 gen_op_load_fpr_DT0(DFPREG(rs1));
2799 gen_op_load_fpr_DT1(DFPREG(rs2));
2801 gen_op_store_DT0_fpr(DFPREG(rd));
2803 case 0x022: /* VIS I fcmpne16 */
2804 gen_op_load_fpr_DT0(DFPREG(rs1));
2805 gen_op_load_fpr_DT1(DFPREG(rs2));
2807 gen_op_store_DT0_fpr(DFPREG(rd));
2809 case 0x024: /* VIS I fcmple32 */
2810 gen_op_load_fpr_DT0(DFPREG(rs1));
2811 gen_op_load_fpr_DT1(DFPREG(rs2));
2813 gen_op_store_DT0_fpr(DFPREG(rd));
2815 case 0x026: /* VIS I fcmpne32 */
2816 gen_op_load_fpr_DT0(DFPREG(rs1));
2817 gen_op_load_fpr_DT1(DFPREG(rs2));
2819 gen_op_store_DT0_fpr(DFPREG(rd));
2821 case 0x028: /* VIS I fcmpgt16 */
2822 gen_op_load_fpr_DT0(DFPREG(rs1));
2823 gen_op_load_fpr_DT1(DFPREG(rs2));
2825 gen_op_store_DT0_fpr(DFPREG(rd));
2827 case 0x02a: /* VIS I fcmpeq16 */
2828 gen_op_load_fpr_DT0(DFPREG(rs1));
2829 gen_op_load_fpr_DT1(DFPREG(rs2));
2831 gen_op_store_DT0_fpr(DFPREG(rd));
2833 case 0x02c: /* VIS I fcmpgt32 */
2834 gen_op_load_fpr_DT0(DFPREG(rs1));
2835 gen_op_load_fpr_DT1(DFPREG(rs2));
2837 gen_op_store_DT0_fpr(DFPREG(rd));
2839 case 0x02e: /* VIS I fcmpeq32 */
2840 gen_op_load_fpr_DT0(DFPREG(rs1));
2841 gen_op_load_fpr_DT1(DFPREG(rs2));
2843 gen_op_store_DT0_fpr(DFPREG(rd));
2845 case 0x031: /* VIS I fmul8x16 */
2846 gen_op_load_fpr_DT0(DFPREG(rs1));
2847 gen_op_load_fpr_DT1(DFPREG(rs2));
2849 gen_op_store_DT0_fpr(DFPREG(rd));
2851 case 0x033: /* VIS I fmul8x16au */
2852 gen_op_load_fpr_DT0(DFPREG(rs1));
2853 gen_op_load_fpr_DT1(DFPREG(rs2));
2854 gen_op_fmul8x16au();
2855 gen_op_store_DT0_fpr(DFPREG(rd));
2857 case 0x035: /* VIS I fmul8x16al */
2858 gen_op_load_fpr_DT0(DFPREG(rs1));
2859 gen_op_load_fpr_DT1(DFPREG(rs2));
2860 gen_op_fmul8x16al();
2861 gen_op_store_DT0_fpr(DFPREG(rd));
2863 case 0x036: /* VIS I fmul8sux16 */
2864 gen_op_load_fpr_DT0(DFPREG(rs1));
2865 gen_op_load_fpr_DT1(DFPREG(rs2));
2866 gen_op_fmul8sux16();
2867 gen_op_store_DT0_fpr(DFPREG(rd));
2869 case 0x037: /* VIS I fmul8ulx16 */
2870 gen_op_load_fpr_DT0(DFPREG(rs1));
2871 gen_op_load_fpr_DT1(DFPREG(rs2));
2872 gen_op_fmul8ulx16();
2873 gen_op_store_DT0_fpr(DFPREG(rd));
2875 case 0x038: /* VIS I fmuld8sux16 */
2876 gen_op_load_fpr_DT0(DFPREG(rs1));
2877 gen_op_load_fpr_DT1(DFPREG(rs2));
2878 gen_op_fmuld8sux16();
2879 gen_op_store_DT0_fpr(DFPREG(rd));
2881 case 0x039: /* VIS I fmuld8ulx16 */
2882 gen_op_load_fpr_DT0(DFPREG(rs1));
2883 gen_op_load_fpr_DT1(DFPREG(rs2));
2884 gen_op_fmuld8ulx16();
2885 gen_op_store_DT0_fpr(DFPREG(rd));
2887 case 0x03a: /* VIS I fpack32 */
2888 case 0x03b: /* VIS I fpack16 */
2889 case 0x03d: /* VIS I fpackfix */
2890 case 0x03e: /* VIS I pdist */
2893 case 0x048: /* VIS I faligndata */
2894 gen_op_load_fpr_DT0(DFPREG(rs1));
2895 gen_op_load_fpr_DT1(DFPREG(rs2));
2896 gen_op_faligndata();
2897 gen_op_store_DT0_fpr(DFPREG(rd));
2899 case 0x04b: /* VIS I fpmerge */
2900 gen_op_load_fpr_DT0(DFPREG(rs1));
2901 gen_op_load_fpr_DT1(DFPREG(rs2));
2903 gen_op_store_DT0_fpr(DFPREG(rd));
2905 case 0x04c: /* VIS II bshuffle */
2908 case 0x04d: /* VIS I fexpand */
2909 gen_op_load_fpr_DT0(DFPREG(rs1));
2910 gen_op_load_fpr_DT1(DFPREG(rs2));
2912 gen_op_store_DT0_fpr(DFPREG(rd));
2914 case 0x050: /* VIS I fpadd16 */
2915 gen_op_load_fpr_DT0(DFPREG(rs1));
2916 gen_op_load_fpr_DT1(DFPREG(rs2));
2918 gen_op_store_DT0_fpr(DFPREG(rd));
2920 case 0x051: /* VIS I fpadd16s */
2921 gen_op_load_fpr_FT0(rs1);
2922 gen_op_load_fpr_FT1(rs2);
2924 gen_op_store_FT0_fpr(rd);
2926 case 0x052: /* VIS I fpadd32 */
2927 gen_op_load_fpr_DT0(DFPREG(rs1));
2928 gen_op_load_fpr_DT1(DFPREG(rs2));
2930 gen_op_store_DT0_fpr(DFPREG(rd));
2932 case 0x053: /* VIS I fpadd32s */
2933 gen_op_load_fpr_FT0(rs1);
2934 gen_op_load_fpr_FT1(rs2);
2936 gen_op_store_FT0_fpr(rd);
2938 case 0x054: /* VIS I fpsub16 */
2939 gen_op_load_fpr_DT0(DFPREG(rs1));
2940 gen_op_load_fpr_DT1(DFPREG(rs2));
2942 gen_op_store_DT0_fpr(DFPREG(rd));
2944 case 0x055: /* VIS I fpsub16s */
2945 gen_op_load_fpr_FT0(rs1);
2946 gen_op_load_fpr_FT1(rs2);
2948 gen_op_store_FT0_fpr(rd);
2950 case 0x056: /* VIS I fpsub32 */
2951 gen_op_load_fpr_DT0(DFPREG(rs1));
2952 gen_op_load_fpr_DT1(DFPREG(rs2));
2954 gen_op_store_DT0_fpr(DFPREG(rd));
2956 case 0x057: /* VIS I fpsub32s */
2957 gen_op_load_fpr_FT0(rs1);
2958 gen_op_load_fpr_FT1(rs2);
2960 gen_op_store_FT0_fpr(rd);
2962 case 0x060: /* VIS I fzero */
2963 gen_op_movl_DT0_0();
2964 gen_op_store_DT0_fpr(DFPREG(rd));
2966 case 0x061: /* VIS I fzeros */
2967 gen_op_movl_FT0_0();
2968 gen_op_store_FT0_fpr(rd);
2970 case 0x062: /* VIS I fnor */
2971 gen_op_load_fpr_DT0(DFPREG(rs1));
2972 gen_op_load_fpr_DT1(DFPREG(rs2));
2974 gen_op_store_DT0_fpr(DFPREG(rd));
2976 case 0x063: /* VIS I fnors */
2977 gen_op_load_fpr_FT0(rs1);
2978 gen_op_load_fpr_FT1(rs2);
2980 gen_op_store_FT0_fpr(rd);
2982 case 0x064: /* VIS I fandnot2 */
2983 gen_op_load_fpr_DT1(DFPREG(rs1));
2984 gen_op_load_fpr_DT0(DFPREG(rs2));
2986 gen_op_store_DT0_fpr(DFPREG(rd));
2988 case 0x065: /* VIS I fandnot2s */
2989 gen_op_load_fpr_FT1(rs1);
2990 gen_op_load_fpr_FT0(rs2);
2992 gen_op_store_FT0_fpr(rd);
2994 case 0x066: /* VIS I fnot2 */
2995 gen_op_load_fpr_DT1(DFPREG(rs2));
2997 gen_op_store_DT0_fpr(DFPREG(rd));
2999 case 0x067: /* VIS I fnot2s */
3000 gen_op_load_fpr_FT1(rs2);
3002 gen_op_store_FT0_fpr(rd);
3004 case 0x068: /* VIS I fandnot1 */
3005 gen_op_load_fpr_DT0(DFPREG(rs1));
3006 gen_op_load_fpr_DT1(DFPREG(rs2));
3008 gen_op_store_DT0_fpr(DFPREG(rd));
3010 case 0x069: /* VIS I fandnot1s */
3011 gen_op_load_fpr_FT0(rs1);
3012 gen_op_load_fpr_FT1(rs2);
3014 gen_op_store_FT0_fpr(rd);
3016 case 0x06a: /* VIS I fnot1 */
3017 gen_op_load_fpr_DT1(DFPREG(rs1));
3019 gen_op_store_DT0_fpr(DFPREG(rd));
3021 case 0x06b: /* VIS I fnot1s */
3022 gen_op_load_fpr_FT1(rs1);
3024 gen_op_store_FT0_fpr(rd);
3026 case 0x06c: /* VIS I fxor */
3027 gen_op_load_fpr_DT0(DFPREG(rs1));
3028 gen_op_load_fpr_DT1(DFPREG(rs2));
3030 gen_op_store_DT0_fpr(DFPREG(rd));
3032 case 0x06d: /* VIS I fxors */
3033 gen_op_load_fpr_FT0(rs1);
3034 gen_op_load_fpr_FT1(rs2);
3036 gen_op_store_FT0_fpr(rd);
3038 case 0x06e: /* VIS I fnand */
3039 gen_op_load_fpr_DT0(DFPREG(rs1));
3040 gen_op_load_fpr_DT1(DFPREG(rs2));
3042 gen_op_store_DT0_fpr(DFPREG(rd));
3044 case 0x06f: /* VIS I fnands */
3045 gen_op_load_fpr_FT0(rs1);
3046 gen_op_load_fpr_FT1(rs2);
3048 gen_op_store_FT0_fpr(rd);
3050 case 0x070: /* VIS I fand */
3051 gen_op_load_fpr_DT0(DFPREG(rs1));
3052 gen_op_load_fpr_DT1(DFPREG(rs2));
3054 gen_op_store_DT0_fpr(DFPREG(rd));
3056 case 0x071: /* VIS I fands */
3057 gen_op_load_fpr_FT0(rs1);
3058 gen_op_load_fpr_FT1(rs2);
3060 gen_op_store_FT0_fpr(rd);
3062 case 0x072: /* VIS I fxnor */
3063 gen_op_load_fpr_DT0(DFPREG(rs1));
3064 gen_op_load_fpr_DT1(DFPREG(rs2));
3066 gen_op_store_DT0_fpr(DFPREG(rd));
3068 case 0x073: /* VIS I fxnors */
3069 gen_op_load_fpr_FT0(rs1);
3070 gen_op_load_fpr_FT1(rs2);
3072 gen_op_store_FT0_fpr(rd);
3074 case 0x074: /* VIS I fsrc1 */
3075 gen_op_load_fpr_DT0(DFPREG(rs1));
3076 gen_op_store_DT0_fpr(DFPREG(rd));
3078 case 0x075: /* VIS I fsrc1s */
3079 gen_op_load_fpr_FT0(rs1);
3080 gen_op_store_FT0_fpr(rd);
3082 case 0x076: /* VIS I fornot2 */
3083 gen_op_load_fpr_DT1(DFPREG(rs1));
3084 gen_op_load_fpr_DT0(DFPREG(rs2));
3086 gen_op_store_DT0_fpr(DFPREG(rd));
3088 case 0x077: /* VIS I fornot2s */
3089 gen_op_load_fpr_FT1(rs1);
3090 gen_op_load_fpr_FT0(rs2);
3092 gen_op_store_FT0_fpr(rd);
3094 case 0x078: /* VIS I fsrc2 */
3095 gen_op_load_fpr_DT0(DFPREG(rs2));
3096 gen_op_store_DT0_fpr(DFPREG(rd));
3098 case 0x079: /* VIS I fsrc2s */
3099 gen_op_load_fpr_FT0(rs2);
3100 gen_op_store_FT0_fpr(rd);
3102 case 0x07a: /* VIS I fornot1 */
3103 gen_op_load_fpr_DT0(DFPREG(rs1));
3104 gen_op_load_fpr_DT1(DFPREG(rs2));
3106 gen_op_store_DT0_fpr(DFPREG(rd));
3108 case 0x07b: /* VIS I fornot1s */
3109 gen_op_load_fpr_FT0(rs1);
3110 gen_op_load_fpr_FT1(rs2);
3112 gen_op_store_FT0_fpr(rd);
3114 case 0x07c: /* VIS I for */
3115 gen_op_load_fpr_DT0(DFPREG(rs1));
3116 gen_op_load_fpr_DT1(DFPREG(rs2));
3118 gen_op_store_DT0_fpr(DFPREG(rd));
3120 case 0x07d: /* VIS I fors */
3121 gen_op_load_fpr_FT0(rs1);
3122 gen_op_load_fpr_FT1(rs2);
3124 gen_op_store_FT0_fpr(rd);
3126 case 0x07e: /* VIS I fone */
3127 gen_op_movl_DT0_1();
3128 gen_op_store_DT0_fpr(DFPREG(rd));
3130 case 0x07f: /* VIS I fones */
3131 gen_op_movl_FT0_1();
3132 gen_op_store_FT0_fpr(rd);
3134 case 0x080: /* VIS I shutdown */
3135 case 0x081: /* VIS II siam */
3144 } else if (xop == 0x37) { /* V8 CPop2, V9 impdep2 */
3145 #ifdef TARGET_SPARC64
3150 #ifdef TARGET_SPARC64
3151 } else if (xop == 0x39) { /* V9 return */
3152 rs1 = GET_FIELD(insn, 13, 17);
3154 gen_movl_reg_T0(rs1);
3155 if (IS_IMM) { /* immediate */
3156 rs2 = GET_FIELDs(insn, 19, 31);
3157 tcg_gen_addi_tl(cpu_T[0], cpu_T[0], (int)rs2);
3158 } else { /* register */
3159 rs2 = GET_FIELD(insn, 27, 31);
3163 gen_movl_reg_T1(rs2);
3171 gen_op_check_align_T0_3();
3172 tcg_gen_st_tl(cpu_T[0], cpu_env, offsetof(CPUSPARCState, npc));
3173 dc->npc = DYNAMIC_PC;
3177 rs1 = GET_FIELD(insn, 13, 17);
3178 gen_movl_reg_T0(rs1);
3179 if (IS_IMM) { /* immediate */
3180 rs2 = GET_FIELDs(insn, 19, 31);
3181 tcg_gen_addi_tl(cpu_T[0], cpu_T[0], (int)rs2);
3182 } else { /* register */
3183 rs2 = GET_FIELD(insn, 27, 31);
3187 gen_movl_reg_T1(rs2);
3194 case 0x38: /* jmpl */
3197 tcg_gen_movi_tl(cpu_T[1], dc->pc);
3198 gen_movl_T1_reg(rd);
3201 gen_op_check_align_T0_3();
3202 tcg_gen_st_tl(cpu_T[0], cpu_env, offsetof(CPUSPARCState, npc));
3203 dc->npc = DYNAMIC_PC;
3206 #if !defined(CONFIG_USER_ONLY) && !defined(TARGET_SPARC64)
3207 case 0x39: /* rett, V9 return */
3209 if (!supervisor(dc))
3212 gen_op_check_align_T0_3();
3213 tcg_gen_st_tl(cpu_T[0], cpu_env, offsetof(CPUSPARCState, npc));
3214 dc->npc = DYNAMIC_PC;
3215 tcg_gen_helper_0_0(helper_rett);
3219 case 0x3b: /* flush */
3220 tcg_gen_helper_0_1(helper_flush, cpu_T[0]);
3222 case 0x3c: /* save */
3225 gen_movl_T0_reg(rd);
3227 case 0x3d: /* restore */
3230 gen_movl_T0_reg(rd);
3232 #if !defined(CONFIG_USER_ONLY) && defined(TARGET_SPARC64)
3233 case 0x3e: /* V9 done/retry */
3237 if (!supervisor(dc))
3239 dc->npc = DYNAMIC_PC;
3240 dc->pc = DYNAMIC_PC;
3241 tcg_gen_helper_0_0(helper_done);
3244 if (!supervisor(dc))
3246 dc->npc = DYNAMIC_PC;
3247 dc->pc = DYNAMIC_PC;
3248 tcg_gen_helper_0_0(helper_retry);
3263 case 3: /* load/store instructions */
3265 unsigned int xop = GET_FIELD(insn, 7, 12);
3266 rs1 = GET_FIELD(insn, 13, 17);
3268 gen_movl_reg_T0(rs1);
3269 if (xop == 0x3c || xop == 0x3e)
3271 rs2 = GET_FIELD(insn, 27, 31);
3272 gen_movl_reg_T1(rs2);
3274 else if (IS_IMM) { /* immediate */
3275 rs2 = GET_FIELDs(insn, 19, 31);
3276 tcg_gen_addi_tl(cpu_T[0], cpu_T[0], (int)rs2);
3277 } else { /* register */
3278 rs2 = GET_FIELD(insn, 27, 31);
3282 gen_movl_reg_T1(rs2);
3288 if (xop < 4 || (xop > 7 && xop < 0x14 && xop != 0x0e) ||
3289 (xop > 0x17 && xop <= 0x1d ) ||
3290 (xop > 0x2c && xop <= 0x33) || xop == 0x1f || xop == 0x3d) {
3292 case 0x0: /* load unsigned word */
3293 gen_op_check_align_T0_3();
3294 ABI32_MASK(cpu_T[0]);
3295 tcg_gen_qemu_ld32u(cpu_T[1], cpu_T[0], dc->mem_idx);
3297 case 0x1: /* load unsigned byte */
3298 ABI32_MASK(cpu_T[0]);
3299 tcg_gen_qemu_ld8u(cpu_T[1], cpu_T[0], dc->mem_idx);
3301 case 0x2: /* load unsigned halfword */
3302 gen_op_check_align_T0_1();
3303 ABI32_MASK(cpu_T[0]);
3304 tcg_gen_qemu_ld16u(cpu_T[1], cpu_T[0], dc->mem_idx);
3306 case 0x3: /* load double word */
3312 r_dword = tcg_temp_new(TCG_TYPE_I64);
3313 gen_op_check_align_T0_7();
3314 ABI32_MASK(cpu_T[0]);
3315 tcg_gen_qemu_ld64(r_dword, cpu_T[0], dc->mem_idx);
3316 tcg_gen_trunc_i64_i32(cpu_T[0], r_dword);
3317 gen_movl_T0_reg(rd + 1);
3318 tcg_gen_shri_i64(r_dword, r_dword, 32);
3319 tcg_gen_trunc_i64_i32(cpu_T[1], r_dword);
3322 case 0x9: /* load signed byte */
3323 ABI32_MASK(cpu_T[0]);
3324 tcg_gen_qemu_ld8s(cpu_T[1], cpu_T[0], dc->mem_idx);
3326 case 0xa: /* load signed halfword */
3327 gen_op_check_align_T0_1();
3328 ABI32_MASK(cpu_T[0]);
3329 tcg_gen_qemu_ld16s(cpu_T[1], cpu_T[0], dc->mem_idx);
3331 case 0xd: /* ldstub -- XXX: should be atomically */
3332 tcg_gen_movi_i32(cpu_tmp0, 0xff);
3333 ABI32_MASK(cpu_T[0]);
3334 tcg_gen_qemu_ld8s(cpu_T[1], cpu_T[0], dc->mem_idx);
3335 tcg_gen_qemu_st8(cpu_tmp0, cpu_T[0], dc->mem_idx);
3337 case 0x0f: /* swap register with memory. Also atomically */
3338 gen_op_check_align_T0_3();
3339 gen_movl_reg_T1(rd);
3340 ABI32_MASK(cpu_T[0]);
3341 tcg_gen_qemu_ld32u(cpu_tmp0, cpu_T[0], dc->mem_idx);
3342 tcg_gen_qemu_st32(cpu_T[1], cpu_T[0], dc->mem_idx);
3343 tcg_gen_mov_i32(cpu_T[1], cpu_tmp0);
3345 #if !defined(CONFIG_USER_ONLY) || defined(TARGET_SPARC64)
3346 case 0x10: /* load word alternate */
3347 #ifndef TARGET_SPARC64
3350 if (!supervisor(dc))
3353 gen_op_check_align_T0_3();
3354 gen_ld_asi(insn, 4, 0);
3356 case 0x11: /* load unsigned byte alternate */
3357 #ifndef TARGET_SPARC64
3360 if (!supervisor(dc))
3363 gen_ld_asi(insn, 1, 0);
3365 case 0x12: /* load unsigned halfword alternate */
3366 #ifndef TARGET_SPARC64
3369 if (!supervisor(dc))
3372 gen_op_check_align_T0_1();
3373 gen_ld_asi(insn, 2, 0);
3375 case 0x13: /* load double word alternate */
3376 #ifndef TARGET_SPARC64
3379 if (!supervisor(dc))
3384 gen_op_check_align_T0_7();
3386 gen_movl_T0_reg(rd + 1);
3388 case 0x19: /* load signed byte alternate */
3389 #ifndef TARGET_SPARC64
3392 if (!supervisor(dc))
3395 gen_ld_asi(insn, 1, 1);
3397 case 0x1a: /* load signed halfword alternate */
3398 #ifndef TARGET_SPARC64
3401 if (!supervisor(dc))
3404 gen_op_check_align_T0_1();
3405 gen_ld_asi(insn, 2, 1);
3407 case 0x1d: /* ldstuba -- XXX: should be atomically */
3408 #ifndef TARGET_SPARC64
3411 if (!supervisor(dc))
3414 gen_ldstub_asi(insn);
3416 case 0x1f: /* swap reg with alt. memory. Also atomically */
3417 #ifndef TARGET_SPARC64
3420 if (!supervisor(dc))
3423 gen_op_check_align_T0_3();
3424 gen_movl_reg_T1(rd);
3428 #ifndef TARGET_SPARC64
3429 case 0x30: /* ldc */
3430 case 0x31: /* ldcsr */
3431 case 0x33: /* lddc */
3435 #ifdef TARGET_SPARC64
3436 case 0x08: /* V9 ldsw */
3437 gen_op_check_align_T0_3();
3438 ABI32_MASK(cpu_T[0]);
3439 tcg_gen_qemu_ld32s(cpu_T[1], cpu_T[0], dc->mem_idx);
3441 case 0x0b: /* V9 ldx */
3442 gen_op_check_align_T0_7();
3443 ABI32_MASK(cpu_T[0]);
3444 tcg_gen_qemu_ld64(cpu_T[1], cpu_T[0], dc->mem_idx);
3446 case 0x18: /* V9 ldswa */
3447 gen_op_check_align_T0_3();
3448 gen_ld_asi(insn, 4, 1);
3450 case 0x1b: /* V9 ldxa */
3451 gen_op_check_align_T0_7();
3452 gen_ld_asi(insn, 8, 0);
3454 case 0x2d: /* V9 prefetch, no effect */
3456 case 0x30: /* V9 ldfa */
3457 gen_op_check_align_T0_3();
3458 gen_ldf_asi(insn, 4, rd);
3460 case 0x33: /* V9 lddfa */
3461 gen_op_check_align_T0_3();
3462 gen_ldf_asi(insn, 8, DFPREG(rd));
3464 case 0x3d: /* V9 prefetcha, no effect */
3466 case 0x32: /* V9 ldqfa */
3467 #if defined(CONFIG_USER_ONLY)
3468 gen_op_check_align_T0_3();
3469 gen_ldf_asi(insn, 16, QFPREG(rd));
3478 gen_movl_T1_reg(rd);
3479 #ifdef TARGET_SPARC64
3482 } else if (xop >= 0x20 && xop < 0x24) {
3483 if (gen_trap_ifnofpu(dc))
3486 case 0x20: /* load fpreg */
3487 gen_op_check_align_T0_3();
3489 gen_op_store_FT0_fpr(rd);
3491 case 0x21: /* load fsr */
3492 gen_op_check_align_T0_3();
3495 tcg_gen_helper_0_0(helper_ldfsr);
3497 case 0x22: /* load quad fpreg */
3498 #if defined(CONFIG_USER_ONLY)
3499 gen_op_check_align_T0_7();
3501 gen_op_store_QT0_fpr(QFPREG(rd));
3506 case 0x23: /* load double fpreg */
3507 gen_op_check_align_T0_7();
3509 gen_op_store_DT0_fpr(DFPREG(rd));
3514 } else if (xop < 8 || (xop >= 0x14 && xop < 0x18) || \
3515 xop == 0xe || xop == 0x1e) {
3516 gen_movl_reg_T1(rd);
3518 case 0x4: /* store word */
3519 gen_op_check_align_T0_3();
3520 ABI32_MASK(cpu_T[0]);
3521 tcg_gen_qemu_st32(cpu_T[1], cpu_T[0], dc->mem_idx);
3523 case 0x5: /* store byte */
3524 ABI32_MASK(cpu_T[0]);
3525 tcg_gen_qemu_st8(cpu_T[1], cpu_T[0], dc->mem_idx);
3527 case 0x6: /* store halfword */
3528 gen_op_check_align_T0_1();
3529 ABI32_MASK(cpu_T[0]);
3530 tcg_gen_qemu_st16(cpu_T[1], cpu_T[0], dc->mem_idx);
3532 case 0x7: /* store double word */
3537 TCGv r_dword, r_low;
3539 gen_op_check_align_T0_7();
3540 r_dword = tcg_temp_new(TCG_TYPE_I64);
3541 r_low = tcg_temp_new(TCG_TYPE_I32);
3542 gen_movl_reg_TN(rd + 1, r_low);
3543 tcg_gen_helper_1_2(helper_pack64, r_dword, cpu_T[1],
3545 tcg_gen_qemu_st64(r_dword, cpu_T[0], dc->mem_idx);
3547 #else /* __i386__ */
3548 gen_op_check_align_T0_7();
3550 gen_movl_reg_T2(rd + 1);
3552 #endif /* __i386__ */
3554 #if !defined(CONFIG_USER_ONLY) || defined(TARGET_SPARC64)
3555 case 0x14: /* store word alternate */
3556 #ifndef TARGET_SPARC64
3559 if (!supervisor(dc))
3562 gen_op_check_align_T0_3();
3563 gen_st_asi(insn, 4);
3565 case 0x15: /* store byte alternate */
3566 #ifndef TARGET_SPARC64
3569 if (!supervisor(dc))
3572 gen_st_asi(insn, 1);
3574 case 0x16: /* store halfword alternate */
3575 #ifndef TARGET_SPARC64
3578 if (!supervisor(dc))
3581 gen_op_check_align_T0_1();
3582 gen_st_asi(insn, 2);
3584 case 0x17: /* store double word alternate */
3585 #ifndef TARGET_SPARC64
3588 if (!supervisor(dc))
3595 TCGv r_dword, r_temp, r_size;
3597 gen_op_check_align_T0_7();
3598 r_dword = tcg_temp_new(TCG_TYPE_I64);
3599 r_temp = tcg_temp_new(TCG_TYPE_I32);
3600 r_size = tcg_temp_new(TCG_TYPE_I32);
3601 gen_movl_reg_TN(rd + 1, r_temp);
3602 tcg_gen_helper_1_2(helper_pack64, r_dword, cpu_T[1],
3604 #ifdef TARGET_SPARC64
3608 offset = GET_FIELD(insn, 25, 31);
3609 tcg_gen_addi_tl(cpu_T[0], cpu_T[0], offset);
3610 tcg_gen_ld_i32(r_dword, cpu_env, offsetof(CPUSPARCState, asi));
3613 asi = GET_FIELD(insn, 19, 26);
3614 tcg_gen_movi_i32(r_temp, asi);
3615 #ifdef TARGET_SPARC64
3618 tcg_gen_movi_i32(r_size, 8);
3619 tcg_gen_helper_0_4(helper_st_asi, cpu_T[0], r_dword, r_temp, r_size);
3623 #ifdef TARGET_SPARC64
3624 case 0x0e: /* V9 stx */
3625 gen_op_check_align_T0_7();
3626 ABI32_MASK(cpu_T[0]);
3627 tcg_gen_qemu_st64(cpu_T[1], cpu_T[0], dc->mem_idx);
3629 case 0x1e: /* V9 stxa */
3630 gen_op_check_align_T0_7();
3631 gen_st_asi(insn, 8);
3637 } else if (xop > 0x23 && xop < 0x28) {
3638 if (gen_trap_ifnofpu(dc))
3642 gen_op_check_align_T0_3();
3643 gen_op_load_fpr_FT0(rd);
3646 case 0x25: /* stfsr, V9 stxfsr */
3647 #ifdef CONFIG_USER_ONLY
3648 gen_op_check_align_T0_3();
3654 #ifdef TARGET_SPARC64
3655 #if defined(CONFIG_USER_ONLY)
3656 /* V9 stqf, store quad fpreg */
3657 gen_op_check_align_T0_7();
3658 gen_op_load_fpr_QT0(QFPREG(rd));
3664 #else /* !TARGET_SPARC64 */
3665 /* stdfq, store floating point queue */
3666 #if defined(CONFIG_USER_ONLY)
3669 if (!supervisor(dc))
3671 if (gen_trap_ifnofpu(dc))
3677 gen_op_check_align_T0_7();
3678 gen_op_load_fpr_DT0(DFPREG(rd));
3684 } else if (xop > 0x33 && xop < 0x3f) {
3686 #ifdef TARGET_SPARC64
3687 case 0x34: /* V9 stfa */
3688 gen_op_check_align_T0_3();
3689 gen_op_load_fpr_FT0(rd);
3690 gen_stf_asi(insn, 4, rd);
3692 case 0x36: /* V9 stqfa */
3693 #if defined(CONFIG_USER_ONLY)
3694 gen_op_check_align_T0_7();
3695 gen_op_load_fpr_QT0(QFPREG(rd));
3696 gen_stf_asi(insn, 16, QFPREG(rd));
3701 case 0x37: /* V9 stdfa */
3702 gen_op_check_align_T0_3();
3703 gen_op_load_fpr_DT0(DFPREG(rd));
3704 gen_stf_asi(insn, 8, DFPREG(rd));
3706 case 0x3c: /* V9 casa */
3707 gen_op_check_align_T0_3();
3708 gen_cas_asi(insn, rd);
3709 gen_movl_T1_reg(rd);
3711 case 0x3e: /* V9 casxa */
3712 gen_op_check_align_T0_7();
3713 gen_casx_asi(insn, rd);
3714 gen_movl_T1_reg(rd);
3717 case 0x34: /* stc */
3718 case 0x35: /* stcsr */
3719 case 0x36: /* stdcq */
3720 case 0x37: /* stdc */
3732 /* default case for non jump instructions */
3733 if (dc->npc == DYNAMIC_PC) {
3734 dc->pc = DYNAMIC_PC;
3736 } else if (dc->npc == JUMP_PC) {
3737 /* we can do a static jump */
3738 gen_branch2(dc, dc->jump_pc[0], dc->jump_pc[1]);
3742 dc->npc = dc->npc + 4;
3748 gen_op_exception(TT_ILL_INSN);
3751 #if !defined(CONFIG_USER_ONLY)
3754 gen_op_exception(TT_PRIV_INSN);
3759 gen_op_fpexception_im(FSR_FTT_UNIMPFPOP);
3762 #ifndef TARGET_SPARC64
3765 gen_op_fpexception_im(FSR_FTT_SEQ_ERROR);
3770 #ifndef TARGET_SPARC64
3773 gen_op_exception(TT_NCP_INSN);
3779 static void tcg_macro_func(TCGContext *s, int macro_id, const int *dead_args)
3783 static inline int gen_intermediate_code_internal(TranslationBlock * tb,
3784 int spc, CPUSPARCState *env)
3786 target_ulong pc_start, last_pc;
3787 uint16_t *gen_opc_end;
3788 DisasContext dc1, *dc = &dc1;
3791 memset(dc, 0, sizeof(DisasContext));
3796 dc->npc = (target_ulong) tb->cs_base;
3797 dc->mem_idx = cpu_mmu_index(env);
3798 dc->fpu_enabled = cpu_fpu_enabled(env);
3799 gen_opc_end = gen_opc_buf + OPC_MAX_SIZE;
3801 cpu_tmp0 = tcg_temp_new(TCG_TYPE_TL);
3802 cpu_regwptr = tcg_temp_new(TCG_TYPE_PTR); // XXX
3805 if (env->nb_breakpoints > 0) {
3806 for(j = 0; j < env->nb_breakpoints; j++) {
3807 if (env->breakpoints[j] == dc->pc) {
3808 if (dc->pc != pc_start)
3810 tcg_gen_helper_0_0(helper_debug);
3819 fprintf(logfile, "Search PC...\n");
3820 j = gen_opc_ptr - gen_opc_buf;
3824 gen_opc_instr_start[lj++] = 0;
3825 gen_opc_pc[lj] = dc->pc;
3826 gen_opc_npc[lj] = dc->npc;
3827 gen_opc_instr_start[lj] = 1;
3831 disas_sparc_insn(dc);
3835 /* if the next PC is different, we abort now */
3836 if (dc->pc != (last_pc + 4))
3838 /* if we reach a page boundary, we stop generation so that the
3839 PC of a TT_TFAULT exception is always in the right page */
3840 if ((dc->pc & (TARGET_PAGE_SIZE - 1)) == 0)
3842 /* if single step mode, we generate only one instruction and
3843 generate an exception */
3844 if (env->singlestep_enabled) {
3849 } while ((gen_opc_ptr < gen_opc_end) &&
3850 (dc->pc - pc_start) < (TARGET_PAGE_SIZE - 32));
3854 if (dc->pc != DYNAMIC_PC &&
3855 (dc->npc != DYNAMIC_PC && dc->npc != JUMP_PC)) {
3856 /* static PC and NPC: we can use direct chaining */
3857 gen_branch(dc, dc->pc, dc->npc);
3859 if (dc->pc != DYNAMIC_PC)
3865 *gen_opc_ptr = INDEX_op_end;
3867 j = gen_opc_ptr - gen_opc_buf;
3870 gen_opc_instr_start[lj++] = 0;
3876 gen_opc_jump_pc[0] = dc->jump_pc[0];
3877 gen_opc_jump_pc[1] = dc->jump_pc[1];
3879 tb->size = last_pc + 4 - pc_start;
3882 if (loglevel & CPU_LOG_TB_IN_ASM) {
3883 fprintf(logfile, "--------------\n");
3884 fprintf(logfile, "IN: %s\n", lookup_symbol(pc_start));
3885 target_disas(logfile, pc_start, last_pc + 4 - pc_start, 0);
3886 fprintf(logfile, "\n");
3892 int gen_intermediate_code(CPUSPARCState * env, TranslationBlock * tb)
3894 return gen_intermediate_code_internal(tb, 0, env);
3897 int gen_intermediate_code_pc(CPUSPARCState * env, TranslationBlock * tb)
3899 return gen_intermediate_code_internal(tb, 1, env);
3902 void cpu_reset(CPUSPARCState *env)
3907 env->regwptr = env->regbase + (env->cwp * 16);
3908 #if defined(CONFIG_USER_ONLY)
3909 env->user_mode_only = 1;
3910 #ifdef TARGET_SPARC64
3911 env->cleanwin = NWINDOWS - 2;
3912 env->cansave = NWINDOWS - 2;
3913 env->pstate = PS_RMO | PS_PEF | PS_IE;
3914 env->asi = 0x82; // Primary no-fault
3920 #ifdef TARGET_SPARC64
3921 env->pstate = PS_PRIV;
3922 env->hpstate = HS_PRIV;
3923 env->pc = 0x1fff0000000ULL;
3926 env->mmuregs[0] &= ~(MMU_E | MMU_NF);
3927 env->mmuregs[0] |= env->mmu_bm;
3929 env->npc = env->pc + 4;
3933 CPUSPARCState *cpu_sparc_init(const char *cpu_model)
3936 const sparc_def_t *def;
3939 def = cpu_sparc_find_by_name(cpu_model);
3943 env = qemu_mallocz(sizeof(CPUSPARCState));
3947 env->cpu_model_str = cpu_model;
3948 env->version = def->iu_version;
3949 env->fsr = def->fpu_version;
3950 #if !defined(TARGET_SPARC64)
3951 env->mmu_bm = def->mmu_bm;
3952 env->mmu_ctpr_mask = def->mmu_ctpr_mask;
3953 env->mmu_cxr_mask = def->mmu_cxr_mask;
3954 env->mmu_sfsr_mask = def->mmu_sfsr_mask;
3955 env->mmu_trcr_mask = def->mmu_trcr_mask;
3956 env->mmuregs[0] |= def->mmu_version;
3957 cpu_sparc_set_id(env, 0);
3960 /* init various static tables */
3964 tcg_set_macro_func(&tcg_ctx, tcg_macro_func);
3965 cpu_env = tcg_global_reg_new(TCG_TYPE_PTR, TCG_AREG0, "env");
3966 //#if TARGET_LONG_BITS > HOST_LONG_BITS
3967 #ifdef TARGET_SPARC64
3968 cpu_T[0] = tcg_global_mem_new(TCG_TYPE_TL,
3969 TCG_AREG0, offsetof(CPUState, t0), "T0");
3970 cpu_T[1] = tcg_global_mem_new(TCG_TYPE_TL,
3971 TCG_AREG0, offsetof(CPUState, t1), "T1");
3972 cpu_T[2] = tcg_global_mem_new(TCG_TYPE_TL,
3973 TCG_AREG0, offsetof(CPUState, t2), "T2");
3975 cpu_T[0] = tcg_global_reg_new(TCG_TYPE_TL, TCG_AREG1, "T0");
3976 cpu_T[1] = tcg_global_reg_new(TCG_TYPE_TL, TCG_AREG2, "T1");
3977 cpu_T[2] = tcg_global_reg_new(TCG_TYPE_TL, TCG_AREG3, "T2");
3986 void cpu_sparc_set_id(CPUSPARCState *env, unsigned int cpu)
3988 #if !defined(TARGET_SPARC64)
3989 env->mxccregs[7] = ((cpu + 8) & 0xf) << 24;
3993 static const sparc_def_t sparc_defs[] = {
3994 #ifdef TARGET_SPARC64
3996 .name = "Fujitsu Sparc64",
3997 .iu_version = ((0x04ULL << 48) | (0x02ULL << 32) | (0ULL << 24)
3998 | (MAXTL << 8) | (NWINDOWS - 1)),
3999 .fpu_version = 0x00000000,
4003 .name = "Fujitsu Sparc64 III",
4004 .iu_version = ((0x04ULL << 48) | (0x03ULL << 32) | (0ULL << 24)
4005 | (MAXTL << 8) | (NWINDOWS - 1)),
4006 .fpu_version = 0x00000000,
4010 .name = "Fujitsu Sparc64 IV",
4011 .iu_version = ((0x04ULL << 48) | (0x04ULL << 32) | (0ULL << 24)
4012 | (MAXTL << 8) | (NWINDOWS - 1)),
4013 .fpu_version = 0x00000000,
4017 .name = "Fujitsu Sparc64 V",
4018 .iu_version = ((0x04ULL << 48) | (0x05ULL << 32) | (0x51ULL << 24)
4019 | (MAXTL << 8) | (NWINDOWS - 1)),
4020 .fpu_version = 0x00000000,
4024 .name = "TI UltraSparc I",
4025 .iu_version = ((0x17ULL << 48) | (0x10ULL << 32) | (0x40ULL << 24)
4026 | (MAXTL << 8) | (NWINDOWS - 1)),
4027 .fpu_version = 0x00000000,
4031 .name = "TI UltraSparc II",
4032 .iu_version = ((0x17ULL << 48) | (0x11ULL << 32) | (0x20ULL << 24)
4033 | (MAXTL << 8) | (NWINDOWS - 1)),
4034 .fpu_version = 0x00000000,
4038 .name = "TI UltraSparc IIi",
4039 .iu_version = ((0x17ULL << 48) | (0x12ULL << 32) | (0x91ULL << 24)
4040 | (MAXTL << 8) | (NWINDOWS - 1)),
4041 .fpu_version = 0x00000000,
4045 .name = "TI UltraSparc IIe",
4046 .iu_version = ((0x17ULL << 48) | (0x13ULL << 32) | (0x14ULL << 24)
4047 | (MAXTL << 8) | (NWINDOWS - 1)),
4048 .fpu_version = 0x00000000,
4052 .name = "Sun UltraSparc III",
4053 .iu_version = ((0x3eULL << 48) | (0x14ULL << 32) | (0x34ULL << 24)
4054 | (MAXTL << 8) | (NWINDOWS - 1)),
4055 .fpu_version = 0x00000000,
4059 .name = "Sun UltraSparc III Cu",
4060 .iu_version = ((0x3eULL << 48) | (0x15ULL << 32) | (0x41ULL << 24)
4061 | (MAXTL << 8) | (NWINDOWS - 1)),
4062 .fpu_version = 0x00000000,
4066 .name = "Sun UltraSparc IIIi",
4067 .iu_version = ((0x3eULL << 48) | (0x16ULL << 32) | (0x34ULL << 24)
4068 | (MAXTL << 8) | (NWINDOWS - 1)),
4069 .fpu_version = 0x00000000,
4073 .name = "Sun UltraSparc IV",
4074 .iu_version = ((0x3eULL << 48) | (0x18ULL << 32) | (0x31ULL << 24)
4075 | (MAXTL << 8) | (NWINDOWS - 1)),
4076 .fpu_version = 0x00000000,
4080 .name = "Sun UltraSparc IV+",
4081 .iu_version = ((0x3eULL << 48) | (0x19ULL << 32) | (0x22ULL << 24)
4082 | (MAXTL << 8) | (NWINDOWS - 1)),
4083 .fpu_version = 0x00000000,
4087 .name = "Sun UltraSparc IIIi+",
4088 .iu_version = ((0x3eULL << 48) | (0x22ULL << 32) | (0ULL << 24)
4089 | (MAXTL << 8) | (NWINDOWS - 1)),
4090 .fpu_version = 0x00000000,
4094 .name = "NEC UltraSparc I",
4095 .iu_version = ((0x22ULL << 48) | (0x10ULL << 32) | (0x40ULL << 24)
4096 | (MAXTL << 8) | (NWINDOWS - 1)),
4097 .fpu_version = 0x00000000,
4102 .name = "Fujitsu MB86900",
4103 .iu_version = 0x00 << 24, /* Impl 0, ver 0 */
4104 .fpu_version = 4 << 17, /* FPU version 4 (Meiko) */
4105 .mmu_version = 0x00 << 24, /* Impl 0, ver 0 */
4106 .mmu_bm = 0x00004000,
4107 .mmu_ctpr_mask = 0x007ffff0,
4108 .mmu_cxr_mask = 0x0000003f,
4109 .mmu_sfsr_mask = 0xffffffff,
4110 .mmu_trcr_mask = 0xffffffff,
4113 .name = "Fujitsu MB86904",
4114 .iu_version = 0x04 << 24, /* Impl 0, ver 4 */
4115 .fpu_version = 4 << 17, /* FPU version 4 (Meiko) */
4116 .mmu_version = 0x04 << 24, /* Impl 0, ver 4 */
4117 .mmu_bm = 0x00004000,
4118 .mmu_ctpr_mask = 0x00ffffc0,
4119 .mmu_cxr_mask = 0x000000ff,
4120 .mmu_sfsr_mask = 0x00016fff,
4121 .mmu_trcr_mask = 0x00ffffff,
4124 .name = "Fujitsu MB86907",
4125 .iu_version = 0x05 << 24, /* Impl 0, ver 5 */
4126 .fpu_version = 4 << 17, /* FPU version 4 (Meiko) */
4127 .mmu_version = 0x05 << 24, /* Impl 0, ver 5 */
4128 .mmu_bm = 0x00004000,
4129 .mmu_ctpr_mask = 0xffffffc0,
4130 .mmu_cxr_mask = 0x000000ff,
4131 .mmu_sfsr_mask = 0x00016fff,
4132 .mmu_trcr_mask = 0xffffffff,
4135 .name = "LSI L64811",
4136 .iu_version = 0x10 << 24, /* Impl 1, ver 0 */
4137 .fpu_version = 1 << 17, /* FPU version 1 (LSI L64814) */
4138 .mmu_version = 0x10 << 24,
4139 .mmu_bm = 0x00004000,
4140 .mmu_ctpr_mask = 0x007ffff0,
4141 .mmu_cxr_mask = 0x0000003f,
4142 .mmu_sfsr_mask = 0xffffffff,
4143 .mmu_trcr_mask = 0xffffffff,
4146 .name = "Cypress CY7C601",
4147 .iu_version = 0x11 << 24, /* Impl 1, ver 1 */
4148 .fpu_version = 3 << 17, /* FPU version 3 (Cypress CY7C602) */
4149 .mmu_version = 0x10 << 24,
4150 .mmu_bm = 0x00004000,
4151 .mmu_ctpr_mask = 0x007ffff0,
4152 .mmu_cxr_mask = 0x0000003f,
4153 .mmu_sfsr_mask = 0xffffffff,
4154 .mmu_trcr_mask = 0xffffffff,
4157 .name = "Cypress CY7C611",
4158 .iu_version = 0x13 << 24, /* Impl 1, ver 3 */
4159 .fpu_version = 3 << 17, /* FPU version 3 (Cypress CY7C602) */
4160 .mmu_version = 0x10 << 24,
4161 .mmu_bm = 0x00004000,
4162 .mmu_ctpr_mask = 0x007ffff0,
4163 .mmu_cxr_mask = 0x0000003f,
4164 .mmu_sfsr_mask = 0xffffffff,
4165 .mmu_trcr_mask = 0xffffffff,
4168 .name = "TI SuperSparc II",
4169 .iu_version = 0x40000000,
4170 .fpu_version = 0 << 17,
4171 .mmu_version = 0x04000000,
4172 .mmu_bm = 0x00002000,
4173 .mmu_ctpr_mask = 0xffffffc0,
4174 .mmu_cxr_mask = 0x0000ffff,
4175 .mmu_sfsr_mask = 0xffffffff,
4176 .mmu_trcr_mask = 0xffffffff,
4179 .name = "TI MicroSparc I",
4180 .iu_version = 0x41000000,
4181 .fpu_version = 4 << 17,
4182 .mmu_version = 0x41000000,
4183 .mmu_bm = 0x00004000,
4184 .mmu_ctpr_mask = 0x007ffff0,
4185 .mmu_cxr_mask = 0x0000003f,
4186 .mmu_sfsr_mask = 0x00016fff,
4187 .mmu_trcr_mask = 0x0000003f,
4190 .name = "TI MicroSparc II",
4191 .iu_version = 0x42000000,
4192 .fpu_version = 4 << 17,
4193 .mmu_version = 0x02000000,
4194 .mmu_bm = 0x00004000,
4195 .mmu_ctpr_mask = 0x00ffffc0,
4196 .mmu_cxr_mask = 0x000000ff,
4197 .mmu_sfsr_mask = 0x00016bff,
4198 .mmu_trcr_mask = 0x00ffffff,
4201 .name = "TI MicroSparc IIep",
4202 .iu_version = 0x42000000,
4203 .fpu_version = 4 << 17,
4204 .mmu_version = 0x04000000,
4205 .mmu_bm = 0x00004000,
4206 .mmu_ctpr_mask = 0x00ffffc0,
4207 .mmu_cxr_mask = 0x000000ff,
4208 .mmu_sfsr_mask = 0x00016bff,
4209 .mmu_trcr_mask = 0x00ffffff,
4212 .name = "TI SuperSparc 51",
4213 .iu_version = 0x43000000,
4214 .fpu_version = 0 << 17,
4215 .mmu_version = 0x04000000,
4216 .mmu_bm = 0x00002000,
4217 .mmu_ctpr_mask = 0xffffffc0,
4218 .mmu_cxr_mask = 0x0000ffff,
4219 .mmu_sfsr_mask = 0xffffffff,
4220 .mmu_trcr_mask = 0xffffffff,
4223 .name = "TI SuperSparc 61",
4224 .iu_version = 0x44000000,
4225 .fpu_version = 0 << 17,
4226 .mmu_version = 0x04000000,
4227 .mmu_bm = 0x00002000,
4228 .mmu_ctpr_mask = 0xffffffc0,
4229 .mmu_cxr_mask = 0x0000ffff,
4230 .mmu_sfsr_mask = 0xffffffff,
4231 .mmu_trcr_mask = 0xffffffff,
4234 .name = "Ross RT625",
4235 .iu_version = 0x1e000000,
4236 .fpu_version = 1 << 17,
4237 .mmu_version = 0x1e000000,
4238 .mmu_bm = 0x00004000,
4239 .mmu_ctpr_mask = 0x007ffff0,
4240 .mmu_cxr_mask = 0x0000003f,
4241 .mmu_sfsr_mask = 0xffffffff,
4242 .mmu_trcr_mask = 0xffffffff,
4245 .name = "Ross RT620",
4246 .iu_version = 0x1f000000,
4247 .fpu_version = 1 << 17,
4248 .mmu_version = 0x1f000000,
4249 .mmu_bm = 0x00004000,
4250 .mmu_ctpr_mask = 0x007ffff0,
4251 .mmu_cxr_mask = 0x0000003f,
4252 .mmu_sfsr_mask = 0xffffffff,
4253 .mmu_trcr_mask = 0xffffffff,
4256 .name = "BIT B5010",
4257 .iu_version = 0x20000000,
4258 .fpu_version = 0 << 17, /* B5010/B5110/B5120/B5210 */
4259 .mmu_version = 0x20000000,
4260 .mmu_bm = 0x00004000,
4261 .mmu_ctpr_mask = 0x007ffff0,
4262 .mmu_cxr_mask = 0x0000003f,
4263 .mmu_sfsr_mask = 0xffffffff,
4264 .mmu_trcr_mask = 0xffffffff,
4267 .name = "Matsushita MN10501",
4268 .iu_version = 0x50000000,
4269 .fpu_version = 0 << 17,
4270 .mmu_version = 0x50000000,
4271 .mmu_bm = 0x00004000,
4272 .mmu_ctpr_mask = 0x007ffff0,
4273 .mmu_cxr_mask = 0x0000003f,
4274 .mmu_sfsr_mask = 0xffffffff,
4275 .mmu_trcr_mask = 0xffffffff,
4278 .name = "Weitek W8601",
4279 .iu_version = 0x90 << 24, /* Impl 9, ver 0 */
4280 .fpu_version = 3 << 17, /* FPU version 3 (Weitek WTL3170/2) */
4281 .mmu_version = 0x10 << 24,
4282 .mmu_bm = 0x00004000,
4283 .mmu_ctpr_mask = 0x007ffff0,
4284 .mmu_cxr_mask = 0x0000003f,
4285 .mmu_sfsr_mask = 0xffffffff,
4286 .mmu_trcr_mask = 0xffffffff,
4290 .iu_version = 0xf2000000,
4291 .fpu_version = 4 << 17, /* FPU version 4 (Meiko) */
4292 .mmu_version = 0xf2000000,
4293 .mmu_bm = 0x00004000,
4294 .mmu_ctpr_mask = 0x007ffff0,
4295 .mmu_cxr_mask = 0x0000003f,
4296 .mmu_sfsr_mask = 0xffffffff,
4297 .mmu_trcr_mask = 0xffffffff,
4301 .iu_version = 0xf3000000,
4302 .fpu_version = 4 << 17, /* FPU version 4 (Meiko) */
4303 .mmu_version = 0xf3000000,
4304 .mmu_bm = 0x00004000,
4305 .mmu_ctpr_mask = 0x007ffff0,
4306 .mmu_cxr_mask = 0x0000003f,
4307 .mmu_sfsr_mask = 0xffffffff,
4308 .mmu_trcr_mask = 0xffffffff,
4313 static const sparc_def_t *cpu_sparc_find_by_name(const unsigned char *name)
4317 for (i = 0; i < sizeof(sparc_defs) / sizeof(sparc_def_t); i++) {
4318 if (strcasecmp(name, sparc_defs[i].name) == 0) {
4319 return &sparc_defs[i];
4325 void sparc_cpu_list (FILE *f, int (*cpu_fprintf)(FILE *f, const char *fmt, ...))
4329 for (i = 0; i < sizeof(sparc_defs) / sizeof(sparc_def_t); i++) {
4330 (*cpu_fprintf)(f, "Sparc %16s IU " TARGET_FMT_lx " FPU %08x MMU %08x\n",
4332 sparc_defs[i].iu_version,
4333 sparc_defs[i].fpu_version,
4334 sparc_defs[i].mmu_version);
4338 #define GET_FLAG(a,b) ((env->psr & a)?b:'-')
4340 void cpu_dump_state(CPUState *env, FILE *f,
4341 int (*cpu_fprintf)(FILE *f, const char *fmt, ...),
4346 cpu_fprintf(f, "pc: " TARGET_FMT_lx " npc: " TARGET_FMT_lx "\n", env->pc, env->npc);
4347 cpu_fprintf(f, "General Registers:\n");
4348 for (i = 0; i < 4; i++)
4349 cpu_fprintf(f, "%%g%c: " TARGET_FMT_lx "\t", i + '0', env->gregs[i]);
4350 cpu_fprintf(f, "\n");
4352 cpu_fprintf(f, "%%g%c: " TARGET_FMT_lx "\t", i + '0', env->gregs[i]);
4353 cpu_fprintf(f, "\nCurrent Register Window:\n");
4354 for (x = 0; x < 3; x++) {
4355 for (i = 0; i < 4; i++)
4356 cpu_fprintf(f, "%%%c%d: " TARGET_FMT_lx "\t",
4357 (x == 0 ? 'o' : (x == 1 ? 'l' : 'i')), i,
4358 env->regwptr[i + x * 8]);
4359 cpu_fprintf(f, "\n");
4361 cpu_fprintf(f, "%%%c%d: " TARGET_FMT_lx "\t",
4362 (x == 0 ? 'o' : x == 1 ? 'l' : 'i'), i,
4363 env->regwptr[i + x * 8]);
4364 cpu_fprintf(f, "\n");
4366 cpu_fprintf(f, "\nFloating Point Registers:\n");
4367 for (i = 0; i < 32; i++) {
4369 cpu_fprintf(f, "%%f%02d:", i);
4370 cpu_fprintf(f, " %016lf", env->fpr[i]);
4372 cpu_fprintf(f, "\n");
4374 #ifdef TARGET_SPARC64
4375 cpu_fprintf(f, "pstate: 0x%08x ccr: 0x%02x asi: 0x%02x tl: %d fprs: %d\n",
4376 env->pstate, GET_CCR(env), env->asi, env->tl, env->fprs);
4377 cpu_fprintf(f, "cansave: %d canrestore: %d otherwin: %d wstate %d cleanwin %d cwp %d\n",
4378 env->cansave, env->canrestore, env->otherwin, env->wstate,
4379 env->cleanwin, NWINDOWS - 1 - env->cwp);
4381 cpu_fprintf(f, "psr: 0x%08x -> %c%c%c%c %c%c%c wim: 0x%08x\n", GET_PSR(env),
4382 GET_FLAG(PSR_ZERO, 'Z'), GET_FLAG(PSR_OVF, 'V'),
4383 GET_FLAG(PSR_NEG, 'N'), GET_FLAG(PSR_CARRY, 'C'),
4384 env->psrs?'S':'-', env->psrps?'P':'-',
4385 env->psret?'E':'-', env->wim);
4387 cpu_fprintf(f, "fsr: 0x%08x\n", GET_FSR32(env));
4390 #if defined(CONFIG_USER_ONLY)
4391 target_phys_addr_t cpu_get_phys_page_debug(CPUState *env, target_ulong addr)
4397 extern int get_physical_address (CPUState *env, target_phys_addr_t *physical, int *prot,
4398 int *access_index, target_ulong address, int rw,
4401 target_phys_addr_t cpu_get_phys_page_debug(CPUState *env, target_ulong addr)
4403 target_phys_addr_t phys_addr;
4404 int prot, access_index;
4406 if (get_physical_address(env, &phys_addr, &prot, &access_index, addr, 2,
4407 MMU_KERNEL_IDX) != 0)
4408 if (get_physical_address(env, &phys_addr, &prot, &access_index, addr,
4409 0, MMU_KERNEL_IDX) != 0)
4411 if (cpu_get_physical_page_desc(phys_addr) == IO_MEM_UNASSIGNED)
4417 void helper_flush(target_ulong addr)
4420 tb_invalidate_page_range(addr, addr + 8);