ppc: Convert op_andi to TCG
[qemu] / target-ppc / op.c
1 /*
2  *  PowerPC emulation micro-operations 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 //#define DEBUG_OP
22
23 #include "config.h"
24 #include "exec.h"
25 #include "host-utils.h"
26 #include "helper_regs.h"
27 #include "op_helper.h"
28
29 void OPPROTO op_print_mem_EA (void)
30 {
31     do_print_mem_EA(T0);
32     RETURN();
33 }
34
35 /* PowerPC state maintenance operations */
36 /* set_Rc0 */
37 void OPPROTO op_set_Rc0 (void)
38 {
39     env->crf[0] = T0 | xer_so;
40     RETURN();
41 }
42
43 /* Generate exceptions */
44 void OPPROTO op_raise_exception_err (void)
45 {
46     do_raise_exception_err(PARAM1, PARAM2);
47 }
48
49 void OPPROTO op_debug (void)
50 {
51     do_raise_exception(EXCP_DEBUG);
52 }
53
54 /* Load/store special registers */
55 void OPPROTO op_load_cr (void)
56 {
57     do_load_cr();
58     RETURN();
59 }
60
61 void OPPROTO op_store_cr (void)
62 {
63     do_store_cr(PARAM1);
64     RETURN();
65 }
66
67 void OPPROTO op_load_xer_cr (void)
68 {
69     T0 = (xer_so << 3) | (xer_ov << 2) | (xer_ca << 1);
70     RETURN();
71 }
72
73 void OPPROTO op_clear_xer_ov (void)
74 {
75     xer_so = 0;
76     xer_ov = 0;
77     RETURN();
78 }
79
80 void OPPROTO op_clear_xer_ca (void)
81 {
82     xer_ca = 0;
83     RETURN();
84 }
85
86 void OPPROTO op_load_xer_bc (void)
87 {
88     T1 = xer_bc;
89     RETURN();
90 }
91
92 void OPPROTO op_store_xer_bc (void)
93 {
94     xer_bc = T0;
95     RETURN();
96 }
97
98 void OPPROTO op_load_xer (void)
99 {
100     T0 = hreg_load_xer(env);
101     RETURN();
102 }
103
104 void OPPROTO op_store_xer (void)
105 {
106     hreg_store_xer(env, T0);
107     RETURN();
108 }
109
110 #if defined(TARGET_PPC64)
111 void OPPROTO op_store_pri (void)
112 {
113     do_store_pri(PARAM1);
114     RETURN();
115 }
116 #endif
117
118 #if !defined(CONFIG_USER_ONLY)
119 /* Segment registers load and store */
120 void OPPROTO op_load_sr (void)
121 {
122     T0 = env->sr[T1];
123     RETURN();
124 }
125
126 void OPPROTO op_store_sr (void)
127 {
128     do_store_sr(env, T1, T0);
129     RETURN();
130 }
131
132 #if defined(TARGET_PPC64)
133 void OPPROTO op_load_slb (void)
134 {
135     T0 = ppc_load_slb(env, T1);
136     RETURN();
137 }
138
139 void OPPROTO op_store_slb (void)
140 {
141     ppc_store_slb(env, T1, T0);
142     RETURN();
143 }
144 #endif /* defined(TARGET_PPC64) */
145
146 void OPPROTO op_load_sdr1 (void)
147 {
148     T0 = env->sdr1;
149     RETURN();
150 }
151
152 void OPPROTO op_store_sdr1 (void)
153 {
154     do_store_sdr1(env, T0);
155     RETURN();
156 }
157
158 #if defined (TARGET_PPC64)
159 void OPPROTO op_load_asr (void)
160 {
161     T0 = env->asr;
162     RETURN();
163 }
164
165 void OPPROTO op_store_asr (void)
166 {
167     ppc_store_asr(env, T0);
168     RETURN();
169 }
170 #endif
171
172 void OPPROTO op_load_msr (void)
173 {
174     T0 = env->msr;
175     RETURN();
176 }
177
178 void OPPROTO op_store_msr (void)
179 {
180     do_store_msr();
181     RETURN();
182 }
183
184 #if defined (TARGET_PPC64)
185 void OPPROTO op_store_msr_32 (void)
186 {
187     T0 = (env->msr & ~0xFFFFFFFFULL) | (T0 & 0xFFFFFFFF);
188     do_store_msr();
189     RETURN();
190 }
191 #endif
192
193 void OPPROTO op_update_riee (void)
194 {
195     /* We don't call do_store_msr here as we won't trigger
196      * any special case nor change hflags
197      */
198     T0 &= (1 << MSR_RI) | (1 << MSR_EE);
199     env->msr &= ~(1 << MSR_RI) | (1 << MSR_EE);
200     env->msr |= T0;
201     RETURN();
202 }
203 #endif
204
205 /* SPR */
206 void OPPROTO op_load_spr (void)
207 {
208     T0 = env->spr[PARAM1];
209     RETURN();
210 }
211
212 void OPPROTO op_store_spr (void)
213 {
214     env->spr[PARAM1] = T0;
215     RETURN();
216 }
217
218 void OPPROTO op_load_dump_spr (void)
219 {
220     T0 = ppc_load_dump_spr(PARAM1);
221     RETURN();
222 }
223
224 void OPPROTO op_store_dump_spr (void)
225 {
226     ppc_store_dump_spr(PARAM1, T0);
227     RETURN();
228 }
229
230 void OPPROTO op_mask_spr (void)
231 {
232     env->spr[PARAM1] &= ~T0;
233     RETURN();
234 }
235
236 void OPPROTO op_load_tbl (void)
237 {
238     T0 = cpu_ppc_load_tbl(env);
239     RETURN();
240 }
241
242 void OPPROTO op_load_tbu (void)
243 {
244     T0 = cpu_ppc_load_tbu(env);
245     RETURN();
246 }
247
248 void OPPROTO op_load_atbl (void)
249 {
250     T0 = cpu_ppc_load_atbl(env);
251     RETURN();
252 }
253
254 void OPPROTO op_load_atbu (void)
255 {
256     T0 = cpu_ppc_load_atbu(env);
257     RETURN();
258 }
259
260 #if !defined(CONFIG_USER_ONLY)
261 void OPPROTO op_store_tbl (void)
262 {
263     cpu_ppc_store_tbl(env, T0);
264     RETURN();
265 }
266
267 void OPPROTO op_store_tbu (void)
268 {
269     cpu_ppc_store_tbu(env, T0);
270     RETURN();
271 }
272
273 void OPPROTO op_store_atbl (void)
274 {
275     cpu_ppc_store_atbl(env, T0);
276     RETURN();
277 }
278
279 void OPPROTO op_store_atbu (void)
280 {
281     cpu_ppc_store_atbu(env, T0);
282     RETURN();
283 }
284
285 void OPPROTO op_load_decr (void)
286 {
287     T0 = cpu_ppc_load_decr(env);
288     RETURN();
289 }
290
291 void OPPROTO op_store_decr (void)
292 {
293     cpu_ppc_store_decr(env, T0);
294     RETURN();
295 }
296
297 void OPPROTO op_load_ibat (void)
298 {
299     T0 = env->IBAT[PARAM1][PARAM2];
300     RETURN();
301 }
302
303 void OPPROTO op_store_ibatu (void)
304 {
305     do_store_ibatu(env, PARAM1, T0);
306     RETURN();
307 }
308
309 void OPPROTO op_store_ibatl (void)
310 {
311 #if 1
312     env->IBAT[1][PARAM1] = T0;
313 #else
314     do_store_ibatl(env, PARAM1, T0);
315 #endif
316     RETURN();
317 }
318
319 void OPPROTO op_load_dbat (void)
320 {
321     T0 = env->DBAT[PARAM1][PARAM2];
322     RETURN();
323 }
324
325 void OPPROTO op_store_dbatu (void)
326 {
327     do_store_dbatu(env, PARAM1, T0);
328     RETURN();
329 }
330
331 void OPPROTO op_store_dbatl (void)
332 {
333 #if 1
334     env->DBAT[1][PARAM1] = T0;
335 #else
336     do_store_dbatl(env, PARAM1, T0);
337 #endif
338     RETURN();
339 }
340 #endif /* !defined(CONFIG_USER_ONLY) */
341
342 /* FPSCR */
343 #ifdef CONFIG_SOFTFLOAT
344 void OPPROTO op_reset_fpstatus (void)
345 {
346     env->fp_status.float_exception_flags = 0;
347     RETURN();
348 }
349 #endif
350
351 void OPPROTO op_compute_fprf (void)
352 {
353     do_compute_fprf(PARAM1);
354     RETURN();
355 }
356
357 #ifdef CONFIG_SOFTFLOAT
358 void OPPROTO op_float_check_status (void)
359 {
360     do_float_check_status();
361     RETURN();
362 }
363 #else
364 void OPPROTO op_float_check_status (void)
365 {
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);
371     }
372     RETURN();
373 }
374 #endif
375
376 void OPPROTO op_load_fpscr_FT0 (void)
377 {
378     /* The 32 MSB of the target fpr are undefined.
379      * They'll be zero...
380      */
381     CPU_DoubleU u;
382
383     u.l.upper = 0;
384     u.l.lower = env->fpscr;
385     FT0 = u.d;
386     RETURN();
387 }
388
389 void OPPROTO op_load_fpscr_T0 (void)
390 {
391     T0 = (env->fpscr >> PARAM1) & 0xF;
392     RETURN();
393 }
394
395 void OPPROTO op_load_fpcc (void)
396 {
397     T0 = fpscr_fpcc;
398     RETURN();
399 }
400
401 void OPPROTO op_fpscr_resetbit (void)
402 {
403     env->fpscr &= PARAM1;
404     RETURN();
405 }
406
407 void OPPROTO op_fpscr_setbit (void)
408 {
409     do_fpscr_setbit(PARAM1);
410     RETURN();
411 }
412
413 void OPPROTO op_store_fpscr (void)
414 {
415     do_store_fpscr(PARAM1);
416     RETURN();
417 }
418
419 /* Branch */
420 void OPPROTO op_setlr (void)
421 {
422     env->lr = (uint32_t)PARAM1;
423     RETURN();
424 }
425
426 #if defined (TARGET_PPC64)
427 void OPPROTO op_setlr_64 (void)
428 {
429     env->lr = ((uint64_t)PARAM1 << 32) | (uint64_t)PARAM2;
430     RETURN();
431 }
432 #endif
433
434 void OPPROTO op_jz_T0 (void)
435 {
436     if (!T0)
437         GOTO_LABEL_PARAM(1);
438     RETURN();
439 }
440
441 void OPPROTO op_btest_T1 (void)
442 {
443     if (T0) {
444         env->nip = (uint32_t)(T1 & ~3);
445     } else {
446         env->nip = (uint32_t)PARAM1;
447     }
448     RETURN();
449 }
450
451 #if defined (TARGET_PPC64)
452 void OPPROTO op_btest_T1_64 (void)
453 {
454     if (T0) {
455         env->nip = (uint64_t)(T1 & ~3);
456     } else {
457         env->nip = ((uint64_t)PARAM1 << 32) | (uint64_t)PARAM2;
458     }
459     RETURN();
460 }
461 #endif
462
463 void OPPROTO op_movl_T1_ctr (void)
464 {
465     T1 = env->ctr;
466     RETURN();
467 }
468
469 void OPPROTO op_movl_T1_lr (void)
470 {
471     T1 = env->lr;
472     RETURN();
473 }
474
475 /* tests with result in T0 */
476 void OPPROTO op_test_ctr (void)
477 {
478     T0 = (uint32_t)env->ctr;
479     RETURN();
480 }
481
482 #if defined(TARGET_PPC64)
483 void OPPROTO op_test_ctr_64 (void)
484 {
485     T0 = (uint64_t)env->ctr;
486     RETURN();
487 }
488 #endif
489
490 void OPPROTO op_test_ctr_true (void)
491 {
492     T0 = ((uint32_t)env->ctr != 0 && (T0 & PARAM1) != 0);
493     RETURN();
494 }
495
496 #if defined(TARGET_PPC64)
497 void OPPROTO op_test_ctr_true_64 (void)
498 {
499     T0 = ((uint64_t)env->ctr != 0 && (T0 & PARAM1) != 0);
500     RETURN();
501 }
502 #endif
503
504 void OPPROTO op_test_ctr_false (void)
505 {
506     T0 = ((uint32_t)env->ctr != 0 && (T0 & PARAM1) == 0);
507     RETURN();
508 }
509
510 #if defined(TARGET_PPC64)
511 void OPPROTO op_test_ctr_false_64 (void)
512 {
513     T0 = ((uint64_t)env->ctr != 0 && (T0 & PARAM1) == 0);
514     RETURN();
515 }
516 #endif
517
518 void OPPROTO op_test_ctrz (void)
519 {
520     T0 = ((uint32_t)env->ctr == 0);
521     RETURN();
522 }
523
524 #if defined(TARGET_PPC64)
525 void OPPROTO op_test_ctrz_64 (void)
526 {
527     T0 = ((uint64_t)env->ctr == 0);
528     RETURN();
529 }
530 #endif
531
532 void OPPROTO op_test_ctrz_true (void)
533 {
534     T0 = ((uint32_t)env->ctr == 0 && (T0 & PARAM1) != 0);
535     RETURN();
536 }
537
538 #if defined(TARGET_PPC64)
539 void OPPROTO op_test_ctrz_true_64 (void)
540 {
541     T0 = ((uint64_t)env->ctr == 0 && (T0 & PARAM1) != 0);
542     RETURN();
543 }
544 #endif
545
546 void OPPROTO op_test_ctrz_false (void)
547 {
548     T0 = ((uint32_t)env->ctr == 0 && (T0 & PARAM1) == 0);
549     RETURN();
550 }
551
552 #if defined(TARGET_PPC64)
553 void OPPROTO op_test_ctrz_false_64 (void)
554 {
555     T0 = ((uint64_t)env->ctr == 0 && (T0 & PARAM1) == 0);
556     RETURN();
557 }
558 #endif
559
560 void OPPROTO op_test_true (void)
561 {
562     T0 = (T0 & PARAM1);
563     RETURN();
564 }
565
566 void OPPROTO op_test_false (void)
567 {
568     T0 = ((T0 & PARAM1) == 0);
569     RETURN();
570 }
571
572 /* CTR maintenance */
573 void OPPROTO op_dec_ctr (void)
574 {
575     env->ctr--;
576     RETURN();
577 }
578
579 /***                           Integer arithmetic                          ***/
580 /* add */
581 void OPPROTO op_check_addo (void)
582 {
583     xer_ov = (((uint32_t)T2 ^ (uint32_t)T1 ^ UINT32_MAX) &
584               ((uint32_t)T2 ^ (uint32_t)T0)) >> 31;
585     xer_so |= xer_ov;
586     RETURN();
587 }
588
589 #if defined(TARGET_PPC64)
590 void OPPROTO op_check_addo_64 (void)
591 {
592     xer_ov = (((uint64_t)T2 ^ (uint64_t)T1 ^ UINT64_MAX) &
593               ((uint64_t)T2 ^ (uint64_t)T0)) >> 63;
594     xer_so |= xer_ov;
595     RETURN();
596 }
597 #endif
598
599 /* add carrying */
600 void OPPROTO op_check_addc (void)
601 {
602     if (likely((uint32_t)T0 >= (uint32_t)T2)) {
603         xer_ca = 0;
604     } else {
605         xer_ca = 1;
606     }
607     RETURN();
608 }
609
610 #if defined(TARGET_PPC64)
611 void OPPROTO op_check_addc_64 (void)
612 {
613     if (likely((uint64_t)T0 >= (uint64_t)T2)) {
614         xer_ca = 0;
615     } else {
616         xer_ca = 1;
617     }
618     RETURN();
619 }
620 #endif
621
622 /* add extended */
623 void OPPROTO op_adde (void)
624 {
625     do_adde();
626     RETURN();
627 }
628
629 #if defined(TARGET_PPC64)
630 void OPPROTO op_adde_64 (void)
631 {
632     do_adde_64();
633     RETURN();
634 }
635 #endif
636
637 /* add to minus one extended */
638 void OPPROTO op_add_me (void)
639 {
640     T0 += xer_ca + (-1);
641     if (likely((uint32_t)T1 != 0))
642         xer_ca = 1;
643     else
644         xer_ca = 0;
645     RETURN();
646 }
647
648 #if defined(TARGET_PPC64)
649 void OPPROTO op_add_me_64 (void)
650 {
651     T0 += xer_ca + (-1);
652     if (likely((uint64_t)T1 != 0))
653         xer_ca = 1;
654     else
655         xer_ca = 0;
656     RETURN();
657 }
658 #endif
659
660 void OPPROTO op_addmeo (void)
661 {
662     do_addmeo();
663     RETURN();
664 }
665
666 void OPPROTO op_addmeo_64 (void)
667 {
668     do_addmeo();
669     RETURN();
670 }
671
672 /* add to zero extended */
673 void OPPROTO op_add_ze (void)
674 {
675     T0 += xer_ca;
676     RETURN();
677 }
678
679 /* divide word */
680 void OPPROTO op_divw (void)
681 {
682     if (unlikely(((int32_t)T0 == INT32_MIN && (int32_t)T1 == (int32_t)-1) ||
683                  (int32_t)T1 == 0)) {
684         T0 = (int32_t)(UINT32_MAX * ((uint32_t)T0 >> 31));
685     } else {
686         T0 = (int32_t)T0 / (int32_t)T1;
687     }
688     RETURN();
689 }
690
691 #if defined(TARGET_PPC64)
692 void OPPROTO op_divd (void)
693 {
694     if (unlikely(((int64_t)T0 == INT64_MIN && (int64_t)T1 == (int64_t)-1LL) ||
695                  (int64_t)T1 == 0)) {
696         T0 = (int64_t)(UINT64_MAX * ((uint64_t)T0 >> 63));
697     } else {
698         T0 = (int64_t)T0 / (int64_t)T1;
699     }
700     RETURN();
701 }
702 #endif
703
704 void OPPROTO op_divwo (void)
705 {
706     do_divwo();
707     RETURN();
708 }
709
710 #if defined(TARGET_PPC64)
711 void OPPROTO op_divdo (void)
712 {
713     do_divdo();
714     RETURN();
715 }
716 #endif
717
718 /* divide word unsigned */
719 void OPPROTO op_divwu (void)
720 {
721     if (unlikely(T1 == 0)) {
722         T0 = 0;
723     } else {
724         T0 = (uint32_t)T0 / (uint32_t)T1;
725     }
726     RETURN();
727 }
728
729 #if defined(TARGET_PPC64)
730 void OPPROTO op_divdu (void)
731 {
732     if (unlikely(T1 == 0)) {
733         T0 = 0;
734     } else {
735         T0 /= T1;
736     }
737     RETURN();
738 }
739 #endif
740
741 void OPPROTO op_divwuo (void)
742 {
743     do_divwuo();
744     RETURN();
745 }
746
747 #if defined(TARGET_PPC64)
748 void OPPROTO op_divduo (void)
749 {
750     do_divduo();
751     RETURN();
752 }
753 #endif
754
755 /* multiply high word */
756 void OPPROTO op_mulhw (void)
757 {
758     T0 = ((int64_t)((int32_t)T0) * (int64_t)((int32_t)T1)) >> 32;
759     RETURN();
760 }
761
762 #if defined(TARGET_PPC64)
763 void OPPROTO op_mulhd (void)
764 {
765     uint64_t tl, th;
766
767     muls64(&tl, &th, T0, T1);
768     T0 = th;
769     RETURN();
770 }
771 #endif
772
773 /* multiply high word unsigned */
774 void OPPROTO op_mulhwu (void)
775 {
776     T0 = ((uint64_t)(uint32_t)T0 * (uint64_t)(uint32_t)T1) >> 32;
777     RETURN();
778 }
779
780 #if defined(TARGET_PPC64)
781 void OPPROTO op_mulhdu (void)
782 {
783     uint64_t tl, th;
784
785     mulu64(&tl, &th, T0, T1);
786     T0 = th;
787     RETURN();
788 }
789 #endif
790
791 /* multiply low immediate */
792 void OPPROTO op_mulli (void)
793 {
794     T0 = ((int32_t)T0 * (int32_t)PARAM1);
795     RETURN();
796 }
797
798 /* multiply low word */
799 void OPPROTO op_mullw (void)
800 {
801     T0 = (int32_t)(T0 * T1);
802     RETURN();
803 }
804
805 #if defined(TARGET_PPC64)
806 void OPPROTO op_mulld (void)
807 {
808     T0 *= T1;
809     RETURN();
810 }
811 #endif
812
813 void OPPROTO op_mullwo (void)
814 {
815     do_mullwo();
816     RETURN();
817 }
818
819 #if defined(TARGET_PPC64)
820 void OPPROTO op_mulldo (void)
821 {
822     do_mulldo();
823     RETURN();
824 }
825 #endif
826
827 /* negate */
828 void OPPROTO op_neg (void)
829 {
830     if (likely(T0 != INT32_MIN)) {
831         T0 = -(int32_t)T0;
832     }
833     RETURN();
834 }
835
836 #if defined(TARGET_PPC64)
837 void OPPROTO op_neg_64 (void)
838 {
839     if (likely(T0 != INT64_MIN)) {
840         T0 = -(int64_t)T0;
841     }
842     RETURN();
843 }
844 #endif
845
846 void OPPROTO op_nego (void)
847 {
848     do_nego();
849     RETURN();
850 }
851
852 #if defined(TARGET_PPC64)
853 void OPPROTO op_nego_64 (void)
854 {
855     do_nego_64();
856     RETURN();
857 }
858 #endif
859
860 /* subtract from carrying */
861 void OPPROTO op_check_subfc (void)
862 {
863     if (likely((uint32_t)T0 > (uint32_t)T1)) {
864         xer_ca = 0;
865     } else {
866         xer_ca = 1;
867     }
868     RETURN();
869 }
870
871 #if defined(TARGET_PPC64)
872 void OPPROTO op_check_subfc_64 (void)
873 {
874     if (likely((uint64_t)T0 > (uint64_t)T1)) {
875         xer_ca = 0;
876     } else {
877         xer_ca = 1;
878     }
879     RETURN();
880 }
881 #endif
882
883 /* subtract from extended */
884 void OPPROTO op_subfe (void)
885 {
886     do_subfe();
887     RETURN();
888 }
889
890 #if defined(TARGET_PPC64)
891 void OPPROTO op_subfe_64 (void)
892 {
893     do_subfe_64();
894     RETURN();
895 }
896 #endif
897
898 /* subtract from immediate carrying */
899 void OPPROTO op_subfic (void)
900 {
901     T0 = (int32_t)PARAM1 + ~T0 + 1;
902     if ((uint32_t)T0 <= (uint32_t)PARAM1) {
903         xer_ca = 1;
904     } else {
905         xer_ca = 0;
906     }
907     RETURN();
908 }
909
910 #if defined(TARGET_PPC64)
911 void OPPROTO op_subfic_64 (void)
912 {
913     T0 = (int64_t)PARAM1 + ~T0 + 1;
914     if ((uint64_t)T0 <= (uint64_t)PARAM1) {
915         xer_ca = 1;
916     } else {
917         xer_ca = 0;
918     }
919     RETURN();
920 }
921 #endif
922
923 /* subtract from minus one extended */
924 void OPPROTO op_subfme (void)
925 {
926     T0 = ~T0 + xer_ca - 1;
927     if (likely((uint32_t)T0 != UINT32_MAX))
928         xer_ca = 1;
929     else
930         xer_ca = 0;
931     RETURN();
932 }
933
934 #if defined(TARGET_PPC64)
935 void OPPROTO op_subfme_64 (void)
936 {
937     T0 = ~T0 + xer_ca - 1;
938     if (likely((uint64_t)T0 != UINT64_MAX))
939         xer_ca = 1;
940     else
941         xer_ca = 0;
942     RETURN();
943 }
944 #endif
945
946 void OPPROTO op_subfmeo (void)
947 {
948     do_subfmeo();
949     RETURN();
950 }
951
952 #if defined(TARGET_PPC64)
953 void OPPROTO op_subfmeo_64 (void)
954 {
955     do_subfmeo_64();
956     RETURN();
957 }
958 #endif
959
960 /* subtract from zero extended */
961 void OPPROTO op_subfze (void)
962 {
963     T1 = ~T0;
964     T0 = T1 + xer_ca;
965     if ((uint32_t)T0 < (uint32_t)T1) {
966         xer_ca = 1;
967     } else {
968         xer_ca = 0;
969     }
970     RETURN();
971 }
972
973 #if defined(TARGET_PPC64)
974 void OPPROTO op_subfze_64 (void)
975 {
976     T1 = ~T0;
977     T0 = T1 + xer_ca;
978     if ((uint64_t)T0 < (uint64_t)T1) {
979         xer_ca = 1;
980     } else {
981         xer_ca = 0;
982     }
983     RETURN();
984 }
985 #endif
986
987 void OPPROTO op_subfzeo (void)
988 {
989     do_subfzeo();
990     RETURN();
991 }
992
993 #if defined(TARGET_PPC64)
994 void OPPROTO op_subfzeo_64 (void)
995 {
996     do_subfzeo_64();
997     RETURN();
998 }
999 #endif
1000
1001 /***                           Integer comparison                          ***/
1002 /* compare */
1003 void OPPROTO op_cmp (void)
1004 {
1005     if ((int32_t)T0 < (int32_t)T1) {
1006         T0 = 0x08;
1007     } else if ((int32_t)T0 > (int32_t)T1) {
1008         T0 = 0x04;
1009     } else {
1010         T0 = 0x02;
1011     }
1012     T0 |= xer_so;
1013     RETURN();
1014 }
1015
1016 #if defined(TARGET_PPC64)
1017 void OPPROTO op_cmp_64 (void)
1018 {
1019     if ((int64_t)T0 < (int64_t)T1) {
1020         T0 = 0x08;
1021     } else if ((int64_t)T0 > (int64_t)T1) {
1022         T0 = 0x04;
1023     } else {
1024         T0 = 0x02;
1025     }
1026     T0 |= xer_so;
1027     RETURN();
1028 }
1029 #endif
1030
1031 /* compare immediate */
1032 void OPPROTO op_cmpi (void)
1033 {
1034     if ((int32_t)T0 < (int32_t)PARAM1) {
1035         T0 = 0x08;
1036     } else if ((int32_t)T0 > (int32_t)PARAM1) {
1037         T0 = 0x04;
1038     } else {
1039         T0 = 0x02;
1040     }
1041     T0 |= xer_so;
1042     RETURN();
1043 }
1044
1045 #if defined(TARGET_PPC64)
1046 void OPPROTO op_cmpi_64 (void)
1047 {
1048     if ((int64_t)T0 < (int64_t)((int32_t)PARAM1)) {
1049         T0 = 0x08;
1050     } else if ((int64_t)T0 > (int64_t)((int32_t)PARAM1)) {
1051         T0 = 0x04;
1052     } else {
1053         T0 = 0x02;
1054     }
1055     T0 |= xer_so;
1056     RETURN();
1057 }
1058 #endif
1059
1060 /* compare logical */
1061 void OPPROTO op_cmpl (void)
1062 {
1063     if ((uint32_t)T0 < (uint32_t)T1) {
1064         T0 = 0x08;
1065     } else if ((uint32_t)T0 > (uint32_t)T1) {
1066         T0 = 0x04;
1067     } else {
1068         T0 = 0x02;
1069     }
1070     T0 |= xer_so;
1071     RETURN();
1072 }
1073
1074 #if defined(TARGET_PPC64)
1075 void OPPROTO op_cmpl_64 (void)
1076 {
1077     if ((uint64_t)T0 < (uint64_t)T1) {
1078         T0 = 0x08;
1079     } else if ((uint64_t)T0 > (uint64_t)T1) {
1080         T0 = 0x04;
1081     } else {
1082         T0 = 0x02;
1083     }
1084     T0 |= xer_so;
1085     RETURN();
1086 }
1087 #endif
1088
1089 /* compare logical immediate */
1090 void OPPROTO op_cmpli (void)
1091 {
1092     if ((uint32_t)T0 < (uint32_t)PARAM1) {
1093         T0 = 0x08;
1094     } else if ((uint32_t)T0 > (uint32_t)PARAM1) {
1095         T0 = 0x04;
1096     } else {
1097         T0 = 0x02;
1098     }
1099     T0 |= xer_so;
1100     RETURN();
1101 }
1102
1103 #if defined(TARGET_PPC64)
1104 void OPPROTO op_cmpli_64 (void)
1105 {
1106     if ((uint64_t)T0 < (uint64_t)PARAM1) {
1107         T0 = 0x08;
1108     } else if ((uint64_t)T0 > (uint64_t)PARAM1) {
1109         T0 = 0x04;
1110     } else {
1111         T0 = 0x02;
1112     }
1113     T0 |= xer_so;
1114     RETURN();
1115 }
1116 #endif
1117
1118 void OPPROTO op_isel (void)
1119 {
1120     if (T0)
1121         T0 = T1;
1122     else
1123         T0 = T2;
1124     RETURN();
1125 }
1126
1127 void OPPROTO op_popcntb (void)
1128 {
1129     do_popcntb();
1130     RETURN();
1131 }
1132
1133 #if defined(TARGET_PPC64)
1134 void OPPROTO op_popcntb_64 (void)
1135 {
1136     do_popcntb_64();
1137     RETURN();
1138 }
1139 #endif
1140
1141 /***                            Integer logical                            ***/
1142 /* and */
1143 void OPPROTO op_and (void)
1144 {
1145     T0 &= T1;
1146     RETURN();
1147 }
1148
1149 /* andc */
1150 void OPPROTO op_andc (void)
1151 {
1152     T0 &= ~T1;
1153     RETURN();
1154 }
1155
1156 /* count leading zero */
1157 void OPPROTO op_cntlzw (void)
1158 {
1159     do_cntlzw();
1160     RETURN();
1161 }
1162
1163 #if defined(TARGET_PPC64)
1164 void OPPROTO op_cntlzd (void)
1165 {
1166     do_cntlzd();
1167     RETURN();
1168 }
1169 #endif
1170
1171 /* eqv */
1172 void OPPROTO op_eqv (void)
1173 {
1174     T0 = ~(T0 ^ T1);
1175     RETURN();
1176 }
1177
1178 /* extend sign byte */
1179 void OPPROTO op_extsb (void)
1180 {
1181 #if defined (TARGET_PPC64)
1182     T0 = (int64_t)((int8_t)T0);
1183 #else
1184     T0 = (int32_t)((int8_t)T0);
1185 #endif
1186     RETURN();
1187 }
1188
1189 /* extend sign half word */
1190 void OPPROTO op_extsh (void)
1191 {
1192 #if defined (TARGET_PPC64)
1193     T0 = (int64_t)((int16_t)T0);
1194 #else
1195     T0 = (int32_t)((int16_t)T0);
1196 #endif
1197     RETURN();
1198 }
1199
1200 #if defined (TARGET_PPC64)
1201 void OPPROTO op_extsw (void)
1202 {
1203     T0 = (int64_t)((int32_t)T0);
1204     RETURN();
1205 }
1206 #endif
1207
1208 /* nand */
1209 void OPPROTO op_nand (void)
1210 {
1211     T0 = ~(T0 & T1);
1212     RETURN();
1213 }
1214
1215 /* nor */
1216 void OPPROTO op_nor (void)
1217 {
1218     T0 = ~(T0 | T1);
1219     RETURN();
1220 }
1221
1222 /* or */
1223 void OPPROTO op_or (void)
1224 {
1225     T0 |= T1;
1226     RETURN();
1227 }
1228
1229 /* orc */
1230 void OPPROTO op_orc (void)
1231 {
1232     T0 |= ~T1;
1233     RETURN();
1234 }
1235
1236 /* ori */
1237 void OPPROTO op_ori (void)
1238 {
1239     T0 |= (uint32_t)PARAM1;
1240     RETURN();
1241 }
1242
1243 /* xor */
1244 void OPPROTO op_xor (void)
1245 {
1246     T0 ^= T1;
1247     RETURN();
1248 }
1249
1250 /* xori */
1251 void OPPROTO op_xori (void)
1252 {
1253     T0 ^= (uint32_t)PARAM1;
1254     RETURN();
1255 }
1256
1257 /***                             Integer rotate                            ***/
1258 void OPPROTO op_rotl32_T0_T1 (void)
1259 {
1260     T0 = rotl32(T0, T1 & 0x1F);
1261     RETURN();
1262 }
1263
1264 void OPPROTO op_rotli32_T0 (void)
1265 {
1266     T0 = rotl32(T0, PARAM1);
1267     RETURN();
1268 }
1269
1270 #if defined(TARGET_PPC64)
1271 void OPPROTO op_rotl64_T0_T1 (void)
1272 {
1273     T0 = rotl64(T0, T1 & 0x3F);
1274     RETURN();
1275 }
1276
1277 void OPPROTO op_rotli64_T0 (void)
1278 {
1279     T0 = rotl64(T0, PARAM1);
1280     RETURN();
1281 }
1282 #endif
1283
1284 /***                             Integer shift                             ***/
1285 /* shift left word */
1286 void OPPROTO op_slw (void)
1287 {
1288     if (T1 & 0x20) {
1289         T0 = 0;
1290     } else {
1291         T0 = (uint32_t)(T0 << T1);
1292     }
1293     RETURN();
1294 }
1295
1296 #if defined(TARGET_PPC64)
1297 void OPPROTO op_sld (void)
1298 {
1299     if (T1 & 0x40) {
1300         T0 = 0;
1301     } else {
1302         T0 = T0 << T1;
1303     }
1304     RETURN();
1305 }
1306 #endif
1307
1308 /* shift right algebraic word */
1309 void OPPROTO op_sraw (void)
1310 {
1311     do_sraw();
1312     RETURN();
1313 }
1314
1315 #if defined(TARGET_PPC64)
1316 void OPPROTO op_srad (void)
1317 {
1318     do_srad();
1319     RETURN();
1320 }
1321 #endif
1322
1323 /* shift right algebraic word immediate */
1324 void OPPROTO op_srawi (void)
1325 {
1326     uint32_t mask = (uint32_t)PARAM2;
1327
1328     T0 = (int32_t)T0 >> PARAM1;
1329     if ((int32_t)T1 < 0 && (T1 & mask) != 0) {
1330         xer_ca = 1;
1331     } else {
1332         xer_ca = 0;
1333     }
1334     RETURN();
1335 }
1336
1337 #if defined(TARGET_PPC64)
1338 void OPPROTO op_sradi (void)
1339 {
1340     uint64_t mask = ((uint64_t)PARAM2 << 32) | (uint64_t)PARAM3;
1341
1342     T0 = (int64_t)T0 >> PARAM1;
1343     if ((int64_t)T1 < 0 && ((uint64_t)T1 & mask) != 0) {
1344         xer_ca = 1;
1345     } else {
1346         xer_ca = 0;
1347     }
1348     RETURN();
1349 }
1350 #endif
1351
1352 /* shift right word */
1353 void OPPROTO op_srw (void)
1354 {
1355     if (T1 & 0x20) {
1356         T0 = 0;
1357     } else {
1358         T0 = (uint32_t)T0 >> T1;
1359     }
1360     RETURN();
1361 }
1362
1363 #if defined(TARGET_PPC64)
1364 void OPPROTO op_srd (void)
1365 {
1366     if (T1 & 0x40) {
1367         T0 = 0;
1368     } else {
1369         T0 = (uint64_t)T0 >> T1;
1370     }
1371     RETURN();
1372 }
1373 #endif
1374
1375 void OPPROTO op_sl_T0_T1 (void)
1376 {
1377     T0 = T0 << T1;
1378     RETURN();
1379 }
1380
1381 void OPPROTO op_sli_T0 (void)
1382 {
1383     T0 = T0 << PARAM1;
1384     RETURN();
1385 }
1386
1387 void OPPROTO op_sli_T1 (void)
1388 {
1389     T1 = T1 << PARAM1;
1390     RETURN();
1391 }
1392
1393 void OPPROTO op_srl_T0_T1 (void)
1394 {
1395     T0 = (uint32_t)T0 >> T1;
1396     RETURN();
1397 }
1398
1399 #if defined(TARGET_PPC64)
1400 void OPPROTO op_srl_T0_T1_64 (void)
1401 {
1402     T0 = (uint32_t)T0 >> T1;
1403     RETURN();
1404 }
1405 #endif
1406
1407 void OPPROTO op_srli_T0 (void)
1408 {
1409     T0 = (uint32_t)T0 >> PARAM1;
1410     RETURN();
1411 }
1412
1413 #if defined(TARGET_PPC64)
1414 void OPPROTO op_srli_T0_64 (void)
1415 {
1416     T0 = (uint64_t)T0 >> PARAM1;
1417     RETURN();
1418 }
1419 #endif
1420
1421 void OPPROTO op_srli_T1 (void)
1422 {
1423     T1 = (uint32_t)T1 >> PARAM1;
1424     RETURN();
1425 }
1426
1427 #if defined(TARGET_PPC64)
1428 void OPPROTO op_srli_T1_64 (void)
1429 {
1430     T1 = (uint64_t)T1 >> PARAM1;
1431     RETURN();
1432 }
1433 #endif
1434
1435 /***                       Floating-Point arithmetic                       ***/
1436 /* fadd - fadd. */
1437 void OPPROTO op_fadd (void)
1438 {
1439 #if USE_PRECISE_EMULATION
1440     do_fadd();
1441 #else
1442     FT0 = float64_add(FT0, FT1, &env->fp_status);
1443 #endif
1444     RETURN();
1445 }
1446
1447 /* fsub - fsub. */
1448 void OPPROTO op_fsub (void)
1449 {
1450 #if USE_PRECISE_EMULATION
1451     do_fsub();
1452 #else
1453     FT0 = float64_sub(FT0, FT1, &env->fp_status);
1454 #endif
1455     RETURN();
1456 }
1457
1458 /* fmul - fmul. */
1459 void OPPROTO op_fmul (void)
1460 {
1461 #if USE_PRECISE_EMULATION
1462     do_fmul();
1463 #else
1464     FT0 = float64_mul(FT0, FT1, &env->fp_status);
1465 #endif
1466     RETURN();
1467 }
1468
1469 /* fdiv - fdiv. */
1470 void OPPROTO op_fdiv (void)
1471 {
1472 #if USE_PRECISE_EMULATION
1473     do_fdiv();
1474 #else
1475     FT0 = float64_div(FT0, FT1, &env->fp_status);
1476 #endif
1477     RETURN();
1478 }
1479
1480 /* fsqrt - fsqrt. */
1481 void OPPROTO op_fsqrt (void)
1482 {
1483     do_fsqrt();
1484     RETURN();
1485 }
1486
1487 /* fre - fre. */
1488 void OPPROTO op_fre (void)
1489 {
1490     do_fre();
1491     RETURN();
1492 }
1493
1494 /* fres - fres. */
1495 void OPPROTO op_fres (void)
1496 {
1497     do_fres();
1498     RETURN();
1499 }
1500
1501 /* frsqrte  - frsqrte. */
1502 void OPPROTO op_frsqrte (void)
1503 {
1504     do_frsqrte();
1505     RETURN();
1506 }
1507
1508 /* fsel - fsel. */
1509 void OPPROTO op_fsel (void)
1510 {
1511     do_fsel();
1512     RETURN();
1513 }
1514
1515 /***                     Floating-Point multiply-and-add                   ***/
1516 /* fmadd - fmadd. */
1517 void OPPROTO op_fmadd (void)
1518 {
1519 #if USE_PRECISE_EMULATION
1520     do_fmadd();
1521 #else
1522     FT0 = float64_mul(FT0, FT1, &env->fp_status);
1523     FT0 = float64_add(FT0, FT2, &env->fp_status);
1524 #endif
1525     RETURN();
1526 }
1527
1528 /* fmsub - fmsub. */
1529 void OPPROTO op_fmsub (void)
1530 {
1531 #if USE_PRECISE_EMULATION
1532     do_fmsub();
1533 #else
1534     FT0 = float64_mul(FT0, FT1, &env->fp_status);
1535     FT0 = float64_sub(FT0, FT2, &env->fp_status);
1536 #endif
1537     RETURN();
1538 }
1539
1540 /* fnmadd - fnmadd. - fnmadds - fnmadds. */
1541 void OPPROTO op_fnmadd (void)
1542 {
1543     do_fnmadd();
1544     RETURN();
1545 }
1546
1547 /* fnmsub - fnmsub. */
1548 void OPPROTO op_fnmsub (void)
1549 {
1550     do_fnmsub();
1551     RETURN();
1552 }
1553
1554 /***                     Floating-Point round & convert                    ***/
1555 /* frsp - frsp. */
1556 void OPPROTO op_frsp (void)
1557 {
1558 #if USE_PRECISE_EMULATION
1559     do_frsp();
1560 #else
1561     FT0 = float64_to_float32(FT0, &env->fp_status);
1562 #endif
1563     RETURN();
1564 }
1565
1566 /* fctiw - fctiw. */
1567 void OPPROTO op_fctiw (void)
1568 {
1569     do_fctiw();
1570     RETURN();
1571 }
1572
1573 /* fctiwz - fctiwz. */
1574 void OPPROTO op_fctiwz (void)
1575 {
1576     do_fctiwz();
1577     RETURN();
1578 }
1579
1580 #if defined(TARGET_PPC64)
1581 /* fcfid - fcfid. */
1582 void OPPROTO op_fcfid (void)
1583 {
1584     do_fcfid();
1585     RETURN();
1586 }
1587
1588 /* fctid - fctid. */
1589 void OPPROTO op_fctid (void)
1590 {
1591     do_fctid();
1592     RETURN();
1593 }
1594
1595 /* fctidz - fctidz. */
1596 void OPPROTO op_fctidz (void)
1597 {
1598     do_fctidz();
1599     RETURN();
1600 }
1601 #endif
1602
1603 void OPPROTO op_frin (void)
1604 {
1605     do_frin();
1606     RETURN();
1607 }
1608
1609 void OPPROTO op_friz (void)
1610 {
1611     do_friz();
1612     RETURN();
1613 }
1614
1615 void OPPROTO op_frip (void)
1616 {
1617     do_frip();
1618     RETURN();
1619 }
1620
1621 void OPPROTO op_frim (void)
1622 {
1623     do_frim();
1624     RETURN();
1625 }
1626
1627 /***                         Floating-Point compare                        ***/
1628 /* fcmpu */
1629 void OPPROTO op_fcmpu (void)
1630 {
1631     do_fcmpu();
1632     RETURN();
1633 }
1634
1635 /* fcmpo */
1636 void OPPROTO op_fcmpo (void)
1637 {
1638     do_fcmpo();
1639     RETURN();
1640 }
1641
1642 /***                         Floating-point move                           ***/
1643 /* fabs */
1644 void OPPROTO op_fabs (void)
1645 {
1646     FT0 = float64_abs(FT0);
1647     RETURN();
1648 }
1649
1650 /* fnabs */
1651 void OPPROTO op_fnabs (void)
1652 {
1653     FT0 = float64_abs(FT0);
1654     FT0 = float64_chs(FT0);
1655     RETURN();
1656 }
1657
1658 /* fneg */
1659 void OPPROTO op_fneg (void)
1660 {
1661     FT0 = float64_chs(FT0);
1662     RETURN();
1663 }
1664
1665 /* Load and store */
1666 #define MEMSUFFIX _raw
1667 #include "op_helper.h"
1668 #include "op_mem.h"
1669 #if !defined(CONFIG_USER_ONLY)
1670 #define MEMSUFFIX _user
1671 #include "op_helper.h"
1672 #include "op_mem.h"
1673 #define MEMSUFFIX _kernel
1674 #include "op_helper.h"
1675 #include "op_mem.h"
1676 #define MEMSUFFIX _hypv
1677 #include "op_helper.h"
1678 #include "op_mem.h"
1679 #endif
1680
1681 /* Special op to check and maybe clear reservation */
1682 void OPPROTO op_check_reservation (void)
1683 {
1684     if ((uint32_t)env->reserve == (uint32_t)(T0 & ~0x00000003))
1685         env->reserve = (target_ulong)-1ULL;
1686     RETURN();
1687 }
1688
1689 #if defined(TARGET_PPC64)
1690 void OPPROTO op_check_reservation_64 (void)
1691 {
1692     if ((uint64_t)env->reserve == (uint64_t)(T0 & ~0x00000003))
1693         env->reserve = (target_ulong)-1ULL;
1694     RETURN();
1695 }
1696 #endif
1697
1698 void OPPROTO op_wait (void)
1699 {
1700     env->halted = 1;
1701     RETURN();
1702 }
1703
1704 /* Return from interrupt */
1705 #if !defined(CONFIG_USER_ONLY)
1706 void OPPROTO op_rfi (void)
1707 {
1708     do_rfi();
1709     RETURN();
1710 }
1711
1712 #if defined(TARGET_PPC64)
1713 void OPPROTO op_rfid (void)
1714 {
1715     do_rfid();
1716     RETURN();
1717 }
1718
1719 void OPPROTO op_hrfid (void)
1720 {
1721     do_hrfid();
1722     RETURN();
1723 }
1724 #endif
1725
1726 /* Exception vectors */
1727 void OPPROTO op_store_excp_prefix (void)
1728 {
1729     T0 &= env->ivpr_mask;
1730     env->excp_prefix = T0;
1731     RETURN();
1732 }
1733
1734 void OPPROTO op_store_excp_vector (void)
1735 {
1736     T0 &= env->ivor_mask;
1737     env->excp_vectors[PARAM1] = T0;
1738     RETURN();
1739 }
1740 #endif
1741
1742 /* Trap word */
1743 void OPPROTO op_tw (void)
1744 {
1745     do_tw(PARAM1);
1746     RETURN();
1747 }
1748
1749 #if defined(TARGET_PPC64)
1750 void OPPROTO op_td (void)
1751 {
1752     do_td(PARAM1);
1753     RETURN();
1754 }
1755 #endif
1756
1757 #if !defined(CONFIG_USER_ONLY)
1758 /* tlbia */
1759 void OPPROTO op_tlbia (void)
1760 {
1761     ppc_tlb_invalidate_all(env);
1762     RETURN();
1763 }
1764
1765 /* tlbie */
1766 void OPPROTO op_tlbie (void)
1767 {
1768     ppc_tlb_invalidate_one(env, (uint32_t)T0);
1769     RETURN();
1770 }
1771
1772 #if defined(TARGET_PPC64)
1773 void OPPROTO op_tlbie_64 (void)
1774 {
1775     ppc_tlb_invalidate_one(env, T0);
1776     RETURN();
1777 }
1778 #endif
1779
1780 #if defined(TARGET_PPC64)
1781 void OPPROTO op_slbia (void)
1782 {
1783     ppc_slb_invalidate_all(env);
1784     RETURN();
1785 }
1786
1787 void OPPROTO op_slbie (void)
1788 {
1789     ppc_slb_invalidate_one(env, (uint32_t)T0);
1790     RETURN();
1791 }
1792
1793 void OPPROTO op_slbie_64 (void)
1794 {
1795     ppc_slb_invalidate_one(env, T0);
1796     RETURN();
1797 }
1798 #endif
1799 #endif
1800
1801 #if !defined(CONFIG_USER_ONLY)
1802 /* PowerPC 602/603/755 software TLB load instructions */
1803 void OPPROTO op_6xx_tlbld (void)
1804 {
1805     do_load_6xx_tlb(0);
1806     RETURN();
1807 }
1808
1809 void OPPROTO op_6xx_tlbli (void)
1810 {
1811     do_load_6xx_tlb(1);
1812     RETURN();
1813 }
1814
1815 /* PowerPC 74xx software TLB load instructions */
1816 void OPPROTO op_74xx_tlbld (void)
1817 {
1818     do_load_74xx_tlb(0);
1819     RETURN();
1820 }
1821
1822 void OPPROTO op_74xx_tlbli (void)
1823 {
1824     do_load_74xx_tlb(1);
1825     RETURN();
1826 }
1827 #endif
1828
1829 /* 601 specific */
1830 void OPPROTO op_load_601_rtcl (void)
1831 {
1832     T0 = cpu_ppc601_load_rtcl(env);
1833     RETURN();
1834 }
1835
1836 void OPPROTO op_load_601_rtcu (void)
1837 {
1838     T0 = cpu_ppc601_load_rtcu(env);
1839     RETURN();
1840 }
1841
1842 #if !defined(CONFIG_USER_ONLY)
1843 void OPPROTO op_store_601_rtcl (void)
1844 {
1845     cpu_ppc601_store_rtcl(env, T0);
1846     RETURN();
1847 }
1848
1849 void OPPROTO op_store_601_rtcu (void)
1850 {
1851     cpu_ppc601_store_rtcu(env, T0);
1852     RETURN();
1853 }
1854
1855 void OPPROTO op_store_hid0_601 (void)
1856 {
1857     do_store_hid0_601();
1858     RETURN();
1859 }
1860
1861 void OPPROTO op_load_601_bat (void)
1862 {
1863     T0 = env->IBAT[PARAM1][PARAM2];
1864     RETURN();
1865 }
1866
1867 void OPPROTO op_store_601_batl (void)
1868 {
1869     do_store_ibatl_601(env, PARAM1, T0);
1870     RETURN();
1871 }
1872
1873 void OPPROTO op_store_601_batu (void)
1874 {
1875     do_store_ibatu_601(env, PARAM1, T0);
1876     RETURN();
1877 }
1878 #endif /* !defined(CONFIG_USER_ONLY) */
1879
1880 /* PowerPC 601 specific instructions (POWER bridge) */
1881 /* XXX: those micro-ops need tests ! */
1882 void OPPROTO op_POWER_abs (void)
1883 {
1884     if ((int32_t)T0 == INT32_MIN)
1885         T0 = INT32_MAX;
1886     else if ((int32_t)T0 < 0)
1887         T0 = -T0;
1888     RETURN();
1889 }
1890
1891 void OPPROTO op_POWER_abso (void)
1892 {
1893     do_POWER_abso();
1894     RETURN();
1895 }
1896
1897 void OPPROTO op_POWER_clcs (void)
1898 {
1899     do_POWER_clcs();
1900     RETURN();
1901 }
1902
1903 void OPPROTO op_POWER_div (void)
1904 {
1905     do_POWER_div();
1906     RETURN();
1907 }
1908
1909 void OPPROTO op_POWER_divo (void)
1910 {
1911     do_POWER_divo();
1912     RETURN();
1913 }
1914
1915 void OPPROTO op_POWER_divs (void)
1916 {
1917     do_POWER_divs();
1918     RETURN();
1919 }
1920
1921 void OPPROTO op_POWER_divso (void)
1922 {
1923     do_POWER_divso();
1924     RETURN();
1925 }
1926
1927 void OPPROTO op_POWER_doz (void)
1928 {
1929     if ((int32_t)T1 > (int32_t)T0)
1930         T0 = T1 - T0;
1931     else
1932         T0 = 0;
1933     RETURN();
1934 }
1935
1936 void OPPROTO op_POWER_dozo (void)
1937 {
1938     do_POWER_dozo();
1939     RETURN();
1940 }
1941
1942 void OPPROTO op_load_xer_cmp (void)
1943 {
1944     T2 = xer_cmp;
1945     RETURN();
1946 }
1947
1948 void OPPROTO op_POWER_maskg (void)
1949 {
1950     do_POWER_maskg();
1951     RETURN();
1952 }
1953
1954 void OPPROTO op_POWER_maskir (void)
1955 {
1956     T0 = (T0 & ~T2) | (T1 & T2);
1957     RETURN();
1958 }
1959
1960 void OPPROTO op_POWER_mul (void)
1961 {
1962     uint64_t tmp;
1963
1964     tmp = (uint64_t)T0 * (uint64_t)T1;
1965     env->spr[SPR_MQ] = tmp >> 32;
1966     T0 = tmp;
1967     RETURN();
1968 }
1969
1970 void OPPROTO op_POWER_mulo (void)
1971 {
1972     do_POWER_mulo();
1973     RETURN();
1974 }
1975
1976 void OPPROTO op_POWER_nabs (void)
1977 {
1978     if (T0 > 0)
1979         T0 = -T0;
1980     RETURN();
1981 }
1982
1983 void OPPROTO op_POWER_nabso (void)
1984 {
1985     /* nabs never overflows */
1986     if (T0 > 0)
1987         T0 = -T0;
1988     xer_ov = 0;
1989     RETURN();
1990 }
1991
1992 /* XXX: factorise POWER rotates... */
1993 void OPPROTO op_POWER_rlmi (void)
1994 {
1995     T0 = rotl32(T0, T2) & PARAM1;
1996     T0 |= T1 & (uint32_t)PARAM2;
1997     RETURN();
1998 }
1999
2000 void OPPROTO op_POWER_rrib (void)
2001 {
2002     T2 &= 0x1FUL;
2003     T0 = rotl32(T0 & INT32_MIN, T2);
2004     T0 |= T1 & ~rotl32(INT32_MIN, T2);
2005     RETURN();
2006 }
2007
2008 void OPPROTO op_POWER_sle (void)
2009 {
2010     T1 &= 0x1FUL;
2011     env->spr[SPR_MQ] = rotl32(T0, T1);
2012     T0 = T0 << T1;
2013     RETURN();
2014 }
2015
2016 void OPPROTO op_POWER_sleq (void)
2017 {
2018     uint32_t tmp = env->spr[SPR_MQ];
2019
2020     T1 &= 0x1FUL;
2021     env->spr[SPR_MQ] = rotl32(T0, T1);
2022     T0 = T0 << T1;
2023     T0 |= tmp >> (32 - T1);
2024     RETURN();
2025 }
2026
2027 void OPPROTO op_POWER_sllq (void)
2028 {
2029     uint32_t msk = UINT32_MAX;
2030
2031     msk = msk << (T1 & 0x1FUL);
2032     if (T1 & 0x20UL)
2033         msk = ~msk;
2034     T1 &= 0x1FUL;
2035     T0 = (T0 << T1) & msk;
2036     T0 |= env->spr[SPR_MQ] & ~msk;
2037     RETURN();
2038 }
2039
2040 void OPPROTO op_POWER_slq (void)
2041 {
2042     uint32_t msk = UINT32_MAX, tmp;
2043
2044     msk = msk << (T1 & 0x1FUL);
2045     if (T1 & 0x20UL)
2046         msk = ~msk;
2047     T1 &= 0x1FUL;
2048     tmp = rotl32(T0, T1);
2049     T0 = tmp & msk;
2050     env->spr[SPR_MQ] = tmp;
2051     RETURN();
2052 }
2053
2054 void OPPROTO op_POWER_sraq (void)
2055 {
2056     env->spr[SPR_MQ] = rotl32(T0, 32 - (T1 & 0x1FUL));
2057     if (T1 & 0x20UL)
2058         T0 = UINT32_MAX;
2059     else
2060         T0 = (int32_t)T0 >> T1;
2061     RETURN();
2062 }
2063
2064 void OPPROTO op_POWER_sre (void)
2065 {
2066     T1 &= 0x1FUL;
2067     env->spr[SPR_MQ] = rotl32(T0, 32 - T1);
2068     T0 = (int32_t)T0 >> T1;
2069     RETURN();
2070 }
2071
2072 void OPPROTO op_POWER_srea (void)
2073 {
2074     T1 &= 0x1FUL;
2075     env->spr[SPR_MQ] = T0 >> T1;
2076     T0 = (int32_t)T0 >> T1;
2077     RETURN();
2078 }
2079
2080 void OPPROTO op_POWER_sreq (void)
2081 {
2082     uint32_t tmp;
2083     int32_t msk;
2084
2085     T1 &= 0x1FUL;
2086     msk = INT32_MIN >> T1;
2087     tmp = env->spr[SPR_MQ];
2088     env->spr[SPR_MQ] = rotl32(T0, 32 - T1);
2089     T0 = T0 >> T1;
2090     T0 |= tmp & msk;
2091     RETURN();
2092 }
2093
2094 void OPPROTO op_POWER_srlq (void)
2095 {
2096     uint32_t tmp;
2097     int32_t msk;
2098
2099     msk = INT32_MIN >> (T1 & 0x1FUL);
2100     if (T1 & 0x20UL)
2101         msk = ~msk;
2102     T1 &= 0x1FUL;
2103     tmp = env->spr[SPR_MQ];
2104     env->spr[SPR_MQ] = rotl32(T0, 32 - T1);
2105     T0 = T0 >> T1;
2106     T0 &= msk;
2107     T0 |= tmp & ~msk;
2108     RETURN();
2109 }
2110
2111 void OPPROTO op_POWER_srq (void)
2112 {
2113     T1 &= 0x1FUL;
2114     env->spr[SPR_MQ] = rotl32(T0, 32 - T1);
2115     T0 = T0 >> T1;
2116     RETURN();
2117 }
2118
2119 /* POWER instructions not implemented in PowerPC 601 */
2120 #if !defined(CONFIG_USER_ONLY)
2121 void OPPROTO op_POWER_mfsri (void)
2122 {
2123     T1 = T0 >> 28;
2124     T0 = env->sr[T1];
2125     RETURN();
2126 }
2127
2128 void OPPROTO op_POWER_rac (void)
2129 {
2130     do_POWER_rac();
2131     RETURN();
2132 }
2133
2134 void OPPROTO op_POWER_rfsvc (void)
2135 {
2136     do_POWER_rfsvc();
2137     RETURN();
2138 }
2139 #endif
2140
2141 /* PowerPC 602 specific instruction */
2142 #if !defined(CONFIG_USER_ONLY)
2143 void OPPROTO op_602_mfrom (void)
2144 {
2145     do_op_602_mfrom();
2146     RETURN();
2147 }
2148 #endif
2149
2150 /* PowerPC 4xx specific micro-ops */
2151 void OPPROTO op_405_add_T0_T2 (void)
2152 {
2153     T0 = (int32_t)T0 + (int32_t)T2;
2154     RETURN();
2155 }
2156
2157 void OPPROTO op_405_mulchw (void)
2158 {
2159     T0 = ((int16_t)T0) * ((int16_t)(T1 >> 16));
2160     RETURN();
2161 }
2162
2163 void OPPROTO op_405_mulchwu (void)
2164 {
2165     T0 = ((uint16_t)T0) * ((uint16_t)(T1 >> 16));
2166     RETURN();
2167 }
2168
2169 void OPPROTO op_405_mulhhw (void)
2170 {
2171     T0 = ((int16_t)(T0 >> 16)) * ((int16_t)(T1 >> 16));
2172     RETURN();
2173 }
2174
2175 void OPPROTO op_405_mulhhwu (void)
2176 {
2177     T0 = ((uint16_t)(T0 >> 16)) * ((uint16_t)(T1 >> 16));
2178     RETURN();
2179 }
2180
2181 void OPPROTO op_405_mullhw (void)
2182 {
2183     T0 = ((int16_t)T0) * ((int16_t)T1);
2184     RETURN();
2185 }
2186
2187 void OPPROTO op_405_mullhwu (void)
2188 {
2189     T0 = ((uint16_t)T0) * ((uint16_t)T1);
2190     RETURN();
2191 }
2192
2193 void OPPROTO op_405_check_sat (void)
2194 {
2195     do_405_check_sat();
2196     RETURN();
2197 }
2198
2199 void OPPROTO op_405_check_ovu (void)
2200 {
2201     if (likely(T0 >= T2)) {
2202         xer_ov = 0;
2203     } else {
2204         xer_ov = 1;
2205         xer_so = 1;
2206     }
2207     RETURN();
2208 }
2209
2210 void OPPROTO op_405_check_satu (void)
2211 {
2212     if (unlikely(T0 < T2)) {
2213         /* Saturate result */
2214         T0 = UINT32_MAX;
2215     }
2216     RETURN();
2217 }
2218
2219 void OPPROTO op_load_dcr (void)
2220 {
2221     do_load_dcr();
2222     RETURN();
2223 }
2224
2225 void OPPROTO op_store_dcr (void)
2226 {
2227     do_store_dcr();
2228     RETURN();
2229 }
2230
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
2234  */
2235 void OPPROTO op_40x_rfci (void)
2236 {
2237     do_40x_rfci();
2238     RETURN();
2239 }
2240
2241 void OPPROTO op_rfci (void)
2242 {
2243     do_rfci();
2244     RETURN();
2245 }
2246
2247 void OPPROTO op_rfdi (void)
2248 {
2249     do_rfdi();
2250     RETURN();
2251 }
2252
2253 void OPPROTO op_rfmci (void)
2254 {
2255     do_rfmci();
2256     RETURN();
2257 }
2258
2259 void OPPROTO op_wrte (void)
2260 {
2261     /* We don't call do_store_msr here as we won't trigger
2262      * any special case nor change hflags
2263      */
2264     T0 &= 1 << MSR_EE;
2265     env->msr &= ~(1 << MSR_EE);
2266     env->msr |= T0;
2267     RETURN();
2268 }
2269
2270 void OPPROTO op_440_tlbre (void)
2271 {
2272     do_440_tlbre(PARAM1);
2273     RETURN();
2274 }
2275
2276 void OPPROTO op_440_tlbsx (void)
2277 {
2278     T0 = ppcemb_tlb_search(env, T0, env->spr[SPR_440_MMUCR] & 0xFF);
2279     RETURN();
2280 }
2281
2282 void OPPROTO op_4xx_tlbsx_check (void)
2283 {
2284     int tmp;
2285
2286     tmp = xer_so;
2287     if ((int)T0 != -1)
2288         tmp |= 0x02;
2289     env->crf[0] = tmp;
2290     RETURN();
2291 }
2292
2293 void OPPROTO op_440_tlbwe (void)
2294 {
2295     do_440_tlbwe(PARAM1);
2296     RETURN();
2297 }
2298
2299 void OPPROTO op_4xx_tlbre_lo (void)
2300 {
2301     do_4xx_tlbre_lo();
2302     RETURN();
2303 }
2304
2305 void OPPROTO op_4xx_tlbre_hi (void)
2306 {
2307     do_4xx_tlbre_hi();
2308     RETURN();
2309 }
2310
2311 void OPPROTO op_4xx_tlbsx (void)
2312 {
2313     T0 = ppcemb_tlb_search(env, T0, env->spr[SPR_40x_PID]);
2314     RETURN();
2315 }
2316
2317 void OPPROTO op_4xx_tlbwe_lo (void)
2318 {
2319     do_4xx_tlbwe_lo();
2320     RETURN();
2321 }
2322
2323 void OPPROTO op_4xx_tlbwe_hi (void)
2324 {
2325     do_4xx_tlbwe_hi();
2326     RETURN();
2327 }
2328 #endif
2329
2330 /* SPR micro-ops */
2331 /* 440 specific */
2332 void OPPROTO op_440_dlmzb (void)
2333 {
2334     do_440_dlmzb();
2335     RETURN();
2336 }
2337
2338 void OPPROTO op_440_dlmzb_update_Rc (void)
2339 {
2340     if (T0 == 8)
2341         T0 = 0x2;
2342     else if (T0 < 4)
2343         T0 = 0x4;
2344     else
2345         T0 = 0x8;
2346     RETURN();
2347 }
2348
2349 #if !defined(CONFIG_USER_ONLY)
2350 void OPPROTO op_store_pir (void)
2351 {
2352     env->spr[SPR_PIR] = T0 & 0x0000000FUL;
2353     RETURN();
2354 }
2355
2356 void OPPROTO op_load_403_pb (void)
2357 {
2358     do_load_403_pb(PARAM1);
2359     RETURN();
2360 }
2361
2362 void OPPROTO op_store_403_pb (void)
2363 {
2364     do_store_403_pb(PARAM1);
2365     RETURN();
2366 }
2367
2368 void OPPROTO op_load_40x_pit (void)
2369 {
2370     T0 = load_40x_pit(env);
2371     RETURN();
2372 }
2373
2374 void OPPROTO op_store_40x_pit (void)
2375 {
2376     store_40x_pit(env, T0);
2377     RETURN();
2378 }
2379
2380 void OPPROTO op_store_40x_dbcr0 (void)
2381 {
2382     store_40x_dbcr0(env, T0);
2383     RETURN();
2384 }
2385
2386 void OPPROTO op_store_40x_sler (void)
2387 {
2388     store_40x_sler(env, T0);
2389     RETURN();
2390 }
2391
2392 void OPPROTO op_store_booke_tcr (void)
2393 {
2394     store_booke_tcr(env, T0);
2395     RETURN();
2396 }
2397
2398 void OPPROTO op_store_booke_tsr (void)
2399 {
2400     store_booke_tsr(env, T0);
2401     RETURN();
2402 }
2403 #endif /* !defined(CONFIG_USER_ONLY) */
2404
2405 /* SPE extension */
2406 void OPPROTO op_splatw_T1_64 (void)
2407 {
2408     T1_64 = (T1_64 << 32) | (T1_64 & 0x00000000FFFFFFFFULL);
2409     RETURN();
2410 }
2411
2412 void OPPROTO op_splatwi_T0_64 (void)
2413 {
2414     uint64_t tmp = PARAM1;
2415
2416     T0_64 = (tmp << 32) | tmp;
2417     RETURN();
2418 }
2419
2420 void OPPROTO op_splatwi_T1_64 (void)
2421 {
2422     uint64_t tmp = PARAM1;
2423
2424     T1_64 = (tmp << 32) | tmp;
2425     RETURN();
2426 }
2427
2428 void OPPROTO op_extsh_T1_64 (void)
2429 {
2430     T1_64 = (int32_t)((int16_t)T1_64);
2431     RETURN();
2432 }
2433
2434 void OPPROTO op_sli16_T1_64 (void)
2435 {
2436     T1_64 = T1_64 << 16;
2437     RETURN();
2438 }
2439
2440 void OPPROTO op_sli32_T1_64 (void)
2441 {
2442     T1_64 = T1_64 << 32;
2443     RETURN();
2444 }
2445
2446 void OPPROTO op_srli32_T1_64 (void)
2447 {
2448     T1_64 = T1_64 >> 32;
2449     RETURN();
2450 }
2451
2452 void OPPROTO op_evsel (void)
2453 {
2454     do_evsel();
2455     RETURN();
2456 }
2457
2458 void OPPROTO op_evaddw (void)
2459 {
2460     do_evaddw();
2461     RETURN();
2462 }
2463
2464 void OPPROTO op_evsubfw (void)
2465 {
2466     do_evsubfw();
2467     RETURN();
2468 }
2469
2470 void OPPROTO op_evneg (void)
2471 {
2472     do_evneg();
2473     RETURN();
2474 }
2475
2476 void OPPROTO op_evabs (void)
2477 {
2478     do_evabs();
2479     RETURN();
2480 }
2481
2482 void OPPROTO op_evextsh (void)
2483 {
2484     T0_64 = ((uint64_t)((int32_t)(int16_t)(T0_64 >> 32)) << 32) |
2485         (uint64_t)((int32_t)(int16_t)T0_64);
2486     RETURN();
2487 }
2488
2489 void OPPROTO op_evextsb (void)
2490 {
2491     T0_64 = ((uint64_t)((int32_t)(int8_t)(T0_64 >> 32)) << 32) |
2492         (uint64_t)((int32_t)(int8_t)T0_64);
2493     RETURN();
2494 }
2495
2496 void OPPROTO op_evcntlzw (void)
2497 {
2498     do_evcntlzw();
2499     RETURN();
2500 }
2501
2502 void OPPROTO op_evrndw (void)
2503 {
2504     do_evrndw();
2505     RETURN();
2506 }
2507
2508 void OPPROTO op_brinc (void)
2509 {
2510     do_brinc();
2511     RETURN();
2512 }
2513
2514 void OPPROTO op_evcntlsw (void)
2515 {
2516     do_evcntlsw();
2517     RETURN();
2518 }
2519
2520 void OPPROTO op_evand (void)
2521 {
2522     T0_64 &= T1_64;
2523     RETURN();
2524 }
2525
2526 void OPPROTO op_evandc (void)
2527 {
2528     T0_64 &= ~T1_64;
2529     RETURN();
2530 }
2531
2532 void OPPROTO op_evor (void)
2533 {
2534     T0_64 |= T1_64;
2535     RETURN();
2536 }
2537
2538 void OPPROTO op_evxor (void)
2539 {
2540     T0_64 ^= T1_64;
2541     RETURN();
2542 }
2543
2544 void OPPROTO op_eveqv (void)
2545 {
2546     T0_64 = ~(T0_64 ^ T1_64);
2547     RETURN();
2548 }
2549
2550 void OPPROTO op_evnor (void)
2551 {
2552     T0_64 = ~(T0_64 | T1_64);
2553     RETURN();
2554 }
2555
2556 void OPPROTO op_evorc (void)
2557 {
2558     T0_64 |= ~T1_64;
2559     RETURN();
2560 }
2561
2562 void OPPROTO op_evnand (void)
2563 {
2564     T0_64 = ~(T0_64 & T1_64);
2565     RETURN();
2566 }
2567
2568 void OPPROTO op_evsrws (void)
2569 {
2570     do_evsrws();
2571     RETURN();
2572 }
2573
2574 void OPPROTO op_evsrwu (void)
2575 {
2576     do_evsrwu();
2577     RETURN();
2578 }
2579
2580 void OPPROTO op_evslw (void)
2581 {
2582     do_evslw();
2583     RETURN();
2584 }
2585
2586 void OPPROTO op_evrlw (void)
2587 {
2588     do_evrlw();
2589     RETURN();
2590 }
2591
2592 void OPPROTO op_evmergelo (void)
2593 {
2594     T0_64 = (T0_64 << 32) | (T1_64 & 0x00000000FFFFFFFFULL);
2595     RETURN();
2596 }
2597
2598 void OPPROTO op_evmergehi (void)
2599 {
2600     T0_64 = (T0_64 & 0xFFFFFFFF00000000ULL) | (T1_64 >> 32);
2601     RETURN();
2602 }
2603
2604 void OPPROTO op_evmergelohi (void)
2605 {
2606     T0_64 = (T0_64 << 32) | (T1_64 >> 32);
2607     RETURN();
2608 }
2609
2610 void OPPROTO op_evmergehilo (void)
2611 {
2612     T0_64 = (T0_64 & 0xFFFFFFFF00000000ULL) | (T1_64 & 0x00000000FFFFFFFFULL);
2613     RETURN();
2614 }
2615
2616 void OPPROTO op_evcmpgts (void)
2617 {
2618     do_evcmpgts();
2619     RETURN();
2620 }
2621
2622 void OPPROTO op_evcmpgtu (void)
2623 {
2624     do_evcmpgtu();
2625     RETURN();
2626 }
2627
2628 void OPPROTO op_evcmplts (void)
2629 {
2630     do_evcmplts();
2631     RETURN();
2632 }
2633
2634 void OPPROTO op_evcmpltu (void)
2635 {
2636     do_evcmpltu();
2637     RETURN();
2638 }
2639
2640 void OPPROTO op_evcmpeq (void)
2641 {
2642     do_evcmpeq();
2643     RETURN();
2644 }
2645
2646 void OPPROTO op_evfssub (void)
2647 {
2648     do_evfssub();
2649     RETURN();
2650 }
2651
2652 void OPPROTO op_evfsadd (void)
2653 {
2654     do_evfsadd();
2655     RETURN();
2656 }
2657
2658 void OPPROTO op_evfsnabs (void)
2659 {
2660     do_evfsnabs();
2661     RETURN();
2662 }
2663
2664 void OPPROTO op_evfsabs (void)
2665 {
2666     do_evfsabs();
2667     RETURN();
2668 }
2669
2670 void OPPROTO op_evfsneg (void)
2671 {
2672     do_evfsneg();
2673     RETURN();
2674 }
2675
2676 void OPPROTO op_evfsdiv (void)
2677 {
2678     do_evfsdiv();
2679     RETURN();
2680 }
2681
2682 void OPPROTO op_evfsmul (void)
2683 {
2684     do_evfsmul();
2685     RETURN();
2686 }
2687
2688 void OPPROTO op_evfscmplt (void)
2689 {
2690     do_evfscmplt();
2691     RETURN();
2692 }
2693
2694 void OPPROTO op_evfscmpgt (void)
2695 {
2696     do_evfscmpgt();
2697     RETURN();
2698 }
2699
2700 void OPPROTO op_evfscmpeq (void)
2701 {
2702     do_evfscmpeq();
2703     RETURN();
2704 }
2705
2706 void OPPROTO op_evfscfsi (void)
2707 {
2708     do_evfscfsi();
2709     RETURN();
2710 }
2711
2712 void OPPROTO op_evfscfui (void)
2713 {
2714     do_evfscfui();
2715     RETURN();
2716 }
2717
2718 void OPPROTO op_evfscfsf (void)
2719 {
2720     do_evfscfsf();
2721     RETURN();
2722 }
2723
2724 void OPPROTO op_evfscfuf (void)
2725 {
2726     do_evfscfuf();
2727     RETURN();
2728 }
2729
2730 void OPPROTO op_evfsctsi (void)
2731 {
2732     do_evfsctsi();
2733     RETURN();
2734 }
2735
2736 void OPPROTO op_evfsctui (void)
2737 {
2738     do_evfsctui();
2739     RETURN();
2740 }
2741
2742 void OPPROTO op_evfsctsf (void)
2743 {
2744     do_evfsctsf();
2745     RETURN();
2746 }
2747
2748 void OPPROTO op_evfsctuf (void)
2749 {
2750     do_evfsctuf();
2751     RETURN();
2752 }
2753
2754 void OPPROTO op_evfsctuiz (void)
2755 {
2756     do_evfsctuiz();
2757     RETURN();
2758 }
2759
2760 void OPPROTO op_evfsctsiz (void)
2761 {
2762     do_evfsctsiz();
2763     RETURN();
2764 }
2765
2766 void OPPROTO op_evfststlt (void)
2767 {
2768     do_evfststlt();
2769     RETURN();
2770 }
2771
2772 void OPPROTO op_evfststgt (void)
2773 {
2774     do_evfststgt();
2775     RETURN();
2776 }
2777
2778 void OPPROTO op_evfststeq (void)
2779 {
2780     do_evfststeq();
2781     RETURN();
2782 }
2783
2784 void OPPROTO op_efssub (void)
2785 {
2786     T0_64 = _do_efssub(T0_64, T1_64);
2787     RETURN();
2788 }
2789
2790 void OPPROTO op_efsadd (void)
2791 {
2792     T0_64 = _do_efsadd(T0_64, T1_64);
2793     RETURN();
2794 }
2795
2796 void OPPROTO op_efsnabs (void)
2797 {
2798     T0_64 = _do_efsnabs(T0_64);
2799     RETURN();
2800 }
2801
2802 void OPPROTO op_efsabs (void)
2803 {
2804     T0_64 = _do_efsabs(T0_64);
2805     RETURN();
2806 }
2807
2808 void OPPROTO op_efsneg (void)
2809 {
2810     T0_64 = _do_efsneg(T0_64);
2811     RETURN();
2812 }
2813
2814 void OPPROTO op_efsdiv (void)
2815 {
2816     T0_64 = _do_efsdiv(T0_64, T1_64);
2817     RETURN();
2818 }
2819
2820 void OPPROTO op_efsmul (void)
2821 {
2822     T0_64 = _do_efsmul(T0_64, T1_64);
2823     RETURN();
2824 }
2825
2826 void OPPROTO op_efscmplt (void)
2827 {
2828     do_efscmplt();
2829     RETURN();
2830 }
2831
2832 void OPPROTO op_efscmpgt (void)
2833 {
2834     do_efscmpgt();
2835     RETURN();
2836 }
2837
2838 void OPPROTO op_efscfd (void)
2839 {
2840     do_efscfd();
2841     RETURN();
2842 }
2843
2844 void OPPROTO op_efscmpeq (void)
2845 {
2846     do_efscmpeq();
2847     RETURN();
2848 }
2849
2850 void OPPROTO op_efscfsi (void)
2851 {
2852     do_efscfsi();
2853     RETURN();
2854 }
2855
2856 void OPPROTO op_efscfui (void)
2857 {
2858     do_efscfui();
2859     RETURN();
2860 }
2861
2862 void OPPROTO op_efscfsf (void)
2863 {
2864     do_efscfsf();
2865     RETURN();
2866 }
2867
2868 void OPPROTO op_efscfuf (void)
2869 {
2870     do_efscfuf();
2871     RETURN();
2872 }
2873
2874 void OPPROTO op_efsctsi (void)
2875 {
2876     do_efsctsi();
2877     RETURN();
2878 }
2879
2880 void OPPROTO op_efsctui (void)
2881 {
2882     do_efsctui();
2883     RETURN();
2884 }
2885
2886 void OPPROTO op_efsctsf (void)
2887 {
2888     do_efsctsf();
2889     RETURN();
2890 }
2891
2892 void OPPROTO op_efsctuf (void)
2893 {
2894     do_efsctuf();
2895     RETURN();
2896 }
2897
2898 void OPPROTO op_efsctsiz (void)
2899 {
2900     do_efsctsiz();
2901     RETURN();
2902 }
2903
2904 void OPPROTO op_efsctuiz (void)
2905 {
2906     do_efsctuiz();
2907     RETURN();
2908 }
2909
2910 void OPPROTO op_efststlt (void)
2911 {
2912     T0 = _do_efststlt(T0_64, T1_64);
2913     RETURN();
2914 }
2915
2916 void OPPROTO op_efststgt (void)
2917 {
2918     T0 = _do_efststgt(T0_64, T1_64);
2919     RETURN();
2920 }
2921
2922 void OPPROTO op_efststeq (void)
2923 {
2924     T0 = _do_efststeq(T0_64, T1_64);
2925     RETURN();
2926 }
2927
2928 void OPPROTO op_efdsub (void)
2929 {
2930     CPU_DoubleU u1, u2;
2931     u1.ll = T0_64;
2932     u2.ll = T1_64;
2933     u1.d = float64_sub(u1.d, u2.d, &env->spe_status);
2934     T0_64 = u1.ll;
2935     RETURN();
2936 }
2937
2938 void OPPROTO op_efdadd (void)
2939 {
2940     CPU_DoubleU u1, u2;
2941     u1.ll = T0_64;
2942     u2.ll = T1_64;
2943     u1.d = float64_add(u1.d, u2.d, &env->spe_status);
2944     T0_64 = u1.ll;
2945     RETURN();
2946 }
2947
2948 void OPPROTO op_efdcfsid (void)
2949 {
2950     do_efdcfsi();
2951     RETURN();
2952 }
2953
2954 void OPPROTO op_efdcfuid (void)
2955 {
2956     do_efdcfui();
2957     RETURN();
2958 }
2959
2960 void OPPROTO op_efdnabs (void)
2961 {
2962     T0_64 |= 0x8000000000000000ULL;
2963     RETURN();
2964 }
2965
2966 void OPPROTO op_efdabs (void)
2967 {
2968     T0_64 &= ~0x8000000000000000ULL;
2969     RETURN();
2970 }
2971
2972 void OPPROTO op_efdneg (void)
2973 {
2974     T0_64 ^= 0x8000000000000000ULL;
2975     RETURN();
2976 }
2977
2978 void OPPROTO op_efddiv (void)
2979 {
2980     CPU_DoubleU u1, u2;
2981     u1.ll = T0_64;
2982     u2.ll = T1_64;
2983     u1.d = float64_div(u1.d, u2.d, &env->spe_status);
2984     T0_64 = u1.ll;
2985     RETURN();
2986 }
2987
2988 void OPPROTO op_efdmul (void)
2989 {
2990     CPU_DoubleU u1, u2;
2991     u1.ll = T0_64;
2992     u2.ll = T1_64;
2993     u1.d = float64_mul(u1.d, u2.d, &env->spe_status);
2994     T0_64 = u1.ll;
2995     RETURN();
2996 }
2997
2998 void OPPROTO op_efdctsidz (void)
2999 {
3000     do_efdctsiz();
3001     RETURN();
3002 }
3003
3004 void OPPROTO op_efdctuidz (void)
3005 {
3006     do_efdctuiz();
3007     RETURN();
3008 }
3009
3010 void OPPROTO op_efdcmplt (void)
3011 {
3012     do_efdcmplt();
3013     RETURN();
3014 }
3015
3016 void OPPROTO op_efdcmpgt (void)
3017 {
3018     do_efdcmpgt();
3019     RETURN();
3020 }
3021
3022 void OPPROTO op_efdcfs (void)
3023 {
3024     do_efdcfs();
3025     RETURN();
3026 }
3027
3028 void OPPROTO op_efdcmpeq (void)
3029 {
3030     do_efdcmpeq();
3031     RETURN();
3032 }
3033
3034 void OPPROTO op_efdcfsi (void)
3035 {
3036     do_efdcfsi();
3037     RETURN();
3038 }
3039
3040 void OPPROTO op_efdcfui (void)
3041 {
3042     do_efdcfui();
3043     RETURN();
3044 }
3045
3046 void OPPROTO op_efdcfsf (void)
3047 {
3048     do_efdcfsf();
3049     RETURN();
3050 }
3051
3052 void OPPROTO op_efdcfuf (void)
3053 {
3054     do_efdcfuf();
3055     RETURN();
3056 }
3057
3058 void OPPROTO op_efdctsi (void)
3059 {
3060     do_efdctsi();
3061     RETURN();
3062 }
3063
3064 void OPPROTO op_efdctui (void)
3065 {
3066     do_efdctui();
3067     RETURN();
3068 }
3069
3070 void OPPROTO op_efdctsf (void)
3071 {
3072     do_efdctsf();
3073     RETURN();
3074 }
3075
3076 void OPPROTO op_efdctuf (void)
3077 {
3078     do_efdctuf();
3079     RETURN();
3080 }
3081
3082 void OPPROTO op_efdctuiz (void)
3083 {
3084     do_efdctuiz();
3085     RETURN();
3086 }
3087
3088 void OPPROTO op_efdctsiz (void)
3089 {
3090     do_efdctsiz();
3091     RETURN();
3092 }
3093
3094 void OPPROTO op_efdtstlt (void)
3095 {
3096     T0 = _do_efdtstlt(T0_64, T1_64);
3097     RETURN();
3098 }
3099
3100 void OPPROTO op_efdtstgt (void)
3101 {
3102     T0 = _do_efdtstgt(T0_64, T1_64);
3103     RETURN();
3104 }
3105
3106 void OPPROTO op_efdtsteq (void)
3107 {
3108     T0 = _do_efdtsteq(T0_64, T1_64);
3109     RETURN();
3110 }