1 |
757 |
jeremybenn |
// jvm.h - Header file for private implementation information. -*- c++ -*-
|
2 |
|
|
|
3 |
|
|
/* Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008 Free Software Foundation
|
4 |
|
|
|
5 |
|
|
This file is part of libgcj.
|
6 |
|
|
|
7 |
|
|
This software is copyrighted work licensed under the terms of the
|
8 |
|
|
Libgcj License. Please consult the file "LIBGCJ_LICENSE" for
|
9 |
|
|
details. */
|
10 |
|
|
|
11 |
|
|
#ifndef __JAVA_JVM_H__
|
12 |
|
|
#define __JAVA_JVM_H__
|
13 |
|
|
|
14 |
|
|
// Define this before including jni.h.
|
15 |
|
|
// jni.h is included by jvmpi.h, which might be included. We define
|
16 |
|
|
// this unconditionally because it is convenient and it lets other
|
17 |
|
|
// files include jni.h without difficulty.
|
18 |
|
|
#define __GCJ_JNI_IMPL__
|
19 |
|
|
|
20 |
|
|
#include <gcj/javaprims.h>
|
21 |
|
|
|
22 |
|
|
#include <java-assert.h>
|
23 |
|
|
#include <java-threads.h>
|
24 |
|
|
// Must include java-gc.h before Object.h for the implementation.
|
25 |
|
|
#include <java-gc.h>
|
26 |
|
|
|
27 |
|
|
#include <java/lang/Object.h>
|
28 |
|
|
|
29 |
|
|
// Include cni.h before field.h to enable all definitions. FIXME.
|
30 |
|
|
#include <gcj/cni.h>
|
31 |
|
|
#include <gcj/field.h>
|
32 |
|
|
|
33 |
|
|
#include <java/lang/Thread.h>
|
34 |
|
|
|
35 |
|
|
#include <sysdep/locks.h>
|
36 |
|
|
|
37 |
|
|
/* Macro for possible unused arguments. */
|
38 |
|
|
#define MAYBE_UNUSED __attribute__((__unused__))
|
39 |
|
|
|
40 |
|
|
/* Structure of the virtual table. */
|
41 |
|
|
struct _Jv_VTable
|
42 |
|
|
{
|
43 |
|
|
#ifdef __ia64__
|
44 |
|
|
typedef struct { void *pc, *gp; } vtable_elt;
|
45 |
|
|
#else
|
46 |
|
|
typedef void *vtable_elt;
|
47 |
|
|
#endif
|
48 |
|
|
jclass clas;
|
49 |
|
|
void *gc_descr;
|
50 |
|
|
|
51 |
|
|
// This must be last, as derived classes "extend" this by
|
52 |
|
|
// adding new data members.
|
53 |
|
|
vtable_elt method[1];
|
54 |
|
|
|
55 |
|
|
#ifdef __ia64__
|
56 |
|
|
void *get_method(int i) { return &method[i]; }
|
57 |
|
|
void set_method(int i, void *fptr) { method[i] = *(vtable_elt *)fptr; }
|
58 |
|
|
void *get_finalizer()
|
59 |
|
|
{
|
60 |
|
|
// We know that get_finalizer is only used for checking whether
|
61 |
|
|
// this object needs to have a finalizer registered. So it is
|
62 |
|
|
// safe to simply return just the PC component of the vtable
|
63 |
|
|
// slot.
|
64 |
|
|
return ((vtable_elt *)(get_method(0)))->pc;
|
65 |
|
|
}
|
66 |
|
|
#else
|
67 |
|
|
void *get_method(int i) { return method[i]; }
|
68 |
|
|
void set_method(int i, void *fptr) { method[i] = fptr; }
|
69 |
|
|
void *get_finalizer() { return get_method(0); }
|
70 |
|
|
#endif
|
71 |
|
|
|
72 |
|
|
static size_t vtable_elt_size() { return sizeof(vtable_elt); }
|
73 |
|
|
|
74 |
|
|
// Given a method index, return byte offset from the vtable pointer.
|
75 |
|
|
static jint idx_to_offset (int index)
|
76 |
|
|
{
|
77 |
|
|
return (2 * sizeof (void *)) + (index * vtable_elt_size ());
|
78 |
|
|
}
|
79 |
|
|
|
80 |
|
|
static _Jv_VTable *new_vtable (int count);
|
81 |
|
|
};
|
82 |
|
|
|
83 |
|
|
union _Jv_word
|
84 |
|
|
{
|
85 |
|
|
jobject o;
|
86 |
|
|
jint i; // Also stores smaller integral types.
|
87 |
|
|
jfloat f;
|
88 |
|
|
jint ia[1]; // Half of _Jv_word2.
|
89 |
|
|
void* p;
|
90 |
|
|
|
91 |
|
|
#if SIZEOF_VOID_P == 8
|
92 |
|
|
// We can safely put a long or a double in here without increasing
|
93 |
|
|
// the size of _Jv_Word; we take advantage of this in the interpreter.
|
94 |
|
|
jlong l;
|
95 |
|
|
jdouble d;
|
96 |
|
|
#endif
|
97 |
|
|
|
98 |
|
|
jclass clazz;
|
99 |
|
|
jstring string;
|
100 |
|
|
struct _Jv_Field *field;
|
101 |
|
|
struct _Jv_Utf8Const *utf8;
|
102 |
|
|
struct _Jv_ResolvedMethod *rmethod;
|
103 |
|
|
};
|
104 |
|
|
|
105 |
|
|
union _Jv_word2
|
106 |
|
|
{
|
107 |
|
|
jint ia[2];
|
108 |
|
|
jlong l;
|
109 |
|
|
jdouble d;
|
110 |
|
|
};
|
111 |
|
|
|
112 |
|
|
union _Jv_value
|
113 |
|
|
{
|
114 |
|
|
jbyte byte_value;
|
115 |
|
|
jshort short_value;
|
116 |
|
|
jchar char_value;
|
117 |
|
|
jint int_value;
|
118 |
|
|
jlong long_value;
|
119 |
|
|
jfloat float_value;
|
120 |
|
|
jdouble double_value;
|
121 |
|
|
jobject object_value;
|
122 |
|
|
};
|
123 |
|
|
|
124 |
|
|
/* Extract a character from a Java-style Utf8 string.
|
125 |
|
|
* PTR points to the current character.
|
126 |
|
|
* LIMIT points to the end of the Utf8 string.
|
127 |
|
|
* PTR is incremented to point after the character thta gets returns.
|
128 |
|
|
* On an error, -1 is returned. */
|
129 |
|
|
#define UTF8_GET(PTR, LIMIT) \
|
130 |
|
|
((PTR) >= (LIMIT) ? -1 \
|
131 |
|
|
: *(PTR) < 128 ? *(PTR)++ \
|
132 |
|
|
: (*(PTR)&0xE0) == 0xC0 && ((PTR)+=2)<=(LIMIT) && ((PTR)[-1]&0xC0) == 0x80 \
|
133 |
|
|
? (((PTR)[-2] & 0x1F) << 6) + ((PTR)[-1] & 0x3F) \
|
134 |
|
|
: (*(PTR) & 0xF0) == 0xE0 && ((PTR) += 3) <= (LIMIT) \
|
135 |
|
|
&& ((PTR)[-2] & 0xC0) == 0x80 && ((PTR)[-1] & 0xC0) == 0x80 \
|
136 |
|
|
? (((PTR)[-3]&0x0F) << 12) + (((PTR)[-2]&0x3F) << 6) + ((PTR)[-1]&0x3F) \
|
137 |
|
|
: ((PTR)++, -1))
|
138 |
|
|
|
139 |
|
|
extern int _Jv_strLengthUtf8(const char* str, int len);
|
140 |
|
|
|
141 |
|
|
typedef struct _Jv_Utf8Const Utf8Const;
|
142 |
|
|
_Jv_Utf8Const *_Jv_makeUtf8Const (const char *s, int len);
|
143 |
|
|
_Jv_Utf8Const *_Jv_makeUtf8Const (jstring string);
|
144 |
|
|
static inline _Jv_Utf8Const *_Jv_makeUtf8Const (const char *s)
|
145 |
|
|
{
|
146 |
|
|
return _Jv_makeUtf8Const (s, strlen (s));
|
147 |
|
|
}
|
148 |
|
|
extern jboolean _Jv_equalUtf8Consts (const _Jv_Utf8Const *, const _Jv_Utf8Const *);
|
149 |
|
|
extern jboolean _Jv_equal (_Jv_Utf8Const *, jstring, jint);
|
150 |
|
|
extern jboolean _Jv_equaln (_Jv_Utf8Const *, jstring, jint);
|
151 |
|
|
|
152 |
|
|
/* Helper class which converts a jstring to a temporary char*.
|
153 |
|
|
Uses the supplied buffer, if non-null. Otherwise, allocates
|
154 |
|
|
the buffer on the heap. Use the JV_TEMP_UTF_STRING macro,
|
155 |
|
|
which follows, to automatically allocate a stack buffer if
|
156 |
|
|
the string is small enough. */
|
157 |
|
|
class _Jv_TempUTFString
|
158 |
|
|
{
|
159 |
|
|
public:
|
160 |
|
|
_Jv_TempUTFString(jstring jstr, char* buf=0);
|
161 |
|
|
~_Jv_TempUTFString();
|
162 |
|
|
|
163 |
|
|
// Accessors
|
164 |
|
|
operator const char*() const
|
165 |
|
|
{
|
166 |
|
|
return buf_;
|
167 |
|
|
}
|
168 |
|
|
const char* buf() const
|
169 |
|
|
{
|
170 |
|
|
return buf_;
|
171 |
|
|
}
|
172 |
|
|
char* buf()
|
173 |
|
|
{
|
174 |
|
|
return buf_;
|
175 |
|
|
}
|
176 |
|
|
|
177 |
|
|
private:
|
178 |
|
|
char* buf_;
|
179 |
|
|
bool heapAllocated_;
|
180 |
|
|
};
|
181 |
|
|
|
182 |
|
|
inline _Jv_TempUTFString::_Jv_TempUTFString (jstring jstr, char* buf)
|
183 |
|
|
: buf_(0), heapAllocated_(false)
|
184 |
|
|
{
|
185 |
|
|
if (!jstr) return;
|
186 |
|
|
jsize len = JvGetStringUTFLength (jstr);
|
187 |
|
|
if (buf)
|
188 |
|
|
buf_ = buf;
|
189 |
|
|
else
|
190 |
|
|
{
|
191 |
|
|
buf_ = (char*) _Jv_Malloc (len+1);
|
192 |
|
|
heapAllocated_ = true;
|
193 |
|
|
}
|
194 |
|
|
|
195 |
|
|
JvGetStringUTFRegion (jstr, 0, jstr->length(), buf_);
|
196 |
|
|
buf_[len] = '\0';
|
197 |
|
|
}
|
198 |
|
|
|
199 |
|
|
inline _Jv_TempUTFString::~_Jv_TempUTFString ()
|
200 |
|
|
{
|
201 |
|
|
if (heapAllocated_)
|
202 |
|
|
_Jv_Free (buf_);
|
203 |
|
|
}
|
204 |
|
|
|
205 |
|
|
/* Macro which uses _Jv_TempUTFString. Allocates a stack-based
|
206 |
|
|
buffer if the string and its null terminator are <= 256
|
207 |
|
|
characters in length. Otherwise, a heap-based buffer is
|
208 |
|
|
used. The parameters to this macro are the variable name
|
209 |
|
|
which is an instance of _Jv_TempUTFString (above) and a
|
210 |
|
|
jstring.
|
211 |
|
|
|
212 |
|
|
Sample Usage:
|
213 |
|
|
|
214 |
|
|
jstring jstr = getAJString();
|
215 |
|
|
JV_TEMP_UTF_STRING(utfstr, jstr);
|
216 |
|
|
printf("The string is: %s\n", utfstr.buf());
|
217 |
|
|
|
218 |
|
|
*/
|
219 |
|
|
#define JV_TEMP_UTF_STRING(utfstr, jstr) \
|
220 |
|
|
jstring utfstr##thejstr = (jstr); \
|
221 |
|
|
jsize utfstr##_len = utfstr##thejstr ? JvGetStringUTFLength (utfstr##thejstr) + 1 : 0; \
|
222 |
|
|
char utfstr##_buf[utfstr##_len <= 256 ? utfstr##_len : 0]; \
|
223 |
|
|
_Jv_TempUTFString utfstr(utfstr##thejstr, sizeof(utfstr##_buf)==0 ? 0 : utfstr##_buf)
|
224 |
|
|
|
225 |
|
|
namespace gcj
|
226 |
|
|
{
|
227 |
|
|
/* Some constants used during lookup of special class methods. */
|
228 |
|
|
extern _Jv_Utf8Const *void_signature; /* "()V" */
|
229 |
|
|
extern _Jv_Utf8Const *clinit_name; /* "<clinit>" */
|
230 |
|
|
extern _Jv_Utf8Const *init_name; /* "<init>" */
|
231 |
|
|
extern _Jv_Utf8Const *finit_name; /* "finit$", */
|
232 |
|
|
|
233 |
|
|
/* Set to true by _Jv_CreateJavaVM. */
|
234 |
|
|
extern bool runtimeInitialized;
|
235 |
|
|
|
236 |
|
|
/* Print out class names as they are initialized. */
|
237 |
|
|
extern bool verbose_class_flag;
|
238 |
|
|
|
239 |
|
|
/* When true, enable the bytecode verifier and BC-ABI verification. */
|
240 |
|
|
extern bool verifyClasses;
|
241 |
|
|
|
242 |
|
|
/* Thread stack size specified by the -Xss runtime argument. */
|
243 |
|
|
extern size_t stack_size;
|
244 |
|
|
|
245 |
|
|
/* The start time */
|
246 |
|
|
extern jlong startTime;
|
247 |
|
|
|
248 |
|
|
/* The VM arguments */
|
249 |
|
|
extern JArray<jstring>* vmArgs;
|
250 |
|
|
|
251 |
|
|
// Currently loaded classes
|
252 |
|
|
extern jint loadedClasses;
|
253 |
|
|
|
254 |
|
|
// Unloaded classes
|
255 |
|
|
extern jlong unloadedClasses;
|
256 |
|
|
}
|
257 |
|
|
|
258 |
|
|
// This class handles all aspects of class preparation and linking.
|
259 |
|
|
class _Jv_Linker
|
260 |
|
|
{
|
261 |
|
|
private:
|
262 |
|
|
typedef unsigned int uaddr __attribute__ ((mode (pointer)));
|
263 |
|
|
|
264 |
|
|
static _Jv_Field *find_field_helper(jclass, _Jv_Utf8Const *, _Jv_Utf8Const *,
|
265 |
|
|
jclass, jclass *);
|
266 |
|
|
static _Jv_Field *find_field(jclass, jclass, jclass *, _Jv_Utf8Const *,
|
267 |
|
|
_Jv_Utf8Const *);
|
268 |
|
|
static void check_loading_constraints (_Jv_Method *, jclass, jclass);
|
269 |
|
|
static void prepare_constant_time_tables(jclass);
|
270 |
|
|
static jshort get_interfaces(jclass, _Jv_ifaces *);
|
271 |
|
|
static void link_symbol_table(jclass);
|
272 |
|
|
static void link_exception_table(jclass);
|
273 |
|
|
static void layout_interface_methods(jclass);
|
274 |
|
|
static void set_vtable_entries(jclass, _Jv_VTable *);
|
275 |
|
|
static void make_vtable(jclass);
|
276 |
|
|
static void ensure_fields_laid_out(jclass);
|
277 |
|
|
static void ensure_class_linked(jclass);
|
278 |
|
|
static void ensure_supers_installed(jclass);
|
279 |
|
|
static void add_miranda_methods(jclass, jclass);
|
280 |
|
|
static void ensure_method_table_complete(jclass);
|
281 |
|
|
static void verify_class(jclass);
|
282 |
|
|
static jshort find_iindex(jclass *, jshort *, jshort);
|
283 |
|
|
static jshort indexof(void *, void **, jshort);
|
284 |
|
|
static int get_alignment_from_class(jclass);
|
285 |
|
|
static void generate_itable(jclass, _Jv_ifaces *, jshort *);
|
286 |
|
|
static jshort append_partial_itable(jclass, jclass, void **, jshort);
|
287 |
|
|
static _Jv_Method *search_method_in_superclasses (jclass cls, jclass klass,
|
288 |
|
|
_Jv_Utf8Const *method_name,
|
289 |
|
|
_Jv_Utf8Const *method_signature,
|
290 |
|
|
jclass *found_class,
|
291 |
|
|
bool check_perms = true);
|
292 |
|
|
static void *create_error_method(_Jv_Utf8Const *, jclass);
|
293 |
|
|
|
294 |
|
|
/* The least significant bit of the signature pointer in a symbol
|
295 |
|
|
table is set to 1 by the compiler if the reference is "special",
|
296 |
|
|
i.e. if it is an access to a private field or method. Extract
|
297 |
|
|
that bit, clearing it in the address and setting the LSB of
|
298 |
|
|
SPECIAL accordingly. */
|
299 |
|
|
static void maybe_adjust_signature (_Jv_Utf8Const *&s, uaddr &special)
|
300 |
|
|
{
|
301 |
|
|
union {
|
302 |
|
|
_Jv_Utf8Const *signature;
|
303 |
|
|
uaddr signature_bits;
|
304 |
|
|
};
|
305 |
|
|
signature = s;
|
306 |
|
|
special = signature_bits & 1;
|
307 |
|
|
signature_bits -= special;
|
308 |
|
|
s = signature;
|
309 |
|
|
}
|
310 |
|
|
|
311 |
|
|
static _Jv_Mutex_t resolve_mutex;
|
312 |
|
|
static void init (void) __attribute__((constructor));
|
313 |
|
|
|
314 |
|
|
public:
|
315 |
|
|
|
316 |
|
|
static bool has_field_p (jclass, _Jv_Utf8Const *);
|
317 |
|
|
static void print_class_loaded (jclass);
|
318 |
|
|
static void resolve_class_ref (jclass, jclass *);
|
319 |
|
|
static void wait_for_state(jclass, int);
|
320 |
|
|
static _Jv_Method *resolve_method_entry (jclass, jclass &,
|
321 |
|
|
int, int,
|
322 |
|
|
bool, bool);
|
323 |
|
|
static _Jv_word resolve_pool_entry (jclass, int, bool =false);
|
324 |
|
|
static void resolve_field (_Jv_Field *, java::lang::ClassLoader *);
|
325 |
|
|
static void verify_type_assertions (jclass);
|
326 |
|
|
static _Jv_Method *search_method_in_class (jclass, jclass,
|
327 |
|
|
_Jv_Utf8Const *,
|
328 |
|
|
_Jv_Utf8Const *,
|
329 |
|
|
bool check_perms = true);
|
330 |
|
|
static void layout_vtable_methods(jclass);
|
331 |
|
|
|
332 |
|
|
static jbyte read_cpool_entry (_Jv_word *data,
|
333 |
|
|
const _Jv_Constants *const pool,
|
334 |
|
|
int index)
|
335 |
|
|
{
|
336 |
|
|
_Jv_MutexLock (&resolve_mutex);
|
337 |
|
|
jbyte tags = pool->tags[index];
|
338 |
|
|
*data = pool->data[index];
|
339 |
|
|
_Jv_MutexUnlock (&resolve_mutex);
|
340 |
|
|
return tags;
|
341 |
|
|
}
|
342 |
|
|
|
343 |
|
|
static void write_cpool_entry (_Jv_word data, jbyte tags,
|
344 |
|
|
_Jv_Constants *pool,
|
345 |
|
|
int index)
|
346 |
|
|
{
|
347 |
|
|
_Jv_MutexLock (&resolve_mutex);
|
348 |
|
|
pool->data[index] = data;
|
349 |
|
|
pool->tags[index] = tags;
|
350 |
|
|
_Jv_MutexUnlock (&resolve_mutex);
|
351 |
|
|
}
|
352 |
|
|
};
|
353 |
|
|
|
354 |
|
|
/* Type of pointer used as finalizer. */
|
355 |
|
|
typedef void _Jv_FinalizerFunc (jobject);
|
356 |
|
|
|
357 |
|
|
/* Allocate space for a new Java object. */
|
358 |
|
|
void *_Jv_AllocObj (jsize size, jclass cl) __attribute__((__malloc__));
|
359 |
|
|
/* Allocate space for a potentially uninitialized pointer-free object.
|
360 |
|
|
Interesting only with JV_HASH_SYNCHRONIZATION. */
|
361 |
|
|
void *_Jv_AllocPtrFreeObj (jsize size, jclass cl) __attribute__((__malloc__));
|
362 |
|
|
/* Allocate space for an array of Java objects. */
|
363 |
|
|
void *_Jv_AllocArray (jsize size, jclass cl) __attribute__((__malloc__));
|
364 |
|
|
/* Allocate space that is known to be pointer-free. */
|
365 |
|
|
void *_Jv_AllocBytes (jsize size) __attribute__((__malloc__));
|
366 |
|
|
/* Allocate space for a new non-Java object, which does not have the usual
|
367 |
|
|
Java object header but may contain pointers to other GC'ed objects. */
|
368 |
|
|
void *_Jv_AllocRawObj (jsize size) __attribute__((__malloc__));
|
369 |
|
|
/* Allocate a double-indirect pointer to a _Jv_ClosureList such that
|
370 |
|
|
the _Jv_ClosureList gets automatically finalized when it is no
|
371 |
|
|
longer reachable, not even by other finalizable objects. */
|
372 |
|
|
_Jv_ClosureList **_Jv_ClosureListFinalizer (void) __attribute__((__malloc__));
|
373 |
|
|
/* Explicitly throw an out-of-memory exception. */
|
374 |
|
|
void _Jv_ThrowNoMemory() __attribute__((__noreturn__));
|
375 |
|
|
/* Allocate an object with a single pointer. The first word is reserved
|
376 |
|
|
for the GC, and the second word is the traced pointer. */
|
377 |
|
|
void *_Jv_AllocTraceOne (jsize size /* incl. reserved slot */);
|
378 |
|
|
/* Ditto, but for two traced pointers. */
|
379 |
|
|
void *_Jv_AllocTraceTwo (jsize size /* incl. reserved slot */);
|
380 |
|
|
/* Initialize the GC. */
|
381 |
|
|
void _Jv_InitGC (void);
|
382 |
|
|
/* Register a finalizer. */
|
383 |
|
|
void _Jv_RegisterFinalizer (void *object, _Jv_FinalizerFunc *method);
|
384 |
|
|
/* Compute the GC descriptor for a class */
|
385 |
|
|
void * _Jv_BuildGCDescr(jclass);
|
386 |
|
|
|
387 |
|
|
/* Allocate some unscanned, unmoveable memory. Return NULL if out of
|
388 |
|
|
memory. */
|
389 |
|
|
void *_Jv_MallocUnchecked (jsize size) __attribute__((__malloc__));
|
390 |
|
|
|
391 |
|
|
/* Initialize finalizers. The argument is a function to be called
|
392 |
|
|
when a finalizer is ready to be run. */
|
393 |
|
|
void _Jv_GCInitializeFinalizers (void (*notifier) (void));
|
394 |
|
|
/* Run finalizers for objects ready to be finalized.. */
|
395 |
|
|
void _Jv_RunFinalizers (void);
|
396 |
|
|
/* Run all finalizers. Should be called only before exit. */
|
397 |
|
|
void _Jv_RunAllFinalizers (void);
|
398 |
|
|
/* Perform a GC. */
|
399 |
|
|
void _Jv_RunGC (void);
|
400 |
|
|
/* Disable and enable GC. */
|
401 |
|
|
void _Jv_DisableGC (void);
|
402 |
|
|
void _Jv_EnableGC (void);
|
403 |
|
|
/* Register a disappearing link. This is a field F which should be
|
404 |
|
|
cleared when *F is found to be inaccessible. This is used in the
|
405 |
|
|
implementation of java.lang.ref.Reference. */
|
406 |
|
|
void _Jv_GCRegisterDisappearingLink (jobject *objp);
|
407 |
|
|
/* Return true if OBJECT should be reclaimed. This is used to
|
408 |
|
|
implement soft references. */
|
409 |
|
|
jboolean _Jv_GCCanReclaimSoftReference (jobject obj);
|
410 |
|
|
|
411 |
|
|
/* Register a finalizer for a String object. This is only used by
|
412 |
|
|
the intern() implementation. */
|
413 |
|
|
void _Jv_RegisterStringFinalizer (jobject str);
|
414 |
|
|
/* This is called to actually finalize a possibly-intern()d String. */
|
415 |
|
|
void _Jv_FinalizeString (jobject str);
|
416 |
|
|
|
417 |
|
|
/* Return approximation of total size of heap. */
|
418 |
|
|
long _Jv_GCTotalMemory (void);
|
419 |
|
|
/* Return approximation of total free memory. */
|
420 |
|
|
long _Jv_GCFreeMemory (void);
|
421 |
|
|
|
422 |
|
|
/* Set initial heap size. If SIZE==0, ignore. Should be run before
|
423 |
|
|
_Jv_InitGC. Not required to have any actual effect. */
|
424 |
|
|
void _Jv_GCSetInitialHeapSize (size_t size);
|
425 |
|
|
|
426 |
|
|
/* Set maximum heap size. If SIZE==0, unbounded. Should be run
|
427 |
|
|
before _Jv_InitGC. Not required to have any actual effect. */
|
428 |
|
|
void _Jv_GCSetMaximumHeapSize (size_t size);
|
429 |
|
|
|
430 |
|
|
/* External interface to setting the heap size. Parses ARG (a number
|
431 |
|
|
which can optionally have "k" or "m" appended and calls
|
432 |
|
|
_Jv_GCSetInitialHeapSize. */
|
433 |
|
|
void _Jv_SetInitialHeapSize (const char *arg);
|
434 |
|
|
|
435 |
|
|
/* External interface to setting the maximum heap size. Parses ARG (a
|
436 |
|
|
number which can optionally have "k" or "m" appended and calls
|
437 |
|
|
_Jv_GCSetMaximumHeapSize. */
|
438 |
|
|
void _Jv_SetMaximumHeapSize (const char *arg);
|
439 |
|
|
|
440 |
|
|
/* External interface for setting the GC_free_space_divisor. Calls
|
441 |
|
|
GC_set_free_space_divisor and returns the old value. */
|
442 |
|
|
int _Jv_SetGCFreeSpaceDivisor (int div);
|
443 |
|
|
|
444 |
|
|
/* Free the method cache, if one was allocated. This is only called
|
445 |
|
|
during thread deregistration. */
|
446 |
|
|
void _Jv_FreeMethodCache ();
|
447 |
|
|
|
448 |
|
|
/* Set the stack size for threads. Parses ARG, a number which can
|
449 |
|
|
optionally have "k" or "m" appended. */
|
450 |
|
|
void _Jv_SetStackSize (const char *arg);
|
451 |
|
|
|
452 |
|
|
extern "C" void JvRunMain (jclass klass, int argc, const char **argv);
|
453 |
|
|
extern "C" void JvRunMainName (const char *name, int argc, const char **argv);
|
454 |
|
|
|
455 |
|
|
void _Jv_RunMain (jclass klass, const char *name, int argc, const char **argv,
|
456 |
|
|
bool is_jar);
|
457 |
|
|
|
458 |
|
|
void _Jv_RunMain (struct _Jv_VMInitArgs *vm_args, jclass klass,
|
459 |
|
|
const char *name, int argc, const char **argv, bool is_jar);
|
460 |
|
|
|
461 |
|
|
// Delayed until after _Jv_AllocRawObj is declared.
|
462 |
|
|
inline _Jv_VTable *
|
463 |
|
|
_Jv_VTable::new_vtable (int count)
|
464 |
|
|
{
|
465 |
|
|
size_t size = sizeof(_Jv_VTable) + (count - 1) * vtable_elt_size ();
|
466 |
|
|
return (_Jv_VTable *) _Jv_AllocRawObj (size);
|
467 |
|
|
}
|
468 |
|
|
|
469 |
|
|
// Determine if METH gets an entry in a VTable.
|
470 |
|
|
static inline jboolean _Jv_isVirtualMethod (_Jv_Method *meth)
|
471 |
|
|
{
|
472 |
|
|
using namespace java::lang::reflect;
|
473 |
|
|
return (((meth->accflags & (Modifier::STATIC | Modifier::PRIVATE)) == 0)
|
474 |
|
|
&& meth->name->first() != '<');
|
475 |
|
|
}
|
476 |
|
|
|
477 |
|
|
// This function is used to determine the hash code of an object.
|
478 |
|
|
inline jint
|
479 |
|
|
_Jv_HashCode (jobject obj)
|
480 |
|
|
{
|
481 |
|
|
// This was chosen to yield relatively well distributed results on
|
482 |
|
|
// both 32- and 64-bit architectures. Note 0x7fffffff is prime.
|
483 |
|
|
// FIXME: we assume sizeof(long) == sizeof(void *).
|
484 |
|
|
return (jint) ((unsigned long) obj % 0x7fffffff);
|
485 |
|
|
}
|
486 |
|
|
|
487 |
|
|
// Return a raw pointer to the elements of an array given the array
|
488 |
|
|
// and its element type. You might think we could just pick a single
|
489 |
|
|
// array type and use elements() on it, but we can't because we must
|
490 |
|
|
// account for alignment of the element type. When ARRAY is null, we
|
491 |
|
|
// obtain the number of bytes taken by the base part of the array.
|
492 |
|
|
inline char *
|
493 |
|
|
_Jv_GetArrayElementFromElementType (jobject array,
|
494 |
|
|
jclass element_type)
|
495 |
|
|
{
|
496 |
|
|
char *elts;
|
497 |
|
|
if (element_type == JvPrimClass (byte))
|
498 |
|
|
elts = (char *) elements ((jbyteArray) array);
|
499 |
|
|
else if (element_type == JvPrimClass (short))
|
500 |
|
|
elts = (char *) elements ((jshortArray) array);
|
501 |
|
|
else if (element_type == JvPrimClass (int))
|
502 |
|
|
elts = (char *) elements ((jintArray) array);
|
503 |
|
|
else if (element_type == JvPrimClass (long))
|
504 |
|
|
elts = (char *) elements ((jlongArray) array);
|
505 |
|
|
else if (element_type == JvPrimClass (boolean))
|
506 |
|
|
elts = (char *) elements ((jbooleanArray) array);
|
507 |
|
|
else if (element_type == JvPrimClass (char))
|
508 |
|
|
elts = (char *) elements ((jcharArray) array);
|
509 |
|
|
else if (element_type == JvPrimClass (float))
|
510 |
|
|
elts = (char *) elements ((jfloatArray) array);
|
511 |
|
|
else if (element_type == JvPrimClass (double))
|
512 |
|
|
elts = (char *) elements ((jdoubleArray) array);
|
513 |
|
|
else
|
514 |
|
|
elts = (char *) elements ((jobjectArray) array);
|
515 |
|
|
return elts;
|
516 |
|
|
}
|
517 |
|
|
|
518 |
|
|
extern "C" void _Jv_ThrowBadArrayIndex (jint bad_index)
|
519 |
|
|
__attribute__((noreturn));
|
520 |
|
|
extern "C" void _Jv_ThrowNullPointerException (void)
|
521 |
|
|
__attribute__((noreturn));
|
522 |
|
|
extern "C" void _Jv_ThrowNoSuchMethodError (void)
|
523 |
|
|
__attribute__((noreturn));
|
524 |
|
|
extern "C" void _Jv_ThrowNoSuchFieldError (int)
|
525 |
|
|
__attribute__((noreturn));
|
526 |
|
|
extern "C" jobject _Jv_NewArray (jint type, jint size)
|
527 |
|
|
__attribute__((__malloc__));
|
528 |
|
|
extern "C" jobject _Jv_NewMultiArray (jclass klass, jint dims, ...)
|
529 |
|
|
__attribute__((__malloc__));
|
530 |
|
|
extern "C" void *_Jv_CheckCast (jclass klass, jobject obj);
|
531 |
|
|
extern "C" void *_Jv_LookupInterfaceMethod (jclass klass, Utf8Const *name,
|
532 |
|
|
Utf8Const *signature);
|
533 |
|
|
extern "C" void *_Jv_LookupInterfaceMethodIdx (jclass klass, jclass iface,
|
534 |
|
|
int meth_idx);
|
535 |
|
|
extern "C" void _Jv_CheckArrayStore (jobject array, jobject obj);
|
536 |
|
|
extern "C" void _Jv_RegisterClass (jclass klass);
|
537 |
|
|
extern "C" void _Jv_RegisterClasses (const jclass *classes);
|
538 |
|
|
extern "C" void _Jv_RegisterClasses_Counted (const jclass *classes,
|
539 |
|
|
size_t count);
|
540 |
|
|
extern "C" void _Jv_RegisterResource (void *vptr);
|
541 |
|
|
extern void _Jv_UnregisterClass (_Jv_Utf8Const*, java::lang::ClassLoader*);
|
542 |
|
|
|
543 |
|
|
extern "C" jobject _Jv_UnwrapJNIweakReference (jobject);
|
544 |
|
|
|
545 |
|
|
extern jclass _Jv_FindClass (_Jv_Utf8Const *name,
|
546 |
|
|
java::lang::ClassLoader *loader);
|
547 |
|
|
|
548 |
|
|
extern jclass _Jv_FindClassNoException (_Jv_Utf8Const *name,
|
549 |
|
|
java::lang::ClassLoader *loader);
|
550 |
|
|
|
551 |
|
|
extern jclass _Jv_FindClassFromSignature (char *,
|
552 |
|
|
java::lang::ClassLoader *loader,
|
553 |
|
|
char ** = NULL);
|
554 |
|
|
|
555 |
|
|
extern jclass _Jv_FindClassFromSignatureNoException (char *,
|
556 |
|
|
java::lang::ClassLoader *loader,
|
557 |
|
|
char ** = NULL);
|
558 |
|
|
|
559 |
|
|
extern void _Jv_GetTypesFromSignature (jmethodID method,
|
560 |
|
|
jclass declaringClass,
|
561 |
|
|
JArray<jclass> **arg_types_out,
|
562 |
|
|
jclass *return_type_out);
|
563 |
|
|
|
564 |
|
|
extern jboolean _Jv_CheckAccess (jclass self_klass, jclass other_klass,
|
565 |
|
|
jint flags);
|
566 |
|
|
|
567 |
|
|
extern jobject _Jv_CallAnyMethodA (jobject obj, jclass return_type,
|
568 |
|
|
jmethodID meth, jboolean is_constructor,
|
569 |
|
|
JArray<jclass> *parameter_types,
|
570 |
|
|
jobjectArray args,
|
571 |
|
|
jclass iface = NULL);
|
572 |
|
|
|
573 |
|
|
union jvalue;
|
574 |
|
|
extern void _Jv_CallAnyMethodA (jobject obj,
|
575 |
|
|
jclass return_type,
|
576 |
|
|
jmethodID meth,
|
577 |
|
|
jboolean is_constructor,
|
578 |
|
|
jboolean is_virtual_call,
|
579 |
|
|
JArray<jclass> *parameter_types,
|
580 |
|
|
const jvalue *args,
|
581 |
|
|
jvalue *result,
|
582 |
|
|
jboolean is_jni_call = true,
|
583 |
|
|
jclass iface = NULL);
|
584 |
|
|
|
585 |
|
|
extern void _Jv_CheckOrCreateLoadingConstraint (jclass,
|
586 |
|
|
java::lang::ClassLoader *);
|
587 |
|
|
|
588 |
|
|
extern jobject _Jv_NewMultiArray (jclass, jint ndims, jint* dims)
|
589 |
|
|
__attribute__((__malloc__));
|
590 |
|
|
|
591 |
|
|
extern "C" void _Jv_ThrowAbstractMethodError () __attribute__((__noreturn__));
|
592 |
|
|
|
593 |
|
|
/* Checked divide subroutines. */
|
594 |
|
|
extern "C"
|
595 |
|
|
{
|
596 |
|
|
jint _Jv_divI (jint, jint);
|
597 |
|
|
jint _Jv_remI (jint, jint);
|
598 |
|
|
jlong _Jv_divJ (jlong, jlong);
|
599 |
|
|
jlong _Jv_remJ (jlong, jlong);
|
600 |
|
|
}
|
601 |
|
|
|
602 |
|
|
/* Get the number of arguments (cf. argc) or 0 if our argument
|
603 |
|
|
list was never initialized. */
|
604 |
|
|
extern int _Jv_GetNbArgs (void);
|
605 |
|
|
|
606 |
|
|
/* Get the specified argument (cf. argv[index]) or "" if either
|
607 |
|
|
our argument list was never initialized or the specified index
|
608 |
|
|
is out of bounds. */
|
609 |
|
|
extern const char * _Jv_GetSafeArg (int index);
|
610 |
|
|
|
611 |
|
|
/* Sets our argument list. Can be used by programs with non-standard
|
612 |
|
|
entry points. */
|
613 |
|
|
extern void _Jv_SetArgs (int argc, const char **argv);
|
614 |
|
|
|
615 |
|
|
/* Get the name of the running executable. */
|
616 |
|
|
extern const char *_Jv_ThisExecutable (void);
|
617 |
|
|
|
618 |
|
|
/* Return a pointer to a symbol in executable or loaded library. */
|
619 |
|
|
void *_Jv_FindSymbolInExecutable (const char *);
|
620 |
|
|
|
621 |
|
|
/* Initialize JNI. */
|
622 |
|
|
extern void _Jv_JNI_Init (void);
|
623 |
|
|
|
624 |
|
|
/* Get or set the per-thread JNIEnv used by the invocation API. */
|
625 |
|
|
_Jv_JNIEnv *_Jv_GetCurrentJNIEnv ();
|
626 |
|
|
void _Jv_SetCurrentJNIEnv (_Jv_JNIEnv *);
|
627 |
|
|
|
628 |
|
|
/* Free a JNIEnv. */
|
629 |
|
|
void _Jv_FreeJNIEnv (_Jv_JNIEnv *);
|
630 |
|
|
|
631 |
|
|
extern "C" void _Jv_JNI_PopSystemFrame (_Jv_JNIEnv *);
|
632 |
|
|
_Jv_JNIEnv *_Jv_GetJNIEnvNewFrameWithLoader (::java::lang::ClassLoader *);
|
633 |
|
|
|
634 |
|
|
struct _Jv_JavaVM;
|
635 |
|
|
_Jv_JavaVM *_Jv_GetJavaVM ();
|
636 |
|
|
|
637 |
|
|
/* Get a JVMTI environment */
|
638 |
|
|
struct _Jv_JVMTIEnv;
|
639 |
|
|
_Jv_JVMTIEnv *_Jv_GetJVMTIEnv (void);
|
640 |
|
|
|
641 |
|
|
/* Initialize JVMTI */
|
642 |
|
|
extern void _Jv_JVMTI_Init (void);
|
643 |
|
|
|
644 |
|
|
// Some verification functions from defineclass.cc.
|
645 |
|
|
bool _Jv_VerifyFieldSignature (_Jv_Utf8Const*sig);
|
646 |
|
|
bool _Jv_VerifyMethodSignature (_Jv_Utf8Const*sig);
|
647 |
|
|
bool _Jv_VerifyClassName (unsigned char* ptr, _Jv_ushort length);
|
648 |
|
|
bool _Jv_VerifyClassName (_Jv_Utf8Const *name);
|
649 |
|
|
bool _Jv_VerifyIdentifier (_Jv_Utf8Const *);
|
650 |
|
|
bool _Jv_ClassNameSamePackage (_Jv_Utf8Const *name1, _Jv_Utf8Const *name2);
|
651 |
|
|
|
652 |
|
|
struct _Jv_core_chain
|
653 |
|
|
{
|
654 |
|
|
int name_length;
|
655 |
|
|
const char *name;
|
656 |
|
|
int data_length;
|
657 |
|
|
const void *data;
|
658 |
|
|
|
659 |
|
|
struct _Jv_core_chain *next;
|
660 |
|
|
};
|
661 |
|
|
|
662 |
|
|
// This is called when new core data is loaded.
|
663 |
|
|
extern void (*_Jv_RegisterCoreHook) (_Jv_core_chain *);
|
664 |
|
|
|
665 |
|
|
_Jv_core_chain *_Jv_FindCore (_Jv_core_chain *node, jstring name);
|
666 |
|
|
void _Jv_FreeCoreChain (_Jv_core_chain *chain);
|
667 |
|
|
|
668 |
|
|
#ifdef ENABLE_JVMPI
|
669 |
|
|
|
670 |
|
|
#include "jvmpi.h"
|
671 |
|
|
|
672 |
|
|
extern void (*_Jv_JVMPI_Notify_OBJECT_ALLOC) (JVMPI_Event *event);
|
673 |
|
|
extern void (*_Jv_JVMPI_Notify_THREAD_START) (JVMPI_Event *event);
|
674 |
|
|
extern void (*_Jv_JVMPI_Notify_THREAD_END) (JVMPI_Event *event);
|
675 |
|
|
#endif
|
676 |
|
|
|
677 |
|
|
/* FIXME: this should really be defined in some more generic place */
|
678 |
|
|
#define ROUND(V, A) (((((unsigned) (V))-1) | ((A)-1))+1)
|
679 |
|
|
|
680 |
|
|
extern void _Jv_RegisterBootstrapPackages ();
|
681 |
|
|
|
682 |
|
|
#define FLAG_BINARYCOMPAT_ABI (1<<31) /* Class is built with the BC-ABI. */
|
683 |
|
|
|
684 |
|
|
#define FLAG_BOOTSTRAP_LOADER (1<<30) /* Used when defining a class that
|
685 |
|
|
should be loaded by the bootstrap
|
686 |
|
|
loader. */
|
687 |
|
|
|
688 |
|
|
// These are used to find ABI versions we recognize.
|
689 |
|
|
#define GCJ_CXX_ABI_VERSION (__GNUC__ * 100000 + __GNUC_MINOR__ * 1000)
|
690 |
|
|
|
691 |
|
|
// This is the old-style BC version ID used by GCJ 4.0.0.
|
692 |
|
|
#define OLD_GCJ_40_BC_ABI_VERSION (4 * 10000 + 0 * 10 + 5)
|
693 |
|
|
|
694 |
|
|
// New style version IDs used by GCJ 4.0.1 and later.
|
695 |
|
|
#define GCJ_40_BC_ABI_VERSION (4 * 100000 + 0 * 1000)
|
696 |
|
|
|
697 |
|
|
void _Jv_CheckABIVersion (unsigned long value);
|
698 |
|
|
|
699 |
|
|
|
700 |
|
|
inline bool
|
701 |
|
|
_Jv_ClassForBootstrapLoader (unsigned long value)
|
702 |
|
|
{
|
703 |
|
|
return (value & FLAG_BOOTSTRAP_LOADER);
|
704 |
|
|
}
|
705 |
|
|
|
706 |
|
|
// It makes the source cleaner if we simply always define this
|
707 |
|
|
// function. If the interpreter is not built, it will never return
|
708 |
|
|
// 'true'.
|
709 |
|
|
extern inline jboolean
|
710 |
|
|
_Jv_IsInterpretedClass (jclass c)
|
711 |
|
|
{
|
712 |
|
|
return (c->accflags & java::lang::reflect::Modifier::INTERPRETED) != 0;
|
713 |
|
|
}
|
714 |
|
|
|
715 |
|
|
// Return true if the class was compiled with the BC ABI.
|
716 |
|
|
extern inline jboolean
|
717 |
|
|
_Jv_IsBinaryCompatibilityABI (jclass c)
|
718 |
|
|
{
|
719 |
|
|
// There isn't really a better test for the ABI type at this point,
|
720 |
|
|
// that will work once the class has been registered.
|
721 |
|
|
return c->otable_syms || c->atable_syms || c->itable_syms;
|
722 |
|
|
}
|
723 |
|
|
|
724 |
|
|
// Returns whether the given class does not really exists (ie. we have no
|
725 |
|
|
// bytecode) but still allows us to do some very conservative actions.
|
726 |
|
|
// E.g. throwing a NoClassDefFoundError with the name of the missing
|
727 |
|
|
// class.
|
728 |
|
|
extern inline jboolean
|
729 |
|
|
_Jv_IsPhantomClass (jclass c)
|
730 |
|
|
{
|
731 |
|
|
return c->state == JV_STATE_PHANTOM;
|
732 |
|
|
}
|
733 |
|
|
|
734 |
|
|
// A helper function defined in prims.cc.
|
735 |
|
|
char* _Jv_PrependVersionedLibdir (char* libpath);
|
736 |
|
|
|
737 |
|
|
|
738 |
|
|
// An enum for use with JvSetThreadState. We use a C++ enum rather
|
739 |
|
|
// than the Java enum to avoid problems with class initialization
|
740 |
|
|
// during VM bootstrap.
|
741 |
|
|
typedef enum
|
742 |
|
|
{
|
743 |
|
|
JV_BLOCKED,
|
744 |
|
|
JV_NEW,
|
745 |
|
|
JV_RUNNABLE,
|
746 |
|
|
JV_TERMINATED,
|
747 |
|
|
JV_TIMED_WAITING,
|
748 |
|
|
JV_WAITING
|
749 |
|
|
} JvThreadState;
|
750 |
|
|
|
751 |
|
|
// Temporarily set the thread's state.
|
752 |
|
|
class JvSetThreadState
|
753 |
|
|
{
|
754 |
|
|
private:
|
755 |
|
|
::java::lang::Thread *thread;
|
756 |
|
|
jint saved;
|
757 |
|
|
|
758 |
|
|
public:
|
759 |
|
|
|
760 |
|
|
// Note that 'cthread' could be NULL -- during VM startup there may
|
761 |
|
|
// not be a Thread available.
|
762 |
|
|
JvSetThreadState(::java::lang::Thread *cthread, JvThreadState nstate)
|
763 |
|
|
: thread (cthread),
|
764 |
|
|
saved (cthread ? cthread->state : (jint)JV_NEW)
|
765 |
|
|
{
|
766 |
|
|
if (thread)
|
767 |
|
|
thread->state = nstate;
|
768 |
|
|
}
|
769 |
|
|
|
770 |
|
|
~JvSetThreadState()
|
771 |
|
|
{
|
772 |
|
|
if (thread)
|
773 |
|
|
thread->state = saved;
|
774 |
|
|
}
|
775 |
|
|
};
|
776 |
|
|
|
777 |
|
|
// This structure is used to represent all the data the native side
|
778 |
|
|
// needs. An object of this type is assigned to the `data' member of
|
779 |
|
|
// the Thread class.
|
780 |
|
|
struct natThread
|
781 |
|
|
{
|
782 |
|
|
// A thread is either alive, dead, or being sent a signal; if it is
|
783 |
|
|
// being sent a signal, it is also alive. Thus, if you want to know
|
784 |
|
|
// if a thread is alive, it is sufficient to test alive_status !=
|
785 |
|
|
// THREAD_DEAD.
|
786 |
|
|
volatile obj_addr_t alive_flag;
|
787 |
|
|
|
788 |
|
|
// These are used to interrupt sleep and join calls. We can share a
|
789 |
|
|
// condition variable here since it only ever gets notified when the thread
|
790 |
|
|
// exits.
|
791 |
|
|
_Jv_Mutex_t join_mutex;
|
792 |
|
|
_Jv_ConditionVariable_t join_cond;
|
793 |
|
|
|
794 |
|
|
// These are used by Unsafe.park() and Unsafe.unpark().
|
795 |
|
|
ParkHelper park_helper;
|
796 |
|
|
|
797 |
|
|
// This is private data for the thread system layer.
|
798 |
|
|
_Jv_Thread_t *thread;
|
799 |
|
|
|
800 |
|
|
// Each thread has its own JNI object.
|
801 |
|
|
_Jv_JNIEnv *jni_env;
|
802 |
|
|
};
|
803 |
|
|
|
804 |
|
|
#endif /* __JAVA_JVM_H__ */
|