1 /* 2 * Internal declarations for Tiny Code Generator for QEMU 3 * 4 * Copyright (c) 2008 Fabrice Bellard 5 * 6 * Permission is hereby granted, free of charge, to any person obtaining a copy 7 * of this software and associated documentation files (the "Software"), to deal 8 * in the Software without restriction, including without limitation the rights 9 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell 10 * copies of the Software, and to permit persons to whom the Software is 11 * furnished to do so, subject to the following conditions: 12 * 13 * The above copyright notice and this permission notice shall be included in 14 * all copies or substantial portions of the Software. 15 * 16 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR 17 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, 18 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL 19 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER 20 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, 21 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN 22 * THE SOFTWARE. 23 */ 24 25 #ifndef TCG_INTERNAL_H 26 #define TCG_INTERNAL_H 27 28 #ifdef CONFIG_TCG_INTERPRETER 29 #include <ffi.h> 30 #endif 31 32 #define TCG_HIGHWATER 1024 33 34 /* 35 * Describe the calling convention of a given argument type. 36 */ 37 typedef enum { 38 TCG_CALL_RET_NORMAL, /* by registers */ 39 TCG_CALL_RET_BY_REF, /* for i128, by reference */ 40 TCG_CALL_RET_BY_VEC, /* for i128, by vector register */ 41 } TCGCallReturnKind; 42 43 typedef enum { 44 TCG_CALL_ARG_NORMAL, /* by registers (continuing onto stack) */ 45 TCG_CALL_ARG_EVEN, /* like normal, but skipping odd slots */ 46 TCG_CALL_ARG_EXTEND, /* for i32, as a sign/zero-extended i64 */ 47 TCG_CALL_ARG_EXTEND_U, /* ... as a zero-extended i64 */ 48 TCG_CALL_ARG_EXTEND_S, /* ... as a sign-extended i64 */ 49 TCG_CALL_ARG_BY_REF, /* for i128, by reference, first */ 50 TCG_CALL_ARG_BY_REF_N, /* ... by reference, subsequent */ 51 } TCGCallArgumentKind; 52 53 typedef struct TCGCallArgumentLoc { 54 TCGCallArgumentKind kind : 8; 55 unsigned arg_slot : 8; 56 unsigned ref_slot : 8; 57 unsigned arg_idx : 4; 58 unsigned tmp_subindex : 2; 59 } TCGCallArgumentLoc; 60 61 /* Avoid "unsigned < 0 is always false" Werror, when iarg_regs is empty. */ 62 #define REG_P(L) \ 63 ((int)(L)->arg_slot < (int)ARRAY_SIZE(tcg_target_call_iarg_regs)) 64 65 typedef struct TCGHelperInfo { 66 void *func; 67 const char *name; 68 #ifdef CONFIG_TCG_INTERPRETER 69 ffi_cif *cif; 70 #endif 71 unsigned typemask : 32; 72 unsigned flags : 8; 73 unsigned nr_in : 8; 74 unsigned nr_out : 8; 75 TCGCallReturnKind out_kind : 8; 76 77 /* Maximum physical arguments are constrained by TCG_TYPE_I128. */ 78 TCGCallArgumentLoc in[MAX_CALL_IARGS * (128 / TCG_TARGET_REG_BITS)]; 79 } TCGHelperInfo; 80 81 extern TCGContext tcg_init_ctx; 82 extern TCGContext **tcg_ctxs; 83 extern unsigned int tcg_cur_ctxs; 84 extern unsigned int tcg_max_ctxs; 85 86 void tcg_region_init(size_t tb_size, int splitwx, unsigned max_cpus); 87 bool tcg_region_alloc(TCGContext *s); 88 void tcg_region_initial_alloc(TCGContext *s); 89 void tcg_region_prologue_set(TCGContext *s); 90 91 static inline void *tcg_call_func(TCGOp *op) 92 { 93 return (void *)(uintptr_t)op->args[TCGOP_CALLO(op) + TCGOP_CALLI(op)]; 94 } 95 96 static inline const TCGHelperInfo *tcg_call_info(TCGOp *op) 97 { 98 return (void *)(uintptr_t)op->args[TCGOP_CALLO(op) + TCGOP_CALLI(op) + 1]; 99 } 100 101 static inline unsigned tcg_call_flags(TCGOp *op) 102 { 103 return tcg_call_info(op)->flags; 104 } 105 106 #if TCG_TARGET_REG_BITS == 32 107 static inline TCGv_i32 TCGV_LOW(TCGv_i64 t) 108 { 109 return temp_tcgv_i32(tcgv_i64_temp(t) + HOST_BIG_ENDIAN); 110 } 111 static inline TCGv_i32 TCGV_HIGH(TCGv_i64 t) 112 { 113 return temp_tcgv_i32(tcgv_i64_temp(t) + !HOST_BIG_ENDIAN); 114 } 115 #else 116 extern TCGv_i32 TCGV_LOW(TCGv_i64) QEMU_ERROR("32-bit code path is reachable"); 117 extern TCGv_i32 TCGV_HIGH(TCGv_i64) QEMU_ERROR("32-bit code path is reachable"); 118 #endif 119 120 static inline TCGv_i64 TCGV128_LOW(TCGv_i128 t) 121 { 122 /* For 32-bit, offset by 2, which may then have TCGV_{LOW,HIGH} applied. */ 123 int o = HOST_BIG_ENDIAN ? 64 / TCG_TARGET_REG_BITS : 0; 124 return temp_tcgv_i64(tcgv_i128_temp(t) + o); 125 } 126 127 static inline TCGv_i64 TCGV128_HIGH(TCGv_i128 t) 128 { 129 int o = HOST_BIG_ENDIAN ? 0 : 64 / TCG_TARGET_REG_BITS; 130 return temp_tcgv_i64(tcgv_i128_temp(t) + o); 131 } 132 133 #endif /* TCG_INTERNAL_H */ 134