2 * PowerPC emulation micro-operations for qemu.
4 * Copyright (c) 2003-2007 Jocelyn Mayer
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.
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.
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
25 #include "host-utils.h"
26 #include "helper_regs.h"
27 #include "op_helper.h"
29 void OPPROTO op_print_mem_EA (void)
35 /* PowerPC state maintenance operations */
37 void OPPROTO op_set_Rc0 (void)
39 env->crf[0] = T0 | xer_so;
43 /* Generate exceptions */
44 void OPPROTO op_raise_exception_err (void)
46 do_raise_exception_err(PARAM1, PARAM2);
49 void OPPROTO op_debug (void)
51 do_raise_exception(EXCP_DEBUG);
54 /* Load/store special registers */
55 void OPPROTO op_load_cr (void)
61 void OPPROTO op_store_cr (void)
67 void OPPROTO op_load_xer_cr (void)
69 T0 = (xer_so << 3) | (xer_ov << 2) | (xer_ca << 1);
73 void OPPROTO op_clear_xer_ov (void)
80 void OPPROTO op_clear_xer_ca (void)
86 void OPPROTO op_load_xer_bc (void)
92 void OPPROTO op_store_xer_bc (void)
98 void OPPROTO op_load_xer (void)
100 T0 = hreg_load_xer(env);
104 void OPPROTO op_store_xer (void)
106 hreg_store_xer(env, T0);
110 #if defined(TARGET_PPC64)
111 void OPPROTO op_store_pri (void)
113 do_store_pri(PARAM1);
118 #if !defined(CONFIG_USER_ONLY)
119 /* Segment registers load and store */
120 void OPPROTO op_load_sr (void)
126 void OPPROTO op_store_sr (void)
128 do_store_sr(env, T1, T0);
132 #if defined(TARGET_PPC64)
133 void OPPROTO op_load_slb (void)
135 T0 = ppc_load_slb(env, T1);
139 void OPPROTO op_store_slb (void)
141 ppc_store_slb(env, T1, T0);
144 #endif /* defined(TARGET_PPC64) */
146 void OPPROTO op_load_sdr1 (void)
152 void OPPROTO op_store_sdr1 (void)
154 do_store_sdr1(env, T0);
158 #if defined (TARGET_PPC64)
159 void OPPROTO op_load_asr (void)
165 void OPPROTO op_store_asr (void)
167 ppc_store_asr(env, T0);
172 void OPPROTO op_load_msr (void)
178 void OPPROTO op_store_msr (void)
184 #if defined (TARGET_PPC64)
185 void OPPROTO op_store_msr_32 (void)
187 T0 = (env->msr & ~0xFFFFFFFFULL) | (T0 & 0xFFFFFFFF);
193 void OPPROTO op_update_riee (void)
195 /* We don't call do_store_msr here as we won't trigger
196 * any special case nor change hflags
198 T0 &= (1 << MSR_RI) | (1 << MSR_EE);
199 env->msr &= ~(1 << MSR_RI) | (1 << MSR_EE);
206 void OPPROTO op_load_spr (void)
208 T0 = env->spr[PARAM1];
212 void OPPROTO op_store_spr (void)
214 env->spr[PARAM1] = T0;
218 void OPPROTO op_load_dump_spr (void)
220 T0 = ppc_load_dump_spr(PARAM1);
224 void OPPROTO op_store_dump_spr (void)
226 ppc_store_dump_spr(PARAM1, T0);
230 void OPPROTO op_mask_spr (void)
232 env->spr[PARAM1] &= ~T0;
236 void OPPROTO op_load_tbl (void)
238 T0 = cpu_ppc_load_tbl(env);
242 void OPPROTO op_load_tbu (void)
244 T0 = cpu_ppc_load_tbu(env);
248 void OPPROTO op_load_atbl (void)
250 T0 = cpu_ppc_load_atbl(env);
254 void OPPROTO op_load_atbu (void)
256 T0 = cpu_ppc_load_atbu(env);
260 #if !defined(CONFIG_USER_ONLY)
261 void OPPROTO op_store_tbl (void)
263 cpu_ppc_store_tbl(env, T0);
267 void OPPROTO op_store_tbu (void)
269 cpu_ppc_store_tbu(env, T0);
273 void OPPROTO op_store_atbl (void)
275 cpu_ppc_store_atbl(env, T0);
279 void OPPROTO op_store_atbu (void)
281 cpu_ppc_store_atbu(env, T0);
285 void OPPROTO op_load_decr (void)
287 T0 = cpu_ppc_load_decr(env);
291 void OPPROTO op_store_decr (void)
293 cpu_ppc_store_decr(env, T0);
297 void OPPROTO op_load_ibat (void)
299 T0 = env->IBAT[PARAM1][PARAM2];
303 void OPPROTO op_store_ibatu (void)
305 do_store_ibatu(env, PARAM1, T0);
309 void OPPROTO op_store_ibatl (void)
312 env->IBAT[1][PARAM1] = T0;
314 do_store_ibatl(env, PARAM1, T0);
319 void OPPROTO op_load_dbat (void)
321 T0 = env->DBAT[PARAM1][PARAM2];
325 void OPPROTO op_store_dbatu (void)
327 do_store_dbatu(env, PARAM1, T0);
331 void OPPROTO op_store_dbatl (void)
334 env->DBAT[1][PARAM1] = T0;
336 do_store_dbatl(env, PARAM1, T0);
340 #endif /* !defined(CONFIG_USER_ONLY) */
343 #ifdef CONFIG_SOFTFLOAT
344 void OPPROTO op_reset_fpstatus (void)
346 env->fp_status.float_exception_flags = 0;
351 void OPPROTO op_compute_fprf (void)
353 do_compute_fprf(PARAM1);
357 #ifdef CONFIG_SOFTFLOAT
358 void OPPROTO op_float_check_status (void)
360 do_float_check_status();
364 void OPPROTO op_float_check_status (void)
366 if (env->exception_index == POWERPC_EXCP_PROGRAM &&
367 (env->error_code & POWERPC_EXCP_FP)) {
368 /* Differred floating-point exception after target FPR update */
369 if (msr_fe0 != 0 || msr_fe1 != 0)
370 do_raise_exception_err(env->exception_index, env->error_code);
376 void OPPROTO op_load_fpscr_FT0 (void)
378 /* The 32 MSB of the target fpr are undefined.
384 u.l.lower = env->fpscr;
389 void OPPROTO op_load_fpscr_T0 (void)
391 T0 = (env->fpscr >> PARAM1) & 0xF;
395 void OPPROTO op_load_fpcc (void)
401 void OPPROTO op_fpscr_resetbit (void)
403 env->fpscr &= PARAM1;
407 void OPPROTO op_fpscr_setbit (void)
409 do_fpscr_setbit(PARAM1);
413 void OPPROTO op_store_fpscr (void)
415 do_store_fpscr(PARAM1);
420 void OPPROTO op_setlr (void)
422 env->lr = (uint32_t)PARAM1;
426 #if defined (TARGET_PPC64)
427 void OPPROTO op_setlr_64 (void)
429 env->lr = ((uint64_t)PARAM1 << 32) | (uint64_t)PARAM2;
434 void OPPROTO op_jz_T0 (void)
441 void OPPROTO op_btest_T1 (void)
444 env->nip = (uint32_t)(T1 & ~3);
446 env->nip = (uint32_t)PARAM1;
451 #if defined (TARGET_PPC64)
452 void OPPROTO op_btest_T1_64 (void)
455 env->nip = (uint64_t)(T1 & ~3);
457 env->nip = ((uint64_t)PARAM1 << 32) | (uint64_t)PARAM2;
463 void OPPROTO op_movl_T1_ctr (void)
469 void OPPROTO op_movl_T1_lr (void)
475 /* tests with result in T0 */
476 void OPPROTO op_test_ctr (void)
478 T0 = (uint32_t)env->ctr;
482 #if defined(TARGET_PPC64)
483 void OPPROTO op_test_ctr_64 (void)
485 T0 = (uint64_t)env->ctr;
490 void OPPROTO op_test_ctr_true (void)
492 T0 = ((uint32_t)env->ctr != 0 && (T0 & PARAM1) != 0);
496 #if defined(TARGET_PPC64)
497 void OPPROTO op_test_ctr_true_64 (void)
499 T0 = ((uint64_t)env->ctr != 0 && (T0 & PARAM1) != 0);
504 void OPPROTO op_test_ctr_false (void)
506 T0 = ((uint32_t)env->ctr != 0 && (T0 & PARAM1) == 0);
510 #if defined(TARGET_PPC64)
511 void OPPROTO op_test_ctr_false_64 (void)
513 T0 = ((uint64_t)env->ctr != 0 && (T0 & PARAM1) == 0);
518 void OPPROTO op_test_ctrz (void)
520 T0 = ((uint32_t)env->ctr == 0);
524 #if defined(TARGET_PPC64)
525 void OPPROTO op_test_ctrz_64 (void)
527 T0 = ((uint64_t)env->ctr == 0);
532 void OPPROTO op_test_ctrz_true (void)
534 T0 = ((uint32_t)env->ctr == 0 && (T0 & PARAM1) != 0);
538 #if defined(TARGET_PPC64)
539 void OPPROTO op_test_ctrz_true_64 (void)
541 T0 = ((uint64_t)env->ctr == 0 && (T0 & PARAM1) != 0);
546 void OPPROTO op_test_ctrz_false (void)
548 T0 = ((uint32_t)env->ctr == 0 && (T0 & PARAM1) == 0);
552 #if defined(TARGET_PPC64)
553 void OPPROTO op_test_ctrz_false_64 (void)
555 T0 = ((uint64_t)env->ctr == 0 && (T0 & PARAM1) == 0);
560 void OPPROTO op_test_true (void)
566 void OPPROTO op_test_false (void)
568 T0 = ((T0 & PARAM1) == 0);
572 /* CTR maintenance */
573 void OPPROTO op_dec_ctr (void)
579 /*** Integer arithmetic ***/
581 void OPPROTO op_check_addo (void)
583 xer_ov = (((uint32_t)T2 ^ (uint32_t)T1 ^ UINT32_MAX) &
584 ((uint32_t)T2 ^ (uint32_t)T0)) >> 31;
589 #if defined(TARGET_PPC64)
590 void OPPROTO op_check_addo_64 (void)
592 xer_ov = (((uint64_t)T2 ^ (uint64_t)T1 ^ UINT64_MAX) &
593 ((uint64_t)T2 ^ (uint64_t)T0)) >> 63;
600 void OPPROTO op_check_addc (void)
602 if (likely((uint32_t)T0 >= (uint32_t)T2)) {
610 #if defined(TARGET_PPC64)
611 void OPPROTO op_check_addc_64 (void)
613 if (likely((uint64_t)T0 >= (uint64_t)T2)) {
623 void OPPROTO op_adde (void)
629 #if defined(TARGET_PPC64)
630 void OPPROTO op_adde_64 (void)
637 /* add to minus one extended */
638 void OPPROTO op_add_me (void)
641 if (likely((uint32_t)T1 != 0))
648 #if defined(TARGET_PPC64)
649 void OPPROTO op_add_me_64 (void)
652 if (likely((uint64_t)T1 != 0))
660 void OPPROTO op_addmeo (void)
666 void OPPROTO op_addmeo_64 (void)
672 /* add to zero extended */
673 void OPPROTO op_add_ze (void)
680 void OPPROTO op_divw (void)
682 if (unlikely(((int32_t)T0 == INT32_MIN && (int32_t)T1 == (int32_t)-1) ||
684 T0 = (int32_t)(UINT32_MAX * ((uint32_t)T0 >> 31));
686 T0 = (int32_t)T0 / (int32_t)T1;
691 #if defined(TARGET_PPC64)
692 void OPPROTO op_divd (void)
694 if (unlikely(((int64_t)T0 == INT64_MIN && (int64_t)T1 == (int64_t)-1LL) ||
696 T0 = (int64_t)(UINT64_MAX * ((uint64_t)T0 >> 63));
698 T0 = (int64_t)T0 / (int64_t)T1;
704 void OPPROTO op_divwo (void)
710 #if defined(TARGET_PPC64)
711 void OPPROTO op_divdo (void)
718 /* divide word unsigned */
719 void OPPROTO op_divwu (void)
721 if (unlikely(T1 == 0)) {
724 T0 = (uint32_t)T0 / (uint32_t)T1;
729 #if defined(TARGET_PPC64)
730 void OPPROTO op_divdu (void)
732 if (unlikely(T1 == 0)) {
741 void OPPROTO op_divwuo (void)
747 #if defined(TARGET_PPC64)
748 void OPPROTO op_divduo (void)
755 /* multiply high word */
756 void OPPROTO op_mulhw (void)
758 T0 = ((int64_t)((int32_t)T0) * (int64_t)((int32_t)T1)) >> 32;
762 #if defined(TARGET_PPC64)
763 void OPPROTO op_mulhd (void)
767 muls64(&tl, &th, T0, T1);
773 /* multiply high word unsigned */
774 void OPPROTO op_mulhwu (void)
776 T0 = ((uint64_t)(uint32_t)T0 * (uint64_t)(uint32_t)T1) >> 32;
780 #if defined(TARGET_PPC64)
781 void OPPROTO op_mulhdu (void)
785 mulu64(&tl, &th, T0, T1);
791 /* multiply low immediate */
792 void OPPROTO op_mulli (void)
794 T0 = ((int32_t)T0 * (int32_t)PARAM1);
798 /* multiply low word */
799 void OPPROTO op_mullw (void)
801 T0 = (int32_t)(T0 * T1);
805 #if defined(TARGET_PPC64)
806 void OPPROTO op_mulld (void)
813 void OPPROTO op_mullwo (void)
819 #if defined(TARGET_PPC64)
820 void OPPROTO op_mulldo (void)
828 void OPPROTO op_neg (void)
830 if (likely(T0 != INT32_MIN)) {
836 #if defined(TARGET_PPC64)
837 void OPPROTO op_neg_64 (void)
839 if (likely(T0 != INT64_MIN)) {
846 void OPPROTO op_nego (void)
852 #if defined(TARGET_PPC64)
853 void OPPROTO op_nego_64 (void)
860 /* subtract from carrying */
861 void OPPROTO op_check_subfc (void)
863 if (likely((uint32_t)T0 > (uint32_t)T1)) {
871 #if defined(TARGET_PPC64)
872 void OPPROTO op_check_subfc_64 (void)
874 if (likely((uint64_t)T0 > (uint64_t)T1)) {
883 /* subtract from extended */
884 void OPPROTO op_subfe (void)
890 #if defined(TARGET_PPC64)
891 void OPPROTO op_subfe_64 (void)
898 /* subtract from immediate carrying */
899 void OPPROTO op_subfic (void)
901 T0 = (int32_t)PARAM1 + ~T0 + 1;
902 if ((uint32_t)T0 <= (uint32_t)PARAM1) {
910 #if defined(TARGET_PPC64)
911 void OPPROTO op_subfic_64 (void)
913 T0 = (int64_t)PARAM1 + ~T0 + 1;
914 if ((uint64_t)T0 <= (uint64_t)PARAM1) {
923 /* subtract from minus one extended */
924 void OPPROTO op_subfme (void)
926 T0 = ~T0 + xer_ca - 1;
927 if (likely((uint32_t)T0 != UINT32_MAX))
934 #if defined(TARGET_PPC64)
935 void OPPROTO op_subfme_64 (void)
937 T0 = ~T0 + xer_ca - 1;
938 if (likely((uint64_t)T0 != UINT64_MAX))
946 void OPPROTO op_subfmeo (void)
952 #if defined(TARGET_PPC64)
953 void OPPROTO op_subfmeo_64 (void)
960 /* subtract from zero extended */
961 void OPPROTO op_subfze (void)
965 if ((uint32_t)T0 < (uint32_t)T1) {
973 #if defined(TARGET_PPC64)
974 void OPPROTO op_subfze_64 (void)
978 if ((uint64_t)T0 < (uint64_t)T1) {
987 void OPPROTO op_subfzeo (void)
993 #if defined(TARGET_PPC64)
994 void OPPROTO op_subfzeo_64 (void)
1001 /*** Integer comparison ***/
1003 void OPPROTO op_cmp (void)
1005 if ((int32_t)T0 < (int32_t)T1) {
1007 } else if ((int32_t)T0 > (int32_t)T1) {
1016 #if defined(TARGET_PPC64)
1017 void OPPROTO op_cmp_64 (void)
1019 if ((int64_t)T0 < (int64_t)T1) {
1021 } else if ((int64_t)T0 > (int64_t)T1) {
1031 /* compare immediate */
1032 void OPPROTO op_cmpi (void)
1034 if ((int32_t)T0 < (int32_t)PARAM1) {
1036 } else if ((int32_t)T0 > (int32_t)PARAM1) {
1045 #if defined(TARGET_PPC64)
1046 void OPPROTO op_cmpi_64 (void)
1048 if ((int64_t)T0 < (int64_t)((int32_t)PARAM1)) {
1050 } else if ((int64_t)T0 > (int64_t)((int32_t)PARAM1)) {
1060 /* compare logical */
1061 void OPPROTO op_cmpl (void)
1063 if ((uint32_t)T0 < (uint32_t)T1) {
1065 } else if ((uint32_t)T0 > (uint32_t)T1) {
1074 #if defined(TARGET_PPC64)
1075 void OPPROTO op_cmpl_64 (void)
1077 if ((uint64_t)T0 < (uint64_t)T1) {
1079 } else if ((uint64_t)T0 > (uint64_t)T1) {
1089 /* compare logical immediate */
1090 void OPPROTO op_cmpli (void)
1092 if ((uint32_t)T0 < (uint32_t)PARAM1) {
1094 } else if ((uint32_t)T0 > (uint32_t)PARAM1) {
1103 #if defined(TARGET_PPC64)
1104 void OPPROTO op_cmpli_64 (void)
1106 if ((uint64_t)T0 < (uint64_t)PARAM1) {
1108 } else if ((uint64_t)T0 > (uint64_t)PARAM1) {
1118 void OPPROTO op_isel (void)
1127 void OPPROTO op_popcntb (void)
1133 #if defined(TARGET_PPC64)
1134 void OPPROTO op_popcntb_64 (void)
1141 /*** Integer logical ***/
1143 void OPPROTO op_and (void)
1150 void OPPROTO op_andc (void)
1156 /* count leading zero */
1157 void OPPROTO op_cntlzw (void)
1163 #if defined(TARGET_PPC64)
1164 void OPPROTO op_cntlzd (void)
1172 void OPPROTO op_eqv (void)
1178 /* extend sign byte */
1179 void OPPROTO op_extsb (void)
1181 #if defined (TARGET_PPC64)
1182 T0 = (int64_t)((int8_t)T0);
1184 T0 = (int32_t)((int8_t)T0);
1189 /* extend sign half word */
1190 void OPPROTO op_extsh (void)
1192 #if defined (TARGET_PPC64)
1193 T0 = (int64_t)((int16_t)T0);
1195 T0 = (int32_t)((int16_t)T0);
1200 #if defined (TARGET_PPC64)
1201 void OPPROTO op_extsw (void)
1203 T0 = (int64_t)((int32_t)T0);
1209 void OPPROTO op_nand (void)
1216 void OPPROTO op_nor (void)
1223 void OPPROTO op_or (void)
1230 void OPPROTO op_orc (void)
1237 void OPPROTO op_ori (void)
1239 T0 |= (uint32_t)PARAM1;
1244 void OPPROTO op_xor (void)
1251 void OPPROTO op_xori (void)
1253 T0 ^= (uint32_t)PARAM1;
1257 /*** Integer rotate ***/
1258 void OPPROTO op_rotl32_T0_T1 (void)
1260 T0 = rotl32(T0, T1 & 0x1F);
1264 void OPPROTO op_rotli32_T0 (void)
1266 T0 = rotl32(T0, PARAM1);
1270 #if defined(TARGET_PPC64)
1271 void OPPROTO op_rotl64_T0_T1 (void)
1273 T0 = rotl64(T0, T1 & 0x3F);
1277 void OPPROTO op_rotli64_T0 (void)
1279 T0 = rotl64(T0, PARAM1);
1284 /*** Integer shift ***/
1285 /* shift left word */
1286 void OPPROTO op_slw (void)
1291 T0 = (uint32_t)(T0 << T1);
1296 #if defined(TARGET_PPC64)
1297 void OPPROTO op_sld (void)
1308 /* shift right algebraic word */
1309 void OPPROTO op_sraw (void)
1315 #if defined(TARGET_PPC64)
1316 void OPPROTO op_srad (void)
1323 /* shift right algebraic word immediate */
1324 void OPPROTO op_srawi (void)
1326 uint32_t mask = (uint32_t)PARAM2;
1328 T0 = (int32_t)T0 >> PARAM1;
1329 if ((int32_t)T1 < 0 && (T1 & mask) != 0) {
1337 #if defined(TARGET_PPC64)
1338 void OPPROTO op_sradi (void)
1340 uint64_t mask = ((uint64_t)PARAM2 << 32) | (uint64_t)PARAM3;
1342 T0 = (int64_t)T0 >> PARAM1;
1343 if ((int64_t)T1 < 0 && ((uint64_t)T1 & mask) != 0) {
1352 /* shift right word */
1353 void OPPROTO op_srw (void)
1358 T0 = (uint32_t)T0 >> T1;
1363 #if defined(TARGET_PPC64)
1364 void OPPROTO op_srd (void)
1369 T0 = (uint64_t)T0 >> T1;
1375 void OPPROTO op_sl_T0_T1 (void)
1381 void OPPROTO op_sli_T0 (void)
1387 void OPPROTO op_sli_T1 (void)
1393 void OPPROTO op_srl_T0_T1 (void)
1395 T0 = (uint32_t)T0 >> T1;
1399 #if defined(TARGET_PPC64)
1400 void OPPROTO op_srl_T0_T1_64 (void)
1402 T0 = (uint32_t)T0 >> T1;
1407 void OPPROTO op_srli_T0 (void)
1409 T0 = (uint32_t)T0 >> PARAM1;
1413 #if defined(TARGET_PPC64)
1414 void OPPROTO op_srli_T0_64 (void)
1416 T0 = (uint64_t)T0 >> PARAM1;
1421 void OPPROTO op_srli_T1 (void)
1423 T1 = (uint32_t)T1 >> PARAM1;
1427 #if defined(TARGET_PPC64)
1428 void OPPROTO op_srli_T1_64 (void)
1430 T1 = (uint64_t)T1 >> PARAM1;
1435 /*** Floating-Point arithmetic ***/
1437 void OPPROTO op_fadd (void)
1439 #if USE_PRECISE_EMULATION
1442 FT0 = float64_add(FT0, FT1, &env->fp_status);
1448 void OPPROTO op_fsub (void)
1450 #if USE_PRECISE_EMULATION
1453 FT0 = float64_sub(FT0, FT1, &env->fp_status);
1459 void OPPROTO op_fmul (void)
1461 #if USE_PRECISE_EMULATION
1464 FT0 = float64_mul(FT0, FT1, &env->fp_status);
1470 void OPPROTO op_fdiv (void)
1472 #if USE_PRECISE_EMULATION
1475 FT0 = float64_div(FT0, FT1, &env->fp_status);
1480 /* fsqrt - fsqrt. */
1481 void OPPROTO op_fsqrt (void)
1488 void OPPROTO op_fre (void)
1495 void OPPROTO op_fres (void)
1501 /* frsqrte - frsqrte. */
1502 void OPPROTO op_frsqrte (void)
1509 void OPPROTO op_fsel (void)
1515 /*** Floating-Point multiply-and-add ***/
1516 /* fmadd - fmadd. */
1517 void OPPROTO op_fmadd (void)
1519 #if USE_PRECISE_EMULATION
1522 FT0 = float64_mul(FT0, FT1, &env->fp_status);
1523 FT0 = float64_add(FT0, FT2, &env->fp_status);
1528 /* fmsub - fmsub. */
1529 void OPPROTO op_fmsub (void)
1531 #if USE_PRECISE_EMULATION
1534 FT0 = float64_mul(FT0, FT1, &env->fp_status);
1535 FT0 = float64_sub(FT0, FT2, &env->fp_status);
1540 /* fnmadd - fnmadd. - fnmadds - fnmadds. */
1541 void OPPROTO op_fnmadd (void)
1547 /* fnmsub - fnmsub. */
1548 void OPPROTO op_fnmsub (void)
1554 /*** Floating-Point round & convert ***/
1556 void OPPROTO op_frsp (void)
1558 #if USE_PRECISE_EMULATION
1561 FT0 = float64_to_float32(FT0, &env->fp_status);
1566 /* fctiw - fctiw. */
1567 void OPPROTO op_fctiw (void)
1573 /* fctiwz - fctiwz. */
1574 void OPPROTO op_fctiwz (void)
1580 #if defined(TARGET_PPC64)
1581 /* fcfid - fcfid. */
1582 void OPPROTO op_fcfid (void)
1588 /* fctid - fctid. */
1589 void OPPROTO op_fctid (void)
1595 /* fctidz - fctidz. */
1596 void OPPROTO op_fctidz (void)
1603 void OPPROTO op_frin (void)
1609 void OPPROTO op_friz (void)
1615 void OPPROTO op_frip (void)
1621 void OPPROTO op_frim (void)
1627 /*** Floating-Point compare ***/
1629 void OPPROTO op_fcmpu (void)
1636 void OPPROTO op_fcmpo (void)
1642 /*** Floating-point move ***/
1644 void OPPROTO op_fabs (void)
1646 FT0 = float64_abs(FT0);
1651 void OPPROTO op_fnabs (void)
1653 FT0 = float64_abs(FT0);
1654 FT0 = float64_chs(FT0);
1659 void OPPROTO op_fneg (void)
1661 FT0 = float64_chs(FT0);
1665 /* Load and store */
1666 #define MEMSUFFIX _raw
1667 #include "op_helper.h"
1669 #if !defined(CONFIG_USER_ONLY)
1670 #define MEMSUFFIX _user
1671 #include "op_helper.h"
1673 #define MEMSUFFIX _kernel
1674 #include "op_helper.h"
1676 #define MEMSUFFIX _hypv
1677 #include "op_helper.h"
1681 /* Special op to check and maybe clear reservation */
1682 void OPPROTO op_check_reservation (void)
1684 if ((uint32_t)env->reserve == (uint32_t)(T0 & ~0x00000003))
1685 env->reserve = (target_ulong)-1ULL;
1689 #if defined(TARGET_PPC64)
1690 void OPPROTO op_check_reservation_64 (void)
1692 if ((uint64_t)env->reserve == (uint64_t)(T0 & ~0x00000003))
1693 env->reserve = (target_ulong)-1ULL;
1698 void OPPROTO op_wait (void)
1704 /* Return from interrupt */
1705 #if !defined(CONFIG_USER_ONLY)
1706 void OPPROTO op_rfi (void)
1712 #if defined(TARGET_PPC64)
1713 void OPPROTO op_rfid (void)
1719 void OPPROTO op_hrfid (void)
1726 /* Exception vectors */
1727 void OPPROTO op_store_excp_prefix (void)
1729 T0 &= env->ivpr_mask;
1730 env->excp_prefix = T0;
1734 void OPPROTO op_store_excp_vector (void)
1736 T0 &= env->ivor_mask;
1737 env->excp_vectors[PARAM1] = T0;
1743 void OPPROTO op_tw (void)
1749 #if defined(TARGET_PPC64)
1750 void OPPROTO op_td (void)
1757 #if !defined(CONFIG_USER_ONLY)
1759 void OPPROTO op_tlbia (void)
1761 ppc_tlb_invalidate_all(env);
1766 void OPPROTO op_tlbie (void)
1768 ppc_tlb_invalidate_one(env, (uint32_t)T0);
1772 #if defined(TARGET_PPC64)
1773 void OPPROTO op_tlbie_64 (void)
1775 ppc_tlb_invalidate_one(env, T0);
1780 #if defined(TARGET_PPC64)
1781 void OPPROTO op_slbia (void)
1783 ppc_slb_invalidate_all(env);
1787 void OPPROTO op_slbie (void)
1789 ppc_slb_invalidate_one(env, (uint32_t)T0);
1793 void OPPROTO op_slbie_64 (void)
1795 ppc_slb_invalidate_one(env, T0);
1801 #if !defined(CONFIG_USER_ONLY)
1802 /* PowerPC 602/603/755 software TLB load instructions */
1803 void OPPROTO op_6xx_tlbld (void)
1809 void OPPROTO op_6xx_tlbli (void)
1815 /* PowerPC 74xx software TLB load instructions */
1816 void OPPROTO op_74xx_tlbld (void)
1818 do_load_74xx_tlb(0);
1822 void OPPROTO op_74xx_tlbli (void)
1824 do_load_74xx_tlb(1);
1830 void OPPROTO op_load_601_rtcl (void)
1832 T0 = cpu_ppc601_load_rtcl(env);
1836 void OPPROTO op_load_601_rtcu (void)
1838 T0 = cpu_ppc601_load_rtcu(env);
1842 #if !defined(CONFIG_USER_ONLY)
1843 void OPPROTO op_store_601_rtcl (void)
1845 cpu_ppc601_store_rtcl(env, T0);
1849 void OPPROTO op_store_601_rtcu (void)
1851 cpu_ppc601_store_rtcu(env, T0);
1855 void OPPROTO op_store_hid0_601 (void)
1857 do_store_hid0_601();
1861 void OPPROTO op_load_601_bat (void)
1863 T0 = env->IBAT[PARAM1][PARAM2];
1867 void OPPROTO op_store_601_batl (void)
1869 do_store_ibatl_601(env, PARAM1, T0);
1873 void OPPROTO op_store_601_batu (void)
1875 do_store_ibatu_601(env, PARAM1, T0);
1878 #endif /* !defined(CONFIG_USER_ONLY) */
1880 /* PowerPC 601 specific instructions (POWER bridge) */
1881 /* XXX: those micro-ops need tests ! */
1882 void OPPROTO op_POWER_abs (void)
1884 if ((int32_t)T0 == INT32_MIN)
1886 else if ((int32_t)T0 < 0)
1891 void OPPROTO op_POWER_abso (void)
1897 void OPPROTO op_POWER_clcs (void)
1903 void OPPROTO op_POWER_div (void)
1909 void OPPROTO op_POWER_divo (void)
1915 void OPPROTO op_POWER_divs (void)
1921 void OPPROTO op_POWER_divso (void)
1927 void OPPROTO op_POWER_doz (void)
1929 if ((int32_t)T1 > (int32_t)T0)
1936 void OPPROTO op_POWER_dozo (void)
1942 void OPPROTO op_load_xer_cmp (void)
1948 void OPPROTO op_POWER_maskg (void)
1954 void OPPROTO op_POWER_maskir (void)
1956 T0 = (T0 & ~T2) | (T1 & T2);
1960 void OPPROTO op_POWER_mul (void)
1964 tmp = (uint64_t)T0 * (uint64_t)T1;
1965 env->spr[SPR_MQ] = tmp >> 32;
1970 void OPPROTO op_POWER_mulo (void)
1976 void OPPROTO op_POWER_nabs (void)
1983 void OPPROTO op_POWER_nabso (void)
1985 /* nabs never overflows */
1992 /* XXX: factorise POWER rotates... */
1993 void OPPROTO op_POWER_rlmi (void)
1995 T0 = rotl32(T0, T2) & PARAM1;
1996 T0 |= T1 & (uint32_t)PARAM2;
2000 void OPPROTO op_POWER_rrib (void)
2003 T0 = rotl32(T0 & INT32_MIN, T2);
2004 T0 |= T1 & ~rotl32(INT32_MIN, T2);
2008 void OPPROTO op_POWER_sle (void)
2011 env->spr[SPR_MQ] = rotl32(T0, T1);
2016 void OPPROTO op_POWER_sleq (void)
2018 uint32_t tmp = env->spr[SPR_MQ];
2021 env->spr[SPR_MQ] = rotl32(T0, T1);
2023 T0 |= tmp >> (32 - T1);
2027 void OPPROTO op_POWER_sllq (void)
2029 uint32_t msk = UINT32_MAX;
2031 msk = msk << (T1 & 0x1FUL);
2035 T0 = (T0 << T1) & msk;
2036 T0 |= env->spr[SPR_MQ] & ~msk;
2040 void OPPROTO op_POWER_slq (void)
2042 uint32_t msk = UINT32_MAX, tmp;
2044 msk = msk << (T1 & 0x1FUL);
2048 tmp = rotl32(T0, T1);
2050 env->spr[SPR_MQ] = tmp;
2054 void OPPROTO op_POWER_sraq (void)
2056 env->spr[SPR_MQ] = rotl32(T0, 32 - (T1 & 0x1FUL));
2060 T0 = (int32_t)T0 >> T1;
2064 void OPPROTO op_POWER_sre (void)
2067 env->spr[SPR_MQ] = rotl32(T0, 32 - T1);
2068 T0 = (int32_t)T0 >> T1;
2072 void OPPROTO op_POWER_srea (void)
2075 env->spr[SPR_MQ] = T0 >> T1;
2076 T0 = (int32_t)T0 >> T1;
2080 void OPPROTO op_POWER_sreq (void)
2086 msk = INT32_MIN >> T1;
2087 tmp = env->spr[SPR_MQ];
2088 env->spr[SPR_MQ] = rotl32(T0, 32 - T1);
2094 void OPPROTO op_POWER_srlq (void)
2099 msk = INT32_MIN >> (T1 & 0x1FUL);
2103 tmp = env->spr[SPR_MQ];
2104 env->spr[SPR_MQ] = rotl32(T0, 32 - T1);
2111 void OPPROTO op_POWER_srq (void)
2114 env->spr[SPR_MQ] = rotl32(T0, 32 - T1);
2119 /* POWER instructions not implemented in PowerPC 601 */
2120 #if !defined(CONFIG_USER_ONLY)
2121 void OPPROTO op_POWER_mfsri (void)
2128 void OPPROTO op_POWER_rac (void)
2134 void OPPROTO op_POWER_rfsvc (void)
2141 /* PowerPC 602 specific instruction */
2142 #if !defined(CONFIG_USER_ONLY)
2143 void OPPROTO op_602_mfrom (void)
2150 /* PowerPC 4xx specific micro-ops */
2151 void OPPROTO op_405_add_T0_T2 (void)
2153 T0 = (int32_t)T0 + (int32_t)T2;
2157 void OPPROTO op_405_mulchw (void)
2159 T0 = ((int16_t)T0) * ((int16_t)(T1 >> 16));
2163 void OPPROTO op_405_mulchwu (void)
2165 T0 = ((uint16_t)T0) * ((uint16_t)(T1 >> 16));
2169 void OPPROTO op_405_mulhhw (void)
2171 T0 = ((int16_t)(T0 >> 16)) * ((int16_t)(T1 >> 16));
2175 void OPPROTO op_405_mulhhwu (void)
2177 T0 = ((uint16_t)(T0 >> 16)) * ((uint16_t)(T1 >> 16));
2181 void OPPROTO op_405_mullhw (void)
2183 T0 = ((int16_t)T0) * ((int16_t)T1);
2187 void OPPROTO op_405_mullhwu (void)
2189 T0 = ((uint16_t)T0) * ((uint16_t)T1);
2193 void OPPROTO op_405_check_sat (void)
2199 void OPPROTO op_405_check_ovu (void)
2201 if (likely(T0 >= T2)) {
2210 void OPPROTO op_405_check_satu (void)
2212 if (unlikely(T0 < T2)) {
2213 /* Saturate result */
2219 void OPPROTO op_load_dcr (void)
2225 void OPPROTO op_store_dcr (void)
2231 #if !defined(CONFIG_USER_ONLY)
2232 /* Return from critical interrupt :
2233 * same as rfi, except nip & MSR are loaded from SRR2/3 instead of SRR0/1
2235 void OPPROTO op_40x_rfci (void)
2241 void OPPROTO op_rfci (void)
2247 void OPPROTO op_rfdi (void)
2253 void OPPROTO op_rfmci (void)
2259 void OPPROTO op_wrte (void)
2261 /* We don't call do_store_msr here as we won't trigger
2262 * any special case nor change hflags
2265 env->msr &= ~(1 << MSR_EE);
2270 void OPPROTO op_440_tlbre (void)
2272 do_440_tlbre(PARAM1);
2276 void OPPROTO op_440_tlbsx (void)
2278 T0 = ppcemb_tlb_search(env, T0, env->spr[SPR_440_MMUCR] & 0xFF);
2282 void OPPROTO op_4xx_tlbsx_check (void)
2293 void OPPROTO op_440_tlbwe (void)
2295 do_440_tlbwe(PARAM1);
2299 void OPPROTO op_4xx_tlbre_lo (void)
2305 void OPPROTO op_4xx_tlbre_hi (void)
2311 void OPPROTO op_4xx_tlbsx (void)
2313 T0 = ppcemb_tlb_search(env, T0, env->spr[SPR_40x_PID]);
2317 void OPPROTO op_4xx_tlbwe_lo (void)
2323 void OPPROTO op_4xx_tlbwe_hi (void)
2332 void OPPROTO op_440_dlmzb (void)
2338 void OPPROTO op_440_dlmzb_update_Rc (void)
2349 #if !defined(CONFIG_USER_ONLY)
2350 void OPPROTO op_store_pir (void)
2352 env->spr[SPR_PIR] = T0 & 0x0000000FUL;
2356 void OPPROTO op_load_403_pb (void)
2358 do_load_403_pb(PARAM1);
2362 void OPPROTO op_store_403_pb (void)
2364 do_store_403_pb(PARAM1);
2368 void OPPROTO op_load_40x_pit (void)
2370 T0 = load_40x_pit(env);
2374 void OPPROTO op_store_40x_pit (void)
2376 store_40x_pit(env, T0);
2380 void OPPROTO op_store_40x_dbcr0 (void)
2382 store_40x_dbcr0(env, T0);
2386 void OPPROTO op_store_40x_sler (void)
2388 store_40x_sler(env, T0);
2392 void OPPROTO op_store_booke_tcr (void)
2394 store_booke_tcr(env, T0);
2398 void OPPROTO op_store_booke_tsr (void)
2400 store_booke_tsr(env, T0);
2403 #endif /* !defined(CONFIG_USER_ONLY) */
2406 void OPPROTO op_splatw_T1_64 (void)
2408 T1_64 = (T1_64 << 32) | (T1_64 & 0x00000000FFFFFFFFULL);
2412 void OPPROTO op_splatwi_T0_64 (void)
2414 uint64_t tmp = PARAM1;
2416 T0_64 = (tmp << 32) | tmp;
2420 void OPPROTO op_splatwi_T1_64 (void)
2422 uint64_t tmp = PARAM1;
2424 T1_64 = (tmp << 32) | tmp;
2428 void OPPROTO op_extsh_T1_64 (void)
2430 T1_64 = (int32_t)((int16_t)T1_64);
2434 void OPPROTO op_sli16_T1_64 (void)
2436 T1_64 = T1_64 << 16;
2440 void OPPROTO op_sli32_T1_64 (void)
2442 T1_64 = T1_64 << 32;
2446 void OPPROTO op_srli32_T1_64 (void)
2448 T1_64 = T1_64 >> 32;
2452 void OPPROTO op_evsel (void)
2458 void OPPROTO op_evaddw (void)
2464 void OPPROTO op_evsubfw (void)
2470 void OPPROTO op_evneg (void)
2476 void OPPROTO op_evabs (void)
2482 void OPPROTO op_evextsh (void)
2484 T0_64 = ((uint64_t)((int32_t)(int16_t)(T0_64 >> 32)) << 32) |
2485 (uint64_t)((int32_t)(int16_t)T0_64);
2489 void OPPROTO op_evextsb (void)
2491 T0_64 = ((uint64_t)((int32_t)(int8_t)(T0_64 >> 32)) << 32) |
2492 (uint64_t)((int32_t)(int8_t)T0_64);
2496 void OPPROTO op_evcntlzw (void)
2502 void OPPROTO op_evrndw (void)
2508 void OPPROTO op_brinc (void)
2514 void OPPROTO op_evcntlsw (void)
2520 void OPPROTO op_evand (void)
2526 void OPPROTO op_evandc (void)
2532 void OPPROTO op_evor (void)
2538 void OPPROTO op_evxor (void)
2544 void OPPROTO op_eveqv (void)
2546 T0_64 = ~(T0_64 ^ T1_64);
2550 void OPPROTO op_evnor (void)
2552 T0_64 = ~(T0_64 | T1_64);
2556 void OPPROTO op_evorc (void)
2562 void OPPROTO op_evnand (void)
2564 T0_64 = ~(T0_64 & T1_64);
2568 void OPPROTO op_evsrws (void)
2574 void OPPROTO op_evsrwu (void)
2580 void OPPROTO op_evslw (void)
2586 void OPPROTO op_evrlw (void)
2592 void OPPROTO op_evmergelo (void)
2594 T0_64 = (T0_64 << 32) | (T1_64 & 0x00000000FFFFFFFFULL);
2598 void OPPROTO op_evmergehi (void)
2600 T0_64 = (T0_64 & 0xFFFFFFFF00000000ULL) | (T1_64 >> 32);
2604 void OPPROTO op_evmergelohi (void)
2606 T0_64 = (T0_64 << 32) | (T1_64 >> 32);
2610 void OPPROTO op_evmergehilo (void)
2612 T0_64 = (T0_64 & 0xFFFFFFFF00000000ULL) | (T1_64 & 0x00000000FFFFFFFFULL);
2616 void OPPROTO op_evcmpgts (void)
2622 void OPPROTO op_evcmpgtu (void)
2628 void OPPROTO op_evcmplts (void)
2634 void OPPROTO op_evcmpltu (void)
2640 void OPPROTO op_evcmpeq (void)
2646 void OPPROTO op_evfssub (void)
2652 void OPPROTO op_evfsadd (void)
2658 void OPPROTO op_evfsnabs (void)
2664 void OPPROTO op_evfsabs (void)
2670 void OPPROTO op_evfsneg (void)
2676 void OPPROTO op_evfsdiv (void)
2682 void OPPROTO op_evfsmul (void)
2688 void OPPROTO op_evfscmplt (void)
2694 void OPPROTO op_evfscmpgt (void)
2700 void OPPROTO op_evfscmpeq (void)
2706 void OPPROTO op_evfscfsi (void)
2712 void OPPROTO op_evfscfui (void)
2718 void OPPROTO op_evfscfsf (void)
2724 void OPPROTO op_evfscfuf (void)
2730 void OPPROTO op_evfsctsi (void)
2736 void OPPROTO op_evfsctui (void)
2742 void OPPROTO op_evfsctsf (void)
2748 void OPPROTO op_evfsctuf (void)
2754 void OPPROTO op_evfsctuiz (void)
2760 void OPPROTO op_evfsctsiz (void)
2766 void OPPROTO op_evfststlt (void)
2772 void OPPROTO op_evfststgt (void)
2778 void OPPROTO op_evfststeq (void)
2784 void OPPROTO op_efssub (void)
2786 T0_64 = _do_efssub(T0_64, T1_64);
2790 void OPPROTO op_efsadd (void)
2792 T0_64 = _do_efsadd(T0_64, T1_64);
2796 void OPPROTO op_efsnabs (void)
2798 T0_64 = _do_efsnabs(T0_64);
2802 void OPPROTO op_efsabs (void)
2804 T0_64 = _do_efsabs(T0_64);
2808 void OPPROTO op_efsneg (void)
2810 T0_64 = _do_efsneg(T0_64);
2814 void OPPROTO op_efsdiv (void)
2816 T0_64 = _do_efsdiv(T0_64, T1_64);
2820 void OPPROTO op_efsmul (void)
2822 T0_64 = _do_efsmul(T0_64, T1_64);
2826 void OPPROTO op_efscmplt (void)
2832 void OPPROTO op_efscmpgt (void)
2838 void OPPROTO op_efscfd (void)
2844 void OPPROTO op_efscmpeq (void)
2850 void OPPROTO op_efscfsi (void)
2856 void OPPROTO op_efscfui (void)
2862 void OPPROTO op_efscfsf (void)
2868 void OPPROTO op_efscfuf (void)
2874 void OPPROTO op_efsctsi (void)
2880 void OPPROTO op_efsctui (void)
2886 void OPPROTO op_efsctsf (void)
2892 void OPPROTO op_efsctuf (void)
2898 void OPPROTO op_efsctsiz (void)
2904 void OPPROTO op_efsctuiz (void)
2910 void OPPROTO op_efststlt (void)
2912 T0 = _do_efststlt(T0_64, T1_64);
2916 void OPPROTO op_efststgt (void)
2918 T0 = _do_efststgt(T0_64, T1_64);
2922 void OPPROTO op_efststeq (void)
2924 T0 = _do_efststeq(T0_64, T1_64);
2928 void OPPROTO op_efdsub (void)
2933 u1.d = float64_sub(u1.d, u2.d, &env->spe_status);
2938 void OPPROTO op_efdadd (void)
2943 u1.d = float64_add(u1.d, u2.d, &env->spe_status);
2948 void OPPROTO op_efdcfsid (void)
2954 void OPPROTO op_efdcfuid (void)
2960 void OPPROTO op_efdnabs (void)
2962 T0_64 |= 0x8000000000000000ULL;
2966 void OPPROTO op_efdabs (void)
2968 T0_64 &= ~0x8000000000000000ULL;
2972 void OPPROTO op_efdneg (void)
2974 T0_64 ^= 0x8000000000000000ULL;
2978 void OPPROTO op_efddiv (void)
2983 u1.d = float64_div(u1.d, u2.d, &env->spe_status);
2988 void OPPROTO op_efdmul (void)
2993 u1.d = float64_mul(u1.d, u2.d, &env->spe_status);
2998 void OPPROTO op_efdctsidz (void)
3004 void OPPROTO op_efdctuidz (void)
3010 void OPPROTO op_efdcmplt (void)
3016 void OPPROTO op_efdcmpgt (void)
3022 void OPPROTO op_efdcfs (void)
3028 void OPPROTO op_efdcmpeq (void)
3034 void OPPROTO op_efdcfsi (void)
3040 void OPPROTO op_efdcfui (void)
3046 void OPPROTO op_efdcfsf (void)
3052 void OPPROTO op_efdcfuf (void)
3058 void OPPROTO op_efdctsi (void)
3064 void OPPROTO op_efdctui (void)
3070 void OPPROTO op_efdctsf (void)
3076 void OPPROTO op_efdctuf (void)
3082 void OPPROTO op_efdctuiz (void)
3088 void OPPROTO op_efdctsiz (void)
3094 void OPPROTO op_efdtstlt (void)
3096 T0 = _do_efdtstlt(T0_64, T1_64);
3100 void OPPROTO op_efdtstgt (void)
3102 T0 = _do_efdtstgt(T0_64, T1_64);
3106 void OPPROTO op_efdtsteq (void)
3108 T0 = _do_efdtsteq(T0_64, T1_64);