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

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

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

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

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

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

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

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

76 77
static uint8_t gen_opc_cc_op[OPC_BUF_SIZE];

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

B
bellard 已提交
255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321
static inline void gen_op_movl_T0_0(void)
{
    tcg_gen_movi_tl(cpu_T[0], 0);
}

static inline void gen_op_movl_T0_im(int32_t val)
{
    tcg_gen_movi_tl(cpu_T[0], val);
}

static inline void gen_op_movl_T0_imu(uint32_t val)
{
    tcg_gen_movi_tl(cpu_T[0], val);
}

static inline void gen_op_movl_T1_im(int32_t val)
{
    tcg_gen_movi_tl(cpu_T[1], val);
}

static inline void gen_op_movl_T1_imu(uint32_t val)
{
    tcg_gen_movi_tl(cpu_T[1], val);
}

static inline void gen_op_movl_A0_im(uint32_t val)
{
    tcg_gen_movi_tl(cpu_A0, val);
}

#ifdef TARGET_X86_64
static inline void gen_op_movq_A0_im(int64_t val)
{
    tcg_gen_movi_tl(cpu_A0, val);
}
#endif

static inline void gen_movtl_T0_im(target_ulong val)
{
    tcg_gen_movi_tl(cpu_T[0], val);
}

static inline void gen_movtl_T1_im(target_ulong val)
{
    tcg_gen_movi_tl(cpu_T[1], val);
}

static inline void gen_op_andl_T0_ffff(void)
{
    tcg_gen_andi_tl(cpu_T[0], cpu_T[0], 0xffff);
}

static inline void gen_op_andl_T0_im(uint32_t val)
{
    tcg_gen_andi_tl(cpu_T[0], cpu_T[0], val);
}

static inline void gen_op_movl_T0_T1(void)
{
    tcg_gen_mov_tl(cpu_T[0], cpu_T[1]);
}

static inline void gen_op_andl_A0_ffff(void)
{
    tcg_gen_andi_tl(cpu_A0, cpu_A0, 0xffff);
}

B
bellard 已提交
322 323 324 325 326 327 328 329 330 331
#ifdef TARGET_X86_64

#define NB_OP_SIZES 4

#else /* !TARGET_X86_64 */

#define NB_OP_SIZES 3

#endif /* !TARGET_X86_64 */

332
#if defined(HOST_WORDS_BIGENDIAN)
B
bellard 已提交
333 334 335 336 337
#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 已提交
338
#else
B
bellard 已提交
339 340 341 342 343
#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 已提交
344
#endif
B
bellard 已提交
345

346 347 348 349 350 351 352 353 354 355 356 357 358 359 360 361 362 363 364
/* 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;
}

365
static inline void gen_op_mov_reg_v(int ot, int reg, TCGv t0)
B
bellard 已提交
366 367
{
    switch(ot) {
368
    case MO_8:
369
        if (!byte_reg_is_xH(reg)) {
370
            tcg_gen_deposit_tl(cpu_regs[reg], cpu_regs[reg], t0, 0, 8);
B
bellard 已提交
371
        } else {
372
            tcg_gen_deposit_tl(cpu_regs[reg - 4], cpu_regs[reg - 4], t0, 8, 8);
B
bellard 已提交
373 374
        }
        break;
375
    case MO_16:
376
        tcg_gen_deposit_tl(cpu_regs[reg], cpu_regs[reg], t0, 0, 16);
B
bellard 已提交
377
        break;
378
    default: /* XXX this shouldn't be reached;  abort? */
379
    case MO_32:
380 381 382
        /* 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 已提交
383
        break;
384
#ifdef TARGET_X86_64
385
    case MO_64:
386
        tcg_gen_mov_tl(cpu_regs[reg], t0);
B
bellard 已提交
387
        break;
B
bellard 已提交
388
#endif
B
bellard 已提交
389 390
    }
}
B
bellard 已提交
391

B
bellard 已提交
392 393
static inline void gen_op_mov_reg_T0(int ot, int reg)
{
394
    gen_op_mov_reg_v(ot, reg, cpu_T[0]);
B
bellard 已提交
395 396 397 398
}

static inline void gen_op_mov_reg_T1(int ot, int reg)
{
399
    gen_op_mov_reg_v(ot, reg, cpu_T[1]);
B
bellard 已提交
400 401 402 403 404
}

static inline void gen_op_mov_reg_A0(int size, int reg)
{
    switch(size) {
405
    case MO_8:
406
        tcg_gen_deposit_tl(cpu_regs[reg], cpu_regs[reg], cpu_A0, 0, 16);
B
bellard 已提交
407
        break;
408
    default: /* XXX this shouldn't be reached;  abort? */
409
    case MO_16:
410 411 412
        /* For x86_64, this sets the higher half of register to zero.
           For i386, this is equivalent to a mov. */
        tcg_gen_ext32u_tl(cpu_regs[reg], cpu_A0);
B
bellard 已提交
413
        break;
414
#ifdef TARGET_X86_64
415
    case MO_32:
416
        tcg_gen_mov_tl(cpu_regs[reg], cpu_A0);
B
bellard 已提交
417
        break;
B
bellard 已提交
418
#endif
B
bellard 已提交
419 420 421
    }
}

422
static inline void gen_op_mov_v_reg(int ot, TCGv t0, int reg)
B
bellard 已提交
423
{
424
    if (ot == MO_8 && byte_reg_is_xH(reg)) {
425 426 427
        tcg_gen_shri_tl(t0, cpu_regs[reg - 4], 8);
        tcg_gen_ext8u_tl(t0, t0);
    } else {
428
        tcg_gen_mov_tl(t0, cpu_regs[reg]);
B
bellard 已提交
429 430 431
    }
}

432 433 434 435 436
static inline void gen_op_mov_TN_reg(int ot, int t_index, int reg)
{
    gen_op_mov_v_reg(ot, cpu_T[t_index], reg);
}

B
bellard 已提交
437 438
static inline void gen_op_movl_A0_reg(int reg)
{
439
    tcg_gen_mov_tl(cpu_A0, cpu_regs[reg]);
B
bellard 已提交
440 441 442 443 444
}

static inline void gen_op_addl_A0_im(int32_t val)
{
    tcg_gen_addi_tl(cpu_A0, cpu_A0, val);
B
bellard 已提交
445
#ifdef TARGET_X86_64
B
bellard 已提交
446
    tcg_gen_andi_tl(cpu_A0, cpu_A0, 0xffffffff);
B
bellard 已提交
447
#endif
B
bellard 已提交
448
}
B
bellard 已提交
449

B
bellard 已提交
450
#ifdef TARGET_X86_64
B
bellard 已提交
451 452 453 454
static inline void gen_op_addq_A0_im(int64_t val)
{
    tcg_gen_addi_tl(cpu_A0, cpu_A0, val);
}
B
bellard 已提交
455
#endif
B
bellard 已提交
456 457 458 459 460 461 462 463 464 465
    
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 已提交
466

B
bellard 已提交
467
static inline void gen_op_addl_T0_T1(void)
B
bellard 已提交
468
{
B
bellard 已提交
469 470 471 472 473
    tcg_gen_add_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
}

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

477
static inline void gen_op_add_reg_im(int size, int reg, int32_t val)
B
bellard 已提交
478
{
479
    switch(size) {
480
    case MO_8:
481
        tcg_gen_addi_tl(cpu_tmp0, cpu_regs[reg], val);
482
        tcg_gen_deposit_tl(cpu_regs[reg], cpu_regs[reg], cpu_tmp0, 0, 16);
483
        break;
484
    case MO_16:
485 486 487 488 489
        tcg_gen_addi_tl(cpu_tmp0, cpu_regs[reg], val);
        /* For x86_64, this sets the higher half of register to zero.
           For i386, this is equivalent to a nop. */
        tcg_gen_ext32u_tl(cpu_tmp0, cpu_tmp0);
        tcg_gen_mov_tl(cpu_regs[reg], cpu_tmp0);
490 491
        break;
#ifdef TARGET_X86_64
492
    case MO_32:
493
        tcg_gen_addi_tl(cpu_regs[reg], cpu_regs[reg], val);
494 495 496
        break;
#endif
    }
B
bellard 已提交
497 498
}

499
static inline void gen_op_add_reg_T0(int size, int reg)
B
bellard 已提交
500
{
501
    switch(size) {
502
    case MO_8:
503
        tcg_gen_add_tl(cpu_tmp0, cpu_regs[reg], cpu_T[0]);
504
        tcg_gen_deposit_tl(cpu_regs[reg], cpu_regs[reg], cpu_tmp0, 0, 16);
505
        break;
506
    case MO_16:
507 508 509 510 511
        tcg_gen_add_tl(cpu_tmp0, cpu_regs[reg], cpu_T[0]);
        /* For x86_64, this sets the higher half of register to zero.
           For i386, this is equivalent to a nop. */
        tcg_gen_ext32u_tl(cpu_tmp0, cpu_tmp0);
        tcg_gen_mov_tl(cpu_regs[reg], cpu_tmp0);
512
        break;
B
bellard 已提交
513
#ifdef TARGET_X86_64
514
    case MO_32:
515
        tcg_gen_add_tl(cpu_regs[reg], cpu_regs[reg], cpu_T[0]);
516
        break;
B
bellard 已提交
517
#endif
518 519
    }
}
B
bellard 已提交
520 521 522

static inline void gen_op_addl_A0_reg_sN(int shift, int reg)
{
523 524
    tcg_gen_mov_tl(cpu_tmp0, cpu_regs[reg]);
    if (shift != 0)
B
bellard 已提交
525 526
        tcg_gen_shli_tl(cpu_tmp0, cpu_tmp0, shift);
    tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_tmp0);
527 528 529
    /* 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 已提交
530
}
B
bellard 已提交
531

B
bellard 已提交
532 533
static inline void gen_op_movl_A0_seg(int reg)
{
534
    tcg_gen_ld32u_tl(cpu_A0, cpu_env, offsetof(CPUX86State, segs[reg].base) + REG_L_OFFSET);
B
bellard 已提交
535
}
B
bellard 已提交
536

537
static inline void gen_op_addl_A0_seg(DisasContext *s, int reg)
B
bellard 已提交
538
{
539
    tcg_gen_ld_tl(cpu_tmp0, cpu_env, offsetof(CPUX86State, segs[reg].base));
B
bellard 已提交
540
#ifdef TARGET_X86_64
541 542 543 544 545 546 547 548 549
    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 已提交
550 551
#endif
}
B
bellard 已提交
552

B
bellard 已提交
553
#ifdef TARGET_X86_64
B
bellard 已提交
554 555
static inline void gen_op_movq_A0_seg(int reg)
{
556
    tcg_gen_ld_tl(cpu_A0, cpu_env, offsetof(CPUX86State, segs[reg].base));
B
bellard 已提交
557
}
B
bellard 已提交
558

B
bellard 已提交
559 560
static inline void gen_op_addq_A0_seg(int reg)
{
561
    tcg_gen_ld_tl(cpu_tmp0, cpu_env, offsetof(CPUX86State, segs[reg].base));
B
bellard 已提交
562 563 564 565 566
    tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_tmp0);
}

static inline void gen_op_movq_A0_reg(int reg)
{
567
    tcg_gen_mov_tl(cpu_A0, cpu_regs[reg]);
B
bellard 已提交
568 569 570 571
}

static inline void gen_op_addq_A0_reg_sN(int shift, int reg)
{
572 573
    tcg_gen_mov_tl(cpu_tmp0, cpu_regs[reg]);
    if (shift != 0)
B
bellard 已提交
574 575 576
        tcg_gen_shli_tl(cpu_tmp0, cpu_tmp0, shift);
    tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_tmp0);
}
B
bellard 已提交
577 578
#endif

579
static inline void gen_op_lds_T0_A0(DisasContext *s, int idx)
B
bellard 已提交
580
{
581
    tcg_gen_qemu_ld_tl(cpu_T[0], cpu_A0, s->mem_index, idx | MO_LE | MO_SIGN);
B
bellard 已提交
582
}
B
bellard 已提交
583

584
static inline void gen_op_ld_v(DisasContext *s, int idx, TCGv t0, TCGv a0)
B
bellard 已提交
585
{
586
    tcg_gen_qemu_ld_tl(t0, a0, s->mem_index, idx | MO_LE);
B
bellard 已提交
587
}
B
bellard 已提交
588

589
static inline void gen_op_ld_T1_A0(DisasContext *s, int idx)
590
{
591
    gen_op_ld_v(s, idx, cpu_T[1], cpu_A0);
592 593
}

594
static inline void gen_op_st_v(DisasContext *s, int idx, TCGv t0, TCGv a0)
B
bellard 已提交
595
{
596
    tcg_gen_qemu_st_tl(t0, a0, s->mem_index, idx | MO_LE);
B
bellard 已提交
597
}
598

599
static inline void gen_op_st_T0_A0(DisasContext *s, int idx)
B
bellard 已提交
600
{
601
    gen_op_st_v(s, idx, cpu_T[0], cpu_A0);
B
bellard 已提交
602
}
603

604
static inline void gen_op_st_T1_A0(DisasContext *s, int idx)
B
bellard 已提交
605
{
606
    gen_op_st_v(s, idx, cpu_T[1], cpu_A0);
B
bellard 已提交
607
}
608

B
bellard 已提交
609 610
static inline void gen_jmp_im(target_ulong pc)
{
B
bellard 已提交
611
    tcg_gen_movi_tl(cpu_tmp0, pc);
612
    tcg_gen_st_tl(cpu_tmp0, cpu_env, offsetof(CPUX86State, eip));
B
bellard 已提交
613 614
}

B
bellard 已提交
615 616 617 618 619
static inline void gen_string_movl_A0_ESI(DisasContext *s)
{
    int override;

    override = s->override;
B
bellard 已提交
620 621 622
#ifdef TARGET_X86_64
    if (s->aflag == 2) {
        if (override >= 0) {
B
bellard 已提交
623 624
            gen_op_movq_A0_seg(override);
            gen_op_addq_A0_reg_sN(0, R_ESI);
B
bellard 已提交
625
        } else {
B
bellard 已提交
626
            gen_op_movq_A0_reg(R_ESI);
B
bellard 已提交
627 628 629
        }
    } else
#endif
B
bellard 已提交
630 631 632 633 634
    if (s->aflag) {
        /* 32 bit address */
        if (s->addseg && override < 0)
            override = R_DS;
        if (override >= 0) {
B
bellard 已提交
635 636
            gen_op_movl_A0_seg(override);
            gen_op_addl_A0_reg_sN(0, R_ESI);
B
bellard 已提交
637
        } else {
B
bellard 已提交
638
            gen_op_movl_A0_reg(R_ESI);
B
bellard 已提交
639 640 641 642 643
        }
    } else {
        /* 16 address, always override */
        if (override < 0)
            override = R_DS;
B
bellard 已提交
644
        gen_op_movl_A0_reg(R_ESI);
B
bellard 已提交
645
        gen_op_andl_A0_ffff();
646
        gen_op_addl_A0_seg(s, override);
B
bellard 已提交
647 648 649 650 651
    }
}

static inline void gen_string_movl_A0_EDI(DisasContext *s)
{
B
bellard 已提交
652 653
#ifdef TARGET_X86_64
    if (s->aflag == 2) {
B
bellard 已提交
654
        gen_op_movq_A0_reg(R_EDI);
B
bellard 已提交
655 656
    } else
#endif
B
bellard 已提交
657 658
    if (s->aflag) {
        if (s->addseg) {
B
bellard 已提交
659 660
            gen_op_movl_A0_seg(R_ES);
            gen_op_addl_A0_reg_sN(0, R_EDI);
B
bellard 已提交
661
        } else {
B
bellard 已提交
662
            gen_op_movl_A0_reg(R_EDI);
B
bellard 已提交
663 664
        }
    } else {
B
bellard 已提交
665
        gen_op_movl_A0_reg(R_EDI);
B
bellard 已提交
666
        gen_op_andl_A0_ffff();
667
        gen_op_addl_A0_seg(s, R_ES);
B
bellard 已提交
668 669 670
    }
}

671 672
static inline void gen_op_movl_T0_Dshift(int ot) 
{
673
    tcg_gen_ld32s_tl(cpu_T[0], cpu_env, offsetof(CPUX86State, df));
674
    tcg_gen_shli_tl(cpu_T[0], cpu_T[0], ot);
B
bellard 已提交
675 676
};

677
static TCGv gen_ext_tl(TCGv dst, TCGv src, int size, bool sign)
678
{
679
    switch (size) {
680
    case MO_8:
681 682 683 684 685 686
        if (sign) {
            tcg_gen_ext8s_tl(dst, src);
        } else {
            tcg_gen_ext8u_tl(dst, src);
        }
        return dst;
687
    case MO_16:
688 689 690 691 692 693 694
        if (sign) {
            tcg_gen_ext16s_tl(dst, src);
        } else {
            tcg_gen_ext16u_tl(dst, src);
        }
        return dst;
#ifdef TARGET_X86_64
695
    case MO_32:
696 697 698 699 700 701 702
        if (sign) {
            tcg_gen_ext32s_tl(dst, src);
        } else {
            tcg_gen_ext32u_tl(dst, src);
        }
        return dst;
#endif
703
    default:
704
        return src;
705 706
    }
}
707

708 709 710 711 712
static void gen_extu(int ot, TCGv reg)
{
    gen_ext_tl(reg, reg, ot, false);
}

713 714
static void gen_exts(int ot, TCGv reg)
{
715
    gen_ext_tl(reg, reg, ot, true);
716
}
B
bellard 已提交
717

718 719
static inline void gen_op_jnz_ecx(int size, int label1)
{
720
    tcg_gen_mov_tl(cpu_tmp0, cpu_regs[R_ECX]);
721
    gen_extu(size + 1, cpu_tmp0);
P
pbrook 已提交
722
    tcg_gen_brcondi_tl(TCG_COND_NE, cpu_tmp0, 0, label1);
723 724 725 726
}

static inline void gen_op_jz_ecx(int size, int label1)
{
727
    tcg_gen_mov_tl(cpu_tmp0, cpu_regs[R_ECX]);
728
    gen_extu(size + 1, cpu_tmp0);
P
pbrook 已提交
729
    tcg_gen_brcondi_tl(TCG_COND_EQ, cpu_tmp0, 0, label1);
730
}
B
bellard 已提交
731

P
pbrook 已提交
732 733 734
static void gen_helper_in_func(int ot, TCGv v, TCGv_i32 n)
{
    switch (ot) {
735
    case MO_8:
736 737
        gen_helper_inb(v, n);
        break;
738
    case MO_16:
739 740
        gen_helper_inw(v, n);
        break;
741
    case MO_32:
742 743
        gen_helper_inl(v, n);
        break;
P
pbrook 已提交
744 745
    }
}
B
bellard 已提交
746

P
pbrook 已提交
747 748 749
static void gen_helper_out_func(int ot, TCGv_i32 v, TCGv_i32 n)
{
    switch (ot) {
750
    case MO_8:
751 752
        gen_helper_outb(v, n);
        break;
753
    case MO_16:
754 755
        gen_helper_outw(v, n);
        break;
756
    case MO_32:
757 758
        gen_helper_outl(v, n);
        break;
P
pbrook 已提交
759 760
    }
}
761

762 763
static void gen_check_io(DisasContext *s, int ot, target_ulong cur_eip,
                         uint32_t svm_flags)
764
{
765 766 767 768
    int state_saved;
    target_ulong next_eip;

    state_saved = 0;
769
    if (s->pe && (s->cpl > s->iopl || s->vm86)) {
770
        gen_update_cc_op(s);
B
bellard 已提交
771
        gen_jmp_im(cur_eip);
772
        state_saved = 1;
773
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
P
pbrook 已提交
774
        switch (ot) {
775
        case MO_8:
B
Blue Swirl 已提交
776 777
            gen_helper_check_iob(cpu_env, cpu_tmp2_i32);
            break;
778
        case MO_16:
B
Blue Swirl 已提交
779 780
            gen_helper_check_iow(cpu_env, cpu_tmp2_i32);
            break;
781
        case MO_32:
B
Blue Swirl 已提交
782 783
            gen_helper_check_iol(cpu_env, cpu_tmp2_i32);
            break;
P
pbrook 已提交
784
        }
785
    }
B
bellard 已提交
786
    if(s->flags & HF_SVMI_MASK) {
787
        if (!state_saved) {
788
            gen_update_cc_op(s);
789 790 791 792
            gen_jmp_im(cur_eip);
        }
        svm_flags |= (1 << (4 + ot));
        next_eip = s->pc - s->cs_base;
793
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
B
Blue Swirl 已提交
794 795
        gen_helper_svm_check_io(cpu_env, cpu_tmp2_i32,
                                tcg_const_i32(svm_flags),
P
pbrook 已提交
796
                                tcg_const_i32(next_eip - cur_eip));
797 798 799
    }
}

B
bellard 已提交
800 801 802
static inline void gen_movs(DisasContext *s, int ot)
{
    gen_string_movl_A0_ESI(s);
803
    gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
804
    gen_string_movl_A0_EDI(s);
805
    gen_op_st_T0_A0(s, ot);
806 807 808
    gen_op_movl_T0_Dshift(ot);
    gen_op_add_reg_T0(s->aflag, R_ESI);
    gen_op_add_reg_T0(s->aflag, R_EDI);
B
bellard 已提交
809 810
}

811 812 813 814 815 816 817 818 819 820 821
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]);
}

822 823 824 825 826 827 828
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]);
}

829 830 831 832 833 834 835 836
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]);
837 838
    tcg_gen_neg_tl(cpu_cc_src, cpu_T[0]);
    tcg_gen_movi_tl(cpu_cc_srcT, 0);
839 840
}

841 842
/* compute all eflags to cc_src */
static void gen_compute_eflags(DisasContext *s)
843
{
844
    TCGv zero, dst, src1, src2;
845 846
    int live, dead;

847 848 849
    if (s->cc_op == CC_OP_EFLAGS) {
        return;
    }
R
Richard Henderson 已提交
850 851 852 853 854
    if (s->cc_op == CC_OP_CLR) {
        tcg_gen_movi_tl(cpu_cc_src, CC_Z);
        set_cc_op(s, CC_OP_EFLAGS);
        return;
    }
855 856 857 858

    TCGV_UNUSED(zero);
    dst = cpu_cc_dst;
    src1 = cpu_cc_src;
859
    src2 = cpu_cc_src2;
860 861 862

    /* Take care to not read values that are not live.  */
    live = cc_op_live[s->cc_op] & ~USES_CC_SRCT;
863
    dead = live ^ (USES_CC_DST | USES_CC_SRC | USES_CC_SRC2);
864 865 866 867 868 869 870 871
    if (dead) {
        zero = tcg_const_tl(0);
        if (dead & USES_CC_DST) {
            dst = zero;
        }
        if (dead & USES_CC_SRC) {
            src1 = zero;
        }
872 873 874
        if (dead & USES_CC_SRC2) {
            src2 = zero;
        }
875 876
    }

877
    gen_update_cc_op(s);
878
    gen_helper_cc_compute_all(cpu_cc_src, dst, src1, src2, cpu_cc_op);
879
    set_cc_op(s, CC_OP_EFLAGS);
880 881 882 883

    if (dead) {
        tcg_temp_free(zero);
    }
884 885
}

886 887 888 889 890 891 892 893 894 895
typedef struct CCPrepare {
    TCGCond cond;
    TCGv reg;
    TCGv reg2;
    target_ulong imm;
    target_ulong mask;
    bool use_reg2;
    bool no_setcond;
} CCPrepare;

896
/* compute eflags.C to reg */
897
static CCPrepare gen_prepare_eflags_c(DisasContext *s, TCGv reg)
898 899
{
    TCGv t0, t1;
900
    int size, shift;
901 902 903

    switch (s->cc_op) {
    case CC_OP_SUBB ... CC_OP_SUBQ:
904
        /* (DATA_TYPE)CC_SRCT < (DATA_TYPE)CC_SRC */
905 906 907 908
        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;
909
        tcg_gen_mov_tl(t0, cpu_cc_srcT);
910 911 912 913 914 915 916 917 918
        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:
919 920
        return (CCPrepare) { .cond = TCG_COND_LTU, .reg = t0,
                             .reg2 = t1, .mask = -1, .use_reg2 = true };
921 922

    case CC_OP_LOGICB ... CC_OP_LOGICQ:
R
Richard Henderson 已提交
923
    case CC_OP_CLR:
924
        return (CCPrepare) { .cond = TCG_COND_NEVER, .mask = -1 };
925 926 927

    case CC_OP_INCB ... CC_OP_INCQ:
    case CC_OP_DECB ... CC_OP_DECQ:
928 929
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                             .mask = -1, .no_setcond = true };
930 931 932 933

    case CC_OP_SHLB ... CC_OP_SHLQ:
        /* (CC_SRC >> (DATA_BITS - 1)) & 1 */
        size = s->cc_op - CC_OP_SHLB;
934 935 936
        shift = (8 << size) - 1;
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                             .mask = (target_ulong)1 << shift };
937 938

    case CC_OP_MULB ... CC_OP_MULQ:
939 940
        return (CCPrepare) { .cond = TCG_COND_NE,
                             .reg = cpu_cc_src, .mask = -1 };
941

942 943 944 945 946
    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 };

947 948 949 950 951
    case CC_OP_ADCX:
    case CC_OP_ADCOX:
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_dst,
                             .mask = -1, .no_setcond = true };

952 953 954
    case CC_OP_EFLAGS:
    case CC_OP_SARB ... CC_OP_SARQ:
        /* CC_SRC & 1 */
955 956
        return (CCPrepare) { .cond = TCG_COND_NE,
                             .reg = cpu_cc_src, .mask = CC_C };
957 958 959 960 961

    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);
962 963
       gen_helper_cc_compute_c(reg, cpu_cc_dst, cpu_cc_src,
                               cpu_cc_src2, cpu_cc_op);
964 965
       return (CCPrepare) { .cond = TCG_COND_NE, .reg = reg,
                            .mask = -1, .no_setcond = true };
966 967 968
    }
}

969
/* compute eflags.P to reg */
970
static CCPrepare gen_prepare_eflags_p(DisasContext *s, TCGv reg)
971
{
972
    gen_compute_eflags(s);
973 974
    return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                         .mask = CC_P };
975 976 977
}

/* compute eflags.S to reg */
978
static CCPrepare gen_prepare_eflags_s(DisasContext *s, TCGv reg)
979
{
980 981 982 983 984
    switch (s->cc_op) {
    case CC_OP_DYNAMIC:
        gen_compute_eflags(s);
        /* FALLTHRU */
    case CC_OP_EFLAGS:
985 986 987
    case CC_OP_ADCX:
    case CC_OP_ADOX:
    case CC_OP_ADCOX:
988 989
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                             .mask = CC_S };
R
Richard Henderson 已提交
990 991
    case CC_OP_CLR:
        return (CCPrepare) { .cond = TCG_COND_NEVER, .mask = -1 };
992 993 994 995
    default:
        {
            int size = (s->cc_op - CC_OP_ADDB) & 3;
            TCGv t0 = gen_ext_tl(reg, cpu_cc_dst, size, true);
996
            return (CCPrepare) { .cond = TCG_COND_LT, .reg = t0, .mask = -1 };
997 998
        }
    }
999 1000 1001
}

/* compute eflags.O to reg */
1002
static CCPrepare gen_prepare_eflags_o(DisasContext *s, TCGv reg)
1003
{
1004 1005 1006 1007 1008
    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 已提交
1009 1010
    case CC_OP_CLR:
        return (CCPrepare) { .cond = TCG_COND_NEVER, .mask = -1 };
1011 1012 1013 1014 1015
    default:
        gen_compute_eflags(s);
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                             .mask = CC_O };
    }
1016 1017 1018
}

/* compute eflags.Z to reg */
1019
static CCPrepare gen_prepare_eflags_z(DisasContext *s, TCGv reg)
1020
{
1021 1022 1023 1024 1025
    switch (s->cc_op) {
    case CC_OP_DYNAMIC:
        gen_compute_eflags(s);
        /* FALLTHRU */
    case CC_OP_EFLAGS:
1026 1027 1028
    case CC_OP_ADCX:
    case CC_OP_ADOX:
    case CC_OP_ADCOX:
1029 1030
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                             .mask = CC_Z };
R
Richard Henderson 已提交
1031 1032
    case CC_OP_CLR:
        return (CCPrepare) { .cond = TCG_COND_ALWAYS, .mask = -1 };
1033 1034 1035 1036
    default:
        {
            int size = (s->cc_op - CC_OP_ADDB) & 3;
            TCGv t0 = gen_ext_tl(reg, cpu_cc_dst, size, false);
1037
            return (CCPrepare) { .cond = TCG_COND_EQ, .reg = t0, .mask = -1 };
1038
        }
1039 1040 1041
    }
}

1042 1043
/* perform a conditional store into register 'reg' according to jump opcode
   value 'b'. In the fast case, T0 is guaranted not to be used. */
1044
static CCPrepare gen_prepare_cc(DisasContext *s, int b, TCGv reg)
1045
{
1046
    int inv, jcc_op, size, cond;
1047
    CCPrepare cc;
1048 1049 1050
    TCGv t0;

    inv = b & 1;
1051
    jcc_op = (b >> 1) & 7;
1052 1053

    switch (s->cc_op) {
1054 1055
    case CC_OP_SUBB ... CC_OP_SUBQ:
        /* We optimize relational operators for the cmp/jcc case.  */
1056 1057 1058
        size = s->cc_op - CC_OP_SUBB;
        switch (jcc_op) {
        case JCC_BE:
1059
            tcg_gen_mov_tl(cpu_tmp4, cpu_cc_srcT);
1060 1061
            gen_extu(size, cpu_tmp4);
            t0 = gen_ext_tl(cpu_tmp0, cpu_cc_src, size, false);
1062 1063
            cc = (CCPrepare) { .cond = TCG_COND_LEU, .reg = cpu_tmp4,
                               .reg2 = t0, .mask = -1, .use_reg2 = true };
1064
            break;
1065

1066
        case JCC_L:
1067
            cond = TCG_COND_LT;
1068 1069
            goto fast_jcc_l;
        case JCC_LE:
1070
            cond = TCG_COND_LE;
1071
        fast_jcc_l:
1072
            tcg_gen_mov_tl(cpu_tmp4, cpu_cc_srcT);
1073 1074
            gen_exts(size, cpu_tmp4);
            t0 = gen_ext_tl(cpu_tmp0, cpu_cc_src, size, true);
1075 1076
            cc = (CCPrepare) { .cond = cond, .reg = cpu_tmp4,
                               .reg2 = t0, .mask = -1, .use_reg2 = true };
1077
            break;
1078

1079
        default:
1080
            goto slow_jcc;
1081
        }
1082
        break;
1083

1084 1085
    default:
    slow_jcc:
1086 1087 1088 1089 1090 1091 1092 1093 1094 1095 1096 1097 1098 1099 1100 1101 1102 1103 1104 1105 1106 1107 1108 1109 1110 1111 1112 1113 1114 1115 1116 1117 1118 1119 1120 1121 1122 1123 1124 1125 1126 1127 1128 1129
        /* 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;
        }
1130
        break;
1131
    }
1132 1133 1134 1135 1136

    if (inv) {
        cc.cond = tcg_invert_cond(cc.cond);
    }
    return cc;
1137 1138
}

1139 1140 1141 1142 1143 1144 1145 1146 1147 1148 1149 1150 1151 1152 1153 1154 1155 1156 1157 1158 1159 1160 1161 1162 1163 1164 1165 1166 1167 1168 1169 1170 1171 1172
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);
}
1173

1174 1175
/* generate a conditional jump to label 'l1' according to jump opcode
   value 'b'. In the fast case, T0 is guaranted not to be used. */
1176 1177 1178 1179 1180 1181 1182 1183 1184 1185 1186 1187 1188 1189 1190 1191 1192 1193
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.  */
1194
static inline void gen_jcc1(DisasContext *s, int b, int l1)
1195
{
1196
    CCPrepare cc = gen_prepare_cc(s, b, cpu_T[0]);
1197

1198
    gen_update_cc_op(s);
1199 1200 1201 1202
    if (cc.mask != -1) {
        tcg_gen_andi_tl(cpu_T[0], cc.reg, cc.mask);
        cc.reg = cpu_T[0];
    }
1203
    set_cc_op(s, CC_OP_DYNAMIC);
1204 1205 1206 1207
    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);
1208 1209 1210
    }
}

B
bellard 已提交
1211 1212 1213
/* 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 已提交
1214
{
B
bellard 已提交
1215 1216 1217 1218
    int l1, l2;

    l1 = gen_new_label();
    l2 = gen_new_label();
1219
    gen_op_jnz_ecx(s->aflag, l1);
B
bellard 已提交
1220 1221 1222 1223
    gen_set_label(l2);
    gen_jmp_tb(s, next_eip, 1);
    gen_set_label(l1);
    return l2;
B
bellard 已提交
1224 1225 1226 1227
}

static inline void gen_stos(DisasContext *s, int ot)
{
1228
    gen_op_mov_TN_reg(MO_32, 0, R_EAX);
B
bellard 已提交
1229
    gen_string_movl_A0_EDI(s);
1230
    gen_op_st_T0_A0(s, ot);
1231 1232
    gen_op_movl_T0_Dshift(ot);
    gen_op_add_reg_T0(s->aflag, R_EDI);
B
bellard 已提交
1233 1234 1235 1236 1237
}

static inline void gen_lods(DisasContext *s, int ot)
{
    gen_string_movl_A0_ESI(s);
1238
    gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
1239
    gen_op_mov_reg_T0(ot, R_EAX);
1240 1241
    gen_op_movl_T0_Dshift(ot);
    gen_op_add_reg_T0(s->aflag, R_ESI);
B
bellard 已提交
1242 1243 1244 1245 1246
}

static inline void gen_scas(DisasContext *s, int ot)
{
    gen_string_movl_A0_EDI(s);
1247
    gen_op_ld_T1_A0(s, ot);
1248
    gen_op(s, OP_CMPL, ot, R_EAX);
1249 1250
    gen_op_movl_T0_Dshift(ot);
    gen_op_add_reg_T0(s->aflag, R_EDI);
B
bellard 已提交
1251 1252 1253 1254 1255
}

static inline void gen_cmps(DisasContext *s, int ot)
{
    gen_string_movl_A0_EDI(s);
1256
    gen_op_ld_T1_A0(s, ot);
1257 1258
    gen_string_movl_A0_ESI(s);
    gen_op(s, OP_CMPL, ot, OR_TMP0);
1259 1260 1261
    gen_op_movl_T0_Dshift(ot);
    gen_op_add_reg_T0(s->aflag, R_ESI);
    gen_op_add_reg_T0(s->aflag, R_EDI);
B
bellard 已提交
1262 1263 1264 1265
}

static inline void gen_ins(DisasContext *s, int ot)
{
P
pbrook 已提交
1266 1267
    if (use_icount)
        gen_io_start();
B
bellard 已提交
1268
    gen_string_movl_A0_EDI(s);
1269 1270
    /* Note: we must do this dummy write first to be restartable in
       case of page fault. */
B
bellard 已提交
1271
    gen_op_movl_T0_0();
1272
    gen_op_st_T0_A0(s, ot);
1273
    gen_op_mov_TN_reg(MO_16, 1, R_EDX);
1274 1275
    tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[1]);
    tcg_gen_andi_i32(cpu_tmp2_i32, cpu_tmp2_i32, 0xffff);
P
pbrook 已提交
1276
    gen_helper_in_func(ot, cpu_T[0], cpu_tmp2_i32);
1277
    gen_op_st_T0_A0(s, ot);
1278 1279
    gen_op_movl_T0_Dshift(ot);
    gen_op_add_reg_T0(s->aflag, R_EDI);
P
pbrook 已提交
1280 1281
    if (use_icount)
        gen_io_end();
B
bellard 已提交
1282 1283 1284 1285
}

static inline void gen_outs(DisasContext *s, int ot)
{
P
pbrook 已提交
1286 1287
    if (use_icount)
        gen_io_start();
B
bellard 已提交
1288
    gen_string_movl_A0_ESI(s);
1289
    gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1290

1291
    gen_op_mov_TN_reg(MO_16, 1, R_EDX);
1292 1293 1294
    tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[1]);
    tcg_gen_andi_i32(cpu_tmp2_i32, cpu_tmp2_i32, 0xffff);
    tcg_gen_trunc_tl_i32(cpu_tmp3_i32, cpu_T[0]);
P
pbrook 已提交
1295
    gen_helper_out_func(ot, cpu_tmp2_i32, cpu_tmp3_i32);
1296

1297 1298
    gen_op_movl_T0_Dshift(ot);
    gen_op_add_reg_T0(s->aflag, R_ESI);
P
pbrook 已提交
1299 1300
    if (use_icount)
        gen_io_end();
B
bellard 已提交
1301 1302 1303 1304 1305 1306
}

/* same method as Valgrind : we generate jumps to current or next
   instruction */
#define GEN_REPZ(op)                                                          \
static inline void gen_repz_ ## op(DisasContext *s, int ot,                   \
B
bellard 已提交
1307
                                 target_ulong cur_eip, target_ulong next_eip) \
B
bellard 已提交
1308
{                                                                             \
B
bellard 已提交
1309
    int l2;\
B
bellard 已提交
1310
    gen_update_cc_op(s);                                                      \
B
bellard 已提交
1311
    l2 = gen_jz_ecx_string(s, next_eip);                                      \
B
bellard 已提交
1312
    gen_ ## op(s, ot);                                                        \
1313
    gen_op_add_reg_im(s->aflag, R_ECX, -1);                                   \
B
bellard 已提交
1314 1315 1316
    /* a loop would cause two single step exceptions if ECX = 1               \
       before rep string_insn */                                              \
    if (!s->jmp_opt)                                                          \
1317
        gen_op_jz_ecx(s->aflag, l2);                                          \
B
bellard 已提交
1318 1319 1320 1321 1322
    gen_jmp(s, cur_eip);                                                      \
}

#define GEN_REPZ2(op)                                                         \
static inline void gen_repz_ ## op(DisasContext *s, int ot,                   \
B
bellard 已提交
1323 1324
                                   target_ulong cur_eip,                      \
                                   target_ulong next_eip,                     \
B
bellard 已提交
1325 1326
                                   int nz)                                    \
{                                                                             \
B
bellard 已提交
1327
    int l2;\
B
bellard 已提交
1328
    gen_update_cc_op(s);                                                      \
B
bellard 已提交
1329
    l2 = gen_jz_ecx_string(s, next_eip);                                      \
B
bellard 已提交
1330
    gen_ ## op(s, ot);                                                        \
1331
    gen_op_add_reg_im(s->aflag, R_ECX, -1);                                   \
1332
    gen_update_cc_op(s);                                                      \
1333
    gen_jcc1(s, (JCC_Z << 1) | (nz ^ 1), l2);                                 \
B
bellard 已提交
1334
    if (!s->jmp_opt)                                                          \
1335
        gen_op_jz_ecx(s->aflag, l2);                                          \
B
bellard 已提交
1336 1337 1338 1339 1340 1341 1342 1343 1344 1345 1346
    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 已提交
1347 1348 1349
static void gen_helper_fp_arith_ST0_FT0(int op)
{
    switch (op) {
B
Blue Swirl 已提交
1350 1351 1352 1353 1354 1355 1356 1357 1358 1359 1360 1361 1362 1363 1364 1365 1366 1367 1368 1369 1370 1371 1372 1373
    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 已提交
1374 1375
    }
}
B
bellard 已提交
1376 1377

/* NOTE the exception in "r" op ordering */
P
pbrook 已提交
1378 1379 1380 1381
static void gen_helper_fp_arith_STN_ST0(int op, int opreg)
{
    TCGv_i32 tmp = tcg_const_i32(opreg);
    switch (op) {
B
Blue Swirl 已提交
1382 1383 1384 1385 1386 1387 1388 1389 1390 1391 1392 1393 1394 1395 1396 1397 1398 1399
    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 已提交
1400 1401
    }
}
B
bellard 已提交
1402 1403 1404 1405 1406

/* if d == OR_TMP0, it means memory operand (address in A0) */
static void gen_op(DisasContext *s1, int op, int ot, int d)
{
    if (d != OR_TMP0) {
B
bellard 已提交
1407
        gen_op_mov_TN_reg(ot, 0, d);
B
bellard 已提交
1408
    } else {
1409
        gen_op_ld_v(s1, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
1410 1411 1412
    }
    switch(op) {
    case OP_ADCL:
1413
        gen_compute_eflags_c(s1, cpu_tmp4);
B
bellard 已提交
1414 1415 1416 1417 1418
        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);
        if (d != OR_TMP0)
            gen_op_mov_reg_T0(ot, d);
        else
1419
            gen_op_st_T0_A0(s1, ot);
1420 1421
        gen_op_update3_cc(cpu_tmp4);
        set_cc_op(s1, CC_OP_ADCB + ot);
B
bellard 已提交
1422
        break;
B
bellard 已提交
1423
    case OP_SBBL:
1424
        gen_compute_eflags_c(s1, cpu_tmp4);
B
bellard 已提交
1425 1426 1427
        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);
        if (d != OR_TMP0)
B
bellard 已提交
1428
            gen_op_mov_reg_T0(ot, d);
B
bellard 已提交
1429
        else
1430
            gen_op_st_T0_A0(s1, ot);
1431 1432
        gen_op_update3_cc(cpu_tmp4);
        set_cc_op(s1, CC_OP_SBBB + ot);
B
bellard 已提交
1433
        break;
B
bellard 已提交
1434 1435
    case OP_ADDL:
        gen_op_addl_T0_T1();
B
bellard 已提交
1436 1437 1438
        if (d != OR_TMP0)
            gen_op_mov_reg_T0(ot, d);
        else
1439
            gen_op_st_T0_A0(s1, ot);
B
bellard 已提交
1440
        gen_op_update2_cc();
1441
        set_cc_op(s1, CC_OP_ADDB + ot);
B
bellard 已提交
1442 1443
        break;
    case OP_SUBL:
1444
        tcg_gen_mov_tl(cpu_cc_srcT, cpu_T[0]);
B
bellard 已提交
1445
        tcg_gen_sub_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
B
bellard 已提交
1446 1447 1448
        if (d != OR_TMP0)
            gen_op_mov_reg_T0(ot, d);
        else
1449
            gen_op_st_T0_A0(s1, ot);
B
bellard 已提交
1450
        gen_op_update2_cc();
1451
        set_cc_op(s1, CC_OP_SUBB + ot);
B
bellard 已提交
1452 1453 1454
        break;
    default:
    case OP_ANDL:
B
bellard 已提交
1455
        tcg_gen_and_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
B
bellard 已提交
1456 1457 1458
        if (d != OR_TMP0)
            gen_op_mov_reg_T0(ot, d);
        else
1459
            gen_op_st_T0_A0(s1, ot);
B
bellard 已提交
1460
        gen_op_update1_cc();
1461
        set_cc_op(s1, CC_OP_LOGICB + ot);
B
bellard 已提交
1462
        break;
B
bellard 已提交
1463
    case OP_ORL:
B
bellard 已提交
1464
        tcg_gen_or_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
B
bellard 已提交
1465 1466 1467
        if (d != OR_TMP0)
            gen_op_mov_reg_T0(ot, d);
        else
1468
            gen_op_st_T0_A0(s1, ot);
B
bellard 已提交
1469
        gen_op_update1_cc();
1470
        set_cc_op(s1, CC_OP_LOGICB + ot);
B
bellard 已提交
1471
        break;
B
bellard 已提交
1472
    case OP_XORL:
B
bellard 已提交
1473
        tcg_gen_xor_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
B
bellard 已提交
1474 1475 1476
        if (d != OR_TMP0)
            gen_op_mov_reg_T0(ot, d);
        else
1477
            gen_op_st_T0_A0(s1, ot);
B
bellard 已提交
1478
        gen_op_update1_cc();
1479
        set_cc_op(s1, CC_OP_LOGICB + ot);
B
bellard 已提交
1480 1481
        break;
    case OP_CMPL:
1482
        tcg_gen_mov_tl(cpu_cc_src, cpu_T[1]);
1483
        tcg_gen_mov_tl(cpu_cc_srcT, cpu_T[0]);
1484
        tcg_gen_sub_tl(cpu_cc_dst, cpu_T[0], cpu_T[1]);
1485
        set_cc_op(s1, CC_OP_SUBB + ot);
B
bellard 已提交
1486 1487
        break;
    }
1488 1489
}

B
bellard 已提交
1490 1491 1492
/* if d == OR_TMP0, it means memory operand (address in A0) */
static void gen_inc(DisasContext *s1, int ot, int d, int c)
{
1493
    if (d != OR_TMP0) {
B
bellard 已提交
1494
        gen_op_mov_TN_reg(ot, 0, d);
1495 1496 1497
    } else {
        gen_op_ld_v(s1, ot, cpu_T[0], cpu_A0);
    }
1498
    gen_compute_eflags_c(s1, cpu_cc_src);
B
bellard 已提交
1499
    if (c > 0) {
1500
        tcg_gen_addi_tl(cpu_T[0], cpu_T[0], 1);
1501
        set_cc_op(s1, CC_OP_INCB + ot);
B
bellard 已提交
1502
    } else {
1503
        tcg_gen_addi_tl(cpu_T[0], cpu_T[0], -1);
1504
        set_cc_op(s1, CC_OP_DECB + ot);
B
bellard 已提交
1505 1506
    }
    if (d != OR_TMP0)
B
bellard 已提交
1507
        gen_op_mov_reg_T0(ot, d);
B
bellard 已提交
1508
    else
1509
        gen_op_st_T0_A0(s1, ot);
B
bellard 已提交
1510
    tcg_gen_mov_tl(cpu_cc_dst, cpu_T[0]);
B
bellard 已提交
1511 1512
}

1513 1514 1515 1516 1517 1518 1519 1520 1521 1522 1523 1524 1525 1526 1527 1528 1529 1530 1531 1532 1533 1534 1535 1536 1537 1538 1539 1540 1541 1542 1543 1544 1545 1546 1547 1548 1549 1550 1551 1552 1553 1554 1555 1556 1557
static void gen_shift_flags(DisasContext *s, int ot, TCGv result, TCGv shm1,
                            TCGv count, bool is_right)
{
    TCGv_i32 z32, s32, oldop;
    TCGv z_tl;

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

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

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

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

1558 1559
static void gen_shift_rm_T1(DisasContext *s, int ot, int op1, 
                            int is_right, int is_arith)
B
bellard 已提交
1560
{
1561
    target_ulong mask = (ot == MO_64 ? 0x3f : 0x1f);
1562

1563
    /* load */
1564
    if (op1 == OR_TMP0) {
1565
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1566
    } else {
1567
        gen_op_mov_TN_reg(ot, 0, op1);
1568
    }
1569

1570 1571
    tcg_gen_andi_tl(cpu_T[1], cpu_T[1], mask);
    tcg_gen_subi_tl(cpu_tmp0, cpu_T[1], 1);
1572 1573 1574

    if (is_right) {
        if (is_arith) {
B
bellard 已提交
1575
            gen_exts(ot, cpu_T[0]);
1576 1577
            tcg_gen_sar_tl(cpu_tmp0, cpu_T[0], cpu_tmp0);
            tcg_gen_sar_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1578
        } else {
B
bellard 已提交
1579
            gen_extu(ot, cpu_T[0]);
1580 1581
            tcg_gen_shr_tl(cpu_tmp0, cpu_T[0], cpu_tmp0);
            tcg_gen_shr_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1582 1583
        }
    } else {
1584 1585
        tcg_gen_shl_tl(cpu_tmp0, cpu_T[0], cpu_tmp0);
        tcg_gen_shl_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1586 1587 1588
    }

    /* store */
1589
    if (op1 == OR_TMP0) {
1590
        gen_op_st_T0_A0(s, ot);
1591
    } else {
1592
        gen_op_mov_reg_T0(ot, op1);
1593 1594
    }

1595
    gen_shift_flags(s, ot, cpu_T[0], cpu_tmp0, cpu_T[1], is_right);
1596 1597
}

B
bellard 已提交
1598 1599 1600
static void gen_shift_rm_im(DisasContext *s, int ot, int op1, int op2,
                            int is_right, int is_arith)
{
1601
    int mask = (ot == MO_64 ? 0x3f : 0x1f);
B
bellard 已提交
1602 1603 1604

    /* load */
    if (op1 == OR_TMP0)
1605
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
1606 1607 1608 1609 1610 1611 1612 1613
    else
        gen_op_mov_TN_reg(ot, 0, op1);

    op2 &= mask;
    if (op2 != 0) {
        if (is_right) {
            if (is_arith) {
                gen_exts(ot, cpu_T[0]);
B
bellard 已提交
1614
                tcg_gen_sari_tl(cpu_tmp4, cpu_T[0], op2 - 1);
B
bellard 已提交
1615 1616 1617
                tcg_gen_sari_tl(cpu_T[0], cpu_T[0], op2);
            } else {
                gen_extu(ot, cpu_T[0]);
B
bellard 已提交
1618
                tcg_gen_shri_tl(cpu_tmp4, cpu_T[0], op2 - 1);
B
bellard 已提交
1619 1620 1621
                tcg_gen_shri_tl(cpu_T[0], cpu_T[0], op2);
            }
        } else {
B
bellard 已提交
1622
            tcg_gen_shli_tl(cpu_tmp4, cpu_T[0], op2 - 1);
B
bellard 已提交
1623 1624 1625 1626 1627 1628
            tcg_gen_shli_tl(cpu_T[0], cpu_T[0], op2);
        }
    }

    /* store */
    if (op1 == OR_TMP0)
1629
        gen_op_st_T0_A0(s, ot);
B
bellard 已提交
1630 1631 1632 1633 1634
    else
        gen_op_mov_reg_T0(ot, op1);
        
    /* update eflags if non zero shift */
    if (op2 != 0) {
B
bellard 已提交
1635
        tcg_gen_mov_tl(cpu_cc_src, cpu_tmp4);
B
bellard 已提交
1636
        tcg_gen_mov_tl(cpu_cc_dst, cpu_T[0]);
1637
        set_cc_op(s, (is_right ? CC_OP_SARB : CC_OP_SHLB) + ot);
B
bellard 已提交
1638 1639 1640
    }
}

1641 1642 1643 1644 1645 1646 1647 1648
static inline void tcg_gen_lshift(TCGv ret, TCGv arg1, target_long arg2)
{
    if (arg2 >= 0)
        tcg_gen_shli_tl(ret, arg1, arg2);
    else
        tcg_gen_shri_tl(ret, arg1, -arg2);
}

1649
static void gen_rot_rm_T1(DisasContext *s, int ot, int op1, int is_right)
1650
{
1651
    target_ulong mask = (ot == MO_64 ? 0x3f : 0x1f);
1652
    TCGv_i32 t0, t1;
1653 1654

    /* load */
1655
    if (op1 == OR_TMP0) {
1656
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1657
    } else {
1658
        gen_op_mov_TN_reg(ot, 0, op1);
1659
    }
1660

1661
    tcg_gen_andi_tl(cpu_T[1], cpu_T[1], mask);
1662

1663
    switch (ot) {
1664
    case MO_8:
1665 1666 1667 1668
        /* 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;
1669
    case MO_16:
1670 1671 1672 1673 1674
        /* 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
1675
    case MO_32:
1676 1677 1678 1679 1680 1681 1682 1683 1684 1685 1686 1687 1688 1689 1690 1691 1692
        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;
1693 1694 1695
    }

    /* store */
1696
    if (op1 == OR_TMP0) {
1697
        gen_op_st_T0_A0(s, ot);
1698
    } else {
1699
        gen_op_mov_reg_T0(ot, op1);
1700
    }
1701

1702 1703
    /* We'll need the flags computed into CC_SRC.  */
    gen_compute_eflags(s);
1704

1705 1706 1707 1708
    /* 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.  */
1709
    if (is_right) {
1710 1711
        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 已提交
1712
        tcg_gen_andi_tl(cpu_cc_dst, cpu_cc_dst, 1);
1713 1714 1715
    } else {
        tcg_gen_shri_tl(cpu_cc_src2, cpu_T[0], mask);
        tcg_gen_andi_tl(cpu_cc_dst, cpu_T[0], 1);
1716
    }
1717 1718 1719 1720 1721 1722 1723 1724 1725 1726 1727 1728 1729 1730 1731 1732 1733 1734 1735
    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);
1736 1737
}

M
malc 已提交
1738 1739 1740
static void gen_rot_rm_im(DisasContext *s, int ot, int op1, int op2,
                          int is_right)
{
1741
    int mask = (ot == MO_64 ? 0x3f : 0x1f);
1742
    int shift;
M
malc 已提交
1743 1744 1745

    /* load */
    if (op1 == OR_TMP0) {
1746
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
M
malc 已提交
1747
    } else {
1748
        gen_op_mov_TN_reg(ot, 0, op1);
M
malc 已提交
1749 1750 1751 1752
    }

    op2 &= mask;
    if (op2 != 0) {
1753 1754
        switch (ot) {
#ifdef TARGET_X86_64
1755
        case MO_32:
1756 1757 1758 1759 1760 1761 1762 1763 1764 1765 1766 1767 1768 1769 1770 1771
            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;
1772
        case MO_8:
1773 1774
            mask = 7;
            goto do_shifts;
1775
        case MO_16:
1776 1777 1778 1779 1780 1781 1782 1783 1784 1785 1786
            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 已提交
1787 1788 1789 1790 1791
        }
    }

    /* store */
    if (op1 == OR_TMP0) {
1792
        gen_op_st_T0_A0(s, ot);
M
malc 已提交
1793
    } else {
1794
        gen_op_mov_reg_T0(ot, op1);
M
malc 已提交
1795 1796 1797
    }

    if (op2 != 0) {
1798
        /* Compute the flags into CC_SRC.  */
1799
        gen_compute_eflags(s);
1800

1801 1802 1803 1804
        /* 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 已提交
1805
        if (is_right) {
1806 1807
            tcg_gen_shri_tl(cpu_cc_src2, cpu_T[0], mask - 1);
            tcg_gen_shri_tl(cpu_cc_dst, cpu_T[0], mask);
1808
            tcg_gen_andi_tl(cpu_cc_dst, cpu_cc_dst, 1);
1809 1810 1811
        } 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 已提交
1812
        }
1813 1814 1815
        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 已提交
1816 1817 1818
    }
}

1819 1820 1821 1822
/* XXX: add faster immediate = 1 case */
static void gen_rotc_rm_T1(DisasContext *s, int ot, int op1, 
                           int is_right)
{
1823
    gen_compute_eflags(s);
1824
    assert(s->cc_op == CC_OP_EFLAGS);
1825 1826 1827

    /* load */
    if (op1 == OR_TMP0)
1828
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1829 1830 1831
    else
        gen_op_mov_TN_reg(ot, 0, op1);
    
P
pbrook 已提交
1832 1833
    if (is_right) {
        switch (ot) {
1834
        case MO_8:
1835 1836
            gen_helper_rcrb(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
1837
        case MO_16:
1838 1839
            gen_helper_rcrw(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
1840
        case MO_32:
1841 1842
            gen_helper_rcrl(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
P
pbrook 已提交
1843
#ifdef TARGET_X86_64
1844
        case MO_64:
1845 1846
            gen_helper_rcrq(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
P
pbrook 已提交
1847 1848 1849 1850
#endif
        }
    } else {
        switch (ot) {
1851
        case MO_8:
1852 1853
            gen_helper_rclb(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
1854
        case MO_16:
1855 1856
            gen_helper_rclw(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
1857
        case MO_32:
1858 1859
            gen_helper_rcll(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
P
pbrook 已提交
1860
#ifdef TARGET_X86_64
1861
        case MO_64:
1862 1863
            gen_helper_rclq(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
P
pbrook 已提交
1864 1865 1866
#endif
        }
    }
1867 1868
    /* store */
    if (op1 == OR_TMP0)
1869
        gen_op_st_T0_A0(s, ot);
1870 1871 1872 1873 1874
    else
        gen_op_mov_reg_T0(ot, op1);
}

/* XXX: add faster immediate case */
P
Paolo Bonzini 已提交
1875
static void gen_shiftd_rm_T1(DisasContext *s, int ot, int op1,
1876
                             bool is_right, TCGv count_in)
1877
{
1878
    target_ulong mask = (ot == MO_64 ? 63 : 31);
1879
    TCGv count;
1880 1881

    /* load */
1882
    if (op1 == OR_TMP0) {
1883
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1884
    } else {
1885
        gen_op_mov_TN_reg(ot, 0, op1);
1886
    }
1887

1888 1889
    count = tcg_temp_new();
    tcg_gen_andi_tl(count, count_in, mask);
1890

1891
    switch (ot) {
1892
    case MO_16:
1893 1894 1895
        /* 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.  */
1896
        if (is_right) {
1897 1898 1899
            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);
1900
        } else {
1901
            tcg_gen_deposit_tl(cpu_T[1], cpu_T[0], cpu_T[1], 16, 16);
1902
        }
1903 1904
        /* FALLTHRU */
#ifdef TARGET_X86_64
1905
    case MO_32:
1906 1907
        /* Concatenate the two 32-bit values and use a 64-bit shift.  */
        tcg_gen_subi_tl(cpu_tmp0, count, 1);
1908
        if (is_right) {
1909 1910 1911 1912 1913 1914 1915 1916 1917 1918 1919 1920 1921 1922 1923 1924
            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);
1925

1926 1927 1928
            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);
1929
        } else {
1930
            tcg_gen_shl_tl(cpu_tmp0, cpu_T[0], cpu_tmp0);
1931
            if (ot == MO_16) {
1932 1933 1934 1935 1936 1937 1938 1939 1940
                /* 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);
1941
        }
1942 1943 1944 1945 1946
        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;
1947 1948 1949
    }

    /* store */
1950
    if (op1 == OR_TMP0) {
1951
        gen_op_st_T0_A0(s, ot);
1952
    } else {
1953
        gen_op_mov_reg_T0(ot, op1);
1954
    }
1955

1956 1957
    gen_shift_flags(s, ot, cpu_T[0], cpu_tmp0, count, is_right);
    tcg_temp_free(count);
1958 1959 1960 1961 1962 1963 1964 1965 1966 1967 1968 1969 1970 1971 1972 1973 1974 1975 1976 1977 1978 1979 1980 1981 1982 1983 1984 1985 1986 1987
}

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

static void gen_shifti(DisasContext *s1, int op, int ot, int d, int c)
{
B
bellard 已提交
1992
    switch(op) {
M
malc 已提交
1993 1994 1995 1996 1997 1998
    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 已提交
1999 2000 2001 2002 2003 2004 2005 2006 2007 2008 2009 2010 2011 2012 2013 2014
    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 */
        gen_op_movl_T1_im(c);
        gen_shift(s1, op, ot, d, OR_TMP1);
        break;
    }
B
bellard 已提交
2015 2016
}

2017 2018
static void gen_lea_modrm(CPUX86State *env, DisasContext *s, int modrm,
                          int *reg_ptr, int *offset_ptr)
B
bellard 已提交
2019
{
B
bellard 已提交
2020
    target_long disp;
B
bellard 已提交
2021
    int havesib;
B
bellard 已提交
2022
    int base;
B
bellard 已提交
2023 2024 2025 2026
    int index;
    int scale;
    int opreg;
    int mod, rm, code, override, must_add_seg;
2027
    TCGv sum;
B
bellard 已提交
2028 2029 2030 2031 2032 2033 2034 2035 2036 2037 2038

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

    if (s->aflag) {
        havesib = 0;
        base = rm;
2039
        index = -1;
B
bellard 已提交
2040
        scale = 0;
2041

B
bellard 已提交
2042 2043
        if (base == 4) {
            havesib = 1;
2044
            code = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
2045
            scale = (code >> 6) & 3;
B
bellard 已提交
2046
            index = ((code >> 3) & 7) | REX_X(s);
2047 2048 2049
            if (index == 4) {
                index = -1;  /* no index */
            }
B
bellard 已提交
2050
            base = (code & 7);
B
bellard 已提交
2051
        }
B
bellard 已提交
2052
        base |= REX_B(s);
B
bellard 已提交
2053 2054 2055

        switch (mod) {
        case 0:
B
bellard 已提交
2056
            if ((base & 7) == 5) {
B
bellard 已提交
2057
                base = -1;
2058
                disp = (int32_t)cpu_ldl_code(env, s->pc);
B
bellard 已提交
2059
                s->pc += 4;
B
bellard 已提交
2060 2061 2062
                if (CODE64(s) && !havesib) {
                    disp += s->pc + s->rip_offset;
                }
B
bellard 已提交
2063 2064 2065 2066 2067
            } else {
                disp = 0;
            }
            break;
        case 1:
2068
            disp = (int8_t)cpu_ldub_code(env, s->pc++);
B
bellard 已提交
2069 2070 2071
            break;
        default:
        case 2:
2072
            disp = (int32_t)cpu_ldl_code(env, s->pc);
B
bellard 已提交
2073 2074 2075
            s->pc += 4;
            break;
        }
2076

2077 2078 2079 2080 2081 2082 2083 2084 2085 2086 2087 2088 2089
        /* 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 已提交
2090
            }
2091 2092 2093
            if (base >= 0) {
                tcg_gen_add_tl(cpu_A0, sum, cpu_regs[base]);
                sum = cpu_A0;
B
bellard 已提交
2094
            }
2095 2096
        } else if (base >= 0) {
            sum = cpu_regs[base];
B
bellard 已提交
2097
        }
2098 2099 2100 2101
        if (TCGV_IS_UNUSED(sum)) {
            tcg_gen_movi_tl(cpu_A0, disp);
        } else {
            tcg_gen_addi_tl(cpu_A0, sum, disp);
B
bellard 已提交
2102
        }
2103

B
bellard 已提交
2104 2105
        if (must_add_seg) {
            if (override < 0) {
2106
                if (base == R_EBP || base == R_ESP) {
B
bellard 已提交
2107
                    override = R_SS;
2108
                } else {
B
bellard 已提交
2109
                    override = R_DS;
2110
                }
B
bellard 已提交
2111
            }
2112 2113 2114 2115 2116 2117 2118 2119 2120

            tcg_gen_ld_tl(cpu_tmp0, cpu_env,
                          offsetof(CPUX86State, segs[override].base));
            if (CODE64(s)) {
                if (s->aflag != 2) {
                    tcg_gen_ext32u_tl(cpu_A0, cpu_A0);
                }
                tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_tmp0);
                goto done;
B
bellard 已提交
2121
            }
2122 2123 2124 2125 2126 2127

            tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_tmp0);
        }

        if (s->aflag != 2) {
            tcg_gen_ext32u_tl(cpu_A0, cpu_A0);
B
bellard 已提交
2128 2129 2130 2131 2132
        }
    } else {
        switch (mod) {
        case 0:
            if (rm == 6) {
2133
                disp = cpu_lduw_code(env, s->pc);
B
bellard 已提交
2134 2135 2136 2137 2138 2139 2140 2141 2142
                s->pc += 2;
                gen_op_movl_A0_im(disp);
                rm = 0; /* avoid SS override */
                goto no_rm;
            } else {
                disp = 0;
            }
            break;
        case 1:
2143
            disp = (int8_t)cpu_ldub_code(env, s->pc++);
B
bellard 已提交
2144 2145 2146
            break;
        default:
        case 2:
2147
            disp = cpu_lduw_code(env, s->pc);
B
bellard 已提交
2148 2149 2150 2151 2152
            s->pc += 2;
            break;
        }
        switch(rm) {
        case 0:
B
bellard 已提交
2153 2154
            gen_op_movl_A0_reg(R_EBX);
            gen_op_addl_A0_reg_sN(0, R_ESI);
B
bellard 已提交
2155 2156
            break;
        case 1:
B
bellard 已提交
2157 2158
            gen_op_movl_A0_reg(R_EBX);
            gen_op_addl_A0_reg_sN(0, R_EDI);
B
bellard 已提交
2159 2160
            break;
        case 2:
B
bellard 已提交
2161 2162
            gen_op_movl_A0_reg(R_EBP);
            gen_op_addl_A0_reg_sN(0, R_ESI);
B
bellard 已提交
2163 2164
            break;
        case 3:
B
bellard 已提交
2165 2166
            gen_op_movl_A0_reg(R_EBP);
            gen_op_addl_A0_reg_sN(0, R_EDI);
B
bellard 已提交
2167 2168
            break;
        case 4:
B
bellard 已提交
2169
            gen_op_movl_A0_reg(R_ESI);
B
bellard 已提交
2170 2171
            break;
        case 5:
B
bellard 已提交
2172
            gen_op_movl_A0_reg(R_EDI);
B
bellard 已提交
2173 2174
            break;
        case 6:
B
bellard 已提交
2175
            gen_op_movl_A0_reg(R_EBP);
B
bellard 已提交
2176 2177 2178
            break;
        default:
        case 7:
B
bellard 已提交
2179
            gen_op_movl_A0_reg(R_EBX);
B
bellard 已提交
2180 2181 2182 2183 2184 2185 2186 2187 2188 2189 2190 2191 2192
            break;
        }
        if (disp != 0)
            gen_op_addl_A0_im(disp);
        gen_op_andl_A0_ffff();
    no_rm:
        if (must_add_seg) {
            if (override < 0) {
                if (rm == 2 || rm == 3 || rm == 6)
                    override = R_SS;
                else
                    override = R_DS;
            }
2193
            gen_op_addl_A0_seg(s, override);
B
bellard 已提交
2194 2195 2196
        }
    }

2197
 done:
B
bellard 已提交
2198 2199 2200 2201 2202 2203
    opreg = OR_A0;
    disp = 0;
    *reg_ptr = opreg;
    *offset_ptr = disp;
}

2204
static void gen_nop_modrm(CPUX86State *env, DisasContext *s, int modrm)
B
bellard 已提交
2205 2206 2207 2208 2209 2210 2211 2212 2213 2214 2215
{
    int mod, rm, base, code;

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

    if (s->aflag) {

        base = rm;
2216

B
bellard 已提交
2217
        if (base == 4) {
2218
            code = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
2219 2220
            base = (code & 7);
        }
2221

B
bellard 已提交
2222 2223 2224 2225 2226 2227 2228 2229 2230 2231 2232 2233 2234 2235 2236 2237 2238 2239 2240 2241 2242 2243 2244 2245 2246 2247 2248 2249 2250 2251 2252 2253
        switch (mod) {
        case 0:
            if (base == 5) {
                s->pc += 4;
            }
            break;
        case 1:
            s->pc++;
            break;
        default:
        case 2:
            s->pc += 4;
            break;
        }
    } else {
        switch (mod) {
        case 0:
            if (rm == 6) {
                s->pc += 2;
            }
            break;
        case 1:
            s->pc++;
            break;
        default:
        case 2:
            s->pc += 2;
            break;
        }
    }
}

B
bellard 已提交
2254 2255 2256 2257 2258 2259 2260 2261 2262 2263 2264
/* 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) {
2265 2266
#ifdef TARGET_X86_64
        if (CODE64(s)) {
B
bellard 已提交
2267
            gen_op_addq_A0_seg(override);
2268
        } else
2269 2270
#endif
        {
2271
            gen_op_addl_A0_seg(s, override);
2272
        }
B
bellard 已提交
2273 2274 2275
    }
}

B
balrog 已提交
2276
/* generate modrm memory load or store of 'reg'. TMP0 is used if reg ==
B
bellard 已提交
2277
   OR_TMP0 */
2278 2279
static void gen_ldst_modrm(CPUX86State *env, DisasContext *s, int modrm,
                           int ot, int reg, int is_store)
B
bellard 已提交
2280 2281 2282 2283
{
    int mod, rm, opreg, disp;

    mod = (modrm >> 6) & 3;
B
bellard 已提交
2284
    rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
2285 2286 2287
    if (mod == 3) {
        if (is_store) {
            if (reg != OR_TMP0)
B
bellard 已提交
2288 2289
                gen_op_mov_TN_reg(ot, 0, reg);
            gen_op_mov_reg_T0(ot, rm);
B
bellard 已提交
2290
        } else {
B
bellard 已提交
2291
            gen_op_mov_TN_reg(ot, 0, rm);
B
bellard 已提交
2292
            if (reg != OR_TMP0)
B
bellard 已提交
2293
                gen_op_mov_reg_T0(ot, reg);
B
bellard 已提交
2294 2295
        }
    } else {
2296
        gen_lea_modrm(env, s, modrm, &opreg, &disp);
B
bellard 已提交
2297 2298
        if (is_store) {
            if (reg != OR_TMP0)
B
bellard 已提交
2299
                gen_op_mov_TN_reg(ot, 0, reg);
2300
            gen_op_st_T0_A0(s, ot);
B
bellard 已提交
2301
        } else {
2302
            gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
2303
            if (reg != OR_TMP0)
B
bellard 已提交
2304
                gen_op_mov_reg_T0(ot, reg);
B
bellard 已提交
2305 2306 2307 2308
        }
    }
}

2309
static inline uint32_t insn_get(CPUX86State *env, DisasContext *s, int ot)
B
bellard 已提交
2310 2311 2312 2313
{
    uint32_t ret;

    switch(ot) {
2314
    case MO_8:
2315
        ret = cpu_ldub_code(env, s->pc);
B
bellard 已提交
2316 2317
        s->pc++;
        break;
2318
    case MO_16:
2319
        ret = cpu_lduw_code(env, s->pc);
B
bellard 已提交
2320 2321 2322
        s->pc += 2;
        break;
    default:
2323
    case MO_32:
2324
        ret = cpu_ldl_code(env, s->pc);
B
bellard 已提交
2325 2326 2327 2328 2329 2330
        s->pc += 4;
        break;
    }
    return ret;
}

B
bellard 已提交
2331 2332
static inline int insn_const_size(unsigned int ot)
{
2333
    if (ot <= MO_32) {
B
bellard 已提交
2334
        return 1 << ot;
2335
    } else {
B
bellard 已提交
2336
        return 4;
2337
    }
B
bellard 已提交
2338 2339
}

2340 2341 2342 2343 2344 2345 2346 2347 2348 2349 2350
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 已提交
2351
        tcg_gen_goto_tb(tb_num);
2352
        gen_jmp_im(eip);
2353
        tcg_gen_exit_tb((uintptr_t)tb + tb_num);
2354 2355 2356 2357 2358 2359 2360
    } else {
        /* jump to another page: currently not optimized */
        gen_jmp_im(eip);
        gen_eob(s);
    }
}

2361
static inline void gen_jcc(DisasContext *s, int b,
B
bellard 已提交
2362
                           target_ulong val, target_ulong next_eip)
B
bellard 已提交
2363
{
2364
    int l1, l2;
2365

B
bellard 已提交
2366
    if (s->jmp_opt) {
B
bellard 已提交
2367
        l1 = gen_new_label();
2368
        gen_jcc1(s, b, l1);
2369

2370
        gen_goto_tb(s, 0, next_eip);
B
bellard 已提交
2371 2372

        gen_set_label(l1);
2373
        gen_goto_tb(s, 1, val);
J
Jun Koi 已提交
2374
        s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2375
    } else {
B
bellard 已提交
2376 2377
        l1 = gen_new_label();
        l2 = gen_new_label();
2378
        gen_jcc1(s, b, l1);
2379

B
bellard 已提交
2380
        gen_jmp_im(next_eip);
2381 2382
        tcg_gen_br(l2);

B
bellard 已提交
2383 2384 2385
        gen_set_label(l1);
        gen_jmp_im(val);
        gen_set_label(l2);
B
bellard 已提交
2386 2387 2388 2389
        gen_eob(s);
    }
}

2390 2391 2392
static void gen_cmovcc1(CPUX86State *env, DisasContext *s, int ot, int b,
                        int modrm, int reg)
{
2393
    CCPrepare cc;
2394

2395
    gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
2396

2397 2398 2399 2400 2401 2402 2403 2404
    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);
2405 2406
    }

2407 2408 2409 2410 2411 2412 2413 2414 2415 2416
    tcg_gen_movcond_tl(cc.cond, cpu_T[0], cc.reg, cc.reg2,
                       cpu_T[0], cpu_regs[reg]);
    gen_op_mov_reg_T0(ot, reg);

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

2419 2420 2421 2422 2423 2424 2425 2426 2427 2428 2429 2430 2431 2432 2433 2434
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 已提交
2435 2436
/* move T0 to seg_reg and compute if the CPU state may change. Never
   call this function with seg_reg == R_CS */
B
bellard 已提交
2437
static void gen_movl_seg_T0(DisasContext *s, int seg_reg, target_ulong cur_eip)
B
bellard 已提交
2438
{
2439 2440
    if (s->pe && !s->vm86) {
        /* XXX: optimize by finding processor state dynamically */
2441
        gen_update_cc_op(s);
B
bellard 已提交
2442
        gen_jmp_im(cur_eip);
2443
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
2444
        gen_helper_load_seg(cpu_env, tcg_const_i32(seg_reg), cpu_tmp2_i32);
B
bellard 已提交
2445 2446 2447 2448 2449
        /* 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 已提交
2450
            s->is_jmp = DISAS_TB_JUMP;
2451
    } else {
2452
        gen_op_movl_seg_T0_vm(seg_reg);
B
bellard 已提交
2453
        if (seg_reg == R_SS)
J
Jun Koi 已提交
2454
            s->is_jmp = DISAS_TB_JUMP;
2455
    }
B
bellard 已提交
2456 2457
}

T
ths 已提交
2458 2459 2460 2461 2462
static inline int svm_is_rep(int prefixes)
{
    return ((prefixes & (PREFIX_REPZ | PREFIX_REPNZ)) ? 8 : 0);
}

B
bellard 已提交
2463
static inline void
T
ths 已提交
2464
gen_svm_check_intercept_param(DisasContext *s, target_ulong pc_start,
2465
                              uint32_t type, uint64_t param)
T
ths 已提交
2466
{
B
bellard 已提交
2467 2468 2469
    /* no SVM activated; fast case */
    if (likely(!(s->flags & HF_SVMI_MASK)))
        return;
2470
    gen_update_cc_op(s);
B
bellard 已提交
2471
    gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
2472
    gen_helper_svm_check_intercept_param(cpu_env, tcg_const_i32(type),
P
pbrook 已提交
2473
                                         tcg_const_i64(param));
T
ths 已提交
2474 2475
}

B
bellard 已提交
2476
static inline void
T
ths 已提交
2477 2478
gen_svm_check_intercept(DisasContext *s, target_ulong pc_start, uint64_t type)
{
B
bellard 已提交
2479
    gen_svm_check_intercept_param(s, pc_start, type, 0);
T
ths 已提交
2480 2481
}

2482 2483
static inline void gen_stack_update(DisasContext *s, int addend)
{
B
bellard 已提交
2484 2485
#ifdef TARGET_X86_64
    if (CODE64(s)) {
2486
        gen_op_add_reg_im(2, R_ESP, addend);
B
bellard 已提交
2487 2488
    } else
#endif
2489
    if (s->ss32) {
2490
        gen_op_add_reg_im(1, R_ESP, addend);
2491
    } else {
2492
        gen_op_add_reg_im(0, R_ESP, addend);
2493 2494 2495
    }
}

B
bellard 已提交
2496 2497 2498
/* generate a push. It depends on ss32, addseg and dflag */
static void gen_push_T0(DisasContext *s)
{
B
bellard 已提交
2499 2500
#ifdef TARGET_X86_64
    if (CODE64(s)) {
B
bellard 已提交
2501
        gen_op_movq_A0_reg(R_ESP);
2502
        if (s->dflag) {
B
bellard 已提交
2503
            gen_op_addq_A0_im(-8);
2504
            gen_op_st_T0_A0(s, MO_64);
2505
        } else {
B
bellard 已提交
2506
            gen_op_addq_A0_im(-2);
2507
            gen_op_st_T0_A0(s, MO_16);
2508
        }
B
bellard 已提交
2509
        gen_op_mov_reg_A0(2, R_ESP);
2510
    } else
B
bellard 已提交
2511 2512
#endif
    {
B
bellard 已提交
2513
        gen_op_movl_A0_reg(R_ESP);
B
bellard 已提交
2514
        if (!s->dflag)
B
bellard 已提交
2515
            gen_op_addl_A0_im(-2);
B
bellard 已提交
2516
        else
B
bellard 已提交
2517
            gen_op_addl_A0_im(-4);
B
bellard 已提交
2518 2519
        if (s->ss32) {
            if (s->addseg) {
2520
                tcg_gen_mov_tl(cpu_T[1], cpu_A0);
2521
                gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2522 2523 2524
            }
        } else {
            gen_op_andl_A0_ffff();
2525
            tcg_gen_mov_tl(cpu_T[1], cpu_A0);
2526
            gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2527
        }
2528
        gen_op_st_T0_A0(s, s->dflag + 1);
B
bellard 已提交
2529
        if (s->ss32 && !s->addseg)
B
bellard 已提交
2530
            gen_op_mov_reg_A0(1, R_ESP);
B
bellard 已提交
2531
        else
B
bellard 已提交
2532
            gen_op_mov_reg_T1(s->ss32 + 1, R_ESP);
B
bellard 已提交
2533 2534 2535
    }
}

2536 2537 2538
/* generate a push. It depends on ss32, addseg and dflag */
/* slower version for T1, only used for call Ev */
static void gen_push_T1(DisasContext *s)
B
bellard 已提交
2539
{
B
bellard 已提交
2540 2541
#ifdef TARGET_X86_64
    if (CODE64(s)) {
B
bellard 已提交
2542
        gen_op_movq_A0_reg(R_ESP);
2543
        if (s->dflag) {
B
bellard 已提交
2544
            gen_op_addq_A0_im(-8);
2545
            gen_op_st_T1_A0(s, MO_64);
2546
        } else {
B
bellard 已提交
2547
            gen_op_addq_A0_im(-2);
2548
            gen_op_st_T0_A0(s, MO_16);
2549
        }
B
bellard 已提交
2550
        gen_op_mov_reg_A0(2, R_ESP);
2551
    } else
B
bellard 已提交
2552 2553
#endif
    {
B
bellard 已提交
2554
        gen_op_movl_A0_reg(R_ESP);
B
bellard 已提交
2555
        if (!s->dflag)
B
bellard 已提交
2556
            gen_op_addl_A0_im(-2);
B
bellard 已提交
2557
        else
B
bellard 已提交
2558
            gen_op_addl_A0_im(-4);
B
bellard 已提交
2559 2560
        if (s->ss32) {
            if (s->addseg) {
2561
                gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2562 2563 2564
            }
        } else {
            gen_op_andl_A0_ffff();
2565
            gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2566
        }
2567
        gen_op_st_T1_A0(s, s->dflag + 1);
2568

B
bellard 已提交
2569
        if (s->ss32 && !s->addseg)
B
bellard 已提交
2570
            gen_op_mov_reg_A0(1, R_ESP);
B
bellard 已提交
2571 2572
        else
            gen_stack_update(s, (-2) << s->dflag);
B
bellard 已提交
2573 2574 2575
    }
}

2576 2577
/* two step pop is necessary for precise exceptions */
static void gen_pop_T0(DisasContext *s)
B
bellard 已提交
2578
{
B
bellard 已提交
2579 2580
#ifdef TARGET_X86_64
    if (CODE64(s)) {
B
bellard 已提交
2581
        gen_op_movq_A0_reg(R_ESP);
2582
        gen_op_ld_v(s, s->dflag ? MO_64 : MO_16, cpu_T[0], cpu_A0);
2583
    } else
B
bellard 已提交
2584 2585
#endif
    {
B
bellard 已提交
2586
        gen_op_movl_A0_reg(R_ESP);
B
bellard 已提交
2587 2588
        if (s->ss32) {
            if (s->addseg)
2589
                gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2590 2591
        } else {
            gen_op_andl_A0_ffff();
2592
            gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2593
        }
2594
        gen_op_ld_v(s, s->dflag + 1, cpu_T[0], cpu_A0);
B
bellard 已提交
2595 2596 2597 2598 2599
    }
}

static void gen_pop_update(DisasContext *s)
{
B
bellard 已提交
2600
#ifdef TARGET_X86_64
2601
    if (CODE64(s) && s->dflag) {
B
bellard 已提交
2602 2603 2604 2605 2606 2607
        gen_stack_update(s, 8);
    } else
#endif
    {
        gen_stack_update(s, 2 << s->dflag);
    }
B
bellard 已提交
2608 2609 2610 2611
}

static void gen_stack_A0(DisasContext *s)
{
B
bellard 已提交
2612
    gen_op_movl_A0_reg(R_ESP);
B
bellard 已提交
2613 2614
    if (!s->ss32)
        gen_op_andl_A0_ffff();
2615
    tcg_gen_mov_tl(cpu_T[1], cpu_A0);
B
bellard 已提交
2616
    if (s->addseg)
2617
        gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2618 2619 2620 2621 2622 2623
}

/* NOTE: wrap around in 16 bit not fully handled */
static void gen_pusha(DisasContext *s)
{
    int i;
B
bellard 已提交
2624
    gen_op_movl_A0_reg(R_ESP);
B
bellard 已提交
2625 2626 2627
    gen_op_addl_A0_im(-16 <<  s->dflag);
    if (!s->ss32)
        gen_op_andl_A0_ffff();
2628
    tcg_gen_mov_tl(cpu_T[1], cpu_A0);
B
bellard 已提交
2629
    if (s->addseg)
2630
        gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2631
    for(i = 0;i < 8; i++) {
2632 2633
        gen_op_mov_TN_reg(MO_32, 0, 7 - i);
        gen_op_st_T0_A0(s, MO_16 + s->dflag);
B
bellard 已提交
2634 2635
        gen_op_addl_A0_im(2 <<  s->dflag);
    }
2636
    gen_op_mov_reg_T1(MO_16 + s->ss32, R_ESP);
B
bellard 已提交
2637 2638 2639 2640 2641 2642
}

/* NOTE: wrap around in 16 bit not fully handled */
static void gen_popa(DisasContext *s)
{
    int i;
B
bellard 已提交
2643
    gen_op_movl_A0_reg(R_ESP);
B
bellard 已提交
2644 2645
    if (!s->ss32)
        gen_op_andl_A0_ffff();
2646 2647
    tcg_gen_mov_tl(cpu_T[1], cpu_A0);
    tcg_gen_addi_tl(cpu_T[1], cpu_T[1], 16 <<  s->dflag);
B
bellard 已提交
2648
    if (s->addseg)
2649
        gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2650 2651 2652
    for(i = 0;i < 8; i++) {
        /* ESP is not reloaded */
        if (i != 3) {
2653
            gen_op_ld_v(s, MO_16 + s->dflag, cpu_T[0], cpu_A0);
2654
            gen_op_mov_reg_T0(MO_16 + s->dflag, 7 - i);
B
bellard 已提交
2655 2656 2657
        }
        gen_op_addl_A0_im(2 <<  s->dflag);
    }
2658
    gen_op_mov_reg_T1(MO_16 + s->ss32, R_ESP);
B
bellard 已提交
2659 2660 2661 2662
}

static void gen_enter(DisasContext *s, int esp_addend, int level)
{
B
bellard 已提交
2663
    int ot, opsize;
B
bellard 已提交
2664 2665

    level &= 0x1f;
2666 2667
#ifdef TARGET_X86_64
    if (CODE64(s)) {
2668
        ot = s->dflag ? MO_64 : MO_16;
2669
        opsize = 1 << ot;
2670

B
bellard 已提交
2671
        gen_op_movl_A0_reg(R_ESP);
2672
        gen_op_addq_A0_im(-opsize);
2673
        tcg_gen_mov_tl(cpu_T[1], cpu_A0);
2674 2675

        /* push bp */
2676
        gen_op_mov_TN_reg(MO_32, 0, R_EBP);
2677
        gen_op_st_T0_A0(s, ot);
2678
        if (level) {
B
bellard 已提交
2679
            /* XXX: must save state */
2680
            gen_helper_enter64_level(cpu_env, tcg_const_i32(level),
2681
                                     tcg_const_i32((ot == MO_64)),
P
pbrook 已提交
2682
                                     cpu_T[1]);
2683
        }
B
bellard 已提交
2684
        gen_op_mov_reg_T1(ot, R_EBP);
2685
        tcg_gen_addi_tl(cpu_T[1], cpu_T[1], -esp_addend + (-opsize * level));
2686
        gen_op_mov_reg_T1(MO_64, R_ESP);
2687
    } else
2688 2689
#endif
    {
2690
        ot = s->dflag + MO_16;
2691
        opsize = 2 << s->dflag;
2692

B
bellard 已提交
2693
        gen_op_movl_A0_reg(R_ESP);
2694 2695 2696
        gen_op_addl_A0_im(-opsize);
        if (!s->ss32)
            gen_op_andl_A0_ffff();
2697
        tcg_gen_mov_tl(cpu_T[1], cpu_A0);
2698
        if (s->addseg)
2699
            gen_op_addl_A0_seg(s, R_SS);
2700
        /* push bp */
2701
        gen_op_mov_TN_reg(MO_32, 0, R_EBP);
2702
        gen_op_st_T0_A0(s, ot);
2703
        if (level) {
B
bellard 已提交
2704
            /* XXX: must save state */
2705
            gen_helper_enter_level(cpu_env, tcg_const_i32(level),
P
pbrook 已提交
2706 2707
                                   tcg_const_i32(s->dflag),
                                   cpu_T[1]);
2708
        }
B
bellard 已提交
2709
        gen_op_mov_reg_T1(ot, R_EBP);
2710
        tcg_gen_addi_tl(cpu_T[1], cpu_T[1], -esp_addend + (-opsize * level));
2711
        gen_op_mov_reg_T1(MO_16 + s->ss32, R_ESP);
B
bellard 已提交
2712 2713 2714
    }
}

B
bellard 已提交
2715
static void gen_exception(DisasContext *s, int trapno, target_ulong cur_eip)
B
bellard 已提交
2716
{
2717
    gen_update_cc_op(s);
B
bellard 已提交
2718
    gen_jmp_im(cur_eip);
B
Blue Swirl 已提交
2719
    gen_helper_raise_exception(cpu_env, tcg_const_i32(trapno));
J
Jun Koi 已提交
2720
    s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2721 2722 2723
}

/* an interrupt is different from an exception because of the
B
blueswir1 已提交
2724
   privilege checks */
2725
static void gen_interrupt(DisasContext *s, int intno,
B
bellard 已提交
2726
                          target_ulong cur_eip, target_ulong next_eip)
B
bellard 已提交
2727
{
2728
    gen_update_cc_op(s);
B
bellard 已提交
2729
    gen_jmp_im(cur_eip);
B
Blue Swirl 已提交
2730
    gen_helper_raise_interrupt(cpu_env, tcg_const_i32(intno),
P
pbrook 已提交
2731
                               tcg_const_i32(next_eip - cur_eip));
J
Jun Koi 已提交
2732
    s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2733 2734
}

B
bellard 已提交
2735
static void gen_debug(DisasContext *s, target_ulong cur_eip)
B
bellard 已提交
2736
{
2737
    gen_update_cc_op(s);
B
bellard 已提交
2738
    gen_jmp_im(cur_eip);
B
Blue Swirl 已提交
2739
    gen_helper_debug(cpu_env);
J
Jun Koi 已提交
2740
    s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2741 2742 2743 2744 2745 2746
}

/* generate a generic end of block. Trace exception is also generated
   if needed */
static void gen_eob(DisasContext *s)
{
2747
    gen_update_cc_op(s);
2748
    if (s->tb->flags & HF_INHIBIT_IRQ_MASK) {
2749
        gen_helper_reset_inhibit_irq(cpu_env);
2750
    }
J
Jan Kiszka 已提交
2751
    if (s->tb->flags & HF_RF_MASK) {
2752
        gen_helper_reset_rf(cpu_env);
J
Jan Kiszka 已提交
2753
    }
2754
    if (s->singlestep_enabled) {
B
Blue Swirl 已提交
2755
        gen_helper_debug(cpu_env);
2756
    } else if (s->tf) {
B
Blue Swirl 已提交
2757
        gen_helper_single_step(cpu_env);
B
bellard 已提交
2758
    } else {
B
bellard 已提交
2759
        tcg_gen_exit_tb(0);
B
bellard 已提交
2760
    }
J
Jun Koi 已提交
2761
    s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2762 2763 2764 2765
}

/* generate a jump to eip. No segment change must happen before as a
   direct call to the next block may occur */
B
bellard 已提交
2766
static void gen_jmp_tb(DisasContext *s, target_ulong eip, int tb_num)
B
bellard 已提交
2767
{
2768 2769
    gen_update_cc_op(s);
    set_cc_op(s, CC_OP_DYNAMIC);
B
bellard 已提交
2770
    if (s->jmp_opt) {
2771
        gen_goto_tb(s, tb_num, eip);
J
Jun Koi 已提交
2772
        s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2773
    } else {
B
bellard 已提交
2774
        gen_jmp_im(eip);
B
bellard 已提交
2775 2776 2777 2778
        gen_eob(s);
    }
}

B
bellard 已提交
2779 2780 2781 2782 2783
static void gen_jmp(DisasContext *s, target_ulong eip)
{
    gen_jmp_tb(s, eip, 0);
}

2784
static inline void gen_ldq_env_A0(DisasContext *s, int offset)
B
bellard 已提交
2785
{
2786
    tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0, s->mem_index, MO_LEQ);
2787
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, offset);
B
bellard 已提交
2788
}
B
bellard 已提交
2789

2790
static inline void gen_stq_env_A0(DisasContext *s, int offset)
B
bellard 已提交
2791
{
2792
    tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env, offset);
2793
    tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0, s->mem_index, MO_LEQ);
B
bellard 已提交
2794
}
B
bellard 已提交
2795

2796
static inline void gen_ldo_env_A0(DisasContext *s, int offset)
B
bellard 已提交
2797
{
2798
    int mem_index = s->mem_index;
2799
    tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0, mem_index, MO_LEQ);
2800
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, offset + offsetof(XMMReg, XMM_Q(0)));
B
bellard 已提交
2801
    tcg_gen_addi_tl(cpu_tmp0, cpu_A0, 8);
2802
    tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_tmp0, mem_index, MO_LEQ);
2803
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, offset + offsetof(XMMReg, XMM_Q(1)));
B
bellard 已提交
2804
}
B
bellard 已提交
2805

2806
static inline void gen_sto_env_A0(DisasContext *s, int offset)
B
bellard 已提交
2807
{
2808
    int mem_index = s->mem_index;
2809
    tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env, offset + offsetof(XMMReg, XMM_Q(0)));
2810
    tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0, mem_index, MO_LEQ);
B
bellard 已提交
2811
    tcg_gen_addi_tl(cpu_tmp0, cpu_A0, 8);
2812
    tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env, offset + offsetof(XMMReg, XMM_Q(1)));
2813
    tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_tmp0, mem_index, MO_LEQ);
B
bellard 已提交
2814
}
B
bellard 已提交
2815

B
bellard 已提交
2816 2817
static inline void gen_op_movo(int d_offset, int s_offset)
{
2818 2819 2820 2821
    tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env, s_offset);
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, d_offset);
    tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env, s_offset + 8);
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, d_offset + 8);
B
bellard 已提交
2822 2823 2824 2825
}

static inline void gen_op_movq(int d_offset, int s_offset)
{
2826 2827
    tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env, s_offset);
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, d_offset);
B
bellard 已提交
2828 2829 2830 2831
}

static inline void gen_op_movl(int d_offset, int s_offset)
{
2832 2833
    tcg_gen_ld_i32(cpu_tmp2_i32, cpu_env, s_offset);
    tcg_gen_st_i32(cpu_tmp2_i32, cpu_env, d_offset);
B
bellard 已提交
2834 2835 2836 2837
}

static inline void gen_op_movq_env_0(int d_offset)
{
2838 2839
    tcg_gen_movi_i64(cpu_tmp1_i64, 0);
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, d_offset);
B
bellard 已提交
2840
}
B
bellard 已提交
2841

B
Blue Swirl 已提交
2842 2843 2844 2845 2846 2847 2848
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 已提交
2849
typedef void (*SSEFunc_0_ppi)(TCGv_ptr reg_a, TCGv_ptr reg_b, TCGv_i32 val);
B
Blue Swirl 已提交
2850 2851
typedef void (*SSEFunc_0_eppt)(TCGv_ptr env, TCGv_ptr reg_a, TCGv_ptr reg_b,
                               TCGv val);
B
Blue Swirl 已提交
2852

B
bellard 已提交
2853 2854
#define SSE_SPECIAL ((void *)1)
#define SSE_DUMMY ((void *)2)
B
bellard 已提交
2855

P
pbrook 已提交
2856 2857 2858
#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 已提交
2859

B
Blue Swirl 已提交
2860
static const SSEFunc_0_epp sse_op_table1[256][4] = {
A
aurel32 已提交
2861 2862 2863
    /* 3DNow! extensions */
    [0x0e] = { SSE_DUMMY }, /* femms */
    [0x0f] = { SSE_DUMMY }, /* pf... */
B
bellard 已提交
2864 2865 2866
    /* 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 已提交
2867
    [0x12] = { SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL }, /* movlps, movlpd, movsldup, movddup */
B
bellard 已提交
2868
    [0x13] = { SSE_SPECIAL, SSE_SPECIAL },  /* movlps, movlpd */
P
pbrook 已提交
2869 2870
    [0x14] = { gen_helper_punpckldq_xmm, gen_helper_punpcklqdq_xmm },
    [0x15] = { gen_helper_punpckhdq_xmm, gen_helper_punpckhqdq_xmm },
B
bellard 已提交
2871 2872 2873 2874 2875 2876
    [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 */
2877
    [0x2b] = { SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL }, /* movntps, movntpd, movntss, movntsd */
B
bellard 已提交
2878 2879
    [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 已提交
2880 2881
    [0x2e] = { gen_helper_ucomiss, gen_helper_ucomisd },
    [0x2f] = { gen_helper_comiss, gen_helper_comisd },
B
bellard 已提交
2882 2883
    [0x50] = { SSE_SPECIAL, SSE_SPECIAL }, /* movmskps, movmskpd */
    [0x51] = SSE_FOP(sqrt),
P
pbrook 已提交
2884 2885 2886 2887 2888 2889
    [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 已提交
2890 2891
    [0x58] = SSE_FOP(add),
    [0x59] = SSE_FOP(mul),
P
pbrook 已提交
2892 2893 2894
    [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 已提交
2895 2896 2897 2898 2899 2900
    [0x5c] = SSE_FOP(sub),
    [0x5d] = SSE_FOP(min),
    [0x5e] = SSE_FOP(div),
    [0x5f] = SSE_FOP(max),

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

R
Richard Henderson 已提交
2904 2905 2906
    /* 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 已提交
2907

B
bellard 已提交
2908 2909 2910 2911 2912 2913 2914 2915 2916 2917 2918 2919 2920
    /* 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 已提交
2921 2922
    [0x6c] = { NULL, gen_helper_punpcklqdq_xmm },
    [0x6d] = { NULL, gen_helper_punpckhqdq_xmm },
B
bellard 已提交
2923 2924
    [0x6e] = { SSE_SPECIAL, SSE_SPECIAL }, /* movd mm, ea */
    [0x6f] = { SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL }, /* movq, movdqa, , movqdu */
B
Blue Swirl 已提交
2925 2926 2927 2928
    [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 已提交
2929 2930 2931 2932 2933 2934
    [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 已提交
2935
    [0x77] = { SSE_DUMMY }, /* emms */
2936 2937
    [0x78] = { NULL, SSE_SPECIAL, NULL, SSE_SPECIAL }, /* extrq_i, insertq_i */
    [0x79] = { NULL, gen_helper_extrq_r, NULL, gen_helper_insertq_r },
P
pbrook 已提交
2938 2939
    [0x7c] = { NULL, gen_helper_haddpd, NULL, gen_helper_haddps },
    [0x7d] = { NULL, gen_helper_hsubpd, NULL, gen_helper_hsubps },
B
bellard 已提交
2940 2941 2942 2943
    [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 已提交
2944
    [0xd0] = { NULL, gen_helper_addsubpd, NULL, gen_helper_addsubps },
B
bellard 已提交
2945 2946 2947 2948 2949 2950 2951 2952 2953 2954 2955 2956 2957 2958 2959 2960 2961 2962 2963 2964 2965
    [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 已提交
2966
    [0xe6] = { NULL, gen_helper_cvttpd2dq, gen_helper_cvtdq2pd, gen_helper_cvtpd2dq },
B
bellard 已提交
2967 2968 2969 2970 2971 2972 2973 2974 2975
    [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 已提交
2976
    [0xf0] = { NULL, NULL, NULL, SSE_SPECIAL }, /* lddqu */
B
bellard 已提交
2977 2978 2979 2980 2981 2982
    [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 已提交
2983 2984
    [0xf7] = { (SSEFunc_0_epp)gen_helper_maskmov_mmx,
               (SSEFunc_0_epp)gen_helper_maskmov_xmm }, /* XXX: casts */
B
bellard 已提交
2985 2986 2987 2988 2989 2990 2991 2992 2993
    [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 已提交
2994
static const SSEFunc_0_epp sse_op_table2[3 * 8][2] = {
B
bellard 已提交
2995 2996 2997 2998 2999 3000 3001
    [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 已提交
3002
    [16 + 3] = { NULL, gen_helper_psrldq_xmm },
B
bellard 已提交
3003
    [16 + 6] = MMX_OP2(psllq),
P
pbrook 已提交
3004
    [16 + 7] = { NULL, gen_helper_pslldq_xmm },
B
bellard 已提交
3005 3006
};

B
Blue Swirl 已提交
3007
static const SSEFunc_0_epi sse_op_table3ai[] = {
P
pbrook 已提交
3008
    gen_helper_cvtsi2ss,
3009
    gen_helper_cvtsi2sd
B
Blue Swirl 已提交
3010
};
P
pbrook 已提交
3011

3012
#ifdef TARGET_X86_64
B
Blue Swirl 已提交
3013
static const SSEFunc_0_epl sse_op_table3aq[] = {
3014 3015 3016 3017 3018
    gen_helper_cvtsq2ss,
    gen_helper_cvtsq2sd
};
#endif

B
Blue Swirl 已提交
3019
static const SSEFunc_i_ep sse_op_table3bi[] = {
P
pbrook 已提交
3020 3021
    gen_helper_cvttss2si,
    gen_helper_cvtss2si,
3022
    gen_helper_cvttsd2si,
3023
    gen_helper_cvtsd2si
B
bellard 已提交
3024
};
3025

3026
#ifdef TARGET_X86_64
B
Blue Swirl 已提交
3027
static const SSEFunc_l_ep sse_op_table3bq[] = {
3028 3029
    gen_helper_cvttss2sq,
    gen_helper_cvtss2sq,
3030
    gen_helper_cvttsd2sq,
3031 3032 3033 3034
    gen_helper_cvtsd2sq
};
#endif

B
Blue Swirl 已提交
3035
static const SSEFunc_0_epp sse_op_table4[8][4] = {
B
bellard 已提交
3036 3037 3038 3039 3040 3041 3042 3043 3044
    SSE_FOP(cmpeq),
    SSE_FOP(cmplt),
    SSE_FOP(cmple),
    SSE_FOP(cmpunord),
    SSE_FOP(cmpneq),
    SSE_FOP(cmpnlt),
    SSE_FOP(cmpnle),
    SSE_FOP(cmpord),
};
3045

B
Blue Swirl 已提交
3046
static const SSEFunc_0_epp sse_op_table5[256] = {
P
pbrook 已提交
3047 3048 3049 3050 3051 3052 3053 3054 3055 3056 3057 3058 3059 3060 3061 3062 3063 3064 3065 3066 3067 3068 3069 3070
    [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 已提交
3071 3072
};

B
Blue Swirl 已提交
3073 3074
struct SSEOpHelper_epp {
    SSEFunc_0_epp op[2];
B
Blue Swirl 已提交
3075 3076 3077
    uint32_t ext_mask;
};

B
Blue Swirl 已提交
3078 3079
struct SSEOpHelper_eppi {
    SSEFunc_0_eppi op[2];
B
Blue Swirl 已提交
3080
    uint32_t ext_mask;
B
balrog 已提交
3081
};
B
Blue Swirl 已提交
3082

B
balrog 已提交
3083
#define SSSE3_OP(x) { MMX_OP2(x), CPUID_EXT_SSSE3 }
P
pbrook 已提交
3084 3085
#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 已提交
3086
#define SSE41_SPECIAL { { NULL, SSE_SPECIAL }, CPUID_EXT_SSE41 }
3087 3088
#define PCLMULQDQ_OP(x) { { NULL, gen_helper_ ## x ## _xmm }, \
        CPUID_EXT_PCLMULQDQ }
3089
#define AESNI_OP(x) { { NULL, gen_helper_ ## x ## _xmm }, CPUID_EXT_AES }
B
Blue Swirl 已提交
3090

B
Blue Swirl 已提交
3091
static const struct SSEOpHelper_epp sse_op_table6[256] = {
B
balrog 已提交
3092 3093 3094 3095 3096 3097 3098 3099 3100 3101 3102 3103 3104 3105 3106 3107 3108 3109 3110 3111 3112 3113 3114 3115 3116 3117 3118 3119 3120 3121 3122 3123 3124 3125 3126 3127 3128 3129 3130 3131 3132 3133 3134 3135 3136 3137
    [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),
3138 3139 3140 3141 3142
    [0xdb] = AESNI_OP(aesimc),
    [0xdc] = AESNI_OP(aesenc),
    [0xdd] = AESNI_OP(aesenclast),
    [0xde] = AESNI_OP(aesdec),
    [0xdf] = AESNI_OP(aesdeclast),
B
balrog 已提交
3143 3144
};

B
Blue Swirl 已提交
3145
static const struct SSEOpHelper_eppi sse_op_table7[256] = {
B
balrog 已提交
3146 3147 3148 3149 3150 3151 3152 3153 3154 3155 3156 3157 3158 3159 3160 3161 3162 3163
    [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),
3164
    [0x44] = PCLMULQDQ_OP(pclmulqdq),
B
balrog 已提交
3165 3166 3167 3168
    [0x60] = SSE42_OP(pcmpestrm),
    [0x61] = SSE42_OP(pcmpestri),
    [0x62] = SSE42_OP(pcmpistrm),
    [0x63] = SSE42_OP(pcmpistri),
3169
    [0xdf] = AESNI_OP(aeskeygenassist),
B
balrog 已提交
3170 3171
};

3172 3173
static void gen_sse(CPUX86State *env, DisasContext *s, int b,
                    target_ulong pc_start, int rex_r)
B
bellard 已提交
3174 3175 3176
{
    int b1, op1_offset, op2_offset, is_xmm, val, ot;
    int modrm, mod, rm, reg, reg_addr, offset_addr;
B
Blue Swirl 已提交
3177 3178
    SSEFunc_0_epp sse_fn_epp;
    SSEFunc_0_eppi sse_fn_eppi;
B
Blue Swirl 已提交
3179
    SSEFunc_0_ppi sse_fn_ppi;
B
Blue Swirl 已提交
3180
    SSEFunc_0_eppt sse_fn_eppt;
B
bellard 已提交
3181 3182

    b &= 0xff;
3183
    if (s->prefix & PREFIX_DATA)
B
bellard 已提交
3184
        b1 = 1;
3185
    else if (s->prefix & PREFIX_REPZ)
B
bellard 已提交
3186
        b1 = 2;
3187
    else if (s->prefix & PREFIX_REPNZ)
B
bellard 已提交
3188 3189 3190
        b1 = 3;
    else
        b1 = 0;
B
Blue Swirl 已提交
3191 3192
    sse_fn_epp = sse_op_table1[b][b1];
    if (!sse_fn_epp) {
B
bellard 已提交
3193
        goto illegal_op;
B
Blue Swirl 已提交
3194
    }
A
aurel32 已提交
3195
    if ((b <= 0x5f && b >= 0x10) || b == 0xc6 || b == 0xc2) {
B
bellard 已提交
3196 3197 3198 3199 3200 3201 3202 3203 3204 3205 3206 3207 3208 3209 3210 3211 3212 3213 3214 3215
        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 已提交
3216 3217
        if ((b != 0x38 && b != 0x3a) || (s->prefix & PREFIX_DATA))
            goto illegal_op;
3218 3219 3220 3221
    if (b == 0x0e) {
        if (!(s->cpuid_ext2_features & CPUID_EXT2_3DNOW))
            goto illegal_op;
        /* femms */
B
Blue Swirl 已提交
3222
        gen_helper_emms(cpu_env);
3223 3224 3225 3226
        return;
    }
    if (b == 0x77) {
        /* emms */
B
Blue Swirl 已提交
3227
        gen_helper_emms(cpu_env);
B
bellard 已提交
3228 3229 3230 3231 3232
        return;
    }
    /* prepare MMX state (XXX: optimize by storing fptt and fptags in
       the static cpu state) */
    if (!is_xmm) {
B
Blue Swirl 已提交
3233
        gen_helper_enter_mmx(cpu_env);
B
bellard 已提交
3234 3235
    }

3236
    modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
3237 3238 3239 3240
    reg = ((modrm >> 3) & 7);
    if (is_xmm)
        reg |= rex_r;
    mod = (modrm >> 6) & 3;
B
Blue Swirl 已提交
3241
    if (sse_fn_epp == SSE_SPECIAL) {
B
bellard 已提交
3242 3243 3244
        b |= (b1 << 8);
        switch(b) {
        case 0x0e7: /* movntq */
3245
            if (mod == 3)
B
bellard 已提交
3246
                goto illegal_op;
3247
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3248
            gen_stq_env_A0(s, offsetof(CPUX86State, fpregs[reg].mmx));
B
bellard 已提交
3249 3250 3251 3252
            break;
        case 0x1e7: /* movntdq */
        case 0x02b: /* movntps */
        case 0x12b: /* movntps */
3253 3254
            if (mod == 3)
                goto illegal_op;
3255
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3256
            gen_sto_env_A0(s, offsetof(CPUX86State, xmm_regs[reg]));
3257
            break;
B
bellard 已提交
3258 3259
        case 0x3f0: /* lddqu */
            if (mod == 3)
B
bellard 已提交
3260
                goto illegal_op;
3261
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3262
            gen_ldo_env_A0(s, offsetof(CPUX86State, xmm_regs[reg]));
B
bellard 已提交
3263
            break;
3264 3265 3266 3267
        case 0x22b: /* movntss */
        case 0x32b: /* movntsd */
            if (mod == 3)
                goto illegal_op;
3268
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3269
            if (b1 & 1) {
3270
                gen_stq_env_A0(s, offsetof(CPUX86State, xmm_regs[reg]));
3271 3272 3273
            } else {
                tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,
                    xmm_regs[reg].XMM_L(0)));
3274
                gen_op_st_T0_A0(s, MO_32);
3275 3276
            }
            break;
B
bellard 已提交
3277
        case 0x6e: /* movd mm, ea */
B
bellard 已提交
3278 3279
#ifdef TARGET_X86_64
            if (s->dflag == 2) {
3280
                gen_ldst_modrm(env, s, modrm, MO_64, OR_TMP0, 0);
B
bellard 已提交
3281
                tcg_gen_st_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,fpregs[reg].mmx));
3282
            } else
B
bellard 已提交
3283 3284
#endif
            {
3285
                gen_ldst_modrm(env, s, modrm, MO_32, OR_TMP0, 0);
B
bellard 已提交
3286 3287
                tcg_gen_addi_ptr(cpu_ptr0, cpu_env, 
                                 offsetof(CPUX86State,fpregs[reg].mmx));
P
pbrook 已提交
3288 3289
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
                gen_helper_movl_mm_T0_mmx(cpu_ptr0, cpu_tmp2_i32);
B
bellard 已提交
3290
            }
B
bellard 已提交
3291 3292
            break;
        case 0x16e: /* movd xmm, ea */
B
bellard 已提交
3293 3294
#ifdef TARGET_X86_64
            if (s->dflag == 2) {
3295
                gen_ldst_modrm(env, s, modrm, MO_64, OR_TMP0, 0);
B
bellard 已提交
3296 3297
                tcg_gen_addi_ptr(cpu_ptr0, cpu_env, 
                                 offsetof(CPUX86State,xmm_regs[reg]));
P
pbrook 已提交
3298
                gen_helper_movq_mm_T0_xmm(cpu_ptr0, cpu_T[0]);
3299
            } else
B
bellard 已提交
3300 3301
#endif
            {
3302
                gen_ldst_modrm(env, s, modrm, MO_32, OR_TMP0, 0);
B
bellard 已提交
3303 3304
                tcg_gen_addi_ptr(cpu_ptr0, cpu_env, 
                                 offsetof(CPUX86State,xmm_regs[reg]));
3305
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
P
pbrook 已提交
3306
                gen_helper_movl_mm_T0_xmm(cpu_ptr0, cpu_tmp2_i32);
B
bellard 已提交
3307
            }
B
bellard 已提交
3308 3309 3310
            break;
        case 0x6f: /* movq mm, ea */
            if (mod != 3) {
3311
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3312
                gen_ldq_env_A0(s, offsetof(CPUX86State, fpregs[reg].mmx));
B
bellard 已提交
3313 3314
            } else {
                rm = (modrm & 7);
3315
                tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env,
B
bellard 已提交
3316
                               offsetof(CPUX86State,fpregs[rm].mmx));
3317
                tcg_gen_st_i64(cpu_tmp1_i64, cpu_env,
B
bellard 已提交
3318
                               offsetof(CPUX86State,fpregs[reg].mmx));
B
bellard 已提交
3319 3320 3321 3322 3323 3324 3325 3326 3327
            }
            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) {
3328
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3329
                gen_ldo_env_A0(s, offsetof(CPUX86State, xmm_regs[reg]));
B
bellard 已提交
3330 3331 3332 3333 3334 3335 3336 3337
            } 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) {
3338
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3339
                gen_op_ld_v(s, MO_32, cpu_T[0], cpu_A0);
B
bellard 已提交
3340
                tcg_gen_st32_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,xmm_regs[reg].XMM_L(0)));
B
bellard 已提交
3341
                gen_op_movl_T0_0();
B
bellard 已提交
3342 3343 3344
                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 已提交
3345 3346 3347 3348 3349 3350 3351 3352
            } 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) {
3353
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3354 3355
                gen_ldq_env_A0(s, offsetof(CPUX86State,
                                           xmm_regs[reg].XMM_Q(0)));
B
bellard 已提交
3356
                gen_op_movl_T0_0();
B
bellard 已提交
3357 3358
                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 已提交
3359 3360 3361 3362 3363 3364 3365 3366 3367
            } 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) {
3368
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3369 3370
                gen_ldq_env_A0(s, offsetof(CPUX86State,
                                           xmm_regs[reg].XMM_Q(0)));
B
bellard 已提交
3371 3372 3373 3374 3375 3376 3377
            } 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 已提交
3378 3379
        case 0x212: /* movsldup */
            if (mod != 3) {
3380
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3381
                gen_ldo_env_A0(s, offsetof(CPUX86State, xmm_regs[reg]));
B
bellard 已提交
3382 3383 3384 3385 3386 3387 3388 3389 3390 3391 3392 3393 3394 3395
            } 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) {
3396
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3397 3398
                gen_ldq_env_A0(s, offsetof(CPUX86State,
                                           xmm_regs[reg].XMM_Q(0)));
B
bellard 已提交
3399 3400 3401 3402 3403 3404
            } 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 已提交
3405
                        offsetof(CPUX86State,xmm_regs[reg].XMM_Q(0)));
B
bellard 已提交
3406
            break;
B
bellard 已提交
3407 3408 3409
        case 0x016: /* movhps */
        case 0x116: /* movhpd */
            if (mod != 3) {
3410
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3411 3412
                gen_ldq_env_A0(s, offsetof(CPUX86State,
                                           xmm_regs[reg].XMM_Q(1)));
B
bellard 已提交
3413 3414 3415 3416 3417 3418 3419 3420 3421
            } 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) {
3422
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3423
                gen_ldo_env_A0(s, offsetof(CPUX86State, xmm_regs[reg]));
B
bellard 已提交
3424 3425 3426 3427 3428 3429 3430 3431 3432 3433 3434 3435
            } 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;
3436 3437 3438 3439 3440 3441 3442
        case 0x178:
        case 0x378:
            {
                int bit_index, field_length;

                if (b1 == 1 && reg != 0)
                    goto illegal_op;
3443 3444
                field_length = cpu_ldub_code(env, s->pc++) & 0x3F;
                bit_index = cpu_ldub_code(env, s->pc++) & 0x3F;
3445 3446 3447
                tcg_gen_addi_ptr(cpu_ptr0, cpu_env,
                    offsetof(CPUX86State,xmm_regs[reg]));
                if (b1 == 1)
B
Blue Swirl 已提交
3448 3449 3450
                    gen_helper_extrq_i(cpu_env, cpu_ptr0,
                                       tcg_const_i32(bit_index),
                                       tcg_const_i32(field_length));
3451
                else
B
Blue Swirl 已提交
3452 3453 3454
                    gen_helper_insertq_i(cpu_env, cpu_ptr0,
                                         tcg_const_i32(bit_index),
                                         tcg_const_i32(field_length));
3455 3456
            }
            break;
B
bellard 已提交
3457
        case 0x7e: /* movd ea, mm */
B
bellard 已提交
3458 3459
#ifdef TARGET_X86_64
            if (s->dflag == 2) {
B
bellard 已提交
3460 3461
                tcg_gen_ld_i64(cpu_T[0], cpu_env, 
                               offsetof(CPUX86State,fpregs[reg].mmx));
3462
                gen_ldst_modrm(env, s, modrm, MO_64, OR_TMP0, 1);
3463
            } else
B
bellard 已提交
3464 3465
#endif
            {
B
bellard 已提交
3466 3467
                tcg_gen_ld32u_tl(cpu_T[0], cpu_env, 
                                 offsetof(CPUX86State,fpregs[reg].mmx.MMX_L(0)));
3468
                gen_ldst_modrm(env, s, modrm, MO_32, OR_TMP0, 1);
B
bellard 已提交
3469
            }
B
bellard 已提交
3470 3471
            break;
        case 0x17e: /* movd ea, xmm */
B
bellard 已提交
3472 3473
#ifdef TARGET_X86_64
            if (s->dflag == 2) {
B
bellard 已提交
3474 3475
                tcg_gen_ld_i64(cpu_T[0], cpu_env, 
                               offsetof(CPUX86State,xmm_regs[reg].XMM_Q(0)));
3476
                gen_ldst_modrm(env, s, modrm, MO_64, OR_TMP0, 1);
3477
            } else
B
bellard 已提交
3478 3479
#endif
            {
B
bellard 已提交
3480 3481
                tcg_gen_ld32u_tl(cpu_T[0], cpu_env, 
                                 offsetof(CPUX86State,xmm_regs[reg].XMM_L(0)));
3482
                gen_ldst_modrm(env, s, modrm, MO_32, OR_TMP0, 1);
B
bellard 已提交
3483
            }
B
bellard 已提交
3484 3485 3486
            break;
        case 0x27e: /* movq xmm, ea */
            if (mod != 3) {
3487
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3488 3489
                gen_ldq_env_A0(s, offsetof(CPUX86State,
                                           xmm_regs[reg].XMM_Q(0)));
B
bellard 已提交
3490 3491 3492 3493 3494 3495 3496 3497 3498
            } 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) {
3499
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3500
                gen_stq_env_A0(s, offsetof(CPUX86State, fpregs[reg].mmx));
B
bellard 已提交
3501 3502 3503 3504 3505 3506 3507 3508 3509 3510 3511 3512 3513
            } 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) {
3514
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3515
                gen_sto_env_A0(s, offsetof(CPUX86State, xmm_regs[reg]));
B
bellard 已提交
3516 3517 3518 3519 3520 3521 3522 3523
            } 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) {
3524
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
3525
                tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,xmm_regs[reg].XMM_L(0)));
3526
                gen_op_st_T0_A0(s, MO_32);
B
bellard 已提交
3527 3528 3529 3530 3531 3532 3533 3534
            } 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) {
3535
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3536 3537
                gen_stq_env_A0(s, offsetof(CPUX86State,
                                           xmm_regs[reg].XMM_Q(0)));
B
bellard 已提交
3538 3539 3540 3541 3542 3543 3544 3545 3546
            } 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) {
3547
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3548 3549
                gen_stq_env_A0(s, offsetof(CPUX86State,
                                           xmm_regs[reg].XMM_Q(0)));
B
bellard 已提交
3550 3551 3552 3553 3554 3555 3556
            } else {
                goto illegal_op;
            }
            break;
        case 0x017: /* movhps */
        case 0x117: /* movhpd */
            if (mod != 3) {
3557
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3558 3559
                gen_stq_env_A0(s, offsetof(CPUX86State,
                                           xmm_regs[reg].XMM_Q(1)));
B
bellard 已提交
3560 3561 3562 3563 3564 3565 3566 3567 3568 3569
            } else {
                goto illegal_op;
            }
            break;
        case 0x71: /* shift mm, im */
        case 0x72:
        case 0x73:
        case 0x171: /* shift xmm, im */
        case 0x172:
        case 0x173:
3570 3571 3572
            if (b1 >= 2) {
	        goto illegal_op;
            }
3573
            val = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
3574 3575
            if (is_xmm) {
                gen_op_movl_T0_im(val);
B
bellard 已提交
3576
                tcg_gen_st32_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,xmm_t0.XMM_L(0)));
B
bellard 已提交
3577
                gen_op_movl_T0_0();
B
bellard 已提交
3578
                tcg_gen_st32_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,xmm_t0.XMM_L(1)));
B
bellard 已提交
3579 3580 3581
                op1_offset = offsetof(CPUX86State,xmm_t0);
            } else {
                gen_op_movl_T0_im(val);
B
bellard 已提交
3582
                tcg_gen_st32_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,mmx_t0.MMX_L(0)));
B
bellard 已提交
3583
                gen_op_movl_T0_0();
B
bellard 已提交
3584
                tcg_gen_st32_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,mmx_t0.MMX_L(1)));
B
bellard 已提交
3585 3586
                op1_offset = offsetof(CPUX86State,mmx_t0);
            }
B
Blue Swirl 已提交
3587 3588 3589
            sse_fn_epp = sse_op_table2[((b - 1) & 3) * 8 +
                                       (((modrm >> 3)) & 7)][b1];
            if (!sse_fn_epp) {
B
bellard 已提交
3590
                goto illegal_op;
B
Blue Swirl 已提交
3591
            }
B
bellard 已提交
3592 3593 3594 3595 3596 3597 3598
            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 已提交
3599 3600
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op2_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op1_offset);
B
Blue Swirl 已提交
3601
            sse_fn_epp(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
3602 3603 3604
            break;
        case 0x050: /* movmskps */
            rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
3605 3606
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, 
                             offsetof(CPUX86State,xmm_regs[rm]));
B
Blue Swirl 已提交
3607
            gen_helper_movmskps(cpu_tmp2_i32, cpu_env, cpu_ptr0);
3608
            tcg_gen_extu_i32_tl(cpu_T[0], cpu_tmp2_i32);
3609
            gen_op_mov_reg_T0(MO_32, reg);
B
bellard 已提交
3610 3611 3612
            break;
        case 0x150: /* movmskpd */
            rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
3613 3614
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, 
                             offsetof(CPUX86State,xmm_regs[rm]));
B
Blue Swirl 已提交
3615
            gen_helper_movmskpd(cpu_tmp2_i32, cpu_env, cpu_ptr0);
3616
            tcg_gen_extu_i32_tl(cpu_T[0], cpu_tmp2_i32);
3617
            gen_op_mov_reg_T0(MO_32, reg);
B
bellard 已提交
3618 3619 3620
            break;
        case 0x02a: /* cvtpi2ps */
        case 0x12a: /* cvtpi2pd */
B
Blue Swirl 已提交
3621
            gen_helper_enter_mmx(cpu_env);
B
bellard 已提交
3622
            if (mod != 3) {
3623
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
3624
                op2_offset = offsetof(CPUX86State,mmx_t0);
3625
                gen_ldq_env_A0(s, op2_offset);
B
bellard 已提交
3626 3627 3628 3629 3630
            } else {
                rm = (modrm & 7);
                op2_offset = offsetof(CPUX86State,fpregs[rm].mmx);
            }
            op1_offset = offsetof(CPUX86State,xmm_regs[reg]);
B
bellard 已提交
3631 3632
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
bellard 已提交
3633 3634
            switch(b >> 8) {
            case 0x0:
B
Blue Swirl 已提交
3635
                gen_helper_cvtpi2ps(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
3636 3637 3638
                break;
            default:
            case 0x1:
B
Blue Swirl 已提交
3639
                gen_helper_cvtpi2pd(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
3640 3641 3642 3643 3644
                break;
            }
            break;
        case 0x22a: /* cvtsi2ss */
        case 0x32a: /* cvtsi2sd */
3645
            ot = (s->dflag == 2) ? MO_64 : MO_32;
3646
            gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
B
bellard 已提交
3647
            op1_offset = offsetof(CPUX86State,xmm_regs[reg]);
B
bellard 已提交
3648
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
3649
            if (ot == MO_32) {
B
Blue Swirl 已提交
3650
                SSEFunc_0_epi sse_fn_epi = sse_op_table3ai[(b >> 8) & 1];
B
bellard 已提交
3651
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
B
Blue Swirl 已提交
3652
                sse_fn_epi(cpu_env, cpu_ptr0, cpu_tmp2_i32);
B
bellard 已提交
3653
            } else {
3654
#ifdef TARGET_X86_64
B
Blue Swirl 已提交
3655 3656
                SSEFunc_0_epl sse_fn_epl = sse_op_table3aq[(b >> 8) & 1];
                sse_fn_epl(cpu_env, cpu_ptr0, cpu_T[0]);
3657 3658 3659
#else
                goto illegal_op;
#endif
B
bellard 已提交
3660
            }
B
bellard 已提交
3661 3662 3663 3664 3665
            break;
        case 0x02c: /* cvttps2pi */
        case 0x12c: /* cvttpd2pi */
        case 0x02d: /* cvtps2pi */
        case 0x12d: /* cvtpd2pi */
B
Blue Swirl 已提交
3666
            gen_helper_enter_mmx(cpu_env);
B
bellard 已提交
3667
            if (mod != 3) {
3668
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
3669
                op2_offset = offsetof(CPUX86State,xmm_t0);
3670
                gen_ldo_env_A0(s, op2_offset);
B
bellard 已提交
3671 3672 3673 3674 3675
            } else {
                rm = (modrm & 7) | REX_B(s);
                op2_offset = offsetof(CPUX86State,xmm_regs[rm]);
            }
            op1_offset = offsetof(CPUX86State,fpregs[reg & 7].mmx);
B
bellard 已提交
3676 3677
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
bellard 已提交
3678 3679
            switch(b) {
            case 0x02c:
B
Blue Swirl 已提交
3680
                gen_helper_cvttps2pi(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
3681 3682
                break;
            case 0x12c:
B
Blue Swirl 已提交
3683
                gen_helper_cvttpd2pi(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
3684 3685
                break;
            case 0x02d:
B
Blue Swirl 已提交
3686
                gen_helper_cvtps2pi(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
3687 3688
                break;
            case 0x12d:
B
Blue Swirl 已提交
3689
                gen_helper_cvtpd2pi(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
3690 3691 3692 3693 3694 3695 3696
                break;
            }
            break;
        case 0x22c: /* cvttss2si */
        case 0x32c: /* cvttsd2si */
        case 0x22d: /* cvtss2si */
        case 0x32d: /* cvtsd2si */
3697
            ot = (s->dflag == 2) ? MO_64 : MO_32;
B
bellard 已提交
3698
            if (mod != 3) {
3699
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
3700
                if ((b >> 8) & 1) {
3701
                    gen_ldq_env_A0(s, offsetof(CPUX86State, xmm_t0.XMM_Q(0)));
B
bellard 已提交
3702
                } else {
3703
                    gen_op_ld_v(s, MO_32, cpu_T[0], cpu_A0);
B
bellard 已提交
3704
                    tcg_gen_st32_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,xmm_t0.XMM_L(0)));
B
bellard 已提交
3705 3706 3707 3708 3709 3710
                }
                op2_offset = offsetof(CPUX86State,xmm_t0);
            } else {
                rm = (modrm & 7) | REX_B(s);
                op2_offset = offsetof(CPUX86State,xmm_regs[rm]);
            }
B
bellard 已提交
3711
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op2_offset);
3712
            if (ot == MO_32) {
B
Blue Swirl 已提交
3713
                SSEFunc_i_ep sse_fn_i_ep =
3714
                    sse_op_table3bi[((b >> 7) & 2) | (b & 1)];
B
Blue Swirl 已提交
3715
                sse_fn_i_ep(cpu_tmp2_i32, cpu_env, cpu_ptr0);
3716
                tcg_gen_extu_i32_tl(cpu_T[0], cpu_tmp2_i32);
B
bellard 已提交
3717
            } else {
3718
#ifdef TARGET_X86_64
B
Blue Swirl 已提交
3719
                SSEFunc_l_ep sse_fn_l_ep =
3720
                    sse_op_table3bq[((b >> 7) & 2) | (b & 1)];
B
Blue Swirl 已提交
3721
                sse_fn_l_ep(cpu_T[0], cpu_env, cpu_ptr0);
3722 3723 3724
#else
                goto illegal_op;
#endif
B
bellard 已提交
3725
            }
B
bellard 已提交
3726
            gen_op_mov_reg_T0(ot, reg);
B
bellard 已提交
3727 3728
            break;
        case 0xc4: /* pinsrw */
3729
        case 0x1c4:
B
bellard 已提交
3730
            s->rip_offset = 1;
3731
            gen_ldst_modrm(env, s, modrm, MO_16, OR_TMP0, 0);
3732
            val = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
3733 3734
            if (b1) {
                val &= 7;
B
bellard 已提交
3735 3736
                tcg_gen_st16_tl(cpu_T[0], cpu_env,
                                offsetof(CPUX86State,xmm_regs[reg].XMM_W(val)));
B
bellard 已提交
3737 3738
            } else {
                val &= 3;
B
bellard 已提交
3739 3740
                tcg_gen_st16_tl(cpu_T[0], cpu_env,
                                offsetof(CPUX86State,fpregs[reg].mmx.MMX_W(val)));
B
bellard 已提交
3741 3742 3743
            }
            break;
        case 0xc5: /* pextrw */
3744
        case 0x1c5:
B
bellard 已提交
3745 3746
            if (mod != 3)
                goto illegal_op;
3747
            ot = (s->dflag == 2) ? MO_64 : MO_32;
3748
            val = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
3749 3750 3751
            if (b1) {
                val &= 7;
                rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
3752 3753
                tcg_gen_ld16u_tl(cpu_T[0], cpu_env,
                                 offsetof(CPUX86State,xmm_regs[rm].XMM_W(val)));
B
bellard 已提交
3754 3755 3756
            } else {
                val &= 3;
                rm = (modrm & 7);
B
bellard 已提交
3757 3758
                tcg_gen_ld16u_tl(cpu_T[0], cpu_env,
                                offsetof(CPUX86State,fpregs[rm].mmx.MMX_W(val)));
B
bellard 已提交
3759 3760
            }
            reg = ((modrm >> 3) & 7) | rex_r;
3761
            gen_op_mov_reg_T0(ot, reg);
B
bellard 已提交
3762 3763 3764
            break;
        case 0x1d6: /* movq ea, xmm */
            if (mod != 3) {
3765
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3766 3767
                gen_stq_env_A0(s, offsetof(CPUX86State,
                                           xmm_regs[reg].XMM_Q(0)));
B
bellard 已提交
3768 3769 3770 3771 3772 3773 3774 3775
            } 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 已提交
3776
            gen_helper_enter_mmx(cpu_env);
3777 3778 3779 3780
            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 已提交
3781 3782
            break;
        case 0x3d6: /* movdq2q */
B
Blue Swirl 已提交
3783
            gen_helper_enter_mmx(cpu_env);
3784 3785 3786
            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 已提交
3787 3788 3789 3790 3791 3792 3793
            break;
        case 0xd7: /* pmovmskb */
        case 0x1d7:
            if (mod != 3)
                goto illegal_op;
            if (b1) {
                rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
3794
                tcg_gen_addi_ptr(cpu_ptr0, cpu_env, offsetof(CPUX86State,xmm_regs[rm]));
B
Blue Swirl 已提交
3795
                gen_helper_pmovmskb_xmm(cpu_tmp2_i32, cpu_env, cpu_ptr0);
B
bellard 已提交
3796 3797
            } else {
                rm = (modrm & 7);
B
bellard 已提交
3798
                tcg_gen_addi_ptr(cpu_ptr0, cpu_env, offsetof(CPUX86State,fpregs[rm].mmx));
B
Blue Swirl 已提交
3799
                gen_helper_pmovmskb_mmx(cpu_tmp2_i32, cpu_env, cpu_ptr0);
B
bellard 已提交
3800
            }
3801
            tcg_gen_extu_i32_tl(cpu_T[0], cpu_tmp2_i32);
B
bellard 已提交
3802
            reg = ((modrm >> 3) & 7) | rex_r;
3803
            gen_op_mov_reg_T0(MO_32, reg);
B
bellard 已提交
3804
            break;
R
Richard Henderson 已提交
3805

B
balrog 已提交
3806
        case 0x138:
3807
        case 0x038:
B
balrog 已提交
3808
            b = modrm;
R
Richard Henderson 已提交
3809 3810 3811
            if ((b & 0xf0) == 0xf0) {
                goto do_0f_38_fx;
            }
3812
            modrm = cpu_ldub_code(env, s->pc++);
B
balrog 已提交
3813 3814 3815
            rm = modrm & 7;
            reg = ((modrm >> 3) & 7) | rex_r;
            mod = (modrm >> 6) & 3;
3816 3817 3818
            if (b1 >= 2) {
                goto illegal_op;
            }
B
balrog 已提交
3819

B
Blue Swirl 已提交
3820 3821
            sse_fn_epp = sse_op_table6[b].op[b1];
            if (!sse_fn_epp) {
B
balrog 已提交
3822
                goto illegal_op;
B
Blue Swirl 已提交
3823
            }
B
balrog 已提交
3824 3825
            if (!(s->cpuid_ext_features & sse_op_table6[b].ext_mask))
                goto illegal_op;
B
balrog 已提交
3826 3827 3828 3829 3830 3831 3832

            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);
3833
                    gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
balrog 已提交
3834 3835 3836 3837
                    switch (b) {
                    case 0x20: case 0x30: /* pmovsxbw, pmovzxbw */
                    case 0x23: case 0x33: /* pmovsxwd, pmovzxwd */
                    case 0x25: case 0x35: /* pmovsxdq, pmovzxdq */
3838
                        gen_ldq_env_A0(s, op2_offset +
B
balrog 已提交
3839 3840 3841 3842
                                        offsetof(XMMReg, XMM_Q(0)));
                        break;
                    case 0x21: case 0x31: /* pmovsxbd, pmovzxbd */
                    case 0x24: case 0x34: /* pmovsxwq, pmovzxwq */
3843 3844
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
B
balrog 已提交
3845 3846 3847 3848
                        tcg_gen_st_i32(cpu_tmp2_i32, cpu_env, op2_offset +
                                        offsetof(XMMReg, XMM_L(0)));
                        break;
                    case 0x22: case 0x32: /* pmovsxbq, pmovzxbq */
3849 3850
                        tcg_gen_qemu_ld_tl(cpu_tmp0, cpu_A0,
                                           s->mem_index, MO_LEUW);
B
balrog 已提交
3851 3852 3853 3854
                        tcg_gen_st16_tl(cpu_tmp0, cpu_env, op2_offset +
                                        offsetof(XMMReg, XMM_W(0)));
                        break;
                    case 0x2a:            /* movntqda */
3855
                        gen_ldo_env_A0(s, op1_offset);
B
balrog 已提交
3856 3857
                        return;
                    default:
3858
                        gen_ldo_env_A0(s, op2_offset);
B
balrog 已提交
3859
                    }
B
balrog 已提交
3860 3861 3862 3863 3864 3865 3866
                }
            } 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);
3867
                    gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3868
                    gen_ldq_env_A0(s, op2_offset);
B
balrog 已提交
3869 3870
                }
            }
B
Blue Swirl 已提交
3871
            if (sse_fn_epp == SSE_SPECIAL) {
B
balrog 已提交
3872
                goto illegal_op;
B
Blue Swirl 已提交
3873
            }
B
balrog 已提交
3874

B
balrog 已提交
3875 3876
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
3877
            sse_fn_epp(cpu_env, cpu_ptr0, cpu_ptr1);
B
balrog 已提交
3878

3879 3880 3881
            if (b == 0x17) {
                set_cc_op(s, CC_OP_EFLAGS);
            }
B
balrog 已提交
3882
            break;
R
Richard Henderson 已提交
3883 3884 3885 3886 3887 3888

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

R
Richard Henderson 已提交
3892 3893 3894 3895 3896 3897 3898 3899
            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) {
3900
                    ot = MO_8;
R
Richard Henderson 已提交
3901
                } else if (s->dflag != 2) {
3902
                    ot = (s->prefix & PREFIX_DATA ? MO_16 : MO_32);
R
Richard Henderson 已提交
3903
                } else {
3904
                    ot = MO_64;
R
Richard Henderson 已提交
3905
                }
B
balrog 已提交
3906

3907
                gen_op_mov_TN_reg(MO_32, 0, reg);
R
Richard Henderson 已提交
3908 3909 3910 3911
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
                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 已提交
3912

3913
                ot = (s->dflag == 2) ? MO_64 : MO_32;
R
Richard Henderson 已提交
3914 3915
                gen_op_mov_reg_T0(ot, reg);
                break;
B
balrog 已提交
3916

R
Richard Henderson 已提交
3917 3918 3919 3920 3921 3922 3923 3924 3925 3926 3927 3928 3929 3930 3931
            case 0x1f0: /* crc32 or movbe */
            case 0x1f1:
                /* For these insns, the f3 prefix is supposed to have priority
                   over the 66 prefix, but that's not what we implement above
                   setting b1.  */
                if (s->prefix & PREFIX_REPNZ) {
                    goto do_crc32;
                }
                /* FALLTHRU */
            case 0x0f0: /* movbe Gy,My */
            case 0x0f1: /* movbe My,Gy */
                if (!(s->cpuid_ext_features & CPUID_EXT_MOVBE)) {
                    goto illegal_op;
                }
                if (s->dflag != 2) {
3932
                    ot = (s->prefix & PREFIX_DATA ? MO_16 : MO_32);
R
Richard Henderson 已提交
3933
                } else {
3934
                    ot = MO_64;
R
Richard Henderson 已提交
3935 3936 3937 3938 3939 3940 3941 3942 3943 3944
                }

                /* Load the data incoming to the bswap.  Note that the TCG
                   implementation of bswap requires the input be zero
                   extended.  In the case of the loads, we simply know that
                   gen_op_ld_v via gen_ldst_modrm does that already.  */
                if ((b & 1) == 0) {
                    gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
                } else {
                    switch (ot) {
3945
                    case MO_16:
R
Richard Henderson 已提交
3946 3947 3948 3949 3950
                        tcg_gen_ext16u_tl(cpu_T[0], cpu_regs[reg]);
                        break;
                    default:
                        tcg_gen_ext32u_tl(cpu_T[0], cpu_regs[reg]);
                        break;
3951
                    case MO_64:
R
Richard Henderson 已提交
3952 3953 3954 3955 3956 3957
                        tcg_gen_mov_tl(cpu_T[0], cpu_regs[reg]);
                        break;
                    }
                }

                switch (ot) {
3958
                case MO_16:
R
Richard Henderson 已提交
3959 3960 3961 3962 3963 3964
                    tcg_gen_bswap16_tl(cpu_T[0], cpu_T[0]);
                    break;
                default:
                    tcg_gen_bswap32_tl(cpu_T[0], cpu_T[0]);
                    break;
#ifdef TARGET_X86_64
3965
                case MO_64:
R
Richard Henderson 已提交
3966 3967 3968 3969 3970 3971 3972 3973 3974 3975 3976 3977
                    tcg_gen_bswap64_tl(cpu_T[0], cpu_T[0]);
                    break;
#endif
                }

                if ((b & 1) == 0) {
                    gen_op_mov_reg_T0(ot, reg);
                } else {
                    gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 1);
                }
                break;

R
Richard Henderson 已提交
3978 3979 3980 3981 3982 3983
            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;
                }
3984
                ot = s->dflag == 2 ? MO_64 : MO_32;
R
Richard Henderson 已提交
3985 3986 3987 3988 3989 3990 3991
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
                tcg_gen_andc_tl(cpu_T[0], cpu_regs[s->vex_v], cpu_T[0]);
                gen_op_mov_reg_T0(ot, reg);
                gen_op_update1_cc();
                set_cc_op(s, CC_OP_LOGICB + ot);
                break;

R
Richard Henderson 已提交
3992 3993 3994 3995 3996 3997
            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;
                }
3998
                ot = s->dflag == 2 ? MO_64 : MO_32;
R
Richard Henderson 已提交
3999 4000 4001 4002 4003 4004 4005 4006 4007
                {
                    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);

4008
                    bound = tcg_const_tl(ot == MO_64 ? 63 : 31);
R
Richard Henderson 已提交
4009 4010 4011 4012 4013 4014 4015 4016 4017 4018 4019 4020 4021 4022 4023 4024 4025 4026 4027 4028 4029 4030 4031
                    zero = tcg_const_tl(0);
                    tcg_gen_movcond_tl(TCG_COND_LEU, cpu_T[0], cpu_A0, bound,
                                       cpu_T[0], zero);
                    tcg_temp_free(zero);

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

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

R
Richard Henderson 已提交
4032 4033 4034 4035 4036 4037
            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;
                }
4038
                ot = s->dflag == 2 ? MO_64 : MO_32;
R
Richard Henderson 已提交
4039 4040 4041
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
                tcg_gen_ext8u_tl(cpu_T[1], cpu_regs[s->vex_v]);
                {
4042
                    TCGv bound = tcg_const_tl(ot == MO_64 ? 63 : 31);
R
Richard Henderson 已提交
4043 4044 4045 4046 4047 4048 4049 4050 4051 4052 4053 4054 4055 4056 4057 4058
                    /* Note that since we're using BMILG (in order to get O
                       cleared) we need to store the inverse into C.  */
                    tcg_gen_setcond_tl(TCG_COND_LT, cpu_cc_src,
                                       cpu_T[1], bound);
                    tcg_gen_movcond_tl(TCG_COND_GT, cpu_T[1], cpu_T[1],
                                       bound, bound, cpu_T[1]);
                    tcg_temp_free(bound);
                }
                tcg_gen_movi_tl(cpu_A0, -1);
                tcg_gen_shl_tl(cpu_A0, cpu_A0, cpu_T[1]);
                tcg_gen_andc_tl(cpu_T[0], cpu_T[0], cpu_A0);
                gen_op_mov_reg_T0(ot, reg);
                gen_op_update1_cc();
                set_cc_op(s, CC_OP_BMILGB + ot);
                break;

R
Richard Henderson 已提交
4059 4060 4061 4062 4063 4064
            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;
                }
4065
                ot = s->dflag == 2 ? MO_64 : MO_32;
R
Richard Henderson 已提交
4066 4067 4068
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
                switch (ot) {
                default:
4069 4070 4071 4072 4073 4074
                    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 已提交
4075 4076
                    break;
#ifdef TARGET_X86_64
4077
                case MO_64:
4078 4079
                    tcg_gen_mulu2_i64(cpu_regs[s->vex_v], cpu_regs[reg],
                                      cpu_T[0], cpu_regs[R_EDX]);
R
Richard Henderson 已提交
4080 4081 4082 4083 4084
                    break;
#endif
                }
                break;

4085 4086 4087 4088 4089 4090
            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;
                }
4091
                ot = s->dflag == 2 ? MO_64 : MO_32;
4092 4093 4094 4095 4096 4097 4098 4099 4100 4101 4102 4103 4104 4105 4106 4107 4108
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
                /* Note that by zero-extending the mask operand, we
                   automatically handle zero-extending the result.  */
                if (s->dflag == 2) {
                    tcg_gen_mov_tl(cpu_T[1], cpu_regs[s->vex_v]);
                } else {
                    tcg_gen_ext32u_tl(cpu_T[1], cpu_regs[s->vex_v]);
                }
                gen_helper_pdep(cpu_regs[reg], cpu_T[0], cpu_T[1]);
                break;

            case 0x2f5: /* pext Gy, By, Ey */
                if (!(s->cpuid_7_0_ebx_features & CPUID_7_0_EBX_BMI2)
                    || !(s->prefix & PREFIX_VEX)
                    || s->vex_l != 0) {
                    goto illegal_op;
                }
4109
                ot = s->dflag == 2 ? MO_64 : MO_32;
4110 4111 4112 4113 4114 4115 4116 4117 4118 4119 4120
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
                /* Note that by zero-extending the mask operand, we
                   automatically handle zero-extending the result.  */
                if (s->dflag == 2) {
                    tcg_gen_mov_tl(cpu_T[1], cpu_regs[s->vex_v]);
                } else {
                    tcg_gen_ext32u_tl(cpu_T[1], cpu_regs[s->vex_v]);
                }
                gen_helper_pext(cpu_regs[reg], cpu_T[0], cpu_T[1]);
                break;

4121 4122 4123 4124 4125
            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 {
4126
                    TCGv carry_in, carry_out, zero;
4127 4128
                    int end_op;

4129
                    ot = (s->dflag == 2 ? MO_64 : MO_32);
4130 4131 4132 4133 4134 4135 4136 4137 4138 4139 4140 4141 4142 4143 4144 4145 4146 4147 4148 4149 4150 4151 4152 4153 4154 4155 4156
                    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:
4157
                        end_op = (b == 0x1f6 ? CC_OP_ADCX : CC_OP_ADOX);
4158 4159 4160 4161 4162 4163 4164 4165 4166 4167 4168 4169 4170 4171 4172
                        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
4173
                    case MO_32:
4174 4175 4176 4177 4178 4179 4180 4181 4182 4183 4184 4185
                        /* 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.  */
4186 4187 4188 4189 4190 4191 4192 4193
                        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);
4194 4195 4196 4197 4198 4199
                        break;
                    }
                    set_cc_op(s, end_op);
                }
                break;

4200 4201 4202 4203 4204 4205 4206 4207
            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;
                }
4208
                ot = (s->dflag == 2 ? MO_64 : MO_32);
4209
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
4210
                if (ot == MO_64) {
4211 4212 4213 4214 4215 4216 4217
                    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) {
4218
                    if (ot != MO_64) {
4219 4220 4221 4222
                        tcg_gen_ext32s_tl(cpu_T[0], cpu_T[0]);
                    }
                    tcg_gen_sar_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
                } else {
4223
                    if (ot != MO_64) {
4224 4225 4226 4227 4228 4229 4230
                        tcg_gen_ext32u_tl(cpu_T[0], cpu_T[0]);
                    }
                    tcg_gen_shr_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
                }
                gen_op_mov_reg_T0(ot, reg);
                break;

4231 4232 4233 4234 4235 4236 4237 4238 4239
            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;
                }
4240
                ot = s->dflag == 2 ? MO_64 : MO_32;
4241 4242 4243 4244 4245 4246 4247 4248 4249 4250 4251 4252 4253 4254 4255 4256 4257 4258 4259 4260 4261 4262 4263 4264 4265 4266 4267 4268 4269 4270 4271 4272
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);

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

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

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

                default:
                    goto illegal_op;
                }
                break;

R
Richard Henderson 已提交
4273 4274 4275
            default:
                goto illegal_op;
            }
B
balrog 已提交
4276
            break;
R
Richard Henderson 已提交
4277

B
balrog 已提交
4278 4279
        case 0x03a:
        case 0x13a:
B
balrog 已提交
4280
            b = modrm;
4281
            modrm = cpu_ldub_code(env, s->pc++);
B
balrog 已提交
4282 4283 4284
            rm = modrm & 7;
            reg = ((modrm >> 3) & 7) | rex_r;
            mod = (modrm >> 6) & 3;
4285 4286 4287
            if (b1 >= 2) {
                goto illegal_op;
            }
B
balrog 已提交
4288

B
Blue Swirl 已提交
4289 4290
            sse_fn_eppi = sse_op_table7[b].op[b1];
            if (!sse_fn_eppi) {
B
balrog 已提交
4291
                goto illegal_op;
B
Blue Swirl 已提交
4292
            }
B
balrog 已提交
4293 4294 4295
            if (!(s->cpuid_ext_features & sse_op_table7[b].ext_mask))
                goto illegal_op;

B
Blue Swirl 已提交
4296
            if (sse_fn_eppi == SSE_SPECIAL) {
4297
                ot = (s->dflag == 2) ? MO_64 : MO_32;
B
balrog 已提交
4298 4299
                rm = (modrm & 7) | REX_B(s);
                if (mod != 3)
4300
                    gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
balrog 已提交
4301
                reg = ((modrm >> 3) & 7) | rex_r;
4302
                val = cpu_ldub_code(env, s->pc++);
B
balrog 已提交
4303 4304 4305 4306
                switch (b) {
                case 0x14: /* pextrb */
                    tcg_gen_ld8u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,
                                            xmm_regs[reg].XMM_B(val & 15)));
4307
                    if (mod == 3) {
B
balrog 已提交
4308
                        gen_op_mov_reg_T0(ot, rm);
4309 4310 4311 4312
                    } else {
                        tcg_gen_qemu_st_tl(cpu_T[0], cpu_A0,
                                           s->mem_index, MO_UB);
                    }
B
balrog 已提交
4313 4314 4315 4316
                    break;
                case 0x15: /* pextrw */
                    tcg_gen_ld16u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,
                                            xmm_regs[reg].XMM_W(val & 7)));
4317
                    if (mod == 3) {
B
balrog 已提交
4318
                        gen_op_mov_reg_T0(ot, rm);
4319 4320 4321 4322
                    } else {
                        tcg_gen_qemu_st_tl(cpu_T[0], cpu_A0,
                                           s->mem_index, MO_LEUW);
                    }
B
balrog 已提交
4323 4324
                    break;
                case 0x16:
4325
                    if (ot == MO_32) { /* pextrd */
B
balrog 已提交
4326 4327 4328
                        tcg_gen_ld_i32(cpu_tmp2_i32, cpu_env,
                                        offsetof(CPUX86State,
                                                xmm_regs[reg].XMM_L(val & 3)));
P
pbrook 已提交
4329
                        tcg_gen_extu_i32_tl(cpu_T[0], cpu_tmp2_i32);
4330
                        if (mod == 3) {
P
pbrook 已提交
4331
                            gen_op_mov_reg_v(ot, rm, cpu_T[0]);
4332 4333 4334 4335
                        } else {
                            tcg_gen_qemu_st_tl(cpu_T[0], cpu_A0,
                                               s->mem_index, MO_LEUL);
                        }
B
balrog 已提交
4336
                    } else { /* pextrq */
P
pbrook 已提交
4337
#ifdef TARGET_X86_64
B
balrog 已提交
4338 4339 4340
                        tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env,
                                        offsetof(CPUX86State,
                                                xmm_regs[reg].XMM_Q(val & 1)));
4341
                        if (mod == 3) {
B
balrog 已提交
4342
                            gen_op_mov_reg_v(ot, rm, cpu_tmp1_i64);
4343 4344 4345 4346
                        } else {
                            tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0,
                                                s->mem_index, MO_LEQ);
                        }
P
pbrook 已提交
4347 4348 4349
#else
                        goto illegal_op;
#endif
B
balrog 已提交
4350 4351 4352 4353 4354
                    }
                    break;
                case 0x17: /* extractps */
                    tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,
                                            xmm_regs[reg].XMM_L(val & 3)));
4355
                    if (mod == 3) {
B
balrog 已提交
4356
                        gen_op_mov_reg_T0(ot, rm);
4357 4358 4359 4360
                    } else {
                        tcg_gen_qemu_st_tl(cpu_T[0], cpu_A0,
                                           s->mem_index, MO_LEUL);
                    }
B
balrog 已提交
4361 4362
                    break;
                case 0x20: /* pinsrb */
4363
                    if (mod == 3) {
4364
                        gen_op_mov_TN_reg(MO_32, 0, rm);
4365 4366 4367 4368
                    } else {
                        tcg_gen_qemu_ld_tl(cpu_T[0], cpu_A0,
                                           s->mem_index, MO_UB);
                    }
4369
                    tcg_gen_st8_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,
B
balrog 已提交
4370 4371 4372
                                            xmm_regs[reg].XMM_B(val & 15)));
                    break;
                case 0x21: /* insertps */
P
pbrook 已提交
4373
                    if (mod == 3) {
B
balrog 已提交
4374 4375 4376
                        tcg_gen_ld_i32(cpu_tmp2_i32, cpu_env,
                                        offsetof(CPUX86State,xmm_regs[rm]
                                                .XMM_L((val >> 6) & 3)));
P
pbrook 已提交
4377
                    } else {
4378 4379
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
P
pbrook 已提交
4380
                    }
B
balrog 已提交
4381 4382 4383 4384 4385 4386 4387 4388 4389 4390 4391 4392 4393 4394 4395 4396 4397 4398 4399 4400 4401
                    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:
4402
                    if (ot == MO_32) { /* pinsrd */
4403
                        if (mod == 3) {
P
pbrook 已提交
4404
                            gen_op_mov_v_reg(ot, cpu_tmp0, rm);
4405 4406 4407 4408
                        } else {
                            tcg_gen_qemu_ld_tl(cpu_tmp0, cpu_A0,
                                               s->mem_index, MO_LEUL);
                        }
P
pbrook 已提交
4409
                        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_tmp0);
B
balrog 已提交
4410 4411 4412 4413
                        tcg_gen_st_i32(cpu_tmp2_i32, cpu_env,
                                        offsetof(CPUX86State,
                                                xmm_regs[reg].XMM_L(val & 3)));
                    } else { /* pinsrq */
P
pbrook 已提交
4414
#ifdef TARGET_X86_64
4415
                        if (mod == 3) {
B
balrog 已提交
4416
                            gen_op_mov_v_reg(ot, cpu_tmp1_i64, rm);
4417 4418 4419 4420
                        } else {
                            tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0,
                                                s->mem_index, MO_LEQ);
                        }
B
balrog 已提交
4421 4422 4423
                        tcg_gen_st_i64(cpu_tmp1_i64, cpu_env,
                                        offsetof(CPUX86State,
                                                xmm_regs[reg].XMM_Q(val & 1)));
P
pbrook 已提交
4424 4425 4426
#else
                        goto illegal_op;
#endif
B
balrog 已提交
4427 4428 4429 4430 4431
                    }
                    break;
                }
                return;
            }
B
balrog 已提交
4432 4433 4434 4435 4436 4437 4438

            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);
4439
                    gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
4440
                    gen_ldo_env_A0(s, op2_offset);
B
balrog 已提交
4441 4442 4443 4444 4445 4446 4447
                }
            } 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);
4448
                    gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
4449
                    gen_ldq_env_A0(s, op2_offset);
B
balrog 已提交
4450 4451
                }
            }
4452
            val = cpu_ldub_code(env, s->pc++);
B
balrog 已提交
4453

B
balrog 已提交
4454
            if ((b & 0xfc) == 0x60) { /* pcmpXstrX */
4455
                set_cc_op(s, CC_OP_EFLAGS);
B
balrog 已提交
4456 4457 4458 4459 4460 4461

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

B
balrog 已提交
4462 4463
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
4464
            sse_fn_eppi(cpu_env, cpu_ptr0, cpu_ptr1, tcg_const_i32(val));
B
balrog 已提交
4465
            break;
R
Richard Henderson 已提交
4466 4467 4468 4469 4470 4471 4472 4473 4474 4475 4476 4477 4478 4479

        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;
                }
4480
                ot = s->dflag == 2 ? MO_64 : MO_32;
R
Richard Henderson 已提交
4481 4482
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
                b = cpu_ldub_code(env, s->pc++);
4483
                if (ot == MO_64) {
R
Richard Henderson 已提交
4484 4485 4486 4487 4488 4489 4490 4491 4492 4493 4494 4495 4496 4497
                    tcg_gen_rotri_tl(cpu_T[0], cpu_T[0], b & 63);
                } else {
                    tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
                    tcg_gen_rotri_i32(cpu_tmp2_i32, cpu_tmp2_i32, b & 31);
                    tcg_gen_extu_i32_tl(cpu_T[0], cpu_tmp2_i32);
                }
                gen_op_mov_reg_T0(ot, reg);
                break;

            default:
                goto illegal_op;
            }
            break;

B
bellard 已提交
4498 4499 4500 4501 4502
        default:
            goto illegal_op;
        }
    } else {
        /* generic MMX or SSE operation */
B
bellard 已提交
4503 4504 4505 4506 4507 4508 4509 4510
        switch(b) {
        case 0x70: /* pshufx insn */
        case 0xc6: /* pshufx insn */
        case 0xc2: /* compare insns */
            s->rip_offset = 1;
            break;
        default:
            break;
B
bellard 已提交
4511 4512 4513 4514
        }
        if (is_xmm) {
            op1_offset = offsetof(CPUX86State,xmm_regs[reg]);
            if (mod != 3) {
4515
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
4516
                op2_offset = offsetof(CPUX86State,xmm_t0);
4517
                if (b1 >= 2 && ((b >= 0x50 && b <= 0x5f && b != 0x5b) ||
B
bellard 已提交
4518 4519 4520 4521
                                b == 0xc2)) {
                    /* specific case for SSE single instructions */
                    if (b1 == 2) {
                        /* 32 bit access */
4522
                        gen_op_ld_v(s, MO_32, cpu_T[0], cpu_A0);
B
bellard 已提交
4523
                        tcg_gen_st32_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,xmm_t0.XMM_L(0)));
B
bellard 已提交
4524 4525
                    } else {
                        /* 64 bit access */
4526 4527
                        gen_ldq_env_A0(s, offsetof(CPUX86State,
                                                   xmm_t0.XMM_D(0)));
B
bellard 已提交
4528 4529
                    }
                } else {
4530
                    gen_ldo_env_A0(s, op2_offset);
B
bellard 已提交
4531 4532 4533 4534 4535 4536 4537 4538
                }
            } 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) {
4539
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
4540
                op2_offset = offsetof(CPUX86State,mmx_t0);
4541
                gen_ldq_env_A0(s, op2_offset);
B
bellard 已提交
4542 4543 4544 4545 4546 4547
            } else {
                rm = (modrm & 7);
                op2_offset = offsetof(CPUX86State,fpregs[rm].mmx);
            }
        }
        switch(b) {
A
aurel32 已提交
4548
        case 0x0f: /* 3DNow! data insns */
4549 4550
            if (!(s->cpuid_ext2_features & CPUID_EXT2_3DNOW))
                goto illegal_op;
4551
            val = cpu_ldub_code(env, s->pc++);
B
Blue Swirl 已提交
4552 4553
            sse_fn_epp = sse_op_table5[val];
            if (!sse_fn_epp) {
A
aurel32 已提交
4554
                goto illegal_op;
B
Blue Swirl 已提交
4555
            }
B
bellard 已提交
4556 4557
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
4558
            sse_fn_epp(cpu_env, cpu_ptr0, cpu_ptr1);
A
aurel32 已提交
4559
            break;
B
bellard 已提交
4560 4561
        case 0x70: /* pshufx insn */
        case 0xc6: /* pshufx insn */
4562
            val = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4563 4564
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
4565
            /* XXX: introduce a new table? */
B
Blue Swirl 已提交
4566
            sse_fn_ppi = (SSEFunc_0_ppi)sse_fn_epp;
B
Blue Swirl 已提交
4567
            sse_fn_ppi(cpu_ptr0, cpu_ptr1, tcg_const_i32(val));
B
bellard 已提交
4568 4569 4570
            break;
        case 0xc2:
            /* compare insns */
4571
            val = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4572 4573
            if (val >= 8)
                goto illegal_op;
B
Blue Swirl 已提交
4574
            sse_fn_epp = sse_op_table4[val][b1];
B
Blue Swirl 已提交
4575

B
bellard 已提交
4576 4577
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
4578
            sse_fn_epp(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
4579
            break;
4580 4581 4582 4583 4584 4585 4586 4587 4588 4589 4590 4591 4592 4593 4594 4595 4596 4597
        case 0xf7:
            /* maskmov : we must prepare A0 */
            if (mod != 3)
                goto illegal_op;
#ifdef TARGET_X86_64
            if (s->aflag == 2) {
                gen_op_movq_A0_reg(R_EDI);
            } else
#endif
            {
                gen_op_movl_A0_reg(R_EDI);
                if (s->aflag == 0)
                    gen_op_andl_A0_ffff();
            }
            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 已提交
4598
            /* XXX: introduce a new table? */
B
Blue Swirl 已提交
4599 4600
            sse_fn_eppt = (SSEFunc_0_eppt)sse_fn_epp;
            sse_fn_eppt(cpu_env, cpu_ptr0, cpu_ptr1, cpu_A0);
4601
            break;
B
bellard 已提交
4602
        default:
B
bellard 已提交
4603 4604
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
4605
            sse_fn_epp(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
4606 4607 4608
            break;
        }
        if (b == 0x2e || b == 0x2f) {
4609
            set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
4610 4611 4612 4613
        }
    }
}

B
bellard 已提交
4614 4615
/* convert one instruction. s->is_jmp is set if the translation must
   be stopped. Return the next pc value */
4616 4617
static target_ulong disas_insn(CPUX86State *env, DisasContext *s,
                               target_ulong pc_start)
B
bellard 已提交
4618 4619 4620 4621
{
    int b, prefixes, aflag, dflag;
    int shift, ot;
    int modrm, reg, rm, mod, reg_addr, op, opreg, offset_addr, val;
B
bellard 已提交
4622 4623
    target_ulong next_eip, tval;
    int rex_w, rex_r;
B
bellard 已提交
4624

4625
    if (unlikely(qemu_loglevel_mask(CPU_LOG_TB_OP | CPU_LOG_TB_OP_OPT))) {
4626
        tcg_gen_debug_insn_start(pc_start);
4627
    }
B
bellard 已提交
4628 4629 4630
    s->pc = pc_start;
    prefixes = 0;
    s->override = -1;
B
bellard 已提交
4631 4632 4633 4634 4635
    rex_w = -1;
    rex_r = 0;
#ifdef TARGET_X86_64
    s->rex_x = 0;
    s->rex_b = 0;
4636
    x86_64_hregs = 0;
B
bellard 已提交
4637 4638
#endif
    s->rip_offset = 0; /* for relative ip address */
4639 4640
    s->vex_l = 0;
    s->vex_v = 0;
B
bellard 已提交
4641
 next_byte:
4642
    b = cpu_ldub_code(env, s->pc);
B
bellard 已提交
4643
    s->pc++;
4644 4645 4646 4647 4648 4649 4650 4651 4652 4653 4654 4655 4656 4657 4658 4659 4660 4661 4662 4663 4664 4665 4666 4667 4668 4669 4670 4671 4672 4673 4674 4675 4676 4677 4678
    /* 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 已提交
4679
#ifdef TARGET_X86_64
4680 4681
    case 0x40 ... 0x4f:
        if (CODE64(s)) {
B
bellard 已提交
4682 4683 4684 4685 4686 4687 4688 4689
            /* 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;
        }
4690 4691
        break;
#endif
4692 4693 4694 4695 4696 4697 4698 4699 4700 4701 4702 4703 4704 4705 4706 4707 4708
    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 已提交
4709
            /* 4.1.1-4.1.3: No preceding lock, 66, f2, f3, or rex prefixes. */
4710 4711 4712 4713 4714 4715 4716 4717 4718 4719 4720 4721 4722 4723 4724 4725 4726 4727 4728 4729 4730 4731 4732 4733 4734 4735 4736 4737 4738 4739 4740 4741 4742 4743 4744 4745 4746 4747 4748
            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;
4749 4750 4751 4752
    }

    /* Post-process prefixes.  */
    if (CODE64(s)) {
4753 4754 4755 4756 4757 4758 4759 4760 4761 4762 4763
        /* In 64-bit mode, the default data size is 32-bit.  Select 64-bit
           data with rex_w, and 16-bit data with 0x66; rex_w takes precedence
           over 0x66 if both are present.  */
        dflag = (rex_w > 0 ? 2 : prefixes & PREFIX_DATA ? 0 : 1);
        /* In 64-bit mode, 0x67 selects 32-bit addressing.  */
        aflag = (prefixes & PREFIX_ADR ? 1 : 2);
    } else {
        /* In 16/32-bit mode, 0x66 selects the opposite data size.  */
        dflag = s->code32;
        if (prefixes & PREFIX_DATA) {
            dflag ^= 1;
B
bellard 已提交
4764
        }
4765 4766 4767 4768
        /* In 16/32-bit mode, 0x67 selects the opposite addressing.  */
        aflag = s->code32;
        if (prefixes & PREFIX_ADR) {
            aflag ^= 1;
B
bellard 已提交
4769
        }
B
bellard 已提交
4770 4771 4772 4773 4774 4775 4776 4777
    }

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

    /* lock generation */
    if (prefixes & PREFIX_LOCK)
P
pbrook 已提交
4778
        gen_helper_lock();
B
bellard 已提交
4779 4780 4781 4782 4783 4784 4785

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

B
bellard 已提交
4789 4790 4791 4792 4793 4794 4795 4796 4797 4798 4799 4800 4801 4802 4803 4804
        /**************************/
        /* arith & logic */
    case 0x00 ... 0x05:
    case 0x08 ... 0x0d:
    case 0x10 ... 0x15:
    case 0x18 ... 0x1d:
    case 0x20 ... 0x25:
    case 0x28 ... 0x2d:
    case 0x30 ... 0x35:
    case 0x38 ... 0x3d:
        {
            int op, f, val;
            op = (b >> 3) & 7;
            f = (b >> 1) & 3;

            if ((b & 1) == 0)
4805
                ot = MO_8;
B
bellard 已提交
4806
            else
4807
                ot = dflag + MO_16;
4808

B
bellard 已提交
4809 4810
            switch(f) {
            case 0: /* OP Ev, Gv */
4811
                modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4812
                reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
4813
                mod = (modrm >> 6) & 3;
B
bellard 已提交
4814
                rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
4815
                if (mod != 3) {
4816
                    gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
4817 4818 4819 4820
                    opreg = OR_TMP0;
                } else if (op == OP_XORL && rm == reg) {
                xor_zero:
                    /* xor reg, reg optimisation */
R
Richard Henderson 已提交
4821
                    set_cc_op(s, CC_OP_CLR);
B
bellard 已提交
4822
                    gen_op_movl_T0_0();
B
bellard 已提交
4823
                    gen_op_mov_reg_T0(ot, reg);
B
bellard 已提交
4824 4825 4826 4827
                    break;
                } else {
                    opreg = rm;
                }
B
bellard 已提交
4828
                gen_op_mov_TN_reg(ot, 1, reg);
B
bellard 已提交
4829 4830 4831
                gen_op(s, op, ot, opreg);
                break;
            case 1: /* OP Gv, Ev */
4832
                modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4833
                mod = (modrm >> 6) & 3;
B
bellard 已提交
4834 4835
                reg = ((modrm >> 3) & 7) | rex_r;
                rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
4836
                if (mod != 3) {
4837
                    gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
4838
                    gen_op_ld_T1_A0(s, ot);
B
bellard 已提交
4839 4840 4841
                } else if (op == OP_XORL && rm == reg) {
                    goto xor_zero;
                } else {
B
bellard 已提交
4842
                    gen_op_mov_TN_reg(ot, 1, rm);
B
bellard 已提交
4843 4844 4845 4846
                }
                gen_op(s, op, ot, reg);
                break;
            case 2: /* OP A, Iv */
4847
                val = insn_get(env, s, ot);
B
bellard 已提交
4848 4849 4850 4851 4852 4853 4854
                gen_op_movl_T1_im(val);
                gen_op(s, op, ot, OR_EAX);
                break;
            }
        }
        break;

4855 4856 4857
    case 0x82:
        if (CODE64(s))
            goto illegal_op;
B
bellard 已提交
4858 4859 4860 4861 4862 4863 4864
    case 0x80: /* GRP1 */
    case 0x81:
    case 0x83:
        {
            int val;

            if ((b & 1) == 0)
4865
                ot = MO_8;
B
bellard 已提交
4866
            else
4867
                ot = dflag + MO_16;
4868

4869
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4870
            mod = (modrm >> 6) & 3;
B
bellard 已提交
4871
            rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
4872
            op = (modrm >> 3) & 7;
4873

B
bellard 已提交
4874
            if (mod != 3) {
B
bellard 已提交
4875 4876 4877 4878
                if (b == 0x83)
                    s->rip_offset = 1;
                else
                    s->rip_offset = insn_const_size(ot);
4879
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
4880 4881
                opreg = OR_TMP0;
            } else {
B
bellard 已提交
4882
                opreg = rm;
B
bellard 已提交
4883 4884 4885 4886 4887 4888
            }

            switch(b) {
            default:
            case 0x80:
            case 0x81:
4889
            case 0x82:
4890
                val = insn_get(env, s, ot);
B
bellard 已提交
4891 4892
                break;
            case 0x83:
4893
                val = (int8_t)insn_get(env, s, MO_8);
B
bellard 已提交
4894 4895 4896 4897 4898 4899 4900 4901 4902 4903
                break;
            }
            gen_op_movl_T1_im(val);
            gen_op(s, op, ot, opreg);
        }
        break;

        /**************************/
        /* inc, dec, and other misc arith */
    case 0x40 ... 0x47: /* inc Gv */
4904
        ot = dflag ? MO_32 : MO_16;
B
bellard 已提交
4905 4906 4907
        gen_inc(s, ot, OR_EAX + (b & 7), 1);
        break;
    case 0x48 ... 0x4f: /* dec Gv */
4908
        ot = dflag ? MO_32 : MO_16;
B
bellard 已提交
4909 4910 4911 4912 4913
        gen_inc(s, ot, OR_EAX + (b & 7), -1);
        break;
    case 0xf6: /* GRP3 */
    case 0xf7:
        if ((b & 1) == 0)
4914
            ot = MO_8;
B
bellard 已提交
4915
        else
4916
            ot = dflag + MO_16;
B
bellard 已提交
4917

4918
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4919
        mod = (modrm >> 6) & 3;
B
bellard 已提交
4920
        rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
4921 4922
        op = (modrm >> 3) & 7;
        if (mod != 3) {
B
bellard 已提交
4923 4924
            if (op == 0)
                s->rip_offset = insn_const_size(ot);
4925
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
4926
            gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
4927
        } else {
B
bellard 已提交
4928
            gen_op_mov_TN_reg(ot, 0, rm);
B
bellard 已提交
4929 4930 4931 4932
        }

        switch(op) {
        case 0: /* test */
4933
            val = insn_get(env, s, ot);
B
bellard 已提交
4934 4935
            gen_op_movl_T1_im(val);
            gen_op_testl_T0_T1_cc();
4936
            set_cc_op(s, CC_OP_LOGICB + ot);
B
bellard 已提交
4937 4938
            break;
        case 2: /* not */
4939
            tcg_gen_not_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
4940
            if (mod != 3) {
4941
                gen_op_st_T0_A0(s, ot);
B
bellard 已提交
4942
            } else {
B
bellard 已提交
4943
                gen_op_mov_reg_T0(ot, rm);
B
bellard 已提交
4944 4945 4946
            }
            break;
        case 3: /* neg */
4947
            tcg_gen_neg_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
4948
            if (mod != 3) {
4949
                gen_op_st_T0_A0(s, ot);
B
bellard 已提交
4950
            } else {
B
bellard 已提交
4951
                gen_op_mov_reg_T0(ot, rm);
B
bellard 已提交
4952 4953
            }
            gen_op_update_neg_cc();
4954
            set_cc_op(s, CC_OP_SUBB + ot);
B
bellard 已提交
4955 4956 4957
            break;
        case 4: /* mul */
            switch(ot) {
4958 4959
            case MO_8:
                gen_op_mov_TN_reg(MO_8, 1, R_EAX);
B
bellard 已提交
4960 4961 4962 4963
                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]);
4964
                gen_op_mov_reg_T0(MO_16, R_EAX);
B
bellard 已提交
4965 4966
                tcg_gen_mov_tl(cpu_cc_dst, cpu_T[0]);
                tcg_gen_andi_tl(cpu_cc_src, cpu_T[0], 0xff00);
4967
                set_cc_op(s, CC_OP_MULB);
B
bellard 已提交
4968
                break;
4969 4970
            case MO_16:
                gen_op_mov_TN_reg(MO_16, 1, R_EAX);
B
bellard 已提交
4971 4972 4973 4974
                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]);
4975
                gen_op_mov_reg_T0(MO_16, R_EAX);
B
bellard 已提交
4976 4977
                tcg_gen_mov_tl(cpu_cc_dst, cpu_T[0]);
                tcg_gen_shri_tl(cpu_T[0], cpu_T[0], 16);
4978
                gen_op_mov_reg_T0(MO_16, R_EDX);
B
bellard 已提交
4979
                tcg_gen_mov_tl(cpu_cc_src, cpu_T[0]);
4980
                set_cc_op(s, CC_OP_MULW);
B
bellard 已提交
4981 4982
                break;
            default:
4983
            case MO_32:
4984 4985 4986 4987 4988 4989 4990 4991
                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]);
4992
                set_cc_op(s, CC_OP_MULL);
B
bellard 已提交
4993
                break;
B
bellard 已提交
4994
#ifdef TARGET_X86_64
4995
            case MO_64:
4996 4997 4998 4999
                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]);
5000
                set_cc_op(s, CC_OP_MULQ);
B
bellard 已提交
5001 5002
                break;
#endif
B
bellard 已提交
5003 5004 5005 5006
            }
            break;
        case 5: /* imul */
            switch(ot) {
5007 5008
            case MO_8:
                gen_op_mov_TN_reg(MO_8, 1, R_EAX);
B
bellard 已提交
5009 5010 5011 5012
                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]);
5013
                gen_op_mov_reg_T0(MO_16, R_EAX);
B
bellard 已提交
5014 5015 5016
                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);
5017
                set_cc_op(s, CC_OP_MULB);
B
bellard 已提交
5018
                break;
5019 5020
            case MO_16:
                gen_op_mov_TN_reg(MO_16, 1, R_EAX);
B
bellard 已提交
5021 5022 5023 5024
                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]);
5025
                gen_op_mov_reg_T0(MO_16, R_EAX);
B
bellard 已提交
5026 5027 5028 5029
                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);
5030
                gen_op_mov_reg_T0(MO_16, R_EDX);
5031
                set_cc_op(s, CC_OP_MULW);
B
bellard 已提交
5032 5033
                break;
            default:
5034
            case MO_32:
5035 5036 5037 5038 5039 5040 5041 5042 5043 5044
                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);
5045
                set_cc_op(s, CC_OP_MULL);
B
bellard 已提交
5046
                break;
B
bellard 已提交
5047
#ifdef TARGET_X86_64
5048
            case MO_64:
5049 5050 5051 5052 5053
                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]);
5054
                set_cc_op(s, CC_OP_MULQ);
B
bellard 已提交
5055 5056
                break;
#endif
B
bellard 已提交
5057 5058 5059 5060
            }
            break;
        case 6: /* div */
            switch(ot) {
5061
            case MO_8:
B
bellard 已提交
5062
                gen_jmp_im(pc_start - s->cs_base);
5063
                gen_helper_divb_AL(cpu_env, cpu_T[0]);
B
bellard 已提交
5064
                break;
5065
            case MO_16:
B
bellard 已提交
5066
                gen_jmp_im(pc_start - s->cs_base);
5067
                gen_helper_divw_AX(cpu_env, cpu_T[0]);
B
bellard 已提交
5068 5069
                break;
            default:
5070
            case MO_32:
B
bellard 已提交
5071
                gen_jmp_im(pc_start - s->cs_base);
5072
                gen_helper_divl_EAX(cpu_env, cpu_T[0]);
B
bellard 已提交
5073 5074
                break;
#ifdef TARGET_X86_64
5075
            case MO_64:
B
bellard 已提交
5076
                gen_jmp_im(pc_start - s->cs_base);
5077
                gen_helper_divq_EAX(cpu_env, cpu_T[0]);
B
bellard 已提交
5078
                break;
B
bellard 已提交
5079
#endif
B
bellard 已提交
5080 5081 5082 5083
            }
            break;
        case 7: /* idiv */
            switch(ot) {
5084
            case MO_8:
B
bellard 已提交
5085
                gen_jmp_im(pc_start - s->cs_base);
5086
                gen_helper_idivb_AL(cpu_env, cpu_T[0]);
B
bellard 已提交
5087
                break;
5088
            case MO_16:
B
bellard 已提交
5089
                gen_jmp_im(pc_start - s->cs_base);
5090
                gen_helper_idivw_AX(cpu_env, cpu_T[0]);
B
bellard 已提交
5091 5092
                break;
            default:
5093
            case MO_32:
B
bellard 已提交
5094
                gen_jmp_im(pc_start - s->cs_base);
5095
                gen_helper_idivl_EAX(cpu_env, cpu_T[0]);
B
bellard 已提交
5096 5097
                break;
#ifdef TARGET_X86_64
5098
            case MO_64:
B
bellard 已提交
5099
                gen_jmp_im(pc_start - s->cs_base);
5100
                gen_helper_idivq_EAX(cpu_env, cpu_T[0]);
B
bellard 已提交
5101
                break;
B
bellard 已提交
5102
#endif
B
bellard 已提交
5103 5104 5105 5106 5107 5108 5109 5110 5111 5112
            }
            break;
        default:
            goto illegal_op;
        }
        break;

    case 0xfe: /* GRP4 */
    case 0xff: /* GRP5 */
        if ((b & 1) == 0)
5113
            ot = MO_8;
B
bellard 已提交
5114
        else
5115
            ot = dflag + MO_16;
B
bellard 已提交
5116

5117
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5118
        mod = (modrm >> 6) & 3;
B
bellard 已提交
5119
        rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
5120 5121 5122 5123
        op = (modrm >> 3) & 7;
        if (op >= 2 && b == 0xfe) {
            goto illegal_op;
        }
B
bellard 已提交
5124
        if (CODE64(s)) {
5125
            if (op == 2 || op == 4) {
B
bellard 已提交
5126
                /* operand size for jumps is 64 bit */
5127
                ot = MO_64;
5128
            } else if (op == 3 || op == 5) {
5129
                ot = dflag ? MO_32 + (rex_w == 1) : MO_16;
B
bellard 已提交
5130 5131
            } else if (op == 6) {
                /* default push size is 64 bit */
5132
                ot = dflag ? MO_64 : MO_16;
B
bellard 已提交
5133 5134
            }
        }
B
bellard 已提交
5135
        if (mod != 3) {
5136
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
5137
            if (op >= 2 && op != 3 && op != 5)
5138
                gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
5139
        } else {
B
bellard 已提交
5140
            gen_op_mov_TN_reg(ot, 0, rm);
B
bellard 已提交
5141 5142 5143 5144 5145 5146 5147 5148 5149 5150 5151 5152 5153 5154 5155 5156 5157 5158
        }

        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 */
5159
            /* XXX: optimize if memory (no 'and' is necessary) */
B
bellard 已提交
5160 5161 5162
            if (s->dflag == 0)
                gen_op_andl_T0_ffff();
            next_eip = s->pc - s->cs_base;
B
bellard 已提交
5163
            gen_movtl_T1_im(next_eip);
5164 5165
            gen_push_T1(s);
            gen_op_jmp_T0();
B
bellard 已提交
5166 5167
            gen_eob(s);
            break;
B
bellard 已提交
5168
        case 3: /* lcall Ev */
5169
            gen_op_ld_T1_A0(s, ot);
5170
            gen_add_A0_im(s, 1 << (ot - MO_16 + 1));
5171
            gen_op_ld_v(s, MO_16, cpu_T[0], cpu_A0);
B
bellard 已提交
5172 5173
        do_lcall:
            if (s->pe && !s->vm86) {
5174
                gen_update_cc_op(s);
B
bellard 已提交
5175
                gen_jmp_im(pc_start - s->cs_base);
5176
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
5177 5178
                gen_helper_lcall_protected(cpu_env, cpu_tmp2_i32, cpu_T[1],
                                           tcg_const_i32(dflag),
P
pbrook 已提交
5179
                                           tcg_const_i32(s->pc - pc_start));
B
bellard 已提交
5180
            } else {
5181
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
5182 5183
                gen_helper_lcall_real(cpu_env, cpu_tmp2_i32, cpu_T[1],
                                      tcg_const_i32(dflag),
P
pbrook 已提交
5184
                                      tcg_const_i32(s->pc - s->cs_base));
B
bellard 已提交
5185 5186 5187 5188 5189 5190 5191 5192 5193 5194
            }
            gen_eob(s);
            break;
        case 4: /* jmp Ev */
            if (s->dflag == 0)
                gen_op_andl_T0_ffff();
            gen_op_jmp_T0();
            gen_eob(s);
            break;
        case 5: /* ljmp Ev */
5195
            gen_op_ld_T1_A0(s, ot);
5196
            gen_add_A0_im(s, 1 << (ot - MO_16 + 1));
5197
            gen_op_ld_v(s, MO_16, cpu_T[0], cpu_A0);
B
bellard 已提交
5198 5199
        do_ljmp:
            if (s->pe && !s->vm86) {
5200
                gen_update_cc_op(s);
B
bellard 已提交
5201
                gen_jmp_im(pc_start - s->cs_base);
5202
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
5203
                gen_helper_ljmp_protected(cpu_env, cpu_tmp2_i32, cpu_T[1],
P
pbrook 已提交
5204
                                          tcg_const_i32(s->pc - pc_start));
B
bellard 已提交
5205
            } else {
5206
                gen_op_movl_seg_T0_vm(R_CS);
B
bellard 已提交
5207 5208 5209 5210 5211 5212 5213 5214 5215 5216 5217 5218 5219 5220
                gen_op_movl_T0_T1();
                gen_op_jmp_T0();
            }
            gen_eob(s);
            break;
        case 6: /* push Ev */
            gen_push_T0(s);
            break;
        default:
            goto illegal_op;
        }
        break;

    case 0x84: /* test Ev, Gv */
5221
    case 0x85:
B
bellard 已提交
5222
        if ((b & 1) == 0)
5223
            ot = MO_8;
B
bellard 已提交
5224
        else
5225
            ot = dflag + MO_16;
B
bellard 已提交
5226

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

5230
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
B
bellard 已提交
5231
        gen_op_mov_TN_reg(ot, 1, reg);
B
bellard 已提交
5232
        gen_op_testl_T0_T1_cc();
5233
        set_cc_op(s, CC_OP_LOGICB + ot);
B
bellard 已提交
5234
        break;
5235

B
bellard 已提交
5236 5237 5238
    case 0xa8: /* test eAX, Iv */
    case 0xa9:
        if ((b & 1) == 0)
5239
            ot = MO_8;
B
bellard 已提交
5240
        else
5241
            ot = dflag + MO_16;
5242
        val = insn_get(env, s, ot);
B
bellard 已提交
5243

B
bellard 已提交
5244
        gen_op_mov_TN_reg(ot, 0, OR_EAX);
B
bellard 已提交
5245 5246
        gen_op_movl_T1_im(val);
        gen_op_testl_T0_T1_cc();
5247
        set_cc_op(s, CC_OP_LOGICB + ot);
B
bellard 已提交
5248
        break;
5249

B
bellard 已提交
5250
    case 0x98: /* CWDE/CBW */
B
bellard 已提交
5251 5252
#ifdef TARGET_X86_64
        if (dflag == 2) {
5253
            gen_op_mov_TN_reg(MO_32, 0, R_EAX);
B
bellard 已提交
5254
            tcg_gen_ext32s_tl(cpu_T[0], cpu_T[0]);
5255
            gen_op_mov_reg_T0(MO_64, R_EAX);
B
bellard 已提交
5256 5257
        } else
#endif
B
bellard 已提交
5258
        if (dflag == 1) {
5259
            gen_op_mov_TN_reg(MO_16, 0, R_EAX);
B
bellard 已提交
5260
            tcg_gen_ext16s_tl(cpu_T[0], cpu_T[0]);
5261
            gen_op_mov_reg_T0(MO_32, R_EAX);
B
bellard 已提交
5262
        } else {
5263
            gen_op_mov_TN_reg(MO_8, 0, R_EAX);
B
bellard 已提交
5264
            tcg_gen_ext8s_tl(cpu_T[0], cpu_T[0]);
5265
            gen_op_mov_reg_T0(MO_16, R_EAX);
B
bellard 已提交
5266
        }
B
bellard 已提交
5267 5268
        break;
    case 0x99: /* CDQ/CWD */
B
bellard 已提交
5269 5270
#ifdef TARGET_X86_64
        if (dflag == 2) {
5271
            gen_op_mov_TN_reg(MO_64, 0, R_EAX);
B
bellard 已提交
5272
            tcg_gen_sari_tl(cpu_T[0], cpu_T[0], 63);
5273
            gen_op_mov_reg_T0(MO_64, R_EDX);
B
bellard 已提交
5274 5275
        } else
#endif
B
bellard 已提交
5276
        if (dflag == 1) {
5277
            gen_op_mov_TN_reg(MO_32, 0, R_EAX);
B
bellard 已提交
5278 5279
            tcg_gen_ext32s_tl(cpu_T[0], cpu_T[0]);
            tcg_gen_sari_tl(cpu_T[0], cpu_T[0], 31);
5280
            gen_op_mov_reg_T0(MO_32, R_EDX);
B
bellard 已提交
5281
        } else {
5282
            gen_op_mov_TN_reg(MO_16, 0, R_EAX);
B
bellard 已提交
5283 5284
            tcg_gen_ext16s_tl(cpu_T[0], cpu_T[0]);
            tcg_gen_sari_tl(cpu_T[0], cpu_T[0], 15);
5285
            gen_op_mov_reg_T0(MO_16, R_EDX);
B
bellard 已提交
5286
        }
B
bellard 已提交
5287 5288 5289 5290
        break;
    case 0x1af: /* imul Gv, Ev */
    case 0x69: /* imul Gv, Ev, I */
    case 0x6b:
5291
        ot = dflag + MO_16;
5292
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5293 5294 5295 5296 5297
        reg = ((modrm >> 3) & 7) | rex_r;
        if (b == 0x69)
            s->rip_offset = insn_const_size(ot);
        else if (b == 0x6b)
            s->rip_offset = 1;
5298
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
B
bellard 已提交
5299
        if (b == 0x69) {
5300
            val = insn_get(env, s, ot);
B
bellard 已提交
5301 5302
            gen_op_movl_T1_im(val);
        } else if (b == 0x6b) {
5303
            val = (int8_t)insn_get(env, s, MO_8);
B
bellard 已提交
5304 5305
            gen_op_movl_T1_im(val);
        } else {
B
bellard 已提交
5306
            gen_op_mov_TN_reg(ot, 1, reg);
B
bellard 已提交
5307
        }
5308
        switch (ot) {
B
bellard 已提交
5309
#ifdef TARGET_X86_64
5310
        case MO_64:
5311 5312 5313 5314 5315
            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 已提交
5316
#endif
5317
        case MO_32:
5318 5319 5320 5321 5322 5323 5324 5325 5326 5327 5328
            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 已提交
5329 5330 5331 5332 5333 5334 5335
            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);
5336 5337
            gen_op_mov_reg_T0(ot, reg);
            break;
B
bellard 已提交
5338
        }
5339
        set_cc_op(s, CC_OP_MULB + ot);
B
bellard 已提交
5340 5341 5342 5343
        break;
    case 0x1c0:
    case 0x1c1: /* xadd Ev, Gv */
        if ((b & 1) == 0)
5344
            ot = MO_8;
B
bellard 已提交
5345
        else
5346
            ot = dflag + MO_16;
5347
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5348
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5349 5350
        mod = (modrm >> 6) & 3;
        if (mod == 3) {
B
bellard 已提交
5351
            rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
5352 5353
            gen_op_mov_TN_reg(ot, 0, reg);
            gen_op_mov_TN_reg(ot, 1, rm);
B
bellard 已提交
5354
            gen_op_addl_T0_T1();
B
bellard 已提交
5355 5356
            gen_op_mov_reg_T1(ot, reg);
            gen_op_mov_reg_T0(ot, rm);
B
bellard 已提交
5357
        } else {
5358
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
5359
            gen_op_mov_TN_reg(ot, 0, reg);
5360
            gen_op_ld_T1_A0(s, ot);
B
bellard 已提交
5361
            gen_op_addl_T0_T1();
5362
            gen_op_st_T0_A0(s, ot);
B
bellard 已提交
5363
            gen_op_mov_reg_T1(ot, reg);
B
bellard 已提交
5364 5365
        }
        gen_op_update2_cc();
5366
        set_cc_op(s, CC_OP_ADDB + ot);
B
bellard 已提交
5367 5368 5369
        break;
    case 0x1b0:
    case 0x1b1: /* cmpxchg Ev, Gv */
B
bellard 已提交
5370
        {
B
bellard 已提交
5371
            int label1, label2;
5372
            TCGv t0, t1, t2, a0;
B
bellard 已提交
5373 5374

            if ((b & 1) == 0)
5375
                ot = MO_8;
B
bellard 已提交
5376
            else
5377
                ot = dflag + MO_16;
5378
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5379 5380
            reg = ((modrm >> 3) & 7) | rex_r;
            mod = (modrm >> 6) & 3;
P
pbrook 已提交
5381 5382 5383 5384
            t0 = tcg_temp_local_new();
            t1 = tcg_temp_local_new();
            t2 = tcg_temp_local_new();
            a0 = tcg_temp_local_new();
5385
            gen_op_mov_v_reg(ot, t1, reg);
B
bellard 已提交
5386 5387
            if (mod == 3) {
                rm = (modrm & 7) | REX_B(s);
5388
                gen_op_mov_v_reg(ot, t0, rm);
B
bellard 已提交
5389
            } else {
5390
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
5391
                tcg_gen_mov_tl(a0, cpu_A0);
5392
                gen_op_ld_v(s, ot, t0, a0);
B
bellard 已提交
5393 5394 5395
                rm = 0; /* avoid warning */
            }
            label1 = gen_new_label();
5396 5397
            tcg_gen_mov_tl(t2, cpu_regs[R_EAX]);
            gen_extu(ot, t0);
5398
            gen_extu(ot, t2);
5399
            tcg_gen_brcond_tl(TCG_COND_EQ, t2, t0, label1);
5400
            label2 = gen_new_label();
B
bellard 已提交
5401
            if (mod == 3) {
5402
                gen_op_mov_reg_v(ot, R_EAX, t0);
B
bellard 已提交
5403 5404
                tcg_gen_br(label2);
                gen_set_label(label1);
5405
                gen_op_mov_reg_v(ot, rm, t1);
B
bellard 已提交
5406
            } else {
5407 5408 5409
                /* 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 */
5410
                gen_op_st_v(s, ot, t0, a0);
5411
                gen_op_mov_reg_v(ot, R_EAX, t0);
5412
                tcg_gen_br(label2);
B
bellard 已提交
5413
                gen_set_label(label1);
5414
                gen_op_st_v(s, ot, t1, a0);
B
bellard 已提交
5415
            }
5416
            gen_set_label(label2);
5417
            tcg_gen_mov_tl(cpu_cc_src, t0);
5418 5419
            tcg_gen_mov_tl(cpu_cc_srcT, t2);
            tcg_gen_sub_tl(cpu_cc_dst, t2, t0);
5420
            set_cc_op(s, CC_OP_SUBB + ot);
5421 5422 5423 5424
            tcg_temp_free(t0);
            tcg_temp_free(t1);
            tcg_temp_free(t2);
            tcg_temp_free(a0);
B
bellard 已提交
5425 5426 5427
        }
        break;
    case 0x1c7: /* cmpxchg8b */
5428
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5429
        mod = (modrm >> 6) & 3;
5430
        if ((mod == 3) || ((modrm & 0x38) != 0x8))
B
bellard 已提交
5431
            goto illegal_op;
B
bellard 已提交
5432 5433 5434 5435 5436
#ifdef TARGET_X86_64
        if (dflag == 2) {
            if (!(s->cpuid_ext_features & CPUID_EXT_CX16))
                goto illegal_op;
            gen_jmp_im(pc_start - s->cs_base);
5437
            gen_update_cc_op(s);
5438
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
Blue Swirl 已提交
5439
            gen_helper_cmpxchg16b(cpu_env, cpu_A0);
B
bellard 已提交
5440 5441 5442 5443 5444 5445
        } else
#endif        
        {
            if (!(s->cpuid_features & CPUID_CX8))
                goto illegal_op;
            gen_jmp_im(pc_start - s->cs_base);
5446
            gen_update_cc_op(s);
5447
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
Blue Swirl 已提交
5448
            gen_helper_cmpxchg8b(cpu_env, cpu_A0);
B
bellard 已提交
5449
        }
5450
        set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
5451
        break;
5452

B
bellard 已提交
5453 5454 5455
        /**************************/
        /* push/pop */
    case 0x50 ... 0x57: /* push */
5456
        gen_op_mov_TN_reg(MO_32, 0, (b & 7) | REX_B(s));
B
bellard 已提交
5457 5458 5459
        gen_push_T0(s);
        break;
    case 0x58 ... 0x5f: /* pop */
B
bellard 已提交
5460
        if (CODE64(s)) {
5461
            ot = dflag ? MO_64 : MO_16;
B
bellard 已提交
5462
        } else {
5463
            ot = dflag + MO_16;
B
bellard 已提交
5464
        }
B
bellard 已提交
5465
        gen_pop_T0(s);
B
bellard 已提交
5466
        /* NOTE: order is important for pop %sp */
B
bellard 已提交
5467
        gen_pop_update(s);
B
bellard 已提交
5468
        gen_op_mov_reg_T0(ot, (b & 7) | REX_B(s));
B
bellard 已提交
5469 5470
        break;
    case 0x60: /* pusha */
B
bellard 已提交
5471 5472
        if (CODE64(s))
            goto illegal_op;
B
bellard 已提交
5473 5474 5475
        gen_pusha(s);
        break;
    case 0x61: /* popa */
B
bellard 已提交
5476 5477
        if (CODE64(s))
            goto illegal_op;
B
bellard 已提交
5478 5479 5480 5481
        gen_popa(s);
        break;
    case 0x68: /* push Iv */
    case 0x6a:
B
bellard 已提交
5482
        if (CODE64(s)) {
5483
            ot = dflag ? MO_64 : MO_16;
B
bellard 已提交
5484
        } else {
5485
            ot = dflag + MO_16;
B
bellard 已提交
5486
        }
B
bellard 已提交
5487
        if (b == 0x68)
5488
            val = insn_get(env, s, ot);
B
bellard 已提交
5489
        else
5490
            val = (int8_t)insn_get(env, s, MO_8);
B
bellard 已提交
5491 5492 5493 5494
        gen_op_movl_T0_im(val);
        gen_push_T0(s);
        break;
    case 0x8f: /* pop Ev */
B
bellard 已提交
5495
        if (CODE64(s)) {
5496
            ot = dflag ? MO_64 : MO_16;
B
bellard 已提交
5497
        } else {
5498
            ot = dflag + MO_16;
B
bellard 已提交
5499
        }
5500
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5501
        mod = (modrm >> 6) & 3;
B
bellard 已提交
5502
        gen_pop_T0(s);
B
bellard 已提交
5503 5504 5505
        if (mod == 3) {
            /* NOTE: order is important for pop %sp */
            gen_pop_update(s);
B
bellard 已提交
5506
            rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
5507
            gen_op_mov_reg_T0(ot, rm);
B
bellard 已提交
5508 5509
        } else {
            /* NOTE: order is important too for MMU exceptions */
B
bellard 已提交
5510
            s->popl_esp_hack = 1 << ot;
5511
            gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 1);
B
bellard 已提交
5512 5513 5514
            s->popl_esp_hack = 0;
            gen_pop_update(s);
        }
B
bellard 已提交
5515 5516 5517 5518
        break;
    case 0xc8: /* enter */
        {
            int level;
5519
            val = cpu_lduw_code(env, s->pc);
B
bellard 已提交
5520
            s->pc += 2;
5521
            level = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5522 5523 5524 5525 5526
            gen_enter(s, val, level);
        }
        break;
    case 0xc9: /* leave */
        /* XXX: exception not precise (ESP is updated before potential exception) */
B
bellard 已提交
5527
        if (CODE64(s)) {
5528 5529
            gen_op_mov_TN_reg(MO_64, 0, R_EBP);
            gen_op_mov_reg_T0(MO_64, R_ESP);
B
bellard 已提交
5530
        } else if (s->ss32) {
5531 5532
            gen_op_mov_TN_reg(MO_32, 0, R_EBP);
            gen_op_mov_reg_T0(MO_32, R_ESP);
B
bellard 已提交
5533
        } else {
5534 5535
            gen_op_mov_TN_reg(MO_16, 0, R_EBP);
            gen_op_mov_reg_T0(MO_16, R_ESP);
B
bellard 已提交
5536 5537
        }
        gen_pop_T0(s);
B
bellard 已提交
5538
        if (CODE64(s)) {
5539
            ot = dflag ? MO_64 : MO_16;
B
bellard 已提交
5540
        } else {
5541
            ot = dflag + MO_16;
B
bellard 已提交
5542
        }
B
bellard 已提交
5543
        gen_op_mov_reg_T0(ot, R_EBP);
B
bellard 已提交
5544 5545 5546 5547 5548 5549
        gen_pop_update(s);
        break;
    case 0x06: /* push es */
    case 0x0e: /* push cs */
    case 0x16: /* push ss */
    case 0x1e: /* push ds */
B
bellard 已提交
5550 5551
        if (CODE64(s))
            goto illegal_op;
B
bellard 已提交
5552 5553 5554 5555 5556 5557 5558 5559 5560 5561 5562
        gen_op_movl_T0_seg(b >> 3);
        gen_push_T0(s);
        break;
    case 0x1a0: /* push fs */
    case 0x1a8: /* push gs */
        gen_op_movl_T0_seg((b >> 3) & 7);
        gen_push_T0(s);
        break;
    case 0x07: /* pop es */
    case 0x17: /* pop ss */
    case 0x1f: /* pop ds */
B
bellard 已提交
5563 5564
        if (CODE64(s))
            goto illegal_op;
B
bellard 已提交
5565 5566 5567 5568 5569
        reg = b >> 3;
        gen_pop_T0(s);
        gen_movl_seg_T0(s, reg, pc_start - s->cs_base);
        gen_pop_update(s);
        if (reg == R_SS) {
5570 5571 5572 5573
            /* if reg == SS, inhibit interrupts/trace. */
            /* If several instructions disable interrupts, only the
               _first_ does it */
            if (!(s->tb->flags & HF_INHIBIT_IRQ_MASK))
5574
                gen_helper_set_inhibit_irq(cpu_env);
B
bellard 已提交
5575 5576 5577
            s->tf = 0;
        }
        if (s->is_jmp) {
B
bellard 已提交
5578
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
5579 5580 5581 5582 5583 5584 5585 5586 5587
            gen_eob(s);
        }
        break;
    case 0x1a1: /* pop fs */
    case 0x1a9: /* pop gs */
        gen_pop_T0(s);
        gen_movl_seg_T0(s, (b >> 3) & 7, pc_start - s->cs_base);
        gen_pop_update(s);
        if (s->is_jmp) {
B
bellard 已提交
5588
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
5589 5590 5591 5592 5593 5594 5595 5596 5597
            gen_eob(s);
        }
        break;

        /**************************/
        /* mov */
    case 0x88:
    case 0x89: /* mov Gv, Ev */
        if ((b & 1) == 0)
5598
            ot = MO_8;
B
bellard 已提交
5599
        else
5600
            ot = dflag + MO_16;
5601
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5602
        reg = ((modrm >> 3) & 7) | rex_r;
5603

B
bellard 已提交
5604
        /* generate a generic store */
5605
        gen_ldst_modrm(env, s, modrm, ot, reg, 1);
B
bellard 已提交
5606 5607 5608 5609
        break;
    case 0xc6:
    case 0xc7: /* mov Ev, Iv */
        if ((b & 1) == 0)
5610
            ot = MO_8;
B
bellard 已提交
5611
        else
5612
            ot = dflag + MO_16;
5613
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5614
        mod = (modrm >> 6) & 3;
B
bellard 已提交
5615 5616
        if (mod != 3) {
            s->rip_offset = insn_const_size(ot);
5617
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
5618
        }
5619
        val = insn_get(env, s, ot);
B
bellard 已提交
5620 5621
        gen_op_movl_T0_im(val);
        if (mod != 3)
5622
            gen_op_st_T0_A0(s, ot);
B
bellard 已提交
5623
        else
B
bellard 已提交
5624
            gen_op_mov_reg_T0(ot, (modrm & 7) | REX_B(s));
B
bellard 已提交
5625 5626 5627 5628
        break;
    case 0x8a:
    case 0x8b: /* mov Ev, Gv */
        if ((b & 1) == 0)
5629
            ot = MO_8;
B
bellard 已提交
5630
        else
5631
            ot = MO_16 + dflag;
5632
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5633
        reg = ((modrm >> 3) & 7) | rex_r;
5634

5635
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
B
bellard 已提交
5636
        gen_op_mov_reg_T0(ot, reg);
B
bellard 已提交
5637 5638
        break;
    case 0x8e: /* mov seg, Gv */
5639
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5640 5641 5642
        reg = (modrm >> 3) & 7;
        if (reg >= 6 || reg == R_CS)
            goto illegal_op;
5643
        gen_ldst_modrm(env, s, modrm, MO_16, OR_TMP0, 0);
B
bellard 已提交
5644 5645 5646
        gen_movl_seg_T0(s, reg, pc_start - s->cs_base);
        if (reg == R_SS) {
            /* if reg == SS, inhibit interrupts/trace */
5647 5648 5649
            /* If several instructions disable interrupts, only the
               _first_ does it */
            if (!(s->tb->flags & HF_INHIBIT_IRQ_MASK))
5650
                gen_helper_set_inhibit_irq(cpu_env);
B
bellard 已提交
5651 5652 5653
            s->tf = 0;
        }
        if (s->is_jmp) {
B
bellard 已提交
5654
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
5655 5656 5657 5658
            gen_eob(s);
        }
        break;
    case 0x8c: /* mov Gv, seg */
5659
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5660 5661 5662 5663 5664
        reg = (modrm >> 3) & 7;
        mod = (modrm >> 6) & 3;
        if (reg >= 6)
            goto illegal_op;
        gen_op_movl_T0_seg(reg);
B
bellard 已提交
5665
        if (mod == 3)
5666
            ot = MO_16 + dflag;
B
bellard 已提交
5667
        else
5668
            ot = MO_16;
5669
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 1);
B
bellard 已提交
5670 5671 5672 5673 5674 5675 5676 5677 5678
        break;

    case 0x1b6: /* movzbS Gv, Eb */
    case 0x1b7: /* movzwS Gv, Eb */
    case 0x1be: /* movsbS Gv, Eb */
    case 0x1bf: /* movswS Gv, Eb */
        {
            int d_ot;
            /* d_ot is the size of destination */
5679
            d_ot = dflag + MO_16;
B
bellard 已提交
5680
            /* ot is the size of source */
5681
            ot = (b & 1) + MO_8;
5682
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5683
            reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5684
            mod = (modrm >> 6) & 3;
B
bellard 已提交
5685
            rm = (modrm & 7) | REX_B(s);
5686

B
bellard 已提交
5687
            if (mod == 3) {
B
bellard 已提交
5688
                gen_op_mov_TN_reg(ot, 0, rm);
B
bellard 已提交
5689
                switch(ot | (b & 8)) {
5690
                case MO_8:
B
bellard 已提交
5691
                    tcg_gen_ext8u_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
5692
                    break;
5693
                case MO_8 | 8:
B
bellard 已提交
5694
                    tcg_gen_ext8s_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
5695
                    break;
5696
                case MO_16:
B
bellard 已提交
5697
                    tcg_gen_ext16u_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
5698 5699
                    break;
                default:
5700
                case MO_16 | 8:
B
bellard 已提交
5701
                    tcg_gen_ext16s_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
5702 5703
                    break;
                }
B
bellard 已提交
5704
                gen_op_mov_reg_T0(d_ot, reg);
B
bellard 已提交
5705
            } else {
5706
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
5707
                if (b & 8) {
5708
                    gen_op_lds_T0_A0(s, ot);
B
bellard 已提交
5709
                } else {
5710
                    gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
5711
                }
B
bellard 已提交
5712
                gen_op_mov_reg_T0(d_ot, reg);
B
bellard 已提交
5713 5714 5715 5716 5717
            }
        }
        break;

    case 0x8d: /* lea */
5718
        ot = dflag + MO_16;
5719
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5720 5721 5722
        mod = (modrm >> 6) & 3;
        if (mod == 3)
            goto illegal_op;
B
bellard 已提交
5723
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5724 5725 5726 5727
        /* we must ensure that no segment is added */
        s->override = -1;
        val = s->addseg;
        s->addseg = 0;
5728
        gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
5729
        s->addseg = val;
5730
        gen_op_mov_reg_A0(ot - MO_16, reg);
B
bellard 已提交
5731
        break;
5732

B
bellard 已提交
5733 5734 5735 5736 5737
    case 0xa0: /* mov EAX, Ov */
    case 0xa1:
    case 0xa2: /* mov Ov, EAX */
    case 0xa3:
        {
B
bellard 已提交
5738 5739 5740
            target_ulong offset_addr;

            if ((b & 1) == 0)
5741
                ot = MO_8;
B
bellard 已提交
5742
            else
5743
                ot = dflag + MO_16;
B
bellard 已提交
5744
#ifdef TARGET_X86_64
5745
            if (s->aflag == 2) {
5746
                offset_addr = cpu_ldq_code(env, s->pc);
B
bellard 已提交
5747
                s->pc += 8;
B
bellard 已提交
5748
                gen_op_movq_A0_im(offset_addr);
5749
            } else
B
bellard 已提交
5750 5751 5752
#endif
            {
                if (s->aflag) {
5753
                    offset_addr = insn_get(env, s, MO_32);
B
bellard 已提交
5754
                } else {
5755
                    offset_addr = insn_get(env, s, MO_16);
B
bellard 已提交
5756 5757 5758
                }
                gen_op_movl_A0_im(offset_addr);
            }
B
bellard 已提交
5759
            gen_add_A0_ds_seg(s);
B
bellard 已提交
5760
            if ((b & 2) == 0) {
5761
                gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
5762
                gen_op_mov_reg_T0(ot, R_EAX);
B
bellard 已提交
5763
            } else {
B
bellard 已提交
5764
                gen_op_mov_TN_reg(ot, 0, R_EAX);
5765
                gen_op_st_T0_A0(s, ot);
B
bellard 已提交
5766 5767 5768 5769
            }
        }
        break;
    case 0xd7: /* xlat */
B
bellard 已提交
5770
#ifdef TARGET_X86_64
5771
        if (s->aflag == 2) {
B
bellard 已提交
5772
            gen_op_movq_A0_reg(R_EBX);
5773
            gen_op_mov_TN_reg(MO_64, 0, R_EAX);
5774 5775
            tcg_gen_andi_tl(cpu_T[0], cpu_T[0], 0xff);
            tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_T[0]);
5776
        } else
B
bellard 已提交
5777 5778
#endif
        {
B
bellard 已提交
5779
            gen_op_movl_A0_reg(R_EBX);
5780
            gen_op_mov_TN_reg(MO_32, 0, R_EAX);
5781 5782
            tcg_gen_andi_tl(cpu_T[0], cpu_T[0], 0xff);
            tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_T[0]);
B
bellard 已提交
5783 5784
            if (s->aflag == 0)
                gen_op_andl_A0_ffff();
5785 5786
            else
                tcg_gen_andi_tl(cpu_A0, cpu_A0, 0xffffffff);
B
bellard 已提交
5787
        }
B
bellard 已提交
5788
        gen_add_A0_ds_seg(s);
5789
        gen_op_ld_v(s, MO_8, cpu_T[0], cpu_A0);
5790
        gen_op_mov_reg_T0(MO_8, R_EAX);
B
bellard 已提交
5791 5792
        break;
    case 0xb0 ... 0xb7: /* mov R, Ib */
5793
        val = insn_get(env, s, MO_8);
B
bellard 已提交
5794
        gen_op_movl_T0_im(val);
5795
        gen_op_mov_reg_T0(MO_8, (b & 7) | REX_B(s));
B
bellard 已提交
5796 5797
        break;
    case 0xb8 ... 0xbf: /* mov R, Iv */
B
bellard 已提交
5798 5799 5800 5801
#ifdef TARGET_X86_64
        if (dflag == 2) {
            uint64_t tmp;
            /* 64 bit case */
5802
            tmp = cpu_ldq_code(env, s->pc);
B
bellard 已提交
5803 5804 5805
            s->pc += 8;
            reg = (b & 7) | REX_B(s);
            gen_movtl_T0_im(tmp);
5806
            gen_op_mov_reg_T0(MO_64, reg);
5807
        } else
B
bellard 已提交
5808 5809
#endif
        {
5810
            ot = dflag ? MO_32 : MO_16;
5811
            val = insn_get(env, s, ot);
B
bellard 已提交
5812 5813
            reg = (b & 7) | REX_B(s);
            gen_op_movl_T0_im(val);
B
bellard 已提交
5814
            gen_op_mov_reg_T0(ot, reg);
B
bellard 已提交
5815
        }
B
bellard 已提交
5816 5817 5818
        break;

    case 0x91 ... 0x97: /* xchg R, EAX */
R
Richard Henderson 已提交
5819
    do_xchg_reg_eax:
5820
        ot = dflag + MO_16;
B
bellard 已提交
5821
        reg = (b & 7) | REX_B(s);
B
bellard 已提交
5822 5823 5824 5825 5826
        rm = R_EAX;
        goto do_xchg_reg;
    case 0x86:
    case 0x87: /* xchg Ev, Gv */
        if ((b & 1) == 0)
5827
            ot = MO_8;
B
bellard 已提交
5828
        else
5829
            ot = dflag + MO_16;
5830
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5831
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5832 5833
        mod = (modrm >> 6) & 3;
        if (mod == 3) {
B
bellard 已提交
5834
            rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
5835
        do_xchg_reg:
B
bellard 已提交
5836 5837 5838 5839
            gen_op_mov_TN_reg(ot, 0, reg);
            gen_op_mov_TN_reg(ot, 1, rm);
            gen_op_mov_reg_T0(ot, rm);
            gen_op_mov_reg_T1(ot, reg);
B
bellard 已提交
5840
        } else {
5841
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
5842
            gen_op_mov_TN_reg(ot, 0, reg);
B
bellard 已提交
5843 5844
            /* for xchg, lock is implicit */
            if (!(prefixes & PREFIX_LOCK))
P
pbrook 已提交
5845
                gen_helper_lock();
5846 5847
            gen_op_ld_T1_A0(s, ot);
            gen_op_st_T0_A0(s, ot);
B
bellard 已提交
5848
            if (!(prefixes & PREFIX_LOCK))
P
pbrook 已提交
5849
                gen_helper_unlock();
B
bellard 已提交
5850
            gen_op_mov_reg_T1(ot, reg);
B
bellard 已提交
5851 5852 5853
        }
        break;
    case 0xc4: /* les Gv */
5854
        /* In CODE64 this is VEX3; see above.  */
B
bellard 已提交
5855 5856 5857
        op = R_ES;
        goto do_lxx;
    case 0xc5: /* lds Gv */
5858
        /* In CODE64 this is VEX2; see above.  */
B
bellard 已提交
5859 5860 5861 5862 5863 5864 5865 5866 5867 5868 5869
        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:
5870
        ot = dflag ? MO_32 : MO_16;
5871
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5872
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5873 5874 5875
        mod = (modrm >> 6) & 3;
        if (mod == 3)
            goto illegal_op;
5876
        gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
5877
        gen_op_ld_T1_A0(s, ot);
5878
        gen_add_A0_im(s, 1 << (ot - MO_16 + 1));
B
bellard 已提交
5879
        /* load the segment first to handle exceptions properly */
5880
        gen_op_ld_v(s, MO_16, cpu_T[0], cpu_A0);
B
bellard 已提交
5881 5882
        gen_movl_seg_T0(s, op, pc_start - s->cs_base);
        /* then put the data */
B
bellard 已提交
5883
        gen_op_mov_reg_T1(ot, reg);
B
bellard 已提交
5884
        if (s->is_jmp) {
B
bellard 已提交
5885
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
5886 5887 5888
            gen_eob(s);
        }
        break;
5889

B
bellard 已提交
5890 5891 5892 5893 5894 5895 5896 5897 5898
        /************************/
        /* shifts */
    case 0xc0:
    case 0xc1:
        /* shift Ev,Ib */
        shift = 2;
    grp2:
        {
            if ((b & 1) == 0)
5899
                ot = MO_8;
B
bellard 已提交
5900
            else
5901
                ot = dflag + MO_16;
5902

5903
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5904 5905
            mod = (modrm >> 6) & 3;
            op = (modrm >> 3) & 7;
5906

B
bellard 已提交
5907
            if (mod != 3) {
B
bellard 已提交
5908 5909 5910
                if (shift == 2) {
                    s->rip_offset = 1;
                }
5911
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
5912 5913
                opreg = OR_TMP0;
            } else {
B
bellard 已提交
5914
                opreg = (modrm & 7) | REX_B(s);
B
bellard 已提交
5915 5916 5917 5918 5919 5920 5921
            }

            /* simpler op */
            if (shift == 0) {
                gen_shift(s, op, ot, opreg, OR_ECX);
            } else {
                if (shift == 2) {
5922
                    shift = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5923 5924 5925 5926 5927 5928 5929 5930 5931 5932 5933 5934 5935 5936 5937 5938 5939 5940 5941 5942 5943 5944 5945 5946 5947 5948 5949 5950 5951 5952 5953 5954
                }
                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:
5955
        ot = dflag + MO_16;
5956
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5957
        mod = (modrm >> 6) & 3;
B
bellard 已提交
5958 5959
        rm = (modrm & 7) | REX_B(s);
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5960
        if (mod != 3) {
5961
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
5962
            opreg = OR_TMP0;
B
bellard 已提交
5963
        } else {
5964
            opreg = rm;
B
bellard 已提交
5965
        }
B
bellard 已提交
5966
        gen_op_mov_TN_reg(ot, 1, reg);
5967

B
bellard 已提交
5968
        if (shift) {
P
Paolo Bonzini 已提交
5969 5970 5971
            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 已提交
5972
        } else {
P
Paolo Bonzini 已提交
5973
            gen_shiftd_rm_T1(s, ot, opreg, op, cpu_regs[R_ECX]);
B
bellard 已提交
5974 5975 5976 5977 5978
        }
        break;

        /************************/
        /* floats */
5979
    case 0xd8 ... 0xdf:
B
bellard 已提交
5980 5981 5982 5983 5984 5985
        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;
        }
5986
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5987 5988 5989 5990 5991
        mod = (modrm >> 6) & 3;
        rm = modrm & 7;
        op = ((b & 7) << 3) | ((modrm >> 3) & 7);
        if (mod != 3) {
            /* memory op */
5992
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
5993 5994 5995 5996 5997 5998 5999 6000 6001 6002 6003
            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:
6004
                        gen_op_ld_v(s, MO_32, cpu_T[0], cpu_A0);
6005
                        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
B
Blue Swirl 已提交
6006
                        gen_helper_flds_FT0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
6007 6008
                        break;
                    case 1:
6009
                        gen_op_ld_v(s, MO_32, cpu_T[0], cpu_A0);
6010
                        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
B
Blue Swirl 已提交
6011
                        gen_helper_fildl_FT0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
6012 6013
                        break;
                    case 2:
6014 6015
                        tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0,
                                            s->mem_index, MO_LEQ);
B
Blue Swirl 已提交
6016
                        gen_helper_fldl_FT0(cpu_env, cpu_tmp1_i64);
B
bellard 已提交
6017 6018 6019
                        break;
                    case 3:
                    default:
6020
                        gen_op_lds_T0_A0(s, MO_16);
6021
                        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
B
Blue Swirl 已提交
6022
                        gen_helper_fildl_FT0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
6023 6024
                        break;
                    }
6025

P
pbrook 已提交
6026
                    gen_helper_fp_arith_ST0_FT0(op1);
B
bellard 已提交
6027 6028
                    if (op1 == 3) {
                        /* fcomp needs pop */
B
Blue Swirl 已提交
6029
                        gen_helper_fpop(cpu_env);
B
bellard 已提交
6030 6031 6032 6033 6034 6035
                    }
                }
                break;
            case 0x08: /* flds */
            case 0x0a: /* fsts */
            case 0x0b: /* fstps */
B
bellard 已提交
6036 6037 6038
            case 0x18 ... 0x1b: /* fildl, fisttpl, fistl, fistpl */
            case 0x28 ... 0x2b: /* fldl, fisttpll, fstl, fstpl */
            case 0x38 ... 0x3b: /* filds, fisttps, fists, fistps */
B
bellard 已提交
6039 6040 6041 6042
                switch(op & 7) {
                case 0:
                    switch(op >> 4) {
                    case 0:
6043
                        gen_op_ld_v(s, MO_32, cpu_T[0], cpu_A0);
6044
                        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
B
Blue Swirl 已提交
6045
                        gen_helper_flds_ST0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
6046 6047
                        break;
                    case 1:
6048
                        gen_op_ld_v(s, MO_32, cpu_T[0], cpu_A0);
6049
                        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
B
Blue Swirl 已提交
6050
                        gen_helper_fildl_ST0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
6051 6052
                        break;
                    case 2:
6053 6054
                        tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0,
                                            s->mem_index, MO_LEQ);
B
Blue Swirl 已提交
6055
                        gen_helper_fldl_ST0(cpu_env, cpu_tmp1_i64);
B
bellard 已提交
6056 6057 6058
                        break;
                    case 3:
                    default:
6059
                        gen_op_lds_T0_A0(s, MO_16);
6060
                        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
B
Blue Swirl 已提交
6061
                        gen_helper_fildl_ST0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
6062 6063 6064
                        break;
                    }
                    break;
B
bellard 已提交
6065
                case 1:
B
bellard 已提交
6066
                    /* XXX: the corresponding CPUID bit must be tested ! */
B
bellard 已提交
6067 6068
                    switch(op >> 4) {
                    case 1:
B
Blue Swirl 已提交
6069
                        gen_helper_fisttl_ST0(cpu_tmp2_i32, cpu_env);
6070
                        tcg_gen_extu_i32_tl(cpu_T[0], cpu_tmp2_i32);
6071
                        gen_op_st_T0_A0(s, MO_32);
B
bellard 已提交
6072 6073
                        break;
                    case 2:
B
Blue Swirl 已提交
6074
                        gen_helper_fisttll_ST0(cpu_tmp1_i64, cpu_env);
6075 6076
                        tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0,
                                            s->mem_index, MO_LEQ);
B
bellard 已提交
6077 6078 6079
                        break;
                    case 3:
                    default:
B
Blue Swirl 已提交
6080
                        gen_helper_fistt_ST0(cpu_tmp2_i32, cpu_env);
6081
                        tcg_gen_extu_i32_tl(cpu_T[0], cpu_tmp2_i32);
6082
                        gen_op_st_T0_A0(s, MO_16);
B
bellard 已提交
6083
                        break;
B
bellard 已提交
6084
                    }
B
Blue Swirl 已提交
6085
                    gen_helper_fpop(cpu_env);
B
bellard 已提交
6086
                    break;
B
bellard 已提交
6087 6088 6089
                default:
                    switch(op >> 4) {
                    case 0:
B
Blue Swirl 已提交
6090
                        gen_helper_fsts_ST0(cpu_tmp2_i32, cpu_env);
6091
                        tcg_gen_extu_i32_tl(cpu_T[0], cpu_tmp2_i32);
6092
                        gen_op_st_T0_A0(s, MO_32);
B
bellard 已提交
6093 6094
                        break;
                    case 1:
B
Blue Swirl 已提交
6095
                        gen_helper_fistl_ST0(cpu_tmp2_i32, cpu_env);
6096
                        tcg_gen_extu_i32_tl(cpu_T[0], cpu_tmp2_i32);
6097
                        gen_op_st_T0_A0(s, MO_32);
B
bellard 已提交
6098 6099
                        break;
                    case 2:
B
Blue Swirl 已提交
6100
                        gen_helper_fstl_ST0(cpu_tmp1_i64, cpu_env);
6101 6102
                        tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0,
                                            s->mem_index, MO_LEQ);
B
bellard 已提交
6103 6104 6105
                        break;
                    case 3:
                    default:
B
Blue Swirl 已提交
6106
                        gen_helper_fist_ST0(cpu_tmp2_i32, cpu_env);
6107
                        tcg_gen_extu_i32_tl(cpu_T[0], cpu_tmp2_i32);
6108
                        gen_op_st_T0_A0(s, MO_16);
B
bellard 已提交
6109 6110 6111
                        break;
                    }
                    if ((op & 7) == 3)
B
Blue Swirl 已提交
6112
                        gen_helper_fpop(cpu_env);
B
bellard 已提交
6113 6114 6115 6116
                    break;
                }
                break;
            case 0x0c: /* fldenv mem */
6117
                gen_update_cc_op(s);
B
bellard 已提交
6118
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
6119
                gen_helper_fldenv(cpu_env, cpu_A0, tcg_const_i32(s->dflag));
B
bellard 已提交
6120 6121
                break;
            case 0x0d: /* fldcw mem */
6122
                gen_op_ld_v(s, MO_16, cpu_T[0], cpu_A0);
6123
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
B
Blue Swirl 已提交
6124
                gen_helper_fldcw(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
6125 6126
                break;
            case 0x0e: /* fnstenv mem */
6127
                gen_update_cc_op(s);
B
bellard 已提交
6128
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
6129
                gen_helper_fstenv(cpu_env, cpu_A0, tcg_const_i32(s->dflag));
B
bellard 已提交
6130 6131
                break;
            case 0x0f: /* fnstcw mem */
B
Blue Swirl 已提交
6132
                gen_helper_fnstcw(cpu_tmp2_i32, cpu_env);
6133
                tcg_gen_extu_i32_tl(cpu_T[0], cpu_tmp2_i32);
6134
                gen_op_st_T0_A0(s, MO_16);
B
bellard 已提交
6135 6136
                break;
            case 0x1d: /* fldt mem */
6137
                gen_update_cc_op(s);
B
bellard 已提交
6138
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
6139
                gen_helper_fldt_ST0(cpu_env, cpu_A0);
B
bellard 已提交
6140 6141
                break;
            case 0x1f: /* fstpt mem */
6142
                gen_update_cc_op(s);
B
bellard 已提交
6143
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
6144 6145
                gen_helper_fstt_ST0(cpu_env, cpu_A0);
                gen_helper_fpop(cpu_env);
B
bellard 已提交
6146 6147
                break;
            case 0x2c: /* frstor mem */
6148
                gen_update_cc_op(s);
B
bellard 已提交
6149
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
6150
                gen_helper_frstor(cpu_env, cpu_A0, tcg_const_i32(s->dflag));
B
bellard 已提交
6151 6152
                break;
            case 0x2e: /* fnsave mem */
6153
                gen_update_cc_op(s);
B
bellard 已提交
6154
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
6155
                gen_helper_fsave(cpu_env, cpu_A0, tcg_const_i32(s->dflag));
B
bellard 已提交
6156 6157
                break;
            case 0x2f: /* fnstsw mem */
B
Blue Swirl 已提交
6158
                gen_helper_fnstsw(cpu_tmp2_i32, cpu_env);
6159
                tcg_gen_extu_i32_tl(cpu_T[0], cpu_tmp2_i32);
6160
                gen_op_st_T0_A0(s, MO_16);
B
bellard 已提交
6161 6162
                break;
            case 0x3c: /* fbld */
6163
                gen_update_cc_op(s);
B
bellard 已提交
6164
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
6165
                gen_helper_fbld_ST0(cpu_env, cpu_A0);
B
bellard 已提交
6166 6167
                break;
            case 0x3e: /* fbstp */
6168
                gen_update_cc_op(s);
B
bellard 已提交
6169
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
6170 6171
                gen_helper_fbst_ST0(cpu_env, cpu_A0);
                gen_helper_fpop(cpu_env);
B
bellard 已提交
6172 6173
                break;
            case 0x3d: /* fildll */
6174
                tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0, s->mem_index, MO_LEQ);
B
Blue Swirl 已提交
6175
                gen_helper_fildll_ST0(cpu_env, cpu_tmp1_i64);
B
bellard 已提交
6176 6177
                break;
            case 0x3f: /* fistpll */
B
Blue Swirl 已提交
6178
                gen_helper_fistll_ST0(cpu_tmp1_i64, cpu_env);
6179
                tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0, s->mem_index, MO_LEQ);
B
Blue Swirl 已提交
6180
                gen_helper_fpop(cpu_env);
B
bellard 已提交
6181 6182 6183 6184 6185 6186 6187 6188 6189 6190
                break;
            default:
                goto illegal_op;
            }
        } else {
            /* register float ops */
            opreg = rm;

            switch(op) {
            case 0x08: /* fld sti */
B
Blue Swirl 已提交
6191 6192 6193
                gen_helper_fpush(cpu_env);
                gen_helper_fmov_ST0_STN(cpu_env,
                                        tcg_const_i32((opreg + 1) & 7));
B
bellard 已提交
6194 6195
                break;
            case 0x09: /* fxchg sti */
B
bellard 已提交
6196 6197
            case 0x29: /* fxchg4 sti, undocumented op */
            case 0x39: /* fxchg7 sti, undocumented op */
B
Blue Swirl 已提交
6198
                gen_helper_fxchg_ST0_STN(cpu_env, tcg_const_i32(opreg));
B
bellard 已提交
6199 6200 6201 6202
                break;
            case 0x0a: /* grp d9/2 */
                switch(rm) {
                case 0: /* fnop */
6203
                    /* check exceptions (FreeBSD FPU probe) */
6204
                    gen_update_cc_op(s);
B
bellard 已提交
6205
                    gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
6206
                    gen_helper_fwait(cpu_env);
B
bellard 已提交
6207 6208 6209 6210 6211 6212 6213 6214
                    break;
                default:
                    goto illegal_op;
                }
                break;
            case 0x0c: /* grp d9/4 */
                switch(rm) {
                case 0: /* fchs */
B
Blue Swirl 已提交
6215
                    gen_helper_fchs_ST0(cpu_env);
B
bellard 已提交
6216 6217
                    break;
                case 1: /* fabs */
B
Blue Swirl 已提交
6218
                    gen_helper_fabs_ST0(cpu_env);
B
bellard 已提交
6219 6220
                    break;
                case 4: /* ftst */
B
Blue Swirl 已提交
6221 6222
                    gen_helper_fldz_FT0(cpu_env);
                    gen_helper_fcom_ST0_FT0(cpu_env);
B
bellard 已提交
6223 6224
                    break;
                case 5: /* fxam */
B
Blue Swirl 已提交
6225
                    gen_helper_fxam_ST0(cpu_env);
B
bellard 已提交
6226 6227 6228 6229 6230 6231 6232 6233 6234
                    break;
                default:
                    goto illegal_op;
                }
                break;
            case 0x0d: /* grp d9/5 */
                {
                    switch(rm) {
                    case 0:
B
Blue Swirl 已提交
6235 6236
                        gen_helper_fpush(cpu_env);
                        gen_helper_fld1_ST0(cpu_env);
B
bellard 已提交
6237 6238
                        break;
                    case 1:
B
Blue Swirl 已提交
6239 6240
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldl2t_ST0(cpu_env);
B
bellard 已提交
6241 6242
                        break;
                    case 2:
B
Blue Swirl 已提交
6243 6244
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldl2e_ST0(cpu_env);
B
bellard 已提交
6245 6246
                        break;
                    case 3:
B
Blue Swirl 已提交
6247 6248
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldpi_ST0(cpu_env);
B
bellard 已提交
6249 6250
                        break;
                    case 4:
B
Blue Swirl 已提交
6251 6252
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldlg2_ST0(cpu_env);
B
bellard 已提交
6253 6254
                        break;
                    case 5:
B
Blue Swirl 已提交
6255 6256
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldln2_ST0(cpu_env);
B
bellard 已提交
6257 6258
                        break;
                    case 6:
B
Blue Swirl 已提交
6259 6260
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldz_ST0(cpu_env);
B
bellard 已提交
6261 6262 6263 6264 6265 6266 6267 6268 6269
                        break;
                    default:
                        goto illegal_op;
                    }
                }
                break;
            case 0x0e: /* grp d9/6 */
                switch(rm) {
                case 0: /* f2xm1 */
B
Blue Swirl 已提交
6270
                    gen_helper_f2xm1(cpu_env);
B
bellard 已提交
6271 6272
                    break;
                case 1: /* fyl2x */
B
Blue Swirl 已提交
6273
                    gen_helper_fyl2x(cpu_env);
B
bellard 已提交
6274 6275
                    break;
                case 2: /* fptan */
B
Blue Swirl 已提交
6276
                    gen_helper_fptan(cpu_env);
B
bellard 已提交
6277 6278
                    break;
                case 3: /* fpatan */
B
Blue Swirl 已提交
6279
                    gen_helper_fpatan(cpu_env);
B
bellard 已提交
6280 6281
                    break;
                case 4: /* fxtract */
B
Blue Swirl 已提交
6282
                    gen_helper_fxtract(cpu_env);
B
bellard 已提交
6283 6284
                    break;
                case 5: /* fprem1 */
B
Blue Swirl 已提交
6285
                    gen_helper_fprem1(cpu_env);
B
bellard 已提交
6286 6287
                    break;
                case 6: /* fdecstp */
B
Blue Swirl 已提交
6288
                    gen_helper_fdecstp(cpu_env);
B
bellard 已提交
6289 6290 6291
                    break;
                default:
                case 7: /* fincstp */
B
Blue Swirl 已提交
6292
                    gen_helper_fincstp(cpu_env);
B
bellard 已提交
6293 6294 6295 6296 6297 6298
                    break;
                }
                break;
            case 0x0f: /* grp d9/7 */
                switch(rm) {
                case 0: /* fprem */
B
Blue Swirl 已提交
6299
                    gen_helper_fprem(cpu_env);
B
bellard 已提交
6300 6301
                    break;
                case 1: /* fyl2xp1 */
B
Blue Swirl 已提交
6302
                    gen_helper_fyl2xp1(cpu_env);
B
bellard 已提交
6303 6304
                    break;
                case 2: /* fsqrt */
B
Blue Swirl 已提交
6305
                    gen_helper_fsqrt(cpu_env);
B
bellard 已提交
6306 6307
                    break;
                case 3: /* fsincos */
B
Blue Swirl 已提交
6308
                    gen_helper_fsincos(cpu_env);
B
bellard 已提交
6309 6310
                    break;
                case 5: /* fscale */
B
Blue Swirl 已提交
6311
                    gen_helper_fscale(cpu_env);
B
bellard 已提交
6312 6313
                    break;
                case 4: /* frndint */
B
Blue Swirl 已提交
6314
                    gen_helper_frndint(cpu_env);
B
bellard 已提交
6315 6316
                    break;
                case 6: /* fsin */
B
Blue Swirl 已提交
6317
                    gen_helper_fsin(cpu_env);
B
bellard 已提交
6318 6319 6320
                    break;
                default:
                case 7: /* fcos */
B
Blue Swirl 已提交
6321
                    gen_helper_fcos(cpu_env);
B
bellard 已提交
6322 6323 6324 6325 6326 6327 6328 6329
                    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;
6330

B
bellard 已提交
6331 6332
                    op1 = op & 7;
                    if (op >= 0x20) {
P
pbrook 已提交
6333
                        gen_helper_fp_arith_STN_ST0(op1, opreg);
B
bellard 已提交
6334
                        if (op >= 0x30)
B
Blue Swirl 已提交
6335
                            gen_helper_fpop(cpu_env);
B
bellard 已提交
6336
                    } else {
B
Blue Swirl 已提交
6337
                        gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
P
pbrook 已提交
6338
                        gen_helper_fp_arith_ST0_FT0(op1);
B
bellard 已提交
6339 6340 6341 6342
                    }
                }
                break;
            case 0x02: /* fcom */
B
bellard 已提交
6343
            case 0x22: /* fcom2, undocumented op */
B
Blue Swirl 已提交
6344 6345
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fcom_ST0_FT0(cpu_env);
B
bellard 已提交
6346 6347
                break;
            case 0x03: /* fcomp */
B
bellard 已提交
6348 6349
            case 0x23: /* fcomp3, undocumented op */
            case 0x32: /* fcomp5, undocumented op */
B
Blue Swirl 已提交
6350 6351 6352
                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 已提交
6353 6354 6355 6356
                break;
            case 0x15: /* da/5 */
                switch(rm) {
                case 1: /* fucompp */
B
Blue Swirl 已提交
6357 6358 6359 6360
                    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 已提交
6361 6362 6363 6364 6365 6366 6367 6368 6369 6370 6371 6372
                    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 已提交
6373
                    gen_helper_fclex(cpu_env);
B
bellard 已提交
6374 6375
                    break;
                case 3: /* fninit */
B
Blue Swirl 已提交
6376
                    gen_helper_fninit(cpu_env);
B
bellard 已提交
6377 6378 6379 6380 6381 6382 6383 6384
                    break;
                case 4: /* fsetpm (287 only, just do nop here) */
                    break;
                default:
                    goto illegal_op;
                }
                break;
            case 0x1d: /* fucomi */
6385 6386 6387
                if (!(s->cpuid_features & CPUID_CMOV)) {
                    goto illegal_op;
                }
6388
                gen_update_cc_op(s);
B
Blue Swirl 已提交
6389 6390
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fucomi_ST0_FT0(cpu_env);
6391
                set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6392 6393
                break;
            case 0x1e: /* fcomi */
6394 6395 6396
                if (!(s->cpuid_features & CPUID_CMOV)) {
                    goto illegal_op;
                }
6397
                gen_update_cc_op(s);
B
Blue Swirl 已提交
6398 6399
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fcomi_ST0_FT0(cpu_env);
6400
                set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6401
                break;
B
bellard 已提交
6402
            case 0x28: /* ffree sti */
B
Blue Swirl 已提交
6403
                gen_helper_ffree_STN(cpu_env, tcg_const_i32(opreg));
6404
                break;
B
bellard 已提交
6405
            case 0x2a: /* fst sti */
B
Blue Swirl 已提交
6406
                gen_helper_fmov_STN_ST0(cpu_env, tcg_const_i32(opreg));
B
bellard 已提交
6407 6408
                break;
            case 0x2b: /* fstp sti */
B
bellard 已提交
6409 6410 6411
            case 0x0b: /* fstp1 sti, undocumented op */
            case 0x3a: /* fstp8 sti, undocumented op */
            case 0x3b: /* fstp9 sti, undocumented op */
B
Blue Swirl 已提交
6412 6413
                gen_helper_fmov_STN_ST0(cpu_env, tcg_const_i32(opreg));
                gen_helper_fpop(cpu_env);
B
bellard 已提交
6414 6415
                break;
            case 0x2c: /* fucom st(i) */
B
Blue Swirl 已提交
6416 6417
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fucom_ST0_FT0(cpu_env);
B
bellard 已提交
6418 6419
                break;
            case 0x2d: /* fucomp st(i) */
B
Blue Swirl 已提交
6420 6421 6422
                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 已提交
6423 6424 6425 6426
                break;
            case 0x33: /* de/3 */
                switch(rm) {
                case 1: /* fcompp */
B
Blue Swirl 已提交
6427 6428 6429 6430
                    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 已提交
6431 6432 6433 6434 6435
                    break;
                default:
                    goto illegal_op;
                }
                break;
B
bellard 已提交
6436
            case 0x38: /* ffreep sti, undocumented op */
B
Blue Swirl 已提交
6437 6438
                gen_helper_ffree_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fpop(cpu_env);
B
bellard 已提交
6439
                break;
B
bellard 已提交
6440 6441 6442
            case 0x3c: /* df/4 */
                switch(rm) {
                case 0:
B
Blue Swirl 已提交
6443
                    gen_helper_fnstsw(cpu_tmp2_i32, cpu_env);
6444
                    tcg_gen_extu_i32_tl(cpu_T[0], cpu_tmp2_i32);
6445
                    gen_op_mov_reg_T0(MO_16, R_EAX);
B
bellard 已提交
6446 6447 6448 6449 6450 6451
                    break;
                default:
                    goto illegal_op;
                }
                break;
            case 0x3d: /* fucomip */
6452 6453 6454
                if (!(s->cpuid_features & CPUID_CMOV)) {
                    goto illegal_op;
                }
6455
                gen_update_cc_op(s);
B
Blue Swirl 已提交
6456 6457 6458
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fucomi_ST0_FT0(cpu_env);
                gen_helper_fpop(cpu_env);
6459
                set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6460 6461
                break;
            case 0x3e: /* fcomip */
6462 6463 6464
                if (!(s->cpuid_features & CPUID_CMOV)) {
                    goto illegal_op;
                }
6465
                gen_update_cc_op(s);
B
Blue Swirl 已提交
6466 6467 6468
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fcomi_ST0_FT0(cpu_env);
                gen_helper_fpop(cpu_env);
6469
                set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6470
                break;
6471 6472 6473
            case 0x10 ... 0x13: /* fcmovxx */
            case 0x18 ... 0x1b:
                {
B
bellard 已提交
6474
                    int op1, l1;
6475
                    static const uint8_t fcmov_cc[8] = {
6476 6477 6478 6479 6480
                        (JCC_B << 1),
                        (JCC_Z << 1),
                        (JCC_BE << 1),
                        (JCC_P << 1),
                    };
6481 6482 6483 6484

                    if (!(s->cpuid_features & CPUID_CMOV)) {
                        goto illegal_op;
                    }
6485
                    op1 = fcmov_cc[op & 3] | (((op >> 3) & 1) ^ 1);
B
bellard 已提交
6486
                    l1 = gen_new_label();
6487
                    gen_jcc1_noeob(s, op1, l1);
B
Blue Swirl 已提交
6488
                    gen_helper_fmov_ST0_STN(cpu_env, tcg_const_i32(opreg));
B
bellard 已提交
6489
                    gen_set_label(l1);
6490 6491
                }
                break;
B
bellard 已提交
6492 6493 6494 6495 6496 6497 6498 6499 6500 6501 6502
            default:
                goto illegal_op;
            }
        }
        break;
        /************************/
        /* string ops */

    case 0xa4: /* movsS */
    case 0xa5:
        if ((b & 1) == 0)
6503
            ot = MO_8;
B
bellard 已提交
6504
        else
6505
            ot = dflag + MO_16;
B
bellard 已提交
6506 6507 6508 6509 6510 6511 6512

        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;
6513

B
bellard 已提交
6514 6515 6516
    case 0xaa: /* stosS */
    case 0xab:
        if ((b & 1) == 0)
6517
            ot = MO_8;
B
bellard 已提交
6518
        else
6519
            ot = dflag + MO_16;
B
bellard 已提交
6520 6521 6522 6523 6524 6525 6526 6527 6528 6529

        if (prefixes & (PREFIX_REPZ | PREFIX_REPNZ)) {
            gen_repz_stos(s, ot, pc_start - s->cs_base, s->pc - s->cs_base);
        } else {
            gen_stos(s, ot);
        }
        break;
    case 0xac: /* lodsS */
    case 0xad:
        if ((b & 1) == 0)
6530
            ot = MO_8;
B
bellard 已提交
6531
        else
6532
            ot = dflag + MO_16;
B
bellard 已提交
6533 6534 6535 6536 6537 6538 6539 6540 6541
        if (prefixes & (PREFIX_REPZ | PREFIX_REPNZ)) {
            gen_repz_lods(s, ot, pc_start - s->cs_base, s->pc - s->cs_base);
        } else {
            gen_lods(s, ot);
        }
        break;
    case 0xae: /* scasS */
    case 0xaf:
        if ((b & 1) == 0)
6542
            ot = MO_8;
B
bellard 已提交
6543
        else
6544
            ot = dflag + MO_16;
B
bellard 已提交
6545 6546 6547 6548 6549 6550 6551 6552 6553 6554 6555 6556
        if (prefixes & PREFIX_REPNZ) {
            gen_repz_scas(s, ot, pc_start - s->cs_base, s->pc - s->cs_base, 1);
        } else if (prefixes & PREFIX_REPZ) {
            gen_repz_scas(s, ot, pc_start - s->cs_base, s->pc - s->cs_base, 0);
        } else {
            gen_scas(s, ot);
        }
        break;

    case 0xa6: /* cmpsS */
    case 0xa7:
        if ((b & 1) == 0)
6557
            ot = MO_8;
B
bellard 已提交
6558
        else
6559
            ot = dflag + MO_16;
B
bellard 已提交
6560 6561 6562 6563 6564 6565 6566 6567 6568 6569
        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:
6570
        if ((b & 1) == 0)
6571
            ot = MO_8;
6572
        else
6573 6574
            ot = dflag ? MO_32 : MO_16;
        gen_op_mov_TN_reg(MO_16, 0, R_EDX);
T
ths 已提交
6575
        gen_op_andl_T0_ffff();
6576 6577
        gen_check_io(s, ot, pc_start - s->cs_base, 
                     SVM_IOIO_TYPE_MASK | svm_is_rep(prefixes) | 4);
6578 6579
        if (prefixes & (PREFIX_REPZ | PREFIX_REPNZ)) {
            gen_repz_ins(s, ot, pc_start - s->cs_base, s->pc - s->cs_base);
B
bellard 已提交
6580
        } else {
6581
            gen_ins(s, ot);
P
pbrook 已提交
6582 6583 6584
            if (use_icount) {
                gen_jmp(s, s->pc - s->cs_base);
            }
B
bellard 已提交
6585 6586 6587 6588
        }
        break;
    case 0x6e: /* outsS */
    case 0x6f:
6589
        if ((b & 1) == 0)
6590
            ot = MO_8;
6591
        else
6592 6593
            ot = dflag ? MO_32 : MO_16;
        gen_op_mov_TN_reg(MO_16, 0, R_EDX);
T
ths 已提交
6594
        gen_op_andl_T0_ffff();
6595 6596
        gen_check_io(s, ot, pc_start - s->cs_base,
                     svm_is_rep(prefixes) | 4);
6597 6598
        if (prefixes & (PREFIX_REPZ | PREFIX_REPNZ)) {
            gen_repz_outs(s, ot, pc_start - s->cs_base, s->pc - s->cs_base);
B
bellard 已提交
6599
        } else {
6600
            gen_outs(s, ot);
P
pbrook 已提交
6601 6602 6603
            if (use_icount) {
                gen_jmp(s, s->pc - s->cs_base);
            }
B
bellard 已提交
6604 6605 6606 6607 6608
        }
        break;

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

B
bellard 已提交
6610 6611
    case 0xe4:
    case 0xe5:
6612
        if ((b & 1) == 0)
6613
            ot = MO_8;
6614
        else
6615
            ot = dflag ? MO_32 : MO_16;
6616
        val = cpu_ldub_code(env, s->pc++);
6617
        gen_op_movl_T0_im(val);
6618 6619
        gen_check_io(s, ot, pc_start - s->cs_base,
                     SVM_IOIO_TYPE_MASK | svm_is_rep(prefixes));
P
pbrook 已提交
6620 6621
        if (use_icount)
            gen_io_start();
6622
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
P
pbrook 已提交
6623
        gen_helper_in_func(ot, cpu_T[1], cpu_tmp2_i32);
B
bellard 已提交
6624
        gen_op_mov_reg_T1(ot, R_EAX);
P
pbrook 已提交
6625 6626 6627 6628
        if (use_icount) {
            gen_io_end();
            gen_jmp(s, s->pc - s->cs_base);
        }
B
bellard 已提交
6629 6630 6631
        break;
    case 0xe6:
    case 0xe7:
6632
        if ((b & 1) == 0)
6633
            ot = MO_8;
6634
        else
6635
            ot = dflag ? MO_32 : MO_16;
6636
        val = cpu_ldub_code(env, s->pc++);
6637
        gen_op_movl_T0_im(val);
6638 6639
        gen_check_io(s, ot, pc_start - s->cs_base,
                     svm_is_rep(prefixes));
B
bellard 已提交
6640
        gen_op_mov_TN_reg(ot, 1, R_EAX);
6641

P
pbrook 已提交
6642 6643
        if (use_icount)
            gen_io_start();
6644 6645
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
        tcg_gen_trunc_tl_i32(cpu_tmp3_i32, cpu_T[1]);
P
pbrook 已提交
6646
        gen_helper_out_func(ot, cpu_tmp2_i32, cpu_tmp3_i32);
P
pbrook 已提交
6647 6648 6649 6650
        if (use_icount) {
            gen_io_end();
            gen_jmp(s, s->pc - s->cs_base);
        }
B
bellard 已提交
6651 6652 6653
        break;
    case 0xec:
    case 0xed:
6654
        if ((b & 1) == 0)
6655
            ot = MO_8;
6656
        else
6657 6658
            ot = dflag ? MO_32 : MO_16;
        gen_op_mov_TN_reg(MO_16, 0, R_EDX);
6659
        gen_op_andl_T0_ffff();
6660 6661
        gen_check_io(s, ot, pc_start - s->cs_base,
                     SVM_IOIO_TYPE_MASK | svm_is_rep(prefixes));
P
pbrook 已提交
6662 6663
        if (use_icount)
            gen_io_start();
6664
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
P
pbrook 已提交
6665
        gen_helper_in_func(ot, cpu_T[1], cpu_tmp2_i32);
B
bellard 已提交
6666
        gen_op_mov_reg_T1(ot, R_EAX);
P
pbrook 已提交
6667 6668 6669 6670
        if (use_icount) {
            gen_io_end();
            gen_jmp(s, s->pc - s->cs_base);
        }
B
bellard 已提交
6671 6672 6673
        break;
    case 0xee:
    case 0xef:
6674
        if ((b & 1) == 0)
6675
            ot = MO_8;
6676
        else
6677 6678
            ot = dflag ? MO_32 : MO_16;
        gen_op_mov_TN_reg(MO_16, 0, R_EDX);
6679
        gen_op_andl_T0_ffff();
6680 6681
        gen_check_io(s, ot, pc_start - s->cs_base,
                     svm_is_rep(prefixes));
B
bellard 已提交
6682
        gen_op_mov_TN_reg(ot, 1, R_EAX);
6683

P
pbrook 已提交
6684 6685
        if (use_icount)
            gen_io_start();
6686 6687
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
        tcg_gen_trunc_tl_i32(cpu_tmp3_i32, cpu_T[1]);
P
pbrook 已提交
6688
        gen_helper_out_func(ot, cpu_tmp2_i32, cpu_tmp3_i32);
P
pbrook 已提交
6689 6690 6691 6692
        if (use_icount) {
            gen_io_end();
            gen_jmp(s, s->pc - s->cs_base);
        }
B
bellard 已提交
6693 6694 6695 6696 6697
        break;

        /************************/
        /* control */
    case 0xc2: /* ret im */
6698
        val = cpu_ldsw_code(env, s->pc);
B
bellard 已提交
6699 6700
        s->pc += 2;
        gen_pop_T0(s);
6701 6702
        if (CODE64(s) && s->dflag)
            s->dflag = 2;
B
bellard 已提交
6703 6704 6705 6706 6707 6708 6709 6710 6711 6712 6713 6714 6715 6716 6717
        gen_stack_update(s, val + (2 << s->dflag));
        if (s->dflag == 0)
            gen_op_andl_T0_ffff();
        gen_op_jmp_T0();
        gen_eob(s);
        break;
    case 0xc3: /* ret */
        gen_pop_T0(s);
        gen_pop_update(s);
        if (s->dflag == 0)
            gen_op_andl_T0_ffff();
        gen_op_jmp_T0();
        gen_eob(s);
        break;
    case 0xca: /* lret im */
6718
        val = cpu_ldsw_code(env, s->pc);
B
bellard 已提交
6719 6720 6721
        s->pc += 2;
    do_lret:
        if (s->pe && !s->vm86) {
6722
            gen_update_cc_op(s);
B
bellard 已提交
6723
            gen_jmp_im(pc_start - s->cs_base);
6724
            gen_helper_lret_protected(cpu_env, tcg_const_i32(s->dflag),
P
pbrook 已提交
6725
                                      tcg_const_i32(val));
B
bellard 已提交
6726 6727 6728
        } else {
            gen_stack_A0(s);
            /* pop offset */
6729
            gen_op_ld_v(s, 1 + s->dflag, cpu_T[0], cpu_A0);
B
bellard 已提交
6730 6731 6732 6733 6734 6735 6736
            if (s->dflag == 0)
                gen_op_andl_T0_ffff();
            /* NOTE: keeping EIP updated is not a problem in case of
               exception */
            gen_op_jmp_T0();
            /* pop selector */
            gen_op_addl_A0_im(2 << s->dflag);
6737
            gen_op_ld_v(s, 1 + s->dflag, cpu_T[0], cpu_A0);
6738
            gen_op_movl_seg_T0_vm(R_CS);
B
bellard 已提交
6739 6740 6741 6742 6743 6744 6745 6746 6747
            /* add stack offset */
            gen_stack_update(s, val + (4 << s->dflag));
        }
        gen_eob(s);
        break;
    case 0xcb: /* lret */
        val = 0;
        goto do_lret;
    case 0xcf: /* iret */
B
bellard 已提交
6748
        gen_svm_check_intercept(s, pc_start, SVM_EXIT_IRET);
B
bellard 已提交
6749 6750
        if (!s->pe) {
            /* real mode */
6751
            gen_helper_iret_real(cpu_env, tcg_const_i32(s->dflag));
6752
            set_cc_op(s, CC_OP_EFLAGS);
6753 6754 6755 6756
        } else if (s->vm86) {
            if (s->iopl != 3) {
                gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
            } else {
6757
                gen_helper_iret_real(cpu_env, tcg_const_i32(s->dflag));
6758
                set_cc_op(s, CC_OP_EFLAGS);
6759
            }
B
bellard 已提交
6760
        } else {
6761
            gen_update_cc_op(s);
B
bellard 已提交
6762
            gen_jmp_im(pc_start - s->cs_base);
6763
            gen_helper_iret_protected(cpu_env, tcg_const_i32(s->dflag),
P
pbrook 已提交
6764
                                      tcg_const_i32(s->pc - s->cs_base));
6765
            set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6766 6767 6768 6769 6770
        }
        gen_eob(s);
        break;
    case 0xe8: /* call im */
        {
B
bellard 已提交
6771
            if (dflag)
6772
                tval = (int32_t)insn_get(env, s, MO_32);
B
bellard 已提交
6773
            else
6774
                tval = (int16_t)insn_get(env, s, MO_16);
B
bellard 已提交
6775
            next_eip = s->pc - s->cs_base;
B
bellard 已提交
6776
            tval += next_eip;
B
bellard 已提交
6777
            if (s->dflag == 0)
B
bellard 已提交
6778
                tval &= 0xffff;
6779 6780
            else if(!CODE64(s))
                tval &= 0xffffffff;
B
bellard 已提交
6781
            gen_movtl_T0_im(next_eip);
B
bellard 已提交
6782
            gen_push_T0(s);
B
bellard 已提交
6783
            gen_jmp(s, tval);
B
bellard 已提交
6784 6785 6786 6787 6788
        }
        break;
    case 0x9a: /* lcall im */
        {
            unsigned int selector, offset;
6789

B
bellard 已提交
6790 6791
            if (CODE64(s))
                goto illegal_op;
6792
            ot = dflag ? MO_32 : MO_16;
6793
            offset = insn_get(env, s, ot);
6794
            selector = insn_get(env, s, MO_16);
6795

B
bellard 已提交
6796
            gen_op_movl_T0_im(selector);
B
bellard 已提交
6797
            gen_op_movl_T1_imu(offset);
B
bellard 已提交
6798 6799
        }
        goto do_lcall;
B
bellard 已提交
6800
    case 0xe9: /* jmp im */
B
bellard 已提交
6801
        if (dflag)
6802
            tval = (int32_t)insn_get(env, s, MO_32);
B
bellard 已提交
6803
        else
6804
            tval = (int16_t)insn_get(env, s, MO_16);
B
bellard 已提交
6805
        tval += s->pc - s->cs_base;
B
bellard 已提交
6806
        if (s->dflag == 0)
B
bellard 已提交
6807
            tval &= 0xffff;
6808 6809
        else if(!CODE64(s))
            tval &= 0xffffffff;
B
bellard 已提交
6810
        gen_jmp(s, tval);
B
bellard 已提交
6811 6812 6813 6814 6815
        break;
    case 0xea: /* ljmp im */
        {
            unsigned int selector, offset;

B
bellard 已提交
6816 6817
            if (CODE64(s))
                goto illegal_op;
6818
            ot = dflag ? MO_32 : MO_16;
6819
            offset = insn_get(env, s, ot);
6820
            selector = insn_get(env, s, MO_16);
6821

B
bellard 已提交
6822
            gen_op_movl_T0_im(selector);
B
bellard 已提交
6823
            gen_op_movl_T1_imu(offset);
B
bellard 已提交
6824 6825 6826
        }
        goto do_ljmp;
    case 0xeb: /* jmp Jb */
6827
        tval = (int8_t)insn_get(env, s, MO_8);
B
bellard 已提交
6828
        tval += s->pc - s->cs_base;
B
bellard 已提交
6829
        if (s->dflag == 0)
B
bellard 已提交
6830 6831
            tval &= 0xffff;
        gen_jmp(s, tval);
B
bellard 已提交
6832 6833
        break;
    case 0x70 ... 0x7f: /* jcc Jb */
6834
        tval = (int8_t)insn_get(env, s, MO_8);
B
bellard 已提交
6835 6836 6837
        goto do_jcc;
    case 0x180 ... 0x18f: /* jcc Jv */
        if (dflag) {
6838
            tval = (int32_t)insn_get(env, s, MO_32);
B
bellard 已提交
6839
        } else {
6840
            tval = (int16_t)insn_get(env, s, MO_16);
B
bellard 已提交
6841 6842 6843
        }
    do_jcc:
        next_eip = s->pc - s->cs_base;
B
bellard 已提交
6844
        tval += next_eip;
B
bellard 已提交
6845
        if (s->dflag == 0)
B
bellard 已提交
6846 6847
            tval &= 0xffff;
        gen_jcc(s, b, tval, next_eip);
B
bellard 已提交
6848 6849 6850
        break;

    case 0x190 ... 0x19f: /* setcc Gv */
6851
        modrm = cpu_ldub_code(env, s->pc++);
6852
        gen_setcc1(s, b, cpu_T[0]);
6853
        gen_ldst_modrm(env, s, modrm, MO_8, OR_TMP0, 1);
B
bellard 已提交
6854 6855
        break;
    case 0x140 ... 0x14f: /* cmov Gv, Ev */
6856 6857 6858
        if (!(s->cpuid_features & CPUID_CMOV)) {
            goto illegal_op;
        }
6859
        ot = dflag + MO_16;
6860 6861 6862
        modrm = cpu_ldub_code(env, s->pc++);
        reg = ((modrm >> 3) & 7) | rex_r;
        gen_cmovcc1(env, s, ot, b, modrm, reg);
B
bellard 已提交
6863
        break;
6864

B
bellard 已提交
6865 6866 6867
        /************************/
        /* flags */
    case 0x9c: /* pushf */
B
bellard 已提交
6868
        gen_svm_check_intercept(s, pc_start, SVM_EXIT_PUSHF);
B
bellard 已提交
6869 6870 6871
        if (s->vm86 && s->iopl != 3) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
6872
            gen_update_cc_op(s);
6873
            gen_helper_read_eflags(cpu_T[0], cpu_env);
B
bellard 已提交
6874 6875 6876 6877
            gen_push_T0(s);
        }
        break;
    case 0x9d: /* popf */
B
bellard 已提交
6878
        gen_svm_check_intercept(s, pc_start, SVM_EXIT_POPF);
B
bellard 已提交
6879 6880 6881 6882 6883 6884
        if (s->vm86 && s->iopl != 3) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
            gen_pop_T0(s);
            if (s->cpl == 0) {
                if (s->dflag) {
6885 6886 6887 6888 6889
                    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 已提交
6890
                } else {
6891 6892 6893 6894 6895
                    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 已提交
6896 6897
                }
            } else {
B
bellard 已提交
6898 6899
                if (s->cpl <= s->iopl) {
                    if (s->dflag) {
6900 6901 6902 6903 6904 6905
                        gen_helper_write_eflags(cpu_env, cpu_T[0],
                                                tcg_const_i32((TF_MASK |
                                                               AC_MASK |
                                                               ID_MASK |
                                                               NT_MASK |
                                                               IF_MASK)));
B
bellard 已提交
6906
                    } else {
6907 6908 6909 6910 6911 6912 6913
                        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 已提交
6914
                    }
B
bellard 已提交
6915
                } else {
B
bellard 已提交
6916
                    if (s->dflag) {
6917 6918 6919
                        gen_helper_write_eflags(cpu_env, cpu_T[0],
                                           tcg_const_i32((TF_MASK | AC_MASK |
                                                          ID_MASK | NT_MASK)));
B
bellard 已提交
6920
                    } else {
6921 6922 6923 6924
                        gen_helper_write_eflags(cpu_env, cpu_T[0],
                                           tcg_const_i32((TF_MASK | AC_MASK |
                                                          ID_MASK | NT_MASK)
                                                         & 0xffff));
B
bellard 已提交
6925
                    }
B
bellard 已提交
6926 6927 6928
                }
            }
            gen_pop_update(s);
6929
            set_cc_op(s, CC_OP_EFLAGS);
H
H. Peter Anvin 已提交
6930
            /* abort translation because TF/AC flag may change */
B
bellard 已提交
6931
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
6932 6933 6934 6935
            gen_eob(s);
        }
        break;
    case 0x9e: /* sahf */
B
bellard 已提交
6936
        if (CODE64(s) && !(s->cpuid_ext3_features & CPUID_EXT3_LAHF_LM))
B
bellard 已提交
6937
            goto illegal_op;
6938
        gen_op_mov_TN_reg(MO_8, 0, R_AH);
6939
        gen_compute_eflags(s);
6940 6941 6942
        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 已提交
6943 6944
        break;
    case 0x9f: /* lahf */
B
bellard 已提交
6945
        if (CODE64(s) && !(s->cpuid_ext3_features & CPUID_EXT3_LAHF_LM))
B
bellard 已提交
6946
            goto illegal_op;
6947
        gen_compute_eflags(s);
6948
        /* Note: gen_compute_eflags() only gives the condition codes */
6949
        tcg_gen_ori_tl(cpu_T[0], cpu_cc_src, 0x02);
6950
        gen_op_mov_reg_T0(MO_8, R_AH);
B
bellard 已提交
6951 6952
        break;
    case 0xf5: /* cmc */
6953
        gen_compute_eflags(s);
6954
        tcg_gen_xori_tl(cpu_cc_src, cpu_cc_src, CC_C);
B
bellard 已提交
6955 6956
        break;
    case 0xf8: /* clc */
6957
        gen_compute_eflags(s);
6958
        tcg_gen_andi_tl(cpu_cc_src, cpu_cc_src, ~CC_C);
B
bellard 已提交
6959 6960
        break;
    case 0xf9: /* stc */
6961
        gen_compute_eflags(s);
6962
        tcg_gen_ori_tl(cpu_cc_src, cpu_cc_src, CC_C);
B
bellard 已提交
6963 6964
        break;
    case 0xfc: /* cld */
6965
        tcg_gen_movi_i32(cpu_tmp2_i32, 1);
6966
        tcg_gen_st_i32(cpu_tmp2_i32, cpu_env, offsetof(CPUX86State, df));
B
bellard 已提交
6967 6968
        break;
    case 0xfd: /* std */
6969
        tcg_gen_movi_i32(cpu_tmp2_i32, -1);
6970
        tcg_gen_st_i32(cpu_tmp2_i32, cpu_env, offsetof(CPUX86State, df));
B
bellard 已提交
6971 6972 6973 6974 6975
        break;

        /************************/
        /* bit operations */
    case 0x1ba: /* bt/bts/btr/btc Gv, im */
6976
        ot = dflag + MO_16;
6977
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
6978
        op = (modrm >> 3) & 7;
B
bellard 已提交
6979
        mod = (modrm >> 6) & 3;
B
bellard 已提交
6980
        rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
6981
        if (mod != 3) {
B
bellard 已提交
6982
            s->rip_offset = 1;
6983
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
6984
            gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
6985
        } else {
B
bellard 已提交
6986
            gen_op_mov_TN_reg(ot, 0, rm);
B
bellard 已提交
6987 6988
        }
        /* load shift */
6989
        val = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
6990 6991 6992 6993
        gen_op_movl_T1_im(val);
        if (op < 4)
            goto illegal_op;
        op -= 4;
B
bellard 已提交
6994
        goto bt_op;
B
bellard 已提交
6995 6996 6997 6998 6999 7000 7001 7002 7003 7004 7005 7006
    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:
7007
        ot = dflag + MO_16;
7008
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7009
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
7010
        mod = (modrm >> 6) & 3;
B
bellard 已提交
7011
        rm = (modrm & 7) | REX_B(s);
7012
        gen_op_mov_TN_reg(MO_32, 1, reg);
B
bellard 已提交
7013
        if (mod != 3) {
7014
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
7015
            /* specific case: we need to add a displacement */
B
bellard 已提交
7016 7017 7018 7019
            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);
7020
            gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
7021
        } else {
B
bellard 已提交
7022
            gen_op_mov_TN_reg(ot, 0, rm);
B
bellard 已提交
7023
        }
B
bellard 已提交
7024 7025 7026 7027 7028 7029 7030 7031 7032 7033 7034 7035 7036 7037 7038 7039 7040 7041 7042 7043 7044 7045 7046 7047 7048 7049 7050 7051
    bt_op:
        tcg_gen_andi_tl(cpu_T[1], cpu_T[1], (1 << (3 + ot)) - 1);
        switch(op) {
        case 0:
            tcg_gen_shr_tl(cpu_cc_src, cpu_T[0], cpu_T[1]);
            tcg_gen_movi_tl(cpu_cc_dst, 0);
            break;
        case 1:
            tcg_gen_shr_tl(cpu_tmp4, cpu_T[0], cpu_T[1]);
            tcg_gen_movi_tl(cpu_tmp0, 1);
            tcg_gen_shl_tl(cpu_tmp0, cpu_tmp0, cpu_T[1]);
            tcg_gen_or_tl(cpu_T[0], cpu_T[0], cpu_tmp0);
            break;
        case 2:
            tcg_gen_shr_tl(cpu_tmp4, cpu_T[0], cpu_T[1]);
            tcg_gen_movi_tl(cpu_tmp0, 1);
            tcg_gen_shl_tl(cpu_tmp0, cpu_tmp0, cpu_T[1]);
            tcg_gen_not_tl(cpu_tmp0, cpu_tmp0);
            tcg_gen_and_tl(cpu_T[0], cpu_T[0], cpu_tmp0);
            break;
        default:
        case 3:
            tcg_gen_shr_tl(cpu_tmp4, cpu_T[0], cpu_T[1]);
            tcg_gen_movi_tl(cpu_tmp0, 1);
            tcg_gen_shl_tl(cpu_tmp0, cpu_tmp0, cpu_T[1]);
            tcg_gen_xor_tl(cpu_T[0], cpu_T[0], cpu_tmp0);
            break;
        }
7052
        set_cc_op(s, CC_OP_SARB + ot);
B
bellard 已提交
7053 7054
        if (op != 0) {
            if (mod != 3)
7055
                gen_op_st_T0_A0(s, ot);
B
bellard 已提交
7056
            else
B
bellard 已提交
7057
                gen_op_mov_reg_T0(ot, rm);
B
bellard 已提交
7058 7059
            tcg_gen_mov_tl(cpu_cc_src, cpu_tmp4);
            tcg_gen_movi_tl(cpu_cc_dst, 0);
B
bellard 已提交
7060 7061
        }
        break;
7062 7063
    case 0x1bc: /* bsf / tzcnt */
    case 0x1bd: /* bsr / lzcnt */
7064
        ot = dflag + MO_16;
7065 7066 7067 7068 7069 7070 7071 7072 7073 7074 7075 7076 7077 7078 7079 7080 7081
        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 已提交
7082
            } else {
7083 7084 7085 7086 7087
                /* 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 已提交
7088
            }
7089 7090 7091 7092 7093 7094 7095 7096 7097 7098 7099 7100 7101 7102 7103 7104 7105 7106 7107 7108 7109 7110 7111
            /* 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 已提交
7112
        }
7113
        gen_op_mov_reg_T0(ot, reg);
B
bellard 已提交
7114 7115 7116 7117
        break;
        /************************/
        /* bcd */
    case 0x27: /* daa */
B
bellard 已提交
7118 7119
        if (CODE64(s))
            goto illegal_op;
7120
        gen_update_cc_op(s);
7121
        gen_helper_daa(cpu_env);
7122
        set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
7123 7124
        break;
    case 0x2f: /* das */
B
bellard 已提交
7125 7126
        if (CODE64(s))
            goto illegal_op;
7127
        gen_update_cc_op(s);
7128
        gen_helper_das(cpu_env);
7129
        set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
7130 7131
        break;
    case 0x37: /* aaa */
B
bellard 已提交
7132 7133
        if (CODE64(s))
            goto illegal_op;
7134
        gen_update_cc_op(s);
7135
        gen_helper_aaa(cpu_env);
7136
        set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
7137 7138
        break;
    case 0x3f: /* aas */
B
bellard 已提交
7139 7140
        if (CODE64(s))
            goto illegal_op;
7141
        gen_update_cc_op(s);
7142
        gen_helper_aas(cpu_env);
7143
        set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
7144 7145
        break;
    case 0xd4: /* aam */
B
bellard 已提交
7146 7147
        if (CODE64(s))
            goto illegal_op;
7148
        val = cpu_ldub_code(env, s->pc++);
7149 7150 7151
        if (val == 0) {
            gen_exception(s, EXCP00_DIVZ, pc_start - s->cs_base);
        } else {
7152
            gen_helper_aam(cpu_env, tcg_const_i32(val));
7153
            set_cc_op(s, CC_OP_LOGICB);
7154
        }
B
bellard 已提交
7155 7156
        break;
    case 0xd5: /* aad */
B
bellard 已提交
7157 7158
        if (CODE64(s))
            goto illegal_op;
7159
        val = cpu_ldub_code(env, s->pc++);
7160
        gen_helper_aad(cpu_env, tcg_const_i32(val));
7161
        set_cc_op(s, CC_OP_LOGICB);
B
bellard 已提交
7162 7163 7164 7165
        break;
        /************************/
        /* misc */
    case 0x90: /* nop */
7166
        /* XXX: correct lock test for all insn */
R
Richard Henderson 已提交
7167
        if (prefixes & PREFIX_LOCK) {
7168
            goto illegal_op;
R
Richard Henderson 已提交
7169 7170 7171 7172 7173
        }
        /* 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 已提交
7174
        if (prefixes & PREFIX_REPZ) {
7175 7176 7177 7178
            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 已提交
7179
        }
B
bellard 已提交
7180 7181
        break;
    case 0x9b: /* fwait */
7182
        if ((s->flags & (HF_MP_MASK | HF_TS_MASK)) ==
B
bellard 已提交
7183 7184
            (HF_MP_MASK | HF_TS_MASK)) {
            gen_exception(s, EXCP07_PREX, pc_start - s->cs_base);
B
bellard 已提交
7185
        } else {
7186
            gen_update_cc_op(s);
B
bellard 已提交
7187
            gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
7188
            gen_helper_fwait(cpu_env);
B
bellard 已提交
7189
        }
B
bellard 已提交
7190 7191 7192 7193 7194
        break;
    case 0xcc: /* int3 */
        gen_interrupt(s, EXCP03_INT3, pc_start - s->cs_base, s->pc - s->cs_base);
        break;
    case 0xcd: /* int N */
7195
        val = cpu_ldub_code(env, s->pc++);
7196
        if (s->vm86 && s->iopl != 3) {
7197
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
7198 7199 7200
        } else {
            gen_interrupt(s, val, pc_start - s->cs_base, s->pc - s->cs_base);
        }
B
bellard 已提交
7201 7202
        break;
    case 0xce: /* into */
B
bellard 已提交
7203 7204
        if (CODE64(s))
            goto illegal_op;
7205
        gen_update_cc_op(s);
7206
        gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
7207
        gen_helper_into(cpu_env, tcg_const_i32(s->pc - pc_start));
B
bellard 已提交
7208
        break;
A
aurel32 已提交
7209
#ifdef WANT_ICEBP
B
bellard 已提交
7210
    case 0xf1: /* icebp (undocumented, exits to external debugger) */
B
bellard 已提交
7211
        gen_svm_check_intercept(s, pc_start, SVM_EXIT_ICEBP);
7212
#if 1
B
bellard 已提交
7213
        gen_debug(s, pc_start - s->cs_base);
7214 7215
#else
        /* start debug */
7216
        tb_flush(env);
7217
        qemu_set_log(CPU_LOG_INT | CPU_LOG_TB_IN_ASM);
7218
#endif
B
bellard 已提交
7219
        break;
A
aurel32 已提交
7220
#endif
B
bellard 已提交
7221 7222 7223
    case 0xfa: /* cli */
        if (!s->vm86) {
            if (s->cpl <= s->iopl) {
7224
                gen_helper_cli(cpu_env);
B
bellard 已提交
7225 7226 7227 7228 7229
            } else {
                gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
            }
        } else {
            if (s->iopl == 3) {
7230
                gen_helper_cli(cpu_env);
B
bellard 已提交
7231 7232 7233 7234 7235 7236 7237 7238 7239
            } 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:
7240
                gen_helper_sti(cpu_env);
B
bellard 已提交
7241
                /* interruptions are enabled only the first insn after sti */
7242 7243 7244
                /* If several instructions disable interrupts, only the
                   _first_ does it */
                if (!(s->tb->flags & HF_INHIBIT_IRQ_MASK))
7245
                    gen_helper_set_inhibit_irq(cpu_env);
B
bellard 已提交
7246
                /* give a chance to handle pending irqs */
B
bellard 已提交
7247
                gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
7248 7249 7250 7251 7252 7253 7254 7255 7256 7257 7258 7259 7260
                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 已提交
7261 7262
        if (CODE64(s))
            goto illegal_op;
7263
        ot = dflag ? MO_32 : MO_16;
7264
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7265 7266 7267 7268
        reg = (modrm >> 3) & 7;
        mod = (modrm >> 6) & 3;
        if (mod == 3)
            goto illegal_op;
B
bellard 已提交
7269
        gen_op_mov_TN_reg(ot, 0, reg);
7270
        gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
7271
        gen_jmp_im(pc_start - s->cs_base);
7272
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
7273
        if (ot == MO_16) {
B
Blue Swirl 已提交
7274 7275 7276 7277
            gen_helper_boundw(cpu_env, cpu_A0, cpu_tmp2_i32);
        } else {
            gen_helper_boundl(cpu_env, cpu_A0, cpu_tmp2_i32);
        }
B
bellard 已提交
7278 7279
        break;
    case 0x1c8 ... 0x1cf: /* bswap reg */
B
bellard 已提交
7280 7281 7282
        reg = (b & 7) | REX_B(s);
#ifdef TARGET_X86_64
        if (dflag == 2) {
7283
            gen_op_mov_TN_reg(MO_64, 0, reg);
A
aurel32 已提交
7284
            tcg_gen_bswap64_i64(cpu_T[0], cpu_T[0]);
7285
            gen_op_mov_reg_T0(MO_64, reg);
7286
        } else
7287
#endif
B
bellard 已提交
7288
        {
7289
            gen_op_mov_TN_reg(MO_32, 0, reg);
7290 7291
            tcg_gen_ext32u_tl(cpu_T[0], cpu_T[0]);
            tcg_gen_bswap32_tl(cpu_T[0], cpu_T[0]);
7292
            gen_op_mov_reg_T0(MO_32, reg);
B
bellard 已提交
7293
        }
B
bellard 已提交
7294 7295
        break;
    case 0xd6: /* salc */
B
bellard 已提交
7296 7297
        if (CODE64(s))
            goto illegal_op;
7298
        gen_compute_eflags_c(s, cpu_T[0]);
7299
        tcg_gen_neg_tl(cpu_T[0], cpu_T[0]);
7300
        gen_op_mov_reg_T0(MO_8, R_EAX);
B
bellard 已提交
7301 7302 7303 7304 7305
        break;
    case 0xe0: /* loopnz */
    case 0xe1: /* loopz */
    case 0xe2: /* loop */
    case 0xe3: /* jecxz */
B
bellard 已提交
7306
        {
7307
            int l1, l2, l3;
B
bellard 已提交
7308

7309
            tval = (int8_t)insn_get(env, s, MO_8);
B
bellard 已提交
7310 7311 7312 7313
            next_eip = s->pc - s->cs_base;
            tval += next_eip;
            if (s->dflag == 0)
                tval &= 0xffff;
7314

B
bellard 已提交
7315 7316
            l1 = gen_new_label();
            l2 = gen_new_label();
7317
            l3 = gen_new_label();
B
bellard 已提交
7318
            b &= 3;
7319 7320 7321 7322 7323
            switch(b) {
            case 0: /* loopnz */
            case 1: /* loopz */
                gen_op_add_reg_im(s->aflag, R_ECX, -1);
                gen_op_jz_ecx(s->aflag, l3);
7324
                gen_jcc1(s, (JCC_Z << 1) | (b ^ 1), l1);
7325 7326 7327 7328 7329 7330 7331 7332 7333
                break;
            case 2: /* loop */
                gen_op_add_reg_im(s->aflag, R_ECX, -1);
                gen_op_jnz_ecx(s->aflag, l1);
                break;
            default:
            case 3: /* jcxz */
                gen_op_jz_ecx(s->aflag, l1);
                break;
B
bellard 已提交
7334 7335
            }

7336
            gen_set_label(l3);
B
bellard 已提交
7337
            gen_jmp_im(next_eip);
7338
            tcg_gen_br(l2);
7339

B
bellard 已提交
7340 7341 7342 7343 7344
            gen_set_label(l1);
            gen_jmp_im(tval);
            gen_set_label(l2);
            gen_eob(s);
        }
B
bellard 已提交
7345 7346 7347 7348 7349 7350
        break;
    case 0x130: /* wrmsr */
    case 0x132: /* rdmsr */
        if (s->cpl != 0) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
7351
            gen_update_cc_op(s);
B
bellard 已提交
7352
            gen_jmp_im(pc_start - s->cs_base);
T
ths 已提交
7353
            if (b & 2) {
B
Blue Swirl 已提交
7354
                gen_helper_rdmsr(cpu_env);
T
ths 已提交
7355
            } else {
B
Blue Swirl 已提交
7356
                gen_helper_wrmsr(cpu_env);
T
ths 已提交
7357
            }
B
bellard 已提交
7358 7359 7360
        }
        break;
    case 0x131: /* rdtsc */
7361
        gen_update_cc_op(s);
B
bellard 已提交
7362
        gen_jmp_im(pc_start - s->cs_base);
P
pbrook 已提交
7363 7364
        if (use_icount)
            gen_io_start();
B
Blue Swirl 已提交
7365
        gen_helper_rdtsc(cpu_env);
P
pbrook 已提交
7366 7367 7368 7369
        if (use_icount) {
            gen_io_end();
            gen_jmp(s, s->pc - s->cs_base);
        }
B
bellard 已提交
7370
        break;
7371
    case 0x133: /* rdpmc */
7372
        gen_update_cc_op(s);
7373
        gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
7374
        gen_helper_rdpmc(cpu_env);
7375
        break;
7376
    case 0x134: /* sysenter */
7377
        /* For Intel SYSENTER is valid on 64-bit */
7378
        if (CODE64(s) && env->cpuid_vendor1 != CPUID_VENDOR_INTEL_1)
B
bellard 已提交
7379
            goto illegal_op;
7380 7381 7382
        if (!s->pe) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
J
Jun Koi 已提交
7383
            gen_update_cc_op(s);
B
bellard 已提交
7384
            gen_jmp_im(pc_start - s->cs_base);
7385
            gen_helper_sysenter(cpu_env);
7386 7387 7388 7389
            gen_eob(s);
        }
        break;
    case 0x135: /* sysexit */
7390
        /* For Intel SYSEXIT is valid on 64-bit */
7391
        if (CODE64(s) && env->cpuid_vendor1 != CPUID_VENDOR_INTEL_1)
B
bellard 已提交
7392
            goto illegal_op;
7393 7394 7395
        if (!s->pe) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
J
Jun Koi 已提交
7396
            gen_update_cc_op(s);
B
bellard 已提交
7397
            gen_jmp_im(pc_start - s->cs_base);
7398
            gen_helper_sysexit(cpu_env, tcg_const_i32(dflag));
7399 7400 7401
            gen_eob(s);
        }
        break;
B
bellard 已提交
7402 7403 7404
#ifdef TARGET_X86_64
    case 0x105: /* syscall */
        /* XXX: is it usable in real mode ? */
J
Jun Koi 已提交
7405
        gen_update_cc_op(s);
B
bellard 已提交
7406
        gen_jmp_im(pc_start - s->cs_base);
7407
        gen_helper_syscall(cpu_env, tcg_const_i32(s->pc - pc_start));
B
bellard 已提交
7408 7409 7410 7411 7412 7413
        gen_eob(s);
        break;
    case 0x107: /* sysret */
        if (!s->pe) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
J
Jun Koi 已提交
7414
            gen_update_cc_op(s);
B
bellard 已提交
7415
            gen_jmp_im(pc_start - s->cs_base);
7416
            gen_helper_sysret(cpu_env, tcg_const_i32(s->dflag));
7417
            /* condition codes are modified only in long mode */
7418 7419 7420
            if (s->lma) {
                set_cc_op(s, CC_OP_EFLAGS);
            }
B
bellard 已提交
7421 7422 7423 7424
            gen_eob(s);
        }
        break;
#endif
B
bellard 已提交
7425
    case 0x1a2: /* cpuid */
7426
        gen_update_cc_op(s);
B
bellard 已提交
7427
        gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
7428
        gen_helper_cpuid(cpu_env);
B
bellard 已提交
7429 7430 7431 7432 7433
        break;
    case 0xf4: /* hlt */
        if (s->cpl != 0) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
7434
            gen_update_cc_op(s);
7435
            gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
7436
            gen_helper_hlt(cpu_env, tcg_const_i32(s->pc - pc_start));
J
Jun Koi 已提交
7437
            s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
7438 7439 7440
        }
        break;
    case 0x100:
7441
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7442 7443 7444 7445
        mod = (modrm >> 6) & 3;
        op = (modrm >> 3) & 7;
        switch(op) {
        case 0: /* sldt */
7446 7447
            if (!s->pe || s->vm86)
                goto illegal_op;
B
bellard 已提交
7448
            gen_svm_check_intercept(s, pc_start, SVM_EXIT_LDTR_READ);
B
bellard 已提交
7449
            tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,ldt.selector));
7450
            ot = MO_16;
B
bellard 已提交
7451 7452
            if (mod == 3)
                ot += s->dflag;
7453
            gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 1);
B
bellard 已提交
7454 7455
            break;
        case 2: /* lldt */
7456 7457
            if (!s->pe || s->vm86)
                goto illegal_op;
B
bellard 已提交
7458 7459 7460
            if (s->cpl != 0) {
                gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
            } else {
B
bellard 已提交
7461
                gen_svm_check_intercept(s, pc_start, SVM_EXIT_LDTR_WRITE);
7462
                gen_ldst_modrm(env, s, modrm, MO_16, OR_TMP0, 0);
B
bellard 已提交
7463
                gen_jmp_im(pc_start - s->cs_base);
7464
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
7465
                gen_helper_lldt(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
7466 7467 7468
            }
            break;
        case 1: /* str */
7469 7470
            if (!s->pe || s->vm86)
                goto illegal_op;
B
bellard 已提交
7471
            gen_svm_check_intercept(s, pc_start, SVM_EXIT_TR_READ);
B
bellard 已提交
7472
            tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,tr.selector));
7473
            ot = MO_16;
B
bellard 已提交
7474 7475
            if (mod == 3)
                ot += s->dflag;
7476
            gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 1);
B
bellard 已提交
7477 7478
            break;
        case 3: /* ltr */
7479 7480
            if (!s->pe || s->vm86)
                goto illegal_op;
B
bellard 已提交
7481 7482 7483
            if (s->cpl != 0) {
                gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
            } else {
B
bellard 已提交
7484
                gen_svm_check_intercept(s, pc_start, SVM_EXIT_TR_WRITE);
7485
                gen_ldst_modrm(env, s, modrm, MO_16, OR_TMP0, 0);
B
bellard 已提交
7486
                gen_jmp_im(pc_start - s->cs_base);
7487
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
7488
                gen_helper_ltr(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
7489 7490 7491 7492
            }
            break;
        case 4: /* verr */
        case 5: /* verw */
7493 7494
            if (!s->pe || s->vm86)
                goto illegal_op;
7495
            gen_ldst_modrm(env, s, modrm, MO_16, OR_TMP0, 0);
7496
            gen_update_cc_op(s);
7497 7498 7499 7500 7501
            if (op == 4) {
                gen_helper_verr(cpu_env, cpu_T[0]);
            } else {
                gen_helper_verw(cpu_env, cpu_T[0]);
            }
7502
            set_cc_op(s, CC_OP_EFLAGS);
7503
            break;
B
bellard 已提交
7504 7505 7506 7507 7508
        default:
            goto illegal_op;
        }
        break;
    case 0x101:
7509
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7510 7511
        mod = (modrm >> 6) & 3;
        op = (modrm >> 3) & 7;
B
bellard 已提交
7512
        rm = modrm & 7;
B
bellard 已提交
7513 7514 7515 7516
        switch(op) {
        case 0: /* sgdt */
            if (mod == 3)
                goto illegal_op;
B
bellard 已提交
7517
            gen_svm_check_intercept(s, pc_start, SVM_EXIT_GDTR_READ);
7518
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
7519
            tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State, gdt.limit));
7520
            gen_op_st_T0_A0(s, MO_16);
7521
            gen_add_A0_im(s, 2);
B
bellard 已提交
7522
            tcg_gen_ld_tl(cpu_T[0], cpu_env, offsetof(CPUX86State, gdt.base));
B
bellard 已提交
7523 7524
            if (!s->dflag)
                gen_op_andl_T0_im(0xffffff);
7525
            gen_op_st_T0_A0(s, CODE64(s) + MO_32);
B
bellard 已提交
7526
            break;
B
bellard 已提交
7527 7528 7529 7530 7531 7532 7533
        case 1:
            if (mod == 3) {
                switch (rm) {
                case 0: /* monitor */
                    if (!(s->cpuid_ext_features & CPUID_EXT_MONITOR) ||
                        s->cpl != 0)
                        goto illegal_op;
7534
                    gen_update_cc_op(s);
B
bellard 已提交
7535 7536 7537
                    gen_jmp_im(pc_start - s->cs_base);
#ifdef TARGET_X86_64
                    if (s->aflag == 2) {
7538
                        gen_op_movq_A0_reg(R_EAX);
7539
                    } else
B
bellard 已提交
7540 7541
#endif
                    {
7542
                        gen_op_movl_A0_reg(R_EAX);
B
bellard 已提交
7543 7544 7545 7546
                        if (s->aflag == 0)
                            gen_op_andl_A0_ffff();
                    }
                    gen_add_A0_ds_seg(s);
B
Blue Swirl 已提交
7547
                    gen_helper_monitor(cpu_env, cpu_A0);
B
bellard 已提交
7548 7549 7550 7551 7552
                    break;
                case 1: /* mwait */
                    if (!(s->cpuid_ext_features & CPUID_EXT_MONITOR) ||
                        s->cpl != 0)
                        goto illegal_op;
J
Jun Koi 已提交
7553
                    gen_update_cc_op(s);
7554
                    gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
7555
                    gen_helper_mwait(cpu_env, tcg_const_i32(s->pc - pc_start));
B
bellard 已提交
7556 7557
                    gen_eob(s);
                    break;
H
H. Peter Anvin 已提交
7558 7559 7560 7561 7562 7563 7564 7565 7566 7567 7568 7569 7570 7571 7572 7573 7574 7575
                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 已提交
7576 7577 7578 7579
                default:
                    goto illegal_op;
                }
            } else { /* sidt */
B
bellard 已提交
7580
                gen_svm_check_intercept(s, pc_start, SVM_EXIT_IDTR_READ);
7581
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
7582
                tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State, idt.limit));
7583
                gen_op_st_T0_A0(s, MO_16);
B
bellard 已提交
7584
                gen_add_A0_im(s, 2);
B
bellard 已提交
7585
                tcg_gen_ld_tl(cpu_T[0], cpu_env, offsetof(CPUX86State, idt.base));
B
bellard 已提交
7586 7587
                if (!s->dflag)
                    gen_op_andl_T0_im(0xffffff);
7588
                gen_op_st_T0_A0(s, CODE64(s) + MO_32);
B
bellard 已提交
7589 7590
            }
            break;
B
bellard 已提交
7591 7592
        case 2: /* lgdt */
        case 3: /* lidt */
T
ths 已提交
7593
            if (mod == 3) {
7594
                gen_update_cc_op(s);
B
bellard 已提交
7595
                gen_jmp_im(pc_start - s->cs_base);
T
ths 已提交
7596 7597
                switch(rm) {
                case 0: /* VMRUN */
B
bellard 已提交
7598 7599 7600 7601
                    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 已提交
7602
                        break;
B
bellard 已提交
7603
                    } else {
B
Blue Swirl 已提交
7604
                        gen_helper_vmrun(cpu_env, tcg_const_i32(s->aflag),
P
pbrook 已提交
7605
                                         tcg_const_i32(s->pc - pc_start));
7606
                        tcg_gen_exit_tb(0);
J
Jun Koi 已提交
7607
                        s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
7608
                    }
T
ths 已提交
7609 7610
                    break;
                case 1: /* VMMCALL */
B
bellard 已提交
7611 7612
                    if (!(s->flags & HF_SVME_MASK))
                        goto illegal_op;
B
Blue Swirl 已提交
7613
                    gen_helper_vmmcall(cpu_env);
T
ths 已提交
7614 7615
                    break;
                case 2: /* VMLOAD */
B
bellard 已提交
7616 7617 7618 7619 7620 7621
                    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 已提交
7622
                        gen_helper_vmload(cpu_env, tcg_const_i32(s->aflag));
B
bellard 已提交
7623
                    }
T
ths 已提交
7624 7625
                    break;
                case 3: /* VMSAVE */
B
bellard 已提交
7626 7627 7628 7629 7630 7631
                    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 已提交
7632
                        gen_helper_vmsave(cpu_env, tcg_const_i32(s->aflag));
B
bellard 已提交
7633
                    }
T
ths 已提交
7634 7635
                    break;
                case 4: /* STGI */
B
bellard 已提交
7636 7637 7638 7639 7640 7641 7642 7643
                    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 已提交
7644
                        gen_helper_stgi(cpu_env);
B
bellard 已提交
7645
                    }
T
ths 已提交
7646 7647
                    break;
                case 5: /* CLGI */
B
bellard 已提交
7648 7649 7650 7651 7652 7653
                    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 已提交
7654
                        gen_helper_clgi(cpu_env);
B
bellard 已提交
7655
                    }
T
ths 已提交
7656 7657
                    break;
                case 6: /* SKINIT */
B
bellard 已提交
7658 7659 7660 7661
                    if ((!(s->flags & HF_SVME_MASK) && 
                         !(s->cpuid_ext3_features & CPUID_EXT3_SKINIT)) || 
                        !s->pe)
                        goto illegal_op;
B
Blue Swirl 已提交
7662
                    gen_helper_skinit(cpu_env);
T
ths 已提交
7663 7664
                    break;
                case 7: /* INVLPGA */
B
bellard 已提交
7665 7666 7667 7668 7669 7670
                    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 已提交
7671
                        gen_helper_invlpga(cpu_env, tcg_const_i32(s->aflag));
B
bellard 已提交
7672
                    }
T
ths 已提交
7673 7674 7675 7676 7677
                    break;
                default:
                    goto illegal_op;
                }
            } else if (s->cpl != 0) {
B
bellard 已提交
7678 7679
                gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
            } else {
B
bellard 已提交
7680 7681
                gen_svm_check_intercept(s, pc_start,
                                        op==2 ? SVM_EXIT_GDTR_WRITE : SVM_EXIT_IDTR_WRITE);
7682
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
7683
                gen_op_ld_T1_A0(s, MO_16);
7684
                gen_add_A0_im(s, 2);
7685
                gen_op_ld_v(s, CODE64(s) + MO_32, cpu_T[0], cpu_A0);
B
bellard 已提交
7686 7687 7688
                if (!s->dflag)
                    gen_op_andl_T0_im(0xffffff);
                if (op == 2) {
B
bellard 已提交
7689 7690
                    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 已提交
7691
                } else {
B
bellard 已提交
7692 7693
                    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 已提交
7694 7695 7696 7697
                }
            }
            break;
        case 4: /* smsw */
B
bellard 已提交
7698
            gen_svm_check_intercept(s, pc_start, SVM_EXIT_READ_CR0);
7699
#if defined TARGET_X86_64 && defined HOST_WORDS_BIGENDIAN
7700 7701
            tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,cr[0]) + 4);
#else
B
bellard 已提交
7702
            tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,cr[0]));
7703
#endif
7704
            gen_ldst_modrm(env, s, modrm, MO_16, OR_TMP0, 1);
B
bellard 已提交
7705 7706 7707 7708 7709
            break;
        case 6: /* lmsw */
            if (s->cpl != 0) {
                gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
            } else {
B
bellard 已提交
7710
                gen_svm_check_intercept(s, pc_start, SVM_EXIT_WRITE_CR0);
7711
                gen_ldst_modrm(env, s, modrm, MO_16, OR_TMP0, 0);
B
Blue Swirl 已提交
7712
                gen_helper_lmsw(cpu_env, cpu_T[0]);
B
bellard 已提交
7713
                gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
7714
                gen_eob(s);
B
bellard 已提交
7715 7716
            }
            break;
A
Andre Przywara 已提交
7717 7718 7719 7720 7721
        case 7:
            if (mod != 3) { /* invlpg */
                if (s->cpl != 0) {
                    gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
                } else {
7722
                    gen_update_cc_op(s);
A
Andre Przywara 已提交
7723
                    gen_jmp_im(pc_start - s->cs_base);
7724
                    gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
Blue Swirl 已提交
7725
                    gen_helper_invlpg(cpu_env, cpu_A0);
A
Andre Przywara 已提交
7726 7727 7728
                    gen_jmp_im(s->pc - s->cs_base);
                    gen_eob(s);
                }
B
bellard 已提交
7729
            } else {
A
Andre Przywara 已提交
7730 7731
                switch (rm) {
                case 0: /* swapgs */
B
bellard 已提交
7732
#ifdef TARGET_X86_64
A
Andre Przywara 已提交
7733 7734 7735 7736 7737 7738 7739 7740 7741 7742 7743 7744 7745
                    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));
                        }
7746
                    } else
B
bellard 已提交
7747 7748 7749 7750
#endif
                    {
                        goto illegal_op;
                    }
A
Andre Przywara 已提交
7751 7752 7753 7754
                    break;
                case 1: /* rdtscp */
                    if (!(s->cpuid_ext2_features & CPUID_EXT2_RDTSCP))
                        goto illegal_op;
7755
                    gen_update_cc_op(s);
B
bellard 已提交
7756
                    gen_jmp_im(pc_start - s->cs_base);
A
Andre Przywara 已提交
7757 7758
                    if (use_icount)
                        gen_io_start();
B
Blue Swirl 已提交
7759
                    gen_helper_rdtscp(cpu_env);
A
Andre Przywara 已提交
7760 7761 7762 7763 7764 7765 7766
                    if (use_icount) {
                        gen_io_end();
                        gen_jmp(s, s->pc - s->cs_base);
                    }
                    break;
                default:
                    goto illegal_op;
B
bellard 已提交
7767
                }
B
bellard 已提交
7768 7769 7770 7771 7772 7773
            }
            break;
        default:
            goto illegal_op;
        }
        break;
7774 7775 7776 7777 7778
    case 0x108: /* invd */
    case 0x109: /* wbinvd */
        if (s->cpl != 0) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
B
bellard 已提交
7779
            gen_svm_check_intercept(s, pc_start, (b & 2) ? SVM_EXIT_INVD : SVM_EXIT_WBINVD);
7780 7781 7782
            /* nothing to do */
        }
        break;
B
bellard 已提交
7783 7784 7785 7786 7787
    case 0x63: /* arpl or movslS (x86_64) */
#ifdef TARGET_X86_64
        if (CODE64(s)) {
            int d_ot;
            /* d_ot is the size of destination */
7788
            d_ot = dflag + MO_16;
B
bellard 已提交
7789

7790
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7791 7792 7793
            reg = ((modrm >> 3) & 7) | rex_r;
            mod = (modrm >> 6) & 3;
            rm = (modrm & 7) | REX_B(s);
7794

B
bellard 已提交
7795
            if (mod == 3) {
7796
                gen_op_mov_TN_reg(MO_32, 0, rm);
B
bellard 已提交
7797
                /* sign extend */
7798
                if (d_ot == MO_64) {
B
bellard 已提交
7799
                    tcg_gen_ext32s_tl(cpu_T[0], cpu_T[0]);
7800
                }
B
bellard 已提交
7801
                gen_op_mov_reg_T0(d_ot, reg);
B
bellard 已提交
7802
            } else {
7803
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
7804 7805
                if (d_ot == MO_64) {
                    gen_op_lds_T0_A0(s, MO_32);
B
bellard 已提交
7806
                } else {
7807
                    gen_op_ld_v(s, MO_32, cpu_T[0], cpu_A0);
B
bellard 已提交
7808
                }
B
bellard 已提交
7809
                gen_op_mov_reg_T0(d_ot, reg);
B
bellard 已提交
7810
            }
7811
        } else
B
bellard 已提交
7812 7813
#endif
        {
7814
            int label1;
L
Laurent Desnogues 已提交
7815
            TCGv t0, t1, t2, a0;
7816

B
bellard 已提交
7817 7818
            if (!s->pe || s->vm86)
                goto illegal_op;
P
pbrook 已提交
7819 7820 7821
            t0 = tcg_temp_local_new();
            t1 = tcg_temp_local_new();
            t2 = tcg_temp_local_new();
7822
            ot = MO_16;
7823
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7824 7825 7826 7827
            reg = (modrm >> 3) & 7;
            mod = (modrm >> 6) & 3;
            rm = modrm & 7;
            if (mod != 3) {
7828
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
7829
                gen_op_ld_v(s, ot, t0, cpu_A0);
L
Laurent Desnogues 已提交
7830 7831
                a0 = tcg_temp_local_new();
                tcg_gen_mov_tl(a0, cpu_A0);
B
bellard 已提交
7832
            } else {
7833
                gen_op_mov_v_reg(ot, t0, rm);
L
Laurent Desnogues 已提交
7834
                TCGV_UNUSED(a0);
B
bellard 已提交
7835
            }
7836 7837 7838 7839
            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);
7840
            label1 = gen_new_label();
7841 7842 7843 7844
            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);
7845
            gen_set_label(label1);
B
bellard 已提交
7846
            if (mod != 3) {
7847
                gen_op_st_v(s, ot, t0, a0);
L
Laurent Desnogues 已提交
7848 7849
                tcg_temp_free(a0);
           } else {
7850
                gen_op_mov_reg_v(ot, rm, t0);
B
bellard 已提交
7851
            }
7852
            gen_compute_eflags(s);
7853
            tcg_gen_andi_tl(cpu_cc_src, cpu_cc_src, ~CC_Z);
7854 7855 7856 7857
            tcg_gen_or_tl(cpu_cc_src, cpu_cc_src, t2);
            tcg_temp_free(t0);
            tcg_temp_free(t1);
            tcg_temp_free(t2);
7858 7859
        }
        break;
B
bellard 已提交
7860 7861
    case 0x102: /* lar */
    case 0x103: /* lsl */
7862 7863
        {
            int label1;
7864
            TCGv t0;
7865 7866
            if (!s->pe || s->vm86)
                goto illegal_op;
7867
            ot = dflag ? MO_32 : MO_16;
7868
            modrm = cpu_ldub_code(env, s->pc++);
7869
            reg = ((modrm >> 3) & 7) | rex_r;
7870
            gen_ldst_modrm(env, s, modrm, MO_16, OR_TMP0, 0);
P
pbrook 已提交
7871
            t0 = tcg_temp_local_new();
7872
            gen_update_cc_op(s);
7873 7874 7875 7876 7877
            if (b == 0x102) {
                gen_helper_lar(t0, cpu_env, cpu_T[0]);
            } else {
                gen_helper_lsl(t0, cpu_env, cpu_T[0]);
            }
7878 7879
            tcg_gen_andi_tl(cpu_tmp0, cpu_cc_src, CC_Z);
            label1 = gen_new_label();
P
pbrook 已提交
7880
            tcg_gen_brcondi_tl(TCG_COND_EQ, cpu_tmp0, 0, label1);
7881
            gen_op_mov_reg_v(ot, reg, t0);
7882
            gen_set_label(label1);
7883
            set_cc_op(s, CC_OP_EFLAGS);
7884
            tcg_temp_free(t0);
7885
        }
B
bellard 已提交
7886 7887
        break;
    case 0x118:
7888
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7889 7890 7891 7892 7893 7894 7895 7896 7897
        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;
7898
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
7899 7900
            /* nothing more to do */
            break;
B
bellard 已提交
7901
        default: /* nop (multi byte) */
7902
            gen_nop_modrm(env, s, modrm);
B
bellard 已提交
7903
            break;
B
bellard 已提交
7904 7905
        }
        break;
B
bellard 已提交
7906
    case 0x119 ... 0x11f: /* nop (multi byte) */
7907 7908
        modrm = cpu_ldub_code(env, s->pc++);
        gen_nop_modrm(env, s, modrm);
B
bellard 已提交
7909
        break;
B
bellard 已提交
7910 7911 7912 7913 7914
    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 {
7915
            modrm = cpu_ldub_code(env, s->pc++);
7916 7917 7918 7919 7920
            /* 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 已提交
7921 7922 7923
            rm = (modrm & 7) | REX_B(s);
            reg = ((modrm >> 3) & 7) | rex_r;
            if (CODE64(s))
7924
                ot = MO_64;
B
bellard 已提交
7925
            else
7926
                ot = MO_32;
7927 7928 7929 7930
            if ((prefixes & PREFIX_LOCK) && (reg == 0) &&
                (s->cpuid_ext3_features & CPUID_EXT3_CR8LEG)) {
                reg = 8;
            }
B
bellard 已提交
7931 7932 7933 7934 7935
            switch(reg) {
            case 0:
            case 2:
            case 3:
            case 4:
B
bellard 已提交
7936
            case 8:
7937
                gen_update_cc_op(s);
B
bellard 已提交
7938
                gen_jmp_im(pc_start - s->cs_base);
B
bellard 已提交
7939
                if (b & 2) {
B
bellard 已提交
7940
                    gen_op_mov_TN_reg(ot, 0, rm);
B
Blue Swirl 已提交
7941 7942
                    gen_helper_write_crN(cpu_env, tcg_const_i32(reg),
                                         cpu_T[0]);
B
bellard 已提交
7943
                    gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
7944 7945
                    gen_eob(s);
                } else {
B
Blue Swirl 已提交
7946
                    gen_helper_read_crN(cpu_T[0], cpu_env, tcg_const_i32(reg));
B
bellard 已提交
7947
                    gen_op_mov_reg_T0(ot, rm);
B
bellard 已提交
7948 7949 7950 7951 7952 7953 7954 7955 7956 7957 7958 7959
                }
                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 {
7960
            modrm = cpu_ldub_code(env, s->pc++);
7961 7962 7963 7964 7965
            /* 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 已提交
7966 7967 7968
            rm = (modrm & 7) | REX_B(s);
            reg = ((modrm >> 3) & 7) | rex_r;
            if (CODE64(s))
7969
                ot = MO_64;
B
bellard 已提交
7970
            else
7971
                ot = MO_32;
B
bellard 已提交
7972
            /* XXX: do it dynamically with CR4.DE bit */
B
bellard 已提交
7973
            if (reg == 4 || reg == 5 || reg >= 8)
B
bellard 已提交
7974 7975
                goto illegal_op;
            if (b & 2) {
T
ths 已提交
7976
                gen_svm_check_intercept(s, pc_start, SVM_EXIT_WRITE_DR0 + reg);
B
bellard 已提交
7977
                gen_op_mov_TN_reg(ot, 0, rm);
B
Blue Swirl 已提交
7978
                gen_helper_movl_drN_T0(cpu_env, tcg_const_i32(reg), cpu_T[0]);
B
bellard 已提交
7979
                gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
7980 7981
                gen_eob(s);
            } else {
T
ths 已提交
7982
                gen_svm_check_intercept(s, pc_start, SVM_EXIT_READ_DR0 + reg);
B
bellard 已提交
7983
                tcg_gen_ld_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,dr[reg]));
B
bellard 已提交
7984
                gen_op_mov_reg_T0(ot, rm);
B
bellard 已提交
7985 7986 7987 7988 7989 7990 7991
            }
        }
        break;
    case 0x106: /* clts */
        if (s->cpl != 0) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
T
ths 已提交
7992
            gen_svm_check_intercept(s, pc_start, SVM_EXIT_WRITE_CR0);
7993
            gen_helper_clts(cpu_env);
B
bellard 已提交
7994
            /* abort block because static cpu state changed */
B
bellard 已提交
7995
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
7996
            gen_eob(s);
B
bellard 已提交
7997 7998
        }
        break;
B
balrog 已提交
7999
    /* MMX/3DNow!/SSE/SSE2/SSE3/SSSE3/SSE4 support */
B
bellard 已提交
8000 8001
    case 0x1c3: /* MOVNTI reg, mem */
        if (!(s->cpuid_features & CPUID_SSE2))
B
bellard 已提交
8002
            goto illegal_op;
8003
        ot = s->dflag == 2 ? MO_64 : MO_32;
8004
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
8005 8006 8007 8008 8009
        mod = (modrm >> 6) & 3;
        if (mod == 3)
            goto illegal_op;
        reg = ((modrm >> 3) & 7) | rex_r;
        /* generate a generic store */
8010
        gen_ldst_modrm(env, s, modrm, ot, reg, 1);
B
bellard 已提交
8011
        break;
B
bellard 已提交
8012
    case 0x1ae:
8013
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
8014 8015 8016 8017
        mod = (modrm >> 6) & 3;
        op = (modrm >> 3) & 7;
        switch(op) {
        case 0: /* fxsave */
8018
            if (mod == 3 || !(s->cpuid_features & CPUID_FXSR) ||
8019
                (s->prefix & PREFIX_LOCK))
B
bellard 已提交
8020
                goto illegal_op;
8021
            if ((s->flags & HF_EM_MASK) || (s->flags & HF_TS_MASK)) {
B
bellard 已提交
8022 8023 8024
                gen_exception(s, EXCP07_PREX, pc_start - s->cs_base);
                break;
            }
8025
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
8026
            gen_update_cc_op(s);
B
bellard 已提交
8027
            gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
8028
            gen_helper_fxsave(cpu_env, cpu_A0, tcg_const_i32((s->dflag == 2)));
B
bellard 已提交
8029 8030
            break;
        case 1: /* fxrstor */
8031
            if (mod == 3 || !(s->cpuid_features & CPUID_FXSR) ||
8032
                (s->prefix & PREFIX_LOCK))
B
bellard 已提交
8033
                goto illegal_op;
8034
            if ((s->flags & HF_EM_MASK) || (s->flags & HF_TS_MASK)) {
B
bellard 已提交
8035 8036 8037
                gen_exception(s, EXCP07_PREX, pc_start - s->cs_base);
                break;
            }
8038
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
8039
            gen_update_cc_op(s);
B
bellard 已提交
8040
            gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
8041 8042
            gen_helper_fxrstor(cpu_env, cpu_A0,
                               tcg_const_i32((s->dflag == 2)));
B
bellard 已提交
8043 8044 8045 8046 8047 8048
            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 已提交
8049
            }
B
bellard 已提交
8050 8051
            if ((s->flags & HF_EM_MASK) || !(s->flags & HF_OSFXSR_MASK) ||
                mod == 3)
B
bellard 已提交
8052
                goto illegal_op;
8053
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
8054
            if (op == 2) {
8055
                gen_op_ld_v(s, MO_32, cpu_T[0], cpu_A0);
8056
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
B
Blue Swirl 已提交
8057
                gen_helper_ldmxcsr(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
8058
            } else {
B
bellard 已提交
8059
                tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State, mxcsr));
8060
                gen_op_st_T0_A0(s, MO_32);
B
bellard 已提交
8061
            }
B
bellard 已提交
8062 8063 8064
            break;
        case 5: /* lfence */
        case 6: /* mfence */
8065
            if ((modrm & 0xc7) != 0xc0 || !(s->cpuid_features & CPUID_SSE2))
B
bellard 已提交
8066 8067
                goto illegal_op;
            break;
8068 8069 8070
        case 7: /* sfence / clflush */
            if ((modrm & 0xc7) == 0xc0) {
                /* sfence */
A
aurel32 已提交
8071
                /* XXX: also check for cpuid_ext2_features & CPUID_EXT2_EMMX */
8072 8073 8074 8075 8076 8077
                if (!(s->cpuid_features & CPUID_SSE))
                    goto illegal_op;
            } else {
                /* clflush */
                if (!(s->cpuid_features & CPUID_CLFLUSH))
                    goto illegal_op;
8078
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
8079 8080
            }
            break;
B
bellard 已提交
8081
        default:
B
bellard 已提交
8082 8083 8084
            goto illegal_op;
        }
        break;
A
aurel32 已提交
8085
    case 0x10d: /* 3DNow! prefetch(w) */
8086
        modrm = cpu_ldub_code(env, s->pc++);
A
aurel32 已提交
8087 8088 8089
        mod = (modrm >> 6) & 3;
        if (mod == 3)
            goto illegal_op;
8090
        gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
8091 8092
        /* ignore for now */
        break;
B
bellard 已提交
8093
    case 0x1aa: /* rsm */
B
bellard 已提交
8094
        gen_svm_check_intercept(s, pc_start, SVM_EXIT_RSM);
B
bellard 已提交
8095 8096
        if (!(s->flags & HF_SMM_MASK))
            goto illegal_op;
J
Jun Koi 已提交
8097
        gen_update_cc_op(s);
B
bellard 已提交
8098
        gen_jmp_im(s->pc - s->cs_base);
B
Blue Swirl 已提交
8099
        gen_helper_rsm(cpu_env);
B
bellard 已提交
8100 8101
        gen_eob(s);
        break;
B
balrog 已提交
8102 8103 8104 8105 8106 8107 8108
    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;

8109
        modrm = cpu_ldub_code(env, s->pc++);
M
malc 已提交
8110
        reg = ((modrm >> 3) & 7) | rex_r;
B
balrog 已提交
8111 8112

        if (s->prefix & PREFIX_DATA)
8113
            ot = MO_16;
B
balrog 已提交
8114
        else if (s->dflag != 2)
8115
            ot = MO_32;
B
balrog 已提交
8116
        else
8117
            ot = MO_64;
B
balrog 已提交
8118

8119
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
B
Blue Swirl 已提交
8120
        gen_helper_popcnt(cpu_T[0], cpu_env, cpu_T[0], tcg_const_i32(ot));
B
balrog 已提交
8121
        gen_op_mov_reg_T0(ot, reg);
B
balrog 已提交
8122

8123
        set_cc_op(s, CC_OP_EFLAGS);
B
balrog 已提交
8124
        break;
A
aurel32 已提交
8125 8126 8127
    case 0x10e ... 0x10f:
        /* 3DNow! instructions, ignore prefixes */
        s->prefix &= ~(PREFIX_REPZ | PREFIX_REPNZ | PREFIX_DATA);
B
bellard 已提交
8128 8129
    case 0x110 ... 0x117:
    case 0x128 ... 0x12f:
B
balrog 已提交
8130
    case 0x138 ... 0x13a:
8131
    case 0x150 ... 0x179:
B
bellard 已提交
8132 8133 8134 8135
    case 0x17c ... 0x17f:
    case 0x1c2:
    case 0x1c4 ... 0x1c6:
    case 0x1d0 ... 0x1fe:
8136
        gen_sse(env, s, b, pc_start, rex_r);
B
bellard 已提交
8137
        break;
B
bellard 已提交
8138 8139 8140 8141 8142
    default:
        goto illegal_op;
    }
    /* lock generation */
    if (s->prefix & PREFIX_LOCK)
P
pbrook 已提交
8143
        gen_helper_unlock();
B
bellard 已提交
8144 8145
    return s->pc;
 illegal_op:
8146
    if (s->prefix & PREFIX_LOCK)
P
pbrook 已提交
8147
        gen_helper_unlock();
B
bellard 已提交
8148 8149 8150 8151 8152 8153 8154
    /* XXX: ensure that no lock was generated */
    gen_exception(s, EXCP06_ILLOP, pc_start - s->cs_base);
    return s->pc;
}

void optimize_flags_init(void)
{
P
pbrook 已提交
8155 8156
    cpu_env = tcg_global_reg_new_ptr(TCG_AREG0, "env");
    cpu_cc_op = tcg_global_mem_new_i32(TCG_AREG0,
8157 8158
                                       offsetof(CPUX86State, cc_op), "cc_op");
    cpu_cc_dst = tcg_global_mem_new(TCG_AREG0, offsetof(CPUX86State, cc_dst),
P
pbrook 已提交
8159
                                    "cc_dst");
8160 8161
    cpu_cc_src = tcg_global_mem_new(TCG_AREG0, offsetof(CPUX86State, cc_src),
                                    "cc_src");
8162 8163
    cpu_cc_src2 = tcg_global_mem_new(TCG_AREG0, offsetof(CPUX86State, cc_src2),
                                     "cc_src2");
8164

8165 8166
#ifdef TARGET_X86_64
    cpu_regs[R_EAX] = tcg_global_mem_new_i64(TCG_AREG0,
8167
                                             offsetof(CPUX86State, regs[R_EAX]), "rax");
8168
    cpu_regs[R_ECX] = tcg_global_mem_new_i64(TCG_AREG0,
8169
                                             offsetof(CPUX86State, regs[R_ECX]), "rcx");
8170
    cpu_regs[R_EDX] = tcg_global_mem_new_i64(TCG_AREG0,
8171
                                             offsetof(CPUX86State, regs[R_EDX]), "rdx");
8172
    cpu_regs[R_EBX] = tcg_global_mem_new_i64(TCG_AREG0,
8173
                                             offsetof(CPUX86State, regs[R_EBX]), "rbx");
8174
    cpu_regs[R_ESP] = tcg_global_mem_new_i64(TCG_AREG0,
8175
                                             offsetof(CPUX86State, regs[R_ESP]), "rsp");
8176
    cpu_regs[R_EBP] = tcg_global_mem_new_i64(TCG_AREG0,
8177
                                             offsetof(CPUX86State, regs[R_EBP]), "rbp");
8178
    cpu_regs[R_ESI] = tcg_global_mem_new_i64(TCG_AREG0,
8179
                                             offsetof(CPUX86State, regs[R_ESI]), "rsi");
8180
    cpu_regs[R_EDI] = tcg_global_mem_new_i64(TCG_AREG0,
8181
                                             offsetof(CPUX86State, regs[R_EDI]), "rdi");
8182
    cpu_regs[8] = tcg_global_mem_new_i64(TCG_AREG0,
8183
                                         offsetof(CPUX86State, regs[8]), "r8");
8184
    cpu_regs[9] = tcg_global_mem_new_i64(TCG_AREG0,
8185
                                          offsetof(CPUX86State, regs[9]), "r9");
8186
    cpu_regs[10] = tcg_global_mem_new_i64(TCG_AREG0,
8187
                                          offsetof(CPUX86State, regs[10]), "r10");
8188
    cpu_regs[11] = tcg_global_mem_new_i64(TCG_AREG0,
8189
                                          offsetof(CPUX86State, regs[11]), "r11");
8190
    cpu_regs[12] = tcg_global_mem_new_i64(TCG_AREG0,
8191
                                          offsetof(CPUX86State, regs[12]), "r12");
8192
    cpu_regs[13] = tcg_global_mem_new_i64(TCG_AREG0,
8193
                                          offsetof(CPUX86State, regs[13]), "r13");
8194
    cpu_regs[14] = tcg_global_mem_new_i64(TCG_AREG0,
8195
                                          offsetof(CPUX86State, regs[14]), "r14");
8196
    cpu_regs[15] = tcg_global_mem_new_i64(TCG_AREG0,
8197
                                          offsetof(CPUX86State, regs[15]), "r15");
8198 8199
#else
    cpu_regs[R_EAX] = tcg_global_mem_new_i32(TCG_AREG0,
8200
                                             offsetof(CPUX86State, regs[R_EAX]), "eax");
8201
    cpu_regs[R_ECX] = tcg_global_mem_new_i32(TCG_AREG0,
8202
                                             offsetof(CPUX86State, regs[R_ECX]), "ecx");
8203
    cpu_regs[R_EDX] = tcg_global_mem_new_i32(TCG_AREG0,
8204
                                             offsetof(CPUX86State, regs[R_EDX]), "edx");
8205
    cpu_regs[R_EBX] = tcg_global_mem_new_i32(TCG_AREG0,
8206
                                             offsetof(CPUX86State, regs[R_EBX]), "ebx");
8207
    cpu_regs[R_ESP] = tcg_global_mem_new_i32(TCG_AREG0,
8208
                                             offsetof(CPUX86State, regs[R_ESP]), "esp");
8209
    cpu_regs[R_EBP] = tcg_global_mem_new_i32(TCG_AREG0,
8210
                                             offsetof(CPUX86State, regs[R_EBP]), "ebp");
8211
    cpu_regs[R_ESI] = tcg_global_mem_new_i32(TCG_AREG0,
8212
                                             offsetof(CPUX86State, regs[R_ESI]), "esi");
8213
    cpu_regs[R_EDI] = tcg_global_mem_new_i32(TCG_AREG0,
8214
                                             offsetof(CPUX86State, regs[R_EDI]), "edi");
8215
#endif
B
bellard 已提交
8216 8217 8218 8219 8220
}

/* 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. */
8221
static inline void gen_intermediate_code_internal(X86CPU *cpu,
8222
                                                  TranslationBlock *tb,
8223
                                                  bool search_pc)
B
bellard 已提交
8224
{
8225
    CPUState *cs = CPU(cpu);
8226
    CPUX86State *env = &cpu->env;
B
bellard 已提交
8227
    DisasContext dc1, *dc = &dc1;
B
bellard 已提交
8228
    target_ulong pc_ptr;
B
bellard 已提交
8229
    uint16_t *gen_opc_end;
8230
    CPUBreakpoint *bp;
8231
    int j, lj;
8232
    uint64_t flags;
B
bellard 已提交
8233 8234
    target_ulong pc_start;
    target_ulong cs_base;
P
pbrook 已提交
8235 8236
    int num_insns;
    int max_insns;
8237

B
bellard 已提交
8238
    /* generate intermediate code */
B
bellard 已提交
8239 8240
    pc_start = tb->pc;
    cs_base = tb->cs_base;
B
bellard 已提交
8241
    flags = tb->flags;
B
bellard 已提交
8242

8243
    dc->pe = (flags >> HF_PE_SHIFT) & 1;
B
bellard 已提交
8244 8245 8246 8247 8248 8249 8250 8251
    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;
8252
    dc->singlestep_enabled = cs->singlestep_enabled;
B
bellard 已提交
8253
    dc->cc_op = CC_OP_DYNAMIC;
8254
    dc->cc_op_dirty = false;
B
bellard 已提交
8255 8256 8257 8258 8259 8260
    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) {
8261
        dc->mem_index = cpu_mmu_index(env);
B
bellard 已提交
8262
    }
8263 8264 8265 8266 8267
    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 已提交
8268 8269 8270 8271
#ifdef TARGET_X86_64
    dc->lma = (flags >> HF_LMA_SHIFT) & 1;
    dc->code64 = (flags >> HF_CS64_SHIFT) & 1;
#endif
B
bellard 已提交
8272
    dc->flags = flags;
8273
    dc->jmp_opt = !(dc->tf || cs->singlestep_enabled ||
8274
                    (flags & HF_INHIBIT_IRQ_MASK)
B
bellard 已提交
8275
#ifndef CONFIG_SOFTMMU
B
bellard 已提交
8276 8277 8278
                    || (flags & HF_SOFTMMU_MASK)
#endif
                    );
8279 8280
#if 0
    /* check addseg logic */
B
bellard 已提交
8281
    if (!dc->addseg && (dc->vm86 || !dc->pe || !dc->code32))
8282 8283 8284
        printf("ERROR addseg\n");
#endif

P
pbrook 已提交
8285 8286 8287 8288 8289 8290 8291 8292 8293 8294 8295
    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();
8296
    cpu_cc_srcT = tcg_temp_local_new();
B
bellard 已提交
8297

8298
    gen_opc_end = tcg_ctx.gen_opc_buf + OPC_MAX_SIZE;
B
bellard 已提交
8299 8300 8301 8302

    dc->is_jmp = DISAS_NEXT;
    pc_ptr = pc_start;
    lj = -1;
P
pbrook 已提交
8303 8304 8305 8306
    num_insns = 0;
    max_insns = tb->cflags & CF_COUNT_MASK;
    if (max_insns == 0)
        max_insns = CF_COUNT_MASK;
B
bellard 已提交
8307

8308
    gen_tb_start();
B
bellard 已提交
8309
    for(;;) {
B
Blue Swirl 已提交
8310 8311
        if (unlikely(!QTAILQ_EMPTY(&env->breakpoints))) {
            QTAILQ_FOREACH(bp, &env->breakpoints, entry) {
J
Jan Kiszka 已提交
8312 8313
                if (bp->pc == pc_ptr &&
                    !((bp->flags & BP_CPU) && (tb->flags & HF_RF_MASK))) {
B
bellard 已提交
8314 8315 8316 8317 8318 8319
                    gen_debug(dc, pc_ptr - dc->cs_base);
                    break;
                }
            }
        }
        if (search_pc) {
8320
            j = tcg_ctx.gen_opc_ptr - tcg_ctx.gen_opc_buf;
B
bellard 已提交
8321 8322 8323
            if (lj < j) {
                lj++;
                while (lj < j)
8324
                    tcg_ctx.gen_opc_instr_start[lj++] = 0;
B
bellard 已提交
8325
            }
8326
            tcg_ctx.gen_opc_pc[lj] = pc_ptr;
B
bellard 已提交
8327
            gen_opc_cc_op[lj] = dc->cc_op;
8328
            tcg_ctx.gen_opc_instr_start[lj] = 1;
8329
            tcg_ctx.gen_opc_icount[lj] = num_insns;
B
bellard 已提交
8330
        }
P
pbrook 已提交
8331 8332 8333
        if (num_insns + 1 == max_insns && (tb->cflags & CF_LAST_IO))
            gen_io_start();

8334
        pc_ptr = disas_insn(env, dc, pc_ptr);
P
pbrook 已提交
8335
        num_insns++;
B
bellard 已提交
8336 8337 8338 8339 8340
        /* stop translation if indicated */
        if (dc->is_jmp)
            break;
        /* if single step mode, we generate only one instruction and
           generate an exception */
8341 8342 8343
        /* 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 */
8344
        if (dc->tf || dc->singlestep_enabled ||
P
pbrook 已提交
8345
            (flags & HF_INHIBIT_IRQ_MASK)) {
B
bellard 已提交
8346
            gen_jmp_im(pc_ptr - dc->cs_base);
B
bellard 已提交
8347 8348 8349 8350
            gen_eob(dc);
            break;
        }
        /* if too long translation, stop generation too */
8351
        if (tcg_ctx.gen_opc_ptr >= gen_opc_end ||
P
pbrook 已提交
8352 8353
            (pc_ptr - pc_start) >= (TARGET_PAGE_SIZE - 32) ||
            num_insns >= max_insns) {
B
bellard 已提交
8354
            gen_jmp_im(pc_ptr - dc->cs_base);
B
bellard 已提交
8355 8356 8357
            gen_eob(dc);
            break;
        }
8358 8359 8360 8361 8362
        if (singlestep) {
            gen_jmp_im(pc_ptr - dc->cs_base);
            gen_eob(dc);
            break;
        }
B
bellard 已提交
8363
    }
P
pbrook 已提交
8364 8365
    if (tb->cflags & CF_LAST_IO)
        gen_io_end();
8366
    gen_tb_end(tb, num_insns);
8367
    *tcg_ctx.gen_opc_ptr = INDEX_op_end;
B
bellard 已提交
8368 8369
    /* we don't forget to fill the last values */
    if (search_pc) {
8370
        j = tcg_ctx.gen_opc_ptr - tcg_ctx.gen_opc_buf;
B
bellard 已提交
8371 8372
        lj++;
        while (lj <= j)
8373
            tcg_ctx.gen_opc_instr_start[lj++] = 0;
B
bellard 已提交
8374
    }
8375

B
bellard 已提交
8376
#ifdef DEBUG_DISAS
8377
    if (qemu_loglevel_mask(CPU_LOG_TB_IN_ASM)) {
B
bellard 已提交
8378
        int disas_flags;
8379 8380
        qemu_log("----------------\n");
        qemu_log("IN: %s\n", lookup_symbol(pc_start));
B
bellard 已提交
8381 8382 8383 8384 8385 8386
#ifdef TARGET_X86_64
        if (dc->code64)
            disas_flags = 2;
        else
#endif
            disas_flags = !dc->code32;
B
Blue Swirl 已提交
8387
        log_target_disas(env, pc_start, pc_ptr - pc_start, disas_flags);
8388
        qemu_log("\n");
B
bellard 已提交
8389 8390 8391
    }
#endif

P
pbrook 已提交
8392
    if (!search_pc) {
B
bellard 已提交
8393
        tb->size = pc_ptr - pc_start;
P
pbrook 已提交
8394 8395
        tb->icount = num_insns;
    }
B
bellard 已提交
8396 8397
}

8398
void gen_intermediate_code(CPUX86State *env, TranslationBlock *tb)
B
bellard 已提交
8399
{
8400
    gen_intermediate_code_internal(x86_env_get_cpu(env), tb, false);
B
bellard 已提交
8401 8402
}

8403
void gen_intermediate_code_pc(CPUX86State *env, TranslationBlock *tb)
B
bellard 已提交
8404
{
8405
    gen_intermediate_code_internal(x86_env_get_cpu(env), tb, true);
B
bellard 已提交
8406 8407
}

8408
void restore_state_to_opc(CPUX86State *env, TranslationBlock *tb, int pc_pos)
A
aurel32 已提交
8409 8410 8411
{
    int cc_op;
#ifdef DEBUG_DISAS
8412
    if (qemu_loglevel_mask(CPU_LOG_TB_OP)) {
A
aurel32 已提交
8413
        int i;
8414
        qemu_log("RESTORE:\n");
A
aurel32 已提交
8415
        for(i = 0;i <= pc_pos; i++) {
8416
            if (tcg_ctx.gen_opc_instr_start[i]) {
8417 8418
                qemu_log("0x%04x: " TARGET_FMT_lx "\n", i,
                        tcg_ctx.gen_opc_pc[i]);
A
aurel32 已提交
8419 8420
            }
        }
8421
        qemu_log("pc_pos=0x%x eip=" TARGET_FMT_lx " cs_base=%x\n",
8422
                pc_pos, tcg_ctx.gen_opc_pc[pc_pos] - tb->cs_base,
A
aurel32 已提交
8423 8424 8425
                (uint32_t)tb->cs_base);
    }
#endif
8426
    env->eip = tcg_ctx.gen_opc_pc[pc_pos] - tb->cs_base;
A
aurel32 已提交
8427 8428 8429 8430
    cc_op = gen_opc_cc_op[pc_pos];
    if (cc_op != CC_OP_DYNAMIC)
        env->cc_op = cc_op;
}