2 * MIPS emulation micro-operations for qemu.
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)
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.
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.
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
27 #define CALL_FROM_TB0(func) func()
30 #define CALL_FROM_TB1(func, arg0) func(arg0)
32 #ifndef CALL_FROM_TB1_CONST16
33 #define CALL_FROM_TB1_CONST16(func, arg0) CALL_FROM_TB1(func, arg0)
36 #define CALL_FROM_TB2(func, arg0, arg1) func(arg0, arg1)
38 #ifndef CALL_FROM_TB2_CONST16
39 #define CALL_FROM_TB2_CONST16(func, arg0, arg1) \
40 CALL_FROM_TB2(func, arg0, arg1)
43 #define CALL_FROM_TB3(func, arg0, arg1, arg2) func(arg0, arg1, arg2)
46 #define CALL_FROM_TB4(func, arg0, arg1, arg2, arg3) \
47 func(arg0, arg1, arg2, arg3)
51 #include "op_template.c"
54 #include "op_template.c"
57 #include "op_template.c"
60 #include "op_template.c"
63 #include "op_template.c"
66 #include "op_template.c"
69 #include "op_template.c"
72 #include "op_template.c"
75 #include "op_template.c"
78 #include "op_template.c"
81 #include "op_template.c"
84 #include "op_template.c"
87 #include "op_template.c"
90 #include "op_template.c"
93 #include "op_template.c"
96 #include "op_template.c"
99 #include "op_template.c"
102 #include "op_template.c"
105 #include "op_template.c"
108 #include "op_template.c"
111 #include "op_template.c"
114 #include "op_template.c"
117 #include "op_template.c"
120 #include "op_template.c"
123 #include "op_template.c"
126 #include "op_template.c"
129 #include "op_template.c"
132 #include "op_template.c"
135 #include "op_template.c"
138 #include "op_template.c"
141 #include "op_template.c"
145 #include "op_template.c"
149 #include "fop_template.c"
152 #include "fop_template.c"
155 #include "fop_template.c"
158 #include "fop_template.c"
161 #include "fop_template.c"
164 #include "fop_template.c"
167 #include "fop_template.c"
170 #include "fop_template.c"
173 #include "fop_template.c"
176 #include "fop_template.c"
179 #include "fop_template.c"
182 #include "fop_template.c"
185 #include "fop_template.c"
188 #include "fop_template.c"
191 #include "fop_template.c"
194 #include "fop_template.c"
197 #include "fop_template.c"
200 #include "fop_template.c"
203 #include "fop_template.c"
206 #include "fop_template.c"
209 #include "fop_template.c"
212 #include "fop_template.c"
215 #include "fop_template.c"
218 #include "fop_template.c"
221 #include "fop_template.c"
224 #include "fop_template.c"
227 #include "fop_template.c"
230 #include "fop_template.c"
233 #include "fop_template.c"
236 #include "fop_template.c"
239 #include "fop_template.c"
242 #include "fop_template.c"
246 #include "fop_template.c"
249 void op_dup_T0 (void)
255 void op_load_HI (void)
257 T0
= env
->HI
[PARAM1
][env
->current_tc
];
261 void op_store_HI (void)
263 env
->HI
[PARAM1
][env
->current_tc
] = T0
;
267 void op_load_LO (void)
269 T0
= env
->LO
[PARAM1
][env
->current_tc
];
273 void op_store_LO (void)
275 env
->LO
[PARAM1
][env
->current_tc
] = T0
;
280 #define MEMSUFFIX _raw
283 #if !defined(CONFIG_USER_ONLY)
284 #define MEMSUFFIX _user
288 #define MEMSUFFIX _kernel
293 /* Addresses computation */
294 void op_addr_add (void)
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 #if defined(TARGET_MIPSN32) || defined(TARGET_MIPS64)
300 if ((env
->hflags
& MIPS_HFLAG_UM
) &&
301 !(env
->CP0_Status
& (1 << CP0St_UX
)))
302 T0
= (int64_t)(int32_t)(T0
+ T1
);
312 T0
= (int32_t)((int32_t)T0
+ (int32_t)T1
);
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
);
332 T0
= (int32_t)((int32_t)T0
- (int32_t)T1
);
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
);
352 T0
= (int32_t)((int32_t)T0
* (int32_t)T1
);
356 #if HOST_LONG_BITS < 64
359 CALL_FROM_TB0(do_div
);
366 env
->LO
[0][env
->current_tc
] = (int32_t)((int64_t)(int32_t)T0
/ (int32_t)T1
);
367 env
->HI
[0][env
->current_tc
] = (int32_t)((int64_t)(int32_t)T0
% (int32_t)T1
);
376 env
->LO
[0][env
->current_tc
] = (int32_t)((uint32_t)T0
/ (uint32_t)T1
);
377 env
->HI
[0][env
->current_tc
] = (int32_t)((uint32_t)T0
% (uint32_t)T1
);
382 #if defined(TARGET_MIPSN32) || defined(TARGET_MIPS64)
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
);
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
);
424 T0
= (int64_t)T0
* (int64_t)T1
;
428 /* Those might call libgcc functions. */
435 #if TARGET_LONG_BITS > HOST_LONG_BITS
445 env
->LO
[0][env
->current_tc
] = T0
/ T1
;
446 env
->HI
[0][env
->current_tc
] = T0
% T1
;
451 #endif /* TARGET_MIPSN32 || TARGET_MIPS64 */
480 T0
= (int32_t)((uint32_t)T0
<< T1
);
486 T0
= (int32_t)((int32_t)T0
>> T1
);
492 T0
= (int32_t)((uint32_t)T0
>> T1
);
501 tmp
= (int32_t)((uint32_t)T0
<< (0x20 - T1
));
502 T0
= (int32_t)((uint32_t)T0
>> T1
) | tmp
;
509 T0
= (int32_t)((uint32_t)T1
<< ((uint32_t)T0
& 0x1F));
515 T0
= (int32_t)((int32_t)T1
>> (T0
& 0x1F));
521 T0
= (int32_t)((uint32_t)T1
>> (T0
& 0x1F));
531 tmp
= (int32_t)((uint32_t)T1
<< (0x20 - T0
));
532 T0
= (int32_t)((uint32_t)T1
>> T0
) | tmp
;
542 if (T0
== ~((target_ulong
)0)) {
545 for (n
= 0; n
< 32; n
++) {
546 if (!(T0
& (1 << 31)))
562 for (n
= 0; n
< 32; n
++) {
572 #if defined(TARGET_MIPSN32) || defined(TARGET_MIPS64)
574 #if TARGET_LONG_BITS > HOST_LONG_BITS
575 /* Those might call libgcc functions. */
578 CALL_FROM_TB0(do_dsll
);
582 void op_dsll32 (void)
584 CALL_FROM_TB0(do_dsll32
);
590 CALL_FROM_TB0(do_dsra
);
594 void op_dsra32 (void)
596 CALL_FROM_TB0(do_dsra32
);
602 CALL_FROM_TB0(do_dsrl
);
606 void op_dsrl32 (void)
608 CALL_FROM_TB0(do_dsrl32
);
614 CALL_FROM_TB0(do_drotr
);
618 void op_drotr32 (void)
620 CALL_FROM_TB0(do_drotr32
);
626 CALL_FROM_TB0(do_dsllv
);
632 CALL_FROM_TB0(do_dsrav
);
638 CALL_FROM_TB0(do_dsrlv
);
642 void op_drotrv (void)
644 CALL_FROM_TB0(do_drotrv
);
648 #else /* TARGET_LONG_BITS > HOST_LONG_BITS */
656 void op_dsll32 (void)
658 T0
= T0
<< (T1
+ 32);
664 T0
= (int64_t)T0
>> T1
;
668 void op_dsra32 (void)
670 T0
= (int64_t)T0
>> (T1
+ 32);
680 void op_dsrl32 (void)
682 T0
= T0
>> (T1
+ 32);
691 tmp
= T0
<< (0x40 - T1
);
692 T0
= (T0
>> T1
) | tmp
;
697 void op_drotr32 (void)
702 tmp
= T0
<< (0x40 - (32 + T1
));
703 T0
= (T0
>> (32 + T1
)) | tmp
;
710 T0
= T1
<< (T0
& 0x3F);
716 T0
= (int64_t)T1
>> (T0
& 0x3F);
722 T0
= T1
>> (T0
& 0x3F);
726 void op_drotrv (void)
732 tmp
= T1
<< (0x40 - T0
);
733 T0
= (T1
>> T0
) | tmp
;
738 #endif /* TARGET_LONG_BITS > HOST_LONG_BITS */
744 if (T0
== ~((target_ulong
)0)) {
747 for (n
= 0; n
< 64; n
++) {
748 if (!(T0
& (1ULL << 63)))
764 for (n
= 0; n
< 64; n
++) {
765 if (T0
& (1ULL << 63))
773 #endif /* TARGET_MIPSN32 || TARGET_MIPS64 */
775 /* 64 bits arithmetic */
776 #if TARGET_LONG_BITS > HOST_LONG_BITS
779 CALL_FROM_TB0(do_mult
);
785 CALL_FROM_TB0(do_multu
);
791 CALL_FROM_TB0(do_madd
);
797 CALL_FROM_TB0(do_maddu
);
803 CALL_FROM_TB0(do_msub
);
809 CALL_FROM_TB0(do_msubu
);
813 #else /* TARGET_LONG_BITS > HOST_LONG_BITS */
815 static inline uint64_t get_HILO (void)
817 return ((uint64_t)env
->HI
[0][env
->current_tc
] << 32) |
818 ((uint64_t)(uint32_t)env
->LO
[0][env
->current_tc
]);
821 static inline void set_HILO (uint64_t HILO
)
823 env
->LO
[0][env
->current_tc
] = (int32_t)(HILO
& 0xFFFFFFFF);
824 env
->HI
[0][env
->current_tc
] = (int32_t)(HILO
>> 32);
829 set_HILO((int64_t)(int32_t)T0
* (int64_t)(int32_t)T1
);
835 set_HILO((uint64_t)(uint32_t)T0
* (uint64_t)(uint32_t)T1
);
843 tmp
= ((int64_t)(int32_t)T0
* (int64_t)(int32_t)T1
);
844 set_HILO((int64_t)get_HILO() + tmp
);
852 tmp
= ((uint64_t)(uint32_t)T0
* (uint64_t)(uint32_t)T1
);
853 set_HILO(get_HILO() + tmp
);
861 tmp
= ((int64_t)(int32_t)T0
* (int64_t)(int32_t)T1
);
862 set_HILO((int64_t)get_HILO() - tmp
);
870 tmp
= ((uint64_t)(uint32_t)T0
* (uint64_t)(uint32_t)T1
);
871 set_HILO(get_HILO() - tmp
);
874 #endif /* TARGET_LONG_BITS > HOST_LONG_BITS */
876 #if defined(TARGET_MIPSN32) || defined(TARGET_MIPS64)
879 CALL_FROM_TB4(muls64
, &(env
->HI
[0][env
->current_tc
]), &(env
->LO
[0][env
->current_tc
]), T0
, T1
);
883 void op_dmultu (void)
885 CALL_FROM_TB4(mulu64
, &(env
->HI
[0][env
->current_tc
]), &(env
->LO
[0][env
->current_tc
]), T0
, T1
);
890 /* Conditional moves */
894 env
->gpr
[PARAM1
][env
->current_tc
] = T0
;
901 env
->gpr
[PARAM1
][env
->current_tc
] = T0
;
907 if (!(env
->fpu
->fcr31
& PARAM1
))
914 if (env
->fpu
->fcr31
& PARAM1
)
920 #define OP_COND(name, cond) \
921 void glue(op_, name) (void) \
931 OP_COND(eq
, T0
== T1
);
932 OP_COND(ne
, T0
!= T1
);
933 OP_COND(ge
, (target_long
)T0
>= (target_long
)T1
);
934 OP_COND(geu
, T0
>= T1
);
935 OP_COND(lt
, (target_long
)T0
< (target_long
)T1
);
936 OP_COND(ltu
, T0
< T1
);
937 OP_COND(gez
, (target_long
)T0
>= 0);
938 OP_COND(gtz
, (target_long
)T0
> 0);
939 OP_COND(lez
, (target_long
)T0
<= 0);
940 OP_COND(ltz
, (target_long
)T0
< 0);
943 void OPPROTO
op_goto_tb0(void)
945 GOTO_TB(op_goto_tb0
, PARAM1
, 0);
949 void OPPROTO
op_goto_tb1(void)
951 GOTO_TB(op_goto_tb1
, PARAM1
, 1);
955 /* Branch to register */
956 void op_save_breg_target (void)
962 void op_restore_breg_target (void)
970 env
->PC
[env
->current_tc
] = T2
;
974 void op_save_btarget (void)
976 env
->btarget
= PARAM1
;
980 #if defined(TARGET_MIPSN32) || defined(TARGET_MIPS64)
981 void op_save_btarget64 (void)
983 env
->btarget
= ((uint64_t)PARAM1
<< 32) | (uint32_t)PARAM2
;
988 /* Conditional branch */
989 void op_set_bcond (void)
995 void op_save_bcond (void)
1001 void op_restore_bcond (void)
1007 void op_jnz_T2 (void)
1010 GOTO_LABEL_PARAM(1);
1015 void op_mfc0_index (void)
1017 T0
= env
->CP0_Index
;
1021 void op_mfc0_mvpcontrol (void)
1023 T0
= env
->mvp
->CP0_MVPControl
;
1027 void op_mfc0_mvpconf0 (void)
1029 T0
= env
->mvp
->CP0_MVPConf0
;
1033 void op_mfc0_mvpconf1 (void)
1035 T0
= env
->mvp
->CP0_MVPConf1
;
1039 void op_mfc0_random (void)
1041 CALL_FROM_TB0(do_mfc0_random
);
1045 void op_mfc0_vpecontrol (void)
1047 T0
= env
->CP0_VPEControl
;
1051 void op_mfc0_vpeconf0 (void)
1053 T0
= env
->CP0_VPEConf0
;
1057 void op_mfc0_vpeconf1 (void)
1059 T0
= env
->CP0_VPEConf1
;
1063 void op_mfc0_yqmask (void)
1065 T0
= env
->CP0_YQMask
;
1069 void op_mfc0_vpeschedule (void)
1071 T0
= env
->CP0_VPESchedule
;
1075 void op_mfc0_vpeschefback (void)
1077 T0
= env
->CP0_VPEScheFBack
;
1081 void op_mfc0_vpeopt (void)
1083 T0
= env
->CP0_VPEOpt
;
1087 void op_mfc0_entrylo0 (void)
1089 T0
= (int32_t)env
->CP0_EntryLo0
;
1093 void op_mfc0_tcstatus (void)
1095 T0
= env
->CP0_TCStatus
[env
->current_tc
];
1099 void op_mftc0_tcstatus(void)
1101 int other_tc
= env
->CP0_VPEControl
& (0xff << CP0VPECo_TargTC
);
1103 T0
= env
->CP0_TCStatus
[other_tc
];
1107 void op_mfc0_tcbind (void)
1109 T0
= env
->CP0_TCBind
[env
->current_tc
];
1113 void op_mftc0_tcbind(void)
1115 int other_tc
= env
->CP0_VPEControl
& (0xff << CP0VPECo_TargTC
);
1117 T0
= env
->CP0_TCBind
[other_tc
];
1121 void op_mfc0_tcrestart (void)
1123 T0
= env
->PC
[env
->current_tc
];
1127 void op_mftc0_tcrestart(void)
1129 int other_tc
= env
->CP0_VPEControl
& (0xff << CP0VPECo_TargTC
);
1131 T0
= env
->PC
[other_tc
];
1135 void op_mfc0_tchalt (void)
1137 T0
= env
->CP0_TCHalt
[env
->current_tc
];
1141 void op_mftc0_tchalt(void)
1143 int other_tc
= env
->CP0_VPEControl
& (0xff << CP0VPECo_TargTC
);
1145 T0
= env
->CP0_TCHalt
[other_tc
];
1149 void op_mfc0_tccontext (void)
1151 T0
= env
->CP0_TCContext
[env
->current_tc
];
1155 void op_mftc0_tccontext(void)
1157 int other_tc
= env
->CP0_VPEControl
& (0xff << CP0VPECo_TargTC
);
1159 T0
= env
->CP0_TCContext
[other_tc
];
1163 void op_mfc0_tcschedule (void)
1165 T0
= env
->CP0_TCSchedule
[env
->current_tc
];
1169 void op_mftc0_tcschedule(void)
1171 int other_tc
= env
->CP0_VPEControl
& (0xff << CP0VPECo_TargTC
);
1173 T0
= env
->CP0_TCSchedule
[other_tc
];
1177 void op_mfc0_tcschefback (void)
1179 T0
= env
->CP0_TCScheFBack
[env
->current_tc
];
1183 void op_mftc0_tcschefback(void)
1185 int other_tc
= env
->CP0_VPEControl
& (0xff << CP0VPECo_TargTC
);
1187 T0
= env
->CP0_TCScheFBack
[other_tc
];
1191 void op_mfc0_entrylo1 (void)
1193 T0
= (int32_t)env
->CP0_EntryLo1
;
1197 void op_mfc0_context (void)
1199 T0
= (int32_t)env
->CP0_Context
;
1203 void op_mfc0_pagemask (void)
1205 T0
= env
->CP0_PageMask
;
1209 void op_mfc0_pagegrain (void)
1211 T0
= env
->CP0_PageGrain
;
1215 void op_mfc0_wired (void)
1217 T0
= env
->CP0_Wired
;
1221 void op_mfc0_srsconf0 (void)
1223 T0
= env
->CP0_SRSConf0
;
1227 void op_mfc0_srsconf1 (void)
1229 T0
= env
->CP0_SRSConf1
;
1233 void op_mfc0_srsconf2 (void)
1235 T0
= env
->CP0_SRSConf2
;
1239 void op_mfc0_srsconf3 (void)
1241 T0
= env
->CP0_SRSConf3
;
1245 void op_mfc0_srsconf4 (void)
1247 T0
= env
->CP0_SRSConf4
;
1251 void op_mfc0_hwrena (void)
1253 T0
= env
->CP0_HWREna
;
1257 void op_mfc0_badvaddr (void)
1259 T0
= (int32_t)env
->CP0_BadVAddr
;
1263 void op_mfc0_count (void)
1265 CALL_FROM_TB0(do_mfc0_count
);
1269 void op_mfc0_entryhi (void)
1271 T0
= (int32_t)env
->CP0_EntryHi
;
1275 void op_mftc0_entryhi(void)
1277 int other_tc
= env
->CP0_VPEControl
& (0xff << CP0VPECo_TargTC
);
1279 T0
= (env
->CP0_EntryHi
& ~0xff) | (env
->CP0_TCStatus
[other_tc
] & 0xff);
1283 void op_mfc0_compare (void)
1285 T0
= env
->CP0_Compare
;
1289 void op_mfc0_status (void)
1291 T0
= env
->CP0_Status
;
1295 void op_mftc0_status(void)
1297 int other_tc
= env
->CP0_VPEControl
& (0xff << CP0VPECo_TargTC
);
1298 uint32_t tcstatus
= env
->CP0_TCStatus
[other_tc
];
1300 T0
= env
->CP0_Status
& ~0xf1000018;
1301 T0
|= tcstatus
& (0xf << CP0TCSt_TCU0
);
1302 T0
|= (tcstatus
& (1 << CP0TCSt_TMX
)) >> (CP0TCSt_TMX
- CP0St_MX
);
1303 T0
|= (tcstatus
& (0x3 << CP0TCSt_TKSU
)) >> (CP0TCSt_TKSU
- CP0St_R0
);
1307 void op_mfc0_intctl (void)
1309 T0
= env
->CP0_IntCtl
;
1313 void op_mfc0_srsctl (void)
1315 T0
= env
->CP0_SRSCtl
;
1319 void op_mfc0_srsmap (void)
1321 T0
= env
->CP0_SRSMap
;
1325 void op_mfc0_cause (void)
1327 T0
= env
->CP0_Cause
;
1331 void op_mfc0_epc (void)
1333 T0
= (int32_t)env
->CP0_EPC
;
1337 void op_mfc0_prid (void)
1343 void op_mfc0_ebase (void)
1345 T0
= env
->CP0_EBase
;
1349 void op_mfc0_config0 (void)
1351 T0
= env
->CP0_Config0
;
1355 void op_mfc0_config1 (void)
1357 T0
= env
->CP0_Config1
;
1361 void op_mfc0_config2 (void)
1363 T0
= env
->CP0_Config2
;
1367 void op_mfc0_config3 (void)
1369 T0
= env
->CP0_Config3
;
1373 void op_mfc0_config6 (void)
1375 T0
= env
->CP0_Config6
;
1379 void op_mfc0_config7 (void)
1381 T0
= env
->CP0_Config7
;
1385 void op_mfc0_lladdr (void)
1387 T0
= (int32_t)env
->CP0_LLAddr
>> 4;
1391 void op_mfc0_watchlo (void)
1393 T0
= (int32_t)env
->CP0_WatchLo
[PARAM1
];
1397 void op_mfc0_watchhi (void)
1399 T0
= env
->CP0_WatchHi
[PARAM1
];
1403 void op_mfc0_xcontext (void)
1405 T0
= (int32_t)env
->CP0_XContext
;
1409 void op_mfc0_framemask (void)
1411 T0
= env
->CP0_Framemask
;
1415 void op_mfc0_debug (void)
1417 T0
= env
->CP0_Debug
;
1418 if (env
->hflags
& MIPS_HFLAG_DM
)
1419 T0
|= 1 << CP0DB_DM
;
1423 void op_mftc0_debug(void)
1425 int other_tc
= env
->CP0_VPEControl
& (0xff << CP0VPECo_TargTC
);
1427 /* XXX: Might be wrong, check with EJTAG spec. */
1428 T0
= (env
->CP0_Debug
& ~((1 << CP0DB_SSt
) | (1 << CP0DB_Halt
))) |
1429 (env
->CP0_Debug_tcstatus
[other_tc
] &
1430 ((1 << CP0DB_SSt
) | (1 << CP0DB_Halt
)));
1434 void op_mfc0_depc (void)
1436 T0
= (int32_t)env
->CP0_DEPC
;
1440 void op_mfc0_performance0 (void)
1442 T0
= env
->CP0_Performance0
;
1446 void op_mfc0_taglo (void)
1448 T0
= env
->CP0_TagLo
;
1452 void op_mfc0_datalo (void)
1454 T0
= env
->CP0_DataLo
;
1458 void op_mfc0_taghi (void)
1460 T0
= env
->CP0_TagHi
;
1464 void op_mfc0_datahi (void)
1466 T0
= env
->CP0_DataHi
;
1470 void op_mfc0_errorepc (void)
1472 T0
= (int32_t)env
->CP0_ErrorEPC
;
1476 void op_mfc0_desave (void)
1478 T0
= env
->CP0_DESAVE
;
1482 void op_mtc0_index (void)
1484 env
->CP0_Index
= (env
->CP0_Index
& 0x80000000) | (T0
% env
->tlb
->nb_tlb
);
1488 void op_mtc0_mvpcontrol (void)
1493 if (env
->CP0_VPEConf0
& (1 << CP0VPEC0_MVP
))
1494 mask
|= (1 << CP0MVPCo_CPA
) | (1 << CP0MVPCo_VPC
) |
1495 (1 << CP0MVPCo_EVP
);
1496 if (env
->mvp
->CP0_MVPControl
& (1 << CP0MVPCo_VPC
))
1497 mask
|= (1 << CP0MVPCo_STLB
);
1498 newval
= (env
->mvp
->CP0_MVPControl
& ~mask
) | (T0
& mask
);
1500 // TODO: Enable/disable shared TLB, enable/disable VPEs.
1502 env
->mvp
->CP0_MVPControl
= newval
;
1506 void op_mtc0_vpecontrol (void)
1511 mask
= (1 << CP0VPECo_YSI
) | (1 << CP0VPECo_GSI
) |
1512 (1 << CP0VPECo_TE
) | (0xff << CP0VPECo_TargTC
);
1513 newval
= (env
->CP0_VPEControl
& ~mask
) | (T0
& mask
);
1515 /* Yield scheduler intercept not implemented. */
1516 /* Gating storage scheduler intercept not implemented. */
1518 // TODO: Enable/disable TCs.
1520 env
->CP0_VPEControl
= newval
;
1524 void op_mtc0_vpeconf0 (void)
1529 if (env
->CP0_VPEConf0
& (1 << CP0VPEC0_MVP
)) {
1530 if (env
->CP0_VPEConf0
& (1 << CP0VPEC0_VPA
))
1531 mask
|= (0xff << CP0VPEC0_XTC
);
1532 mask
|= (1 << CP0VPEC0_MVP
) | (1 << CP0VPEC0_VPA
);
1534 newval
= (env
->CP0_VPEConf0
& ~mask
) | (T0
& mask
);
1536 // TODO: TC exclusive handling due to ERL/EXL.
1538 env
->CP0_VPEConf0
= newval
;
1542 void op_mtc0_vpeconf1 (void)
1547 if (env
->mvp
->CP0_MVPControl
& (1 << CP0MVPCo_VPC
))
1548 mask
|= (0xff << CP0VPEC1_NCX
) | (0xff << CP0VPEC1_NCP2
) |
1549 (0xff << CP0VPEC1_NCP1
);
1550 newval
= (env
->CP0_VPEConf1
& ~mask
) | (T0
& mask
);
1552 /* UDI not implemented. */
1553 /* CP2 not implemented. */
1555 // TODO: Handle FPU (CP1) binding.
1557 env
->CP0_VPEConf1
= newval
;
1561 void op_mtc0_yqmask (void)
1563 /* Yield qualifier inputs not implemented. */
1564 env
->CP0_YQMask
= 0x00000000;
1568 void op_mtc0_vpeschedule (void)
1570 env
->CP0_VPESchedule
= T0
;
1574 void op_mtc0_vpeschefback (void)
1576 env
->CP0_VPEScheFBack
= T0
;
1580 void op_mtc0_vpeopt (void)
1582 env
->CP0_VPEOpt
= T0
& 0x0000ffff;
1586 void op_mtc0_entrylo0 (void)
1588 /* Large physaddr not implemented */
1589 /* 1k pages not implemented */
1590 env
->CP0_EntryLo0
= T0
& 0x3FFFFFFF;
1594 void op_mtc0_tcstatus (void)
1596 uint32_t mask
= env
->CP0_TCStatus_rw_bitmask
;
1599 newval
= (env
->CP0_TCStatus
[env
->current_tc
] & ~mask
) | (T0
& mask
);
1601 // TODO: Sync with CP0_Status.
1603 env
->CP0_TCStatus
[env
->current_tc
] = newval
;
1607 void op_mttc0_tcstatus (void)
1609 int other_tc
= env
->CP0_VPEControl
& (0xff << CP0VPECo_TargTC
);
1611 // TODO: Sync with CP0_Status.
1613 env
->CP0_TCStatus
[other_tc
] = T0
;
1617 void op_mtc0_tcbind (void)
1619 uint32_t mask
= (1 << CP0TCBd_TBE
);
1622 if (env
->mvp
->CP0_MVPControl
& (1 << CP0MVPCo_VPC
))
1623 mask
|= (1 << CP0TCBd_CurVPE
);
1624 newval
= (env
->CP0_TCBind
[env
->current_tc
] & ~mask
) | (T0
& mask
);
1625 env
->CP0_TCBind
[env
->current_tc
] = newval
;
1629 void op_mttc0_tcbind (void)
1631 int other_tc
= env
->CP0_VPEControl
& (0xff << CP0VPECo_TargTC
);
1632 uint32_t mask
= (1 << CP0TCBd_TBE
);
1635 if (env
->mvp
->CP0_MVPControl
& (1 << CP0MVPCo_VPC
))
1636 mask
|= (1 << CP0TCBd_CurVPE
);
1637 newval
= (env
->CP0_TCBind
[other_tc
] & ~mask
) | (T0
& mask
);
1638 env
->CP0_TCBind
[other_tc
] = newval
;
1642 void op_mtc0_tcrestart (void)
1644 env
->PC
[env
->current_tc
] = T0
;
1645 env
->CP0_TCStatus
[env
->current_tc
] &= ~(1 << CP0TCSt_TDS
);
1646 env
->CP0_LLAddr
= 0ULL;
1647 /* MIPS16 not implemented. */
1651 void op_mttc0_tcrestart (void)
1653 int other_tc
= env
->CP0_VPEControl
& (0xff << CP0VPECo_TargTC
);
1655 env
->PC
[other_tc
] = T0
;
1656 env
->CP0_TCStatus
[other_tc
] &= ~(1 << CP0TCSt_TDS
);
1657 env
->CP0_LLAddr
= 0ULL;
1658 /* MIPS16 not implemented. */
1662 void op_mtc0_tchalt (void)
1664 env
->CP0_TCHalt
[env
->current_tc
] = T0
& 0x1;
1666 // TODO: Halt TC / Restart (if allocated+active) TC.
1671 void op_mttc0_tchalt (void)
1673 int other_tc
= env
->CP0_VPEControl
& (0xff << CP0VPECo_TargTC
);
1675 // TODO: Halt TC / Restart (if allocated+active) TC.
1677 env
->CP0_TCHalt
[other_tc
] = T0
;
1681 void op_mtc0_tccontext (void)
1683 env
->CP0_TCContext
[env
->current_tc
] = T0
;
1687 void op_mttc0_tccontext (void)
1689 int other_tc
= env
->CP0_VPEControl
& (0xff << CP0VPECo_TargTC
);
1691 env
->CP0_TCContext
[other_tc
] = T0
;
1695 void op_mtc0_tcschedule (void)
1697 env
->CP0_TCSchedule
[env
->current_tc
] = T0
;
1701 void op_mttc0_tcschedule (void)
1703 int other_tc
= env
->CP0_VPEControl
& (0xff << CP0VPECo_TargTC
);
1705 env
->CP0_TCSchedule
[other_tc
] = T0
;
1709 void op_mtc0_tcschefback (void)
1711 env
->CP0_TCScheFBack
[env
->current_tc
] = T0
;
1715 void op_mttc0_tcschefback (void)
1717 int other_tc
= env
->CP0_VPEControl
& (0xff << CP0VPECo_TargTC
);
1719 env
->CP0_TCScheFBack
[other_tc
] = T0
;
1723 void op_mtc0_entrylo1 (void)
1725 /* Large physaddr not implemented */
1726 /* 1k pages not implemented */
1727 env
->CP0_EntryLo1
= T0
& 0x3FFFFFFF;
1731 void op_mtc0_context (void)
1733 env
->CP0_Context
= (env
->CP0_Context
& 0x007FFFFF) | (T0
& ~0x007FFFFF);
1737 void op_mtc0_pagemask (void)
1739 /* 1k pages not implemented */
1740 env
->CP0_PageMask
= T0
& (0x1FFFFFFF & (TARGET_PAGE_MASK
<< 1));
1744 void op_mtc0_pagegrain (void)
1746 /* SmartMIPS not implemented */
1747 /* Large physaddr not implemented */
1748 /* 1k pages not implemented */
1749 env
->CP0_PageGrain
= 0;
1753 void op_mtc0_wired (void)
1755 env
->CP0_Wired
= T0
% env
->tlb
->nb_tlb
;
1759 void op_mtc0_srsconf0 (void)
1761 env
->CP0_SRSConf0
|= T0
& env
->CP0_SRSConf0_rw_bitmask
;
1765 void op_mtc0_srsconf1 (void)
1767 env
->CP0_SRSConf1
|= T0
& env
->CP0_SRSConf1_rw_bitmask
;
1771 void op_mtc0_srsconf2 (void)
1773 env
->CP0_SRSConf2
|= T0
& env
->CP0_SRSConf2_rw_bitmask
;
1777 void op_mtc0_srsconf3 (void)
1779 env
->CP0_SRSConf3
|= T0
& env
->CP0_SRSConf3_rw_bitmask
;
1783 void op_mtc0_srsconf4 (void)
1785 env
->CP0_SRSConf4
|= T0
& env
->CP0_SRSConf4_rw_bitmask
;
1789 void op_mtc0_hwrena (void)
1791 env
->CP0_HWREna
= T0
& 0x0000000F;
1795 void op_mtc0_count (void)
1797 CALL_FROM_TB2(cpu_mips_store_count
, env
, T0
);
1801 void op_mtc0_entryhi (void)
1803 target_ulong old
, val
;
1805 /* 1k pages not implemented */
1806 val
= T0
& ((TARGET_PAGE_MASK
<< 1) | 0xFF);
1807 #if defined(TARGET_MIPSN32) || defined(TARGET_MIPS64)
1808 val
&= env
->SEGMask
;
1810 old
= env
->CP0_EntryHi
;
1811 env
->CP0_EntryHi
= val
;
1812 if (env
->CP0_Config3
& (1 << CP0C3_MT
)) {
1813 uint32_t tcst
= env
->CP0_TCStatus
[env
->current_tc
] & ~0xff;
1814 env
->CP0_TCStatus
[env
->current_tc
] = tcst
| (val
& 0xff);
1816 /* If the ASID changes, flush qemu's TLB. */
1817 if ((old
& 0xFF) != (val
& 0xFF))
1818 CALL_FROM_TB2(cpu_mips_tlb_flush
, env
, 1);
1822 void op_mttc0_entryhi(void)
1824 int other_tc
= env
->CP0_VPEControl
& (0xff << CP0VPECo_TargTC
);
1826 env
->CP0_EntryHi
= (env
->CP0_EntryHi
& 0xff) | (T0
& ~0xff);
1827 env
->CP0_TCStatus
[other_tc
] = (env
->CP0_TCStatus
[other_tc
] & ~0xff) | (T0
& 0xff);
1831 void op_mtc0_compare (void)
1833 CALL_FROM_TB2(cpu_mips_store_compare
, env
, T0
);
1837 void op_mtc0_status (void)
1840 uint32_t mask
= env
->CP0_Status_rw_bitmask
;
1843 old
= env
->CP0_Status
;
1844 env
->CP0_Status
= (env
->CP0_Status
& ~mask
) | val
;
1845 CALL_FROM_TB1(compute_hflags
, env
);
1846 if (loglevel
& CPU_LOG_EXEC
)
1847 CALL_FROM_TB2(do_mtc0_status_debug
, old
, val
);
1848 CALL_FROM_TB1(cpu_mips_update_irq
, env
);
1852 void op_mttc0_status(void)
1854 int other_tc
= env
->CP0_VPEControl
& (0xff << CP0VPECo_TargTC
);
1855 uint32_t tcstatus
= env
->CP0_TCStatus
[other_tc
];
1857 env
->CP0_Status
= T0
& ~0xf1000018;
1858 tcstatus
= (tcstatus
& ~(0xf << CP0TCSt_TCU0
)) | (T0
& (0xf << CP0St_CU0
));
1859 tcstatus
= (tcstatus
& ~(1 << CP0TCSt_TMX
)) | ((T0
& (1 << CP0St_MX
)) << (CP0TCSt_TMX
- CP0St_MX
));
1860 tcstatus
= (tcstatus
& ~(0x3 << CP0TCSt_TKSU
)) | ((T0
& (0x3 << CP0St_R0
)) << (CP0TCSt_TKSU
- CP0St_R0
));
1861 env
->CP0_TCStatus
[other_tc
] = tcstatus
;
1865 void op_mtc0_intctl (void)
1867 /* vectored interrupts not implemented, no performance counters. */
1868 env
->CP0_IntCtl
= (env
->CP0_IntCtl
& ~0x000002e0) | (T0
& 0x000002e0);
1872 void op_mtc0_srsctl (void)
1874 uint32_t mask
= (0xf << CP0SRSCtl_ESS
) | (0xf << CP0SRSCtl_PSS
);
1875 env
->CP0_SRSCtl
= (env
->CP0_SRSCtl
& ~mask
) | (T0
& mask
);
1879 void op_mtc0_srsmap (void)
1881 env
->CP0_SRSMap
= T0
;
1885 void op_mtc0_cause (void)
1887 uint32_t mask
= 0x00C00300;
1888 uint32_t old
= env
->CP0_Cause
;
1890 if (env
->insn_flags
& ISA_MIPS32R2
)
1891 mask
|= 1 << CP0Ca_DC
;
1893 env
->CP0_Cause
= (env
->CP0_Cause
& ~mask
) | (T0
& mask
);
1895 if ((old
^ env
->CP0_Cause
) & (1 << CP0Ca_DC
)) {
1896 if (env
->CP0_Cause
& (1 << CP0Ca_DC
))
1897 CALL_FROM_TB1(cpu_mips_stop_count
, env
);
1899 CALL_FROM_TB1(cpu_mips_start_count
, env
);
1902 /* Handle the software interrupt as an hardware one, as they
1904 if (T0
& CP0Ca_IP_mask
) {
1905 CALL_FROM_TB1(cpu_mips_update_irq
, env
);
1910 void op_mtc0_epc (void)
1916 void op_mtc0_ebase (void)
1918 /* vectored interrupts not implemented */
1919 /* Multi-CPU not implemented */
1920 env
->CP0_EBase
= 0x80000000 | (T0
& 0x3FFFF000);
1924 void op_mtc0_config0 (void)
1926 env
->CP0_Config0
= (env
->CP0_Config0
& 0x81FFFFF8) | (T0
& 0x00000007);
1930 void op_mtc0_config2 (void)
1932 /* tertiary/secondary caches not implemented */
1933 env
->CP0_Config2
= (env
->CP0_Config2
& 0x8FFF0FFF);
1937 void op_mtc0_watchlo (void)
1939 /* Watch exceptions for instructions, data loads, data stores
1941 env
->CP0_WatchLo
[PARAM1
] = (T0
& ~0x7);
1945 void op_mtc0_watchhi (void)
1947 env
->CP0_WatchHi
[PARAM1
] = (T0
& 0x40FF0FF8);
1948 env
->CP0_WatchHi
[PARAM1
] &= ~(env
->CP0_WatchHi
[PARAM1
] & T0
& 0x7);
1952 void op_mtc0_xcontext (void)
1954 target_ulong mask
= (1ULL << (env
->SEGBITS
- 7)) - 1;
1955 env
->CP0_XContext
= (env
->CP0_XContext
& mask
) | (T0
& ~mask
);
1959 void op_mtc0_framemask (void)
1961 env
->CP0_Framemask
= T0
; /* XXX */
1965 void op_mtc0_debug (void)
1967 env
->CP0_Debug
= (env
->CP0_Debug
& 0x8C03FC1F) | (T0
& 0x13300120);
1968 if (T0
& (1 << CP0DB_DM
))
1969 env
->hflags
|= MIPS_HFLAG_DM
;
1971 env
->hflags
&= ~MIPS_HFLAG_DM
;
1975 void op_mttc0_debug(void)
1977 int other_tc
= env
->CP0_VPEControl
& (0xff << CP0VPECo_TargTC
);
1979 /* XXX: Might be wrong, check with EJTAG spec. */
1980 env
->CP0_Debug_tcstatus
[other_tc
] = T0
& ((1 << CP0DB_SSt
) | (1 << CP0DB_Halt
));
1981 env
->CP0_Debug
= (env
->CP0_Debug
& ((1 << CP0DB_SSt
) | (1 << CP0DB_Halt
))) |
1982 (T0
& ~((1 << CP0DB_SSt
) | (1 << CP0DB_Halt
)));
1986 void op_mtc0_depc (void)
1992 void op_mtc0_performance0 (void)
1994 env
->CP0_Performance0
= T0
; /* XXX */
1998 void op_mtc0_taglo (void)
2000 env
->CP0_TagLo
= T0
& 0xFFFFFCF6;
2004 void op_mtc0_datalo (void)
2006 env
->CP0_DataLo
= T0
; /* XXX */
2010 void op_mtc0_taghi (void)
2012 env
->CP0_TagHi
= T0
; /* XXX */
2016 void op_mtc0_datahi (void)
2018 env
->CP0_DataHi
= T0
; /* XXX */
2022 void op_mtc0_errorepc (void)
2024 env
->CP0_ErrorEPC
= T0
;
2028 void op_mtc0_desave (void)
2030 env
->CP0_DESAVE
= T0
;
2034 #if defined(TARGET_MIPSN32) || defined(TARGET_MIPS64)
2035 void op_dmfc0_yqmask (void)
2037 T0
= env
->CP0_YQMask
;
2041 void op_dmfc0_vpeschedule (void)
2043 T0
= env
->CP0_VPESchedule
;
2047 void op_dmfc0_vpeschefback (void)
2049 T0
= env
->CP0_VPEScheFBack
;
2053 void op_dmfc0_entrylo0 (void)
2055 T0
= env
->CP0_EntryLo0
;
2059 void op_dmfc0_tcrestart (void)
2061 T0
= env
->PC
[env
->current_tc
];
2065 void op_dmfc0_tchalt (void)
2067 T0
= env
->CP0_TCHalt
[env
->current_tc
];
2071 void op_dmfc0_tccontext (void)
2073 T0
= env
->CP0_TCContext
[env
->current_tc
];
2077 void op_dmfc0_tcschedule (void)
2079 T0
= env
->CP0_TCSchedule
[env
->current_tc
];
2083 void op_dmfc0_tcschefback (void)
2085 T0
= env
->CP0_TCScheFBack
[env
->current_tc
];
2089 void op_dmfc0_entrylo1 (void)
2091 T0
= env
->CP0_EntryLo1
;
2095 void op_dmfc0_context (void)
2097 T0
= env
->CP0_Context
;
2101 void op_dmfc0_badvaddr (void)
2103 T0
= env
->CP0_BadVAddr
;
2107 void op_dmfc0_entryhi (void)
2109 T0
= env
->CP0_EntryHi
;
2113 void op_dmfc0_epc (void)
2119 void op_dmfc0_lladdr (void)
2121 T0
= env
->CP0_LLAddr
>> 4;
2125 void op_dmfc0_watchlo (void)
2127 T0
= env
->CP0_WatchLo
[PARAM1
];
2131 void op_dmfc0_xcontext (void)
2133 T0
= env
->CP0_XContext
;
2137 void op_dmfc0_depc (void)
2143 void op_dmfc0_errorepc (void)
2145 T0
= env
->CP0_ErrorEPC
;
2148 #endif /* TARGET_MIPSN32 || TARGET_MIPS64 */
2150 /* MIPS MT functions */
2151 void op_mftgpr(void)
2153 int other_tc
= env
->CP0_VPEControl
& (0xff << CP0VPECo_TargTC
);
2155 T0
= env
->gpr
[PARAM1
][other_tc
];
2161 int other_tc
= env
->CP0_VPEControl
& (0xff << CP0VPECo_TargTC
);
2163 T0
= env
->LO
[PARAM1
][other_tc
];
2169 int other_tc
= env
->CP0_VPEControl
& (0xff << CP0VPECo_TargTC
);
2171 T0
= env
->HI
[PARAM1
][other_tc
];
2175 void op_mftacx(void)
2177 int other_tc
= env
->CP0_VPEControl
& (0xff << CP0VPECo_TargTC
);
2179 T0
= env
->ACX
[PARAM1
][other_tc
];
2183 void op_mftdsp(void)
2185 int other_tc
= env
->CP0_VPEControl
& (0xff << CP0VPECo_TargTC
);
2187 T0
= env
->DSPControl
[other_tc
];
2191 void op_mttgpr(void)
2193 int other_tc
= env
->CP0_VPEControl
& (0xff << CP0VPECo_TargTC
);
2195 T0
= env
->gpr
[PARAM1
][other_tc
];
2201 int other_tc
= env
->CP0_VPEControl
& (0xff << CP0VPECo_TargTC
);
2203 T0
= env
->LO
[PARAM1
][other_tc
];
2209 int other_tc
= env
->CP0_VPEControl
& (0xff << CP0VPECo_TargTC
);
2211 T0
= env
->HI
[PARAM1
][other_tc
];
2215 void op_mttacx(void)
2217 int other_tc
= env
->CP0_VPEControl
& (0xff << CP0VPECo_TargTC
);
2219 T0
= env
->ACX
[PARAM1
][other_tc
];
2223 void op_mttdsp(void)
2225 int other_tc
= env
->CP0_VPEControl
& (0xff << CP0VPECo_TargTC
);
2227 T0
= env
->DSPControl
[other_tc
];
2268 // TODO: store to TC register
2275 /* No scheduling policy implemented. */
2277 if (env
->CP0_VPEControl
& (1 << CP0VPECo_YSI
) &&
2278 env
->CP0_TCStatus
[env
->current_tc
] & (1 << CP0TCSt_DT
)) {
2279 env
->CP0_VPEControl
&= ~(0x7 << CP0VPECo_EXCPT
);
2280 env
->CP0_VPEControl
|= 4 << CP0VPECo_EXCPT
;
2281 CALL_FROM_TB1(do_raise_exception
, EXCP_THREAD
);
2284 } else if (T0
== 0) {
2285 if (0 /* TODO: TC underflow */) {
2286 env
->CP0_VPEControl
&= ~(0x7 << CP0VPECo_EXCPT
);
2287 CALL_FROM_TB1(do_raise_exception
, EXCP_THREAD
);
2289 // TODO: Deallocate TC
2291 } else if (T0
> 0) {
2292 /* Yield qualifier inputs not implemented. */
2293 env
->CP0_VPEControl
&= ~(0x7 << CP0VPECo_EXCPT
);
2294 env
->CP0_VPEControl
|= 2 << CP0VPECo_EXCPT
;
2295 CALL_FROM_TB1(do_raise_exception
, EXCP_THREAD
);
2297 T0
= env
->CP0_YQMask
;
2303 # define DEBUG_FPU_STATE() CALL_FROM_TB1(dump_fpu, env)
2305 # define DEBUG_FPU_STATE() do { } while(0)
2310 CALL_FROM_TB1(do_cfc1
, PARAM1
);
2317 CALL_FROM_TB1(do_ctc1
, PARAM1
);
2336 void op_dmfc1 (void)
2343 void op_dmtc1 (void)
2350 void op_mfhc1 (void)
2357 void op_mthc1 (void)
2365 Single precition routines have a "s" suffix, double precision a
2366 "d" suffix, 32bit integer "w", 64bit integer "l", paired singe "ps",
2367 paired single lowwer "pl", paired single upper "pu". */
2369 #define FLOAT_OP(name, p) void OPPROTO op_float_##name##_##p(void)
2373 CALL_FROM_TB0(do_float_cvtd_s
);
2379 CALL_FROM_TB0(do_float_cvtd_w
);
2385 CALL_FROM_TB0(do_float_cvtd_l
);
2391 CALL_FROM_TB0(do_float_cvtl_d
);
2397 CALL_FROM_TB0(do_float_cvtl_s
);
2410 CALL_FROM_TB0(do_float_cvtps_pw
);
2416 CALL_FROM_TB0(do_float_cvtpw_ps
);
2422 CALL_FROM_TB0(do_float_cvts_d
);
2428 CALL_FROM_TB0(do_float_cvts_w
);
2434 CALL_FROM_TB0(do_float_cvts_l
);
2440 CALL_FROM_TB0(do_float_cvts_pl
);
2446 CALL_FROM_TB0(do_float_cvts_pu
);
2452 CALL_FROM_TB0(do_float_cvtw_s
);
2458 CALL_FROM_TB0(do_float_cvtw_d
);
2465 DT2
= ((uint64_t)WT0
<< 32) | WT1
;
2471 DT2
= ((uint64_t)WT0
<< 32) | WTH1
;
2477 DT2
= ((uint64_t)WTH0
<< 32) | WT1
;
2483 DT2
= ((uint64_t)WTH0
<< 32) | WTH1
;
2488 #define FLOAT_ROUNDOP(op, ttype, stype) \
2489 FLOAT_OP(op ## ttype, stype) \
2491 CALL_FROM_TB0(do_float_ ## op ## ttype ## _ ## stype); \
2492 DEBUG_FPU_STATE(); \
2496 FLOAT_ROUNDOP(round
, l
, d
)
2497 FLOAT_ROUNDOP(round
, l
, s
)
2498 FLOAT_ROUNDOP(round
, w
, d
)
2499 FLOAT_ROUNDOP(round
, w
, s
)
2501 FLOAT_ROUNDOP(trunc
, l
, d
)
2502 FLOAT_ROUNDOP(trunc
, l
, s
)
2503 FLOAT_ROUNDOP(trunc
, w
, d
)
2504 FLOAT_ROUNDOP(trunc
, w
, s
)
2506 FLOAT_ROUNDOP(ceil
, l
, d
)
2507 FLOAT_ROUNDOP(ceil
, l
, s
)
2508 FLOAT_ROUNDOP(ceil
, w
, d
)
2509 FLOAT_ROUNDOP(ceil
, w
, s
)
2511 FLOAT_ROUNDOP(floor
, l
, d
)
2512 FLOAT_ROUNDOP(floor
, l
, s
)
2513 FLOAT_ROUNDOP(floor
, w
, d
)
2514 FLOAT_ROUNDOP(floor
, w
, s
)
2515 #undef FLOAR_ROUNDOP
2519 if (!(env
->fpu
->fcr31
& PARAM1
))
2526 if (!(env
->fpu
->fcr31
& PARAM1
))
2533 if (!(env
->fpu
->fcr31
& PARAM1
)) {
2542 if (env
->fpu
->fcr31
& PARAM1
)
2549 if (env
->fpu
->fcr31
& PARAM1
)
2556 if (env
->fpu
->fcr31
& PARAM1
) {
2610 /* operations calling helpers, for s, d and ps */
2611 #define FLOAT_HOP(name) \
2614 CALL_FROM_TB0(do_float_ ## name ## _d); \
2615 DEBUG_FPU_STATE(); \
2620 CALL_FROM_TB0(do_float_ ## name ## _s); \
2621 DEBUG_FPU_STATE(); \
2624 FLOAT_OP(name, ps) \
2626 CALL_FROM_TB0(do_float_ ## name ## _ps); \
2627 DEBUG_FPU_STATE(); \
2640 /* operations calling helpers, for s and d */
2641 #define FLOAT_HOP(name) \
2644 CALL_FROM_TB0(do_float_ ## name ## _d); \
2645 DEBUG_FPU_STATE(); \
2650 CALL_FROM_TB0(do_float_ ## name ## _s); \
2651 DEBUG_FPU_STATE(); \
2658 /* operations calling helpers, for ps */
2659 #define FLOAT_HOP(name) \
2660 FLOAT_OP(name, ps) \
2662 CALL_FROM_TB0(do_float_ ## name ## _ps); \
2663 DEBUG_FPU_STATE(); \
2670 /* ternary operations */
2671 #define FLOAT_TERNOP(name1, name2) \
2672 FLOAT_OP(name1 ## name2, d) \
2674 FDT0 = float64_ ## name1 (FDT0, FDT1, &env->fpu->fp_status); \
2675 FDT2 = float64_ ## name2 (FDT0, FDT2, &env->fpu->fp_status); \
2676 DEBUG_FPU_STATE(); \
2679 FLOAT_OP(name1 ## name2, s) \
2681 FST0 = float32_ ## name1 (FST0, FST1, &env->fpu->fp_status); \
2682 FST2 = float32_ ## name2 (FST0, FST2, &env->fpu->fp_status); \
2683 DEBUG_FPU_STATE(); \
2686 FLOAT_OP(name1 ## name2, ps) \
2688 FST0 = float32_ ## name1 (FST0, FST1, &env->fpu->fp_status); \
2689 FSTH0 = float32_ ## name1 (FSTH0, FSTH1, &env->fpu->fp_status); \
2690 FST2 = float32_ ## name2 (FST0, FST2, &env->fpu->fp_status); \
2691 FSTH2 = float32_ ## name2 (FSTH0, FSTH2, &env->fpu->fp_status); \
2692 DEBUG_FPU_STATE(); \
2695 FLOAT_TERNOP(mul
, add
)
2696 FLOAT_TERNOP(mul
, sub
)
2699 /* negated ternary operations */
2700 #define FLOAT_NTERNOP(name1, name2) \
2701 FLOAT_OP(n ## name1 ## name2, d) \
2703 FDT0 = float64_ ## name1 (FDT0, FDT1, &env->fpu->fp_status); \
2704 FDT2 = float64_ ## name2 (FDT0, FDT2, &env->fpu->fp_status); \
2705 FDT2 ^= 1ULL << 63; \
2706 DEBUG_FPU_STATE(); \
2709 FLOAT_OP(n ## name1 ## name2, s) \
2711 FST0 = float32_ ## name1 (FST0, FST1, &env->fpu->fp_status); \
2712 FST2 = float32_ ## name2 (FST0, FST2, &env->fpu->fp_status); \
2714 DEBUG_FPU_STATE(); \
2717 FLOAT_OP(n ## name1 ## name2, ps) \
2719 FST0 = float32_ ## name1 (FST0, FST1, &env->fpu->fp_status); \
2720 FSTH0 = float32_ ## name1 (FSTH0, FSTH1, &env->fpu->fp_status); \
2721 FST2 = float32_ ## name2 (FST0, FST2, &env->fpu->fp_status); \
2722 FSTH2 = float32_ ## name2 (FSTH0, FSTH2, &env->fpu->fp_status); \
2725 DEBUG_FPU_STATE(); \
2728 FLOAT_NTERNOP(mul
, add
)
2729 FLOAT_NTERNOP(mul
, sub
)
2730 #undef FLOAT_NTERNOP
2732 /* unary operations, modifying fp status */
2733 #define FLOAT_UNOP(name) \
2736 FDT2 = float64_ ## name(FDT0, &env->fpu->fp_status); \
2737 DEBUG_FPU_STATE(); \
2742 FST2 = float32_ ## name(FST0, &env->fpu->fp_status); \
2743 DEBUG_FPU_STATE(); \
2749 /* unary operations, not modifying fp status */
2750 #define FLOAT_UNOP(name) \
2753 FDT2 = float64_ ## name(FDT0); \
2754 DEBUG_FPU_STATE(); \
2759 FST2 = float32_ ## name(FST0); \
2760 DEBUG_FPU_STATE(); \
2763 FLOAT_OP(name, ps) \
2765 FST2 = float32_ ## name(FST0); \
2766 FSTH2 = float32_ ## name(FSTH0); \
2767 DEBUG_FPU_STATE(); \
2801 #ifdef TARGET_WORDS_BIGENDIAN
2809 default: /* unpredictable */
2816 #ifdef CONFIG_SOFTFLOAT
2817 #define clear_invalid() do { \
2818 int flags = get_float_exception_flags(&env->fpu->fp_status); \
2819 flags &= ~float_flag_invalid; \
2820 set_float_exception_flags(flags, &env->fpu->fp_status); \
2823 #define clear_invalid() do { } while(0)
2826 extern void dump_fpu_s(CPUState
*env
);
2828 #define CMP_OP(fmt, op) \
2829 void OPPROTO op_cmp ## _ ## fmt ## _ ## op(void) \
2831 CALL_FROM_TB1(do_cmp ## _ ## fmt ## _ ## op, PARAM1); \
2832 DEBUG_FPU_STATE(); \
2835 void OPPROTO op_cmpabs ## _ ## fmt ## _ ## op(void) \
2837 CALL_FROM_TB1(do_cmpabs ## _ ## fmt ## _ ## op, PARAM1); \
2838 DEBUG_FPU_STATE(); \
2841 #define CMP_OPS(op) \
2867 T0
= !!(~GET_FP_COND(env
->fpu
) & (0x1 << PARAM1
));
2871 void op_bc1any2f (void)
2873 T0
= !!(~GET_FP_COND(env
->fpu
) & (0x3 << PARAM1
));
2877 void op_bc1any4f (void)
2879 T0
= !!(~GET_FP_COND(env
->fpu
) & (0xf << PARAM1
));
2886 T0
= !!(GET_FP_COND(env
->fpu
) & (0x1 << PARAM1
));
2890 void op_bc1any2t (void)
2892 T0
= !!(GET_FP_COND(env
->fpu
) & (0x3 << PARAM1
));
2896 void op_bc1any4t (void)
2898 T0
= !!(GET_FP_COND(env
->fpu
) & (0xf << PARAM1
));
2903 void op_tlbwi (void)
2905 CALL_FROM_TB0(env
->tlb
->do_tlbwi
);
2909 void op_tlbwr (void)
2911 CALL_FROM_TB0(env
->tlb
->do_tlbwr
);
2917 CALL_FROM_TB0(env
->tlb
->do_tlbp
);
2923 CALL_FROM_TB0(env
->tlb
->do_tlbr
);
2928 #if defined (CONFIG_USER_ONLY)
2929 void op_tls_value (void)
2931 T0
= env
->tls_value
;
2937 CALL_FROM_TB1(do_pmon
, PARAM1
);
2943 T0
= env
->CP0_Status
;
2944 env
->CP0_Status
= T0
& ~(1 << CP0St_IE
);
2945 CALL_FROM_TB1(cpu_mips_update_irq
, env
);
2951 T0
= env
->CP0_Status
;
2952 env
->CP0_Status
= T0
| (1 << CP0St_IE
);
2953 CALL_FROM_TB1(cpu_mips_update_irq
, env
);
2960 CALL_FROM_TB1(do_raise_exception
, EXCP_TRAP
);
2965 void op_debug (void)
2967 CALL_FROM_TB1(do_raise_exception
, EXCP_DEBUG
);
2971 void op_set_lladdr (void)
2973 env
->CP0_LLAddr
= T2
;
2977 void debug_pre_eret (void);
2978 void debug_post_eret (void);
2981 if (loglevel
& CPU_LOG_EXEC
)
2982 CALL_FROM_TB0(debug_pre_eret
);
2983 if (env
->CP0_Status
& (1 << CP0St_ERL
)) {
2984 env
->PC
[env
->current_tc
] = env
->CP0_ErrorEPC
;
2985 env
->CP0_Status
&= ~(1 << CP0St_ERL
);
2987 env
->PC
[env
->current_tc
] = env
->CP0_EPC
;
2988 env
->CP0_Status
&= ~(1 << CP0St_EXL
);
2990 CALL_FROM_TB1(compute_hflags
, env
);
2991 if (loglevel
& CPU_LOG_EXEC
)
2992 CALL_FROM_TB0(debug_post_eret
);
2993 env
->CP0_LLAddr
= 1;
2997 void op_deret (void)
2999 if (loglevel
& CPU_LOG_EXEC
)
3000 CALL_FROM_TB0(debug_pre_eret
);
3001 env
->PC
[env
->current_tc
] = env
->CP0_DEPC
;
3002 env
->hflags
&= MIPS_HFLAG_DM
;
3003 CALL_FROM_TB1(compute_hflags
, env
);
3004 if (loglevel
& CPU_LOG_EXEC
)
3005 CALL_FROM_TB0(debug_post_eret
);
3006 env
->CP0_LLAddr
= 1;
3010 void op_rdhwr_cpunum(void)
3012 if ((env
->hflags
& MIPS_HFLAG_CP0
) ||
3013 (env
->CP0_HWREna
& (1 << 0)))
3014 T0
= env
->CP0_EBase
& 0x3ff;
3016 CALL_FROM_TB1(do_raise_exception
, EXCP_RI
);
3020 void op_rdhwr_synci_step(void)
3022 if ((env
->hflags
& MIPS_HFLAG_CP0
) ||
3023 (env
->CP0_HWREna
& (1 << 1)))
3024 T0
= env
->SYNCI_Step
;
3026 CALL_FROM_TB1(do_raise_exception
, EXCP_RI
);
3030 void op_rdhwr_cc(void)
3032 if ((env
->hflags
& MIPS_HFLAG_CP0
) ||
3033 (env
->CP0_HWREna
& (1 << 2)))
3034 T0
= env
->CP0_Count
;
3036 CALL_FROM_TB1(do_raise_exception
, EXCP_RI
);
3040 void op_rdhwr_ccres(void)
3042 if ((env
->hflags
& MIPS_HFLAG_CP0
) ||
3043 (env
->CP0_HWREna
& (1 << 3)))
3046 CALL_FROM_TB1(do_raise_exception
, EXCP_RI
);
3050 void op_save_state (void)
3052 env
->hflags
= PARAM1
;
3056 void op_save_pc (void)
3058 env
->PC
[env
->current_tc
] = PARAM1
;
3062 #if defined(TARGET_MIPSN32) || defined(TARGET_MIPS64)
3063 void op_save_pc64 (void)
3065 env
->PC
[env
->current_tc
] = ((uint64_t)PARAM1
<< 32) | (uint32_t)PARAM2
;
3070 void op_interrupt_restart (void)
3072 if (!(env
->CP0_Status
& (1 << CP0St_EXL
)) &&
3073 !(env
->CP0_Status
& (1 << CP0St_ERL
)) &&
3074 !(env
->hflags
& MIPS_HFLAG_DM
) &&
3075 (env
->CP0_Status
& (1 << CP0St_IE
)) &&
3076 (env
->CP0_Status
& env
->CP0_Cause
& CP0Ca_IP_mask
)) {
3077 env
->CP0_Cause
&= ~(0x1f << CP0Ca_EC
);
3078 CALL_FROM_TB1(do_raise_exception
, EXCP_EXT_INTERRUPT
);
3083 void op_raise_exception (void)
3085 CALL_FROM_TB1(do_raise_exception
, PARAM1
);
3089 void op_raise_exception_err (void)
3091 CALL_FROM_TB2(do_raise_exception_err
, PARAM1
, PARAM2
);
3095 void op_exit_tb (void)
3104 CALL_FROM_TB1(do_raise_exception
, EXCP_HLT
);
3108 /* Bitfield operations. */
3111 unsigned int pos
= PARAM1
;
3112 unsigned int size
= PARAM2
;
3114 T0
= ((uint32_t)T1
>> pos
) & ((size
< 32) ? ((1 << size
) - 1) : ~0);
3120 unsigned int pos
= PARAM1
;
3121 unsigned int size
= PARAM2
;
3122 target_ulong mask
= ((size
< 32) ? ((1 << size
) - 1) : ~0) << pos
;
3124 T0
= (T0
& ~mask
) | (((uint32_t)T1
<< pos
) & mask
);
3130 T0
= ((T1
<< 8) & ~0x00FF00FF) | ((T1
>> 8) & 0x00FF00FF);
3134 #if defined(TARGET_MIPSN32) || defined(TARGET_MIPS64)
3137 unsigned int pos
= PARAM1
;
3138 unsigned int size
= PARAM2
;
3140 T0
= (T1
>> pos
) & ((size
< 32) ? ((1 << size
) - 1) : ~0);
3146 unsigned int pos
= PARAM1
;
3147 unsigned int size
= PARAM2
;
3148 target_ulong mask
= ((size
< 32) ? ((1 << size
) - 1) : ~0) << pos
;
3150 T0
= (T0
& ~mask
) | ((T1
<< pos
) & mask
);
3156 T0
= ((T1
<< 8) & ~0x00FF00FF00FF00FFULL
) | ((T1
>> 8) & 0x00FF00FF00FF00FFULL
);
3162 T0
= ((T1
<< 16) & ~0x0000FFFF0000FFFFULL
) | ((T1
>> 16) & 0x0000FFFF0000FFFFULL
);
3169 T0
= ((T1
& 0xFF) ^ 0x80) - 0x80;
3175 T0
= ((T1
& 0xFFFF) ^ 0x8000) - 0x8000;