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 /* XXX: suppress that */
52 unsigned long code_gen_max_block_size(void)
54 static unsigned long max;
57 max = TCG_MAX_OP_SIZE;
58 #define DEF(s, n, copy_size) max = copy_size > max? copy_size : max;
67 void cpu_gen_init(void)
69 tcg_context_init(&tcg_ctx);
70 tcg_set_frame(&tcg_ctx, TCG_AREG0, offsetof(CPUState, temp_buf),
71 CPU_TEMP_BUF_NLONGS * sizeof(long));
74 /* return non zero if the very first instruction is invalid so that
75 the virtual CPU can trigger an exception.
77 '*gen_code_size_ptr' contains the size of the generated code (host
80 int cpu_gen_code(CPUState *env, TranslationBlock *tb, int *gen_code_size_ptr)
82 TCGContext *s = &tcg_ctx;
83 uint8_t *gen_code_buf;
85 #ifdef CONFIG_PROFILER
89 #ifdef CONFIG_PROFILER
90 s->tb_count1++; /* includes aborted translations because of
92 ti = profile_getclock();
96 if (gen_intermediate_code(env, tb) < 0)
99 /* generate machine code */
100 gen_code_buf = tb->tc_ptr;
101 tb->tb_next_offset[0] = 0xffff;
102 tb->tb_next_offset[1] = 0xffff;
103 s->tb_next_offset = tb->tb_next_offset;
104 #ifdef USE_DIRECT_JUMP
105 s->tb_jmp_offset = tb->tb_jmp_offset;
107 /* the following two entries are optional (only used for string ops) */
108 /* XXX: not used ? */
109 tb->tb_jmp_offset[2] = 0xffff;
110 tb->tb_jmp_offset[3] = 0xffff;
112 s->tb_jmp_offset = NULL;
113 s->tb_next = tb->tb_next;
116 #ifdef CONFIG_PROFILER
118 s->interm_time += profile_getclock() - ti;
119 s->code_time -= profile_getclock();
121 gen_code_size = dyngen_code(s, gen_code_buf);
122 *gen_code_size_ptr = gen_code_size;
123 #ifdef CONFIG_PROFILER
124 s->code_time += profile_getclock();
125 s->code_in_len += tb->size;
126 s->code_out_len += gen_code_size;
130 if (loglevel & CPU_LOG_TB_OUT_ASM) {
131 fprintf(logfile, "OUT: [size=%d]\n", *gen_code_size_ptr);
132 disas(logfile, tb->tc_ptr, *gen_code_size_ptr);
133 fprintf(logfile, "\n");
140 /* The cpu state corresponding to 'searched_pc' is restored.
142 int cpu_restore_state(TranslationBlock *tb,
143 CPUState *env, unsigned long searched_pc,
146 TCGContext *s = &tcg_ctx;
148 unsigned long tc_ptr;
149 #ifdef CONFIG_PROFILER
153 #ifdef CONFIG_PROFILER
154 ti = profile_getclock();
158 if (gen_intermediate_code_pc(env, tb) < 0)
161 /* find opc index corresponding to search_pc */
162 tc_ptr = (unsigned long)tb->tc_ptr;
163 if (searched_pc < tc_ptr)
166 s->tb_next_offset = tb->tb_next_offset;
167 #ifdef USE_DIRECT_JUMP
168 s->tb_jmp_offset = tb->tb_jmp_offset;
171 s->tb_jmp_offset = NULL;
172 s->tb_next = tb->tb_next;
174 j = dyngen_code_search_pc(s, (uint8_t *)tc_ptr, searched_pc - tc_ptr);
177 /* now find start of instruction before */
178 while (gen_opc_instr_start[j] == 0)
181 gen_pc_load(env, tb, searched_pc, j, puc);
183 #ifdef CONFIG_PROFILER
184 s->restore_time += profile_getclock() - ti;