tcg.h 27.8 KB
Newer Older
B
bellard 已提交
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23
/*
 * Tiny Code Generator for QEMU
 *
 * Copyright (c) 2008 Fabrice Bellard
 *
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 * of this software and associated documentation files (the "Software"), to deal
 * in the Software without restriction, including without limitation the rights
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 * copies of the Software, and to permit persons to whom the Software is
 * furnished to do so, subject to the following conditions:
 *
 * The above copyright notice and this permission notice shall be included in
 * all copies or substantial portions of the Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 * THE SOFTWARE.
 */
R
Richard Henderson 已提交
24 25 26 27

#ifndef TCG_H
#define TCG_H

28
#include "qemu-common.h"
29
#include "qemu/bitops.h"
30 31 32 33 34 35 36 37 38 39 40
#include "tcg-target.h"

/* Default target word size to pointer size.  */
#ifndef TCG_TARGET_REG_BITS
# if UINTPTR_MAX == UINT32_MAX
#  define TCG_TARGET_REG_BITS 32
# elif UINTPTR_MAX == UINT64_MAX
#  define TCG_TARGET_REG_BITS 64
# else
#  error Unknown pointer size for tcg target
# endif
41 42
#endif

B
bellard 已提交
43 44 45 46 47 48 49 50 51 52 53 54 55 56
#if TCG_TARGET_REG_BITS == 32
typedef int32_t tcg_target_long;
typedef uint32_t tcg_target_ulong;
#define TCG_PRIlx PRIx32
#define TCG_PRIld PRId32
#elif TCG_TARGET_REG_BITS == 64
typedef int64_t tcg_target_long;
typedef uint64_t tcg_target_ulong;
#define TCG_PRIlx PRIx64
#define TCG_PRIld PRId64
#else
#error unsupported
#endif

57 58
#include "tcg-runtime.h"

B
bellard 已提交
59 60 61 62 63 64 65 66
#if TCG_TARGET_NB_REGS <= 32
typedef uint32_t TCGRegSet;
#elif TCG_TARGET_NB_REGS <= 64
typedef uint64_t TCGRegSet;
#else
#error unsupported
#endif

67
#if TCG_TARGET_REG_BITS == 32
68
/* Turn some undef macros into false macros.  */
69
#define TCG_TARGET_HAS_div_i64          0
70
#define TCG_TARGET_HAS_rem_i64          0
71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89
#define TCG_TARGET_HAS_div2_i64         0
#define TCG_TARGET_HAS_rot_i64          0
#define TCG_TARGET_HAS_ext8s_i64        0
#define TCG_TARGET_HAS_ext16s_i64       0
#define TCG_TARGET_HAS_ext32s_i64       0
#define TCG_TARGET_HAS_ext8u_i64        0
#define TCG_TARGET_HAS_ext16u_i64       0
#define TCG_TARGET_HAS_ext32u_i64       0
#define TCG_TARGET_HAS_bswap16_i64      0
#define TCG_TARGET_HAS_bswap32_i64      0
#define TCG_TARGET_HAS_bswap64_i64      0
#define TCG_TARGET_HAS_neg_i64          0
#define TCG_TARGET_HAS_not_i64          0
#define TCG_TARGET_HAS_andc_i64         0
#define TCG_TARGET_HAS_orc_i64          0
#define TCG_TARGET_HAS_eqv_i64          0
#define TCG_TARGET_HAS_nand_i64         0
#define TCG_TARGET_HAS_nor_i64          0
#define TCG_TARGET_HAS_deposit_i64      0
R
Richard Henderson 已提交
90
#define TCG_TARGET_HAS_movcond_i64      0
91 92 93
#define TCG_TARGET_HAS_add2_i64         0
#define TCG_TARGET_HAS_sub2_i64         0
#define TCG_TARGET_HAS_mulu2_i64        0
94
#define TCG_TARGET_HAS_muls2_i64        0
95 96
#define TCG_TARGET_HAS_muluh_i64        0
#define TCG_TARGET_HAS_mulsh_i64        0
97 98 99 100
/* Turn some undef macros into true macros.  */
#define TCG_TARGET_HAS_add2_i32         1
#define TCG_TARGET_HAS_sub2_i32         1
#define TCG_TARGET_HAS_mulu2_i32        1
101 102
#endif

103 104 105 106 107 108 109
#ifndef TCG_TARGET_deposit_i32_valid
#define TCG_TARGET_deposit_i32_valid(ofs, len) 1
#endif
#ifndef TCG_TARGET_deposit_i64_valid
#define TCG_TARGET_deposit_i64_valid(ofs, len) 1
#endif

110 111 112 113 114
/* Only one of DIV or DIV2 should be defined.  */
#if defined(TCG_TARGET_HAS_div_i32)
#define TCG_TARGET_HAS_div2_i32         0
#elif defined(TCG_TARGET_HAS_div2_i32)
#define TCG_TARGET_HAS_div_i32          0
115
#define TCG_TARGET_HAS_rem_i32          0
116 117 118 119 120
#endif
#if defined(TCG_TARGET_HAS_div_i64)
#define TCG_TARGET_HAS_div2_i64         0
#elif defined(TCG_TARGET_HAS_div2_i64)
#define TCG_TARGET_HAS_div_i64          0
121
#define TCG_TARGET_HAS_rem_i64          0
122 123
#endif

124
typedef enum TCGOpcode {
125
#define DEF(name, oargs, iargs, cargs, flags) INDEX_op_ ## name,
B
bellard 已提交
126 127 128
#include "tcg-opc.h"
#undef DEF
    NB_OPS,
129
} TCGOpcode;
B
bellard 已提交
130 131 132 133

#define tcg_regset_clear(d) (d) = 0
#define tcg_regset_set(d, s) (d) = (s)
#define tcg_regset_set32(d, reg, val32) (d) |= (val32) << (reg)
134 135
#define tcg_regset_set_reg(d, r) (d) |= 1L << (r)
#define tcg_regset_reset_reg(d, r) (d) &= ~(1L << (r))
B
bellard 已提交
136 137 138 139 140 141 142 143 144 145
#define tcg_regset_test_reg(d, r) (((d) >> (r)) & 1)
#define tcg_regset_or(d, a, b) (d) = (a) | (b)
#define tcg_regset_and(d, a, b) (d) = (a) & (b)
#define tcg_regset_andnot(d, a, b) (d) = (a) & ~(b)
#define tcg_regset_not(d, a) (d) = ~(a)

typedef struct TCGRelocation {
    struct TCGRelocation *next;
    int type;
    uint8_t *ptr;
146
    intptr_t addend;
B
bellard 已提交
147 148 149
} TCGRelocation; 

typedef struct TCGLabel {
150
    int has_value;
B
bellard 已提交
151
    union {
152
        uintptr_t value;
B
bellard 已提交
153 154 155 156 157 158
        TCGRelocation *first_reloc;
    } u;
} TCGLabel;

typedef struct TCGPool {
    struct TCGPool *next;
159 160
    int size;
    uint8_t data[0] __attribute__ ((aligned));
B
bellard 已提交
161 162 163 164 165 166
} TCGPool;

#define TCG_POOL_CHUNK_SIZE 32768

#define TCG_MAX_LABELS 512

B
blueswir1 已提交
167
#define TCG_MAX_TEMPS 512
B
bellard 已提交
168

169 170 171 172
/* when the size of the arguments of a called function is smaller than
   this value, they are statically allocated in the TB stack frame */
#define TCG_STATIC_CALL_ARGS_SIZE 128

173 174 175 176
typedef enum TCGType {
    TCG_TYPE_I32,
    TCG_TYPE_I64,
    TCG_TYPE_COUNT, /* number of different types */
B
bellard 已提交
177

178
    /* An alias for the size of the host register.  */
B
bellard 已提交
179
#if TCG_TARGET_REG_BITS == 32
180
    TCG_TYPE_REG = TCG_TYPE_I32,
181
#else
182
    TCG_TYPE_REG = TCG_TYPE_I64,
183
#endif
184

185 186 187 188 189 190
    /* An alias for the size of the native pointer.  */
#if UINTPTR_MAX == UINT32_MAX
    TCG_TYPE_PTR = TCG_TYPE_I32,
#else
    TCG_TYPE_PTR = TCG_TYPE_I64,
#endif
191 192

    /* An alias for the size of the target "long", aka register.  */
193 194
#if TARGET_LONG_BITS == 64
    TCG_TYPE_TL = TCG_TYPE_I64,
B
bellard 已提交
195
#else
196
    TCG_TYPE_TL = TCG_TYPE_I32,
B
bellard 已提交
197
#endif
198
} TCGType;
B
bellard 已提交
199

R
Richard Henderson 已提交
200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253
/* Constants for qemu_ld and qemu_st for the Memory Operation field.  */
typedef enum TCGMemOp {
    MO_8     = 0,
    MO_16    = 1,
    MO_32    = 2,
    MO_64    = 3,
    MO_SIZE  = 3,   /* Mask for the above.  */

    MO_SIGN  = 4,   /* Sign-extended, otherwise zero-extended.  */

    MO_BSWAP = 8,   /* Host reverse endian.  */
#ifdef HOST_WORDS_BIGENDIAN
    MO_LE    = MO_BSWAP,
    MO_BE    = 0,
#else
    MO_LE    = 0,
    MO_BE    = MO_BSWAP,
#endif
#ifdef TARGET_WORDS_BIGENDIAN
    MO_TE    = MO_BE,
#else
    MO_TE    = MO_LE,
#endif

    /* Combinations of the above, for ease of use.  */
    MO_UB    = MO_8,
    MO_UW    = MO_16,
    MO_UL    = MO_32,
    MO_SB    = MO_SIGN | MO_8,
    MO_SW    = MO_SIGN | MO_16,
    MO_SL    = MO_SIGN | MO_32,
    MO_Q     = MO_64,

    MO_LEUW  = MO_LE | MO_UW,
    MO_LEUL  = MO_LE | MO_UL,
    MO_LESW  = MO_LE | MO_SW,
    MO_LESL  = MO_LE | MO_SL,
    MO_LEQ   = MO_LE | MO_Q,

    MO_BEUW  = MO_BE | MO_UW,
    MO_BEUL  = MO_BE | MO_UL,
    MO_BESW  = MO_BE | MO_SW,
    MO_BESL  = MO_BE | MO_SL,
    MO_BEQ   = MO_BE | MO_Q,

    MO_TEUW  = MO_TE | MO_UW,
    MO_TEUL  = MO_TE | MO_UL,
    MO_TESW  = MO_TE | MO_SW,
    MO_TESL  = MO_TE | MO_SL,
    MO_TEQ   = MO_TE | MO_Q,

    MO_SSIZE = MO_SIZE | MO_SIGN,
} TCGMemOp;

B
bellard 已提交
254 255
typedef tcg_target_ulong TCGArg;

256
/* Define a type and accessor macros for variables.  Using a struct is
P
pbrook 已提交
257 258
   nice because it gives some level of type safely.  Ideally the compiler
   be able to see through all this.  However in practice this is not true,
D
Dong Xu Wang 已提交
259
   especially on targets with braindamaged ABIs (e.g. i386).
P
pbrook 已提交
260 261
   We use plain int by default to avoid this runtime overhead.
   Users of tcg_gen_* don't need to know about any of this, and should
P
pbrook 已提交
262
   treat TCGv as an opaque type.
263
   In addition we do typechecking for different types of variables.  TCGv_i32
P
pbrook 已提交
264 265 266
   and TCGv_i64 are 32/64-bit variables respectively.  TCGv and TCGv_ptr
   are aliases for target_ulong and host pointer sized values respectively.
 */
P
pbrook 已提交
267

268
#ifdef CONFIG_DEBUG_TCG
269 270
#define DEBUG_TCGV 1
#endif
P
pbrook 已提交
271 272 273 274 275

#ifdef DEBUG_TCGV

typedef struct
{
B
blueswir1 已提交
276
    int i32;
P
pbrook 已提交
277
} TCGv_i32;
P
pbrook 已提交
278

P
pbrook 已提交
279 280
typedef struct
{
B
blueswir1 已提交
281
    int i64;
P
pbrook 已提交
282 283
} TCGv_i64;

284 285 286 287
typedef struct {
    int iptr;
} TCGv_ptr;

P
pbrook 已提交
288 289 290 291
#define MAKE_TCGV_I32(i) __extension__                  \
    ({ TCGv_i32 make_tcgv_tmp = {i}; make_tcgv_tmp;})
#define MAKE_TCGV_I64(i) __extension__                  \
    ({ TCGv_i64 make_tcgv_tmp = {i}; make_tcgv_tmp;})
292 293
#define MAKE_TCGV_PTR(i) __extension__                  \
    ({ TCGv_ptr make_tcgv_tmp = {i}; make_tcgv_tmp; })
B
blueswir1 已提交
294 295
#define GET_TCGV_I32(t) ((t).i32)
#define GET_TCGV_I64(t) ((t).i64)
296
#define GET_TCGV_PTR(t) ((t).iptr)
P
pbrook 已提交
297
#if TCG_TARGET_REG_BITS == 32
P
pbrook 已提交
298 299
#define TCGV_LOW(t) MAKE_TCGV_I32(GET_TCGV_I64(t))
#define TCGV_HIGH(t) MAKE_TCGV_I32(GET_TCGV_I64(t) + 1)
P
pbrook 已提交
300 301 302 303
#endif

#else /* !DEBUG_TCGV */

P
pbrook 已提交
304 305
typedef int TCGv_i32;
typedef int TCGv_i64;
306 307 308 309 310
#if TCG_TARGET_REG_BITS == 32
#define TCGv_ptr TCGv_i32
#else
#define TCGv_ptr TCGv_i64
#endif
P
pbrook 已提交
311 312
#define MAKE_TCGV_I32(x) (x)
#define MAKE_TCGV_I64(x) (x)
313
#define MAKE_TCGV_PTR(x) (x)
P
pbrook 已提交
314 315
#define GET_TCGV_I32(t) (t)
#define GET_TCGV_I64(t) (t)
316
#define GET_TCGV_PTR(t) (t)
A
aurel32 已提交
317

P
pbrook 已提交
318
#if TCG_TARGET_REG_BITS == 32
P
pbrook 已提交
319
#define TCGV_LOW(t) (t)
P
pbrook 已提交
320 321 322 323 324
#define TCGV_HIGH(t) ((t) + 1)
#endif

#endif /* DEBUG_TCGV */

A
aurel32 已提交
325 326 327
#define TCGV_EQUAL_I32(a, b) (GET_TCGV_I32(a) == GET_TCGV_I32(b))
#define TCGV_EQUAL_I64(a, b) (GET_TCGV_I64(a) == GET_TCGV_I64(b))

P
pbrook 已提交
328
/* Dummy definition to avoid compiler warnings.  */
P
pbrook 已提交
329 330
#define TCGV_UNUSED_I32(x) x = MAKE_TCGV_I32(-1)
#define TCGV_UNUSED_I64(x) x = MAKE_TCGV_I64(-1)
P
pbrook 已提交
331

R
Richard Henderson 已提交
332 333 334
#define TCGV_IS_UNUSED_I32(x) (GET_TCGV_I32(x) == -1)
#define TCGV_IS_UNUSED_I64(x) (GET_TCGV_I64(x) == -1)

B
bellard 已提交
335
/* call flags */
A
Aurelien Jarno 已提交
336 337 338 339 340 341 342 343 344 345 346 347 348 349 350
/* Helper does not read globals (either directly or through an exception). It
   implies TCG_CALL_NO_WRITE_GLOBALS. */
#define TCG_CALL_NO_READ_GLOBALS    0x0010
/* Helper does not write globals */
#define TCG_CALL_NO_WRITE_GLOBALS   0x0020
/* Helper can be safely suppressed if the return value is not used. */
#define TCG_CALL_NO_SIDE_EFFECTS    0x0040

/* convenience version of most used call flags */
#define TCG_CALL_NO_RWG         TCG_CALL_NO_READ_GLOBALS
#define TCG_CALL_NO_WG          TCG_CALL_NO_WRITE_GLOBALS
#define TCG_CALL_NO_SE          TCG_CALL_NO_SIDE_EFFECTS
#define TCG_CALL_NO_RWG_SE      (TCG_CALL_NO_RWG | TCG_CALL_NO_SE)
#define TCG_CALL_NO_WG_SE       (TCG_CALL_NO_WG | TCG_CALL_NO_SE)

B
bellard 已提交
351
/* used to align parameters */
P
pbrook 已提交
352
#define TCG_CALL_DUMMY_TCGV     MAKE_TCGV_I32(-1)
B
bellard 已提交
353 354
#define TCG_CALL_DUMMY_ARG      ((TCGArg)(-1))

355 356
/* Conditions.  Note that these are laid out for easy manipulation by
   the functions below:
357 358 359 360
     bit 0 is used for inverting;
     bit 1 is signed,
     bit 2 is unsigned,
     bit 3 is used with bit 0 for swapping signed/unsigned.  */
B
bellard 已提交
361
typedef enum {
362 363 364 365 366 367 368 369 370 371
    /* non-signed */
    TCG_COND_NEVER  = 0 | 0 | 0 | 0,
    TCG_COND_ALWAYS = 0 | 0 | 0 | 1,
    TCG_COND_EQ     = 8 | 0 | 0 | 0,
    TCG_COND_NE     = 8 | 0 | 0 | 1,
    /* signed */
    TCG_COND_LT     = 0 | 0 | 2 | 0,
    TCG_COND_GE     = 0 | 0 | 2 | 1,
    TCG_COND_LE     = 8 | 0 | 2 | 0,
    TCG_COND_GT     = 8 | 0 | 2 | 1,
B
bellard 已提交
372
    /* unsigned */
373 374 375 376
    TCG_COND_LTU    = 0 | 4 | 0 | 0,
    TCG_COND_GEU    = 0 | 4 | 0 | 1,
    TCG_COND_LEU    = 8 | 4 | 0 | 0,
    TCG_COND_GTU    = 8 | 4 | 0 | 1,
B
bellard 已提交
377 378
} TCGCond;

R
Richard Henderson 已提交
379
/* Invert the sense of the comparison.  */
R
Richard Henderson 已提交
380 381 382 383 384
static inline TCGCond tcg_invert_cond(TCGCond c)
{
    return (TCGCond)(c ^ 1);
}

R
Richard Henderson 已提交
385 386 387
/* Swap the operands in a comparison.  */
static inline TCGCond tcg_swap_cond(TCGCond c)
{
388
    return c & 6 ? (TCGCond)(c ^ 9) : c;
R
Richard Henderson 已提交
389 390
}

R
Richard Henderson 已提交
391
/* Create an "unsigned" version of a "signed" comparison.  */
R
Richard Henderson 已提交
392 393
static inline TCGCond tcg_unsigned_cond(TCGCond c)
{
394
    return c & 2 ? (TCGCond)(c ^ 6) : c;
R
Richard Henderson 已提交
395 396
}

R
Richard Henderson 已提交
397
/* Must a comparison be considered unsigned?  */
R
Richard Henderson 已提交
398 399
static inline bool is_unsigned_cond(TCGCond c)
{
400
    return (c & 4) != 0;
R
Richard Henderson 已提交
401 402
}

R
Richard Henderson 已提交
403 404 405 406 407 408 409 410 411 412 413 414 415 416 417
/* Create a "high" version of a double-word comparison.
   This removes equality from a LTE or GTE comparison.  */
static inline TCGCond tcg_high_cond(TCGCond c)
{
    switch (c) {
    case TCG_COND_GE:
    case TCG_COND_LE:
    case TCG_COND_GEU:
    case TCG_COND_LEU:
        return (TCGCond)(c ^ 8);
    default:
        return c;
    }
}

B
bellard 已提交
418 419 420 421 422 423 424 425 426 427 428 429 430
#define TEMP_VAL_DEAD  0
#define TEMP_VAL_REG   1
#define TEMP_VAL_MEM   2
#define TEMP_VAL_CONST 3

/* XXX: optimize memory layout */
typedef struct TCGTemp {
    TCGType base_type;
    TCGType type;
    int val_type;
    int reg;
    tcg_target_long val;
    int mem_reg;
431
    intptr_t mem_offset;
B
bellard 已提交
432 433 434
    unsigned int fixed_reg:1;
    unsigned int mem_coherent:1;
    unsigned int mem_allocated:1;
435
    unsigned int temp_local:1; /* If true, the temp is saved across
B
bellard 已提交
436
                                  basic blocks. Otherwise, it is not
437
                                  preserved across basic blocks. */
438
    unsigned int temp_allocated:1; /* never used for code gen */
B
bellard 已提交
439 440 441 442 443
    const char *name;
} TCGTemp;

typedef struct TCGContext TCGContext;

444 445 446 447
typedef struct TCGTempSet {
    unsigned long l[BITS_TO_LONGS(TCG_MAX_TEMPS)];
} TCGTempSet;

B
bellard 已提交
448 449
struct TCGContext {
    uint8_t *pool_cur, *pool_end;
450
    TCGPool *pool_first, *pool_current, *pool_first_large;
B
bellard 已提交
451 452 453 454 455 456 457
    TCGLabel *labels;
    int nb_labels;
    int nb_globals;
    int nb_temps;

    /* goto_tb support */
    uint8_t *code_buf;
R
Richard Henderson 已提交
458
    uintptr_t *tb_next;
B
bellard 已提交
459 460 461
    uint16_t *tb_next_offset;
    uint16_t *tb_jmp_offset; /* != NULL if USE_DIRECT_JUMP */

B
bellard 已提交
462
    /* liveness analysis */
463 464
    uint16_t *op_dead_args; /* for each operation, each bit tells if the
                               corresponding argument is dead */
465 466 467
    uint8_t *op_sync_args;  /* for each operation, each bit tells if the
                               corresponding output argument needs to be
                               sync to memory. */
B
bellard 已提交
468
    
B
bellard 已提交
469 470 471 472
    /* tells in which temporary a given register is. It does not take
       into account fixed registers */
    int reg_to_temp[TCG_TARGET_NB_REGS];
    TCGRegSet reserved_regs;
473 474 475
    intptr_t current_frame_offset;
    intptr_t frame_start;
    intptr_t frame_end;
B
bellard 已提交
476 477 478
    int frame_reg;

    uint8_t *code_ptr;
479
    TCGTemp temps[TCG_MAX_TEMPS]; /* globals first, temps after */
480
    TCGTempSet free_temps[TCG_TYPE_COUNT * 2];
B
bellard 已提交
481

482
    GHashTable *helpers;
B
bellard 已提交
483 484 485 486 487 488 489 490 491 492 493 494 495 496 497

#ifdef CONFIG_PROFILER
    /* profiling info */
    int64_t tb_count1;
    int64_t tb_count;
    int64_t op_count; /* total insn count */
    int op_count_max; /* max insn per TB */
    int64_t temp_count;
    int temp_count_max;
    int64_t del_op_count;
    int64_t code_in_len;
    int64_t code_out_len;
    int64_t interm_time;
    int64_t code_time;
    int64_t la_time;
A
Aurelien Jarno 已提交
498
    int64_t opt_time;
B
bellard 已提交
499 500 501
    int64_t restore_count;
    int64_t restore_time;
#endif
502 503 504

#ifdef CONFIG_DEBUG_TCG
    int temps_in_use;
505
    int goto_tb_issue_mask;
506
#endif
507

508 509 510 511 512
    uint16_t gen_opc_buf[OPC_BUF_SIZE];
    TCGArg gen_opparam_buf[OPPARAM_BUF_SIZE];

    uint16_t *gen_opc_ptr;
    TCGArg *gen_opparam_ptr;
513 514 515
    target_ulong gen_opc_pc[OPC_BUF_SIZE];
    uint16_t gen_opc_icount[OPC_BUF_SIZE];
    uint8_t gen_opc_instr_start[OPC_BUF_SIZE];
516

E
Evgeny Voevodin 已提交
517 518 519 520 521 522 523 524 525
    /* Code generation */
    int code_gen_max_blocks;
    uint8_t *code_gen_prologue;
    uint8_t *code_gen_buffer;
    size_t code_gen_buffer_size;
    /* threshold to flush the translated code buffer */
    size_t code_gen_buffer_max_size;
    uint8_t *code_gen_ptr;

526 527
    TBContext tb_ctx;

R
Richard Henderson 已提交
528 529
    /* The TCGBackendData structure is private to tcg-target.c.  */
    struct TCGBackendData *be;
B
bellard 已提交
530 531 532 533 534 535 536 537 538 539 540 541 542 543 544 545 546 547 548 549 550 551 552 553 554 555
};

extern TCGContext tcg_ctx;

/* pool based memory allocation */

void *tcg_malloc_internal(TCGContext *s, int size);
void tcg_pool_reset(TCGContext *s);
void tcg_pool_delete(TCGContext *s);

static inline void *tcg_malloc(int size)
{
    TCGContext *s = &tcg_ctx;
    uint8_t *ptr, *ptr_end;
    size = (size + sizeof(long) - 1) & ~(sizeof(long) - 1);
    ptr = s->pool_cur;
    ptr_end = ptr + size;
    if (unlikely(ptr_end > s->pool_end)) {
        return tcg_malloc_internal(&tcg_ctx, size);
    } else {
        s->pool_cur = ptr_end;
        return ptr;
    }
}

void tcg_context_init(TCGContext *s);
556
void tcg_prologue_init(TCGContext *s);
B
bellard 已提交
557 558
void tcg_func_start(TCGContext *s);

A
aurel32 已提交
559 560
int tcg_gen_code(TCGContext *s, uint8_t *gen_code_buf);
int tcg_gen_code_search_pc(TCGContext *s, uint8_t *gen_code_buf, long offset);
B
bellard 已提交
561

562
void tcg_set_frame(TCGContext *s, int reg, intptr_t start, intptr_t size);
P
pbrook 已提交
563 564

TCGv_i32 tcg_global_reg_new_i32(int reg, const char *name);
565
TCGv_i32 tcg_global_mem_new_i32(int reg, intptr_t offset, const char *name);
P
pbrook 已提交
566 567 568 569 570 571 572 573 574 575 576 577 578
TCGv_i32 tcg_temp_new_internal_i32(int temp_local);
static inline TCGv_i32 tcg_temp_new_i32(void)
{
    return tcg_temp_new_internal_i32(0);
}
static inline TCGv_i32 tcg_temp_local_new_i32(void)
{
    return tcg_temp_new_internal_i32(1);
}
void tcg_temp_free_i32(TCGv_i32 arg);
char *tcg_get_arg_str_i32(TCGContext *s, char *buf, int buf_size, TCGv_i32 arg);

TCGv_i64 tcg_global_reg_new_i64(int reg, const char *name);
579
TCGv_i64 tcg_global_mem_new_i64(int reg, intptr_t offset, const char *name);
P
pbrook 已提交
580 581
TCGv_i64 tcg_temp_new_internal_i64(int temp_local);
static inline TCGv_i64 tcg_temp_new_i64(void)
B
bellard 已提交
582
{
P
pbrook 已提交
583
    return tcg_temp_new_internal_i64(0);
B
bellard 已提交
584
}
P
pbrook 已提交
585
static inline TCGv_i64 tcg_temp_local_new_i64(void)
B
bellard 已提交
586
{
P
pbrook 已提交
587
    return tcg_temp_new_internal_i64(1);
B
bellard 已提交
588
}
P
pbrook 已提交
589 590 591
void tcg_temp_free_i64(TCGv_i64 arg);
char *tcg_get_arg_str_i64(TCGContext *s, char *buf, int buf_size, TCGv_i64 arg);

592 593 594 595 596 597 598 599 600 601 602 603 604
#if defined(CONFIG_DEBUG_TCG)
/* If you call tcg_clear_temp_count() at the start of a section of
 * code which is not supposed to leak any TCG temporaries, then
 * calling tcg_check_temp_count() at the end of the section will
 * return 1 if the section did in fact leak a temporary.
 */
void tcg_clear_temp_count(void);
int tcg_check_temp_count(void);
#else
#define tcg_clear_temp_count() do { } while (0)
#define tcg_check_temp_count() 0
#endif

605
void tcg_dump_info(FILE *f, fprintf_function cpu_fprintf);
B
bellard 已提交
606 607 608 609 610 611 612

#define TCG_CT_ALIAS  0x80
#define TCG_CT_IALIAS 0x40
#define TCG_CT_REG    0x01
#define TCG_CT_CONST  0x02 /* any constant of register size */

typedef struct TCGArgConstraint {
613 614
    uint16_t ct;
    uint8_t alias_index;
B
bellard 已提交
615 616 617 618 619 620 621
    union {
        TCGRegSet regs;
    } u;
} TCGArgConstraint;

#define TCG_MAX_OP_ARGS 16

622 623 624 625 626 627
/* Bits for TCGOpDef->flags, 8 bits available.  */
enum {
    /* Instruction defines the end of a basic block.  */
    TCG_OPF_BB_END       = 0x01,
    /* Instruction clobbers call registers and potentially update globals.  */
    TCG_OPF_CALL_CLOBBER = 0x02,
628 629
    /* Instruction has side effects: it cannot be removed if its outputs
       are not used, and might trigger exceptions.  */
630 631 632
    TCG_OPF_SIDE_EFFECTS = 0x04,
    /* Instruction operands are 64-bits (otherwise 32-bits).  */
    TCG_OPF_64BIT        = 0x08,
633 634
    /* Instruction is optional and not implemented by the host, or insn
       is generic and should not be implemened by the host.  */
635
    TCG_OPF_NOT_PRESENT  = 0x10,
636
};
B
bellard 已提交
637 638 639 640 641 642 643

typedef struct TCGOpDef {
    const char *name;
    uint8_t nb_oargs, nb_iargs, nb_cargs, nb_args;
    uint8_t flags;
    TCGArgConstraint *args_ct;
    int *sorted_args;
644 645 646
#if defined(CONFIG_DEBUG_TCG)
    int used;
#endif
B
bellard 已提交
647
} TCGOpDef;
648 649

extern TCGOpDef tcg_op_defs[];
650 651
extern const size_t tcg_op_defs_max;

B
bellard 已提交
652
typedef struct TCGTargetOpDef {
653
    TCGOpcode op;
B
bellard 已提交
654 655 656 657 658 659 660 661 662
    const char *args_ct_str[TCG_MAX_OP_ARGS];
} TCGTargetOpDef;

#define tcg_abort() \
do {\
    fprintf(stderr, "%s:%d: tcg fatal error\n", __FILE__, __LINE__);\
    abort();\
} while (0)

R
Richard Henderson 已提交
663 664 665 666 667 668 669 670 671
#ifdef CONFIG_DEBUG_TCG
# define tcg_debug_assert(X) do { assert(X); } while (0)
#elif QEMU_GNUC_PREREQ(4, 5)
# define tcg_debug_assert(X) \
    do { if (!(X)) { __builtin_unreachable(); } } while (0)
#else
# define tcg_debug_assert(X) do { (void)(X); } while (0)
#endif

B
bellard 已提交
672 673
void tcg_add_target_add_op_defs(const TCGTargetOpDef *tdefs);

R
Richard Henderson 已提交
674
#if UINTPTR_MAX == UINT32_MAX
675 676 677
#define TCGV_NAT_TO_PTR(n) MAKE_TCGV_PTR(GET_TCGV_I32(n))
#define TCGV_PTR_TO_NAT(n) MAKE_TCGV_I32(GET_TCGV_PTR(n))

R
Richard Henderson 已提交
678
#define tcg_const_ptr(V) TCGV_NAT_TO_PTR(tcg_const_i32((intptr_t)(V)))
679 680 681 682 683 684
#define tcg_global_reg_new_ptr(R, N) \
    TCGV_NAT_TO_PTR(tcg_global_reg_new_i32((R), (N)))
#define tcg_global_mem_new_ptr(R, O, N) \
    TCGV_NAT_TO_PTR(tcg_global_mem_new_i32((R), (O), (N)))
#define tcg_temp_new_ptr() TCGV_NAT_TO_PTR(tcg_temp_new_i32())
#define tcg_temp_free_ptr(T) tcg_temp_free_i32(TCGV_PTR_TO_NAT(T))
B
bellard 已提交
685
#else
686 687 688
#define TCGV_NAT_TO_PTR(n) MAKE_TCGV_PTR(GET_TCGV_I64(n))
#define TCGV_PTR_TO_NAT(n) MAKE_TCGV_I64(GET_TCGV_PTR(n))

R
Richard Henderson 已提交
689
#define tcg_const_ptr(V) TCGV_NAT_TO_PTR(tcg_const_i64((intptr_t)(V)))
690 691 692 693 694 695
#define tcg_global_reg_new_ptr(R, N) \
    TCGV_NAT_TO_PTR(tcg_global_reg_new_i64((R), (N)))
#define tcg_global_mem_new_ptr(R, O, N) \
    TCGV_NAT_TO_PTR(tcg_global_mem_new_i64((R), (O), (N)))
#define tcg_temp_new_ptr() TCGV_NAT_TO_PTR(tcg_temp_new_i64())
#define tcg_temp_free_ptr(T) tcg_temp_free_i64(TCGV_PTR_TO_NAT(T))
B
bellard 已提交
696 697
#endif

P
pbrook 已提交
698 699 700 701 702 703
void tcg_gen_callN(TCGContext *s, TCGv_ptr func, unsigned int flags,
                   int sizemask, TCGArg ret, int nargs, TCGArg *args);

void tcg_gen_shifti_i64(TCGv_i64 ret, TCGv_i64 arg1,
                        int c, int right, int arith);

K
Kirill Batuzov 已提交
704 705 706
TCGArg *tcg_optimize(TCGContext *s, uint16_t *tcg_opc_ptr, TCGArg *args,
                     TCGOpDef *tcg_op_def);

P
pbrook 已提交
707
/* only used for debugging purposes */
B
Blue Swirl 已提交
708
void tcg_dump_ops(TCGContext *s);
P
pbrook 已提交
709 710 711 712 713 714 715

void dump_ops(const uint16_t *opc_buf, const TCGArg *opparam_buf);
TCGv_i32 tcg_const_i32(int32_t val);
TCGv_i64 tcg_const_i64(int64_t val);
TCGv_i32 tcg_const_local_i32(int32_t val);
TCGv_i64 tcg_const_local_i64(int64_t val);

716 717 718 719 720 721 722 723 724 725 726 727 728 729 730 731 732 733 734 735 736 737 738 739 740 741
/**
 * tcg_qemu_tb_exec:
 * @env: CPUArchState * for the CPU
 * @tb_ptr: address of generated code for the TB to execute
 *
 * Start executing code from a given translation block.
 * Where translation blocks have been linked, execution
 * may proceed from the given TB into successive ones.
 * Control eventually returns only when some action is needed
 * from the top-level loop: either control must pass to a TB
 * which has not yet been directly linked, or an asynchronous
 * event such as an interrupt needs handling.
 *
 * The return value is a pointer to the next TB to execute
 * (if known; otherwise zero). This pointer is assumed to be
 * 4-aligned, and the bottom two bits are used to return further
 * information:
 *  0, 1: the link between this TB and the next is via the specified
 *        TB index (0 or 1). That is, we left the TB via (the equivalent
 *        of) "goto_tb <index>". The main loop uses this to determine
 *        how to link the TB just executed to the next.
 *  2:    we are using instruction counting code generation, and we
 *        did not start executing this TB because the instruction counter
 *        would hit zero midway through it. In this case the next-TB pointer
 *        returned is the TB we were about to execute, and the caller must
 *        arrange to execute the remaining count of instructions.
742 743 744 745
 *  3:    we stopped because the CPU's exit_request flag was set
 *        (usually meaning that there is an interrupt that needs to be
 *        handled). The next-TB pointer returned is the TB we were
 *        about to execute when we noticed the pending exit request.
746 747 748 749 750 751 752 753 754 755 756 757 758 759 760 761
 *
 * If the bottom two bits indicate an exit-via-index then the CPU
 * state is correctly synchronised and ready for execution of the next
 * TB (and in particular the guest PC is the address to execute next).
 * Otherwise, we gave up on execution of this TB before it started, and
 * the caller must fix up the CPU state by calling cpu_pc_from_tb()
 * with the next-TB pointer we return.
 *
 * Note that TCG targets may use a different definition of tcg_qemu_tb_exec
 * to this default (which just calls the prologue.code emitted by
 * tcg_target_qemu_prologue()).
 */
#define TB_EXIT_MASK 3
#define TB_EXIT_IDX0 0
#define TB_EXIT_IDX1 1
#define TB_EXIT_ICOUNT_EXPIRED 2
762
#define TB_EXIT_REQUESTED 3
763

764 765
#if !defined(tcg_qemu_tb_exec)
# define tcg_qemu_tb_exec(env, tb_ptr) \
766
    ((uintptr_t (*)(void *, void *))tcg_ctx.code_gen_prologue)(env, tb_ptr)
B
bellard 已提交
767
#endif
768 769

void tcg_register_jit(void *buf, size_t buf_size);
770

R
Richard Henderson 已提交
771 772 773 774
/*
 * Memory helpers that will be used by TCG generated code.
 */
#ifdef CONFIG_SOFTMMU
775 776 777
/* Value zero-extended to tcg register size.  */
tcg_target_ulong helper_ret_ldub_mmu(CPUArchState *env, target_ulong addr,
                                     int mmu_idx, uintptr_t retaddr);
778 779 780 781 782 783 784 785 786 787 788 789
tcg_target_ulong helper_le_lduw_mmu(CPUArchState *env, target_ulong addr,
                                    int mmu_idx, uintptr_t retaddr);
tcg_target_ulong helper_le_ldul_mmu(CPUArchState *env, target_ulong addr,
                                    int mmu_idx, uintptr_t retaddr);
uint64_t helper_le_ldq_mmu(CPUArchState *env, target_ulong addr,
                           int mmu_idx, uintptr_t retaddr);
tcg_target_ulong helper_be_lduw_mmu(CPUArchState *env, target_ulong addr,
                                    int mmu_idx, uintptr_t retaddr);
tcg_target_ulong helper_be_ldul_mmu(CPUArchState *env, target_ulong addr,
                                    int mmu_idx, uintptr_t retaddr);
uint64_t helper_be_ldq_mmu(CPUArchState *env, target_ulong addr,
                           int mmu_idx, uintptr_t retaddr);
R
Richard Henderson 已提交
790

791 792 793
/* Value sign-extended to tcg register size.  */
tcg_target_ulong helper_ret_ldsb_mmu(CPUArchState *env, target_ulong addr,
                                     int mmu_idx, uintptr_t retaddr);
794 795 796 797 798 799 800 801
tcg_target_ulong helper_le_ldsw_mmu(CPUArchState *env, target_ulong addr,
                                    int mmu_idx, uintptr_t retaddr);
tcg_target_ulong helper_le_ldsl_mmu(CPUArchState *env, target_ulong addr,
                                    int mmu_idx, uintptr_t retaddr);
tcg_target_ulong helper_be_ldsw_mmu(CPUArchState *env, target_ulong addr,
                                    int mmu_idx, uintptr_t retaddr);
tcg_target_ulong helper_be_ldsl_mmu(CPUArchState *env, target_ulong addr,
                                    int mmu_idx, uintptr_t retaddr);
802

R
Richard Henderson 已提交
803 804
void helper_ret_stb_mmu(CPUArchState *env, target_ulong addr, uint8_t val,
                        int mmu_idx, uintptr_t retaddr);
805 806 807 808 809 810 811 812 813 814 815 816 817 818 819 820 821 822 823 824 825 826 827 828 829 830 831 832 833 834 835 836 837
void helper_le_stw_mmu(CPUArchState *env, target_ulong addr, uint16_t val,
                       int mmu_idx, uintptr_t retaddr);
void helper_le_stl_mmu(CPUArchState *env, target_ulong addr, uint32_t val,
                       int mmu_idx, uintptr_t retaddr);
void helper_le_stq_mmu(CPUArchState *env, target_ulong addr, uint64_t val,
                       int mmu_idx, uintptr_t retaddr);
void helper_be_stw_mmu(CPUArchState *env, target_ulong addr, uint16_t val,
                       int mmu_idx, uintptr_t retaddr);
void helper_be_stl_mmu(CPUArchState *env, target_ulong addr, uint32_t val,
                       int mmu_idx, uintptr_t retaddr);
void helper_be_stq_mmu(CPUArchState *env, target_ulong addr, uint64_t val,
                       int mmu_idx, uintptr_t retaddr);

/* Temporary aliases until backends are converted.  */
#ifdef TARGET_WORDS_BIGENDIAN
# define helper_ret_ldsw_mmu  helper_be_ldsw_mmu
# define helper_ret_lduw_mmu  helper_be_lduw_mmu
# define helper_ret_ldsl_mmu  helper_be_ldsl_mmu
# define helper_ret_ldul_mmu  helper_be_ldul_mmu
# define helper_ret_ldq_mmu   helper_be_ldq_mmu
# define helper_ret_stw_mmu   helper_be_stw_mmu
# define helper_ret_stl_mmu   helper_be_stl_mmu
# define helper_ret_stq_mmu   helper_be_stq_mmu
#else
# define helper_ret_ldsw_mmu  helper_le_ldsw_mmu
# define helper_ret_lduw_mmu  helper_le_lduw_mmu
# define helper_ret_ldsl_mmu  helper_le_ldsl_mmu
# define helper_ret_ldul_mmu  helper_le_ldul_mmu
# define helper_ret_ldq_mmu   helper_le_ldq_mmu
# define helper_ret_stw_mmu   helper_le_stw_mmu
# define helper_ret_stl_mmu   helper_le_stl_mmu
# define helper_ret_stq_mmu   helper_le_stq_mmu
#endif
R
Richard Henderson 已提交
838 839 840 841 842 843 844 845 846 847 848 849 850 851 852 853 854

uint8_t helper_ldb_mmu(CPUArchState *env, target_ulong addr, int mmu_idx);
uint16_t helper_ldw_mmu(CPUArchState *env, target_ulong addr, int mmu_idx);
uint32_t helper_ldl_mmu(CPUArchState *env, target_ulong addr, int mmu_idx);
uint64_t helper_ldq_mmu(CPUArchState *env, target_ulong addr, int mmu_idx);

void helper_stb_mmu(CPUArchState *env, target_ulong addr,
                    uint8_t val, int mmu_idx);
void helper_stw_mmu(CPUArchState *env, target_ulong addr,
                    uint16_t val, int mmu_idx);
void helper_stl_mmu(CPUArchState *env, target_ulong addr,
                    uint32_t val, int mmu_idx);
void helper_stq_mmu(CPUArchState *env, target_ulong addr,
                    uint64_t val, int mmu_idx);
#endif /* CONFIG_SOFTMMU */

#endif /* TCG_H */