root / target-ppc / op_helper.h @ 0487d6a8
History | View | Annotate | Download (10.5 kB)
1 |
/*
|
---|---|
2 |
* PowerPC emulation helpers header for qemu.
|
3 |
*
|
4 |
* Copyright (c) 2003-2007 Jocelyn Mayer
|
5 |
*
|
6 |
* This library is free software; you can redistribute it and/or
|
7 |
* modify it under the terms of the GNU Lesser General Public
|
8 |
* License as published by the Free Software Foundation; either
|
9 |
* version 2 of the License, or (at your option) any later version.
|
10 |
*
|
11 |
* This library is distributed in the hope that it will be useful,
|
12 |
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
13 |
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
14 |
* Lesser General Public License for more details.
|
15 |
*
|
16 |
* You should have received a copy of the GNU Lesser General Public
|
17 |
* License along with this library; if not, write to the Free Software
|
18 |
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
19 |
*/
|
20 |
|
21 |
#if defined(MEMSUFFIX)
|
22 |
|
23 |
/* Memory load/store helpers */
|
24 |
void glue(do_lsw, MEMSUFFIX) (int dst); |
25 |
void glue(do_lsw_le, MEMSUFFIX) (int dst); |
26 |
void glue(do_stsw, MEMSUFFIX) (int src); |
27 |
void glue(do_stsw_le, MEMSUFFIX) (int src); |
28 |
void glue(do_lmw, MEMSUFFIX) (int dst); |
29 |
void glue(do_lmw_le, MEMSUFFIX) (int dst); |
30 |
void glue(do_stmw, MEMSUFFIX) (int src); |
31 |
void glue(do_stmw_le, MEMSUFFIX) (int src); |
32 |
void glue(do_icbi, MEMSUFFIX) (void); |
33 |
void glue(do_POWER_lscbx, MEMSUFFIX) (int dest, int ra, int rb); |
34 |
void glue(do_POWER2_lfq, MEMSUFFIX) (void); |
35 |
void glue(do_POWER2_lfq_le, MEMSUFFIX) (void); |
36 |
void glue(do_POWER2_stfq, MEMSUFFIX) (void); |
37 |
void glue(do_POWER2_stfq_le, MEMSUFFIX) (void); |
38 |
|
39 |
#if defined(TARGET_PPC64)
|
40 |
void glue(do_lsw_64, MEMSUFFIX) (int dst); |
41 |
void glue(do_lsw_le_64, MEMSUFFIX) (int dst); |
42 |
void glue(do_stsw_64, MEMSUFFIX) (int src); |
43 |
void glue(do_stsw_le_64, MEMSUFFIX) (int src); |
44 |
void glue(do_lmw_64, MEMSUFFIX) (int dst); |
45 |
void glue(do_lmw_le_64, MEMSUFFIX) (int dst); |
46 |
void glue(do_stmw_64, MEMSUFFIX) (int src); |
47 |
void glue(do_stmw_le_64, MEMSUFFIX) (int src); |
48 |
void glue(do_icbi_64, MEMSUFFIX) (void); |
49 |
#endif
|
50 |
|
51 |
#else
|
52 |
|
53 |
/* Registers load and stores */
|
54 |
void do_load_cr (void); |
55 |
void do_store_cr (uint32_t mask);
|
56 |
void do_load_xer (void); |
57 |
void do_store_xer (void); |
58 |
void do_load_fpscr (void); |
59 |
void do_store_fpscr (uint32_t mask);
|
60 |
|
61 |
/* Integer arithmetic helpers */
|
62 |
void do_adde (void); |
63 |
void do_addmeo (void); |
64 |
void do_divwo (void); |
65 |
void do_divwuo (void); |
66 |
void do_mullwo (void); |
67 |
void do_nego (void); |
68 |
void do_subfe (void); |
69 |
void do_subfmeo (void); |
70 |
void do_subfzeo (void); |
71 |
void do_sraw (void); |
72 |
#if defined(TARGET_PPC64)
|
73 |
void do_adde_64 (void); |
74 |
void do_addmeo_64 (void); |
75 |
void do_imul64 (uint64_t *tl, uint64_t *th);
|
76 |
void do_mul64 (uint64_t *tl, uint64_t *th);
|
77 |
void do_divdo (void); |
78 |
void do_divduo (void); |
79 |
void do_mulldo (void); |
80 |
void do_nego_64 (void); |
81 |
void do_subfe_64 (void); |
82 |
void do_subfmeo_64 (void); |
83 |
void do_subfzeo_64 (void); |
84 |
void do_srad (void); |
85 |
#endif
|
86 |
void do_popcntb (void); |
87 |
#if defined(TARGET_PPC64)
|
88 |
void do_popcntb_64 (void); |
89 |
#endif
|
90 |
|
91 |
/* Floating-point arithmetic helpers */
|
92 |
void do_fsqrt (void); |
93 |
void do_fres (void); |
94 |
void do_frsqrte (void); |
95 |
void do_fsel (void); |
96 |
void do_fnmadd (void); |
97 |
void do_fnmsub (void); |
98 |
void do_fctiw (void); |
99 |
void do_fctiwz (void); |
100 |
void do_fcmpu (void); |
101 |
void do_fcmpo (void); |
102 |
|
103 |
/* Misc */
|
104 |
void do_tw (int flags); |
105 |
#if defined(TARGET_PPC64)
|
106 |
void do_td (int flags); |
107 |
#endif
|
108 |
#if !defined(CONFIG_USER_ONLY)
|
109 |
void do_rfi (void); |
110 |
#if defined(TARGET_PPC64)
|
111 |
void do_rfi_32 (void); |
112 |
#endif
|
113 |
void do_tlbia (void); |
114 |
void do_tlbie (void); |
115 |
#if defined(TARGET_PPC64)
|
116 |
void do_tlbie_64 (void); |
117 |
#endif
|
118 |
void do_load_6xx_tlb (int is_code); |
119 |
#if defined(TARGET_PPC64)
|
120 |
void do_slbia (void); |
121 |
void do_slbie (void); |
122 |
#endif
|
123 |
#endif
|
124 |
|
125 |
/* POWER / PowerPC 601 specific helpers */
|
126 |
void do_store_601_batu (int nr); |
127 |
void do_POWER_abso (void); |
128 |
void do_POWER_clcs (void); |
129 |
void do_POWER_div (void); |
130 |
void do_POWER_divo (void); |
131 |
void do_POWER_divs (void); |
132 |
void do_POWER_divso (void); |
133 |
void do_POWER_dozo (void); |
134 |
void do_POWER_maskg (void); |
135 |
void do_POWER_mulo (void); |
136 |
#if !defined(CONFIG_USER_ONLY)
|
137 |
void do_POWER_rac (void); |
138 |
void do_POWER_rfsvc (void); |
139 |
#endif
|
140 |
|
141 |
/* PowerPC 602 specific helper */
|
142 |
#if !defined(CONFIG_USER_ONLY)
|
143 |
void do_op_602_mfrom (void); |
144 |
#endif
|
145 |
|
146 |
/* PowerPC 4xx specific helpers */
|
147 |
void do_405_check_ov (void); |
148 |
void do_405_check_sat (void); |
149 |
#if !defined(CONFIG_USER_ONLY)
|
150 |
void do_4xx_load_dcr (int dcrn); |
151 |
void do_4xx_store_dcr (int dcrn); |
152 |
void do_4xx_rfci (void); |
153 |
void do_4xx_tlbre_lo (void); |
154 |
void do_4xx_tlbre_hi (void); |
155 |
void do_4xx_tlbsx (void); |
156 |
void do_4xx_tlbsx_ (void); |
157 |
void do_4xx_tlbwe_lo (void); |
158 |
void do_4xx_tlbwe_hi (void); |
159 |
#endif
|
160 |
|
161 |
/* PowerPC 440 specific helpers */
|
162 |
void do_440_dlmzb (void); |
163 |
|
164 |
/* PowerPC 403 specific helpers */
|
165 |
#if !defined(CONFIG_USER_ONLY)
|
166 |
void do_load_403_pb (int num); |
167 |
void do_store_403_pb (int num); |
168 |
#endif
|
169 |
|
170 |
#if defined(TARGET_PPCSPE)
|
171 |
/* SPE extension helpers */
|
172 |
void do_brinc (void); |
173 |
/* Fixed-point vector helpers */
|
174 |
void do_evabs (void); |
175 |
void do_evaddw (void); |
176 |
void do_evcntlsw (void); |
177 |
void do_evcntlzw (void); |
178 |
void do_evneg (void); |
179 |
void do_evrlw (void); |
180 |
void do_evsel (void); |
181 |
void do_evrndw (void); |
182 |
void do_evslw (void); |
183 |
void do_evsrws (void); |
184 |
void do_evsrwu (void); |
185 |
void do_evsubfw (void); |
186 |
void do_evcmpeq (void); |
187 |
void do_evcmpgts (void); |
188 |
void do_evcmpgtu (void); |
189 |
void do_evcmplts (void); |
190 |
void do_evcmpltu (void); |
191 |
|
192 |
/* Single precision floating-point helpers */
|
193 |
void do_efscmplt (void); |
194 |
void do_efscmpgt (void); |
195 |
void do_efscmpeq (void); |
196 |
void do_efscfsf (void); |
197 |
void do_efscfuf (void); |
198 |
void do_efsctsf (void); |
199 |
void do_efsctuf (void); |
200 |
|
201 |
void do_efscfsi (void); |
202 |
void do_efscfui (void); |
203 |
void do_efsctsi (void); |
204 |
void do_efsctui (void); |
205 |
void do_efsctsiz (void); |
206 |
void do_efsctuiz (void); |
207 |
|
208 |
/* Double precision floating-point helpers */
|
209 |
void do_efdcmplt (void); |
210 |
void do_efdcmpgt (void); |
211 |
void do_efdcmpeq (void); |
212 |
void do_efdcfsf (void); |
213 |
void do_efdcfuf (void); |
214 |
void do_efdctsf (void); |
215 |
void do_efdctuf (void); |
216 |
|
217 |
void do_efdcfsi (void); |
218 |
void do_efdcfui (void); |
219 |
void do_efdctsi (void); |
220 |
void do_efdctui (void); |
221 |
void do_efdctsiz (void); |
222 |
void do_efdctuiz (void); |
223 |
|
224 |
void do_efdcfs (void); |
225 |
void do_efscfd (void); |
226 |
|
227 |
/* Floating-point vector helpers */
|
228 |
void do_evfsabs (void); |
229 |
void do_evfsnabs (void); |
230 |
void do_evfsneg (void); |
231 |
void do_evfsadd (void); |
232 |
void do_evfssub (void); |
233 |
void do_evfsmul (void); |
234 |
void do_evfsdiv (void); |
235 |
void do_evfscmplt (void); |
236 |
void do_evfscmpgt (void); |
237 |
void do_evfscmpeq (void); |
238 |
void do_evfststlt (void); |
239 |
void do_evfststgt (void); |
240 |
void do_evfststeq (void); |
241 |
void do_evfscfsi (void); |
242 |
void do_evfscfui (void); |
243 |
void do_evfscfsf (void); |
244 |
void do_evfscfuf (void); |
245 |
void do_evfsctsf (void); |
246 |
void do_evfsctuf (void); |
247 |
void do_evfsctsi (void); |
248 |
void do_evfsctui (void); |
249 |
void do_evfsctsiz (void); |
250 |
void do_evfsctuiz (void); |
251 |
#endif /* defined(TARGET_PPCSPE) */ |
252 |
|
253 |
/* Inlined helpers: used in micro-operation as well as helpers */
|
254 |
/* Generic fixed-point helpers */
|
255 |
static inline int _do_cntlzw (uint32_t val) |
256 |
{ |
257 |
int cnt = 0; |
258 |
if (!(val & 0xFFFF0000UL)) { |
259 |
cnt += 16;
|
260 |
val <<= 16;
|
261 |
} |
262 |
if (!(val & 0xFF000000UL)) { |
263 |
cnt += 8;
|
264 |
val <<= 8;
|
265 |
} |
266 |
if (!(val & 0xF0000000UL)) { |
267 |
cnt += 4;
|
268 |
val <<= 4;
|
269 |
} |
270 |
if (!(val & 0xC0000000UL)) { |
271 |
cnt += 2;
|
272 |
val <<= 2;
|
273 |
} |
274 |
if (!(val & 0x80000000UL)) { |
275 |
cnt++; |
276 |
val <<= 1;
|
277 |
} |
278 |
if (!(val & 0x80000000UL)) { |
279 |
cnt++; |
280 |
} |
281 |
return cnt;
|
282 |
} |
283 |
|
284 |
static inline int _do_cntlzd (uint64_t val) |
285 |
{ |
286 |
int cnt = 0; |
287 |
#if HOST_LONG_BITS == 64 |
288 |
if (!(val & 0xFFFFFFFF00000000ULL)) { |
289 |
cnt += 32;
|
290 |
val <<= 32;
|
291 |
} |
292 |
if (!(val & 0xFFFF000000000000ULL)) { |
293 |
cnt += 16;
|
294 |
val <<= 16;
|
295 |
} |
296 |
if (!(val & 0xFF00000000000000ULL)) { |
297 |
cnt += 8;
|
298 |
val <<= 8;
|
299 |
} |
300 |
if (!(val & 0xF000000000000000ULL)) { |
301 |
cnt += 4;
|
302 |
val <<= 4;
|
303 |
} |
304 |
if (!(val & 0xC000000000000000ULL)) { |
305 |
cnt += 2;
|
306 |
val <<= 2;
|
307 |
} |
308 |
if (!(val & 0x8000000000000000ULL)) { |
309 |
cnt++; |
310 |
val <<= 1;
|
311 |
} |
312 |
if (!(val & 0x8000000000000000ULL)) { |
313 |
cnt++; |
314 |
} |
315 |
#else
|
316 |
uint32_t tmp; |
317 |
/* Make it easier on 32 bits host machines */
|
318 |
if (!(val >> 32)) |
319 |
cnt = cntlzw(val) + 32;
|
320 |
else
|
321 |
cnt = cntlzw(val >> 32);
|
322 |
#endif
|
323 |
return cnt;
|
324 |
} |
325 |
|
326 |
#if defined(TARGET_PPCSPE)
|
327 |
/* SPE extension */
|
328 |
/* Single precision floating-point helpers */
|
329 |
static inline uint32_t _do_efsabs (uint32_t val) |
330 |
{ |
331 |
return val & ~0x80000000; |
332 |
} |
333 |
static inline uint32_t _do_efsnabs (uint32_t val) |
334 |
{ |
335 |
return val | 0x80000000; |
336 |
} |
337 |
static inline uint32_t _do_efsneg (uint32_t val) |
338 |
{ |
339 |
return val ^ 0x80000000; |
340 |
} |
341 |
static inline uint32_t _do_efsadd (uint32_t op1, uint32_t op2) |
342 |
{ |
343 |
union {
|
344 |
uint32_t u; |
345 |
float32 f; |
346 |
} u1, u2; |
347 |
u1.u = op1; |
348 |
u2.u = op2; |
349 |
u1.f = float32_add(u1.f, u2.f, &env->spe_status); |
350 |
return u1.u;
|
351 |
} |
352 |
static inline uint32_t _do_efssub (uint32_t op1, uint32_t op2) |
353 |
{ |
354 |
union {
|
355 |
uint32_t u; |
356 |
float32 f; |
357 |
} u1, u2; |
358 |
u1.u = op1; |
359 |
u2.u = op2; |
360 |
u1.f = float32_sub(u1.f, u2.f, &env->spe_status); |
361 |
return u1.u;
|
362 |
} |
363 |
static inline uint32_t _do_efsmul (uint32_t op1, uint32_t op2) |
364 |
{ |
365 |
union {
|
366 |
uint32_t u; |
367 |
float32 f; |
368 |
} u1, u2; |
369 |
u1.u = op1; |
370 |
u2.u = op2; |
371 |
u1.f = float32_mul(u1.f, u2.f, &env->spe_status); |
372 |
return u1.u;
|
373 |
} |
374 |
static inline uint32_t _do_efsdiv (uint32_t op1, uint32_t op2) |
375 |
{ |
376 |
union {
|
377 |
uint32_t u; |
378 |
float32 f; |
379 |
} u1, u2; |
380 |
u1.u = op1; |
381 |
u2.u = op2; |
382 |
u1.f = float32_div(u1.f, u2.f, &env->spe_status); |
383 |
return u1.u;
|
384 |
} |
385 |
|
386 |
static inline int _do_efststlt (uint32_t op1, uint32_t op2) |
387 |
{ |
388 |
union {
|
389 |
uint32_t u; |
390 |
float32 f; |
391 |
} u1, u2; |
392 |
u1.u = op1; |
393 |
u2.u = op2; |
394 |
return float32_lt(u1.f, u2.f, &env->spe_status) ? 1 : 0; |
395 |
} |
396 |
static inline int _do_efststgt (uint32_t op1, uint32_t op2) |
397 |
{ |
398 |
union {
|
399 |
uint32_t u; |
400 |
float32 f; |
401 |
} u1, u2; |
402 |
u1.u = op1; |
403 |
u2.u = op2; |
404 |
return float32_le(u1.f, u2.f, &env->spe_status) ? 0 : 1; |
405 |
} |
406 |
static inline int _do_efststeq (uint32_t op1, uint32_t op2) |
407 |
{ |
408 |
union {
|
409 |
uint32_t u; |
410 |
float32 f; |
411 |
} u1, u2; |
412 |
u1.u = op1; |
413 |
u2.u = op2; |
414 |
return float32_eq(u1.f, u2.f, &env->spe_status) ? 1 : 0; |
415 |
} |
416 |
/* Double precision floating-point helpers */
|
417 |
static inline int _do_efdtstlt (uint64_t op1, uint64_t op2) |
418 |
{ |
419 |
union {
|
420 |
uint64_t u; |
421 |
float64 f; |
422 |
} u1, u2; |
423 |
u1.u = op1; |
424 |
u2.u = op2; |
425 |
return float64_lt(u1.f, u2.f, &env->spe_status) ? 1 : 0; |
426 |
} |
427 |
static inline int _do_efdtstgt (uint64_t op1, uint64_t op2) |
428 |
{ |
429 |
union {
|
430 |
uint64_t u; |
431 |
float64 f; |
432 |
} u1, u2; |
433 |
u1.u = op1; |
434 |
u2.u = op2; |
435 |
return float64_le(u1.f, u2.f, &env->spe_status) ? 0 : 1; |
436 |
} |
437 |
static inline int _do_efdtsteq (uint64_t op1, uint64_t op2) |
438 |
{ |
439 |
union {
|
440 |
uint64_t u; |
441 |
float64 f; |
442 |
} u1, u2; |
443 |
u1.u = op1; |
444 |
u2.u = op2; |
445 |
return float64_eq(u1.f, u2.f, &env->spe_status) ? 1 : 0; |
446 |
} |
447 |
#endif /* defined(TARGET_PPCSPE) */ |
448 |
#endif
|