1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19#include "qemu/osdep.h"
20#include "cpu.h"
21#include "exec/helper-proto.h"
22#include "exec/cpu_ldst.h"
23#include "exec/semihost.h"
24
25#if defined(CONFIG_USER_ONLY)
26
27void m68k_cpu_do_interrupt(CPUState *cs)
28{
29 cs->exception_index = -1;
30}
31
32static inline void do_interrupt_m68k_hardirq(CPUM68KState *env)
33{
34}
35
36#else
37
38
39
40
41void tlb_fill(CPUState *cs, target_ulong addr, int is_write, int mmu_idx,
42 uintptr_t retaddr)
43{
44 int ret;
45
46 ret = m68k_cpu_handle_mmu_fault(cs, addr, is_write, mmu_idx);
47 if (unlikely(ret)) {
48 if (retaddr) {
49
50 cpu_restore_state(cs, retaddr);
51 }
52 cpu_loop_exit(cs);
53 }
54}
55
56static void do_rte(CPUM68KState *env)
57{
58 uint32_t sp;
59 uint32_t fmt;
60
61 sp = env->aregs[7];
62 fmt = cpu_ldl_kernel(env, sp);
63 env->pc = cpu_ldl_kernel(env, sp + 4);
64 sp |= (fmt >> 28) & 3;
65 env->sr = fmt & 0xffff;
66 env->aregs[7] = sp + 8;
67 m68k_switch_sp(env);
68}
69
70static void do_interrupt_all(CPUM68KState *env, int is_hw)
71{
72 CPUState *cs = CPU(m68k_env_get_cpu(env));
73 uint32_t sp;
74 uint32_t fmt;
75 uint32_t retaddr;
76 uint32_t vector;
77
78 fmt = 0;
79 retaddr = env->pc;
80
81 if (!is_hw) {
82 switch (cs->exception_index) {
83 case EXCP_RTE:
84
85 do_rte(env);
86 return;
87 case EXCP_HALT_INSN:
88 if (semihosting_enabled()
89 && (env->sr & SR_S) != 0
90 && (env->pc & 3) == 0
91 && cpu_lduw_code(env, env->pc - 4) == 0x4e71
92 && cpu_ldl_code(env, env->pc) == 0x4e7bf000) {
93 env->pc += 4;
94 do_m68k_semihosting(env, env->dregs[0]);
95 return;
96 }
97 cs->halted = 1;
98 cs->exception_index = EXCP_HLT;
99 cpu_loop_exit(cs);
100 return;
101 }
102 if (cs->exception_index >= EXCP_TRAP0
103 && cs->exception_index <= EXCP_TRAP15) {
104
105 retaddr += 2;
106 }
107 }
108
109 vector = cs->exception_index << 2;
110
111 fmt |= 0x40000000;
112 fmt |= vector << 16;
113 fmt |= env->sr;
114
115 env->sr |= SR_S;
116 if (is_hw) {
117 env->sr = (env->sr & ~SR_I) | (env->pending_level << SR_I_SHIFT);
118 env->sr &= ~SR_M;
119 }
120 m68k_switch_sp(env);
121 sp = env->aregs[7];
122 fmt |= (sp & 3) << 28;
123
124
125 sp &= ~3;
126 sp -= 4;
127 cpu_stl_kernel(env, sp, retaddr);
128 sp -= 4;
129 cpu_stl_kernel(env, sp, fmt);
130 env->aregs[7] = sp;
131
132 env->pc = cpu_ldl_kernel(env, env->vbr + vector);
133}
134
135void m68k_cpu_do_interrupt(CPUState *cs)
136{
137 M68kCPU *cpu = M68K_CPU(cs);
138 CPUM68KState *env = &cpu->env;
139
140 do_interrupt_all(env, 0);
141}
142
143static inline void do_interrupt_m68k_hardirq(CPUM68KState *env)
144{
145 do_interrupt_all(env, 1);
146}
147#endif
148
149bool m68k_cpu_exec_interrupt(CPUState *cs, int interrupt_request)
150{
151 M68kCPU *cpu = M68K_CPU(cs);
152 CPUM68KState *env = &cpu->env;
153
154 if (interrupt_request & CPU_INTERRUPT_HARD
155 && ((env->sr & SR_I) >> SR_I_SHIFT) < env->pending_level) {
156
157
158
159
160 cs->exception_index = env->pending_vector;
161 do_interrupt_m68k_hardirq(env);
162 return true;
163 }
164 return false;
165}
166
167static void raise_exception(CPUM68KState *env, int tt)
168{
169 CPUState *cs = CPU(m68k_env_get_cpu(env));
170
171 cs->exception_index = tt;
172 cpu_loop_exit(cs);
173}
174
175void HELPER(raise_exception)(CPUM68KState *env, uint32_t tt)
176{
177 raise_exception(env, tt);
178}
179
180void HELPER(divu)(CPUM68KState *env, uint32_t word)
181{
182 uint32_t num;
183 uint32_t den;
184 uint32_t quot;
185 uint32_t rem;
186 uint32_t flags;
187
188 num = env->div1;
189 den = env->div2;
190
191 if (den == 0) {
192 raise_exception(env, EXCP_DIV0);
193 }
194 quot = num / den;
195 rem = num % den;
196 flags = 0;
197 if (word && quot > 0xffff)
198 flags |= CCF_V;
199 if (quot == 0)
200 flags |= CCF_Z;
201 else if ((int32_t)quot < 0)
202 flags |= CCF_N;
203 env->div1 = quot;
204 env->div2 = rem;
205 env->cc_dest = flags;
206}
207
208void HELPER(divs)(CPUM68KState *env, uint32_t word)
209{
210 int32_t num;
211 int32_t den;
212 int32_t quot;
213 int32_t rem;
214 int32_t flags;
215
216 num = env->div1;
217 den = env->div2;
218 if (den == 0) {
219 raise_exception(env, EXCP_DIV0);
220 }
221 quot = num / den;
222 rem = num % den;
223 flags = 0;
224 if (word && quot != (int16_t)quot)
225 flags |= CCF_V;
226 if (quot == 0)
227 flags |= CCF_Z;
228 else if (quot < 0)
229 flags |= CCF_N;
230 env->div1 = quot;
231 env->div2 = rem;
232 env->cc_dest = flags;
233}
234