4 * Copyright (c) 2003 Fabrice Bellard
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
28 #define NO_CPU_IO_DEFS
34 /* code generation context */
37 uint16_t gen_opc_buf[OPC_BUF_SIZE];
38 TCGArg gen_opparam_buf[OPPARAM_BUF_SIZE];
40 target_ulong gen_opc_pc[OPC_BUF_SIZE];
41 uint8_t gen_opc_instr_start[OPC_BUF_SIZE];
42 #if defined(TARGET_I386)
43 uint8_t gen_opc_cc_op[OPC_BUF_SIZE];
44 #elif defined(TARGET_SPARC)
45 target_ulong gen_opc_npc[OPC_BUF_SIZE];
46 target_ulong gen_opc_jump_pc[2];
47 #elif defined(TARGET_MIPS) || defined(TARGET_SH4)
48 uint32_t gen_opc_hflags[OPC_BUF_SIZE];
51 #ifdef CONFIG_PROFILER
52 int64_t dyngen_tb_count1;
53 int64_t dyngen_tb_count;
54 int64_t dyngen_op_count;
55 int64_t dyngen_old_op_count;
56 int64_t dyngen_tcg_del_op_count;
57 int dyngen_op_count_max;
58 int64_t dyngen_code_in_len;
59 int64_t dyngen_code_out_len;
60 int64_t dyngen_interm_time;
61 int64_t dyngen_code_time;
62 int64_t dyngen_restore_count;
63 int64_t dyngen_restore_time;
66 /* XXX: suppress that */
67 unsigned long code_gen_max_block_size(void)
69 static unsigned long max;
72 max = TCG_MAX_OP_SIZE;
73 #define DEF(s, n, copy_size) max = copy_size > max? copy_size : max;
82 void cpu_gen_init(void)
84 tcg_context_init(&tcg_ctx);
85 tcg_set_frame(&tcg_ctx, TCG_AREG0, offsetof(CPUState, temp_buf),
86 CPU_TEMP_BUF_NLONGS * sizeof(long));
89 /* return non zero if the very first instruction is invalid so that
90 the virtual CPU can trigger an exception.
92 '*gen_code_size_ptr' contains the size of the generated code (host
95 int cpu_gen_code(CPUState *env, TranslationBlock *tb, int *gen_code_size_ptr)
97 TCGContext *s = &tcg_ctx;
98 uint8_t *gen_code_buf;
100 #ifdef CONFIG_PROFILER
104 #ifdef CONFIG_PROFILER
105 dyngen_tb_count1++; /* includes aborted translations because of
107 ti = profile_getclock();
111 if (gen_intermediate_code(env, tb) < 0)
114 /* generate machine code */
115 gen_code_buf = tb->tc_ptr;
116 tb->tb_next_offset[0] = 0xffff;
117 tb->tb_next_offset[1] = 0xffff;
118 s->tb_next_offset = tb->tb_next_offset;
119 #ifdef USE_DIRECT_JUMP
120 s->tb_jmp_offset = tb->tb_jmp_offset;
122 /* the following two entries are optional (only used for string ops) */
123 /* XXX: not used ? */
124 tb->tb_jmp_offset[2] = 0xffff;
125 tb->tb_jmp_offset[3] = 0xffff;
127 s->tb_jmp_offset = NULL;
128 s->tb_next = tb->tb_next;
131 #ifdef CONFIG_PROFILER
133 dyngen_interm_time += profile_getclock() - ti;
134 dyngen_code_time -= profile_getclock();
136 gen_code_size = dyngen_code(s, gen_code_buf);
137 *gen_code_size_ptr = gen_code_size;
138 #ifdef CONFIG_PROFILER
139 dyngen_code_time += profile_getclock();
140 dyngen_code_in_len += tb->size;
141 dyngen_code_out_len += gen_code_size;
145 if (loglevel & CPU_LOG_TB_OUT_ASM) {
146 fprintf(logfile, "OUT: [size=%d]\n", *gen_code_size_ptr);
147 disas(logfile, tb->tc_ptr, *gen_code_size_ptr);
148 fprintf(logfile, "\n");
155 /* The cpu state corresponding to 'searched_pc' is restored.
157 int cpu_restore_state(TranslationBlock *tb,
158 CPUState *env, unsigned long searched_pc,
161 TCGContext *s = &tcg_ctx;
163 unsigned long tc_ptr;
164 #ifdef CONFIG_PROFILER
168 #ifdef CONFIG_PROFILER
169 ti = profile_getclock();
173 if (gen_intermediate_code_pc(env, tb) < 0)
176 /* find opc index corresponding to search_pc */
177 tc_ptr = (unsigned long)tb->tc_ptr;
178 if (searched_pc < tc_ptr)
181 s->tb_next_offset = tb->tb_next_offset;
182 #ifdef USE_DIRECT_JUMP
183 s->tb_jmp_offset = tb->tb_jmp_offset;
186 s->tb_jmp_offset = NULL;
187 s->tb_next = tb->tb_next;
189 j = dyngen_code_search_pc(s, (uint8_t *)tc_ptr, searched_pc - tc_ptr);
192 /* now find start of instruction before */
193 while (gen_opc_instr_start[j] == 0)
196 gen_pc_load(env, tb, searched_pc, j, puc);
198 #ifdef CONFIG_PROFILER
199 dyngen_restore_time += profile_getclock() - ti;
200 dyngen_restore_count++;