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 } TCGCallReturnKind; 40 41 typedef enum { 42 TCG_CALL_ARG_NORMAL, /* by registers (continuing onto stack) */ 43 TCG_CALL_ARG_EVEN, /* like normal, but skipping odd slots */ 44 TCG_CALL_ARG_EXTEND, /* for i32, as a sign/zero-extended i64 */ 45 TCG_CALL_ARG_EXTEND_U, /* ... as a zero-extended i64 */ 46 TCG_CALL_ARG_EXTEND_S, /* ... as a sign-extended i64 */ 47 } TCGCallArgumentKind; 48 49 typedef struct TCGCallArgumentLoc { 50 TCGCallArgumentKind kind : 8; 51 unsigned arg_slot : 8; 52 unsigned ref_slot : 8; 53 unsigned arg_idx : 4; 54 unsigned tmp_subindex : 2; 55 } TCGCallArgumentLoc; 56 57 /* Avoid "unsigned < 0 is always false" Werror, when iarg_regs is empty. */ 58 #define REG_P(L) \ 59 ((int)(L)->arg_slot < (int)ARRAY_SIZE(tcg_target_call_iarg_regs)) 60 61 typedef struct TCGHelperInfo { 62 void *func; 63 const char *name; 64 #ifdef CONFIG_TCG_INTERPRETER 65 ffi_cif *cif; 66 #endif 67 unsigned typemask : 32; 68 unsigned flags : 8; 69 unsigned nr_in : 8; 70 unsigned nr_out : 8; 71 TCGCallReturnKind out_kind : 8; 72 73 /* Maximum physical arguments are constrained by TCG_TYPE_I128. */ 74 TCGCallArgumentLoc in[MAX_CALL_IARGS * (128 / TCG_TARGET_REG_BITS)]; 75 } TCGHelperInfo; 76 77 extern TCGContext tcg_init_ctx; 78 extern TCGContext **tcg_ctxs; 79 extern unsigned int tcg_cur_ctxs; 80 extern unsigned int tcg_max_ctxs; 81 82 void tcg_region_init(size_t tb_size, int splitwx, unsigned max_cpus); 83 bool tcg_region_alloc(TCGContext *s); 84 void tcg_region_initial_alloc(TCGContext *s); 85 void tcg_region_prologue_set(TCGContext *s); 86 87 static inline void *tcg_call_func(TCGOp *op) 88 { 89 return (void *)(uintptr_t)op->args[TCGOP_CALLO(op) + TCGOP_CALLI(op)]; 90 } 91 92 static inline const TCGHelperInfo *tcg_call_info(TCGOp *op) 93 { 94 return (void *)(uintptr_t)op->args[TCGOP_CALLO(op) + TCGOP_CALLI(op) + 1]; 95 } 96 97 static inline unsigned tcg_call_flags(TCGOp *op) 98 { 99 return tcg_call_info(op)->flags; 100 } 101 102 #if TCG_TARGET_REG_BITS == 32 103 static inline TCGv_i32 TCGV_LOW(TCGv_i64 t) 104 { 105 return temp_tcgv_i32(tcgv_i64_temp(t) + HOST_BIG_ENDIAN); 106 } 107 static inline TCGv_i32 TCGV_HIGH(TCGv_i64 t) 108 { 109 return temp_tcgv_i32(tcgv_i64_temp(t) + !HOST_BIG_ENDIAN); 110 } 111 #else 112 extern TCGv_i32 TCGV_LOW(TCGv_i64) QEMU_ERROR("32-bit code path is reachable"); 113 extern TCGv_i32 TCGV_HIGH(TCGv_i64) QEMU_ERROR("32-bit code path is reachable"); 114 #endif 115 116 #endif /* TCG_INTERNAL_H */ 117