translate.c 277.8 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
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 已提交
297 298 299 300 301 302 303 304 305 306
#ifdef TARGET_X86_64

#define NB_OP_SIZES 4

#else /* !TARGET_X86_64 */

#define NB_OP_SIZES 3

#endif /* !TARGET_X86_64 */

307
#if defined(HOST_WORDS_BIGENDIAN)
B
bellard 已提交
308 309 310 311 312
#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 已提交
313
#else
B
bellard 已提交
314 315 316 317 318
#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 已提交
319
#endif
B
bellard 已提交
320

321 322 323 324 325 326 327 328 329 330 331 332 333 334 335 336 337 338 339
/* 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;
}

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

B
bellard 已提交
367 368
static inline void gen_op_mov_reg_T0(int ot, int reg)
{
369
    gen_op_mov_reg_v(ot, reg, cpu_T[0]);
B
bellard 已提交
370 371 372 373
}

static inline void gen_op_mov_reg_T1(int ot, int reg)
{
374
    gen_op_mov_reg_v(ot, reg, cpu_T[1]);
B
bellard 已提交
375 376 377 378 379
}

static inline void gen_op_mov_reg_A0(int size, int reg)
{
    switch(size) {
380
    case MO_8:
381
        tcg_gen_deposit_tl(cpu_regs[reg], cpu_regs[reg], cpu_A0, 0, 16);
B
bellard 已提交
382
        break;
383
    default: /* XXX this shouldn't be reached;  abort? */
384
    case MO_16:
385 386 387
        /* 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 已提交
388
        break;
389
#ifdef TARGET_X86_64
390
    case MO_32:
391
        tcg_gen_mov_tl(cpu_regs[reg], cpu_A0);
B
bellard 已提交
392
        break;
B
bellard 已提交
393
#endif
B
bellard 已提交
394 395 396
    }
}

397
static inline void gen_op_mov_v_reg(int ot, TCGv t0, int reg)
B
bellard 已提交
398
{
399
    if (ot == MO_8 && byte_reg_is_xH(reg)) {
400 401 402
        tcg_gen_shri_tl(t0, cpu_regs[reg - 4], 8);
        tcg_gen_ext8u_tl(t0, t0);
    } else {
403
        tcg_gen_mov_tl(t0, cpu_regs[reg]);
B
bellard 已提交
404 405 406
    }
}

407 408 409 410 411
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 已提交
412 413
static inline void gen_op_movl_A0_reg(int reg)
{
414
    tcg_gen_mov_tl(cpu_A0, cpu_regs[reg]);
B
bellard 已提交
415 416 417 418 419
}

static inline void gen_op_addl_A0_im(int32_t val)
{
    tcg_gen_addi_tl(cpu_A0, cpu_A0, val);
B
bellard 已提交
420
#ifdef TARGET_X86_64
B
bellard 已提交
421
    tcg_gen_andi_tl(cpu_A0, cpu_A0, 0xffffffff);
B
bellard 已提交
422
#endif
B
bellard 已提交
423
}
B
bellard 已提交
424

B
bellard 已提交
425
#ifdef TARGET_X86_64
B
bellard 已提交
426 427 428 429
static inline void gen_op_addq_A0_im(int64_t val)
{
    tcg_gen_addi_tl(cpu_A0, cpu_A0, val);
}
B
bellard 已提交
430
#endif
B
bellard 已提交
431 432 433 434 435 436 437 438 439 440
    
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 已提交
441

B
bellard 已提交
442
static inline void gen_op_addl_T0_T1(void)
B
bellard 已提交
443
{
B
bellard 已提交
444 445 446 447 448
    tcg_gen_add_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
}

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

452
static inline void gen_op_add_reg_im(int size, int reg, int32_t val)
B
bellard 已提交
453
{
454
    switch(size) {
455
    case MO_8:
456
        tcg_gen_addi_tl(cpu_tmp0, cpu_regs[reg], val);
457
        tcg_gen_deposit_tl(cpu_regs[reg], cpu_regs[reg], cpu_tmp0, 0, 16);
458
        break;
459
    case MO_16:
460 461 462 463 464
        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);
465 466
        break;
#ifdef TARGET_X86_64
467
    case MO_32:
468
        tcg_gen_addi_tl(cpu_regs[reg], cpu_regs[reg], val);
469 470 471
        break;
#endif
    }
B
bellard 已提交
472 473
}

474
static inline void gen_op_add_reg_T0(int size, int reg)
B
bellard 已提交
475
{
476
    switch(size) {
477
    case MO_8:
478
        tcg_gen_add_tl(cpu_tmp0, cpu_regs[reg], cpu_T[0]);
479
        tcg_gen_deposit_tl(cpu_regs[reg], cpu_regs[reg], cpu_tmp0, 0, 16);
480
        break;
481
    case MO_16:
482 483 484 485 486
        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);
487
        break;
B
bellard 已提交
488
#ifdef TARGET_X86_64
489
    case MO_32:
490
        tcg_gen_add_tl(cpu_regs[reg], cpu_regs[reg], cpu_T[0]);
491
        break;
B
bellard 已提交
492
#endif
493 494
    }
}
B
bellard 已提交
495 496 497

static inline void gen_op_addl_A0_reg_sN(int shift, int reg)
{
498 499
    tcg_gen_mov_tl(cpu_tmp0, cpu_regs[reg]);
    if (shift != 0)
B
bellard 已提交
500 501
        tcg_gen_shli_tl(cpu_tmp0, cpu_tmp0, shift);
    tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_tmp0);
502 503 504
    /* 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 已提交
505
}
B
bellard 已提交
506

B
bellard 已提交
507 508
static inline void gen_op_movl_A0_seg(int reg)
{
509
    tcg_gen_ld32u_tl(cpu_A0, cpu_env, offsetof(CPUX86State, segs[reg].base) + REG_L_OFFSET);
B
bellard 已提交
510
}
B
bellard 已提交
511

512
static inline void gen_op_addl_A0_seg(DisasContext *s, int reg)
B
bellard 已提交
513
{
514
    tcg_gen_ld_tl(cpu_tmp0, cpu_env, offsetof(CPUX86State, segs[reg].base));
B
bellard 已提交
515
#ifdef TARGET_X86_64
516 517 518 519 520 521 522 523 524
    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 已提交
525 526
#endif
}
B
bellard 已提交
527

B
bellard 已提交
528
#ifdef TARGET_X86_64
B
bellard 已提交
529 530
static inline void gen_op_movq_A0_seg(int reg)
{
531
    tcg_gen_ld_tl(cpu_A0, cpu_env, offsetof(CPUX86State, segs[reg].base));
B
bellard 已提交
532
}
B
bellard 已提交
533

B
bellard 已提交
534 535
static inline void gen_op_addq_A0_seg(int reg)
{
536
    tcg_gen_ld_tl(cpu_tmp0, cpu_env, offsetof(CPUX86State, segs[reg].base));
B
bellard 已提交
537 538 539 540 541
    tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_tmp0);
}

static inline void gen_op_movq_A0_reg(int reg)
{
542
    tcg_gen_mov_tl(cpu_A0, cpu_regs[reg]);
B
bellard 已提交
543 544 545 546
}

static inline void gen_op_addq_A0_reg_sN(int shift, int reg)
{
547 548
    tcg_gen_mov_tl(cpu_tmp0, cpu_regs[reg]);
    if (shift != 0)
B
bellard 已提交
549 550 551
        tcg_gen_shli_tl(cpu_tmp0, cpu_tmp0, shift);
    tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_tmp0);
}
B
bellard 已提交
552 553
#endif

554
static inline void gen_op_ld_v(DisasContext *s, int idx, TCGv t0, TCGv a0)
B
bellard 已提交
555
{
556
    tcg_gen_qemu_ld_tl(t0, a0, s->mem_index, idx | MO_LE);
B
bellard 已提交
557
}
B
bellard 已提交
558

559
static inline void gen_op_st_v(DisasContext *s, int idx, TCGv t0, TCGv a0)
B
bellard 已提交
560
{
561
    tcg_gen_qemu_st_tl(t0, a0, s->mem_index, idx | MO_LE);
B
bellard 已提交
562
}
563

564 565 566
static inline void gen_op_st_rm_T0_A0(DisasContext *s, int idx, int d)
{
    if (d == OR_TMP0) {
567
        gen_op_st_v(s, idx, cpu_T[0], cpu_A0);
568 569 570 571 572
    } else {
        gen_op_mov_reg_T0(idx, d);
    }
}

B
bellard 已提交
573 574
static inline void gen_jmp_im(target_ulong pc)
{
B
bellard 已提交
575
    tcg_gen_movi_tl(cpu_tmp0, pc);
576
    tcg_gen_st_tl(cpu_tmp0, cpu_env, offsetof(CPUX86State, eip));
B
bellard 已提交
577 578
}

B
bellard 已提交
579 580 581 582 583
static inline void gen_string_movl_A0_ESI(DisasContext *s)
{
    int override;

    override = s->override;
B
bellard 已提交
584 585 586
#ifdef TARGET_X86_64
    if (s->aflag == 2) {
        if (override >= 0) {
B
bellard 已提交
587 588
            gen_op_movq_A0_seg(override);
            gen_op_addq_A0_reg_sN(0, R_ESI);
B
bellard 已提交
589
        } else {
B
bellard 已提交
590
            gen_op_movq_A0_reg(R_ESI);
B
bellard 已提交
591 592 593
        }
    } else
#endif
B
bellard 已提交
594 595 596 597 598
    if (s->aflag) {
        /* 32 bit address */
        if (s->addseg && override < 0)
            override = R_DS;
        if (override >= 0) {
B
bellard 已提交
599 600
            gen_op_movl_A0_seg(override);
            gen_op_addl_A0_reg_sN(0, R_ESI);
B
bellard 已提交
601
        } else {
B
bellard 已提交
602
            gen_op_movl_A0_reg(R_ESI);
B
bellard 已提交
603 604 605 606 607
        }
    } else {
        /* 16 address, always override */
        if (override < 0)
            override = R_DS;
B
bellard 已提交
608
        gen_op_movl_A0_reg(R_ESI);
B
bellard 已提交
609
        gen_op_andl_A0_ffff();
610
        gen_op_addl_A0_seg(s, override);
B
bellard 已提交
611 612 613 614 615
    }
}

static inline void gen_string_movl_A0_EDI(DisasContext *s)
{
B
bellard 已提交
616 617
#ifdef TARGET_X86_64
    if (s->aflag == 2) {
B
bellard 已提交
618
        gen_op_movq_A0_reg(R_EDI);
B
bellard 已提交
619 620
    } else
#endif
B
bellard 已提交
621 622
    if (s->aflag) {
        if (s->addseg) {
B
bellard 已提交
623 624
            gen_op_movl_A0_seg(R_ES);
            gen_op_addl_A0_reg_sN(0, R_EDI);
B
bellard 已提交
625
        } else {
B
bellard 已提交
626
            gen_op_movl_A0_reg(R_EDI);
B
bellard 已提交
627 628
        }
    } else {
B
bellard 已提交
629
        gen_op_movl_A0_reg(R_EDI);
B
bellard 已提交
630
        gen_op_andl_A0_ffff();
631
        gen_op_addl_A0_seg(s, R_ES);
B
bellard 已提交
632 633 634
    }
}

635 636
static inline void gen_op_movl_T0_Dshift(int ot) 
{
637
    tcg_gen_ld32s_tl(cpu_T[0], cpu_env, offsetof(CPUX86State, df));
638
    tcg_gen_shli_tl(cpu_T[0], cpu_T[0], ot);
B
bellard 已提交
639 640
};

641
static TCGv gen_ext_tl(TCGv dst, TCGv src, int size, bool sign)
642
{
643
    switch (size) {
644
    case MO_8:
645 646 647 648 649 650
        if (sign) {
            tcg_gen_ext8s_tl(dst, src);
        } else {
            tcg_gen_ext8u_tl(dst, src);
        }
        return dst;
651
    case MO_16:
652 653 654 655 656 657 658
        if (sign) {
            tcg_gen_ext16s_tl(dst, src);
        } else {
            tcg_gen_ext16u_tl(dst, src);
        }
        return dst;
#ifdef TARGET_X86_64
659
    case MO_32:
660 661 662 663 664 665 666
        if (sign) {
            tcg_gen_ext32s_tl(dst, src);
        } else {
            tcg_gen_ext32u_tl(dst, src);
        }
        return dst;
#endif
667
    default:
668
        return src;
669 670
    }
}
671

672 673 674 675 676
static void gen_extu(int ot, TCGv reg)
{
    gen_ext_tl(reg, reg, ot, false);
}

677 678
static void gen_exts(int ot, TCGv reg)
{
679
    gen_ext_tl(reg, reg, ot, true);
680
}
B
bellard 已提交
681

682 683
static inline void gen_op_jnz_ecx(int size, int label1)
{
684
    tcg_gen_mov_tl(cpu_tmp0, cpu_regs[R_ECX]);
685
    gen_extu(size + 1, cpu_tmp0);
P
pbrook 已提交
686
    tcg_gen_brcondi_tl(TCG_COND_NE, cpu_tmp0, 0, label1);
687 688 689 690
}

static inline void gen_op_jz_ecx(int size, int label1)
{
691
    tcg_gen_mov_tl(cpu_tmp0, cpu_regs[R_ECX]);
692
    gen_extu(size + 1, cpu_tmp0);
P
pbrook 已提交
693
    tcg_gen_brcondi_tl(TCG_COND_EQ, cpu_tmp0, 0, label1);
694
}
B
bellard 已提交
695

P
pbrook 已提交
696 697 698
static void gen_helper_in_func(int ot, TCGv v, TCGv_i32 n)
{
    switch (ot) {
699
    case MO_8:
700 701
        gen_helper_inb(v, n);
        break;
702
    case MO_16:
703 704
        gen_helper_inw(v, n);
        break;
705
    case MO_32:
706 707
        gen_helper_inl(v, n);
        break;
P
pbrook 已提交
708 709
    }
}
B
bellard 已提交
710

P
pbrook 已提交
711 712 713
static void gen_helper_out_func(int ot, TCGv_i32 v, TCGv_i32 n)
{
    switch (ot) {
714
    case MO_8:
715 716
        gen_helper_outb(v, n);
        break;
717
    case MO_16:
718 719
        gen_helper_outw(v, n);
        break;
720
    case MO_32:
721 722
        gen_helper_outl(v, n);
        break;
P
pbrook 已提交
723 724
    }
}
725

726 727
static void gen_check_io(DisasContext *s, int ot, target_ulong cur_eip,
                         uint32_t svm_flags)
728
{
729 730 731 732
    int state_saved;
    target_ulong next_eip;

    state_saved = 0;
733
    if (s->pe && (s->cpl > s->iopl || s->vm86)) {
734
        gen_update_cc_op(s);
B
bellard 已提交
735
        gen_jmp_im(cur_eip);
736
        state_saved = 1;
737
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
P
pbrook 已提交
738
        switch (ot) {
739
        case MO_8:
B
Blue Swirl 已提交
740 741
            gen_helper_check_iob(cpu_env, cpu_tmp2_i32);
            break;
742
        case MO_16:
B
Blue Swirl 已提交
743 744
            gen_helper_check_iow(cpu_env, cpu_tmp2_i32);
            break;
745
        case MO_32:
B
Blue Swirl 已提交
746 747
            gen_helper_check_iol(cpu_env, cpu_tmp2_i32);
            break;
P
pbrook 已提交
748
        }
749
    }
B
bellard 已提交
750
    if(s->flags & HF_SVMI_MASK) {
751
        if (!state_saved) {
752
            gen_update_cc_op(s);
753 754 755 756
            gen_jmp_im(cur_eip);
        }
        svm_flags |= (1 << (4 + ot));
        next_eip = s->pc - s->cs_base;
757
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
B
Blue Swirl 已提交
758 759
        gen_helper_svm_check_io(cpu_env, cpu_tmp2_i32,
                                tcg_const_i32(svm_flags),
P
pbrook 已提交
760
                                tcg_const_i32(next_eip - cur_eip));
761 762 763
    }
}

B
bellard 已提交
764 765 766
static inline void gen_movs(DisasContext *s, int ot)
{
    gen_string_movl_A0_ESI(s);
767
    gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
768
    gen_string_movl_A0_EDI(s);
769
    gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
770 771 772
    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 已提交
773 774
}

775 776 777 778 779 780 781 782 783 784 785
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]);
}

786 787 788 789 790 791 792
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]);
}

793 794 795 796 797 798 799 800
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]);
801 802
    tcg_gen_neg_tl(cpu_cc_src, cpu_T[0]);
    tcg_gen_movi_tl(cpu_cc_srcT, 0);
803 804
}

805 806
/* compute all eflags to cc_src */
static void gen_compute_eflags(DisasContext *s)
807
{
808
    TCGv zero, dst, src1, src2;
809 810
    int live, dead;

811 812 813
    if (s->cc_op == CC_OP_EFLAGS) {
        return;
    }
R
Richard Henderson 已提交
814 815 816 817 818
    if (s->cc_op == CC_OP_CLR) {
        tcg_gen_movi_tl(cpu_cc_src, CC_Z);
        set_cc_op(s, CC_OP_EFLAGS);
        return;
    }
819 820 821 822

    TCGV_UNUSED(zero);
    dst = cpu_cc_dst;
    src1 = cpu_cc_src;
823
    src2 = cpu_cc_src2;
824 825 826

    /* Take care to not read values that are not live.  */
    live = cc_op_live[s->cc_op] & ~USES_CC_SRCT;
827
    dead = live ^ (USES_CC_DST | USES_CC_SRC | USES_CC_SRC2);
828 829 830 831 832 833 834 835
    if (dead) {
        zero = tcg_const_tl(0);
        if (dead & USES_CC_DST) {
            dst = zero;
        }
        if (dead & USES_CC_SRC) {
            src1 = zero;
        }
836 837 838
        if (dead & USES_CC_SRC2) {
            src2 = zero;
        }
839 840
    }

841
    gen_update_cc_op(s);
842
    gen_helper_cc_compute_all(cpu_cc_src, dst, src1, src2, cpu_cc_op);
843
    set_cc_op(s, CC_OP_EFLAGS);
844 845 846 847

    if (dead) {
        tcg_temp_free(zero);
    }
848 849
}

850 851 852 853 854 855 856 857 858 859
typedef struct CCPrepare {
    TCGCond cond;
    TCGv reg;
    TCGv reg2;
    target_ulong imm;
    target_ulong mask;
    bool use_reg2;
    bool no_setcond;
} CCPrepare;

860
/* compute eflags.C to reg */
861
static CCPrepare gen_prepare_eflags_c(DisasContext *s, TCGv reg)
862 863
{
    TCGv t0, t1;
864
    int size, shift;
865 866 867

    switch (s->cc_op) {
    case CC_OP_SUBB ... CC_OP_SUBQ:
868
        /* (DATA_TYPE)CC_SRCT < (DATA_TYPE)CC_SRC */
869 870 871 872
        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;
873
        tcg_gen_mov_tl(t0, cpu_cc_srcT);
874 875 876 877 878 879 880 881 882
        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:
883 884
        return (CCPrepare) { .cond = TCG_COND_LTU, .reg = t0,
                             .reg2 = t1, .mask = -1, .use_reg2 = true };
885 886

    case CC_OP_LOGICB ... CC_OP_LOGICQ:
R
Richard Henderson 已提交
887
    case CC_OP_CLR:
888
        return (CCPrepare) { .cond = TCG_COND_NEVER, .mask = -1 };
889 890 891

    case CC_OP_INCB ... CC_OP_INCQ:
    case CC_OP_DECB ... CC_OP_DECQ:
892 893
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                             .mask = -1, .no_setcond = true };
894 895 896 897

    case CC_OP_SHLB ... CC_OP_SHLQ:
        /* (CC_SRC >> (DATA_BITS - 1)) & 1 */
        size = s->cc_op - CC_OP_SHLB;
898 899 900
        shift = (8 << size) - 1;
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                             .mask = (target_ulong)1 << shift };
901 902

    case CC_OP_MULB ... CC_OP_MULQ:
903 904
        return (CCPrepare) { .cond = TCG_COND_NE,
                             .reg = cpu_cc_src, .mask = -1 };
905

906 907 908 909 910
    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 };

911 912 913 914 915
    case CC_OP_ADCX:
    case CC_OP_ADCOX:
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_dst,
                             .mask = -1, .no_setcond = true };

916 917 918
    case CC_OP_EFLAGS:
    case CC_OP_SARB ... CC_OP_SARQ:
        /* CC_SRC & 1 */
919 920
        return (CCPrepare) { .cond = TCG_COND_NE,
                             .reg = cpu_cc_src, .mask = CC_C };
921 922 923 924 925

    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);
926 927
       gen_helper_cc_compute_c(reg, cpu_cc_dst, cpu_cc_src,
                               cpu_cc_src2, cpu_cc_op);
928 929
       return (CCPrepare) { .cond = TCG_COND_NE, .reg = reg,
                            .mask = -1, .no_setcond = true };
930 931 932
    }
}

933
/* compute eflags.P to reg */
934
static CCPrepare gen_prepare_eflags_p(DisasContext *s, TCGv reg)
935
{
936
    gen_compute_eflags(s);
937 938
    return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                         .mask = CC_P };
939 940 941
}

/* compute eflags.S to reg */
942
static CCPrepare gen_prepare_eflags_s(DisasContext *s, TCGv reg)
943
{
944 945 946 947 948
    switch (s->cc_op) {
    case CC_OP_DYNAMIC:
        gen_compute_eflags(s);
        /* FALLTHRU */
    case CC_OP_EFLAGS:
949 950 951
    case CC_OP_ADCX:
    case CC_OP_ADOX:
    case CC_OP_ADCOX:
952 953
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                             .mask = CC_S };
R
Richard Henderson 已提交
954 955
    case CC_OP_CLR:
        return (CCPrepare) { .cond = TCG_COND_NEVER, .mask = -1 };
956 957 958 959
    default:
        {
            int size = (s->cc_op - CC_OP_ADDB) & 3;
            TCGv t0 = gen_ext_tl(reg, cpu_cc_dst, size, true);
960
            return (CCPrepare) { .cond = TCG_COND_LT, .reg = t0, .mask = -1 };
961 962
        }
    }
963 964 965
}

/* compute eflags.O to reg */
966
static CCPrepare gen_prepare_eflags_o(DisasContext *s, TCGv reg)
967
{
968 969 970 971 972
    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 已提交
973 974
    case CC_OP_CLR:
        return (CCPrepare) { .cond = TCG_COND_NEVER, .mask = -1 };
975 976 977 978 979
    default:
        gen_compute_eflags(s);
        return (CCPrepare) { .cond = TCG_COND_NE, .reg = cpu_cc_src,
                             .mask = CC_O };
    }
980 981 982
}

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

1006 1007
/* perform a conditional store into register 'reg' according to jump opcode
   value 'b'. In the fast case, T0 is guaranted not to be used. */
1008
static CCPrepare gen_prepare_cc(DisasContext *s, int b, TCGv reg)
1009
{
1010
    int inv, jcc_op, size, cond;
1011
    CCPrepare cc;
1012 1013 1014
    TCGv t0;

    inv = b & 1;
1015
    jcc_op = (b >> 1) & 7;
1016 1017

    switch (s->cc_op) {
1018 1019
    case CC_OP_SUBB ... CC_OP_SUBQ:
        /* We optimize relational operators for the cmp/jcc case.  */
1020 1021 1022
        size = s->cc_op - CC_OP_SUBB;
        switch (jcc_op) {
        case JCC_BE:
1023
            tcg_gen_mov_tl(cpu_tmp4, cpu_cc_srcT);
1024 1025
            gen_extu(size, cpu_tmp4);
            t0 = gen_ext_tl(cpu_tmp0, cpu_cc_src, size, false);
1026 1027
            cc = (CCPrepare) { .cond = TCG_COND_LEU, .reg = cpu_tmp4,
                               .reg2 = t0, .mask = -1, .use_reg2 = true };
1028
            break;
1029

1030
        case JCC_L:
1031
            cond = TCG_COND_LT;
1032 1033
            goto fast_jcc_l;
        case JCC_LE:
1034
            cond = TCG_COND_LE;
1035
        fast_jcc_l:
1036
            tcg_gen_mov_tl(cpu_tmp4, cpu_cc_srcT);
1037 1038
            gen_exts(size, cpu_tmp4);
            t0 = gen_ext_tl(cpu_tmp0, cpu_cc_src, size, true);
1039 1040
            cc = (CCPrepare) { .cond = cond, .reg = cpu_tmp4,
                               .reg2 = t0, .mask = -1, .use_reg2 = true };
1041
            break;
1042

1043
        default:
1044
            goto slow_jcc;
1045
        }
1046
        break;
1047

1048 1049
    default:
    slow_jcc:
1050 1051 1052 1053 1054 1055 1056 1057 1058 1059 1060 1061 1062 1063 1064 1065 1066 1067 1068 1069 1070 1071 1072 1073 1074 1075 1076 1077 1078 1079 1080 1081 1082 1083 1084 1085 1086 1087 1088 1089 1090 1091 1092 1093
        /* 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;
        }
1094
        break;
1095
    }
1096 1097 1098 1099 1100

    if (inv) {
        cc.cond = tcg_invert_cond(cc.cond);
    }
    return cc;
1101 1102
}

1103 1104 1105 1106 1107 1108 1109 1110 1111 1112 1113 1114 1115 1116 1117 1118 1119 1120 1121 1122 1123 1124 1125 1126 1127 1128 1129 1130 1131 1132 1133 1134 1135 1136
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);
}
1137

1138 1139
/* generate a conditional jump to label 'l1' according to jump opcode
   value 'b'. In the fast case, T0 is guaranted not to be used. */
1140 1141 1142 1143 1144 1145 1146 1147 1148 1149 1150 1151 1152 1153 1154 1155 1156 1157
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.  */
1158
static inline void gen_jcc1(DisasContext *s, int b, int l1)
1159
{
1160
    CCPrepare cc = gen_prepare_cc(s, b, cpu_T[0]);
1161

1162
    gen_update_cc_op(s);
1163 1164 1165 1166
    if (cc.mask != -1) {
        tcg_gen_andi_tl(cpu_T[0], cc.reg, cc.mask);
        cc.reg = cpu_T[0];
    }
1167
    set_cc_op(s, CC_OP_DYNAMIC);
1168 1169 1170 1171
    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);
1172 1173 1174
    }
}

B
bellard 已提交
1175 1176 1177
/* 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 已提交
1178
{
B
bellard 已提交
1179 1180 1181 1182
    int l1, l2;

    l1 = gen_new_label();
    l2 = gen_new_label();
1183
    gen_op_jnz_ecx(s->aflag, l1);
B
bellard 已提交
1184 1185 1186 1187
    gen_set_label(l2);
    gen_jmp_tb(s, next_eip, 1);
    gen_set_label(l1);
    return l2;
B
bellard 已提交
1188 1189 1190 1191
}

static inline void gen_stos(DisasContext *s, int ot)
{
1192
    gen_op_mov_TN_reg(MO_32, 0, R_EAX);
B
bellard 已提交
1193
    gen_string_movl_A0_EDI(s);
1194
    gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
1195 1196
    gen_op_movl_T0_Dshift(ot);
    gen_op_add_reg_T0(s->aflag, R_EDI);
B
bellard 已提交
1197 1198 1199 1200 1201
}

static inline void gen_lods(DisasContext *s, int ot)
{
    gen_string_movl_A0_ESI(s);
1202
    gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
1203
    gen_op_mov_reg_T0(ot, R_EAX);
1204 1205
    gen_op_movl_T0_Dshift(ot);
    gen_op_add_reg_T0(s->aflag, R_ESI);
B
bellard 已提交
1206 1207 1208 1209 1210
}

static inline void gen_scas(DisasContext *s, int ot)
{
    gen_string_movl_A0_EDI(s);
1211
    gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
1212
    gen_op(s, OP_CMPL, ot, R_EAX);
1213 1214
    gen_op_movl_T0_Dshift(ot);
    gen_op_add_reg_T0(s->aflag, R_EDI);
B
bellard 已提交
1215 1216 1217 1218 1219
}

static inline void gen_cmps(DisasContext *s, int ot)
{
    gen_string_movl_A0_EDI(s);
1220
    gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
1221 1222
    gen_string_movl_A0_ESI(s);
    gen_op(s, OP_CMPL, ot, OR_TMP0);
1223 1224 1225
    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 已提交
1226 1227 1228 1229
}

static inline void gen_ins(DisasContext *s, int ot)
{
P
pbrook 已提交
1230 1231
    if (use_icount)
        gen_io_start();
B
bellard 已提交
1232
    gen_string_movl_A0_EDI(s);
1233 1234
    /* Note: we must do this dummy write first to be restartable in
       case of page fault. */
1235
    tcg_gen_movi_tl(cpu_T[0], 0);
1236
    gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
1237
    tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_regs[R_EDX]);
1238
    tcg_gen_andi_i32(cpu_tmp2_i32, cpu_tmp2_i32, 0xffff);
P
pbrook 已提交
1239
    gen_helper_in_func(ot, cpu_T[0], cpu_tmp2_i32);
1240
    gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
1241 1242
    gen_op_movl_T0_Dshift(ot);
    gen_op_add_reg_T0(s->aflag, R_EDI);
P
pbrook 已提交
1243 1244
    if (use_icount)
        gen_io_end();
B
bellard 已提交
1245 1246 1247 1248
}

static inline void gen_outs(DisasContext *s, int ot)
{
P
pbrook 已提交
1249 1250
    if (use_icount)
        gen_io_start();
B
bellard 已提交
1251
    gen_string_movl_A0_ESI(s);
1252
    gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1253

1254
    tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_regs[R_EDX]);
1255 1256
    tcg_gen_andi_i32(cpu_tmp2_i32, cpu_tmp2_i32, 0xffff);
    tcg_gen_trunc_tl_i32(cpu_tmp3_i32, cpu_T[0]);
P
pbrook 已提交
1257
    gen_helper_out_func(ot, cpu_tmp2_i32, cpu_tmp3_i32);
1258

1259 1260
    gen_op_movl_T0_Dshift(ot);
    gen_op_add_reg_T0(s->aflag, R_ESI);
P
pbrook 已提交
1261 1262
    if (use_icount)
        gen_io_end();
B
bellard 已提交
1263 1264 1265 1266 1267 1268
}

/* 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 已提交
1269
                                 target_ulong cur_eip, target_ulong next_eip) \
B
bellard 已提交
1270
{                                                                             \
B
bellard 已提交
1271
    int l2;\
B
bellard 已提交
1272
    gen_update_cc_op(s);                                                      \
B
bellard 已提交
1273
    l2 = gen_jz_ecx_string(s, next_eip);                                      \
B
bellard 已提交
1274
    gen_ ## op(s, ot);                                                        \
1275
    gen_op_add_reg_im(s->aflag, R_ECX, -1);                                   \
B
bellard 已提交
1276 1277 1278
    /* a loop would cause two single step exceptions if ECX = 1               \
       before rep string_insn */                                              \
    if (!s->jmp_opt)                                                          \
1279
        gen_op_jz_ecx(s->aflag, l2);                                          \
B
bellard 已提交
1280 1281 1282 1283 1284
    gen_jmp(s, cur_eip);                                                      \
}

#define GEN_REPZ2(op)                                                         \
static inline void gen_repz_ ## op(DisasContext *s, int ot,                   \
B
bellard 已提交
1285 1286
                                   target_ulong cur_eip,                      \
                                   target_ulong next_eip,                     \
B
bellard 已提交
1287 1288
                                   int nz)                                    \
{                                                                             \
B
bellard 已提交
1289
    int l2;\
B
bellard 已提交
1290
    gen_update_cc_op(s);                                                      \
B
bellard 已提交
1291
    l2 = gen_jz_ecx_string(s, next_eip);                                      \
B
bellard 已提交
1292
    gen_ ## op(s, ot);                                                        \
1293
    gen_op_add_reg_im(s->aflag, R_ECX, -1);                                   \
1294
    gen_update_cc_op(s);                                                      \
1295
    gen_jcc1(s, (JCC_Z << 1) | (nz ^ 1), l2);                                 \
B
bellard 已提交
1296
    if (!s->jmp_opt)                                                          \
1297
        gen_op_jz_ecx(s->aflag, l2);                                          \
B
bellard 已提交
1298 1299 1300 1301 1302 1303 1304 1305 1306 1307 1308
    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 已提交
1309 1310 1311
static void gen_helper_fp_arith_ST0_FT0(int op)
{
    switch (op) {
B
Blue Swirl 已提交
1312 1313 1314 1315 1316 1317 1318 1319 1320 1321 1322 1323 1324 1325 1326 1327 1328 1329 1330 1331 1332 1333 1334 1335
    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 已提交
1336 1337
    }
}
B
bellard 已提交
1338 1339

/* NOTE the exception in "r" op ordering */
P
pbrook 已提交
1340 1341 1342 1343
static void gen_helper_fp_arith_STN_ST0(int op, int opreg)
{
    TCGv_i32 tmp = tcg_const_i32(opreg);
    switch (op) {
B
Blue Swirl 已提交
1344 1345 1346 1347 1348 1349 1350 1351 1352 1353 1354 1355 1356 1357 1358 1359 1360 1361
    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 已提交
1362 1363
    }
}
B
bellard 已提交
1364 1365 1366 1367 1368

/* 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 已提交
1369
        gen_op_mov_TN_reg(ot, 0, d);
B
bellard 已提交
1370
    } else {
1371
        gen_op_ld_v(s1, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
1372 1373 1374
    }
    switch(op) {
    case OP_ADCL:
1375
        gen_compute_eflags_c(s1, cpu_tmp4);
B
bellard 已提交
1376 1377
        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);
1378
        gen_op_st_rm_T0_A0(s1, ot, d);
1379 1380
        gen_op_update3_cc(cpu_tmp4);
        set_cc_op(s1, CC_OP_ADCB + ot);
B
bellard 已提交
1381
        break;
B
bellard 已提交
1382
    case OP_SBBL:
1383
        gen_compute_eflags_c(s1, cpu_tmp4);
B
bellard 已提交
1384 1385
        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);
1386
        gen_op_st_rm_T0_A0(s1, ot, d);
1387 1388
        gen_op_update3_cc(cpu_tmp4);
        set_cc_op(s1, CC_OP_SBBB + ot);
B
bellard 已提交
1389
        break;
B
bellard 已提交
1390 1391
    case OP_ADDL:
        gen_op_addl_T0_T1();
1392
        gen_op_st_rm_T0_A0(s1, ot, d);
B
bellard 已提交
1393
        gen_op_update2_cc();
1394
        set_cc_op(s1, CC_OP_ADDB + ot);
B
bellard 已提交
1395 1396
        break;
    case OP_SUBL:
1397
        tcg_gen_mov_tl(cpu_cc_srcT, cpu_T[0]);
B
bellard 已提交
1398
        tcg_gen_sub_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1399
        gen_op_st_rm_T0_A0(s1, ot, d);
B
bellard 已提交
1400
        gen_op_update2_cc();
1401
        set_cc_op(s1, CC_OP_SUBB + ot);
B
bellard 已提交
1402 1403 1404
        break;
    default:
    case OP_ANDL:
B
bellard 已提交
1405
        tcg_gen_and_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1406
        gen_op_st_rm_T0_A0(s1, ot, d);
B
bellard 已提交
1407
        gen_op_update1_cc();
1408
        set_cc_op(s1, CC_OP_LOGICB + ot);
B
bellard 已提交
1409
        break;
B
bellard 已提交
1410
    case OP_ORL:
B
bellard 已提交
1411
        tcg_gen_or_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1412
        gen_op_st_rm_T0_A0(s1, ot, d);
B
bellard 已提交
1413
        gen_op_update1_cc();
1414
        set_cc_op(s1, CC_OP_LOGICB + ot);
B
bellard 已提交
1415
        break;
B
bellard 已提交
1416
    case OP_XORL:
B
bellard 已提交
1417
        tcg_gen_xor_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1418
        gen_op_st_rm_T0_A0(s1, ot, d);
B
bellard 已提交
1419
        gen_op_update1_cc();
1420
        set_cc_op(s1, CC_OP_LOGICB + ot);
B
bellard 已提交
1421 1422
        break;
    case OP_CMPL:
1423
        tcg_gen_mov_tl(cpu_cc_src, cpu_T[1]);
1424
        tcg_gen_mov_tl(cpu_cc_srcT, cpu_T[0]);
1425
        tcg_gen_sub_tl(cpu_cc_dst, cpu_T[0], cpu_T[1]);
1426
        set_cc_op(s1, CC_OP_SUBB + ot);
B
bellard 已提交
1427 1428
        break;
    }
1429 1430
}

B
bellard 已提交
1431 1432 1433
/* if d == OR_TMP0, it means memory operand (address in A0) */
static void gen_inc(DisasContext *s1, int ot, int d, int c)
{
1434
    if (d != OR_TMP0) {
B
bellard 已提交
1435
        gen_op_mov_TN_reg(ot, 0, d);
1436 1437 1438
    } else {
        gen_op_ld_v(s1, ot, cpu_T[0], cpu_A0);
    }
1439
    gen_compute_eflags_c(s1, cpu_cc_src);
B
bellard 已提交
1440
    if (c > 0) {
1441
        tcg_gen_addi_tl(cpu_T[0], cpu_T[0], 1);
1442
        set_cc_op(s1, CC_OP_INCB + ot);
B
bellard 已提交
1443
    } else {
1444
        tcg_gen_addi_tl(cpu_T[0], cpu_T[0], -1);
1445
        set_cc_op(s1, CC_OP_DECB + ot);
B
bellard 已提交
1446
    }
1447
    gen_op_st_rm_T0_A0(s1, ot, d);
B
bellard 已提交
1448
    tcg_gen_mov_tl(cpu_cc_dst, cpu_T[0]);
B
bellard 已提交
1449 1450
}

1451 1452 1453 1454 1455 1456 1457 1458 1459 1460 1461 1462 1463 1464 1465 1466 1467 1468 1469 1470 1471 1472 1473 1474 1475 1476 1477 1478 1479 1480 1481 1482 1483 1484 1485 1486 1487 1488 1489 1490 1491 1492 1493 1494 1495
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);
}

1496 1497
static void gen_shift_rm_T1(DisasContext *s, int ot, int op1, 
                            int is_right, int is_arith)
B
bellard 已提交
1498
{
1499
    target_ulong mask = (ot == MO_64 ? 0x3f : 0x1f);
1500

1501
    /* load */
1502
    if (op1 == OR_TMP0) {
1503
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1504
    } else {
1505
        gen_op_mov_TN_reg(ot, 0, op1);
1506
    }
1507

1508 1509
    tcg_gen_andi_tl(cpu_T[1], cpu_T[1], mask);
    tcg_gen_subi_tl(cpu_tmp0, cpu_T[1], 1);
1510 1511 1512

    if (is_right) {
        if (is_arith) {
B
bellard 已提交
1513
            gen_exts(ot, cpu_T[0]);
1514 1515
            tcg_gen_sar_tl(cpu_tmp0, cpu_T[0], cpu_tmp0);
            tcg_gen_sar_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1516
        } else {
B
bellard 已提交
1517
            gen_extu(ot, cpu_T[0]);
1518 1519
            tcg_gen_shr_tl(cpu_tmp0, cpu_T[0], cpu_tmp0);
            tcg_gen_shr_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1520 1521
        }
    } else {
1522 1523
        tcg_gen_shl_tl(cpu_tmp0, cpu_T[0], cpu_tmp0);
        tcg_gen_shl_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
1524 1525 1526
    }

    /* store */
1527
    gen_op_st_rm_T0_A0(s, ot, op1);
1528

1529
    gen_shift_flags(s, ot, cpu_T[0], cpu_tmp0, cpu_T[1], is_right);
1530 1531
}

B
bellard 已提交
1532 1533 1534
static void gen_shift_rm_im(DisasContext *s, int ot, int op1, int op2,
                            int is_right, int is_arith)
{
1535
    int mask = (ot == MO_64 ? 0x3f : 0x1f);
B
bellard 已提交
1536 1537 1538

    /* load */
    if (op1 == OR_TMP0)
1539
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
1540 1541 1542 1543 1544 1545 1546 1547
    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 已提交
1548
                tcg_gen_sari_tl(cpu_tmp4, cpu_T[0], op2 - 1);
B
bellard 已提交
1549 1550 1551
                tcg_gen_sari_tl(cpu_T[0], cpu_T[0], op2);
            } else {
                gen_extu(ot, cpu_T[0]);
B
bellard 已提交
1552
                tcg_gen_shri_tl(cpu_tmp4, cpu_T[0], op2 - 1);
B
bellard 已提交
1553 1554 1555
                tcg_gen_shri_tl(cpu_T[0], cpu_T[0], op2);
            }
        } else {
B
bellard 已提交
1556
            tcg_gen_shli_tl(cpu_tmp4, cpu_T[0], op2 - 1);
B
bellard 已提交
1557 1558 1559 1560 1561
            tcg_gen_shli_tl(cpu_T[0], cpu_T[0], op2);
        }
    }

    /* store */
1562 1563
    gen_op_st_rm_T0_A0(s, ot, op1);

B
bellard 已提交
1564 1565
    /* update eflags if non zero shift */
    if (op2 != 0) {
B
bellard 已提交
1566
        tcg_gen_mov_tl(cpu_cc_src, cpu_tmp4);
B
bellard 已提交
1567
        tcg_gen_mov_tl(cpu_cc_dst, cpu_T[0]);
1568
        set_cc_op(s, (is_right ? CC_OP_SARB : CC_OP_SHLB) + ot);
B
bellard 已提交
1569 1570 1571
    }
}

1572 1573 1574 1575 1576 1577 1578 1579
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);
}

1580
static void gen_rot_rm_T1(DisasContext *s, int ot, int op1, int is_right)
1581
{
1582
    target_ulong mask = (ot == MO_64 ? 0x3f : 0x1f);
1583
    TCGv_i32 t0, t1;
1584 1585

    /* load */
1586
    if (op1 == OR_TMP0) {
1587
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1588
    } else {
1589
        gen_op_mov_TN_reg(ot, 0, op1);
1590
    }
1591

1592
    tcg_gen_andi_tl(cpu_T[1], cpu_T[1], mask);
1593

1594
    switch (ot) {
1595
    case MO_8:
1596 1597 1598 1599
        /* 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;
1600
    case MO_16:
1601 1602 1603 1604 1605
        /* 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
1606
    case MO_32:
1607 1608 1609 1610 1611 1612 1613 1614 1615 1616 1617 1618 1619 1620 1621 1622 1623
        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;
1624 1625 1626
    }

    /* store */
1627
    gen_op_st_rm_T0_A0(s, ot, op1);
1628

1629 1630
    /* We'll need the flags computed into CC_SRC.  */
    gen_compute_eflags(s);
1631

1632 1633 1634 1635
    /* 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.  */
1636
    if (is_right) {
1637 1638
        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 已提交
1639
        tcg_gen_andi_tl(cpu_cc_dst, cpu_cc_dst, 1);
1640 1641 1642
    } else {
        tcg_gen_shri_tl(cpu_cc_src2, cpu_T[0], mask);
        tcg_gen_andi_tl(cpu_cc_dst, cpu_T[0], 1);
1643
    }
1644 1645 1646 1647 1648 1649 1650 1651 1652 1653 1654 1655 1656 1657 1658 1659 1660 1661 1662
    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);
1663 1664
}

M
malc 已提交
1665 1666 1667
static void gen_rot_rm_im(DisasContext *s, int ot, int op1, int op2,
                          int is_right)
{
1668
    int mask = (ot == MO_64 ? 0x3f : 0x1f);
1669
    int shift;
M
malc 已提交
1670 1671 1672

    /* load */
    if (op1 == OR_TMP0) {
1673
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
M
malc 已提交
1674
    } else {
1675
        gen_op_mov_TN_reg(ot, 0, op1);
M
malc 已提交
1676 1677 1678 1679
    }

    op2 &= mask;
    if (op2 != 0) {
1680 1681
        switch (ot) {
#ifdef TARGET_X86_64
1682
        case MO_32:
1683 1684 1685 1686 1687 1688 1689 1690 1691 1692 1693 1694 1695 1696 1697 1698
            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;
1699
        case MO_8:
1700 1701
            mask = 7;
            goto do_shifts;
1702
        case MO_16:
1703 1704 1705 1706 1707 1708 1709 1710 1711 1712 1713
            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 已提交
1714 1715 1716 1717
        }
    }

    /* store */
1718
    gen_op_st_rm_T0_A0(s, ot, op1);
M
malc 已提交
1719 1720

    if (op2 != 0) {
1721
        /* Compute the flags into CC_SRC.  */
1722
        gen_compute_eflags(s);
1723

1724 1725 1726 1727
        /* 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 已提交
1728
        if (is_right) {
1729 1730
            tcg_gen_shri_tl(cpu_cc_src2, cpu_T[0], mask - 1);
            tcg_gen_shri_tl(cpu_cc_dst, cpu_T[0], mask);
1731
            tcg_gen_andi_tl(cpu_cc_dst, cpu_cc_dst, 1);
1732 1733 1734
        } 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 已提交
1735
        }
1736 1737 1738
        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 已提交
1739 1740 1741
    }
}

1742 1743 1744 1745
/* XXX: add faster immediate = 1 case */
static void gen_rotc_rm_T1(DisasContext *s, int ot, int op1, 
                           int is_right)
{
1746
    gen_compute_eflags(s);
1747
    assert(s->cc_op == CC_OP_EFLAGS);
1748 1749 1750

    /* load */
    if (op1 == OR_TMP0)
1751
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1752 1753 1754
    else
        gen_op_mov_TN_reg(ot, 0, op1);
    
P
pbrook 已提交
1755 1756
    if (is_right) {
        switch (ot) {
1757
        case MO_8:
1758 1759
            gen_helper_rcrb(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
1760
        case MO_16:
1761 1762
            gen_helper_rcrw(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
1763
        case MO_32:
1764 1765
            gen_helper_rcrl(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
P
pbrook 已提交
1766
#ifdef TARGET_X86_64
1767
        case MO_64:
1768 1769
            gen_helper_rcrq(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
P
pbrook 已提交
1770 1771 1772 1773
#endif
        }
    } else {
        switch (ot) {
1774
        case MO_8:
1775 1776
            gen_helper_rclb(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
1777
        case MO_16:
1778 1779
            gen_helper_rclw(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
1780
        case MO_32:
1781 1782
            gen_helper_rcll(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
P
pbrook 已提交
1783
#ifdef TARGET_X86_64
1784
        case MO_64:
1785 1786
            gen_helper_rclq(cpu_T[0], cpu_env, cpu_T[0], cpu_T[1]);
            break;
P
pbrook 已提交
1787 1788 1789
#endif
        }
    }
1790
    /* store */
1791
    gen_op_st_rm_T0_A0(s, ot, op1);
1792 1793 1794
}

/* XXX: add faster immediate case */
P
Paolo Bonzini 已提交
1795
static void gen_shiftd_rm_T1(DisasContext *s, int ot, int op1,
1796
                             bool is_right, TCGv count_in)
1797
{
1798
    target_ulong mask = (ot == MO_64 ? 63 : 31);
1799
    TCGv count;
1800 1801

    /* load */
1802
    if (op1 == OR_TMP0) {
1803
        gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
1804
    } else {
1805
        gen_op_mov_TN_reg(ot, 0, op1);
1806
    }
1807

1808 1809
    count = tcg_temp_new();
    tcg_gen_andi_tl(count, count_in, mask);
1810

1811
    switch (ot) {
1812
    case MO_16:
1813 1814 1815
        /* 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.  */
1816
        if (is_right) {
1817 1818 1819
            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);
1820
        } else {
1821
            tcg_gen_deposit_tl(cpu_T[1], cpu_T[0], cpu_T[1], 16, 16);
1822
        }
1823 1824
        /* FALLTHRU */
#ifdef TARGET_X86_64
1825
    case MO_32:
1826 1827
        /* Concatenate the two 32-bit values and use a 64-bit shift.  */
        tcg_gen_subi_tl(cpu_tmp0, count, 1);
1828
        if (is_right) {
1829 1830 1831 1832 1833 1834 1835 1836 1837 1838 1839 1840 1841 1842 1843 1844
            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);
1845

1846 1847 1848
            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);
1849
        } else {
1850
            tcg_gen_shl_tl(cpu_tmp0, cpu_T[0], cpu_tmp0);
1851
            if (ot == MO_16) {
1852 1853 1854 1855 1856 1857 1858 1859 1860
                /* 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);
1861
        }
1862 1863 1864 1865 1866
        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;
1867 1868 1869
    }

    /* store */
1870
    gen_op_st_rm_T0_A0(s, ot, op1);
1871

1872 1873
    gen_shift_flags(s, ot, cpu_T[0], cpu_tmp0, count, is_right);
    tcg_temp_free(count);
1874 1875 1876 1877 1878 1879 1880 1881 1882 1883 1884 1885 1886 1887 1888 1889 1890 1891 1892 1893 1894 1895 1896 1897 1898 1899 1900 1901 1902 1903
}

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 已提交
1904 1905 1906 1907
}

static void gen_shifti(DisasContext *s1, int op, int ot, int d, int c)
{
B
bellard 已提交
1908
    switch(op) {
M
malc 已提交
1909 1910 1911 1912 1913 1914
    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 已提交
1915 1916 1917 1918 1919 1920 1921 1922 1923 1924 1925 1926
    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 */
1927
        tcg_gen_movi_tl(cpu_T[1], c);
B
bellard 已提交
1928 1929 1930
        gen_shift(s1, op, ot, d, OR_TMP1);
        break;
    }
B
bellard 已提交
1931 1932
}

1933
static void gen_lea_modrm(CPUX86State *env, DisasContext *s, int modrm)
B
bellard 已提交
1934
{
B
bellard 已提交
1935
    target_long disp;
B
bellard 已提交
1936
    int havesib;
B
bellard 已提交
1937
    int base;
B
bellard 已提交
1938 1939 1940
    int index;
    int scale;
    int mod, rm, code, override, must_add_seg;
1941
    TCGv sum;
B
bellard 已提交
1942 1943 1944 1945 1946 1947 1948 1949 1950 1951 1952

    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;
1953
        index = -1;
B
bellard 已提交
1954
        scale = 0;
1955

B
bellard 已提交
1956 1957
        if (base == 4) {
            havesib = 1;
1958
            code = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
1959
            scale = (code >> 6) & 3;
B
bellard 已提交
1960
            index = ((code >> 3) & 7) | REX_X(s);
1961 1962 1963
            if (index == 4) {
                index = -1;  /* no index */
            }
B
bellard 已提交
1964
            base = (code & 7);
B
bellard 已提交
1965
        }
B
bellard 已提交
1966
        base |= REX_B(s);
B
bellard 已提交
1967 1968 1969

        switch (mod) {
        case 0:
B
bellard 已提交
1970
            if ((base & 7) == 5) {
B
bellard 已提交
1971
                base = -1;
1972
                disp = (int32_t)cpu_ldl_code(env, s->pc);
B
bellard 已提交
1973
                s->pc += 4;
B
bellard 已提交
1974 1975 1976
                if (CODE64(s) && !havesib) {
                    disp += s->pc + s->rip_offset;
                }
B
bellard 已提交
1977 1978 1979 1980 1981
            } else {
                disp = 0;
            }
            break;
        case 1:
1982
            disp = (int8_t)cpu_ldub_code(env, s->pc++);
B
bellard 已提交
1983 1984 1985
            break;
        default:
        case 2:
1986
            disp = (int32_t)cpu_ldl_code(env, s->pc);
B
bellard 已提交
1987 1988 1989
            s->pc += 4;
            break;
        }
1990

1991 1992 1993 1994 1995 1996 1997 1998 1999 2000 2001 2002 2003
        /* 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 已提交
2004
            }
2005 2006 2007
            if (base >= 0) {
                tcg_gen_add_tl(cpu_A0, sum, cpu_regs[base]);
                sum = cpu_A0;
B
bellard 已提交
2008
            }
2009 2010
        } else if (base >= 0) {
            sum = cpu_regs[base];
B
bellard 已提交
2011
        }
2012 2013 2014 2015
        if (TCGV_IS_UNUSED(sum)) {
            tcg_gen_movi_tl(cpu_A0, disp);
        } else {
            tcg_gen_addi_tl(cpu_A0, sum, disp);
B
bellard 已提交
2016
        }
2017

B
bellard 已提交
2018 2019
        if (must_add_seg) {
            if (override < 0) {
2020
                if (base == R_EBP || base == R_ESP) {
B
bellard 已提交
2021
                    override = R_SS;
2022
                } else {
B
bellard 已提交
2023
                    override = R_DS;
2024
                }
B
bellard 已提交
2025
            }
2026 2027 2028 2029 2030 2031 2032 2033

            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);
2034
                return;
B
bellard 已提交
2035
            }
2036 2037 2038 2039 2040 2041

            tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_tmp0);
        }

        if (s->aflag != 2) {
            tcg_gen_ext32u_tl(cpu_A0, cpu_A0);
B
bellard 已提交
2042 2043 2044 2045 2046
        }
    } else {
        switch (mod) {
        case 0:
            if (rm == 6) {
2047
                disp = cpu_lduw_code(env, s->pc);
B
bellard 已提交
2048 2049 2050 2051 2052 2053 2054 2055 2056
                s->pc += 2;
                gen_op_movl_A0_im(disp);
                rm = 0; /* avoid SS override */
                goto no_rm;
            } else {
                disp = 0;
            }
            break;
        case 1:
2057
            disp = (int8_t)cpu_ldub_code(env, s->pc++);
B
bellard 已提交
2058 2059 2060
            break;
        default:
        case 2:
2061
            disp = cpu_lduw_code(env, s->pc);
B
bellard 已提交
2062 2063 2064 2065 2066
            s->pc += 2;
            break;
        }
        switch(rm) {
        case 0:
B
bellard 已提交
2067 2068
            gen_op_movl_A0_reg(R_EBX);
            gen_op_addl_A0_reg_sN(0, R_ESI);
B
bellard 已提交
2069 2070
            break;
        case 1:
B
bellard 已提交
2071 2072
            gen_op_movl_A0_reg(R_EBX);
            gen_op_addl_A0_reg_sN(0, R_EDI);
B
bellard 已提交
2073 2074
            break;
        case 2:
B
bellard 已提交
2075 2076
            gen_op_movl_A0_reg(R_EBP);
            gen_op_addl_A0_reg_sN(0, R_ESI);
B
bellard 已提交
2077 2078
            break;
        case 3:
B
bellard 已提交
2079 2080
            gen_op_movl_A0_reg(R_EBP);
            gen_op_addl_A0_reg_sN(0, R_EDI);
B
bellard 已提交
2081 2082
            break;
        case 4:
B
bellard 已提交
2083
            gen_op_movl_A0_reg(R_ESI);
B
bellard 已提交
2084 2085
            break;
        case 5:
B
bellard 已提交
2086
            gen_op_movl_A0_reg(R_EDI);
B
bellard 已提交
2087 2088
            break;
        case 6:
B
bellard 已提交
2089
            gen_op_movl_A0_reg(R_EBP);
B
bellard 已提交
2090 2091 2092
            break;
        default:
        case 7:
B
bellard 已提交
2093
            gen_op_movl_A0_reg(R_EBX);
B
bellard 已提交
2094 2095 2096 2097 2098 2099 2100 2101 2102 2103 2104 2105 2106
            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;
            }
2107
            gen_op_addl_A0_seg(s, override);
B
bellard 已提交
2108 2109 2110 2111
        }
    }
}

2112
static void gen_nop_modrm(CPUX86State *env, DisasContext *s, int modrm)
B
bellard 已提交
2113 2114 2115 2116 2117 2118 2119 2120 2121 2122 2123
{
    int mod, rm, base, code;

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

    if (s->aflag) {

        base = rm;
2124

B
bellard 已提交
2125
        if (base == 4) {
2126
            code = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
2127 2128
            base = (code & 7);
        }
2129

B
bellard 已提交
2130 2131 2132 2133 2134 2135 2136 2137 2138 2139 2140 2141 2142 2143 2144 2145 2146 2147 2148 2149 2150 2151 2152 2153 2154 2155 2156 2157 2158 2159 2160 2161
        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 已提交
2162 2163 2164 2165 2166 2167 2168 2169 2170 2171 2172
/* 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) {
2173 2174
#ifdef TARGET_X86_64
        if (CODE64(s)) {
B
bellard 已提交
2175
            gen_op_addq_A0_seg(override);
2176
        } else
2177 2178
#endif
        {
2179
            gen_op_addl_A0_seg(s, override);
2180
        }
B
bellard 已提交
2181 2182 2183
    }
}

B
balrog 已提交
2184
/* generate modrm memory load or store of 'reg'. TMP0 is used if reg ==
B
bellard 已提交
2185
   OR_TMP0 */
2186 2187
static void gen_ldst_modrm(CPUX86State *env, DisasContext *s, int modrm,
                           int ot, int reg, int is_store)
B
bellard 已提交
2188
{
2189
    int mod, rm;
B
bellard 已提交
2190 2191

    mod = (modrm >> 6) & 3;
B
bellard 已提交
2192
    rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
2193 2194 2195
    if (mod == 3) {
        if (is_store) {
            if (reg != OR_TMP0)
B
bellard 已提交
2196 2197
                gen_op_mov_TN_reg(ot, 0, reg);
            gen_op_mov_reg_T0(ot, rm);
B
bellard 已提交
2198
        } else {
B
bellard 已提交
2199
            gen_op_mov_TN_reg(ot, 0, rm);
B
bellard 已提交
2200
            if (reg != OR_TMP0)
B
bellard 已提交
2201
                gen_op_mov_reg_T0(ot, reg);
B
bellard 已提交
2202 2203
        }
    } else {
2204
        gen_lea_modrm(env, s, modrm);
B
bellard 已提交
2205 2206
        if (is_store) {
            if (reg != OR_TMP0)
B
bellard 已提交
2207
                gen_op_mov_TN_reg(ot, 0, reg);
2208
            gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
2209
        } else {
2210
            gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
2211
            if (reg != OR_TMP0)
B
bellard 已提交
2212
                gen_op_mov_reg_T0(ot, reg);
B
bellard 已提交
2213 2214 2215 2216
        }
    }
}

2217
static inline uint32_t insn_get(CPUX86State *env, DisasContext *s, int ot)
B
bellard 已提交
2218 2219 2220 2221
{
    uint32_t ret;

    switch(ot) {
2222
    case MO_8:
2223
        ret = cpu_ldub_code(env, s->pc);
B
bellard 已提交
2224 2225
        s->pc++;
        break;
2226
    case MO_16:
2227
        ret = cpu_lduw_code(env, s->pc);
B
bellard 已提交
2228 2229 2230
        s->pc += 2;
        break;
    default:
2231
    case MO_32:
2232
        ret = cpu_ldl_code(env, s->pc);
B
bellard 已提交
2233 2234 2235 2236 2237 2238
        s->pc += 4;
        break;
    }
    return ret;
}

B
bellard 已提交
2239 2240
static inline int insn_const_size(unsigned int ot)
{
2241
    if (ot <= MO_32) {
B
bellard 已提交
2242
        return 1 << ot;
2243
    } else {
B
bellard 已提交
2244
        return 4;
2245
    }
B
bellard 已提交
2246 2247
}

2248 2249 2250 2251 2252 2253 2254 2255 2256 2257 2258
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 已提交
2259
        tcg_gen_goto_tb(tb_num);
2260
        gen_jmp_im(eip);
2261
        tcg_gen_exit_tb((uintptr_t)tb + tb_num);
2262 2263 2264 2265 2266 2267 2268
    } else {
        /* jump to another page: currently not optimized */
        gen_jmp_im(eip);
        gen_eob(s);
    }
}

2269
static inline void gen_jcc(DisasContext *s, int b,
B
bellard 已提交
2270
                           target_ulong val, target_ulong next_eip)
B
bellard 已提交
2271
{
2272
    int l1, l2;
2273

B
bellard 已提交
2274
    if (s->jmp_opt) {
B
bellard 已提交
2275
        l1 = gen_new_label();
2276
        gen_jcc1(s, b, l1);
2277

2278
        gen_goto_tb(s, 0, next_eip);
B
bellard 已提交
2279 2280

        gen_set_label(l1);
2281
        gen_goto_tb(s, 1, val);
J
Jun Koi 已提交
2282
        s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2283
    } else {
B
bellard 已提交
2284 2285
        l1 = gen_new_label();
        l2 = gen_new_label();
2286
        gen_jcc1(s, b, l1);
2287

B
bellard 已提交
2288
        gen_jmp_im(next_eip);
2289 2290
        tcg_gen_br(l2);

B
bellard 已提交
2291 2292 2293
        gen_set_label(l1);
        gen_jmp_im(val);
        gen_set_label(l2);
B
bellard 已提交
2294 2295 2296 2297
        gen_eob(s);
    }
}

2298 2299 2300
static void gen_cmovcc1(CPUX86State *env, DisasContext *s, int ot, int b,
                        int modrm, int reg)
{
2301
    CCPrepare cc;
2302

2303
    gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
2304

2305 2306 2307 2308 2309 2310 2311 2312
    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);
2313 2314
    }

2315 2316 2317 2318 2319 2320 2321 2322 2323 2324
    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);
    }
2325 2326
}

2327 2328 2329 2330 2331 2332 2333 2334 2335 2336 2337 2338 2339 2340 2341 2342
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 已提交
2343 2344
/* move T0 to seg_reg and compute if the CPU state may change. Never
   call this function with seg_reg == R_CS */
B
bellard 已提交
2345
static void gen_movl_seg_T0(DisasContext *s, int seg_reg, target_ulong cur_eip)
B
bellard 已提交
2346
{
2347 2348
    if (s->pe && !s->vm86) {
        /* XXX: optimize by finding processor state dynamically */
2349
        gen_update_cc_op(s);
B
bellard 已提交
2350
        gen_jmp_im(cur_eip);
2351
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
2352
        gen_helper_load_seg(cpu_env, tcg_const_i32(seg_reg), cpu_tmp2_i32);
B
bellard 已提交
2353 2354 2355 2356 2357
        /* 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 已提交
2358
            s->is_jmp = DISAS_TB_JUMP;
2359
    } else {
2360
        gen_op_movl_seg_T0_vm(seg_reg);
B
bellard 已提交
2361
        if (seg_reg == R_SS)
J
Jun Koi 已提交
2362
            s->is_jmp = DISAS_TB_JUMP;
2363
    }
B
bellard 已提交
2364 2365
}

T
ths 已提交
2366 2367 2368 2369 2370
static inline int svm_is_rep(int prefixes)
{
    return ((prefixes & (PREFIX_REPZ | PREFIX_REPNZ)) ? 8 : 0);
}

B
bellard 已提交
2371
static inline void
T
ths 已提交
2372
gen_svm_check_intercept_param(DisasContext *s, target_ulong pc_start,
2373
                              uint32_t type, uint64_t param)
T
ths 已提交
2374
{
B
bellard 已提交
2375 2376 2377
    /* no SVM activated; fast case */
    if (likely(!(s->flags & HF_SVMI_MASK)))
        return;
2378
    gen_update_cc_op(s);
B
bellard 已提交
2379
    gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
2380
    gen_helper_svm_check_intercept_param(cpu_env, tcg_const_i32(type),
P
pbrook 已提交
2381
                                         tcg_const_i64(param));
T
ths 已提交
2382 2383
}

B
bellard 已提交
2384
static inline void
T
ths 已提交
2385 2386
gen_svm_check_intercept(DisasContext *s, target_ulong pc_start, uint64_t type)
{
B
bellard 已提交
2387
    gen_svm_check_intercept_param(s, pc_start, type, 0);
T
ths 已提交
2388 2389
}

2390 2391
static inline void gen_stack_update(DisasContext *s, int addend)
{
B
bellard 已提交
2392 2393
#ifdef TARGET_X86_64
    if (CODE64(s)) {
2394
        gen_op_add_reg_im(2, R_ESP, addend);
B
bellard 已提交
2395 2396
    } else
#endif
2397
    if (s->ss32) {
2398
        gen_op_add_reg_im(1, R_ESP, addend);
2399
    } else {
2400
        gen_op_add_reg_im(0, R_ESP, addend);
2401 2402 2403
    }
}

B
bellard 已提交
2404 2405 2406
/* generate a push. It depends on ss32, addseg and dflag */
static void gen_push_T0(DisasContext *s)
{
B
bellard 已提交
2407 2408
#ifdef TARGET_X86_64
    if (CODE64(s)) {
B
bellard 已提交
2409
        gen_op_movq_A0_reg(R_ESP);
2410
        if (s->dflag) {
B
bellard 已提交
2411
            gen_op_addq_A0_im(-8);
2412
            gen_op_st_v(s, MO_64, cpu_T[0], cpu_A0);
2413
        } else {
B
bellard 已提交
2414
            gen_op_addq_A0_im(-2);
2415
            gen_op_st_v(s, MO_16, cpu_T[0], cpu_A0);
2416
        }
B
bellard 已提交
2417
        gen_op_mov_reg_A0(2, R_ESP);
2418
    } else
B
bellard 已提交
2419 2420
#endif
    {
B
bellard 已提交
2421
        gen_op_movl_A0_reg(R_ESP);
B
bellard 已提交
2422
        if (!s->dflag)
B
bellard 已提交
2423
            gen_op_addl_A0_im(-2);
B
bellard 已提交
2424
        else
B
bellard 已提交
2425
            gen_op_addl_A0_im(-4);
B
bellard 已提交
2426 2427
        if (s->ss32) {
            if (s->addseg) {
2428
                tcg_gen_mov_tl(cpu_T[1], cpu_A0);
2429
                gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2430 2431 2432
            }
        } else {
            gen_op_andl_A0_ffff();
2433
            tcg_gen_mov_tl(cpu_T[1], cpu_A0);
2434
            gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2435
        }
2436
        gen_op_st_v(s, s->dflag + 1, cpu_T[0], cpu_A0);
B
bellard 已提交
2437
        if (s->ss32 && !s->addseg)
B
bellard 已提交
2438
            gen_op_mov_reg_A0(1, R_ESP);
B
bellard 已提交
2439
        else
B
bellard 已提交
2440
            gen_op_mov_reg_T1(s->ss32 + 1, R_ESP);
B
bellard 已提交
2441 2442 2443
    }
}

2444 2445 2446
/* 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 已提交
2447
{
B
bellard 已提交
2448 2449
#ifdef TARGET_X86_64
    if (CODE64(s)) {
B
bellard 已提交
2450
        gen_op_movq_A0_reg(R_ESP);
2451
        if (s->dflag) {
B
bellard 已提交
2452
            gen_op_addq_A0_im(-8);
2453
            gen_op_st_v(s, MO_64, cpu_T[1], cpu_A0);
2454
        } else {
B
bellard 已提交
2455
            gen_op_addq_A0_im(-2);
2456
            gen_op_st_v(s, MO_16, cpu_T[1], cpu_A0);
2457
        }
B
bellard 已提交
2458
        gen_op_mov_reg_A0(2, R_ESP);
2459
    } else
B
bellard 已提交
2460 2461
#endif
    {
B
bellard 已提交
2462
        gen_op_movl_A0_reg(R_ESP);
B
bellard 已提交
2463
        if (!s->dflag)
B
bellard 已提交
2464
            gen_op_addl_A0_im(-2);
B
bellard 已提交
2465
        else
B
bellard 已提交
2466
            gen_op_addl_A0_im(-4);
B
bellard 已提交
2467 2468
        if (s->ss32) {
            if (s->addseg) {
2469
                gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2470 2471 2472
            }
        } else {
            gen_op_andl_A0_ffff();
2473
            gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2474
        }
2475
        gen_op_st_v(s, s->dflag + 1, cpu_T[1], cpu_A0);
2476

B
bellard 已提交
2477
        if (s->ss32 && !s->addseg)
B
bellard 已提交
2478
            gen_op_mov_reg_A0(1, R_ESP);
B
bellard 已提交
2479 2480
        else
            gen_stack_update(s, (-2) << s->dflag);
B
bellard 已提交
2481 2482 2483
    }
}

2484 2485
/* two step pop is necessary for precise exceptions */
static void gen_pop_T0(DisasContext *s)
B
bellard 已提交
2486
{
B
bellard 已提交
2487 2488
#ifdef TARGET_X86_64
    if (CODE64(s)) {
B
bellard 已提交
2489
        gen_op_movq_A0_reg(R_ESP);
2490
        gen_op_ld_v(s, s->dflag ? MO_64 : MO_16, cpu_T[0], cpu_A0);
2491
    } else
B
bellard 已提交
2492 2493
#endif
    {
B
bellard 已提交
2494
        gen_op_movl_A0_reg(R_ESP);
B
bellard 已提交
2495 2496
        if (s->ss32) {
            if (s->addseg)
2497
                gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2498 2499
        } else {
            gen_op_andl_A0_ffff();
2500
            gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2501
        }
2502
        gen_op_ld_v(s, s->dflag + 1, cpu_T[0], cpu_A0);
B
bellard 已提交
2503 2504 2505 2506 2507
    }
}

static void gen_pop_update(DisasContext *s)
{
B
bellard 已提交
2508
#ifdef TARGET_X86_64
2509
    if (CODE64(s) && s->dflag) {
B
bellard 已提交
2510 2511 2512 2513 2514 2515
        gen_stack_update(s, 8);
    } else
#endif
    {
        gen_stack_update(s, 2 << s->dflag);
    }
B
bellard 已提交
2516 2517 2518 2519
}

static void gen_stack_A0(DisasContext *s)
{
B
bellard 已提交
2520
    gen_op_movl_A0_reg(R_ESP);
B
bellard 已提交
2521 2522
    if (!s->ss32)
        gen_op_andl_A0_ffff();
2523
    tcg_gen_mov_tl(cpu_T[1], cpu_A0);
B
bellard 已提交
2524
    if (s->addseg)
2525
        gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2526 2527 2528 2529 2530 2531
}

/* NOTE: wrap around in 16 bit not fully handled */
static void gen_pusha(DisasContext *s)
{
    int i;
B
bellard 已提交
2532
    gen_op_movl_A0_reg(R_ESP);
B
bellard 已提交
2533 2534 2535
    gen_op_addl_A0_im(-16 <<  s->dflag);
    if (!s->ss32)
        gen_op_andl_A0_ffff();
2536
    tcg_gen_mov_tl(cpu_T[1], cpu_A0);
B
bellard 已提交
2537
    if (s->addseg)
2538
        gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2539
    for(i = 0;i < 8; i++) {
2540
        gen_op_mov_TN_reg(MO_32, 0, 7 - i);
2541
        gen_op_st_v(s, MO_16 + s->dflag, cpu_T[0], cpu_A0);
B
bellard 已提交
2542 2543
        gen_op_addl_A0_im(2 <<  s->dflag);
    }
2544
    gen_op_mov_reg_T1(MO_16 + s->ss32, R_ESP);
B
bellard 已提交
2545 2546 2547 2548 2549 2550
}

/* NOTE: wrap around in 16 bit not fully handled */
static void gen_popa(DisasContext *s)
{
    int i;
B
bellard 已提交
2551
    gen_op_movl_A0_reg(R_ESP);
B
bellard 已提交
2552 2553
    if (!s->ss32)
        gen_op_andl_A0_ffff();
2554 2555
    tcg_gen_mov_tl(cpu_T[1], cpu_A0);
    tcg_gen_addi_tl(cpu_T[1], cpu_T[1], 16 <<  s->dflag);
B
bellard 已提交
2556
    if (s->addseg)
2557
        gen_op_addl_A0_seg(s, R_SS);
B
bellard 已提交
2558 2559 2560
    for(i = 0;i < 8; i++) {
        /* ESP is not reloaded */
        if (i != 3) {
2561
            gen_op_ld_v(s, MO_16 + s->dflag, cpu_T[0], cpu_A0);
2562
            gen_op_mov_reg_T0(MO_16 + s->dflag, 7 - i);
B
bellard 已提交
2563 2564 2565
        }
        gen_op_addl_A0_im(2 <<  s->dflag);
    }
2566
    gen_op_mov_reg_T1(MO_16 + s->ss32, R_ESP);
B
bellard 已提交
2567 2568 2569 2570
}

static void gen_enter(DisasContext *s, int esp_addend, int level)
{
B
bellard 已提交
2571
    int ot, opsize;
B
bellard 已提交
2572 2573

    level &= 0x1f;
2574 2575
#ifdef TARGET_X86_64
    if (CODE64(s)) {
2576
        ot = s->dflag ? MO_64 : MO_16;
2577
        opsize = 1 << ot;
2578

B
bellard 已提交
2579
        gen_op_movl_A0_reg(R_ESP);
2580
        gen_op_addq_A0_im(-opsize);
2581
        tcg_gen_mov_tl(cpu_T[1], cpu_A0);
2582 2583

        /* push bp */
2584
        gen_op_mov_TN_reg(MO_32, 0, R_EBP);
2585
        gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
2586
        if (level) {
B
bellard 已提交
2587
            /* XXX: must save state */
2588
            gen_helper_enter64_level(cpu_env, tcg_const_i32(level),
2589
                                     tcg_const_i32((ot == MO_64)),
P
pbrook 已提交
2590
                                     cpu_T[1]);
2591
        }
B
bellard 已提交
2592
        gen_op_mov_reg_T1(ot, R_EBP);
2593
        tcg_gen_addi_tl(cpu_T[1], cpu_T[1], -esp_addend + (-opsize * level));
2594
        gen_op_mov_reg_T1(MO_64, R_ESP);
2595
    } else
2596 2597
#endif
    {
2598
        ot = s->dflag + MO_16;
2599
        opsize = 2 << s->dflag;
2600

B
bellard 已提交
2601
        gen_op_movl_A0_reg(R_ESP);
2602 2603 2604
        gen_op_addl_A0_im(-opsize);
        if (!s->ss32)
            gen_op_andl_A0_ffff();
2605
        tcg_gen_mov_tl(cpu_T[1], cpu_A0);
2606
        if (s->addseg)
2607
            gen_op_addl_A0_seg(s, R_SS);
2608
        /* push bp */
2609
        gen_op_mov_TN_reg(MO_32, 0, R_EBP);
2610
        gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
2611
        if (level) {
B
bellard 已提交
2612
            /* XXX: must save state */
2613
            gen_helper_enter_level(cpu_env, tcg_const_i32(level),
P
pbrook 已提交
2614 2615
                                   tcg_const_i32(s->dflag),
                                   cpu_T[1]);
2616
        }
B
bellard 已提交
2617
        gen_op_mov_reg_T1(ot, R_EBP);
2618
        tcg_gen_addi_tl(cpu_T[1], cpu_T[1], -esp_addend + (-opsize * level));
2619
        gen_op_mov_reg_T1(MO_16 + s->ss32, R_ESP);
B
bellard 已提交
2620 2621 2622
    }
}

B
bellard 已提交
2623
static void gen_exception(DisasContext *s, int trapno, target_ulong cur_eip)
B
bellard 已提交
2624
{
2625
    gen_update_cc_op(s);
B
bellard 已提交
2626
    gen_jmp_im(cur_eip);
B
Blue Swirl 已提交
2627
    gen_helper_raise_exception(cpu_env, tcg_const_i32(trapno));
J
Jun Koi 已提交
2628
    s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2629 2630 2631
}

/* an interrupt is different from an exception because of the
B
blueswir1 已提交
2632
   privilege checks */
2633
static void gen_interrupt(DisasContext *s, int intno,
B
bellard 已提交
2634
                          target_ulong cur_eip, target_ulong next_eip)
B
bellard 已提交
2635
{
2636
    gen_update_cc_op(s);
B
bellard 已提交
2637
    gen_jmp_im(cur_eip);
B
Blue Swirl 已提交
2638
    gen_helper_raise_interrupt(cpu_env, tcg_const_i32(intno),
P
pbrook 已提交
2639
                               tcg_const_i32(next_eip - cur_eip));
J
Jun Koi 已提交
2640
    s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2641 2642
}

B
bellard 已提交
2643
static void gen_debug(DisasContext *s, target_ulong cur_eip)
B
bellard 已提交
2644
{
2645
    gen_update_cc_op(s);
B
bellard 已提交
2646
    gen_jmp_im(cur_eip);
B
Blue Swirl 已提交
2647
    gen_helper_debug(cpu_env);
J
Jun Koi 已提交
2648
    s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2649 2650 2651 2652 2653 2654
}

/* generate a generic end of block. Trace exception is also generated
   if needed */
static void gen_eob(DisasContext *s)
{
2655
    gen_update_cc_op(s);
2656
    if (s->tb->flags & HF_INHIBIT_IRQ_MASK) {
2657
        gen_helper_reset_inhibit_irq(cpu_env);
2658
    }
J
Jan Kiszka 已提交
2659
    if (s->tb->flags & HF_RF_MASK) {
2660
        gen_helper_reset_rf(cpu_env);
J
Jan Kiszka 已提交
2661
    }
2662
    if (s->singlestep_enabled) {
B
Blue Swirl 已提交
2663
        gen_helper_debug(cpu_env);
2664
    } else if (s->tf) {
B
Blue Swirl 已提交
2665
        gen_helper_single_step(cpu_env);
B
bellard 已提交
2666
    } else {
B
bellard 已提交
2667
        tcg_gen_exit_tb(0);
B
bellard 已提交
2668
    }
J
Jun Koi 已提交
2669
    s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2670 2671 2672 2673
}

/* generate a jump to eip. No segment change must happen before as a
   direct call to the next block may occur */
B
bellard 已提交
2674
static void gen_jmp_tb(DisasContext *s, target_ulong eip, int tb_num)
B
bellard 已提交
2675
{
2676 2677
    gen_update_cc_op(s);
    set_cc_op(s, CC_OP_DYNAMIC);
B
bellard 已提交
2678
    if (s->jmp_opt) {
2679
        gen_goto_tb(s, tb_num, eip);
J
Jun Koi 已提交
2680
        s->is_jmp = DISAS_TB_JUMP;
B
bellard 已提交
2681
    } else {
B
bellard 已提交
2682
        gen_jmp_im(eip);
B
bellard 已提交
2683 2684 2685 2686
        gen_eob(s);
    }
}

B
bellard 已提交
2687 2688 2689 2690 2691
static void gen_jmp(DisasContext *s, target_ulong eip)
{
    gen_jmp_tb(s, eip, 0);
}

2692
static inline void gen_ldq_env_A0(DisasContext *s, int offset)
B
bellard 已提交
2693
{
2694
    tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0, s->mem_index, MO_LEQ);
2695
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, offset);
B
bellard 已提交
2696
}
B
bellard 已提交
2697

2698
static inline void gen_stq_env_A0(DisasContext *s, int offset)
B
bellard 已提交
2699
{
2700
    tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env, offset);
2701
    tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0, s->mem_index, MO_LEQ);
B
bellard 已提交
2702
}
B
bellard 已提交
2703

2704
static inline void gen_ldo_env_A0(DisasContext *s, int offset)
B
bellard 已提交
2705
{
2706
    int mem_index = s->mem_index;
2707
    tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0, mem_index, MO_LEQ);
2708
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, offset + offsetof(XMMReg, XMM_Q(0)));
B
bellard 已提交
2709
    tcg_gen_addi_tl(cpu_tmp0, cpu_A0, 8);
2710
    tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_tmp0, mem_index, MO_LEQ);
2711
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, offset + offsetof(XMMReg, XMM_Q(1)));
B
bellard 已提交
2712
}
B
bellard 已提交
2713

2714
static inline void gen_sto_env_A0(DisasContext *s, int offset)
B
bellard 已提交
2715
{
2716
    int mem_index = s->mem_index;
2717
    tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env, offset + offsetof(XMMReg, XMM_Q(0)));
2718
    tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0, mem_index, MO_LEQ);
B
bellard 已提交
2719
    tcg_gen_addi_tl(cpu_tmp0, cpu_A0, 8);
2720
    tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env, offset + offsetof(XMMReg, XMM_Q(1)));
2721
    tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_tmp0, mem_index, MO_LEQ);
B
bellard 已提交
2722
}
B
bellard 已提交
2723

B
bellard 已提交
2724 2725
static inline void gen_op_movo(int d_offset, int s_offset)
{
2726 2727 2728 2729
    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 已提交
2730 2731 2732 2733
}

static inline void gen_op_movq(int d_offset, int s_offset)
{
2734 2735
    tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env, s_offset);
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, d_offset);
B
bellard 已提交
2736 2737 2738 2739
}

static inline void gen_op_movl(int d_offset, int s_offset)
{
2740 2741
    tcg_gen_ld_i32(cpu_tmp2_i32, cpu_env, s_offset);
    tcg_gen_st_i32(cpu_tmp2_i32, cpu_env, d_offset);
B
bellard 已提交
2742 2743 2744 2745
}

static inline void gen_op_movq_env_0(int d_offset)
{
2746 2747
    tcg_gen_movi_i64(cpu_tmp1_i64, 0);
    tcg_gen_st_i64(cpu_tmp1_i64, cpu_env, d_offset);
B
bellard 已提交
2748
}
B
bellard 已提交
2749

B
Blue Swirl 已提交
2750 2751 2752 2753 2754 2755 2756
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 已提交
2757
typedef void (*SSEFunc_0_ppi)(TCGv_ptr reg_a, TCGv_ptr reg_b, TCGv_i32 val);
B
Blue Swirl 已提交
2758 2759
typedef void (*SSEFunc_0_eppt)(TCGv_ptr env, TCGv_ptr reg_a, TCGv_ptr reg_b,
                               TCGv val);
B
Blue Swirl 已提交
2760

B
bellard 已提交
2761 2762
#define SSE_SPECIAL ((void *)1)
#define SSE_DUMMY ((void *)2)
B
bellard 已提交
2763

P
pbrook 已提交
2764 2765 2766
#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 已提交
2767

B
Blue Swirl 已提交
2768
static const SSEFunc_0_epp sse_op_table1[256][4] = {
A
aurel32 已提交
2769 2770 2771
    /* 3DNow! extensions */
    [0x0e] = { SSE_DUMMY }, /* femms */
    [0x0f] = { SSE_DUMMY }, /* pf... */
B
bellard 已提交
2772 2773 2774
    /* 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 已提交
2775
    [0x12] = { SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL }, /* movlps, movlpd, movsldup, movddup */
B
bellard 已提交
2776
    [0x13] = { SSE_SPECIAL, SSE_SPECIAL },  /* movlps, movlpd */
P
pbrook 已提交
2777 2778
    [0x14] = { gen_helper_punpckldq_xmm, gen_helper_punpcklqdq_xmm },
    [0x15] = { gen_helper_punpckhdq_xmm, gen_helper_punpckhqdq_xmm },
B
bellard 已提交
2779 2780 2781 2782 2783 2784
    [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 */
2785
    [0x2b] = { SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL }, /* movntps, movntpd, movntss, movntsd */
B
bellard 已提交
2786 2787
    [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 已提交
2788 2789
    [0x2e] = { gen_helper_ucomiss, gen_helper_ucomisd },
    [0x2f] = { gen_helper_comiss, gen_helper_comisd },
B
bellard 已提交
2790 2791
    [0x50] = { SSE_SPECIAL, SSE_SPECIAL }, /* movmskps, movmskpd */
    [0x51] = SSE_FOP(sqrt),
P
pbrook 已提交
2792 2793 2794 2795 2796 2797
    [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 已提交
2798 2799
    [0x58] = SSE_FOP(add),
    [0x59] = SSE_FOP(mul),
P
pbrook 已提交
2800 2801 2802
    [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 已提交
2803 2804 2805 2806 2807 2808
    [0x5c] = SSE_FOP(sub),
    [0x5d] = SSE_FOP(min),
    [0x5e] = SSE_FOP(div),
    [0x5f] = SSE_FOP(max),

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

R
Richard Henderson 已提交
2812 2813 2814
    /* 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 已提交
2815

B
bellard 已提交
2816 2817 2818 2819 2820 2821 2822 2823 2824 2825 2826 2827 2828
    /* 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 已提交
2829 2830
    [0x6c] = { NULL, gen_helper_punpcklqdq_xmm },
    [0x6d] = { NULL, gen_helper_punpckhqdq_xmm },
B
bellard 已提交
2831 2832
    [0x6e] = { SSE_SPECIAL, SSE_SPECIAL }, /* movd mm, ea */
    [0x6f] = { SSE_SPECIAL, SSE_SPECIAL, SSE_SPECIAL }, /* movq, movdqa, , movqdu */
B
Blue Swirl 已提交
2833 2834 2835 2836
    [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 已提交
2837 2838 2839 2840 2841 2842
    [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 已提交
2843
    [0x77] = { SSE_DUMMY }, /* emms */
2844 2845
    [0x78] = { NULL, SSE_SPECIAL, NULL, SSE_SPECIAL }, /* extrq_i, insertq_i */
    [0x79] = { NULL, gen_helper_extrq_r, NULL, gen_helper_insertq_r },
P
pbrook 已提交
2846 2847
    [0x7c] = { NULL, gen_helper_haddpd, NULL, gen_helper_haddps },
    [0x7d] = { NULL, gen_helper_hsubpd, NULL, gen_helper_hsubps },
B
bellard 已提交
2848 2849 2850 2851
    [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 已提交
2852
    [0xd0] = { NULL, gen_helper_addsubpd, NULL, gen_helper_addsubps },
B
bellard 已提交
2853 2854 2855 2856 2857 2858 2859 2860 2861 2862 2863 2864 2865 2866 2867 2868 2869 2870 2871 2872 2873
    [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 已提交
2874
    [0xe6] = { NULL, gen_helper_cvttpd2dq, gen_helper_cvtdq2pd, gen_helper_cvtpd2dq },
B
bellard 已提交
2875 2876 2877 2878 2879 2880 2881 2882 2883
    [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 已提交
2884
    [0xf0] = { NULL, NULL, NULL, SSE_SPECIAL }, /* lddqu */
B
bellard 已提交
2885 2886 2887 2888 2889 2890
    [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 已提交
2891 2892
    [0xf7] = { (SSEFunc_0_epp)gen_helper_maskmov_mmx,
               (SSEFunc_0_epp)gen_helper_maskmov_xmm }, /* XXX: casts */
B
bellard 已提交
2893 2894 2895 2896 2897 2898 2899 2900 2901
    [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 已提交
2902
static const SSEFunc_0_epp sse_op_table2[3 * 8][2] = {
B
bellard 已提交
2903 2904 2905 2906 2907 2908 2909
    [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 已提交
2910
    [16 + 3] = { NULL, gen_helper_psrldq_xmm },
B
bellard 已提交
2911
    [16 + 6] = MMX_OP2(psllq),
P
pbrook 已提交
2912
    [16 + 7] = { NULL, gen_helper_pslldq_xmm },
B
bellard 已提交
2913 2914
};

B
Blue Swirl 已提交
2915
static const SSEFunc_0_epi sse_op_table3ai[] = {
P
pbrook 已提交
2916
    gen_helper_cvtsi2ss,
2917
    gen_helper_cvtsi2sd
B
Blue Swirl 已提交
2918
};
P
pbrook 已提交
2919

2920
#ifdef TARGET_X86_64
B
Blue Swirl 已提交
2921
static const SSEFunc_0_epl sse_op_table3aq[] = {
2922 2923 2924 2925 2926
    gen_helper_cvtsq2ss,
    gen_helper_cvtsq2sd
};
#endif

B
Blue Swirl 已提交
2927
static const SSEFunc_i_ep sse_op_table3bi[] = {
P
pbrook 已提交
2928 2929
    gen_helper_cvttss2si,
    gen_helper_cvtss2si,
2930
    gen_helper_cvttsd2si,
2931
    gen_helper_cvtsd2si
B
bellard 已提交
2932
};
2933

2934
#ifdef TARGET_X86_64
B
Blue Swirl 已提交
2935
static const SSEFunc_l_ep sse_op_table3bq[] = {
2936 2937
    gen_helper_cvttss2sq,
    gen_helper_cvtss2sq,
2938
    gen_helper_cvttsd2sq,
2939 2940 2941 2942
    gen_helper_cvtsd2sq
};
#endif

B
Blue Swirl 已提交
2943
static const SSEFunc_0_epp sse_op_table4[8][4] = {
B
bellard 已提交
2944 2945 2946 2947 2948 2949 2950 2951 2952
    SSE_FOP(cmpeq),
    SSE_FOP(cmplt),
    SSE_FOP(cmple),
    SSE_FOP(cmpunord),
    SSE_FOP(cmpneq),
    SSE_FOP(cmpnlt),
    SSE_FOP(cmpnle),
    SSE_FOP(cmpord),
};
2953

B
Blue Swirl 已提交
2954
static const SSEFunc_0_epp sse_op_table5[256] = {
P
pbrook 已提交
2955 2956 2957 2958 2959 2960 2961 2962 2963 2964 2965 2966 2967 2968 2969 2970 2971 2972 2973 2974 2975 2976 2977 2978
    [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 已提交
2979 2980
};

B
Blue Swirl 已提交
2981 2982
struct SSEOpHelper_epp {
    SSEFunc_0_epp op[2];
B
Blue Swirl 已提交
2983 2984 2985
    uint32_t ext_mask;
};

B
Blue Swirl 已提交
2986 2987
struct SSEOpHelper_eppi {
    SSEFunc_0_eppi op[2];
B
Blue Swirl 已提交
2988
    uint32_t ext_mask;
B
balrog 已提交
2989
};
B
Blue Swirl 已提交
2990

B
balrog 已提交
2991
#define SSSE3_OP(x) { MMX_OP2(x), CPUID_EXT_SSSE3 }
P
pbrook 已提交
2992 2993
#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 已提交
2994
#define SSE41_SPECIAL { { NULL, SSE_SPECIAL }, CPUID_EXT_SSE41 }
2995 2996
#define PCLMULQDQ_OP(x) { { NULL, gen_helper_ ## x ## _xmm }, \
        CPUID_EXT_PCLMULQDQ }
2997
#define AESNI_OP(x) { { NULL, gen_helper_ ## x ## _xmm }, CPUID_EXT_AES }
B
Blue Swirl 已提交
2998

B
Blue Swirl 已提交
2999
static const struct SSEOpHelper_epp sse_op_table6[256] = {
B
balrog 已提交
3000 3001 3002 3003 3004 3005 3006 3007 3008 3009 3010 3011 3012 3013 3014 3015 3016 3017 3018 3019 3020 3021 3022 3023 3024 3025 3026 3027 3028 3029 3030 3031 3032 3033 3034 3035 3036 3037 3038 3039 3040 3041 3042 3043 3044 3045
    [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),
3046 3047 3048 3049 3050
    [0xdb] = AESNI_OP(aesimc),
    [0xdc] = AESNI_OP(aesenc),
    [0xdd] = AESNI_OP(aesenclast),
    [0xde] = AESNI_OP(aesdec),
    [0xdf] = AESNI_OP(aesdeclast),
B
balrog 已提交
3051 3052
};

B
Blue Swirl 已提交
3053
static const struct SSEOpHelper_eppi sse_op_table7[256] = {
B
balrog 已提交
3054 3055 3056 3057 3058 3059 3060 3061 3062 3063 3064 3065 3066 3067 3068 3069 3070 3071
    [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),
3072
    [0x44] = PCLMULQDQ_OP(pclmulqdq),
B
balrog 已提交
3073 3074 3075 3076
    [0x60] = SSE42_OP(pcmpestrm),
    [0x61] = SSE42_OP(pcmpestri),
    [0x62] = SSE42_OP(pcmpistrm),
    [0x63] = SSE42_OP(pcmpistri),
3077
    [0xdf] = AESNI_OP(aeskeygenassist),
B
balrog 已提交
3078 3079
};

3080 3081
static void gen_sse(CPUX86State *env, DisasContext *s, int b,
                    target_ulong pc_start, int rex_r)
B
bellard 已提交
3082 3083
{
    int b1, op1_offset, op2_offset, is_xmm, val, ot;
3084
    int modrm, mod, rm, reg;
B
Blue Swirl 已提交
3085 3086
    SSEFunc_0_epp sse_fn_epp;
    SSEFunc_0_eppi sse_fn_eppi;
B
Blue Swirl 已提交
3087
    SSEFunc_0_ppi sse_fn_ppi;
B
Blue Swirl 已提交
3088
    SSEFunc_0_eppt sse_fn_eppt;
B
bellard 已提交
3089 3090

    b &= 0xff;
3091
    if (s->prefix & PREFIX_DATA)
B
bellard 已提交
3092
        b1 = 1;
3093
    else if (s->prefix & PREFIX_REPZ)
B
bellard 已提交
3094
        b1 = 2;
3095
    else if (s->prefix & PREFIX_REPNZ)
B
bellard 已提交
3096 3097 3098
        b1 = 3;
    else
        b1 = 0;
B
Blue Swirl 已提交
3099 3100
    sse_fn_epp = sse_op_table1[b][b1];
    if (!sse_fn_epp) {
B
bellard 已提交
3101
        goto illegal_op;
B
Blue Swirl 已提交
3102
    }
A
aurel32 已提交
3103
    if ((b <= 0x5f && b >= 0x10) || b == 0xc6 || b == 0xc2) {
B
bellard 已提交
3104 3105 3106 3107 3108 3109 3110 3111 3112 3113 3114 3115 3116 3117 3118 3119 3120 3121 3122 3123
        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 已提交
3124 3125
        if ((b != 0x38 && b != 0x3a) || (s->prefix & PREFIX_DATA))
            goto illegal_op;
3126 3127 3128 3129
    if (b == 0x0e) {
        if (!(s->cpuid_ext2_features & CPUID_EXT2_3DNOW))
            goto illegal_op;
        /* femms */
B
Blue Swirl 已提交
3130
        gen_helper_emms(cpu_env);
3131 3132 3133 3134
        return;
    }
    if (b == 0x77) {
        /* emms */
B
Blue Swirl 已提交
3135
        gen_helper_emms(cpu_env);
B
bellard 已提交
3136 3137 3138 3139 3140
        return;
    }
    /* prepare MMX state (XXX: optimize by storing fptt and fptags in
       the static cpu state) */
    if (!is_xmm) {
B
Blue Swirl 已提交
3141
        gen_helper_enter_mmx(cpu_env);
B
bellard 已提交
3142 3143
    }

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

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

B
balrog 已提交
3711
        case 0x138:
3712
        case 0x038:
B
balrog 已提交
3713
            b = modrm;
R
Richard Henderson 已提交
3714 3715 3716
            if ((b & 0xf0) == 0xf0) {
                goto do_0f_38_fx;
            }
3717
            modrm = cpu_ldub_code(env, s->pc++);
B
balrog 已提交
3718 3719 3720
            rm = modrm & 7;
            reg = ((modrm >> 3) & 7) | rex_r;
            mod = (modrm >> 6) & 3;
3721 3722 3723
            if (b1 >= 2) {
                goto illegal_op;
            }
B
balrog 已提交
3724

B
Blue Swirl 已提交
3725 3726
            sse_fn_epp = sse_op_table6[b].op[b1];
            if (!sse_fn_epp) {
B
balrog 已提交
3727
                goto illegal_op;
B
Blue Swirl 已提交
3728
            }
B
balrog 已提交
3729 3730
            if (!(s->cpuid_ext_features & sse_op_table6[b].ext_mask))
                goto illegal_op;
B
balrog 已提交
3731 3732 3733 3734 3735 3736 3737

            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);
3738
                    gen_lea_modrm(env, s, modrm);
B
balrog 已提交
3739 3740 3741 3742
                    switch (b) {
                    case 0x20: case 0x30: /* pmovsxbw, pmovzxbw */
                    case 0x23: case 0x33: /* pmovsxwd, pmovzxwd */
                    case 0x25: case 0x35: /* pmovsxdq, pmovzxdq */
3743
                        gen_ldq_env_A0(s, op2_offset +
B
balrog 已提交
3744 3745 3746 3747
                                        offsetof(XMMReg, XMM_Q(0)));
                        break;
                    case 0x21: case 0x31: /* pmovsxbd, pmovzxbd */
                    case 0x24: case 0x34: /* pmovsxwq, pmovzxwq */
3748 3749
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
B
balrog 已提交
3750 3751 3752 3753
                        tcg_gen_st_i32(cpu_tmp2_i32, cpu_env, op2_offset +
                                        offsetof(XMMReg, XMM_L(0)));
                        break;
                    case 0x22: case 0x32: /* pmovsxbq, pmovzxbq */
3754 3755
                        tcg_gen_qemu_ld_tl(cpu_tmp0, cpu_A0,
                                           s->mem_index, MO_LEUW);
B
balrog 已提交
3756 3757 3758 3759
                        tcg_gen_st16_tl(cpu_tmp0, cpu_env, op2_offset +
                                        offsetof(XMMReg, XMM_W(0)));
                        break;
                    case 0x2a:            /* movntqda */
3760
                        gen_ldo_env_A0(s, op1_offset);
B
balrog 已提交
3761 3762
                        return;
                    default:
3763
                        gen_ldo_env_A0(s, op2_offset);
B
balrog 已提交
3764
                    }
B
balrog 已提交
3765 3766 3767 3768 3769 3770 3771
                }
            } 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);
3772
                    gen_lea_modrm(env, s, modrm);
3773
                    gen_ldq_env_A0(s, op2_offset);
B
balrog 已提交
3774 3775
                }
            }
B
Blue Swirl 已提交
3776
            if (sse_fn_epp == SSE_SPECIAL) {
B
balrog 已提交
3777
                goto illegal_op;
B
Blue Swirl 已提交
3778
            }
B
balrog 已提交
3779

B
balrog 已提交
3780 3781
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
3782
            sse_fn_epp(cpu_env, cpu_ptr0, cpu_ptr1);
B
balrog 已提交
3783

3784 3785 3786
            if (b == 0x17) {
                set_cc_op(s, CC_OP_EFLAGS);
            }
B
balrog 已提交
3787
            break;
R
Richard Henderson 已提交
3788 3789 3790 3791 3792 3793

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

R
Richard Henderson 已提交
3797 3798 3799 3800 3801 3802 3803 3804
            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) {
3805
                    ot = MO_8;
R
Richard Henderson 已提交
3806
                } else if (s->dflag != 2) {
3807
                    ot = (s->prefix & PREFIX_DATA ? MO_16 : MO_32);
R
Richard Henderson 已提交
3808
                } else {
3809
                    ot = MO_64;
R
Richard Henderson 已提交
3810
                }
B
balrog 已提交
3811

3812
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_regs[reg]);
R
Richard Henderson 已提交
3813 3814 3815
                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 已提交
3816

3817
                ot = (s->dflag == 2) ? MO_64 : MO_32;
R
Richard Henderson 已提交
3818 3819
                gen_op_mov_reg_T0(ot, reg);
                break;
B
balrog 已提交
3820

R
Richard Henderson 已提交
3821 3822 3823 3824 3825 3826 3827 3828 3829 3830 3831 3832 3833 3834 3835
            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) {
3836
                    ot = (s->prefix & PREFIX_DATA ? MO_16 : MO_32);
R
Richard Henderson 已提交
3837
                } else {
3838
                    ot = MO_64;
R
Richard Henderson 已提交
3839 3840
                }

3841
                gen_lea_modrm(env, s, modrm);
R
Richard Henderson 已提交
3842
                if ((b & 1) == 0) {
3843 3844
                    tcg_gen_qemu_ld_tl(cpu_T[0], cpu_A0,
                                       s->mem_index, ot | MO_BE);
R
Richard Henderson 已提交
3845 3846
                    gen_op_mov_reg_T0(ot, reg);
                } else {
3847 3848
                    tcg_gen_qemu_st_tl(cpu_regs[reg], cpu_A0,
                                       s->mem_index, ot | MO_BE);
R
Richard Henderson 已提交
3849 3850 3851
                }
                break;

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

3882
                    bound = tcg_const_tl(ot == MO_64 ? 63 : 31);
R
Richard Henderson 已提交
3883 3884 3885 3886 3887 3888 3889 3890 3891 3892 3893 3894 3895 3896 3897 3898 3899 3900 3901 3902 3903 3904 3905
                    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 已提交
3906 3907 3908 3909 3910 3911
            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;
                }
3912
                ot = s->dflag == 2 ? MO_64 : MO_32;
R
Richard Henderson 已提交
3913 3914 3915
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
                tcg_gen_ext8u_tl(cpu_T[1], cpu_regs[s->vex_v]);
                {
3916
                    TCGv bound = tcg_const_tl(ot == MO_64 ? 63 : 31);
R
Richard Henderson 已提交
3917 3918 3919 3920 3921 3922 3923 3924 3925 3926 3927 3928 3929 3930 3931 3932
                    /* 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 已提交
3933 3934 3935 3936 3937 3938
            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;
                }
3939
                ot = s->dflag == 2 ? MO_64 : MO_32;
R
Richard Henderson 已提交
3940 3941 3942
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
                switch (ot) {
                default:
3943 3944 3945 3946 3947 3948
                    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 已提交
3949 3950
                    break;
#ifdef TARGET_X86_64
3951
                case MO_64:
3952 3953
                    tcg_gen_mulu2_i64(cpu_regs[s->vex_v], cpu_regs[reg],
                                      cpu_T[0], cpu_regs[R_EDX]);
R
Richard Henderson 已提交
3954 3955 3956 3957 3958
                    break;
#endif
                }
                break;

3959 3960 3961 3962 3963 3964
            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;
                }
3965
                ot = s->dflag == 2 ? MO_64 : MO_32;
3966 3967 3968 3969 3970 3971 3972 3973 3974 3975 3976 3977 3978 3979 3980 3981 3982
                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;
                }
3983
                ot = s->dflag == 2 ? MO_64 : MO_32;
3984 3985 3986 3987 3988 3989 3990 3991 3992 3993 3994
                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;

3995 3996 3997 3998 3999
            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 {
4000
                    TCGv carry_in, carry_out, zero;
4001 4002
                    int end_op;

4003
                    ot = (s->dflag == 2 ? MO_64 : MO_32);
4004 4005 4006 4007 4008 4009 4010 4011 4012 4013 4014 4015 4016 4017 4018 4019 4020 4021 4022 4023 4024 4025 4026 4027 4028 4029 4030
                    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:
4031
                        end_op = (b == 0x1f6 ? CC_OP_ADCX : CC_OP_ADOX);
4032 4033 4034 4035 4036 4037 4038 4039 4040 4041 4042 4043 4044 4045 4046
                        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
4047
                    case MO_32:
4048 4049 4050 4051 4052 4053 4054 4055 4056 4057 4058 4059
                        /* 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.  */
4060 4061 4062 4063 4064 4065 4066 4067
                        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);
4068 4069 4070 4071 4072 4073
                        break;
                    }
                    set_cc_op(s, end_op);
                }
                break;

4074 4075 4076 4077 4078 4079 4080 4081
            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;
                }
4082
                ot = (s->dflag == 2 ? MO_64 : MO_32);
4083
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
4084
                if (ot == MO_64) {
4085 4086 4087 4088 4089 4090 4091
                    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) {
4092
                    if (ot != MO_64) {
4093 4094 4095 4096
                        tcg_gen_ext32s_tl(cpu_T[0], cpu_T[0]);
                    }
                    tcg_gen_sar_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
                } else {
4097
                    if (ot != MO_64) {
4098 4099 4100 4101 4102 4103 4104
                        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;

4105 4106 4107 4108 4109 4110 4111 4112 4113
            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;
                }
4114
                ot = s->dflag == 2 ? MO_64 : MO_32;
4115 4116 4117 4118 4119 4120 4121 4122 4123 4124 4125 4126 4127 4128 4129 4130 4131 4132 4133 4134 4135 4136 4137 4138 4139 4140 4141 4142 4143 4144 4145 4146
                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 已提交
4147 4148 4149
            default:
                goto illegal_op;
            }
B
balrog 已提交
4150
            break;
R
Richard Henderson 已提交
4151

B
balrog 已提交
4152 4153
        case 0x03a:
        case 0x13a:
B
balrog 已提交
4154
            b = modrm;
4155
            modrm = cpu_ldub_code(env, s->pc++);
B
balrog 已提交
4156 4157 4158
            rm = modrm & 7;
            reg = ((modrm >> 3) & 7) | rex_r;
            mod = (modrm >> 6) & 3;
4159 4160 4161
            if (b1 >= 2) {
                goto illegal_op;
            }
B
balrog 已提交
4162

B
Blue Swirl 已提交
4163 4164
            sse_fn_eppi = sse_op_table7[b].op[b1];
            if (!sse_fn_eppi) {
B
balrog 已提交
4165
                goto illegal_op;
B
Blue Swirl 已提交
4166
            }
B
balrog 已提交
4167 4168 4169
            if (!(s->cpuid_ext_features & sse_op_table7[b].ext_mask))
                goto illegal_op;

B
Blue Swirl 已提交
4170
            if (sse_fn_eppi == SSE_SPECIAL) {
4171
                ot = (s->dflag == 2) ? MO_64 : MO_32;
B
balrog 已提交
4172 4173
                rm = (modrm & 7) | REX_B(s);
                if (mod != 3)
4174
                    gen_lea_modrm(env, s, modrm);
B
balrog 已提交
4175
                reg = ((modrm >> 3) & 7) | rex_r;
4176
                val = cpu_ldub_code(env, s->pc++);
B
balrog 已提交
4177 4178 4179 4180
                switch (b) {
                case 0x14: /* pextrb */
                    tcg_gen_ld8u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,
                                            xmm_regs[reg].XMM_B(val & 15)));
4181
                    if (mod == 3) {
B
balrog 已提交
4182
                        gen_op_mov_reg_T0(ot, rm);
4183 4184 4185 4186
                    } else {
                        tcg_gen_qemu_st_tl(cpu_T[0], cpu_A0,
                                           s->mem_index, MO_UB);
                    }
B
balrog 已提交
4187 4188 4189 4190
                    break;
                case 0x15: /* pextrw */
                    tcg_gen_ld16u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,
                                            xmm_regs[reg].XMM_W(val & 7)));
4191
                    if (mod == 3) {
B
balrog 已提交
4192
                        gen_op_mov_reg_T0(ot, rm);
4193 4194 4195 4196
                    } else {
                        tcg_gen_qemu_st_tl(cpu_T[0], cpu_A0,
                                           s->mem_index, MO_LEUW);
                    }
B
balrog 已提交
4197 4198
                    break;
                case 0x16:
4199
                    if (ot == MO_32) { /* pextrd */
B
balrog 已提交
4200 4201 4202
                        tcg_gen_ld_i32(cpu_tmp2_i32, cpu_env,
                                        offsetof(CPUX86State,
                                                xmm_regs[reg].XMM_L(val & 3)));
4203
                        if (mod == 3) {
4204
                            tcg_gen_extu_i32_tl(cpu_regs[rm], cpu_tmp2_i32);
4205
                        } else {
4206 4207
                            tcg_gen_qemu_st_i32(cpu_tmp2_i32, cpu_A0,
                                                s->mem_index, MO_LEUL);
4208
                        }
B
balrog 已提交
4209
                    } else { /* pextrq */
P
pbrook 已提交
4210
#ifdef TARGET_X86_64
B
balrog 已提交
4211 4212 4213
                        tcg_gen_ld_i64(cpu_tmp1_i64, cpu_env,
                                        offsetof(CPUX86State,
                                                xmm_regs[reg].XMM_Q(val & 1)));
4214
                        if (mod == 3) {
4215
                            tcg_gen_mov_i64(cpu_regs[rm], cpu_tmp1_i64);
4216 4217 4218 4219
                        } else {
                            tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0,
                                                s->mem_index, MO_LEQ);
                        }
P
pbrook 已提交
4220 4221 4222
#else
                        goto illegal_op;
#endif
B
balrog 已提交
4223 4224 4225 4226 4227
                    }
                    break;
                case 0x17: /* extractps */
                    tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,
                                            xmm_regs[reg].XMM_L(val & 3)));
4228
                    if (mod == 3) {
B
balrog 已提交
4229
                        gen_op_mov_reg_T0(ot, rm);
4230 4231 4232 4233
                    } else {
                        tcg_gen_qemu_st_tl(cpu_T[0], cpu_A0,
                                           s->mem_index, MO_LEUL);
                    }
B
balrog 已提交
4234 4235
                    break;
                case 0x20: /* pinsrb */
4236
                    if (mod == 3) {
4237
                        gen_op_mov_TN_reg(MO_32, 0, rm);
4238 4239 4240 4241
                    } else {
                        tcg_gen_qemu_ld_tl(cpu_T[0], cpu_A0,
                                           s->mem_index, MO_UB);
                    }
4242
                    tcg_gen_st8_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,
B
balrog 已提交
4243 4244 4245
                                            xmm_regs[reg].XMM_B(val & 15)));
                    break;
                case 0x21: /* insertps */
P
pbrook 已提交
4246
                    if (mod == 3) {
B
balrog 已提交
4247 4248 4249
                        tcg_gen_ld_i32(cpu_tmp2_i32, cpu_env,
                                        offsetof(CPUX86State,xmm_regs[rm]
                                                .XMM_L((val >> 6) & 3)));
P
pbrook 已提交
4250
                    } else {
4251 4252
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
P
pbrook 已提交
4253
                    }
B
balrog 已提交
4254 4255 4256 4257 4258 4259 4260 4261 4262 4263 4264 4265 4266 4267 4268 4269 4270 4271 4272 4273 4274
                    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:
4275
                    if (ot == MO_32) { /* pinsrd */
4276
                        if (mod == 3) {
4277
                            tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_regs[rm]);
4278
                        } else {
4279 4280
                            tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                                s->mem_index, MO_LEUL);
4281
                        }
B
balrog 已提交
4282 4283 4284 4285
                        tcg_gen_st_i32(cpu_tmp2_i32, cpu_env,
                                        offsetof(CPUX86State,
                                                xmm_regs[reg].XMM_L(val & 3)));
                    } else { /* pinsrq */
P
pbrook 已提交
4286
#ifdef TARGET_X86_64
4287
                        if (mod == 3) {
B
balrog 已提交
4288
                            gen_op_mov_v_reg(ot, cpu_tmp1_i64, rm);
4289 4290 4291 4292
                        } else {
                            tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0,
                                                s->mem_index, MO_LEQ);
                        }
B
balrog 已提交
4293 4294 4295
                        tcg_gen_st_i64(cpu_tmp1_i64, cpu_env,
                                        offsetof(CPUX86State,
                                                xmm_regs[reg].XMM_Q(val & 1)));
P
pbrook 已提交
4296 4297 4298
#else
                        goto illegal_op;
#endif
B
balrog 已提交
4299 4300 4301 4302 4303
                    }
                    break;
                }
                return;
            }
B
balrog 已提交
4304 4305 4306 4307 4308 4309 4310

            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);
4311
                    gen_lea_modrm(env, s, modrm);
4312
                    gen_ldo_env_A0(s, op2_offset);
B
balrog 已提交
4313 4314 4315 4316 4317 4318 4319
                }
            } 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);
4320
                    gen_lea_modrm(env, s, modrm);
4321
                    gen_ldq_env_A0(s, op2_offset);
B
balrog 已提交
4322 4323
                }
            }
4324
            val = cpu_ldub_code(env, s->pc++);
B
balrog 已提交
4325

B
balrog 已提交
4326
            if ((b & 0xfc) == 0x60) { /* pcmpXstrX */
4327
                set_cc_op(s, CC_OP_EFLAGS);
B
balrog 已提交
4328 4329 4330 4331 4332 4333

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

B
balrog 已提交
4334 4335
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
4336
            sse_fn_eppi(cpu_env, cpu_ptr0, cpu_ptr1, tcg_const_i32(val));
B
balrog 已提交
4337
            break;
R
Richard Henderson 已提交
4338 4339 4340 4341 4342 4343 4344 4345 4346 4347 4348 4349 4350 4351

        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;
                }
4352
                ot = s->dflag == 2 ? MO_64 : MO_32;
R
Richard Henderson 已提交
4353 4354
                gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
                b = cpu_ldub_code(env, s->pc++);
4355
                if (ot == MO_64) {
R
Richard Henderson 已提交
4356 4357 4358 4359 4360 4361 4362 4363 4364 4365 4366 4367 4368 4369
                    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 已提交
4370 4371 4372 4373 4374
        default:
            goto illegal_op;
        }
    } else {
        /* generic MMX or SSE operation */
B
bellard 已提交
4375 4376 4377 4378 4379 4380 4381 4382
        switch(b) {
        case 0x70: /* pshufx insn */
        case 0xc6: /* pshufx insn */
        case 0xc2: /* compare insns */
            s->rip_offset = 1;
            break;
        default:
            break;
B
bellard 已提交
4383 4384 4385 4386
        }
        if (is_xmm) {
            op1_offset = offsetof(CPUX86State,xmm_regs[reg]);
            if (mod != 3) {
4387
                gen_lea_modrm(env, s, modrm);
B
bellard 已提交
4388
                op2_offset = offsetof(CPUX86State,xmm_t0);
4389
                if (b1 >= 2 && ((b >= 0x50 && b <= 0x5f && b != 0x5b) ||
B
bellard 已提交
4390 4391 4392 4393
                                b == 0xc2)) {
                    /* specific case for SSE single instructions */
                    if (b1 == 2) {
                        /* 32 bit access */
4394
                        gen_op_ld_v(s, MO_32, cpu_T[0], cpu_A0);
B
bellard 已提交
4395
                        tcg_gen_st32_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,xmm_t0.XMM_L(0)));
B
bellard 已提交
4396 4397
                    } else {
                        /* 64 bit access */
4398 4399
                        gen_ldq_env_A0(s, offsetof(CPUX86State,
                                                   xmm_t0.XMM_D(0)));
B
bellard 已提交
4400 4401
                    }
                } else {
4402
                    gen_ldo_env_A0(s, op2_offset);
B
bellard 已提交
4403 4404 4405 4406 4407 4408 4409 4410
                }
            } 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) {
4411
                gen_lea_modrm(env, s, modrm);
B
bellard 已提交
4412
                op2_offset = offsetof(CPUX86State,mmx_t0);
4413
                gen_ldq_env_A0(s, op2_offset);
B
bellard 已提交
4414 4415 4416 4417 4418 4419
            } else {
                rm = (modrm & 7);
                op2_offset = offsetof(CPUX86State,fpregs[rm].mmx);
            }
        }
        switch(b) {
A
aurel32 已提交
4420
        case 0x0f: /* 3DNow! data insns */
4421 4422
            if (!(s->cpuid_ext2_features & CPUID_EXT2_3DNOW))
                goto illegal_op;
4423
            val = cpu_ldub_code(env, s->pc++);
B
Blue Swirl 已提交
4424 4425
            sse_fn_epp = sse_op_table5[val];
            if (!sse_fn_epp) {
A
aurel32 已提交
4426
                goto illegal_op;
B
Blue Swirl 已提交
4427
            }
B
bellard 已提交
4428 4429
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
4430
            sse_fn_epp(cpu_env, cpu_ptr0, cpu_ptr1);
A
aurel32 已提交
4431
            break;
B
bellard 已提交
4432 4433
        case 0x70: /* pshufx insn */
        case 0xc6: /* pshufx insn */
4434
            val = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4435 4436
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
4437
            /* XXX: introduce a new table? */
B
Blue Swirl 已提交
4438
            sse_fn_ppi = (SSEFunc_0_ppi)sse_fn_epp;
B
Blue Swirl 已提交
4439
            sse_fn_ppi(cpu_ptr0, cpu_ptr1, tcg_const_i32(val));
B
bellard 已提交
4440 4441 4442
            break;
        case 0xc2:
            /* compare insns */
4443
            val = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4444 4445
            if (val >= 8)
                goto illegal_op;
B
Blue Swirl 已提交
4446
            sse_fn_epp = sse_op_table4[val][b1];
B
Blue Swirl 已提交
4447

B
bellard 已提交
4448 4449
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
4450
            sse_fn_epp(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
4451
            break;
4452 4453 4454 4455 4456 4457 4458 4459 4460 4461 4462 4463 4464 4465 4466 4467 4468 4469
        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 已提交
4470
            /* XXX: introduce a new table? */
B
Blue Swirl 已提交
4471 4472
            sse_fn_eppt = (SSEFunc_0_eppt)sse_fn_epp;
            sse_fn_eppt(cpu_env, cpu_ptr0, cpu_ptr1, cpu_A0);
4473
            break;
B
bellard 已提交
4474
        default:
B
bellard 已提交
4475 4476
            tcg_gen_addi_ptr(cpu_ptr0, cpu_env, op1_offset);
            tcg_gen_addi_ptr(cpu_ptr1, cpu_env, op2_offset);
B
Blue Swirl 已提交
4477
            sse_fn_epp(cpu_env, cpu_ptr0, cpu_ptr1);
B
bellard 已提交
4478 4479 4480
            break;
        }
        if (b == 0x2e || b == 0x2f) {
4481
            set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
4482 4483 4484 4485
        }
    }
}

B
bellard 已提交
4486 4487
/* convert one instruction. s->is_jmp is set if the translation must
   be stopped. Return the next pc value */
4488 4489
static target_ulong disas_insn(CPUX86State *env, DisasContext *s,
                               target_ulong pc_start)
B
bellard 已提交
4490 4491 4492
{
    int b, prefixes, aflag, dflag;
    int shift, ot;
4493
    int modrm, reg, rm, mod, op, opreg, val;
B
bellard 已提交
4494 4495
    target_ulong next_eip, tval;
    int rex_w, rex_r;
B
bellard 已提交
4496

4497
    if (unlikely(qemu_loglevel_mask(CPU_LOG_TB_OP | CPU_LOG_TB_OP_OPT))) {
4498
        tcg_gen_debug_insn_start(pc_start);
4499
    }
B
bellard 已提交
4500 4501 4502
    s->pc = pc_start;
    prefixes = 0;
    s->override = -1;
B
bellard 已提交
4503 4504 4505 4506 4507
    rex_w = -1;
    rex_r = 0;
#ifdef TARGET_X86_64
    s->rex_x = 0;
    s->rex_b = 0;
4508
    x86_64_hregs = 0;
B
bellard 已提交
4509 4510
#endif
    s->rip_offset = 0; /* for relative ip address */
4511 4512
    s->vex_l = 0;
    s->vex_v = 0;
B
bellard 已提交
4513
 next_byte:
4514
    b = cpu_ldub_code(env, s->pc);
B
bellard 已提交
4515
    s->pc++;
4516 4517 4518 4519 4520 4521 4522 4523 4524 4525 4526 4527 4528 4529 4530 4531 4532 4533 4534 4535 4536 4537 4538 4539 4540 4541 4542 4543 4544 4545 4546 4547 4548 4549 4550
    /* 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 已提交
4551
#ifdef TARGET_X86_64
4552 4553
    case 0x40 ... 0x4f:
        if (CODE64(s)) {
B
bellard 已提交
4554 4555 4556 4557 4558 4559 4560 4561
            /* 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;
        }
4562 4563
        break;
#endif
4564 4565 4566 4567 4568 4569 4570 4571 4572 4573 4574 4575 4576 4577 4578 4579 4580
    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 已提交
4581
            /* 4.1.1-4.1.3: No preceding lock, 66, f2, f3, or rex prefixes. */
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 4614 4615 4616 4617 4618 4619 4620
            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;
4621 4622 4623 4624
    }

    /* Post-process prefixes.  */
    if (CODE64(s)) {
4625 4626 4627 4628 4629 4630 4631 4632 4633 4634 4635
        /* 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 已提交
4636
        }
4637 4638 4639 4640
        /* In 16/32-bit mode, 0x67 selects the opposite addressing.  */
        aflag = s->code32;
        if (prefixes & PREFIX_ADR) {
            aflag ^= 1;
B
bellard 已提交
4641
        }
B
bellard 已提交
4642 4643 4644 4645 4646 4647 4648 4649
    }

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

    /* lock generation */
    if (prefixes & PREFIX_LOCK)
P
pbrook 已提交
4650
        gen_helper_lock();
B
bellard 已提交
4651 4652 4653 4654 4655 4656 4657

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

B
bellard 已提交
4661 4662 4663 4664 4665 4666 4667 4668 4669 4670 4671 4672 4673 4674 4675 4676
        /**************************/
        /* 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)
4677
                ot = MO_8;
B
bellard 已提交
4678
            else
4679
                ot = dflag + MO_16;
4680

B
bellard 已提交
4681 4682
            switch(f) {
            case 0: /* OP Ev, Gv */
4683
                modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4684
                reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
4685
                mod = (modrm >> 6) & 3;
B
bellard 已提交
4686
                rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
4687
                if (mod != 3) {
4688
                    gen_lea_modrm(env, s, modrm);
B
bellard 已提交
4689 4690 4691 4692
                    opreg = OR_TMP0;
                } else if (op == OP_XORL && rm == reg) {
                xor_zero:
                    /* xor reg, reg optimisation */
R
Richard Henderson 已提交
4693
                    set_cc_op(s, CC_OP_CLR);
4694
                    tcg_gen_movi_tl(cpu_T[0], 0);
B
bellard 已提交
4695
                    gen_op_mov_reg_T0(ot, reg);
B
bellard 已提交
4696 4697 4698 4699
                    break;
                } else {
                    opreg = rm;
                }
B
bellard 已提交
4700
                gen_op_mov_TN_reg(ot, 1, reg);
B
bellard 已提交
4701 4702 4703
                gen_op(s, op, ot, opreg);
                break;
            case 1: /* OP Gv, Ev */
4704
                modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4705
                mod = (modrm >> 6) & 3;
B
bellard 已提交
4706 4707
                reg = ((modrm >> 3) & 7) | rex_r;
                rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
4708
                if (mod != 3) {
4709
                    gen_lea_modrm(env, s, modrm);
4710
                    gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
B
bellard 已提交
4711 4712 4713
                } else if (op == OP_XORL && rm == reg) {
                    goto xor_zero;
                } else {
B
bellard 已提交
4714
                    gen_op_mov_TN_reg(ot, 1, rm);
B
bellard 已提交
4715 4716 4717 4718
                }
                gen_op(s, op, ot, reg);
                break;
            case 2: /* OP A, Iv */
4719
                val = insn_get(env, s, ot);
4720
                tcg_gen_movi_tl(cpu_T[1], val);
B
bellard 已提交
4721 4722 4723 4724 4725 4726
                gen_op(s, op, ot, OR_EAX);
                break;
            }
        }
        break;

4727 4728 4729
    case 0x82:
        if (CODE64(s))
            goto illegal_op;
B
bellard 已提交
4730 4731 4732 4733 4734 4735 4736
    case 0x80: /* GRP1 */
    case 0x81:
    case 0x83:
        {
            int val;

            if ((b & 1) == 0)
4737
                ot = MO_8;
B
bellard 已提交
4738
            else
4739
                ot = dflag + MO_16;
4740

4741
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4742
            mod = (modrm >> 6) & 3;
B
bellard 已提交
4743
            rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
4744
            op = (modrm >> 3) & 7;
4745

B
bellard 已提交
4746
            if (mod != 3) {
B
bellard 已提交
4747 4748 4749 4750
                if (b == 0x83)
                    s->rip_offset = 1;
                else
                    s->rip_offset = insn_const_size(ot);
4751
                gen_lea_modrm(env, s, modrm);
B
bellard 已提交
4752 4753
                opreg = OR_TMP0;
            } else {
B
bellard 已提交
4754
                opreg = rm;
B
bellard 已提交
4755 4756 4757 4758 4759 4760
            }

            switch(b) {
            default:
            case 0x80:
            case 0x81:
4761
            case 0x82:
4762
                val = insn_get(env, s, ot);
B
bellard 已提交
4763 4764
                break;
            case 0x83:
4765
                val = (int8_t)insn_get(env, s, MO_8);
B
bellard 已提交
4766 4767
                break;
            }
4768
            tcg_gen_movi_tl(cpu_T[1], val);
B
bellard 已提交
4769 4770 4771 4772 4773 4774 4775
            gen_op(s, op, ot, opreg);
        }
        break;

        /**************************/
        /* inc, dec, and other misc arith */
    case 0x40 ... 0x47: /* inc Gv */
4776
        ot = dflag ? MO_32 : MO_16;
B
bellard 已提交
4777 4778 4779
        gen_inc(s, ot, OR_EAX + (b & 7), 1);
        break;
    case 0x48 ... 0x4f: /* dec Gv */
4780
        ot = dflag ? MO_32 : MO_16;
B
bellard 已提交
4781 4782 4783 4784 4785
        gen_inc(s, ot, OR_EAX + (b & 7), -1);
        break;
    case 0xf6: /* GRP3 */
    case 0xf7:
        if ((b & 1) == 0)
4786
            ot = MO_8;
B
bellard 已提交
4787
        else
4788
            ot = dflag + MO_16;
B
bellard 已提交
4789

4790
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4791
        mod = (modrm >> 6) & 3;
B
bellard 已提交
4792
        rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
4793 4794
        op = (modrm >> 3) & 7;
        if (mod != 3) {
B
bellard 已提交
4795 4796
            if (op == 0)
                s->rip_offset = insn_const_size(ot);
4797
            gen_lea_modrm(env, s, modrm);
4798
            gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
4799
        } else {
B
bellard 已提交
4800
            gen_op_mov_TN_reg(ot, 0, rm);
B
bellard 已提交
4801 4802 4803 4804
        }

        switch(op) {
        case 0: /* test */
4805
            val = insn_get(env, s, ot);
4806
            tcg_gen_movi_tl(cpu_T[1], val);
B
bellard 已提交
4807
            gen_op_testl_T0_T1_cc();
4808
            set_cc_op(s, CC_OP_LOGICB + ot);
B
bellard 已提交
4809 4810
            break;
        case 2: /* not */
4811
            tcg_gen_not_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
4812
            if (mod != 3) {
4813
                gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
4814
            } else {
B
bellard 已提交
4815
                gen_op_mov_reg_T0(ot, rm);
B
bellard 已提交
4816 4817 4818
            }
            break;
        case 3: /* neg */
4819
            tcg_gen_neg_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
4820
            if (mod != 3) {
4821
                gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
4822
            } else {
B
bellard 已提交
4823
                gen_op_mov_reg_T0(ot, rm);
B
bellard 已提交
4824 4825
            }
            gen_op_update_neg_cc();
4826
            set_cc_op(s, CC_OP_SUBB + ot);
B
bellard 已提交
4827 4828 4829
            break;
        case 4: /* mul */
            switch(ot) {
4830 4831
            case MO_8:
                gen_op_mov_TN_reg(MO_8, 1, R_EAX);
B
bellard 已提交
4832 4833 4834 4835
                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]);
4836
                gen_op_mov_reg_T0(MO_16, R_EAX);
B
bellard 已提交
4837 4838
                tcg_gen_mov_tl(cpu_cc_dst, cpu_T[0]);
                tcg_gen_andi_tl(cpu_cc_src, cpu_T[0], 0xff00);
4839
                set_cc_op(s, CC_OP_MULB);
B
bellard 已提交
4840
                break;
4841 4842
            case MO_16:
                gen_op_mov_TN_reg(MO_16, 1, R_EAX);
B
bellard 已提交
4843 4844 4845 4846
                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]);
4847
                gen_op_mov_reg_T0(MO_16, R_EAX);
B
bellard 已提交
4848 4849
                tcg_gen_mov_tl(cpu_cc_dst, cpu_T[0]);
                tcg_gen_shri_tl(cpu_T[0], cpu_T[0], 16);
4850
                gen_op_mov_reg_T0(MO_16, R_EDX);
B
bellard 已提交
4851
                tcg_gen_mov_tl(cpu_cc_src, cpu_T[0]);
4852
                set_cc_op(s, CC_OP_MULW);
B
bellard 已提交
4853 4854
                break;
            default:
4855
            case MO_32:
4856 4857 4858 4859 4860 4861 4862 4863
                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]);
4864
                set_cc_op(s, CC_OP_MULL);
B
bellard 已提交
4865
                break;
B
bellard 已提交
4866
#ifdef TARGET_X86_64
4867
            case MO_64:
4868 4869 4870 4871
                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]);
4872
                set_cc_op(s, CC_OP_MULQ);
B
bellard 已提交
4873 4874
                break;
#endif
B
bellard 已提交
4875 4876 4877 4878
            }
            break;
        case 5: /* imul */
            switch(ot) {
4879 4880
            case MO_8:
                gen_op_mov_TN_reg(MO_8, 1, R_EAX);
B
bellard 已提交
4881 4882 4883 4884
                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]);
4885
                gen_op_mov_reg_T0(MO_16, R_EAX);
B
bellard 已提交
4886 4887 4888
                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);
4889
                set_cc_op(s, CC_OP_MULB);
B
bellard 已提交
4890
                break;
4891 4892
            case MO_16:
                gen_op_mov_TN_reg(MO_16, 1, R_EAX);
B
bellard 已提交
4893 4894 4895 4896
                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]);
4897
                gen_op_mov_reg_T0(MO_16, R_EAX);
B
bellard 已提交
4898 4899 4900 4901
                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);
4902
                gen_op_mov_reg_T0(MO_16, R_EDX);
4903
                set_cc_op(s, CC_OP_MULW);
B
bellard 已提交
4904 4905
                break;
            default:
4906
            case MO_32:
4907 4908 4909 4910 4911 4912 4913 4914 4915 4916
                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);
4917
                set_cc_op(s, CC_OP_MULL);
B
bellard 已提交
4918
                break;
B
bellard 已提交
4919
#ifdef TARGET_X86_64
4920
            case MO_64:
4921 4922 4923 4924 4925
                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]);
4926
                set_cc_op(s, CC_OP_MULQ);
B
bellard 已提交
4927 4928
                break;
#endif
B
bellard 已提交
4929 4930 4931 4932
            }
            break;
        case 6: /* div */
            switch(ot) {
4933
            case MO_8:
B
bellard 已提交
4934
                gen_jmp_im(pc_start - s->cs_base);
4935
                gen_helper_divb_AL(cpu_env, cpu_T[0]);
B
bellard 已提交
4936
                break;
4937
            case MO_16:
B
bellard 已提交
4938
                gen_jmp_im(pc_start - s->cs_base);
4939
                gen_helper_divw_AX(cpu_env, cpu_T[0]);
B
bellard 已提交
4940 4941
                break;
            default:
4942
            case MO_32:
B
bellard 已提交
4943
                gen_jmp_im(pc_start - s->cs_base);
4944
                gen_helper_divl_EAX(cpu_env, cpu_T[0]);
B
bellard 已提交
4945 4946
                break;
#ifdef TARGET_X86_64
4947
            case MO_64:
B
bellard 已提交
4948
                gen_jmp_im(pc_start - s->cs_base);
4949
                gen_helper_divq_EAX(cpu_env, cpu_T[0]);
B
bellard 已提交
4950
                break;
B
bellard 已提交
4951
#endif
B
bellard 已提交
4952 4953 4954 4955
            }
            break;
        case 7: /* idiv */
            switch(ot) {
4956
            case MO_8:
B
bellard 已提交
4957
                gen_jmp_im(pc_start - s->cs_base);
4958
                gen_helper_idivb_AL(cpu_env, cpu_T[0]);
B
bellard 已提交
4959
                break;
4960
            case MO_16:
B
bellard 已提交
4961
                gen_jmp_im(pc_start - s->cs_base);
4962
                gen_helper_idivw_AX(cpu_env, cpu_T[0]);
B
bellard 已提交
4963 4964
                break;
            default:
4965
            case MO_32:
B
bellard 已提交
4966
                gen_jmp_im(pc_start - s->cs_base);
4967
                gen_helper_idivl_EAX(cpu_env, cpu_T[0]);
B
bellard 已提交
4968 4969
                break;
#ifdef TARGET_X86_64
4970
            case MO_64:
B
bellard 已提交
4971
                gen_jmp_im(pc_start - s->cs_base);
4972
                gen_helper_idivq_EAX(cpu_env, cpu_T[0]);
B
bellard 已提交
4973
                break;
B
bellard 已提交
4974
#endif
B
bellard 已提交
4975 4976 4977 4978 4979 4980 4981 4982 4983 4984
            }
            break;
        default:
            goto illegal_op;
        }
        break;

    case 0xfe: /* GRP4 */
    case 0xff: /* GRP5 */
        if ((b & 1) == 0)
4985
            ot = MO_8;
B
bellard 已提交
4986
        else
4987
            ot = dflag + MO_16;
B
bellard 已提交
4988

4989
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
4990
        mod = (modrm >> 6) & 3;
B
bellard 已提交
4991
        rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
4992 4993 4994 4995
        op = (modrm >> 3) & 7;
        if (op >= 2 && b == 0xfe) {
            goto illegal_op;
        }
B
bellard 已提交
4996
        if (CODE64(s)) {
4997
            if (op == 2 || op == 4) {
B
bellard 已提交
4998
                /* operand size for jumps is 64 bit */
4999
                ot = MO_64;
5000
            } else if (op == 3 || op == 5) {
5001
                ot = dflag ? MO_32 + (rex_w == 1) : MO_16;
B
bellard 已提交
5002 5003
            } else if (op == 6) {
                /* default push size is 64 bit */
5004
                ot = dflag ? MO_64 : MO_16;
B
bellard 已提交
5005 5006
            }
        }
B
bellard 已提交
5007
        if (mod != 3) {
5008
            gen_lea_modrm(env, s, modrm);
B
bellard 已提交
5009
            if (op >= 2 && op != 3 && op != 5)
5010
                gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
5011
        } else {
B
bellard 已提交
5012
            gen_op_mov_TN_reg(ot, 0, rm);
B
bellard 已提交
5013 5014 5015 5016 5017 5018 5019 5020 5021 5022 5023 5024 5025 5026 5027 5028 5029 5030
        }

        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 */
5031
            /* XXX: optimize if memory (no 'and' is necessary) */
B
bellard 已提交
5032 5033 5034
            if (s->dflag == 0)
                gen_op_andl_T0_ffff();
            next_eip = s->pc - s->cs_base;
B
bellard 已提交
5035
            gen_movtl_T1_im(next_eip);
5036 5037
            gen_push_T1(s);
            gen_op_jmp_T0();
B
bellard 已提交
5038 5039
            gen_eob(s);
            break;
B
bellard 已提交
5040
        case 3: /* lcall Ev */
5041
            gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
5042
            gen_add_A0_im(s, 1 << (ot - MO_16 + 1));
5043
            gen_op_ld_v(s, MO_16, cpu_T[0], cpu_A0);
B
bellard 已提交
5044 5045
        do_lcall:
            if (s->pe && !s->vm86) {
5046
                gen_update_cc_op(s);
B
bellard 已提交
5047
                gen_jmp_im(pc_start - s->cs_base);
5048
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
5049 5050
                gen_helper_lcall_protected(cpu_env, cpu_tmp2_i32, cpu_T[1],
                                           tcg_const_i32(dflag),
P
pbrook 已提交
5051
                                           tcg_const_i32(s->pc - pc_start));
B
bellard 已提交
5052
            } else {
5053
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
5054 5055
                gen_helper_lcall_real(cpu_env, cpu_tmp2_i32, cpu_T[1],
                                      tcg_const_i32(dflag),
P
pbrook 已提交
5056
                                      tcg_const_i32(s->pc - s->cs_base));
B
bellard 已提交
5057 5058 5059 5060 5061 5062 5063 5064 5065 5066
            }
            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 */
5067
            gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
5068
            gen_add_A0_im(s, 1 << (ot - MO_16 + 1));
5069
            gen_op_ld_v(s, MO_16, cpu_T[0], cpu_A0);
B
bellard 已提交
5070 5071
        do_ljmp:
            if (s->pe && !s->vm86) {
5072
                gen_update_cc_op(s);
B
bellard 已提交
5073
                gen_jmp_im(pc_start - s->cs_base);
5074
                tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
5075
                gen_helper_ljmp_protected(cpu_env, cpu_tmp2_i32, cpu_T[1],
P
pbrook 已提交
5076
                                          tcg_const_i32(s->pc - pc_start));
B
bellard 已提交
5077
            } else {
5078
                gen_op_movl_seg_T0_vm(R_CS);
B
bellard 已提交
5079 5080 5081 5082 5083 5084 5085 5086 5087 5088 5089 5090 5091 5092
                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 */
5093
    case 0x85:
B
bellard 已提交
5094
        if ((b & 1) == 0)
5095
            ot = MO_8;
B
bellard 已提交
5096
        else
5097
            ot = dflag + MO_16;
B
bellard 已提交
5098

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

5102
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
B
bellard 已提交
5103
        gen_op_mov_TN_reg(ot, 1, reg);
B
bellard 已提交
5104
        gen_op_testl_T0_T1_cc();
5105
        set_cc_op(s, CC_OP_LOGICB + ot);
B
bellard 已提交
5106
        break;
5107

B
bellard 已提交
5108 5109 5110
    case 0xa8: /* test eAX, Iv */
    case 0xa9:
        if ((b & 1) == 0)
5111
            ot = MO_8;
B
bellard 已提交
5112
        else
5113
            ot = dflag + MO_16;
5114
        val = insn_get(env, s, ot);
B
bellard 已提交
5115

B
bellard 已提交
5116
        gen_op_mov_TN_reg(ot, 0, OR_EAX);
5117
        tcg_gen_movi_tl(cpu_T[1], val);
B
bellard 已提交
5118
        gen_op_testl_T0_T1_cc();
5119
        set_cc_op(s, CC_OP_LOGICB + ot);
B
bellard 已提交
5120
        break;
5121

B
bellard 已提交
5122
    case 0x98: /* CWDE/CBW */
B
bellard 已提交
5123 5124
#ifdef TARGET_X86_64
        if (dflag == 2) {
5125
            gen_op_mov_TN_reg(MO_32, 0, R_EAX);
B
bellard 已提交
5126
            tcg_gen_ext32s_tl(cpu_T[0], cpu_T[0]);
5127
            gen_op_mov_reg_T0(MO_64, R_EAX);
B
bellard 已提交
5128 5129
        } else
#endif
B
bellard 已提交
5130
        if (dflag == 1) {
5131
            gen_op_mov_TN_reg(MO_16, 0, R_EAX);
B
bellard 已提交
5132
            tcg_gen_ext16s_tl(cpu_T[0], cpu_T[0]);
5133
            gen_op_mov_reg_T0(MO_32, R_EAX);
B
bellard 已提交
5134
        } else {
5135
            gen_op_mov_TN_reg(MO_8, 0, R_EAX);
B
bellard 已提交
5136
            tcg_gen_ext8s_tl(cpu_T[0], cpu_T[0]);
5137
            gen_op_mov_reg_T0(MO_16, R_EAX);
B
bellard 已提交
5138
        }
B
bellard 已提交
5139 5140
        break;
    case 0x99: /* CDQ/CWD */
B
bellard 已提交
5141 5142
#ifdef TARGET_X86_64
        if (dflag == 2) {
5143
            gen_op_mov_TN_reg(MO_64, 0, R_EAX);
B
bellard 已提交
5144
            tcg_gen_sari_tl(cpu_T[0], cpu_T[0], 63);
5145
            gen_op_mov_reg_T0(MO_64, R_EDX);
B
bellard 已提交
5146 5147
        } else
#endif
B
bellard 已提交
5148
        if (dflag == 1) {
5149
            gen_op_mov_TN_reg(MO_32, 0, R_EAX);
B
bellard 已提交
5150 5151
            tcg_gen_ext32s_tl(cpu_T[0], cpu_T[0]);
            tcg_gen_sari_tl(cpu_T[0], cpu_T[0], 31);
5152
            gen_op_mov_reg_T0(MO_32, R_EDX);
B
bellard 已提交
5153
        } else {
5154
            gen_op_mov_TN_reg(MO_16, 0, R_EAX);
B
bellard 已提交
5155 5156
            tcg_gen_ext16s_tl(cpu_T[0], cpu_T[0]);
            tcg_gen_sari_tl(cpu_T[0], cpu_T[0], 15);
5157
            gen_op_mov_reg_T0(MO_16, R_EDX);
B
bellard 已提交
5158
        }
B
bellard 已提交
5159 5160 5161 5162
        break;
    case 0x1af: /* imul Gv, Ev */
    case 0x69: /* imul Gv, Ev, I */
    case 0x6b:
5163
        ot = dflag + MO_16;
5164
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5165 5166 5167 5168 5169
        reg = ((modrm >> 3) & 7) | rex_r;
        if (b == 0x69)
            s->rip_offset = insn_const_size(ot);
        else if (b == 0x6b)
            s->rip_offset = 1;
5170
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
B
bellard 已提交
5171
        if (b == 0x69) {
5172
            val = insn_get(env, s, ot);
5173
            tcg_gen_movi_tl(cpu_T[1], val);
B
bellard 已提交
5174
        } else if (b == 0x6b) {
5175
            val = (int8_t)insn_get(env, s, MO_8);
5176
            tcg_gen_movi_tl(cpu_T[1], val);
B
bellard 已提交
5177
        } else {
B
bellard 已提交
5178
            gen_op_mov_TN_reg(ot, 1, reg);
B
bellard 已提交
5179
        }
5180
        switch (ot) {
B
bellard 已提交
5181
#ifdef TARGET_X86_64
5182
        case MO_64:
5183 5184 5185 5186 5187
            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 已提交
5188
#endif
5189
        case MO_32:
5190 5191 5192 5193 5194 5195 5196 5197 5198 5199 5200
            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 已提交
5201 5202 5203 5204 5205 5206 5207
            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);
5208 5209
            gen_op_mov_reg_T0(ot, reg);
            break;
B
bellard 已提交
5210
        }
5211
        set_cc_op(s, CC_OP_MULB + ot);
B
bellard 已提交
5212 5213 5214 5215
        break;
    case 0x1c0:
    case 0x1c1: /* xadd Ev, Gv */
        if ((b & 1) == 0)
5216
            ot = MO_8;
B
bellard 已提交
5217
        else
5218
            ot = dflag + MO_16;
5219
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5220
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5221 5222
        mod = (modrm >> 6) & 3;
        if (mod == 3) {
B
bellard 已提交
5223
            rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
5224 5225
            gen_op_mov_TN_reg(ot, 0, reg);
            gen_op_mov_TN_reg(ot, 1, rm);
B
bellard 已提交
5226
            gen_op_addl_T0_T1();
B
bellard 已提交
5227 5228
            gen_op_mov_reg_T1(ot, reg);
            gen_op_mov_reg_T0(ot, rm);
B
bellard 已提交
5229
        } else {
5230
            gen_lea_modrm(env, s, modrm);
B
bellard 已提交
5231
            gen_op_mov_TN_reg(ot, 0, reg);
5232
            gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
B
bellard 已提交
5233
            gen_op_addl_T0_T1();
5234
            gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
5235
            gen_op_mov_reg_T1(ot, reg);
B
bellard 已提交
5236 5237
        }
        gen_op_update2_cc();
5238
        set_cc_op(s, CC_OP_ADDB + ot);
B
bellard 已提交
5239 5240 5241
        break;
    case 0x1b0:
    case 0x1b1: /* cmpxchg Ev, Gv */
B
bellard 已提交
5242
        {
B
bellard 已提交
5243
            int label1, label2;
5244
            TCGv t0, t1, t2, a0;
B
bellard 已提交
5245 5246

            if ((b & 1) == 0)
5247
                ot = MO_8;
B
bellard 已提交
5248
            else
5249
                ot = dflag + MO_16;
5250
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5251 5252
            reg = ((modrm >> 3) & 7) | rex_r;
            mod = (modrm >> 6) & 3;
P
pbrook 已提交
5253 5254 5255 5256
            t0 = tcg_temp_local_new();
            t1 = tcg_temp_local_new();
            t2 = tcg_temp_local_new();
            a0 = tcg_temp_local_new();
5257
            gen_op_mov_v_reg(ot, t1, reg);
B
bellard 已提交
5258 5259
            if (mod == 3) {
                rm = (modrm & 7) | REX_B(s);
5260
                gen_op_mov_v_reg(ot, t0, rm);
B
bellard 已提交
5261
            } else {
5262
                gen_lea_modrm(env, s, modrm);
5263
                tcg_gen_mov_tl(a0, cpu_A0);
5264
                gen_op_ld_v(s, ot, t0, a0);
B
bellard 已提交
5265 5266 5267
                rm = 0; /* avoid warning */
            }
            label1 = gen_new_label();
5268 5269
            tcg_gen_mov_tl(t2, cpu_regs[R_EAX]);
            gen_extu(ot, t0);
5270
            gen_extu(ot, t2);
5271
            tcg_gen_brcond_tl(TCG_COND_EQ, t2, t0, label1);
5272
            label2 = gen_new_label();
B
bellard 已提交
5273
            if (mod == 3) {
5274
                gen_op_mov_reg_v(ot, R_EAX, t0);
B
bellard 已提交
5275 5276
                tcg_gen_br(label2);
                gen_set_label(label1);
5277
                gen_op_mov_reg_v(ot, rm, t1);
B
bellard 已提交
5278
            } else {
5279 5280 5281
                /* 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 */
5282
                gen_op_st_v(s, ot, t0, a0);
5283
                gen_op_mov_reg_v(ot, R_EAX, t0);
5284
                tcg_gen_br(label2);
B
bellard 已提交
5285
                gen_set_label(label1);
5286
                gen_op_st_v(s, ot, t1, a0);
B
bellard 已提交
5287
            }
5288
            gen_set_label(label2);
5289
            tcg_gen_mov_tl(cpu_cc_src, t0);
5290 5291
            tcg_gen_mov_tl(cpu_cc_srcT, t2);
            tcg_gen_sub_tl(cpu_cc_dst, t2, t0);
5292
            set_cc_op(s, CC_OP_SUBB + ot);
5293 5294 5295 5296
            tcg_temp_free(t0);
            tcg_temp_free(t1);
            tcg_temp_free(t2);
            tcg_temp_free(a0);
B
bellard 已提交
5297 5298 5299
        }
        break;
    case 0x1c7: /* cmpxchg8b */
5300
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5301
        mod = (modrm >> 6) & 3;
5302
        if ((mod == 3) || ((modrm & 0x38) != 0x8))
B
bellard 已提交
5303
            goto illegal_op;
B
bellard 已提交
5304 5305 5306 5307 5308
#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);
5309
            gen_update_cc_op(s);
5310
            gen_lea_modrm(env, s, modrm);
B
Blue Swirl 已提交
5311
            gen_helper_cmpxchg16b(cpu_env, cpu_A0);
B
bellard 已提交
5312 5313 5314 5315 5316 5317
        } else
#endif        
        {
            if (!(s->cpuid_features & CPUID_CX8))
                goto illegal_op;
            gen_jmp_im(pc_start - s->cs_base);
5318
            gen_update_cc_op(s);
5319
            gen_lea_modrm(env, s, modrm);
B
Blue Swirl 已提交
5320
            gen_helper_cmpxchg8b(cpu_env, cpu_A0);
B
bellard 已提交
5321
        }
5322
        set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
5323
        break;
5324

B
bellard 已提交
5325 5326 5327
        /**************************/
        /* push/pop */
    case 0x50 ... 0x57: /* push */
5328
        gen_op_mov_TN_reg(MO_32, 0, (b & 7) | REX_B(s));
B
bellard 已提交
5329 5330 5331
        gen_push_T0(s);
        break;
    case 0x58 ... 0x5f: /* pop */
B
bellard 已提交
5332
        if (CODE64(s)) {
5333
            ot = dflag ? MO_64 : MO_16;
B
bellard 已提交
5334
        } else {
5335
            ot = dflag + MO_16;
B
bellard 已提交
5336
        }
B
bellard 已提交
5337
        gen_pop_T0(s);
B
bellard 已提交
5338
        /* NOTE: order is important for pop %sp */
B
bellard 已提交
5339
        gen_pop_update(s);
B
bellard 已提交
5340
        gen_op_mov_reg_T0(ot, (b & 7) | REX_B(s));
B
bellard 已提交
5341 5342
        break;
    case 0x60: /* pusha */
B
bellard 已提交
5343 5344
        if (CODE64(s))
            goto illegal_op;
B
bellard 已提交
5345 5346 5347
        gen_pusha(s);
        break;
    case 0x61: /* popa */
B
bellard 已提交
5348 5349
        if (CODE64(s))
            goto illegal_op;
B
bellard 已提交
5350 5351 5352 5353
        gen_popa(s);
        break;
    case 0x68: /* push Iv */
    case 0x6a:
B
bellard 已提交
5354
        if (CODE64(s)) {
5355
            ot = dflag ? MO_64 : MO_16;
B
bellard 已提交
5356
        } else {
5357
            ot = dflag + MO_16;
B
bellard 已提交
5358
        }
B
bellard 已提交
5359
        if (b == 0x68)
5360
            val = insn_get(env, s, ot);
B
bellard 已提交
5361
        else
5362
            val = (int8_t)insn_get(env, s, MO_8);
5363
        tcg_gen_movi_tl(cpu_T[0], val);
B
bellard 已提交
5364 5365 5366
        gen_push_T0(s);
        break;
    case 0x8f: /* pop Ev */
B
bellard 已提交
5367
        if (CODE64(s)) {
5368
            ot = dflag ? MO_64 : MO_16;
B
bellard 已提交
5369
        } else {
5370
            ot = dflag + MO_16;
B
bellard 已提交
5371
        }
5372
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5373
        mod = (modrm >> 6) & 3;
B
bellard 已提交
5374
        gen_pop_T0(s);
B
bellard 已提交
5375 5376 5377
        if (mod == 3) {
            /* NOTE: order is important for pop %sp */
            gen_pop_update(s);
B
bellard 已提交
5378
            rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
5379
            gen_op_mov_reg_T0(ot, rm);
B
bellard 已提交
5380 5381
        } else {
            /* NOTE: order is important too for MMU exceptions */
B
bellard 已提交
5382
            s->popl_esp_hack = 1 << ot;
5383
            gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 1);
B
bellard 已提交
5384 5385 5386
            s->popl_esp_hack = 0;
            gen_pop_update(s);
        }
B
bellard 已提交
5387 5388 5389 5390
        break;
    case 0xc8: /* enter */
        {
            int level;
5391
            val = cpu_lduw_code(env, s->pc);
B
bellard 已提交
5392
            s->pc += 2;
5393
            level = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5394 5395 5396 5397 5398
            gen_enter(s, val, level);
        }
        break;
    case 0xc9: /* leave */
        /* XXX: exception not precise (ESP is updated before potential exception) */
B
bellard 已提交
5399
        if (CODE64(s)) {
5400 5401
            gen_op_mov_TN_reg(MO_64, 0, R_EBP);
            gen_op_mov_reg_T0(MO_64, R_ESP);
B
bellard 已提交
5402
        } else if (s->ss32) {
5403 5404
            gen_op_mov_TN_reg(MO_32, 0, R_EBP);
            gen_op_mov_reg_T0(MO_32, R_ESP);
B
bellard 已提交
5405
        } else {
5406 5407
            gen_op_mov_TN_reg(MO_16, 0, R_EBP);
            gen_op_mov_reg_T0(MO_16, R_ESP);
B
bellard 已提交
5408 5409
        }
        gen_pop_T0(s);
B
bellard 已提交
5410
        if (CODE64(s)) {
5411
            ot = dflag ? MO_64 : MO_16;
B
bellard 已提交
5412
        } else {
5413
            ot = dflag + MO_16;
B
bellard 已提交
5414
        }
B
bellard 已提交
5415
        gen_op_mov_reg_T0(ot, R_EBP);
B
bellard 已提交
5416 5417 5418 5419 5420 5421
        gen_pop_update(s);
        break;
    case 0x06: /* push es */
    case 0x0e: /* push cs */
    case 0x16: /* push ss */
    case 0x1e: /* push ds */
B
bellard 已提交
5422 5423
        if (CODE64(s))
            goto illegal_op;
B
bellard 已提交
5424 5425 5426 5427 5428 5429 5430 5431 5432 5433 5434
        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 已提交
5435 5436
        if (CODE64(s))
            goto illegal_op;
B
bellard 已提交
5437 5438 5439 5440 5441
        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) {
5442 5443 5444 5445
            /* if reg == SS, inhibit interrupts/trace. */
            /* If several instructions disable interrupts, only the
               _first_ does it */
            if (!(s->tb->flags & HF_INHIBIT_IRQ_MASK))
5446
                gen_helper_set_inhibit_irq(cpu_env);
B
bellard 已提交
5447 5448 5449
            s->tf = 0;
        }
        if (s->is_jmp) {
B
bellard 已提交
5450
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
5451 5452 5453 5454 5455 5456 5457 5458 5459
            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 已提交
5460
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
5461 5462 5463 5464 5465 5466 5467 5468 5469
            gen_eob(s);
        }
        break;

        /**************************/
        /* mov */
    case 0x88:
    case 0x89: /* mov Gv, Ev */
        if ((b & 1) == 0)
5470
            ot = MO_8;
B
bellard 已提交
5471
        else
5472
            ot = dflag + MO_16;
5473
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5474
        reg = ((modrm >> 3) & 7) | rex_r;
5475

B
bellard 已提交
5476
        /* generate a generic store */
5477
        gen_ldst_modrm(env, s, modrm, ot, reg, 1);
B
bellard 已提交
5478 5479 5480 5481
        break;
    case 0xc6:
    case 0xc7: /* mov Ev, Iv */
        if ((b & 1) == 0)
5482
            ot = MO_8;
B
bellard 已提交
5483
        else
5484
            ot = dflag + MO_16;
5485
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5486
        mod = (modrm >> 6) & 3;
B
bellard 已提交
5487 5488
        if (mod != 3) {
            s->rip_offset = insn_const_size(ot);
5489
            gen_lea_modrm(env, s, modrm);
B
bellard 已提交
5490
        }
5491
        val = insn_get(env, s, ot);
5492
        tcg_gen_movi_tl(cpu_T[0], val);
5493 5494 5495
        if (mod != 3) {
            gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
        } else {
B
bellard 已提交
5496
            gen_op_mov_reg_T0(ot, (modrm & 7) | REX_B(s));
5497
        }
B
bellard 已提交
5498 5499 5500 5501
        break;
    case 0x8a:
    case 0x8b: /* mov Ev, Gv */
        if ((b & 1) == 0)
5502
            ot = MO_8;
B
bellard 已提交
5503
        else
5504
            ot = MO_16 + dflag;
5505
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5506
        reg = ((modrm >> 3) & 7) | rex_r;
5507

5508
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
B
bellard 已提交
5509
        gen_op_mov_reg_T0(ot, reg);
B
bellard 已提交
5510 5511
        break;
    case 0x8e: /* mov seg, Gv */
5512
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5513 5514 5515
        reg = (modrm >> 3) & 7;
        if (reg >= 6 || reg == R_CS)
            goto illegal_op;
5516
        gen_ldst_modrm(env, s, modrm, MO_16, OR_TMP0, 0);
B
bellard 已提交
5517 5518 5519
        gen_movl_seg_T0(s, reg, pc_start - s->cs_base);
        if (reg == R_SS) {
            /* if reg == SS, inhibit interrupts/trace */
5520 5521 5522
            /* If several instructions disable interrupts, only the
               _first_ does it */
            if (!(s->tb->flags & HF_INHIBIT_IRQ_MASK))
5523
                gen_helper_set_inhibit_irq(cpu_env);
B
bellard 已提交
5524 5525 5526
            s->tf = 0;
        }
        if (s->is_jmp) {
B
bellard 已提交
5527
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
5528 5529 5530 5531
            gen_eob(s);
        }
        break;
    case 0x8c: /* mov Gv, seg */
5532
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5533 5534 5535 5536 5537
        reg = (modrm >> 3) & 7;
        mod = (modrm >> 6) & 3;
        if (reg >= 6)
            goto illegal_op;
        gen_op_movl_T0_seg(reg);
B
bellard 已提交
5538
        if (mod == 3)
5539
            ot = MO_16 + dflag;
B
bellard 已提交
5540
        else
5541
            ot = MO_16;
5542
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 1);
B
bellard 已提交
5543 5544 5545 5546 5547 5548 5549
        break;

    case 0x1b6: /* movzbS Gv, Eb */
    case 0x1b7: /* movzwS Gv, Eb */
    case 0x1be: /* movsbS Gv, Eb */
    case 0x1bf: /* movswS Gv, Eb */
        {
5550 5551 5552
            TCGMemOp d_ot;
            TCGMemOp s_ot;

B
bellard 已提交
5553
            /* d_ot is the size of destination */
5554
            d_ot = dflag + MO_16;
B
bellard 已提交
5555
            /* ot is the size of source */
5556
            ot = (b & 1) + MO_8;
5557 5558 5559
            /* s_ot is the sign+size of source */
            s_ot = b & 8 ? MO_SIGN | ot : ot;

5560
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5561
            reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5562
            mod = (modrm >> 6) & 3;
B
bellard 已提交
5563
            rm = (modrm & 7) | REX_B(s);
5564

B
bellard 已提交
5565
            if (mod == 3) {
B
bellard 已提交
5566
                gen_op_mov_TN_reg(ot, 0, rm);
5567 5568
                switch (s_ot) {
                case MO_UB:
B
bellard 已提交
5569
                    tcg_gen_ext8u_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
5570
                    break;
5571
                case MO_SB:
B
bellard 已提交
5572
                    tcg_gen_ext8s_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
5573
                    break;
5574
                case MO_UW:
B
bellard 已提交
5575
                    tcg_gen_ext16u_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
5576 5577
                    break;
                default:
5578
                case MO_SW:
B
bellard 已提交
5579
                    tcg_gen_ext16s_tl(cpu_T[0], cpu_T[0]);
B
bellard 已提交
5580 5581
                    break;
                }
B
bellard 已提交
5582
                gen_op_mov_reg_T0(d_ot, reg);
B
bellard 已提交
5583
            } else {
5584
                gen_lea_modrm(env, s, modrm);
5585
                gen_op_ld_v(s, s_ot, cpu_T[0], cpu_A0);
B
bellard 已提交
5586
                gen_op_mov_reg_T0(d_ot, reg);
B
bellard 已提交
5587 5588 5589 5590 5591
            }
        }
        break;

    case 0x8d: /* lea */
5592
        ot = dflag + MO_16;
5593
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5594 5595 5596
        mod = (modrm >> 6) & 3;
        if (mod == 3)
            goto illegal_op;
B
bellard 已提交
5597
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5598 5599 5600 5601
        /* we must ensure that no segment is added */
        s->override = -1;
        val = s->addseg;
        s->addseg = 0;
5602
        gen_lea_modrm(env, s, modrm);
B
bellard 已提交
5603
        s->addseg = val;
5604
        gen_op_mov_reg_A0(ot - MO_16, reg);
B
bellard 已提交
5605
        break;
5606

B
bellard 已提交
5607 5608 5609 5610 5611
    case 0xa0: /* mov EAX, Ov */
    case 0xa1:
    case 0xa2: /* mov Ov, EAX */
    case 0xa3:
        {
B
bellard 已提交
5612 5613 5614
            target_ulong offset_addr;

            if ((b & 1) == 0)
5615
                ot = MO_8;
B
bellard 已提交
5616
            else
5617
                ot = dflag + MO_16;
B
bellard 已提交
5618
#ifdef TARGET_X86_64
5619
            if (s->aflag == 2) {
5620
                offset_addr = cpu_ldq_code(env, s->pc);
B
bellard 已提交
5621
                s->pc += 8;
B
bellard 已提交
5622
                gen_op_movq_A0_im(offset_addr);
5623
            } else
B
bellard 已提交
5624 5625 5626
#endif
            {
                if (s->aflag) {
5627
                    offset_addr = insn_get(env, s, MO_32);
B
bellard 已提交
5628
                } else {
5629
                    offset_addr = insn_get(env, s, MO_16);
B
bellard 已提交
5630 5631 5632
                }
                gen_op_movl_A0_im(offset_addr);
            }
B
bellard 已提交
5633
            gen_add_A0_ds_seg(s);
B
bellard 已提交
5634
            if ((b & 2) == 0) {
5635
                gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
5636
                gen_op_mov_reg_T0(ot, R_EAX);
B
bellard 已提交
5637
            } else {
B
bellard 已提交
5638
                gen_op_mov_TN_reg(ot, 0, R_EAX);
5639
                gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
5640 5641 5642 5643
            }
        }
        break;
    case 0xd7: /* xlat */
B
bellard 已提交
5644
#ifdef TARGET_X86_64
5645
        if (s->aflag == 2) {
B
bellard 已提交
5646
            gen_op_movq_A0_reg(R_EBX);
5647
            gen_op_mov_TN_reg(MO_64, 0, R_EAX);
5648 5649
            tcg_gen_andi_tl(cpu_T[0], cpu_T[0], 0xff);
            tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_T[0]);
5650
        } else
B
bellard 已提交
5651 5652
#endif
        {
B
bellard 已提交
5653
            gen_op_movl_A0_reg(R_EBX);
5654
            gen_op_mov_TN_reg(MO_32, 0, R_EAX);
5655 5656
            tcg_gen_andi_tl(cpu_T[0], cpu_T[0], 0xff);
            tcg_gen_add_tl(cpu_A0, cpu_A0, cpu_T[0]);
B
bellard 已提交
5657 5658
            if (s->aflag == 0)
                gen_op_andl_A0_ffff();
5659 5660
            else
                tcg_gen_andi_tl(cpu_A0, cpu_A0, 0xffffffff);
B
bellard 已提交
5661
        }
B
bellard 已提交
5662
        gen_add_A0_ds_seg(s);
5663
        gen_op_ld_v(s, MO_8, cpu_T[0], cpu_A0);
5664
        gen_op_mov_reg_T0(MO_8, R_EAX);
B
bellard 已提交
5665 5666
        break;
    case 0xb0 ... 0xb7: /* mov R, Ib */
5667
        val = insn_get(env, s, MO_8);
5668
        tcg_gen_movi_tl(cpu_T[0], val);
5669
        gen_op_mov_reg_T0(MO_8, (b & 7) | REX_B(s));
B
bellard 已提交
5670 5671
        break;
    case 0xb8 ... 0xbf: /* mov R, Iv */
B
bellard 已提交
5672 5673 5674 5675
#ifdef TARGET_X86_64
        if (dflag == 2) {
            uint64_t tmp;
            /* 64 bit case */
5676
            tmp = cpu_ldq_code(env, s->pc);
B
bellard 已提交
5677 5678 5679
            s->pc += 8;
            reg = (b & 7) | REX_B(s);
            gen_movtl_T0_im(tmp);
5680
            gen_op_mov_reg_T0(MO_64, reg);
5681
        } else
B
bellard 已提交
5682 5683
#endif
        {
5684
            ot = dflag ? MO_32 : MO_16;
5685
            val = insn_get(env, s, ot);
B
bellard 已提交
5686
            reg = (b & 7) | REX_B(s);
5687
            tcg_gen_movi_tl(cpu_T[0], val);
B
bellard 已提交
5688
            gen_op_mov_reg_T0(ot, reg);
B
bellard 已提交
5689
        }
B
bellard 已提交
5690 5691 5692
        break;

    case 0x91 ... 0x97: /* xchg R, EAX */
R
Richard Henderson 已提交
5693
    do_xchg_reg_eax:
5694
        ot = dflag + MO_16;
B
bellard 已提交
5695
        reg = (b & 7) | REX_B(s);
B
bellard 已提交
5696 5697 5698 5699 5700
        rm = R_EAX;
        goto do_xchg_reg;
    case 0x86:
    case 0x87: /* xchg Ev, Gv */
        if ((b & 1) == 0)
5701
            ot = MO_8;
B
bellard 已提交
5702
        else
5703
            ot = dflag + MO_16;
5704
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5705
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5706 5707
        mod = (modrm >> 6) & 3;
        if (mod == 3) {
B
bellard 已提交
5708
            rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
5709
        do_xchg_reg:
B
bellard 已提交
5710 5711 5712 5713
            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 已提交
5714
        } else {
5715
            gen_lea_modrm(env, s, modrm);
B
bellard 已提交
5716
            gen_op_mov_TN_reg(ot, 0, reg);
B
bellard 已提交
5717 5718
            /* for xchg, lock is implicit */
            if (!(prefixes & PREFIX_LOCK))
P
pbrook 已提交
5719
                gen_helper_lock();
5720
            gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
5721
            gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
5722
            if (!(prefixes & PREFIX_LOCK))
P
pbrook 已提交
5723
                gen_helper_unlock();
B
bellard 已提交
5724
            gen_op_mov_reg_T1(ot, reg);
B
bellard 已提交
5725 5726 5727
        }
        break;
    case 0xc4: /* les Gv */
5728
        /* In CODE64 this is VEX3; see above.  */
B
bellard 已提交
5729 5730 5731
        op = R_ES;
        goto do_lxx;
    case 0xc5: /* lds Gv */
5732
        /* In CODE64 this is VEX2; see above.  */
B
bellard 已提交
5733 5734 5735 5736 5737 5738 5739 5740 5741 5742 5743
        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:
5744
        ot = dflag ? MO_32 : MO_16;
5745
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5746
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5747 5748 5749
        mod = (modrm >> 6) & 3;
        if (mod == 3)
            goto illegal_op;
5750
        gen_lea_modrm(env, s, modrm);
5751
        gen_op_ld_v(s, ot, cpu_T[1], cpu_A0);
5752
        gen_add_A0_im(s, 1 << (ot - MO_16 + 1));
B
bellard 已提交
5753
        /* load the segment first to handle exceptions properly */
5754
        gen_op_ld_v(s, MO_16, cpu_T[0], cpu_A0);
B
bellard 已提交
5755 5756
        gen_movl_seg_T0(s, op, pc_start - s->cs_base);
        /* then put the data */
B
bellard 已提交
5757
        gen_op_mov_reg_T1(ot, reg);
B
bellard 已提交
5758
        if (s->is_jmp) {
B
bellard 已提交
5759
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
5760 5761 5762
            gen_eob(s);
        }
        break;
5763

B
bellard 已提交
5764 5765 5766 5767 5768 5769 5770 5771 5772
        /************************/
        /* shifts */
    case 0xc0:
    case 0xc1:
        /* shift Ev,Ib */
        shift = 2;
    grp2:
        {
            if ((b & 1) == 0)
5773
                ot = MO_8;
B
bellard 已提交
5774
            else
5775
                ot = dflag + MO_16;
5776

5777
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5778 5779
            mod = (modrm >> 6) & 3;
            op = (modrm >> 3) & 7;
5780

B
bellard 已提交
5781
            if (mod != 3) {
B
bellard 已提交
5782 5783 5784
                if (shift == 2) {
                    s->rip_offset = 1;
                }
5785
                gen_lea_modrm(env, s, modrm);
B
bellard 已提交
5786 5787
                opreg = OR_TMP0;
            } else {
B
bellard 已提交
5788
                opreg = (modrm & 7) | REX_B(s);
B
bellard 已提交
5789 5790 5791 5792 5793 5794 5795
            }

            /* simpler op */
            if (shift == 0) {
                gen_shift(s, op, ot, opreg, OR_ECX);
            } else {
                if (shift == 2) {
5796
                    shift = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5797 5798 5799 5800 5801 5802 5803 5804 5805 5806 5807 5808 5809 5810 5811 5812 5813 5814 5815 5816 5817 5818 5819 5820 5821 5822 5823 5824 5825 5826 5827 5828
                }
                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:
5829
        ot = dflag + MO_16;
5830
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5831
        mod = (modrm >> 6) & 3;
B
bellard 已提交
5832 5833
        rm = (modrm & 7) | REX_B(s);
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
5834
        if (mod != 3) {
5835
            gen_lea_modrm(env, s, modrm);
5836
            opreg = OR_TMP0;
B
bellard 已提交
5837
        } else {
5838
            opreg = rm;
B
bellard 已提交
5839
        }
B
bellard 已提交
5840
        gen_op_mov_TN_reg(ot, 1, reg);
5841

B
bellard 已提交
5842
        if (shift) {
P
Paolo Bonzini 已提交
5843 5844 5845
            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 已提交
5846
        } else {
P
Paolo Bonzini 已提交
5847
            gen_shiftd_rm_T1(s, ot, opreg, op, cpu_regs[R_ECX]);
B
bellard 已提交
5848 5849 5850 5851 5852
        }
        break;

        /************************/
        /* floats */
5853
    case 0xd8 ... 0xdf:
B
bellard 已提交
5854 5855 5856 5857 5858 5859
        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;
        }
5860
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
5861 5862 5863 5864 5865
        mod = (modrm >> 6) & 3;
        rm = modrm & 7;
        op = ((b & 7) << 3) | ((modrm >> 3) & 7);
        if (mod != 3) {
            /* memory op */
5866
            gen_lea_modrm(env, s, modrm);
B
bellard 已提交
5867 5868 5869 5870 5871 5872 5873 5874 5875 5876 5877
            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:
5878 5879
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
B
Blue Swirl 已提交
5880
                        gen_helper_flds_FT0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5881 5882
                        break;
                    case 1:
5883 5884
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
B
Blue Swirl 已提交
5885
                        gen_helper_fildl_FT0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5886 5887
                        break;
                    case 2:
5888 5889
                        tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0,
                                            s->mem_index, MO_LEQ);
B
Blue Swirl 已提交
5890
                        gen_helper_fldl_FT0(cpu_env, cpu_tmp1_i64);
B
bellard 已提交
5891 5892 5893
                        break;
                    case 3:
                    default:
5894 5895
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LESW);
B
Blue Swirl 已提交
5896
                        gen_helper_fildl_FT0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5897 5898
                        break;
                    }
5899

P
pbrook 已提交
5900
                    gen_helper_fp_arith_ST0_FT0(op1);
B
bellard 已提交
5901 5902
                    if (op1 == 3) {
                        /* fcomp needs pop */
B
Blue Swirl 已提交
5903
                        gen_helper_fpop(cpu_env);
B
bellard 已提交
5904 5905 5906 5907 5908 5909
                    }
                }
                break;
            case 0x08: /* flds */
            case 0x0a: /* fsts */
            case 0x0b: /* fstps */
B
bellard 已提交
5910 5911 5912
            case 0x18 ... 0x1b: /* fildl, fisttpl, fistl, fistpl */
            case 0x28 ... 0x2b: /* fldl, fisttpll, fstl, fstpl */
            case 0x38 ... 0x3b: /* filds, fisttps, fists, fistps */
B
bellard 已提交
5913 5914 5915 5916
                switch(op & 7) {
                case 0:
                    switch(op >> 4) {
                    case 0:
5917 5918
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
B
Blue Swirl 已提交
5919
                        gen_helper_flds_ST0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5920 5921
                        break;
                    case 1:
5922 5923
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
B
Blue Swirl 已提交
5924
                        gen_helper_fildl_ST0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5925 5926
                        break;
                    case 2:
5927 5928
                        tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0,
                                            s->mem_index, MO_LEQ);
B
Blue Swirl 已提交
5929
                        gen_helper_fldl_ST0(cpu_env, cpu_tmp1_i64);
B
bellard 已提交
5930 5931 5932
                        break;
                    case 3:
                    default:
5933 5934
                        tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LESW);
B
Blue Swirl 已提交
5935
                        gen_helper_fildl_ST0(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5936 5937 5938
                        break;
                    }
                    break;
B
bellard 已提交
5939
                case 1:
B
bellard 已提交
5940
                    /* XXX: the corresponding CPUID bit must be tested ! */
B
bellard 已提交
5941 5942
                    switch(op >> 4) {
                    case 1:
B
Blue Swirl 已提交
5943
                        gen_helper_fisttl_ST0(cpu_tmp2_i32, cpu_env);
5944 5945
                        tcg_gen_qemu_st_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
B
bellard 已提交
5946 5947
                        break;
                    case 2:
B
Blue Swirl 已提交
5948
                        gen_helper_fisttll_ST0(cpu_tmp1_i64, cpu_env);
5949 5950
                        tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0,
                                            s->mem_index, MO_LEQ);
B
bellard 已提交
5951 5952 5953
                        break;
                    case 3:
                    default:
B
Blue Swirl 已提交
5954
                        gen_helper_fistt_ST0(cpu_tmp2_i32, cpu_env);
5955 5956
                        tcg_gen_qemu_st_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUW);
B
bellard 已提交
5957
                        break;
B
bellard 已提交
5958
                    }
B
Blue Swirl 已提交
5959
                    gen_helper_fpop(cpu_env);
B
bellard 已提交
5960
                    break;
B
bellard 已提交
5961 5962 5963
                default:
                    switch(op >> 4) {
                    case 0:
B
Blue Swirl 已提交
5964
                        gen_helper_fsts_ST0(cpu_tmp2_i32, cpu_env);
5965 5966
                        tcg_gen_qemu_st_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
B
bellard 已提交
5967 5968
                        break;
                    case 1:
B
Blue Swirl 已提交
5969
                        gen_helper_fistl_ST0(cpu_tmp2_i32, cpu_env);
5970 5971
                        tcg_gen_qemu_st_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUL);
B
bellard 已提交
5972 5973
                        break;
                    case 2:
B
Blue Swirl 已提交
5974
                        gen_helper_fstl_ST0(cpu_tmp1_i64, cpu_env);
5975 5976
                        tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0,
                                            s->mem_index, MO_LEQ);
B
bellard 已提交
5977 5978 5979
                        break;
                    case 3:
                    default:
B
Blue Swirl 已提交
5980
                        gen_helper_fist_ST0(cpu_tmp2_i32, cpu_env);
5981 5982
                        tcg_gen_qemu_st_i32(cpu_tmp2_i32, cpu_A0,
                                            s->mem_index, MO_LEUW);
B
bellard 已提交
5983 5984 5985
                        break;
                    }
                    if ((op & 7) == 3)
B
Blue Swirl 已提交
5986
                        gen_helper_fpop(cpu_env);
B
bellard 已提交
5987 5988 5989 5990
                    break;
                }
                break;
            case 0x0c: /* fldenv mem */
5991
                gen_update_cc_op(s);
B
bellard 已提交
5992
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
5993
                gen_helper_fldenv(cpu_env, cpu_A0, tcg_const_i32(s->dflag));
B
bellard 已提交
5994 5995
                break;
            case 0x0d: /* fldcw mem */
5996 5997
                tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                    s->mem_index, MO_LEUW);
B
Blue Swirl 已提交
5998
                gen_helper_fldcw(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
5999 6000
                break;
            case 0x0e: /* fnstenv mem */
6001
                gen_update_cc_op(s);
B
bellard 已提交
6002
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
6003
                gen_helper_fstenv(cpu_env, cpu_A0, tcg_const_i32(s->dflag));
B
bellard 已提交
6004 6005
                break;
            case 0x0f: /* fnstcw mem */
B
Blue Swirl 已提交
6006
                gen_helper_fnstcw(cpu_tmp2_i32, cpu_env);
6007 6008
                tcg_gen_qemu_st_i32(cpu_tmp2_i32, cpu_A0,
                                    s->mem_index, MO_LEUW);
B
bellard 已提交
6009 6010
                break;
            case 0x1d: /* fldt mem */
6011
                gen_update_cc_op(s);
B
bellard 已提交
6012
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
6013
                gen_helper_fldt_ST0(cpu_env, cpu_A0);
B
bellard 已提交
6014 6015
                break;
            case 0x1f: /* fstpt mem */
6016
                gen_update_cc_op(s);
B
bellard 已提交
6017
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
6018 6019
                gen_helper_fstt_ST0(cpu_env, cpu_A0);
                gen_helper_fpop(cpu_env);
B
bellard 已提交
6020 6021
                break;
            case 0x2c: /* frstor mem */
6022
                gen_update_cc_op(s);
B
bellard 已提交
6023
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
6024
                gen_helper_frstor(cpu_env, cpu_A0, tcg_const_i32(s->dflag));
B
bellard 已提交
6025 6026
                break;
            case 0x2e: /* fnsave mem */
6027
                gen_update_cc_op(s);
B
bellard 已提交
6028
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
6029
                gen_helper_fsave(cpu_env, cpu_A0, tcg_const_i32(s->dflag));
B
bellard 已提交
6030 6031
                break;
            case 0x2f: /* fnstsw mem */
B
Blue Swirl 已提交
6032
                gen_helper_fnstsw(cpu_tmp2_i32, cpu_env);
6033 6034
                tcg_gen_qemu_st_i32(cpu_tmp2_i32, cpu_A0,
                                    s->mem_index, MO_LEUW);
B
bellard 已提交
6035 6036
                break;
            case 0x3c: /* fbld */
6037
                gen_update_cc_op(s);
B
bellard 已提交
6038
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
6039
                gen_helper_fbld_ST0(cpu_env, cpu_A0);
B
bellard 已提交
6040 6041
                break;
            case 0x3e: /* fbstp */
6042
                gen_update_cc_op(s);
B
bellard 已提交
6043
                gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
6044 6045
                gen_helper_fbst_ST0(cpu_env, cpu_A0);
                gen_helper_fpop(cpu_env);
B
bellard 已提交
6046 6047
                break;
            case 0x3d: /* fildll */
6048
                tcg_gen_qemu_ld_i64(cpu_tmp1_i64, cpu_A0, s->mem_index, MO_LEQ);
B
Blue Swirl 已提交
6049
                gen_helper_fildll_ST0(cpu_env, cpu_tmp1_i64);
B
bellard 已提交
6050 6051
                break;
            case 0x3f: /* fistpll */
B
Blue Swirl 已提交
6052
                gen_helper_fistll_ST0(cpu_tmp1_i64, cpu_env);
6053
                tcg_gen_qemu_st_i64(cpu_tmp1_i64, cpu_A0, s->mem_index, MO_LEQ);
B
Blue Swirl 已提交
6054
                gen_helper_fpop(cpu_env);
B
bellard 已提交
6055 6056 6057 6058 6059 6060 6061 6062 6063 6064
                break;
            default:
                goto illegal_op;
            }
        } else {
            /* register float ops */
            opreg = rm;

            switch(op) {
            case 0x08: /* fld sti */
B
Blue Swirl 已提交
6065 6066 6067
                gen_helper_fpush(cpu_env);
                gen_helper_fmov_ST0_STN(cpu_env,
                                        tcg_const_i32((opreg + 1) & 7));
B
bellard 已提交
6068 6069
                break;
            case 0x09: /* fxchg sti */
B
bellard 已提交
6070 6071
            case 0x29: /* fxchg4 sti, undocumented op */
            case 0x39: /* fxchg7 sti, undocumented op */
B
Blue Swirl 已提交
6072
                gen_helper_fxchg_ST0_STN(cpu_env, tcg_const_i32(opreg));
B
bellard 已提交
6073 6074 6075 6076
                break;
            case 0x0a: /* grp d9/2 */
                switch(rm) {
                case 0: /* fnop */
6077
                    /* check exceptions (FreeBSD FPU probe) */
6078
                    gen_update_cc_op(s);
B
bellard 已提交
6079
                    gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
6080
                    gen_helper_fwait(cpu_env);
B
bellard 已提交
6081 6082 6083 6084 6085 6086 6087 6088
                    break;
                default:
                    goto illegal_op;
                }
                break;
            case 0x0c: /* grp d9/4 */
                switch(rm) {
                case 0: /* fchs */
B
Blue Swirl 已提交
6089
                    gen_helper_fchs_ST0(cpu_env);
B
bellard 已提交
6090 6091
                    break;
                case 1: /* fabs */
B
Blue Swirl 已提交
6092
                    gen_helper_fabs_ST0(cpu_env);
B
bellard 已提交
6093 6094
                    break;
                case 4: /* ftst */
B
Blue Swirl 已提交
6095 6096
                    gen_helper_fldz_FT0(cpu_env);
                    gen_helper_fcom_ST0_FT0(cpu_env);
B
bellard 已提交
6097 6098
                    break;
                case 5: /* fxam */
B
Blue Swirl 已提交
6099
                    gen_helper_fxam_ST0(cpu_env);
B
bellard 已提交
6100 6101 6102 6103 6104 6105 6106 6107 6108
                    break;
                default:
                    goto illegal_op;
                }
                break;
            case 0x0d: /* grp d9/5 */
                {
                    switch(rm) {
                    case 0:
B
Blue Swirl 已提交
6109 6110
                        gen_helper_fpush(cpu_env);
                        gen_helper_fld1_ST0(cpu_env);
B
bellard 已提交
6111 6112
                        break;
                    case 1:
B
Blue Swirl 已提交
6113 6114
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldl2t_ST0(cpu_env);
B
bellard 已提交
6115 6116
                        break;
                    case 2:
B
Blue Swirl 已提交
6117 6118
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldl2e_ST0(cpu_env);
B
bellard 已提交
6119 6120
                        break;
                    case 3:
B
Blue Swirl 已提交
6121 6122
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldpi_ST0(cpu_env);
B
bellard 已提交
6123 6124
                        break;
                    case 4:
B
Blue Swirl 已提交
6125 6126
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldlg2_ST0(cpu_env);
B
bellard 已提交
6127 6128
                        break;
                    case 5:
B
Blue Swirl 已提交
6129 6130
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldln2_ST0(cpu_env);
B
bellard 已提交
6131 6132
                        break;
                    case 6:
B
Blue Swirl 已提交
6133 6134
                        gen_helper_fpush(cpu_env);
                        gen_helper_fldz_ST0(cpu_env);
B
bellard 已提交
6135 6136 6137 6138 6139 6140 6141 6142 6143
                        break;
                    default:
                        goto illegal_op;
                    }
                }
                break;
            case 0x0e: /* grp d9/6 */
                switch(rm) {
                case 0: /* f2xm1 */
B
Blue Swirl 已提交
6144
                    gen_helper_f2xm1(cpu_env);
B
bellard 已提交
6145 6146
                    break;
                case 1: /* fyl2x */
B
Blue Swirl 已提交
6147
                    gen_helper_fyl2x(cpu_env);
B
bellard 已提交
6148 6149
                    break;
                case 2: /* fptan */
B
Blue Swirl 已提交
6150
                    gen_helper_fptan(cpu_env);
B
bellard 已提交
6151 6152
                    break;
                case 3: /* fpatan */
B
Blue Swirl 已提交
6153
                    gen_helper_fpatan(cpu_env);
B
bellard 已提交
6154 6155
                    break;
                case 4: /* fxtract */
B
Blue Swirl 已提交
6156
                    gen_helper_fxtract(cpu_env);
B
bellard 已提交
6157 6158
                    break;
                case 5: /* fprem1 */
B
Blue Swirl 已提交
6159
                    gen_helper_fprem1(cpu_env);
B
bellard 已提交
6160 6161
                    break;
                case 6: /* fdecstp */
B
Blue Swirl 已提交
6162
                    gen_helper_fdecstp(cpu_env);
B
bellard 已提交
6163 6164 6165
                    break;
                default:
                case 7: /* fincstp */
B
Blue Swirl 已提交
6166
                    gen_helper_fincstp(cpu_env);
B
bellard 已提交
6167 6168 6169 6170 6171 6172
                    break;
                }
                break;
            case 0x0f: /* grp d9/7 */
                switch(rm) {
                case 0: /* fprem */
B
Blue Swirl 已提交
6173
                    gen_helper_fprem(cpu_env);
B
bellard 已提交
6174 6175
                    break;
                case 1: /* fyl2xp1 */
B
Blue Swirl 已提交
6176
                    gen_helper_fyl2xp1(cpu_env);
B
bellard 已提交
6177 6178
                    break;
                case 2: /* fsqrt */
B
Blue Swirl 已提交
6179
                    gen_helper_fsqrt(cpu_env);
B
bellard 已提交
6180 6181
                    break;
                case 3: /* fsincos */
B
Blue Swirl 已提交
6182
                    gen_helper_fsincos(cpu_env);
B
bellard 已提交
6183 6184
                    break;
                case 5: /* fscale */
B
Blue Swirl 已提交
6185
                    gen_helper_fscale(cpu_env);
B
bellard 已提交
6186 6187
                    break;
                case 4: /* frndint */
B
Blue Swirl 已提交
6188
                    gen_helper_frndint(cpu_env);
B
bellard 已提交
6189 6190
                    break;
                case 6: /* fsin */
B
Blue Swirl 已提交
6191
                    gen_helper_fsin(cpu_env);
B
bellard 已提交
6192 6193 6194
                    break;
                default:
                case 7: /* fcos */
B
Blue Swirl 已提交
6195
                    gen_helper_fcos(cpu_env);
B
bellard 已提交
6196 6197 6198 6199 6200 6201 6202 6203
                    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;
6204

B
bellard 已提交
6205 6206
                    op1 = op & 7;
                    if (op >= 0x20) {
P
pbrook 已提交
6207
                        gen_helper_fp_arith_STN_ST0(op1, opreg);
B
bellard 已提交
6208
                        if (op >= 0x30)
B
Blue Swirl 已提交
6209
                            gen_helper_fpop(cpu_env);
B
bellard 已提交
6210
                    } else {
B
Blue Swirl 已提交
6211
                        gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
P
pbrook 已提交
6212
                        gen_helper_fp_arith_ST0_FT0(op1);
B
bellard 已提交
6213 6214 6215 6216
                    }
                }
                break;
            case 0x02: /* fcom */
B
bellard 已提交
6217
            case 0x22: /* fcom2, undocumented op */
B
Blue Swirl 已提交
6218 6219
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fcom_ST0_FT0(cpu_env);
B
bellard 已提交
6220 6221
                break;
            case 0x03: /* fcomp */
B
bellard 已提交
6222 6223
            case 0x23: /* fcomp3, undocumented op */
            case 0x32: /* fcomp5, undocumented op */
B
Blue Swirl 已提交
6224 6225 6226
                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 已提交
6227 6228 6229 6230
                break;
            case 0x15: /* da/5 */
                switch(rm) {
                case 1: /* fucompp */
B
Blue Swirl 已提交
6231 6232 6233 6234
                    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 已提交
6235 6236 6237 6238 6239 6240 6241 6242 6243 6244 6245 6246
                    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 已提交
6247
                    gen_helper_fclex(cpu_env);
B
bellard 已提交
6248 6249
                    break;
                case 3: /* fninit */
B
Blue Swirl 已提交
6250
                    gen_helper_fninit(cpu_env);
B
bellard 已提交
6251 6252 6253 6254 6255 6256 6257 6258
                    break;
                case 4: /* fsetpm (287 only, just do nop here) */
                    break;
                default:
                    goto illegal_op;
                }
                break;
            case 0x1d: /* fucomi */
6259 6260 6261
                if (!(s->cpuid_features & CPUID_CMOV)) {
                    goto illegal_op;
                }
6262
                gen_update_cc_op(s);
B
Blue Swirl 已提交
6263 6264
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fucomi_ST0_FT0(cpu_env);
6265
                set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6266 6267
                break;
            case 0x1e: /* fcomi */
6268 6269 6270
                if (!(s->cpuid_features & CPUID_CMOV)) {
                    goto illegal_op;
                }
6271
                gen_update_cc_op(s);
B
Blue Swirl 已提交
6272 6273
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fcomi_ST0_FT0(cpu_env);
6274
                set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6275
                break;
B
bellard 已提交
6276
            case 0x28: /* ffree sti */
B
Blue Swirl 已提交
6277
                gen_helper_ffree_STN(cpu_env, tcg_const_i32(opreg));
6278
                break;
B
bellard 已提交
6279
            case 0x2a: /* fst sti */
B
Blue Swirl 已提交
6280
                gen_helper_fmov_STN_ST0(cpu_env, tcg_const_i32(opreg));
B
bellard 已提交
6281 6282
                break;
            case 0x2b: /* fstp sti */
B
bellard 已提交
6283 6284 6285
            case 0x0b: /* fstp1 sti, undocumented op */
            case 0x3a: /* fstp8 sti, undocumented op */
            case 0x3b: /* fstp9 sti, undocumented op */
B
Blue Swirl 已提交
6286 6287
                gen_helper_fmov_STN_ST0(cpu_env, tcg_const_i32(opreg));
                gen_helper_fpop(cpu_env);
B
bellard 已提交
6288 6289
                break;
            case 0x2c: /* fucom st(i) */
B
Blue Swirl 已提交
6290 6291
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fucom_ST0_FT0(cpu_env);
B
bellard 已提交
6292 6293
                break;
            case 0x2d: /* fucomp st(i) */
B
Blue Swirl 已提交
6294 6295 6296
                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 已提交
6297 6298 6299 6300
                break;
            case 0x33: /* de/3 */
                switch(rm) {
                case 1: /* fcompp */
B
Blue Swirl 已提交
6301 6302 6303 6304
                    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 已提交
6305 6306 6307 6308 6309
                    break;
                default:
                    goto illegal_op;
                }
                break;
B
bellard 已提交
6310
            case 0x38: /* ffreep sti, undocumented op */
B
Blue Swirl 已提交
6311 6312
                gen_helper_ffree_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fpop(cpu_env);
B
bellard 已提交
6313
                break;
B
bellard 已提交
6314 6315 6316
            case 0x3c: /* df/4 */
                switch(rm) {
                case 0:
B
Blue Swirl 已提交
6317
                    gen_helper_fnstsw(cpu_tmp2_i32, cpu_env);
6318
                    tcg_gen_extu_i32_tl(cpu_T[0], cpu_tmp2_i32);
6319
                    gen_op_mov_reg_T0(MO_16, R_EAX);
B
bellard 已提交
6320 6321 6322 6323 6324 6325
                    break;
                default:
                    goto illegal_op;
                }
                break;
            case 0x3d: /* fucomip */
6326 6327 6328
                if (!(s->cpuid_features & CPUID_CMOV)) {
                    goto illegal_op;
                }
6329
                gen_update_cc_op(s);
B
Blue Swirl 已提交
6330 6331 6332
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fucomi_ST0_FT0(cpu_env);
                gen_helper_fpop(cpu_env);
6333
                set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6334 6335
                break;
            case 0x3e: /* fcomip */
6336 6337 6338
                if (!(s->cpuid_features & CPUID_CMOV)) {
                    goto illegal_op;
                }
6339
                gen_update_cc_op(s);
B
Blue Swirl 已提交
6340 6341 6342
                gen_helper_fmov_FT0_STN(cpu_env, tcg_const_i32(opreg));
                gen_helper_fcomi_ST0_FT0(cpu_env);
                gen_helper_fpop(cpu_env);
6343
                set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6344
                break;
6345 6346 6347
            case 0x10 ... 0x13: /* fcmovxx */
            case 0x18 ... 0x1b:
                {
B
bellard 已提交
6348
                    int op1, l1;
6349
                    static const uint8_t fcmov_cc[8] = {
6350 6351 6352 6353 6354
                        (JCC_B << 1),
                        (JCC_Z << 1),
                        (JCC_BE << 1),
                        (JCC_P << 1),
                    };
6355 6356 6357 6358

                    if (!(s->cpuid_features & CPUID_CMOV)) {
                        goto illegal_op;
                    }
6359
                    op1 = fcmov_cc[op & 3] | (((op >> 3) & 1) ^ 1);
B
bellard 已提交
6360
                    l1 = gen_new_label();
6361
                    gen_jcc1_noeob(s, op1, l1);
B
Blue Swirl 已提交
6362
                    gen_helper_fmov_ST0_STN(cpu_env, tcg_const_i32(opreg));
B
bellard 已提交
6363
                    gen_set_label(l1);
6364 6365
                }
                break;
B
bellard 已提交
6366 6367 6368 6369 6370 6371 6372 6373 6374 6375 6376
            default:
                goto illegal_op;
            }
        }
        break;
        /************************/
        /* string ops */

    case 0xa4: /* movsS */
    case 0xa5:
        if ((b & 1) == 0)
6377
            ot = MO_8;
B
bellard 已提交
6378
        else
6379
            ot = dflag + MO_16;
B
bellard 已提交
6380 6381 6382 6383 6384 6385 6386

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

B
bellard 已提交
6388 6389 6390
    case 0xaa: /* stosS */
    case 0xab:
        if ((b & 1) == 0)
6391
            ot = MO_8;
B
bellard 已提交
6392
        else
6393
            ot = dflag + MO_16;
B
bellard 已提交
6394 6395 6396 6397 6398 6399 6400 6401 6402 6403

        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)
6404
            ot = MO_8;
B
bellard 已提交
6405
        else
6406
            ot = dflag + MO_16;
B
bellard 已提交
6407 6408 6409 6410 6411 6412 6413 6414 6415
        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)
6416
            ot = MO_8;
B
bellard 已提交
6417
        else
6418
            ot = dflag + MO_16;
B
bellard 已提交
6419 6420 6421 6422 6423 6424 6425 6426 6427 6428 6429 6430
        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)
6431
            ot = MO_8;
B
bellard 已提交
6432
        else
6433
            ot = dflag + MO_16;
B
bellard 已提交
6434 6435 6436 6437 6438 6439 6440 6441 6442 6443
        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:
6444
        if ((b & 1) == 0)
6445
            ot = MO_8;
6446
        else
6447 6448
            ot = dflag ? MO_32 : MO_16;
        gen_op_mov_TN_reg(MO_16, 0, R_EDX);
T
ths 已提交
6449
        gen_op_andl_T0_ffff();
6450 6451
        gen_check_io(s, ot, pc_start - s->cs_base, 
                     SVM_IOIO_TYPE_MASK | svm_is_rep(prefixes) | 4);
6452 6453
        if (prefixes & (PREFIX_REPZ | PREFIX_REPNZ)) {
            gen_repz_ins(s, ot, pc_start - s->cs_base, s->pc - s->cs_base);
B
bellard 已提交
6454
        } else {
6455
            gen_ins(s, ot);
P
pbrook 已提交
6456 6457 6458
            if (use_icount) {
                gen_jmp(s, s->pc - s->cs_base);
            }
B
bellard 已提交
6459 6460 6461 6462
        }
        break;
    case 0x6e: /* outsS */
    case 0x6f:
6463
        if ((b & 1) == 0)
6464
            ot = MO_8;
6465
        else
6466 6467
            ot = dflag ? MO_32 : MO_16;
        gen_op_mov_TN_reg(MO_16, 0, R_EDX);
T
ths 已提交
6468
        gen_op_andl_T0_ffff();
6469 6470
        gen_check_io(s, ot, pc_start - s->cs_base,
                     svm_is_rep(prefixes) | 4);
6471 6472
        if (prefixes & (PREFIX_REPZ | PREFIX_REPNZ)) {
            gen_repz_outs(s, ot, pc_start - s->cs_base, s->pc - s->cs_base);
B
bellard 已提交
6473
        } else {
6474
            gen_outs(s, ot);
P
pbrook 已提交
6475 6476 6477
            if (use_icount) {
                gen_jmp(s, s->pc - s->cs_base);
            }
B
bellard 已提交
6478 6479 6480 6481 6482
        }
        break;

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

B
bellard 已提交
6484 6485
    case 0xe4:
    case 0xe5:
6486
        if ((b & 1) == 0)
6487
            ot = MO_8;
6488
        else
6489
            ot = dflag ? MO_32 : MO_16;
6490
        val = cpu_ldub_code(env, s->pc++);
6491 6492
        gen_check_io(s, ot, pc_start - s->cs_base,
                     SVM_IOIO_TYPE_MASK | svm_is_rep(prefixes));
P
pbrook 已提交
6493 6494
        if (use_icount)
            gen_io_start();
6495
        tcg_gen_movi_i32(cpu_tmp2_i32, val);
P
pbrook 已提交
6496
        gen_helper_in_func(ot, cpu_T[1], cpu_tmp2_i32);
B
bellard 已提交
6497
        gen_op_mov_reg_T1(ot, R_EAX);
P
pbrook 已提交
6498 6499 6500 6501
        if (use_icount) {
            gen_io_end();
            gen_jmp(s, s->pc - s->cs_base);
        }
B
bellard 已提交
6502 6503 6504
        break;
    case 0xe6:
    case 0xe7:
6505
        if ((b & 1) == 0)
6506
            ot = MO_8;
6507
        else
6508
            ot = dflag ? MO_32 : MO_16;
6509
        val = cpu_ldub_code(env, s->pc++);
6510 6511
        gen_check_io(s, ot, pc_start - s->cs_base,
                     svm_is_rep(prefixes));
B
bellard 已提交
6512
        gen_op_mov_TN_reg(ot, 1, R_EAX);
6513

P
pbrook 已提交
6514 6515
        if (use_icount)
            gen_io_start();
6516
        tcg_gen_movi_i32(cpu_tmp2_i32, val);
6517
        tcg_gen_trunc_tl_i32(cpu_tmp3_i32, cpu_T[1]);
P
pbrook 已提交
6518
        gen_helper_out_func(ot, cpu_tmp2_i32, cpu_tmp3_i32);
P
pbrook 已提交
6519 6520 6521 6522
        if (use_icount) {
            gen_io_end();
            gen_jmp(s, s->pc - s->cs_base);
        }
B
bellard 已提交
6523 6524 6525
        break;
    case 0xec:
    case 0xed:
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);
6531
        gen_op_andl_T0_ffff();
6532 6533
        gen_check_io(s, ot, pc_start - s->cs_base,
                     SVM_IOIO_TYPE_MASK | svm_is_rep(prefixes));
P
pbrook 已提交
6534 6535
        if (use_icount)
            gen_io_start();
6536
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
P
pbrook 已提交
6537
        gen_helper_in_func(ot, cpu_T[1], cpu_tmp2_i32);
B
bellard 已提交
6538
        gen_op_mov_reg_T1(ot, R_EAX);
P
pbrook 已提交
6539 6540 6541 6542
        if (use_icount) {
            gen_io_end();
            gen_jmp(s, s->pc - s->cs_base);
        }
B
bellard 已提交
6543 6544 6545
        break;
    case 0xee:
    case 0xef:
6546
        if ((b & 1) == 0)
6547
            ot = MO_8;
6548
        else
6549 6550
            ot = dflag ? MO_32 : MO_16;
        gen_op_mov_TN_reg(MO_16, 0, R_EDX);
6551
        gen_op_andl_T0_ffff();
6552 6553
        gen_check_io(s, ot, pc_start - s->cs_base,
                     svm_is_rep(prefixes));
B
bellard 已提交
6554
        gen_op_mov_TN_reg(ot, 1, R_EAX);
6555

P
pbrook 已提交
6556 6557
        if (use_icount)
            gen_io_start();
6558 6559
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
        tcg_gen_trunc_tl_i32(cpu_tmp3_i32, cpu_T[1]);
P
pbrook 已提交
6560
        gen_helper_out_func(ot, cpu_tmp2_i32, cpu_tmp3_i32);
P
pbrook 已提交
6561 6562 6563 6564
        if (use_icount) {
            gen_io_end();
            gen_jmp(s, s->pc - s->cs_base);
        }
B
bellard 已提交
6565 6566 6567 6568 6569
        break;

        /************************/
        /* control */
    case 0xc2: /* ret im */
6570
        val = cpu_ldsw_code(env, s->pc);
B
bellard 已提交
6571 6572
        s->pc += 2;
        gen_pop_T0(s);
6573 6574
        if (CODE64(s) && s->dflag)
            s->dflag = 2;
B
bellard 已提交
6575 6576 6577 6578 6579 6580 6581 6582 6583 6584 6585 6586 6587 6588 6589
        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 */
6590
        val = cpu_ldsw_code(env, s->pc);
B
bellard 已提交
6591 6592 6593
        s->pc += 2;
    do_lret:
        if (s->pe && !s->vm86) {
6594
            gen_update_cc_op(s);
B
bellard 已提交
6595
            gen_jmp_im(pc_start - s->cs_base);
6596
            gen_helper_lret_protected(cpu_env, tcg_const_i32(s->dflag),
P
pbrook 已提交
6597
                                      tcg_const_i32(val));
B
bellard 已提交
6598 6599 6600
        } else {
            gen_stack_A0(s);
            /* pop offset */
6601
            gen_op_ld_v(s, 1 + s->dflag, cpu_T[0], cpu_A0);
B
bellard 已提交
6602 6603 6604 6605 6606 6607 6608
            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);
6609
            gen_op_ld_v(s, 1 + s->dflag, cpu_T[0], cpu_A0);
6610
            gen_op_movl_seg_T0_vm(R_CS);
B
bellard 已提交
6611 6612 6613 6614 6615 6616 6617 6618 6619
            /* 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 已提交
6620
        gen_svm_check_intercept(s, pc_start, SVM_EXIT_IRET);
B
bellard 已提交
6621 6622
        if (!s->pe) {
            /* real mode */
6623
            gen_helper_iret_real(cpu_env, tcg_const_i32(s->dflag));
6624
            set_cc_op(s, CC_OP_EFLAGS);
6625 6626 6627 6628
        } else if (s->vm86) {
            if (s->iopl != 3) {
                gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
            } else {
6629
                gen_helper_iret_real(cpu_env, tcg_const_i32(s->dflag));
6630
                set_cc_op(s, CC_OP_EFLAGS);
6631
            }
B
bellard 已提交
6632
        } else {
6633
            gen_update_cc_op(s);
B
bellard 已提交
6634
            gen_jmp_im(pc_start - s->cs_base);
6635
            gen_helper_iret_protected(cpu_env, tcg_const_i32(s->dflag),
P
pbrook 已提交
6636
                                      tcg_const_i32(s->pc - s->cs_base));
6637
            set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6638 6639 6640 6641 6642
        }
        gen_eob(s);
        break;
    case 0xe8: /* call im */
        {
B
bellard 已提交
6643
            if (dflag)
6644
                tval = (int32_t)insn_get(env, s, MO_32);
B
bellard 已提交
6645
            else
6646
                tval = (int16_t)insn_get(env, s, MO_16);
B
bellard 已提交
6647
            next_eip = s->pc - s->cs_base;
B
bellard 已提交
6648
            tval += next_eip;
B
bellard 已提交
6649
            if (s->dflag == 0)
B
bellard 已提交
6650
                tval &= 0xffff;
6651 6652
            else if(!CODE64(s))
                tval &= 0xffffffff;
B
bellard 已提交
6653
            gen_movtl_T0_im(next_eip);
B
bellard 已提交
6654
            gen_push_T0(s);
B
bellard 已提交
6655
            gen_jmp(s, tval);
B
bellard 已提交
6656 6657 6658 6659 6660
        }
        break;
    case 0x9a: /* lcall im */
        {
            unsigned int selector, offset;
6661

B
bellard 已提交
6662 6663
            if (CODE64(s))
                goto illegal_op;
6664
            ot = dflag ? MO_32 : MO_16;
6665
            offset = insn_get(env, s, ot);
6666
            selector = insn_get(env, s, MO_16);
6667

6668
            tcg_gen_movi_tl(cpu_T[0], selector);
6669
            tcg_gen_movi_tl(cpu_T[1], offset);
B
bellard 已提交
6670 6671
        }
        goto do_lcall;
B
bellard 已提交
6672
    case 0xe9: /* jmp im */
B
bellard 已提交
6673
        if (dflag)
6674
            tval = (int32_t)insn_get(env, s, MO_32);
B
bellard 已提交
6675
        else
6676
            tval = (int16_t)insn_get(env, s, MO_16);
B
bellard 已提交
6677
        tval += s->pc - s->cs_base;
B
bellard 已提交
6678
        if (s->dflag == 0)
B
bellard 已提交
6679
            tval &= 0xffff;
6680 6681
        else if(!CODE64(s))
            tval &= 0xffffffff;
B
bellard 已提交
6682
        gen_jmp(s, tval);
B
bellard 已提交
6683 6684 6685 6686 6687
        break;
    case 0xea: /* ljmp im */
        {
            unsigned int selector, offset;

B
bellard 已提交
6688 6689
            if (CODE64(s))
                goto illegal_op;
6690
            ot = dflag ? MO_32 : MO_16;
6691
            offset = insn_get(env, s, ot);
6692
            selector = insn_get(env, s, MO_16);
6693

6694
            tcg_gen_movi_tl(cpu_T[0], selector);
6695
            tcg_gen_movi_tl(cpu_T[1], offset);
B
bellard 已提交
6696 6697 6698
        }
        goto do_ljmp;
    case 0xeb: /* jmp Jb */
6699
        tval = (int8_t)insn_get(env, s, MO_8);
B
bellard 已提交
6700
        tval += s->pc - s->cs_base;
B
bellard 已提交
6701
        if (s->dflag == 0)
B
bellard 已提交
6702 6703
            tval &= 0xffff;
        gen_jmp(s, tval);
B
bellard 已提交
6704 6705
        break;
    case 0x70 ... 0x7f: /* jcc Jb */
6706
        tval = (int8_t)insn_get(env, s, MO_8);
B
bellard 已提交
6707 6708 6709
        goto do_jcc;
    case 0x180 ... 0x18f: /* jcc Jv */
        if (dflag) {
6710
            tval = (int32_t)insn_get(env, s, MO_32);
B
bellard 已提交
6711
        } else {
6712
            tval = (int16_t)insn_get(env, s, MO_16);
B
bellard 已提交
6713 6714 6715
        }
    do_jcc:
        next_eip = s->pc - s->cs_base;
B
bellard 已提交
6716
        tval += next_eip;
B
bellard 已提交
6717
        if (s->dflag == 0)
B
bellard 已提交
6718 6719
            tval &= 0xffff;
        gen_jcc(s, b, tval, next_eip);
B
bellard 已提交
6720 6721 6722
        break;

    case 0x190 ... 0x19f: /* setcc Gv */
6723
        modrm = cpu_ldub_code(env, s->pc++);
6724
        gen_setcc1(s, b, cpu_T[0]);
6725
        gen_ldst_modrm(env, s, modrm, MO_8, OR_TMP0, 1);
B
bellard 已提交
6726 6727
        break;
    case 0x140 ... 0x14f: /* cmov Gv, Ev */
6728 6729 6730
        if (!(s->cpuid_features & CPUID_CMOV)) {
            goto illegal_op;
        }
6731
        ot = dflag + MO_16;
6732 6733 6734
        modrm = cpu_ldub_code(env, s->pc++);
        reg = ((modrm >> 3) & 7) | rex_r;
        gen_cmovcc1(env, s, ot, b, modrm, reg);
B
bellard 已提交
6735
        break;
6736

B
bellard 已提交
6737 6738 6739
        /************************/
        /* flags */
    case 0x9c: /* pushf */
B
bellard 已提交
6740
        gen_svm_check_intercept(s, pc_start, SVM_EXIT_PUSHF);
B
bellard 已提交
6741 6742 6743
        if (s->vm86 && s->iopl != 3) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
6744
            gen_update_cc_op(s);
6745
            gen_helper_read_eflags(cpu_T[0], cpu_env);
B
bellard 已提交
6746 6747 6748 6749
            gen_push_T0(s);
        }
        break;
    case 0x9d: /* popf */
B
bellard 已提交
6750
        gen_svm_check_intercept(s, pc_start, SVM_EXIT_POPF);
B
bellard 已提交
6751 6752 6753 6754 6755 6756
        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) {
6757 6758 6759 6760 6761
                    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 已提交
6762
                } else {
6763 6764 6765 6766 6767
                    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 已提交
6768 6769
                }
            } else {
B
bellard 已提交
6770 6771
                if (s->cpl <= s->iopl) {
                    if (s->dflag) {
6772 6773 6774 6775 6776 6777
                        gen_helper_write_eflags(cpu_env, cpu_T[0],
                                                tcg_const_i32((TF_MASK |
                                                               AC_MASK |
                                                               ID_MASK |
                                                               NT_MASK |
                                                               IF_MASK)));
B
bellard 已提交
6778
                    } else {
6779 6780 6781 6782 6783 6784 6785
                        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 已提交
6786
                    }
B
bellard 已提交
6787
                } else {
B
bellard 已提交
6788
                    if (s->dflag) {
6789 6790 6791
                        gen_helper_write_eflags(cpu_env, cpu_T[0],
                                           tcg_const_i32((TF_MASK | AC_MASK |
                                                          ID_MASK | NT_MASK)));
B
bellard 已提交
6792
                    } else {
6793 6794 6795 6796
                        gen_helper_write_eflags(cpu_env, cpu_T[0],
                                           tcg_const_i32((TF_MASK | AC_MASK |
                                                          ID_MASK | NT_MASK)
                                                         & 0xffff));
B
bellard 已提交
6797
                    }
B
bellard 已提交
6798 6799 6800
                }
            }
            gen_pop_update(s);
6801
            set_cc_op(s, CC_OP_EFLAGS);
H
H. Peter Anvin 已提交
6802
            /* abort translation because TF/AC flag may change */
B
bellard 已提交
6803
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
6804 6805 6806 6807
            gen_eob(s);
        }
        break;
    case 0x9e: /* sahf */
B
bellard 已提交
6808
        if (CODE64(s) && !(s->cpuid_ext3_features & CPUID_EXT3_LAHF_LM))
B
bellard 已提交
6809
            goto illegal_op;
6810
        gen_op_mov_TN_reg(MO_8, 0, R_AH);
6811
        gen_compute_eflags(s);
6812 6813 6814
        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 已提交
6815 6816
        break;
    case 0x9f: /* lahf */
B
bellard 已提交
6817
        if (CODE64(s) && !(s->cpuid_ext3_features & CPUID_EXT3_LAHF_LM))
B
bellard 已提交
6818
            goto illegal_op;
6819
        gen_compute_eflags(s);
6820
        /* Note: gen_compute_eflags() only gives the condition codes */
6821
        tcg_gen_ori_tl(cpu_T[0], cpu_cc_src, 0x02);
6822
        gen_op_mov_reg_T0(MO_8, R_AH);
B
bellard 已提交
6823 6824
        break;
    case 0xf5: /* cmc */
6825
        gen_compute_eflags(s);
6826
        tcg_gen_xori_tl(cpu_cc_src, cpu_cc_src, CC_C);
B
bellard 已提交
6827 6828
        break;
    case 0xf8: /* clc */
6829
        gen_compute_eflags(s);
6830
        tcg_gen_andi_tl(cpu_cc_src, cpu_cc_src, ~CC_C);
B
bellard 已提交
6831 6832
        break;
    case 0xf9: /* stc */
6833
        gen_compute_eflags(s);
6834
        tcg_gen_ori_tl(cpu_cc_src, cpu_cc_src, CC_C);
B
bellard 已提交
6835 6836
        break;
    case 0xfc: /* cld */
6837
        tcg_gen_movi_i32(cpu_tmp2_i32, 1);
6838
        tcg_gen_st_i32(cpu_tmp2_i32, cpu_env, offsetof(CPUX86State, df));
B
bellard 已提交
6839 6840
        break;
    case 0xfd: /* std */
6841
        tcg_gen_movi_i32(cpu_tmp2_i32, -1);
6842
        tcg_gen_st_i32(cpu_tmp2_i32, cpu_env, offsetof(CPUX86State, df));
B
bellard 已提交
6843 6844 6845 6846 6847
        break;

        /************************/
        /* bit operations */
    case 0x1ba: /* bt/bts/btr/btc Gv, im */
6848
        ot = dflag + MO_16;
6849
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
6850
        op = (modrm >> 3) & 7;
B
bellard 已提交
6851
        mod = (modrm >> 6) & 3;
B
bellard 已提交
6852
        rm = (modrm & 7) | REX_B(s);
B
bellard 已提交
6853
        if (mod != 3) {
B
bellard 已提交
6854
            s->rip_offset = 1;
6855
            gen_lea_modrm(env, s, modrm);
6856
            gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
6857
        } else {
B
bellard 已提交
6858
            gen_op_mov_TN_reg(ot, 0, rm);
B
bellard 已提交
6859 6860
        }
        /* load shift */
6861
        val = cpu_ldub_code(env, s->pc++);
6862
        tcg_gen_movi_tl(cpu_T[1], val);
B
bellard 已提交
6863 6864 6865
        if (op < 4)
            goto illegal_op;
        op -= 4;
B
bellard 已提交
6866
        goto bt_op;
B
bellard 已提交
6867 6868 6869 6870 6871 6872 6873 6874 6875 6876 6877 6878
    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:
6879
        ot = dflag + MO_16;
6880
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
6881
        reg = ((modrm >> 3) & 7) | rex_r;
B
bellard 已提交
6882
        mod = (modrm >> 6) & 3;
B
bellard 已提交
6883
        rm = (modrm & 7) | REX_B(s);
6884
        gen_op_mov_TN_reg(MO_32, 1, reg);
B
bellard 已提交
6885
        if (mod != 3) {
6886
            gen_lea_modrm(env, s, modrm);
B
bellard 已提交
6887
            /* specific case: we need to add a displacement */
B
bellard 已提交
6888 6889 6890 6891
            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);
6892
            gen_op_ld_v(s, ot, cpu_T[0], cpu_A0);
B
bellard 已提交
6893
        } else {
B
bellard 已提交
6894
            gen_op_mov_TN_reg(ot, 0, rm);
B
bellard 已提交
6895
        }
B
bellard 已提交
6896 6897 6898 6899 6900 6901 6902 6903 6904 6905 6906 6907 6908 6909 6910 6911 6912 6913 6914 6915 6916 6917 6918 6919 6920 6921 6922 6923
    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;
        }
6924
        set_cc_op(s, CC_OP_SARB + ot);
B
bellard 已提交
6925
        if (op != 0) {
6926 6927 6928
            if (mod != 3) {
                gen_op_st_v(s, ot, cpu_T[0], cpu_A0);
            } else {
B
bellard 已提交
6929
                gen_op_mov_reg_T0(ot, rm);
6930
            }
B
bellard 已提交
6931 6932
            tcg_gen_mov_tl(cpu_cc_src, cpu_tmp4);
            tcg_gen_movi_tl(cpu_cc_dst, 0);
B
bellard 已提交
6933 6934
        }
        break;
6935 6936
    case 0x1bc: /* bsf / tzcnt */
    case 0x1bd: /* bsr / lzcnt */
6937
        ot = dflag + MO_16;
6938 6939 6940 6941 6942 6943 6944 6945 6946 6947 6948 6949 6950 6951 6952 6953 6954
        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 已提交
6955
            } else {
6956 6957 6958 6959 6960
                /* 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 已提交
6961
            }
6962 6963 6964 6965 6966 6967 6968 6969 6970 6971 6972 6973 6974 6975 6976 6977 6978 6979 6980 6981 6982 6983 6984
            /* 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 已提交
6985
        }
6986
        gen_op_mov_reg_T0(ot, reg);
B
bellard 已提交
6987 6988 6989 6990
        break;
        /************************/
        /* bcd */
    case 0x27: /* daa */
B
bellard 已提交
6991 6992
        if (CODE64(s))
            goto illegal_op;
6993
        gen_update_cc_op(s);
6994
        gen_helper_daa(cpu_env);
6995
        set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
6996 6997
        break;
    case 0x2f: /* das */
B
bellard 已提交
6998 6999
        if (CODE64(s))
            goto illegal_op;
7000
        gen_update_cc_op(s);
7001
        gen_helper_das(cpu_env);
7002
        set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
7003 7004
        break;
    case 0x37: /* aaa */
B
bellard 已提交
7005 7006
        if (CODE64(s))
            goto illegal_op;
7007
        gen_update_cc_op(s);
7008
        gen_helper_aaa(cpu_env);
7009
        set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
7010 7011
        break;
    case 0x3f: /* aas */
B
bellard 已提交
7012 7013
        if (CODE64(s))
            goto illegal_op;
7014
        gen_update_cc_op(s);
7015
        gen_helper_aas(cpu_env);
7016
        set_cc_op(s, CC_OP_EFLAGS);
B
bellard 已提交
7017 7018
        break;
    case 0xd4: /* aam */
B
bellard 已提交
7019 7020
        if (CODE64(s))
            goto illegal_op;
7021
        val = cpu_ldub_code(env, s->pc++);
7022 7023 7024
        if (val == 0) {
            gen_exception(s, EXCP00_DIVZ, pc_start - s->cs_base);
        } else {
7025
            gen_helper_aam(cpu_env, tcg_const_i32(val));
7026
            set_cc_op(s, CC_OP_LOGICB);
7027
        }
B
bellard 已提交
7028 7029
        break;
    case 0xd5: /* aad */
B
bellard 已提交
7030 7031
        if (CODE64(s))
            goto illegal_op;
7032
        val = cpu_ldub_code(env, s->pc++);
7033
        gen_helper_aad(cpu_env, tcg_const_i32(val));
7034
        set_cc_op(s, CC_OP_LOGICB);
B
bellard 已提交
7035 7036 7037 7038
        break;
        /************************/
        /* misc */
    case 0x90: /* nop */
7039
        /* XXX: correct lock test for all insn */
R
Richard Henderson 已提交
7040
        if (prefixes & PREFIX_LOCK) {
7041
            goto illegal_op;
R
Richard Henderson 已提交
7042 7043 7044 7045 7046
        }
        /* 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 已提交
7047
        if (prefixes & PREFIX_REPZ) {
7048 7049 7050 7051
            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 已提交
7052
        }
B
bellard 已提交
7053 7054
        break;
    case 0x9b: /* fwait */
7055
        if ((s->flags & (HF_MP_MASK | HF_TS_MASK)) ==
B
bellard 已提交
7056 7057
            (HF_MP_MASK | HF_TS_MASK)) {
            gen_exception(s, EXCP07_PREX, pc_start - s->cs_base);
B
bellard 已提交
7058
        } else {
7059
            gen_update_cc_op(s);
B
bellard 已提交
7060
            gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
7061
            gen_helper_fwait(cpu_env);
B
bellard 已提交
7062
        }
B
bellard 已提交
7063 7064 7065 7066 7067
        break;
    case 0xcc: /* int3 */
        gen_interrupt(s, EXCP03_INT3, pc_start - s->cs_base, s->pc - s->cs_base);
        break;
    case 0xcd: /* int N */
7068
        val = cpu_ldub_code(env, s->pc++);
7069
        if (s->vm86 && s->iopl != 3) {
7070
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
7071 7072 7073
        } else {
            gen_interrupt(s, val, pc_start - s->cs_base, s->pc - s->cs_base);
        }
B
bellard 已提交
7074 7075
        break;
    case 0xce: /* into */
B
bellard 已提交
7076 7077
        if (CODE64(s))
            goto illegal_op;
7078
        gen_update_cc_op(s);
7079
        gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
7080
        gen_helper_into(cpu_env, tcg_const_i32(s->pc - pc_start));
B
bellard 已提交
7081
        break;
A
aurel32 已提交
7082
#ifdef WANT_ICEBP
B
bellard 已提交
7083
    case 0xf1: /* icebp (undocumented, exits to external debugger) */
B
bellard 已提交
7084
        gen_svm_check_intercept(s, pc_start, SVM_EXIT_ICEBP);
7085
#if 1
B
bellard 已提交
7086
        gen_debug(s, pc_start - s->cs_base);
7087 7088
#else
        /* start debug */
7089
        tb_flush(env);
7090
        qemu_set_log(CPU_LOG_INT | CPU_LOG_TB_IN_ASM);
7091
#endif
B
bellard 已提交
7092
        break;
A
aurel32 已提交
7093
#endif
B
bellard 已提交
7094 7095 7096
    case 0xfa: /* cli */
        if (!s->vm86) {
            if (s->cpl <= s->iopl) {
7097
                gen_helper_cli(cpu_env);
B
bellard 已提交
7098 7099 7100 7101 7102
            } else {
                gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
            }
        } else {
            if (s->iopl == 3) {
7103
                gen_helper_cli(cpu_env);
B
bellard 已提交
7104 7105 7106 7107 7108 7109 7110 7111 7112
            } 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:
7113
                gen_helper_sti(cpu_env);
B
bellard 已提交
7114
                /* interruptions are enabled only the first insn after sti */
7115 7116 7117
                /* If several instructions disable interrupts, only the
                   _first_ does it */
                if (!(s->tb->flags & HF_INHIBIT_IRQ_MASK))
7118
                    gen_helper_set_inhibit_irq(cpu_env);
B
bellard 已提交
7119
                /* give a chance to handle pending irqs */
B
bellard 已提交
7120
                gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
7121 7122 7123 7124 7125 7126 7127 7128 7129 7130 7131 7132 7133
                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 已提交
7134 7135
        if (CODE64(s))
            goto illegal_op;
7136
        ot = dflag ? MO_32 : MO_16;
7137
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7138 7139 7140 7141
        reg = (modrm >> 3) & 7;
        mod = (modrm >> 6) & 3;
        if (mod == 3)
            goto illegal_op;
B
bellard 已提交
7142
        gen_op_mov_TN_reg(ot, 0, reg);
7143
        gen_lea_modrm(env, s, modrm);
B
bellard 已提交
7144
        gen_jmp_im(pc_start - s->cs_base);
7145
        tcg_gen_trunc_tl_i32(cpu_tmp2_i32, cpu_T[0]);
7146
        if (ot == MO_16) {
B
Blue Swirl 已提交
7147 7148 7149 7150
            gen_helper_boundw(cpu_env, cpu_A0, cpu_tmp2_i32);
        } else {
            gen_helper_boundl(cpu_env, cpu_A0, cpu_tmp2_i32);
        }
B
bellard 已提交
7151 7152
        break;
    case 0x1c8 ... 0x1cf: /* bswap reg */
B
bellard 已提交
7153 7154 7155
        reg = (b & 7) | REX_B(s);
#ifdef TARGET_X86_64
        if (dflag == 2) {
7156
            gen_op_mov_TN_reg(MO_64, 0, reg);
A
aurel32 已提交
7157
            tcg_gen_bswap64_i64(cpu_T[0], cpu_T[0]);
7158
            gen_op_mov_reg_T0(MO_64, reg);
7159
        } else
7160
#endif
B
bellard 已提交
7161
        {
7162
            gen_op_mov_TN_reg(MO_32, 0, reg);
7163 7164
            tcg_gen_ext32u_tl(cpu_T[0], cpu_T[0]);
            tcg_gen_bswap32_tl(cpu_T[0], cpu_T[0]);
7165
            gen_op_mov_reg_T0(MO_32, reg);
B
bellard 已提交
7166
        }
B
bellard 已提交
7167 7168
        break;
    case 0xd6: /* salc */
B
bellard 已提交
7169 7170
        if (CODE64(s))
            goto illegal_op;
7171
        gen_compute_eflags_c(s, cpu_T[0]);
7172
        tcg_gen_neg_tl(cpu_T[0], cpu_T[0]);
7173
        gen_op_mov_reg_T0(MO_8, R_EAX);
B
bellard 已提交
7174 7175 7176 7177 7178
        break;
    case 0xe0: /* loopnz */
    case 0xe1: /* loopz */
    case 0xe2: /* loop */
    case 0xe3: /* jecxz */
B
bellard 已提交
7179
        {
7180
            int l1, l2, l3;
B
bellard 已提交
7181

7182
            tval = (int8_t)insn_get(env, s, MO_8);
B
bellard 已提交
7183 7184 7185 7186
            next_eip = s->pc - s->cs_base;
            tval += next_eip;
            if (s->dflag == 0)
                tval &= 0xffff;
7187

B
bellard 已提交
7188 7189
            l1 = gen_new_label();
            l2 = gen_new_label();
7190
            l3 = gen_new_label();
B
bellard 已提交
7191
            b &= 3;
7192 7193 7194 7195 7196
            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);
7197
                gen_jcc1(s, (JCC_Z << 1) | (b ^ 1), l1);
7198 7199 7200 7201 7202 7203 7204 7205 7206
                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 已提交
7207 7208
            }

7209
            gen_set_label(l3);
B
bellard 已提交
7210
            gen_jmp_im(next_eip);
7211
            tcg_gen_br(l2);
7212

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

7663
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7664 7665 7666
            reg = ((modrm >> 3) & 7) | rex_r;
            mod = (modrm >> 6) & 3;
            rm = (modrm & 7) | REX_B(s);
7667

B
bellard 已提交
7668
            if (mod == 3) {
7669
                gen_op_mov_TN_reg(MO_32, 0, rm);
B
bellard 已提交
7670
                /* sign extend */
7671
                if (d_ot == MO_64) {
B
bellard 已提交
7672
                    tcg_gen_ext32s_tl(cpu_T[0], cpu_T[0]);
7673
                }
B
bellard 已提交
7674
                gen_op_mov_reg_T0(d_ot, reg);
B
bellard 已提交
7675
            } else {
7676
                gen_lea_modrm(env, s, modrm);
R
Richard Henderson 已提交
7677
                gen_op_ld_v(s, MO_32 | MO_SIGN, cpu_T[0], cpu_A0);
B
bellard 已提交
7678
                gen_op_mov_reg_T0(d_ot, reg);
B
bellard 已提交
7679
            }
7680
        } else
B
bellard 已提交
7681 7682
#endif
        {
7683
            int label1;
L
Laurent Desnogues 已提交
7684
            TCGv t0, t1, t2, a0;
7685

B
bellard 已提交
7686 7687
            if (!s->pe || s->vm86)
                goto illegal_op;
P
pbrook 已提交
7688 7689 7690
            t0 = tcg_temp_local_new();
            t1 = tcg_temp_local_new();
            t2 = tcg_temp_local_new();
7691
            ot = MO_16;
7692
            modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7693 7694 7695 7696
            reg = (modrm >> 3) & 7;
            mod = (modrm >> 6) & 3;
            rm = modrm & 7;
            if (mod != 3) {
7697
                gen_lea_modrm(env, s, modrm);
7698
                gen_op_ld_v(s, ot, t0, cpu_A0);
L
Laurent Desnogues 已提交
7699 7700
                a0 = tcg_temp_local_new();
                tcg_gen_mov_tl(a0, cpu_A0);
B
bellard 已提交
7701
            } else {
7702
                gen_op_mov_v_reg(ot, t0, rm);
L
Laurent Desnogues 已提交
7703
                TCGV_UNUSED(a0);
B
bellard 已提交
7704
            }
7705 7706 7707 7708
            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);
7709
            label1 = gen_new_label();
7710 7711 7712 7713
            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);
7714
            gen_set_label(label1);
B
bellard 已提交
7715
            if (mod != 3) {
7716
                gen_op_st_v(s, ot, t0, a0);
L
Laurent Desnogues 已提交
7717 7718
                tcg_temp_free(a0);
           } else {
7719
                gen_op_mov_reg_v(ot, rm, t0);
B
bellard 已提交
7720
            }
7721
            gen_compute_eflags(s);
7722
            tcg_gen_andi_tl(cpu_cc_src, cpu_cc_src, ~CC_Z);
7723 7724 7725 7726
            tcg_gen_or_tl(cpu_cc_src, cpu_cc_src, t2);
            tcg_temp_free(t0);
            tcg_temp_free(t1);
            tcg_temp_free(t2);
7727 7728
        }
        break;
B
bellard 已提交
7729 7730
    case 0x102: /* lar */
    case 0x103: /* lsl */
7731 7732
        {
            int label1;
7733
            TCGv t0;
7734 7735
            if (!s->pe || s->vm86)
                goto illegal_op;
7736
            ot = dflag ? MO_32 : MO_16;
7737
            modrm = cpu_ldub_code(env, s->pc++);
7738
            reg = ((modrm >> 3) & 7) | rex_r;
7739
            gen_ldst_modrm(env, s, modrm, MO_16, OR_TMP0, 0);
P
pbrook 已提交
7740
            t0 = tcg_temp_local_new();
7741
            gen_update_cc_op(s);
7742 7743 7744 7745 7746
            if (b == 0x102) {
                gen_helper_lar(t0, cpu_env, cpu_T[0]);
            } else {
                gen_helper_lsl(t0, cpu_env, cpu_T[0]);
            }
7747 7748
            tcg_gen_andi_tl(cpu_tmp0, cpu_cc_src, CC_Z);
            label1 = gen_new_label();
P
pbrook 已提交
7749
            tcg_gen_brcondi_tl(TCG_COND_EQ, cpu_tmp0, 0, label1);
7750
            gen_op_mov_reg_v(ot, reg, t0);
7751
            gen_set_label(label1);
7752
            set_cc_op(s, CC_OP_EFLAGS);
7753
            tcg_temp_free(t0);
7754
        }
B
bellard 已提交
7755 7756
        break;
    case 0x118:
7757
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7758 7759 7760 7761 7762 7763 7764 7765 7766
        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;
7767
            gen_lea_modrm(env, s, modrm);
B
bellard 已提交
7768 7769
            /* nothing more to do */
            break;
B
bellard 已提交
7770
        default: /* nop (multi byte) */
7771
            gen_nop_modrm(env, s, modrm);
B
bellard 已提交
7772
            break;
B
bellard 已提交
7773 7774
        }
        break;
B
bellard 已提交
7775
    case 0x119 ... 0x11f: /* nop (multi byte) */
7776 7777
        modrm = cpu_ldub_code(env, s->pc++);
        gen_nop_modrm(env, s, modrm);
B
bellard 已提交
7778
        break;
B
bellard 已提交
7779 7780 7781 7782 7783
    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 {
7784
            modrm = cpu_ldub_code(env, s->pc++);
7785 7786 7787 7788 7789
            /* 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 已提交
7790 7791 7792
            rm = (modrm & 7) | REX_B(s);
            reg = ((modrm >> 3) & 7) | rex_r;
            if (CODE64(s))
7793
                ot = MO_64;
B
bellard 已提交
7794
            else
7795
                ot = MO_32;
7796 7797 7798 7799
            if ((prefixes & PREFIX_LOCK) && (reg == 0) &&
                (s->cpuid_ext3_features & CPUID_EXT3_CR8LEG)) {
                reg = 8;
            }
B
bellard 已提交
7800 7801 7802 7803 7804
            switch(reg) {
            case 0:
            case 2:
            case 3:
            case 4:
B
bellard 已提交
7805
            case 8:
7806
                gen_update_cc_op(s);
B
bellard 已提交
7807
                gen_jmp_im(pc_start - s->cs_base);
B
bellard 已提交
7808
                if (b & 2) {
B
bellard 已提交
7809
                    gen_op_mov_TN_reg(ot, 0, rm);
B
Blue Swirl 已提交
7810 7811
                    gen_helper_write_crN(cpu_env, tcg_const_i32(reg),
                                         cpu_T[0]);
B
bellard 已提交
7812
                    gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
7813 7814
                    gen_eob(s);
                } else {
B
Blue Swirl 已提交
7815
                    gen_helper_read_crN(cpu_T[0], cpu_env, tcg_const_i32(reg));
B
bellard 已提交
7816
                    gen_op_mov_reg_T0(ot, rm);
B
bellard 已提交
7817 7818 7819 7820 7821 7822 7823 7824 7825 7826 7827 7828
                }
                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 {
7829
            modrm = cpu_ldub_code(env, s->pc++);
7830 7831 7832 7833 7834
            /* 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 已提交
7835 7836 7837
            rm = (modrm & 7) | REX_B(s);
            reg = ((modrm >> 3) & 7) | rex_r;
            if (CODE64(s))
7838
                ot = MO_64;
B
bellard 已提交
7839
            else
7840
                ot = MO_32;
B
bellard 已提交
7841
            /* XXX: do it dynamically with CR4.DE bit */
B
bellard 已提交
7842
            if (reg == 4 || reg == 5 || reg >= 8)
B
bellard 已提交
7843 7844
                goto illegal_op;
            if (b & 2) {
T
ths 已提交
7845
                gen_svm_check_intercept(s, pc_start, SVM_EXIT_WRITE_DR0 + reg);
B
bellard 已提交
7846
                gen_op_mov_TN_reg(ot, 0, rm);
B
Blue Swirl 已提交
7847
                gen_helper_movl_drN_T0(cpu_env, tcg_const_i32(reg), cpu_T[0]);
B
bellard 已提交
7848
                gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
7849 7850
                gen_eob(s);
            } else {
T
ths 已提交
7851
                gen_svm_check_intercept(s, pc_start, SVM_EXIT_READ_DR0 + reg);
B
bellard 已提交
7852
                tcg_gen_ld_tl(cpu_T[0], cpu_env, offsetof(CPUX86State,dr[reg]));
B
bellard 已提交
7853
                gen_op_mov_reg_T0(ot, rm);
B
bellard 已提交
7854 7855 7856 7857 7858 7859 7860
            }
        }
        break;
    case 0x106: /* clts */
        if (s->cpl != 0) {
            gen_exception(s, EXCP0D_GPF, pc_start - s->cs_base);
        } else {
T
ths 已提交
7861
            gen_svm_check_intercept(s, pc_start, SVM_EXIT_WRITE_CR0);
7862
            gen_helper_clts(cpu_env);
B
bellard 已提交
7863
            /* abort block because static cpu state changed */
B
bellard 已提交
7864
            gen_jmp_im(s->pc - s->cs_base);
B
bellard 已提交
7865
            gen_eob(s);
B
bellard 已提交
7866 7867
        }
        break;
B
balrog 已提交
7868
    /* MMX/3DNow!/SSE/SSE2/SSE3/SSSE3/SSE4 support */
B
bellard 已提交
7869 7870
    case 0x1c3: /* MOVNTI reg, mem */
        if (!(s->cpuid_features & CPUID_SSE2))
B
bellard 已提交
7871
            goto illegal_op;
7872
        ot = s->dflag == 2 ? MO_64 : MO_32;
7873
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7874 7875 7876 7877 7878
        mod = (modrm >> 6) & 3;
        if (mod == 3)
            goto illegal_op;
        reg = ((modrm >> 3) & 7) | rex_r;
        /* generate a generic store */
7879
        gen_ldst_modrm(env, s, modrm, ot, reg, 1);
B
bellard 已提交
7880
        break;
B
bellard 已提交
7881
    case 0x1ae:
7882
        modrm = cpu_ldub_code(env, s->pc++);
B
bellard 已提交
7883 7884 7885 7886
        mod = (modrm >> 6) & 3;
        op = (modrm >> 3) & 7;
        switch(op) {
        case 0: /* fxsave */
7887
            if (mod == 3 || !(s->cpuid_features & CPUID_FXSR) ||
7888
                (s->prefix & PREFIX_LOCK))
B
bellard 已提交
7889
                goto illegal_op;
7890
            if ((s->flags & HF_EM_MASK) || (s->flags & HF_TS_MASK)) {
B
bellard 已提交
7891 7892 7893
                gen_exception(s, EXCP07_PREX, pc_start - s->cs_base);
                break;
            }
7894
            gen_lea_modrm(env, s, modrm);
7895
            gen_update_cc_op(s);
B
bellard 已提交
7896
            gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
7897
            gen_helper_fxsave(cpu_env, cpu_A0, tcg_const_i32((s->dflag == 2)));
B
bellard 已提交
7898 7899
            break;
        case 1: /* fxrstor */
7900
            if (mod == 3 || !(s->cpuid_features & CPUID_FXSR) ||
7901
                (s->prefix & PREFIX_LOCK))
B
bellard 已提交
7902
                goto illegal_op;
7903
            if ((s->flags & HF_EM_MASK) || (s->flags & HF_TS_MASK)) {
B
bellard 已提交
7904 7905 7906
                gen_exception(s, EXCP07_PREX, pc_start - s->cs_base);
                break;
            }
7907
            gen_lea_modrm(env, s, modrm);
7908
            gen_update_cc_op(s);
B
bellard 已提交
7909
            gen_jmp_im(pc_start - s->cs_base);
B
Blue Swirl 已提交
7910 7911
            gen_helper_fxrstor(cpu_env, cpu_A0,
                               tcg_const_i32((s->dflag == 2)));
B
bellard 已提交
7912 7913 7914 7915 7916 7917
            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 已提交
7918
            }
B
bellard 已提交
7919 7920
            if ((s->flags & HF_EM_MASK) || !(s->flags & HF_OSFXSR_MASK) ||
                mod == 3)
B
bellard 已提交
7921
                goto illegal_op;
7922
            gen_lea_modrm(env, s, modrm);
B
bellard 已提交
7923
            if (op == 2) {
7924 7925
                tcg_gen_qemu_ld_i32(cpu_tmp2_i32, cpu_A0,
                                    s->mem_index, MO_LEUL);
B
Blue Swirl 已提交
7926
                gen_helper_ldmxcsr(cpu_env, cpu_tmp2_i32);
B
bellard 已提交
7927
            } else {
B
bellard 已提交
7928
                tcg_gen_ld32u_tl(cpu_T[0], cpu_env, offsetof(CPUX86State, mxcsr));
7929
                gen_op_st_v(s, MO_32, cpu_T[0], cpu_A0);
B
bellard 已提交
7930
            }
B
bellard 已提交
7931 7932 7933
            break;
        case 5: /* lfence */
        case 6: /* mfence */
7934
            if ((modrm & 0xc7) != 0xc0 || !(s->cpuid_features & CPUID_SSE2))
B
bellard 已提交
7935 7936
                goto illegal_op;
            break;
7937 7938 7939
        case 7: /* sfence / clflush */
            if ((modrm & 0xc7) == 0xc0) {
                /* sfence */
A
aurel32 已提交
7940
                /* XXX: also check for cpuid_ext2_features & CPUID_EXT2_EMMX */
7941 7942 7943 7944 7945 7946
                if (!(s->cpuid_features & CPUID_SSE))
                    goto illegal_op;
            } else {
                /* clflush */
                if (!(s->cpuid_features & CPUID_CLFLUSH))
                    goto illegal_op;
7947
                gen_lea_modrm(env, s, modrm);
7948 7949
            }
            break;
B
bellard 已提交
7950
        default:
B
bellard 已提交
7951 7952 7953
            goto illegal_op;
        }
        break;
A
aurel32 已提交
7954
    case 0x10d: /* 3DNow! prefetch(w) */
7955
        modrm = cpu_ldub_code(env, s->pc++);
A
aurel32 已提交
7956 7957 7958
        mod = (modrm >> 6) & 3;
        if (mod == 3)
            goto illegal_op;
7959
        gen_lea_modrm(env, s, modrm);
7960 7961
        /* ignore for now */
        break;
B
bellard 已提交
7962
    case 0x1aa: /* rsm */
B
bellard 已提交
7963
        gen_svm_check_intercept(s, pc_start, SVM_EXIT_RSM);
B
bellard 已提交
7964 7965
        if (!(s->flags & HF_SMM_MASK))
            goto illegal_op;
J
Jun Koi 已提交
7966
        gen_update_cc_op(s);
B
bellard 已提交
7967
        gen_jmp_im(s->pc - s->cs_base);
B
Blue Swirl 已提交
7968
        gen_helper_rsm(cpu_env);
B
bellard 已提交
7969 7970
        gen_eob(s);
        break;
B
balrog 已提交
7971 7972 7973 7974 7975 7976 7977
    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;

7978
        modrm = cpu_ldub_code(env, s->pc++);
M
malc 已提交
7979
        reg = ((modrm >> 3) & 7) | rex_r;
B
balrog 已提交
7980 7981

        if (s->prefix & PREFIX_DATA)
7982
            ot = MO_16;
B
balrog 已提交
7983
        else if (s->dflag != 2)
7984
            ot = MO_32;
B
balrog 已提交
7985
        else
7986
            ot = MO_64;
B
balrog 已提交
7987

7988
        gen_ldst_modrm(env, s, modrm, ot, OR_TMP0, 0);
B
Blue Swirl 已提交
7989
        gen_helper_popcnt(cpu_T[0], cpu_env, cpu_T[0], tcg_const_i32(ot));
B
balrog 已提交
7990
        gen_op_mov_reg_T0(ot, reg);
B
balrog 已提交
7991

7992
        set_cc_op(s, CC_OP_EFLAGS);
B
balrog 已提交
7993
        break;
A
aurel32 已提交
7994 7995 7996
    case 0x10e ... 0x10f:
        /* 3DNow! instructions, ignore prefixes */
        s->prefix &= ~(PREFIX_REPZ | PREFIX_REPNZ | PREFIX_DATA);
B
bellard 已提交
7997 7998
    case 0x110 ... 0x117:
    case 0x128 ... 0x12f:
B
balrog 已提交
7999
    case 0x138 ... 0x13a:
8000
    case 0x150 ... 0x179:
B
bellard 已提交
8001 8002 8003 8004
    case 0x17c ... 0x17f:
    case 0x1c2:
    case 0x1c4 ... 0x1c6:
    case 0x1d0 ... 0x1fe:
8005
        gen_sse(env, s, b, pc_start, rex_r);
B
bellard 已提交
8006
        break;
B
bellard 已提交
8007 8008 8009 8010 8011
    default:
        goto illegal_op;
    }
    /* lock generation */
    if (s->prefix & PREFIX_LOCK)
P
pbrook 已提交
8012
        gen_helper_unlock();
B
bellard 已提交
8013 8014
    return s->pc;
 illegal_op:
8015
    if (s->prefix & PREFIX_LOCK)
P
pbrook 已提交
8016
        gen_helper_unlock();
B
bellard 已提交
8017 8018 8019 8020 8021 8022 8023
    /* 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 已提交
8024 8025
    cpu_env = tcg_global_reg_new_ptr(TCG_AREG0, "env");
    cpu_cc_op = tcg_global_mem_new_i32(TCG_AREG0,
8026 8027
                                       offsetof(CPUX86State, cc_op), "cc_op");
    cpu_cc_dst = tcg_global_mem_new(TCG_AREG0, offsetof(CPUX86State, cc_dst),
P
pbrook 已提交
8028
                                    "cc_dst");
8029 8030
    cpu_cc_src = tcg_global_mem_new(TCG_AREG0, offsetof(CPUX86State, cc_src),
                                    "cc_src");
8031 8032
    cpu_cc_src2 = tcg_global_mem_new(TCG_AREG0, offsetof(CPUX86State, cc_src2),
                                     "cc_src2");
8033

8034 8035
#ifdef TARGET_X86_64
    cpu_regs[R_EAX] = tcg_global_mem_new_i64(TCG_AREG0,
8036
                                             offsetof(CPUX86State, regs[R_EAX]), "rax");
8037
    cpu_regs[R_ECX] = tcg_global_mem_new_i64(TCG_AREG0,
8038
                                             offsetof(CPUX86State, regs[R_ECX]), "rcx");
8039
    cpu_regs[R_EDX] = tcg_global_mem_new_i64(TCG_AREG0,
8040
                                             offsetof(CPUX86State, regs[R_EDX]), "rdx");
8041
    cpu_regs[R_EBX] = tcg_global_mem_new_i64(TCG_AREG0,
8042
                                             offsetof(CPUX86State, regs[R_EBX]), "rbx");
8043
    cpu_regs[R_ESP] = tcg_global_mem_new_i64(TCG_AREG0,
8044
                                             offsetof(CPUX86State, regs[R_ESP]), "rsp");
8045
    cpu_regs[R_EBP] = tcg_global_mem_new_i64(TCG_AREG0,
8046
                                             offsetof(CPUX86State, regs[R_EBP]), "rbp");
8047
    cpu_regs[R_ESI] = tcg_global_mem_new_i64(TCG_AREG0,
8048
                                             offsetof(CPUX86State, regs[R_ESI]), "rsi");
8049
    cpu_regs[R_EDI] = tcg_global_mem_new_i64(TCG_AREG0,
8050
                                             offsetof(CPUX86State, regs[R_EDI]), "rdi");
8051
    cpu_regs[8] = tcg_global_mem_new_i64(TCG_AREG0,
8052
                                         offsetof(CPUX86State, regs[8]), "r8");
8053
    cpu_regs[9] = tcg_global_mem_new_i64(TCG_AREG0,
8054
                                          offsetof(CPUX86State, regs[9]), "r9");
8055
    cpu_regs[10] = tcg_global_mem_new_i64(TCG_AREG0,
8056
                                          offsetof(CPUX86State, regs[10]), "r10");
8057
    cpu_regs[11] = tcg_global_mem_new_i64(TCG_AREG0,
8058
                                          offsetof(CPUX86State, regs[11]), "r11");
8059
    cpu_regs[12] = tcg_global_mem_new_i64(TCG_AREG0,
8060
                                          offsetof(CPUX86State, regs[12]), "r12");
8061
    cpu_regs[13] = tcg_global_mem_new_i64(TCG_AREG0,
8062
                                          offsetof(CPUX86State, regs[13]), "r13");
8063
    cpu_regs[14] = tcg_global_mem_new_i64(TCG_AREG0,
8064
                                          offsetof(CPUX86State, regs[14]), "r14");
8065
    cpu_regs[15] = tcg_global_mem_new_i64(TCG_AREG0,
8066
                                          offsetof(CPUX86State, regs[15]), "r15");
8067 8068
#else
    cpu_regs[R_EAX] = tcg_global_mem_new_i32(TCG_AREG0,
8069
                                             offsetof(CPUX86State, regs[R_EAX]), "eax");
8070
    cpu_regs[R_ECX] = tcg_global_mem_new_i32(TCG_AREG0,
8071
                                             offsetof(CPUX86State, regs[R_ECX]), "ecx");
8072
    cpu_regs[R_EDX] = tcg_global_mem_new_i32(TCG_AREG0,
8073
                                             offsetof(CPUX86State, regs[R_EDX]), "edx");
8074
    cpu_regs[R_EBX] = tcg_global_mem_new_i32(TCG_AREG0,
8075
                                             offsetof(CPUX86State, regs[R_EBX]), "ebx");
8076
    cpu_regs[R_ESP] = tcg_global_mem_new_i32(TCG_AREG0,
8077
                                             offsetof(CPUX86State, regs[R_ESP]), "esp");
8078
    cpu_regs[R_EBP] = tcg_global_mem_new_i32(TCG_AREG0,
8079
                                             offsetof(CPUX86State, regs[R_EBP]), "ebp");
8080
    cpu_regs[R_ESI] = tcg_global_mem_new_i32(TCG_AREG0,
8081
                                             offsetof(CPUX86State, regs[R_ESI]), "esi");
8082
    cpu_regs[R_EDI] = tcg_global_mem_new_i32(TCG_AREG0,
8083
                                             offsetof(CPUX86State, regs[R_EDI]), "edi");
8084
#endif
B
bellard 已提交
8085 8086 8087 8088 8089
}

/* 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. */
8090
static inline void gen_intermediate_code_internal(X86CPU *cpu,
8091
                                                  TranslationBlock *tb,
8092
                                                  bool search_pc)
B
bellard 已提交
8093
{
8094
    CPUState *cs = CPU(cpu);
8095
    CPUX86State *env = &cpu->env;
B
bellard 已提交
8096
    DisasContext dc1, *dc = &dc1;
B
bellard 已提交
8097
    target_ulong pc_ptr;
B
bellard 已提交
8098
    uint16_t *gen_opc_end;
8099
    CPUBreakpoint *bp;
8100
    int j, lj;
8101
    uint64_t flags;
B
bellard 已提交
8102 8103
    target_ulong pc_start;
    target_ulong cs_base;
P
pbrook 已提交
8104 8105
    int num_insns;
    int max_insns;
8106

B
bellard 已提交
8107
    /* generate intermediate code */
B
bellard 已提交
8108 8109
    pc_start = tb->pc;
    cs_base = tb->cs_base;
B
bellard 已提交
8110
    flags = tb->flags;
B
bellard 已提交
8111

8112
    dc->pe = (flags >> HF_PE_SHIFT) & 1;
B
bellard 已提交
8113 8114 8115 8116 8117 8118 8119 8120
    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;
8121
    dc->singlestep_enabled = cs->singlestep_enabled;
B
bellard 已提交
8122
    dc->cc_op = CC_OP_DYNAMIC;
8123
    dc->cc_op_dirty = false;
B
bellard 已提交
8124 8125 8126 8127 8128 8129
    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) {
8130
        dc->mem_index = cpu_mmu_index(env);
B
bellard 已提交
8131
    }
8132 8133 8134 8135 8136
    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 已提交
8137 8138 8139 8140
#ifdef TARGET_X86_64
    dc->lma = (flags >> HF_LMA_SHIFT) & 1;
    dc->code64 = (flags >> HF_CS64_SHIFT) & 1;
#endif
B
bellard 已提交
8141
    dc->flags = flags;
8142
    dc->jmp_opt = !(dc->tf || cs->singlestep_enabled ||
8143
                    (flags & HF_INHIBIT_IRQ_MASK)
B
bellard 已提交
8144
#ifndef CONFIG_SOFTMMU
B
bellard 已提交
8145 8146 8147
                    || (flags & HF_SOFTMMU_MASK)
#endif
                    );
8148 8149
#if 0
    /* check addseg logic */
B
bellard 已提交
8150
    if (!dc->addseg && (dc->vm86 || !dc->pe || !dc->code32))
8151 8152 8153
        printf("ERROR addseg\n");
#endif

P
pbrook 已提交
8154 8155 8156 8157 8158 8159 8160 8161 8162 8163 8164
    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();
8165
    cpu_cc_srcT = tcg_temp_local_new();
B
bellard 已提交
8166

8167
    gen_opc_end = tcg_ctx.gen_opc_buf + OPC_MAX_SIZE;
B
bellard 已提交
8168 8169 8170 8171

    dc->is_jmp = DISAS_NEXT;
    pc_ptr = pc_start;
    lj = -1;
P
pbrook 已提交
8172 8173 8174 8175
    num_insns = 0;
    max_insns = tb->cflags & CF_COUNT_MASK;
    if (max_insns == 0)
        max_insns = CF_COUNT_MASK;
B
bellard 已提交
8176

8177
    gen_tb_start();
B
bellard 已提交
8178
    for(;;) {
B
Blue Swirl 已提交
8179 8180
        if (unlikely(!QTAILQ_EMPTY(&env->breakpoints))) {
            QTAILQ_FOREACH(bp, &env->breakpoints, entry) {
J
Jan Kiszka 已提交
8181 8182
                if (bp->pc == pc_ptr &&
                    !((bp->flags & BP_CPU) && (tb->flags & HF_RF_MASK))) {
B
bellard 已提交
8183 8184 8185 8186 8187 8188
                    gen_debug(dc, pc_ptr - dc->cs_base);
                    break;
                }
            }
        }
        if (search_pc) {
8189
            j = tcg_ctx.gen_opc_ptr - tcg_ctx.gen_opc_buf;
B
bellard 已提交
8190 8191 8192
            if (lj < j) {
                lj++;
                while (lj < j)
8193
                    tcg_ctx.gen_opc_instr_start[lj++] = 0;
B
bellard 已提交
8194
            }
8195
            tcg_ctx.gen_opc_pc[lj] = pc_ptr;
B
bellard 已提交
8196
            gen_opc_cc_op[lj] = dc->cc_op;
8197
            tcg_ctx.gen_opc_instr_start[lj] = 1;
8198
            tcg_ctx.gen_opc_icount[lj] = num_insns;
B
bellard 已提交
8199
        }
P
pbrook 已提交
8200 8201 8202
        if (num_insns + 1 == max_insns && (tb->cflags & CF_LAST_IO))
            gen_io_start();

8203
        pc_ptr = disas_insn(env, dc, pc_ptr);
P
pbrook 已提交
8204
        num_insns++;
B
bellard 已提交
8205 8206 8207 8208 8209
        /* stop translation if indicated */
        if (dc->is_jmp)
            break;
        /* if single step mode, we generate only one instruction and
           generate an exception */
8210 8211 8212
        /* 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 */
8213
        if (dc->tf || dc->singlestep_enabled ||
P
pbrook 已提交
8214
            (flags & HF_INHIBIT_IRQ_MASK)) {
B
bellard 已提交
8215
            gen_jmp_im(pc_ptr - dc->cs_base);
B
bellard 已提交
8216 8217 8218 8219
            gen_eob(dc);
            break;
        }
        /* if too long translation, stop generation too */
8220
        if (tcg_ctx.gen_opc_ptr >= gen_opc_end ||
P
pbrook 已提交
8221 8222
            (pc_ptr - pc_start) >= (TARGET_PAGE_SIZE - 32) ||
            num_insns >= max_insns) {
B
bellard 已提交
8223
            gen_jmp_im(pc_ptr - dc->cs_base);
B
bellard 已提交
8224 8225 8226
            gen_eob(dc);
            break;
        }
8227 8228 8229 8230 8231
        if (singlestep) {
            gen_jmp_im(pc_ptr - dc->cs_base);
            gen_eob(dc);
            break;
        }
B
bellard 已提交
8232
    }
P
pbrook 已提交
8233 8234
    if (tb->cflags & CF_LAST_IO)
        gen_io_end();
8235
    gen_tb_end(tb, num_insns);
8236
    *tcg_ctx.gen_opc_ptr = INDEX_op_end;
B
bellard 已提交
8237 8238
    /* we don't forget to fill the last values */
    if (search_pc) {
8239
        j = tcg_ctx.gen_opc_ptr - tcg_ctx.gen_opc_buf;
B
bellard 已提交
8240 8241
        lj++;
        while (lj <= j)
8242
            tcg_ctx.gen_opc_instr_start[lj++] = 0;
B
bellard 已提交
8243
    }
8244

B
bellard 已提交
8245
#ifdef DEBUG_DISAS
8246
    if (qemu_loglevel_mask(CPU_LOG_TB_IN_ASM)) {
B
bellard 已提交
8247
        int disas_flags;
8248 8249
        qemu_log("----------------\n");
        qemu_log("IN: %s\n", lookup_symbol(pc_start));
B
bellard 已提交
8250 8251 8252 8253 8254 8255
#ifdef TARGET_X86_64
        if (dc->code64)
            disas_flags = 2;
        else
#endif
            disas_flags = !dc->code32;
B
Blue Swirl 已提交
8256
        log_target_disas(env, pc_start, pc_ptr - pc_start, disas_flags);
8257
        qemu_log("\n");
B
bellard 已提交
8258 8259 8260
    }
#endif

P
pbrook 已提交
8261
    if (!search_pc) {
B
bellard 已提交
8262
        tb->size = pc_ptr - pc_start;
P
pbrook 已提交
8263 8264
        tb->icount = num_insns;
    }
B
bellard 已提交
8265 8266
}

8267
void gen_intermediate_code(CPUX86State *env, TranslationBlock *tb)
B
bellard 已提交
8268
{
8269
    gen_intermediate_code_internal(x86_env_get_cpu(env), tb, false);
B
bellard 已提交
8270 8271
}

8272
void gen_intermediate_code_pc(CPUX86State *env, TranslationBlock *tb)
B
bellard 已提交
8273
{
8274
    gen_intermediate_code_internal(x86_env_get_cpu(env), tb, true);
B
bellard 已提交
8275 8276
}

8277
void restore_state_to_opc(CPUX86State *env, TranslationBlock *tb, int pc_pos)
A
aurel32 已提交
8278 8279 8280
{
    int cc_op;
#ifdef DEBUG_DISAS
8281
    if (qemu_loglevel_mask(CPU_LOG_TB_OP)) {
A
aurel32 已提交
8282
        int i;
8283
        qemu_log("RESTORE:\n");
A
aurel32 已提交
8284
        for(i = 0;i <= pc_pos; i++) {
8285
            if (tcg_ctx.gen_opc_instr_start[i]) {
8286 8287
                qemu_log("0x%04x: " TARGET_FMT_lx "\n", i,
                        tcg_ctx.gen_opc_pc[i]);
A
aurel32 已提交
8288 8289
            }
        }
8290
        qemu_log("pc_pos=0x%x eip=" TARGET_FMT_lx " cs_base=%x\n",
8291
                pc_pos, tcg_ctx.gen_opc_pc[pc_pos] - tb->cs_base,
A
aurel32 已提交
8292 8293 8294
                (uint32_t)tb->cs_base);
    }
#endif
8295
    env->eip = tcg_ctx.gen_opc_pc[pc_pos] - tb->cs_base;
A
aurel32 已提交
8296 8297 8298 8299
    cc_op = gen_opc_cc_op[pc_pos];
    if (cc_op != CC_OP_DYNAMIC)
        env->cc_op = cc_op;
}