translate.c 282.1 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_ldu_T0_A0(DisasContext *s, int idx)
B
bellard 已提交
590
{
591
    gen_op_ld_v(s, idx, cpu_T[0], cpu_A0);
B
bellard 已提交
592
}
B
bellard 已提交
593

594
static inline void gen_op_ld_T1_A0(DisasContext *s, int idx)
595
{
596
    gen_op_ld_v(s, idx, cpu_T[1], cpu_A0);
597 598
}

599
static inline void gen_op_st_v(DisasContext *s, int idx, TCGv t0, TCGv a0)
B
bellard 已提交
600
{
601
    tcg_gen_qemu_st_tl(t0, a0, s->mem_index, idx | MO_LE);
B
bellard 已提交
602
}
603

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

609
static inline void gen_op_st_T1_A0(DisasContext *s, int idx)
B
bellard 已提交
610
{
611
    gen_op_st_v(s, idx, cpu_T[1], cpu_A0);
B
bellard 已提交
612
}
613

B
bellard 已提交
614 615
static inline void gen_jmp_im(target_ulong pc)
{
B
bellard 已提交
616
    tcg_gen_movi_tl(cpu_tmp0, pc);
617
    tcg_gen_st_tl(cpu_tmp0, cpu_env, offsetof(CPUX86State, eip));
B
bellard 已提交
618 619
}

B
bellard 已提交
620 621 622 623 624
static inline void gen_string_movl_A0_ESI(DisasContext *s)
{
    int override;

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

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

676 677
static inline void gen_op_movl_T0_Dshift(int ot) 
{
678
    tcg_gen_ld32s_tl(cpu_T[0], cpu_env, offsetof(CPUX86State, df));
679
    tcg_gen_shli_tl(cpu_T[0], cpu_T[0], ot);
B
bellard 已提交
680 681
};

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

713 714 715 716 717
static void gen_extu(int ot, TCGv reg)
{
    gen_ext_tl(reg, reg, ot, false);
}

718 719
static void gen_exts(int ot, TCGv reg)
{
720
    gen_ext_tl(reg, reg, ot, true);
721
}
B
bellard 已提交
722

723 724
static inline void gen_op_jnz_ecx(int size, int label1)
{
725
    tcg_gen_mov_tl(cpu_tmp0, cpu_regs[R_ECX]);
726
    gen_extu(size + 1, cpu_tmp0);
P
pbrook 已提交
727
    tcg_gen_brcondi_tl(TCG_COND_NE, cpu_tmp0, 0, label1);
728 729 730 731
}

static inline void gen_op_jz_ecx(int size, int label1)
{
732
    tcg_gen_mov_tl(cpu_tmp0, cpu_regs[R_ECX]);
733
    gen_extu(size + 1, cpu_tmp0);
P
pbrook 已提交
734
    tcg_gen_brcondi_tl(TCG_COND_EQ, cpu_tmp0, 0, label1);
735
}
B
bellard 已提交
736

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

P
pbrook 已提交
752 753 754
static void gen_helper_out_func(int ot, TCGv_i32 v, TCGv_i32 n)
{
    switch (ot) {
755
    case MO_8:
756 757
        gen_helper_outb(v, n);
        break;
758
    case MO_16:
759 760
        gen_helper_outw(v, n);
        break;
761
    case MO_32:
762 763
        gen_helper_outl(v, n);
        break;
P
pbrook 已提交
764 765
    }
}
766

767 768
static void gen_check_io(DisasContext *s, int ot, target_ulong cur_eip,
                         uint32_t svm_flags)
769
{
770 771 772 773
    int state_saved;
    target_ulong next_eip;

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

B
bellard 已提交
805 806 807
static inline void gen_movs(DisasContext *s, int ot)
{
    gen_string_movl_A0_ESI(s);
808
    gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
809
    gen_string_movl_A0_EDI(s);
810
    gen_op_st_T0_A0(s, ot);
811 812 813
    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 已提交
814 815
}

816 817 818 819 820 821 822 823 824 825 826
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]);
}

827 828 829 830 831 832 833
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]);
}

834 835 836 837 838 839 840 841
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]);
842 843
    tcg_gen_neg_tl(cpu_cc_src, cpu_T[0]);
    tcg_gen_movi_tl(cpu_cc_srcT, 0);
844 845
}

846 847
/* compute all eflags to cc_src */
static void gen_compute_eflags(DisasContext *s)
848
{
849
    TCGv zero, dst, src1, src2;
850 851
    int live, dead;

852 853 854
    if (s->cc_op == CC_OP_EFLAGS) {
        return;
    }
R
Richard Henderson 已提交
855 856 857 858 859
    if (s->cc_op == CC_OP_CLR) {
        tcg_gen_movi_tl(cpu_cc_src, CC_Z);
        set_cc_op(s, CC_OP_EFLAGS);
        return;
    }
860 861 862 863

    TCGV_UNUSED(zero);
    dst = cpu_cc_dst;
    src1 = cpu_cc_src;
864
    src2 = cpu_cc_src2;
865 866 867

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

882
    gen_update_cc_op(s);
883
    gen_helper_cc_compute_all(cpu_cc_src, dst, src1, src2, cpu_cc_op);
884
    set_cc_op(s, CC_OP_EFLAGS);
885 886 887 888

    if (dead) {
        tcg_temp_free(zero);
    }
889 890
}

891 892 893 894 895 896 897 898 899 900
typedef struct CCPrepare {
    TCGCond cond;
    TCGv reg;
    TCGv reg2;
    target_ulong imm;
    target_ulong mask;
    bool use_reg2;
    bool no_setcond;
} CCPrepare;

901
/* compute eflags.C to reg */
902
static CCPrepare gen_prepare_eflags_c(DisasContext *s, TCGv reg)
903 904
{
    TCGv t0, t1;
905
    int size, shift;
906 907 908

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

    case CC_OP_LOGICB ... CC_OP_LOGICQ:
R
Richard Henderson 已提交
928
    case CC_OP_CLR:
929
        return (CCPrepare) { .cond = TCG_COND_NEVER, .mask = -1 };
930 931 932

    case CC_OP_INCB ... CC_OP_INCQ:
    case CC_OP_DECB ... CC_OP_DECQ:
933 934
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                             .mask = -1, .no_setcond = true };
935 936 937 938

    case CC_OP_SHLB ... CC_OP_SHLQ:
        /* (CC_SRC >> (DATA_BITS - 1)) & 1 */
        size = s->cc_op - CC_OP_SHLB;
939 940 941
        shift = (8 << size) - 1;
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                             .mask = (target_ulong)1 << shift };
942 943

    case CC_OP_MULB ... CC_OP_MULQ:
944 945
        return (CCPrepare) { .cond = TCG_COND_NE,
                             .reg = cpu_cc_src, .mask = -1 };
946

947 948 949 950 951
    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 };

952 953 954 955 956
    case CC_OP_ADCX:
    case CC_OP_ADCOX:
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_dst,
                             .mask = -1, .no_setcond = true };

957 958 959
    case CC_OP_EFLAGS:
    case CC_OP_SARB ... CC_OP_SARQ:
        /* CC_SRC & 1 */
960 961
        return (CCPrepare) { .cond = TCG_COND_NE,
                             .reg = cpu_cc_src, .mask = CC_C };
962 963 964 965 966

    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);
967 968
       gen_helper_cc_compute_c(reg, cpu_cc_dst, cpu_cc_src,
                               cpu_cc_src2, cpu_cc_op);
969 970
       return (CCPrepare) { .cond = TCG_COND_NE, .reg = reg,
                            .mask = -1, .no_setcond = true };
971 972 973
    }
}

974
/* compute eflags.P to reg */
975
static CCPrepare gen_prepare_eflags_p(DisasContext *s, TCGv reg)
976
{
977
    gen_compute_eflags(s);
978 979
    return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                         .mask = CC_P };
980 981 982
}

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

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

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

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

    inv = b & 1;
1056
    jcc_op = (b >> 1) & 7;
1057 1058

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

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

1084
        default:
1085
            goto slow_jcc;
1086
        }
1087
        break;
1088

1089 1090
    default:
    slow_jcc:
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 1130 1131 1132 1133 1134
        /* 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;
        }
1135
        break;
1136
    }
1137 1138 1139 1140 1141

    if (inv) {
        cc.cond = tcg_invert_cond(cc.cond);
    }
    return cc;
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 1173 1174 1175 1176 1177
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);
}
1178

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

1203
    gen_update_cc_op(s);
1204 1205 1206 1207
    if (cc.mask != -1) {
        tcg_gen_andi_tl(cpu_T[0], cc.reg, cc.mask);
        cc.reg = cpu_T[0];
    }
1208
    set_cc_op(s, CC_OP_DYNAMIC);
1209 1210 1211 1212
    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);
1213 1214 1215
    }
}

B
bellard 已提交
1216 1217 1218
/* 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 已提交
1219
{
B
bellard 已提交
1220 1221 1222 1223
    int l1, l2;

    l1 = gen_new_label();
    l2 = gen_new_label();
1224
    gen_op_jnz_ecx(s->aflag, l1);
B
bellard 已提交
1225 1226 1227 1228
    gen_set_label(l2);
    gen_jmp_tb(s, next_eip, 1);
    gen_set_label(l1);
    return l2;
B
bellard 已提交
1229 1230 1231 1232
}

static inline void gen_stos(DisasContext *s, int ot)
{
1233
    gen_op_mov_TN_reg(MO_32, 0, R_EAX);
B
bellard 已提交
1234
    gen_string_movl_A0_EDI(s);
1235
    gen_op_st_T0_A0(s, ot);
1236 1237
    gen_op_movl_T0_Dshift(ot);
    gen_op_add_reg_T0(s->aflag, R_EDI);
B
bellard 已提交
1238 1239 1240 1241 1242
}

static inline void gen_lods(DisasContext *s, int ot)
{
    gen_string_movl_A0_ESI(s);
1243
    gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
1244
    gen_op_mov_reg_T0(ot, R_EAX);
1245 1246
    gen_op_movl_T0_Dshift(ot);
    gen_op_add_reg_T0(s->aflag, R_ESI);
B
bellard 已提交
1247 1248 1249 1250 1251
}

static inline void gen_scas(DisasContext *s, int ot)
{
    gen_string_movl_A0_EDI(s);
1252
    gen_op_ld_T1_A0(s, ot);
1253
    gen_op(s, OP_CMPL, ot, R_EAX);
1254 1255
    gen_op_movl_T0_Dshift(ot);
    gen_op_add_reg_T0(s->aflag, R_EDI);
B
bellard 已提交
1256 1257 1258 1259 1260
}

static inline void gen_cmps(DisasContext *s, int ot)
{
    gen_string_movl_A0_EDI(s);
1261
    gen_op_ld_T1_A0(s, ot);
1262 1263
    gen_string_movl_A0_ESI(s);
    gen_op(s, OP_CMPL, ot, OR_TMP0);
1264 1265 1266
    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 已提交
1267 1268 1269 1270
}

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

static inline void gen_outs(DisasContext *s, int ot)
{
P
pbrook 已提交
1291 1292
    if (use_icount)
        gen_io_start();
B
bellard 已提交
1293
    gen_string_movl_A0_ESI(s);
1294
    gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1295

1296
    gen_op_mov_TN_reg(MO_16, 1, R_EDX);
1297 1298 1299
    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 已提交
1300
    gen_helper_out_func(ot, cpu_tmp2_i32, cpu_tmp3_i32);
1301

1302 1303
    gen_op_movl_T0_Dshift(ot);
    gen_op_add_reg_T0(s->aflag, R_ESI);
P
pbrook 已提交
1304 1305
    if (use_icount)
        gen_io_end();
B
bellard 已提交
1306 1307 1308 1309 1310 1311
}

/* 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 已提交
1312
                                 target_ulong cur_eip, target_ulong next_eip) \
B
bellard 已提交
1313
{                                                                             \
B
bellard 已提交
1314
    int l2;\
B
bellard 已提交
1315
    gen_update_cc_op(s);                                                      \
B
bellard 已提交
1316
    l2 = gen_jz_ecx_string(s, next_eip);                                      \
B
bellard 已提交
1317
    gen_ ## op(s, ot);                                                        \
1318
    gen_op_add_reg_im(s->aflag, R_ECX, -1);                                   \
B
bellard 已提交
1319 1320 1321
    /* a loop would cause two single step exceptions if ECX = 1               \
       before rep string_insn */                                              \
    if (!s->jmp_opt)                                                          \
1322
        gen_op_jz_ecx(s->aflag, l2);                                          \
B
bellard 已提交
1323 1324 1325 1326 1327
    gen_jmp(s, cur_eip);                                                      \
}

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

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

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

B
bellard 已提交
1495 1496 1497
/* if d == OR_TMP0, it means memory operand (address in A0) */
static void gen_inc(DisasContext *s1, int ot, int d, int c)
{
1498
    if (d != OR_TMP0) {
B
bellard 已提交
1499
        gen_op_mov_TN_reg(ot, 0, d);
1500 1501 1502
    } else {
        gen_op_ld_v(s1, ot, cpu_T[0], cpu_A0);
    }
1503
    gen_compute_eflags_c(s1, cpu_cc_src);
B
bellard 已提交
1504
    if (c > 0) {
1505
        tcg_gen_addi_tl(cpu_T[0], cpu_T[0], 1);
1506
        set_cc_op(s1, CC_OP_INCB + ot);
B
bellard 已提交
1507
    } else {
1508
        tcg_gen_addi_tl(cpu_T[0], cpu_T[0], -1);
1509
        set_cc_op(s1, CC_OP_DECB + ot);
B
bellard 已提交
1510 1511
    }
    if (d != OR_TMP0)
B
bellard 已提交
1512
        gen_op_mov_reg_T0(ot, d);
B
bellard 已提交
1513
    else
1514
        gen_op_st_T0_A0(s1, ot);
B
bellard 已提交
1515
    tcg_gen_mov_tl(cpu_cc_dst, cpu_T[0]);
B
bellard 已提交
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 1558 1559 1560 1561 1562
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);
}

1563 1564
static void gen_shift_rm_T1(DisasContext *s, int ot, int op1, 
                            int is_right, int is_arith)
B
bellard 已提交
1565
{
1566
    target_ulong mask = (ot == MO_64 ? 0x3f : 0x1f);
1567

1568
    /* load */
1569
    if (op1 == OR_TMP0) {
1570
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1571
    } else {
1572
        gen_op_mov_TN_reg(ot, 0, op1);
1573
    }
1574

1575 1576
    tcg_gen_andi_tl(cpu_T[1], cpu_T[1], mask);
    tcg_gen_subi_tl(cpu_tmp0, cpu_T[1], 1);
1577 1578 1579

    if (is_right) {
        if (is_arith) {
B
bellard 已提交
1580
            gen_exts(ot, cpu_T[0]);
1581 1582
            tcg_gen_sar_tl(cpu_tmp0, cpu_T[0], cpu_tmp0);
            tcg_gen_sar_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1583
        } else {
B
bellard 已提交
1584
            gen_extu(ot, cpu_T[0]);
1585 1586
            tcg_gen_shr_tl(cpu_tmp0, cpu_T[0], cpu_tmp0);
            tcg_gen_shr_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1587 1588
        }
    } else {
1589 1590
        tcg_gen_shl_tl(cpu_tmp0, cpu_T[0], cpu_tmp0);
        tcg_gen_shl_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1591 1592 1593
    }

    /* store */
1594
    if (op1 == OR_TMP0) {
1595
        gen_op_st_T0_A0(s, ot);
1596
    } else {
1597
        gen_op_mov_reg_T0(ot, op1);
1598 1599
    }

1600
    gen_shift_flags(s, ot, cpu_T[0], cpu_tmp0, cpu_T[1], is_right);
1601 1602
}

B
bellard 已提交
1603 1604 1605
static void gen_shift_rm_im(DisasContext *s, int ot, int op1, int op2,
                            int is_right, int is_arith)
{
1606
    int mask = (ot == MO_64 ? 0x3f : 0x1f);
B
bellard 已提交
1607 1608 1609

    /* load */
    if (op1 == OR_TMP0)
1610
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
1611 1612 1613 1614 1615 1616 1617 1618
    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 已提交
1619
                tcg_gen_sari_tl(cpu_tmp4, cpu_T[0], op2 - 1);
B
bellard 已提交
1620 1621 1622
                tcg_gen_sari_tl(cpu_T[0], cpu_T[0], op2);
            } else {
                gen_extu(ot, cpu_T[0]);
B
bellard 已提交
1623
                tcg_gen_shri_tl(cpu_tmp4, cpu_T[0], op2 - 1);
B
bellard 已提交
1624 1625 1626
                tcg_gen_shri_tl(cpu_T[0], cpu_T[0], op2);
            }
        } else {
B
bellard 已提交
1627
            tcg_gen_shli_tl(cpu_tmp4, cpu_T[0], op2 - 1);
B
bellard 已提交
1628 1629 1630 1631 1632 1633
            tcg_gen_shli_tl(cpu_T[0], cpu_T[0], op2);
        }
    }

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

1646 1647 1648 1649 1650 1651 1652 1653
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);
}

1654
static void gen_rot_rm_T1(DisasContext *s, int ot, int op1, int is_right)
1655
{
1656
    target_ulong mask = (ot == MO_64 ? 0x3f : 0x1f);
1657
    TCGv_i32 t0, t1;
1658 1659

    /* load */
1660
    if (op1 == OR_TMP0) {
1661
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1662
    } else {
1663
        gen_op_mov_TN_reg(ot, 0, op1);
1664
    }
1665

1666
    tcg_gen_andi_tl(cpu_T[1], cpu_T[1], mask);
1667

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

    /* store */
1701
    if (op1 == OR_TMP0) {
1702
        gen_op_st_T0_A0(s, ot);
1703
    } else {
1704
        gen_op_mov_reg_T0(ot, op1);
1705
    }
1706

1707 1708
    /* We'll need the flags computed into CC_SRC.  */
    gen_compute_eflags(s);
1709

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

M
malc 已提交
1743 1744 1745
static void gen_rot_rm_im(DisasContext *s, int ot, int op1, int op2,
                          int is_right)
{
1746
    int mask = (ot == MO_64 ? 0x3f : 0x1f);
1747
    int shift;
M
malc 已提交
1748 1749 1750

    /* load */
    if (op1 == OR_TMP0) {
1751
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
M
malc 已提交
1752
    } else {
1753
        gen_op_mov_TN_reg(ot, 0, op1);
M
malc 已提交
1754 1755 1756 1757
    }

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

    /* store */
    if (op1 == OR_TMP0) {
1797
        gen_op_st_T0_A0(s, ot);
M
malc 已提交
1798
    } else {
1799
        gen_op_mov_reg_T0(ot, op1);
M
malc 已提交
1800 1801 1802
    }

    if (op2 != 0) {
1803
        /* Compute the flags into CC_SRC.  */
1804
        gen_compute_eflags(s);
1805

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

1824 1825 1826 1827
/* XXX: add faster immediate = 1 case */
static void gen_rotc_rm_T1(DisasContext *s, int ot, int op1, 
                           int is_right)
{
1828
    gen_compute_eflags(s);
1829
    assert(s->cc_op == CC_OP_EFLAGS);
1830 1831 1832

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

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

    /* load */
1887
    if (op1 == OR_TMP0) {
1888
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1889
    } else {
1890
        gen_op_mov_TN_reg(ot, 0, op1);
1891
    }
1892

1893 1894
    count = tcg_temp_new();
    tcg_gen_andi_tl(count, count_in, mask);
1895

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

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

    /* store */
1955
    if (op1 == OR_TMP0) {
1956
        gen_op_st_T0_A0(s, ot);
1957
    } else {
1958
        gen_op_mov_reg_T0(ot, op1);
1959
    }
1960

1961 1962
    gen_shift_flags(s, ot, cpu_T[0], cpu_tmp0, count, is_right);
    tcg_temp_free(count);
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 1988 1989 1990 1991 1992
}

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 已提交
1993 1994 1995 1996
}

static void gen_shifti(DisasContext *s1, int op, int ot, int d, int c)
{
B
bellard 已提交
1997
    switch(op) {
M
malc 已提交
1998 1999 2000 2001 2002 2003
    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 已提交
2004 2005 2006 2007 2008 2009 2010 2011 2012 2013 2014 2015 2016 2017 2018 2019
    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 已提交
2020 2021
}

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

    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;
2044
        index = -1;
B
bellard 已提交
2045
        scale = 0;
2046

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

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

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

B
bellard 已提交
2109 2110
        if (must_add_seg) {
            if (override < 0) {
2111
                if (base == R_EBP || base == R_ESP) {
B
bellard 已提交
2112
                    override = R_SS;
2113
                } else {
B
bellard 已提交
2114
                    override = R_DS;
2115
                }
B
bellard 已提交
2116
            }
2117 2118 2119 2120 2121 2122 2123 2124 2125

            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 已提交
2126
            }
2127 2128 2129 2130 2131 2132

            tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_tmp0);
        }

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

2202
 done:
B
bellard 已提交
2203 2204 2205 2206 2207 2208
    opreg = OR_A0;
    disp = 0;
    *reg_ptr = opreg;
    *offset_ptr = disp;
}

2209
static void gen_nop_modrm(CPUX86State *env, DisasContext *s, int modrm)
B
bellard 已提交
2210 2211 2212 2213 2214 2215 2216 2217 2218 2219 2220
{
    int mod, rm, base, code;

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

    if (s->aflag) {

        base = rm;
2221

B
bellard 已提交
2222
        if (base == 4) {
2223
            code = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
2224 2225
            base = (code & 7);
        }
2226

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

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

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

2314
static inline uint32_t insn_get(CPUX86State *env, DisasContext *s, int ot)
B
bellard 已提交
2315 2316 2317 2318
{
    uint32_t ret;

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

B
bellard 已提交
2336 2337
static inline int insn_const_size(unsigned int ot)
{
2338
    if (ot <= MO_32) {
B
bellard 已提交
2339
        return 1 << ot;
2340
    } else {
B
bellard 已提交
2341
        return 4;
2342
    }
B
bellard 已提交
2343 2344
}

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

2366
static inline void gen_jcc(DisasContext *s, int b,
B
bellard 已提交
2367
                           target_ulong val, target_ulong next_eip)
B
bellard 已提交
2368
{
2369
    int l1, l2;
2370

B
bellard 已提交
2371
    if (s->jmp_opt) {
B
bellard 已提交
2372
        l1 = gen_new_label();
2373
        gen_jcc1(s, b, l1);
2374

2375
        gen_goto_tb(s, 0, next_eip);
B
bellard 已提交
2376 2377

        gen_set_label(l1);
2378
        gen_goto_tb(s, 1, val);
J
Jun Koi 已提交
2379
        s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2380
    } else {
B
bellard 已提交
2381 2382
        l1 = gen_new_label();
        l2 = gen_new_label();
2383
        gen_jcc1(s, b, l1);
2384

B
bellard 已提交
2385
        gen_jmp_im(next_eip);
2386 2387
        tcg_gen_br(l2);

B
bellard 已提交
2388 2389 2390
        gen_set_label(l1);
        gen_jmp_im(val);
        gen_set_label(l2);
B
bellard 已提交
2391 2392 2393 2394
        gen_eob(s);
    }
}

2395 2396 2397
static void gen_cmovcc1(CPUX86State *env, DisasContext *s, int ot, int b,
                        int modrm, int reg)
{
2398
    CCPrepare cc;
2399

2400
    gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
2401

2402 2403 2404 2405 2406 2407 2408 2409
    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);
2410 2411
    }

2412 2413 2414 2415 2416 2417 2418 2419 2420 2421
    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);
    }
2422 2423
}

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

T
ths 已提交
2463 2464 2465 2466 2467
static inline int svm_is_rep(int prefixes)
{
    return ((prefixes & (PREFIX_REPZ | PREFIX_REPNZ)) ? 8 : 0);
}

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

B
bellard 已提交
2481
static inline void
T
ths 已提交
2482 2483
gen_svm_check_intercept(DisasContext *s, target_ulong pc_start, uint64_t type)
{
B
bellard 已提交
2484
    gen_svm_check_intercept_param(s, pc_start, type, 0);
T
ths 已提交
2485 2486
}

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

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

2541 2542 2543
/* 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 已提交
2544
{
B
bellard 已提交
2545 2546
#ifdef TARGET_X86_64
    if (CODE64(s)) {
B
bellard 已提交
2547
        gen_op_movq_A0_reg(R_ESP);
2548
        if (s->dflag) {
B
bellard 已提交
2549
            gen_op_addq_A0_im(-8);
2550
            gen_op_st_T1_A0(s, MO_64);
2551
        } else {
B
bellard 已提交
2552
            gen_op_addq_A0_im(-2);
2553
            gen_op_st_T0_A0(s, MO_16);
2554
        }
B
bellard 已提交
2555
        gen_op_mov_reg_A0(2, R_ESP);
2556
    } else
B
bellard 已提交
2557 2558
#endif
    {
B
bellard 已提交
2559
        gen_op_movl_A0_reg(R_ESP);
B
bellard 已提交
2560
        if (!s->dflag)
B
bellard 已提交
2561
            gen_op_addl_A0_im(-2);
B
bellard 已提交
2562
        else
B
bellard 已提交
2563
            gen_op_addl_A0_im(-4);
B
bellard 已提交
2564 2565
        if (s->ss32) {
            if (s->addseg) {
2566
                gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2567 2568 2569
            }
        } else {
            gen_op_andl_A0_ffff();
2570
            gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2571
        }
2572
        gen_op_st_T1_A0(s, s->dflag + 1);
2573

B
bellard 已提交
2574
        if (s->ss32 && !s->addseg)
B
bellard 已提交
2575
            gen_op_mov_reg_A0(1, R_ESP);
B
bellard 已提交
2576 2577
        else
            gen_stack_update(s, (-2) << s->dflag);
B
bellard 已提交
2578 2579 2580
    }
}

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

static void gen_pop_update(DisasContext *s)
{
B
bellard 已提交
2605
#ifdef TARGET_X86_64
2606
    if (CODE64(s) && s->dflag) {
B
bellard 已提交
2607 2608 2609 2610 2611 2612
        gen_stack_update(s, 8);
    } else
#endif
    {
        gen_stack_update(s, 2 << s->dflag);
    }
B
bellard 已提交
2613 2614 2615 2616
}

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

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

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

static void gen_enter(DisasContext *s, int esp_addend, int level)
{
B
bellard 已提交
2668
    int ot, opsize;
B
bellard 已提交
2669 2670

    level &= 0x1f;
2671 2672
#ifdef TARGET_X86_64
    if (CODE64(s)) {
2673
        ot = s->dflag ? MO_64 : MO_16;
2674
        opsize = 1 << ot;
2675

B
bellard 已提交
2676
        gen_op_movl_A0_reg(R_ESP);
2677
        gen_op_addq_A0_im(-opsize);
2678
        tcg_gen_mov_tl(cpu_T[1], cpu_A0);
2679 2680

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

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

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

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

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

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

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

B
bellard 已提交
2784 2785 2786 2787 2788
static void gen_jmp(DisasContext *s, target_ulong eip)
{
    gen_jmp_tb(s, eip, 0);
}

2789
static inline void gen_ldq_env_A0(DisasContext *s, int offset)
B
bellard 已提交
2790
{
2791
    tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0, s->mem_index, MO_LEQ);
2792
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, offset);
B
bellard 已提交
2793
}
B
bellard 已提交
2794

2795
static inline void gen_stq_env_A0(DisasContext *s, int offset)
B
bellard 已提交
2796
{
2797
    tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env, offset);
2798
    tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0, s->mem_index, MO_LEQ);
B
bellard 已提交
2799
}
B
bellard 已提交
2800

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

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

B
bellard 已提交
2821 2822
static inline void gen_op_movo(int d_offset, int s_offset)
{
2823 2824 2825 2826
    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 已提交
2827 2828 2829 2830
}

static inline void gen_op_movq(int d_offset, int s_offset)
{
2831 2832
    tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env, s_offset);
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, d_offset);
B
bellard 已提交
2833 2834 2835 2836
}

static inline void gen_op_movl(int d_offset, int s_offset)
{
2837 2838
    tcg_gen_ld_i32(cpu_tmp2_i32, cpu_env, s_offset);
    tcg_gen_st_i32(cpu_tmp2_i32, cpu_env, d_offset);
B
bellard 已提交
2839 2840 2841 2842
}

static inline void gen_op_movq_env_0(int d_offset)
{
2843 2844
    tcg_gen_movi_i64(cpu_tmp1_i64, 0);
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, d_offset);
B
bellard 已提交
2845
}
B
bellard 已提交
2846

B
Blue Swirl 已提交
2847 2848 2849 2850 2851 2852 2853
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 已提交
2854
typedef void (*SSEFunc_0_ppi)(TCGv_ptr reg_a, TCGv_ptr reg_b, TCGv_i32 val);
B
Blue Swirl 已提交
2855 2856
typedef void (*SSEFunc_0_eppt)(TCGv_ptr env, TCGv_ptr reg_a, TCGv_ptr reg_b,
                               TCGv val);
B
Blue Swirl 已提交
2857

B
bellard 已提交
2858 2859
#define SSE_SPECIAL ((void *)1)
#define SSE_DUMMY ((void *)2)
B
bellard 已提交
2860

P
pbrook 已提交
2861 2862 2863
#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 已提交
2864

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

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

R
Richard Henderson 已提交
2909 2910 2911
    /* 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 已提交
2912

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

B
Blue Swirl 已提交
3012
static const SSEFunc_0_epi sse_op_table3ai[] = {
P
pbrook 已提交
3013
    gen_helper_cvtsi2ss,
3014
    gen_helper_cvtsi2sd
B
Blue Swirl 已提交
3015
};
P
pbrook 已提交
3016

3017
#ifdef TARGET_X86_64
B
Blue Swirl 已提交
3018
static const SSEFunc_0_epl sse_op_table3aq[] = {
3019 3020 3021 3022 3023
    gen_helper_cvtsq2ss,
    gen_helper_cvtsq2sd
};
#endif

B
Blue Swirl 已提交
3024
static const SSEFunc_i_ep sse_op_table3bi[] = {
P
pbrook 已提交
3025 3026
    gen_helper_cvttss2si,
    gen_helper_cvtss2si,
3027
    gen_helper_cvttsd2si,
3028
    gen_helper_cvtsd2si
B
bellard 已提交
3029
};
3030

3031
#ifdef TARGET_X86_64
B
Blue Swirl 已提交
3032
static const SSEFunc_l_ep sse_op_table3bq[] = {
3033 3034
    gen_helper_cvttss2sq,
    gen_helper_cvtss2sq,
3035
    gen_helper_cvttsd2sq,
3036 3037 3038 3039
    gen_helper_cvtsd2sq
};
#endif

B
Blue Swirl 已提交
3040
static const SSEFunc_0_epp sse_op_table4[8][4] = {
B
bellard 已提交
3041 3042 3043 3044 3045 3046 3047 3048 3049
    SSE_FOP(cmpeq),
    SSE_FOP(cmplt),
    SSE_FOP(cmple),
    SSE_FOP(cmpunord),
    SSE_FOP(cmpneq),
    SSE_FOP(cmpnlt),
    SSE_FOP(cmpnle),
    SSE_FOP(cmpord),
};
3050

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

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

B
Blue Swirl 已提交
3083 3084
struct SSEOpHelper_eppi {
    SSEFunc_0_eppi op[2];
B
Blue Swirl 已提交
3085
    uint32_t ext_mask;
B
balrog 已提交
3086
};
B
Blue Swirl 已提交
3087

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

B
Blue Swirl 已提交
3096
static const struct SSEOpHelper_epp sse_op_table6[256] = {
B
balrog 已提交
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 3138 3139 3140 3141 3142
    [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),
3143 3144 3145 3146 3147
    [0xdb] = AESNI_OP(aesimc),
    [0xdc] = AESNI_OP(aesenc),
    [0xdd] = AESNI_OP(aesenclast),
    [0xde] = AESNI_OP(aesdec),
    [0xdf] = AESNI_OP(aesdeclast),
B
balrog 已提交
3148 3149
};

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

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

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

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

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

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

B
Blue Swirl 已提交
3825 3826
            sse_fn_epp = sse_op_table6[b].op[b1];
            if (!sse_fn_epp) {
B
balrog 已提交
3827
                goto illegal_op;
B
Blue Swirl 已提交
3828
            }
B
balrog 已提交
3829 3830
            if (!(s->cpuid_ext_features & sse_op_table6[b].ext_mask))
                goto illegal_op;
B
balrog 已提交
3831 3832 3833 3834 3835 3836 3837

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

B
balrog 已提交
3880 3881
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
3882
            sse_fn_epp(cpu_env, cpu_ptr0, cpu_ptr1);
B
balrog 已提交
3883

3884 3885 3886
            if (b == 0x17) {
                set_cc_op(s, CC_OP_EFLAGS);
            }
B
balrog 已提交
3887
            break;
R
Richard Henderson 已提交
3888 3889 3890 3891 3892 3893

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

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

3912
                gen_op_mov_TN_reg(MO_32, 0, reg);
R
Richard Henderson 已提交
3913 3914 3915 3916
                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 已提交
3917

3918
                ot = (s->dflag == 2) ? MO_64 : MO_32;
R
Richard Henderson 已提交
3919 3920
                gen_op_mov_reg_T0(ot, reg);
                break;
B
balrog 已提交
3921

R
Richard Henderson 已提交
3922 3923 3924 3925 3926 3927 3928 3929 3930 3931 3932 3933 3934 3935 3936
            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) {
3937
                    ot = (s->prefix & PREFIX_DATA ? MO_16 : MO_32);
R
Richard Henderson 已提交
3938
                } else {
3939
                    ot = MO_64;
R
Richard Henderson 已提交
3940 3941 3942 3943 3944 3945 3946 3947 3948 3949
                }

                /* 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) {
3950
                    case MO_16:
R
Richard Henderson 已提交
3951 3952 3953 3954 3955
                        tcg_gen_ext16u_tl(cpu_T[0], cpu_regs[reg]);
                        break;
                    default:
                        tcg_gen_ext32u_tl(cpu_T[0], cpu_regs[reg]);
                        break;
3956
                    case MO_64:
R
Richard Henderson 已提交
3957 3958 3959 3960 3961 3962
                        tcg_gen_mov_tl(cpu_T[0], cpu_regs[reg]);
                        break;
                    }
                }

                switch (ot) {
3963
                case MO_16:
R
Richard Henderson 已提交
3964 3965 3966 3967 3968 3969
                    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
3970
                case MO_64:
R
Richard Henderson 已提交
3971 3972 3973 3974 3975 3976 3977 3978 3979 3980 3981 3982
                    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 已提交
3983 3984 3985 3986 3987 3988
            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;
                }
3989
                ot = s->dflag == 2 ? MO_64 : MO_32;
R
Richard Henderson 已提交
3990 3991 3992 3993 3994 3995 3996
                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 已提交
3997 3998 3999 4000 4001 4002
            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;
                }
4003
                ot = s->dflag == 2 ? MO_64 : MO_32;
R
Richard Henderson 已提交
4004 4005 4006 4007 4008 4009 4010 4011 4012
                {
                    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);

4013
                    bound = tcg_const_tl(ot == MO_64 ? 63 : 31);
R
Richard Henderson 已提交
4014 4015 4016 4017 4018 4019 4020 4021 4022 4023 4024 4025 4026 4027 4028 4029 4030 4031 4032 4033 4034 4035 4036
                    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 已提交
4037 4038 4039 4040 4041 4042
            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;
                }
4043
                ot = s->dflag == 2 ? MO_64 : MO_32;
R
Richard Henderson 已提交
4044 4045 4046
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
                tcg_gen_ext8u_tl(cpu_T[1], cpu_regs[s->vex_v]);
                {
4047
                    TCGv bound = tcg_const_tl(ot == MO_64 ? 63 : 31);
R
Richard Henderson 已提交
4048 4049 4050 4051 4052 4053 4054 4055 4056 4057 4058 4059 4060 4061 4062 4063
                    /* 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 已提交
4064 4065 4066 4067 4068 4069
            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;
                }
4070
                ot = s->dflag == 2 ? MO_64 : MO_32;
R
Richard Henderson 已提交
4071 4072 4073
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
                switch (ot) {
                default:
4074 4075 4076 4077 4078 4079
                    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 已提交
4080 4081
                    break;
#ifdef TARGET_X86_64
4082
                case MO_64:
4083 4084
                    tcg_gen_mulu2_i64(cpu_regs[s->vex_v], cpu_regs[reg],
                                      cpu_T[0], cpu_regs[R_EDX]);
R
Richard Henderson 已提交
4085 4086 4087 4088 4089
                    break;
#endif
                }
                break;

4090 4091 4092 4093 4094 4095
            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;
                }
4096
                ot = s->dflag == 2 ? MO_64 : MO_32;
4097 4098 4099 4100 4101 4102 4103 4104 4105 4106 4107 4108 4109 4110 4111 4112 4113
                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;
                }
4114
                ot = s->dflag == 2 ? MO_64 : MO_32;
4115 4116 4117 4118 4119 4120 4121 4122 4123 4124 4125
                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;

4126 4127 4128 4129 4130
            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 {
4131
                    TCGv carry_in, carry_out, zero;
4132 4133
                    int end_op;

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

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

4236 4237 4238 4239 4240 4241 4242 4243 4244
            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;
                }
4245
                ot = s->dflag == 2 ? MO_64 : MO_32;
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 4273 4274 4275 4276 4277
                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 已提交
4278 4279 4280
            default:
                goto illegal_op;
            }
B
balrog 已提交
4281
            break;
R
Richard Henderson 已提交
4282

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

B
Blue Swirl 已提交
4294 4295
            sse_fn_eppi = sse_op_table7[b].op[b1];
            if (!sse_fn_eppi) {
B
balrog 已提交
4296
                goto illegal_op;
B
Blue Swirl 已提交
4297
            }
B
balrog 已提交
4298 4299 4300
            if (!(s->cpuid_ext_features & sse_op_table7[b].ext_mask))
                goto illegal_op;

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

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

B
balrog 已提交
4459
            if ((b & 0xfc) == 0x60) { /* pcmpXstrX */
4460
                set_cc_op(s, CC_OP_EFLAGS);
B
balrog 已提交
4461 4462 4463 4464 4465 4466

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

B
balrog 已提交
4467 4468
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
4469
            sse_fn_eppi(cpu_env, cpu_ptr0, cpu_ptr1, tcg_const_i32(val));
B
balrog 已提交
4470
            break;
R
Richard Henderson 已提交
4471 4472 4473 4474 4475 4476 4477 4478 4479 4480 4481 4482 4483 4484

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

B
bellard 已提交
4581 4582
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
4583
            sse_fn_epp(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
4584
            break;
4585 4586 4587 4588 4589 4590 4591 4592 4593 4594 4595 4596 4597 4598 4599 4600 4601 4602
        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 已提交
4603
            /* XXX: introduce a new table? */
B
Blue Swirl 已提交
4604 4605
            sse_fn_eppt = (SSEFunc_0_eppt)sse_fn_epp;
            sse_fn_eppt(cpu_env, cpu_ptr0, cpu_ptr1, cpu_A0);
4606
            break;
B
bellard 已提交
4607
        default:
B
bellard 已提交
4608 4609
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
4610
            sse_fn_epp(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
4611 4612 4613
            break;
        }
        if (b == 0x2e || b == 0x2f) {
4614
            set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
4615 4616 4617 4618
        }
    }
}

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

4630
    if (unlikely(qemu_loglevel_mask(CPU_LOG_TB_OP | CPU_LOG_TB_OP_OPT))) {
4631
        tcg_gen_debug_insn_start(pc_start);
4632
    }
B
bellard 已提交
4633 4634 4635
    s->pc = pc_start;
    prefixes = 0;
    s->override = -1;
B
bellard 已提交
4636 4637 4638 4639 4640
    rex_w = -1;
    rex_r = 0;
#ifdef TARGET_X86_64
    s->rex_x = 0;
    s->rex_b = 0;
4641
    x86_64_hregs = 0;
B
bellard 已提交
4642 4643
#endif
    s->rip_offset = 0; /* for relative ip address */
4644 4645
    s->vex_l = 0;
    s->vex_v = 0;
B
bellard 已提交
4646
 next_byte:
4647
    b = cpu_ldub_code(env, s->pc);
B
bellard 已提交
4648
    s->pc++;
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 4679 4680 4681 4682 4683
    /* 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 已提交
4684
#ifdef TARGET_X86_64
4685 4686
    case 0x40 ... 0x4f:
        if (CODE64(s)) {
B
bellard 已提交
4687 4688 4689 4690 4691 4692 4693 4694
            /* 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;
        }
4695 4696
        break;
#endif
4697 4698 4699 4700 4701 4702 4703 4704 4705 4706 4707 4708 4709 4710 4711 4712 4713
    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 已提交
4714
            /* 4.1.1-4.1.3: No preceding lock, 66, f2, f3, or rex prefixes. */
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 4749 4750 4751 4752 4753
            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;
4754 4755 4756 4757
    }

    /* Post-process prefixes.  */
    if (CODE64(s)) {
4758 4759 4760 4761 4762 4763 4764 4765 4766 4767 4768
        /* 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 已提交
4769
        }
4770 4771 4772 4773
        /* In 16/32-bit mode, 0x67 selects the opposite addressing.  */
        aflag = s->code32;
        if (prefixes & PREFIX_ADR) {
            aflag ^= 1;
B
bellard 已提交
4774
        }
B
bellard 已提交
4775 4776 4777 4778 4779 4780 4781 4782
    }

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

    /* lock generation */
    if (prefixes & PREFIX_LOCK)
P
pbrook 已提交
4783
        gen_helper_lock();
B
bellard 已提交
4784 4785 4786 4787 4788 4789 4790

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

B
bellard 已提交
4794 4795 4796 4797 4798 4799 4800 4801 4802 4803 4804 4805 4806 4807 4808 4809
        /**************************/
        /* 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)
4810
                ot = MO_8;
B
bellard 已提交
4811
            else
4812
                ot = dflag + MO_16;
4813

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

4860 4861 4862
    case 0x82:
        if (CODE64(s))
            goto illegal_op;
B
bellard 已提交
4863 4864 4865 4866 4867 4868 4869
    case 0x80: /* GRP1 */
    case 0x81:
    case 0x83:
        {
            int val;

            if ((b & 1) == 0)
4870
                ot = MO_8;
B
bellard 已提交
4871
            else
4872
                ot = dflag + MO_16;
4873

4874
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4875
            mod = (modrm >> 6) & 3;
B
bellard 已提交
4876
            rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
4877
            op = (modrm >> 3) & 7;
4878

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

            switch(b) {
            default:
            case 0x80:
            case 0x81:
4894
            case 0x82:
4895
                val = insn_get(env, s, ot);
B
bellard 已提交
4896 4897
                break;
            case 0x83:
4898
                val = (int8_t)insn_get(env, s, MO_8);
B
bellard 已提交
4899 4900 4901 4902 4903 4904 4905 4906 4907 4908
                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 */
4909
        ot = dflag ? MO_32 : MO_16;
B
bellard 已提交
4910 4911 4912
        gen_inc(s, ot, OR_EAX + (b & 7), 1);
        break;
    case 0x48 ... 0x4f: /* dec Gv */
4913
        ot = dflag ? MO_32 : MO_16;
B
bellard 已提交
4914 4915 4916 4917 4918
        gen_inc(s, ot, OR_EAX + (b & 7), -1);
        break;
    case 0xf6: /* GRP3 */
    case 0xf7:
        if ((b & 1) == 0)
4919
            ot = MO_8;
B
bellard 已提交
4920
        else
4921
            ot = dflag + MO_16;
B
bellard 已提交
4922

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

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

    case 0xfe: /* GRP4 */
    case 0xff: /* GRP5 */
        if ((b & 1) == 0)
5118
            ot = MO_8;
B
bellard 已提交
5119
        else
5120
            ot = dflag + MO_16;
B
bellard 已提交
5121

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

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

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

5235
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
B
bellard 已提交
5236
        gen_op_mov_TN_reg(ot, 1, reg);
B
bellard 已提交
5237
        gen_op_testl_T0_T1_cc();
5238
        set_cc_op(s, CC_OP_LOGICB + ot);
B
bellard 已提交
5239
        break;
5240

B
bellard 已提交
5241 5242 5243
    case 0xa8: /* test eAX, Iv */
    case 0xa9:
        if ((b & 1) == 0)
5244
            ot = MO_8;
B
bellard 已提交
5245
        else
5246
            ot = dflag + MO_16;
5247
        val = insn_get(env, s, ot);
B
bellard 已提交
5248

B
bellard 已提交
5249
        gen_op_mov_TN_reg(ot, 0, OR_EAX);
B
bellard 已提交
5250 5251
        gen_op_movl_T1_im(val);
        gen_op_testl_T0_T1_cc();
5252
        set_cc_op(s, CC_OP_LOGICB + ot);
B
bellard 已提交
5253
        break;
5254

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

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

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

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

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

5640
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
B
bellard 已提交
5641
        gen_op_mov_reg_T0(ot, reg);
B
bellard 已提交
5642 5643
        break;
    case 0x8e: /* mov seg, Gv */
5644
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5645 5646 5647
        reg = (modrm >> 3) & 7;
        if (reg >= 6 || reg == R_CS)
            goto illegal_op;
5648
        gen_ldst_modrm(env, s, modrm, MO_16, OR_TMP0, 0);
B
bellard 已提交
5649 5650 5651
        gen_movl_seg_T0(s, reg, pc_start - s->cs_base);
        if (reg == R_SS) {
            /* if reg == SS, inhibit interrupts/trace */
5652 5653 5654
            /* If several instructions disable interrupts, only the
               _first_ does it */
            if (!(s->tb->flags & HF_INHIBIT_IRQ_MASK))
5655
                gen_helper_set_inhibit_irq(cpu_env);
B
bellard 已提交
5656 5657 5658
            s->tf = 0;
        }
        if (s->is_jmp) {
B
bellard 已提交
5659
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
5660 5661 5662 5663
            gen_eob(s);
        }
        break;
    case 0x8c: /* mov Gv, seg */
5664
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5665 5666 5667 5668 5669
        reg = (modrm >> 3) & 7;
        mod = (modrm >> 6) & 3;
        if (reg >= 6)
            goto illegal_op;
        gen_op_movl_T0_seg(reg);
B
bellard 已提交
5670
        if (mod == 3)
5671
            ot = MO_16 + dflag;
B
bellard 已提交
5672
        else
5673
            ot = MO_16;
5674
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 1);
B
bellard 已提交
5675 5676 5677 5678 5679 5680 5681 5682 5683
        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 */
5684
            d_ot = dflag + MO_16;
B
bellard 已提交
5685
            /* ot is the size of source */
5686
            ot = (b & 1) + MO_8;
5687
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5688
            reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5689
            mod = (modrm >> 6) & 3;
B
bellard 已提交
5690
            rm = (modrm & 7) | REX_B(s);
5691

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

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

B
bellard 已提交
5738 5739 5740 5741 5742
    case 0xa0: /* mov EAX, Ov */
    case 0xa1:
    case 0xa2: /* mov Ov, EAX */
    case 0xa3:
        {
B
bellard 已提交
5743 5744 5745
            target_ulong offset_addr;

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

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

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

5908
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5909 5910
            mod = (modrm >> 6) & 3;
            op = (modrm >> 3) & 7;
5911

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

            /* simpler op */
            if (shift == 0) {
                gen_shift(s, op, ot, opreg, OR_ECX);
            } else {
                if (shift == 2) {
5927
                    shift = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
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 5955 5956 5957 5958 5959
                }
                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:
5960
        ot = dflag + MO_16;
5961
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5962
        mod = (modrm >> 6) & 3;
B
bellard 已提交
5963 5964
        rm = (modrm & 7) | REX_B(s);
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5965
        if (mod != 3) {
5966
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
5967
            opreg = OR_TMP0;
B
bellard 已提交
5968
        } else {
5969
            opreg = rm;
B
bellard 已提交
5970
        }
B
bellard 已提交
5971
        gen_op_mov_TN_reg(ot, 1, reg);
5972

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

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

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

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

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

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

    case 0xa4: /* movsS */
    case 0xa5:
        if ((b & 1) == 0)
6508
            ot = MO_8;
B
bellard 已提交
6509
        else
6510
            ot = dflag + MO_16;
B
bellard 已提交
6511 6512 6513 6514 6515 6516 6517

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

B
bellard 已提交
6519 6520 6521
    case 0xaa: /* stosS */
    case 0xab:
        if ((b & 1) == 0)
6522
            ot = MO_8;
B
bellard 已提交
6523
        else
6524
            ot = dflag + MO_16;
B
bellard 已提交
6525 6526 6527 6528 6529 6530 6531 6532 6533 6534

        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)
6535
            ot = MO_8;
B
bellard 已提交
6536
        else
6537
            ot = dflag + MO_16;
B
bellard 已提交
6538 6539 6540 6541 6542 6543 6544 6545 6546
        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)
6547
            ot = MO_8;
B
bellard 已提交
6548
        else
6549
            ot = dflag + MO_16;
B
bellard 已提交
6550 6551 6552 6553 6554 6555 6556 6557 6558 6559 6560 6561
        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)
6562
            ot = MO_8;
B
bellard 已提交
6563
        else
6564
            ot = dflag + MO_16;
B
bellard 已提交
6565 6566 6567 6568 6569 6570 6571 6572 6573 6574
        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:
6575
        if ((b & 1) == 0)
6576
            ot = MO_8;
6577
        else
6578 6579
            ot = dflag ? MO_32 : MO_16;
        gen_op_mov_TN_reg(MO_16, 0, R_EDX);
T
ths 已提交
6580
        gen_op_andl_T0_ffff();
6581 6582
        gen_check_io(s, ot, pc_start - s->cs_base, 
                     SVM_IOIO_TYPE_MASK | svm_is_rep(prefixes) | 4);
6583 6584
        if (prefixes & (PREFIX_REPZ | PREFIX_REPNZ)) {
            gen_repz_ins(s, ot, pc_start - s->cs_base, s->pc - s->cs_base);
B
bellard 已提交
6585
        } else {
6586
            gen_ins(s, ot);
P
pbrook 已提交
6587 6588 6589
            if (use_icount) {
                gen_jmp(s, s->pc - s->cs_base);
            }
B
bellard 已提交
6590 6591 6592 6593
        }
        break;
    case 0x6e: /* outsS */
    case 0x6f:
6594
        if ((b & 1) == 0)
6595
            ot = MO_8;
6596
        else
6597 6598
            ot = dflag ? MO_32 : MO_16;
        gen_op_mov_TN_reg(MO_16, 0, R_EDX);
T
ths 已提交
6599
        gen_op_andl_T0_ffff();
6600 6601
        gen_check_io(s, ot, pc_start - s->cs_base,
                     svm_is_rep(prefixes) | 4);
6602 6603
        if (prefixes & (PREFIX_REPZ | PREFIX_REPNZ)) {
            gen_repz_outs(s, ot, pc_start - s->cs_base, s->pc - s->cs_base);
B
bellard 已提交
6604
        } else {
6605
            gen_outs(s, ot);
P
pbrook 已提交
6606 6607 6608
            if (use_icount) {
                gen_jmp(s, s->pc - s->cs_base);
            }
B
bellard 已提交
6609 6610 6611 6612 6613
        }
        break;

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

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

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

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

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

B
bellard 已提交
6795 6796
            if (CODE64(s))
                goto illegal_op;
6797
            ot = dflag ? MO_32 : MO_16;
6798
            offset = insn_get(env, s, ot);
6799
            selector = insn_get(env, s, MO_16);
6800

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

B
bellard 已提交
6821 6822
            if (CODE64(s))
                goto illegal_op;
6823
            ot = dflag ? MO_32 : MO_16;
6824
            offset = insn_get(env, s, ot);
6825
            selector = insn_get(env, s, MO_16);
6826

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

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

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

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

7314
            tval = (int8_t)insn_get(env, s, MO_8);
B
bellard 已提交
7315 7316 7317 7318
            next_eip = s->pc - s->cs_base;
            tval += next_eip;
            if (s->dflag == 0)
                tval &= 0xffff;
7319

B
bellard 已提交
7320 7321
            l1 = gen_new_label();
            l2 = gen_new_label();
7322
            l3 = gen_new_label();
B
bellard 已提交
7323
            b &= 3;
7324 7325 7326 7327 7328
            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);
7329
                gen_jcc1(s, (JCC_Z << 1) | (b ^ 1), l1);
7330 7331 7332 7333 7334 7335 7336 7337 7338
                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 已提交
7339 7340
            }

7341
            gen_set_label(l3);
B
bellard 已提交
7342
            gen_jmp_im(next_eip);
7343
            tcg_gen_br(l2);
7344

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

7795
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7796 7797 7798
            reg = ((modrm >> 3) & 7) | rex_r;
            mod = (modrm >> 6) & 3;
            rm = (modrm & 7) | REX_B(s);
7799

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

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

8114
        modrm = cpu_ldub_code(env, s->pc++);
M
malc 已提交
8115
        reg = ((modrm >> 3) & 7) | rex_r;
B
balrog 已提交
8116 8117

        if (s->prefix & PREFIX_DATA)
8118
            ot = MO_16;
B
balrog 已提交
8119
        else if (s->dflag != 2)
8120
            ot = MO_32;
B
balrog 已提交
8121
        else
8122
            ot = MO_64;
B
balrog 已提交
8123

8124
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
B
Blue Swirl 已提交
8125
        gen_helper_popcnt(cpu_T[0], cpu_env, cpu_T[0], tcg_const_i32(ot));
B
balrog 已提交
8126
        gen_op_mov_reg_T0(ot, reg);
B
balrog 已提交
8127

8128
        set_cc_op(s, CC_OP_EFLAGS);
B
balrog 已提交
8129
        break;
A
aurel32 已提交
8130 8131 8132
    case 0x10e ... 0x10f:
        /* 3DNow! instructions, ignore prefixes */
        s->prefix &= ~(PREFIX_REPZ | PREFIX_REPNZ | PREFIX_DATA);
B
bellard 已提交
8133 8134
    case 0x110 ... 0x117:
    case 0x128 ... 0x12f:
B
balrog 已提交
8135
    case 0x138 ... 0x13a:
8136
    case 0x150 ... 0x179:
B
bellard 已提交
8137 8138 8139 8140
    case 0x17c ... 0x17f:
    case 0x1c2:
    case 0x1c4 ... 0x1c6:
    case 0x1d0 ... 0x1fe:
8141
        gen_sse(env, s, b, pc_start, rex_r);
B
bellard 已提交
8142
        break;
B
bellard 已提交
8143 8144 8145 8146 8147
    default:
        goto illegal_op;
    }
    /* lock generation */
    if (s->prefix & PREFIX_LOCK)
P
pbrook 已提交
8148
        gen_helper_unlock();
B
bellard 已提交
8149 8150
    return s->pc;
 illegal_op:
8151
    if (s->prefix & PREFIX_LOCK)
P
pbrook 已提交
8152
        gen_helper_unlock();
B
bellard 已提交
8153 8154 8155 8156 8157 8158 8159
    /* 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 已提交
8160 8161
    cpu_env = tcg_global_reg_new_ptr(TCG_AREG0, "env");
    cpu_cc_op = tcg_global_mem_new_i32(TCG_AREG0,
8162 8163
                                       offsetof(CPUX86State, cc_op), "cc_op");
    cpu_cc_dst = tcg_global_mem_new(TCG_AREG0, offsetof(CPUX86State, cc_dst),
P
pbrook 已提交
8164
                                    "cc_dst");
8165 8166
    cpu_cc_src = tcg_global_mem_new(TCG_AREG0, offsetof(CPUX86State, cc_src),
                                    "cc_src");
8167 8168
    cpu_cc_src2 = tcg_global_mem_new(TCG_AREG0, offsetof(CPUX86State, cc_src2),
                                     "cc_src2");
8169

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

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

B
bellard 已提交
8243
    /* generate intermediate code */
B
bellard 已提交
8244 8245
    pc_start = tb->pc;
    cs_base = tb->cs_base;
B
bellard 已提交
8246
    flags = tb->flags;
B
bellard 已提交
8247

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

P
pbrook 已提交
8290 8291 8292 8293 8294 8295 8296 8297 8298 8299 8300
    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();
8301
    cpu_cc_srcT = tcg_temp_local_new();
B
bellard 已提交
8302

8303
    gen_opc_end = tcg_ctx.gen_opc_buf + OPC_MAX_SIZE;
B
bellard 已提交
8304 8305 8306 8307

    dc->is_jmp = DISAS_NEXT;
    pc_ptr = pc_start;
    lj = -1;
P
pbrook 已提交
8308 8309 8310 8311
    num_insns = 0;
    max_insns = tb->cflags & CF_COUNT_MASK;
    if (max_insns == 0)
        max_insns = CF_COUNT_MASK;
B
bellard 已提交
8312

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

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

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

P
pbrook 已提交
8397
    if (!search_pc) {
B
bellard 已提交
8398
        tb->size = pc_ptr - pc_start;
P
pbrook 已提交
8399 8400
        tb->icount = num_insns;
    }
B
bellard 已提交
8401 8402
}

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

8408
void gen_intermediate_code_pc(CPUX86State *env, TranslationBlock *tb)
B
bellard 已提交
8409
{
8410
    gen_intermediate_code_internal(x86_env_get_cpu(env), tb, true);
B
bellard 已提交
8411 8412
}

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