1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20#include "qemu/osdep.h"
21#include "qemu-common.h"
22#include "qemu.h"
23#include "user-internals.h"
24#include "cpu_loop-common.h"
25#include "signal-common.h"
26
27void cpu_loop(CPUAlphaState *env)
28{
29 CPUState *cs = env_cpu(env);
30 int trapnr, si_code;
31 abi_long sysret;
32
33 while (1) {
34 bool arch_interrupt = true;
35
36 cpu_exec_start(cs);
37 trapnr = cpu_exec(cs);
38 cpu_exec_end(cs);
39 process_queued_cpu_work(cs);
40
41 switch (trapnr) {
42 case EXCP_RESET:
43 fprintf(stderr, "Reset requested. Exit\n");
44 exit(EXIT_FAILURE);
45 break;
46 case EXCP_MCHK:
47 fprintf(stderr, "Machine check exception. Exit\n");
48 exit(EXIT_FAILURE);
49 break;
50 case EXCP_SMP_INTERRUPT:
51 case EXCP_CLK_INTERRUPT:
52 case EXCP_DEV_INTERRUPT:
53 fprintf(stderr, "External interrupt. Exit\n");
54 exit(EXIT_FAILURE);
55 break;
56 case EXCP_OPCDEC:
57 do_sigill:
58 force_sig_fault(TARGET_SIGILL, TARGET_ILL_ILLOPC, env->pc);
59 break;
60 case EXCP_ARITH:
61 force_sig_fault(TARGET_SIGFPE, TARGET_FPE_FLTINV, env->pc);
62 break;
63 case EXCP_FEN:
64
65 break;
66 case EXCP_CALL_PAL:
67 switch (env->error_code) {
68 case 0x80:
69
70 goto do_sigtrap_brkpt;
71 case 0x81:
72
73 goto do_sigtrap_unk;
74 case 0x83:
75
76 trapnr = env->ir[IR_V0];
77 sysret = do_syscall(env, trapnr,
78 env->ir[IR_A0], env->ir[IR_A1],
79 env->ir[IR_A2], env->ir[IR_A3],
80 env->ir[IR_A4], env->ir[IR_A5],
81 0, 0);
82 if (sysret == -QEMU_ERESTARTSYS) {
83 env->pc -= 4;
84 break;
85 }
86 if (sysret == -QEMU_ESIGRETURN) {
87 break;
88 }
89
90
91
92 trapnr = (env->ir[IR_V0] != 0 && sysret < 0);
93 env->ir[IR_V0] = (trapnr ? -sysret : sysret);
94 env->ir[IR_A3] = trapnr;
95 break;
96 case 0x86:
97
98
99
100
101
102
103 break;
104 case 0x9E:
105
106
107 abort();
108 case 0x9F:
109
110
111 abort();
112 case 0xAA:
113
114 switch (env->ir[IR_A0]) {
115 case TARGET_GEN_INTOVF:
116 si_code = TARGET_FPE_INTOVF;
117 break;
118 case TARGET_GEN_INTDIV:
119 si_code = TARGET_FPE_INTDIV;
120 break;
121 case TARGET_GEN_FLTOVF:
122 si_code = TARGET_FPE_FLTOVF;
123 break;
124 case TARGET_GEN_FLTUND:
125 si_code = TARGET_FPE_FLTUND;
126 break;
127 case TARGET_GEN_FLTINV:
128 si_code = TARGET_FPE_FLTINV;
129 break;
130 case TARGET_GEN_FLTINE:
131 si_code = TARGET_FPE_FLTRES;
132 break;
133 case TARGET_GEN_ROPRAND:
134 si_code = TARGET_FPE_FLTUNK;
135 break;
136 default:
137 goto do_sigtrap_unk;
138 }
139 force_sig_fault(TARGET_SIGFPE, si_code, env->pc);
140 break;
141 default:
142 goto do_sigill;
143 }
144 break;
145 case EXCP_DEBUG:
146 do_sigtrap_brkpt:
147 force_sig_fault(TARGET_SIGTRAP, TARGET_TRAP_BRKPT, env->pc);
148 break;
149 do_sigtrap_unk:
150 force_sig_fault(TARGET_SIGTRAP, TARGET_TRAP_UNK, env->pc);
151 break;
152 case EXCP_INTERRUPT:
153
154 break;
155 case EXCP_ATOMIC:
156 cpu_exec_step_atomic(cs);
157 arch_interrupt = false;
158 break;
159 default:
160 fprintf(stderr, "Unhandled trap: 0x%x\n", trapnr);
161 cpu_dump_state(cs, stderr, 0);
162 exit(EXIT_FAILURE);
163 }
164 process_pending_signals (env);
165
166
167
168
169
170 if (arch_interrupt) {
171 env->flags &= ~ENV_FLAG_RX_FLAG;
172 env->lock_addr = -1;
173 }
174 }
175}
176
177void target_cpu_copy_regs(CPUArchState *env, struct target_pt_regs *regs)
178{
179 int i;
180
181 for(i = 0; i < 28; i++) {
182 env->ir[i] = ((abi_ulong *)regs)[i];
183 }
184 env->ir[IR_SP] = regs->usp;
185 env->pc = regs->pc;
186}
187