* renamed CACAO_TYPECHECK to ENABLE_VERIFIER
[cacao.git] / src / vm / loader.h
1 /* src/vm/loader.h - class loader header
2
3    Copyright (C) 1996-2005 R. Grafl, A. Krall, C. Kruegel, C. Oates,
4    R. Obermaisser, M. Platter, M. Probst, S. Ring, E. Steiner,
5    C. Thalinger, D. Thuernbeck, P. Tomsich, C. Ullrich, J. Wenninger,
6    Institut f. Computersprachen - TU Wien
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: Reinhard Grafl
28
29    $Id: loader.h 3501 2005-10-26 20:27:15Z twisti $
30 */
31
32
33 #ifndef _LOADER_H
34 #define _LOADER_H
35
36 #include <stdio.h>
37
38
39 /* forward typedefs ***********************************************************/
40
41 typedef struct classbuffer classbuffer;
42 typedef struct classpath_info classpath_info;
43
44
45 #include "vm/global.h"
46 #include "vm/utf8.h"
47 #include "vm/references.h"
48 #include "vm/descriptor.h"
49 #include "vm/method.h"
50
51 #if defined(USE_ZLIB)
52 # include "vm/unzip.h"
53 #endif
54
55
56 /* signed suck defines ********************************************************/
57
58 #define suck_s8(a)    (s8) suck_u8((a))
59 #define suck_s2(a)    (s2) suck_u2((a))
60 #define suck_s4(a)    (s4) suck_u4((a))
61 #define suck_s1(a)    (s1) suck_u1((a))
62
63
64 /* constant pool entries *******************************************************
65
66         All constant pool entries need a data structure which contain the entrys
67         value. In some cases this structure exist already, in the remaining cases
68         this structure must be generated:
69
70                 kind                      structure                     generated?
71         ----------------------------------------------------------------------
72     CONSTANT_Class               classinfo                           no   XXX this will change
73     CONSTANT_Fieldref            constant_FMIref                    yes
74     CONSTANT_Methodref           constant_FMIref                    yes
75     CONSTANT_InterfaceMethodref  constant_FMIref                    yes
76     CONSTANT_String              unicode                             no
77     CONSTANT_Integer             constant_integer                   yes
78     CONSTANT_Float               constant_float                     yes
79     CONSTANT_Long                constant_long                      yes
80     CONSTANT_Double              constant_double                    yes
81     CONSTANT_NameAndType         constant_nameandtype               yes
82     CONSTANT_Utf8                unicode                             no
83     CONSTANT_UNUSED              -
84
85 *******************************************************************************/
86
87 typedef struct {            /* Integer                                        */
88         s4 value;
89 } constant_integer;
90
91         
92 typedef struct {            /* Float                                          */
93         float value;
94 } constant_float;
95
96
97 typedef struct {            /* Long                                           */
98         s8 value;
99 } constant_long;
100         
101
102 typedef struct {            /* Double                                         */
103         double value;
104 } constant_double;
105
106
107 typedef struct {            /* NameAndType (Field or Method)                  */
108         utf *name;              /* field/method name                              */
109         utf *descriptor;        /* field/method type descriptor string            */
110 } constant_nameandtype;
111
112
113 /* classbuffer ****************************************************************/
114
115 struct classbuffer {
116         classinfo *class;                   /* pointer to classinfo structure     */
117         u1        *data;                    /* pointer to byte code               */
118         s4         size;                    /* size of the byte code              */
119         u1        *pos;                     /* current read position              */
120         char      *path;                    /* path to file (for debugging)       */
121 };
122
123
124 /* classpath_info *************************************************************/
125
126 #define CLASSPATH_PATH       0
127 #define CLASSPATH_ARCHIVE    1
128
129 struct classpath_info {
130 #if defined(USE_THREADS)
131         /* Required for monitor locking on zip/jar files. */
132         java_objectheader  header;
133 #endif
134         s4                 type;
135         char              *path;
136         s4                 pathlen;
137 #if defined(USE_ZLIB)
138         unzFile            uf;
139 #endif
140         classpath_info    *next;
141 };
142
143
144 /* export variables ***********************************************************/
145
146 #if defined(USE_THREADS)
147 extern int blockInts;
148 #endif
149
150 extern classpath_info *classpath_entries;
151
152
153 /* function prototypes ********************************************************/
154
155 /* initialize loader, load important systemclasses */
156 bool loader_init(u1 *stackbottom);
157
158 void suck_init(char *cpath);
159 void loader_load_all_classes(void);
160 void suck_stop(classbuffer *cb);
161
162 inline bool check_classbuffer_size(classbuffer *cb, s4 len);
163
164 inline u1 suck_u1(classbuffer *cb);
165 inline u2 suck_u2(classbuffer *cb);
166 inline u4 suck_u4(classbuffer *cb);
167
168 /* free resources */
169 void loader_close(void);
170
171 /* class loading functions */
172 classinfo *load_class_from_sysloader(utf *name);
173 classinfo *load_class_from_classloader(utf *name, java_objectheader *cl);
174 classinfo *load_class_bootstrap(utf *name);
175
176 /* (don't use the following directly) */
177 classinfo *load_class_from_classbuffer(classbuffer *cb);
178 classinfo *load_newly_created_array(classinfo *c,java_objectheader *loader);
179
180 /* return the primitive class inidicated by the given signature character */
181 classinfo *class_primitive_from_sig(char sig);
182
183 /* debug helpers */
184 void fprintflags(FILE *fp, u2 f);
185 void printflags(u2 f);
186
187 #endif /* _LOADER_H */
188
189 /*
190  * These are local overrides for various environment variables in Emacs.
191  * Please do not remove this and leave it at the end of the file, where
192  * Emacs will automagically detect them.
193  * ---------------------------------------------------------------------
194  * Local variables:
195  * mode: c
196  * indent-tabs-mode: t
197  * c-basic-offset: 4
198  * tab-width: 4
199  * End:
200  */