**/
/* }}} */
+#include <map>
+#include <sstream>
+#include <vector>
+
#ifdef __APPLE__
#include <JavaVM/jni.h>
#else
#include <jni.h>
#endif
+
+#include "cycript.hpp"
+#include "Error.hpp"
+#include "Execute.hpp"
+#include "Internal.hpp"
+#include "JavaScript.hpp"
+#include "Pooling.hpp"
+
+#define _jnicall(expr) ({ \
+ jint _value(expr); \
+ if (_value != JNI_OK) \
+ CYThrow("_jnicall(%s) == %d", #expr, _value); \
+})
+
+#define _envcall(jni, expr) ({ \
+ __typeof__(jni->expr) _value(jni->expr); \
+ if (jthrowable _error = jni->ExceptionOccurred()) { \
+ jni->ExceptionClear(); \
+ throw CYJSError(context, CYCastJSValue(context, jni, _error)); \
+ } \
+_value; })
+
+#define _envcallv(jni, expr) do { \
+ jni->expr; \
+ if (jthrowable _error = jni->ExceptionOccurred()) { \
+ jni->ExceptionClear(); \
+ throw CYJSError(context, CYCastJSValue(context, jni, _error)); \
+ } \
+} while (false)
+
+#define CYJavaTry \
+ try
+#define CYJavaCatch(value) \
+ catch (const CYException &error) { \
+ CYPool pool; \
+ jni->ThrowNew(jni->FindClass("java/lang/RuntimeException"), error.PoolCString(pool)); \
+ return value; \
+ }
+
+extern "C" {
+ // Android's jni.h seriously doesn't declare these :/
+ jint JNI_CreateJavaVM(JavaVM **, void **, void *);
+ jint JNI_GetCreatedJavaVMs(JavaVM **, jsize, jsize *);
+}
+
+static JSValueRef CYCastJSValue(JSContextRef context, JNIEnv *jni, jobject value);
+
+static void CYRegisterNatives(JSContextRef context, JNIEnv *jni);
+
+JNIEnv *GetJNI(JSContextRef context) {
+ static JavaVM *jvm(NULL);
+ static JNIEnv *jni(NULL);
+
+ if (jni != NULL)
+ return jni;
+ jint version(JNI_VERSION_1_4);
+
+ jsize capacity(16);
+ JavaVM *jvms[capacity];
+ jsize size;
+ _jnicall(JNI_GetCreatedJavaVMs(jvms, capacity, &size));
+
+ if (size != 0) {
+ jvm = jvms[0];
+ _jnicall(jvm->GetEnv(reinterpret_cast<void **>(&jni), version));
+ } else {
+ CYPool pool;
+ std::vector<JavaVMOption> options;
+
+ {
+ std::ostringstream option;
+ option << "-Djava.class.path=";
+ option << CYPoolLibraryPath(pool) << "/libcycript.jar";
+ if (const char *classpath = getenv("CLASSPATH"))
+ option << ':' << classpath;
+ options.push_back(JavaVMOption{pool.strdup(option.str().c_str()), NULL});
+ }
+
+ JavaVMInitArgs args;
+ memset(&args, 0, sizeof(args));
+ args.version = version;
+ args.nOptions = options.size();
+ args.options = options.data();
+ _jnicall(JNI_CreateJavaVM(&jvm, reinterpret_cast<void **>(&jni), &args));
+ }
+
+ CYRegisterNatives(context, jni);
+
+ return jni;
+}
+
+class CYJavaUTF8String :
+ public CYUTF8String
+{
+ private:
+ JNIEnv *jni_;
+ jstring value_;
+
+ public:
+ CYJavaUTF8String(JNIEnv *jni, jstring value) :
+ jni_(jni),
+ value_(value)
+ {
+ _assert(value != NULL);
+ size = jni_->GetStringUTFLength(value_);
+ data = jni_->GetStringUTFChars(value_, NULL);
+ }
+
+ ~CYJavaUTF8String() {
+ if (value_ != NULL)
+ jni_->ReleaseStringUTFChars(value_, data);
+ }
+
+ CYJavaUTF8String(const CYJavaUTF8String &) = delete;
+
+ CYJavaUTF8String(CYJavaUTF8String &&rhs) :
+ jni_(rhs.jni_),
+ value_(rhs.value_)
+ {
+ rhs.value_ = NULL;
+ }
+};
+
+CYJavaUTF8String CYCastUTF8String(JNIEnv *jni, jstring value) {
+ return CYJavaUTF8String(jni, value);
+}
+
+JSStringRef CYCopyJSString(JNIEnv *jni, jstring value) {
+ return CYCopyJSString(CYCastUTF8String(jni, value));
+}
+
+template <typename Value_>
+struct CYJavaGlobal {
+ JNIEnv *jni_;
+ Value_ value_;
+
+ CYJavaGlobal() :
+ jni_(NULL),
+ value_(NULL)
+ {
+ }
+
+ CYJavaGlobal(JNIEnv *jni, Value_ value) :
+ jni_(jni),
+ value_(static_cast<Value_>(jni_->NewGlobalRef(value)))
+ {
+ }
+
+ CYJavaGlobal(const CYJavaGlobal &value) :
+ CYJavaGlobal(value.jni_, value.value_)
+ {
+ }
+
+ CYJavaGlobal(CYJavaGlobal &&value) :
+ jni_(value.jni_),
+ value_(value.value_)
+ {
+ value.value_ = NULL;
+ }
+
+ ~CYJavaGlobal() {
+ if (value_ != NULL)
+ jni_->DeleteGlobalRef(value_);
+ }
+
+ operator bool() const {
+ return value_ != NULL;
+ }
+
+ operator JNIEnv *() const {
+ return jni_;
+ }
+
+ operator Value_() const {
+ return value_;
+ }
+};
+
+template <typename Internal_, typename Value_>
+struct CYJavaValue :
+ CYPrivate<Internal_>
+{
+ CYJavaGlobal<Value_> value_;
+
+ CYJavaValue(JNIEnv *jni, Value_ value) :
+ value_(jni, value)
+ {
+ }
+
+ CYJavaValue(const CYJavaValue &) = delete;
+};
+
+#define CYJavaForEachPrimitive \
+ CYJavaForEachPrimitive_(Z, z, Boolean, Boolean, boolean) \
+ CYJavaForEachPrimitive_(B, b, Byte, Byte, byte) \
+ CYJavaForEachPrimitive_(C, c, Char, Character, char) \
+ CYJavaForEachPrimitive_(S, s, Short, Short, short) \
+ CYJavaForEachPrimitive_(I, i, Int, Integer, int) \
+ CYJavaForEachPrimitive_(J, j, Long, Long, long) \
+ CYJavaForEachPrimitive_(F, f, Float, Float, float) \
+ CYJavaForEachPrimitive_(D, d, Double, Double, double)
+
+enum CYJavaPrimitive : char {
+ CYJavaPrimitiveObject,
+ CYJavaPrimitiveVoid,
+#define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
+ CYJavaPrimitive ## Type,
+CYJavaForEachPrimitive
+#undef CYJavaForEachPrimitive_
+};
+
+template <typename Type_>
+static _finline JSValueRef CYJavaCastJSValue(JSContextRef context, Type_ value) {
+ return CYCastJSValue(context, value);
+}
+
+static _finline JSValueRef CYJavaCastJSValue(JSContextRef context, jboolean value) {
+ return CYCastJSValue(context, static_cast<bool>(value));
+}
+
+static std::map<std::string, CYJavaPrimitive> Primitives_;
+
+static CYJavaPrimitive CYJavaGetPrimitive(JSContextRef context, JNIEnv *jni, jobject type, jmethodID Class$get$$Name) {
+ jstring string(static_cast<jstring>(_envcall(jni, CallObjectMethod(type, Class$get$$Name))));
+ _assert(string != NULL);
+ CYJavaUTF8String name(jni, string);
+ auto primitive(Primitives_.find(name));
+ return primitive != Primitives_.end() ? primitive->second : CYJavaPrimitiveObject;
+}
+
+typedef std::vector<CYJavaPrimitive> CYJavaShorty;
+
+static CYJavaShorty CYJavaGetShorty(JSContextRef context, JNIEnv *jni, jobjectArray types, jmethodID Class$get$$Name) {
+ size_t count(_envcall(jni, GetArrayLength(types)));
+ CYJavaShorty shorty(count);
+ for (size_t index(0); index != count; ++index)
+ shorty[index] = CYJavaGetPrimitive(context, jni, _envcall(jni, GetObjectArrayElement(types, index)), Class$get$$Name);
+ return shorty;
+}
+
+struct CYJavaField {
+ jfieldID field_;
+ CYJavaPrimitive primitive_;
+};
+
+typedef std::map<std::string, CYJavaField> CYJavaFieldMap;
+
+struct CYJavaSignature {
+ jmethodID method_;
+ CYJavaGlobal<jobject> reflected_;
+ CYJavaPrimitive primitive_;
+ CYJavaShorty shorty_;
+
+ CYJavaSignature(JNIEnv *jni, jmethodID method, jobject reflected, CYJavaPrimitive primitive, const CYJavaShorty &shorty) :
+ method_(method),
+ reflected_(jni, reflected),
+ primitive_(primitive),
+ shorty_(shorty)
+ {
+ }
+
+ CYJavaSignature(unsigned count) :
+ shorty_(count)
+ {
+ }
+
+ bool operator <(const CYJavaSignature &rhs) const {
+ return shorty_.size() < rhs.shorty_.size();
+ }
+};
+
+typedef std::multiset<CYJavaSignature> CYJavaOverload;
+
+struct CYJavaMethod :
+ CYPrivate<CYJavaMethod>
+{
+ CYJavaOverload overload_;
+
+ CYJavaMethod(const CYJavaOverload &overload) :
+ overload_(overload)
+ {
+ }
+};
+
+struct CYJavaStaticMethod :
+ CYPrivate<CYJavaStaticMethod>
+{
+ CYJavaOverload overload_;
+
+ CYJavaStaticMethod(const CYJavaOverload &overload) :
+ overload_(overload)
+ {
+ }
+};
+
+struct CYJavaClass :
+ CYJavaValue<CYJavaClass, jclass>
+{
+ bool interface_;
+
+ CYJavaFieldMap static_;
+ CYJavaFieldMap instance_;
+ CYJavaOverload overload_;
+
+ CYJavaClass(JNIEnv *jni, jclass value, bool interface) :
+ CYJavaValue(jni, value),
+ interface_(interface)
+ {
+ }
+};
+
+static JSObjectRef CYGetJavaClass(JSContextRef context, JNIEnv *jni, jclass _class);
+
+struct CYJavaObject :
+ CYJavaValue<CYJavaObject, jobject>
+{
+ CYJavaClass *table_;
+
+ CYJavaObject(JNIEnv *jni, jobject value, CYJavaClass *table) :
+ CYJavaValue(jni, value),
+ table_(table)
+ {
+ }
+
+ JSValueRef GetPrototype(JSContextRef context) const;
+};
+
+struct CYJavaInterior :
+ CYJavaValue<CYJavaInterior, jobject>
+{
+ CYJavaClass *table_;
+
+ CYJavaInterior(JNIEnv *jni, jobject value, CYJavaClass *table) :
+ CYJavaValue(jni, value),
+ table_(table)
+ {
+ }
+};
+
+struct CYJavaStaticInterior :
+ CYJavaValue<CYJavaStaticInterior, jobject>
+{
+ CYJavaClass *table_;
+
+ CYJavaStaticInterior(JNIEnv *jni, jobject value, CYJavaClass *table) :
+ CYJavaValue(jni, value),
+ table_(table)
+ {
+ }
+};
+
+struct CYJavaArray :
+ CYJavaValue<CYJavaArray, jarray>
+{
+ CYJavaPrimitive primitive_;
+
+ CYJavaArray(JNIEnv *jni, jarray value, CYJavaPrimitive primitive) :
+ CYJavaValue(jni, value),
+ primitive_(primitive)
+ {
+ }
+
+ JSValueRef GetPrototype(JSContextRef context) const;
+};
+
+struct CYJavaPackage :
+ CYPrivate<CYJavaPackage>
+{
+ typedef std::vector<std::string> Path;
+ Path package_;
+
+ _finline CYJavaPackage(const Path &package) :
+ package_(package)
+ {
+ }
+};
+
+JSValueRef CYJavaObject::GetPrototype(JSContextRef context) const {
+ JNIEnv *jni(value_);
+ return CYGetProperty(context, CYGetJavaClass(context, jni, _envcall(jni, GetObjectClass(value_))), prototype_s);
+}
+
+JSValueRef CYJavaArray::GetPrototype(JSContextRef context) const {
+ return CYGetCachedObject(context, CYJSString("Array_prototype"));
+}
+
+static JSValueRef CYCastJSValue(JSContextRef context, JNIEnv *jni, jobject value) {
+ if (value == NULL)
+ return CYJSNull(context);
+
+ jclass _class(_envcall(jni, GetObjectClass(value)));
+ if (_envcall(jni, IsSameObject(_class, _envcall(jni, FindClass("java/lang/String")))))
+ return CYCastJSValue(context, CYJSString(jni, static_cast<jstring>(value)));
+
+ jclass Class$(_envcall(jni, FindClass("java/lang/Class")));
+ jmethodID Class$isArray(_envcall(jni, GetMethodID(Class$, "isArray", "()Z")));
+ if (_envcall(jni, CallBooleanMethod(_class, Class$isArray))) {
+ jmethodID Class$getComponentType(_envcall(jni, GetMethodID(Class$, "getComponentType", "()Ljava/lang/Class;")));
+ jclass component(static_cast<jclass>(_envcall(jni, CallObjectMethod(_class, Class$getComponentType))));
+ jmethodID Class$getName(_envcall(jni, GetMethodID(Class$, "getName", "()Ljava/lang/String;")));
+ return CYJavaArray::Make(context, jni, static_cast<jarray>(value), CYJavaGetPrimitive(context, jni, component, Class$getName));
+ }
+
+ jclass Wrapper$(_envcall(jni, FindClass("Cycript$Wrapper")));
+ if (_envcall(jni, IsSameObject(_class, Wrapper$))) {
+ jmethodID Wrapper$getProtect(_envcall(jni, GetMethodID(Wrapper$, "getProtect", "()J")));
+ auto &protect(*reinterpret_cast<CYProtect *>(_envcall(jni, CallLongMethod(value, Wrapper$getProtect))));
+ return protect;
+ }
+
+ CYJavaClass *table(reinterpret_cast<CYJavaClass *>(JSObjectGetPrivate(CYGetJavaClass(context, jni, _class))));
+ return CYJavaObject::Make(context, jni, value, table);
+}
+
+static _finline JSObjectRef CYCastJSObject(JSContextRef context, JNIEnv *jni, jobject value) {
+ return CYCastJSObject(context, CYCastJSValue(context, jni, value));
+}
+
+static jstring CYCastJavaString(JNIEnv *jni, JSContextRef context, CYUTF16String value) {
+ return _envcall(jni, NewString(value.data, value.size));
+}
+
+static jstring CYCastJavaString(JNIEnv *jni, JSContextRef context, JSStringRef value) {
+ return CYCastJavaString(jni, context, CYCastUTF16String(value));
+}
+
+#define CYCastJava$(T, Type, jtype, Cast) \
+_disused static jobject CYCastJava ## Type(JNIEnv *jni, JSContextRef context, JSValueRef value) { \
+ jclass Type$(_envcall(jni, FindClass("java/lang/" #Type))); \
+ jmethodID Type$init$(_envcall(jni, GetMethodID(Type$, "<init>", "(" #T ")V"))); \
+ return _envcall(jni, NewObject(Type$, Type$init$, static_cast<jtype>(Cast(context, value)))); \
+}
+
+CYCastJava$(Z, Boolean, jboolean, CYCastBool)
+CYCastJava$(B, Byte, jbyte, CYCastDouble)
+CYCastJava$(C, Character, jchar, CYCastDouble)
+CYCastJava$(S, Short, jshort, CYCastDouble)
+CYCastJava$(I, Integer, jint, CYCastDouble)
+CYCastJava$(J, Long, jlong, CYCastDouble)
+CYCastJava$(F, Float, jfloat, CYCastDouble)
+CYCastJava$(D, Double, jdouble, CYCastDouble)
+
+static CYJavaClass *CYGetJavaTable(JSContextRef context, JSObjectRef object) {
+ if (!JSValueIsObjectOfClass(context, object, CYJavaClass::Class_))
+ return NULL;
+ return reinterpret_cast<CYJavaClass *>(JSObjectGetPrivate(object));
+}
+
+static CYJavaObject *CYGetJavaObject(JSContextRef context, JSObjectRef object) {
+ if (!JSValueIsObjectOfClass(context, object, CYJavaObject::Class_))
+ return NULL;
+ return reinterpret_cast<CYJavaObject *>(JSObjectGetPrivate(object));
+}
+
+static jobject CYCastJavaObject(JNIEnv *jni, JSContextRef context, JSObjectRef value) {
+ if (CYJavaObject *internal = CYGetJavaObject(context, value))
+ return internal->value_;
+
+ jclass Wrapper$(_envcall(jni, FindClass("Cycript$Wrapper")));
+ jmethodID Wrapper$$init$(_envcall(jni, GetMethodID(Wrapper$, "<init>", "(J)V")));
+ CYProtect *protect(new CYProtect(context, value));
+ return _envcall(jni, NewObject(Wrapper$, Wrapper$$init$, reinterpret_cast<jlong>(protect)));
+}
+
+static jobject CYCastJavaObject(JNIEnv *jni, JSContextRef context, JSValueRef value) {
+ switch (JSValueGetType(context, value)) {
+ case kJSTypeNull:
+ return NULL;
+ case kJSTypeBoolean:
+ return CYCastJavaBoolean(jni, context, value);
+ case kJSTypeNumber:
+ return CYCastJavaDouble(jni, context, value);
+ case kJSTypeString:
+ return CYCastJavaString(jni, context, CYJSString(context, value));
+ case kJSTypeObject:
+ return CYCastJavaObject(jni, context, CYCastJSObject(context, value));
+
+ case kJSTypeUndefined:
+ // XXX: I am currently relying on this for dynamic proxy of void method
+ return NULL;
+ default:
+ _assert(false);
+ }
+}
+
+static JSObjectRef CYGetJavaClass(JSContextRef context, JNIEnv *jni, jclass value) {
+ JSObjectRef global(CYGetGlobalObject(context));
+ JSObjectRef cy(CYCastJSObject(context, CYGetProperty(context, global, cy_s)));
+
+ jclass Class$(_envcall(jni, FindClass("java/lang/Class")));
+ jmethodID Class$getName(_envcall(jni, GetMethodID(Class$, "getName", "()Ljava/lang/String;")));
+
+ CYJSString name(jni, static_cast<jstring>(_envcall(jni, CallObjectMethod(value, Class$getName))));
+ JSValueRef cached(CYGetProperty(context, cy, name));
+ if (!JSValueIsUndefined(context, cached))
+ return CYCastJSObject(context, cached);
+
+ jmethodID Class$isInterface(_envcall(jni, GetMethodID(Class$, "isInterface", "()Z")));
+
+ jmethodID Class$getDeclaredConstructors(_envcall(jni, GetMethodID(Class$, "getDeclaredConstructors", "()[Ljava/lang/reflect/Constructor;")));
+ jmethodID Class$getDeclaredFields(_envcall(jni, GetMethodID(Class$, "getDeclaredFields", "()[Ljava/lang/reflect/Field;")));
+ jmethodID Class$getDeclaredMethods(_envcall(jni, GetMethodID(Class$, "getDeclaredMethods", "()[Ljava/lang/reflect/Method;")));
+
+ jclass Constructor$(_envcall(jni, FindClass("java/lang/reflect/Constructor")));
+ //jmethodID Constructor$getModifiers(_envcall(jni, GetMethodID(Constructor$, "getModifiers", "()I")));
+ jmethodID Constructor$getParameterTypes(_envcall(jni, GetMethodID(Constructor$, "getParameterTypes", "()[Ljava/lang/Class;")));
+
+ jclass Field$(_envcall(jni, FindClass("java/lang/reflect/Field")));
+ jmethodID Field$getModifiers(_envcall(jni, GetMethodID(Field$, "getModifiers", "()I")));
+ jmethodID Field$getName(_envcall(jni, GetMethodID(Field$, "getName", "()Ljava/lang/String;")));
+ jmethodID Field$getType(_envcall(jni, GetMethodID(Field$, "getType", "()Ljava/lang/Class;")));
+
+ jclass Method$(_envcall(jni, FindClass("java/lang/reflect/Method")));
+ jmethodID Method$getModifiers(_envcall(jni, GetMethodID(Method$, "getModifiers", "()I")));
+ jmethodID Method$getName(_envcall(jni, GetMethodID(Method$, "getName", "()Ljava/lang/String;")));
+ jmethodID Method$getParameterTypes(_envcall(jni, GetMethodID(Method$, "getParameterTypes", "()[Ljava/lang/Class;")));
+ jmethodID Method$getReturnType(_envcall(jni, GetMethodID(Method$, "getReturnType", "()Ljava/lang/Class;")));
+
+ jclass Modifier$(_envcall(jni, FindClass("java/lang/reflect/Modifier")));
+ jmethodID Modifier$isStatic(_envcall(jni, GetStaticMethodID(Modifier$, "isStatic", "(I)Z")));
+
+ bool interface(_envcall(jni, CallBooleanMethod(value, Class$isInterface)));
+ CYJavaClass *table(new CYJavaClass(jni, value, interface));
+
+ for (jclass prototype(value); prototype != NULL; prototype = _envcall(jni, GetSuperclass(prototype))) {
+ jobjectArray fields(static_cast<jobjectArray>(_envcall(jni, CallObjectMethod(prototype, Class$getDeclaredFields))));
+
+ for (jsize i(0), e(_envcall(jni, GetArrayLength(fields))); i != e; ++i) {
+ jobject field(_envcall(jni, GetObjectArrayElement(fields, e - i - 1)));
+ jint modifiers(_envcall(jni, CallIntMethod(field, Field$getModifiers)));
+ bool instance(!_envcall(jni, CallStaticBooleanMethod(Modifier$, Modifier$isStatic, modifiers)));
+ auto &map(instance ? table->instance_ : table->static_);
+ CYJavaUTF8String name(jni, static_cast<jstring>(_envcall(jni, CallObjectMethod(field, Field$getName))));
+ jfieldID id(_envcall(jni, FromReflectedField(field)));
+ jobject type(_envcall(jni, CallObjectMethod(field, Field$getType)));
+ map.insert(std::make_pair(std::string(name), CYJavaField{id, CYJavaGetPrimitive(context, jni, type, Class$getName)}));
+ }
+ }
+
+ JSObjectRef constructor(JSObjectMake(context, CYJavaClass::Class_, table));
+
+ JSObjectRef prototype(JSObjectMake(context, NULL, NULL));
+ CYSetProperty(context, constructor, prototype_s, prototype, kJSPropertyAttributeDontEnum);
+
+ jobjectArray constructors(static_cast<jobjectArray>(_envcall(jni, CallObjectMethod(value, Class$getDeclaredConstructors))));
+
+ for (jsize i(0), e(_envcall(jni, GetArrayLength(constructors))); i != e; ++i) {
+ jobject constructor(_envcall(jni, GetObjectArrayElement(constructors, i)));
+ jobjectArray parameters(static_cast<jobjectArray>(_envcall(jni, CallObjectMethod(constructor, Constructor$getParameterTypes))));
+ CYJavaShorty shorty(CYJavaGetShorty(context, jni, parameters, Class$getName));
+ jmethodID id(_envcall(jni, FromReflectedMethod(constructor)));
+ table->overload_.insert(CYJavaSignature(jni, id, constructor, CYJavaPrimitiveObject, shorty));
+ }
+
+ jobjectArray methods(static_cast<jobjectArray>(_envcall(jni, CallObjectMethod(value, Class$getDeclaredMethods))));
+
+ std::map<std::pair<bool, std::string>, CYJavaOverload> entries;
+
+ for (jsize i(0), e(_envcall(jni, GetArrayLength(methods))); i != e; ++i) {
+ jobject method(_envcall(jni, GetObjectArrayElement(methods, i)));
+ jint modifiers(_envcall(jni, CallIntMethod(method, Method$getModifiers)));
+ bool instance(!_envcall(jni, CallStaticBooleanMethod(Modifier$, Modifier$isStatic, modifiers)));
+ CYJavaUTF8String name(jni, static_cast<jstring>(_envcall(jni, CallObjectMethod(method, Method$getName))));
+ jobjectArray parameters(static_cast<jobjectArray>(_envcall(jni, CallObjectMethod(method, Method$getParameterTypes))));
+ CYJavaShorty shorty(CYJavaGetShorty(context, jni, parameters, Class$getName));
+ jobject type(_envcall(jni, CallObjectMethod(method, Method$getReturnType)));
+ auto primitive(CYJavaGetPrimitive(context, jni, type, Class$getName));
+ jmethodID id(_envcall(jni, FromReflectedMethod(method)));
+ entries[std::make_pair(instance, std::string(name))].insert(CYJavaSignature(jni, id, method, primitive, shorty));
+ }
+
+ for (const auto &entry : entries) {
+ bool instance(entry.first.first);
+ CYJSString name(entry.first.second);
+ auto &overload(entry.second);
+ if (instance)
+ CYSetProperty(context, prototype, name, CYJavaMethod::Make(context, overload), kJSPropertyAttributeDontEnum | kJSPropertyAttributeDontDelete);
+ else
+ CYSetProperty(context, constructor, name, CYJavaStaticMethod::Make(context, overload), kJSPropertyAttributeDontEnum | kJSPropertyAttributeDontDelete);
+ }
+
+ // XXX: for some reason kJSPropertyAttributeDontEnum doesn't work if there's already a property with the same name
+ // by not linking the prototypes until after we set the properties, we hide the parent property from this issue :(
+
+ if (jclass super = _envcall(jni, GetSuperclass(value))) {
+ JSObjectRef parent(CYGetJavaClass(context, jni, super));
+ CYSetPrototype(context, constructor, parent);
+ CYSetPrototype(context, prototype, CYGetProperty(context, parent, prototype_s));
+ }
+
+ CYSetProperty(context, cy, name, constructor);
+ return constructor;
+}
+
+static void CYCastJavaNumeric(jvalue &value, CYJavaPrimitive primitive, JSContextRef context, JSValueRef argument) {
+ switch (primitive) {
+#define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
+ case CYJavaPrimitive ## Type: \
+ value.t = static_cast<j ## type>(CYCastDouble(context, argument)); \
+ break;
+CYJavaForEachPrimitive
+#undef CYJavaForEachPrimitive_
+ default:
+ _assert(false);
+ }
+}
+
+static bool CYCastJavaArguments(JNIEnv *jni, const CYJavaShorty &shorty, JSContextRef context, const JSValueRef arguments[], jvalue *array) {
+ for (size_t index(0); index != shorty.size(); ++index) {
+ JSValueRef argument(arguments[index]);
+ JSType type(JSValueGetType(context, argument));
+ jvalue &value(array[index]);
+
+ switch (CYJavaPrimitive primitive = shorty[index]) {
+ case CYJavaPrimitiveObject:
+ value.l = CYCastJavaObject(jni, context, argument);
+ break;
+
+ case CYJavaPrimitiveBoolean:
+ if (type != kJSTypeBoolean)
+ return false;
+ value.z = CYCastBool(context, argument);
+ break;
+
+ case CYJavaPrimitiveCharacter:
+ if (type == kJSTypeNumber)
+ CYCastJavaNumeric(value, primitive, context, argument);
+ else if (type != kJSTypeString)
+ return false;
+ else {
+ CYJSString string(context, argument);
+ if (JSStringGetLength(string) != 1)
+ return false;
+ else
+ value.c = JSStringGetCharactersPtr(string)[0];
+ }
+ break;
+
+ case CYJavaPrimitiveByte:
+ case CYJavaPrimitiveShort:
+ case CYJavaPrimitiveInteger:
+ case CYJavaPrimitiveLong:
+ case CYJavaPrimitiveFloat:
+ case CYJavaPrimitiveDouble:
+ if (type != kJSTypeNumber)
+ return false;
+ CYCastJavaNumeric(value, primitive, context, argument);
+ break;
+
+ default:
+ _assert(false);
+ }
+ }
+
+ return true;
+}
+
+static JSValueRef JavaMethod_callAsFunction(JSContextRef context, JSObjectRef object, JSObjectRef _this, size_t count, const JSValueRef arguments[], JSValueRef *exception) { CYTry {
+ CYJavaMethod *internal(reinterpret_cast<CYJavaMethod *>(JSObjectGetPrivate(object)));
+ CYJavaObject *self(CYGetJavaObject(context, _this));
+ JNIEnv *jni(self->value_);
+
+ CYJavaSignature bound(count);
+ for (auto overload(internal->overload_.lower_bound(bound)), e(internal->overload_.upper_bound(bound)); overload != e; ++overload) {
+ jvalue array[count];
+ if (!CYCastJavaArguments(jni, overload->shorty_, context, arguments, array))
+ continue;
+ switch (overload->primitive_) {
+ case CYJavaPrimitiveObject:
+ return CYCastJSValue(context, jni, _envcall(jni, CallObjectMethodA(self->value_, overload->method_, array)));
+ case CYJavaPrimitiveVoid:
+ _envcallv(jni, CallVoidMethodA(self->value_, overload->method_, array));
+ return CYJSUndefined(context);
+#define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
+ case CYJavaPrimitive ## Type: \
+ return CYJavaCastJSValue(context, _envcall(jni, Call ## Typ ## MethodA(self->value_, overload->method_, array)));
+CYJavaForEachPrimitive
+#undef CYJavaForEachPrimitive_
+ default: _assert(false);
+ }
+ }
+
+ CYThrow("invalid method call");
+} CYCatch(NULL) }
+
+static JSValueRef JavaStaticMethod_callAsFunction(JSContextRef context, JSObjectRef object, JSObjectRef _this, size_t count, const JSValueRef arguments[], JSValueRef *exception) { CYTry {
+ CYJavaMethod *internal(reinterpret_cast<CYJavaMethod *>(JSObjectGetPrivate(object)));
+ CYJavaClass *table(CYGetJavaTable(context, _this));
+ JNIEnv *jni(table->value_);
+
+ CYJavaSignature bound(count);
+ for (auto overload(internal->overload_.lower_bound(bound)), e(internal->overload_.upper_bound(bound)); overload != e; ++overload) {
+ jvalue array[count];
+ if (!CYCastJavaArguments(jni, overload->shorty_, context, arguments, array))
+ continue;
+ switch (overload->primitive_) {
+ case CYJavaPrimitiveObject:
+ return CYCastJSValue(context, jni, _envcall(jni, CallStaticObjectMethodA(table->value_, overload->method_, array)));
+ case CYJavaPrimitiveVoid:
+ _envcallv(jni, CallStaticVoidMethodA(table->value_, overload->method_, array));
+ return CYJSUndefined(context);
+#define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
+ case CYJavaPrimitive ## Type: \
+ return CYJavaCastJSValue(context, _envcall(jni, CallStatic ## Typ ## MethodA(table->value_, overload->method_, array)));
+CYJavaForEachPrimitive
+#undef CYJavaForEachPrimitive_
+ default: _assert(false);
+ }
+ }
+
+ CYThrow("invalid method call");
+} CYCatch(NULL) }
+
+static JSObjectRef JavaClass_callAsConstructor(JSContextRef context, JSObjectRef object, size_t count, const JSValueRef arguments[], JSValueRef *exception) { CYTry {
+ CYJavaClass *table(reinterpret_cast<CYJavaClass *>(JSObjectGetPrivate(object)));
+ JNIEnv *jni(table->value_);
+ jclass _class(table->value_);
+
+ if (table->interface_ && count == 1) {
+ JSObjectRef target(CYCastJSObject(context, arguments[0]));
+ jclass Cycript$(_envcall(jni, FindClass("Cycript")));
+ jmethodID Cycript$Make(_envcall(jni, GetStaticMethodID(Cycript$, "proxy", "(Ljava/lang/Class;J)Ljava/lang/Object;")));
+ CYProtect *protect(new CYProtect(context, target));
+ return CYCastJSObject(context, jni, _envcall(jni, CallObjectMethod(Cycript$, Cycript$Make, _class, reinterpret_cast<jlong>(protect))));
+ }
+
+ CYJavaSignature bound(count);
+ for (auto overload(table->overload_.lower_bound(bound)), e(table->overload_.upper_bound(bound)); overload != e; ++overload) {
+ jvalue array[count];
+ if (!CYCastJavaArguments(jni, overload->shorty_, context, arguments, array))
+ continue;
+ jobject object(_envcall(jni, NewObjectA(_class, overload->method_, array)));
+ return CYCastJSObject(context, jni, object);
+ }
+
+ CYThrow("invalid constructor call");
+} CYCatch(NULL) }
+
+static bool JavaStaticInterior_hasProperty(JSContextRef context, JSObjectRef object, JSStringRef property) {
+ CYJavaStaticInterior *internal(reinterpret_cast<CYJavaStaticInterior *>(JSObjectGetPrivate(object)));
+ CYJavaClass *table(internal->table_);
+ CYPool pool;
+ auto name(CYPoolUTF8String(pool, context, property));
+ auto field(table->static_.find(name));
+ if (field == table->static_.end())
+ return false;
+ return true;
+}
+
+static JSValueRef JavaStaticInterior_getProperty(JSContextRef context, JSObjectRef object, JSStringRef property, JSValueRef *exception) { CYTry {
+ CYJavaStaticInterior *internal(reinterpret_cast<CYJavaStaticInterior *>(JSObjectGetPrivate(object)));
+ CYJavaClass *table(internal->table_);
+ JNIEnv *jni(table->value_);
+ CYPool pool;
+ auto name(CYPoolUTF8String(pool, context, property));
+ auto field(table->static_.find(name));
+ if (field == table->static_.end())
+ return NULL;
+
+ switch (field->second.primitive_) {
+ case CYJavaPrimitiveObject:
+ return CYCastJSValue(context, jni, _envcall(jni, GetStaticObjectField(table->value_, field->second.field_)));
+#define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
+ case CYJavaPrimitive ## Type: \
+ return CYJavaCastJSValue(context, _envcall(jni, GetStatic ## Typ ## Field(table->value_, field->second.field_)));
+CYJavaForEachPrimitive
+#undef CYJavaForEachPrimitive_
+ default: _assert(false);
+ }
+} CYCatch(NULL) }
+
+static bool JavaStaticInterior_setProperty(JSContextRef context, JSObjectRef object, JSStringRef property, JSValueRef value, JSValueRef *exception) { CYTry {
+ CYJavaStaticInterior *internal(reinterpret_cast<CYJavaStaticInterior *>(JSObjectGetPrivate(object)));
+ CYJavaClass *table(internal->table_);
+ JNIEnv *jni(table->value_);
+ CYPool pool;
+ auto name(CYPoolUTF8String(pool, context, property));
+ auto field(table->static_.find(name));
+ if (field == table->static_.end())
+ return false;
+
+ switch (field->second.primitive_) {
+ case CYJavaPrimitiveObject:
+ _envcallv(jni, SetStaticObjectField(table->value_, field->second.field_, CYCastJavaObject(jni, context, value)));
+#define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
+ case CYJavaPrimitive ## Type: \
+ _envcallv(jni, SetStatic ## Typ ## Field(table->value_, field->second.field_, CYCastDouble(context, value))); \
+ break;
+CYJavaForEachPrimitive
+#undef CYJavaForEachPrimitive_
+ default: _assert(false);
+ }
+
+ return true;
+} CYCatch(false) }
+
+static void JavaStaticInterior_getPropertyNames(JSContextRef context, JSObjectRef object, JSPropertyNameAccumulatorRef names) {
+ CYJavaStaticInterior *internal(reinterpret_cast<CYJavaStaticInterior *>(JSObjectGetPrivate(object)));
+ CYJavaClass *table(internal->table_);
+ for (const auto &field : table->static_)
+ JSPropertyNameAccumulatorAddName(names, CYJSString(field.first));
+}
+
+static JSValueRef JavaClass_getProperty_class(JSContextRef context, JSObjectRef object, JSStringRef property, JSValueRef *exception) { CYTry {
+ CYJavaClass *table(reinterpret_cast<CYJavaClass *>(JSObjectGetPrivate(object)));
+ return CYCastJSValue(context, table->value_, table->value_);
+} CYCatch(NULL) }
+
+static bool JavaInterior_hasProperty(JSContextRef context, JSObjectRef object, JSStringRef property) {
+ CYJavaInterior *internal(reinterpret_cast<CYJavaInterior *>(JSObjectGetPrivate(object)));
+ CYJavaClass *table(internal->table_);
+ CYPool pool;
+ auto name(CYPoolUTF8String(pool, context, property));
+ auto field(table->instance_.find(name));
+ if (field == table->instance_.end())
+ return false;
+ return true;
+}
+
+static JSValueRef JavaInterior_getProperty(JSContextRef context, JSObjectRef object, JSStringRef property, JSValueRef *exception) { CYTry {
+ CYJavaInterior *internal(reinterpret_cast<CYJavaInterior *>(JSObjectGetPrivate(object)));
+ JNIEnv *jni(internal->value_);
+ CYJavaClass *table(internal->table_);
+ CYPool pool;
+ auto name(CYPoolUTF8String(pool, context, property));
+ auto field(table->instance_.find(name));
+ if (field == table->instance_.end())
+ return NULL;
+
+ switch (field->second.primitive_) {
+ case CYJavaPrimitiveObject:
+ return CYCastJSValue(context, jni, _envcall(jni, GetObjectField(internal->value_, field->second.field_)));
+#define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
+ case CYJavaPrimitive ## Type: \
+ return CYJavaCastJSValue(context, _envcall(jni, Get ## Typ ## Field(internal->value_, field->second.field_)));
+CYJavaForEachPrimitive
+#undef CYJavaForEachPrimitive_
+ default: _assert(false);
+ }
+} CYCatch(NULL) }
+
+static bool JavaInterior_setProperty(JSContextRef context, JSObjectRef object, JSStringRef property, JSValueRef value, JSValueRef *exception) { CYTry {
+ CYJavaInterior *internal(reinterpret_cast<CYJavaInterior *>(JSObjectGetPrivate(object)));
+ JNIEnv *jni(internal->value_);
+ CYJavaClass *table(internal->table_);
+ CYPool pool;
+ auto name(CYPoolUTF8String(pool, context, property));
+ auto field(table->instance_.find(name));
+ if (field == table->instance_.end())
+ return false;
+
+ switch (field->second.primitive_) {
+ case CYJavaPrimitiveObject:
+ _envcallv(jni, SetObjectField(table->value_, field->second.field_, CYCastJavaObject(jni, context, value)));
+#define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
+ case CYJavaPrimitive ## Type: \
+ _envcallv(jni, Set ## Typ ## Field(table->value_, field->second.field_, CYCastDouble(context, value))); \
+ break;
+CYJavaForEachPrimitive
+#undef CYJavaForEachPrimitive_
+ default: _assert(false);
+ }
+
+ return true;
+} CYCatch(false) }
+
+static void JavaInterior_getPropertyNames(JSContextRef context, JSObjectRef object, JSPropertyNameAccumulatorRef names) {
+ CYJavaInterior *internal(reinterpret_cast<CYJavaInterior *>(JSObjectGetPrivate(object)));
+ CYJavaClass *table(internal->table_);
+ for (const auto &field : table->instance_)
+ JSPropertyNameAccumulatorAddName(names, CYJSString(field.first));
+}
+
+static JSValueRef JavaObject_getProperty_constructor(JSContextRef context, JSObjectRef object, JSStringRef property, JSValueRef *exception) { CYTry {
+ CYJavaObject *internal(reinterpret_cast<CYJavaObject *>(JSObjectGetPrivate(object)));
+ JNIEnv *jni(internal->value_);
+ return CYGetJavaClass(context, jni, _envcall(jni, GetObjectClass(internal->value_)));
+} CYCatch(NULL) }
+
+static JSValueRef JavaClass_getProperty_$cyi(JSContextRef context, JSObjectRef object, JSStringRef property, JSValueRef *exception) { CYTry {
+ CYJavaClass *internal(reinterpret_cast<CYJavaClass *>(JSObjectGetPrivate(object)));
+ JNIEnv *jni(internal->value_);
+ return CYJavaStaticInterior::Make(context, jni, internal->value_, internal);
+} CYCatch(NULL) }
+
+static JSValueRef JavaObject_getProperty_$cyi(JSContextRef context, JSObjectRef object, JSStringRef property, JSValueRef *exception) { CYTry {
+ CYJavaObject *internal(reinterpret_cast<CYJavaObject *>(JSObjectGetPrivate(object)));
+ JNIEnv *jni(internal->value_);
+ return CYJavaInterior::Make(context, jni, internal->value_, internal->table_);
+} CYCatch(NULL) }
+
+static JSValueRef JavaClass_callAsFunction_toCYON(JSContextRef context, JSObjectRef object, JSObjectRef _this, size_t count, const JSValueRef arguments[], JSValueRef *exception) { CYTry {
+ CYJavaClass *internal(reinterpret_cast<CYJavaClass *>(JSObjectGetPrivate(_this)));
+ JNIEnv *jni(internal->value_);
+ jclass Class$(_envcall(jni, FindClass("java/lang/Class")));
+ jmethodID Class$getCanonicalName(_envcall(jni, GetMethodID(Class$, "getCanonicalName", "()Ljava/lang/String;")));
+ return CYCastJSValue(context, CYJSString(jni, static_cast<jstring>(_envcall(jni, CallObjectMethod(internal->value_, Class$getCanonicalName)))));
+} CYCatch(NULL) }
+
+static JSValueRef JavaMethod_callAsFunction_toCYON(JSContextRef context, JSObjectRef object, JSObjectRef _this, size_t count, const JSValueRef arguments[], JSValueRef *exception) { CYTry {
+ std::ostringstream cyon;
+ return CYCastJSValue(context, CYJSString(cyon.str()));
+} CYCatch(NULL) }
+
+static JSValueRef JavaStaticMethod_callAsFunction_toCYON(JSContextRef context, JSObjectRef object, JSObjectRef _this, size_t count, const JSValueRef arguments[], JSValueRef *exception) { CYTry {
+ std::ostringstream cyon;
+ return CYCastJSValue(context, CYJSString(cyon.str()));
+} CYCatch(NULL) }
+
+static JSValueRef JavaArray_getProperty(JSContextRef context, JSObjectRef object, JSStringRef property, JSValueRef *exception) { CYTry {
+ CYJavaArray *internal(reinterpret_cast<CYJavaArray *>(JSObjectGetPrivate(object)));
+ JNIEnv *jni(internal->value_);
+ if (JSStringIsEqual(property, length_s))
+ return CYCastJSValue(context, _envcall(jni, GetArrayLength(internal->value_)));
+
+ CYPool pool;
+ ssize_t offset;
+ if (!CYGetOffset(pool, context, property, offset))
+ return NULL;
+
+ if (internal->primitive_ == CYJavaPrimitiveObject)
+ return CYCastJSValue(context, jni, _envcall(jni, GetObjectArrayElement(static_cast<jobjectArray>(internal->value_.value_), offset)));
+ else switch (internal->primitive_) {
+#define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
+ case CYJavaPrimitive ## Type: { \
+ j ## type element; \
+ _envcallv(jni, Get ## Typ ## ArrayRegion(static_cast<j ## type ## Array>(internal->value_.value_), offset, 1, &element)); \
+ return CYJavaCastJSValue(context, element); \
+ } break;
+CYJavaForEachPrimitive
+#undef CYJavaForEachPrimitive_
+ default: _assert(false);
+ }
+} CYCatch(NULL) }
+
+static bool JavaArray_setProperty(JSContextRef context, JSObjectRef object, JSStringRef property, JSValueRef value, JSValueRef *exception) { CYTry {
+ CYJavaArray *internal(reinterpret_cast<CYJavaArray *>(JSObjectGetPrivate(object)));
+ JNIEnv *jni(internal->value_);
+
+ CYPool pool;
+ ssize_t offset;
+ if (!CYGetOffset(pool, context, property, offset))
+ return false;
+
+ if (internal->primitive_ == CYJavaPrimitiveObject)
+ _envcallv(jni, SetObjectArrayElement(static_cast<jobjectArray>(internal->value_.value_), offset, CYCastJavaObject(jni, context, value)));
+ else switch (internal->primitive_) {
+#define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
+ case CYJavaPrimitive ## Type: { \
+ j ## type element; \
+ _envcallv(jni, Get ## Typ ## ArrayRegion(static_cast<j ## type ## Array>(internal->value_.value_), offset, 1, &element)); \
+ return CYJavaCastJSValue(context, element); \
+ } break;
+CYJavaForEachPrimitive
+#undef CYJavaForEachPrimitive_
+ default: _assert(false);
+ }
+
+ return true;
+} CYCatch(false) }
+
+static JSValueRef JavaPackage_callAsFunction_toCYON(JSContextRef context, JSObjectRef object, JSObjectRef _this, size_t count, const JSValueRef arguments[], JSValueRef *exception) { CYTry {
+ CYJavaPackage *internal(reinterpret_cast<CYJavaPackage *>(JSObjectGetPrivate(_this)));
+ std::ostringstream name;
+ for (auto &package : internal->package_)
+ name << package << '.';
+ name << '*';
+ return CYCastJSValue(context, CYJSString(name.str()));
+} CYCatch(NULL) }
+
+static bool CYJavaPackage_hasProperty(JSContextRef context, JSObjectRef object, JSStringRef property) {
+ return true;
+}
+
+static JSValueRef CYJavaPackage_getProperty(JSContextRef context, JSObjectRef object, JSStringRef property, JSValueRef *exception) { CYTry {
+ CYJavaPackage *internal(reinterpret_cast<CYJavaPackage *>(JSObjectGetPrivate(object)));
+ CYJavaPackage::Path package(internal->package_);
+
+ CYPool pool;
+ const char *next(CYPoolCString(pool, context, property));
+
+ std::ostringstream name;
+ for (auto &package : internal->package_)
+ name << package << '/';
+ name << next;
+
+ JNIEnv *jni(GetJNI(context));
+ if (jclass _class = jni->FindClass(name.str().c_str()))
+ return CYGetJavaClass(context, jni, _class);
+ jni->ExceptionClear();
+
+ package.push_back(next);
+ return CYJavaPackage::Make(context, package);
+} CYCatch(NULL) }
+
+static void Cycript_delete(JNIEnv *jni, jclass api, jlong jprotect) { CYJavaTry {
+ delete reinterpret_cast<CYProtect *>(jprotect);
+} CYJavaCatch() }
+
+static jobject Cycript_handle(JNIEnv *jni, jclass api, jlong jprotect, jstring property, jobjectArray jarguments) { CYJavaTry {
+ auto &protect(*reinterpret_cast<CYProtect *>(jprotect));
+ JSContextRef context(protect);
+ JSValueRef function(CYGetProperty(context, protect, CYJSString(jni, property)));
+ if (JSValueIsUndefined(context, function))
+ return NULL;
+
+ size_t count(jarguments == NULL ? 0 : _envcall(jni, GetArrayLength(jarguments)));
+ JSValueRef arguments[count];
+ for (size_t index(0); index != count; ++index)
+ arguments[index] = CYCastJSValue(context, jni, _envcall(jni, GetObjectArrayElement(jarguments, index)));
+
+ return CYCastJavaObject(jni, context, CYCallAsFunction(context, CYCastJSObject(context, function), protect, count, arguments));
+} CYJavaCatch(NULL) }
+
+static JNINativeMethod Cycript_[] = {
+ {(char *) "delete", (char *) "(J)V", (void *) &Cycript_delete},
+ {(char *) "handle", (char *) "(JLjava/lang/String;[Ljava/lang/Object;)Ljava/lang/Object;", (void *) &Cycript_handle},
+};
+
+static void CYRegisterNatives(JSContextRef context, JNIEnv *jni) {
+ jclass Cycript$(_envcall(jni, FindClass("Cycript")));
+ _envcall(jni, RegisterNatives(Cycript$, Cycript_, sizeof(Cycript_) / sizeof(Cycript_[0])));
+}
+
+static JSStaticValue JavaClass_staticValues[3] = {
+ {"class", &JavaClass_getProperty_class, NULL, kJSPropertyAttributeReadOnly | kJSPropertyAttributeDontEnum | kJSPropertyAttributeDontDelete},
+ {"$cyi", &JavaClass_getProperty_$cyi, NULL, kJSPropertyAttributeReadOnly | kJSPropertyAttributeDontEnum | kJSPropertyAttributeDontDelete},
+ {NULL, NULL, NULL, 0}
+};
+
+static JSStaticFunction JavaClass_staticFunctions[2] = {
+ {"toCYON", &JavaClass_callAsFunction_toCYON, kJSPropertyAttributeDontEnum | kJSPropertyAttributeDontDelete},
+ {NULL, NULL, 0}
+};
+
+static JSStaticValue JavaObject_staticValues[3] = {
+ {"constructor", &JavaObject_getProperty_constructor, NULL, kJSPropertyAttributeReadOnly | kJSPropertyAttributeDontEnum | kJSPropertyAttributeDontDelete},
+ {"$cyi", &JavaObject_getProperty_$cyi, NULL, kJSPropertyAttributeReadOnly | kJSPropertyAttributeDontEnum | kJSPropertyAttributeDontDelete},
+ {NULL, NULL, NULL, 0}
+};
+
+static JSStaticFunction JavaMethod_staticFunctions[2] = {
+ {"toCYON", &JavaMethod_callAsFunction_toCYON, kJSPropertyAttributeDontEnum | kJSPropertyAttributeDontDelete},
+ {NULL, NULL, 0}
+};
+
+static JSStaticFunction JavaStaticMethod_staticFunctions[2] = {
+ {"toCYON", &JavaStaticMethod_callAsFunction_toCYON, kJSPropertyAttributeDontEnum | kJSPropertyAttributeDontDelete},
+ {NULL, NULL, 0}
+};
+
+static JSStaticFunction JavaPackage_staticFunctions[2] = {
+ {"toCYON", &JavaPackage_callAsFunction_toCYON, kJSPropertyAttributeDontEnum | kJSPropertyAttributeDontDelete},
+ {NULL, NULL, 0}
+};
+
+void CYJava_Initialize() {
+ Primitives_.insert(std::make_pair("void", CYJavaPrimitiveVoid));
+#define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
+ Primitives_.insert(std::make_pair(#type, CYJavaPrimitive ## Type));
+CYJavaForEachPrimitive
+#undef CYJavaForEachPrimitive_
+
+ JSClassDefinition definition;
+
+ definition = kJSClassDefinitionEmpty;
+ definition.className = "JavaClass";
+ definition.staticValues = JavaClass_staticValues;
+ definition.staticFunctions = JavaClass_staticFunctions;
+ definition.callAsConstructor = &JavaClass_callAsConstructor;
+ definition.finalize = &CYFinalize;
+ CYJavaClass::Class_ = JSClassCreate(&definition);
+
+ definition = kJSClassDefinitionEmpty;
+ definition.attributes = kJSClassAttributeNoAutomaticPrototype;
+ definition.className = "JavaInterior";
+ definition.hasProperty = &JavaInterior_hasProperty;
+ definition.getProperty = &JavaInterior_getProperty;
+ definition.setProperty = &JavaInterior_setProperty;
+ definition.getPropertyNames = &JavaInterior_getPropertyNames;
+ definition.finalize = &CYFinalize;
+ CYJavaInterior::Class_ = JSClassCreate(&definition);
+
+ definition = kJSClassDefinitionEmpty;
+ definition.className = "JavaMethod";
+ definition.staticFunctions = JavaMethod_staticFunctions;
+ definition.callAsFunction = &JavaMethod_callAsFunction;
+ definition.finalize = &CYFinalize;
+ CYJavaMethod::Class_ = JSClassCreate(&definition);
+
+ definition = kJSClassDefinitionEmpty;
+ definition.className = "JavaStaticMethod";
+ definition.staticFunctions = JavaStaticMethod_staticFunctions;
+ definition.callAsFunction = &JavaStaticMethod_callAsFunction;
+ definition.finalize = &CYFinalize;
+ CYJavaStaticMethod::Class_ = JSClassCreate(&definition);
+
+ definition = kJSClassDefinitionEmpty;
+ definition.attributes = kJSClassAttributeNoAutomaticPrototype;
+ definition.className = "JavaObject";
+ definition.staticValues = JavaObject_staticValues;
+ definition.finalize = &CYFinalize;
+ CYJavaObject::Class_ = JSClassCreate(&definition);
+
+ definition = kJSClassDefinitionEmpty;
+ definition.className = "JavaArray";
+ definition.getProperty = &JavaArray_getProperty;
+ definition.setProperty = &JavaArray_setProperty;
+ definition.finalize = &CYFinalize;
+ CYJavaArray::Class_ = JSClassCreate(&definition);
+
+ definition = kJSClassDefinitionEmpty;
+ definition.className = "JavaPackage";
+ definition.staticFunctions = JavaPackage_staticFunctions;
+ definition.hasProperty = &CYJavaPackage_hasProperty;
+ definition.getProperty = &CYJavaPackage_getProperty;
+ definition.finalize = &CYFinalize;
+ CYJavaPackage::Class_ = JSClassCreate(&definition);
+
+ definition = kJSClassDefinitionEmpty;
+ definition.attributes = kJSClassAttributeNoAutomaticPrototype;
+ definition.className = "JavaStaticInterior";
+ definition.hasProperty = &JavaStaticInterior_hasProperty;
+ definition.getProperty = &JavaStaticInterior_getProperty;
+ definition.setProperty = &JavaStaticInterior_setProperty;
+ definition.getPropertyNames = &JavaStaticInterior_getPropertyNames;
+ definition.finalize = &CYFinalize;
+ CYJavaStaticInterior::Class_ = JSClassCreate(&definition);
+}
+
+void CYJava_SetupContext(JSContextRef context) {
+ JSObjectRef global(CYGetGlobalObject(context));
+ //JSObjectRef cy(CYCastJSObject(context, CYGetProperty(context, global, cy_s)));
+ JSObjectRef cycript(CYCastJSObject(context, CYGetProperty(context, global, CYJSString("Cycript"))));
+ JSObjectRef all(CYCastJSObject(context, CYGetProperty(context, cycript, CYJSString("all"))));
+ //JSObjectRef alls(CYCastJSObject(context, CYGetProperty(context, cycript, CYJSString("alls"))));
+
+ JSObjectRef Java(JSObjectMake(context, NULL, NULL));
+ CYSetProperty(context, cycript, CYJSString("Java"), Java);
+
+ JSObjectRef Packages(CYJavaPackage::Make(context, CYJavaPackage::Path()));
+ CYSetProperty(context, all, CYJSString("Packages"), Packages);
+
+ for (auto name : (const char *[]) {"java", "javax", "android", "com", "net", "org"}) {
+ CYJSString js(name);
+ CYSetProperty(context, all, js, CYGetProperty(context, Packages, js));
+ }
+}
+
+static CYHook CYJavaHook = {
+ NULL,
+ NULL,
+ NULL,
+ &CYJava_Initialize,
+ &CYJava_SetupContext,
+ NULL,
+};
+
+CYRegisterHook CYJava(&CYJavaHook);
projects / cycript.git / blobdiff