translate.c 271.8 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
    target_ulong next_eip;

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

696
static inline void gen_movs(DisasContext *s, TCGMemOp ot)
B
bellard 已提交
697 698
{
    gen_string_movl_A0_ESI(s);
699
    gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
700
    gen_string_movl_A0_EDI(s);
701
    gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
702
    gen_op_movl_T0_Dshift(ot);
703 704
    gen_op_add_reg_T0(s->aflag, R_ESI);
    gen_op_add_reg_T0(s->aflag, R_EDI);
B
bellard 已提交
705 706
}

707 708 709 710 711 712 713 714 715 716 717
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]);
}

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

725 726 727 728 729 730 731 732
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]);
733 734
    tcg_gen_neg_tl(cpu_cc_src, cpu_T[0]);
    tcg_gen_movi_tl(cpu_cc_srcT, 0);
735 736
}

737 738
/* compute all eflags to cc_src */
static void gen_compute_eflags(DisasContext *s)
739
{
740
    TCGv zero, dst, src1, src2;
741 742
    int live, dead;

743 744 745
    if (s->cc_op == CC_OP_EFLAGS) {
        return;
    }
R
Richard Henderson 已提交
746
    if (s->cc_op == CC_OP_CLR) {
747
        tcg_gen_movi_tl(cpu_cc_src, CC_Z | CC_P);
R
Richard Henderson 已提交
748 749 750
        set_cc_op(s, CC_OP_EFLAGS);
        return;
    }
751 752 753 754

    TCGV_UNUSED(zero);
    dst = cpu_cc_dst;
    src1 = cpu_cc_src;
755
    src2 = cpu_cc_src2;
756 757 758

    /* Take care to not read values that are not live.  */
    live = cc_op_live[s->cc_op] & ~USES_CC_SRCT;
759
    dead = live ^ (USES_CC_DST | USES_CC_SRC | USES_CC_SRC2);
760 761 762 763 764 765 766 767
    if (dead) {
        zero = tcg_const_tl(0);
        if (dead & USES_CC_DST) {
            dst = zero;
        }
        if (dead & USES_CC_SRC) {
            src1 = zero;
        }
768 769 770
        if (dead & USES_CC_SRC2) {
            src2 = zero;
        }
771 772
    }

773
    gen_update_cc_op(s);
774
    gen_helper_cc_compute_all(cpu_cc_src, dst, src1, src2, cpu_cc_op);
775
    set_cc_op(s, CC_OP_EFLAGS);
776 777 778 779

    if (dead) {
        tcg_temp_free(zero);
    }
780 781
}

782 783 784 785 786 787 788 789 790 791
typedef struct CCPrepare {
    TCGCond cond;
    TCGv reg;
    TCGv reg2;
    target_ulong imm;
    target_ulong mask;
    bool use_reg2;
    bool no_setcond;
} CCPrepare;

792
/* compute eflags.C to reg */
793
static CCPrepare gen_prepare_eflags_c(DisasContext *s, TCGv reg)
794 795
{
    TCGv t0, t1;
796
    int size, shift;
797 798 799

    switch (s->cc_op) {
    case CC_OP_SUBB ... CC_OP_SUBQ:
800
        /* (DATA_TYPE)CC_SRCT < (DATA_TYPE)CC_SRC */
801 802 803 804
        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;
805
        tcg_gen_mov_tl(t0, cpu_cc_srcT);
806 807 808 809 810 811 812 813 814
        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:
815 816
        return (CCPrepare) { .cond = TCG_COND_LTU, .reg = t0,
                             .reg2 = t1, .mask = -1, .use_reg2 = true };
817 818

    case CC_OP_LOGICB ... CC_OP_LOGICQ:
R
Richard Henderson 已提交
819
    case CC_OP_CLR:
820
        return (CCPrepare) { .cond = TCG_COND_NEVER, .mask = -1 };
821 822 823

    case CC_OP_INCB ... CC_OP_INCQ:
    case CC_OP_DECB ... CC_OP_DECQ:
824 825
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                             .mask = -1, .no_setcond = true };
826 827 828 829

    case CC_OP_SHLB ... CC_OP_SHLQ:
        /* (CC_SRC >> (DATA_BITS - 1)) & 1 */
        size = s->cc_op - CC_OP_SHLB;
830 831 832
        shift = (8 << size) - 1;
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                             .mask = (target_ulong)1 << shift };
833 834

    case CC_OP_MULB ... CC_OP_MULQ:
835 836
        return (CCPrepare) { .cond = TCG_COND_NE,
                             .reg = cpu_cc_src, .mask = -1 };
837

838 839 840 841 842
    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 };

843 844 845 846 847
    case CC_OP_ADCX:
    case CC_OP_ADCOX:
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_dst,
                             .mask = -1, .no_setcond = true };

848 849 850
    case CC_OP_EFLAGS:
    case CC_OP_SARB ... CC_OP_SARQ:
        /* CC_SRC & 1 */
851 852
        return (CCPrepare) { .cond = TCG_COND_NE,
                             .reg = cpu_cc_src, .mask = CC_C };
853 854 855 856 857

    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);
858 859
       gen_helper_cc_compute_c(reg, cpu_cc_dst, cpu_cc_src,
                               cpu_cc_src2, cpu_cc_op);
860 861
       return (CCPrepare) { .cond = TCG_COND_NE, .reg = reg,
                            .mask = -1, .no_setcond = true };
862 863 864
    }
}

865
/* compute eflags.P to reg */
866
static CCPrepare gen_prepare_eflags_p(DisasContext *s, TCGv reg)
867
{
868
    gen_compute_eflags(s);
869 870
    return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                         .mask = CC_P };
871 872 873
}

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

/* compute eflags.O to reg */
898
static CCPrepare gen_prepare_eflags_o(DisasContext *s, TCGv reg)
899
{
900 901 902 903 904
    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 已提交
905 906
    case CC_OP_CLR:
        return (CCPrepare) { .cond = TCG_COND_NEVER, .mask = -1 };
907 908 909 910 911
    default:
        gen_compute_eflags(s);
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                             .mask = CC_O };
    }
912 913 914
}

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

938 939
/* perform a conditional store into register 'reg' according to jump opcode
   value 'b'. In the fast case, T0 is guaranted not to be used. */
940
static CCPrepare gen_prepare_cc(DisasContext *s, int b, TCGv reg)
941
{
942 943
    int inv, jcc_op, cond;
    TCGMemOp size;
944
    CCPrepare cc;
945 946 947
    TCGv t0;

    inv = b & 1;
948
    jcc_op = (b >> 1) & 7;
949 950

    switch (s->cc_op) {
951 952
    case CC_OP_SUBB ... CC_OP_SUBQ:
        /* We optimize relational operators for the cmp/jcc case.  */
953 954 955
        size = s->cc_op - CC_OP_SUBB;
        switch (jcc_op) {
        case JCC_BE:
956
            tcg_gen_mov_tl(cpu_tmp4, cpu_cc_srcT);
957 958
            gen_extu(size, cpu_tmp4);
            t0 = gen_ext_tl(cpu_tmp0, cpu_cc_src, size, false);
959 960
            cc = (CCPrepare) { .cond = TCG_COND_LEU, .reg = cpu_tmp4,
                               .reg2 = t0, .mask = -1, .use_reg2 = true };
961
            break;
962

963
        case JCC_L:
964
            cond = TCG_COND_LT;
965 966
            goto fast_jcc_l;
        case JCC_LE:
967
            cond = TCG_COND_LE;
968
        fast_jcc_l:
969
            tcg_gen_mov_tl(cpu_tmp4, cpu_cc_srcT);
970 971
            gen_exts(size, cpu_tmp4);
            t0 = gen_ext_tl(cpu_tmp0, cpu_cc_src, size, true);
972 973
            cc = (CCPrepare) { .cond = cond, .reg = cpu_tmp4,
                               .reg2 = t0, .mask = -1, .use_reg2 = true };
974
            break;
975

976
        default:
977
            goto slow_jcc;
978
        }
979
        break;
980

981 982
    default:
    slow_jcc:
983 984 985 986 987 988 989 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
        /* 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;
        }
1027
        break;
1028
    }
1029 1030 1031 1032 1033

    if (inv) {
        cc.cond = tcg_invert_cond(cc.cond);
    }
    return cc;
1034 1035
}

1036 1037 1038 1039 1040 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
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);
}
1070

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

1095
    gen_update_cc_op(s);
1096 1097 1098 1099
    if (cc.mask != -1) {
        tcg_gen_andi_tl(cpu_T[0], cc.reg, cc.mask);
        cc.reg = cpu_T[0];
    }
1100
    set_cc_op(s, CC_OP_DYNAMIC);
1101 1102 1103 1104
    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);
1105 1106 1107
    }
}

B
bellard 已提交
1108 1109
/* XXX: does not work with gdbstub "ice" single step - not a
   serious problem */
1110
static TCGLabel *gen_jz_ecx_string(DisasContext *s, target_ulong next_eip)
B
bellard 已提交
1111
{
1112 1113
    TCGLabel *l1 = gen_new_label();
    TCGLabel *l2 = gen_new_label();
1114
    gen_op_jnz_ecx(s->aflag, l1);
B
bellard 已提交
1115 1116 1117 1118
    gen_set_label(l2);
    gen_jmp_tb(s, next_eip, 1);
    gen_set_label(l1);
    return l2;
B
bellard 已提交
1119 1120
}

1121
static inline void gen_stos(DisasContext *s, TCGMemOp ot)
B
bellard 已提交
1122
{
1123
    gen_op_mov_v_reg(MO_32, cpu_T[0], R_EAX);
B
bellard 已提交
1124
    gen_string_movl_A0_EDI(s);
1125
    gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
1126
    gen_op_movl_T0_Dshift(ot);
1127
    gen_op_add_reg_T0(s->aflag, R_EDI);
B
bellard 已提交
1128 1129
}

1130
static inline void gen_lods(DisasContext *s, TCGMemOp ot)
B
bellard 已提交
1131 1132
{
    gen_string_movl_A0_ESI(s);
1133
    gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1134
    gen_op_mov_reg_v(ot, R_EAX, cpu_T[0]);
1135
    gen_op_movl_T0_Dshift(ot);
1136
    gen_op_add_reg_T0(s->aflag, R_ESI);
B
bellard 已提交
1137 1138
}

1139
static inline void gen_scas(DisasContext *s, TCGMemOp ot)
B
bellard 已提交
1140 1141
{
    gen_string_movl_A0_EDI(s);
1142
    gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
1143
    gen_op(s, OP_CMPL, ot, R_EAX);
1144
    gen_op_movl_T0_Dshift(ot);
1145
    gen_op_add_reg_T0(s->aflag, R_EDI);
B
bellard 已提交
1146 1147
}

1148
static inline void gen_cmps(DisasContext *s, TCGMemOp ot)
B
bellard 已提交
1149 1150
{
    gen_string_movl_A0_EDI(s);
1151
    gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
1152 1153
    gen_string_movl_A0_ESI(s);
    gen_op(s, OP_CMPL, ot, OR_TMP0);
1154
    gen_op_movl_T0_Dshift(ot);
1155 1156
    gen_op_add_reg_T0(s->aflag, R_ESI);
    gen_op_add_reg_T0(s->aflag, R_EDI);
B
bellard 已提交
1157 1158
}

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

1180
static inline void gen_outs(DisasContext *s, TCGMemOp ot)
B
bellard 已提交
1181
{
1182
    if (s->tb->cflags & CF_USE_ICOUNT) {
P
pbrook 已提交
1183
        gen_io_start();
1184
    }
B
bellard 已提交
1185
    gen_string_movl_A0_ESI(s);
1186
    gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1187

1188
    tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_regs[R_EDX]);
1189 1190
    tcg_gen_andi_i32(cpu_tmp2_i32, cpu_tmp2_i32, 0xffff);
    tcg_gen_trunc_tl_i32(cpu_tmp3_i32, cpu_T[0]);
P
pbrook 已提交
1191
    gen_helper_out_func(ot, cpu_tmp2_i32, cpu_tmp3_i32);
1192

1193
    gen_op_movl_T0_Dshift(ot);
1194
    gen_op_add_reg_T0(s->aflag, R_ESI);
1195
    if (s->tb->cflags & CF_USE_ICOUNT) {
P
pbrook 已提交
1196
        gen_io_end();
1197
    }
B
bellard 已提交
1198 1199 1200 1201 1202
}

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

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

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

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

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

1386 1387
static void gen_shift_flags(DisasContext *s, TCGMemOp ot, TCGv result,
                            TCGv shm1, TCGv count, bool is_right)
1388 1389 1390 1391 1392 1393 1394 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
{
    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);
}

1431
static void gen_shift_rm_T1(DisasContext *s, TCGMemOp ot, int op1,
1432
                            int is_right, int is_arith)
B
bellard 已提交
1433
{
1434
    target_ulong mask = (ot == MO_64 ? 0x3f : 0x1f);
1435

1436
    /* load */
1437
    if (op1 == OR_TMP0) {
1438
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1439
    } else {
1440
        gen_op_mov_v_reg(ot, cpu_T[0], op1);
1441
    }
1442

1443 1444
    tcg_gen_andi_tl(cpu_T[1], cpu_T[1], mask);
    tcg_gen_subi_tl(cpu_tmp0, cpu_T[1], 1);
1445 1446 1447

    if (is_right) {
        if (is_arith) {
B
bellard 已提交
1448
            gen_exts(ot, cpu_T[0]);
1449 1450
            tcg_gen_sar_tl(cpu_tmp0, cpu_T[0], cpu_tmp0);
            tcg_gen_sar_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1451
        } else {
B
bellard 已提交
1452
            gen_extu(ot, cpu_T[0]);
1453 1454
            tcg_gen_shr_tl(cpu_tmp0, cpu_T[0], cpu_tmp0);
            tcg_gen_shr_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1455 1456
        }
    } else {
1457 1458
        tcg_gen_shl_tl(cpu_tmp0, cpu_T[0], cpu_tmp0);
        tcg_gen_shl_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1459 1460 1461
    }

    /* store */
1462
    gen_op_st_rm_T0_A0(s, ot, op1);
1463

1464
    gen_shift_flags(s, ot, cpu_T[0], cpu_tmp0, cpu_T[1], is_right);
1465 1466
}

1467
static void gen_shift_rm_im(DisasContext *s, TCGMemOp ot, int op1, int op2,
B
bellard 已提交
1468 1469
                            int is_right, int is_arith)
{
1470
    int mask = (ot == MO_64 ? 0x3f : 0x1f);
B
bellard 已提交
1471 1472 1473

    /* load */
    if (op1 == OR_TMP0)
1474
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
1475
    else
1476
        gen_op_mov_v_reg(ot, cpu_T[0], op1);
B
bellard 已提交
1477 1478 1479 1480 1481 1482

    op2 &= mask;
    if (op2 != 0) {
        if (is_right) {
            if (is_arith) {
                gen_exts(ot, cpu_T[0]);
B
bellard 已提交
1483
                tcg_gen_sari_tl(cpu_tmp4, cpu_T[0], op2 - 1);
B
bellard 已提交
1484 1485 1486
                tcg_gen_sari_tl(cpu_T[0], cpu_T[0], op2);
            } else {
                gen_extu(ot, cpu_T[0]);
B
bellard 已提交
1487
                tcg_gen_shri_tl(cpu_tmp4, cpu_T[0], op2 - 1);
B
bellard 已提交
1488 1489 1490
                tcg_gen_shri_tl(cpu_T[0], cpu_T[0], op2);
            }
        } else {
B
bellard 已提交
1491
            tcg_gen_shli_tl(cpu_tmp4, cpu_T[0], op2 - 1);
B
bellard 已提交
1492 1493 1494 1495 1496
            tcg_gen_shli_tl(cpu_T[0], cpu_T[0], op2);
        }
    }

    /* store */
1497 1498
    gen_op_st_rm_T0_A0(s, ot, op1);

B
bellard 已提交
1499 1500
    /* update eflags if non zero shift */
    if (op2 != 0) {
B
bellard 已提交
1501
        tcg_gen_mov_tl(cpu_cc_src, cpu_tmp4);
B
bellard 已提交
1502
        tcg_gen_mov_tl(cpu_cc_dst, cpu_T[0]);
1503
        set_cc_op(s, (is_right ? CC_OP_SARB : CC_OP_SHLB) + ot);
B
bellard 已提交
1504 1505 1506
    }
}

1507
static void gen_rot_rm_T1(DisasContext *s, TCGMemOp ot, int op1, int is_right)
1508
{
1509
    target_ulong mask = (ot == MO_64 ? 0x3f : 0x1f);
1510
    TCGv_i32 t0, t1;
1511 1512

    /* load */
1513
    if (op1 == OR_TMP0) {
1514
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1515
    } else {
1516
        gen_op_mov_v_reg(ot, cpu_T[0], op1);
1517
    }
1518

1519
    tcg_gen_andi_tl(cpu_T[1], cpu_T[1], mask);
1520

1521
    switch (ot) {
1522
    case MO_8:
1523 1524 1525 1526
        /* 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;
1527
    case MO_16:
1528 1529 1530 1531 1532
        /* 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
1533
    case MO_32:
1534 1535 1536 1537 1538 1539 1540 1541 1542 1543 1544 1545 1546 1547 1548 1549 1550
        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;
1551 1552 1553
    }

    /* store */
1554
    gen_op_st_rm_T0_A0(s, ot, op1);
1555

1556 1557
    /* We'll need the flags computed into CC_SRC.  */
    gen_compute_eflags(s);
1558

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

1592
static void gen_rot_rm_im(DisasContext *s, TCGMemOp ot, int op1, int op2,
M
malc 已提交
1593 1594
                          int is_right)
{
1595
    int mask = (ot == MO_64 ? 0x3f : 0x1f);
1596
    int shift;
M
malc 已提交
1597 1598 1599

    /* load */
    if (op1 == OR_TMP0) {
1600
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
M
malc 已提交
1601
    } else {
1602
        gen_op_mov_v_reg(ot, cpu_T[0], op1);
M
malc 已提交
1603 1604 1605 1606
    }

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

    /* store */
1645
    gen_op_st_rm_T0_A0(s, ot, op1);
M
malc 已提交
1646 1647

    if (op2 != 0) {
1648
        /* Compute the flags into CC_SRC.  */
1649
        gen_compute_eflags(s);
1650

1651 1652 1653 1654
        /* 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 已提交
1655
        if (is_right) {
1656 1657
            tcg_gen_shri_tl(cpu_cc_src2, cpu_T[0], mask - 1);
            tcg_gen_shri_tl(cpu_cc_dst, cpu_T[0], mask);
1658
            tcg_gen_andi_tl(cpu_cc_dst, cpu_cc_dst, 1);
1659 1660 1661
        } 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 已提交
1662
        }
1663 1664 1665
        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 已提交
1666 1667 1668
    }
}

1669
/* XXX: add faster immediate = 1 case */
1670
static void gen_rotc_rm_T1(DisasContext *s, TCGMemOp ot, int op1,
1671 1672
                           int is_right)
{
1673
    gen_compute_eflags(s);
1674
    assert(s->cc_op == CC_OP_EFLAGS);
1675 1676 1677

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

/* XXX: add faster immediate case */
1726
static void gen_shiftd_rm_T1(DisasContext *s, TCGMemOp ot, int op1,
1727
                             bool is_right, TCGv count_in)
1728
{
1729
    target_ulong mask = (ot == MO_64 ? 63 : 31);
1730
    TCGv count;
1731 1732

    /* load */
1733
    if (op1 == OR_TMP0) {
1734
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1735
    } else {
1736
        gen_op_mov_v_reg(ot, cpu_T[0], op1);
1737
    }
1738

1739 1740
    count = tcg_temp_new();
    tcg_gen_andi_tl(count, count_in, mask);
1741

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

1777 1778 1779
            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);
1780
        } else {
1781
            tcg_gen_shl_tl(cpu_tmp0, cpu_T[0], cpu_tmp0);
1782
            if (ot == MO_16) {
1783 1784 1785 1786 1787 1788 1789 1790 1791
                /* 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);
1792
        }
1793 1794 1795 1796 1797
        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;
1798 1799 1800
    }

    /* store */
1801
    gen_op_st_rm_T0_A0(s, ot, op1);
1802

1803 1804
    gen_shift_flags(s, ot, cpu_T[0], cpu_tmp0, count, is_right);
    tcg_temp_free(count);
1805 1806
}

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

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

1864
static void gen_lea_modrm(CPUX86State *env, DisasContext *s, int modrm)
B
bellard 已提交
1865
{
B
bellard 已提交
1866
    target_long disp;
B
bellard 已提交
1867
    int havesib;
B
bellard 已提交
1868
    int base;
B
bellard 已提交
1869 1870 1871
    int index;
    int scale;
    int mod, rm, code, override, must_add_seg;
1872
    TCGv sum;
B
bellard 已提交
1873 1874 1875 1876 1877 1878 1879 1880

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

1881 1882 1883
    switch (s->aflag) {
    case MO_64:
    case MO_32:
B
bellard 已提交
1884 1885
        havesib = 0;
        base = rm;
1886
        index = -1;
B
bellard 已提交
1887
        scale = 0;
1888

B
bellard 已提交
1889 1890
        if (base == 4) {
            havesib = 1;
1891
            code = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
1892
            scale = (code >> 6) & 3;
B
bellard 已提交
1893
            index = ((code >> 3) & 7) | REX_X(s);
1894 1895 1896
            if (index == 4) {
                index = -1;  /* no index */
            }
B
bellard 已提交
1897
            base = (code & 7);
B
bellard 已提交
1898
        }
B
bellard 已提交
1899
        base |= REX_B(s);
B
bellard 已提交
1900 1901 1902

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

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

B
bellard 已提交
1951 1952
        if (must_add_seg) {
            if (override < 0) {
1953
                if (base == R_EBP || base == R_ESP) {
B
bellard 已提交
1954
                    override = R_SS;
1955
                } else {
B
bellard 已提交
1956
                    override = R_DS;
1957
                }
B
bellard 已提交
1958
            }
1959 1960 1961 1962

            tcg_gen_ld_tl(cpu_tmp0, cpu_env,
                          offsetof(CPUX86State, segs[override].base));
            if (CODE64(s)) {
1963
                if (s->aflag == MO_32) {
1964 1965 1966
                    tcg_gen_ext32u_tl(cpu_A0, cpu_A0);
                }
                tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_tmp0);
1967
                return;
B
bellard 已提交
1968
            }
1969 1970 1971 1972

            tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_tmp0);
        }

1973
        if (s->aflag == MO_32) {
1974
            tcg_gen_ext32u_tl(cpu_A0, cpu_A0);
B
bellard 已提交
1975
        }
1976 1977 1978
        break;

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

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

    default:
        tcg_abort();
B
bellard 已提交
2046 2047 2048
    }
}

2049
static void gen_nop_modrm(CPUX86State *env, DisasContext *s, int modrm)
B
bellard 已提交
2050 2051 2052 2053 2054 2055 2056 2057
{
    int mod, rm, base, code;

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

2058 2059 2060
    switch (s->aflag) {
    case MO_64:
    case MO_32:
B
bellard 已提交
2061
        base = rm;
2062

B
bellard 已提交
2063
        if (base == 4) {
2064
            code = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
2065 2066
            base = (code & 7);
        }
2067

B
bellard 已提交
2068 2069 2070 2071 2072 2073 2074 2075 2076 2077 2078 2079 2080 2081
        switch (mod) {
        case 0:
            if (base == 5) {
                s->pc += 4;
            }
            break;
        case 1:
            s->pc++;
            break;
        default:
        case 2:
            s->pc += 4;
            break;
        }
2082 2083 2084
        break;

    case MO_16:
B
bellard 已提交
2085 2086 2087 2088 2089 2090 2091 2092 2093 2094 2095 2096 2097 2098
        switch (mod) {
        case 0:
            if (rm == 6) {
                s->pc += 2;
            }
            break;
        case 1:
            s->pc++;
            break;
        default:
        case 2:
            s->pc += 2;
            break;
        }
2099 2100 2101 2102
        break;

    default:
        tcg_abort();
B
bellard 已提交
2103 2104 2105
    }
}

B
bellard 已提交
2106 2107 2108 2109 2110 2111 2112 2113 2114 2115 2116
/* 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) {
2117 2118
#ifdef TARGET_X86_64
        if (CODE64(s)) {
B
bellard 已提交
2119
            gen_op_addq_A0_seg(override);
2120
        } else
2121 2122
#endif
        {
2123
            gen_op_addl_A0_seg(s, override);
2124
        }
B
bellard 已提交
2125 2126 2127
    }
}

B
balrog 已提交
2128
/* generate modrm memory load or store of 'reg'. TMP0 is used if reg ==
B
bellard 已提交
2129
   OR_TMP0 */
2130
static void gen_ldst_modrm(CPUX86State *env, DisasContext *s, int modrm,
2131
                           TCGMemOp ot, int reg, int is_store)
B
bellard 已提交
2132
{
2133
    int mod, rm;
B
bellard 已提交
2134 2135

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

2161
static inline uint32_t insn_get(CPUX86State *env, DisasContext *s, TCGMemOp ot)
B
bellard 已提交
2162 2163 2164
{
    uint32_t ret;

2165
    switch (ot) {
2166
    case MO_8:
2167
        ret = cpu_ldub_code(env, s->pc);
B
bellard 已提交
2168 2169
        s->pc++;
        break;
2170
    case MO_16:
2171
        ret = cpu_lduw_code(env, s->pc);
B
bellard 已提交
2172 2173
        s->pc += 2;
        break;
2174
    case MO_32:
2175 2176 2177
#ifdef TARGET_X86_64
    case MO_64:
#endif
2178
        ret = cpu_ldl_code(env, s->pc);
B
bellard 已提交
2179 2180
        s->pc += 4;
        break;
2181 2182
    default:
        tcg_abort();
B
bellard 已提交
2183 2184 2185 2186
    }
    return ret;
}

2187
static inline int insn_const_size(TCGMemOp ot)
B
bellard 已提交
2188
{
2189
    if (ot <= MO_32) {
B
bellard 已提交
2190
        return 1 << ot;
2191
    } else {
B
bellard 已提交
2192
        return 4;
2193
    }
B
bellard 已提交
2194 2195
}

2196 2197 2198 2199 2200 2201 2202 2203 2204 2205 2206
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 已提交
2207
        tcg_gen_goto_tb(tb_num);
2208
        gen_jmp_im(eip);
2209
        tcg_gen_exit_tb((uintptr_t)tb + tb_num);
2210 2211 2212 2213 2214 2215 2216
    } else {
        /* jump to another page: currently not optimized */
        gen_jmp_im(eip);
        gen_eob(s);
    }
}

2217
static inline void gen_jcc(DisasContext *s, int b,
B
bellard 已提交
2218
                           target_ulong val, target_ulong next_eip)
B
bellard 已提交
2219
{
2220
    TCGLabel *l1, *l2;
2221

B
bellard 已提交
2222
    if (s->jmp_opt) {
B
bellard 已提交
2223
        l1 = gen_new_label();
2224
        gen_jcc1(s, b, l1);
2225

2226
        gen_goto_tb(s, 0, next_eip);
B
bellard 已提交
2227 2228

        gen_set_label(l1);
2229
        gen_goto_tb(s, 1, val);
J
Jun Koi 已提交
2230
        s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2231
    } else {
B
bellard 已提交
2232 2233
        l1 = gen_new_label();
        l2 = gen_new_label();
2234
        gen_jcc1(s, b, l1);
2235

B
bellard 已提交
2236
        gen_jmp_im(next_eip);
2237 2238
        tcg_gen_br(l2);

B
bellard 已提交
2239 2240 2241
        gen_set_label(l1);
        gen_jmp_im(val);
        gen_set_label(l2);
B
bellard 已提交
2242 2243 2244 2245
        gen_eob(s);
    }
}

2246
static void gen_cmovcc1(CPUX86State *env, DisasContext *s, TCGMemOp ot, int b,
2247 2248
                        int modrm, int reg)
{
2249
    CCPrepare cc;
2250

2251
    gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
2252

2253 2254 2255 2256 2257 2258 2259 2260
    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);
2261 2262
    }

2263 2264
    tcg_gen_movcond_tl(cc.cond, cpu_T[0], cc.reg, cc.reg2,
                       cpu_T[0], cpu_regs[reg]);
2265
    gen_op_mov_reg_v(ot, reg, cpu_T[0]);
2266 2267 2268 2269 2270 2271 2272

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

2275 2276 2277 2278 2279 2280 2281 2282 2283 2284 2285 2286 2287 2288 2289 2290
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 已提交
2291 2292
/* move T0 to seg_reg and compute if the CPU state may change. Never
   call this function with seg_reg == R_CS */
2293
static void gen_movl_seg_T0(DisasContext *s, int seg_reg)
B
bellard 已提交
2294
{
2295
    if (s->pe && !s->vm86) {
2296
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
2297
        gen_helper_load_seg(cpu_env, tcg_const_i32(seg_reg), cpu_tmp2_i32);
B
bellard 已提交
2298 2299 2300 2301 2302
        /* 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 已提交
2303
            s->is_jmp = DISAS_TB_JUMP;
2304
    } else {
2305
        gen_op_movl_seg_T0_vm(seg_reg);
B
bellard 已提交
2306
        if (seg_reg == R_SS)
J
Jun Koi 已提交
2307
            s->is_jmp = DISAS_TB_JUMP;
2308
    }
B
bellard 已提交
2309 2310
}

T
ths 已提交
2311 2312 2313 2314 2315
static inline int svm_is_rep(int prefixes)
{
    return ((prefixes & (PREFIX_REPZ | PREFIX_REPNZ)) ? 8 : 0);
}

B
bellard 已提交
2316
static inline void
T
ths 已提交
2317
gen_svm_check_intercept_param(DisasContext *s, target_ulong pc_start,
2318
                              uint32_t type, uint64_t param)
T
ths 已提交
2319
{
B
bellard 已提交
2320 2321 2322
    /* no SVM activated; fast case */
    if (likely(!(s->flags & HF_SVMI_MASK)))
        return;
2323
    gen_update_cc_op(s);
B
bellard 已提交
2324
    gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
2325
    gen_helper_svm_check_intercept_param(cpu_env, tcg_const_i32(type),
P
pbrook 已提交
2326
                                         tcg_const_i64(param));
T
ths 已提交
2327 2328
}

B
bellard 已提交
2329
static inline void
T
ths 已提交
2330 2331
gen_svm_check_intercept(DisasContext *s, target_ulong pc_start, uint64_t type)
{
B
bellard 已提交
2332
    gen_svm_check_intercept_param(s, pc_start, type, 0);
T
ths 已提交
2333 2334
}

2335 2336
static inline void gen_stack_update(DisasContext *s, int addend)
{
B
bellard 已提交
2337 2338
#ifdef TARGET_X86_64
    if (CODE64(s)) {
2339
        gen_op_add_reg_im(MO_64, R_ESP, addend);
B
bellard 已提交
2340 2341
    } else
#endif
2342
    if (s->ss32) {
2343
        gen_op_add_reg_im(MO_32, R_ESP, addend);
2344
    } else {
2345
        gen_op_add_reg_im(MO_16, R_ESP, addend);
2346 2347 2348
    }
}

2349 2350
/* Generate a push. It depends on ss32, addseg and dflag.  */
static void gen_push_v(DisasContext *s, TCGv val)
B
bellard 已提交
2351
{
2352 2353 2354 2355 2356
    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 已提交
2357

B
bellard 已提交
2358
    if (CODE64(s)) {
2359 2360 2361 2362 2363 2364
        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);
2365
            gen_op_addl_A0_seg(s, R_SS);
2366 2367
        } else {
            tcg_gen_ext32u_tl(cpu_A0, cpu_A0);
B
bellard 已提交
2368
        }
2369 2370 2371 2372 2373 2374
    } 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 已提交
2375
    }
2376 2377 2378

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

2381
/* two step pop is necessary for precise exceptions */
2382
static TCGMemOp gen_pop_T0(DisasContext *s)
B
bellard 已提交
2383
{
2384 2385 2386
    TCGMemOp d_ot = mo_pushpop(s, s->dflag);
    TCGv addr = cpu_A0;

B
bellard 已提交
2387
    if (CODE64(s)) {
2388 2389 2390 2391 2392 2393 2394 2395 2396
        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 已提交
2397
    }
2398 2399 2400

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

2403
static void gen_pop_update(DisasContext *s, TCGMemOp ot)
B
bellard 已提交
2404
{
2405
    gen_stack_update(s, 1 << ot);
B
bellard 已提交
2406 2407 2408 2409
}

static void gen_stack_A0(DisasContext *s)
{
B
bellard 已提交
2410
    gen_op_movl_A0_reg(R_ESP);
B
bellard 已提交
2411
    if (!s->ss32)
2412
        tcg_gen_ext16u_tl(cpu_A0, cpu_A0);
2413
    tcg_gen_mov_tl(cpu_T[1], cpu_A0);
B
bellard 已提交
2414
    if (s->addseg)
2415
        gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2416 2417 2418 2419 2420 2421
}

/* NOTE: wrap around in 16 bit not fully handled */
static void gen_pusha(DisasContext *s)
{
    int i;
B
bellard 已提交
2422
    gen_op_movl_A0_reg(R_ESP);
2423
    gen_op_addl_A0_im(-8 << s->dflag);
B
bellard 已提交
2424
    if (!s->ss32)
2425
        tcg_gen_ext16u_tl(cpu_A0, cpu_A0);
2426
    tcg_gen_mov_tl(cpu_T[1], cpu_A0);
B
bellard 已提交
2427
    if (s->addseg)
2428
        gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2429
    for(i = 0;i < 8; i++) {
2430
        gen_op_mov_v_reg(MO_32, cpu_T[0], 7 - i);
2431 2432
        gen_op_st_v(s, s->dflag, cpu_T[0], cpu_A0);
        gen_op_addl_A0_im(1 << s->dflag);
B
bellard 已提交
2433
    }
2434
    gen_op_mov_reg_v(MO_16 + s->ss32, R_ESP, cpu_T[1]);
B
bellard 已提交
2435 2436 2437 2438 2439 2440
}

/* NOTE: wrap around in 16 bit not fully handled */
static void gen_popa(DisasContext *s)
{
    int i;
B
bellard 已提交
2441
    gen_op_movl_A0_reg(R_ESP);
B
bellard 已提交
2442
    if (!s->ss32)
2443
        tcg_gen_ext16u_tl(cpu_A0, cpu_A0);
2444
    tcg_gen_mov_tl(cpu_T[1], cpu_A0);
2445
    tcg_gen_addi_tl(cpu_T[1], cpu_T[1], 8 << s->dflag);
B
bellard 已提交
2446
    if (s->addseg)
2447
        gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2448 2449 2450
    for(i = 0;i < 8; i++) {
        /* ESP is not reloaded */
        if (i != 3) {
2451
            gen_op_ld_v(s, s->dflag, cpu_T[0], cpu_A0);
2452
            gen_op_mov_reg_v(s->dflag, 7 - i, cpu_T[0]);
B
bellard 已提交
2453
        }
2454
        gen_op_addl_A0_im(1 << s->dflag);
B
bellard 已提交
2455
    }
2456
    gen_op_mov_reg_v(MO_16 + s->ss32, R_ESP, cpu_T[1]);
B
bellard 已提交
2457 2458 2459 2460
}

static void gen_enter(DisasContext *s, int esp_addend, int level)
{
2461 2462
    TCGMemOp ot = mo_pushpop(s, s->dflag);
    int opsize = 1 << ot;
B
bellard 已提交
2463 2464

    level &= 0x1f;
2465 2466
#ifdef TARGET_X86_64
    if (CODE64(s)) {
B
bellard 已提交
2467
        gen_op_movl_A0_reg(R_ESP);
2468
        gen_op_addq_A0_im(-opsize);
2469
        tcg_gen_mov_tl(cpu_T[1], cpu_A0);
2470 2471

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

B
bellard 已提交
2508
static void gen_exception(DisasContext *s, int trapno, target_ulong cur_eip)
B
bellard 已提交
2509
{
2510
    gen_update_cc_op(s);
B
bellard 已提交
2511
    gen_jmp_im(cur_eip);
B
Blue Swirl 已提交
2512
    gen_helper_raise_exception(cpu_env, tcg_const_i32(trapno));
J
Jun Koi 已提交
2513
    s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2514 2515 2516
}

/* an interrupt is different from an exception because of the
B
blueswir1 已提交
2517
   privilege checks */
2518
static void gen_interrupt(DisasContext *s, int intno,
B
bellard 已提交
2519
                          target_ulong cur_eip, target_ulong next_eip)
B
bellard 已提交
2520
{
2521
    gen_update_cc_op(s);
B
bellard 已提交
2522
    gen_jmp_im(cur_eip);
B
Blue Swirl 已提交
2523
    gen_helper_raise_interrupt(cpu_env, tcg_const_i32(intno),
P
pbrook 已提交
2524
                               tcg_const_i32(next_eip - cur_eip));
J
Jun Koi 已提交
2525
    s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2526 2527
}

B
bellard 已提交
2528
static void gen_debug(DisasContext *s, target_ulong cur_eip)
B
bellard 已提交
2529
{
2530
    gen_update_cc_op(s);
B
bellard 已提交
2531
    gen_jmp_im(cur_eip);
B
Blue Swirl 已提交
2532
    gen_helper_debug(cpu_env);
J
Jun Koi 已提交
2533
    s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2534 2535 2536 2537 2538 2539
}

/* generate a generic end of block. Trace exception is also generated
   if needed */
static void gen_eob(DisasContext *s)
{
2540
    gen_update_cc_op(s);
2541
    if (s->tb->flags & HF_INHIBIT_IRQ_MASK) {
2542
        gen_helper_reset_inhibit_irq(cpu_env);
2543
    }
J
Jan Kiszka 已提交
2544
    if (s->tb->flags & HF_RF_MASK) {
2545
        gen_helper_reset_rf(cpu_env);
J
Jan Kiszka 已提交
2546
    }
2547
    if (s->singlestep_enabled) {
B
Blue Swirl 已提交
2548
        gen_helper_debug(cpu_env);
2549
    } else if (s->tf) {
B
Blue Swirl 已提交
2550
        gen_helper_single_step(cpu_env);
B
bellard 已提交
2551
    } else {
B
bellard 已提交
2552
        tcg_gen_exit_tb(0);
B
bellard 已提交
2553
    }
J
Jun Koi 已提交
2554
    s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2555 2556 2557 2558
}

/* generate a jump to eip. No segment change must happen before as a
   direct call to the next block may occur */
B
bellard 已提交
2559
static void gen_jmp_tb(DisasContext *s, target_ulong eip, int tb_num)
B
bellard 已提交
2560
{
2561 2562
    gen_update_cc_op(s);
    set_cc_op(s, CC_OP_DYNAMIC);
B
bellard 已提交
2563
    if (s->jmp_opt) {
2564
        gen_goto_tb(s, tb_num, eip);
J
Jun Koi 已提交
2565
        s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2566
    } else {
B
bellard 已提交
2567
        gen_jmp_im(eip);
B
bellard 已提交
2568 2569 2570 2571
        gen_eob(s);
    }
}

B
bellard 已提交
2572 2573 2574 2575 2576
static void gen_jmp(DisasContext *s, target_ulong eip)
{
    gen_jmp_tb(s, eip, 0);
}

2577
static inline void gen_ldq_env_A0(DisasContext *s, int offset)
B
bellard 已提交
2578
{
2579
    tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0, s->mem_index, MO_LEQ);
2580
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, offset);
B
bellard 已提交
2581
}
B
bellard 已提交
2582

2583
static inline void gen_stq_env_A0(DisasContext *s, int offset)
B
bellard 已提交
2584
{
2585
    tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env, offset);
2586
    tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0, s->mem_index, MO_LEQ);
B
bellard 已提交
2587
}
B
bellard 已提交
2588

2589
static inline void gen_ldo_env_A0(DisasContext *s, int offset)
B
bellard 已提交
2590
{
2591
    int mem_index = s->mem_index;
2592
    tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0, mem_index, MO_LEQ);
2593
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, offset + offsetof(XMMReg, XMM_Q(0)));
B
bellard 已提交
2594
    tcg_gen_addi_tl(cpu_tmp0, cpu_A0, 8);
2595
    tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_tmp0, mem_index, MO_LEQ);
2596
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, offset + offsetof(XMMReg, XMM_Q(1)));
B
bellard 已提交
2597
}
B
bellard 已提交
2598

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

B
bellard 已提交
2609 2610
static inline void gen_op_movo(int d_offset, int s_offset)
{
2611 2612 2613 2614
    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 已提交
2615 2616 2617 2618
}

static inline void gen_op_movq(int d_offset, int s_offset)
{
2619 2620
    tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env, s_offset);
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, d_offset);
B
bellard 已提交
2621 2622 2623 2624
}

static inline void gen_op_movl(int d_offset, int s_offset)
{
2625 2626
    tcg_gen_ld_i32(cpu_tmp2_i32, cpu_env, s_offset);
    tcg_gen_st_i32(cpu_tmp2_i32, cpu_env, d_offset);
B
bellard 已提交
2627 2628 2629 2630
}

static inline void gen_op_movq_env_0(int d_offset)
{
2631 2632
    tcg_gen_movi_i64(cpu_tmp1_i64, 0);
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, d_offset);
B
bellard 已提交
2633
}
B
bellard 已提交
2634

B
Blue Swirl 已提交
2635 2636 2637 2638 2639 2640 2641
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 已提交
2642
typedef void (*SSEFunc_0_ppi)(TCGv_ptr reg_a, TCGv_ptr reg_b, TCGv_i32 val);
B
Blue Swirl 已提交
2643 2644
typedef void (*SSEFunc_0_eppt)(TCGv_ptr env, TCGv_ptr reg_a, TCGv_ptr reg_b,
                               TCGv val);
B
Blue Swirl 已提交
2645

B
bellard 已提交
2646 2647
#define SSE_SPECIAL ((void *)1)
#define SSE_DUMMY ((void *)2)
B
bellard 已提交
2648

P
pbrook 已提交
2649 2650 2651
#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 已提交
2652

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

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

R
Richard Henderson 已提交
2697 2698 2699
    /* 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 已提交
2700

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

B
Blue Swirl 已提交
2800
static const SSEFunc_0_epi sse_op_table3ai[] = {
P
pbrook 已提交
2801
    gen_helper_cvtsi2ss,
2802
    gen_helper_cvtsi2sd
B
Blue Swirl 已提交
2803
};
P
pbrook 已提交
2804

2805
#ifdef TARGET_X86_64
B
Blue Swirl 已提交
2806
static const SSEFunc_0_epl sse_op_table3aq[] = {
2807 2808 2809 2810 2811
    gen_helper_cvtsq2ss,
    gen_helper_cvtsq2sd
};
#endif

B
Blue Swirl 已提交
2812
static const SSEFunc_i_ep sse_op_table3bi[] = {
P
pbrook 已提交
2813 2814
    gen_helper_cvttss2si,
    gen_helper_cvtss2si,
2815
    gen_helper_cvttsd2si,
2816
    gen_helper_cvtsd2si
B
bellard 已提交
2817
};
2818

2819
#ifdef TARGET_X86_64
B
Blue Swirl 已提交
2820
static const SSEFunc_l_ep sse_op_table3bq[] = {
2821 2822
    gen_helper_cvttss2sq,
    gen_helper_cvtss2sq,
2823
    gen_helper_cvttsd2sq,
2824 2825 2826 2827
    gen_helper_cvtsd2sq
};
#endif

B
Blue Swirl 已提交
2828
static const SSEFunc_0_epp sse_op_table4[8][4] = {
B
bellard 已提交
2829 2830 2831 2832 2833 2834 2835 2836 2837
    SSE_FOP(cmpeq),
    SSE_FOP(cmplt),
    SSE_FOP(cmple),
    SSE_FOP(cmpunord),
    SSE_FOP(cmpneq),
    SSE_FOP(cmpnlt),
    SSE_FOP(cmpnle),
    SSE_FOP(cmpord),
};
2838

B
Blue Swirl 已提交
2839
static const SSEFunc_0_epp sse_op_table5[256] = {
P
pbrook 已提交
2840 2841 2842 2843 2844 2845 2846 2847 2848 2849 2850 2851 2852 2853 2854 2855 2856 2857 2858 2859 2860 2861 2862 2863
    [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 已提交
2864 2865
};

B
Blue Swirl 已提交
2866 2867
struct SSEOpHelper_epp {
    SSEFunc_0_epp op[2];
B
Blue Swirl 已提交
2868 2869 2870
    uint32_t ext_mask;
};

B
Blue Swirl 已提交
2871 2872
struct SSEOpHelper_eppi {
    SSEFunc_0_eppi op[2];
B
Blue Swirl 已提交
2873
    uint32_t ext_mask;
B
balrog 已提交
2874
};
B
Blue Swirl 已提交
2875

B
balrog 已提交
2876
#define SSSE3_OP(x) { MMX_OP2(x), CPUID_EXT_SSSE3 }
P
pbrook 已提交
2877 2878
#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 已提交
2879
#define SSE41_SPECIAL { { NULL, SSE_SPECIAL }, CPUID_EXT_SSE41 }
2880 2881
#define PCLMULQDQ_OP(x) { { NULL, gen_helper_ ## x ## _xmm }, \
        CPUID_EXT_PCLMULQDQ }
2882
#define AESNI_OP(x) { { NULL, gen_helper_ ## x ## _xmm }, CPUID_EXT_AES }
B
Blue Swirl 已提交
2883

B
Blue Swirl 已提交
2884
static const struct SSEOpHelper_epp sse_op_table6[256] = {
B
balrog 已提交
2885 2886 2887 2888 2889 2890 2891 2892 2893 2894 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
    [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),
2931 2932 2933 2934 2935
    [0xdb] = AESNI_OP(aesimc),
    [0xdc] = AESNI_OP(aesenc),
    [0xdd] = AESNI_OP(aesenclast),
    [0xde] = AESNI_OP(aesdec),
    [0xdf] = AESNI_OP(aesdeclast),
B
balrog 已提交
2936 2937
};

B
Blue Swirl 已提交
2938
static const struct SSEOpHelper_eppi sse_op_table7[256] = {
B
balrog 已提交
2939 2940 2941 2942 2943 2944 2945 2946 2947 2948 2949 2950 2951 2952 2953 2954 2955 2956
    [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),
2957
    [0x44] = PCLMULQDQ_OP(pclmulqdq),
B
balrog 已提交
2958 2959 2960 2961
    [0x60] = SSE42_OP(pcmpestrm),
    [0x61] = SSE42_OP(pcmpestri),
    [0x62] = SSE42_OP(pcmpistrm),
    [0x63] = SSE42_OP(pcmpistri),
2962
    [0xdf] = AESNI_OP(aeskeygenassist),
B
balrog 已提交
2963 2964
};

2965 2966
static void gen_sse(CPUX86State *env, DisasContext *s, int b,
                    target_ulong pc_start, int rex_r)
B
bellard 已提交
2967
{
2968
    int b1, op1_offset, op2_offset, is_xmm, val;
2969
    int modrm, mod, rm, reg;
B
Blue Swirl 已提交
2970 2971
    SSEFunc_0_epp sse_fn_epp;
    SSEFunc_0_eppi sse_fn_eppi;
B
Blue Swirl 已提交
2972
    SSEFunc_0_ppi sse_fn_ppi;
B
Blue Swirl 已提交
2973
    SSEFunc_0_eppt sse_fn_eppt;
2974
    TCGMemOp ot;
B
bellard 已提交
2975 2976

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

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

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

B
balrog 已提交
3598
        case 0x138:
3599
        case 0x038:
B
balrog 已提交
3600
            b = modrm;
R
Richard Henderson 已提交
3601 3602 3603
            if ((b & 0xf0) == 0xf0) {
                goto do_0f_38_fx;
            }
3604
            modrm = cpu_ldub_code(env, s->pc++);
B
balrog 已提交
3605 3606 3607
            rm = modrm & 7;
            reg = ((modrm >> 3) & 7) | rex_r;
            mod = (modrm >> 6) & 3;
3608 3609 3610
            if (b1 >= 2) {
                goto illegal_op;
            }
B
balrog 已提交
3611

B
Blue Swirl 已提交
3612 3613
            sse_fn_epp = sse_op_table6[b].op[b1];
            if (!sse_fn_epp) {
B
balrog 已提交
3614
                goto illegal_op;
B
Blue Swirl 已提交
3615
            }
B
balrog 已提交
3616 3617
            if (!(s->cpuid_ext_features & sse_op_table6[b].ext_mask))
                goto illegal_op;
B
balrog 已提交
3618 3619 3620 3621 3622 3623 3624

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

B
balrog 已提交
3667 3668
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
3669
            sse_fn_epp(cpu_env, cpu_ptr0, cpu_ptr1);
B
balrog 已提交
3670

3671 3672 3673
            if (b == 0x17) {
                set_cc_op(s, CC_OP_EFLAGS);
            }
B
balrog 已提交
3674
            break;
R
Richard Henderson 已提交
3675 3676 3677 3678 3679 3680

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

R
Richard Henderson 已提交
3684 3685 3686 3687 3688 3689 3690 3691
            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) {
3692
                    ot = MO_8;
3693
                } else if (s->dflag != MO_64) {
3694
                    ot = (s->prefix & PREFIX_DATA ? MO_16 : MO_32);
R
Richard Henderson 已提交
3695
                } else {
3696
                    ot = MO_64;
R
Richard Henderson 已提交
3697
                }
B
balrog 已提交
3698

3699
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_regs[reg]);
R
Richard Henderson 已提交
3700 3701 3702
                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 已提交
3703

3704
                ot = mo_64_32(s->dflag);
3705
                gen_op_mov_reg_v(ot, reg, cpu_T[0]);
R
Richard Henderson 已提交
3706
                break;
B
balrog 已提交
3707

R
Richard Henderson 已提交
3708 3709 3710 3711 3712 3713 3714 3715 3716 3717 3718 3719 3720 3721
            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;
                }
3722
                if (s->dflag != MO_64) {
3723
                    ot = (s->prefix & PREFIX_DATA ? MO_16 : MO_32);
R
Richard Henderson 已提交
3724
                } else {
3725
                    ot = MO_64;
R
Richard Henderson 已提交
3726 3727
                }

3728
                gen_lea_modrm(env, s, modrm);
R
Richard Henderson 已提交
3729
                if ((b & 1) == 0) {
3730 3731
                    tcg_gen_qemu_ld_tl(cpu_T[0], cpu_A0,
                                       s->mem_index, ot | MO_BE);
3732
                    gen_op_mov_reg_v(ot, reg, cpu_T[0]);
R
Richard Henderson 已提交
3733
                } else {
3734 3735
                    tcg_gen_qemu_st_tl(cpu_regs[reg], cpu_A0,
                                       s->mem_index, ot | MO_BE);
R
Richard Henderson 已提交
3736 3737 3738
                }
                break;

R
Richard Henderson 已提交
3739 3740 3741 3742 3743 3744
            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;
                }
3745
                ot = mo_64_32(s->dflag);
R
Richard Henderson 已提交
3746 3747
                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]);
3748
                gen_op_mov_reg_v(ot, reg, cpu_T[0]);
R
Richard Henderson 已提交
3749 3750 3751 3752
                gen_op_update1_cc();
                set_cc_op(s, CC_OP_LOGICB + ot);
                break;

R
Richard Henderson 已提交
3753 3754 3755 3756 3757 3758
            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;
                }
3759
                ot = mo_64_32(s->dflag);
R
Richard Henderson 已提交
3760 3761 3762 3763 3764 3765 3766 3767 3768
                {
                    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);

3769
                    bound = tcg_const_tl(ot == MO_64 ? 63 : 31);
R
Richard Henderson 已提交
3770 3771 3772 3773 3774 3775 3776 3777 3778 3779 3780 3781 3782 3783 3784 3785 3786
                    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]);

3787
                    gen_op_mov_reg_v(ot, reg, cpu_T[0]);
R
Richard Henderson 已提交
3788 3789 3790 3791 3792
                    gen_op_update1_cc();
                    set_cc_op(s, CC_OP_LOGICB + ot);
                }
                break;

R
Richard Henderson 已提交
3793 3794 3795 3796 3797 3798
            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;
                }
3799
                ot = mo_64_32(s->dflag);
R
Richard Henderson 已提交
3800 3801 3802
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
                tcg_gen_ext8u_tl(cpu_T[1], cpu_regs[s->vex_v]);
                {
3803
                    TCGv bound = tcg_const_tl(ot == MO_64 ? 63 : 31);
R
Richard Henderson 已提交
3804 3805 3806 3807 3808 3809 3810 3811 3812 3813 3814
                    /* 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);
3815
                gen_op_mov_reg_v(ot, reg, cpu_T[0]);
R
Richard Henderson 已提交
3816 3817 3818 3819
                gen_op_update1_cc();
                set_cc_op(s, CC_OP_BMILGB + ot);
                break;

R
Richard Henderson 已提交
3820 3821 3822 3823 3824 3825
            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;
                }
3826
                ot = mo_64_32(s->dflag);
R
Richard Henderson 已提交
3827 3828 3829
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
                switch (ot) {
                default:
3830 3831 3832 3833 3834 3835
                    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 已提交
3836 3837
                    break;
#ifdef TARGET_X86_64
3838
                case MO_64:
3839 3840
                    tcg_gen_mulu2_i64(cpu_regs[s->vex_v], cpu_regs[reg],
                                      cpu_T[0], cpu_regs[R_EDX]);
R
Richard Henderson 已提交
3841 3842 3843 3844 3845
                    break;
#endif
                }
                break;

3846 3847 3848 3849 3850 3851
            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;
                }
3852
                ot = mo_64_32(s->dflag);
3853 3854 3855
                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.  */
3856
                if (ot == MO_64) {
3857 3858 3859 3860 3861 3862 3863 3864 3865 3866 3867 3868 3869
                    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;
                }
3870
                ot = mo_64_32(s->dflag);
3871 3872 3873
                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.  */
3874
                if (ot == MO_64) {
3875 3876 3877 3878 3879 3880 3881
                    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;

3882 3883 3884 3885 3886
            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 {
3887
                    TCGv carry_in, carry_out, zero;
3888 3889
                    int end_op;

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

3961 3962 3963 3964 3965 3966 3967 3968
            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;
                }
3969
                ot = mo_64_32(s->dflag);
3970
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
3971
                if (ot == MO_64) {
3972 3973 3974 3975 3976 3977 3978
                    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) {
3979
                    if (ot != MO_64) {
3980 3981 3982 3983
                        tcg_gen_ext32s_tl(cpu_T[0], cpu_T[0]);
                    }
                    tcg_gen_sar_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
                } else {
3984
                    if (ot != MO_64) {
3985 3986 3987 3988
                        tcg_gen_ext32u_tl(cpu_T[0], cpu_T[0]);
                    }
                    tcg_gen_shr_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
                }
3989
                gen_op_mov_reg_v(ot, reg, cpu_T[0]);
3990 3991
                break;

3992 3993 3994 3995 3996 3997 3998 3999 4000
            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;
                }
4001
                ot = mo_64_32(s->dflag);
4002 4003 4004 4005 4006 4007
                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]);
4008
                    gen_op_mov_reg_v(ot, s->vex_v, cpu_T[0]);
4009 4010 4011 4012 4013 4014 4015 4016 4017 4018 4019 4020 4021 4022 4023 4024 4025 4026 4027 4028 4029 4030 4031 4032 4033
                    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 已提交
4034 4035 4036
            default:
                goto illegal_op;
            }
B
balrog 已提交
4037
            break;
R
Richard Henderson 已提交
4038

B
balrog 已提交
4039 4040
        case 0x03a:
        case 0x13a:
B
balrog 已提交
4041
            b = modrm;
4042
            modrm = cpu_ldub_code(env, s->pc++);
B
balrog 已提交
4043 4044 4045
            rm = modrm & 7;
            reg = ((modrm >> 3) & 7) | rex_r;
            mod = (modrm >> 6) & 3;
4046 4047 4048
            if (b1 >= 2) {
                goto illegal_op;
            }
B
balrog 已提交
4049

B
Blue Swirl 已提交
4050 4051
            sse_fn_eppi = sse_op_table7[b].op[b1];
            if (!sse_fn_eppi) {
B
balrog 已提交
4052
                goto illegal_op;
B
Blue Swirl 已提交
4053
            }
B
balrog 已提交
4054 4055 4056
            if (!(s->cpuid_ext_features & sse_op_table7[b].ext_mask))
                goto illegal_op;

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

            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);
4198
                    gen_lea_modrm(env, s, modrm);
4199
                    gen_ldo_env_A0(s, op2_offset);
B
balrog 已提交
4200 4201 4202 4203 4204 4205 4206
                }
            } 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);
4207
                    gen_lea_modrm(env, s, modrm);
4208
                    gen_ldq_env_A0(s, op2_offset);
B
balrog 已提交
4209 4210
                }
            }
4211
            val = cpu_ldub_code(env, s->pc++);
B
balrog 已提交
4212

B
balrog 已提交
4213
            if ((b & 0xfc) == 0x60) { /* pcmpXstrX */
4214
                set_cc_op(s, CC_OP_EFLAGS);
B
balrog 已提交
4215

4216
                if (s->dflag == MO_64) {
B
balrog 已提交
4217 4218
                    /* The helper must use entire 64-bit gp registers */
                    val |= 1 << 8;
4219
                }
B
balrog 已提交
4220 4221
            }

B
balrog 已提交
4222 4223
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
4224
            sse_fn_eppi(cpu_env, cpu_ptr0, cpu_ptr1, tcg_const_i32(val));
B
balrog 已提交
4225
            break;
R
Richard Henderson 已提交
4226 4227 4228 4229 4230 4231 4232 4233 4234 4235 4236 4237 4238 4239

        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;
                }
4240
                ot = mo_64_32(s->dflag);
R
Richard Henderson 已提交
4241 4242
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
                b = cpu_ldub_code(env, s->pc++);
4243
                if (ot == MO_64) {
R
Richard Henderson 已提交
4244 4245 4246 4247 4248 4249
                    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);
                }
4250
                gen_op_mov_reg_v(ot, reg, cpu_T[0]);
R
Richard Henderson 已提交
4251 4252 4253 4254 4255 4256 4257
                break;

            default:
                goto illegal_op;
            }
            break;

B
bellard 已提交
4258 4259 4260 4261 4262
        default:
            goto illegal_op;
        }
    } else {
        /* generic MMX or SSE operation */
B
bellard 已提交
4263 4264 4265 4266 4267 4268 4269 4270
        switch(b) {
        case 0x70: /* pshufx insn */
        case 0xc6: /* pshufx insn */
        case 0xc2: /* compare insns */
            s->rip_offset = 1;
            break;
        default:
            break;
B
bellard 已提交
4271 4272 4273 4274
        }
        if (is_xmm) {
            op1_offset = offsetof(CPUX86State,xmm_regs[reg]);
            if (mod != 3) {
4275 4276
                int sz = 4;

4277
                gen_lea_modrm(env, s, modrm);
B
bellard 已提交
4278
                op2_offset = offsetof(CPUX86State,xmm_t0);
4279 4280 4281 4282 4283 4284

                switch (b) {
                case 0x50 ... 0x5a:
                case 0x5c ... 0x5f:
                case 0xc2:
                    /* Most sse scalar operations.  */
B
bellard 已提交
4285
                    if (b1 == 2) {
4286 4287 4288 4289 4290 4291 4292 4293 4294 4295
                        sz = 2;
                    } else if (b1 == 3) {
                        sz = 3;
                    }
                    break;

                case 0x2e:  /* ucomis[sd] */
                case 0x2f:  /* comis[sd] */
                    if (b1 == 0) {
                        sz = 2;
B
bellard 已提交
4296
                    } else {
4297
                        sz = 3;
B
bellard 已提交
4298
                    }
4299 4300 4301 4302 4303 4304 4305 4306 4307 4308 4309 4310 4311 4312 4313 4314
                    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 */
4315
                    gen_ldo_env_A0(s, op2_offset);
4316
                    break;
B
bellard 已提交
4317 4318 4319 4320 4321 4322 4323 4324
                }
            } 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) {
4325
                gen_lea_modrm(env, s, modrm);
B
bellard 已提交
4326
                op2_offset = offsetof(CPUX86State,mmx_t0);
4327
                gen_ldq_env_A0(s, op2_offset);
B
bellard 已提交
4328 4329 4330 4331 4332 4333
            } else {
                rm = (modrm & 7);
                op2_offset = offsetof(CPUX86State,fpregs[rm].mmx);
            }
        }
        switch(b) {
A
aurel32 已提交
4334
        case 0x0f: /* 3DNow! data insns */
4335 4336
            if (!(s->cpuid_ext2_features & CPUID_EXT2_3DNOW))
                goto illegal_op;
4337
            val = cpu_ldub_code(env, s->pc++);
B
Blue Swirl 已提交
4338 4339
            sse_fn_epp = sse_op_table5[val];
            if (!sse_fn_epp) {
A
aurel32 已提交
4340
                goto illegal_op;
B
Blue Swirl 已提交
4341
            }
B
bellard 已提交
4342 4343
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
4344
            sse_fn_epp(cpu_env, cpu_ptr0, cpu_ptr1);
A
aurel32 已提交
4345
            break;
B
bellard 已提交
4346 4347
        case 0x70: /* pshufx insn */
        case 0xc6: /* pshufx insn */
4348
            val = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4349 4350
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
4351
            /* XXX: introduce a new table? */
B
Blue Swirl 已提交
4352
            sse_fn_ppi = (SSEFunc_0_ppi)sse_fn_epp;
B
Blue Swirl 已提交
4353
            sse_fn_ppi(cpu_ptr0, cpu_ptr1, tcg_const_i32(val));
B
bellard 已提交
4354 4355 4356
            break;
        case 0xc2:
            /* compare insns */
4357
            val = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4358 4359
            if (val >= 8)
                goto illegal_op;
B
Blue Swirl 已提交
4360
            sse_fn_epp = sse_op_table4[val][b1];
B
Blue Swirl 已提交
4361

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

B
bellard 已提交
4392 4393
/* convert one instruction. s->is_jmp is set if the translation must
   be stopped. Return the next pc value */
4394 4395
static target_ulong disas_insn(CPUX86State *env, DisasContext *s,
                               target_ulong pc_start)
B
bellard 已提交
4396
{
4397
    int b, prefixes;
4398
    int shift;
4399
    TCGMemOp ot, aflag, dflag;
4400
    int modrm, reg, rm, mod, op, opreg, val;
B
bellard 已提交
4401 4402
    target_ulong next_eip, tval;
    int rex_w, rex_r;
B
bellard 已提交
4403

4404
    if (unlikely(qemu_loglevel_mask(CPU_LOG_TB_OP | CPU_LOG_TB_OP_OPT))) {
4405
        tcg_gen_insn_start(pc_start);
4406
    }
B
bellard 已提交
4407 4408 4409
    s->pc = pc_start;
    prefixes = 0;
    s->override = -1;
B
bellard 已提交
4410 4411 4412 4413 4414
    rex_w = -1;
    rex_r = 0;
#ifdef TARGET_X86_64
    s->rex_x = 0;
    s->rex_b = 0;
4415
    x86_64_hregs = 0;
B
bellard 已提交
4416 4417
#endif
    s->rip_offset = 0; /* for relative ip address */
4418 4419
    s->vex_l = 0;
    s->vex_v = 0;
B
bellard 已提交
4420
 next_byte:
4421
    b = cpu_ldub_code(env, s->pc);
B
bellard 已提交
4422
    s->pc++;
4423 4424 4425 4426 4427 4428 4429 4430 4431 4432 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
    /* 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 已提交
4458
#ifdef TARGET_X86_64
4459 4460
    case 0x40 ... 0x4f:
        if (CODE64(s)) {
B
bellard 已提交
4461 4462 4463 4464 4465 4466 4467 4468
            /* 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;
        }
4469 4470
        break;
#endif
4471 4472 4473 4474 4475 4476 4477 4478 4479 4480 4481 4482 4483 4484 4485 4486 4487
    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 已提交
4488
            /* 4.1.1-4.1.3: No preceding lock, 66, f2, f3, or rex prefixes. */
4489 4490 4491 4492 4493 4494 4495 4496 4497 4498 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
            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;
4528 4529 4530 4531
    }

    /* Post-process prefixes.  */
    if (CODE64(s)) {
4532 4533 4534
        /* 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.  */
4535
        dflag = (rex_w > 0 ? MO_64 : prefixes & PREFIX_DATA ? MO_16 : MO_32);
4536
        /* In 64-bit mode, 0x67 selects 32-bit addressing.  */
4537
        aflag = (prefixes & PREFIX_ADR ? MO_32 : MO_64);
4538 4539
    } else {
        /* In 16/32-bit mode, 0x66 selects the opposite data size.  */
4540 4541 4542 4543
        if (s->code32 ^ ((prefixes & PREFIX_DATA) != 0)) {
            dflag = MO_32;
        } else {
            dflag = MO_16;
B
bellard 已提交
4544
        }
4545
        /* In 16/32-bit mode, 0x67 selects the opposite addressing.  */
4546 4547 4548 4549
        if (s->code32 ^ ((prefixes & PREFIX_ADR) != 0)) {
            aflag = MO_32;
        }  else {
            aflag = MO_16;
B
bellard 已提交
4550
        }
B
bellard 已提交
4551 4552 4553 4554 4555 4556 4557 4558
    }

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

    /* lock generation */
    if (prefixes & PREFIX_LOCK)
P
pbrook 已提交
4559
        gen_helper_lock();
B
bellard 已提交
4560 4561 4562 4563 4564 4565 4566

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

B
bellard 已提交
4570 4571 4572 4573 4574 4575 4576 4577 4578 4579 4580 4581 4582 4583 4584
        /**************************/
        /* 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;

4585
            ot = mo_b_d(b, dflag);
4586

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

4633 4634 4635
    case 0x82:
        if (CODE64(s))
            goto illegal_op;
B
bellard 已提交
4636 4637 4638 4639 4640 4641
    case 0x80: /* GRP1 */
    case 0x81:
    case 0x83:
        {
            int val;

4642
            ot = mo_b_d(b, dflag);
4643

4644
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4645
            mod = (modrm >> 6) & 3;
B
bellard 已提交
4646
            rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
4647
            op = (modrm >> 3) & 7;
4648

B
bellard 已提交
4649
            if (mod != 3) {
B
bellard 已提交
4650 4651 4652 4653
                if (b == 0x83)
                    s->rip_offset = 1;
                else
                    s->rip_offset = insn_const_size(ot);
4654
                gen_lea_modrm(env, s, modrm);
B
bellard 已提交
4655 4656
                opreg = OR_TMP0;
            } else {
B
bellard 已提交
4657
                opreg = rm;
B
bellard 已提交
4658 4659 4660 4661 4662 4663
            }

            switch(b) {
            default:
            case 0x80:
            case 0x81:
4664
            case 0x82:
4665
                val = insn_get(env, s, ot);
B
bellard 已提交
4666 4667
                break;
            case 0x83:
4668
                val = (int8_t)insn_get(env, s, MO_8);
B
bellard 已提交
4669 4670
                break;
            }
4671
            tcg_gen_movi_tl(cpu_T[1], val);
B
bellard 已提交
4672 4673 4674 4675 4676 4677 4678
            gen_op(s, op, ot, opreg);
        }
        break;

        /**************************/
        /* inc, dec, and other misc arith */
    case 0x40 ... 0x47: /* inc Gv */
4679
        ot = dflag;
B
bellard 已提交
4680 4681 4682
        gen_inc(s, ot, OR_EAX + (b & 7), 1);
        break;
    case 0x48 ... 0x4f: /* dec Gv */
4683
        ot = dflag;
B
bellard 已提交
4684 4685 4686 4687
        gen_inc(s, ot, OR_EAX + (b & 7), -1);
        break;
    case 0xf6: /* GRP3 */
    case 0xf7:
4688
        ot = mo_b_d(b, dflag);
B
bellard 已提交
4689

4690
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4691
        mod = (modrm >> 6) & 3;
B
bellard 已提交
4692
        rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
4693 4694
        op = (modrm >> 3) & 7;
        if (mod != 3) {
B
bellard 已提交
4695 4696
            if (op == 0)
                s->rip_offset = insn_const_size(ot);
4697
            gen_lea_modrm(env, s, modrm);
4698
            gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
4699
        } else {
4700
            gen_op_mov_v_reg(ot, cpu_T[0], rm);
B
bellard 已提交
4701 4702 4703 4704
        }

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

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

4878
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4879
        mod = (modrm >> 6) & 3;
B
bellard 已提交
4880
        rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
4881 4882 4883 4884
        op = (modrm >> 3) & 7;
        if (op >= 2 && b == 0xfe) {
            goto illegal_op;
        }
B
bellard 已提交
4885
        if (CODE64(s)) {
4886
            if (op == 2 || op == 4) {
B
bellard 已提交
4887
                /* operand size for jumps is 64 bit */
4888
                ot = MO_64;
4889
            } else if (op == 3 || op == 5) {
4890
                ot = dflag != MO_16 ? MO_32 + (rex_w == 1) : MO_16;
B
bellard 已提交
4891 4892
            } else if (op == 6) {
                /* default push size is 64 bit */
4893
                ot = mo_pushpop(s, dflag);
B
bellard 已提交
4894 4895
            }
        }
B
bellard 已提交
4896
        if (mod != 3) {
4897
            gen_lea_modrm(env, s, modrm);
B
bellard 已提交
4898
            if (op >= 2 && op != 3 && op != 5)
4899
                gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
4900
        } else {
4901
            gen_op_mov_v_reg(ot, cpu_T[0], rm);
B
bellard 已提交
4902 4903 4904 4905 4906 4907 4908 4909 4910 4911 4912 4913 4914 4915 4916 4917 4918 4919
        }

        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 */
4920
            /* XXX: optimize if memory (no 'and' is necessary) */
4921
            if (dflag == MO_16) {
4922 4923
                tcg_gen_ext16u_tl(cpu_T[0], cpu_T[0]);
            }
B
bellard 已提交
4924
            next_eip = s->pc - s->cs_base;
4925
            tcg_gen_movi_tl(cpu_T[1], next_eip);
4926
            gen_push_v(s, cpu_T[1]);
4927
            gen_op_jmp_v(cpu_T[0]);
B
bellard 已提交
4928 4929
            gen_eob(s);
            break;
B
bellard 已提交
4930
        case 3: /* lcall Ev */
4931
            gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
4932
            gen_add_A0_im(s, 1 << ot);
4933
            gen_op_ld_v(s, MO_16, cpu_T[0], cpu_A0);
B
bellard 已提交
4934 4935
        do_lcall:
            if (s->pe && !s->vm86) {
4936
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
4937
                gen_helper_lcall_protected(cpu_env, cpu_tmp2_i32, cpu_T[1],
4938
                                           tcg_const_i32(dflag - 1),
4939
                                           tcg_const_tl(s->pc - s->cs_base));
B
bellard 已提交
4940
            } else {
4941
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
4942
                gen_helper_lcall_real(cpu_env, cpu_tmp2_i32, cpu_T[1],
4943
                                      tcg_const_i32(dflag - 1),
P
pbrook 已提交
4944
                                      tcg_const_i32(s->pc - s->cs_base));
B
bellard 已提交
4945 4946 4947 4948
            }
            gen_eob(s);
            break;
        case 4: /* jmp Ev */
4949
            if (dflag == MO_16) {
4950 4951
                tcg_gen_ext16u_tl(cpu_T[0], cpu_T[0]);
            }
4952
            gen_op_jmp_v(cpu_T[0]);
B
bellard 已提交
4953 4954 4955
            gen_eob(s);
            break;
        case 5: /* ljmp Ev */
4956
            gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
4957
            gen_add_A0_im(s, 1 << ot);
4958
            gen_op_ld_v(s, MO_16, cpu_T[0], cpu_A0);
B
bellard 已提交
4959 4960
        do_ljmp:
            if (s->pe && !s->vm86) {
4961
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
4962
                gen_helper_ljmp_protected(cpu_env, cpu_tmp2_i32, cpu_T[1],
4963
                                          tcg_const_tl(s->pc - s->cs_base));
B
bellard 已提交
4964
            } else {
4965
                gen_op_movl_seg_T0_vm(R_CS);
R
Richard Henderson 已提交
4966
                gen_op_jmp_v(cpu_T[1]);
B
bellard 已提交
4967 4968 4969 4970
            }
            gen_eob(s);
            break;
        case 6: /* push Ev */
4971
            gen_push_v(s, cpu_T[0]);
B
bellard 已提交
4972 4973 4974 4975 4976 4977 4978
            break;
        default:
            goto illegal_op;
        }
        break;

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

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

4985
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
4986
        gen_op_mov_v_reg(ot, cpu_T[1], reg);
B
bellard 已提交
4987
        gen_op_testl_T0_T1_cc();
4988
        set_cc_op(s, CC_OP_LOGICB + ot);
B
bellard 已提交
4989
        break;
4990

B
bellard 已提交
4991 4992
    case 0xa8: /* test eAX, Iv */
    case 0xa9:
4993
        ot = mo_b_d(b, dflag);
4994
        val = insn_get(env, s, ot);
B
bellard 已提交
4995

4996
        gen_op_mov_v_reg(ot, cpu_T[0], OR_EAX);
4997
        tcg_gen_movi_tl(cpu_T[1], val);
B
bellard 已提交
4998
        gen_op_testl_T0_T1_cc();
4999
        set_cc_op(s, CC_OP_LOGICB + ot);
B
bellard 已提交
5000
        break;
5001

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

5133
            ot = mo_b_d(b, dflag);
5134
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5135 5136
            reg = ((modrm >> 3) & 7) | rex_r;
            mod = (modrm >> 6) & 3;
P
pbrook 已提交
5137 5138 5139 5140
            t0 = tcg_temp_local_new();
            t1 = tcg_temp_local_new();
            t2 = tcg_temp_local_new();
            a0 = tcg_temp_local_new();
5141
            gen_op_mov_v_reg(ot, t1, reg);
B
bellard 已提交
5142 5143
            if (mod == 3) {
                rm = (modrm & 7) | REX_B(s);
5144
                gen_op_mov_v_reg(ot, t0, rm);
B
bellard 已提交
5145
            } else {
5146
                gen_lea_modrm(env, s, modrm);
5147
                tcg_gen_mov_tl(a0, cpu_A0);
5148
                gen_op_ld_v(s, ot, t0, a0);
B
bellard 已提交
5149 5150 5151
                rm = 0; /* avoid warning */
            }
            label1 = gen_new_label();
5152 5153
            tcg_gen_mov_tl(t2, cpu_regs[R_EAX]);
            gen_extu(ot, t0);
5154
            gen_extu(ot, t2);
5155
            tcg_gen_brcond_tl(TCG_COND_EQ, t2, t0, label1);
5156
            label2 = gen_new_label();
B
bellard 已提交
5157
            if (mod == 3) {
5158
                gen_op_mov_reg_v(ot, R_EAX, t0);
B
bellard 已提交
5159 5160
                tcg_gen_br(label2);
                gen_set_label(label1);
5161
                gen_op_mov_reg_v(ot, rm, t1);
B
bellard 已提交
5162
            } else {
5163 5164 5165
                /* 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 */
5166
                gen_op_st_v(s, ot, t0, a0);
5167
                gen_op_mov_reg_v(ot, R_EAX, t0);
5168
                tcg_gen_br(label2);
B
bellard 已提交
5169
                gen_set_label(label1);
5170
                gen_op_st_v(s, ot, t1, a0);
B
bellard 已提交
5171
            }
5172
            gen_set_label(label2);
5173
            tcg_gen_mov_tl(cpu_cc_src, t0);
5174 5175
            tcg_gen_mov_tl(cpu_cc_srcT, t2);
            tcg_gen_sub_tl(cpu_cc_dst, t2, t0);
5176
            set_cc_op(s, CC_OP_SUBB + ot);
5177 5178 5179 5180
            tcg_temp_free(t0);
            tcg_temp_free(t1);
            tcg_temp_free(t2);
            tcg_temp_free(a0);
B
bellard 已提交
5181 5182 5183
        }
        break;
    case 0x1c7: /* cmpxchg8b */
5184
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5185
        mod = (modrm >> 6) & 3;
5186
        if ((mod == 3) || ((modrm & 0x38) != 0x8))
B
bellard 已提交
5187
            goto illegal_op;
B
bellard 已提交
5188
#ifdef TARGET_X86_64
5189
        if (dflag == MO_64) {
B
bellard 已提交
5190 5191
            if (!(s->cpuid_ext_features & CPUID_EXT_CX16))
                goto illegal_op;
5192
            gen_lea_modrm(env, s, modrm);
B
Blue Swirl 已提交
5193
            gen_helper_cmpxchg16b(cpu_env, cpu_A0);
B
bellard 已提交
5194 5195 5196 5197 5198
        } else
#endif        
        {
            if (!(s->cpuid_features & CPUID_CX8))
                goto illegal_op;
5199
            gen_lea_modrm(env, s, modrm);
B
Blue Swirl 已提交
5200
            gen_helper_cmpxchg8b(cpu_env, cpu_A0);
B
bellard 已提交
5201
        }
5202
        set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
5203
        break;
5204

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

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

B
bellard 已提交
5334
        /* generate a generic store */
5335
        gen_ldst_modrm(env, s, modrm, ot, reg, 1);
B
bellard 已提交
5336 5337 5338
        break;
    case 0xc6:
    case 0xc7: /* mov Ev, Iv */
5339
        ot = mo_b_d(b, dflag);
5340
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5341
        mod = (modrm >> 6) & 3;
B
bellard 已提交
5342 5343
        if (mod != 3) {
            s->rip_offset = insn_const_size(ot);
5344
            gen_lea_modrm(env, s, modrm);
B
bellard 已提交
5345
        }
5346
        val = insn_get(env, s, ot);
5347
        tcg_gen_movi_tl(cpu_T[0], val);
5348 5349 5350
        if (mod != 3) {
            gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
        } else {
5351
            gen_op_mov_reg_v(ot, (modrm & 7) | REX_B(s), cpu_T[0]);
5352
        }
B
bellard 已提交
5353 5354 5355
        break;
    case 0x8a:
    case 0x8b: /* mov Ev, Gv */
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

5360
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
5361
        gen_op_mov_reg_v(ot, reg, cpu_T[0]);
B
bellard 已提交
5362 5363
        break;
    case 0x8e: /* mov seg, Gv */
5364
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5365 5366 5367
        reg = (modrm >> 3) & 7;
        if (reg >= 6 || reg == R_CS)
            goto illegal_op;
5368
        gen_ldst_modrm(env, s, modrm, MO_16, OR_TMP0, 0);
5369
        gen_movl_seg_T0(s, reg);
B
bellard 已提交
5370 5371
        if (reg == R_SS) {
            /* if reg == SS, inhibit interrupts/trace */
5372 5373 5374
            /* If several instructions disable interrupts, only the
               _first_ does it */
            if (!(s->tb->flags & HF_INHIBIT_IRQ_MASK))
5375
                gen_helper_set_inhibit_irq(cpu_env);
B
bellard 已提交
5376 5377 5378
            s->tf = 0;
        }
        if (s->is_jmp) {
B
bellard 已提交
5379
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
5380 5381 5382 5383
            gen_eob(s);
        }
        break;
    case 0x8c: /* mov Gv, seg */
5384
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5385 5386 5387 5388 5389
        reg = (modrm >> 3) & 7;
        mod = (modrm >> 6) & 3;
        if (reg >= 6)
            goto illegal_op;
        gen_op_movl_T0_seg(reg);
5390
        ot = mod == 3 ? dflag : MO_16;
5391
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 1);
B
bellard 已提交
5392 5393 5394 5395 5396 5397 5398
        break;

    case 0x1b6: /* movzbS Gv, Eb */
    case 0x1b7: /* movzwS Gv, Eb */
    case 0x1be: /* movsbS Gv, Eb */
    case 0x1bf: /* movswS Gv, Eb */
        {
5399 5400 5401
            TCGMemOp d_ot;
            TCGMemOp s_ot;

B
bellard 已提交
5402
            /* d_ot is the size of destination */
5403
            d_ot = dflag;
B
bellard 已提交
5404
            /* ot is the size of source */
5405
            ot = (b & 1) + MO_8;
5406 5407 5408
            /* s_ot is the sign+size of source */
            s_ot = b & 8 ? MO_SIGN | ot : ot;

5409
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5410
            reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5411
            mod = (modrm >> 6) & 3;
B
bellard 已提交
5412
            rm = (modrm & 7) | REX_B(s);
5413

B
bellard 已提交
5414
            if (mod == 3) {
5415
                gen_op_mov_v_reg(ot, cpu_T[0], rm);
5416 5417
                switch (s_ot) {
                case MO_UB:
B
bellard 已提交
5418
                    tcg_gen_ext8u_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
5419
                    break;
5420
                case MO_SB:
B
bellard 已提交
5421
                    tcg_gen_ext8s_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
5422
                    break;
5423
                case MO_UW:
B
bellard 已提交
5424
                    tcg_gen_ext16u_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
5425 5426
                    break;
                default:
5427
                case MO_SW:
B
bellard 已提交
5428
                    tcg_gen_ext16s_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
5429 5430
                    break;
                }
5431
                gen_op_mov_reg_v(d_ot, reg, cpu_T[0]);
B
bellard 已提交
5432
            } else {
5433
                gen_lea_modrm(env, s, modrm);
5434
                gen_op_ld_v(s, s_ot, cpu_T[0], cpu_A0);
5435
                gen_op_mov_reg_v(d_ot, reg, cpu_T[0]);
B
bellard 已提交
5436 5437 5438 5439 5440
            }
        }
        break;

    case 0x8d: /* lea */
5441
        ot = dflag;
5442
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5443 5444 5445
        mod = (modrm >> 6) & 3;
        if (mod == 3)
            goto illegal_op;
B
bellard 已提交
5446
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5447 5448 5449 5450
        /* we must ensure that no segment is added */
        s->override = -1;
        val = s->addseg;
        s->addseg = 0;
5451
        gen_lea_modrm(env, s, modrm);
B
bellard 已提交
5452
        s->addseg = val;
5453
        gen_op_mov_reg_v(ot, reg, cpu_A0);
B
bellard 已提交
5454
        break;
5455

B
bellard 已提交
5456 5457 5458 5459 5460
    case 0xa0: /* mov EAX, Ov */
    case 0xa1:
    case 0xa2: /* mov Ov, EAX */
    case 0xa3:
        {
B
bellard 已提交
5461 5462
            target_ulong offset_addr;

5463
            ot = mo_b_d(b, dflag);
5464
            switch (s->aflag) {
B
bellard 已提交
5465
#ifdef TARGET_X86_64
5466
            case MO_64:
5467
                offset_addr = cpu_ldq_code(env, s->pc);
B
bellard 已提交
5468
                s->pc += 8;
5469
                break;
B
bellard 已提交
5470
#endif
5471 5472 5473
            default:
                offset_addr = insn_get(env, s, s->aflag);
                break;
B
bellard 已提交
5474
            }
5475
            tcg_gen_movi_tl(cpu_A0, offset_addr);
B
bellard 已提交
5476
            gen_add_A0_ds_seg(s);
B
bellard 已提交
5477
            if ((b & 2) == 0) {
5478
                gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
5479
                gen_op_mov_reg_v(ot, R_EAX, cpu_T[0]);
B
bellard 已提交
5480
            } else {
5481
                gen_op_mov_v_reg(ot, cpu_T[0], R_EAX);
5482
                gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
5483 5484 5485 5486
            }
        }
        break;
    case 0xd7: /* xlat */
5487 5488 5489 5490
        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 已提交
5491
        gen_add_A0_ds_seg(s);
5492
        gen_op_ld_v(s, MO_8, cpu_T[0], cpu_A0);
5493
        gen_op_mov_reg_v(MO_8, R_EAX, cpu_T[0]);
B
bellard 已提交
5494 5495
        break;
    case 0xb0 ... 0xb7: /* mov R, Ib */
5496
        val = insn_get(env, s, MO_8);
5497
        tcg_gen_movi_tl(cpu_T[0], val);
5498
        gen_op_mov_reg_v(MO_8, (b & 7) | REX_B(s), cpu_T[0]);
B
bellard 已提交
5499 5500
        break;
    case 0xb8 ... 0xbf: /* mov R, Iv */
B
bellard 已提交
5501
#ifdef TARGET_X86_64
5502
        if (dflag == MO_64) {
B
bellard 已提交
5503 5504
            uint64_t tmp;
            /* 64 bit case */
5505
            tmp = cpu_ldq_code(env, s->pc);
B
bellard 已提交
5506 5507
            s->pc += 8;
            reg = (b & 7) | REX_B(s);
5508
            tcg_gen_movi_tl(cpu_T[0], tmp);
5509
            gen_op_mov_reg_v(MO_64, reg, cpu_T[0]);
5510
        } else
B
bellard 已提交
5511 5512
#endif
        {
5513
            ot = dflag;
5514
            val = insn_get(env, s, ot);
B
bellard 已提交
5515
            reg = (b & 7) | REX_B(s);
5516
            tcg_gen_movi_tl(cpu_T[0], val);
5517
            gen_op_mov_reg_v(ot, reg, cpu_T[0]);
B
bellard 已提交
5518
        }
B
bellard 已提交
5519 5520 5521
        break;

    case 0x91 ... 0x97: /* xchg R, EAX */
R
Richard Henderson 已提交
5522
    do_xchg_reg_eax:
5523
        ot = dflag;
B
bellard 已提交
5524
        reg = (b & 7) | REX_B(s);
B
bellard 已提交
5525 5526 5527 5528
        rm = R_EAX;
        goto do_xchg_reg;
    case 0x86:
    case 0x87: /* xchg Ev, Gv */
5529
        ot = mo_b_d(b, dflag);
5530
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5531
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5532 5533
        mod = (modrm >> 6) & 3;
        if (mod == 3) {
B
bellard 已提交
5534
            rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
5535
        do_xchg_reg:
5536 5537
            gen_op_mov_v_reg(ot, cpu_T[0], reg);
            gen_op_mov_v_reg(ot, cpu_T[1], rm);
5538
            gen_op_mov_reg_v(ot, rm, cpu_T[0]);
5539
            gen_op_mov_reg_v(ot, reg, cpu_T[1]);
B
bellard 已提交
5540
        } else {
5541
            gen_lea_modrm(env, s, modrm);
5542
            gen_op_mov_v_reg(ot, cpu_T[0], reg);
B
bellard 已提交
5543 5544
            /* for xchg, lock is implicit */
            if (!(prefixes & PREFIX_LOCK))
P
pbrook 已提交
5545
                gen_helper_lock();
5546
            gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
5547
            gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
5548
            if (!(prefixes & PREFIX_LOCK))
P
pbrook 已提交
5549
                gen_helper_unlock();
5550
            gen_op_mov_reg_v(ot, reg, cpu_T[1]);
B
bellard 已提交
5551 5552 5553
        }
        break;
    case 0xc4: /* les Gv */
5554
        /* In CODE64 this is VEX3; see above.  */
B
bellard 已提交
5555 5556 5557
        op = R_ES;
        goto do_lxx;
    case 0xc5: /* lds Gv */
5558
        /* In CODE64 this is VEX2; see above.  */
B
bellard 已提交
5559 5560 5561 5562 5563 5564 5565 5566 5567 5568 5569
        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:
5570
        ot = dflag != MO_16 ? MO_32 : MO_16;
5571
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5572
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5573 5574 5575
        mod = (modrm >> 6) & 3;
        if (mod == 3)
            goto illegal_op;
5576
        gen_lea_modrm(env, s, modrm);
5577
        gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
5578
        gen_add_A0_im(s, 1 << ot);
B
bellard 已提交
5579
        /* load the segment first to handle exceptions properly */
5580
        gen_op_ld_v(s, MO_16, cpu_T[0], cpu_A0);
5581
        gen_movl_seg_T0(s, op);
B
bellard 已提交
5582
        /* then put the data */
5583
        gen_op_mov_reg_v(ot, reg, cpu_T[1]);
B
bellard 已提交
5584
        if (s->is_jmp) {
B
bellard 已提交
5585
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
5586 5587 5588
            gen_eob(s);
        }
        break;
5589

B
bellard 已提交
5590 5591 5592 5593 5594 5595 5596 5597
        /************************/
        /* shifts */
    case 0xc0:
    case 0xc1:
        /* shift Ev,Ib */
        shift = 2;
    grp2:
        {
5598
            ot = mo_b_d(b, dflag);
5599
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5600 5601
            mod = (modrm >> 6) & 3;
            op = (modrm >> 3) & 7;
5602

B
bellard 已提交
5603
            if (mod != 3) {
B
bellard 已提交
5604 5605 5606
                if (shift == 2) {
                    s->rip_offset = 1;
                }
5607
                gen_lea_modrm(env, s, modrm);
B
bellard 已提交
5608 5609
                opreg = OR_TMP0;
            } else {
B
bellard 已提交
5610
                opreg = (modrm & 7) | REX_B(s);
B
bellard 已提交
5611 5612 5613 5614 5615 5616 5617
            }

            /* simpler op */
            if (shift == 0) {
                gen_shift(s, op, ot, opreg, OR_ECX);
            } else {
                if (shift == 2) {
5618
                    shift = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5619 5620 5621 5622 5623 5624 5625 5626 5627 5628 5629 5630 5631 5632 5633 5634 5635 5636 5637 5638 5639 5640 5641 5642 5643 5644 5645 5646 5647 5648 5649 5650
                }
                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:
5651
        ot = dflag;
5652
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5653
        mod = (modrm >> 6) & 3;
B
bellard 已提交
5654 5655
        rm = (modrm & 7) | REX_B(s);
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5656
        if (mod != 3) {
5657
            gen_lea_modrm(env, s, modrm);
5658
            opreg = OR_TMP0;
B
bellard 已提交
5659
        } else {
5660
            opreg = rm;
B
bellard 已提交
5661
        }
5662
        gen_op_mov_v_reg(ot, cpu_T[1], reg);
5663

B
bellard 已提交
5664
        if (shift) {
P
Paolo Bonzini 已提交
5665 5666 5667
            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 已提交
5668
        } else {
P
Paolo Bonzini 已提交
5669
            gen_shiftd_rm_T1(s, ot, opreg, op, cpu_regs[R_ECX]);
B
bellard 已提交
5670 5671 5672 5673 5674
        }
        break;

        /************************/
        /* floats */
5675
    case 0xd8 ... 0xdf:
B
bellard 已提交
5676 5677 5678 5679 5680 5681
        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;
        }
5682
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5683 5684 5685 5686 5687
        mod = (modrm >> 6) & 3;
        rm = modrm & 7;
        op = ((b & 7) << 3) | ((modrm >> 3) & 7);
        if (mod != 3) {
            /* memory op */
5688
            gen_lea_modrm(env, s, modrm);
B
bellard 已提交
5689 5690 5691 5692 5693 5694 5695 5696 5697 5698 5699
            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:
5700 5701
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
B
Blue Swirl 已提交
5702
                        gen_helper_flds_FT0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5703 5704
                        break;
                    case 1:
5705 5706
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
B
Blue Swirl 已提交
5707
                        gen_helper_fildl_FT0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5708 5709
                        break;
                    case 2:
5710 5711
                        tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0,
                                            s->mem_index, MO_LEQ);
B
Blue Swirl 已提交
5712
                        gen_helper_fldl_FT0(cpu_env, cpu_tmp1_i64);
B
bellard 已提交
5713 5714 5715
                        break;
                    case 3:
                    default:
5716 5717
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LESW);
B
Blue Swirl 已提交
5718
                        gen_helper_fildl_FT0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5719 5720
                        break;
                    }
5721

P
pbrook 已提交
5722
                    gen_helper_fp_arith_ST0_FT0(op1);
B
bellard 已提交
5723 5724
                    if (op1 == 3) {
                        /* fcomp needs pop */
B
Blue Swirl 已提交
5725
                        gen_helper_fpop(cpu_env);
B
bellard 已提交
5726 5727 5728 5729 5730 5731
                    }
                }
                break;
            case 0x08: /* flds */
            case 0x0a: /* fsts */
            case 0x0b: /* fstps */
B
bellard 已提交
5732 5733 5734
            case 0x18 ... 0x1b: /* fildl, fisttpl, fistl, fistpl */
            case 0x28 ... 0x2b: /* fldl, fisttpll, fstl, fstpl */
            case 0x38 ... 0x3b: /* filds, fisttps, fists, fistps */
B
bellard 已提交
5735 5736 5737 5738
                switch(op & 7) {
                case 0:
                    switch(op >> 4) {
                    case 0:
5739 5740
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
B
Blue Swirl 已提交
5741
                        gen_helper_flds_ST0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5742 5743
                        break;
                    case 1:
5744 5745
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
B
Blue Swirl 已提交
5746
                        gen_helper_fildl_ST0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5747 5748
                        break;
                    case 2:
5749 5750
                        tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0,
                                            s->mem_index, MO_LEQ);
B
Blue Swirl 已提交
5751
                        gen_helper_fldl_ST0(cpu_env, cpu_tmp1_i64);
B
bellard 已提交
5752 5753 5754
                        break;
                    case 3:
                    default:
5755 5756
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LESW);
B
Blue Swirl 已提交
5757
                        gen_helper_fildl_ST0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5758 5759 5760
                        break;
                    }
                    break;
B
bellard 已提交
5761
                case 1:
B
bellard 已提交
5762
                    /* XXX: the corresponding CPUID bit must be tested ! */
B
bellard 已提交
5763 5764
                    switch(op >> 4) {
                    case 1:
B
Blue Swirl 已提交
5765
                        gen_helper_fisttl_ST0(cpu_tmp2_i32, cpu_env);
5766 5767
                        tcg_gen_qemu_st_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
B
bellard 已提交
5768 5769
                        break;
                    case 2:
B
Blue Swirl 已提交
5770
                        gen_helper_fisttll_ST0(cpu_tmp1_i64, cpu_env);
5771 5772
                        tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0,
                                            s->mem_index, MO_LEQ);
B
bellard 已提交
5773 5774 5775
                        break;
                    case 3:
                    default:
B
Blue Swirl 已提交
5776
                        gen_helper_fistt_ST0(cpu_tmp2_i32, cpu_env);
5777 5778
                        tcg_gen_qemu_st_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUW);
B
bellard 已提交
5779
                        break;
B
bellard 已提交
5780
                    }
B
Blue Swirl 已提交
5781
                    gen_helper_fpop(cpu_env);
B
bellard 已提交
5782
                    break;
B
bellard 已提交
5783 5784 5785
                default:
                    switch(op >> 4) {
                    case 0:
B
Blue Swirl 已提交
5786
                        gen_helper_fsts_ST0(cpu_tmp2_i32, cpu_env);
5787 5788
                        tcg_gen_qemu_st_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
B
bellard 已提交
5789 5790
                        break;
                    case 1:
B
Blue Swirl 已提交
5791
                        gen_helper_fistl_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_fstl_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_fist_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 5806 5807
                        break;
                    }
                    if ((op & 7) == 3)
B
Blue Swirl 已提交
5808
                        gen_helper_fpop(cpu_env);
B
bellard 已提交
5809 5810 5811 5812
                    break;
                }
                break;
            case 0x0c: /* fldenv mem */
5813
                gen_helper_fldenv(cpu_env, cpu_A0, tcg_const_i32(dflag - 1));
B
bellard 已提交
5814 5815
                break;
            case 0x0d: /* fldcw mem */
5816 5817
                tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                    s->mem_index, MO_LEUW);
B
Blue Swirl 已提交
5818
                gen_helper_fldcw(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5819 5820
                break;
            case 0x0e: /* fnstenv mem */
5821
                gen_helper_fstenv(cpu_env, cpu_A0, tcg_const_i32(dflag - 1));
B
bellard 已提交
5822 5823
                break;
            case 0x0f: /* fnstcw mem */
B
Blue Swirl 已提交
5824
                gen_helper_fnstcw(cpu_tmp2_i32, cpu_env);
5825 5826
                tcg_gen_qemu_st_i32(cpu_tmp2_i32, cpu_A0,
                                    s->mem_index, MO_LEUW);
B
bellard 已提交
5827 5828
                break;
            case 0x1d: /* fldt mem */
B
Blue Swirl 已提交
5829
                gen_helper_fldt_ST0(cpu_env, cpu_A0);
B
bellard 已提交
5830 5831
                break;
            case 0x1f: /* fstpt mem */
B
Blue Swirl 已提交
5832 5833
                gen_helper_fstt_ST0(cpu_env, cpu_A0);
                gen_helper_fpop(cpu_env);
B
bellard 已提交
5834 5835
                break;
            case 0x2c: /* frstor mem */
5836
                gen_helper_frstor(cpu_env, cpu_A0, tcg_const_i32(dflag - 1));
B
bellard 已提交
5837 5838
                break;
            case 0x2e: /* fnsave mem */
5839
                gen_helper_fsave(cpu_env, cpu_A0, tcg_const_i32(dflag - 1));
B
bellard 已提交
5840 5841
                break;
            case 0x2f: /* fnstsw mem */
B
Blue Swirl 已提交
5842
                gen_helper_fnstsw(cpu_tmp2_i32, cpu_env);
5843 5844
                tcg_gen_qemu_st_i32(cpu_tmp2_i32, cpu_A0,
                                    s->mem_index, MO_LEUW);
B
bellard 已提交
5845 5846
                break;
            case 0x3c: /* fbld */
B
Blue Swirl 已提交
5847
                gen_helper_fbld_ST0(cpu_env, cpu_A0);
B
bellard 已提交
5848 5849
                break;
            case 0x3e: /* fbstp */
B
Blue Swirl 已提交
5850 5851
                gen_helper_fbst_ST0(cpu_env, cpu_A0);
                gen_helper_fpop(cpu_env);
B
bellard 已提交
5852 5853
                break;
            case 0x3d: /* fildll */
5854
                tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0, s->mem_index, MO_LEQ);
B
Blue Swirl 已提交
5855
                gen_helper_fildll_ST0(cpu_env, cpu_tmp1_i64);
B
bellard 已提交
5856 5857
                break;
            case 0x3f: /* fistpll */
B
Blue Swirl 已提交
5858
                gen_helper_fistll_ST0(cpu_tmp1_i64, cpu_env);
5859
                tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0, s->mem_index, MO_LEQ);
B
Blue Swirl 已提交
5860
                gen_helper_fpop(cpu_env);
B
bellard 已提交
5861 5862 5863 5864 5865 5866 5867 5868 5869 5870
                break;
            default:
                goto illegal_op;
            }
        } else {
            /* register float ops */
            opreg = rm;

            switch(op) {
            case 0x08: /* fld sti */
B
Blue Swirl 已提交
5871 5872 5873
                gen_helper_fpush(cpu_env);
                gen_helper_fmov_ST0_STN(cpu_env,
                                        tcg_const_i32((opreg + 1) & 7));
B
bellard 已提交
5874 5875
                break;
            case 0x09: /* fxchg sti */
B
bellard 已提交
5876 5877
            case 0x29: /* fxchg4 sti, undocumented op */
            case 0x39: /* fxchg7 sti, undocumented op */
B
Blue Swirl 已提交
5878
                gen_helper_fxchg_ST0_STN(cpu_env, tcg_const_i32(opreg));
B
bellard 已提交
5879 5880 5881 5882
                break;
            case 0x0a: /* grp d9/2 */
                switch(rm) {
                case 0: /* fnop */
5883
                    /* check exceptions (FreeBSD FPU probe) */
B
Blue Swirl 已提交
5884
                    gen_helper_fwait(cpu_env);
B
bellard 已提交
5885 5886 5887 5888 5889 5890 5891 5892
                    break;
                default:
                    goto illegal_op;
                }
                break;
            case 0x0c: /* grp d9/4 */
                switch(rm) {
                case 0: /* fchs */
B
Blue Swirl 已提交
5893
                    gen_helper_fchs_ST0(cpu_env);
B
bellard 已提交
5894 5895
                    break;
                case 1: /* fabs */
B
Blue Swirl 已提交
5896
                    gen_helper_fabs_ST0(cpu_env);
B
bellard 已提交
5897 5898
                    break;
                case 4: /* ftst */
B
Blue Swirl 已提交
5899 5900
                    gen_helper_fldz_FT0(cpu_env);
                    gen_helper_fcom_ST0_FT0(cpu_env);
B
bellard 已提交
5901 5902
                    break;
                case 5: /* fxam */
B
Blue Swirl 已提交
5903
                    gen_helper_fxam_ST0(cpu_env);
B
bellard 已提交
5904 5905 5906 5907 5908 5909 5910 5911 5912
                    break;
                default:
                    goto illegal_op;
                }
                break;
            case 0x0d: /* grp d9/5 */
                {
                    switch(rm) {
                    case 0:
B
Blue Swirl 已提交
5913 5914
                        gen_helper_fpush(cpu_env);
                        gen_helper_fld1_ST0(cpu_env);
B
bellard 已提交
5915 5916
                        break;
                    case 1:
B
Blue Swirl 已提交
5917 5918
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldl2t_ST0(cpu_env);
B
bellard 已提交
5919 5920
                        break;
                    case 2:
B
Blue Swirl 已提交
5921 5922
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldl2e_ST0(cpu_env);
B
bellard 已提交
5923 5924
                        break;
                    case 3:
B
Blue Swirl 已提交
5925 5926
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldpi_ST0(cpu_env);
B
bellard 已提交
5927 5928
                        break;
                    case 4:
B
Blue Swirl 已提交
5929 5930
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldlg2_ST0(cpu_env);
B
bellard 已提交
5931 5932
                        break;
                    case 5:
B
Blue Swirl 已提交
5933 5934
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldln2_ST0(cpu_env);
B
bellard 已提交
5935 5936
                        break;
                    case 6:
B
Blue Swirl 已提交
5937 5938
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldz_ST0(cpu_env);
B
bellard 已提交
5939 5940 5941 5942 5943 5944 5945 5946 5947
                        break;
                    default:
                        goto illegal_op;
                    }
                }
                break;
            case 0x0e: /* grp d9/6 */
                switch(rm) {
                case 0: /* f2xm1 */
B
Blue Swirl 已提交
5948
                    gen_helper_f2xm1(cpu_env);
B
bellard 已提交
5949 5950
                    break;
                case 1: /* fyl2x */
B
Blue Swirl 已提交
5951
                    gen_helper_fyl2x(cpu_env);
B
bellard 已提交
5952 5953
                    break;
                case 2: /* fptan */
B
Blue Swirl 已提交
5954
                    gen_helper_fptan(cpu_env);
B
bellard 已提交
5955 5956
                    break;
                case 3: /* fpatan */
B
Blue Swirl 已提交
5957
                    gen_helper_fpatan(cpu_env);
B
bellard 已提交
5958 5959
                    break;
                case 4: /* fxtract */
B
Blue Swirl 已提交
5960
                    gen_helper_fxtract(cpu_env);
B
bellard 已提交
5961 5962
                    break;
                case 5: /* fprem1 */
B
Blue Swirl 已提交
5963
                    gen_helper_fprem1(cpu_env);
B
bellard 已提交
5964 5965
                    break;
                case 6: /* fdecstp */
B
Blue Swirl 已提交
5966
                    gen_helper_fdecstp(cpu_env);
B
bellard 已提交
5967 5968 5969
                    break;
                default:
                case 7: /* fincstp */
B
Blue Swirl 已提交
5970
                    gen_helper_fincstp(cpu_env);
B
bellard 已提交
5971 5972 5973 5974 5975 5976
                    break;
                }
                break;
            case 0x0f: /* grp d9/7 */
                switch(rm) {
                case 0: /* fprem */
B
Blue Swirl 已提交
5977
                    gen_helper_fprem(cpu_env);
B
bellard 已提交
5978 5979
                    break;
                case 1: /* fyl2xp1 */
B
Blue Swirl 已提交
5980
                    gen_helper_fyl2xp1(cpu_env);
B
bellard 已提交
5981 5982
                    break;
                case 2: /* fsqrt */
B
Blue Swirl 已提交
5983
                    gen_helper_fsqrt(cpu_env);
B
bellard 已提交
5984 5985
                    break;
                case 3: /* fsincos */
B
Blue Swirl 已提交
5986
                    gen_helper_fsincos(cpu_env);
B
bellard 已提交
5987 5988
                    break;
                case 5: /* fscale */
B
Blue Swirl 已提交
5989
                    gen_helper_fscale(cpu_env);
B
bellard 已提交
5990 5991
                    break;
                case 4: /* frndint */
B
Blue Swirl 已提交
5992
                    gen_helper_frndint(cpu_env);
B
bellard 已提交
5993 5994
                    break;
                case 6: /* fsin */
B
Blue Swirl 已提交
5995
                    gen_helper_fsin(cpu_env);
B
bellard 已提交
5996 5997 5998
                    break;
                default:
                case 7: /* fcos */
B
Blue Swirl 已提交
5999
                    gen_helper_fcos(cpu_env);
B
bellard 已提交
6000 6001 6002 6003 6004 6005 6006 6007
                    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;
6008

B
bellard 已提交
6009 6010
                    op1 = op & 7;
                    if (op >= 0x20) {
P
pbrook 已提交
6011
                        gen_helper_fp_arith_STN_ST0(op1, opreg);
B
bellard 已提交
6012
                        if (op >= 0x30)
B
Blue Swirl 已提交
6013
                            gen_helper_fpop(cpu_env);
B
bellard 已提交
6014
                    } else {
B
Blue Swirl 已提交
6015
                        gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
P
pbrook 已提交
6016
                        gen_helper_fp_arith_ST0_FT0(op1);
B
bellard 已提交
6017 6018 6019 6020
                    }
                }
                break;
            case 0x02: /* fcom */
B
bellard 已提交
6021
            case 0x22: /* fcom2, undocumented op */
B
Blue Swirl 已提交
6022 6023
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fcom_ST0_FT0(cpu_env);
B
bellard 已提交
6024 6025
                break;
            case 0x03: /* fcomp */
B
bellard 已提交
6026 6027
            case 0x23: /* fcomp3, undocumented op */
            case 0x32: /* fcomp5, undocumented op */
B
Blue Swirl 已提交
6028 6029 6030
                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 已提交
6031 6032 6033 6034
                break;
            case 0x15: /* da/5 */
                switch(rm) {
                case 1: /* fucompp */
B
Blue Swirl 已提交
6035 6036 6037 6038
                    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 已提交
6039 6040 6041 6042 6043 6044 6045 6046 6047 6048 6049 6050
                    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 已提交
6051
                    gen_helper_fclex(cpu_env);
B
bellard 已提交
6052 6053
                    break;
                case 3: /* fninit */
B
Blue Swirl 已提交
6054
                    gen_helper_fninit(cpu_env);
B
bellard 已提交
6055 6056 6057 6058 6059 6060 6061 6062
                    break;
                case 4: /* fsetpm (287 only, just do nop here) */
                    break;
                default:
                    goto illegal_op;
                }
                break;
            case 0x1d: /* fucomi */
6063 6064 6065
                if (!(s->cpuid_features & CPUID_CMOV)) {
                    goto illegal_op;
                }
6066
                gen_update_cc_op(s);
B
Blue Swirl 已提交
6067 6068
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fucomi_ST0_FT0(cpu_env);
6069
                set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6070 6071
                break;
            case 0x1e: /* fcomi */
6072 6073 6074
                if (!(s->cpuid_features & CPUID_CMOV)) {
                    goto illegal_op;
                }
6075
                gen_update_cc_op(s);
B
Blue Swirl 已提交
6076 6077
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fcomi_ST0_FT0(cpu_env);
6078
                set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6079
                break;
B
bellard 已提交
6080
            case 0x28: /* ffree sti */
B
Blue Swirl 已提交
6081
                gen_helper_ffree_STN(cpu_env, tcg_const_i32(opreg));
6082
                break;
B
bellard 已提交
6083
            case 0x2a: /* fst sti */
B
Blue Swirl 已提交
6084
                gen_helper_fmov_STN_ST0(cpu_env, tcg_const_i32(opreg));
B
bellard 已提交
6085 6086
                break;
            case 0x2b: /* fstp sti */
B
bellard 已提交
6087 6088 6089
            case 0x0b: /* fstp1 sti, undocumented op */
            case 0x3a: /* fstp8 sti, undocumented op */
            case 0x3b: /* fstp9 sti, undocumented op */
B
Blue Swirl 已提交
6090 6091
                gen_helper_fmov_STN_ST0(cpu_env, tcg_const_i32(opreg));
                gen_helper_fpop(cpu_env);
B
bellard 已提交
6092 6093
                break;
            case 0x2c: /* fucom st(i) */
B
Blue Swirl 已提交
6094 6095
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fucom_ST0_FT0(cpu_env);
B
bellard 已提交
6096 6097
                break;
            case 0x2d: /* fucomp st(i) */
B
Blue Swirl 已提交
6098 6099 6100
                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 已提交
6101 6102 6103 6104
                break;
            case 0x33: /* de/3 */
                switch(rm) {
                case 1: /* fcompp */
B
Blue Swirl 已提交
6105 6106 6107 6108
                    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 已提交
6109 6110 6111 6112 6113
                    break;
                default:
                    goto illegal_op;
                }
                break;
B
bellard 已提交
6114
            case 0x38: /* ffreep sti, undocumented op */
B
Blue Swirl 已提交
6115 6116
                gen_helper_ffree_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fpop(cpu_env);
B
bellard 已提交
6117
                break;
B
bellard 已提交
6118 6119 6120
            case 0x3c: /* df/4 */
                switch(rm) {
                case 0:
B
Blue Swirl 已提交
6121
                    gen_helper_fnstsw(cpu_tmp2_i32, cpu_env);
6122
                    tcg_gen_extu_i32_tl(cpu_T[0], cpu_tmp2_i32);
6123
                    gen_op_mov_reg_v(MO_16, R_EAX, cpu_T[0]);
B
bellard 已提交
6124 6125 6126 6127 6128 6129
                    break;
                default:
                    goto illegal_op;
                }
                break;
            case 0x3d: /* fucomip */
6130 6131 6132
                if (!(s->cpuid_features & CPUID_CMOV)) {
                    goto illegal_op;
                }
6133
                gen_update_cc_op(s);
B
Blue Swirl 已提交
6134 6135 6136
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fucomi_ST0_FT0(cpu_env);
                gen_helper_fpop(cpu_env);
6137
                set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6138 6139
                break;
            case 0x3e: /* fcomip */
6140 6141 6142
                if (!(s->cpuid_features & CPUID_CMOV)) {
                    goto illegal_op;
                }
6143
                gen_update_cc_op(s);
B
Blue Swirl 已提交
6144 6145 6146
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fcomi_ST0_FT0(cpu_env);
                gen_helper_fpop(cpu_env);
6147
                set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6148
                break;
6149 6150 6151
            case 0x10 ... 0x13: /* fcmovxx */
            case 0x18 ... 0x1b:
                {
6152 6153
                    int op1;
                    TCGLabel *l1;
6154
                    static const uint8_t fcmov_cc[8] = {
6155 6156 6157 6158 6159
                        (JCC_B << 1),
                        (JCC_Z << 1),
                        (JCC_BE << 1),
                        (JCC_P << 1),
                    };
6160 6161 6162 6163

                    if (!(s->cpuid_features & CPUID_CMOV)) {
                        goto illegal_op;
                    }
6164
                    op1 = fcmov_cc[op & 3] | (((op >> 3) & 1) ^ 1);
B
bellard 已提交
6165
                    l1 = gen_new_label();
6166
                    gen_jcc1_noeob(s, op1, l1);
B
Blue Swirl 已提交
6167
                    gen_helper_fmov_ST0_STN(cpu_env, tcg_const_i32(opreg));
B
bellard 已提交
6168
                    gen_set_label(l1);
6169 6170
                }
                break;
B
bellard 已提交
6171 6172 6173 6174 6175 6176 6177 6178 6179 6180
            default:
                goto illegal_op;
            }
        }
        break;
        /************************/
        /* string ops */

    case 0xa4: /* movsS */
    case 0xa5:
6181
        ot = mo_b_d(b, dflag);
B
bellard 已提交
6182 6183 6184 6185 6186 6187
        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;
6188

B
bellard 已提交
6189 6190
    case 0xaa: /* stosS */
    case 0xab:
6191
        ot = mo_b_d(b, dflag);
B
bellard 已提交
6192 6193 6194 6195 6196 6197 6198 6199
        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:
6200
        ot = mo_b_d(b, dflag);
B
bellard 已提交
6201 6202 6203 6204 6205 6206 6207 6208
        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:
6209
        ot = mo_b_d(b, dflag);
B
bellard 已提交
6210 6211 6212 6213 6214 6215 6216 6217 6218 6219 6220
        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:
6221
        ot = mo_b_d(b, dflag);
B
bellard 已提交
6222 6223 6224 6225 6226 6227 6228 6229 6230 6231
        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:
6232
        ot = mo_b_d32(b, dflag);
6233
        tcg_gen_ext16u_tl(cpu_T[0], cpu_regs[R_EDX]);
6234 6235
        gen_check_io(s, ot, pc_start - s->cs_base, 
                     SVM_IOIO_TYPE_MASK | svm_is_rep(prefixes) | 4);
6236 6237
        if (prefixes & (PREFIX_REPZ | PREFIX_REPNZ)) {
            gen_repz_ins(s, ot, pc_start - s->cs_base, s->pc - s->cs_base);
B
bellard 已提交
6238
        } else {
6239
            gen_ins(s, ot);
6240
            if (s->tb->cflags & CF_USE_ICOUNT) {
P
pbrook 已提交
6241 6242
                gen_jmp(s, s->pc - s->cs_base);
            }
B
bellard 已提交
6243 6244 6245 6246
        }
        break;
    case 0x6e: /* outsS */
    case 0x6f:
6247
        ot = mo_b_d32(b, dflag);
6248
        tcg_gen_ext16u_tl(cpu_T[0], cpu_regs[R_EDX]);
6249 6250
        gen_check_io(s, ot, pc_start - s->cs_base,
                     svm_is_rep(prefixes) | 4);
6251 6252
        if (prefixes & (PREFIX_REPZ | PREFIX_REPNZ)) {
            gen_repz_outs(s, ot, pc_start - s->cs_base, s->pc - s->cs_base);
B
bellard 已提交
6253
        } else {
6254
            gen_outs(s, ot);
6255
            if (s->tb->cflags & CF_USE_ICOUNT) {
P
pbrook 已提交
6256 6257
                gen_jmp(s, s->pc - s->cs_base);
            }
B
bellard 已提交
6258 6259 6260 6261 6262
        }
        break;

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

B
bellard 已提交
6264 6265
    case 0xe4:
    case 0xe5:
6266
        ot = mo_b_d32(b, dflag);
6267
        val = cpu_ldub_code(env, s->pc++);
6268
        tcg_gen_movi_tl(cpu_T[0], val);
6269 6270
        gen_check_io(s, ot, pc_start - s->cs_base,
                     SVM_IOIO_TYPE_MASK | svm_is_rep(prefixes));
6271
        if (s->tb->cflags & CF_USE_ICOUNT) {
P
pbrook 已提交
6272
            gen_io_start();
6273
	}
6274
        tcg_gen_movi_i32(cpu_tmp2_i32, val);
P
pbrook 已提交
6275
        gen_helper_in_func(ot, cpu_T[1], cpu_tmp2_i32);
6276
        gen_op_mov_reg_v(ot, R_EAX, cpu_T[1]);
6277
        if (s->tb->cflags & CF_USE_ICOUNT) {
P
pbrook 已提交
6278 6279 6280
            gen_io_end();
            gen_jmp(s, s->pc - s->cs_base);
        }
B
bellard 已提交
6281 6282 6283
        break;
    case 0xe6:
    case 0xe7:
6284
        ot = mo_b_d32(b, dflag);
6285
        val = cpu_ldub_code(env, s->pc++);
6286
        tcg_gen_movi_tl(cpu_T[0], val);
6287 6288
        gen_check_io(s, ot, pc_start - s->cs_base,
                     svm_is_rep(prefixes));
6289
        gen_op_mov_v_reg(ot, cpu_T[1], R_EAX);
6290

6291
        if (s->tb->cflags & CF_USE_ICOUNT) {
P
pbrook 已提交
6292
            gen_io_start();
6293
	}
6294
        tcg_gen_movi_i32(cpu_tmp2_i32, val);
6295
        tcg_gen_trunc_tl_i32(cpu_tmp3_i32, cpu_T[1]);
P
pbrook 已提交
6296
        gen_helper_out_func(ot, cpu_tmp2_i32, cpu_tmp3_i32);
6297
        if (s->tb->cflags & CF_USE_ICOUNT) {
P
pbrook 已提交
6298 6299 6300
            gen_io_end();
            gen_jmp(s, s->pc - s->cs_base);
        }
B
bellard 已提交
6301 6302 6303
        break;
    case 0xec:
    case 0xed:
6304
        ot = mo_b_d32(b, dflag);
6305
        tcg_gen_ext16u_tl(cpu_T[0], cpu_regs[R_EDX]);
6306 6307
        gen_check_io(s, ot, pc_start - s->cs_base,
                     SVM_IOIO_TYPE_MASK | svm_is_rep(prefixes));
6308
        if (s->tb->cflags & CF_USE_ICOUNT) {
P
pbrook 已提交
6309
            gen_io_start();
6310
	}
6311
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
P
pbrook 已提交
6312
        gen_helper_in_func(ot, cpu_T[1], cpu_tmp2_i32);
6313
        gen_op_mov_reg_v(ot, R_EAX, cpu_T[1]);
6314
        if (s->tb->cflags & CF_USE_ICOUNT) {
P
pbrook 已提交
6315 6316 6317
            gen_io_end();
            gen_jmp(s, s->pc - s->cs_base);
        }
B
bellard 已提交
6318 6319 6320
        break;
    case 0xee:
    case 0xef:
6321
        ot = mo_b_d32(b, dflag);
6322
        tcg_gen_ext16u_tl(cpu_T[0], cpu_regs[R_EDX]);
6323 6324
        gen_check_io(s, ot, pc_start - s->cs_base,
                     svm_is_rep(prefixes));
6325
        gen_op_mov_v_reg(ot, cpu_T[1], R_EAX);
6326

6327
        if (s->tb->cflags & CF_USE_ICOUNT) {
P
pbrook 已提交
6328
            gen_io_start();
6329
	}
6330 6331
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
        tcg_gen_trunc_tl_i32(cpu_tmp3_i32, cpu_T[1]);
P
pbrook 已提交
6332
        gen_helper_out_func(ot, cpu_tmp2_i32, cpu_tmp3_i32);
6333
        if (s->tb->cflags & CF_USE_ICOUNT) {
P
pbrook 已提交
6334 6335 6336
            gen_io_end();
            gen_jmp(s, s->pc - s->cs_base);
        }
B
bellard 已提交
6337 6338 6339 6340 6341
        break;

        /************************/
        /* control */
    case 0xc2: /* ret im */
6342
        val = cpu_ldsw_code(env, s->pc);
B
bellard 已提交
6343
        s->pc += 2;
6344 6345 6346
        ot = gen_pop_T0(s);
        gen_stack_update(s, val + (1 << ot));
        /* Note that gen_pop_T0 uses a zero-extending load.  */
6347
        gen_op_jmp_v(cpu_T[0]);
B
bellard 已提交
6348 6349 6350
        gen_eob(s);
        break;
    case 0xc3: /* ret */
6351 6352 6353
        ot = gen_pop_T0(s);
        gen_pop_update(s, ot);
        /* Note that gen_pop_T0 uses a zero-extending load.  */
6354
        gen_op_jmp_v(cpu_T[0]);
B
bellard 已提交
6355 6356 6357
        gen_eob(s);
        break;
    case 0xca: /* lret im */
6358
        val = cpu_ldsw_code(env, s->pc);
B
bellard 已提交
6359 6360 6361
        s->pc += 2;
    do_lret:
        if (s->pe && !s->vm86) {
6362
            gen_update_cc_op(s);
B
bellard 已提交
6363
            gen_jmp_im(pc_start - s->cs_base);
6364
            gen_helper_lret_protected(cpu_env, tcg_const_i32(dflag - 1),
P
pbrook 已提交
6365
                                      tcg_const_i32(val));
B
bellard 已提交
6366 6367 6368
        } else {
            gen_stack_A0(s);
            /* pop offset */
6369
            gen_op_ld_v(s, dflag, cpu_T[0], cpu_A0);
B
bellard 已提交
6370 6371
            /* NOTE: keeping EIP updated is not a problem in case of
               exception */
6372
            gen_op_jmp_v(cpu_T[0]);
B
bellard 已提交
6373
            /* pop selector */
6374 6375
            gen_op_addl_A0_im(1 << dflag);
            gen_op_ld_v(s, dflag, cpu_T[0], cpu_A0);
6376
            gen_op_movl_seg_T0_vm(R_CS);
B
bellard 已提交
6377
            /* add stack offset */
6378
            gen_stack_update(s, val + (2 << dflag));
B
bellard 已提交
6379 6380 6381 6382 6383 6384 6385
        }
        gen_eob(s);
        break;
    case 0xcb: /* lret */
        val = 0;
        goto do_lret;
    case 0xcf: /* iret */
B
bellard 已提交
6386
        gen_svm_check_intercept(s, pc_start, SVM_EXIT_IRET);
B
bellard 已提交
6387 6388
        if (!s->pe) {
            /* real mode */
6389
            gen_helper_iret_real(cpu_env, tcg_const_i32(dflag - 1));
6390
            set_cc_op(s, CC_OP_EFLAGS);
6391 6392 6393 6394
        } else if (s->vm86) {
            if (s->iopl != 3) {
                gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
            } else {
6395
                gen_helper_iret_real(cpu_env, tcg_const_i32(dflag - 1));
6396
                set_cc_op(s, CC_OP_EFLAGS);
6397
            }
B
bellard 已提交
6398
        } else {
6399
            gen_helper_iret_protected(cpu_env, tcg_const_i32(dflag - 1),
P
pbrook 已提交
6400
                                      tcg_const_i32(s->pc - s->cs_base));
6401
            set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6402 6403 6404 6405 6406
        }
        gen_eob(s);
        break;
    case 0xe8: /* call im */
        {
6407
            if (dflag != MO_16) {
6408
                tval = (int32_t)insn_get(env, s, MO_32);
6409
            } else {
6410
                tval = (int16_t)insn_get(env, s, MO_16);
6411
            }
B
bellard 已提交
6412
            next_eip = s->pc - s->cs_base;
B
bellard 已提交
6413
            tval += next_eip;
6414
            if (dflag == MO_16) {
B
bellard 已提交
6415
                tval &= 0xffff;
6416
            } else if (!CODE64(s)) {
6417
                tval &= 0xffffffff;
6418
            }
6419
            tcg_gen_movi_tl(cpu_T[0], next_eip);
6420
            gen_push_v(s, cpu_T[0]);
B
bellard 已提交
6421
            gen_jmp(s, tval);
B
bellard 已提交
6422 6423 6424 6425 6426
        }
        break;
    case 0x9a: /* lcall im */
        {
            unsigned int selector, offset;
6427

B
bellard 已提交
6428 6429
            if (CODE64(s))
                goto illegal_op;
6430
            ot = dflag;
6431
            offset = insn_get(env, s, ot);
6432
            selector = insn_get(env, s, MO_16);
6433

6434
            tcg_gen_movi_tl(cpu_T[0], selector);
6435
            tcg_gen_movi_tl(cpu_T[1], offset);
B
bellard 已提交
6436 6437
        }
        goto do_lcall;
B
bellard 已提交
6438
    case 0xe9: /* jmp im */
6439
        if (dflag != MO_16) {
6440
            tval = (int32_t)insn_get(env, s, MO_32);
6441
        } else {
6442
            tval = (int16_t)insn_get(env, s, MO_16);
6443
        }
B
bellard 已提交
6444
        tval += s->pc - s->cs_base;
6445
        if (dflag == MO_16) {
B
bellard 已提交
6446
            tval &= 0xffff;
6447
        } else if (!CODE64(s)) {
6448
            tval &= 0xffffffff;
6449
        }
B
bellard 已提交
6450
        gen_jmp(s, tval);
B
bellard 已提交
6451 6452 6453 6454 6455
        break;
    case 0xea: /* ljmp im */
        {
            unsigned int selector, offset;

B
bellard 已提交
6456 6457
            if (CODE64(s))
                goto illegal_op;
6458
            ot = dflag;
6459
            offset = insn_get(env, s, ot);
6460
            selector = insn_get(env, s, MO_16);
6461

6462
            tcg_gen_movi_tl(cpu_T[0], selector);
6463
            tcg_gen_movi_tl(cpu_T[1], offset);
B
bellard 已提交
6464 6465 6466
        }
        goto do_ljmp;
    case 0xeb: /* jmp Jb */
6467
        tval = (int8_t)insn_get(env, s, MO_8);
B
bellard 已提交
6468
        tval += s->pc - s->cs_base;
6469
        if (dflag == MO_16) {
B
bellard 已提交
6470
            tval &= 0xffff;
6471
        }
B
bellard 已提交
6472
        gen_jmp(s, tval);
B
bellard 已提交
6473 6474
        break;
    case 0x70 ... 0x7f: /* jcc Jb */
6475
        tval = (int8_t)insn_get(env, s, MO_8);
B
bellard 已提交
6476 6477
        goto do_jcc;
    case 0x180 ... 0x18f: /* jcc Jv */
6478
        if (dflag != MO_16) {
6479
            tval = (int32_t)insn_get(env, s, MO_32);
B
bellard 已提交
6480
        } else {
6481
            tval = (int16_t)insn_get(env, s, MO_16);
B
bellard 已提交
6482 6483 6484
        }
    do_jcc:
        next_eip = s->pc - s->cs_base;
B
bellard 已提交
6485
        tval += next_eip;
6486
        if (dflag == MO_16) {
B
bellard 已提交
6487
            tval &= 0xffff;
6488
        }
B
bellard 已提交
6489
        gen_jcc(s, b, tval, next_eip);
B
bellard 已提交
6490 6491 6492
        break;

    case 0x190 ... 0x19f: /* setcc Gv */
6493
        modrm = cpu_ldub_code(env, s->pc++);
6494
        gen_setcc1(s, b, cpu_T[0]);
6495
        gen_ldst_modrm(env, s, modrm, MO_8, OR_TMP0, 1);
B
bellard 已提交
6496 6497
        break;
    case 0x140 ... 0x14f: /* cmov Gv, Ev */
6498 6499 6500
        if (!(s->cpuid_features & CPUID_CMOV)) {
            goto illegal_op;
        }
6501
        ot = dflag;
6502 6503 6504
        modrm = cpu_ldub_code(env, s->pc++);
        reg = ((modrm >> 3) & 7) | rex_r;
        gen_cmovcc1(env, s, ot, b, modrm, reg);
B
bellard 已提交
6505
        break;
6506

B
bellard 已提交
6507 6508 6509
        /************************/
        /* flags */
    case 0x9c: /* pushf */
B
bellard 已提交
6510
        gen_svm_check_intercept(s, pc_start, SVM_EXIT_PUSHF);
B
bellard 已提交
6511 6512 6513
        if (s->vm86 && s->iopl != 3) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
6514
            gen_update_cc_op(s);
6515
            gen_helper_read_eflags(cpu_T[0], cpu_env);
6516
            gen_push_v(s, cpu_T[0]);
B
bellard 已提交
6517 6518 6519
        }
        break;
    case 0x9d: /* popf */
B
bellard 已提交
6520
        gen_svm_check_intercept(s, pc_start, SVM_EXIT_POPF);
B
bellard 已提交
6521 6522 6523
        if (s->vm86 && s->iopl != 3) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
6524
            ot = gen_pop_T0(s);
B
bellard 已提交
6525
            if (s->cpl == 0) {
6526
                if (dflag != MO_16) {
6527 6528 6529 6530 6531
                    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 已提交
6532
                } else {
6533 6534 6535 6536 6537
                    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 已提交
6538 6539
                }
            } else {
B
bellard 已提交
6540
                if (s->cpl <= s->iopl) {
6541
                    if (dflag != MO_16) {
6542 6543 6544 6545 6546 6547
                        gen_helper_write_eflags(cpu_env, cpu_T[0],
                                                tcg_const_i32((TF_MASK |
                                                               AC_MASK |
                                                               ID_MASK |
                                                               NT_MASK |
                                                               IF_MASK)));
B
bellard 已提交
6548
                    } else {
6549 6550 6551 6552 6553 6554 6555
                        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 已提交
6556
                    }
B
bellard 已提交
6557
                } else {
6558
                    if (dflag != MO_16) {
6559 6560 6561
                        gen_helper_write_eflags(cpu_env, cpu_T[0],
                                           tcg_const_i32((TF_MASK | AC_MASK |
                                                          ID_MASK | NT_MASK)));
B
bellard 已提交
6562
                    } else {
6563 6564 6565 6566
                        gen_helper_write_eflags(cpu_env, cpu_T[0],
                                           tcg_const_i32((TF_MASK | AC_MASK |
                                                          ID_MASK | NT_MASK)
                                                         & 0xffff));
B
bellard 已提交
6567
                    }
B
bellard 已提交
6568 6569
                }
            }
6570
            gen_pop_update(s, ot);
6571
            set_cc_op(s, CC_OP_EFLAGS);
H
H. Peter Anvin 已提交
6572
            /* abort translation because TF/AC flag may change */
B
bellard 已提交
6573
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
6574 6575 6576 6577
            gen_eob(s);
        }
        break;
    case 0x9e: /* sahf */
B
bellard 已提交
6578
        if (CODE64(s) && !(s->cpuid_ext3_features & CPUID_EXT3_LAHF_LM))
B
bellard 已提交
6579
            goto illegal_op;
6580
        gen_op_mov_v_reg(MO_8, cpu_T[0], R_AH);
6581
        gen_compute_eflags(s);
6582 6583 6584
        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 已提交
6585 6586
        break;
    case 0x9f: /* lahf */
B
bellard 已提交
6587
        if (CODE64(s) && !(s->cpuid_ext3_features & CPUID_EXT3_LAHF_LM))
B
bellard 已提交
6588
            goto illegal_op;
6589
        gen_compute_eflags(s);
6590
        /* Note: gen_compute_eflags() only gives the condition codes */
6591
        tcg_gen_ori_tl(cpu_T[0], cpu_cc_src, 0x02);
6592
        gen_op_mov_reg_v(MO_8, R_AH, cpu_T[0]);
B
bellard 已提交
6593 6594
        break;
    case 0xf5: /* cmc */
6595
        gen_compute_eflags(s);
6596
        tcg_gen_xori_tl(cpu_cc_src, cpu_cc_src, CC_C);
B
bellard 已提交
6597 6598
        break;
    case 0xf8: /* clc */
6599
        gen_compute_eflags(s);
6600
        tcg_gen_andi_tl(cpu_cc_src, cpu_cc_src, ~CC_C);
B
bellard 已提交
6601 6602
        break;
    case 0xf9: /* stc */
6603
        gen_compute_eflags(s);
6604
        tcg_gen_ori_tl(cpu_cc_src, cpu_cc_src, CC_C);
B
bellard 已提交
6605 6606
        break;
    case 0xfc: /* cld */
6607
        tcg_gen_movi_i32(cpu_tmp2_i32, 1);
6608
        tcg_gen_st_i32(cpu_tmp2_i32, cpu_env, offsetof(CPUX86State, df));
B
bellard 已提交
6609 6610
        break;
    case 0xfd: /* std */
6611
        tcg_gen_movi_i32(cpu_tmp2_i32, -1);
6612
        tcg_gen_st_i32(cpu_tmp2_i32, cpu_env, offsetof(CPUX86State, df));
B
bellard 已提交
6613 6614 6615 6616 6617
        break;

        /************************/
        /* bit operations */
    case 0x1ba: /* bt/bts/btr/btc Gv, im */
6618
        ot = dflag;
6619
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
6620
        op = (modrm >> 3) & 7;
B
bellard 已提交
6621
        mod = (modrm >> 6) & 3;
B
bellard 已提交
6622
        rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
6623
        if (mod != 3) {
B
bellard 已提交
6624
            s->rip_offset = 1;
6625
            gen_lea_modrm(env, s, modrm);
6626
            gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
6627
        } else {
6628
            gen_op_mov_v_reg(ot, cpu_T[0], rm);
B
bellard 已提交
6629 6630
        }
        /* load shift */
6631
        val = cpu_ldub_code(env, s->pc++);
6632
        tcg_gen_movi_tl(cpu_T[1], val);
B
bellard 已提交
6633 6634 6635
        if (op < 4)
            goto illegal_op;
        op -= 4;
B
bellard 已提交
6636
        goto bt_op;
B
bellard 已提交
6637 6638 6639 6640 6641 6642 6643 6644 6645 6646 6647 6648
    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:
6649
        ot = dflag;
6650
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
6651
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
6652
        mod = (modrm >> 6) & 3;
B
bellard 已提交
6653
        rm = (modrm & 7) | REX_B(s);
6654
        gen_op_mov_v_reg(MO_32, cpu_T[1], reg);
B
bellard 已提交
6655
        if (mod != 3) {
6656
            gen_lea_modrm(env, s, modrm);
B
bellard 已提交
6657
            /* specific case: we need to add a displacement */
B
bellard 已提交
6658 6659 6660 6661
            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);
6662
            gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
6663
        } else {
6664
            gen_op_mov_v_reg(ot, cpu_T[0], rm);
B
bellard 已提交
6665
        }
B
bellard 已提交
6666 6667
    bt_op:
        tcg_gen_andi_tl(cpu_T[1], cpu_T[1], (1 << (3 + ot)) - 1);
6668
        tcg_gen_shr_tl(cpu_tmp4, cpu_T[0], cpu_T[1]);
B
bellard 已提交
6669 6670 6671 6672 6673 6674 6675 6676 6677 6678 6679
        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]);
6680
            tcg_gen_andc_tl(cpu_T[0], cpu_T[0], cpu_tmp0);
B
bellard 已提交
6681 6682 6683 6684 6685 6686 6687 6688
            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 已提交
6689
        if (op != 0) {
6690 6691 6692
            if (mod != 3) {
                gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
            } else {
6693
                gen_op_mov_reg_v(ot, rm, cpu_T[0]);
6694
            }
6695 6696 6697 6698 6699 6700 6701 6702 6703 6704 6705 6706 6707 6708 6709 6710 6711 6712 6713 6714 6715
        }

        /* 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 已提交
6716
            tcg_gen_mov_tl(cpu_cc_src, cpu_tmp4);
6717 6718 6719 6720 6721 6722 6723 6724
            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 已提交
6725 6726
        }
        break;
6727 6728
    case 0x1bc: /* bsf / tzcnt */
    case 0x1bd: /* bsr / lzcnt */
6729
        ot = dflag;
6730 6731 6732 6733 6734 6735 6736 6737 6738 6739 6740 6741 6742 6743 6744 6745 6746
        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 已提交
6747
            } else {
6748 6749 6750 6751 6752
                /* 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 已提交
6753
            }
6754 6755 6756 6757 6758 6759 6760 6761 6762 6763 6764 6765 6766 6767 6768 6769 6770 6771 6772 6773 6774 6775 6776
            /* 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 已提交
6777
        }
6778
        gen_op_mov_reg_v(ot, reg, cpu_T[0]);
B
bellard 已提交
6779 6780 6781 6782
        break;
        /************************/
        /* bcd */
    case 0x27: /* daa */
B
bellard 已提交
6783 6784
        if (CODE64(s))
            goto illegal_op;
6785
        gen_update_cc_op(s);
6786
        gen_helper_daa(cpu_env);
6787
        set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6788 6789
        break;
    case 0x2f: /* das */
B
bellard 已提交
6790 6791
        if (CODE64(s))
            goto illegal_op;
6792
        gen_update_cc_op(s);
6793
        gen_helper_das(cpu_env);
6794
        set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6795 6796
        break;
    case 0x37: /* aaa */
B
bellard 已提交
6797 6798
        if (CODE64(s))
            goto illegal_op;
6799
        gen_update_cc_op(s);
6800
        gen_helper_aaa(cpu_env);
6801
        set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6802 6803
        break;
    case 0x3f: /* aas */
B
bellard 已提交
6804 6805
        if (CODE64(s))
            goto illegal_op;
6806
        gen_update_cc_op(s);
6807
        gen_helper_aas(cpu_env);
6808
        set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6809 6810
        break;
    case 0xd4: /* aam */
B
bellard 已提交
6811 6812
        if (CODE64(s))
            goto illegal_op;
6813
        val = cpu_ldub_code(env, s->pc++);
6814 6815 6816
        if (val == 0) {
            gen_exception(s, EXCP00_DIVZ, pc_start - s->cs_base);
        } else {
6817
            gen_helper_aam(cpu_env, tcg_const_i32(val));
6818
            set_cc_op(s, CC_OP_LOGICB);
6819
        }
B
bellard 已提交
6820 6821
        break;
    case 0xd5: /* aad */
B
bellard 已提交
6822 6823
        if (CODE64(s))
            goto illegal_op;
6824
        val = cpu_ldub_code(env, s->pc++);
6825
        gen_helper_aad(cpu_env, tcg_const_i32(val));
6826
        set_cc_op(s, CC_OP_LOGICB);
B
bellard 已提交
6827 6828 6829 6830
        break;
        /************************/
        /* misc */
    case 0x90: /* nop */
6831
        /* XXX: correct lock test for all insn */
R
Richard Henderson 已提交
6832
        if (prefixes & PREFIX_LOCK) {
6833
            goto illegal_op;
R
Richard Henderson 已提交
6834 6835 6836 6837 6838
        }
        /* 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 已提交
6839
        if (prefixes & PREFIX_REPZ) {
6840 6841 6842 6843
            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 已提交
6844
        }
B
bellard 已提交
6845 6846
        break;
    case 0x9b: /* fwait */
6847
        if ((s->flags & (HF_MP_MASK | HF_TS_MASK)) ==
B
bellard 已提交
6848 6849
            (HF_MP_MASK | HF_TS_MASK)) {
            gen_exception(s, EXCP07_PREX, pc_start - s->cs_base);
B
bellard 已提交
6850
        } else {
B
Blue Swirl 已提交
6851
            gen_helper_fwait(cpu_env);
B
bellard 已提交
6852
        }
B
bellard 已提交
6853 6854 6855 6856 6857
        break;
    case 0xcc: /* int3 */
        gen_interrupt(s, EXCP03_INT3, pc_start - s->cs_base, s->pc - s->cs_base);
        break;
    case 0xcd: /* int N */
6858
        val = cpu_ldub_code(env, s->pc++);
6859
        if (s->vm86 && s->iopl != 3) {
6860
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
6861 6862 6863
        } else {
            gen_interrupt(s, val, pc_start - s->cs_base, s->pc - s->cs_base);
        }
B
bellard 已提交
6864 6865
        break;
    case 0xce: /* into */
B
bellard 已提交
6866 6867
        if (CODE64(s))
            goto illegal_op;
6868
        gen_update_cc_op(s);
6869
        gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
6870
        gen_helper_into(cpu_env, tcg_const_i32(s->pc - pc_start));
B
bellard 已提交
6871
        break;
A
aurel32 已提交
6872
#ifdef WANT_ICEBP
B
bellard 已提交
6873
    case 0xf1: /* icebp (undocumented, exits to external debugger) */
B
bellard 已提交
6874
        gen_svm_check_intercept(s, pc_start, SVM_EXIT_ICEBP);
6875
#if 1
B
bellard 已提交
6876
        gen_debug(s, pc_start - s->cs_base);
6877 6878
#else
        /* start debug */
6879
        tb_flush(CPU(x86_env_get_cpu(env)));
6880
        qemu_set_log(CPU_LOG_INT | CPU_LOG_TB_IN_ASM);
6881
#endif
B
bellard 已提交
6882
        break;
A
aurel32 已提交
6883
#endif
B
bellard 已提交
6884 6885 6886
    case 0xfa: /* cli */
        if (!s->vm86) {
            if (s->cpl <= s->iopl) {
6887
                gen_helper_cli(cpu_env);
B
bellard 已提交
6888 6889 6890 6891 6892
            } else {
                gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
            }
        } else {
            if (s->iopl == 3) {
6893
                gen_helper_cli(cpu_env);
B
bellard 已提交
6894 6895 6896 6897 6898 6899 6900 6901 6902
            } 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:
6903
                gen_helper_sti(cpu_env);
B
bellard 已提交
6904
                /* interruptions are enabled only the first insn after sti */
6905 6906 6907
                /* If several instructions disable interrupts, only the
                   _first_ does it */
                if (!(s->tb->flags & HF_INHIBIT_IRQ_MASK))
6908
                    gen_helper_set_inhibit_irq(cpu_env);
B
bellard 已提交
6909
                /* give a chance to handle pending irqs */
B
bellard 已提交
6910
                gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
6911 6912 6913 6914 6915 6916 6917 6918 6919 6920 6921 6922 6923
                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 已提交
6924 6925
        if (CODE64(s))
            goto illegal_op;
6926
        ot = dflag;
6927
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
6928 6929 6930 6931
        reg = (modrm >> 3) & 7;
        mod = (modrm >> 6) & 3;
        if (mod == 3)
            goto illegal_op;
6932
        gen_op_mov_v_reg(ot, cpu_T[0], reg);
6933
        gen_lea_modrm(env, s, modrm);
6934
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
6935
        if (ot == MO_16) {
B
Blue Swirl 已提交
6936 6937 6938 6939
            gen_helper_boundw(cpu_env, cpu_A0, cpu_tmp2_i32);
        } else {
            gen_helper_boundl(cpu_env, cpu_A0, cpu_tmp2_i32);
        }
B
bellard 已提交
6940 6941
        break;
    case 0x1c8 ... 0x1cf: /* bswap reg */
B
bellard 已提交
6942 6943
        reg = (b & 7) | REX_B(s);
#ifdef TARGET_X86_64
6944
        if (dflag == MO_64) {
6945
            gen_op_mov_v_reg(MO_64, cpu_T[0], reg);
A
aurel32 已提交
6946
            tcg_gen_bswap64_i64(cpu_T[0], cpu_T[0]);
6947
            gen_op_mov_reg_v(MO_64, reg, cpu_T[0]);
6948
        } else
6949
#endif
B
bellard 已提交
6950
        {
6951
            gen_op_mov_v_reg(MO_32, cpu_T[0], reg);
6952 6953
            tcg_gen_ext32u_tl(cpu_T[0], cpu_T[0]);
            tcg_gen_bswap32_tl(cpu_T[0], cpu_T[0]);
6954
            gen_op_mov_reg_v(MO_32, reg, cpu_T[0]);
B
bellard 已提交
6955
        }
B
bellard 已提交
6956 6957
        break;
    case 0xd6: /* salc */
B
bellard 已提交
6958 6959
        if (CODE64(s))
            goto illegal_op;
6960
        gen_compute_eflags_c(s, cpu_T[0]);
6961
        tcg_gen_neg_tl(cpu_T[0], cpu_T[0]);
6962
        gen_op_mov_reg_v(MO_8, R_EAX, cpu_T[0]);
B
bellard 已提交
6963 6964 6965 6966 6967
        break;
    case 0xe0: /* loopnz */
    case 0xe1: /* loopz */
    case 0xe2: /* loop */
    case 0xe3: /* jecxz */
B
bellard 已提交
6968
        {
6969
            TCGLabel *l1, *l2, *l3;
B
bellard 已提交
6970

6971
            tval = (int8_t)insn_get(env, s, MO_8);
B
bellard 已提交
6972 6973
            next_eip = s->pc - s->cs_base;
            tval += next_eip;
6974
            if (dflag == MO_16) {
B
bellard 已提交
6975
                tval &= 0xffff;
6976
            }
6977

B
bellard 已提交
6978 6979
            l1 = gen_new_label();
            l2 = gen_new_label();
6980
            l3 = gen_new_label();
B
bellard 已提交
6981
            b &= 3;
6982 6983 6984
            switch(b) {
            case 0: /* loopnz */
            case 1: /* loopz */
6985 6986
                gen_op_add_reg_im(s->aflag, R_ECX, -1);
                gen_op_jz_ecx(s->aflag, l3);
6987
                gen_jcc1(s, (JCC_Z << 1) | (b ^ 1), l1);
6988 6989
                break;
            case 2: /* loop */
6990 6991
                gen_op_add_reg_im(s->aflag, R_ECX, -1);
                gen_op_jnz_ecx(s->aflag, l1);
6992 6993 6994
                break;
            default:
            case 3: /* jcxz */
6995
                gen_op_jz_ecx(s->aflag, l1);
6996
                break;
B
bellard 已提交
6997 6998
            }

6999
            gen_set_label(l3);
B
bellard 已提交
7000
            gen_jmp_im(next_eip);
7001
            tcg_gen_br(l2);
7002

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

7439
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7440 7441 7442
            reg = ((modrm >> 3) & 7) | rex_r;
            mod = (modrm >> 6) & 3;
            rm = (modrm & 7) | REX_B(s);
7443

B
bellard 已提交
7444
            if (mod == 3) {
7445
                gen_op_mov_v_reg(MO_32, cpu_T[0], rm);
B
bellard 已提交
7446
                /* sign extend */
7447
                if (d_ot == MO_64) {
B
bellard 已提交
7448
                    tcg_gen_ext32s_tl(cpu_T[0], cpu_T[0]);
7449
                }
7450
                gen_op_mov_reg_v(d_ot, reg, cpu_T[0]);
B
bellard 已提交
7451
            } else {
7452
                gen_lea_modrm(env, s, modrm);
R
Richard Henderson 已提交
7453
                gen_op_ld_v(s, MO_32 | MO_SIGN, cpu_T[0], cpu_A0);
7454
                gen_op_mov_reg_v(d_ot, reg, cpu_T[0]);
B
bellard 已提交
7455
            }
7456
        } else
B
bellard 已提交
7457 7458
#endif
        {
7459
            TCGLabel *label1;
L
Laurent Desnogues 已提交
7460
            TCGv t0, t1, t2, a0;
7461

B
bellard 已提交
7462 7463
            if (!s->pe || s->vm86)
                goto illegal_op;
P
pbrook 已提交
7464 7465 7466
            t0 = tcg_temp_local_new();
            t1 = tcg_temp_local_new();
            t2 = tcg_temp_local_new();
7467
            ot = MO_16;
7468
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7469 7470 7471 7472
            reg = (modrm >> 3) & 7;
            mod = (modrm >> 6) & 3;
            rm = modrm & 7;
            if (mod != 3) {
7473
                gen_lea_modrm(env, s, modrm);
7474
                gen_op_ld_v(s, ot, t0, cpu_A0);
L
Laurent Desnogues 已提交
7475 7476
                a0 = tcg_temp_local_new();
                tcg_gen_mov_tl(a0, cpu_A0);
B
bellard 已提交
7477
            } else {
7478
                gen_op_mov_v_reg(ot, t0, rm);
L
Laurent Desnogues 已提交
7479
                TCGV_UNUSED(a0);
B
bellard 已提交
7480
            }
7481 7482 7483 7484
            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);
7485
            label1 = gen_new_label();
7486 7487 7488 7489
            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);
7490
            gen_set_label(label1);
B
bellard 已提交
7491
            if (mod != 3) {
7492
                gen_op_st_v(s, ot, t0, a0);
L
Laurent Desnogues 已提交
7493 7494
                tcg_temp_free(a0);
           } else {
7495
                gen_op_mov_reg_v(ot, rm, t0);
B
bellard 已提交
7496
            }
7497
            gen_compute_eflags(s);
7498
            tcg_gen_andi_tl(cpu_cc_src, cpu_cc_src, ~CC_Z);
7499 7500 7501 7502
            tcg_gen_or_tl(cpu_cc_src, cpu_cc_src, t2);
            tcg_temp_free(t0);
            tcg_temp_free(t1);
            tcg_temp_free(t2);
7503 7504
        }
        break;
B
bellard 已提交
7505 7506
    case 0x102: /* lar */
    case 0x103: /* lsl */
7507
        {
7508
            TCGLabel *label1;
7509
            TCGv t0;
7510 7511
            if (!s->pe || s->vm86)
                goto illegal_op;
7512
            ot = dflag != MO_16 ? MO_32 : MO_16;
7513
            modrm = cpu_ldub_code(env, s->pc++);
7514
            reg = ((modrm >> 3) & 7) | rex_r;
7515
            gen_ldst_modrm(env, s, modrm, MO_16, OR_TMP0, 0);
P
pbrook 已提交
7516
            t0 = tcg_temp_local_new();
7517
            gen_update_cc_op(s);
7518 7519 7520 7521 7522
            if (b == 0x102) {
                gen_helper_lar(t0, cpu_env, cpu_T[0]);
            } else {
                gen_helper_lsl(t0, cpu_env, cpu_T[0]);
            }
7523 7524
            tcg_gen_andi_tl(cpu_tmp0, cpu_cc_src, CC_Z);
            label1 = gen_new_label();
P
pbrook 已提交
7525
            tcg_gen_brcondi_tl(TCG_COND_EQ, cpu_tmp0, 0, label1);
7526
            gen_op_mov_reg_v(ot, reg, t0);
7527
            gen_set_label(label1);
7528
            set_cc_op(s, CC_OP_EFLAGS);
7529
            tcg_temp_free(t0);
7530
        }
B
bellard 已提交
7531 7532
        break;
    case 0x118:
7533
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7534 7535 7536 7537 7538 7539 7540 7541 7542
        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;
7543
            gen_lea_modrm(env, s, modrm);
B
bellard 已提交
7544 7545
            /* nothing more to do */
            break;
B
bellard 已提交
7546
        default: /* nop (multi byte) */
7547
            gen_nop_modrm(env, s, modrm);
B
bellard 已提交
7548
            break;
B
bellard 已提交
7549 7550
        }
        break;
B
bellard 已提交
7551
    case 0x119 ... 0x11f: /* nop (multi byte) */
7552 7553
        modrm = cpu_ldub_code(env, s->pc++);
        gen_nop_modrm(env, s, modrm);
B
bellard 已提交
7554
        break;
B
bellard 已提交
7555 7556 7557 7558 7559
    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 {
7560
            modrm = cpu_ldub_code(env, s->pc++);
7561 7562 7563 7564 7565
            /* 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 已提交
7566 7567 7568
            rm = (modrm & 7) | REX_B(s);
            reg = ((modrm >> 3) & 7) | rex_r;
            if (CODE64(s))
7569
                ot = MO_64;
B
bellard 已提交
7570
            else
7571
                ot = MO_32;
7572 7573 7574 7575
            if ((prefixes & PREFIX_LOCK) && (reg == 0) &&
                (s->cpuid_ext3_features & CPUID_EXT3_CR8LEG)) {
                reg = 8;
            }
B
bellard 已提交
7576 7577 7578 7579 7580
            switch(reg) {
            case 0:
            case 2:
            case 3:
            case 4:
B
bellard 已提交
7581
            case 8:
7582
                gen_update_cc_op(s);
B
bellard 已提交
7583
                gen_jmp_im(pc_start - s->cs_base);
B
bellard 已提交
7584
                if (b & 2) {
7585
                    gen_op_mov_v_reg(ot, cpu_T[0], rm);
B
Blue Swirl 已提交
7586 7587
                    gen_helper_write_crN(cpu_env, tcg_const_i32(reg),
                                         cpu_T[0]);
B
bellard 已提交
7588
                    gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
7589 7590
                    gen_eob(s);
                } else {
B
Blue Swirl 已提交
7591
                    gen_helper_read_crN(cpu_T[0], cpu_env, tcg_const_i32(reg));
7592
                    gen_op_mov_reg_v(ot, rm, cpu_T[0]);
B
bellard 已提交
7593 7594 7595 7596 7597 7598 7599 7600 7601 7602 7603 7604
                }
                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 {
7605
            modrm = cpu_ldub_code(env, s->pc++);
7606 7607 7608 7609 7610
            /* 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 已提交
7611 7612 7613
            rm = (modrm & 7) | REX_B(s);
            reg = ((modrm >> 3) & 7) | rex_r;
            if (CODE64(s))
7614
                ot = MO_64;
B
bellard 已提交
7615
            else
7616
                ot = MO_32;
B
bellard 已提交
7617
            /* XXX: do it dynamically with CR4.DE bit */
B
bellard 已提交
7618
            if (reg == 4 || reg == 5 || reg >= 8)
B
bellard 已提交
7619 7620
                goto illegal_op;
            if (b & 2) {
T
ths 已提交
7621
                gen_svm_check_intercept(s, pc_start, SVM_EXIT_WRITE_DR0 + reg);
7622
                gen_op_mov_v_reg(ot, cpu_T[0], rm);
B
Blue Swirl 已提交
7623
                gen_helper_movl_drN_T0(cpu_env, tcg_const_i32(reg), cpu_T[0]);
B
bellard 已提交
7624
                gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
7625 7626
                gen_eob(s);
            } else {
T
ths 已提交
7627
                gen_svm_check_intercept(s, pc_start, SVM_EXIT_READ_DR0 + reg);
B
bellard 已提交
7628
                tcg_gen_ld_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,dr[reg]));
7629
                gen_op_mov_reg_v(ot, rm, cpu_T[0]);
B
bellard 已提交
7630 7631 7632 7633 7634 7635 7636
            }
        }
        break;
    case 0x106: /* clts */
        if (s->cpl != 0) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
T
ths 已提交
7637
            gen_svm_check_intercept(s, pc_start, SVM_EXIT_WRITE_CR0);
7638
            gen_helper_clts(cpu_env);
B
bellard 已提交
7639
            /* abort block because static cpu state changed */
B
bellard 已提交
7640
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
7641
            gen_eob(s);
B
bellard 已提交
7642 7643
        }
        break;
B
balrog 已提交
7644
    /* MMX/3DNow!/SSE/SSE2/SSE3/SSSE3/SSE4 support */
B
bellard 已提交
7645 7646
    case 0x1c3: /* MOVNTI reg, mem */
        if (!(s->cpuid_features & CPUID_SSE2))
B
bellard 已提交
7647
            goto illegal_op;
7648
        ot = mo_64_32(dflag);
7649
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7650 7651 7652 7653 7654
        mod = (modrm >> 6) & 3;
        if (mod == 3)
            goto illegal_op;
        reg = ((modrm >> 3) & 7) | rex_r;
        /* generate a generic store */
7655
        gen_ldst_modrm(env, s, modrm, ot, reg, 1);
B
bellard 已提交
7656
        break;
B
bellard 已提交
7657
    case 0x1ae:
7658
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7659 7660 7661 7662
        mod = (modrm >> 6) & 3;
        op = (modrm >> 3) & 7;
        switch(op) {
        case 0: /* fxsave */
7663
            if (mod == 3 || !(s->cpuid_features & CPUID_FXSR) ||
7664
                (s->prefix & PREFIX_LOCK))
B
bellard 已提交
7665
                goto illegal_op;
7666
            if ((s->flags & HF_EM_MASK) || (s->flags & HF_TS_MASK)) {
B
bellard 已提交
7667 7668 7669
                gen_exception(s, EXCP07_PREX, pc_start - s->cs_base);
                break;
            }
7670
            gen_lea_modrm(env, s, modrm);
7671
            gen_helper_fxsave(cpu_env, cpu_A0, tcg_const_i32(dflag == MO_64));
B
bellard 已提交
7672 7673
            break;
        case 1: /* fxrstor */
7674
            if (mod == 3 || !(s->cpuid_features & CPUID_FXSR) ||
7675
                (s->prefix & PREFIX_LOCK))
B
bellard 已提交
7676
                goto illegal_op;
7677
            if ((s->flags & HF_EM_MASK) || (s->flags & HF_TS_MASK)) {
B
bellard 已提交
7678 7679 7680
                gen_exception(s, EXCP07_PREX, pc_start - s->cs_base);
                break;
            }
7681
            gen_lea_modrm(env, s, modrm);
7682
            gen_helper_fxrstor(cpu_env, cpu_A0, tcg_const_i32(dflag == MO_64));
B
bellard 已提交
7683 7684 7685 7686 7687 7688
            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 已提交
7689
            }
B
bellard 已提交
7690 7691
            if ((s->flags & HF_EM_MASK) || !(s->flags & HF_OSFXSR_MASK) ||
                mod == 3)
B
bellard 已提交
7692
                goto illegal_op;
7693
            gen_lea_modrm(env, s, modrm);
B
bellard 已提交
7694
            if (op == 2) {
7695 7696
                tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                    s->mem_index, MO_LEUL);
B
Blue Swirl 已提交
7697
                gen_helper_ldmxcsr(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
7698
            } else {
B
bellard 已提交
7699
                tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State, mxcsr));
7700
                gen_op_st_v(s, MO_32, cpu_T[0], cpu_A0);
B
bellard 已提交
7701
            }
B
bellard 已提交
7702 7703 7704
            break;
        case 5: /* lfence */
        case 6: /* mfence */
7705
            if ((modrm & 0xc7) != 0xc0 || !(s->cpuid_features & CPUID_SSE2))
B
bellard 已提交
7706 7707
                goto illegal_op;
            break;
7708 7709 7710
        case 7: /* sfence / clflush */
            if ((modrm & 0xc7) == 0xc0) {
                /* sfence */
A
aurel32 已提交
7711
                /* XXX: also check for cpuid_ext2_features & CPUID_EXT2_EMMX */
7712 7713 7714 7715 7716 7717
                if (!(s->cpuid_features & CPUID_SSE))
                    goto illegal_op;
            } else {
                /* clflush */
                if (!(s->cpuid_features & CPUID_CLFLUSH))
                    goto illegal_op;
7718
                gen_lea_modrm(env, s, modrm);
7719 7720
            }
            break;
B
bellard 已提交
7721
        default:
B
bellard 已提交
7722 7723 7724
            goto illegal_op;
        }
        break;
A
aurel32 已提交
7725
    case 0x10d: /* 3DNow! prefetch(w) */
7726
        modrm = cpu_ldub_code(env, s->pc++);
A
aurel32 已提交
7727 7728 7729
        mod = (modrm >> 6) & 3;
        if (mod == 3)
            goto illegal_op;
7730
        gen_lea_modrm(env, s, modrm);
7731 7732
        /* ignore for now */
        break;
B
bellard 已提交
7733
    case 0x1aa: /* rsm */
B
bellard 已提交
7734
        gen_svm_check_intercept(s, pc_start, SVM_EXIT_RSM);
B
bellard 已提交
7735 7736
        if (!(s->flags & HF_SMM_MASK))
            goto illegal_op;
J
Jun Koi 已提交
7737
        gen_update_cc_op(s);
B
bellard 已提交
7738
        gen_jmp_im(s->pc - s->cs_base);
B
Blue Swirl 已提交
7739
        gen_helper_rsm(cpu_env);
B
bellard 已提交
7740 7741
        gen_eob(s);
        break;
B
balrog 已提交
7742 7743 7744 7745 7746 7747 7748
    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;

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

7752
        if (s->prefix & PREFIX_DATA) {
7753
            ot = MO_16;
7754 7755 7756
        } else {
            ot = mo_64_32(dflag);
        }
B
balrog 已提交
7757

7758
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
B
Blue Swirl 已提交
7759
        gen_helper_popcnt(cpu_T[0], cpu_env, cpu_T[0], tcg_const_i32(ot));
7760
        gen_op_mov_reg_v(ot, reg, cpu_T[0]);
B
balrog 已提交
7761

7762
        set_cc_op(s, CC_OP_EFLAGS);
B
balrog 已提交
7763
        break;
A
aurel32 已提交
7764 7765 7766
    case 0x10e ... 0x10f:
        /* 3DNow! instructions, ignore prefixes */
        s->prefix &= ~(PREFIX_REPZ | PREFIX_REPNZ | PREFIX_DATA);
B
bellard 已提交
7767 7768
    case 0x110 ... 0x117:
    case 0x128 ... 0x12f:
B
balrog 已提交
7769
    case 0x138 ... 0x13a:
7770
    case 0x150 ... 0x179:
B
bellard 已提交
7771 7772 7773 7774
    case 0x17c ... 0x17f:
    case 0x1c2:
    case 0x1c4 ... 0x1c6:
    case 0x1d0 ... 0x1fe:
7775
        gen_sse(env, s, b, pc_start, rex_r);
B
bellard 已提交
7776
        break;
B
bellard 已提交
7777 7778 7779 7780 7781
    default:
        goto illegal_op;
    }
    /* lock generation */
    if (s->prefix & PREFIX_LOCK)
P
pbrook 已提交
7782
        gen_helper_unlock();
B
bellard 已提交
7783 7784
    return s->pc;
 illegal_op:
7785
    if (s->prefix & PREFIX_LOCK)
P
pbrook 已提交
7786
        gen_helper_unlock();
B
bellard 已提交
7787 7788 7789 7790 7791 7792 7793
    /* 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)
{
7794 7795 7796 7797 7798 7799 7800 7801 7802 7803 7804 7805 7806 7807 7808 7809 7810 7811 7812 7813 7814 7815 7816 7817 7818 7819 7820 7821 7822 7823 7824
    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 已提交
7825 7826
    cpu_env = tcg_global_reg_new_ptr(TCG_AREG0, "env");
    cpu_cc_op = tcg_global_mem_new_i32(TCG_AREG0,
7827 7828
                                       offsetof(CPUX86State, cc_op), "cc_op");
    cpu_cc_dst = tcg_global_mem_new(TCG_AREG0, offsetof(CPUX86State, cc_dst),
P
pbrook 已提交
7829
                                    "cc_dst");
7830 7831
    cpu_cc_src = tcg_global_mem_new(TCG_AREG0, offsetof(CPUX86State, cc_src),
                                    "cc_src");
7832 7833
    cpu_cc_src2 = tcg_global_mem_new(TCG_AREG0, offsetof(CPUX86State, cc_src2),
                                     "cc_src2");
7834

7835 7836 7837 7838 7839
    for (i = 0; i < CPU_NB_REGS; ++i) {
        cpu_regs[i] = tcg_global_mem_new(TCG_AREG0,
                                         offsetof(CPUX86State, regs[i]),
                                         reg_names[i]);
    }
K
KONRAD Frederic 已提交
7840 7841

    helper_lock_init();
B
bellard 已提交
7842 7843 7844 7845 7846
}

/* 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. */
7847
static inline void gen_intermediate_code_internal(X86CPU *cpu,
7848
                                                  TranslationBlock *tb,
7849
                                                  bool search_pc)
B
bellard 已提交
7850
{
7851
    CPUState *cs = CPU(cpu);
7852
    CPUX86State *env = &cpu->env;
B
bellard 已提交
7853
    DisasContext dc1, *dc = &dc1;
B
bellard 已提交
7854
    target_ulong pc_ptr;
7855
    CPUBreakpoint *bp;
7856
    int j, lj;
7857
    uint64_t flags;
B
bellard 已提交
7858 7859
    target_ulong pc_start;
    target_ulong cs_base;
P
pbrook 已提交
7860 7861
    int num_insns;
    int max_insns;
7862

B
bellard 已提交
7863
    /* generate intermediate code */
B
bellard 已提交
7864 7865
    pc_start = tb->pc;
    cs_base = tb->cs_base;
B
bellard 已提交
7866
    flags = tb->flags;
B
bellard 已提交
7867

7868
    dc->pe = (flags >> HF_PE_SHIFT) & 1;
B
bellard 已提交
7869 7870 7871 7872 7873 7874 7875 7876
    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;
7877
    dc->singlestep_enabled = cs->singlestep_enabled;
B
bellard 已提交
7878
    dc->cc_op = CC_OP_DYNAMIC;
7879
    dc->cc_op_dirty = false;
B
bellard 已提交
7880 7881 7882 7883 7884 7885
    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) {
7886
	dc->mem_index = cpu_mmu_index(env, false);
B
bellard 已提交
7887
    }
7888 7889 7890 7891 7892
    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 已提交
7893 7894 7895 7896
#ifdef TARGET_X86_64
    dc->lma = (flags >> HF_LMA_SHIFT) & 1;
    dc->code64 = (flags >> HF_CS64_SHIFT) & 1;
#endif
B
bellard 已提交
7897
    dc->flags = flags;
7898
    dc->jmp_opt = !(dc->tf || cs->singlestep_enabled ||
7899
                    (flags & HF_INHIBIT_IRQ_MASK)
B
bellard 已提交
7900
#ifndef CONFIG_SOFTMMU
B
bellard 已提交
7901 7902 7903
                    || (flags & HF_SOFTMMU_MASK)
#endif
                    );
7904 7905 7906 7907 7908 7909 7910 7911 7912 7913
    /* 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.
     */
7914
    dc->repz_opt = !dc->jmp_opt && !(tb->cflags & CF_USE_ICOUNT);
7915 7916
#if 0
    /* check addseg logic */
B
bellard 已提交
7917
    if (!dc->addseg && (dc->vm86 || !dc->pe || !dc->code32))
7918 7919 7920
        printf("ERROR addseg\n");
#endif

P
pbrook 已提交
7921 7922 7923 7924 7925 7926 7927 7928 7929 7930 7931
    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();
7932
    cpu_cc_srcT = tcg_temp_local_new();
B
bellard 已提交
7933

B
bellard 已提交
7934 7935 7936
    dc->is_jmp = DISAS_NEXT;
    pc_ptr = pc_start;
    lj = -1;
P
pbrook 已提交
7937 7938 7939 7940
    num_insns = 0;
    max_insns = tb->cflags & CF_COUNT_MASK;
    if (max_insns == 0)
        max_insns = CF_COUNT_MASK;
B
bellard 已提交
7941

7942
    gen_tb_start(tb);
B
bellard 已提交
7943
    for(;;) {
7944 7945
        if (unlikely(!QTAILQ_EMPTY(&cs->breakpoints))) {
            QTAILQ_FOREACH(bp, &cs->breakpoints, entry) {
J
Jan Kiszka 已提交
7946 7947
                if (bp->pc == pc_ptr &&
                    !((bp->flags & BP_CPU) && (tb->flags & HF_RF_MASK))) {
B
bellard 已提交
7948
                    gen_debug(dc, pc_ptr - dc->cs_base);
7949
                    goto done_generating;
B
bellard 已提交
7950 7951 7952 7953
                }
            }
        }
        if (search_pc) {
7954
            j = tcg_op_buf_count();
B
bellard 已提交
7955 7956 7957
            if (lj < j) {
                lj++;
                while (lj < j)
7958
                    tcg_ctx.gen_opc_instr_start[lj++] = 0;
B
bellard 已提交
7959
            }
7960
            tcg_ctx.gen_opc_pc[lj] = pc_ptr;
B
bellard 已提交
7961
            gen_opc_cc_op[lj] = dc->cc_op;
7962
            tcg_ctx.gen_opc_instr_start[lj] = 1;
7963
            tcg_ctx.gen_opc_icount[lj] = num_insns;
B
bellard 已提交
7964
        }
P
pbrook 已提交
7965 7966 7967
        if (num_insns + 1 == max_insns && (tb->cflags & CF_LAST_IO))
            gen_io_start();

7968
        pc_ptr = disas_insn(env, dc, pc_ptr);
P
pbrook 已提交
7969
        num_insns++;
B
bellard 已提交
7970 7971 7972 7973 7974
        /* stop translation if indicated */
        if (dc->is_jmp)
            break;
        /* if single step mode, we generate only one instruction and
           generate an exception */
7975 7976 7977
        /* 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 */
7978
        if (dc->tf || dc->singlestep_enabled ||
P
pbrook 已提交
7979
            (flags & HF_INHIBIT_IRQ_MASK)) {
B
bellard 已提交
7980
            gen_jmp_im(pc_ptr - dc->cs_base);
B
bellard 已提交
7981 7982 7983
            gen_eob(dc);
            break;
        }
7984 7985 7986 7987 7988 7989
        /* 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.
         */
7990
        if ((tb->cflags & CF_USE_ICOUNT)
7991 7992 7993 7994 7995 7996 7997
            && ((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 已提交
7998
        /* if too long translation, stop generation too */
7999
        if (tcg_op_buf_full() ||
P
pbrook 已提交
8000 8001
            (pc_ptr - pc_start) >= (TARGET_PAGE_SIZE - 32) ||
            num_insns >= max_insns) {
B
bellard 已提交
8002
            gen_jmp_im(pc_ptr - dc->cs_base);
B
bellard 已提交
8003 8004 8005
            gen_eob(dc);
            break;
        }
8006 8007 8008 8009 8010
        if (singlestep) {
            gen_jmp_im(pc_ptr - dc->cs_base);
            gen_eob(dc);
            break;
        }
B
bellard 已提交
8011
    }
P
pbrook 已提交
8012 8013
    if (tb->cflags & CF_LAST_IO)
        gen_io_end();
8014
done_generating:
8015
    gen_tb_end(tb, num_insns);
8016

B
bellard 已提交
8017 8018
    /* we don't forget to fill the last values */
    if (search_pc) {
8019
        j = tcg_op_buf_count();
B
bellard 已提交
8020 8021
        lj++;
        while (lj <= j)
8022
            tcg_ctx.gen_opc_instr_start[lj++] = 0;
B
bellard 已提交
8023
    }
8024

B
bellard 已提交
8025
#ifdef DEBUG_DISAS
8026
    if (qemu_loglevel_mask(CPU_LOG_TB_IN_ASM)) {
B
bellard 已提交
8027
        int disas_flags;
8028 8029
        qemu_log("----------------\n");
        qemu_log("IN: %s\n", lookup_symbol(pc_start));
B
bellard 已提交
8030 8031 8032 8033 8034 8035
#ifdef TARGET_X86_64
        if (dc->code64)
            disas_flags = 2;
        else
#endif
            disas_flags = !dc->code32;
8036
        log_target_disas(cs, pc_start, pc_ptr - pc_start, disas_flags);
8037
        qemu_log("\n");
B
bellard 已提交
8038 8039 8040
    }
#endif

P
pbrook 已提交
8041
    if (!search_pc) {
B
bellard 已提交
8042
        tb->size = pc_ptr - pc_start;
P
pbrook 已提交
8043 8044
        tb->icount = num_insns;
    }
B
bellard 已提交
8045 8046
}

8047
void gen_intermediate_code(CPUX86State *env, TranslationBlock *tb)
B
bellard 已提交
8048
{
8049
    gen_intermediate_code_internal(x86_env_get_cpu(env), tb, false);
B
bellard 已提交
8050 8051
}

8052
void gen_intermediate_code_pc(CPUX86State *env, TranslationBlock *tb)
B
bellard 已提交
8053
{
8054
    gen_intermediate_code_internal(x86_env_get_cpu(env), tb, true);
B
bellard 已提交
8055 8056
}

8057
void restore_state_to_opc(CPUX86State *env, TranslationBlock *tb, int pc_pos)
A
aurel32 已提交
8058 8059 8060
{
    int cc_op;
#ifdef DEBUG_DISAS
8061
    if (qemu_loglevel_mask(CPU_LOG_TB_OP)) {
A
aurel32 已提交
8062
        int i;
8063
        qemu_log("RESTORE:\n");
A
aurel32 已提交
8064
        for(i = 0;i <= pc_pos; i++) {
8065
            if (tcg_ctx.gen_opc_instr_start[i]) {
8066 8067
                qemu_log("0x%04x: " TARGET_FMT_lx "\n", i,
                        tcg_ctx.gen_opc_pc[i]);
A
aurel32 已提交
8068 8069
            }
        }
8070
        qemu_log("pc_pos=0x%x eip=" TARGET_FMT_lx " cs_base=%x\n",
8071
                pc_pos, tcg_ctx.gen_opc_pc[pc_pos] - tb->cs_base,
A
aurel32 已提交
8072 8073 8074
                (uint32_t)tb->cs_base);
    }
#endif
8075
    env->eip = tcg_ctx.gen_opc_pc[pc_pos] - tb->cs_base;
A
aurel32 已提交
8076 8077 8078 8079
    cc_op = gen_opc_cc_op[pc_pos];
    if (cc_op != CC_OP_DYNAMIC)
        env->cc_op = cc_op;
}