translate.c 279.5 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
static void gen_lea_modrm(CPUX86State *env, DisasContext *s, int modrm)
B
bellard 已提交
1961
{
B
bellard 已提交
1962
    target_long disp;
B
bellard 已提交
1963
    int havesib;
B
bellard 已提交
1964
    int base;
B
bellard 已提交
1965 1966 1967
    int index;
    int scale;
    int mod, rm, code, override, must_add_seg;
1968
    TCGv sum;
B
bellard 已提交
1969 1970 1971 1972 1973 1974 1975 1976 1977 1978 1979

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

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

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

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

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

            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);
2061
                return;
B
bellard 已提交
2062
            }
2063 2064 2065 2066 2067 2068

            tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_tmp0);
        }

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

2139
static void gen_nop_modrm(CPUX86State *env, DisasContext *s, int modrm)
B
bellard 已提交
2140 2141 2142 2143 2144 2145 2146 2147 2148 2149 2150
{
    int mod, rm, base, code;

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

    if (s->aflag) {

        base = rm;
2151

B
bellard 已提交
2152
        if (base == 4) {
2153
            code = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
2154 2155
            base = (code & 7);
        }
2156

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

B
balrog 已提交
2211
/* generate modrm memory load or store of 'reg'. TMP0 is used if reg ==
B
bellard 已提交
2212
   OR_TMP0 */
2213 2214
static void gen_ldst_modrm(CPUX86State *env, DisasContext *s, int modrm,
                           int ot, int reg, int is_store)
B
bellard 已提交
2215
{
2216
    int mod, rm;
B
bellard 已提交
2217 2218

    mod = (modrm >> 6) & 3;
B
bellard 已提交
2219
    rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
2220 2221 2222
    if (mod == 3) {
        if (is_store) {
            if (reg != OR_TMP0)
B
bellard 已提交
2223 2224
                gen_op_mov_TN_reg(ot, 0, reg);
            gen_op_mov_reg_T0(ot, rm);
B
bellard 已提交
2225
        } else {
B
bellard 已提交
2226
            gen_op_mov_TN_reg(ot, 0, rm);
B
bellard 已提交
2227
            if (reg != OR_TMP0)
B
bellard 已提交
2228
                gen_op_mov_reg_T0(ot, reg);
B
bellard 已提交
2229 2230
        }
    } else {
2231
        gen_lea_modrm(env, s, modrm);
B
bellard 已提交
2232 2233
        if (is_store) {
            if (reg != OR_TMP0)
B
bellard 已提交
2234
                gen_op_mov_TN_reg(ot, 0, reg);
2235
            gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
2236
        } else {
2237
            gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
2238
            if (reg != OR_TMP0)
B
bellard 已提交
2239
                gen_op_mov_reg_T0(ot, reg);
B
bellard 已提交
2240 2241 2242 2243
        }
    }
}

2244
static inline uint32_t insn_get(CPUX86State *env, DisasContext *s, int ot)
B
bellard 已提交
2245 2246 2247 2248
{
    uint32_t ret;

    switch(ot) {
2249
    case MO_8:
2250
        ret = cpu_ldub_code(env, s->pc);
B
bellard 已提交
2251 2252
        s->pc++;
        break;
2253
    case MO_16:
2254
        ret = cpu_lduw_code(env, s->pc);
B
bellard 已提交
2255 2256 2257
        s->pc += 2;
        break;
    default:
2258
    case MO_32:
2259
        ret = cpu_ldl_code(env, s->pc);
B
bellard 已提交
2260 2261 2262 2263 2264 2265
        s->pc += 4;
        break;
    }
    return ret;
}

B
bellard 已提交
2266 2267
static inline int insn_const_size(unsigned int ot)
{
2268
    if (ot <= MO_32) {
B
bellard 已提交
2269
        return 1 << ot;
2270
    } else {
B
bellard 已提交
2271
        return 4;
2272
    }
B
bellard 已提交
2273 2274
}

2275 2276 2277 2278 2279 2280 2281 2282 2283 2284 2285
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 已提交
2286
        tcg_gen_goto_tb(tb_num);
2287
        gen_jmp_im(eip);
2288
        tcg_gen_exit_tb((uintptr_t)tb + tb_num);
2289 2290 2291 2292 2293 2294 2295
    } else {
        /* jump to another page: currently not optimized */
        gen_jmp_im(eip);
        gen_eob(s);
    }
}

2296
static inline void gen_jcc(DisasContext *s, int b,
B
bellard 已提交
2297
                           target_ulong val, target_ulong next_eip)
B
bellard 已提交
2298
{
2299
    int l1, l2;
2300

B
bellard 已提交
2301
    if (s->jmp_opt) {
B
bellard 已提交
2302
        l1 = gen_new_label();
2303
        gen_jcc1(s, b, l1);
2304

2305
        gen_goto_tb(s, 0, next_eip);
B
bellard 已提交
2306 2307

        gen_set_label(l1);
2308
        gen_goto_tb(s, 1, val);
J
Jun Koi 已提交
2309
        s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2310
    } else {
B
bellard 已提交
2311 2312
        l1 = gen_new_label();
        l2 = gen_new_label();
2313
        gen_jcc1(s, b, l1);
2314

B
bellard 已提交
2315
        gen_jmp_im(next_eip);
2316 2317
        tcg_gen_br(l2);

B
bellard 已提交
2318 2319 2320
        gen_set_label(l1);
        gen_jmp_im(val);
        gen_set_label(l2);
B
bellard 已提交
2321 2322 2323 2324
        gen_eob(s);
    }
}

2325 2326 2327
static void gen_cmovcc1(CPUX86State *env, DisasContext *s, int ot, int b,
                        int modrm, int reg)
{
2328
    CCPrepare cc;
2329

2330
    gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
2331

2332 2333 2334 2335 2336 2337 2338 2339
    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);
2340 2341
    }

2342 2343 2344 2345 2346 2347 2348 2349 2350 2351
    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);
    }
2352 2353
}

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

T
ths 已提交
2393 2394 2395 2396 2397
static inline int svm_is_rep(int prefixes)
{
    return ((prefixes & (PREFIX_REPZ | PREFIX_REPNZ)) ? 8 : 0);
}

B
bellard 已提交
2398
static inline void
T
ths 已提交
2399
gen_svm_check_intercept_param(DisasContext *s, target_ulong pc_start,
2400
                              uint32_t type, uint64_t param)
T
ths 已提交
2401
{
B
bellard 已提交
2402 2403 2404
    /* no SVM activated; fast case */
    if (likely(!(s->flags & HF_SVMI_MASK)))
        return;
2405
    gen_update_cc_op(s);
B
bellard 已提交
2406
    gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
2407
    gen_helper_svm_check_intercept_param(cpu_env, tcg_const_i32(type),
P
pbrook 已提交
2408
                                         tcg_const_i64(param));
T
ths 已提交
2409 2410
}

B
bellard 已提交
2411
static inline void
T
ths 已提交
2412 2413
gen_svm_check_intercept(DisasContext *s, target_ulong pc_start, uint64_t type)
{
B
bellard 已提交
2414
    gen_svm_check_intercept_param(s, pc_start, type, 0);
T
ths 已提交
2415 2416
}

2417 2418
static inline void gen_stack_update(DisasContext *s, int addend)
{
B
bellard 已提交
2419 2420
#ifdef TARGET_X86_64
    if (CODE64(s)) {
2421
        gen_op_add_reg_im(2, R_ESP, addend);
B
bellard 已提交
2422 2423
    } else
#endif
2424
    if (s->ss32) {
2425
        gen_op_add_reg_im(1, R_ESP, addend);
2426
    } else {
2427
        gen_op_add_reg_im(0, R_ESP, addend);
2428 2429 2430
    }
}

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

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

B
bellard 已提交
2504
        if (s->ss32 && !s->addseg)
B
bellard 已提交
2505
            gen_op_mov_reg_A0(1, R_ESP);
B
bellard 已提交
2506 2507
        else
            gen_stack_update(s, (-2) << s->dflag);
B
bellard 已提交
2508 2509 2510
    }
}

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

static void gen_pop_update(DisasContext *s)
{
B
bellard 已提交
2535
#ifdef TARGET_X86_64
2536
    if (CODE64(s) && s->dflag) {
B
bellard 已提交
2537 2538 2539 2540 2541 2542
        gen_stack_update(s, 8);
    } else
#endif
    {
        gen_stack_update(s, 2 << s->dflag);
    }
B
bellard 已提交
2543 2544 2545 2546
}

static void gen_stack_A0(DisasContext *s)
{
B
bellard 已提交
2547
    gen_op_movl_A0_reg(R_ESP);
B
bellard 已提交
2548 2549
    if (!s->ss32)
        gen_op_andl_A0_ffff();
2550
    tcg_gen_mov_tl(cpu_T[1], cpu_A0);
B
bellard 已提交
2551
    if (s->addseg)
2552
        gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2553 2554 2555 2556 2557 2558
}

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

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

static void gen_enter(DisasContext *s, int esp_addend, int level)
{
B
bellard 已提交
2598
    int ot, opsize;
B
bellard 已提交
2599 2600

    level &= 0x1f;
2601 2602
#ifdef TARGET_X86_64
    if (CODE64(s)) {
2603
        ot = s->dflag ? MO_64 : MO_16;
2604
        opsize = 1 << ot;
2605

B
bellard 已提交
2606
        gen_op_movl_A0_reg(R_ESP);
2607
        gen_op_addq_A0_im(-opsize);
2608
        tcg_gen_mov_tl(cpu_T[1], cpu_A0);
2609 2610

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

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

B
bellard 已提交
2650
static void gen_exception(DisasContext *s, int trapno, target_ulong cur_eip)
B
bellard 已提交
2651
{
2652
    gen_update_cc_op(s);
B
bellard 已提交
2653
    gen_jmp_im(cur_eip);
B
Blue Swirl 已提交
2654
    gen_helper_raise_exception(cpu_env, tcg_const_i32(trapno));
J
Jun Koi 已提交
2655
    s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2656 2657 2658
}

/* an interrupt is different from an exception because of the
B
blueswir1 已提交
2659
   privilege checks */
2660
static void gen_interrupt(DisasContext *s, int intno,
B
bellard 已提交
2661
                          target_ulong cur_eip, target_ulong next_eip)
B
bellard 已提交
2662
{
2663
    gen_update_cc_op(s);
B
bellard 已提交
2664
    gen_jmp_im(cur_eip);
B
Blue Swirl 已提交
2665
    gen_helper_raise_interrupt(cpu_env, tcg_const_i32(intno),
P
pbrook 已提交
2666
                               tcg_const_i32(next_eip - cur_eip));
J
Jun Koi 已提交
2667
    s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2668 2669
}

B
bellard 已提交
2670
static void gen_debug(DisasContext *s, target_ulong cur_eip)
B
bellard 已提交
2671
{
2672
    gen_update_cc_op(s);
B
bellard 已提交
2673
    gen_jmp_im(cur_eip);
B
Blue Swirl 已提交
2674
    gen_helper_debug(cpu_env);
J
Jun Koi 已提交
2675
    s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2676 2677 2678 2679 2680 2681
}

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

/* generate a jump to eip. No segment change must happen before as a
   direct call to the next block may occur */
B
bellard 已提交
2701
static void gen_jmp_tb(DisasContext *s, target_ulong eip, int tb_num)
B
bellard 已提交
2702
{
2703 2704
    gen_update_cc_op(s);
    set_cc_op(s, CC_OP_DYNAMIC);
B
bellard 已提交
2705
    if (s->jmp_opt) {
2706
        gen_goto_tb(s, tb_num, eip);
J
Jun Koi 已提交
2707
        s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2708
    } else {
B
bellard 已提交
2709
        gen_jmp_im(eip);
B
bellard 已提交
2710 2711 2712 2713
        gen_eob(s);
    }
}

B
bellard 已提交
2714 2715 2716 2717 2718
static void gen_jmp(DisasContext *s, target_ulong eip)
{
    gen_jmp_tb(s, eip, 0);
}

2719
static inline void gen_ldq_env_A0(DisasContext *s, int offset)
B
bellard 已提交
2720
{
2721
    tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0, s->mem_index, MO_LEQ);
2722
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, offset);
B
bellard 已提交
2723
}
B
bellard 已提交
2724

2725
static inline void gen_stq_env_A0(DisasContext *s, int offset)
B
bellard 已提交
2726
{
2727
    tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env, offset);
2728
    tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0, s->mem_index, MO_LEQ);
B
bellard 已提交
2729
}
B
bellard 已提交
2730

2731
static inline void gen_ldo_env_A0(DisasContext *s, int offset)
B
bellard 已提交
2732
{
2733
    int mem_index = s->mem_index;
2734
    tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0, mem_index, MO_LEQ);
2735
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, offset + offsetof(XMMReg, XMM_Q(0)));
B
bellard 已提交
2736
    tcg_gen_addi_tl(cpu_tmp0, cpu_A0, 8);
2737
    tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_tmp0, mem_index, MO_LEQ);
2738
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, offset + offsetof(XMMReg, XMM_Q(1)));
B
bellard 已提交
2739
}
B
bellard 已提交
2740

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

B
bellard 已提交
2751 2752
static inline void gen_op_movo(int d_offset, int s_offset)
{
2753 2754 2755 2756
    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 已提交
2757 2758 2759 2760
}

static inline void gen_op_movq(int d_offset, int s_offset)
{
2761 2762
    tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env, s_offset);
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, d_offset);
B
bellard 已提交
2763 2764 2765 2766
}

static inline void gen_op_movl(int d_offset, int s_offset)
{
2767 2768
    tcg_gen_ld_i32(cpu_tmp2_i32, cpu_env, s_offset);
    tcg_gen_st_i32(cpu_tmp2_i32, cpu_env, d_offset);
B
bellard 已提交
2769 2770 2771 2772
}

static inline void gen_op_movq_env_0(int d_offset)
{
2773 2774
    tcg_gen_movi_i64(cpu_tmp1_i64, 0);
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, d_offset);
B
bellard 已提交
2775
}
B
bellard 已提交
2776

B
Blue Swirl 已提交
2777 2778 2779 2780 2781 2782 2783
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 已提交
2784
typedef void (*SSEFunc_0_ppi)(TCGv_ptr reg_a, TCGv_ptr reg_b, TCGv_i32 val);
B
Blue Swirl 已提交
2785 2786
typedef void (*SSEFunc_0_eppt)(TCGv_ptr env, TCGv_ptr reg_a, TCGv_ptr reg_b,
                               TCGv val);
B
Blue Swirl 已提交
2787

B
bellard 已提交
2788 2789
#define SSE_SPECIAL ((void *)1)
#define SSE_DUMMY ((void *)2)
B
bellard 已提交
2790

P
pbrook 已提交
2791 2792 2793
#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 已提交
2794

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

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

R
Richard Henderson 已提交
2839 2840 2841
    /* 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 已提交
2842

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

B
Blue Swirl 已提交
2942
static const SSEFunc_0_epi sse_op_table3ai[] = {
P
pbrook 已提交
2943
    gen_helper_cvtsi2ss,
2944
    gen_helper_cvtsi2sd
B
Blue Swirl 已提交
2945
};
P
pbrook 已提交
2946

2947
#ifdef TARGET_X86_64
B
Blue Swirl 已提交
2948
static const SSEFunc_0_epl sse_op_table3aq[] = {
2949 2950 2951 2952 2953
    gen_helper_cvtsq2ss,
    gen_helper_cvtsq2sd
};
#endif

B
Blue Swirl 已提交
2954
static const SSEFunc_i_ep sse_op_table3bi[] = {
P
pbrook 已提交
2955 2956
    gen_helper_cvttss2si,
    gen_helper_cvtss2si,
2957
    gen_helper_cvttsd2si,
2958
    gen_helper_cvtsd2si
B
bellard 已提交
2959
};
2960

2961
#ifdef TARGET_X86_64
B
Blue Swirl 已提交
2962
static const SSEFunc_l_ep sse_op_table3bq[] = {
2963 2964
    gen_helper_cvttss2sq,
    gen_helper_cvtss2sq,
2965
    gen_helper_cvttsd2sq,
2966 2967 2968 2969
    gen_helper_cvtsd2sq
};
#endif

B
Blue Swirl 已提交
2970
static const SSEFunc_0_epp sse_op_table4[8][4] = {
B
bellard 已提交
2971 2972 2973 2974 2975 2976 2977 2978 2979
    SSE_FOP(cmpeq),
    SSE_FOP(cmplt),
    SSE_FOP(cmple),
    SSE_FOP(cmpunord),
    SSE_FOP(cmpneq),
    SSE_FOP(cmpnlt),
    SSE_FOP(cmpnle),
    SSE_FOP(cmpord),
};
2980

B
Blue Swirl 已提交
2981
static const SSEFunc_0_epp sse_op_table5[256] = {
P
pbrook 已提交
2982 2983 2984 2985 2986 2987 2988 2989 2990 2991 2992 2993 2994 2995 2996 2997 2998 2999 3000 3001 3002 3003 3004 3005
    [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 已提交
3006 3007
};

B
Blue Swirl 已提交
3008 3009
struct SSEOpHelper_epp {
    SSEFunc_0_epp op[2];
B
Blue Swirl 已提交
3010 3011 3012
    uint32_t ext_mask;
};

B
Blue Swirl 已提交
3013 3014
struct SSEOpHelper_eppi {
    SSEFunc_0_eppi op[2];
B
Blue Swirl 已提交
3015
    uint32_t ext_mask;
B
balrog 已提交
3016
};
B
Blue Swirl 已提交
3017

B
balrog 已提交
3018
#define SSSE3_OP(x) { MMX_OP2(x), CPUID_EXT_SSSE3 }
P
pbrook 已提交
3019 3020
#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 已提交
3021
#define SSE41_SPECIAL { { NULL, SSE_SPECIAL }, CPUID_EXT_SSE41 }
3022 3023
#define PCLMULQDQ_OP(x) { { NULL, gen_helper_ ## x ## _xmm }, \
        CPUID_EXT_PCLMULQDQ }
3024
#define AESNI_OP(x) { { NULL, gen_helper_ ## x ## _xmm }, CPUID_EXT_AES }
B
Blue Swirl 已提交
3025

B
Blue Swirl 已提交
3026
static const struct SSEOpHelper_epp sse_op_table6[256] = {
B
balrog 已提交
3027 3028 3029 3030 3031 3032 3033 3034 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
    [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),
3073 3074 3075 3076 3077
    [0xdb] = AESNI_OP(aesimc),
    [0xdc] = AESNI_OP(aesenc),
    [0xdd] = AESNI_OP(aesenclast),
    [0xde] = AESNI_OP(aesdec),
    [0xdf] = AESNI_OP(aesdeclast),
B
balrog 已提交
3078 3079
};

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

3107 3108
static void gen_sse(CPUX86State *env, DisasContext *s, int b,
                    target_ulong pc_start, int rex_r)
B
bellard 已提交
3109 3110
{
    int b1, op1_offset, op2_offset, is_xmm, val, ot;
3111
    int modrm, mod, rm, reg;
B
Blue Swirl 已提交
3112 3113
    SSEFunc_0_epp sse_fn_epp;
    SSEFunc_0_eppi sse_fn_eppi;
B
Blue Swirl 已提交
3114
    SSEFunc_0_ppi sse_fn_ppi;
B
Blue Swirl 已提交
3115
    SSEFunc_0_eppt sse_fn_eppt;
B
bellard 已提交
3116 3117

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

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

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

B
balrog 已提交
3741
        case 0x138:
3742
        case 0x038:
B
balrog 已提交
3743
            b = modrm;
R
Richard Henderson 已提交
3744 3745 3746
            if ((b & 0xf0) == 0xf0) {
                goto do_0f_38_fx;
            }
3747
            modrm = cpu_ldub_code(env, s->pc++);
B
balrog 已提交
3748 3749 3750
            rm = modrm & 7;
            reg = ((modrm >> 3) & 7) | rex_r;
            mod = (modrm >> 6) & 3;
3751 3752 3753
            if (b1 >= 2) {
                goto illegal_op;
            }
B
balrog 已提交
3754

B
Blue Swirl 已提交
3755 3756
            sse_fn_epp = sse_op_table6[b].op[b1];
            if (!sse_fn_epp) {
B
balrog 已提交
3757
                goto illegal_op;
B
Blue Swirl 已提交
3758
            }
B
balrog 已提交
3759 3760
            if (!(s->cpuid_ext_features & sse_op_table6[b].ext_mask))
                goto illegal_op;
B
balrog 已提交
3761 3762 3763 3764 3765 3766 3767

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

B
balrog 已提交
3810 3811
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
3812
            sse_fn_epp(cpu_env, cpu_ptr0, cpu_ptr1);
B
balrog 已提交
3813

3814 3815 3816
            if (b == 0x17) {
                set_cc_op(s, CC_OP_EFLAGS);
            }
B
balrog 已提交
3817
            break;
R
Richard Henderson 已提交
3818 3819 3820 3821 3822 3823

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

R
Richard Henderson 已提交
3827 3828 3829 3830 3831 3832 3833 3834
            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) {
3835
                    ot = MO_8;
R
Richard Henderson 已提交
3836
                } else if (s->dflag != 2) {
3837
                    ot = (s->prefix & PREFIX_DATA ? MO_16 : MO_32);
R
Richard Henderson 已提交
3838
                } else {
3839
                    ot = MO_64;
R
Richard Henderson 已提交
3840
                }
B
balrog 已提交
3841

3842
                gen_op_mov_TN_reg(MO_32, 0, reg);
R
Richard Henderson 已提交
3843 3844 3845 3846
                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 已提交
3847

3848
                ot = (s->dflag == 2) ? MO_64 : MO_32;
R
Richard Henderson 已提交
3849 3850
                gen_op_mov_reg_T0(ot, reg);
                break;
B
balrog 已提交
3851

R
Richard Henderson 已提交
3852 3853 3854 3855 3856 3857 3858 3859 3860 3861 3862 3863 3864 3865 3866
            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) {
3867
                    ot = (s->prefix & PREFIX_DATA ? MO_16 : MO_32);
R
Richard Henderson 已提交
3868
                } else {
3869
                    ot = MO_64;
R
Richard Henderson 已提交
3870 3871 3872 3873 3874 3875 3876 3877 3878 3879
                }

                /* 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) {
3880
                    case MO_16:
R
Richard Henderson 已提交
3881 3882 3883 3884 3885
                        tcg_gen_ext16u_tl(cpu_T[0], cpu_regs[reg]);
                        break;
                    default:
                        tcg_gen_ext32u_tl(cpu_T[0], cpu_regs[reg]);
                        break;
3886
                    case MO_64:
R
Richard Henderson 已提交
3887 3888 3889 3890 3891 3892
                        tcg_gen_mov_tl(cpu_T[0], cpu_regs[reg]);
                        break;
                    }
                }

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

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

4020 4021 4022 4023 4024 4025
            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;
                }
4026
                ot = s->dflag == 2 ? MO_64 : MO_32;
4027 4028 4029 4030 4031 4032 4033 4034 4035 4036 4037 4038 4039 4040 4041 4042 4043
                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;
                }
4044
                ot = s->dflag == 2 ? MO_64 : MO_32;
4045 4046 4047 4048 4049 4050 4051 4052 4053 4054 4055
                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;

4056 4057 4058 4059 4060
            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 {
4061
                    TCGv carry_in, carry_out, zero;
4062 4063
                    int end_op;

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

4135 4136 4137 4138 4139 4140 4141 4142
            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;
                }
4143
                ot = (s->dflag == 2 ? MO_64 : MO_32);
4144
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
4145
                if (ot == MO_64) {
4146 4147 4148 4149 4150 4151 4152
                    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) {
4153
                    if (ot != MO_64) {
4154 4155 4156 4157
                        tcg_gen_ext32s_tl(cpu_T[0], cpu_T[0]);
                    }
                    tcg_gen_sar_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
                } else {
4158
                    if (ot != MO_64) {
4159 4160 4161 4162 4163 4164 4165
                        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;

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

B
balrog 已提交
4213 4214
        case 0x03a:
        case 0x13a:
B
balrog 已提交
4215
            b = modrm;
4216
            modrm = cpu_ldub_code(env, s->pc++);
B
balrog 已提交
4217 4218 4219
            rm = modrm & 7;
            reg = ((modrm >> 3) & 7) | rex_r;
            mod = (modrm >> 6) & 3;
4220 4221 4222
            if (b1 >= 2) {
                goto illegal_op;
            }
B
balrog 已提交
4223

B
Blue Swirl 已提交
4224 4225
            sse_fn_eppi = sse_op_table7[b].op[b1];
            if (!sse_fn_eppi) {
B
balrog 已提交
4226
                goto illegal_op;
B
Blue Swirl 已提交
4227
            }
B
balrog 已提交
4228 4229 4230
            if (!(s->cpuid_ext_features & sse_op_table7[b].ext_mask))
                goto illegal_op;

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

            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);
4374
                    gen_lea_modrm(env, s, modrm);
4375
                    gen_ldo_env_A0(s, op2_offset);
B
balrog 已提交
4376 4377 4378 4379 4380 4381 4382
                }
            } 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);
4383
                    gen_lea_modrm(env, s, modrm);
4384
                    gen_ldq_env_A0(s, op2_offset);
B
balrog 已提交
4385 4386
                }
            }
4387
            val = cpu_ldub_code(env, s->pc++);
B
balrog 已提交
4388

B
balrog 已提交
4389
            if ((b & 0xfc) == 0x60) { /* pcmpXstrX */
4390
                set_cc_op(s, CC_OP_EFLAGS);
B
balrog 已提交
4391 4392 4393 4394 4395 4396

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

B
balrog 已提交
4397 4398
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
4399
            sse_fn_eppi(cpu_env, cpu_ptr0, cpu_ptr1, tcg_const_i32(val));
B
balrog 已提交
4400
            break;
R
Richard Henderson 已提交
4401 4402 4403 4404 4405 4406 4407 4408 4409 4410 4411 4412 4413 4414

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

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

B
bellard 已提交
4549 4550
/* convert one instruction. s->is_jmp is set if the translation must
   be stopped. Return the next pc value */
4551 4552
static target_ulong disas_insn(CPUX86State *env, DisasContext *s,
                               target_ulong pc_start)
B
bellard 已提交
4553 4554 4555
{
    int b, prefixes, aflag, dflag;
    int shift, ot;
4556
    int modrm, reg, rm, mod, op, opreg, val;
B
bellard 已提交
4557 4558
    target_ulong next_eip, tval;
    int rex_w, rex_r;
B
bellard 已提交
4559

4560
    if (unlikely(qemu_loglevel_mask(CPU_LOG_TB_OP | CPU_LOG_TB_OP_OPT))) {
4561
        tcg_gen_debug_insn_start(pc_start);
4562
    }
B
bellard 已提交
4563 4564 4565
    s->pc = pc_start;
    prefixes = 0;
    s->override = -1;
B
bellard 已提交
4566 4567 4568 4569 4570
    rex_w = -1;
    rex_r = 0;
#ifdef TARGET_X86_64
    s->rex_x = 0;
    s->rex_b = 0;
4571
    x86_64_hregs = 0;
B
bellard 已提交
4572 4573
#endif
    s->rip_offset = 0; /* for relative ip address */
4574 4575
    s->vex_l = 0;
    s->vex_v = 0;
B
bellard 已提交
4576
 next_byte:
4577
    b = cpu_ldub_code(env, s->pc);
B
bellard 已提交
4578
    s->pc++;
4579 4580 4581 4582 4583 4584 4585 4586 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
    /* 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 已提交
4614
#ifdef TARGET_X86_64
4615 4616
    case 0x40 ... 0x4f:
        if (CODE64(s)) {
B
bellard 已提交
4617 4618 4619 4620 4621 4622 4623 4624
            /* 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;
        }
4625 4626
        break;
#endif
4627 4628 4629 4630 4631 4632 4633 4634 4635 4636 4637 4638 4639 4640 4641 4642 4643
    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 已提交
4644
            /* 4.1.1-4.1.3: No preceding lock, 66, f2, f3, or rex prefixes. */
4645 4646 4647 4648 4649 4650 4651 4652 4653 4654 4655 4656 4657 4658 4659 4660 4661 4662 4663 4664 4665 4666 4667 4668 4669 4670 4671 4672 4673 4674 4675 4676 4677 4678 4679 4680 4681 4682 4683
            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;
4684 4685 4686 4687
    }

    /* Post-process prefixes.  */
    if (CODE64(s)) {
4688 4689 4690 4691 4692 4693 4694 4695 4696 4697 4698
        /* 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 已提交
4699
        }
4700 4701 4702 4703
        /* In 16/32-bit mode, 0x67 selects the opposite addressing.  */
        aflag = s->code32;
        if (prefixes & PREFIX_ADR) {
            aflag ^= 1;
B
bellard 已提交
4704
        }
B
bellard 已提交
4705 4706 4707 4708 4709 4710 4711 4712
    }

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

    /* lock generation */
    if (prefixes & PREFIX_LOCK)
P
pbrook 已提交
4713
        gen_helper_lock();
B
bellard 已提交
4714 4715 4716 4717 4718 4719 4720

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

B
bellard 已提交
4724 4725 4726 4727 4728 4729 4730 4731 4732 4733 4734 4735 4736 4737 4738 4739
        /**************************/
        /* 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)
4740
                ot = MO_8;
B
bellard 已提交
4741
            else
4742
                ot = dflag + MO_16;
4743

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

4790 4791 4792
    case 0x82:
        if (CODE64(s))
            goto illegal_op;
B
bellard 已提交
4793 4794 4795 4796 4797 4798 4799
    case 0x80: /* GRP1 */
    case 0x81:
    case 0x83:
        {
            int val;

            if ((b & 1) == 0)
4800
                ot = MO_8;
B
bellard 已提交
4801
            else
4802
                ot = dflag + MO_16;
4803

4804
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4805
            mod = (modrm >> 6) & 3;
B
bellard 已提交
4806
            rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
4807
            op = (modrm >> 3) & 7;
4808

B
bellard 已提交
4809
            if (mod != 3) {
B
bellard 已提交
4810 4811 4812 4813
                if (b == 0x83)
                    s->rip_offset = 1;
                else
                    s->rip_offset = insn_const_size(ot);
4814
                gen_lea_modrm(env, s, modrm);
B
bellard 已提交
4815 4816
                opreg = OR_TMP0;
            } else {
B
bellard 已提交
4817
                opreg = rm;
B
bellard 已提交
4818 4819 4820 4821 4822 4823
            }

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

4853
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4854
        mod = (modrm >> 6) & 3;
B
bellard 已提交
4855
        rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
4856 4857
        op = (modrm >> 3) & 7;
        if (mod != 3) {
B
bellard 已提交
4858 4859
            if (op == 0)
                s->rip_offset = insn_const_size(ot);
4860
            gen_lea_modrm(env, s, modrm);
4861
            gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
4862
        } else {
B
bellard 已提交
4863
            gen_op_mov_TN_reg(ot, 0, rm);
B
bellard 已提交
4864 4865 4866 4867
        }

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

    case 0xfe: /* GRP4 */
    case 0xff: /* GRP5 */
        if ((b & 1) == 0)
5048
            ot = MO_8;
B
bellard 已提交
5049
        else
5050
            ot = dflag + MO_16;
B
bellard 已提交
5051

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

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

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

5165
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
B
bellard 已提交
5166
        gen_op_mov_TN_reg(ot, 1, reg);
B
bellard 已提交
5167
        gen_op_testl_T0_T1_cc();
5168
        set_cc_op(s, CC_OP_LOGICB + ot);
B
bellard 已提交
5169
        break;
5170

B
bellard 已提交
5171 5172 5173
    case 0xa8: /* test eAX, Iv */
    case 0xa9:
        if ((b & 1) == 0)
5174
            ot = MO_8;
B
bellard 已提交
5175
        else
5176
            ot = dflag + MO_16;
5177
        val = insn_get(env, s, ot);
B
bellard 已提交
5178

B
bellard 已提交
5179
        gen_op_mov_TN_reg(ot, 0, OR_EAX);
B
bellard 已提交
5180 5181
        gen_op_movl_T1_im(val);
        gen_op_testl_T0_T1_cc();
5182
        set_cc_op(s, CC_OP_LOGICB + ot);
B
bellard 已提交
5183
        break;
5184

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

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

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

        /**************************/
        /* mov */
    case 0x88:
    case 0x89: /* mov Gv, Ev */
        if ((b & 1) == 0)
5533
            ot = MO_8;
B
bellard 已提交
5534
        else
5535
            ot = dflag + MO_16;
5536
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5537
        reg = ((modrm >> 3) & 7) | rex_r;
5538

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

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

    case 0x1b6: /* movzbS Gv, Eb */
    case 0x1b7: /* movzwS Gv, Eb */
    case 0x1be: /* movsbS Gv, Eb */
    case 0x1bf: /* movswS Gv, Eb */
        {
5613 5614 5615
            TCGMemOp d_ot;
            TCGMemOp s_ot;

B
bellard 已提交
5616
            /* d_ot is the size of destination */
5617
            d_ot = dflag + MO_16;
B
bellard 已提交
5618
            /* ot is the size of source */
5619
            ot = (b & 1) + MO_8;
5620 5621 5622
            /* s_ot is the sign+size of source */
            s_ot = b & 8 ? MO_SIGN | ot : ot;

5623
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5624
            reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5625
            mod = (modrm >> 6) & 3;
B
bellard 已提交
5626
            rm = (modrm & 7) | REX_B(s);
5627

B
bellard 已提交
5628
            if (mod == 3) {
B
bellard 已提交
5629
                gen_op_mov_TN_reg(ot, 0, rm);
5630 5631
                switch (s_ot) {
                case MO_UB:
B
bellard 已提交
5632
                    tcg_gen_ext8u_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
5633
                    break;
5634
                case MO_SB:
B
bellard 已提交
5635
                    tcg_gen_ext8s_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
5636
                    break;
5637
                case MO_UW:
B
bellard 已提交
5638
                    tcg_gen_ext16u_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
5639 5640
                    break;
                default:
5641
                case MO_SW:
B
bellard 已提交
5642
                    tcg_gen_ext16s_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
5643 5644
                    break;
                }
B
bellard 已提交
5645
                gen_op_mov_reg_T0(d_ot, reg);
B
bellard 已提交
5646
            } else {
5647
                gen_lea_modrm(env, s, modrm);
5648
                gen_op_ld_v(s, s_ot, cpu_T[0], cpu_A0);
B
bellard 已提交
5649
                gen_op_mov_reg_T0(d_ot, reg);
B
bellard 已提交
5650 5651 5652 5653 5654
            }
        }
        break;

    case 0x8d: /* lea */
5655
        ot = dflag + MO_16;
5656
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5657 5658 5659
        mod = (modrm >> 6) & 3;
        if (mod == 3)
            goto illegal_op;
B
bellard 已提交
5660
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5661 5662 5663 5664
        /* we must ensure that no segment is added */
        s->override = -1;
        val = s->addseg;
        s->addseg = 0;
5665
        gen_lea_modrm(env, s, modrm);
B
bellard 已提交
5666
        s->addseg = val;
5667
        gen_op_mov_reg_A0(ot - MO_16, reg);
B
bellard 已提交
5668
        break;
5669

B
bellard 已提交
5670 5671 5672 5673 5674
    case 0xa0: /* mov EAX, Ov */
    case 0xa1:
    case 0xa2: /* mov Ov, EAX */
    case 0xa3:
        {
B
bellard 已提交
5675 5676 5677
            target_ulong offset_addr;

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

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

B
bellard 已提交
5827 5828 5829 5830 5831 5832 5833 5834 5835
        /************************/
        /* shifts */
    case 0xc0:
    case 0xc1:
        /* shift Ev,Ib */
        shift = 2;
    grp2:
        {
            if ((b & 1) == 0)
5836
                ot = MO_8;
B
bellard 已提交
5837
            else
5838
                ot = dflag + MO_16;
5839

5840
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5841 5842
            mod = (modrm >> 6) & 3;
            op = (modrm >> 3) & 7;
5843

B
bellard 已提交
5844
            if (mod != 3) {
B
bellard 已提交
5845 5846 5847
                if (shift == 2) {
                    s->rip_offset = 1;
                }
5848
                gen_lea_modrm(env, s, modrm);
B
bellard 已提交
5849 5850
                opreg = OR_TMP0;
            } else {
B
bellard 已提交
5851
                opreg = (modrm & 7) | REX_B(s);
B
bellard 已提交
5852 5853 5854 5855 5856 5857 5858
            }

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

B
bellard 已提交
5905
        if (shift) {
P
Paolo Bonzini 已提交
5906 5907 5908
            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 已提交
5909
        } else {
P
Paolo Bonzini 已提交
5910
            gen_shiftd_rm_T1(s, ot, opreg, op, cpu_regs[R_ECX]);
B
bellard 已提交
5911 5912 5913 5914 5915
        }
        break;

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

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

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

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

                    if (!(s->cpuid_features & CPUID_CMOV)) {
                        goto illegal_op;
                    }
6422
                    op1 = fcmov_cc[op & 3] | (((op >> 3) & 1) ^ 1);
B
bellard 已提交
6423
                    l1 = gen_new_label();
6424
                    gen_jcc1_noeob(s, op1, l1);
B
Blue Swirl 已提交
6425
                    gen_helper_fmov_ST0_STN(cpu_env, tcg_const_i32(opreg));
B
bellard 已提交
6426
                    gen_set_label(l1);
6427 6428
                }
                break;
B
bellard 已提交
6429 6430 6431 6432 6433 6434 6435 6436 6437 6438 6439
            default:
                goto illegal_op;
            }
        }
        break;
        /************************/
        /* string ops */

    case 0xa4: /* movsS */
    case 0xa5:
        if ((b & 1) == 0)
6440
            ot = MO_8;
B
bellard 已提交
6441
        else
6442
            ot = dflag + MO_16;
B
bellard 已提交
6443 6444 6445 6446 6447 6448 6449

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

B
bellard 已提交
6451 6452 6453
    case 0xaa: /* stosS */
    case 0xab:
        if ((b & 1) == 0)
6454
            ot = MO_8;
B
bellard 已提交
6455
        else
6456
            ot = dflag + MO_16;
B
bellard 已提交
6457 6458 6459 6460 6461 6462 6463 6464 6465 6466

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

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

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

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

P
pbrook 已提交
6621 6622
        if (use_icount)
            gen_io_start();
6623 6624
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
        tcg_gen_trunc_tl_i32(cpu_tmp3_i32, cpu_T[1]);
P
pbrook 已提交
6625
        gen_helper_out_func(ot, cpu_tmp2_i32, cpu_tmp3_i32);
P
pbrook 已提交
6626 6627 6628 6629
        if (use_icount) {
            gen_io_end();
            gen_jmp(s, s->pc - s->cs_base);
        }
B
bellard 已提交
6630 6631 6632 6633 6634
        break;

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

B
bellard 已提交
6727 6728
            if (CODE64(s))
                goto illegal_op;
6729
            ot = dflag ? MO_32 : MO_16;
6730
            offset = insn_get(env, s, ot);
6731
            selector = insn_get(env, s, MO_16);
6732

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

B
bellard 已提交
6753 6754
            if (CODE64(s))
                goto illegal_op;
6755
            ot = dflag ? MO_32 : MO_16;
6756
            offset = insn_get(env, s, ot);
6757
            selector = insn_get(env, s, MO_16);
6758

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

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

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

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

7247
            tval = (int8_t)insn_get(env, s, MO_8);
B
bellard 已提交
7248 7249 7250 7251
            next_eip = s->pc - s->cs_base;
            tval += next_eip;
            if (s->dflag == 0)
                tval &= 0xffff;
7252

B
bellard 已提交
7253 7254
            l1 = gen_new_label();
            l2 = gen_new_label();
7255
            l3 = gen_new_label();
B
bellard 已提交
7256
            b &= 3;
7257 7258 7259 7260 7261
            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);
7262
                gen_jcc1(s, (JCC_Z << 1) | (b ^ 1), l1);
7263 7264 7265 7266 7267 7268 7269 7270 7271
                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 已提交
7272 7273
            }

7274
            gen_set_label(l3);
B
bellard 已提交
7275
            gen_jmp_im(next_eip);
7276
            tcg_gen_br(l2);
7277

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

7728
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7729 7730 7731
            reg = ((modrm >> 3) & 7) | rex_r;
            mod = (modrm >> 6) & 3;
            rm = (modrm & 7) | REX_B(s);
7732

B
bellard 已提交
7733
            if (mod == 3) {
7734
                gen_op_mov_TN_reg(MO_32, 0, rm);
B
bellard 已提交
7735
                /* sign extend */
7736
                if (d_ot == MO_64) {
B
bellard 已提交
7737
                    tcg_gen_ext32s_tl(cpu_T[0], cpu_T[0]);
7738
                }
B
bellard 已提交
7739
                gen_op_mov_reg_T0(d_ot, reg);
B
bellard 已提交
7740
            } else {
7741
                gen_lea_modrm(env, s, modrm);
R
Richard Henderson 已提交
7742
                gen_op_ld_v(s, MO_32 | MO_SIGN, cpu_T[0], cpu_A0);
B
bellard 已提交
7743
                gen_op_mov_reg_T0(d_ot, reg);
B
bellard 已提交
7744
            }
7745
        } else
B
bellard 已提交
7746 7747
#endif
        {
7748
            int label1;
L
Laurent Desnogues 已提交
7749
            TCGv t0, t1, t2, a0;
7750

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

8043
        modrm = cpu_ldub_code(env, s->pc++);
M
malc 已提交
8044
        reg = ((modrm >> 3) & 7) | rex_r;
B
balrog 已提交
8045 8046

        if (s->prefix & PREFIX_DATA)
8047
            ot = MO_16;
B
balrog 已提交
8048
        else if (s->dflag != 2)
8049
            ot = MO_32;
B
balrog 已提交
8050
        else
8051
            ot = MO_64;
B
balrog 已提交
8052

8053
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
B
Blue Swirl 已提交
8054
        gen_helper_popcnt(cpu_T[0], cpu_env, cpu_T[0], tcg_const_i32(ot));
B
balrog 已提交
8055
        gen_op_mov_reg_T0(ot, reg);
B
balrog 已提交
8056

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

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

/* 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. */
8155
static inline void gen_intermediate_code_internal(X86CPU *cpu,
8156
                                                  TranslationBlock *tb,
8157
                                                  bool search_pc)
B
bellard 已提交
8158
{
8159
    CPUState *cs = CPU(cpu);
8160
    CPUX86State *env = &cpu->env;
B
bellard 已提交
8161
    DisasContext dc1, *dc = &dc1;
B
bellard 已提交
8162
    target_ulong pc_ptr;
B
bellard 已提交
8163
    uint16_t *gen_opc_end;
8164
    CPUBreakpoint *bp;
8165
    int j, lj;
8166
    uint64_t flags;
B
bellard 已提交
8167 8168
    target_ulong pc_start;
    target_ulong cs_base;
P
pbrook 已提交
8169 8170
    int num_insns;
    int max_insns;
8171

B
bellard 已提交
8172
    /* generate intermediate code */
B
bellard 已提交
8173 8174
    pc_start = tb->pc;
    cs_base = tb->cs_base;
B
bellard 已提交
8175
    flags = tb->flags;
B
bellard 已提交
8176

8177
    dc->pe = (flags >> HF_PE_SHIFT) & 1;
B
bellard 已提交
8178 8179 8180 8181 8182 8183 8184 8185
    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;
8186
    dc->singlestep_enabled = cs->singlestep_enabled;
B
bellard 已提交
8187
    dc->cc_op = CC_OP_DYNAMIC;
8188
    dc->cc_op_dirty = false;
B
bellard 已提交
8189 8190 8191 8192 8193 8194
    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) {
8195
        dc->mem_index = cpu_mmu_index(env);
B
bellard 已提交
8196
    }
8197 8198 8199 8200 8201
    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 已提交
8202 8203 8204 8205
#ifdef TARGET_X86_64
    dc->lma = (flags >> HF_LMA_SHIFT) & 1;
    dc->code64 = (flags >> HF_CS64_SHIFT) & 1;
#endif
B
bellard 已提交
8206
    dc->flags = flags;
8207
    dc->jmp_opt = !(dc->tf || cs->singlestep_enabled ||
8208
                    (flags & HF_INHIBIT_IRQ_MASK)
B
bellard 已提交
8209
#ifndef CONFIG_SOFTMMU
B
bellard 已提交
8210 8211 8212
                    || (flags & HF_SOFTMMU_MASK)
#endif
                    );
8213 8214
#if 0
    /* check addseg logic */
B
bellard 已提交
8215
    if (!dc->addseg && (dc->vm86 || !dc->pe || !dc->code32))
8216 8217 8218
        printf("ERROR addseg\n");
#endif

P
pbrook 已提交
8219 8220 8221 8222 8223 8224 8225 8226 8227 8228 8229
    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();
8230
    cpu_cc_srcT = tcg_temp_local_new();
B
bellard 已提交
8231

8232
    gen_opc_end = tcg_ctx.gen_opc_buf + OPC_MAX_SIZE;
B
bellard 已提交
8233 8234 8235 8236

    dc->is_jmp = DISAS_NEXT;
    pc_ptr = pc_start;
    lj = -1;
P
pbrook 已提交
8237 8238 8239 8240
    num_insns = 0;
    max_insns = tb->cflags & CF_COUNT_MASK;
    if (max_insns == 0)
        max_insns = CF_COUNT_MASK;
B
bellard 已提交
8241

8242
    gen_tb_start();
B
bellard 已提交
8243
    for(;;) {
B
Blue Swirl 已提交
8244 8245
        if (unlikely(!QTAILQ_EMPTY(&env->breakpoints))) {
            QTAILQ_FOREACH(bp, &env->breakpoints, entry) {
J
Jan Kiszka 已提交
8246 8247
                if (bp->pc == pc_ptr &&
                    !((bp->flags & BP_CPU) && (tb->flags & HF_RF_MASK))) {
B
bellard 已提交
8248 8249 8250 8251 8252 8253
                    gen_debug(dc, pc_ptr - dc->cs_base);
                    break;
                }
            }
        }
        if (search_pc) {
8254
            j = tcg_ctx.gen_opc_ptr - tcg_ctx.gen_opc_buf;
B
bellard 已提交
8255 8256 8257
            if (lj < j) {
                lj++;
                while (lj < j)
8258
                    tcg_ctx.gen_opc_instr_start[lj++] = 0;
B
bellard 已提交
8259
            }
8260
            tcg_ctx.gen_opc_pc[lj] = pc_ptr;
B
bellard 已提交
8261
            gen_opc_cc_op[lj] = dc->cc_op;
8262
            tcg_ctx.gen_opc_instr_start[lj] = 1;
8263
            tcg_ctx.gen_opc_icount[lj] = num_insns;
B
bellard 已提交
8264
        }
P
pbrook 已提交
8265 8266 8267
        if (num_insns + 1 == max_insns && (tb->cflags & CF_LAST_IO))
            gen_io_start();

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

B
bellard 已提交
8310
#ifdef DEBUG_DISAS
8311
    if (qemu_loglevel_mask(CPU_LOG_TB_IN_ASM)) {
B
bellard 已提交
8312
        int disas_flags;
8313 8314
        qemu_log("----------------\n");
        qemu_log("IN: %s\n", lookup_symbol(pc_start));
B
bellard 已提交
8315 8316 8317 8318 8319 8320
#ifdef TARGET_X86_64
        if (dc->code64)
            disas_flags = 2;
        else
#endif
            disas_flags = !dc->code32;
B
Blue Swirl 已提交
8321
        log_target_disas(env, pc_start, pc_ptr - pc_start, disas_flags);
8322
        qemu_log("\n");
B
bellard 已提交
8323 8324 8325
    }
#endif

P
pbrook 已提交
8326
    if (!search_pc) {
B
bellard 已提交
8327
        tb->size = pc_ptr - pc_start;
P
pbrook 已提交
8328 8329
        tb->icount = num_insns;
    }
B
bellard 已提交
8330 8331
}

8332
void gen_intermediate_code(CPUX86State *env, TranslationBlock *tb)
B
bellard 已提交
8333
{
8334
    gen_intermediate_code_internal(x86_env_get_cpu(env), tb, false);
B
bellard 已提交
8335 8336
}

8337
void gen_intermediate_code_pc(CPUX86State *env, TranslationBlock *tb)
B
bellard 已提交
8338
{
8339
    gen_intermediate_code_internal(x86_env_get_cpu(env), tb, true);
B
bellard 已提交
8340 8341
}

8342
void restore_state_to_opc(CPUX86State *env, TranslationBlock *tb, int pc_pos)
A
aurel32 已提交
8343 8344 8345
{
    int cc_op;
#ifdef DEBUG_DISAS
8346
    if (qemu_loglevel_mask(CPU_LOG_TB_OP)) {
A
aurel32 已提交
8347
        int i;
8348
        qemu_log("RESTORE:\n");
A
aurel32 已提交
8349
        for(i = 0;i <= pc_pos; i++) {
8350
            if (tcg_ctx.gen_opc_instr_start[i]) {
8351 8352
                qemu_log("0x%04x: " TARGET_FMT_lx "\n", i,
                        tcg_ctx.gen_opc_pc[i]);
A
aurel32 已提交
8353 8354
            }
        }
8355
        qemu_log("pc_pos=0x%x eip=" TARGET_FMT_lx " cs_base=%x\n",
8356
                pc_pos, tcg_ctx.gen_opc_pc[pc_pos] - tb->cs_base,
A
aurel32 已提交
8357 8358 8359
                (uint32_t)tb->cs_base);
    }
#endif
8360
    env->eip = tcg_ctx.gen_opc_pc[pc_pos] - tb->cs_base;
A
aurel32 已提交
8361 8362 8363 8364
    cc_op = gen_opc_cc_op[pc_pos];
    if (cc_op != CC_OP_DYNAMIC)
        env->cc_op = cc_op;
}