translate.c 274.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
 */
#include <stdarg.h>
#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <inttypes.h>

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

31 32
#include "exec/helper-proto.h"
#include "exec/helper-gen.h"
P
pbrook 已提交
33

34 35 36
#include "trace-tcg.h"


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

B
bellard 已提交
44 45 46 47 48 49 50 51 52 53
#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

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

B
bellard 已提交
62 63 64
//#define MACRO_TEST   1

/* global register indexes */
P
pbrook 已提交
65
static TCGv_ptr cpu_env;
66
static TCGv cpu_A0;
67
static TCGv cpu_cc_dst, cpu_cc_src, cpu_cc_src2, cpu_cc_srcT;
P
pbrook 已提交
68
static TCGv_i32 cpu_cc_op;
69
static TCGv cpu_regs[CPU_NB_REGS];
70
/* local temps */
P
Paolo Bonzini 已提交
71
static TCGv cpu_T[2];
B
bellard 已提交
72
/* local register indexes (only used inside old micro ops) */
P
pbrook 已提交
73 74 75 76
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 已提交
77

78 79
static uint8_t gen_opc_cc_op[OPC_BUF_SIZE];

80
#include "exec/gen-icount.h"
P
pbrook 已提交
81

B
bellard 已提交
82 83
#ifdef TARGET_X86_64
static int x86_64_hregs;
B
bellard 已提交
84 85
#endif

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

static void gen_eob(DisasContext *s);
B
bellard 已提交
131 132
static void gen_jmp(DisasContext *s, target_ulong eip);
static void gen_jmp_tb(DisasContext *s, target_ulong eip, int tb_num);
133
static void gen_op(DisasContext *s1, int op, TCGMemOp ot, int d);
B
bellard 已提交
134 135 136

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

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

159 160 161 162 163 164 165 166 167 168 169
enum {
    JCC_O,
    JCC_B,
    JCC_Z,
    JCC_BE,
    JCC_S,
    JCC_P,
    JCC_L,
    JCC_LE,
};

B
bellard 已提交
170 171 172 173 174 175 176 177 178 179
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 已提交
180 181

    OR_TMP0 = 16,    /* temporary operand register */
B
bellard 已提交
182 183 184 185
    OR_TMP1,
    OR_A0, /* temporary register used when doing address evaluation */
};

186
enum {
187 188
    USES_CC_DST  = 1,
    USES_CC_SRC  = 2,
189 190
    USES_CC_SRC2 = 4,
    USES_CC_SRCT = 8,
191 192 193 194
};

/* Bit set if the global variable is live after setting CC_OP to X.  */
static const uint8_t cc_op_live[CC_OP_NB] = {
195
    [CC_OP_DYNAMIC] = USES_CC_DST | USES_CC_SRC | USES_CC_SRC2,
196 197 198
    [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,
199
    [CC_OP_ADCB ... CC_OP_ADCQ] = USES_CC_DST | USES_CC_SRC | USES_CC_SRC2,
200
    [CC_OP_SUBB ... CC_OP_SUBQ] = USES_CC_DST | USES_CC_SRC | USES_CC_SRCT,
201
    [CC_OP_SBBB ... CC_OP_SBBQ] = USES_CC_DST | USES_CC_SRC | USES_CC_SRC2,
202 203 204 205 206
    [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,
207
    [CC_OP_BMILGB ... CC_OP_BMILGQ] = USES_CC_DST | USES_CC_SRC,
208 209 210
    [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 已提交
211
    [CC_OP_CLR] = 0,
212 213
};

214
static void set_cc_op(DisasContext *s, CCOp op)
215
{
216 217 218 219 220 221 222 223 224 225
    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);
226
    }
227 228 229
    if (dead & USES_CC_SRC) {
        tcg_gen_discard_tl(cpu_cc_src);
    }
230 231 232
    if (dead & USES_CC_SRC2) {
        tcg_gen_discard_tl(cpu_cc_src2);
    }
233 234 235
    if (dead & USES_CC_SRCT) {
        tcg_gen_discard_tl(cpu_cc_srcT);
    }
236

237 238 239 240 241 242 243 244 245 246 247
    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;
    }
248
    s->cc_op = op;
249 250 251 252 253
}

static void gen_update_cc_op(DisasContext *s)
{
    if (s->cc_op_dirty) {
254
        tcg_gen_movi_i32(cpu_cc_op, s->cc_op);
255 256
        s->cc_op_dirty = false;
    }
257 258
}

B
bellard 已提交
259 260 261 262 263 264 265 266 267 268
#ifdef TARGET_X86_64

#define NB_OP_SIZES 4

#else /* !TARGET_X86_64 */

#define NB_OP_SIZES 3

#endif /* !TARGET_X86_64 */

269
#if defined(HOST_WORDS_BIGENDIAN)
B
bellard 已提交
270 271 272 273 274
#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 已提交
275
#else
B
bellard 已提交
276 277 278 279 280
#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 已提交
281
#endif
B
bellard 已提交
282

283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301
/* 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;
}

302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331 332 333 334 335
/* Select the size of a push/pop operation.  */
static inline TCGMemOp mo_pushpop(DisasContext *s, TCGMemOp ot)
{
    if (CODE64(s)) {
        return ot == MO_16 ? MO_16 : MO_64;
    } else {
        return ot;
    }
}

/* Select only size 64 else 32.  Used for SSE operand sizes.  */
static inline TCGMemOp mo_64_32(TCGMemOp ot)
{
#ifdef TARGET_X86_64
    return ot == MO_64 ? MO_64 : MO_32;
#else
    return MO_32;
#endif
}

/* Select size 8 if lsb of B is clear, else OT.  Used for decoding
   byte vs word opcodes.  */
static inline TCGMemOp mo_b_d(int b, TCGMemOp ot)
{
    return b & 1 ? ot : MO_8;
}

/* Select size 8 if lsb of B is clear, else OT capped at 32.
   Used for decoding operand size of port opcodes.  */
static inline TCGMemOp mo_b_d32(int b, TCGMemOp ot)
{
    return b & 1 ? (ot == MO_16 ? MO_16 : MO_32) : MO_8;
}

336
static void gen_op_mov_reg_v(TCGMemOp ot, int reg, TCGv t0)
B
bellard 已提交
337 338
{
    switch(ot) {
339
    case MO_8:
340
        if (!byte_reg_is_xH(reg)) {
341
            tcg_gen_deposit_tl(cpu_regs[reg], cpu_regs[reg], t0, 0, 8);
B
bellard 已提交
342
        } else {
343
            tcg_gen_deposit_tl(cpu_regs[reg - 4], cpu_regs[reg - 4], t0, 8, 8);
B
bellard 已提交
344 345
        }
        break;
346
    case MO_16:
347
        tcg_gen_deposit_tl(cpu_regs[reg], cpu_regs[reg], t0, 0, 16);
B
bellard 已提交
348
        break;
349
    case MO_32:
350 351 352
        /* 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 已提交
353
        break;
354
#ifdef TARGET_X86_64
355
    case MO_64:
356
        tcg_gen_mov_tl(cpu_regs[reg], t0);
B
bellard 已提交
357
        break;
B
bellard 已提交
358
#endif
359 360
    default:
        tcg_abort();
B
bellard 已提交
361 362
    }
}
B
bellard 已提交
363

364
static inline void gen_op_mov_v_reg(TCGMemOp ot, TCGv t0, int reg)
B
bellard 已提交
365
{
366
    if (ot == MO_8 && byte_reg_is_xH(reg)) {
367 368 369
        tcg_gen_shri_tl(t0, cpu_regs[reg - 4], 8);
        tcg_gen_ext8u_tl(t0, t0);
    } else {
370
        tcg_gen_mov_tl(t0, cpu_regs[reg]);
B
bellard 已提交
371 372 373 374 375
    }
}

static inline void gen_op_movl_A0_reg(int reg)
{
376
    tcg_gen_mov_tl(cpu_A0, cpu_regs[reg]);
B
bellard 已提交
377 378 379 380 381
}

static inline void gen_op_addl_A0_im(int32_t val)
{
    tcg_gen_addi_tl(cpu_A0, cpu_A0, val);
B
bellard 已提交
382
#ifdef TARGET_X86_64
B
bellard 已提交
383
    tcg_gen_andi_tl(cpu_A0, cpu_A0, 0xffffffff);
B
bellard 已提交
384
#endif
B
bellard 已提交
385
}
B
bellard 已提交
386

B
bellard 已提交
387
#ifdef TARGET_X86_64
B
bellard 已提交
388 389 390 391
static inline void gen_op_addq_A0_im(int64_t val)
{
    tcg_gen_addi_tl(cpu_A0, cpu_A0, val);
}
B
bellard 已提交
392
#endif
B
bellard 已提交
393 394 395 396 397 398 399 400 401 402
    
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 已提交
403

404
static inline void gen_op_jmp_v(TCGv dest)
B
bellard 已提交
405
{
406
    tcg_gen_st_tl(dest, cpu_env, offsetof(CPUX86State, eip));
B
bellard 已提交
407 408
}

409
static inline void gen_op_add_reg_im(TCGMemOp size, int reg, int32_t val)
B
bellard 已提交
410
{
411 412
    tcg_gen_addi_tl(cpu_tmp0, cpu_regs[reg], val);
    gen_op_mov_reg_v(size, reg, cpu_tmp0);
B
bellard 已提交
413 414
}

415
static inline void gen_op_add_reg_T0(TCGMemOp size, int reg)
B
bellard 已提交
416
{
417 418
    tcg_gen_add_tl(cpu_tmp0, cpu_regs[reg], cpu_T[0]);
    gen_op_mov_reg_v(size, reg, cpu_tmp0);
419
}
B
bellard 已提交
420 421 422

static inline void gen_op_addl_A0_reg_sN(int shift, int reg)
{
423 424
    tcg_gen_mov_tl(cpu_tmp0, cpu_regs[reg]);
    if (shift != 0)
B
bellard 已提交
425 426
        tcg_gen_shli_tl(cpu_tmp0, cpu_tmp0, shift);
    tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_tmp0);
427 428 429
    /* 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 已提交
430
}
B
bellard 已提交
431

B
bellard 已提交
432 433
static inline void gen_op_movl_A0_seg(int reg)
{
434
    tcg_gen_ld32u_tl(cpu_A0, cpu_env, offsetof(CPUX86State, segs[reg].base) + REG_L_OFFSET);
B
bellard 已提交
435
}
B
bellard 已提交
436

437
static inline void gen_op_addl_A0_seg(DisasContext *s, int reg)
B
bellard 已提交
438
{
439
    tcg_gen_ld_tl(cpu_tmp0, cpu_env, offsetof(CPUX86State, segs[reg].base));
B
bellard 已提交
440
#ifdef TARGET_X86_64
441 442 443 444 445 446 447 448 449
    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 已提交
450 451
#endif
}
B
bellard 已提交
452

B
bellard 已提交
453
#ifdef TARGET_X86_64
B
bellard 已提交
454 455
static inline void gen_op_movq_A0_seg(int reg)
{
456
    tcg_gen_ld_tl(cpu_A0, cpu_env, offsetof(CPUX86State, segs[reg].base));
B
bellard 已提交
457
}
B
bellard 已提交
458

B
bellard 已提交
459 460
static inline void gen_op_addq_A0_seg(int reg)
{
461
    tcg_gen_ld_tl(cpu_tmp0, cpu_env, offsetof(CPUX86State, segs[reg].base));
B
bellard 已提交
462 463 464 465 466
    tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_tmp0);
}

static inline void gen_op_movq_A0_reg(int reg)
{
467
    tcg_gen_mov_tl(cpu_A0, cpu_regs[reg]);
B
bellard 已提交
468 469 470 471
}

static inline void gen_op_addq_A0_reg_sN(int shift, int reg)
{
472 473
    tcg_gen_mov_tl(cpu_tmp0, cpu_regs[reg]);
    if (shift != 0)
B
bellard 已提交
474 475 476
        tcg_gen_shli_tl(cpu_tmp0, cpu_tmp0, shift);
    tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_tmp0);
}
B
bellard 已提交
477 478
#endif

479
static inline void gen_op_ld_v(DisasContext *s, int idx, TCGv t0, TCGv a0)
B
bellard 已提交
480
{
481
    tcg_gen_qemu_ld_tl(t0, a0, s->mem_index, idx | MO_LE);
B
bellard 已提交
482
}
B
bellard 已提交
483

484
static inline void gen_op_st_v(DisasContext *s, int idx, TCGv t0, TCGv a0)
B
bellard 已提交
485
{
486
    tcg_gen_qemu_st_tl(t0, a0, s->mem_index, idx | MO_LE);
B
bellard 已提交
487
}
488

489 490 491
static inline void gen_op_st_rm_T0_A0(DisasContext *s, int idx, int d)
{
    if (d == OR_TMP0) {
492
        gen_op_st_v(s, idx, cpu_T[0], cpu_A0);
493
    } else {
494
        gen_op_mov_reg_v(idx, d, cpu_T[0]);
495 496 497
    }
}

B
bellard 已提交
498 499
static inline void gen_jmp_im(target_ulong pc)
{
B
bellard 已提交
500
    tcg_gen_movi_tl(cpu_tmp0, pc);
501
    gen_op_jmp_v(cpu_tmp0);
B
bellard 已提交
502 503
}

B
bellard 已提交
504 505 506 507 508
static inline void gen_string_movl_A0_ESI(DisasContext *s)
{
    int override;

    override = s->override;
509
    switch (s->aflag) {
B
bellard 已提交
510
#ifdef TARGET_X86_64
511
    case MO_64:
B
bellard 已提交
512
        if (override >= 0) {
B
bellard 已提交
513 514
            gen_op_movq_A0_seg(override);
            gen_op_addq_A0_reg_sN(0, R_ESI);
B
bellard 已提交
515
        } else {
B
bellard 已提交
516
            gen_op_movq_A0_reg(R_ESI);
B
bellard 已提交
517
        }
518
        break;
B
bellard 已提交
519
#endif
520
    case MO_32:
B
bellard 已提交
521 522 523 524
        /* 32 bit address */
        if (s->addseg && override < 0)
            override = R_DS;
        if (override >= 0) {
B
bellard 已提交
525 526
            gen_op_movl_A0_seg(override);
            gen_op_addl_A0_reg_sN(0, R_ESI);
B
bellard 已提交
527
        } else {
B
bellard 已提交
528
            gen_op_movl_A0_reg(R_ESI);
B
bellard 已提交
529
        }
530 531
        break;
    case MO_16:
B
bellard 已提交
532 533 534
        /* 16 address, always override */
        if (override < 0)
            override = R_DS;
535
        tcg_gen_ext16u_tl(cpu_A0, cpu_regs[R_ESI]);
536
        gen_op_addl_A0_seg(s, override);
537 538 539
        break;
    default:
        tcg_abort();
B
bellard 已提交
540 541 542 543 544
    }
}

static inline void gen_string_movl_A0_EDI(DisasContext *s)
{
545
    switch (s->aflag) {
B
bellard 已提交
546
#ifdef TARGET_X86_64
547
    case MO_64:
B
bellard 已提交
548
        gen_op_movq_A0_reg(R_EDI);
549
        break;
B
bellard 已提交
550
#endif
551
    case MO_32:
B
bellard 已提交
552
        if (s->addseg) {
B
bellard 已提交
553 554
            gen_op_movl_A0_seg(R_ES);
            gen_op_addl_A0_reg_sN(0, R_EDI);
B
bellard 已提交
555
        } else {
B
bellard 已提交
556
            gen_op_movl_A0_reg(R_EDI);
B
bellard 已提交
557
        }
558 559
        break;
    case MO_16:
560
        tcg_gen_ext16u_tl(cpu_A0, cpu_regs[R_EDI]);
561
        gen_op_addl_A0_seg(s, R_ES);
562 563 564
        break;
    default:
        tcg_abort();
B
bellard 已提交
565 566 567
    }
}

568
static inline void gen_op_movl_T0_Dshift(TCGMemOp ot)
569
{
570
    tcg_gen_ld32s_tl(cpu_T[0], cpu_env, offsetof(CPUX86State, df));
571
    tcg_gen_shli_tl(cpu_T[0], cpu_T[0], ot);
B
bellard 已提交
572 573
};

574
static TCGv gen_ext_tl(TCGv dst, TCGv src, TCGMemOp size, bool sign)
575
{
576
    switch (size) {
577
    case MO_8:
578 579 580 581 582 583
        if (sign) {
            tcg_gen_ext8s_tl(dst, src);
        } else {
            tcg_gen_ext8u_tl(dst, src);
        }
        return dst;
584
    case MO_16:
585 586 587 588 589 590 591
        if (sign) {
            tcg_gen_ext16s_tl(dst, src);
        } else {
            tcg_gen_ext16u_tl(dst, src);
        }
        return dst;
#ifdef TARGET_X86_64
592
    case MO_32:
593 594 595 596 597 598 599
        if (sign) {
            tcg_gen_ext32s_tl(dst, src);
        } else {
            tcg_gen_ext32u_tl(dst, src);
        }
        return dst;
#endif
600
    default:
601
        return src;
602 603
    }
}
604

605
static void gen_extu(TCGMemOp ot, TCGv reg)
606 607 608 609
{
    gen_ext_tl(reg, reg, ot, false);
}

610
static void gen_exts(TCGMemOp ot, TCGv reg)
611
{
612
    gen_ext_tl(reg, reg, ot, true);
613
}
B
bellard 已提交
614

615
static inline void gen_op_jnz_ecx(TCGMemOp size, TCGLabel *label1)
616
{
617
    tcg_gen_mov_tl(cpu_tmp0, cpu_regs[R_ECX]);
618
    gen_extu(size, cpu_tmp0);
P
pbrook 已提交
619
    tcg_gen_brcondi_tl(TCG_COND_NE, cpu_tmp0, 0, label1);
620 621
}

622
static inline void gen_op_jz_ecx(TCGMemOp size, TCGLabel *label1)
623
{
624
    tcg_gen_mov_tl(cpu_tmp0, cpu_regs[R_ECX]);
625
    gen_extu(size, cpu_tmp0);
P
pbrook 已提交
626
    tcg_gen_brcondi_tl(TCG_COND_EQ, cpu_tmp0, 0, label1);
627
}
B
bellard 已提交
628

629
static void gen_helper_in_func(TCGMemOp ot, TCGv v, TCGv_i32 n)
P
pbrook 已提交
630 631
{
    switch (ot) {
632
    case MO_8:
633
        gen_helper_inb(v, cpu_env, n);
634
        break;
635
    case MO_16:
636
        gen_helper_inw(v, cpu_env, n);
637
        break;
638
    case MO_32:
639
        gen_helper_inl(v, cpu_env, n);
640
        break;
641 642
    default:
        tcg_abort();
P
pbrook 已提交
643 644
    }
}
B
bellard 已提交
645

646
static void gen_helper_out_func(TCGMemOp ot, TCGv_i32 v, TCGv_i32 n)
P
pbrook 已提交
647 648
{
    switch (ot) {
649
    case MO_8:
650
        gen_helper_outb(cpu_env, v, n);
651
        break;
652
    case MO_16:
653
        gen_helper_outw(cpu_env, v, n);
654
        break;
655
    case MO_32:
656
        gen_helper_outl(cpu_env, v, n);
657
        break;
658 659
    default:
        tcg_abort();
P
pbrook 已提交
660 661
    }
}
662

663
static void gen_check_io(DisasContext *s, TCGMemOp ot, target_ulong cur_eip,
664
                         uint32_t svm_flags)
665
{
666 667 668 669
    int state_saved;
    target_ulong next_eip;

    state_saved = 0;
670
    if (s->pe && (s->cpl > s->iopl || s->vm86)) {
671
        gen_update_cc_op(s);
B
bellard 已提交
672
        gen_jmp_im(cur_eip);
673
        state_saved = 1;
674
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
P
pbrook 已提交
675
        switch (ot) {
676
        case MO_8:
B
Blue Swirl 已提交
677 678
            gen_helper_check_iob(cpu_env, cpu_tmp2_i32);
            break;
679
        case MO_16:
B
Blue Swirl 已提交
680 681
            gen_helper_check_iow(cpu_env, cpu_tmp2_i32);
            break;
682
        case MO_32:
B
Blue Swirl 已提交
683 684
            gen_helper_check_iol(cpu_env, cpu_tmp2_i32);
            break;
685 686
        default:
            tcg_abort();
P
pbrook 已提交
687
        }
688
    }
B
bellard 已提交
689
    if(s->flags & HF_SVMI_MASK) {
690
        if (!state_saved) {
691
            gen_update_cc_op(s);
692 693 694 695
            gen_jmp_im(cur_eip);
        }
        svm_flags |= (1 << (4 + ot));
        next_eip = s->pc - s->cs_base;
696
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
B
Blue Swirl 已提交
697 698
        gen_helper_svm_check_io(cpu_env, cpu_tmp2_i32,
                                tcg_const_i32(svm_flags),
P
pbrook 已提交
699
                                tcg_const_i32(next_eip - cur_eip));
700 701 702
    }
}

703
static inline void gen_movs(DisasContext *s, TCGMemOp ot)
B
bellard 已提交
704 705
{
    gen_string_movl_A0_ESI(s);
706
    gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
707
    gen_string_movl_A0_EDI(s);
708
    gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
709
    gen_op_movl_T0_Dshift(ot);
710 711
    gen_op_add_reg_T0(s->aflag, R_ESI);
    gen_op_add_reg_T0(s->aflag, R_EDI);
B
bellard 已提交
712 713
}

714 715 716 717 718 719 720 721 722 723 724
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]);
}

725 726 727 728 729 730 731
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]);
}

732 733 734 735 736 737 738 739
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]);
740 741
    tcg_gen_neg_tl(cpu_cc_src, cpu_T[0]);
    tcg_gen_movi_tl(cpu_cc_srcT, 0);
742 743
}

744 745
/* compute all eflags to cc_src */
static void gen_compute_eflags(DisasContext *s)
746
{
747
    TCGv zero, dst, src1, src2;
748 749
    int live, dead;

750 751 752
    if (s->cc_op == CC_OP_EFLAGS) {
        return;
    }
R
Richard Henderson 已提交
753
    if (s->cc_op == CC_OP_CLR) {
754
        tcg_gen_movi_tl(cpu_cc_src, CC_Z | CC_P);
R
Richard Henderson 已提交
755 756 757
        set_cc_op(s, CC_OP_EFLAGS);
        return;
    }
758 759 760 761

    TCGV_UNUSED(zero);
    dst = cpu_cc_dst;
    src1 = cpu_cc_src;
762
    src2 = cpu_cc_src2;
763 764 765

    /* Take care to not read values that are not live.  */
    live = cc_op_live[s->cc_op] & ~USES_CC_SRCT;
766
    dead = live ^ (USES_CC_DST | USES_CC_SRC | USES_CC_SRC2);
767 768 769 770 771 772 773 774
    if (dead) {
        zero = tcg_const_tl(0);
        if (dead & USES_CC_DST) {
            dst = zero;
        }
        if (dead & USES_CC_SRC) {
            src1 = zero;
        }
775 776 777
        if (dead & USES_CC_SRC2) {
            src2 = zero;
        }
778 779
    }

780
    gen_update_cc_op(s);
781
    gen_helper_cc_compute_all(cpu_cc_src, dst, src1, src2, cpu_cc_op);
782
    set_cc_op(s, CC_OP_EFLAGS);
783 784 785 786

    if (dead) {
        tcg_temp_free(zero);
    }
787 788
}

789 790 791 792 793 794 795 796 797 798
typedef struct CCPrepare {
    TCGCond cond;
    TCGv reg;
    TCGv reg2;
    target_ulong imm;
    target_ulong mask;
    bool use_reg2;
    bool no_setcond;
} CCPrepare;

799
/* compute eflags.C to reg */
800
static CCPrepare gen_prepare_eflags_c(DisasContext *s, TCGv reg)
801 802
{
    TCGv t0, t1;
803
    int size, shift;
804 805 806

    switch (s->cc_op) {
    case CC_OP_SUBB ... CC_OP_SUBQ:
807
        /* (DATA_TYPE)CC_SRCT < (DATA_TYPE)CC_SRC */
808 809 810 811
        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;
812
        tcg_gen_mov_tl(t0, cpu_cc_srcT);
813 814 815 816 817 818 819 820 821
        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:
822 823
        return (CCPrepare) { .cond = TCG_COND_LTU, .reg = t0,
                             .reg2 = t1, .mask = -1, .use_reg2 = true };
824 825

    case CC_OP_LOGICB ... CC_OP_LOGICQ:
R
Richard Henderson 已提交
826
    case CC_OP_CLR:
827
        return (CCPrepare) { .cond = TCG_COND_NEVER, .mask = -1 };
828 829 830

    case CC_OP_INCB ... CC_OP_INCQ:
    case CC_OP_DECB ... CC_OP_DECQ:
831 832
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                             .mask = -1, .no_setcond = true };
833 834 835 836

    case CC_OP_SHLB ... CC_OP_SHLQ:
        /* (CC_SRC >> (DATA_BITS - 1)) & 1 */
        size = s->cc_op - CC_OP_SHLB;
837 838 839
        shift = (8 << size) - 1;
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                             .mask = (target_ulong)1 << shift };
840 841

    case CC_OP_MULB ... CC_OP_MULQ:
842 843
        return (CCPrepare) { .cond = TCG_COND_NE,
                             .reg = cpu_cc_src, .mask = -1 };
844

845 846 847 848 849
    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 };

850 851 852 853 854
    case CC_OP_ADCX:
    case CC_OP_ADCOX:
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_dst,
                             .mask = -1, .no_setcond = true };

855 856 857
    case CC_OP_EFLAGS:
    case CC_OP_SARB ... CC_OP_SARQ:
        /* CC_SRC & 1 */
858 859
        return (CCPrepare) { .cond = TCG_COND_NE,
                             .reg = cpu_cc_src, .mask = CC_C };
860 861 862 863 864

    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);
865 866
       gen_helper_cc_compute_c(reg, cpu_cc_dst, cpu_cc_src,
                               cpu_cc_src2, cpu_cc_op);
867 868
       return (CCPrepare) { .cond = TCG_COND_NE, .reg = reg,
                            .mask = -1, .no_setcond = true };
869 870 871
    }
}

872
/* compute eflags.P to reg */
873
static CCPrepare gen_prepare_eflags_p(DisasContext *s, TCGv reg)
874
{
875
    gen_compute_eflags(s);
876 877
    return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                         .mask = CC_P };
878 879 880
}

/* compute eflags.S to reg */
881
static CCPrepare gen_prepare_eflags_s(DisasContext *s, TCGv reg)
882
{
883 884 885 886 887
    switch (s->cc_op) {
    case CC_OP_DYNAMIC:
        gen_compute_eflags(s);
        /* FALLTHRU */
    case CC_OP_EFLAGS:
888 889 890
    case CC_OP_ADCX:
    case CC_OP_ADOX:
    case CC_OP_ADCOX:
891 892
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                             .mask = CC_S };
R
Richard Henderson 已提交
893 894
    case CC_OP_CLR:
        return (CCPrepare) { .cond = TCG_COND_NEVER, .mask = -1 };
895 896
    default:
        {
897
            TCGMemOp size = (s->cc_op - CC_OP_ADDB) & 3;
898
            TCGv t0 = gen_ext_tl(reg, cpu_cc_dst, size, true);
899
            return (CCPrepare) { .cond = TCG_COND_LT, .reg = t0, .mask = -1 };
900 901
        }
    }
902 903 904
}

/* compute eflags.O to reg */
905
static CCPrepare gen_prepare_eflags_o(DisasContext *s, TCGv reg)
906
{
907 908 909 910 911
    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 已提交
912 913
    case CC_OP_CLR:
        return (CCPrepare) { .cond = TCG_COND_NEVER, .mask = -1 };
914 915 916 917 918
    default:
        gen_compute_eflags(s);
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                             .mask = CC_O };
    }
919 920 921
}

/* compute eflags.Z to reg */
922
static CCPrepare gen_prepare_eflags_z(DisasContext *s, TCGv reg)
923
{
924 925 926 927 928
    switch (s->cc_op) {
    case CC_OP_DYNAMIC:
        gen_compute_eflags(s);
        /* FALLTHRU */
    case CC_OP_EFLAGS:
929 930 931
    case CC_OP_ADCX:
    case CC_OP_ADOX:
    case CC_OP_ADCOX:
932 933
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                             .mask = CC_Z };
R
Richard Henderson 已提交
934 935
    case CC_OP_CLR:
        return (CCPrepare) { .cond = TCG_COND_ALWAYS, .mask = -1 };
936 937
    default:
        {
938
            TCGMemOp size = (s->cc_op - CC_OP_ADDB) & 3;
939
            TCGv t0 = gen_ext_tl(reg, cpu_cc_dst, size, false);
940
            return (CCPrepare) { .cond = TCG_COND_EQ, .reg = t0, .mask = -1 };
941
        }
942 943 944
    }
}

945 946
/* perform a conditional store into register 'reg' according to jump opcode
   value 'b'. In the fast case, T0 is guaranted not to be used. */
947
static CCPrepare gen_prepare_cc(DisasContext *s, int b, TCGv reg)
948
{
949 950
    int inv, jcc_op, cond;
    TCGMemOp size;
951
    CCPrepare cc;
952 953 954
    TCGv t0;

    inv = b & 1;
955
    jcc_op = (b >> 1) & 7;
956 957

    switch (s->cc_op) {
958 959
    case CC_OP_SUBB ... CC_OP_SUBQ:
        /* We optimize relational operators for the cmp/jcc case.  */
960 961 962
        size = s->cc_op - CC_OP_SUBB;
        switch (jcc_op) {
        case JCC_BE:
963
            tcg_gen_mov_tl(cpu_tmp4, cpu_cc_srcT);
964 965
            gen_extu(size, cpu_tmp4);
            t0 = gen_ext_tl(cpu_tmp0, cpu_cc_src, size, false);
966 967
            cc = (CCPrepare) { .cond = TCG_COND_LEU, .reg = cpu_tmp4,
                               .reg2 = t0, .mask = -1, .use_reg2 = true };
968
            break;
969

970
        case JCC_L:
971
            cond = TCG_COND_LT;
972 973
            goto fast_jcc_l;
        case JCC_LE:
974
            cond = TCG_COND_LE;
975
        fast_jcc_l:
976
            tcg_gen_mov_tl(cpu_tmp4, cpu_cc_srcT);
977 978
            gen_exts(size, cpu_tmp4);
            t0 = gen_ext_tl(cpu_tmp0, cpu_cc_src, size, true);
979 980
            cc = (CCPrepare) { .cond = cond, .reg = cpu_tmp4,
                               .reg2 = t0, .mask = -1, .use_reg2 = true };
981
            break;
982

983
        default:
984
            goto slow_jcc;
985
        }
986
        break;
987

988 989
    default:
    slow_jcc:
990 991 992 993 994 995 996 997 998 999 1000 1001 1002 1003 1004 1005 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
        /* 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;
        }
1034
        break;
1035
    }
1036 1037 1038 1039 1040

    if (inv) {
        cc.cond = tcg_invert_cond(cc.cond);
    }
    return cc;
1041 1042
}

1043 1044 1045 1046 1047 1048 1049 1050 1051 1052 1053 1054 1055 1056 1057 1058 1059 1060 1061 1062 1063 1064 1065 1066 1067 1068 1069 1070 1071 1072 1073 1074 1075 1076
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);
}
1077

1078 1079
/* generate a conditional jump to label 'l1' according to jump opcode
   value 'b'. In the fast case, T0 is guaranted not to be used. */
1080
static inline void gen_jcc1_noeob(DisasContext *s, int b, TCGLabel *l1)
1081 1082 1083 1084 1085 1086 1087 1088 1089 1090 1091 1092 1093 1094 1095 1096 1097
{
    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.  */
1098
static inline void gen_jcc1(DisasContext *s, int b, TCGLabel *l1)
1099
{
1100
    CCPrepare cc = gen_prepare_cc(s, b, cpu_T[0]);
1101

1102
    gen_update_cc_op(s);
1103 1104 1105 1106
    if (cc.mask != -1) {
        tcg_gen_andi_tl(cpu_T[0], cc.reg, cc.mask);
        cc.reg = cpu_T[0];
    }
1107
    set_cc_op(s, CC_OP_DYNAMIC);
1108 1109 1110 1111
    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);
1112 1113 1114
    }
}

B
bellard 已提交
1115 1116
/* XXX: does not work with gdbstub "ice" single step - not a
   serious problem */
1117
static TCGLabel *gen_jz_ecx_string(DisasContext *s, target_ulong next_eip)
B
bellard 已提交
1118
{
1119 1120
    TCGLabel *l1 = gen_new_label();
    TCGLabel *l2 = gen_new_label();
1121
    gen_op_jnz_ecx(s->aflag, l1);
B
bellard 已提交
1122 1123 1124 1125
    gen_set_label(l2);
    gen_jmp_tb(s, next_eip, 1);
    gen_set_label(l1);
    return l2;
B
bellard 已提交
1126 1127
}

1128
static inline void gen_stos(DisasContext *s, TCGMemOp ot)
B
bellard 已提交
1129
{
1130
    gen_op_mov_v_reg(MO_32, cpu_T[0], R_EAX);
B
bellard 已提交
1131
    gen_string_movl_A0_EDI(s);
1132
    gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
1133
    gen_op_movl_T0_Dshift(ot);
1134
    gen_op_add_reg_T0(s->aflag, R_EDI);
B
bellard 已提交
1135 1136
}

1137
static inline void gen_lods(DisasContext *s, TCGMemOp ot)
B
bellard 已提交
1138 1139
{
    gen_string_movl_A0_ESI(s);
1140
    gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1141
    gen_op_mov_reg_v(ot, R_EAX, cpu_T[0]);
1142
    gen_op_movl_T0_Dshift(ot);
1143
    gen_op_add_reg_T0(s->aflag, R_ESI);
B
bellard 已提交
1144 1145
}

1146
static inline void gen_scas(DisasContext *s, TCGMemOp ot)
B
bellard 已提交
1147 1148
{
    gen_string_movl_A0_EDI(s);
1149
    gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
1150
    gen_op(s, OP_CMPL, ot, R_EAX);
1151
    gen_op_movl_T0_Dshift(ot);
1152
    gen_op_add_reg_T0(s->aflag, R_EDI);
B
bellard 已提交
1153 1154
}

1155
static inline void gen_cmps(DisasContext *s, TCGMemOp ot)
B
bellard 已提交
1156 1157
{
    gen_string_movl_A0_EDI(s);
1158
    gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
1159 1160
    gen_string_movl_A0_ESI(s);
    gen_op(s, OP_CMPL, ot, OR_TMP0);
1161
    gen_op_movl_T0_Dshift(ot);
1162 1163
    gen_op_add_reg_T0(s->aflag, R_ESI);
    gen_op_add_reg_T0(s->aflag, R_EDI);
B
bellard 已提交
1164 1165
}

1166
static inline void gen_ins(DisasContext *s, TCGMemOp ot)
B
bellard 已提交
1167
{
1168
    if (s->tb->cflags & CF_USE_ICOUNT) {
P
pbrook 已提交
1169
        gen_io_start();
1170
    }
B
bellard 已提交
1171
    gen_string_movl_A0_EDI(s);
1172 1173
    /* Note: we must do this dummy write first to be restartable in
       case of page fault. */
1174
    tcg_gen_movi_tl(cpu_T[0], 0);
1175
    gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
1176
    tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_regs[R_EDX]);
1177
    tcg_gen_andi_i32(cpu_tmp2_i32, cpu_tmp2_i32, 0xffff);
P
pbrook 已提交
1178
    gen_helper_in_func(ot, cpu_T[0], cpu_tmp2_i32);
1179
    gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
1180
    gen_op_movl_T0_Dshift(ot);
1181
    gen_op_add_reg_T0(s->aflag, R_EDI);
1182
    if (s->tb->cflags & CF_USE_ICOUNT) {
P
pbrook 已提交
1183
        gen_io_end();
1184
    }
B
bellard 已提交
1185 1186
}

1187
static inline void gen_outs(DisasContext *s, TCGMemOp ot)
B
bellard 已提交
1188
{
1189
    if (s->tb->cflags & CF_USE_ICOUNT) {
P
pbrook 已提交
1190
        gen_io_start();
1191
    }
B
bellard 已提交
1192
    gen_string_movl_A0_ESI(s);
1193
    gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1194

1195
    tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_regs[R_EDX]);
1196 1197
    tcg_gen_andi_i32(cpu_tmp2_i32, cpu_tmp2_i32, 0xffff);
    tcg_gen_trunc_tl_i32(cpu_tmp3_i32, cpu_T[0]);
P
pbrook 已提交
1198
    gen_helper_out_func(ot, cpu_tmp2_i32, cpu_tmp3_i32);
1199

1200
    gen_op_movl_T0_Dshift(ot);
1201
    gen_op_add_reg_T0(s->aflag, R_ESI);
1202
    if (s->tb->cflags & CF_USE_ICOUNT) {
P
pbrook 已提交
1203
        gen_io_end();
1204
    }
B
bellard 已提交
1205 1206 1207 1208 1209
}

/* same method as Valgrind : we generate jumps to current or next
   instruction */
#define GEN_REPZ(op)                                                          \
1210
static inline void gen_repz_ ## op(DisasContext *s, TCGMemOp ot,              \
B
bellard 已提交
1211
                                 target_ulong cur_eip, target_ulong next_eip) \
B
bellard 已提交
1212
{                                                                             \
1213
    TCGLabel *l2;                                                             \
B
bellard 已提交
1214
    gen_update_cc_op(s);                                                      \
B
bellard 已提交
1215
    l2 = gen_jz_ecx_string(s, next_eip);                                      \
B
bellard 已提交
1216
    gen_ ## op(s, ot);                                                        \
1217
    gen_op_add_reg_im(s->aflag, R_ECX, -1);                                   \
B
bellard 已提交
1218 1219
    /* a loop would cause two single step exceptions if ECX = 1               \
       before rep string_insn */                                              \
1220
    if (s->repz_opt)                                                          \
1221
        gen_op_jz_ecx(s->aflag, l2);                                          \
B
bellard 已提交
1222 1223 1224 1225
    gen_jmp(s, cur_eip);                                                      \
}

#define GEN_REPZ2(op)                                                         \
1226
static inline void gen_repz_ ## op(DisasContext *s, TCGMemOp ot,              \
B
bellard 已提交
1227 1228
                                   target_ulong cur_eip,                      \
                                   target_ulong next_eip,                     \
B
bellard 已提交
1229 1230
                                   int nz)                                    \
{                                                                             \
1231
    TCGLabel *l2;                                                             \
B
bellard 已提交
1232
    gen_update_cc_op(s);                                                      \
B
bellard 已提交
1233
    l2 = gen_jz_ecx_string(s, next_eip);                                      \
B
bellard 已提交
1234
    gen_ ## op(s, ot);                                                        \
1235
    gen_op_add_reg_im(s->aflag, R_ECX, -1);                                   \
1236
    gen_update_cc_op(s);                                                      \
1237
    gen_jcc1(s, (JCC_Z << 1) | (nz ^ 1), l2);                                 \
1238
    if (s->repz_opt)                                                          \
1239
        gen_op_jz_ecx(s->aflag, l2);                                          \
B
bellard 已提交
1240 1241 1242 1243 1244 1245 1246 1247 1248 1249 1250
    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 已提交
1251 1252 1253
static void gen_helper_fp_arith_ST0_FT0(int op)
{
    switch (op) {
B
Blue Swirl 已提交
1254 1255 1256 1257 1258 1259 1260 1261 1262 1263 1264 1265 1266 1267 1268 1269 1270 1271 1272 1273 1274 1275 1276 1277
    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 已提交
1278 1279
    }
}
B
bellard 已提交
1280 1281

/* NOTE the exception in "r" op ordering */
P
pbrook 已提交
1282 1283 1284 1285
static void gen_helper_fp_arith_STN_ST0(int op, int opreg)
{
    TCGv_i32 tmp = tcg_const_i32(opreg);
    switch (op) {
B
Blue Swirl 已提交
1286 1287 1288 1289 1290 1291 1292 1293 1294 1295 1296 1297 1298 1299 1300 1301 1302 1303
    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 已提交
1304 1305
    }
}
B
bellard 已提交
1306 1307

/* if d == OR_TMP0, it means memory operand (address in A0) */
1308
static void gen_op(DisasContext *s1, int op, TCGMemOp ot, int d)
B
bellard 已提交
1309 1310
{
    if (d != OR_TMP0) {
1311
        gen_op_mov_v_reg(ot, cpu_T[0], d);
B
bellard 已提交
1312
    } else {
1313
        gen_op_ld_v(s1, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
1314 1315 1316
    }
    switch(op) {
    case OP_ADCL:
1317
        gen_compute_eflags_c(s1, cpu_tmp4);
B
bellard 已提交
1318 1319
        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);
1320
        gen_op_st_rm_T0_A0(s1, ot, d);
1321 1322
        gen_op_update3_cc(cpu_tmp4);
        set_cc_op(s1, CC_OP_ADCB + ot);
B
bellard 已提交
1323
        break;
B
bellard 已提交
1324
    case OP_SBBL:
1325
        gen_compute_eflags_c(s1, cpu_tmp4);
B
bellard 已提交
1326 1327
        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);
1328
        gen_op_st_rm_T0_A0(s1, ot, d);
1329 1330
        gen_op_update3_cc(cpu_tmp4);
        set_cc_op(s1, CC_OP_SBBB + ot);
B
bellard 已提交
1331
        break;
B
bellard 已提交
1332
    case OP_ADDL:
1333
        tcg_gen_add_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1334
        gen_op_st_rm_T0_A0(s1, ot, d);
B
bellard 已提交
1335
        gen_op_update2_cc();
1336
        set_cc_op(s1, CC_OP_ADDB + ot);
B
bellard 已提交
1337 1338
        break;
    case OP_SUBL:
1339
        tcg_gen_mov_tl(cpu_cc_srcT, cpu_T[0]);
B
bellard 已提交
1340
        tcg_gen_sub_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1341
        gen_op_st_rm_T0_A0(s1, ot, d);
B
bellard 已提交
1342
        gen_op_update2_cc();
1343
        set_cc_op(s1, CC_OP_SUBB + ot);
B
bellard 已提交
1344 1345 1346
        break;
    default:
    case OP_ANDL:
B
bellard 已提交
1347
        tcg_gen_and_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1348
        gen_op_st_rm_T0_A0(s1, ot, d);
B
bellard 已提交
1349
        gen_op_update1_cc();
1350
        set_cc_op(s1, CC_OP_LOGICB + ot);
B
bellard 已提交
1351
        break;
B
bellard 已提交
1352
    case OP_ORL:
B
bellard 已提交
1353
        tcg_gen_or_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1354
        gen_op_st_rm_T0_A0(s1, ot, d);
B
bellard 已提交
1355
        gen_op_update1_cc();
1356
        set_cc_op(s1, CC_OP_LOGICB + ot);
B
bellard 已提交
1357
        break;
B
bellard 已提交
1358
    case OP_XORL:
B
bellard 已提交
1359
        tcg_gen_xor_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1360
        gen_op_st_rm_T0_A0(s1, ot, d);
B
bellard 已提交
1361
        gen_op_update1_cc();
1362
        set_cc_op(s1, CC_OP_LOGICB + ot);
B
bellard 已提交
1363 1364
        break;
    case OP_CMPL:
1365
        tcg_gen_mov_tl(cpu_cc_src, cpu_T[1]);
1366
        tcg_gen_mov_tl(cpu_cc_srcT, cpu_T[0]);
1367
        tcg_gen_sub_tl(cpu_cc_dst, cpu_T[0], cpu_T[1]);
1368
        set_cc_op(s1, CC_OP_SUBB + ot);
B
bellard 已提交
1369 1370
        break;
    }
1371 1372
}

B
bellard 已提交
1373
/* if d == OR_TMP0, it means memory operand (address in A0) */
1374
static void gen_inc(DisasContext *s1, TCGMemOp ot, int d, int c)
B
bellard 已提交
1375
{
1376
    if (d != OR_TMP0) {
1377
        gen_op_mov_v_reg(ot, cpu_T[0], d);
1378 1379 1380
    } else {
        gen_op_ld_v(s1, ot, cpu_T[0], cpu_A0);
    }
1381
    gen_compute_eflags_c(s1, cpu_cc_src);
B
bellard 已提交
1382
    if (c > 0) {
1383
        tcg_gen_addi_tl(cpu_T[0], cpu_T[0], 1);
1384
        set_cc_op(s1, CC_OP_INCB + ot);
B
bellard 已提交
1385
    } else {
1386
        tcg_gen_addi_tl(cpu_T[0], cpu_T[0], -1);
1387
        set_cc_op(s1, CC_OP_DECB + ot);
B
bellard 已提交
1388
    }
1389
    gen_op_st_rm_T0_A0(s1, ot, d);
B
bellard 已提交
1390
    tcg_gen_mov_tl(cpu_cc_dst, cpu_T[0]);
B
bellard 已提交
1391 1392
}

1393 1394
static void gen_shift_flags(DisasContext *s, TCGMemOp ot, TCGv result,
                            TCGv shm1, TCGv count, bool is_right)
1395 1396 1397 1398 1399 1400 1401 1402 1403 1404 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
{
    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);
}

1438
static void gen_shift_rm_T1(DisasContext *s, TCGMemOp ot, int op1,
1439
                            int is_right, int is_arith)
B
bellard 已提交
1440
{
1441
    target_ulong mask = (ot == MO_64 ? 0x3f : 0x1f);
1442

1443
    /* load */
1444
    if (op1 == OR_TMP0) {
1445
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1446
    } else {
1447
        gen_op_mov_v_reg(ot, cpu_T[0], op1);
1448
    }
1449

1450 1451
    tcg_gen_andi_tl(cpu_T[1], cpu_T[1], mask);
    tcg_gen_subi_tl(cpu_tmp0, cpu_T[1], 1);
1452 1453 1454

    if (is_right) {
        if (is_arith) {
B
bellard 已提交
1455
            gen_exts(ot, cpu_T[0]);
1456 1457
            tcg_gen_sar_tl(cpu_tmp0, cpu_T[0], cpu_tmp0);
            tcg_gen_sar_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1458
        } else {
B
bellard 已提交
1459
            gen_extu(ot, cpu_T[0]);
1460 1461
            tcg_gen_shr_tl(cpu_tmp0, cpu_T[0], cpu_tmp0);
            tcg_gen_shr_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1462 1463
        }
    } else {
1464 1465
        tcg_gen_shl_tl(cpu_tmp0, cpu_T[0], cpu_tmp0);
        tcg_gen_shl_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1466 1467 1468
    }

    /* store */
1469
    gen_op_st_rm_T0_A0(s, ot, op1);
1470

1471
    gen_shift_flags(s, ot, cpu_T[0], cpu_tmp0, cpu_T[1], is_right);
1472 1473
}

1474
static void gen_shift_rm_im(DisasContext *s, TCGMemOp ot, int op1, int op2,
B
bellard 已提交
1475 1476
                            int is_right, int is_arith)
{
1477
    int mask = (ot == MO_64 ? 0x3f : 0x1f);
B
bellard 已提交
1478 1479 1480

    /* load */
    if (op1 == OR_TMP0)
1481
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
1482
    else
1483
        gen_op_mov_v_reg(ot, cpu_T[0], op1);
B
bellard 已提交
1484 1485 1486 1487 1488 1489

    op2 &= mask;
    if (op2 != 0) {
        if (is_right) {
            if (is_arith) {
                gen_exts(ot, cpu_T[0]);
B
bellard 已提交
1490
                tcg_gen_sari_tl(cpu_tmp4, cpu_T[0], op2 - 1);
B
bellard 已提交
1491 1492 1493
                tcg_gen_sari_tl(cpu_T[0], cpu_T[0], op2);
            } else {
                gen_extu(ot, cpu_T[0]);
B
bellard 已提交
1494
                tcg_gen_shri_tl(cpu_tmp4, cpu_T[0], op2 - 1);
B
bellard 已提交
1495 1496 1497
                tcg_gen_shri_tl(cpu_T[0], cpu_T[0], op2);
            }
        } else {
B
bellard 已提交
1498
            tcg_gen_shli_tl(cpu_tmp4, cpu_T[0], op2 - 1);
B
bellard 已提交
1499 1500 1501 1502 1503
            tcg_gen_shli_tl(cpu_T[0], cpu_T[0], op2);
        }
    }

    /* store */
1504 1505
    gen_op_st_rm_T0_A0(s, ot, op1);

B
bellard 已提交
1506 1507
    /* update eflags if non zero shift */
    if (op2 != 0) {
B
bellard 已提交
1508
        tcg_gen_mov_tl(cpu_cc_src, cpu_tmp4);
B
bellard 已提交
1509
        tcg_gen_mov_tl(cpu_cc_dst, cpu_T[0]);
1510
        set_cc_op(s, (is_right ? CC_OP_SARB : CC_OP_SHLB) + ot);
B
bellard 已提交
1511 1512 1513
    }
}

1514
static void gen_rot_rm_T1(DisasContext *s, TCGMemOp ot, int op1, int is_right)
1515
{
1516
    target_ulong mask = (ot == MO_64 ? 0x3f : 0x1f);
1517
    TCGv_i32 t0, t1;
1518 1519

    /* load */
1520
    if (op1 == OR_TMP0) {
1521
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1522
    } else {
1523
        gen_op_mov_v_reg(ot, cpu_T[0], op1);
1524
    }
1525

1526
    tcg_gen_andi_tl(cpu_T[1], cpu_T[1], mask);
1527

1528
    switch (ot) {
1529
    case MO_8:
1530 1531 1532 1533
        /* 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;
1534
    case MO_16:
1535 1536 1537 1538 1539
        /* 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
1540
    case MO_32:
1541 1542 1543 1544 1545 1546 1547 1548 1549 1550 1551 1552 1553 1554 1555 1556 1557
        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;
1558 1559 1560
    }

    /* store */
1561
    gen_op_st_rm_T0_A0(s, ot, op1);
1562

1563 1564
    /* We'll need the flags computed into CC_SRC.  */
    gen_compute_eflags(s);
1565

1566 1567 1568 1569
    /* 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.  */
1570
    if (is_right) {
1571 1572
        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 已提交
1573
        tcg_gen_andi_tl(cpu_cc_dst, cpu_cc_dst, 1);
1574 1575 1576
    } else {
        tcg_gen_shri_tl(cpu_cc_src2, cpu_T[0], mask);
        tcg_gen_andi_tl(cpu_cc_dst, cpu_T[0], 1);
1577
    }
1578 1579 1580 1581 1582 1583 1584 1585 1586 1587 1588 1589 1590 1591 1592 1593 1594 1595 1596
    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);
1597 1598
}

1599
static void gen_rot_rm_im(DisasContext *s, TCGMemOp ot, int op1, int op2,
M
malc 已提交
1600 1601
                          int is_right)
{
1602
    int mask = (ot == MO_64 ? 0x3f : 0x1f);
1603
    int shift;
M
malc 已提交
1604 1605 1606

    /* load */
    if (op1 == OR_TMP0) {
1607
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
M
malc 已提交
1608
    } else {
1609
        gen_op_mov_v_reg(ot, cpu_T[0], op1);
M
malc 已提交
1610 1611 1612 1613
    }

    op2 &= mask;
    if (op2 != 0) {
1614 1615
        switch (ot) {
#ifdef TARGET_X86_64
1616
        case MO_32:
1617 1618 1619 1620 1621 1622 1623 1624 1625 1626 1627 1628 1629 1630 1631 1632
            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;
1633
        case MO_8:
1634 1635
            mask = 7;
            goto do_shifts;
1636
        case MO_16:
1637 1638 1639 1640 1641 1642 1643 1644 1645 1646 1647
            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 已提交
1648 1649 1650 1651
        }
    }

    /* store */
1652
    gen_op_st_rm_T0_A0(s, ot, op1);
M
malc 已提交
1653 1654

    if (op2 != 0) {
1655
        /* Compute the flags into CC_SRC.  */
1656
        gen_compute_eflags(s);
1657

1658 1659 1660 1661
        /* 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 已提交
1662
        if (is_right) {
1663 1664
            tcg_gen_shri_tl(cpu_cc_src2, cpu_T[0], mask - 1);
            tcg_gen_shri_tl(cpu_cc_dst, cpu_T[0], mask);
1665
            tcg_gen_andi_tl(cpu_cc_dst, cpu_cc_dst, 1);
1666 1667 1668
        } 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 已提交
1669
        }
1670 1671 1672
        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 已提交
1673 1674 1675
    }
}

1676
/* XXX: add faster immediate = 1 case */
1677
static void gen_rotc_rm_T1(DisasContext *s, TCGMemOp ot, int op1,
1678 1679
                           int is_right)
{
1680
    gen_compute_eflags(s);
1681
    assert(s->cc_op == CC_OP_EFLAGS);
1682 1683 1684

    /* load */
    if (op1 == OR_TMP0)
1685
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1686
    else
1687
        gen_op_mov_v_reg(ot, cpu_T[0], op1);
1688
    
P
pbrook 已提交
1689 1690
    if (is_right) {
        switch (ot) {
1691
        case MO_8:
1692 1693
            gen_helper_rcrb(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
1694
        case MO_16:
1695 1696
            gen_helper_rcrw(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
1697
        case MO_32:
1698 1699
            gen_helper_rcrl(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
P
pbrook 已提交
1700
#ifdef TARGET_X86_64
1701
        case MO_64:
1702 1703
            gen_helper_rcrq(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
P
pbrook 已提交
1704
#endif
1705 1706
        default:
            tcg_abort();
P
pbrook 已提交
1707 1708 1709
        }
    } else {
        switch (ot) {
1710
        case MO_8:
1711 1712
            gen_helper_rclb(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
1713
        case MO_16:
1714 1715
            gen_helper_rclw(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
1716
        case MO_32:
1717 1718
            gen_helper_rcll(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
P
pbrook 已提交
1719
#ifdef TARGET_X86_64
1720
        case MO_64:
1721 1722
            gen_helper_rclq(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
P
pbrook 已提交
1723
#endif
1724 1725
        default:
            tcg_abort();
P
pbrook 已提交
1726 1727
        }
    }
1728
    /* store */
1729
    gen_op_st_rm_T0_A0(s, ot, op1);
1730 1731 1732
}

/* XXX: add faster immediate case */
1733
static void gen_shiftd_rm_T1(DisasContext *s, TCGMemOp ot, int op1,
1734
                             bool is_right, TCGv count_in)
1735
{
1736
    target_ulong mask = (ot == MO_64 ? 63 : 31);
1737
    TCGv count;
1738 1739

    /* load */
1740
    if (op1 == OR_TMP0) {
1741
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1742
    } else {
1743
        gen_op_mov_v_reg(ot, cpu_T[0], op1);
1744
    }
1745

1746 1747
    count = tcg_temp_new();
    tcg_gen_andi_tl(count, count_in, mask);
1748

1749
    switch (ot) {
1750
    case MO_16:
1751 1752 1753
        /* 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.  */
1754
        if (is_right) {
1755 1756 1757
            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);
1758
        } else {
1759
            tcg_gen_deposit_tl(cpu_T[1], cpu_T[0], cpu_T[1], 16, 16);
1760
        }
1761 1762
        /* FALLTHRU */
#ifdef TARGET_X86_64
1763
    case MO_32:
1764 1765
        /* Concatenate the two 32-bit values and use a 64-bit shift.  */
        tcg_gen_subi_tl(cpu_tmp0, count, 1);
1766
        if (is_right) {
1767 1768 1769 1770 1771 1772 1773 1774 1775 1776 1777 1778 1779 1780 1781 1782
            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);
1783

1784 1785 1786
            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);
1787
        } else {
1788
            tcg_gen_shl_tl(cpu_tmp0, cpu_T[0], cpu_tmp0);
1789
            if (ot == MO_16) {
1790 1791 1792 1793 1794 1795 1796 1797 1798
                /* 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);
1799
        }
1800 1801 1802 1803 1804
        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;
1805 1806 1807
    }

    /* store */
1808
    gen_op_st_rm_T0_A0(s, ot, op1);
1809

1810 1811
    gen_shift_flags(s, ot, cpu_T[0], cpu_tmp0, count, is_right);
    tcg_temp_free(count);
1812 1813
}

1814
static void gen_shift(DisasContext *s1, int op, TCGMemOp ot, int d, int s)
1815 1816
{
    if (s != OR_TMP1)
1817
        gen_op_mov_v_reg(ot, cpu_T[1], s);
1818 1819 1820 1821 1822 1823 1824 1825 1826 1827 1828 1829 1830 1831 1832 1833 1834 1835 1836 1837 1838 1839 1840 1841
    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 已提交
1842 1843
}

1844
static void gen_shifti(DisasContext *s1, int op, TCGMemOp ot, int d, int c)
B
bellard 已提交
1845
{
B
bellard 已提交
1846
    switch(op) {
M
malc 已提交
1847 1848 1849 1850 1851 1852
    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 已提交
1853 1854 1855 1856 1857 1858 1859 1860 1861 1862 1863 1864
    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 */
1865
        tcg_gen_movi_tl(cpu_T[1], c);
B
bellard 已提交
1866 1867 1868
        gen_shift(s1, op, ot, d, OR_TMP1);
        break;
    }
B
bellard 已提交
1869 1870
}

1871
static void gen_lea_modrm(CPUX86State *env, DisasContext *s, int modrm)
B
bellard 已提交
1872
{
B
bellard 已提交
1873
    target_long disp;
B
bellard 已提交
1874
    int havesib;
B
bellard 已提交
1875
    int base;
B
bellard 已提交
1876 1877 1878
    int index;
    int scale;
    int mod, rm, code, override, must_add_seg;
1879
    TCGv sum;
B
bellard 已提交
1880 1881 1882 1883 1884 1885 1886 1887

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

1888 1889 1890
    switch (s->aflag) {
    case MO_64:
    case MO_32:
B
bellard 已提交
1891 1892
        havesib = 0;
        base = rm;
1893
        index = -1;
B
bellard 已提交
1894
        scale = 0;
1895

B
bellard 已提交
1896 1897
        if (base == 4) {
            havesib = 1;
1898
            code = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
1899
            scale = (code >> 6) & 3;
B
bellard 已提交
1900
            index = ((code >> 3) & 7) | REX_X(s);
1901 1902 1903
            if (index == 4) {
                index = -1;  /* no index */
            }
B
bellard 已提交
1904
            base = (code & 7);
B
bellard 已提交
1905
        }
B
bellard 已提交
1906
        base |= REX_B(s);
B
bellard 已提交
1907 1908 1909

        switch (mod) {
        case 0:
B
bellard 已提交
1910
            if ((base & 7) == 5) {
B
bellard 已提交
1911
                base = -1;
1912
                disp = (int32_t)cpu_ldl_code(env, s->pc);
B
bellard 已提交
1913
                s->pc += 4;
B
bellard 已提交
1914 1915 1916
                if (CODE64(s) && !havesib) {
                    disp += s->pc + s->rip_offset;
                }
B
bellard 已提交
1917 1918 1919 1920 1921
            } else {
                disp = 0;
            }
            break;
        case 1:
1922
            disp = (int8_t)cpu_ldub_code(env, s->pc++);
B
bellard 已提交
1923 1924 1925
            break;
        default:
        case 2:
1926
            disp = (int32_t)cpu_ldl_code(env, s->pc);
B
bellard 已提交
1927 1928 1929
            s->pc += 4;
            break;
        }
1930

1931 1932 1933 1934 1935 1936 1937 1938 1939 1940 1941 1942 1943
        /* 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 已提交
1944
            }
1945 1946 1947
            if (base >= 0) {
                tcg_gen_add_tl(cpu_A0, sum, cpu_regs[base]);
                sum = cpu_A0;
B
bellard 已提交
1948
            }
1949 1950
        } else if (base >= 0) {
            sum = cpu_regs[base];
B
bellard 已提交
1951
        }
1952 1953 1954 1955
        if (TCGV_IS_UNUSED(sum)) {
            tcg_gen_movi_tl(cpu_A0, disp);
        } else {
            tcg_gen_addi_tl(cpu_A0, sum, disp);
B
bellard 已提交
1956
        }
1957

B
bellard 已提交
1958 1959
        if (must_add_seg) {
            if (override < 0) {
1960
                if (base == R_EBP || base == R_ESP) {
B
bellard 已提交
1961
                    override = R_SS;
1962
                } else {
B
bellard 已提交
1963
                    override = R_DS;
1964
                }
B
bellard 已提交
1965
            }
1966 1967 1968 1969

            tcg_gen_ld_tl(cpu_tmp0, cpu_env,
                          offsetof(CPUX86State, segs[override].base));
            if (CODE64(s)) {
1970
                if (s->aflag == MO_32) {
1971 1972 1973
                    tcg_gen_ext32u_tl(cpu_A0, cpu_A0);
                }
                tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_tmp0);
1974
                return;
B
bellard 已提交
1975
            }
1976 1977 1978 1979

            tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_tmp0);
        }

1980
        if (s->aflag == MO_32) {
1981
            tcg_gen_ext32u_tl(cpu_A0, cpu_A0);
B
bellard 已提交
1982
        }
1983 1984 1985
        break;

    case MO_16:
B
bellard 已提交
1986 1987 1988
        switch (mod) {
        case 0:
            if (rm == 6) {
1989
                disp = cpu_lduw_code(env, s->pc);
B
bellard 已提交
1990
                s->pc += 2;
1991
                tcg_gen_movi_tl(cpu_A0, disp);
B
bellard 已提交
1992 1993 1994 1995 1996 1997 1998
                rm = 0; /* avoid SS override */
                goto no_rm;
            } else {
                disp = 0;
            }
            break;
        case 1:
1999
            disp = (int8_t)cpu_ldub_code(env, s->pc++);
B
bellard 已提交
2000 2001 2002
            break;
        default:
        case 2:
2003
            disp = (int16_t)cpu_lduw_code(env, s->pc);
B
bellard 已提交
2004 2005 2006
            s->pc += 2;
            break;
        }
2007 2008 2009

        sum = cpu_A0;
        switch (rm) {
B
bellard 已提交
2010
        case 0:
2011
            tcg_gen_add_tl(cpu_A0, cpu_regs[R_EBX], cpu_regs[R_ESI]);
B
bellard 已提交
2012 2013
            break;
        case 1:
2014
            tcg_gen_add_tl(cpu_A0, cpu_regs[R_EBX], cpu_regs[R_EDI]);
B
bellard 已提交
2015 2016
            break;
        case 2:
2017
            tcg_gen_add_tl(cpu_A0, cpu_regs[R_EBP], cpu_regs[R_ESI]);
B
bellard 已提交
2018 2019
            break;
        case 3:
2020
            tcg_gen_add_tl(cpu_A0, cpu_regs[R_EBP], cpu_regs[R_EDI]);
B
bellard 已提交
2021 2022
            break;
        case 4:
2023
            sum = cpu_regs[R_ESI];
B
bellard 已提交
2024 2025
            break;
        case 5:
2026
            sum = cpu_regs[R_EDI];
B
bellard 已提交
2027 2028
            break;
        case 6:
2029
            sum = cpu_regs[R_EBP];
B
bellard 已提交
2030 2031 2032
            break;
        default:
        case 7:
2033
            sum = cpu_regs[R_EBX];
B
bellard 已提交
2034 2035
            break;
        }
2036
        tcg_gen_addi_tl(cpu_A0, sum, disp);
2037
        tcg_gen_ext16u_tl(cpu_A0, cpu_A0);
B
bellard 已提交
2038 2039 2040
    no_rm:
        if (must_add_seg) {
            if (override < 0) {
2041
                if (rm == 2 || rm == 3 || rm == 6) {
B
bellard 已提交
2042
                    override = R_SS;
2043
                } else {
B
bellard 已提交
2044
                    override = R_DS;
2045
                }
B
bellard 已提交
2046
            }
2047
            gen_op_addl_A0_seg(s, override);
B
bellard 已提交
2048
        }
2049 2050 2051 2052
        break;

    default:
        tcg_abort();
B
bellard 已提交
2053 2054 2055
    }
}

2056
static void gen_nop_modrm(CPUX86State *env, DisasContext *s, int modrm)
B
bellard 已提交
2057 2058 2059 2060 2061 2062 2063 2064
{
    int mod, rm, base, code;

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

2065 2066 2067
    switch (s->aflag) {
    case MO_64:
    case MO_32:
B
bellard 已提交
2068
        base = rm;
2069

B
bellard 已提交
2070
        if (base == 4) {
2071
            code = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
2072 2073
            base = (code & 7);
        }
2074

B
bellard 已提交
2075 2076 2077 2078 2079 2080 2081 2082 2083 2084 2085 2086 2087 2088
        switch (mod) {
        case 0:
            if (base == 5) {
                s->pc += 4;
            }
            break;
        case 1:
            s->pc++;
            break;
        default:
        case 2:
            s->pc += 4;
            break;
        }
2089 2090 2091
        break;

    case MO_16:
B
bellard 已提交
2092 2093 2094 2095 2096 2097 2098 2099 2100 2101 2102 2103 2104 2105
        switch (mod) {
        case 0:
            if (rm == 6) {
                s->pc += 2;
            }
            break;
        case 1:
            s->pc++;
            break;
        default:
        case 2:
            s->pc += 2;
            break;
        }
2106 2107 2108 2109
        break;

    default:
        tcg_abort();
B
bellard 已提交
2110 2111 2112
    }
}

B
bellard 已提交
2113 2114 2115 2116 2117 2118 2119 2120 2121 2122 2123
/* 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) {
2124 2125
#ifdef TARGET_X86_64
        if (CODE64(s)) {
B
bellard 已提交
2126
            gen_op_addq_A0_seg(override);
2127
        } else
2128 2129
#endif
        {
2130
            gen_op_addl_A0_seg(s, override);
2131
        }
B
bellard 已提交
2132 2133 2134
    }
}

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

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

2168
static inline uint32_t insn_get(CPUX86State *env, DisasContext *s, TCGMemOp ot)
B
bellard 已提交
2169 2170 2171
{
    uint32_t ret;

2172
    switch (ot) {
2173
    case MO_8:
2174
        ret = cpu_ldub_code(env, s->pc);
B
bellard 已提交
2175 2176
        s->pc++;
        break;
2177
    case MO_16:
2178
        ret = cpu_lduw_code(env, s->pc);
B
bellard 已提交
2179 2180
        s->pc += 2;
        break;
2181
    case MO_32:
2182 2183 2184
#ifdef TARGET_X86_64
    case MO_64:
#endif
2185
        ret = cpu_ldl_code(env, s->pc);
B
bellard 已提交
2186 2187
        s->pc += 4;
        break;
2188 2189
    default:
        tcg_abort();
B
bellard 已提交
2190 2191 2192 2193
    }
    return ret;
}

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

2203 2204 2205 2206 2207 2208 2209 2210 2211 2212 2213
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 已提交
2214
        tcg_gen_goto_tb(tb_num);
2215
        gen_jmp_im(eip);
2216
        tcg_gen_exit_tb((uintptr_t)tb + tb_num);
2217 2218 2219 2220 2221 2222 2223
    } else {
        /* jump to another page: currently not optimized */
        gen_jmp_im(eip);
        gen_eob(s);
    }
}

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

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

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

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

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

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

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

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

2260 2261 2262 2263 2264 2265 2266 2267
    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);
2268 2269
    }

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

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

2282 2283 2284 2285 2286 2287 2288 2289 2290 2291 2292 2293 2294 2295 2296 2297
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 已提交
2298 2299
/* move T0 to seg_reg and compute if the CPU state may change. Never
   call this function with seg_reg == R_CS */
B
bellard 已提交
2300
static void gen_movl_seg_T0(DisasContext *s, int seg_reg, target_ulong cur_eip)
B
bellard 已提交
2301
{
2302 2303
    if (s->pe && !s->vm86) {
        /* XXX: optimize by finding processor state dynamically */
2304
        gen_update_cc_op(s);
B
bellard 已提交
2305
        gen_jmp_im(cur_eip);
2306
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
2307
        gen_helper_load_seg(cpu_env, tcg_const_i32(seg_reg), cpu_tmp2_i32);
B
bellard 已提交
2308 2309 2310 2311 2312
        /* 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 已提交
2313
            s->is_jmp = DISAS_TB_JUMP;
2314
    } else {
2315
        gen_op_movl_seg_T0_vm(seg_reg);
B
bellard 已提交
2316
        if (seg_reg == R_SS)
J
Jun Koi 已提交
2317
            s->is_jmp = DISAS_TB_JUMP;
2318
    }
B
bellard 已提交
2319 2320
}

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

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

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

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

2359 2360
/* Generate a push. It depends on ss32, addseg and dflag.  */
static void gen_push_v(DisasContext *s, TCGv val)
B
bellard 已提交
2361
{
2362 2363 2364 2365 2366
    TCGMemOp a_ot, d_ot = mo_pushpop(s, s->dflag);
    int size = 1 << d_ot;
    TCGv new_esp = cpu_A0;

    tcg_gen_subi_tl(cpu_A0, cpu_regs[R_ESP], size);
B
bellard 已提交
2367

B
bellard 已提交
2368
    if (CODE64(s)) {
2369 2370 2371 2372 2373 2374
        a_ot = MO_64;
    } else if (s->ss32) {
        a_ot = MO_32;
        if (s->addseg) {
            new_esp = cpu_tmp4;
            tcg_gen_mov_tl(new_esp, cpu_A0);
2375
            gen_op_addl_A0_seg(s, R_SS);
2376 2377
        } else {
            tcg_gen_ext32u_tl(cpu_A0, cpu_A0);
B
bellard 已提交
2378
        }
2379 2380 2381 2382 2383 2384
    } else {
        a_ot = MO_16;
        new_esp = cpu_tmp4;
        tcg_gen_ext16u_tl(cpu_A0, cpu_A0);
        tcg_gen_mov_tl(new_esp, cpu_A0);
        gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2385
    }
2386 2387 2388

    gen_op_st_v(s, d_ot, val, cpu_A0);
    gen_op_mov_reg_v(a_ot, R_ESP, new_esp);
B
bellard 已提交
2389 2390
}

2391
/* two step pop is necessary for precise exceptions */
2392
static TCGMemOp gen_pop_T0(DisasContext *s)
B
bellard 已提交
2393
{
2394 2395 2396
    TCGMemOp d_ot = mo_pushpop(s, s->dflag);
    TCGv addr = cpu_A0;

B
bellard 已提交
2397
    if (CODE64(s)) {
2398 2399 2400 2401 2402 2403 2404 2405 2406
        addr = cpu_regs[R_ESP];
    } else if (!s->ss32) {
        tcg_gen_ext16u_tl(cpu_A0, cpu_regs[R_ESP]);
        gen_op_addl_A0_seg(s, R_SS);
    } else if (s->addseg) {
        tcg_gen_mov_tl(cpu_A0, cpu_regs[R_ESP]);
        gen_op_addl_A0_seg(s, R_SS);
    } else {
        tcg_gen_ext32u_tl(cpu_A0, cpu_regs[R_ESP]);
B
bellard 已提交
2407
    }
2408 2409 2410

    gen_op_ld_v(s, d_ot, cpu_T[0], addr);
    return d_ot;
B
bellard 已提交
2411 2412
}

2413
static void gen_pop_update(DisasContext *s, TCGMemOp ot)
B
bellard 已提交
2414
{
2415
    gen_stack_update(s, 1 << ot);
B
bellard 已提交
2416 2417 2418 2419
}

static void gen_stack_A0(DisasContext *s)
{
B
bellard 已提交
2420
    gen_op_movl_A0_reg(R_ESP);
B
bellard 已提交
2421
    if (!s->ss32)
2422
        tcg_gen_ext16u_tl(cpu_A0, cpu_A0);
2423
    tcg_gen_mov_tl(cpu_T[1], cpu_A0);
B
bellard 已提交
2424
    if (s->addseg)
2425
        gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2426 2427 2428 2429 2430 2431
}

/* NOTE: wrap around in 16 bit not fully handled */
static void gen_pusha(DisasContext *s)
{
    int i;
B
bellard 已提交
2432
    gen_op_movl_A0_reg(R_ESP);
2433
    gen_op_addl_A0_im(-8 << s->dflag);
B
bellard 已提交
2434
    if (!s->ss32)
2435
        tcg_gen_ext16u_tl(cpu_A0, cpu_A0);
2436
    tcg_gen_mov_tl(cpu_T[1], cpu_A0);
B
bellard 已提交
2437
    if (s->addseg)
2438
        gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2439
    for(i = 0;i < 8; i++) {
2440
        gen_op_mov_v_reg(MO_32, cpu_T[0], 7 - i);
2441 2442
        gen_op_st_v(s, s->dflag, cpu_T[0], cpu_A0);
        gen_op_addl_A0_im(1 << s->dflag);
B
bellard 已提交
2443
    }
2444
    gen_op_mov_reg_v(MO_16 + s->ss32, R_ESP, cpu_T[1]);
B
bellard 已提交
2445 2446 2447 2448 2449 2450
}

/* NOTE: wrap around in 16 bit not fully handled */
static void gen_popa(DisasContext *s)
{
    int i;
B
bellard 已提交
2451
    gen_op_movl_A0_reg(R_ESP);
B
bellard 已提交
2452
    if (!s->ss32)
2453
        tcg_gen_ext16u_tl(cpu_A0, cpu_A0);
2454
    tcg_gen_mov_tl(cpu_T[1], cpu_A0);
2455
    tcg_gen_addi_tl(cpu_T[1], cpu_T[1], 8 << s->dflag);
B
bellard 已提交
2456
    if (s->addseg)
2457
        gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2458 2459 2460
    for(i = 0;i < 8; i++) {
        /* ESP is not reloaded */
        if (i != 3) {
2461
            gen_op_ld_v(s, s->dflag, cpu_T[0], cpu_A0);
2462
            gen_op_mov_reg_v(s->dflag, 7 - i, cpu_T[0]);
B
bellard 已提交
2463
        }
2464
        gen_op_addl_A0_im(1 << s->dflag);
B
bellard 已提交
2465
    }
2466
    gen_op_mov_reg_v(MO_16 + s->ss32, R_ESP, cpu_T[1]);
B
bellard 已提交
2467 2468 2469 2470
}

static void gen_enter(DisasContext *s, int esp_addend, int level)
{
2471 2472
    TCGMemOp ot = mo_pushpop(s, s->dflag);
    int opsize = 1 << ot;
B
bellard 已提交
2473 2474

    level &= 0x1f;
2475 2476
#ifdef TARGET_X86_64
    if (CODE64(s)) {
B
bellard 已提交
2477
        gen_op_movl_A0_reg(R_ESP);
2478
        gen_op_addq_A0_im(-opsize);
2479
        tcg_gen_mov_tl(cpu_T[1], cpu_A0);
2480 2481

        /* push bp */
2482
        gen_op_mov_v_reg(MO_32, cpu_T[0], R_EBP);
2483
        gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
2484
        if (level) {
B
bellard 已提交
2485
            /* XXX: must save state */
2486
            gen_helper_enter64_level(cpu_env, tcg_const_i32(level),
2487
                                     tcg_const_i32((ot == MO_64)),
P
pbrook 已提交
2488
                                     cpu_T[1]);
2489
        }
2490
        gen_op_mov_reg_v(ot, R_EBP, cpu_T[1]);
2491
        tcg_gen_addi_tl(cpu_T[1], cpu_T[1], -esp_addend + (-opsize * level));
2492
        gen_op_mov_reg_v(MO_64, R_ESP, cpu_T[1]);
2493
    } else
2494 2495
#endif
    {
B
bellard 已提交
2496
        gen_op_movl_A0_reg(R_ESP);
2497 2498
        gen_op_addl_A0_im(-opsize);
        if (!s->ss32)
2499
            tcg_gen_ext16u_tl(cpu_A0, cpu_A0);
2500
        tcg_gen_mov_tl(cpu_T[1], cpu_A0);
2501
        if (s->addseg)
2502
            gen_op_addl_A0_seg(s, R_SS);
2503
        /* push bp */
2504
        gen_op_mov_v_reg(MO_32, cpu_T[0], R_EBP);
2505
        gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
2506
        if (level) {
B
bellard 已提交
2507
            /* XXX: must save state */
2508
            gen_helper_enter_level(cpu_env, tcg_const_i32(level),
2509
                                   tcg_const_i32(s->dflag - 1),
P
pbrook 已提交
2510
                                   cpu_T[1]);
2511
        }
2512
        gen_op_mov_reg_v(ot, R_EBP, cpu_T[1]);
2513
        tcg_gen_addi_tl(cpu_T[1], cpu_T[1], -esp_addend + (-opsize * level));
2514
        gen_op_mov_reg_v(MO_16 + s->ss32, R_ESP, cpu_T[1]);
B
bellard 已提交
2515 2516 2517
    }
}

B
bellard 已提交
2518
static void gen_exception(DisasContext *s, int trapno, target_ulong cur_eip)
B
bellard 已提交
2519
{
2520
    gen_update_cc_op(s);
B
bellard 已提交
2521
    gen_jmp_im(cur_eip);
B
Blue Swirl 已提交
2522
    gen_helper_raise_exception(cpu_env, tcg_const_i32(trapno));
J
Jun Koi 已提交
2523
    s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2524 2525 2526
}

/* an interrupt is different from an exception because of the
B
blueswir1 已提交
2527
   privilege checks */
2528
static void gen_interrupt(DisasContext *s, int intno,
B
bellard 已提交
2529
                          target_ulong cur_eip, target_ulong next_eip)
B
bellard 已提交
2530
{
2531
    gen_update_cc_op(s);
B
bellard 已提交
2532
    gen_jmp_im(cur_eip);
B
Blue Swirl 已提交
2533
    gen_helper_raise_interrupt(cpu_env, tcg_const_i32(intno),
P
pbrook 已提交
2534
                               tcg_const_i32(next_eip - cur_eip));
J
Jun Koi 已提交
2535
    s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2536 2537
}

B
bellard 已提交
2538
static void gen_debug(DisasContext *s, target_ulong cur_eip)
B
bellard 已提交
2539
{
2540
    gen_update_cc_op(s);
B
bellard 已提交
2541
    gen_jmp_im(cur_eip);
B
Blue Swirl 已提交
2542
    gen_helper_debug(cpu_env);
J
Jun Koi 已提交
2543
    s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2544 2545 2546 2547 2548 2549
}

/* generate a generic end of block. Trace exception is also generated
   if needed */
static void gen_eob(DisasContext *s)
{
2550
    gen_update_cc_op(s);
2551
    if (s->tb->flags & HF_INHIBIT_IRQ_MASK) {
2552
        gen_helper_reset_inhibit_irq(cpu_env);
2553
    }
J
Jan Kiszka 已提交
2554
    if (s->tb->flags & HF_RF_MASK) {
2555
        gen_helper_reset_rf(cpu_env);
J
Jan Kiszka 已提交
2556
    }
2557
    if (s->singlestep_enabled) {
B
Blue Swirl 已提交
2558
        gen_helper_debug(cpu_env);
2559
    } else if (s->tf) {
B
Blue Swirl 已提交
2560
        gen_helper_single_step(cpu_env);
B
bellard 已提交
2561
    } else {
B
bellard 已提交
2562
        tcg_gen_exit_tb(0);
B
bellard 已提交
2563
    }
J
Jun Koi 已提交
2564
    s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2565 2566 2567 2568
}

/* generate a jump to eip. No segment change must happen before as a
   direct call to the next block may occur */
B
bellard 已提交
2569
static void gen_jmp_tb(DisasContext *s, target_ulong eip, int tb_num)
B
bellard 已提交
2570
{
2571 2572
    gen_update_cc_op(s);
    set_cc_op(s, CC_OP_DYNAMIC);
B
bellard 已提交
2573
    if (s->jmp_opt) {
2574
        gen_goto_tb(s, tb_num, eip);
J
Jun Koi 已提交
2575
        s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2576
    } else {
B
bellard 已提交
2577
        gen_jmp_im(eip);
B
bellard 已提交
2578 2579 2580 2581
        gen_eob(s);
    }
}

B
bellard 已提交
2582 2583 2584 2585 2586
static void gen_jmp(DisasContext *s, target_ulong eip)
{
    gen_jmp_tb(s, eip, 0);
}

2587
static inline void gen_ldq_env_A0(DisasContext *s, int offset)
B
bellard 已提交
2588
{
2589
    tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0, s->mem_index, MO_LEQ);
2590
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, offset);
B
bellard 已提交
2591
}
B
bellard 已提交
2592

2593
static inline void gen_stq_env_A0(DisasContext *s, int offset)
B
bellard 已提交
2594
{
2595
    tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env, offset);
2596
    tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0, s->mem_index, MO_LEQ);
B
bellard 已提交
2597
}
B
bellard 已提交
2598

2599
static inline void gen_ldo_env_A0(DisasContext *s, int offset)
B
bellard 已提交
2600
{
2601
    int mem_index = s->mem_index;
2602
    tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0, mem_index, MO_LEQ);
2603
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, offset + offsetof(XMMReg, XMM_Q(0)));
B
bellard 已提交
2604
    tcg_gen_addi_tl(cpu_tmp0, cpu_A0, 8);
2605
    tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_tmp0, mem_index, MO_LEQ);
2606
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, offset + offsetof(XMMReg, XMM_Q(1)));
B
bellard 已提交
2607
}
B
bellard 已提交
2608

2609
static inline void gen_sto_env_A0(DisasContext *s, int offset)
B
bellard 已提交
2610
{
2611
    int mem_index = s->mem_index;
2612
    tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env, offset + offsetof(XMMReg, XMM_Q(0)));
2613
    tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0, mem_index, MO_LEQ);
B
bellard 已提交
2614
    tcg_gen_addi_tl(cpu_tmp0, cpu_A0, 8);
2615
    tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env, offset + offsetof(XMMReg, XMM_Q(1)));
2616
    tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_tmp0, mem_index, MO_LEQ);
B
bellard 已提交
2617
}
B
bellard 已提交
2618

B
bellard 已提交
2619 2620
static inline void gen_op_movo(int d_offset, int s_offset)
{
2621 2622 2623 2624
    tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env, s_offset + offsetof(XMMReg, XMM_Q(0)));
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, d_offset + offsetof(XMMReg, XMM_Q(0)));
    tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env, s_offset + offsetof(XMMReg, XMM_Q(1)));
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, d_offset + offsetof(XMMReg, XMM_Q(1)));
B
bellard 已提交
2625 2626 2627 2628
}

static inline void gen_op_movq(int d_offset, int s_offset)
{
2629 2630
    tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env, s_offset);
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, d_offset);
B
bellard 已提交
2631 2632 2633 2634
}

static inline void gen_op_movl(int d_offset, int s_offset)
{
2635 2636
    tcg_gen_ld_i32(cpu_tmp2_i32, cpu_env, s_offset);
    tcg_gen_st_i32(cpu_tmp2_i32, cpu_env, d_offset);
B
bellard 已提交
2637 2638 2639 2640
}

static inline void gen_op_movq_env_0(int d_offset)
{
2641 2642
    tcg_gen_movi_i64(cpu_tmp1_i64, 0);
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, d_offset);
B
bellard 已提交
2643
}
B
bellard 已提交
2644

B
Blue Swirl 已提交
2645 2646 2647 2648 2649 2650 2651
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 已提交
2652
typedef void (*SSEFunc_0_ppi)(TCGv_ptr reg_a, TCGv_ptr reg_b, TCGv_i32 val);
B
Blue Swirl 已提交
2653 2654
typedef void (*SSEFunc_0_eppt)(TCGv_ptr env, TCGv_ptr reg_a, TCGv_ptr reg_b,
                               TCGv val);
B
Blue Swirl 已提交
2655

B
bellard 已提交
2656 2657
#define SSE_SPECIAL ((void *)1)
#define SSE_DUMMY ((void *)2)
B
bellard 已提交
2658

P
pbrook 已提交
2659 2660 2661
#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 已提交
2662

B
Blue Swirl 已提交
2663
static const SSEFunc_0_epp sse_op_table1[256][4] = {
A
aurel32 已提交
2664 2665 2666
    /* 3DNow! extensions */
    [0x0e] = { SSE_DUMMY }, /* femms */
    [0x0f] = { SSE_DUMMY }, /* pf... */
B
bellard 已提交
2667 2668 2669
    /* 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 已提交
2670
    [0x12] = { SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL }, /* movlps, movlpd, movsldup, movddup */
B
bellard 已提交
2671
    [0x13] = { SSE_SPECIAL, SSE_SPECIAL },  /* movlps, movlpd */
P
pbrook 已提交
2672 2673
    [0x14] = { gen_helper_punpckldq_xmm, gen_helper_punpcklqdq_xmm },
    [0x15] = { gen_helper_punpckhdq_xmm, gen_helper_punpckhqdq_xmm },
B
bellard 已提交
2674 2675 2676 2677 2678 2679
    [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 */
2680
    [0x2b] = { SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL }, /* movntps, movntpd, movntss, movntsd */
B
bellard 已提交
2681 2682
    [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 已提交
2683 2684
    [0x2e] = { gen_helper_ucomiss, gen_helper_ucomisd },
    [0x2f] = { gen_helper_comiss, gen_helper_comisd },
B
bellard 已提交
2685 2686
    [0x50] = { SSE_SPECIAL, SSE_SPECIAL }, /* movmskps, movmskpd */
    [0x51] = SSE_FOP(sqrt),
P
pbrook 已提交
2687 2688 2689 2690 2691 2692
    [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 已提交
2693 2694
    [0x58] = SSE_FOP(add),
    [0x59] = SSE_FOP(mul),
P
pbrook 已提交
2695 2696 2697
    [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 已提交
2698 2699 2700 2701 2702 2703
    [0x5c] = SSE_FOP(sub),
    [0x5d] = SSE_FOP(min),
    [0x5e] = SSE_FOP(div),
    [0x5f] = SSE_FOP(max),

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

R
Richard Henderson 已提交
2707 2708 2709
    /* 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 已提交
2710

B
bellard 已提交
2711 2712 2713 2714 2715 2716 2717 2718 2719 2720 2721 2722 2723
    /* 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 已提交
2724 2725
    [0x6c] = { NULL, gen_helper_punpcklqdq_xmm },
    [0x6d] = { NULL, gen_helper_punpckhqdq_xmm },
B
bellard 已提交
2726 2727
    [0x6e] = { SSE_SPECIAL, SSE_SPECIAL }, /* movd mm, ea */
    [0x6f] = { SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL }, /* movq, movdqa, , movqdu */
B
Blue Swirl 已提交
2728 2729 2730 2731
    [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 已提交
2732 2733 2734 2735 2736 2737
    [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 已提交
2738
    [0x77] = { SSE_DUMMY }, /* emms */
2739 2740
    [0x78] = { NULL, SSE_SPECIAL, NULL, SSE_SPECIAL }, /* extrq_i, insertq_i */
    [0x79] = { NULL, gen_helper_extrq_r, NULL, gen_helper_insertq_r },
P
pbrook 已提交
2741 2742
    [0x7c] = { NULL, gen_helper_haddpd, NULL, gen_helper_haddps },
    [0x7d] = { NULL, gen_helper_hsubpd, NULL, gen_helper_hsubps },
B
bellard 已提交
2743 2744 2745 2746
    [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 已提交
2747
    [0xd0] = { NULL, gen_helper_addsubpd, NULL, gen_helper_addsubps },
B
bellard 已提交
2748 2749 2750 2751 2752 2753 2754 2755 2756 2757 2758 2759 2760 2761 2762 2763 2764 2765 2766 2767 2768
    [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 已提交
2769
    [0xe6] = { NULL, gen_helper_cvttpd2dq, gen_helper_cvtdq2pd, gen_helper_cvtpd2dq },
B
bellard 已提交
2770 2771 2772 2773 2774 2775 2776 2777 2778
    [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 已提交
2779
    [0xf0] = { NULL, NULL, NULL, SSE_SPECIAL }, /* lddqu */
B
bellard 已提交
2780 2781 2782 2783 2784 2785
    [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 已提交
2786 2787
    [0xf7] = { (SSEFunc_0_epp)gen_helper_maskmov_mmx,
               (SSEFunc_0_epp)gen_helper_maskmov_xmm }, /* XXX: casts */
B
bellard 已提交
2788 2789 2790 2791 2792 2793 2794 2795 2796
    [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 已提交
2797
static const SSEFunc_0_epp sse_op_table2[3 * 8][2] = {
B
bellard 已提交
2798 2799 2800 2801 2802 2803 2804
    [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 已提交
2805
    [16 + 3] = { NULL, gen_helper_psrldq_xmm },
B
bellard 已提交
2806
    [16 + 6] = MMX_OP2(psllq),
P
pbrook 已提交
2807
    [16 + 7] = { NULL, gen_helper_pslldq_xmm },
B
bellard 已提交
2808 2809
};

B
Blue Swirl 已提交
2810
static const SSEFunc_0_epi sse_op_table3ai[] = {
P
pbrook 已提交
2811
    gen_helper_cvtsi2ss,
2812
    gen_helper_cvtsi2sd
B
Blue Swirl 已提交
2813
};
P
pbrook 已提交
2814

2815
#ifdef TARGET_X86_64
B
Blue Swirl 已提交
2816
static const SSEFunc_0_epl sse_op_table3aq[] = {
2817 2818 2819 2820 2821
    gen_helper_cvtsq2ss,
    gen_helper_cvtsq2sd
};
#endif

B
Blue Swirl 已提交
2822
static const SSEFunc_i_ep sse_op_table3bi[] = {
P
pbrook 已提交
2823 2824
    gen_helper_cvttss2si,
    gen_helper_cvtss2si,
2825
    gen_helper_cvttsd2si,
2826
    gen_helper_cvtsd2si
B
bellard 已提交
2827
};
2828

2829
#ifdef TARGET_X86_64
B
Blue Swirl 已提交
2830
static const SSEFunc_l_ep sse_op_table3bq[] = {
2831 2832
    gen_helper_cvttss2sq,
    gen_helper_cvtss2sq,
2833
    gen_helper_cvttsd2sq,
2834 2835 2836 2837
    gen_helper_cvtsd2sq
};
#endif

B
Blue Swirl 已提交
2838
static const SSEFunc_0_epp sse_op_table4[8][4] = {
B
bellard 已提交
2839 2840 2841 2842 2843 2844 2845 2846 2847
    SSE_FOP(cmpeq),
    SSE_FOP(cmplt),
    SSE_FOP(cmple),
    SSE_FOP(cmpunord),
    SSE_FOP(cmpneq),
    SSE_FOP(cmpnlt),
    SSE_FOP(cmpnle),
    SSE_FOP(cmpord),
};
2848

B
Blue Swirl 已提交
2849
static const SSEFunc_0_epp sse_op_table5[256] = {
P
pbrook 已提交
2850 2851 2852 2853 2854 2855 2856 2857 2858 2859 2860 2861 2862 2863 2864 2865 2866 2867 2868 2869 2870 2871 2872 2873
    [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 已提交
2874 2875
};

B
Blue Swirl 已提交
2876 2877
struct SSEOpHelper_epp {
    SSEFunc_0_epp op[2];
B
Blue Swirl 已提交
2878 2879 2880
    uint32_t ext_mask;
};

B
Blue Swirl 已提交
2881 2882
struct SSEOpHelper_eppi {
    SSEFunc_0_eppi op[2];
B
Blue Swirl 已提交
2883
    uint32_t ext_mask;
B
balrog 已提交
2884
};
B
Blue Swirl 已提交
2885

B
balrog 已提交
2886
#define SSSE3_OP(x) { MMX_OP2(x), CPUID_EXT_SSSE3 }
P
pbrook 已提交
2887 2888
#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 已提交
2889
#define SSE41_SPECIAL { { NULL, SSE_SPECIAL }, CPUID_EXT_SSE41 }
2890 2891
#define PCLMULQDQ_OP(x) { { NULL, gen_helper_ ## x ## _xmm }, \
        CPUID_EXT_PCLMULQDQ }
2892
#define AESNI_OP(x) { { NULL, gen_helper_ ## x ## _xmm }, CPUID_EXT_AES }
B
Blue Swirl 已提交
2893

B
Blue Swirl 已提交
2894
static const struct SSEOpHelper_epp sse_op_table6[256] = {
B
balrog 已提交
2895 2896 2897 2898 2899 2900 2901 2902 2903 2904 2905 2906 2907 2908 2909 2910 2911 2912 2913 2914 2915 2916 2917 2918 2919 2920 2921 2922 2923 2924 2925 2926 2927 2928 2929 2930 2931 2932 2933 2934 2935 2936 2937 2938 2939 2940
    [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),
2941 2942 2943 2944 2945
    [0xdb] = AESNI_OP(aesimc),
    [0xdc] = AESNI_OP(aesenc),
    [0xdd] = AESNI_OP(aesenclast),
    [0xde] = AESNI_OP(aesdec),
    [0xdf] = AESNI_OP(aesdeclast),
B
balrog 已提交
2946 2947
};

B
Blue Swirl 已提交
2948
static const struct SSEOpHelper_eppi sse_op_table7[256] = {
B
balrog 已提交
2949 2950 2951 2952 2953 2954 2955 2956 2957 2958 2959 2960 2961 2962 2963 2964 2965 2966
    [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),
2967
    [0x44] = PCLMULQDQ_OP(pclmulqdq),
B
balrog 已提交
2968 2969 2970 2971
    [0x60] = SSE42_OP(pcmpestrm),
    [0x61] = SSE42_OP(pcmpestri),
    [0x62] = SSE42_OP(pcmpistrm),
    [0x63] = SSE42_OP(pcmpistri),
2972
    [0xdf] = AESNI_OP(aeskeygenassist),
B
balrog 已提交
2973 2974
};

2975 2976
static void gen_sse(CPUX86State *env, DisasContext *s, int b,
                    target_ulong pc_start, int rex_r)
B
bellard 已提交
2977
{
2978
    int b1, op1_offset, op2_offset, is_xmm, val;
2979
    int modrm, mod, rm, reg;
B
Blue Swirl 已提交
2980 2981
    SSEFunc_0_epp sse_fn_epp;
    SSEFunc_0_eppi sse_fn_eppi;
B
Blue Swirl 已提交
2982
    SSEFunc_0_ppi sse_fn_ppi;
B
Blue Swirl 已提交
2983
    SSEFunc_0_eppt sse_fn_eppt;
2984
    TCGMemOp ot;
B
bellard 已提交
2985 2986

    b &= 0xff;
2987
    if (s->prefix & PREFIX_DATA)
B
bellard 已提交
2988
        b1 = 1;
2989
    else if (s->prefix & PREFIX_REPZ)
B
bellard 已提交
2990
        b1 = 2;
2991
    else if (s->prefix & PREFIX_REPNZ)
B
bellard 已提交
2992 2993 2994
        b1 = 3;
    else
        b1 = 0;
B
Blue Swirl 已提交
2995 2996
    sse_fn_epp = sse_op_table1[b][b1];
    if (!sse_fn_epp) {
B
bellard 已提交
2997
        goto illegal_op;
B
Blue Swirl 已提交
2998
    }
A
aurel32 已提交
2999
    if ((b <= 0x5f && b >= 0x10) || b == 0xc6 || b == 0xc2) {
B
bellard 已提交
3000 3001 3002 3003 3004 3005 3006 3007 3008 3009 3010 3011 3012 3013 3014 3015 3016 3017 3018 3019
        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 已提交
3020 3021
        if ((b != 0x38 && b != 0x3a) || (s->prefix & PREFIX_DATA))
            goto illegal_op;
3022 3023 3024 3025
    if (b == 0x0e) {
        if (!(s->cpuid_ext2_features & CPUID_EXT2_3DNOW))
            goto illegal_op;
        /* femms */
B
Blue Swirl 已提交
3026
        gen_helper_emms(cpu_env);
3027 3028 3029 3030
        return;
    }
    if (b == 0x77) {
        /* emms */
B
Blue Swirl 已提交
3031
        gen_helper_emms(cpu_env);
B
bellard 已提交
3032 3033 3034 3035 3036
        return;
    }
    /* prepare MMX state (XXX: optimize by storing fptt and fptags in
       the static cpu state) */
    if (!is_xmm) {
B
Blue Swirl 已提交
3037
        gen_helper_enter_mmx(cpu_env);
B
bellard 已提交
3038 3039
    }

3040
    modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
3041 3042 3043 3044
    reg = ((modrm >> 3) & 7);
    if (is_xmm)
        reg |= rex_r;
    mod = (modrm >> 6) & 3;
B
Blue Swirl 已提交
3045
    if (sse_fn_epp == SSE_SPECIAL) {
B
bellard 已提交
3046 3047 3048
        b |= (b1 << 8);
        switch(b) {
        case 0x0e7: /* movntq */
3049
            if (mod == 3)
B
bellard 已提交
3050
                goto illegal_op;
3051
            gen_lea_modrm(env, s, modrm);
3052
            gen_stq_env_A0(s, offsetof(CPUX86State, fpregs[reg].mmx));
B
bellard 已提交
3053 3054 3055 3056
            break;
        case 0x1e7: /* movntdq */
        case 0x02b: /* movntps */
        case 0x12b: /* movntps */
3057 3058
            if (mod == 3)
                goto illegal_op;
3059
            gen_lea_modrm(env, s, modrm);
3060
            gen_sto_env_A0(s, offsetof(CPUX86State, xmm_regs[reg]));
3061
            break;
B
bellard 已提交
3062 3063
        case 0x3f0: /* lddqu */
            if (mod == 3)
B
bellard 已提交
3064
                goto illegal_op;
3065
            gen_lea_modrm(env, s, modrm);
3066
            gen_ldo_env_A0(s, offsetof(CPUX86State, xmm_regs[reg]));
B
bellard 已提交
3067
            break;
3068 3069 3070 3071
        case 0x22b: /* movntss */
        case 0x32b: /* movntsd */
            if (mod == 3)
                goto illegal_op;
3072
            gen_lea_modrm(env, s, modrm);
3073
            if (b1 & 1) {
3074 3075
                gen_stq_env_A0(s, offsetof(CPUX86State,
                                           xmm_regs[reg].XMM_Q(0)));
3076 3077 3078
            } else {
                tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,
                    xmm_regs[reg].XMM_L(0)));
3079
                gen_op_st_v(s, MO_32, cpu_T[0], cpu_A0);
3080 3081
            }
            break;
B
bellard 已提交
3082
        case 0x6e: /* movd mm, ea */
B
bellard 已提交
3083
#ifdef TARGET_X86_64
3084
            if (s->dflag == MO_64) {
3085
                gen_ldst_modrm(env, s, modrm, MO_64, OR_TMP0, 0);
B
bellard 已提交
3086
                tcg_gen_st_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,fpregs[reg].mmx));
3087
            } else
B
bellard 已提交
3088 3089
#endif
            {
3090
                gen_ldst_modrm(env, s, modrm, MO_32, OR_TMP0, 0);
B
bellard 已提交
3091 3092
                tcg_gen_addi_ptr(cpu_ptr0, cpu_env, 
                                 offsetof(CPUX86State,fpregs[reg].mmx));
P
pbrook 已提交
3093 3094
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
                gen_helper_movl_mm_T0_mmx(cpu_ptr0, cpu_tmp2_i32);
B
bellard 已提交
3095
            }
B
bellard 已提交
3096 3097
            break;
        case 0x16e: /* movd xmm, ea */
B
bellard 已提交
3098
#ifdef TARGET_X86_64
3099
            if (s->dflag == MO_64) {
3100
                gen_ldst_modrm(env, s, modrm, MO_64, OR_TMP0, 0);
B
bellard 已提交
3101 3102
                tcg_gen_addi_ptr(cpu_ptr0, cpu_env, 
                                 offsetof(CPUX86State,xmm_regs[reg]));
P
pbrook 已提交
3103
                gen_helper_movq_mm_T0_xmm(cpu_ptr0, cpu_T[0]);
3104
            } else
B
bellard 已提交
3105 3106
#endif
            {
3107
                gen_ldst_modrm(env, s, modrm, MO_32, OR_TMP0, 0);
B
bellard 已提交
3108 3109
                tcg_gen_addi_ptr(cpu_ptr0, cpu_env, 
                                 offsetof(CPUX86State,xmm_regs[reg]));
3110
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
P
pbrook 已提交
3111
                gen_helper_movl_mm_T0_xmm(cpu_ptr0, cpu_tmp2_i32);
B
bellard 已提交
3112
            }
B
bellard 已提交
3113 3114 3115
            break;
        case 0x6f: /* movq mm, ea */
            if (mod != 3) {
3116
                gen_lea_modrm(env, s, modrm);
3117
                gen_ldq_env_A0(s, offsetof(CPUX86State, fpregs[reg].mmx));
B
bellard 已提交
3118 3119
            } else {
                rm = (modrm & 7);
3120
                tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env,
B
bellard 已提交
3121
                               offsetof(CPUX86State,fpregs[rm].mmx));
3122
                tcg_gen_st_i64(cpu_tmp1_i64, cpu_env,
B
bellard 已提交
3123
                               offsetof(CPUX86State,fpregs[reg].mmx));
B
bellard 已提交
3124 3125 3126 3127 3128 3129 3130 3131 3132
            }
            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) {
3133
                gen_lea_modrm(env, s, modrm);
3134
                gen_ldo_env_A0(s, offsetof(CPUX86State, xmm_regs[reg]));
B
bellard 已提交
3135 3136 3137 3138 3139 3140 3141 3142
            } 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) {
3143
                gen_lea_modrm(env, s, modrm);
3144
                gen_op_ld_v(s, MO_32, cpu_T[0], cpu_A0);
B
bellard 已提交
3145
                tcg_gen_st32_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,xmm_regs[reg].XMM_L(0)));
3146
                tcg_gen_movi_tl(cpu_T[0], 0);
B
bellard 已提交
3147 3148 3149
                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 已提交
3150 3151 3152 3153 3154 3155 3156 3157
            } 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) {
3158
                gen_lea_modrm(env, s, modrm);
3159 3160
                gen_ldq_env_A0(s, offsetof(CPUX86State,
                                           xmm_regs[reg].XMM_Q(0)));
3161
                tcg_gen_movi_tl(cpu_T[0], 0);
B
bellard 已提交
3162 3163
                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 已提交
3164 3165 3166 3167 3168 3169 3170 3171 3172
            } 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) {
3173
                gen_lea_modrm(env, s, modrm);
3174 3175
                gen_ldq_env_A0(s, offsetof(CPUX86State,
                                           xmm_regs[reg].XMM_Q(0)));
B
bellard 已提交
3176 3177 3178 3179 3180 3181 3182
            } 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 已提交
3183 3184
        case 0x212: /* movsldup */
            if (mod != 3) {
3185
                gen_lea_modrm(env, s, modrm);
3186
                gen_ldo_env_A0(s, offsetof(CPUX86State, xmm_regs[reg]));
B
bellard 已提交
3187 3188 3189 3190 3191 3192 3193 3194 3195 3196 3197 3198 3199 3200
            } 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) {
3201
                gen_lea_modrm(env, s, modrm);
3202 3203
                gen_ldq_env_A0(s, offsetof(CPUX86State,
                                           xmm_regs[reg].XMM_Q(0)));
B
bellard 已提交
3204 3205 3206 3207 3208 3209
            } 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 已提交
3210
                        offsetof(CPUX86State,xmm_regs[reg].XMM_Q(0)));
B
bellard 已提交
3211
            break;
B
bellard 已提交
3212 3213 3214
        case 0x016: /* movhps */
        case 0x116: /* movhpd */
            if (mod != 3) {
3215
                gen_lea_modrm(env, s, modrm);
3216 3217
                gen_ldq_env_A0(s, offsetof(CPUX86State,
                                           xmm_regs[reg].XMM_Q(1)));
B
bellard 已提交
3218 3219 3220 3221 3222 3223 3224 3225 3226
            } 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) {
3227
                gen_lea_modrm(env, s, modrm);
3228
                gen_ldo_env_A0(s, offsetof(CPUX86State, xmm_regs[reg]));
B
bellard 已提交
3229 3230 3231 3232 3233 3234 3235 3236 3237 3238 3239 3240
            } 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;
3241 3242 3243 3244 3245 3246 3247
        case 0x178:
        case 0x378:
            {
                int bit_index, field_length;

                if (b1 == 1 && reg != 0)
                    goto illegal_op;
3248 3249
                field_length = cpu_ldub_code(env, s->pc++) & 0x3F;
                bit_index = cpu_ldub_code(env, s->pc++) & 0x3F;
3250 3251 3252
                tcg_gen_addi_ptr(cpu_ptr0, cpu_env,
                    offsetof(CPUX86State,xmm_regs[reg]));
                if (b1 == 1)
B
Blue Swirl 已提交
3253 3254 3255
                    gen_helper_extrq_i(cpu_env, cpu_ptr0,
                                       tcg_const_i32(bit_index),
                                       tcg_const_i32(field_length));
3256
                else
B
Blue Swirl 已提交
3257 3258 3259
                    gen_helper_insertq_i(cpu_env, cpu_ptr0,
                                         tcg_const_i32(bit_index),
                                         tcg_const_i32(field_length));
3260 3261
            }
            break;
B
bellard 已提交
3262
        case 0x7e: /* movd ea, mm */
B
bellard 已提交
3263
#ifdef TARGET_X86_64
3264
            if (s->dflag == MO_64) {
B
bellard 已提交
3265 3266
                tcg_gen_ld_i64(cpu_T[0], cpu_env, 
                               offsetof(CPUX86State,fpregs[reg].mmx));
3267
                gen_ldst_modrm(env, s, modrm, MO_64, OR_TMP0, 1);
3268
            } else
B
bellard 已提交
3269 3270
#endif
            {
B
bellard 已提交
3271 3272
                tcg_gen_ld32u_tl(cpu_T[0], cpu_env, 
                                 offsetof(CPUX86State,fpregs[reg].mmx.MMX_L(0)));
3273
                gen_ldst_modrm(env, s, modrm, MO_32, OR_TMP0, 1);
B
bellard 已提交
3274
            }
B
bellard 已提交
3275 3276
            break;
        case 0x17e: /* movd ea, xmm */
B
bellard 已提交
3277
#ifdef TARGET_X86_64
3278
            if (s->dflag == MO_64) {
B
bellard 已提交
3279 3280
                tcg_gen_ld_i64(cpu_T[0], cpu_env, 
                               offsetof(CPUX86State,xmm_regs[reg].XMM_Q(0)));
3281
                gen_ldst_modrm(env, s, modrm, MO_64, OR_TMP0, 1);
3282
            } else
B
bellard 已提交
3283 3284
#endif
            {
B
bellard 已提交
3285 3286
                tcg_gen_ld32u_tl(cpu_T[0], cpu_env, 
                                 offsetof(CPUX86State,xmm_regs[reg].XMM_L(0)));
3287
                gen_ldst_modrm(env, s, modrm, MO_32, OR_TMP0, 1);
B
bellard 已提交
3288
            }
B
bellard 已提交
3289 3290 3291
            break;
        case 0x27e: /* movq xmm, ea */
            if (mod != 3) {
3292
                gen_lea_modrm(env, s, modrm);
3293 3294
                gen_ldq_env_A0(s, offsetof(CPUX86State,
                                           xmm_regs[reg].XMM_Q(0)));
B
bellard 已提交
3295 3296 3297 3298 3299 3300 3301 3302 3303
            } 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) {
3304
                gen_lea_modrm(env, s, modrm);
3305
                gen_stq_env_A0(s, offsetof(CPUX86State, fpregs[reg].mmx));
B
bellard 已提交
3306 3307 3308 3309 3310 3311 3312 3313 3314 3315 3316 3317 3318
            } 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) {
3319
                gen_lea_modrm(env, s, modrm);
3320
                gen_sto_env_A0(s, offsetof(CPUX86State, xmm_regs[reg]));
B
bellard 已提交
3321 3322 3323 3324 3325 3326 3327 3328
            } 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) {
3329
                gen_lea_modrm(env, s, modrm);
B
bellard 已提交
3330
                tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,xmm_regs[reg].XMM_L(0)));
3331
                gen_op_st_v(s, MO_32, cpu_T[0], cpu_A0);
B
bellard 已提交
3332 3333 3334 3335 3336 3337 3338 3339
            } 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) {
3340
                gen_lea_modrm(env, s, modrm);
3341 3342
                gen_stq_env_A0(s, offsetof(CPUX86State,
                                           xmm_regs[reg].XMM_Q(0)));
B
bellard 已提交
3343 3344 3345 3346 3347 3348 3349 3350 3351
            } 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) {
3352
                gen_lea_modrm(env, s, modrm);
3353 3354
                gen_stq_env_A0(s, offsetof(CPUX86State,
                                           xmm_regs[reg].XMM_Q(0)));
B
bellard 已提交
3355 3356 3357 3358 3359 3360 3361
            } else {
                goto illegal_op;
            }
            break;
        case 0x017: /* movhps */
        case 0x117: /* movhpd */
            if (mod != 3) {
3362
                gen_lea_modrm(env, s, modrm);
3363 3364
                gen_stq_env_A0(s, offsetof(CPUX86State,
                                           xmm_regs[reg].XMM_Q(1)));
B
bellard 已提交
3365 3366 3367 3368 3369 3370 3371 3372 3373 3374
            } else {
                goto illegal_op;
            }
            break;
        case 0x71: /* shift mm, im */
        case 0x72:
        case 0x73:
        case 0x171: /* shift xmm, im */
        case 0x172:
        case 0x173:
3375 3376 3377
            if (b1 >= 2) {
	        goto illegal_op;
            }
3378
            val = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
3379
            if (is_xmm) {
3380
                tcg_gen_movi_tl(cpu_T[0], val);
B
bellard 已提交
3381
                tcg_gen_st32_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,xmm_t0.XMM_L(0)));
3382
                tcg_gen_movi_tl(cpu_T[0], 0);
B
bellard 已提交
3383
                tcg_gen_st32_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,xmm_t0.XMM_L(1)));
B
bellard 已提交
3384 3385
                op1_offset = offsetof(CPUX86State,xmm_t0);
            } else {
3386
                tcg_gen_movi_tl(cpu_T[0], val);
B
bellard 已提交
3387
                tcg_gen_st32_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,mmx_t0.MMX_L(0)));
3388
                tcg_gen_movi_tl(cpu_T[0], 0);
B
bellard 已提交
3389
                tcg_gen_st32_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,mmx_t0.MMX_L(1)));
B
bellard 已提交
3390 3391
                op1_offset = offsetof(CPUX86State,mmx_t0);
            }
B
Blue Swirl 已提交
3392 3393 3394
            sse_fn_epp = sse_op_table2[((b - 1) & 3) * 8 +
                                       (((modrm >> 3)) & 7)][b1];
            if (!sse_fn_epp) {
B
bellard 已提交
3395
                goto illegal_op;
B
Blue Swirl 已提交
3396
            }
B
bellard 已提交
3397 3398 3399 3400 3401 3402 3403
            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 已提交
3404 3405
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op2_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op1_offset);
B
Blue Swirl 已提交
3406
            sse_fn_epp(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
3407 3408 3409
            break;
        case 0x050: /* movmskps */
            rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
3410 3411
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, 
                             offsetof(CPUX86State,xmm_regs[rm]));
B
Blue Swirl 已提交
3412
            gen_helper_movmskps(cpu_tmp2_i32, cpu_env, cpu_ptr0);
3413
            tcg_gen_extu_i32_tl(cpu_regs[reg], cpu_tmp2_i32);
B
bellard 已提交
3414 3415 3416
            break;
        case 0x150: /* movmskpd */
            rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
3417 3418
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, 
                             offsetof(CPUX86State,xmm_regs[rm]));
B
Blue Swirl 已提交
3419
            gen_helper_movmskpd(cpu_tmp2_i32, cpu_env, cpu_ptr0);
3420
            tcg_gen_extu_i32_tl(cpu_regs[reg], cpu_tmp2_i32);
B
bellard 已提交
3421 3422 3423
            break;
        case 0x02a: /* cvtpi2ps */
        case 0x12a: /* cvtpi2pd */
B
Blue Swirl 已提交
3424
            gen_helper_enter_mmx(cpu_env);
B
bellard 已提交
3425
            if (mod != 3) {
3426
                gen_lea_modrm(env, s, modrm);
B
bellard 已提交
3427
                op2_offset = offsetof(CPUX86State,mmx_t0);
3428
                gen_ldq_env_A0(s, op2_offset);
B
bellard 已提交
3429 3430 3431 3432 3433
            } else {
                rm = (modrm & 7);
                op2_offset = offsetof(CPUX86State,fpregs[rm].mmx);
            }
            op1_offset = offsetof(CPUX86State,xmm_regs[reg]);
B
bellard 已提交
3434 3435
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
bellard 已提交
3436 3437
            switch(b >> 8) {
            case 0x0:
B
Blue Swirl 已提交
3438
                gen_helper_cvtpi2ps(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
3439 3440 3441
                break;
            default:
            case 0x1:
B
Blue Swirl 已提交
3442
                gen_helper_cvtpi2pd(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
3443 3444 3445 3446 3447
                break;
            }
            break;
        case 0x22a: /* cvtsi2ss */
        case 0x32a: /* cvtsi2sd */
3448
            ot = mo_64_32(s->dflag);
3449
            gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
B
bellard 已提交
3450
            op1_offset = offsetof(CPUX86State,xmm_regs[reg]);
B
bellard 已提交
3451
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
3452
            if (ot == MO_32) {
B
Blue Swirl 已提交
3453
                SSEFunc_0_epi sse_fn_epi = sse_op_table3ai[(b >> 8) & 1];
B
bellard 已提交
3454
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
B
Blue Swirl 已提交
3455
                sse_fn_epi(cpu_env, cpu_ptr0, cpu_tmp2_i32);
B
bellard 已提交
3456
            } else {
3457
#ifdef TARGET_X86_64
B
Blue Swirl 已提交
3458 3459
                SSEFunc_0_epl sse_fn_epl = sse_op_table3aq[(b >> 8) & 1];
                sse_fn_epl(cpu_env, cpu_ptr0, cpu_T[0]);
3460 3461 3462
#else
                goto illegal_op;
#endif
B
bellard 已提交
3463
            }
B
bellard 已提交
3464 3465 3466 3467 3468
            break;
        case 0x02c: /* cvttps2pi */
        case 0x12c: /* cvttpd2pi */
        case 0x02d: /* cvtps2pi */
        case 0x12d: /* cvtpd2pi */
B
Blue Swirl 已提交
3469
            gen_helper_enter_mmx(cpu_env);
B
bellard 已提交
3470
            if (mod != 3) {
3471
                gen_lea_modrm(env, s, modrm);
B
bellard 已提交
3472
                op2_offset = offsetof(CPUX86State,xmm_t0);
3473
                gen_ldo_env_A0(s, op2_offset);
B
bellard 已提交
3474 3475 3476 3477 3478
            } else {
                rm = (modrm & 7) | REX_B(s);
                op2_offset = offsetof(CPUX86State,xmm_regs[rm]);
            }
            op1_offset = offsetof(CPUX86State,fpregs[reg & 7].mmx);
B
bellard 已提交
3479 3480
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
bellard 已提交
3481 3482
            switch(b) {
            case 0x02c:
B
Blue Swirl 已提交
3483
                gen_helper_cvttps2pi(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
3484 3485
                break;
            case 0x12c:
B
Blue Swirl 已提交
3486
                gen_helper_cvttpd2pi(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
3487 3488
                break;
            case 0x02d:
B
Blue Swirl 已提交
3489
                gen_helper_cvtps2pi(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
3490 3491
                break;
            case 0x12d:
B
Blue Swirl 已提交
3492
                gen_helper_cvtpd2pi(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
3493 3494 3495 3496 3497 3498 3499
                break;
            }
            break;
        case 0x22c: /* cvttss2si */
        case 0x32c: /* cvttsd2si */
        case 0x22d: /* cvtss2si */
        case 0x32d: /* cvtsd2si */
3500
            ot = mo_64_32(s->dflag);
B
bellard 已提交
3501
            if (mod != 3) {
3502
                gen_lea_modrm(env, s, modrm);
B
bellard 已提交
3503
                if ((b >> 8) & 1) {
3504
                    gen_ldq_env_A0(s, offsetof(CPUX86State, xmm_t0.XMM_Q(0)));
B
bellard 已提交
3505
                } else {
3506
                    gen_op_ld_v(s, MO_32, cpu_T[0], cpu_A0);
B
bellard 已提交
3507
                    tcg_gen_st32_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,xmm_t0.XMM_L(0)));
B
bellard 已提交
3508 3509 3510 3511 3512 3513
                }
                op2_offset = offsetof(CPUX86State,xmm_t0);
            } else {
                rm = (modrm & 7) | REX_B(s);
                op2_offset = offsetof(CPUX86State,xmm_regs[rm]);
            }
B
bellard 已提交
3514
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op2_offset);
3515
            if (ot == MO_32) {
B
Blue Swirl 已提交
3516
                SSEFunc_i_ep sse_fn_i_ep =
3517
                    sse_op_table3bi[((b >> 7) & 2) | (b & 1)];
B
Blue Swirl 已提交
3518
                sse_fn_i_ep(cpu_tmp2_i32, cpu_env, cpu_ptr0);
3519
                tcg_gen_extu_i32_tl(cpu_T[0], cpu_tmp2_i32);
B
bellard 已提交
3520
            } else {
3521
#ifdef TARGET_X86_64
B
Blue Swirl 已提交
3522
                SSEFunc_l_ep sse_fn_l_ep =
3523
                    sse_op_table3bq[((b >> 7) & 2) | (b & 1)];
B
Blue Swirl 已提交
3524
                sse_fn_l_ep(cpu_T[0], cpu_env, cpu_ptr0);
3525 3526 3527
#else
                goto illegal_op;
#endif
B
bellard 已提交
3528
            }
3529
            gen_op_mov_reg_v(ot, reg, cpu_T[0]);
B
bellard 已提交
3530 3531
            break;
        case 0xc4: /* pinsrw */
3532
        case 0x1c4:
B
bellard 已提交
3533
            s->rip_offset = 1;
3534
            gen_ldst_modrm(env, s, modrm, MO_16, OR_TMP0, 0);
3535
            val = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
3536 3537
            if (b1) {
                val &= 7;
B
bellard 已提交
3538 3539
                tcg_gen_st16_tl(cpu_T[0], cpu_env,
                                offsetof(CPUX86State,xmm_regs[reg].XMM_W(val)));
B
bellard 已提交
3540 3541
            } else {
                val &= 3;
B
bellard 已提交
3542 3543
                tcg_gen_st16_tl(cpu_T[0], cpu_env,
                                offsetof(CPUX86State,fpregs[reg].mmx.MMX_W(val)));
B
bellard 已提交
3544 3545 3546
            }
            break;
        case 0xc5: /* pextrw */
3547
        case 0x1c5:
B
bellard 已提交
3548 3549
            if (mod != 3)
                goto illegal_op;
3550
            ot = mo_64_32(s->dflag);
3551
            val = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
3552 3553 3554
            if (b1) {
                val &= 7;
                rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
3555 3556
                tcg_gen_ld16u_tl(cpu_T[0], cpu_env,
                                 offsetof(CPUX86State,xmm_regs[rm].XMM_W(val)));
B
bellard 已提交
3557 3558 3559
            } else {
                val &= 3;
                rm = (modrm & 7);
B
bellard 已提交
3560 3561
                tcg_gen_ld16u_tl(cpu_T[0], cpu_env,
                                offsetof(CPUX86State,fpregs[rm].mmx.MMX_W(val)));
B
bellard 已提交
3562 3563
            }
            reg = ((modrm >> 3) & 7) | rex_r;
3564
            gen_op_mov_reg_v(ot, reg, cpu_T[0]);
B
bellard 已提交
3565 3566 3567
            break;
        case 0x1d6: /* movq ea, xmm */
            if (mod != 3) {
3568
                gen_lea_modrm(env, s, modrm);
3569 3570
                gen_stq_env_A0(s, offsetof(CPUX86State,
                                           xmm_regs[reg].XMM_Q(0)));
B
bellard 已提交
3571 3572 3573 3574 3575 3576 3577 3578
            } 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 已提交
3579
            gen_helper_enter_mmx(cpu_env);
3580 3581 3582 3583
            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 已提交
3584 3585
            break;
        case 0x3d6: /* movdq2q */
B
Blue Swirl 已提交
3586
            gen_helper_enter_mmx(cpu_env);
3587 3588 3589
            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 已提交
3590 3591 3592 3593 3594 3595 3596
            break;
        case 0xd7: /* pmovmskb */
        case 0x1d7:
            if (mod != 3)
                goto illegal_op;
            if (b1) {
                rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
3597
                tcg_gen_addi_ptr(cpu_ptr0, cpu_env, offsetof(CPUX86State,xmm_regs[rm]));
B
Blue Swirl 已提交
3598
                gen_helper_pmovmskb_xmm(cpu_tmp2_i32, cpu_env, cpu_ptr0);
B
bellard 已提交
3599 3600
            } else {
                rm = (modrm & 7);
B
bellard 已提交
3601
                tcg_gen_addi_ptr(cpu_ptr0, cpu_env, offsetof(CPUX86State,fpregs[rm].mmx));
B
Blue Swirl 已提交
3602
                gen_helper_pmovmskb_mmx(cpu_tmp2_i32, cpu_env, cpu_ptr0);
B
bellard 已提交
3603 3604
            }
            reg = ((modrm >> 3) & 7) | rex_r;
3605
            tcg_gen_extu_i32_tl(cpu_regs[reg], cpu_tmp2_i32);
B
bellard 已提交
3606
            break;
R
Richard Henderson 已提交
3607

B
balrog 已提交
3608
        case 0x138:
3609
        case 0x038:
B
balrog 已提交
3610
            b = modrm;
R
Richard Henderson 已提交
3611 3612 3613
            if ((b & 0xf0) == 0xf0) {
                goto do_0f_38_fx;
            }
3614
            modrm = cpu_ldub_code(env, s->pc++);
B
balrog 已提交
3615 3616 3617
            rm = modrm & 7;
            reg = ((modrm >> 3) & 7) | rex_r;
            mod = (modrm >> 6) & 3;
3618 3619 3620
            if (b1 >= 2) {
                goto illegal_op;
            }
B
balrog 已提交
3621

B
Blue Swirl 已提交
3622 3623
            sse_fn_epp = sse_op_table6[b].op[b1];
            if (!sse_fn_epp) {
B
balrog 已提交
3624
                goto illegal_op;
B
Blue Swirl 已提交
3625
            }
B
balrog 已提交
3626 3627
            if (!(s->cpuid_ext_features & sse_op_table6[b].ext_mask))
                goto illegal_op;
B
balrog 已提交
3628 3629 3630 3631 3632 3633 3634

            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);
3635
                    gen_lea_modrm(env, s, modrm);
B
balrog 已提交
3636 3637 3638 3639
                    switch (b) {
                    case 0x20: case 0x30: /* pmovsxbw, pmovzxbw */
                    case 0x23: case 0x33: /* pmovsxwd, pmovzxwd */
                    case 0x25: case 0x35: /* pmovsxdq, pmovzxdq */
3640
                        gen_ldq_env_A0(s, op2_offset +
B
balrog 已提交
3641 3642 3643 3644
                                        offsetof(XMMReg, XMM_Q(0)));
                        break;
                    case 0x21: case 0x31: /* pmovsxbd, pmovzxbd */
                    case 0x24: case 0x34: /* pmovsxwq, pmovzxwq */
3645 3646
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
B
balrog 已提交
3647 3648 3649 3650
                        tcg_gen_st_i32(cpu_tmp2_i32, cpu_env, op2_offset +
                                        offsetof(XMMReg, XMM_L(0)));
                        break;
                    case 0x22: case 0x32: /* pmovsxbq, pmovzxbq */
3651 3652
                        tcg_gen_qemu_ld_tl(cpu_tmp0, cpu_A0,
                                           s->mem_index, MO_LEUW);
B
balrog 已提交
3653 3654 3655 3656
                        tcg_gen_st16_tl(cpu_tmp0, cpu_env, op2_offset +
                                        offsetof(XMMReg, XMM_W(0)));
                        break;
                    case 0x2a:            /* movntqda */
3657
                        gen_ldo_env_A0(s, op1_offset);
B
balrog 已提交
3658 3659
                        return;
                    default:
3660
                        gen_ldo_env_A0(s, op2_offset);
B
balrog 已提交
3661
                    }
B
balrog 已提交
3662 3663 3664 3665 3666 3667 3668
                }
            } 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);
3669
                    gen_lea_modrm(env, s, modrm);
3670
                    gen_ldq_env_A0(s, op2_offset);
B
balrog 已提交
3671 3672
                }
            }
B
Blue Swirl 已提交
3673
            if (sse_fn_epp == SSE_SPECIAL) {
B
balrog 已提交
3674
                goto illegal_op;
B
Blue Swirl 已提交
3675
            }
B
balrog 已提交
3676

B
balrog 已提交
3677 3678
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
3679
            sse_fn_epp(cpu_env, cpu_ptr0, cpu_ptr1);
B
balrog 已提交
3680

3681 3682 3683
            if (b == 0x17) {
                set_cc_op(s, CC_OP_EFLAGS);
            }
B
balrog 已提交
3684
            break;
R
Richard Henderson 已提交
3685 3686 3687 3688 3689 3690

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

R
Richard Henderson 已提交
3694 3695 3696 3697 3698 3699 3700 3701
            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) {
3702
                    ot = MO_8;
3703
                } else if (s->dflag != MO_64) {
3704
                    ot = (s->prefix & PREFIX_DATA ? MO_16 : MO_32);
R
Richard Henderson 已提交
3705
                } else {
3706
                    ot = MO_64;
R
Richard Henderson 已提交
3707
                }
B
balrog 已提交
3708

3709
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_regs[reg]);
R
Richard Henderson 已提交
3710 3711 3712
                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 已提交
3713

3714
                ot = mo_64_32(s->dflag);
3715
                gen_op_mov_reg_v(ot, reg, cpu_T[0]);
R
Richard Henderson 已提交
3716
                break;
B
balrog 已提交
3717

R
Richard Henderson 已提交
3718 3719 3720 3721 3722 3723 3724 3725 3726 3727 3728 3729 3730 3731
            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;
                }
3732
                if (s->dflag != MO_64) {
3733
                    ot = (s->prefix & PREFIX_DATA ? MO_16 : MO_32);
R
Richard Henderson 已提交
3734
                } else {
3735
                    ot = MO_64;
R
Richard Henderson 已提交
3736 3737
                }

3738
                gen_lea_modrm(env, s, modrm);
R
Richard Henderson 已提交
3739
                if ((b & 1) == 0) {
3740 3741
                    tcg_gen_qemu_ld_tl(cpu_T[0], cpu_A0,
                                       s->mem_index, ot | MO_BE);
3742
                    gen_op_mov_reg_v(ot, reg, cpu_T[0]);
R
Richard Henderson 已提交
3743
                } else {
3744 3745
                    tcg_gen_qemu_st_tl(cpu_regs[reg], cpu_A0,
                                       s->mem_index, ot | MO_BE);
R
Richard Henderson 已提交
3746 3747 3748
                }
                break;

R
Richard Henderson 已提交
3749 3750 3751 3752 3753 3754
            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;
                }
3755
                ot = mo_64_32(s->dflag);
R
Richard Henderson 已提交
3756 3757
                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]);
3758
                gen_op_mov_reg_v(ot, reg, cpu_T[0]);
R
Richard Henderson 已提交
3759 3760 3761 3762
                gen_op_update1_cc();
                set_cc_op(s, CC_OP_LOGICB + ot);
                break;

R
Richard Henderson 已提交
3763 3764 3765 3766 3767 3768
            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;
                }
3769
                ot = mo_64_32(s->dflag);
R
Richard Henderson 已提交
3770 3771 3772 3773 3774 3775 3776 3777 3778
                {
                    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);

3779
                    bound = tcg_const_tl(ot == MO_64 ? 63 : 31);
R
Richard Henderson 已提交
3780 3781 3782 3783 3784 3785 3786 3787 3788 3789 3790 3791 3792 3793 3794 3795 3796
                    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]);

3797
                    gen_op_mov_reg_v(ot, reg, cpu_T[0]);
R
Richard Henderson 已提交
3798 3799 3800 3801 3802
                    gen_op_update1_cc();
                    set_cc_op(s, CC_OP_LOGICB + ot);
                }
                break;

R
Richard Henderson 已提交
3803 3804 3805 3806 3807 3808
            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;
                }
3809
                ot = mo_64_32(s->dflag);
R
Richard Henderson 已提交
3810 3811 3812
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
                tcg_gen_ext8u_tl(cpu_T[1], cpu_regs[s->vex_v]);
                {
3813
                    TCGv bound = tcg_const_tl(ot == MO_64 ? 63 : 31);
R
Richard Henderson 已提交
3814 3815 3816 3817 3818 3819 3820 3821 3822 3823 3824
                    /* 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);
3825
                gen_op_mov_reg_v(ot, reg, cpu_T[0]);
R
Richard Henderson 已提交
3826 3827 3828 3829
                gen_op_update1_cc();
                set_cc_op(s, CC_OP_BMILGB + ot);
                break;

R
Richard Henderson 已提交
3830 3831 3832 3833 3834 3835
            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;
                }
3836
                ot = mo_64_32(s->dflag);
R
Richard Henderson 已提交
3837 3838 3839
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
                switch (ot) {
                default:
3840 3841 3842 3843 3844 3845
                    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 已提交
3846 3847
                    break;
#ifdef TARGET_X86_64
3848
                case MO_64:
3849 3850
                    tcg_gen_mulu2_i64(cpu_regs[s->vex_v], cpu_regs[reg],
                                      cpu_T[0], cpu_regs[R_EDX]);
R
Richard Henderson 已提交
3851 3852 3853 3854 3855
                    break;
#endif
                }
                break;

3856 3857 3858 3859 3860 3861
            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;
                }
3862
                ot = mo_64_32(s->dflag);
3863 3864 3865
                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.  */
3866
                if (ot == MO_64) {
3867 3868 3869 3870 3871 3872 3873 3874 3875 3876 3877 3878 3879
                    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;
                }
3880
                ot = mo_64_32(s->dflag);
3881 3882 3883
                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.  */
3884
                if (ot == MO_64) {
3885 3886 3887 3888 3889 3890 3891
                    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;

3892 3893 3894 3895 3896
            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 {
3897
                    TCGv carry_in, carry_out, zero;
3898 3899
                    int end_op;

3900
                    ot = mo_64_32(s->dflag);
3901 3902 3903 3904 3905 3906 3907 3908 3909 3910 3911 3912 3913 3914 3915 3916 3917 3918 3919 3920 3921 3922 3923 3924 3925 3926 3927
                    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:
3928
                        end_op = (b == 0x1f6 ? CC_OP_ADCX : CC_OP_ADOX);
3929 3930 3931 3932 3933 3934 3935 3936 3937 3938 3939 3940 3941 3942 3943
                        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
3944
                    case MO_32:
3945 3946 3947 3948 3949 3950 3951 3952 3953 3954 3955 3956
                        /* 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.  */
3957 3958 3959 3960 3961 3962 3963 3964
                        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);
3965 3966 3967 3968 3969 3970
                        break;
                    }
                    set_cc_op(s, end_op);
                }
                break;

3971 3972 3973 3974 3975 3976 3977 3978
            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;
                }
3979
                ot = mo_64_32(s->dflag);
3980
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
3981
                if (ot == MO_64) {
3982 3983 3984 3985 3986 3987 3988
                    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) {
3989
                    if (ot != MO_64) {
3990 3991 3992 3993
                        tcg_gen_ext32s_tl(cpu_T[0], cpu_T[0]);
                    }
                    tcg_gen_sar_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
                } else {
3994
                    if (ot != MO_64) {
3995 3996 3997 3998
                        tcg_gen_ext32u_tl(cpu_T[0], cpu_T[0]);
                    }
                    tcg_gen_shr_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
                }
3999
                gen_op_mov_reg_v(ot, reg, cpu_T[0]);
4000 4001
                break;

4002 4003 4004 4005 4006 4007 4008 4009 4010
            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;
                }
4011
                ot = mo_64_32(s->dflag);
4012 4013 4014 4015 4016 4017
                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]);
4018
                    gen_op_mov_reg_v(ot, s->vex_v, cpu_T[0]);
4019 4020 4021 4022 4023 4024 4025 4026 4027 4028 4029 4030 4031 4032 4033 4034 4035 4036 4037 4038 4039 4040 4041 4042 4043
                    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 已提交
4044 4045 4046
            default:
                goto illegal_op;
            }
B
balrog 已提交
4047
            break;
R
Richard Henderson 已提交
4048

B
balrog 已提交
4049 4050
        case 0x03a:
        case 0x13a:
B
balrog 已提交
4051
            b = modrm;
4052
            modrm = cpu_ldub_code(env, s->pc++);
B
balrog 已提交
4053 4054 4055
            rm = modrm & 7;
            reg = ((modrm >> 3) & 7) | rex_r;
            mod = (modrm >> 6) & 3;
4056 4057 4058
            if (b1 >= 2) {
                goto illegal_op;
            }
B
balrog 已提交
4059

B
Blue Swirl 已提交
4060 4061
            sse_fn_eppi = sse_op_table7[b].op[b1];
            if (!sse_fn_eppi) {
B
balrog 已提交
4062
                goto illegal_op;
B
Blue Swirl 已提交
4063
            }
B
balrog 已提交
4064 4065 4066
            if (!(s->cpuid_ext_features & sse_op_table7[b].ext_mask))
                goto illegal_op;

B
Blue Swirl 已提交
4067
            if (sse_fn_eppi == SSE_SPECIAL) {
4068
                ot = mo_64_32(s->dflag);
B
balrog 已提交
4069 4070
                rm = (modrm & 7) | REX_B(s);
                if (mod != 3)
4071
                    gen_lea_modrm(env, s, modrm);
B
balrog 已提交
4072
                reg = ((modrm >> 3) & 7) | rex_r;
4073
                val = cpu_ldub_code(env, s->pc++);
B
balrog 已提交
4074 4075 4076 4077
                switch (b) {
                case 0x14: /* pextrb */
                    tcg_gen_ld8u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,
                                            xmm_regs[reg].XMM_B(val & 15)));
4078
                    if (mod == 3) {
4079
                        gen_op_mov_reg_v(ot, rm, cpu_T[0]);
4080 4081 4082 4083
                    } else {
                        tcg_gen_qemu_st_tl(cpu_T[0], cpu_A0,
                                           s->mem_index, MO_UB);
                    }
B
balrog 已提交
4084 4085 4086 4087
                    break;
                case 0x15: /* pextrw */
                    tcg_gen_ld16u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,
                                            xmm_regs[reg].XMM_W(val & 7)));
4088
                    if (mod == 3) {
4089
                        gen_op_mov_reg_v(ot, rm, cpu_T[0]);
4090 4091 4092 4093
                    } else {
                        tcg_gen_qemu_st_tl(cpu_T[0], cpu_A0,
                                           s->mem_index, MO_LEUW);
                    }
B
balrog 已提交
4094 4095
                    break;
                case 0x16:
4096
                    if (ot == MO_32) { /* pextrd */
B
balrog 已提交
4097 4098 4099
                        tcg_gen_ld_i32(cpu_tmp2_i32, cpu_env,
                                        offsetof(CPUX86State,
                                                xmm_regs[reg].XMM_L(val & 3)));
4100
                        if (mod == 3) {
4101
                            tcg_gen_extu_i32_tl(cpu_regs[rm], cpu_tmp2_i32);
4102
                        } else {
4103 4104
                            tcg_gen_qemu_st_i32(cpu_tmp2_i32, cpu_A0,
                                                s->mem_index, MO_LEUL);
4105
                        }
B
balrog 已提交
4106
                    } else { /* pextrq */
P
pbrook 已提交
4107
#ifdef TARGET_X86_64
B
balrog 已提交
4108 4109 4110
                        tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env,
                                        offsetof(CPUX86State,
                                                xmm_regs[reg].XMM_Q(val & 1)));
4111
                        if (mod == 3) {
4112
                            tcg_gen_mov_i64(cpu_regs[rm], cpu_tmp1_i64);
4113 4114 4115 4116
                        } else {
                            tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0,
                                                s->mem_index, MO_LEQ);
                        }
P
pbrook 已提交
4117 4118 4119
#else
                        goto illegal_op;
#endif
B
balrog 已提交
4120 4121 4122 4123 4124
                    }
                    break;
                case 0x17: /* extractps */
                    tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,
                                            xmm_regs[reg].XMM_L(val & 3)));
4125
                    if (mod == 3) {
4126
                        gen_op_mov_reg_v(ot, rm, cpu_T[0]);
4127 4128 4129 4130
                    } else {
                        tcg_gen_qemu_st_tl(cpu_T[0], cpu_A0,
                                           s->mem_index, MO_LEUL);
                    }
B
balrog 已提交
4131 4132
                    break;
                case 0x20: /* pinsrb */
4133
                    if (mod == 3) {
4134
                        gen_op_mov_v_reg(MO_32, cpu_T[0], rm);
4135 4136 4137 4138
                    } else {
                        tcg_gen_qemu_ld_tl(cpu_T[0], cpu_A0,
                                           s->mem_index, MO_UB);
                    }
4139
                    tcg_gen_st8_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,
B
balrog 已提交
4140 4141 4142
                                            xmm_regs[reg].XMM_B(val & 15)));
                    break;
                case 0x21: /* insertps */
P
pbrook 已提交
4143
                    if (mod == 3) {
B
balrog 已提交
4144 4145 4146
                        tcg_gen_ld_i32(cpu_tmp2_i32, cpu_env,
                                        offsetof(CPUX86State,xmm_regs[rm]
                                                .XMM_L((val >> 6) & 3)));
P
pbrook 已提交
4147
                    } else {
4148 4149
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
P
pbrook 已提交
4150
                    }
B
balrog 已提交
4151 4152 4153 4154 4155 4156 4157 4158 4159 4160 4161 4162 4163 4164 4165 4166 4167 4168 4169 4170 4171
                    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:
4172
                    if (ot == MO_32) { /* pinsrd */
4173
                        if (mod == 3) {
4174
                            tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_regs[rm]);
4175
                        } else {
4176 4177
                            tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                                s->mem_index, MO_LEUL);
4178
                        }
B
balrog 已提交
4179 4180 4181 4182
                        tcg_gen_st_i32(cpu_tmp2_i32, cpu_env,
                                        offsetof(CPUX86State,
                                                xmm_regs[reg].XMM_L(val & 3)));
                    } else { /* pinsrq */
P
pbrook 已提交
4183
#ifdef TARGET_X86_64
4184
                        if (mod == 3) {
B
balrog 已提交
4185
                            gen_op_mov_v_reg(ot, cpu_tmp1_i64, rm);
4186 4187 4188 4189
                        } else {
                            tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0,
                                                s->mem_index, MO_LEQ);
                        }
B
balrog 已提交
4190 4191 4192
                        tcg_gen_st_i64(cpu_tmp1_i64, cpu_env,
                                        offsetof(CPUX86State,
                                                xmm_regs[reg].XMM_Q(val & 1)));
P
pbrook 已提交
4193 4194 4195
#else
                        goto illegal_op;
#endif
B
balrog 已提交
4196 4197 4198 4199 4200
                    }
                    break;
                }
                return;
            }
B
balrog 已提交
4201 4202 4203 4204 4205 4206 4207

            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);
4208
                    gen_lea_modrm(env, s, modrm);
4209
                    gen_ldo_env_A0(s, op2_offset);
B
balrog 已提交
4210 4211 4212 4213 4214 4215 4216
                }
            } 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);
4217
                    gen_lea_modrm(env, s, modrm);
4218
                    gen_ldq_env_A0(s, op2_offset);
B
balrog 已提交
4219 4220
                }
            }
4221
            val = cpu_ldub_code(env, s->pc++);
B
balrog 已提交
4222

B
balrog 已提交
4223
            if ((b & 0xfc) == 0x60) { /* pcmpXstrX */
4224
                set_cc_op(s, CC_OP_EFLAGS);
B
balrog 已提交
4225

4226
                if (s->dflag == MO_64) {
B
balrog 已提交
4227 4228
                    /* The helper must use entire 64-bit gp registers */
                    val |= 1 << 8;
4229
                }
B
balrog 已提交
4230 4231
            }

B
balrog 已提交
4232 4233
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
4234
            sse_fn_eppi(cpu_env, cpu_ptr0, cpu_ptr1, tcg_const_i32(val));
B
balrog 已提交
4235
            break;
R
Richard Henderson 已提交
4236 4237 4238 4239 4240 4241 4242 4243 4244 4245 4246 4247 4248 4249

        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;
                }
4250
                ot = mo_64_32(s->dflag);
R
Richard Henderson 已提交
4251 4252
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
                b = cpu_ldub_code(env, s->pc++);
4253
                if (ot == MO_64) {
R
Richard Henderson 已提交
4254 4255 4256 4257 4258 4259
                    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);
                }
4260
                gen_op_mov_reg_v(ot, reg, cpu_T[0]);
R
Richard Henderson 已提交
4261 4262 4263 4264 4265 4266 4267
                break;

            default:
                goto illegal_op;
            }
            break;

B
bellard 已提交
4268 4269 4270 4271 4272
        default:
            goto illegal_op;
        }
    } else {
        /* generic MMX or SSE operation */
B
bellard 已提交
4273 4274 4275 4276 4277 4278 4279 4280
        switch(b) {
        case 0x70: /* pshufx insn */
        case 0xc6: /* pshufx insn */
        case 0xc2: /* compare insns */
            s->rip_offset = 1;
            break;
        default:
            break;
B
bellard 已提交
4281 4282 4283 4284
        }
        if (is_xmm) {
            op1_offset = offsetof(CPUX86State,xmm_regs[reg]);
            if (mod != 3) {
4285 4286
                int sz = 4;

4287
                gen_lea_modrm(env, s, modrm);
B
bellard 已提交
4288
                op2_offset = offsetof(CPUX86State,xmm_t0);
4289 4290 4291 4292 4293 4294

                switch (b) {
                case 0x50 ... 0x5a:
                case 0x5c ... 0x5f:
                case 0xc2:
                    /* Most sse scalar operations.  */
B
bellard 已提交
4295
                    if (b1 == 2) {
4296 4297 4298 4299 4300 4301 4302 4303 4304 4305
                        sz = 2;
                    } else if (b1 == 3) {
                        sz = 3;
                    }
                    break;

                case 0x2e:  /* ucomis[sd] */
                case 0x2f:  /* comis[sd] */
                    if (b1 == 0) {
                        sz = 2;
B
bellard 已提交
4306
                    } else {
4307
                        sz = 3;
B
bellard 已提交
4308
                    }
4309 4310 4311 4312 4313 4314 4315 4316 4317 4318 4319 4320 4321 4322 4323 4324
                    break;
                }

                switch (sz) {
                case 2:
                    /* 32 bit access */
                    gen_op_ld_v(s, MO_32, cpu_T[0], cpu_A0);
                    tcg_gen_st32_tl(cpu_T[0], cpu_env,
                                    offsetof(CPUX86State,xmm_t0.XMM_L(0)));
                    break;
                case 3:
                    /* 64 bit access */
                    gen_ldq_env_A0(s, offsetof(CPUX86State, xmm_t0.XMM_D(0)));
                    break;
                default:
                    /* 128 bit access */
4325
                    gen_ldo_env_A0(s, op2_offset);
4326
                    break;
B
bellard 已提交
4327 4328 4329 4330 4331 4332 4333 4334
                }
            } 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) {
4335
                gen_lea_modrm(env, s, modrm);
B
bellard 已提交
4336
                op2_offset = offsetof(CPUX86State,mmx_t0);
4337
                gen_ldq_env_A0(s, op2_offset);
B
bellard 已提交
4338 4339 4340 4341 4342 4343
            } else {
                rm = (modrm & 7);
                op2_offset = offsetof(CPUX86State,fpregs[rm].mmx);
            }
        }
        switch(b) {
A
aurel32 已提交
4344
        case 0x0f: /* 3DNow! data insns */
4345 4346
            if (!(s->cpuid_ext2_features & CPUID_EXT2_3DNOW))
                goto illegal_op;
4347
            val = cpu_ldub_code(env, s->pc++);
B
Blue Swirl 已提交
4348 4349
            sse_fn_epp = sse_op_table5[val];
            if (!sse_fn_epp) {
A
aurel32 已提交
4350
                goto illegal_op;
B
Blue Swirl 已提交
4351
            }
B
bellard 已提交
4352 4353
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
4354
            sse_fn_epp(cpu_env, cpu_ptr0, cpu_ptr1);
A
aurel32 已提交
4355
            break;
B
bellard 已提交
4356 4357
        case 0x70: /* pshufx insn */
        case 0xc6: /* pshufx insn */
4358
            val = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4359 4360
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
4361
            /* XXX: introduce a new table? */
B
Blue Swirl 已提交
4362
            sse_fn_ppi = (SSEFunc_0_ppi)sse_fn_epp;
B
Blue Swirl 已提交
4363
            sse_fn_ppi(cpu_ptr0, cpu_ptr1, tcg_const_i32(val));
B
bellard 已提交
4364 4365 4366
            break;
        case 0xc2:
            /* compare insns */
4367
            val = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4368 4369
            if (val >= 8)
                goto illegal_op;
B
Blue Swirl 已提交
4370
            sse_fn_epp = sse_op_table4[val][b1];
B
Blue Swirl 已提交
4371

B
bellard 已提交
4372 4373
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
4374
            sse_fn_epp(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
4375
            break;
4376 4377 4378 4379
        case 0xf7:
            /* maskmov : we must prepare A0 */
            if (mod != 3)
                goto illegal_op;
4380 4381
            tcg_gen_mov_tl(cpu_A0, cpu_regs[R_EDI]);
            gen_extu(s->aflag, cpu_A0);
4382 4383 4384 4385
            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 已提交
4386
            /* XXX: introduce a new table? */
B
Blue Swirl 已提交
4387 4388
            sse_fn_eppt = (SSEFunc_0_eppt)sse_fn_epp;
            sse_fn_eppt(cpu_env, cpu_ptr0, cpu_ptr1, cpu_A0);
4389
            break;
B
bellard 已提交
4390
        default:
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
            sse_fn_epp(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
4394 4395 4396
            break;
        }
        if (b == 0x2e || b == 0x2f) {
4397
            set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
4398 4399 4400 4401
        }
    }
}

B
bellard 已提交
4402 4403
/* convert one instruction. s->is_jmp is set if the translation must
   be stopped. Return the next pc value */
4404 4405
static target_ulong disas_insn(CPUX86State *env, DisasContext *s,
                               target_ulong pc_start)
B
bellard 已提交
4406
{
4407
    int b, prefixes;
4408
    int shift;
4409
    TCGMemOp ot, aflag, dflag;
4410
    int modrm, reg, rm, mod, op, opreg, val;
B
bellard 已提交
4411 4412
    target_ulong next_eip, tval;
    int rex_w, rex_r;
B
bellard 已提交
4413

4414
    if (unlikely(qemu_loglevel_mask(CPU_LOG_TB_OP | CPU_LOG_TB_OP_OPT))) {
4415
        tcg_gen_debug_insn_start(pc_start);
4416
    }
B
bellard 已提交
4417 4418 4419
    s->pc = pc_start;
    prefixes = 0;
    s->override = -1;
B
bellard 已提交
4420 4421 4422 4423 4424
    rex_w = -1;
    rex_r = 0;
#ifdef TARGET_X86_64
    s->rex_x = 0;
    s->rex_b = 0;
4425
    x86_64_hregs = 0;
B
bellard 已提交
4426 4427
#endif
    s->rip_offset = 0; /* for relative ip address */
4428 4429
    s->vex_l = 0;
    s->vex_v = 0;
B
bellard 已提交
4430
 next_byte:
4431
    b = cpu_ldub_code(env, s->pc);
B
bellard 已提交
4432
    s->pc++;
4433 4434 4435 4436 4437 4438 4439 4440 4441 4442 4443 4444 4445 4446 4447 4448 4449 4450 4451 4452 4453 4454 4455 4456 4457 4458 4459 4460 4461 4462 4463 4464 4465 4466 4467
    /* 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 已提交
4468
#ifdef TARGET_X86_64
4469 4470
    case 0x40 ... 0x4f:
        if (CODE64(s)) {
B
bellard 已提交
4471 4472 4473 4474 4475 4476 4477 4478
            /* 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;
        }
4479 4480
        break;
#endif
4481 4482 4483 4484 4485 4486 4487 4488 4489 4490 4491 4492 4493 4494 4495 4496 4497
    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 已提交
4498
            /* 4.1.1-4.1.3: No preceding lock, 66, f2, f3, or rex prefixes. */
4499 4500 4501 4502 4503 4504 4505 4506 4507 4508 4509 4510 4511 4512 4513 4514 4515 4516 4517 4518 4519 4520 4521 4522 4523 4524 4525 4526 4527 4528 4529 4530 4531 4532 4533 4534 4535 4536 4537
            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;
4538 4539 4540 4541
    }

    /* Post-process prefixes.  */
    if (CODE64(s)) {
4542 4543 4544
        /* 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.  */
4545
        dflag = (rex_w > 0 ? MO_64 : prefixes & PREFIX_DATA ? MO_16 : MO_32);
4546
        /* In 64-bit mode, 0x67 selects 32-bit addressing.  */
4547
        aflag = (prefixes & PREFIX_ADR ? MO_32 : MO_64);
4548 4549
    } else {
        /* In 16/32-bit mode, 0x66 selects the opposite data size.  */
4550 4551 4552 4553
        if (s->code32 ^ ((prefixes & PREFIX_DATA) != 0)) {
            dflag = MO_32;
        } else {
            dflag = MO_16;
B
bellard 已提交
4554
        }
4555
        /* In 16/32-bit mode, 0x67 selects the opposite addressing.  */
4556 4557 4558 4559
        if (s->code32 ^ ((prefixes & PREFIX_ADR) != 0)) {
            aflag = MO_32;
        }  else {
            aflag = MO_16;
B
bellard 已提交
4560
        }
B
bellard 已提交
4561 4562 4563 4564 4565 4566 4567 4568
    }

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

    /* lock generation */
    if (prefixes & PREFIX_LOCK)
P
pbrook 已提交
4569
        gen_helper_lock();
B
bellard 已提交
4570 4571 4572 4573 4574 4575 4576

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

B
bellard 已提交
4580 4581 4582 4583 4584 4585 4586 4587 4588 4589 4590 4591 4592 4593 4594
        /**************************/
        /* 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;

4595
            ot = mo_b_d(b, dflag);
4596

B
bellard 已提交
4597 4598
            switch(f) {
            case 0: /* OP Ev, Gv */
4599
                modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4600
                reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
4601
                mod = (modrm >> 6) & 3;
B
bellard 已提交
4602
                rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
4603
                if (mod != 3) {
4604
                    gen_lea_modrm(env, s, modrm);
B
bellard 已提交
4605 4606 4607 4608
                    opreg = OR_TMP0;
                } else if (op == OP_XORL && rm == reg) {
                xor_zero:
                    /* xor reg, reg optimisation */
R
Richard Henderson 已提交
4609
                    set_cc_op(s, CC_OP_CLR);
4610
                    tcg_gen_movi_tl(cpu_T[0], 0);
4611
                    gen_op_mov_reg_v(ot, reg, cpu_T[0]);
B
bellard 已提交
4612 4613 4614 4615
                    break;
                } else {
                    opreg = rm;
                }
4616
                gen_op_mov_v_reg(ot, cpu_T[1], reg);
B
bellard 已提交
4617 4618 4619
                gen_op(s, op, ot, opreg);
                break;
            case 1: /* OP Gv, Ev */
4620
                modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4621
                mod = (modrm >> 6) & 3;
B
bellard 已提交
4622 4623
                reg = ((modrm >> 3) & 7) | rex_r;
                rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
4624
                if (mod != 3) {
4625
                    gen_lea_modrm(env, s, modrm);
4626
                    gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
B
bellard 已提交
4627 4628 4629
                } else if (op == OP_XORL && rm == reg) {
                    goto xor_zero;
                } else {
4630
                    gen_op_mov_v_reg(ot, cpu_T[1], rm);
B
bellard 已提交
4631 4632 4633 4634
                }
                gen_op(s, op, ot, reg);
                break;
            case 2: /* OP A, Iv */
4635
                val = insn_get(env, s, ot);
4636
                tcg_gen_movi_tl(cpu_T[1], val);
B
bellard 已提交
4637 4638 4639 4640 4641 4642
                gen_op(s, op, ot, OR_EAX);
                break;
            }
        }
        break;

4643 4644 4645
    case 0x82:
        if (CODE64(s))
            goto illegal_op;
B
bellard 已提交
4646 4647 4648 4649 4650 4651
    case 0x80: /* GRP1 */
    case 0x81:
    case 0x83:
        {
            int val;

4652
            ot = mo_b_d(b, dflag);
4653

4654
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4655
            mod = (modrm >> 6) & 3;
B
bellard 已提交
4656
            rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
4657
            op = (modrm >> 3) & 7;
4658

B
bellard 已提交
4659
            if (mod != 3) {
B
bellard 已提交
4660 4661 4662 4663
                if (b == 0x83)
                    s->rip_offset = 1;
                else
                    s->rip_offset = insn_const_size(ot);
4664
                gen_lea_modrm(env, s, modrm);
B
bellard 已提交
4665 4666
                opreg = OR_TMP0;
            } else {
B
bellard 已提交
4667
                opreg = rm;
B
bellard 已提交
4668 4669 4670 4671 4672 4673
            }

            switch(b) {
            default:
            case 0x80:
            case 0x81:
4674
            case 0x82:
4675
                val = insn_get(env, s, ot);
B
bellard 已提交
4676 4677
                break;
            case 0x83:
4678
                val = (int8_t)insn_get(env, s, MO_8);
B
bellard 已提交
4679 4680
                break;
            }
4681
            tcg_gen_movi_tl(cpu_T[1], val);
B
bellard 已提交
4682 4683 4684 4685 4686 4687 4688
            gen_op(s, op, ot, opreg);
        }
        break;

        /**************************/
        /* inc, dec, and other misc arith */
    case 0x40 ... 0x47: /* inc Gv */
4689
        ot = dflag;
B
bellard 已提交
4690 4691 4692
        gen_inc(s, ot, OR_EAX + (b & 7), 1);
        break;
    case 0x48 ... 0x4f: /* dec Gv */
4693
        ot = dflag;
B
bellard 已提交
4694 4695 4696 4697
        gen_inc(s, ot, OR_EAX + (b & 7), -1);
        break;
    case 0xf6: /* GRP3 */
    case 0xf7:
4698
        ot = mo_b_d(b, dflag);
B
bellard 已提交
4699

4700
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4701
        mod = (modrm >> 6) & 3;
B
bellard 已提交
4702
        rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
4703 4704
        op = (modrm >> 3) & 7;
        if (mod != 3) {
B
bellard 已提交
4705 4706
            if (op == 0)
                s->rip_offset = insn_const_size(ot);
4707
            gen_lea_modrm(env, s, modrm);
4708
            gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
4709
        } else {
4710
            gen_op_mov_v_reg(ot, cpu_T[0], rm);
B
bellard 已提交
4711 4712 4713 4714
        }

        switch(op) {
        case 0: /* test */
4715
            val = insn_get(env, s, ot);
4716
            tcg_gen_movi_tl(cpu_T[1], val);
B
bellard 已提交
4717
            gen_op_testl_T0_T1_cc();
4718
            set_cc_op(s, CC_OP_LOGICB + ot);
B
bellard 已提交
4719 4720
            break;
        case 2: /* not */
4721
            tcg_gen_not_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
4722
            if (mod != 3) {
4723
                gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
4724
            } else {
4725
                gen_op_mov_reg_v(ot, rm, cpu_T[0]);
B
bellard 已提交
4726 4727 4728
            }
            break;
        case 3: /* neg */
4729
            tcg_gen_neg_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
4730
            if (mod != 3) {
4731
                gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
4732
            } else {
4733
                gen_op_mov_reg_v(ot, rm, cpu_T[0]);
B
bellard 已提交
4734 4735
            }
            gen_op_update_neg_cc();
4736
            set_cc_op(s, CC_OP_SUBB + ot);
B
bellard 已提交
4737 4738 4739
            break;
        case 4: /* mul */
            switch(ot) {
4740
            case MO_8:
4741
                gen_op_mov_v_reg(MO_8, cpu_T[1], R_EAX);
B
bellard 已提交
4742 4743 4744 4745
                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]);
4746
                gen_op_mov_reg_v(MO_16, R_EAX, cpu_T[0]);
B
bellard 已提交
4747 4748
                tcg_gen_mov_tl(cpu_cc_dst, cpu_T[0]);
                tcg_gen_andi_tl(cpu_cc_src, cpu_T[0], 0xff00);
4749
                set_cc_op(s, CC_OP_MULB);
B
bellard 已提交
4750
                break;
4751
            case MO_16:
4752
                gen_op_mov_v_reg(MO_16, cpu_T[1], R_EAX);
B
bellard 已提交
4753 4754 4755 4756
                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]);
4757
                gen_op_mov_reg_v(MO_16, R_EAX, cpu_T[0]);
B
bellard 已提交
4758 4759
                tcg_gen_mov_tl(cpu_cc_dst, cpu_T[0]);
                tcg_gen_shri_tl(cpu_T[0], cpu_T[0], 16);
4760
                gen_op_mov_reg_v(MO_16, R_EDX, cpu_T[0]);
B
bellard 已提交
4761
                tcg_gen_mov_tl(cpu_cc_src, cpu_T[0]);
4762
                set_cc_op(s, CC_OP_MULW);
B
bellard 已提交
4763 4764
                break;
            default:
4765
            case MO_32:
4766 4767 4768 4769 4770 4771 4772 4773
                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]);
4774
                set_cc_op(s, CC_OP_MULL);
B
bellard 已提交
4775
                break;
B
bellard 已提交
4776
#ifdef TARGET_X86_64
4777
            case MO_64:
4778 4779 4780 4781
                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]);
4782
                set_cc_op(s, CC_OP_MULQ);
B
bellard 已提交
4783 4784
                break;
#endif
B
bellard 已提交
4785 4786 4787 4788
            }
            break;
        case 5: /* imul */
            switch(ot) {
4789
            case MO_8:
4790
                gen_op_mov_v_reg(MO_8, cpu_T[1], R_EAX);
B
bellard 已提交
4791 4792 4793 4794
                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]);
4795
                gen_op_mov_reg_v(MO_16, R_EAX, cpu_T[0]);
B
bellard 已提交
4796 4797 4798
                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);
4799
                set_cc_op(s, CC_OP_MULB);
B
bellard 已提交
4800
                break;
4801
            case MO_16:
4802
                gen_op_mov_v_reg(MO_16, cpu_T[1], R_EAX);
B
bellard 已提交
4803 4804 4805 4806
                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]);
4807
                gen_op_mov_reg_v(MO_16, R_EAX, cpu_T[0]);
B
bellard 已提交
4808 4809 4810 4811
                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);
4812
                gen_op_mov_reg_v(MO_16, R_EDX, cpu_T[0]);
4813
                set_cc_op(s, CC_OP_MULW);
B
bellard 已提交
4814 4815
                break;
            default:
4816
            case MO_32:
4817 4818 4819 4820 4821 4822 4823 4824 4825 4826
                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);
4827
                set_cc_op(s, CC_OP_MULL);
B
bellard 已提交
4828
                break;
B
bellard 已提交
4829
#ifdef TARGET_X86_64
4830
            case MO_64:
4831 4832 4833 4834 4835
                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]);
4836
                set_cc_op(s, CC_OP_MULQ);
B
bellard 已提交
4837 4838
                break;
#endif
B
bellard 已提交
4839 4840 4841 4842
            }
            break;
        case 6: /* div */
            switch(ot) {
4843
            case MO_8:
B
bellard 已提交
4844
                gen_jmp_im(pc_start - s->cs_base);
4845
                gen_helper_divb_AL(cpu_env, cpu_T[0]);
B
bellard 已提交
4846
                break;
4847
            case MO_16:
B
bellard 已提交
4848
                gen_jmp_im(pc_start - s->cs_base);
4849
                gen_helper_divw_AX(cpu_env, cpu_T[0]);
B
bellard 已提交
4850 4851
                break;
            default:
4852
            case MO_32:
B
bellard 已提交
4853
                gen_jmp_im(pc_start - s->cs_base);
4854
                gen_helper_divl_EAX(cpu_env, cpu_T[0]);
B
bellard 已提交
4855 4856
                break;
#ifdef TARGET_X86_64
4857
            case MO_64:
B
bellard 已提交
4858
                gen_jmp_im(pc_start - s->cs_base);
4859
                gen_helper_divq_EAX(cpu_env, cpu_T[0]);
B
bellard 已提交
4860
                break;
B
bellard 已提交
4861
#endif
B
bellard 已提交
4862 4863 4864 4865
            }
            break;
        case 7: /* idiv */
            switch(ot) {
4866
            case MO_8:
B
bellard 已提交
4867
                gen_jmp_im(pc_start - s->cs_base);
4868
                gen_helper_idivb_AL(cpu_env, cpu_T[0]);
B
bellard 已提交
4869
                break;
4870
            case MO_16:
B
bellard 已提交
4871
                gen_jmp_im(pc_start - s->cs_base);
4872
                gen_helper_idivw_AX(cpu_env, cpu_T[0]);
B
bellard 已提交
4873 4874
                break;
            default:
4875
            case MO_32:
B
bellard 已提交
4876
                gen_jmp_im(pc_start - s->cs_base);
4877
                gen_helper_idivl_EAX(cpu_env, cpu_T[0]);
B
bellard 已提交
4878 4879
                break;
#ifdef TARGET_X86_64
4880
            case MO_64:
B
bellard 已提交
4881
                gen_jmp_im(pc_start - s->cs_base);
4882
                gen_helper_idivq_EAX(cpu_env, cpu_T[0]);
B
bellard 已提交
4883
                break;
B
bellard 已提交
4884
#endif
B
bellard 已提交
4885 4886 4887 4888 4889 4890 4891 4892 4893
            }
            break;
        default:
            goto illegal_op;
        }
        break;

    case 0xfe: /* GRP4 */
    case 0xff: /* GRP5 */
4894
        ot = mo_b_d(b, dflag);
B
bellard 已提交
4895

4896
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4897
        mod = (modrm >> 6) & 3;
B
bellard 已提交
4898
        rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
4899 4900 4901 4902
        op = (modrm >> 3) & 7;
        if (op >= 2 && b == 0xfe) {
            goto illegal_op;
        }
B
bellard 已提交
4903
        if (CODE64(s)) {
4904
            if (op == 2 || op == 4) {
B
bellard 已提交
4905
                /* operand size for jumps is 64 bit */
4906
                ot = MO_64;
4907
            } else if (op == 3 || op == 5) {
4908
                ot = dflag != MO_16 ? MO_32 + (rex_w == 1) : MO_16;
B
bellard 已提交
4909 4910
            } else if (op == 6) {
                /* default push size is 64 bit */
4911
                ot = mo_pushpop(s, dflag);
B
bellard 已提交
4912 4913
            }
        }
B
bellard 已提交
4914
        if (mod != 3) {
4915
            gen_lea_modrm(env, s, modrm);
B
bellard 已提交
4916
            if (op >= 2 && op != 3 && op != 5)
4917
                gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
4918
        } else {
4919
            gen_op_mov_v_reg(ot, cpu_T[0], rm);
B
bellard 已提交
4920 4921 4922 4923 4924 4925 4926 4927 4928 4929 4930 4931 4932 4933 4934 4935 4936 4937
        }

        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 */
4938
            /* XXX: optimize if memory (no 'and' is necessary) */
4939
            if (dflag == MO_16) {
4940 4941
                tcg_gen_ext16u_tl(cpu_T[0], cpu_T[0]);
            }
B
bellard 已提交
4942
            next_eip = s->pc - s->cs_base;
4943
            tcg_gen_movi_tl(cpu_T[1], next_eip);
4944
            gen_push_v(s, cpu_T[1]);
4945
            gen_op_jmp_v(cpu_T[0]);
B
bellard 已提交
4946 4947
            gen_eob(s);
            break;
B
bellard 已提交
4948
        case 3: /* lcall Ev */
4949
            gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
4950
            gen_add_A0_im(s, 1 << ot);
4951
            gen_op_ld_v(s, MO_16, cpu_T[0], cpu_A0);
B
bellard 已提交
4952 4953
        do_lcall:
            if (s->pe && !s->vm86) {
4954
                gen_update_cc_op(s);
B
bellard 已提交
4955
                gen_jmp_im(pc_start - s->cs_base);
4956
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
4957
                gen_helper_lcall_protected(cpu_env, cpu_tmp2_i32, cpu_T[1],
4958
                                           tcg_const_i32(dflag - 1),
P
pbrook 已提交
4959
                                           tcg_const_i32(s->pc - pc_start));
B
bellard 已提交
4960
            } else {
4961
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
4962
                gen_helper_lcall_real(cpu_env, cpu_tmp2_i32, cpu_T[1],
4963
                                      tcg_const_i32(dflag - 1),
P
pbrook 已提交
4964
                                      tcg_const_i32(s->pc - s->cs_base));
B
bellard 已提交
4965 4966 4967 4968
            }
            gen_eob(s);
            break;
        case 4: /* jmp Ev */
4969
            if (dflag == MO_16) {
4970 4971
                tcg_gen_ext16u_tl(cpu_T[0], cpu_T[0]);
            }
4972
            gen_op_jmp_v(cpu_T[0]);
B
bellard 已提交
4973 4974 4975
            gen_eob(s);
            break;
        case 5: /* ljmp Ev */
4976
            gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
4977
            gen_add_A0_im(s, 1 << ot);
4978
            gen_op_ld_v(s, MO_16, cpu_T[0], cpu_A0);
B
bellard 已提交
4979 4980
        do_ljmp:
            if (s->pe && !s->vm86) {
4981
                gen_update_cc_op(s);
B
bellard 已提交
4982
                gen_jmp_im(pc_start - s->cs_base);
4983
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
4984
                gen_helper_ljmp_protected(cpu_env, cpu_tmp2_i32, cpu_T[1],
P
pbrook 已提交
4985
                                          tcg_const_i32(s->pc - pc_start));
B
bellard 已提交
4986
            } else {
4987
                gen_op_movl_seg_T0_vm(R_CS);
R
Richard Henderson 已提交
4988
                gen_op_jmp_v(cpu_T[1]);
B
bellard 已提交
4989 4990 4991 4992
            }
            gen_eob(s);
            break;
        case 6: /* push Ev */
4993
            gen_push_v(s, cpu_T[0]);
B
bellard 已提交
4994 4995 4996 4997 4998 4999 5000
            break;
        default:
            goto illegal_op;
        }
        break;

    case 0x84: /* test Ev, Gv */
5001
    case 0x85:
5002
        ot = mo_b_d(b, dflag);
B
bellard 已提交
5003

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

5007
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
5008
        gen_op_mov_v_reg(ot, cpu_T[1], reg);
B
bellard 已提交
5009
        gen_op_testl_T0_T1_cc();
5010
        set_cc_op(s, CC_OP_LOGICB + ot);
B
bellard 已提交
5011
        break;
5012

B
bellard 已提交
5013 5014
    case 0xa8: /* test eAX, Iv */
    case 0xa9:
5015
        ot = mo_b_d(b, dflag);
5016
        val = insn_get(env, s, ot);
B
bellard 已提交
5017

5018
        gen_op_mov_v_reg(ot, cpu_T[0], OR_EAX);
5019
        tcg_gen_movi_tl(cpu_T[1], val);
B
bellard 已提交
5020
        gen_op_testl_T0_T1_cc();
5021
        set_cc_op(s, CC_OP_LOGICB + ot);
B
bellard 已提交
5022
        break;
5023

B
bellard 已提交
5024
    case 0x98: /* CWDE/CBW */
5025
        switch (dflag) {
B
bellard 已提交
5026
#ifdef TARGET_X86_64
5027
        case MO_64:
5028
            gen_op_mov_v_reg(MO_32, cpu_T[0], R_EAX);
B
bellard 已提交
5029
            tcg_gen_ext32s_tl(cpu_T[0], cpu_T[0]);
5030
            gen_op_mov_reg_v(MO_64, R_EAX, cpu_T[0]);
5031
            break;
B
bellard 已提交
5032
#endif
5033
        case MO_32:
5034
            gen_op_mov_v_reg(MO_16, cpu_T[0], R_EAX);
B
bellard 已提交
5035
            tcg_gen_ext16s_tl(cpu_T[0], cpu_T[0]);
5036
            gen_op_mov_reg_v(MO_32, R_EAX, cpu_T[0]);
5037 5038
            break;
        case MO_16:
5039
            gen_op_mov_v_reg(MO_8, cpu_T[0], R_EAX);
B
bellard 已提交
5040
            tcg_gen_ext8s_tl(cpu_T[0], cpu_T[0]);
5041
            gen_op_mov_reg_v(MO_16, R_EAX, cpu_T[0]);
5042 5043 5044
            break;
        default:
            tcg_abort();
B
bellard 已提交
5045
        }
B
bellard 已提交
5046 5047
        break;
    case 0x99: /* CDQ/CWD */
5048
        switch (dflag) {
B
bellard 已提交
5049
#ifdef TARGET_X86_64
5050
        case MO_64:
5051
            gen_op_mov_v_reg(MO_64, cpu_T[0], R_EAX);
B
bellard 已提交
5052
            tcg_gen_sari_tl(cpu_T[0], cpu_T[0], 63);
5053
            gen_op_mov_reg_v(MO_64, R_EDX, cpu_T[0]);
5054
            break;
B
bellard 已提交
5055
#endif
5056
        case MO_32:
5057
            gen_op_mov_v_reg(MO_32, cpu_T[0], R_EAX);
B
bellard 已提交
5058 5059
            tcg_gen_ext32s_tl(cpu_T[0], cpu_T[0]);
            tcg_gen_sari_tl(cpu_T[0], cpu_T[0], 31);
5060
            gen_op_mov_reg_v(MO_32, R_EDX, cpu_T[0]);
5061 5062
            break;
        case MO_16:
5063
            gen_op_mov_v_reg(MO_16, cpu_T[0], R_EAX);
B
bellard 已提交
5064 5065
            tcg_gen_ext16s_tl(cpu_T[0], cpu_T[0]);
            tcg_gen_sari_tl(cpu_T[0], cpu_T[0], 15);
5066
            gen_op_mov_reg_v(MO_16, R_EDX, cpu_T[0]);
5067 5068 5069
            break;
        default:
            tcg_abort();
B
bellard 已提交
5070
        }
B
bellard 已提交
5071 5072 5073 5074
        break;
    case 0x1af: /* imul Gv, Ev */
    case 0x69: /* imul Gv, Ev, I */
    case 0x6b:
5075
        ot = dflag;
5076
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5077 5078 5079 5080 5081
        reg = ((modrm >> 3) & 7) | rex_r;
        if (b == 0x69)
            s->rip_offset = insn_const_size(ot);
        else if (b == 0x6b)
            s->rip_offset = 1;
5082
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
B
bellard 已提交
5083
        if (b == 0x69) {
5084
            val = insn_get(env, s, ot);
5085
            tcg_gen_movi_tl(cpu_T[1], val);
B
bellard 已提交
5086
        } else if (b == 0x6b) {
5087
            val = (int8_t)insn_get(env, s, MO_8);
5088
            tcg_gen_movi_tl(cpu_T[1], val);
B
bellard 已提交
5089
        } else {
5090
            gen_op_mov_v_reg(ot, cpu_T[1], reg);
B
bellard 已提交
5091
        }
5092
        switch (ot) {
B
bellard 已提交
5093
#ifdef TARGET_X86_64
5094
        case MO_64:
5095 5096 5097 5098 5099
            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 已提交
5100
#endif
5101
        case MO_32:
5102 5103 5104 5105 5106 5107 5108 5109 5110 5111 5112
            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 已提交
5113 5114 5115 5116 5117 5118 5119
            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);
5120
            gen_op_mov_reg_v(ot, reg, cpu_T[0]);
5121
            break;
B
bellard 已提交
5122
        }
5123
        set_cc_op(s, CC_OP_MULB + ot);
B
bellard 已提交
5124 5125 5126
        break;
    case 0x1c0:
    case 0x1c1: /* xadd Ev, Gv */
5127
        ot = mo_b_d(b, dflag);
5128
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5129
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5130 5131
        mod = (modrm >> 6) & 3;
        if (mod == 3) {
B
bellard 已提交
5132
            rm = (modrm & 7) | REX_B(s);
5133 5134
            gen_op_mov_v_reg(ot, cpu_T[0], reg);
            gen_op_mov_v_reg(ot, cpu_T[1], rm);
5135
            tcg_gen_add_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
5136
            gen_op_mov_reg_v(ot, reg, cpu_T[1]);
5137
            gen_op_mov_reg_v(ot, rm, cpu_T[0]);
B
bellard 已提交
5138
        } else {
5139
            gen_lea_modrm(env, s, modrm);
5140
            gen_op_mov_v_reg(ot, cpu_T[0], reg);
5141
            gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
5142
            tcg_gen_add_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
5143
            gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
5144
            gen_op_mov_reg_v(ot, reg, cpu_T[1]);
B
bellard 已提交
5145 5146
        }
        gen_op_update2_cc();
5147
        set_cc_op(s, CC_OP_ADDB + ot);
B
bellard 已提交
5148 5149 5150
        break;
    case 0x1b0:
    case 0x1b1: /* cmpxchg Ev, Gv */
B
bellard 已提交
5151
        {
5152
            TCGLabel *label1, *label2;
5153
            TCGv t0, t1, t2, a0;
B
bellard 已提交
5154

5155
            ot = mo_b_d(b, dflag);
5156
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5157 5158
            reg = ((modrm >> 3) & 7) | rex_r;
            mod = (modrm >> 6) & 3;
P
pbrook 已提交
5159 5160 5161 5162
            t0 = tcg_temp_local_new();
            t1 = tcg_temp_local_new();
            t2 = tcg_temp_local_new();
            a0 = tcg_temp_local_new();
5163
            gen_op_mov_v_reg(ot, t1, reg);
B
bellard 已提交
5164 5165
            if (mod == 3) {
                rm = (modrm & 7) | REX_B(s);
5166
                gen_op_mov_v_reg(ot, t0, rm);
B
bellard 已提交
5167
            } else {
5168
                gen_lea_modrm(env, s, modrm);
5169
                tcg_gen_mov_tl(a0, cpu_A0);
5170
                gen_op_ld_v(s, ot, t0, a0);
B
bellard 已提交
5171 5172 5173
                rm = 0; /* avoid warning */
            }
            label1 = gen_new_label();
5174 5175
            tcg_gen_mov_tl(t2, cpu_regs[R_EAX]);
            gen_extu(ot, t0);
5176
            gen_extu(ot, t2);
5177
            tcg_gen_brcond_tl(TCG_COND_EQ, t2, t0, label1);
5178
            label2 = gen_new_label();
B
bellard 已提交
5179
            if (mod == 3) {
5180
                gen_op_mov_reg_v(ot, R_EAX, t0);
B
bellard 已提交
5181 5182
                tcg_gen_br(label2);
                gen_set_label(label1);
5183
                gen_op_mov_reg_v(ot, rm, t1);
B
bellard 已提交
5184
            } else {
5185 5186 5187
                /* 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 */
5188
                gen_op_st_v(s, ot, t0, a0);
5189
                gen_op_mov_reg_v(ot, R_EAX, t0);
5190
                tcg_gen_br(label2);
B
bellard 已提交
5191
                gen_set_label(label1);
5192
                gen_op_st_v(s, ot, t1, a0);
B
bellard 已提交
5193
            }
5194
            gen_set_label(label2);
5195
            tcg_gen_mov_tl(cpu_cc_src, t0);
5196 5197
            tcg_gen_mov_tl(cpu_cc_srcT, t2);
            tcg_gen_sub_tl(cpu_cc_dst, t2, t0);
5198
            set_cc_op(s, CC_OP_SUBB + ot);
5199 5200 5201 5202
            tcg_temp_free(t0);
            tcg_temp_free(t1);
            tcg_temp_free(t2);
            tcg_temp_free(a0);
B
bellard 已提交
5203 5204 5205
        }
        break;
    case 0x1c7: /* cmpxchg8b */
5206
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5207
        mod = (modrm >> 6) & 3;
5208
        if ((mod == 3) || ((modrm & 0x38) != 0x8))
B
bellard 已提交
5209
            goto illegal_op;
B
bellard 已提交
5210
#ifdef TARGET_X86_64
5211
        if (dflag == MO_64) {
B
bellard 已提交
5212 5213 5214
            if (!(s->cpuid_ext_features & CPUID_EXT_CX16))
                goto illegal_op;
            gen_jmp_im(pc_start - s->cs_base);
5215
            gen_update_cc_op(s);
5216
            gen_lea_modrm(env, s, modrm);
B
Blue Swirl 已提交
5217
            gen_helper_cmpxchg16b(cpu_env, cpu_A0);
B
bellard 已提交
5218 5219 5220 5221 5222 5223
        } else
#endif        
        {
            if (!(s->cpuid_features & CPUID_CX8))
                goto illegal_op;
            gen_jmp_im(pc_start - s->cs_base);
5224
            gen_update_cc_op(s);
5225
            gen_lea_modrm(env, s, modrm);
B
Blue Swirl 已提交
5226
            gen_helper_cmpxchg8b(cpu_env, cpu_A0);
B
bellard 已提交
5227
        }
5228
        set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
5229
        break;
5230

B
bellard 已提交
5231 5232 5233
        /**************************/
        /* push/pop */
    case 0x50 ... 0x57: /* push */
5234
        gen_op_mov_v_reg(MO_32, cpu_T[0], (b & 7) | REX_B(s));
5235
        gen_push_v(s, cpu_T[0]);
B
bellard 已提交
5236 5237
        break;
    case 0x58 ... 0x5f: /* pop */
5238
        ot = gen_pop_T0(s);
B
bellard 已提交
5239
        /* NOTE: order is important for pop %sp */
5240
        gen_pop_update(s, ot);
5241
        gen_op_mov_reg_v(ot, (b & 7) | REX_B(s), cpu_T[0]);
B
bellard 已提交
5242 5243
        break;
    case 0x60: /* pusha */
B
bellard 已提交
5244 5245
        if (CODE64(s))
            goto illegal_op;
B
bellard 已提交
5246 5247 5248
        gen_pusha(s);
        break;
    case 0x61: /* popa */
B
bellard 已提交
5249 5250
        if (CODE64(s))
            goto illegal_op;
B
bellard 已提交
5251 5252 5253 5254
        gen_popa(s);
        break;
    case 0x68: /* push Iv */
    case 0x6a:
5255
        ot = mo_pushpop(s, dflag);
B
bellard 已提交
5256
        if (b == 0x68)
5257
            val = insn_get(env, s, ot);
B
bellard 已提交
5258
        else
5259
            val = (int8_t)insn_get(env, s, MO_8);
5260
        tcg_gen_movi_tl(cpu_T[0], val);
5261
        gen_push_v(s, cpu_T[0]);
B
bellard 已提交
5262 5263
        break;
    case 0x8f: /* pop Ev */
5264
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5265
        mod = (modrm >> 6) & 3;
5266
        ot = gen_pop_T0(s);
B
bellard 已提交
5267 5268
        if (mod == 3) {
            /* NOTE: order is important for pop %sp */
5269
            gen_pop_update(s, ot);
B
bellard 已提交
5270
            rm = (modrm & 7) | REX_B(s);
5271
            gen_op_mov_reg_v(ot, rm, cpu_T[0]);
B
bellard 已提交
5272 5273
        } else {
            /* NOTE: order is important too for MMU exceptions */
B
bellard 已提交
5274
            s->popl_esp_hack = 1 << ot;
5275
            gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 1);
B
bellard 已提交
5276
            s->popl_esp_hack = 0;
5277
            gen_pop_update(s, ot);
B
bellard 已提交
5278
        }
B
bellard 已提交
5279 5280 5281 5282
        break;
    case 0xc8: /* enter */
        {
            int level;
5283
            val = cpu_lduw_code(env, s->pc);
B
bellard 已提交
5284
            s->pc += 2;
5285
            level = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5286 5287 5288 5289 5290
            gen_enter(s, val, level);
        }
        break;
    case 0xc9: /* leave */
        /* XXX: exception not precise (ESP is updated before potential exception) */
B
bellard 已提交
5291
        if (CODE64(s)) {
5292
            gen_op_mov_v_reg(MO_64, cpu_T[0], R_EBP);
5293
            gen_op_mov_reg_v(MO_64, R_ESP, cpu_T[0]);
B
bellard 已提交
5294
        } else if (s->ss32) {
5295
            gen_op_mov_v_reg(MO_32, cpu_T[0], R_EBP);
5296
            gen_op_mov_reg_v(MO_32, R_ESP, cpu_T[0]);
B
bellard 已提交
5297
        } else {
5298
            gen_op_mov_v_reg(MO_16, cpu_T[0], R_EBP);
5299
            gen_op_mov_reg_v(MO_16, R_ESP, cpu_T[0]);
B
bellard 已提交
5300
        }
5301
        ot = gen_pop_T0(s);
5302
        gen_op_mov_reg_v(ot, R_EBP, cpu_T[0]);
5303
        gen_pop_update(s, ot);
B
bellard 已提交
5304 5305 5306 5307 5308
        break;
    case 0x06: /* push es */
    case 0x0e: /* push cs */
    case 0x16: /* push ss */
    case 0x1e: /* push ds */
B
bellard 已提交
5309 5310
        if (CODE64(s))
            goto illegal_op;
B
bellard 已提交
5311
        gen_op_movl_T0_seg(b >> 3);
5312
        gen_push_v(s, cpu_T[0]);
B
bellard 已提交
5313 5314 5315 5316
        break;
    case 0x1a0: /* push fs */
    case 0x1a8: /* push gs */
        gen_op_movl_T0_seg((b >> 3) & 7);
5317
        gen_push_v(s, cpu_T[0]);
B
bellard 已提交
5318 5319 5320 5321
        break;
    case 0x07: /* pop es */
    case 0x17: /* pop ss */
    case 0x1f: /* pop ds */
B
bellard 已提交
5322 5323
        if (CODE64(s))
            goto illegal_op;
B
bellard 已提交
5324
        reg = b >> 3;
5325
        ot = gen_pop_T0(s);
B
bellard 已提交
5326
        gen_movl_seg_T0(s, reg, pc_start - s->cs_base);
5327
        gen_pop_update(s, ot);
B
bellard 已提交
5328
        if (reg == R_SS) {
5329 5330 5331 5332
            /* if reg == SS, inhibit interrupts/trace. */
            /* If several instructions disable interrupts, only the
               _first_ does it */
            if (!(s->tb->flags & HF_INHIBIT_IRQ_MASK))
5333
                gen_helper_set_inhibit_irq(cpu_env);
B
bellard 已提交
5334 5335 5336
            s->tf = 0;
        }
        if (s->is_jmp) {
B
bellard 已提交
5337
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
5338 5339 5340 5341 5342
            gen_eob(s);
        }
        break;
    case 0x1a1: /* pop fs */
    case 0x1a9: /* pop gs */
5343
        ot = gen_pop_T0(s);
B
bellard 已提交
5344
        gen_movl_seg_T0(s, (b >> 3) & 7, pc_start - s->cs_base);
5345
        gen_pop_update(s, ot);
B
bellard 已提交
5346
        if (s->is_jmp) {
B
bellard 已提交
5347
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
5348 5349 5350 5351 5352 5353 5354 5355
            gen_eob(s);
        }
        break;

        /**************************/
        /* mov */
    case 0x88:
    case 0x89: /* mov Gv, Ev */
5356
        ot = mo_b_d(b, dflag);
5357
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5358
        reg = ((modrm >> 3) & 7) | rex_r;
5359

B
bellard 已提交
5360
        /* generate a generic store */
5361
        gen_ldst_modrm(env, s, modrm, ot, reg, 1);
B
bellard 已提交
5362 5363 5364
        break;
    case 0xc6:
    case 0xc7: /* mov Ev, Iv */
5365
        ot = mo_b_d(b, dflag);
5366
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5367
        mod = (modrm >> 6) & 3;
B
bellard 已提交
5368 5369
        if (mod != 3) {
            s->rip_offset = insn_const_size(ot);
5370
            gen_lea_modrm(env, s, modrm);
B
bellard 已提交
5371
        }
5372
        val = insn_get(env, s, ot);
5373
        tcg_gen_movi_tl(cpu_T[0], val);
5374 5375 5376
        if (mod != 3) {
            gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
        } else {
5377
            gen_op_mov_reg_v(ot, (modrm & 7) | REX_B(s), cpu_T[0]);
5378
        }
B
bellard 已提交
5379 5380 5381
        break;
    case 0x8a:
    case 0x8b: /* mov Ev, Gv */
5382
        ot = mo_b_d(b, dflag);
5383
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5384
        reg = ((modrm >> 3) & 7) | rex_r;
5385

5386
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
5387
        gen_op_mov_reg_v(ot, reg, cpu_T[0]);
B
bellard 已提交
5388 5389
        break;
    case 0x8e: /* mov seg, Gv */
5390
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5391 5392 5393
        reg = (modrm >> 3) & 7;
        if (reg >= 6 || reg == R_CS)
            goto illegal_op;
5394
        gen_ldst_modrm(env, s, modrm, MO_16, OR_TMP0, 0);
B
bellard 已提交
5395 5396 5397
        gen_movl_seg_T0(s, reg, pc_start - s->cs_base);
        if (reg == R_SS) {
            /* if reg == SS, inhibit interrupts/trace */
5398 5399 5400
            /* If several instructions disable interrupts, only the
               _first_ does it */
            if (!(s->tb->flags & HF_INHIBIT_IRQ_MASK))
5401
                gen_helper_set_inhibit_irq(cpu_env);
B
bellard 已提交
5402 5403 5404
            s->tf = 0;
        }
        if (s->is_jmp) {
B
bellard 已提交
5405
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
5406 5407 5408 5409
            gen_eob(s);
        }
        break;
    case 0x8c: /* mov Gv, seg */
5410
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5411 5412 5413 5414 5415
        reg = (modrm >> 3) & 7;
        mod = (modrm >> 6) & 3;
        if (reg >= 6)
            goto illegal_op;
        gen_op_movl_T0_seg(reg);
5416
        ot = mod == 3 ? dflag : MO_16;
5417
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 1);
B
bellard 已提交
5418 5419 5420 5421 5422 5423 5424
        break;

    case 0x1b6: /* movzbS Gv, Eb */
    case 0x1b7: /* movzwS Gv, Eb */
    case 0x1be: /* movsbS Gv, Eb */
    case 0x1bf: /* movswS Gv, Eb */
        {
5425 5426 5427
            TCGMemOp d_ot;
            TCGMemOp s_ot;

B
bellard 已提交
5428
            /* d_ot is the size of destination */
5429
            d_ot = dflag;
B
bellard 已提交
5430
            /* ot is the size of source */
5431
            ot = (b & 1) + MO_8;
5432 5433 5434
            /* s_ot is the sign+size of source */
            s_ot = b & 8 ? MO_SIGN | ot : ot;

5435
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5436
            reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5437
            mod = (modrm >> 6) & 3;
B
bellard 已提交
5438
            rm = (modrm & 7) | REX_B(s);
5439

B
bellard 已提交
5440
            if (mod == 3) {
5441
                gen_op_mov_v_reg(ot, cpu_T[0], rm);
5442 5443
                switch (s_ot) {
                case MO_UB:
B
bellard 已提交
5444
                    tcg_gen_ext8u_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
5445
                    break;
5446
                case MO_SB:
B
bellard 已提交
5447
                    tcg_gen_ext8s_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
5448
                    break;
5449
                case MO_UW:
B
bellard 已提交
5450
                    tcg_gen_ext16u_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
5451 5452
                    break;
                default:
5453
                case MO_SW:
B
bellard 已提交
5454
                    tcg_gen_ext16s_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
5455 5456
                    break;
                }
5457
                gen_op_mov_reg_v(d_ot, reg, cpu_T[0]);
B
bellard 已提交
5458
            } else {
5459
                gen_lea_modrm(env, s, modrm);
5460
                gen_op_ld_v(s, s_ot, cpu_T[0], cpu_A0);
5461
                gen_op_mov_reg_v(d_ot, reg, cpu_T[0]);
B
bellard 已提交
5462 5463 5464 5465 5466
            }
        }
        break;

    case 0x8d: /* lea */
5467
        ot = dflag;
5468
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5469 5470 5471
        mod = (modrm >> 6) & 3;
        if (mod == 3)
            goto illegal_op;
B
bellard 已提交
5472
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5473 5474 5475 5476
        /* we must ensure that no segment is added */
        s->override = -1;
        val = s->addseg;
        s->addseg = 0;
5477
        gen_lea_modrm(env, s, modrm);
B
bellard 已提交
5478
        s->addseg = val;
5479
        gen_op_mov_reg_v(ot, reg, cpu_A0);
B
bellard 已提交
5480
        break;
5481

B
bellard 已提交
5482 5483 5484 5485 5486
    case 0xa0: /* mov EAX, Ov */
    case 0xa1:
    case 0xa2: /* mov Ov, EAX */
    case 0xa3:
        {
B
bellard 已提交
5487 5488
            target_ulong offset_addr;

5489
            ot = mo_b_d(b, dflag);
5490
            switch (s->aflag) {
B
bellard 已提交
5491
#ifdef TARGET_X86_64
5492
            case MO_64:
5493
                offset_addr = cpu_ldq_code(env, s->pc);
B
bellard 已提交
5494
                s->pc += 8;
5495
                break;
B
bellard 已提交
5496
#endif
5497 5498 5499
            default:
                offset_addr = insn_get(env, s, s->aflag);
                break;
B
bellard 已提交
5500
            }
5501
            tcg_gen_movi_tl(cpu_A0, offset_addr);
B
bellard 已提交
5502
            gen_add_A0_ds_seg(s);
B
bellard 已提交
5503
            if ((b & 2) == 0) {
5504
                gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
5505
                gen_op_mov_reg_v(ot, R_EAX, cpu_T[0]);
B
bellard 已提交
5506
            } else {
5507
                gen_op_mov_v_reg(ot, cpu_T[0], R_EAX);
5508
                gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
5509 5510 5511 5512
            }
        }
        break;
    case 0xd7: /* xlat */
5513 5514 5515 5516
        tcg_gen_mov_tl(cpu_A0, cpu_regs[R_EBX]);
        tcg_gen_ext8u_tl(cpu_T[0], cpu_regs[R_EAX]);
        tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_T[0]);
        gen_extu(s->aflag, cpu_A0);
B
bellard 已提交
5517
        gen_add_A0_ds_seg(s);
5518
        gen_op_ld_v(s, MO_8, cpu_T[0], cpu_A0);
5519
        gen_op_mov_reg_v(MO_8, R_EAX, cpu_T[0]);
B
bellard 已提交
5520 5521
        break;
    case 0xb0 ... 0xb7: /* mov R, Ib */
5522
        val = insn_get(env, s, MO_8);
5523
        tcg_gen_movi_tl(cpu_T[0], val);
5524
        gen_op_mov_reg_v(MO_8, (b & 7) | REX_B(s), cpu_T[0]);
B
bellard 已提交
5525 5526
        break;
    case 0xb8 ... 0xbf: /* mov R, Iv */
B
bellard 已提交
5527
#ifdef TARGET_X86_64
5528
        if (dflag == MO_64) {
B
bellard 已提交
5529 5530
            uint64_t tmp;
            /* 64 bit case */
5531
            tmp = cpu_ldq_code(env, s->pc);
B
bellard 已提交
5532 5533
            s->pc += 8;
            reg = (b & 7) | REX_B(s);
5534
            tcg_gen_movi_tl(cpu_T[0], tmp);
5535
            gen_op_mov_reg_v(MO_64, reg, cpu_T[0]);
5536
        } else
B
bellard 已提交
5537 5538
#endif
        {
5539
            ot = dflag;
5540
            val = insn_get(env, s, ot);
B
bellard 已提交
5541
            reg = (b & 7) | REX_B(s);
5542
            tcg_gen_movi_tl(cpu_T[0], val);
5543
            gen_op_mov_reg_v(ot, reg, cpu_T[0]);
B
bellard 已提交
5544
        }
B
bellard 已提交
5545 5546 5547
        break;

    case 0x91 ... 0x97: /* xchg R, EAX */
R
Richard Henderson 已提交
5548
    do_xchg_reg_eax:
5549
        ot = dflag;
B
bellard 已提交
5550
        reg = (b & 7) | REX_B(s);
B
bellard 已提交
5551 5552 5553 5554
        rm = R_EAX;
        goto do_xchg_reg;
    case 0x86:
    case 0x87: /* xchg Ev, Gv */
5555
        ot = mo_b_d(b, dflag);
5556
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5557
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5558 5559
        mod = (modrm >> 6) & 3;
        if (mod == 3) {
B
bellard 已提交
5560
            rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
5561
        do_xchg_reg:
5562 5563
            gen_op_mov_v_reg(ot, cpu_T[0], reg);
            gen_op_mov_v_reg(ot, cpu_T[1], rm);
5564
            gen_op_mov_reg_v(ot, rm, cpu_T[0]);
5565
            gen_op_mov_reg_v(ot, reg, cpu_T[1]);
B
bellard 已提交
5566
        } else {
5567
            gen_lea_modrm(env, s, modrm);
5568
            gen_op_mov_v_reg(ot, cpu_T[0], reg);
B
bellard 已提交
5569 5570
            /* for xchg, lock is implicit */
            if (!(prefixes & PREFIX_LOCK))
P
pbrook 已提交
5571
                gen_helper_lock();
5572
            gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
5573
            gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
5574
            if (!(prefixes & PREFIX_LOCK))
P
pbrook 已提交
5575
                gen_helper_unlock();
5576
            gen_op_mov_reg_v(ot, reg, cpu_T[1]);
B
bellard 已提交
5577 5578 5579
        }
        break;
    case 0xc4: /* les Gv */
5580
        /* In CODE64 this is VEX3; see above.  */
B
bellard 已提交
5581 5582 5583
        op = R_ES;
        goto do_lxx;
    case 0xc5: /* lds Gv */
5584
        /* In CODE64 this is VEX2; see above.  */
B
bellard 已提交
5585 5586 5587 5588 5589 5590 5591 5592 5593 5594 5595
        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:
5596
        ot = dflag != MO_16 ? MO_32 : MO_16;
5597
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5598
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5599 5600 5601
        mod = (modrm >> 6) & 3;
        if (mod == 3)
            goto illegal_op;
5602
        gen_lea_modrm(env, s, modrm);
5603
        gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
5604
        gen_add_A0_im(s, 1 << ot);
B
bellard 已提交
5605
        /* load the segment first to handle exceptions properly */
5606
        gen_op_ld_v(s, MO_16, cpu_T[0], cpu_A0);
B
bellard 已提交
5607 5608
        gen_movl_seg_T0(s, op, pc_start - s->cs_base);
        /* then put the data */
5609
        gen_op_mov_reg_v(ot, reg, cpu_T[1]);
B
bellard 已提交
5610
        if (s->is_jmp) {
B
bellard 已提交
5611
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
5612 5613 5614
            gen_eob(s);
        }
        break;
5615

B
bellard 已提交
5616 5617 5618 5619 5620 5621 5622 5623
        /************************/
        /* shifts */
    case 0xc0:
    case 0xc1:
        /* shift Ev,Ib */
        shift = 2;
    grp2:
        {
5624
            ot = mo_b_d(b, dflag);
5625
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5626 5627
            mod = (modrm >> 6) & 3;
            op = (modrm >> 3) & 7;
5628

B
bellard 已提交
5629
            if (mod != 3) {
B
bellard 已提交
5630 5631 5632
                if (shift == 2) {
                    s->rip_offset = 1;
                }
5633
                gen_lea_modrm(env, s, modrm);
B
bellard 已提交
5634 5635
                opreg = OR_TMP0;
            } else {
B
bellard 已提交
5636
                opreg = (modrm & 7) | REX_B(s);
B
bellard 已提交
5637 5638 5639 5640 5641 5642 5643
            }

            /* simpler op */
            if (shift == 0) {
                gen_shift(s, op, ot, opreg, OR_ECX);
            } else {
                if (shift == 2) {
5644
                    shift = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5645 5646 5647 5648 5649 5650 5651 5652 5653 5654 5655 5656 5657 5658 5659 5660 5661 5662 5663 5664 5665 5666 5667 5668 5669 5670 5671 5672 5673 5674 5675 5676
                }
                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:
5677
        ot = dflag;
5678
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5679
        mod = (modrm >> 6) & 3;
B
bellard 已提交
5680 5681
        rm = (modrm & 7) | REX_B(s);
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5682
        if (mod != 3) {
5683
            gen_lea_modrm(env, s, modrm);
5684
            opreg = OR_TMP0;
B
bellard 已提交
5685
        } else {
5686
            opreg = rm;
B
bellard 已提交
5687
        }
5688
        gen_op_mov_v_reg(ot, cpu_T[1], reg);
5689

B
bellard 已提交
5690
        if (shift) {
P
Paolo Bonzini 已提交
5691 5692 5693
            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 已提交
5694
        } else {
P
Paolo Bonzini 已提交
5695
            gen_shiftd_rm_T1(s, ot, opreg, op, cpu_regs[R_ECX]);
B
bellard 已提交
5696 5697 5698 5699 5700
        }
        break;

        /************************/
        /* floats */
5701
    case 0xd8 ... 0xdf:
B
bellard 已提交
5702 5703 5704 5705 5706 5707
        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;
        }
5708
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5709 5710 5711 5712 5713
        mod = (modrm >> 6) & 3;
        rm = modrm & 7;
        op = ((b & 7) << 3) | ((modrm >> 3) & 7);
        if (mod != 3) {
            /* memory op */
5714
            gen_lea_modrm(env, s, modrm);
B
bellard 已提交
5715 5716 5717 5718 5719 5720 5721 5722 5723 5724 5725
            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:
5726 5727
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
B
Blue Swirl 已提交
5728
                        gen_helper_flds_FT0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5729 5730
                        break;
                    case 1:
5731 5732
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
B
Blue Swirl 已提交
5733
                        gen_helper_fildl_FT0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5734 5735
                        break;
                    case 2:
5736 5737
                        tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0,
                                            s->mem_index, MO_LEQ);
B
Blue Swirl 已提交
5738
                        gen_helper_fldl_FT0(cpu_env, cpu_tmp1_i64);
B
bellard 已提交
5739 5740 5741
                        break;
                    case 3:
                    default:
5742 5743
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LESW);
B
Blue Swirl 已提交
5744
                        gen_helper_fildl_FT0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5745 5746
                        break;
                    }
5747

P
pbrook 已提交
5748
                    gen_helper_fp_arith_ST0_FT0(op1);
B
bellard 已提交
5749 5750
                    if (op1 == 3) {
                        /* fcomp needs pop */
B
Blue Swirl 已提交
5751
                        gen_helper_fpop(cpu_env);
B
bellard 已提交
5752 5753 5754 5755 5756 5757
                    }
                }
                break;
            case 0x08: /* flds */
            case 0x0a: /* fsts */
            case 0x0b: /* fstps */
B
bellard 已提交
5758 5759 5760
            case 0x18 ... 0x1b: /* fildl, fisttpl, fistl, fistpl */
            case 0x28 ... 0x2b: /* fldl, fisttpll, fstl, fstpl */
            case 0x38 ... 0x3b: /* filds, fisttps, fists, fistps */
B
bellard 已提交
5761 5762 5763 5764
                switch(op & 7) {
                case 0:
                    switch(op >> 4) {
                    case 0:
5765 5766
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
B
Blue Swirl 已提交
5767
                        gen_helper_flds_ST0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5768 5769
                        break;
                    case 1:
5770 5771
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
B
Blue Swirl 已提交
5772
                        gen_helper_fildl_ST0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5773 5774
                        break;
                    case 2:
5775 5776
                        tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0,
                                            s->mem_index, MO_LEQ);
B
Blue Swirl 已提交
5777
                        gen_helper_fldl_ST0(cpu_env, cpu_tmp1_i64);
B
bellard 已提交
5778 5779 5780
                        break;
                    case 3:
                    default:
5781 5782
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LESW);
B
Blue Swirl 已提交
5783
                        gen_helper_fildl_ST0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5784 5785 5786
                        break;
                    }
                    break;
B
bellard 已提交
5787
                case 1:
B
bellard 已提交
5788
                    /* XXX: the corresponding CPUID bit must be tested ! */
B
bellard 已提交
5789 5790
                    switch(op >> 4) {
                    case 1:
B
Blue Swirl 已提交
5791
                        gen_helper_fisttl_ST0(cpu_tmp2_i32, cpu_env);
5792 5793
                        tcg_gen_qemu_st_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
B
bellard 已提交
5794 5795
                        break;
                    case 2:
B
Blue Swirl 已提交
5796
                        gen_helper_fisttll_ST0(cpu_tmp1_i64, cpu_env);
5797 5798
                        tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0,
                                            s->mem_index, MO_LEQ);
B
bellard 已提交
5799 5800 5801
                        break;
                    case 3:
                    default:
B
Blue Swirl 已提交
5802
                        gen_helper_fistt_ST0(cpu_tmp2_i32, cpu_env);
5803 5804
                        tcg_gen_qemu_st_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUW);
B
bellard 已提交
5805
                        break;
B
bellard 已提交
5806
                    }
B
Blue Swirl 已提交
5807
                    gen_helper_fpop(cpu_env);
B
bellard 已提交
5808
                    break;
B
bellard 已提交
5809 5810 5811
                default:
                    switch(op >> 4) {
                    case 0:
B
Blue Swirl 已提交
5812
                        gen_helper_fsts_ST0(cpu_tmp2_i32, cpu_env);
5813 5814
                        tcg_gen_qemu_st_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
B
bellard 已提交
5815 5816
                        break;
                    case 1:
B
Blue Swirl 已提交
5817
                        gen_helper_fistl_ST0(cpu_tmp2_i32, cpu_env);
5818 5819
                        tcg_gen_qemu_st_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
B
bellard 已提交
5820 5821
                        break;
                    case 2:
B
Blue Swirl 已提交
5822
                        gen_helper_fstl_ST0(cpu_tmp1_i64, cpu_env);
5823 5824
                        tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0,
                                            s->mem_index, MO_LEQ);
B
bellard 已提交
5825 5826 5827
                        break;
                    case 3:
                    default:
B
Blue Swirl 已提交
5828
                        gen_helper_fist_ST0(cpu_tmp2_i32, cpu_env);
5829 5830
                        tcg_gen_qemu_st_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUW);
B
bellard 已提交
5831 5832 5833
                        break;
                    }
                    if ((op & 7) == 3)
B
Blue Swirl 已提交
5834
                        gen_helper_fpop(cpu_env);
B
bellard 已提交
5835 5836 5837 5838
                    break;
                }
                break;
            case 0x0c: /* fldenv mem */
5839
                gen_update_cc_op(s);
B
bellard 已提交
5840
                gen_jmp_im(pc_start - s->cs_base);
5841
                gen_helper_fldenv(cpu_env, cpu_A0, tcg_const_i32(dflag - 1));
B
bellard 已提交
5842 5843
                break;
            case 0x0d: /* fldcw mem */
5844 5845
                tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                    s->mem_index, MO_LEUW);
B
Blue Swirl 已提交
5846
                gen_helper_fldcw(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5847 5848
                break;
            case 0x0e: /* fnstenv mem */
5849
                gen_update_cc_op(s);
B
bellard 已提交
5850
                gen_jmp_im(pc_start - s->cs_base);
5851
                gen_helper_fstenv(cpu_env, cpu_A0, tcg_const_i32(dflag - 1));
B
bellard 已提交
5852 5853
                break;
            case 0x0f: /* fnstcw mem */
B
Blue Swirl 已提交
5854
                gen_helper_fnstcw(cpu_tmp2_i32, cpu_env);
5855 5856
                tcg_gen_qemu_st_i32(cpu_tmp2_i32, cpu_A0,
                                    s->mem_index, MO_LEUW);
B
bellard 已提交
5857 5858
                break;
            case 0x1d: /* fldt mem */
5859
                gen_update_cc_op(s);
B
bellard 已提交
5860
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
5861
                gen_helper_fldt_ST0(cpu_env, cpu_A0);
B
bellard 已提交
5862 5863
                break;
            case 0x1f: /* fstpt mem */
5864
                gen_update_cc_op(s);
B
bellard 已提交
5865
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
5866 5867
                gen_helper_fstt_ST0(cpu_env, cpu_A0);
                gen_helper_fpop(cpu_env);
B
bellard 已提交
5868 5869
                break;
            case 0x2c: /* frstor mem */
5870
                gen_update_cc_op(s);
B
bellard 已提交
5871
                gen_jmp_im(pc_start - s->cs_base);
5872
                gen_helper_frstor(cpu_env, cpu_A0, tcg_const_i32(dflag - 1));
B
bellard 已提交
5873 5874
                break;
            case 0x2e: /* fnsave mem */
5875
                gen_update_cc_op(s);
B
bellard 已提交
5876
                gen_jmp_im(pc_start - s->cs_base);
5877
                gen_helper_fsave(cpu_env, cpu_A0, tcg_const_i32(dflag - 1));
B
bellard 已提交
5878 5879
                break;
            case 0x2f: /* fnstsw mem */
B
Blue Swirl 已提交
5880
                gen_helper_fnstsw(cpu_tmp2_i32, cpu_env);
5881 5882
                tcg_gen_qemu_st_i32(cpu_tmp2_i32, cpu_A0,
                                    s->mem_index, MO_LEUW);
B
bellard 已提交
5883 5884
                break;
            case 0x3c: /* fbld */
5885
                gen_update_cc_op(s);
B
bellard 已提交
5886
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
5887
                gen_helper_fbld_ST0(cpu_env, cpu_A0);
B
bellard 已提交
5888 5889
                break;
            case 0x3e: /* fbstp */
5890
                gen_update_cc_op(s);
B
bellard 已提交
5891
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
5892 5893
                gen_helper_fbst_ST0(cpu_env, cpu_A0);
                gen_helper_fpop(cpu_env);
B
bellard 已提交
5894 5895
                break;
            case 0x3d: /* fildll */
5896
                tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0, s->mem_index, MO_LEQ);
B
Blue Swirl 已提交
5897
                gen_helper_fildll_ST0(cpu_env, cpu_tmp1_i64);
B
bellard 已提交
5898 5899
                break;
            case 0x3f: /* fistpll */
B
Blue Swirl 已提交
5900
                gen_helper_fistll_ST0(cpu_tmp1_i64, cpu_env);
5901
                tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0, s->mem_index, MO_LEQ);
B
Blue Swirl 已提交
5902
                gen_helper_fpop(cpu_env);
B
bellard 已提交
5903 5904 5905 5906 5907 5908 5909 5910 5911 5912
                break;
            default:
                goto illegal_op;
            }
        } else {
            /* register float ops */
            opreg = rm;

            switch(op) {
            case 0x08: /* fld sti */
B
Blue Swirl 已提交
5913 5914 5915
                gen_helper_fpush(cpu_env);
                gen_helper_fmov_ST0_STN(cpu_env,
                                        tcg_const_i32((opreg + 1) & 7));
B
bellard 已提交
5916 5917
                break;
            case 0x09: /* fxchg sti */
B
bellard 已提交
5918 5919
            case 0x29: /* fxchg4 sti, undocumented op */
            case 0x39: /* fxchg7 sti, undocumented op */
B
Blue Swirl 已提交
5920
                gen_helper_fxchg_ST0_STN(cpu_env, tcg_const_i32(opreg));
B
bellard 已提交
5921 5922 5923 5924
                break;
            case 0x0a: /* grp d9/2 */
                switch(rm) {
                case 0: /* fnop */
5925
                    /* check exceptions (FreeBSD FPU probe) */
5926
                    gen_update_cc_op(s);
B
bellard 已提交
5927
                    gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
5928
                    gen_helper_fwait(cpu_env);
B
bellard 已提交
5929 5930 5931 5932 5933 5934 5935 5936
                    break;
                default:
                    goto illegal_op;
                }
                break;
            case 0x0c: /* grp d9/4 */
                switch(rm) {
                case 0: /* fchs */
B
Blue Swirl 已提交
5937
                    gen_helper_fchs_ST0(cpu_env);
B
bellard 已提交
5938 5939
                    break;
                case 1: /* fabs */
B
Blue Swirl 已提交
5940
                    gen_helper_fabs_ST0(cpu_env);
B
bellard 已提交
5941 5942
                    break;
                case 4: /* ftst */
B
Blue Swirl 已提交
5943 5944
                    gen_helper_fldz_FT0(cpu_env);
                    gen_helper_fcom_ST0_FT0(cpu_env);
B
bellard 已提交
5945 5946
                    break;
                case 5: /* fxam */
B
Blue Swirl 已提交
5947
                    gen_helper_fxam_ST0(cpu_env);
B
bellard 已提交
5948 5949 5950 5951 5952 5953 5954 5955 5956
                    break;
                default:
                    goto illegal_op;
                }
                break;
            case 0x0d: /* grp d9/5 */
                {
                    switch(rm) {
                    case 0:
B
Blue Swirl 已提交
5957 5958
                        gen_helper_fpush(cpu_env);
                        gen_helper_fld1_ST0(cpu_env);
B
bellard 已提交
5959 5960
                        break;
                    case 1:
B
Blue Swirl 已提交
5961 5962
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldl2t_ST0(cpu_env);
B
bellard 已提交
5963 5964
                        break;
                    case 2:
B
Blue Swirl 已提交
5965 5966
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldl2e_ST0(cpu_env);
B
bellard 已提交
5967 5968
                        break;
                    case 3:
B
Blue Swirl 已提交
5969 5970
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldpi_ST0(cpu_env);
B
bellard 已提交
5971 5972
                        break;
                    case 4:
B
Blue Swirl 已提交
5973 5974
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldlg2_ST0(cpu_env);
B
bellard 已提交
5975 5976
                        break;
                    case 5:
B
Blue Swirl 已提交
5977 5978
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldln2_ST0(cpu_env);
B
bellard 已提交
5979 5980
                        break;
                    case 6:
B
Blue Swirl 已提交
5981 5982
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldz_ST0(cpu_env);
B
bellard 已提交
5983 5984 5985 5986 5987 5988 5989 5990 5991
                        break;
                    default:
                        goto illegal_op;
                    }
                }
                break;
            case 0x0e: /* grp d9/6 */
                switch(rm) {
                case 0: /* f2xm1 */
B
Blue Swirl 已提交
5992
                    gen_helper_f2xm1(cpu_env);
B
bellard 已提交
5993 5994
                    break;
                case 1: /* fyl2x */
B
Blue Swirl 已提交
5995
                    gen_helper_fyl2x(cpu_env);
B
bellard 已提交
5996 5997
                    break;
                case 2: /* fptan */
B
Blue Swirl 已提交
5998
                    gen_helper_fptan(cpu_env);
B
bellard 已提交
5999 6000
                    break;
                case 3: /* fpatan */
B
Blue Swirl 已提交
6001
                    gen_helper_fpatan(cpu_env);
B
bellard 已提交
6002 6003
                    break;
                case 4: /* fxtract */
B
Blue Swirl 已提交
6004
                    gen_helper_fxtract(cpu_env);
B
bellard 已提交
6005 6006
                    break;
                case 5: /* fprem1 */
B
Blue Swirl 已提交
6007
                    gen_helper_fprem1(cpu_env);
B
bellard 已提交
6008 6009
                    break;
                case 6: /* fdecstp */
B
Blue Swirl 已提交
6010
                    gen_helper_fdecstp(cpu_env);
B
bellard 已提交
6011 6012 6013
                    break;
                default:
                case 7: /* fincstp */
B
Blue Swirl 已提交
6014
                    gen_helper_fincstp(cpu_env);
B
bellard 已提交
6015 6016 6017 6018 6019 6020
                    break;
                }
                break;
            case 0x0f: /* grp d9/7 */
                switch(rm) {
                case 0: /* fprem */
B
Blue Swirl 已提交
6021
                    gen_helper_fprem(cpu_env);
B
bellard 已提交
6022 6023
                    break;
                case 1: /* fyl2xp1 */
B
Blue Swirl 已提交
6024
                    gen_helper_fyl2xp1(cpu_env);
B
bellard 已提交
6025 6026
                    break;
                case 2: /* fsqrt */
B
Blue Swirl 已提交
6027
                    gen_helper_fsqrt(cpu_env);
B
bellard 已提交
6028 6029
                    break;
                case 3: /* fsincos */
B
Blue Swirl 已提交
6030
                    gen_helper_fsincos(cpu_env);
B
bellard 已提交
6031 6032
                    break;
                case 5: /* fscale */
B
Blue Swirl 已提交
6033
                    gen_helper_fscale(cpu_env);
B
bellard 已提交
6034 6035
                    break;
                case 4: /* frndint */
B
Blue Swirl 已提交
6036
                    gen_helper_frndint(cpu_env);
B
bellard 已提交
6037 6038
                    break;
                case 6: /* fsin */
B
Blue Swirl 已提交
6039
                    gen_helper_fsin(cpu_env);
B
bellard 已提交
6040 6041 6042
                    break;
                default:
                case 7: /* fcos */
B
Blue Swirl 已提交
6043
                    gen_helper_fcos(cpu_env);
B
bellard 已提交
6044 6045 6046 6047 6048 6049 6050 6051
                    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;
6052

B
bellard 已提交
6053 6054
                    op1 = op & 7;
                    if (op >= 0x20) {
P
pbrook 已提交
6055
                        gen_helper_fp_arith_STN_ST0(op1, opreg);
B
bellard 已提交
6056
                        if (op >= 0x30)
B
Blue Swirl 已提交
6057
                            gen_helper_fpop(cpu_env);
B
bellard 已提交
6058
                    } else {
B
Blue Swirl 已提交
6059
                        gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
P
pbrook 已提交
6060
                        gen_helper_fp_arith_ST0_FT0(op1);
B
bellard 已提交
6061 6062 6063 6064
                    }
                }
                break;
            case 0x02: /* fcom */
B
bellard 已提交
6065
            case 0x22: /* fcom2, undocumented op */
B
Blue Swirl 已提交
6066 6067
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fcom_ST0_FT0(cpu_env);
B
bellard 已提交
6068 6069
                break;
            case 0x03: /* fcomp */
B
bellard 已提交
6070 6071
            case 0x23: /* fcomp3, undocumented op */
            case 0x32: /* fcomp5, undocumented op */
B
Blue Swirl 已提交
6072 6073 6074
                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 已提交
6075 6076 6077 6078
                break;
            case 0x15: /* da/5 */
                switch(rm) {
                case 1: /* fucompp */
B
Blue Swirl 已提交
6079 6080 6081 6082
                    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 已提交
6083 6084 6085 6086 6087 6088 6089 6090 6091 6092 6093 6094
                    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 已提交
6095
                    gen_helper_fclex(cpu_env);
B
bellard 已提交
6096 6097
                    break;
                case 3: /* fninit */
B
Blue Swirl 已提交
6098
                    gen_helper_fninit(cpu_env);
B
bellard 已提交
6099 6100 6101 6102 6103 6104 6105 6106
                    break;
                case 4: /* fsetpm (287 only, just do nop here) */
                    break;
                default:
                    goto illegal_op;
                }
                break;
            case 0x1d: /* fucomi */
6107 6108 6109
                if (!(s->cpuid_features & CPUID_CMOV)) {
                    goto illegal_op;
                }
6110
                gen_update_cc_op(s);
B
Blue Swirl 已提交
6111 6112
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fucomi_ST0_FT0(cpu_env);
6113
                set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6114 6115
                break;
            case 0x1e: /* fcomi */
6116 6117 6118
                if (!(s->cpuid_features & CPUID_CMOV)) {
                    goto illegal_op;
                }
6119
                gen_update_cc_op(s);
B
Blue Swirl 已提交
6120 6121
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fcomi_ST0_FT0(cpu_env);
6122
                set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6123
                break;
B
bellard 已提交
6124
            case 0x28: /* ffree sti */
B
Blue Swirl 已提交
6125
                gen_helper_ffree_STN(cpu_env, tcg_const_i32(opreg));
6126
                break;
B
bellard 已提交
6127
            case 0x2a: /* fst sti */
B
Blue Swirl 已提交
6128
                gen_helper_fmov_STN_ST0(cpu_env, tcg_const_i32(opreg));
B
bellard 已提交
6129 6130
                break;
            case 0x2b: /* fstp sti */
B
bellard 已提交
6131 6132 6133
            case 0x0b: /* fstp1 sti, undocumented op */
            case 0x3a: /* fstp8 sti, undocumented op */
            case 0x3b: /* fstp9 sti, undocumented op */
B
Blue Swirl 已提交
6134 6135
                gen_helper_fmov_STN_ST0(cpu_env, tcg_const_i32(opreg));
                gen_helper_fpop(cpu_env);
B
bellard 已提交
6136 6137
                break;
            case 0x2c: /* fucom st(i) */
B
Blue Swirl 已提交
6138 6139
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fucom_ST0_FT0(cpu_env);
B
bellard 已提交
6140 6141
                break;
            case 0x2d: /* fucomp st(i) */
B
Blue Swirl 已提交
6142 6143 6144
                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 已提交
6145 6146 6147 6148
                break;
            case 0x33: /* de/3 */
                switch(rm) {
                case 1: /* fcompp */
B
Blue Swirl 已提交
6149 6150 6151 6152
                    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 已提交
6153 6154 6155 6156 6157
                    break;
                default:
                    goto illegal_op;
                }
                break;
B
bellard 已提交
6158
            case 0x38: /* ffreep sti, undocumented op */
B
Blue Swirl 已提交
6159 6160
                gen_helper_ffree_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fpop(cpu_env);
B
bellard 已提交
6161
                break;
B
bellard 已提交
6162 6163 6164
            case 0x3c: /* df/4 */
                switch(rm) {
                case 0:
B
Blue Swirl 已提交
6165
                    gen_helper_fnstsw(cpu_tmp2_i32, cpu_env);
6166
                    tcg_gen_extu_i32_tl(cpu_T[0], cpu_tmp2_i32);
6167
                    gen_op_mov_reg_v(MO_16, R_EAX, cpu_T[0]);
B
bellard 已提交
6168 6169 6170 6171 6172 6173
                    break;
                default:
                    goto illegal_op;
                }
                break;
            case 0x3d: /* fucomip */
6174 6175 6176
                if (!(s->cpuid_features & CPUID_CMOV)) {
                    goto illegal_op;
                }
6177
                gen_update_cc_op(s);
B
Blue Swirl 已提交
6178 6179 6180
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fucomi_ST0_FT0(cpu_env);
                gen_helper_fpop(cpu_env);
6181
                set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6182 6183
                break;
            case 0x3e: /* fcomip */
6184 6185 6186
                if (!(s->cpuid_features & CPUID_CMOV)) {
                    goto illegal_op;
                }
6187
                gen_update_cc_op(s);
B
Blue Swirl 已提交
6188 6189 6190
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fcomi_ST0_FT0(cpu_env);
                gen_helper_fpop(cpu_env);
6191
                set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6192
                break;
6193 6194 6195
            case 0x10 ... 0x13: /* fcmovxx */
            case 0x18 ... 0x1b:
                {
6196 6197
                    int op1;
                    TCGLabel *l1;
6198
                    static const uint8_t fcmov_cc[8] = {
6199 6200 6201 6202 6203
                        (JCC_B << 1),
                        (JCC_Z << 1),
                        (JCC_BE << 1),
                        (JCC_P << 1),
                    };
6204 6205 6206 6207

                    if (!(s->cpuid_features & CPUID_CMOV)) {
                        goto illegal_op;
                    }
6208
                    op1 = fcmov_cc[op & 3] | (((op >> 3) & 1) ^ 1);
B
bellard 已提交
6209
                    l1 = gen_new_label();
6210
                    gen_jcc1_noeob(s, op1, l1);
B
Blue Swirl 已提交
6211
                    gen_helper_fmov_ST0_STN(cpu_env, tcg_const_i32(opreg));
B
bellard 已提交
6212
                    gen_set_label(l1);
6213 6214
                }
                break;
B
bellard 已提交
6215 6216 6217 6218 6219 6220 6221 6222 6223 6224
            default:
                goto illegal_op;
            }
        }
        break;
        /************************/
        /* string ops */

    case 0xa4: /* movsS */
    case 0xa5:
6225
        ot = mo_b_d(b, dflag);
B
bellard 已提交
6226 6227 6228 6229 6230 6231
        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;
6232

B
bellard 已提交
6233 6234
    case 0xaa: /* stosS */
    case 0xab:
6235
        ot = mo_b_d(b, dflag);
B
bellard 已提交
6236 6237 6238 6239 6240 6241 6242 6243
        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:
6244
        ot = mo_b_d(b, dflag);
B
bellard 已提交
6245 6246 6247 6248 6249 6250 6251 6252
        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:
6253
        ot = mo_b_d(b, dflag);
B
bellard 已提交
6254 6255 6256 6257 6258 6259 6260 6261 6262 6263 6264
        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:
6265
        ot = mo_b_d(b, dflag);
B
bellard 已提交
6266 6267 6268 6269 6270 6271 6272 6273 6274 6275
        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:
6276
        ot = mo_b_d32(b, dflag);
6277
        tcg_gen_ext16u_tl(cpu_T[0], cpu_regs[R_EDX]);
6278 6279
        gen_check_io(s, ot, pc_start - s->cs_base, 
                     SVM_IOIO_TYPE_MASK | svm_is_rep(prefixes) | 4);
6280 6281
        if (prefixes & (PREFIX_REPZ | PREFIX_REPNZ)) {
            gen_repz_ins(s, ot, pc_start - s->cs_base, s->pc - s->cs_base);
B
bellard 已提交
6282
        } else {
6283
            gen_ins(s, ot);
6284
            if (s->tb->cflags & CF_USE_ICOUNT) {
P
pbrook 已提交
6285 6286
                gen_jmp(s, s->pc - s->cs_base);
            }
B
bellard 已提交
6287 6288 6289 6290
        }
        break;
    case 0x6e: /* outsS */
    case 0x6f:
6291
        ot = mo_b_d32(b, dflag);
6292
        tcg_gen_ext16u_tl(cpu_T[0], cpu_regs[R_EDX]);
6293 6294
        gen_check_io(s, ot, pc_start - s->cs_base,
                     svm_is_rep(prefixes) | 4);
6295 6296
        if (prefixes & (PREFIX_REPZ | PREFIX_REPNZ)) {
            gen_repz_outs(s, ot, pc_start - s->cs_base, s->pc - s->cs_base);
B
bellard 已提交
6297
        } else {
6298
            gen_outs(s, ot);
6299
            if (s->tb->cflags & CF_USE_ICOUNT) {
P
pbrook 已提交
6300 6301
                gen_jmp(s, s->pc - s->cs_base);
            }
B
bellard 已提交
6302 6303 6304 6305 6306
        }
        break;

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

B
bellard 已提交
6308 6309
    case 0xe4:
    case 0xe5:
6310
        ot = mo_b_d32(b, dflag);
6311
        val = cpu_ldub_code(env, s->pc++);
6312
        tcg_gen_movi_tl(cpu_T[0], val);
6313 6314
        gen_check_io(s, ot, pc_start - s->cs_base,
                     SVM_IOIO_TYPE_MASK | svm_is_rep(prefixes));
6315
        if (s->tb->cflags & CF_USE_ICOUNT) {
P
pbrook 已提交
6316
            gen_io_start();
6317
	}
6318
        tcg_gen_movi_i32(cpu_tmp2_i32, val);
P
pbrook 已提交
6319
        gen_helper_in_func(ot, cpu_T[1], cpu_tmp2_i32);
6320
        gen_op_mov_reg_v(ot, R_EAX, cpu_T[1]);
6321
        if (s->tb->cflags & CF_USE_ICOUNT) {
P
pbrook 已提交
6322 6323 6324
            gen_io_end();
            gen_jmp(s, s->pc - s->cs_base);
        }
B
bellard 已提交
6325 6326 6327
        break;
    case 0xe6:
    case 0xe7:
6328
        ot = mo_b_d32(b, dflag);
6329
        val = cpu_ldub_code(env, s->pc++);
6330
        tcg_gen_movi_tl(cpu_T[0], val);
6331 6332
        gen_check_io(s, ot, pc_start - s->cs_base,
                     svm_is_rep(prefixes));
6333
        gen_op_mov_v_reg(ot, cpu_T[1], R_EAX);
6334

6335
        if (s->tb->cflags & CF_USE_ICOUNT) {
P
pbrook 已提交
6336
            gen_io_start();
6337
	}
6338
        tcg_gen_movi_i32(cpu_tmp2_i32, val);
6339
        tcg_gen_trunc_tl_i32(cpu_tmp3_i32, cpu_T[1]);
P
pbrook 已提交
6340
        gen_helper_out_func(ot, cpu_tmp2_i32, cpu_tmp3_i32);
6341
        if (s->tb->cflags & CF_USE_ICOUNT) {
P
pbrook 已提交
6342 6343 6344
            gen_io_end();
            gen_jmp(s, s->pc - s->cs_base);
        }
B
bellard 已提交
6345 6346 6347
        break;
    case 0xec:
    case 0xed:
6348
        ot = mo_b_d32(b, dflag);
6349
        tcg_gen_ext16u_tl(cpu_T[0], cpu_regs[R_EDX]);
6350 6351
        gen_check_io(s, ot, pc_start - s->cs_base,
                     SVM_IOIO_TYPE_MASK | svm_is_rep(prefixes));
6352
        if (s->tb->cflags & CF_USE_ICOUNT) {
P
pbrook 已提交
6353
            gen_io_start();
6354
	}
6355
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
P
pbrook 已提交
6356
        gen_helper_in_func(ot, cpu_T[1], cpu_tmp2_i32);
6357
        gen_op_mov_reg_v(ot, R_EAX, cpu_T[1]);
6358
        if (s->tb->cflags & CF_USE_ICOUNT) {
P
pbrook 已提交
6359 6360 6361
            gen_io_end();
            gen_jmp(s, s->pc - s->cs_base);
        }
B
bellard 已提交
6362 6363 6364
        break;
    case 0xee:
    case 0xef:
6365
        ot = mo_b_d32(b, dflag);
6366
        tcg_gen_ext16u_tl(cpu_T[0], cpu_regs[R_EDX]);
6367 6368
        gen_check_io(s, ot, pc_start - s->cs_base,
                     svm_is_rep(prefixes));
6369
        gen_op_mov_v_reg(ot, cpu_T[1], R_EAX);
6370

6371
        if (s->tb->cflags & CF_USE_ICOUNT) {
P
pbrook 已提交
6372
            gen_io_start();
6373
	}
6374 6375
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
        tcg_gen_trunc_tl_i32(cpu_tmp3_i32, cpu_T[1]);
P
pbrook 已提交
6376
        gen_helper_out_func(ot, cpu_tmp2_i32, cpu_tmp3_i32);
6377
        if (s->tb->cflags & CF_USE_ICOUNT) {
P
pbrook 已提交
6378 6379 6380
            gen_io_end();
            gen_jmp(s, s->pc - s->cs_base);
        }
B
bellard 已提交
6381 6382 6383 6384 6385
        break;

        /************************/
        /* control */
    case 0xc2: /* ret im */
6386
        val = cpu_ldsw_code(env, s->pc);
B
bellard 已提交
6387
        s->pc += 2;
6388 6389 6390
        ot = gen_pop_T0(s);
        gen_stack_update(s, val + (1 << ot));
        /* Note that gen_pop_T0 uses a zero-extending load.  */
6391
        gen_op_jmp_v(cpu_T[0]);
B
bellard 已提交
6392 6393 6394
        gen_eob(s);
        break;
    case 0xc3: /* ret */
6395 6396 6397
        ot = gen_pop_T0(s);
        gen_pop_update(s, ot);
        /* Note that gen_pop_T0 uses a zero-extending load.  */
6398
        gen_op_jmp_v(cpu_T[0]);
B
bellard 已提交
6399 6400 6401
        gen_eob(s);
        break;
    case 0xca: /* lret im */
6402
        val = cpu_ldsw_code(env, s->pc);
B
bellard 已提交
6403 6404 6405
        s->pc += 2;
    do_lret:
        if (s->pe && !s->vm86) {
6406
            gen_update_cc_op(s);
B
bellard 已提交
6407
            gen_jmp_im(pc_start - s->cs_base);
6408
            gen_helper_lret_protected(cpu_env, tcg_const_i32(dflag - 1),
P
pbrook 已提交
6409
                                      tcg_const_i32(val));
B
bellard 已提交
6410 6411 6412
        } else {
            gen_stack_A0(s);
            /* pop offset */
6413
            gen_op_ld_v(s, dflag, cpu_T[0], cpu_A0);
B
bellard 已提交
6414 6415
            /* NOTE: keeping EIP updated is not a problem in case of
               exception */
6416
            gen_op_jmp_v(cpu_T[0]);
B
bellard 已提交
6417
            /* pop selector */
6418 6419
            gen_op_addl_A0_im(1 << dflag);
            gen_op_ld_v(s, dflag, cpu_T[0], cpu_A0);
6420
            gen_op_movl_seg_T0_vm(R_CS);
B
bellard 已提交
6421
            /* add stack offset */
6422
            gen_stack_update(s, val + (2 << dflag));
B
bellard 已提交
6423 6424 6425 6426 6427 6428 6429
        }
        gen_eob(s);
        break;
    case 0xcb: /* lret */
        val = 0;
        goto do_lret;
    case 0xcf: /* iret */
B
bellard 已提交
6430
        gen_svm_check_intercept(s, pc_start, SVM_EXIT_IRET);
B
bellard 已提交
6431 6432
        if (!s->pe) {
            /* real mode */
6433
            gen_helper_iret_real(cpu_env, tcg_const_i32(dflag - 1));
6434
            set_cc_op(s, CC_OP_EFLAGS);
6435 6436 6437 6438
        } else if (s->vm86) {
            if (s->iopl != 3) {
                gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
            } else {
6439
                gen_helper_iret_real(cpu_env, tcg_const_i32(dflag - 1));
6440
                set_cc_op(s, CC_OP_EFLAGS);
6441
            }
B
bellard 已提交
6442
        } else {
6443
            gen_update_cc_op(s);
B
bellard 已提交
6444
            gen_jmp_im(pc_start - s->cs_base);
6445
            gen_helper_iret_protected(cpu_env, tcg_const_i32(dflag - 1),
P
pbrook 已提交
6446
                                      tcg_const_i32(s->pc - s->cs_base));
6447
            set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6448 6449 6450 6451 6452
        }
        gen_eob(s);
        break;
    case 0xe8: /* call im */
        {
6453
            if (dflag != MO_16) {
6454
                tval = (int32_t)insn_get(env, s, MO_32);
6455
            } else {
6456
                tval = (int16_t)insn_get(env, s, MO_16);
6457
            }
B
bellard 已提交
6458
            next_eip = s->pc - s->cs_base;
B
bellard 已提交
6459
            tval += next_eip;
6460
            if (dflag == MO_16) {
B
bellard 已提交
6461
                tval &= 0xffff;
6462
            } else if (!CODE64(s)) {
6463
                tval &= 0xffffffff;
6464
            }
6465
            tcg_gen_movi_tl(cpu_T[0], next_eip);
6466
            gen_push_v(s, cpu_T[0]);
B
bellard 已提交
6467
            gen_jmp(s, tval);
B
bellard 已提交
6468 6469 6470 6471 6472
        }
        break;
    case 0x9a: /* lcall im */
        {
            unsigned int selector, offset;
6473

B
bellard 已提交
6474 6475
            if (CODE64(s))
                goto illegal_op;
6476
            ot = dflag;
6477
            offset = insn_get(env, s, ot);
6478
            selector = insn_get(env, s, MO_16);
6479

6480
            tcg_gen_movi_tl(cpu_T[0], selector);
6481
            tcg_gen_movi_tl(cpu_T[1], offset);
B
bellard 已提交
6482 6483
        }
        goto do_lcall;
B
bellard 已提交
6484
    case 0xe9: /* jmp im */
6485
        if (dflag != MO_16) {
6486
            tval = (int32_t)insn_get(env, s, MO_32);
6487
        } else {
6488
            tval = (int16_t)insn_get(env, s, MO_16);
6489
        }
B
bellard 已提交
6490
        tval += s->pc - s->cs_base;
6491
        if (dflag == MO_16) {
B
bellard 已提交
6492
            tval &= 0xffff;
6493
        } else if (!CODE64(s)) {
6494
            tval &= 0xffffffff;
6495
        }
B
bellard 已提交
6496
        gen_jmp(s, tval);
B
bellard 已提交
6497 6498 6499 6500 6501
        break;
    case 0xea: /* ljmp im */
        {
            unsigned int selector, offset;

B
bellard 已提交
6502 6503
            if (CODE64(s))
                goto illegal_op;
6504
            ot = dflag;
6505
            offset = insn_get(env, s, ot);
6506
            selector = insn_get(env, s, MO_16);
6507

6508
            tcg_gen_movi_tl(cpu_T[0], selector);
6509
            tcg_gen_movi_tl(cpu_T[1], offset);
B
bellard 已提交
6510 6511 6512
        }
        goto do_ljmp;
    case 0xeb: /* jmp Jb */
6513
        tval = (int8_t)insn_get(env, s, MO_8);
B
bellard 已提交
6514
        tval += s->pc - s->cs_base;
6515
        if (dflag == MO_16) {
B
bellard 已提交
6516
            tval &= 0xffff;
6517
        }
B
bellard 已提交
6518
        gen_jmp(s, tval);
B
bellard 已提交
6519 6520
        break;
    case 0x70 ... 0x7f: /* jcc Jb */
6521
        tval = (int8_t)insn_get(env, s, MO_8);
B
bellard 已提交
6522 6523
        goto do_jcc;
    case 0x180 ... 0x18f: /* jcc Jv */
6524
        if (dflag != MO_16) {
6525
            tval = (int32_t)insn_get(env, s, MO_32);
B
bellard 已提交
6526
        } else {
6527
            tval = (int16_t)insn_get(env, s, MO_16);
B
bellard 已提交
6528 6529 6530
        }
    do_jcc:
        next_eip = s->pc - s->cs_base;
B
bellard 已提交
6531
        tval += next_eip;
6532
        if (dflag == MO_16) {
B
bellard 已提交
6533
            tval &= 0xffff;
6534
        }
B
bellard 已提交
6535
        gen_jcc(s, b, tval, next_eip);
B
bellard 已提交
6536 6537 6538
        break;

    case 0x190 ... 0x19f: /* setcc Gv */
6539
        modrm = cpu_ldub_code(env, s->pc++);
6540
        gen_setcc1(s, b, cpu_T[0]);
6541
        gen_ldst_modrm(env, s, modrm, MO_8, OR_TMP0, 1);
B
bellard 已提交
6542 6543
        break;
    case 0x140 ... 0x14f: /* cmov Gv, Ev */
6544 6545 6546
        if (!(s->cpuid_features & CPUID_CMOV)) {
            goto illegal_op;
        }
6547
        ot = dflag;
6548 6549 6550
        modrm = cpu_ldub_code(env, s->pc++);
        reg = ((modrm >> 3) & 7) | rex_r;
        gen_cmovcc1(env, s, ot, b, modrm, reg);
B
bellard 已提交
6551
        break;
6552

B
bellard 已提交
6553 6554 6555
        /************************/
        /* flags */
    case 0x9c: /* pushf */
B
bellard 已提交
6556
        gen_svm_check_intercept(s, pc_start, SVM_EXIT_PUSHF);
B
bellard 已提交
6557 6558 6559
        if (s->vm86 && s->iopl != 3) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
6560
            gen_update_cc_op(s);
6561
            gen_helper_read_eflags(cpu_T[0], cpu_env);
6562
            gen_push_v(s, cpu_T[0]);
B
bellard 已提交
6563 6564 6565
        }
        break;
    case 0x9d: /* popf */
B
bellard 已提交
6566
        gen_svm_check_intercept(s, pc_start, SVM_EXIT_POPF);
B
bellard 已提交
6567 6568 6569
        if (s->vm86 && s->iopl != 3) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
6570
            ot = gen_pop_T0(s);
B
bellard 已提交
6571
            if (s->cpl == 0) {
6572
                if (dflag != MO_16) {
6573 6574 6575 6576 6577
                    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 已提交
6578
                } else {
6579 6580 6581 6582 6583
                    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 已提交
6584 6585
                }
            } else {
B
bellard 已提交
6586
                if (s->cpl <= s->iopl) {
6587
                    if (dflag != MO_16) {
6588 6589 6590 6591 6592 6593
                        gen_helper_write_eflags(cpu_env, cpu_T[0],
                                                tcg_const_i32((TF_MASK |
                                                               AC_MASK |
                                                               ID_MASK |
                                                               NT_MASK |
                                                               IF_MASK)));
B
bellard 已提交
6594
                    } else {
6595 6596 6597 6598 6599 6600 6601
                        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 已提交
6602
                    }
B
bellard 已提交
6603
                } else {
6604
                    if (dflag != MO_16) {
6605 6606 6607
                        gen_helper_write_eflags(cpu_env, cpu_T[0],
                                           tcg_const_i32((TF_MASK | AC_MASK |
                                                          ID_MASK | NT_MASK)));
B
bellard 已提交
6608
                    } else {
6609 6610 6611 6612
                        gen_helper_write_eflags(cpu_env, cpu_T[0],
                                           tcg_const_i32((TF_MASK | AC_MASK |
                                                          ID_MASK | NT_MASK)
                                                         & 0xffff));
B
bellard 已提交
6613
                    }
B
bellard 已提交
6614 6615
                }
            }
6616
            gen_pop_update(s, ot);
6617
            set_cc_op(s, CC_OP_EFLAGS);
H
H. Peter Anvin 已提交
6618
            /* abort translation because TF/AC flag may change */
B
bellard 已提交
6619
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
6620 6621 6622 6623
            gen_eob(s);
        }
        break;
    case 0x9e: /* sahf */
B
bellard 已提交
6624
        if (CODE64(s) && !(s->cpuid_ext3_features & CPUID_EXT3_LAHF_LM))
B
bellard 已提交
6625
            goto illegal_op;
6626
        gen_op_mov_v_reg(MO_8, cpu_T[0], R_AH);
6627
        gen_compute_eflags(s);
6628 6629 6630
        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 已提交
6631 6632
        break;
    case 0x9f: /* lahf */
B
bellard 已提交
6633
        if (CODE64(s) && !(s->cpuid_ext3_features & CPUID_EXT3_LAHF_LM))
B
bellard 已提交
6634
            goto illegal_op;
6635
        gen_compute_eflags(s);
6636
        /* Note: gen_compute_eflags() only gives the condition codes */
6637
        tcg_gen_ori_tl(cpu_T[0], cpu_cc_src, 0x02);
6638
        gen_op_mov_reg_v(MO_8, R_AH, cpu_T[0]);
B
bellard 已提交
6639 6640
        break;
    case 0xf5: /* cmc */
6641
        gen_compute_eflags(s);
6642
        tcg_gen_xori_tl(cpu_cc_src, cpu_cc_src, CC_C);
B
bellard 已提交
6643 6644
        break;
    case 0xf8: /* clc */
6645
        gen_compute_eflags(s);
6646
        tcg_gen_andi_tl(cpu_cc_src, cpu_cc_src, ~CC_C);
B
bellard 已提交
6647 6648
        break;
    case 0xf9: /* stc */
6649
        gen_compute_eflags(s);
6650
        tcg_gen_ori_tl(cpu_cc_src, cpu_cc_src, CC_C);
B
bellard 已提交
6651 6652
        break;
    case 0xfc: /* cld */
6653
        tcg_gen_movi_i32(cpu_tmp2_i32, 1);
6654
        tcg_gen_st_i32(cpu_tmp2_i32, cpu_env, offsetof(CPUX86State, df));
B
bellard 已提交
6655 6656
        break;
    case 0xfd: /* std */
6657
        tcg_gen_movi_i32(cpu_tmp2_i32, -1);
6658
        tcg_gen_st_i32(cpu_tmp2_i32, cpu_env, offsetof(CPUX86State, df));
B
bellard 已提交
6659 6660 6661 6662 6663
        break;

        /************************/
        /* bit operations */
    case 0x1ba: /* bt/bts/btr/btc Gv, im */
6664
        ot = dflag;
6665
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
6666
        op = (modrm >> 3) & 7;
B
bellard 已提交
6667
        mod = (modrm >> 6) & 3;
B
bellard 已提交
6668
        rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
6669
        if (mod != 3) {
B
bellard 已提交
6670
            s->rip_offset = 1;
6671
            gen_lea_modrm(env, s, modrm);
6672
            gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
6673
        } else {
6674
            gen_op_mov_v_reg(ot, cpu_T[0], rm);
B
bellard 已提交
6675 6676
        }
        /* load shift */
6677
        val = cpu_ldub_code(env, s->pc++);
6678
        tcg_gen_movi_tl(cpu_T[1], val);
B
bellard 已提交
6679 6680 6681
        if (op < 4)
            goto illegal_op;
        op -= 4;
B
bellard 已提交
6682
        goto bt_op;
B
bellard 已提交
6683 6684 6685 6686 6687 6688 6689 6690 6691 6692 6693 6694
    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:
6695
        ot = dflag;
6696
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
6697
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
6698
        mod = (modrm >> 6) & 3;
B
bellard 已提交
6699
        rm = (modrm & 7) | REX_B(s);
6700
        gen_op_mov_v_reg(MO_32, cpu_T[1], reg);
B
bellard 已提交
6701
        if (mod != 3) {
6702
            gen_lea_modrm(env, s, modrm);
B
bellard 已提交
6703
            /* specific case: we need to add a displacement */
B
bellard 已提交
6704 6705 6706 6707
            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);
6708
            gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
6709
        } else {
6710
            gen_op_mov_v_reg(ot, cpu_T[0], rm);
B
bellard 已提交
6711
        }
B
bellard 已提交
6712 6713
    bt_op:
        tcg_gen_andi_tl(cpu_T[1], cpu_T[1], (1 << (3 + ot)) - 1);
6714
        tcg_gen_shr_tl(cpu_tmp4, cpu_T[0], cpu_T[1]);
B
bellard 已提交
6715 6716 6717 6718 6719 6720 6721 6722 6723 6724 6725
        switch(op) {
        case 0:
            break;
        case 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_movi_tl(cpu_tmp0, 1);
            tcg_gen_shl_tl(cpu_tmp0, cpu_tmp0, cpu_T[1]);
6726
            tcg_gen_andc_tl(cpu_T[0], cpu_T[0], cpu_tmp0);
B
bellard 已提交
6727 6728 6729 6730 6731 6732 6733 6734
            break;
        default:
        case 3:
            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;
        }
B
bellard 已提交
6735
        if (op != 0) {
6736 6737 6738
            if (mod != 3) {
                gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
            } else {
6739
                gen_op_mov_reg_v(ot, rm, cpu_T[0]);
6740
            }
6741 6742 6743 6744 6745 6746 6747 6748 6749 6750 6751 6752 6753 6754 6755 6756 6757 6758 6759 6760 6761
        }

        /* Delay all CC updates until after the store above.  Note that
           C is the result of the test, Z is unchanged, and the others
           are all undefined.  */
        switch (s->cc_op) {
        case CC_OP_MULB ... CC_OP_MULQ:
        case CC_OP_ADDB ... CC_OP_ADDQ:
        case CC_OP_ADCB ... CC_OP_ADCQ:
        case CC_OP_SUBB ... CC_OP_SUBQ:
        case CC_OP_SBBB ... CC_OP_SBBQ:
        case CC_OP_LOGICB ... CC_OP_LOGICQ:
        case CC_OP_INCB ... CC_OP_INCQ:
        case CC_OP_DECB ... CC_OP_DECQ:
        case CC_OP_SHLB ... CC_OP_SHLQ:
        case CC_OP_SARB ... CC_OP_SARQ:
        case CC_OP_BMILGB ... CC_OP_BMILGQ:
            /* Z was going to be computed from the non-zero status of CC_DST.
               We can get that same Z value (and the new C value) by leaving
               CC_DST alone, setting CC_SRC, and using a CC_OP_SAR of the
               same width.  */
B
bellard 已提交
6762
            tcg_gen_mov_tl(cpu_cc_src, cpu_tmp4);
6763 6764 6765 6766 6767 6768 6769 6770
            set_cc_op(s, ((s->cc_op - CC_OP_MULB) & 3) + CC_OP_SARB);
            break;
        default:
            /* Otherwise, generate EFLAGS and replace the C bit.  */
            gen_compute_eflags(s);
            tcg_gen_deposit_tl(cpu_cc_src, cpu_cc_src, cpu_tmp4,
                               ctz32(CC_C), 1);
            break;
B
bellard 已提交
6771 6772
        }
        break;
6773 6774
    case 0x1bc: /* bsf / tzcnt */
    case 0x1bd: /* bsr / lzcnt */
6775
        ot = dflag;
6776 6777 6778 6779 6780 6781 6782 6783 6784 6785 6786 6787 6788 6789 6790 6791 6792
        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 已提交
6793
            } else {
6794 6795 6796 6797 6798
                /* 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 已提交
6799
            }
6800 6801 6802 6803 6804 6805 6806 6807 6808 6809 6810 6811 6812 6813 6814 6815 6816 6817 6818 6819 6820 6821 6822
            /* 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 已提交
6823
        }
6824
        gen_op_mov_reg_v(ot, reg, cpu_T[0]);
B
bellard 已提交
6825 6826 6827 6828
        break;
        /************************/
        /* bcd */
    case 0x27: /* daa */
B
bellard 已提交
6829 6830
        if (CODE64(s))
            goto illegal_op;
6831
        gen_update_cc_op(s);
6832
        gen_helper_daa(cpu_env);
6833
        set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6834 6835
        break;
    case 0x2f: /* das */
B
bellard 已提交
6836 6837
        if (CODE64(s))
            goto illegal_op;
6838
        gen_update_cc_op(s);
6839
        gen_helper_das(cpu_env);
6840
        set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6841 6842
        break;
    case 0x37: /* aaa */
B
bellard 已提交
6843 6844
        if (CODE64(s))
            goto illegal_op;
6845
        gen_update_cc_op(s);
6846
        gen_helper_aaa(cpu_env);
6847
        set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6848 6849
        break;
    case 0x3f: /* aas */
B
bellard 已提交
6850 6851
        if (CODE64(s))
            goto illegal_op;
6852
        gen_update_cc_op(s);
6853
        gen_helper_aas(cpu_env);
6854
        set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6855 6856
        break;
    case 0xd4: /* aam */
B
bellard 已提交
6857 6858
        if (CODE64(s))
            goto illegal_op;
6859
        val = cpu_ldub_code(env, s->pc++);
6860 6861 6862
        if (val == 0) {
            gen_exception(s, EXCP00_DIVZ, pc_start - s->cs_base);
        } else {
6863
            gen_helper_aam(cpu_env, tcg_const_i32(val));
6864
            set_cc_op(s, CC_OP_LOGICB);
6865
        }
B
bellard 已提交
6866 6867
        break;
    case 0xd5: /* aad */
B
bellard 已提交
6868 6869
        if (CODE64(s))
            goto illegal_op;
6870
        val = cpu_ldub_code(env, s->pc++);
6871
        gen_helper_aad(cpu_env, tcg_const_i32(val));
6872
        set_cc_op(s, CC_OP_LOGICB);
B
bellard 已提交
6873 6874 6875 6876
        break;
        /************************/
        /* misc */
    case 0x90: /* nop */
6877
        /* XXX: correct lock test for all insn */
R
Richard Henderson 已提交
6878
        if (prefixes & PREFIX_LOCK) {
6879
            goto illegal_op;
R
Richard Henderson 已提交
6880 6881 6882 6883 6884
        }
        /* 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 已提交
6885
        if (prefixes & PREFIX_REPZ) {
6886 6887 6888 6889
            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 已提交
6890
        }
B
bellard 已提交
6891 6892
        break;
    case 0x9b: /* fwait */
6893
        if ((s->flags & (HF_MP_MASK | HF_TS_MASK)) ==
B
bellard 已提交
6894 6895
            (HF_MP_MASK | HF_TS_MASK)) {
            gen_exception(s, EXCP07_PREX, pc_start - s->cs_base);
B
bellard 已提交
6896
        } else {
6897
            gen_update_cc_op(s);
B
bellard 已提交
6898
            gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
6899
            gen_helper_fwait(cpu_env);
B
bellard 已提交
6900
        }
B
bellard 已提交
6901 6902 6903 6904 6905
        break;
    case 0xcc: /* int3 */
        gen_interrupt(s, EXCP03_INT3, pc_start - s->cs_base, s->pc - s->cs_base);
        break;
    case 0xcd: /* int N */
6906
        val = cpu_ldub_code(env, s->pc++);
6907
        if (s->vm86 && s->iopl != 3) {
6908
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
6909 6910 6911
        } else {
            gen_interrupt(s, val, pc_start - s->cs_base, s->pc - s->cs_base);
        }
B
bellard 已提交
6912 6913
        break;
    case 0xce: /* into */
B
bellard 已提交
6914 6915
        if (CODE64(s))
            goto illegal_op;
6916
        gen_update_cc_op(s);
6917
        gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
6918
        gen_helper_into(cpu_env, tcg_const_i32(s->pc - pc_start));
B
bellard 已提交
6919
        break;
A
aurel32 已提交
6920
#ifdef WANT_ICEBP
B
bellard 已提交
6921
    case 0xf1: /* icebp (undocumented, exits to external debugger) */
B
bellard 已提交
6922
        gen_svm_check_intercept(s, pc_start, SVM_EXIT_ICEBP);
6923
#if 1
B
bellard 已提交
6924
        gen_debug(s, pc_start - s->cs_base);
6925 6926
#else
        /* start debug */
6927
        tb_flush(CPU(x86_env_get_cpu(env)));
6928
        qemu_set_log(CPU_LOG_INT | CPU_LOG_TB_IN_ASM);
6929
#endif
B
bellard 已提交
6930
        break;
A
aurel32 已提交
6931
#endif
B
bellard 已提交
6932 6933 6934
    case 0xfa: /* cli */
        if (!s->vm86) {
            if (s->cpl <= s->iopl) {
6935
                gen_helper_cli(cpu_env);
B
bellard 已提交
6936 6937 6938 6939 6940
            } else {
                gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
            }
        } else {
            if (s->iopl == 3) {
6941
                gen_helper_cli(cpu_env);
B
bellard 已提交
6942 6943 6944 6945 6946 6947 6948 6949 6950
            } 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:
6951
                gen_helper_sti(cpu_env);
B
bellard 已提交
6952
                /* interruptions are enabled only the first insn after sti */
6953 6954 6955
                /* If several instructions disable interrupts, only the
                   _first_ does it */
                if (!(s->tb->flags & HF_INHIBIT_IRQ_MASK))
6956
                    gen_helper_set_inhibit_irq(cpu_env);
B
bellard 已提交
6957
                /* give a chance to handle pending irqs */
B
bellard 已提交
6958
                gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
6959 6960 6961 6962 6963 6964 6965 6966 6967 6968 6969 6970 6971
                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 已提交
6972 6973
        if (CODE64(s))
            goto illegal_op;
6974
        ot = dflag;
6975
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
6976 6977 6978 6979
        reg = (modrm >> 3) & 7;
        mod = (modrm >> 6) & 3;
        if (mod == 3)
            goto illegal_op;
6980
        gen_op_mov_v_reg(ot, cpu_T[0], reg);
6981
        gen_lea_modrm(env, s, modrm);
B
bellard 已提交
6982
        gen_jmp_im(pc_start - s->cs_base);
6983
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
6984
        if (ot == MO_16) {
B
Blue Swirl 已提交
6985 6986 6987 6988
            gen_helper_boundw(cpu_env, cpu_A0, cpu_tmp2_i32);
        } else {
            gen_helper_boundl(cpu_env, cpu_A0, cpu_tmp2_i32);
        }
B
bellard 已提交
6989 6990
        break;
    case 0x1c8 ... 0x1cf: /* bswap reg */
B
bellard 已提交
6991 6992
        reg = (b & 7) | REX_B(s);
#ifdef TARGET_X86_64
6993
        if (dflag == MO_64) {
6994
            gen_op_mov_v_reg(MO_64, cpu_T[0], reg);
A
aurel32 已提交
6995
            tcg_gen_bswap64_i64(cpu_T[0], cpu_T[0]);
6996
            gen_op_mov_reg_v(MO_64, reg, cpu_T[0]);
6997
        } else
6998
#endif
B
bellard 已提交
6999
        {
7000
            gen_op_mov_v_reg(MO_32, cpu_T[0], reg);
7001 7002
            tcg_gen_ext32u_tl(cpu_T[0], cpu_T[0]);
            tcg_gen_bswap32_tl(cpu_T[0], cpu_T[0]);
7003
            gen_op_mov_reg_v(MO_32, reg, cpu_T[0]);
B
bellard 已提交
7004
        }
B
bellard 已提交
7005 7006
        break;
    case 0xd6: /* salc */
B
bellard 已提交
7007 7008
        if (CODE64(s))
            goto illegal_op;
7009
        gen_compute_eflags_c(s, cpu_T[0]);
7010
        tcg_gen_neg_tl(cpu_T[0], cpu_T[0]);
7011
        gen_op_mov_reg_v(MO_8, R_EAX, cpu_T[0]);
B
bellard 已提交
7012 7013 7014 7015 7016
        break;
    case 0xe0: /* loopnz */
    case 0xe1: /* loopz */
    case 0xe2: /* loop */
    case 0xe3: /* jecxz */
B
bellard 已提交
7017
        {
7018
            TCGLabel *l1, *l2, *l3;
B
bellard 已提交
7019

7020
            tval = (int8_t)insn_get(env, s, MO_8);
B
bellard 已提交
7021 7022
            next_eip = s->pc - s->cs_base;
            tval += next_eip;
7023
            if (dflag == MO_16) {
B
bellard 已提交
7024
                tval &= 0xffff;
7025
            }
7026

B
bellard 已提交
7027 7028
            l1 = gen_new_label();
            l2 = gen_new_label();
7029
            l3 = gen_new_label();
B
bellard 已提交
7030
            b &= 3;
7031 7032 7033
            switch(b) {
            case 0: /* loopnz */
            case 1: /* loopz */
7034 7035
                gen_op_add_reg_im(s->aflag, R_ECX, -1);
                gen_op_jz_ecx(s->aflag, l3);
7036
                gen_jcc1(s, (JCC_Z << 1) | (b ^ 1), l1);
7037 7038
                break;
            case 2: /* loop */
7039 7040
                gen_op_add_reg_im(s->aflag, R_ECX, -1);
                gen_op_jnz_ecx(s->aflag, l1);
7041 7042 7043
                break;
            default:
            case 3: /* jcxz */
7044
                gen_op_jz_ecx(s->aflag, l1);
7045
                break;
B
bellard 已提交
7046 7047
            }

7048
            gen_set_label(l3);
B
bellard 已提交
7049
            gen_jmp_im(next_eip);
7050
            tcg_gen_br(l2);
7051

B
bellard 已提交
7052 7053 7054 7055 7056
            gen_set_label(l1);
            gen_jmp_im(tval);
            gen_set_label(l2);
            gen_eob(s);
        }
B
bellard 已提交
7057 7058 7059 7060 7061 7062
        break;
    case 0x130: /* wrmsr */
    case 0x132: /* rdmsr */
        if (s->cpl != 0) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
7063
            gen_update_cc_op(s);
B
bellard 已提交
7064
            gen_jmp_im(pc_start - s->cs_base);
T
ths 已提交
7065
            if (b & 2) {
B
Blue Swirl 已提交
7066
                gen_helper_rdmsr(cpu_env);
T
ths 已提交
7067
            } else {
B
Blue Swirl 已提交
7068
                gen_helper_wrmsr(cpu_env);
T
ths 已提交
7069
            }
B
bellard 已提交
7070 7071 7072
        }
        break;
    case 0x131: /* rdtsc */
7073
        gen_update_cc_op(s);
B
bellard 已提交
7074
        gen_jmp_im(pc_start - s->cs_base);
7075
        if (s->tb->cflags & CF_USE_ICOUNT) {
P
pbrook 已提交
7076
            gen_io_start();
7077
	}
B
Blue Swirl 已提交
7078
        gen_helper_rdtsc(cpu_env);
7079
        if (s->tb->cflags & CF_USE_ICOUNT) {
P
pbrook 已提交
7080 7081 7082
            gen_io_end();
            gen_jmp(s, s->pc - s->cs_base);
        }
B
bellard 已提交
7083
        break;
7084
    case 0x133: /* rdpmc */
7085
        gen_update_cc_op(s);
7086
        gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
7087
        gen_helper_rdpmc(cpu_env);
7088
        break;
7089
    case 0x134: /* sysenter */
7090
        /* For Intel SYSENTER is valid on 64-bit */
7091
        if (CODE64(s) && env->cpuid_vendor1 != CPUID_VENDOR_INTEL_1)
B
bellard 已提交
7092
            goto illegal_op;
7093 7094 7095
        if (!s->pe) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
J
Jun Koi 已提交
7096
            gen_update_cc_op(s);
B
bellard 已提交
7097
            gen_jmp_im(pc_start - s->cs_base);
7098
            gen_helper_sysenter(cpu_env);
7099 7100 7101 7102
            gen_eob(s);
        }
        break;
    case 0x135: /* sysexit */
7103
        /* For Intel SYSEXIT is valid on 64-bit */
7104
        if (CODE64(s) && env->cpuid_vendor1 != CPUID_VENDOR_INTEL_1)
B
bellard 已提交
7105
            goto illegal_op;
7106 7107 7108
        if (!s->pe) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
J
Jun Koi 已提交
7109
            gen_update_cc_op(s);
B
bellard 已提交
7110
            gen_jmp_im(pc_start - s->cs_base);
7111
            gen_helper_sysexit(cpu_env, tcg_const_i32(dflag - 1));
7112 7113 7114
            gen_eob(s);
        }
        break;
B
bellard 已提交
7115 7116 7117
#ifdef TARGET_X86_64
    case 0x105: /* syscall */
        /* XXX: is it usable in real mode ? */
J
Jun Koi 已提交
7118
        gen_update_cc_op(s);
B
bellard 已提交
7119
        gen_jmp_im(pc_start - s->cs_base);
7120
        gen_helper_syscall(cpu_env, tcg_const_i32(s->pc - pc_start));
B
bellard 已提交
7121 7122 7123 7124 7125 7126
        gen_eob(s);
        break;
    case 0x107: /* sysret */
        if (!s->pe) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
J
Jun Koi 已提交
7127
            gen_update_cc_op(s);
B
bellard 已提交
7128
            gen_jmp_im(pc_start - s->cs_base);
7129
            gen_helper_sysret(cpu_env, tcg_const_i32(dflag - 1));
7130
            /* condition codes are modified only in long mode */
7131 7132 7133
            if (s->lma) {
                set_cc_op(s, CC_OP_EFLAGS);
            }
B
bellard 已提交
7134 7135 7136 7137
            gen_eob(s);
        }
        break;
#endif
B
bellard 已提交
7138
    case 0x1a2: /* cpuid */
7139
        gen_update_cc_op(s);
B
bellard 已提交
7140
        gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
7141
        gen_helper_cpuid(cpu_env);
B
bellard 已提交
7142 7143 7144 7145 7146
        break;
    case 0xf4: /* hlt */
        if (s->cpl != 0) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
7147
            gen_update_cc_op(s);
7148
            gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
7149
            gen_helper_hlt(cpu_env, tcg_const_i32(s->pc - pc_start));
J
Jun Koi 已提交
7150
            s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
7151 7152 7153
        }
        break;
    case 0x100:
7154
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7155 7156 7157 7158
        mod = (modrm >> 6) & 3;
        op = (modrm >> 3) & 7;
        switch(op) {
        case 0: /* sldt */
7159 7160
            if (!s->pe || s->vm86)
                goto illegal_op;
B
bellard 已提交
7161
            gen_svm_check_intercept(s, pc_start, SVM_EXIT_LDTR_READ);
B
bellard 已提交
7162
            tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,ldt.selector));
7163
            ot = mod == 3 ? dflag : MO_16;
7164
            gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 1);
B
bellard 已提交
7165 7166
            break;
        case 2: /* lldt */
7167 7168
            if (!s->pe || s->vm86)
                goto illegal_op;
B
bellard 已提交
7169 7170 7171
            if (s->cpl != 0) {
                gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
            } else {
B
bellard 已提交
7172
                gen_svm_check_intercept(s, pc_start, SVM_EXIT_LDTR_WRITE);
7173
                gen_ldst_modrm(env, s, modrm, MO_16, OR_TMP0, 0);
B
bellard 已提交
7174
                gen_jmp_im(pc_start - s->cs_base);
7175
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
7176
                gen_helper_lldt(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
7177 7178 7179
            }
            break;
        case 1: /* str */
7180 7181
            if (!s->pe || s->vm86)
                goto illegal_op;
B
bellard 已提交
7182
            gen_svm_check_intercept(s, pc_start, SVM_EXIT_TR_READ);
B
bellard 已提交
7183
            tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,tr.selector));
7184
            ot = mod == 3 ? dflag : MO_16;
7185
            gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 1);
B
bellard 已提交
7186 7187
            break;
        case 3: /* ltr */
7188 7189
            if (!s->pe || s->vm86)
                goto illegal_op;
B
bellard 已提交
7190 7191 7192
            if (s->cpl != 0) {
                gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
            } else {
B
bellard 已提交
7193
                gen_svm_check_intercept(s, pc_start, SVM_EXIT_TR_WRITE);
7194
                gen_ldst_modrm(env, s, modrm, MO_16, OR_TMP0, 0);
B
bellard 已提交
7195
                gen_jmp_im(pc_start - s->cs_base);
7196
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
7197
                gen_helper_ltr(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
7198 7199 7200 7201
            }
            break;
        case 4: /* verr */
        case 5: /* verw */
7202 7203
            if (!s->pe || s->vm86)
                goto illegal_op;
7204
            gen_ldst_modrm(env, s, modrm, MO_16, OR_TMP0, 0);
7205
            gen_update_cc_op(s);
7206 7207 7208 7209 7210
            if (op == 4) {
                gen_helper_verr(cpu_env, cpu_T[0]);
            } else {
                gen_helper_verw(cpu_env, cpu_T[0]);
            }
7211
            set_cc_op(s, CC_OP_EFLAGS);
7212
            break;
B
bellard 已提交
7213 7214 7215 7216 7217
        default:
            goto illegal_op;
        }
        break;
    case 0x101:
7218
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7219 7220
        mod = (modrm >> 6) & 3;
        op = (modrm >> 3) & 7;
B
bellard 已提交
7221
        rm = modrm & 7;
B
bellard 已提交
7222 7223 7224 7225
        switch(op) {
        case 0: /* sgdt */
            if (mod == 3)
                goto illegal_op;
B
bellard 已提交
7226
            gen_svm_check_intercept(s, pc_start, SVM_EXIT_GDTR_READ);
7227
            gen_lea_modrm(env, s, modrm);
B
bellard 已提交
7228
            tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State, gdt.limit));
7229
            gen_op_st_v(s, MO_16, cpu_T[0], cpu_A0);
7230
            gen_add_A0_im(s, 2);
B
bellard 已提交
7231
            tcg_gen_ld_tl(cpu_T[0], cpu_env, offsetof(CPUX86State, gdt.base));
7232
            if (dflag == MO_16) {
7233 7234
                tcg_gen_andi_tl(cpu_T[0], cpu_T[0], 0xffffff);
            }
7235
            gen_op_st_v(s, CODE64(s) + MO_32, cpu_T[0], cpu_A0);
B
bellard 已提交
7236
            break;
B
bellard 已提交
7237 7238 7239 7240 7241 7242 7243
        case 1:
            if (mod == 3) {
                switch (rm) {
                case 0: /* monitor */
                    if (!(s->cpuid_ext_features & CPUID_EXT_MONITOR) ||
                        s->cpl != 0)
                        goto illegal_op;
7244
                    gen_update_cc_op(s);
B
bellard 已提交
7245
                    gen_jmp_im(pc_start - s->cs_base);
7246 7247
                    tcg_gen_mov_tl(cpu_A0, cpu_regs[R_EAX]);
                    gen_extu(s->aflag, cpu_A0);
B
bellard 已提交
7248
                    gen_add_A0_ds_seg(s);
B
Blue Swirl 已提交
7249
                    gen_helper_monitor(cpu_env, cpu_A0);
B
bellard 已提交
7250 7251 7252 7253 7254
                    break;
                case 1: /* mwait */
                    if (!(s->cpuid_ext_features & CPUID_EXT_MONITOR) ||
                        s->cpl != 0)
                        goto illegal_op;
J
Jun Koi 已提交
7255
                    gen_update_cc_op(s);
7256
                    gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
7257
                    gen_helper_mwait(cpu_env, tcg_const_i32(s->pc - pc_start));
B
bellard 已提交
7258 7259
                    gen_eob(s);
                    break;
H
H. Peter Anvin 已提交
7260 7261 7262 7263 7264 7265 7266 7267 7268 7269 7270 7271 7272 7273 7274 7275 7276 7277
                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 已提交
7278 7279 7280 7281
                default:
                    goto illegal_op;
                }
            } else { /* sidt */
B
bellard 已提交
7282
                gen_svm_check_intercept(s, pc_start, SVM_EXIT_IDTR_READ);
7283
                gen_lea_modrm(env, s, modrm);
B
bellard 已提交
7284
                tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State, idt.limit));
7285
                gen_op_st_v(s, MO_16, cpu_T[0], cpu_A0);
B
bellard 已提交
7286
                gen_add_A0_im(s, 2);
B
bellard 已提交
7287
                tcg_gen_ld_tl(cpu_T[0], cpu_env, offsetof(CPUX86State, idt.base));
7288
                if (dflag == MO_16) {
7289 7290
                    tcg_gen_andi_tl(cpu_T[0], cpu_T[0], 0xffffff);
                }
7291
                gen_op_st_v(s, CODE64(s) + MO_32, cpu_T[0], cpu_A0);
B
bellard 已提交
7292 7293
            }
            break;
B
bellard 已提交
7294 7295
        case 2: /* lgdt */
        case 3: /* lidt */
T
ths 已提交
7296
            if (mod == 3) {
7297
                gen_update_cc_op(s);
B
bellard 已提交
7298
                gen_jmp_im(pc_start - s->cs_base);
T
ths 已提交
7299 7300
                switch(rm) {
                case 0: /* VMRUN */
B
bellard 已提交
7301 7302 7303 7304
                    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 已提交
7305
                        break;
B
bellard 已提交
7306
                    } else {
7307
                        gen_helper_vmrun(cpu_env, tcg_const_i32(s->aflag - 1),
P
pbrook 已提交
7308
                                         tcg_const_i32(s->pc - pc_start));
7309
                        tcg_gen_exit_tb(0);
J
Jun Koi 已提交
7310
                        s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
7311
                    }
T
ths 已提交
7312 7313
                    break;
                case 1: /* VMMCALL */
B
bellard 已提交
7314 7315
                    if (!(s->flags & HF_SVME_MASK))
                        goto illegal_op;
B
Blue Swirl 已提交
7316
                    gen_helper_vmmcall(cpu_env);
T
ths 已提交
7317 7318
                    break;
                case 2: /* VMLOAD */
B
bellard 已提交
7319 7320 7321 7322 7323 7324
                    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 {
7325
                        gen_helper_vmload(cpu_env, tcg_const_i32(s->aflag - 1));
B
bellard 已提交
7326
                    }
T
ths 已提交
7327 7328
                    break;
                case 3: /* VMSAVE */
B
bellard 已提交
7329 7330 7331 7332 7333 7334
                    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 {
7335
                        gen_helper_vmsave(cpu_env, tcg_const_i32(s->aflag - 1));
B
bellard 已提交
7336
                    }
T
ths 已提交
7337 7338
                    break;
                case 4: /* STGI */
B
bellard 已提交
7339 7340 7341 7342 7343 7344 7345 7346
                    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 已提交
7347
                        gen_helper_stgi(cpu_env);
B
bellard 已提交
7348
                    }
T
ths 已提交
7349 7350
                    break;
                case 5: /* CLGI */
B
bellard 已提交
7351 7352 7353 7354 7355 7356
                    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 已提交
7357
                        gen_helper_clgi(cpu_env);
B
bellard 已提交
7358
                    }
T
ths 已提交
7359 7360
                    break;
                case 6: /* SKINIT */
B
bellard 已提交
7361 7362 7363 7364
                    if ((!(s->flags & HF_SVME_MASK) && 
                         !(s->cpuid_ext3_features & CPUID_EXT3_SKINIT)) || 
                        !s->pe)
                        goto illegal_op;
B
Blue Swirl 已提交
7365
                    gen_helper_skinit(cpu_env);
T
ths 已提交
7366 7367
                    break;
                case 7: /* INVLPGA */
B
bellard 已提交
7368 7369 7370 7371 7372 7373
                    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 {
7374 7375
                        gen_helper_invlpga(cpu_env,
                                           tcg_const_i32(s->aflag - 1));
B
bellard 已提交
7376
                    }
T
ths 已提交
7377 7378 7379 7380 7381
                    break;
                default:
                    goto illegal_op;
                }
            } else if (s->cpl != 0) {
B
bellard 已提交
7382 7383
                gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
            } else {
B
bellard 已提交
7384 7385
                gen_svm_check_intercept(s, pc_start,
                                        op==2 ? SVM_EXIT_GDTR_WRITE : SVM_EXIT_IDTR_WRITE);
7386
                gen_lea_modrm(env, s, modrm);
7387
                gen_op_ld_v(s, MO_16, cpu_T[1], cpu_A0);
7388
                gen_add_A0_im(s, 2);
7389
                gen_op_ld_v(s, CODE64(s) + MO_32, cpu_T[0], cpu_A0);
7390
                if (dflag == MO_16) {
7391 7392
                    tcg_gen_andi_tl(cpu_T[0], cpu_T[0], 0xffffff);
                }
B
bellard 已提交
7393
                if (op == 2) {
B
bellard 已提交
7394 7395
                    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 已提交
7396
                } else {
B
bellard 已提交
7397 7398
                    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 已提交
7399 7400 7401 7402
                }
            }
            break;
        case 4: /* smsw */
B
bellard 已提交
7403
            gen_svm_check_intercept(s, pc_start, SVM_EXIT_READ_CR0);
7404
#if defined TARGET_X86_64 && defined HOST_WORDS_BIGENDIAN
7405 7406
            tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,cr[0]) + 4);
#else
B
bellard 已提交
7407
            tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,cr[0]));
7408
#endif
7409
            gen_ldst_modrm(env, s, modrm, MO_16, OR_TMP0, 1);
B
bellard 已提交
7410 7411 7412 7413 7414
            break;
        case 6: /* lmsw */
            if (s->cpl != 0) {
                gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
            } else {
B
bellard 已提交
7415
                gen_svm_check_intercept(s, pc_start, SVM_EXIT_WRITE_CR0);
7416
                gen_ldst_modrm(env, s, modrm, MO_16, OR_TMP0, 0);
B
Blue Swirl 已提交
7417
                gen_helper_lmsw(cpu_env, cpu_T[0]);
B
bellard 已提交
7418
                gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
7419
                gen_eob(s);
B
bellard 已提交
7420 7421
            }
            break;
A
Andre Przywara 已提交
7422 7423 7424 7425 7426
        case 7:
            if (mod != 3) { /* invlpg */
                if (s->cpl != 0) {
                    gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
                } else {
7427
                    gen_update_cc_op(s);
A
Andre Przywara 已提交
7428
                    gen_jmp_im(pc_start - s->cs_base);
7429
                    gen_lea_modrm(env, s, modrm);
B
Blue Swirl 已提交
7430
                    gen_helper_invlpg(cpu_env, cpu_A0);
A
Andre Przywara 已提交
7431 7432 7433
                    gen_jmp_im(s->pc - s->cs_base);
                    gen_eob(s);
                }
B
bellard 已提交
7434
            } else {
A
Andre Przywara 已提交
7435 7436
                switch (rm) {
                case 0: /* swapgs */
B
bellard 已提交
7437
#ifdef TARGET_X86_64
A
Andre Przywara 已提交
7438 7439 7440 7441 7442 7443 7444 7445 7446 7447 7448 7449 7450
                    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));
                        }
7451
                    } else
B
bellard 已提交
7452 7453 7454 7455
#endif
                    {
                        goto illegal_op;
                    }
A
Andre Przywara 已提交
7456 7457 7458 7459
                    break;
                case 1: /* rdtscp */
                    if (!(s->cpuid_ext2_features & CPUID_EXT2_RDTSCP))
                        goto illegal_op;
7460
                    gen_update_cc_op(s);
B
bellard 已提交
7461
                    gen_jmp_im(pc_start - s->cs_base);
7462
                    if (s->tb->cflags & CF_USE_ICOUNT) {
A
Andre Przywara 已提交
7463
                        gen_io_start();
7464
		    }
B
Blue Swirl 已提交
7465
                    gen_helper_rdtscp(cpu_env);
7466
                    if (s->tb->cflags & CF_USE_ICOUNT) {
A
Andre Przywara 已提交
7467 7468 7469 7470 7471 7472
                        gen_io_end();
                        gen_jmp(s, s->pc - s->cs_base);
                    }
                    break;
                default:
                    goto illegal_op;
B
bellard 已提交
7473
                }
B
bellard 已提交
7474 7475 7476 7477 7478 7479
            }
            break;
        default:
            goto illegal_op;
        }
        break;
7480 7481 7482 7483 7484
    case 0x108: /* invd */
    case 0x109: /* wbinvd */
        if (s->cpl != 0) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
B
bellard 已提交
7485
            gen_svm_check_intercept(s, pc_start, (b & 2) ? SVM_EXIT_INVD : SVM_EXIT_WBINVD);
7486 7487 7488
            /* nothing to do */
        }
        break;
B
bellard 已提交
7489 7490 7491 7492 7493
    case 0x63: /* arpl or movslS (x86_64) */
#ifdef TARGET_X86_64
        if (CODE64(s)) {
            int d_ot;
            /* d_ot is the size of destination */
7494
            d_ot = dflag;
B
bellard 已提交
7495

7496
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7497 7498 7499
            reg = ((modrm >> 3) & 7) | rex_r;
            mod = (modrm >> 6) & 3;
            rm = (modrm & 7) | REX_B(s);
7500

B
bellard 已提交
7501
            if (mod == 3) {
7502
                gen_op_mov_v_reg(MO_32, cpu_T[0], rm);
B
bellard 已提交
7503
                /* sign extend */
7504
                if (d_ot == MO_64) {
B
bellard 已提交
7505
                    tcg_gen_ext32s_tl(cpu_T[0], cpu_T[0]);
7506
                }
7507
                gen_op_mov_reg_v(d_ot, reg, cpu_T[0]);
B
bellard 已提交
7508
            } else {
7509
                gen_lea_modrm(env, s, modrm);
R
Richard Henderson 已提交
7510
                gen_op_ld_v(s, MO_32 | MO_SIGN, cpu_T[0], cpu_A0);
7511
                gen_op_mov_reg_v(d_ot, reg, cpu_T[0]);
B
bellard 已提交
7512
            }
7513
        } else
B
bellard 已提交
7514 7515
#endif
        {
7516
            TCGLabel *label1;
L
Laurent Desnogues 已提交
7517
            TCGv t0, t1, t2, a0;
7518

B
bellard 已提交
7519 7520
            if (!s->pe || s->vm86)
                goto illegal_op;
P
pbrook 已提交
7521 7522 7523
            t0 = tcg_temp_local_new();
            t1 = tcg_temp_local_new();
            t2 = tcg_temp_local_new();
7524
            ot = MO_16;
7525
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7526 7527 7528 7529
            reg = (modrm >> 3) & 7;
            mod = (modrm >> 6) & 3;
            rm = modrm & 7;
            if (mod != 3) {
7530
                gen_lea_modrm(env, s, modrm);
7531
                gen_op_ld_v(s, ot, t0, cpu_A0);
L
Laurent Desnogues 已提交
7532 7533
                a0 = tcg_temp_local_new();
                tcg_gen_mov_tl(a0, cpu_A0);
B
bellard 已提交
7534
            } else {
7535
                gen_op_mov_v_reg(ot, t0, rm);
L
Laurent Desnogues 已提交
7536
                TCGV_UNUSED(a0);
B
bellard 已提交
7537
            }
7538 7539 7540 7541
            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);
7542
            label1 = gen_new_label();
7543 7544 7545 7546
            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);
7547
            gen_set_label(label1);
B
bellard 已提交
7548
            if (mod != 3) {
7549
                gen_op_st_v(s, ot, t0, a0);
L
Laurent Desnogues 已提交
7550 7551
                tcg_temp_free(a0);
           } else {
7552
                gen_op_mov_reg_v(ot, rm, t0);
B
bellard 已提交
7553
            }
7554
            gen_compute_eflags(s);
7555
            tcg_gen_andi_tl(cpu_cc_src, cpu_cc_src, ~CC_Z);
7556 7557 7558 7559
            tcg_gen_or_tl(cpu_cc_src, cpu_cc_src, t2);
            tcg_temp_free(t0);
            tcg_temp_free(t1);
            tcg_temp_free(t2);
7560 7561
        }
        break;
B
bellard 已提交
7562 7563
    case 0x102: /* lar */
    case 0x103: /* lsl */
7564
        {
7565
            TCGLabel *label1;
7566
            TCGv t0;
7567 7568
            if (!s->pe || s->vm86)
                goto illegal_op;
7569
            ot = dflag != MO_16 ? MO_32 : MO_16;
7570
            modrm = cpu_ldub_code(env, s->pc++);
7571
            reg = ((modrm >> 3) & 7) | rex_r;
7572
            gen_ldst_modrm(env, s, modrm, MO_16, OR_TMP0, 0);
P
pbrook 已提交
7573
            t0 = tcg_temp_local_new();
7574
            gen_update_cc_op(s);
7575 7576 7577 7578 7579
            if (b == 0x102) {
                gen_helper_lar(t0, cpu_env, cpu_T[0]);
            } else {
                gen_helper_lsl(t0, cpu_env, cpu_T[0]);
            }
7580 7581
            tcg_gen_andi_tl(cpu_tmp0, cpu_cc_src, CC_Z);
            label1 = gen_new_label();
P
pbrook 已提交
7582
            tcg_gen_brcondi_tl(TCG_COND_EQ, cpu_tmp0, 0, label1);
7583
            gen_op_mov_reg_v(ot, reg, t0);
7584
            gen_set_label(label1);
7585
            set_cc_op(s, CC_OP_EFLAGS);
7586
            tcg_temp_free(t0);
7587
        }
B
bellard 已提交
7588 7589
        break;
    case 0x118:
7590
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7591 7592 7593 7594 7595 7596 7597 7598 7599
        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;
7600
            gen_lea_modrm(env, s, modrm);
B
bellard 已提交
7601 7602
            /* nothing more to do */
            break;
B
bellard 已提交
7603
        default: /* nop (multi byte) */
7604
            gen_nop_modrm(env, s, modrm);
B
bellard 已提交
7605
            break;
B
bellard 已提交
7606 7607
        }
        break;
B
bellard 已提交
7608
    case 0x119 ... 0x11f: /* nop (multi byte) */
7609 7610
        modrm = cpu_ldub_code(env, s->pc++);
        gen_nop_modrm(env, s, modrm);
B
bellard 已提交
7611
        break;
B
bellard 已提交
7612 7613 7614 7615 7616
    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 {
7617
            modrm = cpu_ldub_code(env, s->pc++);
7618 7619 7620 7621 7622
            /* 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 已提交
7623 7624 7625
            rm = (modrm & 7) | REX_B(s);
            reg = ((modrm >> 3) & 7) | rex_r;
            if (CODE64(s))
7626
                ot = MO_64;
B
bellard 已提交
7627
            else
7628
                ot = MO_32;
7629 7630 7631 7632
            if ((prefixes & PREFIX_LOCK) && (reg == 0) &&
                (s->cpuid_ext3_features & CPUID_EXT3_CR8LEG)) {
                reg = 8;
            }
B
bellard 已提交
7633 7634 7635 7636 7637
            switch(reg) {
            case 0:
            case 2:
            case 3:
            case 4:
B
bellard 已提交
7638
            case 8:
7639
                gen_update_cc_op(s);
B
bellard 已提交
7640
                gen_jmp_im(pc_start - s->cs_base);
B
bellard 已提交
7641
                if (b & 2) {
7642
                    gen_op_mov_v_reg(ot, cpu_T[0], rm);
B
Blue Swirl 已提交
7643 7644
                    gen_helper_write_crN(cpu_env, tcg_const_i32(reg),
                                         cpu_T[0]);
B
bellard 已提交
7645
                    gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
7646 7647
                    gen_eob(s);
                } else {
B
Blue Swirl 已提交
7648
                    gen_helper_read_crN(cpu_T[0], cpu_env, tcg_const_i32(reg));
7649
                    gen_op_mov_reg_v(ot, rm, cpu_T[0]);
B
bellard 已提交
7650 7651 7652 7653 7654 7655 7656 7657 7658 7659 7660 7661
                }
                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 {
7662
            modrm = cpu_ldub_code(env, s->pc++);
7663 7664 7665 7666 7667
            /* 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 已提交
7668 7669 7670
            rm = (modrm & 7) | REX_B(s);
            reg = ((modrm >> 3) & 7) | rex_r;
            if (CODE64(s))
7671
                ot = MO_64;
B
bellard 已提交
7672
            else
7673
                ot = MO_32;
B
bellard 已提交
7674
            /* XXX: do it dynamically with CR4.DE bit */
B
bellard 已提交
7675
            if (reg == 4 || reg == 5 || reg >= 8)
B
bellard 已提交
7676 7677
                goto illegal_op;
            if (b & 2) {
T
ths 已提交
7678
                gen_svm_check_intercept(s, pc_start, SVM_EXIT_WRITE_DR0 + reg);
7679
                gen_op_mov_v_reg(ot, cpu_T[0], rm);
B
Blue Swirl 已提交
7680
                gen_helper_movl_drN_T0(cpu_env, tcg_const_i32(reg), cpu_T[0]);
B
bellard 已提交
7681
                gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
7682 7683
                gen_eob(s);
            } else {
T
ths 已提交
7684
                gen_svm_check_intercept(s, pc_start, SVM_EXIT_READ_DR0 + reg);
B
bellard 已提交
7685
                tcg_gen_ld_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,dr[reg]));
7686
                gen_op_mov_reg_v(ot, rm, cpu_T[0]);
B
bellard 已提交
7687 7688 7689 7690 7691 7692 7693
            }
        }
        break;
    case 0x106: /* clts */
        if (s->cpl != 0) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
T
ths 已提交
7694
            gen_svm_check_intercept(s, pc_start, SVM_EXIT_WRITE_CR0);
7695
            gen_helper_clts(cpu_env);
B
bellard 已提交
7696
            /* abort block because static cpu state changed */
B
bellard 已提交
7697
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
7698
            gen_eob(s);
B
bellard 已提交
7699 7700
        }
        break;
B
balrog 已提交
7701
    /* MMX/3DNow!/SSE/SSE2/SSE3/SSSE3/SSE4 support */
B
bellard 已提交
7702 7703
    case 0x1c3: /* MOVNTI reg, mem */
        if (!(s->cpuid_features & CPUID_SSE2))
B
bellard 已提交
7704
            goto illegal_op;
7705
        ot = mo_64_32(dflag);
7706
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7707 7708 7709 7710 7711
        mod = (modrm >> 6) & 3;
        if (mod == 3)
            goto illegal_op;
        reg = ((modrm >> 3) & 7) | rex_r;
        /* generate a generic store */
7712
        gen_ldst_modrm(env, s, modrm, ot, reg, 1);
B
bellard 已提交
7713
        break;
B
bellard 已提交
7714
    case 0x1ae:
7715
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7716 7717 7718 7719
        mod = (modrm >> 6) & 3;
        op = (modrm >> 3) & 7;
        switch(op) {
        case 0: /* fxsave */
7720
            if (mod == 3 || !(s->cpuid_features & CPUID_FXSR) ||
7721
                (s->prefix & PREFIX_LOCK))
B
bellard 已提交
7722
                goto illegal_op;
7723
            if ((s->flags & HF_EM_MASK) || (s->flags & HF_TS_MASK)) {
B
bellard 已提交
7724 7725 7726
                gen_exception(s, EXCP07_PREX, pc_start - s->cs_base);
                break;
            }
7727
            gen_lea_modrm(env, s, modrm);
7728
            gen_update_cc_op(s);
B
bellard 已提交
7729
            gen_jmp_im(pc_start - s->cs_base);
7730
            gen_helper_fxsave(cpu_env, cpu_A0, tcg_const_i32(dflag == MO_64));
B
bellard 已提交
7731 7732
            break;
        case 1: /* fxrstor */
7733
            if (mod == 3 || !(s->cpuid_features & CPUID_FXSR) ||
7734
                (s->prefix & PREFIX_LOCK))
B
bellard 已提交
7735
                goto illegal_op;
7736
            if ((s->flags & HF_EM_MASK) || (s->flags & HF_TS_MASK)) {
B
bellard 已提交
7737 7738 7739
                gen_exception(s, EXCP07_PREX, pc_start - s->cs_base);
                break;
            }
7740
            gen_lea_modrm(env, s, modrm);
7741
            gen_update_cc_op(s);
B
bellard 已提交
7742
            gen_jmp_im(pc_start - s->cs_base);
7743
            gen_helper_fxrstor(cpu_env, cpu_A0, tcg_const_i32(dflag == MO_64));
B
bellard 已提交
7744 7745 7746 7747 7748 7749
            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 已提交
7750
            }
B
bellard 已提交
7751 7752
            if ((s->flags & HF_EM_MASK) || !(s->flags & HF_OSFXSR_MASK) ||
                mod == 3)
B
bellard 已提交
7753
                goto illegal_op;
7754
            gen_lea_modrm(env, s, modrm);
B
bellard 已提交
7755
            if (op == 2) {
7756 7757
                tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                    s->mem_index, MO_LEUL);
B
Blue Swirl 已提交
7758
                gen_helper_ldmxcsr(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
7759
            } else {
B
bellard 已提交
7760
                tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State, mxcsr));
7761
                gen_op_st_v(s, MO_32, cpu_T[0], cpu_A0);
B
bellard 已提交
7762
            }
B
bellard 已提交
7763 7764 7765
            break;
        case 5: /* lfence */
        case 6: /* mfence */
7766
            if ((modrm & 0xc7) != 0xc0 || !(s->cpuid_features & CPUID_SSE2))
B
bellard 已提交
7767 7768
                goto illegal_op;
            break;
7769 7770 7771
        case 7: /* sfence / clflush */
            if ((modrm & 0xc7) == 0xc0) {
                /* sfence */
A
aurel32 已提交
7772
                /* XXX: also check for cpuid_ext2_features & CPUID_EXT2_EMMX */
7773 7774 7775 7776 7777 7778
                if (!(s->cpuid_features & CPUID_SSE))
                    goto illegal_op;
            } else {
                /* clflush */
                if (!(s->cpuid_features & CPUID_CLFLUSH))
                    goto illegal_op;
7779
                gen_lea_modrm(env, s, modrm);
7780 7781
            }
            break;
B
bellard 已提交
7782
        default:
B
bellard 已提交
7783 7784 7785
            goto illegal_op;
        }
        break;
A
aurel32 已提交
7786
    case 0x10d: /* 3DNow! prefetch(w) */
7787
        modrm = cpu_ldub_code(env, s->pc++);
A
aurel32 已提交
7788 7789 7790
        mod = (modrm >> 6) & 3;
        if (mod == 3)
            goto illegal_op;
7791
        gen_lea_modrm(env, s, modrm);
7792 7793
        /* ignore for now */
        break;
B
bellard 已提交
7794
    case 0x1aa: /* rsm */
B
bellard 已提交
7795
        gen_svm_check_intercept(s, pc_start, SVM_EXIT_RSM);
B
bellard 已提交
7796 7797
        if (!(s->flags & HF_SMM_MASK))
            goto illegal_op;
J
Jun Koi 已提交
7798
        gen_update_cc_op(s);
B
bellard 已提交
7799
        gen_jmp_im(s->pc - s->cs_base);
B
Blue Swirl 已提交
7800
        gen_helper_rsm(cpu_env);
B
bellard 已提交
7801 7802
        gen_eob(s);
        break;
B
balrog 已提交
7803 7804 7805 7806 7807 7808 7809
    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;

7810
        modrm = cpu_ldub_code(env, s->pc++);
M
malc 已提交
7811
        reg = ((modrm >> 3) & 7) | rex_r;
B
balrog 已提交
7812

7813
        if (s->prefix & PREFIX_DATA) {
7814
            ot = MO_16;
7815 7816 7817
        } else {
            ot = mo_64_32(dflag);
        }
B
balrog 已提交
7818

7819
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
B
Blue Swirl 已提交
7820
        gen_helper_popcnt(cpu_T[0], cpu_env, cpu_T[0], tcg_const_i32(ot));
7821
        gen_op_mov_reg_v(ot, reg, cpu_T[0]);
B
balrog 已提交
7822

7823
        set_cc_op(s, CC_OP_EFLAGS);
B
balrog 已提交
7824
        break;
A
aurel32 已提交
7825 7826 7827
    case 0x10e ... 0x10f:
        /* 3DNow! instructions, ignore prefixes */
        s->prefix &= ~(PREFIX_REPZ | PREFIX_REPNZ | PREFIX_DATA);
B
bellard 已提交
7828 7829
    case 0x110 ... 0x117:
    case 0x128 ... 0x12f:
B
balrog 已提交
7830
    case 0x138 ... 0x13a:
7831
    case 0x150 ... 0x179:
B
bellard 已提交
7832 7833 7834 7835
    case 0x17c ... 0x17f:
    case 0x1c2:
    case 0x1c4 ... 0x1c6:
    case 0x1d0 ... 0x1fe:
7836
        gen_sse(env, s, b, pc_start, rex_r);
B
bellard 已提交
7837
        break;
B
bellard 已提交
7838 7839 7840 7841 7842
    default:
        goto illegal_op;
    }
    /* lock generation */
    if (s->prefix & PREFIX_LOCK)
P
pbrook 已提交
7843
        gen_helper_unlock();
B
bellard 已提交
7844 7845
    return s->pc;
 illegal_op:
7846
    if (s->prefix & PREFIX_LOCK)
P
pbrook 已提交
7847
        gen_helper_unlock();
B
bellard 已提交
7848 7849 7850 7851 7852 7853 7854
    /* 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)
{
7855 7856 7857 7858 7859 7860 7861 7862 7863 7864 7865 7866 7867 7868 7869 7870 7871 7872 7873 7874 7875 7876 7877 7878 7879 7880 7881 7882 7883 7884 7885
    static const char reg_names[CPU_NB_REGS][4] = {
#ifdef TARGET_X86_64
        [R_EAX] = "rax",
        [R_EBX] = "rbx",
        [R_ECX] = "rcx",
        [R_EDX] = "rdx",
        [R_ESI] = "rsi",
        [R_EDI] = "rdi",
        [R_EBP] = "rbp",
        [R_ESP] = "rsp",
        [8]  = "r8",
        [9]  = "r9",
        [10] = "r10",
        [11] = "r11",
        [12] = "r12",
        [13] = "r13",
        [14] = "r14",
        [15] = "r15",
#else
        [R_EAX] = "eax",
        [R_EBX] = "ebx",
        [R_ECX] = "ecx",
        [R_EDX] = "edx",
        [R_ESI] = "esi",
        [R_EDI] = "edi",
        [R_EBP] = "ebp",
        [R_ESP] = "esp",
#endif
    };
    int i;

P
pbrook 已提交
7886 7887
    cpu_env = tcg_global_reg_new_ptr(TCG_AREG0, "env");
    cpu_cc_op = tcg_global_mem_new_i32(TCG_AREG0,
7888 7889
                                       offsetof(CPUX86State, cc_op), "cc_op");
    cpu_cc_dst = tcg_global_mem_new(TCG_AREG0, offsetof(CPUX86State, cc_dst),
P
pbrook 已提交
7890
                                    "cc_dst");
7891 7892
    cpu_cc_src = tcg_global_mem_new(TCG_AREG0, offsetof(CPUX86State, cc_src),
                                    "cc_src");
7893 7894
    cpu_cc_src2 = tcg_global_mem_new(TCG_AREG0, offsetof(CPUX86State, cc_src2),
                                     "cc_src2");
7895

7896 7897 7898 7899 7900
    for (i = 0; i < CPU_NB_REGS; ++i) {
        cpu_regs[i] = tcg_global_mem_new(TCG_AREG0,
                                         offsetof(CPUX86State, regs[i]),
                                         reg_names[i]);
    }
B
bellard 已提交
7901 7902 7903 7904 7905
}

/* 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. */
7906
static inline void gen_intermediate_code_internal(X86CPU *cpu,
7907
                                                  TranslationBlock *tb,
7908
                                                  bool search_pc)
B
bellard 已提交
7909
{
7910
    CPUState *cs = CPU(cpu);
7911
    CPUX86State *env = &cpu->env;
B
bellard 已提交
7912
    DisasContext dc1, *dc = &dc1;
B
bellard 已提交
7913
    target_ulong pc_ptr;
7914
    CPUBreakpoint *bp;
7915
    int j, lj;
7916
    uint64_t flags;
B
bellard 已提交
7917 7918
    target_ulong pc_start;
    target_ulong cs_base;
P
pbrook 已提交
7919 7920
    int num_insns;
    int max_insns;
7921

B
bellard 已提交
7922
    /* generate intermediate code */
B
bellard 已提交
7923 7924
    pc_start = tb->pc;
    cs_base = tb->cs_base;
B
bellard 已提交
7925
    flags = tb->flags;
B
bellard 已提交
7926

7927
    dc->pe = (flags >> HF_PE_SHIFT) & 1;
B
bellard 已提交
7928 7929 7930 7931 7932 7933 7934 7935
    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;
7936
    dc->singlestep_enabled = cs->singlestep_enabled;
B
bellard 已提交
7937
    dc->cc_op = CC_OP_DYNAMIC;
7938
    dc->cc_op_dirty = false;
B
bellard 已提交
7939 7940 7941 7942 7943 7944
    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) {
7945
        dc->mem_index = cpu_mmu_index(env);
B
bellard 已提交
7946
    }
7947 7948 7949 7950 7951
    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 已提交
7952 7953 7954 7955
#ifdef TARGET_X86_64
    dc->lma = (flags >> HF_LMA_SHIFT) & 1;
    dc->code64 = (flags >> HF_CS64_SHIFT) & 1;
#endif
B
bellard 已提交
7956
    dc->flags = flags;
7957
    dc->jmp_opt = !(dc->tf || cs->singlestep_enabled ||
7958
                    (flags & HF_INHIBIT_IRQ_MASK)
B
bellard 已提交
7959
#ifndef CONFIG_SOFTMMU
B
bellard 已提交
7960 7961 7962
                    || (flags & HF_SOFTMMU_MASK)
#endif
                    );
7963 7964 7965 7966 7967 7968 7969 7970 7971 7972
    /* Do not optimize repz jumps at all in icount mode, because
       rep movsS instructions are execured with different paths
       in !repz_opt and repz_opt modes. The first one was used
       always except single step mode. And this setting
       disables jumps optimization and control paths become
       equivalent in run and single step modes.
       Now there will be no jump optimization for repz in
       record/replay modes and there will always be an
       additional step for ecx=0 when icount is enabled.
     */
7973
    dc->repz_opt = !dc->jmp_opt && !(tb->cflags & CF_USE_ICOUNT);
7974 7975
#if 0
    /* check addseg logic */
B
bellard 已提交
7976
    if (!dc->addseg && (dc->vm86 || !dc->pe || !dc->code32))
7977 7978 7979
        printf("ERROR addseg\n");
#endif

P
pbrook 已提交
7980 7981 7982 7983 7984 7985 7986 7987 7988 7989 7990
    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();
7991
    cpu_cc_srcT = tcg_temp_local_new();
B
bellard 已提交
7992

B
bellard 已提交
7993 7994 7995
    dc->is_jmp = DISAS_NEXT;
    pc_ptr = pc_start;
    lj = -1;
P
pbrook 已提交
7996 7997 7998 7999
    num_insns = 0;
    max_insns = tb->cflags & CF_COUNT_MASK;
    if (max_insns == 0)
        max_insns = CF_COUNT_MASK;
B
bellard 已提交
8000

8001
    gen_tb_start(tb);
B
bellard 已提交
8002
    for(;;) {
8003 8004
        if (unlikely(!QTAILQ_EMPTY(&cs->breakpoints))) {
            QTAILQ_FOREACH(bp, &cs->breakpoints, entry) {
J
Jan Kiszka 已提交
8005 8006
                if (bp->pc == pc_ptr &&
                    !((bp->flags & BP_CPU) && (tb->flags & HF_RF_MASK))) {
B
bellard 已提交
8007
                    gen_debug(dc, pc_ptr - dc->cs_base);
8008
                    goto done_generating;
B
bellard 已提交
8009 8010 8011 8012
                }
            }
        }
        if (search_pc) {
8013
            j = tcg_op_buf_count();
B
bellard 已提交
8014 8015 8016
            if (lj < j) {
                lj++;
                while (lj < j)
8017
                    tcg_ctx.gen_opc_instr_start[lj++] = 0;
B
bellard 已提交
8018
            }
8019
            tcg_ctx.gen_opc_pc[lj] = pc_ptr;
B
bellard 已提交
8020
            gen_opc_cc_op[lj] = dc->cc_op;
8021
            tcg_ctx.gen_opc_instr_start[lj] = 1;
8022
            tcg_ctx.gen_opc_icount[lj] = num_insns;
B
bellard 已提交
8023
        }
P
pbrook 已提交
8024 8025 8026
        if (num_insns + 1 == max_insns && (tb->cflags & CF_LAST_IO))
            gen_io_start();

8027
        pc_ptr = disas_insn(env, dc, pc_ptr);
P
pbrook 已提交
8028
        num_insns++;
B
bellard 已提交
8029 8030 8031 8032 8033
        /* stop translation if indicated */
        if (dc->is_jmp)
            break;
        /* if single step mode, we generate only one instruction and
           generate an exception */
8034 8035 8036
        /* 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 */
8037
        if (dc->tf || dc->singlestep_enabled ||
P
pbrook 已提交
8038
            (flags & HF_INHIBIT_IRQ_MASK)) {
B
bellard 已提交
8039
            gen_jmp_im(pc_ptr - dc->cs_base);
B
bellard 已提交
8040 8041 8042
            gen_eob(dc);
            break;
        }
8043 8044 8045 8046 8047 8048
        /* Do not cross the boundary of the pages in icount mode,
           it can cause an exception. Do it only when boundary is
           crossed by the first instruction in the block.
           If current instruction already crossed the bound - it's ok,
           because an exception hasn't stopped this code.
         */
8049
        if ((tb->cflags & CF_USE_ICOUNT)
8050 8051 8052 8053 8054 8055 8056
            && ((pc_ptr & TARGET_PAGE_MASK)
                != ((pc_ptr + TARGET_MAX_INSN_SIZE - 1) & TARGET_PAGE_MASK)
                || (pc_ptr & ~TARGET_PAGE_MASK) == 0)) {
            gen_jmp_im(pc_ptr - dc->cs_base);
            gen_eob(dc);
            break;
        }
B
bellard 已提交
8057
        /* if too long translation, stop generation too */
8058
        if (tcg_op_buf_full() ||
P
pbrook 已提交
8059 8060
            (pc_ptr - pc_start) >= (TARGET_PAGE_SIZE - 32) ||
            num_insns >= max_insns) {
B
bellard 已提交
8061
            gen_jmp_im(pc_ptr - dc->cs_base);
B
bellard 已提交
8062 8063 8064
            gen_eob(dc);
            break;
        }
8065 8066 8067 8068 8069
        if (singlestep) {
            gen_jmp_im(pc_ptr - dc->cs_base);
            gen_eob(dc);
            break;
        }
B
bellard 已提交
8070
    }
P
pbrook 已提交
8071 8072
    if (tb->cflags & CF_LAST_IO)
        gen_io_end();
8073
done_generating:
8074
    gen_tb_end(tb, num_insns);
8075

B
bellard 已提交
8076 8077
    /* we don't forget to fill the last values */
    if (search_pc) {
8078
        j = tcg_op_buf_count();
B
bellard 已提交
8079 8080
        lj++;
        while (lj <= j)
8081
            tcg_ctx.gen_opc_instr_start[lj++] = 0;
B
bellard 已提交
8082
    }
8083

B
bellard 已提交
8084
#ifdef DEBUG_DISAS
8085
    if (qemu_loglevel_mask(CPU_LOG_TB_IN_ASM)) {
B
bellard 已提交
8086
        int disas_flags;
8087 8088
        qemu_log("----------------\n");
        qemu_log("IN: %s\n", lookup_symbol(pc_start));
B
bellard 已提交
8089 8090 8091 8092 8093 8094
#ifdef TARGET_X86_64
        if (dc->code64)
            disas_flags = 2;
        else
#endif
            disas_flags = !dc->code32;
8095
        log_target_disas(cs, pc_start, pc_ptr - pc_start, disas_flags);
8096
        qemu_log("\n");
B
bellard 已提交
8097 8098 8099
    }
#endif

P
pbrook 已提交
8100
    if (!search_pc) {
B
bellard 已提交
8101
        tb->size = pc_ptr - pc_start;
P
pbrook 已提交
8102 8103
        tb->icount = num_insns;
    }
B
bellard 已提交
8104 8105
}

8106
void gen_intermediate_code(CPUX86State *env, TranslationBlock *tb)
B
bellard 已提交
8107
{
8108
    gen_intermediate_code_internal(x86_env_get_cpu(env), tb, false);
B
bellard 已提交
8109 8110
}

8111
void gen_intermediate_code_pc(CPUX86State *env, TranslationBlock *tb)
B
bellard 已提交
8112
{
8113
    gen_intermediate_code_internal(x86_env_get_cpu(env), tb, true);
B
bellard 已提交
8114 8115
}

8116
void restore_state_to_opc(CPUX86State *env, TranslationBlock *tb, int pc_pos)
A
aurel32 已提交
8117 8118 8119
{
    int cc_op;
#ifdef DEBUG_DISAS
8120
    if (qemu_loglevel_mask(CPU_LOG_TB_OP)) {
A
aurel32 已提交
8121
        int i;
8122
        qemu_log("RESTORE:\n");
A
aurel32 已提交
8123
        for(i = 0;i <= pc_pos; i++) {
8124
            if (tcg_ctx.gen_opc_instr_start[i]) {
8125 8126
                qemu_log("0x%04x: " TARGET_FMT_lx "\n", i,
                        tcg_ctx.gen_opc_pc[i]);
A
aurel32 已提交
8127 8128
            }
        }
8129
        qemu_log("pc_pos=0x%x eip=" TARGET_FMT_lx " cs_base=%x\n",
8130
                pc_pos, tcg_ctx.gen_opc_pc[pc_pos] - tb->cs_base,
A
aurel32 已提交
8131 8132 8133
                (uint32_t)tb->cs_base);
    }
#endif
8134
    env->eip = tcg_ctx.gen_opc_pc[pc_pos] - tb->cs_base;
A
aurel32 已提交
8135 8136 8137 8138
    cc_op = gen_opc_cc_op[pc_pos];
    if (cc_op != CC_OP_DYNAMIC)
        env->cc_op = cc_op;
}