Fix a crash in the code which tests, if a method is identifyable by name and paramete...
[cacao.git] / src / vm / jit / inline / inline.h
1 /* jit/inline.h - code inliner
2
3    Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003
4    R. Grafl, A. Krall, C. Kruegel, C. Oates, R. Obermaisser,
5    M. Probst, S. Ring, E. Steiner, C. Thalinger, D. Thuernbeck,
6    P. Tomsich, J. Wenninger
7
8    This file is part of CACAO.
9
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.
14
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.
19
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., 59 Temple Place - Suite 330, Boston, MA
23    02111-1307, USA.
24
25    Contact: cacao@complang.tuwien.ac.at
26
27    Authors: Dieter Thuernbeck
28
29    $Id: inline.h 1415 2004-10-11 20:12:08Z jowenn $
30
31 */
32
33
34 #ifndef _INLINE_H
35 #define _INLINE_H
36
37 #include "global.h"
38 #include "toolbox/list.h"
39
40 #define INLINING_MAXDEPTH       1
41 #define INLINING_MAXCODESIZE    32
42 #define INLINING_MAXMETHODS     8
43
44
45 /*typedef struct {
46         listnode linkage;
47         instruction *iptr;
48         } t_patchlistnode;*/
49
50
51 typedef struct {
52     listnode linkage;
53
54     methodinfo *method;
55     int startgp;
56     int stopgp;
57     int firstlocal;
58
59     bool *readonly;
60     int  *label_index;
61         
62     list *inlinedmethods;
63 } inlining_methodinfo;
64
65
66 typedef struct {
67     listnode linkage;
68         
69     // saved static compiler variables
70         
71     methodinfo *method;
72         
73     // restored through method
74
75     // int jcodelength;
76     // u1 *jcode;
77     // classinfo *class;
78
79     // descriptor never used
80     // maxstack used outside of main for loop
81     // maxlocals never used
82         
83     // exceptiontablelength
84     // raw_extable used outside of main for loop
85     // mreturntype used outside of main for loop
86     // mparamcount used outside of main for loop
87     // mparamtypes used outside of main for loop
88
89     //local variables used in parse()  
90
91     int  i;                     /* temporary for different uses (counters)*/
92     int  p;                     /* java instruction counter               */
93     int  nextp;                 /* start of next java instruction         */
94     int  opcode;                /* java opcode                            */
95     u2 lineindex;
96     u2 currentline;
97     u2 linepcchange;
98     inlining_methodinfo *inlinfo;
99
100 } t_inlining_stacknode;
101
102 typedef struct t_inlining_globals {  // try in parse.h with struct not include
103         bool isinlinedmethod;
104         int cumjcodelength;   /* cumulative immediate intruction length */
105         int cummaxstack;
106         int cumextablelength;
107         int cumlocals;        /* was static */
108         int cummethods;       /* was static */
109         list *inlining_stack; /* was static */
110         inlining_methodinfo *inlining_rootinfo;
111         methodinfo *method;
112         classinfo *class;
113         int jcodelength;
114         u1 *jcode;
115 } t_inlining_globals;
116
117 /* function prototypes*/
118 t_inlining_globals *inlining_init(methodinfo *m);
119 void inlining_cleanup(t_inlining_globals *inline_env);
120 void inlining_push_compiler_variables(
121                                       int i, int p, int nextp, int opcode, 
122                                       u2 lineindex,u2 currentline,u2 linepcchange,
123                                       inlining_methodinfo* inlinfo,
124                                       t_inlining_globals *inline_env);
125 void inlining_pop_compiler_variables(
126                                     int *i, int *p, int *nextp, int *opcode,
127                                     u2 *lineindex,u2 *currentline,u2 *linepcchange,
128                                     inlining_methodinfo **inlinfo,
129                                     t_inlining_globals *inline_env);
130 void inlining_set_compiler_variables_fun(methodinfo *m, 
131                                          t_inlining_globals *inline_env);
132 classinfo *first_occurence(classinfo* class, utf* name, utf* desc);
133 bool is_unique_rec(classinfo *class, methodinfo *m, utf* name, utf* desc);
134 bool is_unique_method(classinfo *class, methodinfo *m, utf* name, utf* desc);
135 inlining_methodinfo *inlining_analyse_method(methodinfo *m, 
136                                           int level, int gp,
137                                           int firstlocal, int maxstackdepth,                                          t_inlining_globals *inline_env);
138
139 void print_t_inlining_globals (t_inlining_globals *g);
140 void print_inlining_stack     ( list                *s);
141 void print_inlining_methodinfo( inlining_methodinfo *r);
142
143 #define inlining_save_compiler_variables() \
144     inlining_push_compiler_variables(i,p,nextp,opcode, lineindex,currentline, \
145         linepcchange,inlinfo,inline_env)
146
147 #define inlining_restore_compiler_variables() \
148     inlining_pop_compiler_variables(&i, &p, &nextp, &opcode, \
149         &lineindex,&currentline,&linepcchange,&inlinfo, \
150         inline_env)
151
152 #define inlining_set_compiler_variables(i) \
153     do { \
154         p = nextp = 0; \
155         inlining_set_compiler_variables_fun(i->method, inline_env); \
156         inlinfo = i; \
157     } while (0)
158
159 #endif /* _INLINE_H */
160
161 /*
162  * These are local overrides for various environment variables in Emacs.
163  * Please do not remove this and leave it at the end of the file, where
164  * Emacs will automagically detect them.
165  * ---------------------------------------------------------------------
166  * Local variables:
167  * mode: c
168  * indent-tabs-mode: t
169  * c-basic-offset: 4
170  * tab-width: 4
171  * End:
172  */