summaryrefslogtreecommitdiff
path: root/src/jvm
diff options
context:
space:
mode:
authorJari Vetoniemi <mailroxas@gmail.com>2018-02-19 11:56:51 +0200
committerJari Vetoniemi <mailroxas@gmail.com>2018-02-19 12:00:35 +0200
commita7a253f9d4cc82794c5a5360f3a017fd9b63de9b (patch)
tree540f1dfc6ef3671e710a05cb94e0fd194fee05c8 /src/jvm
parent12d58ade2732e7ce0a644371ca10a1dd234c5bc1 (diff)
jvm: rename fakejvm to jvm
Diffstat (limited to 'src/jvm')
-rw-r--r--src/jvm/jni.h1140
-rw-r--r--src/jvm/jvm.c2402
-rw-r--r--src/jvm/jvm.h82
3 files changed, 3624 insertions, 0 deletions
diff --git a/src/jvm/jni.h b/src/jvm/jni.h
new file mode 100644
index 0000000..ad954c8
--- /dev/null
+++ b/src/jvm/jni.h
@@ -0,0 +1,1140 @@
+/*
+ * Copyright 2006 The Android Open Source Project
+ *
+ * JNI specification, as defined by Sun:
+ * http://java.sun.com/javase/6/docs/technotes/guides/jni/spec/jniTOC.html
+ *
+ * Everything here is expected to be VM-neutral.
+ */
+#ifndef _JNI_H
+#define _JNI_H
+
+#include <stdarg.h>
+
+/*
+ * Primitive types that match up with Java equivalents.
+ */
+#ifdef HAVE_INTTYPES_H
+# include <inttypes.h> /* C99 */
+typedef uint8_t jboolean; /* unsigned 8 bits */
+typedef int8_t jbyte; /* signed 8 bits */
+typedef uint16_t jchar; /* unsigned 16 bits */
+typedef int16_t jshort; /* signed 16 bits */
+typedef int32_t jint; /* signed 32 bits */
+typedef int64_t jlong; /* signed 64 bits */
+typedef float jfloat; /* 32-bit IEEE 754 */
+typedef double jdouble; /* 64-bit IEEE 754 */
+#else
+typedef unsigned char jboolean; /* unsigned 8 bits */
+typedef signed char jbyte; /* signed 8 bits */
+typedef unsigned short jchar; /* unsigned 16 bits */
+typedef short jshort; /* signed 16 bits */
+typedef int jint; /* signed 32 bits */
+typedef long long jlong; /* signed 64 bits */
+typedef float jfloat; /* 32-bit IEEE 754 */
+typedef double jdouble; /* 64-bit IEEE 754 */
+#endif
+
+/* "cardinal indices and sizes" */
+typedef jint jsize;
+
+#ifdef __cplusplus
+/*
+ * Reference types, in C++
+ */
+class _jobject {};
+class _jclass : public _jobject {};
+class _jstring : public _jobject {};
+class _jarray : public _jobject {};
+class _jobjectArray : public _jarray {};
+class _jbooleanArray : public _jarray {};
+class _jbyteArray : public _jarray {};
+class _jcharArray : public _jarray {};
+class _jshortArray : public _jarray {};
+class _jintArray : public _jarray {};
+class _jlongArray : public _jarray {};
+class _jfloatArray : public _jarray {};
+class _jdoubleArray : public _jarray {};
+class _jthrowable : public _jobject {};
+
+typedef _jobject* jobject;
+typedef _jclass* jclass;
+typedef _jstring* jstring;
+typedef _jarray* jarray;
+typedef _jobjectArray* jobjectArray;
+typedef _jbooleanArray* jbooleanArray;
+typedef _jbyteArray* jbyteArray;
+typedef _jcharArray* jcharArray;
+typedef _jshortArray* jshortArray;
+typedef _jintArray* jintArray;
+typedef _jlongArray* jlongArray;
+typedef _jfloatArray* jfloatArray;
+typedef _jdoubleArray* jdoubleArray;
+typedef _jthrowable* jthrowable;
+typedef _jobject* jweak;
+
+
+#else /* not __cplusplus */
+
+/*
+ * Reference types, in C.
+ */
+typedef void* jobject;
+typedef jobject jclass;
+typedef jobject jstring;
+typedef jobject jarray;
+typedef jarray jobjectArray;
+typedef jarray jbooleanArray;
+typedef jarray jbyteArray;
+typedef jarray jcharArray;
+typedef jarray jshortArray;
+typedef jarray jintArray;
+typedef jarray jlongArray;
+typedef jarray jfloatArray;
+typedef jarray jdoubleArray;
+typedef jobject jthrowable;
+typedef jobject jweak;
+
+#endif /* not __cplusplus */
+
+struct _jfieldID; /* opaque structure */
+typedef struct _jfieldID* jfieldID; /* field IDs */
+
+struct _jmethodID; /* opaque structure */
+typedef struct _jmethodID* jmethodID; /* method IDs */
+
+struct JNIInvokeInterface;
+
+typedef union jvalue {
+ jboolean z;
+ jbyte b;
+ jchar c;
+ jshort s;
+ jint i;
+ jlong j;
+ jfloat f;
+ jdouble d;
+ jobject l;
+} jvalue;
+
+typedef enum jobjectRefType {
+ JNIInvalidRefType = 0,
+ JNILocalRefType = 1,
+ JNIGlobalRefType = 2,
+ JNIWeakGlobalRefType = 3
+} jobjectRefType;
+
+typedef struct {
+ const char* name;
+ const char* signature;
+ void* fnPtr;
+} JNINativeMethod;
+
+struct _JNIEnv;
+struct _JavaVM;
+typedef const struct JNINativeInterface* C_JNIEnv;
+
+#if defined(__cplusplus)
+typedef _JNIEnv JNIEnv;
+typedef _JavaVM JavaVM;
+#else
+typedef const struct JNINativeInterface* JNIEnv;
+typedef const struct JNIInvokeInterface* JavaVM;
+#endif
+
+/*
+ * Table of interface function pointers.
+ */
+struct JNINativeInterface {
+ void* reserved0;
+ void* reserved1;
+ void* reserved2;
+ void* reserved3;
+
+ jint (*GetVersion)(JNIEnv *);
+
+ jclass (*DefineClass)(JNIEnv*, const char*, jobject, const jbyte*,
+ jsize);
+ jclass (*FindClass)(JNIEnv*, const char*);
+
+ jmethodID (*FromReflectedMethod)(JNIEnv*, jobject);
+ jfieldID (*FromReflectedField)(JNIEnv*, jobject);
+ /* spec doesn't show jboolean parameter */
+ jobject (*ToReflectedMethod)(JNIEnv*, jclass, jmethodID, jboolean);
+
+ jclass (*GetSuperclass)(JNIEnv*, jclass);
+ jboolean (*IsAssignableFrom)(JNIEnv*, jclass, jclass);
+
+ /* spec doesn't show jboolean parameter */
+ 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*);
+
+ jint (*PushLocalFrame)(JNIEnv*, jint);
+ jobject (*PopLocalFrame)(JNIEnv*, jobject);
+
+ jobject (*NewGlobalRef)(JNIEnv*, jobject);
+ void (*DeleteGlobalRef)(JNIEnv*, jobject);
+ void (*DeleteLocalRef)(JNIEnv*, jobject);
+ jboolean (*IsSameObject)(JNIEnv*, jobject, jobject);
+
+ jobject (*NewLocalRef)(JNIEnv*, jobject);
+ jint (*EnsureLocalCapacity)(JNIEnv*, jint);
+
+ jobject (*AllocObject)(JNIEnv*, jclass);
+ jobject (*NewObject)(JNIEnv*, jclass, jmethodID, ...);
+ jobject (*NewObjectV)(JNIEnv*, jclass, jmethodID, va_list);
+ jobject (*NewObjectA)(JNIEnv*, jclass, jmethodID, jvalue*);
+
+ jclass (*GetObjectClass)(JNIEnv*, jobject);
+ jboolean (*IsInstanceOf)(JNIEnv*, jobject, jclass);
+ jmethodID (*GetMethodID)(JNIEnv*, jclass, const char*, const char*);
+
+ jobject (*CallObjectMethod)(JNIEnv*, jobject, jmethodID, ...);
+ jobject (*CallObjectMethodV)(JNIEnv*, jobject, jmethodID, va_list);
+ jobject (*CallObjectMethodA)(JNIEnv*, jobject, jmethodID, jvalue*);
+ jboolean (*CallBooleanMethod)(JNIEnv*, jobject, jmethodID, ...);
+ jboolean (*CallBooleanMethodV)(JNIEnv*, jobject, jmethodID, va_list);
+ jboolean (*CallBooleanMethodA)(JNIEnv*, jobject, jmethodID, jvalue*);
+ jbyte (*CallByteMethod)(JNIEnv*, jobject, jmethodID, ...);
+ jbyte (*CallByteMethodV)(JNIEnv*, jobject, jmethodID, va_list);
+ jbyte (*CallByteMethodA)(JNIEnv*, jobject, jmethodID, jvalue*);
+ jchar (*CallCharMethod)(JNIEnv*, jobject, jmethodID, ...);
+ jchar (*CallCharMethodV)(JNIEnv*, jobject, jmethodID, va_list);
+ jchar (*CallCharMethodA)(JNIEnv*, jobject, jmethodID, jvalue*);
+ jshort (*CallShortMethod)(JNIEnv*, jobject, jmethodID, ...);
+ jshort (*CallShortMethodV)(JNIEnv*, jobject, jmethodID, va_list);
+ jshort (*CallShortMethodA)(JNIEnv*, jobject, jmethodID, jvalue*);
+ jint (*CallIntMethod)(JNIEnv*, jobject, jmethodID, ...);
+ jint (*CallIntMethodV)(JNIEnv*, jobject, jmethodID, va_list);
+ jint (*CallIntMethodA)(JNIEnv*, jobject, jmethodID, jvalue*);
+ jlong (*CallLongMethod)(JNIEnv*, jobject, jmethodID, ...);
+ jlong (*CallLongMethodV)(JNIEnv*, jobject, jmethodID, va_list);
+ jlong (*CallLongMethodA)(JNIEnv*, jobject, jmethodID, jvalue*);
+ jfloat (*CallFloatMethod)(JNIEnv*, jobject, jmethodID, ...);
+ jfloat (*CallFloatMethodV)(JNIEnv*, jobject, jmethodID, va_list);
+ jfloat (*CallFloatMethodA)(JNIEnv*, jobject, jmethodID, jvalue*);
+ jdouble (*CallDoubleMethod)(JNIEnv*, jobject, jmethodID, ...);
+ jdouble (*CallDoubleMethodV)(JNIEnv*, jobject, jmethodID, va_list);
+ jdouble (*CallDoubleMethodA)(JNIEnv*, jobject, jmethodID, jvalue*);
+ void (*CallVoidMethod)(JNIEnv*, jobject, jmethodID, ...);
+ void (*CallVoidMethodV)(JNIEnv*, jobject, jmethodID, va_list);
+ void (*CallVoidMethodA)(JNIEnv*, jobject, jmethodID, jvalue*);
+
+ jobject (*CallNonvirtualObjectMethod)(JNIEnv*, jobject, jclass,
+ jmethodID, ...);
+ jobject (*CallNonvirtualObjectMethodV)(JNIEnv*, jobject, jclass,
+ jmethodID, va_list);
+ jobject (*CallNonvirtualObjectMethodA)(JNIEnv*, jobject, jclass,
+ jmethodID, jvalue*);
+ jboolean (*CallNonvirtualBooleanMethod)(JNIEnv*, jobject, jclass,
+ jmethodID, ...);
+ jboolean (*CallNonvirtualBooleanMethodV)(JNIEnv*, jobject, jclass,
+ jmethodID, va_list);
+ jboolean (*CallNonvirtualBooleanMethodA)(JNIEnv*, jobject, jclass,
+ jmethodID, jvalue*);
+ jbyte (*CallNonvirtualByteMethod)(JNIEnv*, jobject, jclass,
+ jmethodID, ...);
+ jbyte (*CallNonvirtualByteMethodV)(JNIEnv*, jobject, jclass,
+ jmethodID, va_list);
+ jbyte (*CallNonvirtualByteMethodA)(JNIEnv*, jobject, jclass,
+ jmethodID, jvalue*);
+ jchar (*CallNonvirtualCharMethod)(JNIEnv*, jobject, jclass,
+ jmethodID, ...);
+ jchar (*CallNonvirtualCharMethodV)(JNIEnv*, jobject, jclass,
+ jmethodID, va_list);
+ jchar (*CallNonvirtualCharMethodA)(JNIEnv*, jobject, jclass,
+ jmethodID, jvalue*);
+ jshort (*CallNonvirtualShortMethod)(JNIEnv*, jobject, jclass,
+ jmethodID, ...);
+ jshort (*CallNonvirtualShortMethodV)(JNIEnv*, jobject, jclass,
+ jmethodID, va_list);
+ jshort (*CallNonvirtualShortMethodA)(JNIEnv*, jobject, jclass,
+ jmethodID, jvalue*);
+ jint (*CallNonvirtualIntMethod)(JNIEnv*, jobject, jclass,
+ jmethodID, ...);
+ jint (*CallNonvirtualIntMethodV)(JNIEnv*, jobject, jclass,
+ jmethodID, va_list);
+ jint (*CallNonvirtualIntMethodA)(JNIEnv*, jobject, jclass,
+ jmethodID, jvalue*);
+ jlong (*CallNonvirtualLongMethod)(JNIEnv*, jobject, jclass,
+ jmethodID, ...);
+ jlong (*CallNonvirtualLongMethodV)(JNIEnv*, jobject, jclass,
+ jmethodID, va_list);
+ jlong (*CallNonvirtualLongMethodA)(JNIEnv*, jobject, jclass,
+ jmethodID, jvalue*);
+ jfloat (*CallNonvirtualFloatMethod)(JNIEnv*, jobject, jclass,
+ jmethodID, ...);
+ jfloat (*CallNonvirtualFloatMethodV)(JNIEnv*, jobject, jclass,
+ jmethodID, va_list);
+ jfloat (*CallNonvirtualFloatMethodA)(JNIEnv*, jobject, jclass,
+ jmethodID, jvalue*);
+ jdouble (*CallNonvirtualDoubleMethod)(JNIEnv*, jobject, jclass,
+ jmethodID, ...);
+ jdouble (*CallNonvirtualDoubleMethodV)(JNIEnv*, jobject, jclass,
+ jmethodID, va_list);
+ jdouble (*CallNonvirtualDoubleMethodA)(JNIEnv*, jobject, jclass,
+ jmethodID, jvalue*);
+ void (*CallNonvirtualVoidMethod)(JNIEnv*, jobject, jclass,
+ jmethodID, ...);
+ void (*CallNonvirtualVoidMethodV)(JNIEnv*, jobject, jclass,
+ jmethodID, va_list);
+ void (*CallNonvirtualVoidMethodA)(JNIEnv*, jobject, jclass,
+ jmethodID, jvalue*);
+
+ jfieldID (*GetFieldID)(JNIEnv*, jclass, const char*, const char*);
+
+ jobject (*GetObjectField)(JNIEnv*, jobject, jfieldID);
+ jboolean (*GetBooleanField)(JNIEnv*, jobject, jfieldID);
+ jbyte (*GetByteField)(JNIEnv*, jobject, jfieldID);
+ jchar (*GetCharField)(JNIEnv*, jobject, jfieldID);
+ jshort (*GetShortField)(JNIEnv*, jobject, jfieldID);
+ jint (*GetIntField)(JNIEnv*, jobject, jfieldID);
+ jlong (*GetLongField)(JNIEnv*, jobject, jfieldID);
+ jfloat (*GetFloatField)(JNIEnv*, jobject, jfieldID);
+ jdouble (*GetDoubleField)(JNIEnv*, jobject, jfieldID);
+
+ void (*SetObjectField)(JNIEnv*, jobject, jfieldID, jobject);
+ void (*SetBooleanField)(JNIEnv*, jobject, jfieldID, jboolean);
+ void (*SetByteField)(JNIEnv*, jobject, jfieldID, jbyte);
+ void (*SetCharField)(JNIEnv*, jobject, jfieldID, jchar);
+ void (*SetShortField)(JNIEnv*, jobject, jfieldID, jshort);
+ void (*SetIntField)(JNIEnv*, jobject, jfieldID, jint);
+ void (*SetLongField)(JNIEnv*, jobject, jfieldID, jlong);
+ void (*SetFloatField)(JNIEnv*, jobject, jfieldID, jfloat);
+ void (*SetDoubleField)(JNIEnv*, jobject, jfieldID, jdouble);
+
+ jmethodID (*GetStaticMethodID)(JNIEnv*, jclass, const char*, const char*);
+
+ jobject (*CallStaticObjectMethod)(JNIEnv*, jclass, jmethodID, ...);
+ jobject (*CallStaticObjectMethodV)(JNIEnv*, jclass, jmethodID, va_list);
+ jobject (*CallStaticObjectMethodA)(JNIEnv*, jclass, jmethodID, jvalue*);
+ jboolean (*CallStaticBooleanMethod)(JNIEnv*, jclass, jmethodID, ...);
+ jboolean (*CallStaticBooleanMethodV)(JNIEnv*, jclass, jmethodID,
+ va_list);
+ jboolean (*CallStaticBooleanMethodA)(JNIEnv*, jclass, jmethodID,
+ jvalue*);
+ jbyte (*CallStaticByteMethod)(JNIEnv*, jclass, jmethodID, ...);
+ jbyte (*CallStaticByteMethodV)(JNIEnv*, jclass, jmethodID, va_list);
+ jbyte (*CallStaticByteMethodA)(JNIEnv*, jclass, jmethodID, jvalue*);
+ jchar (*CallStaticCharMethod)(JNIEnv*, jclass, jmethodID, ...);
+ jchar (*CallStaticCharMethodV)(JNIEnv*, jclass, jmethodID, va_list);
+ jchar (*CallStaticCharMethodA)(JNIEnv*, jclass, jmethodID, jvalue*);
+ jshort (*CallStaticShortMethod)(JNIEnv*, jclass, jmethodID, ...);
+ jshort (*CallStaticShortMethodV)(JNIEnv*, jclass, jmethodID, va_list);
+ jshort (*CallStaticShortMethodA)(JNIEnv*, jclass, jmethodID, jvalue*);
+ jint (*CallStaticIntMethod)(JNIEnv*, jclass, jmethodID, ...);
+ jint (*CallStaticIntMethodV)(JNIEnv*, jclass, jmethodID, va_list);
+ jint (*CallStaticIntMethodA)(JNIEnv*, jclass, jmethodID, jvalue*);
+ jlong (*CallStaticLongMethod)(JNIEnv*, jclass, jmethodID, ...);
+ jlong (*CallStaticLongMethodV)(JNIEnv*, jclass, jmethodID, va_list);
+ jlong (*CallStaticLongMethodA)(JNIEnv*, jclass, jmethodID, jvalue*);
+ jfloat (*CallStaticFloatMethod)(JNIEnv*, jclass, jmethodID, ...);
+ jfloat (*CallStaticFloatMethodV)(JNIEnv*, jclass, jmethodID, va_list);
+ jfloat (*CallStaticFloatMethodA)(JNIEnv*, jclass, jmethodID, jvalue*);
+ jdouble (*CallStaticDoubleMethod)(JNIEnv*, jclass, jmethodID, ...);
+ jdouble (*CallStaticDoubleMethodV)(JNIEnv*, jclass, jmethodID, va_list);
+ jdouble (*CallStaticDoubleMethodA)(JNIEnv*, jclass, jmethodID, jvalue*);
+ void (*CallStaticVoidMethod)(JNIEnv*, jclass, jmethodID, ...);
+ void (*CallStaticVoidMethodV)(JNIEnv*, jclass, jmethodID, va_list);
+ void (*CallStaticVoidMethodA)(JNIEnv*, jclass, jmethodID, jvalue*);
+
+ jfieldID (*GetStaticFieldID)(JNIEnv*, jclass, const char*,
+ const char*);
+
+ jobject (*GetStaticObjectField)(JNIEnv*, jclass, jfieldID);
+ jboolean (*GetStaticBooleanField)(JNIEnv*, jclass, jfieldID);
+ jbyte (*GetStaticByteField)(JNIEnv*, jclass, jfieldID);
+ jchar (*GetStaticCharField)(JNIEnv*, jclass, jfieldID);
+ jshort (*GetStaticShortField)(JNIEnv*, jclass, jfieldID);
+ jint (*GetStaticIntField)(JNIEnv*, jclass, jfieldID);
+ jlong (*GetStaticLongField)(JNIEnv*, jclass, jfieldID);
+ jfloat (*GetStaticFloatField)(JNIEnv*, jclass, jfieldID);
+ jdouble (*GetStaticDoubleField)(JNIEnv*, jclass, jfieldID);
+
+ void (*SetStaticObjectField)(JNIEnv*, jclass, jfieldID, jobject);
+ void (*SetStaticBooleanField)(JNIEnv*, jclass, jfieldID, jboolean);
+ void (*SetStaticByteField)(JNIEnv*, jclass, jfieldID, jbyte);
+ void (*SetStaticCharField)(JNIEnv*, jclass, jfieldID, jchar);
+ void (*SetStaticShortField)(JNIEnv*, jclass, jfieldID, jshort);
+ void (*SetStaticIntField)(JNIEnv*, jclass, jfieldID, jint);
+ void (*SetStaticLongField)(JNIEnv*, jclass, jfieldID, jlong);
+ void (*SetStaticFloatField)(JNIEnv*, jclass, jfieldID, jfloat);
+ void (*SetStaticDoubleField)(JNIEnv*, jclass, jfieldID, jdouble);
+
+ jstring (*NewString)(JNIEnv*, const jchar*, jsize);
+ jsize (*GetStringLength)(JNIEnv*, jstring);
+ const jchar* (*GetStringChars)(JNIEnv*, jstring, jboolean*);
+ void (*ReleaseStringChars)(JNIEnv*, jstring, const jchar*);
+ jstring (*NewStringUTF)(JNIEnv*, const char*);
+ jsize (*GetStringUTFLength)(JNIEnv*, jstring);
+ /* JNI spec says this returns const jbyte*, but that's inconsistent */
+ const char* (*GetStringUTFChars)(JNIEnv*, jstring, jboolean*);
+ void (*ReleaseStringUTFChars)(JNIEnv*, jstring, const char*);
+ jsize (*GetArrayLength)(JNIEnv*, jarray);
+ jobjectArray (*NewObjectArray)(JNIEnv*, jsize, jclass, jobject);
+ jobject (*GetObjectArrayElement)(JNIEnv*, jobjectArray, jsize);
+ void (*SetObjectArrayElement)(JNIEnv*, jobjectArray, jsize, jobject);
+
+ jbooleanArray (*NewBooleanArray)(JNIEnv*, jsize);
+ jbyteArray (*NewByteArray)(JNIEnv*, jsize);
+ jcharArray (*NewCharArray)(JNIEnv*, jsize);
+ jshortArray (*NewShortArray)(JNIEnv*, jsize);
+ jintArray (*NewIntArray)(JNIEnv*, jsize);
+ jlongArray (*NewLongArray)(JNIEnv*, jsize);
+ jfloatArray (*NewFloatArray)(JNIEnv*, jsize);
+ jdoubleArray (*NewDoubleArray)(JNIEnv*, jsize);
+
+ jboolean* (*GetBooleanArrayElements)(JNIEnv*, jbooleanArray, jboolean*);
+ jbyte* (*GetByteArrayElements)(JNIEnv*, jbyteArray, jboolean*);
+ jchar* (*GetCharArrayElements)(JNIEnv*, jcharArray, jboolean*);
+ jshort* (*GetShortArrayElements)(JNIEnv*, jshortArray, jboolean*);
+ jint* (*GetIntArrayElements)(JNIEnv*, jintArray, jboolean*);
+ jlong* (*GetLongArrayElements)(JNIEnv*, jlongArray, jboolean*);
+ jfloat* (*GetFloatArrayElements)(JNIEnv*, jfloatArray, jboolean*);
+ jdouble* (*GetDoubleArrayElements)(JNIEnv*, jdoubleArray, jboolean*);
+
+ void (*ReleaseBooleanArrayElements)(JNIEnv*, jbooleanArray,
+ jboolean*, jint);
+ void (*ReleaseByteArrayElements)(JNIEnv*, jbyteArray,
+ jbyte*, jint);
+ void (*ReleaseCharArrayElements)(JNIEnv*, jcharArray,
+ jchar*, jint);
+ void (*ReleaseShortArrayElements)(JNIEnv*, jshortArray,
+ jshort*, jint);
+ void (*ReleaseIntArrayElements)(JNIEnv*, jintArray,
+ jint*, jint);
+ void (*ReleaseLongArrayElements)(JNIEnv*, jlongArray,
+ jlong*, jint);
+ void (*ReleaseFloatArrayElements)(JNIEnv*, jfloatArray,
+ jfloat*, jint);
+ void (*ReleaseDoubleArrayElements)(JNIEnv*, jdoubleArray,
+ jdouble*, jint);
+
+ void (*GetBooleanArrayRegion)(JNIEnv*, jbooleanArray,
+ jsize, jsize, jboolean*);
+ void (*GetByteArrayRegion)(JNIEnv*, jbyteArray,
+ jsize, jsize, jbyte*);
+ void (*GetCharArrayRegion)(JNIEnv*, jcharArray,
+ jsize, jsize, jchar*);
+ void (*GetShortArrayRegion)(JNIEnv*, jshortArray,
+ jsize, jsize, jshort*);
+ void (*GetIntArrayRegion)(JNIEnv*, jintArray,
+ jsize, jsize, jint*);
+ void (*GetLongArrayRegion)(JNIEnv*, jlongArray,
+ jsize, jsize, jlong*);
+ void (*GetFloatArrayRegion)(JNIEnv*, jfloatArray,
+ jsize, jsize, jfloat*);
+ void (*GetDoubleArrayRegion)(JNIEnv*, jdoubleArray,
+ jsize, jsize, jdouble*);
+
+ /* spec shows these without const; some jni.h do, some don't */
+ void (*SetBooleanArrayRegion)(JNIEnv*, jbooleanArray,
+ jsize, jsize, const jboolean*);
+ void (*SetByteArrayRegion)(JNIEnv*, jbyteArray,
+ jsize, jsize, const jbyte*);
+ void (*SetCharArrayRegion)(JNIEnv*, jcharArray,
+ jsize, jsize, const jchar*);
+ void (*SetShortArrayRegion)(JNIEnv*, jshortArray,
+ jsize, jsize, const jshort*);
+ void (*SetIntArrayRegion)(JNIEnv*, jintArray,
+ jsize, jsize, const jint*);
+ void (*SetLongArrayRegion)(JNIEnv*, jlongArray,
+ jsize, jsize, const jlong*);
+ void (*SetFloatArrayRegion)(JNIEnv*, jfloatArray,
+ jsize, jsize, const jfloat*);
+ void (*SetDoubleArrayRegion)(JNIEnv*, jdoubleArray,
+ jsize, jsize, const jdouble*);
+
+ jint (*RegisterNatives)(JNIEnv*, jclass, const JNINativeMethod*,
+ jint);
+ jint (*UnregisterNatives)(JNIEnv*, jclass);
+ jint (*MonitorEnter)(JNIEnv*, jobject);
+ jint (*MonitorExit)(JNIEnv*, jobject);
+ jint (*GetJavaVM)(JNIEnv*, JavaVM**);
+
+ 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*);
+
+ jobject (*NewDirectByteBuffer)(JNIEnv*, void*, jlong);
+ void* (*GetDirectBufferAddress)(JNIEnv*, jobject);
+ jlong (*GetDirectBufferCapacity)(JNIEnv*, jobject);
+
+ /* added in JNI 1.6 */
+ jobjectRefType (*GetObjectRefType)(JNIEnv*, jobject);
+};
+
+/*
+ * C++ object wrapper.
+ *
+ * This is usually overlaid on a C struct whose first element is a
+ * JNINativeInterface*. We rely somewhat on compiler behavior.
+ */
+struct _JNIEnv {
+ /* do not rename this; it does not seem to be entirely opaque */
+ const struct JNINativeInterface* functions;
+
+#if defined(__cplusplus)
+
+ jint GetVersion()
+ { return functions->GetVersion(this); }
+
+ jclass DefineClass(const char *name, jobject loader, const jbyte* buf,
+ jsize bufLen)
+ { return functions->DefineClass(this, name, loader, buf, bufLen); }
+
+ jclass FindClass(const char* name)
+ { return functions->FindClass(this, name); }
+
+ jmethodID FromReflectedMethod(jobject method)
+ { return functions->FromReflectedMethod(this, method); }
+
+ jfieldID FromReflectedField(jobject field)
+ { return functions->FromReflectedField(this, field); }
+
+ jobject ToReflectedMethod(jclass cls, jmethodID methodID, jboolean isStatic)
+ { return functions->ToReflectedMethod(this, cls, methodID, isStatic); }
+
+ jclass GetSuperclass(jclass clazz)
+ { return functions->GetSuperclass(this, clazz); }
+
+ jboolean IsAssignableFrom(jclass clazz1, jclass clazz2)
+ { return functions->IsAssignableFrom(this, clazz1, clazz2); }
+
+ jobject ToReflectedField(jclass cls, jfieldID fieldID, jboolean isStatic)
+ { return functions->ToReflectedField(this, cls, fieldID, isStatic); }
+
+ jint Throw(jthrowable obj)
+ { return functions->Throw(this, obj); }
+
+ jint ThrowNew(jclass clazz, const char* message)
+ { return functions->ThrowNew(this, clazz, message); }
+
+ jthrowable ExceptionOccurred()
+ { return functions->ExceptionOccurred(this); }
+
+ void ExceptionDescribe()
+ { functions->ExceptionDescribe(this); }
+
+ void ExceptionClear()
+ { functions->ExceptionClear(this); }
+
+ void FatalError(const char* msg)
+ { functions->FatalError(this, msg); }
+
+ jint PushLocalFrame(jint capacity)
+ { return functions->PushLocalFrame(this, capacity); }
+
+ jobject PopLocalFrame(jobject result)
+ { return functions->PopLocalFrame(this, result); }
+
+ jobject NewGlobalRef(jobject obj)
+ { return functions->NewGlobalRef(this, obj); }
+
+ void DeleteGlobalRef(jobject globalRef)
+ { functions->DeleteGlobalRef(this, globalRef); }
+
+ void DeleteLocalRef(jobject localRef)
+ { functions->DeleteLocalRef(this, localRef); }
+
+ jboolean IsSameObject(jobject ref1, jobject ref2)
+ { return functions->IsSameObject(this, ref1, ref2); }
+
+ jobject NewLocalRef(jobject ref)
+ { return functions->NewLocalRef(this, ref); }
+
+ jint EnsureLocalCapacity(jint capacity)
+ { return functions->EnsureLocalCapacity(this, capacity); }
+
+ jobject AllocObject(jclass clazz)
+ { return functions->AllocObject(this, clazz); }
+
+ jobject NewObject(jclass clazz, jmethodID methodID, ...)
+ {
+ va_list args;
+ va_start(args, methodID);
+ jobject result = functions->NewObjectV(this, clazz, methodID, args);
+ va_end(args);
+ return result;
+ }
+
+ jobject NewObjectV(jclass clazz, jmethodID methodID, va_list args)
+ { return functions->NewObjectV(this, clazz, methodID, args); }
+
+ jobject NewObjectA(jclass clazz, jmethodID methodID, jvalue* args)
+ { return functions->NewObjectA(this, clazz, methodID, args); }
+
+ jclass GetObjectClass(jobject obj)
+ { return functions->GetObjectClass(this, obj); }
+
+ jboolean IsInstanceOf(jobject obj, jclass clazz)
+ { return functions->IsInstanceOf(this, obj, clazz); }
+
+ jmethodID GetMethodID(jclass clazz, const char* name, const char* sig)
+ { return functions->GetMethodID(this, clazz, name, sig); }
+
+#define CALL_TYPE_METHOD(_jtype, _jname) \
+ _jtype Call##_jname##Method(jobject obj, jmethodID methodID, ...) \
+ { \
+ _jtype result; \
+ va_list args; \
+ va_start(args, methodID); \
+ result = functions->Call##_jname##MethodV(this, obj, methodID, \
+ args); \
+ va_end(args); \
+ return result; \
+ }
+#define CALL_TYPE_METHODV(_jtype, _jname) \
+ _jtype Call##_jname##MethodV(jobject obj, jmethodID methodID, \
+ va_list args) \
+ { return functions->Call##_jname##MethodV(this, obj, methodID, args); }
+#define CALL_TYPE_METHODA(_jtype, _jname) \
+ _jtype Call##_jname##MethodA(jobject obj, jmethodID methodID, \
+ jvalue* args) \
+ { return functions->Call##_jname##MethodA(this, obj, methodID, args); }
+
+#define CALL_TYPE(_jtype, _jname) \
+ CALL_TYPE_METHOD(_jtype, _jname) \
+ CALL_TYPE_METHODV(_jtype, _jname) \
+ CALL_TYPE_METHODA(_jtype, _jname)
+
+ CALL_TYPE(jobject, Object)
+ CALL_TYPE(jboolean, Boolean)
+ CALL_TYPE(jbyte, Byte)
+ CALL_TYPE(jchar, Char)
+ CALL_TYPE(jshort, Short)
+ CALL_TYPE(jint, Int)
+ CALL_TYPE(jlong, Long)
+ CALL_TYPE(jfloat, Float)
+ CALL_TYPE(jdouble, Double)
+
+ void CallVoidMethod(jobject obj, jmethodID methodID, ...)
+ {
+ va_list args;
+ va_start(args, methodID);
+ functions->CallVoidMethodV(this, obj, methodID, args);
+ va_end(args);
+ }
+ void CallVoidMethodV(jobject obj, jmethodID methodID, va_list args)
+ { functions->CallVoidMethodV(this, obj, methodID, args); }
+ void CallVoidMethodA(jobject obj, jmethodID methodID, jvalue* args)
+ { functions->CallVoidMethodA(this, obj, methodID, args); }
+
+#define CALL_NONVIRT_TYPE_METHOD(_jtype, _jname) \
+ _jtype CallNonvirtual##_jname##Method(jobject obj, jclass clazz, \
+ jmethodID methodID, ...) \
+ { \
+ _jtype result; \
+ va_list args; \
+ va_start(args, methodID); \
+ result = functions->CallNonvirtual##_jname##MethodV(this, obj, \
+ clazz, methodID, args); \
+ va_end(args); \
+ return result; \
+ }
+#define CALL_NONVIRT_TYPE_METHODV(_jtype, _jname) \
+ _jtype CallNonvirtual##_jname##MethodV(jobject obj, jclass clazz, \
+ jmethodID methodID, va_list args) \
+ { return functions->CallNonvirtual##_jname##MethodV(this, obj, clazz, \
+ methodID, args); }
+#define CALL_NONVIRT_TYPE_METHODA(_jtype, _jname) \
+ _jtype CallNonvirtual##_jname##MethodA(jobject obj, jclass clazz, \
+ jmethodID methodID, jvalue* args) \
+ { return functions->CallNonvirtual##_jname##MethodA(this, obj, clazz, \
+ methodID, args); }
+
+#define CALL_NONVIRT_TYPE(_jtype, _jname) \
+ CALL_NONVIRT_TYPE_METHOD(_jtype, _jname) \
+ CALL_NONVIRT_TYPE_METHODV(_jtype, _jname) \
+ CALL_NONVIRT_TYPE_METHODA(_jtype, _jname)
+
+ CALL_NONVIRT_TYPE(jobject, Object)
+ CALL_NONVIRT_TYPE(jboolean, Boolean)
+ CALL_NONVIRT_TYPE(jbyte, Byte)
+ CALL_NONVIRT_TYPE(jchar, Char)
+ CALL_NONVIRT_TYPE(jshort, Short)
+ CALL_NONVIRT_TYPE(jint, Int)
+ CALL_NONVIRT_TYPE(jlong, Long)
+ CALL_NONVIRT_TYPE(jfloat, Float)
+ CALL_NONVIRT_TYPE(jdouble, Double)
+
+ void CallNonvirtualVoidMethod(jobject obj, jclass clazz,
+ jmethodID methodID, ...)
+ {
+ va_list args;
+ va_start(args, methodID);
+ functions->CallNonvirtualVoidMethodV(this, obj, clazz, methodID, args);
+ va_end(args);
+ }
+ void CallNonvirtualVoidMethodV(jobject obj, jclass clazz,
+ jmethodID methodID, va_list args)
+ { functions->CallNonvirtualVoidMethodV(this, obj, clazz, methodID, args); }
+ void CallNonvirtualVoidMethodA(jobject obj, jclass clazz,
+ jmethodID methodID, jvalue* args)
+ { functions->CallNonvirtualVoidMethodA(this, obj, clazz, methodID, args); }
+
+ jfieldID GetFieldID(jclass clazz, const char* name, const char* sig)
+ { return functions->GetFieldID(this, clazz, name, sig); }
+
+ jobject GetObjectField(jobject obj, jfieldID fieldID)
+ { return functions->GetObjectField(this, obj, fieldID); }
+ jboolean GetBooleanField(jobject obj, jfieldID fieldID)
+ { return functions->GetBooleanField(this, obj, fieldID); }
+ jbyte GetByteField(jobject obj, jfieldID fieldID)
+ { return functions->GetByteField(this, obj, fieldID); }
+ jchar GetCharField(jobject obj, jfieldID fieldID)
+ { return functions->GetCharField(this, obj, fieldID); }
+ jshort GetShortField(jobject obj, jfieldID fieldID)
+ { return functions->GetShortField(this, obj, fieldID); }
+ jint GetIntField(jobject obj, jfieldID fieldID)
+ { return functions->GetIntField(this, obj, fieldID); }
+ jlong GetLongField(jobject obj, jfieldID fieldID)
+ { return functions->GetLongField(this, obj, fieldID); }
+ jfloat GetFloatField(jobject obj, jfieldID fieldID)
+ { return functions->GetFloatField(this, obj, fieldID); }
+ jdouble GetDoubleField(jobject obj, jfieldID fieldID)
+ { return functions->GetDoubleField(this, obj, fieldID); }
+
+ void SetObjectField(jobject obj, jfieldID fieldID, jobject value)
+ { functions->SetObjectField(this, obj, fieldID, value); }
+ void SetBooleanField(jobject obj, jfieldID fieldID, jboolean value)
+ { functions->SetBooleanField(this, obj, fieldID, value); }
+ void SetByteField(jobject obj, jfieldID fieldID, jbyte value)
+ { functions->SetByteField(this, obj, fieldID, value); }
+ void SetCharField(jobject obj, jfieldID fieldID, jchar value)
+ { functions->SetCharField(this, obj, fieldID, value); }
+ void SetShortField(jobject obj, jfieldID fieldID, jshort value)
+ { functions->SetShortField(this, obj, fieldID, value); }
+ void SetIntField(jobject obj, jfieldID fieldID, jint value)
+ { functions->SetIntField(this, obj, fieldID, value); }
+ void SetLongField(jobject obj, jfieldID fieldID, jlong value)
+ { functions->SetLongField(this, obj, fieldID, value); }
+ void SetFloatField(jobject obj, jfieldID fieldID, jfloat value)
+ { functions->SetFloatField(this, obj, fieldID, value); }
+ void SetDoubleField(jobject obj, jfieldID fieldID, jdouble value)
+ { functions->SetDoubleField(this, obj, fieldID, value); }
+
+ jmethodID GetStaticMethodID(jclass clazz, const char* name, const char* sig)
+ { return functions->GetStaticMethodID(this, clazz, name, sig); }
+
+#define CALL_STATIC_TYPE_METHOD(_jtype, _jname) \
+ _jtype CallStatic##_jname##Method(jclass clazz, jmethodID methodID, \
+ ...) \
+ { \
+ _jtype result; \
+ va_list args; \
+ va_start(args, methodID); \
+ result = functions->CallStatic##_jname##MethodV(this, clazz, \
+ methodID, args); \
+ va_end(args); \
+ return result; \
+ }
+#define CALL_STATIC_TYPE_METHODV(_jtype, _jname) \
+ _jtype CallStatic##_jname##MethodV(jclass clazz, jmethodID methodID, \
+ va_list args) \
+ { return functions->CallStatic##_jname##MethodV(this, clazz, methodID, \
+ args); }
+#define CALL_STATIC_TYPE_METHODA(_jtype, _jname) \
+ _jtype CallStatic##_jname##MethodA(jclass clazz, jmethodID methodID, \
+ jvalue* args) \
+ { return functions->CallStatic##_jname##MethodA(this, clazz, methodID, \
+ args); }
+
+#define CALL_STATIC_TYPE(_jtype, _jname) \
+ CALL_STATIC_TYPE_METHOD(_jtype, _jname) \
+ CALL_STATIC_TYPE_METHODV(_jtype, _jname) \
+ CALL_STATIC_TYPE_METHODA(_jtype, _jname)
+
+ CALL_STATIC_TYPE(jobject, Object)
+ CALL_STATIC_TYPE(jboolean, Boolean)
+ CALL_STATIC_TYPE(jbyte, Byte)
+ CALL_STATIC_TYPE(jchar, Char)
+ CALL_STATIC_TYPE(jshort, Short)
+ CALL_STATIC_TYPE(jint, Int)
+ CALL_STATIC_TYPE(jlong, Long)
+ CALL_STATIC_TYPE(jfloat, Float)
+ CALL_STATIC_TYPE(jdouble, Double)
+
+ void CallStaticVoidMethod(jclass clazz, jmethodID methodID, ...)
+ {
+ va_list args;
+ va_start(args, methodID);
+ functions->CallStaticVoidMethodV(this, clazz, methodID, args);
+ va_end(args);
+ }
+ void CallStaticVoidMethodV(jclass clazz, jmethodID methodID, va_list args)
+ { functions->CallStaticVoidMethodV(this, clazz, methodID, args); }
+ void CallStaticVoidMethodA(jclass clazz, jmethodID methodID, jvalue* args)
+ { functions->CallStaticVoidMethodA(this, clazz, methodID, args); }
+
+ jfieldID GetStaticFieldID(jclass clazz, const char* name, const char* sig)
+ { return functions->GetStaticFieldID(this, clazz, name, sig); }
+
+ jobject GetStaticObjectField(jclass clazz, jfieldID fieldID)
+ { return functions->GetStaticObjectField(this, clazz, fieldID); }
+ jboolean GetStaticBooleanField(jclass clazz, jfieldID fieldID)
+ { return functions->GetStaticBooleanField(this, clazz, fieldID); }
+ jbyte GetStaticByteField(jclass clazz, jfieldID fieldID)
+ { return functions->GetStaticByteField(this, clazz, fieldID); }
+ jchar GetStaticCharField(jclass clazz, jfieldID fieldID)
+ { return functions->GetStaticCharField(this, clazz, fieldID); }
+ jshort GetStaticShortField(jclass clazz, jfieldID fieldID)
+ { return functions->GetStaticShortField(this, clazz, fieldID); }
+ jint GetStaticIntField(jclass clazz, jfieldID fieldID)
+ { return functions->GetStaticIntField(this, clazz, fieldID); }
+ jlong GetStaticLongField(jclass clazz, jfieldID fieldID)
+ { return functions->GetStaticLongField(this, clazz, fieldID); }
+ jfloat GetStaticFloatField(jclass clazz, jfieldID fieldID)
+ { return functions->GetStaticFloatField(this, clazz, fieldID); }
+ jdouble GetStaticDoubleField(jclass clazz, jfieldID fieldID)
+ { return functions->GetStaticDoubleField(this, clazz, fieldID); }
+
+ void SetStaticObjectField(jclass clazz, jfieldID fieldID, jobject value)
+ { functions->SetStaticObjectField(this, clazz, fieldID, value); }
+ void SetStaticBooleanField(jclass clazz, jfieldID fieldID, jboolean value)
+ { functions->SetStaticBooleanField(this, clazz, fieldID, value); }
+ void SetStaticByteField(jclass clazz, jfieldID fieldID, jbyte value)
+ { functions->SetStaticByteField(this, clazz, fieldID, value); }
+ void SetStaticCharField(jclass clazz, jfieldID fieldID, jchar value)
+ { functions->SetStaticCharField(this, clazz, fieldID, value); }
+ void SetStaticShortField(jclass clazz, jfieldID fieldID, jshort value)
+ { functions->SetStaticShortField(this, clazz, fieldID, value); }
+ void SetStaticIntField(jclass clazz, jfieldID fieldID, jint value)
+ { functions->SetStaticIntField(this, clazz, fieldID, value); }
+ void SetStaticLongField(jclass clazz, jfieldID fieldID, jlong value)
+ { functions->SetStaticLongField(this, clazz, fieldID, value); }
+ void SetStaticFloatField(jclass clazz, jfieldID fieldID, jfloat value)
+ { functions->SetStaticFloatField(this, clazz, fieldID, value); }
+ void SetStaticDoubleField(jclass clazz, jfieldID fieldID, jdouble value)
+ { functions->SetStaticDoubleField(this, clazz, fieldID, value); }
+
+ jstring NewString(const jchar* unicodeChars, jsize len)
+ { return functions->NewString(this, unicodeChars, len); }
+
+ jsize GetStringLength(jstring string)
+ { return functions->GetStringLength(this, string); }
+
+ const jchar* GetStringChars(jstring string, jboolean* isCopy)
+ { return functions->GetStringChars(this, string, isCopy); }
+
+ void ReleaseStringChars(jstring string, const jchar* chars)
+ { functions->ReleaseStringChars(this, string, chars); }
+
+ jstring NewStringUTF(const char* bytes)
+ { return functions->NewStringUTF(this, bytes); }
+
+ jsize GetStringUTFLength(jstring string)
+ { return functions->GetStringUTFLength(this, string); }
+
+ const char* GetStringUTFChars(jstring string, jboolean* isCopy)
+ { return functions->GetStringUTFChars(this, string, isCopy); }
+
+ void ReleaseStringUTFChars(jstring string, const char* utf)
+ { functions->ReleaseStringUTFChars(this, string, utf); }
+
+ jsize GetArrayLength(jarray array)
+ { return functions->GetArrayLength(this, array); }
+
+ jobjectArray NewObjectArray(jsize length, jclass elementClass,
+ jobject initialElement)
+ { return functions->NewObjectArray(this, length, elementClass,
+ initialElement); }
+
+ jobject GetObjectArrayElement(jobjectArray array, jsize index)
+ { return functions->GetObjectArrayElement(this, array, index); }
+
+ void SetObjectArrayElement(jobjectArray array, jsize index, jobject value)
+ { functions->SetObjectArrayElement(this, array, index, value); }
+
+ jbooleanArray NewBooleanArray(jsize length)
+ { return functions->NewBooleanArray(this, length); }
+ jbyteArray NewByteArray(jsize length)
+ { return functions->NewByteArray(this, length); }
+ jcharArray NewCharArray(jsize length)
+ { return functions->NewCharArray(this, length); }
+ jshortArray NewShortArray(jsize length)
+ { return functions->NewShortArray(this, length); }
+ jintArray NewIntArray(jsize length)
+ { return functions->NewIntArray(this, length); }
+ jlongArray NewLongArray(jsize length)
+ { return functions->NewLongArray(this, length); }
+ jfloatArray NewFloatArray(jsize length)
+ { return functions->NewFloatArray(this, length); }
+ jdoubleArray NewDoubleArray(jsize length)
+ { return functions->NewDoubleArray(this, length); }
+
+ jboolean* GetBooleanArrayElements(jbooleanArray array, jboolean* isCopy)
+ { return functions->GetBooleanArrayElements(this, array, isCopy); }
+ jbyte* GetByteArrayElements(jbyteArray array, jboolean* isCopy)
+ { return functions->GetByteArrayElements(this, array, isCopy); }
+ jchar* GetCharArrayElements(jcharArray array, jboolean* isCopy)
+ { return functions->GetCharArrayElements(this, array, isCopy); }
+ jshort* GetShortArrayElements(jshortArray array, jboolean* isCopy)
+ { return functions->GetShortArrayElements(this, array, isCopy); }
+ jint* GetIntArrayElements(jintArray array, jboolean* isCopy)
+ { return functions->GetIntArrayElements(this, array, isCopy); }
+ jlong* GetLongArrayElements(jlongArray array, jboolean* isCopy)
+ { return functions->GetLongArrayElements(this, array, isCopy); }
+ jfloat* GetFloatArrayElements(jfloatArray array, jboolean* isCopy)
+ { return functions->GetFloatArrayElements(this, array, isCopy); }
+ jdouble* GetDoubleArrayElements(jdoubleArray array, jboolean* isCopy)
+ { return functions->GetDoubleArrayElements(this, array, isCopy); }
+
+ void ReleaseBooleanArrayElements(jbooleanArray array, jboolean* elems,
+ jint mode)
+ { functions->ReleaseBooleanArrayElements(this, array, elems, mode); }
+ void ReleaseByteArrayElements(jbyteArray array, jbyte* elems,
+ jint mode)
+ { functions->ReleaseByteArrayElements(this, array, elems, mode); }
+ void ReleaseCharArrayElements(jcharArray array, jchar* elems,
+ jint mode)
+ { functions->ReleaseCharArrayElements(this, array, elems, mode); }
+ void ReleaseShortArrayElements(jshortArray array, jshort* elems,
+ jint mode)
+ { functions->ReleaseShortArrayElements(this, array, elems, mode); }
+ void ReleaseIntArrayElements(jintArray array, jint* elems,
+ jint mode)
+ { functions->ReleaseIntArrayElements(this, array, elems, mode); }
+ void ReleaseLongArrayElements(jlongArray array, jlong* elems,
+ jint mode)
+ { functions->ReleaseLongArrayElements(this, array, elems, mode); }
+ void ReleaseFloatArrayElements(jfloatArray array, jfloat* elems,
+ jint mode)
+ { functions->ReleaseFloatArrayElements(this, array, elems, mode); }
+ void ReleaseDoubleArrayElements(jdoubleArray array, jdouble* elems,
+ jint mode)
+ { functions->ReleaseDoubleArrayElements(this, array, elems, mode); }
+
+ void GetBooleanArrayRegion(jbooleanArray array, jsize start, jsize len,
+ jboolean* buf)
+ { functions->GetBooleanArrayRegion(this, array, start, len, buf); }
+ void GetByteArrayRegion(jbyteArray array, jsize start, jsize len,
+ jbyte* buf)
+ { functions->GetByteArrayRegion(this, array, start, len, buf); }
+ void GetCharArrayRegion(jcharArray array, jsize start, jsize len,
+ jchar* buf)
+ { functions->GetCharArrayRegion(this, array, start, len, buf); }
+ void GetShortArrayRegion(jshortArray array, jsize start, jsize len,
+ jshort* buf)
+ { functions->GetShortArrayRegion(this, array, start, len, buf); }
+ void GetIntArrayRegion(jintArray array, jsize start, jsize len,
+ jint* buf)
+ { functions->GetIntArrayRegion(this, array, start, len, buf); }
+ void GetLongArrayRegion(jlongArray array, jsize start, jsize len,
+ jlong* buf)
+ { functions->GetLongArrayRegion(this, array, start, len, buf); }
+ void GetFloatArrayRegion(jfloatArray array, jsize start, jsize len,
+ jfloat* buf)
+ { functions->GetFloatArrayRegion(this, array, start, len, buf); }
+ void GetDoubleArrayRegion(jdoubleArray array, jsize start, jsize len,
+ jdouble* buf)
+ { functions->GetDoubleArrayRegion(this, array, start, len, buf); }
+
+ void SetBooleanArrayRegion(jbooleanArray array, jsize start, jsize len,
+ const jboolean* buf)
+ { functions->SetBooleanArrayRegion(this, array, start, len, buf); }
+ void SetByteArrayRegion(jbyteArray array, jsize start, jsize len,
+ const jbyte* buf)
+ { functions->SetByteArrayRegion(this, array, start, len, buf); }
+ void SetCharArrayRegion(jcharArray array, jsize start, jsize len,
+ const jchar* buf)
+ { functions->SetCharArrayRegion(this, array, start, len, buf); }
+ void SetShortArrayRegion(jshortArray array, jsize start, jsize len,
+ const jshort* buf)
+ { functions->SetShortArrayRegion(this, array, start, len, buf); }
+ void SetIntArrayRegion(jintArray array, jsize start, jsize len,
+ const jint* buf)
+ { functions->SetIntArrayRegion(this, array, start, len, buf); }
+ void SetLongArrayRegion(jlongArray array, jsize start, jsize len,
+ const jlong* buf)
+ { functions->SetLongArrayRegion(this, array, start, len, buf); }
+ void SetFloatArrayRegion(jfloatArray array, jsize start, jsize len,
+ const jfloat* buf)
+ { functions->SetFloatArrayRegion(this, array, start, len, buf); }
+ void SetDoubleArrayRegion(jdoubleArray array, jsize start, jsize len,
+ const jdouble* buf)
+ { functions->SetDoubleArrayRegion(this, array, start, len, buf); }
+
+ jint RegisterNatives(jclass clazz, const JNINativeMethod* methods,
+ jint nMethods)
+ { return functions->RegisterNatives(this, clazz, methods, nMethods); }
+
+ jint UnregisterNatives(jclass clazz)
+ { return functions->UnregisterNatives(this, clazz); }
+
+ jint MonitorEnter(jobject obj)
+ { return functions->MonitorEnter(this, obj); }
+
+ jint MonitorExit(jobject obj)
+ { return functions->MonitorExit(this, obj); }
+
+ jint GetJavaVM(JavaVM** vm)
+ { return functions->GetJavaVM(this, vm); }
+
+ void GetStringRegion(jstring str, jsize start, jsize len, jchar* buf)
+ { functions->GetStringRegion(this, str, start, len, buf); }
+
+ void GetStringUTFRegion(jstring str, jsize start, jsize len, char* buf)
+ { return functions->GetStringUTFRegion(this, str, start, len, buf); }
+
+ void* GetPrimitiveArrayCritical(jarray array, jboolean* isCopy)
+ { return functions->GetPrimitiveArrayCritical(this, array, isCopy); }
+
+ void ReleasePrimitiveArrayCritical(jarray array, void* carray, jint mode)
+ { functions->ReleasePrimitiveArrayCritical(this, array, carray, mode); }
+
+ const jchar* GetStringCritical(jstring string, jboolean* isCopy)
+ { return functions->GetStringCritical(this, string, isCopy); }
+
+ void ReleaseStringCritical(jstring string, const jchar* carray)
+ { functions->ReleaseStringCritical(this, string, carray); }
+
+ jweak NewWeakGlobalRef(jobject obj)
+ { return functions->NewWeakGlobalRef(this, obj); }
+
+ void DeleteWeakGlobalRef(jweak obj)
+ { functions->DeleteWeakGlobalRef(this, obj); }
+
+ jboolean ExceptionCheck()
+ { return functions->ExceptionCheck(this); }
+
+ jobject NewDirectByteBuffer(void* address, jlong capacity)
+ { return functions->NewDirectByteBuffer(this, address, capacity); }
+
+ void* GetDirectBufferAddress(jobject buf)
+ { return functions->GetDirectBufferAddress(this, buf); }
+
+ jlong GetDirectBufferCapacity(jobject buf)
+ { return functions->GetDirectBufferCapacity(this, buf); }
+
+ /* added in JNI 1.6 */
+ jobjectRefType GetObjectRefType(jobject obj)
+ { return functions->GetObjectRefType(this, obj); }
+#endif /*__cplusplus*/
+};
+
+
+/*
+ * JNI invocation interface.
+ */
+struct JNIInvokeInterface {
+ void* reserved0;
+ void* reserved1;
+ void* reserved2;
+
+ jint (*DestroyJavaVM)(JavaVM*);
+ jint (*AttachCurrentThread)(JavaVM*, JNIEnv**, void*);
+ jint (*DetachCurrentThread)(JavaVM*);
+ jint (*GetEnv)(JavaVM*, void**, jint);
+ jint (*AttachCurrentThreadAsDaemon)(JavaVM*, JNIEnv**, void*);
+};
+
+/*
+ * C++ version.
+ */
+struct _JavaVM {
+ const struct JNIInvokeInterface* functions;
+
+#if defined(__cplusplus)
+ jint DestroyJavaVM()
+ { return functions->DestroyJavaVM(this); }
+ jint AttachCurrentThread(JNIEnv** p_env, void* thr_args)
+ { return functions->AttachCurrentThread(this, p_env, thr_args); }
+ jint DetachCurrentThread()
+ { return functions->DetachCurrentThread(this); }
+ jint GetEnv(void** env, jint version)
+ { return functions->GetEnv(this, env, version); }
+ jint AttachCurrentThreadAsDaemon(JNIEnv** p_env, void* thr_args)
+ { return functions->AttachCurrentThreadAsDaemon(this, p_env, thr_args); }
+#endif /*__cplusplus*/
+};
+
+struct JavaVMAttachArgs {
+ jint version; /* must be >= JNI_VERSION_1_2 */
+ const char* name; /* NULL or name of thread as modified UTF-8 str */
+ jobject group; /* global ref of a ThreadGroup object, or NULL */
+};
+typedef struct JavaVMAttachArgs JavaVMAttachArgs;
+
+/*
+ * JNI 1.2+ initialization. (As of 1.6, the pre-1.2 structures are no
+ * longer supported.)
+ */
+typedef struct JavaVMOption {
+ const char* optionString;
+ void* extraInfo;
+} JavaVMOption;
+
+typedef struct JavaVMInitArgs {
+ jint version; /* use JNI_VERSION_1_2 or later */
+
+ jint nOptions;
+ JavaVMOption* options;
+ jboolean ignoreUnrecognized;
+} JavaVMInitArgs;
+
+#ifdef __cplusplus
+extern "C" {
+#endif
+/*
+ * VM initialization functions.
+ *
+ * Note these are the only symbols exported for JNI by the VM.
+ */
+jint JNI_GetDefaultJavaVMInitArgs(void*);
+jint JNI_CreateJavaVM(JavaVM**, JNIEnv**, void*);
+jint JNI_GetCreatedJavaVMs(JavaVM**, jsize, jsize*);
+
+/*
+ * Prototypes for functions exported by loadable shared libs. These are
+ * called by JNI, not provided by JNI.
+ */
+jint JNI_OnLoad(JavaVM* vm, void* reserved);
+void JNI_OnUnload(JavaVM* vm, void* reserved);
+
+#ifdef __cplusplus
+}
+#endif
+
+
+/*
+ * Manifest constants.
+ */
+#define JNI_FALSE 0
+#define JNI_TRUE 1
+
+#define JNI_VERSION_1_1 0x00010001
+#define JNI_VERSION_1_2 0x00010002
+#define JNI_VERSION_1_4 0x00010004
+#define JNI_VERSION_1_6 0x00010006
+
+#define JNI_OK (0) /* no error */
+#define JNI_ERR (-1) /* generic error */
+#define JNI_EDETACHED (-2) /* thread detached from the VM */
+#define JNI_EVERSION (-3) /* JNI version error */
+
+#define JNI_COMMIT 1 /* copy content, do not free buffer */
+#define JNI_ABORT 2 /* free buffer w/o copying back */
+
+/* need these for Windows-aware headers */
+#define JNIIMPORT
+#define JNIEXPORT
+#define JNICALL
+
+#endif /*_JNI_H*/
diff --git a/src/jvm/jvm.c b/src/jvm/jvm.c
new file mode 100644
index 0000000..15a925e
--- /dev/null
+++ b/src/jvm/jvm.c
@@ -0,0 +1,2402 @@
+#include <stdio.h>
+#include <string.h>
+#include <stdlib.h>
+#include <stddef.h>
+#include <stdint.h>
+#include <assert.h>
+#include "dlfcn.h"
+#include "jvm.h"
+
+#define ARRAY_SIZE(x) (sizeof(x) / sizeof(x[0]))
+#define container_of(ptr, type, member) ((type *)((char *)(1 ? (ptr) : &((type *)0)->member) - offsetof(type, member)))
+
+extern void* create_wrapper(const char *const symbol, void *function);
+
+static inline char*
+ccopy(const char *str, const size_t len, const bool null_terminate)
+{
+ assert(str);
+ char *cpy = calloc(1, len + null_terminate);
+ return (cpy ? memcpy(cpy, str, len) : NULL);
+}
+
+static void
+jvm_string_release(struct jvm_string *string)
+{
+ if (!string)
+ return;
+
+ if (string->heap)
+ free((char*)string->data);
+
+ *string = (struct jvm_string){0};
+}
+
+static bool
+jvm_string_set_cstr_with_length(struct jvm_string *string, const char *data, const size_t len, const bool heap)
+{
+ assert(string);
+
+ char *copy = (char*)data;
+ if (heap && data && len > 0 && !(copy = ccopy(data, len, true)))
+ return false;
+
+ jvm_string_release(string);
+ string->heap = heap;
+ string->data = (len > 0 ? copy : NULL);
+ string->size = len;
+ return true;
+}
+
+static bool
+jvm_string_set_cstr(struct jvm_string *string, const char *data, const bool heap)
+{
+ assert(string);
+ return jvm_string_set_cstr_with_length(string, data, (data ? strlen(data) : 0), heap);
+}
+
+static inline bool
+jvm_string_eq(const struct jvm_string *a, const struct jvm_string *b)
+{
+ return (a->data == b->data) || (a->size == b->size && !memcmp(a->data, b->data, a->size));
+}
+
+static void
+release_array(struct jvm_object *o)
+{
+ assert(o);
+ free(o->array.data);
+}
+
+static void
+release_method(struct jvm_object *o)
+{
+ assert(o);
+ jvm_string_release(&o->method.name);
+ jvm_string_release(&o->method.signature);
+}
+
+static void
+release_class(struct jvm_object *o)
+{
+ assert(o);
+ jvm_string_release(&o->klass.name);
+}
+
+static void
+release_string(struct jvm_object *o)
+{
+ assert(o);
+ jvm_string_release(&o->string);
+}
+
+static void
+jvm_object_release(struct jvm_object *o)
+{
+ if (!o || o->type == JVM_OBJECT_NONE)
+ return;
+
+ void (*destructor[])(struct jvm_object *o) = {
+ NULL,
+ NULL,
+ release_array,
+ release_method,
+ release_class,
+ release_string,
+ };
+
+ assert(o->type < JVM_OBJECT_LAST);
+
+ if (destructor)
+ destructor[o->type](o);
+
+ *o = (struct jvm_object){0};
+}
+
+static bool
+compare_opaque(const struct jvm_object *a, const struct jvm_object *b)
+{
+ assert(a && b);
+ return (a->this_klass == b->this_klass);
+}
+
+static bool
+compare_array(const struct jvm_object *a, const struct jvm_object *b)
+{
+ assert(a && b);
+ const size_t a_sz = a->array.size * a->array.element_sz;
+ const size_t b_sz = b->array.size * b->array.element_sz;
+ return (a_sz == b_sz && !memcmp(a->array.data, b->array.data, a_sz));
+}
+
+static bool
+compare_method(const struct jvm_object *a, const struct jvm_object *b)
+{
+ assert(a && b);
+ return a->method.klass == b->method.klass &&
+ jvm_string_eq(&a->method.name, &b->method.name) &&
+ jvm_string_eq(&a->method.signature, &b->method.signature);
+}
+
+static bool
+compare_class(const struct jvm_object *a, const struct jvm_object *b)
+{
+ assert(a && b);
+ return jvm_string_eq(&a->klass.name, &b->klass.name);
+}
+
+static bool
+compare_string(const struct jvm_object *a, const struct jvm_object *b)
+{
+ assert(a && b);
+ return jvm_string_eq(&a->string, &b->string);
+}
+
+static jobject
+jvm_find_object(struct jvm *jvm, const struct jvm_object *o)
+{
+ assert(jvm && o && o->type != JVM_OBJECT_NONE);
+
+ bool (*comparator[])(const struct jvm_object *a, const struct jvm_object *b) = {
+ NULL,
+ compare_opaque,
+ compare_array,
+ compare_method,
+ compare_class,
+ compare_string,
+ };
+
+ for (uintptr_t i = 0; i < ARRAY_SIZE(jvm->objects); ++i) {
+ if (o->type != jvm->objects[i].type)
+ continue;
+
+ assert(o->type < JVM_OBJECT_LAST);
+ if (comparator[o->type](o, &jvm->objects[i]))
+ return (jobject)(i + 1);
+ }
+
+ return 0;
+}
+
+static jclass
+jvm_make_class(struct jvm *jvm, const char *name);
+
+static void
+jvm_assing_default_class(struct jvm *jvm, struct jvm_object *o)
+{
+ assert(jvm && o);
+
+ switch (o->type) {
+ case JVM_OBJECT_METHOD:
+ o->this_klass = jvm_make_class(jvm, "java/lang/reflect/Method");
+ break;
+
+ case JVM_OBJECT_STRING:
+ o->this_klass = jvm_make_class(jvm, "java/lang/String");
+ break;
+
+ case JVM_OBJECT_NONE:
+ case JVM_OBJECT_ARRAY:
+ case JVM_OBJECT_CLASS:
+ case JVM_OBJECT_LAST:
+ // arrays have unique classes which is handled on `jvm_new_array`
+ // `jvm_make_class` points class's `this_class` to first object, which is class definition for a class
+ assert(0 && "epic failure");
+ break;
+ }
+}
+
+static jobject
+jvm_add_object(struct jvm *jvm, const struct jvm_object *o)
+{
+ assert(jvm && o);
+
+ uintptr_t i;
+ for (i = 0; i < ARRAY_SIZE(jvm->objects) && jvm->objects[i].type != JVM_OBJECT_NONE; ++i);
+ assert(i < ARRAY_SIZE(jvm->objects) && "jvm object limit reached!");
+ jvm->objects[i] = *o;
+
+ if (!jvm->objects[i].this_klass)
+ jvm_assing_default_class(jvm, &jvm->objects[i]);
+
+ return (jobject)(i + 1);
+}
+
+static jobject
+jvm_add_object_if_not_there(struct jvm *jvm, struct jvm_object *needle)
+{
+ assert(jvm && needle);
+ jobject o;
+ if ((o = jvm_find_object(jvm, needle))) {
+ jvm_object_release(needle);
+ return o;
+ }
+
+ return jvm_add_object(jvm, needle);
+}
+
+static struct jvm_object*
+jvm_get_object(struct jvm *jvm, const jobject o)
+{
+ assert(jvm && (uintptr_t)o <= ARRAY_SIZE(jvm->objects));
+ return (o ? &jvm->objects[(uintptr_t)o - 1] : NULL);
+}
+
+static struct jvm*
+jnienv_get_jvm(JNIEnv *env)
+{
+ return container_of(env, struct jvm, env);
+}
+
+static struct jvm*
+javavm_get_jvm(JavaVM *vm)
+{
+ return container_of(vm, struct jvm, vm);
+}
+
+static jint
+JNIEnv_GetVersion(JNIEnv * p0)
+{
+ return 0;
+}
+
+static jclass
+JNIEnv_DefineClass(JNIEnv* p0, const char* p1, jobject p2, const jbyte* p3, jsize p4)
+{
+ return NULL;
+}
+
+static jclass
+jvm_make_class(struct jvm *jvm, const char *name)
+{
+ assert(jvm && name);
+ struct jvm_object o = { .this_klass = (jclass)1, .type = JVM_OBJECT_CLASS };
+ jvm_string_set_cstr(&o.klass.name, name, true);
+ return jvm_add_object_if_not_there(jvm, &o);
+}
+
+static jclass
+JNIEnv_FindClass(JNIEnv* p0, const char* p1)
+{
+ assert(p0 && p1);
+ printf("%s\n", p1);
+ return jvm_make_class(jnienv_get_jvm(p0), p1);
+}
+
+static jmethodID
+JNIEnv_FromReflectedMethod(JNIEnv* p0, jobject p1)
+{
+ return NULL;
+}
+
+static jfieldID
+JNIEnv_FromReflectedField(JNIEnv* p0, jobject p1)
+{
+ return NULL;
+}
+
+static jobject
+JNIEnv_ToReflectedMethod(JNIEnv* p0, jclass p1, jmethodID p2, jboolean p3)
+{
+ return NULL;
+}
+
+static jclass
+JNIEnv_GetSuperclass(JNIEnv* p0, jclass p1)
+{
+ return NULL;
+}
+
+static jboolean
+JNIEnv_IsAssignableFrom(JNIEnv* p0, jclass p1, jclass p2)
+{
+ return 0;
+}
+
+static jobject
+JNIEnv_ToReflectedField(JNIEnv* p0, jclass p1, jfieldID p2, jboolean p3)
+{
+ return NULL;
+}
+
+static jint
+JNIEnv_Throw(JNIEnv* p0, jthrowable p1)
+{
+ return 0;
+}
+
+static jint
+JNIEnv_ThrowNew(JNIEnv * p0, jclass p1, const char * p2)
+{
+ return 0;
+}
+
+static jthrowable
+JNIEnv_ExceptionOccurred(JNIEnv* p0)
+{
+ return NULL;
+}
+
+static void
+JNIEnv_ExceptionDescribe(JNIEnv* p0)
+{
+}
+
+static void
+JNIEnv_ExceptionClear(JNIEnv* p0)
+{
+}
+
+static void
+JNIEnv_FatalError(JNIEnv* p0, const char* p1)
+{
+}
+
+static jint
+JNIEnv_PushLocalFrame(JNIEnv* p0, jint p1)
+{
+ return 0;
+}
+
+static jobject
+JNIEnv_PopLocalFrame(JNIEnv* p0, jobject p1)
+{
+ return NULL;
+}
+
+static jobject
+JNIEnv_NewGlobalRef(JNIEnv* p0, jobject p1)
+{
+ // FIXME: add ref counting
+ return p1;
+}
+
+static void
+JNIEnv_DeleteGlobalRef(JNIEnv* p0, jobject p1)
+{
+}
+
+static void
+JNIEnv_DeleteLocalRef(JNIEnv* p0, jobject p1)
+{
+}
+
+static jboolean
+JNIEnv_IsSameObject(JNIEnv* p0, jobject p1, jobject p2)
+{
+ return 0;
+}
+
+static jobject
+JNIEnv_NewLocalRef(JNIEnv* p0, jobject p1)
+{
+ // FIXME: add ref counting
+ return NULL;
+}
+
+static jint
+JNIEnv_EnsureLocalCapacity(JNIEnv* p0, jint p1)
+{
+ return 0;
+}
+
+static jobject
+JNIEnv_AllocObject(JNIEnv* p0, jclass p1)
+{
+ assert(p0 && p1);
+ struct jvm_object o = { .this_klass = p1, .type = JVM_OBJECT_OPAQUE };
+ return jvm_add_object_if_not_there(jnienv_get_jvm(p0), &o);
+}
+
+static jobject
+JNIEnv_NewObject(JNIEnv* p0, jclass p1, jmethodID p2, ...)
+{
+ assert(p0 && p1);
+ return JNIEnv_AllocObject(p0, p1);
+ // FIXME: call constructor
+}
+
+static jobject
+JNIEnv_NewObjectV(JNIEnv *p0, jclass p1, jmethodID p2, va_list p3)
+{
+ assert(p0 && p1);
+ return JNIEnv_AllocObject(p0, p1);
+ // FIXME: call constructor
+}
+
+static jobject
+JNIEnv_NewObjectA(JNIEnv* p0, jclass p1, jmethodID p2, jvalue* p3)
+{
+ assert(p0 && p1);
+ return JNIEnv_AllocObject(p0, p1);
+ // FIXME: call constructor
+}
+
+static jclass
+JNIEnv_GetObjectClass(JNIEnv* env, jobject p1)
+{
+ assert(env && p1);
+ printf("%u\n", (uint32_t)(uintptr_t)p1);
+ return jvm_get_object(jnienv_get_jvm(env), p1)->this_klass;
+}
+
+static jboolean
+JNIEnv_IsInstanceOf(JNIEnv* p0, jobject p1, jclass p2)
+{
+ return 0;
+}
+
+static jmethodID
+jvm_make_method(struct jvm *jvm, jclass klass, const char *name, const char *sig)
+{
+ assert(jvm && klass && name && sig);
+ printf("%s::%s::%s\n", jvm_get_object(jvm, klass)->klass.name.data, name, sig);
+ struct jvm_object o = { .method.klass = klass, .type = JVM_OBJECT_METHOD };
+ jvm_string_set_cstr(&o.method.name, name, true);
+ jvm_string_set_cstr(&o.method.signature, sig, true);
+ return jvm_add_object_if_not_there(jvm, &o);
+}
+
+static jmethodID
+JNIEnv_GetMethodID(JNIEnv* p0, jclass klass, const char* name, const char* sig)
+{
+ return jvm_make_method(jnienv_get_jvm(p0), klass, name, sig);
+}
+
+static jobject
+JNIEnv_CallObjectMethod(JNIEnv* p0, jobject p1, jmethodID p2, ...)
+{
+ return NULL;
+}
+
+static char*
+cstr_replace(char *cstr, const char replace, const char with)
+{
+ assert(cstr && replace != with);
+
+ if (replace == with)
+ return cstr;
+
+ char *s = cstr;
+ while ((s = strchr(s, replace)))
+ *s = with;
+ return cstr;
+}
+
+static void
+jvm_form_symbol(struct jvm *jvm, jmethodID method_id, char *symbol, const size_t symbol_sz)
+{
+ assert(jvm && method_id);
+ struct jvm_method *method = &jvm_get_object(jvm, method_id)->method;
+ printf("%s::%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data, method->signature.data);
+ snprintf(symbol, symbol_sz, "%s_%s", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ cstr_replace(symbol, '/', '_');
+}
+
+static jobject
+JNIEnv_CallObjectMethodV(JNIEnv *p0, jobject p1, jmethodID p2, va_list p3)
+{
+ assert(p0 && p1 && p2);
+ char symbol[255];
+ jvm_form_symbol(jnienv_get_jvm(p0), p2, symbol, sizeof(symbol));
+ jobject (*fun)(JNIEnv*, jobject, va_list) = create_wrapper(symbol, dlsym(RTLD_DEFAULT, symbol));
+ return fun(p0, p1, p3);
+}
+
+static jobject
+JNIEnv_CallObjectMethodA(JNIEnv* p0, jobject p1, jmethodID p2, jvalue* p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return NULL;
+}
+
+static jboolean
+JNIEnv_CallBooleanMethod(JNIEnv* p0, jobject p1, jmethodID p2, ...)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jboolean
+JNIEnv_CallBooleanMethodV(JNIEnv* p0, jobject p1, jmethodID p2, va_list p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jboolean
+JNIEnv_CallBooleanMethodA(JNIEnv* p0, jobject p1, jmethodID p2, jvalue* p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jbyte
+JNIEnv_CallByteMethod(JNIEnv* p0, jobject p1, jmethodID p2, ...)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jbyte
+JNIEnv_CallByteMethodV(JNIEnv* p0, jobject p1, jmethodID p2, va_list p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jbyte
+JNIEnv_CallByteMethodA(JNIEnv* p0, jobject p1, jmethodID p2, jvalue* p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jchar
+JNIEnv_CallCharMethod(JNIEnv* p0, jobject p1, jmethodID p2, ...)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jchar
+JNIEnv_CallCharMethodV(JNIEnv* p0, jobject p1, jmethodID p2, va_list p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jchar
+JNIEnv_CallCharMethodA(JNIEnv* p0, jobject p1, jmethodID p2, jvalue* p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jshort
+JNIEnv_CallShortMethod(JNIEnv* p0, jobject p1, jmethodID p2, ...)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jshort
+JNIEnv_CallShortMethodV(JNIEnv* p0, jobject p1, jmethodID p2, va_list p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jshort
+JNIEnv_CallShortMethodA(JNIEnv* p0, jobject p1, jmethodID p2, jvalue* p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jint
+JNIEnv_CallIntMethod(JNIEnv* p0, jobject p1, jmethodID p2, ...)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jint
+JNIEnv_CallIntMethodV(JNIEnv* p0, jobject p1, jmethodID p2, va_list p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jint
+JNIEnv_CallIntMethodA(JNIEnv* p0, jobject p1, jmethodID p2, jvalue* p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jlong
+JNIEnv_CallLongMethod(JNIEnv* p0, jobject p1, jmethodID p2, ...)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jlong
+JNIEnv_CallLongMethodV(JNIEnv* p0, jobject p1, jmethodID p2, va_list p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jlong
+JNIEnv_CallLongMethodA(JNIEnv* p0, jobject p1, jmethodID p2, jvalue* p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jfloat
+JNIEnv_CallFloatMethod(JNIEnv* p0, jobject p1, jmethodID p2, ...)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jfloat
+JNIEnv_CallFloatMethodV(JNIEnv* p0, jobject p1, jmethodID p2, va_list p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jfloat
+JNIEnv_CallFloatMethodA(JNIEnv* p0, jobject p1, jmethodID p2, jvalue* p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jdouble
+JNIEnv_CallDoubleMethod(JNIEnv* p0, jobject p1, jmethodID p2, ...)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jdouble
+JNIEnv_CallDoubleMethodV(JNIEnv* p0, jobject p1, jmethodID p2, va_list p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jdouble
+JNIEnv_CallDoubleMethodA(JNIEnv* p0, jobject p1, jmethodID p2, jvalue* p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static void
+JNIEnv_CallVoidMethod(JNIEnv* p0, jobject p1, jmethodID p2, ...)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+}
+
+static void
+JNIEnv_CallVoidMethodV(JNIEnv* p0, jobject p1, jmethodID p2, va_list p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+}
+
+static void
+JNIEnv_CallVoidMethodA(JNIEnv* p0, jobject p1, jmethodID p2, jvalue* p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+}
+
+static jobject
+JNIEnv_CallNonvirtualObjectMethod(JNIEnv* p0, jobject p1, jclass p2, jmethodID p3, ...)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return NULL;
+}
+
+static jobject
+JNIEnv_CallNonvirtualObjectMethodV(JNIEnv* p0, jobject p1, jclass p2, jmethodID p3, va_list p4)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return NULL;
+}
+
+static jobject
+JNIEnv_CallNonvirtualObjectMethodA(JNIEnv* p0, jobject p1, jclass p2, jmethodID p3, jvalue* p4)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return NULL;
+}
+
+static jboolean
+JNIEnv_CallNonvirtualBooleanMethod(JNIEnv* p0, jobject p1, jclass p2, jmethodID p3, ...)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jboolean
+JNIEnv_CallNonvirtualBooleanMethodV(JNIEnv* p0, jobject p1, jclass p2, jmethodID p3, va_list p4)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jboolean
+JNIEnv_CallNonvirtualBooleanMethodA(JNIEnv* p0, jobject p1, jclass p2, jmethodID p3, jvalue* p4)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jbyte
+JNIEnv_CallNonvirtualByteMethod(JNIEnv* p0, jobject p1, jclass p2, jmethodID p3, ...)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jbyte
+JNIEnv_CallNonvirtualByteMethodV(JNIEnv* p0, jobject p1, jclass p2, jmethodID p3, va_list p4)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jbyte
+JNIEnv_CallNonvirtualByteMethodA(JNIEnv* p0, jobject p1, jclass p2, jmethodID p3, jvalue* p4)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jchar
+JNIEnv_CallNonvirtualCharMethod(JNIEnv* p0, jobject p1, jclass p2, jmethodID p3, ...)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jchar
+JNIEnv_CallNonvirtualCharMethodV(JNIEnv* p0, jobject p1, jclass p2, jmethodID p3, va_list p4)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jchar
+JNIEnv_CallNonvirtualCharMethodA(JNIEnv* p0, jobject p1, jclass p2, jmethodID p3, jvalue* p4)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jshort
+JNIEnv_CallNonvirtualShortMethod(JNIEnv* p0, jobject p1, jclass p2, jmethodID p3, ...)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jshort
+JNIEnv_CallNonvirtualShortMethodV(JNIEnv* p0, jobject p1, jclass p2, jmethodID p3, va_list p4)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jshort
+JNIEnv_CallNonvirtualShortMethodA(JNIEnv* p0, jobject p1, jclass p2, jmethodID p3, jvalue* p4)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jint
+JNIEnv_CallNonvirtualIntMethod(JNIEnv* p0, jobject p1, jclass p2, jmethodID p3, ...)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jint
+JNIEnv_CallNonvirtualIntMethodV(JNIEnv* p0, jobject p1, jclass p2, jmethodID p3, va_list p4)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jint
+JNIEnv_CallNonvirtualIntMethodA(JNIEnv* p0, jobject p1, jclass p2, jmethodID p3, jvalue* p4)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jlong
+JNIEnv_CallNonvirtualLongMethod(JNIEnv* p0, jobject p1, jclass p2, jmethodID p3, ...)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jlong
+JNIEnv_CallNonvirtualLongMethodV(JNIEnv* p0, jobject p1, jclass p2, jmethodID p3, va_list p4)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jlong
+JNIEnv_CallNonvirtualLongMethodA(JNIEnv* p0, jobject p1, jclass p2, jmethodID p3, jvalue* p4)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jfloat
+JNIEnv_CallNonvirtualFloatMethod(JNIEnv* p0, jobject p1, jclass p2, jmethodID p3, ...)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jfloat
+JNIEnv_CallNonvirtualFloatMethodV(JNIEnv* p0, jobject p1, jclass p2, jmethodID p3, va_list p4)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jfloat
+JNIEnv_CallNonvirtualFloatMethodA(JNIEnv* p0, jobject p1, jclass p2, jmethodID p3, jvalue* p4)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jdouble
+JNIEnv_CallNonvirtualDoubleMethod(JNIEnv* p0, jobject p1, jclass p2, jmethodID p3, ...)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jdouble
+JNIEnv_CallNonvirtualDoubleMethodV(JNIEnv* p0, jobject p1, jclass p2, jmethodID p3, va_list p4)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jdouble
+JNIEnv_CallNonvirtualDoubleMethodA(JNIEnv* p0, jobject p1, jclass p2, jmethodID p3, jvalue* p4)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static void
+JNIEnv_CallNonvirtualVoidMethod(JNIEnv* p0, jobject p1, jclass p2, jmethodID p3, ...)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+}
+
+static void
+JNIEnv_CallNonvirtualVoidMethodV(JNIEnv* p0, jobject p1, jclass p2, jmethodID p3, va_list p4)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+}
+
+static void
+JNIEnv_CallNonvirtualVoidMethodA(JNIEnv* p0, jobject p1, jclass p2, jmethodID p3, jvalue* p4)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+}
+
+static jfieldID
+jvm_make_fieldid(struct jvm *jvm, const jclass klass, const char *name, const char *sig)
+{
+ return (jfieldID)jvm_make_method(jvm, klass, name, sig);
+}
+
+static jfieldID
+JNIEnv_GetFieldID(JNIEnv* p0, jclass klass, const char* name, const char* sig)
+{
+ return jvm_make_fieldid(jnienv_get_jvm(p0), klass, name, sig);
+}
+
+static jobject
+JNIEnv_GetObjectField(JNIEnv* p0, jobject p1, jfieldID p2)
+{
+ return NULL;
+}
+
+static jboolean
+JNIEnv_GetBooleanField(JNIEnv* p0, jobject p1, jfieldID p2)
+{
+ return 0;
+}
+
+static jbyte
+JNIEnv_GetByteField(JNIEnv* p0, jobject p1, jfieldID p2)
+{
+ return 0;
+}
+
+static jchar
+JNIEnv_GetCharField(JNIEnv* p0, jobject p1, jfieldID p2)
+{
+ return 0;
+}
+
+static jshort
+JNIEnv_GetShortField(JNIEnv* p0, jobject p1, jfieldID p2)
+{
+ return 0;
+}
+
+static jint
+JNIEnv_GetIntField(JNIEnv* p0, jobject p1, jfieldID p2)
+{
+ return 0;
+}
+
+static jlong
+JNIEnv_GetLongField(JNIEnv* p0, jobject p1, jfieldID p2)
+{
+ return 0;
+}
+
+static jfloat
+JNIEnv_GetFloatField(JNIEnv* p0, jobject p1, jfieldID p2)
+{
+ return 0;
+}
+
+static jdouble
+JNIEnv_GetDoubleField(JNIEnv* p0, jobject p1, jfieldID p2)
+{
+ return 0;
+}
+
+static void
+JNIEnv_SetObjectField(JNIEnv* p0, jobject p1, jfieldID p2, jobject p3)
+{
+}
+
+static void
+JNIEnv_SetBooleanField(JNIEnv* p0, jobject p1, jfieldID p2, jboolean p3)
+{
+}
+
+static void
+JNIEnv_SetByteField(JNIEnv* p0, jobject p1, jfieldID p2, jbyte p3)
+{
+}
+
+static void
+JNIEnv_SetCharField(JNIEnv* p0, jobject p1, jfieldID p2, jchar p3)
+{
+}
+
+static void
+JNIEnv_SetShortField(JNIEnv* p0, jobject p1, jfieldID p2, jshort p3)
+{
+}
+
+static void
+JNIEnv_SetIntField(JNIEnv* p0, jobject p1, jfieldID p2, jint p3)
+{
+}
+
+static void
+JNIEnv_SetLongField(JNIEnv* p0, jobject p1, jfieldID p2, jlong p3)
+{
+}
+
+static void
+JNIEnv_SetFloatField(JNIEnv* p0, jobject p1, jfieldID p2, jfloat p3)
+{
+}
+
+static void
+JNIEnv_SetDoubleField(JNIEnv* p0, jobject p1, jfieldID p2, jdouble p3)
+{
+}
+
+static jmethodID
+JNIEnv_GetStaticMethodID(JNIEnv* p0, jclass klass, const char* name, const char* sig)
+{
+ return jvm_make_method(jnienv_get_jvm(p0), klass, name, sig);
+}
+
+static jobject
+JNIEnv_CallStaticObjectMethod(JNIEnv* p0, jclass p1, jmethodID p2, ...)
+{
+ return NULL;
+}
+
+static jobject
+JNIEnv_CallStaticObjectMethodV(JNIEnv* p0, jclass p1, jmethodID p2, va_list p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return NULL;
+}
+
+static jobject
+JNIEnv_CallStaticObjectMethodA(JNIEnv* p0, jclass p1, jmethodID p2, jvalue* p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return NULL;
+}
+
+static jboolean
+JNIEnv_CallStaticBooleanMethod(JNIEnv* p0, jclass p1, jmethodID p2, ...)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jboolean
+JNIEnv_CallStaticBooleanMethodV(JNIEnv* p0, jclass p1, jmethodID p2, va_list p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jboolean
+JNIEnv_CallStaticBooleanMethodA(JNIEnv* p0, jclass p1, jmethodID p2, jvalue* p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jbyte
+JNIEnv_CallStaticByteMethod(JNIEnv* p0, jclass p1, jmethodID p2, ...)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jbyte
+JNIEnv_CallStaticByteMethodV(JNIEnv* p0, jclass p1, jmethodID p2, va_list p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jbyte
+JNIEnv_CallStaticByteMethodA(JNIEnv* p0, jclass p1, jmethodID p2, jvalue* p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jchar
+JNIEnv_CallStaticCharMethod(JNIEnv* p0, jclass p1, jmethodID p2, ...)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jchar
+JNIEnv_CallStaticCharMethodV(JNIEnv* p0, jclass p1, jmethodID p2, va_list p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jchar
+JNIEnv_CallStaticCharMethodA(JNIEnv* p0, jclass p1, jmethodID p2, jvalue* p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jshort
+JNIEnv_CallStaticShortMethod(JNIEnv* p0, jclass p1, jmethodID p2, ...)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jshort
+JNIEnv_CallStaticShortMethodV(JNIEnv* p0, jclass p1, jmethodID p2, va_list p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jshort
+JNIEnv_CallStaticShortMethodA(JNIEnv* p0, jclass p1, jmethodID p2, jvalue* p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jint
+JNIEnv_CallStaticIntMethod(JNIEnv* p0, jclass p1, jmethodID p2, ...)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jint
+JNIEnv_CallStaticIntMethodV(JNIEnv* p0, jclass p1, jmethodID p2, va_list p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jint
+JNIEnv_CallStaticIntMethodA(JNIEnv* p0, jclass p1, jmethodID p2, jvalue* p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jlong
+JNIEnv_CallStaticLongMethod(JNIEnv* p0, jclass p1, jmethodID p2, ...)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jlong
+JNIEnv_CallStaticLongMethodV(JNIEnv* p0, jclass p1, jmethodID p2, va_list p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jlong
+JNIEnv_CallStaticLongMethodA(JNIEnv* p0, jclass p1, jmethodID p2, jvalue* p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jfloat
+JNIEnv_CallStaticFloatMethod(JNIEnv* p0, jclass p1, jmethodID p2, ...)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jfloat
+JNIEnv_CallStaticFloatMethodV(JNIEnv* p0, jclass p1, jmethodID p2, va_list p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jfloat
+JNIEnv_CallStaticFloatMethodA(JNIEnv* p0, jclass p1, jmethodID p2, jvalue* p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jdouble
+JNIEnv_CallStaticDoubleMethod(JNIEnv* p0, jclass p1, jmethodID p2, ...)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jdouble
+JNIEnv_CallStaticDoubleMethodV(JNIEnv* p0, jclass p1, jmethodID p2, va_list p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static jdouble
+JNIEnv_CallStaticDoubleMethodA(JNIEnv* p0, jclass p1, jmethodID p2, jvalue* p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+ return 0;
+}
+
+static void
+JNIEnv_CallStaticVoidMethod(JNIEnv* p0, jclass p1, jmethodID p2, ...)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+}
+
+static void
+JNIEnv_CallStaticVoidMethodV(JNIEnv* p0, jclass p1, jmethodID p2, va_list p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+}
+
+static void
+JNIEnv_CallStaticVoidMethodA(JNIEnv* p0, jclass p1, jmethodID p2, jvalue* p3)
+{
+ assert(p0 && p1 && p2);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ struct jvm_method *method = &jvm_get_object(jvm, p2)->method;
+ printf("%s::%s\n", jvm_get_object(jvm, method->klass)->klass.name.data, method->name.data);
+}
+
+static jfieldID
+JNIEnv_GetStaticFieldID(JNIEnv* p0, jclass klass, const char* name, const char* sig)
+{
+ return jvm_make_fieldid(jnienv_get_jvm(p0), klass, name, sig);
+}
+
+static jobject
+JNIEnv_GetStaticObjectField(JNIEnv* p0, jclass p1, jfieldID p2)
+{
+ return NULL;
+}
+
+static jboolean
+JNIEnv_GetStaticBooleanField(JNIEnv* p0, jclass p1, jfieldID p2)
+{
+ return 0;
+}
+
+static jbyte
+JNIEnv_GetStaticByteField(JNIEnv* p0, jclass p1, jfieldID p2)
+{
+ return 0;
+}
+
+static jchar
+JNIEnv_GetStaticCharField(JNIEnv* p0, jclass p1, jfieldID p2)
+{
+ return 0;
+}
+
+static jshort
+JNIEnv_GetStaticShortField(JNIEnv* p0, jclass p1, jfieldID p2)
+{
+ return 0;
+}
+
+static jint
+JNIEnv_GetStaticIntField(JNIEnv* p0, jclass p1, jfieldID p2)
+{
+ return 0;
+}
+
+static jlong
+JNIEnv_GetStaticLongField(JNIEnv* p0, jclass p1, jfieldID p2)
+{
+ return 0;
+}
+
+static jfloat
+JNIEnv_GetStaticFloatField(JNIEnv* p0, jclass p1, jfieldID p2)
+{
+ return 0;
+}
+
+static jdouble
+JNIEnv_GetStaticDoubleField(JNIEnv* p0, jclass p1, jfieldID p2)
+{
+ return 0;
+}
+
+static void
+JNIEnv_SetStaticObjectField(JNIEnv* p0, jclass p1, jfieldID p2, jobject p3)
+{
+}
+
+static void
+JNIEnv_SetStaticBooleanField(JNIEnv* p0, jclass p1, jfieldID p2, jboolean p3)
+{
+}
+
+static void
+JNIEnv_SetStaticByteField(JNIEnv* p0, jclass p1, jfieldID p2, jbyte p3)
+{
+}
+
+static void
+JNIEnv_SetStaticCharField(JNIEnv* p0, jclass p1, jfieldID p2, jchar p3)
+{
+}
+
+static void
+JNIEnv_SetStaticShortField(JNIEnv* p0, jclass p1, jfieldID p2, jshort p3)
+{
+}
+
+static void
+JNIEnv_SetStaticIntField(JNIEnv* p0, jclass p1, jfieldID p2, jint p3)
+{
+}
+
+static void
+JNIEnv_SetStaticLongField(JNIEnv* p0, jclass p1, jfieldID p2, jlong p3)
+{
+}
+
+static void
+JNIEnv_SetStaticFloatField(JNIEnv* p0, jclass p1, jfieldID p2, jfloat p3)
+{
+}
+
+static void
+JNIEnv_SetStaticDoubleField(JNIEnv* p0, jclass p1, jfieldID p2, jdouble p3)
+{
+}
+
+static jstring
+JNIEnv_NewString(JNIEnv* p0, const jchar* p1, jsize p2)
+{
+ assert(p0);
+ struct jvm_object o = { .type = JVM_OBJECT_STRING };
+ jvm_string_set_cstr_with_length(&o.string, (const char*)p1, p2, true);
+ return jvm_add_object_if_not_there(jnienv_get_jvm(p0), &o);
+}
+
+static jsize
+JNIEnv_GetStringLength(JNIEnv* p0, jstring p1)
+{
+ return 0;
+}
+
+const jchar*
+JNIEnv_GetStringChars(JNIEnv* p0, jstring p1, jboolean* p2)
+{
+ return NULL;
+}
+
+static void
+JNIEnv_ReleaseStringChars(JNIEnv* p0, jstring p1, const jchar* p2)
+{
+}
+
+static jstring
+JNIEnv_NewStringUTF(JNIEnv* p0, const char* p1)
+{
+ assert(p0);
+ struct jvm_object o = { .type = JVM_OBJECT_STRING };
+ jvm_string_set_cstr(&o.string, p1, true);
+ return jvm_add_object_if_not_there(jnienv_get_jvm(p0), &o);
+}
+
+static jsize
+JNIEnv_GetStringUTFLength(JNIEnv* p0, jstring p1)
+{
+ assert(p0 && p1);
+ return jvm_get_object(jnienv_get_jvm(p0), p1)->string.size;
+}
+
+static jsize
+JNIEnv_GetArrayLength(JNIEnv* p0, jarray p1)
+{
+ assert(p0 && p1);
+ return jvm_get_object(jnienv_get_jvm(p0), p1)->array.size;
+}
+
+static jobjectArray
+JNIEnv_NewObjectArray(JNIEnv* p0, jsize p1, jclass p2, jobject p3)
+{
+ return NULL;
+}
+
+static jobject
+JNIEnv_GetObjectArrayElement(JNIEnv* p0, jobjectArray p1, jsize p2)
+{
+ return NULL;
+}
+
+static void
+JNIEnv_SetObjectArrayElement(JNIEnv* p0, jobjectArray p1, jsize p2, jobject p3)
+{
+}
+
+static jobject
+jvm_new_array(struct jvm *jvm, const size_t size, const size_t element_sz, const char *klass)
+{
+ struct jvm_object o = { .array = { .size = size, .element_sz = element_sz }, .type = JVM_OBJECT_ARRAY };
+ o.this_klass = jvm_make_class(jvm, klass);
+ o.array.data = calloc(size, element_sz);
+ assert(o.array.data);
+ return jvm_add_object_if_not_there(jvm, &o);
+}
+
+static jbooleanArray
+JNIEnv_NewBooleanArray(JNIEnv* p0, jsize p1)
+{
+ return jvm_new_array(jnienv_get_jvm(p0), p1, sizeof(jboolean), "[Z");
+}
+
+
+static jbyteArray
+JNIEnv_NewByteArray(JNIEnv* p0, jsize p1)
+{
+ return jvm_new_array(jnienv_get_jvm(p0), p1, sizeof(jbyte), "[B");
+}
+
+static jcharArray
+JNIEnv_NewCharArray(JNIEnv* p0, jsize p1)
+{
+ return jvm_new_array(jnienv_get_jvm(p0), p1, sizeof(jchar), "[C");
+}
+
+static jshortArray
+JNIEnv_NewShortArray(JNIEnv* p0, jsize p1)
+{
+ return jvm_new_array(jnienv_get_jvm(p0), p1, sizeof(jshort), "[S");
+}
+
+static jintArray
+JNIEnv_NewIntArray(JNIEnv* p0, jsize p1)
+{
+ return jvm_new_array(jnienv_get_jvm(p0), p1, sizeof(jint), "[I");
+}
+
+static jlongArray
+JNIEnv_NewLongArray(JNIEnv* p0, jsize p1)
+{
+ return jvm_new_array(jnienv_get_jvm(p0), p1, sizeof(jlong), "[J");
+}
+
+static jfloatArray
+JNIEnv_NewFloatArray(JNIEnv* p0, jsize p1)
+{
+ return jvm_new_array(jnienv_get_jvm(p0), p1, sizeof(jfloat), "[F");
+}
+
+static jdoubleArray
+JNIEnv_NewDoubleArray(JNIEnv* p0, jsize p1)
+{
+ return jvm_new_array(jnienv_get_jvm(p0), p1, sizeof(jdouble), "[D");
+}
+
+static void*
+jvm_get_array_elements(struct jvm *jvm, jobject array, jboolean *is_copy)
+{
+ assert(jvm && array);
+
+ if (is_copy)
+ *is_copy = JNI_FALSE;
+
+ return jvm_get_object(jvm, array)->array.data;
+}
+
+static jboolean*
+JNIEnv_GetBooleanArrayElements(JNIEnv* p0, jbooleanArray p1, jboolean* p2)
+{
+ return jvm_get_array_elements(jnienv_get_jvm(p0), p1, p2);
+}
+
+static jbyte*
+JNIEnv_GetByteArrayElements(JNIEnv* p0, jbyteArray p1, jboolean* p2)
+{
+ return jvm_get_array_elements(jnienv_get_jvm(p0), p1, p2);
+}
+
+static jchar*
+JNIEnv_GetCharArrayElements(JNIEnv* p0, jcharArray p1, jboolean* p2)
+{
+ return jvm_get_array_elements(jnienv_get_jvm(p0), p1, p2);
+}
+
+static jshort*
+JNIEnv_GetShortArrayElements(JNIEnv* p0, jshortArray p1, jboolean* p2)
+{
+ return jvm_get_array_elements(jnienv_get_jvm(p0), p1, p2);
+}
+
+static jint*
+JNIEnv_GetIntArrayElements(JNIEnv* p0, jintArray p1, jboolean* p2)
+{
+ return jvm_get_array_elements(jnienv_get_jvm(p0), p1, p2);
+}
+
+static jlong*
+JNIEnv_GetLongArrayElements(JNIEnv* p0, jlongArray p1, jboolean* p2)
+{
+ return jvm_get_array_elements(jnienv_get_jvm(p0), p1, p2);
+}
+
+static jfloat*
+JNIEnv_GetFloatArrayElements(JNIEnv* p0, jfloatArray p1, jboolean* p2)
+{
+ return jvm_get_array_elements(jnienv_get_jvm(p0), p1, p2);
+}
+
+static jdouble*
+JNIEnv_GetDoubleArrayElements(JNIEnv* p0, jdoubleArray p1, jboolean* p2)
+{
+ return jvm_get_array_elements(jnienv_get_jvm(p0), p1, p2);
+}
+
+static void
+JNIEnv_ReleaseBooleanArrayElements(JNIEnv* p0, jbooleanArray p1, jboolean* p2, jint p3)
+{
+}
+
+static void
+JNIEnv_ReleaseByteArrayElements(JNIEnv* p0, jbyteArray p1, jbyte* p2, jint p3)
+{
+}
+
+static void
+JNIEnv_ReleaseCharArrayElements(JNIEnv* p0, jcharArray p1, jchar* p2, jint p3)
+{
+}
+
+static void
+JNIEnv_ReleaseShortArrayElements(JNIEnv* p0, jshortArray p1, jshort* p2, jint p3)
+{
+}
+
+static void
+JNIEnv_ReleaseIntArrayElements(JNIEnv* p0, jintArray p1, jint* p2, jint p3)
+{
+}
+
+static void
+JNIEnv_ReleaseLongArrayElements(JNIEnv* p0, jlongArray p1, jlong* p2, jint p3)
+{
+}
+
+static void
+JNIEnv_ReleaseFloatArrayElements(JNIEnv* p0, jfloatArray p1, jfloat* p2, jint p3)
+{
+}
+
+static void
+JNIEnv_ReleaseDoubleArrayElements(JNIEnv* p0, jdoubleArray p1, jdouble* p2, jint p3)
+{
+}
+
+static void
+JNIEnv_GetBooleanArrayRegion(JNIEnv* p0, jbooleanArray p1, jsize p2, jsize p3, jboolean* p4)
+{
+}
+
+static void
+jvm_get_array_region(struct jvm *jvm, jobject obj, const size_t offset, const size_t size, void *buf)
+{
+ assert(jvm && obj);
+ const struct jvm_array *array = &jvm_get_object(jvm, obj)->array;
+ assert(offset + size <= array->size);
+ memcpy(buf, (char*)array->data + offset * array->element_sz, size * array->element_sz);
+}
+
+static void
+JNIEnv_GetByteArrayRegion(JNIEnv *p0, jbyteArray p1, jsize p2, jsize p3, jbyte* p4)
+{
+ jvm_get_array_region(jnienv_get_jvm(p0), p1, p2, p3, p4);
+}
+
+static void
+JNIEnv_GetCharArrayRegion(JNIEnv* p0, jcharArray p1, jsize p2, jsize p3, jchar* p4)
+{
+ jvm_get_array_region(jnienv_get_jvm(p0), p1, p2, p3, p4);
+}
+
+static void
+JNIEnv_GetShortArrayRegion(JNIEnv* p0, jshortArray p1, jsize p2, jsize p3, jshort* p4)
+{
+ jvm_get_array_region(jnienv_get_jvm(p0), p1, p2, p3, p4);
+}
+
+static void
+JNIEnv_GetIntArrayRegion(JNIEnv* p0, jintArray p1, jsize p2, jsize p3, jint* p4)
+{
+ jvm_get_array_region(jnienv_get_jvm(p0), p1, p2, p3, p4);
+}
+
+static void
+JNIEnv_GetLongArrayRegion(JNIEnv* p0, jlongArray p1, jsize p2, jsize p3, jlong* p4)
+{
+ jvm_get_array_region(jnienv_get_jvm(p0), p1, p2, p3, p4);
+}
+
+static void
+JNIEnv_GetFloatArrayRegion(JNIEnv* p0, jfloatArray p1, jsize p2, jsize p3, jfloat* p4)
+{
+ jvm_get_array_region(jnienv_get_jvm(p0), p1, p2, p3, p4);
+}
+
+static void
+JNIEnv_GetDoubleArrayRegion(JNIEnv* p0, jdoubleArray p1, jsize p2, jsize p3, jdouble* p4)
+{
+ jvm_get_array_region(jnienv_get_jvm(p0), p1, p2, p3, p4);
+}
+
+static void
+jvm_set_array_region(struct jvm *jvm, jobject obj, const size_t offset, const size_t size, const void *buf)
+{
+ assert(jvm && obj);
+ struct jvm_array *array = &jvm_get_object(jvm, obj)->array;
+ assert(offset + size <= array->size);
+ memcpy((char*)array->data + offset * array->element_sz, buf, size * array->element_sz);
+}
+
+static void
+JNIEnv_SetBooleanArrayRegion(JNIEnv* p0, jbooleanArray p1, jsize p2, jsize p3, const jboolean* p4)
+{
+ jvm_set_array_region(jnienv_get_jvm(p0), p1, p2, p3, p4);
+}
+
+static void
+JNIEnv_SetByteArrayRegion(JNIEnv* p0, jbyteArray p1, jsize p2, jsize p3, const jbyte* p4)
+{
+ jvm_set_array_region(jnienv_get_jvm(p0), p1, p2, p3, p4);
+}
+
+static void
+JNIEnv_SetCharArrayRegion(JNIEnv* p0, jcharArray p1, jsize p2, jsize p3, const jchar* p4)
+{
+ jvm_set_array_region(jnienv_get_jvm(p0), p1, p2, p3, p4);
+}
+
+static void
+JNIEnv_SetShortArrayRegion(JNIEnv* p0, jshortArray p1, jsize p2, jsize p3, const jshort* p4)
+{
+ jvm_set_array_region(jnienv_get_jvm(p0), p1, p2, p3, p4);
+}
+
+static void
+JNIEnv_SetIntArrayRegion(JNIEnv* p0, jintArray p1, jsize p2, jsize p3, const jint* p4)
+{
+ jvm_set_array_region(jnienv_get_jvm(p0), p1, p2, p3, p4);
+}
+
+static void
+JNIEnv_SetLongArrayRegion(JNIEnv* p0, jlongArray p1, jsize p2, jsize p3, const jlong* p4)
+{
+ jvm_set_array_region(jnienv_get_jvm(p0), p1, p2, p3, p4);
+}
+
+static void
+JNIEnv_SetFloatArrayRegion(JNIEnv* p0, jfloatArray p1, jsize p2, jsize p3, const jfloat* p4)
+{
+ jvm_set_array_region(jnienv_get_jvm(p0), p1, p2, p3, p4);
+}
+
+
+static void
+JNIEnv_SetDoubleArrayRegion(JNIEnv* p0, jdoubleArray p1, jsize p2, jsize p3, const jdouble* p4)
+{
+ jvm_set_array_region(jnienv_get_jvm(p0), p1, p2, p3, p4);
+}
+
+static void
+jvm_register_native_method(struct jvm *jvm, const jclass klass, const JNINativeMethod *method)
+{
+ assert(jvm && klass && method);
+ size_t i;
+ for (i = 0; i < ARRAY_SIZE(jvm->methods) && jvm->methods[i].function; ++i);
+ assert(i < ARRAY_SIZE(jvm->methods) && "native method limit reached!");
+ jvm->methods[i].method.klass = klass;
+ jvm_string_set_cstr(&jvm->methods[i].method.name, method->name, true);
+ jvm_string_set_cstr(&jvm->methods[i].method.signature, method->signature, true);
+ jvm->methods[i].function = method->fnPtr;
+ printf("%s::%s::%s\n", jvm_get_object(jvm, klass)->klass.name.data, method->name, method->signature);
+}
+
+static jint
+JNIEnv_RegisterNatives(JNIEnv* p0, jclass p1, const JNINativeMethod* p2, jint p3)
+{
+ assert(p0 && p1);
+ const JNINativeMethod *method = p2;
+ for (jint i = 0; i < p3; ++i, ++method)
+ jvm_register_native_method(jnienv_get_jvm(p0), p1, method);
+ return 0;
+}
+
+static jint
+JNIEnv_UnregisterNatives(JNIEnv* p0, jclass p1)
+{
+ assert(p0 && p1);
+ struct jvm *jvm = jnienv_get_jvm(p0);
+ for (size_t i = 0; i < ARRAY_SIZE(jvm->methods) && jvm->methods[i].function; ++i) {
+ if (jvm->methods[i].method.klass != p1)
+ continue;
+ jvm->methods[i] = (struct jvm_native_method){0};
+ }
+ return 0;
+}
+
+static jint
+JNIEnv_MonitorEnter(JNIEnv* p0, jobject p1)
+{
+ return 0;
+}
+
+static jint
+JNIEnv_MonitorExit(JNIEnv* p0, jobject p1)
+{
+ return 0;
+}
+
+static jint
+JNIEnv_GetJavaVM(JNIEnv* env, JavaVM** vm)
+{
+ struct jvm *jvm = jnienv_get_jvm(env);
+ *vm = (JavaVM*)&jvm->vm;
+ return 0;
+}
+
+static void
+JNIEnv_GetStringRegion(JNIEnv* p0, jstring p1, jsize p2, jsize p3, jchar* p4)
+{
+}
+
+static void
+JNIEnv_GetStringUTFRegion(JNIEnv* p0, jstring p1, jsize p2, jsize p3, char* p4)
+{
+}
+
+static void*
+JNIEnv_GetPrimitiveArrayCritical(JNIEnv *env, jarray array, jboolean *isCopy)
+{
+ return jvm_get_array_elements(jnienv_get_jvm(env), array, isCopy);
+}
+
+static void
+JNIEnv_ReleasePrimitiveArrayCritical(JNIEnv *env, jarray array, void *carray, jint mode)
+{
+}
+
+const jchar*
+JNIEnv_GetStringCritical(JNIEnv* p0, jstring p1, jboolean* p2)
+{
+ return NULL;
+}
+
+static void
+JNIEnv_ReleaseStringCritical(JNIEnv* p0, jstring p1, const jchar* p2)
+{
+}
+
+static jweak
+JNIEnv_NewWeakGlobalRef(JNIEnv* p0, jobject p1)
+{
+ return NULL;
+}
+
+static void
+JNIEnv_DeleteWeakGlobalRef(JNIEnv* p0, jweak p1)
+{
+}
+
+static jboolean
+JNIEnv_ExceptionCheck(JNIEnv* p0)
+{
+ return 0;
+}
+
+static jobject
+JNIEnv_NewDirectByteBuffer(JNIEnv* p0, void* p1, jlong p2)
+{
+ return NULL;
+}
+
+static void*
+JNIEnv_GetDirectBufferAddress(JNIEnv* p0, jobject p1)
+{
+ return NULL;
+}
+
+static jlong
+JNIEnv_GetDirectBufferCapacity(JNIEnv* p0, jobject p1)
+{
+ return 0;
+}
+
+const char*
+JNIEnv_GetStringUTFChars(JNIEnv *env, jstring string, jboolean *isCopy)
+{
+ assert(env && string);
+
+ if (isCopy)
+ *isCopy = JNI_FALSE;
+
+ return jvm_get_object(jnienv_get_jvm(env), string)->string.data;
+}
+
+static void
+JNIEnv_ReleaseStringUTFChars(JNIEnv *env, jstring string, const char *utf)
+{
+ assert(env && string && utf);
+}
+
+static void
+trace(const char *const symbol)
+{
+ printf("trace: %s\n", symbol);
+}
+
+#define WRAP(x) create_wrapper(#x, x)
+
+static void
+env_init(JNIEnv *env, struct JNINativeInterface *native)
+{
+ assert(env && native);
+ native->GetStringUTFChars = WRAP(JNIEnv_GetStringUTFChars);
+ native->ReleaseStringUTFChars = WRAP(JNIEnv_ReleaseStringUTFChars);
+ native->GetVersion = WRAP(JNIEnv_GetVersion);
+ native->DefineClass = WRAP(JNIEnv_DefineClass);
+ native->FindClass = WRAP(JNIEnv_FindClass);
+ native->FromReflectedMethod = WRAP(JNIEnv_FromReflectedMethod);
+ native->FromReflectedField = WRAP(JNIEnv_FromReflectedField);
+ native->ToReflectedMethod = WRAP(JNIEnv_ToReflectedMethod);
+ native->GetSuperclass = WRAP(JNIEnv_GetSuperclass);
+ native->IsAssignableFrom = WRAP(JNIEnv_IsAssignableFrom);
+ native->ToReflectedField = WRAP(JNIEnv_ToReflectedField);
+ native->Throw = WRAP(JNIEnv_Throw);
+ native->ThrowNew = WRAP(JNIEnv_ThrowNew);
+ native->ExceptionOccurred = WRAP(JNIEnv_ExceptionOccurred);
+ native->ExceptionDescribe = WRAP(JNIEnv_ExceptionDescribe);
+ native->ExceptionClear = WRAP(JNIEnv_ExceptionClear);
+ native->FatalError = WRAP(JNIEnv_FatalError);
+ native->PushLocalFrame = WRAP(JNIEnv_PushLocalFrame);
+ native->PopLocalFrame = WRAP(JNIEnv_PopLocalFrame);
+ native->NewGlobalRef = WRAP(JNIEnv_NewGlobalRef);
+ native->DeleteGlobalRef = WRAP(JNIEnv_DeleteGlobalRef);
+ native->DeleteLocalRef = WRAP(JNIEnv_DeleteLocalRef);
+ native->IsSameObject = WRAP(JNIEnv_IsSameObject);
+ native->NewLocalRef = WRAP(JNIEnv_NewLocalRef);
+ native->EnsureLocalCapacity = WRAP(JNIEnv_EnsureLocalCapacity);
+ native->AllocObject = WRAP(JNIEnv_AllocObject);
+ native->NewObject = WRAP(JNIEnv_NewObject);
+ native->NewObjectV = WRAP(JNIEnv_NewObjectV);
+ native->NewObjectA = WRAP(JNIEnv_NewObjectA);
+ native->GetObjectClass = WRAP(JNIEnv_GetObjectClass);
+ native->IsInstanceOf = WRAP(JNIEnv_IsInstanceOf);
+ native->GetMethodID = WRAP(JNIEnv_GetMethodID);
+ native->CallObjectMethod = WRAP(JNIEnv_CallObjectMethod);
+ native->CallObjectMethodV = WRAP(JNIEnv_CallObjectMethodV);
+ native->CallObjectMethodA = WRAP(JNIEnv_CallObjectMethodA);
+ native->CallBooleanMethod = WRAP(JNIEnv_CallBooleanMethod);
+ native->CallBooleanMethodV = WRAP(JNIEnv_CallBooleanMethodV);
+ native->CallBooleanMethodA = WRAP(JNIEnv_CallBooleanMethodA);
+ native->CallByteMethod = WRAP(JNIEnv_CallByteMethod);
+ native->CallByteMethodV = WRAP(JNIEnv_CallByteMethodV);
+ native->CallByteMethodA = WRAP(JNIEnv_CallByteMethodA);
+ native->CallCharMethod = WRAP(JNIEnv_CallCharMethod);
+ native->CallCharMethodV = WRAP(JNIEnv_CallCharMethodV);
+ native->CallCharMethodA = WRAP(JNIEnv_CallCharMethodA);
+ native->CallShortMethod = WRAP(JNIEnv_CallShortMethod);
+ native->CallShortMethodV = WRAP(JNIEnv_CallShortMethodV);
+ native->CallShortMethodA = WRAP(JNIEnv_CallShortMethodA);
+ native->CallIntMethod = WRAP(JNIEnv_CallIntMethod);
+ native->CallIntMethodV = WRAP(JNIEnv_CallIntMethodV);
+ native->CallIntMethodA = WRAP(JNIEnv_CallIntMethodA);
+ native->CallLongMethod = WRAP(JNIEnv_CallLongMethod);
+ native->CallLongMethodV = WRAP(JNIEnv_CallLongMethodV);
+ native->CallLongMethodA = WRAP(JNIEnv_CallLongMethodA);
+ native->CallFloatMethod = WRAP(JNIEnv_CallFloatMethod);
+ native->CallFloatMethodV = WRAP(JNIEnv_CallFloatMethodV);
+ native->CallFloatMethodA = WRAP(JNIEnv_CallFloatMethodA);
+ native->CallDoubleMethod = WRAP(JNIEnv_CallDoubleMethod);
+ native->CallDoubleMethodV = WRAP(JNIEnv_CallDoubleMethodV);
+ native->CallDoubleMethodA = WRAP(JNIEnv_CallDoubleMethodA);
+ native->CallVoidMethod = WRAP(JNIEnv_CallVoidMethod);
+ native->CallVoidMethodV = WRAP(JNIEnv_CallVoidMethodV);
+ native->CallVoidMethodA = WRAP(JNIEnv_CallVoidMethodA);
+ native->CallNonvirtualObjectMethod = WRAP(JNIEnv_CallNonvirtualObjectMethod);
+ native->CallNonvirtualObjectMethodV = WRAP(JNIEnv_CallNonvirtualObjectMethodV);
+ native->CallNonvirtualObjectMethodA = WRAP(JNIEnv_CallNonvirtualObjectMethodA);
+ native->CallNonvirtualBooleanMethod = WRAP(JNIEnv_CallNonvirtualBooleanMethod);
+ native->CallNonvirtualBooleanMethodV = WRAP(JNIEnv_CallNonvirtualBooleanMethodV);
+ native->CallNonvirtualBooleanMethodA = WRAP(JNIEnv_CallNonvirtualBooleanMethodA);
+ native->CallNonvirtualByteMethod = WRAP(JNIEnv_CallNonvirtualByteMethod);
+ native->CallNonvirtualByteMethodV = WRAP(JNIEnv_CallNonvirtualByteMethodV);
+ native->CallNonvirtualByteMethodA = WRAP(JNIEnv_CallNonvirtualByteMethodA);
+ native->CallNonvirtualCharMethod = WRAP(JNIEnv_CallNonvirtualCharMethod);
+ native->CallNonvirtualCharMethodV = WRAP(JNIEnv_CallNonvirtualCharMethodV);
+ native->CallNonvirtualCharMethodA = WRAP(JNIEnv_CallNonvirtualCharMethodA);
+ native->CallNonvirtualShortMethod = WRAP(JNIEnv_CallNonvirtualShortMethod);
+ native->CallNonvirtualShortMethodV = WRAP(JNIEnv_CallNonvirtualShortMethodV);
+ native->CallNonvirtualShortMethodA = WRAP(JNIEnv_CallNonvirtualShortMethodA);
+ native->CallNonvirtualIntMethod = WRAP(JNIEnv_CallNonvirtualIntMethod);
+ native->CallNonvirtualIntMethodV = WRAP(JNIEnv_CallNonvirtualIntMethodV);
+ native->CallNonvirtualIntMethodA = WRAP(JNIEnv_CallNonvirtualIntMethodA);
+ native->CallNonvirtualLongMethod = WRAP(JNIEnv_CallNonvirtualLongMethod);
+ native->CallNonvirtualLongMethodV = WRAP(JNIEnv_CallNonvirtualLongMethodV);
+ native->CallNonvirtualLongMethodA = WRAP(JNIEnv_CallNonvirtualLongMethodA);
+ native->CallNonvirtualFloatMethod = WRAP(JNIEnv_CallNonvirtualFloatMethod);
+ native->CallNonvirtualFloatMethodV = WRAP(JNIEnv_CallNonvirtualFloatMethodV);
+ native->CallNonvirtualFloatMethodA = WRAP(JNIEnv_CallNonvirtualFloatMethodA);
+ native->CallNonvirtualDoubleMethod = WRAP(JNIEnv_CallNonvirtualDoubleMethod);
+ native->CallNonvirtualDoubleMethodV = WRAP(JNIEnv_CallNonvirtualDoubleMethodV);
+ native->CallNonvirtualDoubleMethodA = WRAP(JNIEnv_CallNonvirtualDoubleMethodA);
+ native->CallNonvirtualVoidMethod = WRAP(JNIEnv_CallNonvirtualVoidMethod);
+ native->CallNonvirtualVoidMethodV = WRAP(JNIEnv_CallNonvirtualVoidMethodV);
+ native->CallNonvirtualVoidMethodA = WRAP(JNIEnv_CallNonvirtualVoidMethodA);
+ native->GetFieldID = WRAP(JNIEnv_GetFieldID);
+ native->GetObjectField = WRAP(JNIEnv_GetObjectField);
+ native->GetBooleanField = WRAP(JNIEnv_GetBooleanField);
+ native->GetByteField = WRAP(JNIEnv_GetByteField);
+ native->GetCharField = WRAP(JNIEnv_GetCharField);
+ native->GetShortField = WRAP(JNIEnv_GetShortField);
+ native->GetIntField = WRAP(JNIEnv_GetIntField);
+ native->GetLongField = WRAP(JNIEnv_GetLongField);
+ native->GetFloatField = WRAP(JNIEnv_GetFloatField);
+ native->GetDoubleField = WRAP(JNIEnv_GetDoubleField);
+ native->SetObjectField = WRAP(JNIEnv_SetObjectField);
+ native->SetBooleanField = WRAP(JNIEnv_SetBooleanField);
+ native->SetByteField = WRAP(JNIEnv_SetByteField);
+ native->SetCharField = WRAP(JNIEnv_SetCharField);
+ native->SetShortField = WRAP(JNIEnv_SetShortField);
+ native->SetIntField = WRAP(JNIEnv_SetIntField);
+ native->SetLongField = WRAP(JNIEnv_SetLongField);
+ native->SetFloatField = WRAP(JNIEnv_SetFloatField);
+ native->SetDoubleField = WRAP(JNIEnv_SetDoubleField);
+ native->GetStaticMethodID = WRAP(JNIEnv_GetStaticMethodID);
+ native->CallStaticObjectMethod = WRAP(JNIEnv_CallStaticObjectMethod);
+ native->CallStaticObjectMethodV = WRAP(JNIEnv_CallStaticObjectMethodV);
+ native->CallStaticObjectMethodA = WRAP(JNIEnv_CallStaticObjectMethodA);
+ native->CallStaticBooleanMethod = WRAP(JNIEnv_CallStaticBooleanMethod);
+ native->CallStaticBooleanMethodV = WRAP(JNIEnv_CallStaticBooleanMethodV);
+ native->CallStaticBooleanMethodA = WRAP(JNIEnv_CallStaticBooleanMethodA);
+ native->CallStaticByteMethod = WRAP(JNIEnv_CallStaticByteMethod);
+ native->CallStaticByteMethodV = WRAP(JNIEnv_CallStaticByteMethodV);
+ native->CallStaticByteMethodA = WRAP(JNIEnv_CallStaticByteMethodA);
+ native->CallStaticCharMethod = WRAP(JNIEnv_CallStaticCharMethod);
+ native->CallStaticCharMethodV = WRAP(JNIEnv_CallStaticCharMethodV);
+ native->CallStaticCharMethodA = WRAP(JNIEnv_CallStaticCharMethodA);
+ native->CallStaticShortMethod = WRAP(JNIEnv_CallStaticShortMethod);
+ native->CallStaticShortMethodV = WRAP(JNIEnv_CallStaticShortMethodV);
+ native->CallStaticShortMethodA = WRAP(JNIEnv_CallStaticShortMethodA);
+ native->CallStaticIntMethod = WRAP(JNIEnv_CallStaticIntMethod);
+ native->CallStaticIntMethodV = WRAP(JNIEnv_CallStaticIntMethodV);
+ native->CallStaticIntMethodA = WRAP(JNIEnv_CallStaticIntMethodA);
+ native->CallStaticLongMethod = WRAP(JNIEnv_CallStaticLongMethod);
+ native->CallStaticLongMethodV = WRAP(JNIEnv_CallStaticLongMethodV);
+ native->CallStaticLongMethodA = WRAP(JNIEnv_CallStaticLongMethodA);
+ native->CallStaticFloatMethod = WRAP(JNIEnv_CallStaticFloatMethod);
+ native->CallStaticFloatMethodV = WRAP(JNIEnv_CallStaticFloatMethodV);
+ native->CallStaticFloatMethodA = WRAP(JNIEnv_CallStaticFloatMethodA);
+ native->CallStaticDoubleMethod = WRAP(JNIEnv_CallStaticDoubleMethod);
+ native->CallStaticDoubleMethodV = WRAP(JNIEnv_CallStaticDoubleMethodV);
+ native->CallStaticDoubleMethodA = WRAP(JNIEnv_CallStaticDoubleMethodA);
+ native->CallStaticVoidMethod = WRAP(JNIEnv_CallStaticVoidMethod);
+ native->CallStaticVoidMethodV = WRAP(JNIEnv_CallStaticVoidMethodV);
+ native->CallStaticVoidMethodA = WRAP(JNIEnv_CallStaticVoidMethodA);
+ native->GetStaticFieldID = WRAP(JNIEnv_GetStaticFieldID);
+ native->GetStaticObjectField = WRAP(JNIEnv_GetStaticObjectField);
+ native->GetStaticBooleanField = WRAP(JNIEnv_GetStaticBooleanField);
+ native->GetStaticByteField = WRAP(JNIEnv_GetStaticByteField);
+ native->GetStaticCharField = WRAP(JNIEnv_GetStaticCharField);
+ native->GetStaticShortField = WRAP(JNIEnv_GetStaticShortField);
+ native->GetStaticIntField = WRAP(JNIEnv_GetStaticIntField);
+ native->GetStaticLongField = WRAP(JNIEnv_GetStaticLongField);
+ native->GetStaticFloatField = WRAP(JNIEnv_GetStaticFloatField);
+ native->GetStaticDoubleField = WRAP(JNIEnv_GetStaticDoubleField);
+ native->SetStaticObjectField = WRAP(JNIEnv_SetStaticObjectField);
+ native->SetStaticBooleanField = WRAP(JNIEnv_SetStaticBooleanField);
+ native->SetStaticByteField = WRAP(JNIEnv_SetStaticByteField);
+ native->SetStaticCharField = WRAP(JNIEnv_SetStaticCharField);
+ native->SetStaticShortField = WRAP(JNIEnv_SetStaticShortField);
+ native->SetStaticIntField = WRAP(JNIEnv_SetStaticIntField);
+ native->SetStaticLongField = WRAP(JNIEnv_SetStaticLongField);
+ native->SetStaticFloatField = WRAP(JNIEnv_SetStaticFloatField);
+ native->SetStaticDoubleField = WRAP(JNIEnv_SetStaticDoubleField);
+ native->NewString = WRAP(JNIEnv_NewString);
+ native->GetStringLength = WRAP(JNIEnv_GetStringLength);
+ native->GetStringChars = WRAP(JNIEnv_GetStringChars);
+ native->ReleaseStringChars = WRAP(JNIEnv_ReleaseStringChars);
+ native->NewStringUTF = WRAP(JNIEnv_NewStringUTF);
+ native->GetStringUTFLength = WRAP(JNIEnv_GetStringUTFLength);
+ native->GetArrayLength = WRAP(JNIEnv_GetArrayLength);
+ native->NewObjectArray = WRAP(JNIEnv_NewObjectArray);
+ native->GetObjectArrayElement = WRAP(JNIEnv_GetObjectArrayElement);
+ native->SetObjectArrayElement = WRAP(JNIEnv_SetObjectArrayElement);
+ native->NewBooleanArray = WRAP(JNIEnv_NewBooleanArray);
+ native->NewByteArray = WRAP(JNIEnv_NewByteArray);
+ native->NewCharArray = WRAP(JNIEnv_NewCharArray);
+ native->NewShortArray = WRAP(JNIEnv_NewShortArray);
+ native->NewIntArray = WRAP(JNIEnv_NewIntArray);
+ native->NewLongArray = WRAP(JNIEnv_NewLongArray);
+ native->NewFloatArray = WRAP(JNIEnv_NewFloatArray);
+ native->NewDoubleArray = WRAP(JNIEnv_NewDoubleArray);
+ native->GetBooleanArrayElements = WRAP(JNIEnv_GetBooleanArrayElements);
+ native->GetByteArrayElements = WRAP(JNIEnv_GetByteArrayElements);
+ native->GetCharArrayElements = WRAP(JNIEnv_GetCharArrayElements);
+ native->GetShortArrayElements = WRAP(JNIEnv_GetShortArrayElements);
+ native->GetIntArrayElements = WRAP(JNIEnv_GetIntArrayElements);
+ native->GetLongArrayElements = WRAP(JNIEnv_GetLongArrayElements);
+ native->GetFloatArrayElements = WRAP(JNIEnv_GetFloatArrayElements);
+ native->GetDoubleArrayElements = WRAP(JNIEnv_GetDoubleArrayElements);
+ native->ReleaseBooleanArrayElements = WRAP(JNIEnv_ReleaseBooleanArrayElements);
+ native->ReleaseByteArrayElements = WRAP(JNIEnv_ReleaseByteArrayElements);
+ native->ReleaseCharArrayElements = WRAP(JNIEnv_ReleaseCharArrayElements);
+ native->ReleaseShortArrayElements = WRAP(JNIEnv_ReleaseShortArrayElements);
+ native->ReleaseIntArrayElements = WRAP(JNIEnv_ReleaseIntArrayElements);
+ native->ReleaseLongArrayElements = WRAP(JNIEnv_ReleaseLongArrayElements);
+ native->ReleaseFloatArrayElements = WRAP(JNIEnv_ReleaseFloatArrayElements);
+ native->ReleaseDoubleArrayElements = WRAP(JNIEnv_ReleaseDoubleArrayElements);
+ native->GetBooleanArrayRegion = WRAP(JNIEnv_GetBooleanArrayRegion);
+ native->GetByteArrayRegion = WRAP(JNIEnv_GetByteArrayRegion);
+ native->GetCharArrayRegion = WRAP(JNIEnv_GetCharArrayRegion);
+ native->GetShortArrayRegion = WRAP(JNIEnv_GetShortArrayRegion);
+ native->GetIntArrayRegion = WRAP(JNIEnv_GetIntArrayRegion);
+ native->GetLongArrayRegion = WRAP(JNIEnv_GetLongArrayRegion);
+ native->GetFloatArrayRegion = WRAP(JNIEnv_GetFloatArrayRegion);
+ native->GetDoubleArrayRegion = WRAP(JNIEnv_GetDoubleArrayRegion);
+ native->SetBooleanArrayRegion = WRAP(JNIEnv_SetBooleanArrayRegion);
+ native->SetByteArrayRegion = WRAP(JNIEnv_SetByteArrayRegion);
+ native->SetCharArrayRegion = WRAP(JNIEnv_SetCharArrayRegion);
+ native->SetShortArrayRegion = WRAP(JNIEnv_SetShortArrayRegion);
+ native->SetIntArrayRegion = WRAP(JNIEnv_SetIntArrayRegion);
+ native->SetLongArrayRegion = WRAP(JNIEnv_SetLongArrayRegion);
+ native->SetFloatArrayRegion = WRAP(JNIEnv_SetFloatArrayRegion);
+ native->SetDoubleArrayRegion = WRAP(JNIEnv_SetDoubleArrayRegion);
+ native->RegisterNatives = WRAP(JNIEnv_RegisterNatives);
+ native->UnregisterNatives = WRAP(JNIEnv_UnregisterNatives);
+ native->MonitorEnter = WRAP(JNIEnv_MonitorEnter);
+ native->MonitorExit = WRAP(JNIEnv_MonitorExit);
+ native->GetJavaVM = WRAP(JNIEnv_GetJavaVM);
+ native->GetStringRegion = WRAP(JNIEnv_GetStringRegion);
+ native->GetStringUTFRegion = WRAP(JNIEnv_GetStringUTFRegion);
+ native->GetPrimitiveArrayCritical = WRAP(JNIEnv_GetPrimitiveArrayCritical);
+ native->ReleasePrimitiveArrayCritical = WRAP(JNIEnv_ReleasePrimitiveArrayCritical);
+ native->GetStringCritical = WRAP(JNIEnv_GetStringCritical);
+ native->ReleaseStringCritical = WRAP(JNIEnv_ReleaseStringCritical);
+ native->NewWeakGlobalRef = WRAP(JNIEnv_NewWeakGlobalRef);
+ native->DeleteWeakGlobalRef = WRAP(JNIEnv_DeleteWeakGlobalRef);
+ native->ExceptionCheck = WRAP(JNIEnv_ExceptionCheck);
+ native->NewDirectByteBuffer = WRAP(JNIEnv_NewDirectByteBuffer);
+ native->GetDirectBufferAddress = WRAP(JNIEnv_GetDirectBufferAddress);
+ native->GetDirectBufferCapacity = WRAP(JNIEnv_GetDirectBufferCapacity);
+ *env = native;
+}
+
+static jint
+JavaVM_DestroyJavaVM(JavaVM *vm)
+{
+ assert(vm);
+ return JNI_OK;
+}
+
+static jint
+JavaVM_AttachCurrentThread(JavaVM *vm, JNIEnv **env, void *args)
+{
+ assert(vm && env);
+ *env = &javavm_get_jvm(vm)->env;
+ return JNI_OK;
+}
+
+static jint
+JavaVM_DetachCurrentThread(JavaVM *vm)
+{
+ assert(vm);
+ return JNI_OK;
+}
+
+static jint
+JavaVM_GetEnv(JavaVM *vm, void **env, jint version)
+{
+ assert(vm && env);
+ *env = &javavm_get_jvm(vm)->env;
+ return JNI_OK;
+}
+
+static jint
+JavaVM_AttachCurrentThreadAsDaemon(JavaVM *vm, JNIEnv **env, void *args)
+{
+ assert(vm && env);
+ *env = &javavm_get_jvm(vm)->env;
+ return JNI_OK;
+}
+
+static void
+vm_init(JavaVM *vm, struct JNIInvokeInterface *invoke)
+{
+ assert(vm && invoke);
+ invoke->DestroyJavaVM = WRAP(JavaVM_DestroyJavaVM);
+ invoke->AttachCurrentThread = WRAP(JavaVM_AttachCurrentThread);
+ invoke->DetachCurrentThread = WRAP(JavaVM_DetachCurrentThread);
+ invoke->GetEnv = WRAP(JavaVM_GetEnv);
+ invoke->AttachCurrentThreadAsDaemon = WRAP(JavaVM_AttachCurrentThreadAsDaemon);
+ *vm = invoke;
+}
+
+void*
+jvm_get_native_method(struct jvm *jvm, const char *klass, const char *method)
+{
+ for (size_t i = 0; i < ARRAY_SIZE(jvm->methods) && jvm->methods[i].function; ++i) {
+ if (!strcmp(jvm_get_object(jvm, jvm->methods[i].method.klass)->klass.name.data, klass) &&
+ !strcmp(jvm->methods[i].method.name.data, method))
+ return create_wrapper(method, jvm->methods[i].function);
+ }
+ return NULL;
+}
+
+void
+jvm_release(struct jvm *jvm)
+{
+ assert(jvm);
+
+ for (size_t i = 0; i < ARRAY_SIZE(jvm->objects); ++i)
+ jvm_object_release(&jvm->objects[i]);
+
+ for (size_t i = 0; i < ARRAY_SIZE(jvm->methods); ++i) {
+ jvm_string_release(&jvm->methods[i].method.name);
+ jvm_string_release(&jvm->methods[i].method.signature);
+ }
+
+ *jvm = (struct jvm){0};
+}
+
+void
+jvm_init(struct jvm *jvm)
+{
+ assert(jvm);
+ *jvm = (struct jvm){0};
+ vm_init(&jvm->vm, &jvm->invoke);
+ env_init(&jvm->env, &jvm->native);
+ jvm_make_class(jvm, "java/lang/Class");
+}
diff --git a/src/jvm/jvm.h b/src/jvm/jvm.h
new file mode 100644
index 0000000..cc69cb4
--- /dev/null
+++ b/src/jvm/jvm.h
@@ -0,0 +1,82 @@
+#pragma once
+
+#include "jni.h"
+#include <stdbool.h>
+
+struct jvm_string {
+ const char *data;
+ size_t size;
+ bool heap; // if on heap, then `data` should be freed
+};
+
+struct jvm_array {
+ void *data;
+ size_t element_sz, size; // `size` == in elements, `size * element_sz` for bytes
+};
+
+struct jvm_class {
+ struct jvm_string name;
+};
+
+struct jvm_method {
+ jclass klass;
+ struct jvm_string name, signature;
+};
+
+struct jvm_object {
+ jclass this_klass;
+
+ union {
+ struct jvm_array array;
+ struct jvm_method method;
+ struct jvm_class klass;
+ struct jvm_string string;
+ };
+
+ enum jvm_object_type {
+ JVM_OBJECT_NONE,
+ JVM_OBJECT_OPAQUE,
+ JVM_OBJECT_ARRAY,
+ JVM_OBJECT_METHOD,
+ JVM_OBJECT_CLASS,
+ JVM_OBJECT_STRING,
+ JVM_OBJECT_LAST,
+ } type;
+};
+
+struct jvm_native_method {
+ struct jvm_method method;
+ void *function;
+};
+
+struct jvm {
+ // [0] object is created on `jvm_init` and it's a class object for defining the class of a class
+ // every class object's `this_class` member points back to [0], causing recursion.
+ // Every other object or class definition is created lazily as needed, only [0] is special.
+ // `jobject`'s we return through JNI are actually (index+1) to this array, not pointers.
+ struct jvm_object objects[256];
+
+ // Native methods registered by the application.
+ // Nothing special, but there's no need to access this array either really.
+ // You can use `jvm_get_native_method` instead.
+ struct jvm_native_method methods[255];
+
+ // These hold the function pointers for our JNI implementation.
+ struct JNINativeInterface native;
+ struct JNIInvokeInterface invoke;
+
+ // JNI's api is weird.. pointer to a reference of a struct, OK!
+ // Developers have to dereference these pointers to call methods from an ... reference.
+ // NOTE: These are pointers, and JNI interface passes pointers to these pointers!
+ JNIEnv env; // points to native
+ JavaVM vm; // points to invoke
+};
+
+void*
+jvm_get_native_method(struct jvm *jvm, const char *klass, const char *method);
+
+void
+jvm_release(struct jvm *jvm);
+
+void
+jvm_init(struct jvm *jvm);