translate.c 281.4 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_ld_v(DisasContext *s, int idx, TCGv t0, TCGv a0)
B
bellard 已提交
580
{
581
    tcg_gen_qemu_ld_tl(t0, a0, s->mem_index, idx | MO_LE);
B
bellard 已提交
582
}
B
bellard 已提交
583

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

589 590 591
static inline void gen_op_st_rm_T0_A0(DisasContext *s, int idx, int d)
{
    if (d == OR_TMP0) {
592
        gen_op_st_v(s, idx, cpu_T[0], cpu_A0);
593 594 595 596 597
    } else {
        gen_op_mov_reg_T0(idx, d);
    }
}

B
bellard 已提交
598 599
static inline void gen_jmp_im(target_ulong pc)
{
B
bellard 已提交
600
    tcg_gen_movi_tl(cpu_tmp0, pc);
601
    tcg_gen_st_tl(cpu_tmp0, cpu_env, offsetof(CPUX86State, eip));
B
bellard 已提交
602 603
}

B
bellard 已提交
604 605 606 607 608
static inline void gen_string_movl_A0_ESI(DisasContext *s)
{
    int override;

    override = s->override;
B
bellard 已提交
609 610 611
#ifdef TARGET_X86_64
    if (s->aflag == 2) {
        if (override >= 0) {
B
bellard 已提交
612 613
            gen_op_movq_A0_seg(override);
            gen_op_addq_A0_reg_sN(0, R_ESI);
B
bellard 已提交
614
        } else {
B
bellard 已提交
615
            gen_op_movq_A0_reg(R_ESI);
B
bellard 已提交
616 617 618
        }
    } else
#endif
B
bellard 已提交
619 620 621 622 623
    if (s->aflag) {
        /* 32 bit address */
        if (s->addseg && override < 0)
            override = R_DS;
        if (override >= 0) {
B
bellard 已提交
624 625
            gen_op_movl_A0_seg(override);
            gen_op_addl_A0_reg_sN(0, R_ESI);
B
bellard 已提交
626
        } else {
B
bellard 已提交
627
            gen_op_movl_A0_reg(R_ESI);
B
bellard 已提交
628 629 630 631 632
        }
    } else {
        /* 16 address, always override */
        if (override < 0)
            override = R_DS;
B
bellard 已提交
633
        gen_op_movl_A0_reg(R_ESI);
B
bellard 已提交
634
        gen_op_andl_A0_ffff();
635
        gen_op_addl_A0_seg(s, override);
B
bellard 已提交
636 637 638 639 640
    }
}

static inline void gen_string_movl_A0_EDI(DisasContext *s)
{
B
bellard 已提交
641 642
#ifdef TARGET_X86_64
    if (s->aflag == 2) {
B
bellard 已提交
643
        gen_op_movq_A0_reg(R_EDI);
B
bellard 已提交
644 645
    } else
#endif
B
bellard 已提交
646 647
    if (s->aflag) {
        if (s->addseg) {
B
bellard 已提交
648 649
            gen_op_movl_A0_seg(R_ES);
            gen_op_addl_A0_reg_sN(0, R_EDI);
B
bellard 已提交
650
        } else {
B
bellard 已提交
651
            gen_op_movl_A0_reg(R_EDI);
B
bellard 已提交
652 653
        }
    } else {
B
bellard 已提交
654
        gen_op_movl_A0_reg(R_EDI);
B
bellard 已提交
655
        gen_op_andl_A0_ffff();
656
        gen_op_addl_A0_seg(s, R_ES);
B
bellard 已提交
657 658 659
    }
}

660 661
static inline void gen_op_movl_T0_Dshift(int ot) 
{
662
    tcg_gen_ld32s_tl(cpu_T[0], cpu_env, offsetof(CPUX86State, df));
663
    tcg_gen_shli_tl(cpu_T[0], cpu_T[0], ot);
B
bellard 已提交
664 665
};

666
static TCGv gen_ext_tl(TCGv dst, TCGv src, int size, bool sign)
667
{
668
    switch (size) {
669
    case MO_8:
670 671 672 673 674 675
        if (sign) {
            tcg_gen_ext8s_tl(dst, src);
        } else {
            tcg_gen_ext8u_tl(dst, src);
        }
        return dst;
676
    case MO_16:
677 678 679 680 681 682 683
        if (sign) {
            tcg_gen_ext16s_tl(dst, src);
        } else {
            tcg_gen_ext16u_tl(dst, src);
        }
        return dst;
#ifdef TARGET_X86_64
684
    case MO_32:
685 686 687 688 689 690 691
        if (sign) {
            tcg_gen_ext32s_tl(dst, src);
        } else {
            tcg_gen_ext32u_tl(dst, src);
        }
        return dst;
#endif
692
    default:
693
        return src;
694 695
    }
}
696

697 698 699 700 701
static void gen_extu(int ot, TCGv reg)
{
    gen_ext_tl(reg, reg, ot, false);
}

702 703
static void gen_exts(int ot, TCGv reg)
{
704
    gen_ext_tl(reg, reg, ot, true);
705
}
B
bellard 已提交
706

707 708
static inline void gen_op_jnz_ecx(int size, int label1)
{
709
    tcg_gen_mov_tl(cpu_tmp0, cpu_regs[R_ECX]);
710
    gen_extu(size + 1, cpu_tmp0);
P
pbrook 已提交
711
    tcg_gen_brcondi_tl(TCG_COND_NE, cpu_tmp0, 0, label1);
712 713 714 715
}

static inline void gen_op_jz_ecx(int size, int label1)
{
716
    tcg_gen_mov_tl(cpu_tmp0, cpu_regs[R_ECX]);
717
    gen_extu(size + 1, cpu_tmp0);
P
pbrook 已提交
718
    tcg_gen_brcondi_tl(TCG_COND_EQ, cpu_tmp0, 0, label1);
719
}
B
bellard 已提交
720

P
pbrook 已提交
721 722 723
static void gen_helper_in_func(int ot, TCGv v, TCGv_i32 n)
{
    switch (ot) {
724
    case MO_8:
725 726
        gen_helper_inb(v, n);
        break;
727
    case MO_16:
728 729
        gen_helper_inw(v, n);
        break;
730
    case MO_32:
731 732
        gen_helper_inl(v, n);
        break;
P
pbrook 已提交
733 734
    }
}
B
bellard 已提交
735

P
pbrook 已提交
736 737 738
static void gen_helper_out_func(int ot, TCGv_i32 v, TCGv_i32 n)
{
    switch (ot) {
739
    case MO_8:
740 741
        gen_helper_outb(v, n);
        break;
742
    case MO_16:
743 744
        gen_helper_outw(v, n);
        break;
745
    case MO_32:
746 747
        gen_helper_outl(v, n);
        break;
P
pbrook 已提交
748 749
    }
}
750

751 752
static void gen_check_io(DisasContext *s, int ot, target_ulong cur_eip,
                         uint32_t svm_flags)
753
{
754 755 756 757
    int state_saved;
    target_ulong next_eip;

    state_saved = 0;
758
    if (s->pe && (s->cpl > s->iopl || s->vm86)) {
759
        gen_update_cc_op(s);
B
bellard 已提交
760
        gen_jmp_im(cur_eip);
761
        state_saved = 1;
762
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
P
pbrook 已提交
763
        switch (ot) {
764
        case MO_8:
B
Blue Swirl 已提交
765 766
            gen_helper_check_iob(cpu_env, cpu_tmp2_i32);
            break;
767
        case MO_16:
B
Blue Swirl 已提交
768 769
            gen_helper_check_iow(cpu_env, cpu_tmp2_i32);
            break;
770
        case MO_32:
B
Blue Swirl 已提交
771 772
            gen_helper_check_iol(cpu_env, cpu_tmp2_i32);
            break;
P
pbrook 已提交
773
        }
774
    }
B
bellard 已提交
775
    if(s->flags & HF_SVMI_MASK) {
776
        if (!state_saved) {
777
            gen_update_cc_op(s);
778 779 780 781
            gen_jmp_im(cur_eip);
        }
        svm_flags |= (1 << (4 + ot));
        next_eip = s->pc - s->cs_base;
782
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
B
Blue Swirl 已提交
783 784
        gen_helper_svm_check_io(cpu_env, cpu_tmp2_i32,
                                tcg_const_i32(svm_flags),
P
pbrook 已提交
785
                                tcg_const_i32(next_eip - cur_eip));
786 787 788
    }
}

B
bellard 已提交
789 790 791
static inline void gen_movs(DisasContext *s, int ot)
{
    gen_string_movl_A0_ESI(s);
792
    gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
793
    gen_string_movl_A0_EDI(s);
794
    gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
795 796 797
    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 已提交
798 799
}

800 801 802 803 804 805 806 807 808 809 810
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]);
}

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

818 819 820 821 822 823 824 825
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]);
826 827
    tcg_gen_neg_tl(cpu_cc_src, cpu_T[0]);
    tcg_gen_movi_tl(cpu_cc_srcT, 0);
828 829
}

830 831
/* compute all eflags to cc_src */
static void gen_compute_eflags(DisasContext *s)
832
{
833
    TCGv zero, dst, src1, src2;
834 835
    int live, dead;

836 837 838
    if (s->cc_op == CC_OP_EFLAGS) {
        return;
    }
R
Richard Henderson 已提交
839 840 841 842 843
    if (s->cc_op == CC_OP_CLR) {
        tcg_gen_movi_tl(cpu_cc_src, CC_Z);
        set_cc_op(s, CC_OP_EFLAGS);
        return;
    }
844 845 846 847

    TCGV_UNUSED(zero);
    dst = cpu_cc_dst;
    src1 = cpu_cc_src;
848
    src2 = cpu_cc_src2;
849 850 851

    /* Take care to not read values that are not live.  */
    live = cc_op_live[s->cc_op] & ~USES_CC_SRCT;
852
    dead = live ^ (USES_CC_DST | USES_CC_SRC | USES_CC_SRC2);
853 854 855 856 857 858 859 860
    if (dead) {
        zero = tcg_const_tl(0);
        if (dead & USES_CC_DST) {
            dst = zero;
        }
        if (dead & USES_CC_SRC) {
            src1 = zero;
        }
861 862 863
        if (dead & USES_CC_SRC2) {
            src2 = zero;
        }
864 865
    }

866
    gen_update_cc_op(s);
867
    gen_helper_cc_compute_all(cpu_cc_src, dst, src1, src2, cpu_cc_op);
868
    set_cc_op(s, CC_OP_EFLAGS);
869 870 871 872

    if (dead) {
        tcg_temp_free(zero);
    }
873 874
}

875 876 877 878 879 880 881 882 883 884
typedef struct CCPrepare {
    TCGCond cond;
    TCGv reg;
    TCGv reg2;
    target_ulong imm;
    target_ulong mask;
    bool use_reg2;
    bool no_setcond;
} CCPrepare;

885
/* compute eflags.C to reg */
886
static CCPrepare gen_prepare_eflags_c(DisasContext *s, TCGv reg)
887 888
{
    TCGv t0, t1;
889
    int size, shift;
890 891 892

    switch (s->cc_op) {
    case CC_OP_SUBB ... CC_OP_SUBQ:
893
        /* (DATA_TYPE)CC_SRCT < (DATA_TYPE)CC_SRC */
894 895 896 897
        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;
898
        tcg_gen_mov_tl(t0, cpu_cc_srcT);
899 900 901 902 903 904 905 906 907
        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:
908 909
        return (CCPrepare) { .cond = TCG_COND_LTU, .reg = t0,
                             .reg2 = t1, .mask = -1, .use_reg2 = true };
910 911

    case CC_OP_LOGICB ... CC_OP_LOGICQ:
R
Richard Henderson 已提交
912
    case CC_OP_CLR:
913
        return (CCPrepare) { .cond = TCG_COND_NEVER, .mask = -1 };
914 915 916

    case CC_OP_INCB ... CC_OP_INCQ:
    case CC_OP_DECB ... CC_OP_DECQ:
917 918
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                             .mask = -1, .no_setcond = true };
919 920 921 922

    case CC_OP_SHLB ... CC_OP_SHLQ:
        /* (CC_SRC >> (DATA_BITS - 1)) & 1 */
        size = s->cc_op - CC_OP_SHLB;
923 924 925
        shift = (8 << size) - 1;
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                             .mask = (target_ulong)1 << shift };
926 927

    case CC_OP_MULB ... CC_OP_MULQ:
928 929
        return (CCPrepare) { .cond = TCG_COND_NE,
                             .reg = cpu_cc_src, .mask = -1 };
930

931 932 933 934 935
    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 };

936 937 938 939 940
    case CC_OP_ADCX:
    case CC_OP_ADCOX:
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_dst,
                             .mask = -1, .no_setcond = true };

941 942 943
    case CC_OP_EFLAGS:
    case CC_OP_SARB ... CC_OP_SARQ:
        /* CC_SRC & 1 */
944 945
        return (CCPrepare) { .cond = TCG_COND_NE,
                             .reg = cpu_cc_src, .mask = CC_C };
946 947 948 949 950

    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);
951 952
       gen_helper_cc_compute_c(reg, cpu_cc_dst, cpu_cc_src,
                               cpu_cc_src2, cpu_cc_op);
953 954
       return (CCPrepare) { .cond = TCG_COND_NE, .reg = reg,
                            .mask = -1, .no_setcond = true };
955 956 957
    }
}

958
/* compute eflags.P to reg */
959
static CCPrepare gen_prepare_eflags_p(DisasContext *s, TCGv reg)
960
{
961
    gen_compute_eflags(s);
962 963
    return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                         .mask = CC_P };
964 965 966
}

/* compute eflags.S to reg */
967
static CCPrepare gen_prepare_eflags_s(DisasContext *s, TCGv reg)
968
{
969 970 971 972 973
    switch (s->cc_op) {
    case CC_OP_DYNAMIC:
        gen_compute_eflags(s);
        /* FALLTHRU */
    case CC_OP_EFLAGS:
974 975 976
    case CC_OP_ADCX:
    case CC_OP_ADOX:
    case CC_OP_ADCOX:
977 978
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                             .mask = CC_S };
R
Richard Henderson 已提交
979 980
    case CC_OP_CLR:
        return (CCPrepare) { .cond = TCG_COND_NEVER, .mask = -1 };
981 982 983 984
    default:
        {
            int size = (s->cc_op - CC_OP_ADDB) & 3;
            TCGv t0 = gen_ext_tl(reg, cpu_cc_dst, size, true);
985
            return (CCPrepare) { .cond = TCG_COND_LT, .reg = t0, .mask = -1 };
986 987
        }
    }
988 989 990
}

/* compute eflags.O to reg */
991
static CCPrepare gen_prepare_eflags_o(DisasContext *s, TCGv reg)
992
{
993 994 995 996 997
    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 已提交
998 999
    case CC_OP_CLR:
        return (CCPrepare) { .cond = TCG_COND_NEVER, .mask = -1 };
1000 1001 1002 1003 1004
    default:
        gen_compute_eflags(s);
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                             .mask = CC_O };
    }
1005 1006 1007
}

/* compute eflags.Z to reg */
1008
static CCPrepare gen_prepare_eflags_z(DisasContext *s, TCGv reg)
1009
{
1010 1011 1012 1013 1014
    switch (s->cc_op) {
    case CC_OP_DYNAMIC:
        gen_compute_eflags(s);
        /* FALLTHRU */
    case CC_OP_EFLAGS:
1015 1016 1017
    case CC_OP_ADCX:
    case CC_OP_ADOX:
    case CC_OP_ADCOX:
1018 1019
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                             .mask = CC_Z };
R
Richard Henderson 已提交
1020 1021
    case CC_OP_CLR:
        return (CCPrepare) { .cond = TCG_COND_ALWAYS, .mask = -1 };
1022 1023 1024 1025
    default:
        {
            int size = (s->cc_op - CC_OP_ADDB) & 3;
            TCGv t0 = gen_ext_tl(reg, cpu_cc_dst, size, false);
1026
            return (CCPrepare) { .cond = TCG_COND_EQ, .reg = t0, .mask = -1 };
1027
        }
1028 1029 1030
    }
}

1031 1032
/* perform a conditional store into register 'reg' according to jump opcode
   value 'b'. In the fast case, T0 is guaranted not to be used. */
1033
static CCPrepare gen_prepare_cc(DisasContext *s, int b, TCGv reg)
1034
{
1035
    int inv, jcc_op, size, cond;
1036
    CCPrepare cc;
1037 1038 1039
    TCGv t0;

    inv = b & 1;
1040
    jcc_op = (b >> 1) & 7;
1041 1042

    switch (s->cc_op) {
1043 1044
    case CC_OP_SUBB ... CC_OP_SUBQ:
        /* We optimize relational operators for the cmp/jcc case.  */
1045 1046 1047
        size = s->cc_op - CC_OP_SUBB;
        switch (jcc_op) {
        case JCC_BE:
1048
            tcg_gen_mov_tl(cpu_tmp4, cpu_cc_srcT);
1049 1050
            gen_extu(size, cpu_tmp4);
            t0 = gen_ext_tl(cpu_tmp0, cpu_cc_src, size, false);
1051 1052
            cc = (CCPrepare) { .cond = TCG_COND_LEU, .reg = cpu_tmp4,
                               .reg2 = t0, .mask = -1, .use_reg2 = true };
1053
            break;
1054

1055
        case JCC_L:
1056
            cond = TCG_COND_LT;
1057 1058
            goto fast_jcc_l;
        case JCC_LE:
1059
            cond = TCG_COND_LE;
1060
        fast_jcc_l:
1061
            tcg_gen_mov_tl(cpu_tmp4, cpu_cc_srcT);
1062 1063
            gen_exts(size, cpu_tmp4);
            t0 = gen_ext_tl(cpu_tmp0, cpu_cc_src, size, true);
1064 1065
            cc = (CCPrepare) { .cond = cond, .reg = cpu_tmp4,
                               .reg2 = t0, .mask = -1, .use_reg2 = true };
1066
            break;
1067

1068
        default:
1069
            goto slow_jcc;
1070
        }
1071
        break;
1072

1073 1074
    default:
    slow_jcc:
1075 1076 1077 1078 1079 1080 1081 1082 1083 1084 1085 1086 1087 1088 1089 1090 1091 1092 1093 1094 1095 1096 1097 1098 1099 1100 1101 1102 1103 1104 1105 1106 1107 1108 1109 1110 1111 1112 1113 1114 1115 1116 1117 1118
        /* 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;
        }
1119
        break;
1120
    }
1121 1122 1123 1124 1125

    if (inv) {
        cc.cond = tcg_invert_cond(cc.cond);
    }
    return cc;
1126 1127
}

1128 1129 1130 1131 1132 1133 1134 1135 1136 1137 1138 1139 1140 1141 1142 1143 1144 1145 1146 1147 1148 1149 1150 1151 1152 1153 1154 1155 1156 1157 1158 1159 1160 1161
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);
}
1162

1163 1164
/* generate a conditional jump to label 'l1' according to jump opcode
   value 'b'. In the fast case, T0 is guaranted not to be used. */
1165 1166 1167 1168 1169 1170 1171 1172 1173 1174 1175 1176 1177 1178 1179 1180 1181 1182
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.  */
1183
static inline void gen_jcc1(DisasContext *s, int b, int l1)
1184
{
1185
    CCPrepare cc = gen_prepare_cc(s, b, cpu_T[0]);
1186

1187
    gen_update_cc_op(s);
1188 1189 1190 1191
    if (cc.mask != -1) {
        tcg_gen_andi_tl(cpu_T[0], cc.reg, cc.mask);
        cc.reg = cpu_T[0];
    }
1192
    set_cc_op(s, CC_OP_DYNAMIC);
1193 1194 1195 1196
    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);
1197 1198 1199
    }
}

B
bellard 已提交
1200 1201 1202
/* 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 已提交
1203
{
B
bellard 已提交
1204 1205 1206 1207
    int l1, l2;

    l1 = gen_new_label();
    l2 = gen_new_label();
1208
    gen_op_jnz_ecx(s->aflag, l1);
B
bellard 已提交
1209 1210 1211 1212
    gen_set_label(l2);
    gen_jmp_tb(s, next_eip, 1);
    gen_set_label(l1);
    return l2;
B
bellard 已提交
1213 1214 1215 1216
}

static inline void gen_stos(DisasContext *s, int ot)
{
1217
    gen_op_mov_TN_reg(MO_32, 0, R_EAX);
B
bellard 已提交
1218
    gen_string_movl_A0_EDI(s);
1219
    gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
1220 1221
    gen_op_movl_T0_Dshift(ot);
    gen_op_add_reg_T0(s->aflag, R_EDI);
B
bellard 已提交
1222 1223 1224 1225 1226
}

static inline void gen_lods(DisasContext *s, int ot)
{
    gen_string_movl_A0_ESI(s);
1227
    gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
1228
    gen_op_mov_reg_T0(ot, R_EAX);
1229 1230
    gen_op_movl_T0_Dshift(ot);
    gen_op_add_reg_T0(s->aflag, R_ESI);
B
bellard 已提交
1231 1232 1233 1234 1235
}

static inline void gen_scas(DisasContext *s, int ot)
{
    gen_string_movl_A0_EDI(s);
1236
    gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
1237
    gen_op(s, OP_CMPL, ot, R_EAX);
1238 1239
    gen_op_movl_T0_Dshift(ot);
    gen_op_add_reg_T0(s->aflag, R_EDI);
B
bellard 已提交
1240 1241 1242 1243 1244
}

static inline void gen_cmps(DisasContext *s, int ot)
{
    gen_string_movl_A0_EDI(s);
1245
    gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
1246 1247
    gen_string_movl_A0_ESI(s);
    gen_op(s, OP_CMPL, ot, OR_TMP0);
1248 1249 1250
    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 已提交
1251 1252 1253 1254
}

static inline void gen_ins(DisasContext *s, int ot)
{
P
pbrook 已提交
1255 1256
    if (use_icount)
        gen_io_start();
B
bellard 已提交
1257
    gen_string_movl_A0_EDI(s);
1258 1259
    /* Note: we must do this dummy write first to be restartable in
       case of page fault. */
B
bellard 已提交
1260
    gen_op_movl_T0_0();
1261
    gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
1262
    gen_op_mov_TN_reg(MO_16, 1, R_EDX);
1263 1264
    tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[1]);
    tcg_gen_andi_i32(cpu_tmp2_i32, cpu_tmp2_i32, 0xffff);
P
pbrook 已提交
1265
    gen_helper_in_func(ot, cpu_T[0], cpu_tmp2_i32);
1266
    gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
1267 1268
    gen_op_movl_T0_Dshift(ot);
    gen_op_add_reg_T0(s->aflag, R_EDI);
P
pbrook 已提交
1269 1270
    if (use_icount)
        gen_io_end();
B
bellard 已提交
1271 1272 1273 1274
}

static inline void gen_outs(DisasContext *s, int ot)
{
P
pbrook 已提交
1275 1276
    if (use_icount)
        gen_io_start();
B
bellard 已提交
1277
    gen_string_movl_A0_ESI(s);
1278
    gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1279

1280
    gen_op_mov_TN_reg(MO_16, 1, R_EDX);
1281 1282 1283
    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 已提交
1284
    gen_helper_out_func(ot, cpu_tmp2_i32, cpu_tmp3_i32);
1285

1286 1287
    gen_op_movl_T0_Dshift(ot);
    gen_op_add_reg_T0(s->aflag, R_ESI);
P
pbrook 已提交
1288 1289
    if (use_icount)
        gen_io_end();
B
bellard 已提交
1290 1291 1292 1293 1294 1295
}

/* 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 已提交
1296
                                 target_ulong cur_eip, target_ulong next_eip) \
B
bellard 已提交
1297
{                                                                             \
B
bellard 已提交
1298
    int l2;\
B
bellard 已提交
1299
    gen_update_cc_op(s);                                                      \
B
bellard 已提交
1300
    l2 = gen_jz_ecx_string(s, next_eip);                                      \
B
bellard 已提交
1301
    gen_ ## op(s, ot);                                                        \
1302
    gen_op_add_reg_im(s->aflag, R_ECX, -1);                                   \
B
bellard 已提交
1303 1304 1305
    /* a loop would cause two single step exceptions if ECX = 1               \
       before rep string_insn */                                              \
    if (!s->jmp_opt)                                                          \
1306
        gen_op_jz_ecx(s->aflag, l2);                                          \
B
bellard 已提交
1307 1308 1309 1310 1311
    gen_jmp(s, cur_eip);                                                      \
}

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

/* NOTE the exception in "r" op ordering */
P
pbrook 已提交
1367 1368 1369 1370
static void gen_helper_fp_arith_STN_ST0(int op, int opreg)
{
    TCGv_i32 tmp = tcg_const_i32(opreg);
    switch (op) {
B
Blue Swirl 已提交
1371 1372 1373 1374 1375 1376 1377 1378 1379 1380 1381 1382 1383 1384 1385 1386 1387 1388
    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 已提交
1389 1390
    }
}
B
bellard 已提交
1391 1392 1393 1394 1395

/* 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 已提交
1396
        gen_op_mov_TN_reg(ot, 0, d);
B
bellard 已提交
1397
    } else {
1398
        gen_op_ld_v(s1, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
1399 1400 1401
    }
    switch(op) {
    case OP_ADCL:
1402
        gen_compute_eflags_c(s1, cpu_tmp4);
B
bellard 已提交
1403 1404
        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);
1405
        gen_op_st_rm_T0_A0(s1, ot, d);
1406 1407
        gen_op_update3_cc(cpu_tmp4);
        set_cc_op(s1, CC_OP_ADCB + ot);
B
bellard 已提交
1408
        break;
B
bellard 已提交
1409
    case OP_SBBL:
1410
        gen_compute_eflags_c(s1, cpu_tmp4);
B
bellard 已提交
1411 1412
        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);
1413
        gen_op_st_rm_T0_A0(s1, ot, d);
1414 1415
        gen_op_update3_cc(cpu_tmp4);
        set_cc_op(s1, CC_OP_SBBB + ot);
B
bellard 已提交
1416
        break;
B
bellard 已提交
1417 1418
    case OP_ADDL:
        gen_op_addl_T0_T1();
1419
        gen_op_st_rm_T0_A0(s1, ot, d);
B
bellard 已提交
1420
        gen_op_update2_cc();
1421
        set_cc_op(s1, CC_OP_ADDB + ot);
B
bellard 已提交
1422 1423
        break;
    case OP_SUBL:
1424
        tcg_gen_mov_tl(cpu_cc_srcT, cpu_T[0]);
B
bellard 已提交
1425
        tcg_gen_sub_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1426
        gen_op_st_rm_T0_A0(s1, ot, d);
B
bellard 已提交
1427
        gen_op_update2_cc();
1428
        set_cc_op(s1, CC_OP_SUBB + ot);
B
bellard 已提交
1429 1430 1431
        break;
    default:
    case OP_ANDL:
B
bellard 已提交
1432
        tcg_gen_and_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1433
        gen_op_st_rm_T0_A0(s1, ot, d);
B
bellard 已提交
1434
        gen_op_update1_cc();
1435
        set_cc_op(s1, CC_OP_LOGICB + ot);
B
bellard 已提交
1436
        break;
B
bellard 已提交
1437
    case OP_ORL:
B
bellard 已提交
1438
        tcg_gen_or_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1439
        gen_op_st_rm_T0_A0(s1, ot, d);
B
bellard 已提交
1440
        gen_op_update1_cc();
1441
        set_cc_op(s1, CC_OP_LOGICB + ot);
B
bellard 已提交
1442
        break;
B
bellard 已提交
1443
    case OP_XORL:
B
bellard 已提交
1444
        tcg_gen_xor_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1445
        gen_op_st_rm_T0_A0(s1, ot, d);
B
bellard 已提交
1446
        gen_op_update1_cc();
1447
        set_cc_op(s1, CC_OP_LOGICB + ot);
B
bellard 已提交
1448 1449
        break;
    case OP_CMPL:
1450
        tcg_gen_mov_tl(cpu_cc_src, cpu_T[1]);
1451
        tcg_gen_mov_tl(cpu_cc_srcT, cpu_T[0]);
1452
        tcg_gen_sub_tl(cpu_cc_dst, cpu_T[0], cpu_T[1]);
1453
        set_cc_op(s1, CC_OP_SUBB + ot);
B
bellard 已提交
1454 1455
        break;
    }
1456 1457
}

B
bellard 已提交
1458 1459 1460
/* if d == OR_TMP0, it means memory operand (address in A0) */
static void gen_inc(DisasContext *s1, int ot, int d, int c)
{
1461
    if (d != OR_TMP0) {
B
bellard 已提交
1462
        gen_op_mov_TN_reg(ot, 0, d);
1463 1464 1465
    } else {
        gen_op_ld_v(s1, ot, cpu_T[0], cpu_A0);
    }
1466
    gen_compute_eflags_c(s1, cpu_cc_src);
B
bellard 已提交
1467
    if (c > 0) {
1468
        tcg_gen_addi_tl(cpu_T[0], cpu_T[0], 1);
1469
        set_cc_op(s1, CC_OP_INCB + ot);
B
bellard 已提交
1470
    } else {
1471
        tcg_gen_addi_tl(cpu_T[0], cpu_T[0], -1);
1472
        set_cc_op(s1, CC_OP_DECB + ot);
B
bellard 已提交
1473
    }
1474
    gen_op_st_rm_T0_A0(s1, ot, d);
B
bellard 已提交
1475
    tcg_gen_mov_tl(cpu_cc_dst, cpu_T[0]);
B
bellard 已提交
1476 1477
}

1478 1479 1480 1481 1482 1483 1484 1485 1486 1487 1488 1489 1490 1491 1492 1493 1494 1495 1496 1497 1498 1499 1500 1501 1502 1503 1504 1505 1506 1507 1508 1509 1510 1511 1512 1513 1514 1515 1516 1517 1518 1519 1520 1521 1522
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);
}

1523 1524
static void gen_shift_rm_T1(DisasContext *s, int ot, int op1, 
                            int is_right, int is_arith)
B
bellard 已提交
1525
{
1526
    target_ulong mask = (ot == MO_64 ? 0x3f : 0x1f);
1527

1528
    /* load */
1529
    if (op1 == OR_TMP0) {
1530
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1531
    } else {
1532
        gen_op_mov_TN_reg(ot, 0, op1);
1533
    }
1534

1535 1536
    tcg_gen_andi_tl(cpu_T[1], cpu_T[1], mask);
    tcg_gen_subi_tl(cpu_tmp0, cpu_T[1], 1);
1537 1538 1539

    if (is_right) {
        if (is_arith) {
B
bellard 已提交
1540
            gen_exts(ot, cpu_T[0]);
1541 1542
            tcg_gen_sar_tl(cpu_tmp0, cpu_T[0], cpu_tmp0);
            tcg_gen_sar_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1543
        } else {
B
bellard 已提交
1544
            gen_extu(ot, cpu_T[0]);
1545 1546
            tcg_gen_shr_tl(cpu_tmp0, cpu_T[0], cpu_tmp0);
            tcg_gen_shr_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1547 1548
        }
    } else {
1549 1550
        tcg_gen_shl_tl(cpu_tmp0, cpu_T[0], cpu_tmp0);
        tcg_gen_shl_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1551 1552 1553
    }

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

1556
    gen_shift_flags(s, ot, cpu_T[0], cpu_tmp0, cpu_T[1], is_right);
1557 1558
}

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

    /* load */
    if (op1 == OR_TMP0)
1566
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
1567 1568 1569 1570 1571 1572 1573 1574
    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 已提交
1575
                tcg_gen_sari_tl(cpu_tmp4, cpu_T[0], op2 - 1);
B
bellard 已提交
1576 1577 1578
                tcg_gen_sari_tl(cpu_T[0], cpu_T[0], op2);
            } else {
                gen_extu(ot, cpu_T[0]);
B
bellard 已提交
1579
                tcg_gen_shri_tl(cpu_tmp4, cpu_T[0], op2 - 1);
B
bellard 已提交
1580 1581 1582
                tcg_gen_shri_tl(cpu_T[0], cpu_T[0], op2);
            }
        } else {
B
bellard 已提交
1583
            tcg_gen_shli_tl(cpu_tmp4, cpu_T[0], op2 - 1);
B
bellard 已提交
1584 1585 1586 1587 1588
            tcg_gen_shli_tl(cpu_T[0], cpu_T[0], op2);
        }
    }

    /* store */
1589 1590
    gen_op_st_rm_T0_A0(s, ot, op1);

B
bellard 已提交
1591 1592
    /* update eflags if non zero shift */
    if (op2 != 0) {
B
bellard 已提交
1593
        tcg_gen_mov_tl(cpu_cc_src, cpu_tmp4);
B
bellard 已提交
1594
        tcg_gen_mov_tl(cpu_cc_dst, cpu_T[0]);
1595
        set_cc_op(s, (is_right ? CC_OP_SARB : CC_OP_SHLB) + ot);
B
bellard 已提交
1596 1597 1598
    }
}

1599 1600 1601 1602 1603 1604 1605 1606
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);
}

1607
static void gen_rot_rm_T1(DisasContext *s, int ot, int op1, int is_right)
1608
{
1609
    target_ulong mask = (ot == MO_64 ? 0x3f : 0x1f);
1610
    TCGv_i32 t0, t1;
1611 1612

    /* load */
1613
    if (op1 == OR_TMP0) {
1614
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1615
    } else {
1616
        gen_op_mov_TN_reg(ot, 0, op1);
1617
    }
1618

1619
    tcg_gen_andi_tl(cpu_T[1], cpu_T[1], mask);
1620

1621
    switch (ot) {
1622
    case MO_8:
1623 1624 1625 1626
        /* 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;
1627
    case MO_16:
1628 1629 1630 1631 1632
        /* 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
1633
    case MO_32:
1634 1635 1636 1637 1638 1639 1640 1641 1642 1643 1644 1645 1646 1647 1648 1649 1650
        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;
1651 1652 1653
    }

    /* store */
1654
    gen_op_st_rm_T0_A0(s, ot, op1);
1655

1656 1657
    /* We'll need the flags computed into CC_SRC.  */
    gen_compute_eflags(s);
1658

1659 1660 1661 1662
    /* 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.  */
1663
    if (is_right) {
1664 1665
        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 已提交
1666
        tcg_gen_andi_tl(cpu_cc_dst, cpu_cc_dst, 1);
1667 1668 1669
    } else {
        tcg_gen_shri_tl(cpu_cc_src2, cpu_T[0], mask);
        tcg_gen_andi_tl(cpu_cc_dst, cpu_T[0], 1);
1670
    }
1671 1672 1673 1674 1675 1676 1677 1678 1679 1680 1681 1682 1683 1684 1685 1686 1687 1688 1689
    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);
1690 1691
}

M
malc 已提交
1692 1693 1694
static void gen_rot_rm_im(DisasContext *s, int ot, int op1, int op2,
                          int is_right)
{
1695
    int mask = (ot == MO_64 ? 0x3f : 0x1f);
1696
    int shift;
M
malc 已提交
1697 1698 1699

    /* load */
    if (op1 == OR_TMP0) {
1700
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
M
malc 已提交
1701
    } else {
1702
        gen_op_mov_TN_reg(ot, 0, op1);
M
malc 已提交
1703 1704 1705 1706
    }

    op2 &= mask;
    if (op2 != 0) {
1707 1708
        switch (ot) {
#ifdef TARGET_X86_64
1709
        case MO_32:
1710 1711 1712 1713 1714 1715 1716 1717 1718 1719 1720 1721 1722 1723 1724 1725
            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;
1726
        case MO_8:
1727 1728
            mask = 7;
            goto do_shifts;
1729
        case MO_16:
1730 1731 1732 1733 1734 1735 1736 1737 1738 1739 1740
            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 已提交
1741 1742 1743 1744
        }
    }

    /* store */
1745
    gen_op_st_rm_T0_A0(s, ot, op1);
M
malc 已提交
1746 1747

    if (op2 != 0) {
1748
        /* Compute the flags into CC_SRC.  */
1749
        gen_compute_eflags(s);
1750

1751 1752 1753 1754
        /* 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 已提交
1755
        if (is_right) {
1756 1757
            tcg_gen_shri_tl(cpu_cc_src2, cpu_T[0], mask - 1);
            tcg_gen_shri_tl(cpu_cc_dst, cpu_T[0], mask);
1758
            tcg_gen_andi_tl(cpu_cc_dst, cpu_cc_dst, 1);
1759 1760 1761
        } 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 已提交
1762
        }
1763 1764 1765
        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 已提交
1766 1767 1768
    }
}

1769 1770 1771 1772
/* XXX: add faster immediate = 1 case */
static void gen_rotc_rm_T1(DisasContext *s, int ot, int op1, 
                           int is_right)
{
1773
    gen_compute_eflags(s);
1774
    assert(s->cc_op == CC_OP_EFLAGS);
1775 1776 1777

    /* load */
    if (op1 == OR_TMP0)
1778
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1779 1780 1781
    else
        gen_op_mov_TN_reg(ot, 0, op1);
    
P
pbrook 已提交
1782 1783
    if (is_right) {
        switch (ot) {
1784
        case MO_8:
1785 1786
            gen_helper_rcrb(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
1787
        case MO_16:
1788 1789
            gen_helper_rcrw(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
1790
        case MO_32:
1791 1792
            gen_helper_rcrl(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
P
pbrook 已提交
1793
#ifdef TARGET_X86_64
1794
        case MO_64:
1795 1796
            gen_helper_rcrq(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
P
pbrook 已提交
1797 1798 1799 1800
#endif
        }
    } else {
        switch (ot) {
1801
        case MO_8:
1802 1803
            gen_helper_rclb(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
1804
        case MO_16:
1805 1806
            gen_helper_rclw(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
1807
        case MO_32:
1808 1809
            gen_helper_rcll(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
P
pbrook 已提交
1810
#ifdef TARGET_X86_64
1811
        case MO_64:
1812 1813
            gen_helper_rclq(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
P
pbrook 已提交
1814 1815 1816
#endif
        }
    }
1817
    /* store */
1818
    gen_op_st_rm_T0_A0(s, ot, op1);
1819 1820 1821
}

/* XXX: add faster immediate case */
P
Paolo Bonzini 已提交
1822
static void gen_shiftd_rm_T1(DisasContext *s, int ot, int op1,
1823
                             bool is_right, TCGv count_in)
1824
{
1825
    target_ulong mask = (ot == MO_64 ? 63 : 31);
1826
    TCGv count;
1827 1828

    /* load */
1829
    if (op1 == OR_TMP0) {
1830
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1831
    } else {
1832
        gen_op_mov_TN_reg(ot, 0, op1);
1833
    }
1834

1835 1836
    count = tcg_temp_new();
    tcg_gen_andi_tl(count, count_in, mask);
1837

1838
    switch (ot) {
1839
    case MO_16:
1840 1841 1842
        /* 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.  */
1843
        if (is_right) {
1844 1845 1846
            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);
1847
        } else {
1848
            tcg_gen_deposit_tl(cpu_T[1], cpu_T[0], cpu_T[1], 16, 16);
1849
        }
1850 1851
        /* FALLTHRU */
#ifdef TARGET_X86_64
1852
    case MO_32:
1853 1854
        /* Concatenate the two 32-bit values and use a 64-bit shift.  */
        tcg_gen_subi_tl(cpu_tmp0, count, 1);
1855
        if (is_right) {
1856 1857 1858 1859 1860 1861 1862 1863 1864 1865 1866 1867 1868 1869 1870 1871
            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);
1872

1873 1874 1875
            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);
1876
        } else {
1877
            tcg_gen_shl_tl(cpu_tmp0, cpu_T[0], cpu_tmp0);
1878
            if (ot == MO_16) {
1879 1880 1881 1882 1883 1884 1885 1886 1887
                /* 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);
1888
        }
1889 1890 1891 1892 1893
        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;
1894 1895 1896
    }

    /* store */
1897
    gen_op_st_rm_T0_A0(s, ot, op1);
1898

1899 1900
    gen_shift_flags(s, ot, cpu_T[0], cpu_tmp0, count, is_right);
    tcg_temp_free(count);
1901 1902 1903 1904 1905 1906 1907 1908 1909 1910 1911 1912 1913 1914 1915 1916 1917 1918 1919 1920 1921 1922 1923 1924 1925 1926 1927 1928 1929 1930
}

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 已提交
1931 1932 1933 1934
}

static void gen_shifti(DisasContext *s1, int op, int ot, int d, int c)
{
B
bellard 已提交
1935
    switch(op) {
M
malc 已提交
1936 1937 1938 1939 1940 1941
    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 已提交
1942 1943 1944 1945 1946 1947 1948 1949 1950 1951 1952 1953 1954 1955 1956 1957
    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 已提交
1958 1959
}

1960 1961
static void gen_lea_modrm(CPUX86State *env, DisasContext *s, int modrm,
                          int *reg_ptr, int *offset_ptr)
B
bellard 已提交
1962
{
B
bellard 已提交
1963
    target_long disp;
B
bellard 已提交
1964
    int havesib;
B
bellard 已提交
1965
    int base;
B
bellard 已提交
1966 1967 1968 1969
    int index;
    int scale;
    int opreg;
    int mod, rm, code, override, must_add_seg;
1970
    TCGv sum;
B
bellard 已提交
1971 1972 1973 1974 1975 1976 1977 1978 1979 1980 1981

    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;
1982
        index = -1;
B
bellard 已提交
1983
        scale = 0;
1984

B
bellard 已提交
1985 1986
        if (base == 4) {
            havesib = 1;
1987
            code = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
1988
            scale = (code >> 6) & 3;
B
bellard 已提交
1989
            index = ((code >> 3) & 7) | REX_X(s);
1990 1991 1992
            if (index == 4) {
                index = -1;  /* no index */
            }
B
bellard 已提交
1993
            base = (code & 7);
B
bellard 已提交
1994
        }
B
bellard 已提交
1995
        base |= REX_B(s);
B
bellard 已提交
1996 1997 1998

        switch (mod) {
        case 0:
B
bellard 已提交
1999
            if ((base & 7) == 5) {
B
bellard 已提交
2000
                base = -1;
2001
                disp = (int32_t)cpu_ldl_code(env, s->pc);
B
bellard 已提交
2002
                s->pc += 4;
B
bellard 已提交
2003 2004 2005
                if (CODE64(s) && !havesib) {
                    disp += s->pc + s->rip_offset;
                }
B
bellard 已提交
2006 2007 2008 2009 2010
            } else {
                disp = 0;
            }
            break;
        case 1:
2011
            disp = (int8_t)cpu_ldub_code(env, s->pc++);
B
bellard 已提交
2012 2013 2014
            break;
        default:
        case 2:
2015
            disp = (int32_t)cpu_ldl_code(env, s->pc);
B
bellard 已提交
2016 2017 2018
            s->pc += 4;
            break;
        }
2019

2020 2021 2022 2023 2024 2025 2026 2027 2028 2029 2030 2031 2032
        /* 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 已提交
2033
            }
2034 2035 2036
            if (base >= 0) {
                tcg_gen_add_tl(cpu_A0, sum, cpu_regs[base]);
                sum = cpu_A0;
B
bellard 已提交
2037
            }
2038 2039
        } else if (base >= 0) {
            sum = cpu_regs[base];
B
bellard 已提交
2040
        }
2041 2042 2043 2044
        if (TCGV_IS_UNUSED(sum)) {
            tcg_gen_movi_tl(cpu_A0, disp);
        } else {
            tcg_gen_addi_tl(cpu_A0, sum, disp);
B
bellard 已提交
2045
        }
2046

B
bellard 已提交
2047 2048
        if (must_add_seg) {
            if (override < 0) {
2049
                if (base == R_EBP || base == R_ESP) {
B
bellard 已提交
2050
                    override = R_SS;
2051
                } else {
B
bellard 已提交
2052
                    override = R_DS;
2053
                }
B
bellard 已提交
2054
            }
2055 2056 2057 2058 2059 2060 2061 2062 2063

            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 已提交
2064
            }
2065 2066 2067 2068 2069 2070

            tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_tmp0);
        }

        if (s->aflag != 2) {
            tcg_gen_ext32u_tl(cpu_A0, cpu_A0);
B
bellard 已提交
2071 2072 2073 2074 2075
        }
    } else {
        switch (mod) {
        case 0:
            if (rm == 6) {
2076
                disp = cpu_lduw_code(env, s->pc);
B
bellard 已提交
2077 2078 2079 2080 2081 2082 2083 2084 2085
                s->pc += 2;
                gen_op_movl_A0_im(disp);
                rm = 0; /* avoid SS override */
                goto no_rm;
            } else {
                disp = 0;
            }
            break;
        case 1:
2086
            disp = (int8_t)cpu_ldub_code(env, s->pc++);
B
bellard 已提交
2087 2088 2089
            break;
        default:
        case 2:
2090
            disp = cpu_lduw_code(env, s->pc);
B
bellard 已提交
2091 2092 2093 2094 2095
            s->pc += 2;
            break;
        }
        switch(rm) {
        case 0:
B
bellard 已提交
2096 2097
            gen_op_movl_A0_reg(R_EBX);
            gen_op_addl_A0_reg_sN(0, R_ESI);
B
bellard 已提交
2098 2099
            break;
        case 1:
B
bellard 已提交
2100 2101
            gen_op_movl_A0_reg(R_EBX);
            gen_op_addl_A0_reg_sN(0, R_EDI);
B
bellard 已提交
2102 2103
            break;
        case 2:
B
bellard 已提交
2104 2105
            gen_op_movl_A0_reg(R_EBP);
            gen_op_addl_A0_reg_sN(0, R_ESI);
B
bellard 已提交
2106 2107
            break;
        case 3:
B
bellard 已提交
2108 2109
            gen_op_movl_A0_reg(R_EBP);
            gen_op_addl_A0_reg_sN(0, R_EDI);
B
bellard 已提交
2110 2111
            break;
        case 4:
B
bellard 已提交
2112
            gen_op_movl_A0_reg(R_ESI);
B
bellard 已提交
2113 2114
            break;
        case 5:
B
bellard 已提交
2115
            gen_op_movl_A0_reg(R_EDI);
B
bellard 已提交
2116 2117
            break;
        case 6:
B
bellard 已提交
2118
            gen_op_movl_A0_reg(R_EBP);
B
bellard 已提交
2119 2120 2121
            break;
        default:
        case 7:
B
bellard 已提交
2122
            gen_op_movl_A0_reg(R_EBX);
B
bellard 已提交
2123 2124 2125 2126 2127 2128 2129 2130 2131 2132 2133 2134 2135
            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;
            }
2136
            gen_op_addl_A0_seg(s, override);
B
bellard 已提交
2137 2138 2139
        }
    }

2140
 done:
B
bellard 已提交
2141 2142 2143 2144 2145 2146
    opreg = OR_A0;
    disp = 0;
    *reg_ptr = opreg;
    *offset_ptr = disp;
}

2147
static void gen_nop_modrm(CPUX86State *env, DisasContext *s, int modrm)
B
bellard 已提交
2148 2149 2150 2151 2152 2153 2154 2155 2156 2157 2158
{
    int mod, rm, base, code;

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

    if (s->aflag) {

        base = rm;
2159

B
bellard 已提交
2160
        if (base == 4) {
2161
            code = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
2162 2163
            base = (code & 7);
        }
2164

B
bellard 已提交
2165 2166 2167 2168 2169 2170 2171 2172 2173 2174 2175 2176 2177 2178 2179 2180 2181 2182 2183 2184 2185 2186 2187 2188 2189 2190 2191 2192 2193 2194 2195 2196
        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 已提交
2197 2198 2199 2200 2201 2202 2203 2204 2205 2206 2207
/* 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) {
2208 2209
#ifdef TARGET_X86_64
        if (CODE64(s)) {
B
bellard 已提交
2210
            gen_op_addq_A0_seg(override);
2211
        } else
2212 2213
#endif
        {
2214
            gen_op_addl_A0_seg(s, override);
2215
        }
B
bellard 已提交
2216 2217 2218
    }
}

B
balrog 已提交
2219
/* generate modrm memory load or store of 'reg'. TMP0 is used if reg ==
B
bellard 已提交
2220
   OR_TMP0 */
2221 2222
static void gen_ldst_modrm(CPUX86State *env, DisasContext *s, int modrm,
                           int ot, int reg, int is_store)
B
bellard 已提交
2223 2224 2225 2226
{
    int mod, rm, opreg, disp;

    mod = (modrm >> 6) & 3;
B
bellard 已提交
2227
    rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
2228 2229 2230
    if (mod == 3) {
        if (is_store) {
            if (reg != OR_TMP0)
B
bellard 已提交
2231 2232
                gen_op_mov_TN_reg(ot, 0, reg);
            gen_op_mov_reg_T0(ot, rm);
B
bellard 已提交
2233
        } else {
B
bellard 已提交
2234
            gen_op_mov_TN_reg(ot, 0, rm);
B
bellard 已提交
2235
            if (reg != OR_TMP0)
B
bellard 已提交
2236
                gen_op_mov_reg_T0(ot, reg);
B
bellard 已提交
2237 2238
        }
    } else {
2239
        gen_lea_modrm(env, s, modrm, &opreg, &disp);
B
bellard 已提交
2240 2241
        if (is_store) {
            if (reg != OR_TMP0)
B
bellard 已提交
2242
                gen_op_mov_TN_reg(ot, 0, reg);
2243
            gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
2244
        } else {
2245
            gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
2246
            if (reg != OR_TMP0)
B
bellard 已提交
2247
                gen_op_mov_reg_T0(ot, reg);
B
bellard 已提交
2248 2249 2250 2251
        }
    }
}

2252
static inline uint32_t insn_get(CPUX86State *env, DisasContext *s, int ot)
B
bellard 已提交
2253 2254 2255 2256
{
    uint32_t ret;

    switch(ot) {
2257
    case MO_8:
2258
        ret = cpu_ldub_code(env, s->pc);
B
bellard 已提交
2259 2260
        s->pc++;
        break;
2261
    case MO_16:
2262
        ret = cpu_lduw_code(env, s->pc);
B
bellard 已提交
2263 2264 2265
        s->pc += 2;
        break;
    default:
2266
    case MO_32:
2267
        ret = cpu_ldl_code(env, s->pc);
B
bellard 已提交
2268 2269 2270 2271 2272 2273
        s->pc += 4;
        break;
    }
    return ret;
}

B
bellard 已提交
2274 2275
static inline int insn_const_size(unsigned int ot)
{
2276
    if (ot <= MO_32) {
B
bellard 已提交
2277
        return 1 << ot;
2278
    } else {
B
bellard 已提交
2279
        return 4;
2280
    }
B
bellard 已提交
2281 2282
}

2283 2284 2285 2286 2287 2288 2289 2290 2291 2292 2293
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 已提交
2294
        tcg_gen_goto_tb(tb_num);
2295
        gen_jmp_im(eip);
2296
        tcg_gen_exit_tb((uintptr_t)tb + tb_num);
2297 2298 2299 2300 2301 2302 2303
    } else {
        /* jump to another page: currently not optimized */
        gen_jmp_im(eip);
        gen_eob(s);
    }
}

2304
static inline void gen_jcc(DisasContext *s, int b,
B
bellard 已提交
2305
                           target_ulong val, target_ulong next_eip)
B
bellard 已提交
2306
{
2307
    int l1, l2;
2308

B
bellard 已提交
2309
    if (s->jmp_opt) {
B
bellard 已提交
2310
        l1 = gen_new_label();
2311
        gen_jcc1(s, b, l1);
2312

2313
        gen_goto_tb(s, 0, next_eip);
B
bellard 已提交
2314 2315

        gen_set_label(l1);
2316
        gen_goto_tb(s, 1, val);
J
Jun Koi 已提交
2317
        s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2318
    } else {
B
bellard 已提交
2319 2320
        l1 = gen_new_label();
        l2 = gen_new_label();
2321
        gen_jcc1(s, b, l1);
2322

B
bellard 已提交
2323
        gen_jmp_im(next_eip);
2324 2325
        tcg_gen_br(l2);

B
bellard 已提交
2326 2327 2328
        gen_set_label(l1);
        gen_jmp_im(val);
        gen_set_label(l2);
B
bellard 已提交
2329 2330 2331 2332
        gen_eob(s);
    }
}

2333 2334 2335
static void gen_cmovcc1(CPUX86State *env, DisasContext *s, int ot, int b,
                        int modrm, int reg)
{
2336
    CCPrepare cc;
2337

2338
    gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
2339

2340 2341 2342 2343 2344 2345 2346 2347
    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);
2348 2349
    }

2350 2351 2352 2353 2354 2355 2356 2357 2358 2359
    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);
    }
2360 2361
}

2362 2363 2364 2365 2366 2367 2368 2369 2370 2371 2372 2373 2374 2375 2376 2377
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 已提交
2378 2379
/* move T0 to seg_reg and compute if the CPU state may change. Never
   call this function with seg_reg == R_CS */
B
bellard 已提交
2380
static void gen_movl_seg_T0(DisasContext *s, int seg_reg, target_ulong cur_eip)
B
bellard 已提交
2381
{
2382 2383
    if (s->pe && !s->vm86) {
        /* XXX: optimize by finding processor state dynamically */
2384
        gen_update_cc_op(s);
B
bellard 已提交
2385
        gen_jmp_im(cur_eip);
2386
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
2387
        gen_helper_load_seg(cpu_env, tcg_const_i32(seg_reg), cpu_tmp2_i32);
B
bellard 已提交
2388 2389 2390 2391 2392
        /* 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 已提交
2393
            s->is_jmp = DISAS_TB_JUMP;
2394
    } else {
2395
        gen_op_movl_seg_T0_vm(seg_reg);
B
bellard 已提交
2396
        if (seg_reg == R_SS)
J
Jun Koi 已提交
2397
            s->is_jmp = DISAS_TB_JUMP;
2398
    }
B
bellard 已提交
2399 2400
}

T
ths 已提交
2401 2402 2403 2404 2405
static inline int svm_is_rep(int prefixes)
{
    return ((prefixes & (PREFIX_REPZ | PREFIX_REPNZ)) ? 8 : 0);
}

B
bellard 已提交
2406
static inline void
T
ths 已提交
2407
gen_svm_check_intercept_param(DisasContext *s, target_ulong pc_start,
2408
                              uint32_t type, uint64_t param)
T
ths 已提交
2409
{
B
bellard 已提交
2410 2411 2412
    /* no SVM activated; fast case */
    if (likely(!(s->flags & HF_SVMI_MASK)))
        return;
2413
    gen_update_cc_op(s);
B
bellard 已提交
2414
    gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
2415
    gen_helper_svm_check_intercept_param(cpu_env, tcg_const_i32(type),
P
pbrook 已提交
2416
                                         tcg_const_i64(param));
T
ths 已提交
2417 2418
}

B
bellard 已提交
2419
static inline void
T
ths 已提交
2420 2421
gen_svm_check_intercept(DisasContext *s, target_ulong pc_start, uint64_t type)
{
B
bellard 已提交
2422
    gen_svm_check_intercept_param(s, pc_start, type, 0);
T
ths 已提交
2423 2424
}

2425 2426
static inline void gen_stack_update(DisasContext *s, int addend)
{
B
bellard 已提交
2427 2428
#ifdef TARGET_X86_64
    if (CODE64(s)) {
2429
        gen_op_add_reg_im(2, R_ESP, addend);
B
bellard 已提交
2430 2431
    } else
#endif
2432
    if (s->ss32) {
2433
        gen_op_add_reg_im(1, R_ESP, addend);
2434
    } else {
2435
        gen_op_add_reg_im(0, R_ESP, addend);
2436 2437 2438
    }
}

B
bellard 已提交
2439 2440 2441
/* generate a push. It depends on ss32, addseg and dflag */
static void gen_push_T0(DisasContext *s)
{
B
bellard 已提交
2442 2443
#ifdef TARGET_X86_64
    if (CODE64(s)) {
B
bellard 已提交
2444
        gen_op_movq_A0_reg(R_ESP);
2445
        if (s->dflag) {
B
bellard 已提交
2446
            gen_op_addq_A0_im(-8);
2447
            gen_op_st_v(s, MO_64, cpu_T[0], cpu_A0);
2448
        } else {
B
bellard 已提交
2449
            gen_op_addq_A0_im(-2);
2450
            gen_op_st_v(s, MO_16, cpu_T[0], cpu_A0);
2451
        }
B
bellard 已提交
2452
        gen_op_mov_reg_A0(2, R_ESP);
2453
    } else
B
bellard 已提交
2454 2455
#endif
    {
B
bellard 已提交
2456
        gen_op_movl_A0_reg(R_ESP);
B
bellard 已提交
2457
        if (!s->dflag)
B
bellard 已提交
2458
            gen_op_addl_A0_im(-2);
B
bellard 已提交
2459
        else
B
bellard 已提交
2460
            gen_op_addl_A0_im(-4);
B
bellard 已提交
2461 2462
        if (s->ss32) {
            if (s->addseg) {
2463
                tcg_gen_mov_tl(cpu_T[1], cpu_A0);
2464
                gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2465 2466 2467
            }
        } else {
            gen_op_andl_A0_ffff();
2468
            tcg_gen_mov_tl(cpu_T[1], cpu_A0);
2469
            gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2470
        }
2471
        gen_op_st_v(s, s->dflag + 1, cpu_T[0], cpu_A0);
B
bellard 已提交
2472
        if (s->ss32 && !s->addseg)
B
bellard 已提交
2473
            gen_op_mov_reg_A0(1, R_ESP);
B
bellard 已提交
2474
        else
B
bellard 已提交
2475
            gen_op_mov_reg_T1(s->ss32 + 1, R_ESP);
B
bellard 已提交
2476 2477 2478
    }
}

2479 2480 2481
/* 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 已提交
2482
{
B
bellard 已提交
2483 2484
#ifdef TARGET_X86_64
    if (CODE64(s)) {
B
bellard 已提交
2485
        gen_op_movq_A0_reg(R_ESP);
2486
        if (s->dflag) {
B
bellard 已提交
2487
            gen_op_addq_A0_im(-8);
2488
            gen_op_st_v(s, MO_64, cpu_T[1], cpu_A0);
2489
        } else {
B
bellard 已提交
2490
            gen_op_addq_A0_im(-2);
2491
            gen_op_st_v(s, MO_16, cpu_T[1], cpu_A0);
2492
        }
B
bellard 已提交
2493
        gen_op_mov_reg_A0(2, R_ESP);
2494
    } else
B
bellard 已提交
2495 2496
#endif
    {
B
bellard 已提交
2497
        gen_op_movl_A0_reg(R_ESP);
B
bellard 已提交
2498
        if (!s->dflag)
B
bellard 已提交
2499
            gen_op_addl_A0_im(-2);
B
bellard 已提交
2500
        else
B
bellard 已提交
2501
            gen_op_addl_A0_im(-4);
B
bellard 已提交
2502 2503
        if (s->ss32) {
            if (s->addseg) {
2504
                gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2505 2506 2507
            }
        } else {
            gen_op_andl_A0_ffff();
2508
            gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2509
        }
2510
        gen_op_st_v(s, s->dflag + 1, cpu_T[1], cpu_A0);
2511

B
bellard 已提交
2512
        if (s->ss32 && !s->addseg)
B
bellard 已提交
2513
            gen_op_mov_reg_A0(1, R_ESP);
B
bellard 已提交
2514 2515
        else
            gen_stack_update(s, (-2) << s->dflag);
B
bellard 已提交
2516 2517 2518
    }
}

2519 2520
/* two step pop is necessary for precise exceptions */
static void gen_pop_T0(DisasContext *s)
B
bellard 已提交
2521
{
B
bellard 已提交
2522 2523
#ifdef TARGET_X86_64
    if (CODE64(s)) {
B
bellard 已提交
2524
        gen_op_movq_A0_reg(R_ESP);
2525
        gen_op_ld_v(s, s->dflag ? MO_64 : MO_16, cpu_T[0], cpu_A0);
2526
    } else
B
bellard 已提交
2527 2528
#endif
    {
B
bellard 已提交
2529
        gen_op_movl_A0_reg(R_ESP);
B
bellard 已提交
2530 2531
        if (s->ss32) {
            if (s->addseg)
2532
                gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2533 2534
        } else {
            gen_op_andl_A0_ffff();
2535
            gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2536
        }
2537
        gen_op_ld_v(s, s->dflag + 1, cpu_T[0], cpu_A0);
B
bellard 已提交
2538 2539 2540 2541 2542
    }
}

static void gen_pop_update(DisasContext *s)
{
B
bellard 已提交
2543
#ifdef TARGET_X86_64
2544
    if (CODE64(s) && s->dflag) {
B
bellard 已提交
2545 2546 2547 2548 2549 2550
        gen_stack_update(s, 8);
    } else
#endif
    {
        gen_stack_update(s, 2 << s->dflag);
    }
B
bellard 已提交
2551 2552 2553 2554
}

static void gen_stack_A0(DisasContext *s)
{
B
bellard 已提交
2555
    gen_op_movl_A0_reg(R_ESP);
B
bellard 已提交
2556 2557
    if (!s->ss32)
        gen_op_andl_A0_ffff();
2558
    tcg_gen_mov_tl(cpu_T[1], cpu_A0);
B
bellard 已提交
2559
    if (s->addseg)
2560
        gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2561 2562 2563 2564 2565 2566
}

/* NOTE: wrap around in 16 bit not fully handled */
static void gen_pusha(DisasContext *s)
{
    int i;
B
bellard 已提交
2567
    gen_op_movl_A0_reg(R_ESP);
B
bellard 已提交
2568 2569 2570
    gen_op_addl_A0_im(-16 <<  s->dflag);
    if (!s->ss32)
        gen_op_andl_A0_ffff();
2571
    tcg_gen_mov_tl(cpu_T[1], cpu_A0);
B
bellard 已提交
2572
    if (s->addseg)
2573
        gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2574
    for(i = 0;i < 8; i++) {
2575
        gen_op_mov_TN_reg(MO_32, 0, 7 - i);
2576
        gen_op_st_v(s, MO_16 + s->dflag, cpu_T[0], cpu_A0);
B
bellard 已提交
2577 2578
        gen_op_addl_A0_im(2 <<  s->dflag);
    }
2579
    gen_op_mov_reg_T1(MO_16 + s->ss32, R_ESP);
B
bellard 已提交
2580 2581 2582 2583 2584 2585
}

/* NOTE: wrap around in 16 bit not fully handled */
static void gen_popa(DisasContext *s)
{
    int i;
B
bellard 已提交
2586
    gen_op_movl_A0_reg(R_ESP);
B
bellard 已提交
2587 2588
    if (!s->ss32)
        gen_op_andl_A0_ffff();
2589 2590
    tcg_gen_mov_tl(cpu_T[1], cpu_A0);
    tcg_gen_addi_tl(cpu_T[1], cpu_T[1], 16 <<  s->dflag);
B
bellard 已提交
2591
    if (s->addseg)
2592
        gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2593 2594 2595
    for(i = 0;i < 8; i++) {
        /* ESP is not reloaded */
        if (i != 3) {
2596
            gen_op_ld_v(s, MO_16 + s->dflag, cpu_T[0], cpu_A0);
2597
            gen_op_mov_reg_T0(MO_16 + s->dflag, 7 - i);
B
bellard 已提交
2598 2599 2600
        }
        gen_op_addl_A0_im(2 <<  s->dflag);
    }
2601
    gen_op_mov_reg_T1(MO_16 + s->ss32, R_ESP);
B
bellard 已提交
2602 2603 2604 2605
}

static void gen_enter(DisasContext *s, int esp_addend, int level)
{
B
bellard 已提交
2606
    int ot, opsize;
B
bellard 已提交
2607 2608

    level &= 0x1f;
2609 2610
#ifdef TARGET_X86_64
    if (CODE64(s)) {
2611
        ot = s->dflag ? MO_64 : MO_16;
2612
        opsize = 1 << ot;
2613

B
bellard 已提交
2614
        gen_op_movl_A0_reg(R_ESP);
2615
        gen_op_addq_A0_im(-opsize);
2616
        tcg_gen_mov_tl(cpu_T[1], cpu_A0);
2617 2618

        /* push bp */
2619
        gen_op_mov_TN_reg(MO_32, 0, R_EBP);
2620
        gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
2621
        if (level) {
B
bellard 已提交
2622
            /* XXX: must save state */
2623
            gen_helper_enter64_level(cpu_env, tcg_const_i32(level),
2624
                                     tcg_const_i32((ot == MO_64)),
P
pbrook 已提交
2625
                                     cpu_T[1]);
2626
        }
B
bellard 已提交
2627
        gen_op_mov_reg_T1(ot, R_EBP);
2628
        tcg_gen_addi_tl(cpu_T[1], cpu_T[1], -esp_addend + (-opsize * level));
2629
        gen_op_mov_reg_T1(MO_64, R_ESP);
2630
    } else
2631 2632
#endif
    {
2633
        ot = s->dflag + MO_16;
2634
        opsize = 2 << s->dflag;
2635

B
bellard 已提交
2636
        gen_op_movl_A0_reg(R_ESP);
2637 2638 2639
        gen_op_addl_A0_im(-opsize);
        if (!s->ss32)
            gen_op_andl_A0_ffff();
2640
        tcg_gen_mov_tl(cpu_T[1], cpu_A0);
2641
        if (s->addseg)
2642
            gen_op_addl_A0_seg(s, R_SS);
2643
        /* push bp */
2644
        gen_op_mov_TN_reg(MO_32, 0, R_EBP);
2645
        gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
2646
        if (level) {
B
bellard 已提交
2647
            /* XXX: must save state */
2648
            gen_helper_enter_level(cpu_env, tcg_const_i32(level),
P
pbrook 已提交
2649 2650
                                   tcg_const_i32(s->dflag),
                                   cpu_T[1]);
2651
        }
B
bellard 已提交
2652
        gen_op_mov_reg_T1(ot, R_EBP);
2653
        tcg_gen_addi_tl(cpu_T[1], cpu_T[1], -esp_addend + (-opsize * level));
2654
        gen_op_mov_reg_T1(MO_16 + s->ss32, R_ESP);
B
bellard 已提交
2655 2656 2657
    }
}

B
bellard 已提交
2658
static void gen_exception(DisasContext *s, int trapno, target_ulong cur_eip)
B
bellard 已提交
2659
{
2660
    gen_update_cc_op(s);
B
bellard 已提交
2661
    gen_jmp_im(cur_eip);
B
Blue Swirl 已提交
2662
    gen_helper_raise_exception(cpu_env, tcg_const_i32(trapno));
J
Jun Koi 已提交
2663
    s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2664 2665 2666
}

/* an interrupt is different from an exception because of the
B
blueswir1 已提交
2667
   privilege checks */
2668
static void gen_interrupt(DisasContext *s, int intno,
B
bellard 已提交
2669
                          target_ulong cur_eip, target_ulong next_eip)
B
bellard 已提交
2670
{
2671
    gen_update_cc_op(s);
B
bellard 已提交
2672
    gen_jmp_im(cur_eip);
B
Blue Swirl 已提交
2673
    gen_helper_raise_interrupt(cpu_env, tcg_const_i32(intno),
P
pbrook 已提交
2674
                               tcg_const_i32(next_eip - cur_eip));
J
Jun Koi 已提交
2675
    s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2676 2677
}

B
bellard 已提交
2678
static void gen_debug(DisasContext *s, target_ulong cur_eip)
B
bellard 已提交
2679
{
2680
    gen_update_cc_op(s);
B
bellard 已提交
2681
    gen_jmp_im(cur_eip);
B
Blue Swirl 已提交
2682
    gen_helper_debug(cpu_env);
J
Jun Koi 已提交
2683
    s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2684 2685 2686 2687 2688 2689
}

/* generate a generic end of block. Trace exception is also generated
   if needed */
static void gen_eob(DisasContext *s)
{
2690
    gen_update_cc_op(s);
2691
    if (s->tb->flags & HF_INHIBIT_IRQ_MASK) {
2692
        gen_helper_reset_inhibit_irq(cpu_env);
2693
    }
J
Jan Kiszka 已提交
2694
    if (s->tb->flags & HF_RF_MASK) {
2695
        gen_helper_reset_rf(cpu_env);
J
Jan Kiszka 已提交
2696
    }
2697
    if (s->singlestep_enabled) {
B
Blue Swirl 已提交
2698
        gen_helper_debug(cpu_env);
2699
    } else if (s->tf) {
B
Blue Swirl 已提交
2700
        gen_helper_single_step(cpu_env);
B
bellard 已提交
2701
    } else {
B
bellard 已提交
2702
        tcg_gen_exit_tb(0);
B
bellard 已提交
2703
    }
J
Jun Koi 已提交
2704
    s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2705 2706 2707 2708
}

/* generate a jump to eip. No segment change must happen before as a
   direct call to the next block may occur */
B
bellard 已提交
2709
static void gen_jmp_tb(DisasContext *s, target_ulong eip, int tb_num)
B
bellard 已提交
2710
{
2711 2712
    gen_update_cc_op(s);
    set_cc_op(s, CC_OP_DYNAMIC);
B
bellard 已提交
2713
    if (s->jmp_opt) {
2714
        gen_goto_tb(s, tb_num, eip);
J
Jun Koi 已提交
2715
        s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2716
    } else {
B
bellard 已提交
2717
        gen_jmp_im(eip);
B
bellard 已提交
2718 2719 2720 2721
        gen_eob(s);
    }
}

B
bellard 已提交
2722 2723 2724 2725 2726
static void gen_jmp(DisasContext *s, target_ulong eip)
{
    gen_jmp_tb(s, eip, 0);
}

2727
static inline void gen_ldq_env_A0(DisasContext *s, int offset)
B
bellard 已提交
2728
{
2729
    tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0, s->mem_index, MO_LEQ);
2730
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, offset);
B
bellard 已提交
2731
}
B
bellard 已提交
2732

2733
static inline void gen_stq_env_A0(DisasContext *s, int offset)
B
bellard 已提交
2734
{
2735
    tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env, offset);
2736
    tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0, s->mem_index, MO_LEQ);
B
bellard 已提交
2737
}
B
bellard 已提交
2738

2739
static inline void gen_ldo_env_A0(DisasContext *s, int offset)
B
bellard 已提交
2740
{
2741
    int mem_index = s->mem_index;
2742
    tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0, mem_index, MO_LEQ);
2743
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, offset + offsetof(XMMReg, XMM_Q(0)));
B
bellard 已提交
2744
    tcg_gen_addi_tl(cpu_tmp0, cpu_A0, 8);
2745
    tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_tmp0, mem_index, MO_LEQ);
2746
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, offset + offsetof(XMMReg, XMM_Q(1)));
B
bellard 已提交
2747
}
B
bellard 已提交
2748

2749
static inline void gen_sto_env_A0(DisasContext *s, int offset)
B
bellard 已提交
2750
{
2751
    int mem_index = s->mem_index;
2752
    tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env, offset + offsetof(XMMReg, XMM_Q(0)));
2753
    tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0, mem_index, MO_LEQ);
B
bellard 已提交
2754
    tcg_gen_addi_tl(cpu_tmp0, cpu_A0, 8);
2755
    tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env, offset + offsetof(XMMReg, XMM_Q(1)));
2756
    tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_tmp0, mem_index, MO_LEQ);
B
bellard 已提交
2757
}
B
bellard 已提交
2758

B
bellard 已提交
2759 2760
static inline void gen_op_movo(int d_offset, int s_offset)
{
2761 2762 2763 2764
    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 已提交
2765 2766 2767 2768
}

static inline void gen_op_movq(int d_offset, int s_offset)
{
2769 2770
    tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env, s_offset);
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, d_offset);
B
bellard 已提交
2771 2772 2773 2774
}

static inline void gen_op_movl(int d_offset, int s_offset)
{
2775 2776
    tcg_gen_ld_i32(cpu_tmp2_i32, cpu_env, s_offset);
    tcg_gen_st_i32(cpu_tmp2_i32, cpu_env, d_offset);
B
bellard 已提交
2777 2778 2779 2780
}

static inline void gen_op_movq_env_0(int d_offset)
{
2781 2782
    tcg_gen_movi_i64(cpu_tmp1_i64, 0);
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, d_offset);
B
bellard 已提交
2783
}
B
bellard 已提交
2784

B
Blue Swirl 已提交
2785 2786 2787 2788 2789 2790 2791
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 已提交
2792
typedef void (*SSEFunc_0_ppi)(TCGv_ptr reg_a, TCGv_ptr reg_b, TCGv_i32 val);
B
Blue Swirl 已提交
2793 2794
typedef void (*SSEFunc_0_eppt)(TCGv_ptr env, TCGv_ptr reg_a, TCGv_ptr reg_b,
                               TCGv val);
B
Blue Swirl 已提交
2795

B
bellard 已提交
2796 2797
#define SSE_SPECIAL ((void *)1)
#define SSE_DUMMY ((void *)2)
B
bellard 已提交
2798

P
pbrook 已提交
2799 2800 2801
#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 已提交
2802

B
Blue Swirl 已提交
2803
static const SSEFunc_0_epp sse_op_table1[256][4] = {
A
aurel32 已提交
2804 2805 2806
    /* 3DNow! extensions */
    [0x0e] = { SSE_DUMMY }, /* femms */
    [0x0f] = { SSE_DUMMY }, /* pf... */
B
bellard 已提交
2807 2808 2809
    /* 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 已提交
2810
    [0x12] = { SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL }, /* movlps, movlpd, movsldup, movddup */
B
bellard 已提交
2811
    [0x13] = { SSE_SPECIAL, SSE_SPECIAL },  /* movlps, movlpd */
P
pbrook 已提交
2812 2813
    [0x14] = { gen_helper_punpckldq_xmm, gen_helper_punpcklqdq_xmm },
    [0x15] = { gen_helper_punpckhdq_xmm, gen_helper_punpckhqdq_xmm },
B
bellard 已提交
2814 2815 2816 2817 2818 2819
    [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 */
2820
    [0x2b] = { SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL }, /* movntps, movntpd, movntss, movntsd */
B
bellard 已提交
2821 2822
    [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 已提交
2823 2824
    [0x2e] = { gen_helper_ucomiss, gen_helper_ucomisd },
    [0x2f] = { gen_helper_comiss, gen_helper_comisd },
B
bellard 已提交
2825 2826
    [0x50] = { SSE_SPECIAL, SSE_SPECIAL }, /* movmskps, movmskpd */
    [0x51] = SSE_FOP(sqrt),
P
pbrook 已提交
2827 2828 2829 2830 2831 2832
    [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 已提交
2833 2834
    [0x58] = SSE_FOP(add),
    [0x59] = SSE_FOP(mul),
P
pbrook 已提交
2835 2836 2837
    [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 已提交
2838 2839 2840 2841 2842 2843
    [0x5c] = SSE_FOP(sub),
    [0x5d] = SSE_FOP(min),
    [0x5e] = SSE_FOP(div),
    [0x5f] = SSE_FOP(max),

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

R
Richard Henderson 已提交
2847 2848 2849
    /* 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 已提交
2850

B
bellard 已提交
2851 2852 2853 2854 2855 2856 2857 2858 2859 2860 2861 2862 2863
    /* 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 已提交
2864 2865
    [0x6c] = { NULL, gen_helper_punpcklqdq_xmm },
    [0x6d] = { NULL, gen_helper_punpckhqdq_xmm },
B
bellard 已提交
2866 2867
    [0x6e] = { SSE_SPECIAL, SSE_SPECIAL }, /* movd mm, ea */
    [0x6f] = { SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL }, /* movq, movdqa, , movqdu */
B
Blue Swirl 已提交
2868 2869 2870 2871
    [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 已提交
2872 2873 2874 2875 2876 2877
    [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 已提交
2878
    [0x77] = { SSE_DUMMY }, /* emms */
2879 2880
    [0x78] = { NULL, SSE_SPECIAL, NULL, SSE_SPECIAL }, /* extrq_i, insertq_i */
    [0x79] = { NULL, gen_helper_extrq_r, NULL, gen_helper_insertq_r },
P
pbrook 已提交
2881 2882
    [0x7c] = { NULL, gen_helper_haddpd, NULL, gen_helper_haddps },
    [0x7d] = { NULL, gen_helper_hsubpd, NULL, gen_helper_hsubps },
B
bellard 已提交
2883 2884 2885 2886
    [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 已提交
2887
    [0xd0] = { NULL, gen_helper_addsubpd, NULL, gen_helper_addsubps },
B
bellard 已提交
2888 2889 2890 2891 2892 2893 2894 2895 2896 2897 2898 2899 2900 2901 2902 2903 2904 2905 2906 2907 2908
    [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 已提交
2909
    [0xe6] = { NULL, gen_helper_cvttpd2dq, gen_helper_cvtdq2pd, gen_helper_cvtpd2dq },
B
bellard 已提交
2910 2911 2912 2913 2914 2915 2916 2917 2918
    [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 已提交
2919
    [0xf0] = { NULL, NULL, NULL, SSE_SPECIAL }, /* lddqu */
B
bellard 已提交
2920 2921 2922 2923 2924 2925
    [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 已提交
2926 2927
    [0xf7] = { (SSEFunc_0_epp)gen_helper_maskmov_mmx,
               (SSEFunc_0_epp)gen_helper_maskmov_xmm }, /* XXX: casts */
B
bellard 已提交
2928 2929 2930 2931 2932 2933 2934 2935 2936
    [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 已提交
2937
static const SSEFunc_0_epp sse_op_table2[3 * 8][2] = {
B
bellard 已提交
2938 2939 2940 2941 2942 2943 2944
    [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 已提交
2945
    [16 + 3] = { NULL, gen_helper_psrldq_xmm },
B
bellard 已提交
2946
    [16 + 6] = MMX_OP2(psllq),
P
pbrook 已提交
2947
    [16 + 7] = { NULL, gen_helper_pslldq_xmm },
B
bellard 已提交
2948 2949
};

B
Blue Swirl 已提交
2950
static const SSEFunc_0_epi sse_op_table3ai[] = {
P
pbrook 已提交
2951
    gen_helper_cvtsi2ss,
2952
    gen_helper_cvtsi2sd
B
Blue Swirl 已提交
2953
};
P
pbrook 已提交
2954

2955
#ifdef TARGET_X86_64
B
Blue Swirl 已提交
2956
static const SSEFunc_0_epl sse_op_table3aq[] = {
2957 2958 2959 2960 2961
    gen_helper_cvtsq2ss,
    gen_helper_cvtsq2sd
};
#endif

B
Blue Swirl 已提交
2962
static const SSEFunc_i_ep sse_op_table3bi[] = {
P
pbrook 已提交
2963 2964
    gen_helper_cvttss2si,
    gen_helper_cvtss2si,
2965
    gen_helper_cvttsd2si,
2966
    gen_helper_cvtsd2si
B
bellard 已提交
2967
};
2968

2969
#ifdef TARGET_X86_64
B
Blue Swirl 已提交
2970
static const SSEFunc_l_ep sse_op_table3bq[] = {
2971 2972
    gen_helper_cvttss2sq,
    gen_helper_cvtss2sq,
2973
    gen_helper_cvttsd2sq,
2974 2975 2976 2977
    gen_helper_cvtsd2sq
};
#endif

B
Blue Swirl 已提交
2978
static const SSEFunc_0_epp sse_op_table4[8][4] = {
B
bellard 已提交
2979 2980 2981 2982 2983 2984 2985 2986 2987
    SSE_FOP(cmpeq),
    SSE_FOP(cmplt),
    SSE_FOP(cmple),
    SSE_FOP(cmpunord),
    SSE_FOP(cmpneq),
    SSE_FOP(cmpnlt),
    SSE_FOP(cmpnle),
    SSE_FOP(cmpord),
};
2988

B
Blue Swirl 已提交
2989
static const SSEFunc_0_epp sse_op_table5[256] = {
P
pbrook 已提交
2990 2991 2992 2993 2994 2995 2996 2997 2998 2999 3000 3001 3002 3003 3004 3005 3006 3007 3008 3009 3010 3011 3012 3013
    [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 已提交
3014 3015
};

B
Blue Swirl 已提交
3016 3017
struct SSEOpHelper_epp {
    SSEFunc_0_epp op[2];
B
Blue Swirl 已提交
3018 3019 3020
    uint32_t ext_mask;
};

B
Blue Swirl 已提交
3021 3022
struct SSEOpHelper_eppi {
    SSEFunc_0_eppi op[2];
B
Blue Swirl 已提交
3023
    uint32_t ext_mask;
B
balrog 已提交
3024
};
B
Blue Swirl 已提交
3025

B
balrog 已提交
3026
#define SSSE3_OP(x) { MMX_OP2(x), CPUID_EXT_SSSE3 }
P
pbrook 已提交
3027 3028
#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 已提交
3029
#define SSE41_SPECIAL { { NULL, SSE_SPECIAL }, CPUID_EXT_SSE41 }
3030 3031
#define PCLMULQDQ_OP(x) { { NULL, gen_helper_ ## x ## _xmm }, \
        CPUID_EXT_PCLMULQDQ }
3032
#define AESNI_OP(x) { { NULL, gen_helper_ ## x ## _xmm }, CPUID_EXT_AES }
B
Blue Swirl 已提交
3033

B
Blue Swirl 已提交
3034
static const struct SSEOpHelper_epp sse_op_table6[256] = {
B
balrog 已提交
3035 3036 3037 3038 3039 3040 3041 3042 3043 3044 3045 3046 3047 3048 3049 3050 3051 3052 3053 3054 3055 3056 3057 3058 3059 3060 3061 3062 3063 3064 3065 3066 3067 3068 3069 3070 3071 3072 3073 3074 3075 3076 3077 3078 3079 3080
    [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),
3081 3082 3083 3084 3085
    [0xdb] = AESNI_OP(aesimc),
    [0xdc] = AESNI_OP(aesenc),
    [0xdd] = AESNI_OP(aesenclast),
    [0xde] = AESNI_OP(aesdec),
    [0xdf] = AESNI_OP(aesdeclast),
B
balrog 已提交
3086 3087
};

B
Blue Swirl 已提交
3088
static const struct SSEOpHelper_eppi sse_op_table7[256] = {
B
balrog 已提交
3089 3090 3091 3092 3093 3094 3095 3096 3097 3098 3099 3100 3101 3102 3103 3104 3105 3106
    [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),
3107
    [0x44] = PCLMULQDQ_OP(pclmulqdq),
B
balrog 已提交
3108 3109 3110 3111
    [0x60] = SSE42_OP(pcmpestrm),
    [0x61] = SSE42_OP(pcmpestri),
    [0x62] = SSE42_OP(pcmpistrm),
    [0x63] = SSE42_OP(pcmpistri),
3112
    [0xdf] = AESNI_OP(aeskeygenassist),
B
balrog 已提交
3113 3114
};

3115 3116
static void gen_sse(CPUX86State *env, DisasContext *s, int b,
                    target_ulong pc_start, int rex_r)
B
bellard 已提交
3117 3118 3119
{
    int b1, op1_offset, op2_offset, is_xmm, val, ot;
    int modrm, mod, rm, reg, reg_addr, offset_addr;
B
Blue Swirl 已提交
3120 3121
    SSEFunc_0_epp sse_fn_epp;
    SSEFunc_0_eppi sse_fn_eppi;
B
Blue Swirl 已提交
3122
    SSEFunc_0_ppi sse_fn_ppi;
B
Blue Swirl 已提交
3123
    SSEFunc_0_eppt sse_fn_eppt;
B
bellard 已提交
3124 3125

    b &= 0xff;
3126
    if (s->prefix & PREFIX_DATA)
B
bellard 已提交
3127
        b1 = 1;
3128
    else if (s->prefix & PREFIX_REPZ)
B
bellard 已提交
3129
        b1 = 2;
3130
    else if (s->prefix & PREFIX_REPNZ)
B
bellard 已提交
3131 3132 3133
        b1 = 3;
    else
        b1 = 0;
B
Blue Swirl 已提交
3134 3135
    sse_fn_epp = sse_op_table1[b][b1];
    if (!sse_fn_epp) {
B
bellard 已提交
3136
        goto illegal_op;
B
Blue Swirl 已提交
3137
    }
A
aurel32 已提交
3138
    if ((b <= 0x5f && b >= 0x10) || b == 0xc6 || b == 0xc2) {
B
bellard 已提交
3139 3140 3141 3142 3143 3144 3145 3146 3147 3148 3149 3150 3151 3152 3153 3154 3155 3156 3157 3158
        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 已提交
3159 3160
        if ((b != 0x38 && b != 0x3a) || (s->prefix & PREFIX_DATA))
            goto illegal_op;
3161 3162 3163 3164
    if (b == 0x0e) {
        if (!(s->cpuid_ext2_features & CPUID_EXT2_3DNOW))
            goto illegal_op;
        /* femms */
B
Blue Swirl 已提交
3165
        gen_helper_emms(cpu_env);
3166 3167 3168 3169
        return;
    }
    if (b == 0x77) {
        /* emms */
B
Blue Swirl 已提交
3170
        gen_helper_emms(cpu_env);
B
bellard 已提交
3171 3172 3173 3174 3175
        return;
    }
    /* prepare MMX state (XXX: optimize by storing fptt and fptags in
       the static cpu state) */
    if (!is_xmm) {
B
Blue Swirl 已提交
3176
        gen_helper_enter_mmx(cpu_env);
B
bellard 已提交
3177 3178
    }

3179
    modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
3180 3181 3182 3183
    reg = ((modrm >> 3) & 7);
    if (is_xmm)
        reg |= rex_r;
    mod = (modrm >> 6) & 3;
B
Blue Swirl 已提交
3184
    if (sse_fn_epp == SSE_SPECIAL) {
B
bellard 已提交
3185 3186 3187
        b |= (b1 << 8);
        switch(b) {
        case 0x0e7: /* movntq */
3188
            if (mod == 3)
B
bellard 已提交
3189
                goto illegal_op;
3190
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3191
            gen_stq_env_A0(s, offsetof(CPUX86State, fpregs[reg].mmx));
B
bellard 已提交
3192 3193 3194 3195
            break;
        case 0x1e7: /* movntdq */
        case 0x02b: /* movntps */
        case 0x12b: /* movntps */
3196 3197
            if (mod == 3)
                goto illegal_op;
3198
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3199
            gen_sto_env_A0(s, offsetof(CPUX86State, xmm_regs[reg]));
3200
            break;
B
bellard 已提交
3201 3202
        case 0x3f0: /* lddqu */
            if (mod == 3)
B
bellard 已提交
3203
                goto illegal_op;
3204
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3205
            gen_ldo_env_A0(s, offsetof(CPUX86State, xmm_regs[reg]));
B
bellard 已提交
3206
            break;
3207 3208 3209 3210
        case 0x22b: /* movntss */
        case 0x32b: /* movntsd */
            if (mod == 3)
                goto illegal_op;
3211
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3212
            if (b1 & 1) {
3213
                gen_stq_env_A0(s, offsetof(CPUX86State, xmm_regs[reg]));
3214 3215 3216
            } else {
                tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,
                    xmm_regs[reg].XMM_L(0)));
3217
                gen_op_st_v(s, MO_32, cpu_T[0], cpu_A0);
3218 3219
            }
            break;
B
bellard 已提交
3220
        case 0x6e: /* movd mm, ea */
B
bellard 已提交
3221 3222
#ifdef TARGET_X86_64
            if (s->dflag == 2) {
3223
                gen_ldst_modrm(env, s, modrm, MO_64, OR_TMP0, 0);
B
bellard 已提交
3224
                tcg_gen_st_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,fpregs[reg].mmx));
3225
            } else
B
bellard 已提交
3226 3227
#endif
            {
3228
                gen_ldst_modrm(env, s, modrm, MO_32, OR_TMP0, 0);
B
bellard 已提交
3229 3230
                tcg_gen_addi_ptr(cpu_ptr0, cpu_env, 
                                 offsetof(CPUX86State,fpregs[reg].mmx));
P
pbrook 已提交
3231 3232
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
                gen_helper_movl_mm_T0_mmx(cpu_ptr0, cpu_tmp2_i32);
B
bellard 已提交
3233
            }
B
bellard 已提交
3234 3235
            break;
        case 0x16e: /* movd xmm, ea */
B
bellard 已提交
3236 3237
#ifdef TARGET_X86_64
            if (s->dflag == 2) {
3238
                gen_ldst_modrm(env, s, modrm, MO_64, OR_TMP0, 0);
B
bellard 已提交
3239 3240
                tcg_gen_addi_ptr(cpu_ptr0, cpu_env, 
                                 offsetof(CPUX86State,xmm_regs[reg]));
P
pbrook 已提交
3241
                gen_helper_movq_mm_T0_xmm(cpu_ptr0, cpu_T[0]);
3242
            } else
B
bellard 已提交
3243 3244
#endif
            {
3245
                gen_ldst_modrm(env, s, modrm, MO_32, OR_TMP0, 0);
B
bellard 已提交
3246 3247
                tcg_gen_addi_ptr(cpu_ptr0, cpu_env, 
                                 offsetof(CPUX86State,xmm_regs[reg]));
3248
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
P
pbrook 已提交
3249
                gen_helper_movl_mm_T0_xmm(cpu_ptr0, cpu_tmp2_i32);
B
bellard 已提交
3250
            }
B
bellard 已提交
3251 3252 3253
            break;
        case 0x6f: /* movq mm, ea */
            if (mod != 3) {
3254
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3255
                gen_ldq_env_A0(s, offsetof(CPUX86State, fpregs[reg].mmx));
B
bellard 已提交
3256 3257
            } else {
                rm = (modrm & 7);
3258
                tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env,
B
bellard 已提交
3259
                               offsetof(CPUX86State,fpregs[rm].mmx));
3260
                tcg_gen_st_i64(cpu_tmp1_i64, cpu_env,
B
bellard 已提交
3261
                               offsetof(CPUX86State,fpregs[reg].mmx));
B
bellard 已提交
3262 3263 3264 3265 3266 3267 3268 3269 3270
            }
            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) {
3271
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3272
                gen_ldo_env_A0(s, offsetof(CPUX86State, xmm_regs[reg]));
B
bellard 已提交
3273 3274 3275 3276 3277 3278 3279 3280
            } 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) {
3281
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3282
                gen_op_ld_v(s, MO_32, cpu_T[0], cpu_A0);
B
bellard 已提交
3283
                tcg_gen_st32_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,xmm_regs[reg].XMM_L(0)));
B
bellard 已提交
3284
                gen_op_movl_T0_0();
B
bellard 已提交
3285 3286 3287
                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 已提交
3288 3289 3290 3291 3292 3293 3294 3295
            } 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) {
3296
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3297 3298
                gen_ldq_env_A0(s, offsetof(CPUX86State,
                                           xmm_regs[reg].XMM_Q(0)));
B
bellard 已提交
3299
                gen_op_movl_T0_0();
B
bellard 已提交
3300 3301
                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 已提交
3302 3303 3304 3305 3306 3307 3308 3309 3310
            } 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) {
3311
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3312 3313
                gen_ldq_env_A0(s, offsetof(CPUX86State,
                                           xmm_regs[reg].XMM_Q(0)));
B
bellard 已提交
3314 3315 3316 3317 3318 3319 3320
            } 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 已提交
3321 3322
        case 0x212: /* movsldup */
            if (mod != 3) {
3323
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3324
                gen_ldo_env_A0(s, offsetof(CPUX86State, xmm_regs[reg]));
B
bellard 已提交
3325 3326 3327 3328 3329 3330 3331 3332 3333 3334 3335 3336 3337 3338
            } 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) {
3339
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3340 3341
                gen_ldq_env_A0(s, offsetof(CPUX86State,
                                           xmm_regs[reg].XMM_Q(0)));
B
bellard 已提交
3342 3343 3344 3345 3346 3347
            } 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 已提交
3348
                        offsetof(CPUX86State,xmm_regs[reg].XMM_Q(0)));
B
bellard 已提交
3349
            break;
B
bellard 已提交
3350 3351 3352
        case 0x016: /* movhps */
        case 0x116: /* movhpd */
            if (mod != 3) {
3353
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3354 3355
                gen_ldq_env_A0(s, offsetof(CPUX86State,
                                           xmm_regs[reg].XMM_Q(1)));
B
bellard 已提交
3356 3357 3358 3359 3360 3361 3362 3363 3364
            } 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) {
3365
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3366
                gen_ldo_env_A0(s, offsetof(CPUX86State, xmm_regs[reg]));
B
bellard 已提交
3367 3368 3369 3370 3371 3372 3373 3374 3375 3376 3377 3378
            } 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;
3379 3380 3381 3382 3383 3384 3385
        case 0x178:
        case 0x378:
            {
                int bit_index, field_length;

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

B
balrog 已提交
3749
        case 0x138:
3750
        case 0x038:
B
balrog 已提交
3751
            b = modrm;
R
Richard Henderson 已提交
3752 3753 3754
            if ((b & 0xf0) == 0xf0) {
                goto do_0f_38_fx;
            }
3755
            modrm = cpu_ldub_code(env, s->pc++);
B
balrog 已提交
3756 3757 3758
            rm = modrm & 7;
            reg = ((modrm >> 3) & 7) | rex_r;
            mod = (modrm >> 6) & 3;
3759 3760 3761
            if (b1 >= 2) {
                goto illegal_op;
            }
B
balrog 已提交
3762

B
Blue Swirl 已提交
3763 3764
            sse_fn_epp = sse_op_table6[b].op[b1];
            if (!sse_fn_epp) {
B
balrog 已提交
3765
                goto illegal_op;
B
Blue Swirl 已提交
3766
            }
B
balrog 已提交
3767 3768
            if (!(s->cpuid_ext_features & sse_op_table6[b].ext_mask))
                goto illegal_op;
B
balrog 已提交
3769 3770 3771 3772 3773 3774 3775

            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);
3776
                    gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
balrog 已提交
3777 3778 3779 3780
                    switch (b) {
                    case 0x20: case 0x30: /* pmovsxbw, pmovzxbw */
                    case 0x23: case 0x33: /* pmovsxwd, pmovzxwd */
                    case 0x25: case 0x35: /* pmovsxdq, pmovzxdq */
3781
                        gen_ldq_env_A0(s, op2_offset +
B
balrog 已提交
3782 3783 3784 3785
                                        offsetof(XMMReg, XMM_Q(0)));
                        break;
                    case 0x21: case 0x31: /* pmovsxbd, pmovzxbd */
                    case 0x24: case 0x34: /* pmovsxwq, pmovzxwq */
3786 3787
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
B
balrog 已提交
3788 3789 3790 3791
                        tcg_gen_st_i32(cpu_tmp2_i32, cpu_env, op2_offset +
                                        offsetof(XMMReg, XMM_L(0)));
                        break;
                    case 0x22: case 0x32: /* pmovsxbq, pmovzxbq */
3792 3793
                        tcg_gen_qemu_ld_tl(cpu_tmp0, cpu_A0,
                                           s->mem_index, MO_LEUW);
B
balrog 已提交
3794 3795 3796 3797
                        tcg_gen_st16_tl(cpu_tmp0, cpu_env, op2_offset +
                                        offsetof(XMMReg, XMM_W(0)));
                        break;
                    case 0x2a:            /* movntqda */
3798
                        gen_ldo_env_A0(s, op1_offset);
B
balrog 已提交
3799 3800
                        return;
                    default:
3801
                        gen_ldo_env_A0(s, op2_offset);
B
balrog 已提交
3802
                    }
B
balrog 已提交
3803 3804 3805 3806 3807 3808 3809
                }
            } 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);
3810
                    gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
3811
                    gen_ldq_env_A0(s, op2_offset);
B
balrog 已提交
3812 3813
                }
            }
B
Blue Swirl 已提交
3814
            if (sse_fn_epp == SSE_SPECIAL) {
B
balrog 已提交
3815
                goto illegal_op;
B
Blue Swirl 已提交
3816
            }
B
balrog 已提交
3817

B
balrog 已提交
3818 3819
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
3820
            sse_fn_epp(cpu_env, cpu_ptr0, cpu_ptr1);
B
balrog 已提交
3821

3822 3823 3824
            if (b == 0x17) {
                set_cc_op(s, CC_OP_EFLAGS);
            }
B
balrog 已提交
3825
            break;
R
Richard Henderson 已提交
3826 3827 3828 3829 3830 3831

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

R
Richard Henderson 已提交
3835 3836 3837 3838 3839 3840 3841 3842
            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) {
3843
                    ot = MO_8;
R
Richard Henderson 已提交
3844
                } else if (s->dflag != 2) {
3845
                    ot = (s->prefix & PREFIX_DATA ? MO_16 : MO_32);
R
Richard Henderson 已提交
3846
                } else {
3847
                    ot = MO_64;
R
Richard Henderson 已提交
3848
                }
B
balrog 已提交
3849

3850
                gen_op_mov_TN_reg(MO_32, 0, reg);
R
Richard Henderson 已提交
3851 3852 3853 3854
                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 已提交
3855

3856
                ot = (s->dflag == 2) ? MO_64 : MO_32;
R
Richard Henderson 已提交
3857 3858
                gen_op_mov_reg_T0(ot, reg);
                break;
B
balrog 已提交
3859

R
Richard Henderson 已提交
3860 3861 3862 3863 3864 3865 3866 3867 3868 3869 3870 3871 3872 3873 3874
            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) {
3875
                    ot = (s->prefix & PREFIX_DATA ? MO_16 : MO_32);
R
Richard Henderson 已提交
3876
                } else {
3877
                    ot = MO_64;
R
Richard Henderson 已提交
3878 3879 3880 3881 3882 3883 3884 3885 3886 3887
                }

                /* 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) {
3888
                    case MO_16:
R
Richard Henderson 已提交
3889 3890 3891 3892 3893
                        tcg_gen_ext16u_tl(cpu_T[0], cpu_regs[reg]);
                        break;
                    default:
                        tcg_gen_ext32u_tl(cpu_T[0], cpu_regs[reg]);
                        break;
3894
                    case MO_64:
R
Richard Henderson 已提交
3895 3896 3897 3898 3899 3900
                        tcg_gen_mov_tl(cpu_T[0], cpu_regs[reg]);
                        break;
                    }
                }

                switch (ot) {
3901
                case MO_16:
R
Richard Henderson 已提交
3902 3903 3904 3905 3906 3907
                    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
3908
                case MO_64:
R
Richard Henderson 已提交
3909 3910 3911 3912 3913 3914 3915 3916 3917 3918 3919 3920
                    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 已提交
3921 3922 3923 3924 3925 3926
            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;
                }
3927
                ot = s->dflag == 2 ? MO_64 : MO_32;
R
Richard Henderson 已提交
3928 3929 3930 3931 3932 3933 3934
                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 已提交
3935 3936 3937 3938 3939 3940
            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;
                }
3941
                ot = s->dflag == 2 ? MO_64 : MO_32;
R
Richard Henderson 已提交
3942 3943 3944 3945 3946 3947 3948 3949 3950
                {
                    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);

3951
                    bound = tcg_const_tl(ot == MO_64 ? 63 : 31);
R
Richard Henderson 已提交
3952 3953 3954 3955 3956 3957 3958 3959 3960 3961 3962 3963 3964 3965 3966 3967 3968 3969 3970 3971 3972 3973 3974
                    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 已提交
3975 3976 3977 3978 3979 3980
            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;
                }
3981
                ot = s->dflag == 2 ? MO_64 : MO_32;
R
Richard Henderson 已提交
3982 3983 3984
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
                tcg_gen_ext8u_tl(cpu_T[1], cpu_regs[s->vex_v]);
                {
3985
                    TCGv bound = tcg_const_tl(ot == MO_64 ? 63 : 31);
R
Richard Henderson 已提交
3986 3987 3988 3989 3990 3991 3992 3993 3994 3995 3996 3997 3998 3999 4000 4001
                    /* 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 已提交
4002 4003 4004 4005 4006 4007
            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;
                }
4008
                ot = s->dflag == 2 ? MO_64 : MO_32;
R
Richard Henderson 已提交
4009 4010 4011
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
                switch (ot) {
                default:
4012 4013 4014 4015 4016 4017
                    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 已提交
4018 4019
                    break;
#ifdef TARGET_X86_64
4020
                case MO_64:
4021 4022
                    tcg_gen_mulu2_i64(cpu_regs[s->vex_v], cpu_regs[reg],
                                      cpu_T[0], cpu_regs[R_EDX]);
R
Richard Henderson 已提交
4023 4024 4025 4026 4027
                    break;
#endif
                }
                break;

4028 4029 4030 4031 4032 4033
            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;
                }
4034
                ot = s->dflag == 2 ? MO_64 : MO_32;
4035 4036 4037 4038 4039 4040 4041 4042 4043 4044 4045 4046 4047 4048 4049 4050 4051
                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;
                }
4052
                ot = s->dflag == 2 ? MO_64 : MO_32;
4053 4054 4055 4056 4057 4058 4059 4060 4061 4062 4063
                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;

4064 4065 4066 4067 4068
            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 {
4069
                    TCGv carry_in, carry_out, zero;
4070 4071
                    int end_op;

4072
                    ot = (s->dflag == 2 ? MO_64 : MO_32);
4073 4074 4075 4076 4077 4078 4079 4080 4081 4082 4083 4084 4085 4086 4087 4088 4089 4090 4091 4092 4093 4094 4095 4096 4097 4098 4099
                    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:
4100
                        end_op = (b == 0x1f6 ? CC_OP_ADCX : CC_OP_ADOX);
4101 4102 4103 4104 4105 4106 4107 4108 4109 4110 4111 4112 4113 4114 4115
                        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
4116
                    case MO_32:
4117 4118 4119 4120 4121 4122 4123 4124 4125 4126 4127 4128
                        /* 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.  */
4129 4130 4131 4132 4133 4134 4135 4136
                        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);
4137 4138 4139 4140 4141 4142
                        break;
                    }
                    set_cc_op(s, end_op);
                }
                break;

4143 4144 4145 4146 4147 4148 4149 4150
            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;
                }
4151
                ot = (s->dflag == 2 ? MO_64 : MO_32);
4152
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
4153
                if (ot == MO_64) {
4154 4155 4156 4157 4158 4159 4160
                    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) {
4161
                    if (ot != MO_64) {
4162 4163 4164 4165
                        tcg_gen_ext32s_tl(cpu_T[0], cpu_T[0]);
                    }
                    tcg_gen_sar_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
                } else {
4166
                    if (ot != MO_64) {
4167 4168 4169 4170 4171 4172 4173
                        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;

4174 4175 4176 4177 4178 4179 4180 4181 4182
            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;
                }
4183
                ot = s->dflag == 2 ? MO_64 : MO_32;
4184 4185 4186 4187 4188 4189 4190 4191 4192 4193 4194 4195 4196 4197 4198 4199 4200 4201 4202 4203 4204 4205 4206 4207 4208 4209 4210 4211 4212 4213 4214 4215
                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 已提交
4216 4217 4218
            default:
                goto illegal_op;
            }
B
balrog 已提交
4219
            break;
R
Richard Henderson 已提交
4220

B
balrog 已提交
4221 4222
        case 0x03a:
        case 0x13a:
B
balrog 已提交
4223
            b = modrm;
4224
            modrm = cpu_ldub_code(env, s->pc++);
B
balrog 已提交
4225 4226 4227
            rm = modrm & 7;
            reg = ((modrm >> 3) & 7) | rex_r;
            mod = (modrm >> 6) & 3;
4228 4229 4230
            if (b1 >= 2) {
                goto illegal_op;
            }
B
balrog 已提交
4231

B
Blue Swirl 已提交
4232 4233
            sse_fn_eppi = sse_op_table7[b].op[b1];
            if (!sse_fn_eppi) {
B
balrog 已提交
4234
                goto illegal_op;
B
Blue Swirl 已提交
4235
            }
B
balrog 已提交
4236 4237 4238
            if (!(s->cpuid_ext_features & sse_op_table7[b].ext_mask))
                goto illegal_op;

B
Blue Swirl 已提交
4239
            if (sse_fn_eppi == SSE_SPECIAL) {
4240
                ot = (s->dflag == 2) ? MO_64 : MO_32;
B
balrog 已提交
4241 4242
                rm = (modrm & 7) | REX_B(s);
                if (mod != 3)
4243
                    gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
balrog 已提交
4244
                reg = ((modrm >> 3) & 7) | rex_r;
4245
                val = cpu_ldub_code(env, s->pc++);
B
balrog 已提交
4246 4247 4248 4249
                switch (b) {
                case 0x14: /* pextrb */
                    tcg_gen_ld8u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,
                                            xmm_regs[reg].XMM_B(val & 15)));
4250
                    if (mod == 3) {
B
balrog 已提交
4251
                        gen_op_mov_reg_T0(ot, rm);
4252 4253 4254 4255
                    } else {
                        tcg_gen_qemu_st_tl(cpu_T[0], cpu_A0,
                                           s->mem_index, MO_UB);
                    }
B
balrog 已提交
4256 4257 4258 4259
                    break;
                case 0x15: /* pextrw */
                    tcg_gen_ld16u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,
                                            xmm_regs[reg].XMM_W(val & 7)));
4260
                    if (mod == 3) {
B
balrog 已提交
4261
                        gen_op_mov_reg_T0(ot, rm);
4262 4263 4264 4265
                    } else {
                        tcg_gen_qemu_st_tl(cpu_T[0], cpu_A0,
                                           s->mem_index, MO_LEUW);
                    }
B
balrog 已提交
4266 4267
                    break;
                case 0x16:
4268
                    if (ot == MO_32) { /* pextrd */
B
balrog 已提交
4269 4270 4271
                        tcg_gen_ld_i32(cpu_tmp2_i32, cpu_env,
                                        offsetof(CPUX86State,
                                                xmm_regs[reg].XMM_L(val & 3)));
P
pbrook 已提交
4272
                        tcg_gen_extu_i32_tl(cpu_T[0], cpu_tmp2_i32);
4273
                        if (mod == 3) {
P
pbrook 已提交
4274
                            gen_op_mov_reg_v(ot, rm, cpu_T[0]);
4275 4276 4277 4278
                        } else {
                            tcg_gen_qemu_st_tl(cpu_T[0], cpu_A0,
                                               s->mem_index, MO_LEUL);
                        }
B
balrog 已提交
4279
                    } else { /* pextrq */
P
pbrook 已提交
4280
#ifdef TARGET_X86_64
B
balrog 已提交
4281 4282 4283
                        tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env,
                                        offsetof(CPUX86State,
                                                xmm_regs[reg].XMM_Q(val & 1)));
4284
                        if (mod == 3) {
B
balrog 已提交
4285
                            gen_op_mov_reg_v(ot, rm, cpu_tmp1_i64);
4286 4287 4288 4289
                        } else {
                            tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0,
                                                s->mem_index, MO_LEQ);
                        }
P
pbrook 已提交
4290 4291 4292
#else
                        goto illegal_op;
#endif
B
balrog 已提交
4293 4294 4295 4296 4297
                    }
                    break;
                case 0x17: /* extractps */
                    tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,
                                            xmm_regs[reg].XMM_L(val & 3)));
4298
                    if (mod == 3) {
B
balrog 已提交
4299
                        gen_op_mov_reg_T0(ot, rm);
4300 4301 4302 4303
                    } else {
                        tcg_gen_qemu_st_tl(cpu_T[0], cpu_A0,
                                           s->mem_index, MO_LEUL);
                    }
B
balrog 已提交
4304 4305
                    break;
                case 0x20: /* pinsrb */
4306
                    if (mod == 3) {
4307
                        gen_op_mov_TN_reg(MO_32, 0, rm);
4308 4309 4310 4311
                    } else {
                        tcg_gen_qemu_ld_tl(cpu_T[0], cpu_A0,
                                           s->mem_index, MO_UB);
                    }
4312
                    tcg_gen_st8_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,
B
balrog 已提交
4313 4314 4315
                                            xmm_regs[reg].XMM_B(val & 15)));
                    break;
                case 0x21: /* insertps */
P
pbrook 已提交
4316
                    if (mod == 3) {
B
balrog 已提交
4317 4318 4319
                        tcg_gen_ld_i32(cpu_tmp2_i32, cpu_env,
                                        offsetof(CPUX86State,xmm_regs[rm]
                                                .XMM_L((val >> 6) & 3)));
P
pbrook 已提交
4320
                    } else {
4321 4322
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
P
pbrook 已提交
4323
                    }
B
balrog 已提交
4324 4325 4326 4327 4328 4329 4330 4331 4332 4333 4334 4335 4336 4337 4338 4339 4340 4341 4342 4343 4344
                    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:
4345
                    if (ot == MO_32) { /* pinsrd */
4346
                        if (mod == 3) {
P
pbrook 已提交
4347
                            gen_op_mov_v_reg(ot, cpu_tmp0, rm);
4348 4349 4350 4351
                        } else {
                            tcg_gen_qemu_ld_tl(cpu_tmp0, cpu_A0,
                                               s->mem_index, MO_LEUL);
                        }
P
pbrook 已提交
4352
                        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_tmp0);
B
balrog 已提交
4353 4354 4355 4356
                        tcg_gen_st_i32(cpu_tmp2_i32, cpu_env,
                                        offsetof(CPUX86State,
                                                xmm_regs[reg].XMM_L(val & 3)));
                    } else { /* pinsrq */
P
pbrook 已提交
4357
#ifdef TARGET_X86_64
4358
                        if (mod == 3) {
B
balrog 已提交
4359
                            gen_op_mov_v_reg(ot, cpu_tmp1_i64, rm);
4360 4361 4362 4363
                        } else {
                            tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0,
                                                s->mem_index, MO_LEQ);
                        }
B
balrog 已提交
4364 4365 4366
                        tcg_gen_st_i64(cpu_tmp1_i64, cpu_env,
                                        offsetof(CPUX86State,
                                                xmm_regs[reg].XMM_Q(val & 1)));
P
pbrook 已提交
4367 4368 4369
#else
                        goto illegal_op;
#endif
B
balrog 已提交
4370 4371 4372 4373 4374
                    }
                    break;
                }
                return;
            }
B
balrog 已提交
4375 4376 4377 4378 4379 4380 4381

            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);
4382
                    gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
4383
                    gen_ldo_env_A0(s, op2_offset);
B
balrog 已提交
4384 4385 4386 4387 4388 4389 4390
                }
            } 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);
4391
                    gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
4392
                    gen_ldq_env_A0(s, op2_offset);
B
balrog 已提交
4393 4394
                }
            }
4395
            val = cpu_ldub_code(env, s->pc++);
B
balrog 已提交
4396

B
balrog 已提交
4397
            if ((b & 0xfc) == 0x60) { /* pcmpXstrX */
4398
                set_cc_op(s, CC_OP_EFLAGS);
B
balrog 已提交
4399 4400 4401 4402 4403 4404

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

B
balrog 已提交
4405 4406
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
4407
            sse_fn_eppi(cpu_env, cpu_ptr0, cpu_ptr1, tcg_const_i32(val));
B
balrog 已提交
4408
            break;
R
Richard Henderson 已提交
4409 4410 4411 4412 4413 4414 4415 4416 4417 4418 4419 4420 4421 4422

        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;
                }
4423
                ot = s->dflag == 2 ? MO_64 : MO_32;
R
Richard Henderson 已提交
4424 4425
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
                b = cpu_ldub_code(env, s->pc++);
4426
                if (ot == MO_64) {
R
Richard Henderson 已提交
4427 4428 4429 4430 4431 4432 4433 4434 4435 4436 4437 4438 4439 4440
                    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 已提交
4441 4442 4443 4444 4445
        default:
            goto illegal_op;
        }
    } else {
        /* generic MMX or SSE operation */
B
bellard 已提交
4446 4447 4448 4449 4450 4451 4452 4453
        switch(b) {
        case 0x70: /* pshufx insn */
        case 0xc6: /* pshufx insn */
        case 0xc2: /* compare insns */
            s->rip_offset = 1;
            break;
        default:
            break;
B
bellard 已提交
4454 4455 4456 4457
        }
        if (is_xmm) {
            op1_offset = offsetof(CPUX86State,xmm_regs[reg]);
            if (mod != 3) {
4458
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
4459
                op2_offset = offsetof(CPUX86State,xmm_t0);
4460
                if (b1 >= 2 && ((b >= 0x50 && b <= 0x5f && b != 0x5b) ||
B
bellard 已提交
4461 4462 4463 4464
                                b == 0xc2)) {
                    /* specific case for SSE single instructions */
                    if (b1 == 2) {
                        /* 32 bit access */
4465
                        gen_op_ld_v(s, MO_32, cpu_T[0], cpu_A0);
B
bellard 已提交
4466
                        tcg_gen_st32_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,xmm_t0.XMM_L(0)));
B
bellard 已提交
4467 4468
                    } else {
                        /* 64 bit access */
4469 4470
                        gen_ldq_env_A0(s, offsetof(CPUX86State,
                                                   xmm_t0.XMM_D(0)));
B
bellard 已提交
4471 4472
                    }
                } else {
4473
                    gen_ldo_env_A0(s, op2_offset);
B
bellard 已提交
4474 4475 4476 4477 4478 4479 4480 4481
                }
            } 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) {
4482
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
4483
                op2_offset = offsetof(CPUX86State,mmx_t0);
4484
                gen_ldq_env_A0(s, op2_offset);
B
bellard 已提交
4485 4486 4487 4488 4489 4490
            } else {
                rm = (modrm & 7);
                op2_offset = offsetof(CPUX86State,fpregs[rm].mmx);
            }
        }
        switch(b) {
A
aurel32 已提交
4491
        case 0x0f: /* 3DNow! data insns */
4492 4493
            if (!(s->cpuid_ext2_features & CPUID_EXT2_3DNOW))
                goto illegal_op;
4494
            val = cpu_ldub_code(env, s->pc++);
B
Blue Swirl 已提交
4495 4496
            sse_fn_epp = sse_op_table5[val];
            if (!sse_fn_epp) {
A
aurel32 已提交
4497
                goto illegal_op;
B
Blue Swirl 已提交
4498
            }
B
bellard 已提交
4499 4500
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
4501
            sse_fn_epp(cpu_env, cpu_ptr0, cpu_ptr1);
A
aurel32 已提交
4502
            break;
B
bellard 已提交
4503 4504
        case 0x70: /* pshufx insn */
        case 0xc6: /* pshufx insn */
4505
            val = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4506 4507
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
4508
            /* XXX: introduce a new table? */
B
Blue Swirl 已提交
4509
            sse_fn_ppi = (SSEFunc_0_ppi)sse_fn_epp;
B
Blue Swirl 已提交
4510
            sse_fn_ppi(cpu_ptr0, cpu_ptr1, tcg_const_i32(val));
B
bellard 已提交
4511 4512 4513
            break;
        case 0xc2:
            /* compare insns */
4514
            val = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4515 4516
            if (val >= 8)
                goto illegal_op;
B
Blue Swirl 已提交
4517
            sse_fn_epp = sse_op_table4[val][b1];
B
Blue Swirl 已提交
4518

B
bellard 已提交
4519 4520
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
4521
            sse_fn_epp(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
4522
            break;
4523 4524 4525 4526 4527 4528 4529 4530 4531 4532 4533 4534 4535 4536 4537 4538 4539 4540
        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 已提交
4541
            /* XXX: introduce a new table? */
B
Blue Swirl 已提交
4542 4543
            sse_fn_eppt = (SSEFunc_0_eppt)sse_fn_epp;
            sse_fn_eppt(cpu_env, cpu_ptr0, cpu_ptr1, cpu_A0);
4544
            break;
B
bellard 已提交
4545
        default:
B
bellard 已提交
4546 4547
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
4548
            sse_fn_epp(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
4549 4550 4551
            break;
        }
        if (b == 0x2e || b == 0x2f) {
4552
            set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
4553 4554 4555 4556
        }
    }
}

B
bellard 已提交
4557 4558
/* convert one instruction. s->is_jmp is set if the translation must
   be stopped. Return the next pc value */
4559 4560
static target_ulong disas_insn(CPUX86State *env, DisasContext *s,
                               target_ulong pc_start)
B
bellard 已提交
4561 4562 4563 4564
{
    int b, prefixes, aflag, dflag;
    int shift, ot;
    int modrm, reg, rm, mod, reg_addr, op, opreg, offset_addr, val;
B
bellard 已提交
4565 4566
    target_ulong next_eip, tval;
    int rex_w, rex_r;
B
bellard 已提交
4567

4568
    if (unlikely(qemu_loglevel_mask(CPU_LOG_TB_OP | CPU_LOG_TB_OP_OPT))) {
4569
        tcg_gen_debug_insn_start(pc_start);
4570
    }
B
bellard 已提交
4571 4572 4573
    s->pc = pc_start;
    prefixes = 0;
    s->override = -1;
B
bellard 已提交
4574 4575 4576 4577 4578
    rex_w = -1;
    rex_r = 0;
#ifdef TARGET_X86_64
    s->rex_x = 0;
    s->rex_b = 0;
4579
    x86_64_hregs = 0;
B
bellard 已提交
4580 4581
#endif
    s->rip_offset = 0; /* for relative ip address */
4582 4583
    s->vex_l = 0;
    s->vex_v = 0;
B
bellard 已提交
4584
 next_byte:
4585
    b = cpu_ldub_code(env, s->pc);
B
bellard 已提交
4586
    s->pc++;
4587 4588 4589 4590 4591 4592 4593 4594 4595 4596 4597 4598 4599 4600 4601 4602 4603 4604 4605 4606 4607 4608 4609 4610 4611 4612 4613 4614 4615 4616 4617 4618 4619 4620 4621
    /* 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 已提交
4622
#ifdef TARGET_X86_64
4623 4624
    case 0x40 ... 0x4f:
        if (CODE64(s)) {
B
bellard 已提交
4625 4626 4627 4628 4629 4630 4631 4632
            /* 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;
        }
4633 4634
        break;
#endif
4635 4636 4637 4638 4639 4640 4641 4642 4643 4644 4645 4646 4647 4648 4649 4650 4651
    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 已提交
4652
            /* 4.1.1-4.1.3: No preceding lock, 66, f2, f3, or rex prefixes. */
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 4684 4685 4686 4687 4688 4689 4690 4691
            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;
4692 4693 4694 4695
    }

    /* Post-process prefixes.  */
    if (CODE64(s)) {
4696 4697 4698 4699 4700 4701 4702 4703 4704 4705 4706
        /* 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 已提交
4707
        }
4708 4709 4710 4711
        /* In 16/32-bit mode, 0x67 selects the opposite addressing.  */
        aflag = s->code32;
        if (prefixes & PREFIX_ADR) {
            aflag ^= 1;
B
bellard 已提交
4712
        }
B
bellard 已提交
4713 4714 4715 4716 4717 4718 4719 4720
    }

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

    /* lock generation */
    if (prefixes & PREFIX_LOCK)
P
pbrook 已提交
4721
        gen_helper_lock();
B
bellard 已提交
4722 4723 4724 4725 4726 4727 4728

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

B
bellard 已提交
4732 4733 4734 4735 4736 4737 4738 4739 4740 4741 4742 4743 4744 4745 4746 4747
        /**************************/
        /* 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)
4748
                ot = MO_8;
B
bellard 已提交
4749
            else
4750
                ot = dflag + MO_16;
4751

B
bellard 已提交
4752 4753
            switch(f) {
            case 0: /* OP Ev, Gv */
4754
                modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4755
                reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
4756
                mod = (modrm >> 6) & 3;
B
bellard 已提交
4757
                rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
4758
                if (mod != 3) {
4759
                    gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
4760 4761 4762 4763
                    opreg = OR_TMP0;
                } else if (op == OP_XORL && rm == reg) {
                xor_zero:
                    /* xor reg, reg optimisation */
R
Richard Henderson 已提交
4764
                    set_cc_op(s, CC_OP_CLR);
B
bellard 已提交
4765
                    gen_op_movl_T0_0();
B
bellard 已提交
4766
                    gen_op_mov_reg_T0(ot, reg);
B
bellard 已提交
4767 4768 4769 4770
                    break;
                } else {
                    opreg = rm;
                }
B
bellard 已提交
4771
                gen_op_mov_TN_reg(ot, 1, reg);
B
bellard 已提交
4772 4773 4774
                gen_op(s, op, ot, opreg);
                break;
            case 1: /* OP Gv, Ev */
4775
                modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4776
                mod = (modrm >> 6) & 3;
B
bellard 已提交
4777 4778
                reg = ((modrm >> 3) & 7) | rex_r;
                rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
4779
                if (mod != 3) {
4780
                    gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
4781
                    gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
B
bellard 已提交
4782 4783 4784
                } else if (op == OP_XORL && rm == reg) {
                    goto xor_zero;
                } else {
B
bellard 已提交
4785
                    gen_op_mov_TN_reg(ot, 1, rm);
B
bellard 已提交
4786 4787 4788 4789
                }
                gen_op(s, op, ot, reg);
                break;
            case 2: /* OP A, Iv */
4790
                val = insn_get(env, s, ot);
B
bellard 已提交
4791 4792 4793 4794 4795 4796 4797
                gen_op_movl_T1_im(val);
                gen_op(s, op, ot, OR_EAX);
                break;
            }
        }
        break;

4798 4799 4800
    case 0x82:
        if (CODE64(s))
            goto illegal_op;
B
bellard 已提交
4801 4802 4803 4804 4805 4806 4807
    case 0x80: /* GRP1 */
    case 0x81:
    case 0x83:
        {
            int val;

            if ((b & 1) == 0)
4808
                ot = MO_8;
B
bellard 已提交
4809
            else
4810
                ot = dflag + MO_16;
4811

4812
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4813
            mod = (modrm >> 6) & 3;
B
bellard 已提交
4814
            rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
4815
            op = (modrm >> 3) & 7;
4816

B
bellard 已提交
4817
            if (mod != 3) {
B
bellard 已提交
4818 4819 4820 4821
                if (b == 0x83)
                    s->rip_offset = 1;
                else
                    s->rip_offset = insn_const_size(ot);
4822
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
4823 4824
                opreg = OR_TMP0;
            } else {
B
bellard 已提交
4825
                opreg = rm;
B
bellard 已提交
4826 4827 4828 4829 4830 4831
            }

            switch(b) {
            default:
            case 0x80:
            case 0x81:
4832
            case 0x82:
4833
                val = insn_get(env, s, ot);
B
bellard 已提交
4834 4835
                break;
            case 0x83:
4836
                val = (int8_t)insn_get(env, s, MO_8);
B
bellard 已提交
4837 4838 4839 4840 4841 4842 4843 4844 4845 4846
                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 */
4847
        ot = dflag ? MO_32 : MO_16;
B
bellard 已提交
4848 4849 4850
        gen_inc(s, ot, OR_EAX + (b & 7), 1);
        break;
    case 0x48 ... 0x4f: /* dec Gv */
4851
        ot = dflag ? MO_32 : MO_16;
B
bellard 已提交
4852 4853 4854 4855 4856
        gen_inc(s, ot, OR_EAX + (b & 7), -1);
        break;
    case 0xf6: /* GRP3 */
    case 0xf7:
        if ((b & 1) == 0)
4857
            ot = MO_8;
B
bellard 已提交
4858
        else
4859
            ot = dflag + MO_16;
B
bellard 已提交
4860

4861
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4862
        mod = (modrm >> 6) & 3;
B
bellard 已提交
4863
        rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
4864 4865
        op = (modrm >> 3) & 7;
        if (mod != 3) {
B
bellard 已提交
4866 4867
            if (op == 0)
                s->rip_offset = insn_const_size(ot);
4868
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
4869
            gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
4870
        } else {
B
bellard 已提交
4871
            gen_op_mov_TN_reg(ot, 0, rm);
B
bellard 已提交
4872 4873 4874 4875
        }

        switch(op) {
        case 0: /* test */
4876
            val = insn_get(env, s, ot);
B
bellard 已提交
4877 4878
            gen_op_movl_T1_im(val);
            gen_op_testl_T0_T1_cc();
4879
            set_cc_op(s, CC_OP_LOGICB + ot);
B
bellard 已提交
4880 4881
            break;
        case 2: /* not */
4882
            tcg_gen_not_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
4883
            if (mod != 3) {
4884
                gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
4885
            } else {
B
bellard 已提交
4886
                gen_op_mov_reg_T0(ot, rm);
B
bellard 已提交
4887 4888 4889
            }
            break;
        case 3: /* neg */
4890
            tcg_gen_neg_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
4891
            if (mod != 3) {
4892
                gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
4893
            } else {
B
bellard 已提交
4894
                gen_op_mov_reg_T0(ot, rm);
B
bellard 已提交
4895 4896
            }
            gen_op_update_neg_cc();
4897
            set_cc_op(s, CC_OP_SUBB + ot);
B
bellard 已提交
4898 4899 4900
            break;
        case 4: /* mul */
            switch(ot) {
4901 4902
            case MO_8:
                gen_op_mov_TN_reg(MO_8, 1, R_EAX);
B
bellard 已提交
4903 4904 4905 4906
                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]);
4907
                gen_op_mov_reg_T0(MO_16, R_EAX);
B
bellard 已提交
4908 4909
                tcg_gen_mov_tl(cpu_cc_dst, cpu_T[0]);
                tcg_gen_andi_tl(cpu_cc_src, cpu_T[0], 0xff00);
4910
                set_cc_op(s, CC_OP_MULB);
B
bellard 已提交
4911
                break;
4912 4913
            case MO_16:
                gen_op_mov_TN_reg(MO_16, 1, R_EAX);
B
bellard 已提交
4914 4915 4916 4917
                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]);
4918
                gen_op_mov_reg_T0(MO_16, R_EAX);
B
bellard 已提交
4919 4920
                tcg_gen_mov_tl(cpu_cc_dst, cpu_T[0]);
                tcg_gen_shri_tl(cpu_T[0], cpu_T[0], 16);
4921
                gen_op_mov_reg_T0(MO_16, R_EDX);
B
bellard 已提交
4922
                tcg_gen_mov_tl(cpu_cc_src, cpu_T[0]);
4923
                set_cc_op(s, CC_OP_MULW);
B
bellard 已提交
4924 4925
                break;
            default:
4926
            case MO_32:
4927 4928 4929 4930 4931 4932 4933 4934
                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]);
4935
                set_cc_op(s, CC_OP_MULL);
B
bellard 已提交
4936
                break;
B
bellard 已提交
4937
#ifdef TARGET_X86_64
4938
            case MO_64:
4939 4940 4941 4942
                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]);
4943
                set_cc_op(s, CC_OP_MULQ);
B
bellard 已提交
4944 4945
                break;
#endif
B
bellard 已提交
4946 4947 4948 4949
            }
            break;
        case 5: /* imul */
            switch(ot) {
4950 4951
            case MO_8:
                gen_op_mov_TN_reg(MO_8, 1, R_EAX);
B
bellard 已提交
4952 4953 4954 4955
                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]);
4956
                gen_op_mov_reg_T0(MO_16, R_EAX);
B
bellard 已提交
4957 4958 4959
                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);
4960
                set_cc_op(s, CC_OP_MULB);
B
bellard 已提交
4961
                break;
4962 4963
            case MO_16:
                gen_op_mov_TN_reg(MO_16, 1, R_EAX);
B
bellard 已提交
4964 4965 4966 4967
                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]);
4968
                gen_op_mov_reg_T0(MO_16, R_EAX);
B
bellard 已提交
4969 4970 4971 4972
                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);
4973
                gen_op_mov_reg_T0(MO_16, R_EDX);
4974
                set_cc_op(s, CC_OP_MULW);
B
bellard 已提交
4975 4976
                break;
            default:
4977
            case MO_32:
4978 4979 4980 4981 4982 4983 4984 4985 4986 4987
                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);
4988
                set_cc_op(s, CC_OP_MULL);
B
bellard 已提交
4989
                break;
B
bellard 已提交
4990
#ifdef TARGET_X86_64
4991
            case MO_64:
4992 4993 4994 4995 4996
                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]);
4997
                set_cc_op(s, CC_OP_MULQ);
B
bellard 已提交
4998 4999
                break;
#endif
B
bellard 已提交
5000 5001 5002 5003
            }
            break;
        case 6: /* div */
            switch(ot) {
5004
            case MO_8:
B
bellard 已提交
5005
                gen_jmp_im(pc_start - s->cs_base);
5006
                gen_helper_divb_AL(cpu_env, cpu_T[0]);
B
bellard 已提交
5007
                break;
5008
            case MO_16:
B
bellard 已提交
5009
                gen_jmp_im(pc_start - s->cs_base);
5010
                gen_helper_divw_AX(cpu_env, cpu_T[0]);
B
bellard 已提交
5011 5012
                break;
            default:
5013
            case MO_32:
B
bellard 已提交
5014
                gen_jmp_im(pc_start - s->cs_base);
5015
                gen_helper_divl_EAX(cpu_env, cpu_T[0]);
B
bellard 已提交
5016 5017
                break;
#ifdef TARGET_X86_64
5018
            case MO_64:
B
bellard 已提交
5019
                gen_jmp_im(pc_start - s->cs_base);
5020
                gen_helper_divq_EAX(cpu_env, cpu_T[0]);
B
bellard 已提交
5021
                break;
B
bellard 已提交
5022
#endif
B
bellard 已提交
5023 5024 5025 5026
            }
            break;
        case 7: /* idiv */
            switch(ot) {
5027
            case MO_8:
B
bellard 已提交
5028
                gen_jmp_im(pc_start - s->cs_base);
5029
                gen_helper_idivb_AL(cpu_env, cpu_T[0]);
B
bellard 已提交
5030
                break;
5031
            case MO_16:
B
bellard 已提交
5032
                gen_jmp_im(pc_start - s->cs_base);
5033
                gen_helper_idivw_AX(cpu_env, cpu_T[0]);
B
bellard 已提交
5034 5035
                break;
            default:
5036
            case MO_32:
B
bellard 已提交
5037
                gen_jmp_im(pc_start - s->cs_base);
5038
                gen_helper_idivl_EAX(cpu_env, cpu_T[0]);
B
bellard 已提交
5039 5040
                break;
#ifdef TARGET_X86_64
5041
            case MO_64:
B
bellard 已提交
5042
                gen_jmp_im(pc_start - s->cs_base);
5043
                gen_helper_idivq_EAX(cpu_env, cpu_T[0]);
B
bellard 已提交
5044
                break;
B
bellard 已提交
5045
#endif
B
bellard 已提交
5046 5047 5048 5049 5050 5051 5052 5053 5054 5055
            }
            break;
        default:
            goto illegal_op;
        }
        break;

    case 0xfe: /* GRP4 */
    case 0xff: /* GRP5 */
        if ((b & 1) == 0)
5056
            ot = MO_8;
B
bellard 已提交
5057
        else
5058
            ot = dflag + MO_16;
B
bellard 已提交
5059

5060
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5061
        mod = (modrm >> 6) & 3;
B
bellard 已提交
5062
        rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
5063 5064 5065 5066
        op = (modrm >> 3) & 7;
        if (op >= 2 && b == 0xfe) {
            goto illegal_op;
        }
B
bellard 已提交
5067
        if (CODE64(s)) {
5068
            if (op == 2 || op == 4) {
B
bellard 已提交
5069
                /* operand size for jumps is 64 bit */
5070
                ot = MO_64;
5071
            } else if (op == 3 || op == 5) {
5072
                ot = dflag ? MO_32 + (rex_w == 1) : MO_16;
B
bellard 已提交
5073 5074
            } else if (op == 6) {
                /* default push size is 64 bit */
5075
                ot = dflag ? MO_64 : MO_16;
B
bellard 已提交
5076 5077
            }
        }
B
bellard 已提交
5078
        if (mod != 3) {
5079
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
5080
            if (op >= 2 && op != 3 && op != 5)
5081
                gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
5082
        } else {
B
bellard 已提交
5083
            gen_op_mov_TN_reg(ot, 0, rm);
B
bellard 已提交
5084 5085 5086 5087 5088 5089 5090 5091 5092 5093 5094 5095 5096 5097 5098 5099 5100 5101
        }

        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 */
5102
            /* XXX: optimize if memory (no 'and' is necessary) */
B
bellard 已提交
5103 5104 5105
            if (s->dflag == 0)
                gen_op_andl_T0_ffff();
            next_eip = s->pc - s->cs_base;
B
bellard 已提交
5106
            gen_movtl_T1_im(next_eip);
5107 5108
            gen_push_T1(s);
            gen_op_jmp_T0();
B
bellard 已提交
5109 5110
            gen_eob(s);
            break;
B
bellard 已提交
5111
        case 3: /* lcall Ev */
5112
            gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
5113
            gen_add_A0_im(s, 1 << (ot - MO_16 + 1));
5114
            gen_op_ld_v(s, MO_16, cpu_T[0], cpu_A0);
B
bellard 已提交
5115 5116
        do_lcall:
            if (s->pe && !s->vm86) {
5117
                gen_update_cc_op(s);
B
bellard 已提交
5118
                gen_jmp_im(pc_start - s->cs_base);
5119
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
5120 5121
                gen_helper_lcall_protected(cpu_env, cpu_tmp2_i32, cpu_T[1],
                                           tcg_const_i32(dflag),
P
pbrook 已提交
5122
                                           tcg_const_i32(s->pc - pc_start));
B
bellard 已提交
5123
            } else {
5124
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
5125 5126
                gen_helper_lcall_real(cpu_env, cpu_tmp2_i32, cpu_T[1],
                                      tcg_const_i32(dflag),
P
pbrook 已提交
5127
                                      tcg_const_i32(s->pc - s->cs_base));
B
bellard 已提交
5128 5129 5130 5131 5132 5133 5134 5135 5136 5137
            }
            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 */
5138
            gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
5139
            gen_add_A0_im(s, 1 << (ot - MO_16 + 1));
5140
            gen_op_ld_v(s, MO_16, cpu_T[0], cpu_A0);
B
bellard 已提交
5141 5142
        do_ljmp:
            if (s->pe && !s->vm86) {
5143
                gen_update_cc_op(s);
B
bellard 已提交
5144
                gen_jmp_im(pc_start - s->cs_base);
5145
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
5146
                gen_helper_ljmp_protected(cpu_env, cpu_tmp2_i32, cpu_T[1],
P
pbrook 已提交
5147
                                          tcg_const_i32(s->pc - pc_start));
B
bellard 已提交
5148
            } else {
5149
                gen_op_movl_seg_T0_vm(R_CS);
B
bellard 已提交
5150 5151 5152 5153 5154 5155 5156 5157 5158 5159 5160 5161 5162 5163
                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 */
5164
    case 0x85:
B
bellard 已提交
5165
        if ((b & 1) == 0)
5166
            ot = MO_8;
B
bellard 已提交
5167
        else
5168
            ot = dflag + MO_16;
B
bellard 已提交
5169

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

5173
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
B
bellard 已提交
5174
        gen_op_mov_TN_reg(ot, 1, reg);
B
bellard 已提交
5175
        gen_op_testl_T0_T1_cc();
5176
        set_cc_op(s, CC_OP_LOGICB + ot);
B
bellard 已提交
5177
        break;
5178

B
bellard 已提交
5179 5180 5181
    case 0xa8: /* test eAX, Iv */
    case 0xa9:
        if ((b & 1) == 0)
5182
            ot = MO_8;
B
bellard 已提交
5183
        else
5184
            ot = dflag + MO_16;
5185
        val = insn_get(env, s, ot);
B
bellard 已提交
5186

B
bellard 已提交
5187
        gen_op_mov_TN_reg(ot, 0, OR_EAX);
B
bellard 已提交
5188 5189
        gen_op_movl_T1_im(val);
        gen_op_testl_T0_T1_cc();
5190
        set_cc_op(s, CC_OP_LOGICB + ot);
B
bellard 已提交
5191
        break;
5192

B
bellard 已提交
5193
    case 0x98: /* CWDE/CBW */
B
bellard 已提交
5194 5195
#ifdef TARGET_X86_64
        if (dflag == 2) {
5196
            gen_op_mov_TN_reg(MO_32, 0, R_EAX);
B
bellard 已提交
5197
            tcg_gen_ext32s_tl(cpu_T[0], cpu_T[0]);
5198
            gen_op_mov_reg_T0(MO_64, R_EAX);
B
bellard 已提交
5199 5200
        } else
#endif
B
bellard 已提交
5201
        if (dflag == 1) {
5202
            gen_op_mov_TN_reg(MO_16, 0, R_EAX);
B
bellard 已提交
5203
            tcg_gen_ext16s_tl(cpu_T[0], cpu_T[0]);
5204
            gen_op_mov_reg_T0(MO_32, R_EAX);
B
bellard 已提交
5205
        } else {
5206
            gen_op_mov_TN_reg(MO_8, 0, R_EAX);
B
bellard 已提交
5207
            tcg_gen_ext8s_tl(cpu_T[0], cpu_T[0]);
5208
            gen_op_mov_reg_T0(MO_16, R_EAX);
B
bellard 已提交
5209
        }
B
bellard 已提交
5210 5211
        break;
    case 0x99: /* CDQ/CWD */
B
bellard 已提交
5212 5213
#ifdef TARGET_X86_64
        if (dflag == 2) {
5214
            gen_op_mov_TN_reg(MO_64, 0, R_EAX);
B
bellard 已提交
5215
            tcg_gen_sari_tl(cpu_T[0], cpu_T[0], 63);
5216
            gen_op_mov_reg_T0(MO_64, R_EDX);
B
bellard 已提交
5217 5218
        } else
#endif
B
bellard 已提交
5219
        if (dflag == 1) {
5220
            gen_op_mov_TN_reg(MO_32, 0, R_EAX);
B
bellard 已提交
5221 5222
            tcg_gen_ext32s_tl(cpu_T[0], cpu_T[0]);
            tcg_gen_sari_tl(cpu_T[0], cpu_T[0], 31);
5223
            gen_op_mov_reg_T0(MO_32, R_EDX);
B
bellard 已提交
5224
        } else {
5225
            gen_op_mov_TN_reg(MO_16, 0, R_EAX);
B
bellard 已提交
5226 5227
            tcg_gen_ext16s_tl(cpu_T[0], cpu_T[0]);
            tcg_gen_sari_tl(cpu_T[0], cpu_T[0], 15);
5228
            gen_op_mov_reg_T0(MO_16, R_EDX);
B
bellard 已提交
5229
        }
B
bellard 已提交
5230 5231 5232 5233
        break;
    case 0x1af: /* imul Gv, Ev */
    case 0x69: /* imul Gv, Ev, I */
    case 0x6b:
5234
        ot = dflag + MO_16;
5235
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5236 5237 5238 5239 5240
        reg = ((modrm >> 3) & 7) | rex_r;
        if (b == 0x69)
            s->rip_offset = insn_const_size(ot);
        else if (b == 0x6b)
            s->rip_offset = 1;
5241
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
B
bellard 已提交
5242
        if (b == 0x69) {
5243
            val = insn_get(env, s, ot);
B
bellard 已提交
5244 5245
            gen_op_movl_T1_im(val);
        } else if (b == 0x6b) {
5246
            val = (int8_t)insn_get(env, s, MO_8);
B
bellard 已提交
5247 5248
            gen_op_movl_T1_im(val);
        } else {
B
bellard 已提交
5249
            gen_op_mov_TN_reg(ot, 1, reg);
B
bellard 已提交
5250
        }
5251
        switch (ot) {
B
bellard 已提交
5252
#ifdef TARGET_X86_64
5253
        case MO_64:
5254 5255 5256 5257 5258
            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 已提交
5259
#endif
5260
        case MO_32:
5261 5262 5263 5264 5265 5266 5267 5268 5269 5270 5271
            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 已提交
5272 5273 5274 5275 5276 5277 5278
            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);
5279 5280
            gen_op_mov_reg_T0(ot, reg);
            break;
B
bellard 已提交
5281
        }
5282
        set_cc_op(s, CC_OP_MULB + ot);
B
bellard 已提交
5283 5284 5285 5286
        break;
    case 0x1c0:
    case 0x1c1: /* xadd Ev, Gv */
        if ((b & 1) == 0)
5287
            ot = MO_8;
B
bellard 已提交
5288
        else
5289
            ot = dflag + MO_16;
5290
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5291
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5292 5293
        mod = (modrm >> 6) & 3;
        if (mod == 3) {
B
bellard 已提交
5294
            rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
5295 5296
            gen_op_mov_TN_reg(ot, 0, reg);
            gen_op_mov_TN_reg(ot, 1, rm);
B
bellard 已提交
5297
            gen_op_addl_T0_T1();
B
bellard 已提交
5298 5299
            gen_op_mov_reg_T1(ot, reg);
            gen_op_mov_reg_T0(ot, rm);
B
bellard 已提交
5300
        } else {
5301
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
5302
            gen_op_mov_TN_reg(ot, 0, reg);
5303
            gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
B
bellard 已提交
5304
            gen_op_addl_T0_T1();
5305
            gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
5306
            gen_op_mov_reg_T1(ot, reg);
B
bellard 已提交
5307 5308
        }
        gen_op_update2_cc();
5309
        set_cc_op(s, CC_OP_ADDB + ot);
B
bellard 已提交
5310 5311 5312
        break;
    case 0x1b0:
    case 0x1b1: /* cmpxchg Ev, Gv */
B
bellard 已提交
5313
        {
B
bellard 已提交
5314
            int label1, label2;
5315
            TCGv t0, t1, t2, a0;
B
bellard 已提交
5316 5317

            if ((b & 1) == 0)
5318
                ot = MO_8;
B
bellard 已提交
5319
            else
5320
                ot = dflag + MO_16;
5321
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5322 5323
            reg = ((modrm >> 3) & 7) | rex_r;
            mod = (modrm >> 6) & 3;
P
pbrook 已提交
5324 5325 5326 5327
            t0 = tcg_temp_local_new();
            t1 = tcg_temp_local_new();
            t2 = tcg_temp_local_new();
            a0 = tcg_temp_local_new();
5328
            gen_op_mov_v_reg(ot, t1, reg);
B
bellard 已提交
5329 5330
            if (mod == 3) {
                rm = (modrm & 7) | REX_B(s);
5331
                gen_op_mov_v_reg(ot, t0, rm);
B
bellard 已提交
5332
            } else {
5333
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
5334
                tcg_gen_mov_tl(a0, cpu_A0);
5335
                gen_op_ld_v(s, ot, t0, a0);
B
bellard 已提交
5336 5337 5338
                rm = 0; /* avoid warning */
            }
            label1 = gen_new_label();
5339 5340
            tcg_gen_mov_tl(t2, cpu_regs[R_EAX]);
            gen_extu(ot, t0);
5341
            gen_extu(ot, t2);
5342
            tcg_gen_brcond_tl(TCG_COND_EQ, t2, t0, label1);
5343
            label2 = gen_new_label();
B
bellard 已提交
5344
            if (mod == 3) {
5345
                gen_op_mov_reg_v(ot, R_EAX, t0);
B
bellard 已提交
5346 5347
                tcg_gen_br(label2);
                gen_set_label(label1);
5348
                gen_op_mov_reg_v(ot, rm, t1);
B
bellard 已提交
5349
            } else {
5350 5351 5352
                /* 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 */
5353
                gen_op_st_v(s, ot, t0, a0);
5354
                gen_op_mov_reg_v(ot, R_EAX, t0);
5355
                tcg_gen_br(label2);
B
bellard 已提交
5356
                gen_set_label(label1);
5357
                gen_op_st_v(s, ot, t1, a0);
B
bellard 已提交
5358
            }
5359
            gen_set_label(label2);
5360
            tcg_gen_mov_tl(cpu_cc_src, t0);
5361 5362
            tcg_gen_mov_tl(cpu_cc_srcT, t2);
            tcg_gen_sub_tl(cpu_cc_dst, t2, t0);
5363
            set_cc_op(s, CC_OP_SUBB + ot);
5364 5365 5366 5367
            tcg_temp_free(t0);
            tcg_temp_free(t1);
            tcg_temp_free(t2);
            tcg_temp_free(a0);
B
bellard 已提交
5368 5369 5370
        }
        break;
    case 0x1c7: /* cmpxchg8b */
5371
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5372
        mod = (modrm >> 6) & 3;
5373
        if ((mod == 3) || ((modrm & 0x38) != 0x8))
B
bellard 已提交
5374
            goto illegal_op;
B
bellard 已提交
5375 5376 5377 5378 5379
#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);
5380
            gen_update_cc_op(s);
5381
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
Blue Swirl 已提交
5382
            gen_helper_cmpxchg16b(cpu_env, cpu_A0);
B
bellard 已提交
5383 5384 5385 5386 5387 5388
        } else
#endif        
        {
            if (!(s->cpuid_features & CPUID_CX8))
                goto illegal_op;
            gen_jmp_im(pc_start - s->cs_base);
5389
            gen_update_cc_op(s);
5390
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
Blue Swirl 已提交
5391
            gen_helper_cmpxchg8b(cpu_env, cpu_A0);
B
bellard 已提交
5392
        }
5393
        set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
5394
        break;
5395

B
bellard 已提交
5396 5397 5398
        /**************************/
        /* push/pop */
    case 0x50 ... 0x57: /* push */
5399
        gen_op_mov_TN_reg(MO_32, 0, (b & 7) | REX_B(s));
B
bellard 已提交
5400 5401 5402
        gen_push_T0(s);
        break;
    case 0x58 ... 0x5f: /* pop */
B
bellard 已提交
5403
        if (CODE64(s)) {
5404
            ot = dflag ? MO_64 : MO_16;
B
bellard 已提交
5405
        } else {
5406
            ot = dflag + MO_16;
B
bellard 已提交
5407
        }
B
bellard 已提交
5408
        gen_pop_T0(s);
B
bellard 已提交
5409
        /* NOTE: order is important for pop %sp */
B
bellard 已提交
5410
        gen_pop_update(s);
B
bellard 已提交
5411
        gen_op_mov_reg_T0(ot, (b & 7) | REX_B(s));
B
bellard 已提交
5412 5413
        break;
    case 0x60: /* pusha */
B
bellard 已提交
5414 5415
        if (CODE64(s))
            goto illegal_op;
B
bellard 已提交
5416 5417 5418
        gen_pusha(s);
        break;
    case 0x61: /* popa */
B
bellard 已提交
5419 5420
        if (CODE64(s))
            goto illegal_op;
B
bellard 已提交
5421 5422 5423 5424
        gen_popa(s);
        break;
    case 0x68: /* push Iv */
    case 0x6a:
B
bellard 已提交
5425
        if (CODE64(s)) {
5426
            ot = dflag ? MO_64 : MO_16;
B
bellard 已提交
5427
        } else {
5428
            ot = dflag + MO_16;
B
bellard 已提交
5429
        }
B
bellard 已提交
5430
        if (b == 0x68)
5431
            val = insn_get(env, s, ot);
B
bellard 已提交
5432
        else
5433
            val = (int8_t)insn_get(env, s, MO_8);
B
bellard 已提交
5434 5435 5436 5437
        gen_op_movl_T0_im(val);
        gen_push_T0(s);
        break;
    case 0x8f: /* pop Ev */
B
bellard 已提交
5438
        if (CODE64(s)) {
5439
            ot = dflag ? MO_64 : MO_16;
B
bellard 已提交
5440
        } else {
5441
            ot = dflag + MO_16;
B
bellard 已提交
5442
        }
5443
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5444
        mod = (modrm >> 6) & 3;
B
bellard 已提交
5445
        gen_pop_T0(s);
B
bellard 已提交
5446 5447 5448
        if (mod == 3) {
            /* NOTE: order is important for pop %sp */
            gen_pop_update(s);
B
bellard 已提交
5449
            rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
5450
            gen_op_mov_reg_T0(ot, rm);
B
bellard 已提交
5451 5452
        } else {
            /* NOTE: order is important too for MMU exceptions */
B
bellard 已提交
5453
            s->popl_esp_hack = 1 << ot;
5454
            gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 1);
B
bellard 已提交
5455 5456 5457
            s->popl_esp_hack = 0;
            gen_pop_update(s);
        }
B
bellard 已提交
5458 5459 5460 5461
        break;
    case 0xc8: /* enter */
        {
            int level;
5462
            val = cpu_lduw_code(env, s->pc);
B
bellard 已提交
5463
            s->pc += 2;
5464
            level = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5465 5466 5467 5468 5469
            gen_enter(s, val, level);
        }
        break;
    case 0xc9: /* leave */
        /* XXX: exception not precise (ESP is updated before potential exception) */
B
bellard 已提交
5470
        if (CODE64(s)) {
5471 5472
            gen_op_mov_TN_reg(MO_64, 0, R_EBP);
            gen_op_mov_reg_T0(MO_64, R_ESP);
B
bellard 已提交
5473
        } else if (s->ss32) {
5474 5475
            gen_op_mov_TN_reg(MO_32, 0, R_EBP);
            gen_op_mov_reg_T0(MO_32, R_ESP);
B
bellard 已提交
5476
        } else {
5477 5478
            gen_op_mov_TN_reg(MO_16, 0, R_EBP);
            gen_op_mov_reg_T0(MO_16, R_ESP);
B
bellard 已提交
5479 5480
        }
        gen_pop_T0(s);
B
bellard 已提交
5481
        if (CODE64(s)) {
5482
            ot = dflag ? MO_64 : MO_16;
B
bellard 已提交
5483
        } else {
5484
            ot = dflag + MO_16;
B
bellard 已提交
5485
        }
B
bellard 已提交
5486
        gen_op_mov_reg_T0(ot, R_EBP);
B
bellard 已提交
5487 5488 5489 5490 5491 5492
        gen_pop_update(s);
        break;
    case 0x06: /* push es */
    case 0x0e: /* push cs */
    case 0x16: /* push ss */
    case 0x1e: /* push ds */
B
bellard 已提交
5493 5494
        if (CODE64(s))
            goto illegal_op;
B
bellard 已提交
5495 5496 5497 5498 5499 5500 5501 5502 5503 5504 5505
        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 已提交
5506 5507
        if (CODE64(s))
            goto illegal_op;
B
bellard 已提交
5508 5509 5510 5511 5512
        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) {
5513 5514 5515 5516
            /* if reg == SS, inhibit interrupts/trace. */
            /* If several instructions disable interrupts, only the
               _first_ does it */
            if (!(s->tb->flags & HF_INHIBIT_IRQ_MASK))
5517
                gen_helper_set_inhibit_irq(cpu_env);
B
bellard 已提交
5518 5519 5520
            s->tf = 0;
        }
        if (s->is_jmp) {
B
bellard 已提交
5521
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
5522 5523 5524 5525 5526 5527 5528 5529 5530
            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 已提交
5531
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
5532 5533 5534 5535 5536 5537 5538 5539 5540
            gen_eob(s);
        }
        break;

        /**************************/
        /* mov */
    case 0x88:
    case 0x89: /* mov Gv, Ev */
        if ((b & 1) == 0)
5541
            ot = MO_8;
B
bellard 已提交
5542
        else
5543
            ot = dflag + MO_16;
5544
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5545
        reg = ((modrm >> 3) & 7) | rex_r;
5546

B
bellard 已提交
5547
        /* generate a generic store */
5548
        gen_ldst_modrm(env, s, modrm, ot, reg, 1);
B
bellard 已提交
5549 5550 5551 5552
        break;
    case 0xc6:
    case 0xc7: /* mov Ev, Iv */
        if ((b & 1) == 0)
5553
            ot = MO_8;
B
bellard 已提交
5554
        else
5555
            ot = dflag + MO_16;
5556
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5557
        mod = (modrm >> 6) & 3;
B
bellard 已提交
5558 5559
        if (mod != 3) {
            s->rip_offset = insn_const_size(ot);
5560
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
5561
        }
5562
        val = insn_get(env, s, ot);
B
bellard 已提交
5563
        gen_op_movl_T0_im(val);
5564 5565 5566
        if (mod != 3) {
            gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
        } else {
B
bellard 已提交
5567
            gen_op_mov_reg_T0(ot, (modrm & 7) | REX_B(s));
5568
        }
B
bellard 已提交
5569 5570 5571 5572
        break;
    case 0x8a:
    case 0x8b: /* mov Ev, Gv */
        if ((b & 1) == 0)
5573
            ot = MO_8;
B
bellard 已提交
5574
        else
5575
            ot = MO_16 + dflag;
5576
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5577
        reg = ((modrm >> 3) & 7) | rex_r;
5578

5579
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
B
bellard 已提交
5580
        gen_op_mov_reg_T0(ot, reg);
B
bellard 已提交
5581 5582
        break;
    case 0x8e: /* mov seg, Gv */
5583
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5584 5585 5586
        reg = (modrm >> 3) & 7;
        if (reg >= 6 || reg == R_CS)
            goto illegal_op;
5587
        gen_ldst_modrm(env, s, modrm, MO_16, OR_TMP0, 0);
B
bellard 已提交
5588 5589 5590
        gen_movl_seg_T0(s, reg, pc_start - s->cs_base);
        if (reg == R_SS) {
            /* if reg == SS, inhibit interrupts/trace */
5591 5592 5593
            /* If several instructions disable interrupts, only the
               _first_ does it */
            if (!(s->tb->flags & HF_INHIBIT_IRQ_MASK))
5594
                gen_helper_set_inhibit_irq(cpu_env);
B
bellard 已提交
5595 5596 5597
            s->tf = 0;
        }
        if (s->is_jmp) {
B
bellard 已提交
5598
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
5599 5600 5601 5602
            gen_eob(s);
        }
        break;
    case 0x8c: /* mov Gv, seg */
5603
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5604 5605 5606 5607 5608
        reg = (modrm >> 3) & 7;
        mod = (modrm >> 6) & 3;
        if (reg >= 6)
            goto illegal_op;
        gen_op_movl_T0_seg(reg);
B
bellard 已提交
5609
        if (mod == 3)
5610
            ot = MO_16 + dflag;
B
bellard 已提交
5611
        else
5612
            ot = MO_16;
5613
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 1);
B
bellard 已提交
5614 5615 5616 5617 5618 5619 5620
        break;

    case 0x1b6: /* movzbS Gv, Eb */
    case 0x1b7: /* movzwS Gv, Eb */
    case 0x1be: /* movsbS Gv, Eb */
    case 0x1bf: /* movswS Gv, Eb */
        {
5621 5622 5623
            TCGMemOp d_ot;
            TCGMemOp s_ot;

B
bellard 已提交
5624
            /* d_ot is the size of destination */
5625
            d_ot = dflag + MO_16;
B
bellard 已提交
5626
            /* ot is the size of source */
5627
            ot = (b & 1) + MO_8;
5628 5629 5630
            /* s_ot is the sign+size of source */
            s_ot = b & 8 ? MO_SIGN | ot : ot;

5631
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5632
            reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5633
            mod = (modrm >> 6) & 3;
B
bellard 已提交
5634
            rm = (modrm & 7) | REX_B(s);
5635

B
bellard 已提交
5636
            if (mod == 3) {
B
bellard 已提交
5637
                gen_op_mov_TN_reg(ot, 0, rm);
5638 5639
                switch (s_ot) {
                case MO_UB:
B
bellard 已提交
5640
                    tcg_gen_ext8u_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
5641
                    break;
5642
                case MO_SB:
B
bellard 已提交
5643
                    tcg_gen_ext8s_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
5644
                    break;
5645
                case MO_UW:
B
bellard 已提交
5646
                    tcg_gen_ext16u_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
5647 5648
                    break;
                default:
5649
                case MO_SW:
B
bellard 已提交
5650
                    tcg_gen_ext16s_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
5651 5652
                    break;
                }
B
bellard 已提交
5653
                gen_op_mov_reg_T0(d_ot, reg);
B
bellard 已提交
5654
            } else {
5655
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
5656
                gen_op_ld_v(s, s_ot, cpu_T[0], cpu_A0);
B
bellard 已提交
5657
                gen_op_mov_reg_T0(d_ot, reg);
B
bellard 已提交
5658 5659 5660 5661 5662
            }
        }
        break;

    case 0x8d: /* lea */
5663
        ot = dflag + MO_16;
5664
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5665 5666 5667
        mod = (modrm >> 6) & 3;
        if (mod == 3)
            goto illegal_op;
B
bellard 已提交
5668
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5669 5670 5671 5672
        /* we must ensure that no segment is added */
        s->override = -1;
        val = s->addseg;
        s->addseg = 0;
5673
        gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
5674
        s->addseg = val;
5675
        gen_op_mov_reg_A0(ot - MO_16, reg);
B
bellard 已提交
5676
        break;
5677

B
bellard 已提交
5678 5679 5680 5681 5682
    case 0xa0: /* mov EAX, Ov */
    case 0xa1:
    case 0xa2: /* mov Ov, EAX */
    case 0xa3:
        {
B
bellard 已提交
5683 5684 5685
            target_ulong offset_addr;

            if ((b & 1) == 0)
5686
                ot = MO_8;
B
bellard 已提交
5687
            else
5688
                ot = dflag + MO_16;
B
bellard 已提交
5689
#ifdef TARGET_X86_64
5690
            if (s->aflag == 2) {
5691
                offset_addr = cpu_ldq_code(env, s->pc);
B
bellard 已提交
5692
                s->pc += 8;
B
bellard 已提交
5693
                gen_op_movq_A0_im(offset_addr);
5694
            } else
B
bellard 已提交
5695 5696 5697
#endif
            {
                if (s->aflag) {
5698
                    offset_addr = insn_get(env, s, MO_32);
B
bellard 已提交
5699
                } else {
5700
                    offset_addr = insn_get(env, s, MO_16);
B
bellard 已提交
5701 5702 5703
                }
                gen_op_movl_A0_im(offset_addr);
            }
B
bellard 已提交
5704
            gen_add_A0_ds_seg(s);
B
bellard 已提交
5705
            if ((b & 2) == 0) {
5706
                gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
5707
                gen_op_mov_reg_T0(ot, R_EAX);
B
bellard 已提交
5708
            } else {
B
bellard 已提交
5709
                gen_op_mov_TN_reg(ot, 0, R_EAX);
5710
                gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
5711 5712 5713 5714
            }
        }
        break;
    case 0xd7: /* xlat */
B
bellard 已提交
5715
#ifdef TARGET_X86_64
5716
        if (s->aflag == 2) {
B
bellard 已提交
5717
            gen_op_movq_A0_reg(R_EBX);
5718
            gen_op_mov_TN_reg(MO_64, 0, R_EAX);
5719 5720
            tcg_gen_andi_tl(cpu_T[0], cpu_T[0], 0xff);
            tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_T[0]);
5721
        } else
B
bellard 已提交
5722 5723
#endif
        {
B
bellard 已提交
5724
            gen_op_movl_A0_reg(R_EBX);
5725
            gen_op_mov_TN_reg(MO_32, 0, R_EAX);
5726 5727
            tcg_gen_andi_tl(cpu_T[0], cpu_T[0], 0xff);
            tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_T[0]);
B
bellard 已提交
5728 5729
            if (s->aflag == 0)
                gen_op_andl_A0_ffff();
5730 5731
            else
                tcg_gen_andi_tl(cpu_A0, cpu_A0, 0xffffffff);
B
bellard 已提交
5732
        }
B
bellard 已提交
5733
        gen_add_A0_ds_seg(s);
5734
        gen_op_ld_v(s, MO_8, cpu_T[0], cpu_A0);
5735
        gen_op_mov_reg_T0(MO_8, R_EAX);
B
bellard 已提交
5736 5737
        break;
    case 0xb0 ... 0xb7: /* mov R, Ib */
5738
        val = insn_get(env, s, MO_8);
B
bellard 已提交
5739
        gen_op_movl_T0_im(val);
5740
        gen_op_mov_reg_T0(MO_8, (b & 7) | REX_B(s));
B
bellard 已提交
5741 5742
        break;
    case 0xb8 ... 0xbf: /* mov R, Iv */
B
bellard 已提交
5743 5744 5745 5746
#ifdef TARGET_X86_64
        if (dflag == 2) {
            uint64_t tmp;
            /* 64 bit case */
5747
            tmp = cpu_ldq_code(env, s->pc);
B
bellard 已提交
5748 5749 5750
            s->pc += 8;
            reg = (b & 7) | REX_B(s);
            gen_movtl_T0_im(tmp);
5751
            gen_op_mov_reg_T0(MO_64, reg);
5752
        } else
B
bellard 已提交
5753 5754
#endif
        {
5755
            ot = dflag ? MO_32 : MO_16;
5756
            val = insn_get(env, s, ot);
B
bellard 已提交
5757 5758
            reg = (b & 7) | REX_B(s);
            gen_op_movl_T0_im(val);
B
bellard 已提交
5759
            gen_op_mov_reg_T0(ot, reg);
B
bellard 已提交
5760
        }
B
bellard 已提交
5761 5762 5763
        break;

    case 0x91 ... 0x97: /* xchg R, EAX */
R
Richard Henderson 已提交
5764
    do_xchg_reg_eax:
5765
        ot = dflag + MO_16;
B
bellard 已提交
5766
        reg = (b & 7) | REX_B(s);
B
bellard 已提交
5767 5768 5769 5770 5771
        rm = R_EAX;
        goto do_xchg_reg;
    case 0x86:
    case 0x87: /* xchg Ev, Gv */
        if ((b & 1) == 0)
5772
            ot = MO_8;
B
bellard 已提交
5773
        else
5774
            ot = dflag + MO_16;
5775
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5776
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5777 5778
        mod = (modrm >> 6) & 3;
        if (mod == 3) {
B
bellard 已提交
5779
            rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
5780
        do_xchg_reg:
B
bellard 已提交
5781 5782 5783 5784
            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 已提交
5785
        } else {
5786
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
5787
            gen_op_mov_TN_reg(ot, 0, reg);
B
bellard 已提交
5788 5789
            /* for xchg, lock is implicit */
            if (!(prefixes & PREFIX_LOCK))
P
pbrook 已提交
5790
                gen_helper_lock();
5791
            gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
5792
            gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
5793
            if (!(prefixes & PREFIX_LOCK))
P
pbrook 已提交
5794
                gen_helper_unlock();
B
bellard 已提交
5795
            gen_op_mov_reg_T1(ot, reg);
B
bellard 已提交
5796 5797 5798
        }
        break;
    case 0xc4: /* les Gv */
5799
        /* In CODE64 this is VEX3; see above.  */
B
bellard 已提交
5800 5801 5802
        op = R_ES;
        goto do_lxx;
    case 0xc5: /* lds Gv */
5803
        /* In CODE64 this is VEX2; see above.  */
B
bellard 已提交
5804 5805 5806 5807 5808 5809 5810 5811 5812 5813 5814
        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:
5815
        ot = dflag ? MO_32 : MO_16;
5816
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5817
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5818 5819 5820
        mod = (modrm >> 6) & 3;
        if (mod == 3)
            goto illegal_op;
5821
        gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
5822
        gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
5823
        gen_add_A0_im(s, 1 << (ot - MO_16 + 1));
B
bellard 已提交
5824
        /* load the segment first to handle exceptions properly */
5825
        gen_op_ld_v(s, MO_16, cpu_T[0], cpu_A0);
B
bellard 已提交
5826 5827
        gen_movl_seg_T0(s, op, pc_start - s->cs_base);
        /* then put the data */
B
bellard 已提交
5828
        gen_op_mov_reg_T1(ot, reg);
B
bellard 已提交
5829
        if (s->is_jmp) {
B
bellard 已提交
5830
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
5831 5832 5833
            gen_eob(s);
        }
        break;
5834

B
bellard 已提交
5835 5836 5837 5838 5839 5840 5841 5842 5843
        /************************/
        /* shifts */
    case 0xc0:
    case 0xc1:
        /* shift Ev,Ib */
        shift = 2;
    grp2:
        {
            if ((b & 1) == 0)
5844
                ot = MO_8;
B
bellard 已提交
5845
            else
5846
                ot = dflag + MO_16;
5847

5848
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5849 5850
            mod = (modrm >> 6) & 3;
            op = (modrm >> 3) & 7;
5851

B
bellard 已提交
5852
            if (mod != 3) {
B
bellard 已提交
5853 5854 5855
                if (shift == 2) {
                    s->rip_offset = 1;
                }
5856
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
5857 5858
                opreg = OR_TMP0;
            } else {
B
bellard 已提交
5859
                opreg = (modrm & 7) | REX_B(s);
B
bellard 已提交
5860 5861 5862 5863 5864 5865 5866
            }

            /* simpler op */
            if (shift == 0) {
                gen_shift(s, op, ot, opreg, OR_ECX);
            } else {
                if (shift == 2) {
5867
                    shift = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5868 5869 5870 5871 5872 5873 5874 5875 5876 5877 5878 5879 5880 5881 5882 5883 5884 5885 5886 5887 5888 5889 5890 5891 5892 5893 5894 5895 5896 5897 5898 5899
                }
                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:
5900
        ot = dflag + MO_16;
5901
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5902
        mod = (modrm >> 6) & 3;
B
bellard 已提交
5903 5904
        rm = (modrm & 7) | REX_B(s);
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5905
        if (mod != 3) {
5906
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
5907
            opreg = OR_TMP0;
B
bellard 已提交
5908
        } else {
5909
            opreg = rm;
B
bellard 已提交
5910
        }
B
bellard 已提交
5911
        gen_op_mov_TN_reg(ot, 1, reg);
5912

B
bellard 已提交
5913
        if (shift) {
P
Paolo Bonzini 已提交
5914 5915 5916
            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 已提交
5917
        } else {
P
Paolo Bonzini 已提交
5918
            gen_shiftd_rm_T1(s, ot, opreg, op, cpu_regs[R_ECX]);
B
bellard 已提交
5919 5920 5921 5922 5923
        }
        break;

        /************************/
        /* floats */
5924
    case 0xd8 ... 0xdf:
B
bellard 已提交
5925 5926 5927 5928 5929 5930
        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;
        }
5931
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5932 5933 5934 5935 5936
        mod = (modrm >> 6) & 3;
        rm = modrm & 7;
        op = ((b & 7) << 3) | ((modrm >> 3) & 7);
        if (mod != 3) {
            /* memory op */
5937
            gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
B
bellard 已提交
5938 5939 5940 5941 5942 5943 5944 5945 5946 5947 5948
            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:
5949
                        gen_op_ld_v(s, MO_32, cpu_T[0], cpu_A0);
5950
                        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
B
Blue Swirl 已提交
5951
                        gen_helper_flds_FT0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5952 5953
                        break;
                    case 1:
5954
                        gen_op_ld_v(s, MO_32, cpu_T[0], cpu_A0);
5955
                        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
B
Blue Swirl 已提交
5956
                        gen_helper_fildl_FT0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5957 5958
                        break;
                    case 2:
5959 5960
                        tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0,
                                            s->mem_index, MO_LEQ);
B
Blue Swirl 已提交
5961
                        gen_helper_fldl_FT0(cpu_env, cpu_tmp1_i64);
B
bellard 已提交
5962 5963 5964
                        break;
                    case 3:
                    default:
5965
                        gen_op_ld_v(s, MO_SW, cpu_T[0], cpu_A0);
5966
                        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
B
Blue Swirl 已提交
5967
                        gen_helper_fildl_FT0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5968 5969
                        break;
                    }
5970

P
pbrook 已提交
5971
                    gen_helper_fp_arith_ST0_FT0(op1);
B
bellard 已提交
5972 5973
                    if (op1 == 3) {
                        /* fcomp needs pop */
B
Blue Swirl 已提交
5974
                        gen_helper_fpop(cpu_env);
B
bellard 已提交
5975 5976 5977 5978 5979 5980
                    }
                }
                break;
            case 0x08: /* flds */
            case 0x0a: /* fsts */
            case 0x0b: /* fstps */
B
bellard 已提交
5981 5982 5983
            case 0x18 ... 0x1b: /* fildl, fisttpl, fistl, fistpl */
            case 0x28 ... 0x2b: /* fldl, fisttpll, fstl, fstpl */
            case 0x38 ... 0x3b: /* filds, fisttps, fists, fistps */
B
bellard 已提交
5984 5985 5986 5987
                switch(op & 7) {
                case 0:
                    switch(op >> 4) {
                    case 0:
5988
                        gen_op_ld_v(s, MO_32, cpu_T[0], cpu_A0);
5989
                        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
B
Blue Swirl 已提交
5990
                        gen_helper_flds_ST0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5991 5992
                        break;
                    case 1:
5993
                        gen_op_ld_v(s, MO_32, cpu_T[0], cpu_A0);
5994
                        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
B
Blue Swirl 已提交
5995
                        gen_helper_fildl_ST0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5996 5997
                        break;
                    case 2:
5998 5999
                        tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0,
                                            s->mem_index, MO_LEQ);
B
Blue Swirl 已提交
6000
                        gen_helper_fldl_ST0(cpu_env, cpu_tmp1_i64);
B
bellard 已提交
6001 6002 6003
                        break;
                    case 3:
                    default:
6004
                        gen_op_ld_v(s, MO_SW, cpu_T[0], cpu_A0);
6005
                        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
B
Blue Swirl 已提交
6006
                        gen_helper_fildl_ST0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
6007 6008 6009
                        break;
                    }
                    break;
B
bellard 已提交
6010
                case 1:
B
bellard 已提交
6011
                    /* XXX: the corresponding CPUID bit must be tested ! */
B
bellard 已提交
6012 6013
                    switch(op >> 4) {
                    case 1:
B
Blue Swirl 已提交
6014
                        gen_helper_fisttl_ST0(cpu_tmp2_i32, cpu_env);
6015
                        tcg_gen_extu_i32_tl(cpu_T[0], cpu_tmp2_i32);
6016
                        gen_op_st_v(s, MO_32, cpu_T[0], cpu_A0);
B
bellard 已提交
6017 6018
                        break;
                    case 2:
B
Blue Swirl 已提交
6019
                        gen_helper_fisttll_ST0(cpu_tmp1_i64, cpu_env);
6020 6021
                        tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0,
                                            s->mem_index, MO_LEQ);
B
bellard 已提交
6022 6023 6024
                        break;
                    case 3:
                    default:
B
Blue Swirl 已提交
6025
                        gen_helper_fistt_ST0(cpu_tmp2_i32, cpu_env);
6026
                        tcg_gen_extu_i32_tl(cpu_T[0], cpu_tmp2_i32);
6027
                        gen_op_st_v(s, MO_16, cpu_T[0], cpu_A0);
B
bellard 已提交
6028
                        break;
B
bellard 已提交
6029
                    }
B
Blue Swirl 已提交
6030
                    gen_helper_fpop(cpu_env);
B
bellard 已提交
6031
                    break;
B
bellard 已提交
6032 6033 6034
                default:
                    switch(op >> 4) {
                    case 0:
B
Blue Swirl 已提交
6035
                        gen_helper_fsts_ST0(cpu_tmp2_i32, cpu_env);
6036
                        tcg_gen_extu_i32_tl(cpu_T[0], cpu_tmp2_i32);
6037
                        gen_op_st_v(s, MO_32, cpu_T[0], cpu_A0);
B
bellard 已提交
6038 6039
                        break;
                    case 1:
B
Blue Swirl 已提交
6040
                        gen_helper_fistl_ST0(cpu_tmp2_i32, cpu_env);
6041
                        tcg_gen_extu_i32_tl(cpu_T[0], cpu_tmp2_i32);
6042
                        gen_op_st_v(s, MO_32, cpu_T[0], cpu_A0);
B
bellard 已提交
6043 6044
                        break;
                    case 2:
B
Blue Swirl 已提交
6045
                        gen_helper_fstl_ST0(cpu_tmp1_i64, cpu_env);
6046 6047
                        tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0,
                                            s->mem_index, MO_LEQ);
B
bellard 已提交
6048 6049 6050
                        break;
                    case 3:
                    default:
B
Blue Swirl 已提交
6051
                        gen_helper_fist_ST0(cpu_tmp2_i32, cpu_env);
6052
                        tcg_gen_extu_i32_tl(cpu_T[0], cpu_tmp2_i32);
6053
                        gen_op_st_v(s, MO_16, cpu_T[0], cpu_A0);
B
bellard 已提交
6054 6055 6056
                        break;
                    }
                    if ((op & 7) == 3)
B
Blue Swirl 已提交
6057
                        gen_helper_fpop(cpu_env);
B
bellard 已提交
6058 6059 6060 6061
                    break;
                }
                break;
            case 0x0c: /* fldenv mem */
6062
                gen_update_cc_op(s);
B
bellard 已提交
6063
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
6064
                gen_helper_fldenv(cpu_env, cpu_A0, tcg_const_i32(s->dflag));
B
bellard 已提交
6065 6066
                break;
            case 0x0d: /* fldcw mem */
6067
                gen_op_ld_v(s, MO_16, cpu_T[0], cpu_A0);
6068
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
B
Blue Swirl 已提交
6069
                gen_helper_fldcw(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
6070 6071
                break;
            case 0x0e: /* fnstenv mem */
6072
                gen_update_cc_op(s);
B
bellard 已提交
6073
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
6074
                gen_helper_fstenv(cpu_env, cpu_A0, tcg_const_i32(s->dflag));
B
bellard 已提交
6075 6076
                break;
            case 0x0f: /* fnstcw mem */
B
Blue Swirl 已提交
6077
                gen_helper_fnstcw(cpu_tmp2_i32, cpu_env);
6078
                tcg_gen_extu_i32_tl(cpu_T[0], cpu_tmp2_i32);
6079
                gen_op_st_v(s, MO_16, cpu_T[0], cpu_A0);
B
bellard 已提交
6080 6081
                break;
            case 0x1d: /* fldt mem */
6082
                gen_update_cc_op(s);
B
bellard 已提交
6083
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
6084
                gen_helper_fldt_ST0(cpu_env, cpu_A0);
B
bellard 已提交
6085 6086
                break;
            case 0x1f: /* fstpt mem */
6087
                gen_update_cc_op(s);
B
bellard 已提交
6088
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
6089 6090
                gen_helper_fstt_ST0(cpu_env, cpu_A0);
                gen_helper_fpop(cpu_env);
B
bellard 已提交
6091 6092
                break;
            case 0x2c: /* frstor mem */
6093
                gen_update_cc_op(s);
B
bellard 已提交
6094
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
6095
                gen_helper_frstor(cpu_env, cpu_A0, tcg_const_i32(s->dflag));
B
bellard 已提交
6096 6097
                break;
            case 0x2e: /* fnsave mem */
6098
                gen_update_cc_op(s);
B
bellard 已提交
6099
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
6100
                gen_helper_fsave(cpu_env, cpu_A0, tcg_const_i32(s->dflag));
B
bellard 已提交
6101 6102
                break;
            case 0x2f: /* fnstsw mem */
B
Blue Swirl 已提交
6103
                gen_helper_fnstsw(cpu_tmp2_i32, cpu_env);
6104
                tcg_gen_extu_i32_tl(cpu_T[0], cpu_tmp2_i32);
6105
                gen_op_st_v(s, MO_16, cpu_T[0], cpu_A0);
B
bellard 已提交
6106 6107
                break;
            case 0x3c: /* fbld */
6108
                gen_update_cc_op(s);
B
bellard 已提交
6109
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
6110
                gen_helper_fbld_ST0(cpu_env, cpu_A0);
B
bellard 已提交
6111 6112
                break;
            case 0x3e: /* fbstp */
6113
                gen_update_cc_op(s);
B
bellard 已提交
6114
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
6115 6116
                gen_helper_fbst_ST0(cpu_env, cpu_A0);
                gen_helper_fpop(cpu_env);
B
bellard 已提交
6117 6118
                break;
            case 0x3d: /* fildll */
6119
                tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0, s->mem_index, MO_LEQ);
B
Blue Swirl 已提交
6120
                gen_helper_fildll_ST0(cpu_env, cpu_tmp1_i64);
B
bellard 已提交
6121 6122
                break;
            case 0x3f: /* fistpll */
B
Blue Swirl 已提交
6123
                gen_helper_fistll_ST0(cpu_tmp1_i64, cpu_env);
6124
                tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0, s->mem_index, MO_LEQ);
B
Blue Swirl 已提交
6125
                gen_helper_fpop(cpu_env);
B
bellard 已提交
6126 6127 6128 6129 6130 6131 6132 6133 6134 6135
                break;
            default:
                goto illegal_op;
            }
        } else {
            /* register float ops */
            opreg = rm;

            switch(op) {
            case 0x08: /* fld sti */
B
Blue Swirl 已提交
6136 6137 6138
                gen_helper_fpush(cpu_env);
                gen_helper_fmov_ST0_STN(cpu_env,
                                        tcg_const_i32((opreg + 1) & 7));
B
bellard 已提交
6139 6140
                break;
            case 0x09: /* fxchg sti */
B
bellard 已提交
6141 6142
            case 0x29: /* fxchg4 sti, undocumented op */
            case 0x39: /* fxchg7 sti, undocumented op */
B
Blue Swirl 已提交
6143
                gen_helper_fxchg_ST0_STN(cpu_env, tcg_const_i32(opreg));
B
bellard 已提交
6144 6145 6146 6147
                break;
            case 0x0a: /* grp d9/2 */
                switch(rm) {
                case 0: /* fnop */
6148
                    /* check exceptions (FreeBSD FPU probe) */
6149
                    gen_update_cc_op(s);
B
bellard 已提交
6150
                    gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
6151
                    gen_helper_fwait(cpu_env);
B
bellard 已提交
6152 6153 6154 6155 6156 6157 6158 6159
                    break;
                default:
                    goto illegal_op;
                }
                break;
            case 0x0c: /* grp d9/4 */
                switch(rm) {
                case 0: /* fchs */
B
Blue Swirl 已提交
6160
                    gen_helper_fchs_ST0(cpu_env);
B
bellard 已提交
6161 6162
                    break;
                case 1: /* fabs */
B
Blue Swirl 已提交
6163
                    gen_helper_fabs_ST0(cpu_env);
B
bellard 已提交
6164 6165
                    break;
                case 4: /* ftst */
B
Blue Swirl 已提交
6166 6167
                    gen_helper_fldz_FT0(cpu_env);
                    gen_helper_fcom_ST0_FT0(cpu_env);
B
bellard 已提交
6168 6169
                    break;
                case 5: /* fxam */
B
Blue Swirl 已提交
6170
                    gen_helper_fxam_ST0(cpu_env);
B
bellard 已提交
6171 6172 6173 6174 6175 6176 6177 6178 6179
                    break;
                default:
                    goto illegal_op;
                }
                break;
            case 0x0d: /* grp d9/5 */
                {
                    switch(rm) {
                    case 0:
B
Blue Swirl 已提交
6180 6181
                        gen_helper_fpush(cpu_env);
                        gen_helper_fld1_ST0(cpu_env);
B
bellard 已提交
6182 6183
                        break;
                    case 1:
B
Blue Swirl 已提交
6184 6185
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldl2t_ST0(cpu_env);
B
bellard 已提交
6186 6187
                        break;
                    case 2:
B
Blue Swirl 已提交
6188 6189
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldl2e_ST0(cpu_env);
B
bellard 已提交
6190 6191
                        break;
                    case 3:
B
Blue Swirl 已提交
6192 6193
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldpi_ST0(cpu_env);
B
bellard 已提交
6194 6195
                        break;
                    case 4:
B
Blue Swirl 已提交
6196 6197
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldlg2_ST0(cpu_env);
B
bellard 已提交
6198 6199
                        break;
                    case 5:
B
Blue Swirl 已提交
6200 6201
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldln2_ST0(cpu_env);
B
bellard 已提交
6202 6203
                        break;
                    case 6:
B
Blue Swirl 已提交
6204 6205
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldz_ST0(cpu_env);
B
bellard 已提交
6206 6207 6208 6209 6210 6211 6212 6213 6214
                        break;
                    default:
                        goto illegal_op;
                    }
                }
                break;
            case 0x0e: /* grp d9/6 */
                switch(rm) {
                case 0: /* f2xm1 */
B
Blue Swirl 已提交
6215
                    gen_helper_f2xm1(cpu_env);
B
bellard 已提交
6216 6217
                    break;
                case 1: /* fyl2x */
B
Blue Swirl 已提交
6218
                    gen_helper_fyl2x(cpu_env);
B
bellard 已提交
6219 6220
                    break;
                case 2: /* fptan */
B
Blue Swirl 已提交
6221
                    gen_helper_fptan(cpu_env);
B
bellard 已提交
6222 6223
                    break;
                case 3: /* fpatan */
B
Blue Swirl 已提交
6224
                    gen_helper_fpatan(cpu_env);
B
bellard 已提交
6225 6226
                    break;
                case 4: /* fxtract */
B
Blue Swirl 已提交
6227
                    gen_helper_fxtract(cpu_env);
B
bellard 已提交
6228 6229
                    break;
                case 5: /* fprem1 */
B
Blue Swirl 已提交
6230
                    gen_helper_fprem1(cpu_env);
B
bellard 已提交
6231 6232
                    break;
                case 6: /* fdecstp */
B
Blue Swirl 已提交
6233
                    gen_helper_fdecstp(cpu_env);
B
bellard 已提交
6234 6235 6236
                    break;
                default:
                case 7: /* fincstp */
B
Blue Swirl 已提交
6237
                    gen_helper_fincstp(cpu_env);
B
bellard 已提交
6238 6239 6240 6241 6242 6243
                    break;
                }
                break;
            case 0x0f: /* grp d9/7 */
                switch(rm) {
                case 0: /* fprem */
B
Blue Swirl 已提交
6244
                    gen_helper_fprem(cpu_env);
B
bellard 已提交
6245 6246
                    break;
                case 1: /* fyl2xp1 */
B
Blue Swirl 已提交
6247
                    gen_helper_fyl2xp1(cpu_env);
B
bellard 已提交
6248 6249
                    break;
                case 2: /* fsqrt */
B
Blue Swirl 已提交
6250
                    gen_helper_fsqrt(cpu_env);
B
bellard 已提交
6251 6252
                    break;
                case 3: /* fsincos */
B
Blue Swirl 已提交
6253
                    gen_helper_fsincos(cpu_env);
B
bellard 已提交
6254 6255
                    break;
                case 5: /* fscale */
B
Blue Swirl 已提交
6256
                    gen_helper_fscale(cpu_env);
B
bellard 已提交
6257 6258
                    break;
                case 4: /* frndint */
B
Blue Swirl 已提交
6259
                    gen_helper_frndint(cpu_env);
B
bellard 已提交
6260 6261
                    break;
                case 6: /* fsin */
B
Blue Swirl 已提交
6262
                    gen_helper_fsin(cpu_env);
B
bellard 已提交
6263 6264 6265
                    break;
                default:
                case 7: /* fcos */
B
Blue Swirl 已提交
6266
                    gen_helper_fcos(cpu_env);
B
bellard 已提交
6267 6268 6269 6270 6271 6272 6273 6274
                    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;
6275

B
bellard 已提交
6276 6277
                    op1 = op & 7;
                    if (op >= 0x20) {
P
pbrook 已提交
6278
                        gen_helper_fp_arith_STN_ST0(op1, opreg);
B
bellard 已提交
6279
                        if (op >= 0x30)
B
Blue Swirl 已提交
6280
                            gen_helper_fpop(cpu_env);
B
bellard 已提交
6281
                    } else {
B
Blue Swirl 已提交
6282
                        gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
P
pbrook 已提交
6283
                        gen_helper_fp_arith_ST0_FT0(op1);
B
bellard 已提交
6284 6285 6286 6287
                    }
                }
                break;
            case 0x02: /* fcom */
B
bellard 已提交
6288
            case 0x22: /* fcom2, undocumented op */
B
Blue Swirl 已提交
6289 6290
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fcom_ST0_FT0(cpu_env);
B
bellard 已提交
6291 6292
                break;
            case 0x03: /* fcomp */
B
bellard 已提交
6293 6294
            case 0x23: /* fcomp3, undocumented op */
            case 0x32: /* fcomp5, undocumented op */
B
Blue Swirl 已提交
6295 6296 6297
                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 已提交
6298 6299 6300 6301
                break;
            case 0x15: /* da/5 */
                switch(rm) {
                case 1: /* fucompp */
B
Blue Swirl 已提交
6302 6303 6304 6305
                    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 已提交
6306 6307 6308 6309 6310 6311 6312 6313 6314 6315 6316 6317
                    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 已提交
6318
                    gen_helper_fclex(cpu_env);
B
bellard 已提交
6319 6320
                    break;
                case 3: /* fninit */
B
Blue Swirl 已提交
6321
                    gen_helper_fninit(cpu_env);
B
bellard 已提交
6322 6323 6324 6325 6326 6327 6328 6329
                    break;
                case 4: /* fsetpm (287 only, just do nop here) */
                    break;
                default:
                    goto illegal_op;
                }
                break;
            case 0x1d: /* fucomi */
6330 6331 6332
                if (!(s->cpuid_features & CPUID_CMOV)) {
                    goto illegal_op;
                }
6333
                gen_update_cc_op(s);
B
Blue Swirl 已提交
6334 6335
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fucomi_ST0_FT0(cpu_env);
6336
                set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6337 6338
                break;
            case 0x1e: /* fcomi */
6339 6340 6341
                if (!(s->cpuid_features & CPUID_CMOV)) {
                    goto illegal_op;
                }
6342
                gen_update_cc_op(s);
B
Blue Swirl 已提交
6343 6344
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fcomi_ST0_FT0(cpu_env);
6345
                set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6346
                break;
B
bellard 已提交
6347
            case 0x28: /* ffree sti */
B
Blue Swirl 已提交
6348
                gen_helper_ffree_STN(cpu_env, tcg_const_i32(opreg));
6349
                break;
B
bellard 已提交
6350
            case 0x2a: /* fst sti */
B
Blue Swirl 已提交
6351
                gen_helper_fmov_STN_ST0(cpu_env, tcg_const_i32(opreg));
B
bellard 已提交
6352 6353
                break;
            case 0x2b: /* fstp sti */
B
bellard 已提交
6354 6355 6356
            case 0x0b: /* fstp1 sti, undocumented op */
            case 0x3a: /* fstp8 sti, undocumented op */
            case 0x3b: /* fstp9 sti, undocumented op */
B
Blue Swirl 已提交
6357 6358
                gen_helper_fmov_STN_ST0(cpu_env, tcg_const_i32(opreg));
                gen_helper_fpop(cpu_env);
B
bellard 已提交
6359 6360
                break;
            case 0x2c: /* fucom st(i) */
B
Blue Swirl 已提交
6361 6362
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fucom_ST0_FT0(cpu_env);
B
bellard 已提交
6363 6364
                break;
            case 0x2d: /* fucomp st(i) */
B
Blue Swirl 已提交
6365 6366 6367
                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 已提交
6368 6369 6370 6371
                break;
            case 0x33: /* de/3 */
                switch(rm) {
                case 1: /* fcompp */
B
Blue Swirl 已提交
6372 6373 6374 6375
                    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 已提交
6376 6377 6378 6379 6380
                    break;
                default:
                    goto illegal_op;
                }
                break;
B
bellard 已提交
6381
            case 0x38: /* ffreep sti, undocumented op */
B
Blue Swirl 已提交
6382 6383
                gen_helper_ffree_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fpop(cpu_env);
B
bellard 已提交
6384
                break;
B
bellard 已提交
6385 6386 6387
            case 0x3c: /* df/4 */
                switch(rm) {
                case 0:
B
Blue Swirl 已提交
6388
                    gen_helper_fnstsw(cpu_tmp2_i32, cpu_env);
6389
                    tcg_gen_extu_i32_tl(cpu_T[0], cpu_tmp2_i32);
6390
                    gen_op_mov_reg_T0(MO_16, R_EAX);
B
bellard 已提交
6391 6392 6393 6394 6395 6396
                    break;
                default:
                    goto illegal_op;
                }
                break;
            case 0x3d: /* fucomip */
6397 6398 6399
                if (!(s->cpuid_features & CPUID_CMOV)) {
                    goto illegal_op;
                }
6400
                gen_update_cc_op(s);
B
Blue Swirl 已提交
6401 6402 6403
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fucomi_ST0_FT0(cpu_env);
                gen_helper_fpop(cpu_env);
6404
                set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6405 6406
                break;
            case 0x3e: /* fcomip */
6407 6408 6409
                if (!(s->cpuid_features & CPUID_CMOV)) {
                    goto illegal_op;
                }
6410
                gen_update_cc_op(s);
B
Blue Swirl 已提交
6411 6412 6413
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fcomi_ST0_FT0(cpu_env);
                gen_helper_fpop(cpu_env);
6414
                set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6415
                break;
6416 6417 6418
            case 0x10 ... 0x13: /* fcmovxx */
            case 0x18 ... 0x1b:
                {
B
bellard 已提交
6419
                    int op1, l1;
6420
                    static const uint8_t fcmov_cc[8] = {
6421 6422 6423 6424 6425
                        (JCC_B << 1),
                        (JCC_Z << 1),
                        (JCC_BE << 1),
                        (JCC_P << 1),
                    };
6426 6427 6428 6429

                    if (!(s->cpuid_features & CPUID_CMOV)) {
                        goto illegal_op;
                    }
6430
                    op1 = fcmov_cc[op & 3] | (((op >> 3) & 1) ^ 1);
B
bellard 已提交
6431
                    l1 = gen_new_label();
6432
                    gen_jcc1_noeob(s, op1, l1);
B
Blue Swirl 已提交
6433
                    gen_helper_fmov_ST0_STN(cpu_env, tcg_const_i32(opreg));
B
bellard 已提交
6434
                    gen_set_label(l1);
6435 6436
                }
                break;
B
bellard 已提交
6437 6438 6439 6440 6441 6442 6443 6444 6445 6446 6447
            default:
                goto illegal_op;
            }
        }
        break;
        /************************/
        /* string ops */

    case 0xa4: /* movsS */
    case 0xa5:
        if ((b & 1) == 0)
6448
            ot = MO_8;
B
bellard 已提交
6449
        else
6450
            ot = dflag + MO_16;
B
bellard 已提交
6451 6452 6453 6454 6455 6456 6457

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

B
bellard 已提交
6459 6460 6461
    case 0xaa: /* stosS */
    case 0xab:
        if ((b & 1) == 0)
6462
            ot = MO_8;
B
bellard 已提交
6463
        else
6464
            ot = dflag + MO_16;
B
bellard 已提交
6465 6466 6467 6468 6469 6470 6471 6472 6473 6474

        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)
6475
            ot = MO_8;
B
bellard 已提交
6476
        else
6477
            ot = dflag + MO_16;
B
bellard 已提交
6478 6479 6480 6481 6482 6483 6484 6485 6486
        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)
6487
            ot = MO_8;
B
bellard 已提交
6488
        else
6489
            ot = dflag + MO_16;
B
bellard 已提交
6490 6491 6492 6493 6494 6495 6496 6497 6498 6499 6500 6501
        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)
6502
            ot = MO_8;
B
bellard 已提交
6503
        else
6504
            ot = dflag + MO_16;
B
bellard 已提交
6505 6506 6507 6508 6509 6510 6511 6512 6513 6514
        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:
6515
        if ((b & 1) == 0)
6516
            ot = MO_8;
6517
        else
6518 6519
            ot = dflag ? MO_32 : MO_16;
        gen_op_mov_TN_reg(MO_16, 0, R_EDX);
T
ths 已提交
6520
        gen_op_andl_T0_ffff();
6521 6522
        gen_check_io(s, ot, pc_start - s->cs_base, 
                     SVM_IOIO_TYPE_MASK | svm_is_rep(prefixes) | 4);
6523 6524
        if (prefixes & (PREFIX_REPZ | PREFIX_REPNZ)) {
            gen_repz_ins(s, ot, pc_start - s->cs_base, s->pc - s->cs_base);
B
bellard 已提交
6525
        } else {
6526
            gen_ins(s, ot);
P
pbrook 已提交
6527 6528 6529
            if (use_icount) {
                gen_jmp(s, s->pc - s->cs_base);
            }
B
bellard 已提交
6530 6531 6532 6533
        }
        break;
    case 0x6e: /* outsS */
    case 0x6f:
6534
        if ((b & 1) == 0)
6535
            ot = MO_8;
6536
        else
6537 6538
            ot = dflag ? MO_32 : MO_16;
        gen_op_mov_TN_reg(MO_16, 0, R_EDX);
T
ths 已提交
6539
        gen_op_andl_T0_ffff();
6540 6541
        gen_check_io(s, ot, pc_start - s->cs_base,
                     svm_is_rep(prefixes) | 4);
6542 6543
        if (prefixes & (PREFIX_REPZ | PREFIX_REPNZ)) {
            gen_repz_outs(s, ot, pc_start - s->cs_base, s->pc - s->cs_base);
B
bellard 已提交
6544
        } else {
6545
            gen_outs(s, ot);
P
pbrook 已提交
6546 6547 6548
            if (use_icount) {
                gen_jmp(s, s->pc - s->cs_base);
            }
B
bellard 已提交
6549 6550 6551 6552 6553
        }
        break;

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

B
bellard 已提交
6555 6556
    case 0xe4:
    case 0xe5:
6557
        if ((b & 1) == 0)
6558
            ot = MO_8;
6559
        else
6560
            ot = dflag ? MO_32 : MO_16;
6561
        val = cpu_ldub_code(env, s->pc++);
6562
        gen_op_movl_T0_im(val);
6563 6564
        gen_check_io(s, ot, pc_start - s->cs_base,
                     SVM_IOIO_TYPE_MASK | svm_is_rep(prefixes));
P
pbrook 已提交
6565 6566
        if (use_icount)
            gen_io_start();
6567
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
P
pbrook 已提交
6568
        gen_helper_in_func(ot, cpu_T[1], cpu_tmp2_i32);
B
bellard 已提交
6569
        gen_op_mov_reg_T1(ot, R_EAX);
P
pbrook 已提交
6570 6571 6572 6573
        if (use_icount) {
            gen_io_end();
            gen_jmp(s, s->pc - s->cs_base);
        }
B
bellard 已提交
6574 6575 6576
        break;
    case 0xe6:
    case 0xe7:
6577
        if ((b & 1) == 0)
6578
            ot = MO_8;
6579
        else
6580
            ot = dflag ? MO_32 : MO_16;
6581
        val = cpu_ldub_code(env, s->pc++);
6582
        gen_op_movl_T0_im(val);
6583 6584
        gen_check_io(s, ot, pc_start - s->cs_base,
                     svm_is_rep(prefixes));
B
bellard 已提交
6585
        gen_op_mov_TN_reg(ot, 1, R_EAX);
6586

P
pbrook 已提交
6587 6588
        if (use_icount)
            gen_io_start();
6589 6590
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
        tcg_gen_trunc_tl_i32(cpu_tmp3_i32, cpu_T[1]);
P
pbrook 已提交
6591
        gen_helper_out_func(ot, cpu_tmp2_i32, cpu_tmp3_i32);
P
pbrook 已提交
6592 6593 6594 6595
        if (use_icount) {
            gen_io_end();
            gen_jmp(s, s->pc - s->cs_base);
        }
B
bellard 已提交
6596 6597 6598
        break;
    case 0xec:
    case 0xed:
6599
        if ((b & 1) == 0)
6600
            ot = MO_8;
6601
        else
6602 6603
            ot = dflag ? MO_32 : MO_16;
        gen_op_mov_TN_reg(MO_16, 0, R_EDX);
6604
        gen_op_andl_T0_ffff();
6605 6606
        gen_check_io(s, ot, pc_start - s->cs_base,
                     SVM_IOIO_TYPE_MASK | svm_is_rep(prefixes));
P
pbrook 已提交
6607 6608
        if (use_icount)
            gen_io_start();
6609
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
P
pbrook 已提交
6610
        gen_helper_in_func(ot, cpu_T[1], cpu_tmp2_i32);
B
bellard 已提交
6611
        gen_op_mov_reg_T1(ot, R_EAX);
P
pbrook 已提交
6612 6613 6614 6615
        if (use_icount) {
            gen_io_end();
            gen_jmp(s, s->pc - s->cs_base);
        }
B
bellard 已提交
6616 6617 6618
        break;
    case 0xee:
    case 0xef:
6619
        if ((b & 1) == 0)
6620
            ot = MO_8;
6621
        else
6622 6623
            ot = dflag ? MO_32 : MO_16;
        gen_op_mov_TN_reg(MO_16, 0, R_EDX);
6624
        gen_op_andl_T0_ffff();
6625 6626
        gen_check_io(s, ot, pc_start - s->cs_base,
                     svm_is_rep(prefixes));
B
bellard 已提交
6627
        gen_op_mov_TN_reg(ot, 1, R_EAX);
6628

P
pbrook 已提交
6629 6630
        if (use_icount)
            gen_io_start();
6631 6632
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
        tcg_gen_trunc_tl_i32(cpu_tmp3_i32, cpu_T[1]);
P
pbrook 已提交
6633
        gen_helper_out_func(ot, cpu_tmp2_i32, cpu_tmp3_i32);
P
pbrook 已提交
6634 6635 6636 6637
        if (use_icount) {
            gen_io_end();
            gen_jmp(s, s->pc - s->cs_base);
        }
B
bellard 已提交
6638 6639 6640 6641 6642
        break;

        /************************/
        /* control */
    case 0xc2: /* ret im */
6643
        val = cpu_ldsw_code(env, s->pc);
B
bellard 已提交
6644 6645
        s->pc += 2;
        gen_pop_T0(s);
6646 6647
        if (CODE64(s) && s->dflag)
            s->dflag = 2;
B
bellard 已提交
6648 6649 6650 6651 6652 6653 6654 6655 6656 6657 6658 6659 6660 6661 6662
        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 */
6663
        val = cpu_ldsw_code(env, s->pc);
B
bellard 已提交
6664 6665 6666
        s->pc += 2;
    do_lret:
        if (s->pe && !s->vm86) {
6667
            gen_update_cc_op(s);
B
bellard 已提交
6668
            gen_jmp_im(pc_start - s->cs_base);
6669
            gen_helper_lret_protected(cpu_env, tcg_const_i32(s->dflag),
P
pbrook 已提交
6670
                                      tcg_const_i32(val));
B
bellard 已提交
6671 6672 6673
        } else {
            gen_stack_A0(s);
            /* pop offset */
6674
            gen_op_ld_v(s, 1 + s->dflag, cpu_T[0], cpu_A0);
B
bellard 已提交
6675 6676 6677 6678 6679 6680 6681
            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);
6682
            gen_op_ld_v(s, 1 + s->dflag, cpu_T[0], cpu_A0);
6683
            gen_op_movl_seg_T0_vm(R_CS);
B
bellard 已提交
6684 6685 6686 6687 6688 6689 6690 6691 6692
            /* 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 已提交
6693
        gen_svm_check_intercept(s, pc_start, SVM_EXIT_IRET);
B
bellard 已提交
6694 6695
        if (!s->pe) {
            /* real mode */
6696
            gen_helper_iret_real(cpu_env, tcg_const_i32(s->dflag));
6697
            set_cc_op(s, CC_OP_EFLAGS);
6698 6699 6700 6701
        } else if (s->vm86) {
            if (s->iopl != 3) {
                gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
            } else {
6702
                gen_helper_iret_real(cpu_env, tcg_const_i32(s->dflag));
6703
                set_cc_op(s, CC_OP_EFLAGS);
6704
            }
B
bellard 已提交
6705
        } else {
6706
            gen_update_cc_op(s);
B
bellard 已提交
6707
            gen_jmp_im(pc_start - s->cs_base);
6708
            gen_helper_iret_protected(cpu_env, tcg_const_i32(s->dflag),
P
pbrook 已提交
6709
                                      tcg_const_i32(s->pc - s->cs_base));
6710
            set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6711 6712 6713 6714 6715
        }
        gen_eob(s);
        break;
    case 0xe8: /* call im */
        {
B
bellard 已提交
6716
            if (dflag)
6717
                tval = (int32_t)insn_get(env, s, MO_32);
B
bellard 已提交
6718
            else
6719
                tval = (int16_t)insn_get(env, s, MO_16);
B
bellard 已提交
6720
            next_eip = s->pc - s->cs_base;
B
bellard 已提交
6721
            tval += next_eip;
B
bellard 已提交
6722
            if (s->dflag == 0)
B
bellard 已提交
6723
                tval &= 0xffff;
6724 6725
            else if(!CODE64(s))
                tval &= 0xffffffff;
B
bellard 已提交
6726
            gen_movtl_T0_im(next_eip);
B
bellard 已提交
6727
            gen_push_T0(s);
B
bellard 已提交
6728
            gen_jmp(s, tval);
B
bellard 已提交
6729 6730 6731 6732 6733
        }
        break;
    case 0x9a: /* lcall im */
        {
            unsigned int selector, offset;
6734

B
bellard 已提交
6735 6736
            if (CODE64(s))
                goto illegal_op;
6737
            ot = dflag ? MO_32 : MO_16;
6738
            offset = insn_get(env, s, ot);
6739
            selector = insn_get(env, s, MO_16);
6740

B
bellard 已提交
6741
            gen_op_movl_T0_im(selector);
B
bellard 已提交
6742
            gen_op_movl_T1_imu(offset);
B
bellard 已提交
6743 6744
        }
        goto do_lcall;
B
bellard 已提交
6745
    case 0xe9: /* jmp im */
B
bellard 已提交
6746
        if (dflag)
6747
            tval = (int32_t)insn_get(env, s, MO_32);
B
bellard 已提交
6748
        else
6749
            tval = (int16_t)insn_get(env, s, MO_16);
B
bellard 已提交
6750
        tval += s->pc - s->cs_base;
B
bellard 已提交
6751
        if (s->dflag == 0)
B
bellard 已提交
6752
            tval &= 0xffff;
6753 6754
        else if(!CODE64(s))
            tval &= 0xffffffff;
B
bellard 已提交
6755
        gen_jmp(s, tval);
B
bellard 已提交
6756 6757 6758 6759 6760
        break;
    case 0xea: /* ljmp im */
        {
            unsigned int selector, offset;

B
bellard 已提交
6761 6762
            if (CODE64(s))
                goto illegal_op;
6763
            ot = dflag ? MO_32 : MO_16;
6764
            offset = insn_get(env, s, ot);
6765
            selector = insn_get(env, s, MO_16);
6766

B
bellard 已提交
6767
            gen_op_movl_T0_im(selector);
B
bellard 已提交
6768
            gen_op_movl_T1_imu(offset);
B
bellard 已提交
6769 6770 6771
        }
        goto do_ljmp;
    case 0xeb: /* jmp Jb */
6772
        tval = (int8_t)insn_get(env, s, MO_8);
B
bellard 已提交
6773
        tval += s->pc - s->cs_base;
B
bellard 已提交
6774
        if (s->dflag == 0)
B
bellard 已提交
6775 6776
            tval &= 0xffff;
        gen_jmp(s, tval);
B
bellard 已提交
6777 6778
        break;
    case 0x70 ... 0x7f: /* jcc Jb */
6779
        tval = (int8_t)insn_get(env, s, MO_8);
B
bellard 已提交
6780 6781 6782
        goto do_jcc;
    case 0x180 ... 0x18f: /* jcc Jv */
        if (dflag) {
6783
            tval = (int32_t)insn_get(env, s, MO_32);
B
bellard 已提交
6784
        } else {
6785
            tval = (int16_t)insn_get(env, s, MO_16);
B
bellard 已提交
6786 6787 6788
        }
    do_jcc:
        next_eip = s->pc - s->cs_base;
B
bellard 已提交
6789
        tval += next_eip;
B
bellard 已提交
6790
        if (s->dflag == 0)
B
bellard 已提交
6791 6792
            tval &= 0xffff;
        gen_jcc(s, b, tval, next_eip);
B
bellard 已提交
6793 6794 6795
        break;

    case 0x190 ... 0x19f: /* setcc Gv */
6796
        modrm = cpu_ldub_code(env, s->pc++);
6797
        gen_setcc1(s, b, cpu_T[0]);
6798
        gen_ldst_modrm(env, s, modrm, MO_8, OR_TMP0, 1);
B
bellard 已提交
6799 6800
        break;
    case 0x140 ... 0x14f: /* cmov Gv, Ev */
6801 6802 6803
        if (!(s->cpuid_features & CPUID_CMOV)) {
            goto illegal_op;
        }
6804
        ot = dflag + MO_16;
6805 6806 6807
        modrm = cpu_ldub_code(env, s->pc++);
        reg = ((modrm >> 3) & 7) | rex_r;
        gen_cmovcc1(env, s, ot, b, modrm, reg);
B
bellard 已提交
6808
        break;
6809

B
bellard 已提交
6810 6811 6812
        /************************/
        /* flags */
    case 0x9c: /* pushf */
B
bellard 已提交
6813
        gen_svm_check_intercept(s, pc_start, SVM_EXIT_PUSHF);
B
bellard 已提交
6814 6815 6816
        if (s->vm86 && s->iopl != 3) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
6817
            gen_update_cc_op(s);
6818
            gen_helper_read_eflags(cpu_T[0], cpu_env);
B
bellard 已提交
6819 6820 6821 6822
            gen_push_T0(s);
        }
        break;
    case 0x9d: /* popf */
B
bellard 已提交
6823
        gen_svm_check_intercept(s, pc_start, SVM_EXIT_POPF);
B
bellard 已提交
6824 6825 6826 6827 6828 6829
        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) {
6830 6831 6832 6833 6834
                    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 已提交
6835
                } else {
6836 6837 6838 6839 6840
                    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 已提交
6841 6842
                }
            } else {
B
bellard 已提交
6843 6844
                if (s->cpl <= s->iopl) {
                    if (s->dflag) {
6845 6846 6847 6848 6849 6850
                        gen_helper_write_eflags(cpu_env, cpu_T[0],
                                                tcg_const_i32((TF_MASK |
                                                               AC_MASK |
                                                               ID_MASK |
                                                               NT_MASK |
                                                               IF_MASK)));
B
bellard 已提交
6851
                    } else {
6852 6853 6854 6855 6856 6857 6858
                        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 已提交
6859
                    }
B
bellard 已提交
6860
                } else {
B
bellard 已提交
6861
                    if (s->dflag) {
6862 6863 6864
                        gen_helper_write_eflags(cpu_env, cpu_T[0],
                                           tcg_const_i32((TF_MASK | AC_MASK |
                                                          ID_MASK | NT_MASK)));
B
bellard 已提交
6865
                    } else {
6866 6867 6868 6869
                        gen_helper_write_eflags(cpu_env, cpu_T[0],
                                           tcg_const_i32((TF_MASK | AC_MASK |
                                                          ID_MASK | NT_MASK)
                                                         & 0xffff));
B
bellard 已提交
6870
                    }
B
bellard 已提交
6871 6872 6873
                }
            }
            gen_pop_update(s);
6874
            set_cc_op(s, CC_OP_EFLAGS);
H
H. Peter Anvin 已提交
6875
            /* abort translation because TF/AC flag may change */
B
bellard 已提交
6876
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
6877 6878 6879 6880
            gen_eob(s);
        }
        break;
    case 0x9e: /* sahf */
B
bellard 已提交
6881
        if (CODE64(s) && !(s->cpuid_ext3_features & CPUID_EXT3_LAHF_LM))
B
bellard 已提交
6882
            goto illegal_op;
6883
        gen_op_mov_TN_reg(MO_8, 0, R_AH);
6884
        gen_compute_eflags(s);
6885 6886 6887
        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 已提交
6888 6889
        break;
    case 0x9f: /* lahf */
B
bellard 已提交
6890
        if (CODE64(s) && !(s->cpuid_ext3_features & CPUID_EXT3_LAHF_LM))
B
bellard 已提交
6891
            goto illegal_op;
6892
        gen_compute_eflags(s);
6893
        /* Note: gen_compute_eflags() only gives the condition codes */
6894
        tcg_gen_ori_tl(cpu_T[0], cpu_cc_src, 0x02);
6895
        gen_op_mov_reg_T0(MO_8, R_AH);
B
bellard 已提交
6896 6897
        break;
    case 0xf5: /* cmc */
6898
        gen_compute_eflags(s);
6899
        tcg_gen_xori_tl(cpu_cc_src, cpu_cc_src, CC_C);
B
bellard 已提交
6900 6901
        break;
    case 0xf8: /* clc */
6902
        gen_compute_eflags(s);
6903
        tcg_gen_andi_tl(cpu_cc_src, cpu_cc_src, ~CC_C);
B
bellard 已提交
6904 6905
        break;
    case 0xf9: /* stc */
6906
        gen_compute_eflags(s);
6907
        tcg_gen_ori_tl(cpu_cc_src, cpu_cc_src, CC_C);
B
bellard 已提交
6908 6909
        break;
    case 0xfc: /* cld */
6910
        tcg_gen_movi_i32(cpu_tmp2_i32, 1);
6911
        tcg_gen_st_i32(cpu_tmp2_i32, cpu_env, offsetof(CPUX86State, df));
B
bellard 已提交
6912 6913
        break;
    case 0xfd: /* std */
6914
        tcg_gen_movi_i32(cpu_tmp2_i32, -1);
6915
        tcg_gen_st_i32(cpu_tmp2_i32, cpu_env, offsetof(CPUX86State, df));
B
bellard 已提交
6916 6917 6918 6919 6920
        break;

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

7255
            tval = (int8_t)insn_get(env, s, MO_8);
B
bellard 已提交
7256 7257 7258 7259
            next_eip = s->pc - s->cs_base;
            tval += next_eip;
            if (s->dflag == 0)
                tval &= 0xffff;
7260

B
bellard 已提交
7261 7262
            l1 = gen_new_label();
            l2 = gen_new_label();
7263
            l3 = gen_new_label();
B
bellard 已提交
7264
            b &= 3;
7265 7266 7267 7268 7269
            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);
7270
                gen_jcc1(s, (JCC_Z << 1) | (b ^ 1), l1);
7271 7272 7273 7274 7275 7276 7277 7278 7279
                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 已提交
7280 7281
            }

7282
            gen_set_label(l3);
B
bellard 已提交
7283
            gen_jmp_im(next_eip);
7284
            tcg_gen_br(l2);
7285

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

7736
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7737 7738 7739
            reg = ((modrm >> 3) & 7) | rex_r;
            mod = (modrm >> 6) & 3;
            rm = (modrm & 7) | REX_B(s);
7740

B
bellard 已提交
7741
            if (mod == 3) {
7742
                gen_op_mov_TN_reg(MO_32, 0, rm);
B
bellard 已提交
7743
                /* sign extend */
7744
                if (d_ot == MO_64) {
B
bellard 已提交
7745
                    tcg_gen_ext32s_tl(cpu_T[0], cpu_T[0]);
7746
                }
B
bellard 已提交
7747
                gen_op_mov_reg_T0(d_ot, reg);
B
bellard 已提交
7748
            } else {
7749
                gen_lea_modrm(env, s, modrm, &reg_addr, &offset_addr);
7750
                if (d_ot == MO_64) {
7751
                    gen_op_ld_v(s, MO_32 | MO_SIGN, cpu_T[0], cpu_A0);
B
bellard 已提交
7752
                } else {
7753
                    gen_op_ld_v(s, MO_32, cpu_T[0], cpu_A0);
B
bellard 已提交
7754
                }
B
bellard 已提交
7755
                gen_op_mov_reg_T0(d_ot, reg);
B
bellard 已提交
7756
            }
7757
        } else
B
bellard 已提交
7758 7759
#endif
        {
7760
            int label1;
L
Laurent Desnogues 已提交
7761
            TCGv t0, t1, t2, a0;
7762

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

8055
        modrm = cpu_ldub_code(env, s->pc++);
M
malc 已提交
8056
        reg = ((modrm >> 3) & 7) | rex_r;
B
balrog 已提交
8057 8058

        if (s->prefix & PREFIX_DATA)
8059
            ot = MO_16;
B
balrog 已提交
8060
        else if (s->dflag != 2)
8061
            ot = MO_32;
B
balrog 已提交
8062
        else
8063
            ot = MO_64;
B
balrog 已提交
8064

8065
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
B
Blue Swirl 已提交
8066
        gen_helper_popcnt(cpu_T[0], cpu_env, cpu_T[0], tcg_const_i32(ot));
B
balrog 已提交
8067
        gen_op_mov_reg_T0(ot, reg);
B
balrog 已提交
8068

8069
        set_cc_op(s, CC_OP_EFLAGS);
B
balrog 已提交
8070
        break;
A
aurel32 已提交
8071 8072 8073
    case 0x10e ... 0x10f:
        /* 3DNow! instructions, ignore prefixes */
        s->prefix &= ~(PREFIX_REPZ | PREFIX_REPNZ | PREFIX_DATA);
B
bellard 已提交
8074 8075
    case 0x110 ... 0x117:
    case 0x128 ... 0x12f:
B
balrog 已提交
8076
    case 0x138 ... 0x13a:
8077
    case 0x150 ... 0x179:
B
bellard 已提交
8078 8079 8080 8081
    case 0x17c ... 0x17f:
    case 0x1c2:
    case 0x1c4 ... 0x1c6:
    case 0x1d0 ... 0x1fe:
8082
        gen_sse(env, s, b, pc_start, rex_r);
B
bellard 已提交
8083
        break;
B
bellard 已提交
8084 8085 8086 8087 8088
    default:
        goto illegal_op;
    }
    /* lock generation */
    if (s->prefix & PREFIX_LOCK)
P
pbrook 已提交
8089
        gen_helper_unlock();
B
bellard 已提交
8090 8091
    return s->pc;
 illegal_op:
8092
    if (s->prefix & PREFIX_LOCK)
P
pbrook 已提交
8093
        gen_helper_unlock();
B
bellard 已提交
8094 8095 8096 8097 8098 8099 8100
    /* 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 已提交
8101 8102
    cpu_env = tcg_global_reg_new_ptr(TCG_AREG0, "env");
    cpu_cc_op = tcg_global_mem_new_i32(TCG_AREG0,
8103 8104
                                       offsetof(CPUX86State, cc_op), "cc_op");
    cpu_cc_dst = tcg_global_mem_new(TCG_AREG0, offsetof(CPUX86State, cc_dst),
P
pbrook 已提交
8105
                                    "cc_dst");
8106 8107
    cpu_cc_src = tcg_global_mem_new(TCG_AREG0, offsetof(CPUX86State, cc_src),
                                    "cc_src");
8108 8109
    cpu_cc_src2 = tcg_global_mem_new(TCG_AREG0, offsetof(CPUX86State, cc_src2),
                                     "cc_src2");
8110

8111 8112
#ifdef TARGET_X86_64
    cpu_regs[R_EAX] = tcg_global_mem_new_i64(TCG_AREG0,
8113
                                             offsetof(CPUX86State, regs[R_EAX]), "rax");
8114
    cpu_regs[R_ECX] = tcg_global_mem_new_i64(TCG_AREG0,
8115
                                             offsetof(CPUX86State, regs[R_ECX]), "rcx");
8116
    cpu_regs[R_EDX] = tcg_global_mem_new_i64(TCG_AREG0,
8117
                                             offsetof(CPUX86State, regs[R_EDX]), "rdx");
8118
    cpu_regs[R_EBX] = tcg_global_mem_new_i64(TCG_AREG0,
8119
                                             offsetof(CPUX86State, regs[R_EBX]), "rbx");
8120
    cpu_regs[R_ESP] = tcg_global_mem_new_i64(TCG_AREG0,
8121
                                             offsetof(CPUX86State, regs[R_ESP]), "rsp");
8122
    cpu_regs[R_EBP] = tcg_global_mem_new_i64(TCG_AREG0,
8123
                                             offsetof(CPUX86State, regs[R_EBP]), "rbp");
8124
    cpu_regs[R_ESI] = tcg_global_mem_new_i64(TCG_AREG0,
8125
                                             offsetof(CPUX86State, regs[R_ESI]), "rsi");
8126
    cpu_regs[R_EDI] = tcg_global_mem_new_i64(TCG_AREG0,
8127
                                             offsetof(CPUX86State, regs[R_EDI]), "rdi");
8128
    cpu_regs[8] = tcg_global_mem_new_i64(TCG_AREG0,
8129
                                         offsetof(CPUX86State, regs[8]), "r8");
8130
    cpu_regs[9] = tcg_global_mem_new_i64(TCG_AREG0,
8131
                                          offsetof(CPUX86State, regs[9]), "r9");
8132
    cpu_regs[10] = tcg_global_mem_new_i64(TCG_AREG0,
8133
                                          offsetof(CPUX86State, regs[10]), "r10");
8134
    cpu_regs[11] = tcg_global_mem_new_i64(TCG_AREG0,
8135
                                          offsetof(CPUX86State, regs[11]), "r11");
8136
    cpu_regs[12] = tcg_global_mem_new_i64(TCG_AREG0,
8137
                                          offsetof(CPUX86State, regs[12]), "r12");
8138
    cpu_regs[13] = tcg_global_mem_new_i64(TCG_AREG0,
8139
                                          offsetof(CPUX86State, regs[13]), "r13");
8140
    cpu_regs[14] = tcg_global_mem_new_i64(TCG_AREG0,
8141
                                          offsetof(CPUX86State, regs[14]), "r14");
8142
    cpu_regs[15] = tcg_global_mem_new_i64(TCG_AREG0,
8143
                                          offsetof(CPUX86State, regs[15]), "r15");
8144 8145
#else
    cpu_regs[R_EAX] = tcg_global_mem_new_i32(TCG_AREG0,
8146
                                             offsetof(CPUX86State, regs[R_EAX]), "eax");
8147
    cpu_regs[R_ECX] = tcg_global_mem_new_i32(TCG_AREG0,
8148
                                             offsetof(CPUX86State, regs[R_ECX]), "ecx");
8149
    cpu_regs[R_EDX] = tcg_global_mem_new_i32(TCG_AREG0,
8150
                                             offsetof(CPUX86State, regs[R_EDX]), "edx");
8151
    cpu_regs[R_EBX] = tcg_global_mem_new_i32(TCG_AREG0,
8152
                                             offsetof(CPUX86State, regs[R_EBX]), "ebx");
8153
    cpu_regs[R_ESP] = tcg_global_mem_new_i32(TCG_AREG0,
8154
                                             offsetof(CPUX86State, regs[R_ESP]), "esp");
8155
    cpu_regs[R_EBP] = tcg_global_mem_new_i32(TCG_AREG0,
8156
                                             offsetof(CPUX86State, regs[R_EBP]), "ebp");
8157
    cpu_regs[R_ESI] = tcg_global_mem_new_i32(TCG_AREG0,
8158
                                             offsetof(CPUX86State, regs[R_ESI]), "esi");
8159
    cpu_regs[R_EDI] = tcg_global_mem_new_i32(TCG_AREG0,
8160
                                             offsetof(CPUX86State, regs[R_EDI]), "edi");
8161
#endif
B
bellard 已提交
8162 8163 8164 8165 8166
}

/* 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. */
8167
static inline void gen_intermediate_code_internal(X86CPU *cpu,
8168
                                                  TranslationBlock *tb,
8169
                                                  bool search_pc)
B
bellard 已提交
8170
{
8171
    CPUState *cs = CPU(cpu);
8172
    CPUX86State *env = &cpu->env;
B
bellard 已提交
8173
    DisasContext dc1, *dc = &dc1;
B
bellard 已提交
8174
    target_ulong pc_ptr;
B
bellard 已提交
8175
    uint16_t *gen_opc_end;
8176
    CPUBreakpoint *bp;
8177
    int j, lj;
8178
    uint64_t flags;
B
bellard 已提交
8179 8180
    target_ulong pc_start;
    target_ulong cs_base;
P
pbrook 已提交
8181 8182
    int num_insns;
    int max_insns;
8183

B
bellard 已提交
8184
    /* generate intermediate code */
B
bellard 已提交
8185 8186
    pc_start = tb->pc;
    cs_base = tb->cs_base;
B
bellard 已提交
8187
    flags = tb->flags;
B
bellard 已提交
8188

8189
    dc->pe = (flags >> HF_PE_SHIFT) & 1;
B
bellard 已提交
8190 8191 8192 8193 8194 8195 8196 8197
    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;
8198
    dc->singlestep_enabled = cs->singlestep_enabled;
B
bellard 已提交
8199
    dc->cc_op = CC_OP_DYNAMIC;
8200
    dc->cc_op_dirty = false;
B
bellard 已提交
8201 8202 8203 8204 8205 8206
    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) {
8207
        dc->mem_index = cpu_mmu_index(env);
B
bellard 已提交
8208
    }
8209 8210 8211 8212 8213
    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 已提交
8214 8215 8216 8217
#ifdef TARGET_X86_64
    dc->lma = (flags >> HF_LMA_SHIFT) & 1;
    dc->code64 = (flags >> HF_CS64_SHIFT) & 1;
#endif
B
bellard 已提交
8218
    dc->flags = flags;
8219
    dc->jmp_opt = !(dc->tf || cs->singlestep_enabled ||
8220
                    (flags & HF_INHIBIT_IRQ_MASK)
B
bellard 已提交
8221
#ifndef CONFIG_SOFTMMU
B
bellard 已提交
8222 8223 8224
                    || (flags & HF_SOFTMMU_MASK)
#endif
                    );
8225 8226
#if 0
    /* check addseg logic */
B
bellard 已提交
8227
    if (!dc->addseg && (dc->vm86 || !dc->pe || !dc->code32))
8228 8229 8230
        printf("ERROR addseg\n");
#endif

P
pbrook 已提交
8231 8232 8233 8234 8235 8236 8237 8238 8239 8240 8241
    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();
8242
    cpu_cc_srcT = tcg_temp_local_new();
B
bellard 已提交
8243

8244
    gen_opc_end = tcg_ctx.gen_opc_buf + OPC_MAX_SIZE;
B
bellard 已提交
8245 8246 8247 8248

    dc->is_jmp = DISAS_NEXT;
    pc_ptr = pc_start;
    lj = -1;
P
pbrook 已提交
8249 8250 8251 8252
    num_insns = 0;
    max_insns = tb->cflags & CF_COUNT_MASK;
    if (max_insns == 0)
        max_insns = CF_COUNT_MASK;
B
bellard 已提交
8253

8254
    gen_tb_start();
B
bellard 已提交
8255
    for(;;) {
B
Blue Swirl 已提交
8256 8257
        if (unlikely(!QTAILQ_EMPTY(&env->breakpoints))) {
            QTAILQ_FOREACH(bp, &env->breakpoints, entry) {
J
Jan Kiszka 已提交
8258 8259
                if (bp->pc == pc_ptr &&
                    !((bp->flags & BP_CPU) && (tb->flags & HF_RF_MASK))) {
B
bellard 已提交
8260 8261 8262 8263 8264 8265
                    gen_debug(dc, pc_ptr - dc->cs_base);
                    break;
                }
            }
        }
        if (search_pc) {
8266
            j = tcg_ctx.gen_opc_ptr - tcg_ctx.gen_opc_buf;
B
bellard 已提交
8267 8268 8269
            if (lj < j) {
                lj++;
                while (lj < j)
8270
                    tcg_ctx.gen_opc_instr_start[lj++] = 0;
B
bellard 已提交
8271
            }
8272
            tcg_ctx.gen_opc_pc[lj] = pc_ptr;
B
bellard 已提交
8273
            gen_opc_cc_op[lj] = dc->cc_op;
8274
            tcg_ctx.gen_opc_instr_start[lj] = 1;
8275
            tcg_ctx.gen_opc_icount[lj] = num_insns;
B
bellard 已提交
8276
        }
P
pbrook 已提交
8277 8278 8279
        if (num_insns + 1 == max_insns && (tb->cflags & CF_LAST_IO))
            gen_io_start();

8280
        pc_ptr = disas_insn(env, dc, pc_ptr);
P
pbrook 已提交
8281
        num_insns++;
B
bellard 已提交
8282 8283 8284 8285 8286
        /* stop translation if indicated */
        if (dc->is_jmp)
            break;
        /* if single step mode, we generate only one instruction and
           generate an exception */
8287 8288 8289
        /* 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 */
8290
        if (dc->tf || dc->singlestep_enabled ||
P
pbrook 已提交
8291
            (flags & HF_INHIBIT_IRQ_MASK)) {
B
bellard 已提交
8292
            gen_jmp_im(pc_ptr - dc->cs_base);
B
bellard 已提交
8293 8294 8295 8296
            gen_eob(dc);
            break;
        }
        /* if too long translation, stop generation too */
8297
        if (tcg_ctx.gen_opc_ptr >= gen_opc_end ||
P
pbrook 已提交
8298 8299
            (pc_ptr - pc_start) >= (TARGET_PAGE_SIZE - 32) ||
            num_insns >= max_insns) {
B
bellard 已提交
8300
            gen_jmp_im(pc_ptr - dc->cs_base);
B
bellard 已提交
8301 8302 8303
            gen_eob(dc);
            break;
        }
8304 8305 8306 8307 8308
        if (singlestep) {
            gen_jmp_im(pc_ptr - dc->cs_base);
            gen_eob(dc);
            break;
        }
B
bellard 已提交
8309
    }
P
pbrook 已提交
8310 8311
    if (tb->cflags & CF_LAST_IO)
        gen_io_end();
8312
    gen_tb_end(tb, num_insns);
8313
    *tcg_ctx.gen_opc_ptr = INDEX_op_end;
B
bellard 已提交
8314 8315
    /* we don't forget to fill the last values */
    if (search_pc) {
8316
        j = tcg_ctx.gen_opc_ptr - tcg_ctx.gen_opc_buf;
B
bellard 已提交
8317 8318
        lj++;
        while (lj <= j)
8319
            tcg_ctx.gen_opc_instr_start[lj++] = 0;
B
bellard 已提交
8320
    }
8321

B
bellard 已提交
8322
#ifdef DEBUG_DISAS
8323
    if (qemu_loglevel_mask(CPU_LOG_TB_IN_ASM)) {
B
bellard 已提交
8324
        int disas_flags;
8325 8326
        qemu_log("----------------\n");
        qemu_log("IN: %s\n", lookup_symbol(pc_start));
B
bellard 已提交
8327 8328 8329 8330 8331 8332
#ifdef TARGET_X86_64
        if (dc->code64)
            disas_flags = 2;
        else
#endif
            disas_flags = !dc->code32;
B
Blue Swirl 已提交
8333
        log_target_disas(env, pc_start, pc_ptr - pc_start, disas_flags);
8334
        qemu_log("\n");
B
bellard 已提交
8335 8336 8337
    }
#endif

P
pbrook 已提交
8338
    if (!search_pc) {
B
bellard 已提交
8339
        tb->size = pc_ptr - pc_start;
P
pbrook 已提交
8340 8341
        tb->icount = num_insns;
    }
B
bellard 已提交
8342 8343
}

8344
void gen_intermediate_code(CPUX86State *env, TranslationBlock *tb)
B
bellard 已提交
8345
{
8346
    gen_intermediate_code_internal(x86_env_get_cpu(env), tb, false);
B
bellard 已提交
8347 8348
}

8349
void gen_intermediate_code_pc(CPUX86State *env, TranslationBlock *tb)
B
bellard 已提交
8350
{
8351
    gen_intermediate_code_internal(x86_env_get_cpu(env), tb, true);
B
bellard 已提交
8352 8353
}

8354
void restore_state_to_opc(CPUX86State *env, TranslationBlock *tb, int pc_pos)
A
aurel32 已提交
8355 8356 8357
{
    int cc_op;
#ifdef DEBUG_DISAS
8358
    if (qemu_loglevel_mask(CPU_LOG_TB_OP)) {
A
aurel32 已提交
8359
        int i;
8360
        qemu_log("RESTORE:\n");
A
aurel32 已提交
8361
        for(i = 0;i <= pc_pos; i++) {
8362
            if (tcg_ctx.gen_opc_instr_start[i]) {
8363 8364
                qemu_log("0x%04x: " TARGET_FMT_lx "\n", i,
                        tcg_ctx.gen_opc_pc[i]);
A
aurel32 已提交
8365 8366
            }
        }
8367
        qemu_log("pc_pos=0x%x eip=" TARGET_FMT_lx " cs_base=%x\n",
8368
                pc_pos, tcg_ctx.gen_opc_pc[pc_pos] - tb->cs_base,
A
aurel32 已提交
8369 8370 8371
                (uint32_t)tb->cs_base);
    }
#endif
8372
    env->eip = tcg_ctx.gen_opc_pc[pc_pos] - tb->cs_base;
A
aurel32 已提交
8373 8374 8375 8376
    cc_op = gen_opc_cc_op[pc_pos];
    if (cc_op != CC_OP_DYNAMIC)
        env->cc_op = cc_op;
}