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

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

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

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


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

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

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

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

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

79 80
static uint8_t gen_opc_cc_op[OPC_BUF_SIZE];

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

#define NB_OP_SIZES 4

#else /* !TARGET_X86_64 */

#define NB_OP_SIZES 3

#endif /* !TARGET_X86_64 */

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

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

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 336
/* 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;
}

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

989 990
    default:
    slow_jcc:
991 992 993 994 995 996 997 998 999 1000 1001 1002 1003 1004 1005 1006 1007 1008 1009 1010 1011 1012 1013 1014 1015 1016 1017 1018 1019 1020 1021 1022 1023 1024 1025 1026 1027 1028 1029 1030 1031 1032 1033 1034
        /* 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;
        }
1035
        break;
1036
    }
1037 1038 1039 1040 1041

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

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

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

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

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

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

B
bellard 已提交
1116 1117 1118
/* XXX: does not work with gdbstub "ice" single step - not a
   serious problem */
static int gen_jz_ecx_string(DisasContext *s, target_ulong next_eip)
B
bellard 已提交
1119
{
B
bellard 已提交
1120 1121 1122 1123
    int l1, l2;

    l1 = gen_new_label();
    l2 = gen_new_label();
1124
    gen_op_jnz_ecx(s->aflag, l1);
B
bellard 已提交
1125 1126 1127 1128
    gen_set_label(l2);
    gen_jmp_tb(s, next_eip, 1);
    gen_set_label(l1);
    return l2;
B
bellard 已提交
1129 1130
}

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

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

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

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

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

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

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

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

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

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

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

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

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

1396 1397
static void gen_shift_flags(DisasContext *s, TCGMemOp ot, TCGv result,
                            TCGv shm1, TCGv count, bool is_right)
1398 1399 1400 1401 1402 1403 1404 1405 1406 1407 1408 1409 1410 1411 1412 1413 1414 1415 1416 1417 1418 1419 1420 1421 1422 1423 1424 1425 1426 1427 1428 1429 1430 1431 1432 1433 1434 1435 1436 1437 1438 1439 1440
{
    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);
}

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

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

1453 1454
    tcg_gen_andi_tl(cpu_T[1], cpu_T[1], mask);
    tcg_gen_subi_tl(cpu_tmp0, cpu_T[1], 1);
1455 1456 1457

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

    /* store */
1472
    gen_op_st_rm_T0_A0(s, ot, op1);
1473

1474
    gen_shift_flags(s, ot, cpu_T[0], cpu_tmp0, cpu_T[1], is_right);
1475 1476
}

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

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

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

    /* store */
1507 1508
    gen_op_st_rm_T0_A0(s, ot, op1);

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

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

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

1529
    tcg_gen_andi_tl(cpu_T[1], cpu_T[1], mask);
1530

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

    /* store */
1564
    gen_op_st_rm_T0_A0(s, ot, op1);
1565

1566 1567
    /* We'll need the flags computed into CC_SRC.  */
    gen_compute_eflags(s);
1568

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

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

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

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

    /* store */
1655
    gen_op_st_rm_T0_A0(s, ot, op1);
M
malc 已提交
1656 1657

    if (op2 != 0) {
1658
        /* Compute the flags into CC_SRC.  */
1659
        gen_compute_eflags(s);
1660

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

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

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

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

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

1749 1750
    count = tcg_temp_new();
    tcg_gen_andi_tl(count, count_in, mask);
1751

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

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

    /* store */
1811
    gen_op_st_rm_T0_A0(s, ot, op1);
1812

1813 1814
    gen_shift_flags(s, ot, cpu_T[0], cpu_tmp0, count, is_right);
    tcg_temp_free(count);
1815 1816
}

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

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

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

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

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

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

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

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

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

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

            tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_tmp0);
        }

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

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

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

    default:
        tcg_abort();
B
bellard 已提交
2056 2057 2058
    }
}

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

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

2068 2069 2070
    switch (s->aflag) {
    case MO_64:
    case MO_32:
B
bellard 已提交
2071
        base = rm;
2072

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

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

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

    default:
        tcg_abort();
B
bellard 已提交
2113 2114 2115
    }
}

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

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

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

2171
static inline uint32_t insn_get(CPUX86State *env, DisasContext *s, TCGMemOp ot)
B
bellard 已提交
2172 2173 2174
{
    uint32_t ret;

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

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

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

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

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

2236
        gen_goto_tb(s, 0, next_eip);
B
bellard 已提交
2237 2238

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

B
bellard 已提交
2246
        gen_jmp_im(next_eip);
2247 2248
        tcg_gen_br(l2);

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

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

2261
    gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
2262

2263 2264 2265 2266 2267 2268 2269 2270
    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);
2271 2272
    }

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

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

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

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

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

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

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

2362 2363
/* Generate a push. It depends on ss32, addseg and dflag.  */
static void gen_push_v(DisasContext *s, TCGv val)
B
bellard 已提交
2364
{
2365 2366 2367 2368 2369
    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 已提交
2370

B
bellard 已提交
2371
    if (CODE64(s)) {
2372 2373 2374 2375 2376 2377
        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);
2378
            gen_op_addl_A0_seg(s, R_SS);
2379 2380
        } else {
            tcg_gen_ext32u_tl(cpu_A0, cpu_A0);
B
bellard 已提交
2381
        }
2382 2383 2384 2385 2386 2387
    } 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 已提交
2388
    }
2389 2390 2391

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

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

B
bellard 已提交
2400
    if (CODE64(s)) {
2401 2402 2403 2404 2405 2406 2407 2408 2409
        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 已提交
2410
    }
2411 2412 2413

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

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

static void gen_stack_A0(DisasContext *s)
{
B
bellard 已提交
2423
    gen_op_movl_A0_reg(R_ESP);
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 2430 2431 2432 2433 2434
}

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

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

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

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

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

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

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

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

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

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

B
bellard 已提交
2585 2586 2587 2588 2589
static void gen_jmp(DisasContext *s, target_ulong eip)
{
    gen_jmp_tb(s, eip, 0);
}

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

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

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

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

B
bellard 已提交
2622 2623
static inline void gen_op_movo(int d_offset, int s_offset)
{
2624 2625 2626 2627
    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 已提交
2628 2629 2630 2631
}

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

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

static inline void gen_op_movq_env_0(int d_offset)
{
2644 2645
    tcg_gen_movi_i64(cpu_tmp1_i64, 0);
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, d_offset);
B
bellard 已提交
2646
}
B
bellard 已提交
2647

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

B
bellard 已提交
2659 2660
#define SSE_SPECIAL ((void *)1)
#define SSE_DUMMY ((void *)2)
B
bellard 已提交
2661

P
pbrook 已提交
2662 2663 2664
#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 已提交
2665

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

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

R
Richard Henderson 已提交
2710 2711 2712
    /* 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 已提交
2713

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

B
Blue Swirl 已提交
2813
static const SSEFunc_0_epi sse_op_table3ai[] = {
P
pbrook 已提交
2814
    gen_helper_cvtsi2ss,
2815
    gen_helper_cvtsi2sd
B
Blue Swirl 已提交
2816
};
P
pbrook 已提交
2817

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

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

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

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

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

B
Blue Swirl 已提交
2879 2880
struct SSEOpHelper_epp {
    SSEFunc_0_epp op[2];
B
Blue Swirl 已提交
2881 2882 2883
    uint32_t ext_mask;
};

B
Blue Swirl 已提交
2884 2885
struct SSEOpHelper_eppi {
    SSEFunc_0_eppi op[2];
B
Blue Swirl 已提交
2886
    uint32_t ext_mask;
B
balrog 已提交
2887
};
B
Blue Swirl 已提交
2888

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

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

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

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

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

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

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

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

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

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

B
balrog 已提交
3680 3681
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
3682
            sse_fn_epp(cpu_env, cpu_ptr0, cpu_ptr1);
B
balrog 已提交
3683

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

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

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

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

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

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

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

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

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

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

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

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

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

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

3895 3896 3897 3898 3899
            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 {
3900
                    TCGv carry_in, carry_out, zero;
3901 3902
                    int end_op;

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

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

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

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

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

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

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

B
balrog 已提交
4226
            if ((b & 0xfc) == 0x60) { /* pcmpXstrX */
4227
                set_cc_op(s, CC_OP_EFLAGS);
B
balrog 已提交
4228

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

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

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

            default:
                goto illegal_op;
            }
            break;

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

4290
                gen_lea_modrm(env, s, modrm);
B
bellard 已提交
4291
                op2_offset = offsetof(CPUX86State,xmm_t0);
4292 4293 4294 4295 4296 4297

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

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

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

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

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

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

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

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

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

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

4598
            ot = mo_b_d(b, dflag);
4599

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

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

4655
            ot = mo_b_d(b, dflag);
4656

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

    case 0x1b6: /* movzbS Gv, Eb */
    case 0x1b7: /* movzwS Gv, Eb */
    case 0x1be: /* movsbS Gv, Eb */
    case 0x1bf: /* movswS Gv, Eb */
        {
5428 5429 5430
            TCGMemOp d_ot;
            TCGMemOp s_ot;

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

7825
        set_cc_op(s, CC_OP_EFLAGS);
B
balrog 已提交
7826
        break;
A
aurel32 已提交
7827 7828 7829
    case 0x10e ... 0x10f:
        /* 3DNow! instructions, ignore prefixes */
        s->prefix &= ~(PREFIX_REPZ | PREFIX_REPNZ | PREFIX_DATA);
B
bellard 已提交
7830 7831
    case 0x110 ... 0x117:
    case 0x128 ... 0x12f:
B
balrog 已提交
7832
    case 0x138 ... 0x13a:
7833
    case 0x150 ... 0x179:
B
bellard 已提交
7834 7835 7836 7837
    case 0x17c ... 0x17f:
    case 0x1c2:
    case 0x1c4 ... 0x1c6:
    case 0x1d0 ... 0x1fe:
7838
        gen_sse(env, s, b, pc_start, rex_r);
B
bellard 已提交
7839
        break;
B
bellard 已提交
7840 7841 7842 7843 7844
    default:
        goto illegal_op;
    }
    /* lock generation */
    if (s->prefix & PREFIX_LOCK)
P
pbrook 已提交
7845
        gen_helper_unlock();
B
bellard 已提交
7846 7847
    return s->pc;
 illegal_op:
7848
    if (s->prefix & PREFIX_LOCK)
P
pbrook 已提交
7849
        gen_helper_unlock();
B
bellard 已提交
7850 7851 7852 7853 7854 7855 7856
    /* 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)
{
7857 7858 7859 7860 7861 7862 7863 7864 7865 7866 7867 7868 7869 7870 7871 7872 7873 7874 7875 7876 7877 7878 7879 7880 7881 7882 7883 7884 7885 7886 7887
    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 已提交
7888 7889
    cpu_env = tcg_global_reg_new_ptr(TCG_AREG0, "env");
    cpu_cc_op = tcg_global_mem_new_i32(TCG_AREG0,
7890 7891
                                       offsetof(CPUX86State, cc_op), "cc_op");
    cpu_cc_dst = tcg_global_mem_new(TCG_AREG0, offsetof(CPUX86State, cc_dst),
P
pbrook 已提交
7892
                                    "cc_dst");
7893 7894
    cpu_cc_src = tcg_global_mem_new(TCG_AREG0, offsetof(CPUX86State, cc_src),
                                    "cc_src");
7895 7896
    cpu_cc_src2 = tcg_global_mem_new(TCG_AREG0, offsetof(CPUX86State, cc_src2),
                                     "cc_src2");
7897

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

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

B
bellard 已提交
7925
    /* generate intermediate code */
B
bellard 已提交
7926 7927
    pc_start = tb->pc;
    cs_base = tb->cs_base;
B
bellard 已提交
7928
    flags = tb->flags;
B
bellard 已提交
7929

7930
    dc->pe = (flags >> HF_PE_SHIFT) & 1;
B
bellard 已提交
7931 7932 7933 7934 7935 7936 7937 7938
    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;
7939
    dc->singlestep_enabled = cs->singlestep_enabled;
B
bellard 已提交
7940
    dc->cc_op = CC_OP_DYNAMIC;
7941
    dc->cc_op_dirty = false;
B
bellard 已提交
7942 7943 7944 7945 7946 7947
    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) {
7948
        dc->mem_index = cpu_mmu_index(env);
B
bellard 已提交
7949
    }
7950 7951 7952 7953 7954
    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 已提交
7955 7956 7957 7958
#ifdef TARGET_X86_64
    dc->lma = (flags >> HF_LMA_SHIFT) & 1;
    dc->code64 = (flags >> HF_CS64_SHIFT) & 1;
#endif
B
bellard 已提交
7959
    dc->flags = flags;
7960
    dc->jmp_opt = !(dc->tf || cs->singlestep_enabled ||
7961
                    (flags & HF_INHIBIT_IRQ_MASK)
B
bellard 已提交
7962
#ifndef CONFIG_SOFTMMU
B
bellard 已提交
7963 7964 7965
                    || (flags & HF_SOFTMMU_MASK)
#endif
                    );
7966 7967 7968 7969 7970 7971 7972 7973 7974 7975
    /* 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.
     */
7976
    dc->repz_opt = !dc->jmp_opt && !(tb->cflags & CF_USE_ICOUNT);
7977 7978
#if 0
    /* check addseg logic */
B
bellard 已提交
7979
    if (!dc->addseg && (dc->vm86 || !dc->pe || !dc->code32))
7980 7981 7982
        printf("ERROR addseg\n");
#endif

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

7996
    gen_opc_end = tcg_ctx.gen_opc_buf + OPC_MAX_SIZE;
B
bellard 已提交
7997 7998 7999 8000

    dc->is_jmp = DISAS_NEXT;
    pc_ptr = pc_start;
    lj = -1;
P
pbrook 已提交
8001 8002 8003 8004
    num_insns = 0;
    max_insns = tb->cflags & CF_COUNT_MASK;
    if (max_insns == 0)
        max_insns = CF_COUNT_MASK;
B
bellard 已提交
8005

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

8032
        pc_ptr = disas_insn(env, dc, pc_ptr);
P
pbrook 已提交
8033
        num_insns++;
B
bellard 已提交
8034 8035 8036 8037 8038
        /* stop translation if indicated */
        if (dc->is_jmp)
            break;
        /* if single step mode, we generate only one instruction and
           generate an exception */
8039 8040 8041
        /* 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 */
8042
        if (dc->tf || dc->singlestep_enabled ||
P
pbrook 已提交
8043
            (flags & HF_INHIBIT_IRQ_MASK)) {
B
bellard 已提交
8044
            gen_jmp_im(pc_ptr - dc->cs_base);
B
bellard 已提交
8045 8046 8047
            gen_eob(dc);
            break;
        }
8048 8049 8050 8051 8052 8053
        /* 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.
         */
8054
        if ((tb->cflags & CF_USE_ICOUNT)
8055 8056 8057 8058 8059 8060 8061
            && ((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 已提交
8062
        /* if too long translation, stop generation too */
8063
        if (tcg_ctx.gen_opc_ptr >= gen_opc_end ||
P
pbrook 已提交
8064 8065
            (pc_ptr - pc_start) >= (TARGET_PAGE_SIZE - 32) ||
            num_insns >= max_insns) {
B
bellard 已提交
8066
            gen_jmp_im(pc_ptr - dc->cs_base);
B
bellard 已提交
8067 8068 8069
            gen_eob(dc);
            break;
        }
8070 8071 8072 8073 8074
        if (singlestep) {
            gen_jmp_im(pc_ptr - dc->cs_base);
            gen_eob(dc);
            break;
        }
B
bellard 已提交
8075
    }
P
pbrook 已提交
8076 8077
    if (tb->cflags & CF_LAST_IO)
        gen_io_end();
8078
done_generating:
8079
    gen_tb_end(tb, num_insns);
8080

B
bellard 已提交
8081 8082
    /* we don't forget to fill the last values */
    if (search_pc) {
8083
        j = tcg_ctx.gen_opc_ptr - tcg_ctx.gen_opc_buf;
B
bellard 已提交
8084 8085
        lj++;
        while (lj <= j)
8086
            tcg_ctx.gen_opc_instr_start[lj++] = 0;
B
bellard 已提交
8087
    }
8088

B
bellard 已提交
8089
#ifdef DEBUG_DISAS
8090
    if (qemu_loglevel_mask(CPU_LOG_TB_IN_ASM)) {
B
bellard 已提交
8091
        int disas_flags;
8092 8093
        qemu_log("----------------\n");
        qemu_log("IN: %s\n", lookup_symbol(pc_start));
B
bellard 已提交
8094 8095 8096 8097 8098 8099
#ifdef TARGET_X86_64
        if (dc->code64)
            disas_flags = 2;
        else
#endif
            disas_flags = !dc->code32;
B
Blue Swirl 已提交
8100
        log_target_disas(env, pc_start, pc_ptr - pc_start, disas_flags);
8101
        qemu_log("\n");
B
bellard 已提交
8102 8103 8104
    }
#endif

P
pbrook 已提交
8105
    if (!search_pc) {
B
bellard 已提交
8106
        tb->size = pc_ptr - pc_start;
P
pbrook 已提交
8107 8108
        tb->icount = num_insns;
    }
B
bellard 已提交
8109 8110
}

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

8116
void gen_intermediate_code_pc(CPUX86State *env, TranslationBlock *tb)
B
bellard 已提交
8117
{
8118
    gen_intermediate_code_internal(x86_env_get_cpu(env), tb, true);
B
bellard 已提交
8119 8120
}

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