target/m68k: Implement TRAPcc
Resolves: https://gitlab.com/qemu-project/qemu/-/issues/754 Reviewed-by: Laurent Vivier <laurent@vivier.eu> Signed-off-by: Richard Henderson <richard.henderson@linaro.org> Message-Id: <20220602013401.303699-11-richard.henderson@linaro.org> Signed-off-by: Laurent Vivier <laurent@vivier.eu>
This commit is contained in:
		
							parent
							
								
									a1aedd6cbd
								
							
						
					
					
						commit
						aeeb90afce
					
				| @ -47,6 +47,7 @@ void cpu_loop(CPUM68KState *env) | ||||
|             force_sig_fault(TARGET_SIGILL, TARGET_ILL_ILLOPN, env->pc); | ||||
|             break; | ||||
|         case EXCP_CHK: | ||||
|         case EXCP_TRAPCC: | ||||
|             force_sig_fault(TARGET_SIGFPE, TARGET_FPE_INTOVF, env->mmu.ar); | ||||
|             break; | ||||
|         case EXCP_DIV0: | ||||
|  | ||||
| @ -158,6 +158,7 @@ static void m68020_cpu_initfn(Object *obj) | ||||
|     m68k_set_feature(env, M68K_FEATURE_CHK2); | ||||
|     m68k_set_feature(env, M68K_FEATURE_MSP); | ||||
|     m68k_set_feature(env, M68K_FEATURE_UNALIGNED_DATA); | ||||
|     m68k_set_feature(env, M68K_FEATURE_TRAPCC); | ||||
| } | ||||
| 
 | ||||
| /*
 | ||||
|  | ||||
| @ -534,6 +534,8 @@ enum m68k_features { | ||||
|     M68K_FEATURE_MOVEC, | ||||
|     /* Unaligned data accesses (680[2346]0) */ | ||||
|     M68K_FEATURE_UNALIGNED_DATA, | ||||
|     /* TRAPcc insn. (680[2346]0, and CPU32) */ | ||||
|     M68K_FEATURE_TRAPCC, | ||||
| }; | ||||
| 
 | ||||
| static inline int m68k_feature(CPUM68KState *env, int feature) | ||||
|  | ||||
| @ -399,14 +399,10 @@ static void m68k_interrupt_all(CPUM68KState *env, int is_hw) | ||||
|         do_stack_frame(env, &sp, 2, oldsr, 0, env->pc); | ||||
|         break; | ||||
| 
 | ||||
|     case EXCP_TRAPCC: | ||||
|         /* FIXME: addr is not only env->pc */ | ||||
|         do_stack_frame(env, &sp, 2, oldsr, env->pc, env->pc); | ||||
|         break; | ||||
| 
 | ||||
|     case EXCP_CHK: | ||||
|     case EXCP_DIV0: | ||||
|     case EXCP_TRACE: | ||||
|     case EXCP_TRAPCC: | ||||
|         do_stack_frame(env, &sp, 2, oldsr, env->mmu.ar, env->pc); | ||||
|         break; | ||||
| 
 | ||||
|  | ||||
| @ -4879,6 +4879,53 @@ DISAS_INSN(trap) | ||||
|     gen_exception(s, s->pc, EXCP_TRAP0 + (insn & 0xf)); | ||||
| } | ||||
| 
 | ||||
| static void do_trapcc(DisasContext *s, DisasCompare *c) | ||||
| { | ||||
|     if (c->tcond != TCG_COND_NEVER) { | ||||
|         TCGLabel *over = NULL; | ||||
| 
 | ||||
|         update_cc_op(s); | ||||
| 
 | ||||
|         if (c->tcond != TCG_COND_ALWAYS) { | ||||
|             /* Jump over if !c. */ | ||||
|             over = gen_new_label(); | ||||
|             tcg_gen_brcond_i32(tcg_invert_cond(c->tcond), c->v1, c->v2, over); | ||||
|         } | ||||
| 
 | ||||
|         tcg_gen_movi_i32(QREG_PC, s->pc); | ||||
|         gen_raise_exception_format2(s, EXCP_TRAPCC, s->base.pc_next); | ||||
| 
 | ||||
|         if (over != NULL) { | ||||
|             gen_set_label(over); | ||||
|             s->base.is_jmp = DISAS_NEXT; | ||||
|         } | ||||
|     } | ||||
|     free_cond(c); | ||||
| } | ||||
| 
 | ||||
| DISAS_INSN(trapcc) | ||||
| { | ||||
|     DisasCompare c; | ||||
| 
 | ||||
|     /* Consume and discard the immediate operand. */ | ||||
|     switch (extract32(insn, 0, 3)) { | ||||
|     case 2: /* trapcc.w */ | ||||
|         (void)read_im16(env, s); | ||||
|         break; | ||||
|     case 3: /* trapcc.l */ | ||||
|         (void)read_im32(env, s); | ||||
|         break; | ||||
|     case 4: /* trapcc (no operand) */ | ||||
|         break; | ||||
|     default: | ||||
|         /* trapcc registered with only valid opmodes */ | ||||
|         g_assert_not_reached(); | ||||
|     } | ||||
| 
 | ||||
|     gen_cc_cond(&c, s, extract32(insn, 8, 4)); | ||||
|     do_trapcc(s, &c); | ||||
| } | ||||
| 
 | ||||
| static void gen_load_fcr(DisasContext *s, TCGv res, int reg) | ||||
| { | ||||
|     switch (reg) { | ||||
| @ -6051,6 +6098,8 @@ void register_m68k_insns (CPUM68KState *env) | ||||
|     INSN(scc,       50c0, f0f8, CF_ISA_A); /* Scc.B Dx   */ | ||||
|     INSN(scc,       50c0, f0c0, M68000);   /* Scc.B <EA> */ | ||||
|     INSN(dbcc,      50c8, f0f8, M68000); | ||||
|     INSN(trapcc,    50fa, f0fe, TRAPCC);   /* opmode 010, 011 */ | ||||
|     INSN(trapcc,    50fc, f0ff, TRAPCC);   /* opmode 100 */ | ||||
|     INSN(tpf,       51f8, fff8, CF_ISA_A); | ||||
| 
 | ||||
|     /* Branch instructions.  */ | ||||
|  | ||||
		Loading…
	
	
			
			x
			
			
		
	
		Reference in New Issue
	
	Block a user
	 Richard Henderson
						Richard Henderson