1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
|
#define _GNU_SOURCE
#include <stdint.h>
#include <stdio.h>
#include <stdlib.h>
#include <math.h>
#include <string.h>
#include <signal.h>
#include <sys/types.h>
#include <unistd.h>
#include "os.h"
#include "debug.h"
#include "box64stack.h"
#include "x64emu.h"
#include "x64emu_private.h"
#include "x64run_private.h"
#include "x64primop.h"
#include "x64trace.h"
#include "x87emu_private.h"
#include "box64context.h"
#include "bridge.h"
#include "emit_signals.h"
#ifdef DYNAREC
#include "../dynarec/native_lock.h"
#endif
#include "modrm.h"
#include "x64compstrings.h"
#ifdef TEST_INTERPRETER
uintptr_t Test670F(x64test_t *test, rex_t rex, int rep, uintptr_t addr)
#else
uintptr_t Run670F(x64emu_t *emu, rex_t rex, int rep, uintptr_t addr)
#endif
{
(void)rep;
uint8_t opcode;
uint8_t nextop;
uint8_t tmp8u; (void)tmp8u;
int8_t tmp8s; (void)tmp8s;
int32_t tmp32s, tmp32s2; (void)tmp32s; (void)tmp32s2;
uint32_t tmp32u, tmp32u2; (void)tmp32u; (void)tmp32u2;
uint64_t tmp64u, tmp64u2; (void)tmp64u; (void)tmp64u2;
reg64_t *oped, *opgd; (void)oped; (void)opgd;
sse_regs_t *opex, *opgx, eax1; (void)eax1;
mmx87_regs_t *opem, *opgm, eam1; (void)opem; (void)opgm; (void)eam1;
#ifdef TEST_INTERPRETER
x64emu_t* emu = test->emu;
#endif
opcode = F8;
switch(opcode) {
case 0x11:
switch(rep) {
case 0: /* MOVUPS Ex,Gx */
nextop = F8;
GETEX32(0);
GETGX;
EX->u128 = GX->u128;
break;
default:
return 0;
}
break;
case 0x29: /* MOVAPS Ex,Gx */
nextop = F8;
GETEX32(0);
GETGX;
EX->q[0] = GX->q[0];
EX->q[1] = GX->q[1];
break;
case 0x2E:
// same for now
case 0x2F:
switch(rep) {
case 0: /* (U)COMISS Gx, Ex */
RESET_FLAGS(emu);
nextop = F8;
GETEX32(0);
GETGX;
if(isnan(GX->f[0]) || isnan(EX->f[0])) {
SET_FLAG(F_ZF); SET_FLAG(F_PF); SET_FLAG(F_CF);
} else if(isgreater(GX->f[0], EX->f[0])) {
CLEAR_FLAG(F_ZF); CLEAR_FLAG(F_PF); CLEAR_FLAG(F_CF);
} else if(isless(GX->f[0], EX->f[0])) {
CLEAR_FLAG(F_ZF); CLEAR_FLAG(F_PF); SET_FLAG(F_CF);
} else {
SET_FLAG(F_ZF); CLEAR_FLAG(F_PF); CLEAR_FLAG(F_CF);
}
CLEAR_FLAG(F_OF); CLEAR_FLAG(F_AF); CLEAR_FLAG(F_SF);
break;
default:
return 0;
}
break;
case 0x38: /* MAP 0F38 */
opcode = F8;
switch(opcode) {
case 0xF6:
switch(rep) {
case 2:
/* ADOX Gd, Rd */
nextop = F8;
GETED32(0);
GETGD;
CHECK_FLAGS(emu);
if(rex.w) {
if (ACCESS_FLAG(F_OF)) {
tmp64u = 1 + (GD->q[0] & 0xFFFFFFFF) + (ED->q[0] & 0xFFFFFFFF);
tmp64u2 = 1 + GD->q[0] + ED->q[0];
}
else {
tmp64u = (GD->q[0] & 0xFFFFFFFF) + (ED->q[0] & 0xFFFFFFFF);
tmp64u2 = GD->q[0] + ED->q[0];
}
tmp64u = (tmp64u >> 32) + (GD->q[0] >> 32) + (ED->q[0] >> 32);
CONDITIONAL_SET_FLAG(tmp64u & 0x100000000L, F_OF);
GD->q[0] = tmp64u2;
} else {
if (ACCESS_FLAG(F_OF))
GD->q[0] = 1LL + GD->dword[0] + ED->dword[0];
else
GD->q[0] = (uint64_t)GD->dword[0] + ED->dword[0];
CONDITIONAL_SET_FLAG(GD->q[0] & 0x100000000LL, F_OF);
}
break;
default:
return 0;
}
default:
return 0;
}
break;
case 0x6F:
switch(rep) {
case 0: /* MOVQ Gm, Em */
nextop = F8;
GETEM32(0);
GETGM;
GM->q = EM->q;
break;
case 2: /* MOVDQU Gx, Ex */
nextop = F8;
GETEX32(0);
GETGX;
memcpy(GX, EX, 16); // unaligned...
break;
default:
return 0;
}
break;
case 0x7F:
switch(rep) {
case 0: /* MOVQ Em, Gm */
nextop = F8;
GETEM32(0);
GETGM;
EM->q = GM->q;
break;
case 2: /* MOVDQU Ex, Gx */
nextop = F8;
GETEX32(0);
GETGX;
memcpy(EX, GX, 16);
break;
default:
return 0;
}
break;
case 0xB6: /* MOVZX Gd,Eb */
nextop = F8;
GETEB32(0);
GETGD;
GD->q[0] = EB->byte[0];
break;
case 0xB9:
switch(rep) {
case 0: /* UD1 Ed */
nextop = F8;
FAKEED32(0);
#ifndef TEST_INTERPRETER
EmitSignal(emu, SIGILL, (void*)R_RIP, 0);
#endif
break;
default:
return 0;
}
break;
case 0xB7: /* MOVZX Gd,Ew */
nextop = F8;
GETEW32(0);
GETGD;
GD->q[0] = EW->word[0];
break;
default:
return 0;
}
return addr;
}
|