1 /* Cycript - The Truly Universal Scripting Language
2 * Copyright (C) 2009-2016 Jay Freeman (saurik)
5 /* GNU Affero General Public License, Version 3 {{{ */
7 * This program is free software: you can redistribute it and/or modify
8 * it under the terms of the GNU Affero General Public License as published by
9 * the Free Software Foundation, either version 3 of the License, or
10 * (at your option) any later version.
12 * This program is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 * GNU Affero General Public License for more details.
17 * You should have received a copy of the GNU Affero General Public License
18 * along with this program. If not, see <http://www.gnu.org/licenses/>.
28 #if defined(__APPLE__) && !defined(__arm__)
29 #include <JavaVM/jni.h>
35 // XXX: this is deprecated?!?!?!?!?!?!
36 #include <sys/system_properties.h>
39 #include "cycript.hpp"
41 #include "Execute.hpp"
42 #include "Internal.hpp"
43 #include "JavaScript.hpp"
44 #include "Pooling.hpp"
46 #define _jnicall(expr) ({ \
48 if (_value != JNI_OK) \
49 CYThrow("_jnicall(%s) == %d", #expr, _value); \
52 #define _envcall(jni, expr) ({ \
53 __typeof__(jni->expr) _value(jni->expr); \
54 if (jthrowable _error = jni->ExceptionOccurred()) { \
55 jni->ExceptionClear(); \
56 throw CYJavaError(CYJavaLocal<jthrowable>(jni, _error)); \
60 #define _envcallv(jni, expr) do { \
62 if (jthrowable _error = jni->ExceptionOccurred()) { \
63 jni->ExceptionClear(); \
64 throw CYJavaError(CYJavaLocal<jthrowable>(jni, _error)); \
70 auto &protect(*reinterpret_cast<CYProtect *>(jprotect)); \
71 _disused JSContextRef context(protect); \
72 _disused JSObjectRef object(protect); \
74 #define CYJavaCatch(value) \
75 catch (const CYException &error) { \
76 jni->Throw(CYCastJavaObject(jni, context, error.CastJSValue(context, "Error")).cast<jthrowable>()); \
80 #define CYJavaForEachPrimitive \
81 CYJavaForEachPrimitive_(Z, z, Boolean, Boolean, boolean) \
82 CYJavaForEachPrimitive_(B, b, Byte, Byte, byte) \
83 CYJavaForEachPrimitive_(C, c, Char, Character, char) \
84 CYJavaForEachPrimitive_(S, s, Short, Short, short) \
85 CYJavaForEachPrimitive_(I, i, Int, Integer, int) \
86 CYJavaForEachPrimitive_(J, j, Long, Long, long) \
87 CYJavaForEachPrimitive_(F, f, Float, Float, float) \
88 CYJavaForEachPrimitive_(D, d, Double, Double, double)
90 enum CYJavaPrimitive
: char {
91 CYJavaPrimitiveObject
,
93 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
94 CYJavaPrimitive ## Type,
95 CYJavaForEachPrimitive
96 #undef CYJavaForEachPrimitive_
99 template <typename Type_
>
100 struct IsJavaPrimitive
{ static const bool value
= false; };
102 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
104 struct IsJavaPrimitive<j ## type> { static const bool value = true; };
105 CYJavaForEachPrimitive
106 #undef CYJavaForEachPrimitive_
108 // Java References {{{
109 template <typename Value_
>
114 _finline
CYJavaRef(JNIEnv
*jni
, Value_ value
) :
120 _finline
operator Value_() const {
124 _finline JNIEnv
*jni() const {
128 // XXX: this is only needed to support CYJavaEnv relying on C variadics
129 _finline Value_
get() const {
133 template <typename Other_
>
134 _finline CYJavaRef
<Other_
> cast() const {
135 return {jni_
, static_cast<Other_
>(value_
)};
138 // XXX: this should be tied into CYJavaFrame
140 Value_
value(value_
);
146 template <typename Value_
, void (JNIEnv::*Delete_
)(jobject
)>
147 struct CYJavaDelete
:
150 _finline
CYJavaDelete(JNIEnv
*jni
, Value_ value
) :
151 CYJavaRef
<Value_
>(jni
, value
)
156 if (this->value_
!= NULL
)
157 (this->jni_
->*Delete_
)(this->value_
);
166 template <typename Value_
>
167 struct CYJavaGlobal
:
168 CYJavaDelete
<Value_
, &JNIEnv::DeleteGlobalRef
>
170 typedef CYJavaDelete
<Value_
, &JNIEnv::DeleteGlobalRef
> CYJavaBase
;
173 CYJavaBase(NULL
, NULL
)
177 template <typename Other_
>
178 CYJavaGlobal(const CYJavaRef
<Other_
> &other
) :
179 CYJavaBase(other
.jni_
, static_cast<Other_
>(other
.jni_
->NewGlobalRef(other
.value_
)))
183 CYJavaGlobal(const CYJavaGlobal
<Value_
> &other
) :
184 CYJavaGlobal(static_cast<const CYJavaRef
<Value_
> &>(other
))
188 CYJavaGlobal(CYJavaGlobal
&&value
) :
189 CYJavaBase(value
.jni_
, value
.value_
)
195 template <typename Value_
>
197 CYJavaDelete
<Value_
, &JNIEnv::DeleteLocalRef
>
199 typedef CYJavaDelete
<Value_
, &JNIEnv::DeleteLocalRef
> CYJavaBase
;
202 CYJavaBase(NULL
, NULL
)
206 CYJavaLocal(JNIEnv
*jni
, Value_ value
) :
207 CYJavaBase(jni
, value
)
211 template <typename Other_
>
212 CYJavaLocal(const CYJavaRef
<Other_
> &other
) :
213 CYJavaLocal(other
.jni_
, static_cast<Other_
>(other
.jni_
->NewLocalRef(other
.value_
)))
217 template <typename Other_
>
218 CYJavaLocal(CYJavaRef
<Other_
> &&other
) :
219 CYJavaLocal(other
.jni_
, other
.value_
)
224 CYJavaLocal(CYJavaLocal
&&other
) :
225 CYJavaLocal(static_cast<CYJavaRef
<Value_
> &&>(other
))
229 template <typename Other_
>
230 CYJavaLocal
&operator =(CYJavaLocal
<Other_
> &&other
) {
232 this->jni_
= other
.jni_
;
233 this->value_
= other
.value_
;
240 static CYJavaLocal
<jstring
> CYCastJavaString(const CYJavaRef
<jobject
> &value
);
242 class CYJavaUTF8String
:
246 const CYJavaRef
<jstring
> *value_
;
249 CYJavaUTF8String(const CYJavaRef
<jstring
> &value
) :
253 JNIEnv
*jni(value
.jni());
254 size
= jni
->GetStringUTFLength(value
);
255 data
= jni
->GetStringUTFChars(value
, NULL
);
258 CYJavaUTF8String(const CYJavaRef
<jobject
> &value
) :
259 CYJavaUTF8String(CYCastJavaString(value
))
263 ~CYJavaUTF8String() {
264 if (value_
!= NULL
) {
265 JNIEnv
*jni(value_
->jni());
266 jni
->ReleaseStringUTFChars(*value_
, data
);
270 CYJavaUTF8String(const CYJavaUTF8String
&) = delete;
272 CYJavaUTF8String(CYJavaUTF8String
&&rhs
) :
279 CYJavaUTF8String
CYCastUTF8String(const CYJavaRef
<jstring
> &value
) {
280 return CYJavaUTF8String(value
);
283 JSStringRef
CYCopyJSString(const CYJavaRef
<jstring
> &value
) {
284 return CYCopyJSString(CYCastUTF8String(value
));
291 CYJavaGlobal
<jthrowable
> value_
;
293 CYJavaError(const CYJavaRef
<jthrowable
> &value
) :
298 virtual const char *PoolCString(CYPool
&pool
) const {
299 return CYPoolCString(pool
, CYJavaUTF8String(value_
.cast
<jobject
>()));
302 virtual JSValueRef
CastJSValue(JSContextRef context
, const char *name
) const;
309 CYJavaFrame(JNIEnv
*jni
, jint capacity
) :
312 _assert(jni
->PushLocalFrame(capacity
) == 0);
319 operator JNIEnv
*() const {
323 jobject
operator ()(jobject object
) {
326 return jni
->PopLocalFrame(object
);
335 CYJavaEnv(JNIEnv
*jni
) :
340 template <typename Other_
>
341 CYJavaEnv(const CYJavaRef
<Other_
> &value
) :
346 operator JNIEnv
*() const {
350 JNIEnv
*operator ->() const {
354 CYJavaLocal
<jclass
> FindClass(const char *name
) const {
355 return {jni
, _envcall(jni
, FindClass(name
))};
358 CYJavaLocal
<jclass
> GetObjectClass(jobject object
) const {
359 return {jni
, _envcall(jni
, GetObjectClass(object
))};
362 CYJavaLocal
<jclass
> GetSuperclass(jclass _class
) const {
363 return {jni
, _envcall(jni
, GetSuperclass(_class
))};
366 CYJavaLocal
<jobject
> NewObject(jclass _class
, jmethodID method
, ...) const {
368 va_start(args
, method
);
369 jobject
object(_envcall(jni
, NewObjectV(_class
, method
, args
)));
371 return {jni
, object
};
374 CYJavaLocal
<jobject
> NewObjectA(jclass _class
, jmethodID method
, jvalue
*args
) const {
375 return {jni
, _envcall(jni
, NewObjectA(_class
, method
, args
))};
378 CYJavaLocal
<jstring
> NewString(const jchar
*data
, jsize size
) const {
379 return {jni
, _envcall(jni
, NewString(data
, size
))};
382 #define CYJavaEnv_(Code) \
383 template <typename... Args_> \
384 void Code(Args_ &&... args) const { \
385 _envcallv(jni, Code(cy::Forward<Args_>(args)...)); \
388 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
389 CYJavaEnv_(Get ## Typ ## ArrayRegion) \
390 CYJavaEnv_(Set ## Typ ## Field) \
391 CYJavaEnv_(SetStatic ## Typ ## Field)
392 CYJavaForEachPrimitive
393 #undef CYJavaForEachPrimitive_
395 CYJavaEnv_(CallVoidMethod
)
396 CYJavaEnv_(CallStaticVoidMethod
)
397 CYJavaEnv_(CallVoidMethodA
)
398 CYJavaEnv_(CallStaticVoidMethodA
)
399 CYJavaEnv_(SetObjectArrayElement
)
400 CYJavaEnv_(SetObjectField
)
401 CYJavaEnv_(SetStaticObjectField
)
404 #define CYJavaEnv_(Code) \
405 template <typename... Args_> \
406 auto Code(Args_ &&... args) const -> decltype(jni->Code(cy::Forward<Args_>(args)...)) { \
407 return _envcall(jni, Code(cy::Forward<Args_>(args)...)); \
410 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
411 CYJavaEnv_(Call ## Typ ## Method) \
412 CYJavaEnv_(CallStatic ## Typ ## Method) \
413 CYJavaEnv_(Call ## Typ ## MethodA) \
414 CYJavaEnv_(CallStatic ## Typ ## MethodA) \
415 CYJavaEnv_(Get ## Typ ## Field) \
416 CYJavaEnv_(GetStatic ## Typ ## Field)
417 CYJavaForEachPrimitive
418 #undef CYJavaForEachPrimitive_
420 CYJavaEnv_(FromReflectedField
)
421 CYJavaEnv_(FromReflectedMethod
)
422 CYJavaEnv_(GetArrayLength
)
423 CYJavaEnv_(GetMethodID
)
424 CYJavaEnv_(GetStaticMethodID
)
425 CYJavaEnv_(IsSameObject
)
426 CYJavaEnv_(RegisterNatives
)
429 #define CYJavaEnv_(Code) \
430 template <typename Other_, typename... Args_> \
431 auto Code(Args_ &&... args) const -> CYJavaLocal<Other_> { \
432 return {jni, static_cast<Other_>(_envcall(jni, Code(cy::Forward<Args_>(args)...)))}; \
435 CYJavaEnv_(CallObjectMethod
)
436 CYJavaEnv_(CallStaticObjectMethod
)
437 CYJavaEnv_(CallObjectMethodA
)
438 CYJavaEnv_(CallStaticObjectMethodA
)
439 CYJavaEnv_(GetObjectArrayElement
)
440 CYJavaEnv_(GetObjectField
)
441 CYJavaEnv_(GetStaticObjectField
)
445 static CYJavaLocal
<jstring
> CYCastJavaString(const CYJavaRef
<jobject
> &value
) {
446 CYJavaEnv
jni(value
);
447 auto Object$
(jni
.FindClass("java/lang/Object"));
448 auto Object$
toString(jni
.GetMethodID(Object$
, "toString", "()Ljava/lang/String;"));
449 return jni
.CallObjectMethod
<jstring
>(value
, Object$toString
);
452 static JSValueRef
CYCastJSValue(JSContextRef context
, const CYJavaRef
<jobject
> &value
);
454 template <typename Other_
>
455 static _finline JSValueRef
CYCastJSValue(JSContextRef context
, const CYJavaRef
<Other_
> &value
) {
456 return CYCastJSValue(context
, value
.template cast
<jobject
>());
459 template <typename Type_
>
460 static _finline JSValueRef
CYJavaCastJSValue(JSContextRef context
, Type_ value
) {
461 return CYCastJSValue(context
, value
);
464 static _finline JSValueRef
CYJavaCastJSValue(JSContextRef context
, jboolean value
) {
465 return CYCastJSValue(context
, static_cast<bool>(value
));
468 JSValueRef
CYJavaError::CastJSValue(JSContextRef context
, const char *name
) const {
469 return CYCastJSValue(context
, value_
);
472 static std::map
<std::string
, CYJavaPrimitive
> Primitives_
;
474 static CYJavaPrimitive
CYJavaGetPrimitive(JSContextRef context
, const CYJavaRef
<jclass
> &type
, jmethodID Class$get$$Name
) {
476 auto string(jni
.CallObjectMethod
<jstring
>(type
, Class$get$$Name
));
479 CYJavaUTF8String
name(string
);
480 auto primitive(Primitives_
.find(name
));
481 return primitive
!= Primitives_
.end() ? primitive
->second
: CYJavaPrimitiveObject
;
484 typedef std::vector
<CYJavaPrimitive
> CYJavaShorty
;
486 static CYJavaShorty
CYJavaGetShorty(JSContextRef context
, const CYJavaRef
<jobjectArray
> &types
, jmethodID Class$get$$Name
) {
487 CYJavaEnv
jni(types
);
488 size_t count(jni
.GetArrayLength(types
));
489 CYJavaShorty
shorty(count
);
490 for (size_t index(0); index
!= count
; ++index
)
491 shorty
[index
] = CYJavaGetPrimitive(context
, jni
.GetObjectArrayElement
<jclass
>(types
, index
), Class$get$$Name
);
497 CYJavaPrimitive primitive_
;
500 typedef std::map
<std::string
, CYJavaField
> CYJavaFieldMap
;
502 struct CYJavaSignature
{
503 CYJavaGlobal
<jobject
> reflected_
;
505 CYJavaPrimitive primitive_
;
506 CYJavaShorty shorty_
;
508 CYJavaSignature(const CYJavaRef
<jobject
> &reflected
, jmethodID method
, CYJavaPrimitive primitive
, const CYJavaShorty
&shorty
) :
509 reflected_(reflected
),
511 primitive_(primitive
),
516 CYJavaSignature(unsigned count
) :
521 bool operator <(const CYJavaSignature
&rhs
) const {
522 return shorty_
.size() < rhs
.shorty_
.size();
526 typedef std::multiset
<CYJavaSignature
> CYJavaOverload
;
528 struct CYJavaMethod
:
531 CYJavaOverload overload_
;
533 CYJavaMethod(const CYJavaOverload
&overload
) :
539 struct CYJavaStaticMethod
:
542 CYJavaOverload overload_
;
544 CYJavaStaticMethod(const CYJavaOverload
&overload
) :
553 CYJavaGlobal
<jclass
> value_
;
556 CYJavaFieldMap static_
;
557 CYJavaFieldMap instance_
;
558 CYJavaOverload overload_
;
560 CYJavaClass(const CYJavaRef
<jclass
> &value
, bool interface
) :
562 interface_(interface
)
567 static JSObjectRef
CYGetJavaClass(JSContextRef context
, const CYJavaRef
<jclass
> &_class
);
569 struct CYJavaObject
:
572 CYJavaGlobal
<jobject
> value_
;
575 CYJavaObject(const CYJavaRef
<jobject
> &value
, CYJavaClass
*table
) :
581 JSValueRef
GetPrototype(JSContextRef context
) const;
584 struct CYJavaInterior
:
587 CYJavaGlobal
<jobject
> value_
;
590 CYJavaInterior(const CYJavaRef
<jobject
> &value
, CYJavaClass
*table
) :
597 struct CYJavaStaticInterior
:
600 CYJavaGlobal
<jclass
> value_
;
603 CYJavaStaticInterior(const CYJavaRef
<jclass
> &value
, CYJavaClass
*table
) :
613 CYJavaGlobal
<jarray
> value_
;
614 CYJavaPrimitive primitive_
;
616 CYJavaArray(const CYJavaRef
<jarray
> &value
, CYJavaPrimitive primitive
) :
618 primitive_(primitive
)
622 JSValueRef
GetPrototype(JSContextRef context
) const;
625 struct CYJavaPackage
:
630 typedef std::vector
<std::string
> Path
;
633 _finline
CYJavaPackage(JNIEnv
*jni
, const Path
&package
) :
640 JSValueRef
CYJavaObject::GetPrototype(JSContextRef context
) const {
641 CYJavaEnv
jni(value_
);
642 return CYGetProperty(context
, CYGetJavaClass(context
, jni
.GetObjectClass(value_
)), prototype_s
);
645 JSValueRef
CYJavaArray::GetPrototype(JSContextRef context
) const {
646 return CYGetCachedObject(context
, CYJSString("Array_prototype"));
649 static JSValueRef
CYCastJSValue(JSContextRef context
, const CYJavaRef
<jobject
> &value
) {
651 return CYJSNull(context
);
652 CYJavaEnv
jni(value
);
654 auto _class(jni
.GetObjectClass(value
));
655 if (jni
.IsSameObject(_class
, jni
.FindClass("java/lang/String")))
656 return CYCastJSValue(context
, CYJSString(value
.cast
<jstring
>()));
658 auto Class$
(jni
.FindClass("java/lang/Class"));
659 auto Class$
isArray(jni
.GetMethodID(Class$
, "isArray", "()Z"));
660 if (jni
.CallBooleanMethod(_class
, Class$isArray
)) {
661 auto Class$
getComponentType(jni
.GetMethodID(Class$
, "getComponentType", "()Ljava/lang/Class;"));
662 auto component(jni
.CallObjectMethod
<jclass
>(_class
, Class$getComponentType
));
663 auto Class$
getName(jni
.GetMethodID(Class$
, "getName", "()Ljava/lang/String;"));
664 return CYPrivate
<CYJavaArray
>::Make(context
, value
.cast
<jarray
>(), CYJavaGetPrimitive(context
, component
, Class$getName
));
667 auto Wrapper$
(jni
.FindClass("Cycript$Wrapper"));
668 if (jni
.IsSameObject(_class
, Wrapper$
)) {
669 auto Wrapper$
getProtect(jni
.GetMethodID(Wrapper$
, "getProtect", "()J"));
670 auto &protect(*reinterpret_cast<CYProtect
*>(jni
.CallLongMethod(value
, Wrapper$getProtect
)));
674 CYJavaClass
*table(reinterpret_cast<CYJavaClass
*>(JSObjectGetPrivate(CYGetJavaClass(context
, _class
))));
675 return CYPrivate
<CYJavaObject
>::Make(context
, value
, table
);
678 static _finline JSObjectRef
CYCastJSObject(JSContextRef context
, const CYJavaRef
<jobject
> &value
) {
679 return CYCastJSObject(context
, CYCastJSValue(context
, value
));
682 static CYJavaLocal
<jstring
> CYCastJavaString(const CYJavaEnv
&jni
, JSContextRef context
, CYUTF16String value
) {
683 return jni
.NewString(value
.data
, value
.size
);
686 static CYJavaLocal
<jstring
> CYCastJavaString(const CYJavaEnv
&jni
, JSContextRef context
, JSStringRef value
) {
687 return CYCastJavaString(jni
, context
, CYCastUTF16String(value
));
690 #define CYCastJava$(T, Type, jtype, Cast) \
691 _disused static CYJavaLocal<jobject> CYCastJava ## Type(const CYJavaEnv &jni, JSContextRef context, JSValueRef value) { \
692 auto Type$(jni.FindClass("java/lang/" #Type)); \
693 auto Type$init$(jni.GetMethodID(Type$, "<init>", "(" #T ")V")); \
694 return jni.NewObject(Type$, Type$init$, static_cast<jtype>(Cast(context, value))); \
697 CYCastJava$
(Z
, Boolean
, jboolean
, CYCastBool
)
698 CYCastJava$
(B
, Byte
, jbyte
, CYCastDouble
)
699 CYCastJava$
(C
, Character
, jchar
, CYCastDouble
)
700 CYCastJava$
(S
, Short
, jshort
, CYCastDouble
)
701 CYCastJava$
(I
, Integer
, jint
, CYCastDouble
)
702 CYCastJava$
(J
, Long
, jlong
, CYCastDouble
)
703 CYCastJava$
(F
, Float
, jfloat
, CYCastDouble
)
704 CYCastJava$
(D
, Double
, jdouble
, CYCastDouble
)
706 static CYJavaClass
*CYGetJavaTable(JSContextRef context
, JSObjectRef object
) {
707 if (!JSValueIsObjectOfClass(context
, object
, CYPrivate
<CYJavaClass
>::Class_
))
709 return reinterpret_cast<CYJavaClass
*>(JSObjectGetPrivate(object
));
712 static CYJavaObject
*CYGetJavaObject(JSContextRef context
, JSObjectRef object
) {
713 if (!JSValueIsObjectOfClass(context
, object
, CYPrivate
<CYJavaObject
>::Class_
))
715 return reinterpret_cast<CYJavaObject
*>(JSObjectGetPrivate(object
));
718 static CYJavaLocal
<jobject
> CYCastJavaObject(const CYJavaEnv
&jni
, JSContextRef context
, JSObjectRef value
) {
719 if (CYJavaObject
*internal
= CYGetJavaObject(context
, value
))
720 return internal
->value_
;
722 auto Wrapper$
(jni
.FindClass("Cycript$Wrapper"));
723 auto Wrapper$$init$
(jni
.GetMethodID(Wrapper$
, "<init>", "(J)V"));
724 CYProtect
*protect(new CYProtect(context
, value
));
725 return jni
.NewObject(Wrapper$
, Wrapper$$init$
, reinterpret_cast<jlong
>(protect
));
728 static CYJavaLocal
<jobject
> CYCastJavaObject(const CYJavaEnv
&jni
, JSContextRef context
, JSValueRef value
) {
729 switch (JSValueGetType(context
, value
)) {
733 return CYCastJavaBoolean(jni
, context
, value
);
735 return CYCastJavaDouble(jni
, context
, value
);
737 return CYCastJavaString(jni
, context
, CYJSString(context
, value
));
739 return CYCastJavaObject(jni
, context
, CYCastJSObject(context
, value
));
741 case kJSTypeUndefined
:
742 // XXX: I am currently relying on this for dynamic proxy of void method
749 static JSObjectRef
CYGetJavaClass(JSContextRef context
, const CYJavaRef
<jclass
> &value
) {
750 CYJavaEnv
jni(value
);
751 CYJavaFrame
frame(jni
, 64);
753 JSObjectRef
global(CYGetGlobalObject(context
));
754 JSObjectRef
cy(CYCastJSObject(context
, CYGetProperty(context
, global
, cy_s
)));
756 auto Class$
(jni
.FindClass("java/lang/Class"));
757 auto Class$
getName(jni
.GetMethodID(Class$
, "getName", "()Ljava/lang/String;"));
759 CYJSString
name(jni
.CallObjectMethod
<jstring
>(value
, Class$getName
));
760 JSValueRef
cached(CYGetProperty(context
, cy
, name
));
761 if (!JSValueIsUndefined(context
, cached
))
762 return CYCastJSObject(context
, cached
);
764 JSObjectRef constructor
;
765 JSObjectRef prototype
;
769 auto Class$
isInterface(jni
.GetMethodID(Class$
, "isInterface", "()Z"));
771 auto Class$
getDeclaredConstructors(jni
.GetMethodID(Class$
, "getDeclaredConstructors", "()[Ljava/lang/reflect/Constructor;"));
772 auto Class$
getDeclaredFields(jni
.GetMethodID(Class$
, "getDeclaredFields", "()[Ljava/lang/reflect/Field;"));
773 auto Class$
getDeclaredMethods(jni
.GetMethodID(Class$
, "getDeclaredMethods", "()[Ljava/lang/reflect/Method;"));
775 auto Constructor$
(jni
.FindClass("java/lang/reflect/Constructor"));
776 //auto Constructor$getModifiers(jni.GetMethodID(Constructor$, "getModifiers", "()I"));
777 auto Constructor$
getParameterTypes(jni
.GetMethodID(Constructor$
, "getParameterTypes", "()[Ljava/lang/Class;"));
779 auto Field$
(jni
.FindClass("java/lang/reflect/Field"));
780 auto Field$
getModifiers(jni
.GetMethodID(Field$
, "getModifiers", "()I"));
781 auto Field$
getName(jni
.GetMethodID(Field$
, "getName", "()Ljava/lang/String;"));
782 auto Field$
getType(jni
.GetMethodID(Field$
, "getType", "()Ljava/lang/Class;"));
784 auto Method$
(jni
.FindClass("java/lang/reflect/Method"));
785 auto Method$
getModifiers(jni
.GetMethodID(Method$
, "getModifiers", "()I"));
786 auto Method$
getName(jni
.GetMethodID(Method$
, "getName", "()Ljava/lang/String;"));
787 auto Method$
getParameterTypes(jni
.GetMethodID(Method$
, "getParameterTypes", "()[Ljava/lang/Class;"));
788 auto Method$
getReturnType(jni
.GetMethodID(Method$
, "getReturnType", "()Ljava/lang/Class;"));
790 auto Modifier$
(jni
.FindClass("java/lang/reflect/Modifier"));
791 auto Modifier$
isStatic(jni
.GetStaticMethodID(Modifier$
, "isStatic", "(I)Z"));
793 auto interface(jni
.CallBooleanMethod(value
, Class$isInterface
));
794 auto table(new CYJavaClass(value
, interface
));
796 for (CYJavaLocal
<jclass
> prototype(value
); prototype
; prototype
= jni
.GetSuperclass(prototype
)) {
797 auto fields(jni
.CallObjectMethod
<jobjectArray
>(prototype
, Class$getDeclaredFields
));
799 for (jsize
i(0), e(jni
.GetArrayLength(fields
)); i
!= e
; ++i
) {
800 auto field(jni
.GetObjectArrayElement
<jobject
>(fields
, e
- i
- 1));
801 auto modifiers(jni
.CallIntMethod(field
, Field$getModifiers
));
802 auto instance(!jni
.CallStaticBooleanMethod(Modifier$
, Modifier$isStatic
, modifiers
));
803 auto &map(instance
? table
->instance_
: table
->static_
);
804 CYJavaUTF8String
name(jni
.CallObjectMethod
<jstring
>(field
, Field$getName
));
805 auto id(jni
.FromReflectedField(field
));
806 auto type(jni
.CallObjectMethod
<jclass
>(field
, Field$getType
));
807 map
.insert(std::make_pair(std::string(name
), CYJavaField
{id
, CYJavaGetPrimitive(context
, type
, Class$getName
)}));
811 constructor
= JSObjectMake(context
, CYPrivate
<CYJavaClass
>::Class_
, table
);
813 prototype
= JSObjectMake(context
, NULL
, NULL
);
814 CYSetProperty(context
, constructor
, prototype_s
, prototype
, kJSPropertyAttributeDontEnum
);
816 auto constructors(jni
.CallObjectMethod
<jobjectArray
>(value
, Class$getDeclaredConstructors
));
818 for (jsize
i(0), e(jni
.GetArrayLength(constructors
)); i
!= e
; ++i
) {
819 auto constructor(jni
.GetObjectArrayElement
<jobject
>(constructors
, i
));
820 auto parameters(jni
.CallObjectMethod
<jobjectArray
>(constructor
, Constructor$getParameterTypes
));
821 CYJavaShorty
shorty(CYJavaGetShorty(context
, parameters
, Class$getName
));
822 auto id(jni
.FromReflectedMethod(constructor
));
823 table
->overload_
.insert(CYJavaSignature(constructor
, id
, CYJavaPrimitiveObject
, shorty
));
826 auto methods(jni
.CallObjectMethod
<jobjectArray
>(value
, Class$getDeclaredMethods
));
828 std::map
<std::pair
<bool, std::string
>, CYJavaOverload
> entries
;
830 for (jsize
i(0), e(jni
.GetArrayLength(methods
)); i
!= e
; ++i
) {
831 auto method(jni
.GetObjectArrayElement
<jobject
>(methods
, i
));
832 auto modifiers(jni
.CallIntMethod(method
, Method$getModifiers
));
833 auto instance(!jni
.CallStaticBooleanMethod(Modifier$
, Modifier$isStatic
, modifiers
));
834 CYJavaUTF8String
name(jni
.CallObjectMethod
<jstring
>(method
, Method$getName
));
835 auto parameters(jni
.CallObjectMethod
<jobjectArray
>(method
, Method$getParameterTypes
));
836 CYJavaShorty
shorty(CYJavaGetShorty(context
, parameters
, Class$getName
));
837 auto type(jni
.CallObjectMethod
<jclass
>(method
, Method$getReturnType
));
838 auto primitive(CYJavaGetPrimitive(context
, type
, Class$getName
));
839 auto id(jni
.FromReflectedMethod(method
));
840 entries
[std::make_pair(instance
, std::string(name
))].insert(CYJavaSignature(method
, id
, primitive
, shorty
));
843 for (const auto &entry
: entries
) {
844 bool instance(entry
.first
.first
);
845 CYJSString
name(entry
.first
.second
);
846 auto &overload(entry
.second
);
848 CYSetProperty(context
, prototype
, name
, CYPrivate
<CYJavaMethod
>::Make(context
, overload
), kJSPropertyAttributeDontEnum
| kJSPropertyAttributeDontDelete
);
850 CYSetProperty(context
, constructor
, name
, CYPrivate
<CYJavaStaticMethod
>::Make(context
, overload
), kJSPropertyAttributeDontEnum
| kJSPropertyAttributeDontDelete
);
855 // XXX: for some reason kJSPropertyAttributeDontEnum doesn't work if there's already a property with the same name
856 // by not linking the prototypes until after we set the properties, we hide the parent property from this issue :(
858 if (auto super
= jni
.GetSuperclass(value
)) {
859 JSObjectRef
parent(CYGetJavaClass(context
, super
));
860 CYSetPrototype(context
, constructor
, parent
);
861 CYSetPrototype(context
, prototype
, CYGetProperty(context
, parent
, prototype_s
));
864 CYSetProperty(context
, cy
, name
, constructor
);
868 static void CYCastJavaNumeric(jvalue
&value
, CYJavaPrimitive primitive
, JSContextRef context
, JSValueRef argument
) {
870 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
871 case CYJavaPrimitive ## Type: \
872 value.t = static_cast<j ## type>(CYCastDouble(context, argument)); \
874 CYJavaForEachPrimitive
875 #undef CYJavaForEachPrimitive_
881 static bool CYCastJavaArguments(const CYJavaFrame
&frame
, const CYJavaShorty
&shorty
, JSContextRef context
, const JSValueRef arguments
[], jvalue
*array
) {
882 CYJavaEnv
jni(frame
);
884 for (size_t index(0); index
!= shorty
.size(); ++index
) {
885 JSValueRef
argument(arguments
[index
]);
886 JSType
type(JSValueGetType(context
, argument
));
887 jvalue
&value(array
[index
]);
889 switch (CYJavaPrimitive primitive
= shorty
[index
]) {
890 case CYJavaPrimitiveObject
:
891 // XXX: figure out a way to tie this in to the CYJavaFrame
892 value
.l
= CYCastJavaObject(jni
, context
, argument
).leak();
895 case CYJavaPrimitiveBoolean
:
896 if (type
!= kJSTypeBoolean
)
898 value
.z
= CYCastBool(context
, argument
);
901 case CYJavaPrimitiveCharacter
:
902 if (type
== kJSTypeNumber
)
903 CYCastJavaNumeric(value
, primitive
, context
, argument
);
904 else if (type
!= kJSTypeString
)
907 CYJSString
string(context
, argument
);
908 if (JSStringGetLength(string
) != 1)
911 value
.c
= JSStringGetCharactersPtr(string
)[0];
915 case CYJavaPrimitiveByte
:
916 case CYJavaPrimitiveShort
:
917 case CYJavaPrimitiveInteger
:
918 case CYJavaPrimitiveLong
:
919 case CYJavaPrimitiveFloat
:
920 case CYJavaPrimitiveDouble
:
921 if (type
!= kJSTypeNumber
)
923 CYCastJavaNumeric(value
, primitive
, context
, argument
);
934 static JSValueRef
JavaMethod_callAsFunction(JSContextRef context
, JSObjectRef object
, JSObjectRef _this
, size_t count
, const JSValueRef arguments
[], JSValueRef
*exception
) { CYTry
{
935 auto internal(CYPrivate
<CYJavaMethod
>::Get(context
, object
));
936 CYJavaObject
*self(CYGetJavaObject(context
, _this
));
937 _assert(self
!= NULL
);
938 CYJavaEnv
jni(self
->value_
);
940 CYJavaSignature
bound(count
);
941 for (auto overload(internal
->overload_
.lower_bound(bound
)), e(internal
->overload_
.upper_bound(bound
)); overload
!= e
; ++overload
) {
942 CYJavaFrame
frame(jni
, count
+ 16);
944 if (!CYCastJavaArguments(frame
, overload
->shorty_
, context
, arguments
, array
))
946 jvalue
*values(array
);
947 switch (overload
->primitive_
) {
948 case CYJavaPrimitiveObject
:
949 return CYCastJSValue(context
, jni
.CallObjectMethodA
<jobject
>(self
->value_
, overload
->method_
, values
));
950 case CYJavaPrimitiveVoid
:
951 jni
.CallVoidMethodA(self
->value_
, overload
->method_
, values
);
952 return CYJSUndefined(context
);
953 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
954 case CYJavaPrimitive ## Type: \
955 return CYJavaCastJSValue(context, jni.Call ## Typ ## MethodA(self->value_, overload->method_, values));
956 CYJavaForEachPrimitive
957 #undef CYJavaForEachPrimitive_
958 default: _assert(false);
962 CYThrow("invalid method call");
965 static JSValueRef
JavaStaticMethod_callAsFunction(JSContextRef context
, JSObjectRef object
, JSObjectRef _this
, size_t count
, const JSValueRef arguments
[], JSValueRef
*exception
) { CYTry
{
966 auto internal(CYPrivate
<CYJavaStaticMethod
>::Get(context
, object
));
967 CYJavaClass
*table(CYGetJavaTable(context
, _this
));
968 CYJavaEnv
jni(table
->value_
);
970 CYJavaSignature
bound(count
);
971 for (auto overload(internal
->overload_
.lower_bound(bound
)), e(internal
->overload_
.upper_bound(bound
)); overload
!= e
; ++overload
) {
972 CYJavaFrame
frame(jni
, count
+ 16);
974 if (!CYCastJavaArguments(frame
, overload
->shorty_
, context
, arguments
, array
))
976 jvalue
*values(array
);
977 switch (overload
->primitive_
) {
978 case CYJavaPrimitiveObject
:
979 return CYCastJSValue(context
, jni
.CallStaticObjectMethodA
<jobject
>(table
->value_
, overload
->method_
, values
));
980 case CYJavaPrimitiveVoid
:
981 jni
.CallStaticVoidMethodA(table
->value_
, overload
->method_
, values
);
982 return CYJSUndefined(context
);
983 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
984 case CYJavaPrimitive ## Type: \
985 return CYJavaCastJSValue(context, jni.CallStatic ## Typ ## MethodA(table->value_, overload->method_, values));
986 CYJavaForEachPrimitive
987 #undef CYJavaForEachPrimitive_
988 default: _assert(false);
992 CYThrow("invalid method call");
995 static JSObjectRef
JavaClass_callAsConstructor(JSContextRef context
, JSObjectRef object
, size_t count
, const JSValueRef arguments
[], JSValueRef
*exception
) { CYTry
{
996 auto table(CYPrivate
<CYJavaClass
>::Get(context
, object
));
997 CYJavaEnv
jni(table
->value_
);
998 jclass
_class(table
->value_
);
1000 if (table
->interface_
&& count
== 1) {
1001 auto Cycript$
(jni
.FindClass("Cycript"));
1002 auto Cycript$
Make(jni
.GetStaticMethodID(Cycript$
, "proxy", "(Ljava/lang/Class;LCycript$Wrapper;)Ljava/lang/Object;"));
1003 return CYCastJSObject(context
, jni
.CallObjectMethod
<jobject
>(Cycript$
, Cycript$Make
, _class
, CYCastJavaObject(jni
, context
, CYCastJSObject(context
, arguments
[0])).get()));
1006 CYJavaSignature
bound(count
);
1007 for (auto overload(table
->overload_
.lower_bound(bound
)), e(table
->overload_
.upper_bound(bound
)); overload
!= e
; ++overload
) {
1008 CYJavaFrame
frame(jni
, count
+ 16);
1009 jvalue array
[count
];
1010 if (!CYCastJavaArguments(frame
, overload
->shorty_
, context
, arguments
, array
))
1012 jvalue
*values(array
);
1013 auto object(jni
.NewObjectA(_class
, overload
->method_
, values
));
1014 return CYCastJSObject(context
, object
);
1017 CYThrow("invalid constructor call");
1020 static bool JavaStaticInterior_hasProperty(JSContextRef context
, JSObjectRef object
, JSStringRef property
) {
1021 auto internal(CYPrivate
<CYJavaStaticInterior
>::Get(context
, object
));
1022 CYJavaClass
*table(internal
->table_
);
1024 auto name(CYPoolUTF8String(pool
, context
, property
));
1025 auto field(table
->static_
.find(name
));
1026 if (field
== table
->static_
.end())
1031 static JSValueRef
JavaStaticInterior_getProperty(JSContextRef context
, JSObjectRef object
, JSStringRef property
, JSValueRef
*exception
) { CYTry
{
1032 auto internal(CYPrivate
<CYJavaStaticInterior
>::Get(context
, object
));
1033 CYJavaClass
*table(internal
->table_
);
1034 CYJavaEnv
jni(table
->value_
);
1036 auto name(CYPoolUTF8String(pool
, context
, property
));
1037 auto field(table
->static_
.find(name
));
1038 if (field
== table
->static_
.end())
1041 switch (field
->second
.primitive_
) {
1042 case CYJavaPrimitiveObject
:
1043 return CYCastJSValue(context
, jni
.GetStaticObjectField
<jobject
>(table
->value_
, field
->second
.field_
));
1044 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
1045 case CYJavaPrimitive ## Type: \
1046 return CYJavaCastJSValue(context, jni.GetStatic ## Typ ## Field(table->value_, field->second.field_));
1047 CYJavaForEachPrimitive
1048 #undef CYJavaForEachPrimitive_
1049 default: _assert(false);
1053 static bool JavaStaticInterior_setProperty(JSContextRef context
, JSObjectRef object
, JSStringRef property
, JSValueRef value
, JSValueRef
*exception
) { CYTry
{
1054 auto internal(CYPrivate
<CYJavaStaticInterior
>::Get(context
, object
));
1055 CYJavaClass
*table(internal
->table_
);
1056 CYJavaEnv
jni(table
->value_
);
1058 auto name(CYPoolUTF8String(pool
, context
, property
));
1059 auto field(table
->static_
.find(name
));
1060 if (field
== table
->static_
.end())
1063 switch (field
->second
.primitive_
) {
1064 case CYJavaPrimitiveObject
:
1065 jni
.SetStaticObjectField(table
->value_
, field
->second
.field_
, CYCastJavaObject(jni
, context
, value
));
1066 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
1067 case CYJavaPrimitive ## Type: \
1068 jni.SetStatic ## Typ ## Field(table->value_, field->second.field_, CYCastDouble(context, value)); \
1070 CYJavaForEachPrimitive
1071 #undef CYJavaForEachPrimitive_
1072 default: _assert(false);
1078 static void JavaStaticInterior_getPropertyNames(JSContextRef context
, JSObjectRef object
, JSPropertyNameAccumulatorRef names
) {
1079 auto internal(CYPrivate
<CYJavaStaticInterior
>::Get(context
, object
));
1080 CYJavaClass
*table(internal
->table_
);
1081 for (const auto &field
: table
->static_
)
1082 JSPropertyNameAccumulatorAddName(names
, CYJSString(field
.first
));
1085 static JSValueRef
JavaClass_getProperty_class(JSContextRef context
, JSObjectRef object
, JSStringRef property
, JSValueRef
*exception
) { CYTry
{
1086 auto table(CYPrivate
<CYJavaClass
>::Get(context
, object
));
1087 return CYCastJSValue(context
, table
->value_
);
1090 static bool JavaInterior_hasProperty(JSContextRef context
, JSObjectRef object
, JSStringRef property
) {
1091 auto internal(CYPrivate
<CYJavaInterior
>::Get(context
, object
));
1092 CYJavaClass
*table(internal
->table_
);
1094 auto name(CYPoolUTF8String(pool
, context
, property
));
1095 auto field(table
->instance_
.find(name
));
1096 if (field
== table
->instance_
.end())
1101 static JSValueRef
JavaInterior_getProperty(JSContextRef context
, JSObjectRef object
, JSStringRef property
, JSValueRef
*exception
) { CYTry
{
1102 auto internal(CYPrivate
<CYJavaInterior
>::Get(context
, object
));
1103 CYJavaEnv
jni(internal
->value_
);
1104 CYJavaClass
*table(internal
->table_
);
1106 auto name(CYPoolUTF8String(pool
, context
, property
));
1107 auto field(table
->instance_
.find(name
));
1108 if (field
== table
->instance_
.end())
1111 switch (field
->second
.primitive_
) {
1112 case CYJavaPrimitiveObject
:
1113 return CYCastJSValue(context
, jni
.GetObjectField
<jobject
>(internal
->value_
, field
->second
.field_
));
1114 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
1115 case CYJavaPrimitive ## Type: \
1116 return CYJavaCastJSValue(context, jni.Get ## Typ ## Field(internal->value_, field->second.field_));
1117 CYJavaForEachPrimitive
1118 #undef CYJavaForEachPrimitive_
1119 default: _assert(false);
1123 static bool JavaInterior_setProperty(JSContextRef context
, JSObjectRef object
, JSStringRef property
, JSValueRef value
, JSValueRef
*exception
) { CYTry
{
1124 auto internal(CYPrivate
<CYJavaInterior
>::Get(context
, object
));
1125 CYJavaEnv
jni(internal
->value_
);
1126 CYJavaClass
*table(internal
->table_
);
1128 auto name(CYPoolUTF8String(pool
, context
, property
));
1129 auto field(table
->instance_
.find(name
));
1130 if (field
== table
->instance_
.end())
1133 switch (field
->second
.primitive_
) {
1134 case CYJavaPrimitiveObject
:
1135 jni
.SetObjectField(table
->value_
, field
->second
.field_
, CYCastJavaObject(jni
, context
, value
));
1136 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
1137 case CYJavaPrimitive ## Type: \
1138 jni.Set ## Typ ## Field(table->value_, field->second.field_, CYCastDouble(context, value)); \
1140 CYJavaForEachPrimitive
1141 #undef CYJavaForEachPrimitive_
1142 default: _assert(false);
1148 static void JavaInterior_getPropertyNames(JSContextRef context
, JSObjectRef object
, JSPropertyNameAccumulatorRef names
) {
1149 auto internal(CYPrivate
<CYJavaInterior
>::Get(context
, object
));
1150 CYJavaClass
*table(internal
->table_
);
1151 for (const auto &field
: table
->instance_
)
1152 JSPropertyNameAccumulatorAddName(names
, CYJSString(field
.first
));
1155 static JSValueRef
JavaObject_getProperty_constructor(JSContextRef context
, JSObjectRef object
, JSStringRef property
, JSValueRef
*exception
) { CYTry
{
1156 auto internal(CYPrivate
<CYJavaObject
>::Get(context
, object
));
1157 CYJavaEnv
jni(internal
->value_
);
1158 return CYGetJavaClass(context
, jni
.GetObjectClass(internal
->value_
));
1161 static JSValueRef JavaClass_getProperty_$
cyi(JSContextRef context
, JSObjectRef object
, JSStringRef property
, JSValueRef
*exception
) { CYTry
{
1162 auto internal(CYPrivate
<CYJavaClass
>::Get(context
, object
));
1163 return CYPrivate
<CYJavaStaticInterior
>::Make(context
, internal
->value_
, internal
);
1166 static JSValueRef JavaObject_getProperty_$
cyi(JSContextRef context
, JSObjectRef object
, JSStringRef property
, JSValueRef
*exception
) { CYTry
{
1167 auto internal(CYPrivate
<CYJavaObject
>::Get(context
, object
));
1168 return CYPrivate
<CYJavaInterior
>::Make(context
, internal
->value_
, internal
->table_
);
1171 static JSValueRef
JavaClass_callAsFunction_toCYON(JSContextRef context
, JSObjectRef object
, JSObjectRef _this
, size_t count
, const JSValueRef arguments
[], JSValueRef
*exception
) { CYTry
{
1172 auto internal(CYPrivate
<CYJavaClass
>::Get(context
, _this
));
1173 CYJavaEnv
jni(internal
->value_
);
1174 auto Class$
(jni
.FindClass("java/lang/Class"));
1175 auto Class$
getCanonicalName(jni
.GetMethodID(Class$
, "getCanonicalName", "()Ljava/lang/String;"));
1176 return CYCastJSValue(context
, CYJSString(jni
.CallObjectMethod
<jstring
>(internal
->value_
, Class$getCanonicalName
)));
1179 static JSValueRef
JavaMethod_callAsFunction_toCYON(JSContextRef context
, JSObjectRef object
, JSObjectRef _this
, size_t count
, const JSValueRef arguments
[], JSValueRef
*exception
) { CYTry
{
1180 std::ostringstream cyon
;
1181 return CYCastJSValue(context
, CYJSString(cyon
.str()));
1184 static JSValueRef
JavaStaticMethod_callAsFunction_toCYON(JSContextRef context
, JSObjectRef object
, JSObjectRef _this
, size_t count
, const JSValueRef arguments
[], JSValueRef
*exception
) { CYTry
{
1185 std::ostringstream cyon
;
1186 return CYCastJSValue(context
, CYJSString(cyon
.str()));
1189 static JSValueRef
JavaArray_getProperty(JSContextRef context
, JSObjectRef object
, JSStringRef property
, JSValueRef
*exception
) { CYTry
{
1190 auto internal(CYPrivate
<CYJavaArray
>::Get(context
, object
));
1191 CYJavaEnv
jni(internal
->value_
);
1192 if (JSStringIsEqual(property
, length_s
))
1193 return CYCastJSValue(context
, jni
.GetArrayLength(internal
->value_
));
1197 if (!CYGetOffset(pool
, context
, property
, offset
))
1200 if (internal
->primitive_
== CYJavaPrimitiveObject
)
1201 return CYCastJSValue(context
, jni
.GetObjectArrayElement
<jobject
>(static_cast<jobjectArray
>(internal
->value_
.value_
), offset
));
1202 else switch (internal
->primitive_
) {
1203 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
1204 case CYJavaPrimitive ## Type: { \
1205 j ## type element; \
1206 jni.Get ## Typ ## ArrayRegion(static_cast<j ## type ## Array>(internal->value_.value_), offset, 1, &element); \
1207 return CYJavaCastJSValue(context, element); \
1209 CYJavaForEachPrimitive
1210 #undef CYJavaForEachPrimitive_
1211 default: _assert(false);
1215 static bool JavaArray_setProperty(JSContextRef context
, JSObjectRef object
, JSStringRef property
, JSValueRef value
, JSValueRef
*exception
) { CYTry
{
1216 auto internal(CYPrivate
<CYJavaArray
>::Get(context
, object
));
1217 CYJavaEnv
jni(internal
->value_
);
1221 if (!CYGetOffset(pool
, context
, property
, offset
))
1224 if (internal
->primitive_
== CYJavaPrimitiveObject
)
1225 jni
.SetObjectArrayElement(static_cast<jobjectArray
>(internal
->value_
.value_
), offset
, CYCastJavaObject(jni
, context
, value
));
1226 else switch (internal
->primitive_
) {
1227 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
1228 case CYJavaPrimitive ## Type: { \
1229 j ## type element; \
1230 jni.Get ## Typ ## ArrayRegion(static_cast<j ## type ## Array>(internal->value_.value_), offset, 1, &element); \
1231 return CYJavaCastJSValue(context, element); \
1233 CYJavaForEachPrimitive
1234 #undef CYJavaForEachPrimitive_
1235 default: _assert(false);
1241 static JNIEnv
*GetJNI(JSContextRef context
, JNIEnv
*&env
);
1243 static JSValueRef
JavaPackage_callAsFunction_toCYON(JSContextRef context
, JSObjectRef object
, JSObjectRef _this
, size_t count
, const JSValueRef arguments
[], JSValueRef
*exception
) { CYTry
{
1244 auto internal(CYPrivate
<CYJavaPackage
>::Get(context
, _this
));
1245 std::ostringstream name
;
1246 for (auto &package
: internal
->package_
)
1247 name
<< package
<< '.';
1249 return CYCastJSValue(context
, CYJSString(name
.str()));
1252 static bool CYJavaPackage_hasProperty(JSContextRef context
, JSObjectRef object
, JSStringRef property
) {
1256 static JSValueRef
CYJavaPackage_getProperty(JSContextRef context
, JSObjectRef object
, JSStringRef property
, JSValueRef
*exception
) { CYTry
{
1257 auto internal(CYPrivate
<CYJavaPackage
>::Get(context
, object
));
1258 CYJavaPackage::Path
package(internal
->package_
);
1261 const char *next(CYPoolCString(pool
, context
, property
));
1263 std::ostringstream name
;
1264 for (auto &package
: internal
->package_
)
1265 name
<< package
<< '/';
1268 if (internal
->jni_
== NULL
)
1269 GetJNI(context
, internal
->jni_
);
1270 JNIEnv
*jni(internal
->jni_
);
1272 if (auto _class
= jni
->FindClass(name
.str().c_str()))
1273 return CYGetJavaClass(context
, CYJavaLocal
<jclass
>(jni
, _class
));
1274 jni
->ExceptionClear();
1276 package
.push_back(next
);
1277 return CYPrivate
<CYJavaPackage
>::Make(context
, jni
, package
);
1280 static void Cycript_delete(JNIEnv
*env
, jclass api
, jlong jprotect
) { CYJavaTry
{
1284 static jobject
Cycript_handle(JNIEnv
*env
, jclass api
, jlong jprotect
, jstring property
, jobjectArray jarguments
) { CYJavaTry
{
1285 JSValueRef
function(CYGetProperty(context
, object
, CYJSString(CYJavaRef
<jstring
>(jni
, property
))));
1286 if (JSValueIsUndefined(context
, function
))
1289 size_t count(jarguments
== NULL
? 0 : jni
.GetArrayLength(jarguments
));
1290 JSValueRef arguments
[count
];
1291 for (size_t index(0); index
!= count
; ++index
)
1292 arguments
[index
] = CYCastJSValue(context
, jni
.GetObjectArrayElement
<jobject
>(jarguments
, index
));
1294 return CYCastJavaObject(jni
, context
, CYCallAsFunction(context
, CYCastJSObject(context
, function
), object
, count
, arguments
)).leak();
1295 } CYJavaCatch(NULL
) }
1297 static JNINativeMethod Cycript_
[] = {
1298 {(char *) "delete", (char *) "(J)V", (void *) &Cycript_delete
},
1299 {(char *) "handle", (char *) "(JLjava/lang/String;[Ljava/lang/Object;)Ljava/lang/Object;", (void *) &Cycript_handle
},
1302 template <typename Type_
>
1303 static _finline
void dlset(Type_
&function
, const char *name
, void *handle
) {
1304 function
= reinterpret_cast<Type_
>(dlsym(handle
, name
));
1307 jint
CYJavaVersion(JNI_VERSION_1_4
);
1309 static JavaVM
*CYGetJavaVM(jint (*$JNI_GetCreatedJavaVMs
)(JavaVM
**, jsize
, jsize
*)) {
1311 JavaVM
*jvms
[capacity
];
1313 _jnicall($
JNI_GetCreatedJavaVMs(jvms
, capacity
, &size
));
1319 static JavaVM
*CYGetJavaVM(JSContextRef context
) {
1321 void *handle(RTLD_DEFAULT
);
1322 std::string library
;
1324 jint (*$JNI_GetCreatedJavaVMs
)(JavaVM
**jvms
, jsize capacity
, jsize
*size
);
1325 dlset($JNI_GetCreatedJavaVMs
, "JNI_GetCreatedJavaVMs", handle
);
1327 if ($JNI_GetCreatedJavaVMs
!= NULL
) {
1328 if (JavaVM
*jvm
= CYGetJavaVM($JNI_GetCreatedJavaVMs
))
1331 std::vector
<const char *> guesses
;
1334 char android
[PROP_VALUE_MAX
];
1335 if (__system_property_get("persist.sys.dalvik.vm.lib", android
) != 0)
1336 guesses
.push_back(android
);
1339 guesses
.push_back("/Library/Internet Plug-Ins/JavaAppletPlugin.plugin/Contents/Home/lib/jli/libjli.dylib");
1340 //guesses.push_back("/System/Library/Frameworks/JavaVM.framework/JavaVM");
1341 guesses
.push_back("libjvm.dylib");
1343 guesses
.push_back("libart.so");
1344 guesses
.push_back("libdvm.so");
1345 guesses
.push_back("libjvm.so");
1347 for (const char *guess
: guesses
) {
1348 handle
= dlopen(guess
, RTLD_LAZY
| RTLD_GLOBAL
);
1349 if (handle
!= NULL
) {
1355 if (library
.size() == 0)
1358 dlset($JNI_GetCreatedJavaVMs
, "JNI_GetCreatedJavaVMs", handle
);
1359 if (JavaVM
*jvm
= CYGetJavaVM($JNI_GetCreatedJavaVMs
))
1363 std::vector
<JavaVMOption
> options
;
1366 std::ostringstream option
;
1367 option
<< "-Djava.class.path=";
1368 option
<< CYPoolLibraryPath(pool
) << "/libcycript.jar";
1369 if (const char *classpath
= getenv("CLASSPATH"))
1370 option
<< ':' << classpath
;
1371 options
.push_back(JavaVMOption
{pool
.strdup(option
.str().c_str()), NULL
});
1374 // To use libnativehelper to access JNI_GetCreatedJavaVMs, you need JniInvocation.
1375 // ...but there can only be one JniInvocation, and assuradely the other VM has it.
1376 // Essentially, this API makes no sense. We need it for AndroidRuntime, though :/.
1378 if (void *libnativehelper
= dlopen("libnativehelper.so", RTLD_LAZY
| RTLD_GLOBAL
)) {
1379 class JniInvocation$
;
1380 JniInvocation$
*(*JniInvocation$$init$
)(JniInvocation$
*self
)(NULL
);
1381 bool (*JniInvocation$Init
)(JniInvocation$
*self
, const char *library
)(NULL
);
1382 JniInvocation$
*(*JniInvocation$finalize
)(JniInvocation$
*self
)(NULL
);
1384 dlset(JniInvocation$$init$
, "_ZN13JniInvocationC1Ev", libnativehelper
);
1385 dlset(JniInvocation$Init
, "_ZN13JniInvocation4InitEPKc", libnativehelper
);
1386 dlset(JniInvocation$finalize
, "_ZN13JniInvocationD1Ev", libnativehelper
);
1388 if (JniInvocation$$init$
== NULL
)
1389 dlclose(libnativehelper
);
1391 // XXX: we should attach a pool to the VM itself and deallocate this there
1392 //auto invocation(pool.calloc<JniInvocation$>(1, 1024));
1393 //_assert(JniInvocation$finalize != NULL);
1394 //pool.atexit(reinterpret_cast<void (*)(void *)>(JniInvocation$finalize), invocation);
1396 auto invocation(static_cast<JniInvocation$
*>(calloc(1, 1024)));
1397 JniInvocation$$init$
(invocation
);
1399 _assert(JniInvocation$Init
!= NULL
);
1400 JniInvocation$
Init(invocation
, NULL
);
1402 dlset($JNI_GetCreatedJavaVMs
, "JNI_GetCreatedJavaVMs", libnativehelper
);
1403 if (JavaVM
*jvm
= CYGetJavaVM($JNI_GetCreatedJavaVMs
))
1411 if (void *libandroid_runtime
= dlopen("libandroid_runtime.so", RTLD_LAZY
| RTLD_GLOBAL
)) {
1412 class AndroidRuntime$
;
1413 AndroidRuntime$
*(*AndroidRuntime$$init$
)(AndroidRuntime$
*self
, char *args
, unsigned int size
)(NULL
);
1414 int (*AndroidRuntime$startVm
)(AndroidRuntime$
*self
, JavaVM
**jvm
, JNIEnv
**env
)(NULL
);
1415 int (*AndroidRuntime$startReg
)(JNIEnv
*env
)(NULL
);
1416 int (*AndroidRuntime$addOption
)(AndroidRuntime$
*self
, const char *option
, void *extra
)(NULL
);
1417 int (*AndroidRuntime$addVmArguments
)(AndroidRuntime$
*self
, int, const char *const argv
[])(NULL
);
1418 AndroidRuntime$
*(*AndroidRuntime$finalize
)(AndroidRuntime$
*self
)(NULL
);
1420 dlset(AndroidRuntime$$init$
, "_ZN7android14AndroidRuntimeC1EPcj", libandroid_runtime
);
1421 dlset(AndroidRuntime$startVm
, "_ZN7android14AndroidRuntime7startVmEPP7_JavaVMPP7_JNIEnv", libandroid_runtime
);
1422 dlset(AndroidRuntime$startReg
, "_ZN7android14AndroidRuntime8startRegEP7_JNIEnv", libandroid_runtime
);
1423 dlset(AndroidRuntime$addOption
, "_ZN7android14AndroidRuntime9addOptionEPKcPv", libandroid_runtime
);
1424 dlset(AndroidRuntime$addVmArguments
, "_ZN7android14AndroidRuntime14addVmArgumentsEiPKPKc", libandroid_runtime
);
1425 dlset(AndroidRuntime$finalize
, "_ZN7android14AndroidRuntimeD1Ev", libandroid_runtime
);
1427 // XXX: it would also be interesting to attach this to a global pool
1428 AndroidRuntime$
*runtime(pool
.calloc
<AndroidRuntime$
>(1, 1024));
1430 _assert(AndroidRuntime$$init$
!= NULL
);
1431 AndroidRuntime$$init$
(runtime
, NULL
, 0);
1433 if (AndroidRuntime$addOption
== NULL
) {
1434 _assert(AndroidRuntime$addVmArguments
!= NULL
);
1435 std::vector
<const char *> arguments
;
1436 for (const auto &option
: options
)
1437 arguments
.push_back(option
.optionString
);
1438 AndroidRuntime$
addVmArguments(runtime
, arguments
.size(), arguments
.data());
1439 } else for (const auto &option
: options
)
1440 AndroidRuntime$
addOption(runtime
, option
.optionString
, option
.extraInfo
);
1444 _assert(AndroidRuntime$startVm
!= NULL
);
1445 failure
= AndroidRuntime$
startVm(runtime
, &jvm
, &env
);
1446 _assert(failure
== 0);
1448 _assert(AndroidRuntime$startReg
!= NULL
);
1449 failure
= AndroidRuntime$
startReg(env
);
1450 _assert(failure
== 0);
1455 jint (*$JNI_CreateJavaVM
)(JavaVM
**jvm
, void **, void *);
1456 dlset($JNI_CreateJavaVM
, "JNI_CreateJavaVM", handle
);
1458 JavaVMInitArgs args
;
1459 memset(&args
, 0, sizeof(args
));
1460 args
.version
= CYJavaVersion
;
1461 args
.nOptions
= options
.size();
1462 args
.options
= options
.data();
1463 _jnicall($
JNI_CreateJavaVM(&jvm
, reinterpret_cast<void **>(&env
), &args
));
1467 static JNIEnv
*GetJNI(JSContextRef context
, JNIEnv
*&env
) {
1468 auto jvm(CYGetJavaVM(context
));
1469 _assert(jvm
!= NULL
);
1470 _jnicall(jvm
->GetEnv(reinterpret_cast<void **>(&env
), CYJavaVersion
));
1473 // XXX: this happens once per stub :/
1475 auto Cycript$
(jni
.FindClass("Cycript"));
1476 jni
.RegisterNatives(Cycript$
, Cycript_
, sizeof(Cycript_
) / sizeof(Cycript_
[0]));
1478 JSObjectRef
java(CYGetCachedObject(context
, CYJSString("Java")));
1479 JSValueRef arguments
[1];
1480 arguments
[0] = CYCastJSValue(context
, CYJSString("setup"));
1481 CYCallAsFunction(context
, CYCastJSObject(context
, CYGetProperty(context
, java
, CYJSString("emit"))), java
, 1, arguments
);
1486 static JSStaticValue JavaClass_staticValues
[3] = {
1487 {"class", &JavaClass_getProperty_class
, NULL
, kJSPropertyAttributeReadOnly
| kJSPropertyAttributeDontEnum
| kJSPropertyAttributeDontDelete
},
1488 {"$cyi", &JavaClass_getProperty_$cyi
, NULL
, kJSPropertyAttributeReadOnly
| kJSPropertyAttributeDontEnum
| kJSPropertyAttributeDontDelete
},
1489 {NULL
, NULL
, NULL
, 0}
1492 static JSStaticFunction JavaClass_staticFunctions
[2] = {
1493 {"toCYON", &JavaClass_callAsFunction_toCYON
, kJSPropertyAttributeDontEnum
| kJSPropertyAttributeDontDelete
},
1497 static JSStaticValue JavaObject_staticValues
[3] = {
1498 {"constructor", &JavaObject_getProperty_constructor
, NULL
, kJSPropertyAttributeReadOnly
| kJSPropertyAttributeDontEnum
| kJSPropertyAttributeDontDelete
},
1499 {"$cyi", &JavaObject_getProperty_$cyi
, NULL
, kJSPropertyAttributeReadOnly
| kJSPropertyAttributeDontEnum
| kJSPropertyAttributeDontDelete
},
1500 {NULL
, NULL
, NULL
, 0}
1503 static JSStaticFunction JavaMethod_staticFunctions
[2] = {
1504 {"toCYON", &JavaMethod_callAsFunction_toCYON
, kJSPropertyAttributeDontEnum
| kJSPropertyAttributeDontDelete
},
1508 static JSStaticFunction JavaStaticMethod_staticFunctions
[2] = {
1509 {"toCYON", &JavaStaticMethod_callAsFunction_toCYON
, kJSPropertyAttributeDontEnum
| kJSPropertyAttributeDontDelete
},
1513 static JSStaticFunction JavaPackage_staticFunctions
[2] = {
1514 {"toCYON", &JavaPackage_callAsFunction_toCYON
, kJSPropertyAttributeDontEnum
| kJSPropertyAttributeDontDelete
},
1518 void CYJava_Initialize() {
1519 Primitives_
.insert(std::make_pair("void", CYJavaPrimitiveVoid
));
1520 #define CYJavaForEachPrimitive_(T, t, Typ, Type, type) \
1521 Primitives_.insert(std::make_pair(#type, CYJavaPrimitive ## Type));
1522 CYJavaForEachPrimitive
1523 #undef CYJavaForEachPrimitive_
1525 JSClassDefinition definition
;
1527 definition
= kJSClassDefinitionEmpty
;
1528 definition
.className
= "JavaClass";
1529 definition
.staticValues
= JavaClass_staticValues
;
1530 definition
.staticFunctions
= JavaClass_staticFunctions
;
1531 definition
.callAsConstructor
= &JavaClass_callAsConstructor
;
1532 definition
.finalize
= &CYFinalize
;
1533 CYPrivate
<CYJavaClass
>::Class_
= JSClassCreate(&definition
);
1535 definition
= kJSClassDefinitionEmpty
;
1536 definition
.attributes
= kJSClassAttributeNoAutomaticPrototype
;
1537 definition
.className
= "JavaInterior";
1538 definition
.hasProperty
= &JavaInterior_hasProperty
;
1539 definition
.getProperty
= &JavaInterior_getProperty
;
1540 definition
.setProperty
= &JavaInterior_setProperty
;
1541 definition
.getPropertyNames
= &JavaInterior_getPropertyNames
;
1542 definition
.finalize
= &CYFinalize
;
1543 CYPrivate
<CYJavaInterior
>::Class_
= JSClassCreate(&definition
);
1545 definition
= kJSClassDefinitionEmpty
;
1546 definition
.className
= "JavaMethod";
1547 definition
.staticFunctions
= JavaMethod_staticFunctions
;
1548 definition
.callAsFunction
= &JavaMethod_callAsFunction
;
1549 definition
.finalize
= &CYFinalize
;
1550 CYPrivate
<CYJavaMethod
>::Class_
= JSClassCreate(&definition
);
1552 definition
= kJSClassDefinitionEmpty
;
1553 definition
.className
= "JavaStaticMethod";
1554 definition
.staticFunctions
= JavaStaticMethod_staticFunctions
;
1555 definition
.callAsFunction
= &JavaStaticMethod_callAsFunction
;
1556 definition
.finalize
= &CYFinalize
;
1557 CYPrivate
<CYJavaStaticMethod
>::Class_
= JSClassCreate(&definition
);
1559 definition
= kJSClassDefinitionEmpty
;
1560 definition
.attributes
= kJSClassAttributeNoAutomaticPrototype
;
1561 definition
.className
= "JavaObject";
1562 definition
.staticValues
= JavaObject_staticValues
;
1563 definition
.finalize
= &CYFinalize
;
1564 CYPrivate
<CYJavaObject
>::Class_
= JSClassCreate(&definition
);
1566 definition
= kJSClassDefinitionEmpty
;
1567 definition
.className
= "JavaArray";
1568 definition
.getProperty
= &JavaArray_getProperty
;
1569 definition
.setProperty
= &JavaArray_setProperty
;
1570 definition
.finalize
= &CYFinalize
;
1571 CYPrivate
<CYJavaArray
>::Class_
= JSClassCreate(&definition
);
1573 definition
= kJSClassDefinitionEmpty
;
1574 definition
.className
= "JavaPackage";
1575 definition
.staticFunctions
= JavaPackage_staticFunctions
;
1576 definition
.hasProperty
= &CYJavaPackage_hasProperty
;
1577 definition
.getProperty
= &CYJavaPackage_getProperty
;
1578 definition
.finalize
= &CYFinalize
;
1579 CYPrivate
<CYJavaPackage
>::Class_
= JSClassCreate(&definition
);
1581 definition
= kJSClassDefinitionEmpty
;
1582 definition
.attributes
= kJSClassAttributeNoAutomaticPrototype
;
1583 definition
.className
= "JavaStaticInterior";
1584 definition
.hasProperty
= &JavaStaticInterior_hasProperty
;
1585 definition
.getProperty
= &JavaStaticInterior_getProperty
;
1586 definition
.setProperty
= &JavaStaticInterior_setProperty
;
1587 definition
.getPropertyNames
= &JavaStaticInterior_getPropertyNames
;
1588 definition
.finalize
= &CYFinalize
;
1589 CYPrivate
<CYJavaStaticInterior
>::Class_
= JSClassCreate(&definition
);
1592 void CYJava_SetupContext(JSContextRef context
) {
1593 JSObjectRef
global(CYGetGlobalObject(context
));
1594 JSObjectRef
cy(CYCastJSObject(context
, CYGetProperty(context
, global
, cy_s
)));
1595 JSObjectRef
cycript(CYCastJSObject(context
, CYGetProperty(context
, global
, CYJSString("Cycript"))));
1596 JSObjectRef
all(CYCastJSObject(context
, CYGetProperty(context
, cycript
, CYJSString("all"))));
1597 //JSObjectRef alls(CYCastJSObject(context, CYGetProperty(context, cycript, CYJSString("alls"))));
1599 JSObjectRef
Java(JSObjectMake(context
, NULL
, NULL
));
1600 CYSetProperty(context
, cycript
, CYJSString("Java"), Java
);
1601 CYSetProperty(context
, cy
, CYJSString("Java"), Java
);
1603 JSObjectRef
Packages(CYPrivate
<CYJavaPackage
>::Make(context
, nullptr, CYJavaPackage::Path()));
1604 CYSetProperty(context
, all
, CYJSString("Packages"), Packages
, kJSPropertyAttributeDontEnum
);
1606 for (auto name
: (const char *[]) {"java", "javax", "android", "com", "net", "org"}) {
1607 CYJSString
js(name
);
1608 CYSetProperty(context
, all
, js
, CYPrivate
<CYJavaPackage
>::Make(context
, nullptr, CYJavaPackage::Path(1, name
)), kJSPropertyAttributeDontEnum
);
1612 static CYHook CYJavaHook
= {
1617 &CYJava_SetupContext
,
1621 CYRegisterHook
CYJava(&CYJavaHook
);