root / target-unicore32 / op_helper.c @ 6ce2d77a
History | View | Annotate | Download (5.2 kB)
1 | 6e64da3c | Guan Xuetao | /*
|
---|---|---|---|
2 | 6e64da3c | Guan Xuetao | * UniCore32 helper routines
|
3 | 6e64da3c | Guan Xuetao | *
|
4 | 6e64da3c | Guan Xuetao | * Copyright (C) 2010-2011 GUAN Xue-tao
|
5 | 6e64da3c | Guan Xuetao | *
|
6 | 6e64da3c | Guan Xuetao | * This program is free software; you can redistribute it and/or modify
|
7 | 6e64da3c | Guan Xuetao | * it under the terms of the GNU General Public License version 2 as
|
8 | 6e64da3c | Guan Xuetao | * published by the Free Software Foundation.
|
9 | 6e64da3c | Guan Xuetao | */
|
10 | 3e457172 | Blue Swirl | #include "cpu.h" |
11 | 3e457172 | Blue Swirl | #include "dyngen-exec.h" |
12 | 6e64da3c | Guan Xuetao | #include "helper.h" |
13 | 6e64da3c | Guan Xuetao | |
14 | 6e64da3c | Guan Xuetao | #define SIGNBIT (uint32_t)0x80000000 |
15 | 6e64da3c | Guan Xuetao | #define SIGNBIT64 ((uint64_t)1 << 63) |
16 | 6e64da3c | Guan Xuetao | |
17 | 6e64da3c | Guan Xuetao | void HELPER(exception)(uint32_t excp)
|
18 | 6e64da3c | Guan Xuetao | { |
19 | 6e64da3c | Guan Xuetao | env->exception_index = excp; |
20 | 1162c041 | Blue Swirl | cpu_loop_exit(env); |
21 | 6e64da3c | Guan Xuetao | } |
22 | 6e64da3c | Guan Xuetao | |
23 | 6e64da3c | Guan Xuetao | static target_ulong asr_read(void) |
24 | 6e64da3c | Guan Xuetao | { |
25 | 6e64da3c | Guan Xuetao | int ZF;
|
26 | 6e64da3c | Guan Xuetao | ZF = (env->ZF == 0);
|
27 | 6e64da3c | Guan Xuetao | return env->uncached_asr | (env->NF & 0x80000000) | (ZF << 30) | |
28 | 6e64da3c | Guan Xuetao | (env->CF << 29) | ((env->VF & 0x80000000) >> 3); |
29 | 6e64da3c | Guan Xuetao | } |
30 | 6e64da3c | Guan Xuetao | |
31 | 6e64da3c | Guan Xuetao | target_ulong cpu_asr_read(CPUState *env1) |
32 | 6e64da3c | Guan Xuetao | { |
33 | 6e64da3c | Guan Xuetao | CPUState *saved_env; |
34 | 6e64da3c | Guan Xuetao | target_ulong ret; |
35 | 6e64da3c | Guan Xuetao | |
36 | 6e64da3c | Guan Xuetao | saved_env = env; |
37 | 6e64da3c | Guan Xuetao | env = env1; |
38 | 6e64da3c | Guan Xuetao | ret = asr_read(); |
39 | 6e64da3c | Guan Xuetao | env = saved_env; |
40 | 6e64da3c | Guan Xuetao | return ret;
|
41 | 6e64da3c | Guan Xuetao | } |
42 | 6e64da3c | Guan Xuetao | |
43 | 6e64da3c | Guan Xuetao | target_ulong HELPER(asr_read)(void)
|
44 | 6e64da3c | Guan Xuetao | { |
45 | 6e64da3c | Guan Xuetao | return asr_read();
|
46 | 6e64da3c | Guan Xuetao | } |
47 | 6e64da3c | Guan Xuetao | |
48 | 6e64da3c | Guan Xuetao | static void asr_write(target_ulong val, target_ulong mask) |
49 | 6e64da3c | Guan Xuetao | { |
50 | 6e64da3c | Guan Xuetao | if (mask & ASR_NZCV) {
|
51 | 6e64da3c | Guan Xuetao | env->ZF = (~val) & ASR_Z; |
52 | 6e64da3c | Guan Xuetao | env->NF = val; |
53 | 6e64da3c | Guan Xuetao | env->CF = (val >> 29) & 1; |
54 | 6e64da3c | Guan Xuetao | env->VF = (val << 3) & 0x80000000; |
55 | 6e64da3c | Guan Xuetao | } |
56 | 6e64da3c | Guan Xuetao | |
57 | 6e64da3c | Guan Xuetao | if ((env->uncached_asr ^ val) & mask & ASR_M) {
|
58 | 6e64da3c | Guan Xuetao | switch_mode(env, val & ASR_M); |
59 | 6e64da3c | Guan Xuetao | } |
60 | 6e64da3c | Guan Xuetao | mask &= ~ASR_NZCV; |
61 | 6e64da3c | Guan Xuetao | env->uncached_asr = (env->uncached_asr & ~mask) | (val & mask); |
62 | 6e64da3c | Guan Xuetao | } |
63 | 6e64da3c | Guan Xuetao | |
64 | 6e64da3c | Guan Xuetao | void cpu_asr_write(CPUState *env1, target_ulong val, target_ulong mask)
|
65 | 6e64da3c | Guan Xuetao | { |
66 | 6e64da3c | Guan Xuetao | CPUState *saved_env; |
67 | 6e64da3c | Guan Xuetao | |
68 | 6e64da3c | Guan Xuetao | saved_env = env; |
69 | 6e64da3c | Guan Xuetao | env = env1; |
70 | 6e64da3c | Guan Xuetao | asr_write(val, mask); |
71 | 6e64da3c | Guan Xuetao | env = saved_env; |
72 | 6e64da3c | Guan Xuetao | } |
73 | 6e64da3c | Guan Xuetao | |
74 | 6e64da3c | Guan Xuetao | void HELPER(asr_write)(target_ulong val, target_ulong mask)
|
75 | 6e64da3c | Guan Xuetao | { |
76 | 6e64da3c | Guan Xuetao | asr_write(val, mask); |
77 | 6e64da3c | Guan Xuetao | } |
78 | 6e64da3c | Guan Xuetao | |
79 | 6e64da3c | Guan Xuetao | /* Access to user mode registers from privileged modes. */
|
80 | 6e64da3c | Guan Xuetao | uint32_t HELPER(get_user_reg)(uint32_t regno) |
81 | 6e64da3c | Guan Xuetao | { |
82 | 6e64da3c | Guan Xuetao | uint32_t val; |
83 | 6e64da3c | Guan Xuetao | |
84 | 6e64da3c | Guan Xuetao | if (regno == 29) { |
85 | 6e64da3c | Guan Xuetao | val = env->banked_r29[0];
|
86 | 6e64da3c | Guan Xuetao | } else if (regno == 30) { |
87 | 6e64da3c | Guan Xuetao | val = env->banked_r30[0];
|
88 | 6e64da3c | Guan Xuetao | } else {
|
89 | 6e64da3c | Guan Xuetao | val = env->regs[regno]; |
90 | 6e64da3c | Guan Xuetao | } |
91 | 6e64da3c | Guan Xuetao | return val;
|
92 | 6e64da3c | Guan Xuetao | } |
93 | 6e64da3c | Guan Xuetao | |
94 | 6e64da3c | Guan Xuetao | void HELPER(set_user_reg)(uint32_t regno, uint32_t val)
|
95 | 6e64da3c | Guan Xuetao | { |
96 | 6e64da3c | Guan Xuetao | if (regno == 29) { |
97 | 6e64da3c | Guan Xuetao | env->banked_r29[0] = val;
|
98 | 6e64da3c | Guan Xuetao | } else if (regno == 30) { |
99 | 6e64da3c | Guan Xuetao | env->banked_r30[0] = val;
|
100 | 6e64da3c | Guan Xuetao | } else {
|
101 | 6e64da3c | Guan Xuetao | env->regs[regno] = val; |
102 | 6e64da3c | Guan Xuetao | } |
103 | 6e64da3c | Guan Xuetao | } |
104 | 6e64da3c | Guan Xuetao | |
105 | 6e64da3c | Guan Xuetao | /* ??? Flag setting arithmetic is awkward because we need to do comparisons.
|
106 | 6e64da3c | Guan Xuetao | The only way to do that in TCG is a conditional branch, which clobbers
|
107 | 6e64da3c | Guan Xuetao | all our temporaries. For now implement these as helper functions. */
|
108 | 6e64da3c | Guan Xuetao | |
109 | 6e64da3c | Guan Xuetao | uint32_t HELPER(add_cc)(uint32_t a, uint32_t b) |
110 | 6e64da3c | Guan Xuetao | { |
111 | 6e64da3c | Guan Xuetao | uint32_t result; |
112 | 6e64da3c | Guan Xuetao | result = a + b; |
113 | 6e64da3c | Guan Xuetao | env->NF = env->ZF = result; |
114 | 6e64da3c | Guan Xuetao | env->CF = result < a; |
115 | 6e64da3c | Guan Xuetao | env->VF = (a ^ b ^ -1) & (a ^ result);
|
116 | 6e64da3c | Guan Xuetao | return result;
|
117 | 6e64da3c | Guan Xuetao | } |
118 | 6e64da3c | Guan Xuetao | |
119 | 6e64da3c | Guan Xuetao | uint32_t HELPER(adc_cc)(uint32_t a, uint32_t b) |
120 | 6e64da3c | Guan Xuetao | { |
121 | 6e64da3c | Guan Xuetao | uint32_t result; |
122 | 6e64da3c | Guan Xuetao | if (!env->CF) {
|
123 | 6e64da3c | Guan Xuetao | result = a + b; |
124 | 6e64da3c | Guan Xuetao | env->CF = result < a; |
125 | 6e64da3c | Guan Xuetao | } else {
|
126 | 6e64da3c | Guan Xuetao | result = a + b + 1;
|
127 | 6e64da3c | Guan Xuetao | env->CF = result <= a; |
128 | 6e64da3c | Guan Xuetao | } |
129 | 6e64da3c | Guan Xuetao | env->VF = (a ^ b ^ -1) & (a ^ result);
|
130 | 6e64da3c | Guan Xuetao | env->NF = env->ZF = result; |
131 | 6e64da3c | Guan Xuetao | return result;
|
132 | 6e64da3c | Guan Xuetao | } |
133 | 6e64da3c | Guan Xuetao | |
134 | 6e64da3c | Guan Xuetao | uint32_t HELPER(sub_cc)(uint32_t a, uint32_t b) |
135 | 6e64da3c | Guan Xuetao | { |
136 | 6e64da3c | Guan Xuetao | uint32_t result; |
137 | 6e64da3c | Guan Xuetao | result = a - b; |
138 | 6e64da3c | Guan Xuetao | env->NF = env->ZF = result; |
139 | 6e64da3c | Guan Xuetao | env->CF = a >= b; |
140 | 6e64da3c | Guan Xuetao | env->VF = (a ^ b) & (a ^ result); |
141 | 6e64da3c | Guan Xuetao | return result;
|
142 | 6e64da3c | Guan Xuetao | } |
143 | 6e64da3c | Guan Xuetao | |
144 | 6e64da3c | Guan Xuetao | uint32_t HELPER(sbc_cc)(uint32_t a, uint32_t b) |
145 | 6e64da3c | Guan Xuetao | { |
146 | 6e64da3c | Guan Xuetao | uint32_t result; |
147 | 6e64da3c | Guan Xuetao | if (!env->CF) {
|
148 | 6e64da3c | Guan Xuetao | result = a - b - 1;
|
149 | 6e64da3c | Guan Xuetao | env->CF = a > b; |
150 | 6e64da3c | Guan Xuetao | } else {
|
151 | 6e64da3c | Guan Xuetao | result = a - b; |
152 | 6e64da3c | Guan Xuetao | env->CF = a >= b; |
153 | 6e64da3c | Guan Xuetao | } |
154 | 6e64da3c | Guan Xuetao | env->VF = (a ^ b) & (a ^ result); |
155 | 6e64da3c | Guan Xuetao | env->NF = env->ZF = result; |
156 | 6e64da3c | Guan Xuetao | return result;
|
157 | 6e64da3c | Guan Xuetao | } |
158 | 6e64da3c | Guan Xuetao | |
159 | 6e64da3c | Guan Xuetao | /* Similarly for variable shift instructions. */
|
160 | 6e64da3c | Guan Xuetao | |
161 | 6e64da3c | Guan Xuetao | uint32_t HELPER(shl)(uint32_t x, uint32_t i) |
162 | 6e64da3c | Guan Xuetao | { |
163 | 6e64da3c | Guan Xuetao | int shift = i & 0xff; |
164 | 6e64da3c | Guan Xuetao | if (shift >= 32) { |
165 | 6e64da3c | Guan Xuetao | return 0; |
166 | 6e64da3c | Guan Xuetao | } |
167 | 6e64da3c | Guan Xuetao | return x << shift;
|
168 | 6e64da3c | Guan Xuetao | } |
169 | 6e64da3c | Guan Xuetao | |
170 | 6e64da3c | Guan Xuetao | uint32_t HELPER(shr)(uint32_t x, uint32_t i) |
171 | 6e64da3c | Guan Xuetao | { |
172 | 6e64da3c | Guan Xuetao | int shift = i & 0xff; |
173 | 6e64da3c | Guan Xuetao | if (shift >= 32) { |
174 | 6e64da3c | Guan Xuetao | return 0; |
175 | 6e64da3c | Guan Xuetao | } |
176 | 6e64da3c | Guan Xuetao | return (uint32_t)x >> shift;
|
177 | 6e64da3c | Guan Xuetao | } |
178 | 6e64da3c | Guan Xuetao | |
179 | 6e64da3c | Guan Xuetao | uint32_t HELPER(sar)(uint32_t x, uint32_t i) |
180 | 6e64da3c | Guan Xuetao | { |
181 | 6e64da3c | Guan Xuetao | int shift = i & 0xff; |
182 | 6e64da3c | Guan Xuetao | if (shift >= 32) { |
183 | 6e64da3c | Guan Xuetao | shift = 31;
|
184 | 6e64da3c | Guan Xuetao | } |
185 | 6e64da3c | Guan Xuetao | return (int32_t)x >> shift;
|
186 | 6e64da3c | Guan Xuetao | } |
187 | 6e64da3c | Guan Xuetao | |
188 | 6e64da3c | Guan Xuetao | uint32_t HELPER(shl_cc)(uint32_t x, uint32_t i) |
189 | 6e64da3c | Guan Xuetao | { |
190 | 6e64da3c | Guan Xuetao | int shift = i & 0xff; |
191 | 6e64da3c | Guan Xuetao | if (shift >= 32) { |
192 | 6e64da3c | Guan Xuetao | if (shift == 32) { |
193 | 6e64da3c | Guan Xuetao | env->CF = x & 1;
|
194 | 6e64da3c | Guan Xuetao | } else {
|
195 | 6e64da3c | Guan Xuetao | env->CF = 0;
|
196 | 6e64da3c | Guan Xuetao | } |
197 | 6e64da3c | Guan Xuetao | return 0; |
198 | 6e64da3c | Guan Xuetao | } else if (shift != 0) { |
199 | 6e64da3c | Guan Xuetao | env->CF = (x >> (32 - shift)) & 1; |
200 | 6e64da3c | Guan Xuetao | return x << shift;
|
201 | 6e64da3c | Guan Xuetao | } |
202 | 6e64da3c | Guan Xuetao | return x;
|
203 | 6e64da3c | Guan Xuetao | } |
204 | 6e64da3c | Guan Xuetao | |
205 | 6e64da3c | Guan Xuetao | uint32_t HELPER(shr_cc)(uint32_t x, uint32_t i) |
206 | 6e64da3c | Guan Xuetao | { |
207 | 6e64da3c | Guan Xuetao | int shift = i & 0xff; |
208 | 6e64da3c | Guan Xuetao | if (shift >= 32) { |
209 | 6e64da3c | Guan Xuetao | if (shift == 32) { |
210 | 6e64da3c | Guan Xuetao | env->CF = (x >> 31) & 1; |
211 | 6e64da3c | Guan Xuetao | } else {
|
212 | 6e64da3c | Guan Xuetao | env->CF = 0;
|
213 | 6e64da3c | Guan Xuetao | } |
214 | 6e64da3c | Guan Xuetao | return 0; |
215 | 6e64da3c | Guan Xuetao | } else if (shift != 0) { |
216 | 6e64da3c | Guan Xuetao | env->CF = (x >> (shift - 1)) & 1; |
217 | 6e64da3c | Guan Xuetao | return x >> shift;
|
218 | 6e64da3c | Guan Xuetao | } |
219 | 6e64da3c | Guan Xuetao | return x;
|
220 | 6e64da3c | Guan Xuetao | } |
221 | 6e64da3c | Guan Xuetao | |
222 | 6e64da3c | Guan Xuetao | uint32_t HELPER(sar_cc)(uint32_t x, uint32_t i) |
223 | 6e64da3c | Guan Xuetao | { |
224 | 6e64da3c | Guan Xuetao | int shift = i & 0xff; |
225 | 6e64da3c | Guan Xuetao | if (shift >= 32) { |
226 | 6e64da3c | Guan Xuetao | env->CF = (x >> 31) & 1; |
227 | 6e64da3c | Guan Xuetao | return (int32_t)x >> 31; |
228 | 6e64da3c | Guan Xuetao | } else if (shift != 0) { |
229 | 6e64da3c | Guan Xuetao | env->CF = (x >> (shift - 1)) & 1; |
230 | 6e64da3c | Guan Xuetao | return (int32_t)x >> shift;
|
231 | 6e64da3c | Guan Xuetao | } |
232 | 6e64da3c | Guan Xuetao | return x;
|
233 | 6e64da3c | Guan Xuetao | } |
234 | 6e64da3c | Guan Xuetao | |
235 | 6e64da3c | Guan Xuetao | uint32_t HELPER(ror_cc)(uint32_t x, uint32_t i) |
236 | 6e64da3c | Guan Xuetao | { |
237 | 6e64da3c | Guan Xuetao | int shift1, shift;
|
238 | 6e64da3c | Guan Xuetao | shift1 = i & 0xff;
|
239 | 6e64da3c | Guan Xuetao | shift = shift1 & 0x1f;
|
240 | 6e64da3c | Guan Xuetao | if (shift == 0) { |
241 | 6e64da3c | Guan Xuetao | if (shift1 != 0) { |
242 | 6e64da3c | Guan Xuetao | env->CF = (x >> 31) & 1; |
243 | 6e64da3c | Guan Xuetao | } |
244 | 6e64da3c | Guan Xuetao | return x;
|
245 | 6e64da3c | Guan Xuetao | } else {
|
246 | 6e64da3c | Guan Xuetao | env->CF = (x >> (shift - 1)) & 1; |
247 | 6e64da3c | Guan Xuetao | return ((uint32_t)x >> shift) | (x << (32 - shift)); |
248 | 6e64da3c | Guan Xuetao | } |
249 | 6e64da3c | Guan Xuetao | } |