Statistics
| Branch: | Revision:

root / target-mips / op.c @ 9b9e4393

History | View | Annotate | Download (45 kB)

1
/*
2
 *  MIPS emulation micro-operations for qemu.
3
 * 
4
 *  Copyright (c) 2004-2005 Jocelyn Mayer
5
 *  Copyright (c) 2006 Marius Groeger (FPU operations)
6
 *  Copyright (c) 2007 Thiemo Seufer (64-bit FPU support)
7
 *
8
 * This library is free software; you can redistribute it and/or
9
 * modify it under the terms of the GNU Lesser General Public
10
 * License as published by the Free Software Foundation; either
11
 * version 2 of the License, or (at your option) any later version.
12
 *
13
 * This library is distributed in the hope that it will be useful,
14
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
16
 * Lesser General Public License for more details.
17
 *
18
 * You should have received a copy of the GNU Lesser General Public
19
 * License along with this library; if not, write to the Free Software
20
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
21
 */
22

    
23
#include "config.h"
24
#include "exec.h"
25

    
26
#ifndef CALL_FROM_TB0
27
#define CALL_FROM_TB0(func) func()
28
#endif
29
#ifndef CALL_FROM_TB1
30
#define CALL_FROM_TB1(func, arg0) func(arg0)
31
#endif
32
#ifndef CALL_FROM_TB1_CONST16
33
#define CALL_FROM_TB1_CONST16(func, arg0) CALL_FROM_TB1(func, arg0)
34
#endif
35
#ifndef CALL_FROM_TB2
36
#define CALL_FROM_TB2(func, arg0, arg1) func(arg0, arg1)
37
#endif
38
#ifndef CALL_FROM_TB2_CONST16
39
#define CALL_FROM_TB2_CONST16(func, arg0, arg1)     \
40
        CALL_FROM_TB2(func, arg0, arg1)
41
#endif
42
#ifndef CALL_FROM_TB3
43
#define CALL_FROM_TB3(func, arg0, arg1, arg2) func(arg0, arg1, arg2)
44
#endif
45
#ifndef CALL_FROM_TB4
46
#define CALL_FROM_TB4(func, arg0, arg1, arg2, arg3) \
47
        func(arg0, arg1, arg2, arg3)
48
#endif
49

    
50
#define REG 1
51
#include "op_template.c"
52
#undef REG
53
#define REG 2
54
#include "op_template.c"
55
#undef REG
56
#define REG 3
57
#include "op_template.c"
58
#undef REG
59
#define REG 4
60
#include "op_template.c"
61
#undef REG
62
#define REG 5
63
#include "op_template.c"
64
#undef REG
65
#define REG 6
66
#include "op_template.c"
67
#undef REG
68
#define REG 7
69
#include "op_template.c"
70
#undef REG
71
#define REG 8
72
#include "op_template.c"
73
#undef REG
74
#define REG 9
75
#include "op_template.c"
76
#undef REG
77
#define REG 10
78
#include "op_template.c"
79
#undef REG
80
#define REG 11
81
#include "op_template.c"
82
#undef REG
83
#define REG 12
84
#include "op_template.c"
85
#undef REG
86
#define REG 13
87
#include "op_template.c"
88
#undef REG
89
#define REG 14
90
#include "op_template.c"
91
#undef REG
92
#define REG 15
93
#include "op_template.c"
94
#undef REG
95
#define REG 16
96
#include "op_template.c"
97
#undef REG
98
#define REG 17
99
#include "op_template.c"
100
#undef REG
101
#define REG 18
102
#include "op_template.c"
103
#undef REG
104
#define REG 19
105
#include "op_template.c"
106
#undef REG
107
#define REG 20
108
#include "op_template.c"
109
#undef REG
110
#define REG 21
111
#include "op_template.c"
112
#undef REG
113
#define REG 22
114
#include "op_template.c"
115
#undef REG
116
#define REG 23
117
#include "op_template.c"
118
#undef REG
119
#define REG 24
120
#include "op_template.c"
121
#undef REG
122
#define REG 25
123
#include "op_template.c"
124
#undef REG
125
#define REG 26
126
#include "op_template.c"
127
#undef REG
128
#define REG 27
129
#include "op_template.c"
130
#undef REG
131
#define REG 28
132
#include "op_template.c"
133
#undef REG
134
#define REG 29
135
#include "op_template.c"
136
#undef REG
137
#define REG 30
138
#include "op_template.c"
139
#undef REG
140
#define REG 31
141
#include "op_template.c"
142
#undef REG
143

    
144
#define TN
145
#include "op_template.c"
146
#undef TN
147

    
148
#define FREG 0
149
#include "fop_template.c"
150
#undef FREG
151
#define FREG 1
152
#include "fop_template.c"
153
#undef FREG
154
#define FREG 2
155
#include "fop_template.c"
156
#undef FREG
157
#define FREG 3
158
#include "fop_template.c"
159
#undef FREG
160
#define FREG 4
161
#include "fop_template.c"
162
#undef FREG
163
#define FREG 5
164
#include "fop_template.c"
165
#undef FREG
166
#define FREG 6
167
#include "fop_template.c"
168
#undef FREG
169
#define FREG 7
170
#include "fop_template.c"
171
#undef FREG
172
#define FREG 8
173
#include "fop_template.c"
174
#undef FREG
175
#define FREG 9
176
#include "fop_template.c"
177
#undef FREG
178
#define FREG 10
179
#include "fop_template.c"
180
#undef FREG
181
#define FREG 11
182
#include "fop_template.c"
183
#undef FREG
184
#define FREG 12
185
#include "fop_template.c"
186
#undef FREG
187
#define FREG 13
188
#include "fop_template.c"
189
#undef FREG
190
#define FREG 14
191
#include "fop_template.c"
192
#undef FREG
193
#define FREG 15
194
#include "fop_template.c"
195
#undef FREG
196
#define FREG 16
197
#include "fop_template.c"
198
#undef FREG
199
#define FREG 17
200
#include "fop_template.c"
201
#undef FREG
202
#define FREG 18
203
#include "fop_template.c"
204
#undef FREG
205
#define FREG 19
206
#include "fop_template.c"
207
#undef FREG
208
#define FREG 20
209
#include "fop_template.c"
210
#undef FREG
211
#define FREG 21
212
#include "fop_template.c"
213
#undef FREG
214
#define FREG 22
215
#include "fop_template.c"
216
#undef FREG
217
#define FREG 23
218
#include "fop_template.c"
219
#undef FREG
220
#define FREG 24
221
#include "fop_template.c"
222
#undef FREG
223
#define FREG 25
224
#include "fop_template.c"
225
#undef FREG
226
#define FREG 26
227
#include "fop_template.c"
228
#undef FREG
229
#define FREG 27
230
#include "fop_template.c"
231
#undef FREG
232
#define FREG 28
233
#include "fop_template.c"
234
#undef FREG
235
#define FREG 29
236
#include "fop_template.c"
237
#undef FREG
238
#define FREG 30
239
#include "fop_template.c"
240
#undef FREG
241
#define FREG 31
242
#include "fop_template.c"
243
#undef FREG
244

    
245
#define FTN
246
#include "fop_template.c"
247
#undef FTN
248

    
249
void op_dup_T0 (void)
250
{
251
    T2 = T0;
252
    RETURN();
253
}
254

    
255
void op_load_HI (void)
256
{
257
    T0 = env->HI;
258
    RETURN();
259
}
260

    
261
void op_store_HI (void)
262
{
263
    env->HI = T0;
264
    RETURN();
265
}
266

    
267
void op_load_LO (void)
268
{
269
    T0 = env->LO;
270
    RETURN();
271
}
272

    
273
void op_store_LO (void)
274
{
275
    env->LO = T0;
276
    RETURN();
277
}
278

    
279
/* Load and store */
280
#define MEMSUFFIX _raw
281
#include "op_mem.c"
282
#undef MEMSUFFIX
283
#if !defined(CONFIG_USER_ONLY)
284
#define MEMSUFFIX _user
285
#include "op_mem.c"
286
#undef MEMSUFFIX
287

    
288
#define MEMSUFFIX _kernel
289
#include "op_mem.c"
290
#undef MEMSUFFIX
291
#endif
292

    
293
/* Addresses computation */
294
void op_addr_add (void)
295
{
296
/* For compatibility with 32-bit code, data reference in user mode
297
   with Status_UX = 0 should be casted to 32-bit and sign extended.
298
   See the MIPS64 PRA manual, section 4.10. */
299
#ifdef TARGET_MIPS64
300
    if ((env->CP0_Status & (1 << CP0St_UM)) &&
301
        !(env->CP0_Status & (1 << CP0St_UX)))
302
        T0 = (int64_t)(int32_t)(T0 + T1);
303
    else
304
#endif
305
        T0 += T1;
306
    RETURN();
307
}
308

    
309
/* Arithmetic */
310
void op_add (void)
311
{
312
    T0 = (int32_t)((int32_t)T0 + (int32_t)T1);
313
    RETURN();
314
}
315

    
316
void op_addo (void)
317
{
318
    target_ulong tmp;
319

    
320
    tmp = (int32_t)T0;
321
    T0 = (int32_t)T0 + (int32_t)T1;
322
    if (((tmp ^ T1 ^ (-1)) & (T0 ^ T1)) >> 31) {
323
        /* operands of same sign, result different sign */
324
        CALL_FROM_TB1(do_raise_exception, EXCP_OVERFLOW);
325
    }
326
    T0 = (int32_t)T0;
327
    RETURN();
328
}
329

    
330
void op_sub (void)
331
{
332
    T0 = (int32_t)((int32_t)T0 - (int32_t)T1);
333
    RETURN();
334
}
335

    
336
void op_subo (void)
337
{
338
    target_ulong tmp;
339

    
340
    tmp = (int32_t)T0;
341
    T0 = (int32_t)T0 - (int32_t)T1;
342
    if (((tmp ^ T1) & (tmp ^ T0)) >> 31) {
343
        /* operands of different sign, first operand and result different sign */
344
        CALL_FROM_TB1(do_raise_exception, EXCP_OVERFLOW);
345
    }
346
    T0 = (int32_t)T0;
347
    RETURN();
348
}
349

    
350
void op_mul (void)
351
{
352
    T0 = (int32_t)((int32_t)T0 * (int32_t)T1);
353
    RETURN();
354
}
355

    
356
#if HOST_LONG_BITS < 64
357
void op_div (void)
358
{
359
    CALL_FROM_TB0(do_div);
360
    RETURN();
361
}
362
#else
363
void op_div (void)
364
{
365
    if (T1 != 0) {
366
        env->LO = (int32_t)((int64_t)(int32_t)T0 / (int32_t)T1);
367
        env->HI = (int32_t)((int64_t)(int32_t)T0 % (int32_t)T1);
368
    }
369
    RETURN();
370
}
371
#endif
372

    
373
void op_divu (void)
374
{
375
    if (T1 != 0) {
376
        env->LO = (int32_t)((uint32_t)T0 / (uint32_t)T1);
377
        env->HI = (int32_t)((uint32_t)T0 % (uint32_t)T1);
378
    }
379
    RETURN();
380
}
381

    
382
#ifdef TARGET_MIPS64
383
/* Arithmetic */
384
void op_dadd (void)
385
{
386
    T0 += T1;
387
    RETURN();
388
}
389

    
390
void op_daddo (void)
391
{
392
    target_long tmp;
393

    
394
    tmp = T0;
395
    T0 += T1;
396
    if (((tmp ^ T1 ^ (-1)) & (T0 ^ T1)) >> 63) {
397
        /* operands of same sign, result different sign */
398
        CALL_FROM_TB1(do_raise_exception, EXCP_OVERFLOW);
399
    }
400
    RETURN();
401
}
402

    
403
void op_dsub (void)
404
{
405
    T0 -= T1;
406
    RETURN();
407
}
408

    
409
void op_dsubo (void)
410
{
411
    target_long tmp;
412

    
413
    tmp = T0;
414
    T0 = (int64_t)T0 - (int64_t)T1;
415
    if (((tmp ^ T1) & (tmp ^ T0)) >> 63) {
416
        /* operands of different sign, first operand and result different sign */
417
        CALL_FROM_TB1(do_raise_exception, EXCP_OVERFLOW);
418
    }
419
    RETURN();
420
}
421

    
422
void op_dmul (void)
423
{
424
    T0 = (int64_t)T0 * (int64_t)T1;
425
    RETURN();
426
}
427

    
428
/* Those might call libgcc functions.  */
429
void op_ddiv (void)
430
{
431
    do_ddiv();
432
    RETURN();
433
}
434

    
435
#if TARGET_LONG_BITS > HOST_LONG_BITS
436
void op_ddivu (void)
437
{
438
    do_ddivu();
439
    RETURN();
440
}
441
#else
442
void op_ddivu (void)
443
{
444
    if (T1 != 0) {
445
        env->LO = T0 / T1;
446
        env->HI = T0 % T1;
447
    }
448
    RETURN();
449
}
450
#endif
451
#endif /* TARGET_MIPS64 */
452

    
453
/* Logical */
454
void op_and (void)
455
{
456
    T0 &= T1;
457
    RETURN();
458
}
459

    
460
void op_nor (void)
461
{
462
    T0 = ~(T0 | T1);
463
    RETURN();
464
}
465

    
466
void op_or (void)
467
{
468
    T0 |= T1;
469
    RETURN();
470
}
471

    
472
void op_xor (void)
473
{
474
    T0 ^= T1;
475
    RETURN();
476
}
477

    
478
void op_sll (void)
479
{
480
    T0 = (int32_t)((uint32_t)T0 << T1);
481
    RETURN();
482
}
483

    
484
void op_sra (void)
485
{
486
    T0 = (int32_t)((int32_t)T0 >> T1);
487
    RETURN();
488
}
489

    
490
void op_srl (void)
491
{
492
    T0 = (int32_t)((uint32_t)T0 >> T1);
493
    RETURN();
494
}
495

    
496
void op_rotr (void)
497
{
498
    target_ulong tmp;
499

    
500
    if (T1) {
501
       tmp = (int32_t)((uint32_t)T0 << (0x20 - T1));
502
       T0 = (int32_t)((uint32_t)T0 >> T1) | tmp;
503
    }
504
    RETURN();
505
}
506

    
507
void op_sllv (void)
508
{
509
    T0 = (int32_t)((uint32_t)T1 << ((uint32_t)T0 & 0x1F));
510
    RETURN();
511
}
512

    
513
void op_srav (void)
514
{
515
    T0 = (int32_t)((int32_t)T1 >> (T0 & 0x1F));
516
    RETURN();
517
}
518

    
519
void op_srlv (void)
520
{
521
    T0 = (int32_t)((uint32_t)T1 >> (T0 & 0x1F));
522
    RETURN();
523
}
524

    
525
void op_rotrv (void)
526
{
527
    target_ulong tmp;
528

    
529
    T0 &= 0x1F;
530
    if (T0) {
531
       tmp = (int32_t)((uint32_t)T1 << (0x20 - T0));
532
       T0 = (int32_t)((uint32_t)T1 >> T0) | tmp;
533
    } else
534
       T0 = T1;
535
    RETURN();
536
}
537

    
538
void op_clo (void)
539
{
540
    int n;
541

    
542
    if (T0 == ~((target_ulong)0)) {
543
        T0 = 32;
544
    } else {
545
        for (n = 0; n < 32; n++) {
546
            if (!(T0 & (1 << 31)))
547
                break;
548
            T0 = T0 << 1;
549
        }
550
        T0 = n;
551
    }
552
    RETURN();
553
}
554

    
555
void op_clz (void)
556
{
557
    int n;
558

    
559
    if (T0 == 0) {
560
        T0 = 32;
561
    } else {
562
        for (n = 0; n < 32; n++) {
563
            if (T0 & (1 << 31))
564
                break;
565
            T0 = T0 << 1;
566
        }
567
        T0 = n;
568
    }
569
    RETURN();
570
}
571

    
572
#ifdef TARGET_MIPS64
573

    
574
#if TARGET_LONG_BITS > HOST_LONG_BITS
575
/* Those might call libgcc functions.  */
576
void op_dsll (void)
577
{
578
    CALL_FROM_TB0(do_dsll);
579
    RETURN();
580
}
581

    
582
void op_dsll32 (void)
583
{
584
    CALL_FROM_TB0(do_dsll32);
585
    RETURN();
586
}
587

    
588
void op_dsra (void)
589
{
590
    CALL_FROM_TB0(do_dsra);
591
    RETURN();
592
}
593

    
594
void op_dsra32 (void)
595
{
596
    CALL_FROM_TB0(do_dsra32);
597
    RETURN();
598
}
599

    
600
void op_dsrl (void)
601
{
602
    CALL_FROM_TB0(do_dsrl);
603
    RETURN();
604
}
605

    
606
void op_dsrl32 (void)
607
{
608
    CALL_FROM_TB0(do_dsrl32);
609
    RETURN();
610
}
611

    
612
void op_drotr (void)
613
{
614
    CALL_FROM_TB0(do_drotr);
615
    RETURN();
616
}
617

    
618
void op_drotr32 (void)
619
{
620
    CALL_FROM_TB0(do_drotr32);
621
    RETURN();
622
}
623

    
624
void op_dsllv (void)
625
{
626
    CALL_FROM_TB0(do_dsllv);
627
    RETURN();
628
}
629

    
630
void op_dsrav (void)
631
{
632
    CALL_FROM_TB0(do_dsrav);
633
    RETURN();
634
}
635

    
636
void op_dsrlv (void)
637
{
638
    CALL_FROM_TB0(do_dsrlv);
639
    RETURN();
640
}
641

    
642
void op_drotrv (void)
643
{
644
    CALL_FROM_TB0(do_drotrv);
645
    RETURN();
646
}
647

    
648
#else /* TARGET_LONG_BITS > HOST_LONG_BITS */
649

    
650
void op_dsll (void)
651
{
652
    T0 = T0 << T1;
653
    RETURN();
654
}
655

    
656
void op_dsll32 (void)
657
{
658
    T0 = T0 << (T1 + 32);
659
    RETURN();
660
}
661

    
662
void op_dsra (void)
663
{
664
    T0 = (int64_t)T0 >> T1;
665
    RETURN();
666
}
667

    
668
void op_dsra32 (void)
669
{
670
    T0 = (int64_t)T0 >> (T1 + 32);
671
    RETURN();
672
}
673

    
674
void op_dsrl (void)
675
{
676
    T0 = T0 >> T1;
677
    RETURN();
678
}
679

    
680
void op_dsrl32 (void)
681
{
682
    T0 = T0 >> (T1 + 32);
683
    RETURN();
684
}
685

    
686
void op_drotr (void)
687
{
688
    target_ulong tmp;
689

    
690
    if (T1) {
691
       tmp = T0 << (0x40 - T1);
692
       T0 = (T0 >> T1) | tmp;
693
    }
694
    RETURN();
695
}
696

    
697
void op_drotr32 (void)
698
{
699
    target_ulong tmp;
700

    
701
    if (T1) {
702
       tmp = T0 << (0x40 - (32 + T1));
703
       T0 = (T0 >> (32 + T1)) | tmp;
704
    }
705
    RETURN();
706
}
707

    
708
void op_dsllv (void)
709
{
710
    T0 = T1 << (T0 & 0x3F);
711
    RETURN();
712
}
713

    
714
void op_dsrav (void)
715
{
716
    T0 = (int64_t)T1 >> (T0 & 0x3F);
717
    RETURN();
718
}
719

    
720
void op_dsrlv (void)
721
{
722
    T0 = T1 >> (T0 & 0x3F);
723
    RETURN();
724
}
725

    
726
void op_drotrv (void)
727
{
728
    target_ulong tmp;
729

    
730
    T0 &= 0x3F;
731
    if (T0) {
732
       tmp = T1 << (0x40 - T0);
733
       T0 = (T1 >> T0) | tmp;
734
    } else
735
       T0 = T1;
736
    RETURN();
737
}
738
#endif /* TARGET_LONG_BITS > HOST_LONG_BITS */
739

    
740
void op_dclo (void)
741
{
742
    int n;
743

    
744
    if (T0 == ~((target_ulong)0)) {
745
        T0 = 64;
746
    } else {
747
        for (n = 0; n < 64; n++) {
748
            if (!(T0 & (1ULL << 63)))
749
                break;
750
            T0 = T0 << 1;
751
        }
752
        T0 = n;
753
    }
754
    RETURN();
755
}
756

    
757
void op_dclz (void)
758
{
759
    int n;
760

    
761
    if (T0 == 0) {
762
        T0 = 64;
763
    } else {
764
        for (n = 0; n < 64; n++) {
765
            if (T0 & (1ULL << 63))
766
                break;
767
            T0 = T0 << 1;
768
        }
769
        T0 = n;
770
    }
771
    RETURN();
772
}
773
#endif
774

    
775
/* 64 bits arithmetic */
776
#if TARGET_LONG_BITS > HOST_LONG_BITS
777
void op_mult (void)
778
{
779
    CALL_FROM_TB0(do_mult);
780
    RETURN();
781
}
782

    
783
void op_multu (void)
784
{
785
    CALL_FROM_TB0(do_multu);
786
    RETURN();
787
}
788

    
789
void op_madd (void)
790
{
791
    CALL_FROM_TB0(do_madd);
792
    RETURN();
793
}
794

    
795
void op_maddu (void)
796
{
797
    CALL_FROM_TB0(do_maddu);
798
    RETURN();
799
}
800

    
801
void op_msub (void)
802
{
803
    CALL_FROM_TB0(do_msub);
804
    RETURN();
805
}
806

    
807
void op_msubu (void)
808
{
809
    CALL_FROM_TB0(do_msubu);
810
    RETURN();
811
}
812

    
813
#else /* TARGET_LONG_BITS > HOST_LONG_BITS */
814

    
815
static inline uint64_t get_HILO (void)
816
{
817
    return ((uint64_t)env->HI << 32) | ((uint64_t)(uint32_t)env->LO);
818
}
819

    
820
static inline void set_HILO (uint64_t HILO)
821
{
822
    env->LO = (int32_t)(HILO & 0xFFFFFFFF);
823
    env->HI = (int32_t)(HILO >> 32);
824
}
825

    
826
void op_mult (void)
827
{
828
    set_HILO((int64_t)(int32_t)T0 * (int64_t)(int32_t)T1);
829
    RETURN();
830
}
831

    
832
void op_multu (void)
833
{
834
    set_HILO((uint64_t)(uint32_t)T0 * (uint64_t)(uint32_t)T1);
835
    RETURN();
836
}
837

    
838
void op_madd (void)
839
{
840
    int64_t tmp;
841

    
842
    tmp = ((int64_t)(int32_t)T0 * (int64_t)(int32_t)T1);
843
    set_HILO((int64_t)get_HILO() + tmp);
844
    RETURN();
845
}
846

    
847
void op_maddu (void)
848
{
849
    uint64_t tmp;
850

    
851
    tmp = ((uint64_t)(uint32_t)T0 * (uint64_t)(uint32_t)T1);
852
    set_HILO(get_HILO() + tmp);
853
    RETURN();
854
}
855

    
856
void op_msub (void)
857
{
858
    int64_t tmp;
859

    
860
    tmp = ((int64_t)(int32_t)T0 * (int64_t)(int32_t)T1);
861
    set_HILO((int64_t)get_HILO() - tmp);
862
    RETURN();
863
}
864

    
865
void op_msubu (void)
866
{
867
    uint64_t tmp;
868

    
869
    tmp = ((uint64_t)(uint32_t)T0 * (uint64_t)(uint32_t)T1);
870
    set_HILO(get_HILO() - tmp);
871
    RETURN();
872
}
873
#endif /* TARGET_LONG_BITS > HOST_LONG_BITS */
874

    
875
#ifdef TARGET_MIPS64
876
void op_dmult (void)
877
{
878
    CALL_FROM_TB4(muls64, &(env->HI), &(env->LO), T0, T1);
879
    RETURN();
880
}
881

    
882
void op_dmultu (void)
883
{
884
    CALL_FROM_TB4(mulu64, &(env->HI), &(env->LO), T0, T1);
885
    RETURN();
886
}
887
#endif
888

    
889
/* Conditional moves */
890
void op_movn (void)
891
{
892
    if (T1 != 0)
893
        env->gpr[PARAM1] = T0;
894
    RETURN();
895
}
896

    
897
void op_movz (void)
898
{
899
    if (T1 == 0)
900
        env->gpr[PARAM1] = T0;
901
    RETURN();
902
}
903

    
904
void op_movf (void)
905
{
906
    if (!(env->fcr31 & PARAM1))
907
        T0 = T1;
908
    RETURN();
909
}
910

    
911
void op_movt (void)
912
{
913
    if (env->fcr31 & PARAM1)
914
        T0 = T1;
915
    RETURN();
916
}
917

    
918
/* Tests */
919
#define OP_COND(name, cond) \
920
void glue(op_, name) (void) \
921
{                           \
922
    if (cond) {             \
923
        T0 = 1;             \
924
    } else {                \
925
        T0 = 0;             \
926
    }                       \
927
    RETURN();               \
928
}
929

    
930
OP_COND(eq, T0 == T1);
931
OP_COND(ne, T0 != T1);
932
OP_COND(ge, (target_long)T0 >= (target_long)T1);
933
OP_COND(geu, T0 >= T1);
934
OP_COND(lt, (target_long)T0 < (target_long)T1);
935
OP_COND(ltu, T0 < T1);
936
OP_COND(gez, (target_long)T0 >= 0);
937
OP_COND(gtz, (target_long)T0 > 0);
938
OP_COND(lez, (target_long)T0 <= 0);
939
OP_COND(ltz, (target_long)T0 < 0);
940

    
941
/* Branches */
942
void OPPROTO op_goto_tb0(void)
943
{
944
    GOTO_TB(op_goto_tb0, PARAM1, 0);
945
    RETURN();
946
}
947

    
948
void OPPROTO op_goto_tb1(void)
949
{
950
    GOTO_TB(op_goto_tb1, PARAM1, 1);
951
    RETURN();
952
}
953

    
954
/* Branch to register */
955
void op_save_breg_target (void)
956
{
957
    env->btarget = T2;
958
    RETURN();
959
}
960

    
961
void op_restore_breg_target (void)
962
{
963
    T2 = env->btarget;
964
    RETURN();
965
}
966

    
967
void op_breg (void)
968
{
969
    env->PC = T2;
970
    RETURN();
971
}
972

    
973
void op_save_btarget (void)
974
{
975
    env->btarget = PARAM1;
976
    RETURN();
977
}
978

    
979
#ifdef TARGET_MIPS64
980
void op_save_btarget64 (void)
981
{
982
    env->btarget = ((uint64_t)PARAM1 << 32) | (uint32_t)PARAM2;
983
    RETURN();
984
}
985
#endif
986

    
987
/* Conditional branch */
988
void op_set_bcond (void)
989
{
990
    T2 = T0;
991
    RETURN();
992
}
993

    
994
void op_save_bcond (void)
995
{
996
    env->bcond = T2;
997
    RETURN();
998
}
999

    
1000
void op_restore_bcond (void)
1001
{
1002
    T2 = env->bcond;
1003
    RETURN();
1004
}
1005

    
1006
void op_jnz_T2 (void)
1007
{
1008
    if (T2)
1009
        GOTO_LABEL_PARAM(1);
1010
    RETURN();
1011
}
1012

    
1013
/* CP0 functions */
1014
void op_mfc0_index (void)
1015
{
1016
    T0 = env->CP0_Index;
1017
    RETURN();
1018
}
1019

    
1020
void op_mfc0_random (void)
1021
{
1022
    CALL_FROM_TB0(do_mfc0_random);
1023
    RETURN();
1024
}
1025

    
1026
void op_mfc0_entrylo0 (void)
1027
{
1028
    T0 = (int32_t)env->CP0_EntryLo0;
1029
    RETURN();
1030
}
1031

    
1032
void op_mfc0_entrylo1 (void)
1033
{
1034
    T0 = (int32_t)env->CP0_EntryLo1;
1035
    RETURN();
1036
}
1037

    
1038
void op_mfc0_context (void)
1039
{
1040
    T0 = (int32_t)env->CP0_Context;
1041
    RETURN();
1042
}
1043

    
1044
void op_mfc0_pagemask (void)
1045
{
1046
    T0 = env->CP0_PageMask;
1047
    RETURN();
1048
}
1049

    
1050
void op_mfc0_pagegrain (void)
1051
{
1052
    T0 = env->CP0_PageGrain;
1053
    RETURN();
1054
}
1055

    
1056
void op_mfc0_wired (void)
1057
{
1058
    T0 = env->CP0_Wired;
1059
    RETURN();
1060
}
1061

    
1062
void op_mfc0_hwrena (void)
1063
{
1064
    T0 = env->CP0_HWREna;
1065
    RETURN();
1066
}
1067

    
1068
void op_mfc0_badvaddr (void)
1069
{
1070
    T0 = (int32_t)env->CP0_BadVAddr;
1071
    RETURN();
1072
}
1073

    
1074
void op_mfc0_count (void)
1075
{
1076
    CALL_FROM_TB0(do_mfc0_count);
1077
    RETURN();
1078
}
1079

    
1080
void op_mfc0_entryhi (void)
1081
{
1082
    T0 = (int32_t)env->CP0_EntryHi;
1083
    RETURN();
1084
}
1085

    
1086
void op_mfc0_compare (void)
1087
{
1088
    T0 = env->CP0_Compare;
1089
    RETURN();
1090
}
1091

    
1092
void op_mfc0_status (void)
1093
{
1094
    T0 = env->CP0_Status;
1095
    RETURN();
1096
}
1097

    
1098
void op_mfc0_intctl (void)
1099
{
1100
    T0 = env->CP0_IntCtl;
1101
    RETURN();
1102
}
1103

    
1104
void op_mfc0_srsctl (void)
1105
{
1106
    T0 = env->CP0_SRSCtl;
1107
    RETURN();
1108
}
1109

    
1110
void op_mfc0_srsmap (void)
1111
{
1112
    T0 = env->CP0_SRSMap;
1113
    RETURN();
1114
}
1115

    
1116
void op_mfc0_cause (void)
1117
{
1118
    T0 = env->CP0_Cause;
1119
    RETURN();
1120
}
1121

    
1122
void op_mfc0_epc (void)
1123
{
1124
    T0 = (int32_t)env->CP0_EPC;
1125
    RETURN();
1126
}
1127

    
1128
void op_mfc0_prid (void)
1129
{
1130
    T0 = env->CP0_PRid;
1131
    RETURN();
1132
}
1133

    
1134
void op_mfc0_ebase (void)
1135
{
1136
    T0 = env->CP0_EBase;
1137
    RETURN();
1138
}
1139

    
1140
void op_mfc0_config0 (void)
1141
{
1142
    T0 = env->CP0_Config0;
1143
    RETURN();
1144
}
1145

    
1146
void op_mfc0_config1 (void)
1147
{
1148
    T0 = env->CP0_Config1;
1149
    RETURN();
1150
}
1151

    
1152
void op_mfc0_config2 (void)
1153
{
1154
    T0 = env->CP0_Config2;
1155
    RETURN();
1156
}
1157

    
1158
void op_mfc0_config3 (void)
1159
{
1160
    T0 = env->CP0_Config3;
1161
    RETURN();
1162
}
1163

    
1164
void op_mfc0_config6 (void)
1165
{
1166
    T0 = env->CP0_Config6;
1167
    RETURN();
1168
}
1169

    
1170
void op_mfc0_config7 (void)
1171
{
1172
    T0 = env->CP0_Config7;
1173
    RETURN();
1174
}
1175

    
1176
void op_mfc0_lladdr (void)
1177
{
1178
    T0 = (int32_t)env->CP0_LLAddr >> 4;
1179
    RETURN();
1180
}
1181

    
1182
void op_mfc0_watchlo (void)
1183
{
1184
    T0 = (int32_t)env->CP0_WatchLo[PARAM1];
1185
    RETURN();
1186
}
1187

    
1188
void op_mfc0_watchhi (void)
1189
{
1190
    T0 = env->CP0_WatchHi[PARAM1];
1191
    RETURN();
1192
}
1193

    
1194
void op_mfc0_xcontext (void)
1195
{
1196
    T0 = (int32_t)env->CP0_XContext;
1197
    RETURN();
1198
}
1199

    
1200
void op_mfc0_framemask (void)
1201
{
1202
    T0 = env->CP0_Framemask;
1203
    RETURN();
1204
}
1205

    
1206
void op_mfc0_debug (void)
1207
{
1208
    T0 = env->CP0_Debug;
1209
    if (env->hflags & MIPS_HFLAG_DM)
1210
        T0 |= 1 << CP0DB_DM;
1211
    RETURN();
1212
}
1213

    
1214
void op_mfc0_depc (void)
1215
{
1216
    T0 = (int32_t)env->CP0_DEPC;
1217
    RETURN();
1218
}
1219

    
1220
void op_mfc0_performance0 (void)
1221
{
1222
    T0 = env->CP0_Performance0;
1223
    RETURN();
1224
}
1225

    
1226
void op_mfc0_taglo (void)
1227
{
1228
    T0 = env->CP0_TagLo;
1229
    RETURN();
1230
}
1231

    
1232
void op_mfc0_datalo (void)
1233
{
1234
    T0 = env->CP0_DataLo;
1235
    RETURN();
1236
}
1237

    
1238
void op_mfc0_taghi (void)
1239
{
1240
    T0 = env->CP0_TagHi;
1241
    RETURN();
1242
}
1243

    
1244
void op_mfc0_datahi (void)
1245
{
1246
    T0 = env->CP0_DataHi;
1247
    RETURN();
1248
}
1249

    
1250
void op_mfc0_errorepc (void)
1251
{
1252
    T0 = (int32_t)env->CP0_ErrorEPC;
1253
    RETURN();
1254
}
1255

    
1256
void op_mfc0_desave (void)
1257
{
1258
    T0 = env->CP0_DESAVE;
1259
    RETURN();
1260
}
1261

    
1262
void op_mtc0_index (void)
1263
{
1264
    env->CP0_Index = (env->CP0_Index & 0x80000000) | (T0 % env->nb_tlb);
1265
    RETURN();
1266
}
1267

    
1268
void op_mtc0_entrylo0 (void)
1269
{
1270
    /* Large physaddr not implemented */
1271
    /* 1k pages not implemented */
1272
    env->CP0_EntryLo0 = T0 & 0x3FFFFFFF;
1273
    RETURN();
1274
}
1275

    
1276
void op_mtc0_entrylo1 (void)
1277
{
1278
    /* Large physaddr not implemented */
1279
    /* 1k pages not implemented */
1280
    env->CP0_EntryLo1 = T0 & 0x3FFFFFFF;
1281
    RETURN();
1282
}
1283

    
1284
void op_mtc0_context (void)
1285
{
1286
    env->CP0_Context = (env->CP0_Context & 0x007FFFFF) | (T0 & ~0x007FFFFF);
1287
    RETURN();
1288
}
1289

    
1290
void op_mtc0_pagemask (void)
1291
{
1292
    /* 1k pages not implemented */
1293
    env->CP0_PageMask = T0 & (0x1FFFFFFF & (TARGET_PAGE_MASK << 1));
1294
    RETURN();
1295
}
1296

    
1297
void op_mtc0_pagegrain (void)
1298
{
1299
    /* SmartMIPS not implemented */
1300
    /* Large physaddr not implemented */
1301
    /* 1k pages not implemented */
1302
    env->CP0_PageGrain = 0;
1303
    RETURN();
1304
}
1305

    
1306
void op_mtc0_wired (void)
1307
{
1308
    env->CP0_Wired = T0 % env->nb_tlb;
1309
    RETURN();
1310
}
1311

    
1312
void op_mtc0_hwrena (void)
1313
{
1314
    env->CP0_HWREna = T0 & 0x0000000F;
1315
    RETURN();
1316
}
1317

    
1318
void op_mtc0_count (void)
1319
{
1320
    CALL_FROM_TB2(cpu_mips_store_count, env, T0);
1321
    RETURN();
1322
}
1323

    
1324
void op_mtc0_entryhi (void)
1325
{
1326
    target_ulong old, val;
1327

    
1328
    /* 1k pages not implemented */
1329
    val = T0 & ((TARGET_PAGE_MASK << 1) | 0xFF);
1330
#ifdef TARGET_MIPS64
1331
    val = T0 & 0xC00000FFFFFFFFFFULL;
1332
#endif
1333
    old = env->CP0_EntryHi;
1334
    env->CP0_EntryHi = val;
1335
    /* If the ASID changes, flush qemu's TLB.  */
1336
    if ((old & 0xFF) != (val & 0xFF))
1337
        CALL_FROM_TB2(cpu_mips_tlb_flush, env, 1);
1338
    RETURN();
1339
}
1340

    
1341
void op_mtc0_compare (void)
1342
{
1343
    CALL_FROM_TB2(cpu_mips_store_compare, env, T0);
1344
    RETURN();
1345
}
1346

    
1347
void op_mtc0_status (void)
1348
{
1349
    uint32_t val, old;
1350
    uint32_t mask = env->Status_rw_bitmask;
1351

    
1352
    /* No reverse endianness, no MDMX/DSP, no 64bit ops
1353
       implemented. */
1354
    val = T0 & mask;
1355
    old = env->CP0_Status;
1356
    if (!(val & (1 << CP0St_EXL)) &&
1357
        !(val & (1 << CP0St_ERL)) &&
1358
        !(env->hflags & MIPS_HFLAG_DM) &&
1359
        (val & (1 << CP0St_UM)))
1360
        env->hflags |= MIPS_HFLAG_UM;
1361
    env->CP0_Status = (env->CP0_Status & ~mask) | val;
1362
    if (loglevel & CPU_LOG_EXEC)
1363
        CALL_FROM_TB2(do_mtc0_status_debug, old, val);
1364
    CALL_FROM_TB1(cpu_mips_update_irq, env);
1365
    RETURN();
1366
}
1367

    
1368
void op_mtc0_intctl (void)
1369
{
1370
    /* vectored interrupts not implemented, timer on int 7,
1371
       no performance counters. */
1372
    env->CP0_IntCtl |= T0 & 0x000002e0;
1373
    RETURN();
1374
}
1375

    
1376
void op_mtc0_srsctl (void)
1377
{
1378
    /* shadow registers not implemented */
1379
    env->CP0_SRSCtl = 0;
1380
    RETURN();
1381
}
1382

    
1383
void op_mtc0_srsmap (void)
1384
{
1385
    /* shadow registers not implemented */
1386
    env->CP0_SRSMap = 0;
1387
    RETURN();
1388
}
1389

    
1390
void op_mtc0_cause (void)
1391
{
1392
    uint32_t mask = 0x00C00300;
1393

    
1394
    if ((env->CP0_Config0 & (0x7 << CP0C0_AR)) == (1 << CP0C0_AR))
1395
        mask |= 1 << CP0Ca_DC;
1396

    
1397
    env->CP0_Cause = (env->CP0_Cause & ~mask) | (T0 & mask);
1398

    
1399
    /* Handle the software interrupt as an hardware one, as they
1400
       are very similar */
1401
    if (T0 & CP0Ca_IP_mask) {
1402
        CALL_FROM_TB1(cpu_mips_update_irq, env);
1403
    }
1404
    RETURN();
1405
}
1406

    
1407
void op_mtc0_epc (void)
1408
{
1409
    env->CP0_EPC = T0;
1410
    RETURN();
1411
}
1412

    
1413
void op_mtc0_ebase (void)
1414
{
1415
    /* vectored interrupts not implemented */
1416
    /* Multi-CPU not implemented */
1417
    env->CP0_EBase = 0x80000000 | (T0 & 0x3FFFF000);
1418
    RETURN();
1419
}
1420

    
1421
void op_mtc0_config0 (void)
1422
{
1423
    env->CP0_Config0 = (env->CP0_Config0 & 0x81FFFFF8) | (T0 & 0x00000001);
1424
    RETURN();
1425
}
1426

    
1427
void op_mtc0_config2 (void)
1428
{
1429
    /* tertiary/secondary caches not implemented */
1430
    env->CP0_Config2 = (env->CP0_Config2 & 0x8FFF0FFF);
1431
    RETURN();
1432
}
1433

    
1434
void op_mtc0_watchlo (void)
1435
{
1436
    /* Watch exceptions for instructions, data loads, data stores
1437
       not implemented. */
1438
    env->CP0_WatchLo[PARAM1] = (T0 & ~0x7);
1439
    RETURN();
1440
}
1441

    
1442
void op_mtc0_watchhi (void)
1443
{
1444
    env->CP0_WatchHi[PARAM1] = (T0 & 0x40FF0FF8);
1445
    env->CP0_WatchHi[PARAM1] &= ~(env->CP0_WatchHi[PARAM1] & T0 & 0x7);
1446
    RETURN();
1447
}
1448

    
1449
void op_mtc0_framemask (void)
1450
{
1451
    env->CP0_Framemask = T0; /* XXX */
1452
    RETURN();
1453
}
1454

    
1455
void op_mtc0_debug (void)
1456
{
1457
    env->CP0_Debug = (env->CP0_Debug & 0x8C03FC1F) | (T0 & 0x13300120);
1458
    if (T0 & (1 << CP0DB_DM))
1459
        env->hflags |= MIPS_HFLAG_DM;
1460
    else
1461
        env->hflags &= ~MIPS_HFLAG_DM;
1462
    RETURN();
1463
}
1464

    
1465
void op_mtc0_depc (void)
1466
{
1467
    env->CP0_DEPC = T0;
1468
    RETURN();
1469
}
1470

    
1471
void op_mtc0_performance0 (void)
1472
{
1473
    env->CP0_Performance0 = T0; /* XXX */
1474
    RETURN();
1475
}
1476

    
1477
void op_mtc0_taglo (void)
1478
{
1479
    env->CP0_TagLo = T0 & 0xFFFFFCF6;
1480
    RETURN();
1481
}
1482

    
1483
void op_mtc0_datalo (void)
1484
{
1485
    env->CP0_DataLo = T0; /* XXX */
1486
    RETURN();
1487
}
1488

    
1489
void op_mtc0_taghi (void)
1490
{
1491
    env->CP0_TagHi = T0; /* XXX */
1492
    RETURN();
1493
}
1494

    
1495
void op_mtc0_datahi (void)
1496
{
1497
    env->CP0_DataHi = T0; /* XXX */
1498
    RETURN();
1499
}
1500

    
1501
void op_mtc0_errorepc (void)
1502
{
1503
    env->CP0_ErrorEPC = T0;
1504
    RETURN();
1505
}
1506

    
1507
void op_mtc0_desave (void)
1508
{
1509
    env->CP0_DESAVE = T0;
1510
    RETURN();
1511
}
1512

    
1513
#ifdef TARGET_MIPS64
1514
void op_mtc0_xcontext (void)
1515
{
1516
    env->CP0_XContext = (env->CP0_XContext & 0x1ffffffffULL) | (T0 & ~0x1ffffffffULL);
1517
    RETURN();
1518
}
1519

    
1520
void op_dmfc0_entrylo0 (void)
1521
{
1522
    T0 = env->CP0_EntryLo0;
1523
    RETURN();
1524
}
1525

    
1526
void op_dmfc0_entrylo1 (void)
1527
{
1528
    T0 = env->CP0_EntryLo1;
1529
    RETURN();
1530
}
1531

    
1532
void op_dmfc0_context (void)
1533
{
1534
    T0 = env->CP0_Context;
1535
    RETURN();
1536
}
1537

    
1538
void op_dmfc0_badvaddr (void)
1539
{
1540
    T0 = env->CP0_BadVAddr;
1541
    RETURN();
1542
}
1543

    
1544
void op_dmfc0_entryhi (void)
1545
{
1546
    T0 = env->CP0_EntryHi;
1547
    RETURN();
1548
}
1549

    
1550
void op_dmfc0_epc (void)
1551
{
1552
    T0 = env->CP0_EPC;
1553
    RETURN();
1554
}
1555

    
1556
void op_dmfc0_lladdr (void)
1557
{
1558
    T0 = env->CP0_LLAddr >> 4;
1559
    RETURN();
1560
}
1561

    
1562
void op_dmfc0_watchlo (void)
1563
{
1564
    T0 = env->CP0_WatchLo[PARAM1];
1565
    RETURN();
1566
}
1567

    
1568
void op_dmfc0_xcontext (void)
1569
{
1570
    T0 = env->CP0_XContext;
1571
    RETURN();
1572
}
1573

    
1574
void op_dmfc0_depc (void)
1575
{
1576
    T0 = env->CP0_DEPC;
1577
    RETURN();
1578
}
1579

    
1580
void op_dmfc0_errorepc (void)
1581
{
1582
    T0 = env->CP0_ErrorEPC;
1583
    RETURN();
1584
}
1585
#endif /* TARGET_MIPS64 */
1586

    
1587
/* CP1 functions */
1588
#if 0
1589
# define DEBUG_FPU_STATE() CALL_FROM_TB1(dump_fpu, env)
1590
#else
1591
# define DEBUG_FPU_STATE() do { } while(0)
1592
#endif
1593

    
1594
void op_cp0_enabled(void)
1595
{
1596
    if (!(env->CP0_Status & (1 << CP0St_CU0)) &&
1597
        (env->hflags & MIPS_HFLAG_UM)) {
1598
        CALL_FROM_TB2(do_raise_exception_err, EXCP_CpU, 0);
1599
    }
1600
    RETURN();
1601
}
1602

    
1603
void op_cp1_enabled(void)
1604
{
1605
    if (!(env->CP0_Status & (1 << CP0St_CU1))) {
1606
        CALL_FROM_TB2(do_raise_exception_err, EXCP_CpU, 1);
1607
    }
1608
    RETURN();
1609
}
1610

    
1611
void op_cp1_64bitmode(void)
1612
{
1613
    if (!(env->CP0_Status & (1 << CP0St_FR))) {
1614
        CALL_FROM_TB1(do_raise_exception, EXCP_RI);
1615
    }
1616
    RETURN();
1617
}
1618

    
1619
/*
1620
 * Verify if floating point register is valid; an operation is not defined
1621
 * if bit 0 of any register specification is set and the FR bit in the
1622
 * Status register equals zero, since the register numbers specify an
1623
 * even-odd pair of adjacent coprocessor general registers. When the FR bit
1624
 * in the Status register equals one, both even and odd register numbers
1625
 * are valid. This limitation exists only for 64 bit wide (d,l,ps) registers.
1626
 *
1627
 * Multiple 64 bit wide registers can be checked by calling
1628
 * gen_op_cp1_registers(freg1 | freg2 | ... | fregN);
1629
 */
1630
void op_cp1_registers(void)
1631
{
1632
    if (!(env->CP0_Status & (1 << CP0St_FR)) && (PARAM1 & 1)) {
1633
        CALL_FROM_TB1(do_raise_exception, EXCP_RI);
1634
    }
1635
    RETURN();
1636
}
1637

    
1638
void op_cfc1 (void)
1639
{
1640
    switch (T1) {
1641
    case 0:
1642
        T0 = (int32_t)env->fcr0;
1643
        break;
1644
    case 25:
1645
        T0 = ((env->fcr31 >> 24) & 0xfe) | ((env->fcr31 >> 23) & 0x1);
1646
        break;
1647
    case 26:
1648
        T0 = env->fcr31 & 0x0003f07c;
1649
        break;
1650
    case 28:
1651
        T0 = (env->fcr31 & 0x00000f83) | ((env->fcr31 >> 22) & 0x4);
1652
        break;
1653
    default:
1654
        T0 = (int32_t)env->fcr31;
1655
        break;
1656
    }
1657
    DEBUG_FPU_STATE();
1658
    RETURN();
1659
}
1660

    
1661
void op_ctc1 (void)
1662
{
1663
    CALL_FROM_TB0(do_ctc1);
1664
    DEBUG_FPU_STATE();
1665
    RETURN();
1666
}
1667

    
1668
void op_mfc1 (void)
1669
{
1670
    T0 = WT0;
1671
    DEBUG_FPU_STATE();
1672
    RETURN();
1673
}
1674

    
1675
void op_mtc1 (void)
1676
{
1677
    WT0 = T0;
1678
    DEBUG_FPU_STATE();
1679
    RETURN();
1680
}
1681

    
1682
void op_dmfc1 (void)
1683
{
1684
    T0 = DT0;
1685
    DEBUG_FPU_STATE();
1686
    RETURN();
1687
}
1688

    
1689
void op_dmtc1 (void)
1690
{
1691
    DT0 = T0;
1692
    DEBUG_FPU_STATE();
1693
    RETURN();
1694
}
1695

    
1696
void op_mfhc1 (void)
1697
{
1698
    T0 = WTH0;
1699
    DEBUG_FPU_STATE();
1700
    RETURN();
1701
}
1702

    
1703
void op_mthc1 (void)
1704
{
1705
    WTH0 = T0;
1706
    DEBUG_FPU_STATE();
1707
    RETURN();
1708
}
1709

    
1710
/* Float support.
1711
   Single precition routines have a "s" suffix, double precision a
1712
   "d" suffix, 32bit integer "w", 64bit integer "l", paired singe "ps",
1713
   paired single lowwer "pl", paired single upper "pu".  */
1714

    
1715
#define FLOAT_OP(name, p) void OPPROTO op_float_##name##_##p(void)
1716

    
1717
FLOAT_OP(cvtd, s)
1718
{
1719
    CALL_FROM_TB0(do_float_cvtd_s);
1720
    DEBUG_FPU_STATE();
1721
    RETURN();
1722
}
1723
FLOAT_OP(cvtd, w)
1724
{
1725
    CALL_FROM_TB0(do_float_cvtd_w);
1726
    DEBUG_FPU_STATE();
1727
    RETURN();
1728
}
1729
FLOAT_OP(cvtd, l)
1730
{
1731
    CALL_FROM_TB0(do_float_cvtd_l);
1732
    DEBUG_FPU_STATE();
1733
    RETURN();
1734
}
1735
FLOAT_OP(cvtl, d)
1736
{
1737
    CALL_FROM_TB0(do_float_cvtl_d);
1738
    DEBUG_FPU_STATE();
1739
    RETURN();
1740
}
1741
FLOAT_OP(cvtl, s)
1742
{
1743
    CALL_FROM_TB0(do_float_cvtl_s);
1744
    DEBUG_FPU_STATE();
1745
    RETURN();
1746
}
1747
FLOAT_OP(cvtps, s)
1748
{
1749
    WT2 = WT0;
1750
    WTH2 = WT1;
1751
    DEBUG_FPU_STATE();
1752
    RETURN();
1753
}
1754
FLOAT_OP(cvtps, pw)
1755
{
1756
    CALL_FROM_TB0(do_float_cvtps_pw);
1757
    DEBUG_FPU_STATE();
1758
    RETURN();
1759
}
1760
FLOAT_OP(cvtpw, ps)
1761
{
1762
    CALL_FROM_TB0(do_float_cvtpw_ps);
1763
    DEBUG_FPU_STATE();
1764
    RETURN();
1765
}
1766
FLOAT_OP(cvts, d)
1767
{
1768
    CALL_FROM_TB0(do_float_cvts_d);
1769
    DEBUG_FPU_STATE();
1770
    RETURN();
1771
}
1772
FLOAT_OP(cvts, w)
1773
{
1774
    CALL_FROM_TB0(do_float_cvts_w);
1775
    DEBUG_FPU_STATE();
1776
    RETURN();
1777
}
1778
FLOAT_OP(cvts, l)
1779
{
1780
    CALL_FROM_TB0(do_float_cvts_l);
1781
    DEBUG_FPU_STATE();
1782
    RETURN();
1783
}
1784
FLOAT_OP(cvts, pl)
1785
{
1786
    CALL_FROM_TB0(do_float_cvts_pl);
1787
    DEBUG_FPU_STATE();
1788
    RETURN();
1789
}
1790
FLOAT_OP(cvts, pu)
1791
{
1792
    CALL_FROM_TB0(do_float_cvts_pu);
1793
    DEBUG_FPU_STATE();
1794
    RETURN();
1795
}
1796
FLOAT_OP(cvtw, s)
1797
{
1798
    CALL_FROM_TB0(do_float_cvtw_s);
1799
    DEBUG_FPU_STATE();
1800
    RETURN();
1801
}
1802
FLOAT_OP(cvtw, d)
1803
{
1804
    CALL_FROM_TB0(do_float_cvtw_d);
1805
    DEBUG_FPU_STATE();
1806
    RETURN();
1807
}
1808

    
1809
FLOAT_OP(pll, ps)
1810
{
1811
    DT2 = ((uint64_t)WT0 << 32) | WT1;
1812
    DEBUG_FPU_STATE();
1813
    RETURN();
1814
}
1815
FLOAT_OP(plu, ps)
1816
{
1817
    DT2 = ((uint64_t)WT0 << 32) | WTH1;
1818
    DEBUG_FPU_STATE();
1819
    RETURN();
1820
}
1821
FLOAT_OP(pul, ps)
1822
{
1823
    DT2 = ((uint64_t)WTH0 << 32) | WT1;
1824
    DEBUG_FPU_STATE();
1825
    RETURN();
1826
}
1827
FLOAT_OP(puu, ps)
1828
{
1829
    DT2 = ((uint64_t)WTH0 << 32) | WTH1;
1830
    DEBUG_FPU_STATE();
1831
    RETURN();
1832
}
1833

    
1834
#define FLOAT_ROUNDOP(op, ttype, stype)                    \
1835
FLOAT_OP(op ## ttype, stype)                               \
1836
{                                                          \
1837
    CALL_FROM_TB0(do_float_ ## op ## ttype ## _ ## stype); \
1838
    DEBUG_FPU_STATE();                                     \
1839
    RETURN();                                              \
1840
}
1841

    
1842
FLOAT_ROUNDOP(round, l, d)
1843
FLOAT_ROUNDOP(round, l, s)
1844
FLOAT_ROUNDOP(round, w, d)
1845
FLOAT_ROUNDOP(round, w, s)
1846

    
1847
FLOAT_ROUNDOP(trunc, l, d)
1848
FLOAT_ROUNDOP(trunc, l, s)
1849
FLOAT_ROUNDOP(trunc, w, d)
1850
FLOAT_ROUNDOP(trunc, w, s)
1851

    
1852
FLOAT_ROUNDOP(ceil, l, d)
1853
FLOAT_ROUNDOP(ceil, l, s)
1854
FLOAT_ROUNDOP(ceil, w, d)
1855
FLOAT_ROUNDOP(ceil, w, s)
1856

    
1857
FLOAT_ROUNDOP(floor, l, d)
1858
FLOAT_ROUNDOP(floor, l, s)
1859
FLOAT_ROUNDOP(floor, w, d)
1860
FLOAT_ROUNDOP(floor, w, s)
1861
#undef FLOAR_ROUNDOP
1862

    
1863
FLOAT_OP(movf, d)
1864
{
1865
    if (!(env->fcr31 & PARAM1))
1866
        DT2 = DT0;
1867
    DEBUG_FPU_STATE();
1868
    RETURN();
1869
}
1870
FLOAT_OP(movf, s)
1871
{
1872
    if (!(env->fcr31 & PARAM1))
1873
        WT2 = WT0;
1874
    DEBUG_FPU_STATE();
1875
    RETURN();
1876
}
1877
FLOAT_OP(movf, ps)
1878
{
1879
    if (!(env->fcr31 & PARAM1)) {
1880
        WT2 = WT0;
1881
        WTH2 = WTH0;
1882
    }
1883
    DEBUG_FPU_STATE();
1884
    RETURN();
1885
}
1886
FLOAT_OP(movt, d)
1887
{
1888
    if (env->fcr31 & PARAM1)
1889
        DT2 = DT0;
1890
    DEBUG_FPU_STATE();
1891
    RETURN();
1892
}
1893
FLOAT_OP(movt, s)
1894
{
1895
    if (env->fcr31 & PARAM1)
1896
        WT2 = WT0;
1897
    DEBUG_FPU_STATE();
1898
    RETURN();
1899
}
1900
FLOAT_OP(movt, ps)
1901
{
1902
    if (env->fcr31 & PARAM1) {
1903
        WT2 = WT0;
1904
        WTH2 = WTH0;
1905
    }
1906
    DEBUG_FPU_STATE();
1907
    RETURN();
1908
}
1909
FLOAT_OP(movz, d)
1910
{
1911
    if (!T0)
1912
        DT2 = DT0;
1913
    DEBUG_FPU_STATE();
1914
    RETURN();
1915
}
1916
FLOAT_OP(movz, s)
1917
{
1918
    if (!T0)
1919
        WT2 = WT0;
1920
    DEBUG_FPU_STATE();
1921
    RETURN();
1922
}
1923
FLOAT_OP(movz, ps)
1924
{
1925
    if (!T0) {
1926
        WT2 = WT0;
1927
        WTH2 = WTH0;
1928
    }
1929
    DEBUG_FPU_STATE();
1930
    RETURN();
1931
}
1932
FLOAT_OP(movn, d)
1933
{
1934
    if (T0)
1935
        DT2 = DT0;
1936
    DEBUG_FPU_STATE();
1937
    RETURN();
1938
}
1939
FLOAT_OP(movn, s)
1940
{
1941
    if (T0)
1942
        WT2 = WT0;
1943
    DEBUG_FPU_STATE();
1944
    RETURN();
1945
}
1946
FLOAT_OP(movn, ps)
1947
{
1948
    if (T0) {
1949
        WT2 = WT0;
1950
        WTH2 = WTH0;
1951
    }
1952
    DEBUG_FPU_STATE();
1953
    RETURN();
1954
}
1955

    
1956
/* operations calling helpers, for s, d and ps */
1957
#define FLOAT_HOP(name) \
1958
FLOAT_OP(name, d)         \
1959
{                         \
1960
    CALL_FROM_TB0(do_float_ ## name ## _d);  \
1961
    DEBUG_FPU_STATE();    \
1962
    RETURN();             \
1963
}                         \
1964
FLOAT_OP(name, s)         \
1965
{                         \
1966
    CALL_FROM_TB0(do_float_ ## name ## _s);  \
1967
    DEBUG_FPU_STATE();    \
1968
    RETURN();             \
1969
}                         \
1970
FLOAT_OP(name, ps)        \
1971
{                         \
1972
    CALL_FROM_TB0(do_float_ ## name ## _ps); \
1973
    DEBUG_FPU_STATE();    \
1974
    RETURN();             \
1975
}
1976
FLOAT_HOP(add)
1977
FLOAT_HOP(sub)
1978
FLOAT_HOP(mul)
1979
FLOAT_HOP(div)
1980
FLOAT_HOP(recip2)
1981
FLOAT_HOP(rsqrt2)
1982
FLOAT_HOP(rsqrt1)
1983
FLOAT_HOP(recip1)
1984
#undef FLOAT_HOP
1985

    
1986
/* operations calling helpers, for s and d */
1987
#define FLOAT_HOP(name)   \
1988
FLOAT_OP(name, d)         \
1989
{                         \
1990
    CALL_FROM_TB0(do_float_ ## name ## _d);  \
1991
    DEBUG_FPU_STATE();    \
1992
    RETURN();             \
1993
}                         \
1994
FLOAT_OP(name, s)         \
1995
{                         \
1996
    CALL_FROM_TB0(do_float_ ## name ## _s);  \
1997
    DEBUG_FPU_STATE();    \
1998
    RETURN();             \
1999
}
2000
FLOAT_HOP(rsqrt)
2001
FLOAT_HOP(recip)
2002
#undef FLOAT_HOP
2003

    
2004
/* operations calling helpers, for ps */
2005
#define FLOAT_HOP(name)   \
2006
FLOAT_OP(name, ps)        \
2007
{                         \
2008
    CALL_FROM_TB0(do_float_ ## name ## _ps); \
2009
    DEBUG_FPU_STATE();    \
2010
    RETURN();             \
2011
}
2012
FLOAT_HOP(addr)
2013
FLOAT_HOP(mulr)
2014
#undef FLOAT_HOP
2015

    
2016
/* ternary operations */
2017
#define FLOAT_TERNOP(name1, name2) \
2018
FLOAT_OP(name1 ## name2, d)        \
2019
{                                  \
2020
    FDT0 = float64_ ## name1 (FDT0, FDT1, &env->fp_status);    \
2021
    FDT2 = float64_ ## name2 (FDT0, FDT2, &env->fp_status);    \
2022
    DEBUG_FPU_STATE();             \
2023
    RETURN();                      \
2024
}                                  \
2025
FLOAT_OP(name1 ## name2, s)        \
2026
{                                  \
2027
    FST0 = float32_ ## name1 (FST0, FST1, &env->fp_status);    \
2028
    FST2 = float32_ ## name2 (FST0, FST2, &env->fp_status);    \
2029
    DEBUG_FPU_STATE();             \
2030
    RETURN();                      \
2031
}                                  \
2032
FLOAT_OP(name1 ## name2, ps)       \
2033
{                                  \
2034
    FST0 = float32_ ## name1 (FST0, FST1, &env->fp_status);    \
2035
    FSTH0 = float32_ ## name1 (FSTH0, FSTH1, &env->fp_status); \
2036
    FST2 = float32_ ## name2 (FST0, FST2, &env->fp_status);    \
2037
    FSTH2 = float32_ ## name2 (FSTH0, FSTH2, &env->fp_status); \
2038
    DEBUG_FPU_STATE();             \
2039
    RETURN();                      \
2040
}
2041
FLOAT_TERNOP(mul, add)
2042
FLOAT_TERNOP(mul, sub)
2043
#undef FLOAT_TERNOP
2044

    
2045
/* negated ternary operations */
2046
#define FLOAT_NTERNOP(name1, name2) \
2047
FLOAT_OP(n ## name1 ## name2, d)    \
2048
{                                   \
2049
    FDT0 = float64_ ## name1 (FDT0, FDT1, &env->fp_status);    \
2050
    FDT2 = float64_ ## name2 (FDT0, FDT2, &env->fp_status);    \
2051
    FDT2 ^= 1ULL << 63;             \
2052
    DEBUG_FPU_STATE();              \
2053
    RETURN();                       \
2054
}                                   \
2055
FLOAT_OP(n ## name1 ## name2, s)    \
2056
{                                   \
2057
    FST0 = float32_ ## name1 (FST0, FST1, &env->fp_status);    \
2058
    FST2 = float32_ ## name2 (FST0, FST2, &env->fp_status);    \
2059
    FST2 ^= 1 << 31;                \
2060
    DEBUG_FPU_STATE();              \
2061
    RETURN();                       \
2062
}                                   \
2063
FLOAT_OP(n ## name1 ## name2, ps)   \
2064
{                                   \
2065
    FST0 = float32_ ## name1 (FST0, FST1, &env->fp_status);    \
2066
    FSTH0 = float32_ ## name1 (FSTH0, FSTH1, &env->fp_status); \
2067
    FST2 = float32_ ## name2 (FST0, FST2, &env->fp_status);    \
2068
    FSTH2 = float32_ ## name2 (FSTH0, FSTH2, &env->fp_status); \
2069
    FST2 ^= 1 << 31;                \
2070
    FSTH2 ^= 1 << 31;               \
2071
    DEBUG_FPU_STATE();              \
2072
    RETURN();                       \
2073
}
2074
FLOAT_NTERNOP(mul, add)
2075
FLOAT_NTERNOP(mul, sub)
2076
#undef FLOAT_NTERNOP
2077

    
2078
/* unary operations, modifying fp status  */
2079
#define FLOAT_UNOP(name)  \
2080
FLOAT_OP(name, d)         \
2081
{                         \
2082
    FDT2 = float64_ ## name(FDT0, &env->fp_status);   \
2083
    DEBUG_FPU_STATE();    \
2084
    RETURN();                      \
2085
}                         \
2086
FLOAT_OP(name, s)         \
2087
{                         \
2088
    FST2 = float32_ ## name(FST0, &env->fp_status);   \
2089
    DEBUG_FPU_STATE();    \
2090
    RETURN();             \
2091
}
2092
FLOAT_UNOP(sqrt)
2093
#undef FLOAT_UNOP
2094

    
2095
/* unary operations, not modifying fp status  */
2096
#define FLOAT_UNOP(name)  \
2097
FLOAT_OP(name, d)         \
2098
{                         \
2099
    FDT2 = float64_ ## name(FDT0);   \
2100
    DEBUG_FPU_STATE();    \
2101
    RETURN();             \
2102
}                         \
2103
FLOAT_OP(name, s)         \
2104
{                         \
2105
    FST2 = float32_ ## name(FST0);   \
2106
    DEBUG_FPU_STATE();    \
2107
    RETURN();             \
2108
}                         \
2109
FLOAT_OP(name, ps)        \
2110
{                         \
2111
    FST2 = float32_ ## name(FST0);   \
2112
    FSTH2 = float32_ ## name(FSTH0); \
2113
    DEBUG_FPU_STATE();    \
2114
    RETURN();             \
2115
}
2116
FLOAT_UNOP(abs)
2117
FLOAT_UNOP(chs)
2118
#undef FLOAT_UNOP
2119

    
2120
FLOAT_OP(mov, d)
2121
{
2122
    FDT2 = FDT0;
2123
    DEBUG_FPU_STATE();
2124
    RETURN();
2125
}
2126
FLOAT_OP(mov, s)
2127
{
2128
    FST2 = FST0;
2129
    DEBUG_FPU_STATE();
2130
    RETURN();
2131
}
2132
FLOAT_OP(mov, ps)
2133
{
2134
    FST2 = FST0;
2135
    FSTH2 = FSTH0;
2136
    DEBUG_FPU_STATE();
2137
    RETURN();
2138
}
2139
FLOAT_OP(alnv, ps)
2140
{
2141
    switch (T0 & 0x7) {
2142
    case 0:
2143
        FST2 = FST0;
2144
        FSTH2 = FSTH0;
2145
        break;
2146
    case 4:
2147
#ifdef TARGET_WORDS_BIGENDIAN
2148
        FSTH2 = FST0;
2149
        FST2 = FSTH1;
2150
#else
2151
        FSTH2 = FST1;
2152
        FST2 = FSTH0;
2153
#endif
2154
        break;
2155
    default: /* unpredictable */
2156
        break;
2157
    }
2158
    DEBUG_FPU_STATE();
2159
    RETURN();
2160
}
2161

    
2162
#ifdef CONFIG_SOFTFLOAT
2163
#define clear_invalid() do {                                \
2164
    int flags = get_float_exception_flags(&env->fp_status); \
2165
    flags &= ~float_flag_invalid;                           \
2166
    set_float_exception_flags(flags, &env->fp_status);      \
2167
} while(0)
2168
#else
2169
#define clear_invalid() do { } while(0)
2170
#endif
2171

    
2172
extern void dump_fpu_s(CPUState *env);
2173

    
2174
#define CMP_OP(fmt, op)                                \
2175
void OPPROTO op_cmp ## _ ## fmt ## _ ## op(void)       \
2176
{                                                      \
2177
    CALL_FROM_TB1(do_cmp ## _ ## fmt ## _ ## op, PARAM1); \
2178
    DEBUG_FPU_STATE();                                 \
2179
    RETURN();                                          \
2180
}                                                      \
2181
void OPPROTO op_cmpabs ## _ ## fmt ## _ ## op(void)    \
2182
{                                                      \
2183
    CALL_FROM_TB1(do_cmpabs ## _ ## fmt ## _ ## op, PARAM1); \
2184
    DEBUG_FPU_STATE();                                 \
2185
    RETURN();                                          \
2186
}
2187
#define CMP_OPS(op)   \
2188
CMP_OP(d, op)         \
2189
CMP_OP(s, op)         \
2190
CMP_OP(ps, op)
2191

    
2192
CMP_OPS(f)
2193
CMP_OPS(un)
2194
CMP_OPS(eq)
2195
CMP_OPS(ueq)
2196
CMP_OPS(olt)
2197
CMP_OPS(ult)
2198
CMP_OPS(ole)
2199
CMP_OPS(ule)
2200
CMP_OPS(sf)
2201
CMP_OPS(ngle)
2202
CMP_OPS(seq)
2203
CMP_OPS(ngl)
2204
CMP_OPS(lt)
2205
CMP_OPS(nge)
2206
CMP_OPS(le)
2207
CMP_OPS(ngt)
2208
#undef CMP_OPS
2209
#undef CMP_OP
2210

    
2211
void op_bc1f (void)
2212
{
2213
    T0 = !!(~GET_FP_COND(env) & (0x1 << PARAM1));
2214
    DEBUG_FPU_STATE();
2215
    RETURN();
2216
}
2217
void op_bc1any2f (void)
2218
{
2219
    T0 = !!(~GET_FP_COND(env) & (0x3 << PARAM1));
2220
    DEBUG_FPU_STATE();
2221
    RETURN();
2222
}
2223
void op_bc1any4f (void)
2224
{
2225
    T0 = !!(~GET_FP_COND(env) & (0xf << PARAM1));
2226
    DEBUG_FPU_STATE();
2227
    RETURN();
2228
}
2229

    
2230
void op_bc1t (void)
2231
{
2232
    T0 = !!(GET_FP_COND(env) & (0x1 << PARAM1));
2233
    DEBUG_FPU_STATE();
2234
    RETURN();
2235
}
2236
void op_bc1any2t (void)
2237
{
2238
    T0 = !!(GET_FP_COND(env) & (0x3 << PARAM1));
2239
    DEBUG_FPU_STATE();
2240
    RETURN();
2241
}
2242
void op_bc1any4t (void)
2243
{
2244
    T0 = !!(GET_FP_COND(env) & (0xf << PARAM1));
2245
    DEBUG_FPU_STATE();
2246
    RETURN();
2247
}
2248

    
2249
void op_tlbwi (void)
2250
{
2251
    CALL_FROM_TB0(env->do_tlbwi);
2252
    RETURN();
2253
}
2254

    
2255
void op_tlbwr (void)
2256
{
2257
    CALL_FROM_TB0(env->do_tlbwr);
2258
    RETURN();
2259
}
2260

    
2261
void op_tlbp (void)
2262
{
2263
    CALL_FROM_TB0(env->do_tlbp);
2264
    RETURN();
2265
}
2266

    
2267
void op_tlbr (void)
2268
{
2269
    CALL_FROM_TB0(env->do_tlbr);
2270
    RETURN();
2271
}
2272

    
2273
/* Specials */
2274
#if defined (CONFIG_USER_ONLY)
2275
void op_tls_value (void)
2276
{
2277
    T0 = env->tls_value;
2278
}
2279
#endif
2280

    
2281
void op_pmon (void)
2282
{
2283
    CALL_FROM_TB1(do_pmon, PARAM1);
2284
    RETURN();
2285
}
2286

    
2287
void op_di (void)
2288
{
2289
    T0 = env->CP0_Status;
2290
    env->CP0_Status = T0 & ~(1 << CP0St_IE);
2291
    CALL_FROM_TB1(cpu_mips_update_irq, env);
2292
    RETURN();
2293
}
2294

    
2295
void op_ei (void)
2296
{
2297
    T0 = env->CP0_Status;
2298
    env->CP0_Status = T0 | (1 << CP0St_IE);
2299
    CALL_FROM_TB1(cpu_mips_update_irq, env);
2300
    RETURN();
2301
}
2302

    
2303
void op_trap (void)
2304
{
2305
    if (T0) {
2306
        CALL_FROM_TB1(do_raise_exception, EXCP_TRAP);
2307
    }
2308
    RETURN();
2309
}
2310

    
2311
void op_debug (void)
2312
{
2313
    CALL_FROM_TB1(do_raise_exception, EXCP_DEBUG);
2314
    RETURN();
2315
}
2316

    
2317
void op_set_lladdr (void)
2318
{
2319
    env->CP0_LLAddr = T2;
2320
    RETURN();
2321
}
2322

    
2323
void debug_pre_eret (void);
2324
void debug_post_eret (void);
2325
void op_eret (void)
2326
{
2327
    if (loglevel & CPU_LOG_EXEC)
2328
        CALL_FROM_TB0(debug_pre_eret);
2329
    if (env->CP0_Status & (1 << CP0St_ERL)) {
2330
        env->PC = env->CP0_ErrorEPC;
2331
        env->CP0_Status &= ~(1 << CP0St_ERL);
2332
    } else {
2333
        env->PC = env->CP0_EPC;
2334
        env->CP0_Status &= ~(1 << CP0St_EXL);
2335
    }
2336
    if (!(env->CP0_Status & (1 << CP0St_EXL)) &&
2337
        !(env->CP0_Status & (1 << CP0St_ERL)) &&
2338
        !(env->hflags & MIPS_HFLAG_DM) &&
2339
        (env->CP0_Status & (1 << CP0St_UM)))
2340
        env->hflags |= MIPS_HFLAG_UM;
2341
    if (loglevel & CPU_LOG_EXEC)
2342
        CALL_FROM_TB0(debug_post_eret);
2343
    env->CP0_LLAddr = 1;
2344
    RETURN();
2345
}
2346

    
2347
void op_deret (void)
2348
{
2349
    if (loglevel & CPU_LOG_EXEC)
2350
        CALL_FROM_TB0(debug_pre_eret);
2351
    env->PC = env->CP0_DEPC;
2352
    env->hflags |= MIPS_HFLAG_DM;
2353
    if (!(env->CP0_Status & (1 << CP0St_EXL)) &&
2354
        !(env->CP0_Status & (1 << CP0St_ERL)) &&
2355
        !(env->hflags & MIPS_HFLAG_DM) &&
2356
        (env->CP0_Status & (1 << CP0St_UM)))
2357
        env->hflags |= MIPS_HFLAG_UM;
2358
    if (loglevel & CPU_LOG_EXEC)
2359
        CALL_FROM_TB0(debug_post_eret);
2360
    env->CP0_LLAddr = 1;
2361
    RETURN();
2362
}
2363

    
2364
void op_rdhwr_cpunum(void)
2365
{
2366
    if (!(env->hflags & MIPS_HFLAG_UM) ||
2367
        (env->CP0_HWREna & (1 << 0)) ||
2368
        (env->CP0_Status & (1 << CP0St_CU0)))
2369
        T0 = env->CP0_EBase & 0x3ff;
2370
    else
2371
        CALL_FROM_TB1(do_raise_exception, EXCP_RI);
2372
    RETURN();
2373
}
2374

    
2375
void op_rdhwr_synci_step(void)
2376
{
2377
    if (!(env->hflags & MIPS_HFLAG_UM) ||
2378
        (env->CP0_HWREna & (1 << 1)) ||
2379
        (env->CP0_Status & (1 << CP0St_CU0)))
2380
        T0 = env->SYNCI_Step;
2381
    else
2382
        CALL_FROM_TB1(do_raise_exception, EXCP_RI);
2383
    RETURN();
2384
}
2385

    
2386
void op_rdhwr_cc(void)
2387
{
2388
    if (!(env->hflags & MIPS_HFLAG_UM) ||
2389
        (env->CP0_HWREna & (1 << 2)) ||
2390
        (env->CP0_Status & (1 << CP0St_CU0)))
2391
        T0 = env->CP0_Count;
2392
    else
2393
        CALL_FROM_TB1(do_raise_exception, EXCP_RI);
2394
    RETURN();
2395
}
2396

    
2397
void op_rdhwr_ccres(void)
2398
{
2399
    if (!(env->hflags & MIPS_HFLAG_UM) ||
2400
        (env->CP0_HWREna & (1 << 3)) ||
2401
        (env->CP0_Status & (1 << CP0St_CU0)))
2402
        T0 = env->CCRes;
2403
    else
2404
        CALL_FROM_TB1(do_raise_exception, EXCP_RI);
2405
    RETURN();
2406
}
2407

    
2408
void op_save_state (void)
2409
{
2410
    env->hflags = PARAM1;
2411
    RETURN();
2412
}
2413

    
2414
void op_save_pc (void)
2415
{
2416
    env->PC = PARAM1;
2417
    RETURN();
2418
}
2419

    
2420
#ifdef TARGET_MIPS64
2421
void op_save_pc64 (void)
2422
{
2423
    env->PC = ((uint64_t)PARAM1 << 32) | (uint32_t)PARAM2;
2424
    RETURN();
2425
}
2426
#endif
2427

    
2428
void op_interrupt_restart (void)
2429
{
2430
    if (!(env->CP0_Status & (1 << CP0St_EXL)) &&
2431
        !(env->CP0_Status & (1 << CP0St_ERL)) &&
2432
        !(env->hflags & MIPS_HFLAG_DM) &&
2433
        (env->CP0_Status & (1 << CP0St_IE)) &&
2434
        (env->CP0_Status & env->CP0_Cause & CP0Ca_IP_mask)) {
2435
        env->CP0_Cause &= ~(0x1f << CP0Ca_EC);
2436
        CALL_FROM_TB1(do_raise_exception, EXCP_EXT_INTERRUPT);
2437
    }
2438
    RETURN();
2439
}
2440

    
2441
void op_raise_exception (void)
2442
{
2443
    CALL_FROM_TB1(do_raise_exception, PARAM1);
2444
    RETURN();
2445
}
2446

    
2447
void op_raise_exception_err (void)
2448
{
2449
    CALL_FROM_TB2(do_raise_exception_err, PARAM1, PARAM2);
2450
    RETURN();
2451
}
2452

    
2453
void op_exit_tb (void)
2454
{
2455
    EXIT_TB();
2456
    RETURN();
2457
}
2458

    
2459
void op_wait (void)
2460
{
2461
    env->halted = 1;
2462
    CALL_FROM_TB1(do_raise_exception, EXCP_HLT);
2463
    RETURN();
2464
}
2465

    
2466
/* Bitfield operations. */
2467
void op_ext(void)
2468
{
2469
    unsigned int pos = PARAM1;
2470
    unsigned int size = PARAM2;
2471

    
2472
    T0 = ((uint32_t)T1 >> pos) & ((size < 32) ? ((1 << size) - 1) : ~0);
2473
    RETURN();
2474
}
2475

    
2476
void op_ins(void)
2477
{
2478
    unsigned int pos = PARAM1;
2479
    unsigned int size = PARAM2;
2480
    target_ulong mask = ((size < 32) ? ((1 << size) - 1) : ~0) << pos;
2481

    
2482
    T0 = (T0 & ~mask) | (((uint32_t)T1 << pos) & mask);
2483
    RETURN();
2484
}
2485

    
2486
void op_wsbh(void)
2487
{
2488
    T0 = ((T1 << 8) & ~0x00FF00FF) | ((T1 >> 8) & 0x00FF00FF);
2489
    RETURN();
2490
}
2491

    
2492
#ifdef TARGET_MIPS64
2493
void op_dext(void)
2494
{
2495
    unsigned int pos = PARAM1;
2496
    unsigned int size = PARAM2;
2497

    
2498
    T0 = (T1 >> pos) & ((size < 32) ? ((1 << size) - 1) : ~0);
2499
    RETURN();
2500
}
2501

    
2502
void op_dins(void)
2503
{
2504
    unsigned int pos = PARAM1;
2505
    unsigned int size = PARAM2;
2506
    target_ulong mask = ((size < 32) ? ((1 << size) - 1) : ~0) << pos;
2507

    
2508
    T0 = (T0 & ~mask) | ((T1 << pos) & mask);
2509
    RETURN();
2510
}
2511

    
2512
void op_dsbh(void)
2513
{
2514
    T0 = ((T1 << 8) & ~0x00FF00FF00FF00FFULL) | ((T1 >> 8) & 0x00FF00FF00FF00FFULL);
2515
    RETURN();
2516
}
2517

    
2518
void op_dshd(void)
2519
{
2520
    T0 = ((T1 << 16) & ~0x0000FFFF0000FFFFULL) | ((T1 >> 16) & 0x0000FFFF0000FFFFULL);
2521
    RETURN();
2522
}
2523
#endif
2524

    
2525
void op_seb(void)
2526
{
2527
    T0 = ((T1 & 0xFF) ^ 0x80) - 0x80;
2528
    RETURN();
2529
}
2530

    
2531
void op_seh(void)
2532
{
2533
    T0 = ((T1 & 0xFFFF) ^ 0x8000) - 0x8000;
2534
    RETURN();
2535
}