#endif /* __cplusplus */
+/* FIXME: this is wrong. */
+typedef jobject jweak;
+
/* Version numbers. */
#define JNI_VERSION_1_1 0x00010001
#define JNI_VERSION_1_2 0x00010002
typedef void * (*_Jv_func)(...);
+/* This structure is used when registering native methods. */
+typedef struct
+{
+ char *name;
+ char *signature;
+ void *fnPtr; /* Sigh. */
+} JNINativeMethod;
+
+/* FIXME: this is just a placeholder. */
+typedef int JavaVM;
+
struct JNINativeInterface
{
_Jv_func reserved0;
_Jv_func reserved1;
_Jv_func reserved2;
_Jv_func reserved3;
- jint (*GetVersion) (JNIEnv*);
- _Jv_func DefineClass;
- _Jv_func FindClass;
- _Jv_func reserved4;
- _Jv_func reserved5;
- _Jv_func reserved6;
- jclass (*GetSuperclass) (JNIEnv*, jclass);
- jboolean (*IsAssignableFrom) (JNIEnv*, jclass, jclass);
- _Jv_func reserved7;
- jint (*Throw) (JNIEnv*, jthrowable);
- jint (*ThrowNew) (JNIEnv*, jclass, const char *);
+
+ jint (*GetVersion) (JNIEnv *);
+ jclass (*DefineClass) (JNIEnv *, jobject,
+ const jbyte *, jsize);
+ jclass (*FindClass) (JNIEnv *, const char *);
+
+ jmethodID (*FromReflectedMethod) (JNIEnv *, jobject);
+ jfieldID (*FromReflectedField) (JNIEnv *, jobject);
+ jobject (*ToReflectedMethod) (JNIEnv *, jclass, jmethodID,
+ jboolean);
+
+ jclass (*GetSuperclass) (JNIEnv *, jclass);
+ jboolean (*IsAssignableFrom) (JNIEnv *, jclass, jclass);
+
+ jobject (*ToReflectedField) (JNIEnv *, jclass, jfieldID,
+ jboolean);
+
+ jint (*Throw) (JNIEnv *, jthrowable);
+ jint (*ThrowNew) (JNIEnv *, jclass, const char *);
jthrowable (*ExceptionOccurred) (JNIEnv *);
void (*ExceptionDescribe) (JNIEnv *);
void (*ExceptionClear) (JNIEnv *);
void (*FatalError) (JNIEnv *, const char *);
- _Jv_func reserved8;
- _Jv_func reserved9;
- _Jv_func NewGlobalRef;
- _Jv_func DeleteGlobalRef;
- _Jv_func DeleteLocalRef;
+
+ jint (*PushLocalFrame) (JNIEnv *, jint);
+ jobject (*PopLocalFrame) (JNIEnv *, jobject result);
+
+ jobject (*NewGlobalRef) (JNIEnv *, jobject);
+ void (*DeleteGlobalRef) (JNIEnv *, jobject);
+ void (*DeleteLocalRef) (JNIEnv *, jobject);;
jboolean (*IsSameObject) (JNIEnv *, jobject, jobject);
- _Jv_func reserved10;
- _Jv_func reserved11;
+
+ jobject (*NewLocalRef) (JNIEnv *, jobject);
+ jint (*EnsureLocalCapacity) (JNIEnv *, jint);
jobject (*AllocObject) (JNIEnv *, jclass);
jobject (*NewObject) (JNIEnv *, jclass, jmethodID, ...);
void (*SetDoubleArrayRegion) (JNIEnv *, jbooleanArray,
jsize, jsize, jboolean *);
- _Jv_func RegisterNatives;
- _Jv_func UnregisterNatives;
+ jint (*RegisterNatives) (JNIEnv *, jclass,
+ const JNINativeMethod *, jint);
+ jint (*UnregisterNatives) (JNIEnv *, jclass);
jint (*MonitorEnter) (JNIEnv *, jobject);
jint (*MonitorExit) (JNIEnv *, jobject);
- _Jv_func GetJavaVM;
-};
+ jint (*GetJavaVM) (JNIEnv *, JavaVM **);
-/* This structure is used when registering native methods. */
-typedef struct
-{
- char *name;
- char *signature;
- void *fnPtr; /* Sigh. */
-} JNINativeMethod;
+ void (*GetStringRegion) (JNIEnv *, jstring, jsize,
+ jsize, jchar *);
+ void (*GetStringUTFRegion) (JNIEnv *, jstring, jsize,
+ jsize, char *);
+
+ void * (*GetPrimitiveArrayCritical) (JNIEnv *, jarray, jboolean *);
+ void (*ReleasePrimitiveArrayCritical) (JNIEnv *, jarray, void *, jint);
+
+ const jchar * (*GetStringCritical) (JNIEnv *, jstring, jboolean *);
+ void (*ReleaseStringCritical) (JNIEnv *, jstring, const jchar *);
+
+ jweak (*NewWeakGlobalRef) (JNIEnv *, jobject);
+ void (*DeleteWeakGlobalRef) (JNIEnv *, jweak);
+
+ jboolean (*ExceptionCheck) (JNIEnv *);
+};
#ifdef __cplusplus
/* The method table. */
struct JNINativeInterface *p;
+ /* FIXME: this is really ugly. */
+#ifndef __GCJ_JNI_IMPL__
private:
+#endif
/* The current exception. */
jthrowable ex;
- /* This doesn't really protect the private contents, because anybody
- can set this macro. However, if they do set it then they at
- least know they are doing something unportable. */
-#ifdef GCJ_JV_JNIENV_FRIEND
- GCJ_JV_JNIENV_FRIEND;
-#endif
+ /* The class of the current native method. */
+ jclass klass;
public:
jclass GetSuperclass (jclass cl)
#include <stddef.h>
-// Must define this before jni.h.
-#define GCJ_JV_JNIENV_FRIEND \
- friend jthrowable &get_throwable (JNIEnv *)
+// Define this before including jni.h.
+#define __GCJ_JNI_IMPL__
#include <gcj/cni.h>
#include <jvm.h>
#include <java-assert.h>
#include <jni.h>
-#include <gcj/field.h>
+
+#include <java/lang/Class.h>
+#include <java/lang/ClassLoader.h>
#include <java/lang/Throwable.h>
#include <java/lang/ArrayIndexOutOfBoundsException.h>
+#include <java/lang/StringIndexOutOfBoundsException.h>
#include <java/lang/InstantiationException.h>
#include <java/lang/NoSuchFieldError.h>
#include <java/lang/NoSuchMethodError.h>
#include <java/lang/reflect/Constructor.h>
+#include <java/lang/reflect/Method.h>
#include <java/lang/reflect/Modifier.h>
+#include <gcj/method.h>
+#include <gcj/field.h>
+
#define ClassClass _CL_Q34java4lang5Class
extern java::lang::Class ClassClass;
#define ObjectClass _CL_Q34java4lang6Object
extern java::lang::Class ObjectClass;
+#define MethodClass _CL_Q44java4lang7reflect6Method
+extern java::lang::Class MethodClass;
+
// This enum is used to select different template instantiations in
// the invocation code.
enum invocation_type
constructor
};
+// Forward declaration.
+extern struct JNINativeInterface _Jv_JNIFunctions;
+
\f
// Tell the GC that a certain pointer is live.
// FIXME.
}
-// Return throwable in env.
-jthrowable &
-get_throwable (JNIEnv *env)
-{
- return env->ex;
-}
-
\f
static jint
}
static jclass
+_Jv_JNI_DefineClass (JNIEnv *, jobject loader,
+ const jbyte *buf, jsize bufLen)
+{
+ jbyteArray bytes = JvNewByteArray (bufLen);
+ jbyte *elts = elements (bytes);
+ memcpy (elts, buf, bufLen * sizeof (jbyte));
+
+ java::lang::ClassLoader *l
+ = reinterpret_cast<java::lang::ClassLoader *> (loader);
+
+ // FIXME: exception processing.
+ jclass result = l->defineClass (bytes, 0, bufLen);
+ return result;
+}
+
+static jclass
+_Jv_JNI_FindClass (JNIEnv *env, const char *name)
+{
+ // FIXME: assume that NAME isn't too long.
+ int len = strlen (name);
+ char s[len + 1];
+ for (int i = 0; i <= len; ++i)
+ s[i] = (name[i] == '/') ? '.' : name[i];
+ jstring n = JvNewStringUTF (s);
+
+ java::lang::ClassLoader *loader;
+ if (env->klass == NULL)
+ {
+ // FIXME: should use getBaseClassLoader, but we don't have that
+ // yet.
+ loader = java::lang::ClassLoader::getSystemClassLoader ();
+ }
+ else
+ loader = env->klass->getClassLoader ();
+
+ // FIXME: exception processing.
+ jclass r = loader->findClass (n);
+
+ return r;
+}
+
+static jclass
_Jv_JNI_GetSuperclass (JNIEnv *, jclass clazz)
{
return clazz->getSuperclass ();
}
static jboolean
-IsAssignableFrom(JNIEnv *, jclass clazz1, jclass clazz2)
+_Jv_JNI_IsAssignableFrom(JNIEnv *, jclass clazz1, jclass clazz2)
{
return clazz1->isAssignableFrom (clazz2);
}
static jint
_Jv_JNI_Throw (JNIEnv *env, jthrowable obj)
{
- get_throwable (env) = obj;
+ env->ex = obj;
return 0;
}
// FIXME: exception processing.
jobject obj = cons->newInstance (values);
- get_throwable (env) = reinterpret_cast<jthrowable> (obj);
+ env->ex = reinterpret_cast<jthrowable> (obj);
return 0;
}
static jthrowable
_Jv_JNI_ExceptionOccurred (JNIEnv *env)
{
- return get_throwable (env);
+ // FIXME: create local reference.
+ return env->ex;
}
static void
_Jv_JNI_ExceptionDescribe (JNIEnv *env)
{
- if (get_throwable (env) != NULL)
- get_throwable (env)->printStackTrace();
+ if (env->ex != NULL)
+ env->ex->printStackTrace();
}
static void
_Jv_JNI_ExceptionClear (JNIEnv *env)
{
- get_throwable (env) = NULL;
+ env->ex = NULL;
+}
+
+static jboolean
+_Jv_JNI_ExceptionCheck (JNIEnv *env)
+{
+ return env->ex != NULL;
}
static void
jobject obj = NULL;
using namespace java::lang::reflect;
if (clazz->isInterface() || Modifier::isAbstract(clazz->getModifiers()))
- get_throwable (env) = new java::lang::InstantiationException ();
+ env->ex = new java::lang::InstantiationException ();
else
{
// FIXME: exception processing.
clazz = clazz->getSuperclass ();
}
- get_throwable (env) = new java::lang::NoSuchMethodError ();
+ env->ex = new java::lang::NoSuchMethodError ();
return NULL;
}
arg_types, args, &result);
if (ex != NULL)
- get_throwable (env) = ex;
+ env->ex = ex;
// We cheat a little here. FIXME.
return * (T *) &result;
arg_types, args, &result);
if (ex != NULL)
- get_throwable (env) = ex;
+ env->ex = ex;
// We cheat a little here. FIXME.
return * (T *) &result;
arg_types, args, NULL);
if (ex != NULL)
- get_throwable (env) = ex;
+ env->ex = ex;
}
template<invocation_type style>
arg_types, args, NULL);
if (ex != NULL)
- get_throwable (env) = ex;
+ env->ex = ex;
}
// Functions with this signature are used to implement functions in
clazz = clazz->getSuperclass ();
}
- get_throwable (env) = new java::lang::NoSuchFieldError ();
+ env->ex = new java::lang::NoSuchFieldError ();
return NULL;
}
_Jv_Free ((void *) utf);
}
+static void
+_Jv_JNI_GetStringRegion (JNIEnv *env, jstring string, jsize start, jsize len,
+ jchar *buf)
+{
+ jchar *result = _Jv_GetStringChars (string);
+ if (start < 0 || start > string->length ()
+ || len < 0 || start + len > string->length ())
+ env->ex = new java::lang::StringIndexOutOfBoundsException ();
+ else
+ memcpy (buf, &result[start], len * sizeof (jchar));
+}
+
+static void
+_Jv_JNI_GetStringUTFRegion (JNIEnv *env, jstring str, jsize start,
+ jsize len, char *buf)
+{
+ if (start < 0 || start > str->length ()
+ || len < 0 || start + len > str->length ())
+ env->ex = new java::lang::StringIndexOutOfBoundsException ();
+ else
+ _Jv_GetStringUTFRegion (str, start, len, buf);
+}
+
+static const jchar *
+_Jv_JNI_GetStringCritical (JNIEnv *, jstring str, jboolean *isCopy)
+{
+ jchar *result = _Jv_GetStringChars (str);
+ if (isCopy)
+ *isCopy = false;
+ return result;
+}
+
+static void
+_Jv_JNI_ReleaseStringCritical (JNIEnv *, jstring, const jchar *)
+{
+ // Nothing.
+}
+
static jsize
_Jv_JNI_GetArrayLength (JNIEnv *, jarray array)
{
if (start < 0 || len >= array->length || start + len >= array->length)
{
// FIXME: index.
- get_throwable (env) = new java::lang::ArrayIndexOutOfBoundsException ();
+ env->ex = new java::lang::ArrayIndexOutOfBoundsException ();
}
else
{
if (start < 0 || len >= array->length || start + len >= array->length)
{
// FIXME: index.
- get_throwable (env) = new java::lang::ArrayIndexOutOfBoundsException ();
+ env->ex = new java::lang::ArrayIndexOutOfBoundsException ();
}
else
{
}
}
+static void *
+_Jv_JNI_GetPrimitiveArrayCritical (JNIEnv *, jarray array,
+ jboolean *isCopy)
+{
+ // FIXME: does this work?
+ jclass klass = array->getClass()->getComponentType();
+ JvAssert (klass->isPrimitive ());
+ char *r = _Jv_GetArrayElementFromElementType (array, klass);
+ if (isCopy)
+ *isCopy = false;
+ return r;
+}
+
+static void
+_Jv_JNI_ReleasePrimitiveArrayCritical (JNIEnv *, jarray, void *, jint)
+{
+ // Nothing.
+}
+
static jint
_Jv_JNI_MonitorEnter (JNIEnv *, jobject obj)
{
// JDK 1.2
jobject
-_Jv_JNI_ToReflectedField (JNIEnv *, jclass cls, jfieldID fieldID)
+_Jv_JNI_ToReflectedField (JNIEnv *, jclass cls, jfieldID fieldID,
+ jboolean)
{
+ // FIXME: exception processing.
java::lang::reflect::Field *field = new java::lang::reflect::Field();
field->declaringClass = cls;
field->offset = (char*) fieldID - (char *) cls->fields;
field->name = _Jv_NewStringUtf8Const (fieldID->getNameUtf8Const (cls));
+ // FIXME: make a local reference.
return field;
}
// JDK 1.2
-jfieldID
-_Jv_JNI_FromReflectedField (JNIEnv *, java::lang::reflect::Field *field)
+static jfieldID
+_Jv_JNI_FromReflectedField (JNIEnv *, jobject f)
{
+ using namespace java::lang::reflect;
+
+ Field *field = reinterpret_cast<Field *> (f);
return _Jv_FromReflectedField (field);
}
+jobject
+_Jv_JNI_ToReflectedMethod (JNIEnv *, jclass klass, jmethodID id,
+ jboolean)
+{
+ using namespace java::lang::reflect;
+
+ // FIXME.
+ static _Jv_Utf8Const *init_name = _Jv_makeUtf8Const ("<init>", 6);
+
+ jobject result;
+ if (_Jv_equalUtf8Consts (id->name, init_name))
+ {
+ // A constructor.
+ Constructor *cons = new Constructor ();
+ cons->offset = (char *) id - (char *) &klass->methods;
+ cons->declaringClass = klass;
+ result = cons;
+ }
+ else
+ {
+ Method *meth = new Method ();
+ meth->offset = (char *) id - (char *) &klass->methods;
+ meth->declaringClass = klass;
+ result = meth;
+ }
+
+ // FIXME: make a local reference.
+ return result;
+}
+
+static jmethodID
+_Jv_JNI_FromReflectedMethod (JNIEnv *, jobject method)
+{
+ using namespace java::lang::reflect;
+ if ((&MethodClass)->isInstance (method))
+ return _Jv_FromReflectedMethod (reinterpret_cast<Method *> (method));
+ return
+ _Jv_FromReflectedConstructor (reinterpret_cast<Constructor *> (method));
+}
+
+\f
+
+// This function is the stub which is used to turn an ordinary (CNI)
+// method call into a JNI call.
+#if 0
+template<typename T>
+static T
+_Jv_JNI_conversion_call (fixme)
+{
+ JNIEnv env;
+
+ env.p = &_Jv_JNIFunctions;
+ env.ex = NULL;
+ env.klass = FIXME;
+
+ T result = FIXME_ffi_call (args);
+
+ if (env.ex)
+ JvThrow (env.ex);
+
+ return T;
+}
+#endif
+
+\f
+
#define NOT_IMPL NULL
#define RESERVED NULL
RESERVED,
RESERVED,
_Jv_JNI_GetVersion,
- NOT_IMPL /* DefineClass */,
- NOT_IMPL /* FindClass */,
- RESERVED,
- RESERVED,
- RESERVED,
+ _Jv_JNI_DefineClass,
+ _Jv_JNI_FindClass,
+ _Jv_JNI_FromReflectedMethod,
+ _Jv_JNI_FromReflectedField,
+ _Jv_JNI_ToReflectedMethod,
_Jv_JNI_GetSuperclass,
- IsAssignableFrom,
- RESERVED,
+ _Jv_JNI_IsAssignableFrom,
+ _Jv_JNI_ToReflectedField,
_Jv_JNI_Throw,
_Jv_JNI_ThrowNew,
_Jv_JNI_ExceptionOccurred,
_Jv_JNI_ExceptionDescribe,
_Jv_JNI_ExceptionClear,
_Jv_JNI_FatalError,
- RESERVED,
- RESERVED,
+ NOT_IMPL,
+ NOT_IMPL,
NOT_IMPL /* NewGlobalRef */,
NOT_IMPL /* DeleteGlobalRef */,
NOT_IMPL /* DeleteLocalRef */,
_Jv_JNI_IsSameObject,
- RESERVED,
- RESERVED,
+ NOT_IMPL,
+ NOT_IMPL,
_Jv_JNI_AllocObject,
_Jv_JNI_NewObject,
_Jv_JNI_NewObjectV,
_Jv_JNI_MonitorEnter,
_Jv_JNI_MonitorExit,
NOT_IMPL /* GetJavaVM */,
+
+ _Jv_JNI_GetStringRegion,
+ _Jv_JNI_GetStringUTFRegion,
+ _Jv_JNI_GetPrimitiveArrayCritical,
+ _Jv_JNI_ReleasePrimitiveArrayCritical,
+ _Jv_JNI_GetStringCritical,
+ _Jv_JNI_ReleaseStringCritical,
+
+ NOT_IMPL /* newweakglobalref */,
+ NOT_IMPL /* deleteweakglobalref */,
+
+ _Jv_JNI_ExceptionCheck
};