1 /* src/vm/jit/code.c - codeinfo struct for representing compiled code
3 Copyright (C) 1996-2005, 2006, 2007 R. Grafl, A. Krall, C. Kruegel,
4 C. Oates, R. Obermaisser, M. Platter, M. Probst, S. Ring,
5 E. Steiner, C. Thalinger, D. Thuernbeck, P. Tomsich, C. Ullrich,
6 J. Wenninger, Institut f. Computersprachen - TU Wien
8 This file is part of CACAO.
10 This program is free software; you can redistribute it and/or
11 modify it under the terms of the GNU General Public License as
12 published by the Free Software Foundation; either version 2, or (at
13 your option) any later version.
15 This program is distributed in the hope that it will be useful, but
16 WITHOUT ANY WARRANTY; without even the implied warranty of
17 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
18 General Public License for more details.
20 You should have received a copy of the GNU General Public License
21 along with this program; if not, write to the Free Software
22 Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
36 #include "mm/memory.h"
38 #if defined(ENABLE_THREADS)
39 # include "threads/native/lock.h"
42 #include "vm/jit/code.h"
43 #include "vm/jit/codegen-common.h"
44 #include "vm/jit/methodheader.h"
45 #include "vm/jit/patcher-common.h"
47 #include "vmcore/options.h"
50 /* code_init *******************************************************************
52 Initialize the code-subsystem.
54 *******************************************************************************/
58 /* check for offset of code->m == 0 (see comment in code.h) */
60 assert(OFFSET(codeinfo, m) == 0);
68 /* code_codeinfo_new ***********************************************************
70 Create a new codeinfo for the given method.
73 m................method to create a new codeinfo for
75 The following fields are set in codeinfo:
80 a new, initialized codeinfo, or
81 NULL if an exception occurred.
83 *******************************************************************************/
85 codeinfo *code_codeinfo_new(methodinfo *m)
93 patcher_list_create(code);
95 #if defined(ENABLE_STATISTICS)
97 size_codeinfo += sizeof(codeinfo);
104 /* code_find_codeinfo_for_pc ***************************************************
106 Return the codeinfo for the compilation unit that contains the
110 pc...............machine code position
113 the codeinfo * for the given PC
115 *******************************************************************************/
117 codeinfo *code_find_codeinfo_for_pc(u1 *pc)
121 pv = codegen_get_pv_from_pc(pc);
124 return *(codeinfo **)(pv + CodeinfoPointer);
128 /* code_find_codeinfo_for_pc ***************************************************
130 Return the codeinfo for the compilation unit that contains the
131 given PC. This method does not check the return value and is used
135 pc...............machine code position
138 the codeinfo * for the given PC, or NULL
140 *******************************************************************************/
142 codeinfo *code_find_codeinfo_for_pc_nocheck(u1 *pc)
147 pv = codegen_get_pv_from_pc_nocheck(pc);
152 code = *(codeinfo **)(pv + CodeinfoPointer);
158 /* code_get_methodinfo_for_pv **************************************************
160 Return the methodinfo for the given PV.
168 *******************************************************************************/
170 methodinfo *code_get_methodinfo_for_pv(u1 *pv)
174 code = *((codeinfo **) (pv + CodeinfoPointer));
180 /* code_get_sync_slot_count ****************************************************
182 Return the number of stack slots used for storing the synchronized object
183 (and the return value around lock_monitor_exit calls) by the given code.
186 code.............the codeinfo of the code in question
190 the number of stack slots used for synchronization
192 *******************************************************************************/
194 #if defined(ENABLE_REPLACEMENT)
195 int code_get_sync_slot_count(codeinfo *code)
197 #ifdef ENABLE_THREADS
205 if (!(code->m->flags & ACC_SYNCHRONIZED))
210 #ifdef HAS_4BYTE_STACKSLOT
211 /* long and double need 2 4-byte slots */
212 if (IS_2_WORD_TYPE(code->m->parseddesc->returntype.type))
216 #if defined(__POWERPC__)
217 /* powerpc needs an extra slot */
223 #else /* !ENABLE_THREADS */
227 #endif /* ENABLE_THREADS */
229 #endif /* defined(ENABLE_REPLACEMENT) */
232 /* code_codeinfo_free **********************************************************
234 Free the memory used by a codeinfo.
237 code.............the codeinfo to free
239 *******************************************************************************/
241 void code_codeinfo_free(codeinfo *code)
246 if (code->mcode != NULL)
247 CFREE((void *) (ptrint) code->mcode, code->mcodelength);
249 patcher_list_free(code);
251 #if defined(ENABLE_REPLACEMENT)
252 replace_free_replacement_points(code);
255 FREE(code, codeinfo);
257 #if defined(ENABLE_STATISTICS)
259 size_codeinfo -= sizeof(codeinfo);
264 /* code_free_code_of_method ****************************************************
266 Free all codeinfos of the given method
269 m................the method of which the codeinfos are to be freed
271 *******************************************************************************/
273 void code_free_code_of_method(methodinfo *m)
284 nextcode = code->prev;
285 code_codeinfo_free(code);
292 * These are local overrides for various environment variables in Emacs.
293 * Please do not remove this and leave it at the end of the file, where
294 * Emacs will automagically detect them.
295 * ---------------------------------------------------------------------
298 * indent-tabs-mode: t
302 * vim:noexpandtab:sw=4:ts=4: