translate.c 277.3 KB
Newer Older
B
bellard 已提交
1 2
/*
 *  i386 translation
3
 *
B
bellard 已提交
4 5 6 7 8 9 10 11 12 13 14 15 16
 *  Copyright (c) 2003 Fabrice Bellard
 *
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
 * version 2 of the License, or (at your option) any later version.
 *
 * This library is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
17
 * License along with this library; if not, see <http://www.gnu.org/licenses/>.
B
bellard 已提交
18 19 20 21 22 23 24 25
 */
#include <stdarg.h>
#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <inttypes.h>
#include <signal.h>

26
#include "qemu/host-utils.h"
B
bellard 已提交
27
#include "cpu.h"
28
#include "disas/disas.h"
B
bellard 已提交
29
#include "tcg-op.h"
B
bellard 已提交
30

P
pbrook 已提交
31 32 33 34
#include "helper.h"
#define GEN_HELPER 1
#include "helper.h"

B
bellard 已提交
35 36 37 38 39
#define PREFIX_REPZ   0x01
#define PREFIX_REPNZ  0x02
#define PREFIX_LOCK   0x04
#define PREFIX_DATA   0x08
#define PREFIX_ADR    0x10
40
#define PREFIX_VEX    0x20
B
bellard 已提交
41

B
bellard 已提交
42 43 44 45 46 47 48 49 50 51
#ifdef TARGET_X86_64
#define CODE64(s) ((s)->code64)
#define REX_X(s) ((s)->rex_x)
#define REX_B(s) ((s)->rex_b)
#else
#define CODE64(s) 0
#define REX_X(s) 0
#define REX_B(s) 0
#endif

52 53 54 55 56 57 58 59
#ifdef TARGET_X86_64
# define ctztl  ctz64
# define clztl  clz64
#else
# define ctztl  ctz32
# define clztl  clz32
#endif

B
bellard 已提交
60 61 62
//#define MACRO_TEST   1

/* global register indexes */
P
pbrook 已提交
63
static TCGv_ptr cpu_env;
64
static TCGv cpu_A0;
65
static TCGv cpu_cc_dst, cpu_cc_src, cpu_cc_src2, cpu_cc_srcT;
P
pbrook 已提交
66
static TCGv_i32 cpu_cc_op;
67
static TCGv cpu_regs[CPU_NB_REGS];
68
/* local temps */
P
Paolo Bonzini 已提交
69
static TCGv cpu_T[2];
B
bellard 已提交
70
/* local register indexes (only used inside old micro ops) */
P
pbrook 已提交
71 72 73 74
static TCGv cpu_tmp0, cpu_tmp4;
static TCGv_ptr cpu_ptr0, cpu_ptr1;
static TCGv_i32 cpu_tmp2_i32, cpu_tmp3_i32;
static TCGv_i64 cpu_tmp1_i64;
B
bellard 已提交
75

76 77
static uint8_t gen_opc_cc_op[OPC_BUF_SIZE];

78
#include "exec/gen-icount.h"
P
pbrook 已提交
79

B
bellard 已提交
80 81
#ifdef TARGET_X86_64
static int x86_64_hregs;
B
bellard 已提交
82 83
#endif

B
bellard 已提交
84 85 86 87 88
typedef struct DisasContext {
    /* current insn context */
    int override; /* -1 if no override */
    int prefix;
    int aflag, dflag;
B
bellard 已提交
89
    target_ulong pc; /* pc = eip + cs_base */
B
bellard 已提交
90 91 92
    int is_jmp; /* 1 = means jump (stop translation), 2 means CPU
                   static state change (stop translation) */
    /* current block context */
B
bellard 已提交
93
    target_ulong cs_base; /* base of CS segment */
B
bellard 已提交
94 95
    int pe;     /* protected mode */
    int code32; /* 32 bit code segment */
B
bellard 已提交
96 97 98 99 100
#ifdef TARGET_X86_64
    int lma;    /* long mode active */
    int code64; /* 64 bit code segment */
    int rex_x, rex_b;
#endif
101 102
    int vex_l;  /* vex vector length */
    int vex_v;  /* vex vvvv register, without 1's compliment.  */
B
bellard 已提交
103
    int ss32;   /* 32 bit stack segment */
104
    CCOp cc_op;  /* current CC operation */
105
    bool cc_op_dirty;
B
bellard 已提交
106 107 108 109 110 111
    int addseg; /* non zero if either DS/ES/SS have a non zero base */
    int f_st;   /* currently unused */
    int vm86;   /* vm86 mode */
    int cpl;
    int iopl;
    int tf;     /* TF cpu flag */
112
    int singlestep_enabled; /* "hardware" single step enabled */
B
bellard 已提交
113 114
    int jmp_opt; /* use direct block chaining for direct jumps */
    int mem_index; /* select memory access functions */
115
    uint64_t flags; /* all execution flags */
B
bellard 已提交
116 117
    struct TranslationBlock *tb;
    int popl_esp_hack; /* for correct popl with esp base handling */
B
bellard 已提交
118 119
    int rip_offset; /* only used in x86_64, but left for simplicity */
    int cpuid_features;
B
bellard 已提交
120
    int cpuid_ext_features;
121
    int cpuid_ext2_features;
B
bellard 已提交
122
    int cpuid_ext3_features;
H
H. Peter Anvin 已提交
123
    int cpuid_7_0_ebx_features;
B
bellard 已提交
124 125 126
} DisasContext;

static void gen_eob(DisasContext *s);
B
bellard 已提交
127 128
static void gen_jmp(DisasContext *s, target_ulong eip);
static void gen_jmp_tb(DisasContext *s, target_ulong eip, int tb_num);
129
static void gen_op(DisasContext *s1, int op, int ot, int d);
B
bellard 已提交
130 131 132

/* i386 arith/logic operations */
enum {
133 134 135
    OP_ADDL,
    OP_ORL,
    OP_ADCL,
B
bellard 已提交
136
    OP_SBBL,
137 138 139
    OP_ANDL,
    OP_SUBL,
    OP_XORL,
B
bellard 已提交
140 141 142 143 144
    OP_CMPL,
};

/* i386 shift ops */
enum {
145 146 147 148 149 150
    OP_ROL,
    OP_ROR,
    OP_RCL,
    OP_RCR,
    OP_SHL,
    OP_SHR,
B
bellard 已提交
151 152 153 154
    OP_SHL1, /* undocumented */
    OP_SAR = 7,
};

155 156 157 158 159 160 161 162 163 164 165
enum {
    JCC_O,
    JCC_B,
    JCC_Z,
    JCC_BE,
    JCC_S,
    JCC_P,
    JCC_L,
    JCC_LE,
};

B
bellard 已提交
166 167 168 169 170 171 172 173 174 175
enum {
    /* I386 int registers */
    OR_EAX,   /* MUST be even numbered */
    OR_ECX,
    OR_EDX,
    OR_EBX,
    OR_ESP,
    OR_EBP,
    OR_ESI,
    OR_EDI,
B
bellard 已提交
176 177

    OR_TMP0 = 16,    /* temporary operand register */
B
bellard 已提交
178 179 180 181
    OR_TMP1,
    OR_A0, /* temporary register used when doing address evaluation */
};

182
enum {
183 184
    USES_CC_DST  = 1,
    USES_CC_SRC  = 2,
185 186
    USES_CC_SRC2 = 4,
    USES_CC_SRCT = 8,
187 188 189 190
};

/* Bit set if the global variable is live after setting CC_OP to X.  */
static const uint8_t cc_op_live[CC_OP_NB] = {
191
    [CC_OP_DYNAMIC] = USES_CC_DST | USES_CC_SRC | USES_CC_SRC2,
192 193 194
    [CC_OP_EFLAGS] = USES_CC_SRC,
    [CC_OP_MULB ... CC_OP_MULQ] = USES_CC_DST | USES_CC_SRC,
    [CC_OP_ADDB ... CC_OP_ADDQ] = USES_CC_DST | USES_CC_SRC,
195
    [CC_OP_ADCB ... CC_OP_ADCQ] = USES_CC_DST | USES_CC_SRC | USES_CC_SRC2,
196
    [CC_OP_SUBB ... CC_OP_SUBQ] = USES_CC_DST | USES_CC_SRC | USES_CC_SRCT,
197
    [CC_OP_SBBB ... CC_OP_SBBQ] = USES_CC_DST | USES_CC_SRC | USES_CC_SRC2,
198 199 200 201 202
    [CC_OP_LOGICB ... CC_OP_LOGICQ] = USES_CC_DST,
    [CC_OP_INCB ... CC_OP_INCQ] = USES_CC_DST | USES_CC_SRC,
    [CC_OP_DECB ... CC_OP_DECQ] = USES_CC_DST | USES_CC_SRC,
    [CC_OP_SHLB ... CC_OP_SHLQ] = USES_CC_DST | USES_CC_SRC,
    [CC_OP_SARB ... CC_OP_SARQ] = USES_CC_DST | USES_CC_SRC,
203
    [CC_OP_BMILGB ... CC_OP_BMILGQ] = USES_CC_DST | USES_CC_SRC,
204 205 206
    [CC_OP_ADCX] = USES_CC_DST | USES_CC_SRC,
    [CC_OP_ADOX] = USES_CC_SRC | USES_CC_SRC2,
    [CC_OP_ADCOX] = USES_CC_DST | USES_CC_SRC | USES_CC_SRC2,
R
Richard Henderson 已提交
207
    [CC_OP_CLR] = 0,
208 209
};

210
static void set_cc_op(DisasContext *s, CCOp op)
211
{
212 213 214 215 216 217 218 219 220 221
    int dead;

    if (s->cc_op == op) {
        return;
    }

    /* Discard CC computation that will no longer be used.  */
    dead = cc_op_live[s->cc_op] & ~cc_op_live[op];
    if (dead & USES_CC_DST) {
        tcg_gen_discard_tl(cpu_cc_dst);
222
    }
223 224 225
    if (dead & USES_CC_SRC) {
        tcg_gen_discard_tl(cpu_cc_src);
    }
226 227 228
    if (dead & USES_CC_SRC2) {
        tcg_gen_discard_tl(cpu_cc_src2);
    }
229 230 231
    if (dead & USES_CC_SRCT) {
        tcg_gen_discard_tl(cpu_cc_srcT);
    }
232

233 234 235 236 237 238 239 240 241 242 243
    if (op == CC_OP_DYNAMIC) {
        /* The DYNAMIC setting is translator only, and should never be
           stored.  Thus we always consider it clean.  */
        s->cc_op_dirty = false;
    } else {
        /* Discard any computed CC_OP value (see shifts).  */
        if (s->cc_op == CC_OP_DYNAMIC) {
            tcg_gen_discard_i32(cpu_cc_op);
        }
        s->cc_op_dirty = true;
    }
244
    s->cc_op = op;
245 246 247 248 249
}

static void gen_update_cc_op(DisasContext *s)
{
    if (s->cc_op_dirty) {
250
        tcg_gen_movi_i32(cpu_cc_op, s->cc_op);
251 252
        s->cc_op_dirty = false;
    }
253 254
}

B
bellard 已提交
255 256 257 258 259 260 261 262 263 264
#ifdef TARGET_X86_64

#define NB_OP_SIZES 4

#else /* !TARGET_X86_64 */

#define NB_OP_SIZES 3

#endif /* !TARGET_X86_64 */

265
#if defined(HOST_WORDS_BIGENDIAN)
B
bellard 已提交
266 267 268 269 270
#define REG_B_OFFSET (sizeof(target_ulong) - 1)
#define REG_H_OFFSET (sizeof(target_ulong) - 2)
#define REG_W_OFFSET (sizeof(target_ulong) - 2)
#define REG_L_OFFSET (sizeof(target_ulong) - 4)
#define REG_LH_OFFSET (sizeof(target_ulong) - 8)
B
bellard 已提交
271
#else
B
bellard 已提交
272 273 274 275 276
#define REG_B_OFFSET 0
#define REG_H_OFFSET 1
#define REG_W_OFFSET 0
#define REG_L_OFFSET 0
#define REG_LH_OFFSET 4
B
bellard 已提交
277
#endif
B
bellard 已提交
278

279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297
/* In instruction encodings for byte register accesses the
 * register number usually indicates "low 8 bits of register N";
 * however there are some special cases where N 4..7 indicates
 * [AH, CH, DH, BH], ie "bits 15..8 of register N-4". Return
 * true for this special case, false otherwise.
 */
static inline bool byte_reg_is_xH(int reg)
{
    if (reg < 4) {
        return false;
    }
#ifdef TARGET_X86_64
    if (reg >= 8 || x86_64_hregs) {
        return false;
    }
#endif
    return true;
}

298
static inline void gen_op_mov_reg_v(int ot, int reg, TCGv t0)
B
bellard 已提交
299 300
{
    switch(ot) {
301
    case MO_8:
302
        if (!byte_reg_is_xH(reg)) {
303
            tcg_gen_deposit_tl(cpu_regs[reg], cpu_regs[reg], t0, 0, 8);
B
bellard 已提交
304
        } else {
305
            tcg_gen_deposit_tl(cpu_regs[reg - 4], cpu_regs[reg - 4], t0, 8, 8);
B
bellard 已提交
306 307
        }
        break;
308
    case MO_16:
309
        tcg_gen_deposit_tl(cpu_regs[reg], cpu_regs[reg], t0, 0, 16);
B
bellard 已提交
310
        break;
311
    default: /* XXX this shouldn't be reached;  abort? */
312
    case MO_32:
313 314 315
        /* For x86_64, this sets the higher half of register to zero.
           For i386, this is equivalent to a mov. */
        tcg_gen_ext32u_tl(cpu_regs[reg], t0);
B
bellard 已提交
316
        break;
317
#ifdef TARGET_X86_64
318
    case MO_64:
319
        tcg_gen_mov_tl(cpu_regs[reg], t0);
B
bellard 已提交
320
        break;
B
bellard 已提交
321
#endif
B
bellard 已提交
322 323
    }
}
B
bellard 已提交
324

B
bellard 已提交
325 326
static inline void gen_op_mov_reg_T0(int ot, int reg)
{
327
    gen_op_mov_reg_v(ot, reg, cpu_T[0]);
B
bellard 已提交
328 329 330 331
}

static inline void gen_op_mov_reg_T1(int ot, int reg)
{
332
    gen_op_mov_reg_v(ot, reg, cpu_T[1]);
B
bellard 已提交
333 334 335 336 337
}

static inline void gen_op_mov_reg_A0(int size, int reg)
{
    switch(size) {
338
    case MO_8:
339
        tcg_gen_deposit_tl(cpu_regs[reg], cpu_regs[reg], cpu_A0, 0, 16);
B
bellard 已提交
340
        break;
341
    default: /* XXX this shouldn't be reached;  abort? */
342
    case MO_16:
343 344 345
        /* For x86_64, this sets the higher half of register to zero.
           For i386, this is equivalent to a mov. */
        tcg_gen_ext32u_tl(cpu_regs[reg], cpu_A0);
B
bellard 已提交
346
        break;
347
#ifdef TARGET_X86_64
348
    case MO_32:
349
        tcg_gen_mov_tl(cpu_regs[reg], cpu_A0);
B
bellard 已提交
350
        break;
B
bellard 已提交
351
#endif
B
bellard 已提交
352 353 354
    }
}

355
static inline void gen_op_mov_v_reg(int ot, TCGv t0, int reg)
B
bellard 已提交
356
{
357
    if (ot == MO_8 && byte_reg_is_xH(reg)) {
358 359 360
        tcg_gen_shri_tl(t0, cpu_regs[reg - 4], 8);
        tcg_gen_ext8u_tl(t0, t0);
    } else {
361
        tcg_gen_mov_tl(t0, cpu_regs[reg]);
B
bellard 已提交
362 363 364
    }
}

365 366 367 368 369
static inline void gen_op_mov_TN_reg(int ot, int t_index, int reg)
{
    gen_op_mov_v_reg(ot, cpu_T[t_index], reg);
}

B
bellard 已提交
370 371
static inline void gen_op_movl_A0_reg(int reg)
{
372
    tcg_gen_mov_tl(cpu_A0, cpu_regs[reg]);
B
bellard 已提交
373 374 375 376 377
}

static inline void gen_op_addl_A0_im(int32_t val)
{
    tcg_gen_addi_tl(cpu_A0, cpu_A0, val);
B
bellard 已提交
378
#ifdef TARGET_X86_64
B
bellard 已提交
379
    tcg_gen_andi_tl(cpu_A0, cpu_A0, 0xffffffff);
B
bellard 已提交
380
#endif
B
bellard 已提交
381
}
B
bellard 已提交
382

B
bellard 已提交
383
#ifdef TARGET_X86_64
B
bellard 已提交
384 385 386 387
static inline void gen_op_addq_A0_im(int64_t val)
{
    tcg_gen_addi_tl(cpu_A0, cpu_A0, val);
}
B
bellard 已提交
388
#endif
B
bellard 已提交
389 390 391 392 393 394 395 396 397 398
    
static void gen_add_A0_im(DisasContext *s, int val)
{
#ifdef TARGET_X86_64
    if (CODE64(s))
        gen_op_addq_A0_im(val);
    else
#endif
        gen_op_addl_A0_im(val);
}
B
bellard 已提交
399

B
bellard 已提交
400
static inline void gen_op_addl_T0_T1(void)
B
bellard 已提交
401
{
B
bellard 已提交
402 403 404 405 406
    tcg_gen_add_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
}

static inline void gen_op_jmp_T0(void)
{
407
    tcg_gen_st_tl(cpu_T[0], cpu_env, offsetof(CPUX86State, eip));
B
bellard 已提交
408 409
}

410
static inline void gen_op_add_reg_im(int size, int reg, int32_t val)
B
bellard 已提交
411
{
412
    switch(size) {
413
    case MO_8:
414
        tcg_gen_addi_tl(cpu_tmp0, cpu_regs[reg], val);
415
        tcg_gen_deposit_tl(cpu_regs[reg], cpu_regs[reg], cpu_tmp0, 0, 16);
416
        break;
417
    case MO_16:
418 419 420 421 422
        tcg_gen_addi_tl(cpu_tmp0, cpu_regs[reg], val);
        /* For x86_64, this sets the higher half of register to zero.
           For i386, this is equivalent to a nop. */
        tcg_gen_ext32u_tl(cpu_tmp0, cpu_tmp0);
        tcg_gen_mov_tl(cpu_regs[reg], cpu_tmp0);
423 424
        break;
#ifdef TARGET_X86_64
425
    case MO_32:
426
        tcg_gen_addi_tl(cpu_regs[reg], cpu_regs[reg], val);
427 428 429
        break;
#endif
    }
B
bellard 已提交
430 431
}

432
static inline void gen_op_add_reg_T0(int size, int reg)
B
bellard 已提交
433
{
434
    switch(size) {
435
    case MO_8:
436
        tcg_gen_add_tl(cpu_tmp0, cpu_regs[reg], cpu_T[0]);
437
        tcg_gen_deposit_tl(cpu_regs[reg], cpu_regs[reg], cpu_tmp0, 0, 16);
438
        break;
439
    case MO_16:
440 441 442 443 444
        tcg_gen_add_tl(cpu_tmp0, cpu_regs[reg], cpu_T[0]);
        /* For x86_64, this sets the higher half of register to zero.
           For i386, this is equivalent to a nop. */
        tcg_gen_ext32u_tl(cpu_tmp0, cpu_tmp0);
        tcg_gen_mov_tl(cpu_regs[reg], cpu_tmp0);
445
        break;
B
bellard 已提交
446
#ifdef TARGET_X86_64
447
    case MO_32:
448
        tcg_gen_add_tl(cpu_regs[reg], cpu_regs[reg], cpu_T[0]);
449
        break;
B
bellard 已提交
450
#endif
451 452
    }
}
B
bellard 已提交
453 454 455

static inline void gen_op_addl_A0_reg_sN(int shift, int reg)
{
456 457
    tcg_gen_mov_tl(cpu_tmp0, cpu_regs[reg]);
    if (shift != 0)
B
bellard 已提交
458 459
        tcg_gen_shli_tl(cpu_tmp0, cpu_tmp0, shift);
    tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_tmp0);
460 461 462
    /* For x86_64, this sets the higher half of register to zero.
       For i386, this is equivalent to a nop. */
    tcg_gen_ext32u_tl(cpu_A0, cpu_A0);
B
bellard 已提交
463
}
B
bellard 已提交
464

B
bellard 已提交
465 466
static inline void gen_op_movl_A0_seg(int reg)
{
467
    tcg_gen_ld32u_tl(cpu_A0, cpu_env, offsetof(CPUX86State, segs[reg].base) + REG_L_OFFSET);
B
bellard 已提交
468
}
B
bellard 已提交
469

470
static inline void gen_op_addl_A0_seg(DisasContext *s, int reg)
B
bellard 已提交
471
{
472
    tcg_gen_ld_tl(cpu_tmp0, cpu_env, offsetof(CPUX86State, segs[reg].base));
B
bellard 已提交
473
#ifdef TARGET_X86_64
474 475 476 477 478 479 480 481 482
    if (CODE64(s)) {
        tcg_gen_andi_tl(cpu_A0, cpu_A0, 0xffffffff);
        tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_tmp0);
    } else {
        tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_tmp0);
        tcg_gen_andi_tl(cpu_A0, cpu_A0, 0xffffffff);
    }
#else
    tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_tmp0);
B
bellard 已提交
483 484
#endif
}
B
bellard 已提交
485

B
bellard 已提交
486
#ifdef TARGET_X86_64
B
bellard 已提交
487 488
static inline void gen_op_movq_A0_seg(int reg)
{
489
    tcg_gen_ld_tl(cpu_A0, cpu_env, offsetof(CPUX86State, segs[reg].base));
B
bellard 已提交
490
}
B
bellard 已提交
491

B
bellard 已提交
492 493
static inline void gen_op_addq_A0_seg(int reg)
{
494
    tcg_gen_ld_tl(cpu_tmp0, cpu_env, offsetof(CPUX86State, segs[reg].base));
B
bellard 已提交
495 496 497 498 499
    tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_tmp0);
}

static inline void gen_op_movq_A0_reg(int reg)
{
500
    tcg_gen_mov_tl(cpu_A0, cpu_regs[reg]);
B
bellard 已提交
501 502 503 504
}

static inline void gen_op_addq_A0_reg_sN(int shift, int reg)
{
505 506
    tcg_gen_mov_tl(cpu_tmp0, cpu_regs[reg]);
    if (shift != 0)
B
bellard 已提交
507 508 509
        tcg_gen_shli_tl(cpu_tmp0, cpu_tmp0, shift);
    tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_tmp0);
}
B
bellard 已提交
510 511
#endif

512
static inline void gen_op_ld_v(DisasContext *s, int idx, TCGv t0, TCGv a0)
B
bellard 已提交
513
{
514
    tcg_gen_qemu_ld_tl(t0, a0, s->mem_index, idx | MO_LE);
B
bellard 已提交
515
}
B
bellard 已提交
516

517
static inline void gen_op_st_v(DisasContext *s, int idx, TCGv t0, TCGv a0)
B
bellard 已提交
518
{
519
    tcg_gen_qemu_st_tl(t0, a0, s->mem_index, idx | MO_LE);
B
bellard 已提交
520
}
521

522 523 524
static inline void gen_op_st_rm_T0_A0(DisasContext *s, int idx, int d)
{
    if (d == OR_TMP0) {
525
        gen_op_st_v(s, idx, cpu_T[0], cpu_A0);
526 527 528 529 530
    } else {
        gen_op_mov_reg_T0(idx, d);
    }
}

B
bellard 已提交
531 532
static inline void gen_jmp_im(target_ulong pc)
{
B
bellard 已提交
533
    tcg_gen_movi_tl(cpu_tmp0, pc);
534
    tcg_gen_st_tl(cpu_tmp0, cpu_env, offsetof(CPUX86State, eip));
B
bellard 已提交
535 536
}

B
bellard 已提交
537 538 539 540 541
static inline void gen_string_movl_A0_ESI(DisasContext *s)
{
    int override;

    override = s->override;
B
bellard 已提交
542 543 544
#ifdef TARGET_X86_64
    if (s->aflag == 2) {
        if (override >= 0) {
B
bellard 已提交
545 546
            gen_op_movq_A0_seg(override);
            gen_op_addq_A0_reg_sN(0, R_ESI);
B
bellard 已提交
547
        } else {
B
bellard 已提交
548
            gen_op_movq_A0_reg(R_ESI);
B
bellard 已提交
549 550 551
        }
    } else
#endif
B
bellard 已提交
552 553 554 555 556
    if (s->aflag) {
        /* 32 bit address */
        if (s->addseg && override < 0)
            override = R_DS;
        if (override >= 0) {
B
bellard 已提交
557 558
            gen_op_movl_A0_seg(override);
            gen_op_addl_A0_reg_sN(0, R_ESI);
B
bellard 已提交
559
        } else {
B
bellard 已提交
560
            gen_op_movl_A0_reg(R_ESI);
B
bellard 已提交
561 562 563 564 565
        }
    } else {
        /* 16 address, always override */
        if (override < 0)
            override = R_DS;
566
        tcg_gen_ext16u_tl(cpu_A0, cpu_regs[R_ESI]);
567
        gen_op_addl_A0_seg(s, override);
B
bellard 已提交
568 569 570 571 572
    }
}

static inline void gen_string_movl_A0_EDI(DisasContext *s)
{
B
bellard 已提交
573 574
#ifdef TARGET_X86_64
    if (s->aflag == 2) {
B
bellard 已提交
575
        gen_op_movq_A0_reg(R_EDI);
B
bellard 已提交
576 577
    } else
#endif
B
bellard 已提交
578 579
    if (s->aflag) {
        if (s->addseg) {
B
bellard 已提交
580 581
            gen_op_movl_A0_seg(R_ES);
            gen_op_addl_A0_reg_sN(0, R_EDI);
B
bellard 已提交
582
        } else {
B
bellard 已提交
583
            gen_op_movl_A0_reg(R_EDI);
B
bellard 已提交
584 585
        }
    } else {
586
        tcg_gen_ext16u_tl(cpu_A0, cpu_regs[R_EDI]);
587
        gen_op_addl_A0_seg(s, R_ES);
B
bellard 已提交
588 589 590
    }
}

591 592
static inline void gen_op_movl_T0_Dshift(int ot) 
{
593
    tcg_gen_ld32s_tl(cpu_T[0], cpu_env, offsetof(CPUX86State, df));
594
    tcg_gen_shli_tl(cpu_T[0], cpu_T[0], ot);
B
bellard 已提交
595 596
};

597
static TCGv gen_ext_tl(TCGv dst, TCGv src, int size, bool sign)
598
{
599
    switch (size) {
600
    case MO_8:
601 602 603 604 605 606
        if (sign) {
            tcg_gen_ext8s_tl(dst, src);
        } else {
            tcg_gen_ext8u_tl(dst, src);
        }
        return dst;
607
    case MO_16:
608 609 610 611 612 613 614
        if (sign) {
            tcg_gen_ext16s_tl(dst, src);
        } else {
            tcg_gen_ext16u_tl(dst, src);
        }
        return dst;
#ifdef TARGET_X86_64
615
    case MO_32:
616 617 618 619 620 621 622
        if (sign) {
            tcg_gen_ext32s_tl(dst, src);
        } else {
            tcg_gen_ext32u_tl(dst, src);
        }
        return dst;
#endif
623
    default:
624
        return src;
625 626
    }
}
627

628 629 630 631 632
static void gen_extu(int ot, TCGv reg)
{
    gen_ext_tl(reg, reg, ot, false);
}

633 634
static void gen_exts(int ot, TCGv reg)
{
635
    gen_ext_tl(reg, reg, ot, true);
636
}
B
bellard 已提交
637

638 639
static inline void gen_op_jnz_ecx(int size, int label1)
{
640
    tcg_gen_mov_tl(cpu_tmp0, cpu_regs[R_ECX]);
641
    gen_extu(size + 1, cpu_tmp0);
P
pbrook 已提交
642
    tcg_gen_brcondi_tl(TCG_COND_NE, cpu_tmp0, 0, label1);
643 644 645 646
}

static inline void gen_op_jz_ecx(int size, int label1)
{
647
    tcg_gen_mov_tl(cpu_tmp0, cpu_regs[R_ECX]);
648
    gen_extu(size + 1, cpu_tmp0);
P
pbrook 已提交
649
    tcg_gen_brcondi_tl(TCG_COND_EQ, cpu_tmp0, 0, label1);
650
}
B
bellard 已提交
651

P
pbrook 已提交
652 653 654
static void gen_helper_in_func(int ot, TCGv v, TCGv_i32 n)
{
    switch (ot) {
655
    case MO_8:
656 657
        gen_helper_inb(v, n);
        break;
658
    case MO_16:
659 660
        gen_helper_inw(v, n);
        break;
661
    case MO_32:
662 663
        gen_helper_inl(v, n);
        break;
P
pbrook 已提交
664 665
    }
}
B
bellard 已提交
666

P
pbrook 已提交
667 668 669
static void gen_helper_out_func(int ot, TCGv_i32 v, TCGv_i32 n)
{
    switch (ot) {
670
    case MO_8:
671 672
        gen_helper_outb(v, n);
        break;
673
    case MO_16:
674 675
        gen_helper_outw(v, n);
        break;
676
    case MO_32:
677 678
        gen_helper_outl(v, n);
        break;
P
pbrook 已提交
679 680
    }
}
681

682 683
static void gen_check_io(DisasContext *s, int ot, target_ulong cur_eip,
                         uint32_t svm_flags)
684
{
685 686 687 688
    int state_saved;
    target_ulong next_eip;

    state_saved = 0;
689
    if (s->pe && (s->cpl > s->iopl || s->vm86)) {
690
        gen_update_cc_op(s);
B
bellard 已提交
691
        gen_jmp_im(cur_eip);
692
        state_saved = 1;
693
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
P
pbrook 已提交
694
        switch (ot) {
695
        case MO_8:
B
Blue Swirl 已提交
696 697
            gen_helper_check_iob(cpu_env, cpu_tmp2_i32);
            break;
698
        case MO_16:
B
Blue Swirl 已提交
699 700
            gen_helper_check_iow(cpu_env, cpu_tmp2_i32);
            break;
701
        case MO_32:
B
Blue Swirl 已提交
702 703
            gen_helper_check_iol(cpu_env, cpu_tmp2_i32);
            break;
P
pbrook 已提交
704
        }
705
    }
B
bellard 已提交
706
    if(s->flags & HF_SVMI_MASK) {
707
        if (!state_saved) {
708
            gen_update_cc_op(s);
709 710 711 712
            gen_jmp_im(cur_eip);
        }
        svm_flags |= (1 << (4 + ot));
        next_eip = s->pc - s->cs_base;
713
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
B
Blue Swirl 已提交
714 715
        gen_helper_svm_check_io(cpu_env, cpu_tmp2_i32,
                                tcg_const_i32(svm_flags),
P
pbrook 已提交
716
                                tcg_const_i32(next_eip - cur_eip));
717 718 719
    }
}

B
bellard 已提交
720 721 722
static inline void gen_movs(DisasContext *s, int ot)
{
    gen_string_movl_A0_ESI(s);
723
    gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
724
    gen_string_movl_A0_EDI(s);
725
    gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
726 727 728
    gen_op_movl_T0_Dshift(ot);
    gen_op_add_reg_T0(s->aflag, R_ESI);
    gen_op_add_reg_T0(s->aflag, R_EDI);
B
bellard 已提交
729 730
}

731 732 733 734 735 736 737 738 739 740 741
static void gen_op_update1_cc(void)
{
    tcg_gen_mov_tl(cpu_cc_dst, cpu_T[0]);
}

static void gen_op_update2_cc(void)
{
    tcg_gen_mov_tl(cpu_cc_src, cpu_T[1]);
    tcg_gen_mov_tl(cpu_cc_dst, cpu_T[0]);
}

742 743 744 745 746 747 748
static void gen_op_update3_cc(TCGv reg)
{
    tcg_gen_mov_tl(cpu_cc_src2, reg);
    tcg_gen_mov_tl(cpu_cc_src, cpu_T[1]);
    tcg_gen_mov_tl(cpu_cc_dst, cpu_T[0]);
}

749 750 751 752 753 754 755 756
static inline void gen_op_testl_T0_T1_cc(void)
{
    tcg_gen_and_tl(cpu_cc_dst, cpu_T[0], cpu_T[1]);
}

static void gen_op_update_neg_cc(void)
{
    tcg_gen_mov_tl(cpu_cc_dst, cpu_T[0]);
757 758
    tcg_gen_neg_tl(cpu_cc_src, cpu_T[0]);
    tcg_gen_movi_tl(cpu_cc_srcT, 0);
759 760
}

761 762
/* compute all eflags to cc_src */
static void gen_compute_eflags(DisasContext *s)
763
{
764
    TCGv zero, dst, src1, src2;
765 766
    int live, dead;

767 768 769
    if (s->cc_op == CC_OP_EFLAGS) {
        return;
    }
R
Richard Henderson 已提交
770 771 772 773 774
    if (s->cc_op == CC_OP_CLR) {
        tcg_gen_movi_tl(cpu_cc_src, CC_Z);
        set_cc_op(s, CC_OP_EFLAGS);
        return;
    }
775 776 777 778

    TCGV_UNUSED(zero);
    dst = cpu_cc_dst;
    src1 = cpu_cc_src;
779
    src2 = cpu_cc_src2;
780 781 782

    /* Take care to not read values that are not live.  */
    live = cc_op_live[s->cc_op] & ~USES_CC_SRCT;
783
    dead = live ^ (USES_CC_DST | USES_CC_SRC | USES_CC_SRC2);
784 785 786 787 788 789 790 791
    if (dead) {
        zero = tcg_const_tl(0);
        if (dead & USES_CC_DST) {
            dst = zero;
        }
        if (dead & USES_CC_SRC) {
            src1 = zero;
        }
792 793 794
        if (dead & USES_CC_SRC2) {
            src2 = zero;
        }
795 796
    }

797
    gen_update_cc_op(s);
798
    gen_helper_cc_compute_all(cpu_cc_src, dst, src1, src2, cpu_cc_op);
799
    set_cc_op(s, CC_OP_EFLAGS);
800 801 802 803

    if (dead) {
        tcg_temp_free(zero);
    }
804 805
}

806 807 808 809 810 811 812 813 814 815
typedef struct CCPrepare {
    TCGCond cond;
    TCGv reg;
    TCGv reg2;
    target_ulong imm;
    target_ulong mask;
    bool use_reg2;
    bool no_setcond;
} CCPrepare;

816
/* compute eflags.C to reg */
817
static CCPrepare gen_prepare_eflags_c(DisasContext *s, TCGv reg)
818 819
{
    TCGv t0, t1;
820
    int size, shift;
821 822 823

    switch (s->cc_op) {
    case CC_OP_SUBB ... CC_OP_SUBQ:
824
        /* (DATA_TYPE)CC_SRCT < (DATA_TYPE)CC_SRC */
825 826 827 828
        size = s->cc_op - CC_OP_SUBB;
        t1 = gen_ext_tl(cpu_tmp0, cpu_cc_src, size, false);
        /* If no temporary was used, be careful not to alias t1 and t0.  */
        t0 = TCGV_EQUAL(t1, cpu_cc_src) ? cpu_tmp0 : reg;
829
        tcg_gen_mov_tl(t0, cpu_cc_srcT);
830 831 832 833 834 835 836 837 838
        gen_extu(size, t0);
        goto add_sub;

    case CC_OP_ADDB ... CC_OP_ADDQ:
        /* (DATA_TYPE)CC_DST < (DATA_TYPE)CC_SRC */
        size = s->cc_op - CC_OP_ADDB;
        t1 = gen_ext_tl(cpu_tmp0, cpu_cc_src, size, false);
        t0 = gen_ext_tl(reg, cpu_cc_dst, size, false);
    add_sub:
839 840
        return (CCPrepare) { .cond = TCG_COND_LTU, .reg = t0,
                             .reg2 = t1, .mask = -1, .use_reg2 = true };
841 842

    case CC_OP_LOGICB ... CC_OP_LOGICQ:
R
Richard Henderson 已提交
843
    case CC_OP_CLR:
844
        return (CCPrepare) { .cond = TCG_COND_NEVER, .mask = -1 };
845 846 847

    case CC_OP_INCB ... CC_OP_INCQ:
    case CC_OP_DECB ... CC_OP_DECQ:
848 849
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                             .mask = -1, .no_setcond = true };
850 851 852 853

    case CC_OP_SHLB ... CC_OP_SHLQ:
        /* (CC_SRC >> (DATA_BITS - 1)) & 1 */
        size = s->cc_op - CC_OP_SHLB;
854 855 856
        shift = (8 << size) - 1;
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                             .mask = (target_ulong)1 << shift };
857 858

    case CC_OP_MULB ... CC_OP_MULQ:
859 860
        return (CCPrepare) { .cond = TCG_COND_NE,
                             .reg = cpu_cc_src, .mask = -1 };
861

862 863 864 865 866
    case CC_OP_BMILGB ... CC_OP_BMILGQ:
        size = s->cc_op - CC_OP_BMILGB;
        t0 = gen_ext_tl(reg, cpu_cc_src, size, false);
        return (CCPrepare) { .cond = TCG_COND_EQ, .reg = t0, .mask = -1 };

867 868 869 870 871
    case CC_OP_ADCX:
    case CC_OP_ADCOX:
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_dst,
                             .mask = -1, .no_setcond = true };

872 873 874
    case CC_OP_EFLAGS:
    case CC_OP_SARB ... CC_OP_SARQ:
        /* CC_SRC & 1 */
875 876
        return (CCPrepare) { .cond = TCG_COND_NE,
                             .reg = cpu_cc_src, .mask = CC_C };
877 878 879 880 881

    default:
       /* The need to compute only C from CC_OP_DYNAMIC is important
          in efficiently implementing e.g. INC at the start of a TB.  */
       gen_update_cc_op(s);
882 883
       gen_helper_cc_compute_c(reg, cpu_cc_dst, cpu_cc_src,
                               cpu_cc_src2, cpu_cc_op);
884 885
       return (CCPrepare) { .cond = TCG_COND_NE, .reg = reg,
                            .mask = -1, .no_setcond = true };
886 887 888
    }
}

889
/* compute eflags.P to reg */
890
static CCPrepare gen_prepare_eflags_p(DisasContext *s, TCGv reg)
891
{
892
    gen_compute_eflags(s);
893 894
    return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                         .mask = CC_P };
895 896 897
}

/* compute eflags.S to reg */
898
static CCPrepare gen_prepare_eflags_s(DisasContext *s, TCGv reg)
899
{
900 901 902 903 904
    switch (s->cc_op) {
    case CC_OP_DYNAMIC:
        gen_compute_eflags(s);
        /* FALLTHRU */
    case CC_OP_EFLAGS:
905 906 907
    case CC_OP_ADCX:
    case CC_OP_ADOX:
    case CC_OP_ADCOX:
908 909
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                             .mask = CC_S };
R
Richard Henderson 已提交
910 911
    case CC_OP_CLR:
        return (CCPrepare) { .cond = TCG_COND_NEVER, .mask = -1 };
912 913 914 915
    default:
        {
            int size = (s->cc_op - CC_OP_ADDB) & 3;
            TCGv t0 = gen_ext_tl(reg, cpu_cc_dst, size, true);
916
            return (CCPrepare) { .cond = TCG_COND_LT, .reg = t0, .mask = -1 };
917 918
        }
    }
919 920 921
}

/* compute eflags.O to reg */
922
static CCPrepare gen_prepare_eflags_o(DisasContext *s, TCGv reg)
923
{
924 925 926 927 928
    switch (s->cc_op) {
    case CC_OP_ADOX:
    case CC_OP_ADCOX:
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src2,
                             .mask = -1, .no_setcond = true };
R
Richard Henderson 已提交
929 930
    case CC_OP_CLR:
        return (CCPrepare) { .cond = TCG_COND_NEVER, .mask = -1 };
931 932 933 934 935
    default:
        gen_compute_eflags(s);
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                             .mask = CC_O };
    }
936 937 938
}

/* compute eflags.Z to reg */
939
static CCPrepare gen_prepare_eflags_z(DisasContext *s, TCGv reg)
940
{
941 942 943 944 945
    switch (s->cc_op) {
    case CC_OP_DYNAMIC:
        gen_compute_eflags(s);
        /* FALLTHRU */
    case CC_OP_EFLAGS:
946 947 948
    case CC_OP_ADCX:
    case CC_OP_ADOX:
    case CC_OP_ADCOX:
949 950
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                             .mask = CC_Z };
R
Richard Henderson 已提交
951 952
    case CC_OP_CLR:
        return (CCPrepare) { .cond = TCG_COND_ALWAYS, .mask = -1 };
953 954 955 956
    default:
        {
            int size = (s->cc_op - CC_OP_ADDB) & 3;
            TCGv t0 = gen_ext_tl(reg, cpu_cc_dst, size, false);
957
            return (CCPrepare) { .cond = TCG_COND_EQ, .reg = t0, .mask = -1 };
958
        }
959 960 961
    }
}

962 963
/* perform a conditional store into register 'reg' according to jump opcode
   value 'b'. In the fast case, T0 is guaranted not to be used. */
964
static CCPrepare gen_prepare_cc(DisasContext *s, int b, TCGv reg)
965
{
966
    int inv, jcc_op, size, cond;
967
    CCPrepare cc;
968 969 970
    TCGv t0;

    inv = b & 1;
971
    jcc_op = (b >> 1) & 7;
972 973

    switch (s->cc_op) {
974 975
    case CC_OP_SUBB ... CC_OP_SUBQ:
        /* We optimize relational operators for the cmp/jcc case.  */
976 977 978
        size = s->cc_op - CC_OP_SUBB;
        switch (jcc_op) {
        case JCC_BE:
979
            tcg_gen_mov_tl(cpu_tmp4, cpu_cc_srcT);
980 981
            gen_extu(size, cpu_tmp4);
            t0 = gen_ext_tl(cpu_tmp0, cpu_cc_src, size, false);
982 983
            cc = (CCPrepare) { .cond = TCG_COND_LEU, .reg = cpu_tmp4,
                               .reg2 = t0, .mask = -1, .use_reg2 = true };
984
            break;
985

986
        case JCC_L:
987
            cond = TCG_COND_LT;
988 989
            goto fast_jcc_l;
        case JCC_LE:
990
            cond = TCG_COND_LE;
991
        fast_jcc_l:
992
            tcg_gen_mov_tl(cpu_tmp4, cpu_cc_srcT);
993 994
            gen_exts(size, cpu_tmp4);
            t0 = gen_ext_tl(cpu_tmp0, cpu_cc_src, size, true);
995 996
            cc = (CCPrepare) { .cond = cond, .reg = cpu_tmp4,
                               .reg2 = t0, .mask = -1, .use_reg2 = true };
997
            break;
998

999
        default:
1000
            goto slow_jcc;
1001
        }
1002
        break;
1003

1004 1005
    default:
    slow_jcc:
1006 1007 1008 1009 1010 1011 1012 1013 1014 1015 1016 1017 1018 1019 1020 1021 1022 1023 1024 1025 1026 1027 1028 1029 1030 1031 1032 1033 1034 1035 1036 1037 1038 1039 1040 1041 1042 1043 1044 1045 1046 1047 1048 1049
        /* This actually generates good code for JC, JZ and JS.  */
        switch (jcc_op) {
        case JCC_O:
            cc = gen_prepare_eflags_o(s, reg);
            break;
        case JCC_B:
            cc = gen_prepare_eflags_c(s, reg);
            break;
        case JCC_Z:
            cc = gen_prepare_eflags_z(s, reg);
            break;
        case JCC_BE:
            gen_compute_eflags(s);
            cc = (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                               .mask = CC_Z | CC_C };
            break;
        case JCC_S:
            cc = gen_prepare_eflags_s(s, reg);
            break;
        case JCC_P:
            cc = gen_prepare_eflags_p(s, reg);
            break;
        case JCC_L:
            gen_compute_eflags(s);
            if (TCGV_EQUAL(reg, cpu_cc_src)) {
                reg = cpu_tmp0;
            }
            tcg_gen_shri_tl(reg, cpu_cc_src, 4); /* CC_O -> CC_S */
            tcg_gen_xor_tl(reg, reg, cpu_cc_src);
            cc = (CCPrepare) { .cond = TCG_COND_NE, .reg = reg,
                               .mask = CC_S };
            break;
        default:
        case JCC_LE:
            gen_compute_eflags(s);
            if (TCGV_EQUAL(reg, cpu_cc_src)) {
                reg = cpu_tmp0;
            }
            tcg_gen_shri_tl(reg, cpu_cc_src, 4); /* CC_O -> CC_S */
            tcg_gen_xor_tl(reg, reg, cpu_cc_src);
            cc = (CCPrepare) { .cond = TCG_COND_NE, .reg = reg,
                               .mask = CC_S | CC_Z };
            break;
        }
1050
        break;
1051
    }
1052 1053 1054 1055 1056

    if (inv) {
        cc.cond = tcg_invert_cond(cc.cond);
    }
    return cc;
1057 1058
}

1059 1060 1061 1062 1063 1064 1065 1066 1067 1068 1069 1070 1071 1072 1073 1074 1075 1076 1077 1078 1079 1080 1081 1082 1083 1084 1085 1086 1087 1088 1089 1090 1091 1092
static void gen_setcc1(DisasContext *s, int b, TCGv reg)
{
    CCPrepare cc = gen_prepare_cc(s, b, reg);

    if (cc.no_setcond) {
        if (cc.cond == TCG_COND_EQ) {
            tcg_gen_xori_tl(reg, cc.reg, 1);
        } else {
            tcg_gen_mov_tl(reg, cc.reg);
        }
        return;
    }

    if (cc.cond == TCG_COND_NE && !cc.use_reg2 && cc.imm == 0 &&
        cc.mask != 0 && (cc.mask & (cc.mask - 1)) == 0) {
        tcg_gen_shri_tl(reg, cc.reg, ctztl(cc.mask));
        tcg_gen_andi_tl(reg, reg, 1);
        return;
    }
    if (cc.mask != -1) {
        tcg_gen_andi_tl(reg, cc.reg, cc.mask);
        cc.reg = reg;
    }
    if (cc.use_reg2) {
        tcg_gen_setcond_tl(cc.cond, reg, cc.reg, cc.reg2);
    } else {
        tcg_gen_setcondi_tl(cc.cond, reg, cc.reg, cc.imm);
    }
}

static inline void gen_compute_eflags_c(DisasContext *s, TCGv reg)
{
    gen_setcc1(s, JCC_B << 1, reg);
}
1093

1094 1095
/* generate a conditional jump to label 'l1' according to jump opcode
   value 'b'. In the fast case, T0 is guaranted not to be used. */
1096 1097 1098 1099 1100 1101 1102 1103 1104 1105 1106 1107 1108 1109 1110 1111 1112 1113
static inline void gen_jcc1_noeob(DisasContext *s, int b, int l1)
{
    CCPrepare cc = gen_prepare_cc(s, b, cpu_T[0]);

    if (cc.mask != -1) {
        tcg_gen_andi_tl(cpu_T[0], cc.reg, cc.mask);
        cc.reg = cpu_T[0];
    }
    if (cc.use_reg2) {
        tcg_gen_brcond_tl(cc.cond, cc.reg, cc.reg2, l1);
    } else {
        tcg_gen_brcondi_tl(cc.cond, cc.reg, cc.imm, l1);
    }
}

/* Generate a conditional jump to label 'l1' according to jump opcode
   value 'b'. In the fast case, T0 is guaranted not to be used.
   A translation block must end soon.  */
1114
static inline void gen_jcc1(DisasContext *s, int b, int l1)
1115
{
1116
    CCPrepare cc = gen_prepare_cc(s, b, cpu_T[0]);
1117

1118
    gen_update_cc_op(s);
1119 1120 1121 1122
    if (cc.mask != -1) {
        tcg_gen_andi_tl(cpu_T[0], cc.reg, cc.mask);
        cc.reg = cpu_T[0];
    }
1123
    set_cc_op(s, CC_OP_DYNAMIC);
1124 1125 1126 1127
    if (cc.use_reg2) {
        tcg_gen_brcond_tl(cc.cond, cc.reg, cc.reg2, l1);
    } else {
        tcg_gen_brcondi_tl(cc.cond, cc.reg, cc.imm, l1);
1128 1129 1130
    }
}

B
bellard 已提交
1131 1132 1133
/* XXX: does not work with gdbstub "ice" single step - not a
   serious problem */
static int gen_jz_ecx_string(DisasContext *s, target_ulong next_eip)
B
bellard 已提交
1134
{
B
bellard 已提交
1135 1136 1137 1138
    int l1, l2;

    l1 = gen_new_label();
    l2 = gen_new_label();
1139
    gen_op_jnz_ecx(s->aflag, l1);
B
bellard 已提交
1140 1141 1142 1143
    gen_set_label(l2);
    gen_jmp_tb(s, next_eip, 1);
    gen_set_label(l1);
    return l2;
B
bellard 已提交
1144 1145 1146 1147
}

static inline void gen_stos(DisasContext *s, int ot)
{
1148
    gen_op_mov_TN_reg(MO_32, 0, R_EAX);
B
bellard 已提交
1149
    gen_string_movl_A0_EDI(s);
1150
    gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
1151 1152
    gen_op_movl_T0_Dshift(ot);
    gen_op_add_reg_T0(s->aflag, R_EDI);
B
bellard 已提交
1153 1154 1155 1156 1157
}

static inline void gen_lods(DisasContext *s, int ot)
{
    gen_string_movl_A0_ESI(s);
1158
    gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
1159
    gen_op_mov_reg_T0(ot, R_EAX);
1160 1161
    gen_op_movl_T0_Dshift(ot);
    gen_op_add_reg_T0(s->aflag, R_ESI);
B
bellard 已提交
1162 1163 1164 1165 1166
}

static inline void gen_scas(DisasContext *s, int ot)
{
    gen_string_movl_A0_EDI(s);
1167
    gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
1168
    gen_op(s, OP_CMPL, ot, R_EAX);
1169 1170
    gen_op_movl_T0_Dshift(ot);
    gen_op_add_reg_T0(s->aflag, R_EDI);
B
bellard 已提交
1171 1172 1173 1174 1175
}

static inline void gen_cmps(DisasContext *s, int ot)
{
    gen_string_movl_A0_EDI(s);
1176
    gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
1177 1178
    gen_string_movl_A0_ESI(s);
    gen_op(s, OP_CMPL, ot, OR_TMP0);
1179 1180 1181
    gen_op_movl_T0_Dshift(ot);
    gen_op_add_reg_T0(s->aflag, R_ESI);
    gen_op_add_reg_T0(s->aflag, R_EDI);
B
bellard 已提交
1182 1183 1184 1185
}

static inline void gen_ins(DisasContext *s, int ot)
{
P
pbrook 已提交
1186 1187
    if (use_icount)
        gen_io_start();
B
bellard 已提交
1188
    gen_string_movl_A0_EDI(s);
1189 1190
    /* Note: we must do this dummy write first to be restartable in
       case of page fault. */
1191
    tcg_gen_movi_tl(cpu_T[0], 0);
1192
    gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
1193
    tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_regs[R_EDX]);
1194
    tcg_gen_andi_i32(cpu_tmp2_i32, cpu_tmp2_i32, 0xffff);
P
pbrook 已提交
1195
    gen_helper_in_func(ot, cpu_T[0], cpu_tmp2_i32);
1196
    gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
1197 1198
    gen_op_movl_T0_Dshift(ot);
    gen_op_add_reg_T0(s->aflag, R_EDI);
P
pbrook 已提交
1199 1200
    if (use_icount)
        gen_io_end();
B
bellard 已提交
1201 1202 1203 1204
}

static inline void gen_outs(DisasContext *s, int ot)
{
P
pbrook 已提交
1205 1206
    if (use_icount)
        gen_io_start();
B
bellard 已提交
1207
    gen_string_movl_A0_ESI(s);
1208
    gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1209

1210
    tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_regs[R_EDX]);
1211 1212
    tcg_gen_andi_i32(cpu_tmp2_i32, cpu_tmp2_i32, 0xffff);
    tcg_gen_trunc_tl_i32(cpu_tmp3_i32, cpu_T[0]);
P
pbrook 已提交
1213
    gen_helper_out_func(ot, cpu_tmp2_i32, cpu_tmp3_i32);
1214

1215 1216
    gen_op_movl_T0_Dshift(ot);
    gen_op_add_reg_T0(s->aflag, R_ESI);
P
pbrook 已提交
1217 1218
    if (use_icount)
        gen_io_end();
B
bellard 已提交
1219 1220 1221 1222 1223 1224
}

/* same method as Valgrind : we generate jumps to current or next
   instruction */
#define GEN_REPZ(op)                                                          \
static inline void gen_repz_ ## op(DisasContext *s, int ot,                   \
B
bellard 已提交
1225
                                 target_ulong cur_eip, target_ulong next_eip) \
B
bellard 已提交
1226
{                                                                             \
B
bellard 已提交
1227
    int l2;\
B
bellard 已提交
1228
    gen_update_cc_op(s);                                                      \
B
bellard 已提交
1229
    l2 = gen_jz_ecx_string(s, next_eip);                                      \
B
bellard 已提交
1230
    gen_ ## op(s, ot);                                                        \
1231
    gen_op_add_reg_im(s->aflag, R_ECX, -1);                                   \
B
bellard 已提交
1232 1233 1234
    /* a loop would cause two single step exceptions if ECX = 1               \
       before rep string_insn */                                              \
    if (!s->jmp_opt)                                                          \
1235
        gen_op_jz_ecx(s->aflag, l2);                                          \
B
bellard 已提交
1236 1237 1238 1239 1240
    gen_jmp(s, cur_eip);                                                      \
}

#define GEN_REPZ2(op)                                                         \
static inline void gen_repz_ ## op(DisasContext *s, int ot,                   \
B
bellard 已提交
1241 1242
                                   target_ulong cur_eip,                      \
                                   target_ulong next_eip,                     \
B
bellard 已提交
1243 1244
                                   int nz)                                    \
{                                                                             \
B
bellard 已提交
1245
    int l2;\
B
bellard 已提交
1246
    gen_update_cc_op(s);                                                      \
B
bellard 已提交
1247
    l2 = gen_jz_ecx_string(s, next_eip);                                      \
B
bellard 已提交
1248
    gen_ ## op(s, ot);                                                        \
1249
    gen_op_add_reg_im(s->aflag, R_ECX, -1);                                   \
1250
    gen_update_cc_op(s);                                                      \
1251
    gen_jcc1(s, (JCC_Z << 1) | (nz ^ 1), l2);                                 \
B
bellard 已提交
1252
    if (!s->jmp_opt)                                                          \
1253
        gen_op_jz_ecx(s->aflag, l2);                                          \
B
bellard 已提交
1254 1255 1256 1257 1258 1259 1260 1261 1262 1263 1264
    gen_jmp(s, cur_eip);                                                      \
}

GEN_REPZ(movs)
GEN_REPZ(stos)
GEN_REPZ(lods)
GEN_REPZ(ins)
GEN_REPZ(outs)
GEN_REPZ2(scas)
GEN_REPZ2(cmps)

P
pbrook 已提交
1265 1266 1267
static void gen_helper_fp_arith_ST0_FT0(int op)
{
    switch (op) {
B
Blue Swirl 已提交
1268 1269 1270 1271 1272 1273 1274 1275 1276 1277 1278 1279 1280 1281 1282 1283 1284 1285 1286 1287 1288 1289 1290 1291
    case 0:
        gen_helper_fadd_ST0_FT0(cpu_env);
        break;
    case 1:
        gen_helper_fmul_ST0_FT0(cpu_env);
        break;
    case 2:
        gen_helper_fcom_ST0_FT0(cpu_env);
        break;
    case 3:
        gen_helper_fcom_ST0_FT0(cpu_env);
        break;
    case 4:
        gen_helper_fsub_ST0_FT0(cpu_env);
        break;
    case 5:
        gen_helper_fsubr_ST0_FT0(cpu_env);
        break;
    case 6:
        gen_helper_fdiv_ST0_FT0(cpu_env);
        break;
    case 7:
        gen_helper_fdivr_ST0_FT0(cpu_env);
        break;
P
pbrook 已提交
1292 1293
    }
}
B
bellard 已提交
1294 1295

/* NOTE the exception in "r" op ordering */
P
pbrook 已提交
1296 1297 1298 1299
static void gen_helper_fp_arith_STN_ST0(int op, int opreg)
{
    TCGv_i32 tmp = tcg_const_i32(opreg);
    switch (op) {
B
Blue Swirl 已提交
1300 1301 1302 1303 1304 1305 1306 1307 1308 1309 1310 1311 1312 1313 1314 1315 1316 1317
    case 0:
        gen_helper_fadd_STN_ST0(cpu_env, tmp);
        break;
    case 1:
        gen_helper_fmul_STN_ST0(cpu_env, tmp);
        break;
    case 4:
        gen_helper_fsubr_STN_ST0(cpu_env, tmp);
        break;
    case 5:
        gen_helper_fsub_STN_ST0(cpu_env, tmp);
        break;
    case 6:
        gen_helper_fdivr_STN_ST0(cpu_env, tmp);
        break;
    case 7:
        gen_helper_fdiv_STN_ST0(cpu_env, tmp);
        break;
P
pbrook 已提交
1318 1319
    }
}
B
bellard 已提交
1320 1321 1322 1323 1324

/* if d == OR_TMP0, it means memory operand (address in A0) */
static void gen_op(DisasContext *s1, int op, int ot, int d)
{
    if (d != OR_TMP0) {
B
bellard 已提交
1325
        gen_op_mov_TN_reg(ot, 0, d);
B
bellard 已提交
1326
    } else {
1327
        gen_op_ld_v(s1, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
1328 1329 1330
    }
    switch(op) {
    case OP_ADCL:
1331
        gen_compute_eflags_c(s1, cpu_tmp4);
B
bellard 已提交
1332 1333
        tcg_gen_add_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
        tcg_gen_add_tl(cpu_T[0], cpu_T[0], cpu_tmp4);
1334
        gen_op_st_rm_T0_A0(s1, ot, d);
1335 1336
        gen_op_update3_cc(cpu_tmp4);
        set_cc_op(s1, CC_OP_ADCB + ot);
B
bellard 已提交
1337
        break;
B
bellard 已提交
1338
    case OP_SBBL:
1339
        gen_compute_eflags_c(s1, cpu_tmp4);
B
bellard 已提交
1340 1341
        tcg_gen_sub_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
        tcg_gen_sub_tl(cpu_T[0], cpu_T[0], cpu_tmp4);
1342
        gen_op_st_rm_T0_A0(s1, ot, d);
1343 1344
        gen_op_update3_cc(cpu_tmp4);
        set_cc_op(s1, CC_OP_SBBB + ot);
B
bellard 已提交
1345
        break;
B
bellard 已提交
1346 1347
    case OP_ADDL:
        gen_op_addl_T0_T1();
1348
        gen_op_st_rm_T0_A0(s1, ot, d);
B
bellard 已提交
1349
        gen_op_update2_cc();
1350
        set_cc_op(s1, CC_OP_ADDB + ot);
B
bellard 已提交
1351 1352
        break;
    case OP_SUBL:
1353
        tcg_gen_mov_tl(cpu_cc_srcT, cpu_T[0]);
B
bellard 已提交
1354
        tcg_gen_sub_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1355
        gen_op_st_rm_T0_A0(s1, ot, d);
B
bellard 已提交
1356
        gen_op_update2_cc();
1357
        set_cc_op(s1, CC_OP_SUBB + ot);
B
bellard 已提交
1358 1359 1360
        break;
    default:
    case OP_ANDL:
B
bellard 已提交
1361
        tcg_gen_and_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1362
        gen_op_st_rm_T0_A0(s1, ot, d);
B
bellard 已提交
1363
        gen_op_update1_cc();
1364
        set_cc_op(s1, CC_OP_LOGICB + ot);
B
bellard 已提交
1365
        break;
B
bellard 已提交
1366
    case OP_ORL:
B
bellard 已提交
1367
        tcg_gen_or_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1368
        gen_op_st_rm_T0_A0(s1, ot, d);
B
bellard 已提交
1369
        gen_op_update1_cc();
1370
        set_cc_op(s1, CC_OP_LOGICB + ot);
B
bellard 已提交
1371
        break;
B
bellard 已提交
1372
    case OP_XORL:
B
bellard 已提交
1373
        tcg_gen_xor_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1374
        gen_op_st_rm_T0_A0(s1, ot, d);
B
bellard 已提交
1375
        gen_op_update1_cc();
1376
        set_cc_op(s1, CC_OP_LOGICB + ot);
B
bellard 已提交
1377 1378
        break;
    case OP_CMPL:
1379
        tcg_gen_mov_tl(cpu_cc_src, cpu_T[1]);
1380
        tcg_gen_mov_tl(cpu_cc_srcT, cpu_T[0]);
1381
        tcg_gen_sub_tl(cpu_cc_dst, cpu_T[0], cpu_T[1]);
1382
        set_cc_op(s1, CC_OP_SUBB + ot);
B
bellard 已提交
1383 1384
        break;
    }
1385 1386
}

B
bellard 已提交
1387 1388 1389
/* if d == OR_TMP0, it means memory operand (address in A0) */
static void gen_inc(DisasContext *s1, int ot, int d, int c)
{
1390
    if (d != OR_TMP0) {
B
bellard 已提交
1391
        gen_op_mov_TN_reg(ot, 0, d);
1392 1393 1394
    } else {
        gen_op_ld_v(s1, ot, cpu_T[0], cpu_A0);
    }
1395
    gen_compute_eflags_c(s1, cpu_cc_src);
B
bellard 已提交
1396
    if (c > 0) {
1397
        tcg_gen_addi_tl(cpu_T[0], cpu_T[0], 1);
1398
        set_cc_op(s1, CC_OP_INCB + ot);
B
bellard 已提交
1399
    } else {
1400
        tcg_gen_addi_tl(cpu_T[0], cpu_T[0], -1);
1401
        set_cc_op(s1, CC_OP_DECB + ot);
B
bellard 已提交
1402
    }
1403
    gen_op_st_rm_T0_A0(s1, ot, d);
B
bellard 已提交
1404
    tcg_gen_mov_tl(cpu_cc_dst, cpu_T[0]);
B
bellard 已提交
1405 1406
}

1407 1408 1409 1410 1411 1412 1413 1414 1415 1416 1417 1418 1419 1420 1421 1422 1423 1424 1425 1426 1427 1428 1429 1430 1431 1432 1433 1434 1435 1436 1437 1438 1439 1440 1441 1442 1443 1444 1445 1446 1447 1448 1449 1450 1451
static void gen_shift_flags(DisasContext *s, int ot, TCGv result, TCGv shm1,
                            TCGv count, bool is_right)
{
    TCGv_i32 z32, s32, oldop;
    TCGv z_tl;

    /* Store the results into the CC variables.  If we know that the
       variable must be dead, store unconditionally.  Otherwise we'll
       need to not disrupt the current contents.  */
    z_tl = tcg_const_tl(0);
    if (cc_op_live[s->cc_op] & USES_CC_DST) {
        tcg_gen_movcond_tl(TCG_COND_NE, cpu_cc_dst, count, z_tl,
                           result, cpu_cc_dst);
    } else {
        tcg_gen_mov_tl(cpu_cc_dst, result);
    }
    if (cc_op_live[s->cc_op] & USES_CC_SRC) {
        tcg_gen_movcond_tl(TCG_COND_NE, cpu_cc_src, count, z_tl,
                           shm1, cpu_cc_src);
    } else {
        tcg_gen_mov_tl(cpu_cc_src, shm1);
    }
    tcg_temp_free(z_tl);

    /* Get the two potential CC_OP values into temporaries.  */
    tcg_gen_movi_i32(cpu_tmp2_i32, (is_right ? CC_OP_SARB : CC_OP_SHLB) + ot);
    if (s->cc_op == CC_OP_DYNAMIC) {
        oldop = cpu_cc_op;
    } else {
        tcg_gen_movi_i32(cpu_tmp3_i32, s->cc_op);
        oldop = cpu_tmp3_i32;
    }

    /* Conditionally store the CC_OP value.  */
    z32 = tcg_const_i32(0);
    s32 = tcg_temp_new_i32();
    tcg_gen_trunc_tl_i32(s32, count);
    tcg_gen_movcond_i32(TCG_COND_NE, cpu_cc_op, s32, z32, cpu_tmp2_i32, oldop);
    tcg_temp_free_i32(z32);
    tcg_temp_free_i32(s32);

    /* The CC_OP value is no longer predictable.  */
    set_cc_op(s, CC_OP_DYNAMIC);
}

1452 1453
static void gen_shift_rm_T1(DisasContext *s, int ot, int op1, 
                            int is_right, int is_arith)
B
bellard 已提交
1454
{
1455
    target_ulong mask = (ot == MO_64 ? 0x3f : 0x1f);
1456

1457
    /* load */
1458
    if (op1 == OR_TMP0) {
1459
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1460
    } else {
1461
        gen_op_mov_TN_reg(ot, 0, op1);
1462
    }
1463

1464 1465
    tcg_gen_andi_tl(cpu_T[1], cpu_T[1], mask);
    tcg_gen_subi_tl(cpu_tmp0, cpu_T[1], 1);
1466 1467 1468

    if (is_right) {
        if (is_arith) {
B
bellard 已提交
1469
            gen_exts(ot, cpu_T[0]);
1470 1471
            tcg_gen_sar_tl(cpu_tmp0, cpu_T[0], cpu_tmp0);
            tcg_gen_sar_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1472
        } else {
B
bellard 已提交
1473
            gen_extu(ot, cpu_T[0]);
1474 1475
            tcg_gen_shr_tl(cpu_tmp0, cpu_T[0], cpu_tmp0);
            tcg_gen_shr_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1476 1477
        }
    } else {
1478 1479
        tcg_gen_shl_tl(cpu_tmp0, cpu_T[0], cpu_tmp0);
        tcg_gen_shl_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1480 1481 1482
    }

    /* store */
1483
    gen_op_st_rm_T0_A0(s, ot, op1);
1484

1485
    gen_shift_flags(s, ot, cpu_T[0], cpu_tmp0, cpu_T[1], is_right);
1486 1487
}

B
bellard 已提交
1488 1489 1490
static void gen_shift_rm_im(DisasContext *s, int ot, int op1, int op2,
                            int is_right, int is_arith)
{
1491
    int mask = (ot == MO_64 ? 0x3f : 0x1f);
B
bellard 已提交
1492 1493 1494

    /* load */
    if (op1 == OR_TMP0)
1495
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
1496 1497 1498 1499 1500 1501 1502 1503
    else
        gen_op_mov_TN_reg(ot, 0, op1);

    op2 &= mask;
    if (op2 != 0) {
        if (is_right) {
            if (is_arith) {
                gen_exts(ot, cpu_T[0]);
B
bellard 已提交
1504
                tcg_gen_sari_tl(cpu_tmp4, cpu_T[0], op2 - 1);
B
bellard 已提交
1505 1506 1507
                tcg_gen_sari_tl(cpu_T[0], cpu_T[0], op2);
            } else {
                gen_extu(ot, cpu_T[0]);
B
bellard 已提交
1508
                tcg_gen_shri_tl(cpu_tmp4, cpu_T[0], op2 - 1);
B
bellard 已提交
1509 1510 1511
                tcg_gen_shri_tl(cpu_T[0], cpu_T[0], op2);
            }
        } else {
B
bellard 已提交
1512
            tcg_gen_shli_tl(cpu_tmp4, cpu_T[0], op2 - 1);
B
bellard 已提交
1513 1514 1515 1516 1517
            tcg_gen_shli_tl(cpu_T[0], cpu_T[0], op2);
        }
    }

    /* store */
1518 1519
    gen_op_st_rm_T0_A0(s, ot, op1);

B
bellard 已提交
1520 1521
    /* update eflags if non zero shift */
    if (op2 != 0) {
B
bellard 已提交
1522
        tcg_gen_mov_tl(cpu_cc_src, cpu_tmp4);
B
bellard 已提交
1523
        tcg_gen_mov_tl(cpu_cc_dst, cpu_T[0]);
1524
        set_cc_op(s, (is_right ? CC_OP_SARB : CC_OP_SHLB) + ot);
B
bellard 已提交
1525 1526 1527
    }
}

1528 1529 1530 1531 1532 1533 1534 1535
static inline void tcg_gen_lshift(TCGv ret, TCGv arg1, target_long arg2)
{
    if (arg2 >= 0)
        tcg_gen_shli_tl(ret, arg1, arg2);
    else
        tcg_gen_shri_tl(ret, arg1, -arg2);
}

1536
static void gen_rot_rm_T1(DisasContext *s, int ot, int op1, int is_right)
1537
{
1538
    target_ulong mask = (ot == MO_64 ? 0x3f : 0x1f);
1539
    TCGv_i32 t0, t1;
1540 1541

    /* load */
1542
    if (op1 == OR_TMP0) {
1543
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1544
    } else {
1545
        gen_op_mov_TN_reg(ot, 0, op1);
1546
    }
1547

1548
    tcg_gen_andi_tl(cpu_T[1], cpu_T[1], mask);
1549

1550
    switch (ot) {
1551
    case MO_8:
1552 1553 1554 1555
        /* Replicate the 8-bit input so that a 32-bit rotate works.  */
        tcg_gen_ext8u_tl(cpu_T[0], cpu_T[0]);
        tcg_gen_muli_tl(cpu_T[0], cpu_T[0], 0x01010101);
        goto do_long;
1556
    case MO_16:
1557 1558 1559 1560 1561
        /* Replicate the 16-bit input so that a 32-bit rotate works.  */
        tcg_gen_deposit_tl(cpu_T[0], cpu_T[0], cpu_T[0], 16, 16);
        goto do_long;
    do_long:
#ifdef TARGET_X86_64
1562
    case MO_32:
1563 1564 1565 1566 1567 1568 1569 1570 1571 1572 1573 1574 1575 1576 1577 1578 1579
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
        tcg_gen_trunc_tl_i32(cpu_tmp3_i32, cpu_T[1]);
        if (is_right) {
            tcg_gen_rotr_i32(cpu_tmp2_i32, cpu_tmp2_i32, cpu_tmp3_i32);
        } else {
            tcg_gen_rotl_i32(cpu_tmp2_i32, cpu_tmp2_i32, cpu_tmp3_i32);
        }
        tcg_gen_extu_i32_tl(cpu_T[0], cpu_tmp2_i32);
        break;
#endif
    default:
        if (is_right) {
            tcg_gen_rotr_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
        } else {
            tcg_gen_rotl_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
        }
        break;
1580 1581 1582
    }

    /* store */
1583
    gen_op_st_rm_T0_A0(s, ot, op1);
1584

1585 1586
    /* We'll need the flags computed into CC_SRC.  */
    gen_compute_eflags(s);
1587

1588 1589 1590 1591
    /* The value that was "rotated out" is now present at the other end
       of the word.  Compute C into CC_DST and O into CC_SRC2.  Note that
       since we've computed the flags into CC_SRC, these variables are
       currently dead.  */
1592
    if (is_right) {
1593 1594
        tcg_gen_shri_tl(cpu_cc_src2, cpu_T[0], mask - 1);
        tcg_gen_shri_tl(cpu_cc_dst, cpu_T[0], mask);
P
Pavel Dovgaluk 已提交
1595
        tcg_gen_andi_tl(cpu_cc_dst, cpu_cc_dst, 1);
1596 1597 1598
    } else {
        tcg_gen_shri_tl(cpu_cc_src2, cpu_T[0], mask);
        tcg_gen_andi_tl(cpu_cc_dst, cpu_T[0], 1);
1599
    }
1600 1601 1602 1603 1604 1605 1606 1607 1608 1609 1610 1611 1612 1613 1614 1615 1616 1617 1618
    tcg_gen_andi_tl(cpu_cc_src2, cpu_cc_src2, 1);
    tcg_gen_xor_tl(cpu_cc_src2, cpu_cc_src2, cpu_cc_dst);

    /* Now conditionally store the new CC_OP value.  If the shift count
       is 0 we keep the CC_OP_EFLAGS setting so that only CC_SRC is live.
       Otherwise reuse CC_OP_ADCOX which have the C and O flags split out
       exactly as we computed above.  */
    t0 = tcg_const_i32(0);
    t1 = tcg_temp_new_i32();
    tcg_gen_trunc_tl_i32(t1, cpu_T[1]);
    tcg_gen_movi_i32(cpu_tmp2_i32, CC_OP_ADCOX); 
    tcg_gen_movi_i32(cpu_tmp3_i32, CC_OP_EFLAGS);
    tcg_gen_movcond_i32(TCG_COND_NE, cpu_cc_op, t1, t0,
                        cpu_tmp2_i32, cpu_tmp3_i32);
    tcg_temp_free_i32(t0);
    tcg_temp_free_i32(t1);

    /* The CC_OP value is no longer predictable.  */ 
    set_cc_op(s, CC_OP_DYNAMIC);
1619 1620
}

M
malc 已提交
1621 1622 1623
static void gen_rot_rm_im(DisasContext *s, int ot, int op1, int op2,
                          int is_right)
{
1624
    int mask = (ot == MO_64 ? 0x3f : 0x1f);
1625
    int shift;
M
malc 已提交
1626 1627 1628

    /* load */
    if (op1 == OR_TMP0) {
1629
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
M
malc 已提交
1630
    } else {
1631
        gen_op_mov_TN_reg(ot, 0, op1);
M
malc 已提交
1632 1633 1634 1635
    }

    op2 &= mask;
    if (op2 != 0) {
1636 1637
        switch (ot) {
#ifdef TARGET_X86_64
1638
        case MO_32:
1639 1640 1641 1642 1643 1644 1645 1646 1647 1648 1649 1650 1651 1652 1653 1654
            tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
            if (is_right) {
                tcg_gen_rotri_i32(cpu_tmp2_i32, cpu_tmp2_i32, op2);
            } else {
                tcg_gen_rotli_i32(cpu_tmp2_i32, cpu_tmp2_i32, op2);
            }
            tcg_gen_extu_i32_tl(cpu_T[0], cpu_tmp2_i32);
            break;
#endif
        default:
            if (is_right) {
                tcg_gen_rotri_tl(cpu_T[0], cpu_T[0], op2);
            } else {
                tcg_gen_rotli_tl(cpu_T[0], cpu_T[0], op2);
            }
            break;
1655
        case MO_8:
1656 1657
            mask = 7;
            goto do_shifts;
1658
        case MO_16:
1659 1660 1661 1662 1663 1664 1665 1666 1667 1668 1669
            mask = 15;
        do_shifts:
            shift = op2 & mask;
            if (is_right) {
                shift = mask + 1 - shift;
            }
            gen_extu(ot, cpu_T[0]);
            tcg_gen_shli_tl(cpu_tmp0, cpu_T[0], shift);
            tcg_gen_shri_tl(cpu_T[0], cpu_T[0], mask + 1 - shift);
            tcg_gen_or_tl(cpu_T[0], cpu_T[0], cpu_tmp0);
            break;
M
malc 已提交
1670 1671 1672 1673
        }
    }

    /* store */
1674
    gen_op_st_rm_T0_A0(s, ot, op1);
M
malc 已提交
1675 1676

    if (op2 != 0) {
1677
        /* Compute the flags into CC_SRC.  */
1678
        gen_compute_eflags(s);
1679

1680 1681 1682 1683
        /* The value that was "rotated out" is now present at the other end
           of the word.  Compute C into CC_DST and O into CC_SRC2.  Note that
           since we've computed the flags into CC_SRC, these variables are
           currently dead.  */
M
malc 已提交
1684
        if (is_right) {
1685 1686
            tcg_gen_shri_tl(cpu_cc_src2, cpu_T[0], mask - 1);
            tcg_gen_shri_tl(cpu_cc_dst, cpu_T[0], mask);
1687
            tcg_gen_andi_tl(cpu_cc_dst, cpu_cc_dst, 1);
1688 1689 1690
        } else {
            tcg_gen_shri_tl(cpu_cc_src2, cpu_T[0], mask);
            tcg_gen_andi_tl(cpu_cc_dst, cpu_T[0], 1);
M
malc 已提交
1691
        }
1692 1693 1694
        tcg_gen_andi_tl(cpu_cc_src2, cpu_cc_src2, 1);
        tcg_gen_xor_tl(cpu_cc_src2, cpu_cc_src2, cpu_cc_dst);
        set_cc_op(s, CC_OP_ADCOX);
M
malc 已提交
1695 1696 1697
    }
}

1698 1699 1700 1701
/* XXX: add faster immediate = 1 case */
static void gen_rotc_rm_T1(DisasContext *s, int ot, int op1, 
                           int is_right)
{
1702
    gen_compute_eflags(s);
1703
    assert(s->cc_op == CC_OP_EFLAGS);
1704 1705 1706

    /* load */
    if (op1 == OR_TMP0)
1707
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1708 1709 1710
    else
        gen_op_mov_TN_reg(ot, 0, op1);
    
P
pbrook 已提交
1711 1712
    if (is_right) {
        switch (ot) {
1713
        case MO_8:
1714 1715
            gen_helper_rcrb(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
1716
        case MO_16:
1717 1718
            gen_helper_rcrw(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
1719
        case MO_32:
1720 1721
            gen_helper_rcrl(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
P
pbrook 已提交
1722
#ifdef TARGET_X86_64
1723
        case MO_64:
1724 1725
            gen_helper_rcrq(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
P
pbrook 已提交
1726 1727 1728 1729
#endif
        }
    } else {
        switch (ot) {
1730
        case MO_8:
1731 1732
            gen_helper_rclb(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
1733
        case MO_16:
1734 1735
            gen_helper_rclw(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
1736
        case MO_32:
1737 1738
            gen_helper_rcll(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
P
pbrook 已提交
1739
#ifdef TARGET_X86_64
1740
        case MO_64:
1741 1742
            gen_helper_rclq(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
P
pbrook 已提交
1743 1744 1745
#endif
        }
    }
1746
    /* store */
1747
    gen_op_st_rm_T0_A0(s, ot, op1);
1748 1749 1750
}

/* XXX: add faster immediate case */
P
Paolo Bonzini 已提交
1751
static void gen_shiftd_rm_T1(DisasContext *s, int ot, int op1,
1752
                             bool is_right, TCGv count_in)
1753
{
1754
    target_ulong mask = (ot == MO_64 ? 63 : 31);
1755
    TCGv count;
1756 1757

    /* load */
1758
    if (op1 == OR_TMP0) {
1759
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1760
    } else {
1761
        gen_op_mov_TN_reg(ot, 0, op1);
1762
    }
1763

1764 1765
    count = tcg_temp_new();
    tcg_gen_andi_tl(count, count_in, mask);
1766

1767
    switch (ot) {
1768
    case MO_16:
1769 1770 1771
        /* Note: we implement the Intel behaviour for shift count > 16.
           This means "shrdw C, B, A" shifts A:B:A >> C.  Build the B:A
           portion by constructing it as a 32-bit value.  */
1772
        if (is_right) {
1773 1774 1775
            tcg_gen_deposit_tl(cpu_tmp0, cpu_T[0], cpu_T[1], 16, 16);
            tcg_gen_mov_tl(cpu_T[1], cpu_T[0]);
            tcg_gen_mov_tl(cpu_T[0], cpu_tmp0);
1776
        } else {
1777
            tcg_gen_deposit_tl(cpu_T[1], cpu_T[0], cpu_T[1], 16, 16);
1778
        }
1779 1780
        /* FALLTHRU */
#ifdef TARGET_X86_64
1781
    case MO_32:
1782 1783
        /* Concatenate the two 32-bit values and use a 64-bit shift.  */
        tcg_gen_subi_tl(cpu_tmp0, count, 1);
1784
        if (is_right) {
1785 1786 1787 1788 1789 1790 1791 1792 1793 1794 1795 1796 1797 1798 1799 1800
            tcg_gen_concat_tl_i64(cpu_T[0], cpu_T[0], cpu_T[1]);
            tcg_gen_shr_i64(cpu_tmp0, cpu_T[0], cpu_tmp0);
            tcg_gen_shr_i64(cpu_T[0], cpu_T[0], count);
        } else {
            tcg_gen_concat_tl_i64(cpu_T[0], cpu_T[1], cpu_T[0]);
            tcg_gen_shl_i64(cpu_tmp0, cpu_T[0], cpu_tmp0);
            tcg_gen_shl_i64(cpu_T[0], cpu_T[0], count);
            tcg_gen_shri_i64(cpu_tmp0, cpu_tmp0, 32);
            tcg_gen_shri_i64(cpu_T[0], cpu_T[0], 32);
        }
        break;
#endif
    default:
        tcg_gen_subi_tl(cpu_tmp0, count, 1);
        if (is_right) {
            tcg_gen_shr_tl(cpu_tmp0, cpu_T[0], cpu_tmp0);
1801

1802 1803 1804
            tcg_gen_subfi_tl(cpu_tmp4, mask + 1, count);
            tcg_gen_shr_tl(cpu_T[0], cpu_T[0], count);
            tcg_gen_shl_tl(cpu_T[1], cpu_T[1], cpu_tmp4);
1805
        } else {
1806
            tcg_gen_shl_tl(cpu_tmp0, cpu_T[0], cpu_tmp0);
1807
            if (ot == MO_16) {
1808 1809 1810 1811 1812 1813 1814 1815 1816
                /* Only needed if count > 16, for Intel behaviour.  */
                tcg_gen_subfi_tl(cpu_tmp4, 33, count);
                tcg_gen_shr_tl(cpu_tmp4, cpu_T[1], cpu_tmp4);
                tcg_gen_or_tl(cpu_tmp0, cpu_tmp0, cpu_tmp4);
            }

            tcg_gen_subfi_tl(cpu_tmp4, mask + 1, count);
            tcg_gen_shl_tl(cpu_T[0], cpu_T[0], count);
            tcg_gen_shr_tl(cpu_T[1], cpu_T[1], cpu_tmp4);
1817
        }
1818 1819 1820 1821 1822
        tcg_gen_movi_tl(cpu_tmp4, 0);
        tcg_gen_movcond_tl(TCG_COND_EQ, cpu_T[1], count, cpu_tmp4,
                           cpu_tmp4, cpu_T[1]);
        tcg_gen_or_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
        break;
1823 1824 1825
    }

    /* store */
1826
    gen_op_st_rm_T0_A0(s, ot, op1);
1827

1828 1829
    gen_shift_flags(s, ot, cpu_T[0], cpu_tmp0, count, is_right);
    tcg_temp_free(count);
1830 1831 1832 1833 1834 1835 1836 1837 1838 1839 1840 1841 1842 1843 1844 1845 1846 1847 1848 1849 1850 1851 1852 1853 1854 1855 1856 1857 1858 1859
}

static void gen_shift(DisasContext *s1, int op, int ot, int d, int s)
{
    if (s != OR_TMP1)
        gen_op_mov_TN_reg(ot, 1, s);
    switch(op) {
    case OP_ROL:
        gen_rot_rm_T1(s1, ot, d, 0);
        break;
    case OP_ROR:
        gen_rot_rm_T1(s1, ot, d, 1);
        break;
    case OP_SHL:
    case OP_SHL1:
        gen_shift_rm_T1(s1, ot, d, 0, 0);
        break;
    case OP_SHR:
        gen_shift_rm_T1(s1, ot, d, 1, 0);
        break;
    case OP_SAR:
        gen_shift_rm_T1(s1, ot, d, 1, 1);
        break;
    case OP_RCL:
        gen_rotc_rm_T1(s1, ot, d, 0);
        break;
    case OP_RCR:
        gen_rotc_rm_T1(s1, ot, d, 1);
        break;
    }
B
bellard 已提交
1860 1861 1862 1863
}

static void gen_shifti(DisasContext *s1, int op, int ot, int d, int c)
{
B
bellard 已提交
1864
    switch(op) {
M
malc 已提交
1865 1866 1867 1868 1869 1870
    case OP_ROL:
        gen_rot_rm_im(s1, ot, d, c, 0);
        break;
    case OP_ROR:
        gen_rot_rm_im(s1, ot, d, c, 1);
        break;
B
bellard 已提交
1871 1872 1873 1874 1875 1876 1877 1878 1879 1880 1881 1882
    case OP_SHL:
    case OP_SHL1:
        gen_shift_rm_im(s1, ot, d, c, 0, 0);
        break;
    case OP_SHR:
        gen_shift_rm_im(s1, ot, d, c, 1, 0);
        break;
    case OP_SAR:
        gen_shift_rm_im(s1, ot, d, c, 1, 1);
        break;
    default:
        /* currently not optimized */
1883
        tcg_gen_movi_tl(cpu_T[1], c);
B
bellard 已提交
1884 1885 1886
        gen_shift(s1, op, ot, d, OR_TMP1);
        break;
    }
B
bellard 已提交
1887 1888
}

1889
static void gen_lea_modrm(CPUX86State *env, DisasContext *s, int modrm)
B
bellard 已提交
1890
{
B
bellard 已提交
1891
    target_long disp;
B
bellard 已提交
1892
    int havesib;
B
bellard 已提交
1893
    int base;
B
bellard 已提交
1894 1895 1896
    int index;
    int scale;
    int mod, rm, code, override, must_add_seg;
1897
    TCGv sum;
B
bellard 已提交
1898 1899 1900 1901 1902 1903 1904 1905 1906 1907 1908

    override = s->override;
    must_add_seg = s->addseg;
    if (override >= 0)
        must_add_seg = 1;
    mod = (modrm >> 6) & 3;
    rm = modrm & 7;

    if (s->aflag) {
        havesib = 0;
        base = rm;
1909
        index = -1;
B
bellard 已提交
1910
        scale = 0;
1911

B
bellard 已提交
1912 1913
        if (base == 4) {
            havesib = 1;
1914
            code = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
1915
            scale = (code >> 6) & 3;
B
bellard 已提交
1916
            index = ((code >> 3) & 7) | REX_X(s);
1917 1918 1919
            if (index == 4) {
                index = -1;  /* no index */
            }
B
bellard 已提交
1920
            base = (code & 7);
B
bellard 已提交
1921
        }
B
bellard 已提交
1922
        base |= REX_B(s);
B
bellard 已提交
1923 1924 1925

        switch (mod) {
        case 0:
B
bellard 已提交
1926
            if ((base & 7) == 5) {
B
bellard 已提交
1927
                base = -1;
1928
                disp = (int32_t)cpu_ldl_code(env, s->pc);
B
bellard 已提交
1929
                s->pc += 4;
B
bellard 已提交
1930 1931 1932
                if (CODE64(s) && !havesib) {
                    disp += s->pc + s->rip_offset;
                }
B
bellard 已提交
1933 1934 1935 1936 1937
            } else {
                disp = 0;
            }
            break;
        case 1:
1938
            disp = (int8_t)cpu_ldub_code(env, s->pc++);
B
bellard 已提交
1939 1940 1941
            break;
        default:
        case 2:
1942
            disp = (int32_t)cpu_ldl_code(env, s->pc);
B
bellard 已提交
1943 1944 1945
            s->pc += 4;
            break;
        }
1946

1947 1948 1949 1950 1951 1952 1953 1954 1955 1956 1957 1958 1959
        /* For correct popl handling with esp.  */
        if (base == R_ESP && s->popl_esp_hack) {
            disp += s->popl_esp_hack;
        }

        /* Compute the address, with a minimum number of TCG ops.  */
        TCGV_UNUSED(sum);
        if (index >= 0) {
            if (scale == 0) {
                sum = cpu_regs[index];
            } else {
                tcg_gen_shli_tl(cpu_A0, cpu_regs[index], scale);
                sum = cpu_A0;
B
bellard 已提交
1960
            }
1961 1962 1963
            if (base >= 0) {
                tcg_gen_add_tl(cpu_A0, sum, cpu_regs[base]);
                sum = cpu_A0;
B
bellard 已提交
1964
            }
1965 1966
        } else if (base >= 0) {
            sum = cpu_regs[base];
B
bellard 已提交
1967
        }
1968 1969 1970 1971
        if (TCGV_IS_UNUSED(sum)) {
            tcg_gen_movi_tl(cpu_A0, disp);
        } else {
            tcg_gen_addi_tl(cpu_A0, sum, disp);
B
bellard 已提交
1972
        }
1973

B
bellard 已提交
1974 1975
        if (must_add_seg) {
            if (override < 0) {
1976
                if (base == R_EBP || base == R_ESP) {
B
bellard 已提交
1977
                    override = R_SS;
1978
                } else {
B
bellard 已提交
1979
                    override = R_DS;
1980
                }
B
bellard 已提交
1981
            }
1982 1983 1984 1985 1986 1987 1988 1989

            tcg_gen_ld_tl(cpu_tmp0, cpu_env,
                          offsetof(CPUX86State, segs[override].base));
            if (CODE64(s)) {
                if (s->aflag != 2) {
                    tcg_gen_ext32u_tl(cpu_A0, cpu_A0);
                }
                tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_tmp0);
1990
                return;
B
bellard 已提交
1991
            }
1992 1993 1994 1995 1996 1997

            tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_tmp0);
        }

        if (s->aflag != 2) {
            tcg_gen_ext32u_tl(cpu_A0, cpu_A0);
B
bellard 已提交
1998 1999 2000 2001 2002
        }
    } else {
        switch (mod) {
        case 0:
            if (rm == 6) {
2003
                disp = cpu_lduw_code(env, s->pc);
B
bellard 已提交
2004
                s->pc += 2;
2005
                tcg_gen_movi_tl(cpu_A0, disp);
B
bellard 已提交
2006 2007 2008 2009 2010 2011 2012
                rm = 0; /* avoid SS override */
                goto no_rm;
            } else {
                disp = 0;
            }
            break;
        case 1:
2013
            disp = (int8_t)cpu_ldub_code(env, s->pc++);
B
bellard 已提交
2014 2015 2016
            break;
        default:
        case 2:
2017
            disp = cpu_lduw_code(env, s->pc);
B
bellard 已提交
2018 2019 2020 2021 2022
            s->pc += 2;
            break;
        }
        switch(rm) {
        case 0:
B
bellard 已提交
2023 2024
            gen_op_movl_A0_reg(R_EBX);
            gen_op_addl_A0_reg_sN(0, R_ESI);
B
bellard 已提交
2025 2026
            break;
        case 1:
B
bellard 已提交
2027 2028
            gen_op_movl_A0_reg(R_EBX);
            gen_op_addl_A0_reg_sN(0, R_EDI);
B
bellard 已提交
2029 2030
            break;
        case 2:
B
bellard 已提交
2031 2032
            gen_op_movl_A0_reg(R_EBP);
            gen_op_addl_A0_reg_sN(0, R_ESI);
B
bellard 已提交
2033 2034
            break;
        case 3:
B
bellard 已提交
2035 2036
            gen_op_movl_A0_reg(R_EBP);
            gen_op_addl_A0_reg_sN(0, R_EDI);
B
bellard 已提交
2037 2038
            break;
        case 4:
B
bellard 已提交
2039
            gen_op_movl_A0_reg(R_ESI);
B
bellard 已提交
2040 2041
            break;
        case 5:
B
bellard 已提交
2042
            gen_op_movl_A0_reg(R_EDI);
B
bellard 已提交
2043 2044
            break;
        case 6:
B
bellard 已提交
2045
            gen_op_movl_A0_reg(R_EBP);
B
bellard 已提交
2046 2047 2048
            break;
        default:
        case 7:
B
bellard 已提交
2049
            gen_op_movl_A0_reg(R_EBX);
B
bellard 已提交
2050 2051 2052 2053
            break;
        }
        if (disp != 0)
            gen_op_addl_A0_im(disp);
2054
        tcg_gen_ext16u_tl(cpu_A0, cpu_A0);
B
bellard 已提交
2055 2056 2057 2058 2059 2060 2061 2062
    no_rm:
        if (must_add_seg) {
            if (override < 0) {
                if (rm == 2 || rm == 3 || rm == 6)
                    override = R_SS;
                else
                    override = R_DS;
            }
2063
            gen_op_addl_A0_seg(s, override);
B
bellard 已提交
2064 2065 2066 2067
        }
    }
}

2068
static void gen_nop_modrm(CPUX86State *env, DisasContext *s, int modrm)
B
bellard 已提交
2069 2070 2071 2072 2073 2074 2075 2076 2077 2078 2079
{
    int mod, rm, base, code;

    mod = (modrm >> 6) & 3;
    if (mod == 3)
        return;
    rm = modrm & 7;

    if (s->aflag) {

        base = rm;
2080

B
bellard 已提交
2081
        if (base == 4) {
2082
            code = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
2083 2084
            base = (code & 7);
        }
2085

B
bellard 已提交
2086 2087 2088 2089 2090 2091 2092 2093 2094 2095 2096 2097 2098 2099 2100 2101 2102 2103 2104 2105 2106 2107 2108 2109 2110 2111 2112 2113 2114 2115 2116 2117
        switch (mod) {
        case 0:
            if (base == 5) {
                s->pc += 4;
            }
            break;
        case 1:
            s->pc++;
            break;
        default:
        case 2:
            s->pc += 4;
            break;
        }
    } else {
        switch (mod) {
        case 0:
            if (rm == 6) {
                s->pc += 2;
            }
            break;
        case 1:
            s->pc++;
            break;
        default:
        case 2:
            s->pc += 2;
            break;
        }
    }
}

B
bellard 已提交
2118 2119 2120 2121 2122 2123 2124 2125 2126 2127 2128
/* used for LEA and MOV AX, mem */
static void gen_add_A0_ds_seg(DisasContext *s)
{
    int override, must_add_seg;
    must_add_seg = s->addseg;
    override = R_DS;
    if (s->override >= 0) {
        override = s->override;
        must_add_seg = 1;
    }
    if (must_add_seg) {
2129 2130
#ifdef TARGET_X86_64
        if (CODE64(s)) {
B
bellard 已提交
2131
            gen_op_addq_A0_seg(override);
2132
        } else
2133 2134
#endif
        {
2135
            gen_op_addl_A0_seg(s, override);
2136
        }
B
bellard 已提交
2137 2138 2139
    }
}

B
balrog 已提交
2140
/* generate modrm memory load or store of 'reg'. TMP0 is used if reg ==
B
bellard 已提交
2141
   OR_TMP0 */
2142 2143
static void gen_ldst_modrm(CPUX86State *env, DisasContext *s, int modrm,
                           int ot, int reg, int is_store)
B
bellard 已提交
2144
{
2145
    int mod, rm;
B
bellard 已提交
2146 2147

    mod = (modrm >> 6) & 3;
B
bellard 已提交
2148
    rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
2149 2150 2151
    if (mod == 3) {
        if (is_store) {
            if (reg != OR_TMP0)
B
bellard 已提交
2152 2153
                gen_op_mov_TN_reg(ot, 0, reg);
            gen_op_mov_reg_T0(ot, rm);
B
bellard 已提交
2154
        } else {
B
bellard 已提交
2155
            gen_op_mov_TN_reg(ot, 0, rm);
B
bellard 已提交
2156
            if (reg != OR_TMP0)
B
bellard 已提交
2157
                gen_op_mov_reg_T0(ot, reg);
B
bellard 已提交
2158 2159
        }
    } else {
2160
        gen_lea_modrm(env, s, modrm);
B
bellard 已提交
2161 2162
        if (is_store) {
            if (reg != OR_TMP0)
B
bellard 已提交
2163
                gen_op_mov_TN_reg(ot, 0, reg);
2164
            gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
2165
        } else {
2166
            gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
2167
            if (reg != OR_TMP0)
B
bellard 已提交
2168
                gen_op_mov_reg_T0(ot, reg);
B
bellard 已提交
2169 2170 2171 2172
        }
    }
}

2173
static inline uint32_t insn_get(CPUX86State *env, DisasContext *s, int ot)
B
bellard 已提交
2174 2175 2176 2177
{
    uint32_t ret;

    switch(ot) {
2178
    case MO_8:
2179
        ret = cpu_ldub_code(env, s->pc);
B
bellard 已提交
2180 2181
        s->pc++;
        break;
2182
    case MO_16:
2183
        ret = cpu_lduw_code(env, s->pc);
B
bellard 已提交
2184 2185 2186
        s->pc += 2;
        break;
    default:
2187
    case MO_32:
2188
        ret = cpu_ldl_code(env, s->pc);
B
bellard 已提交
2189 2190 2191 2192 2193 2194
        s->pc += 4;
        break;
    }
    return ret;
}

B
bellard 已提交
2195 2196
static inline int insn_const_size(unsigned int ot)
{
2197
    if (ot <= MO_32) {
B
bellard 已提交
2198
        return 1 << ot;
2199
    } else {
B
bellard 已提交
2200
        return 4;
2201
    }
B
bellard 已提交
2202 2203
}

2204 2205 2206 2207 2208 2209 2210 2211 2212 2213 2214
static inline void gen_goto_tb(DisasContext *s, int tb_num, target_ulong eip)
{
    TranslationBlock *tb;
    target_ulong pc;

    pc = s->cs_base + eip;
    tb = s->tb;
    /* NOTE: we handle the case where the TB spans two pages here */
    if ((pc & TARGET_PAGE_MASK) == (tb->pc & TARGET_PAGE_MASK) ||
        (pc & TARGET_PAGE_MASK) == ((s->pc - 1) & TARGET_PAGE_MASK))  {
        /* jump to same page: we can use a direct jump */
B
bellard 已提交
2215
        tcg_gen_goto_tb(tb_num);
2216
        gen_jmp_im(eip);
2217
        tcg_gen_exit_tb((uintptr_t)tb + tb_num);
2218 2219 2220 2221 2222 2223 2224
    } else {
        /* jump to another page: currently not optimized */
        gen_jmp_im(eip);
        gen_eob(s);
    }
}

2225
static inline void gen_jcc(DisasContext *s, int b,
B
bellard 已提交
2226
                           target_ulong val, target_ulong next_eip)
B
bellard 已提交
2227
{
2228
    int l1, l2;
2229

B
bellard 已提交
2230
    if (s->jmp_opt) {
B
bellard 已提交
2231
        l1 = gen_new_label();
2232
        gen_jcc1(s, b, l1);
2233

2234
        gen_goto_tb(s, 0, next_eip);
B
bellard 已提交
2235 2236

        gen_set_label(l1);
2237
        gen_goto_tb(s, 1, val);
J
Jun Koi 已提交
2238
        s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2239
    } else {
B
bellard 已提交
2240 2241
        l1 = gen_new_label();
        l2 = gen_new_label();
2242
        gen_jcc1(s, b, l1);
2243

B
bellard 已提交
2244
        gen_jmp_im(next_eip);
2245 2246
        tcg_gen_br(l2);

B
bellard 已提交
2247 2248 2249
        gen_set_label(l1);
        gen_jmp_im(val);
        gen_set_label(l2);
B
bellard 已提交
2250 2251 2252 2253
        gen_eob(s);
    }
}

2254 2255 2256
static void gen_cmovcc1(CPUX86State *env, DisasContext *s, int ot, int b,
                        int modrm, int reg)
{
2257
    CCPrepare cc;
2258

2259
    gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
2260

2261 2262 2263 2264 2265 2266 2267 2268
    cc = gen_prepare_cc(s, b, cpu_T[1]);
    if (cc.mask != -1) {
        TCGv t0 = tcg_temp_new();
        tcg_gen_andi_tl(t0, cc.reg, cc.mask);
        cc.reg = t0;
    }
    if (!cc.use_reg2) {
        cc.reg2 = tcg_const_tl(cc.imm);
2269 2270
    }

2271 2272 2273 2274 2275 2276 2277 2278 2279 2280
    tcg_gen_movcond_tl(cc.cond, cpu_T[0], cc.reg, cc.reg2,
                       cpu_T[0], cpu_regs[reg]);
    gen_op_mov_reg_T0(ot, reg);

    if (cc.mask != -1) {
        tcg_temp_free(cc.reg);
    }
    if (!cc.use_reg2) {
        tcg_temp_free(cc.reg2);
    }
2281 2282
}

2283 2284 2285 2286 2287 2288 2289 2290 2291 2292 2293 2294 2295 2296 2297 2298
static inline void gen_op_movl_T0_seg(int seg_reg)
{
    tcg_gen_ld32u_tl(cpu_T[0], cpu_env, 
                     offsetof(CPUX86State,segs[seg_reg].selector));
}

static inline void gen_op_movl_seg_T0_vm(int seg_reg)
{
    tcg_gen_andi_tl(cpu_T[0], cpu_T[0], 0xffff);
    tcg_gen_st32_tl(cpu_T[0], cpu_env, 
                    offsetof(CPUX86State,segs[seg_reg].selector));
    tcg_gen_shli_tl(cpu_T[0], cpu_T[0], 4);
    tcg_gen_st_tl(cpu_T[0], cpu_env, 
                  offsetof(CPUX86State,segs[seg_reg].base));
}

B
bellard 已提交
2299 2300
/* move T0 to seg_reg and compute if the CPU state may change. Never
   call this function with seg_reg == R_CS */
B
bellard 已提交
2301
static void gen_movl_seg_T0(DisasContext *s, int seg_reg, target_ulong cur_eip)
B
bellard 已提交
2302
{
2303 2304
    if (s->pe && !s->vm86) {
        /* XXX: optimize by finding processor state dynamically */
2305
        gen_update_cc_op(s);
B
bellard 已提交
2306
        gen_jmp_im(cur_eip);
2307
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
2308
        gen_helper_load_seg(cpu_env, tcg_const_i32(seg_reg), cpu_tmp2_i32);
B
bellard 已提交
2309 2310 2311 2312 2313
        /* abort translation because the addseg value may change or
           because ss32 may change. For R_SS, translation must always
           stop as a special handling must be done to disable hardware
           interrupts for the next instruction */
        if (seg_reg == R_SS || (s->code32 && seg_reg < R_FS))
J
Jun Koi 已提交
2314
            s->is_jmp = DISAS_TB_JUMP;
2315
    } else {
2316
        gen_op_movl_seg_T0_vm(seg_reg);
B
bellard 已提交
2317
        if (seg_reg == R_SS)
J
Jun Koi 已提交
2318
            s->is_jmp = DISAS_TB_JUMP;
2319
    }
B
bellard 已提交
2320 2321
}

T
ths 已提交
2322 2323 2324 2325 2326
static inline int svm_is_rep(int prefixes)
{
    return ((prefixes & (PREFIX_REPZ | PREFIX_REPNZ)) ? 8 : 0);
}

B
bellard 已提交
2327
static inline void
T
ths 已提交
2328
gen_svm_check_intercept_param(DisasContext *s, target_ulong pc_start,
2329
                              uint32_t type, uint64_t param)
T
ths 已提交
2330
{
B
bellard 已提交
2331 2332 2333
    /* no SVM activated; fast case */
    if (likely(!(s->flags & HF_SVMI_MASK)))
        return;
2334
    gen_update_cc_op(s);
B
bellard 已提交
2335
    gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
2336
    gen_helper_svm_check_intercept_param(cpu_env, tcg_const_i32(type),
P
pbrook 已提交
2337
                                         tcg_const_i64(param));
T
ths 已提交
2338 2339
}

B
bellard 已提交
2340
static inline void
T
ths 已提交
2341 2342
gen_svm_check_intercept(DisasContext *s, target_ulong pc_start, uint64_t type)
{
B
bellard 已提交
2343
    gen_svm_check_intercept_param(s, pc_start, type, 0);
T
ths 已提交
2344 2345
}

2346 2347
static inline void gen_stack_update(DisasContext *s, int addend)
{
B
bellard 已提交
2348 2349
#ifdef TARGET_X86_64
    if (CODE64(s)) {
2350
        gen_op_add_reg_im(2, R_ESP, addend);
B
bellard 已提交
2351 2352
    } else
#endif
2353
    if (s->ss32) {
2354
        gen_op_add_reg_im(1, R_ESP, addend);
2355
    } else {
2356
        gen_op_add_reg_im(0, R_ESP, addend);
2357 2358 2359
    }
}

B
bellard 已提交
2360 2361 2362
/* generate a push. It depends on ss32, addseg and dflag */
static void gen_push_T0(DisasContext *s)
{
B
bellard 已提交
2363 2364
#ifdef TARGET_X86_64
    if (CODE64(s)) {
B
bellard 已提交
2365
        gen_op_movq_A0_reg(R_ESP);
2366
        if (s->dflag) {
B
bellard 已提交
2367
            gen_op_addq_A0_im(-8);
2368
            gen_op_st_v(s, MO_64, cpu_T[0], cpu_A0);
2369
        } else {
B
bellard 已提交
2370
            gen_op_addq_A0_im(-2);
2371
            gen_op_st_v(s, MO_16, cpu_T[0], cpu_A0);
2372
        }
B
bellard 已提交
2373
        gen_op_mov_reg_A0(2, R_ESP);
2374
    } else
B
bellard 已提交
2375 2376
#endif
    {
B
bellard 已提交
2377
        gen_op_movl_A0_reg(R_ESP);
B
bellard 已提交
2378
        if (!s->dflag)
B
bellard 已提交
2379
            gen_op_addl_A0_im(-2);
B
bellard 已提交
2380
        else
B
bellard 已提交
2381
            gen_op_addl_A0_im(-4);
B
bellard 已提交
2382 2383
        if (s->ss32) {
            if (s->addseg) {
2384
                tcg_gen_mov_tl(cpu_T[1], cpu_A0);
2385
                gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2386 2387
            }
        } else {
2388
            tcg_gen_ext16u_tl(cpu_A0, cpu_A0);
2389
            tcg_gen_mov_tl(cpu_T[1], cpu_A0);
2390
            gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2391
        }
2392
        gen_op_st_v(s, s->dflag + 1, cpu_T[0], cpu_A0);
B
bellard 已提交
2393
        if (s->ss32 && !s->addseg)
B
bellard 已提交
2394
            gen_op_mov_reg_A0(1, R_ESP);
B
bellard 已提交
2395
        else
B
bellard 已提交
2396
            gen_op_mov_reg_T1(s->ss32 + 1, R_ESP);
B
bellard 已提交
2397 2398 2399
    }
}

2400 2401 2402
/* generate a push. It depends on ss32, addseg and dflag */
/* slower version for T1, only used for call Ev */
static void gen_push_T1(DisasContext *s)
B
bellard 已提交
2403
{
B
bellard 已提交
2404 2405
#ifdef TARGET_X86_64
    if (CODE64(s)) {
B
bellard 已提交
2406
        gen_op_movq_A0_reg(R_ESP);
2407
        if (s->dflag) {
B
bellard 已提交
2408
            gen_op_addq_A0_im(-8);
2409
            gen_op_st_v(s, MO_64, cpu_T[1], cpu_A0);
2410
        } else {
B
bellard 已提交
2411
            gen_op_addq_A0_im(-2);
2412
            gen_op_st_v(s, MO_16, cpu_T[1], cpu_A0);
2413
        }
B
bellard 已提交
2414
        gen_op_mov_reg_A0(2, R_ESP);
2415
    } else
B
bellard 已提交
2416 2417
#endif
    {
B
bellard 已提交
2418
        gen_op_movl_A0_reg(R_ESP);
B
bellard 已提交
2419
        if (!s->dflag)
B
bellard 已提交
2420
            gen_op_addl_A0_im(-2);
B
bellard 已提交
2421
        else
B
bellard 已提交
2422
            gen_op_addl_A0_im(-4);
B
bellard 已提交
2423 2424
        if (s->ss32) {
            if (s->addseg) {
2425
                gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2426 2427
            }
        } else {
2428
            tcg_gen_ext16u_tl(cpu_A0, cpu_A0);
2429
            gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2430
        }
2431
        gen_op_st_v(s, s->dflag + 1, cpu_T[1], cpu_A0);
2432

B
bellard 已提交
2433
        if (s->ss32 && !s->addseg)
B
bellard 已提交
2434
            gen_op_mov_reg_A0(1, R_ESP);
B
bellard 已提交
2435 2436
        else
            gen_stack_update(s, (-2) << s->dflag);
B
bellard 已提交
2437 2438 2439
    }
}

2440 2441
/* two step pop is necessary for precise exceptions */
static void gen_pop_T0(DisasContext *s)
B
bellard 已提交
2442
{
B
bellard 已提交
2443 2444
#ifdef TARGET_X86_64
    if (CODE64(s)) {
B
bellard 已提交
2445
        gen_op_movq_A0_reg(R_ESP);
2446
        gen_op_ld_v(s, s->dflag ? MO_64 : MO_16, cpu_T[0], cpu_A0);
2447
    } else
B
bellard 已提交
2448 2449
#endif
    {
B
bellard 已提交
2450
        gen_op_movl_A0_reg(R_ESP);
B
bellard 已提交
2451 2452
        if (s->ss32) {
            if (s->addseg)
2453
                gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2454
        } else {
2455
            tcg_gen_ext16u_tl(cpu_A0, cpu_A0);
2456
            gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2457
        }
2458
        gen_op_ld_v(s, s->dflag + 1, cpu_T[0], cpu_A0);
B
bellard 已提交
2459 2460 2461 2462 2463
    }
}

static void gen_pop_update(DisasContext *s)
{
B
bellard 已提交
2464
#ifdef TARGET_X86_64
2465
    if (CODE64(s) && s->dflag) {
B
bellard 已提交
2466 2467 2468 2469 2470 2471
        gen_stack_update(s, 8);
    } else
#endif
    {
        gen_stack_update(s, 2 << s->dflag);
    }
B
bellard 已提交
2472 2473 2474 2475
}

static void gen_stack_A0(DisasContext *s)
{
B
bellard 已提交
2476
    gen_op_movl_A0_reg(R_ESP);
B
bellard 已提交
2477
    if (!s->ss32)
2478
        tcg_gen_ext16u_tl(cpu_A0, cpu_A0);
2479
    tcg_gen_mov_tl(cpu_T[1], cpu_A0);
B
bellard 已提交
2480
    if (s->addseg)
2481
        gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2482 2483 2484 2485 2486 2487
}

/* NOTE: wrap around in 16 bit not fully handled */
static void gen_pusha(DisasContext *s)
{
    int i;
B
bellard 已提交
2488
    gen_op_movl_A0_reg(R_ESP);
B
bellard 已提交
2489 2490
    gen_op_addl_A0_im(-16 <<  s->dflag);
    if (!s->ss32)
2491
        tcg_gen_ext16u_tl(cpu_A0, cpu_A0);
2492
    tcg_gen_mov_tl(cpu_T[1], cpu_A0);
B
bellard 已提交
2493
    if (s->addseg)
2494
        gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2495
    for(i = 0;i < 8; i++) {
2496
        gen_op_mov_TN_reg(MO_32, 0, 7 - i);
2497
        gen_op_st_v(s, MO_16 + s->dflag, cpu_T[0], cpu_A0);
B
bellard 已提交
2498 2499
        gen_op_addl_A0_im(2 <<  s->dflag);
    }
2500
    gen_op_mov_reg_T1(MO_16 + s->ss32, R_ESP);
B
bellard 已提交
2501 2502 2503 2504 2505 2506
}

/* NOTE: wrap around in 16 bit not fully handled */
static void gen_popa(DisasContext *s)
{
    int i;
B
bellard 已提交
2507
    gen_op_movl_A0_reg(R_ESP);
B
bellard 已提交
2508
    if (!s->ss32)
2509
        tcg_gen_ext16u_tl(cpu_A0, cpu_A0);
2510 2511
    tcg_gen_mov_tl(cpu_T[1], cpu_A0);
    tcg_gen_addi_tl(cpu_T[1], cpu_T[1], 16 <<  s->dflag);
B
bellard 已提交
2512
    if (s->addseg)
2513
        gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2514 2515 2516
    for(i = 0;i < 8; i++) {
        /* ESP is not reloaded */
        if (i != 3) {
2517
            gen_op_ld_v(s, MO_16 + s->dflag, cpu_T[0], cpu_A0);
2518
            gen_op_mov_reg_T0(MO_16 + s->dflag, 7 - i);
B
bellard 已提交
2519 2520 2521
        }
        gen_op_addl_A0_im(2 <<  s->dflag);
    }
2522
    gen_op_mov_reg_T1(MO_16 + s->ss32, R_ESP);
B
bellard 已提交
2523 2524 2525 2526
}

static void gen_enter(DisasContext *s, int esp_addend, int level)
{
B
bellard 已提交
2527
    int ot, opsize;
B
bellard 已提交
2528 2529

    level &= 0x1f;
2530 2531
#ifdef TARGET_X86_64
    if (CODE64(s)) {
2532
        ot = s->dflag ? MO_64 : MO_16;
2533
        opsize = 1 << ot;
2534

B
bellard 已提交
2535
        gen_op_movl_A0_reg(R_ESP);
2536
        gen_op_addq_A0_im(-opsize);
2537
        tcg_gen_mov_tl(cpu_T[1], cpu_A0);
2538 2539

        /* push bp */
2540
        gen_op_mov_TN_reg(MO_32, 0, R_EBP);
2541
        gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
2542
        if (level) {
B
bellard 已提交
2543
            /* XXX: must save state */
2544
            gen_helper_enter64_level(cpu_env, tcg_const_i32(level),
2545
                                     tcg_const_i32((ot == MO_64)),
P
pbrook 已提交
2546
                                     cpu_T[1]);
2547
        }
B
bellard 已提交
2548
        gen_op_mov_reg_T1(ot, R_EBP);
2549
        tcg_gen_addi_tl(cpu_T[1], cpu_T[1], -esp_addend + (-opsize * level));
2550
        gen_op_mov_reg_T1(MO_64, R_ESP);
2551
    } else
2552 2553
#endif
    {
2554
        ot = s->dflag + MO_16;
2555
        opsize = 2 << s->dflag;
2556

B
bellard 已提交
2557
        gen_op_movl_A0_reg(R_ESP);
2558 2559
        gen_op_addl_A0_im(-opsize);
        if (!s->ss32)
2560
            tcg_gen_ext16u_tl(cpu_A0, cpu_A0);
2561
        tcg_gen_mov_tl(cpu_T[1], cpu_A0);
2562
        if (s->addseg)
2563
            gen_op_addl_A0_seg(s, R_SS);
2564
        /* push bp */
2565
        gen_op_mov_TN_reg(MO_32, 0, R_EBP);
2566
        gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
2567
        if (level) {
B
bellard 已提交
2568
            /* XXX: must save state */
2569
            gen_helper_enter_level(cpu_env, tcg_const_i32(level),
P
pbrook 已提交
2570 2571
                                   tcg_const_i32(s->dflag),
                                   cpu_T[1]);
2572
        }
B
bellard 已提交
2573
        gen_op_mov_reg_T1(ot, R_EBP);
2574
        tcg_gen_addi_tl(cpu_T[1], cpu_T[1], -esp_addend + (-opsize * level));
2575
        gen_op_mov_reg_T1(MO_16 + s->ss32, R_ESP);
B
bellard 已提交
2576 2577 2578
    }
}

B
bellard 已提交
2579
static void gen_exception(DisasContext *s, int trapno, target_ulong cur_eip)
B
bellard 已提交
2580
{
2581
    gen_update_cc_op(s);
B
bellard 已提交
2582
    gen_jmp_im(cur_eip);
B
Blue Swirl 已提交
2583
    gen_helper_raise_exception(cpu_env, tcg_const_i32(trapno));
J
Jun Koi 已提交
2584
    s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2585 2586 2587
}

/* an interrupt is different from an exception because of the
B
blueswir1 已提交
2588
   privilege checks */
2589
static void gen_interrupt(DisasContext *s, int intno,
B
bellard 已提交
2590
                          target_ulong cur_eip, target_ulong next_eip)
B
bellard 已提交
2591
{
2592
    gen_update_cc_op(s);
B
bellard 已提交
2593
    gen_jmp_im(cur_eip);
B
Blue Swirl 已提交
2594
    gen_helper_raise_interrupt(cpu_env, tcg_const_i32(intno),
P
pbrook 已提交
2595
                               tcg_const_i32(next_eip - cur_eip));
J
Jun Koi 已提交
2596
    s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2597 2598
}

B
bellard 已提交
2599
static void gen_debug(DisasContext *s, target_ulong cur_eip)
B
bellard 已提交
2600
{
2601
    gen_update_cc_op(s);
B
bellard 已提交
2602
    gen_jmp_im(cur_eip);
B
Blue Swirl 已提交
2603
    gen_helper_debug(cpu_env);
J
Jun Koi 已提交
2604
    s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2605 2606 2607 2608 2609 2610
}

/* generate a generic end of block. Trace exception is also generated
   if needed */
static void gen_eob(DisasContext *s)
{
2611
    gen_update_cc_op(s);
2612
    if (s->tb->flags & HF_INHIBIT_IRQ_MASK) {
2613
        gen_helper_reset_inhibit_irq(cpu_env);
2614
    }
J
Jan Kiszka 已提交
2615
    if (s->tb->flags & HF_RF_MASK) {
2616
        gen_helper_reset_rf(cpu_env);
J
Jan Kiszka 已提交
2617
    }
2618
    if (s->singlestep_enabled) {
B
Blue Swirl 已提交
2619
        gen_helper_debug(cpu_env);
2620
    } else if (s->tf) {
B
Blue Swirl 已提交
2621
        gen_helper_single_step(cpu_env);
B
bellard 已提交
2622
    } else {
B
bellard 已提交
2623
        tcg_gen_exit_tb(0);
B
bellard 已提交
2624
    }
J
Jun Koi 已提交
2625
    s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2626 2627 2628 2629
}

/* generate a jump to eip. No segment change must happen before as a
   direct call to the next block may occur */
B
bellard 已提交
2630
static void gen_jmp_tb(DisasContext *s, target_ulong eip, int tb_num)
B
bellard 已提交
2631
{
2632 2633
    gen_update_cc_op(s);
    set_cc_op(s, CC_OP_DYNAMIC);
B
bellard 已提交
2634
    if (s->jmp_opt) {
2635
        gen_goto_tb(s, tb_num, eip);
J
Jun Koi 已提交
2636
        s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2637
    } else {
B
bellard 已提交
2638
        gen_jmp_im(eip);
B
bellard 已提交
2639 2640 2641 2642
        gen_eob(s);
    }
}

B
bellard 已提交
2643 2644 2645 2646 2647
static void gen_jmp(DisasContext *s, target_ulong eip)
{
    gen_jmp_tb(s, eip, 0);
}

2648
static inline void gen_ldq_env_A0(DisasContext *s, int offset)
B
bellard 已提交
2649
{
2650
    tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0, s->mem_index, MO_LEQ);
2651
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, offset);
B
bellard 已提交
2652
}
B
bellard 已提交
2653

2654
static inline void gen_stq_env_A0(DisasContext *s, int offset)
B
bellard 已提交
2655
{
2656
    tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env, offset);
2657
    tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0, s->mem_index, MO_LEQ);
B
bellard 已提交
2658
}
B
bellard 已提交
2659

2660
static inline void gen_ldo_env_A0(DisasContext *s, int offset)
B
bellard 已提交
2661
{
2662
    int mem_index = s->mem_index;
2663
    tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0, mem_index, MO_LEQ);
2664
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, offset + offsetof(XMMReg, XMM_Q(0)));
B
bellard 已提交
2665
    tcg_gen_addi_tl(cpu_tmp0, cpu_A0, 8);
2666
    tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_tmp0, mem_index, MO_LEQ);
2667
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, offset + offsetof(XMMReg, XMM_Q(1)));
B
bellard 已提交
2668
}
B
bellard 已提交
2669

2670
static inline void gen_sto_env_A0(DisasContext *s, int offset)
B
bellard 已提交
2671
{
2672
    int mem_index = s->mem_index;
2673
    tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env, offset + offsetof(XMMReg, XMM_Q(0)));
2674
    tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0, mem_index, MO_LEQ);
B
bellard 已提交
2675
    tcg_gen_addi_tl(cpu_tmp0, cpu_A0, 8);
2676
    tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env, offset + offsetof(XMMReg, XMM_Q(1)));
2677
    tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_tmp0, mem_index, MO_LEQ);
B
bellard 已提交
2678
}
B
bellard 已提交
2679

B
bellard 已提交
2680 2681
static inline void gen_op_movo(int d_offset, int s_offset)
{
2682 2683 2684 2685
    tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env, s_offset);
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, d_offset);
    tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env, s_offset + 8);
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, d_offset + 8);
B
bellard 已提交
2686 2687 2688 2689
}

static inline void gen_op_movq(int d_offset, int s_offset)
{
2690 2691
    tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env, s_offset);
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, d_offset);
B
bellard 已提交
2692 2693 2694 2695
}

static inline void gen_op_movl(int d_offset, int s_offset)
{
2696 2697
    tcg_gen_ld_i32(cpu_tmp2_i32, cpu_env, s_offset);
    tcg_gen_st_i32(cpu_tmp2_i32, cpu_env, d_offset);
B
bellard 已提交
2698 2699 2700 2701
}

static inline void gen_op_movq_env_0(int d_offset)
{
2702 2703
    tcg_gen_movi_i64(cpu_tmp1_i64, 0);
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, d_offset);
B
bellard 已提交
2704
}
B
bellard 已提交
2705

B
Blue Swirl 已提交
2706 2707 2708 2709 2710 2711 2712
typedef void (*SSEFunc_i_ep)(TCGv_i32 val, TCGv_ptr env, TCGv_ptr reg);
typedef void (*SSEFunc_l_ep)(TCGv_i64 val, TCGv_ptr env, TCGv_ptr reg);
typedef void (*SSEFunc_0_epi)(TCGv_ptr env, TCGv_ptr reg, TCGv_i32 val);
typedef void (*SSEFunc_0_epl)(TCGv_ptr env, TCGv_ptr reg, TCGv_i64 val);
typedef void (*SSEFunc_0_epp)(TCGv_ptr env, TCGv_ptr reg_a, TCGv_ptr reg_b);
typedef void (*SSEFunc_0_eppi)(TCGv_ptr env, TCGv_ptr reg_a, TCGv_ptr reg_b,
                               TCGv_i32 val);
B
Blue Swirl 已提交
2713
typedef void (*SSEFunc_0_ppi)(TCGv_ptr reg_a, TCGv_ptr reg_b, TCGv_i32 val);
B
Blue Swirl 已提交
2714 2715
typedef void (*SSEFunc_0_eppt)(TCGv_ptr env, TCGv_ptr reg_a, TCGv_ptr reg_b,
                               TCGv val);
B
Blue Swirl 已提交
2716

B
bellard 已提交
2717 2718
#define SSE_SPECIAL ((void *)1)
#define SSE_DUMMY ((void *)2)
B
bellard 已提交
2719

P
pbrook 已提交
2720 2721 2722
#define MMX_OP2(x) { gen_helper_ ## x ## _mmx, gen_helper_ ## x ## _xmm }
#define SSE_FOP(x) { gen_helper_ ## x ## ps, gen_helper_ ## x ## pd, \
                     gen_helper_ ## x ## ss, gen_helper_ ## x ## sd, }
B
bellard 已提交
2723

B
Blue Swirl 已提交
2724
static const SSEFunc_0_epp sse_op_table1[256][4] = {
A
aurel32 已提交
2725 2726 2727
    /* 3DNow! extensions */
    [0x0e] = { SSE_DUMMY }, /* femms */
    [0x0f] = { SSE_DUMMY }, /* pf... */
B
bellard 已提交
2728 2729 2730
    /* pure SSE operations */
    [0x10] = { SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL }, /* movups, movupd, movss, movsd */
    [0x11] = { SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL }, /* movups, movupd, movss, movsd */
B
bellard 已提交
2731
    [0x12] = { SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL }, /* movlps, movlpd, movsldup, movddup */
B
bellard 已提交
2732
    [0x13] = { SSE_SPECIAL, SSE_SPECIAL },  /* movlps, movlpd */
P
pbrook 已提交
2733 2734
    [0x14] = { gen_helper_punpckldq_xmm, gen_helper_punpcklqdq_xmm },
    [0x15] = { gen_helper_punpckhdq_xmm, gen_helper_punpckhqdq_xmm },
B
bellard 已提交
2735 2736 2737 2738 2739 2740
    [0x16] = { SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL },  /* movhps, movhpd, movshdup */
    [0x17] = { SSE_SPECIAL, SSE_SPECIAL },  /* movhps, movhpd */

    [0x28] = { SSE_SPECIAL, SSE_SPECIAL },  /* movaps, movapd */
    [0x29] = { SSE_SPECIAL, SSE_SPECIAL },  /* movaps, movapd */
    [0x2a] = { SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL }, /* cvtpi2ps, cvtpi2pd, cvtsi2ss, cvtsi2sd */
2741
    [0x2b] = { SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL }, /* movntps, movntpd, movntss, movntsd */
B
bellard 已提交
2742 2743
    [0x2c] = { SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL }, /* cvttps2pi, cvttpd2pi, cvttsd2si, cvttss2si */
    [0x2d] = { SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL }, /* cvtps2pi, cvtpd2pi, cvtsd2si, cvtss2si */
P
pbrook 已提交
2744 2745
    [0x2e] = { gen_helper_ucomiss, gen_helper_ucomisd },
    [0x2f] = { gen_helper_comiss, gen_helper_comisd },
B
bellard 已提交
2746 2747
    [0x50] = { SSE_SPECIAL, SSE_SPECIAL }, /* movmskps, movmskpd */
    [0x51] = SSE_FOP(sqrt),
P
pbrook 已提交
2748 2749 2750 2751 2752 2753
    [0x52] = { gen_helper_rsqrtps, NULL, gen_helper_rsqrtss, NULL },
    [0x53] = { gen_helper_rcpps, NULL, gen_helper_rcpss, NULL },
    [0x54] = { gen_helper_pand_xmm, gen_helper_pand_xmm }, /* andps, andpd */
    [0x55] = { gen_helper_pandn_xmm, gen_helper_pandn_xmm }, /* andnps, andnpd */
    [0x56] = { gen_helper_por_xmm, gen_helper_por_xmm }, /* orps, orpd */
    [0x57] = { gen_helper_pxor_xmm, gen_helper_pxor_xmm }, /* xorps, xorpd */
B
bellard 已提交
2754 2755
    [0x58] = SSE_FOP(add),
    [0x59] = SSE_FOP(mul),
P
pbrook 已提交
2756 2757 2758
    [0x5a] = { gen_helper_cvtps2pd, gen_helper_cvtpd2ps,
               gen_helper_cvtss2sd, gen_helper_cvtsd2ss },
    [0x5b] = { gen_helper_cvtdq2ps, gen_helper_cvtps2dq, gen_helper_cvttps2dq },
B
bellard 已提交
2759 2760 2761 2762 2763 2764
    [0x5c] = SSE_FOP(sub),
    [0x5d] = SSE_FOP(min),
    [0x5e] = SSE_FOP(div),
    [0x5f] = SSE_FOP(max),

    [0xc2] = SSE_FOP(cmpeq),
B
Blue Swirl 已提交
2765 2766
    [0xc6] = { (SSEFunc_0_epp)gen_helper_shufps,
               (SSEFunc_0_epp)gen_helper_shufpd }, /* XXX: casts */
B
bellard 已提交
2767

R
Richard Henderson 已提交
2768 2769 2770
    /* SSSE3, SSE4, MOVBE, CRC32, BMI1, BMI2, ADX.  */
    [0x38] = { SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL },
    [0x3a] = { SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL },
B
balrog 已提交
2771

B
bellard 已提交
2772 2773 2774 2775 2776 2777 2778 2779 2780 2781 2782 2783 2784
    /* MMX ops and their SSE extensions */
    [0x60] = MMX_OP2(punpcklbw),
    [0x61] = MMX_OP2(punpcklwd),
    [0x62] = MMX_OP2(punpckldq),
    [0x63] = MMX_OP2(packsswb),
    [0x64] = MMX_OP2(pcmpgtb),
    [0x65] = MMX_OP2(pcmpgtw),
    [0x66] = MMX_OP2(pcmpgtl),
    [0x67] = MMX_OP2(packuswb),
    [0x68] = MMX_OP2(punpckhbw),
    [0x69] = MMX_OP2(punpckhwd),
    [0x6a] = MMX_OP2(punpckhdq),
    [0x6b] = MMX_OP2(packssdw),
P
pbrook 已提交
2785 2786
    [0x6c] = { NULL, gen_helper_punpcklqdq_xmm },
    [0x6d] = { NULL, gen_helper_punpckhqdq_xmm },
B
bellard 已提交
2787 2788
    [0x6e] = { SSE_SPECIAL, SSE_SPECIAL }, /* movd mm, ea */
    [0x6f] = { SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL }, /* movq, movdqa, , movqdu */
B
Blue Swirl 已提交
2789 2790 2791 2792
    [0x70] = { (SSEFunc_0_epp)gen_helper_pshufw_mmx,
               (SSEFunc_0_epp)gen_helper_pshufd_xmm,
               (SSEFunc_0_epp)gen_helper_pshufhw_xmm,
               (SSEFunc_0_epp)gen_helper_pshuflw_xmm }, /* XXX: casts */
B
bellard 已提交
2793 2794 2795 2796 2797 2798
    [0x71] = { SSE_SPECIAL, SSE_SPECIAL }, /* shiftw */
    [0x72] = { SSE_SPECIAL, SSE_SPECIAL }, /* shiftd */
    [0x73] = { SSE_SPECIAL, SSE_SPECIAL }, /* shiftq */
    [0x74] = MMX_OP2(pcmpeqb),
    [0x75] = MMX_OP2(pcmpeqw),
    [0x76] = MMX_OP2(pcmpeql),
A
aurel32 已提交
2799
    [0x77] = { SSE_DUMMY }, /* emms */
2800 2801
    [0x78] = { NULL, SSE_SPECIAL, NULL, SSE_SPECIAL }, /* extrq_i, insertq_i */
    [0x79] = { NULL, gen_helper_extrq_r, NULL, gen_helper_insertq_r },
P
pbrook 已提交
2802 2803
    [0x7c] = { NULL, gen_helper_haddpd, NULL, gen_helper_haddps },
    [0x7d] = { NULL, gen_helper_hsubpd, NULL, gen_helper_hsubps },
B
bellard 已提交
2804 2805 2806 2807
    [0x7e] = { SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL }, /* movd, movd, , movq */
    [0x7f] = { SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL }, /* movq, movdqa, movdqu */
    [0xc4] = { SSE_SPECIAL, SSE_SPECIAL }, /* pinsrw */
    [0xc5] = { SSE_SPECIAL, SSE_SPECIAL }, /* pextrw */
P
pbrook 已提交
2808
    [0xd0] = { NULL, gen_helper_addsubpd, NULL, gen_helper_addsubps },
B
bellard 已提交
2809 2810 2811 2812 2813 2814 2815 2816 2817 2818 2819 2820 2821 2822 2823 2824 2825 2826 2827 2828 2829
    [0xd1] = MMX_OP2(psrlw),
    [0xd2] = MMX_OP2(psrld),
    [0xd3] = MMX_OP2(psrlq),
    [0xd4] = MMX_OP2(paddq),
    [0xd5] = MMX_OP2(pmullw),
    [0xd6] = { NULL, SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL },
    [0xd7] = { SSE_SPECIAL, SSE_SPECIAL }, /* pmovmskb */
    [0xd8] = MMX_OP2(psubusb),
    [0xd9] = MMX_OP2(psubusw),
    [0xda] = MMX_OP2(pminub),
    [0xdb] = MMX_OP2(pand),
    [0xdc] = MMX_OP2(paddusb),
    [0xdd] = MMX_OP2(paddusw),
    [0xde] = MMX_OP2(pmaxub),
    [0xdf] = MMX_OP2(pandn),
    [0xe0] = MMX_OP2(pavgb),
    [0xe1] = MMX_OP2(psraw),
    [0xe2] = MMX_OP2(psrad),
    [0xe3] = MMX_OP2(pavgw),
    [0xe4] = MMX_OP2(pmulhuw),
    [0xe5] = MMX_OP2(pmulhw),
P
pbrook 已提交
2830
    [0xe6] = { NULL, gen_helper_cvttpd2dq, gen_helper_cvtdq2pd, gen_helper_cvtpd2dq },
B
bellard 已提交
2831 2832 2833 2834 2835 2836 2837 2838 2839
    [0xe7] = { SSE_SPECIAL , SSE_SPECIAL },  /* movntq, movntq */
    [0xe8] = MMX_OP2(psubsb),
    [0xe9] = MMX_OP2(psubsw),
    [0xea] = MMX_OP2(pminsw),
    [0xeb] = MMX_OP2(por),
    [0xec] = MMX_OP2(paddsb),
    [0xed] = MMX_OP2(paddsw),
    [0xee] = MMX_OP2(pmaxsw),
    [0xef] = MMX_OP2(pxor),
B
bellard 已提交
2840
    [0xf0] = { NULL, NULL, NULL, SSE_SPECIAL }, /* lddqu */
B
bellard 已提交
2841 2842 2843 2844 2845 2846
    [0xf1] = MMX_OP2(psllw),
    [0xf2] = MMX_OP2(pslld),
    [0xf3] = MMX_OP2(psllq),
    [0xf4] = MMX_OP2(pmuludq),
    [0xf5] = MMX_OP2(pmaddwd),
    [0xf6] = MMX_OP2(psadbw),
B
Blue Swirl 已提交
2847 2848
    [0xf7] = { (SSEFunc_0_epp)gen_helper_maskmov_mmx,
               (SSEFunc_0_epp)gen_helper_maskmov_xmm }, /* XXX: casts */
B
bellard 已提交
2849 2850 2851 2852 2853 2854 2855 2856 2857
    [0xf8] = MMX_OP2(psubb),
    [0xf9] = MMX_OP2(psubw),
    [0xfa] = MMX_OP2(psubl),
    [0xfb] = MMX_OP2(psubq),
    [0xfc] = MMX_OP2(paddb),
    [0xfd] = MMX_OP2(paddw),
    [0xfe] = MMX_OP2(paddl),
};

B
Blue Swirl 已提交
2858
static const SSEFunc_0_epp sse_op_table2[3 * 8][2] = {
B
bellard 已提交
2859 2860 2861 2862 2863 2864 2865
    [0 + 2] = MMX_OP2(psrlw),
    [0 + 4] = MMX_OP2(psraw),
    [0 + 6] = MMX_OP2(psllw),
    [8 + 2] = MMX_OP2(psrld),
    [8 + 4] = MMX_OP2(psrad),
    [8 + 6] = MMX_OP2(pslld),
    [16 + 2] = MMX_OP2(psrlq),
P
pbrook 已提交
2866
    [16 + 3] = { NULL, gen_helper_psrldq_xmm },
B
bellard 已提交
2867
    [16 + 6] = MMX_OP2(psllq),
P
pbrook 已提交
2868
    [16 + 7] = { NULL, gen_helper_pslldq_xmm },
B
bellard 已提交
2869 2870
};

B
Blue Swirl 已提交
2871
static const SSEFunc_0_epi sse_op_table3ai[] = {
P
pbrook 已提交
2872
    gen_helper_cvtsi2ss,
2873
    gen_helper_cvtsi2sd
B
Blue Swirl 已提交
2874
};
P
pbrook 已提交
2875

2876
#ifdef TARGET_X86_64
B
Blue Swirl 已提交
2877
static const SSEFunc_0_epl sse_op_table3aq[] = {
2878 2879 2880 2881 2882
    gen_helper_cvtsq2ss,
    gen_helper_cvtsq2sd
};
#endif

B
Blue Swirl 已提交
2883
static const SSEFunc_i_ep sse_op_table3bi[] = {
P
pbrook 已提交
2884 2885
    gen_helper_cvttss2si,
    gen_helper_cvtss2si,
2886
    gen_helper_cvttsd2si,
2887
    gen_helper_cvtsd2si
B
bellard 已提交
2888
};
2889

2890
#ifdef TARGET_X86_64
B
Blue Swirl 已提交
2891
static const SSEFunc_l_ep sse_op_table3bq[] = {
2892 2893
    gen_helper_cvttss2sq,
    gen_helper_cvtss2sq,
2894
    gen_helper_cvttsd2sq,
2895 2896 2897 2898
    gen_helper_cvtsd2sq
};
#endif

B
Blue Swirl 已提交
2899
static const SSEFunc_0_epp sse_op_table4[8][4] = {
B
bellard 已提交
2900 2901 2902 2903 2904 2905 2906 2907 2908
    SSE_FOP(cmpeq),
    SSE_FOP(cmplt),
    SSE_FOP(cmple),
    SSE_FOP(cmpunord),
    SSE_FOP(cmpneq),
    SSE_FOP(cmpnlt),
    SSE_FOP(cmpnle),
    SSE_FOP(cmpord),
};
2909

B
Blue Swirl 已提交
2910
static const SSEFunc_0_epp sse_op_table5[256] = {
P
pbrook 已提交
2911 2912 2913 2914 2915 2916 2917 2918 2919 2920 2921 2922 2923 2924 2925 2926 2927 2928 2929 2930 2931 2932 2933 2934
    [0x0c] = gen_helper_pi2fw,
    [0x0d] = gen_helper_pi2fd,
    [0x1c] = gen_helper_pf2iw,
    [0x1d] = gen_helper_pf2id,
    [0x8a] = gen_helper_pfnacc,
    [0x8e] = gen_helper_pfpnacc,
    [0x90] = gen_helper_pfcmpge,
    [0x94] = gen_helper_pfmin,
    [0x96] = gen_helper_pfrcp,
    [0x97] = gen_helper_pfrsqrt,
    [0x9a] = gen_helper_pfsub,
    [0x9e] = gen_helper_pfadd,
    [0xa0] = gen_helper_pfcmpgt,
    [0xa4] = gen_helper_pfmax,
    [0xa6] = gen_helper_movq, /* pfrcpit1; no need to actually increase precision */
    [0xa7] = gen_helper_movq, /* pfrsqit1 */
    [0xaa] = gen_helper_pfsubr,
    [0xae] = gen_helper_pfacc,
    [0xb0] = gen_helper_pfcmpeq,
    [0xb4] = gen_helper_pfmul,
    [0xb6] = gen_helper_movq, /* pfrcpit2 */
    [0xb7] = gen_helper_pmulhrw_mmx,
    [0xbb] = gen_helper_pswapd,
    [0xbf] = gen_helper_pavgb_mmx /* pavgusb */
A
aurel32 已提交
2935 2936
};

B
Blue Swirl 已提交
2937 2938
struct SSEOpHelper_epp {
    SSEFunc_0_epp op[2];
B
Blue Swirl 已提交
2939 2940 2941
    uint32_t ext_mask;
};

B
Blue Swirl 已提交
2942 2943
struct SSEOpHelper_eppi {
    SSEFunc_0_eppi op[2];
B
Blue Swirl 已提交
2944
    uint32_t ext_mask;
B
balrog 已提交
2945
};
B
Blue Swirl 已提交
2946

B
balrog 已提交
2947
#define SSSE3_OP(x) { MMX_OP2(x), CPUID_EXT_SSSE3 }
P
pbrook 已提交
2948 2949
#define SSE41_OP(x) { { NULL, gen_helper_ ## x ## _xmm }, CPUID_EXT_SSE41 }
#define SSE42_OP(x) { { NULL, gen_helper_ ## x ## _xmm }, CPUID_EXT_SSE42 }
B
balrog 已提交
2950
#define SSE41_SPECIAL { { NULL, SSE_SPECIAL }, CPUID_EXT_SSE41 }
2951 2952
#define PCLMULQDQ_OP(x) { { NULL, gen_helper_ ## x ## _xmm }, \
        CPUID_EXT_PCLMULQDQ }
2953
#define AESNI_OP(x) { { NULL, gen_helper_ ## x ## _xmm }, CPUID_EXT_AES }
B
Blue Swirl 已提交
2954

B
Blue Swirl 已提交
2955
static const struct SSEOpHelper_epp sse_op_table6[256] = {
B
balrog 已提交
2956 2957 2958 2959 2960 2961 2962 2963 2964 2965 2966 2967 2968 2969 2970 2971 2972 2973 2974 2975 2976 2977 2978 2979 2980 2981 2982 2983 2984 2985 2986 2987 2988 2989 2990 2991 2992 2993 2994 2995 2996 2997 2998 2999 3000 3001
    [0x00] = SSSE3_OP(pshufb),
    [0x01] = SSSE3_OP(phaddw),
    [0x02] = SSSE3_OP(phaddd),
    [0x03] = SSSE3_OP(phaddsw),
    [0x04] = SSSE3_OP(pmaddubsw),
    [0x05] = SSSE3_OP(phsubw),
    [0x06] = SSSE3_OP(phsubd),
    [0x07] = SSSE3_OP(phsubsw),
    [0x08] = SSSE3_OP(psignb),
    [0x09] = SSSE3_OP(psignw),
    [0x0a] = SSSE3_OP(psignd),
    [0x0b] = SSSE3_OP(pmulhrsw),
    [0x10] = SSE41_OP(pblendvb),
    [0x14] = SSE41_OP(blendvps),
    [0x15] = SSE41_OP(blendvpd),
    [0x17] = SSE41_OP(ptest),
    [0x1c] = SSSE3_OP(pabsb),
    [0x1d] = SSSE3_OP(pabsw),
    [0x1e] = SSSE3_OP(pabsd),
    [0x20] = SSE41_OP(pmovsxbw),
    [0x21] = SSE41_OP(pmovsxbd),
    [0x22] = SSE41_OP(pmovsxbq),
    [0x23] = SSE41_OP(pmovsxwd),
    [0x24] = SSE41_OP(pmovsxwq),
    [0x25] = SSE41_OP(pmovsxdq),
    [0x28] = SSE41_OP(pmuldq),
    [0x29] = SSE41_OP(pcmpeqq),
    [0x2a] = SSE41_SPECIAL, /* movntqda */
    [0x2b] = SSE41_OP(packusdw),
    [0x30] = SSE41_OP(pmovzxbw),
    [0x31] = SSE41_OP(pmovzxbd),
    [0x32] = SSE41_OP(pmovzxbq),
    [0x33] = SSE41_OP(pmovzxwd),
    [0x34] = SSE41_OP(pmovzxwq),
    [0x35] = SSE41_OP(pmovzxdq),
    [0x37] = SSE42_OP(pcmpgtq),
    [0x38] = SSE41_OP(pminsb),
    [0x39] = SSE41_OP(pminsd),
    [0x3a] = SSE41_OP(pminuw),
    [0x3b] = SSE41_OP(pminud),
    [0x3c] = SSE41_OP(pmaxsb),
    [0x3d] = SSE41_OP(pmaxsd),
    [0x3e] = SSE41_OP(pmaxuw),
    [0x3f] = SSE41_OP(pmaxud),
    [0x40] = SSE41_OP(pmulld),
    [0x41] = SSE41_OP(phminposuw),
3002 3003 3004 3005 3006
    [0xdb] = AESNI_OP(aesimc),
    [0xdc] = AESNI_OP(aesenc),
    [0xdd] = AESNI_OP(aesenclast),
    [0xde] = AESNI_OP(aesdec),
    [0xdf] = AESNI_OP(aesdeclast),
B
balrog 已提交
3007 3008
};

B
Blue Swirl 已提交
3009
static const struct SSEOpHelper_eppi sse_op_table7[256] = {
B
balrog 已提交
3010 3011 3012 3013 3014 3015 3016 3017 3018 3019 3020 3021 3022 3023 3024 3025 3026 3027
    [0x08] = SSE41_OP(roundps),
    [0x09] = SSE41_OP(roundpd),
    [0x0a] = SSE41_OP(roundss),
    [0x0b] = SSE41_OP(roundsd),
    [0x0c] = SSE41_OP(blendps),
    [0x0d] = SSE41_OP(blendpd),
    [0x0e] = SSE41_OP(pblendw),
    [0x0f] = SSSE3_OP(palignr),
    [0x14] = SSE41_SPECIAL, /* pextrb */
    [0x15] = SSE41_SPECIAL, /* pextrw */
    [0x16] = SSE41_SPECIAL, /* pextrd/pextrq */
    [0x17] = SSE41_SPECIAL, /* extractps */
    [0x20] = SSE41_SPECIAL, /* pinsrb */
    [0x21] = SSE41_SPECIAL, /* insertps */
    [0x22] = SSE41_SPECIAL, /* pinsrd/pinsrq */
    [0x40] = SSE41_OP(dpps),
    [0x41] = SSE41_OP(dppd),
    [0x42] = SSE41_OP(mpsadbw),
3028
    [0x44] = PCLMULQDQ_OP(pclmulqdq),
B
balrog 已提交
3029 3030 3031 3032
    [0x60] = SSE42_OP(pcmpestrm),
    [0x61] = SSE42_OP(pcmpestri),
    [0x62] = SSE42_OP(pcmpistrm),
    [0x63] = SSE42_OP(pcmpistri),
3033
    [0xdf] = AESNI_OP(aeskeygenassist),
B
balrog 已提交
3034 3035
};

3036 3037
static void gen_sse(CPUX86State *env, DisasContext *s, int b,
                    target_ulong pc_start, int rex_r)
B
bellard 已提交
3038 3039
{
    int b1, op1_offset, op2_offset, is_xmm, val, ot;
3040
    int modrm, mod, rm, reg;
B
Blue Swirl 已提交
3041 3042
    SSEFunc_0_epp sse_fn_epp;
    SSEFunc_0_eppi sse_fn_eppi;
B
Blue Swirl 已提交
3043
    SSEFunc_0_ppi sse_fn_ppi;
B
Blue Swirl 已提交
3044
    SSEFunc_0_eppt sse_fn_eppt;
B
bellard 已提交
3045 3046

    b &= 0xff;
3047
    if (s->prefix & PREFIX_DATA)
B
bellard 已提交
3048
        b1 = 1;
3049
    else if (s->prefix & PREFIX_REPZ)
B
bellard 已提交
3050
        b1 = 2;
3051
    else if (s->prefix & PREFIX_REPNZ)
B
bellard 已提交
3052 3053 3054
        b1 = 3;
    else
        b1 = 0;
B
Blue Swirl 已提交
3055 3056
    sse_fn_epp = sse_op_table1[b][b1];
    if (!sse_fn_epp) {
B
bellard 已提交
3057
        goto illegal_op;
B
Blue Swirl 已提交
3058
    }
A
aurel32 已提交
3059
    if ((b <= 0x5f && b >= 0x10) || b == 0xc6 || b == 0xc2) {
B
bellard 已提交
3060 3061 3062 3063 3064 3065 3066 3067 3068 3069 3070 3071 3072 3073 3074 3075 3076 3077 3078 3079
        is_xmm = 1;
    } else {
        if (b1 == 0) {
            /* MMX case */
            is_xmm = 0;
        } else {
            is_xmm = 1;
        }
    }
    /* simple MMX/SSE operation */
    if (s->flags & HF_TS_MASK) {
        gen_exception(s, EXCP07_PREX, pc_start - s->cs_base);
        return;
    }
    if (s->flags & HF_EM_MASK) {
    illegal_op:
        gen_exception(s, EXCP06_ILLOP, pc_start - s->cs_base);
        return;
    }
    if (is_xmm && !(s->flags & HF_OSFXSR_MASK))
B
balrog 已提交
3080 3081
        if ((b != 0x38 && b != 0x3a) || (s->prefix & PREFIX_DATA))
            goto illegal_op;
3082 3083 3084 3085
    if (b == 0x0e) {
        if (!(s->cpuid_ext2_features & CPUID_EXT2_3DNOW))
            goto illegal_op;
        /* femms */
B
Blue Swirl 已提交
3086
        gen_helper_emms(cpu_env);
3087 3088 3089 3090
        return;
    }
    if (b == 0x77) {
        /* emms */
B
Blue Swirl 已提交
3091
        gen_helper_emms(cpu_env);
B
bellard 已提交
3092 3093 3094 3095 3096
        return;
    }
    /* prepare MMX state (XXX: optimize by storing fptt and fptags in
       the static cpu state) */
    if (!is_xmm) {
B
Blue Swirl 已提交
3097
        gen_helper_enter_mmx(cpu_env);
B
bellard 已提交
3098 3099
    }

3100
    modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
3101 3102 3103 3104
    reg = ((modrm >> 3) & 7);
    if (is_xmm)
        reg |= rex_r;
    mod = (modrm >> 6) & 3;
B
Blue Swirl 已提交
3105
    if (sse_fn_epp == SSE_SPECIAL) {
B
bellard 已提交
3106 3107 3108
        b |= (b1 << 8);
        switch(b) {
        case 0x0e7: /* movntq */
3109
            if (mod == 3)
B
bellard 已提交
3110
                goto illegal_op;
3111
            gen_lea_modrm(env, s, modrm);
3112
            gen_stq_env_A0(s, offsetof(CPUX86State, fpregs[reg].mmx));
B
bellard 已提交
3113 3114 3115 3116
            break;
        case 0x1e7: /* movntdq */
        case 0x02b: /* movntps */
        case 0x12b: /* movntps */
3117 3118
            if (mod == 3)
                goto illegal_op;
3119
            gen_lea_modrm(env, s, modrm);
3120
            gen_sto_env_A0(s, offsetof(CPUX86State, xmm_regs[reg]));
3121
            break;
B
bellard 已提交
3122 3123
        case 0x3f0: /* lddqu */
            if (mod == 3)
B
bellard 已提交
3124
                goto illegal_op;
3125
            gen_lea_modrm(env, s, modrm);
3126
            gen_ldo_env_A0(s, offsetof(CPUX86State, xmm_regs[reg]));
B
bellard 已提交
3127
            break;
3128 3129 3130 3131
        case 0x22b: /* movntss */
        case 0x32b: /* movntsd */
            if (mod == 3)
                goto illegal_op;
3132
            gen_lea_modrm(env, s, modrm);
3133
            if (b1 & 1) {
3134
                gen_stq_env_A0(s, offsetof(CPUX86State, xmm_regs[reg]));
3135 3136 3137
            } else {
                tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,
                    xmm_regs[reg].XMM_L(0)));
3138
                gen_op_st_v(s, MO_32, cpu_T[0], cpu_A0);
3139 3140
            }
            break;
B
bellard 已提交
3141
        case 0x6e: /* movd mm, ea */
B
bellard 已提交
3142 3143
#ifdef TARGET_X86_64
            if (s->dflag == 2) {
3144
                gen_ldst_modrm(env, s, modrm, MO_64, OR_TMP0, 0);
B
bellard 已提交
3145
                tcg_gen_st_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,fpregs[reg].mmx));
3146
            } else
B
bellard 已提交
3147 3148
#endif
            {
3149
                gen_ldst_modrm(env, s, modrm, MO_32, OR_TMP0, 0);
B
bellard 已提交
3150 3151
                tcg_gen_addi_ptr(cpu_ptr0, cpu_env, 
                                 offsetof(CPUX86State,fpregs[reg].mmx));
P
pbrook 已提交
3152 3153
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
                gen_helper_movl_mm_T0_mmx(cpu_ptr0, cpu_tmp2_i32);
B
bellard 已提交
3154
            }
B
bellard 已提交
3155 3156
            break;
        case 0x16e: /* movd xmm, ea */
B
bellard 已提交
3157 3158
#ifdef TARGET_X86_64
            if (s->dflag == 2) {
3159
                gen_ldst_modrm(env, s, modrm, MO_64, OR_TMP0, 0);
B
bellard 已提交
3160 3161
                tcg_gen_addi_ptr(cpu_ptr0, cpu_env, 
                                 offsetof(CPUX86State,xmm_regs[reg]));
P
pbrook 已提交
3162
                gen_helper_movq_mm_T0_xmm(cpu_ptr0, cpu_T[0]);
3163
            } else
B
bellard 已提交
3164 3165
#endif
            {
3166
                gen_ldst_modrm(env, s, modrm, MO_32, OR_TMP0, 0);
B
bellard 已提交
3167 3168
                tcg_gen_addi_ptr(cpu_ptr0, cpu_env, 
                                 offsetof(CPUX86State,xmm_regs[reg]));
3169
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
P
pbrook 已提交
3170
                gen_helper_movl_mm_T0_xmm(cpu_ptr0, cpu_tmp2_i32);
B
bellard 已提交
3171
            }
B
bellard 已提交
3172 3173 3174
            break;
        case 0x6f: /* movq mm, ea */
            if (mod != 3) {
3175
                gen_lea_modrm(env, s, modrm);
3176
                gen_ldq_env_A0(s, offsetof(CPUX86State, fpregs[reg].mmx));
B
bellard 已提交
3177 3178
            } else {
                rm = (modrm & 7);
3179
                tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env,
B
bellard 已提交
3180
                               offsetof(CPUX86State,fpregs[rm].mmx));
3181
                tcg_gen_st_i64(cpu_tmp1_i64, cpu_env,
B
bellard 已提交
3182
                               offsetof(CPUX86State,fpregs[reg].mmx));
B
bellard 已提交
3183 3184 3185 3186 3187 3188 3189 3190 3191
            }
            break;
        case 0x010: /* movups */
        case 0x110: /* movupd */
        case 0x028: /* movaps */
        case 0x128: /* movapd */
        case 0x16f: /* movdqa xmm, ea */
        case 0x26f: /* movdqu xmm, ea */
            if (mod != 3) {
3192
                gen_lea_modrm(env, s, modrm);
3193
                gen_ldo_env_A0(s, offsetof(CPUX86State, xmm_regs[reg]));
B
bellard 已提交
3194 3195 3196 3197 3198 3199 3200 3201
            } else {
                rm = (modrm & 7) | REX_B(s);
                gen_op_movo(offsetof(CPUX86State,xmm_regs[reg]),
                            offsetof(CPUX86State,xmm_regs[rm]));
            }
            break;
        case 0x210: /* movss xmm, ea */
            if (mod != 3) {
3202
                gen_lea_modrm(env, s, modrm);
3203
                gen_op_ld_v(s, MO_32, cpu_T[0], cpu_A0);
B
bellard 已提交
3204
                tcg_gen_st32_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,xmm_regs[reg].XMM_L(0)));
3205
                tcg_gen_movi_tl(cpu_T[0], 0);
B
bellard 已提交
3206 3207 3208
                tcg_gen_st32_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,xmm_regs[reg].XMM_L(1)));
                tcg_gen_st32_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,xmm_regs[reg].XMM_L(2)));
                tcg_gen_st32_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,xmm_regs[reg].XMM_L(3)));
B
bellard 已提交
3209 3210 3211 3212 3213 3214 3215 3216
            } else {
                rm = (modrm & 7) | REX_B(s);
                gen_op_movl(offsetof(CPUX86State,xmm_regs[reg].XMM_L(0)),
                            offsetof(CPUX86State,xmm_regs[rm].XMM_L(0)));
            }
            break;
        case 0x310: /* movsd xmm, ea */
            if (mod != 3) {
3217
                gen_lea_modrm(env, s, modrm);
3218 3219
                gen_ldq_env_A0(s, offsetof(CPUX86State,
                                           xmm_regs[reg].XMM_Q(0)));
3220
                tcg_gen_movi_tl(cpu_T[0], 0);
B
bellard 已提交
3221 3222
                tcg_gen_st32_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,xmm_regs[reg].XMM_L(2)));
                tcg_gen_st32_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,xmm_regs[reg].XMM_L(3)));
B
bellard 已提交
3223 3224 3225 3226 3227 3228 3229 3230 3231
            } else {
                rm = (modrm & 7) | REX_B(s);
                gen_op_movq(offsetof(CPUX86State,xmm_regs[reg].XMM_Q(0)),
                            offsetof(CPUX86State,xmm_regs[rm].XMM_Q(0)));
            }
            break;
        case 0x012: /* movlps */
        case 0x112: /* movlpd */
            if (mod != 3) {
3232
                gen_lea_modrm(env, s, modrm);
3233 3234
                gen_ldq_env_A0(s, offsetof(CPUX86State,
                                           xmm_regs[reg].XMM_Q(0)));
B
bellard 已提交
3235 3236 3237 3238 3239 3240 3241
            } else {
                /* movhlps */
                rm = (modrm & 7) | REX_B(s);
                gen_op_movq(offsetof(CPUX86State,xmm_regs[reg].XMM_Q(0)),
                            offsetof(CPUX86State,xmm_regs[rm].XMM_Q(1)));
            }
            break;
B
bellard 已提交
3242 3243
        case 0x212: /* movsldup */
            if (mod != 3) {
3244
                gen_lea_modrm(env, s, modrm);
3245
                gen_ldo_env_A0(s, offsetof(CPUX86State, xmm_regs[reg]));
B
bellard 已提交
3246 3247 3248 3249 3250 3251 3252 3253 3254 3255 3256 3257 3258 3259
            } else {
                rm = (modrm & 7) | REX_B(s);
                gen_op_movl(offsetof(CPUX86State,xmm_regs[reg].XMM_L(0)),
                            offsetof(CPUX86State,xmm_regs[rm].XMM_L(0)));
                gen_op_movl(offsetof(CPUX86State,xmm_regs[reg].XMM_L(2)),
                            offsetof(CPUX86State,xmm_regs[rm].XMM_L(2)));
            }
            gen_op_movl(offsetof(CPUX86State,xmm_regs[reg].XMM_L(1)),
                        offsetof(CPUX86State,xmm_regs[reg].XMM_L(0)));
            gen_op_movl(offsetof(CPUX86State,xmm_regs[reg].XMM_L(3)),
                        offsetof(CPUX86State,xmm_regs[reg].XMM_L(2)));
            break;
        case 0x312: /* movddup */
            if (mod != 3) {
3260
                gen_lea_modrm(env, s, modrm);
3261 3262
                gen_ldq_env_A0(s, offsetof(CPUX86State,
                                           xmm_regs[reg].XMM_Q(0)));
B
bellard 已提交
3263 3264 3265 3266 3267 3268
            } else {
                rm = (modrm & 7) | REX_B(s);
                gen_op_movq(offsetof(CPUX86State,xmm_regs[reg].XMM_Q(0)),
                            offsetof(CPUX86State,xmm_regs[rm].XMM_Q(0)));
            }
            gen_op_movq(offsetof(CPUX86State,xmm_regs[reg].XMM_Q(1)),
B
bellard 已提交
3269
                        offsetof(CPUX86State,xmm_regs[reg].XMM_Q(0)));
B
bellard 已提交
3270
            break;
B
bellard 已提交
3271 3272 3273
        case 0x016: /* movhps */
        case 0x116: /* movhpd */
            if (mod != 3) {
3274
                gen_lea_modrm(env, s, modrm);
3275 3276
                gen_ldq_env_A0(s, offsetof(CPUX86State,
                                           xmm_regs[reg].XMM_Q(1)));
B
bellard 已提交
3277 3278 3279 3280 3281 3282 3283 3284 3285
            } else {
                /* movlhps */
                rm = (modrm & 7) | REX_B(s);
                gen_op_movq(offsetof(CPUX86State,xmm_regs[reg].XMM_Q(1)),
                            offsetof(CPUX86State,xmm_regs[rm].XMM_Q(0)));
            }
            break;
        case 0x216: /* movshdup */
            if (mod != 3) {
3286
                gen_lea_modrm(env, s, modrm);
3287
                gen_ldo_env_A0(s, offsetof(CPUX86State, xmm_regs[reg]));
B
bellard 已提交
3288 3289 3290 3291 3292 3293 3294 3295 3296 3297 3298 3299
            } else {
                rm = (modrm & 7) | REX_B(s);
                gen_op_movl(offsetof(CPUX86State,xmm_regs[reg].XMM_L(1)),
                            offsetof(CPUX86State,xmm_regs[rm].XMM_L(1)));
                gen_op_movl(offsetof(CPUX86State,xmm_regs[reg].XMM_L(3)),
                            offsetof(CPUX86State,xmm_regs[rm].XMM_L(3)));
            }
            gen_op_movl(offsetof(CPUX86State,xmm_regs[reg].XMM_L(0)),
                        offsetof(CPUX86State,xmm_regs[reg].XMM_L(1)));
            gen_op_movl(offsetof(CPUX86State,xmm_regs[reg].XMM_L(2)),
                        offsetof(CPUX86State,xmm_regs[reg].XMM_L(3)));
            break;
3300 3301 3302 3303 3304 3305 3306
        case 0x178:
        case 0x378:
            {
                int bit_index, field_length;

                if (b1 == 1 && reg != 0)
                    goto illegal_op;
3307 3308
                field_length = cpu_ldub_code(env, s->pc++) & 0x3F;
                bit_index = cpu_ldub_code(env, s->pc++) & 0x3F;
3309 3310 3311
                tcg_gen_addi_ptr(cpu_ptr0, cpu_env,
                    offsetof(CPUX86State,xmm_regs[reg]));
                if (b1 == 1)
B
Blue Swirl 已提交
3312 3313 3314
                    gen_helper_extrq_i(cpu_env, cpu_ptr0,
                                       tcg_const_i32(bit_index),
                                       tcg_const_i32(field_length));
3315
                else
B
Blue Swirl 已提交
3316 3317 3318
                    gen_helper_insertq_i(cpu_env, cpu_ptr0,
                                         tcg_const_i32(bit_index),
                                         tcg_const_i32(field_length));
3319 3320
            }
            break;
B
bellard 已提交
3321
        case 0x7e: /* movd ea, mm */
B
bellard 已提交
3322 3323
#ifdef TARGET_X86_64
            if (s->dflag == 2) {
B
bellard 已提交
3324 3325
                tcg_gen_ld_i64(cpu_T[0], cpu_env, 
                               offsetof(CPUX86State,fpregs[reg].mmx));
3326
                gen_ldst_modrm(env, s, modrm, MO_64, OR_TMP0, 1);
3327
            } else
B
bellard 已提交
3328 3329
#endif
            {
B
bellard 已提交
3330 3331
                tcg_gen_ld32u_tl(cpu_T[0], cpu_env, 
                                 offsetof(CPUX86State,fpregs[reg].mmx.MMX_L(0)));
3332
                gen_ldst_modrm(env, s, modrm, MO_32, OR_TMP0, 1);
B
bellard 已提交
3333
            }
B
bellard 已提交
3334 3335
            break;
        case 0x17e: /* movd ea, xmm */
B
bellard 已提交
3336 3337
#ifdef TARGET_X86_64
            if (s->dflag == 2) {
B
bellard 已提交
3338 3339
                tcg_gen_ld_i64(cpu_T[0], cpu_env, 
                               offsetof(CPUX86State,xmm_regs[reg].XMM_Q(0)));
3340
                gen_ldst_modrm(env, s, modrm, MO_64, OR_TMP0, 1);
3341
            } else
B
bellard 已提交
3342 3343
#endif
            {
B
bellard 已提交
3344 3345
                tcg_gen_ld32u_tl(cpu_T[0], cpu_env, 
                                 offsetof(CPUX86State,xmm_regs[reg].XMM_L(0)));
3346
                gen_ldst_modrm(env, s, modrm, MO_32, OR_TMP0, 1);
B
bellard 已提交
3347
            }
B
bellard 已提交
3348 3349 3350
            break;
        case 0x27e: /* movq xmm, ea */
            if (mod != 3) {
3351
                gen_lea_modrm(env, s, modrm);
3352 3353
                gen_ldq_env_A0(s, offsetof(CPUX86State,
                                           xmm_regs[reg].XMM_Q(0)));
B
bellard 已提交
3354 3355 3356 3357 3358 3359 3360 3361 3362
            } else {
                rm = (modrm & 7) | REX_B(s);
                gen_op_movq(offsetof(CPUX86State,xmm_regs[reg].XMM_Q(0)),
                            offsetof(CPUX86State,xmm_regs[rm].XMM_Q(0)));
            }
            gen_op_movq_env_0(offsetof(CPUX86State,xmm_regs[reg].XMM_Q(1)));
            break;
        case 0x7f: /* movq ea, mm */
            if (mod != 3) {
3363
                gen_lea_modrm(env, s, modrm);
3364
                gen_stq_env_A0(s, offsetof(CPUX86State, fpregs[reg].mmx));
B
bellard 已提交
3365 3366 3367 3368 3369 3370 3371 3372 3373 3374 3375 3376 3377
            } else {
                rm = (modrm & 7);
                gen_op_movq(offsetof(CPUX86State,fpregs[rm].mmx),
                            offsetof(CPUX86State,fpregs[reg].mmx));
            }
            break;
        case 0x011: /* movups */
        case 0x111: /* movupd */
        case 0x029: /* movaps */
        case 0x129: /* movapd */
        case 0x17f: /* movdqa ea, xmm */
        case 0x27f: /* movdqu ea, xmm */
            if (mod != 3) {
3378
                gen_lea_modrm(env, s, modrm);
3379
                gen_sto_env_A0(s, offsetof(CPUX86State, xmm_regs[reg]));
B
bellard 已提交
3380 3381 3382 3383 3384 3385 3386 3387
            } else {
                rm = (modrm & 7) | REX_B(s);
                gen_op_movo(offsetof(CPUX86State,xmm_regs[rm]),
                            offsetof(CPUX86State,xmm_regs[reg]));
            }
            break;
        case 0x211: /* movss ea, xmm */
            if (mod != 3) {
3388
                gen_lea_modrm(env, s, modrm);
B
bellard 已提交
3389
                tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,xmm_regs[reg].XMM_L(0)));
3390
                gen_op_st_v(s, MO_32, cpu_T[0], cpu_A0);
B
bellard 已提交
3391 3392 3393 3394 3395 3396 3397 3398
            } else {
                rm = (modrm & 7) | REX_B(s);
                gen_op_movl(offsetof(CPUX86State,xmm_regs[rm].XMM_L(0)),
                            offsetof(CPUX86State,xmm_regs[reg].XMM_L(0)));
            }
            break;
        case 0x311: /* movsd ea, xmm */
            if (mod != 3) {
3399
                gen_lea_modrm(env, s, modrm);
3400 3401
                gen_stq_env_A0(s, offsetof(CPUX86State,
                                           xmm_regs[reg].XMM_Q(0)));
B
bellard 已提交
3402 3403 3404 3405 3406 3407 3408 3409 3410
            } else {
                rm = (modrm & 7) | REX_B(s);
                gen_op_movq(offsetof(CPUX86State,xmm_regs[rm].XMM_Q(0)),
                            offsetof(CPUX86State,xmm_regs[reg].XMM_Q(0)));
            }
            break;
        case 0x013: /* movlps */
        case 0x113: /* movlpd */
            if (mod != 3) {
3411
                gen_lea_modrm(env, s, modrm);
3412 3413
                gen_stq_env_A0(s, offsetof(CPUX86State,
                                           xmm_regs[reg].XMM_Q(0)));
B
bellard 已提交
3414 3415 3416 3417 3418 3419 3420
            } else {
                goto illegal_op;
            }
            break;
        case 0x017: /* movhps */
        case 0x117: /* movhpd */
            if (mod != 3) {
3421
                gen_lea_modrm(env, s, modrm);
3422 3423
                gen_stq_env_A0(s, offsetof(CPUX86State,
                                           xmm_regs[reg].XMM_Q(1)));
B
bellard 已提交
3424 3425 3426 3427 3428 3429 3430 3431 3432 3433
            } else {
                goto illegal_op;
            }
            break;
        case 0x71: /* shift mm, im */
        case 0x72:
        case 0x73:
        case 0x171: /* shift xmm, im */
        case 0x172:
        case 0x173:
3434 3435 3436
            if (b1 >= 2) {
	        goto illegal_op;
            }
3437
            val = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
3438
            if (is_xmm) {
3439
                tcg_gen_movi_tl(cpu_T[0], val);
B
bellard 已提交
3440
                tcg_gen_st32_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,xmm_t0.XMM_L(0)));
3441
                tcg_gen_movi_tl(cpu_T[0], 0);
B
bellard 已提交
3442
                tcg_gen_st32_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,xmm_t0.XMM_L(1)));
B
bellard 已提交
3443 3444
                op1_offset = offsetof(CPUX86State,xmm_t0);
            } else {
3445
                tcg_gen_movi_tl(cpu_T[0], val);
B
bellard 已提交
3446
                tcg_gen_st32_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,mmx_t0.MMX_L(0)));
3447
                tcg_gen_movi_tl(cpu_T[0], 0);
B
bellard 已提交
3448
                tcg_gen_st32_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,mmx_t0.MMX_L(1)));
B
bellard 已提交
3449 3450
                op1_offset = offsetof(CPUX86State,mmx_t0);
            }
B
Blue Swirl 已提交
3451 3452 3453
            sse_fn_epp = sse_op_table2[((b - 1) & 3) * 8 +
                                       (((modrm >> 3)) & 7)][b1];
            if (!sse_fn_epp) {
B
bellard 已提交
3454
                goto illegal_op;
B
Blue Swirl 已提交
3455
            }
B
bellard 已提交
3456 3457 3458 3459 3460 3461 3462
            if (is_xmm) {
                rm = (modrm & 7) | REX_B(s);
                op2_offset = offsetof(CPUX86State,xmm_regs[rm]);
            } else {
                rm = (modrm & 7);
                op2_offset = offsetof(CPUX86State,fpregs[rm].mmx);
            }
B
bellard 已提交
3463 3464
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op2_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op1_offset);
B
Blue Swirl 已提交
3465
            sse_fn_epp(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
3466 3467 3468
            break;
        case 0x050: /* movmskps */
            rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
3469 3470
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, 
                             offsetof(CPUX86State,xmm_regs[rm]));
B
Blue Swirl 已提交
3471
            gen_helper_movmskps(cpu_tmp2_i32, cpu_env, cpu_ptr0);
3472
            tcg_gen_extu_i32_tl(cpu_regs[reg], cpu_tmp2_i32);
B
bellard 已提交
3473 3474 3475
            break;
        case 0x150: /* movmskpd */
            rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
3476 3477
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, 
                             offsetof(CPUX86State,xmm_regs[rm]));
B
Blue Swirl 已提交
3478
            gen_helper_movmskpd(cpu_tmp2_i32, cpu_env, cpu_ptr0);
3479
            tcg_gen_extu_i32_tl(cpu_regs[reg], cpu_tmp2_i32);
B
bellard 已提交
3480 3481 3482
            break;
        case 0x02a: /* cvtpi2ps */
        case 0x12a: /* cvtpi2pd */
B
Blue Swirl 已提交
3483
            gen_helper_enter_mmx(cpu_env);
B
bellard 已提交
3484
            if (mod != 3) {
3485
                gen_lea_modrm(env, s, modrm);
B
bellard 已提交
3486
                op2_offset = offsetof(CPUX86State,mmx_t0);
3487
                gen_ldq_env_A0(s, op2_offset);
B
bellard 已提交
3488 3489 3490 3491 3492
            } else {
                rm = (modrm & 7);
                op2_offset = offsetof(CPUX86State,fpregs[rm].mmx);
            }
            op1_offset = offsetof(CPUX86State,xmm_regs[reg]);
B
bellard 已提交
3493 3494
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
bellard 已提交
3495 3496
            switch(b >> 8) {
            case 0x0:
B
Blue Swirl 已提交
3497
                gen_helper_cvtpi2ps(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
3498 3499 3500
                break;
            default:
            case 0x1:
B
Blue Swirl 已提交
3501
                gen_helper_cvtpi2pd(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
3502 3503 3504 3505 3506
                break;
            }
            break;
        case 0x22a: /* cvtsi2ss */
        case 0x32a: /* cvtsi2sd */
3507
            ot = (s->dflag == 2) ? MO_64 : MO_32;
3508
            gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
B
bellard 已提交
3509
            op1_offset = offsetof(CPUX86State,xmm_regs[reg]);
B
bellard 已提交
3510
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
3511
            if (ot == MO_32) {
B
Blue Swirl 已提交
3512
                SSEFunc_0_epi sse_fn_epi = sse_op_table3ai[(b >> 8) & 1];
B
bellard 已提交
3513
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
B
Blue Swirl 已提交
3514
                sse_fn_epi(cpu_env, cpu_ptr0, cpu_tmp2_i32);
B
bellard 已提交
3515
            } else {
3516
#ifdef TARGET_X86_64
B
Blue Swirl 已提交
3517 3518
                SSEFunc_0_epl sse_fn_epl = sse_op_table3aq[(b >> 8) & 1];
                sse_fn_epl(cpu_env, cpu_ptr0, cpu_T[0]);
3519 3520 3521
#else
                goto illegal_op;
#endif
B
bellard 已提交
3522
            }
B
bellard 已提交
3523 3524 3525 3526 3527
            break;
        case 0x02c: /* cvttps2pi */
        case 0x12c: /* cvttpd2pi */
        case 0x02d: /* cvtps2pi */
        case 0x12d: /* cvtpd2pi */
B
Blue Swirl 已提交
3528
            gen_helper_enter_mmx(cpu_env);
B
bellard 已提交
3529
            if (mod != 3) {
3530
                gen_lea_modrm(env, s, modrm);
B
bellard 已提交
3531
                op2_offset = offsetof(CPUX86State,xmm_t0);
3532
                gen_ldo_env_A0(s, op2_offset);
B
bellard 已提交
3533 3534 3535 3536 3537
            } else {
                rm = (modrm & 7) | REX_B(s);
                op2_offset = offsetof(CPUX86State,xmm_regs[rm]);
            }
            op1_offset = offsetof(CPUX86State,fpregs[reg & 7].mmx);
B
bellard 已提交
3538 3539
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
bellard 已提交
3540 3541
            switch(b) {
            case 0x02c:
B
Blue Swirl 已提交
3542
                gen_helper_cvttps2pi(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
3543 3544
                break;
            case 0x12c:
B
Blue Swirl 已提交
3545
                gen_helper_cvttpd2pi(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
3546 3547
                break;
            case 0x02d:
B
Blue Swirl 已提交
3548
                gen_helper_cvtps2pi(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
3549 3550
                break;
            case 0x12d:
B
Blue Swirl 已提交
3551
                gen_helper_cvtpd2pi(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
3552 3553 3554 3555 3556 3557 3558
                break;
            }
            break;
        case 0x22c: /* cvttss2si */
        case 0x32c: /* cvttsd2si */
        case 0x22d: /* cvtss2si */
        case 0x32d: /* cvtsd2si */
3559
            ot = (s->dflag == 2) ? MO_64 : MO_32;
B
bellard 已提交
3560
            if (mod != 3) {
3561
                gen_lea_modrm(env, s, modrm);
B
bellard 已提交
3562
                if ((b >> 8) & 1) {
3563
                    gen_ldq_env_A0(s, offsetof(CPUX86State, xmm_t0.XMM_Q(0)));
B
bellard 已提交
3564
                } else {
3565
                    gen_op_ld_v(s, MO_32, cpu_T[0], cpu_A0);
B
bellard 已提交
3566
                    tcg_gen_st32_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,xmm_t0.XMM_L(0)));
B
bellard 已提交
3567 3568 3569 3570 3571 3572
                }
                op2_offset = offsetof(CPUX86State,xmm_t0);
            } else {
                rm = (modrm & 7) | REX_B(s);
                op2_offset = offsetof(CPUX86State,xmm_regs[rm]);
            }
B
bellard 已提交
3573
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op2_offset);
3574
            if (ot == MO_32) {
B
Blue Swirl 已提交
3575
                SSEFunc_i_ep sse_fn_i_ep =
3576
                    sse_op_table3bi[((b >> 7) & 2) | (b & 1)];
B
Blue Swirl 已提交
3577
                sse_fn_i_ep(cpu_tmp2_i32, cpu_env, cpu_ptr0);
3578
                tcg_gen_extu_i32_tl(cpu_T[0], cpu_tmp2_i32);
B
bellard 已提交
3579
            } else {
3580
#ifdef TARGET_X86_64
B
Blue Swirl 已提交
3581
                SSEFunc_l_ep sse_fn_l_ep =
3582
                    sse_op_table3bq[((b >> 7) & 2) | (b & 1)];
B
Blue Swirl 已提交
3583
                sse_fn_l_ep(cpu_T[0], cpu_env, cpu_ptr0);
3584 3585 3586
#else
                goto illegal_op;
#endif
B
bellard 已提交
3587
            }
B
bellard 已提交
3588
            gen_op_mov_reg_T0(ot, reg);
B
bellard 已提交
3589 3590
            break;
        case 0xc4: /* pinsrw */
3591
        case 0x1c4:
B
bellard 已提交
3592
            s->rip_offset = 1;
3593
            gen_ldst_modrm(env, s, modrm, MO_16, OR_TMP0, 0);
3594
            val = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
3595 3596
            if (b1) {
                val &= 7;
B
bellard 已提交
3597 3598
                tcg_gen_st16_tl(cpu_T[0], cpu_env,
                                offsetof(CPUX86State,xmm_regs[reg].XMM_W(val)));
B
bellard 已提交
3599 3600
            } else {
                val &= 3;
B
bellard 已提交
3601 3602
                tcg_gen_st16_tl(cpu_T[0], cpu_env,
                                offsetof(CPUX86State,fpregs[reg].mmx.MMX_W(val)));
B
bellard 已提交
3603 3604 3605
            }
            break;
        case 0xc5: /* pextrw */
3606
        case 0x1c5:
B
bellard 已提交
3607 3608
            if (mod != 3)
                goto illegal_op;
3609
            ot = (s->dflag == 2) ? MO_64 : MO_32;
3610
            val = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
3611 3612 3613
            if (b1) {
                val &= 7;
                rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
3614 3615
                tcg_gen_ld16u_tl(cpu_T[0], cpu_env,
                                 offsetof(CPUX86State,xmm_regs[rm].XMM_W(val)));
B
bellard 已提交
3616 3617 3618
            } else {
                val &= 3;
                rm = (modrm & 7);
B
bellard 已提交
3619 3620
                tcg_gen_ld16u_tl(cpu_T[0], cpu_env,
                                offsetof(CPUX86State,fpregs[rm].mmx.MMX_W(val)));
B
bellard 已提交
3621 3622
            }
            reg = ((modrm >> 3) & 7) | rex_r;
3623
            gen_op_mov_reg_T0(ot, reg);
B
bellard 已提交
3624 3625 3626
            break;
        case 0x1d6: /* movq ea, xmm */
            if (mod != 3) {
3627
                gen_lea_modrm(env, s, modrm);
3628 3629
                gen_stq_env_A0(s, offsetof(CPUX86State,
                                           xmm_regs[reg].XMM_Q(0)));
B
bellard 已提交
3630 3631 3632 3633 3634 3635 3636 3637
            } else {
                rm = (modrm & 7) | REX_B(s);
                gen_op_movq(offsetof(CPUX86State,xmm_regs[rm].XMM_Q(0)),
                            offsetof(CPUX86State,xmm_regs[reg].XMM_Q(0)));
                gen_op_movq_env_0(offsetof(CPUX86State,xmm_regs[rm].XMM_Q(1)));
            }
            break;
        case 0x2d6: /* movq2dq */
B
Blue Swirl 已提交
3638
            gen_helper_enter_mmx(cpu_env);
3639 3640 3641 3642
            rm = (modrm & 7);
            gen_op_movq(offsetof(CPUX86State,xmm_regs[reg].XMM_Q(0)),
                        offsetof(CPUX86State,fpregs[rm].mmx));
            gen_op_movq_env_0(offsetof(CPUX86State,xmm_regs[reg].XMM_Q(1)));
B
bellard 已提交
3643 3644
            break;
        case 0x3d6: /* movdq2q */
B
Blue Swirl 已提交
3645
            gen_helper_enter_mmx(cpu_env);
3646 3647 3648
            rm = (modrm & 7) | REX_B(s);
            gen_op_movq(offsetof(CPUX86State,fpregs[reg & 7].mmx),
                        offsetof(CPUX86State,xmm_regs[rm].XMM_Q(0)));
B
bellard 已提交
3649 3650 3651 3652 3653 3654 3655
            break;
        case 0xd7: /* pmovmskb */
        case 0x1d7:
            if (mod != 3)
                goto illegal_op;
            if (b1) {
                rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
3656
                tcg_gen_addi_ptr(cpu_ptr0, cpu_env, offsetof(CPUX86State,xmm_regs[rm]));
B
Blue Swirl 已提交
3657
                gen_helper_pmovmskb_xmm(cpu_tmp2_i32, cpu_env, cpu_ptr0);
B
bellard 已提交
3658 3659
            } else {
                rm = (modrm & 7);
B
bellard 已提交
3660
                tcg_gen_addi_ptr(cpu_ptr0, cpu_env, offsetof(CPUX86State,fpregs[rm].mmx));
B
Blue Swirl 已提交
3661
                gen_helper_pmovmskb_mmx(cpu_tmp2_i32, cpu_env, cpu_ptr0);
B
bellard 已提交
3662 3663
            }
            reg = ((modrm >> 3) & 7) | rex_r;
3664
            tcg_gen_extu_i32_tl(cpu_regs[reg], cpu_tmp2_i32);
B
bellard 已提交
3665
            break;
R
Richard Henderson 已提交
3666

B
balrog 已提交
3667
        case 0x138:
3668
        case 0x038:
B
balrog 已提交
3669
            b = modrm;
R
Richard Henderson 已提交
3670 3671 3672
            if ((b & 0xf0) == 0xf0) {
                goto do_0f_38_fx;
            }
3673
            modrm = cpu_ldub_code(env, s->pc++);
B
balrog 已提交
3674 3675 3676
            rm = modrm & 7;
            reg = ((modrm >> 3) & 7) | rex_r;
            mod = (modrm >> 6) & 3;
3677 3678 3679
            if (b1 >= 2) {
                goto illegal_op;
            }
B
balrog 已提交
3680

B
Blue Swirl 已提交
3681 3682
            sse_fn_epp = sse_op_table6[b].op[b1];
            if (!sse_fn_epp) {
B
balrog 已提交
3683
                goto illegal_op;
B
Blue Swirl 已提交
3684
            }
B
balrog 已提交
3685 3686
            if (!(s->cpuid_ext_features & sse_op_table6[b].ext_mask))
                goto illegal_op;
B
balrog 已提交
3687 3688 3689 3690 3691 3692 3693

            if (b1) {
                op1_offset = offsetof(CPUX86State,xmm_regs[reg]);
                if (mod == 3) {
                    op2_offset = offsetof(CPUX86State,xmm_regs[rm | REX_B(s)]);
                } else {
                    op2_offset = offsetof(CPUX86State,xmm_t0);
3694
                    gen_lea_modrm(env, s, modrm);
B
balrog 已提交
3695 3696 3697 3698
                    switch (b) {
                    case 0x20: case 0x30: /* pmovsxbw, pmovzxbw */
                    case 0x23: case 0x33: /* pmovsxwd, pmovzxwd */
                    case 0x25: case 0x35: /* pmovsxdq, pmovzxdq */
3699
                        gen_ldq_env_A0(s, op2_offset +
B
balrog 已提交
3700 3701 3702 3703
                                        offsetof(XMMReg, XMM_Q(0)));
                        break;
                    case 0x21: case 0x31: /* pmovsxbd, pmovzxbd */
                    case 0x24: case 0x34: /* pmovsxwq, pmovzxwq */
3704 3705
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
B
balrog 已提交
3706 3707 3708 3709
                        tcg_gen_st_i32(cpu_tmp2_i32, cpu_env, op2_offset +
                                        offsetof(XMMReg, XMM_L(0)));
                        break;
                    case 0x22: case 0x32: /* pmovsxbq, pmovzxbq */
3710 3711
                        tcg_gen_qemu_ld_tl(cpu_tmp0, cpu_A0,
                                           s->mem_index, MO_LEUW);
B
balrog 已提交
3712 3713 3714 3715
                        tcg_gen_st16_tl(cpu_tmp0, cpu_env, op2_offset +
                                        offsetof(XMMReg, XMM_W(0)));
                        break;
                    case 0x2a:            /* movntqda */
3716
                        gen_ldo_env_A0(s, op1_offset);
B
balrog 已提交
3717 3718
                        return;
                    default:
3719
                        gen_ldo_env_A0(s, op2_offset);
B
balrog 已提交
3720
                    }
B
balrog 已提交
3721 3722 3723 3724 3725 3726 3727
                }
            } else {
                op1_offset = offsetof(CPUX86State,fpregs[reg].mmx);
                if (mod == 3) {
                    op2_offset = offsetof(CPUX86State,fpregs[rm].mmx);
                } else {
                    op2_offset = offsetof(CPUX86State,mmx_t0);
3728
                    gen_lea_modrm(env, s, modrm);
3729
                    gen_ldq_env_A0(s, op2_offset);
B
balrog 已提交
3730 3731
                }
            }
B
Blue Swirl 已提交
3732
            if (sse_fn_epp == SSE_SPECIAL) {
B
balrog 已提交
3733
                goto illegal_op;
B
Blue Swirl 已提交
3734
            }
B
balrog 已提交
3735

B
balrog 已提交
3736 3737
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
3738
            sse_fn_epp(cpu_env, cpu_ptr0, cpu_ptr1);
B
balrog 已提交
3739

3740 3741 3742
            if (b == 0x17) {
                set_cc_op(s, CC_OP_EFLAGS);
            }
B
balrog 已提交
3743
            break;
R
Richard Henderson 已提交
3744 3745 3746 3747 3748 3749

        case 0x238:
        case 0x338:
        do_0f_38_fx:
            /* Various integer extensions at 0f 38 f[0-f].  */
            b = modrm | (b1 << 8);
3750
            modrm = cpu_ldub_code(env, s->pc++);
B
balrog 已提交
3751 3752
            reg = ((modrm >> 3) & 7) | rex_r;

R
Richard Henderson 已提交
3753 3754 3755 3756 3757 3758 3759 3760
            switch (b) {
            case 0x3f0: /* crc32 Gd,Eb */
            case 0x3f1: /* crc32 Gd,Ey */
            do_crc32:
                if (!(s->cpuid_ext_features & CPUID_EXT_SSE42)) {
                    goto illegal_op;
                }
                if ((b & 0xff) == 0xf0) {
3761
                    ot = MO_8;
R
Richard Henderson 已提交
3762
                } else if (s->dflag != 2) {
3763
                    ot = (s->prefix & PREFIX_DATA ? MO_16 : MO_32);
R
Richard Henderson 已提交
3764
                } else {
3765
                    ot = MO_64;
R
Richard Henderson 已提交
3766
                }
B
balrog 已提交
3767

3768
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_regs[reg]);
R
Richard Henderson 已提交
3769 3770 3771
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
                gen_helper_crc32(cpu_T[0], cpu_tmp2_i32,
                                 cpu_T[0], tcg_const_i32(8 << ot));
B
balrog 已提交
3772

3773
                ot = (s->dflag == 2) ? MO_64 : MO_32;
R
Richard Henderson 已提交
3774 3775
                gen_op_mov_reg_T0(ot, reg);
                break;
B
balrog 已提交
3776

R
Richard Henderson 已提交
3777 3778 3779 3780 3781 3782 3783 3784 3785 3786 3787 3788 3789 3790 3791
            case 0x1f0: /* crc32 or movbe */
            case 0x1f1:
                /* For these insns, the f3 prefix is supposed to have priority
                   over the 66 prefix, but that's not what we implement above
                   setting b1.  */
                if (s->prefix & PREFIX_REPNZ) {
                    goto do_crc32;
                }
                /* FALLTHRU */
            case 0x0f0: /* movbe Gy,My */
            case 0x0f1: /* movbe My,Gy */
                if (!(s->cpuid_ext_features & CPUID_EXT_MOVBE)) {
                    goto illegal_op;
                }
                if (s->dflag != 2) {
3792
                    ot = (s->prefix & PREFIX_DATA ? MO_16 : MO_32);
R
Richard Henderson 已提交
3793
                } else {
3794
                    ot = MO_64;
R
Richard Henderson 已提交
3795 3796
                }

3797
                gen_lea_modrm(env, s, modrm);
R
Richard Henderson 已提交
3798
                if ((b & 1) == 0) {
3799 3800
                    tcg_gen_qemu_ld_tl(cpu_T[0], cpu_A0,
                                       s->mem_index, ot | MO_BE);
R
Richard Henderson 已提交
3801 3802
                    gen_op_mov_reg_T0(ot, reg);
                } else {
3803 3804
                    tcg_gen_qemu_st_tl(cpu_regs[reg], cpu_A0,
                                       s->mem_index, ot | MO_BE);
R
Richard Henderson 已提交
3805 3806 3807
                }
                break;

R
Richard Henderson 已提交
3808 3809 3810 3811 3812 3813
            case 0x0f2: /* andn Gy, By, Ey */
                if (!(s->cpuid_7_0_ebx_features & CPUID_7_0_EBX_BMI1)
                    || !(s->prefix & PREFIX_VEX)
                    || s->vex_l != 0) {
                    goto illegal_op;
                }
3814
                ot = s->dflag == 2 ? MO_64 : MO_32;
R
Richard Henderson 已提交
3815 3816 3817 3818 3819 3820 3821
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
                tcg_gen_andc_tl(cpu_T[0], cpu_regs[s->vex_v], cpu_T[0]);
                gen_op_mov_reg_T0(ot, reg);
                gen_op_update1_cc();
                set_cc_op(s, CC_OP_LOGICB + ot);
                break;

R
Richard Henderson 已提交
3822 3823 3824 3825 3826 3827
            case 0x0f7: /* bextr Gy, Ey, By */
                if (!(s->cpuid_7_0_ebx_features & CPUID_7_0_EBX_BMI1)
                    || !(s->prefix & PREFIX_VEX)
                    || s->vex_l != 0) {
                    goto illegal_op;
                }
3828
                ot = s->dflag == 2 ? MO_64 : MO_32;
R
Richard Henderson 已提交
3829 3830 3831 3832 3833 3834 3835 3836 3837
                {
                    TCGv bound, zero;

                    gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
                    /* Extract START, and shift the operand.
                       Shifts larger than operand size get zeros.  */
                    tcg_gen_ext8u_tl(cpu_A0, cpu_regs[s->vex_v]);
                    tcg_gen_shr_tl(cpu_T[0], cpu_T[0], cpu_A0);

3838
                    bound = tcg_const_tl(ot == MO_64 ? 63 : 31);
R
Richard Henderson 已提交
3839 3840 3841 3842 3843 3844 3845 3846 3847 3848 3849 3850 3851 3852 3853 3854 3855 3856 3857 3858 3859 3860 3861
                    zero = tcg_const_tl(0);
                    tcg_gen_movcond_tl(TCG_COND_LEU, cpu_T[0], cpu_A0, bound,
                                       cpu_T[0], zero);
                    tcg_temp_free(zero);

                    /* Extract the LEN into a mask.  Lengths larger than
                       operand size get all ones.  */
                    tcg_gen_shri_tl(cpu_A0, cpu_regs[s->vex_v], 8);
                    tcg_gen_ext8u_tl(cpu_A0, cpu_A0);
                    tcg_gen_movcond_tl(TCG_COND_LEU, cpu_A0, cpu_A0, bound,
                                       cpu_A0, bound);
                    tcg_temp_free(bound);
                    tcg_gen_movi_tl(cpu_T[1], 1);
                    tcg_gen_shl_tl(cpu_T[1], cpu_T[1], cpu_A0);
                    tcg_gen_subi_tl(cpu_T[1], cpu_T[1], 1);
                    tcg_gen_and_tl(cpu_T[0], cpu_T[0], cpu_T[1]);

                    gen_op_mov_reg_T0(ot, reg);
                    gen_op_update1_cc();
                    set_cc_op(s, CC_OP_LOGICB + ot);
                }
                break;

R
Richard Henderson 已提交
3862 3863 3864 3865 3866 3867
            case 0x0f5: /* bzhi Gy, Ey, By */
                if (!(s->cpuid_7_0_ebx_features & CPUID_7_0_EBX_BMI2)
                    || !(s->prefix & PREFIX_VEX)
                    || s->vex_l != 0) {
                    goto illegal_op;
                }
3868
                ot = s->dflag == 2 ? MO_64 : MO_32;
R
Richard Henderson 已提交
3869 3870 3871
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
                tcg_gen_ext8u_tl(cpu_T[1], cpu_regs[s->vex_v]);
                {
3872
                    TCGv bound = tcg_const_tl(ot == MO_64 ? 63 : 31);
R
Richard Henderson 已提交
3873 3874 3875 3876 3877 3878 3879 3880 3881 3882 3883 3884 3885 3886 3887 3888
                    /* Note that since we're using BMILG (in order to get O
                       cleared) we need to store the inverse into C.  */
                    tcg_gen_setcond_tl(TCG_COND_LT, cpu_cc_src,
                                       cpu_T[1], bound);
                    tcg_gen_movcond_tl(TCG_COND_GT, cpu_T[1], cpu_T[1],
                                       bound, bound, cpu_T[1]);
                    tcg_temp_free(bound);
                }
                tcg_gen_movi_tl(cpu_A0, -1);
                tcg_gen_shl_tl(cpu_A0, cpu_A0, cpu_T[1]);
                tcg_gen_andc_tl(cpu_T[0], cpu_T[0], cpu_A0);
                gen_op_mov_reg_T0(ot, reg);
                gen_op_update1_cc();
                set_cc_op(s, CC_OP_BMILGB + ot);
                break;

R
Richard Henderson 已提交
3889 3890 3891 3892 3893 3894
            case 0x3f6: /* mulx By, Gy, rdx, Ey */
                if (!(s->cpuid_7_0_ebx_features & CPUID_7_0_EBX_BMI2)
                    || !(s->prefix & PREFIX_VEX)
                    || s->vex_l != 0) {
                    goto illegal_op;
                }
3895
                ot = s->dflag == 2 ? MO_64 : MO_32;
R
Richard Henderson 已提交
3896 3897 3898
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
                switch (ot) {
                default:
3899 3900 3901 3902 3903 3904
                    tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
                    tcg_gen_trunc_tl_i32(cpu_tmp3_i32, cpu_regs[R_EDX]);
                    tcg_gen_mulu2_i32(cpu_tmp2_i32, cpu_tmp3_i32,
                                      cpu_tmp2_i32, cpu_tmp3_i32);
                    tcg_gen_extu_i32_tl(cpu_regs[s->vex_v], cpu_tmp2_i32);
                    tcg_gen_extu_i32_tl(cpu_regs[reg], cpu_tmp3_i32);
R
Richard Henderson 已提交
3905 3906
                    break;
#ifdef TARGET_X86_64
3907
                case MO_64:
3908 3909
                    tcg_gen_mulu2_i64(cpu_regs[s->vex_v], cpu_regs[reg],
                                      cpu_T[0], cpu_regs[R_EDX]);
R
Richard Henderson 已提交
3910 3911 3912 3913 3914
                    break;
#endif
                }
                break;

3915 3916 3917 3918 3919 3920
            case 0x3f5: /* pdep Gy, By, Ey */
                if (!(s->cpuid_7_0_ebx_features & CPUID_7_0_EBX_BMI2)
                    || !(s->prefix & PREFIX_VEX)
                    || s->vex_l != 0) {
                    goto illegal_op;
                }
3921
                ot = s->dflag == 2 ? MO_64 : MO_32;
3922 3923 3924 3925 3926 3927 3928 3929 3930 3931 3932 3933 3934 3935 3936 3937 3938
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
                /* Note that by zero-extending the mask operand, we
                   automatically handle zero-extending the result.  */
                if (s->dflag == 2) {
                    tcg_gen_mov_tl(cpu_T[1], cpu_regs[s->vex_v]);
                } else {
                    tcg_gen_ext32u_tl(cpu_T[1], cpu_regs[s->vex_v]);
                }
                gen_helper_pdep(cpu_regs[reg], cpu_T[0], cpu_T[1]);
                break;

            case 0x2f5: /* pext Gy, By, Ey */
                if (!(s->cpuid_7_0_ebx_features & CPUID_7_0_EBX_BMI2)
                    || !(s->prefix & PREFIX_VEX)
                    || s->vex_l != 0) {
                    goto illegal_op;
                }
3939
                ot = s->dflag == 2 ? MO_64 : MO_32;
3940 3941 3942 3943 3944 3945 3946 3947 3948 3949 3950
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
                /* Note that by zero-extending the mask operand, we
                   automatically handle zero-extending the result.  */
                if (s->dflag == 2) {
                    tcg_gen_mov_tl(cpu_T[1], cpu_regs[s->vex_v]);
                } else {
                    tcg_gen_ext32u_tl(cpu_T[1], cpu_regs[s->vex_v]);
                }
                gen_helper_pext(cpu_regs[reg], cpu_T[0], cpu_T[1]);
                break;

3951 3952 3953 3954 3955
            case 0x1f6: /* adcx Gy, Ey */
            case 0x2f6: /* adox Gy, Ey */
                if (!(s->cpuid_7_0_ebx_features & CPUID_7_0_EBX_ADX)) {
                    goto illegal_op;
                } else {
3956
                    TCGv carry_in, carry_out, zero;
3957 3958
                    int end_op;

3959
                    ot = (s->dflag == 2 ? MO_64 : MO_32);
3960 3961 3962 3963 3964 3965 3966 3967 3968 3969 3970 3971 3972 3973 3974 3975 3976 3977 3978 3979 3980 3981 3982 3983 3984 3985 3986
                    gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);

                    /* Re-use the carry-out from a previous round.  */
                    TCGV_UNUSED(carry_in);
                    carry_out = (b == 0x1f6 ? cpu_cc_dst : cpu_cc_src2);
                    switch (s->cc_op) {
                    case CC_OP_ADCX:
                        if (b == 0x1f6) {
                            carry_in = cpu_cc_dst;
                            end_op = CC_OP_ADCX;
                        } else {
                            end_op = CC_OP_ADCOX;
                        }
                        break;
                    case CC_OP_ADOX:
                        if (b == 0x1f6) {
                            end_op = CC_OP_ADCOX;
                        } else {
                            carry_in = cpu_cc_src2;
                            end_op = CC_OP_ADOX;
                        }
                        break;
                    case CC_OP_ADCOX:
                        end_op = CC_OP_ADCOX;
                        carry_in = carry_out;
                        break;
                    default:
3987
                        end_op = (b == 0x1f6 ? CC_OP_ADCX : CC_OP_ADOX);
3988 3989 3990 3991 3992 3993 3994 3995 3996 3997 3998 3999 4000 4001 4002
                        break;
                    }
                    /* If we can't reuse carry-out, get it out of EFLAGS.  */
                    if (TCGV_IS_UNUSED(carry_in)) {
                        if (s->cc_op != CC_OP_ADCX && s->cc_op != CC_OP_ADOX) {
                            gen_compute_eflags(s);
                        }
                        carry_in = cpu_tmp0;
                        tcg_gen_shri_tl(carry_in, cpu_cc_src,
                                        ctz32(b == 0x1f6 ? CC_C : CC_O));
                        tcg_gen_andi_tl(carry_in, carry_in, 1);
                    }

                    switch (ot) {
#ifdef TARGET_X86_64
4003
                    case MO_32:
4004 4005 4006 4007 4008 4009 4010 4011 4012 4013 4014 4015
                        /* If we know TL is 64-bit, and we want a 32-bit
                           result, just do everything in 64-bit arithmetic.  */
                        tcg_gen_ext32u_i64(cpu_regs[reg], cpu_regs[reg]);
                        tcg_gen_ext32u_i64(cpu_T[0], cpu_T[0]);
                        tcg_gen_add_i64(cpu_T[0], cpu_T[0], cpu_regs[reg]);
                        tcg_gen_add_i64(cpu_T[0], cpu_T[0], carry_in);
                        tcg_gen_ext32u_i64(cpu_regs[reg], cpu_T[0]);
                        tcg_gen_shri_i64(carry_out, cpu_T[0], 32);
                        break;
#endif
                    default:
                        /* Otherwise compute the carry-out in two steps.  */
4016 4017 4018 4019 4020 4021 4022 4023
                        zero = tcg_const_tl(0);
                        tcg_gen_add2_tl(cpu_T[0], carry_out,
                                        cpu_T[0], zero,
                                        carry_in, zero);
                        tcg_gen_add2_tl(cpu_regs[reg], carry_out,
                                        cpu_regs[reg], carry_out,
                                        cpu_T[0], zero);
                        tcg_temp_free(zero);
4024 4025 4026 4027 4028 4029
                        break;
                    }
                    set_cc_op(s, end_op);
                }
                break;

4030 4031 4032 4033 4034 4035 4036 4037
            case 0x1f7: /* shlx Gy, Ey, By */
            case 0x2f7: /* sarx Gy, Ey, By */
            case 0x3f7: /* shrx Gy, Ey, By */
                if (!(s->cpuid_7_0_ebx_features & CPUID_7_0_EBX_BMI2)
                    || !(s->prefix & PREFIX_VEX)
                    || s->vex_l != 0) {
                    goto illegal_op;
                }
4038
                ot = (s->dflag == 2 ? MO_64 : MO_32);
4039
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
4040
                if (ot == MO_64) {
4041 4042 4043 4044 4045 4046 4047
                    tcg_gen_andi_tl(cpu_T[1], cpu_regs[s->vex_v], 63);
                } else {
                    tcg_gen_andi_tl(cpu_T[1], cpu_regs[s->vex_v], 31);
                }
                if (b == 0x1f7) {
                    tcg_gen_shl_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
                } else if (b == 0x2f7) {
4048
                    if (ot != MO_64) {
4049 4050 4051 4052
                        tcg_gen_ext32s_tl(cpu_T[0], cpu_T[0]);
                    }
                    tcg_gen_sar_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
                } else {
4053
                    if (ot != MO_64) {
4054 4055 4056 4057 4058 4059 4060
                        tcg_gen_ext32u_tl(cpu_T[0], cpu_T[0]);
                    }
                    tcg_gen_shr_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
                }
                gen_op_mov_reg_T0(ot, reg);
                break;

4061 4062 4063 4064 4065 4066 4067 4068 4069
            case 0x0f3:
            case 0x1f3:
            case 0x2f3:
            case 0x3f3: /* Group 17 */
                if (!(s->cpuid_7_0_ebx_features & CPUID_7_0_EBX_BMI1)
                    || !(s->prefix & PREFIX_VEX)
                    || s->vex_l != 0) {
                    goto illegal_op;
                }
4070
                ot = s->dflag == 2 ? MO_64 : MO_32;
4071 4072 4073 4074 4075 4076 4077 4078 4079 4080 4081 4082 4083 4084 4085 4086 4087 4088 4089 4090 4091 4092 4093 4094 4095 4096 4097 4098 4099 4100 4101 4102
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);

                switch (reg & 7) {
                case 1: /* blsr By,Ey */
                    tcg_gen_neg_tl(cpu_T[1], cpu_T[0]);
                    tcg_gen_and_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
                    gen_op_mov_reg_T0(ot, s->vex_v);
                    gen_op_update2_cc();
                    set_cc_op(s, CC_OP_BMILGB + ot);
                    break;

                case 2: /* blsmsk By,Ey */
                    tcg_gen_mov_tl(cpu_cc_src, cpu_T[0]);
                    tcg_gen_subi_tl(cpu_T[0], cpu_T[0], 1);
                    tcg_gen_xor_tl(cpu_T[0], cpu_T[0], cpu_cc_src);
                    tcg_gen_mov_tl(cpu_cc_dst, cpu_T[0]);
                    set_cc_op(s, CC_OP_BMILGB + ot);
                    break;

                case 3: /* blsi By, Ey */
                    tcg_gen_mov_tl(cpu_cc_src, cpu_T[0]);
                    tcg_gen_subi_tl(cpu_T[0], cpu_T[0], 1);
                    tcg_gen_and_tl(cpu_T[0], cpu_T[0], cpu_cc_src);
                    tcg_gen_mov_tl(cpu_cc_dst, cpu_T[0]);
                    set_cc_op(s, CC_OP_BMILGB + ot);
                    break;

                default:
                    goto illegal_op;
                }
                break;

R
Richard Henderson 已提交
4103 4104 4105
            default:
                goto illegal_op;
            }
B
balrog 已提交
4106
            break;
R
Richard Henderson 已提交
4107

B
balrog 已提交
4108 4109
        case 0x03a:
        case 0x13a:
B
balrog 已提交
4110
            b = modrm;
4111
            modrm = cpu_ldub_code(env, s->pc++);
B
balrog 已提交
4112 4113 4114
            rm = modrm & 7;
            reg = ((modrm >> 3) & 7) | rex_r;
            mod = (modrm >> 6) & 3;
4115 4116 4117
            if (b1 >= 2) {
                goto illegal_op;
            }
B
balrog 已提交
4118

B
Blue Swirl 已提交
4119 4120
            sse_fn_eppi = sse_op_table7[b].op[b1];
            if (!sse_fn_eppi) {
B
balrog 已提交
4121
                goto illegal_op;
B
Blue Swirl 已提交
4122
            }
B
balrog 已提交
4123 4124 4125
            if (!(s->cpuid_ext_features & sse_op_table7[b].ext_mask))
                goto illegal_op;

B
Blue Swirl 已提交
4126
            if (sse_fn_eppi == SSE_SPECIAL) {
4127
                ot = (s->dflag == 2) ? MO_64 : MO_32;
B
balrog 已提交
4128 4129
                rm = (modrm & 7) | REX_B(s);
                if (mod != 3)
4130
                    gen_lea_modrm(env, s, modrm);
B
balrog 已提交
4131
                reg = ((modrm >> 3) & 7) | rex_r;
4132
                val = cpu_ldub_code(env, s->pc++);
B
balrog 已提交
4133 4134 4135 4136
                switch (b) {
                case 0x14: /* pextrb */
                    tcg_gen_ld8u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,
                                            xmm_regs[reg].XMM_B(val & 15)));
4137
                    if (mod == 3) {
B
balrog 已提交
4138
                        gen_op_mov_reg_T0(ot, rm);
4139 4140 4141 4142
                    } else {
                        tcg_gen_qemu_st_tl(cpu_T[0], cpu_A0,
                                           s->mem_index, MO_UB);
                    }
B
balrog 已提交
4143 4144 4145 4146
                    break;
                case 0x15: /* pextrw */
                    tcg_gen_ld16u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,
                                            xmm_regs[reg].XMM_W(val & 7)));
4147
                    if (mod == 3) {
B
balrog 已提交
4148
                        gen_op_mov_reg_T0(ot, rm);
4149 4150 4151 4152
                    } else {
                        tcg_gen_qemu_st_tl(cpu_T[0], cpu_A0,
                                           s->mem_index, MO_LEUW);
                    }
B
balrog 已提交
4153 4154
                    break;
                case 0x16:
4155
                    if (ot == MO_32) { /* pextrd */
B
balrog 已提交
4156 4157 4158
                        tcg_gen_ld_i32(cpu_tmp2_i32, cpu_env,
                                        offsetof(CPUX86State,
                                                xmm_regs[reg].XMM_L(val & 3)));
4159
                        if (mod == 3) {
4160
                            tcg_gen_extu_i32_tl(cpu_regs[rm], cpu_tmp2_i32);
4161
                        } else {
4162 4163
                            tcg_gen_qemu_st_i32(cpu_tmp2_i32, cpu_A0,
                                                s->mem_index, MO_LEUL);
4164
                        }
B
balrog 已提交
4165
                    } else { /* pextrq */
P
pbrook 已提交
4166
#ifdef TARGET_X86_64
B
balrog 已提交
4167 4168 4169
                        tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env,
                                        offsetof(CPUX86State,
                                                xmm_regs[reg].XMM_Q(val & 1)));
4170
                        if (mod == 3) {
4171
                            tcg_gen_mov_i64(cpu_regs[rm], cpu_tmp1_i64);
4172 4173 4174 4175
                        } else {
                            tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0,
                                                s->mem_index, MO_LEQ);
                        }
P
pbrook 已提交
4176 4177 4178
#else
                        goto illegal_op;
#endif
B
balrog 已提交
4179 4180 4181 4182 4183
                    }
                    break;
                case 0x17: /* extractps */
                    tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,
                                            xmm_regs[reg].XMM_L(val & 3)));
4184
                    if (mod == 3) {
B
balrog 已提交
4185
                        gen_op_mov_reg_T0(ot, rm);
4186 4187 4188 4189
                    } else {
                        tcg_gen_qemu_st_tl(cpu_T[0], cpu_A0,
                                           s->mem_index, MO_LEUL);
                    }
B
balrog 已提交
4190 4191
                    break;
                case 0x20: /* pinsrb */
4192
                    if (mod == 3) {
4193
                        gen_op_mov_TN_reg(MO_32, 0, rm);
4194 4195 4196 4197
                    } else {
                        tcg_gen_qemu_ld_tl(cpu_T[0], cpu_A0,
                                           s->mem_index, MO_UB);
                    }
4198
                    tcg_gen_st8_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,
B
balrog 已提交
4199 4200 4201
                                            xmm_regs[reg].XMM_B(val & 15)));
                    break;
                case 0x21: /* insertps */
P
pbrook 已提交
4202
                    if (mod == 3) {
B
balrog 已提交
4203 4204 4205
                        tcg_gen_ld_i32(cpu_tmp2_i32, cpu_env,
                                        offsetof(CPUX86State,xmm_regs[rm]
                                                .XMM_L((val >> 6) & 3)));
P
pbrook 已提交
4206
                    } else {
4207 4208
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
P
pbrook 已提交
4209
                    }
B
balrog 已提交
4210 4211 4212 4213 4214 4215 4216 4217 4218 4219 4220 4221 4222 4223 4224 4225 4226 4227 4228 4229 4230
                    tcg_gen_st_i32(cpu_tmp2_i32, cpu_env,
                                    offsetof(CPUX86State,xmm_regs[reg]
                                            .XMM_L((val >> 4) & 3)));
                    if ((val >> 0) & 1)
                        tcg_gen_st_i32(tcg_const_i32(0 /*float32_zero*/),
                                        cpu_env, offsetof(CPUX86State,
                                                xmm_regs[reg].XMM_L(0)));
                    if ((val >> 1) & 1)
                        tcg_gen_st_i32(tcg_const_i32(0 /*float32_zero*/),
                                        cpu_env, offsetof(CPUX86State,
                                                xmm_regs[reg].XMM_L(1)));
                    if ((val >> 2) & 1)
                        tcg_gen_st_i32(tcg_const_i32(0 /*float32_zero*/),
                                        cpu_env, offsetof(CPUX86State,
                                                xmm_regs[reg].XMM_L(2)));
                    if ((val >> 3) & 1)
                        tcg_gen_st_i32(tcg_const_i32(0 /*float32_zero*/),
                                        cpu_env, offsetof(CPUX86State,
                                                xmm_regs[reg].XMM_L(3)));
                    break;
                case 0x22:
4231
                    if (ot == MO_32) { /* pinsrd */
4232
                        if (mod == 3) {
4233
                            tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_regs[rm]);
4234
                        } else {
4235 4236
                            tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                                s->mem_index, MO_LEUL);
4237
                        }
B
balrog 已提交
4238 4239 4240 4241
                        tcg_gen_st_i32(cpu_tmp2_i32, cpu_env,
                                        offsetof(CPUX86State,
                                                xmm_regs[reg].XMM_L(val & 3)));
                    } else { /* pinsrq */
P
pbrook 已提交
4242
#ifdef TARGET_X86_64
4243
                        if (mod == 3) {
B
balrog 已提交
4244
                            gen_op_mov_v_reg(ot, cpu_tmp1_i64, rm);
4245 4246 4247 4248
                        } else {
                            tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0,
                                                s->mem_index, MO_LEQ);
                        }
B
balrog 已提交
4249 4250 4251
                        tcg_gen_st_i64(cpu_tmp1_i64, cpu_env,
                                        offsetof(CPUX86State,
                                                xmm_regs[reg].XMM_Q(val & 1)));
P
pbrook 已提交
4252 4253 4254
#else
                        goto illegal_op;
#endif
B
balrog 已提交
4255 4256 4257 4258 4259
                    }
                    break;
                }
                return;
            }
B
balrog 已提交
4260 4261 4262 4263 4264 4265 4266

            if (b1) {
                op1_offset = offsetof(CPUX86State,xmm_regs[reg]);
                if (mod == 3) {
                    op2_offset = offsetof(CPUX86State,xmm_regs[rm | REX_B(s)]);
                } else {
                    op2_offset = offsetof(CPUX86State,xmm_t0);
4267
                    gen_lea_modrm(env, s, modrm);
4268
                    gen_ldo_env_A0(s, op2_offset);
B
balrog 已提交
4269 4270 4271 4272 4273 4274 4275
                }
            } else {
                op1_offset = offsetof(CPUX86State,fpregs[reg].mmx);
                if (mod == 3) {
                    op2_offset = offsetof(CPUX86State,fpregs[rm].mmx);
                } else {
                    op2_offset = offsetof(CPUX86State,mmx_t0);
4276
                    gen_lea_modrm(env, s, modrm);
4277
                    gen_ldq_env_A0(s, op2_offset);
B
balrog 已提交
4278 4279
                }
            }
4280
            val = cpu_ldub_code(env, s->pc++);
B
balrog 已提交
4281

B
balrog 已提交
4282
            if ((b & 0xfc) == 0x60) { /* pcmpXstrX */
4283
                set_cc_op(s, CC_OP_EFLAGS);
B
balrog 已提交
4284 4285 4286 4287 4288 4289

                if (s->dflag == 2)
                    /* The helper must use entire 64-bit gp registers */
                    val |= 1 << 8;
            }

B
balrog 已提交
4290 4291
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
4292
            sse_fn_eppi(cpu_env, cpu_ptr0, cpu_ptr1, tcg_const_i32(val));
B
balrog 已提交
4293
            break;
R
Richard Henderson 已提交
4294 4295 4296 4297 4298 4299 4300 4301 4302 4303 4304 4305 4306 4307

        case 0x33a:
            /* Various integer extensions at 0f 3a f[0-f].  */
            b = modrm | (b1 << 8);
            modrm = cpu_ldub_code(env, s->pc++);
            reg = ((modrm >> 3) & 7) | rex_r;

            switch (b) {
            case 0x3f0: /* rorx Gy,Ey, Ib */
                if (!(s->cpuid_7_0_ebx_features & CPUID_7_0_EBX_BMI2)
                    || !(s->prefix & PREFIX_VEX)
                    || s->vex_l != 0) {
                    goto illegal_op;
                }
4308
                ot = s->dflag == 2 ? MO_64 : MO_32;
R
Richard Henderson 已提交
4309 4310
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
                b = cpu_ldub_code(env, s->pc++);
4311
                if (ot == MO_64) {
R
Richard Henderson 已提交
4312 4313 4314 4315 4316 4317 4318 4319 4320 4321 4322 4323 4324 4325
                    tcg_gen_rotri_tl(cpu_T[0], cpu_T[0], b & 63);
                } else {
                    tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
                    tcg_gen_rotri_i32(cpu_tmp2_i32, cpu_tmp2_i32, b & 31);
                    tcg_gen_extu_i32_tl(cpu_T[0], cpu_tmp2_i32);
                }
                gen_op_mov_reg_T0(ot, reg);
                break;

            default:
                goto illegal_op;
            }
            break;

B
bellard 已提交
4326 4327 4328 4329 4330
        default:
            goto illegal_op;
        }
    } else {
        /* generic MMX or SSE operation */
B
bellard 已提交
4331 4332 4333 4334 4335 4336 4337 4338
        switch(b) {
        case 0x70: /* pshufx insn */
        case 0xc6: /* pshufx insn */
        case 0xc2: /* compare insns */
            s->rip_offset = 1;
            break;
        default:
            break;
B
bellard 已提交
4339 4340 4341 4342
        }
        if (is_xmm) {
            op1_offset = offsetof(CPUX86State,xmm_regs[reg]);
            if (mod != 3) {
4343
                gen_lea_modrm(env, s, modrm);
B
bellard 已提交
4344
                op2_offset = offsetof(CPUX86State,xmm_t0);
4345
                if (b1 >= 2 && ((b >= 0x50 && b <= 0x5f && b != 0x5b) ||
B
bellard 已提交
4346 4347 4348 4349
                                b == 0xc2)) {
                    /* specific case for SSE single instructions */
                    if (b1 == 2) {
                        /* 32 bit access */
4350
                        gen_op_ld_v(s, MO_32, cpu_T[0], cpu_A0);
B
bellard 已提交
4351
                        tcg_gen_st32_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,xmm_t0.XMM_L(0)));
B
bellard 已提交
4352 4353
                    } else {
                        /* 64 bit access */
4354 4355
                        gen_ldq_env_A0(s, offsetof(CPUX86State,
                                                   xmm_t0.XMM_D(0)));
B
bellard 已提交
4356 4357
                    }
                } else {
4358
                    gen_ldo_env_A0(s, op2_offset);
B
bellard 已提交
4359 4360 4361 4362 4363 4364 4365 4366
                }
            } else {
                rm = (modrm & 7) | REX_B(s);
                op2_offset = offsetof(CPUX86State,xmm_regs[rm]);
            }
        } else {
            op1_offset = offsetof(CPUX86State,fpregs[reg].mmx);
            if (mod != 3) {
4367
                gen_lea_modrm(env, s, modrm);
B
bellard 已提交
4368
                op2_offset = offsetof(CPUX86State,mmx_t0);
4369
                gen_ldq_env_A0(s, op2_offset);
B
bellard 已提交
4370 4371 4372 4373 4374 4375
            } else {
                rm = (modrm & 7);
                op2_offset = offsetof(CPUX86State,fpregs[rm].mmx);
            }
        }
        switch(b) {
A
aurel32 已提交
4376
        case 0x0f: /* 3DNow! data insns */
4377 4378
            if (!(s->cpuid_ext2_features & CPUID_EXT2_3DNOW))
                goto illegal_op;
4379
            val = cpu_ldub_code(env, s->pc++);
B
Blue Swirl 已提交
4380 4381
            sse_fn_epp = sse_op_table5[val];
            if (!sse_fn_epp) {
A
aurel32 已提交
4382
                goto illegal_op;
B
Blue Swirl 已提交
4383
            }
B
bellard 已提交
4384 4385
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
4386
            sse_fn_epp(cpu_env, cpu_ptr0, cpu_ptr1);
A
aurel32 已提交
4387
            break;
B
bellard 已提交
4388 4389
        case 0x70: /* pshufx insn */
        case 0xc6: /* pshufx insn */
4390
            val = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4391 4392
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
4393
            /* XXX: introduce a new table? */
B
Blue Swirl 已提交
4394
            sse_fn_ppi = (SSEFunc_0_ppi)sse_fn_epp;
B
Blue Swirl 已提交
4395
            sse_fn_ppi(cpu_ptr0, cpu_ptr1, tcg_const_i32(val));
B
bellard 已提交
4396 4397 4398
            break;
        case 0xc2:
            /* compare insns */
4399
            val = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4400 4401
            if (val >= 8)
                goto illegal_op;
B
Blue Swirl 已提交
4402
            sse_fn_epp = sse_op_table4[val][b1];
B
Blue Swirl 已提交
4403

B
bellard 已提交
4404 4405
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
4406
            sse_fn_epp(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
4407
            break;
4408 4409 4410 4411 4412 4413 4414 4415 4416 4417 4418 4419
        case 0xf7:
            /* maskmov : we must prepare A0 */
            if (mod != 3)
                goto illegal_op;
#ifdef TARGET_X86_64
            if (s->aflag == 2) {
                gen_op_movq_A0_reg(R_EDI);
            } else
#endif
            {
                gen_op_movl_A0_reg(R_EDI);
                if (s->aflag == 0)
4420
                    tcg_gen_ext16u_tl(cpu_A0, cpu_A0);
4421 4422 4423 4424 4425
            }
            gen_add_A0_ds_seg(s);

            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
4426
            /* XXX: introduce a new table? */
B
Blue Swirl 已提交
4427 4428
            sse_fn_eppt = (SSEFunc_0_eppt)sse_fn_epp;
            sse_fn_eppt(cpu_env, cpu_ptr0, cpu_ptr1, cpu_A0);
4429
            break;
B
bellard 已提交
4430
        default:
B
bellard 已提交
4431 4432
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
4433
            sse_fn_epp(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
4434 4435 4436
            break;
        }
        if (b == 0x2e || b == 0x2f) {
4437
            set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
4438 4439 4440 4441
        }
    }
}

B
bellard 已提交
4442 4443
/* convert one instruction. s->is_jmp is set if the translation must
   be stopped. Return the next pc value */
4444 4445
static target_ulong disas_insn(CPUX86State *env, DisasContext *s,
                               target_ulong pc_start)
B
bellard 已提交
4446 4447 4448
{
    int b, prefixes, aflag, dflag;
    int shift, ot;
4449
    int modrm, reg, rm, mod, op, opreg, val;
B
bellard 已提交
4450 4451
    target_ulong next_eip, tval;
    int rex_w, rex_r;
B
bellard 已提交
4452

4453
    if (unlikely(qemu_loglevel_mask(CPU_LOG_TB_OP | CPU_LOG_TB_OP_OPT))) {
4454
        tcg_gen_debug_insn_start(pc_start);
4455
    }
B
bellard 已提交
4456 4457 4458
    s->pc = pc_start;
    prefixes = 0;
    s->override = -1;
B
bellard 已提交
4459 4460 4461 4462 4463
    rex_w = -1;
    rex_r = 0;
#ifdef TARGET_X86_64
    s->rex_x = 0;
    s->rex_b = 0;
4464
    x86_64_hregs = 0;
B
bellard 已提交
4465 4466
#endif
    s->rip_offset = 0; /* for relative ip address */
4467 4468
    s->vex_l = 0;
    s->vex_v = 0;
B
bellard 已提交
4469
 next_byte:
4470
    b = cpu_ldub_code(env, s->pc);
B
bellard 已提交
4471
    s->pc++;
4472 4473 4474 4475 4476 4477 4478 4479 4480 4481 4482 4483 4484 4485 4486 4487 4488 4489 4490 4491 4492 4493 4494 4495 4496 4497 4498 4499 4500 4501 4502 4503 4504 4505 4506
    /* Collect prefixes.  */
    switch (b) {
    case 0xf3:
        prefixes |= PREFIX_REPZ;
        goto next_byte;
    case 0xf2:
        prefixes |= PREFIX_REPNZ;
        goto next_byte;
    case 0xf0:
        prefixes |= PREFIX_LOCK;
        goto next_byte;
    case 0x2e:
        s->override = R_CS;
        goto next_byte;
    case 0x36:
        s->override = R_SS;
        goto next_byte;
    case 0x3e:
        s->override = R_DS;
        goto next_byte;
    case 0x26:
        s->override = R_ES;
        goto next_byte;
    case 0x64:
        s->override = R_FS;
        goto next_byte;
    case 0x65:
        s->override = R_GS;
        goto next_byte;
    case 0x66:
        prefixes |= PREFIX_DATA;
        goto next_byte;
    case 0x67:
        prefixes |= PREFIX_ADR;
        goto next_byte;
B
bellard 已提交
4507
#ifdef TARGET_X86_64
4508 4509
    case 0x40 ... 0x4f:
        if (CODE64(s)) {
B
bellard 已提交
4510 4511 4512 4513 4514 4515 4516 4517
            /* REX prefix */
            rex_w = (b >> 3) & 1;
            rex_r = (b & 0x4) << 1;
            s->rex_x = (b & 0x2) << 2;
            REX_B(s) = (b & 0x1) << 3;
            x86_64_hregs = 1; /* select uniform byte register addressing */
            goto next_byte;
        }
4518 4519
        break;
#endif
4520 4521 4522 4523 4524 4525 4526 4527 4528 4529 4530 4531 4532 4533 4534 4535 4536
    case 0xc5: /* 2-byte VEX */
    case 0xc4: /* 3-byte VEX */
        /* VEX prefixes cannot be used except in 32-bit mode.
           Otherwise the instruction is LES or LDS.  */
        if (s->code32 && !s->vm86) {
            static const int pp_prefix[4] = {
                0, PREFIX_DATA, PREFIX_REPZ, PREFIX_REPNZ
            };
            int vex3, vex2 = cpu_ldub_code(env, s->pc);

            if (!CODE64(s) && (vex2 & 0xc0) != 0xc0) {
                /* 4.1.4.6: In 32-bit mode, bits [7:6] must be 11b,
                   otherwise the instruction is LES or LDS.  */
                break;
            }
            s->pc++;

P
Peter Maydell 已提交
4537
            /* 4.1.1-4.1.3: No preceding lock, 66, f2, f3, or rex prefixes. */
4538 4539 4540 4541 4542 4543 4544 4545 4546 4547 4548 4549 4550 4551 4552 4553 4554 4555 4556 4557 4558 4559 4560 4561 4562 4563 4564 4565 4566 4567 4568 4569 4570 4571 4572 4573 4574 4575 4576
            if (prefixes & (PREFIX_REPZ | PREFIX_REPNZ
                            | PREFIX_LOCK | PREFIX_DATA)) {
                goto illegal_op;
            }
#ifdef TARGET_X86_64
            if (x86_64_hregs) {
                goto illegal_op;
            }
#endif
            rex_r = (~vex2 >> 4) & 8;
            if (b == 0xc5) {
                vex3 = vex2;
                b = cpu_ldub_code(env, s->pc++);
            } else {
#ifdef TARGET_X86_64
                s->rex_x = (~vex2 >> 3) & 8;
                s->rex_b = (~vex2 >> 2) & 8;
#endif
                vex3 = cpu_ldub_code(env, s->pc++);
                rex_w = (vex3 >> 7) & 1;
                switch (vex2 & 0x1f) {
                case 0x01: /* Implied 0f leading opcode bytes.  */
                    b = cpu_ldub_code(env, s->pc++) | 0x100;
                    break;
                case 0x02: /* Implied 0f 38 leading opcode bytes.  */
                    b = 0x138;
                    break;
                case 0x03: /* Implied 0f 3a leading opcode bytes.  */
                    b = 0x13a;
                    break;
                default:   /* Reserved for future use.  */
                    goto illegal_op;
                }
            }
            s->vex_v = (~vex3 >> 3) & 0xf;
            s->vex_l = (vex3 >> 2) & 1;
            prefixes |= pp_prefix[vex3 & 3] | PREFIX_VEX;
        }
        break;
4577 4578 4579 4580
    }

    /* Post-process prefixes.  */
    if (CODE64(s)) {
4581 4582 4583 4584 4585 4586 4587 4588 4589 4590 4591
        /* In 64-bit mode, the default data size is 32-bit.  Select 64-bit
           data with rex_w, and 16-bit data with 0x66; rex_w takes precedence
           over 0x66 if both are present.  */
        dflag = (rex_w > 0 ? 2 : prefixes & PREFIX_DATA ? 0 : 1);
        /* In 64-bit mode, 0x67 selects 32-bit addressing.  */
        aflag = (prefixes & PREFIX_ADR ? 1 : 2);
    } else {
        /* In 16/32-bit mode, 0x66 selects the opposite data size.  */
        dflag = s->code32;
        if (prefixes & PREFIX_DATA) {
            dflag ^= 1;
B
bellard 已提交
4592
        }
4593 4594 4595 4596
        /* In 16/32-bit mode, 0x67 selects the opposite addressing.  */
        aflag = s->code32;
        if (prefixes & PREFIX_ADR) {
            aflag ^= 1;
B
bellard 已提交
4597
        }
B
bellard 已提交
4598 4599 4600 4601 4602 4603 4604 4605
    }

    s->prefix = prefixes;
    s->aflag = aflag;
    s->dflag = dflag;

    /* lock generation */
    if (prefixes & PREFIX_LOCK)
P
pbrook 已提交
4606
        gen_helper_lock();
B
bellard 已提交
4607 4608 4609 4610 4611 4612 4613

    /* now check op code */
 reswitch:
    switch(b) {
    case 0x0f:
        /**************************/
        /* extended op code */
4614
        b = cpu_ldub_code(env, s->pc++) | 0x100;
B
bellard 已提交
4615
        goto reswitch;
4616

B
bellard 已提交
4617 4618 4619 4620 4621 4622 4623 4624 4625 4626 4627 4628 4629 4630 4631 4632
        /**************************/
        /* arith & logic */
    case 0x00 ... 0x05:
    case 0x08 ... 0x0d:
    case 0x10 ... 0x15:
    case 0x18 ... 0x1d:
    case 0x20 ... 0x25:
    case 0x28 ... 0x2d:
    case 0x30 ... 0x35:
    case 0x38 ... 0x3d:
        {
            int op, f, val;
            op = (b >> 3) & 7;
            f = (b >> 1) & 3;

            if ((b & 1) == 0)
4633
                ot = MO_8;
B
bellard 已提交
4634
            else
4635
                ot = dflag + MO_16;
4636

B
bellard 已提交
4637 4638
            switch(f) {
            case 0: /* OP Ev, Gv */
4639
                modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4640
                reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
4641
                mod = (modrm >> 6) & 3;
B
bellard 已提交
4642
                rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
4643
                if (mod != 3) {
4644
                    gen_lea_modrm(env, s, modrm);
B
bellard 已提交
4645 4646 4647 4648
                    opreg = OR_TMP0;
                } else if (op == OP_XORL && rm == reg) {
                xor_zero:
                    /* xor reg, reg optimisation */
R
Richard Henderson 已提交
4649
                    set_cc_op(s, CC_OP_CLR);
4650
                    tcg_gen_movi_tl(cpu_T[0], 0);
B
bellard 已提交
4651
                    gen_op_mov_reg_T0(ot, reg);
B
bellard 已提交
4652 4653 4654 4655
                    break;
                } else {
                    opreg = rm;
                }
B
bellard 已提交
4656
                gen_op_mov_TN_reg(ot, 1, reg);
B
bellard 已提交
4657 4658 4659
                gen_op(s, op, ot, opreg);
                break;
            case 1: /* OP Gv, Ev */
4660
                modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4661
                mod = (modrm >> 6) & 3;
B
bellard 已提交
4662 4663
                reg = ((modrm >> 3) & 7) | rex_r;
                rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
4664
                if (mod != 3) {
4665
                    gen_lea_modrm(env, s, modrm);
4666
                    gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
B
bellard 已提交
4667 4668 4669
                } else if (op == OP_XORL && rm == reg) {
                    goto xor_zero;
                } else {
B
bellard 已提交
4670
                    gen_op_mov_TN_reg(ot, 1, rm);
B
bellard 已提交
4671 4672 4673 4674
                }
                gen_op(s, op, ot, reg);
                break;
            case 2: /* OP A, Iv */
4675
                val = insn_get(env, s, ot);
4676
                tcg_gen_movi_tl(cpu_T[1], val);
B
bellard 已提交
4677 4678 4679 4680 4681 4682
                gen_op(s, op, ot, OR_EAX);
                break;
            }
        }
        break;

4683 4684 4685
    case 0x82:
        if (CODE64(s))
            goto illegal_op;
B
bellard 已提交
4686 4687 4688 4689 4690 4691 4692
    case 0x80: /* GRP1 */
    case 0x81:
    case 0x83:
        {
            int val;

            if ((b & 1) == 0)
4693
                ot = MO_8;
B
bellard 已提交
4694
            else
4695
                ot = dflag + MO_16;
4696

4697
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4698
            mod = (modrm >> 6) & 3;
B
bellard 已提交
4699
            rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
4700
            op = (modrm >> 3) & 7;
4701

B
bellard 已提交
4702
            if (mod != 3) {
B
bellard 已提交
4703 4704 4705 4706
                if (b == 0x83)
                    s->rip_offset = 1;
                else
                    s->rip_offset = insn_const_size(ot);
4707
                gen_lea_modrm(env, s, modrm);
B
bellard 已提交
4708 4709
                opreg = OR_TMP0;
            } else {
B
bellard 已提交
4710
                opreg = rm;
B
bellard 已提交
4711 4712 4713 4714 4715 4716
            }

            switch(b) {
            default:
            case 0x80:
            case 0x81:
4717
            case 0x82:
4718
                val = insn_get(env, s, ot);
B
bellard 已提交
4719 4720
                break;
            case 0x83:
4721
                val = (int8_t)insn_get(env, s, MO_8);
B
bellard 已提交
4722 4723
                break;
            }
4724
            tcg_gen_movi_tl(cpu_T[1], val);
B
bellard 已提交
4725 4726 4727 4728 4729 4730 4731
            gen_op(s, op, ot, opreg);
        }
        break;

        /**************************/
        /* inc, dec, and other misc arith */
    case 0x40 ... 0x47: /* inc Gv */
4732
        ot = dflag ? MO_32 : MO_16;
B
bellard 已提交
4733 4734 4735
        gen_inc(s, ot, OR_EAX + (b & 7), 1);
        break;
    case 0x48 ... 0x4f: /* dec Gv */
4736
        ot = dflag ? MO_32 : MO_16;
B
bellard 已提交
4737 4738 4739 4740 4741
        gen_inc(s, ot, OR_EAX + (b & 7), -1);
        break;
    case 0xf6: /* GRP3 */
    case 0xf7:
        if ((b & 1) == 0)
4742
            ot = MO_8;
B
bellard 已提交
4743
        else
4744
            ot = dflag + MO_16;
B
bellard 已提交
4745

4746
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4747
        mod = (modrm >> 6) & 3;
B
bellard 已提交
4748
        rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
4749 4750
        op = (modrm >> 3) & 7;
        if (mod != 3) {
B
bellard 已提交
4751 4752
            if (op == 0)
                s->rip_offset = insn_const_size(ot);
4753
            gen_lea_modrm(env, s, modrm);
4754
            gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
4755
        } else {
B
bellard 已提交
4756
            gen_op_mov_TN_reg(ot, 0, rm);
B
bellard 已提交
4757 4758 4759 4760
        }

        switch(op) {
        case 0: /* test */
4761
            val = insn_get(env, s, ot);
4762
            tcg_gen_movi_tl(cpu_T[1], val);
B
bellard 已提交
4763
            gen_op_testl_T0_T1_cc();
4764
            set_cc_op(s, CC_OP_LOGICB + ot);
B
bellard 已提交
4765 4766
            break;
        case 2: /* not */
4767
            tcg_gen_not_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
4768
            if (mod != 3) {
4769
                gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
4770
            } else {
B
bellard 已提交
4771
                gen_op_mov_reg_T0(ot, rm);
B
bellard 已提交
4772 4773 4774
            }
            break;
        case 3: /* neg */
4775
            tcg_gen_neg_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
4776
            if (mod != 3) {
4777
                gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
4778
            } else {
B
bellard 已提交
4779
                gen_op_mov_reg_T0(ot, rm);
B
bellard 已提交
4780 4781
            }
            gen_op_update_neg_cc();
4782
            set_cc_op(s, CC_OP_SUBB + ot);
B
bellard 已提交
4783 4784 4785
            break;
        case 4: /* mul */
            switch(ot) {
4786 4787
            case MO_8:
                gen_op_mov_TN_reg(MO_8, 1, R_EAX);
B
bellard 已提交
4788 4789 4790 4791
                tcg_gen_ext8u_tl(cpu_T[0], cpu_T[0]);
                tcg_gen_ext8u_tl(cpu_T[1], cpu_T[1]);
                /* XXX: use 32 bit mul which could be faster */
                tcg_gen_mul_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
4792
                gen_op_mov_reg_T0(MO_16, R_EAX);
B
bellard 已提交
4793 4794
                tcg_gen_mov_tl(cpu_cc_dst, cpu_T[0]);
                tcg_gen_andi_tl(cpu_cc_src, cpu_T[0], 0xff00);
4795
                set_cc_op(s, CC_OP_MULB);
B
bellard 已提交
4796
                break;
4797 4798
            case MO_16:
                gen_op_mov_TN_reg(MO_16, 1, R_EAX);
B
bellard 已提交
4799 4800 4801 4802
                tcg_gen_ext16u_tl(cpu_T[0], cpu_T[0]);
                tcg_gen_ext16u_tl(cpu_T[1], cpu_T[1]);
                /* XXX: use 32 bit mul which could be faster */
                tcg_gen_mul_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
4803
                gen_op_mov_reg_T0(MO_16, R_EAX);
B
bellard 已提交
4804 4805
                tcg_gen_mov_tl(cpu_cc_dst, cpu_T[0]);
                tcg_gen_shri_tl(cpu_T[0], cpu_T[0], 16);
4806
                gen_op_mov_reg_T0(MO_16, R_EDX);
B
bellard 已提交
4807
                tcg_gen_mov_tl(cpu_cc_src, cpu_T[0]);
4808
                set_cc_op(s, CC_OP_MULW);
B
bellard 已提交
4809 4810
                break;
            default:
4811
            case MO_32:
4812 4813 4814 4815 4816 4817 4818 4819
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
                tcg_gen_trunc_tl_i32(cpu_tmp3_i32, cpu_regs[R_EAX]);
                tcg_gen_mulu2_i32(cpu_tmp2_i32, cpu_tmp3_i32,
                                  cpu_tmp2_i32, cpu_tmp3_i32);
                tcg_gen_extu_i32_tl(cpu_regs[R_EAX], cpu_tmp2_i32);
                tcg_gen_extu_i32_tl(cpu_regs[R_EDX], cpu_tmp3_i32);
                tcg_gen_mov_tl(cpu_cc_dst, cpu_regs[R_EAX]);
                tcg_gen_mov_tl(cpu_cc_src, cpu_regs[R_EDX]);
4820
                set_cc_op(s, CC_OP_MULL);
B
bellard 已提交
4821
                break;
B
bellard 已提交
4822
#ifdef TARGET_X86_64
4823
            case MO_64:
4824 4825 4826 4827
                tcg_gen_mulu2_i64(cpu_regs[R_EAX], cpu_regs[R_EDX],
                                  cpu_T[0], cpu_regs[R_EAX]);
                tcg_gen_mov_tl(cpu_cc_dst, cpu_regs[R_EAX]);
                tcg_gen_mov_tl(cpu_cc_src, cpu_regs[R_EDX]);
4828
                set_cc_op(s, CC_OP_MULQ);
B
bellard 已提交
4829 4830
                break;
#endif
B
bellard 已提交
4831 4832 4833 4834
            }
            break;
        case 5: /* imul */
            switch(ot) {
4835 4836
            case MO_8:
                gen_op_mov_TN_reg(MO_8, 1, R_EAX);
B
bellard 已提交
4837 4838 4839 4840
                tcg_gen_ext8s_tl(cpu_T[0], cpu_T[0]);
                tcg_gen_ext8s_tl(cpu_T[1], cpu_T[1]);
                /* XXX: use 32 bit mul which could be faster */
                tcg_gen_mul_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
4841
                gen_op_mov_reg_T0(MO_16, R_EAX);
B
bellard 已提交
4842 4843 4844
                tcg_gen_mov_tl(cpu_cc_dst, cpu_T[0]);
                tcg_gen_ext8s_tl(cpu_tmp0, cpu_T[0]);
                tcg_gen_sub_tl(cpu_cc_src, cpu_T[0], cpu_tmp0);
4845
                set_cc_op(s, CC_OP_MULB);
B
bellard 已提交
4846
                break;
4847 4848
            case MO_16:
                gen_op_mov_TN_reg(MO_16, 1, R_EAX);
B
bellard 已提交
4849 4850 4851 4852
                tcg_gen_ext16s_tl(cpu_T[0], cpu_T[0]);
                tcg_gen_ext16s_tl(cpu_T[1], cpu_T[1]);
                /* XXX: use 32 bit mul which could be faster */
                tcg_gen_mul_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
4853
                gen_op_mov_reg_T0(MO_16, R_EAX);
B
bellard 已提交
4854 4855 4856 4857
                tcg_gen_mov_tl(cpu_cc_dst, cpu_T[0]);
                tcg_gen_ext16s_tl(cpu_tmp0, cpu_T[0]);
                tcg_gen_sub_tl(cpu_cc_src, cpu_T[0], cpu_tmp0);
                tcg_gen_shri_tl(cpu_T[0], cpu_T[0], 16);
4858
                gen_op_mov_reg_T0(MO_16, R_EDX);
4859
                set_cc_op(s, CC_OP_MULW);
B
bellard 已提交
4860 4861
                break;
            default:
4862
            case MO_32:
4863 4864 4865 4866 4867 4868 4869 4870 4871 4872
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
                tcg_gen_trunc_tl_i32(cpu_tmp3_i32, cpu_regs[R_EAX]);
                tcg_gen_muls2_i32(cpu_tmp2_i32, cpu_tmp3_i32,
                                  cpu_tmp2_i32, cpu_tmp3_i32);
                tcg_gen_extu_i32_tl(cpu_regs[R_EAX], cpu_tmp2_i32);
                tcg_gen_extu_i32_tl(cpu_regs[R_EDX], cpu_tmp3_i32);
                tcg_gen_sari_i32(cpu_tmp2_i32, cpu_tmp2_i32, 31);
                tcg_gen_mov_tl(cpu_cc_dst, cpu_regs[R_EAX]);
                tcg_gen_sub_i32(cpu_tmp2_i32, cpu_tmp2_i32, cpu_tmp3_i32);
                tcg_gen_extu_i32_tl(cpu_cc_src, cpu_tmp2_i32);
4873
                set_cc_op(s, CC_OP_MULL);
B
bellard 已提交
4874
                break;
B
bellard 已提交
4875
#ifdef TARGET_X86_64
4876
            case MO_64:
4877 4878 4879 4880 4881
                tcg_gen_muls2_i64(cpu_regs[R_EAX], cpu_regs[R_EDX],
                                  cpu_T[0], cpu_regs[R_EAX]);
                tcg_gen_mov_tl(cpu_cc_dst, cpu_regs[R_EAX]);
                tcg_gen_sari_tl(cpu_cc_src, cpu_regs[R_EAX], 63);
                tcg_gen_sub_tl(cpu_cc_src, cpu_cc_src, cpu_regs[R_EDX]);
4882
                set_cc_op(s, CC_OP_MULQ);
B
bellard 已提交
4883 4884
                break;
#endif
B
bellard 已提交
4885 4886 4887 4888
            }
            break;
        case 6: /* div */
            switch(ot) {
4889
            case MO_8:
B
bellard 已提交
4890
                gen_jmp_im(pc_start - s->cs_base);
4891
                gen_helper_divb_AL(cpu_env, cpu_T[0]);
B
bellard 已提交
4892
                break;
4893
            case MO_16:
B
bellard 已提交
4894
                gen_jmp_im(pc_start - s->cs_base);
4895
                gen_helper_divw_AX(cpu_env, cpu_T[0]);
B
bellard 已提交
4896 4897
                break;
            default:
4898
            case MO_32:
B
bellard 已提交
4899
                gen_jmp_im(pc_start - s->cs_base);
4900
                gen_helper_divl_EAX(cpu_env, cpu_T[0]);
B
bellard 已提交
4901 4902
                break;
#ifdef TARGET_X86_64
4903
            case MO_64:
B
bellard 已提交
4904
                gen_jmp_im(pc_start - s->cs_base);
4905
                gen_helper_divq_EAX(cpu_env, cpu_T[0]);
B
bellard 已提交
4906
                break;
B
bellard 已提交
4907
#endif
B
bellard 已提交
4908 4909 4910 4911
            }
            break;
        case 7: /* idiv */
            switch(ot) {
4912
            case MO_8:
B
bellard 已提交
4913
                gen_jmp_im(pc_start - s->cs_base);
4914
                gen_helper_idivb_AL(cpu_env, cpu_T[0]);
B
bellard 已提交
4915
                break;
4916
            case MO_16:
B
bellard 已提交
4917
                gen_jmp_im(pc_start - s->cs_base);
4918
                gen_helper_idivw_AX(cpu_env, cpu_T[0]);
B
bellard 已提交
4919 4920
                break;
            default:
4921
            case MO_32:
B
bellard 已提交
4922
                gen_jmp_im(pc_start - s->cs_base);
4923
                gen_helper_idivl_EAX(cpu_env, cpu_T[0]);
B
bellard 已提交
4924 4925
                break;
#ifdef TARGET_X86_64
4926
            case MO_64:
B
bellard 已提交
4927
                gen_jmp_im(pc_start - s->cs_base);
4928
                gen_helper_idivq_EAX(cpu_env, cpu_T[0]);
B
bellard 已提交
4929
                break;
B
bellard 已提交
4930
#endif
B
bellard 已提交
4931 4932 4933 4934 4935 4936 4937 4938 4939 4940
            }
            break;
        default:
            goto illegal_op;
        }
        break;

    case 0xfe: /* GRP4 */
    case 0xff: /* GRP5 */
        if ((b & 1) == 0)
4941
            ot = MO_8;
B
bellard 已提交
4942
        else
4943
            ot = dflag + MO_16;
B
bellard 已提交
4944

4945
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4946
        mod = (modrm >> 6) & 3;
B
bellard 已提交
4947
        rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
4948 4949 4950 4951
        op = (modrm >> 3) & 7;
        if (op >= 2 && b == 0xfe) {
            goto illegal_op;
        }
B
bellard 已提交
4952
        if (CODE64(s)) {
4953
            if (op == 2 || op == 4) {
B
bellard 已提交
4954
                /* operand size for jumps is 64 bit */
4955
                ot = MO_64;
4956
            } else if (op == 3 || op == 5) {
4957
                ot = dflag ? MO_32 + (rex_w == 1) : MO_16;
B
bellard 已提交
4958 4959
            } else if (op == 6) {
                /* default push size is 64 bit */
4960
                ot = dflag ? MO_64 : MO_16;
B
bellard 已提交
4961 4962
            }
        }
B
bellard 已提交
4963
        if (mod != 3) {
4964
            gen_lea_modrm(env, s, modrm);
B
bellard 已提交
4965
            if (op >= 2 && op != 3 && op != 5)
4966
                gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
4967
        } else {
B
bellard 已提交
4968
            gen_op_mov_TN_reg(ot, 0, rm);
B
bellard 已提交
4969 4970 4971 4972 4973 4974 4975 4976 4977 4978 4979 4980 4981 4982 4983 4984 4985 4986
        }

        switch(op) {
        case 0: /* inc Ev */
            if (mod != 3)
                opreg = OR_TMP0;
            else
                opreg = rm;
            gen_inc(s, ot, opreg, 1);
            break;
        case 1: /* dec Ev */
            if (mod != 3)
                opreg = OR_TMP0;
            else
                opreg = rm;
            gen_inc(s, ot, opreg, -1);
            break;
        case 2: /* call Ev */
4987
            /* XXX: optimize if memory (no 'and' is necessary) */
4988 4989 4990
            if (s->dflag == 0) {
                tcg_gen_ext16u_tl(cpu_T[0], cpu_T[0]);
            }
B
bellard 已提交
4991
            next_eip = s->pc - s->cs_base;
4992
            tcg_gen_movi_tl(cpu_T[1], next_eip);
4993 4994
            gen_push_T1(s);
            gen_op_jmp_T0();
B
bellard 已提交
4995 4996
            gen_eob(s);
            break;
B
bellard 已提交
4997
        case 3: /* lcall Ev */
4998
            gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
4999
            gen_add_A0_im(s, 1 << (ot - MO_16 + 1));
5000
            gen_op_ld_v(s, MO_16, cpu_T[0], cpu_A0);
B
bellard 已提交
5001 5002
        do_lcall:
            if (s->pe && !s->vm86) {
5003
                gen_update_cc_op(s);
B
bellard 已提交
5004
                gen_jmp_im(pc_start - s->cs_base);
5005
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
5006 5007
                gen_helper_lcall_protected(cpu_env, cpu_tmp2_i32, cpu_T[1],
                                           tcg_const_i32(dflag),
P
pbrook 已提交
5008
                                           tcg_const_i32(s->pc - pc_start));
B
bellard 已提交
5009
            } else {
5010
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
5011 5012
                gen_helper_lcall_real(cpu_env, cpu_tmp2_i32, cpu_T[1],
                                      tcg_const_i32(dflag),
P
pbrook 已提交
5013
                                      tcg_const_i32(s->pc - s->cs_base));
B
bellard 已提交
5014 5015 5016 5017
            }
            gen_eob(s);
            break;
        case 4: /* jmp Ev */
5018 5019 5020
            if (s->dflag == 0) {
                tcg_gen_ext16u_tl(cpu_T[0], cpu_T[0]);
            }
B
bellard 已提交
5021 5022 5023 5024
            gen_op_jmp_T0();
            gen_eob(s);
            break;
        case 5: /* ljmp Ev */
5025
            gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
5026
            gen_add_A0_im(s, 1 << (ot - MO_16 + 1));
5027
            gen_op_ld_v(s, MO_16, cpu_T[0], cpu_A0);
B
bellard 已提交
5028 5029
        do_ljmp:
            if (s->pe && !s->vm86) {
5030
                gen_update_cc_op(s);
B
bellard 已提交
5031
                gen_jmp_im(pc_start - s->cs_base);
5032
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
5033
                gen_helper_ljmp_protected(cpu_env, cpu_tmp2_i32, cpu_T[1],
P
pbrook 已提交
5034
                                          tcg_const_i32(s->pc - pc_start));
B
bellard 已提交
5035
            } else {
5036
                gen_op_movl_seg_T0_vm(R_CS);
5037
                tcg_gen_mov_tl(cpu_T[0], cpu_T[1]);
B
bellard 已提交
5038 5039 5040 5041 5042 5043 5044 5045 5046 5047 5048 5049 5050
                gen_op_jmp_T0();
            }
            gen_eob(s);
            break;
        case 6: /* push Ev */
            gen_push_T0(s);
            break;
        default:
            goto illegal_op;
        }
        break;

    case 0x84: /* test Ev, Gv */
5051
    case 0x85:
B
bellard 已提交
5052
        if ((b & 1) == 0)
5053
            ot = MO_8;
B
bellard 已提交
5054
        else
5055
            ot = dflag + MO_16;
B
bellard 已提交
5056

5057
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5058
        reg = ((modrm >> 3) & 7) | rex_r;
5059

5060
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
B
bellard 已提交
5061
        gen_op_mov_TN_reg(ot, 1, reg);
B
bellard 已提交
5062
        gen_op_testl_T0_T1_cc();
5063
        set_cc_op(s, CC_OP_LOGICB + ot);
B
bellard 已提交
5064
        break;
5065

B
bellard 已提交
5066 5067 5068
    case 0xa8: /* test eAX, Iv */
    case 0xa9:
        if ((b & 1) == 0)
5069
            ot = MO_8;
B
bellard 已提交
5070
        else
5071
            ot = dflag + MO_16;
5072
        val = insn_get(env, s, ot);
B
bellard 已提交
5073

B
bellard 已提交
5074
        gen_op_mov_TN_reg(ot, 0, OR_EAX);
5075
        tcg_gen_movi_tl(cpu_T[1], val);
B
bellard 已提交
5076
        gen_op_testl_T0_T1_cc();
5077
        set_cc_op(s, CC_OP_LOGICB + ot);
B
bellard 已提交
5078
        break;
5079

B
bellard 已提交
5080
    case 0x98: /* CWDE/CBW */
B
bellard 已提交
5081 5082
#ifdef TARGET_X86_64
        if (dflag == 2) {
5083
            gen_op_mov_TN_reg(MO_32, 0, R_EAX);
B
bellard 已提交
5084
            tcg_gen_ext32s_tl(cpu_T[0], cpu_T[0]);
5085
            gen_op_mov_reg_T0(MO_64, R_EAX);
B
bellard 已提交
5086 5087
        } else
#endif
B
bellard 已提交
5088
        if (dflag == 1) {
5089
            gen_op_mov_TN_reg(MO_16, 0, R_EAX);
B
bellard 已提交
5090
            tcg_gen_ext16s_tl(cpu_T[0], cpu_T[0]);
5091
            gen_op_mov_reg_T0(MO_32, R_EAX);
B
bellard 已提交
5092
        } else {
5093
            gen_op_mov_TN_reg(MO_8, 0, R_EAX);
B
bellard 已提交
5094
            tcg_gen_ext8s_tl(cpu_T[0], cpu_T[0]);
5095
            gen_op_mov_reg_T0(MO_16, R_EAX);
B
bellard 已提交
5096
        }
B
bellard 已提交
5097 5098
        break;
    case 0x99: /* CDQ/CWD */
B
bellard 已提交
5099 5100
#ifdef TARGET_X86_64
        if (dflag == 2) {
5101
            gen_op_mov_TN_reg(MO_64, 0, R_EAX);
B
bellard 已提交
5102
            tcg_gen_sari_tl(cpu_T[0], cpu_T[0], 63);
5103
            gen_op_mov_reg_T0(MO_64, R_EDX);
B
bellard 已提交
5104 5105
        } else
#endif
B
bellard 已提交
5106
        if (dflag == 1) {
5107
            gen_op_mov_TN_reg(MO_32, 0, R_EAX);
B
bellard 已提交
5108 5109
            tcg_gen_ext32s_tl(cpu_T[0], cpu_T[0]);
            tcg_gen_sari_tl(cpu_T[0], cpu_T[0], 31);
5110
            gen_op_mov_reg_T0(MO_32, R_EDX);
B
bellard 已提交
5111
        } else {
5112
            gen_op_mov_TN_reg(MO_16, 0, R_EAX);
B
bellard 已提交
5113 5114
            tcg_gen_ext16s_tl(cpu_T[0], cpu_T[0]);
            tcg_gen_sari_tl(cpu_T[0], cpu_T[0], 15);
5115
            gen_op_mov_reg_T0(MO_16, R_EDX);
B
bellard 已提交
5116
        }
B
bellard 已提交
5117 5118 5119 5120
        break;
    case 0x1af: /* imul Gv, Ev */
    case 0x69: /* imul Gv, Ev, I */
    case 0x6b:
5121
        ot = dflag + MO_16;
5122
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5123 5124 5125 5126 5127
        reg = ((modrm >> 3) & 7) | rex_r;
        if (b == 0x69)
            s->rip_offset = insn_const_size(ot);
        else if (b == 0x6b)
            s->rip_offset = 1;
5128
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
B
bellard 已提交
5129
        if (b == 0x69) {
5130
            val = insn_get(env, s, ot);
5131
            tcg_gen_movi_tl(cpu_T[1], val);
B
bellard 已提交
5132
        } else if (b == 0x6b) {
5133
            val = (int8_t)insn_get(env, s, MO_8);
5134
            tcg_gen_movi_tl(cpu_T[1], val);
B
bellard 已提交
5135
        } else {
B
bellard 已提交
5136
            gen_op_mov_TN_reg(ot, 1, reg);
B
bellard 已提交
5137
        }
5138
        switch (ot) {
B
bellard 已提交
5139
#ifdef TARGET_X86_64
5140
        case MO_64:
5141 5142 5143 5144 5145
            tcg_gen_muls2_i64(cpu_regs[reg], cpu_T[1], cpu_T[0], cpu_T[1]);
            tcg_gen_mov_tl(cpu_cc_dst, cpu_regs[reg]);
            tcg_gen_sari_tl(cpu_cc_src, cpu_cc_dst, 63);
            tcg_gen_sub_tl(cpu_cc_src, cpu_cc_src, cpu_T[1]);
            break;
B
bellard 已提交
5146
#endif
5147
        case MO_32:
5148 5149 5150 5151 5152 5153 5154 5155 5156 5157 5158
            tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
            tcg_gen_trunc_tl_i32(cpu_tmp3_i32, cpu_T[1]);
            tcg_gen_muls2_i32(cpu_tmp2_i32, cpu_tmp3_i32,
                              cpu_tmp2_i32, cpu_tmp3_i32);
            tcg_gen_extu_i32_tl(cpu_regs[reg], cpu_tmp2_i32);
            tcg_gen_sari_i32(cpu_tmp2_i32, cpu_tmp2_i32, 31);
            tcg_gen_mov_tl(cpu_cc_dst, cpu_regs[reg]);
            tcg_gen_sub_i32(cpu_tmp2_i32, cpu_tmp2_i32, cpu_tmp3_i32);
            tcg_gen_extu_i32_tl(cpu_cc_src, cpu_tmp2_i32);
            break;
        default:
B
bellard 已提交
5159 5160 5161 5162 5163 5164 5165
            tcg_gen_ext16s_tl(cpu_T[0], cpu_T[0]);
            tcg_gen_ext16s_tl(cpu_T[1], cpu_T[1]);
            /* XXX: use 32 bit mul which could be faster */
            tcg_gen_mul_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
            tcg_gen_mov_tl(cpu_cc_dst, cpu_T[0]);
            tcg_gen_ext16s_tl(cpu_tmp0, cpu_T[0]);
            tcg_gen_sub_tl(cpu_cc_src, cpu_T[0], cpu_tmp0);
5166 5167
            gen_op_mov_reg_T0(ot, reg);
            break;
B
bellard 已提交
5168
        }
5169
        set_cc_op(s, CC_OP_MULB + ot);
B
bellard 已提交
5170 5171 5172 5173
        break;
    case 0x1c0:
    case 0x1c1: /* xadd Ev, Gv */
        if ((b & 1) == 0)
5174
            ot = MO_8;
B
bellard 已提交
5175
        else
5176
            ot = dflag + MO_16;
5177
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5178
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5179 5180
        mod = (modrm >> 6) & 3;
        if (mod == 3) {
B
bellard 已提交
5181
            rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
5182 5183
            gen_op_mov_TN_reg(ot, 0, reg);
            gen_op_mov_TN_reg(ot, 1, rm);
B
bellard 已提交
5184
            gen_op_addl_T0_T1();
B
bellard 已提交
5185 5186
            gen_op_mov_reg_T1(ot, reg);
            gen_op_mov_reg_T0(ot, rm);
B
bellard 已提交
5187
        } else {
5188
            gen_lea_modrm(env, s, modrm);
B
bellard 已提交
5189
            gen_op_mov_TN_reg(ot, 0, reg);
5190
            gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
B
bellard 已提交
5191
            gen_op_addl_T0_T1();
5192
            gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
5193
            gen_op_mov_reg_T1(ot, reg);
B
bellard 已提交
5194 5195
        }
        gen_op_update2_cc();
5196
        set_cc_op(s, CC_OP_ADDB + ot);
B
bellard 已提交
5197 5198 5199
        break;
    case 0x1b0:
    case 0x1b1: /* cmpxchg Ev, Gv */
B
bellard 已提交
5200
        {
B
bellard 已提交
5201
            int label1, label2;
5202
            TCGv t0, t1, t2, a0;
B
bellard 已提交
5203 5204

            if ((b & 1) == 0)
5205
                ot = MO_8;
B
bellard 已提交
5206
            else
5207
                ot = dflag + MO_16;
5208
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5209 5210
            reg = ((modrm >> 3) & 7) | rex_r;
            mod = (modrm >> 6) & 3;
P
pbrook 已提交
5211 5212 5213 5214
            t0 = tcg_temp_local_new();
            t1 = tcg_temp_local_new();
            t2 = tcg_temp_local_new();
            a0 = tcg_temp_local_new();
5215
            gen_op_mov_v_reg(ot, t1, reg);
B
bellard 已提交
5216 5217
            if (mod == 3) {
                rm = (modrm & 7) | REX_B(s);
5218
                gen_op_mov_v_reg(ot, t0, rm);
B
bellard 已提交
5219
            } else {
5220
                gen_lea_modrm(env, s, modrm);
5221
                tcg_gen_mov_tl(a0, cpu_A0);
5222
                gen_op_ld_v(s, ot, t0, a0);
B
bellard 已提交
5223 5224 5225
                rm = 0; /* avoid warning */
            }
            label1 = gen_new_label();
5226 5227
            tcg_gen_mov_tl(t2, cpu_regs[R_EAX]);
            gen_extu(ot, t0);
5228
            gen_extu(ot, t2);
5229
            tcg_gen_brcond_tl(TCG_COND_EQ, t2, t0, label1);
5230
            label2 = gen_new_label();
B
bellard 已提交
5231
            if (mod == 3) {
5232
                gen_op_mov_reg_v(ot, R_EAX, t0);
B
bellard 已提交
5233 5234
                tcg_gen_br(label2);
                gen_set_label(label1);
5235
                gen_op_mov_reg_v(ot, rm, t1);
B
bellard 已提交
5236
            } else {
5237 5238 5239
                /* perform no-op store cycle like physical cpu; must be
                   before changing accumulator to ensure idempotency if
                   the store faults and the instruction is restarted */
5240
                gen_op_st_v(s, ot, t0, a0);
5241
                gen_op_mov_reg_v(ot, R_EAX, t0);
5242
                tcg_gen_br(label2);
B
bellard 已提交
5243
                gen_set_label(label1);
5244
                gen_op_st_v(s, ot, t1, a0);
B
bellard 已提交
5245
            }
5246
            gen_set_label(label2);
5247
            tcg_gen_mov_tl(cpu_cc_src, t0);
5248 5249
            tcg_gen_mov_tl(cpu_cc_srcT, t2);
            tcg_gen_sub_tl(cpu_cc_dst, t2, t0);
5250
            set_cc_op(s, CC_OP_SUBB + ot);
5251 5252 5253 5254
            tcg_temp_free(t0);
            tcg_temp_free(t1);
            tcg_temp_free(t2);
            tcg_temp_free(a0);
B
bellard 已提交
5255 5256 5257
        }
        break;
    case 0x1c7: /* cmpxchg8b */
5258
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5259
        mod = (modrm >> 6) & 3;
5260
        if ((mod == 3) || ((modrm & 0x38) != 0x8))
B
bellard 已提交
5261
            goto illegal_op;
B
bellard 已提交
5262 5263 5264 5265 5266
#ifdef TARGET_X86_64
        if (dflag == 2) {
            if (!(s->cpuid_ext_features & CPUID_EXT_CX16))
                goto illegal_op;
            gen_jmp_im(pc_start - s->cs_base);
5267
            gen_update_cc_op(s);
5268
            gen_lea_modrm(env, s, modrm);
B
Blue Swirl 已提交
5269
            gen_helper_cmpxchg16b(cpu_env, cpu_A0);
B
bellard 已提交
5270 5271 5272 5273 5274 5275
        } else
#endif        
        {
            if (!(s->cpuid_features & CPUID_CX8))
                goto illegal_op;
            gen_jmp_im(pc_start - s->cs_base);
5276
            gen_update_cc_op(s);
5277
            gen_lea_modrm(env, s, modrm);
B
Blue Swirl 已提交
5278
            gen_helper_cmpxchg8b(cpu_env, cpu_A0);
B
bellard 已提交
5279
        }
5280
        set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
5281
        break;
5282

B
bellard 已提交
5283 5284 5285
        /**************************/
        /* push/pop */
    case 0x50 ... 0x57: /* push */
5286
        gen_op_mov_TN_reg(MO_32, 0, (b & 7) | REX_B(s));
B
bellard 已提交
5287 5288 5289
        gen_push_T0(s);
        break;
    case 0x58 ... 0x5f: /* pop */
B
bellard 已提交
5290
        if (CODE64(s)) {
5291
            ot = dflag ? MO_64 : MO_16;
B
bellard 已提交
5292
        } else {
5293
            ot = dflag + MO_16;
B
bellard 已提交
5294
        }
B
bellard 已提交
5295
        gen_pop_T0(s);
B
bellard 已提交
5296
        /* NOTE: order is important for pop %sp */
B
bellard 已提交
5297
        gen_pop_update(s);
B
bellard 已提交
5298
        gen_op_mov_reg_T0(ot, (b & 7) | REX_B(s));
B
bellard 已提交
5299 5300
        break;
    case 0x60: /* pusha */
B
bellard 已提交
5301 5302
        if (CODE64(s))
            goto illegal_op;
B
bellard 已提交
5303 5304 5305
        gen_pusha(s);
        break;
    case 0x61: /* popa */
B
bellard 已提交
5306 5307
        if (CODE64(s))
            goto illegal_op;
B
bellard 已提交
5308 5309 5310 5311
        gen_popa(s);
        break;
    case 0x68: /* push Iv */
    case 0x6a:
B
bellard 已提交
5312
        if (CODE64(s)) {
5313
            ot = dflag ? MO_64 : MO_16;
B
bellard 已提交
5314
        } else {
5315
            ot = dflag + MO_16;
B
bellard 已提交
5316
        }
B
bellard 已提交
5317
        if (b == 0x68)
5318
            val = insn_get(env, s, ot);
B
bellard 已提交
5319
        else
5320
            val = (int8_t)insn_get(env, s, MO_8);
5321
        tcg_gen_movi_tl(cpu_T[0], val);
B
bellard 已提交
5322 5323 5324
        gen_push_T0(s);
        break;
    case 0x8f: /* pop Ev */
B
bellard 已提交
5325
        if (CODE64(s)) {
5326
            ot = dflag ? MO_64 : MO_16;
B
bellard 已提交
5327
        } else {
5328
            ot = dflag + MO_16;
B
bellard 已提交
5329
        }
5330
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5331
        mod = (modrm >> 6) & 3;
B
bellard 已提交
5332
        gen_pop_T0(s);
B
bellard 已提交
5333 5334 5335
        if (mod == 3) {
            /* NOTE: order is important for pop %sp */
            gen_pop_update(s);
B
bellard 已提交
5336
            rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
5337
            gen_op_mov_reg_T0(ot, rm);
B
bellard 已提交
5338 5339
        } else {
            /* NOTE: order is important too for MMU exceptions */
B
bellard 已提交
5340
            s->popl_esp_hack = 1 << ot;
5341
            gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 1);
B
bellard 已提交
5342 5343 5344
            s->popl_esp_hack = 0;
            gen_pop_update(s);
        }
B
bellard 已提交
5345 5346 5347 5348
        break;
    case 0xc8: /* enter */
        {
            int level;
5349
            val = cpu_lduw_code(env, s->pc);
B
bellard 已提交
5350
            s->pc += 2;
5351
            level = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5352 5353 5354 5355 5356
            gen_enter(s, val, level);
        }
        break;
    case 0xc9: /* leave */
        /* XXX: exception not precise (ESP is updated before potential exception) */
B
bellard 已提交
5357
        if (CODE64(s)) {
5358 5359
            gen_op_mov_TN_reg(MO_64, 0, R_EBP);
            gen_op_mov_reg_T0(MO_64, R_ESP);
B
bellard 已提交
5360
        } else if (s->ss32) {
5361 5362
            gen_op_mov_TN_reg(MO_32, 0, R_EBP);
            gen_op_mov_reg_T0(MO_32, R_ESP);
B
bellard 已提交
5363
        } else {
5364 5365
            gen_op_mov_TN_reg(MO_16, 0, R_EBP);
            gen_op_mov_reg_T0(MO_16, R_ESP);
B
bellard 已提交
5366 5367
        }
        gen_pop_T0(s);
B
bellard 已提交
5368
        if (CODE64(s)) {
5369
            ot = dflag ? MO_64 : MO_16;
B
bellard 已提交
5370
        } else {
5371
            ot = dflag + MO_16;
B
bellard 已提交
5372
        }
B
bellard 已提交
5373
        gen_op_mov_reg_T0(ot, R_EBP);
B
bellard 已提交
5374 5375 5376 5377 5378 5379
        gen_pop_update(s);
        break;
    case 0x06: /* push es */
    case 0x0e: /* push cs */
    case 0x16: /* push ss */
    case 0x1e: /* push ds */
B
bellard 已提交
5380 5381
        if (CODE64(s))
            goto illegal_op;
B
bellard 已提交
5382 5383 5384 5385 5386 5387 5388 5389 5390 5391 5392
        gen_op_movl_T0_seg(b >> 3);
        gen_push_T0(s);
        break;
    case 0x1a0: /* push fs */
    case 0x1a8: /* push gs */
        gen_op_movl_T0_seg((b >> 3) & 7);
        gen_push_T0(s);
        break;
    case 0x07: /* pop es */
    case 0x17: /* pop ss */
    case 0x1f: /* pop ds */
B
bellard 已提交
5393 5394
        if (CODE64(s))
            goto illegal_op;
B
bellard 已提交
5395 5396 5397 5398 5399
        reg = b >> 3;
        gen_pop_T0(s);
        gen_movl_seg_T0(s, reg, pc_start - s->cs_base);
        gen_pop_update(s);
        if (reg == R_SS) {
5400 5401 5402 5403
            /* if reg == SS, inhibit interrupts/trace. */
            /* If several instructions disable interrupts, only the
               _first_ does it */
            if (!(s->tb->flags & HF_INHIBIT_IRQ_MASK))
5404
                gen_helper_set_inhibit_irq(cpu_env);
B
bellard 已提交
5405 5406 5407
            s->tf = 0;
        }
        if (s->is_jmp) {
B
bellard 已提交
5408
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
5409 5410 5411 5412 5413 5414 5415 5416 5417
            gen_eob(s);
        }
        break;
    case 0x1a1: /* pop fs */
    case 0x1a9: /* pop gs */
        gen_pop_T0(s);
        gen_movl_seg_T0(s, (b >> 3) & 7, pc_start - s->cs_base);
        gen_pop_update(s);
        if (s->is_jmp) {
B
bellard 已提交
5418
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
5419 5420 5421 5422 5423 5424 5425 5426 5427
            gen_eob(s);
        }
        break;

        /**************************/
        /* mov */
    case 0x88:
    case 0x89: /* mov Gv, Ev */
        if ((b & 1) == 0)
5428
            ot = MO_8;
B
bellard 已提交
5429
        else
5430
            ot = dflag + MO_16;
5431
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5432
        reg = ((modrm >> 3) & 7) | rex_r;
5433

B
bellard 已提交
5434
        /* generate a generic store */
5435
        gen_ldst_modrm(env, s, modrm, ot, reg, 1);
B
bellard 已提交
5436 5437 5438 5439
        break;
    case 0xc6:
    case 0xc7: /* mov Ev, Iv */
        if ((b & 1) == 0)
5440
            ot = MO_8;
B
bellard 已提交
5441
        else
5442
            ot = dflag + MO_16;
5443
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5444
        mod = (modrm >> 6) & 3;
B
bellard 已提交
5445 5446
        if (mod != 3) {
            s->rip_offset = insn_const_size(ot);
5447
            gen_lea_modrm(env, s, modrm);
B
bellard 已提交
5448
        }
5449
        val = insn_get(env, s, ot);
5450
        tcg_gen_movi_tl(cpu_T[0], val);
5451 5452 5453
        if (mod != 3) {
            gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
        } else {
B
bellard 已提交
5454
            gen_op_mov_reg_T0(ot, (modrm & 7) | REX_B(s));
5455
        }
B
bellard 已提交
5456 5457 5458 5459
        break;
    case 0x8a:
    case 0x8b: /* mov Ev, Gv */
        if ((b & 1) == 0)
5460
            ot = MO_8;
B
bellard 已提交
5461
        else
5462
            ot = MO_16 + dflag;
5463
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5464
        reg = ((modrm >> 3) & 7) | rex_r;
5465

5466
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
B
bellard 已提交
5467
        gen_op_mov_reg_T0(ot, reg);
B
bellard 已提交
5468 5469
        break;
    case 0x8e: /* mov seg, Gv */
5470
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5471 5472 5473
        reg = (modrm >> 3) & 7;
        if (reg >= 6 || reg == R_CS)
            goto illegal_op;
5474
        gen_ldst_modrm(env, s, modrm, MO_16, OR_TMP0, 0);
B
bellard 已提交
5475 5476 5477
        gen_movl_seg_T0(s, reg, pc_start - s->cs_base);
        if (reg == R_SS) {
            /* if reg == SS, inhibit interrupts/trace */
5478 5479 5480
            /* If several instructions disable interrupts, only the
               _first_ does it */
            if (!(s->tb->flags & HF_INHIBIT_IRQ_MASK))
5481
                gen_helper_set_inhibit_irq(cpu_env);
B
bellard 已提交
5482 5483 5484
            s->tf = 0;
        }
        if (s->is_jmp) {
B
bellard 已提交
5485
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
5486 5487 5488 5489
            gen_eob(s);
        }
        break;
    case 0x8c: /* mov Gv, seg */
5490
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5491 5492 5493 5494 5495
        reg = (modrm >> 3) & 7;
        mod = (modrm >> 6) & 3;
        if (reg >= 6)
            goto illegal_op;
        gen_op_movl_T0_seg(reg);
B
bellard 已提交
5496
        if (mod == 3)
5497
            ot = MO_16 + dflag;
B
bellard 已提交
5498
        else
5499
            ot = MO_16;
5500
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 1);
B
bellard 已提交
5501 5502 5503 5504 5505 5506 5507
        break;

    case 0x1b6: /* movzbS Gv, Eb */
    case 0x1b7: /* movzwS Gv, Eb */
    case 0x1be: /* movsbS Gv, Eb */
    case 0x1bf: /* movswS Gv, Eb */
        {
5508 5509 5510
            TCGMemOp d_ot;
            TCGMemOp s_ot;

B
bellard 已提交
5511
            /* d_ot is the size of destination */
5512
            d_ot = dflag + MO_16;
B
bellard 已提交
5513
            /* ot is the size of source */
5514
            ot = (b & 1) + MO_8;
5515 5516 5517
            /* s_ot is the sign+size of source */
            s_ot = b & 8 ? MO_SIGN | ot : ot;

5518
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5519
            reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5520
            mod = (modrm >> 6) & 3;
B
bellard 已提交
5521
            rm = (modrm & 7) | REX_B(s);
5522

B
bellard 已提交
5523
            if (mod == 3) {
B
bellard 已提交
5524
                gen_op_mov_TN_reg(ot, 0, rm);
5525 5526
                switch (s_ot) {
                case MO_UB:
B
bellard 已提交
5527
                    tcg_gen_ext8u_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
5528
                    break;
5529
                case MO_SB:
B
bellard 已提交
5530
                    tcg_gen_ext8s_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
5531
                    break;
5532
                case MO_UW:
B
bellard 已提交
5533
                    tcg_gen_ext16u_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
5534 5535
                    break;
                default:
5536
                case MO_SW:
B
bellard 已提交
5537
                    tcg_gen_ext16s_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
5538 5539
                    break;
                }
B
bellard 已提交
5540
                gen_op_mov_reg_T0(d_ot, reg);
B
bellard 已提交
5541
            } else {
5542
                gen_lea_modrm(env, s, modrm);
5543
                gen_op_ld_v(s, s_ot, cpu_T[0], cpu_A0);
B
bellard 已提交
5544
                gen_op_mov_reg_T0(d_ot, reg);
B
bellard 已提交
5545 5546 5547 5548 5549
            }
        }
        break;

    case 0x8d: /* lea */
5550
        ot = dflag + MO_16;
5551
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5552 5553 5554
        mod = (modrm >> 6) & 3;
        if (mod == 3)
            goto illegal_op;
B
bellard 已提交
5555
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5556 5557 5558 5559
        /* we must ensure that no segment is added */
        s->override = -1;
        val = s->addseg;
        s->addseg = 0;
5560
        gen_lea_modrm(env, s, modrm);
B
bellard 已提交
5561
        s->addseg = val;
5562
        gen_op_mov_reg_A0(ot - MO_16, reg);
B
bellard 已提交
5563
        break;
5564

B
bellard 已提交
5565 5566 5567 5568 5569
    case 0xa0: /* mov EAX, Ov */
    case 0xa1:
    case 0xa2: /* mov Ov, EAX */
    case 0xa3:
        {
B
bellard 已提交
5570 5571 5572
            target_ulong offset_addr;

            if ((b & 1) == 0)
5573
                ot = MO_8;
B
bellard 已提交
5574
            else
5575
                ot = dflag + MO_16;
B
bellard 已提交
5576
#ifdef TARGET_X86_64
5577
            if (s->aflag == 2) {
5578
                offset_addr = cpu_ldq_code(env, s->pc);
B
bellard 已提交
5579
                s->pc += 8;
5580
            } else
B
bellard 已提交
5581 5582 5583
#endif
            {
                if (s->aflag) {
5584
                    offset_addr = insn_get(env, s, MO_32);
B
bellard 已提交
5585
                } else {
5586
                    offset_addr = insn_get(env, s, MO_16);
B
bellard 已提交
5587 5588
                }
            }
5589
            tcg_gen_movi_tl(cpu_A0, offset_addr);
B
bellard 已提交
5590
            gen_add_A0_ds_seg(s);
B
bellard 已提交
5591
            if ((b & 2) == 0) {
5592
                gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
5593
                gen_op_mov_reg_T0(ot, R_EAX);
B
bellard 已提交
5594
            } else {
B
bellard 已提交
5595
                gen_op_mov_TN_reg(ot, 0, R_EAX);
5596
                gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
5597 5598 5599 5600
            }
        }
        break;
    case 0xd7: /* xlat */
B
bellard 已提交
5601
#ifdef TARGET_X86_64
5602
        if (s->aflag == 2) {
B
bellard 已提交
5603
            gen_op_movq_A0_reg(R_EBX);
5604
            gen_op_mov_TN_reg(MO_64, 0, R_EAX);
5605 5606
            tcg_gen_andi_tl(cpu_T[0], cpu_T[0], 0xff);
            tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_T[0]);
5607
        } else
B
bellard 已提交
5608 5609
#endif
        {
B
bellard 已提交
5610
            gen_op_movl_A0_reg(R_EBX);
5611
            gen_op_mov_TN_reg(MO_32, 0, R_EAX);
5612 5613
            tcg_gen_andi_tl(cpu_T[0], cpu_T[0], 0xff);
            tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_T[0]);
B
bellard 已提交
5614
            if (s->aflag == 0)
5615
                tcg_gen_ext16u_tl(cpu_A0, cpu_A0);
5616 5617
            else
                tcg_gen_andi_tl(cpu_A0, cpu_A0, 0xffffffff);
B
bellard 已提交
5618
        }
B
bellard 已提交
5619
        gen_add_A0_ds_seg(s);
5620
        gen_op_ld_v(s, MO_8, cpu_T[0], cpu_A0);
5621
        gen_op_mov_reg_T0(MO_8, R_EAX);
B
bellard 已提交
5622 5623
        break;
    case 0xb0 ... 0xb7: /* mov R, Ib */
5624
        val = insn_get(env, s, MO_8);
5625
        tcg_gen_movi_tl(cpu_T[0], val);
5626
        gen_op_mov_reg_T0(MO_8, (b & 7) | REX_B(s));
B
bellard 已提交
5627 5628
        break;
    case 0xb8 ... 0xbf: /* mov R, Iv */
B
bellard 已提交
5629 5630 5631 5632
#ifdef TARGET_X86_64
        if (dflag == 2) {
            uint64_t tmp;
            /* 64 bit case */
5633
            tmp = cpu_ldq_code(env, s->pc);
B
bellard 已提交
5634 5635
            s->pc += 8;
            reg = (b & 7) | REX_B(s);
5636
            tcg_gen_movi_tl(cpu_T[0], tmp);
5637
            gen_op_mov_reg_T0(MO_64, reg);
5638
        } else
B
bellard 已提交
5639 5640
#endif
        {
5641
            ot = dflag ? MO_32 : MO_16;
5642
            val = insn_get(env, s, ot);
B
bellard 已提交
5643
            reg = (b & 7) | REX_B(s);
5644
            tcg_gen_movi_tl(cpu_T[0], val);
B
bellard 已提交
5645
            gen_op_mov_reg_T0(ot, reg);
B
bellard 已提交
5646
        }
B
bellard 已提交
5647 5648 5649
        break;

    case 0x91 ... 0x97: /* xchg R, EAX */
R
Richard Henderson 已提交
5650
    do_xchg_reg_eax:
5651
        ot = dflag + MO_16;
B
bellard 已提交
5652
        reg = (b & 7) | REX_B(s);
B
bellard 已提交
5653 5654 5655 5656 5657
        rm = R_EAX;
        goto do_xchg_reg;
    case 0x86:
    case 0x87: /* xchg Ev, Gv */
        if ((b & 1) == 0)
5658
            ot = MO_8;
B
bellard 已提交
5659
        else
5660
            ot = dflag + MO_16;
5661
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5662
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5663 5664
        mod = (modrm >> 6) & 3;
        if (mod == 3) {
B
bellard 已提交
5665
            rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
5666
        do_xchg_reg:
B
bellard 已提交
5667 5668 5669 5670
            gen_op_mov_TN_reg(ot, 0, reg);
            gen_op_mov_TN_reg(ot, 1, rm);
            gen_op_mov_reg_T0(ot, rm);
            gen_op_mov_reg_T1(ot, reg);
B
bellard 已提交
5671
        } else {
5672
            gen_lea_modrm(env, s, modrm);
B
bellard 已提交
5673
            gen_op_mov_TN_reg(ot, 0, reg);
B
bellard 已提交
5674 5675
            /* for xchg, lock is implicit */
            if (!(prefixes & PREFIX_LOCK))
P
pbrook 已提交
5676
                gen_helper_lock();
5677
            gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
5678
            gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
5679
            if (!(prefixes & PREFIX_LOCK))
P
pbrook 已提交
5680
                gen_helper_unlock();
B
bellard 已提交
5681
            gen_op_mov_reg_T1(ot, reg);
B
bellard 已提交
5682 5683 5684
        }
        break;
    case 0xc4: /* les Gv */
5685
        /* In CODE64 this is VEX3; see above.  */
B
bellard 已提交
5686 5687 5688
        op = R_ES;
        goto do_lxx;
    case 0xc5: /* lds Gv */
5689
        /* In CODE64 this is VEX2; see above.  */
B
bellard 已提交
5690 5691 5692 5693 5694 5695 5696 5697 5698 5699 5700
        op = R_DS;
        goto do_lxx;
    case 0x1b2: /* lss Gv */
        op = R_SS;
        goto do_lxx;
    case 0x1b4: /* lfs Gv */
        op = R_FS;
        goto do_lxx;
    case 0x1b5: /* lgs Gv */
        op = R_GS;
    do_lxx:
5701
        ot = dflag ? MO_32 : MO_16;
5702
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5703
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5704 5705 5706
        mod = (modrm >> 6) & 3;
        if (mod == 3)
            goto illegal_op;
5707
        gen_lea_modrm(env, s, modrm);
5708
        gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
5709
        gen_add_A0_im(s, 1 << (ot - MO_16 + 1));
B
bellard 已提交
5710
        /* load the segment first to handle exceptions properly */
5711
        gen_op_ld_v(s, MO_16, cpu_T[0], cpu_A0);
B
bellard 已提交
5712 5713
        gen_movl_seg_T0(s, op, pc_start - s->cs_base);
        /* then put the data */
B
bellard 已提交
5714
        gen_op_mov_reg_T1(ot, reg);
B
bellard 已提交
5715
        if (s->is_jmp) {
B
bellard 已提交
5716
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
5717 5718 5719
            gen_eob(s);
        }
        break;
5720

B
bellard 已提交
5721 5722 5723 5724 5725 5726 5727 5728 5729
        /************************/
        /* shifts */
    case 0xc0:
    case 0xc1:
        /* shift Ev,Ib */
        shift = 2;
    grp2:
        {
            if ((b & 1) == 0)
5730
                ot = MO_8;
B
bellard 已提交
5731
            else
5732
                ot = dflag + MO_16;
5733

5734
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5735 5736
            mod = (modrm >> 6) & 3;
            op = (modrm >> 3) & 7;
5737

B
bellard 已提交
5738
            if (mod != 3) {
B
bellard 已提交
5739 5740 5741
                if (shift == 2) {
                    s->rip_offset = 1;
                }
5742
                gen_lea_modrm(env, s, modrm);
B
bellard 已提交
5743 5744
                opreg = OR_TMP0;
            } else {
B
bellard 已提交
5745
                opreg = (modrm & 7) | REX_B(s);
B
bellard 已提交
5746 5747 5748 5749 5750 5751 5752
            }

            /* simpler op */
            if (shift == 0) {
                gen_shift(s, op, ot, opreg, OR_ECX);
            } else {
                if (shift == 2) {
5753
                    shift = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5754 5755 5756 5757 5758 5759 5760 5761 5762 5763 5764 5765 5766 5767 5768 5769 5770 5771 5772 5773 5774 5775 5776 5777 5778 5779 5780 5781 5782 5783 5784 5785
                }
                gen_shifti(s, op, ot, opreg, shift);
            }
        }
        break;
    case 0xd0:
    case 0xd1:
        /* shift Ev,1 */
        shift = 1;
        goto grp2;
    case 0xd2:
    case 0xd3:
        /* shift Ev,cl */
        shift = 0;
        goto grp2;

    case 0x1a4: /* shld imm */
        op = 0;
        shift = 1;
        goto do_shiftd;
    case 0x1a5: /* shld cl */
        op = 0;
        shift = 0;
        goto do_shiftd;
    case 0x1ac: /* shrd imm */
        op = 1;
        shift = 1;
        goto do_shiftd;
    case 0x1ad: /* shrd cl */
        op = 1;
        shift = 0;
    do_shiftd:
5786
        ot = dflag + MO_16;
5787
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5788
        mod = (modrm >> 6) & 3;
B
bellard 已提交
5789 5790
        rm = (modrm & 7) | REX_B(s);
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5791
        if (mod != 3) {
5792
            gen_lea_modrm(env, s, modrm);
5793
            opreg = OR_TMP0;
B
bellard 已提交
5794
        } else {
5795
            opreg = rm;
B
bellard 已提交
5796
        }
B
bellard 已提交
5797
        gen_op_mov_TN_reg(ot, 1, reg);
5798

B
bellard 已提交
5799
        if (shift) {
P
Paolo Bonzini 已提交
5800 5801 5802
            TCGv imm = tcg_const_tl(cpu_ldub_code(env, s->pc++));
            gen_shiftd_rm_T1(s, ot, opreg, op, imm);
            tcg_temp_free(imm);
B
bellard 已提交
5803
        } else {
P
Paolo Bonzini 已提交
5804
            gen_shiftd_rm_T1(s, ot, opreg, op, cpu_regs[R_ECX]);
B
bellard 已提交
5805 5806 5807 5808 5809
        }
        break;

        /************************/
        /* floats */
5810
    case 0xd8 ... 0xdf:
B
bellard 已提交
5811 5812 5813 5814 5815 5816
        if (s->flags & (HF_EM_MASK | HF_TS_MASK)) {
            /* if CR0.EM or CR0.TS are set, generate an FPU exception */
            /* XXX: what to do if illegal op ? */
            gen_exception(s, EXCP07_PREX, pc_start - s->cs_base);
            break;
        }
5817
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5818 5819 5820 5821 5822
        mod = (modrm >> 6) & 3;
        rm = modrm & 7;
        op = ((b & 7) << 3) | ((modrm >> 3) & 7);
        if (mod != 3) {
            /* memory op */
5823
            gen_lea_modrm(env, s, modrm);
B
bellard 已提交
5824 5825 5826 5827 5828 5829 5830 5831 5832 5833 5834
            switch(op) {
            case 0x00 ... 0x07: /* fxxxs */
            case 0x10 ... 0x17: /* fixxxl */
            case 0x20 ... 0x27: /* fxxxl */
            case 0x30 ... 0x37: /* fixxx */
                {
                    int op1;
                    op1 = op & 7;

                    switch(op >> 4) {
                    case 0:
5835 5836
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
B
Blue Swirl 已提交
5837
                        gen_helper_flds_FT0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5838 5839
                        break;
                    case 1:
5840 5841
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
B
Blue Swirl 已提交
5842
                        gen_helper_fildl_FT0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5843 5844
                        break;
                    case 2:
5845 5846
                        tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0,
                                            s->mem_index, MO_LEQ);
B
Blue Swirl 已提交
5847
                        gen_helper_fldl_FT0(cpu_env, cpu_tmp1_i64);
B
bellard 已提交
5848 5849 5850
                        break;
                    case 3:
                    default:
5851 5852
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LESW);
B
Blue Swirl 已提交
5853
                        gen_helper_fildl_FT0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5854 5855
                        break;
                    }
5856

P
pbrook 已提交
5857
                    gen_helper_fp_arith_ST0_FT0(op1);
B
bellard 已提交
5858 5859
                    if (op1 == 3) {
                        /* fcomp needs pop */
B
Blue Swirl 已提交
5860
                        gen_helper_fpop(cpu_env);
B
bellard 已提交
5861 5862 5863 5864 5865 5866
                    }
                }
                break;
            case 0x08: /* flds */
            case 0x0a: /* fsts */
            case 0x0b: /* fstps */
B
bellard 已提交
5867 5868 5869
            case 0x18 ... 0x1b: /* fildl, fisttpl, fistl, fistpl */
            case 0x28 ... 0x2b: /* fldl, fisttpll, fstl, fstpl */
            case 0x38 ... 0x3b: /* filds, fisttps, fists, fistps */
B
bellard 已提交
5870 5871 5872 5873
                switch(op & 7) {
                case 0:
                    switch(op >> 4) {
                    case 0:
5874 5875
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
B
Blue Swirl 已提交
5876
                        gen_helper_flds_ST0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5877 5878
                        break;
                    case 1:
5879 5880
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
B
Blue Swirl 已提交
5881
                        gen_helper_fildl_ST0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5882 5883
                        break;
                    case 2:
5884 5885
                        tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0,
                                            s->mem_index, MO_LEQ);
B
Blue Swirl 已提交
5886
                        gen_helper_fldl_ST0(cpu_env, cpu_tmp1_i64);
B
bellard 已提交
5887 5888 5889
                        break;
                    case 3:
                    default:
5890 5891
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LESW);
B
Blue Swirl 已提交
5892
                        gen_helper_fildl_ST0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5893 5894 5895
                        break;
                    }
                    break;
B
bellard 已提交
5896
                case 1:
B
bellard 已提交
5897
                    /* XXX: the corresponding CPUID bit must be tested ! */
B
bellard 已提交
5898 5899
                    switch(op >> 4) {
                    case 1:
B
Blue Swirl 已提交
5900
                        gen_helper_fisttl_ST0(cpu_tmp2_i32, cpu_env);
5901 5902
                        tcg_gen_qemu_st_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
B
bellard 已提交
5903 5904
                        break;
                    case 2:
B
Blue Swirl 已提交
5905
                        gen_helper_fisttll_ST0(cpu_tmp1_i64, cpu_env);
5906 5907
                        tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0,
                                            s->mem_index, MO_LEQ);
B
bellard 已提交
5908 5909 5910
                        break;
                    case 3:
                    default:
B
Blue Swirl 已提交
5911
                        gen_helper_fistt_ST0(cpu_tmp2_i32, cpu_env);
5912 5913
                        tcg_gen_qemu_st_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUW);
B
bellard 已提交
5914
                        break;
B
bellard 已提交
5915
                    }
B
Blue Swirl 已提交
5916
                    gen_helper_fpop(cpu_env);
B
bellard 已提交
5917
                    break;
B
bellard 已提交
5918 5919 5920
                default:
                    switch(op >> 4) {
                    case 0:
B
Blue Swirl 已提交
5921
                        gen_helper_fsts_ST0(cpu_tmp2_i32, cpu_env);
5922 5923
                        tcg_gen_qemu_st_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
B
bellard 已提交
5924 5925
                        break;
                    case 1:
B
Blue Swirl 已提交
5926
                        gen_helper_fistl_ST0(cpu_tmp2_i32, cpu_env);
5927 5928
                        tcg_gen_qemu_st_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
B
bellard 已提交
5929 5930
                        break;
                    case 2:
B
Blue Swirl 已提交
5931
                        gen_helper_fstl_ST0(cpu_tmp1_i64, cpu_env);
5932 5933
                        tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0,
                                            s->mem_index, MO_LEQ);
B
bellard 已提交
5934 5935 5936
                        break;
                    case 3:
                    default:
B
Blue Swirl 已提交
5937
                        gen_helper_fist_ST0(cpu_tmp2_i32, cpu_env);
5938 5939
                        tcg_gen_qemu_st_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUW);
B
bellard 已提交
5940 5941 5942
                        break;
                    }
                    if ((op & 7) == 3)
B
Blue Swirl 已提交
5943
                        gen_helper_fpop(cpu_env);
B
bellard 已提交
5944 5945 5946 5947
                    break;
                }
                break;
            case 0x0c: /* fldenv mem */
5948
                gen_update_cc_op(s);
B
bellard 已提交
5949
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
5950
                gen_helper_fldenv(cpu_env, cpu_A0, tcg_const_i32(s->dflag));
B
bellard 已提交
5951 5952
                break;
            case 0x0d: /* fldcw mem */
5953 5954
                tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                    s->mem_index, MO_LEUW);
B
Blue Swirl 已提交
5955
                gen_helper_fldcw(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5956 5957
                break;
            case 0x0e: /* fnstenv mem */
5958
                gen_update_cc_op(s);
B
bellard 已提交
5959
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
5960
                gen_helper_fstenv(cpu_env, cpu_A0, tcg_const_i32(s->dflag));
B
bellard 已提交
5961 5962
                break;
            case 0x0f: /* fnstcw mem */
B
Blue Swirl 已提交
5963
                gen_helper_fnstcw(cpu_tmp2_i32, cpu_env);
5964 5965
                tcg_gen_qemu_st_i32(cpu_tmp2_i32, cpu_A0,
                                    s->mem_index, MO_LEUW);
B
bellard 已提交
5966 5967
                break;
            case 0x1d: /* fldt mem */
5968
                gen_update_cc_op(s);
B
bellard 已提交
5969
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
5970
                gen_helper_fldt_ST0(cpu_env, cpu_A0);
B
bellard 已提交
5971 5972
                break;
            case 0x1f: /* fstpt mem */
5973
                gen_update_cc_op(s);
B
bellard 已提交
5974
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
5975 5976
                gen_helper_fstt_ST0(cpu_env, cpu_A0);
                gen_helper_fpop(cpu_env);
B
bellard 已提交
5977 5978
                break;
            case 0x2c: /* frstor mem */
5979
                gen_update_cc_op(s);
B
bellard 已提交
5980
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
5981
                gen_helper_frstor(cpu_env, cpu_A0, tcg_const_i32(s->dflag));
B
bellard 已提交
5982 5983
                break;
            case 0x2e: /* fnsave mem */
5984
                gen_update_cc_op(s);
B
bellard 已提交
5985
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
5986
                gen_helper_fsave(cpu_env, cpu_A0, tcg_const_i32(s->dflag));
B
bellard 已提交
5987 5988
                break;
            case 0x2f: /* fnstsw mem */
B
Blue Swirl 已提交
5989
                gen_helper_fnstsw(cpu_tmp2_i32, cpu_env);
5990 5991
                tcg_gen_qemu_st_i32(cpu_tmp2_i32, cpu_A0,
                                    s->mem_index, MO_LEUW);
B
bellard 已提交
5992 5993
                break;
            case 0x3c: /* fbld */
5994
                gen_update_cc_op(s);
B
bellard 已提交
5995
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
5996
                gen_helper_fbld_ST0(cpu_env, cpu_A0);
B
bellard 已提交
5997 5998
                break;
            case 0x3e: /* fbstp */
5999
                gen_update_cc_op(s);
B
bellard 已提交
6000
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
6001 6002
                gen_helper_fbst_ST0(cpu_env, cpu_A0);
                gen_helper_fpop(cpu_env);
B
bellard 已提交
6003 6004
                break;
            case 0x3d: /* fildll */
6005
                tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0, s->mem_index, MO_LEQ);
B
Blue Swirl 已提交
6006
                gen_helper_fildll_ST0(cpu_env, cpu_tmp1_i64);
B
bellard 已提交
6007 6008
                break;
            case 0x3f: /* fistpll */
B
Blue Swirl 已提交
6009
                gen_helper_fistll_ST0(cpu_tmp1_i64, cpu_env);
6010
                tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0, s->mem_index, MO_LEQ);
B
Blue Swirl 已提交
6011
                gen_helper_fpop(cpu_env);
B
bellard 已提交
6012 6013 6014 6015 6016 6017 6018 6019 6020 6021
                break;
            default:
                goto illegal_op;
            }
        } else {
            /* register float ops */
            opreg = rm;

            switch(op) {
            case 0x08: /* fld sti */
B
Blue Swirl 已提交
6022 6023 6024
                gen_helper_fpush(cpu_env);
                gen_helper_fmov_ST0_STN(cpu_env,
                                        tcg_const_i32((opreg + 1) & 7));
B
bellard 已提交
6025 6026
                break;
            case 0x09: /* fxchg sti */
B
bellard 已提交
6027 6028
            case 0x29: /* fxchg4 sti, undocumented op */
            case 0x39: /* fxchg7 sti, undocumented op */
B
Blue Swirl 已提交
6029
                gen_helper_fxchg_ST0_STN(cpu_env, tcg_const_i32(opreg));
B
bellard 已提交
6030 6031 6032 6033
                break;
            case 0x0a: /* grp d9/2 */
                switch(rm) {
                case 0: /* fnop */
6034
                    /* check exceptions (FreeBSD FPU probe) */
6035
                    gen_update_cc_op(s);
B
bellard 已提交
6036
                    gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
6037
                    gen_helper_fwait(cpu_env);
B
bellard 已提交
6038 6039 6040 6041 6042 6043 6044 6045
                    break;
                default:
                    goto illegal_op;
                }
                break;
            case 0x0c: /* grp d9/4 */
                switch(rm) {
                case 0: /* fchs */
B
Blue Swirl 已提交
6046
                    gen_helper_fchs_ST0(cpu_env);
B
bellard 已提交
6047 6048
                    break;
                case 1: /* fabs */
B
Blue Swirl 已提交
6049
                    gen_helper_fabs_ST0(cpu_env);
B
bellard 已提交
6050 6051
                    break;
                case 4: /* ftst */
B
Blue Swirl 已提交
6052 6053
                    gen_helper_fldz_FT0(cpu_env);
                    gen_helper_fcom_ST0_FT0(cpu_env);
B
bellard 已提交
6054 6055
                    break;
                case 5: /* fxam */
B
Blue Swirl 已提交
6056
                    gen_helper_fxam_ST0(cpu_env);
B
bellard 已提交
6057 6058 6059 6060 6061 6062 6063 6064 6065
                    break;
                default:
                    goto illegal_op;
                }
                break;
            case 0x0d: /* grp d9/5 */
                {
                    switch(rm) {
                    case 0:
B
Blue Swirl 已提交
6066 6067
                        gen_helper_fpush(cpu_env);
                        gen_helper_fld1_ST0(cpu_env);
B
bellard 已提交
6068 6069
                        break;
                    case 1:
B
Blue Swirl 已提交
6070 6071
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldl2t_ST0(cpu_env);
B
bellard 已提交
6072 6073
                        break;
                    case 2:
B
Blue Swirl 已提交
6074 6075
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldl2e_ST0(cpu_env);
B
bellard 已提交
6076 6077
                        break;
                    case 3:
B
Blue Swirl 已提交
6078 6079
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldpi_ST0(cpu_env);
B
bellard 已提交
6080 6081
                        break;
                    case 4:
B
Blue Swirl 已提交
6082 6083
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldlg2_ST0(cpu_env);
B
bellard 已提交
6084 6085
                        break;
                    case 5:
B
Blue Swirl 已提交
6086 6087
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldln2_ST0(cpu_env);
B
bellard 已提交
6088 6089
                        break;
                    case 6:
B
Blue Swirl 已提交
6090 6091
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldz_ST0(cpu_env);
B
bellard 已提交
6092 6093 6094 6095 6096 6097 6098 6099 6100
                        break;
                    default:
                        goto illegal_op;
                    }
                }
                break;
            case 0x0e: /* grp d9/6 */
                switch(rm) {
                case 0: /* f2xm1 */
B
Blue Swirl 已提交
6101
                    gen_helper_f2xm1(cpu_env);
B
bellard 已提交
6102 6103
                    break;
                case 1: /* fyl2x */
B
Blue Swirl 已提交
6104
                    gen_helper_fyl2x(cpu_env);
B
bellard 已提交
6105 6106
                    break;
                case 2: /* fptan */
B
Blue Swirl 已提交
6107
                    gen_helper_fptan(cpu_env);
B
bellard 已提交
6108 6109
                    break;
                case 3: /* fpatan */
B
Blue Swirl 已提交
6110
                    gen_helper_fpatan(cpu_env);
B
bellard 已提交
6111 6112
                    break;
                case 4: /* fxtract */
B
Blue Swirl 已提交
6113
                    gen_helper_fxtract(cpu_env);
B
bellard 已提交
6114 6115
                    break;
                case 5: /* fprem1 */
B
Blue Swirl 已提交
6116
                    gen_helper_fprem1(cpu_env);
B
bellard 已提交
6117 6118
                    break;
                case 6: /* fdecstp */
B
Blue Swirl 已提交
6119
                    gen_helper_fdecstp(cpu_env);
B
bellard 已提交
6120 6121 6122
                    break;
                default:
                case 7: /* fincstp */
B
Blue Swirl 已提交
6123
                    gen_helper_fincstp(cpu_env);
B
bellard 已提交
6124 6125 6126 6127 6128 6129
                    break;
                }
                break;
            case 0x0f: /* grp d9/7 */
                switch(rm) {
                case 0: /* fprem */
B
Blue Swirl 已提交
6130
                    gen_helper_fprem(cpu_env);
B
bellard 已提交
6131 6132
                    break;
                case 1: /* fyl2xp1 */
B
Blue Swirl 已提交
6133
                    gen_helper_fyl2xp1(cpu_env);
B
bellard 已提交
6134 6135
                    break;
                case 2: /* fsqrt */
B
Blue Swirl 已提交
6136
                    gen_helper_fsqrt(cpu_env);
B
bellard 已提交
6137 6138
                    break;
                case 3: /* fsincos */
B
Blue Swirl 已提交
6139
                    gen_helper_fsincos(cpu_env);
B
bellard 已提交
6140 6141
                    break;
                case 5: /* fscale */
B
Blue Swirl 已提交
6142
                    gen_helper_fscale(cpu_env);
B
bellard 已提交
6143 6144
                    break;
                case 4: /* frndint */
B
Blue Swirl 已提交
6145
                    gen_helper_frndint(cpu_env);
B
bellard 已提交
6146 6147
                    break;
                case 6: /* fsin */
B
Blue Swirl 已提交
6148
                    gen_helper_fsin(cpu_env);
B
bellard 已提交
6149 6150 6151
                    break;
                default:
                case 7: /* fcos */
B
Blue Swirl 已提交
6152
                    gen_helper_fcos(cpu_env);
B
bellard 已提交
6153 6154 6155 6156 6157 6158 6159 6160
                    break;
                }
                break;
            case 0x00: case 0x01: case 0x04 ... 0x07: /* fxxx st, sti */
            case 0x20: case 0x21: case 0x24 ... 0x27: /* fxxx sti, st */
            case 0x30: case 0x31: case 0x34 ... 0x37: /* fxxxp sti, st */
                {
                    int op1;
6161

B
bellard 已提交
6162 6163
                    op1 = op & 7;
                    if (op >= 0x20) {
P
pbrook 已提交
6164
                        gen_helper_fp_arith_STN_ST0(op1, opreg);
B
bellard 已提交
6165
                        if (op >= 0x30)
B
Blue Swirl 已提交
6166
                            gen_helper_fpop(cpu_env);
B
bellard 已提交
6167
                    } else {
B
Blue Swirl 已提交
6168
                        gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
P
pbrook 已提交
6169
                        gen_helper_fp_arith_ST0_FT0(op1);
B
bellard 已提交
6170 6171 6172 6173
                    }
                }
                break;
            case 0x02: /* fcom */
B
bellard 已提交
6174
            case 0x22: /* fcom2, undocumented op */
B
Blue Swirl 已提交
6175 6176
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fcom_ST0_FT0(cpu_env);
B
bellard 已提交
6177 6178
                break;
            case 0x03: /* fcomp */
B
bellard 已提交
6179 6180
            case 0x23: /* fcomp3, undocumented op */
            case 0x32: /* fcomp5, undocumented op */
B
Blue Swirl 已提交
6181 6182 6183
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fcom_ST0_FT0(cpu_env);
                gen_helper_fpop(cpu_env);
B
bellard 已提交
6184 6185 6186 6187
                break;
            case 0x15: /* da/5 */
                switch(rm) {
                case 1: /* fucompp */
B
Blue Swirl 已提交
6188 6189 6190 6191
                    gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(1));
                    gen_helper_fucom_ST0_FT0(cpu_env);
                    gen_helper_fpop(cpu_env);
                    gen_helper_fpop(cpu_env);
B
bellard 已提交
6192 6193 6194 6195 6196 6197 6198 6199 6200 6201 6202 6203
                    break;
                default:
                    goto illegal_op;
                }
                break;
            case 0x1c:
                switch(rm) {
                case 0: /* feni (287 only, just do nop here) */
                    break;
                case 1: /* fdisi (287 only, just do nop here) */
                    break;
                case 2: /* fclex */
B
Blue Swirl 已提交
6204
                    gen_helper_fclex(cpu_env);
B
bellard 已提交
6205 6206
                    break;
                case 3: /* fninit */
B
Blue Swirl 已提交
6207
                    gen_helper_fninit(cpu_env);
B
bellard 已提交
6208 6209 6210 6211 6212 6213 6214 6215
                    break;
                case 4: /* fsetpm (287 only, just do nop here) */
                    break;
                default:
                    goto illegal_op;
                }
                break;
            case 0x1d: /* fucomi */
6216 6217 6218
                if (!(s->cpuid_features & CPUID_CMOV)) {
                    goto illegal_op;
                }
6219
                gen_update_cc_op(s);
B
Blue Swirl 已提交
6220 6221
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fucomi_ST0_FT0(cpu_env);
6222
                set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6223 6224
                break;
            case 0x1e: /* fcomi */
6225 6226 6227
                if (!(s->cpuid_features & CPUID_CMOV)) {
                    goto illegal_op;
                }
6228
                gen_update_cc_op(s);
B
Blue Swirl 已提交
6229 6230
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fcomi_ST0_FT0(cpu_env);
6231
                set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6232
                break;
B
bellard 已提交
6233
            case 0x28: /* ffree sti */
B
Blue Swirl 已提交
6234
                gen_helper_ffree_STN(cpu_env, tcg_const_i32(opreg));
6235
                break;
B
bellard 已提交
6236
            case 0x2a: /* fst sti */
B
Blue Swirl 已提交
6237
                gen_helper_fmov_STN_ST0(cpu_env, tcg_const_i32(opreg));
B
bellard 已提交
6238 6239
                break;
            case 0x2b: /* fstp sti */
B
bellard 已提交
6240 6241 6242
            case 0x0b: /* fstp1 sti, undocumented op */
            case 0x3a: /* fstp8 sti, undocumented op */
            case 0x3b: /* fstp9 sti, undocumented op */
B
Blue Swirl 已提交
6243 6244
                gen_helper_fmov_STN_ST0(cpu_env, tcg_const_i32(opreg));
                gen_helper_fpop(cpu_env);
B
bellard 已提交
6245 6246
                break;
            case 0x2c: /* fucom st(i) */
B
Blue Swirl 已提交
6247 6248
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fucom_ST0_FT0(cpu_env);
B
bellard 已提交
6249 6250
                break;
            case 0x2d: /* fucomp st(i) */
B
Blue Swirl 已提交
6251 6252 6253
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fucom_ST0_FT0(cpu_env);
                gen_helper_fpop(cpu_env);
B
bellard 已提交
6254 6255 6256 6257
                break;
            case 0x33: /* de/3 */
                switch(rm) {
                case 1: /* fcompp */
B
Blue Swirl 已提交
6258 6259 6260 6261
                    gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(1));
                    gen_helper_fcom_ST0_FT0(cpu_env);
                    gen_helper_fpop(cpu_env);
                    gen_helper_fpop(cpu_env);
B
bellard 已提交
6262 6263 6264 6265 6266
                    break;
                default:
                    goto illegal_op;
                }
                break;
B
bellard 已提交
6267
            case 0x38: /* ffreep sti, undocumented op */
B
Blue Swirl 已提交
6268 6269
                gen_helper_ffree_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fpop(cpu_env);
B
bellard 已提交
6270
                break;
B
bellard 已提交
6271 6272 6273
            case 0x3c: /* df/4 */
                switch(rm) {
                case 0:
B
Blue Swirl 已提交
6274
                    gen_helper_fnstsw(cpu_tmp2_i32, cpu_env);
6275
                    tcg_gen_extu_i32_tl(cpu_T[0], cpu_tmp2_i32);
6276
                    gen_op_mov_reg_T0(MO_16, R_EAX);
B
bellard 已提交
6277 6278 6279 6280 6281 6282
                    break;
                default:
                    goto illegal_op;
                }
                break;
            case 0x3d: /* fucomip */
6283 6284 6285
                if (!(s->cpuid_features & CPUID_CMOV)) {
                    goto illegal_op;
                }
6286
                gen_update_cc_op(s);
B
Blue Swirl 已提交
6287 6288 6289
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fucomi_ST0_FT0(cpu_env);
                gen_helper_fpop(cpu_env);
6290
                set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6291 6292
                break;
            case 0x3e: /* fcomip */
6293 6294 6295
                if (!(s->cpuid_features & CPUID_CMOV)) {
                    goto illegal_op;
                }
6296
                gen_update_cc_op(s);
B
Blue Swirl 已提交
6297 6298 6299
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fcomi_ST0_FT0(cpu_env);
                gen_helper_fpop(cpu_env);
6300
                set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6301
                break;
6302 6303 6304
            case 0x10 ... 0x13: /* fcmovxx */
            case 0x18 ... 0x1b:
                {
B
bellard 已提交
6305
                    int op1, l1;
6306
                    static const uint8_t fcmov_cc[8] = {
6307 6308 6309 6310 6311
                        (JCC_B << 1),
                        (JCC_Z << 1),
                        (JCC_BE << 1),
                        (JCC_P << 1),
                    };
6312 6313 6314 6315

                    if (!(s->cpuid_features & CPUID_CMOV)) {
                        goto illegal_op;
                    }
6316
                    op1 = fcmov_cc[op & 3] | (((op >> 3) & 1) ^ 1);
B
bellard 已提交
6317
                    l1 = gen_new_label();
6318
                    gen_jcc1_noeob(s, op1, l1);
B
Blue Swirl 已提交
6319
                    gen_helper_fmov_ST0_STN(cpu_env, tcg_const_i32(opreg));
B
bellard 已提交
6320
                    gen_set_label(l1);
6321 6322
                }
                break;
B
bellard 已提交
6323 6324 6325 6326 6327 6328 6329 6330 6331 6332 6333
            default:
                goto illegal_op;
            }
        }
        break;
        /************************/
        /* string ops */

    case 0xa4: /* movsS */
    case 0xa5:
        if ((b & 1) == 0)
6334
            ot = MO_8;
B
bellard 已提交
6335
        else
6336
            ot = dflag + MO_16;
B
bellard 已提交
6337 6338 6339 6340 6341 6342 6343

        if (prefixes & (PREFIX_REPZ | PREFIX_REPNZ)) {
            gen_repz_movs(s, ot, pc_start - s->cs_base, s->pc - s->cs_base);
        } else {
            gen_movs(s, ot);
        }
        break;
6344

B
bellard 已提交
6345 6346 6347
    case 0xaa: /* stosS */
    case 0xab:
        if ((b & 1) == 0)
6348
            ot = MO_8;
B
bellard 已提交
6349
        else
6350
            ot = dflag + MO_16;
B
bellard 已提交
6351 6352 6353 6354 6355 6356 6357 6358 6359 6360

        if (prefixes & (PREFIX_REPZ | PREFIX_REPNZ)) {
            gen_repz_stos(s, ot, pc_start - s->cs_base, s->pc - s->cs_base);
        } else {
            gen_stos(s, ot);
        }
        break;
    case 0xac: /* lodsS */
    case 0xad:
        if ((b & 1) == 0)
6361
            ot = MO_8;
B
bellard 已提交
6362
        else
6363
            ot = dflag + MO_16;
B
bellard 已提交
6364 6365 6366 6367 6368 6369 6370 6371 6372
        if (prefixes & (PREFIX_REPZ | PREFIX_REPNZ)) {
            gen_repz_lods(s, ot, pc_start - s->cs_base, s->pc - s->cs_base);
        } else {
            gen_lods(s, ot);
        }
        break;
    case 0xae: /* scasS */
    case 0xaf:
        if ((b & 1) == 0)
6373
            ot = MO_8;
B
bellard 已提交
6374
        else
6375
            ot = dflag + MO_16;
B
bellard 已提交
6376 6377 6378 6379 6380 6381 6382 6383 6384 6385 6386 6387
        if (prefixes & PREFIX_REPNZ) {
            gen_repz_scas(s, ot, pc_start - s->cs_base, s->pc - s->cs_base, 1);
        } else if (prefixes & PREFIX_REPZ) {
            gen_repz_scas(s, ot, pc_start - s->cs_base, s->pc - s->cs_base, 0);
        } else {
            gen_scas(s, ot);
        }
        break;

    case 0xa6: /* cmpsS */
    case 0xa7:
        if ((b & 1) == 0)
6388
            ot = MO_8;
B
bellard 已提交
6389
        else
6390
            ot = dflag + MO_16;
B
bellard 已提交
6391 6392 6393 6394 6395 6396 6397 6398 6399 6400
        if (prefixes & PREFIX_REPNZ) {
            gen_repz_cmps(s, ot, pc_start - s->cs_base, s->pc - s->cs_base, 1);
        } else if (prefixes & PREFIX_REPZ) {
            gen_repz_cmps(s, ot, pc_start - s->cs_base, s->pc - s->cs_base, 0);
        } else {
            gen_cmps(s, ot);
        }
        break;
    case 0x6c: /* insS */
    case 0x6d:
6401
        if ((b & 1) == 0)
6402
            ot = MO_8;
6403
        else
6404
            ot = dflag ? MO_32 : MO_16;
6405
        tcg_gen_ext16u_tl(cpu_T[0], cpu_regs[R_EDX]);
6406 6407
        gen_check_io(s, ot, pc_start - s->cs_base, 
                     SVM_IOIO_TYPE_MASK | svm_is_rep(prefixes) | 4);
6408 6409
        if (prefixes & (PREFIX_REPZ | PREFIX_REPNZ)) {
            gen_repz_ins(s, ot, pc_start - s->cs_base, s->pc - s->cs_base);
B
bellard 已提交
6410
        } else {
6411
            gen_ins(s, ot);
P
pbrook 已提交
6412 6413 6414
            if (use_icount) {
                gen_jmp(s, s->pc - s->cs_base);
            }
B
bellard 已提交
6415 6416 6417 6418
        }
        break;
    case 0x6e: /* outsS */
    case 0x6f:
6419
        if ((b & 1) == 0)
6420
            ot = MO_8;
6421
        else
6422
            ot = dflag ? MO_32 : MO_16;
6423
        tcg_gen_ext16u_tl(cpu_T[0], cpu_regs[R_EDX]);
6424 6425
        gen_check_io(s, ot, pc_start - s->cs_base,
                     svm_is_rep(prefixes) | 4);
6426 6427
        if (prefixes & (PREFIX_REPZ | PREFIX_REPNZ)) {
            gen_repz_outs(s, ot, pc_start - s->cs_base, s->pc - s->cs_base);
B
bellard 已提交
6428
        } else {
6429
            gen_outs(s, ot);
P
pbrook 已提交
6430 6431 6432
            if (use_icount) {
                gen_jmp(s, s->pc - s->cs_base);
            }
B
bellard 已提交
6433 6434 6435 6436 6437
        }
        break;

        /************************/
        /* port I/O */
T
ths 已提交
6438

B
bellard 已提交
6439 6440
    case 0xe4:
    case 0xe5:
6441
        if ((b & 1) == 0)
6442
            ot = MO_8;
6443
        else
6444
            ot = dflag ? MO_32 : MO_16;
6445
        val = cpu_ldub_code(env, s->pc++);
6446 6447
        gen_check_io(s, ot, pc_start - s->cs_base,
                     SVM_IOIO_TYPE_MASK | svm_is_rep(prefixes));
P
pbrook 已提交
6448 6449
        if (use_icount)
            gen_io_start();
6450
        tcg_gen_movi_i32(cpu_tmp2_i32, val);
P
pbrook 已提交
6451
        gen_helper_in_func(ot, cpu_T[1], cpu_tmp2_i32);
B
bellard 已提交
6452
        gen_op_mov_reg_T1(ot, R_EAX);
P
pbrook 已提交
6453 6454 6455 6456
        if (use_icount) {
            gen_io_end();
            gen_jmp(s, s->pc - s->cs_base);
        }
B
bellard 已提交
6457 6458 6459
        break;
    case 0xe6:
    case 0xe7:
6460
        if ((b & 1) == 0)
6461
            ot = MO_8;
6462
        else
6463
            ot = dflag ? MO_32 : MO_16;
6464
        val = cpu_ldub_code(env, s->pc++);
6465 6466
        gen_check_io(s, ot, pc_start - s->cs_base,
                     svm_is_rep(prefixes));
B
bellard 已提交
6467
        gen_op_mov_TN_reg(ot, 1, R_EAX);
6468

P
pbrook 已提交
6469 6470
        if (use_icount)
            gen_io_start();
6471
        tcg_gen_movi_i32(cpu_tmp2_i32, val);
6472
        tcg_gen_trunc_tl_i32(cpu_tmp3_i32, cpu_T[1]);
P
pbrook 已提交
6473
        gen_helper_out_func(ot, cpu_tmp2_i32, cpu_tmp3_i32);
P
pbrook 已提交
6474 6475 6476 6477
        if (use_icount) {
            gen_io_end();
            gen_jmp(s, s->pc - s->cs_base);
        }
B
bellard 已提交
6478 6479 6480
        break;
    case 0xec:
    case 0xed:
6481
        if ((b & 1) == 0)
6482
            ot = MO_8;
6483
        else
6484
            ot = dflag ? MO_32 : MO_16;
6485
        tcg_gen_ext16u_tl(cpu_T[0], cpu_regs[R_EDX]);
6486 6487
        gen_check_io(s, ot, pc_start - s->cs_base,
                     SVM_IOIO_TYPE_MASK | svm_is_rep(prefixes));
P
pbrook 已提交
6488 6489
        if (use_icount)
            gen_io_start();
6490
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
P
pbrook 已提交
6491
        gen_helper_in_func(ot, cpu_T[1], cpu_tmp2_i32);
B
bellard 已提交
6492
        gen_op_mov_reg_T1(ot, R_EAX);
P
pbrook 已提交
6493 6494 6495 6496
        if (use_icount) {
            gen_io_end();
            gen_jmp(s, s->pc - s->cs_base);
        }
B
bellard 已提交
6497 6498 6499
        break;
    case 0xee:
    case 0xef:
6500
        if ((b & 1) == 0)
6501
            ot = MO_8;
6502
        else
6503
            ot = dflag ? MO_32 : MO_16;
6504
        tcg_gen_ext16u_tl(cpu_T[0], cpu_regs[R_EDX]);
6505 6506
        gen_check_io(s, ot, pc_start - s->cs_base,
                     svm_is_rep(prefixes));
B
bellard 已提交
6507
        gen_op_mov_TN_reg(ot, 1, R_EAX);
6508

P
pbrook 已提交
6509 6510
        if (use_icount)
            gen_io_start();
6511 6512
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
        tcg_gen_trunc_tl_i32(cpu_tmp3_i32, cpu_T[1]);
P
pbrook 已提交
6513
        gen_helper_out_func(ot, cpu_tmp2_i32, cpu_tmp3_i32);
P
pbrook 已提交
6514 6515 6516 6517
        if (use_icount) {
            gen_io_end();
            gen_jmp(s, s->pc - s->cs_base);
        }
B
bellard 已提交
6518 6519 6520 6521 6522
        break;

        /************************/
        /* control */
    case 0xc2: /* ret im */
6523
        val = cpu_ldsw_code(env, s->pc);
B
bellard 已提交
6524 6525
        s->pc += 2;
        gen_pop_T0(s);
6526 6527
        if (CODE64(s) && s->dflag)
            s->dflag = 2;
B
bellard 已提交
6528
        gen_stack_update(s, val + (2 << s->dflag));
6529 6530 6531
        if (s->dflag == 0) {
            tcg_gen_ext16u_tl(cpu_T[0], cpu_T[0]);
        }
B
bellard 已提交
6532 6533 6534 6535 6536 6537
        gen_op_jmp_T0();
        gen_eob(s);
        break;
    case 0xc3: /* ret */
        gen_pop_T0(s);
        gen_pop_update(s);
6538 6539 6540
        if (s->dflag == 0) {
            tcg_gen_ext16u_tl(cpu_T[0], cpu_T[0]);
        }
B
bellard 已提交
6541 6542 6543 6544
        gen_op_jmp_T0();
        gen_eob(s);
        break;
    case 0xca: /* lret im */
6545
        val = cpu_ldsw_code(env, s->pc);
B
bellard 已提交
6546 6547 6548
        s->pc += 2;
    do_lret:
        if (s->pe && !s->vm86) {
6549
            gen_update_cc_op(s);
B
bellard 已提交
6550
            gen_jmp_im(pc_start - s->cs_base);
6551
            gen_helper_lret_protected(cpu_env, tcg_const_i32(s->dflag),
P
pbrook 已提交
6552
                                      tcg_const_i32(val));
B
bellard 已提交
6553 6554 6555
        } else {
            gen_stack_A0(s);
            /* pop offset */
6556
            gen_op_ld_v(s, MO_16 + s->dflag, cpu_T[0], cpu_A0);
B
bellard 已提交
6557 6558 6559 6560 6561
            /* NOTE: keeping EIP updated is not a problem in case of
               exception */
            gen_op_jmp_T0();
            /* pop selector */
            gen_op_addl_A0_im(2 << s->dflag);
6562
            gen_op_ld_v(s, MO_16 + s->dflag, cpu_T[0], cpu_A0);
6563
            gen_op_movl_seg_T0_vm(R_CS);
B
bellard 已提交
6564 6565 6566 6567 6568 6569 6570 6571 6572
            /* add stack offset */
            gen_stack_update(s, val + (4 << s->dflag));
        }
        gen_eob(s);
        break;
    case 0xcb: /* lret */
        val = 0;
        goto do_lret;
    case 0xcf: /* iret */
B
bellard 已提交
6573
        gen_svm_check_intercept(s, pc_start, SVM_EXIT_IRET);
B
bellard 已提交
6574 6575
        if (!s->pe) {
            /* real mode */
6576
            gen_helper_iret_real(cpu_env, tcg_const_i32(s->dflag));
6577
            set_cc_op(s, CC_OP_EFLAGS);
6578 6579 6580 6581
        } else if (s->vm86) {
            if (s->iopl != 3) {
                gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
            } else {
6582
                gen_helper_iret_real(cpu_env, tcg_const_i32(s->dflag));
6583
                set_cc_op(s, CC_OP_EFLAGS);
6584
            }
B
bellard 已提交
6585
        } else {
6586
            gen_update_cc_op(s);
B
bellard 已提交
6587
            gen_jmp_im(pc_start - s->cs_base);
6588
            gen_helper_iret_protected(cpu_env, tcg_const_i32(s->dflag),
P
pbrook 已提交
6589
                                      tcg_const_i32(s->pc - s->cs_base));
6590
            set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6591 6592 6593 6594 6595
        }
        gen_eob(s);
        break;
    case 0xe8: /* call im */
        {
B
bellard 已提交
6596
            if (dflag)
6597
                tval = (int32_t)insn_get(env, s, MO_32);
B
bellard 已提交
6598
            else
6599
                tval = (int16_t)insn_get(env, s, MO_16);
B
bellard 已提交
6600
            next_eip = s->pc - s->cs_base;
B
bellard 已提交
6601
            tval += next_eip;
B
bellard 已提交
6602
            if (s->dflag == 0)
B
bellard 已提交
6603
                tval &= 0xffff;
6604 6605
            else if(!CODE64(s))
                tval &= 0xffffffff;
6606
            tcg_gen_movi_tl(cpu_T[0], next_eip);
B
bellard 已提交
6607
            gen_push_T0(s);
B
bellard 已提交
6608
            gen_jmp(s, tval);
B
bellard 已提交
6609 6610 6611 6612 6613
        }
        break;
    case 0x9a: /* lcall im */
        {
            unsigned int selector, offset;
6614

B
bellard 已提交
6615 6616
            if (CODE64(s))
                goto illegal_op;
6617
            ot = dflag ? MO_32 : MO_16;
6618
            offset = insn_get(env, s, ot);
6619
            selector = insn_get(env, s, MO_16);
6620

6621
            tcg_gen_movi_tl(cpu_T[0], selector);
6622
            tcg_gen_movi_tl(cpu_T[1], offset);
B
bellard 已提交
6623 6624
        }
        goto do_lcall;
B
bellard 已提交
6625
    case 0xe9: /* jmp im */
B
bellard 已提交
6626
        if (dflag)
6627
            tval = (int32_t)insn_get(env, s, MO_32);
B
bellard 已提交
6628
        else
6629
            tval = (int16_t)insn_get(env, s, MO_16);
B
bellard 已提交
6630
        tval += s->pc - s->cs_base;
B
bellard 已提交
6631
        if (s->dflag == 0)
B
bellard 已提交
6632
            tval &= 0xffff;
6633 6634
        else if(!CODE64(s))
            tval &= 0xffffffff;
B
bellard 已提交
6635
        gen_jmp(s, tval);
B
bellard 已提交
6636 6637 6638 6639 6640
        break;
    case 0xea: /* ljmp im */
        {
            unsigned int selector, offset;

B
bellard 已提交
6641 6642
            if (CODE64(s))
                goto illegal_op;
6643
            ot = dflag ? MO_32 : MO_16;
6644
            offset = insn_get(env, s, ot);
6645
            selector = insn_get(env, s, MO_16);
6646

6647
            tcg_gen_movi_tl(cpu_T[0], selector);
6648
            tcg_gen_movi_tl(cpu_T[1], offset);
B
bellard 已提交
6649 6650 6651
        }
        goto do_ljmp;
    case 0xeb: /* jmp Jb */
6652
        tval = (int8_t)insn_get(env, s, MO_8);
B
bellard 已提交
6653
        tval += s->pc - s->cs_base;
B
bellard 已提交
6654
        if (s->dflag == 0)
B
bellard 已提交
6655 6656
            tval &= 0xffff;
        gen_jmp(s, tval);
B
bellard 已提交
6657 6658
        break;
    case 0x70 ... 0x7f: /* jcc Jb */
6659
        tval = (int8_t)insn_get(env, s, MO_8);
B
bellard 已提交
6660 6661 6662
        goto do_jcc;
    case 0x180 ... 0x18f: /* jcc Jv */
        if (dflag) {
6663
            tval = (int32_t)insn_get(env, s, MO_32);
B
bellard 已提交
6664
        } else {
6665
            tval = (int16_t)insn_get(env, s, MO_16);
B
bellard 已提交
6666 6667 6668
        }
    do_jcc:
        next_eip = s->pc - s->cs_base;
B
bellard 已提交
6669
        tval += next_eip;
B
bellard 已提交
6670
        if (s->dflag == 0)
B
bellard 已提交
6671 6672
            tval &= 0xffff;
        gen_jcc(s, b, tval, next_eip);
B
bellard 已提交
6673 6674 6675
        break;

    case 0x190 ... 0x19f: /* setcc Gv */
6676
        modrm = cpu_ldub_code(env, s->pc++);
6677
        gen_setcc1(s, b, cpu_T[0]);
6678
        gen_ldst_modrm(env, s, modrm, MO_8, OR_TMP0, 1);
B
bellard 已提交
6679 6680
        break;
    case 0x140 ... 0x14f: /* cmov Gv, Ev */
6681 6682 6683
        if (!(s->cpuid_features & CPUID_CMOV)) {
            goto illegal_op;
        }
6684
        ot = dflag + MO_16;
6685 6686 6687
        modrm = cpu_ldub_code(env, s->pc++);
        reg = ((modrm >> 3) & 7) | rex_r;
        gen_cmovcc1(env, s, ot, b, modrm, reg);
B
bellard 已提交
6688
        break;
6689

B
bellard 已提交
6690 6691 6692
        /************************/
        /* flags */
    case 0x9c: /* pushf */
B
bellard 已提交
6693
        gen_svm_check_intercept(s, pc_start, SVM_EXIT_PUSHF);
B
bellard 已提交
6694 6695 6696
        if (s->vm86 && s->iopl != 3) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
6697
            gen_update_cc_op(s);
6698
            gen_helper_read_eflags(cpu_T[0], cpu_env);
B
bellard 已提交
6699 6700 6701 6702
            gen_push_T0(s);
        }
        break;
    case 0x9d: /* popf */
B
bellard 已提交
6703
        gen_svm_check_intercept(s, pc_start, SVM_EXIT_POPF);
B
bellard 已提交
6704 6705 6706 6707 6708 6709
        if (s->vm86 && s->iopl != 3) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
            gen_pop_T0(s);
            if (s->cpl == 0) {
                if (s->dflag) {
6710 6711 6712 6713 6714
                    gen_helper_write_eflags(cpu_env, cpu_T[0],
                                            tcg_const_i32((TF_MASK | AC_MASK |
                                                           ID_MASK | NT_MASK |
                                                           IF_MASK |
                                                           IOPL_MASK)));
B
bellard 已提交
6715
                } else {
6716 6717 6718 6719 6720
                    gen_helper_write_eflags(cpu_env, cpu_T[0],
                                            tcg_const_i32((TF_MASK | AC_MASK |
                                                           ID_MASK | NT_MASK |
                                                           IF_MASK | IOPL_MASK)
                                                          & 0xffff));
B
bellard 已提交
6721 6722
                }
            } else {
B
bellard 已提交
6723 6724
                if (s->cpl <= s->iopl) {
                    if (s->dflag) {
6725 6726 6727 6728 6729 6730
                        gen_helper_write_eflags(cpu_env, cpu_T[0],
                                                tcg_const_i32((TF_MASK |
                                                               AC_MASK |
                                                               ID_MASK |
                                                               NT_MASK |
                                                               IF_MASK)));
B
bellard 已提交
6731
                    } else {
6732 6733 6734 6735 6736 6737 6738
                        gen_helper_write_eflags(cpu_env, cpu_T[0],
                                                tcg_const_i32((TF_MASK |
                                                               AC_MASK |
                                                               ID_MASK |
                                                               NT_MASK |
                                                               IF_MASK)
                                                              & 0xffff));
B
bellard 已提交
6739
                    }
B
bellard 已提交
6740
                } else {
B
bellard 已提交
6741
                    if (s->dflag) {
6742 6743 6744
                        gen_helper_write_eflags(cpu_env, cpu_T[0],
                                           tcg_const_i32((TF_MASK | AC_MASK |
                                                          ID_MASK | NT_MASK)));
B
bellard 已提交
6745
                    } else {
6746 6747 6748 6749
                        gen_helper_write_eflags(cpu_env, cpu_T[0],
                                           tcg_const_i32((TF_MASK | AC_MASK |
                                                          ID_MASK | NT_MASK)
                                                         & 0xffff));
B
bellard 已提交
6750
                    }
B
bellard 已提交
6751 6752 6753
                }
            }
            gen_pop_update(s);
6754
            set_cc_op(s, CC_OP_EFLAGS);
H
H. Peter Anvin 已提交
6755
            /* abort translation because TF/AC flag may change */
B
bellard 已提交
6756
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
6757 6758 6759 6760
            gen_eob(s);
        }
        break;
    case 0x9e: /* sahf */
B
bellard 已提交
6761
        if (CODE64(s) && !(s->cpuid_ext3_features & CPUID_EXT3_LAHF_LM))
B
bellard 已提交
6762
            goto illegal_op;
6763
        gen_op_mov_TN_reg(MO_8, 0, R_AH);
6764
        gen_compute_eflags(s);
6765 6766 6767
        tcg_gen_andi_tl(cpu_cc_src, cpu_cc_src, CC_O);
        tcg_gen_andi_tl(cpu_T[0], cpu_T[0], CC_S | CC_Z | CC_A | CC_P | CC_C);
        tcg_gen_or_tl(cpu_cc_src, cpu_cc_src, cpu_T[0]);
B
bellard 已提交
6768 6769
        break;
    case 0x9f: /* lahf */
B
bellard 已提交
6770
        if (CODE64(s) && !(s->cpuid_ext3_features & CPUID_EXT3_LAHF_LM))
B
bellard 已提交
6771
            goto illegal_op;
6772
        gen_compute_eflags(s);
6773
        /* Note: gen_compute_eflags() only gives the condition codes */
6774
        tcg_gen_ori_tl(cpu_T[0], cpu_cc_src, 0x02);
6775
        gen_op_mov_reg_T0(MO_8, R_AH);
B
bellard 已提交
6776 6777
        break;
    case 0xf5: /* cmc */
6778
        gen_compute_eflags(s);
6779
        tcg_gen_xori_tl(cpu_cc_src, cpu_cc_src, CC_C);
B
bellard 已提交
6780 6781
        break;
    case 0xf8: /* clc */
6782
        gen_compute_eflags(s);
6783
        tcg_gen_andi_tl(cpu_cc_src, cpu_cc_src, ~CC_C);
B
bellard 已提交
6784 6785
        break;
    case 0xf9: /* stc */
6786
        gen_compute_eflags(s);
6787
        tcg_gen_ori_tl(cpu_cc_src, cpu_cc_src, CC_C);
B
bellard 已提交
6788 6789
        break;
    case 0xfc: /* cld */
6790
        tcg_gen_movi_i32(cpu_tmp2_i32, 1);
6791
        tcg_gen_st_i32(cpu_tmp2_i32, cpu_env, offsetof(CPUX86State, df));
B
bellard 已提交
6792 6793
        break;
    case 0xfd: /* std */
6794
        tcg_gen_movi_i32(cpu_tmp2_i32, -1);
6795
        tcg_gen_st_i32(cpu_tmp2_i32, cpu_env, offsetof(CPUX86State, df));
B
bellard 已提交
6796 6797 6798 6799 6800
        break;

        /************************/
        /* bit operations */
    case 0x1ba: /* bt/bts/btr/btc Gv, im */
6801
        ot = dflag + MO_16;
6802
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
6803
        op = (modrm >> 3) & 7;
B
bellard 已提交
6804
        mod = (modrm >> 6) & 3;
B
bellard 已提交
6805
        rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
6806
        if (mod != 3) {
B
bellard 已提交
6807
            s->rip_offset = 1;
6808
            gen_lea_modrm(env, s, modrm);
6809
            gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
6810
        } else {
B
bellard 已提交
6811
            gen_op_mov_TN_reg(ot, 0, rm);
B
bellard 已提交
6812 6813
        }
        /* load shift */
6814
        val = cpu_ldub_code(env, s->pc++);
6815
        tcg_gen_movi_tl(cpu_T[1], val);
B
bellard 已提交
6816 6817 6818
        if (op < 4)
            goto illegal_op;
        op -= 4;
B
bellard 已提交
6819
        goto bt_op;
B
bellard 已提交
6820 6821 6822 6823 6824 6825 6826 6827 6828 6829 6830 6831
    case 0x1a3: /* bt Gv, Ev */
        op = 0;
        goto do_btx;
    case 0x1ab: /* bts */
        op = 1;
        goto do_btx;
    case 0x1b3: /* btr */
        op = 2;
        goto do_btx;
    case 0x1bb: /* btc */
        op = 3;
    do_btx:
6832
        ot = dflag + MO_16;
6833
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
6834
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
6835
        mod = (modrm >> 6) & 3;
B
bellard 已提交
6836
        rm = (modrm & 7) | REX_B(s);
6837
        gen_op_mov_TN_reg(MO_32, 1, reg);
B
bellard 已提交
6838
        if (mod != 3) {
6839
            gen_lea_modrm(env, s, modrm);
B
bellard 已提交
6840
            /* specific case: we need to add a displacement */
B
bellard 已提交
6841 6842 6843 6844
            gen_exts(ot, cpu_T[1]);
            tcg_gen_sari_tl(cpu_tmp0, cpu_T[1], 3 + ot);
            tcg_gen_shli_tl(cpu_tmp0, cpu_tmp0, ot);
            tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_tmp0);
6845
            gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
6846
        } else {
B
bellard 已提交
6847
            gen_op_mov_TN_reg(ot, 0, rm);
B
bellard 已提交
6848
        }
B
bellard 已提交
6849 6850 6851 6852 6853 6854 6855 6856 6857 6858 6859 6860 6861 6862 6863 6864 6865 6866 6867 6868 6869 6870 6871 6872 6873 6874 6875 6876
    bt_op:
        tcg_gen_andi_tl(cpu_T[1], cpu_T[1], (1 << (3 + ot)) - 1);
        switch(op) {
        case 0:
            tcg_gen_shr_tl(cpu_cc_src, cpu_T[0], cpu_T[1]);
            tcg_gen_movi_tl(cpu_cc_dst, 0);
            break;
        case 1:
            tcg_gen_shr_tl(cpu_tmp4, cpu_T[0], cpu_T[1]);
            tcg_gen_movi_tl(cpu_tmp0, 1);
            tcg_gen_shl_tl(cpu_tmp0, cpu_tmp0, cpu_T[1]);
            tcg_gen_or_tl(cpu_T[0], cpu_T[0], cpu_tmp0);
            break;
        case 2:
            tcg_gen_shr_tl(cpu_tmp4, cpu_T[0], cpu_T[1]);
            tcg_gen_movi_tl(cpu_tmp0, 1);
            tcg_gen_shl_tl(cpu_tmp0, cpu_tmp0, cpu_T[1]);
            tcg_gen_not_tl(cpu_tmp0, cpu_tmp0);
            tcg_gen_and_tl(cpu_T[0], cpu_T[0], cpu_tmp0);
            break;
        default:
        case 3:
            tcg_gen_shr_tl(cpu_tmp4, cpu_T[0], cpu_T[1]);
            tcg_gen_movi_tl(cpu_tmp0, 1);
            tcg_gen_shl_tl(cpu_tmp0, cpu_tmp0, cpu_T[1]);
            tcg_gen_xor_tl(cpu_T[0], cpu_T[0], cpu_tmp0);
            break;
        }
6877
        set_cc_op(s, CC_OP_SARB + ot);
B
bellard 已提交
6878
        if (op != 0) {
6879 6880 6881
            if (mod != 3) {
                gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
            } else {
B
bellard 已提交
6882
                gen_op_mov_reg_T0(ot, rm);
6883
            }
B
bellard 已提交
6884 6885
            tcg_gen_mov_tl(cpu_cc_src, cpu_tmp4);
            tcg_gen_movi_tl(cpu_cc_dst, 0);
B
bellard 已提交
6886 6887
        }
        break;
6888 6889
    case 0x1bc: /* bsf / tzcnt */
    case 0x1bd: /* bsr / lzcnt */
6890
        ot = dflag + MO_16;
6891 6892 6893 6894 6895 6896 6897 6898 6899 6900 6901 6902 6903 6904 6905 6906 6907
        modrm = cpu_ldub_code(env, s->pc++);
        reg = ((modrm >> 3) & 7) | rex_r;
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
        gen_extu(ot, cpu_T[0]);

        /* Note that lzcnt and tzcnt are in different extensions.  */
        if ((prefixes & PREFIX_REPZ)
            && (b & 1
                ? s->cpuid_ext3_features & CPUID_EXT3_ABM
                : s->cpuid_7_0_ebx_features & CPUID_7_0_EBX_BMI1)) {
            int size = 8 << ot;
            tcg_gen_mov_tl(cpu_cc_src, cpu_T[0]);
            if (b & 1) {
                /* For lzcnt, reduce the target_ulong result by the
                   number of zeros that we expect to find at the top.  */
                gen_helper_clz(cpu_T[0], cpu_T[0]);
                tcg_gen_subi_tl(cpu_T[0], cpu_T[0], TARGET_LONG_BITS - size);
B
bellard 已提交
6908
            } else {
6909 6910 6911 6912 6913
                /* For tzcnt, a zero input must return the operand size:
                   force all bits outside the operand size to 1.  */
                target_ulong mask = (target_ulong)-2 << (size - 1);
                tcg_gen_ori_tl(cpu_T[0], cpu_T[0], mask);
                gen_helper_ctz(cpu_T[0], cpu_T[0]);
B
bellard 已提交
6914
            }
6915 6916 6917 6918 6919 6920 6921 6922 6923 6924 6925 6926 6927 6928 6929 6930 6931 6932 6933 6934 6935 6936 6937
            /* For lzcnt/tzcnt, C and Z bits are defined and are
               related to the result.  */
            gen_op_update1_cc();
            set_cc_op(s, CC_OP_BMILGB + ot);
        } else {
            /* For bsr/bsf, only the Z bit is defined and it is related
               to the input and not the result.  */
            tcg_gen_mov_tl(cpu_cc_dst, cpu_T[0]);
            set_cc_op(s, CC_OP_LOGICB + ot);
            if (b & 1) {
                /* For bsr, return the bit index of the first 1 bit,
                   not the count of leading zeros.  */
                gen_helper_clz(cpu_T[0], cpu_T[0]);
                tcg_gen_xori_tl(cpu_T[0], cpu_T[0], TARGET_LONG_BITS - 1);
            } else {
                gen_helper_ctz(cpu_T[0], cpu_T[0]);
            }
            /* ??? The manual says that the output is undefined when the
               input is zero, but real hardware leaves it unchanged, and
               real programs appear to depend on that.  */
            tcg_gen_movi_tl(cpu_tmp0, 0);
            tcg_gen_movcond_tl(TCG_COND_EQ, cpu_T[0], cpu_cc_dst, cpu_tmp0,
                               cpu_regs[reg], cpu_T[0]);
B
bellard 已提交
6938
        }
6939
        gen_op_mov_reg_T0(ot, reg);
B
bellard 已提交
6940 6941 6942 6943
        break;
        /************************/
        /* bcd */
    case 0x27: /* daa */
B
bellard 已提交
6944 6945
        if (CODE64(s))
            goto illegal_op;
6946
        gen_update_cc_op(s);
6947
        gen_helper_daa(cpu_env);
6948
        set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6949 6950
        break;
    case 0x2f: /* das */
B
bellard 已提交
6951 6952
        if (CODE64(s))
            goto illegal_op;
6953
        gen_update_cc_op(s);
6954
        gen_helper_das(cpu_env);
6955
        set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6956 6957
        break;
    case 0x37: /* aaa */
B
bellard 已提交
6958 6959
        if (CODE64(s))
            goto illegal_op;
6960
        gen_update_cc_op(s);
6961
        gen_helper_aaa(cpu_env);
6962
        set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6963 6964
        break;
    case 0x3f: /* aas */
B
bellard 已提交
6965 6966
        if (CODE64(s))
            goto illegal_op;
6967
        gen_update_cc_op(s);
6968
        gen_helper_aas(cpu_env);
6969
        set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6970 6971
        break;
    case 0xd4: /* aam */
B
bellard 已提交
6972 6973
        if (CODE64(s))
            goto illegal_op;
6974
        val = cpu_ldub_code(env, s->pc++);
6975 6976 6977
        if (val == 0) {
            gen_exception(s, EXCP00_DIVZ, pc_start - s->cs_base);
        } else {
6978
            gen_helper_aam(cpu_env, tcg_const_i32(val));
6979
            set_cc_op(s, CC_OP_LOGICB);
6980
        }
B
bellard 已提交
6981 6982
        break;
    case 0xd5: /* aad */
B
bellard 已提交
6983 6984
        if (CODE64(s))
            goto illegal_op;
6985
        val = cpu_ldub_code(env, s->pc++);
6986
        gen_helper_aad(cpu_env, tcg_const_i32(val));
6987
        set_cc_op(s, CC_OP_LOGICB);
B
bellard 已提交
6988 6989 6990 6991
        break;
        /************************/
        /* misc */
    case 0x90: /* nop */
6992
        /* XXX: correct lock test for all insn */
R
Richard Henderson 已提交
6993
        if (prefixes & PREFIX_LOCK) {
6994
            goto illegal_op;
R
Richard Henderson 已提交
6995 6996 6997 6998 6999
        }
        /* If REX_B is set, then this is xchg eax, r8d, not a nop.  */
        if (REX_B(s)) {
            goto do_xchg_reg_eax;
        }
T
ths 已提交
7000
        if (prefixes & PREFIX_REPZ) {
7001 7002 7003 7004
            gen_update_cc_op(s);
            gen_jmp_im(pc_start - s->cs_base);
            gen_helper_pause(cpu_env, tcg_const_i32(s->pc - pc_start));
            s->is_jmp = DISAS_TB_JUMP;
T
ths 已提交
7005
        }
B
bellard 已提交
7006 7007
        break;
    case 0x9b: /* fwait */
7008
        if ((s->flags & (HF_MP_MASK | HF_TS_MASK)) ==
B
bellard 已提交
7009 7010
            (HF_MP_MASK | HF_TS_MASK)) {
            gen_exception(s, EXCP07_PREX, pc_start - s->cs_base);
B
bellard 已提交
7011
        } else {
7012
            gen_update_cc_op(s);
B
bellard 已提交
7013
            gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
7014
            gen_helper_fwait(cpu_env);
B
bellard 已提交
7015
        }
B
bellard 已提交
7016 7017 7018 7019 7020
        break;
    case 0xcc: /* int3 */
        gen_interrupt(s, EXCP03_INT3, pc_start - s->cs_base, s->pc - s->cs_base);
        break;
    case 0xcd: /* int N */
7021
        val = cpu_ldub_code(env, s->pc++);
7022
        if (s->vm86 && s->iopl != 3) {
7023
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
7024 7025 7026
        } else {
            gen_interrupt(s, val, pc_start - s->cs_base, s->pc - s->cs_base);
        }
B
bellard 已提交
7027 7028
        break;
    case 0xce: /* into */
B
bellard 已提交
7029 7030
        if (CODE64(s))
            goto illegal_op;
7031
        gen_update_cc_op(s);
7032
        gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
7033
        gen_helper_into(cpu_env, tcg_const_i32(s->pc - pc_start));
B
bellard 已提交
7034
        break;
A
aurel32 已提交
7035
#ifdef WANT_ICEBP
B
bellard 已提交
7036
    case 0xf1: /* icebp (undocumented, exits to external debugger) */
B
bellard 已提交
7037
        gen_svm_check_intercept(s, pc_start, SVM_EXIT_ICEBP);
7038
#if 1
B
bellard 已提交
7039
        gen_debug(s, pc_start - s->cs_base);
7040 7041
#else
        /* start debug */
7042
        tb_flush(env);
7043
        qemu_set_log(CPU_LOG_INT | CPU_LOG_TB_IN_ASM);
7044
#endif
B
bellard 已提交
7045
        break;
A
aurel32 已提交
7046
#endif
B
bellard 已提交
7047 7048 7049
    case 0xfa: /* cli */
        if (!s->vm86) {
            if (s->cpl <= s->iopl) {
7050
                gen_helper_cli(cpu_env);
B
bellard 已提交
7051 7052 7053 7054 7055
            } else {
                gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
            }
        } else {
            if (s->iopl == 3) {
7056
                gen_helper_cli(cpu_env);
B
bellard 已提交
7057 7058 7059 7060 7061 7062 7063 7064 7065
            } else {
                gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
            }
        }
        break;
    case 0xfb: /* sti */
        if (!s->vm86) {
            if (s->cpl <= s->iopl) {
            gen_sti:
7066
                gen_helper_sti(cpu_env);
B
bellard 已提交
7067
                /* interruptions are enabled only the first insn after sti */
7068 7069 7070
                /* If several instructions disable interrupts, only the
                   _first_ does it */
                if (!(s->tb->flags & HF_INHIBIT_IRQ_MASK))
7071
                    gen_helper_set_inhibit_irq(cpu_env);
B
bellard 已提交
7072
                /* give a chance to handle pending irqs */
B
bellard 已提交
7073
                gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
7074 7075 7076 7077 7078 7079 7080 7081 7082 7083 7084 7085 7086
                gen_eob(s);
            } else {
                gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
            }
        } else {
            if (s->iopl == 3) {
                goto gen_sti;
            } else {
                gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
            }
        }
        break;
    case 0x62: /* bound */
B
bellard 已提交
7087 7088
        if (CODE64(s))
            goto illegal_op;
7089
        ot = dflag ? MO_32 : MO_16;
7090
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7091 7092 7093 7094
        reg = (modrm >> 3) & 7;
        mod = (modrm >> 6) & 3;
        if (mod == 3)
            goto illegal_op;
B
bellard 已提交
7095
        gen_op_mov_TN_reg(ot, 0, reg);
7096
        gen_lea_modrm(env, s, modrm);
B
bellard 已提交
7097
        gen_jmp_im(pc_start - s->cs_base);
7098
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
7099
        if (ot == MO_16) {
B
Blue Swirl 已提交
7100 7101 7102 7103
            gen_helper_boundw(cpu_env, cpu_A0, cpu_tmp2_i32);
        } else {
            gen_helper_boundl(cpu_env, cpu_A0, cpu_tmp2_i32);
        }
B
bellard 已提交
7104 7105
        break;
    case 0x1c8 ... 0x1cf: /* bswap reg */
B
bellard 已提交
7106 7107 7108
        reg = (b & 7) | REX_B(s);
#ifdef TARGET_X86_64
        if (dflag == 2) {
7109
            gen_op_mov_TN_reg(MO_64, 0, reg);
A
aurel32 已提交
7110
            tcg_gen_bswap64_i64(cpu_T[0], cpu_T[0]);
7111
            gen_op_mov_reg_T0(MO_64, reg);
7112
        } else
7113
#endif
B
bellard 已提交
7114
        {
7115
            gen_op_mov_TN_reg(MO_32, 0, reg);
7116 7117
            tcg_gen_ext32u_tl(cpu_T[0], cpu_T[0]);
            tcg_gen_bswap32_tl(cpu_T[0], cpu_T[0]);
7118
            gen_op_mov_reg_T0(MO_32, reg);
B
bellard 已提交
7119
        }
B
bellard 已提交
7120 7121
        break;
    case 0xd6: /* salc */
B
bellard 已提交
7122 7123
        if (CODE64(s))
            goto illegal_op;
7124
        gen_compute_eflags_c(s, cpu_T[0]);
7125
        tcg_gen_neg_tl(cpu_T[0], cpu_T[0]);
7126
        gen_op_mov_reg_T0(MO_8, R_EAX);
B
bellard 已提交
7127 7128 7129 7130 7131
        break;
    case 0xe0: /* loopnz */
    case 0xe1: /* loopz */
    case 0xe2: /* loop */
    case 0xe3: /* jecxz */
B
bellard 已提交
7132
        {
7133
            int l1, l2, l3;
B
bellard 已提交
7134

7135
            tval = (int8_t)insn_get(env, s, MO_8);
B
bellard 已提交
7136 7137 7138 7139
            next_eip = s->pc - s->cs_base;
            tval += next_eip;
            if (s->dflag == 0)
                tval &= 0xffff;
7140

B
bellard 已提交
7141 7142
            l1 = gen_new_label();
            l2 = gen_new_label();
7143
            l3 = gen_new_label();
B
bellard 已提交
7144
            b &= 3;
7145 7146 7147 7148 7149
            switch(b) {
            case 0: /* loopnz */
            case 1: /* loopz */
                gen_op_add_reg_im(s->aflag, R_ECX, -1);
                gen_op_jz_ecx(s->aflag, l3);
7150
                gen_jcc1(s, (JCC_Z << 1) | (b ^ 1), l1);
7151 7152 7153 7154 7155 7156 7157 7158 7159
                break;
            case 2: /* loop */
                gen_op_add_reg_im(s->aflag, R_ECX, -1);
                gen_op_jnz_ecx(s->aflag, l1);
                break;
            default:
            case 3: /* jcxz */
                gen_op_jz_ecx(s->aflag, l1);
                break;
B
bellard 已提交
7160 7161
            }

7162
            gen_set_label(l3);
B
bellard 已提交
7163
            gen_jmp_im(next_eip);
7164
            tcg_gen_br(l2);
7165

B
bellard 已提交
7166 7167 7168 7169 7170
            gen_set_label(l1);
            gen_jmp_im(tval);
            gen_set_label(l2);
            gen_eob(s);
        }
B
bellard 已提交
7171 7172 7173 7174 7175 7176
        break;
    case 0x130: /* wrmsr */
    case 0x132: /* rdmsr */
        if (s->cpl != 0) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
7177
            gen_update_cc_op(s);
B
bellard 已提交
7178
            gen_jmp_im(pc_start - s->cs_base);
T
ths 已提交
7179
            if (b & 2) {
B
Blue Swirl 已提交
7180
                gen_helper_rdmsr(cpu_env);
T
ths 已提交
7181
            } else {
B
Blue Swirl 已提交
7182
                gen_helper_wrmsr(cpu_env);
T
ths 已提交
7183
            }
B
bellard 已提交
7184 7185 7186
        }
        break;
    case 0x131: /* rdtsc */
7187
        gen_update_cc_op(s);
B
bellard 已提交
7188
        gen_jmp_im(pc_start - s->cs_base);
P
pbrook 已提交
7189 7190
        if (use_icount)
            gen_io_start();
B
Blue Swirl 已提交
7191
        gen_helper_rdtsc(cpu_env);
P
pbrook 已提交
7192 7193 7194 7195
        if (use_icount) {
            gen_io_end();
            gen_jmp(s, s->pc - s->cs_base);
        }
B
bellard 已提交
7196
        break;
7197
    case 0x133: /* rdpmc */
7198
        gen_update_cc_op(s);
7199
        gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
7200
        gen_helper_rdpmc(cpu_env);
7201
        break;
7202
    case 0x134: /* sysenter */
7203
        /* For Intel SYSENTER is valid on 64-bit */
7204
        if (CODE64(s) && env->cpuid_vendor1 != CPUID_VENDOR_INTEL_1)
B
bellard 已提交
7205
            goto illegal_op;
7206 7207 7208
        if (!s->pe) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
J
Jun Koi 已提交
7209
            gen_update_cc_op(s);
B
bellard 已提交
7210
            gen_jmp_im(pc_start - s->cs_base);
7211
            gen_helper_sysenter(cpu_env);
7212 7213 7214 7215
            gen_eob(s);
        }
        break;
    case 0x135: /* sysexit */
7216
        /* For Intel SYSEXIT is valid on 64-bit */
7217
        if (CODE64(s) && env->cpuid_vendor1 != CPUID_VENDOR_INTEL_1)
B
bellard 已提交
7218
            goto illegal_op;
7219 7220 7221
        if (!s->pe) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
J
Jun Koi 已提交
7222
            gen_update_cc_op(s);
B
bellard 已提交
7223
            gen_jmp_im(pc_start - s->cs_base);
7224
            gen_helper_sysexit(cpu_env, tcg_const_i32(dflag));
7225 7226 7227
            gen_eob(s);
        }
        break;
B
bellard 已提交
7228 7229 7230
#ifdef TARGET_X86_64
    case 0x105: /* syscall */
        /* XXX: is it usable in real mode ? */
J
Jun Koi 已提交
7231
        gen_update_cc_op(s);
B
bellard 已提交
7232
        gen_jmp_im(pc_start - s->cs_base);
7233
        gen_helper_syscall(cpu_env, tcg_const_i32(s->pc - pc_start));
B
bellard 已提交
7234 7235 7236 7237 7238 7239
        gen_eob(s);
        break;
    case 0x107: /* sysret */
        if (!s->pe) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
J
Jun Koi 已提交
7240
            gen_update_cc_op(s);
B
bellard 已提交
7241
            gen_jmp_im(pc_start - s->cs_base);
7242
            gen_helper_sysret(cpu_env, tcg_const_i32(s->dflag));
7243
            /* condition codes are modified only in long mode */
7244 7245 7246
            if (s->lma) {
                set_cc_op(s, CC_OP_EFLAGS);
            }
B
bellard 已提交
7247 7248 7249 7250
            gen_eob(s);
        }
        break;
#endif
B
bellard 已提交
7251
    case 0x1a2: /* cpuid */
7252
        gen_update_cc_op(s);
B
bellard 已提交
7253
        gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
7254
        gen_helper_cpuid(cpu_env);
B
bellard 已提交
7255 7256 7257 7258 7259
        break;
    case 0xf4: /* hlt */
        if (s->cpl != 0) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
7260
            gen_update_cc_op(s);
7261
            gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
7262
            gen_helper_hlt(cpu_env, tcg_const_i32(s->pc - pc_start));
J
Jun Koi 已提交
7263
            s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
7264 7265 7266
        }
        break;
    case 0x100:
7267
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7268 7269 7270 7271
        mod = (modrm >> 6) & 3;
        op = (modrm >> 3) & 7;
        switch(op) {
        case 0: /* sldt */
7272 7273
            if (!s->pe || s->vm86)
                goto illegal_op;
B
bellard 已提交
7274
            gen_svm_check_intercept(s, pc_start, SVM_EXIT_LDTR_READ);
B
bellard 已提交
7275
            tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,ldt.selector));
7276
            ot = MO_16;
B
bellard 已提交
7277 7278
            if (mod == 3)
                ot += s->dflag;
7279
            gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 1);
B
bellard 已提交
7280 7281
            break;
        case 2: /* lldt */
7282 7283
            if (!s->pe || s->vm86)
                goto illegal_op;
B
bellard 已提交
7284 7285 7286
            if (s->cpl != 0) {
                gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
            } else {
B
bellard 已提交
7287
                gen_svm_check_intercept(s, pc_start, SVM_EXIT_LDTR_WRITE);
7288
                gen_ldst_modrm(env, s, modrm, MO_16, OR_TMP0, 0);
B
bellard 已提交
7289
                gen_jmp_im(pc_start - s->cs_base);
7290
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
7291
                gen_helper_lldt(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
7292 7293 7294
            }
            break;
        case 1: /* str */
7295 7296
            if (!s->pe || s->vm86)
                goto illegal_op;
B
bellard 已提交
7297
            gen_svm_check_intercept(s, pc_start, SVM_EXIT_TR_READ);
B
bellard 已提交
7298
            tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,tr.selector));
7299
            ot = MO_16;
B
bellard 已提交
7300 7301
            if (mod == 3)
                ot += s->dflag;
7302
            gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 1);
B
bellard 已提交
7303 7304
            break;
        case 3: /* ltr */
7305 7306
            if (!s->pe || s->vm86)
                goto illegal_op;
B
bellard 已提交
7307 7308 7309
            if (s->cpl != 0) {
                gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
            } else {
B
bellard 已提交
7310
                gen_svm_check_intercept(s, pc_start, SVM_EXIT_TR_WRITE);
7311
                gen_ldst_modrm(env, s, modrm, MO_16, OR_TMP0, 0);
B
bellard 已提交
7312
                gen_jmp_im(pc_start - s->cs_base);
7313
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
7314
                gen_helper_ltr(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
7315 7316 7317 7318
            }
            break;
        case 4: /* verr */
        case 5: /* verw */
7319 7320
            if (!s->pe || s->vm86)
                goto illegal_op;
7321
            gen_ldst_modrm(env, s, modrm, MO_16, OR_TMP0, 0);
7322
            gen_update_cc_op(s);
7323 7324 7325 7326 7327
            if (op == 4) {
                gen_helper_verr(cpu_env, cpu_T[0]);
            } else {
                gen_helper_verw(cpu_env, cpu_T[0]);
            }
7328
            set_cc_op(s, CC_OP_EFLAGS);
7329
            break;
B
bellard 已提交
7330 7331 7332 7333 7334
        default:
            goto illegal_op;
        }
        break;
    case 0x101:
7335
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7336 7337
        mod = (modrm >> 6) & 3;
        op = (modrm >> 3) & 7;
B
bellard 已提交
7338
        rm = modrm & 7;
B
bellard 已提交
7339 7340 7341 7342
        switch(op) {
        case 0: /* sgdt */
            if (mod == 3)
                goto illegal_op;
B
bellard 已提交
7343
            gen_svm_check_intercept(s, pc_start, SVM_EXIT_GDTR_READ);
7344
            gen_lea_modrm(env, s, modrm);
B
bellard 已提交
7345
            tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State, gdt.limit));
7346
            gen_op_st_v(s, MO_16, cpu_T[0], cpu_A0);
7347
            gen_add_A0_im(s, 2);
B
bellard 已提交
7348
            tcg_gen_ld_tl(cpu_T[0], cpu_env, offsetof(CPUX86State, gdt.base));
7349 7350 7351
            if (s->dflag == 0) {
                tcg_gen_andi_tl(cpu_T[0], cpu_T[0], 0xffffff);
            }
7352
            gen_op_st_v(s, CODE64(s) + MO_32, cpu_T[0], cpu_A0);
B
bellard 已提交
7353
            break;
B
bellard 已提交
7354 7355 7356 7357 7358 7359 7360
        case 1:
            if (mod == 3) {
                switch (rm) {
                case 0: /* monitor */
                    if (!(s->cpuid_ext_features & CPUID_EXT_MONITOR) ||
                        s->cpl != 0)
                        goto illegal_op;
7361
                    gen_update_cc_op(s);
B
bellard 已提交
7362 7363 7364
                    gen_jmp_im(pc_start - s->cs_base);
#ifdef TARGET_X86_64
                    if (s->aflag == 2) {
7365
                        gen_op_movq_A0_reg(R_EAX);
7366
                    } else
B
bellard 已提交
7367 7368
#endif
                    {
7369
                        gen_op_movl_A0_reg(R_EAX);
B
bellard 已提交
7370
                        if (s->aflag == 0)
7371
                            tcg_gen_ext16u_tl(cpu_A0, cpu_A0);
B
bellard 已提交
7372 7373
                    }
                    gen_add_A0_ds_seg(s);
B
Blue Swirl 已提交
7374
                    gen_helper_monitor(cpu_env, cpu_A0);
B
bellard 已提交
7375 7376 7377 7378 7379
                    break;
                case 1: /* mwait */
                    if (!(s->cpuid_ext_features & CPUID_EXT_MONITOR) ||
                        s->cpl != 0)
                        goto illegal_op;
J
Jun Koi 已提交
7380
                    gen_update_cc_op(s);
7381
                    gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
7382
                    gen_helper_mwait(cpu_env, tcg_const_i32(s->pc - pc_start));
B
bellard 已提交
7383 7384
                    gen_eob(s);
                    break;
H
H. Peter Anvin 已提交
7385 7386 7387 7388 7389 7390 7391 7392 7393 7394 7395 7396 7397 7398 7399 7400 7401 7402
                case 2: /* clac */
                    if (!(s->cpuid_7_0_ebx_features & CPUID_7_0_EBX_SMAP) ||
                        s->cpl != 0) {
                        goto illegal_op;
                    }
                    gen_helper_clac(cpu_env);
                    gen_jmp_im(s->pc - s->cs_base);
                    gen_eob(s);
                    break;
                case 3: /* stac */
                    if (!(s->cpuid_7_0_ebx_features & CPUID_7_0_EBX_SMAP) ||
                        s->cpl != 0) {
                        goto illegal_op;
                    }
                    gen_helper_stac(cpu_env);
                    gen_jmp_im(s->pc - s->cs_base);
                    gen_eob(s);
                    break;
B
bellard 已提交
7403 7404 7405 7406
                default:
                    goto illegal_op;
                }
            } else { /* sidt */
B
bellard 已提交
7407
                gen_svm_check_intercept(s, pc_start, SVM_EXIT_IDTR_READ);
7408
                gen_lea_modrm(env, s, modrm);
B
bellard 已提交
7409
                tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State, idt.limit));
7410
                gen_op_st_v(s, MO_16, cpu_T[0], cpu_A0);
B
bellard 已提交
7411
                gen_add_A0_im(s, 2);
B
bellard 已提交
7412
                tcg_gen_ld_tl(cpu_T[0], cpu_env, offsetof(CPUX86State, idt.base));
7413 7414 7415
                if (s->dflag == 0) {
                    tcg_gen_andi_tl(cpu_T[0], cpu_T[0], 0xffffff);
                }
7416
                gen_op_st_v(s, CODE64(s) + MO_32, cpu_T[0], cpu_A0);
B
bellard 已提交
7417 7418
            }
            break;
B
bellard 已提交
7419 7420
        case 2: /* lgdt */
        case 3: /* lidt */
T
ths 已提交
7421
            if (mod == 3) {
7422
                gen_update_cc_op(s);
B
bellard 已提交
7423
                gen_jmp_im(pc_start - s->cs_base);
T
ths 已提交
7424 7425
                switch(rm) {
                case 0: /* VMRUN */
B
bellard 已提交
7426 7427 7428 7429
                    if (!(s->flags & HF_SVME_MASK) || !s->pe)
                        goto illegal_op;
                    if (s->cpl != 0) {
                        gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
T
ths 已提交
7430
                        break;
B
bellard 已提交
7431
                    } else {
B
Blue Swirl 已提交
7432
                        gen_helper_vmrun(cpu_env, tcg_const_i32(s->aflag),
P
pbrook 已提交
7433
                                         tcg_const_i32(s->pc - pc_start));
7434
                        tcg_gen_exit_tb(0);
J
Jun Koi 已提交
7435
                        s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
7436
                    }
T
ths 已提交
7437 7438
                    break;
                case 1: /* VMMCALL */
B
bellard 已提交
7439 7440
                    if (!(s->flags & HF_SVME_MASK))
                        goto illegal_op;
B
Blue Swirl 已提交
7441
                    gen_helper_vmmcall(cpu_env);
T
ths 已提交
7442 7443
                    break;
                case 2: /* VMLOAD */
B
bellard 已提交
7444 7445 7446 7447 7448 7449
                    if (!(s->flags & HF_SVME_MASK) || !s->pe)
                        goto illegal_op;
                    if (s->cpl != 0) {
                        gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
                        break;
                    } else {
B
Blue Swirl 已提交
7450
                        gen_helper_vmload(cpu_env, tcg_const_i32(s->aflag));
B
bellard 已提交
7451
                    }
T
ths 已提交
7452 7453
                    break;
                case 3: /* VMSAVE */
B
bellard 已提交
7454 7455 7456 7457 7458 7459
                    if (!(s->flags & HF_SVME_MASK) || !s->pe)
                        goto illegal_op;
                    if (s->cpl != 0) {
                        gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
                        break;
                    } else {
B
Blue Swirl 已提交
7460
                        gen_helper_vmsave(cpu_env, tcg_const_i32(s->aflag));
B
bellard 已提交
7461
                    }
T
ths 已提交
7462 7463
                    break;
                case 4: /* STGI */
B
bellard 已提交
7464 7465 7466 7467 7468 7469 7470 7471
                    if ((!(s->flags & HF_SVME_MASK) &&
                         !(s->cpuid_ext3_features & CPUID_EXT3_SKINIT)) || 
                        !s->pe)
                        goto illegal_op;
                    if (s->cpl != 0) {
                        gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
                        break;
                    } else {
B
Blue Swirl 已提交
7472
                        gen_helper_stgi(cpu_env);
B
bellard 已提交
7473
                    }
T
ths 已提交
7474 7475
                    break;
                case 5: /* CLGI */
B
bellard 已提交
7476 7477 7478 7479 7480 7481
                    if (!(s->flags & HF_SVME_MASK) || !s->pe)
                        goto illegal_op;
                    if (s->cpl != 0) {
                        gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
                        break;
                    } else {
B
Blue Swirl 已提交
7482
                        gen_helper_clgi(cpu_env);
B
bellard 已提交
7483
                    }
T
ths 已提交
7484 7485
                    break;
                case 6: /* SKINIT */
B
bellard 已提交
7486 7487 7488 7489
                    if ((!(s->flags & HF_SVME_MASK) && 
                         !(s->cpuid_ext3_features & CPUID_EXT3_SKINIT)) || 
                        !s->pe)
                        goto illegal_op;
B
Blue Swirl 已提交
7490
                    gen_helper_skinit(cpu_env);
T
ths 已提交
7491 7492
                    break;
                case 7: /* INVLPGA */
B
bellard 已提交
7493 7494 7495 7496 7497 7498
                    if (!(s->flags & HF_SVME_MASK) || !s->pe)
                        goto illegal_op;
                    if (s->cpl != 0) {
                        gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
                        break;
                    } else {
B
Blue Swirl 已提交
7499
                        gen_helper_invlpga(cpu_env, tcg_const_i32(s->aflag));
B
bellard 已提交
7500
                    }
T
ths 已提交
7501 7502 7503 7504 7505
                    break;
                default:
                    goto illegal_op;
                }
            } else if (s->cpl != 0) {
B
bellard 已提交
7506 7507
                gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
            } else {
B
bellard 已提交
7508 7509
                gen_svm_check_intercept(s, pc_start,
                                        op==2 ? SVM_EXIT_GDTR_WRITE : SVM_EXIT_IDTR_WRITE);
7510
                gen_lea_modrm(env, s, modrm);
7511
                gen_op_ld_v(s, MO_16, cpu_T[1], cpu_A0);
7512
                gen_add_A0_im(s, 2);
7513
                gen_op_ld_v(s, CODE64(s) + MO_32, cpu_T[0], cpu_A0);
7514 7515 7516
                if (s->dflag == 0) {
                    tcg_gen_andi_tl(cpu_T[0], cpu_T[0], 0xffffff);
                }
B
bellard 已提交
7517
                if (op == 2) {
B
bellard 已提交
7518 7519
                    tcg_gen_st_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,gdt.base));
                    tcg_gen_st32_tl(cpu_T[1], cpu_env, offsetof(CPUX86State,gdt.limit));
B
bellard 已提交
7520
                } else {
B
bellard 已提交
7521 7522
                    tcg_gen_st_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,idt.base));
                    tcg_gen_st32_tl(cpu_T[1], cpu_env, offsetof(CPUX86State,idt.limit));
B
bellard 已提交
7523 7524 7525 7526
                }
            }
            break;
        case 4: /* smsw */
B
bellard 已提交
7527
            gen_svm_check_intercept(s, pc_start, SVM_EXIT_READ_CR0);
7528
#if defined TARGET_X86_64 && defined HOST_WORDS_BIGENDIAN
7529 7530
            tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,cr[0]) + 4);
#else
B
bellard 已提交
7531
            tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,cr[0]));
7532
#endif
7533
            gen_ldst_modrm(env, s, modrm, MO_16, OR_TMP0, 1);
B
bellard 已提交
7534 7535 7536 7537 7538
            break;
        case 6: /* lmsw */
            if (s->cpl != 0) {
                gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
            } else {
B
bellard 已提交
7539
                gen_svm_check_intercept(s, pc_start, SVM_EXIT_WRITE_CR0);
7540
                gen_ldst_modrm(env, s, modrm, MO_16, OR_TMP0, 0);
B
Blue Swirl 已提交
7541
                gen_helper_lmsw(cpu_env, cpu_T[0]);
B
bellard 已提交
7542
                gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
7543
                gen_eob(s);
B
bellard 已提交
7544 7545
            }
            break;
A
Andre Przywara 已提交
7546 7547 7548 7549 7550
        case 7:
            if (mod != 3) { /* invlpg */
                if (s->cpl != 0) {
                    gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
                } else {
7551
                    gen_update_cc_op(s);
A
Andre Przywara 已提交
7552
                    gen_jmp_im(pc_start - s->cs_base);
7553
                    gen_lea_modrm(env, s, modrm);
B
Blue Swirl 已提交
7554
                    gen_helper_invlpg(cpu_env, cpu_A0);
A
Andre Przywara 已提交
7555 7556 7557
                    gen_jmp_im(s->pc - s->cs_base);
                    gen_eob(s);
                }
B
bellard 已提交
7558
            } else {
A
Andre Przywara 已提交
7559 7560
                switch (rm) {
                case 0: /* swapgs */
B
bellard 已提交
7561
#ifdef TARGET_X86_64
A
Andre Przywara 已提交
7562 7563 7564 7565 7566 7567 7568 7569 7570 7571 7572 7573 7574
                    if (CODE64(s)) {
                        if (s->cpl != 0) {
                            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
                        } else {
                            tcg_gen_ld_tl(cpu_T[0], cpu_env,
                                offsetof(CPUX86State,segs[R_GS].base));
                            tcg_gen_ld_tl(cpu_T[1], cpu_env,
                                offsetof(CPUX86State,kernelgsbase));
                            tcg_gen_st_tl(cpu_T[1], cpu_env,
                                offsetof(CPUX86State,segs[R_GS].base));
                            tcg_gen_st_tl(cpu_T[0], cpu_env,
                                offsetof(CPUX86State,kernelgsbase));
                        }
7575
                    } else
B
bellard 已提交
7576 7577 7578 7579
#endif
                    {
                        goto illegal_op;
                    }
A
Andre Przywara 已提交
7580 7581 7582 7583
                    break;
                case 1: /* rdtscp */
                    if (!(s->cpuid_ext2_features & CPUID_EXT2_RDTSCP))
                        goto illegal_op;
7584
                    gen_update_cc_op(s);
B
bellard 已提交
7585
                    gen_jmp_im(pc_start - s->cs_base);
A
Andre Przywara 已提交
7586 7587
                    if (use_icount)
                        gen_io_start();
B
Blue Swirl 已提交
7588
                    gen_helper_rdtscp(cpu_env);
A
Andre Przywara 已提交
7589 7590 7591 7592 7593 7594 7595
                    if (use_icount) {
                        gen_io_end();
                        gen_jmp(s, s->pc - s->cs_base);
                    }
                    break;
                default:
                    goto illegal_op;
B
bellard 已提交
7596
                }
B
bellard 已提交
7597 7598 7599 7600 7601 7602
            }
            break;
        default:
            goto illegal_op;
        }
        break;
7603 7604 7605 7606 7607
    case 0x108: /* invd */
    case 0x109: /* wbinvd */
        if (s->cpl != 0) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
B
bellard 已提交
7608
            gen_svm_check_intercept(s, pc_start, (b & 2) ? SVM_EXIT_INVD : SVM_EXIT_WBINVD);
7609 7610 7611
            /* nothing to do */
        }
        break;
B
bellard 已提交
7612 7613 7614 7615 7616
    case 0x63: /* arpl or movslS (x86_64) */
#ifdef TARGET_X86_64
        if (CODE64(s)) {
            int d_ot;
            /* d_ot is the size of destination */
7617
            d_ot = dflag + MO_16;
B
bellard 已提交
7618

7619
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7620 7621 7622
            reg = ((modrm >> 3) & 7) | rex_r;
            mod = (modrm >> 6) & 3;
            rm = (modrm & 7) | REX_B(s);
7623

B
bellard 已提交
7624
            if (mod == 3) {
7625
                gen_op_mov_TN_reg(MO_32, 0, rm);
B
bellard 已提交
7626
                /* sign extend */
7627
                if (d_ot == MO_64) {
B
bellard 已提交
7628
                    tcg_gen_ext32s_tl(cpu_T[0], cpu_T[0]);
7629
                }
B
bellard 已提交
7630
                gen_op_mov_reg_T0(d_ot, reg);
B
bellard 已提交
7631
            } else {
7632
                gen_lea_modrm(env, s, modrm);
R
Richard Henderson 已提交
7633
                gen_op_ld_v(s, MO_32 | MO_SIGN, cpu_T[0], cpu_A0);
B
bellard 已提交
7634
                gen_op_mov_reg_T0(d_ot, reg);
B
bellard 已提交
7635
            }
7636
        } else
B
bellard 已提交
7637 7638
#endif
        {
7639
            int label1;
L
Laurent Desnogues 已提交
7640
            TCGv t0, t1, t2, a0;
7641

B
bellard 已提交
7642 7643
            if (!s->pe || s->vm86)
                goto illegal_op;
P
pbrook 已提交
7644 7645 7646
            t0 = tcg_temp_local_new();
            t1 = tcg_temp_local_new();
            t2 = tcg_temp_local_new();
7647
            ot = MO_16;
7648
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7649 7650 7651 7652
            reg = (modrm >> 3) & 7;
            mod = (modrm >> 6) & 3;
            rm = modrm & 7;
            if (mod != 3) {
7653
                gen_lea_modrm(env, s, modrm);
7654
                gen_op_ld_v(s, ot, t0, cpu_A0);
L
Laurent Desnogues 已提交
7655 7656
                a0 = tcg_temp_local_new();
                tcg_gen_mov_tl(a0, cpu_A0);
B
bellard 已提交
7657
            } else {
7658
                gen_op_mov_v_reg(ot, t0, rm);
L
Laurent Desnogues 已提交
7659
                TCGV_UNUSED(a0);
B
bellard 已提交
7660
            }
7661 7662 7663 7664
            gen_op_mov_v_reg(ot, t1, reg);
            tcg_gen_andi_tl(cpu_tmp0, t0, 3);
            tcg_gen_andi_tl(t1, t1, 3);
            tcg_gen_movi_tl(t2, 0);
7665
            label1 = gen_new_label();
7666 7667 7668 7669
            tcg_gen_brcond_tl(TCG_COND_GE, cpu_tmp0, t1, label1);
            tcg_gen_andi_tl(t0, t0, ~3);
            tcg_gen_or_tl(t0, t0, t1);
            tcg_gen_movi_tl(t2, CC_Z);
7670
            gen_set_label(label1);
B
bellard 已提交
7671
            if (mod != 3) {
7672
                gen_op_st_v(s, ot, t0, a0);
L
Laurent Desnogues 已提交
7673 7674
                tcg_temp_free(a0);
           } else {
7675
                gen_op_mov_reg_v(ot, rm, t0);
B
bellard 已提交
7676
            }
7677
            gen_compute_eflags(s);
7678
            tcg_gen_andi_tl(cpu_cc_src, cpu_cc_src, ~CC_Z);
7679 7680 7681 7682
            tcg_gen_or_tl(cpu_cc_src, cpu_cc_src, t2);
            tcg_temp_free(t0);
            tcg_temp_free(t1);
            tcg_temp_free(t2);
7683 7684
        }
        break;
B
bellard 已提交
7685 7686
    case 0x102: /* lar */
    case 0x103: /* lsl */
7687 7688
        {
            int label1;
7689
            TCGv t0;
7690 7691
            if (!s->pe || s->vm86)
                goto illegal_op;
7692
            ot = dflag ? MO_32 : MO_16;
7693
            modrm = cpu_ldub_code(env, s->pc++);
7694
            reg = ((modrm >> 3) & 7) | rex_r;
7695
            gen_ldst_modrm(env, s, modrm, MO_16, OR_TMP0, 0);
P
pbrook 已提交
7696
            t0 = tcg_temp_local_new();
7697
            gen_update_cc_op(s);
7698 7699 7700 7701 7702
            if (b == 0x102) {
                gen_helper_lar(t0, cpu_env, cpu_T[0]);
            } else {
                gen_helper_lsl(t0, cpu_env, cpu_T[0]);
            }
7703 7704
            tcg_gen_andi_tl(cpu_tmp0, cpu_cc_src, CC_Z);
            label1 = gen_new_label();
P
pbrook 已提交
7705
            tcg_gen_brcondi_tl(TCG_COND_EQ, cpu_tmp0, 0, label1);
7706
            gen_op_mov_reg_v(ot, reg, t0);
7707
            gen_set_label(label1);
7708
            set_cc_op(s, CC_OP_EFLAGS);
7709
            tcg_temp_free(t0);
7710
        }
B
bellard 已提交
7711 7712
        break;
    case 0x118:
7713
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7714 7715 7716 7717 7718 7719 7720 7721 7722
        mod = (modrm >> 6) & 3;
        op = (modrm >> 3) & 7;
        switch(op) {
        case 0: /* prefetchnta */
        case 1: /* prefetchnt0 */
        case 2: /* prefetchnt0 */
        case 3: /* prefetchnt0 */
            if (mod == 3)
                goto illegal_op;
7723
            gen_lea_modrm(env, s, modrm);
B
bellard 已提交
7724 7725
            /* nothing more to do */
            break;
B
bellard 已提交
7726
        default: /* nop (multi byte) */
7727
            gen_nop_modrm(env, s, modrm);
B
bellard 已提交
7728
            break;
B
bellard 已提交
7729 7730
        }
        break;
B
bellard 已提交
7731
    case 0x119 ... 0x11f: /* nop (multi byte) */
7732 7733
        modrm = cpu_ldub_code(env, s->pc++);
        gen_nop_modrm(env, s, modrm);
B
bellard 已提交
7734
        break;
B
bellard 已提交
7735 7736 7737 7738 7739
    case 0x120: /* mov reg, crN */
    case 0x122: /* mov crN, reg */
        if (s->cpl != 0) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
7740
            modrm = cpu_ldub_code(env, s->pc++);
7741 7742 7743 7744 7745
            /* Ignore the mod bits (assume (modrm&0xc0)==0xc0).
             * AMD documentation (24594.pdf) and testing of
             * intel 386 and 486 processors all show that the mod bits
             * are assumed to be 1's, regardless of actual values.
             */
B
bellard 已提交
7746 7747 7748
            rm = (modrm & 7) | REX_B(s);
            reg = ((modrm >> 3) & 7) | rex_r;
            if (CODE64(s))
7749
                ot = MO_64;
B
bellard 已提交
7750
            else
7751
                ot = MO_32;
7752 7753 7754 7755
            if ((prefixes & PREFIX_LOCK) && (reg == 0) &&
                (s->cpuid_ext3_features & CPUID_EXT3_CR8LEG)) {
                reg = 8;
            }
B
bellard 已提交
7756 7757 7758 7759 7760
            switch(reg) {
            case 0:
            case 2:
            case 3:
            case 4:
B
bellard 已提交
7761
            case 8:
7762
                gen_update_cc_op(s);
B
bellard 已提交
7763
                gen_jmp_im(pc_start - s->cs_base);
B
bellard 已提交
7764
                if (b & 2) {
B
bellard 已提交
7765
                    gen_op_mov_TN_reg(ot, 0, rm);
B
Blue Swirl 已提交
7766 7767
                    gen_helper_write_crN(cpu_env, tcg_const_i32(reg),
                                         cpu_T[0]);
B
bellard 已提交
7768
                    gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
7769 7770
                    gen_eob(s);
                } else {
B
Blue Swirl 已提交
7771
                    gen_helper_read_crN(cpu_T[0], cpu_env, tcg_const_i32(reg));
B
bellard 已提交
7772
                    gen_op_mov_reg_T0(ot, rm);
B
bellard 已提交
7773 7774 7775 7776 7777 7778 7779 7780 7781 7782 7783 7784
                }
                break;
            default:
                goto illegal_op;
            }
        }
        break;
    case 0x121: /* mov reg, drN */
    case 0x123: /* mov drN, reg */
        if (s->cpl != 0) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
7785
            modrm = cpu_ldub_code(env, s->pc++);
7786 7787 7788 7789 7790
            /* Ignore the mod bits (assume (modrm&0xc0)==0xc0).
             * AMD documentation (24594.pdf) and testing of
             * intel 386 and 486 processors all show that the mod bits
             * are assumed to be 1's, regardless of actual values.
             */
B
bellard 已提交
7791 7792 7793
            rm = (modrm & 7) | REX_B(s);
            reg = ((modrm >> 3) & 7) | rex_r;
            if (CODE64(s))
7794
                ot = MO_64;
B
bellard 已提交
7795
            else
7796
                ot = MO_32;
B
bellard 已提交
7797
            /* XXX: do it dynamically with CR4.DE bit */
B
bellard 已提交
7798
            if (reg == 4 || reg == 5 || reg >= 8)
B
bellard 已提交
7799 7800
                goto illegal_op;
            if (b & 2) {
T
ths 已提交
7801
                gen_svm_check_intercept(s, pc_start, SVM_EXIT_WRITE_DR0 + reg);
B
bellard 已提交
7802
                gen_op_mov_TN_reg(ot, 0, rm);
B
Blue Swirl 已提交
7803
                gen_helper_movl_drN_T0(cpu_env, tcg_const_i32(reg), cpu_T[0]);
B
bellard 已提交
7804
                gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
7805 7806
                gen_eob(s);
            } else {
T
ths 已提交
7807
                gen_svm_check_intercept(s, pc_start, SVM_EXIT_READ_DR0 + reg);
B
bellard 已提交
7808
                tcg_gen_ld_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,dr[reg]));
B
bellard 已提交
7809
                gen_op_mov_reg_T0(ot, rm);
B
bellard 已提交
7810 7811 7812 7813 7814 7815 7816
            }
        }
        break;
    case 0x106: /* clts */
        if (s->cpl != 0) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
T
ths 已提交
7817
            gen_svm_check_intercept(s, pc_start, SVM_EXIT_WRITE_CR0);
7818
            gen_helper_clts(cpu_env);
B
bellard 已提交
7819
            /* abort block because static cpu state changed */
B
bellard 已提交
7820
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
7821
            gen_eob(s);
B
bellard 已提交
7822 7823
        }
        break;
B
balrog 已提交
7824
    /* MMX/3DNow!/SSE/SSE2/SSE3/SSSE3/SSE4 support */
B
bellard 已提交
7825 7826
    case 0x1c3: /* MOVNTI reg, mem */
        if (!(s->cpuid_features & CPUID_SSE2))
B
bellard 已提交
7827
            goto illegal_op;
7828
        ot = s->dflag == 2 ? MO_64 : MO_32;
7829
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7830 7831 7832 7833 7834
        mod = (modrm >> 6) & 3;
        if (mod == 3)
            goto illegal_op;
        reg = ((modrm >> 3) & 7) | rex_r;
        /* generate a generic store */
7835
        gen_ldst_modrm(env, s, modrm, ot, reg, 1);
B
bellard 已提交
7836
        break;
B
bellard 已提交
7837
    case 0x1ae:
7838
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7839 7840 7841 7842
        mod = (modrm >> 6) & 3;
        op = (modrm >> 3) & 7;
        switch(op) {
        case 0: /* fxsave */
7843
            if (mod == 3 || !(s->cpuid_features & CPUID_FXSR) ||
7844
                (s->prefix & PREFIX_LOCK))
B
bellard 已提交
7845
                goto illegal_op;
7846
            if ((s->flags & HF_EM_MASK) || (s->flags & HF_TS_MASK)) {
B
bellard 已提交
7847 7848 7849
                gen_exception(s, EXCP07_PREX, pc_start - s->cs_base);
                break;
            }
7850
            gen_lea_modrm(env, s, modrm);
7851
            gen_update_cc_op(s);
B
bellard 已提交
7852
            gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
7853
            gen_helper_fxsave(cpu_env, cpu_A0, tcg_const_i32((s->dflag == 2)));
B
bellard 已提交
7854 7855
            break;
        case 1: /* fxrstor */
7856
            if (mod == 3 || !(s->cpuid_features & CPUID_FXSR) ||
7857
                (s->prefix & PREFIX_LOCK))
B
bellard 已提交
7858
                goto illegal_op;
7859
            if ((s->flags & HF_EM_MASK) || (s->flags & HF_TS_MASK)) {
B
bellard 已提交
7860 7861 7862
                gen_exception(s, EXCP07_PREX, pc_start - s->cs_base);
                break;
            }
7863
            gen_lea_modrm(env, s, modrm);
7864
            gen_update_cc_op(s);
B
bellard 已提交
7865
            gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
7866 7867
            gen_helper_fxrstor(cpu_env, cpu_A0,
                               tcg_const_i32((s->dflag == 2)));
B
bellard 已提交
7868 7869 7870 7871 7872 7873
            break;
        case 2: /* ldmxcsr */
        case 3: /* stmxcsr */
            if (s->flags & HF_TS_MASK) {
                gen_exception(s, EXCP07_PREX, pc_start - s->cs_base);
                break;
B
bellard 已提交
7874
            }
B
bellard 已提交
7875 7876
            if ((s->flags & HF_EM_MASK) || !(s->flags & HF_OSFXSR_MASK) ||
                mod == 3)
B
bellard 已提交
7877
                goto illegal_op;
7878
            gen_lea_modrm(env, s, modrm);
B
bellard 已提交
7879
            if (op == 2) {
7880 7881
                tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                    s->mem_index, MO_LEUL);
B
Blue Swirl 已提交
7882
                gen_helper_ldmxcsr(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
7883
            } else {
B
bellard 已提交
7884
                tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State, mxcsr));
7885
                gen_op_st_v(s, MO_32, cpu_T[0], cpu_A0);
B
bellard 已提交
7886
            }
B
bellard 已提交
7887 7888 7889
            break;
        case 5: /* lfence */
        case 6: /* mfence */
7890
            if ((modrm & 0xc7) != 0xc0 || !(s->cpuid_features & CPUID_SSE2))
B
bellard 已提交
7891 7892
                goto illegal_op;
            break;
7893 7894 7895
        case 7: /* sfence / clflush */
            if ((modrm & 0xc7) == 0xc0) {
                /* sfence */
A
aurel32 已提交
7896
                /* XXX: also check for cpuid_ext2_features & CPUID_EXT2_EMMX */
7897 7898 7899 7900 7901 7902
                if (!(s->cpuid_features & CPUID_SSE))
                    goto illegal_op;
            } else {
                /* clflush */
                if (!(s->cpuid_features & CPUID_CLFLUSH))
                    goto illegal_op;
7903
                gen_lea_modrm(env, s, modrm);
7904 7905
            }
            break;
B
bellard 已提交
7906
        default:
B
bellard 已提交
7907 7908 7909
            goto illegal_op;
        }
        break;
A
aurel32 已提交
7910
    case 0x10d: /* 3DNow! prefetch(w) */
7911
        modrm = cpu_ldub_code(env, s->pc++);
A
aurel32 已提交
7912 7913 7914
        mod = (modrm >> 6) & 3;
        if (mod == 3)
            goto illegal_op;
7915
        gen_lea_modrm(env, s, modrm);
7916 7917
        /* ignore for now */
        break;
B
bellard 已提交
7918
    case 0x1aa: /* rsm */
B
bellard 已提交
7919
        gen_svm_check_intercept(s, pc_start, SVM_EXIT_RSM);
B
bellard 已提交
7920 7921
        if (!(s->flags & HF_SMM_MASK))
            goto illegal_op;
J
Jun Koi 已提交
7922
        gen_update_cc_op(s);
B
bellard 已提交
7923
        gen_jmp_im(s->pc - s->cs_base);
B
Blue Swirl 已提交
7924
        gen_helper_rsm(cpu_env);
B
bellard 已提交
7925 7926
        gen_eob(s);
        break;
B
balrog 已提交
7927 7928 7929 7930 7931 7932 7933
    case 0x1b8: /* SSE4.2 popcnt */
        if ((prefixes & (PREFIX_REPZ | PREFIX_LOCK | PREFIX_REPNZ)) !=
             PREFIX_REPZ)
            goto illegal_op;
        if (!(s->cpuid_ext_features & CPUID_EXT_POPCNT))
            goto illegal_op;

7934
        modrm = cpu_ldub_code(env, s->pc++);
M
malc 已提交
7935
        reg = ((modrm >> 3) & 7) | rex_r;
B
balrog 已提交
7936 7937

        if (s->prefix & PREFIX_DATA)
7938
            ot = MO_16;
B
balrog 已提交
7939
        else if (s->dflag != 2)
7940
            ot = MO_32;
B
balrog 已提交
7941
        else
7942
            ot = MO_64;
B
balrog 已提交
7943

7944
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
B
Blue Swirl 已提交
7945
        gen_helper_popcnt(cpu_T[0], cpu_env, cpu_T[0], tcg_const_i32(ot));
B
balrog 已提交
7946
        gen_op_mov_reg_T0(ot, reg);
B
balrog 已提交
7947

7948
        set_cc_op(s, CC_OP_EFLAGS);
B
balrog 已提交
7949
        break;
A
aurel32 已提交
7950 7951 7952
    case 0x10e ... 0x10f:
        /* 3DNow! instructions, ignore prefixes */
        s->prefix &= ~(PREFIX_REPZ | PREFIX_REPNZ | PREFIX_DATA);
B
bellard 已提交
7953 7954
    case 0x110 ... 0x117:
    case 0x128 ... 0x12f:
B
balrog 已提交
7955
    case 0x138 ... 0x13a:
7956
    case 0x150 ... 0x179:
B
bellard 已提交
7957 7958 7959 7960
    case 0x17c ... 0x17f:
    case 0x1c2:
    case 0x1c4 ... 0x1c6:
    case 0x1d0 ... 0x1fe:
7961
        gen_sse(env, s, b, pc_start, rex_r);
B
bellard 已提交
7962
        break;
B
bellard 已提交
7963 7964 7965 7966 7967
    default:
        goto illegal_op;
    }
    /* lock generation */
    if (s->prefix & PREFIX_LOCK)
P
pbrook 已提交
7968
        gen_helper_unlock();
B
bellard 已提交
7969 7970
    return s->pc;
 illegal_op:
7971
    if (s->prefix & PREFIX_LOCK)
P
pbrook 已提交
7972
        gen_helper_unlock();
B
bellard 已提交
7973 7974 7975 7976 7977 7978 7979
    /* XXX: ensure that no lock was generated */
    gen_exception(s, EXCP06_ILLOP, pc_start - s->cs_base);
    return s->pc;
}

void optimize_flags_init(void)
{
P
pbrook 已提交
7980 7981
    cpu_env = tcg_global_reg_new_ptr(TCG_AREG0, "env");
    cpu_cc_op = tcg_global_mem_new_i32(TCG_AREG0,
7982 7983
                                       offsetof(CPUX86State, cc_op), "cc_op");
    cpu_cc_dst = tcg_global_mem_new(TCG_AREG0, offsetof(CPUX86State, cc_dst),
P
pbrook 已提交
7984
                                    "cc_dst");
7985 7986
    cpu_cc_src = tcg_global_mem_new(TCG_AREG0, offsetof(CPUX86State, cc_src),
                                    "cc_src");
7987 7988
    cpu_cc_src2 = tcg_global_mem_new(TCG_AREG0, offsetof(CPUX86State, cc_src2),
                                     "cc_src2");
7989

7990 7991
#ifdef TARGET_X86_64
    cpu_regs[R_EAX] = tcg_global_mem_new_i64(TCG_AREG0,
7992
                                             offsetof(CPUX86State, regs[R_EAX]), "rax");
7993
    cpu_regs[R_ECX] = tcg_global_mem_new_i64(TCG_AREG0,
7994
                                             offsetof(CPUX86State, regs[R_ECX]), "rcx");
7995
    cpu_regs[R_EDX] = tcg_global_mem_new_i64(TCG_AREG0,
7996
                                             offsetof(CPUX86State, regs[R_EDX]), "rdx");
7997
    cpu_regs[R_EBX] = tcg_global_mem_new_i64(TCG_AREG0,
7998
                                             offsetof(CPUX86State, regs[R_EBX]), "rbx");
7999
    cpu_regs[R_ESP] = tcg_global_mem_new_i64(TCG_AREG0,
8000
                                             offsetof(CPUX86State, regs[R_ESP]), "rsp");
8001
    cpu_regs[R_EBP] = tcg_global_mem_new_i64(TCG_AREG0,
8002
                                             offsetof(CPUX86State, regs[R_EBP]), "rbp");
8003
    cpu_regs[R_ESI] = tcg_global_mem_new_i64(TCG_AREG0,
8004
                                             offsetof(CPUX86State, regs[R_ESI]), "rsi");
8005
    cpu_regs[R_EDI] = tcg_global_mem_new_i64(TCG_AREG0,
8006
                                             offsetof(CPUX86State, regs[R_EDI]), "rdi");
8007
    cpu_regs[8] = tcg_global_mem_new_i64(TCG_AREG0,
8008
                                         offsetof(CPUX86State, regs[8]), "r8");
8009
    cpu_regs[9] = tcg_global_mem_new_i64(TCG_AREG0,
8010
                                          offsetof(CPUX86State, regs[9]), "r9");
8011
    cpu_regs[10] = tcg_global_mem_new_i64(TCG_AREG0,
8012
                                          offsetof(CPUX86State, regs[10]), "r10");
8013
    cpu_regs[11] = tcg_global_mem_new_i64(TCG_AREG0,
8014
                                          offsetof(CPUX86State, regs[11]), "r11");
8015
    cpu_regs[12] = tcg_global_mem_new_i64(TCG_AREG0,
8016
                                          offsetof(CPUX86State, regs[12]), "r12");
8017
    cpu_regs[13] = tcg_global_mem_new_i64(TCG_AREG0,
8018
                                          offsetof(CPUX86State, regs[13]), "r13");
8019
    cpu_regs[14] = tcg_global_mem_new_i64(TCG_AREG0,
8020
                                          offsetof(CPUX86State, regs[14]), "r14");
8021
    cpu_regs[15] = tcg_global_mem_new_i64(TCG_AREG0,
8022
                                          offsetof(CPUX86State, regs[15]), "r15");
8023 8024
#else
    cpu_regs[R_EAX] = tcg_global_mem_new_i32(TCG_AREG0,
8025
                                             offsetof(CPUX86State, regs[R_EAX]), "eax");
8026
    cpu_regs[R_ECX] = tcg_global_mem_new_i32(TCG_AREG0,
8027
                                             offsetof(CPUX86State, regs[R_ECX]), "ecx");
8028
    cpu_regs[R_EDX] = tcg_global_mem_new_i32(TCG_AREG0,
8029
                                             offsetof(CPUX86State, regs[R_EDX]), "edx");
8030
    cpu_regs[R_EBX] = tcg_global_mem_new_i32(TCG_AREG0,
8031
                                             offsetof(CPUX86State, regs[R_EBX]), "ebx");
8032
    cpu_regs[R_ESP] = tcg_global_mem_new_i32(TCG_AREG0,
8033
                                             offsetof(CPUX86State, regs[R_ESP]), "esp");
8034
    cpu_regs[R_EBP] = tcg_global_mem_new_i32(TCG_AREG0,
8035
                                             offsetof(CPUX86State, regs[R_EBP]), "ebp");
8036
    cpu_regs[R_ESI] = tcg_global_mem_new_i32(TCG_AREG0,
8037
                                             offsetof(CPUX86State, regs[R_ESI]), "esi");
8038
    cpu_regs[R_EDI] = tcg_global_mem_new_i32(TCG_AREG0,
8039
                                             offsetof(CPUX86State, regs[R_EDI]), "edi");
8040
#endif
B
bellard 已提交
8041 8042 8043 8044 8045
}

/* generate intermediate code in gen_opc_buf and gen_opparam_buf for
   basic block 'tb'. If search_pc is TRUE, also generate PC
   information for each intermediate instruction. */
8046
static inline void gen_intermediate_code_internal(X86CPU *cpu,
8047
                                                  TranslationBlock *tb,
8048
                                                  bool search_pc)
B
bellard 已提交
8049
{
8050
    CPUState *cs = CPU(cpu);
8051
    CPUX86State *env = &cpu->env;
B
bellard 已提交
8052
    DisasContext dc1, *dc = &dc1;
B
bellard 已提交
8053
    target_ulong pc_ptr;
B
bellard 已提交
8054
    uint16_t *gen_opc_end;
8055
    CPUBreakpoint *bp;
8056
    int j, lj;
8057
    uint64_t flags;
B
bellard 已提交
8058 8059
    target_ulong pc_start;
    target_ulong cs_base;
P
pbrook 已提交
8060 8061
    int num_insns;
    int max_insns;
8062

B
bellard 已提交
8063
    /* generate intermediate code */
B
bellard 已提交
8064 8065
    pc_start = tb->pc;
    cs_base = tb->cs_base;
B
bellard 已提交
8066
    flags = tb->flags;
B
bellard 已提交
8067

8068
    dc->pe = (flags >> HF_PE_SHIFT) & 1;
B
bellard 已提交
8069 8070 8071 8072 8073 8074 8075 8076
    dc->code32 = (flags >> HF_CS32_SHIFT) & 1;
    dc->ss32 = (flags >> HF_SS32_SHIFT) & 1;
    dc->addseg = (flags >> HF_ADDSEG_SHIFT) & 1;
    dc->f_st = 0;
    dc->vm86 = (flags >> VM_SHIFT) & 1;
    dc->cpl = (flags >> HF_CPL_SHIFT) & 3;
    dc->iopl = (flags >> IOPL_SHIFT) & 3;
    dc->tf = (flags >> TF_SHIFT) & 1;
8077
    dc->singlestep_enabled = cs->singlestep_enabled;
B
bellard 已提交
8078
    dc->cc_op = CC_OP_DYNAMIC;
8079
    dc->cc_op_dirty = false;
B
bellard 已提交
8080 8081 8082 8083 8084 8085
    dc->cs_base = cs_base;
    dc->tb = tb;
    dc->popl_esp_hack = 0;
    /* select memory access functions */
    dc->mem_index = 0;
    if (flags & HF_SOFTMMU_MASK) {
8086
        dc->mem_index = cpu_mmu_index(env);
B
bellard 已提交
8087
    }
8088 8089 8090 8091 8092
    dc->cpuid_features = env->features[FEAT_1_EDX];
    dc->cpuid_ext_features = env->features[FEAT_1_ECX];
    dc->cpuid_ext2_features = env->features[FEAT_8000_0001_EDX];
    dc->cpuid_ext3_features = env->features[FEAT_8000_0001_ECX];
    dc->cpuid_7_0_ebx_features = env->features[FEAT_7_0_EBX];
B
bellard 已提交
8093 8094 8095 8096
#ifdef TARGET_X86_64
    dc->lma = (flags >> HF_LMA_SHIFT) & 1;
    dc->code64 = (flags >> HF_CS64_SHIFT) & 1;
#endif
B
bellard 已提交
8097
    dc->flags = flags;
8098
    dc->jmp_opt = !(dc->tf || cs->singlestep_enabled ||
8099
                    (flags & HF_INHIBIT_IRQ_MASK)
B
bellard 已提交
8100
#ifndef CONFIG_SOFTMMU
B
bellard 已提交
8101 8102 8103
                    || (flags & HF_SOFTMMU_MASK)
#endif
                    );
8104 8105
#if 0
    /* check addseg logic */
B
bellard 已提交
8106
    if (!dc->addseg && (dc->vm86 || !dc->pe || !dc->code32))
8107 8108 8109
        printf("ERROR addseg\n");
#endif

P
pbrook 已提交
8110 8111 8112 8113 8114 8115 8116 8117 8118 8119 8120
    cpu_T[0] = tcg_temp_new();
    cpu_T[1] = tcg_temp_new();
    cpu_A0 = tcg_temp_new();

    cpu_tmp0 = tcg_temp_new();
    cpu_tmp1_i64 = tcg_temp_new_i64();
    cpu_tmp2_i32 = tcg_temp_new_i32();
    cpu_tmp3_i32 = tcg_temp_new_i32();
    cpu_tmp4 = tcg_temp_new();
    cpu_ptr0 = tcg_temp_new_ptr();
    cpu_ptr1 = tcg_temp_new_ptr();
8121
    cpu_cc_srcT = tcg_temp_local_new();
B
bellard 已提交
8122

8123
    gen_opc_end = tcg_ctx.gen_opc_buf + OPC_MAX_SIZE;
B
bellard 已提交
8124 8125 8126 8127

    dc->is_jmp = DISAS_NEXT;
    pc_ptr = pc_start;
    lj = -1;
P
pbrook 已提交
8128 8129 8130 8131
    num_insns = 0;
    max_insns = tb->cflags & CF_COUNT_MASK;
    if (max_insns == 0)
        max_insns = CF_COUNT_MASK;
B
bellard 已提交
8132

8133
    gen_tb_start();
B
bellard 已提交
8134
    for(;;) {
B
Blue Swirl 已提交
8135 8136
        if (unlikely(!QTAILQ_EMPTY(&env->breakpoints))) {
            QTAILQ_FOREACH(bp, &env->breakpoints, entry) {
J
Jan Kiszka 已提交
8137 8138
                if (bp->pc == pc_ptr &&
                    !((bp->flags & BP_CPU) && (tb->flags & HF_RF_MASK))) {
B
bellard 已提交
8139 8140 8141 8142 8143 8144
                    gen_debug(dc, pc_ptr - dc->cs_base);
                    break;
                }
            }
        }
        if (search_pc) {
8145
            j = tcg_ctx.gen_opc_ptr - tcg_ctx.gen_opc_buf;
B
bellard 已提交
8146 8147 8148
            if (lj < j) {
                lj++;
                while (lj < j)
8149
                    tcg_ctx.gen_opc_instr_start[lj++] = 0;
B
bellard 已提交
8150
            }
8151
            tcg_ctx.gen_opc_pc[lj] = pc_ptr;
B
bellard 已提交
8152
            gen_opc_cc_op[lj] = dc->cc_op;
8153
            tcg_ctx.gen_opc_instr_start[lj] = 1;
8154
            tcg_ctx.gen_opc_icount[lj] = num_insns;
B
bellard 已提交
8155
        }
P
pbrook 已提交
8156 8157 8158
        if (num_insns + 1 == max_insns && (tb->cflags & CF_LAST_IO))
            gen_io_start();

8159
        pc_ptr = disas_insn(env, dc, pc_ptr);
P
pbrook 已提交
8160
        num_insns++;
B
bellard 已提交
8161 8162 8163 8164 8165
        /* stop translation if indicated */
        if (dc->is_jmp)
            break;
        /* if single step mode, we generate only one instruction and
           generate an exception */
8166 8167 8168
        /* if irq were inhibited with HF_INHIBIT_IRQ_MASK, we clear
           the flag and abort the translation to give the irqs a
           change to be happen */
8169
        if (dc->tf || dc->singlestep_enabled ||
P
pbrook 已提交
8170
            (flags & HF_INHIBIT_IRQ_MASK)) {
B
bellard 已提交
8171
            gen_jmp_im(pc_ptr - dc->cs_base);
B
bellard 已提交
8172 8173 8174 8175
            gen_eob(dc);
            break;
        }
        /* if too long translation, stop generation too */
8176
        if (tcg_ctx.gen_opc_ptr >= gen_opc_end ||
P
pbrook 已提交
8177 8178
            (pc_ptr - pc_start) >= (TARGET_PAGE_SIZE - 32) ||
            num_insns >= max_insns) {
B
bellard 已提交
8179
            gen_jmp_im(pc_ptr - dc->cs_base);
B
bellard 已提交
8180 8181 8182
            gen_eob(dc);
            break;
        }
8183 8184 8185 8186 8187
        if (singlestep) {
            gen_jmp_im(pc_ptr - dc->cs_base);
            gen_eob(dc);
            break;
        }
B
bellard 已提交
8188
    }
P
pbrook 已提交
8189 8190
    if (tb->cflags & CF_LAST_IO)
        gen_io_end();
8191
    gen_tb_end(tb, num_insns);
8192
    *tcg_ctx.gen_opc_ptr = INDEX_op_end;
B
bellard 已提交
8193 8194
    /* we don't forget to fill the last values */
    if (search_pc) {
8195
        j = tcg_ctx.gen_opc_ptr - tcg_ctx.gen_opc_buf;
B
bellard 已提交
8196 8197
        lj++;
        while (lj <= j)
8198
            tcg_ctx.gen_opc_instr_start[lj++] = 0;
B
bellard 已提交
8199
    }
8200

B
bellard 已提交
8201
#ifdef DEBUG_DISAS
8202
    if (qemu_loglevel_mask(CPU_LOG_TB_IN_ASM)) {
B
bellard 已提交
8203
        int disas_flags;
8204 8205
        qemu_log("----------------\n");
        qemu_log("IN: %s\n", lookup_symbol(pc_start));
B
bellard 已提交
8206 8207 8208 8209 8210 8211
#ifdef TARGET_X86_64
        if (dc->code64)
            disas_flags = 2;
        else
#endif
            disas_flags = !dc->code32;
B
Blue Swirl 已提交
8212
        log_target_disas(env, pc_start, pc_ptr - pc_start, disas_flags);
8213
        qemu_log("\n");
B
bellard 已提交
8214 8215 8216
    }
#endif

P
pbrook 已提交
8217
    if (!search_pc) {
B
bellard 已提交
8218
        tb->size = pc_ptr - pc_start;
P
pbrook 已提交
8219 8220
        tb->icount = num_insns;
    }
B
bellard 已提交
8221 8222
}

8223
void gen_intermediate_code(CPUX86State *env, TranslationBlock *tb)
B
bellard 已提交
8224
{
8225
    gen_intermediate_code_internal(x86_env_get_cpu(env), tb, false);
B
bellard 已提交
8226 8227
}

8228
void gen_intermediate_code_pc(CPUX86State *env, TranslationBlock *tb)
B
bellard 已提交
8229
{
8230
    gen_intermediate_code_internal(x86_env_get_cpu(env), tb, true);
B
bellard 已提交
8231 8232
}

8233
void restore_state_to_opc(CPUX86State *env, TranslationBlock *tb, int pc_pos)
A
aurel32 已提交
8234 8235 8236
{
    int cc_op;
#ifdef DEBUG_DISAS
8237
    if (qemu_loglevel_mask(CPU_LOG_TB_OP)) {
A
aurel32 已提交
8238
        int i;
8239
        qemu_log("RESTORE:\n");
A
aurel32 已提交
8240
        for(i = 0;i <= pc_pos; i++) {
8241
            if (tcg_ctx.gen_opc_instr_start[i]) {
8242 8243
                qemu_log("0x%04x: " TARGET_FMT_lx "\n", i,
                        tcg_ctx.gen_opc_pc[i]);
A
aurel32 已提交
8244 8245
            }
        }
8246
        qemu_log("pc_pos=0x%x eip=" TARGET_FMT_lx " cs_base=%x\n",
8247
                pc_pos, tcg_ctx.gen_opc_pc[pc_pos] - tb->cs_base,
A
aurel32 已提交
8248 8249 8250
                (uint32_t)tb->cs_base);
    }
#endif
8251
    env->eip = tcg_ctx.gen_opc_pc[pc_pos] - tb->cs_base;
A
aurel32 已提交
8252 8253 8254 8255
    cc_op = gen_opc_cc_op[pc_pos];
    if (cc_op != CC_OP_DYNAMIC)
        env->cc_op = cc_op;
}